Oto krótki wycinek z dyskusji:
<b>
[12:13] <esystemy> podam wam prosty system dla sts 8/3/3
[12:13] <esystemy> fajnie sie sprawdza wewnatrz jakiegos boczniaka
[12:14] <esystemy> kupuj gdy sts ma sygnal kupna na danych 60min.
[12:14] <esystemy> sprzedawaj gdy sts ma sygnal na danych 30 min
[12:29] <esystemy> sts = stochastic
</b>
Dzieki uprzejmosci <b>mopel44</b> powstala rowniez formula do Amibrokera:
mopel44 napisał(a):_SECTION_BEGIN("Parameters");
Plot(Param("Wyprzedanie",25,0,100),"",ParamColor("Level-color",colorGrey50), ParamStyle ( "Level-style" ,styleDashed |styleNoTitle | styleNoRescale ) );
Plot(Param("Wykupienie",75,0,100) ,"",ParamColor("Level-color",colorGrey50), ParamStyle ( "Level-style" ,styleDashed |styleNoTitle | styleNoRescale ) );
TimeframeL = ParamList("Time Frame Short",List = "15 min,30 min,Hourly,4 Hour,Daily,Weekly",2);
TFl =
IIf(TimeframeL == "15 min",in15Minute,
IIf(TimeframeL == "30 min",1800,
IIf(TimeframeL == "Hourly",inHourly,
IIf(TimeframeL == "4 Hour",inHourly*4,
IIf(TimeframeL == "Daily",inDaily,
IIf(TimeframeL == "Weekly",inWeekly,
IIf(TimeframeL == "Weekly",inMonthly,Null)))))));
_SECTION_END();
_SECTION_BEGIN("Stochastic %D");
periods = Param( "Periods", 8, 1, 200, 1 );
Ksmooth = Param( "%K avg", 3, 1, 200, 1 );
Dsmooth = Param( "%D avg", 3, 1, 200, 1 );
Plot( StochD( periods , Ksmooth, DSmooth ), _DEFAULT_NAME(), ParamColor( "Color", colorBlue ), ParamStyle("Style") );
_SECTION_END();
_SECTION_BEGIN("Stochastic %K");
periods = Param( "Periods", 8, 1, 200, 1 );
Ksmooth = Param( "%K avg", 3, 1, 200, 1 );
Plot( StochK( periods , Ksmooth), _DEFAULT_NAME(), ParamColor( "Color", colorRed ), ParamStyle("Style") );
_SECTION_END();
_SECTION_BEGIN("Stoch.%D-H");
periods = Param( "Periods", 8, 1, 200, 1 );
Ksmooth = Param( "%K avg", 3, 1, 200, 1 );
Dsmooth = Param( "%D avg", 3, 1, 200, 1 );
TimeFrameSet(TFl);
StochDh= StochD( periods , Ksmooth, DSmooth );
TimeFrameRestore();
Plot( TimeFrameExpand( StochDh, TFl), _DEFAULT_NAME(), ParamColor( "Color", colorYellow ), ParamStyle("Style") );
_SECTION_END();
_SECTION_BEGIN("Stoch.%K-H");
periods = Param( "Periods", 8, 1, 200, 1 );
Ksmooth = Param( "%K avg", 3, 1, 200, 1 );
TimeFrameSet(TFl);
StochDk = StochK( periods , Ksmooth);
TimeFrameRestore();
Plot( TimeFrameExpand( StochDk, TFl) , _DEFAULT_NAME(), ParamColor( "Color", colorWhite ), ParamStyle("Style") );
_SECTION_END();
Jak cos mozna srednia wygladzic bedzie lepiej wygladalo ,ale nie odpowiadam za wyniki, nie testowalem jeszcze i chyba szybko nie przetestuje.
Nie dodalem komentarzy bo sie spieszylem :) nie ma jak rano sobie walnac jakis kod :) ide na kawke :) Pozdrawiam!