几个非常好用的函数，编程必备

sanbuxiaozhu · 发表于 2019-6-28 21:41

//获取最后一单已平仓单子的信息
double getLastHistoryOrder(int type, datetime &opentime, datetime &closetime, double &openprice,double &closeprice){ //获取最后一单已平仓单子的信息，Lots，OpenTime，CloseTime,OpenPrice,ClosePrice
opentime = 0;
closetime = 0;
openprice = 0;
closeprice = 0;
double lots = 0;
int t = OrdersHistoryTotal();
for(int i=0;i<t-1;i++)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_HISTORY)==true)
{
if(OrderSymbol()==Symbol() && OrderType()==type)
{
if(opentime < OrderOpenTime()){
opentime = OrderOpenTime();
closetime = OrderCloseTime();
openprice = OrderOpenPrice();
closeprice = OrderClosePrice();
lots = OrderLots();
}
}
}
}
return(lots);
}
//获取最后一单开仓单子的信息
double getLastOrder(int type, datetime &opentime,double &openprice){ //获取最后一单的信息，Lots，OpenTime，OpenPrice，
opentime = 0;
openprice = 0;
double lots;
int t=OrdersTotal();
for(int i=t-1;i>=0;i--)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==true)
{
if(OrderSymbol()==Symbol() && OrderType() == type)
{
if(opentime < OrderOpenTime()){
opentime = OrderOpenTime();
openprice = OrderOpenPrice();
lots = OrderLots();
}
}
}
}
return(lots);
}

复制代码

sanbuxiaozhu · 发表于 2019-6-28 21:42

//统计多单个数，总手数，最后一单开仓价，手数，开仓时间，魔术号
double 统计多单(double &lastOrderOpenPrice,double &lots,double &lot,int &magic,datetime &lastOrderOpenTime)
{
int buydanshu=0;
lastOrderOpenPrice = 0.0;
lots = 0.0;
lot = 0.0;
magic = 0;
lastOrderOpenTime = 0;
for(int i=0;i<OrdersTotal();i++)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==true)
{
if(OrderSymbol()==Symbol() && OrderType()==OP_BUY)
{
buydanshu++;
lots = lots + OrderLots();
magic = OrderMagicNumber();
if(lastOrderOpenTime < OrderOpenTime()){
lastOrderOpenTime = OrderOpenTime();
lastOrderOpenPrice = OrderOpenPrice();
lot = OrderLots();
}
}
}
}
return(buydanshu);
}
//统计空单个数，总手数，最后一单开仓价，手数，开仓时间，魔术号
double 统计空单(double &lastOrderOpenPrice,double &lots,double &lot,int &magic,datetime &lastOrderOpenTime)
{
int selldanshu=0;
lastOrderOpenPrice = 0.0;
lots = 0.0;
lot = 0;
magic = 0;
lastOrderOpenTime = 0;
for(int i=0;i<OrdersTotal();i++)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==true)
{
if(OrderSymbol()==Symbol() && OrderType()==OP_SELL)
{
selldanshu++;
lots = lots + OrderLots();
magic = OrderMagicNumber();
if(lastOrderOpenTime < OrderOpenTime()){
lastOrderOpenTime = OrderOpenTime();
lastOrderOpenPrice = OrderOpenPrice();
lot = OrderLots();
}
}
}
}
return(selldanshu);
}

复制代码

sanbuxiaozhu · 发表于 2019-6-28 21:45

bool 检测是否可以交易(){
if(!TerminalInfoInteger(TERMINAL_TRADE_ALLOWED))
{ Alert(Symbol()+" 智能交易没有开启，请按 CTRL + E 开启！"); Sleep(5*1000); return false;}
else
{
if(!MQLInfoInteger(MQL_TRADE_ALLOWED))
{Alert(Symbol()+"允许智能交易没有打钩！",__FILE__); Sleep(5*1000); return false;}
}
if(!AccountInfoInteger(ACCOUNT_TRADE_ALLOWED))
{ Alert(Symbol()+"\n"+AccountInfoInteger(ACCOUNT_LOGIN)+" 的交易被禁止" +"\n"
+"可能原因是：投资者密码登录，无权进行交易");
Sleep(5*1000);
return false;
}
return true;
}
//计算平均价格
double 平均价格(int TYPE){
double 价格=0;
double lots = 0;
double 手续费 = 0;
int a = 0;
int t=OrdersTotal();
for(int i=t-1;i>=0;i--)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==true)
{
if(OrderSymbol()==Symbol() && OrderType()==TYPE)
{
价格 = 价格 + OrderLots()*OrderOpenPrice();
lots = lots + OrderLots();
手续费 = (OrderSwap()+OrderCommission())/OrderLots()/MarketInfo(Symbol(),MODE_TICKVALUE);
a++;
}
}
}
if(a>0){
if(TYPE == OP_BUY) {价格 = 价格/lots - 手续费*Point;}
if(TYPE == OP_SELL) {价格 = 价格/lots + 手续费*Point;}
手续费 = 0;
价格 = StrToDouble(DoubleToStr(价格,Digits())); //必须四舍五入
}
return(价格);
}
//关闭所有订单
void close(int type)
{
double buyop,buylots,lot;
datetime lastOrderOpenTime;
while(统计多单(buyop,buylots,lot,magic,lastOrderOpenTime)>0)
{
int t=OrdersTotal();
for(int i=t-1;i>=0;i--)
{
if(OrderSelect(i,SELECT_BY_POS,MODE_TRADES)==true)
{
if(OrderSymbol()==Symbol() && OrderType()==type)
{
OrderClose(OrderTicket(),OrderLots(),OrderClosePrice(),300,clrNONE);
}
}
}
Sleep(800);
}
}

复制代码

卡附 · 发表于 2019-6-29 00:06

小猪大神能帮写个多均线多空排列预警指标吗？感谢

sanbuxiaozhu · 发表于 2019-6-29 08:23

卡附发表于 2019-6-29 00:06
小猪大神能帮写个多均线多空排列预警指标吗？感谢

说具体点，哥哥

卡附 · 发表于 2019-6-29 09:45

sanbuxiaozhu 发表于 2019-6-29 08:23
说具体点，哥哥

就是3-5根均线形成多头或空头排列时自动在金死叉处画个箭头，主要想用在日线以上周期参考着判断下趋势。我自己试着写了一直报错，还不会编译箭头

sanbuxiaozhu · 发表于 2019-6-29 11:17

卡附发表于 2019-6-29 09:45
就是3-5根均线形成多头或空头排列时自动在金死叉处画个箭头，主要想用在日线以上周期参考着判断下趋势。 ...

这不就是均线交叉吗？

sanbuxiaozhu · 发表于 2019-6-29 11:19

卡附发表于 2019-6-29 09:45
就是3-5根均线形成多头或空头排列时自动在金死叉处画个箭头，主要想用在日线以上周期参考着判断下趋势。 ...

在具体点几日均线？那几个均线交叉？

卡附 · 发表于 2019-6-29 11:39

sanbuxiaozhu 发表于 2019-6-29 11:19
在具体点几日均线？那几个均线交叉？

5，10，30，60四条交叉。谢谢

sanbuxiaozhu · 发表于 2019-6-30 18:37

卡附发表于 2019-6-29 11:39
5，10，30，60四条交叉。谢谢

//+------------------------------------------------------------------+
//| 多均线交叉.mq4 |
//| Copyright 2018, MetaQuotes Software Corp. |
//| https://www.mql5.com |
//+------------------------------------------------------------------+
#property copyright "Copyright 2018, MetaQuotes Software Corp."
#property link "https://www.mql5.com"
#property version "1.00"
#property strict
#property indicator_chart_window
#property indicator_buffers 7
#property indicator_plots 7
extern int MA1 = 5;
extern int MA2 = 10;
extern int MA3 = 20;
extern int MA4 = 30;
extern int MA5 = 60;
extern string 选择 = "默认选择最后两个均线交叉，标出箭头";
extern string 选择1 = "如需其他均线交叉请修改其数值";
extern ENUM_MA_METHOD method = MODE_SMA;
datetime time1 = 0;
int 箭头间隔 = 100,juli = 20;
//--- plot ma1
#property indicator_label1 "ma1"
#property indicator_type1 DRAW_LINE
#property indicator_color1 clrYellow
#property indicator_style1 STYLE_SOLID
#property indicator_width1 1
//--- plot ma2
#property indicator_label2 "ma2"
#property indicator_type2 DRAW_LINE
#property indicator_color2 clrPink
#property indicator_style2 STYLE_SOLID
#property indicator_width2 1
//--- plot ma3
#property indicator_label3 "ma3"
#property indicator_type3 DRAW_LINE
#property indicator_color3 clrRed
#property indicator_style3 STYLE_SOLID
#property indicator_width3 1
//--- plot ma4
#property indicator_label4 "ma4"
#property indicator_type4 DRAW_LINE
#property indicator_color4 clrDeepSkyBlue
#property indicator_style4 STYLE_SOLID
#property indicator_width4 1
//--- plot ma5
#property indicator_label5 "ma5"
#property indicator_type5 DRAW_LINE
#property indicator_color5 clrLightSeaGreen
#property indicator_style5 STYLE_SOLID
#property indicator_width5 1
//--- indicator buffers
double ma1Buffer[];
double ma2Buffer[];
double ma3Buffer[];
double ma4Buffer[];
double ma5Buffer[];
double upBuffer[];
double downBuffer[];
//+------------------------------------------------------------------+
//| Custom indicator initialization function |
//+------------------------------------------------------------------+
int OnInit()
{
//--- indicator buffers mapping
SetIndexBuffer(0,ma1Buffer);
SetIndexBuffer(1,ma2Buffer);
SetIndexBuffer(2,ma3Buffer);
SetIndexBuffer(3,ma4Buffer);
SetIndexBuffer(4,ma5Buffer);
SetIndexBuffer(5,upBuffer);
SetIndexBuffer(6,downBuffer);
SetIndexStyle(5,DRAW_ARROW,0,3,clrMagenta);
SetIndexArrow(5,241);
SetIndexLabel(5,"up");
SetIndexStyle(6,DRAW_ARROW,0,3,clrYellow);
SetIndexArrow(6,242);
SetIndexLabel(6,"down");
if(Period() == 5){ 箭头间隔 = 15;juli = 20;} //Period()返回当前图表的时间表属于几分钟图
if(Period() == 15){ 箭头间隔 = 25;juli =30;}
if(Period() == 30){ 箭头间隔 = 35;juli =40;}
if(Period() == 60){ 箭头间隔 = 66;juli =50;}
if(Period() == 240){ 箭头间隔 = 88;juli =66;}
if(Period() == 1440){ 箭头间隔 = 150;juli = 100;}
if(Period() == 10080){ 箭头间隔 = 250;juli = 120;}
if(Period() == 1){ 箭头间隔 = 10;juli =15;}
//---
return(INIT_SUCCEEDED);
}
//+------------------------------------------------------------------+
//| Custom indicator iteration function |
//+------------------------------------------------------------------+
int OnCalculate(const int rates_total,
const int prev_calculated,
const datetime &time[],
const double &open[],
const double &high[],
const double &low[],
const double &close[],
const long &tick_volume[],
const long &volume[],
const int &spread[])
{
int counted_bars=IndicatorCounted();
if (counted_bars<0) return(-1);
if (counted_bars>0) counted_bars--;
int limit=Bars-counted_bars;
for(int i=limit-3; i>=0; i--)//int i=0;i<5000;i++)
{
ma1Buffer[i] = iMA(Symbol(),PERIOD_CURRENT,MA1,0,method,PRICE_CLOSE,i); //最后一个参数表示第几个MA值
ma2Buffer[i] = iMA(Symbol(),PERIOD_CURRENT,MA2,0,method,PRICE_CLOSE,i);
ma3Buffer[i] = iMA(Symbol(),PERIOD_CURRENT,MA3,0,method,PRICE_CLOSE,i);
ma4Buffer[i] = iMA(Symbol(),PERIOD_CURRENT,MA4,0,method,PRICE_CLOSE,i);
ma5Buffer[i] = iMA(Symbol(),PERIOD_CURRENT,MA5,0,method,PRICE_CLOSE,i);
if(ma4Buffer[i+2]<ma5Buffer[i+2] && ma4Buffer[i+1]>ma5Buffer[i+1]){
upBuffer[i] = Low[i] - 箭头间隔*Point;
}
if(ma4Buffer[i+2]>ma5Buffer[i+2] && ma4Buffer[i+1]<ma5Buffer[i+1]){
downBuffer[i] = High[i] + 箭头间隔*Point;
}
}
return(rates_total);
}
//+------------------------------------------------------------------+

复制代码

sanbuxiaozhu · 发表于 2019-6-30 18:38

卡附发表于 2019-6-29 11:39
5，10，30，60四条交叉。谢谢

编写不易，加个分老哥

sanbuxiaozhu · 发表于 2019-6-30 18:47

卡附发表于 2019-6-29 11:39
5，10，30，60四条交叉。谢谢

增加箭头报警

if(ma4Buffer[i+2]<ma5Buffer[i+2] && ma4Buffer[i+1]>ma5Buffer[i+1]){
upBuffer[i] = Low[i] - 箭头间隔*Point;
if(i == 0 && time1 != Time[0]){
Alert(Symbol()+"做多信号！");
time1 = Time[0];
}
}
if(ma4Buffer[i+2]>ma5Buffer[i+2] && ma4Buffer[i+1]<ma5Buffer[i+1]){
downBuffer[i] = High[i] + 箭头间隔*Point;
if(i == 0 && time1 != Time[0]){
Alert(Symbol()+"做空信号！");
time1 = Time[0];
}
}

复制代码

卡附 · 发表于 2019-6-30 18:57

sanbuxiaozhu 发表于 2019-6-30 18:47
增加箭头报警

求教如果想要多条均线交叉该怎么设置

sanbuxiaozhu · 发表于 2019-6-30 19:13

卡附发表于 2019-6-30 18:57
求教如果想要多条均线交叉该怎么设置

或者你意思是 10,30,60
交叉是吧

那个大于那个，那个小于那个自己写一下就行了
这么简单的逻辑问题，不用我教吧？

卡附 · 发表于 2019-6-30 19:18

sanbuxiaozhu 发表于 2019-6-30 19:13
或者你意思是 10,30,60
交叉是吧

晚点再尝试改了，有问题再来请教，再次感谢

		自动登录	找回密码
密码			快捷注册(禁q号)

[其他] 几个非常好用的函数，编程必备

评分