以下是通达信宝典提供源源码和截图
通达信短线宝典提供源源码:
系数小于:=50;
AAA:=(3*C+L+O+H)/6;
C2:=EMA(AAA,6);
C3:=EMA(AAA,5);
A:=(3*C+L+O+H)/6;
X:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+
14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)
+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+
REF(A,20))/210;
★:=EMA(X,13);
★短线★:=EMA(CLOSE,17),LINETHICK2,COLORWHITE;
★中线成本★:=EMA(X,13),LINETHICK2,COLORFF00FF;
危险系数A:=BARSLAST(★短线成本★ ★中线成本★);
洗钱A:=(CLOSE-LLV(LOW,32))/(HHV(HIGH,32)-LLV(LOW,32))*1.2*CLOSE;
洗钱B:=SMA(洗钱A,13,1);
线:=SMA(洗钱B,5.5,1.5);
控盘:=3*洗钱B-2*趋势线;
控盘:=4*趋势线-3*洗钱B;
量1:=EMA(洗钱A,3);
量2:=EMA(洗钱A,5);
量3:=EMA(洗钱A,7);
KDDDD:=IF(量1 趋势线,1,0);
快枪:CROSS(C2,C3)ANDC 中线★AND危险系数A 系数小于ANDO 中线★ANDKDDDD;
{短线宝}
D:=EMA((CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100,20);
J:=EMA((CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30))*100,5);
BIAS1W:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
BIAS2W:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100;
BIAS3W:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
MM:=(BIAS1W+2*BIAS2W+3*BIAS3W)/6;
MN:=MA(MM,3);
VAR1:=(HHV(HIGH,24)-CLOSE)/(HHV(HIGH,24)-LLV(LOW,24))*100;
VAR2:=(CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100;
VAR3:=(2*CLOSE+HIGH+LOW)/4;
VAR4:=LLV(LOW,26);
VAR5:=HHV(HIGH,34);
VAR6:=EMA((VAR3-VAR4)/(VAR5-VAR4)*100,16);
VAR7:=SMA((SMA(VAR2,3,1)+3),3,1),LINETHICK3;
VAR8:=EMA(VAR6,7);
VAR9:=SMA(VAR1,3,1);
VAR10:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;
VAR11:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;
VAR12:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100;
VAR13:=(VAR10+VAR11+VAR12)/3;
VAR14:=IF(VAR13 =-20,10,0);
VAR15:=HHV(VAR14,10);
VAR24:=LLV(LOW,36);
VAR25:=HHV(HIGH,30);
VAR26:=EMA((CLOSE-VAR24)/(VAR25-VAR24)*4,4)*25;
K:EMA(D,3),COLOR00FF00,LINETHICK1;
M:EMA(J,7),COLORRED,LINETHICK1;
股经:J,COLORLIMAGENTA,LINETHICK2;
底观察:IF(MN -4,10,0),COLORLIBLUE,LINETHICK2;
底:IF((VAR26 10),90,100),COLORGREEN,LINETHICK2;
顶背离:IF((VAR26 90),5,18),COLOR808000,LINETHICK2;
{股海神偷}
AA:=LLV(LOW,36);
BB:=HHV(HIGH,30);
DD:=(EMA(((CLOSE-AA)/(BB-AA))*(4),4))*(25);
股海:=(((DD-LLV(DD,21))/(HHV(DD,21)-LLV(DD,21)))*(4))*(25);
跟踪:10,COLOR0000FF,LINETHICK1;
神偷出现:IF((COUNT((DD REF(DD,1)),1)=1)AND(REF(DD,1) REF(REF(DD,1),1))AND(DD 跟踪),20,0),COLORF00FF0;
DRAWICON(CROSS(10,股经),5,1);
V1:=(CLOSE-MA(CLOSE,21))/MA(CLOSE,21)*100;
V2:=(CLOSE-LLV(LOW,43))/(HHV(HIGH,43)-LLV(LOW,43))*100;
V3:=SMA(V2,2,1);
顶:100+(-ABS(V1)),COLORGRAY;
底:ABS(V1),COLORGRAY;
VR1:=(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34))*100;
VR2:=SMA(VR1,3,1);
VR3:=SMA(VR2,3,1);
VR4:=SMA(VR3,3,1);
VR5:=CROSS(VR3,VR4)ANDVR3
VR8:=CROSS(VR2,VR3)ANDVR3 80ANDVR3
VR9:=CROSS(VR4,VR3)ANDVR3
DRAWTEXT(FILTER(VR5,10)=1,21,'底'),COLORRED;
STICKLINE(FILTER(VR5,10)=1,0,20,2,0),COLORRED;
STICKLINE(FILTER(VR9,5)=1,80,100,2,0),COLORGREEN;
DRAWTEXT(FILTER(VR9,5)=1,79,'顶'),COLORGREEN;
STICKLINE(VR8,85,100,2,0),COLOR0099FF;
Var1:=ma((HIGH+LOW+2*CLOSE)/4,5);
Var2:=EMA(Var1,10)-EMA(Var1,30);
Var3:=EMA(Var2,5);
Var4:=(Var2-Var3)*5;
Var5:=IF(Var4 =Var1,Var1,Var4);
动向:=FORCAst(FORCAST(Var5,10),10),LINETHICK1;
趋势:IF(Var5 动向,Var5,Var1),COLORYELLOW;
强势:MA(Var1,5),COLORRED;
弱势:=MA(HHV(Var1,10),5),colorwhite;
主力:SMA(CLOSE,10,1),colorffff00;
疯牛:DMA(MA(CLOSE+REF(CLOSE,5)/CLOSE*0.098,90),),LINETHICK2,COLORRED;
年线:DMA(MA(CLOSE+REF(CLOSE,5)/CLOSE*0.098,250),VOL),LINETHICK2,POINTDOT,COLOR30CC00;
Var6:=EMA(CLOSE,5);
Var7:=EMA(CLOSE,10);
Var8:=EMA(CLOSE,20);
Var9:=EMA(CLOSE,30);
VarA:=EMA(CLOSE,60);
VarB:=EMA(CLOSE,90);
VarC:=EMA(CLOSE,125);
VarD:=EMA(CLOSE,250);
Var10:=1.809*LLV(LOW,250);
Var11:=MA(CLOSE,10)-EMA(CLOSE,10)*100;
Var12:=MA(Var11,5);
Var13:=3*(Var12-Var11);
Var14:=((CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*200-100)/2-REF(CLOSE,5);
Var15:=SMA(SMA(Var14,5,1),5,1);
Var16:=MA(MA(Var15,5),5);
Var17:=3*Var16-5*Var15;
Var18:=EMA(Var17,10);
Var19:=MA(CLOSE,20)/MA(CLOSE,20)-REF(CLOSE,20)/CLOSE*100;
Var1A:=DMA(SMA(EMA(Var19,5),5,1),VOL/REF(VOL,5));
Var1B:=SMA(EMA(Var19,10),5,1);
Var1C:=(-100)*(HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13));
Var1D:=(-100)*(HHV(HIGH,8)-CLOSE)/(HHV(HIGH,8)-LLV(LOW,8));
Var1E:=SMA(MAX(MAX(HIGH-LOW,Abs(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14,1);
Var1F:=HIGH-REF(HIGH,1);
Var20:=REF(LOW,1)-LOW;
Var21:=SMA(IF(Var1F 0ANDVar1F Var20,Var1F,0),14,1);
Var22:=SMA(IF(Var20 0ANDVar20 Var1F,Var20,0),14,1);
Var23:=Var21*100/Var1E;
Var24:=Var22*100/Var1E;
Var25:=SMA(ABS(Var24-Var23)/(Var24+Var23)*100,14,1);
Var26:=(Var25+REF(Var25,6))/2;
DRAWTEXT(crOSS(Var13,50)ANDVar6 Var7ANDVar7 Var8ANDVar8 Var9ANDVar9 VarAANDVarA VarBANDVarB VarCANDVarC VarDAND疯牛 VarDANDVar19 Var1AANDVar1A Var1BANDVar1B -100ANDVar1C -20ANDVar1D -20AND-30 Var18ANDVar18 Var17ANDVar23 Var25ANDVar25 Var26ANDVar26 Var24,年线,'宝典'),COLORYELLOW;
DRAWTEXT(CROSS(Var13,200)ANDVar6 Var7ANDVar7 Var8ANDVar8 Var9ANDVar9 VarAANDVarA VarBANDVarB VarCANDVarC VarDANDVarD 年线AND年线 Var10ANDVar19 Var1AANDVar1A Var1BANDVar1B -100ANDVar1C -20ANDVar1D -20ANDVar23 Var25ANDVar25 Var26ANDVar26 Var24,年线,'疯牛'),COLORYELLOW;
通达信短线宝典提供源截图