求版主給修改一下.... [金字塔]
- 咨詢內容:
開平條件一多就通不過了,請版主幫忙搞定.再幫我加一個9點05開始執行,14點55平倉離場.謝謝!!
RUNMODE:1;
AA:=(HHV(HIGH,120)-LLV(LOW,120))/30,LINETHICK;
Var1:=(2*CLOSE+HIGH+LOW)/4;
轉換線1:(HHV(H,100)+LLV(L,10))/2,coloraaff99,LINETHICK;
基準線1:(HHV(L,100)+LLV(H,10))/2,colorff6dd8,LINETHICK;
先行帶1:(HHV(HIGH,100)+LLV(LOW,100))/2,colorff6dd8,LINETHICK;
先行帶1A:REF((轉換線1+基準線1+先行帶1)/3,1),COLORYELLOW,LINETHICK;
先行帶1B:REF((轉換線1+基準線1+先行帶1A)/3,3),COLORYELLOW,LINETHICK;
轉換線11:(HHV(HIGH,10)+LLV(LOW,10))/2,coloraaff99,LINETHICK;
基準線11:(LLV(HIGH,1)+HHV(LOW,10))/2,colorff6dd8,LINETHICK;
轉換線11A:(HHV(HIGH,10)+LLV(LOW,1))/2,coloraaff99,LINETHICK;
基準線11A:(LLV(HIGH,1)+HHV(LOW,100))/2,colorff6dd8,LINETHICK;
先行帶11A:REF((轉換線1+基準線1)/2,10),COLORYELLOW,LINETHICK;
先行帶11B:REF((轉換線11A+基準線11A)/2,1),color909090;
DRAWTEXT(CROSS(轉換線1,先行帶11A) AND Var1>MAX(基準線11,先行帶1A),LOW-AA*0.5,'▲\n▲\n▲\n▲\n▲'),COLORred,ALIGN0;
DRAWTEXT(CROSS(轉換線11,先行帶1B) AND Var1>MAX(轉換線11,先行帶11A),LOW-AA*0.5,'▲\n▲\n▲\n▲\n▲'),COLORred,ALIGN0;
轉換線2:(HHV(HIGH,100)+LLV(LOW,1))/2,coloraaff99,LINETHICK;
基準線2:(LLV(HIGH,10)+HHV(LOW,100))/2,colorff6dd8,LINETHICK;
轉換線2A:(HHV(HIGH,10)+LLV(LOW,100))/2,coloraaff99,LINETHICK;
基準線2A:(LLV(HIGH,1)+HHV(LOW,1))/2,colorff6dd8,LINETHICK;
先行帶2A:REF((轉換線2+基準線2)/2,1),COLORYELLOW,LINETHICK;
先行帶2B:REF((轉換線2A+基準線2A)/2,1),color909090;
轉換線21:(HHV(HIGH,1)+LLV(LOW,10))/2,coloraaff99,LINETHICK;
基準線21:(LLV(HIGH,10)+HHV(LOW,1))/2,colorff6dd8,LINETHICK;
轉換線21A:(HHV(HIGH,1)+LLV(LOW,10))/2,coloraaff99,LINETHICK;
基準線21A:(LLV(HIGH,1)+HHV(LOW,1))/2,colorff6dd8,LINETHICK;DRAWTEXT(CROSS(先行帶2B,轉換線21) AND Var1<MIN(轉換線21,轉換線2),MAX(基準線2,HIGH)+AA*2,'▼\n▼\n▼\n▼\n▼'),COLORFF9966,ALIGN0;
DRAWTEXT(CROSS(基準線21A,轉換線2A) AND Var1<MIN(轉換線21,轉換線2),MAX(基準線2,HIGH)+AA*2,'▼\n▼\n▼\n▼\n▼'),COLORFF9966,ALIGN0;DRAWTEXT(CROSS(先行帶2B,基準線2) AND Var1<MIN(轉換線21,轉換線21A),MAX(基準線2,HIGH)+AA*2,'▼\n▼\n▼\n▼\n▼'),COLORFF9966,ALIGN0;
DRAWTEXT(CROSS(基準線2,先行帶2A) AND Var1<MIN(轉換線21,轉換線2),MAX(基準線2,HIGH)+AA*2,'▼\n▼\n▼\n▼\n▼'),COLORFF9966,ALIGN0;轉換線3:(HHV(HIGH,100)+LLV(LOW,10))/2,coloraaff99,LINETHICK;
基準線3:(LLV(HIGH,1)+HHV(LOW,100))/2,colorff6dd8,LINETHICK;
轉換線3A:(HHV(HIGH,100)+LLV(LOW,10))/2,coloraaff99,LINETHICK;
基準線3A:(LLV(HIGH,10)+HHV(LOW,100))/2,colorff6dd8,LINETHICK;
先行帶3A:REF((轉換線3+基準線3)/2,10),COLORYELLOW,LINETHICK;
先行帶3B:REF((轉換線3A+基準線3A)/2,10),color909090;
轉換線31:(HHV(HIGH,100)+LLV(LOW,100))/2,coloraaff99,LINETHICK;
基準線31:(LLV(HIGH,10)+HHV(LOW,100))/2,colorff6dd8,LINETHICK;
轉換線31A:(HHV(HIGH,10)+LLV(LOW,10))/2,coloraaff99,LINETHICK;
基準線31A:(LLV(HIGH,10)+HHV(LOW,10))/2,colorff6dd8,LINETHICK;DRAWTEXT(CROSS(先行帶3B,轉換線31) AND Var1<MIN(轉換線31,轉換線3),MAX(基準線3,HIGH)+AA*2,'▼\n▼\n▼\n▼\n▼'),COLORFF9966,ALIGN0;
DRAWTEXT(CROSS(基準線31A,轉換線3A) AND Var1<MIN(轉換線31,轉換線3),MAX(基準線3,HIGH)+AA*2,'▼\n▼\n▼\n▼\n▼'),COLORFF9966,ALIGN0;DRAWTEXT(CROSS(先行帶3B,基準線3) AND Var1<MIN(轉換線31,轉換線31A),MAX(基準線3,HIGH)+AA*2,'▼\n▼\n▼\n▼\n▼'),COLORFF9966,ALIGN0;
DRAWTEXT(CROSS(基準線3,先行帶3A) AND Var1<MIN(轉換線31,轉換線3),MAX(基準線3,HIGH)+AA*2,'▼\n▼\n▼\n▼\n▼'),COLORFF9966,ALIGN0;轉換線4:(HHV(H,100)+LLV(L,1))/2,coloraaff99,LINETHICK;
基準線4:(HHV(L,10)+LLV(H,100))/2,colorff6dd8,LINETHICK;
先行帶4:(HHV(HIGH,100)+LLV(LOW,1000))/2,colorff6dd8,LINETHICK;
先行帶4A:REF((轉換線4+基準線4+先行帶4)/3,2),COLORYELLOW,LINETHICK;
先行帶4B:REF((轉換線4+基準線4+先行帶4A)/3,10),COLORYELLOW,LINETHICK;
轉換線41:(HHV(HIGH,1)+LLV(LOW,10))/2,coloraaff99,LINETHICK;
基準線41:(LLV(HIGH,1)+HHV(LOW,1))/2,colorff6dd8,LINETHICK;
轉換線41A:(HHV(HIGH,1)+LLV(LOW,100))/2,coloraaff99,LINETHICK;
基準線41A:(LLV(HIGH,10)+HHV(LOW,1))/2,colorff6dd8,LINETHICK;
先行帶41A:REF((轉換線4+基準線4)/2,100),COLORYELLOW,LINETHICK;
先行帶41B:REF((轉換線41A+基準線41A)/2,1),color909090;
DRAWTEXT(CROSS(轉換線4,先行帶41A) AND Var1>MAX(基準線41,先行帶4A),LOW-AA*0.5,'▲\n▲\n▲\n▲\n▲'),COLORred,ALIGN0;
DRAWTEXT(CROSS(轉換線41,先行帶4B) AND Var1>MAX(轉換線41,先行帶41A),LOW-AA*0.5,'▲\n▲\n▲\n▲\n▲'),COLORred,ALIGN0;
DRAWTEXT(CROSS(基準線41,先行帶4A) AND Var1<MIN(先行帶4A,轉換線41),MAX(基準線4,HIGH)+AA*2,'▼\n▼\n▼\n▼\n▼'),COLORFF9966,ALIGN0;
DRAWTEXT(CROSS(基準線4,先行帶41B) AND Var1<MIN(先行帶4A,基準線4),MAX(基準線4,HIGH)+AA*2,'▼\n▼\n▼\n▼\n▼'),COLORFF9966,ALIGN0;
轉換線5:(HHV(HIGH,10)+LLV(LOW,10))/2,coloraaff99,LINETHICK;
基準線5:(LLV(HIGH,10)+HHV(LOW,10))/2,colorff6dd8,LINETHICK;
轉換線5A:(HHV(HIGH,100)+LLV(LOW,1))/2,coloraaff99,LINETHICK;
基準線5A:(LLV(HIGH,100)+HHV(LOW,1))/2,colorff6dd8,LINETHICK;
先行帶5A:REF((轉換線5+基準線5)/2,1),COLORYELLOW,LINETHICK;
先行帶5B:REF((轉換線5A+基準線5A)/2,1),color909090;轉換線51:(HHV(HIGH,100)+LLV(LOW,10))/2,coloraaff99,LINETHICK;
基準線51:(LLV(HIGH,100)+HHV(LOW,1))/2,colorff6dd8,LINETHICK;
轉換線51A:(HHV(HIGH,100)+LLV(LOW,10))/2,coloraaff99,LINETHICK;
基準線51A:(LLV(HIGH,10)+HHV(LOW,10))/2,colorff6dd8,LINETHICK;
DRAWTEXT(CROSS(先行帶5A,基準線51A) AND Var1>MAX(轉換線51,基準線5),LOW-AA*0.5,'▲\n▲\n▲\n▲\n▲'),COLORred,ALIGN0;
DRAWTEXT(CROSS(轉換線51,基準線5A) AND Var1>MAX(基準線51A,先行帶5B),LOW-AA*0.5,'▲\n▲\n▲\n▲\n▲'),COLORred,ALIGN0;DRAWTEXT(CROSS(先行帶5A,基準線51) AND Var1>MAX(轉換線51,基準線5),LOW-AA*0.5,'▲\n▲\n▲\n▲\n▲'),COLORred,ALIGN0;
DRAWTEXT(CROSS(轉換線51A,基準線5) AND Var1>MAX(基準線51A,先行帶5B),LOW-AA*0.5,'▲\n▲\n▲\n▲\n▲'),COLORred,ALIGN0;//平空開多
kd:=(CROSS(轉換線1,先行帶11A) AND Var1>MAX(基準線11,先行帶1A))or (CROSS(轉換線11,先行帶1B) AND Var1>MAX(轉換線11,先行帶11A));
if kd then begin
sellshort(holding<0,holding,market);
buy(holding=0,1,market);
end
//平多
pd:(CROSS(先行帶2B,轉換線21) AND Var1<MIN(轉換線21,轉換線2)) or (CROSS(基準線21A,轉換線2A) AND Var1<MIN(轉換線21,轉換線2))or (CROSS(先行帶2B,基準線2) AND Var1<MIN(轉換線21,轉換線21A))or (CROSS(基準線2,先行帶2A) AND Var1<MIN(轉換線21,轉換線2))or (CROSS(先行帶3B,轉換線31) AND Var1<MIN(轉換線31,轉換線3))or (CROSS(基準線31A,轉換線3A)
AND Var1<MIN(轉換線31,轉換線3))or (CROSS(先行帶3B,基準線3) AND Var1<MIN(轉換線31,轉換線31A))or (CROSS(基準線3,先行帶3A) AND Var1<MIN(轉換線31,轉換線3));
sell(pd and holding>0,holding,market);
//平空
pk:(CROSS(轉換線4,先行帶41A) AND Var1>MAX(基準線41,先行帶4A)) or (CROSS(轉換線41,先行帶4B) AND Var1>MAX(轉換線41,先行帶41A))or (CROSS(先行帶5A,基準線51A) AND Var1>MAX(轉換線51,基準線5))or (CROSS(轉換線51,基準線5A) AND Var1>MAX(基準線51A,先行帶5B))or (CROSS(先行帶5A,基準線51) AND Var1>MAX(轉換線51,基準線5))or (CROSS(轉換線51A,基準線
5) AND Var1>MAX(基準線51A,先行帶5B));
sellshort(pk and holding<0,holding,market);
//平多開空
kk:(CROSS(基準線41,先行帶4A) AND Var1<MIN(先行帶4A,轉換線41)) or (CROSS(基準線4,先行帶41B) AND Var1<MIN(先行帶4A,基準線4));
if kk then begin
sell(holding>0,holding,market);
buyshort(holding=0,1,market);
end
- 金字塔客服:
首先,圖表交易,只能是逐k線模式.第一句,一定要是runmode:0;
然后就是你一直報錯的問題,
pd:(CROSS(先行帶2B,轉換線21) AND Var1<MIN(轉換線21,轉換線2)) or (CROSS(基準線21A,轉換線2A) AND Var1<MIN(轉換線21,轉換線2)) or (CROSS(先行帶2B,基準線2) AND Var1<MIN(轉換線21,轉換線21A))
or (CROSS(基準線2,先行帶2A) AND Var1<MIN(轉換線21,轉換線2)) or (CROSS(先行帶3B,轉換線31) AND Var1<MIN(轉換線31,轉換線3)) or (CROSS(基準線31A,轉換線3A) AND Var1<MIN(轉換線31,轉換線3))
or (CROSS(先行帶3B,基準線3) AND Var1<MIN(轉換線31,轉換線31A)) or (CROSS(基準線3,先行帶3A) AND Var1<MIN(轉換線31,轉換線3));//平空
pk:(CROSS(轉換線4,先行帶41A) AND Var1>MAX(基準線41,先行帶4A)) or (CROSS(轉換線41,先行帶4B) AND Var1>MAX(轉換線41,先行帶41A))
or (CROSS(先行帶5A,基準線51A) AND Var1>MAX(轉換線51,基準線5))or
(CROSS(轉換線51,基準線5A) AND Var1>MAX(基準線51A,先行帶5B))or
(CROSS(先行帶5A,基準線51) AND Var1>MAX(轉換線51,基準線5))or (CROSS(轉換線51A,基準線5) AND Var1>MAX(基準線51A,先行帶5B));這兩句里面,你不要隨意的換行,換行一定要是一個整體寫完整了再換行.
比如( a and b) 這一句寫完了再換行,而不是寫成
(a and
b )
甚至寫成
(a an
d b)
這樣寫軟件不明白
最后,開倉時間限定:增加開倉條件 time>090500 and time<145500;
收盤前平倉代碼:
if time>145500 then begin
sell(1,0,market);
sellshort(1,0,market);
end
- 用戶回復: 搞定,謝謝版主的幫助..
有思路,想編寫各種指標公式,程序化交易模型,選股公式,預警公式的朋友
可聯系技術人員 QQ: 511411198 進行 有償 編寫!(不貴!點擊查看價格!)
相關文章
-
沒有相關內容