老師麻煩修改一下
作者：文華財經 來源：cxh99.com 發布時間：2023年10月12日
-
咨詢內容：
?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;
開:=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;主買占:=多頭/V*100;主賣占:=空頭/V*100;收1:=SMA(收,2,1),COLOR000099,LINETHICK1;DRAWNUMBER1(ISLASTBAR,L,主買占,1),COLORWHITE;DRAWTEXT(ISLASTBAR,L,? ?'nbsp; ? ',COLORWHITE;DRAWNUMBER1(主買占>=0,L,INTPART(主買占),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 ;
老師 麻煩幫忙修改成只顯示數字和低吸逃頂
?
?來源:程序化99
-
文華技術人員：
?參考：
?
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;
開:=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;
主買占:=多頭/V*100;
主賣占:=空頭/V*100;
收1:=SMA(收,2,1),COLOR000099,LINETHICK1;
DRAWNUMBER1(ISLASTBAR,L,主買占,1),COLORWHITE,VALIGN0;
DRAWNUMBER1(主買占>=0,L,INTPART(主買占),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 ;
打印本文
關閉窗口