以下是通达信百万踏浪源码副图杨百万精典老指标源码
通达信百万踏浪源码副图杨百万精典老指标源码：
Var1:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36))*100;
Var2:=SMA(Var1,3,1);
Var3:=SMA(Var2,3,1);
Var4:=SMA(Var3,3,1);
波:Var3,linethick2,colorred;
段:Var4,linethick2,coloryellow;
Var5:=CROSS(Var2,Var3)ANDVar3
STICKLINE(Var5,0,Var3+5,1,1),linethick2,colorred;
Var6:=CROSS(Var3,Var4)ANDVar3
Var7:=Var6ANDVOL REF(VOL,1)*2ANDVOL REF(MA(VOL,5),1)*2;
STICKLINE(Var6,0,Var3+5,1,1),linethick2,colorwhite;
DRAWTEXT(Var6ANDCOUNT(Var6,10)=1,Var3+15,''),linethick2,colorwhite;
STICKLINE(Var7,0,Var3+5,1,1),linethick2,colorred;
DRAWTEXT(Var7ANDCOUNT(Var7,10)=1,Var3+5,'放量'),linethick2,colorred;
Var8:=CROSS(Var2,Var3)ANDVar3 80ANDVar3 Var4;
STICKLINE(Var8ANDCOUNT(Var8,5)=1,Var3-5,100,1,1),linethick2,colorgreen;
Var9:=CROSS(Var4,Var3)ANDVar3
STICKLINE(Var9,Var3-5,100,1,1),linethick2,coloryellow;
DRAWTEXT(Var9ANDCOUNT(Var9,10)=1,Var3-15,''),linethick2,coloryellow;
input:P1(10,5,20,1),P2(30,10,50,1),N(6,1,10,1),N2(6,1,10,1),N3(-23,-50,10,1),N4(75,50,100,10);
STICKLINE(C 0,0,100,100,0),COLOR8BA410;
VAR2:=(((CLOSE-REF(CLOSE,1))/REF(CLOSE,1))*100);
VAR3:=(((CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18)))*100);
VAR4:=SMA(VAR3,9,1);
VAR5:=SMA(VAR4,3,1);
J:((3*VAR4)-(2*VAR5));VAR6:=(J (1*REF(J,1)));
VAR7:=LLVBARS(LOW,50);
VAR8:=SUM(VOL,VAR7);
VAR9:=HHVBARS(HIGH,50);
VAR10:=SUM(VOL,VAR9);
VAR11:=(((CLOSE-REF(OPEN,VAR9))/REF(OPEN,VAR9))*100);
VAR12:=((VAR10/CAPITAL)*100);
VAR13:=(((CLOSE-REF(OPEN,VAR7))/REF(OPEN,VAR7))*100);
VAR14:=((VAR8/CAPITAL)*100);
VAR15:=(MA(WINNER(CLOSE),N)*100);
VAR16:=EMA(VAR4,N);
A2:EMA(VAR4,N),COLORFFDDCC;A3:=EMA(A2,N);
A4:=EMA(A3,N);A5:=EMA(A4,N);
A6:=EMA(A5,N);A7:=EMA(A6,N);
VAR17:=EMA(A7,N);
VAR18:=EMA(VAR17,N);VAR19:=EMA(VAR18,N);
AA:=EMA(A5,N2);中期大底:LLV(J,AA),LINETHICK2,COLOR0000FF;
上:=((EMA((MA(HIGH,3)*1.05),30)*10)-AA);下:=((EMA((MA(LOW,3)*0.96),30)*2)/中期大底);
上上:=EMA((MA(HIGH,3)*1.05),30);电:=J;DRAWTEXT((CROSS(A4,AA)AND(VAR11 N3)),AA,'●底'),COLOR00FF00;
DRAWTEXT((CROSS(A2,J)AND(A2 N4)),(A2+4.04),'●峰'),COLORFF00FF;
DRAWTEXT(((((CROSS(J,A2)ANDVAR6)AND(A2 20))AND(VAR2 9))OR(((A2 (1*REF(A2,1)))AND(VAR2 4))AND(A2 60))),A2,'●拉'),COLORFFFFCC;STICKLINE((J =A2),A2,J,8,0),COLOR0000FF;
STICKLINE((J =A2),J,A2,8,0),COLOR00FF00;压力:HHV(J,60),COLOR00FFFF;
支持:=LLV(AA,13);STICKLINE((((J =中期大底)AND((上上-REF(上上,1)) 0))AND(CLOSE =(OPEN*0.99))),1,88,3,0),COLOR00FF00;
DRAWICON((((J =中期大底)AND((上上-REF(上上,1)) 0))AND(CLOSE =(OPEN*0.99))),88,0);DRAWTEXT((((J =中期大底)AND((上上-REF(上上,1)) 0))AND(CLOSE =(OPEN*0.99))),85,'-肯定底部');
STICKLINE(FILTER((CROSS(上,中期大底)AND((上上-REF(上上,1)) =0)),3),中期大底,70,3,0),COLOR0000FF;DRAWICON(FILTER((CROSS(上,中期大底)AND((上上-REF(上上,1)) =0)),3),70,0);DRAWTEXT(FILTER((CROSS(上,中期大底)AND((上上-REF(上上,1)) =0)),3),64,'-买了不输'),COLORFFFFFF;STICKLINE((CROSS(上,下)AND(CLOSE =OPEN)),中期大底,60,2,0),COLORFF0000;DRAWICON((CROSS(上,下)AND(CLOSE =OPEN)),60,0);DRAWTEXT((CROSS(上,下)AND(CLOSE =OPEN)),55,'-');DRAWTEXT((((J =压力)AND((压力-REF(压力,6)) 25))AND(CLOSE OPEN)),(压力+4.22),'●头部'),COLOR00FF00;MA1:=MA(CLOSE,P1);MA2:=MA(CLOSE,P2);N15HIGH:=REF(HIGH,15);N1LOW:=REF(LOW,1);FF:=(((N15HIGH-N1LOW)/N1LOW) 0.15);STICKLINE((((((CROSS(MA(CLOSE,P1),MA(CLOSE,P2)) 0)AND(((N15HIGH-N1LOW)/N1LOW) 0.15))AND(LOW =MA(CLOSE,P1)))AND(CLOSE =MA(CLOSE,P1)))AND(CLOSE =OPEN)),中期大底,60,0,1),LINETHICK3,COLOR0000FF;
DRAWICON((((((CROSS(MA(CLOSE,P1),MA(CLOSE,P2)) 0)AND(((N15HIGH-N1LOW)/N1LOW) 0.15))AND(CLOSE =MA(CLOSE,P1)))AND(LOW =MA(CLOSE,P1)))AND(CLOSE =OPEN)),60,1);
DRAWTEXT((((((CROSS(MA(CLOSE,P1),MA(CLOSE,P2)) 0)AND(((N15HIGH-N1LOW)/N1LOW) 0.15))AND(CLOSE =MA(CLOSE,P1)))AND(LOW =MA(CLOSE,P1)))AND(CLOSE =OPEN)),60,'★＾回头望月'),COLORFF0000;
X:=(CLOSE-REF(MA(CLOSE,20),11));LGL:=IF((((((EMA(CLOSE,5)/EMA(EMA(CLOSE,9),16)) =0.85)AND((CLOSE/REF(CLOSE,1)) 0.905))AND((CLOSE/REF(CLOSE,1)) 1.05))AND(((VOL/CAPITAL)*100) 5)),50,0);
WR1:=((0-((100*(HHV(HIGH,34)-CLOSE))/(HHV(HIGH,34)-LLV(LOW,34))))+(100*X));
WR2:=((0-((100*(HHV(HIGH,50)-CLOSE))/(HHV(HIGH,50)-LLV(LOW,50))))+100);
WR3:=((0-((100*(HHV(HIGH,70)-CLOSE))/(HHV(HIGH,70)-LLV(LOW,70))))+(100*X));
BIAS1:=(((((CLOSE-MA(CLOSE,34))/MA(CLOSE,34))*100)+10)*5);
BIAS2:=(((((CLOSE-MA(CLOSE,50))/MA(CLOSE,50))*100)+10)*5);
BIAS3:=(((((CLOSE-MA(CLOSE,70))/MA(CLOSE,70))*100)+10)*5);
S1:=(((((((WR1+WR2)+WR3)+BIAS1)+BIAS2)+BIAS3)/6)*X);
S2:=EMA(S1,3);S3:=ABS((BIAS1-BIAS3));SX:=((S1+S3)/2);
XC1:=(((0-1)*(EMA((100*(1-WINNER(CLOSE))),1)-50))+50);CCC:=(XC1+SX);
ZJZ:=(IF(XC1 0ANDCCC 0,200,0))*X;
LXL:=IF((((((SX 0)AND(CLOSE=LLV(CLOSE,5)))AND((CLOSE/REF(CLOSE,1)) 0.905))AND((CLOSE/REF(CLOSE,1)) 1.05))AND(((VOL/CAPITAL)*100) 5)),(0-50),0);
JBJ:=(IF(((CCC 0)AND(LXL=(0-50))),100,0)*X);
MA3:=MA(CLOSE,3);C0:=(REF(CLOSE,2)*0.865);
C1:=(REF(CLOSE,13)*0.772);BOT:=MIN(C0,C1);
HSL:=(((100*VOL)/CAPITAL)*X);
MA13:=(MA(CLOSE,13)*X);
CXC:=IF(((((CLOSE-BOT)/CLOSE) (3/100))AND((SUM(HSL,5)/5) 1.8)),1,0);
VMC:=IF(((CXC 0)AND((LXL 0)OR(LGL 0))),10,0);
满仓:IF((VMC 0),60,中期大底),COLOR0000FF;DRAWTEXT((满仓 =60),59,'-满仓'),COLOR0000FF;
半仓:IF((((((ZJZ 0)AND(JBJ 0))AND((SUM(((VOL/CAPITAL)*100),5)/5) 1))OR((CXC 0)AND((REF(CLOSE,1)/REF(CLOSE,2)) 0.902)))OR((((((ZJZ 0)AND(JBJ 0))AND((SUM(((VOL/CAPITAL)*100),5)/5) 1))OR(CXC 0))AND((LXL 0)OR(LGL 0)))AND(VMC 10))),50,中期大底),COLORCC99FF;
DRAWTEXT((半仓 =50),49,'-半仓'),COLORCC99FF;
B0:=MA(CLOSE,3);B01:=MA(CLOSE,4);
B1:=(((HIGH+LOW)+CLOSE)/3);
B2:=HHV(B1,15);B3:=LLV(B1,15);
B4:=(B2-B3);
B5:(MA(((B1-B3)/B4),2)*100);
B6:=HHV(B1,(4*15));
B7:=LLV(B1,(4*15));
B8:=(B6-B7);
B9:(MA(((B1-B7)/B8),2)*100);
BA:=HHV(B1,(16*15));
BB:=LLV(B1,(16*15));
BC:=(BA-BB);
BD:(MA(((B1-BB)/BC),2)*100);
顶线:98;底线:1;
STICKLINE((((CROSS(B5,底线)AND((B0-REF(B0,1)) 0))AND((J-REF(J,1)) 0))AND(CLOSE =OPEN)),中期大底,50,2,0),COLOR0000FF;
DRAWICON((((CROSS(B5,底线)AND((B0-REF(B0,1)) 0))AND((J-REF(J,1)) 0))AND(CLOSE =OPEN)),50,0);
DRAWTEXT((((CROSS(B5,底线)AND((B0-REF(B0,1)) 0))AND((J-REF(J,1)) 0))AND(CLOSE =OPEN)),45,'-开花一'),COLORCC99FF;
STICKLINE(((CROSS(B5,底线)ANDCROSS(B9,底线))AND((B01-REF(B01,1)) 0)),中期大底,64,2,0),COLOR00FF00;
DRAWICON(((CROSS(B5,底线)ANDCROSS(B9,底线))AND((B01-REF(B01,1)) 0)),64,0);DRAWTEXT(((CROSS(B5,底线)ANDCROSS(B9,底线))AND((B01-REF(B01,1)) 0)),58,'-开花二');
DRAWTEXT((CROSS(98,B5)AND(CLOSE (HIGH/1.03))),98,'-出局'),COLOR00FF00;DRAWICON((CROSS(98,B5)AND(CLOSE (HIGH/1.03))),98,7);STICKLINE(((CROSS(BD,1)AND((上上-REF(上上,1)) 0))AND((B5-REF(B5,2)) 0)),1,80,3,0);
DRAWICON(((CROSS(BD,1)AND((上上-REF(上上,1)) 0))AND((B5-REF(B5,2)) 0)),80,0);DRAWTEXT(((CROSS(BD,1)AND((上上-REF(上上,1)) 0))AND((B5-REF(B5,2)) 0)),73,'-开花三'),COLOR00FFFF;
STICKLINE(((((CROSS(J,AA)AND(A2 =A3))AND((上上-REF(上上,1)) 0))AND(CLOSE =OPEN))AND(A3 =A4)),中期大底,60,2,0),COLORFFFFFF;DRAWTEXT(((((CROSS(J,AA)AND(A2 =A3))AND((上上-REF(上上,1)) 0))AND(CLOSE =OPEN))AND(A3 =A4)),60,'●买'),COLOR00FFFF;:=MA(CLOSE,5);
DRAWICON(((CROSS(B5,A2)AND((上上-REF(上上,1)) 0))AND((均线-REF(均线,1)) 0)),98,6);DRAWTEXT(((CROSS(B5,A2)AND((上上-REF(上上,1)) 0))AND((均线-REF(均线,1)) 0)),98,'重视'),COLOR0000FF;
VARW2:=((((CLOSE-MA(CLOSE,6))/MA(CLOSE,6))*100)AND((上上-REF(上上,1)) VARW3:=((((CLOSE-MA(CLOSE,12))/MA(CLOSE,12))*100)AND((上上-REF(上上,1))
VARW4:=(((CLOSE-MA(CLOSE,24))/MA(CLOSE,24))*100);VARW5:=(((VARW2+(2*VARW3))+(3*VARW4))/6);VARW6:=MA(VARW5,3);犀牛王:=((70*VARW6) =(0-8));
VAR1:=REF(CLOSE,1);
标尺:SMA(MAX(CLOSE-VAR1,0),5,1)/SMA(ABS(CLOSE-VAR1),5,1)*100,COLOR00FF00,LINETHICK2;
VAR2:=(CLOSE-LLV(LOW,5))/(HHV(HIGH,5)-LLV(LOW,5))*100;
VAR3:=SMA(VAR2,5,1);
VAR4:=SMA(VAR3,3,1);
VAR5:=SMA(VAR4,3,1);
浪:VAR3,COLORMAGENTA,LINETHICK2;
波:VAR4,COLORRED,LINETHICK2;
段:VAR5,COLORYELLOW,LINETHICK2;
VAR6:=CROSS(VAR3,VAR4)ANDVAR4
VAR61:=CROSS(VAR4,VAR5)ANDVAR4
STICKLINE(VAR6,0,VAR4+6,1,0),COLORFF00FF,LINETHICK4;
STICKLINE(VAR61,0,VAR4+6,1,0),COLORFFFFFF,LINETHICK4;
DRAWTEXT(FILTER(VAR61,7),VAR5-5,'-短线买入'),COLORFFFFFF;
VAR7:=CROSS(VAR4,VAR5)ANDVAR4
VAR8:=VAR7ANDVOL =REF(VOL,1)*2ANDVOL =REF(MA(VOL,5),1)*2;
STICKLINE(VAR8,0,VAR4+10,1,0),COLORRED,LINETHICK4;
DRAWTEXT(VAR8ANDCOUNT(VAR8,10)=1,VAR4-1,'放量'),COLORRED;
VAR9:=CROSS(VAR3,VAR4)ANDVAR4 80ANDVAR4 VAR5;
STICKLINE(VAR9ANDCOUNT(VAR9,5)=1,VAR4-5,100,1,0),COLOR00FF00,LINETHICK2;
VARA:=CROSS(VAR5,VAR4)ANDVAR5
STICKLINE(VARA,VAR4-6,100,1,0),COLORYELLOW,LINETHICK4;
{STICKLINE(FILTER(CROSS(VAR3,VAR4),10)AND
VAR5 80,VAR4-5,100,1,0),COLOR00FF00,LINETHICK2;}
DRAWTEXT(VARAANDCOUNT(VARA,10)=1,VAR4+20,'牛市震荡'),COLORYELLOW;
DRAWTEXT(VARAANDCOUNT(VARA,10)=1,VAR4+10,'熊市抛股'),COLORYELLOW;
VAR1A:=(CLOSE-LLV(LOW,15))/(HHV(HIGH,15)-LLV(LOW,15))*100;
VAR1B:=SMA((SMA(VAR1A,4,1)-50)*2,3,1);
VAR1C:=(INDEXC-LLV(INDEXL,14))/(HHV(INDEXH,14)-LLV(INDEXL,14))*100;
VAR1D:=SMA(VAR1C,4,1);
VAR1E:=SMA(VAR1D,3,1);
VAR1F:=(HHV(HIGH,30)-CLOSE)/CLOSE*100;
VARE:=REF(LOW,1)*0.9;
VARF:=LOW*0.9;
VAR10:=(VARF*VOL+VARE*(CAPITAL-VOL))/CAPITAL;
VAR11:=EMA(VAR10,30);
VAR12:=CLOSE-REF(CLOSE,1);
VAR13:=MAX(VAR12,0);
VAR14:=ABS(VAR12);
VAR15:=SMA(VAR13,7,1)/SMA(VAR14,7,1)*100;
VAR16:=SMA(VAR13,13,1)/SMA(VAR14,13,1)*100;
VAR17:=BARSCOUNT(CLOSE);
VAR18:=SMA(MAX(VAR12,0),6,1)/SMA(ABS(VAR12),6,1)*100;
VAR19:=(-200)*(HHV(HIGH,60)-CLOSE)/(HHV(HIGH,60)-LLV(LOW,60))+100;
VAR20:=VAR18 =25ANDVAR19 -95ANDVAR1F 20ANDVAR1B -30ANDVAR1E 30
ANDVAR11-CLOSE =-0.25ANDVAR15 22ANDVAR16 28ANDVAR17
STICKLINE(VAR20,0,50,10,0),LINETHICK2,COLOR888800;
DRAWTEXT(FILTER(VAR20,5),60,''),COLOR00FF00;
Y:-2,COLORFF0000,LINETHICK2;
B:99,POINTDOT,COLOR00FFFF,LINETHICK1;
T:81,POINTDOT,COLOR0000FF,LINETHICK1;
X:15,POINTDOT,COLOR00FF00,LINETHICK1;
YY:0,LINETHICK2,COLOR0000FF;
HH:90,POINTDOT,COLOR0000FF,LINETHICK1;
通达信百万踏浪源码副图杨百万精典老指标截图
