老師麻煩修改一下

作者：文華財(cái)經(jīng) 來(lái)源：cxh99.com 發(fā)布時(shí)間：2023年10月16日

咨詢(xún)內(nèi)容： ?DRAWGBK(CLOSE>0,RGB(1,1,1),RGB(1,1,1),0);XA_1:=7;XA_2:=7;XA_3:=10;XA_4:=120;XA_5:=1;AMOUNT:=AVPRICE*V;CAPITAL:=GETPRICE1('通股本';INDEXL:="999001$L";INDEXC:="999001$C";INDEXH:="999001$H";?CURRBARSCOUNT:=DATACOUNT-BARPOS+1;XA_6:=EMA(INDEXC,120)/EMA(CLOSE,120);XA_7:=1;XA_8:=1;XA_9:=IF(1,(INDEXC/XA_6+0.812*REF(INDEXC/XA_6,1)+0.618*REF(INDEXC/XA_6,2)+0.382*REF(INDEXC/XA_6,3)+0.191*REF(INDEXC/XA_6,4))/3.003,NULL);XA_12:=(CLOSE+0.812*REF(CLOSE,1)+0.618*REF(CLOSE,2)+0.382*REF(CLOSE,3)+0.191*REF(CLOSE,4))/3.003;
XA_13:=(3*CLOSE+LOW+OPEN+HIGH)/6;XA_14:=XA_13;XA_15:=IF(CLOSE<500,0,(20*XA_14+19*REF(XA_14,1)+18*REF(XA_14,2)+17*REF(XA_14,3)+16*REF(XA_14,4)+15*REF(XA_14,5)+14*REF(XA_14,6)+13*REF(XA_14,7)+12*REF(XA_14,8)+11*REF(XA_14,9)+10*REF(XA_14,10)+9*REF(XA_14,11)+8*REF(XA_14,12)+7*REF(XA_14,13)+6*REF(XA_14,14)+5*REF(XA_14,15)+4*REF(XA_14,16)+3*REF(XA_14,17)+2*REF(XA_14,18)+REF(XA_14,20))/210);XA_16:=IF(1,NULL,MA(XA_15,5));

FILLRGN(XA_15>XA_16,XA_16,XA_15,RGB(99,0,0));FILLRGN(XA_15>XA_16,XA_16,XA_15,RGB(0,99,0));
XA_17:=LOW>REF(HIGH,1)+0.001;XA_18:=BARSLAST(XA_17);XA_19:=COUNT(LOW>REF(HIGH,XA_18+1),XA_18+1)=XA_18+1;XA_20:=CROSS(BACKSET(XA_19>0 AND ISLASTBAR,XA_18+1),0.5);XA_21:=BARSLAST(XA_20);XA_22:=IF(CURRBARSCOUNT<=REFX1(XA_21+1,10000),REFX1(LLV(LOW,XA_21+1),10000),NULL);XA_23:=IF(CURRBARSCOUNT<=REFX1(XA_21+1,10000),REF(HIGH,XA_21+1),NULL);STICKLINE(CURRBARSCOUNT<=REFX1(XA_21+1,10000),XA_22,XA_23,15,0),COLORGRAY;XA_24:=HIGH<REF(LOW,1)-0.001;XA_25:=BARSLAST(XA_24);XA_26:=COUNT(HIGH<REF(LOW,XA_25+1),XA_25+1)=XA_25+1;XA_27:=CROSS(BACKSET(XA_26>0 AND ISLASTBAR,XA_25+1),0.5);XA_28:=BARSLAST(XA_27);XA_29:=IF(CURRBARSCOUNT<=REFX1(XA_28+1,10000),REFX1(HHV(HIGH,XA_28+1),10000),NULL);XA_30:=IF(CURRBARSCOUNT<=REFX1(XA_28+1,10000),REF(LOW,XA_28+1),NULL);STICKLINE(CURRBARSCOUNT<=REFX1(XA_28+1,10000),XA_29,XA_30,15,0),COLORGRAY;XA_31:=HHV((CLOSE+HIGH+LOW)/3,2);XA_32:=LLV((CLOSE+HIGH+LOW)/3,2);XA_33:=XA_31;XA_34:=(XA_31+XA_32)/2;XA_35:=XA_32;上線:=IF(1,REF(XA_33,1),NULL),NODRAW,COLOR0000CC;中線:=IF(1,REF(XA_34,1),NULL),NODRAW,LINETHICK3;下線:=IF(1,REF(XA_35,1),NULL),NODRAW,COLORCCCC00;XA_36:=COST(1);XA_37:=COST(10);XA_38:=COST(20);XA_39:=COST(30);XA_40:=COST(40);XA_41:=COST(50);XA_42:=COST(60);XA_43:=COST(70);XA_44:=COST(80);XA_45:=COST(90);XA_46:=COST(99);XA_47:=COST(5);XA_48:=COST(15);XA_49:=COST(25);XA_50:=COST(35);XA_51:=COST(45);XA_52:=COST(55);XA_53:=COST(65);XA_54:=COST(75);XA_55:=COST(85);XA_56:=COST(95);XA_57:=XA_47-XA_36;XA_58:=XA_37-XA_47;XA_59:=XA_48-XA_37;XA_60:=XA_38-XA_48;XA_61:=XA_49-XA_38;XA_62:=XA_39-XA_49;XA_63:=XA_50-XA_39;XA_64:=XA_40-XA_50;XA_65:=XA_51-XA_40;XA_66:=XA_41-XA_51;XA_67:=XA_52-XA_41;XA_68:=XA_42-XA_52;XA_69:=XA_53-XA_42;XA_70:=XA_43-XA_53;XA_71:=XA_54-XA_43;XA_72:=XA_44-XA_54;XA_73:=XA_55-XA_44;XA_74:=XA_45-XA_55;XA_75:=XA_56-XA_45;XA_76:=XA_46-XA_56;XA_77:=MIN(XA_57,MIN(XA_58,MIN(XA_59,MIN(XA_60,MIN(XA_61,MIN(XA_62,MIN(XA_63,MIN(XA_64,MIN(XA_65,MIN(XA_66,MIN(XA_67,MIN(XA_68,MIN(XA_69,MIN(XA_70,MIN(XA_71,MIN(XA_72,MIN(XA_73,MIN(XA_74,MIN(XA_75,XA_76)))))))))))))))))));XA_78:=IF(XA_57=XA_77,(XA_47+XA_36)/2,IF(XA_58=XA_77,(XA_47+XA_37)/2,IF(XA_59=XA_77,(XA_48+XA_37)/2,IF(XA_60=XA_77,(XA_48+XA_38)/2,IF(XA_61=XA_77,(XA_49+XA_38)/2,IF(XA_62=XA_77,(XA_49+XA_39)/2,IF(XA_63=XA_77,(XA_50+XA_39)/2,IF(XA_64=XA_77,(XA_50+XA_40)/2,IF(XA_65=XA_77,(XA_51+XA_40)/2,IF(XA_66=XA_77,(XA_51+XA_41)/2,IF(XA_67=XA_77,(XA_52+XA_41)/2,IF(XA_68=XA_77,(XA_52+XA_42)/2,IF(XA_69=XA_77,(XA_53+XA_42)/2,IF(XA_70=XA_77,(XA_53+XA_43)/2,IF(XA_71=XA_77,(XA_54+XA_43)/2,IF(XA_72=XA_77,(XA_54+XA_44)/2,IF(XA_73=XA_77,(XA_55+XA_44)/2,IF(XA_74=XA_77,(XA_55+XA_45)/2,IF(XA_75=XA_77,(XA_56+XA_45)/2,(XA_56+XA_46)/2)))))))))))))))))));止盈:REF(XA_34,1);籌碼峰線:=XA_78,NODRAW,COLOR00EEEE;XA_79:=IF(XA_8,XA_77,0);
XA_95:=MAX(CLOSE,OPEN);XA_96:=MIN(CLOSE,OPEN);XA_97:=MA(CLOSE,20);XA_98:=BARSLASTCOUNT(CLOSE<XA_97);XA_99:=BACKSET((XA_98>=4)*XA_98,XA_98);XA_100:=BARSLASTCOUNT(CLOSE>XA_97);XA_101:=BACKSET((XA_100>=4)*XA_100,XA_100);XA_102:=BARSLASTCOUNT(NOT(XA_99 OR XA_101));XA_103:=BARSLASTCOUNT(REF(XA_99>0,XA_102));XA_104:=BARSLASTCOUNT(REF(XA_101>0,XA_102));
XA_105:=IF(XA_7<1,0,CROSS(BACKSET(XA_103||ISLASTBAR,BARSLAST(LLV(XA_96,XA_103)=XA_96)+1),0.5));XA_106:=IF(XA_8<1,0,CROSS(BACKSET(XA_104||ISLASTBAR,BARSLAST(HHV(XA_95,XA_104)=XA_95)+1),0.5));XA_107:=IF(XA_7<1,0,REF(XA_95,BARSLAST(XA_106)));XA_108:=IF(XA_8<1,0,REF(XA_96,BARSLAST(XA_105)));XA_109:=BARSLAST(XA_103=1);XA_110:=REF(XA_107,BARSLAST(XA_103));XA_111:=REF(XA_108,XA_109);XA_112:=(XA_110-XA_111)*0.191+XA_111;XA_113:=(XA_110-XA_111)*0.382+XA_111;XA_114:=(XA_110-XA_111)*0.5+XA_111;XA_115:=(XA_110-XA_111)*0.618+XA_111;XA_116:=(XA_110-XA_111)*0.809+XA_111;XA_117:=XA_110+(XA_110-XA_111)*0.191;XA_118:=XA_111-(XA_110-XA_111)*0.191;XA_119:=REFX1(XA_111,100000);XA_120:=REFX1(XA_113,100000);XA_121:=REFX1(XA_115,100000);XA_122:=REFX1(XA_110,100000);XA_123:=REFX1(XA_117,100000);XA_124:=REFX1(XA_118,100000);
FILLRGN(1,XA_119,XA_124,RGB(68,68,0));
FILLRGN(1,XA_123,XA_122,RGB(78,78,0));XA_125:=IF(PERIOD=7,7,IF(PERIOD=6,14,30));XA_126:=IF(PERIOD=7,8,IF(PERIOD=6,16,35));XA_127:=IF(PERIOD=7,9,IF(PERIOD=6,18,40));XA_128:=IF(PERIOD=7,10,IF(PERIOD=6,20,45));XA_129:=IF(PERIOD=7,11,IF(PERIOD=6,22,50));XA_130:=IF(PERIOD=7,12,IF(PERIOD=6,24,55));XA_131:=EMA(CLOSE,XA_125);XA_132:=EMA(CLOSE,XA_126);XA_133:=EMA(CLOSE,XA_127);XA_134:=EMA(CLOSE,XA_128);XA_135:=EMA(CLOSE,XA_129);XA_136:=EMA(CLOSE,XA_130);XA_137:=IF(XA_7<1,0,IF(CAPITAL>0 AND CLOSE<500,0,1));
XA_138:=1;
XA_139:=REFX1(MA((CLOSE-REF(CLOSE,1))/REF(CLOSE,1),30),10000);XA_140:=MA(CLOSE,1);XA_141:=SMA(SMA(XA_140,2,1),2,1);XA_142:=MA(XA_141,3);XA_143:=IF(CROSS(XA_105,0.5),1,IF(CROSS(XA_106,0.5),(-1),0));XA_144:=IF(BARSSINCE(CLOSE>0)<=3 AND XA_143=0 AND XA_141>XA_142,1,IF(BARSSINCE(CLOSE>0)<=3 AND XA_143=0 AND XA_141<=XA_142,(-1),XA_143));XA_145:=IF(BARSSINCE(CLOSE)<60,IF(MA(CLOSE,2)>MA(CLOSE,20),1,(-1)),XA_144);XA_146:=REF(XA_145,BARSLAST(XA_145));XA_147:=ZIGZAG(C,XA_3,1);XA_148:=PEAK(C,XA_3,1,1);XA_149:=TROUGH(C,XA_3,1,1);XA_150:=XA_147>REF(XA_147,1);XA_151:=XA_147<=REF(XA_147,1);XA_152:=IF(XA_7<1,0,REF(XA_146=1,1));XA_153:=IF(XA_8<1,0,REF(XA_146=(-1),1));XA_154:=IF(XA_7<1,0,IF(CAPITAL>0 AND CLOSE<500,0,1));XA_155:=IF(XA_154,XA_152,IF(PERIOD>=5,XA_150,XA_152));XA_156:=IF(XA_154,XA_153,IF(PERIOD>=5,XA_151,XA_153));XA_157:=CROSS(XA_155=1,0.5)&&COUNT(CROSS(XA_155=1,0.5),BARSLAST(CROSS(XA_156=1,0.5)))=1;DRAWKLINE1(HIGH,OPEN,LOW,CLOSE);STICKLINE1(XA_155,HIGH,LOW,0,0),COLORRED;STICKLINE1(XA_155 AND CLOSE>OPEN,OPEN,CLOSE,2.5,1),COLORRED;STICKLINE1(XA_155 AND CLOSE<=OPEN,OPEN,CLOSE,2.5,0),COLORRED;STICKLINE1(XA_156,HIGH,LOW,0,0),COLORGREEN;STICKLINE1(XA_156 AND CLOSE>OPEN,OPEN,CLOSE,2.5,1),COLORGREEN;STICKLINE1(XA_156 AND CLOSE<=OPEN,OPEN,CLOSE,2.5,0),COLORGREEN;XA_158:=EMA(CLOSE,3)-EMA(CLOSE,6)-(EMA(CLOSE,6)-EMA(CLOSE,12))*(-100);XA_159:=EMA(XA_158,3);XA_160:=CROSS(XA_158,XA_159);XA_161:=CROSS(XA_159,XA_158);
XA_162:=REF(CLOSE,1);XA_163:=IF(CLOSE>=1,10000,100000);XA_164:=1.1*XA_162-49/XA_163;XA_165:=0.9*XA_162+51/XA_163;XA_166:=IF((CLOSE-REF(CLOSE,1))*100/REF(CLOSE,1)>=10-0.01*100/REF(OPEN,1),1,0);XA_167:=CLOSE<=XA_165;XA_168:=HIGH>=XA_164;XA_169:=LOW<=XA_165;STICKLINE(XA_168,HIGH,MAX(CLOSE,OPEN),0,0),COLORMAGENTA;STICKLINE(XA_169,LOW,MIN(CLOSE,OPEN),0,0),COLORCYAN;XA_170:=CLOSE>OPEN AND CLOSE>1.05*OPEN-51/XA_163 OR (CLOSE>1000 AND CLOSE>XA_162*1.024);STICKLINE(XA_170,OPEN,CLOSE,1,0),COLOR0000BB;XA_171:=CLOSE<OPEN AND CLOSE<0.95*OPEN+49/XA_163 OR (CLOSE>1000 AND CLOSE<XA_162*0.976);STICKLINE(XA_171,OPEN,CLOSE,1,0),COLORGREEN;STICKLINE(XA_166,OPEN,CLOSE,1,0),COLORMAGENTA;STICKLINE(XA_167,OPEN,CLOSE,1,0),COLORCYAN;XA_172:=PERIOD=5 AND ISNULL(WINNER(CLOSE)) AND (ABS(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>=0.025 OR ABS(CLOSE-OPEN)>=60);STICKLINE(XA_172,(HIGH+LOW)/2,(HIGH+LOW)/2,0.8,0),COLORGRAY;STICKLINE(XA_170 OR XA_171 OR XA_166 OR XA_167 AND BETWEEN(CLOSE,1,500),LOW+(HIGH-LOW)/2,LOW+(HIGH-LOW)/2,0.8,0),COLORGRAY;XA_173:=REF(CLOSE,1);XA_174:=SMA(MAX(CLOSE-XA_173,0),2,1)/SMA(ABS(CLOSE-XA_173),2,1)*100;XA_175:=45;XA_176:=20;XA_177:=XA_174<XA_175 AND REF(XA_174,1)>XA_175;XA_178:=XA_174<XA_176 AND REF(XA_174,1)>XA_176;XA_179:=REF(COUNT(XA_166,5),1)>=1;XA_180:=SMA(LOW,4,3);STICKLINE(XA_180 AND REF(XA_177,1) AND XA_179,XA_180*0.9999,XA_180*0.9979,5,0),COLORGREEN;STICKLINE(XA_180 AND REF(XA_178,1) AND XA_179,XA_180*0.9999,XA_180*0.9979,5,0),COLORGREEN;DRAWICON(XA_180 AND (REF(XA_177,1) OR REF(XA_178,1)) AND XA_179,LOW*0.99,1);XA_181:=5;XA_182:=REF(HIGH,XA_181)=HHV(HIGH,2*XA_181+1);XA_183:=FILTER(XA_182,XA_181);XA_184:=BACKSET(XA_183,XA_181+1);XA_185:=FILTER(XA_184,XA_181);XA_186:=REF(HIGH,BARSLAST(XA_185));XA_187:=REF(MAX(CLOSE,OPEN),XA_181)=HHV(MAX(CLOSE,OPEN),2*XA_181+1);XA_188:=FILTER(XA_187,XA_181);XA_189:=BACKSET(XA_188,XA_181+1);XA_190:=FILTER(XA_189,XA_181);XA_191:=REF(MAX(CLOSE,OPEN),BARSLAST(XA_190));XA_192:=REF(LOW,XA_181)=LLV(LOW,2*XA_181+1);XA_193:=FILTER(XA_192,XA_181);XA_194:=BACKSET(XA_193,XA_181+1);XA_195:=FILTER(XA_194,XA_181);XA_196:=REF(LOW,BARSLAST(XA_195));XA_197:=REF(MIN(CLOSE,OPEN),XA_181)=LLV(MIN(CLOSE,OPEN),2*XA_181+1);XA_198:=FILTER(XA_197,XA_181);XA_199:=BACKSET(XA_198,XA_181+1);XA_200:=FILTER(XA_199,XA_181);XA_201:=REF(MIN(CLOSE,OPEN),BARSLAST(XA_200));XA_202:=IF(0,XA_186,XA_191);XA_203:=IF(0,XA_196,XA_201);STICKLINE(XA_202=REF(XA_202,1) OR REF(XA_202,1)=REF(XA_202,2),XA_202,XA_202,4,0),COLORGREEN,LINETHICK2;STICKLINE(XA_203=REF(XA_203,1) OR REF(XA_203,1)=REF(XA_203,2),XA_203,XA_203,4,0),COLORCC00CC,LINETHICK2;XA_204:=REF(HIGH,3)=HHV(HIGH,2*3+1);XA_205:=FILTER(XA_204,3);XA_206:=BACKSET(XA_205,3+1);XA_207:=FILTER(XA_206,3);XA_208:=REF(LOW,3)=LLV(LOW,2*3+1);XA_209:=FILTER(XA_208,3);XA_210:=BACKSET(XA_209,3+1);XA_211:=FILTER(XA_210,3);XA_212:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2;XA_213:=(HIGH+LOW)/2;XA_214:=XA_207 AND NOT(XA_211 AND XA_212>=XA_213) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;XA_215:=XA_207 AND NOT(XA_211 AND XA_212>=XA_213);XA_216:=XA_211 AND NOT(XA_207 AND XA_212=XA_213);XA_217:=REF(BARSLAST(XA_214),1)+1;XA_218:=BACKSET(XA_214 AND COUNT(XA_216,XA_217)>0,LLVBARS(IF(XA_216,LOW,10000),XA_217));XA_219:=XA_218>REF(XA_218,1);XA_220:=BACKSET(XA_219,2);XA_221:=XA_220>REF(XA_220,1);XA_222:=XA_221 OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;XA_223:=REF(BARSLAST(XA_222),1)+1;XA_224:=BACKSET(XA_222 AND COUNT(XA_215,XA_223)>0,HHVBARS(IF(XA_215,HIGH,0),XA_223));XA_225:=XA_224>REF(XA_224,1);XA_226:=BACKSET(XA_225,2);XA_227:=XA_226>REF(XA_226,1);XA_228:=BACKSET(ISLASTBAR,MIN(BARSLAST(XA_227),BARSLAST(XA_221))+1);XA_229:=XA_228>REF(XA_228,1);XA_230:=HIGH;XA_231:=REF(HIGH,REF(BARSLAST(XA_227),1)+1)>REF(HIGH,REF(BARSLAST(XA_227),1)+2+REF(BARSLAST(XA_227),REF(BARSLAST(XA_227),1)+2));XA_232:=XA_230 AND XA_231 AND XA_227;XA_233:=BACKSET(XA_232,REF(BARSLAST(XA_227),1)+2);XA_234:=XA_233>REF(XA_233,1);XA_235:=LOW>REF(LOW,REF(BARSLAST(XA_221),1)+1);XA_236:=REF(LOW,REF(BARSLAST(XA_221),1)+1);XA_237:=XA_235 AND XA_236 AND XA_221;XA_238:=BACKSET(XA_237,REF(BARSLAST(XA_221),1)+2);XA_239:=XA_238>REF(XA_238,1);XA_240:=XA_234 OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;XA_241:=REF(BARSLAST(XA_240),1)+1;XA_242:=BACKSET(XA_240 AND COUNT(XA_239,XA_241)>0,LLVBARS(IF(XA_239,LOW,POW(10,20)),XA_241));XA_243:=XA_242>REF(XA_242,1);XA_244:=BACKSET(XA_243,2);XA_245:=XA_244>REF(XA_244,1);XA_246:=XA_245 OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;XA_247:=REF(BARSLAST(XA_246),1)+1;XA_248:=BACKSET(XA_246 AND COUNT(XA_234,XA_247)>0,HHVBARS(IF(XA_234,HIGH,-POW(10,20)),XA_247));XA_249:=XA_248>REF(XA_248,1);XA_250:=BACKSET(XA_249,2);XA_251:=XA_250>REF(XA_250,1);XA_252:=BACKSET(ISLASTBAR,MIN(BARSLAST(XA_251),BARSLAST(XA_245))+1);XA_253:=XA_252>REF(XA_252,1);XA_254:=BACKSET(ISLASTBAR,BARSLAST(XA_221)+1);XA_255:=XA_254>REF(XA_254,1);XA_256:=BACKSET(XA_255,REF(BARSLAST(XA_221),1)+2);XA_257:=XA_256>REF(XA_256,1);XA_258:=BACKSET(ISLASTBAR,BARSLAST(XA_227)+1);XA_259:=XA_258>REF(XA_258,1);XA_260:=BACKSET(XA_259,REF(BARSLAST(XA_227),1)+2);XA_261:=XA_260>REF(XA_260,1);K:=TRENDLINES(XA_257,LOW,XA_255,LOW),COLORWHITE;KK:=TRENDLINES(XA_261,HIGH,XA_259,HIGH),COLORWHITE;REF(XA_34,1),COLORWHITE;STICKLINE(ISLASTBAR,籌碼峰線,籌碼峰線*1.001,20,0),COLORYELLOW;XA_262:=CURRBARSCOUNT<2;XA_263:=CURRBARSCOUNT<13;XA_264:=IF(XA_262,上線,NULL);XA_265:=IF(XA_262,中線,NULL);XA_266:=IF(XA_262,下線,NULL);XA_267:=IF(XA_263,XA_264,NULL);XA_268:=IF(XA_263,XA_265,NULL);XA_269:=IF(XA_263,XA_266,NULL);
中線,COLOR0000CC,LINETHICK2;IF(BACKSET(CLOSE<=REF(XA_34,1),1),中線,NULL),COLOR00CC00,LINETHICK2;?IF(XA_161,HIGH*1.01,NULL),POINTDOT,COLORCYAN,LINETHICK6;IF(XA_160,LOW*0.99,NULL),POINTDOT,COLORRED,LINETHICK6;AHC1:=CLOSE*VOL;AHC2:=EMA((EMA(AHC1,3)/EMA(VOL,3)+EMA(AHC1,6)/EMA(VOL,6)+EMA(AHC1,12)/EMA(VOL,12)+EMA(AHC1,24)/EMA(VOL,24))/4,34),COLORYELLOW;

下檔線:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100);RRRSV:=SMA(下檔線,3,1);KKK:=SMA(RRRSV,3,1);DDD:=((3 * RRRSV) - (2 * KKK));JJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100);RSV24:=SMA(JJ12,3,1);K24:=SMA(RSV24,3,1);D24:=((3 * RSV24) - (2 * K24));壓力2:=IF(CROSS(D24,DDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDD)))),COLORFFFFFF;壓力位:=IF(ISLASTBAR,壓力2,NULL);STICKLINE(ISLASTBAR ,壓力位,壓力位,120,0),LINETHICK6,COLORWHITE;

龍頭線1:=(MA(C,7)),COLORF8A1AB;?龍頭線2:=(EMA(C,17)),LINETHICK5,COLORYELLOW;?龍頭線3:=(MA(C,25)),LINETHICK2,COLORFF00FF;龍頭線4:=(MA(C,43)),COLORCYAN;?龍頭線5:=(MA(C,72)),COLOR0752B5;?
W:=EMA(C,5);W1:=EMA(W,8);W2:=REF(W1,1);M:=SMA(CLOSE,8,1);M1:=(SMA(M,11,1));M2:=(REF(M1,1));STICKLINE((W1<W2) AND (W1>M2),W1,W2,2,0),COLORBLUE;STICKLINE((W1>W2) AND (W1<M2),W1,W2,2,0),COLORYELLOW;STICKLINE((M1>M2),M1,M2,1,0),COLORRED;STICKLINE((M1<M2),M1,M2,1,0),COLOR00FF00;

AAAA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN));QSQ:=100;QLFJ:=50;QLFJ1:=40;QLFJ2:=60;LSQ:=0;LSQ1:=70;LSQ2:=30;VAR2AAA:=(HHV(HIGH,16)-CLOSE)/(HHV(HIGH,16)-LLV(LOW,16))*100;VAR3AAA:=(CLOSE-LLV(LOW,16))/(HHV(HIGH,16)-LLV(LOW,16))*100;
開(kāi):=SMA(MAX(O-REF(O,1),0),8,1)/SMA(ABS(O-REF(O,1)),8,1)*100, LINETHICK1;高:=SMA(MAX(H-REF(H,1),0),8,1)/SMA(ABS(H-REF(H,1)),8,1)*100, LINETHICK1;低:=SMA(MAX(L-REF(L,1),0),8,1)/SMA(ABS(L-REF(L,1)),8,1)*100, LINETHICK1;收:=SMA(MAX(C-REF(C,1),0),8,1)/SMA(ABS(C-REF(C,1)),8,1)*100, LINETHICK1;多頭:=IF(CLOSE>OPEN,AAAA*(HIGH-LOW),IF(CLOSE<OPEN,AAAA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED,LINETHICK1;空頭:=IF(CLOSE>OPEN,0-AAAA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AAAA*(HIGH-LOW),0-VOL/2)),COLOR000000,LINETHICK1;主買(mǎi)占:=多頭/V*100;主賣(mài)占:=空頭/V*100;收1:=SMA(收,2,1),COLOR000099,LINETHICK1;DRAWNUMBER1(ISLASTBAR,L,主買(mǎi)占,1),COLORWHITE;DRAWTEXT(ISLASTBAR,L,? ?'nbsp; ? ',COLORWHITE;DRAWNUMBER1(主買(mǎi)占>=0,L,INTPART(主買(mǎi)占),1),COLORWHITE;

A101:=REF(HIGH,3)=HHV(HIGH,2*3+1);?B101:=FILTER(A101,3);?C101:=BACKSET(B101,3+1);?D1:=FILTER(C101,3);
A201:=REF(LOW,3)=LLV(LOW,2*3+1);?B201:=FILTER(A201,3);?C22:=BACKSET(B201,3+1);?D2:=FILTER(C22,3);
E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2;?E2:=(HIGH+LOW)/2;H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;H2:=D1 AND NOT(D2 AND E1>=E2);L1:=D2 AND NOT(D1 AND E1=E2);X1:=REF(BARSLAST(H1),1)+1;?F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,1000000),X1));G1:=CROSS(F1=1,0.5);?I1:=BACKSET(G1,2);LD01:=I1>REF(I1,1);L2:=LD01 OR ISLASTBAR OR BARSCOUNT(CLOSE)=1;X2:=REF(BARSLAST(L2),1)+1;?F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2));G2:=CROSS(F2=1,0.5);?I2:=BACKSET(G2,2);?HD01:=I2>REF(I2,1);J1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD01),BARSLAST(LD01))+1);?J2:=J1>REF(J1,1);A3:=H;?B3:=REF(H,REF(BARSLAST(HD01),1)+1)>REF(H,REF(BARSLAST(HD01),1)+2+REF(BARSLAST(HD01),REF(BARSLAST(HD01),1)+2));D3:=A3 AND B3 AND HD01;?E3:=BACKSET(D3,REF(BARSLAST(HD01),1)+2);?HH01:=E3>REF(E3,1);A4:=L>REF(L,REF(BARSLAST(LD01),1)+1);B4:=REF(L,REF(BARSLAST(LD01),1)+1);?D4:=A4 AND B4 AND LD01;?E4:=BACKSET(D4,REF(BARSLAST(LD01),1)+2);?LL:=E4>REF(E4,1);

H3:=HH01 OR ISLASTBAR OR BARSCOUNT(C)=1;?X3:=REF(BARSLAST(H3),1)+1;?F3:=BACKSET(H3 AND COUNT(LL,X3)>0,LLVBARS(IF(LL,L,POW(10,20)),X3));G3:=CROSS(F3=1,0.5);??I3:=BACKSET(G3,2);??LZ:=I3>REF(I3,1);?L4:=LZ OR ISLASTBAR OR BARSCOUNT(C)=1;X4:=REF(BARSLAST(L4),1)+1;?F4:=BACKSET(L4 AND COUNT(HH01,X4)>0,HHVBARS(IF(HH01,H,-1*POW(10,20)),X4));G4:=CROSS(F4=1,0.5);??I4:=BACKSET(G4,2);??HZ:=I4>REF(I4,1);K11:=BACKSET(ISLASTBAR,MIN(BARSLAST(HZ),BARSLAST(LZ))+1);?K22:=K11>REF(K11,1);UU:=BACKSET(ISLASTBAR,BARSLAST(LD01)+1);VV:=UU>REF(UU,1);WW:=BACKSET(VV,REF(BARSLAST(LD01),1)+2);XX:=WW>REF(WW,1);UU2:=BACKSET(ISLASTBAR,BARSLAST(HD01)+1);VV2:=UU2>REF(UU2,1);WW2:=BACKSET(VV2,REF(BARSLAST(HD01),1)+2);XX2:=WW2>REF(WW2,1);
DRAWLINE1(XX,L,VV,L,1),COLORCCCC00,LINETHICK1;DRAWLINE1(XX2,H,VV2,H,1),COLORMAGENTA,LINETHICK1;

LC:=REF(CLOSE,1);?RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;?DRAWTEXT(CROSS(RSI,11),LOW,'低吸 ',COLORFFFFFF;DRAWTEXT(CROSS(84,RSI) , HIGH,' 逃頂 ',COLOR00FF00 ;
老師麻煩幫忙修改成只顯示數(shù)字和低吸逃頂
?
?來(lái)源:程序化99
文華技術(shù)人員： ?參考：
? XA_1:=7; XA_2:=7; XA_3:=10; XA_4:=120; XA_5:=1; AMOUNT:=AVPRICE*V; CAPITAL:=GETPRICE1('流通股本'); INDEXL:="999001$L"; INDEXC:="999001$C"; INDEXH:="999001$H"; ?CURRBARSCOUNT:=DATACOUNT-BARPOS+1; XA_6:=EMA(INDEXC,120)/EMA(CLOSE,120); XA_7:=1; XA_8:=1; XA_9:=IF(1,(INDEXC/XA_6+0.812*REF(INDEXC/XA_6,1)+0.618*REF(INDEXC/XA_6,2)+0.382*REF(INDEXC/XA_6,3)+0.191*REF(INDEXC/XA_6,4))/3.003,NULL); XA_12:=(CLOSE+0.812*REF(CLOSE,1)+0.618*REF(CLOSE,2)+0.382*REF(CLOSE,3)+0.191*REF(CLOSE,4))/3.003;
XA_13:=(3*CLOSE+LOW+OPEN+HIGH)/6; XA_14:=XA_13; XA_15:=IF(CLOSE<500,0,(20*XA_14+19*REF(XA_14,1)+18*REF(XA_14,2)+17*REF(XA_14,3)+16*REF(XA_14,4)+15*REF(XA_14,5)+14*REF(XA_14,6)+13*REF(XA_14,7)+12*REF(XA_14,8)+11*REF(XA_14,9)+10*REF(XA_14,10)+9*REF(XA_14,11)+8*REF(XA_14,12)+7*REF(XA_14,13)+6*REF(XA_14,14)+5*REF(XA_14,15)+4*REF(XA_14,16)+3*REF(XA_14,17)+2*REF(XA_14,18)+REF(XA_14,20))/210); XA_16:=IF(1,NULL,MA(XA_15,5)); XA_17:=LOW>REF(HIGH,1)+0.001; XA_18:=BARSLAST(XA_17); XA_19:=COUNT(LOW>REF(HIGH,XA_18+1),XA_18+1)=XA_18+1; XA_20:=CROSS(BACKSET(XA_19>0 AND ISLASTBAR,XA_18+1),0.5); XA_21:=BARSLAST(XA_20); XA_22:=IF(CURRBARSCOUNT<=REFX1(XA_21+1,10000),REFX1(LLV(LOW,XA_21+1),10000),NULL); XA_23:=IF(CURRBARSCOUNT<=REFX1(XA_21+1,10000),REF(HIGH,XA_21+1),NULL); XA_24:=HIGH<REF(LOW,1)-0.001; XA_25:=BARSLAST(XA_24); XA_26:=COUNT(HIGH<REF(LOW,XA_25+1),XA_25+1)=XA_25+1; XA_27:=CROSS(BACKSET(XA_26>0 AND ISLASTBAR,XA_25+1),0.5); XA_28:=BARSLAST(XA_27); XA_29:=IF(CURRBARSCOUNT<=REFX1(XA_28+1,10000),REFX1(HHV(HIGH,XA_28+1),10000),NULL); XA_30:=IF(CURRBARSCOUNT<=REFX1(XA_28+1,10000),REF(LOW,XA_28+1),NULL); XA_31:=HHV((CLOSE+HIGH+LOW)/3,2); XA_32:=LLV((CLOSE+HIGH+LOW)/3,2); XA_33:=XA_31; XA_34:=(XA_31+XA_32)/2; XA_35:=XA_32; 上線:=IF(1,REF(XA_33,1),NULL),NODRAW,COLOR0000CC; 中線:=IF(1,REF(XA_34,1),NULL),NODRAW,LINETHICK3; 下線:=IF(1,REF(XA_35,1),NULL),NODRAW,COLORCCCC00; XA_36:=COST(1); XA_37:=COST(10); XA_38:=COST(20); XA_39:=COST(30); XA_40:=COST(40); XA_41:=COST(50); XA_42:=COST(60); XA_43:=COST(70); XA_44:=COST(80); XA_45:=COST(90); XA_46:=COST(99); XA_47:=COST(5); XA_48:=COST(15); XA_49:=COST(25); XA_50:=COST(35); XA_51:=COST(45); XA_52:=COST(55); XA_53:=COST(65); XA_54:=COST(75); XA_55:=COST(85); XA_56:=COST(95); XA_57:=XA_47-XA_36; XA_58:=XA_37-XA_47; XA_59:=XA_48-XA_37; XA_60:=XA_38-XA_48; XA_61:=XA_49-XA_38; XA_62:=XA_39-XA_49; XA_63:=XA_50-XA_39; XA_64:=XA_40-XA_50; XA_65:=XA_51-XA_40; XA_66:=XA_41-XA_51; XA_67:=XA_52-XA_41; XA_68:=XA_42-XA_52; XA_69:=XA_53-XA_42; XA_70:=XA_43-XA_53; XA_71:=XA_54-XA_43; XA_72:=XA_44-XA_54; XA_73:=XA_55-XA_44; XA_74:=XA_45-XA_55; XA_75:=XA_56-XA_45; XA_76:=XA_46-XA_56; XA_77:=MIN(XA_57,MIN(XA_58,MIN(XA_59,MIN(XA_60,MIN(XA_61,MIN(XA_62,MIN(XA_63,MIN(XA_64,MIN(XA_65,MIN(XA_66,MIN(XA_67,MIN(XA_68,MIN(XA_69,MIN(XA_70,MIN(XA_71,MIN(XA_72,MIN(XA_73,MIN(XA_74,MIN(XA_75,XA_76))))))))))))))))))); XA_78:=IF(XA_57=XA_77,(XA_47+XA_36)/2,IF(XA_58=XA_77,(XA_47+XA_37)/2,IF(XA_59=XA_77,(XA_48+XA_37)/2,IF(XA_60=XA_77,(XA_48+XA_38)/2,IF(XA_61=XA_77,(XA_49+XA_38)/2,IF(XA_62=XA_77,(XA_49+XA_39)/2,IF(XA_63=XA_77,(XA_50+XA_39)/2,IF(XA_64=XA_77,(XA_50+XA_40)/2,IF(XA_65=XA_77,(XA_51+XA_40)/2,IF(XA_66=XA_77,(XA_51+XA_41)/2,IF(XA_67=XA_77,(XA_52+XA_41)/2,IF(XA_68=XA_77,(XA_52+XA_42)/2,IF(XA_69=XA_77,(XA_53+XA_42)/2,IF(XA_70=XA_77,(XA_53+XA_43)/2,IF(XA_71=XA_77,(XA_54+XA_43)/2,IF(XA_72=XA_77,(XA_54+XA_44)/2,IF(XA_73=XA_77,(XA_55+XA_44)/2,IF(XA_74=XA_77,(XA_55+XA_45)/2,IF(XA_75=XA_77,(XA_56+XA_45)/2,(XA_56+XA_46)/2))))))))))))))))))); 止盈:REF(XA_34,1); 籌碼峰線:=XA_78,NODRAW,COLOR00EEEE; XA_79:=IF(XA_8,XA_77,0);
XA_95:=MAX(CLOSE,OPEN); XA_96:=MIN(CLOSE,OPEN); XA_97:=MA(CLOSE,20); XA_98:=BARSLASTCOUNT(CLOSE<XA_97); XA_99:=BACKSET((XA_98>=4)*XA_98,XA_98); XA_100:=BARSLASTCOUNT(CLOSE>XA_97); XA_101:=BACKSET((XA_100>=4)*XA_100,XA_100); XA_102:=BARSLASTCOUNT(NOT(XA_99 OR XA_101)); XA_103:=BARSLASTCOUNT(REF(XA_99>0,XA_102)); XA_104:=BARSLASTCOUNT(REF(XA_101>0,XA_102));
XA_105:=IF(XA_7<1,0,CROSS(BACKSET(XA_103||ISLASTBAR,BARSLAST(LLV(XA_96,XA_103)=XA_96)+1),0.5)); XA_106:=IF(XA_8<1,0,CROSS(BACKSET(XA_104||ISLASTBAR,BARSLAST(HHV(XA_95,XA_104)=XA_95)+1),0.5)); XA_107:=IF(XA_7<1,0,REF(XA_95,BARSLAST(XA_106))); XA_108:=IF(XA_8<1,0,REF(XA_96,BARSLAST(XA_105))); XA_109:=BARSLAST(XA_103=1); XA_110:=REF(XA_107,BARSLAST(XA_103)); XA_111:=REF(XA_108,XA_109); XA_112:=(XA_110-XA_111)*0.191+XA_111; XA_113:=(XA_110-XA_111)*0.382+XA_111; XA_114:=(XA_110-XA_111)*0.5+XA_111; XA_115:=(XA_110-XA_111)*0.618+XA_111; XA_116:=(XA_110-XA_111)*0.809+XA_111; XA_117:=XA_110+(XA_110-XA_111)*0.191; XA_118:=XA_111-(XA_110-XA_111)*0.191; XA_119:=REFX1(XA_111,100000); XA_120:=REFX1(XA_113,100000); XA_121:=REFX1(XA_115,100000); XA_122:=REFX1(XA_110,100000); XA_123:=REFX1(XA_117,100000); XA_124:=REFX1(XA_118,100000); XA_125:=IF(PERIOD=7,7,IF(PERIOD=6,14,30)); XA_126:=IF(PERIOD=7,8,IF(PERIOD=6,16,35)); XA_127:=IF(PERIOD=7,9,IF(PERIOD=6,18,40)); XA_128:=IF(PERIOD=7,10,IF(PERIOD=6,20,45)); XA_129:=IF(PERIOD=7,11,IF(PERIOD=6,22,50)); XA_130:=IF(PERIOD=7,12,IF(PERIOD=6,24,55)); XA_131:=EMA(CLOSE,XA_125); XA_132:=EMA(CLOSE,XA_126); XA_133:=EMA(CLOSE,XA_127); XA_134:=EMA(CLOSE,XA_128); XA_135:=EMA(CLOSE,XA_129); XA_136:=EMA(CLOSE,XA_130); XA_137:=IF(XA_7<1,0,IF(CAPITAL>0 AND CLOSE<500,0,1));
XA_138:=1;
XA_139:=REFX1(MA((CLOSE-REF(CLOSE,1))/REF(CLOSE,1),30),10000); XA_140:=MA(CLOSE,1); XA_141:=SMA(SMA(XA_140,2,1),2,1); XA_142:=MA(XA_141,3); XA_143:=IF(CROSS(XA_105,0.5),1,IF(CROSS(XA_106,0.5),(-1),0)); XA_144:=IF(BARSSINCE(CLOSE>0)<=3 AND XA_143=0 AND XA_141>XA_142,1,IF(BARSSINCE(CLOSE>0)<=3 AND XA_143=0 AND XA_141<=XA_142,(-1),XA_143)); XA_145:=IF(BARSSINCE(CLOSE)<60,IF(MA(CLOSE,2)>MA(CLOSE,20),1,(-1)),XA_144); XA_146:=REF(XA_145,BARSLAST(XA_145)); XA_147:=ZIGZAG(C,XA_3,1); XA_148:=PEAK(C,XA_3,1,1); XA_149:=TROUGH(C,XA_3,1,1); XA_150:=XA_147>REF(XA_147,1); XA_151:=XA_147<=REF(XA_147,1); XA_152:=IF(XA_7<1,0,REF(XA_146=1,1)); XA_153:=IF(XA_8<1,0,REF(XA_146=(-1),1)); XA_154:=IF(XA_7<1,0,IF(CAPITAL>0 AND CLOSE<500,0,1)); XA_155:=IF(XA_154,XA_152,IF(PERIOD>=5,XA_150,XA_152)); XA_156:=IF(XA_154,XA_153,IF(PERIOD>=5,XA_151,XA_153)); XA_157:=CROSS(XA_155=1,0.5)&&COUNT(CROSS(XA_155=1,0.5),BARSLAST(CROSS(XA_156=1,0.5)))=1; XA_158:=EMA(CLOSE,3)-EMA(CLOSE,6)-(EMA(CLOSE,6)-EMA(CLOSE,12))*(-100); XA_159:=EMA(XA_158,3); XA_160:=CROSS(XA_158,XA_159); XA_161:=CROSS(XA_159,XA_158);
XA_162:=REF(CLOSE,1); XA_163:=IF(CLOSE>=1,10000,100000); XA_164:=1.1*XA_162-49/XA_163; XA_165:=0.9*XA_162+51/XA_163; XA_166:=IF((CLOSE-REF(CLOSE,1))*100/REF(CLOSE,1)>=10-0.01*100/REF(OPEN,1),1,0); XA_167:=CLOSE<=XA_165; XA_168:=HIGH>=XA_164; XA_169:=LOW<=XA_165; XA_170:=CLOSE>OPEN AND CLOSE>1.05*OPEN-51/XA_163 OR (CLOSE>1000 AND CLOSE>XA_162*1.024); XA_171:=CLOSE<OPEN AND CLOSE<0.95*OPEN+49/XA_163 OR (CLOSE>1000 AND CLOSE<XA_162*0.976); XA_172:=PERIOD=5 AND ISNULL(WINNER(CLOSE)) AND (ABS(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)>=0.025 OR ABS(CLOSE-OPEN)>=60); XA_173:=REF(CLOSE,1); XA_174:=SMA(MAX(CLOSE-XA_173,0),2,1)/SMA(ABS(CLOSE-XA_173),2,1)*100; XA_175:=45; XA_176:=20; XA_177:=XA_174<XA_175 AND REF(XA_174,1)>XA_175; XA_178:=XA_174<XA_176 AND REF(XA_174,1)>XA_176; XA_179:=REF(COUNT(XA_166,5),1)>=1; XA_180:=SMA(LOW,4,3); XA_181:=5; XA_182:=REF(HIGH,XA_181)=HHV(HIGH,2*XA_181+1); XA_183:=FILTER(XA_182,XA_181); XA_184:=BACKSET(XA_183,XA_181+1); XA_185:=FILTER(XA_184,XA_181); XA_186:=REF(HIGH,BARSLAST(XA_185)); XA_187:=REF(MAX(CLOSE,OPEN),XA_181)=HHV(MAX(CLOSE,OPEN),2*XA_181+1); XA_188:=FILTER(XA_187,XA_181); XA_189:=BACKSET(XA_188,XA_181+1); XA_190:=FILTER(XA_189,XA_181); XA_191:=REF(MAX(CLOSE,OPEN),BARSLAST(XA_190)); XA_192:=REF(LOW,XA_181)=LLV(LOW,2*XA_181+1); XA_193:=FILTER(XA_192,XA_181); XA_194:=BACKSET(XA_193,XA_181+1); XA_195:=FILTER(XA_194,XA_181); XA_196:=REF(LOW,BARSLAST(XA_195)); XA_197:=REF(MIN(CLOSE,OPEN),XA_181)=LLV(MIN(CLOSE,OPEN),2*XA_181+1); XA_198:=FILTER(XA_197,XA_181); XA_199:=BACKSET(XA_198,XA_181+1); XA_200:=FILTER(XA_199,XA_181); XA_201:=REF(MIN(CLOSE,OPEN),BARSLAST(XA_200)); XA_202:=IF(0,XA_186,XA_191); XA_203:=IF(0,XA_196,XA_201); XA_204:=REF(HIGH,3)=HHV(HIGH,2*3+1); XA_205:=FILTER(XA_204,3); XA_206:=BACKSET(XA_205,3+1); XA_207:=FILTER(XA_206,3); XA_208:=REF(LOW,3)=LLV(LOW,2*3+1); XA_209:=FILTER(XA_208,3); XA_210:=BACKSET(XA_209,3+1); XA_211:=FILTER(XA_210,3); XA_212:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2; XA_213:=(HIGH+LOW)/2; XA_214:=XA_207 AND NOT(XA_211 AND XA_212>=XA_213) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1; XA_215:=XA_207 AND NOT(XA_211 AND XA_212>=XA_213); XA_216:=XA_211 AND NOT(XA_207 AND XA_212=XA_213); XA_217:=REF(BARSLAST(XA_214),1)+1; XA_218:=BACKSET(XA_214 AND COUNT(XA_216,XA_217)>0,LLVBARS(IF(XA_216,LOW,10000),XA_217)); XA_219:=XA_218>REF(XA_218,1); XA_220:=BACKSET(XA_219,2); XA_221:=XA_220>REF(XA_220,1); XA_222:=XA_221 OR ISLASTBAR OR BARSCOUNT(CLOSE)=1; XA_223:=REF(BARSLAST(XA_222),1)+1; XA_224:=BACKSET(XA_222 AND COUNT(XA_215,XA_223)>0,HHVBARS(IF(XA_215,HIGH,0),XA_223)); XA_225:=XA_224>REF(XA_224,1); XA_226:=BACKSET(XA_225,2); XA_227:=XA_226>REF(XA_226,1); XA_228:=BACKSET(ISLASTBAR,MIN(BARSLAST(XA_227),BARSLAST(XA_221))+1); XA_229:=XA_228>REF(XA_228,1); XA_230:=HIGH; XA_231:=REF(HIGH,REF(BARSLAST(XA_227),1)+1)>REF(HIGH,REF(BARSLAST(XA_227),1)+2+REF(BARSLAST(XA_227),REF(BARSLAST(XA_227),1)+2)); XA_232:=XA_230 AND XA_231 AND XA_227; XA_233:=BACKSET(XA_232,REF(BARSLAST(XA_227),1)+2); XA_234:=XA_233>REF(XA_233,1); XA_235:=LOW>REF(LOW,REF(BARSLAST(XA_221),1)+1); XA_236:=REF(LOW,REF(BARSLAST(XA_221),1)+1); XA_237:=XA_235 AND XA_236 AND XA_221; XA_238:=BACKSET(XA_237,REF(BARSLAST(XA_221),1)+2); XA_239:=XA_238>REF(XA_238,1); XA_240:=XA_234 OR ISLASTBAR OR BARSCOUNT(CLOSE)=1; XA_241:=REF(BARSLAST(XA_240),1)+1; XA_242:=BACKSET(XA_240 AND COUNT(XA_239,XA_241)>0,LLVBARS(IF(XA_239,LOW,POW(10,20)),XA_241)); XA_243:=XA_242>REF(XA_242,1); XA_244:=BACKSET(XA_243,2); XA_245:=XA_244>REF(XA_244,1); XA_246:=XA_245 OR ISLASTBAR OR BARSCOUNT(CLOSE)=1; XA_247:=REF(BARSLAST(XA_246),1)+1; XA_248:=BACKSET(XA_246 AND COUNT(XA_234,XA_247)>0,HHVBARS(IF(XA_234,HIGH,-POW(10,20)),XA_247)); XA_249:=XA_248>REF(XA_248,1); XA_250:=BACKSET(XA_249,2); XA_251:=XA_250>REF(XA_250,1); XA_252:=BACKSET(ISLASTBAR,MIN(BARSLAST(XA_251),BARSLAST(XA_245))+1); XA_253:=XA_252>REF(XA_252,1); XA_254:=BACKSET(ISLASTBAR,BARSLAST(XA_221)+1); XA_255:=XA_254>REF(XA_254,1); XA_256:=BACKSET(XA_255,REF(BARSLAST(XA_221),1)+2); XA_257:=XA_256>REF(XA_256,1); XA_258:=BACKSET(ISLASTBAR,BARSLAST(XA_227)+1); XA_259:=XA_258>REF(XA_258,1); XA_260:=BACKSET(XA_259,REF(BARSLAST(XA_227),1)+2); XA_261:=XA_260>REF(XA_260,1); K:=TRENDLINES(XA_257,LOW,XA_255,LOW),COLORWHITE; KK:=TRENDLINES(XA_261,HIGH,XA_259,HIGH),COLORWHITE; REF(XA_34,1),COLORWHITE; XA_262:=CURRBARSCOUNT<2; XA_263:=CURRBARSCOUNT<13; XA_264:=IF(XA_262,上線,NULL); XA_265:=IF(XA_262,中線,NULL); XA_266:=IF(XA_262,下線,NULL); XA_267:=IF(XA_263,XA_264,NULL); XA_268:=IF(XA_263,XA_265,NULL); XA_269:=IF(XA_263,XA_266,NULL);
中線,COLOR0000CC,NODRAW,LINETHICK2; IF(BACKSET(CLOSE<=REF(XA_34,1),1),中線,NULL),COLOR00CC00,LINETHICK2; AHC1:=CLOSE*VOL; AHC2:=EMA((EMA(AHC1,3)/EMA(VOL,3)+EMA(AHC1,6)/EMA(VOL,6)+EMA(AHC1,12)/EMA(VOL,12)+EMA(AHC1,24)/EMA(VOL,24))/4,34),COLORYELLOW;

下檔線:=(((CLOSE - LLV(LOW,13)) / (HHV(HIGH,13) - LLV(LOW,13))) * 100); RRRSV:=SMA(下檔線,3,1); KKK:=SMA(RRRSV,3,1); DDD:=((3 * RRRSV) - (2 * KKK)); JJ12:=(((CLOSE - LLV(LOW,55)) / (HHV(HIGH,55) - LLV(LOW,55))) * 100); RSV24:=SMA(JJ12,3,1); K24:=SMA(RSV24,3,1); D24:=((3 * RSV24) - (2 * K24)); 壓力2:=IF(CROSS(D24,DDD),HIGH,REF(HIGH,BARSLAST(CROSS(D24,DDD)))),COLORFFFFFF; 壓力位:=IF(ISLASTBAR,壓力2,NULL);

龍頭線1:=(MA(C,7)),COLORF8A1AB;? 龍頭線2:=(EMA(C,17)),LINETHICK5,COLORYELLOW;? 龍頭線3:=(MA(C,25)),LINETHICK2,COLORFF00FF; 龍頭線4:=(MA(C,43)),COLORCYAN;? 龍頭線5:=(MA(C,72)),COLOR0752B5;?
W:=EMA(C,5); W1:=EMA(W,8); W2:=REF(W1,1); M:=SMA(CLOSE,8,1); M1:=(SMA(M,11,1)); M2:=(REF(M1,1));
AAAA:=VOL/((HIGH-LOW)*2-ABS(CLOSE-OPEN)); QSQ:=100; QLFJ:=50; QLFJ1:=40; QLFJ2:=60; LSQ:=0; LSQ1:=70; LSQ2:=30; VAR2AAA:=(HHV(HIGH,16)-CLOSE)/(HHV(HIGH,16)-LLV(LOW,16))*100; VAR3AAA:=(CLOSE-LLV(LOW,16))/(HHV(HIGH,16)-LLV(LOW,16))*100;
開(kāi):=SMA(MAX(O-REF(O,1),0),8,1)/SMA(ABS(O-REF(O,1)),8,1)*100, LINETHICK1; 高:=SMA(MAX(H-REF(H,1),0),8,1)/SMA(ABS(H-REF(H,1)),8,1)*100, LINETHICK1; 低:=SMA(MAX(L-REF(L,1),0),8,1)/SMA(ABS(L-REF(L,1)),8,1)*100, LINETHICK1; 收:=SMA(MAX(C-REF(C,1),0),8,1)/SMA(ABS(C-REF(C,1)),8,1)*100, LINETHICK1; 多頭:=IF(CLOSE>OPEN,AAAA*(HIGH-LOW),IF(CLOSE<OPEN,AAAA*((HIGH-OPEN)+(CLOSE-LOW)),VOL/2)),COLORRED,LINETHICK1; 空頭:=IF(CLOSE>OPEN,0-AAAA*((HIGH-CLOSE)+(OPEN-LOW)),IF(CLOSE<OPEN,0-AAAA*(HIGH-LOW),0-VOL/2)),COLOR000000,LINETHICK1; 主買(mǎi)占:=多頭/V*100; 主賣(mài)占:=空頭/V*100; 收1:=SMA(收,2,1),COLOR000099,LINETHICK1; DRAWNUMBER1(ISLASTBAR,L,主買(mǎi)占,1),COLORWHITE,VALIGN0; DRAWNUMBER1(主買(mǎi)占>=0,L,INTPART(主買(mǎi)占),1),COLORWHITE,VALIGN0;

A101:=REF(HIGH,3)=HHV(HIGH,2*3+1);? B101:=FILTER(A101,3);? C101:=BACKSET(B101,3+1);? D1:=FILTER(C101,3);
A201:=REF(LOW,3)=LLV(LOW,2*3+1);? B201:=FILTER(A201,3);? C22:=BACKSET(B201,3+1);? D2:=FILTER(C22,3);
E1:=(REF(LLV(LOW,2*3),1)+REF(HHV(HIGH,2*3),1))/2;? E2:=(HIGH+LOW)/2; H1:=(D1 AND NOT(D2 AND E1>=E2)) OR ISLASTBAR OR BARSCOUNT(CLOSE)=1; H2:=D1 AND NOT(D2 AND E1>=E2); L1:=D2 AND NOT(D1 AND E1=E2); X1:=REF(BARSLAST(H1),1)+1;? F1:=BACKSET(H1 AND COUNT(L1,X1)>0,LLVBARS(IF(L1,LOW,1000000),X1)); G1:=CROSS(F1=1,0.5);? I1:=BACKSET(G1,2); LD01:=I1>REF(I1,1); L2:=LD01 OR ISLASTBAR OR BARSCOUNT(CLOSE)=1; X2:=REF(BARSLAST(L2),1)+1;? F2:=BACKSET(L2 AND COUNT(H2,X2)>0,HHVBARS(IF(H2,HIGH,0),X2)); G2:=CROSS(F2=1,0.5);? I2:=BACKSET(G2,2);? HD01:=I2>REF(I2,1); J1:=BACKSET(ISLASTBAR,MIN(BARSLAST(HD01),BARSLAST(LD01))+1);? J2:=J1>REF(J1,1); A3:=H; ?B3:=REF(H,REF(BARSLAST(HD01),1)+1)>REF(H,REF(BARSLAST(HD01),1)+2+REF(BARSLAST(HD01),REF(BARSLAST(HD01),1)+2)); D3:=A3 AND B3 AND HD01;? E3:=BACKSET(D3,REF(BARSLAST(HD01),1)+2);? HH01:=E3>REF(E3,1); A4:=L>REF(L,REF(BARSLAST(LD01),1)+1); B4:=REF(L,REF(BARSLAST(LD01),1)+1); ?D4:=A4 AND B4 AND LD01; ?E4:=BACKSET(D4,REF(BARSLAST(LD01),1)+2); ?LL:=E4>REF(E4,1);

H3:=HH01 OR ISLASTBAR OR BARSCOUNT(C)=1;? X3:=REF(BARSLAST(H3),1)+1;? F3:=BACKSET(H3 AND COUNT(LL,X3)>0,LLVBARS(IF(LL,L,POW(10,20)),X3)); G3:=CROSS(F3=1,0.5);?? I3:=BACKSET(G3,2);?? LZ:=I3>REF(I3,1);? L4:=LZ OR ISLASTBAR OR BARSCOUNT(C)=1; X4:=REF(BARSLAST(L4),1)+1;? F4:=BACKSET(L4 AND COUNT(HH01,X4)>0,HHVBARS(IF(HH01,H,-1*POW(10,20)),X4)); G4:=CROSS(F4=1,0.5);?? I4:=BACKSET(G4,2);?? HZ:=I4>REF(I4,1); K11:=BACKSET(ISLASTBAR,MIN(BARSLAST(HZ),BARSLAST(LZ))+1);? K22:=K11>REF(K11,1); UU:=BACKSET(ISLASTBAR,BARSLAST(LD01)+1); VV:=UU>REF(UU,1); WW:=BACKSET(VV,REF(BARSLAST(LD01),1)+2); XX:=WW>REF(WW,1); UU2:=BACKSET(ISLASTBAR,BARSLAST(HD01)+1); VV2:=UU2>REF(UU2,1); WW2:=BACKSET(VV2,REF(BARSLAST(HD01),1)+2); XX2:=WW2>REF(WW2,1);

LC:=REF(CLOSE,1);? RSI:=SMA(MAX(CLOSE-LC,0),6,1)/SMA(ABS(CLOSE-LC),6,1)*100;? DRAWTEXT(CROSS(RSI,11),LOW,'★低吸 '),COLORFFFFFF; DRAWTEXT(CROSS(84,RSI) , HIGH,'→ 逃頂 '),COLOR00FF00 ;