打印本文
關閉窗口
?MA40:=EMA(C,125),LINETHICK2;?? //輸出MA40:收盤價的125日簡單移動平均
LL:=LLV(LOW,1)/5+LLV(LOW,2)/5+LLV(LOW,2)/5+LLV(LOW,5)/5+LLV(LOW,8)/5;//LL賦值:1日內最低價的最低值/5+2日內最低價的最低值/5+2日內最低價的最低值/5+5日內最低價的最低值/5+8日內最低價的最低值/5
HH:=HHV(HIGH,1)/5+HHV(HIGH,2)/5+HHV(HIGH,2)/5+HHV(HIGH,5)/5+HHV(HIGH,8)/5;//HH賦值:1日內最高價的最高值/5+2日內最高價的最高值/5+2日內最高價的最高值/5+5日內最高價的最高值/5+8日內最高價的最高值/5
H1:= IFELSE(H<REF(H,2)&&REF(H,1)<REF(H,2),REF(H,2),0);//H1賦值: IFELSE(最高價<2日前的最高價并且1日前的最高價<2日前的最高價,2日前的最高價,0)
L1:= IFELSE(L>REF(L,2)&&REF(L,1)>REF(L,2),REF(L,2),0);??? //L1賦值: IFELSE(最低價>2日前的最低價并且1日前的最低價>2日前的最低價,2日前的最低價,0)
H2:=VALUEWHEN(H1>0,H1);??? //H2賦值:如果H1>0,返回H1,否則返回上個輸出值
L2:=VALUEWHEN(L1>0,L1);????? //L2賦值:如果L1>0,返回L1,否則返回上個輸出值
K1:=IFELSE(CLOSE>H2,-3,IFELSE(CLOSE<L2,1,0));//K1賦值:IFELSE(收盤價>H2,-3,IFELSE(收盤價<L2,1,0))
K2:=VALUEWHEN(K1<>0,K1);//K2賦值:如果K1不等于0,返回K1,否則返回上個輸出值
GG:=IFELSE(K2=1,H2,L2);//GG賦值:IFELSE(K2=1,H2,L2)
GG1:=VALUEWHEN(ISLASTBAR,GG);//GG1賦值:如果是否最后一個周期,返回GG,否則返回上個輸出值
TMP1:=K2;//TMP1賦值:K2
W1:=K2;//W1賦值:K2
W2:=OPEN-CLOSE;//W2賦值:開盤價-收盤價
HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE);//HT賦值:IFELSE(收陰線,開盤價,收盤價)
LT:=IFELSE(OPEN<CLOSE,OPEN,CLOSE);//LT賦值:IFELSE(收陽線,開盤價,收盤價)
DRAWTEXT(CROSS(TMP1,0)&&C<MA40,HH,'',FONTSIZE18,COLORGREEN;//當滿足條件TMP1上穿0并且收盤價<MA40時,在HH位置書寫文字,FONTSIZE20,畫綠色
DRAWTEXT(CROSS(0,TMP1)&&C>MA40,LL,'',FONTSIZE18,COLORYELLOW;//當滿足條件0上穿TMP1并且收盤價>MA40時,在LL位置書寫文字,FONTSIZE20,畫黃色
PLAYSOUND(CROSS(TMP1,0)&&C<MA40,'';
PLAYSOUND(CROSS(0,TMP1)&&C>MA40,'';
OCH:=MAX(OPEN,CLOSE);//OCH賦值:開盤價和收盤價的較大值
OCL:=MIN(OPEN,CLOSE);// OCL賦值:開盤價和收盤價的較小值
CROSSUP(TMP1,0)&&C>MA40,BK;
CROSSDOWN(TMP1,0)&&C<MA40,SP;
AUTOFILTER;
?
老師幫忙寫一下交易指令，要求在寫買的買開倉，寫賣的地方賣平倉，我上面的指令是不是寫的不對啊，開倉的位置不是在寫字的地方。麻煩修改一下，謝謝！
?
?來源:程序化99
這樣改下，
?
MA40:=EMA(C,125),LINETHICK2;?? //輸出MA40:收盤價的125日簡單移動平均
LL:=LLV(LOW,1)/5+LLV(LOW,2)/5+LLV(LOW,2)/5+LLV(LOW,5)/5+LLV(LOW,8)/5;//LL賦值:1日內最低價的最低值/5+2日內最低價的最低值/5+2日內最低價的最低值/5+5日內最低價的最低值/5+8日內最低價的最低值/5
HH:=HHV(HIGH,1)/5+HHV(HIGH,2)/5+HHV(HIGH,2)/5+HHV(HIGH,5)/5+HHV(HIGH,8)/5;//HH賦值:1日內最高價的最高值/5+2日內最高價的最高值/5+2日內最高價的最高值/5+5日內最高價的最高值/5+8日內最高價的最高值/5
H1:= IFELSE(H<REF(H,2)&&REF(H,1)<REF(H,2),REF(H,2),0);//H1賦值: IFELSE(最高價<2日前的最高價并且1日前的最高價<2日前的最高價,2日前的最高價,0)
L1:= IFELSE(L>REF(L,2)&&REF(L,1)>REF(L,2),REF(L,2),0);??? //L1賦值: IFELSE(最低價>2日前的最低價并且1日前的最低價>2日前的最低價,2日前的最低價,0)
H2:=VALUEWHEN(H1>0,H1);??? //H2賦值:如果H1>0,返回H1,否則返回上個輸出值
L2:=VALUEWHEN(L1>0,L1);????? //L2賦值:如果L1>0,返回L1,否則返回上個輸出值
K1:=IFELSE(CLOSE>H2,-3,IFELSE(CLOSE<L2,1,0));//K1賦值:IFELSE(收盤價>H2,-3,IFELSE(收盤價<L2,1,0))
K2:=VALUEWHEN(K1<>0,K1);//K2賦值:如果K1不等于0,返回K1,否則返回上個輸出值
GG:=IFELSE(K2=1,H2,L2);//GG賦值:IFELSE(K2=1,H2,L2)
GG1:=VALUEWHEN(ISLASTBAR,GG);//GG1賦值:如果是否最后一個周期,返回GG,否則返回上個輸出值
TMP1:=K2;//TMP1賦值:K2
W1:=K2;//W1賦值:K2
W2:=OPEN-CLOSE;//W2賦值:開盤價-收盤價
HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE);//HT賦值:IFELSE(收陰線,開盤價,收盤價)
LT:=IFELSE(OPEN<CLOSE,OPEN,CLOSE);//LT賦值:IFELSE(收陽線,開盤價,收盤價)
DRAWTEXT(CROSS(TMP1,0)&&C<MA40,HH,'',FONTSIZE18,COLORGREEN;//當滿足條件TMP1上穿0并且收盤價<MA40時,在HH位置書寫文字,FONTSIZE20,畫綠色
DRAWTEXT(CROSS(0,TMP1)&&C>MA40,LL,'',FONTSIZE18,COLORYELLOW;//當滿足條件0上穿TMP1并且收盤價>MA40時,在LL位置書寫文字,FONTSIZE20,畫黃色
PLAYSOUND(CROSS(TMP1,0)&&C<MA40,'';
PLAYSOUND(CROSS(0,TMP1)&&C>MA40,'';
OCH:=MAX(OPEN,CLOSE);//OCH賦值:開盤價和收盤價的較大值
OCL:=MIN(OPEN,CLOSE);// OCL賦值:開盤價和收盤價的較小值
CROSS(0,TMP1)&&C>MA40,BK;
CROSS(TMP1,0)&&C<MA40,SP;
AUTOFILTER;
?
另外，一開一平過濾模型，開倉和平倉信號是一一對應的，只有開的倉位平掉了才會再次出開倉信號。
?
?來源: www.kzuj.com.cn
老師我想在每次出現買和賣的時候都下單，然后手動平倉，幫我改一下，謝謝
?
?
MA40:EMA(O,125),LINETHICK2;?? //輸出MA40:收盤價的125日簡單移動平均
LL:=LLV(LOW,1)/5+LLV(LOW,2)/5+LLV(LOW,2)/5+LLV(LOW,5)/5+LLV(LOW,8)/5;//LL賦值:1日內最低價的最低值/5+2日內最低價的最低值/5+2日內最低價的最低值/5+5日內最低價的最低值/5+8日內最低價的最低值/5
HH:=HHV(HIGH,1)/5+HHV(HIGH,2)/5+HHV(HIGH,2)/5+HHV(HIGH,5)/5+HHV(HIGH,8)/5;//HH賦值:1日內最高價的最高值/5+2日內最高價的最高值/5+2日內最高價的最高值/5+5日內最高價的最高值/5+8日內最高價的最高值/5
H1:= IFELSE(H<REF(H,2)&&REF(H,1)<REF(H,2),REF(H,2),0);//H1賦值: IFELSE(最高價<2日前的最高價并且1日前的最高價<2日前的最高價,2日前的最高價,0)
L1:= IFELSE(L>REF(L,2)&&REF(L,1)>REF(L,2),REF(L,2),0);??? //L1賦值: IFELSE(最低價>2日前的最低價并且1日前的最低價>2日前的最低價,2日前的最低價,0)
H2:=VALUEWHEN(H1>0,H1);??? //H2賦值:如果H1>0,返回H1,否則返回上個輸出值
L2:=VALUEWHEN(L1>0,L1);????? //L2賦值:如果L1>0,返回L1,否則返回上個輸出值
K1:=IFELSE(CLOSE>H2,-3,IFELSE(CLOSE<L2,1,0));//K1賦值:IFELSE(收盤價>H2,-3,IFELSE(收盤價<L2,1,0))
K2:=VALUEWHEN(K1<>0,K1);//K2賦值:如果K1不等于0,返回K1,否則返回上個輸出值
GG:=IFELSE(K2=1,H2,L2);//GG賦值:IFELSE(K2=1,H2,L2)
GG1:=VALUEWHEN(ISLASTBAR,GG);//GG1賦值:如果是否最后一個周期,返回GG,否則返回上個輸出值
TMP1:=K2;//TMP1賦值:K2
W1:=K2;//W1賦值:K2
W2:=OPEN-CLOSE;//W2賦值:開盤價-收盤價
HT:=IFELSE(OPEN>CLOSE,OPEN,CLOSE);//HT賦值:IFELSE(收陰線,開盤價,收盤價)
LT:=IFELSE(OPEN<CLOSE,OPEN,CLOSE);//LT賦值:IFELSE(收陽線,開盤價,收盤價)
DRAWTEXT(CROSS(TMP1,0)&&C<MA40,HH,'',FONTSIZE18,COLORGREEN;//當滿足條件TMP1上穿0并且收盤價<MA40時,在HH位置書寫文字,FONTSIZE20,畫綠色
DRAWTEXT(CROSS(0,TMP1)&&C>MA40,LL,'',FONTSIZE18,COLORYELLOW;//當滿足條件0上穿TMP1并且收盤價>MA40時,在LL位置書寫文字,FONTSIZE20,畫黃色
PLAYSOUND(CROSS(TMP1,0)&&C<MA40,'';
PLAYSOUND(CROSS(0,TMP1)&&C>MA40,'';
OCH:=MAX(OPEN,CLOSE);//OCH賦值:開盤價和收盤價的較大值
OCL:=MIN(OPEN,CLOSE);// OCL賦值:開盤價和收盤價的較小值
?
?