引用

Kicky（新纏咪） 的 纏論一買、三買選股公式（飛狐+悟多公式）

一買的選股公式初步搞出來的，當(dāng)然還不完善，不能算是一買的公式，充其量算選出即將盤整背馳的，不過兩個中樞下的盤整背馳就是一買了，當(dāng)然真正是否背馳還要靠人工來判斷，它只能初選，不過也省下很多事了，歡迎使用，多提意見。

begin
if DATAPERIOD=0 then minbi:="fbase.var2#min1";
if DATAPERIOD=1 then minbi:="fbase.var2#min5";
if DATAPERIOD=2 then minbi:="fbase.var2#min30";
if DATAPERIOD=3 then minbi:="fbase.var2#min60";
if DATAPERIOD=4 then minbi:="fbase.var2#day";
if DATAPERIOD=5 then minbi:="fbase.var2#day";
if DATAPERIOD=6 then minbi:="fbase.var2#week";
if DATAPERIOD=7 then minbi:="fbase.var2#month";
if DATAPERIOD=8 then minbi:="fbase.var2#year";
var001:="fbase.var2#min30";
if datatype=3 then var001:="fbase.var2#min60";
if datatype=4 then var001:="fbase.var2#day";
var1:="chzhshch@kxian";
var2:="chzhshch@bi";{處理筆關(guān)系}
var3:="chzhshch@tongji"(minbi);{同級別分解}
zg:="chzhshch@zg"(var3);//一定要先調(diào)用ZG
zd:="chzhshch@zd"(var3);
zswz:=barslast(zg>zd);
tj3:=count(abs(var3),barslast(var3=1))=0;
tj4:=l<ref(l,barslast(var2=-1));
tj5:=count(var2=1,zswz-1)>0;
tj6:=ref(h,barslast(var2=1))<ref(zd,zswz);
tj7:=count(zg>zd,barslast(var3=1))>0;
not(zg>zd)&&tj3&&tj7&&tj4&&tj5&&tj6;
end;

一買是模糊的，不準(zhǔn)確的，三買就比較標(biāo)準(zhǔn)了，同樣背馳需自行判斷，否則不背馳就跌回中樞了：

begin
if DATAPERIOD=0 then minbi:="fbase.var2#min1";
if DATAPERIOD=1 then minbi:="fbase.var2#min5";
if DATAPERIOD=2 then minbi:="fbase.var2#min30";
if DATAPERIOD=3 then minbi:="fbase.var2#min60";
if DATAPERIOD=4 then minbi:="fbase.var2#day";
if DATAPERIOD=5 then minbi:="fbase.var2#day";
if DATAPERIOD=6 then minbi:="fbase.var2#week";
if DATAPERIOD=7 then minbi:="fbase.var2#month";
if DATAPERIOD=8 then minbi:="fbase.var2#year";
var001:="fbase.var2#min30";
if datatype=3 then var001:="fbase.var2#min60";
if datatype=4 then var001:="fbase.var2#day";
var1:="chzhshch@kxian";
var2:="chzhshch@bi";{處理筆關(guān)系}
var3:="chzhshch@tongji"(minbi);{同級別分解}
zg:="chzhshch@zg"(var3);//一定要先調(diào)用ZG
zd:="chzhshch@zd"(var3);
var1:="chzhshch@kxian";
var2:="chzhshch@bi";
var4:=barslast(var001<>0);
tj1:=ref(var001,var2)=-1;  //上級別是底
var5:=sum(abs(var2),var2);
tj2:=var5=1; //第一個回調(diào)才算
tj3:=count(abs(var3),barslast(var3=-1))=0;
zswz:=barslast(zg>zd);
tj4:=count(zg>zd,barslast(var3=-1))>0;
tj5:=count(var2=1,barslast(var2=-1))=1;
tj6:=count(var2=1,zswz-1)=1;
tj7:=ref(l,barslast(var2=1))>ref(zg,barslast(zg>zd));
not(zg>zd)&&tj3&&tj4&&tj5&&tj6&&tj7;
end;