/* Begin SuperSinyal v2 Alert Ýndicators
//+------------------------------------------------------------------+
//| super-signals_v2.mq4 |
//| Copyright © 2006, Nick Bilak, beluck[AT]gmail.com |
//+------------------------------------------------------------------+
#property copyright "Copyright © 2006, Nick Bilak"
#property copyright "alterations by Mark Tomlinson"
#property link "http://www.forex-tsd.com/"
#property indicator_chart_window
#property indicator_buffers 4
#property indicator_color1 Orange
#property indicator_color2 Yellow
#property indicator_color3 Magenta
#property indicator_color4 LightYellow
//input properties
extern int dist2=21;
extern int dist1=14;
extern bool sounds=true;
extern bool exitsounds=true;
double b1[];
double b2[];
double b3[];
double b4[];
double alertTag;
int init() {
SetIndexStyle(0,DRAW_ARROW,STYLE_SOLID,2);
SetIndexStyle(1,DRAW_ARROW,STYLE_SOLID,2);
SetIndexStyle(2,DRAW_ARROW,STYLE_SOLID,2);
SetIndexStyle(3,DRAW_ARROW,STYLE_SOLID,2);
SetIndexArrow(1,333);
SetIndexArrow(0,334);
SetIndexArrow(1,233);
SetIndexArrow(0,234);
SetIndexBuffer(0,b1);
SetIndexBuffer(1,b2);
SetIndexBuffer(2,b3);
SetIndexBuffer(3,b4);
return(0);
}
int start() {
int counted_bars=IndicatorCounted();
int k,i,j,limit,hhb,llb,hhb1,llb1;
if (counted_bars<0) return(-1);
if (counted_bars>0) counted_bars--;
limit=Bars-1;
if(counted_bars>=1) limit=Bars-counted_bars-1;
if (limit<0) limit=0;
for (i=limit;i>=0;i--) {
hhb1 = Highest(NULL,0,MODE_HIGH,dist1,i-dist1/2);
llb1 = Lowest(NULL,0,MODE_LOW,dist1,i-dist1/2);
hhb= Highest(NULL,0,MODE_HIGH,dist2,i-dist2/2);
llb= Lowest(NULL,0,MODE_LOW,dist2,i-dist2/2);
if (i==hhb){
b1[i]=High[hhb]+10*Point;
if(sounds==true && i == 1 && alertTag!=Time[0]) Alert("Super Signals Yukarý!.. ",Symbol()," Period ",Period()," i= ",i);
alertTag = Time[0];
}
if (i==llb){
b2[i]=Low[llb]-10*Point;
if(sounds==true && i == 1 && alertTag!=Time[0]) Alert("Super Signals Aþaðý!.. ",Symbol()," Period ",Period()," i= ",i);
alertTag = Time[0];
}
if (i==hhb1){
b3[i]=High[hhb1]+4*Point;
if(exitsounds==true && i == 1 && alertTag!=Time[0]) Alert("Super Signals Buy Emrini Kapat ",Symbol()," Period ",Period()," i= ",i);
alertTag = Time[0];
}
if (i==llb1){
b4[i]=Low[llb1]-4*Point;
if(exitsounds==true && i == 1 && alertTag!=Time[0]) Alert("Super Signals Sell Emrini Kapat ",Symbol()," Period ",Period()," i= ",i);
alertTag = Time[0];
}
}
return(0);
}
// End SuperSinyal v2 Alert Ýndicators
*/
static int prevtime=0;
extern int SignalGap = 4;
double gd_224 = 0.0;
int dist=24;
extern int dist1=14;
int durum=0;
string sonsinyal="";
int sinyal=1;
extern int HedefLotSayi=20;
extern double HedefLot=0.20;
extern double HedefKar=19.00;
extern double HedefZarar=75.00;
extern double HedefZararPip=15.00;
extern double HedefKarPip=15.00;
int ticket,k,i,j,limit,hhb,llb,hhb1,llb1;
int init() {
hhb = Highest(NULL,0,MODE_HIGH,dist,i-dist/2);
llb = Lowest(NULL,0,MODE_LOW,dist,i-dist/2);
if (hhb>llb) sonsinyal="BUY";
if (hhb<llb) sonsinyal="SELL";
}
int HepsiniKapat(int durum)
{
int total = OrdersTotal();
for(int i=total-1;i>=0;i--)
{
OrderSelect(i, SELECT_BY_POS);
int type = OrderType();
bool result = false;
switch(type)
{
//Close opened long positions
case OP_BUY : if (durum==1)result = OrderClose( OrderTicket(), OrderLots(), MarketInfo(OrderSymbol(), MODE_BID), 5, Red );
break;
//Close opened short positions
case OP_SELL : if (durum==2)result = OrderClose( OrderTicket(), OrderLots(), MarketInfo(OrderSymbol(), MODE_ASK), 5, Red );
break;
//Close pending orders
case OP_BUYLIMIT :
case OP_BUYSTOP :
case OP_SELLLIMIT :
case OP_SELLSTOP : result = OrderDelete( OrderTicket() );
}
if(result == false)
{
Alert("Order " , OrderTicket() , " failed to close. Error:" , GetLastError() );
Sleep(3000);
}
}
return(0);
}
int start()
{
limit=Bars-1;
//print("limit=",limit);
if (limit<0) limit=0;
/*
for (i=limit;i>=0;i--) {
hhb1 = Highest(NULL,0,MODE_HIGH,dist1,i-dist1/2);
llb1 = Lowest(NULL,0,MODE_LOW,dist1,i-dist1/2);
hhb= Highest(NULL,0,MODE_HIGH,dist2,i-dist2/2);
llb= Lowest(NULL,0,MODE_LOW,dist2,i-dist2/2);
if (i==hhb){
b1[i]=High[hhb]+10*Point;
if(sounds==true && i == 1 && alertTag!=Time[0]) Alert("Super Signals Yukarý!.. ",Symbol()," Period ",Period()," i= ",i);
alertTag = Time[0];
}
if (i==llb){
b2[i]=Low[llb]-10*Point;
if(sounds==true && i == 1 && alertTag!=Time[0]) Alert("Super Signals Aþaðý!.. ",Symbol()," Period ",Period()," i= ",i);
alertTag = Time[0];
}
if (i==hhb1){
b3[i]=High[hhb1]+4*Point;
if(exitsounds==true && i == 1 && alertTag!=Time[0]) Alert("Super Signals Buy Emrini Kapat ",Symbol()," Period ",Period()," i= ",i);
alertTag = Time[0];
}
if (i==llb1){
b4[i]=Low[llb1]-4*Point;
if(exitsounds==true && i == 1 && alertTag!=Time[0]) Alert("Super Signals Sell Emrini Kapat ",Symbol()," Period ",Period()," i= ",i);
alertTag = Time[0];
}
}
*/
if (Time[0]==prevtime) return(0);
prevtime=Time[0];
Print("Burda");
//if (OrdersTotal()>= HedefLotSayi) return(0);
// limit=Bars-1;
Print("Limit Bars",limit,"bars=",Bars);
hhb = Highest(NULL,0,MODE_HIGH,dist,i-dist/2);
llb = Lowest(NULL,0,MODE_LOW,dist,i-dist/2);
hhb1 = Highest(NULL,0,MODE_HIGH,dist1,i-dist1/2);
llb1 = Lowest(NULL,0,MODE_LOW,dist1,i-dist1/2);
//if (Time[0]==prevtime) return(0);
// prevtime=Time[0];
// Print("hhb=",hhb,"llb=",llb);
/*{ if ((sonsinyal=="SELL") && (hhb>llb))
{
Alert("Super Signal Buy Fiyat=",Ask);sonsinyal="BUY";
//HepsiniKapat();
ticket=OrderSend(Symbol(),OP_BUY,HedefLot,Ask,3,Ask-135*Point,Ask+30*Point,"HaskayaFxbuy"+Symbol(),16384,0,Green);
}
if ((sonsinyal=="BUY") && (hhb<llb))
{
//HepsiniKapat();
Alert("Super Signal SELL Fiyat=",Bid);sonsinyal="SELL";
ticket=OrderSend(Symbol(),OP_SELL,HedefLot,Bid,3,Bid-135*Point,Bid-30*Point,"HaskayaFxSell"+Symbol(),16384,0,Green);
}
*/
if (limit==hhb) ticket=OrderSend(Symbol(),OP_BUY,HedefLot,Ask,3,Ask-HedefZarar*Point,Ask+HedefKar*Point,"HaskayaFxbuy"+Symbol(),16384,0,Green);
if (limit==llb) ticket=OrderSend(Symbol(),OP_SELL,HedefLot,Bid,3,Bid-HedefZarar*Point,Bid-HedefKar*Point,"HaskayaFxSell"+Symbol(),16384,0,Green);
if (limit==hhb1) {durum=1;HepsiniKapat(durum);}//ticket=OrderSend(Symbol(),OP_BUY,HedefLot,Ask,3,Ask-HedefZarar*Point,Ask+HedefKar*Point,"HaskayaFxbuy"+Symbol(),16384,0,Green);
if (limit==llb1) {durum=1;HepsiniKapat(durum);}//ticket=OrderSend(Symbol(),OP_SELL,HedefLot,Bid,3,Bid-HedefZarar*Point,Bid-HedefKar*Point,"HaskayaFxSell"+Symbol(),16384,0,Green);
//if (hhb<llb) Alert("Super Signal SELL Fiyat=",Bid);
// if (hhb>llb) Alert("Super Signal Buy Fiyat=",Ask);
return(0);
}
//+------------------------------------------------------------------+
//| expert initialization function |
//+------------------------------------------------------------------+
//+------------------------------------------------------------------+
Sample
Analysis
Market Information Used:
Series array that contains the highest prices of each bar
Series array that contains open time of each bar
Series array that contains the lowest prices of each bar
Indicator Curves created:
Implements a curve of type DRAW_ARROW
Indicators Used:
Custom Indicators Used:
Order Management characteristics:
Checks for the total of open orders
It Closes Orders by itself
It automatically opens orders when conditions are reached
Other Features:
It issuies visual alerts to the screen
