大智慧主力吸筹副图源码
input:N(5,1,60),Z(4,1,100);
幅度:=ABS((C-REF(C,1))/REF(C,1));
转折:=IF(C>=O,幅度,0-幅度);
变异速度:=转折*1000000/INDEXC;
神风:SUM(变异速度,Z)*5,linethick1,COLORRED;
定律:SUM(0-变异速度,Z)*5,linethick1,colorblue;
Var1:=EMA(HHV(HIGH,500),21);
Var2:=EMA(HHV(HIGH,250),21);
Var3:=EMA(HHV(HIGH,90),21);
Var4:=EMA(LLV(LOW,500),21);
Var5:=EMA(LLV(LOW,250),21);
Var6:=EMA(LLV(LOW,90),21);
Var7:=EMA((Var4*0.96+Var5*0.96+Var6*0.96+Var1*0.558+Var2*0.558+Var3*0.558)/6,21);
Var8:=EMA((Var4*1.25+Var5*1.23+Var6*1.2+Var1*0.55+Var2*0.55+Var3*0.65)/6,21);
Var9:=EMA((Var4*1.3+Var5*1.3+Var6*1.3+Var1*0.68+Var2*0.68+Var3*0.68)/6,21);
VarA:=EMA((Var7*3+Var8*2+Var9)/6*1.738,21);
VarB:=REF(LOW,1);
VarC:=SMA(ABS(LOW-VarB),3,1)/SMA(MAX(LOW-VarB,0),3,1)*100;
VarD:=EMA(IF(CLOSE*1.35<=VarA,VarC*10,VarC/10),3);
VarE:=LLV(LOW,30);
VarF:=HHV(VarD,30);
Var10:=IF(MA(CLOSE,58),1,0);
吸筹:EMA(IF(LOW<=VarE,(VarD+VarF*2)/2,0),3)/618*Var10,colorYELLOW;
吸:=STICKLINE(吸筹>0 ,0 ,吸筹 ,4 ,1);
㊣:吸筹,colorRED;
STICKLINE(吸筹>0,0 ,㊣*1.2,6,0 ),COLORRED;
STICKLINE(吸筹>0,0 ,㊣*0.8,6,0 ),COLORRED;
VarG:=HHV(HIGH,30);
发筹:EMA(IF(HIGH>=VarG,(VarD+VarF*2)/2,0),3)/618*Var10,colorBLUE;
呼:=STICKLINE(发筹>0 ,0 ,发筹 ,3 ,1);
⊙:发筹,colorred;
STICKLINE(发筹>0,0 ,⊙*1.2,3,0 ),COLORGREEN;
STICKLINE(发筹>0,0 ,⊙*0.8,3,0 ),COLORGREEN;
