{主图源码如下}
{背景}
DRAWGBK(C>0,RGB(0,0,20),RGB(0,0,20),0,'0',1);
{DRAWSL(BARSLAST(DAY<>REF(DAY,1))=0 AND PERIOD<5,C,10000,99999999,2),COLOR222222;
DRAWSL(BARSLAST(MONTH<>REF(MONTH,1))=0 AND (PERIOD=5 OR PERIOD=14),C,10000,99999999,2),COLOR222222;}
LX:=IF(L>REF(MAX(O,C),1) AND BARSCOUNT(C)>=1,REF(MAX(O,C),1),L);
DX:=IF(H<REF(L,1) AND BARSCOUNT(C)>=1,REF(L,1),H);
{涨跌停模型}
ZT0:=IF(CODELIKE('60') OR CODELIKE('00'),0.1,IF(CODELIKE('30') OR CODELIKE('68'),0.2,0.3));
DT0:=IF(CODELIKE('60') OR CODELIKE('00'),0.1,IF(CODELIKE('30') OR CODELIKE('68'),0.2,0.3));
ZT:=C=H AND C>=ZTPRICE(REF(C,1),ZT0);
ZB:=C<H AND H>=ZTPRICE(REF(C,1),ZT0);
DT:=C=L AND C<=DTPRICE(REF(C,1),ZT0);
QB:=C>L AND L<=DTPRICE(REF(C,1),ZT0);
ZTD:=BARSLAST((ZT OR ZB) AND COUNT((ZT OR ZB),2)=1);
ZTH:=REF(H,ZTD);
ZTL:=REF(LX,ZTD);
ZTM:=(ZTH+ZTL)/2;
DTD:=BARSLAST(DT OR QB);
DTH:=REF(DX,DTD);
DTL:=REF(L,DTD);
DTM:=(DTH+DTL)/2;
MAXBYH:=MAX(IF(COUNT(ZT OR ZB,BARSLAST(C))>0,ZTH,1),
IF(COUNT(DT OR QB,BARSLAST(C))>0,DTH,1));
ZTHA:=IF(PERIOD=5,ZTH,DRAWNULL);
DTHA:=IF(PERIOD=5,DTH,DRAWNULL);
DRAWBAND(MA(C,5),RGB(55,0,0),ZTHA,RGB(0,55,55));
DRAWBAND(MA(C,5),RGB(55,0,0),DTHA,RGB(0,55,55));
DRAWKLINE(H,O,L,C);
{涨跌停划线}
STICKLINE(ZT AND PERIOD=5,O,C,2.2,0),COLOR0000FF;
STICKLINE(DT AND PERIOD=5,O,C,1.2,0),COLORFF0000;
IF(ZB AND PERIOD=5,H*1.01,DRAWNULL),LINETHICK3,CIRCLEDOT,COLORFF00FF;
IF(QB AND PERIOD=5,L*0.99,DRAWNULL),LINETHICK3,CIRCLEDOT,COLORFFFF00;
启动板:=FILTER(MAXBYH<REF(MAXBYH,1) AND C>REF(L,1),5);
BYD:=BARSLAST(启动板);
BYH:=REF(DX,BYD);
BYL:=REF(LX,BYD);
BYM:=(BYH+BYL)/2;
DRAWSL(PERIOD=5,BYH,0,BYD,1),COLOR0099FF;
DRAWSL(PERIOD=5,BYL,0,BYD,1),COLOR0099FF;
STICKLINE(PERIOD=5,BYM,BYM,3,-1),COLOR0099FF;
DRAWTEXT(启动板 AND PERIOD=5,L*0.98,'启动'),COLOR00FFFF;
{副图源码如下}
ZT0:=IF(CODELIKE('60') OR CODELIKE('00'),0.1,IF(CODELIKE('30') OR CODELIKE('68'),0.2,0.3));
DT0:=IF(CODELIKE('60') OR CODELIKE('00'),0.1,IF(CODELIKE('30') OR CODELIKE('68'),0.2,0.3));
ZT:=C=H AND C>=ZTPRICE(REF(C,1),ZT0);
ZB:=C<H AND H>=ZTPRICE(REF(C,1),ZT0);
DT:=C=L AND C<=DTPRICE(REF(C,1),ZT0);
QB:=C>L AND L<=DTPRICE(REF(C,1),ZT0);
LX:=IF(L>REF(MAX(O,C),1) AND BARSCOUNT(C)>=1,REF(MAX(O,C),1),L);
DX:=IF(H<REF(L,1) AND BARSCOUNT(C)>=1,REF(L,1),H);
ZTD:=BARSLAST((ZT OR ZB) AND COUNT((ZT OR ZB),2)=1);
ZTH:=REF(H,ZTD);
DTD:=BARSLAST(DT OR QB);
DTH:=REF(DX,DTD);
MAXBYH:=MAX(IF(COUNT(ZT OR ZB,BARSLAST(C))>0,ZTH,1),
IF(COUNT(DT OR QB,BARSLAST(C))>0,DTH,1));
启动板:FILTER(MAXBYH<REF(MAXBYH,1) AND C>REF(L,1),5);
