多空九转基因 通达信主图指标 源码 贴图 指标用法

{公式名称: 多空九转基因
公式描述: ####多空九转基因####
参数数量: 5
参数1: T1, 最小: 1, 最大: 999, 缺省: 25
参数2: T2, 最小: 1, 最大: 999, 缺省: 90
参数3: N1, 最小: 8, 最大: 1000, 缺省: 42
参数4: N2, 最小: 13, 最大: 250, 缺省: 21
参数5: N3, 最小: 21, 最大: 1000, 缺省: 89
公式类型: 技术指标公式-其他类型
画线方法: 主图叠加
公式版本: 0
显示小数: 缺省位数
坐标线位置: 自动
额外Y轴分界: 无
公式源码:}
X_1:=EMA(HIGH,T1);
X_2:=EMA(LOW,T1);
X_3:=EMA(HIGH,T2);
X_4:=EMA(LOW,T2);
X_5:=CLOSE<X_2;
X_6:=CLOSE>X_1;
X_7:=REF(CLOSE,1)>REF(X_2,1) AND CLOSE<X_2;
X_8:=REF(CLOSE,1)<REF(X_1,1) AND CLOSE>X_1;
X_9:=CLOSE<X_4;
X_10:=CLOSE>X_3;
X_11:=REF(CLOSE,1)>REF(X_4,1) AND CLOSE<X_4;
X_12:=REF(CLOSE,1)<REF(X_3,1) AND CLOSE>X_3;
X_13:=CLOSE>REF(CLOSE,4);
X_14:=BARSLASTCOUNT(X_13);
X_15:=X_14=9;
X_16:=ISLASTBAR AND BETWEEN(X_14,5,8);
X_17:=(BACKSET(X_15>0,9) OR BACKSET(X_16>0,X_14))*X_14;
DRAWTEXT(X_17>0,HIGH*1.02,VAR2STR(X_17,0)),COLORMAGENTA;
DRAWTEXT(X_14=9,HIGH*1.02,'399'),COLORGREEN;
X_18:=CLOSE<REF(CLOSE,4);
X_19:=BARSLASTCOUNT(X_18);
X_20:=X_19=9;
X_21:=ISLASTBAR AND BETWEEN(X_19,5,8);
X_22:=(BACKSET(X_20>0,9) OR BACKSET(X_21>0,X_19))*X_19;
DRAWTEXT(X_22>0,LOW*0.98,VAR2STR(X_22,0)),COLORMAGENTA;
DRAWTEXT(X_19=9,LOW*0.98,'399'),COLORGREEN;
X_23:=(CLOSE/REF(CLOSE,1)-1)*100>10-3;
STICKLINE(X_23,OPEN,CLOSE,3,0),COLOR009999;
STICKLINE(X_23,OPEN,CLOSE,2,0),COLOR00DDDD;
STICKLINE(X_23,OPEN,CLOSE,1,0),COLORYELLOW;
STICKLINE(X_23,OPEN,CLOSE,0.5,0),COLORYELLOW;
STICKLINE(X_23,OPEN,CLOSE,0.2,0),COLORYELLOW;
X_24:=10;
X_25:=CONST(HHVBARS(VOL,X_24));
X_26:=10;
X_27:=CONST(REF(HHVBARS(VOL,X_26),X_25+1)+X_25+1);
Q0:IF(CURRBARSCOUNT<=X_25+X_26+3 AND CURRBARSCOUNT>=X_25+1,CONST(REF(CLOSE,X_27)),DRAWNULL),COLOR009900;
IF(CURRBARSCOUNT=X_27+1,Q0,DRAWNULL),CIRCLEDOT,COLOR00CC00,LINETHICK5;
X_28:=CONST(LLVBARS(VOL,X_26));
M0:IF(CURRBARSCOUNT<=X_26+7,CONST(IF(X_28=0,OPEN,REF(OPEN,X_28))),DRAWNULL),COLORMAGENTA,LINETHICK2;
IF(CURRBARSCOUNT=X_28+1,M0,DRAWNULL),CIRCLEDOT,COLORYELLOW,LINETHICK3;
DRAWTEXT(ISLASTBAR,M0,'纵轴1位置'),COLORLIMAGENTA;
X_29:=HHV(HIGH,50);
X_30:=CONST(X_29)*1.08;
X_31:=LLV(LOW,50);
X_32:=CONST(X_31)*0.9;
X_33:=(CLOSE+HIGH+LOW+OPEN)/4;
X_34:=LOW+(X_33-LOW)+(CLOSE-LOW);
X_35:=LOW+(CLOSE-X_33);
X_36:=REF(X_34,1);
X_37:=REF(X_35,1);
X_38:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;
X_39:=SMA(X_38,3,1);
X_40:=SMA(X_39,3,1);
X_41:=3*X_39-2*X_40;
X_42:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;
X_43:=SMA(X_42,3,1);
X_44:=SMA(X_43,3,1);
X_45:=3*X_43-2*X_44;
X_46:=IF(CROSS(X_45,X_41),HIGH,REF(HIGH,BARSLAST(CROSS(X_45,X_41))));
压力位:IF(ISLASTBAR,X_46,DRAWNULL),NODRAW;
X_47:=LLV(HIGH,30);
底部位:IF(ISLASTBAR,X_47,DRAWNULL),NODRAW;
X_48:=REF(HIGH,8)=HHV(HIGH,2*8+1);
X_49:=BACKSET(X_48,8+1);
X_50:=FILTER(X_49,8) AND HIGH=HHV(HIGH,8+1);
X_51:=BARSLAST(X_50);
X_52:=IF(X_50,CURRBARSCOUNT,0);
X_53:=IF(X_51,REF(X_52,X_51),X_52);
X_54:=CONST(X_53);
X_55:=CONST(REF(HIGH,X_54-1));
X_56:=REF(X_53,X_51+1);
X_57:=CONST(X_56);
X_58:=CONST(REF(HIGH,X_56-1));
X_59:=BACKSET(ISLASTBAR,X_54);
X_60:=BACKSET(ISLASTBAR,X_56);
X_61:=DRAWLINE(CURRBARSCOUNT=X_57,HIGH,CURRBARSCOUNT=X_54,HIGH,1);
X_62:=REF(LOW,8)=LLV(LOW,2*8+1);
X_63:=BACKSET(X_62,8+1);
X_64:=FILTER(X_63,8) AND LOW=LLV(LOW,8+1);
X_65:=BARSLAST(X_64);
X_66:=IF(X_64,CURRBARSCOUNT,0);
X_67:=IF(X_65,REF(X_66,X_65),X_66);
X_68:=CONST(X_67);
X_69:=CONST(REF(LOW,X_68-1));
X_70:=REF(X_67,X_65+1);
X_71:=CONST(X_70);
X_72:=CONST(REF(LOW,X_70-1));
X_73:=BACKSET(ISLASTBAR,X_68);
X_74:=BACKSET(ISLASTBAR,X_70);
X_75:=DRAWLINE(CURRBARSCOUNT=X_71,LOW,CURRBARSCOUNT=X_68,LOW,1);
X_76:=(X_61+X_75)/2;
X_77:=CONST((X_61+X_75)/2);
X_78:=IF(X_71<X_57,X_71,X_57);
X_79:=DRAWLINE(CURRBARSCOUNT=X_78,X_76,ISLASTBAR,X_77,1);
X_80:=INTPART(3*8/5);
X_81:=REF(HIGH,X_80)=HHV(HIGH,2*X_80+1);
X_82:=BACKSET(X_81,X_80+1);
X_83:=FILTER(X_82,X_80) AND HIGH=HHV(HIGH,X_80+1);
X_84:=BARSLAST(X_83);
X_85:=IF(X_83,CURRBARSCOUNT,0);
X_86:=IF(X_84,REF(X_85,X_84),X_85);
X_87:=CONST(X_86);
X_88:=REF(X_86,X_84+1);
X_89:=CONST(X_88);
X_90:=DRAWLINE(CURRBARSCOUNT=X_89,HIGH,CURRBARSCOUNT=X_87,HIGH,1);
X_91:=REF(LOW,X_26)=LLV(LOW,2*X_26+1);
X_92:=BACKSET(X_91,X_26+1);
X_93:=FILTER(X_92,X_26) AND LOW=LLV(LOW,X_26+1);
X_94:=BARSLAST(X_93);
X_95:=IF(X_93,CURRBARSCOUNT,0);
X_96:=IF(X_94,REF(X_95,X_94),X_95);
X_97:=CONST(X_96);
X_98:=REF(X_96,X_94+1);
X_99:=CONST(X_98);
X_100:=DRAWLINE(CURRBARSCOUNT=X_99,LOW,CURRBARSCOUNT=X_97,LOW,1);
STICKLINE(X_60,X_58,X_58,3,1),COLORWHITE,LINETHICK3;
STICKLINE(X_59,X_55,X_55,3,1),COLORYELLOW,LINETHICK3;
STICKLINE(X_74,X_72,X_72,3,1),COLORMAGENTA,LINETHICK3;
STICKLINE(X_73,X_69,X_69,3,1),COLORCYAN,LINETHICK3;
过均必牛:SUM(CLOSE*VOL,FROMOPEN)/SUM(VOL,FROMOPEN),DOTLINE,COLORYELLOW;
X_101:=CLOSE<REF(CLOSE,1);

X_102:=BARSLAST(X_101)=1 AND CLOSE>REF(HIGH,1);
STICKLINE(X_102,LOW,HIGH,0.1,0),COLORLIRED;
阻力:DRAWLINE(CURRBARSCOUNT=TOTALBARSCOUNT,CONST(OPEN),CURRBARSCOUNT=1,OPEN,3),COLORYELLOW,LINETHICK3;
DRAWTEXT(ISLASTBAR,阻力,'阻力'),COLORYELLOW;
平台线:HHV(CLOSE,176)*0.9,COLORYELLOW,LINETHICK3;
X_103:=STRCAT(303,STRCAT(STRCAT(STRCAT(304,HYBLOCK),STRCAT(305,DYBLOCK)),STRCAT(306,GNBLOCK)));
X_104:=STRCAT(STRCAT(307,CON2STR(TOTALCAPITAL/1000000,2)),308);
X_105:=STRCAT(STRCAT(309,CON2STR(CAPITAL/1000000,2)),308);
X_106:=STRCAT(310,CON2STR(CAPITAL/1000000/(TOTALCAPITAL/1000000),2));
X_107:=STRCAT(STRCAT(311,CON2STR(CAPITAL/1000000*CLOSE,2)),308);
X_108:=STRCAT(312,STRCAT(STRCAT(STRCAT(X_104,X_105),X_106),X_107));
X_109:=IF(FINANCE(37)=4,313,IF(FINANCE(37)=3,314,IF(FINANCE(37)=2,315,316)));
X_110:=IF(1,CON2STR(FINANCE(30)/FINANCE(1),3),5);
X_111:=IF(CONST(FINANCE(30)/FINANCE(1)<(-0.0001)),317,CON2STR(DYNAINFO(39),1));
DRAWTEXT_FIX(NOT(FINANCE(3)=0),0,0.3,0,STRCAT(STRCAT(X_109,318),X_110)),COLORRED;
DRAWTEXT_FIX(NOT(FINANCE(3)=0),0,0.4,0,STRCAT(319,X_111)),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.06,0,X_103),COLORYELLOW;
X_112:=FINDHIGHBARS(HIGH,60,30,1);
A:DRAWLINE(CURRBARSCOUNT=CONST(X_112)+1,HIGH,ISLASTBAR,REF(HIGH,X_112),0),COLORYELLOW;
X_113:=BARSLAST(CLOSE>A*1.014 AND LOW<A);
X_114:=BARSLAST(CROSS(A!=DRAWNULL,0.5));
X_115:=VOL=HHV(VOL,X_112+1) AND X_114>28;
X_116:=COUNT(EXPMA(CLOSE,2)>=A,X_114+1)=1 AND EXPMA(CLOSE,2)>=A*1.01;
X_117:=EXPMA(CLOSE,X_114+1);
X_118:=(A/X_117-1)*100;
X_119:=HHV(X_118,10);
X_120:=COUNT(X_113=0,X_112+1)=1 AND X_113=0 AND X_115 AND X_116 AND X_119<20;
STICKLINE(X_120,HIGH,LOW,0,0),COLORMAGENTA;
STICKLINE(X_120,CLOSE,OPEN,3,0),COLOR990099;
STICKLINE(X_120,CLOSE,OPEN,2,0),COLORBB00BB;
STICKLINE(X_120,CLOSE,OPEN,1,0),COLORDD00DD;
STICKLINE(X_120,CLOSE,OPEN,0.3,0),COLORMAGENTA;
DRAWICON(X_120,LOW*0.93,25);
DRAWTEXT(X_114=0,A*1.05,STRCAT(STRCAT(320,VAR2STR(REF(A,X_114),2)),64)),COLORYELLOW;
X_121:=120082399;
涨停1:IF(DATE<X_121,ZTPRICE(REF(CLOSE,1),IF(CODELIKE(3),0.2,IF(NAMEINCLUDE(1),0.05,0.1))),ZTPRICE(REF(CLOSE,1),IF(CODELIKE(3) OR CODELIKE(4),0.2,IF(NAMEINCLUDE(1),0.05,0.1)))),NODRAW,COLORRED;
跌停1:IF(DATE<X_121,DTPRICE(REF(CLOSE,1),IF(CODELIKE(3),0.2,IF(NAMEINCLUDE(1),0.05,0.1))),DTPRICE(REF(CLOSE,1),IF(CODELIKE(3) OR CODELIKE(4),0.2,IF(NAMEINCLUDE(1),0.05,0.1)))),NODRAW,COLORGREEN;
明涨停:IF(DATE<X_121,CLOSE*IF(CODELIKE(3),1.2,IF(NAMEINCLUDE(1),1.05,1.1)),CLOSE*IF(CODELIKE(3) OR CODELIKE(4),1.2,IF(NAMEINCLUDE(1),1.05,1.1))),NODRAW,COLORLIMAGENTA;
明跌停:IF(DATE<X_121,CLOSE*IF(CODELIKE(3),0.8,IF(NAMEINCLUDE(1),0.45,0.9)),CLOSE*IF(CODELIKE(3) OR CODELIKE(4),0.8,IF(NAMEINCLUDE(1),0.45,0.9))),NODRAW,COLORCYAN;
AA11A:DRAWLINE(HIGH>=HHV(HIGH,120),HIGH,REF(CLOSE>=REF(HHV(HIGH,120),1),1),REF(HIGH,1),1),DOTLINE;
DRAWICON(CROSS(CLOSE,HHV(AA11A,120)),LOW,23);
DRAWICON(CROSS(RSI.RSI1,11),LOW*0.99,1);
X_122:=IF(CLOSE,CONST(CLOSE),DRAWNULL);
X_123:=SUM(IF(CLOSE>REF(CLOSE,1),VOL*CLOSE,0),0);
X_124:=SUM(IF(CLOSE<REF(CLOSE,1),VOL*CLOSE,0),0);
X_125:=SUM(IF(CLOSE=REF(CLOSE,1),VOL*CLOSE,0),0);
X_126:=0;
X_127:=DVOL*DCLOSE/100;
X_128:=X_127-REF(X_127,1);
X_129:=DVOL*DCLOSE/100;
X_130:=X_129/REF(X_129,1);
X_131:=X_123-X_124-0.5*X_125;
X_132:=MA(X_131,1);
X_133:=X_132/REF(X_132,1)>1;
X_134:=REF(X_133,1)<1 AND X_133;
X_135:=EMA(MA(X_127,2),2)/100000;
X_136:=X_135/REF(X_135,1);
X_137:=X_134 AND X_135>REF(X_135,1) AND X_136>1;
DRAWNUMBER(X_137=1,LOW,X_135),COLORYELLOW;
X_138:=MACD.DIF#MONTH;
X_139:=MACD.DEA#MONTH;
X_140:=MACD.DIF#WEEK;
X_141:=MACD.DEA#WEEK;

{www.gpxiazai.com}
X_142:=MACD.DIF;
X_143:=MACD.DEA;
X_144:=CROSS(X_142,X_143);
X_145:=CROSS(X_140,X_141);
X_146:=CROSS(X_138,X_139);
X_147:=IF(CROSS(X_140,X_141),MACD.DIF+0.1,0);
X_148:=IF(X_142>X_143 AND X_140>X_141 AND X_146 OR (X_140>X_141 AND X_138>X_139 AND X_144) AND CLOSE/REF(CLOSE,1)>1.08 OR (X_138>X_139 AND X_142>X_143 AND X_145) OR (X_144 AND X_145 AND X_146),MACD.DIF+0.2,0);
STICKLINE(X_147 AND CLOSE/REF(CLOSE,1)>1.05,OPEN,REF(CLOSE,1)*1.05,3.2,0),COLOR0077FF;
STICKLINE(X_147 AND CLOSE/REF(CLOSE,1)>1.05,OPEN,REF(CLOSE,1)*1.05,2.5,0),COLOR0099FF;
STICKLINE(X_147 AND CLOSE/REF(CLOSE,1)>1.05,OPEN,REF(CLOSE,1)*1.05,1.9,0),COLOR00BBFF;
STICKLINE(X_147 AND CLOSE/REF(CLOSE,1)>1.05,OPEN,REF(CLOSE,1)*1.05,1.2,0),COLOR00DDFF;
STICKLINE(X_147 AND CLOSE/REF(CLOSE,1)>1.05,OPEN,REF(CLOSE,1)*1.05,0.3,0),COLORYELLOW;
STICKLINE(X_148 AND CLOSE/REF(CLOSE,1)>1.08,CLOSE,REF(CLOSE,1)*1.05,3,0),COLOR000099;
STICKLINE(X_148 AND CLOSE/REF(CLOSE,1)>1.08,CLOSE,REF(CLOSE,1)*1.05,2.2,0),COLOR0000CC;
STICKLINE(X_148 AND CLOSE/REF(CLOSE,1)>1.08,CLOSE,REF(CLOSE,1)*1.05,1.5,0),COLORRED;
STICKLINE(X_148 AND CLOSE/REF(CLOSE,1)>1.08,CLOSE,REF(CLOSE,1)*1.05,0.5,0),COLORCC66FF;
STICKLINE(X_148 AND CLOSE/REF(CLOSE,1)>1.08,REF(CLOSE,1)*1.05,CLOSE,0.5,0),COLORYELLOW;
DRAWTEXT(X_148 AND CLOSE/REF(CLOSE,1)>1.08,REF(CLOSE,1)*1.058,'321'),COLORYELLOW;
DRAWTEXT(X_147 AND CLOSE/REF(CLOSE,1)>1.05,REF(CLOSE,1)*1.03,'322'),COLORRED;
X_149:=CLOSE/REF(CLOSE,1);
X_150:=EMA(SLOPE(CLOSE,N2)*20+CLOSE,N1);
X_151:=X_150/REF(X_150,1);
X_152:=SLOPE(X_150,2);
X_153:=CROSS(0,X_152);
X_154:=BARSLAST(X_153);
X_155:=REF(X_150,X_154);
X_156:=HHV(X_155,N3);
X_157:=CROSS(X_152,0);
X_158:=BARSLAST(X_157);
X_159:=REF(X_150,X_158);
X_160:=CROSS(X_150,X_156) AND X_150/X_159<1.25 AND X_150/LLV(X_150,55)<1.35;
X_161:=BARSLAST(X_160);
DRAWTEXT(CROSS(CLOSE,X_156) AND X_149>1.035,LOW*0.98,'323'),COLORWHITE; { AND X_151>1.004}
DRAWTEXT(CROSS(CLOSE,X_156) AND X_149>1.035 AND X_151>1.004,LOW*0.98,'雄起'),COLORWHITE;
X_162:=REF(CLOSE,1)/REF(CLOSE,3)>=1.2 AND OPEN/REF(CLOSE,1)<=1.01 AND LOW<REF(CLOSE,1) AND CLOSE/REF(CLOSE,1)>1.05;
X_163:=X_162 AND COUNT(X_162,4)=1;
STICKLINE(X_163,OPEN,CLOSE,2.5,0),COLORYELLOW;
WWW70822COM:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));
DRAWICON(X_163,LOW,24);
DRAWICON(X_163,LOW*0.97,25);
DRAWICON(X_163,LOW*0.94,26);

DRAWTEXT(X_163,LOW*0.92,'涨停风'),COLORYELLOW;
DRAWICON(CROSS(RSI.RSI1,11),LOW*0.99,1);
假阴线:DRAWTEXT(OPEN>MA(CLOSE,20) AND (OPEN-CLOSE)/OPEN*100>0.01 AND VOL/CAPITAL*100>=3 AND CLOSE>REF(CLOSE,1),LOW-0.08,325),COLORWHITE;
X_164:=EMA((CLOSE-MA((2*CLOSE+HIGH+LOW)/4,30))/MA((2*CLOSE+HIGH+LOW)/4,30)*100,3);
妖股龙头:DRAWTEXT(CROSS(X_164,15),LOW-0.12,326),COLORMAGENTA;
X_165:=CLOSE/REF(CLOSE,1);
X_166:=EMA(CLOSE,50);
X_167:=EMA(SLOPE(CLOSE,21)*20+CLOSE,42);
X_168:=X_167/REF(X_167,1);
X_169:=SLOPE(X_167,2);
X_170:=CROSS(0,X_169);
X_171:=BARSLAST(X_170);
X_172:=CROSS(X_167,REF(X_167,X_171)) AND X_167/REF(X_167,X_171)>=1.005;
X_173:=BARSLAST(X_172);
X_174:=CROSS(X_167,X_166);
X_175:=BARSLAST(X_174);
X_176:=CROSS(X_167,REF(X_167,X_171)) AND X_167/REF(X_167,34)<1.34;
X_177:=BARSLAST(X_176);

DRAWTEXT(X_176,LOW*0.99,327),COLORWHITE;
X_178:=IF(INBLOCK(52),1,0);
DRAWTEXT_FIX(X_178,0.4,0.09,0,'52'),COLORCYAN;
X_179:=IF(CODELIKE(4),1,0);
X_180:=(REF(INDEXC,0)-REF(INDEXC,10))/REF(INDEXC,10);
X_181:=(REF(CLOSE,1)*1.2-REF(CLOSE,10))/REF(CLOSE,10);
X_182:=X_181-X_180>=1;
DRAWTEXT(ISLASTBAR=1 AND X_182 AND X_179,LOW*0.98,'328');
X_183:=REF(CLOSE,10)*(2+X_180);
DRAWNUMBER(ISLASTBAR=1 AND X_182 AND X_179,LOW*0.95,X_183);

{STICKLINE(ISLASTBAR=1 AND X_182,X_183,X_183,25,0),COLORWHITE;}

{ZTB:IF(NAMELIKE(211) OR NAMELIKE(329),CLOSE=ZTPRICE(REF(CLOSE,1),0.05),IF(CODELIKE(3) OR (CODELIKE(4) AND DATE>=1200824),CLOSE=ZTPRICE(REF(CLOSE,1),0.2),CLOSE=ZTPRICE(REF(CLOSE,1),0.1)));};