咨詢內容：

請老師幫忙修改

AA1:=L=LLV(L,20);
AA2:=BARSLAST(AA1);
AA3:=C>HV(C,AA2) AND AA2>0;
AA4:=SUM(AA3,AA2+1);
AA5:=AA4=3 AND AA3;
AA6:=BARSLAST(AA5);
AA7:=REF(H,AA6);
AA8:=C>AA7 AND SUM(C>AA7,AA6+1)=1 AND AA6<AA2;
AA9:=BARSLAST(AA8);
AA10:=REF(C,AA9);
AA11:=C>AA10 AND SUM(C>AA10,AA9+1)=1 AND AA9<AA6 AND AA9>0;
AA12:=BARSLAST(AA11);
TR:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));//求最高價減去最低價，一個周期前的收盤價減去最高價的絕對值，一個周期前的收盤價減去最低價的絕對值，這三個值中的最大值
ATR:=MA(TR,AA2+1),COLORYELLOW;//求N個周期內的TR的簡單移動平均
AA13:=C+ATR;
H4:IF(AA9<AA2,REF(AA13,AA9),NULL),COLORRED,LINETHICK1;



LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=ABS(3*K-2*D);
M:=(K+D+J)/3;
PJ:(M+RSI1)/2,NODRAW,COLORYELLOW;

MACD: EMA(CLOSE,12) - EMA(CLOSE,26),NODRAW,PRECIS3,NOTEXT;
DIF:EMA(MACD,9),NODRAW,COLORWHITE,PRECIS3,NOTEXT;
差值:ABS(DIF-MACD),NODRAW,NOTEXT;
MACDX:MACD+差值,NODRAW,COLORRED,NOTEXT;
DIFFX:DIF+差值,NODRAW,COLORRED,NOTEXT;
AA:H4>0&&REF(ISNULL(H4),1),NODRAW;
VERTLINE(AA,COLORRED);
AAX:COUNT(PJ>70,BARSLAST(AA))=1&&PJ>70;
AAA:CROSS(MACD>VALUEWHEN(AAX,MACDX)&&DIF>VALUEWHEN(AAX,DIFFX),0.5),NODRAW;
DRAWICON(H4>0&&AAA,H,1);

?

?來源:程序化99網（ www.weiqiv.net.cn ）

博易技術人員： AA1:=L=LLV(L,20);
AA2:=BARSLAST(AA1);
AA3:=C>=HHV(C,AA2) AND AA2>0;
AA4:=SUM(AA3,AA2+1);
AA5:=AA4=3 AND AA3;
AA6:=BARSLAST(AA5);
AA7:=REF(H,AA6);
AA8:=C>AA7 AND SUM(C>AA7,AA6+1)=1 AND AA6<AA2;
AA9:=BARSLAST(AA8);
AA10:=REF(C,AA9);
AA11:=C>AA10 AND SUM(C>AA10,AA9+1)=1 AND AA9<AA6 AND AA9>0;
AA12:=BARSLAST(AA11);
TR:=MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));//求最高價減去最低價，一個周期前的收盤價減去最高價的絕對值，一個周期前的收盤價減去最低價的絕對值，這三個值中的最大值
ATR:=MA(TR,AA2+1),COLORYELLOW;//求N個周期內的TR的簡單移動平均
AA13:=C+ATR;
H4:IF(AA9<AA2,REF(AA13,AA9),DRAWNULL),COLORRED,LINETHICK1;


LC := REF(CLOSE,1);
RSI1:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
D:=SMA(K,3,1);
J:=ABS(3*K-2*D);
M:=(K+D+J)/3;
PJ:(M+RSI1)/2,NODRAW,COLORYELLOW;

MACD: EMA(CLOSE,12) - EMA(CLOSE,26),NODRAW,PRECIS3;
DIF:EMA(MACD,9),NODRAW,COLORWHITE,PRECIS3;
差值:ABS(DIF-MACD),NODRAW;
MACDX:MACD+差值,NODRAW,COLORRED;
DIFFX:DIF+差值,NODRAW,COLORRED;
AA:H4>0&&REF(NOT(H4),1),NODRAW;
VERTLINE(AA,0),COLORRED;
AAX:=COUNT(PJ>70,BARSLAST(AA))=1&&PJ>70;
AAA:CROSS(MACD>VALUEWHEN(AAX,MACDX)&&DIF>VALUEWHEN(AAX,DIFFX),0.5),NODRAW;
DRAWICON(H4>0&&AAA,H,1); 老師看看線沒畫出來啊?
來源 程序化久久網