大智慧原码若干

筹码雷达

获利筹码:EMA(WINNER(C)*70,5),ColorD98EF1;
亏损筹码:EMA((WINNER(C*1.1)-WINNER(C*0.9))*80,5),ColorF3FF00;
stickline(获利筹码<亏损筹码 and 亏损筹码<60,亏损筹码,55,1,0),ColorF3FF00;
stickline(获利筹码>亏损筹码,亏损筹码,50,1,0),colorred;
主力控筹:If(获利筹码>亏损筹码,获利筹码, 0),POINTDOT,colorred;
stickline(获利筹码<亏损筹码,获利筹码,0,0,0),ColorD98EF1;
AI:=AMOUNT/VOL/100;
C0:=REF(C,2)*0.865;
C1:=REF(C,13)*0.772;
DSY:=100*vol/CApitAl;
抄底:If((C-MIN(C0,C1))/C<0.1 AND SUM(DSY,5)/5<1.8,10, 0),Color00FF00;
灾区:stickline(获利筹码<10,亏损筹码,亏损筹码+5,2,0),POINTDOT,ColorFF009D;
重灾区:stickline(获利筹码<5,亏损筹码,亏损筹码+8,2,0),POINTDOT,Color970000;
stickline(抄底,0,30,4,0),Color00FF00;
0,ColorFFFFFF;

觅庄建仓

Var1:=REF(LOW,1);
Var2:=SMA(ABS(LOW-Var1),13,1)/SMA(MAX(LOW-Var1,0),13,1)*4;
Var3:=EMA(Var2,13);
Var4:=LLV(LOW,34);
Var5:=EMA(IF(LOW<=Var4,Var3,0),3);
主力进场:
STICKLINE(Var5>REF(Var5,1),0,Var5,7,0 ),COLORRED;

只欠东风

A1:=C/REF(C,1)>1.045;
A2:=C/HHV(H,34)<0.7;
A3:=MAX(FORCAST(COST(24)/L,3),SMA(COST(24)/L,3,1))>1.526 ;
东风:A1 AND A2 AND A3;

极限超跌

RSV:=(CLOSE-LLV(LOW,20))/(HHV(HIGH,20)-LLV(LOW,20))*100;
K:SMA(RSV,3,1),colorwhite;
D:SMA(K,3,1),coloryellow;
买入:if(cross(k,d) and "cys"<-10 and ref("asr",3)<10,50,0);
20;
50;

地量探针
IF(VOL/CAPITAL>0.01,1,EXP(ABS(LOG(VOL/CAPITAL*100))));

沧海龙吟
龙: WINNER(CLOSE)-COST(50)/CLOSE;
海: -1.2,colorffaa00;

百万测底
趋势线:  3*SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1)-2*SMA(SMA((CLOSE-LLV(LOW,27))/(HHV(HIGH,27)-LLV(LOW,27))*100,5,1),3,1);  
见底信号:  10;  
买点准备:  IF(趋势线<=10,50,0);  
买入时间:  IF(CROSS(趋势线,见底信号),100,0);

黄白线
来势线: EMA(CLOSE,7)-EMA(CLOSE,21),coloryellow;
福星: EMA(来势线,7), COLORSTICK,colorred;
Var1:=CLOSE/REF(LLV(LOW,35),5)< 1;
决策: IF(Var1,0.5,0), STICK,colorblue;
必买: IF(TROUGHBARS(3,15,1)=0 AND HIGH>LOW+0.01,1,-1),coloryellow ,linethick1 ;
必卖: IF(PEAKBARS(3,15,1)=1,1,2),colorwhite,linethick1;
趋势线: (EMA(WINNER(CLOSE),7)-EMA(WINNER(CLOSE),35))*5,colorred;
逃顶线: EMA(CLOSE/REF(HHV(CLOSE,7),50),1),color007000 ,linethick1 ;

波段之王
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;
Var20:=SUM(AMOUNT,5)/SUM(VOL,5)/100;
Var21:=(Var1D-MA(Var1D,34))/(0.015*AVEDEV(Var1D,34));
Var22:=(CLOSE+HIGH+LOW+OPEN)/4;
Var23:=DMA(AMOUNT/VOL/100,VOL/CAPITAL);
Var24:=(HIGH+LOW+CLOSE+Var1D)/4;
Var25:=EMA(Var24,24);
Var26:=STD(Var24,24);
Var27:=(Var24-Var25)/Var26*100;
Var28:=(Var1D-MA(Var1D,24))/(0.015*AVEDEV(Var1D,24));
Var29:=EMA(Var27,5);
Var2A:=(Var1E-MA(Var1E,21))/(0.015*AVEDEV(Var1E,21));
Var2B:=SUMBARS(VOL,CAPITAL);
Var2C:=(Var20-MA(Var20,90))/(0.015*AVEDEV(Var20,90));
Var2D:=((Var2C+Var2A+Var29+Var28+Var21)/5+165)/4;
Var2E:=(EMA(EMA(EMA(Var2D,15),10),5)-25)*2+Var23;
Var2F:=(Var1A+Var1B+Var1C*30)/32/5-15;
Var30:=EMA(Var2F,13);
Var31:=(Var2D+Var2F)/2/1.1;
Var32:=HHV(Var22,Var2B);
Var33:=LLV(Var22,Var2B);
Var34:=(Var22-Var33)/(Var32-Var33);
人: IF(Var22>=Var32,(2*Var22-Var33-REF(Var32,1))/(Var32-Var33),Var34),colorred;
IF(Var22<=Var33,(2*Var22-Var33-REF(Var33,1))/(Var32-Var33),Var34),colorgreen;
AAA:=IF(Var22>=Var32,(2*Var22-Var33-REF(Var32,1))/(Var32-Var33),Var34);
DRAWICON(AAA<=0,0,4);
DRAWICON(AAA>=1,1.1,5);
地: 0;
天: 1;

三线合一
J0:=(CLOSE+LOW+OPEN+HIGH)/4;
J1:=MA(J0,11);
RSV:=(J1-LLV(J1,9))/(HHV(J1,9)-LLV(J1,9))*100;
K:SMA(RSV,3,1);
D:SMA(K,3,1);
J:3*K-2*D;

数值选股
VAR1:=(CLOSE)/(COST(50));
VAR2:=(REF(CLOSE,1))/(CLOSE);
VAR3:=(1-(MA(LOW,3))/(MA((HIGH+LOW+(2)*(CLOSE))/(4),20)))*(100)-(50)/(10);
VAR4:=(1-(SMA((VAR2)*(LOW),3,1))/(EMA((HIGH+LOW+(2)*(CLOSE))/(4),10)))*(100)-(50)/(10);
数值:IF((VAR3>0) AND (DATE>901231) AND  
(DATE<1341231),(((VAR3)*(3000))*(REF((HIGH+LOW+(2)*(CLOSE))/(4),3)))/(CLOSE),0),ColorFF00FF;
选股:(VAR4>0) AND (VAR1>REF(VAR1,1)) AND (数值>0) AND (DATE>901231) AND (DATE<1341231),Color00FF00;
VAR5:=(CLOSE>OPEN);
LOW,ColorFFFFFF;
1,ColorFFFF00;
(选股=1) AND (DATE>901231) AND (DATE<1341231),Color0000FF;
30000,Color008000;
1,ColorFF0000;
(DATE=1341231),Color000080;
0,Color800080;

胜利逃亡
Var1:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
Var2:=SMA(Var1,26,1);
Var3:=SMA(Var2,26,1);
Var4:=3*Var2-2*Var3;
Var5:=(CLOSE-LLV(LOW,60))/(HHV(HIGH,60)-LLV(LOW,60))*100;
Var6:=SMA(Var5,5,1);
Var7:=SMA(Var6,10,1);
Var8:=SMA(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1))),ABS(LOW-REF(CLOSE,1))),14,1);
Var9:=HIGH-REF(HIGH,1);
VarA:=REF(LOW,1)-LOW;
VarB:=SMA(IF(Var9>0 AND Var9>VarA,Var9,0),12,1);
VarC:=SMA(IF(VarA>0 AND VarA>Var9,VarA,0),12,1);
VarD:=VarB*100/Var8;
VarE:=VarC*100/Var8;
VarF:=SMA(ABS(VarE-VarD)/(VarE+VarD)*100,12,1);
Var10:=(VarF+REF(VarF,5))/2;
Var11:=SUM(HIGH-OPEN,12)/SUM(OPEN-LOW,12)*100;
Var12:=SUM(MAX(0,HIGH-REF(CLOSE,1)),12)/SUM(MAX(0,REF(CLOSE,1)-LOW),12)*100;
Var13:=AMOUNT/VOL/100;
Var14:=(3*HIGH+LOW+OPEN+2*CLOSE)/7;
Var15:=SUM(AMOUNT,5)/Var13/100;
Var16:=SUM(AMOUNT,13)/Var13/100;
Var17:=SUM(AMOUNT,34)/Var13/100;
Var18:=SUM(AMOUNT,209)/Var13/100;
Var19:=REF(VOL,1)+REF(VOL,2)+REF(VOL,3)+REF(VOL,4);
Var1A:=Var19/CAPITAL;
Var1B:=VOL/CAPITAL*Var14+Var1A*REF(Var13,1);
Var1C:=DMA(Var14,VOL/Var15);
Var1D:=DMA(Var14,VOL/Var16);
Var1E:=DMA(Var14,VOL/Var17);
Var1F:=DMA(Var14,VOL/CAPITAL);
Var20:=100*(CLOSE-Var1C)/Var1C;
Var21:=100*(CLOSE-Var1D)/Var1D;
Var22:=100*(CLOSE-Var1E)/Var1E;
Var23:=100*(CLOSE-Var1F)/Var1F;
Var24:=100*(CLOSE-Var1D)/Var1D;
Var25:=LLV(HIGH,480);
Var26:=100*(CLOSE-Var25)/Var25;
Var27:=LLV(HIGH,240);
Var28:=100*(CLOSE-Var27)/Var27;
Var29:=LLV(HIGH,720);
Var2A:=100*(CLOSE-Var29)/Var29;
Var2B:=AMOUNT/(100*VOL);
Var2C:=MA(CLOSE,5);
Var2D:=100*(Var2C-REF(Var2C,1))/REF(Var2C,1);
Var2E:=CLOSE-LOW;
Var2F:=HIGH-LOW;
Var30:=CLOSE-HIGH;
Var31:=IF(CLOSE>=0,(Var2E/Var2F+Var30/Var2F)*VOL,(Var30/Var2F+Var2E/Var2F)*VOL);
Var32:=SUM(Var31,10)/10000;
Var33:=AMOUNT/(100*VOL);
Var34:=Var1D;
Var35:=100*(Var1D-REF(Var1D,1))/REF(Var1D,1);
Var36:=Var32>0 AND Var35>0;
Var37:=Var6<30 AND Var7<30 AND Var6>Var7 AND Var2<80 AND Var3<80 AND Var28<45 AND Var26<45;
Var38:=Var36 AND Var37;
买入: IF(Var38,100,0), linethick2,coloryellow;
Var39:=CROSS(Var7,Var6);
Var3A:=Var7>80 OR Var6>80;
Var3B:=Var39 AND Var3A;
逃顶: IF(Var3B,100,0),linethick2,colorred;
===============================================
股神必胜 大智慧公式



var1:=((ema(amount,5)/ema(vol,5)/100-ema(amount,125)/ema(vol,125)/100)/(ema(amount,5)/ema(vol,5)/100))<-0.4;
var2:=(close-llv(low,15))/(hhv(high,15)-llv(low,15))*100;
var3:=sma(var2,3,1);
var4:=sma(var3,3,1);
var5:=-100*(hhv(high,52)-close)/(hhv(high,52)-llv(low,52));
zs1:=count(var1,5)>=1 and (var5<-99.9 or (var4<15 and var3<12));
var6:=vol/FINANCE(7);
var7:=(100*winner(C));
aa:=ma(var7,3);
bb:=ma(var6,34);
zs2:=(aa<bb)*100 and var7<var6,stick;
Var8:=SUM(IF(CLOSE>REF(CLOSE,1),1,0),0);
Var9:=SUMBARS(VOL,CAPITAL);
Var10:=IF(CLOSE>LLV(CLOSE,Var9),1,-1)*IF(Var8>LLV(Var8,Var9),1,-1);
Var11:=COUNT(IF(Var10=-1,1,0)=1,8)>2;
Var12:=(CLOSE-DMA((3*HIGH+LOW+OPEN+2*CLOSE)/7,
VOL/(SUM(AMOUNT,13)/(AMOUNT/VOL/100)/100)))/DMA((3*HIGH+LOW+OPEN+2*CLOSE)/7,
VOL/(SUM(AMOUNT,13)/(AMOUNT/VOL/100)/100))*100<-18;
Var13:=(CLOSE-MIN(REF(CLOSE,5)*0.865,REF(CLOSE,21)*0.772))/CLOSE<0.01;
Var14:=Var11 AND Var12 AND Var13;
Var15:=VOL/CAPITAL>=0.02 AND VOL/CAPITAL<=0.2 and OPEN=1.105;
Var16:=Var15 AND COUNT(Var15,5)=1;
zs3:=Var14 OR Var15;
Var17:=REF(CLOSE,1);
Var18:=SMA(MAX(CLOSE-Var17,0),7,1)/SMA(ABS(CLOSE-Var17),7,1)*100;
Var19:=SMA(MAX(CLOSE-Var17,0),13,1)/SMA(ABS(CLOSE-Var17),13,1)*100;
Var20:=Var18<20 AND Var19<25 ;
zs4:= Var20;
Var21:=SUM(IF(CLOSE>REF(CLOSE,1),VOL,IF(CLOSE<REF(CLOSE,1),0-VOL,0)),0);
Var23:=IF(CLOSE>LLV(CLOSE,Var9),1,-1);
Var24:=IF(Var21>LLV(Var21,Var9),1,-1);
Var25:=Var23*Var24;
Var26:=IF(Var25=-1,1,0);
zs5:=Var26 AND CLOSE=LLV(CLOSE,120) and var7<var6;
大底:=if(FILTER(zs1 and zs2 and zs3 and zs4 and zs5>0,4),70,0),stick , linethick6 ,colorffbb44;
探底尖兵:if(zs2 and zs3 and zs4 or(zs4 and zs5),35,0),
stick , linethick6 , COLORff22cc;
注意:=if(zs2 and zs4 and zs5>0,50,0),stick ,linethick3 ,COLORBLUE ;
持仓区:STICKLINE(close>ema(c,p),0,20,20,0),color00aaff, linethick1;
空仓预警区:STICKLINE(close<ema(c,p),0,10,20,0),colorffbb44, linethick1;
RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
K:=SMA(RSV,3,1);
RS:= (HHV(HIGH,9)-CLOSE)/(HHV(HIGH,9)-LLV(LOW,9))*100;
LWR:=SMA(RS,3,1);
ab:=-100*(HHV(HIGH,14)-CLOSE)/(HHV(HIGH,14)-LLV(LOW,14));
股神再现:IF(探底尖兵 AND (K<5.5 or (lwr>95 and ab=-100)),55,0),
stick,colorred ,linethick7;

JJ:=(C*2+H+L)/4;
SK:=EMA(JJ,13) - EMA(JJ,21);
SD:=EMA(SK,2);
aaa:=HIGH/LLV(CLOSE,P1)>1.33;
bbb:=0.5;
Var30:=(2*C+H+L)/4;
Var31:=LLV(LOW,34);
VarA:=HHV(HIGH,34);
varB:EMA((Var30-Var31)/(VarA-Var31)*100,13),COLORf0f000;
B1:EMA(0.667*REF(varB,1)+0.333*varB,5),coloryellow, linethick2;
STICKLINE(VARB>B1, VARB,B1,3,0),COLORyellow;
金色快车:if(cross(sd,0) and 2>100*vol/CAPITAL and b1<45,70,0),stick,coloryellow,linethick7;
坚决卖出:if(CROSS(bbb,BACKSET(aaa,11))and b1>75 ,80,0),stick,color00ff00,linethick7;

DRAWTEXT(CROSS(bbb,BACKSET(aaa,11))and b1>75,70,'数钱时快乐'),coloryellow;
DRAWTEXT(探底尖兵 AND (K<5.5 or (lwr>95 and ab=-100)),65,'股神必胜！'),colorf0f000;
DRAWTEXT(大底>0,45,'坚定持股 ！'),STICK , linethick3  ;
DRAWTEXT (cross(sd,0) and 2>100*vol/CAPITAL and varB>b1
and b1<45,30,'搭上淘金车'),color00ff00;

DRAWICON(CROSS(B1, VARB)AND B1>80 ,B1, 1);

85;
15;   
  参数  p   1    500   36
==========================================================
sddup 的多空趋势(大智慧源码)



Var1:=EMA(MA(IF(CLOSE>OPEN,(CLOSE-OPEN)*VOL,IF(CLOSE<OPEN,(CLOSE-OPEN)*VOL,0)),5),1);
Var2:=EMA(MA(IF(CLOSE>REF(CLOSE,1),(CLOSE-REF(CLOSE,1))*VOL,IF(CLOSE<REF(CLOSE,1),(CLOSE-REF(CLOSE,1))*VOL,0)),5),1);
Var3:=EMA(MA(IF(OPEN>REF(CLOSE,1),(OPEN-REF(CLOSE,1))*VOL,IF(OPEN<REF(CLOSE,1),(OPEN-REF(CLOSE,1))*VOL,0)),5),1);
Var4:=EMA(MA(IF(CLOSE<OPEN,(OPEN-CLOSE)*VOL,IF(CLOSE>OPEN,(OPEN-CLOSE)*VOL,0)),10),1);
Var5:=EMA(MA(IF(CLOSE<REF(CLOSE,1),(REF(CLOSE,1)-CLOSE)*VOL,IF(CLOSE>REF(CLOSE,1),(REF(CLOSE,1)-CLOSE)*VOL,0)),10),1);
Var6:=EMA(MA(IF(OPEN<REF(CLOSE,1),(REF(CLOSE,1)-OPEN)*VOL,IF(OPEN>REF(CLOSE,1),(REF(CLOSE,1)-OPEN)*VOL,0)),10),1);
Var7:=CLOSE>OPEN;
Var8:=CLOSE>REF(CLOSE,1);
Var9:=OPEN>REF(CLOSE,1);
多头:(Var1+Var2+Var3)/3/100,COLORWHITE;
空头:(Var4+Var5+Var6)/3/100,COLORYELLOW ;
一次警报:EMA(EMA((Var1+Var2+Var3)/3-(Var4+Var5+Var6)/3,5),5)*1/100,;
二次警报:EMA((COUNT(Var8,12)/12+COUNT(Var7,12)/12+COUNT(Var9,12)/12)/3*MA(多头,5)*2*1.1,2),COLORBLUE;
STICKLINE(空头>0,0,空头,1,0),;
STICKLINE(空头<0,0,空头,1,0),COLORRED;
破解:EMA(EMA((Var1+Var2+Var3)/3-(Var4+Var5+Var6)/3,5),5)*1/100,POINTDOT,Color9587FF;{这句没有用处}


                                               p1  1      60    13