程序編寫循環邏輯問題求解
作者:金字塔 來源:cxh99.com 發布時間:2014年12月18日
- 咨詢內容:
IF TBUYHOLDING(1)>0 THEN BEGIN //多頭平倉 IF TBUYHOLDING(1)>0 and (h-ee)>3 and (h-ee)<50 THEN
TSELL(1,10,lmt,ee+3,0),ORDERQUEUE; TSELL(1,10,lmt,TEXITPRICE+3,0),ORDERQUEUE; IF TBUYHOLDING(1)>0 and (ee-l)>1 and (ee-l)<50 THEN TSELL(1,10,lmt,ee-1,0),ORDERQUEUE; TSELL(1,10,lmt,TEXITPRICE-3,0),ORDERQUEUE; //多頭撤單 tm:=50;//撤單時間50秒 if tisremain(2)>0 and tsubmit(2)>tm then begin tcancel(1,2); end TSELL(1,10,mkt);
在(h-ee)>3 and (h-ee)<50條件內,系統是否自動按 TSELL(1,10,lmt,ee+3,0),ORDERQUEUE; TSELL(1,10,lmt,TEXITPRICE+3,0),ORDERQUEUE;循環開倉?
就是后面出現連續的TSELL(1,10,lmt,TEXITPRICE+3,0),ORDERQUEUE;按上次平倉價+3開倉循環向上;出現這樣:TSELL(1,10,lmt,TEXITPRICE+3,0),ORDERQUEUE;TSELL(1,10,lmt,TEXITPRICE+3,0),ORDERQUEUE;TSELL(1,10,lmt,TEXITPRICE+3,0),ORDERQUEUE;----------------------------------------到(h-ee)<50停止。
- 金字塔客服:
IF TBUYHOLDING(1)>0 and (h-ee)>3 and (h-ee)<50 THEN
TSELL(1,10,lmt,ee+3,0),ORDERQUEUE;
TSELL(1,10,lmt,TEXITPRICE+3,0),ORDERQUEUE;
就是這樣寫,沒有begin end嗎
- 用戶回復:
沒有begin end
- 網友回復:
沒有不行?
- 網友回復:
ee:=tenterprice;IF TBUYHOLDING(1)>0 THEN BEGIN //多頭平倉 IF TBUYHOLDING(1)>0 and (h-ee)>3 and (h-ee)<50 THEN
TSELL(1,10,lmt,ee+3,0),ORDERQUEUE; TSELL(1,10,lmt,TEXITPRICE+3,0),ORDERQUEUE; IF TBUYHOLDING(1)>0 and (ee-l)>1 and (ee-l)<50 THEN TSELL(1,10,lmt,ee-1,0),ORDERQUEUE; TSELL(1,10,lmt,TEXITPRICE-3,0),ORDERQUEUE; //多頭撤單 tm:=50;//撤單時間50秒 if tisremain(2)>0 and tsubmit(2)>tm then begin tcancel(1,2); end TSELL(1,10,mkt); //多頭收盤平倉 if CURRENTTIME>=145800 and currenttime<=145900 then TSELL(1,0,mkt);END