請老師改成文華可用,謝謝!
作者:文華財經 來源: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);