全局變量 [金字塔]
- 咨詢內(nèi)容:
這是我的開倉代碼:IF FLAG=1 AND ref(開多條件,1) AND (ENTERBARS>5 OR ENTERBARS=-1) AND TRADETIME THEN BEGIN
//DRAWTEXT(1,-50,'多'),ALIGN0;
SELLSHORT(HOLDING<0,手?jǐn)?shù),LIMITR,OPEN);
BUY(HOLDING=0,手?jǐn)?shù),LIMITR,OPEN);
if islastbar and bb<>barpos then begin
bb:= barpos;
extgbdataSet('恒指1號','恒指1號:開多信號,價(jià)格:'+numtostr(close,0));
VQQM:=QQMSSG(1);
END;END;為什么全局變量會定義成數(shù)值類型?
此主題相關(guān)圖片如下:qq.png
此主題相關(guān)圖片如下:qq1.png
- 金字塔客服:
EXTGBSTRINGSET這個(gè)是設(shè)置字符串變量。你用的是單值全局變量
- 用戶回復(fù):
開倉代碼:IF ref(開多條件,2) and cs1<5 and
日內(nèi) and TRADETIME THEN BEGIN //DRAWTEXT(1,-50,'多'),ALIGN0; SELLSHORT(HOLDING<>0,手?jǐn)?shù),LIMITR,OPEN); BUY(HOLDING=0,手?jǐn)?shù),LIMITR,OPEN); if islastbar and bb<>barpos then begin bb:= barpos; EXTGBSTRINGSET('恒指2號','恒指2號:開多信號,價(jià)格:'+numtostr(close,0)); VQQM:=QQMSSG(2); END;END;VBA代碼:Function QQMSSG(Formula,Flag) Select Case Flag Case 1 QQMSG=document.GetExtString("恒指1號") '獲取公式中設(shè)置的變量值 Case 2 QQMSG=document.GetExtString("恒指2號") End Select Set obj = CreateObject("WWSCommon.TCGroup") call obj.TransMessage("FUTURE", QQMSG) Set obj = NothingEnd Function為什么有時(shí)候可以發(fā)送開平倉消息,有時(shí)候卻只發(fā)現(xiàn)送了平倉消息?
此主題相關(guān)圖片如下:qq3.png
此主題相關(guān)圖片如下:qq4.png
- 網(wǎng)友回復(fù):
肯定是盤中條件沒有滿足,利用debugfile記錄下調(diào)試信號
具體使用可以論壇搜索下這個(gè)函數(shù)
- 網(wǎng)友回復(fù): 盤中有滿足的吧,要不然我圖表怎么會有出現(xiàn)開倉信號
有思路,想編寫各種指標(biāo)公式,程序化交易模型,選股公式,預(yù)警公式的朋友
可聯(lián)系技術(shù)人員 QQ: 511411198 進(jìn)行 有償 編寫!(不貴!點(diǎn)擊查看價(jià)格!)
相關(guān)文章
-
沒有相關(guān)內(nèi)容