文章预览
源码： DRAWKLINE(H,O,L,C); UR:=250;{自行调节参数为长中短} LR:=250;{自行调节参数为长中短} TC1:=IF(H=HHV(H,1*UR),H,DRAWNULL); TC2:=CONST(BARSLAST(TC1=H))+1; UPPER:=CONST(IF(TC2=1,H,REF(H,TC2-1))); BC1:=IF(L=LLV(L,1*LR),L,DRAWNULL); BC2:=CONST(BARSLAST(BC1=L))+1; LOWER:=CONST(IF(BC2=1,L,REF(L,BC2-1))); LP:=CURRBARSCOUNT < =BC2 AND L=LOWER;{低点定位} HP:=CURRBARSCOUNT < =TC2 AND H=UPPER;{高点定位} STICKLINE(IF(BC2>TC2,HP,LP),LOWER,UPPER,0,0),COLOR628962; STICKLINE(IF(BC2>TC2,LP,HP),LOWER,UPPER,0,0),COLOR628962; NOD:=(IF(TC2>BC2,TC2,BC2)-IF(TC2>BC2,BC2,TC2));{用时} LR1:=MA(C,NOD+1); NP:IF(CURRBARSCOUNT < =MAX(BC2,TC2),CONST(IF(MIN(TC2,BC2)=1,LR1,REF(LR1,MIN(TC2,BC2)-1))),DRAWNULL),POINTDOT,COLOR93BDA8;{近点} LR2:=SLOPE(C,NOD+1); LR3:=CONST(IF(MIN(TC2,BC2)=1,LR2,REF(LR2,MIN(TC2,BC2)-1))); FP:=NP-LR3*(NOD),POINTDOT,COLOR93BDA8;{远点} EQU:(NP+FP)/2,POINTDOT,COLOR93BDA8;{中点} A:(NP+EQU)/2,COLORGRAY; B:(NP+A)/2,COLORGRAY; D:(EQU
………………………………
