在當(dāng)前運(yùn)行的公式中引用是否可以？ [金字塔]
- 咨詢內(nèi)容：
公式1運(yùn)行在rb00日線下，請(qǐng)問(wèn)老師如下引用可以嗎？
公式1:
variable:n1=0,n2=0;
VARIABLE:HIGHPRICE=0,LOWPRICE=0;
B:=REF(MA(C,20),1),PRECISION1,LINETHICK0;
KD1:=CROSS(MA(CLOSE,5),MA(CLOSE,30));
Kk1:=CROSS(MA(CLOSE,30),MA(CLOSE,5));
KD2:=CROSS(MA(CLOSE,10),MA(CLOSE,30));
Kk2:=CROSS(MA(CLOSE,30),MA(CLOSE,10));
KD:=(KD1 and n1=0 )OR( KD2 and n1=0 );
KK:=(KK1 and n2=0) OR( KK2 and n2=0);t1:=currenttime>=t0totime(timetot0(closetime(0))-5*60)and currenttime<t0totime(timetot0(closetime(0))-30);//開(kāi)倉(cāng)時(shí)間
t2:=currenttime>=t0totime(timetot0(closetime(0))-5*60);//平倉(cāng)時(shí)間
多開(kāi):BUY(1=1,1,marketr);
IF HOLDING<0 THEN BEGIN
IF (t2 AND CLOSE>B and n2=0 and STKINDIEX('rb01','公式1.收盤(pán)空平,0,6,0,200) and islastbar )or (not(islastbar) and CLOSE>B and n2=0) THEN BEGIN
收盤(pán)空平:SELLSHORT(1,1,marketr);
n2:=1;
IF islastbar THEN BEGIN
DEBUGFILE('D:\TEST.TXT',' 收盤(pán)空平:%.0f',收盤(pán)空平);//輸出收盤(pán)空平
DEBUGFILE('D:\TEST.TXT','holding:%.0f',holding);//輸出HOLDING
DEBUGFILE('D:\TEST.TXT','N2:%.0f',N2);//輸出N2
END
END
IF HOLDING=0 THEN BEGIN
IF ( t1 AND KK and islastbar and ENTERBARS!=0 )or (not(islastbar) and kk and ENTERBARS!=0 )THEN BEGIN
LOWPRICE:=ENTERPRICE;
END
ENDIF HOLDING>0 THEN BEGIN
多損:SELL(1,1,marketr);
IF (t2 AND CLOSE>B and n2=0 and islastbar )or (not(islastbar) and CLOSE>B and n2=0) THEN BEGIN
收盤(pán)多平:SELL(1,1,marketr);
n2:=1;
END
n2:=1;
END
IF L<LOWPRICE THEN LOWPRICE:=L;
IF ENTERPRICE-LOWPRICE>=30 THEN BEGIN
IF H >=LOWPRICE*(1+5/1000)and n2=0 THEN BEGIN
多贏:SELL(1,1,MARKET);
n2:=1;
END
END
ENDIF HOLDING=0 THEN BEGIN
IF ( t1 AND KK and STKINDIEX('rb01','公式1.空開(kāi),0,6,0,200) and islastbar and ENTERBARS!=0 )or (not(islastbar) and kk and ENTERBARS!=0 )THEN BEGIN
空開(kāi):BUYSHORT(1=1,1,marketr);
LOWPRICE:=ENTERPRICE;
IF islastbar THEN BEGIN
DEBUGFILE('D:\TEST.TXT',' T1f'&numtostr(T1,0)&' ENTERBARS!=0:'&numtostr(ENTERBARS!=0,1)&' KK:'&numtostr(KK,0)&' N2:'&numtostr(N2,0),0); //輸出開(kāi)倉(cāng)條件
DEBUGFILE('D:\TEST.TXT',' 空開(kāi):%.0f',空開(kāi));//輸出空開(kāi)
DEBUGFILE('D:\TEST.TXT','holding:%.0f',holding);//輸出HOLDING
//DEBUGFILE('D:\TEST.TXT','N2:%.0f',N2);//輸出N2
END
END
END
IF H>=ENTERPRICE*(1+0.02) and n2=0 and STKINDIEX('rb01','公式1.空損,0,6,0,200) THEN BEGIN
空損:SELLSHORT(1,1,marketr);
n2:=1;
IF islastbar THEN BEGIN
DEBUGFILE('D:\TEST.TXT',' 空損:%.0f',空損);//輸出空損
DEBUGFILE('D:\TEST.TXT','holding:%.0f',holding);//輸出HOLDING
DEBUGFILE('D:\TEST.TXT','N2:%.0f',N2);//輸出N2
END
END
IF L<LOWPRICE THEN LOWPRICE:=L;
IF ENTERPRICE-LOWPRICE>=30 THEN BEGIN
IF H >=LOWPRICE*(1+5/1000)and n2=0 and STKINDIEX('rb01','公式1. 空贏,0,6,0,200) THEN BEGIN
空贏:SELLSHORT(1,1,MARKET);
n2:=1;
IF islastbar THEN BEGIN
DEBUGFILE('D:\TEST.TXT',' 空贏:%.0f',空贏);//輸出空贏
DEBUGFILE('D:\TEST.TXT','holding:%.0f',holding);//輸出HOLDING
DEBUGFILE('D:\TEST.TXT','N2:%.0f',N2);//輸出N2
END
END
END
END
if (islastbar and currenttime =closetime(0))or (not(islastbar)) then begin
n1:=0;
n2:=0;
end
持倉(cāng):holding,linethick0;
資產(chǎn):asset,PRECISION1,linethick1,noaxis,COLOR8586D8; - 金字塔客服：
自己引用自己？
此主題相關(guān)圖片如下：1.png
[此貼子已經(jīng)被作者于2014/6/9 13:20:00編輯過(guò)] - 用戶回復(fù)：
僅品種不同。運(yùn)行在rb00日線下，引用rb01日線之值。
- 網(wǎng)友回復(fù)：
是不是自己引用自己？
- 網(wǎng)友回復(fù)： 僅品種不同。公式1運(yùn)行在rb00日線下，引用rb01日線之值
有思路，想編寫(xiě)各種指標(biāo)公式，程序化交易模型，選股公式，預(yù)警公式的朋友
可聯(lián)系技術(shù)人員 QQ: 511411198 進(jìn)行 有償 編寫(xiě)！（不貴！點(diǎn)擊查看價(jià)格！）
相關(guān)文章
-
沒(méi)有相關(guān)內(nèi)容
會(huì)員登錄/注冊(cè)