技術009 發表于 2021-11-4 13:59
加倉后持倉成本是變化的。所以就要考慮清楚 這個盈利20% 是基于加倉變化后的持倉成本還是最開始的底倉。另 ...

?

ma10:ma(c,10);
ma50:ma(c,50);

kd:cross(ma10,ma50);//開多
pd:cross(ma50,ma10);

VARIABLE:p1:=0;//全局變量記錄初始開倉的價格

初始成本:p1,NODRAW;

ykb:=c/p1;
//判斷基于初始倉位的盈虧比在哪個區間 以及當前倉位情況來判斷這個區間是否加過倉了。
if  holding=1  and ykb>=1.1 and ykb<1.2 and p1<>0 then 加倉1:buy(1,1,market);
if  holding=2 and ykb>=1.2 and ykb<1.3 and p1<>0 then 加倉2:buy(1,1,market);
if  holding=3  and ykb>=1.3  and p1<>0 then 加倉3:buy(1,1,market);

if kd  and  holding=0 then //這個if后面必須是完整的開倉條件，因為if下需要執行全局變量的重置操作，所以必須保證和開倉條件完全一致
begin 
buy(1,1,market);
p1:=ENTERPRICE;//首次開倉時候記錄初始倉位價格	
end 

if pd and holding>0 then 
begin 
sell(1,holding,market);
p1:=0;//平倉時也重置全局變量
end