现货海

搜索
1框架
 
 
查看: 651|回复: 0

[指标分享] 各位大神们请帮我修改成倚天的指标,谢谢A

[复制链接]
匿名
匿名  发表于 2013-8-21 13:16:42 |阅读模式
N:=(27);
开盘价:open,linethick0;
开盘价1:=REF(open,1);
最高价:high,linethick0;
最高价1:=REF(high,1);
最低价:low,linethick0;
最低价1:=REF(low,1);
收盘价:CLOSE,linethick0;
收盘价1:=REF(CLOSE,1);
A1:=REF(开盘价,1);
A2:=ABS((REF(收盘价,1)-A1)/A1);
A3:=ABS((REF(最高价,1)-A1)/A1);
A4:=ABS((REF(最低价,1)-A1)/A1);
B1:=ABS((A2+A3+A4)/3);
B2:=开盘价*B1;
AA:=最高价1;
BB:=最低价1;
CC:=开盘价1;
DD:=收盘价1;
EE:=(AA+BB+CC+2*DD)/5;
AAA:=EE+(AA-BB);
BBB:=2*EE-BB;
CCC:=2*EE-AA;
DDD:=EE-(AA-BB);
上升突破价:=AAA;
上升阻力价:=BBB;
下跌支撑价:=CCC;
下跌反转价:=DDD;
EEE:=(EE+上升突破价+上升阻力价+下跌支撑价+下跌反转价)/5;
FFF:=(EEE+开盘价)/2;
预测低一:开盘价-B2,linethick0;
预测低二:(预测低一+FFF)/2,linethick0;
预测高一:开盘价+B2,linethick0;
预测高二:MA(REF(HIGH,1)/REF(CLOSE,2),N)*REF(CLOSE,1),linethick0;
差额一:=预测低一-low;
差额二:=预测低二-low;
差比一:=(差额一/low)*100;
差比二:=(差额二/low)*100;
pp:=0.0115;
成本价:=预测低二*1.006;
卖出价:成本价*(1+pp),linethick0;
高低差一:=预测高一-预测低二;
高低差二:=预测高二-预测低二;
差价比一:=卖出价/预测高一*100;
差价比二:=卖出价/预测高二*100;
今日高低比:=(最高价-最低价)/最高价*100;
昨日高低比:=(最高价1-最低价1)/最高价1*100;
DRAWTEXTREL(10,60,
★ 股票买入操作数据 ★ ),coloryellow,linethick1;
DRAWTEXTREL(420,60, ★T + 0 操作数据★
目前纯利设定为:+NUMTOSTRN(ref(pp*100,0),2)+%+ 股价高低比:
+NUMTOSTRN(ref(今日高低比,0),2)+%),coloryellow,linethick1;
DRAWTEXTREL(10,60,最低价:+NUMTOSTRN(ref(最低价,0),2)
),colorffffff,linethick2;
DRAWTEXTREL(320,60,
最高价:+NUMTOSTRN(ref(最高价,0),2)),colorffffff,linethick2;
DRAWTEXTREL(10,200,买入价预测
预测价 目前差价 目前差比),COLORD3A9FF,linethick1;
DRAWTEXTREL(10,350, 预测低一
+NUMTOSTRN(ref(预测低一,0),2)+元 + NUMTOSTRN(ref(差额一,0),2)+元 +
NUMTOSTRN(ref(差比一,0),2)+%),colorffffff,linethick1;
DRAWTEXTREL(10,470, 预测低二
+NUMTOSTRN(ref(预测低二,0),2)+元 + NUMTOSTRN(ref(差额二,0),2)+元 +
NUMTOSTRN(ref(差比二,0),2)+%),colorffffff,linethick1;
DRAWTEXTREL(330,200,卖出价预测
预测格 目前高低差 目前高低比 ★ 操作价格),COLORD3A9FF,linethick1;
DRAWTEXTREL(330,350, 预测高一
+NUMTOSTRN(ref(预测高一,0),2)+元 + NUMTOSTRN(ref(高低差一,0),2)+元 +
NUMTOSTRN(ref(差价比一,0),2)+%),colorffffff,linethick1;
DRAWTEXTREL(330,470, 预测高二
+NUMTOSTRN(ref(预测高二,0),2)+元 + NUMTOSTRN(ref(高低差二,0),2)+元 +
NUMTOSTRN(ref(差价比二,0),2)+%),colorffffff,linethick1;
DRAWTEXTREL(600,350, 卖出价:
+NUMTOSTRN(ref(卖出价,0),2)+元),coloryellow,linethick1;
DRAWTEXTREL(600,470, 买回价:
+NUMTOSTRN(ref(预测低二,0),2)+元),coloryellow,linethick1;
ssu1:=卖出价<预测高二 or
卖出价=预测高二;
ssu2:=卖出价>预测高二;;
IF BARSTATUS=2 AND ssu1 THEN BEGIN
DRAWTEXTREL(750,250, ★ 设定成功),COLORRED,linethick1;
END
ELSE
IF
BARSTATUS=2 AND ssu2 THEN BEGIN
DRAWTEXTREL(750,250, ●
设定失败),COLORgreen,linethick1;
END
su1:=预测低二>low and
卖出价<high;
su2:=预测低二>low and 卖出价=high;
su3:=预测低二=low and
卖出价<high;
su4:=预测低二=low and 卖出价=high;
su5:=预测低二<low;
IF
BARSTATUS=2 AND su1 THEN BEGIN
DRAWTEXTREL(750,370, ★
操作成功),COLORRED,linethick1;
END
ELSE
IF BARSTATUS=2 AND su2 THEN BEGIN
DRAWTEXTREL(750,370, ★ 操作成功),COLORRED,linethick1;
END
ELSE
IF
BARSTATUS=2 AND su3 THEN BEGIN
DRAWTEXTREL(750,370, ★
操作成功),COLORRED,linethick1;
END
ELSE
IF BARSTATUS=2 AND su4 THEN BEGIN
DRAWTEXTREL(750,370, ★ 操作成功),COLORRED,linethick1;
END
ELSE
IF
BARSTATUS=2 AND su5 THEN BEGIN
DRAWTEXTREL(750,370, ●
买回操作失败),COLORgreen,linethick1;
END
su6:=卖出价>high;
IF BARSTATUS=2 AND
su6 THEN BEGIN
DRAWTEXTREL(750,480, ●
卖出操作失败),COLORgreen,linethick1;
END
顶线:=80;
预测一:=-35;
预测二:=-50;
失败:=-65;
底线:=-75;
DRAWTEXT(DISPSTATUS=2,顶线,
80),COLORred,ALIGN0;
DRAWTEXT(DISPSTATUS=2,预测一,
预测一),COLORred,ALIGN0;
DRAWTEXT(DISPSTATUS=2,预测二,
预测二),COLORyellow,ALIGN0;
DRAWTEXT(DISPSTATUS=2,失败,
未到位),COLORgreen,ALIGN0;
DRAWTEXT(DISPSTATUS=2,底线,
-75),COLORgreen,ALIGN0;
DRAWTEXT(low<预测低一,-35,☆),COLORred,ALIGN1;
DRAWTEXT(low<预测低二,-50,☆),COLORyellow,ALIGN1;
DRAWTEXT(low>预测低二,-65,●),COLORgreen,ALIGN1;
Amod:=MOD(CURRENTTIME,2);
DRAWTEXT(DISPSTATUS=2
and Amod=0,70,预测提示),colorffffff;
DRAWTEXT(DISPSTATUS=2 and
Amod=1,70,提示预测),coloryellow;
DRAWTEXT(DISPSTATUS=2 and low<预测低一 and
Amod=0,10,预测一 ☆),colorred;
DRAWTEXT(DISPSTATUS=2 and low<预测低一 and
Amod=1,10,预测一 ☆),coloryellow;
DRAWTEXT(DISPSTATUS=2 and low<预测低二 and
Amod=0,-10,预测二 ☆),colorred;
DRAWTEXT(DISPSTATUS=2 and low<预测低二 and
Amod=1,-10,预测二 ☆),coloryellow;
DRAWTEXT(DISPSTATUS=2 and low>预测低一 and
Amod=0,10,预测一 ●),colorgreen;
DRAWTEXT(DISPSTATUS=2 and low>预测低一 and
Amod=1,10,预测一 ●),colorffffff;
DRAWTEXT(DISPSTATUS=2 and low>预测低二 and
Amod=0,-10,预测二 ●),colorgreen;
DRAWTEXT(DISPSTATUS=2 and low>预测低二 and
Amod=1,-10,预测二 ●),colorffffff;
DRAWTEXT(DISPSTATUS=2 and 卖出价<high and
Amod=0,50,卖出价 ☆),colorred;
DRAWTEXT(DISPSTATUS=2 and 卖出价<high and
Amod=1,50,卖出价 ☆),coloryellow;
DRAWTEXT(DISPSTATUS=2 and 卖出价>high and
Amod=0,50,卖出价 ●),colorgreen;
DRAWTEXT(DISPSTATUS=2 and 卖出价>high and
Amod=1,50,卖出价 ●),colorffffff;
DRAWTEXT(DISPSTATUS=2 and 预测低二>low and
Amod=0,30,买回价 ☆),colorred;
DRAWTEXT(DISPSTATUS=2 and 预测低二>low and
Amod=1,30,买回价 ☆),coloryellow;
DRAWTEXT(DISPSTATUS=2 and 预测低二<low and
Amod=0,30,买回价 ●),colorgreen;
DRAWTEXT(DISPSTATUS=2 and 预测低二<low and
Amod=1,30,买回价 ●),colorffffff;
回复

使用道具 举报

发表回复

您需要登录后才可以回帖 登录 | 立即注册

本版积分规则

快速回复 返回顶部 返回列表