請老師改成文華可用，謝謝！

作者：文華財經來源：cxh99.com 發布時間：2021年11月21日

咨詢內容：
?下載信息??[文件大小：???下載次數：?]文件名：文檔.txt
?　　
?
?來源:程序化99
文華技術人員： ?參考；
VAR1:=(2*CLOSE+HIGH+LOW+OPEN)/5; VAR2:=EMA(EMA(EMA(VAR1,4),4),4); SJ: (VAR2-REF(VAR2,1))/REF(VAR2,1)*100, COLORSTICK; SD: MA(SJ,2); SK: MA(SJ,1); CAPITAL:=GETPRICE1('通股本'; FILLRGN((SJ-SD)*30000+40000>40000,40000,(SJ-SD)*30000+40000,RGB(255,215,0)); FILLRGN((SJ-SD)*30000+40000<40000,40000,(SJ-SD)*30000+40000,RGB(135,206,235));
SHORT:=5; LONG:=55; MID:=10; DIF:EMA(CLOSE,SHORT)-EMA(CLOSE,LONG); DEA:EMA(DIF,MID);

FILLRGN((DIF-DEA)*20000+20000>20000,20000,(DIF-DEA)*20000+20000,RGB(255,215,0)); FILLRGN((DIF-DEA)*20000+20000>20000,20000,(DIF-DEA)*20000+20000,RGB(135,206,235));
ZC_1:=IF(L<C,0,IF(H>C,C-(C-H+0.02)/(H-L+0.02),0)); ZC_2:=DMA(ZC_1,V/CAPITAL)*100; 出貨:=IF(ZC_2>0 AND ZC_2>REF(ZC_2,1),ZC_2/20,0); 軸:0,COLOR00FF00; PJJ:=DMA((H + L + C * 2) / 4,0.9); JJ:=REF(EMA(PJJ,3),1); QJJ:=VOL / ((H - L) * 2 - ABS(C - O)); XVL:=IF(C > O,QJJ * (H - L),IF(C < O,QJJ * (H - O + (C - L)),VOL / 2)) + IF(C > O,0 - QJJ * (H - C + (O - L)),IF(C < O,0 - QJJ * (H - L),0 - VOL / 2)); ZLL:=VOL / CAPITAL; HSL1:=IF(ZLL > 10,10,ZLL); HSL:=XVL / 20 / 1.15; 攻擊流量:=HSL * 0.55 + REF(HSL,1) * 0.33 + REF(HSL,2) * 0.22; GJJ:=EMA(攻擊流量,8); LLJX:=EMA(攻擊流量,3); 流量:LLJX,COLORC875B7,COLORRED,NODRAW; STICKLINE(流量 > 0,流量,0,2.3,0),COLORRED; STICKLINE(流量 < 0,流量,0,2.3,0),COLORFF4242; 流量基線:GJJ,COLOR00BBBB,COLORGREEN; STICKLINE(HSL * 0.4 >= 0,HSL * 0.4 * 1.5,0,0.5,0),COLORYELLOW; STICKLINE(HSL * 0.4 < 0,HSL * 0.4 * 1.5,0,0.5,0),COLORGREEN; ZJLL:=REF(LLJX,1); QZJJ:=(((LLJX - ZJLL) / ZJLL) * 100); 流量幅%:IF(((LLJX > 0) AND (ZJLL < 0)),ABS(QZJJ),IF((((LLJX < 0) AND (ZJLL < 0)) AND (LLJX < ZJLL)),(0 - QZJJ),QZJJ)),COLORMAGENTA,NODRAW; 力度:HSL / 1000,COLOR9B37FF,COLORRED,NODRAW; 周流量:SUM(LLJX,5),COLORFFBFDF,COLORMAGENTA,NODRAW; BB:=REF(周流量,1); ZQZJJ:=(周流量-BB)/BB*100; 周幅%:IF(周流量>0 AND BB<0,ABS(ZQZJJ),IF(周流量<0 AND BB<0 AND 周流量<BB,-ZQZJJ,ZQZJJ)),COLORMAGENTA,NODRAW; VARQ1:=REF((LOW+OPEN+CLOSE+HIGH)/4,1); VARQ2:=SMA(ABS(LOW-VARQ1),13,1)/SMA(MAX(LOW-VARQ1,0),10,1); VARQ3:=EMA(VARQ2,10); VARQ4:=LLV(LOW,33); VARQ5:=EMA(IF(LOW<=VARQ4,VARQ3,0),3)*100; STICKLINE(VARQ5>REF(VARQ5,1) AND 出貨<=0,0,VARQ5,7,0 ),COLORMAGENTA; JJJ:MA(SUM(HSL,55),9), COLORRED,LINETHICK1; DRAWICON(CROSS(JJJ,軸),-5000,4);