飞狐立体龙脉带主图指标

源码

{主图指标:立体龙脉带}

Var1:=IF(YEAR>=2003 AND MONTH>9,0,1);
Var2:=(3*CLOSE+LOW+OPEN+HIGH)/6;
多头线: (20*Var2+19*REF(Var2,1)+18*REF(Var2,2)+17*REF(Var2,3)+16*REF(Var2,4)+15*REF(Var2,5)+14*REF(Var2,6)+13*REF(Var2,7)+12*REF(Var2,8)+11*REF(Var2,9)+10*REF(Var2,10)+9*REF(Var2,11)+8*REF(Var2,12)+7*REF(Var2,13)+6*REF(Var2,14)+5*REF(Var2,15)+4*REF(Var2,16)+3*REF(Var2,17)+2*REF(Var2,18)+REF(Var2,20))/210*Var1, CIRCLEDOT,COLORRED;
空头线: MA(多头线,10)*Var1, CIRCLEDOT,COLORGREEN;
STICKLINE(多头线>空头线,多头线,空头线,10,10),,COLORRED;
STICKLINE(多头线<空头线,多头线,空头线,10,10), ,COLORGREEN;
STICKLINE(open>=close ,close ,open,7,0 ),COLORred;
STICKLINE(open>=close ,close ,open,4,0 ),COLORgreen;
STICKLINE(open>=close ,close ,open,2,0 ),COLORFFFF00;
STICKLINE(close>open,close,open,7 ,0 ),COLOR2020FF;
STICKLINE(close>open,close,open,4 ,0 ),COLORB0B0FF;
STICKLINE(close>open,close,open,2 ,0 ),COLOR00FFFF;

STICKLINE(close>open,open,low,0.5,0 ),COLOR00FFFF;
STICKLINE(close>open,close,HIGH,0.5 ,0 ),COLOR00FFFF;
STICKLINE(open>=close,close,low,0.5 ,0 ),COLORFFFF80;
STICKLINE(open>=close,open,HIGH,0.5 ,0 ),COLORFFFF80;

STICKLINE(close=open AND C>REF(C,1),close,open,7 ,0 ),COLOR2020FF;
STICKLINE(close=open AND C>REF(C,1),close,HIGH,0.5 ,0 ),COLOR2020FF;
STICKLINE(close=open AND C>REF(C,1),open,low,0.5,0 ),COLOR2020FF;
cb:=amount/v/100;
STICKLINE(1,cb-0.002,cb+0.002,8,1),COLORYELLOW;

Var1:=(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100))*200;
Var2:=SMA(Var1,3,1);
Var3:=SMA(Var2,3,1);
Var4:=3*Var2-2*Var3;
Var5:=LLV(LOW,5);
Var6:=HHV(HIGH,5);
Var7:=EMA((CLOSE-Var5)/(Var6-Var5)*100,4)*2;
Var8:=EMA(0.667*REF(Var7,1)+0.333*Var7,2);
Var9:=3*Var7-2*Var8;
VarA:=POW(MA(CLOSE,5),2)+MA(CLOSE,5);
VarB:=POW(MA(LOW,5),2)+MA(LOW,5);
VarC:=POW(MA(HIGH,5),2)+MA(HIGH,5);
VarD:=(VarA-LLV(VarB,64))/(HHV(VarC,64)-LLV(VarB,64))*150+65-10;
VarE:=SMA(VarD,3,1)*1.5-100;
VarF:=SMA(VarE,3,1);
Var10:=3*VarE-2*VarF;
Var11:=(HIGH+LOW+CLOSE*2)/4;
Var12:=EMA(Var11,13);
Var13:=STD(Var11,13);
Var14:=(Var11-Var12)*100/Var13;
Var15:=EMA(Var14,5);
Var16:=EMA(Var15,13);
Var17:=EMA(Var15,13)+200-100;
Var18:=EMA(Var17,10);
Var19:=3*Var17-2*Var18;
Var1A:=Var2+Var7+VarE+Var17;
Var1B:=Var3+Var8+VarF+Var18;
Var1C:=Var4+Var9+Var10+Var19;
Var1D:=(HIGH+LOW+CLOSE)/3;
Var1E:=AMOUNT/VOL/100;
Var1F:=SUM(AMOUNT,5)/SUM(VOL,5)/100;
Var20:=(Var1D-MA(Var1D,34))/(0.015*AVEDEV(Var1D,34));
Var21:=DMA(AMOUNT/VOL/100,VOL/CAPITAL);
Var22:=(HIGH+LOW+CLOSE+Var1D)/4;
Var23:=EMA(Var22,24);
Var24:=STD(Var22,24);
Var25:=(Var22-Var23)/Var24*100;
Var26:=(Var1D-MA(Var1D,24))/(0.015*AVEDEV(Var1D,24));
Var27:=EMA(Var25,5);
Var28:=(Var1E-MA(Var1E,21))/(0.015*AVEDEV(Var1E,21));
Var29:=(Var1F-MA(Var1F,90))/(0.015*AVEDEV(Var1F,90));
Var2A:=((Var29+Var28+Var27+Var26+Var20)/5+165)/4;
Var2B:=(EMA(EMA(EMA(Var2A,15),10),5)-25)*2+Var21;
Var2C:=(Var1A+Var1B+Var1C*30)/32/5-15;
Var2D:=EMA(Var2C,13);
Var2E:=(Var2A+Var2C)/2/1.1;
Var2F:=Var2E;
Var30:=(Var2B+Var2D)/2;
DRAWTEXT(Var2F<5 AND Var2F>REF(Var2F,1) AND REF(Var2F,1)
DRAWTEXT(Var30>100 AND Var30REF(Var30,2),high,'↓'),colorgreen;