Converting an "Easy Language" indikator to "SDK"
$30-250 USD
Bezahlt bei Lieferung
I have an indicator for trade station : MarketForecaster. Trade station is writen in Easy Language. I need to convert it to "SDK" so it would work on FXCM marketskope. the indicator is open. here it is:
--------------------------------------------------------------------------------------------------------------------------
[LegacyColorValue = true];
inputs:
PriceActionFilter(1),
TransColor1or2or3(1),
UseZeroLag(False),
CCIAvgLen( 20 ),
CCISmooth1( 3 ),
CCISmooth2( 5 ),
StochLength1(5),
StochLength2(3),
StochLength3(3),
UpColor(Green),
DwnColor(Red),
PlotWidth(2);
{****************************************}
variables:
Price(0),
First(0),
Second(0),
Curve1( 0 ),
Curve2( 0 ),
Zscore( 0 ),
OverBought(80),
OverSold(20),
Switch(0),
KFast(0),
KFull(0),
DFull(0),
LL(O),
HH(0),
Dira(0),
Dira1(0),
Dirb(0),
Dirb1(0),
ZL1(0);
{****************************************}
Price = SmoothedAverage(Close,PriceActionFilter);
First = (Price-Average(Price,CCIAvgLen));
Second = (StdDev(Price,CCIAvgLen));
If Second = 0 then Second = .001;
ZScore = (First/Second);
Curve1 = Average( ZScore, CCISmooth1 ) ;
Curve2 = Average( Curve1, CCISmooth2 ) ;
{****************************************}
LL = Lowest((High+Low)/2, StochLength1);
HH = Highest((High+Low)/2, StochLength1);
KFast = 100 * IFF(HH-LL=0,0,(((High+Low)/2) - LL)/(HH- LL));
KFull = Average(KFast, StochLength2);
DFull = Average(KFull, StochLength3);
ZL1 = Zero_Lag(Average(Kfast, StochLength2), StochLength1);
{****************************************}
SetPlotWidth(1,PlotWidth);
SetPlotWidth(3,PlotWidth);
{****************************************}
Plot1( 1,"CCISmoothBar");
Plot2(-2,"Spacer");
Plot3(-1,"StocasticBar");
Plot4( 2,"Spacer");
{****************************************}
If Curve1>Curve1[1] Then Dira=1;
If Curve10 Then SetPlotcolor(1,UpColor);
If TransColor1or2or3 = 2 and Dira0 Then SetPlotcolor[1](1,UpColor);
If TransColor1or2or3 = 1 and Dira0 Then SetPlotcolor(1,UpColor);
If TransColor1or2or3 = 3 and Dira0 Then SetPlotcolor[1](1,UpColor);
If TransColor1or2or3 = 3 and DiraKFull[1] Then Dirb=1;
If KFullZL1[1] Then Dirb=1;
If ZL10 Then SetPlotcolor(3,UpColor);
If TransColor1or2or3 = 2 and Dirb0 Then SetPlotcolor[1](3,UpColor);
If TransColor1or2or3 = 1 and Dirb0 Then SetPlotcolor(3,UpColor);
If TransColor1or2or3 = 3 and Dirb0 Then SetPlotcolor[1](3,UpColor);
If TransColor1or2or3 = 3 and Dirb<0 Then Setplotcolor[1](3,DwnColor);
{****************************************}
Projekt-ID: #4347158