源码
Var1:=EMA(EMA(EMA(CLOSE,4),4),4);
Var2:=Var1-REF(Var1,1)+Var1;
Var3:=MA(Var2,25);
STICKLINE(Var2>Var3,OPEN,CLOSE,7,0), , COLORRED;
STICKLINE(Var2>Var3,IF(CLOSE>OPEN,CLOSE,OPEN),IF(CLOSE>=OPEN,OPEN+(CLOSE-OPEN)*0.25,CLOSE+(OPEN-CLOSE)*0.2),7,0), , COLOR0066FF;
STICKLINE(Var2>Var3,IF(CLOSE>OPEN,CLOSE,OPEN),IF(CLOSE>=OPEN,OPEN+(CLOSE-OPEN)*0.5,CLOSE+(OPEN-CLOSE)*0.4),7,0), , COLOR00CCFF;
STICKLINE(Var2>Var3,IF(CLOSE>OPEN,CLOSE,OPEN),IF(CLOSE>=OPEN,OPEN+(CLOSE-OPEN)*0.75,CLOSE+(OPEN-CLOSE)*0.6),7,0), , COLOR00FFFF;
STICKLINE(Var2<Var3,OPEN,CLOSE,7,0), , COLORFF0066;
STICKLINE(Var2<Var3,IF(CLOSE>OPEN,CLOSE,OPEN),IF(CLOSE>=OPEN,OPEN+(CLOSE-OPEN)*0.45,CLOSE+(OPEN-CLOSE)*0.2),7,0), , COLORFF6666;
STICKLINE(Var2<Var3,IF(CLOSE>OPEN,CLOSE,OPEN),IF(CLOSE>=OPEN,OPEN+(CLOSE-OPEN)*0.6,CLOSE+(OPEN-CLOSE)*0.45),7,0), ,COLORFF9966;
STICKLINE(Var2<Var3,IF(CLOSE>OPEN,CLOSE,OPEN),IF(CLOSE>=OPEN,OPEN+(CLOSE-OPEN)*0.75,CLOSE+(OPEN-CLOSE)*0.72),7,0), , COLORFFFF66;
STICKLINE(Var2>Var3,HIGH,IF(CLOSE>=OPEN,CLOSE,OPEN),0.5,0), , COLORRED;
STICKLINE(Var3>Var2,LOW,IF(CLOSE<OPEN,CLOSE,OPEN),0.5,0), , COLORGREEN;
STICKLINE(Var2>Var3,LOW,IF(CLOSE>=OPEN,OPEN,CLOSE),0.5,0), , COLORRED;
STICKLINE(Var3>Var2,HIGH,IF(CLOSE>OPEN,CLOSE,OPEN),0.5,0), , COLORGREEN;
Var4:=(CLOSE-LLV(LOW,64))/(HHV(HIGH,64)-LLV(LOW,64))*100;
Var5:=SMA(MAX(CLOSE-REF(CLOSE,1),0),18,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),18,1)*100;
Var6:=Var4/Var5>1.39;
Var7:=Var5>65;
Var8:=DRAWTEXT(Var6 AND Var7,HIGH,'顶');
UPPER: SMA(MA(CLOSE,26)+2.191*STD(CLOSE,26),3,1), ,COLORFFFF66;
MID: MA(CLOSE,26), , COLORYELLOW;
LOWER: SMA(MID-2.191*STD(CLOSE,26),3,1), , COLORRED;
Var9:=DRAWTEXT(CROSS(UPPER,CLOSE),HIGH,'↓');
VarA:=DRAWTEXT(CROSS(CLOSE,LOWER),LOW,'↑');
VarB:=MA(CLOSE,27)/CLOSE>1.169 AND MA(CLOSE,17)/CLOSE>1.158 AND CLOSE<MA(CLOSE,120) AND MA(CLOSE,60)<MA(CLOSE,120) AND MA(CLOSE,60)>MA(CLOSE,30) AND "CCI">-210;
VarC:=DRAWTEXT(VarB,LOW,'底');
{Var8 OR Var9 OR VarA OR VarC,COLORWHITE;};