咨詢內(nèi)容： 后臺(tái)股票1、AB條件同時(shí)滿足時(shí)，B條件高于A條件，只開倉(cāng)B。

2、A條件滿足時(shí)，開倉(cāng)A。
3、B滿足時(shí)，A仍在持倉(cāng)，則加倉(cāng)2萬(wàn)。
4、平倉(cāng)重置。
多謝~~

?

?來(lái)源: www.kzuj.com.cn

金字塔資深技術(shù)：

[PEL] 復(fù)制代碼

GLOBALVARIABLE:A:=0;//全局變量記錄A是否開過倉(cāng)


input:n(9,1,100,10),p1(3,2,40,4),p2(3,2,40,4)；//參數(shù)設(shè)置
RSV:=(CLOSE-LLV(LOW,N))/(HHV(HIGH,N)-LLV(LOW,N))*100;
K:SMA(RSV,P1,1);
D:SMA(K,P2,1);
J:3*K-2*D,NODRAW;
kdjjc:cross(k,d),NODRAW;//kdj金叉   A條件
kdjsc:cross(d,k),NODRAW;


input:p(26,20,100,8),s(12,5,40,4),m(9,2,60,6);
DIFF :EMA(CLOSE,S) - EMA(CLOSE,P);
DEA  :EMA(DIFF,M);
MACD1 :2*(DIFF-DEA), COLORSTICK;
macdjc:cross(diff,dea),NODRAW;//macd金叉 B條件
macdsc:cross(dea,diff),NODRAW;


ss1:=100;//A開倉(cāng)手?jǐn)?shù)
ss2:=200;//B開倉(cāng)手?jǐn)?shù)


if kdjjc and  macdjc then //同時(shí)滿足 開倉(cāng)B的手?jǐn)?shù)
begin 
tbuy(1,ss2,Mkt);        
end 

if kdjjc and  not(macdjc) then //滿足A，不滿足B 開倉(cāng)A的手?jǐn)?shù) 同時(shí)全局變量進(jìn)行記錄
begin 
tbuy(1,ss1,Mkt);
A:=1;        
end 


if macdjc AND A then //滿足B條件且 有A的持倉(cāng)
begin 
ss:=INTPART((20000)/(100*c))*100;//按照2萬(wàn)資金以及最新價(jià)計(jì)算的股數(shù)
tbuy(1,ss,MKT);
end 

IF (macdsc OR  kdjsc) AND TBUYHOLDINGEX('','',0)>0 THEN //平倉(cāng)時(shí)候重置全局變量
BEGIN 
TSELL(1,0,MKT);
A:=0;
END

以此為例作為參考。你理清其中的邏輯就可以應(yīng)用到你自己代碼里了。只需把其中條件置換成你自己的開倉(cāng)條件即可。
需要注意的是：
1.每次重啟程序，都會(huì)重置。GLOBALVARIABLE 全局變量的記錄僅僅每次運(yùn)行期間保存。
2.股票市價(jià)下單。交易柜臺(tái)是按照漲停價(jià)判斷你資金釋放充足的。例子里都是市價(jià)，可以自行改成限價(jià)下單。

技術(shù)交流：

技術(shù)009 發(fā)表于 2021-10-22 14:37
[mw_shl_code=pel,true]GLOBALVARIABLE:A:=0;//全局變量記錄A是否開過倉(cāng)

not () 在后臺(tái)不行
在圖表是可以的。

?

技術(shù)交流： “not () 在后臺(tái)不行”啥意思？我這里沒用到這個(gè)函數(shù)吧。而且這個(gè)函數(shù)圖表后臺(tái)都可以的呀。