收集:中国股票市场经济分析网
公式已重新更新，无加密。
{a1、10 1 400 a2、20 1 400 a3、50 1 400}
现价:=c;
Var2:=REF(ASKPRICE(1),1);
Var3:=REF(BIDPRICE(1),1);
var5:=buyvol;
var6:=sellvol;
x1:=a1*10000;
x2:=a2*10000;
x3:=a3*10000;
tdb:=IF(AMOUNT>=x3,Var5,0);
特大买量:=sum(tdb,0);
tds:=IF(AMOUNT>=x3,Var6,0);
特大卖量:=sum(tds,0);
db:=IF(AMOUNT>=x1 and amount<x2,Var5,0);
ds:=IF(AMOUNT>=x1 and amount<x2,Var6,0);
中买量:=SUM(db,0);
中卖量:=SUM(ds,0);
db1:=IF(AMOUNT>=x2 and amount<x3,Var5,0);
ds1:=IF(AMOUNT>=x2 and amount<x3,Var6,0);
大买量:=SUM(db1,0);
大卖量:=SUM(ds1,0);
小买量:=SUM(IF(AMOUNT<x1,Var5,0),0);
小卖量:=SUM(IF(AMOUNT<x1,Var6,0),0);
小量差:=小买量-小卖量;
中量差:中买量-中卖量,linethick0;
大量差:大买量-大卖量,linethick0;
特大量差:特大买量-特大卖量,linethick0;
主力量差:大量差+特大量差,linethick0;
FILLRGN(主力量差,0,主力量差>0,rgb(120,60,30),主力量差<0,rgb(100,100,100));
中上差:中量差+主力量差,coloryellow;
小差:小量差,colorgray;
小量差,linethick0,colorgreen;
大量差,linethick0,colorwhite;
特大量差,linethick0,coloryellow;
主力差额:主力量差*c/100,PRECIS0,linethick0;
主力增仓:主力量差/capital*100,linethick0;
总量:=sum(vol,0);
sb1:=小买量/总量*100;
ss1:=小卖量/总量*100;
sb:=中买量/总量*100;
ss:=中卖量/总量*100;
bb:=大买量/总量*100;
bs:=大卖量/总量*100;
lb:=特大买量/总量*100;
ls:=特大卖量/总量*100;
DRAWTEXTABS(10 ,10 ,主力量差 : +主力量差),COLORMAGENTA,linethick3;
DRAWTEXTABS(10 ,30 ,主力增仓 : +主力增仓+%),COLORMAGENTA,linethick3;
DRAWTEXTABS(10 ,120 ,小买% +sb1),colorred;
DRAWTEXTABS(10 ,135 ,小卖% +ss1),colorgreen;
DRAWTEXTABS(90 ,120 ,中买% +sb),colorred;
DRAWTEXTABS(90 ,135 ,中卖% +ss),colorgreen;
DRAWTEXTABS(170 ,120 ,大买% +bb),colorred;
DRAWTEXTABS(170 ,135 ,大卖% +bs),colorgreen;
DRAWTEXTABS(250 ,120 ,特买% +lb),colorred;
DRAWTEXTABS(250 ,135 ,特卖% +ls),colorgreen;
DRAWRECTABS(40 ,118-sb1 , 52 ,118 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(58 ,118-ss1, 70 ,118 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(120 ,118-sb , 132 ,118 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(138 ,118-ss, 150 ,118 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(190 ,118-bb , 202 ,118 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(208 ,118-bs , 220 ,118 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(270 ,118-lb , 282 ,118 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(288 ,118-ls , 300 ,118 ,RGB(0,255,0)),colorblack;
{-------------看各价位上的成交累计------------}
DRAWTEXTABS(250+100 ,122 ,-10-9-8-7-6-5-4-3-2-1 0+1+2+3+4+5+6+7+8+9+10),COLORwhite,linethick1;
昨收:=DYNAINFO(3);
涨幅:=(c/昨收-1)*100;
n9:=sum(if(涨幅<=-9,vol,0),0)/总量;
n8:=sum(if(涨幅<=-8 and 涨幅>-9,vol,0),0)/总量;
n7:=sum(if(涨幅<=-7 and 涨幅>-8,vol,0),0)/总量;
n6:=sum(if(涨幅<=-6 and 涨幅>-7,vol,0),0)/总量;
n5:=sum(if(涨幅<=-5 and 涨幅>-6,vol,0),0)/总量;
n4:=sum(if(涨幅<=-4 and 涨幅>-5,vol,0),0)/总量;
n3:=sum(if(涨幅<=-3 and 涨幅>-4,vol,0),0)/总量;
n2:=sum(if(涨幅<=-2 and 涨幅>-3,vol,0),0)/总量;
n1:=sum(if(涨幅<=-1 and 涨幅>-2,vol,0),0)/总量;
b0:=sum(if(涨幅<=0 and 涨幅>-1,vol,0),0)/总量;
p1:=sum(if(涨幅<=1 and 涨幅>0,vol,0),0)/总量;
p2:=sum(if(涨幅<=2 and 涨幅>1,vol,0),0)/总量;
p3:=sum(if(涨幅<=3 and 涨幅>2,vol,0),0)/总量;
p4:=sum(if(涨幅<=4 and 涨幅>3,vol,0),0)/总量;
p5:=sum(if(涨幅<=5 and 涨幅>4,vol,0),0)/总量;
p6:=sum(if(涨幅<=6 and 涨幅>5,vol,0),0)/总量;
p7:=sum(if(涨幅<=7 and 涨幅>6,vol,0),0)/总量;
p8:=sum(if(涨幅<=8 and 涨幅>7,vol,0),0)/总量;
p9:=sum(if(涨幅<=9 and 涨幅>8,vol,0),0)/总量;
p10:=sum(if(涨幅>9,vol,0),0)/总量;
DRAWRECTABS(265+100 ,120-n9*250, 275+100 ,120 ,RGB(0,0,255)),colorblack;
DRAWRECTABS(277+100 ,120-n8*250, 287+100 ,120 ,RGB(0,0,255)),colorblack;
DRAWRECTABS(290+100 ,120-n7*250, 300+100 ,120 ,RGB(0,0,255)),colorblack;
DRAWRECTABS(302+100 ,120-n6*250, 312+100 ,120 ,RGB(0,0,255)),colorblack;
DRAWRECTABS(315+100 ,120-n5*250, 325+100 ,120 ,RGB(0,0,255)),colorblack;
DRAWRECTABS(327+100 ,120-n4*250, 337+100 ,120 ,RGB(0,0,255)),colorblack;
DRAWRECTABS(340+100 ,120-n3*250, 350+100 ,120 ,RGB(0,0,255)),colorblack;
DRAWRECTABS(352+100 ,120-n2*250, 362+100 ,120 ,RGB(0,0,255)),colorblack;
DRAWRECTABS(365+100 ,120-n1*250, 375+100 ,120 ,RGB(0,0,255)),colorblack;
DRAWRECTABS(377+100 ,120-b0*250, 387+100 ,120 ,RGB(0,0,255)),colorblack;
DRAWRECTABS(390+100 ,120-p1*250, 400+100 ,120 ,RGB(180,120,60)),colorblack;
DRAWRECTABS(402+100 ,120-p2*250, 412+100 ,120 ,RGB(180,120,60)),colorblack;
DRAWRECTABS(415+100 ,120-p3*250, 425+100 ,120 ,RGB(180,120,60)),colorblack;
DRAWRECTABS(427+100 ,120-p4*250, 437+100 ,120 ,RGB(180,120,60)),colorblack;
DRAWRECTABS(440+100 ,120-p5*250, 450+100 ,120 ,RGB(180,120,60)),colorblack;
DRAWRECTABS(452+100 ,120-p6*250, 462+100 ,120 ,RGB(180,120,60)),colorblack;
DRAWRECTABS(465+100 ,120-p7*250, 475+100 ,120 ,RGB(180,120,60)),colorblack;
DRAWRECTABS(477+100 ,120-p8*250, 487+100 ,120 ,RGB(180,120,60)),colorblack;
DRAWRECTABS(490+100 ,120-p9*250, 500+100 ,120 ,RGB(180,120,60)),colorblack;
DRAWRECTABS(502+100 ,120-p10*250, 512+100 ,120 ,RGB(180,120,60)),colorblack;
{主力大单分布}
zn9b:=sum(if(涨幅<=-9 and (tdb>0 or db1>0),tdb+db1,0),0)/总量;
zn9s:=sum(if(涨幅<=-9 and (tds>0 or ds1>0),tds+ds1,0),0)/总量;
zn8b:=sum(if(涨幅<=-8 and 涨幅>-9 and (tdb>0 or db1>0),tdb+db1,0),0)/总量;
zn8s:=sum(if(涨幅<=-8 and 涨幅>-9 and (tds>0 or ds1>0),tds+ds1,0),0)/总量;
zn7b:=sum(if(涨幅<=-7 and 涨幅>-8 and (tdb>0 or db1>0),tdb+db1,0),0)/总量;
zn7s:=sum(if(涨幅<=-7 and 涨幅>-8 and (tds>0 or ds1>0),tds+ds1,0),0)/总量;
zn6b:=sum(if(涨幅<=-6 and 涨幅>-7 and (tdb>0 or db1>0),tdb+db1,0),0)/总量;
zn6s:=sum(if(涨幅<=-6 and 涨幅>-7 and (tds>0 or ds1>0),tds+ds1,0),0)/总量;
zn5b:=sum(if(涨幅<=-5 and 涨幅>-6 and (tdb>0 or db1>0),tdb+db1,0),0)/总量;
zn5s:=sum(if(涨幅<=-5 and 涨幅>-6 and (tds>0 or ds1>0),tds+ds1,0),0)/总量;
zn4b:=sum(if(涨幅<=-4 and 涨幅>-5 and (tdb>0 or db1>0),tdb+db1,0),0)/总量;
zn4s:=sum(if(涨幅<=-4 and 涨幅>-5 and (tds>0 or ds1>0),tds+ds1,0),0)/总量;
zn3b:=sum(if(涨幅<=-3 and 涨幅>-4 and (tdb>0 or db1>0),tdb+db1,0),0)/总量;
zn3s:=sum(if(涨幅<=-3 and 涨幅>-4 and (tds>0 or ds1>0),tds+ds1,0),0)/总量;
zn2b:=sum(if(涨幅<=-2 and 涨幅>-3 and (tdb>0 or db1>0),tdb+db1,0),0)/总量;
zn2s:=sum(if(涨幅<=-2 and 涨幅>-3 and (tds>0 or ds1>0),tds+ds1,0),0)/总量;
zn1b:=sum(if(涨幅<=-1 and 涨幅>-2 and (tdb>0 or db1>0),tdb+db1,0),0)/总量;
zn1s:=sum(if(涨幅<=-1 and 涨幅>-2 and (tds>0 or ds1>0),tds+ds1,0),0)/总量;
zn0b:=sum(if(涨幅<=0 and 涨幅>-1 and (tdb>0 or db1>0),tdb+db1,0),0)/总量;
zn0s:=sum(if(涨幅<=0 and 涨幅>-1 and (tds>0 or ds1>0),tds+ds1,0),0)/总量;
zp1b:=sum(if(涨幅<=1 and 涨幅>0 and (tdb>0 or db1>0),tdb+db1,0),0)/总量;
zp1s:=sum(if(涨幅<=1 and 涨幅>0 and (tds>0 or ds1>0),tds+ds1,0),0)/总量;
zp2b:=sum(if(涨幅<=2 and 涨幅>1 and (tdb>0 or db1>0),tdb+db1,0),0)/总量;
zp2s:=sum(if(涨幅<=2 and 涨幅>1 and (tds>0 or ds1>0),tds+ds1,0),0)/总量;
zp3b:=sum(if(涨幅<=3 and 涨幅>2 and (tdb>0 or db1>0),tdb+db1,0),0)/总量;
zp3s:=sum(if(涨幅<=3 and 涨幅>2 and (tds>0 or ds1>0),tds+ds1,0),0)/总量;
zp4b:=sum(if(涨幅<=4 and 涨幅>3 and (tdb>0 or db1>0),tdb+db1,0),0)/总量;
zp4s:=sum(if(涨幅<=4 and 涨幅>3 and (tds>0 or ds1>0),tds+ds1,0),0)/总量;
zp5b:=sum(if(涨幅<=5 and 涨幅>4 and (tdb>0 or db1>0),tdb+db1,0),0)/总量;
zp5s:=sum(if(涨幅<=5 and 涨幅>4 and (tds>0 or ds1>0),tds+ds1,0),0)/总量;
zp6b:=sum(if(涨幅<=6 and 涨幅>5 and (tdb>0 or db1>0),tdb+db1,0),0)/总量;
zp6s:=sum(if(涨幅<=6 and 涨幅>5 and (tds>0 or ds1>0),tds+ds1,0),0)/总量;
zp7b:=sum(if(涨幅<=7 and 涨幅>6 and (tdb>0 or db1>0),tdb+db1,0),0)/总量;
zp7s:=sum(if(涨幅<=7 and 涨幅>6 and (tds>0 or ds1>0),tds+ds1,0),0)/总量;
zp8b:=sum(if(涨幅<=8 and 涨幅>7 and (tdb>0 or db1>0),tdb+db1,0),0)/总量;
zp8s:=sum(if(涨幅<=8 and 涨幅>7 and (tds>0 or ds1>0),tds+ds1,0),0)/总量;
zp9b:=sum(if(涨幅<=9 and 涨幅>8 and (tdb>0 or db1>0),tdb+db1,0),0)/总量;
zp9s:=sum(if(涨幅<=9 and 涨幅>8 and (tds>0 or ds1>0),tds+ds1,0),0)/总量;
zp10b:=sum(if(涨幅>9 and (tdb>0 or db1>0),tdb+db1,0),0)/总量;
zp10s:=sum(if(涨幅>9 and (tds>0 or ds1>0),tds+ds1,0),0)/总量;
DRAWRECTABS(265+100 ,120-zn9b*250, 275+100 ,120 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(265+100 ,134+zn9s*250, 275+100 ,134 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(277+100 ,120-zn8b*250, 287+100 ,120 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(277+100 ,134+zn8s*250, 287+100 ,134 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(290+100 ,120-zn7b*250, 300+100 ,120 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(290+100 ,134+zn7s*250, 300+100 ,134 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(302+100 ,120-zn6b*250, 312+100 ,120 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(302+100 ,134+zn6s*250, 312+100 ,134 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(315+100 ,120-zn5b*250, 325+100 ,120 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(315+100 ,134+zn5s*250, 325+100 ,134 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(327+100 ,120-zn4b*250, 337+100 ,120 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(327+100 ,134+zn4s*250, 337+100 ,134 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(340+100 ,120-zn3b*250, 350+100 ,120 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(340+100 ,134+zn3s*250, 350+100 ,134 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(352+100 ,120-zn2b*250, 362+100 ,120 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(352+100 ,134+zn2s*250, 362+100 ,134 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(365+100 ,120-zn1b*250, 375+100 ,120 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(365+100 ,134+zn1s*250, 375+100 ,134 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(377+100 ,120-zn0b*250, 387+100 ,120 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(377+100 ,134+zn0s*250, 387+100 ,134 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(390+100 ,120-zp1b*250, 400+100 ,120 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(402+100 ,120-zp2b*250, 412+100 ,120 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(415+100 ,120-zp3b*250, 425+100 ,120 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(427+100 ,120-zp4b*250, 437+100 ,120 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(440+100 ,120-zp5b*250, 450+100 ,120 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(452+100 ,120-zp6b*250, 462+100 ,120 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(465+100 ,120-zp7b*250, 475+100 ,120 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(477+100 ,120-zp8b*250, 487+100 ,120 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(490+100 ,120-zp9b*250, 500+100 ,120 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(502+100 ,120-zp10b*250, 512+100 ,120 ,RGB(255,0,0)),colorblack;
DRAWRECTABS(390+100 ,134+zp1s*250, 400+100 ,134 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(402+100 ,134+zp2s*250, 412+100 ,134 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(415+100 ,134+zp3s*250, 425+100 ,134 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(427+100 ,134+zp4s*250, 437+100 ,134 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(440+100 ,134+zp5s*250, 450+100 ,134 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(452+100 ,134+zp6s*250, 462+100 ,134 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(465+100 ,134+zp7s*250, 475+100 ,134 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(477+100 ,134+zp8s*250, 487+100 ,134 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(490+100 ,134+zp9s*250, 500+100 ,134 ,RGB(0,255,0)),colorblack;
DRAWRECTABS(502+100 ,134+zp10s*250, 512+100 ,134 ,RGB(0,255,0)),colorblack;