
等级: 新手上路
- 注册:
- 2023-4-15
- 曾用名:
|
您好,老师为了定义这个转向点,我绞尽脑汁,下面这个思路不用未来函数,您教我怎么样修改才行?
INPUT:N1(1,1,5,1);
INPUT:N2(2,1,30,1);
N3:=N1/N2;//转向点百分比参数
VARIABLE:BF:=C,BG:=C,ZQ:=30; //变量波峰波谷,另这个周期ZQ先预定为30,随后可变,行不行/要怎么样才行?
QG1:=HHV(HIGH,ZQ);
QD1:=LLV(LOW,ZQ);//取得周期内最高价最低价
QG1ZQ:=HHVBARS(HIGH,ZQ);
QD1ZQ:=LLVBARS(LOW,ZQ);//最高价和最低价到当前周期
YGJ:=HHV(HIGH,QD1ZQ);
YDJ:=LLV(LOW,QG1ZQ); //前面最高价最低价周期内的次最高价最低价
YGZQ:=HHVBARS(HIGH,QD1ZQ);
YDZQ:=LLVBARS(LOW,QG1ZQ); //次最高价最低价到当前的周期
YGHGJ:=HHV(HIGH,YGZQ);
YGHDJ:=LLV(LOW,YGZQ); //次最高价到当前的周期的最新最高价最低价
YDHGJ:=HHV(HIGH,YDZQ);
YDHDJ:=LLV(LOW,YDZQ);//次最低价到当前的周期的最新最高价最低价
IF QG1ZQ>QD1ZQ AND QD1<YGJ*(1-N3/100) THEN BEGIN
BG:=QD1;
END
IF QG1ZQ>QD1ZQ AND YGHDJ<YGHGJ*(1-N3/100) THEN BEGIN
BF:=YGHGJ;
END
IF QG1ZQ>QD1ZQ AND BF:=YGHGJ THEN BEGIN
ZQ:=QD1ZQ;
END
IF QD1ZQ>QG1ZQ AND QG1*(1-N3/101)>YDJ THEN BEGIN
BF:=QG1;
END
IF QD1ZQ>QG1ZQ AND YDHGJ*(1-N3/101)>YDHDJ THEN BEGIN
BG:=YDHDJ;
END
IF QD1ZQ>QG1ZQ AND BG:=YDHDJ THEN BEGIN
ZQ:=QG1ZQ;
END
GZD:rounds(BF,0);
DZD:rounds(BG,0); //得出高转点低转点
|
|