当前位置：分析家公式网 → 股票公式 → 通达信公式 → 一键转帖：【萧啸捉妖抓牛】主副图 无未来 适用电脑手机通达信
软件名称：[B]【萧啸捉妖抓牛】主副图 无未来 适用电脑手机通达信[/B]
软件类型：国产软件
运行环境：Win10/Win9X/Win8/Win2000/WinXP/Win2003/Win7/
软件语言：简体中文
授权方式：分享版
软件大小：15.0 KB
官方主页：Home Page
更新时间：2024-06-02 00:15:17
软件简介:
【萧啸捉妖抓牛】主副图 无未来 适用电脑手机通达信
欢迎投稿
本指标牵涉筹码分析，用到函数COST和WINNER，有人认为是未来函数 不喜勿下。
主图源码：
X1:=EMA(CLOSE,7);
X2:=EMA(CLOSE,18);
X3:=(X1-X2)/X2*100;
X4:=EMA(X3,1);
X5:=EMA(CLOSE,3);
X6:=EMA(CLOSE,26);
X7:=X5-X6;
DK:=EMA(EMA(EMA(CLOSE,3),3),3)+X7,COLORGREEN;
主力攻击线:(MA(CLOSE,3)+MA(CLOSE,6)+MA(CLOSE,9))/3,COLORWHITE;
主力控盘线:(MA(CLOSE,5)+MA(CLOSE,10)+MA(CLOSE,15)+MA(CLOSE,20)+MA(CLOSE,25)+MA(CLOSE,30))/6,COLORYELLOW,LINETHICK2;
X8:=HHV(VOL,5);
X9:=OPEN>CLOSE;
X10:=CLOSE>OPEN;
X11:=CLOSE=OPEN;
X12:=SUM(VOL,5)/X8;
X13:=IF(X12>0.3,1,0);
X14:=IF(X9 AND X13,VOL,0);
X15:=IF(X10 AND X13,VOL,0);
X16:=IF(X11 AND X13,VOL,0);
X17:=SUM(X15,3);
X18:=SUM(X14,3);
X19:=X17-X18;
STICKLINE(X19=X17,CLOSE,OPEN,3.05,0),COLOR000099;
STICKLINE(X19=X17,CLOSE,OPEN,2.2,0),COLOR0000CC;
STICKLINE(X19=X17,CLOSE,OPEN,1.5,0),COLORRED;
STICKLINE(X19=X17,CLOSE,OPEN,0.5,0),COLORYELLOW;
DRAWICON(X19=X17 AND REF(X19=X17,1)=0,LOW*0.98,30),COLORMAGENTA;
X20:=EMA(100*(CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)),3);
X21:=(REF(X20,1)+REF(X20,2)+REF(X20,3))/3;
X22:=(REF(X20,1)+REF(X20,2)+REF(X20,3)+REF(X20,4)+REF(X20,5)+REF(X20,6)+REF(X20,7)+REF(X20,8)+REF(X20,9)+REF(X20,10))/10;
X23:=X20< 80 AND X21< 80 AND X22< 80;
X24:=X20>80 AND X21>80 AND X22>80;
X25:=X22< X20;
X26:=REF(CLOSE,1);
X27:=SMA(MAX(CLOSE-X26,0),2,1)/SMA(ABS(CLOSE-X26),2,1)*100;
X28:=100*(HHV(HIGH,10)-CLOSE)/(HHV(HIGH,10)-LLV(LOW,10));
X29:=100*(HHV(HIGH,6)-CLOSE)/(HHV(HIGH,6)-LLV(LOW,6));
X30:=CROSS(X27,X29) AND X25;
X31:=X27>75 AND X29< 5;
DRAWICON(X31 AND X17>X19,LOW*0.99,29),COLORYELLOW;
DRAWICON(X30,LOW*0.98,28),COLORYELLOW;
X32:=WINNER(CLOSE*0.9)*100;
X33:=MA(X32,10);
X34:=MA(X32,3);
X35:=IF(X33>X34,X34,X33);
X36:=(CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*50;
X37:=EMA(CLOSE,12)-EMA(CLOSE,26);
X38:=EMA(X37,9);
X39:=X37>X38;
X40:=(CLOSE-LLV(LOW,12))/(HHV(HIGH,12)-LLV(LOW,12))*100;
X41:=SMA(X36,3,1);
X42:=SMA(X41,3,1);
X43:=X41>X42;
X44:=REF(CLOSE,1);
X45:=SMA(MAX(CLOSE-X44,0),9,1)/SMA(ABS(CLOSE-X44),9,1)*100;
X46:=SMA(MAX(CLOSE-X44,0),26,1)/SMA(ABS(CLOSE-X44),26,1)*100;
X47:=X45>X46;
X48:=SMA(X40,3,1);
X49:=SMA(X48,3,1);
X50:=X48>X49;
X51:=(MA(CLOSE,3)+MA(CLOSE,9)+MA(CLOSE,12)+MA(CLOSE,26))/4;
X52:=CLOSE>X51;
X53:=CLOSE-REF(CLOSE,1);
X54:=100*EMA(EMA(X53,9),9)/EMA(EMA(ABS(X53),9),3);
X55:=100*EMA(EMA(X53,26),12)/EMA(EMA(ABS(X53),26),12);
X56:=X54>X55;
X57:=X39 AND X43 AND X47 AND X50 AND X52 AND X56;
X58:=EMA(EMA(CLOSE,9),9);
X59:=100*WINNER(CLOSE*0.95);
X60:=EMA(CLOSE,12)>EMA(CLOSE,50) AND EMA(CLOSE,20)>EMA(CLOSE,120);
X61:=(X58-REF(X58,1))/REF(X58,1)*1000;
X62:=X59>=50 AND COST(85)<=CLOSE AND X61>0 AND X61>REF(X61,1);
X63:=DMA((HIGH+LOW+CLOSE*2)/4,0.9);
X64:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
X65:=IF(CLOSE>OPEN,X64*(HIGH-LOW),IF(CLOSE< OPEN,X64*(HIGH-OPEN+CLOSE-LOW),VOL/2))+IF(CLOSE>OPEN,0-X64*(HIGH-CLOSE+OPEN-LOW),IF(CLOSE< OPEN,0-X64*(HIGH-LOW),0-VOL/2));
X66:=X65/20/1.15;
X67:=X66*0.55+REF(X66,1)*0.33+REF(X66,2)*0.22;
X68:=EMA(X67,8);
X69:=EMA(X67,3);
X70:=X69;
X71:=MA(VOL,5);
X72:=MA(VOL,10);
X73:=X71>=X72;
X74:=X70>=0;
X75:=X74 AND X73;
X76:=X57 OR X75;
X77:=CROSS(REF(CLOSE,1),CLOSE);
X78:=WINNER(CLOSE)*100;
X79:=REF(X78,1)-X78<=5;
X80:=CROSS(X78,REF(X78,1)) AND X78< 20;
X81:=X79 OR X78;
X82:=X77 AND X81;
X83:=(2*CLOSE+HIGH+LOW)/4;
X84:=LLV(LOW,5);
X85:=HHV(HIGH,5);
X86:=IF((MA(CLOSE,5)-CLOSE)/CLOSE>0.04 AND (MA(CLOSE,10)-MA(CLOSE,5))/MA(CLOSE,5)>0.04,23,0);
X87:=X86=23;
X88:=BARSLAST(X87)=1;
X89:=X86< 23;
X90:=X88 AND X89;
X91:=(BARSLASTCOUNT(X86>0)=4)*30;
X92:=X90 OR X91;
X93:=EMA(VOL,13);
X94:=EMA(AMOUNT,13);
X95:=X94/X93/100;
X96:=(CLOSE-X95)/X95*100;
X97:=X96< 0-18 OR X96< 0-6;
X98:=X97 AND X92;
X99:=X98 OR X82;
STICKLINE(X99 AND X22< 80 AND X35=X33 AND X76,LOW,OPEN,3,0),COLORBLUE;
STICKLINE(X99 AND X22< 80 AND X35=X33 AND X76,CLOSE,OPEN,3,0),COLORMAGENTA;
X100:=REF(LOW,1);
X101:=SMA(ABS(LOW-X100),3,1)/SMA(MAX(LOW-X100,0),3,1)*100;
X102:=EMA(IF(CLOSE*1.3,X101*10,X101/10),3);
X103:=LLV(LOW,13);
X104:=HHV(X102,13);
X105:=IF(MA(CLOSE,34),1,0);
X106:=EMA(IF(LOW<=X103,(X102+X104*2)/2,0),3)/618*X105;
X107:=IF(X106>100,100,X106);
X108:=X107>15 AND X76;
X109:=X108 OR X107=100;
STICKLINE(X109,LOW,OPEN,3,0),COLORMAGENTA;
STICKLINE(X109,CLOSE,OPEN,3,0),COLORBLUE;
X110:=EMA(CLOSE,2);
X111:=EMA(SLOPE(CLOSE,21)*20+CLOSE,42);
X112:=IF(CROSS(X110,X111),LOW-0.02,DRAWNULL);
X113:=(LOW+HIGH+CLOSE*2)/4;
X114:=EMA(X113,14);
X115:=(X114-REF(X114,1))/REF(X114,1)*100;
X116:=IF(X115>=0,X114,DRAWNULL);
X117:=IF(CROSS(X112,0),5,0);
X118:=IF(CROSS(X116,0),10,0);
X119:=X117 AND X118;
DRAWICON(X119,LOW*0.99,1),COLORGREEN;
DRAWICON(X119,LOW*0.98,1),COLORGREEN;
X120:=REF(CLOSE,1);
X121:=SMA(MAX(CLOSE-X120,0),5,1)/SMA(ABS(CLOSE-X120),5,1)*100;
X122:=CROSS(80,X121);
DRAWICON(X122,HIGH*1.01,2),COLORGREEN;
DRAWICON(X122,HIGH*1.02,2),COLORGREEN;
X123:=SMA(MAX(CLOSE-X26,0),3,1)/SMA(ABS(CLOSE-X26),3,1)*100;
X124:=EMA(CLOSE,3);
X125:=EMA(CLOSE,21);
DRAWICON(CROSS(X124,X125),LOW*0.97,38),COLORRED;
DRAWICON(CROSS(88,X123),HIGH*1.03,39),COLORYELLOW;
X126:=8;
X127:=100*EMA(EMA(X53,X126),X126)/EMA(EMA(ABS(X53),X126),X126);
X128:=IF(LLV(X127,2)=LLV(X127,7) AND COUNT(X127< 0,2) AND CROSS(X127,MA(X127,2)),1,0);
DRAWICON(FILTER(X128=1,5),LOW*0.99,7),COLORRED;
X129:=CLOSE-REF(CLOSE,1);
X130:=IF(CLOSE-REF(CLOSE,1)>=0,X129,0);
X131:=REF(CLOSE,1)-CLOSE;
X132:=IF(CLOSE-REF(CLOSE,1)<=0,X131,0);
X133:=SUM(X130,90)/SUM(X132,90);
X134:=100-100/(1+X133);
X135:=EMA(X134,21);
X136:=EMA(X135,5);
X137:=EMA(X135,3);
X138:=(CLOSE*2+HIGH+LOW)/4;
X139:=EMA(X138,13)-EMA(X138,21);
X140:=EMA(X139,3);
X141:=EMA(X139,10);
X142:=IF(X140>=X141,X140,X141);
X143:=IF(X141-X140,X141,X140);
X144:=EMA(CLOSE,7)-EMA(CLOSE,21);
X145:=EMA(0.668*REF(X144,1)+0.333*X144,1);
X146:=IF(X144>=X145,X144,X145);
X147:=IF(X145-X144,X145,X144);
X148:=X142>X143;
X149:=X142=X143;
X150:=X146>X147;
X151:=X146=X147;
X152:=X151 AND X149;
X153:=X150 AND X148;
STICKLINE(X150,HIGH,LOW,0,0),COLORRED;
STICKLINE(X151,HIGH,LOW,0,0),COLORGREEN;
STICKLINE(X148,OPEN,CLOSE,1,0),COLORRED;
STICKLINE(X149,OPEN,CLOSE,1,0),COLORGREEN;
STICKLINE(X153,OPEN,CLOSE,2,0),COLORRED;
STICKLINE(X152,OPEN,CLOSE,2,0),COLORBLUE;
X154:=HHV(MA(HIGH,3),2);
UP:=LLV(MA(HIGH,3),1),COLORRED;
DOWN:=IF(X154-UP>0,UP,DRAWNULL),COLORGREEN;
X155:=MA(REF(HHV((CLOSE+LOW+OPEN+HIGH)/4,30),1),3);
STICKLINE(REF(COUNT(CLOSE< X155,5)=5,1) AND CLOSE>X155 AND CLOSE>OPEN,CLOSE,OPEN,2,0),COLORYELLOW;
DRAWICON(REF(COUNT(CLOSE< X155,5)=5,1) AND CLOSE>X155 AND CLOSE>OPEN,LOW,42),COLORRED;
X156:=MA(CLOSE,60)>REF(MA(CLOSE,60),1);
X157:=COST(50);
X158:=WINNER(CLOSE)*100>50;
X159:=CROSS(CLOSE,X157);
X160:=X156 AND X157 AND X158 AND X159 AND X150;
STICKLINE(X160,CLOSE,OPEN,1,0),COLORMAGENTA;
DRAWICON(X160,LOW*0.99,44),COLORRED;
X161:=MA(CLOSE,10);
X162:=MA(CLOSE,54);
STICKLINE(CLOSE/REF(CLOSE,1)>=1.096 AND HIGH=CLOSE,OPEN,CLOSE,2,0),COLORYELLOW;
X163:=EMA(CLOSE,5);
X164:=EMA(X163,0);
X165:=HHV(MA(HIGH,3),2);
X166:=LLV(MA(HIGH,3),1);
DRAWICON(X166=X165 AND REF(X165,1)>REF(X166,1) AND X150,LOW,1);
DRAWICON(X166< X165 AND REF(X166=X165,1) AND X151,HIGH*1.01,2);
X167:=MA(CLOSE,5)>MA(CLOSE,10) AND MA(CLOSE,10)>REF(MA(CLOSE,10),1) AND MA(CLOSE,5)>REF(MA(CLOSE,5),1);
X168:=100*(1-WINNER(CLOSE));
X169:=100-X168;
X170:=CROSS(X169,X168);
DRAWICON(X170,LOW,25);
X171:=MA(CLOSE,5);
X172:=MA(CLOSE,13);
X173:=MA(CLOSE,34);
X174:=X171>REF(X171,1) AND X172>REF(X172,1) AND X173>REF(X173,1);
X175:=EMA(CLOSE,3);
X176:=EMA(SLOPE(CLOSE,34)*5+CLOSE,21);
X177:=CROSS(X175,X176);
X178:=CROSS(X175,X176) AND X174;
X179:=X177>0;
X180:=X178>0;
X181:=MA(CLOSE,34);
X182:=X179 OR X180;
X183:=CLOSE>X181 AND REF(CLOSE,1)< X181;
X184:=CROSS(CLOSE,MA(CLOSE,250)) AND VOL>=REF(VOL,1)*2;
X185:=(CLOSE/REF(CLOSE,1)-1)*100>9.97 AND CROSS(CLOSE,MA(CLOSE,250));
X186:=X184 OR X185 OR X183;
X187:=X182 AND X170 AND X186 AND X167;
STICKLINE(X187,CLOSE,OPEN,3.05,0),COLOR000099;
STICKLINE(X187,CLOSE,OPEN,2.2,0),COLOR0000CC;
STICKLINE(X187,CLOSE,OPEN,1.5,0),COLORRED;
STICKLINE(X187,CLOSE,OPEN,0.5,0),COLORYELLOW;
失败也有不少的
附件里的公式如上图，1主图1个副图和1个选股，不加密。
[url=http://www.70822.com/soft/sort013/sort05/down-173795.html]【萧啸捉妖抓牛】主副图 无未来 适用电脑手机通达信[/url]