涨幅统计

涨幅统计，仿刘大均老师的作品，极不完善。敬请修改

{表格反应的是如股票涨幅的分段统计,如涨幅32表示统计正涨幅2~3之间的次数及占比.顶乖23B表示统计负跌幅-2~-3之间的次数及占比.}
ZF:=(C-REF(C,1))/REF(C,1)*100;
顶乖:=ZF;

涨幅:ZF,COLORyellow,LINETHICK0;

{乖分段统计}
涨幅90:=count(顶乖  >9,0),linethick1;
涨幅89:=count(顶乖  >8 AND 顶乖 <=9,0),linethick1;
顶乖6   :=count(顶乖  >7 AND 顶乖 <=8 ,0),linethick1;
顶乖65 :=count(顶乖  >6 AND 顶乖 <=7 ,0),linethick1;
顶乖54  :=count(顶乖  >5 AND 顶乖 <=6 ,0),linethick1;
顶乖43 :=count(顶乖  >4 AND 顶乖 <=5 ,0),linethick1;
顶乖32 :=count(顶乖  >3 AND 顶乖 <=4 ,0),linethick1;
顶乖21 :=count(顶乖  >2 AND 顶乖 <=3 ,0),linethick1;
顶乖10 :=count(顶乖  >0 AND 顶乖 <=2 ,0),linethick1;

顶乖01B:=count(顶乖 >-2 AND 顶乖 <=0 ,0),linethick1;
顶乖12B:=count(顶乖 >-3 AND 顶乖<=-2 ,0),linethick1;
顶乖23B:=count(顶乖 >-4 AND 顶乖<=-3 ,0),linethick1;
顶乖34B:=count(顶乖 >-5 AND 顶乖<=-4 ,0),linethick1;
顶乖45B:=count(顶乖 >-6 AND 顶乖<=-5 ,0),linethick1;
顶乖56B:=count(顶乖 >-7 AND 顶乖<=-6 ,0),linethick1;
顶乖6B:=count(顶乖<=-7  AND 顶乖 <=-8 ,0),linethick1;

Z:=count(顶乖<=6 AND 顶乖>=-6,0);//统计6-6乖区间在下轨上升时的次数
B:=Z+顶乖6+顶乖6B+涨幅89+涨幅90 ;
{各区间乖占比}

CC:=B/B;
占比8:=涨幅90/B;
占比7:=涨幅89/B;
占比6:=顶乖6/B;
占比65:=顶乖65/B;
占比54:=顶乖54/B;
占比43:=顶乖43/B;
占比32:=顶乖32/B;
占比21:=顶乖21/B;
占比10:=顶乖10/B;
占比01B:=顶乖01B/B;
占比12B:=顶乖12B/B;
占比23B:=顶乖23B/B;
占比34B:=顶乖34B/B;
占比45B:=顶乖45B/B;
占比56B:=顶乖56B/B;
占比6B:=顶乖6B/B;
EXPLAINEX(C,'涨幅89:',涨幅89,2,0),color3399FF;
EXPLAINEX(C,'占比89:',占比7,4,0),color3399FF;
EXPLAINEX(C,'涨幅90:',涨幅90,2,0),color3399FF;
EXPLAINEX(C,'占比90:',占比8,2,0),color3399FF;
{图表部份}
p:=SYSPARAM(1);
DRAWTEXT(c>0 and BARSTATUS=2,-10,''),ColorFFFF00,ALIGN2; {表框下限}{50行}
DRAWTEXT(c>0 and BARSTATUS=2, 60,'┏━━━┱───┬───┬───┬───┬───┬───┬───┬───┲┱───┬───┬───┬───┬───┬───┬───┐')        ,Color00AAAA,LINETHICK1,ALIGN2,SHIFT3;
DRAWTEXT(c>0 and BARSTATUS=2, 50,'┃      ┃      │      │      │      │      │      │      │      ┃┃      │      │      │      │      │      │      │'),Color00AAAA,ALIGN2,SHIFT3;
DRAWTEXT(c>0 and BARSTATUS=2, 40,'┠───╂───┼───┼───┼───┼───┼───┼───┼───╂╂───┼───┼───┼───┼───┼───┼───┤')        ,Color00AAAA,ALIGN2,SHIFT3;
DRAWTEXT(c>0 and BARSTATUS=2, 30,'┃      ┃      │      │      │      │      │      │      │      ┃┃      │      │      │      │      │      │      │'),Color00AAAA,ALIGN2,SHIFT3;
DRAWTEXT(c>0 and BARSTATUS=2, 20,'┠───╂───┼───┼───┼───┼───┼───┼───┼───╂╂───┼───┼───┼───┼───┼───┼───┤')        ,Color00AAAA,ALIGN2,SHIFT3;
DRAWTEXT(c>0 and BARSTATUS=2, 10,'┃      ┃      │      │      │      │      │      │      │      ┃┃      │      │      │      │      │      │      │'),Color00AAAA,ALIGN2,SHIFT3;
DRAWTEXT(c>0 and BARSTATUS=2,  0,'┗━━━┹───┴───┴───┴───┴───┴───┴───┴───┺┹───┴───┴───┴───┴───┴───┴───┘')        ,Color00AAAA,ALIGN2,SHIFT3;
{}
DRAWTEXT(c>0 and BARSTATUS=2,50,'    分段    10-10    涨幅78  涨幅67  涨幅56  涨幅45                                                   涨幅45B 涨幅56B 涨幅67B 涨幅78B  '),ColorDEDEDE,ALIGN2,SHIFT3;
DRAWTEXT(c>0 and BARSTATUS=2,30,'  次数     　　 　  　　　　　                                    　                　　 　　　　　　　                            '),ColorDEDEDE,ALIGN2,SHIFT3;
DRAWTEXT(c>0 and BARSTATUS=2,10,'  占比          　　 　　　　　　　                                   　                                                           '),ColorDEDEDE,ALIGN2,SHIFT3;
{}
DRAWTEXT(c>0 and BARSTATUS=2,50,'                                                        涨幅23  涨幅02    涨幅02B 涨幅23B                                         '),Color00AAFF,ALIGN2,SHIFT3;
DRAWTEXT(c>0 and BARSTATUS=2,50,'                                    &n