在弹出的对话框中输入以下代码:
”`pascal
M1:=COUNT(CLOSE>REF(CLOSE,1),5);
M2:=COUNT(CLOSE[1;
T1:=FILTER(T,5);
T2:=FILTER(T1,5);
T3:=FILTER(T2,5);
M6:=SUM(IF(T3,1,0));
M7:=SUM(IF(T2 AND NOT T3,1,0));
M8:=SUM(IF(T1 AND NOT T2,1,0));
M9:=SUM(IF(NOT T1,1,0));
M10:=SUM(IF(T3,1,0)*100/M6;
M11:=SUM(IF(T2 AND NOT T3,1,0)*100/M7;
M12:=SUM(IF(T1 AND NOT T2,1,0)*100/M8;
M13:=SUM(IF(NOT T1,1,0)*100/M9;
M14:=M10+M11+M12+M13;
M15:=M10/M14;
M16:=M11/M14;
M17:=M12/M14;
M18:=M13/M14;
T4:=M15>M16 AND M15>M17 AND M15>M18;
T5:=FILTER(T4,5);
T6:=FILTER(T5,5);
T7:=FILTER(T6,5);
M19:=SUM(IF(T7,1,0));
M20:=SUM(IF(T7 AND NOT T6,1,0));
M21:=SUM(IF(T6 AND NOT T5,1,0));
M22:=SUM(IF(T5 AND NOT T4,1,0));
M23:=SUM(IF(NOT T4,1,0));
M24:=M19+M20+M21+M22+M23;
M25:=M19/M24;
M26:=M20/M24;
M27:=M21/M24;
M28:=M22/M24;
M29:=M23/M24;
M30:=M25+M26+M27+M28+M29;
T8:=M30>1;
T9:=FILTER(T8,5);
T10:=FILTER(T9,5);
T11:=FILTER(T10,5);
M31:=SUM(IF(T11,1,0));
M32:=SUM(IF(T11 AND NOT T10,1,0));
M33:=SUM(IF(T10 AND NOT T9,1,0));
M34:=SUM(IF(T9 AND NOT T8,1,0));
M35:=SUM(IF(NOT T8,1,0));
M36:=M31+M32+M33+M34+M35;
M37:=M31/M36;
M38:=M32/M36;
M39:=M33/M36;
M40:=M34/M36;
M41:=M35/M36;
M42:=M37+M38+M39+M40+M41;
T12:=M42>1;
T13:=FILTER(T12,5);
T14:=FILTER(T13,5);
T15:=FILTER(T14,5);
M43:=SUM(IF(T15,1,0));
M44:=SUM(IF(T15 AND NOT T14,1,0));
M45:=SUM(IF(T14 AND NOT T13,1,0));
M46:=SUM(IF(T13 AND NOT T12,1,0));
M47:=SUM(IF(NOT T12,1,0));
M48:=M43+M44+M45+M46+M47;
M49:=M43/M48;
M50:=M44/M48;
M51:=M45/M48;
M52:=M46/M48;
M53:=M47/M48;
M54:=M49+M50+M51+M52+M53;
T16:=M54>1;
T17:=FILTER(T16,5);
T18:=FILTER(T17,5);
T19:=FILTER(T18,5);
M55:=SUM(IF(T19,1,0));
M56:=SUM(IF(T19 AND NOT T18,1,0));
M57:=SUM(IF(T18 AND NOT T17,1,0));
M58:=SUM(IF(T17 AND NOT T16,1,0));
M59:=SUM(IF(NOT T16,1,0));
M60:=M55+M56+M57+M58+M59;
M61:=M55/M60;
M62:=M56/M60;
M63:=M57/M60;
M64:=M58/M60;
M65:=M59/M60;
M66:=M61+M62+M63+M64+M65;
T20:=M66>1;
T21:=FILTER(T20,5);
T22:=FILTER(T21,5);
T23:=FILTER(T22,5);
M67:=SUM(IF(T23,1,0));
M68:=SUM(IF(T23 AND NOT T22,1,0));
M69:=SUM(IF(T22 AND NOT T21,1,0));
M70:=SUM(IF(T21 AND NOT T20,1,0));
M71:=SUM(IF(NOT T20,1,0));
M72:=M67+M68+M69+M70+M71;
M73:=M67/M72;
M74:=M68/M72;
M75:=M69/M72;
M76:=M70/M72;
M77:=M71/M72;
M78:=M73+M74+M75+M76+M77;
T22:=M78>1;
T23:=FILTER(T22,5);
T24:=FILTER(T23,5);
T25:=FILTER(T24,5);
M79:=SUM(IF(T25,1,0));
M80:=SUM(IF(T25 AND NOT T24,1,0));
M81:=SUM(IF(T24 AND NOT T23,1,0));
M82:=SUM(IF(T23 AND NOT T22,1,0));
M83:=SUM(IF(NOT T22,1,0));
M84:=M79+M80+M81+M82+M83;
M85:=M79/M84;
M86:=M80/M84;
M87:=M81/M84;
M88:=M82/M84;
M89:=M83/M84;
M90:=M85+M86+M87+M88+M89;
T26:=M90>1;
T27:=FILTER(T26,5);
T28:=FILTER(T27,5);
T29:=FILTER(T28,5);
M91:=SUM(IF(T29,1,0));
M92:=SUM(IF(T29 AND NOT T28,1,0));
M93:=SUM(IF(T28 AND NOT T27,1,0));
M94:=SUM(IF(T27 AND NOT T26,1,0));
M95:=SUM(IF(NOT T26,1,0));
M96:=M91+M92+M93+M94+M95;
M97:=M91/M96;
M98:=M92/M96;
M99:=M93/M96;
M100:=M94/M96;
M101:=M95/M96;
M102:=M97+M98+M99+M100+M101;
T30:=M102>1;
T31:=FILTER(T30,5);
T32:=FILTER(T31,5);
T33:=FILTER(T32,5);
M103:=SUM(IF(T33,1,0));
M104:=SUM(IF(T33 AND NOT T32,1,0));
M105:=SUM(IF(T32 AND NOT T31,1,0));
M106:=SUM(IF(T31 AND NOT T30,1,0));
M107:=SUM(IF(NOT T30,1,0));
M108:=M103+M104+M105+M106+M107;
M109:=M103/M108;
M110:=M104/M108;
M111:=M105/M108;
M112:=M106/M108;
M113:=M107/M108;
M114:=M109+M110+M111+M112+M113;
T34:=M114>1;
T35:=FILTER(T34,5);
T36:=FILTER(T35,5);
T37:=FILTER(T36,5);
M115:=SUM(IF(T37,1,0));
M116:=SUM(IF(T37 AND NOT T36,1,0));
M117:=SUM(IF(T36 AND NOT T35,1,0));
M118:=SUM(IF(T35 AND NOT T34,1,0));
M119:=SUM(IF(NOT T34,1,0));
M120:=M115+M116+M117+M118+M119;
M121:=M115/M120;
M122:=M116/M120;
M123:=M117/M120;
M124:=M118/M120;
M125:=M119/M120;
M126:=M121+M122+M123+M124+M125;
T38:=M126>1;
T39:=FILTER(T38,5);
T40:=FILTER(T39,5);
T41:=FILTER(T40,5);
M127:=SUM(IF(T41,1,0));
M128:=SUM(IF(T41 AND NOT T40,1,0));
M129:=SUM(IF(T40 AND NOT T39,1,0));
M130:=SUM(IF(T39 AND NOT T38,1,0));
M131:=SUM(IF(NOT T38,1,0));
M132:=M127+M128+M129+M130+M131;
M133:=M127/M132;
M134:=M128/M132;
M135:=M129/M132;
M136:=M130/M132;
M137:=M131/M132;
M138:=M133+M134+M135+M136+M137;
T42:=M138>1;
T43:=FILTER(T42,5);
T44:=FILTER(T43,5);
T45:=FILTER(T44,5);
M139:=SUM(IF(T45,1,0));
M140:=SUM(IF(T45 AND NOT T44,1,0));
M141:=SUM(IF(T44 AND NOT T43,1,0));
M142:=SUM(IF(T43 AND NOT T42,1,0));
M143:=SUM(IF(NOT T42,1,0));
M144:=M139+M140+M141+M142+M143;
M145:=M139/M144;
M146:=M140/M144;
M147:=M141/M144;
M148:=M142/M144;
M149:=M143/M144;
M150:=M145+M146+M147+M148+M149;
T46:=M150>1;
T47:=FILTER(T46,5);
T48:=FILTER(T47,5);
T49:=FILTER(T48,5);
M151:=SUM(IF(T49,1,0));
M152:=SUM(IF(T49 AND NOT T48,1,0));
M153:=SUM(IF(T48 AND NOT T47,1,0));
M154:=SUM(IF(T47 AND NOT T46,1,0));
M155:=SUM(IF(NOT T46,1,0));
M156:=M151+M152+M153+M154+M155;
M157:=M151/M156;
M158:=M152/M156;
M159:=M153/M156;
M160:=M154/M156;
M161:=M155/M156;
M162:=M157+M158+M159+M160+M161;
T50:=M162>1;
T51:=FILTER(T50,5);
T52:=FILTER(T51,5);
T53:=FILTER(T52,5);
M163:=SUM(IF(T53,1,0));
M164:=SUM(IF(T53 AND NOT T52,1,0));
M165:=SUM(IF(T52 AND NOT T51,1,0));
M166:=SUM(IF(T51 AND NOT T50,1,0));
M167:=SUM(IF(NOT T50,1,0));
M168:=M163+M164+M165+M166+M167;
M169:=M163/M168;
M170:=M164/M168;
M171:=M165/M168;
M172:=M166/M168;
M173:=M167/M168;
M174:=M169+M170+M171+M172+M173;
T54:=M174>1;
T55:=FILTER(T54,5);
T56:=FILTER(T55,5);
T57:=FILTER(T56,5);
M175:=SUM(IF(T57,1,0));
M176:=SUM(IF(T57 AND NOT T56,1,0));
M177:=SUM(IF(T56 AND NOT T55,1,0));
M178:=SUM(IF(T55 AND NOT T54,1,0));
M179:=SUM(IF(NOT T54,1,0));
M180:=M175+M176+M177+M178+M179;
M181:=M175/M180;
M182:=M176/M180;
M183:=M177/M180;
M184:=M178/M180;
M185:=M179/M180;
M186:=M181+M182+M183+M184+M185;
T58:=M186>1;
T59:=FILTER(T58,5);
T60:=FILTER(T59,5);
T61:=FILTER(T60,5);
M187:=SUM(IF(T61,1,0));
M188:=SUM(IF(T61 AND NOT T60,1,0));
M189:=SUM(IF(T60 AND NOT T59,1,0));
M190:=SUM(IF(T59 AND NOT T58,1,0));
M191:=SUM(IF(NOT T58,1,0));
M192:=M187+M188+M189+M190+M191;
M193:=M187/M192;
M194:=M188/M192;
M195:=M189/M192;
M196:=M190/M192;
M197:=M191/M192;
M198:=M193+M194+M195+M196+M197;
T62:=M198>1;
T63:=FILTER(T62,5);
T64:=FILTER(T63,5);
T65:=FILTER(T64,5);
M199:=SUM(IF(T65,1,0));
M200:=SUM(IF(T65 AND NOT T64,1,0));
M201:=SUM(IF(T64 AND NOT T63,1,0));
M202:=SUM(IF(T63 AND NOT T62,1,0));
M203:=SUM(IF(NOT T62,1,0));
M204:=M199+M200+M201+M202+M203;
M205:=M199/M204;
M206:=M200/M204;
M207:=M201/M204;
M208:=M202/M204;
M209:=M203/M204;
M210:=M205+M206+M207+M208+M209;
T66:=M210>1;
T67:=FILTER(T66,5);
T68:=FILTER(T67,5);
T69:=FILTER(T68,5);
M211:=SUM(IF(T69,1,0));
M212:=SUM(IF(T69 AND NOT T68,1,0));
M213:=SUM(IF(T68 AND NOT T67,1,0));
M214:=SUM(IF(T67 AND NOT T66,1,0));
M215:=SUM(IF(NOT T66,1,0));
M216:=M211+M212+M213+M214+M215;
M217:=M211/M216;
M218:=M212/M216;
M219:=M213/M216;
M220:=M214/M216;
M221:=M215/M216;
M222:=M217+M218+M219+M220+M221;
T70:=M222>1;
T71:=FILTER(T70,5);
T72:=FILTER(T71,5);
T73:=FILTER(T72,5);
M223:=SUM(IF(T73,1,0));
M224:=SUM(IF(T73 AND NOT T72,1,0));
M225:=SUM(IF(T72 AND NOT T71,1,0));
M226:=SUM(IF(T71 AND NOT T70,1,0));
M227:=SUM(IF(NOT T70,1,0));
M228]