RUNMODE:0;
AA:=(HHV(HIGH,120)-LLV(LOW,120))/30,LINETHICK;
Var1:=(2*CLOSE+HIGH+LOW)/4;
转换线1:(HHV(HIGH,4)+LLV(LOW,10))/2,coloraaff99,LINETHICK;
基准线1:(LLV(HIGH,10)+HHV(LOW,100))/2,colorff6dd8,LINETHICK;
转换线1A:(HHV(HIGH,100)+LLV(LOW,2))/2,coloraaff99,LINETHICK;
基准线1A:(LLV(HIGH,100)+HHV(LOW,100))/2,colorff6dd8,LINETHICK;
先行带1A:REF((转换线1+基准线1)/2,10),COLORYELLOW,LINETHICK;
先行带1B:REF((转换线1A+基准线1A)/2,10),color909090;
转换线2:(HHV(H,200)+LLV(L,100))/2,coloraaff99,LINETHICK;
基准线2:(HHV(L,100)+LLV(H,10))/2,colorff6dd8,LINETHICK;
先行带2:(HHV(HIGH,10)+LLV(LOW,20))/2,colorff6dd8,LINETHICK;
先行带2A:REF((转换线2+基准线2+先行带2)/3,1),COLORYELLOW,LINETHICK;
先行带2B:REF((转换线2+基准线2+先行带2A)/3,1),COLORYELLOW,LINETHICK;
转换线3:(HHV(HIGH,4)+LLV(LOW,100))/2,coloraaff99,LINETHICK;
基准线3:(LLV(HIGH,10)+HHV(LOW,100))/2,colorff6dd8,LINETHICK;
转换线3A:(HHV(HIGH,100)+LLV(LOW,200))/2,coloraaff99,LINETHICK;
基准线3A:(LLV(HIGH,1)+HHV(LOW,10))/2,colorff6dd8,LINETHICK;
先行带3A:REF((转换线3+基准线3)/2,1),COLORYELLOW,LINETHICK;
先行带3B:REF((转换线3A+基准线3A)/2,1),color909090;
转换线4:(HHV(H,20)+LLV(L,100))/2,coloraaff99,LINETHICK;
基准线4:(HHV(L,10)+LLV(H,100))/2,colorff6dd8,LINETHICK;
先行带4:(HHV(HIGH,100)+LLV(LOW,200))/2,colorff6dd8,LINETHICK;
先行带4A:REF((转换线4+基准线4+先行带4)/3,100),COLORYELLOW,LINETHICK;
先行带4B:REF((转换线4+基准线4+先行带4A)/3,100),COLORYELLOW,LINETHICK;
DRAWTEXT(CROSS(先行带1A,先行带1B) AND Var1>MAX(转换线1,基准线1),LOW-AA*0.5,\'▲\\n▲\\n▲\\n▲\\n▲\'),COLORred,ALIGN0;//(((此信号开多,如有空单先平再反手)))
DRAWTEXT(CROSS(转换线1,基准线1) AND Var1>MAX(基准线1A,先行带1B),LOW-AA*0.5,\'▲\\n▲\\n▲\\n▲\\n▲\'),COLORred,ALIGN0;//(((此信号开多,如有空单先平再反手)))
DRAWTEXT(CROSS(基准线2,先行带2A) AND Var1<MIN(先行带2A,转换线2),MAX(基准线2,HIGH)+AA*2,\'▼\\n▼\\n▼\\n▼\\n▼\'),COLORFF9966,ALIGN0; // (((此信号平多单)))
DRAWTEXT(CROSS(基准线2,先行带2B) AND Var1<MIN(先行带2A,基准线2),MAX(基准线2,HIGH)+AA*2,\'▼\\n▼\\n▼\\n▼\\n▼\'),COLORFF9966,ALIGN0; // (((此信号平多单)))
DRAWTEXT(CROSS(先行带3A,先行带3B) AND Var1>MAX(转换线3,基准线3),LOW-AA*0.5,\'▲\\n▲\\n▲\\n▲\\n▲\'),COLORred,ALIGN0; // (((此信号平空单)))
DRAWTEXT(CROSS(转换线3,基准线3) AND Var1>MAX(基准线3A,先行带3B),LOW-AA*0.5,\'▲\\n▲\\n▲\\n▲\\n▲\'),COLORred,ALIGN0; // (((此信号平空单)))
DRAWTEXT(CROSS(转换线4,先行带4A) AND Var1>MAX(基准线4,先行带4A),LOW-AA*0.5,\'▲\\n▲\\n▲\\n▲\\n▲\'),COLORred,ALIGN0; // (((此信号平空单)))
DRAWTEXT(CROSS(转换线4,先行带4B) AND Var1>MAX(转换线4,先行带4A),LOW-AA*0.5,\'▲\\n▲\\n▲\\n▲\\n▲\'),COLORred,ALIGN0; // (((此信号平空单)))
DRAWTEXT(CROSS(先行带3B,先行带3A) AND Var1<MIN(转换线3,转换线3A),MAX(基准线3,HIGH)+AA*2,\'▼\\n▼\\n▼\\n▼\\n▼\'),COLORFF9966,ALIGN0;//(((此信号开空,如有多单先平再反手)))
DRAWTEXT(CROSS(基准线3A,转换线3A) AND Var1<MIN(转换线3,转换线3A),MAX(基准线3,HIGH)+AA*2,\'▼\\n▼\\n▼\\n▼\\n▼\'),COLORFF9966,ALIGN0;//(((此信号开空,如有多单先平再反手)))
//平空开多
kd:=(CROSS(先行带1A,先行带1B) AND Var1>MAX(转换线1,基准线1))or (CROSS(转换线1,基准线1) AND Var1>MAX(基准线1A,先行带1B));
if kd then begin
sellshort(holding<0,holding,market);
buy(holding=0,1,market);
end
//平多
pd:(CROSS(基准线2,先行带2A) AND Var1<MIN(先行带2A,转换线2)) or (CROSS(基准线2,先行带2B) AND Var1<MIN(先行带2A,基准线2));
sell(pd and holding>0,holding,market);
//平空
pk:(CROSS(先行带3A,先行带3B) AND Var1>MAX(转换线3,基准线3)) or (CROSS(转换线3,基准线3) AND Var1>MAX(基准线3A,先行带3B)) or (CROSS(转换线4,先行带4A) AND Var1>MAX(基准线4,先行带4A)) or (CROSS(转换线4,先行带4B) AND Var1>MAX(转换线4,先行带4A));
sellshort(pk and holding<0,holding,market);
//平多开空
kk:(CROSS(先行带3B,先行带3A) AND Var1<MIN(转换线3,转换线3A)) or (CROSS(基准线3A,转换线3A) AND Var1<MIN(转换线3,转换线3A));
if kk then begin
sell(holding>0,holding,market);
buyshort(holding=0,1,market);
end