Két rövid afl, amely hangjelzést ad ki, ha az átlagok kereszteződnek.

Az első afl akkor jelez vételt, ha a "rövid átlag" a "hosszú átlag" fölött van, ellenkező esetben eladást jelez. Ekkor mindkét esetben folyamatos hangjelzést ad, ameddig a parameters ablakban le nem állítjuk, azaz OFF-ra nem tesszük a riasztás kapcsolót.

A riasztási hang kicsrélhető, amennyiben az AlertIf sorokban a SOUND után az elérési utat kicserélitek az általatok kívánttal. Sorrendben az első a vételi hang, a második az eladási hang.

Tehát akkor az első afl, amelyik folyamatosan jelez, vagy vételt, vagy eladást az átalgok pozíciójától függően:

_SECTION_BEGIN("rövid átlag");

Pr = ParamField("Price field R",-1);

Periodsr = Param("Rövid átlag periódus", 50, 2, 300, 1, 10 );

RovidMA = MA( Pr, Periodsr );

Plot( RovidMA, _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") );

_SECTION_END();

_SECTION_BEGIN("rövid átlag");

Ph = ParamField("Price field H",-1);

Periodsh = Param("Hosszú átlag periódus", 200, 2, 300, 1, 10 );

HosszuMA = MA( Ph, Periodsh );

Plot( HosszuMA, _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") );

_SECTION_END();

_SECTION_BEGIN("vetel riaszto");

Alarm_Buy_On = ParamToggle("Alarm Buy", "Off|On", 0);

AlertIf( Alarm_Buy_On AND RovidMA > HosszuMA, "SOUND C:\\Windows\\Media\\tada.wav", "Audio alert", 7, 0);

_SECTION_END();

_SECTION_BEGIN("eladas riaszto");

Alarm_Sell_On = ParamToggle("Alarm Sell", "Off|On", 0);

AlertIf( Alarm_Sell_On AND RovidMA < HosszuMA, "SOUND C:\\Windows\\Media\\ringout.wav", "Audio alert", 6, 0);

_SECTION_END();

A 2. afl, ami pedig csak az átlagok kereszteződésekor jelez:

_SECTION_BEGIN("rövid átlag");

Pr = ParamField("Price field R",-1);

Periodsr = Param("Rövid átlag periódus", 50, 2, 300, 1, 10 );

RovidMA = MA( Pr, Periodsr );

Plot( RovidMA, _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") );

_SECTION_END();

_SECTION_BEGIN("rövid átlag");

Ph = ParamField("Price field H",-1);

Periodsh = Param("Hosszú átlag periódus", 200, 2, 300, 1, 10 );

HosszuMA = MA( Ph, Periodsh );

Plot( HosszuMA, _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") );

_SECTION_END();

_SECTION_BEGIN("vetel riaszto");

Alarm_Buy_On = ParamToggle("Alarm Buy", "Off|On", 0);

AlertIf( Alarm_Buy_On AND Cross(RovidMA , HosszuMA), "SOUND C:\\Windows\\Media\\tada.wav", "Audio alert", 7, 0);

_SECTION_END();

_SECTION_BEGIN("eladas riaszto");

Alarm_Sell_On = ParamToggle("Alarm Sell", "Off|On", 0);

AlertIf( Alarm_Sell_On AND Cross (HosszuMA , RovidMA), "SOUND C:\\Windows\\Media\\ringout.wav", "Audio alert", 6, 0);

_SECTION_END();

Ha valaki hibát talál benne ne tartsa magában, nem teszteltem még, csak megírtam.