月: 2021年3月

class CPanelDialog : public CAppDialog
{
private:
CLabel            m_LabelSymbol;
CButton           m_BtnTrapRepeat; 
public:
CPanelDialog(void);
~CPanelDialog(void);
virtual bool      Create(const long chart,const string name,const int subwin,const int x1,const int y1,const int x2,const int y2);
protected:
bool              Create_LabelSymbol(void);
bool              Create_BtnTrapRepeat(string name1, string name2, string text, double x1, double y1, double x2,double y2);
};
bool CPanelDialog::Create(const long chart,const string name,const int subwin,const int x1,const int y1,const int x2,const int y2)
{
if(!CAppDialog::Create(chart,name,subwin,x1,y1,x2,y2)) return(false);
if( !Create_LabelSymbol())return (false);
if(!Create_BtnTrapRepeat(
"m_BtnTrapRepeat", "__BtnTrapRepeat", "Trap",
indent_left,
indent_top+full_height+controls_gap_y,
indent_left+full_width,
indent_top+full_height+controls_gap_y+full_height
)) return(false);
return(true);
}
CPanelDialog AppWindow;
bool CPanelDialog::Create_LabelSymbol(void)
{
int x1=indent_left;
int y1=indent_top;
int x2=x1+full_width;
int y2=y1+full_height;
if( !m_LabelSymbol.Create( m_chart_id, m_name + "m_LabelSymbol", m_subwin, x1, y1, x2, y2 ) ) return false;
if( !m_LabelSymbol.Text( StringConcatenate(Symbol()," ",PERIOD_CURRENT)) ) return false;
if( !Add( m_LabelSymbol ) ) return false;
return true;
}
bool CPanelDialog::Create_BtnTrapRepeat(string name1, string name2, string text, double x1, double y1, double x2,double y2)
{
if(!m_BtnTrapRepeat.Create(0,name2,0,x1,y1,x2,y2)) return(false);
if(!m_BtnTrapRepeat.Text(text)) return(false);
if(!Add(m_BtnTrapRepeat)) return(false);
return(true);
}

void CreateButton(string name, string label, int x, int y, int width, int height,
color bgColor = C'236,233,216', color textColor = clrBlack, int anchor = CORNER_RIGHT_UPPER)
{
ObjectCreate(name, OBJ_BUTTON, 0, 0, 0);
ObjectSet(name,OBJPROP_XDISTANCE,x+width);
ObjectSet(name,OBJPROP_YDISTANCE,y);
ObjectSet(name,OBJPROP_WIDTH,x);
ObjectSet(name,OBJPROP_XSIZE,width);
ObjectSet(name,OBJPROP_YSIZE,height);
ObjectSet(name, OBJPROP_CORNER, anchor);
ObjectSet(name, OBJPROP_BGCOLOR, bgColor);
ObjectSet(name, OBJPROP_COLOR, textColor);
ObjectSet(name, OBJPROP_ZORDER, 100);
ObjectSetText(name, label, FontSize);
}
void CreateLabel(string name, string label, int x, int y, int width, int height,
color bgColor = C'236,233,216', color textColor = clrBlack, int anchor = CORNER_RIGHT_UPPER)
{
ObjectCreate(name, OBJ_LABEL, 0, 0, 0);
ObjectSet(name,OBJPROP_XDISTANCE,x+width);
ObjectSet(name,OBJPROP_YDISTANCE,y);
ObjectSet(name,OBJPROP_WIDTH,x);
ObjectSet(name,OBJPROP_XSIZE,width);
ObjectSet(name,OBJPROP_YSIZE,height);
ObjectSet(name, OBJPROP_CORNER, anchor);
ObjectSet(name, OBJPROP_BGCOLOR, bgColor);
ObjectSet(name, OBJPROP_COLOR, textColor);
ObjectSet(name, OBJPROP_ZORDER, 100);
ObjectSetText(name, label, FontSize);
}

void OrderBuyEven(double point)
{
if(MarketInfo(OrderSymbol(), MODE_BID) - OrderOpenPrice() >= BeslAt * point)
{
if(OrderStopLoss() < OrderOpenPrice() && OrderStopLoss() != OrderOpenPrice() + Besl * point)
{
Print("建値+", Besl, " pips");
if(OrderLots() > 0.01)
{
ticket = OrderClose(OrderTicket(), NormalizeDouble(OrderLots() / Trades, NormDigit), MarketInfo(OrderSymbol(),MODE_BID), slippage, CLR_NONE);
Print("半利しました ",OrderSymbol()," - ",iClose(OrderSymbol(),0,0));
}
}
}
void OrderSellEven(double point)
{
if(OrderOpenPrice() - MarketInfo(OrderSymbol(), MODE_ASK) >= BeslAt * point)
{
if(OrderStopLoss() > OrderOpenPrice() && OrderStopLoss() != OrderOpenPrice() - (Besl + spread)  * point)
{
Print("建値+", Besl, " pips");
if(OrderLots() > 0.01)
{
ticket = OrderClose(OrderTicket(), NormalizeDouble(OrderLots() / Trades, NormDigit), MarketInfo(OrderSymbol(),MODE_ASK), slippage, CLR_NONE);
Print("半利しました ",OrderSymbol()," - ",iClose(OrderSymbol(),0,0));
}
}
}

            for(int i=0; i<ArraySize(PairList); i++)
{
if(OrderSymbol() == PairList[i])
{
BeslAt= BeslAt_Low * 10;
Besl= Besl_Low * 10;
}
}