本帖最后由 明天依舊 于 2012-2-13 13:09 編輯 分時觀盤2 {大智慧分時公式,準確率超大智慧正版DDE和東方財富網數據} 0,dotline,colorgray; 現價:=c; 特大買量:"分筆數檔.特大買量#tick",colorred,linethick2; 特大賣量:"分筆數檔.特大賣量#tick",colorgreen,linethick2; 中買量:"分筆數檔.中買量#tick",coloryellow,linethick0; 中賣量:"分筆數檔.中賣量#tick",linethick0; 大買量:"分筆數檔.大買量#tick",linethick0; 大賣量:"分筆數檔.大賣量#tick",linethick0; 小買量:"分筆數檔.小買量#tick",linethick0; 小賣量:"分筆數檔.小賣量#tick",linethick0; 小量差:小買量-小賣量,linethick0; 中量差:中買量-中賣量,linethick0; 大量差:大買量-大賣量,linethick0; 特大量差:特大買量-特大賣量,linethick0; 主力量差:大量差+特大量差,linethick0; FILLRGN(主力量差,0,主力量差>0,rgb(120,60,30),主力量差<0,rgb(0,80,200)); 市場主力差:主力量差,linethick3,coloryellow; 小差:小量差,linethick0,colorgray; 小量差,linethick0,colorgreen; 大量差,linethick0,colorwhite; 特大量差,linethick0,coloryellow; 主力差額:主力量差*c/100,PRECIS0,linethick0; 主力增倉:主力量差/capital*100,linethick0; 主力五十萬3:"50W細解.三天增減比率50#day",linethick0; 主力二十萬3:"20W分析.三天增減比率#day",linethick0; 當天增倉率50w:"50W細解.當天增減比率#day",linethick0; 當天增倉率20w:"20W分析.當天增減比率#day",linethick0; 主力持倉率50w:"50W細解.主力持倉率#day",linethick0; 總量:=sum(vol,0); sb1:=小買量/總量*100; ss1:=小賣量/總量*100; sb:=中買量/總量*100; ss:=中賣量/總量*100; bb:=大買量/總量*100; bs:=大賣量/總量*100; lb:=特大買量/總量*100; ls:=特大賣量/總量*100; DRAWTEXTABS(10 ,10 ,'主力量差:'+主力量差),COLORgreen,linethick4; DRAWTEXTABS(10 ,30 ,'主力增倉:'+主力增倉+'%'),COLORgreen,linethick4; DRAWTEXTABS(180 ,10 ,'50w3日%:'+主力五十萬3+'%'),COLORgreen,linethick4; DRAWTEXTABS(180 ,30 ,'20w3日%:'+主力二十萬3+'%'),COLORgreen,linethick4; DRAWTEXTABS(10 ,50 ,'當天20w%:'+當天增倉率20w+'%'),COLORgreen,linethick4; DRAWTEXTABS(180 ,50 ,'當天50w%:'+當天增倉率50w+'%'),COLORgreen,linethick4; DRAWTEXTABS(180 ,70 ,'主力持倉率50w:'+主力持倉率50w+'%'),COLORyellow,linethick4; DRAWTEXTABS(10 ,120 ,'小買% '+sb1),coloryellow; DRAWTEXTABS(10 ,135 ,'小賣% '+ss1),colorgreen; DRAWTEXTABS(10 ,150 ,'小量差 '+小量差),coloryellow; DRAWTEXTABS(90 ,120 ,'中買% '+sb),coloryellow; DRAWTEXTABS(90 ,135 ,'中賣% '+ss),colorgreen; DRAWTEXTABS(90 ,150 ,'中量差 '+中量差),coloryellow; DRAWTEXTABS(170 ,120 ,'大買% '+bb),coloryellow; DRAWTEXTABS(170 ,135 ,'大賣% '+bs),colorgreen; DRAWTEXTABS(170 ,150 ,'大量差 '+大量差),coloryellow; DRAWTEXTABS(250 ,120 ,'特買% '+lb),coloryellow; DRAWTEXTABS(250 ,135 ,'特賣% '+ls),colorgreen; DRAWTEXTABS(250 ,150 ,'特量差'+特大量差),coloryellow; DRAWRECTABS(40 ,118-sb1 , 50 ,118 ,RGB(255,0,0)); DRAWRECTABS(60 ,118-ss1, 70 ,118 ,RGB(0,255,0)); DRAWRECTABS(120 ,118-sb , 130 ,118 ,RGB(255,0,0)); DRAWRECTABS(140 ,118-ss, 150 ,118 ,RGB(0,255,0)); DRAWRECTABS(190 ,118-bb , 200 ,118 ,RGB(255,0,0)); DRAWRECTABS(210 ,118-bs , 220 ,118 ,RGB(0,255,0)); DRAWRECTABS(270 ,118-lb , 280 ,118 ,RGB(255,0,0)); DRAWRECTABS(290 ,118-ls , 300 ,118 ,RGB(0,255,0)); {-------------看各價位上的成交累計------------} 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)); DRAWRECTABS(277+100 ,120-n8*250, 287+100 ,120 ,RGB(0,0,255)); DRAWRECTABS(290+100 ,120-n7*250, 300+100 ,120 ,RGB(0,0,255)); DRAWRECTABS(302+100 ,120-n6*250, 312+100 ,120 ,RGB(0,0,255)); DRAWRECTABS(315+100 ,120-n5*250, 325+100 ,120 ,RGB(0,0,255)); DRAWRECTABS(327+100 ,120-n4*250, 337+100 ,120 ,RGB(0,0,255)); DRAWRECTABS(340+100 ,120-n3*250, 350+100 ,120 ,RGB(0,0,255)); DRAWRECTABS(352+100 ,120-n2*250, 362+100 ,120 ,RGB(0,0,255)); DRAWRECTABS(365+100 ,120-n1*250, 375+100 ,120 ,RGB(0,0,255)); DRAWRECTABS(377+100 ,120-b0*250, 387+100 ,120 ,RGB(0,0,255)); DRAWRECTABS(390+100 ,120-p1*250, 400+100 ,120 ,RGB(180,120,60)); DRAWRECTABS(402+100 ,120-p2*250, 412+100 ,120 ,RGB(180,120,60)); DRAWRECTABS(415+100 ,120-p3*250, 425+100 ,120 ,RGB(180,120,60)); DRAWRECTABS(427+100 ,120-p4*250, 437+100 ,120 ,RGB(180,120,60)); DRAWRECTABS(440+100 ,120-p5*250, 450+100 ,120 ,RGB(180,120,60)); DRAWRECTABS(452+100 ,120-p6*250, 462+100 ,120 ,RGB(180,120,60)); DRAWRECTABS(465+100 ,120-p7*250, 475+100 ,120 ,RGB(180,120,60)); DRAWRECTABS(477+100 ,120-p8*250, 487+100 ,120 ,RGB(180,120,60)); DRAWRECTABS(490+100 ,120-p9*250, 500+100 ,120 ,RGB(180,120,60)); DRAWRECTABS(502+100 ,120-p10*250, 512+100 ,120 ,RGB(180,120,60)); 所需其他公式—— 分筆數檔 0,dotline,colorgray; 現價:=c; Var1:=AMOUNT/VOL/100; Var2:=REF(ASKPRICE(1),1); Var3:=REF(BIDPRICE(1),1); Var4:=(Var2-Var3)*0.35; Var5:=IF(Var1>=Var2-Var4,VOL,IF(Var1<Var2-Var4 AND Var1>Var3+Var4,BUYVOL,0)); Var6:=IF(Var1<=Var3+Var4,VOL,IF(Var1<Var2-Var4 AND Var1>Var3+Var4,SELLVOL,0));x1:=a1*10000; 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(0,80,200)); 市場主力差:主力量差,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 ,'主力量差 : '+主力量差),COLORgreen,linethick3; DRAWTEXTABS(10 ,30 ,'主力增倉 : '+主力增倉+'%'),COLORgreen,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 , 50 ,118 ,RGB(255,0,0)); DRAWRECTABS(60 ,118-ss1, 70 ,118 ,RGB(0,255,0)); DRAWRECTABS(120 ,118-sb , 130 ,118 ,RGB(255,0,0)); DRAWRECTABS(140 ,118-ss, 150 ,118 ,RGB(0,255,0)); DRAWRECTABS(190 ,118-bb , 200 ,118 ,RGB(255,0,0)); DRAWRECTABS(210 ,118-bs , 220 ,118 ,RGB(0,255,0)); DRAWRECTABS(270 ,118-lb , 280 ,118 ,RGB(255,0,0)); DRAWRECTABS(290 ,118-ls , 300 ,118 ,RGB(0,255,0)); 50W細解 五十萬買賣差:SELFDATA('50w買賣差'); 當天增減:五十萬買賣差,LINETHICK0,COLORyellow; 實際流通盤:SELFDATA('實際流通盤'); 實際換手:vol/實際流通盤; 主力倉量:sum(五十萬買賣差,0),LINETHICK4,COLORgreen; 當天增減比率:當天增減/實際流通盤; 兩天前倉:=ref(主力倉量,2); 三天前倉:=ref(主力倉量,3); 五天前倉:=ref(主力倉量,5); 十天前倉:=ref(主力倉量,10); 廿天前倉:=ref(主力倉量,20); 兩天增減:主力倉量-兩天前倉,LINETHICK0,color003399; 三天增減:主力倉量-三天前倉,LINETHICK0,color003399; 五天增減:主力倉量-五天前倉,LINETHICK0,color0055ff; 十天增減:主力倉量-十天前倉,LINETHICK0,color00aaff; 廿天增減:主力倉量-廿天前倉,LINETHICK0,colorblue; STICKLINE(當天增減>0,當天增減,0,6,0),COLOR0000ff; STICKLINE(當天增減<0,當天增減,0,6,0),color00ff00; ma5:MA(主力倉量,5),colorred; ma10:MA(主力倉量,10),COLORGRAY; ma20:MA(主力倉量,20),COLORBLUE,linethick4; ma30:MA(主力倉量,30),colorgreen; ma50:MA(主力倉量,50),CIRCLEDOT,COLORMAGENTA; 主力增減:當天增減/實際流通盤; 兩天增減比率50:兩天增減/實際流通盤; 三天增減比率50:三天增減/實際流通盤; 五天增減比率:五天增減/實際流通盤; 十天增減比率:十天增減/實際流通盤; 廿天增減比率:廿天增減/實際流通盤; 倉量斜率3:ma(主力倉量-ref(主力倉量,1),3)/CAPITAL*100,linethick0; 倉量斜率5:ma(主力倉量-ref(主力倉量,1),5)/CAPITAL*100*100,linethick0; 倉量斜率10:ma(主力倉量-ref(主力倉量,1),10)/CAPITAL,linethick0; 倉量斜率20:ma(主力倉量-ref(主力倉量,1),20)/CAPITAL*100,linethick0; 主力持倉率:主力倉量/實際流通盤; 20W分析 大買:=SELFDATA('20w大單買入量'); 大賣:=SELFDATA('20w大單賣出量'); 當天增減:(大買-大賣),LINETHICK0,COLORyellow; 主力倉量:sum(大買-大賣,0),LINETHICK4,COLORgreen; 三天前倉:=ref(主力倉量,3); 五天前倉:=ref(主力倉量,5); 十天前倉:=ref(主力倉量,10); 廿天前倉:=ref(主力倉量,20); 三天增減:主力倉量-三天前倉,LINETHICK0,color003399; 五天增減:主力倉量-五天前倉,LINETHICK0,color0055ff; 十天增減:主力倉量-十天前倉,LINETHICK0,color00aaff; 廿天增減:主力倉量-廿天前倉,LINETHICK0,colorblue; STICKLINE(當天增減>0,當天增減,0,6,0),COLOR0000ff; STICKLINE(當天增減<0,當天增減,0,6,0),color00ff00; ma5:MA(主力倉量,5),colorred; ma10:MA(主力倉量,10),COLORGRAY; ma20:MA(主力倉量,20),COLORBLUE,linethick4; ma30:MA(主力倉量,30),colorgreen; ma50:MA(主力倉量,50),CIRCLEDOT,COLORMAGENTA; 實際流通盤:SELFDATA('實際流通盤'); 實際換手:vol/實際流通盤; 主力增減:當天增減/實際流通盤; drawtext(ma(主力倉量,50)>ref(ma(主力倉量,50),1),ma(主力倉量,50),'o'),COLORBLACK; PARTLINE(ma50,ma50<ma30 and ma50>ref(ma50,1) and ma30>ref(ma30,1),rgb(255,0,0), ma50<ma30,rgb(255,255,0), ma50>ma30 and ma50>ref(ma50,1) and ma30>ref(ma30,1),rgb(255,0,255), 1,rgb(0,0,255)),CIRCLEDOT; 當天增減比率:當天增減/實際流通盤; 三天增減比率:三天增減/實際流通盤; 五天增減比率:五天增減/實際流通盤; 十天增減比率:十天增減/實際流通盤; 廿天增減比率:廿天增減/實際流通盤; 倉量斜率3:ma(主力倉量-ref(主力倉量,1),3)/CAPITAL*100,linethick0; 倉量斜率5:ma(主力倉量-ref(主力倉量,1),5)/CAPITAL*100*100,linethick0; 倉量斜率10:ma(主力倉量-ref(主力倉量,1),10)/CAPITAL,linethick0; 倉量斜率20:ma(主力倉量-ref(主力倉量,1),20)/CAPITAL*100,linethick0; 飄紅:LAST(當天增減>0),PRECIS0,color0000FF,linethick0; 十日飄紅:COUNT(當天增減>0,10),PRECIS0,colorgray,linethick0; 五日飄紅:COUNT(當天增減>0,5),PRECIS0,colorgray,linethick0; 三日飄紅:COUNT(當天增減>0,3),PRECIS0,colorgray,linethick0; 主力持倉率:主力倉量/實際流通盤; 2.分筆數檔公式里的a1、a2、a3的值是10、20、50嗎? 是的,忘寫了。。。。。。。 |
F000587.GIF (89.55 KB)