同花顺新版天狼剑副图源码 EA

DRAWGBKLAST(CLOSE>0,STRIP(RGB(41,36,0),RGB(0,0,0),0));
r B1:=MA(C,1);
r B2:=SMA(SMA(SMA(B1,2,1),2,1),2,1);
r SMA2:=MA(B2,3);
r停损下限:IF(LLV(MA(B2,8),3)<b2,LLV(MA(B2,8),3),b2);
r FILLRGN(b2,sma2,b2>sma2,RGB(255,200,0),b2<sma2,RGB(0,255,0));
r snakeA:HHV(MA(B2,1),13),coloryellow;
r Var1:=(2*CLOSE+HIGH+LOW)/4;
r Var2:=MA(Var1,7);
r Var3:=Var2-MA(Var1,7/2)<0;
r Var4:=Var2-MA(Var1,7/2)>0;
r Var5:=BARSLAST(Var3);
r Var6:=0-BARSLAST(Var4);
r Var7:=IF(Var3<=0,Var5,Var6);
r STICKLINE(snakea>b2 AND b2>SMA2,snakea,b2,1,1),colorblue;
r STICKLINE(snakea>SMA2 AND b2<SMA2,snakea,SMA2,1,1),colorblue;
r Var11:=(CLOSE*2+HIGH+LOW)/4;
r Var21:=EMA(Var11,13)-EMA(Var11,34);
r Var31:=EMA(Var21,5);
r STICKLINE((C>=O),OPEN,LOW,1,0),color0726CA;
r STICKLINE((C>=O),CLOSE,HIGH,1,0),color0726CA;
r STICKLINE((C<O),CLOSE,LOW,1,0),colorDE9100;
r STICKLINE((C<O),OPEN,HIGH,1,0),colorDE9100;
r STICKLINE((C<O),CLOSE,OPEN,8,0),colorFF5B00;
r STICKLINE((C<O),CLOSE,OPEN,10,0),color000000;
r STICKLINE((C<O),CLOSE,OPEN,7,0),colorFF6C00;
r STICKLINE((C<O),CLOSE,OPEN,6,0),colorFF7B00;
r STICKLINE((C<O),CLOSE,OPEN,5,0),colorFF9C00;
r STICKLINE((C<O),CLOSE,OPEN,4,0),colorFFBE00;
r STICKLINE((C<O),CLOSE,OPEN,2.5,0),colorFFCC00;
r STICKLINE((C<O),CLOSE,OPEN,1.5,0),colorFFFF00;
r STICKLINE((C>O),CLOSE,OPEN,8,0),color070084;
r STICKLINE((C>O),CLOSE,OPEN,10,0),color000000;
r STICKLINE((C>O),CLOSE,OPEN,7,0),color0000A3;
r STICKLINE((C>O),CLOSE,OPEN,6,0),color0000B7;
r STICKLINE((C>O),CLOSE,OPEN,5,0),color0000CD;
r STICKLINE((C>O),CLOSE,OPEN,4,0),color0000E9;
r STICKLINE((C>O),CLOSE,OPEN,2,0),color0754E9;
r STICKLINE((C>O),CLOSE,OPEN,1.5,0),color076EF3;
r STICKLINE((C>O),CLOSE,OPEN,1,0),color077BF3;
r VAR2A:=((CLOSE > REF(CLOSE,1)) AND (CLOSE > REF(CLOSE,2)));
r VAR3A:=((REF(VAR2A,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
r VAR4A:=((REF(VAR3A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
r VAR5A:=((REF(VAR4A,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
r VAR6A:=((REF(VAR5A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
r VAR7A:=((REF(VAR6A,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
r VAR8A:=((REF(VAR7A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
r VAR9A:=((REF(VAR8A,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
r VARAA:=((REF(VAR9A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
r VARBA:=((REF(VARAA,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
r VARCA:=((REF(VARBA,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
r VARDA:=((REF(VARCA,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
r VAREAA:=((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,2)));
r VARFA:=((REF(VAREAA,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
r VAR10A:=((REF(VARFA,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
r VAR11A:=((REF(VAR10A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
r VAR12A:=((REF(VAR11A,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
r VAR13A:=((REF(VAR12A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
r VAR14A:=((REF(VAR13A,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
r VAR15A:=((REF(VAR14A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
r VAR16A:=((REF(VAR15A,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
r VAR17A:=((REF(VAR16A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
r VAR18A:=((REF(VAR17A,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
r VAR19A:=((REF(VAR18A,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
r VAR1A:=(REF((((((((((((VAREAA OR VARFA) OR VAR10A) OR VAR11A) OR VAR12A) OR VAR13A) OR VAR14A) OR VAR15A) OR VAR16A) OR VAR17A) OR VAR18A) OR VAR19A),1) AND VAR2A);
r STICKLINE(var1A,O,O+(C-O)/3,8,0),color0000ff;
r STICKLINE(var1A,O,O+(C-O)/3,7,0),color1029ff;
r STICKLINE(var1A,O,O+(C-O)/3,6,0),color1040ff;
r STICKLINE(var1A,O,O+(C-O)/3,5,0),color1083ff;
r STICKLINE(var1A,O,O+(C-O)/3,4,0),color10abff;
r STICKLINE(var1A,O,O+(C-O)/3,3,0),color10d0ff;
r STICKLINE(var1A,O,O+(C-O)/3,2,0),color10ffff;
r STICKLINE(var1A,O,O+(C-O)/3,1,0),color00ffff;
r AA:=(REF((((((((((((VAR2A OR VAR3A) OR VAR4A) OR VAR5A) OR VAR6A) OR VAR7A) OR VAR8A) OR VAR9A) OR VARAA) OR VARBA) OR VARCA) OR VARDA),1) AND VAREAA);
r STICKLINE(aa,O,O+(C-O)/3,8,0),color008800;
r STICKLINE(aa,O,O+(C-O)/3,7,0),color009900;
r STICKLINE(aa,O,O+(C-O)/3,6,0),color00aa00;
r STICKLINE(aa,O,O+(C-O)/3,5,0),color00bb00;
r STICKLINE(aa,O,O+(C-O)/3,4,0),color00cc00;
r STICKLINE(aa,O,O+(C-O)/3,3,0),color00dd00;
r STICKLINE(aa,O,O+(C-O)/3,2,0),color00ee00;
r STICKLINE(aa,O,O+(C-O)/3,1,0),color00ff00;
r a13:=EMA(CLOSE,55);
r a14:=MA(CLOSE,75);
r a15:=EMA(a14,3);
r a16:=EMA(a15,3);
r a17:=(HIGH + LOW) / 5;
r a18:=(MA(a17,4)) – (MA(a17,34));
r a19:=CROSS(a18,0);
r a20:=CROSS(0,a18);
r a21:=BARSLAST(a19);
r a22:=BARSLAST(a20);
r a23:=REF(a19,1);
r a24:=REF(a20,1);
r a25:=BARSLAST(a23);
r a26:=BARSLAST(a24);
r a27:=IF((a25 < a26),(REF((HHV(HIGH,2)),a25)),(REF((LLV(LOW,2)),a26)));
r a28:=(((REF(CLOSE,1)) <= (REF(a27,1))) AND (CLOSE > a27)) AND (a21 < a22);
r a29:=(((REF(CLOSE,1)) >= (REF(a27,1))) AND (CLOSE < a27)) AND (a22 < a21);
r a30:=a28 AND ((COUNT(a28,a21)) = 1);
r a31:=a29 AND ((COUNT(a29,a22)) = 1);
r a32:=a30 AND ((REF(BARSLAST(a31),1)) < (REF(BARSLAST(a30),1)));
r a33:=a31 AND ((REF(BARSLAST(a31),1)) > (REF(BARSLAST(a30),1)));
r DRAWTEXT(a32,SMA2*0.99,’←═╬∝’),coloryellow;
r ac:=AMOUNT/(VOL);
r yy:=MA(ac,13);
r lll:=(C-yy)/yy*100;
r MIDc := MA(CLOSE,22);
r UPPERc:= MIDc + 2*STD(C,22);
r LOWERc:= MIDc – 2*STD(C,22);
r bba:=(C-lowerc)/(upperc-lowerc);
r bbc:=FORCAST(bba,3);
r LIFENGcyc:=(REF(lll,1)<-15 AND REF(bba,1)<0 AND lll>REF(lll,1));
r STICKLINE(LIFENGcyc,LOW*0.93,LOW*0.95,6,0);
r STICKLINE(lifengcyc>0,C,O,8,0),colorred;
r STICKLINE(lifengcyc>0,C,O,7,0),color1029FF;
r STICKLINE(lifengcyc>0,C,O,6,0),color1040FF;
r STICKLINE(lifengcyc>0,C,O,4,0),color1083FF;
r STICKLINE(lifengcyc>0,C,O,2,0),color10ABFF;
r STICKLINE(lifengcyc>0,C,O,1.5,0),color10D0FF;
r STICKLINE(lifengcyc>0,C,O,1,0),color10FFFF;
r DRAWTEXT(LIFENGcyc>0,LOW*0.99,’☆’),colordd00dd;

r