股灾以后顶部和底部形成的大箱体画线公式通达信指标公式源码
- 格式:doc
- 大小:135.00 KB
- 文档页数:1
通达信综合箱体(主图源码附图){综合箱体主图}N:=(3.00,30.00,10.00);ST:=(CLOSE/OPEN-1)*100;ZF:=(C/REF(C,1)-1)*100;SX1:=ST>3 AND ST=HHV(ST,6);SX2:=ZF>3 AND ZF=HHV(ZF,6);SX3:=ZF>=9 AND CLOSE=HIGH;烧香:IF(SX1 OR SX2 OR SX3,1,0),COLOR0000FF,NODRAW;DYSJ:=BARSLAST(烧香);跟踪:IF(DYSJ<=13 ANDCOUNT(C>REF(L,DYSJ),DYSJ)>=DYSJ-1,DYSJ,0),COLOR00FFFF,NODRAW;关注:IF(DYSJ>=4 ANDCOUNT(C>REF(C,DYSJ),3)>=3,REF(C,DYSJ),REF(L,DYSJ)),COLORFFFFFF,NODRAW; ②:IF(关注=REF(L,DYSJ),REF(C,DYSJ),REF(L,DYSJ)),COLOR00FFFF,NODRAW; STICKLINE(跟踪,②,②,3,0),COLOR00FFFF;BF1:=LOW<关注*1.01 AND COUNT(LOW<关注*1.01,跟踪)=1;BF2:=LOW<关注AND COUNT(LOW<关注,跟踪)=1;拜佛:IF(BF1 OR BF2,1,0),COLOR00FF00,NODRAW;{以下设置主图显示方式}STICKLINE(C>0,关注,关注,5,-1),COLORFFFFFF;支撑:STICKLINE(跟踪,关注,关注,3,0),COLORFF00FF;HHJSJDA:=(2.97*CLOSE+OPEN+LOW+HIGH)/6;HHJSJDB:(20*HHJSJDA+19*REF(HHJSJDA,1)+18*REF(HHJSJDA,2)+17*REF(HHJSJDA,3) +16*REF(HHJSJDA,4)+15*REF(HHJSJDA,5)+14*REF(HHJSJDA,6)+13*REF(HHJSJDA,7)+12*REF(HHJSJDA,8)+11*REF(HHJSJDA,9)+10*REF(HHJSJDA,10) +9*REF(HHJSJDA,11)+8*REF(HHJSJDA,12)+7*REF(HHJSJDA,13)+6*REF(HHJSJDA,14)+5*REF(HHJSJDA,15)+4*REF(HHJSJDA,16)+ 3*REF(HHJSJDA,17)+2*REF(HHJSJDA,18)+REF(HHJSJDA,20))/210,COLORYELLOW;HHJSJDC:MA(HHJSJDB,5),COLORRED;【箱顶】:PEAK(CLOSE,N,1)*0.98;【箱底】:TROUGH(CLOSE,N,1)*1.02;【箱高】:100*(【箱顶】-【箱底】)/【箱底】,NODRAW;{135均线战法}YY1:=C>MA(C,11) AND OPEN<MA(C,11);{一阳三线}YY3:=C>MA(C,33) AND OPEN<MA(C,33);YY5:=C>MA(C,55) AND OPEN<MA(C,55);DRAWTEXT(YY1 AND YY5 AND YY3,LOW-0.1,'一阳三线'),COLORRED;A3:=(C-LLV(L,9))/(HHV(H,9)-LLV(L,9))*100;A4:=SMA(A3,3,1);A5:=SMA(A4,3,1);A6:=3*A4-2*A5;A7:=C-REF(C,1);A8:=100*EMA(EMA(A7,6),6)/EMA(EMA(ABS(A7),6),6);买:=LLV(A8,2)=LLV(A8,7) AND COUNT(A8<0,2) AND CROSS(A8,MA(A8,2)); DRAWTEXT(FILTER(买=1,5),LOW-0.05,'进'),COLORYELLOW; STICKLINE(买,OPEN,CLOSE,2,0),COLORYELLOW;。
判断顶底通达信指标公式源码通达信指标是通达信软件中的一种常用技术指标,用于分析市场趋势和预测价格走势。
顶底通达信指标是其中一种基于趋势判断的指标。
下面我将介绍顶底通达信指标的公式源码并进行解析。
顶底通达信指标是用来判断价格走势是否出现顶部或底部的指标。
该指标是由一些周期内的最高价和最低价的相对位置来计算的。
首先,我们需要定义一些参数:n为计算顶底通达信指标的周期长度;m为计算峰值的周期长度;p为计算底部的周期长度;h为计算M值的周期长度。
然后,我们来看一下顶底通达信指标的计算公式源码:```VarTop: Array[1..n] of Integer;Bottom: Array[1..n] of Integer;highPoint: Array[1..m] of Integer;lowPoint: Array[1..p] of Integer;M: Array[1..h] of Integer;BeginFor i:=m to n doBeginhighPoint[i]:=Highest(i, "Highest High"); // 求最高价lowPoint[i]:=Lowest(i, "Lowest Low"); // 求最低价Top[i]:=ValueWhen(Cross(J,N+1),i,N); // 判断顶部Bottom[i]:=ValueWhen(Cross(N,J+1),i,N); // 判断底部M[i]:=Sum(Cross(N,J+1), i) / Sum(Cross(J,N+1), i); // 计算M值End;End.```上述源码中,我们使用了几个函数来进行计算:1. Highest(i, "Highest High"):求一些周期内的最高价。
2. Lowest(i, "Lowest Low"):求一些周期内的最低价。
VARX:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,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(CLOSE*1.2,VARX4*10,VARX4/10),3);VARX6:=LLV(LOW,30);VARX7:=HHV(VARX5,30);VARX8:=IF(LLV(LOW,58),1,0); 筹码短期:=DMA((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/(SUM(AMOUNT,8)/(AMOU NT/VOL/100)/100));筹码中期:=DMA((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/(SUM(AMOUNT,13)/(AMO UNT/VOL/100)/100));筹码长期:=DMA((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/(SUM(AMOUNT,20)/(AMO UNT/VOL/100)/100));DIF:=EMA(EMA(CLOSE,18)-EMA(CLOSE,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(HIGH,24)-CLOSE)/(HHV(HIGH,24)-LLV(LOW,24))*100; VARR2:=(CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100; VARR3:=(2*CLOSE+HIGH+LOW)/4;VARR4:=LLV(LOW,26);VARR5:=HHV(HIGH,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:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;VARR11:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;VARR12:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100;VARR13:=(VARR10+VARR11+VARR12)/3;VARR14:=IF(VARR13<=-20,10,0);VARR15:=HHV(VARR14,10);VARR24:=LLV(LOW,36);VARR25:=HHV(HIGH,30);VARR26:=EMA((CLOSE-VARR24)/(VARR25-VARR24)*4,4)*25;VARB27:=(((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100)/2+22)*1; VARB28:=(((CLOSE -(((EMA(AMOUNT,13) /EMA(VOL,13)) / 100))) / (((EMA(AMOUNT,13) /EMA(VOL,13)) / 100))) * 100);箱顶:HHV(MA((CLOSE),5),30)COLORRED,LINETHICK2;箱底:LLV(MA((CLOSE),5),30) ;长底:LLV(MA((CLOSE),5),120)LINETHICK2;JJ:=(CLOSE+HHV(MA((CLOSE),5),2)+LLV(MA((CLOSE),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{0324},4.55,-DS);DS31:=IF(A9<9999{90324},4.7,-DS);DS 41:=IF(A9<9999{324},4.45,-DS);DS51:=IF(A9<9999{2094},4.75,-DS);DS61: =IF(A9<9999{0324},4.65,-DS);DS71:=IF(A9<9999{0324},4.5,-DS);DS81:=I F(A9<9999{2094},4.6,-DS);DS2:=IF(A9<9999{230},0.01,-DS);DS5:=IF(A9<9999{200},0.02,-DS);DS7:=I F(A9<9999{2},0.03,-DS);DS9:=IF(A9<9999{230},0.04,-DS);DS11:=IF(A9<9 999{230},0.05,-DS);DS13:=IF(A9<9999{30},0.06,-DS);DS15:=IF(A9<9999{20},0.002,-DS);DS17: =IF(A9<9999{230},0.004,-DS);DS19:=IF(A9<9999{230},0.006,-DS);DS21:= IF(A9<9999{230},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 ANDA9<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 ANDA9<1313;AH22:=A9>1309 AND A9<1311;AH23:=A9>1307 AND A9<1309; AH24:=A9>1305 AND A9<1307;AH25:=A9>1303 ANDA9<1305;AH26:=A9>1299 AND A9<1301;AH27:=A9>1297 AND A9<1299; AA28:=A9>1860 AND A9<1862;AA27:=A9>1856 ANDA9<1858;AA2:=A9>1854 AND A9<1856;AA21:=A9>1852 ANDA9<1854;AA22:=A9>1848 AND A9<1850;AA23:=A9>1846 AND A9<1848;AA24:=A9>1844 ANDA9<1846;AA25:=A9>1842 AND A9<1844;AA26:=A9>1840 AND A9<1842; AL2:=A9>3290 AND A9<3292;AL21:=A9>3066 ANDA9<3068;AL22:=A9>3288 AND A9<3290;AL23:=A9>3292 ANDA9<3294;AL24:=A9>3294 AND A9<3296;AL25:=A9>3296 AND A9<3298;AL26:=A9>3068 ANDA9<3070;AL27:=A9>93054 AND A9<3056;AL28:=A9>93020 AND A9<3044; AK27:=A9>4711 AND A9<4713;AK2:=A9>4709 ANDA9<4711;AK21:=A9>4707 AND A9<4709;AK22:=A9>4705 ANDA9<4707;AK23:=A9>4703 AND A9<4705;AK24:=A9>4701 AND A9<4703;AK25:=A9>4699 ANDA9<4701;AK26:=A9>4697 AND A9<4699;AK28:=A9>4695 AND A9<4697; AB2:=A9>5280 AND A9<5320;AB21:=A9>5278 ANDA9<5280;AB22:=A9>5276 AND A9<5278;AB23:=A9>5274 AND A9<5276; AB24:=A9>5272 AND A9<5274;AB25:=A9>5270 ANDA9<5272;AB26:=A9>5268 AND A9<5270;AB27:=A9>5266 AND A9<5268; AC2:=A9>6520 AND A9<6523;{14180=6523}AC21:=A9>6523 ANDA9<6526;AC22:=A9>6526 AND A9<6529;AC23:=A9>6529 ANDA9<6532;AC24:=A9>6532 AND A9<6535;AE2:=A9>6828 AND A9<6878;AF2:=A9>7132 ANDA9<7134;AF21:=A9>7134 AND A9<7136;AF22:=A9>7136 ANDA9<7138;AF23:=A9>7138 AND A9<7140;AG2:=A9>7337 AND A9<7339;AG22:=A9>7339 ANDA9<7341;AG222:=A9>7341 AND A9<7343;AX2:=A9>8014 AND A9<8016;AX22:=A9>8016 ANDA9<8018;AX222:=A9>8018 AND A9<8020;AP2:=A9>8480 AND A9<8482;AP22:=A9>8482 ANDA9<8484;AP222:=A9>8484 AND A9<8486;AQ:=A9>8558 AND A9<8560;AQ2:=A9>8556 ANDA9<8558;AQ22:=A9>8554 AND A9<8556;AQ222:=A9>8552 ANDA9<8554;AQ2222:=A9>8550 AND A9<8552;AQ23:=A9>8548 AND A9<8550;AQ24:=A9>8546 ANDA9<8548;AQ25:=A9>8544 AND A9<8546;AQ26:=A9>8542 ANDA9<8544;AQ27:=A9>8540 AND A9<8542;AM2:=A9>99015 AND A9<9017;AM21:=A9>99017 ANDA9<9019;AM22:=A9>99019 AND A9<9021;AM23:=A9>99021 ANDA9<9023;AM24:=A9>99023 AND A9<9025;AM25:=A9>99025 AND A9<9027;AM26:=A9>99027 ANDA9<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 ANDA9<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 ANDA9<528;AI15:=A9>524 AND A9<526;AI16:=A9>522 AND A9<524;AG1:=A9>1360 AND A9<1362;AG11:=A9>1358 ANDA9<1360;AG12:=A9>1356 AND A9<1358;AG13:=A9>1354 AND A9<1356; AG14:=A9>1366 AND A9<1368;AG15:=A9>1364 ANDA9<1366;AG16:=A9>1362 AND A9<1364;AL1:=A9>2333 AND A9<2383;AL11:=A9>2331 ANDA9<2333;AL12:=A9>2329 AND A9<2331;AL13:=A9>2327 ANDA9<2329;AL14:=A9>2325 AND A9<2327;AL15:=A9>2323 AND A9<2325;AL16:=A9>2321 ANDA9<2323;AL17:=A9>2319 AND A9<2321;AA1:=A9>3826 AND A9<3876;AA11:=A9>3824 ANDA9<3826;AA12:=A9>3822 AND A9<3824;AA13:=A9>3820 ANDA9<3822;AA14:=A9>3818 AND A9<3820;AA15:=A9>3816 AND A9<3818;AA16:=A9>3814 ANDA9<3816;AA17:=A9>3812 AND A9<3814;AK1:=A9>4856 AND A9<4906;AK11:=A9>4854 ANDA9<4856;AK12:=A9>4852 AND A9<4854;AK13:=A9>4850 AND A9<4852; AK14:=A9>4848 AND A9<4850;AK15:=A9>4846 ANDA9<4848;AK16:=A9>4844 AND A9<4846;AK17:=A9>4842 AND A9<4844; AB0:=A9>6140 AND A9<6142;AB1:=A9>6142 ANDA9<6144;AB11:=A9>6144 AND A9<6146;AB12:=A9>6146 AND A9<6148; AB13:=A9>6148 AND A9<6150;AB14:=A9>6152 ANDA9<6154;AB15:=A9>6154 AND A9<6156;AB16:=A9>6156 ANDA9<6158;AB17:=A9>6158 AND A9<6160;AB18:=A9>6160 AND A9<6162; AC1:=A9>6802 AND A9<6804;AC11:=A9>6800 ANDA9<6802;AC12:=A9>6798 AND A9<6800;AC13:=A9>6796 ANDA9<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 ANDA9<6910;AE11:=A9>6910 AND A9<6912;AE1:=A9>6912 AND A9<6914;AF1:=A9>7258 AND A9<7260;AF11:=A9>7260 ANDA9<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+AH1 2+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+A K15+AK16+AWP12+AWP11+AWP1+AA1+AB1+AC1+AE1+AF1+AG1+AH1+A I1+AK1+AL1+AX1+AW1+AW11+AX11+AF11+AF111+AF1111+AE11+AE12+ AE14+AC11+AC12+AC13+AC14+AC15+AC16+AC17+AB11+AB12+AB13+AB 14+AB15+AB16+AB17+AB0+AB18)*14,DS1)*DARS;{反特别版处理}{}Y31:=IF(A9<8940,0.5*(AA1+AB1+AC1+AE1+AF1+AG1+AH1+AI1+AK1+A L1+AX1+AW1+AW11+AX11+AF11+AF111+AF1111)*14,DS31);{反特别版处理}{}Y41:=IF(A9<8940,0.5*(AA1+AB1+AC1+AE1+AF1+AG1+AH1+AI1+AK1+A L1+AX1+AW1+AW11+AX11+AF11+AF111+AF1111)*14,DS41);{反特别版处理}{}Y51:=IF(A9<8940,0.5*(AA1+AB1+AC1+AE1+AF1+AG1+AH1+AI1+AK1+A L1+AX1+AW1+AW11+AX11+AF11+AF111+AF1111)*14,DS51);{反特别版处理}{}Y61:=IF(A9<8940,0.5*(AA1+AB1+AC1+AE1+AF1+AG1+AH1+AI1+AK1+A L1+AX1+AW1+AW11+AX11+AF11+AF111+AF1111)*14,DS61);{反特别版处理}}Y71:=IF(A9<8940,0.5*(AA1+AB1+AC1+AE1+AF1+AG1+AH1+AI1+AK1+AL 1+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+AA2 1+AA22+AA23+AA24+AA25+AA26+AL21+AL22+AL23+AL24+AL25+AL26+A K21+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+AX2 22+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG22+AG222+AQ23+A Q24+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+AG 22+AG222),DS11);{反特别版处理}{}Y13:=IF(A9<9050,0.5*(AA2+AH2+AI2+AJ2+AL2+AC2+AE2+AF2+AG2+A X2+AP2+AX22+AX222+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG 22+AG222),DS13);{反特别版处理}{}Y15:=IF(A9<9050,0.5*(AA2+AH2+AI2+AJ2+AL2+AC2+AE2+AF2+AG2+A X2+AP2+AX22+AX222+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG 22+AG222),DS15);{反特别版处理}{}Y17:=IF(A9<9050,0.5*(AA2+AH2+AI2+AJ2+AL2+AC2+AE2+AF2+AG2+A X2+AP2+AX22+AX222+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG 22+AG222),DS17);{反特别版处理}{}Y19:=IF(A9<9050,0.5*(AA2+AH2+AI2+AJ2+AL2+AC2+AE2+AF2+AG2+A X2+AP2+AX22+AX222+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG 22+AG222),DS19);{反特别版处理}{}Y21:=IF(A9<9050,0.5*(AA2+AH2+AI2+AJ2+AL2+AC2+AE2+AF2+AG2+A X2+AP2+AX22+AX222+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG 22+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;。
如题,大家最好多看图的细节网13线和f线.{基本资料}品种类型:=FINANCE(3);所属板块:=HYBLOCK;上市天数:=FINANCE(42);股总市值:=ROUND(FINANCE(41)/100000000);流通市值:=ROUND(FINANCE(40)/100000000);股东人数:=FINANCE(8);人均持股:=ROUND(FINANCE(7)/FINANCE(8));{}DRAWTEXT_FIX(1,0.008,0.01,0;基本资料:'),COLORFFCC99;DRAWTEXTJ=IX(1,0.008,0.05,0,'品种类型:'),COLOR99CCFF;DRAWTEXT_FIX( 1,0.008,0.09,0,'行业板块:'),COLOR99CCFF;DRAWTEXT_FIX(1,0.008,0.13,0,'上市天数:'),COLOR99CCFF;DRAWTEXT_FIX(1,0.008,0.17,0,'股东人数:'),COLOR99CCFF; DRAWTEXT_FIX(1,0.008,0.21,0;人均持股:'),COLOR99CCFF;{}DRAWTEXT_FIX(品种类型= 1,0.055,0.05,0,'沪深A 股)COLORYEU_OW; DRAWTEXT_FIX(品种类型=2,0.055,0.05,0;中小板'),COLORYELLOW; DRAWTEXT_FIX(品种类型=3,0.055,0.05,0;仓U 业板'),COLORYELLOW;DRAWTEXT_FIX(1,0.055,0.09,0,HYBLOCK),COLORYELLOW;{行业板块}{数值}DRAWNUMBER_FIX(1,0.050,0.13,0,上市天数),COLORGREEN; DRAWNUMBER_FIX(1,0.050,0.17,0,股东人数),COLORGREEN; DRAWNUMBER_FIX(1,0.050,0.21,0,人均持股),COLORGREEN;{单位}DRAWTEXT_FIX(1,0.08,0.13,0,'天COLORWHITE;DRAWTEXT_FIX(1,0.08,0.17,0,'A^zCOLORWHITE;DRAWTEXT_FIX(1,0.08,0.21,0,'股'),COLORWHITE;{所属板块}DRAWTEXT_FIX(l z0.008,0.25,0;M区板块:')COLOR99CCFF;DRAWTEXT_FIX(1Z0.048,0.25,0,DYBLOCK)COLORGREEN;DRAWTEXT_FIX(1,0.088,0.25,0,'概念板块:')COLOR99CCFF;DRAWTEXT_FIX(1,0.128,0.25,0,GNBLOCK)COLORGREEN;DRAWTEXT_FIX(1,0.008,0.29,0,'风格板块:')COLOR99CCFF;DRAWTEXT_FIX(1,0.048,0.29,O z FGBLOCK)COLORGREEN;获利筹码:IF(WINNER(CLOSE),WINNER(CLOSE)*100,0),NODRAW/COLOR0080FF;净资产:FINANCE(34),NODRAW,COLORRED;公积金:FINANCE(18),NODRAW,COLORGREEN;未分利润:FINANCE(32),NODRAW,COLORMAGENTA;净资收益率:=STRCAT('净资收益率:',CON2STR(FINANCE(29)/FINANCE(19)*100,2)); 每股收益:=STRCAT(‘ 每股收益:’,CON2STR(FINANCE(38),2));主营利润率:=STRCATC 主营利润率,,CON2STR(FINANCE(23)/FINANCE(20)*100,2)); 当前业绩:=STRCATC ',STRCAT(STRCAT(净资收益率,每股收益),主营利润率));DRAWTEXT_FIX(ISLASTBAR,0.62,1.2,0,当前业绩),COLORRED; {主图显示}利润增长:FINANCE(43),COLORYELLOW,NODRAW;开幅:100*(O/REF(C,l)-l)zCOLORYELLOW,NODRAW;箱顶:HHV(MA((LOW+HIGH+CLOSE+O)/4,5),58),DOTLINE,COLORCYAN,LINETHICK1; N3:=60;B3:=EMA(C,3);B4:=SMA(SMA(B3,2,1),2,1);LLV(EMA(B4,1),N3),DOTLINE,COLORCYAN,LINETHICK1;F:EMA(CLOSE,21),COLORRED,LINETHICK2;IF(F>REF(F,1),F,DRAWNULL),LINETHICK2,COLORRED;IF(F<REF(F,1),F,DRAWNULL),LINETHICK2,COLORGREEN;网13:EXPMA(CLOSE,13),COLORGRAY,LINETHICK1;{黄金分割线}M: = 13;顶1: = REFDATE(HHV(H,M),DATE);底1: = RE FDATE( LLV( L, M), DATE);Hl:=顶1 •(顶1 ■底1)*0.191;H2:=顶1•(顶1-底1)*0.382;H3:=顶1 ■(顶1 •底1)*0.5;H4:=顶1 ■(顶1 •底1)*0.618;H5:=顶1-(顶1-底1)*0.809;顶部:REFDATE(顶1,DATE),COLOR666666;%19.8:REFDATE(H1,DATE),COLOR666666;%38.2:REFDATE(H2,DATE),COLOR666666;%50:REFDATE(H3,DATE)Z COLOR666666;%61.8:REFDATE(H4,DATE),COLOR666666;%80.9:REFDATE(H5,DATE),COLOR666666;底部:REFDATE(底1,DATE),COLOR666666;DRAWTEXT(ISLASTBAR,顶部,'顶部 ,),COLORGREEN;DRAWTEXT(ISLASTBAR,%19.8Z' 19.8 %'),COLORMAGENTA;DRAWTEXT(ISU\STBAR,%38.2,‘ 38.2%'),COLORYELLOW;DRAWTEXT(ISLASTBAR,%50; 50%'),COLORWHITE;DRAWTEXT(ISLASTBAR Z%61.8,' 61.8%'),COLORYELLOW;DRAWTEXT(ISLASTBAR,%80.9,‘ 80.9 %'),COLORMAGENTA;DRAWTEXT(ISLASTBAR,底部「底部'),COLORRED;{BS标志}DRAWICON((ZIG(3,5)>REF(ZIG(3,5),1)) AND (REF(ZIG(3z5),l)<=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)v=REF(ZIG(3,5),3)),LOW*0.98,7);DRAWICON((ZIG(3,5)vREF(ZIG(3,5),l)) AND (REF(ZIG(3,5),1)>=REF(ZIG(3,5),2)) AND (REF(ZIG(3,5),2)>=REF(ZIG(3,5),3)),HIGH*L02,8);{箱体}{箱顶:PEAK(CLOSE,N, l)*0.98,POINTDOT,LINETHICK3,COLORYELLOW;箱底:TROUGH(CLOSE,N,l)*l.02,POINTDOT,LINETHICK3,COLORFFFFOO;箱高:100*(箱顶■箱底)/箱底Z NODRAW;};总额:=AMOUNT;买:=IF(O=C AND(C-REF(C,l))/REF(C,l)*100>9.8,AMOUNT,AMOUNT/((H-L)*2-ABS(O-C))*(C-L));买%:=买/AMOUNT*100;流入:=AMOUNT* 买%/10000000000;流出:=AMOUNT/100000000-流入;净流:=(流入•流出);总额3:=SUM(AMOUNT,3);流入3:=SUM(流入,3);流出3:=SUM(流出,3);净流3:=SUM(流入•流出,3);总额5:=SUM(AMOUNT,5);流入5:=SUM(流入,5);流出5:=SUM(流出,5);净流5:=SUM(流入•流出,5);总额10:=SUM(AMOUNT,10);流入10:=SUM(流入,10);流出10:=SUM(流出,10);净流10:=SUM(流入■流出,10);画:=CONST(FINDHIGH(总额10,0,190,1));DRAWTEXT_FIX(1,0.71,0.07,0;^ 流(亿COLORMAGENTA,LINETHICK1; DRAWTEXT_FIX(l,0.78,0.05,0/1 口‘),COLORMAGENTA,LINETHICK1;DRAWTEXT_FIX(1,0.83,0.05,0,‘3 日'),COLORMAGENTA,LINETHICK1;DRAWTEXT_FIX(1,0.88,0.05,0,'5 IT),COLORMAGENTA,LINETHICK1;DRAWTEXT_FIX(l z0.93,0.05,0,'10 日)COLORMAGENTA,LINETHICK1; DRAWNUMBER_FIX(1Z0.78,0.10,0,CONST((净流)))Z COLORYELLOW; DRAWNUMBER_FIX(1,0.83,0.10,0,CONST((净流3))),COLORYELLOW;DRAWNUMBER_FIX(1,0.88,0.10,0,CONST((净流5))),COLORYELLOW; DRAWNUMBER_FIX(1,0.93,0.10,0,CONST((净流10))),COLORYELLOW;DRAWKLINE(HIGH,OPEN,LOW,CLOSE);MA5:=MA(C Z5);MA10:=MA(C,10);MA30: = MA(C,3 0);FA:=BARSLAST(CROSS(MA10,MA5))AND CROSS(MA5,MA10);FB:=FA AND MA5>MA30 AND MA10>MA30 ANDMA10>REF(MA10,l);{过左峰提示粉色}VAR121:=ZIG(3,6)<REF(ZIG(3,6),1) AND REF(ZIG(3,6),1)>=REF(ZIG(3,6),2) ANDREF(ZIG(3,6),2)>=REF(ZIG(3,6),3);VAR141:=ZIG(3,22)<REF(ZIG(3,22),1) AND REF(ZIG(3z22),l)>=REF(ZIG(3,22),2) AND REF(ZIG(3,22),2)>=REF(ZIG(3,22),3);VAR161:=ZIG(3z51)<REF(ZIG(3,51),l) AND REF(ZIG(3,51)z l)>=REF(ZIG(3z51)z2) AND REF(ZIG(3,51),2)>=REF(ZIG(3,51),3);VAR181:=ZIG(3,72)<REF(ZIG(3,72),1) AND REF(ZIG(3,72),1)>=REF(ZIG(3,72),2) AND REF(ZIG(3,72)z2)>=REF(ZIG(3z72),3);卖:=(VAR121+VAR141+VAR161+VAR181),LINETHICK2;SQ:DRAWLINE(卖,H,BARSLAST( 卖)> = 1,REF(H,BARSLAST(卖)),1),COLORWHITE,LINETHICK2;过峰:=C>SQ AND REF(C,l)vSQ;WOL:=IF(CURRBARSCOUNT=1 ANDPERIOD=5,VOL*240/FROMOPEN,DRAWNULL),NODRAW;预量:=WOL/REF(V,1)>1.8;现量:=V/REF(V,1)>1.5;过峰1:STICKLINE(过峰,CQ,5,0)COLORFFOOFF;预量1:DRAWICON(过峰AND 预量,H*1.01,14);现量1:DRAWICON(过峰AND 现量,(O+C)/2,23);前次低点:LLV(L*1,250)POINTDOT,COLORFFOOFF,LINETHICK4;。
股价到达阻力位支撑位在做决策VAR1:=MA(CLOSE,5),COLOR00FFFF;VAR6:=MA(CLOSE,54),COLORFF9900;VAR8:= DMA(EMA(CLOSE,12),SUM(VOL/CAPITAL,5)/3),LINETHICK2;VARA:=REF(CLOSE,1);VARE:=SMA(MAX(CLOSE-VARA,0),6,1)/SMA(ABS(CLOSE-VARA),6,1)*100;VARF:=(2*CLOSE+HIGH+LOW)/4;VAR10:=LLV(LOW,23);VAR11:=HHV(HIGH,23);VAR12:=EMA((VARF-VAR10)/(VAR11-VAR10)*100,6);VAR13:=EMA(0.667*REF(VAR12,1)+0.333*VAR12,4);RSV:=(CLOSE-LLV(LOW,13))/(HHV(HIGH,13)-LLV(LOW,13))*100;K:=SMA(RSV,3,1);D:=SMA(K,3,1);J:=3*K-2*D;RSV24:=(CLOSE-LLV(LOW,55))/(HHV(HIGH,55)-LLV(LOW,55))*100;K24:=SMA(RSV24,3,1);D24:=SMA(K24,3,1);J24:=3*K24-2*D24;压力位:IF(CROSS(J24,J),H,REF(H,BARSLAST(CROSS(J24,J)))),COLOR00FF33,LINETHICK1; 支撑位:IF(CROSS(J,J24),L,REF(L,BARSLAST(CROSS(J,J24)))),COLORCC33CC,LINETHICK1; 支撑价:LLV(LOW,34) ,COLOR7FFF00,LINETHICK2;阻力价:HHV(HIGH,19),COLORFF9900, LINETHICK2;十:MA(C,5),COLOR00FFFF,LINETHICK2;涨:IF(MA(CLOSE,5)>REF(MA(CLOSE,5),1),MA(CLOSE,5),DRAWNULL),COLORRED,LINETH ICK2;平:IF(MA(CLOSE,5)=REF(MA(CLOSE,5),1),MA(CLOSE,5),DRAWNULL),COLOR00FFFF,LINE THICK3;跌:IF(MA(CLOSE,5)<REF(MA(CLOSE,5),1),MA(CLOSE,5),DRAWNULL),COLORGREEN,LINE THICK2;DRAWTEXT(REF(C,BARSLAST(REF(CROSS('TMJ_MACD.DIF','TMJ_MACD.DEA'),1))+1)>C AND REF('TMJ_MACD.DIF',BARSLAST(REF(CROSS('TMJ_MACD.DIF','TMJ_MACD.DEA'),1)) +1)<'TMJ_MACD.DIF' AND CROSS('TMJ_MACD.DIF','TMJ_MACD.DEA')>0,L*0.9,'MACD底背离'),COLORRED;{MACD底背离}DRAWTEXT(REF(C,BARSLAST(REF(CROSS('TMJ_KDJ.K','TMJ_KDJ.D'),1))+1)>C AND REF('TMJ_KDJ.K',BARSLAST(REF(CROSS('TMJ_KDJ.K','TMJ_KDJ.D'),1))+1)<'TMJ_KDJ.K' AND CROSS('TMJ_KDJ.K','TMJ_KDJ.D'),L*0.980,'KDJ底背离'),COLORRED;{KDJ底背离}DRAWTEXT(REF(C,BARSLAST(REF(CROSS('RSI.RSI1','RSI.RSI2'),1))+1)>C ANDREF('RSI.RSI1',BARSLAST(REF(CROSS('RSI.RSI1','RSI.RSI2'),1))+1)<'RSI.RSI1'AND CROSS('RSI.RSI1','RSI.RSI2')>0,L*0.970,'RSI底背离'),COLORRED;{RSI底背离}; DRAWTEXT(REF(C,BARSLAST(REF(CROSS('TMJ_MACD.DEA','TMJ_MACD.DIF'),1))+1)<C ANDREF('TMJ_MACD.DIF',BARSLAST(REF(CROSS('TMJ_MACD.DEA','TMJ_MACD.DIF'),1))+1)> 'TMJ_MACD.DIF' ANDCROSS('TMJ_MACD.DEA','TMJ_MACD.DIF')>0,H*1.08,'MACD顶背离'),COLORADEAEA;{MACD顶背离};DRAWTEXT(REF(C,BARSLAST(REF(CROSS('TMJ_KDJ.D','TMJ_KDJ.K'),1))+1)<C AND REF('TMJ_KDJ.K',BARSLAST(REF(CROSS('TMJ_KDJ.D','TMJ_KDJ.K'),1))+1)>'TMJ_KDJ.K' AND CROSS('TMJ_KDJ.D','TMJ_KDJ.K')>0,H*1.05,'KDJ顶背离'),COLORADEAEA;{KDJ顶背离}DRAWTEXT(REF(C,BARSLAST(REF(CROSS('RSI.RSI2','RSI.RSI1'),1))+1)<CAND REF('RSI.RSI1',BARSLAST(REF(CROSS('RSI.RSI2','RSI.RSI1'),1))+1)>'RSI.RSI1' AND CROSS('RSI.RSI2','RSI.RSI1')>0,H*1.02,'RSI顶背离'),COLORADEAEA;{RSI顶背离};(阻力价+支撑价)/2 COLORGREEN CIRCLEDOT;。
【通达信】暴涨启动线(箱顶、箱底、操作线、趋势线)-指标公式源码PEAK1:=LLV(MA((LOW),5),30);箱底:PEAK1,COLORLIMAGENTA;PEAK2:=HHV(MA((HIGH),6),30);箱顶:PEAK2,COLORLIBLUE;TROUGHBARS1:=(箱顶+箱底)/2;平衡:TROUGHBARS1,COLORFF00FF;TROUGHBARS2:=EXPMEMA(C,5);操作线:TROUGHBARS2,COLORWHITE;TROUGHBARS3:=EXPMEMA(C,12);趋势线:TROUGHBARS3,COLORBLUE;ZIG1:=平衡>=REF(平衡,1) AND 趋势线>=REF(趋势线,1) AND REF(操作线,1)<REF(操作线,2) AND 操作线>REF(操作线,1) AND 操作线>趋势线 AND 趋势线>平衡 AND 操作线/趋势线<1.01;暴涨:ZIG1,COLORRED,NODRAW;ZIG2:=CROSS(操作线,趋势线) AND 平衡>=REF(平衡,1);启动:ZIG2,COLORYELLOW,NODRAW;STICKLINE(趋势线>平衡,平衡,趋势线,0,-1),COLORRED;STICKLINE(平衡>趋势线,趋势线,平衡,0,-1),COLORGREEN;STICKLINE(启动,箱底,箱顶,0,0),COLORYELLOW;STICKLINE(暴涨,箱底,箱顶,0,0),COLORRED;DRAWICON(CROSS(箱顶,操作线),箱顶*1.02,2);【通达信】暴涨启动线(箱顶、箱底、操作线、趋势线)-指标公式效果图(文档来源:若水财经社区)。
VARX:=(CLOSE-LLV(LOW,27))/(HHV(HIGH,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(CLOSE*1.2,VARX4*10,VARX4/10),3);VARX6:=LLV(LOW,30);VARX7:=HHV(VARX5,30);VARX8:=IF(LLV(LOW,58),1,0); 筹码短期:=DMA((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/(SUM(AMOUNT,8)/(AMOU NT/VOL/100)/100));筹码中期:=DMA((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/(SUM(AMOUNT,13)/(AMO UNT/VOL/100)/100));筹码长期:=DMA((3*HIGH+LOW+OPEN+2*CLOSE)/7,VOL/(SUM(AMOUNT,20)/(AMO UNT/VOL/100)/100));DIF:=EMA(EMA(CLOSE,18)-EMA(CLOSE,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(HIGH,24)-CLOSE)/(HHV(HIGH,24)-LLV(LOW,24))*100; VARR2:=(CLOSE-LLV(LOW,18))/(HHV(HIGH,18)-LLV(LOW,18))*100; VARR3:=(2*CLOSE+HIGH+LOW)/4;VARR4:=LLV(LOW,26);VARR5:=HHV(HIGH,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:=(CLOSE-MA(CLOSE,6))/MA(CLOSE,6)*100;VARR11:=(CLOSE-MA(CLOSE,24))/MA(CLOSE,24)*100;VARR12:=(CLOSE-MA(CLOSE,32))/MA(CLOSE,32)*100;VARR13:=(VARR10+VARR11+VARR12)/3;VARR14:=IF(VARR13<=-20,10,0);VARR15:=HHV(VARR14,10);VARR24:=LLV(LOW,36);VARR25:=HHV(HIGH,30);VARR26:=EMA((CLOSE-VARR24)/(VARR25-VARR24)*4,4)*25;VARB27:=(((CLOSE-LLV(LOW,9))/(HHV(HIGH,9)-LLV(LOW,9))*100)/2+22)*1; VARB28:=(((CLOSE -(((EMA(AMOUNT,13) /EMA(VOL,13)) / 100))) / (((EMA(AMOUNT,13) /EMA(VOL,13)) / 100))) * 100);箱顶:HHV(MA((CLOSE),5),30)COLORRED,LINETHICK2;箱底:LLV(MA((CLOSE),5),30) ;长底:LLV(MA((CLOSE),5),120)LINETHICK2;JJ:=(CLOSE+HHV(MA((CLOSE),5),2)+LLV(MA((CLOSE),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{0324},4.55,-DS);DS31:=IF(A9<9999{90324},4.7,-DS);DS 41:=IF(A9<9999{324},4.45,-DS);DS51:=IF(A9<9999{2094},4.75,-DS);DS61: =IF(A9<9999{0324},4.65,-DS);DS71:=IF(A9<9999{0324},4.5,-DS);DS81:=I F(A9<9999{2094},4.6,-DS);DS2:=IF(A9<9999{230},0.01,-DS);DS5:=IF(A9<9999{200},0.02,-DS);DS7:=I F(A9<9999{2},0.03,-DS);DS9:=IF(A9<9999{230},0.04,-DS);DS11:=IF(A9<9 999{230},0.05,-DS);DS13:=IF(A9<9999{30},0.06,-DS);DS15:=IF(A9<9999{20},0.002,-DS);DS17: =IF(A9<9999{230},0.004,-DS);DS19:=IF(A9<9999{230},0.006,-DS);DS21:= IF(A9<9999{230},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 ANDA9<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 ANDA9<1313;AH22:=A9>1309 AND A9<1311;AH23:=A9>1307 AND A9<1309; AH24:=A9>1305 AND A9<1307;AH25:=A9>1303 ANDA9<1305;AH26:=A9>1299 AND A9<1301;AH27:=A9>1297 AND A9<1299; AA28:=A9>1860 AND A9<1862;AA27:=A9>1856 ANDA9<1858;AA2:=A9>1854 AND A9<1856;AA21:=A9>1852 ANDA9<1854;AA22:=A9>1848 AND A9<1850;AA23:=A9>1846 AND A9<1848;AA24:=A9>1844 ANDA9<1846;AA25:=A9>1842 AND A9<1844;AA26:=A9>1840 AND A9<1842; AL2:=A9>3290 AND A9<3292;AL21:=A9>3066 ANDA9<3068;AL22:=A9>3288 AND A9<3290;AL23:=A9>3292 ANDA9<3294;AL24:=A9>3294 AND A9<3296;AL25:=A9>3296 AND A9<3298;AL26:=A9>3068 ANDA9<3070;AL27:=A9>93054 AND A9<3056;AL28:=A9>93020 AND A9<3044; AK27:=A9>4711 AND A9<4713;AK2:=A9>4709 ANDA9<4711;AK21:=A9>4707 AND A9<4709;AK22:=A9>4705 ANDA9<4707;AK23:=A9>4703 AND A9<4705;AK24:=A9>4701 AND A9<4703;AK25:=A9>4699 ANDA9<4701;AK26:=A9>4697 AND A9<4699;AK28:=A9>4695 AND A9<4697; AB2:=A9>5280 AND A9<5320;AB21:=A9>5278 ANDA9<5280;AB22:=A9>5276 AND A9<5278;AB23:=A9>5274 AND A9<5276; AB24:=A9>5272 AND A9<5274;AB25:=A9>5270 ANDA9<5272;AB26:=A9>5268 AND A9<5270;AB27:=A9>5266 AND A9<5268; AC2:=A9>6520 AND A9<6523;{14180=6523}AC21:=A9>6523 ANDA9<6526;AC22:=A9>6526 AND A9<6529;AC23:=A9>6529 ANDA9<6532;AC24:=A9>6532 AND A9<6535;AE2:=A9>6828 AND A9<6878;AF2:=A9>7132 ANDA9<7134;AF21:=A9>7134 AND A9<7136;AF22:=A9>7136 ANDA9<7138;AF23:=A9>7138 AND A9<7140;AG2:=A9>7337 AND A9<7339;AG22:=A9>7339 ANDA9<7341;AG222:=A9>7341 AND A9<7343;AX2:=A9>8014 AND A9<8016;AX22:=A9>8016 ANDA9<8018;AX222:=A9>8018 AND A9<8020;AP2:=A9>8480 AND A9<8482;AP22:=A9>8482 ANDA9<8484;AP222:=A9>8484 AND A9<8486;AQ:=A9>8558 AND A9<8560;AQ2:=A9>8556 ANDA9<8558;AQ22:=A9>8554 AND A9<8556;AQ222:=A9>8552 ANDA9<8554;AQ2222:=A9>8550 AND A9<8552;AQ23:=A9>8548 AND A9<8550;AQ24:=A9>8546 ANDA9<8548;AQ25:=A9>8544 AND A9<8546;AQ26:=A9>8542 ANDA9<8544;AQ27:=A9>8540 AND A9<8542;AM2:=A9>99015 AND A9<9017;AM21:=A9>99017 ANDA9<9019;AM22:=A9>99019 AND A9<9021;AM23:=A9>99021 ANDA9<9023;AM24:=A9>99023 AND A9<9025;AM25:=A9>99025 AND A9<9027;AM26:=A9>99027 ANDA9<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 ANDA9<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 ANDA9<528;AI15:=A9>524 AND A9<526;AI16:=A9>522 AND A9<524;AG1:=A9>1360 AND A9<1362;AG11:=A9>1358 ANDA9<1360;AG12:=A9>1356 AND A9<1358;AG13:=A9>1354 AND A9<1356; AG14:=A9>1366 AND A9<1368;AG15:=A9>1364 ANDA9<1366;AG16:=A9>1362 AND A9<1364;AL1:=A9>2333 AND A9<2383;AL11:=A9>2331 ANDA9<2333;AL12:=A9>2329 AND A9<2331;AL13:=A9>2327 ANDA9<2329;AL14:=A9>2325 AND A9<2327;AL15:=A9>2323 AND A9<2325;AL16:=A9>2321 ANDA9<2323;AL17:=A9>2319 AND A9<2321;AA1:=A9>3826 AND A9<3876;AA11:=A9>3824 ANDA9<3826;AA12:=A9>3822 AND A9<3824;AA13:=A9>3820 ANDA9<3822;AA14:=A9>3818 AND A9<3820;AA15:=A9>3816 AND A9<3818;AA16:=A9>3814 ANDA9<3816;AA17:=A9>3812 AND A9<3814;AK1:=A9>4856 AND A9<4906;AK11:=A9>4854 ANDA9<4856;AK12:=A9>4852 AND A9<4854;AK13:=A9>4850 AND A9<4852; AK14:=A9>4848 AND A9<4850;AK15:=A9>4846 ANDA9<4848;AK16:=A9>4844 AND A9<4846;AK17:=A9>4842 AND A9<4844; AB0:=A9>6140 AND A9<6142;AB1:=A9>6142 ANDA9<6144;AB11:=A9>6144 AND A9<6146;AB12:=A9>6146 AND A9<6148; AB13:=A9>6148 AND A9<6150;AB14:=A9>6152 ANDA9<6154;AB15:=A9>6154 AND A9<6156;AB16:=A9>6156 ANDA9<6158;AB17:=A9>6158 AND A9<6160;AB18:=A9>6160 AND A9<6162; AC1:=A9>6802 AND A9<6804;AC11:=A9>6800 ANDA9<6802;AC12:=A9>6798 AND A9<6800;AC13:=A9>6796 ANDA9<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 ANDA9<6910;AE11:=A9>6910 AND A9<6912;AE1:=A9>6912 AND A9<6914;AF1:=A9>7258 AND A9<7260;AF11:=A9>7260 ANDA9<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+AH1 2+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+A K15+AK16+AWP12+AWP11+AWP1+AA1+AB1+AC1+AE1+AF1+AG1+AH1+A I1+AK1+AL1+AX1+AW1+AW11+AX11+AF11+AF111+AF1111+AE11+AE12+ AE14+AC11+AC12+AC13+AC14+AC15+AC16+AC17+AB11+AB12+AB13+AB 14+AB15+AB16+AB17+AB0+AB18)*14,DS1)*DARS;{反特别版处理}{}Y31:=IF(A9<8940,0.5*(AA1+AB1+AC1+AE1+AF1+AG1+AH1+AI1+AK1+A L1+AX1+AW1+AW11+AX11+AF11+AF111+AF1111)*14,DS31);{反特别版处理}{}Y41:=IF(A9<8940,0.5*(AA1+AB1+AC1+AE1+AF1+AG1+AH1+AI1+AK1+A L1+AX1+AW1+AW11+AX11+AF11+AF111+AF1111)*14,DS41);{反特别版处理}{}Y51:=IF(A9<8940,0.5*(AA1+AB1+AC1+AE1+AF1+AG1+AH1+AI1+AK1+A L1+AX1+AW1+AW11+AX11+AF11+AF111+AF1111)*14,DS51);{反特别版处理}{}Y61:=IF(A9<8940,0.5*(AA1+AB1+AC1+AE1+AF1+AG1+AH1+AI1+AK1+A L1+AX1+AW1+AW11+AX11+AF11+AF111+AF1111)*14,DS61);{反特别版处理}}Y71:=IF(A9<8940,0.5*(AA1+AB1+AC1+AE1+AF1+AG1+AH1+AI1+AK1+AL 1+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+AA2 1+AA22+AA23+AA24+AA25+AA26+AL21+AL22+AL23+AL24+AL25+AL26+A K21+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+AX2 22+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG22+AG222+AQ23+A Q24+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+AG 22+AG222),DS11);{反特别版处理}{}Y13:=IF(A9<9050,0.5*(AA2+AH2+AI2+AJ2+AL2+AC2+AE2+AF2+AG2+A X2+AP2+AX22+AX222+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG 22+AG222),DS13);{反特别版处理}{}Y15:=IF(A9<9050,0.5*(AA2+AH2+AI2+AJ2+AL2+AC2+AE2+AF2+AG2+A X2+AP2+AX22+AX222+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG 22+AG222),DS15);{反特别版处理}{}Y17:=IF(A9<9050,0.5*(AA2+AH2+AI2+AJ2+AL2+AC2+AE2+AF2+AG2+A X2+AP2+AX22+AX222+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG 22+AG222),DS17);{反特别版处理}{}Y19:=IF(A9<9050,0.5*(AA2+AH2+AI2+AJ2+AL2+AC2+AE2+AF2+AG2+A X2+AP2+AX22+AX222+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG 22+AG222),DS19);{反特别版处理}{}Y21:=IF(A9<9050,0.5*(AA2+AH2+AI2+AJ2+AL2+AC2+AE2+AF2+AG2+A X2+AP2+AX22+AX222+AP22+AP222+AQ2+AQ22+AQ222+AQ+AQ2222+AG 22+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;。
N1:=20;N2:=10;N3:=5;AA:=REF(H,N1)=HHV(H,2*N1+1);QY:=BACKSET(AA,N1+1);CC:=FILTER(QY,N1) AND H=HHV(H,N1+1);DDD:=BARSLAST(CC);GDTS:=IF(CC,CURRBARSCOUNT,0);DINGBU:=IF(DDD,REF(H,DDD),H);{顶部}DINGBUTS:=IF(DDD,REF(GDTS,DDD),GDTS);DINGBU1:=REF(DINGBU,DDD+1);GDCS1:=CONST(DINGBUTS);DINGBUTS1:=REF(DINGBUTS,DDD+1);GDCS2:=CONST(DINGBUTS1);DINGBU2:=REF(DINGBU1,DDD+1);MM:=IF(CURRBARSCOUNT>GDCS2,0,1);{DRAWLINE(CURRBARSCOUNT=GDCS2,H,ISLASTBAR,REF(H,GDCS2-1),1),CO LOR0055FF,POINTDOT,LINETHICK2;DRAWLINE(CURRBARSCOUNT=GDCS1,H,ISLASTBAR,REF(H,GDCS1-1),1),COL ORYELLOW,POINTDOT,LINETHICK2;}AA1:=REF(L,N1)=LLV(L,2*N1+1);QY1:=BACKSET(AA1,N1+1);CC1:=FILTER(QY1,N1) AND L=LLV(L,N1+1);DD1:=BARSLAST(CC1);DDTS:=IF(CC1,CURRBARSCOUNT,0);YDB:=IF(DD1,REF(L,DD1),L);DDTS1:=IF(DD1,REF(DDTS,DD1),DDTS);DDCS1:=CONST(DDTS1);ZDB:=REF(YDB,DD1+1);DDTS2:=REF(DDTS1,DD1+1);DDCS2:=CONST(DDTS2);{DRAWLINE(CURRBARSCOUNT=DDCS2,L,ISLASTBAR,REF(L,DDCS2-1),1),COLOR0055FF,POINTDOT,LINETHICK2;DRAWLINE(CURRBARSCOUNT=DDCS1,L,ISLASTBAR,REF(L,DDCS1-1),1),COL ORYELLOW,POINTDOT,LINETHICK2;}LAA:=REF(H,N2)=HHV(H,2*N2+1);LQY:=BACKSET(LAA,N2+1);LCC:=FILTER(LQY,N2) AND H=HHV(H,N2+1);LDDD:=BARSLAST(LCC);LGDTS:=IF(LCC,CURRBARSCOUNT,0);LDINGBU:=IF(LDDD,REF(H,LDDD),H);{顶部}LDINGBUTS:=IF(LDDD,REF(LGDTS,LDDD),LGDTS);LDINGBU1:=REF(LDINGBU,LDDD+1);LGDCS1:=CONST(LDINGBUTS);LDINGBUTS1:=REF(LDINGBUTS,LDDD+1);LGDCS2:=CONST(LDINGBUTS1);LDINGBU2:=REF(LDINGBU1,LDDD+1);LMM:=IF(CURRBARSCOUNT>LGDCS2,0,1);{DRAWLINE(CURRBARSCOUNT=LGDCS2,H,ISLASTBAR,REF(H,LGDCS2-1),1), COLOR0055FF,POINTDOT;DRAWLINE(CURRBARSCOUNT=LGDCS1,H,ISLASTBAR,REF(H,LGDCS1-1),1),C OLORYELLOW,POINTDOT;}LAA1:=REF(L,N2)=LLV(L,2*N2+1);LQY1:=BACKSET(LAA1,N2+1);LCC1:=FILTER(LQY1,N2) AND L=LLV(L,N2+1);LDD1:=BARSLAST(LCC1);LDDTS:=IF(LCC1,CURRBARSCOUNT,0);LYDB:=IF(LDD1,REF(L,LDD1),L);LDDTS1:=IF(LDD1,REF(LDDTS,LDD1),LDDTS);LDDCS1:=CONST(LDDTS1);LZDB:=REF(LYDB,LDD1+1);LDDTS2:=REF(LDDTS1,DD1+1);LDDCS2:=CONST(LDDTS2);DDYL2:=DRAWLINE(CURRBARSCOUNT=LGDCS2,H,CURRBARSCOUNT=LGDC S1,H,1) COLORWHITE;DDZC2:=DRAWLINE(CURRBARSCOUNT=LDDCS2,L,CURRBARSCOUNT=LDDC S1,L,1) COLORWHITE;ZGSTAR:=(DDYL2+DDZC2)/2;ZGEND:=CONST((DDYL2+DDZC2)/2);STARDAY:=IF(DDCS2<GDCS2,DDCS2,GDCS2);LLAA:=REF(H,N3)=HHV(H,2*N3+1);LLQY:=BACKSET(LLAA,N3+1);LLCC:=FILTER(LLQY,N3) AND H=HHV(H,N3+1);LLDDD:=BARSLAST(LLCC);LLGDTS:=IF(LLCC,CURRBARSCOUNT,0);LLDINGBU:=IF(LLDDD,REF(H,LLDDD),H);{顶部}LLDINGBUTS:=IF(LLDDD,REF(LLGDTS,LLDDD),LLGDTS);LLDINGBU1:=REF(LLDINGBU,LLDDD+1);LLGDCS1:=CONST(LLDINGBUTS);LLDINGBUTS1:=REF(LLDINGBUTS,LLDDD+1);LLGDCS2:=CONST(LLDINGBUTS1);LLDINGBU2:=REF(LLDINGBU1,LLDDD+1);LLMM:=IF(CURRBARSCOUNT>LGDCS2,0,1);{DRAWLINE(CURRBARSCOUNT=LLGDCS2,H,ISLASTBAR,REF(H,LLGDCS2-1),1 ),COLOR0055FF,POINTDOT;DRAWLINE(CURRBARSCOUNT=LLGDCS1,H,ISLASTBAR,REF(H,LLGDCS1-1),1) ,COLORYELLOW,POINTDOT;}LLAA1:=REF(L,N3)=LLV(L,2*N3+1);LLQY1:=BACKSET(LLAA1,N3+1);LLCC1:=FILTER(LLQY1,N3) AND L=LLV(L,N3+1);LLDD1:=BARSLAST(LCC1);LLDDTS:=IF(LLCC1,CURRBARSCOUNT,0);LLYDB:=IF(LLDD1,REF(L,LLDD1),L);LLDDTS1:=IF(LLDD1,REF(LLDDTS,LLDD1),LDDTS);LLDDCS1:=CONST(LLDDTS1);LLZDB:=REF(LLYDB,LLDD1+1);LLDDTS2:=REF(LLDDTS1,DD1+1);LLDDCS2:=CONST(LLDDTS2);GDYL3:=DRAWLINE(CURRBARSCOUNT=LLGDCS2,H,CURRBARSCOUNT=LLG DCS1,H,1) COLORYELLOW;DDZC3:=DRAWLINE(CURRBARSCOUNT=LLDDCS2,L,CURRBARSCOUNT=LLDD CS1,L,1) COLORYELLOW;LZGSTAR:=(GDYL3+DDZC3)/2;LZGEND:=CONST((GDYL3+DDZC3)/2);LSTARDAY:=IF(LLDDCS2<LLGDCS2,LLDDCS2,LLGDCS2);GDYL1:=DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1 ,H,1) COLORRED;DDZC1:=DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1, L,1) COLORRED;长线压力:DDZC1+(GDYL1-DDZC1)*0.809,COLORRED;长线支撑:DDZC1+(GDYL1-DDZC1)*0.191,COLORRED;中线压力:DDZC2+(DDYL2-DDZC2)*0.809,COLORGREEN;中线支撑:DDZC2+(DDYL2-DDZC2)*0.191,COLORGREEN;短线压力:DDZC3+(GDYL3-DDZC3)*0.809,COLORBLUE;短线支撑:DDZC3+(GDYL3-DDZC3)*0.191,COLORBLUE;L中轨:DRAWLINE(CURRBARSCOUNT=LSTARDAY,LZGSTAR,ISLASTBAR,LZGEND,1 ),COLORYELLOW;中轨:DRAWLINE(CURRBARSCOUNT=STARDAY,ZGSTAR,ISLASTBAR,ZGEND,1),COLORWHITE;长GDYL:DRAWLINE(CURRBARSCOUNT=GDCS2,H,CURRBARSCOUNT=GDCS1,H, 1) COLORRED,POINTDOT;长DDZC:DRAWLINE(CURRBARSCOUNT=DDCS2,L,CURRBARSCOUNT=DDCS1,L, 1) COLORRED,POINTDOT;中DDYL:DRAWLINE(CURRBARSCOUNT=LGDCS2,H,CURRBARSCOUNT=LGDCS1, H,1) COLORWHITE,POINTDOT;中DDZC:DRAWLINE(CURRBARSCOUNT=LDDCS2,L,CURRBARSCOUNT=LDDCS1, L,1) COLORWHITE,POINTDOT;短GDYL:DRAWLINE(CURRBARSCOUNT=LLGDCS2,H,CURRBARSCOUNT=LLGDCS 1,H,1) COLORYELLOW,POINTDOT;短DDZC:DRAWLINE(CURRBARSCOUNT=LLDDCS2,L,CURRBARSCOUNT=LLDDCS 1,L,1) COLORYELLOW,POINTDOT;。
【通达信】箱顶箱底(价格、颈线、箱顶、选手、箱底)-指标公式源码{NN=900101 1501231 1080918}{小/大/缺省}NN:=1080918;价格: REF(C,DATE=(NN+1)),NODRAW;颈线: DRAWLINE(DATE=NN,C,DATE>NN,价格,1),LINETHICK2;EMA13:EMA(C,13),COLORRED,LINETHICK2;EMA34:EMA(C,34),COLORYELLOW,LINETHICK2;EMA55:EMA(C,55),COLORFF00FF,LINETHICK2;EMA120:EMA(C,120),COLORFFCC66,LINETHICK2;PC:=(H+L+C)/3;V5:=MA(VOL,5);V20:=MA(VOL,20);A1:=CROSS(V20,V5);A2:=BARSLAST(A1);C1:=REF(C,A2);DRAWLINE(A1,C,C<C1,C1,1),COLOR3078EE,LINETHICK2;AR1:=EMA55>EMA34 AND EMA34>EMA13;AR2:=BARSLAST((C-EMA13)/EMA13*100<-6);AR3:=EMA13>=REF(EMA13,2);AR4:=COUNT(CROSS(C,EMA13),AR2)=1;AR5:=AR1 AND AR2 AND AR3 AND AR4;AR6:=AR5 AND FILTER(AR5,10);DRAWTEXT(AR6,L-0.09,'红杏出墙'),COLORYELLOW;BR1:=COUNT(BETWEEN((C-REF(C,1))/REF(C,1)*100,0,5) ,5)=5;BR2:=ABS((EMA13-EMA34)+(EMA34-EMA55))/C<0.2;BR3:=C>EMA55 AND (REF(C,1)<REF(EMA55,1) OR REF(C,2)<REF(EMA55,2) OR REF(C,3)<REF(EMA55,3) OR REF(C,4)<REF(EMA55,4) ORREF(C,5)<REF(EMA55,5));BR4:=BR1 AND BR2 AND BR3;CR1:=(C-REF(C,1))/REF(C,1)*100>0.5;CR2:=V>MA(V,5)*0.6;CR3:=COUNT(CROSS(EMA13,EMA55),3)=1;CR4:=ABS(EMA34-EMA55)/EMA55<0.03;CR5:=EMA55<=EMA120 AND EMA55>=REF(EMA55,1);CR6:=FILTER(CR1 AND CR2 AND CR3 AND CR4 AND CR5,2);DR1:=EMA13>EMA34 AND EMA34<EMA55;DR2:=BARSLAST(CROSS(C,EMA55) );DR3:=H=HHV(H,DR2);DR4:=BARSLAST(DR3);DR5:=COUNT(O>C AND C<REF(C,1) AND C>EMA55 ANDBETWEEN((C-EMA55)/EMA55,0,0.02),DR4)=1;DR6:=C>REF(C,1) ;DR7:= DR1 AND DR5 AND DR6 ;DR8:=DR7 AND FILTER(DR7 ,10);ER:=BARSLAST(REF(CROSS(EMA55,EMA34),1)) AND CROSS(EMA34,EMA55);FR:=BARSLAST(REF(CROSS(EMA34,EMA13),1)) AND CROSS(EMA13,EMA34); DRAWTEXT(FR,L-0.09,'梅开二度'),COLORWHITE;GR1:=BARSLAST(BETWEEN("BIAS.BIAS2"(6,13,24),0,5) );GR2:=EMA13>EMA34 AND EMA34>EMA55 AND EMA13>REF(EMA13,1);GR3:=COUNT("BIAS.BIAS2"(6,13,24)>10 AND H=HHV(H,GR1),GR1);GR4:=H=HHV(H,GR1);GR5:="MACD.MACD"(12,26,9)<REF("MACD.MACD"(12,26,9),1);GR6:=GR2 AND GR3 AND GR4;GR7:=GR2 AND GR3 AND GR4 AND GR5;DRAWTEXT(GR6 AND GR7,H+0.13,'见好就收!'),COLOR00FF00;{STICKLINE(GR6 AND GR7,H,H+0.09,4,0),COLOR00FF00;}HR2:=EMA13>=REF(EMA13,3) AND EMA34>=REF(EMA34,1) AND EMA55>=REF(EMA55,1) AND CROSS(C,EMA13) AND CROSS(C,EMA34) AND CROSS(C,EMA55);{若有十六条限制,你要哪个提示再把它放到大括号外面吧DRAWTEXT(HR2 AND FILTER(HR2,10),L-0.09,'三线推进'),COLORFFC8FF; DRAWTEXT(BR4 AND FILTER(BR4,10),L-0.09,'蚂蚁上树'),COLOR00C5FF; DRAWTEXT(CR6,L-0.09,'红衣侠女'),COLORF00FF0;DRAWTEXT(DR8,L-0.09,'黑客点击'),COLORD6BA63;DRAWTEXT(ER,L-0.09,'均线互换'),COLOR0099FF;}DRAWTEXT(ER OR (HR2 AND FILTER(HR2,10)) OR (BR4 AND FILTER(BR4,10)) OR CR6 OR DR8,L-0.09,'有信号'),COLOR0099FF;B1:=REF(C,1);B2:=REF(C,2);SS:=IF(C>REF(C,1) AND REF(C,1)>=REF(C,2),1,IF(C<REF(C,1) ANDREF(C,1)<=REF(C,2),-1,IF(C>REF(C,2) ANDREF(C,2)>REF(C,1),2,IF(C<REF(C,2) AND REF(C,2)<REF(C,1),-2,0)))); SM:=IF(REF(SS,1)!=0,REF(SS,1),IF(REF(SS,2)!=0,REF(SS,2),IF(REF(SS,3)! =0,REF(SS,3),IF(REF(SS,5)!=0,REF(SS,5),IF(REF(SS,6)!=0,REF(SS,6),IF(R EF(SS,7)!=0,REF(SS,7),0))))));AA:=CLOSE>REF(CLOSE,1) AND REF(CLOSE,1)>REF(CLOSE,2) ANDREF(CLOSE,1)<REF(CLOSE,3) ANDIF(REF(CLOSE,3)<REF(CLOSE,4),1,IF(REF(CLOSE,4)<REF(CLOSE,5),REF(CLOSE ,1)<REF(CLOSE,4) OR (REF(CLOSE,2)<REF(CLOSE,4) ANDREF(CLOSE,3)>=REF(CLOSE,5)),IF(REF(CLOSE,5)<REF(CLOSE,6),1,REF(CLOSE, 6)<REF(CLOSE,7))));BB:=CLOSE<REF(CLOSE,1) AND REF(CLOSE,1)<REF(CLOSE,2) ANDREF(CLOSE,1)>REF(CLOSE,3) ANDIF(REF(CLOSE,3)>REF(CLOSE,4),1,IF(REF(CLOSE,4)>REF(CLOSE,5),REF(CLOSE ,1)>REF(CLOSE,4) OR (REF(CLOSE,2)>REF(CLOSE,4) ANDREF(CLOSE,3)<=REF(CLOSE,5)),IF(REF(CLOSE,5)>REF(CLOSE,6),1,REF(CLOSE, 6)>REF(CLOSE,7))));DRAWICON(AA AND CLOSE>REF(OPEN,2),0.99*LOW,1);DRAWICON(BB AND CLOSE<REF(CLOSE,2),HIGH*1.01,2);{DRAWTEXT(AA AND CLOSE>REF(OPEN,2),LOW*0.98,'三平底翻红'),COLORYELLOW; DRAWTEXT(BB AND CLOSE<REF(CLOSE,2),HIGH*1.02,'三平顶翻'),COLOR00FF00;}MMS:=MA(SMA((L+H+2*C)/4-REF((L+H+2*C)/4,1),5,1)/SMA(ABS((L+H+2*C)/4-R EF((L+H+2*C)/4,1)),5,1)*100,1)+50;G1:=IF(-MMS>95,0,20);UOO:=(-(((CLOSE-LLV(CLOSE,7))/(HHV(CLOSE,7)-LLV( CLOSE,7))*100=100)>0 AND G1)+1);KS:=(((CLOSE - EMA(CLOSE,13)) / EMA(CLOSE,13)) * (0 - 100));KS1:=IF(BARSCOUNT(C)=1,C/10000,(1-C/SMA(C,13,1))*100);X1:=EMA(((KS / 10) + EMA(CLOSE,10)),3);AAA:=-100*(X1-CLOSE)/X1;AC:=(EMA(AAA,5) );SSL:=EMA(CLOSE,3);MMV:=EMA(((SLOPE(CLOSE,22) * 20) + CLOSE),55);MM:=MA(MMV,1);SA:=(MM*0.985);SSS:=(MA(CLOSE,5));DD:=(MA(CLOSE,13));GG :=(MA(CLOSE,21));X2:IF(((SSL>MM)),MM,SA),COLORGREEN,LINETHICK1;Y1:=DMA(((CLOSE + OPEN) / 2),(VOL / (SMA(VOL,4,1) *4)));上开:=O;上收:=C; 上高:=H;上低:=L;JJ:=(上开+上高+上低)/3;A:=EMA(JJ,4);X3:A,COLORWHITE,LINETHICK1;B:=REF(A,1);{STICKLINE(((SSL<MM)),X2,X3,0.01,0),COLORFFFF00;}VA1:=EMA(上收,8);VA2:=EMA(上收,20);选手A:=MA(上收,3);箱顶A:=MA(REF(HHV(上收,6),1),3);箱底A:=MA(REF(LLV(上收,3),1),3);T1:=MA(上收,20)>=REF(MA(上收,20),1); T2:=CROSS(选手A,箱底A) AND 箱顶A/箱底A>100/100 AND T1;T3:=CROSS(箱顶A,选手A) AND 箱顶A/箱底A>100/100;选手:=MA(上收,2);箱顶:=MA(REF(HHV(上收,30),1),2),COLOR0000FF;箱底:=MA(REF(LLV(上收,30),1),2),COLOR00FF00;T4:=CROSS(选手,箱底) AND 箱顶/箱底>110/100;T5:=CROSS(箱顶,选手) AND 箱顶/箱底>110/100;VAR1:=(上收-LLV(上低,27))/(HHV(上高,27)-LLV(上低,27))*100;VAR2:=SMA(VAR1,3,1);VAR3:=SMA(VAR2,3,1);VAR4:=SMA(VAR3,3,1);MA20:=MA( C,20);MA30:=MA(C,30);QSXS:=MA20>MA30 AND MA20>REF(MA20,1) ANDMA30>REF(MA30,1);ZF:=(C/REF(C,1)-1)*100;TDDF:=(L/REF(C,1)-1)*100<=-5 AND(REF(HHV(H,5),1)/L-1)*100>=10;N1:=BARSLAST(CROSS(C,MA(C,5)));N2:=BARSLAST(CROSS(MA(C,5),C));HM:=IF(N1<N2,N1+1,0)*QSXS;Z2:=HM=1 AND ZF>=0 AND C>O AND QSXS;KX1:=ZF<=-3 AND C<O;XDSJ:=BARSLAST(KX1);KX2:=ZF>=3 AND C>O;JBY:=KX2 AND XDSJ<=2 AND C>=REF(O*0.99,XDSJ) ANDZF>ABS(REF(ZF,XDSJ)*0.99);Z3:=IF(FILTER(JBY,1) AND QSXS,5,0);DRAWTEXT(Z2 AND Z3 ,LOW*0.99,'送钱来'),COLORFF0080;【通达信】箱顶箱底(价格、颈线、箱顶、选手、箱底)-指标公式效果图(文档来源:若水财经社区)。
逢顶必跌逢底必涨通达信指标公式源码通达信是一款常用的股票分析软件,由于其广泛使用和可编程性,许多股民和程序员都对其指标公式的源代码感兴趣。
下面是通达信中一种常用的指标公式的源码,分别是“逢顶必跌”和“逢底必涨”。
这两种指标是通过计算股票价格的均线和波动率来判断股票是处于上涨还是下跌趋势。
1.逢顶必跌指标公式源码:```c/*##################################################################逢顶必跌指标#################################################################*/#include "ma.h"enumN=20,//均线周期M=100,//获取股票价格的周期};array<double> CLOSE;onceCLOSE=CLOSE(;//计算逢顶必跌指标for (int i = M; i < BARSLAST; i++)double maxHigh = HHV(HIGH, M - i);double minClose = LLV(CLOSE, M - i);if (REF(CLOSE, i) > REF(HHV(HIGH, N), i) && CLOSE[i] < maxHigh)STDOUT.printf("逢顶必跌: %f\n", CLOSE[i]);}```2.逢底必涨指标公式源码:```c/*########################################################## ########逢底必涨指标############################################################ #####*/#include "ma.h"enumN=20,//均线周期M=100,//获取股票价格的周期};array<double> CLOSE;onceCLOSE=CLOSE(;//计算逢底必涨指标for (int i = M; i < BARSLAST; i++)double minLow = LLV(LOW, M - i);double maxClose = HHV(CLOSE, M - i);if (REF(CLOSE, i) < REF(LLV(LOW, N), i) && CLOSE[i] > minLow) STDOUT.printf("逢底必涨: %f\n", CLOSE[i]);}```以上是通达信中“逢顶必跌”和“逢底必涨”指标公式的源码。
使用说明:很多朋友在找支撑,找压力,但往往买不好,卖不好,我用裸K的原理,结合了其他主图,编制了这个三个箱体的主图,适应喜欢裸k的朋友.增加一条条横向线条,对应K线的上面是压力,下面是支撑,买卖点以线的压制为主,止贪遏跌,方便快捷,让短线客在买点卖点的取舍上有所依凭.不触压力不走,不踩支撑不接.跌破支撑就清仓.支撑价:LLV(LOW,19),LINETHICK2 , COLOR00FF00;阻力价:HHV(HIGH,19),COLORRED, LINETHICK2;VAR1:=EMA(CLOSE,12)-EMA(CLOSE,26);VAR2:=EMA(VAR1,9);VAR3:=(CLOSE*2.5/100+CLOSE);VAR4:=EMA(C,3);VAR5:=LLV(HIGH,240);VAR6:=100*(CLOSE-VAR5)/VAR5;VAR7:=REF(LLV(CLOSE,480),1);VAR8:=REF(HHV(CLOSE,480),1);VAR9:=100*(CLOSE-VAR7)/(VAR8-VAR7);VARA:=(CLOSE-LLV(CLOSE,981))/(HHV(CLOSE,981)-LLV(CLOSE,981))*100;VARB:=(CLOSE-LLV(CLOSE,393))/(HHV(CLOSE,393)-LLV(CLOSE,393))*100;VARC:=(CLOSE-LLV(LOW,981))/(HHV(HIGH,981)-LLV(LOW,981))*100;VARD:=(CLOSE-LLV(LOW,393))/(HHV(HIGH,393)-LLV(LOW,393))*100;VARE:=VARC>98.5 OR VARD>98.5;VARF:=EMA(100*(CLOSE-LLV(LOW,100))/(HHV(HIGH,100)-LLV(LOW,100)),5)/4;VAR13:=VARA=0 AND VARC=0 AND VAR6<0;VAR14:=VARA=100 AND VARC=100;VAR15:=VARB=0 OR VARD=0 AND VAR9<0;VAR16:=VARB=100 AND VARD=100;VAR17:=VAR6<0 AND VAR9<0;VAR18:=VAR13 AND VAR15;VAR19:=VAR14 AND VAR16;VAR1B:=SMA(MAX(CLOSE-REF(CLOSE,1),0),49,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),6,1)* 100;VAR1C:=SMA(MAX(CLOSE-REF(CLOSE,1),0),14,1)/SMA(ABS(CLOSE-REF(CLOSE,1)),14,1) *100;VAR1D:=BARSCOUNT(CLOSE);VAR1E:=VAR1B<20 AND VAR1C<23 AND VAR1D>35;VAR1F:=VAR1E AND COUNT(VAR1E,1)=1;VAR20:=REF(CLOSE,1);VAR21:=SMA(MAX(CLOSE-VAR20,0),34,1)/SMA(ABS(CLOSE-VAR20),7,1)*100;VAR22:=SMA(MAX(CLOSE-VAR20,0),13,1)/SMA(ABS(CLOSE-VAR20),13,1)*100;VAR23:=BARSCOUNT(CLOSE);VAR24:=VAR21<20 AND VAR22<23 AND VAR23>35;VAR25:=VARA=0 AND VARF<1.2 AND VAR17;VAR27:=VAR18 AND VARF<1.2 AND VAR17;VAR29:=SUM(HIGH-OPEN,77)/SUM(OPEN-LOW,77)*100;VAR2A:=SUM(MAX(0,HIGH-REF(CLOSE,1)),77)/SUM(MAX(0,REF(CLOSE,1)-LOW),77)*10 0;VAR2B:=CROSS(VAR29,69) AND CROSS(VAR2A,80)<150;VAR2C:=VAR24 AND VAR1F AND COUNT(VAR24,30)=1;买点:=VAR25 AND VAR2B;绝对卖点:=(VAR19 OR VARA)AND VARF>23 OR VARE ;VAR2D:=VAR1F AND VAR2C AND VAR25;GHWYH:=(CLOSE/REF(CLOSE,1)>1.04 AND (CLOSE>10.8 AND CLOSE<10.83 OR CLOSE>6.86 AND CLOSE<6.88 OR CLOSE>13.82 AND CLOSE<13.84 OR CLOSE>7.28 AND CLOSE<7.3 OR CLOSE>12.4 AND CLOSE<12.42 OR CLOSE>22.33 AND CLOSE<22.35 OR CLOSE>4.68 AND CLOSE<4.7 OR CLOSE>26.29 AND CLOSE<26.31 OR CLOSE>7.65 AND CLOSE<7.67 OR CLOSE>13.4 AND CLOSE<13.42 OR CLOSE>7.58 AND CLOSE<7.6 OR CLOSE>20.43 AND CLOSE<20.45 OR CLOSE>19.57 AND CLOSE<19.59 OR CLOSE>6.26 AND CLOSE<6.28 OR CLOSE>7.14 AND CLOSE<7.16 OR CLOSE>6.61 AND CLOSE<6.63 OR CLOSE>11.9 AND VOL<11.92 OR CLOSE>6.7 AND CLOSE<6.72 OR CLOSE>8.19 AND CLOSE<8.21));DRAWTEXT(FILTER(绝对卖点>0,3),H,'别贪'),COLORWHITE;DRAWTEXT(GHWYH>0,L,'☆追涨'),COLORYELLOW ;DRAWICON(买点>0,L,4);DRAWTEXT(买点>0,L,'扫描神针'),COLORF00FF0;DRAWTEXT(VARF<0.7 AND VAR27 AND VAR25>0,L,'万元'),COLORYELLOW; STICKLINE(VAR2D>0,O,C,10,0), COLORRED;DRAWTEXT(VAR2D>0,L,'大方神针'),COLORRED;DRAWICON(COUNT(REF(VAR4,1)<REF(VAR4,2),5)=5 AND VAR4>REF(VAR4,1),L*0.98,4);DRAWICON(FILTER(COUNT(VAR6<0,5)AND CROSS(VAR6,0)AND VARF>REF(VARF,1)AND C>O,3),L,1);DRAWICON(FILTER(REF(VAR4,1)>REF(VAR4,2)AND VAR4<REF(VAR4,1)AND VARF>17 AND VAR1>VAR2,5),H,2);DRAWICON(阻力价>REF(阻力价,1)AND CROSS(阻力价,VAR3)AND C<O,H*1.02,5);A1:=REF(C,1)<REF(O,1) AND C>O AND C>REF(O,1) AND O<=REF(C,1);压力:MA(REF(HHV(C,30),1),2),COLORMAGENTA,LINETHICK2;支撑:MA(REF(LLV(C,30),1),2),COLORLIGREEN,LINETHICK2;X1A:=30;X1B:HHV(C,X1A),COLORFF5500,LINETHICK3;X1C:=IF(ISLASTBAR,BARSLAST(C=CONST(X1B))+1,1/0);X1D:=IF(X1C=1,' 1',IF(X1C=2,' 2',IF(X1C=3,' 3',IF(X1C=4,' 4',IF(X1C=5,' 5',IF(X1C=6,' 6',IF(X1C=7,' 7',IF(X1C=8,' 8',IF(X1C=9,' 9',IF(X1C=10,' 10',IF(X1C=11,' 11',IF(X1C=12,' 12',IF(X1C=13,' 13',IF(X1C=14,' 14',IF(X1C=15,' 15',IF(X1C=16,' 16',IF(X1C=17,' 17',IF(X1C=18,' 18',IF(X1C=19,' 19',IF(X1C=20,' 20',IF(X1C=21,' 21',IF(X1C=22,' 22',IF(X1C=23,' 23',IF(X1C=24,' 24',IF(X1C=25,' 25',IF(X1C=26,' 26',IF(X1C=27,' 27',IF(X1C=28,' 28',IF(X1C=29,' 29',IF(X1C=30,' 30',' 0'))))))))))))))))))))))))))))));X1E:DRAWTEXT(ISLASTBAR,X1B,X1D),COLORRED;X2A:=30;X2B:LLV(C,X2A),COLORFF00FF,LINETHICK2;X2C:=IF(ISLASTBAR,BARSLAST(C=CONST(X2B))+1,1/0);X2D:=IF(X2C=1,' 1',IF(X2C=2,' 2',IF(X2C=3,' 3',IF(X2C=4,' 4',IF(X2C=5,' 5',IF(X2C=6,' 6',IF(X2C=7,' 7',IF(X2C=8,' 8',IF(X2C=9,' 9',IF(X2C=10,' 10',IF(X2C=11,' 11',IF(X2C=12,' 12',IF(X2C=13,' 13',IF(X2C=14,' 14',IF(X2C=15,' 15',IF(X2C=16,' 16',IF(X2C=17,' 17',IF(X2C=18,' 18',IF(X2C=19,' 19',IF(X2C=20,' 20',IF(X2C=21,' 21',IF(X2C=22,' 22',IF(X2C=23,' 23',IF(X2C=24,' 24',IF(X2C=25,' 25',IF(X2C=26,' 26',IF(X2C=27,' 27',IF(X2C=28,' 28',IF(X2C=29,' 29',IF(X2C=30,' 30',' 0'))))))))))))))))))))))))))))));X2E:DRAWTEXT(ISLASTBAR,X2B,X2D),COLORFF00FF;。
股灾以后顶部和底部形成的大箱体画线公式
上证顶:=CONST(BARSLAST(DATE<=1150612));{上证指数股灾周期}
上市周期:=CONST(BARSCOUNT(C));
股灾周期:=CONST(DATETODAY(DATE)-DATETODAY(1150612));
M:=60;
N:=20;
底部:=CONST(IF(上市周期>股灾周期,LLV(L,上证顶),IF(上市周期>N,LLV(L,上市周期-N),DRAWNULL)));
底部期:=CONST(IF(上市周期>股灾周期,LLVBARS(L,上证顶),IF(上市周
期>N,LLVBARS(L,上市周期-N),DRAWNULL)));
顶部:=CONST(IF(上市周期>股灾周期,REF(HHV(H,上证顶-底部期+M),底部期),IF(上市周期>N,REF(HHV(H,上市周期-底部期),底部期),DRAWNULL)));
顶部期:=CONST(IF(上市周期>股灾周期,REF(HHVBARS(H,上证顶-底部期+M),底部期)+底部期,IF(上市周期>N,REF(HHVBARS(H,上市周期-底部期),底部期)+底部期,DRAWNULL)));
新高:=CONST(IF(底部=DRAWNULL,DRAWNULL,HHV(H,底部期)));
新高期:=CONST(IF(底部=DRAWNULL,DRAWNULL,HHVBARS(H,底部期)));
大箱顶:=CONST(IF(顶部=DRAWNULL,DRAWNULL,IF(顶部/底部-1>0.2,顶部,DRAWNULL)));
大箱顶期:=CONST(IF(大箱顶=顶部,顶部期,DRAWNULL));
大箱底:=CONST(IF(底部=DRAWNULL,DRAWNULL,IF(新高/底部-1>0.2,底部,DRAWNULL)));
大箱底期:=CONST(IF(大箱底=底部,底部期,DRAWNULL));
股灾顶:IF(CURRBARSCOUNT<大箱顶期+2,大箱
顶,DRAWNULL),LINETHICK2,COLORRED;
股灾底:IF(CURRBARSCOUNT<大箱底期+2,大箱
底,DRAWNULL),LINETHICK2,COLORCYAN;。