|
以下是通达信庄进指标公式（无源码的请下载附件导入）
ZT:=REF(C,1)*1.1-C<0.01 AND H=C;
BA:STICKLINE(ZT,OPEN,CLOSE,0.1,0),COLORYELLOW;
VAR326:=IF(CLOSE AND MA(VOL, 5)/240 AND CLOSE>REF(CLOSE, 1)*1.0 AND CLOSE,88,0);{VAR38>VAR39;}
VAR327:=IF(CLOSE/REF(CLOSE, 1)>1.050 AND VOL/CAPITAL*100<10 AND CLOSE<17 AND HIGH/CLOSE<1.010 AND VAR326>0, 91, 0);
STICKLINE(VAR327>90,LOW*0.99,LOW*0.95,2,0),COLORYELLOW;
DRAWTEXT(VAR327>90,LOW*0.95,'庄进'),COLORYELLOW;
P:=2;
收盘价线:=HHV(C,24);
AA1:=REF(收盘价线,P)=HHV(收盘价线,2*P+1);
BB1:=FILTER(AA1,P);
CC1:=BACKSET(BB1,P+1);
DD1:=FILTER(CC1,P);{高点};
压力位:=REF(收盘价线,BARSLAST(DD1)),LINETHICK0;
压力位1:=IF(ISLASTBAR,压力位,DRAWNULL);
STICKLINE(ISLASTBAR ,压力位1,压力位1,200,0),COLORGREEN;
DRAWNUMBER(ISLASTBAR,压力位*0.999-0.001,压力位),COLORGREEN;
底部位:=LLV(C,35),COLORWHITE,LINETHICK0;
底部位1:=IF(ISLASTBAR,底部位,DRAWNULL);
STICKLINE(ISLASTBAR ,底部位1,底部位1,200,0),COLORF00FF0;
DRAWNUMBER(ISLASTBAR,底部位*0.999-0.001,底部位),COLORF00FF0;
底部2:=LLV(L,35),COLOR00FF00,LINETHICK0;
底部位2:=IF(ISLASTBAR,底部2,DRAWNULL);
中间位:=(压力位1+底部位1)/2,LINETHICK0;
STICKLINE(ISLASTBAR ,中间位,中间位,200,0),COLORYELLOW;
DRAWNUMBER(ISLASTBAR,中间位*0.999-0.001,中间位),COLORYELLOW;
{底部1:=LLV(LOW,35),COLOR00FF00};
817100489.png
|
