 
等级: 超级版主
- 注册:
- 2021-5-18
- 曾用名:
- FireScript
|
MA60:MA(C,60),COLORCYAN,LINETHICK2;
T:=INTPART(MOD(MA60,3))=0;
DRAWSL(T&&COUNT(T,BARSLAST(NOT(T))),MA60,0,3,0,COLORYELLOW);
DRAWNUMBER(T&&COUNT(T,BARSLAST(NOT(T))),MA60-3*MINDIFF,MA60,0,COLORYELLOW),VALIGN0;
DRAWTEXT(T&&COUNT(T,BARSLAST(NOT(T)))&&MA60>REF(MA60,SUMBARS(T=1,2)-1),MA60-3*MINDIFF,' ↑'),COLORRED,ALIGN0,VALIGN0,FONTSIZE22;
DRAWTEXT(T&&COUNT(T,BARSLAST(NOT(T)))&&MA60<=REF(MA60,SUMBARS(T=1,2)-1),MA60-3*MINDIFF,' ↓'),COLORGREEN,ALIGN0,VALIGN0,FONTSIZE22;
T1:=T&&COUNT(T,BARSLAST(NOT(T)))&&MA60>REF(MA60,SUMBARS(T=1,2)-1);
T2:=T&&COUNT(T,BARSLAST(NOT(T)))&&MA60<=REF(MA60,SUMBARS(T=1,2)-1);
//DRAWCOLORKLINE 没有对应函数进行转换
//DRAWCOLORKLINE(BARSLAST(T1)<BARSLAST(T2),COLORRED,0);
//DRAWCOLORKLINE(BARSLAST(T1)>=BARSLAST(T2),COLORGREEN,0);
if BARSLAST(T1)<BARSLAST(T2) then
begin
sellshort(1,holding,market);
buy(holding=0,1,market);
end
if BARSLAST(T1)>=BARSLAST(T2) then
begin
sell(1,holding,market);
buyshort(holding=0,1,market);
end
下单语句换下;不能实现的绘图函数注释掉 即可
|
|