Qpile Gleitender Durchschnitt

Aufrechtzuerhalten. JMA. Aufrechtzuerhalten. Aufrechtzuerhalten. Jurik Gleitender Durchschnitt -. . . ,. ,. Aufrechtzuerhalten. . JMA: EMA. , EMA. , JMA,. (). () - JMA. . . , JMA 2,. . . Jma () JMA,. ,. . : MACD JMA (JMA) JMA MACD (). ,. Jma Jurik Gleitender Durchschnitt Amibroker: laquoraquo. QPILE QUIK, Gleitender Durchschnitt. . . PORTFOLIOEX MovingAverage BESCHREIBUNG CLIENTSLIST ALLCLIENTS FIRMSLIST ALLFIRMS PROGRAMM 39 ------------------ --------------- FUNC fTextDate (Jahr, Monat, Tag ) IF (LEN (Monat) lt 2) Monat laquo0raquo amp Monat END IF IF (LEN (Tag) lt 2) Tages laquo0raquo amp Tag END IF Ergebnis Jahr amp Monat amp Tag END FUNK 39 FUNK fTextTime (Stunde, Minute) IF (LEN (Stunde) lt 2) Stunde laquo0raquo amp Stunde END WENN IF (LEN (Min) lt 2) Min laquo0raquo amp Min END IF Ergebnis Stundenverstärker Min amp laquo00raquo END FUNC 39 -------------- -------------------------------------------------- --------------- 39 FUNC str2num (str) Gesamtmenge für k von 0 bis len (str) -1 wenn substr (str, k, 1) ltgtraquo laquo if substr (str, k , 1) raquo, totaltotal amp laquo. raquo sonst totaltotal amp substr (str, k, 1) end if end if end für resulttotal0 END FUNK FUNK Betrieb (transid, Betrieb, Preis, Menge, seccode, Classcode, ORDERKEY) newglobal (laquotransparamsraquo ,) newglobal (laquotransresultraquo, laquobdquo), wenn operationldquoKILLORDERraquo transParams laquobdquo transParams SETVALUE (transParams, ldquoCLASSCODEraquo, Classcode) transParams SETVALUE (transParams, sECCODE, seccode) transParams SETVALUE (transParams, tRANSID, transid) transParams SETVALUE (transParams, ACTION, KILLORDER) transParams SETVALUE (transParams, ORDERKEY, ORDERKEY) transresult SENDTRANSACTION (30, transParams) sonst transParams laquo transParams setvalue (transParams, bdquoTRANSIDldquo, transid) transParams setvalue (transParams, bdquoACTIONldquo, bdquoNEWORDERldquo) transParams setvalue (transParams, bdquoCLASSCODEldquo, Classcode) transParams setvalue (transParams, bdquoSECCODEldquo , seccode) transParams setvalue (transParams, bdquoACCOUNTldquo, Account) transParams setvalue (transParams, bdquoOPERATIONldquo, Betrieb) transParams setvalue (transParams, bdquoQUANTITYldquo, Menge) transParams setvalue (transParams, bdquoCLIENTCODEldquo, ClientCode) transParams setvalue (transParams, bdquoTYPEldquo, bdquoLldquo) currdatetimeGetDateTime ( ) transParams setvalue (transParams, bdquoPRICEldquo, Preis) transresultSENDTRANSACTION (30, transParams), wenn Konto beenden bdquoxxxxxxxxxldquo 39 ClientCode bdquoxxxxxldquo 39 Classcode bdquoEQBRldquo 39 SecCode bdquoSBER03ldquo 39 Interval bdquo5ldquo 39 Jahre GetValue (GetDateTime (), bdquoYEARldquo) Monat GetValue (GetDateTime (), bdquoMONTHldquo ) Tag GetValue (GetDateTime (), bdquoDAYldquo) DATUM fTextDate (Jahr, Monat, Tag) Stunde GetValue (GetDateTime (), bdquoHOURldquo) Min GetValue (GetDateTime (), bdquoMINldquo) Min IntervalFloor (Min / Intervall) 39 TIME fTextTime (Stunde, Min) MA GetValue (GETCANDLE (Classcode, SecCode, raquolaquo, Intervall, raquoMOVING MITTELWERT, 20100514,184500), laquoCLOSEraquo) 0 Lastprice GetValue (GETPARAMEX (laquoEQBRraquo, SBER03, LAST), ParamValue) 39 ToolQuantity DEPOCURRENTBALANCE (laquo56786raquo, laquoMC0567300raquo, laquoSBER03raquo, LaquoY62-000098B01raquo) 0 Wenn ToolQuantity 0 39 (laquo. . raquo) If (Lastprice0 gt MA0) Betrieb (laquo1raquo, B, 0,33, SBER03, EQBR, 1) End if Massivs CreateMap () 39 Massivs Lastprice GetValue (GETPARAMEX (laquoEQBRraquo, SBER03, last), ParamValue) 39 Massivs SETVALUE ( Massivs, SecCode,) 39 Massivs SETVALUE (Massivs, LastPrice, Lastprice) 39 Massivs SETVALUE (Massivs, MA. MA) ADDITEM (0, Massivs) ENDPROGRAM PARAMETER SecCode PARAMETERTITLE PARAMETERDESCRIPTION Parametertype String (10) ENDE PARAMETER LastPrice PARAMETERTITLE PARAMETERDESCRIPTION Parametertype Numeric (10 , 2) END-PARAMETER MA PARAMETERTITÄT PARAMETERDESCRIPTION PARAMETERTYPE NUMERIC (10,2) ENDE 17 2010, 23:01. PORTFOLIOEX AM2MovingAVERBESCHREIBUNG 2.1 CLIENTSLIST ALLCLIENTS FIRMSLIST ALLFIRMS PROGRAMM 39 ------------------ --------------- FUNC fTextDate (Jahr, Monat, Tag) WENN (LEN (Monat) lt 2) Monat laquo0raquo amp Monat END WENN (LEN (Tag) lt 2) Tag laquo0raquo amp Tag END IF Ergebnis Jahr amp Monat amp Tag END FUNC FUNC Betrieb (transid, Betrieb, Preis, Menge , seccode, Classcode, ORDERKEY) newglobal (laquotransparamsraquo,) newglobal (laquotransresultraquo, laquobdquo), wenn operationldquoKILLORDERraquo transParams laquobdquo transParams SETVALUE (transParams, ldquoCLASSCODEraquo, Classcode) SETVALUE (transParams, sECCODE, seccode) transParams SETVALUE (transParams, tRANSID, transid) transParams transParams SETVALUE (transParams, ACTION, KILLORDER) transParams SETVALUE (transParams, ORDERKEY, ORDERKEY) transresult SENDTRANSACTION (30, transParams) sonst transParams transParams setvalue (transParams, laquoTRANSIDraquo, transid) transParams setvalue (transParams, laquoACTIONraquo, laquoNEWORDERraquo) transParams setvalue (transParams, laquoCLASSCODEraquo Classcode,) transParams setvalue (transParams, laquoSECCODEraquo, seccode) transParams setvalue (transParams, laquoACCOUNTraquo, Account) transParams setvalue (transParams, laquoOPERATIONraquo, Betrieb) transParams setvalue (transParams, laquoQUANTITYraquo, Menge) transParams setvalue (transParams, laquoCLIENTCODEraquo, ClientCode) transParams setvalue (transParams, laquoTYPEraquo, laquoLraquo) currdatetimeGetDateTime () transParams setvalue (transParams, laquoPRICEraquo, Preis) transresultSENDTRANSACTION (30, transParams) currdatetimeGetDateTime () WRITELN (laquoqpiletrans. lograquo, getvalue (currdatetime, laquoDATETIMEraquo) Verstärker: Verstärker Ergebnis: Amp getvalue (transresult, laquoRESULTraquo) Verstärker, Resultex: Amp getvalue (transresult, laquoRESULTEXraquo) Verstärker, OrderNum: Amp getvalue (transresult, laquoORDERNUMBERraquo) Verstärker, Beschreibung: laquo amp getvalue (transresult, bdquoDESCRIPTIONldquo)) 39. 39 0.1 39DELETEALLITEMS () 39. Konto bdquo000-000000000ldquo 39 ClientCode bdquo00000ldquo 39 Classcode bdquoEQBRldquo 39 SecCode bdquoSBER03ldquo 39 Interval bdquo5ldquo 39 Jahre GetValue (GetDateTime (), bdquoYEARldquo) Monat GetValue (GetDateTime (), bdquoMONTHldquo) Tag GetValue (GetDateTime (), bdquoDAYldquo) DATUM fTextDate (Jahr, Monat , Tag) Stunde GetValue (GetDateTime (), bdquoHOURldquo) Min GetValue (GetDateTime (), bdquoMINldquo) Min IntervalFloor (Min / Intervall) 39 TIME fTextTime (Stunde, Minute) MA GetValue (GETCANDLE (Classcode, SecCode, raquolaquo, Intervall, raquoMOVING MITTELWERT, Datum, Uhrzeit), laquoCLOSEraquo) 0 39 Lastprice GetValue (GETPARAMEX (laquoEQBRraquo, SBER03, LAST), ParamValue) 39 ToolQuantity DEPOCURRENTBALANCE (laquo00000raquo, laquo000000000raquo, laquoSBER03raquo, laquo000-000000000raquo) 0 Wenn ToolQuantity 0 39. . Wenn (Lastprice0 gt MA0) 39 WRITELN (laquologfile. lograquo..) Betrieb (laquo1raquo, B, 0,33, SBER03, EQBR, 1) End if If (Lastprice0 lt MA0) 39 WRITELN (laquologfile. lograquo.,.) Betrieb (laquo1raquo, S, 0,33, SBER03, EQBR, 1) 39 End if Else If (ToolQuantitygt0) und (Lastprice0 lt MA0) 39 WRITELN (laquologfile. lograquo..) Betrieb (laquo1raquo, S, 0,33, SBER03, EQBR, 1) 39. . Ende, wenn If (ToolQuantitylt0) und (Lastprice0 gt MA0) 39 WRITELN (laquologfile. lograquo, ...) Operation (laquo1raquo, B, 0,33, SBER03, EQBR, 1) 39. . End if Massivs CreateMap () 39 Massivs Lastprice GetValue (GETPARAMEX (laquoEQBRraquo, SBER03, last), ParamValue) 39 Massivs SETVALUE (Massivs, SecCode,) 39 Massivs SETVALUE (Massivs, LastPrice, Lastprice) 39 Massivs SETVALUE (Massivs, MA. MA ) 39 ADDITEM (0, Massivs) ENDPROGRAM PARAMETER SecCode PARAMETERTITLE PARAMETERDESCRIPTION Parametertype String (10) ENDE PARAMETER LastPrice PARAMETERTITLE PARAMETERDESCRIPTION Parametertype Numeric (10,2) ENDE PARAMETER MA PARAMETERTITLE PARAMETERDESCRIPTION Parametertype NUMERIC (10,2) ENDE. . . . ,. . 2011. : Mdash,. Mdash 2. ,. Parabel,. Deutsch:. Mdash 1. . Mdash 2,. , 50. Aufrechtzuerhalten. Laquo raquo YARPP. (17)