【千鈞贏富】第四版

作者：飛狐來(lái)源：cxh99.com 發(fā)布時(shí)間：2022年02月19日

相關(guān)標(biāo)簽:買(mǎi)入穩(wěn)贏指標(biāo)公式、股圣贏富王軟件指標(biāo) 、麟龍四色譜指標(biāo)公式、四量圖指標(biāo)公式、止贏止損線指標(biāo)公式、文華財(cái)經(jīng)順贏指標(biāo)公式、贏在龍頭指標(biāo)公式大全、贏富數(shù)據(jù) 、贏富網(wǎng) 、操盤(pán)軟件富贏版、操盤(pán)手富贏版v7 、操盤(pán)手富贏版v8 、

【千鈞贏富】第四版！我曾答應(yīng)過(guò)朋友，近期升級(jí)【千鈞贏富】。言必出，行必果。這是千鈞的一貫作風(fēng)。
這個(gè)版本，取消了擴(kuò)展數(shù)據(jù)，引用數(shù)據(jù)。采用了日線數(shù)據(jù)直接計(jì)算。
需要說(shuō)明的是：
這個(gè)指標(biāo)中的大單、特大、中單、小單，不是真正意義上的大單、小單。
是千鈞把一根K線分割成四個(gè)部分，并分別提取這四個(gè)部分的成交而成。
嚴(yán)格的說(shuō)：是估算各個(gè)類別。作者：千鈞{程序化交易 www.tumamayizhan.com }
指標(biāo)源碼：
流通:IF(CAPITAL=0,ESTDATA(12)/10000,FINANCE(7)/10000),LINETHICK0,PRECISION2,Color00BFFF;
jj:=(HIGH+LOW+CLOSE)/3;
qj0:=vol/IF(HIGH=LOW,4,HIGH-LOW);
qj1:=IF(CAPITAL=0,qj0*(jj-MIN(CLOSE,OPEN)),qj0*IF(HIGH=LOW,1,(MIN(OPEN,CLOSE)-LOW)));
qj2:=IF(CAPITAL=0,qj0*(MIN(OPEN,CLOSE)-LOW),qj0*IF(HIGH=LOW,1,(jj-MIN(CLOSE,OPEN))));
qj3:=IF(CAPITAL=0,qj0*(HIGH-MAX(OPEN,CLOSE)),qj0*IF(HIGH=LOW,1,(HIGH-MAX(OPEN,CLOSE))));
qj4:=IF(CAPITAL=0,qj0*(MAX(CLOSE,OPEN)-jj),qj0*IF(HIGH=LOW,1,(MAX(CLOSE,OPEN)-jj)));
總1:=(qj1+qj2)-(qj3+qj4);總:=qj1+qj2+qj3+qj4;
w1:=(qj1+qj2);CM:=SUM(總1,24);ZJ:=REF(總1,1);
w2:=(abs(qj1)+abs(qj2)+abs(qj3)+abs(qj4));
ZSA:=cm/IF(CAPITAL=0,ESTDATA(12),FINANCE(7));
ZSB:=(總1-ref(總1,1))/總*100;
DIFF:=EMA(w1,12)-EMA(w1,26);DEA:=EMA(DIFF,9);
jg:=((CLOSE-LLV(LOW,34))/(HHV(HIGH,34)-LLV(LOW,34)))*100;
yh:=cross(diff,dea) and jg<10;
bh:=cross(dea,diff) and jg>95;
SW:=yh=1;SS:=bh=1;
VERTLINE(sw),COLOR0000FF,LINEDOT;
VERTLINE(ss),COLOR00FF00,LINEDOT;
A:=BARSLAST(SW);B:=BARSLAST(SS);
起點(diǎn):=IF(A and A<B,A,0);
終點(diǎn):=IF(B and B<A,B,0);
cc:=AMOUNT/VOL/100;主力成本:=(cc*w1*100)/w1/100;
換手率:IF(CAPITAL=0,INDEXV/ESTDATA(12),VOL/FINANCE(7)),PRECISION2,LINETHICK0;
{控制畫(huà)線高度}
ww:=SYSPARAM(2);n1:=SYSPARAM(3);nn:=n1-ww+1;hh:=HHV(w2,nn);
ll:=LLV(w2,nn);最高:=hh[n1];最低:=ll[n1];中:=最低+(最高-最低)*0.5;
{顯示時(shí)間}
variable:wday[7]='星期六';
wday[1]:='星期日';
wday[2]:='星期一';
wday[3]:='星期二';
wday[4]:='星期三';
wday[5]:='星期四';
wday[6]:='星期五';
fy:=YEAR;
fm:=MONTH;
fd:=DAY;
wd:=WEEKDAY;
p:=SYSPARAM(1);
str1:=''+NUMTOSTR(fy[p],0)+'年'+NUMTOSTR(fm[p],0)+'月'+NUMTOSTR(fd[p],0)+'日 '+wday[wd[p]+1];
STICKLINE(總1<0,0,-總1+總/2,8,0),ColorFF4400;
STICKLINE(總1<0,0,-總1+總/2,6,0),ColorFF8800;
STICKLINE(總1<0,0,-總1+總/2,3,0),ColorFFaa00;
STICKLINE(總1<0,0,-總1+總/2,1,0),ColorFFcc00;
STICKLINE(總1>0,0,+總1+總/2,8,0),Color000044;
STICKLINE(總1>0,0,+總1+總/2,6,0),Color000088;
STICKLINE(總1>0,0,+總1+總/2,3,0),Color0000aa;
STICKLINE(總1>0,0,+總1+總/2,1,0),Color0000cc;
m1:ma(sum(總1,5),5);m2:wma(m1,5);
STICKLINE(BARPOS=ww+10,中*-0.5,中*2.1,200,0),COLOR000000;
STICKLINE(BARPOS=ww+8,中*-0.5,中*-0.9,300,0),COLOR000000;
VERTLINE(BARPOS=ww+20),COLOREE00EE,LINETHICK2;
VERTLINE(BARPOS=ww),COLOREE00EE,LINETHICK2;
STICKLINE(BARPOS=ww+8,中*1.7,中*2.1,300,0),COLOR000000;
STICKLINE(BARPOS=ww+10,中*1.7,中*1.7,200,0),COLOREE00EE;
STICKLINE(BARPOS=ww+10,中*0.3,中*0.3,200,0),COLOR666666;
STICKLINE(BARPOS=ww+10,中*-0.9,中*-0.9,200,0),COLOREE00EE;
STICKLINE(BARPOS=ww+2 and qj1[p]>0,中*0.3,中*0.3+(qj1[p]),30,0),COLOR00FFFF;
STICKLINE(BARPOS=ww+2 and qj1[p]<0,中*0.3,中*0.3-(qj1[p]),30,0),COLOR00FF00;
STICKLINE(BARPOS=ww+7 and qj2[p]>0,中*0.3,中*0.3+(qj2[p]),30,0),COLOR0000FF;
STICKLINE(BARPOS=ww+7 and qj2[p]<0,中*0.3,中*0.3-(qj2[p]),30,0),COLOR00FF00;
STICKLINE(BARPOS=ww+12 and qj3[p]>0,中*0.3,中*0.3+(qj3[p]),30,0),COLORFF00FF;
STICKLINE(BARPOS=ww+12 and qj3[p]<0,中*0.3,中*0.3-(qj3[p]),30,0),COLOR00FF00;
STICKLINE(BARPOS=ww+17 and qj4[p]>0,中*0.3,中*0.3+(qj4[p]),30,0),COLORFF6600;
STICKLINE(BARPOS=ww+17 and qj4[p]<0,中*0.3,中*0.3-(qj4[p]),30,0),COLOR00FF00;
DRAWTEXT(BARPOS=ww+1,中*0.2,'特\n'+NUMTOSTR(qj1[p]/總[p]*100,0)),PXDN5,COLORWHITE;
DRAWTEXT(BARPOS=ww+6,中*0.2,'大\n'+NUMTOSTR(qj2[p]/總[p]*100,0)),PXDN5,COLORWHITE;
DRAWTEXT(BARPOS=ww+11,中*0.2,'中\(zhòng)n'+NUMTOSTR(qj3[p]/總[p]*100,0)),PXDN5,COLORWHITE;
DRAWTEXT(BARPOS=ww+16,中*0.2,'小\n'+NUMTOSTR(qj4[p]/總[p]*100,0)),PXDN5,COLORWHITE;
DRAWTEXTEX(CLOSE,1,230,0,str1),ColorffFF00;
DRAWTEXTEX(CLOSE,1,20,0,STKLABEL+' '+STKNAME+''),ColorffFF00;
DRAWTEXTEX(CLOSE,1,230,130,'主力成本:'+NUMTOSTR(主力成本[p],2)+'元'),COLOR00FF00;
DRAWTEXTEX(CLOSE,1,520,130,'主力籌碼占流通:'+NUMTOSTR(ZSA[P],2)+' %'),COLOR00FF00;
DRAWTEXTEX(CLOSE,1,770,130,'本日較昨日增減:'+NUMTOSTR(ZSB[P],2)+' %'),COLOR00FF00;
DRAWTEXTEX(CLOSE,1,520,0,'估算主力進(jìn)入:'+NUMTOSTR(起點(diǎn)[P],0)+'(天) '),COLORFFFF00;
DRAWTEXTEX(CLOSE,1,770,0,'判斷主力回吐:'+NUMTOSTR(終點(diǎn)[P],0)+'(天) '),COLORFFFF00;
DRAWTEXT(BARPOS=ww+1 and 總1[P]<0,中*-0.6,'散戶主買(mǎi)'),COLORFF00FF;
DRAWTEXT(BARPOS=ww+1 and 總1[P]>0,中*-0.6,'主力主買(mǎi)'),COLOR0000FF;
DRAWTEXT(BARPOS=ww+11 and 總1[P]>0,中*-0.6,'散戶主賣(mài)'),COLORFFEE00;
DRAWTEXT(BARPOS=ww+11 and 總1[P]<0,中*-0.6,'主力主賣(mài)'),COLOR00FF00;
{增減倉(cāng)}
周倉(cāng):=SUM(總1,5);月倉(cāng):=SUM(總1,25);
年倉(cāng):=SUM(總1,240);上周:=REF(周倉(cāng),1);
上月:=REF(月倉(cāng),1);上年:=REF(年倉(cāng),BARSLAST(YEAR=x));
周增:=周倉(cāng)-上周;月增:=月倉(cāng)-上月;年增:=年倉(cāng)-上年;
{解盤(pán)}
EXPLAIN(1,'==================================='),colorwhite;EXPLAIN(1,'***【千鈞=**=制作】***'),colorEE00EE;
EXPLAIN(1,'==================================='),colorwhite;EXPLAIN(1,'昨日增減:'+NUMTOSTR(zj[p]*100/10000,2)+' 萬(wàn)股'),ColorFF8B00;
EXPLAIN(1,'==================================='),colorwhite;EXPLAIN(1,'上周:'+NUMTOSTR(上周[p]*100/10000,2)+' 萬(wàn)股'),COLORred;
EXPLAIN(1,'增減:'+NUMTOSTR(周增[p]*100/10000,2)+' 萬(wàn)股'),COLORred;
EXPLAIN(1,'==================================='),colorwhite;EXPLAIN(1,'上月:'+NUMTOSTR(上月[p]*100/10000,2)+' 萬(wàn)股'),COLORFF00FF;
EXPLAIN(1,'增減:'+NUMTOSTR(月增[p]*100/10000,2)+' 萬(wàn)股'),COLORFF00FF;
EXPLAIN(1,'==================================='),colorwhite;EXPLAIN(1,'上年:'+NUMTOSTR(上年[p]*100/10000,2)+' 萬(wàn)股'),COLOR00EE00;
EXPLAIN(1,'增減:'+NUMTOSTR(年增[p]*100/10000,2)+' 萬(wàn)股'),COLOR00EE00;
EXPLAIN(1,'==================================='),colorwhite;

無(wú)法通過(guò)的哥們，請(qǐng)?jiān)谠创a的最前面加上：
X:=2008;

公式導(dǎo)入教程: 【通達(dá)信公式源碼導(dǎo)入方法教程】【同花順公式源碼導(dǎo)入方法教程】【大智慧新一代公式源碼導(dǎo)入方法教程】