盤中的大戶散戶買賣超指標

By | 2019-07-24

前天跟大家分享了盤中大戶即時買賣超的警示腳本,然後在文中提到說現在盤中是無法畫出指標的,這句話敝公司的天才工程師們很不服氣,抗議說分時圖是畫不出來沒有錯,但分鐘K是畫的出來的(以為我不知道哦,我只是寫不出來而己),結果其中一位天才就直接把它寫出來了,今天就來跟大家分享這個分鐘K版的即時大戶散戶買賣超指標

先跟大家分享這個指標腳本

input:
bos(true,"類別",inputkind:=dict(["大戶",true],["散戶",false]),quickedit:=true),
p(100,"大戶門檻(萬元)");
variable:i(0),tv(0),tp1(0),tp(0);

i=0;
if date<>date[1]
then begin
value1=0;
value2=0;
end;
if V>0
then begin
while GetField("時間","Tick")[i]>=time and GetFieldDate("成交量","Tick")[i]=date
i+=1;
while i>0
begin
i-=1;
tv=GetField("成交量","Tick")[i];
tp=GetField("收盤價","Tick")[i];
tp1=GetField("收盤價","Tick")[i+1];
condition1=0.1*tv*tp>=p;
if tp>tp1 
then begin
condition2=true;
condition3=false;
end;
if tp<tp1
then begin
condition2=false;
condition3=true;
end;
if condition1 
then begin
if condition2 then value1+=tv;
if condition3 then value1-=tv;
end
else begin
if condition2 then value2+=tv;
if condition3 then value2-=tv;
end;
end;
end;

if bos then value3=value1 else value3=value2;


if value3>=0 then plot1(value3,"大戶買賣超");
if value3<0 then plot2(value3,"大戶買賣超");
if not bos
then begin
setplotlabel(1,"散戶買賣超");
setplotlabel(2,"散戶買賣超");
end;

這個指標腳本在計算上請在技術分析設定的第一個視窗底下,作如下圖的設定,不然會算很久線都出不來

這個指標在一分鐘K頻率下,畫出來的圖如下

也可以用五分鐘K

其實只要是分鐘K都能用

在應用上,可以挑那些大戶持續買超但散戶是賣超的公司

但要小心大漲後,散戶買但大戶賣超的股票

以上是在分鐘K底下所呈現的大戶及散戶買賣超指標

公司高手如雲,我應該負責許願就好,各位有什麼想寫寫不出來的,不要客氣,儘管提出來,這些人對於我說寫不出來的,都非常有意願想化不可能為可能,大家儘管提。

 

 

回應