版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领
文档简介
1、Good is good, but better carries it.精益求精,善益求善。MT4可视化自动报警器指标,可自动监视一有行情就报警-MT4可视化自动报警器谁愿意总是盯盘,不如看看电影打打网游啥的,就跟老婆亲热会也行啊MT4的报警功能已经很强大了,但是总是要设置,要输入阀值,很麻烦的说。没办法,自编了一个报警器指标,说明如下:有两种报警方式:一种手动,指示器拖到哪是哪;一种自动,以当前价的百分比幅度自动设置,触发后移动到新的位置。这样就可以实现全自动连续报警,只要有行情,它就会响。参数设置:AlertTimes=5:同一位置最大报警次数,不能老是响是不?ReAlertSeconds
2、=10:报警间隔时间(秒),同样不能老是响是不?AutoMove=true:设定到位置后是否自动移动到新的位置,以当前价加减下一个参数的百分比来确定;要说明的是,即使它自动移动到了新位置,仍然可以手动移动到你想要的位置;AutoMoveRange0.01;自动移动到新位置距离当前收盘价的百分比幅度。以下是源码,共同学习交流哈:/+-+/|可视化报警器.mq4|/|Peiwei|/|2660675|/+-+#propertycopyrightPeiwei#propertylink2660675#propertyindicator_chart_window/+-+/|Customindicator
3、initializationfunction|/+-+externcolorAlertArrowUpColor=Brown;externcolorAlertArrowDownColor=Green;externintAlertTimes=5;/报警次数完成后,移动物件,恢复设定次数;externintReAlertSeconds=10;/间隔秒数;externboolAutoMove=true;externdoubleAutoMoveRange=0.01;/按收盘价的百分比幅度移动到新位置intAlert1Times,Alert2Times;doubleAlert1LastPrice,Aler
4、t2LastPrice;datetimeAlert1LastTime,Alert2LastTime;intXShift=10;intinit()/-indicators/-doubletmpPrice;if(ObjectFind(AlertArrow1)=-1)ObjectCreate(AlertArrow1,OBJ_ARROW,0,0,0,0,0);ObjectCreate(AlertArrow2,OBJ_ARROW,0,0,0,0,0);tmpPrice=Close0;/ObjectSet(AlertArrow1,OBJPROP_STYLE,STYLE_DASHDOT);ObjectSet
5、(AlertArrow1,OBJPROP_COLOR,AlertArrowUpColor);ObjectSet(AlertArrow1,OBJPROP_PRICE1,tmpPrice*(1+AutoMoveRange);ObjectSet(AlertArrow1,OBJPROP_TIME1,Time0+Period()*5*60);ObjectSetText(上涨报警指示器,AlertArrow1);/ObjectSet(AlertArrow2,OBJPROP_STYLE,STYLE_DASHDOT);ObjectSet(AlertArrow2,OBJPROP_COLOR,AlertArrow
6、DownColor);ObjectSet(AlertArrow2,OBJPROP_PRICE1,tmpPrice*(1-AutoMoveRange);ObjectSet(AlertArrow2,OBJPROP_TIME1,Time0+Period()*5*60);ObjectSetText(下跌报警指示器2,AlertArrow2);Alert1Times=AlertTimes;Alert2Times=AlertTimes;Alert1LastTime=TimeLocal();Alert2LastTime=TimeLocal();return(0);/+-+/|Customindicatord
7、einitializationfunction|/+-+intdeinit()/-/ObjectDelete(AlertArrow1+AlertArrowNo);/-return(0);/+-+/|Customindicatoriterationfunction|/+-+intstart()/-doubleAlertArrow1Price=ObjectGet(AlertArrow1,OBJPROP_PRICE1);doubleAlertArrow2Price=ObjectGet(AlertArrow2,OBJPROP_PRICE1);if(Alert1LastPrice!=AlertArrow
8、1Price)Alert1Times=AlertTimes;Alert1LastPrice=AlertArrow1Price;if(Alert2LastPrice!=AlertArrow2Price)Alert2Times=AlertTimes;Alert2LastPrice=AlertArrow2Price;if(Close0=AlertArrow1Price&(TimeLocal()-Alert1LastTime)=ReAlertSeconds)if(Alert1Times0)PlaySound(alert.wav);/Alert(AlertArrow1:价格触及报警线!剩余提醒次数:+A
9、lert1Times);/-Debug-Alert1Times-;Alert1LastTime=TimeLocal();if(AutoMove&Alert1Times=0)ObjectSet(AlertArrow1,OBJPROP_PRICE1,Close0*(1+AutoMoveRange);ObjectSet(AlertArrow1,OBJPROP_TIME1,Time0+Period()*XShift*60);ObjectSet(AlertArrow2,OBJPROP_PRICE1,Close0*(1-AutoMoveRange);ObjectSet(AlertArrow2,OBJPRO
10、P_TIME1,Time0+Period()*XShift*60);if(Close0=ReAlertSeconds)if(Alert2Times0)PlaySound(alert2.wav);/Alert(AlertArrow2:价格触及报警线!剩余提醒次数:+Alert2Times);/-Debug-Alert2Times-;Alert2LastTime=TimeLocal();if(AutoMove&Alert2Times=0)ObjectSet(AlertArrow1,OBJPROP_PRICE1,Close0*(1+AutoMoveRange);ObjectSet(AlertArrow1,OBJPROP_TIME1,Time0+P
温馨提示
- 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
- 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
- 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
- 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
- 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
- 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
- 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。
最新文档
- 幼儿园月教学计划模板
- 医院护士年度计划范本
- 大班表演游戏计划
- 农村综治宣传月的工作计划
- 度班组长工作计划
- 客服员工作计划
- 《GDP与GNP的区别》课件
- 医院医保年终工作计划总结
- 《行为应用分析》课件
- 2020版 沪教版 高中音乐 必修1 音乐鉴赏 下篇《第八单元 不忘初心》大单元整体教学设计2020课标
- 人美版初中美术知识点汇总八年级全册
- 公路路面毕业论文中英文资料外文翻译文献
- 区域经理岗位职责
- 临建施工方案1
- 训练及产说改鑫瑞发布会流程
- 产业园EPC总承包工程项目施工组织设计
- 大学生安全教育智慧树知到答案章节测试2023年中国海洋大学
- 学校安全教育珍爱生命-拒绝打架斗殴课件
- YY/T 0698.7-2009最终灭菌医疗器械包装材料第7部分:环氧乙烷或辐射灭菌无菌屏障系统生产用可密封涂胶纸要求和试验方法
- GB/T 40276-2021柔巾
- GB/T 3750-2008卡套式铰接管接头
评论
0/150
提交评论