AC:=CLOSE;
强:=WMA(HIGH,4);
弱:=WMA(LOW,4);
B:=CLOSE*0;
FOR I=8+1 TO DATACOUNT DO BEGIN
IF AC[I]>强[I-1] THEN
B[I]:=1;ELSE
IF AC[I]<弱[I-1] THEN
B[I]:=-1;ELSE
B[I]:=B[I-1];
END;
转折线:IF(B=-1,MA(HIGH,4),MA(LOW,4)),LINETHICK,COLORMAGENTA;
PARTLINE(c>转折线,转折线),LINETHICK1,COLORMAGENTA;
PARTLINE(c<转折线,转折线),LINETHICK1,ColorFF8000;
预警买:ref(c,1)<ref(转折线,1) and c>转折线,LINETHICK;
预警卖:ref(c,1)>ref(转折线,1) and c<转折线,LINETHICK;
DRAWTEXT(预警买>0,l*0.92,'↑\n进'),ALIGN0,Color00FFFF;
DRAWTEXT(预警卖>0,h*1.08,'出\n↓'),ALIGN0,ColorFFFF00; |