等级: 免费版
- 注册:
- 2023-12-13
- 曾用名:
|

楼主 |
发表于 2024-5-21 17:49
|
显示全部楼层
INPUT:X(10,1,100,1),SS(1,1,100,1);
A:=(3*C+L+O+H)/6;//3倍收盘价与最高价、最低价、开盘价之和的均值。
B:=(20*A+19*REF(A,1)+18*REF(A,2)+17*REF(A,3)+16*REF(A,4)+15*REF(A,5)+14*REF(A,6)+13*REF(A,7)+12*REF(A,8)+11*REF(A,9)+10*REF(A,10)+9*REF(A,11)+8*REF(A,12)+7*REF(A,13)+6*REF(A,14)+5*REF(A,15)+4*REF(A,16)+3*REF(A,17)+2*REF(A,18)+REF(A,20))/210;
//对A值做加权均值计算。
D:=MA(B,X);//对B值做10周期平均计算。
NN:=BARSLAST(DATE<>REF(DATE,1))+1;
JO:=VALUEWHEN(NN=1,OPEN);
JG:=HHV(HIGH,NN);
JD:=LLV(LOW,NN);
ZG:=REF(JG,NN);
ZD:=REF(JD,NN);
HZ:TRIMPRICE(JO*2.718/890);
GG:=MAX(JG,ZG);
DD:=MIN(JD,ZD);
a1:=STKINDI('','dkx.dkx',0,3,0);
a2:=STKINDI('','dkx.dkx',0,3,-1);
cond5:a1>0 and a2<0;//表示15分钟金叉
cond6:a1<0 and a2>0;//表示15分钟死叉
COND1:=CROSS(GG-HZ,C);
COND2:=CROSS(C,GG-HZ);
COND3:=CROSS(DD+HZ,C);
COND4:=CROSS(C,DD+HZ);
if cond5 and (cond2 or cond4) then BEGIN
BUY(HOLDING=0,1,MARKET);
END
if cond6 and (cond1 or cond3)then begin
BUYSHORT(HOLDING=0,1,MARKET);
END
if cond6 then BEGIN
SELL(1,0,MARKET);
END
if cond5 then BEGIN
sellshort(1,0,MARKET);
END
补充内容 (2024-5-21 17:51):
就是1分钟周期引用15分DKX的金叉死叉, |
|