等级: 新手上路
- 注册:
- 2024-7-16
- 曾用名:
|
楼主 |
发表于 2024-9-10 13:52
|
显示全部楼层
//输出K线图
DRAWKLINE(0.75,COLORRED,1,COLORCYAN,0);
////////////////乖离率的计算/////////////////
//计算加权移动均线
LMA:=EMA(C,N);
//计算价格与均线的偏离程度---乖离率
GLL:=((REF(C,1)-LMA)/LMA)*100,NODRAW;
////////////////ATR的计算/////////////////
//求最高价减去最低价,一个周期前的收盘价减去最高价的绝对值,一个周期前的收盘价减去最低价的绝对值,这三个值中的最大值
TR := MAX(MAX((HIGH-LOW),ABS(REF(CLOSE,1)-HIGH)),ABS(REF(CLOSE,1)-LOW));
//求N个周期内的TR的简单移动平均
ATR := MA(TR,N);
////////////////通道上下界限的计算/////////////////
//计算上下边界限定
HSX:=HV((((H+L)/2)+ATR),N);
LXX:=LV((((H+L)/2)-ATR),N);
KCSX:=LV(HSX,N);
KCXX:=HV(LXX,N);
////////////////止损位置计算/////////////////
//多头止损位置
DZS:=REF(H,1)-2*ATR;
KZS:=REF(L,1)+2*ATR;
////////////////交易程逻辑程序设计/////////////////
//头寸建立
//多头头寸建立条件
BKVOL = 0 && ISUP = 1 && C > KCSX && HSX >= KCSX && LMA >=REF( LMA,(N/2)) && GLL > 0,BK;
//价格上穿上界限以及趋势线已经明显向上运行,开出多头头寸
//空头头寸建立条件
SKVOL = 0 && ISDOWN = 1 && C < KCXX && LXX <= KCXX && LMA <=REF( LMA,(N/2)) && GLL < 0,SK;
//价格下穿下界限以及趋势线已经明显向下运行,开出空头头寸
//止损设计
BKVOL > 0 && C <= DZS,SP;
BKVOL > 0 && C <= REF(DZS,BARSBK),SP;
SKVOL > 0 && C >= KZS,BP;
SKVOL > 0 && C >= REF(DZS,BARSSK),SP;
//一开一平过滤
AUTOFILTER;
老师,帮忙改写上述在金字塔中使用 |
|