通达信自用经典指标源码【附图】.docx

发几个通达信自用经典指标源码【附图】首先声明：指标不是万能的，只能作为参考使用。中线买卖主图此主题相关图片如下：中线买卖主图EMA13:EMA(C,13),COLORWHITE; EMA21:EMA(C,21),COLORYELLOW; EMA34:EMA(C,34),COLORFF00FF;EMA60:MA(C,60),COLORFFCC66; X1:=(C+L+H)/3; X2:=EMA(X1,6); X3:=EMA(X2,5); STICKLINE(X2X3 AND CEMA13,LOW,HIGH,0.1,1),COLORRED; STICKLINE(X2X3 AND CEMA13,CLOSE,OPEN,3,1),COLORRED; STICKLINE(X2X3 AND CEMA13,LOW,HIGH,0.1,1),COLORFFFF52;STICKLINE(X2X3 AND CEMA21 AND EMA21EMA34 AND EMA13REF(EMA13,1);GR3:=COUNT(BIAS.BIAS2(6,13,24)10 AND H=HHV(H,GR1),GR1);GR4:=H=HHV(H,GR1);GR5:=MACD.MACD(9,17,8)REF(MACD.MACD(9,17,8),1);GR6:=GR2 AND GR3 AND GR4;GR7:=GR2 AND GR3 AND GR4 AND GR5;GR8:=GR6 AND GR7;LC := REF(CLOSE,1);RSI6:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;BIAS5:=(CLOSE-MA(CLOSE,13)/MA(CLOSE,13)*100;换手:=100*V/CAPITAL;BB13:=ATAN(EMA13-REF(EMA13,1)*3.1416*10;EMA8:=EMA(C,8); AA1:=AMOUNT/VOL;BB1:=L1.2;DD1:=LMA(C,6)*0.921;EE1:=VOLMA(V,5)*1.5;FF1:=BB1 AND CC1 AND DD1 AND EE1;DRAWTEXT(FF1,L*0.99,买点),COLORRED;STICKLINE(FF1,H,L,0.3,0),COLORRED;STICKLINE(FF1,O,C,3,1),LINETHICK2,COLORYELLOW;A2:=(C-REF(C,1)/REF(C,1)*100MA(C,5)*1.12;AA:= A2 AND A3;DRAWTEXT(AA,H*1.05,卖点),COLOR00FF00;STICKLINE(AA,H,L,3,0),COLOR00FF00;中线买卖副图此主题相关图片如下：中线买卖副图VAR1:=SUM(MAX(MAX(HIGH-LOW,ABS(HIGH-REF(CLOSE,1),ABS(LOW-REF(CLOSE,1),25);VAR2:=HIGH-REF(HIGH,1);VAR3:=REF(LOW,1)-LOW;VAR4:=SUM(IF(VAR20 AND VAR2VAR3,VAR2,0),25);VAR5:=SUM(IF(VAR30 AND VAR3VAR2,VAR3,0),25);VAR6:=VAR4*100/VAR1;VAR7:=VAR5*100/VAR1;VAR8:=MA(ABS(VAR7-VAR6)/(VAR7+VAR6)*100,15);VAR9:=(VAR8+REF(VAR8,15)/2;A:=(VAR7VAR6 AND VAR725 AND VAR625);B:ZIG(3,50/5)*100,COLORWHITE;G:MA(B,2),COLORYELLOW;D:=CROSS(B,G)*1000,COLORRED;W:=CROSS(G,B)*1000,COLORBLUE;E:=REF(INDEXC,1);F:=SMA(MAX(INDEXC-E,0),3,1)/SMA(ABS(INDEXC-E),3,1);VAR10:=F AND F8;VAR11:=(CLOSE-LLV(LOW,9)/(HHV(HIGH,9)-LLV(LOW,9)*100;VAR12:=SMA(VAR11,3,1);VAR13:=SMA(VAR12,3,1);VAR14:=VAR13 AND VAR13REF(ZIG(3,5),1) AND (REF(ZIG(3,5),1)=REF(ZIG(3,5),2) AND (REF(ZIG(3,5),2)=REF(ZIG(3,5),3),LOW*0.98,9) ;DRAWICON(ZIG(3,5)=REF(ZIG(3,5),2) AND (REF(ZIG(3,5),2)=REF(ZIG(3,5),3),HIGH*1.01,4);VAR3:=(CLOSE-MA(CLOSE,6)/MA(CLOSE,6)*100;VAR4:=(CLOSE-MA(CLOSE,24)/MA(CLOSE,24)*100;VAR5:=(CLOSE-MA(CLOSE,32)/MA(CLOSE,32)*100;VAR6:=(VAR3+VAR4+VAR5)/3;VAR7:=EMA(VAR6,5);ZB:=EMA(EMA(VAR3,5),5)*3, COLORSTICK;VAR8:=IF(VAR610;HS:=VOL/CAPITAL*100, , COLORGREEN;DRAWTEXT(VAR8=10 AND FILTER(VAR8=10,5),LOW*1.00,准备) COLORMAGENTA;DRAWTEXT(VARA=20,LOW*1.00,一定要买) COLORRED;DRAWICON(VARA=20,LOW*1.00,1);VARE:=MA(100*(CLOSE-LLV(CLOSE,34)/(HHV(HIGH,34)-LLV(LOW,34),5)-20;VARF:=100-3*SMA(CLOSE-LLV(LOW,75)/(HHV(HIGH,75)-LLV(LOW,75)*100,20,1)+2*SMA(SMA(CLOSE-LLV(LOW,75)/(HHV(HIGH,75)-LLV(LOW,75)*100,20,1),15,1);VAR10:=100-3*SMA(OPEN-LLV(LOW,75)/(HHV(HIGH,75)-LLV(LOW,75)*100,20,1)+2*SMA(SMA(OPEN-LLV(LOW,75)/(HHV(HIGH,75)-LLV(LOW,75)*100,20,1),15,1);VAR11:=VARFREF(VOL,1) AND CLOSEREF(CLOSE,1);DRAWTEXT(VAR11 AND COUNT(VAR11,30)=1,LOW*0.95,庄家异动),LINETHICK1,COLORFF00FF;VAR12:=(HIGH+LOW+CLOSE)/3;VAR13:=(VAR12-MA(VAR12,14)/(0.015*AVEDEV(VAR12,14);VAR14:=(VAR12-MA(VAR12,70)/(0.015*AVEDEV(VAR12,70);VAR15:=IF(VAR13=150 AND VAR13=150 AND VAR14200,10,0);VAR16:=IF(VAR13-200 AND VAR14-200,-10,VAR15);VAR17:=(CLOSE-MA(CLOSE,13)/MA(CLOSE,13)*100;VAR18:=100-ABS(VAR17);VAR19:=IF(VAR180,VARE,0);VAR1B:=IF(VAR14=200 AND VAR13=150,15,IF(VAR14=-200 AND VAR1348 AND VAR1B60 AND VAR19100;DRAWTEXT(VAR1C AND COUNT(VAR1C,30)=1,LOW*1.00,大动作) COLORYELLOW;VAR20:=PEAKBARS(3,15,1)REF(VAR22,1),35,0)LINETHICK2;DRAWTEXT(VAR23=35,HIGH*1.00,一定要逃)COLORGREEN;DRAWICON(VAR23=35,HIGH*1.00,2);底红顶绿副图此主题相关图片如下：底红顶绿副图LC:=REF(CLOSE,1);RSI5:=(SMA(MAX(CLOSE - LC),0),5,1) / SMA(ABS(CLOSE - LC),5,1) * 100);TR:=SUM(MAX(MAX(HIGH - LOW),ABS(HIGH - REF(CLOSE,1),ABS(LOW - REF(CLOSE,1),10);HD:=(HIGH - REF(HIGH,1);LD:=(REF(LOW,1) - LOW);DMP:=SUM(IF(HD 0) AND (HD LD),HD,0),10);DMM:=SUM(IF(LD 0) AND (LD HD),LD,0),10);PDI:=(DMP * 100) / TR);MDI:=(DMM * 100) / TR);ADX:=MA(ABS(MDI - PDI) / (MDI + PDI) * 100),5);AV:=(RSI5 + ADX);DXR:=(ADX + REF(ADX,5) / 2) + RSI5);0,COLORFF00FF;WR10:=(100 * (HHV(HIGH,10) - CLOSE) / (HHV(HIGH,10) - LLV(LOW,10);NEWVOL:=(RSI5 - WR10);阶段底部:=(AV + NEWVOL);STICKLINE(阶段底部 = 0),0,阶段底部,0.3,1),LINETHICK2,COLORCC6600;STICKLINE(阶段底部 230 ),250,趋势线,0.8,1),LINETHICK6,COLORGREEN;230,COLORFFFFFF;动力线副图量:=V; 换手:=V/CAPITAL*100;VAR1:=VOL/(HIGH-LOW)*2-ABS(CLOSE-OPEN);买盘:=IF(CLOSEOPEN,VAR1*(HIGH-LOW),IF(CLOSEOPEN,0-VAR1*(HIGH-CLOSE)+(OPEN-LOW),IF(CLOSE0,SUM(AMOUNT,A1)/SUM(VOL,A1)/100000,EMA(CLOSE,120000);百分之百换手价:CMA,LINETHICK0,COLORFFC0FF;100%换手平均成本价;此主题相关图片如下：3D立体K线主图及成交量副图此主题相关图片如下：3D主图MA5:MA(C,5);MA10:MA(C,10);MA20:MA(C,20);MA60:MA(C,60);MA120:MA(C,120);MA250:MA(C,250);STICKLINE(CO,C,O,3 ,0 ),COLORRED; STICKLINE(CO,C,O,2 ,0 ),COLOR1040FF; STICKLINE(CO,C,O,1 ,0 ),COLOR1083FF; STICKLINE(CO,H,L,0.0001 ,0 ),COLOR10ABFF;STICKLINE(C=O,C,O,3,0 ),COLORFF147C;STICKLINE(C=O,C,O,2,0 ),COLORFF547C;STICKLINE(C=O,C,O,1,0 ),COLORFF887C;STICKLINE(C=OPEN,VOL,0,3,0),COLORRED;STICKLINE(CLOSE=OPEN,VOL,0,2,0),COLOR1040FF;STICKLINE(CLOSE=OPEN,VOL,0,1,0),COLOR1083FF;STICKLINE(CLOSE=OPEN,VOL,0,0,0),COLOR10ABFF;STICKLINE(CLOSEOPEN,VOL,0,3,0),COLORFF147C;STICKLINE(CLOSEOPEN,VOL,0,2,0),COLORFF547C;STICKLINE(CLOSEOPEN,VOL,0,1,0),COLORFF887C;STICKLINE(CLOSEMA(CLOSE,250),LOW-LOW*0.02,少量买 ),COLORYELLOW;DRAWTEXT(VAR2 AND CLOSE=MA(CLOSE,60) AND CLOSE=MA(CLOSE,250),LOW-LOW*0.02,半仓买),COLORYELLOW;DRAWTEXT(VAR2 AND CLOSE=ref(diff,1),rgb(255,0,0),diffref(diff,1),rgb(0,255,0),linethick2;通达信四星级主图-凯恩斯的公式“线上阴线买，线下阳线卖A1:=DATE = 13181231;七天线:MA(C,7),COLORGRAY;工作线:(EMA(C,14) * A1,POINTDOT,LINETHICK4,COLORYELLOW;生命线:(MA(C,25) * A1,LINETHICK2,COLORMAGENTA;不惑线:(MA(C,40) * A1,COLORCYAN;姊妹线:(EMA(C,56) * A1,POINTDOT,COLORWHITE;A3:=EMA(SLOPE(C,21) * 20) + C),68);A4:=EMA(C,10);A5:=REF(C,2);A6:=(SMA(MAX(C - A5),0),6,1) / (SMA(ABS(C - A5),6,1) * 100;A7:=IF(A6 79),A6,0);A8:=LLV(L,21);A9:=HHV(H,21);A10:=EMA(CLOSE - A8) / (A9 - A8) * 100),5);A11:=EMA(CLOSE - A8) / (A9 - A8) * 50),13);A12:=EMA(0.667 * (REF(A10,1) + (0.333 * A10),2);A13:=LLV(L,55);A14:=HHV(H,34);A15:=EMA(C - A13) / (A14 - A13) * 100),3);A16:=(A11 + A15) / 2;A17:=EMA(0.667 * (REF(A15,1) + (0.333 * A10),2);A18:=EMA(A16,5);A19:=EMA(0.667 * (REF(A18,1) + (0.333 * A18),2);A20:=CROSS(A10,A11);A21:=(CROSS(A10,A19) AND (A19 = 工作线) AND (C = O),H,L,0,1),COLORRED;STICKLINE(C = 工作线) AND (C = O),O,C,2,1),COLORRED;STICKLINE(C = 工作线) AND (C = 工作线) AND (C = O),O,C,2,0),COLORRED;STICKLINE(C = O),H,L,0,1),COLORGREEN;STICKLINE(C = O),O,C,2,1),COLORGREEN;STICKLINE(C 工作线) AND (C = O),H,L,0,0),COLORGREEN;STICKLINE(C 工作线) AND (C OPEN),(VAR1 * (HIGH - LOW),IF(CLOSE OPEN),(0 - (VAR1 * (HIGH - CLOSE) + (OPEN - LOW),IF(CLOSE 0),VOL,0,4,1),colorFFFFFF;STICKLINE(买卖差 0),0,买卖差,4,0),color0000FF;STICKLINE(买卖差 JX1) AND (JX1 0),JX1,120);JY2:=IF(4 JX1) AND (JX1 0),JX1,3);VAR30:=MA(VOL,JY2);动神:=买盘;鬼力:=VAR20;神比:=(动神 / VAR30);鬼比:=(鬼力 / VAR30);VAR2:=(HIGH - LOW);VAR3:=ABS(OPEN - CLOSE);VAR4:=(HIGH - IF(CLOSE OPEN),CLOSE,OPEN);VAR5:=(IF(CLOSE OPEN),OPEN,CLOSE) - LOW);VAR6:=(VAR3 / VAR2) * VOL);VAR7:=(VAR4 / VAR2) * VOL);VAR8:=(VAR5 / VAR2) * VOL);VAR9:=IF(VOL / CAPITAL) 0.001),1,EXP(ABS(LOG(VOL / CAPITAL) * 100);VARA:=(CLOSE - MA(CLOSE,5) / MA(CLOSE,5) * 100);VARB:=(MA(CLOSE,5) MA(CLOSE,10) AND (MA(CLOSE,10) MA(CLOSE,30) AND (MA(CLOSE,30) MA(CLOSE,60);VARC:=(MA(CLOSE,5) MA(CLOSE,10) AND (MA(CLOSE,10) = VAR7) AND (VAR6 = VAR8) AND (CLOSE OPEN),VAR6,动神) + 动神) / 2);VAR41:=(IF(VAR7 VAR6) AND (VAR7 VAR8),VAR7,动神) + 动神) / 2);VAR42:=(IF(VAR8 VAR6) AND (VAR8 VAR7),VAR8,动神) + 动神) / 2);VAR50:=(IF(VAR6 = VAR7) AND (VAR6 = VAR8) AND (CLOSE MA(CLOSE,30),0,VOL,4,1),color0000FF;空头:STICKLINE(CLOSE 0),鬼力,0,4,0),colorFF3399;加仓:STICKLINE(VAR6 = VAR7) AND (VAR6 = VAR8) AND (CLOSE OPEN),0,VAR6,4,0),color00FFFF;减仓:STICKLINE(VAR6 = VAR7) AND (VAR6 = VAR8) AND (CLOSE VAR6) AND (VAR8 VAR7),0,VAR8,4,0),colorFFFFFF;高卖:STICKLINE(VAR7 VAR6) AND (VAR7 VAR8),0,VAR7,4,0),colorFF00FF;相对地量:=STICKLINE(VAR9 2) AND (VOL 0 AND XX2XX3,XX2,0),25);XX5:=SUM(IF(XX30 AND XX3XX2,XX3,0),25);XX6:=XX4*100/XX1;XX7:=XX5*100/XX1;XX8:=MA(ABS(XX7-XX6)/(XX7+XX6)*100,15);XX9:=(XX8+REF(XX8,15)/2;A:=(XX7XX6 AND XX725 AND XX625);B:ZIG(3,50/5)*100,COLORWHITE;G:MA(B,2),COLORYELLOW;D:=CROSS(B,G)*1000,COLORRED;W:=CROSS(G,B)*1000,COLORBLUE;E:=REF(INDEXC,1);F:=SMA(MAX(INDEXC-E,0),3,1)/SMA(ABS(INDEXC-E),3,1);XX10:=F AND F8;XX11:=(CLOSE-LLV(LOW,9)/(HHV(HIGH,9)-LLV(LOW,9)*100;XX12:=SMA(XX11,3,1);XX13:=SMA(XX12,3,1);XX14:=XX13 AND XX13=1.062 AND HIGH/CLOSE=1.150;Var33:=Var32 AND COUNT(Var32, 20)=1 ;Var34:=(INDEXC-REF(INDEXC, 1)/REF(INDEXC, 1);Var35:=(CLOSE-REF(CLOSE, 1)/REF(CLOSE, 1);Var36:=IF(Var340.010, 0.900, 1) AND IF(Var34(-0.025), 1, 1.200);Var37:=Var36*(Var35-Var34)*100;Var38:=SUM(Var37, 10);Var39:=SMA(Var38, 40, 1);Var310:=Var3820;Var311:=CROSS(CLOSE, MA(CLOSE*1.055, 3) AND CLOSEOPEN*1.060 AND VOL=REF(VOL, 1)*1.5 AND CLOSE=MA(CLOSE, 10);Var312:=Var310 AND Var311 ;Var313:=(-100)*(HHV(HIGH, 3)-CLOSE)/(HHV(HIGH, 3)-LLV(LOW, 3);Var314:= CROSS(Var313, (-87) AND OPEN=1.090*REF(CLOSE, 1) AND INDEXC0.980*REF(INDEXC, 1) AND CLOSEREF(Var316, 1), 1, (-1), 14)*14;Var322:=EMA(IF(Var320REF(Var320, 1), 1, (-1), 14)*14*2;Var323:=(MA(CLOSE, 5)/MA(CLOSE, 70)-1)*100;Var324:=(Var323+Var322+Var321)/3;Var325:=MA(CLOSE, 80)-MA(CLOSE, 10)/3;Var326:=IF(CLOSE and MA(VOL, 5)/240 AND CLOSEREF(CLOSE, 1)*1.0 AND CLOSE,88,0);Var38Var39;Var327:=IF(CLOSE/REF(CLOSE, 1)1.050 AND VOL/CAPITAL*10010 AND CLOSE17 AND HIGH/CLOSE0, 91, 0);Var328:=IF(Var324REF(Var324, 1) AND REF(Var324, 1)0 OR Var3270, 85, 0);Var329:=IF(Var3270 ,95,0), STICK,LINETHICK2;Var330:=IF(Var3260 or var3270,91,0), STICK,LINETHICK2;Var331:=IF(Var3280 or var3270 or var3260,88,0), STICK,LINETHICK2;Var332:=100*(CLOSE-LLV(LOW,42)/(HHV(HIGH,42)-LLV(LOW,42),LINETHICK1,colorgreen;Var333:=COUNT(MA(CLOSE,3)REF(MA(CLOSE,3),1),1)=1; Var334:=(Var33290,LOW*0.99,LOW*0.95,2,0),COLORYELLOW;DRAWTEXT(Var32790,LOW*0.95,杀庄),COLORYELLOW;DRAWICON(Var3100 AND Var327=0,HIGH*1.01,5);公式四（散户操盘手-主图）（使用中） DRAWGBKLAST(CLOSE0,STRIP(RGB(95,95,95),RGB(0,0,0),0)VAR1:=AMOUNT/VOL/100;指导: EMA(EMA(CLOSE,4)+EMA(CLOSE,6)+EMA(CLOSE,12)+EMA(CLOSE,24)/4,2),LINETHICK2,COLORWHITE; 界: MA(CLOSE,27),LINETHICK2,COLORYELLOW;STICKLINE(指导界,指导,界,4,0),COLOR000082;STICKLINE(指导OPEN,H,LOW,0,0 ),COLOR9933FF; STICKLINE(OPEN=CLOSE,L,HIGH,0,0 ),COLOR66CC33;STICKLINE(OPEN=CLOSE ,CLOSE ,OPEN,8,0),COLOR009900; STICKLINE(OPEN=CLOSE ,CLOSE ,OPEN,3,0),COLOR00CC00;STICKLINE(OPEN=CLOSE ,CLOSE ,OPEN,1.5,0),COLOR33FF00;STICKLINE(OPEN=CLOSE ,CLOSE ,OPEN,1,0),COLOR66FF00;STICKLINE(CLOSEOPEN,CLOSE,OPEN,8,0),COLOR000099;STICKLINE(CLOSEOPEN,CLOSE,OPEN,3,0 ),COLOR0000CC; STICKLINE(CLOSEOPEN,CLOSE,OPEN,1.5,0 ),COLOR0000FF; STICKLINE(CLOSEOPEN,CLOSE,OPEN,1,0 ),COLOR0033FF;AA:=CLOSE/REF(CLOSE,1)=1.09;STICKLINE(AA,OPEN,CLOSE,3,0),COLORYELLOW; STICKLINE(AA,LOW,HIGH,0.5 ,0 ),COLORYELLOW;MA1:=MA(CLOSE,8); MA2:=MA(CLOSE,13);MA3:=MA(CLOSE,21);FFF:=(LOW=MA1 AND LOW=MA2 AND LOW=MA1 AND CLOSE=MA2 AND CLOSE=MA3 AND CLOSEREF(CLOSE,1);STICKLINE(FFF,CLOSE,OPEN,3,0),COLORFF00FF;STICKLINE(FFF,H,L,0,0 ),COLORFF00FF;用法1.绿线为底,在绿线附近的金叉(白线叉黄线)为底部转强信号- 为第一买点.2.金叉发出后般会有一个技术性回调确认-为第二买点.3.金叉发出位置离绿线越近可靠性越高,发在红线(顶线)小心回 调风险.4.白线是操盘线不破不买.5.股价上升至红线(顶线)小心回调,但不破白线可持股,牛股多在这产生.6.股价远离白线有回调要求,结合其他指标逃顶.公式五（成交量-副图）VAR1:=VOL/(HIGH-LOW)*2-ABS(CLOSE-OPEN);成交:VOL,POINTDOT;主动买盘:IF(CLOSEOPEN,VAR1*(HIGH-LOW),IF(CLOSEOPEN,0-VAR1*(HIGH-CLOSE)+(OPEN-LOW),IF(CLOSE0,VOL,0,2,1),COLORWHITE;STICKLINE(主动买盘0,0,主动买盘,2,0),COLORRED;STICKLINE(主动卖盘0,0,主动卖盘,2,0),COLOR00FF00;公式六（中短线-副图）中短线买入点、卖出点判断的精度极高！VAR3:=(CLOSE-MA(CLOSE,6)/MA(CLOSE,6)*100;VAR4:=(CLOSE-MA(CLOSE,24)/MA(CLOSE,24)*100;VAR5:=(CLOSE-MA(CLOSE,32)/MA(CLOSE,32)*100;VAR6:=(VAR3+VAR4+VAR5)/3;VAR7:=EMA(VAR6,5);指标: EMA(EMA(VAR3,5),5)*3, COLORSTICK;VAR8:=IF(VAR6REF(Z