跳空缺口 封板率指标 大智慧指标 源码 贴图
一、跳空缺口：
{向下跳空缺口}
I1:=0;
FLAG1:=0;
WHILE I1
DO
IF REF(H,I1)HHV(H,I1+1)
THEN BEGIN FLAG1:=1;
S1:=I1;
I1:=BARSLAST(DISPSTATUS=1);
END
ELSE I1:=I1+1;
STICKLINE(FLAG1,REF(L,S1+1),HHV(H,S1+1),(S1+1)*20,0),COLORC0C0C0,ALIGN1,LAYER7;
DRAWTEXT(FLAG1,REF(L,S1+1),NUMTOSTRN(REF(L,S1+1),2)+'-'+NUMTOSTRN(HHV(H,S1+1),2)),ALIGN2,COLORGREEN;
{向上跳空缺口}
I:=0;
FLAG:=0;
WHILE I
DO
IF REF(L,I)>REF(H,I+1) AND REF(H,I+1)
THEN BEGIN FLAG:=1;
S:=I;
I:=BARSLAST(DISPSTATUS=1);
END{WWW.GPXIAZAI.COM}
ELSE I:=I+1;
STICKLINE(FLAG,REF(H,S+1),LLV(LOW,S+1),20*(S+1),500),COLORC0C0C0,ALIGN1,LAYER7;
DRAWTEXT(FLAG,REF(H,S+1),NUMTOSTRN(REF(H,S+1),2)+'-'+NUMTOSTRN(LLV(LOW,S+1),2)),ALIGN2,COLORRED;
==========================================
二、封板率
RD:=REQSE( 'MARKETTREND_MIN_FBL_SH000001','/MARKETTREND/INDEX/MIN?OBJ=SH000001&FIELD=SHIJIAN,ZUIXINJIADENGYUZHANGTINGJIASHU,ZUIGAOJIADENGYUZHANGTINGJIASHU&OUTPUT=PB&SUB=1',1002 );
股票数:=STKINDI('SH000001','涨跌家数.上涨家数#MIN1')+STKINDI('SH000001','涨跌家数.下跌家数#MIN1')+STKINDI('SH000001','涨跌家数.平盘家数#MIN1')+STKINDI('SZ399001','涨跌家数.上涨家数#MIN1')+STKINDI('SZ399001','涨跌家数.下跌家数#MIN1')+STKINDI('SZ399001','涨跌家数.平盘家数#MIN1');
封板家数:FINDSE( 'MARKETTREND_MIN_FBL_SH000001','ZUIXINJIADENGYUZHANGTINGJIASHU'),COLORRED,LINETHICK0;
触及涨停:FINDSE( 'MARKETTREND_MIN_FBL_SH000001','ZUIGAOJIADENGYUZHANGTINGJIASHU'),COLOR4169E1,LINETHICK0;
RD2:=REQSE( 'MARKETTREND_MIN_FBL_SZ399001','/MARKETTREND/INDEX/MIN?OBJ=SZ399001&FIELD=SHIJIAN,ZUIXINJIADENGYUZHANGTINGJIASHU,ZUIGAOJIADENGYUZHANGTINGJIASHU&OUTPUT=PB&SUB=1',1002 );
打开家数:触及涨停-封板家数,PRECIS0,COLORFF5252,LINETHICK0;
封板率:封板家数/触及涨停*100;
PARTLINE(封板率,封板率<50,RGB(0,255,0),封板率>=50 AND 封板率<60,RGB(255,255,255),封板率>60,RGB(255,0,0));
强弱系数:封板家数/股票数*10000,LINETHICK0;
70,DOTLINE,COLORRED;
60,DOTLINE,COLORWHITE;
50,DOTLINE,COLORGREEN; |
