{主图源码如下}
ZBGS3_1:=(3*C+O+H+LOW)/6;
MA12:EMA(ZBGS3_1,12);
MA36:EMA(ZBGS3_1,36);
MA108:EMA(ZBGS3_1,108);
MA250:EMA(ZBGS3_1,250);
章鱼题材13:=0.01*EMA(AMOUNT,13)/EMA(VOL,13);
章鱼强度:=50,COLORYELLOW,DOTLINE;
章鱼筹码:=(C-章鱼题材13)/章鱼题材13*1000,NODRAW;
强势章鱼:=BARSLASTCOUNT(章鱼筹码>50)=1;
STICKLINE(章鱼筹码>0,O,C,3,0),COLORRED;
STICKLINE(强势章鱼,O,C,3,0),COLORRED;
DRAWICON(强势章鱼,L,9);
换手:=VOL/CAPITAL*100;
ZBGS3_5:=IF(CODELIKE('688'),0,1);
ZBGS3_6:=COST(85);
ZBGS3_7:=COST(15);
ZBGS3_8:=ZBGS3_6-ZBGS3_7;
ZBGS3_9:=(ZBGS3_6+ZBGS3_7)/2;
筹码:=ZBGS3_8/ZBGS3_9*100< 30,LINETHICK0;
ZBGS3_10:=HHV(H,250);
ZBGS3_11:=LLV(LOW,250);
ZBGS3_12:=ZBGS3_10-ZBGS3_11;
ZBGS3_13:=(ZBGS3_9-ZBGS3_11);
比例:=ZBGS3_9< (ZBGS3_12*04+ZBGS3_11),LINETHICK0;
吸筹结束:=筹码 AND 比例;
ZBGS3_15:=C/REF(C,1)>1.04;
持仓%:=EMA(100*(C-LLV(LOW,30))/(HHV(H,30)-LLV(LOW,30)),3);
章鱼持仓:=持仓%>=75 AND C>0 AND C>O;
启动:FILTER(章鱼持仓 AND 吸筹结束 AND ZBGS3_13 AND WINNER(C)>=0.90 AND ZBGS3_15 AND C/REF(C,1)>1.092 AND C=H AND C< 40 AND ZBGS3_5 AND 换手< 20 ,10),NODRAW;
DRAWTEXT(启动,L,' ★启动'),COLORYELLOW;
DRAWICON(启动,L,13);
所属板块:=STRCAT('【所属板块】:',STRCAT(STRCAT(' [行业]-',HYBLOCK),STRCAT(' [概念]-',GNBLOCK)));
风格板块:=STRCAT('【风格板块】:',STRCAT(STRCAT(' [地域]-',DYBLOCK),STRCAT(' [风格]-',FGBLOCK)));
总流通:=STRCAT(STRCAT(' 总流通:',CON2STR(TOTALCAPITAL/1000000,2)),'亿');
流通盘:=STRCAT(STRCAT(' 流通盘:',CON2STR(CAPITAL/1000000,2)),'亿');
全流通:=STRCAT(STRCAT(' 流通比:',CON2STR(CAPITAL/TOTALCAPITAL*100,2)),'%');
市值:=STRCAT(STRCAT(' 流通市值:',CON2STR((CAPITAL/1000000)*C,2)),'亿');
流通市值:=STRCAT('【流通市值】:',STRCAT(STRCAT(STRCAT(总流通,流通盘),全流通),市值));
市盈率:=STRCAT(' 市盈率:',CON2STR(C/FINANCE(33),2));
收益率:=STRCAT(' 收益率:',CON2STR(FINANCE(33)/FINANCE(34)*100,2));
利润率:=STRCAT(' 利润率:',CON2STR(FINANCE(23)/FINANCE(20)*100,2));
业绩:=STRCAT('【业绩】:',STRCAT(STRCAT(市盈率,收益率),利润率));
DRAWTEXT_FIX(ISLASTBAR,0.005,0.02,0,所属板块),COLORYELLOW;
DRAWTEXT_FIX(ISLASTBAR ,0.005,0.07,0,风格板块),COLORRED;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.12,0,市值),COLORMAGENTA;
DRAWTEXT_FIX(ISLASTBAR,0.005,0.17,0,业绩),COLORRED;
{副图源码如下}
ZBGS31_1:=SUM((WINNER(C)*100),30)/30*0.1;
ZBGS31_2:=SUM((WINNER(C)*100),20)/20*0.4;
ZBGS31_3:=SUM((WINNER(C)*100),10)/10*0.3;
ZBGS31_4:=SUM((WINNER(C)*100),5)/5*0.1;
ZBGS31_5:=SUM((WINNER(C)*100),3)/3*0.1;
ZBGS31_Z:=ZBGS31_1+ZBGS31_2+ZBGS31_3+ZBGS31_4+ZBGS31_5;
yg效应:IF(ZBGS31_Z>38,ZBGS31_Z,ZBGS31_Z*1.3),NODRAW;
活跃度:IF(SUMBARS(VOL,CAPITAL)< 100,100-SUMBARS(VOL,CAPITAL),1),NODRAW;
AAC1:=MA(C,37);
yg:=(AAC1-REF(AAC1,1))/REF(AAC1,1)*1000;
STICKLINE(yg< 0,yg,0,1,0),COLORWHITE;
A10:=CROSS(yg,0);
无庄yg:IF(yg< 0,yg,0),COLORWHITE,NODRAW;
开始yg:=IF(A10,5,0),LINETHICK1,COLORBROWN;
STICKLINE(yg>REF(yg,1) AND yg>0,yg,0,1,0),COLORRED;
有庄yg:IF(yg>REF(yg,1) AND yg>0,yg,0),COLORRED,NODRAW;
AAC2:=100*WINNER(CLOSE*0.95);
STICKLINE(AAC2>50 AND COST(85)< CLOSE AND yg>0,yg,0,1,0),COLORFF00FF;
高度yg:IF(AAC2>50 AND COST(85)< CLOSE AND yg>0,yg,0),COLORFF00FF,NODRAW;
STICKLINE(yg< REF(yg,1) AND yg>0,yg,0,1,0),COLOR00FF00;
章鱼出货:IF(yg< REF(yg,1) AND yg>0,yg,0),COLOR00FF00,NODRAW;
A1111:=FINANCE(42);
A211:=DATETODAY(CONST(DATE));
A311:=A211-A1111;
XDATE:=DAYTODATE(A311)+19000000;
上市日期:=STRCAT('上市日期:',CON2STR(XDATE,0));
SSTS1:=STRCAT('上市',CON2STR(FINANCE(42),0));
SSTS2:=STRCAT(SSTS1,'天');
SSTS3:=STRCAT('累计交易:',CON2STR(TOTALBARSCOUNT,0));
SSTS4:=STRCAT(SSTS3,'周期');
W11:=EMA(C,1);
章yg:=W11/REF(W11,1)>=1.095;
ZTCS:=COUNT(章yg,BARSSINCE(章yg)+1);
NTZZT1:=STRCAT(' 距今',CON2STR(CONST(BARSLAST(章yg)),0));
NTZZT2:=STRCAT(NTZZT1,'天有章yg');
GZT1:=STRCAT(' 共章yg',CON2STR(ZTCS,0));
GZT2:=STRCAT(GZT1,'次');
ZBGS31:=STRCAT(SSTS2,GZT2);
ZBGS32:=STRCAT(ZBGS31,NTZZT2);
龙虎榜潜力:=STRCAT('【章yg统计】',ZBGS32);
AC:=IF(CODELIKE('688'),0,1);
换手:=VOL/CAPITAL*100;
JJ:=(HIGH+LOW+CLOSE)/3;
ACC0:=VOL/IF(HIGH=LOW,4,HIGH-LOW);
ACC1:=IF(CAPITAL=0,ACC0*(JJ-MIN(CLOSE,OPEN)),ACC0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
ACC2:=IF(CAPITAL=0,ACC0*(MIN(OPEN,CLOSE)-LOW),ACC0*IF(HIGH=LOW,1,(JJ-MIN(CLOSE,OPEN))));
ACC3:=IF(CAPITAL=0,ACC0*(HIGH-MAX(OPEN,CLOSE)),ACC0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
ACC4:=IF(CAPITAL=0,ACC0*(MAX(CLOSE,OPEN)-JJ),ACC0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-JJ)));
DDX:=((ACC1+ACC2)-(ACC3+ACC4))/IF(CAPITAL=0,10000,10000),COLOR00AAAA,LINETHICK;
V2:=SMA(IF(C>=REF(C,1),DDX,-DDX/100),2,1);
V5:=SMA(V2*120/FROMOPEN*5,2,1);
V10:=SMA(V5,5,1);
V20:=SMA(V10,5,1);
DY:=CURRBARSCOUNT=1 AND C< REF(C,1);
DY2:=REF(V2,1)-DY;
TT:=(V2*1.01-REF(V2,1));
TT2:=(REF(V2*1.01,1)-REF(V2,2));
YY:=TT>3*ABS(TT2);
TT1:=EMA(V2,15);
A111:=COST(85);
A222:=COST(15);
A333:=A111-A222;
A444:=(A111+A222)/2;
筹码:=A333/A444*100< 30,LINETHICK0;
游资yg1:=HHV(HIGH,250);
游资yg2:=LLV(LOW,250);
游资yg3:=游资yg1-游资yg2;
游资yg4:=(A444-游资yg2);
比例:=A444< (游资yg3*04+游资yg2),LINETHICK0;
吸筹结束:=筹码 AND 比例;
游资yg5:=C/REF(C,1)>1.04;
持仓%:=EMA(100*(CLOSE-LLV(LOW,30))/(HHV(HIGH,30)-LLV(LOW,30)),3);
章鱼持仓:=持仓%>=75 AND C>0 AND CLOSE>OPEN;
ZBGS3_:=FILTER(章鱼持仓 AND 吸筹结束 AND 游资yg4 AND WINNER(C)>=0.90 AND 游资yg5 AND C/REF(C,1)>1.092 AND C=H AND C< 40 AND AC AND 换手< 20 ,10);
ZBGS301:=(2*CLOSE+HIGH+LOW)/4;
ZBGS302:=LLV(LOW,5);
ZBGS303:=HHV(HIGH,5);
ZBGS304:=EMA((ZBGS301-ZBGS302)/(ZBGS303-ZBGS302)*100,5);
ZBGS305:=MA(ZBGS304,2);
ZBGS306:=REF(CLOSE,1)/REF(CLOSE,2)< 0.95;
ZBGS307:=ZBGS305< 20 AND ZBGS306 AND CLOSE>LOW AND OPEN>LOW;
ZBGS308:=CLOSE/REF(CLOSE,3)< 0.95;
DRAWTEXT_FIX(C>O,0,0.2,0,'乐淘,公式源码 '),COLOR333333;
ZBGS309:=REF(ZBGS308,1)=1 AND CLOSE/REF(CLOSE,1)>1.025;
ZBGS3010:=VOL>REF(HHV(VOL,10),1) AND NOT(OPEN=CLOSE) AND HIGH/CLOSE< 1.0007;
ZBGS3011:=REF(EVERY(MA(CLOSE,5)< MA(CLOSE,10),5),1) AND VOL/MA(VOL,10)>1.8;
ZBGS3012:=COUNT(ZBGS307=1,3)>0 AND REF(CLOSE,1)< REF(CLOSE,2);
ZBGS3013:=VOL/REF(VOL,1)>1.7 AND REF(OPEN,1)< 100;
章yg起飞:ZBGS309 AND ZBGS3010 AND ZBGS3011 AND ZBGS3012 AND ZBGS3013;
DRAWTEXT(章yg起飞,10,'--起飞'),COLORMAGENTA;
STICKLINE(章yg起飞,14,12,3.5,0),COLOR0000FF;
STICKLINE(章yg起飞,15,14.9,1.7,0),COLOR0000FF;
STICKLINE(章yg起飞,20.11,9.6,0.1,0),COLOR0000FF;
STICKLINE(章yg起飞,19.16,9.2,0.3,0),COLOR0000FF;
STICKLINE(ZBGS3_,14,12,3.5,0),COLORA8A8A8;
STICKLINE(ZBGS3_,15,14.9,1.7,0),COLORA8A8A8;
STICKLINE(ZBGS3_,14.9,14.8,1.9,0),COLORA8A8A8;
STICKLINE(ZBGS3_,14.8,14.7,2.1,0),COLORA8A8A8;
STICKLINE(ZBGS3_,14.7,14.6,2.3,0),COLORA8A8A8;
STICKLINE(ZBGS3_,14.6,14.5,2.5,0),COLORA8A8A8;
STICKLINE(ZBGS3_,14.5,14.4,2.7,0),COLORA8A8A8;
STICKLINE(ZBGS3_,14.4,14.3,2.9,0),COLORA8A8A8;
STICKLINE(ZBGS3_,14.3,14.2,3.1,0),COLORA8A8A8;
STICKLINE(ZBGS3_,14.2,14.1,3.3,0),COLORA8A8A8;
STICKLINE(ZBGS3_,14.1,14.0,3.5,0),COLORA8A8A8;
STICKLINE(ZBGS3_,20.11,9.6,0.1,0),COLORWHITE;
STICKLINE(ZBGS3_,19.16,9.2,0.3,0),COLORWHITE;
STICKLINE(ZBGS3_,19.12,8.8,0.6,0),COLORWHITE;
STICKLINE(ZBGS3_,18.8,18.4,0.9,0),COLORWHITE;
STICKLINE(ZBGS3_,18.4,18.0,1.2,0),COLORWHITE;
STICKLINE(ZBGS3_,18.0,15.0,1.4,0),COLORWHITE;
STICKLINE(ZBGS3_,17.4,17.0,0.6,0),COLORRED;
STICKLINE(ZBGS3_,16.5,16.4,1.5,0),COLORBLUE;
STICKLINE(ZBGS3_,15.1,14.9,1.5,0),COLORBLUE;
STICKLINE(ZBGS3_,14.9,12.5,1.5,0),COLORWHITE;
STICKLINE(ZBGS3_,12.5,12.0,1.3,0),COLORRED;
STICKLINE(ZBGS3_,12.0,11.3,1,0),COLORRED;
STICKLINE(ZBGS3_,11.3,10.7,0.7,0),COLORRED;
STICKLINE(ZBGS3_,10.77,10.1,0.3,0),COLORRED;
STICKLINE(ZBGS3_,12.4799999,12.1799999,1,0),COLORYELLOW;
STICKLINE(ZBGS3_,12.1799999,11.8799999,0.5,0),COLORYELLOW;
STICKLINE(ZBGS3_,11.8799999,11.58,0.1,0),COLORYELLOW;
STICKLINE(ZBGS3_,16.0,15.5,0.5,0),COLORRED;
{选股源码如下}
ZBGS31:=MA(CLOSE,10);
ZBGS32:=MA(CLOSE,54);
ZBGS33:=(REF(CLOSE,3)-CLOSE)/REF(CLOSE,3)*100>5;
ZBGS34:=FILTER(ZBGS33,10);
ZBGS35:=BARSLAST(ZBGS34);
ZBGS36:=REF(HIGH,ZBGS35+2);
ZBGS37:=REF(HIGH,ZBGS35+1);
ZBGS38:=REF(HIGH,ZBGS35);
ZBGS39:=MAX(ZBGS36,ZBGS37);
ZBGS310:=MAX(ZBGS39,ZBGS38);
ZBGS311:=(CLOSE-REF(CLOSE,1))/REF(CLOSE,1)*100>5;
ZBGS312:=ZBGS35< 150;
ZBGS313:=(OPEN-ZBGS310)/ZBGS310*100< 30;
ZBGS314:=(CLOSE-LLV(LOW,ZBGS35))/LLV(LOW,ZBGS35)*100< 50;
ZBGS315:=(CLOSE-REF(OPEN,5))/REF(OPEN,5)*100< 30;
ZBGS316:=VOL/MA(VOL,5)< 3.5;
ZBGS317:=(CLOSE-REF(CLOSE,89))/REF(CLOSE,89)*100< 80;
ZBGS318:=ZBGS311 AND ZBGS312 AND ZBGS313 AND ZBGS314 AND ZBGS315 AND ZBGS316 AND ZBGS317;
ZBGS319:=FILTER(ZBGS318,15);
ZBGS320:=(CLOSE-ZBGS32)/ZBGS32< 0.1;
ZBGS321:=(CLOSE-ZBGS31)/ZBGS31< 0.3;
ZBGS322:=(ZBGS320=1 AND ZBGS321=1)*0.2;
ZBGS323:=(ZBGS322=0 AND REF(ZBGS322,1)=0.2 AND REF(COUNT(ZBGS322=0.2,10)=10,1)=1)*(-0.1);
ZBGS324:=ZBGS323=(-0.1);
ZBGS325:=ZBGS319 OR ZBGS324;
ZBGS326:=DMA(AMOUNT/VOL/100,VOL/CAPITAL);
ZBGS327:=DYNAINFO(7)/REF(CLOSE,1)>1.05 AND DYNAINFO(7)/OPEN>1.05;
ZBGS328:=VOL/REF(VOL,1)>1.2 AND COUNT(CLOSE>OPEN,1) OR (LOW>REF(HIGH,1) AND COUNT(OPEN>CLOSE,1) AND VOL/REF(VOL,1)>1.2);
ZBGS3_:ZBGS325 AND CLOSE/REF(CLOSE,1)>1.095 AND ZBGS328 AND ZBGS327;