ema均线指标编写问题

阿白49510

麻烦老师编写一下定义一条60日ema均线，开盘价和收盘价大于均线开多，开盘价和收盘价小于均线开空，


补充内容 (2023-6-2 09:02):
反手模型

技术009

[PEL] 复制代码

ema60:ema(c,60);

kd:min(c,o)>ema60;
kk:max(c,o)<ema60;

if kd then 
begin 
sellshort(1,holding,market);
buy(holding=0,1,market);	
end 

if kk then 
begin 
sell(1,holding,market);
buyshort(holding=0,1,market);	
end 

阿白49510

技术009 发表于 2023-6-2 09:24
[mw_shl_code=pel,true]ema60:ema(c,60);

kd:min(c,o)>ema60;

麻烦老师重新编写谢谢，
1，日线k线收盘价在60ema均线上方运行时，并且昨日日线k线最高价大于前日日线k线最高价视为趋势模式，今天5分钟级别开盘价和收盘价都大于5分钟级别的60ema均线时开多单，开盘价和收盘价都小于5分钟级别的60ema均线时平多单不开空。
2，日线k线收盘价在60ema均线上方运行时，并且昨日日线k线最高价小于前日日线k线最高价视为震荡模式，今天5分钟级别开盘价和收盘价都大于5分钟级别的60ema均线时开多单，开盘价和收盘价都小于5分钟级别的60ema均线时平多单开空单。
3，日线k线收盘价在60ema均线下方运行时，并且昨日日线k线最低价小于前日日线k线最低价视为趋势模式，今天5分钟级别开盘价和收盘价都小于5分钟级别的60ema均线时开空单，开盘价和收盘价都大于5分钟级别的60ema均线时平空单不开多。
4，日线k线收盘价在60ema均线下方运行时，并且昨日日线k线最低价小于前日日线k线最低价视为震荡模式，今天5分钟级别开盘价和收盘价都小于5分钟级别的60ema均线时开空单，开盘价和收盘价都大于5分钟级别的60ema均线时平空单开多单。

技术009

“日线k线收盘价在60ema” 这里的60ema是指当前五分钟周期的ema还是日线本身的60周期ema呢？

阿白49510

日线的

技术009

[PEL] 复制代码

C1:=CALLSTOCK('',vtCLOSE,6,0);//日线收盘价

H1:=CALLSTOCK('',vtHIGH,6,-1);//昨日最高价
H2:=CALLSTOCK('',vtHIGH,6,-2);//前日最高价

L1:=CALLSTOCK('',vtLOW,6,-1);//昨日最低价
L2:=CALLSTOCK('',vtLOW,6,-2);//前日最低价

ema60:ema(c,60);
ema60_d:"EXPMA.M1#DAY"(60);//日线ema60 
 
kd:min(c,o)>ema60;
kk:max(c,o)<ema60;
 
con1:H1>H2 and C1>ema60_d;//多趋势模式
con2:H1<H2 and C1>ema60_d;//多震荡模式

con3:L1<L2 AND C1<ema60_d;//空趋势模式
con4:L1>L2 AND C1<ema60_d;//空震荡模式

if con1  then 
begin
buy(kd and holding=0,1,market);	 
sell(kk,holding,market);
end   

if con2 then 
begin
buy(kd and holding=0,1,market);	 
sell(kk,holding,market);
buyshort(kk and holding=0,1,market);
end   

 
if con3  then 
begin
buyshort(kk and holding=0,1,market);	 
sell(kd,holding,market);
end   

if con4 then 
begin
buyshort(kk and holding=0,1,market);	 
sellshort(kd,holding,market);
buy(kd and holding=0,1,market);
end   

阿白49510

老师不对呀没有信号

阿白49510

老师意思就是日线多头排列时只作日内多单，前一日线K线不创新高时多空都做，做空反之

技术009

补一个收盘平仓动作：
if time=CLOSETIME(0) then
begin
sell(1,holding,market);
sellshort(1,holding,market);
END

阿白49510

麻烦老师修改一下这个指标要求是，这个指标日线多头时只做5分钟级别的多单，5分钟出现反转信号平多单不开空，5分钟级别出现空转多就执行多单出现多转空就平多，日线空头时只执行空信号出现多信号则平仓。
VV:=IF(V>MA(V,5),NULL,V);
DRAWSL(V>MA(VV,SUMBARS(NOT(V>MA(V,5)),5))*3&&ISUP,L,0,10,0,COLORRED);
DRAWSL(V>MA(VV,SUMBARS(NOT(V>MA(V,5)),5))*3&&ISDOWN,H,0,10,0,COLORGREEN);


H11:=HIGH;

L11:=LOW;

A:=IFELSE(HIGH>=REF(HIGH,1)&&HIGH>=REF(HIGH,2)&&HIGH>=REF(HIGH,3) &&HIGH>=REF(HIGH,4)&&HIGH>=REF(HIGH,5),LOW,0);

B:=IFELSE(LOW<=REF(LOW,1)&&LOW<=REF(LOW,2)&&LOW<=REF(LOW,3) &&LOW<=REF(LOW,4)&&LOW<=REF(LOW,5),HIGH,888888);

P1:=IFELSE(A>REF(L11,1),REF(L11,1),0);

P2:=IFELSE(A>REF(L11,2)&&A<=REF(L11,1),REF(L,2),0);

P3:=IFELSE(A>REF(L11,3)&&A<=REF(L11,1)&&A<=REF(L11,2),REF(L11,3),0);

P4:=IFELSE(A>REF(L11,4)&&A<=REF(L11,1)&&A<=REF(L11,2)&&A<=REF(L11,3),REF(L11,4),0);

P5:=IFELSE(A>REF(L11,5)&&A<=REF(L11,1)&&A<=REF(L11,2)&&A<=REF(L11,3)&&A<=REF(L11,4),REF(L11,5),0);

P6:=IFELSE(A>REF(L11,6)&&A<=REF(L11,1)&&A<=REF(L11,2)&&A<=REF(L11,3)&&A<=REF(L11,4)&&A<=REF(L11,5),REF(L11,6),0);

P7:=IFELSE(A>REF(L11,7)&&A<=REF(L11,1)&&A<=REF(L11,2)&&A<=REF(L11,3)&&A<=REF(L11,4)&&A<=REF(L11,5)&&A<=REF(L11,6),REF(L11,7),0);

P8:=IFELSE(A>REF(L11,8)&&A<=REF(L11,1)&&A<=REF(L11,2)&&A<=REF(L11,3)&&A<=REF(L11,4)&&A<=REF(L11,5)&&A<=REF(L11,6)&&A<=REF(L11,7),REF(L11,8),0);

P9:=IFELSE(A>REF(L11,9)&&A<=REF(L11,1)&&A<=REF(L11,2)&&A<=REF(L11,3)&&A<=REF(L11,4)&&A<=REF(L11,5)&&A<=REF(L11,6)&&A<=REF(L11,7)&&A<=REF(L11,8),REF(L11,9),0);

P10:=IFELSE(A>REF(L11,10)&&A<=REF(L11,1)&&A<=REF(L11,2)&&A<=REF(L11,3)&&A<=REF(L11,4)&&A<=REF(L11,5)&&A<=REF(L11,6)&&A<=REF(L11,7)&&A<=REF(L11,8)&&A<=REF(L11,9),REF(L11,10),0);

AA:=P1+P2+P3+P4+P5+P6+P7+P8+P9+P10;

PP1:=IFELSE(AA>REF(L11,1),REF(L11,1),0);

PP2:=IFELSE(AA>REF(L11,2)&&AA<=REF(L11,1),REF(L11,2),0);

PP3:=IFELSE(AA>REF(L11,3)&&AA<=REF(L11,1)&&AA<=REF(L11,2),REF(L11,3),0);

PP4:=IFELSE(AA>REF(L11,4)&&AA<=REF(L11,1)&&AA<=REF(L11,2)&&AA<=REF(L11,3),REF(L11,4),0);

PP5:=IFELSE(AA>REF(L11,5)&&AA<=REF(L11,1)&&AA<=REF(L11,2)&&AA<=REF(L11,3)&&AA<=REF(L11,4),REF(L11,5),0);

PP6:=IFELSE(AA>REF(L11,6)&&AA<=REF(L11,1)&&AA<=REF(L11,2)&&AA<=REF(L11,3)&&AA<=REF(L11,4)&&AA<=REF(L11,5),REF(L11,6),0);

PP7:=IFELSE(AA>REF(L11,7)&&AA<=REF(L11,1)&&AA<=REF(L11,2)&&AA<=REF(L11,3)&&AA<=REF(L11,4)&&AA<=REF(L11,5)&&AA<=REF(L11,6),REF(L11,7),0);

PP8:=IFELSE(AA>REF(L11,8)&&AA<=REF(L11,1)&&AA<=REF(L11,2)&&AA<=REF(L11,3)&&AA<=REF(L11,4)&&AA<=REF(L11,5)&&AA<=REF(L11,6)&&AA<=REF(L11,7),REF(L11,8),0);

PP9:=IFELSE(AA>REF(L11,9)&&AA<=REF(L11,1)&&AA<=REF(L11,2)&&AA<=REF(L11,3)&&AA<=REF(L11,4)&&AA<=REF(L11,5)&&AA<=REF(L11,6)&&AA<=REF(L11,7)&&AA<=REF(L11,8),REF(L11,9),0);

PP10:=IFELSE(AA>REF(L11,10)&&AA<=REF(L11,1)&&AA<=REF(L11,2)&&AA<=REF(L11,3)&&AA<=REF(L11,4)&&AA<=REF(L11,5)&&AA<=REF(L11,6)&&AA<=REF(L11,7)&&AA<=REF(L11,8)&&AA<=REF(L11,9),REF(L11,10),0);

AAA:=PP1+PP2+PP3+PP4+PP5+PP6+PP7+PP8+PP9+PP10;

C11:=VALUEWHEN(AAA>0,AAA);

T1:=IFELSE(B<REF(H11,1),REF(H11,1),0);

T2:=IFELSE(B<REF(H11,2)&&B>=REF(H11,1),REF(H11,2),0);

T3:=IFELSE(B<REF(H11,3)&&B>=REF(H11,1)&&B>=REF(H11,2),REF(H11,3),0);

T4:=IFELSE(B<REF(H11,4)&&B>=REF(H11,1)&&B>=REF(H11,2)&&B>=REF(H11,3),REF(H11,4),0);

T5:=IFELSE(B<REF(H11,5)&&B>=REF(H11,1)&&B>=REF(H11,2)&&B>=REF(H11,3)&&B>=REF(H11,4),REF(H11,5),0);

T6:=IFELSE(B<REF(H11,6)&&B>=REF(H11,1)&&B>=REF(H11,2)&&B>=REF(H11,3)&&B>=REF(H11,4)&&B>=REF(H11,5),REF(H11,6),0);

T7:=IFELSE(B<REF(H11,7)&&B>=REF(H11,1)&&B>=REF(H11,2)&&B>=REF(H11,3)&&B>=REF(H11,4)&&B>=REF(H11,5)&&B>=REF(H11,6),REF(H11,7),0);

T8:=IFELSE(B<REF(H11,8)&&B>=REF(H11,1)&&B>=REF(H11,2)&&B>=REF(H11,3)&&B>=REF(H11,4)&&B>=REF(H11,5)&&B>=REF(H11,6)&&B>=REF(H11,7),REF(H11,8),0);

T9:=IFELSE(B<REF(H11,9)&&B>=REF(H11,1)&&B>=REF(H11,2)&&B>=REF(H11,3)&&B>=REF(H11,4)&&B>=REF(H11,5)&&B>=REF(H11,6)&&B>=REF(H11,7)&&B>=REF(H11,8),REF(H11,9),0);

T10:=IFELSE(B<REF(H11,10)&&B>=REF(H11,1)&&B>=REF(H11,2)&&B>=REF(H11,3)&&B>=REF(H11,4)&&B>=REF(H11,5)&&B>=REF(H11,6)&&B>=REF(H11,7)&&B>=REF(H11,8)&&B>=REF(H11,9),REF(H11,10),0);

BB:=IFELSE((T1+T2+T3+T4+T5+T6+T7+T8+T9+T10)=0,888888,T1+T2+T3+T4+T5+T6+T7+T8+T9+T10);

TT1:=IFELSE(BB<REF(H11,1),REF(H11,1),0);

TT2:=IFELSE(BB<REF(H11,2)&&BB>=REF(H11,1),REF(H11,2),0);

TT3:=IFELSE(BB<REF(H11,3)&&BB>=REF(H11,1)&&BB>=REF(H11,2),REF(H11,3),0);

TT4:=IFELSE(BB<REF(H11,4)&&BB>=REF(H11,1)&&BB>=REF(H11,2)&&BB>=REF(H11,3),REF(H11,4),0);

TT5:=IFELSE(BB<REF(H11,5)&&BB>=REF(H11,1)&&BB>=REF(H11,2)&&BB>=REF(H11,3)&&BB>=REF(H11,4),REF(H11,5),0);

TT6:=IFELSE(BB<REF(H11,6)&&BB>=REF(H11,1)&&BB>=REF(H11,2)&&BB>=REF(H11,3)&&BB>=REF(H11,4)&&BB>=REF(H11,5),REF(H11,6),0);

TT7:=IFELSE(BB<REF(H11,7)&&BB>=REF(H11,1)&&BB>=REF(H11,2)&&BB>=REF(H11,3)&&BB>=REF(H11,4)&&BB>=REF(H11,5)&&BB>=REF(H11,6),REF(H11,7),0);

TT8:=IFELSE(BB<REF(H11,8)&&BB>=REF(H11,1)&&BB>=REF(H11,2)&&BB>=REF(H11,3)&&BB>=REF(H11,4)&&BB>=REF(H11,5)&&BB>=REF(H11,6)&&BB>=REF(H11,7),REF(H11,8),0);

TT9:=IFELSE(BB<REF(H11,9)&&BB>=REF(H11,1)&&BB>=REF(H11,2)&&BB>=REF(H11,3)&&BB>=REF(H11,4)&&BB>=REF(H11,5)&&BB>=REF(H11,6)&&BB>=REF(H11,7)&&BB>=REF(H11,8),REF(H11,9),0);

TT10:=IFELSE(BB<REF(H11,10)&&BB>=REF(H11,1)&&BB>=REF(H11,2)&&BB>=REF(H11,3)&&BB>=REF(H11,4)&&BB>=REF(H11,5)&&BB>=REF(H11,6)&&BB>=REF(H11,7)&&BB>=REF(H11,8)&&BB>=REF(H11,9),REF(H11,10),0);

BBB:=TT1+TT2+TT3+TT4+TT5+TT6+TT7+TT8+TT9+TT10;

D:=VALUEWHEN(BBB>0,BBB);

UD:=IFELSE(CLOSE>D&&REF(CLOSE,1)<=D,1,IFELSE(CLOSE<C11&&REF(CLOSE,1)>=C11,-3,0));

K:=VALUEWHEN(UD<>0,UD);

G:=IFELSE(K=1,C11,D),COLORRED;

POLYLINE(LOW>0,G,COLORYELLOW);

G1:=VALUEWHEN(ISLASTBAR,G);

DRAWNUMBER(LOW>0,G1,G1,0,COLORYELLOW);

DRAWCOLORKLINE(C>G,COLORRED,1);

DRAWCOLORKLINE(C>G&&ISDOWN,COLORRED,0);

DRAWCOLORKLINE(C<G,COLORGREEN,1);

DRAWCOLORKLINE(C<G&&ISDOWN,COLORGREEN,0);


DRAWCOLORKLINE(C=G,COLORYELLOW,1);

DRAWCOLORKLINE(C=G&&ISDOWN,COLORYELLOW,0);


DRAWLINE3(C>G,G,0,1,REF(G,1),1,0),COLORRED,LINETHICK2;

DRAWLINE3(C<G,G,0,1,REF(G,1),1,0),COLORGREEN,LINETHICK2;

DRAWLINE3(C=G,G,0,1,REF(G,1),1,0),COLORYELLOW,LINETHICK2;



DRAWTEXT(CROSS(C,G),L,'买'),COLORRED,FONTSIZE25,VALIGN0;

DRAWTEXT(CROSSDOWN(C,G),H,'卖'),COLORGREEN,FONTSIZE25;


补充内容 (2023-6-2 16:14):
要求就是显示折线变色K线变色，显示买卖字迹标注