分时操盘手(通达信公式 分时副图 源码 测试图)

[复制链接]
查看85 | 回复0 | 2022-6-27 16:33:37 | 显示全部楼层 |阅读模式

 分时操盘手

TA:=IF(TIME>093000 AND TIME<094000 ,1,0);
 TT:=IF(TIME>=093000 AND TIME<=093300 ,1,0);
 T0:=IF(TIME>093600 AND TIME<095900 ,1,0);
 T1:=IF(TIME>093300 AND TIME<145900 ,1,0);
 T2:=IF(TIME>095500 AND TIME<145900 ,1,0);
 T3:=IF(TIME>142500 AND TIME<145900 ,1,0);
 T4:=IF(TIME>111000 AND TIME<145900 ,1,0);
 T5:=IF(TIME>110000 AND TIME<145900 ,1,0);
 T6:=IF(TIME>104200 AND TIME<145900 ,1,0);
 T7:=IF(TIME>103000 AND TIME<131000 ,1,0);
 T8:=IF(TIME>130000 AND TIME<155900 ,1,0);
 T9:=IF(TIME>095500 AND TIME<131000 ,1,0);
 T10:=IF(TIME>130500 AND TIME<143500 ,1,0);
 T11:=IF(TIME>094500 AND TIME<102500 ,1,0);
 T12:=IF(TIME>095000 AND TIME<140000 ,1,0);
 T13:=IF(TIME>093000 AND TIME<143500 ,1,0);
 DIF:=EMA(CLOSE,12)-EMA(CLOSE,26);
 DEA:=EMA(DIF,9);
 VARY1:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
 SD:=(C>60 AND C<100,200,100);
 SF:=IF(C<40 AND C<=60,300,SD);
 SG:=IF(C>10 AND C<=28,1000,IF(C>29 AND C<40,500,SF));
 SH:=IF(C<5,5000,IF(C>=5 AND C<=10,2000,SG));
 SJ:=IF(C>=6000,5,SH);
 SK:=IF(C>1000 AND C<6000,25,SJ);
MACD:=(DIF-DEA)*SK,COLORSTICK;
 STICKLINE((MACD>=0),0,MACD,3,1),COLOR0000FF;
 STICKLINE(((MACD>=0) AND (MACD < REF(MACD,1))),0,MACD,3,0),COLORCYAN;
 STICKLINE((MACD<0),0,MACD,3,0),COLORFFFF00;
 STICKLINE(((MACD<0) AND (MACD > REF(MACD,1))),0,MACD,3,1),COLORRED;
 JS1:=100000*(CLOSE-REF(CLOSE,5))/(5*REF(CLOSE,5));
 JS2:=IF(JS1>110,110,JS1);
 JS:=IF(JS2<-20,-20,JS2);
 RSV2:=(CLOSE-LLV(LOW,120))/(HHV(HIGH,120)-LLV(LOW,120))*100;
 K2A:=SMA(RSV2,33,1);
 K2:=IF(TT=1,REF(K2A,1),K2A);
 D2:=SMA(K2,3,1);
 OK:=K2;
 RSV:=(CLOSE-LLV(LOW,89))/(HHV(HIGH,89)-LLV(LOW,89))*100;
 K89A:=SMA(RSV,33,1);{分析家公式网 WWW.70822.COM 整理}
 K89:=IF(TT=1,REF(K89A,1),K89A);
 RSVC2:=(CLOSE-LLV(LOW,140))/(HHV(HIGH,120)-LLV(LOW,120))*100;
 KC2:=SMA(RSVC2,46,1);
 DC2:=SMA(KC2,46,1);
大趋势:DC2,LINETHICK1,CIRCLEDOT{POINTDOT},COLORYELLOW{COLORC6C600};
 TYPP:=(HIGH+LOW+CLOSE)/3;
CCI:=(TYPP-MA(TYPP,14))/(0.015*AVEDEV(TYPP,14));
 GG:=(C-REF(C,210))/REF(C,210)*55;
 WG:=BARSSINCE(V>0)+1;
 GGJX:=((SUM(C*V,WG)/SUM(V,WG)+WG*0)/REF((SUM(C*V,WG)/SUM(V,WG)+WG*0),0)-1)*55;
 DPX:=0.3*(3*SMA((C-LLV(L,105))/(HHV(H,105)-LLV(L,105)),5,1)-2*SMA(SMA((C-LLV(L,105))/(HHV(H,105)-LLV(L,105)),5,1),3,1))*0.9,,COLOR5AFF99;
 GBC:=CROSS(GG,GGJX);
 GBK:=-CROSS(GGJX,GG);
 GBD:=SUM(GBC,0)+SUM(GBK,0);
涨幅:=DYNAINFO(14)*100;
 STS:=FINANCE(32)>=0 AND FINANCE(34)>0 AND DYNAINFO(7)>0 ;
 CK:=IF(DYNAINFO(8)>0 AND STS=0 AND 涨幅<4.91 OR DYNAINFO(8)>0 AND STS=1 AND 涨幅<9.91,1,0);
 CCT:=DYNAINFO(8);
 PPP:= FILTER(CCT=0,500) ;
 DRAWTEXT(PPP,45,'★今日该股票未开盘,不能分析★'),COLORFF00FF;
 TDSA:=5+3*SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1)-2*SMA(SMA((C-LLV(L,55))/(HHV(H,55)-LLV(L,55))*100,5,1),3,1);
 TDSB:=IF(TA=1 AND TDSA=105,70,TDSA);
 WH:=TDSB;
 WE:=FILTER(WH>90,16);
 TDCJ:=(7*SMA((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*30,4,1)-3*SMA(SMA((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*30,4,1),3,1)-SMA(SMA(SMA((CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*30,4,1),3,1),2,1)),COLORFF9933;
 WL:=TDCJ;
 VM1:=(C*2+H+L)/4*10;
 VM2:=EMA(VM1,13)-EMA(VM1,34);
 VM3:=EMA(VM2,5);
 VM4:=2*(VM2-VM3)*5.5;
 A:=EMA(WINNER(CLOSE),10);
 B:=EMA(WINNER(CLOSE),34);
 BA:=100*(CLOSE-REF(CLOSE,12))/REF(CLOSE,12);
 BD:=MA(ROC,6)*100;
 VAR67:=(LOW+HIGH+CLOSE)/3;
 VAR80:=IF(TROUGHBARS(3,16,1)=0 AND HIGH>LOW+0.04,3,0);
 VAR81:=ZIG(3,6)>REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)<=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)<=REF(ZIG(3,6),3);
 VAR83:=ZIG(3,22)>REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)<=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)<=REF(ZIG(3,22),3);
 VAR82:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) AND REF(ZIG(3,6),2)>=REF(ZIG(3,6),3);
 VAR84:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3,22),1)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);
 VAR85:=ZIG(3,51)>REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)<=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)<=REF(ZIG(3,51),3);
 VAR87:=ZIG(3,72)>REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)<=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)<=REF(ZIG(3,72),3);
 VARF:=100-3*SMA((CLOSE-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1)+2*SMA(SMA((CLOSE-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1),15,1);
 VAR9A:=100-3*SMA((OPEN-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1)+2*SMA(SMA((OPEN-LLV(LOW,65))/(HHV(HIGH,80)-LLV(LOW,65))*100,20,1),15,1);
 VAR86:=ZIG(3,51)<REF(ZIG(3,51),1) AND REF(ZIG(3,51),1)>=REF(ZIG(3,51),2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);
 VAR88:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72),2)>=REF(ZIG(3,72),3);
 VARX1:=(MA(CLOSE,80)-MA(CLOSE,13)/3);
 VARX2:=( MA((CLOSE-VARX1)/VARX1,1));
 NN1:=VAR80;
 VARM1:=(CLOSE-LLV(LOW,36))/(HHV(HIGH,36)-LLV(LOW,36))*100;
 VARM2:=SMA(VARM1,3,1);
 NN2:=(VAR81+VAR83+VAR85+VAR87);
 MM1:=(VAR82+VAR84+VAR86+VAR88);
 MM2:= IF(MM1>0,-500,0);
 MM:= IF(C>1000,MM2*100,MM2),COLORRED,LINETHICK3;
 CT:=SUM(MM,0) AND T1=1;{统计}
CL1:=EMA(IF(WH<15 AND WL<5 AND OK<55 AND L<= LLV(L,27),SMA(ABS(L-REF(L,1)),27,1)/SMA(MAX(L-REF(L,1),0),27,1),0),3)*100;
 CL2:=IF(CL1>80,80,CL1);
 CHH1:=SUM(WE OR CL2,0);
 CHH:=IF(CT=0 AND CHH1>110,110,CHH1);
五指山:TDSB,COLORFF00FF;
 VAS1:=(2*C+H+L)/4;
 VAS2:=LLV(L,34);
 VAS3:=HHV(H,34);
 AAD:=MA(CLOSE,32);
 BAD:=MA(CLOSE,12);
 DDD:=CROSS(B,A);
 RSVR:= (CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
 VAR1:=HHV(HIGH,9)-LLV(LOW,9);
 VAR2:=HHV(HIGH,9)-CLOSE;
 VAR4:=VAR2/VAR1*100-70;
 VAR6:=(2*CLOSE+HIGH+LOW)/4;
 VAR8:=LLV(LOW,34);
 VAR11:=HHV(HIGH,34);
 VAR12:=EMA((VAR6-VAR8)/(VAR11-VAR8)*100,13);
 VAR13:=EMA(0.667*REF(VAR12,1)+0.333*VAR12,2);
万泉河:VAR12,COLORGREEN;
 {
 STICKLINE(VAR12-VAR13>0,VAR12,VAR13,10,0),COLORRED;
 STICKLINE(VAR12-VAR13<0,VAR12,VAR13,10,0),COLORGREEN;
 }
 RSV1:=(CLOSE-LLV(LOW,35))/(HHV(HIGH,35)

202110208532322639.rar

13.96 KB, 下载次数: 0

售价: 4 金钱  [记录]  [购买]

202110208532322639.rar

回复

使用道具 举报

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则