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