最简便热点板块与热点龙头判断方法

一、热点板块判断方法一、通达信热门板块报表，选择区间热门板块，一般选5日，10日，30日，按涨幅排序，连续排在前10位的板块就是热门板块。

方法二、飞孤板块涨幅排序与板块监控板块监控公式原码:bk:='板块指数';stksum:=STKCOUNT(bk);dcount:=DATACOUNT;zf:='涨幅引用.ZF';variable:dmstr[stksum]='',var_px[stksum]=0,var_indi[stksum]=0,dispstr [6]='';{寻找领涨板块}for k=1 to stksum dobegindm:=stkfromblk(bk,k);dmstr[k]:=dm;temp1:=stkindi(dm,zf,0,-1);var_px[k]:=temp1[dcount];var_indi[k]:=temp1[dcount];end;Num1:=sortpos(var_indi,1,1,stksum);{写入显示字符串数组}for k=1 to 6 dobegindispstr[k]:=dispstr[k]+STKNAMEEX(dmstr[var_indi[k]])+':'+NUMTO STR(var_px[var_indi[k]],2)+' <';end;{寻找领涨板块中的领涨股}for i=1 to 6 dobeginbk0:=STKNAMEEX(dmstr[var_indi[i]]);stknum0:=stkcount(bk0);variable:dmstr0[stknum0]='',var_px0[stknum0]=0,var_indi0[stknum0] =0;for k=1 to stknum0 dobegindm:=stkfromblk(bk0,k);dmstr0[k]:=dm;temp1:=stkindi(dm,zf,0,-1);var_px0[k]:=temp1[dcount];var_indi0[k]:=temp1[dcount];end;numZF1:=sortpos(var_indi0,1,1,stknum0);{写入显示字符串}tt:=if(stknum0<5,stknum0,5);for k=1 to tt dobegindispstr[i]:=dispstr[i]+STKNAMEEX(dmstr0[var_indi0[k]])+':' +NUMTOSTR(var_px0[var_indi0[k]],2)+' ';end;dispstr[i]:=RTRIM(dispstr[i])+'>';end;{在屏幕上显示}DRAWTEXTEX(c,1,0,0,'【涨幅前六名】'),Color00FFFF;DRAWTEXTEX(c,1,0,150,'1:'+dispstr[1]),Color00FFFF;DRAWTEXTEX(c,1,0,300,'2:'+dispstr[2]),Color00FFFF;DRAWTEXTEX(c,1,0,450,'3:'+dispstr[3]),Color00FFFF;DRAWTEXTEX(c,1,0,600,'4:'+dispstr[4]),Color00FFFF;DRAWTEXTEX(c,1,0,750,'5:'+dispstr[5]),Color00FFFF;DRAWTEXTEX(c,1,0,900,'6:'+dispstr[6]),Color00FFFF;{寻找异动板块}bkyd:='A股板块'; stksumA:=stkcount(bkyd);zs:='涨幅引用.ZS'; variable:dmstrA[stksumA]='',var_pxA[stksumA]=0,var_indiA[stksumA]=0,d mstr[stksum]='',var_zfA[stksumA]=0;for k=1 to stksum do {存储板块名}begindm:=stkfromblk(bk,k);dmstr[k]:=dm;end;for k=1 to stksumA do {存储A股名}begindm:=stkfromblk(bkyd,k);dmstrA[k]:=dm;tmp0:=stkindi(dm,zf,0,-1);var_zfA[k]:=tmp0[dcount];tmp:=stkindi(dm,zs,0,-1);var_pxA[k]:=tmp[dcount];var_indiA[k]:=tmp[dcount];end;numyd:=sortpos(var_indiA,1,1,stksumA); {异动股排序}variable:{var_px_bk[stksum]=0,}var_px_indi_bk[stksum]=0;{初始化}for k=1 to stksum dobegin{var_px_bk[k]:=0;}var_indi_bk[k]:=0;end;{投盒}for i=1 to 60 dobeginfor k=1 to stksum dobeginvar_indi_bk[k]:=var_indi_bk[k]+stkinblock(dmstrA[var _indiA[i]],stknameex(dmstr[k]));{var_indi_bk[k]:=var_px_bk[k];}end;end;{对板块排序}numbkyd:=sortpos(var_indi_bk,1,1,stksum);{取前3名}variable:dispstryd[5]='';for k=1 to 3 dobegindispstryd[k]:=dispstryd[k]+STKNAMEEX(dmstr[var_indi_bk[k]])+': ';end;{找出板块异动个股，3个，及其涨幅}for i=1 to 3 dobeginbkydgg:=STKNAMEEX(dmstr[var_indi_bk[i]]);stknumgg:=stkcount(bk ydgg);variable:dmstrydgg[stknumgg]='',var_zs[stknumgg]=0,var_zf[stkn umgg]=0,var_indigg[stknumgg]=0;for k=1 to stknumgg dobegindm:=stkfromblk(bkydgg,k);dmstrydgg[k]:=dm;tmp1:=stkindi(dm,zf,0,-1);var_zf[k]:=tmp1[dcount];tmp2:=stkindi(dm,zs,0,-1);var_zs[k]:=tmp2[dcount];var_indigg[k]:=tmp2[dcount];end;numydgg:=sortpos(var_indigg,1,1,stknumgg);tt:=if(stknumgg<3,stknumgg,3);for k=1 to tt dobegindispstryd[i]:=dispstryd[i]+stknameex(dmstrydgg[var_indig g[k]])+''+numtostr(var_zf[var_indigg[k]],2)+'('+numtostr(var_zs[var_indigg[k] ],2)+') ';end;end;{显示异动板块}DRAWTEXTEX(c,1,550,0,'【异动板块前三名】'),COLORGREEN; DRAWTEXTEX(c,1,550,150,'1:'+dispstryd[1]),COLORGREEN; DRAWTEXTEX(c,1,550,300,'2:'+dispstryd[2]),COLORGREEN; DRAWTEXTEX(c,1,550,450,'3:'+dispstryd[3]),COLORGREEN;{显示涨幅异动个股}for k=1 to 4 dobegindispstryd[4]:=dispstryd[4]+stknameex(dmstrA[var_indiA[k]])+' '+numtostr(var_zfA[var_indiA[k]],2)+'('+numtostr(var_pxA[var_indiA[k] ],2)+') ';end;for k=5 to 8 dobegindispstryd[5]:=dispstryd[5]+stknameex(dmstrA[var_indiA[k]])+' '+numtostr(var_zfA[var_indiA[k]],2)+'('+numtostr(var_pxA[var_indiA[k] ],2)+') ';end;DRAWTEXTEX(c,1,550,600,'【异动个股前八名】'),COLORMAGENTA; DRAWTEXTEX(c,1,550,750,dispstryd[4]),COLORMAGENTA;DRAWTEXTEX(c,1,550,900,dispstryd[5]),COLORMAGENTA;涨幅引用ZF:DYNAINFO(14)*100;ZS:DYNAINFO(24)*100;二、热点龙头判断方法一、大盘对比排序指标进行排序，四个指标出现在前20日名中最多的就是热点龙头个股MSD:=(C-LLV(LOW,N))/(HHV(H,N)-LLV(LOW,N))*100;大盘MSD:=(INDEXC-LLV(INDEXL,N))/(HHV(INDEXH,N)-LLV(INDEXL,N))*100; 相对强度:MA(个股MSD-大盘MSD,13);DPZD:=(INDEXC-REF(INDEXC,1))/REF(INDEXC,1)*100;GGZD:=(C-REF(C,1))/REF(C,1)*100;QRD:=GGZD-DPZD;强弱度:MA(QRD,13);A:= (C-REF(C,1))/REF(C,1)*100;B:=("SH000001$CLOSE"-REF("SH000001$CLOSE",1))/REF("SH000001$CLOSE",1)*100;AB:=A-B;强弱度2:MA(AB,13);AC:="SH000001$CLOSE";QM:=C/AC*10000;DPQD:=EMA(QM,60);青木:QM-DPQD,COLORLIMAGENTA;方法二、飞孤板块分析对应热点分析中对应热点板块中龙头就是。