公式源码：
VARX:=(C-LLV(LOW,27))/(HHV(H,27)-LLV(LOW,27))*100;
VARX1:=SMA(VARX,3,1);
VARX2:=SMA(VARX1,3,1);
VARX3:=REF(LOW,1);
VARX4:=SMA(ABS(LOW-VARX3),3,1)/SMA(MAX(LOW-VARX3,0),3,1)*100;
VARX5:=EMA(IF(C*1.2,VARX4*10,VARX4/10),3);
VARX6:=LLV(LOW,30);
VARX7:=HHV(VARX5,30);
VARX8:=IF(LLV(LOW,58),1,0);
筹码短期:=DMA((3*H+LOW+O+2*C)/7,V/(SUM(AMOUNT,8)/(AMOUNT/V/100)/100));
筹码中期:=DMA((3*H+LOW+O+2*C)/7,V/(SUM(AMOUNT,13)/(AMOUNT/V/100)/100));
筹码长期:=DMA((3*H+LOW+O+2*C)/7,V/(SUM(AMOUNT,20)/(AMOUNT/V/100)/100));DIF:=EMA(EMA(C,18)-EMA(C,34),11);
MACD:=EMA(EMA(DIF,11),11),COLOR58FF58;
DEF:=2*(DIF-MACD),COLORFFFF00,LINETHICK0;
MMS:=((100)*(EMA(EMA(MTM,6),6)))/(EMA(EMA(ABS(MTM),6),6));
MMM:=((100)*(EMA(EMA(MTM,12),12)))/(EMA(EMA(ABS(MTM),12),12));
MML:=((100)*(EMA(EMA(MTM,26),26)))/(EMA(EMA(ABS(MTM),26),26));
VARR1:=(HHV(H,24)-C)/(HHV(H,24)-LLV(LOW,24))*100;
VARR2:=(C-LLV(LOW,18))/(HHV(H,18)-LLV(LOW,18))*100;
VARR3:=(2*C+H+LOW)/4;
VARR4:=LLV(LOW,26);
VARR5:=HHV(H,34);
VARR6:=EMA((VARR3-VARR4)/(VARR5-VARR4)*100,16);
VARR7:=SMA((SMA(VARR2,3,1)+3),3,1),LINETHICK3;
VARR8:=EMA(VARR6,7);
VARR9:=SMA(VARR1,3,1);
VARR10:=(C-MA(C,6))/MA(C,6)*100;
VARR11:=(C-MA(C,24))/MA(C,24)*100;
VARR12:=(C-MA(C,32))/MA(C,32)*100;
VARR13:=(VARR10+VARR11+VARR12)/3;
VARR14:=IF(VARR13<=-20,10,0);
VARR15:=HHV(VARR14,10);
VARR24:=LLV(LOW,36);
VARR25:=HHV(H,30);
VARR26:=EMA((C-VARR24)/(VARR25-VARR24)*4,4)*25;
VARB27:=(((C-LLV(LOW,9))/(HHV(H,9)-LLV(LOW,9))*100)/2+22)*1;
VARB28:=(((C -(((EMA(AMOUNT,13) /EMA(V,13)) / 100))) / (((EMA(AMOUNT,13) /EMA(V,13)) / 100))) * 100);
箱顶:HHV(MA((C),5),30)COLORRED,LINETHICK2;箱底:LLV(MA((C),5),30) ;长底:LLV(MA((C),5),120)LINETHICK2;
JJ:=(C+HHV(MA((C),5),2)+LLV(MA((C),5),2))/3;
DARS:=IF((DATETODAY(DATE))<9999,1,DRAWNULL);
AA:=EMA(JJ,3)*DARS;
BB:=REF(AA,1);
STICKLINE(AA>BB,AA,BB,3,0),COLORYELLOW,;
STICKLINE(AA<BB,AA,BB,3,0),COLORLICYAN,;
XSR:=1970330;XS:=IF(DATE<XSR,1,DRAWNULL);DS:="MFI.MFI"(12,9)*XS;A9:= DATETODAY(DATE)*XS;
DS1:=IF(A9<9999,4.55,-DS);DS31:=IF(A9<9999,4.7,-DS);DS41:=IF(A9<9999,4.45,-DS);DS51:=IF(A9<9999,4.75,-DS);DS61:=IF(A9<9999,4.65,-DS);DS71:=IF(A9<9999,4.5,-DS);DS81:=IF(A9<9999,4.6,-DS);
DS2:=IF(A9<9999,0.01,-DS);DS5:=IF(A9<9999,0.02,-DS);DS7:=IF(A9<9999,0.03,-DS);DS9:=IF(A9<9999,0.04,-DS);DS11:=IF(A9<9999,0.05,-DS);
DS13:=IF(A9<9999,0.06,-DS);DS15:=IF(A9<9999,0.002,-DS);DS17:=IF(A9<9999,0.004,-DS);DS19:=IF(A9<9999,0.006,-DS);DS21:=IF(A9<9999,0.008,-DS);
AJ2:=A9>146 AND A9<200;aj21:=a9>144 AND A9<146;aj22:=a9>142 AND A9<144;aj23:=a9>140 AND A9<142;aj24:=a9>138 AND A9<140;aj25:=a9>136 AND A9<138;aj26:=a9>134 AND A9<136;
AI29:=A9>704 AND A9<706;ai28:=a9>702 AND A9<704;ai27:=a9>698 AND A9<700;ai2:=a9>696 AND A9<698;ai21:=a9>694 AND A9<696;
AI22:=A9>692 AND A9<694;ai23:=a9>690 AND A9<692;ai24:=a9>688 AND A9<690;ai25:=a9>686 AND A9<688;ai26:=a9>684 AND A9<686;
AH2:=A9>1315 AND A9<1365;ah21:=a9>1311 AND A9<1313;ah22:=a9>1309 AND A9<1311;ah23:=a9>1307 AND A9<1309;
AH24:=A9>1305 AND A9<1307;ah25:=a9>1303 AND A9<1305;ah26:=a9>1299 AND A9<1301;ah27:=a9>1297 AND A9<1299;
AA28:=A9>1860 AND A9<1862;aa27:=a9>1856 AND A9<1858;aa2:=a9>1854 AND A9<1856;aa21:=a9>1852 AND A9<1854;aa22:=a9>1848 AND A9<1850;
AA23:=A9>1846 AND A9<1848;aa24:=a9>1844 AND A9<1846;aa25:=a9>1842 AND A9<1844;aa26:=a9>1840 AND A9<1842;
AL2:=A9>3290 AND A9<3292;al21:=a9>3066 AND A9<3068;al22:=a9>3288 AND A9<3290;al23:=a9>3292 AND A9<3294;al24:=a9>3294 AND A9<3296;
AL25:=A9>3296 AND A9<3298;al26:=a9>3068 AND A9<3070;al27:=a9>93054 AND A9<3056;al28:=a9>93020 AND A9<3044;
AK27:=A9>4711 AND A9<4713;ak2:=a9>4709 AND A9<4711;ak21:=a9>4707 AND A9<4709;ak22:=a9>4705 AND A9<4707;ak23:=a9>4703 AND A9<4705;
AK24:=A9>4701 AND A9<4703;ak25:=a9>4699 AND A9<4701;ak26:=a9>4697 AND A9<4699;ak28:=a9>4695 AND A9<4697;
AB2:=A9>5280 AND A9<5320;ab21:=a9>5278 AND A9<5280;ab22:=a9>5276 AND A9<5278;ab23:=a9>5274 AND A9<5276;
AB24:=A9>5272 AND A9<5274;ab25:=a9>5270 AND A9<5272;ab26:=a9>5268 AND A9<5270;ab27:=a9>5266 AND A9<5268;
AC2:=A9>6520 AND A9<6523;ac21:=a9>6523 AND A9<6526;ac22:=a9>6526 AND A9<6529;ac23:=a9>6529 AND A9<6532;ac24:=a9>6532 AND A9<6535;
AE2:=A9>6828 AND A9<6878;af2:=a9>7132 AND A9<7134;af21:=a9>7134 AND A9<7136;af22:=a9>7136 AND A9<7138;af23:=a9>7138 AND A9<7140;
AG2:=A9>7337 AND A9<7339;ag22:=a9>7339 AND A9<7341;ag222:=a9>7341 AND A9<7343;
AX2:=A9>8014 AND A9<8016;ax22:=a9>8016 AND A9<8018;ax222:=a9>8018 AND A9<8020;
AP2:=A9>8480 AND A9<8482;ap22:=a9>8482 AND A9<8484;ap222:=a9>8484 AND A9<8486;
AQ:=A9>8558 AND A9<8560;aq2:=a9>8556 AND A9<8558;aq22:=a9>8554 AND A9<8556;aq222:=a9>8552 AND A9<8554;aq2222:=a9>8550 AND A9<8552;
AQ23:=A9>8548 AND A9<8550;aq24:=a9>8546 AND A9<8548;aq25:=a9>8544 AND A9<8546;aq26:=a9>8542 AND A9<8544;aq27:=a9>8540 AND A9<8542;
AM2:=A9>99015 AND A9<9017;am21:=a9>99017 AND A9<9019;am22:=a9>99019 AND A9<9021;am23:=a9>99021 AND A9<9023;am24:=a9>99023 AND A9<9025;
AM25:=A9>99025 AND A9<9027;am26:=a9>99027 AND A9<9029;am27:=a9>99029 AND A9<9031;am28:=a9>99037 AND A9<9040;
AH1:=A9>786 AND A9<788;ah11:=a9>784 AND A9<786;ah12:=a9>782 AND A9<784;ah13:=a9>794 AND A9<796;ah14:=a9>792 AND A9<794;ah15:=a9>790 AND A9<792;ah16:=a9>788 AND A9<790;
AI1:=A9>520 AND A9<522;ai11:=a9>530 AND A9<532;ai12:=a9>522 AND A9<524;ai13:=a9>528 AND A9<530;ai14:=a9>526 AND A9<528;ai15:=a9>524 AND A9<526;ai16:=a9>522 AND A9<524;
AG1:=A9>1360 AND A9<1362;ag11:=a9>1358 AND A9<1360;ag12:=a9>1356 AND A9<1358;ag13:=a9>1354 AND A9<1356;
AG14:=A9>1366 AND A9<1368;ag15:=a9>1364 AND A9<1366;ag16:=a9>1362 AND A9<1364;
AL1:=A9>2333 AND A9<2383;al11:=a9>2331 AND A9<2333;al12:=a9>2329 AND A9<2331;al13:=a9>2327 AND A9<2329;al14:=a9>2325 AND A9<2327;
AL15:=A9>2323 AND A9<2325;al16:=a9>2321 AND A9<2323;al17:=a9>2319 AND A9<2321;
AA1:=A9>3826 AND A9<3876;aa11:=a9>3824 AND A9<3826;aa12:=a9>3822 AND A9<3824;aa13:=a9>3820 AND A9<3822;aa14:=a9>3818 AND A9<3820;
AA15:=A9>3816 AND A9<3818;aa16:=a9>3814 AND A9<3816;aa17:=a9>3812 AND A9<3814;
AK1:=A9>4856 AND A9<4906;ak11:=a9>4854 AND A9<4856;ak12:=a9>4852 AND A9<4854;ak13:=a9>4850 AND A9<4852;
AK14:=A9>4848 AND A9<4850;ak15:=a9>4846 AND A9<4848;ak16:=a9>4844 AND A9<4846;ak17:=a9>4842 AND A9<4844;
AB0:=A9>6140 AND A9<6142;ab1:=a9>6142 AND A9<6144;ab11:=a9>6144 AND A9<6146;ab12:=a9>6146 AND A9<6148;
AB13:=A9>6148 AND A9<6150;ab14:=a9>6152 AND A9<6154;ab15:=a9>6154 AND A9<6156;ab16:=a9>6156 AND A9<6158;ab17:=a9>6158 AND A9<6160;ab18:=a9>6160 AND A9<6162;
AC1:=A9>6802 AND A9<6804;ac11:=a9>6800 AND A9<6802;ac12:=a9>6798 AND A9<6800;ac13:=a9>6796 AND A9<6798;ac14:=a9>6794 AND A9<6796;ac15:=a9>6792 AND A9<6794;
AC16:=A9>96790 AND A9<6892;ac17:=a9>96788 AND A9<6790;
AE14:=A9>6914 AND A9<6916;ae12:=a9>6908 AND A9<6910;ae11:=a9>6910 AND A9<6912;ae1:=a9>6912 AND A9<6914;
AF1:=A9>7258 AND A9<7260;af11:=a9>7260 AND A9<7262;af111:=a9>7262 AND A9<7264;af1111:=a9>7264 AND A9<7266;
AX1:=A9>7422 AND A9<7499; aw1:="A9">7420 AND A9<7422; ax11:="A9">7418 AND A9<7420; aw11:="A9">8095 AND A9<8099;
AWP1:=A9>8932 AND A9<8934; awp11:="A9">8934 AND A9<8936; awp12:="A9">8936 AND A9<8938; awp13:="A9">8938 AND A9<8940; awp14:="A9">8942 AND A9<8944; awp15:="A9">8944 AND A9<8946; awp16:="A9">8946 AND A9<8948;
个股:=5*POW(SMA((C-LLV(L,65))/(HHV(H,65)-LLV(L,65)*DARS),6,1),2)*XS;
Y1:=IF(A9<8948,0.5*(AWP15+AWP16+AWP13+AWP14+AK17+AH11+AH12+AH13+AH14+AH15+AH16+AI11+AI12+AI13+AI14+AI15+AI16+AG11+AG12+AG13+AG14+AG15+AG16+AL11+AL12+AL13+AL14+AL15+AL16+AL17+AA11+AA12+AA13+AA14+AA15+AA16+AA17+AK11+AK12+AK13+AK14+AK15+AK16+AWP12+AWP11+AWP1+AA1+AB1+AC1+AE1+AF1+AG1+AH1+AI1+AK1+AL1+AX1+AW1+AW11+AX11+AF11+AF111+AF1111+AE11+AE12+AE14+AC11+AC12+AC13+AC14+AC15+AC16+AC17+AB11+AB12+AB13+AB14+AB15+AB16+AB17+AB0+AB18)*14,DS1)*DARS;
Y31:=IF(A9<8940,0.5*(AA1+AB1+AC1+AE1+AF1+AG1+AH1+AI1+AK1+AL1+AX1+AW1+AW11+AX11+AF11+AF111+AF1111)*14,DS31);
Y41:=IF(A9<8940,0.5*(AA1+AB1+AC1+AE1+AF1+AG1+AH1+AI1+AK1+AL1+AX1+AW1+AW11+AX11+AF11+AF111+AF1111)*14,DS41);
Y51:=IF(A9<8940,0.5*(AA1+AB1+AC1+AE1+AF1+AG1+AH1+AI1+AK1+AL1+AX1+AW1+AW11+AX11+AF11+AF111+AF1111)*14,DS51);
Y61:=IF(A9<8940,0.5*(AA1+AB1+AC1+AE1+AF1+AG1+AH1+AI1+AK1+AL1+AX1+AW1+AW11+AX11+AF11+AF111+AF1111)*14,DS61);
}Y71:=IF(A9<8940,0.5*(AA1+AB1+AC1+AE1+AF1+AG1+AH1+AI1+AK1+AL1+AX1+AW1+AW11+AX11+AF11+AF111+AF1111)*14,DS61);
Y81:=IF(A9<8940,0.5*(AA1+AB1+AC1+AE1+AF1+AG1+AH1+AI1+AK1+AL1+AX1+AW1+AW11+AX11+AF11+AF111+AF1111)*14,DS61);
Y2:=IF(A9<9050,0.5*(AI29+AF23+AF21+AF22+AK27+AK28+AL27+AL28+AA27+AA28+AI27+AI28+AJ21+AJ22+AJ23+AJ24+AJ25+AJ26+AI21+AI22+AI23+AI24+AI25+AI26+AH21+AH22+AH23+AH24+AH25+AH26+AH27+AA21+AA22+AA23+AA24+AA25+AA26+AL21+AL22+AL23+AL24+AL25+AL26+AK21+AK22+AK23+AK24+AK25+AK26+AB2+AB21+AB22+AB23+AB24+AB25+AB26+AB27+AM28+AM27+AM26+AM25+AM24+AM23+AM22+AM21+AM2+AA2+AH2+AI2+AJ2+AK2+AL2+AC2+AE2+AF2+AG2+AX2+AP2+AX22+AX222+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG22+AG222+AQ23+AQ24+AQ25+AQ26+AQ27+AC21+AC22+AC23+AC24),DS2)*DARS;
Y5:=IF(A9<9050,0.5*(AA2+AH2+AI2+AJ2+AL2+AC2+AE2+AF2+AG2+AX2+AP2+AX22+AX222+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG22+AG222),DS5);
Y7:=IF(A9<9050,0.5*(AA2+AH2+AI2+AJ2+AL2+AC2+AE2+AF2+AG2+AX2+AP2+AX22+AX222+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG22+AG222),DS7);
Y9:=IF(A9<9050,0.5*(AA2+AH2+AI2+AJ2+AL2+AC2+AE2+AF2+AG2+AX2+AP2+AX22+AX222+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG22+AG222),DS9);
Y11:=IF(A9<9050,0.5*(AA2+AH2+AI2+AJ2+AL2+AC2+AE2+AF2+AG2+AX2+AP2+AX22+AX222+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG22+AG222),DS11);
Y13:=IF(A9<9050,0.5*(AA2+AH2+AI2+AJ2+AL2+AC2+AE2+AF2+AG2+AX2+AP2+AX22+AX222+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG22+AG222),DS13);
Y15:=IF(A9<9050,0.5*(AA2+AH2+AI2+AJ2+AL2+AC2+AE2+AF2+AG2+AX2+AP2+AX22+AX222+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG22+AG222),DS15);
Y17:=IF(A9<9050,0.5*(AA2+AH2+AI2+AJ2+AL2+AC2+AE2+AF2+AG2+AX2+AP2+AX22+AX222+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG22+AG222),DS17);
Y19:=IF(A9<9050,0.5*(AA2+AH2+AI2+AJ2+AL2+AC2+AE2+AF2+AG2+AX2+AP2+AX22+AX222+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG22+AG222),DS19);
Y21:=IF(A9<9050,0.5*(AA2+AH2+AI2+AJ2+AL2+AC2+AE2+AF2+AG2+AX2+AP2+AX22+AX222+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG22+AG222),DS21);
Y3:=CROSS(Y2,个股);Y4:=CROSS(Y1,个股) AND 个股>0.6;Y32:=CROSS(Y31,个股) AND 个股>0.6;Y42:=CROSS(Y41,个股) AND 个股>0.6;Y52:=CROSS(Y51,个股) AND 个股>0.6;
Y62:=CROSS(Y61,个股) AND 个股>0.6;Y72:=CROSS(Y71,个股) AND 个股>0.6;Y82:=CROSS(Y81,个股) AND 个股>0.6;
Y6:=CROSS(Y5,个股);Y8:=CROSS(Y7,个股);Y10:=CROSS(Y9,个股);Y12:=CROSS(Y11,个股);Y14:=CROSS(Y13,个股);Y16:=CROSS(Y15,个股);
Y18:=CROSS(Y17,个股);Y20:=CROSS(Y19,个股);Y22:=CROSS(Y21,个股);
DRAWICON((Y4 > 0),箱顶*1.03,2);DRAWICON((Y32> 0),箱顶*1.03,2);DRAWICON((Y42 > 0),箱顶*1.03,2);DRAWICON((Y52 > 0),箱顶*1.03,2);
DRAWICON((Y62 > 0),箱顶*1.03,2);DRAWICON((Y72 > 0),箱顶*1.03,2);DRAWICON((Y82 > 0),箱顶*1.03,2);
DRAWICON((Y3 > 0),长底,1);DRAWICON((Y6> 0),长底,1);DRAWICON((Y8> 0),长底,1);DRAWICON((Y10 > 0),长底,1);DRAWICON((Y12 > 0),长底,1);
DRAWICON((Y14 > 0),长底,1);DRAWICON((Y16 > 0),长底,1);DRAWICON((Y18> 0),长底,1);DRAWICON((Y20> 0),长底,1);DRAWICON((Y22 > 0),长底,1);
Z1:=STRCAT(HYBLOCK," ");
Z2:=STRCAT(Z1,FGBLOCK);
Z3:=STRCAT(Z2,DYBLOCK);
Z4:=STRCAT(Z3," ");
DRAWTEXT_FIX(ISLASTBAR,0,0,0,STRCAT(Z4,GNBLOCK)),COLORCYAN;
DRAWTEXT_FIX(C>O,0.85,0.001,0,"明阳程序化CXH110.COM"),COLORFF7F00;
