KLINE(OPEN,HIGH,LOW,CLOSE,0);
HIGHN:=10;LOWN:=10;HIGHDISPLAY:=0;LOWDISPLAY:=0;ZGDISPLAY:=0;MADISPLAY:=0;
AA:=REF(HIGH,HIGHN)=HHV(HIGH,2*HIGHN+1);
QY:=BACKSET(AA,HIGHN+1);
CC:=FILTER(QY,HIGHN) AND HIGH=HHV(HIGH,HIGHN+1);
DRAWICON(CC,HIGH*1.02,2);
DDD:=BARSLAST(CC);
GDTS:=IF(CC,SYSPARAM(3)-BARPOS+1,0);
DINGBU:=IF(DDD,REF(HIGH,DDD),HIGH);{顶部}
DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);
DINGBU1:=REF(DINGBU,DDD+1);
GDCS1:=REFX(DINGBUTS,SYSPARAM(3)-BARPOS+1);
DINGBUTS1:=REF(DINGBUTS,DDD+1);
GDCS2:=REFX(DINGBUTS1,SYSPARAM(3)-BARPOS+1);
DINGBU2:=REF(DINGBU1,DDD+1);
MM:=IF(SYSPARAM(3)-BARPOS+1>GDCS2,0,1);
高点压力:LINEVALUE(SYSPARAM(3)-BARPOS+1=GDCS2,HIGH,SYSPARAM(3)-BARPOS+1=GDCS1,HIGH,0,1);
DRAWLINE(SYSPARAM(3)-BARPOS+1=GDCS2,HIGH,SYSPARAM(3)-BARPOS+1=GDCS1,HIGH,1) COLORGREEN,LINETHICK2;
DRAWLINE(SYSPARAM(3)-BARPOS+1=GDCS2,HIGH,ISLASTBAR,REF(HIGH,GDCS2-1),1),COLOR0055FF,POINTDOT;
DRAWLINE(SYSPARAM(3)-BARPOS+1=GDCS1,HIGH,ISLASTBAR,REF(HIGH,GDCS1-1),1),COLORYELLOW,POINTDOT;
AA1:=REF(LOW,LOWN)=LLV(LOW,2*LOWN+1);
QY1:=BACKSET(AA1,LOWN+1);
CC1:=FILTER(QY1,LOWN) AND LOW=LLV(LOW,LOWN+1);
DRAWICON(CC1,LOW*0.98,1);
DD1:=BARSLAST(CC1);
DDTS:=IF(CC1,SYSPARAM(3)-BARPOS+1,0);
YDB:=IF(DD1,REF(LOW,DD1),LOW);{底部}
DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);
DDCS1:=REFX(DDTS1,SYSPARAM(3)-BARPOS+1);
ZDB:=REF(YDB,DD1+1);
DDTS2:=REF(DDTS1,DD1+1);
DDCS2:=REFX(DDTS2,SYSPARAM(3)-BARPOS+1);
低点支撑:LINEVALUE(SYSPARAM(3)-BARPOS+1=DDCS2,LOW,SYSPARAM(3)-BARPOS+1=DDCS1,LOW,0,1);
DRAWLINE(SYSPARAM(3)-BARPOS+1=DDCS2,LOW,SYSPARAM(3)-BARPOS+1=DDCS1,LOW,1) COLORRED,LINETHICK2;
ZGSTAR:(高点压力+低点支撑)/2;
ZGEND:=REFX((高点压力+低点支撑)/2,SYSPARAM(3)-BARPOS+1);
STARDAY:=IF(DDCS2<GDCS2,DDCS2,GDCS2);
中轨:LINEVALUE(SYSPARAM(3)-BARPOS+1=STARDAY,ZGSTAR,ISLASTBAR,ZGEND,0,1);
DRAWLINE(SYSPARAM(3)-BARPOS+1=STARDAY,ZGSTAR,ISLASTBAR,ZGEND,1),COLORFF55BB,LINETHICK2;
DRAWLINE(SYSPARAM(3)-BARPOS+1=DDCS1,LOW,ISLASTBAR,REF(LOW,DDCS1-1),1),COLORMAGENTA,POINTDOT;
DRAWLINE(SYSPARAM(3)-BARPOS+1=DDCS2,LOW,ISLASTBAR,REF(LOW,DDCS2-1),1),COLORCYAN,POINTDOT; |