Metastock la ilgili herşey

[netkit]

Hayırlı Pazarlar
inşallah yanlış yere sormuyorumdur bu kodu matrikse çevirmeye çalıştım ama malesef beni aştı yardımcı olabilirmisiniz?

_SECTION_BEGIN("Heiken Ashi Smoothed");
SetChartBkGradientFill( ParamColor("BgTop", colorBlack),ParamColor("BgBottom", colorBlack),ParamColor("Titleblock",colorLightGrey ));
SetChartOptions(0,chartShowArrows|chartShowDates);
GraphXSpace=5;

p=Param("Period",6,2,30,1);
Om=MA(O,p);
hm=MA(H,p);
lm=MA(L,p);
Cm=MA(C,p);

HACLOSE=(Om+Hm+Lm+Cm)/4;
HaOpen = AMA( Ref( HaClose, -1 ), 0.5 );
HaHigh = Max( Hm, Max( HaClose, HaOpen ) );
HaLow = Min( Lm, Min( HaClose, HaOpen ) );

res=HHV(Hm,4);
sup=LLV(Lm,4);
tsl=IIf(ValueWhen(IIf(C>Ref(res,-1),1,IIf(C<Ref(sup,-1),-1,0))!=0,IIf(C>Ref(res,-1),1,IIf(C<Ref(sup,-1),-1,0)),1)==1,sup,res);

Plot(tsl, _DEFAULT_NAME(), colorWhite, styleStaircase);
Buy = Cross(C,res) ;
Sell = Cross(sup,C) ;
Short=Sell;
Cover=Buy;
Buy=ExRem(Buy,Sell);
Sell=ExRem(Sell,Buy);
PlotShapes(Buy*shapeUpArrow,colorYellow, 0, Low,Offset =-12);
PlotShapes(Sell*shapeDownArrow,colorYellow, 0, High, Offset =-12);

Buy=ExRem(Buy,Sell);
Sell=ExRem(Sell,Buy);

Filter=Buy OR Sell;
AddColumn(Buy,"Buy",1.0);
AddColumn(Sell,"Sell",1.0);

_SECTION_END();

Candlecolor=IIf(Haclose>Haopen,colorGreen,colorRed );
PlotOHLC( HaOpen, HaHigh, HaLow, HaClose, "" + Name(), candlecolor, styleCandle | styleNoLabel );
//Plot( C, "Close", Candlecolor , styleNoTitle | ParamStyle("Style") | GetPriceStyle() );

[uufuk]

Hayırlı Pazarlar
inşallah yanlış yere sormuyorumdur bu kodu matrikse çevirmeye çalıştım ama malesef beni aştı yardımcı olabilirmisiniz?

_SECTION_BEGIN("Heiken Ashi Smoothed");
SetChartBkGradientFill( ParamColor("BgTop", colorBlack),ParamColor("BgBottom", colorBlack),ParamColor("Titleblock",colorLightGrey ));
SetChartOptions(0,chartShowArrows|chartShowDates);
GraphXSpace=5;

p=Param("Period",6,2,30,1);
Om=MA(O,p);
hm=MA(H,p);
lm=MA(L,p);
Cm=MA(C,p);

HACLOSE=(Om+Hm+Lm+Cm)/4;
HaOpen = AMA( Ref( HaClose, -1 ), 0.5 );
HaHigh = Max( Hm, Max( HaClose, HaOpen ) );
HaLow = Min( Lm, Min( HaClose, HaOpen ) );

res=HHV(Hm,4);
sup=LLV(Lm,4);
tsl=IIf(ValueWhen(IIf(C>Ref(res,-1),1,IIf(C<Ref(sup,-1),-1,0))!=0,IIf(C>Ref(res,-1),1,IIf(C<Ref(sup,-1),-1,0)),1)==1,sup,res);

Plot(tsl, _DEFAULT_NAME(), colorWhite, styleStaircase);
Buy = Cross(C,res) ;
Sell = Cross(sup,C) ;
Short=Sell;
Cover=Buy;
Buy=ExRem(Buy,Sell);
Sell=ExRem(Sell,Buy);
PlotShapes(Buy*shapeUpArrow,colorYellow, 0, Low,Offset =-12);
PlotShapes(Sell*shapeDownArrow,colorYellow, 0, High, Offset =-12);

Buy=ExRem(Buy,Sell);
Sell=ExRem(Sell,Buy);

Filter=Buy OR Sell;
AddColumn(Buy,"Buy",1.0);
AddColumn(Sell,"Sell",1.0);

_SECTION_END();

Candlecolor=IIf(Haclose>Haopen,colorGreen,colorRed );
PlotOHLC( HaOpen, HaHigh, HaLow, HaClose, "" + Name(), candlecolor, styleCandle | styleNoLabel );
//Plot( C, "Close", Candlecolor , styleNoTitle | ParamStyle("Style") | GetPriceStyle() );

Matriksde indikatorlerin MUM gösterimi yoktur,dolayısıyla süssüz sade olarak formulun cevrimi aşagıdadır..

p:=6;  hm:=Mov(H,p,s);  lm:=Mov(L,p,s);  
res:=HHV(hm,4);     sup:=LLV(lm,4);
tsl:=If(ValueWhen(1,If(C>Ref(res,-1),1,If(C<Ref(sup,-1),-1,0))<>0,If(C>Ref(res,-1),1,If(C<Ref(sup,-1),-1,0)))=1,sup,res); 
tsl

Heriki grafikde son gün resmedilmişdir..

[netkit]

Çok teşekkür ederim peki ideal de kullanabilirmiyim?

[uufuk]

Çok teşekkür ederim peki ideal de kullanabilirmiyim?

İdael C# dilinde vakıf degilim,idealci dostlardan yardım iste..Cevirirlerse kullanabilirsin...