Ar Trading System Afl Amibroker

Titel: Triple SCreen Trading System mit Amibroker Beschreibung: Trading System jest1081 - June 28, 2006 06:17 PM (GMT) Hallo alle, möchte nur etwas, das ich programmiert haben (nicht vollständig von mir Beiträgen von Mithändlern in Amibroker sowie) . Ich habe versucht und getestet, und denkt, es funktioniert sehr eng mit dem System, das gelehrt wurde. Ende des e Tag muss sich erinnern, System Wun bringen u Geld, don39t Suche nach heiligen Gral. Ein disziplinierter Händler sein. NUR FÜR DEN EINSATZ IN Amibroker TA Charts Wochencharts mit monatlichen - Impulssystem Weekly Bar Chart SECTIONBEGIN (quotWeekly Graphquot) SetChartOptions (0, chartShowArrows124chartShowDates) Benutzerdefinierte Parameter für EMA Perioden EMAType Param (quotEMA-1, TEMA-2, JMA-3quot, 2 1, 0, 1, 1) StdMACD Param (quotStandard MACD No-0, Yes-1quot, 1, 0, 1, 1) Parametrischer Param (Querschlüssel-1, Impulsstäbe -2quot, 2, 1, 2, 1) Benutzer zulassen wöchentliche und monatliche Ribbon Lage und Höhe WRP1 Param (quotWeekly Band Locationquot zu definieren, -10,5, -1000, 1000, 0.1) WRP2 Param (quotWeekly Band Heightquot, 366,5, -0.001 , 500, 0,1) MRP1 Param (quotMonthly Band Locationquot, 5.2, -1000, 1000, 0.1) MRP2 Param (quotMonthly Band Heightquot, 199, -0,001, 500, 0,1) TimeFrameSet (inWeekly) Compute EMA und MACD Histogramm if (EMAType 1 ) DayEMA EMA (Close, EMAprds) if (EMAType 2) DayEMA TEMA (Close, EMAprds) if (EMAType 3) Linie unten mit Jurik JMA DayEMA JurikJMA (C, EMAPrds) if (StdMACD 0) MACDval MACD (5, verwendet werden 8) Signalvalensignal (5, 8, 5) sonst MACDval MACD (12, 26) Signalwert Signal (12, 26, 9) Histogramm MACDval - Signalwert Bestimmen, ob ein Impuls UP, DOWN oder keine ImpulseUp DayEMA gt Ref (DayEMA, -1) UND Histogramm gt Ref (Histogramm, -1) ImpulseDown DayEMA lt Ref (DayEMA, -1) UND Histogramm lt Ref (Histogramm, -1) ImpulseNone (NOT ImpulseUP) UND (NOT ImpulseDown) whrising DayEMA gt Ref (DayEMA, -1) UND Histogramm gt Ref (Histogramm, -1) whfalling DayEMA lt Ref (DayEMA, -1) UND Histogramm lt Ref (Histogramm, -1) TimeFrameRestore () Erhalten Sie jetzt monatliches MACD-Histogramm. TimeFrameSet (inMonthly) MACDval MACD (5, 8) Signalval Signal (5, 8, 5) Histinm MACDval - Signalval mhrising Histinm gt Ref (Histinm, -1) mhfalling Histinm lt Ref (Histinm, -1) whrising TimeFrameExpand (whrising, inWeekly , expandLast) whfalling TimeFrameExpand (whfalling, inWeekly, expandLast) mhrising TimeFrameExpand (mhrising, inMonthly, expandLast) mhfalling TimeFrameExpand (mhfalling, inMonthly, expandLast) kol IIf (whrising, colorBrightGreen, IIf (whfalling, Blau und Rot, colorLightGrey)) mkol IIf (mhrising , Farbeblau, IIf (mhfalling, Coloryellow, colorLightGrey)) TimeFrameSet (inWeekly) Plotten sie if (Plotfashion 1) Grundstück (Close, quotClosequot, colorTeal, stylebar) PlotShapes (shapeUpArrow ImpulseUp, colorBrightGreen, 0, Niedrig, -12) PlotShapes all33 ( shapeDownArrow impulseDown, Blau und Rot, 0, Hoch, -12) PlotShapes (shapeSmallCircle ImpulseNone, Farbeweiß, 0, Hoch, 5) sonst Barkol IIf (impulseUP, colorBrightGreen, IIf (impulseDown, Blau und Rot, colorCustom11)) Plot (C, quotClosequot, Barkol, stylebar) Grundstück (10, quotWeekly Ribbonquot, kol, styleOwnScale124styleArea124styleNoLabel, WRP1, WRP2) Wochen Trend GREEN RISING, ROT FALLEN, WEISS NEUTRAL Plot (10, quotMonthly Ribbonquot, mkol, styleOwnScale124styleArea124styleNoLabel, MRP1, MRP2) Monats Trend BLUE RISING, GELB FALLEN, WEISS NEUTRAL TimeFrameRestore () SECTIONBEGIN (quotEMA1quot) P ParamField (quotPrice fieldquot, -1) Perioden Param (quotPeriodsquot, 15, 2, 200, 1, 10) Grundstück (EMA (P, Perioden), DEFAULT (), ParamColor (quotColorquot, colorCycle), ParamStyle (quotStylequot)) SectionEnd () SECTIONBEGIN (quotZIG - Zigquot) TimeFrameSet (inWeekly) P ParamField (quotPrice fieldquot) ändern Param (zit changequot, 5,0.1,25,0.1) Plot (Zig (P, Wechsel), DEFAULT (), ParamColor (quotColorquot, colorCycle), ParamStyle (quotStylequot)) TimeFrameRestore () SectionEnd () Weekly MACD Histogran SECTIONBEGIN (quotWeekly MACDquot) TimeFrameSet (inWeekly) MACDw MACD (12, 26) - Signal (12, 26, 9) MACDwLINE MACD (12, 26) MACDwSignal Signal (12, 26, 9) Farbe IIf (Ref (MACDw, -1) gtMACDw, Blau und Rot, colorBrightGreen) TimeFrameRestore () Plot (MACDw, quotMACD Weeklyquot, Farbe, styleHistogram 124 styleThick) Plot ( MACDwLINE, quotMACD Weekly Linequot, Blau und Rot, Styleline) Plot (MACDwSignal, quotMACD Weekly Signal Linequot, colorBrightGreen, Styleline) SectionEnd () INDEX WOCHEN FORCE 13 Tage MA SECTIONBEGIN (quotForce Index2quot) TimeFrameSet (inWeekly) Perioden Param (quotPeriodsquot, 13, 1, 100 , 1) FI EMA ((Close (Ref, Close, -1)) V), Perioden) FIkol IIf (fi lt 0, colorRed, colorBrightGreen) Plot (Close, quotClosequot, colorRed, 2) Plot (FI, quotForce-Indexquot , FIkol, styleLine124styleThick) Grundstück (0, quotquot, colorViolet, Styleline 124 styleThick 124 styleNoLabel) Titelname () EncodeColor (Farbeweiß) quot - Force-Index - quot WriteVal (Perioden, 1) quot Tagen, quot EncodeColor (Blau und Rot) quot Schließen quot EncodeColor (Farbeweiß) quot quot WriteVal (Schließen), quot, quot EncodeColor (Farbeblau) quotForce Index quot EncodeColor (Farbeweiß) WriteVal (FI, 1.2) TimeFrameRestore () SectionEnd () SECTIONBEGIN (quotVolumequot) TimeFrameSet (inWeekly) Plot (Volumen, DEFAULT ( ), ParamColor (quotColorquot, colorBlueGrey), ParamStyle (quotStylequot, styleHistogram 124 styleOwnScale 124 styleThick, maskHistogram), 2) TimeFrameRestore () SectionEnd () Tages-Chart mit wöchentlichem - Impulssystem Benutzerdefinierte Parameter für EMA Perioden EMAType Param (quotEMA-1, TEMA-2, JMA-3quot, 2, 1, 3, 1) EMAprds Param (quotEMAperiodsquot, 7, 1, 30, 1) StdMACD Param (Standardzustand MACD Nr. 0, Ja-1, Plotfashion Param (quotBarArrows-1, Impulse Bars-2quot, 2, 1, 2, 1) Benutzer zulassen wöchentliche und monatliche Ribbon Lage und Höhe WRP1 Param zu definieren (quotWeekly Band Locationquot, 5.2, -1000, 1000, 0.1) WRP2 Param ( quotWeekly Band Heightquot, 199, -0,001, 500, 0,1) MRP1 Param (quotMonthly Band Locationquot, 5.2, -1000, 1000, 0.1) MRP2 Param (quotMonthly Band Heightquot, 199, -0,001, 500, 0,1) Compute EMA und MACD-Histogramm If (EMAType 1) TagEMA EMA (Schließen, EMAprds) if (EMAType 2) TagEMA TEMA (Schließen, EMAprds) wenn (EMAType 3) Zeile unten für Jurik verwendet werden JMA TagEMA JurikJMA (C, EMAPrds) Histogramm MACD () - Signal (HISTOG, -1) UNDHistogramm gt Ref (Histogramm, -1) ImpulseDown DayEMA lt Ref (DayEMA, -1) UND Histogramm Ref (Histogramm, -1) ImpulseNone (NICHT ImpulseUP) und (ImpulseDown) Compute Weekly MACD nicht und bestimmen, ob steigende oder fallende Hinweis: verwendet quotnon-standardquot parameters33 TimeFrameSet (inWeekly) if (StdMACD 0) MACDval MACD (5, 8) Signalval Signal (5, 8, 5) sonst MACDval MACD (12, 26) Signalverlaufssignal (12, 26, 9) Histinw MACDval - Signalwirrung Histinw gt Ref (Histinw, -1) mit Histinw lt Ref (Histinw, -1) UND (NOT whfalling) Jetzt monatlich MACD Histogramm. TimeFrameSet (inMonthly) MACDval MACD (5, 8) Signalval Signal (5, 8, 5) Histinm MACDval - Signalval mhrising Histinm gt Ref (Histinm, -1) mhfalling Histinm lt Ref (Histinm, -1) whrising TimeFrameExpand (whrising, inWeekly , expandLast) whfalling TimeFrameExpand (whfalling, inWeekly, expandLast) whnone TimeFrameExpand (whnone, inWeekly, expandLast) mhrising TimeFrameExpand (mhrising, inMonthly, expandLast) mhfalling TimeFrameExpand (mhfalling, inMonthly, expandLast) kol IIf (whrising, colorBrightGreen, IIf (whfalling, Blau und Rot, IIf (whnone, colorCustom11, colorLightGrey))) mkol IIf (mhrising, Farbeblau, IIf (mhfalling, Coloryellow, colorLightGrey)) Plotten sie all33 if (Plotfashion 1) Grundstück (Close, quotClosequot, colorTeal, stylebar) PlotShapes (shapeUpArrow ImpulseUp , colorBrightGreen, 0, Niedrig, -12) PlotShapes (shapeDownArrow ImpulseDown, Blau und Rot, 0, Hoch, -12) PlotShapes (shapeSmallCircle ImpulseNone, Farbeweiß, 0, Hoch, 5) sonst Barkol IIf (impulseUP, colorBrightGreen, IIf (impulseDown, Blau und Rot , colorCustom11)) Plot (C, quotClosequot, Barkol, stylebar) Grundstück (10, quotWeekly Ribbonquot, kol, styleOwnScale124styleArea124styleNoLabel, WRP1, WRP2) Wochen Trend GREEN RISING, ROT FALLEN, WEISS NEUTRAL Plot (10, quotMonthly Ribbonquot, mkol, styleOwnScale124styleArea124styleNoLabel, MRP1, MRP2) Monats Trend BLUE RISING, GELB Fallen, Weiß NEUTRAL LookBkPd 100 AvgPd 22 ExternalBarPct 15 ConvergePct 2 Middle EMA (C, AvgPd) Rng HHV (H, LookBkPd) - LLV (L, LookBkPd) X Rng deltaX X2 tun Über H gt Mittel X Unter L lt Mitte - X OuterPct 100 (Sum (Over, LookBkPd) Sum (Under, LookBkPd)) LookBkPd OP Lastvalue (OuterPct) XXsign (OP - ExternalBarPct) deltaX deltaX deltaX2 während (abs (OP - ExternalBarPct) gt ConvergePct ) Plot (Mitte, quotMAquot, Coloryellow, styleLine124styleNoTitle) Plot (MiddleX, quotMAquot, colorSkyblue, Bestimmen styleDashed124styleNoTitle) Plot (Middle-X, quotMAquot, colorSkyblue, styleDashed124styleNoTitle) Explorer Abschnitt, wenn Impulse Status bullish, neutral oder bearish ist. Als Spalte anzeigen. ImpulseState WriteIf (ImpulseUp, quotBulllishquot, WriteIf (ImpulseDown, quotBearishquot, quotNeutralquot)) Stellen Sie die Hintergrundfarbe für Impulse Status-Spalte ImpulseCol IIf (ImpulseUp, colorGreen, IIf (ImpulseDown, Blau und Rot, colorLightGrey)) Bestimmen Weekly Trend. Anzeige als Text-Spalte Weekly WriteIf (whrising, quotRisingquot, WriteIf (whfalling, quotFallingquot, quotFlat33quot)) WeeklyCol IIf (whrising, colorGreen, IIf (whfalling, Blau und Rot, colorLightGrey)) Bestimmen Sie monatliche Trend. Anzeige als Text-Spalte MonthlyTrend WriteIf (mhrising, quotRisingquot, WriteIf (mhfalling, quotFallingquot, quotFlat33quot)) MonthlyCol IIf (mhrising, colorGreen, IIf (mhfalling, Blau und Rot, colorLightGrey)) fest, wie viele Bars hat der aktuelle Zustand existierte Min barsinbull (BarsSince ( impulsenone), BarsSince (impulsedown)) barsinbear Min (BarsSince (impulseup), BarsSince (impulsenone)) barsinneut Min (BarsSince (impulsedown), BarsSince (impulseup)) Stellen Sie eine einzelne Variable zu zeigen Anzahl der Balken im aktuellen Zustand in Abhängigkeit von tatsächlichen Impulse Der Status - Bullish, Bärische oder Neutral barsinstate IIf (ImpulseUp, barsinbull, IIf (Impulsedown, barsinbear, barsinneut)) Spalten für die Anzeige im Explorer AddTextColumn (ImpulseState, quotImpulse Statusquot, 1, Farbeweiß, ImpulseCol) AddColumn (barsinstate, quotBars in diesem statequot, 1, Farbeweiß, Impulsecol) AddTextColumn (Weekly, quotWeekly Trendquot, 1, Farbeweiß, WeeklyCol) AddTextColumn (MonthlyTrend, quotMonthly Trendquot, 1, Farbeweiß, MonthlyCol) SECTIONBEGIN (quotZIG - Zigquot) P ParamField (quotPrice fieldquot) ändern Param (zit changequot, 5,0.1,25,0.1) Plot (Zig (P, Wechsel), DEFAULT (), ParamColor (quotColorquot, colorCycle), ParamStyle (quotStylequot)) SectionEnd () Weekly MACD Histogran SECTIONBEGIN (quotWeekly MACDquot) TimeFrameSet (inDaily) MACDw MACD (12, 26) MACDwLINE MACD (12, 26) MACDwSignal Signal (12, 26, 9) Farbe IIf (Ref (MACDw, -1) gtMACDw, colorRed, FarbeBrightGreen) TimeFrameRestore () (MACDw, quotMACD Dailyquot, Farbe, styleHistogram 124 styleThick) Plot (MACDwLINE, quotMACD Täglich Linequot, Blau und Rot, Styleline) Plot (MACDwSignal, quotMACD Dail Signal Linequot, colorBrightGreen, Styleline) SectionEnd () DAILY FORCE INDEX 2DAY MA Perioden Param (quotPeriodsquot, 2, 1, 100, 1) FI EMA ((Schließen - Ref (Schließen, -1)) V), Zeiträume) FIkol IIf (fi lt 0, colorRed, colorBrightGreen) Plot (Close, quotClosequot, colorRed, 2) (FI, quotForce Indexquot, FIkol, styleLine124styleThick) Grundstück (0, quotquot, colorViolet, Styleline 124 styleThick 124 styleNoLabel) Titelname () EncodeColor (Farbeweiß) quot - Force-Index - quot WriteVal (Perioden, 1) quot Tagen, quot EncodeColor ( Blau und Rot) quot Schließen quot EncodeColor (Farbeweiß) quot quot WriteVal (Schließen), quot, quot EncodeColor (Farbeblau) quotForce Index quot EncodeColor (Farbeweiß) WriteVal (FI, 1.2) SectionEnd () SECTIONBEGIN (quotVolumequot) Plot (Volumen, DEFAULT (), ParamColor (quotColorquot, colorBlueGrey) ParamStyle (quotStylequot, styleHistogram 124 styleOwnScale 124 styleThick, maskHistogram), 2) SectionEnd () H1 Ref (H, -1) L1 Ref (L, -1) T IIf (HltH1 AND LgtL1, 0, IIf (Val1gtVal2, Val1, Val2) Avgval Median (Val, 22) Farbe IIf (Val lt Avgval, colorBlue, IIf (Val gt Avgval und Val lt Avgval 3, colorViolet, IIf (Val gt Avgval 3, colorOrange, colorViolet))) Plot (T, DEFAULT (), Farbe, styleHistogram 124 styleThick) P ParamField (quotPrice fieldquot, -1) Perioden param (quotPeriodsquot, 22, 2, 200, 1, 10) Grundstück (EMA (P, Perioden), quotEMA 22quot, colorGreen, styleThick) Tägliche BullPower SECTIONBEGIN (quotBull Strom EMAquot) Bull Power Lookback-param (quotEMA Lookbackquot, 13) BullPower Hoch (BullPower, 5.3) Tag ("BullPower", "BullPower", "BullPower", "BullPower" oder "BullPower" GraphXSpace 5 SectionEnd () Tägliche BearPower SECTIONBEGIN (quotBear Strom EMAquot) Bear Power Lookback Param (quotEMA Lookbackquot, 13) BearPower Low - EMA (Close, Lookback) Plot (BearPower, quotquot, ParamColor (quotColorquot, Blau und Rot), styleHistogram) Titelname ( ) Bear Powerquot WriteVal (Rückblick, 3.0) Tag: WriteVal (BearPower, 5.3) GraphXSpace 5 SECTIONEND () ELDER TRIPLE SCREEN SCAN Elder Triple Screen Trading System. Codiert von Dennis Skoblar 7052005. Abgeleitet von quotTrading für ein Livingquot und quotCome Into My Trading Roomquot von Alexander Elder. Dieser Scan findet Kandidaten durch die wöchentliche MACD Historgam Slope, und die Daily 2 Period Force Index Tauchen über oder unter it39s Zero Line. Planen Sie eine wöchentliche 26 Periode EMA, um zu helfen, die wöchentliche Richtung zu bestätigen. Es sollte zusammen mit einem uptick auf dem wöchentlichen MACD Histogramm zu steigen, um lang zu gehen. Allerdings schreibt Elder, dass Divergenzen im MACD Histogramm die EMA außer Kraft setzen. Der Daily 2 Period Force Index wird unterhalb von it39s Zero Line liegen. Suchen Sie nach dem Vorrat zu pullback, um um it39s Täglich 13 Periode EMA. Verwenden Sie auch die Daily 22 Period EMA, um die Richtung des täglichen Trends zu bestätigen. Tun Sie das Gegenteil für Shorts. Verwenden Sie die LongShort EMA Weekly Direction Tabs als Filter, um den Scan zu durchbrechen, um nur die Weekly EMA anzuzeigen, die in die beabsichtigte Tradingrichtung geht. Verwenden Sie die LongShort Elder Ray Tabs (BullPower AND BearPower), um die Eingangssignale fein abzustimmen. Diese Registerkarte wird am besten in Übereinstimmung mit den LongShort EMA Weekly Direction Tabs verwendet. Für die Filtermenge wird eine 50 Periode EMA gt 100000 verwendet. Ein Minimum von einem 5-Punkt-Lauf in einem Monat wird als Filter für einen stock39s-Bereich verwendet. Dieser Scan wird am Besten als Exploration verwendet. TimeFrameSet (inWeekly) WeeklyMACD MACD (12,26) - Signal (12,26,9) WeekHistRising Ref (WeeklyMACD, -1) lt Ref (WeeklyMACD, 0) WeekHistFalling Ref (WeeklyMACD, -1) gt Ref (WeeklyMACD, 0) FIWeekly EMA (V (C-Ref (C, -1)), 13) WeeklyForceIndexLong FIWeekly gt 0 WeeklyForceIndexShort FIWeekly lt 0 TimeFrameRestore () Wochen Kriterien MACDLongW WeekHistRising MACDShortW WeekHistFalling FILongW WeeklyForceIndexLong FIShortW WeeklyForceIndexShort Tages Kriterien FIDaily EMA (V (C-Ref ( C, -1)), 2) FILongD FIDaily lt 0 FIShortD FIDaily gt 0 VFilter EMA (V, 50) gt 100000 TenTwentyFilter HHV (H, 20) - LLV (L, 20) Wie viel Preis in einem Monat gegangen ist (gt10 Punkte, die bevorzugt sind) FiftyDayHVFilter Runde (StDev (log (CRef (C, -1)), 50) 100sqrt (256) Ein Jahr Volotilität (gt40 vorzuziehen) bullpower High - EMA (Close, 13) ) Scan Kriterien ElderLong MACDLongW UND FILongD UND FILongW ElderShort MACDShortW UND FIShortD UND FIShortW Spalten für die Exploration COLUMN0 Fullname () Column0Name quotTicker namequot Column1 quot quot Column1Name quot quot Column2 ElderLong Column2Name quotLongquot Column3 ElderLong UND EMA (C, 130) gt Ref (EMA (C , 130), - 5) Column3Name quotLong EMA Weekly Directionquot Column4 Column3 UND (bearpower lt 0 AND bullpower gt 0) Column4Name quotLong Elder Ray Filterquot Column5 quot quot Column5Name quot quot Column6 ElderShort Column6Name quotShortquot Column7 ElderShort UND EMA (C, 130) lt Ref (EMA (C, 130), - 5) Column7Name quotShort EMA Weekly Directionquot COLUMN8 Column7 UND (bearpower lt 0 AND bullpower gt 0) Column8Name quotShort Elder Ray Filterquot Column9 quot quot Column9Name quot quot Column10 TenTwentyFilter Column10Name quotOne Monat Punkt Rangequot Column11 FiftyDayHVFilter Column11Name quotHistorical Volotility 50 Dayquot AddTextColumn (IndustryID (1), quotIndustryquot) AddTextColumn (MarketID (1), quotMarketquot) Filter Filter VFilter UND (ElderLong OR ElderShort) Kaufen ElderLong 0 Verkaufen Short ElderShort Cover 0 Hc - 29. Juni 2006 12.38 Uhr (GMT ) Vielen Dank für den Austausch der Codes. BTW, verwenden Sie Metastock vor Wie funktioniert Amibroker im Vergleich zu Metastock Hope, um Ihre Kommentare zu Amibroker zu sehen. Jest1081 - June 29, 2006 02:54 PM (GMT) Nope ich habe keine Erfahrung mit metastock. Amibroker liefert. Auf der sehr grundlegenden, müssen Sie wissen, ein wenig Codierung, um ein grundlegendes Handelssystem zu machen. Ich düne ganz wie die Charts. Es ist nicht sehr knackig. Sie können alook auf meiner Blogsite es enthält ein paar Bilder, klicken Sie auf eine Sache sicher ist, je länger ich handeln, desto mehr Zufriedenheit will ich von ihm bekommen, funktioniert die Diagramme gut, aber fehlt Tiefe, wenn u wissen, was ich meine, nur Don39t geben Ihnen das 39feeling39. Dann wieder könnte ich noch am ambrroker bleiben, wenn ich Realzeit auf Futures und Indizes gehe. Forum-Mitarbeiter anzeigen Zuverlässiger Service mit über 8 Jahren Erfahrung. MySAR ADX Trading System für Amibroker (AFL) Tweet auf Twitter MySAR ADX Trading System für Amibroker (AFL) Parabolic Stop and Reversal, auch als Parabolic SAR bekannt, ist eine Strategie, die einen nachlaufenden Stop und verwendet Umgekehrte Methode, um festzustellen, was hilft Händler geben gute exit. J. Welles Wilder8217s Parabolic Stop und Reversal ist eine einfache Studie zu verwenden. Die Studie berechnet kontinuierlich Stop - und Reverse-Preispunkte. Immer, wenn der Markt Aktien-und Wertpapiermarkt technische Analyse, ist Parabolic SAR (Parabolic Stop und Reverse) eine Methode von J. Welles Wilder, Jr. entworfen, Es sieht aus, um über alle profitabel zu sein. Ich denke, der Trick ist, den Trend zu nutzen. Es wird immer Drawdown sein. Der Fokus muss auf den Trend gelegt werden. Meine Empfehlung ist, Lose zu addieren, während der Tendenz, Profite zu maximieren. Die gute Sache über den Indikator ist, dass es Sie aus einem verlierenden Handel ohne massiven Verlust erhalten wird. Also, wenn das System insgesamt profitabel ist, dann können wir weniger von den Peitschen pflegen. Whipsaw ist Vorspiel zum Gewinn. Eine Möglichkeit, die ich das Diagramm und kreiste, wenn eine Menge hinzugefügt werden sollte. Beachten Sie, wenn die Linie geht bewegt sich wegen einer Preisreduktion. Wir sollten die Kursbewegung ausnutzen. Dann verkaufen, wenn wir das Umkehrsignal zu bekommen. Wenn dies codiert werden kann, wäre ehrfürchtig. Diese SAR-Anzeige ist genial, da ich ein Trendfolger bin und sonst nichts. Hierbei handelt es sich um ein komplettes Handelssystem, das eine von Thomas Ludwig und ADX entwickelte, maßgeschneiderte SAR zur Filterung von Falschsignalen einsetzt. Es verfolgt die Kursbewegung und folgt dem Trend. Sourcecode 82128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212 Formel Name: MySAR ADX-System AuthorUploader: Abhishek Gupta Datetime am: 2014-Mar-09 Level: beginnermedium Flags: Handelsstrategie 82128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212 Dies ist ein komplettes Handelssystem eine angepasste SAR von Thomas Ludwig und ADX zum Filtern falsche Signale. Es verfolgt die Kursbewegung und folgt dem Trend. Verwendet PSAR xo von Thomas Ludwig wisestocktraderindicators2313-parabxo Geschrieben von: Abhishek Gupta 82128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212 SECTIONBEGIN (quotPricequot) SetChartOptions (0, chartShowArrowschartShowDates) N (Titel strFormat (zit 8211 öffnen g, Hallo g, Lo g, Close g (.1f) Vol quot WriteVal (V, 1,0) quot quot, O, H, L, C, SelectedValue (ROC (C, 1)))) Plot (C, quotClosequot, ParamColor (quotColorquot, colorDefault), styleNoTitle ParamStyle (quotStylequot) GetPriceStyle ()) SectionEnd () SECTIONBEGIN (quotPSAR xoquot) wisestocktraderindicators2313-parabxo 82128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212 Formel Name: parabXO AuthorUploader: Thomas Ludwig E-mail: Thomas. Ludwigmx. de Datetime am: 2005-03-21 15.19.39 Herkunft: Stichwort: Level: mittel Flags: Indikator Formel URL: amibrokerlibraryformula. phpid448 Details URL: amibrokerlibrarydetail. phpid448 82128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212 Dies ist eine Erweiterung des berühmten Parabolic SAR Indikator von Welles Wilder. Näheres siehe untenstehende Bemerkungen. 82128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212 ParabXO implementiert in AFL. Der unten stehende Code stützt sich stark auf den AFL-Code für die Parabolic SAR von Tomasz Janeczko in der AB-Bibliothek Anwendung: Drag amp Drop. Abgesehen davon, dass der Accelerator Factor und sein maximaler Wert über die Funktion Param () geändert wurden, habe ich 2 Erweiterungen durch eine einfache zusätzliche Codierung gemacht, die von Dennis Meyers in einem Artikel in der SampC 41995 Ausgabe eingeführt wurden: 1. Der Startwert des AF kann Unabhängig eingestellt werden, so dass Sie den Indikator erheblich schneller beeinflussen können. 2. Der ParabXO wird nicht umgekehrt, wenn er nicht durch eine bestimmte Menge (im Folgenden als "Crossover-Schwelle" bezeichnet) eingestochen wird, wodurch zu viele Peitschen verhindert werden. Sie kann auf 0 gesetzt werden, wenn Sie diese Änderung nicht verwenden möchten. Bitte beachten Sie, dass in Meyers8217 Artikel verwendet er eine absolute Zahl, während ein Prozentsatz macht mehr Sinn in meiner bescheidenen Meinung. Geschätzt von: Thomas Ludwig acc Param ("Acceleration factorquot, 0.1, 0.01, 0.1, 0.01) acc Optimize (quotAcceleration factorquot, acc, 0.01, 0.1, 0.01) afstart Param (quotStarting AF valuequot, 0.03, 0.01, 0.1, (quotStarting AF valuequot, afstart, 0,01, 0,1, 0,01) AFmax Param (quotMaximum AF valuequot, 0,06, 0,01, 0,1, 0,01) AFmax Optimieren (quotMaximum AF valuequot, AFmax, 0,01, 0,1, 0,01) Ct Param (quotCrossover Schwellenwert in quot , 0, 0, 1, 0,1) Ct Optimize (Crosselschwelle in Ct, 0, 1, 0,1) Ct1Ct100 IAF acc MaxAF afmax max Beschleunigung psar Schließen initialisieren psartemp Schließen long 1 übernehmen für Anfangsbedingungen af ​​afstart Startwert der Acellerationsfaktor ep Niedrig 0 init Extrempunkt hp Hoch 0 lp Niedrig 0 für (i 2 i lt BarCount i) wenn (lang) psar i psar i-1 af (hp 8211 psar i-1) psartemp i psar i (1-Ct1 ) Psar i psar i-1 af (lp 8211 psar i-1) psartemp i psar i (1Ct1) rückwärts 0 Prüfung auf Rückkehr if (long) if (Low i lt psar i (1-Ct1)) long 0 reverse 1 Umkehrposition zu kurzem psar i hp SAR ist hoher Punkt im prev Handel psartemp i hp lp Niedriges i af afstart anderes, wenn (hohes i gt psar i (1Ct1)) lang 1 rückwärts 1 reverse Position zum langen psar i lp psartemp i lp hp Hoch I af afstart if (rückwärts 0) if (long) if (hohes i gt hp) hp hohes i af af IAF wenn (af gt MaxAF) af MaxAF wenn (niedrig i 8211 1 lt psar i) psar i niedrig i 8211 1 wenn (Niedrig i 8211 2 lt psar i) psar i niedrig i 8211 2 sonst if (niedrig i lt lp) lp niedrig i af af IAF wenn (af gt MaxAF) af MaxAF wenn (hoch i 8211 1 gt psar i) psar i hoch i 8211 1, wenn (High i 8211 2 gt psar i) psar i hoch i 8211 2 Grundstück (psar, DEFAULT (), ParamColor (quotColorquot, Blau und Rot), styleDots styleNoLine styleThick) Plot (psartemp, DEFAULT (), ParamColor (quotColorquot, Blau und Rot), styleDots styleNoLine styleThick) SectionEnd () SECTIONBEGIN (quotADXquot) reichen Param (quotADX Periodquot, 13, 12, 25, 1) reichen Optimize (quotADX Periodquot, Reichweite, 20, 25, 1) MYADXFactor Param (quotADX Factorquot, 15, 12, 20, 1) MYADXFactor Optimize (quotADX Factorquot, MYADXFactor, 15, 20, 1) MYADX ADX (Bereich) SectionEnd () SECTIONBEGIN (quotTrading signalsquot) Kaufen Cross (Open, psartemp) UND MYADXgtMYADXFactor Kurz Kreuz (psartemp, Open) und MYADXgtMYADXFactor Kaufen Cross (Open, psartemp) Kaufen ExRem (Kaufen, Verkaufen) Verkaufen ExRem (Verkaufen, Kaufen) Short ExRem (Short, Cover) Cover ExRem (Cover, Short) BuyPrice ValueWhen (Kaufen, ShortPrice ValueWhen (Cover, Close) SellPrice ValueWhen (Verkaufen, schließen) dist 1.5ATR (10) for (i2 iltBarCount i) if (Coveri) PlotText (quotiert): CoverPricei, i1.5, L i - disti-3, colorLime) PlotText (quotnnProfit: quot (ShortPricei-CoverPricei), E1.5, L i - disti-3, colorLime) else if (Selli) PlotText (quotnSell gekauft: quot SellPricei, E1.5, H i disti5, colorOrange) PlotText (quotnnProfit: quot (SellPricei-BuyPricei), E1.5, H i disti5, colorOrange) if (Buyi) PlotText (quotBuy: quot BuyPricei, E1.5, L i - disti-3, colorLime) wenn andere (Shorti) PlotText (quotShort: quot ShortPricei, E1.5, H i disti5, colorOrange) PlotShapes (BuyshapeUpArrow, colorGreen, 0, Niedrig, -28) PlotShapes (ShortshapeDownArrow, Blau und Rot, 0, Hoch, -28) PlotShapes ( CovershapeHollowUpArrow, colorGreen, 0, Niedrig, -45) PlotShapes (SellshapeHollowDownArrow, Blau und Rot, 0, Hoch, -45) printf (quotnSignal kam quot IIf (BarsSince (Short) gtBarsSince (Buy), BarsSince (Buy), BarsSince (Short)) quot Bars agoquot) WriteIf (BarsSince (Short) gtBarsSince (Buy), quotnBuy quot BuyPrice, quotnShort quot ShortPrice) printf (quotTrailing SL: quot psar) printf (quotnnPossiblities quot) printf (quotnMax Gewinn: quot IIf (BarsSince (Short) gtBarsSince ( Kaufen), ((OHLC) 4-BuyPrice), (ShortPrice - (OHLC) 4))) printf (quotinMin Profit: IIf (BarsSince (Kurz) gtBarsSince (Kaufen), (ShortPrice-psar) schreiben)) Messages printf (quotnnLet der Gewinn run. quot) printf (quotnClose ein Anruf nur dann, wenn Hinter SL hitsquot) SectionEnd () sourcecodeAR TRADING SYSTEM AFL FREE Ich mache diese AFL AR TRADING SYSTEM AFL FREE Ich mache diese AFL FREE FREEFREE FREEFREE FREEFREE FREEFREE FREEFREE FREEFREE FREEFREE FREEFREE FREE FREE FREEFREE FREEFREE FREEFREE FREEFREE FREEFREE FREEFREE FREEFREE FREEFREE FREE FREE FREEFREE FREEFREE FREEFREE FREEFREE FREEFREE FREEFREE FREEFREE FREEFREE FREE FREE FREEFREE FREEFREE FREEFREE FREEFREE FREEFREE FREEFREE FREEFREE FREEFREE FREE sk ((C-MA (C, nol)) MA (C , nol)) 100 Graph0sk Graph0BarColorIIf (skgt0,5,4) SECTIONBEGIN (quotemaquot) Lk EMA (Close, 22) Plot (lk, quot quot, colorBrightGreen, styleDots) GfxSelectFont (quottohomaboldquot, Status (quotpxheightquot) 16) GfxSetTextAlign (6) GfxSetTextColor (ColorRGB (10250250)) GfxSetBkMode (0) GfxTextOut (Name (), Status (quotpxwidthquot) 2, Status (quotpxheightquot) 10) cxParam (quotcxposnquot, 1085,0,1200,1) cyParam (quotcyposnquot, 16,0,1000 , 1) GfxSetBkColor (ColorRGB (200,50,100)) GfxSelectFont (quottohomaboldquot, 20,98, false) GfxSetTextColor (Coloryellow) GfxSetTextColor (ColorHSB (100, 10, 400)) GfxTextOut (quotLTP. quotCquot quot, cx, cy) DDayO TimeFrameGetPrice (quotOquot, inDaily) DHiDay TimeFrameGetPrice (quotHquot, inDaily) DLoDay TimeFrameGetPrice (quotLquot, inDaily) GFR TimeFrameGetPrice (quotCquot, inDaily, -1) in der Nähe Titel EncodeColor (Farbeweiß) quot AR TRADING SYSTEM quotEncodeColor ( Farbe RGB (220,10,150)) quotiert Intervall (2) quotiert Datum () EncodeColor (ColorRGB (200,150,120)) n null öffnen O, hoch. H, Niedrig. "L EncodeColor (colorGreen)". EncodeColor (colorGreen) gfr EncodeColor (farbegelb) quotn ToDay Öffnen. DDayO high. DHiDay "Niedrig. (CCI (8) gt Ref (CCI (8), & ndash; 1), colorBrightGreen, colorDarkRed (CCI (8) gt 5, colorBrightGreen, IIf (CCI (8) lt-5, colorRed, (Ha, O, O, O, O, O, O, O, O, O, O, O, O, O, O) PlotOHLC (haOpen, HaHigh, halow, HaClose, quotquot. Colcci, styleCandle styleNoLabel) BKswitch ParamToggle (quotBackground Colorquot, quotOn, Offquot) OutColor ParamColor (quotOuter-Panel Colorquot, Farbeschwarz) INUPcolor ParamColor (quotInner-Panel Upperquot, colorGrey40) INDNcolor ParamColor (quotInner-Panel Lowerquot, Farbeschwarz) Title ParamColor (quotTitle Farbe quot, Farbeschwarz) if (NICHT BKswitch) SetChartBkColor (OutColor) Farbe der äußeren Grenze SetChartBkGradientFill (INUPcolor, INDNcolor, TitleCo lor) Farbe der Innenplatte SectionEnd () SECTIONBEGIN (quotquot) SetBarsRequired (100000, 0) GraphXSpace 15 ea EMA (C, 10) eb EMA (C, 20) SetBarFillColor (IIf (ea gt eb, colorGreen, Blau und Rot)) kaufen ea gt eb UND TimeNum () gt 092,000 UND TimeNum () lt 150000 verkaufen eb gt EA ODER TimeNum () gt 150000 Short 0 Cover 0 Kaufen ExRem (Kaufen, Verkaufen) Verkaufen ExRem (Verkaufen, Kaufen) Short ExRem (Short, Cover) Cover ExRem (Cover, Short) FactorParam (quotFactorquot, 4,1,10,1 ) PdParam (quotATR Periodsquot, 10,1,100,1) Bis (HL) 2 (FactorATR (Pd)) Dn (HL) 2- (FactorATR (Pd)) iATRATR (Pd) TrendUpTrendDownNull trend01 changeOfTrend0 flagflagh0 für (i 1 i ltBarCount i ) TrendUpi Null TrendDowni Null if (CloseigtUpi-1) trendi1 wenn (trendi-1 -1) changeOfTrend 1 sonst if (Closeilti-1) trendi-1 wenn (trendi-1 1) changeOfTrend 1 sonst if (trendi-11) trendi1 changeOfTrend 0 else if (trendi-1-1) trendi-1 changeOfTrend 0 Kaufen Trend1 Selltrend-1 BuyExRem (Kaufen, Verkaufen) SellExRem (Verkauf, Kauf) ShortSell CoverBuy BuyPriceValueWhen (Kauf, C) SellPriceValueWhen (Verkaufen, C) ShortPriceValueWhen (Short, C) CoverPriceValueWhen (Cover, C) PlotShapes (IIf (Kaufen, shapeSquare, shapeNone), colorGreen, 0, L, Offset-40) PlotShapes (IIf, PlotShapes (IIf (Kauf, shapeUpArrow, shapeNone), Farbeweiß, 0, L, Offset-45) PlotShapes (IIf (Short, shapeSquare, shapeNone), Blau und Rot, 0, H, Offset40) PlotShapes (IIf (Short, shapeSquare, shapeNone) , colorOrange, 0, H, Offset50) PlotShapes (IIf (Short, shapeDownArrow, shapeNone), Farbeweiß, 0, H, Offset-45) für (iBarCount-1igt1i--) if (Buyi 1) Eintrag Ci sig quotBUYquot sl TrendSLi TAR1 Eintrag (Eintrag .0050) tar2 Eintrag (Eintrag .0092) tar3 Eintrag (Eintrag .0179) bars ii 0 if (Selli 1) sig quotSELLquot Eintrag Ci sl TrendSLi tar1 Eintrag - (Eintrag .0050) tar2 Eintrag - (Eintrag .0112) tar3 Eintrag - (Eintrag 0,0212) Barren ii 0 Offset 20 Clr IIf (sig quotBUYquot, colorLime, Blau und Rot) ssl IIf (Bars BarCount-1, TrendSLBarCount-1, Ref (TrendSL, -1)) sl sslBarCount-1 Plot (Linearray (Strg-Versatz, tar1, BarCount, tar1,1), quotquot, Clr, styleLinestyleDots, Null, Null, Offset) Zeichnen (LineArray (tar2, BarCount, tar2,1), quotquot, Clr, styleLinestyleDots, Null , Null, Nullpunkt, Offset) Plot (LineArray (Balken-Offset, sl, BarCount, sl, 1), Zeichenkette, , quotquot, colorDarkRed, styleLinestyleLine, Null, Null, Offset) Plot(LineArray(bars-Offset, entry, BarCount, entry,1), quotquot, colorGreen, styleLinestyleLine, Null, Null, Offset) for (ibars i ltBarCounti) PlotText( quotquotsigquotquotentry, BarCount1,entry, Null, colorBlue) PlotText(quotT1quottar1,BarCount3,tar1,Null, Clr)Plot Text(quotT2quottar2,BarCount3,tar2,Null, Clr)PlotText (quotT3quottar3,BarCount3,tar3,Null, Clr) messageboard ParamToggle( quotMessage Boardquot, quotShowHidequot,1) if (messageboard 1 ) GfxSelectFont( quotTahomaquot, 13, 100 ) GfxSetBkMode( 1 ) GfxSetTextColor( colorWhite ) if ( sig quotBUYquot) GfxSelectSolidBrush( colorGreen ) this is the box background color else GfxSelectSolidBrush( colorRed ) this is the box background color pxHeight Status( quotpxchartheightquot ) xx Status( quotpxchartwidthquot) Left 1100 width 310 x 5 x2 290 GfxSelectPen( colorWhite, 4) broader color GfxRoundRect( x, y - 165, x2, y. 160, 90 ) GfxTextOut( ( quot AR TRADING SYSTEM quot),141,y-160) GfxTextOut( (quot quot),130,y-160) GfxTextOut( (quotLast quot sig quot Signal came quot (BarCount-bars-1) Interval()60 quot mins agoquot), 148, y-140) The text format location GfxTextOut( (quotquot WriteIf(sig quotBUYquot, sig quot quot, sig quot quot) quot. quot entry), 130, y-120) GfxTextOut( (quotSTOP LOSS. quot sl quot (quot WriteVal(IIf(sig quotSELLquot, entry-sl, sl-entry), 2.2) quot)quot), 130, y-100) GfxTextOut( (quotTGT:1. quot tar1), 130, y -80) GfxTextOut( (quotTGT:2. quot tar2), 130,y-60) GfxTextOut( (quotTGT:3. quot tar3), 130,y-40) GfxTextOut( (quotCurrent PL . quot WriteVal(IIf(sig quotBUYquot,(C-entry),(entry-C)),2.2)), 130, y-22) Buy ExRem(Buy, Sell) Sell ExRem(Sell, Buy) shape Buy shapeUpArrow Sell shapeDownArrow PlotShapes(IIf(Buy, shapeSquare, shapeNone),colorGreen, 0, L, Offset-40) PlotShapes(IIf(Buy, shapeSquare, shapeNone),colorLime, 0,L, Offset-50) PlotShapes(IIf(Buy, shapeUpArrow, shapeNone),colorWhite, 0,L, Offset-45) PlotShapes(IIf(Sell, shapeSquare, shapeNone),colorRed, 0, H, Offset40) PlotShapes(IIf(Sell, shapeSquare, shapeNone),colorOrange, 0,H, Offset50) PlotShapes(IIf(Sell, shapeDownArrow, shapeNone),colorWhite, 0,H, Offset-45) PlotShapes( shape, IIf( Buy, colorGreen, colorRed ),0, IIf( Buy, Low, High ) ) dist 2.5ATR(5) for( i 0 i lt BarCount i ) if( Buyi ) PlotText( quotBuynquot Closei, i, Lowi - disti, colorWhite ) if( Selli ) PlotText( quotsellnquot Closei, i, Lowi disti, colorWhite ) SECTIONBEGIN(quotemaquot) P ParamField(quotFieldquot) Type ParamList(quotTypequot, quotWeighted, Simple, Exponential, Double Exponential, Tripple Exponential, Wildersquot) Periods89 Param(quotPeriods180quot, 180, 2, 300 ) Displacement2 Param(quotDisplacement2quot, 2, -50, 50 ) Plot( EMA( P, Periods89 ), DEFAULTNAME(), colorWhite, styleDots, 0, 0, Displacement2 ) SECTIONEND() rjlCross(Lk, tar1) golCross(tar1,Lk ) PlotShapes(shapeHollowStarrjl, colorAqua,0,H,-20) PlotShapes(shapeHollowStargol, colorViolet,0,L,20) SECTIONEND() for( i 0 i lt BarCount i ) if( bvei ) PlotText( quotABnquot. i, L i - disti, colorWhite, colorDarkBlue ) if( rfwi ) PlotText( quotASnquot. i, H i disti, colorWhite, colorRed ) SECTIONBEGIN(quotdayquot) TimeFrameSet( inDaily ) switch now to dayily TimeFrameRestore() restore time frame to original Plot( TimeFrameExpand( Oo, inDaily),quotquot, colorYellow,10304 styleNoLabel) cx Param(quotcxposnquot,476,0,1200,1) cy Param(quotcyposnquot, 500,0,1000,10 ) GfxSelectFont( quot Arial quot, 14, 98, False ) GfxSetTextColor(ColorRGB(10,250,250)) GfxTextOut(quotVolume. quot Volume quotquot, cx 20,cy 50) SECTIONBEGIN(quottomquot) function GetSecondNum() Time Now( 4) Seconds int( Time 100 ) Minutes int( Time 100 100 ) Hours int( Time 10000 100 ) SecondNum int( Hours 60 60 Minutes 60 Seconds ) return SecondNum RequestTimedRefresh( 1 ) TimeFrame Interval() SecNumber GetSecondNum() Newperiod SecNumber TimeFrame 0 SecsLeft SecNumber - int( SecNumber TimeFrame ) TimeFrame SecsToGo TimeFrame - SecsLeft xParam(quotxposnquot,99,0,1000,1) yParam(quotyposnquot,40,0,1000,1) GfxRoundRect( x615, y530, x738, y499, 0,0 ) GfxSelectSolidBrush( ColorRGB( 230, 230, 230 ) ) GfxSelectPen( ColorRGB( 203, 25, 23 ), 3 ) if ( NewPeriod ) GfxSelectSolidBrush( colorYellow ) GfxSelectPen( colorYellow, 2 ) Say( quotNew periodquot ) GfxSetBkMode(1) GfxSelectFont( quotArialquot, 13, 800, False ) GfxSetTextColor(ColorRGB(220,10,150) ) GfxTextOut( quotTimeleftquotquot. quotNumToStr( SecsToGo, 1.0 ), x674, y507 ) GfxSetTextColor(ColorRGB(10,250,250)) GfxTextOut( ( quot Develop By quot),1150,y-45) GfxSetTextColor(ColorRGB(10,250,250)) GfxTextOut( ( quotAR Trading SYSTEM quot),1150,y-25) SECTIONBEGIN(quotRibbonquot) uptrendPDI()gtMDI()AND Signal()ltMACD() downtrendMDI()gtPDI()AND Signal()gtMACD() Plot( 1, efines the height of the ribbon in percent of pane width quotribbonquot, IIf( uptrend, colorLime, IIf( downtrend, colorRed, IIf(Signal()ltMACD(), colorLightGrey, colorLightGrey ))), choose color styleOwnScalestyleAreastyleNoLabel, -.05,50 ) SECTIONEND() Last edited by skumar4545 3rd January 2014 at 11:22 AM. Reason: add img