//+------------------------------------------------------------------+
//| TradePrice-T03.mq4 |
//| |
//| Converted by Mql2Mq4 v0.7 |
//| http://yousky.free.fr |
//| Copyright © 2006, Yousky Soft |
//+------------------------------------------------------------------+
#include <stdlib.mqh>
//----
#property copyright " Copyright © 2006, HomeSoft Corp."
#property link " spiky@sinet.spb.ru"
//----
#property indicator_chart_window
#property indicator_color1 Gold
#property indicator_buffers 2
#property indicator_color2 Red
//+------------------------------------------------------------------+
//| External variables |
//+------------------------------------------------------------------+
extern double t3_period=21;
extern double b=0.7;
extern double mBar=100;
extern double del=0.0001;
extern double smr=0;
extern double smg=0;
//+------------------------------------------------------------------+
//| Special Convertion Functions |
//+------------------------------------------------------------------+
int LastTradeTime;
double ExtHistoBuffer[];
double ExtHistoBuffer2[];
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void SetLoopCount(int loops)
{
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void SetIndexValue(int shift, double value)
{
ExtHistoBuffer[shift]=value;
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
void SetIndexValue2(int shift, double value)
{
ExtHistoBuffer2[shift]=value;
}
//+------------------------------------------------------------------+
//| Initialization |
//+------------------------------------------------------------------+
int init()
{
SetIndexStyle(0, DRAW_LINE, STYLE_SOLID);
SetIndexBuffer(0, ExtHistoBuffer);
SetIndexStyle(1, DRAW_LINE, STYLE_SOLID);
SetIndexBuffer(1, ExtHistoBuffer2);
return(0);
}
//+------------------------------------------------------------------+
//| |
//+------------------------------------------------------------------+
int start()
{
//+------------------------------------------------------------------+
//| Local variables |
//+------------------------------------------------------------------+
double e1=0;
double e2=0;
double e3=0;
double e4=0;
double e5=0;
double e6=0;
double c1=0;
double c2=0;
double c3=0;
double c4=0;
double n=0;
double w1=0;
double w2=0;
double b2=0;
double b3=0;
double dpoh=0;
double th3=0;
double tl3=0;
int shift=0;
double dpol=0;
bool ft=true;
if(ft)
{
b2=b*b;
b3=b2*b;
c1=-b3;
c2=(3*(b2+b3));
c3=-3*(2*b2+b+b3);
c4=(1+3*b+b3+3*b2);
n=t3_period;
//----
if(n<1)n=1;
n=1 + 0.5*(n-1);
w1=2/(n + 1);
w2=1 - w1;ft=false;}
//----
SetLoopCount(0);
// loop from first bar to current bar (with shift=0)
for(shift=Bars-1;shift>=0 ;shift--)
{
SetIndexValue(shift, 0); SetIndexValue2(shift, 0);
}
for(shift=mBar;shift>=0 ;shift--)
{
dpoh=High[shift];
//----
e1=w1*dpoh + w2*e1;
e2=w1*e1 + w2*e2;
e3=w1*e2 + w2*e3;
e4=w1*e3 + w2*e4;
e5=w1*e4 + w2*e5;
e6=w1*e5 + w2*e6;
th3=c1*e6 + c2*e5 + c3*e4 + c4*e3;
dpol=Low[shift];
//----
e1=w1*dpol + w2*e1;
e2=w1*e1 + w2*e2;
e3=w1*e2 + w2*e3;
e4=w1*e3 + w2*e4;
e5=w1*e4 + w2*e5;
e6=w1*e5 + w2*e6;
tl3=c1*e6 + c2*e5 + c3*e4 + c4*e3;
//----
if(tl3>th3)th3=th3-del;
if(th3>tl3)tl3=tl3-del;
SetIndexValue(shift+smg,th3); SetIndexValue2(shift+smr,tl3);
}
return(0);
}
//+------------------------------------------------------------------+
Sample
Analysis
Market Information Used:
Series array that contains the highest prices of each bar
Series array that contains the lowest prices of each bar
Indicator Curves created:
Implements a curve of type DRAW_LINE
Indicators Used:
Custom Indicators Used:
Order Management characteristics:
Other Features: