通达信实战源码分享:集趋势、支撑压力与“擒牛”信号于一体的主图战法

通达信指标图片分享：

1️⃣通达信主图指标源码分享：

TGB1:HHV(HIGH,20);
TGB2:LLV(LOW,20);
铁底:LLV(LOW,60)*1.02,DOTLINE,LINETHICK1,COLORLIGREEN;
顶部:HHV(HIGH,60)*0.98,DOTLINE,LINETHICK1,COLORWHITE;
TGB5:=EMA(C,1),NODRAW;
TGB6:=AMOUNT/V/100;
TGB7:=IF(C< 300,TGB6,TGB5),NODRAW;
TGB8:LLV(TGB7,2)COLORGREEN,NODRAW;
TGB9:=CONST(LLV(TGB7,2));
TGB10:=CONST(LLV(TGB7,4));
TGB11:=(C+H+O+L)/4;
TGB12:=MA(TGB11,20)*(1+80/1000),POINTDOT,COLORGREEN,LINETHICK8;
TGB13:=MA(TGB11,32)*(1-100/1000),POINTDOT,COLORMAGENTA,LINETHICK8;
TGB14:DRAWBAND(SMA(C,6.5,1),RGB(255,97,0),SMA(C,13.5,1),RGB(0,128,0));
TGB15:=MA(C,5),COLOR000099;
TGB16:=MA(C,10),COLOR006600;
TGB17:=MA(C,20),COLOR005555;
TGB18:=EMA(C,34);
TGB19:EMA(TGB18,13),COLORRED,LINETHICK3;
TGB20:=(C-MA(CLOSE,13))*100;
TGB21:=EMA(MA(TGB20,7),1),COLORWHITE;
TGB22:=EMA(TGB21,7),COLORYELLOW;
TGB23:=(TGB21-TGB22)*2,COLORSTICK;
TGB24:IF((CROSS(TGB21,TGB22) AND TGB21< -0.1) ,L*0.98,DRAWNULL),COLORMAGENTA,LINETHICK9,CROSSDOT;
TGB39:=EMA(CLOSE,3);
TGB40:=EMA(CLOSE,21);
TGB41:=CROSS(TGB39,TGB40);
TGB42:=EMA(C,3),COLORBLUE,LINETHICK3;
TGB43:=EMA(C,5),COLORWHITE,LINETHICK1;
TGB44:=EMA(TGB43,5),COLOR00FF00,LINETHICK1;
TGB45:=C< TGB43;
TGB46:=TGB42>REF(TGB42,1) AND REF(TGB42,1)< REF(TGB42,2) ;
TGB47:=ABS((2*CLOSE+HIGH+LOW)/4-MA(CLOSE,20))/MA(CLOSE,20);
TGB48:=(1-7/100)*(DMA(CLOSE,TGB47));
TGB49:=(1+7/100)*(DMA(CLOSE,TGB47));
TGB50:=MA((LOW+HIGH+CLOSE)/3,5);
TGB51:=MEMA(CLOSE,5);
TGB52:=ATAN((TGB51/REF(TGB51,1)-1)*100)*180/3.1416;
TGB53:=IF(TGB52>0,TGB52,TGB52);
TGB54:=MA(CLOSE,5),COLOR888899;
TGB55:=MA(CLOSE,13),COLORFF00F0,LINETHICK2;
TGB56:=CLOSE=HHV(C,4) AND (REF(C,1)>=REF(C,2) OR REF(C,1)>=REF(C,3)) OR REF(C,1)=HHV(C,4) AND CLOSE>=REF(C,2) OR REF(C,2)=HHV(C,4) AND REF(C,3)=LLV(C,4) AND C>=REF(C,1) OR REF(C,3)=HHV(C,4) AND C>=REF(C,1) AND C>=REF(C,2);
TGB57:=CLOSE=HHV(C,4) AND REF(C,1)=LLV(C,4);
TGB58:=CLOSE=LLV(C,4) AND (REF(C,1)< REF(C,2) OR REF(C,1)< REF(C,3)) OR REF(C,1)=LLV(C,4) AND C< REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)=HHV(C,4) AND C< REF(C,1) OR REF(C,3)=LLV(C,4) AND C< REF(C,1) AND C< REF(C,2);
TGB59:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)<=REF(C,3) AND REF(C,2)< REF(C,4) AND C>=REF(C,1);
TGB60:=REF(C,1)=HHV(C,4) AND C< REF(C,2) OR (REF(C,2)=HHV(C,4) AND REF(C,1)>REF(C,3) OR REF(C,3)=HHV(C,4) AND REF(C,1)>REF(C,2)) AND REF(C,2)>=REF(C,4) AND C< REF(C,1);
TGB61:=TGB50>REF(TGB50,1) AND REF(TGB50,1)< REF(TGB50,2);
TGB62:=LOW< HHV(TGB50,13) AND HIGH>HHV(TGB50,13) AND CLOSE>REF(C,1) AND CLOSE>OPEN;
TGB63:=TGB62 AND COUNT(TGB61,2);
TGB64:=100*EMA(EMA(C-REF(C,1),6),6)/EMA(EMA(ABS(C-REF(C,1)),6),6);
TGB65:=EMA(MA(C,13),13);
TGB66:=FILTER((LLV(TGB64,2)=LLV(TGB64,7) AND COUNT(TGB64< 0,2) AND CROSS(TGB64,MA(TGB64,2)))=1,5);
TGB67:=FILTER((HHV(TGB64,2)=HHV(TGB64,7) AND COUNT(TGB64>50,2) AND CROSS(MA(TGB64,2),TGB64))=1,1);
TGB68:=SMA(EMA((C-REF(C,1))/REF(C,1),5)*100,3,1)*10;
TGB69:=FILTER(((CROSS(TGB68,0) OR CROSS(C,TGB65)) AND TGB66)=1,3);
TGB70:=MA(C,18)>=REF(MA(C,18),3) AND CROSS(C,MA(C,18));
TGB71:=TGB63 AND NOT(REF(TGB63,1));
TGB72:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100;
TGB73:=SMA(TGB72,3,1);
TGB74:=SMA(TGB73,3,1);
TGB75:=3*TGB73-2*TGB74;
TGB76:=CROSS(TGB75,TGB74);
TGB77:=CROSS(TGB74,TGB75);
TGB78:=(TGB69 OR TGB70) AND TGB66;
TGB79:=(TGB69 OR TGB70) AND TGB59;
TGB80:=(TGB69 OR TGB70) AND TGB57;
TGB81:=(TGB57 AND TGB66) OR (TGB59 AND TGB66);
TGB82:=(TGB76 AND TGB59) OR (TGB76 AND TGB57) OR (TGB76 AND TGB66);
TGB83:=TGB71;
TGB84:=TGB78 OR TGB79 OR TGB80 OR TGB81 OR TGB82 AND TGB46;
TGB85:=TGB41 AND TGB83;
TGB86:=TGB41 AND TGB84;
TGB87:=TGB85 OR TGB86;
TGB117:=MA(C,5);
TGB118:=MA(C,10);
TGB119:=MA(C,21);
TGB120:=REF(TGB117,1)< REF(TGB118,1)AND TGB118>REF(TGB118,1);
TGB121:=C>MA(C,10) OR H>=TGB118;
TGB122:=C>O AND REF(C,1)< MA(C,10) AND TGB121 AND TGB120 AND MA(C,21)< MA(C,10);
TGB123:=TGB122 AND (CROSS(C,TGB19) OR CROSS(L,TGB19) OR CROSS(H,TGB19));
DRAWTEXT(TGB123,LOW*0.98,'●'),COLORGREEN;
TGB124:=((CLOSE > REF(CLOSE,1)) AND (CLOSE > REF(CLOSE,2)));
TGB125:=((REF(TGB124,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
TGB126:=((REF(TGB125,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
TGB127:=((REF(TGB126,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
TGB128:=((REF(TGB127,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
TGB129:=((REF(TGB128,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
TGB130:=((REF(TGB129,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
TGB131:=((REF(TGB130,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
TGB132:=((REF(TGB131,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
TGB133:=((REF(TGB132,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
TGB134:=((REF(TGB133,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
TGB135:=((REF(TGB134,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
STICKLINE((((((((((((TGB124 OR TGB125) OR TGB126) OR TGB127) OR TGB128) OR TGB129) OR TGB130) OR TGB131) OR TGB132) OR TGB133) OR TGB134) OR TGB135),C,O,3,0),COLOR000099;
STICKLINE((((((((((((TGB124 OR TGB125) OR TGB126) OR TGB127) OR TGB128) OR TGB129) OR TGB130) OR TGB131) OR TGB132) OR TGB133) OR TGB134) OR TGB135),C,O,2,0),COLOR0000BB;
STICKLINE((((((((((((TGB124 OR TGB125) OR TGB126) OR TGB127) OR TGB128) OR TGB129) OR TGB130) OR TGB131) OR TGB132) OR TGB133) OR TGB134) OR TGB135),C,O,1,0),COLOR0000DD;
TGB136:=((CLOSE < REF(CLOSE,1)) AND (CLOSE < REF(CLOSE,2)));
TGB137:=((REF(TGB136,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
TGB138:=((REF(TGB137,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
TGB139:=((REF(TGB138,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
TGB140:=((REF(TGB139,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
TGB141:=((REF(TGB140,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
TGB142:=((REF(TGB141,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
TGB143:=((REF(TGB142,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
TGB144:=((REF(TGB143,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
TGB145:=((REF(TGB144,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
TGB146:=((REF(TGB145,1) AND (CLOSE <= REF(CLOSE,1))) AND (CLOSE >= REF(CLOSE,2)));
TGB147:=((REF(TGB146,1) AND (CLOSE >= REF(CLOSE,1))) AND (CLOSE <= REF(CLOSE,2)));
STICKLINE((((((((((((TGB136 OR TGB137) OR TGB138) OR TGB139) OR TGB140) OR TGB141) OR TGB142) OR TGB143) OR TGB144) OR TGB145) OR TGB146) OR TGB147),C,O,3 ,0 ),COLOR00BB00;
STICKLINE((((((((((((TGB136 OR TGB137) OR TGB138) OR TGB139) OR TGB140) OR TGB141) OR TGB142) OR TGB143) OR TGB144) OR TGB145) OR TGB146) OR TGB147),C,O,2 ,0 ),COLOR00DD00;
STICKLINE((((((((((((TGB136 OR TGB137) OR TGB138) OR TGB139) OR TGB140) OR TGB141) OR TGB142) OR TGB143) OR TGB144) OR TGB145) OR TGB146) OR TGB147),C,O,1,0 ),COLOR00FF00;
TGB148:=(REF((((((((((((TGB136 OR TGB137) OR TGB138) OR TGB139) OR TGB140) OR TGB141) OR TGB142) OR TGB143) OR TGB144) OR TGB145) OR TGB146) OR TGB147),1) AND TGB124);
TGB149:=(REF((((((((((((TGB124 OR TGB125) OR TGB126) OR TGB127) OR TGB128) OR TGB129) OR TGB130) OR TGB131) OR TGB132) OR TGB133) OR TGB134) OR TGB135),1) AND TGB136);
TGB150:=MAX(REF(CLOSE,2),REF(CLOSE,1));
STICKLINE(TGB148,TGB150,O,3 ,0 ),COLORBB11BB;
STICKLINE(TGB148,TGB150,O,2 ,0 ),COLORDD44DD;
STICKLINE(TGB148,TGB150,O,1 ,0 ),COLORFF66FF;
TGB151:=MIN(REF(CLOSE,2),REF(CLOSE,1));
STICKLINE(TGB149,TGB151,O,3,0),COLOR00AAFF;
STICKLINE(TGB149,TGB151,O,2,0),COLOR00CCFF;
STICKLINE(TGB149,TGB151,O,1,0),COLOR00EEFF;
TGB152:=CROSS(EMA(C,5),EMA(C,30))AND CROSS(EMA(C,10),EMA(C,20));
DRAWICON(TGB152,L*0.99,13);
TGB153:=SAR(10,2,20);
TGB154:=IF(TGB153<=L,TGB153,0),CIRCLEDOT,COLORRED;
TGB155:=EMA(SLOPE(C,21)*20+C,42),POINTDOT,LINETHICK1,COLORYELLOW;
STICKLINE(1,TGB155,TGB155,1,0),COLORYELLOW;
TGB156:=EMA(C,5),COLORYELLOW,LINETHICK1;
TGB157:=MA(H,20);
TGB158:=IF(TGB156>=REF(TGB156,1),TGB156,DRAWNULL),LINETHICK2,COLORRED;
DRAWICON(CROSS(L,TGB153) AND TGB158>0 AND H< TGB157 AND TGB154>0 AND H>TGB19,(LOW*0.99),5);
TGB159:=((((OPEN + LOW) + HIGH) + CLOSE) / 4);
TGB160:=EMA(TGB159,5);
TGB161:=HHV(TGB160,60);
TGB162:=(SMA(HIGH,21,2) * 1.05);
TGB163:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);
TGB164:=(((((3 * CLOSE) + HIGH) + LOW) + OPEN) / 6);
TGB165:=EMA(TGB164,10);
TGB166:=SMA(TGB163,3,1);
TGB167:=SMA(TGB166,3,1);
TGB168:=((3 * TGB166) - (2 * TGB167));
TGB169:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);
TGB170:=SMA(TGB169,3,1);
TGB171:=SMA(TGB170,3,1);
TGB172:=((3 * TGB170) - (2 * TGB171));
TGB173:=IF(CROSS(TGB172,TGB168),HIGH,REF(HIGH,BARSLAST(CROSS(TGB172,TGB168)))),COLORFFFFFF;
TGB174:=CROSS(CLOSE,TGB17) AND HIGH < TGB173 AND OPEN < TGB17 AND HIGH < TGB161 AND TGB162 - REF(TGB162,1) > 0 AND TGB165 - REF(TGB165,1)>0 AND TGB168 < 63 AND TGB17 - REF(TGB17,1) > 0,COLORWHITE;
DRAWTEXT(TGB174,L,'牛'),COLORWHITE;
TGB175:=C>TGB12 OR (H>TGB12 AND O>C);
STICKLINE(ISLASTBAR,TGB9,TGB9,120,0),LINETHICK2,COLORGREEN;
DRAWTEXT(CURRBARSCOUNT=15,TGB9*1,'关键价位'),COLORGREEN;
DRAWNUMBER(ISLASTBAR,TGB9*1.02,TGB9+000),COLORGREEN;
STICKLINE(ISLASTBAR,TGB10,TGB10,120,0),LINETHICK2,COLORYELLOW;
DRAWTEXT(CURRBARSCOUNT=15,TGB10*1,'支撑价位'),COLORYELLOW;
TGB176:=(HIGH+LOW+CLOSE)/3;
TGB177:=(TGB176-MA(TGB176,14))/(0.015*AVEDEV(TGB176,14));
TGB178:=EMA(EMA(EMA(TGB177,2),2),2);
TGB179:=EMA(EMA(EMA(TGB177,3),2),2);
DRAWTEXT_FIX(C>O,0,0.47,0,'公众号：高冷的酒窝'),COLORMAGENTA;
TGB180:=(CROSS(TGB178,TGB179) OR (TGB178>=TGB179)) AND TGB178>=-101 AND TGB178>=REF(TGB178,1) AND REF(TGB178,1)< -101 ;
TGB181:=EMA(EMA(EMA(SMA((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100,3,1),2),2),2);
TGB182:=EMA(EMA(EMA(SMA(SMA((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100,3,1),3,1),2),2),2);
TGB183:=EMA(EMA(EMA(3*SMA((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100,3,1)-2*SMA(SMA((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100,3,1),3,1),2),2),2);
TGB184:=TGB183>REF(TGB183,1) ;
TGB185:=TGB180 AND TGB184 ;
TGB186:=EMA(C,3);
TGB187:=TGB186>REF(TGB186,1) AND REF(TGB186,1)< REF(TGB186,2) ;
TGB188:=CLOSE=LLV(C,4) AND (REF(C,1)< REF(C,2) OR REF(C,1)< REF(C,3)) OR REF(C,1)=LLV(C,4) AND C< REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)=HHV(C,4) AND C< REF(C,1) OR REF(C,3)=LLV(C,4) AND C< REF(C,1) AND C< REF(C,2);
TGB189:=REF(C,1)=LLV(C,4) AND C>=REF(C,2) OR REF(C,2)=LLV(C,4) AND REF(C,1)<=REF(C,3) AND REF(C,2)< REF(C,4) AND C>=REF(C,1);
TGB190:=(SMA(ABS(LOW-REF(LOW,1)),13,1))/(SMA(MAX(LOW-REF(LOW,1),0),13,1))*100;
TGB191:=MA(TGB190,13);
TGB192:=LLV(LOW,34);
TGB193:=EMA(IF(LOW<=TGB192,TGB191,0),3);
TGB194:=SMA(SMA((CLOSE-LLV(LOW,54))/(HHV(HIGH,54)-LLV(LOW,54))*100,7,1),5,1);
TGB195:=SMA((CLOSE-LLV(LOW,54))/(HHV(HIGH,54)-LLV(LOW,54))*100,7,1)*16.18-TGB194*10.9;
DRAWTEXT(ISLASTBAR,铁底,'铁底'),COLORLIGREEN;
TGB196:=REF(CLOSE,1);
TGB197:=SMA((CLOSE-TGB196),6,1)/SMA(ABS(CLOSE-TGB196),6,1)*100;
DRAWICON(REF(TGB197,1)>81 AND TGB197< 80,HIGH,2);
DRAWTEXT(ISLASTBAR,顶部,' 顶部'),COLORWHITE;
TGB198:=SMA(MAX(CLOSE-REF(C,1),0),6,1)/SMA(ABS(CLOSE-REF(C,1)),6,1)*100;
DRAWICON(CROSS(82,TGB198),HIGH,27);
DRAWTEXT(CROSS(82,TGB198),顶部,'预警S'),COLORGREEN;
DRAWICON(TGB185,(LOW * 0.98),25);
DRAWTEXT(TGB185,(LOW * 0.98),'预警B'),COLORYELLOW;

2️⃣通达信副图指标源码分享：

{变量前缀已替换为DKB，并修复了原GRFT14条件判断}
DKB1:=CLOSE;
DKB2:=(DKB1*3+H+L+O)/6;
DKB3:=EMA(DKB2,13)-EMA(DKB2,21);
DKB4:=EMA(DKB3,3);
DKB5:=EMA(DKB3,10);
DKB6:=EMA(DKB1,7)-EMA(DKB1,21);
DKB7:=EMA((0.668*REF(DKB6,1)+0.333*DKB6),1);
DKB8:=V/SUM(V,13);
DKB9:=DMA(DKB1,DKB8);
DKB10:=(DKB1-DKB9)/DKB9*40;
DKB11:=MA(AMOUNT/(100*V),13);
DKB12:=(DKB1-DKB11)/DKB11*100;
DKB13:=IF(DKB6>=DKB7,DKB6,DKB7);
DKB14:=IF(DKB7-DKB6>0,DKB7,DKB6); {原代码此处缺少比较条件，已补全>0}
DKB15:=DKB12>5;

{主图输出}
做多线:IF(DKB6>=DKB7,DKB6,DKB7),LINETHICK2,COLOR0000FF;
主力强度:STICKLINE(DKB10>0 AND 做多线>0,做多线+0.1,做多线,1,0),COLORFF80FF;
STICKLINE(DKB12>5,0,-DKB14,2,0),COLORFFFF00;
DRAWICON(FILTER(BARSLASTCOUNT(DKB15)=1,10),1,34);
擒牛:FILTER(BARSLASTCOUNT(DKB15)=1,10),COLOR00FFFF;