通达信一笑之主图未加密选股指标公式源码

源码正文：

N:=5{XG51};
DRAWBAND(ma(CLOSE,5),RGB(155,50,50),MA(CLOSE,10),RGB(83,123,68)){XG51};
DRAWKLINE(H,O,L,C){XG51};
MA5:MA(CLOSE,5),COLORRED,LINETHICK2{XG51};
MA10:MA(CLOSE,10),COLORBLUE,LINETHICK2{XG51};
MA20:MA(CLOSE,20),COLORLIMAGENTA,LINETHICK2{XG51};
MA60:MA(CLOSE,60),COLORCYAN,LINETHICK2{XG51};
MA120:MA(CLOSE,120),COLORGRAY,LINETHICK2{XG51};
MA240:MA(CLOSE,240),COLORYELLOW,LINETHICK2{XG51};
DRAWICON(crOSS(MA10,MA20),MA20,1);
DRAWICON(CROSS(MA20,MA60),MA60,1);
DRAWICON(CROSS(MA20,MA120),MA120,1);
DRAWICON(CROSS(MA20,MA240),MA240,1){XG51};
DRAWICON(CROSS(MA60,MA120),MA60,1);
DRAWICON(CROSS(MA60,MA240),MA240,1);
DRAWICON(CROSS(MA120,MA240),MA240,1){XG51};
DRAWICON(CROSS(MA10,MA5),MA10,2);
DRAWICON(CROSS(MA20,MA10),MA20,2);
DRAWICON(CROSS(MA60,MA20),MA60,2);
DRAWICON(CROSS(MA120,MA60),MA60,2);
反弹托:=MA5>MA20 AND MA5>MA20 AND MA20<MA60 AND MA60<MA120 AND CROSS(MA10,MA20){XG51};
月价托:=MA5>MA20 AND MA20>MA60 AND MA60>MA120 AND MA5>MA20 AND CROSS(MA10,MA20){XG51};
季价托:=MA20>MA60 AND MA20>MA60 AND CROSS(MA20,MA60){XG51};
短长价托:=MA5>MA60 AND MA5>MA10 AND CROSS(MA10,MA60){XG51};
半年托:=MA60>MA120 AND MA60>MA120 AND CROSS(MA60,MA120){XG51};
熊来:=MA60<MA120 AND MA60<MA120 AND CROSS(MA120,MA60){XG51};
年托:=MA120>MA240 AND MA120>MA240 AND CROSS(MA120,MA240){XG51};
月蜘蛛:=MA5>MA10 AND MA10>MA20 AND CROSS(MA5,MA20)AND CROSS(MA10,MA20){XG51};
DRAWTEXT(月蜘蛛,MA20-0.08,'金蜘蛛'),COLORLIMAGENTA{XG51};
DRAWTEXT(反弹托,MA20-0.08,'反弹托'),COLORLIMAGENTA{XG51};
DRAWTEXT(月价托 ,MA20-0.2,'月托'),COLORLIMAGENTA{XG51};
DRAWTEXT(季价托,MA60-0.0.08,'季托'),COLORLIMAGENTA{XG51};
DRAWTEXT(短长价托,L+0.015,'短长托'),COLOR36C0C1{XG51};
DRAWTEXT(半年托,MA120-0.08,'牛市来'),COLORWHITE{XG51};
DRAWTEXT(熊来,MA60+0.08,'小心熊'),COLORCYAN{XG51};
DRAWTEXT(年托,MA240-0.08,'年托'),COLORWHITE{XG51};
压:=MA10<MA20 AND MA20>MA10 AND CROSS(MA20,MA10){XG51};
DRAWTEXT(压,MA20+0.012,'压'),COLORBLUE{XG51};
vol5:=MA(VOL,5),COLORRED{XG51};
VOL10:=MA(VOL,10),COLORBLUE{XG51};
VOL40:=MA(VOL,40),COLORFF00FF {XG51};
量托:=VOL5>=VOL40 AND CROSS(VOL10,VOL40) AND REF(VOL10,1)<REF(VOL40,1){XG51};
DRAWTEXT(量托,L-0.012,'量托'),COLORRED{XG51};
AA1:=BArslAst(MA60>MA20 AND (MA20=MA10 OR MA20>MA10)){XG51};
BB1:=REF(COUNT(C<MA60,AA1)=AA1,1){XG51};
CC1:=CROSS(C,MA60) AND VOL>MA(VOL,5) AND (C-REF(C,1))/REF(C,1)*100>3{XG51};
芙蓉出水:=BB AND CC1,COLOR00FF00{XG51};
DRAWTEXT(芙蓉出水,H+0.12,'芙蓉出水'),COLORFF00FF{XG51};
STICKLINE(芙蓉出水,H,L,0.5,1),COLORFF00FF{XG51};
STICKLINE(芙蓉出水,O,C,4,1),LINETHICK2,COLORFF00FF{XG51};
MA1:=MA(CLOSE,5){XG51};
MA2:=MA(CLOSE,10){XG51};
MA3:=MA(CLOSE,30){XG51};
ZJ:=AMOUNT/10000{XG51};
TM:=V-MA(V,10){XG51};
一穿三:=MA1>O AND MA2>O AND MA3>O AND MA1<C AND MA2<C AND MA3<C AND CLOSE>OPEN {XG51};
DRAWTEXT(一穿三,L-0.012,'穿三线'),COLORFF00FF{XG51};
C6:=REF(C,1){XG51};
涨停:=IF((C-C6)*100/C6>=(10-0.01*100/C6),1,0){XG51};
STICKLINE(涨停,OPEN,CLOSE,2,0),COLORLIMAGENTA{XG51};
STICKLINE(涨停,H,L,0,0),COLORLICYAN{XG51};
TY:=C{XG51};
A1:=REF(TY,10)=HHV(TY,2*10+1); B1:=FILTER(A1,10); C1:=BacKSET(B1,10+1); HD:=FILTER(C1,10){XG51};
A2:=REF(TY,10)=LLV(TY,2*10+1); B2:=FILTER(A2,10); C2:=BACKSET(B2,10+1); LD:=FILTER(C2,10){XG51};
前期高位:REF(C,BARSLAST(HD)),COLOR00FF00,POINTDOT{XG51};
STICKLINE(C,前期高位,前期高位,8,0),COLORBLUE;
towERC:=FORCAST(ema((3*CLOSE+2*OPEN+HIGH+LOW)/7,3),6){XG51};
DIRECTIONMAX:=MAX(REF(TOWERC,1),REF(TOWERC,1)){XG51};
DIRECTIONMIN:=MIN(REF(TOWERC,1),REF(TOWERC,1)){XG51};
STICKLINE(TOWERC>=REF(TOWERC,1),TOWERC,DIRECTIONMAX,3.5,1),COLORWHITE{XG51};
STICKLINE(TOWERC<REF(TOWERC,1),TOWERC,DIRECTIONMIN,3.5,1),COLORCYAN{XG51};
压力线:boll+3*STD(CLOSE,N),LINETHICK2,COLORWHITE{X~G_5-1~C~N~{};

源码正文：

DPZF:=INDEXC/REF(INDEXC,1)-1{XG51};
GGZF:=C/REF(C,1)-1{XG51};
DPDB:=SUM(GGZF-DPZF,1)*100{XG51};
发现主力:=IF(SUM(DPDB,20)>0 AND (HHV(C,20)-LLV(C,20))/LLV(C,20)<=0.2 AND
INDEXC/REF(INDEXC,20)<=0.9,5,0),COLORLIGREEN{XG51};
发现时间:BArslAst(发现主力=5){XG51};
M0:=ma(C,5); M1:=MA(C,10); M2:=MA(C,20); M3:=MA(C,30); M6:=MA(C,60){XG51};
M9:=MA(C,90); MB:=MA(C,120); ML:=MA(C,250){XG51};
D:=MAX(MAX(MAX(M0,M1),M2),M6){XG51};
X:=MIN(MIN(MIN(M0,M1),M2),M6){XG51};
均线疏密:IF(M0>M6,D/X-1,DRAWNULL),COLORWHITE{XG51};
A1:=MA(CLOSE,5);A2:=REF(A1,1);五日速度:(A1-A2)/A2*100{XG51};
A3:=MA(CLOSE,10);A4:=REF(A3,1);十日速度:(A3-A4)/A4*100;{XG51};
筹码集中度:COST(85)/COST(5)-1{XG51};
价格高低:(C-LLV(C,60))/(HHV(C,60)-LLV(C,60)){XG51};
N8:=20;JJ:=(HIGH+LOW+CLOSE)/3;QJ0:=vol/IF(HIGH=LOW,4,HIGH-LOW){XG51};
QJ1:=IF(CAPITAL=0,QJ0*(JJ-MIN(CLOSE,OPEN)),QJ0*IF(HIGH=LOW,1,
(MIN(OPEN,CLOSE)-LOW))){XG51};
QJ2:=IF(CAPITAL=0,QJ0*(MIN(OPEN,CLOSE)-LOW),QJ0*IF(HIGH=LOW,1,
(JJ-MIN(CLOSE,OPEN)))){XG51};
QJ3:=IF(CAPITAL=0,QJ0*(HIGH-MAX(OPEN,CLOSE)),QJ0*IF(HIGH=LOW,1,
(HIGH-MAX(OPEN,CLOSE)))){XG51};
QJ4:=IF(CAPITAL=0,QJ0*(MAX(CLOSE,OPEN)-JJ),QJ0*IF(HIGH=LOW,1,
(MAX(CLOSE,OPEN)-JJ))){XG51};
ddx:((QJ1+QJ2)-(QJ3+QJ4))/IF(CAPITAL=0,1000000,10000),COLOR00AAAA,LINETHICK{XG51};
DX:=MA(DDX,5)*20{XG51};
DDX1:SMA(DX,3,1),COLORFFFFFF{XG51};
DDX2:SMA(DDX1,3,1),COLOR00FFFF{XG51};
DDX3:ema(DDX2,5),COLORFF00FF{XG51};
DD:=BARSLAST(L=LLV(L,30))+1{XG51};
ZF:=IF(CAPITAL=0, C/REF(C,1)>=1.015,C/REF(C,1)>=1.025) AND MA(C,13)>REF(MA(C,13),1) {XG51};
波哥抄底:ZF AND COUNT(ZF,DD)=1{XG51};
M:=IF(PERIOD>=5,1.025,1.008){XG51};
N:=IF(PERIOD>=5,240*V/FROMOPEN,V){XG51};
QS:=COUNT(MA(C,13)<REF(MA(C,13),1),8)=8{XG51};
ZFLB:=C/REF(C,1)>=M AND N/REF(MA(V,5),1)>=1.2 AND C>MA(C,13) AND
MA(C,13)>=REF(MA(C,13),1){XG51};
SJ1:=BARSLAST(QS){XG51};
SJ2:=BARSLAST(REF(C,4)=HHV(C,8) AND REF(C=HHV(C,8),4))+1{XG51};
SJ:=IF(PERIOD>=5,SJ2,SJ1){XG51};
QSJ1:=BARSLAST( MA(C,13)<REF(MA(C,13),1)){XG51};
RQS:=COUNT(MA(C,20)>=REF(MA(C,20),1),3)=3 OR MA(C,20)>MA(C,60){XG51};
QSJ:=IF(PERIOD>=5,RQS,QSJ1<=4){XG51};
进场了:ZFLB AND COUNT(ZFLB,SJ)=1 AND QSJ{XG51};
综合选股:(进场了=1 OR 波哥抄底=1) AND DDX3>12 AND 均线疏密<0.12 {X^G=5~1^C^N^{};