| 发现猛牛出击: N1:=14; VAR3:=EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),5); VAR4:=(CLOSE-LLV(CLOSE,N1))/(HHV(CLOSE,N1)-LLV(CLOSE,N1))*100; VAR255:=LLV(LOW,10); VAR355:=HHV(HIGH,25); 动力线:=EMA((CLOSE-VAR255)/(VAR355-VAR255)*4,4)*30; STICKLINE(动力线>REF(动力线,1) ,动力线 ,REF(动力线,1),2.5,1),COLORLIRED; STICKLINE(动力线<=REF(动力线,1) ,动力线 ,REF(动力线,1),2.5,1),COLOR00FF00; VAR5:=EMA(CLOSE,2)-EMA(CLOSE,150); VAR6:=EMA(VAR5,100); VAR7:=2*(VAR5-VAR6); VAR8:=POW(VAR7,3)*0.1+POW(VAR7,1); VAR9:=SQRT(SQRT(LOW*HIGH*OPEN*CLOSE)); RSV:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100; K:=SMA(RSV,3,1); D:=SMA(K,3,1); J:=3*K-2*D,COLOR0000EE,LINETHICK2; 短期5日乖离率:=(CLOSE-MA(CLOSE,5))/MA(CLOSE,5)*1000,COLORLIBLUE,LINETHICK1; VARA:=EMA(VAR9*0.97,3); VARB:=(HIGH+LOW+CLOSE)/3; VARC:=(VARB-MA(VARB,14))/(0.015*AVEDEV(VARB,14)); 黑马线1:= IF(VAR7>0.1,VAR8,0)*5; VARD:=LLV(HIGH,240); VARE:=100*(CLOSE-VARD)/VARD; VARF:=AMOUNT/VOL; N:=26; MID:=REF(HIGH+LOW,1)/2; VAR12:=SUM(MAX(0,HIGH-MID),N)/SUM(MAX(0,MID-LOW),N)*100 ; CR:=IF(VAR12<230,VAR12,230),COLORWHITE,,LINETHICK1; VAR10:=EMA((WINNER(CLOSE*1.1)-WINNER(CLOSE*0.9))*80,5); VAR11:=INDEXC; VAR13:=MA(VAR11,20); VAR14:=MA(VAR11,30); VAR15:=VAR14>VAR12*1.08 AND VAR13>VAR12*1.055; VAR16:=VAR12>VAR11*1.03 AND VAR13>VAR11*1.13; VAR17:=VAR16; VAR18:=IF(FILTER(VAR10<6,5)=1,1,0); VAR19:=VAR10<6 AND VAR17; VAR1A:=CROSS(黑马线1,2); VAR1B:=CROSS(黑马线1,4); VAR1C:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100; VAR1D:=(CLOSE-MA(CLOSE,12))/MA(CLOSE,12)*100; VAR1E:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100; VAR1F:=REF(CLOSE,1); VAR131:=SMA(MAX(C-REF(C,2),0),7,1)/SMA(ABS(C-REF(C,2)),7,1)*100; 春笋:=IF(VAR12<60 AND VAR11>10 ,20,0),COLORLIGREEN,; 出击:=IF(VAR13>20,VAR13/1,0),COLORRED; VAR20:=SMA(MAX(CLOSE-VAR1F,0),5,1)/SMA(ABS(CLOSE-VAR1F),5,1)*100; VAR21:=(HIGH+LOW+CLOSE)/3; VAR22:=(VAR21-MA(VAR21,14))/(0.015*AVEDEV(VAR21,14)); VAR23:=(VAR1C>=-15.8 AND VAR1C<=-12.2 AND VAR1D<=-20.8 AND VAR1E<=-27.5 AND VAR20<=11.7 AND VAR22<=-145)*100; VAR24:=VAR4=0; VAR25:=VAR4=100; IF(VAR25>0,110,101),STICK,LINETHICK2,COLOR00FF00;101,STICK,LINETHICK2,COLOR000000; IF(VAR23>0,100,90),STICK,LINETHICK3,COLORRED;90,STICK,LINETHICK3,COLOR000000; IF(VAR24>0,-11,0),STICK,LINETHICK3, COLORRED;0,STICK,LINETHICK3, COLOR000000; 黑马线:黑马线1,STICK ,COLOR008364,LINETHICK3; MA1:=REF(MA(CR,10),10/2.5+1),COLORLIBLUE,LINETHICK1; 趋势线:=((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)))*2,COLORLIRED; 股价启动在即:=IF(CROSS(趋势线,6),50,0),COLORYELLOW; 发现: (VAR18 AND VARE<-2.5 AND VAR3<5 AND VAR4=0)*60,LINETHICK2 ,COLORYELLOW; 黑马: IF(FILTER(VAR19,1)=1,1,0)*80,STICK , LINETHICK2, COLORF0F000; 大黑马: VAR19 AND VAR18*80,STICK ,LINETHICK2, COLORYELLOW; 操盘手: VAR4,COLORF00FF0; 庄拉: IF(FILTER((VAR1A OR VAR1B) AND VAR4<40 AND VAR3<40,5)=1,35,0),LINETHICK2,COLORRED ; 0,LINETHICK1,COLOR000999; 100, COLORFF9966; N11:=14; TYP:=(HIGH + LOW + CLOSE)/3; CCI:(TYP-MA(TYP,N11))/(0.015*AVEDEV(TYP,N11)),LINETHICK2,COLORRED,NODRAW; 黄金坑:IF(短期5日乖离率<-100,10,0),COLORYELLOW,LINETHICK2; 派发区11:IF(短期5日乖离率>100,90,100),COLORLIBLUE,LINETHICK1; WWWCHNMONEYCOM:=(HHV(HIGH,13)-CLOSE)/(HHV(HIGH,13)-LLV(LOW,13))*120,COLOR009900,LINETHICK2; LC := REF(CLOSE,1); RSI5:=SMA(MAX(CLOSE-LC,0),3,1)/SMA(ABS(CLOSE-LC),3,1)*100; 跟进:(DOWNNDAY(C,3) AND MAX("KDJ.K"(9,3,3),"KDJ.D"(9,3,3))<20 AND BETWEEN("KDJ.J"(9,3,3),-20,5))*12,LINETHICK2; 买入:(CROSS(BIAS.BIAS1(5,10,20),REF(BIAS.BIAS1(5,10,20),1)) AND KDJ.K<20 AND ROC.ROC<-20)*15,LINETHICK2; 买入3:(L<REF(LLV(L,9),1) AND L<MIN(C,O)*0.97 AND 1)*18,COLORMAGENTA,LINETHICK2; WR5:=100*(HHV(H,5)-C)/(HHV(H,5)-LLV(L,5)); WR6:=100*(HHV(H,6)-C)/(HHV(H,6)-LLV(L,6)); WR:=80-(WR5*3+WR6*2)/5; 坑:=IF(WR<0,WR,0),COLORYELLOW; STICKLINE(WR<0,-4,0,2,0),COLORYELLOW; STICKLINE(WR<-10,-4,-8,3,0),COLORWHITE; 多空线DKX主图: 多空线 DKX主图,主图公式 直接上通达信软件本色源码基础上略作改动。 {DKX主图} MID:=(3*CLOSE+LOW+OPEN+HIGH)/6; A0:(20*MID+19*REF(MID,1)+18*REF(MID,2)+17*REF(MID,3)+ 16*REF(MID,4)+15*REF(MID,5)+14*REF(MID,6)+ 13*REF(MID,7)+12*REF(MID,8)+11*REF(MID,9)+ 10*REF(MID,10)+9*REF(MID,11)+8*REF(MID,12)+ 7*REF(MID,13)+6*REF(MID,14)+5*REF(MID,15)+ 4*REF(MID,16)+3*REF(MID,17)+2*REF(MID,18)+REF(MID,20))/210; A1:MA(A0,3); A2:MA(A0,6); DRAWKLINE(H,O,L,C); DRAWTEXT(CROSS(A1,A2),L,'←买入'),COLOR0000FF; ZMACD(顶尖财经:股票学院 http://www.58188.com): SQX:=(C-MA(CLOSE,13))*100; DIF:EMA(MA(SQX,7),1),LINETHICK1; DEA:EMA(DIF,7),LINETHICK1; MACD: (DIF-DEA)*2,COLORSTICK; 红柱持股:IF(MACD>REF(MACD,1),MACD,DRAWNULL),STICK,COLORRED,LINETHICK3; 绿柱持币:IF(MACD<REF(MACD,1),MACD,DRAWNULL),STICK,COLORGREEN,LINETHICK3; 低位金叉:IF(CROSS(DIF,DEA) AND DIF<-0.1,0.3,0),COLORYELLOW,POINTDOT; STICKLINE(低位金叉,0,10,8,1),COLORYELLOW; DRAWICON(低位金叉,0.3,1); JCCOUNT:=COUNT(CROSS(DIF,DEA),BARSLAST(DEA>=0)); 二次金叉:IF(CROSS(DIF,DEA) AND DEA<0 AND COUNT(JCCOUNT=2,21)=1,0.2,0),COLORFF00FF,POINTDOT; STICKLINE(二次金叉,25,15,8,1),COLORFF00FF; A1:=BARSLAST(REF(CROSS(DIF,DEA),1)); 底背离:IF(REF(CLOSE,A1+1)>CLOSE AND DIF>REF(DIF,A1+1) AND CROSS(DIF,DEA),0.1,0),COLORRED,POINTDOT; STICKLINE(底背离,40,30,8,1),COLORMAGENTA; DRAWLINE(A1=0,DEA,底背离,DEA,0),COLORMAGENTA,LINETHICK3; A2:=BARSLAST(REF(CROSS(DEA,DIF),1)); 顶背离:REF(CLOSE,A2+1)<CLOSE AND REF(DIF,A2+1)>DIF AND CROSS(DEA,DIF),COLORGREEN; DRAWLINE(A2=0,DEA,顶背离,DEA,0),COLORBLUE,LINETHICK3; A3:=CROSS(DIF,DEA) AND DEA<0; 零下二次金叉:IF(FILTER(COUNT(A3,21)=2,10),0.05,0),COLORWHITE,POINTDOT; STICKLINE(零下二次金叉,45,55,8,1),COLORWHITE; 金叉:DRAWICON(CROSS(DIF,DEA),DIF,1); 死叉:DRAWICON(CROSS(DEA,DIF),DIF,2); |