DRAWGBK(C>0,COLORRGB,(100,120,180),0,1);<br>流通:FINANCE(7)/10000,LINETHICK0,PRECISION2;<br>a:=STKINDI('','引用.特大买入',0,0);<br>a1:=STKINDI('','引用.特大卖出',0,0);<br>b:=stkindi('','引用.隐性买单',0,0);<br>b1:=stkindi('','引用.隐性卖单',0,0);<br>d:=STKINDI('','引用.大单买入',0,0);<br>d1:=STKINDI('','引用.大单卖出',0,0);<br>e:=stkindi('','引用.中单买入',0,0);<br>e1:=stkindi('','引用.中单卖出',0,0);<br>f:=STKINDI('','引用.小单买入',0,0);<br>f1:=STKINDI('','引用.小单卖出',0,0);<br><br>AA:=a-a1;<br>BB:=b-b1;<br>DD:=d-d1;<br>EE:=E-E1;<br>FF:=F-F1;<br>{仓量}<br>机增:=EXTDATA(9);<br>机11:=SUM(机增,0);<br>机13:=SUM(IF(机增>=0,机增,0),0);<br>机14:=SUM(IF(机增<0,机增,0),0);<br>机15:=ABS(机14);<br>法增:=EXTDATA(10);<br>法11:=SUM(法增,0);<br>法13:=SUM(IF(法增>=0,法增,0),0);<br>法14:=SUM(IF(法增<0,法增,0),0);<br>法15:=ABS(法14);<br>大增:=EXTDATA(11);<br>大11:=SUM(大增,0);<br>大13:=SUM(IF(大增>=0,大增,0),0);<br>大14:=SUM(IF(大增<0,大增,0),0);<br>大15:=ABS(大14);<br>中增:=EXTDATA(12);<br>中11:=SUM(中增,0);<br>中13:=ABS(中11);<br>散增:=EXTDATA(13);<br>散11:=SUM(散增,0);<br>散13:=ABS(散11);<br><br>P3:=(机13+法13+大13)*100/10000;<br>P4:=(机15+法15+大15)*100/10000;<br>P6:=P3-P4;<br>Var1:=LLV(LOW,5)=LLV(LOW,26) AND CLOSE>=OPEN*1.08;<br>Var2:=CLOSE>(REF(HIGH,1)+REF(LOW,1))/4;<br>买:=Var1 AND Var2;<br>Var3:=REF(CLOSE,1);<br>Var4:=SMA(MAX(CLOSE-Var3,0),6,1)/SMA(ABS(CLOSE-Var3),6,1)*100;<br>卖:=CROSS(93,Var4);<br>主买:=(EXTDATA(9)+EXTDATA(10)+EXTDATA(11)/2);<br>主卖:=EXTDATA(12)+EXTDATA(13)+EXTDATA(11)/2;<br>周增:=MA(主买,5);<br>周减:=MA(主卖,5);<br>STICKLINE(周增>周减,0,周增*10,8,0),Color0000ff;<br>STICKLINE(周增<周减,0,周减*10,8,0),ColorFF0000;<br>STICKLINE(周增>周减,周增,周增*10,3,1),Color00efFF;<br>STICKLINE(周增<周减,周减,周减*10,3,1),ColorFFFFFF;<br>DRAWTEXT(FILTER(买 and 买>0,9),周增*1.08,'买\n进'),COLOR000cFF;<br>DRAWTEXT(FILTER(卖 and 卖>0,9),周减*0.98,'卖\n出'),Color00FF00;<br>市值贡献:=CAPITAL/100*CLOSE/10000;<br>指数贡献:=(c-ref(ma(c,5),5))*finance(1)/10000;<br>资金贡献:=ema(amount,3)/finance(7)/10000;<br>股数:=STKINDI('','引用.股数',0,0);<br>资金:=STKINDI('','引用.资金',0,0);<br>每股公积金:=FINANCE(18);<br>净利润:=FINANCE(30);<br>主营业务增长率:=FINANCE(53);<br>净利润增长率:=FINANCE(55);<br>{成本}<br>PT:=(REF(HIGH,1) - REF(LOW,1));<br>CDP:=(((HIGH + LOW) + CLOSE) / 3);<br>AH:=(CDP + PT);<br>AL:=(CDP - PT);<br>NH:=((2 * CDP) - LOW);<br>NL:=((2 * CDP) - HIGH);<br>卖出价:=(((CLOSE * 2.5) / 100) + CLOSE);<br>买入价:=(CLOSE - ((CLOSE * 2.5) / 100));<br>{柱线}<br>KS:=DATACOUNT;<br>P2:=(AA+BB+DD);<br>P5:=DYNAINFO(8);<br>STICKLINE(BARPOS=KS-93,0,(散11[KS]),60,0),align5,Colorffff00;<br>STICKLINE(BARPOS=KS-93,0,(散11[KS]),10,0),align5,Color00ffff;<br>STICKLINE(BARPOS=KS-101,0,(中11[KS]),60,0),align5,Colorff00ff;<br>STICKLINE(BARPOS=KS-101,0,(中11[KS]),10,0),align5,Colorffffff;<br>STICKLINE(BARPOS=KS-109,0,(大11[KS]),60,0),align5,Color00FFff;<br>STICKLINE(BARPOS=KS-109,0,(大11[KS]),10,0),align5,Colorffff00;<br>STICKLINE(BARPOS=KS-117,0,(法11[KS]),60,0),align5,Colorff0000;<br>STICKLINE(BARPOS=KS-117,0,(法11[KS]),10,0),align5,Colorffffff;<br>STICKLINE(BARPOS=KS-125,0,(机11[KS]),60,0),align5,Color0000ff;<br>STICKLINE(BARPOS=KS-125,0,(机11[KS]),10,0),align5,Color00ffff;<br>{柱显示}<br>DRAWTEXT(BARPOS=DATACOUNT-128,0,'机构'),align5,PXUP8,ColorFFBFFF;<br>DRAWTEXT(BARPOS=DATACOUNT-129,0,''+NUMTOSTR(IF(机11>0,机11/FINANCE( 7),机11/FINANCE( 7)*-1),2)),align5,PXUP68,ColorFFffff;<br>DRAWTEXT(BARPOS=DATACOUNT-120,0,'券基'),align5,PXUP8,ColorFFBFFF;<br>DRAWTEXT(BARPOS=DATACOUNT-120,0,''+NUMTOSTR(IF(法11>0,法11/FINANCE( 7),法11/FINANCE( 7)*-1),2)),align5,PXUP68,ColorffffFF;<br>DRAWTEXT(BARPOS=DATACOUNT-112,0,'大户'),align5,PXUP8,ColorFFBFFF;<br>DRAWTEXT(BARPOS=DATACOUNT-112,0,''+NUMTOSTR(IF(大11>0,大11/FINANCE( 7),大11/FINANCE( 7)*-1),2)),align5,PXUP68,ColorffffFF;<br>DRAWTEXT(BARPOS=DATACOUNT-104,0,'中户'),align5,PXUP8,ColorFFBFFF;<br>DRAWTEXT(BARPOS=DATACOUNT-105,0,''+NUMTOSTR(IF(中11>0,中11/FINANCE( 7),中11/FINANCE( 7)*-1),2)),align5,PXUP68,ColorffffFF;<br>DRAWTEXT(BARPOS=DATACOUNT-97,0,'散户'),align5,PXUP8,ColorFFBFFF;<br>DRAWTEXT(BARPOS=DATACOUNT-97,0,''+NUMTOSTR(IF(散11>0,散11/FINANCE( 7),散11/FINANCE( 7)*-1),2)),align5,PXUP68,ColorffffFF;<br>DRAWTEXTEX(C,1,450,0,'盘口成交:'+NUMTOSTR(股数,0)+' 股'),ColorFFBF00;<br>DRAWTEXTEX(C,1,650,0,'该笔金额:'+NUMTOSTR(FLOOR(资金)/10000,2)+' 万元'),ColorFFBF00;<br>DRAWTEXTEX(c,1,860,0,'均价:'+NUMTOSTR(c,2)+' 元'),ColorFFBF00;<br>DRAWTEXTEX(C,1,0,0,STKLABEL+' '+STKNAME+''),ColorFFBF00;<br>DRAWTEXTEX(C,1,770,960,'市值贡献:'+NUMTOSTR(市值贡献,2)+' %'),ColorFFBFFF;<br>DRAWTEXTEX(C,1,330,960,'指数贡献:'+NUMTOSTR(指数贡献,2)+' %'),ColorFFBFFF;<br>DRAWTEXTEX(C,1,550,960,'资金贡献:'+NUMTOSTR(资金贡献,2)+' %'),ColorFFBFFF;<br>{显示时间}<br>variable:wday[7]='星期六';<br>wday[1]:='星期日';<br>wday[2]:='星期一';<br>wday[3]:='星期二';<br>wday[4]:='星期三';<br>wday[5]:='星期四';<br>wday[6]:='星期五';<br>fy:=年份;<br>fm:=月份;<br>fd:=日期;<br>wd:=星期;<br>p:=系统参数(1);<br>str1:=''+numtostr(fy[p],0)+'年'+numtostr(fm[p],0)+'月'+数字转化为字符串(fd[p],0)+'日 '+wday[wd[p]+1];<br>DRAWTEXTEX(c,1,200,0,str1),ColorFFBF00;<br>DRAWTEXTEX(c,1,10,120,'今日主力净买: '+NUMTOSTR(P2*100/10000,2)+' 万股'),ColorFFBFFF;<br>进出量1:=机13*100/10000;<br>进出量2:=法13*100/10000;<br>进出量3:=大13*100/10000;<br>进出量4:=中13*100/10000;<br>进出量5:=散13*100/10000;<br>p1:=sysparam(1);<br>CLN1:='机构仓位【万股】='+NUMTOSTR(进出量1[p1],2)+ ' \n券商仓位【万股】='+NUMTOSTR(进出量2[p1],2)+' \n大户仓位【万股】='+NUMTOSTR(进出量3[p1],2)+' \n中户仓量【万股】='+NUMTOSTR(进出量4[p1],2)+' \n散户仓量【万股】='+NUMTOSTR(进出量5[p1],2);<br>CLN2:='大户以上仓量累积【万股】='+NUMTOSTR(P3[p1],2)+' \n'+'大户以上增减累积【万股】='+NUMTOSTR(P6[p1],2),Color00deFF;<br>CLN3:='机构净买【手】='+NUMTOSTR(AA,0)+ ' \n券商净买【手】='+NUMTOSTR(BB,0)+' \n大户净买【手】='+NUMTOSTR(DD,0)+' \n中户净买【手】='+NUMTOSTR(EE,0)+' \n散户净买【手】='+NUMTOSTR(FF,0);<br>机构线:MA((机增+法增+大增/2),13)*10,color00FFff,LINETHICK2;<br>散户线:MA((中增+散增+大增/2),13)*10,colorff0000,LINETHICK2;<br>DRAWTEXT(FILTER(CROSS(机构线,散户线),21),机构线*1.06,'加\n仓'),COLOR00ffFF;<br>{解盘}<br>EXPLAIN(1,'==================================='),Color326C2C;<br>EXPLAIN(C>0,'【一发千钧】告诫朋友:\n指标是参考,决策在人脑。\n庄散博弈中,资金最可靠。\n牢牢驾驭它,切莫当稻草!'),Color006CFF;<br>EXPLAIN(1,'==================================='),Color326C2C;<br>EXPLAIN(C>0,'持仓信息:\n'+CLN1),ColorFFFFFF;<br>EXPLAIN(C>0,'本日交易:\n'+CLN3),Color00FFaF;<br>EXPLAIN(1,'==================================='),Color326C2C;<br>EXPLAIN(C>0,'主力仓位变化:\n'+CLN2),Color0FF6FF;<br>EXPLAIN(1,'==================================='),Color326C2C;<br>a:=F10FIND('【十大流通股东】:',1);<br>a1:=F10FIND(' 1│',a);<br>a2:=F10FIND(' 2│',a1);<br>a3:=F10FIND(' 3│',a2);<br>a4:=F10FIND(' 4│',a3);<br>a5:=F10FIND(' 5│',a4);<br>a6:=F10FIND(' 6│',a5);<br>a7:=F10FIND(' 7│',a6);<br>a8:=F10FIND(' 8│',a7);<br>a9:=F10FIND(' 9│',a8);<br>a10:=F10FIND('10│',a9);<br>EXPLAIN(C>0,'静态股东信息\n\n'+F10TEXT(a1,0)<br>+'\n'+F10TEXT(a2,0)<br>+'\n'+F10TEXT(a3,0)<br>+'\n'+F10TEXT(a4,0)<br>+'\n'+F10TEXT(a5,0)<br>+'\n'+F10TEXT(a6,0)<br>+'\n'+F10TEXT(a7,0)<br>+'\n'+F10TEXT(a8,0)<br>+'\n'+F10TEXT(a9,0)<br>+'\n'+F10TEXT(a10,0)<br>+'\n'+F10TEXT(a1,0)),colorFFFF00;<br>EXPLAIN(1,'==================================='),Color326C2C;<br>EXPLAINEX(1,'【波动系数】=',PT,2,0),colorFFFF;<br>EXPLAINEX(1,'【最高】=',AH,2,0),colorFF;<br>EXPLAINEX(1,'【中价】=',CDP,2,0),colorFFFF;<br>EXPLAINEX(1,'【最低】=',AL,2,0),colorFFFFFF;<br>EXPLAINEX(1,'【近高】=',NH,2,0),colorFFFF00;<br>EXPLAINEX(1,'【近低】=',NL,2,0),colorFF00FF;<br>EXPLAINEX((1 = 1),'【买入价】=',买入价,2,0),colorFFFF;<br>EXPLAINEX((1 = 1),'【卖出价】=',卖出价,2,0),colorFF00;<br>EXPLAIN(1,'==================================='),Color326C2C;<br>EXPLAIN(1=1,'【每股公积金】='+NUMTOSTR(每股公积金,2)+'元'),Color008BFF;<br>EXPLAIN(1=1,'【净利润】='+NUMTOSTR(净利润,2)+'万元'),colorFFFF00;<br>EXPLAIN(1=1,'【主营业务增长率】='+NUMTOSTR(主营业务增长率,2)+'%'),Color008BFF;<br>EXPLAIN(1=1,'【净利润增长率】='+NUMTOSTR(净利润增长率,2)+'%'),colorFFFF00;<br>EXPLAIN(1,'==================================='),Color326C2C;<br>