Sunday, 26 November 2017

Ar Trading System Afl


AR HANDELSYSTEM AFL FREE Ich mache diese AFL sk ((C-MA (C, nol)) MA (C, nol)) 100 Graph0sk Graph0BarColorIIf (skgt0,5,4) SECTIONBEGIN (quotemaquot) Lk EMA (Schließen, 22) (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) schliessen Titel EncodeColor (colorWhite) AR-TRADING-SYSTEM quotEncodeColor (ColorRGB (220,10,150)) quadratisches Intervall (2) Datum () EncodeColor (ColorRGB (200,150,120) 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, colorRed)) Kaufen ea gt eb UND ZeitNum () gt 092000 UND TimeNum () lt 150000 Verkaufen eb gt EA ODER TimeNum () gt 150000 Short 0 Cover 0 ExRem kaufen (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 (Short, shapeSquare, shapeNone), colorRed, 0, H, Offset40) PlotShapes (IIf (Schmal, FormFarb, FormNone), FarbeWeiß, 0, , ColorOrange, 0, H, Offset50) PlotShapes (IIf (Short, shapeDownArrow, shapeNone), colorWhite, 0, H, Offset-45) für (iBarCount-1igt1i--) Wenn (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 - (Eingabe .0212) Bars ii 0 Versatz 20 Clr IIf (sig quotBUYquot, colorLime, colorRed) ssl IIf (Balken 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, (Ibars i ltBarCounti) PlotText (String-Offset, Eintrag, BarCount, Eintrag, 1), quotquot, colorGreen, styleLinestyleLine, Null, Null, quotquotsigquotquotentry, BarCount1, Eintrag, Null, Farbeblau) 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), wenn (Message 1) GfxSelectFont (quotTahomaquot, 13, 100) GfxSetBkMode (1) GfxSetTextColor (Farbeweiß) if (sig quotBUYquot) GfxSelectSolidBrush (colorGreen) dies die Hintergrundfarbe Box ist sonst GfxSelectSolidBrush (Blau und Rot) ist dies Die Kastenhintergrundfarbe pxHeight Status (quotpxchartheightquot) xx Status (quotpxchartwidthquot) Links 1100 Breite 310 x 5 x2 290 GfxSelectPen (colorWhite, 4) breitere Farbe GfxRoundRect (x, y - 165, x2, y. GfxTextOut ((Quote quot,), GfxTextOut ((Quot), GfxTextOut ((Quot-Quot) Der Textformatort GfxTextOut ((quotquot WriteIf (sig quotBUYquot, sig quot, sig quotiert)), 130, y-120) GfxTextOut ( (Z. B. STOP-VERLUST), (130, y-100) GfxTextOut ((TTTT: 1 tar1), 130 , Y-80) GfxTextOut ((quotTGT: 2.Tar2), 130, y-60) GfxTextOut ((TTTT: 3Tar3), 130, (Kaufen, Verkaufen) Verkaufen ExRem (Verkaufen, Kaufen) Form Kaufen shapeUpArrow Verkauf shapeDownArrow PlotShapes (IIf (Kaufen PlotShapes (IIf (Buy, shapeUpArrow, shapeNone), colorWhite, colorGreen, 0, L, Offset - 0, L, Offset-45) PlotShapes (IIf (Verkauf, shapeSquare, shapeNone), colorRed, 0, H, Offset40) PlotShapes (IIf (Sell, shapeSquare, shapeNone), colorOrange, (1), (2) (2) (2) (2) (2) (2) (2) (2) 0 i lt BarCount i) if (Buyi) PlotText (quotBuynquot Closei, i, Lowi - disti, Farbeweiß) if (Selli) PlotText (quotsellnquot Closei, i, Lowi disti, Farbeweiß) SECTIONBEGIN (quotemaquot) P ParamField (quotFieldquot) Typ ParamList (quotTypequot, quotWeighted, einfach, Exponential, Double Exponential, Tripple Exponential, Wildersquot) Periods89 Param (quotPeriods180quot, 180, 2, 300) Displacement2 Param (quotDisplacement2quot, 2, -50, 50) Grundstück (EMA (P, Periods89), DEFAULT (), Farbeweiß, styleDots, 0, 0, Displacement2) SectionEnd () rjlCross (Lk, TAR1) golCross (TAR1, Lk) PlotShapes (shapeHollowStarrjl, colorAqua, 0, H, -20) PlotShapes (shapeHollowStargol, colorViolet, 0, L , 20) SECTIONEND () für (i 0 i lt BarCount i) wenn (bvei) PlotText (quotBnot. i, L i - disti, Farbeweiß, colorDarkBlue) if (rfwi) PlotText (quotASnquot. i, H i disti, Farbeweiß, Blau und Rot) SECTIONBEGIN (quotdayquot) TimeFrameSet (inDaily) wechseln jetzt TimeFrameRestore () wiederherstellen Zeitrahmen ursprünglichen Plot zu dayily (TimeFrameExpand (OO, inDaily), quotquot, colorYellow, 10304 styleNoLabel) cx Param (quotcxposnquot, 476,0,1200,1) cy Param (quotcyposnquot, 500,0,1000,10) GfxSelectFont (Arial 14, , false) GfxSetTextColor (ColorRGB (10250250)) GfxTextOut (quotVolume. quot Volume quotquot, cx 20, cy 50) SECTIONBEGIN (quottomquot) Funktion GetSecondNum () Aktuelle Zeit (4) Sekunden int (Zeit 100) Minuten int (Zeit 100 100) Stunden int (Time 10000 100) secondNum int (Stunden 60 60 Minuten 60 Sekunden) return secondNum RequestTimedRefresh (1) Timeframe-Intervall () SecNumber GetSecondNum () Newperiod SecNumber Timeframe 0 SecsLeft SecNumber - int (SecNumber Timeframe) Timeframe SecsToGo Timeframe - SecsLeft xParam ( GfxSelectSolidBrush (ColorRGB (230, 230, 230)) GfxSelectPen (ColorRGB) 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 (10250250)) GfxTextOut ((zit von quot Entwickeln), 1150, y-45) GfxSetTextColor (ColorRGB (10250250)) GfxTextOut ((quotFu2 Handelssystem quot), 1150 , Y-25) SECTIONBEGIN (quotRibbonquot) uptrendPDI () gtMDI () UND Signal () ltMACD () AbwärtstrendMDI () gtPDI () UND Signal () gtMACD () Zeichnet die Höhe des Bandes in Prozent der Fensterbreite quotribbonquot, IIf (Aufwärtstrend, colorLime, IIf (Abwärtstrends, Blau und Rot, IIf (Signal () ltMACD (), colorLightGrey, colorLightGrey))), Farbe styleOwnScalestyleAreastyleNoLabel wählen, -.05,50) SectionEnd () Dieses funktioniert 100 wenn nicht, dann Scroll up und clcik auf download button Zuletzt bearbeitet von SuperSaiyan am 2. März 2014 um 09:46 Uhr. Re: AR TRADING SYSTEM AFL GRATIS Ich mache dieses AFL SuperSaiyan SuperSaiyan ist offline Member Registriert seit: Mar 2006 Beiträge: 115 Vielen Dank: 6 Thanked 101 Times in 53 Posts SuperSaiyan wird bald berühmt baldSuperSaiyan wird berühmt bald genug Default Re: AR TRADING SYSTEM AFL FREE Ich mache diese AFL Zitat: keine Handelszone fehlt kann jeder geben Sie den Code Working-Version von AFL Download LINK ARTrading. afl - 11 KB Clck die oben genannten Button zum Download Zusammen stehen wir stark 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. quot DLoDay SectionEnd () Colcci IIf (CCI (8) gt 5, colorBrightGreen, IIf (CCI (8) lt-5, Blau und Rot, IIf (CCI (8) gt Ref (CCI (8), - 1), colorBrightGreen, colorDarkRed (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, colorRed)) Kaufen ea gt eb UND ZeitNum () gt 092000 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), colorWhite, 0, H, Offset-45) für (iBarCount-1igt1i--) Wenn (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 - (Eingabe .0212) Bars ii 0 Versatz 20 Clr IIf (sig quotBUYquot, colorLime, colorRed) ssl IIf (Balken 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 (Balken-Offset, Eintrag, BarCount, Eintrag, 1), quotquot, colorGreen, styleLinestyleLine, Null, Null, Offset) für (Ibars i ltBarCounti) PlotText ( quotquotsigquotquotentry, BarCount1, Eintrag, Null, Farbeblau) 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), wenn (Message 1) GfxSelectFont (quotTahomaquot, 13, 100) GfxSetBkMode (1) GfxSetTextColor (Farbeweiß) if (sig quotBUYquot) GfxSelectSolidBrush (colorGreen) dies die Hintergrundfarbe Box ist sonst GfxSelectSolidBrush (Blau und Rot) ist dies das Feld Hintergrundfarbe pxHeight Status (quotpxchartheightquot) xx-Status (quotpxchartwidthquot) Linke 1100 Breite 310 x 5 x 2 290 GfxSelectPen (Farbeweiß, 4) breiter Farbe GfxRoundRect (x, y - 165, x2, y. GfxTextOut ((Quote quot,), GfxTextOut ((Quot), GfxTextOut ((Quot-Quot) Der Textformatort GfxTextOut ((quotquot WriteIf (sig quotBUYquot, sig quot, sig quotiert)), 130, y-120) GfxTextOut ( (Z. B. STOP-VERLUST), (130, y-100) GfxTextOut ((TTTT: 1 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 ( (Kaufen, Verkaufen) Verkaufen ExRem (Verkaufen, Kaufen) Form Kaufen shapeUpArrow Verkauf shapeDownArrow PlotShapes (IIf (Kaufen PlotShapes (IIf (Buy, shapeUpArrow, shapeNone), colorWhite, colorGreen, 0, L, Offset - 0, L, Offset-45) PlotShapes (IIf (Verkauf, shapeSquare, shapeNone), colorRed, 0, H, Offset40) PlotShapes (IIf (Sell, shapeSquare, shapeNone), colorOrange, (1), (2) (2) (2) (2) (2) (2) (2) (2) 0 i lt BarCount i) if (Buyi) PlotText (quotBuynquot Closei, i, Lowi - disti, Farbeweiß) if (Selli) PlotText (quotsellnquot Closei, i, Lowi disti, Farbeweiß) SECTIONBEGIN (quotemaquot) P ParamField (quotFieldquot) Typ ParamList (quotTypequot, quotWeighted, einfach, Exponential, Double Exponential, Tripple Exponential, Wildersquot) Periods89 Param (quotPeriods180quot, 180, 2, 300) Displacement2 Param (quotDisplacement2quot, 2, -50, 50) Grundstück (EMA (P, Periods89), DEFAULT (), Farbeweiß, styleDots, 0, 0, Displacement2) SectionEnd () rjlCross (Lk, TAR1) golCross (TAR1, Lk) PlotShapes (shapeHollowStarrjl, colorAqua, 0, H, -20) PlotShapes (shapeHollowStargol, colorViolet, 0, L , 20) SECTIONEND () für (i 0 i lt BarCount i) wenn (bvei) PlotText (quotBnot. i, L i - disti, Farbeweiß, colorDarkBlue) if (rfwi) PlotText (quotASnquot. i, H i disti, Farbeweiß, Blau und Rot) SECTIONBEGIN (quotdayquot) TimeFrameSet (inDaily) wechseln jetzt TimeFrameRestore () wiederherstellen Zeitrahmen ursprünglichen Plot zu dayily (TimeFrameExpand (OO, inDaily), quotquot, colorYellow, 10304 styleNoLabel) cx Param (quotcxposnquot, 476,0,1200,1) cy Param (quotcyposnquot, 500,0,1000,10) GfxSelectFont (Arial 14, , false) GfxSetTextColor (ColorRGB (10250250)) GfxTextOut (quotVolume. quot Volume quotquot, cx 20, cy 50) SECTIONBEGIN (quottomquot) Funktion GetSecondNum () Aktuelle Zeit (4) Sekunden int (Zeit 100) Minuten int (Zeit 100 100) Stunden int (Time 10000 100) secondNum int (Stunden 60 60 Minuten 60 Sekunden) return secondNum RequestTimedRefresh (1) Timeframe-Intervall () SecNumber GetSecondNum () Newperiod SecNumber Timeframe 0 SecsLeft SecNumber - int (SecNumber Timeframe) Timeframe SecsToGo Timeframe - SecsLeft xParam ( GfxSelectSolidBrush (ColorRGB (230, 230, 230)) GfxSelectPen (ColorRGB) 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 (10250250)) GfxTextOut ((zit von quot Entwickeln), 1150, y-45) GfxSetTextColor (ColorRGB (10250250)) GfxTextOut ((quotFu2 Handelssystem quot), 1150 , Y-25) SECTIONBEGIN (quotRibbonquot) uptrendPDI () gtMDI () UND Signal () ltMACD () AbwärtstrendMDI () gtPDI () UND Signal () gtMACD () Zeichnet die Höhe des Bandes in Prozent der Fensterbreite quotribbonquot, IIf (Aufwärtstrend, colorLime, IIf (Abwärtstrends, Blau und Rot, IIf (Signal () ltMACD (), colorLightGrey, colorLightGrey))), Farbe styleOwnScalestyleAreastyleNoLabel wählen, -.05,50) SectionEnd () Dieses funktioniert 100 wenn nicht, dann Scroll up und clcik auf Download-Button Schneiden Sie Ihre Verluste schnell, ohne zu zögern. Kaufen Sie richtig, sitzen Sie fest. Es war nie mein Denken, das das große Geld für mich machte, es saß immer. Jesse Livermore Wenn es chnages 30 ein Tag Es gibt nur eine Seite zu vermarkten und thats Right side Zuletzt bearbeitet von SuperSaiyan 2nd March 2014 am 08:46 PM. Sir können Sie bitte erklären, wie man dieses Ar Trading System für die Eingabe amp Ausstieg eines Handels verwenden. ThanksAR 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) Grundstück ( 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. quot DLoDay SectionEnd () Colcci IIf (CCI (8) gt 5, colorBrightGreen, IIf (CCI (8) lt-5, Blau und Rot, IIf (CCI (8) gt Ref (CCI (8), - 1), colorBrightGreen, colorDarkRed (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, colorRed)) Kaufen ea gt eb UND ZeitNum () gt 092000 UND TimeNum () lt 150000 Verkaufen eb gt EA ODER TimeNum () gt 150000 Short 0 Cover 0 ExRem kaufen (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 (Short, shapeSquare, shapeNone), colorRed, 0, H, Offset40) PlotShapes (IIf (Schmal, shapeSpiegel, FormNone), FarbeWeiß, 0, , ColorOrange, 0, H, Offset50) PlotShapes (IIf (Short, shapeDownArrow, shapeNone), colorWhite, 0, H, Offset-45) für (iBarCount-1igt1i--) Wenn (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 - (Eingabe .0212) Bars ii 0 Versatz 20 Clr IIf (sig quotBUYquot, colorLime, colorRed) ssl IIf (Balken 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, (Ibars i ltBarCounti) PlotText (String-Offset, Eintrag, BarCount, Eintrag, 1), quotquot, colorGreen, styleLinestyleLine, Null, Null, quotquotsigquotquotentry, BarCount1, Eintrag, Null, Farbeblau) 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), wenn (Message 1) GfxSelectFont (quotTahomaquot, 13, 100) GfxSetBkMode (1) GfxSetTextColor (Farbeweiß) if (sig quotBUYquot) GfxSelectSolidBrush (colorGreen) dies die Hintergrundfarbe Box ist sonst GfxSelectSolidBrush (Blau und Rot) ist dies Die Kastenhintergrundfarbe pxHeight Status (quotpxchartheightquot) xx Status (quotpxchartwidthquot) Links 1100 Breite 310 x 5 x2 290 GfxSelectPen (colorWhite, 4) breitere Farbe GfxRoundRect (x, y - 165, x2, y. GfxTextOut ((Quote quot,), GfxTextOut ((Quot), GfxTextOut ((Quot-Quot) Der Textformatort GfxTextOut ((quotquot WriteIf (sig quotBUYquot, sig quot, sig quotiert)), 130, y-120) GfxTextOut ( (Z. B. STOP-VERLUST), (130, y-100) GfxTextOut ((TTTT: 1 tar1), 130 , Y-80) GfxTextOut ((quotTGT: 2.Tar2), 130, y-60) GfxTextOut ((TTTT: 3Tar3), 130, (Kaufen, Verkaufen) Verkaufen ExRem (Verkaufen, Kaufen) Form Kaufen shapeUpArrow Verkauf shapeDownArrow PlotShapes (IIf (Kaufen PlotShapes (IIf (Buy, shapeUpArrow, shapeNone), colorWhite, colorGreen, 0, L, Offset - 0, L, Offset-45) PlotShapes (IIf (Verkauf, shapeSquare, shapeNone), colorRed, 0, H, Offset40) PlotShapes (IIf (Sell, shapeSquare, shapeNone), colorOrange, (1), (2) (2) (2) (2) (2) (2) (2) (2) 0 i lt BarCount i) if (Buyi) PlotText (quotBuynquot Closei, i, Lowi - disti, Farbeweiß) if (Selli) PlotText (quotsellnquot Closei, i, Lowi disti, Farbeweiß) SECTIONBEGIN (quotemaquot) P ParamField (quotFieldquot) Typ ParamList (quotTypequot, quotWeighted, einfach, Exponential, Double Exponential, Tripple Exponential, Wildersquot) Periods89 Param (quotPeriods180quot, 180, 2, 300) Displacement2 Param (quotDisplacement2quot, 2, -50, 50) Grundstück (EMA (P, Periods89), DEFAULT (), Farbeweiß, styleDots, 0, 0, Displacement2) SectionEnd () rjlCross (Lk, TAR1) golCross (TAR1, Lk) PlotShapes (shapeHollowStarrjl, colorAqua, 0, H, -20) PlotShapes (shapeHollowStargol, colorViolet, 0, L , 20) SECTIONEND () für (i 0 i lt BarCount i) wenn (bvei) PlotText (quotBnot. i, L i - disti, Farbeweiß, colorDarkBlue) if (rfwi) PlotText (quotASnquot. i, H i disti, Farbeweiß, Blau und Rot) SECTIONBEGIN (quotdayquot) TimeFrameSet (inDaily) wechseln jetzt TimeFrameRestore () wiederherstellen Zeitrahmen ursprünglichen Plot zu dayily (TimeFrameExpand (OO, inDaily), quotquot, colorYellow, 10304 styleNoLabel) cx Param (quotcxposnquot, 476,0,1200,1) cy Param (quotcyposnquot, 500,0,1000,10) GfxSelectFont (Arial 14, (False) GfxSetTextColor (ColorRGB (10.250.250)) GfxTextOut (Quotomquot) Funktion GetSecondNum () Zeit Jetzt (4) Sekunden int (Zeit 100) Minuten int (Zeit 100 100) Stunden int (Time 10000 100) secondNum int (Stunden 60 60 Minuten 60 Sekunden) return secondNum RequestTimedRefresh (1) Timeframe-Intervall () SecNumber GetSecondNum () Newperiod SecNumber Timeframe 0 SecsLeft SecNumber - int (SecNumber Timeframe) Timeframe SecsToGo Timeframe - SecsLeft xParam ( GfxSelectSolidBrush (ColorRGB (230, 230, 230)) GfxSelectPen (ColorRGB) 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 (10250250)) GfxTextOut ((zit von quot Entwickeln), 1150, y-45) GfxSetTextColor (ColorRGB (10250250)) GfxTextOut ((quotAR Handelssystem quot), 1150 , Y-25) SECTIONBEGIN ("Ribbonquot") uptrendPDI () gtMDI () UND Signal () ltMACD () AbwärtstrendMDI () gtPDI () UND Signal () gtMACD () Zeichnet die Höhe des Bandes in Prozent der Fensterbreite quotribbonquot, IIf (Aufwärtstrend, colorLime, IIf (Abwärtstrends, Blau und Rot, IIf (Signal () ltMACD (), colorLightGrey, colorLightGrey))), Farbe styleOwnScalestyleAreastyleNoLabel wählen, -.05,50) SectionEnd () von skumar4545 3. Januar 2014 Zuletzt bearbeitet Um 11:22 Uhr. Grund: Addieren Sie imgMySAR ADX-Handelssystem für Amibroker (AFL) Tweet auf Twitter MySAR ADX-Handelssystem für Amibroker (AFL) Parabolischer Stopp und Umkehrung, auch bekannt als Parabolische SAR, ist eine Strategie, die einen nachlaufenden Stopp und umgekehrte Methode verwendet, um festzustellen, welche 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. My recommendation is to add lots to during the trend to maximize profits. The good thing about the indicator is that it will get you out of a losing trade without massive loss. So if the system is overall profitable, then we can care less of the whipsaws. Whipsaw is prelude to profit. One way I provided the chart and circled when a lot should be added. Notice when the line goes moves down its because of a price break. We should take advantage of the price movement. Then sell when we get the reversal signal. If this can be coded that would be awesome. This SAR indicator is awesome since I am a trend follower and nothing else. This is a complete trading system using a customized SAR designed by Thomas Ludwig and ADX for filtering false signals. It tracks price movement and follows trend. sourcecode 82128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212 Formula Name: MySAR ADX System AuthorUploader: Abhishek Gupta DateTime Added: 2014-Mar-09 Level: beginnermedium Flags: trading strategy 82128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212 This is a complete trading system using a customized SAR designed by Thomas Ludwig and ADX for filtering false signals. It tracks price movement and follows trend. Uses PSAR xo by Thomas Ludwig wisestocktraderindicators2313-parabxo Written by: Abhishek Gupta 82128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212 SECTIONBEGIN(quotPricequot) SetChartOptions(0,chartShowArrowschartShowDates) N(Title StrFormat(quot 8211 Open g, Hi 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 Formula Name: ParabXO AuthorUploader: Thomas Ludwig E-mail: Thomas. Ludwigmx. de DateTime Added: 2005-03-21 15:19:39 Origin: Keywords: Level: medium Flags: indicator Formula URL: amibrokerlibraryformula. phpid448 Details URL: amibrokerlibrarydetail. phpid448 82128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212 This is an enhancement of the famous Parabolic SAR indicator by Welles Wilder. For more details see the remarks below. 82128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212821282128212 ParabXO implemented in AFL. The code below relies heavily on the AFL code for the Parabolic SAR by Tomasz Janeczko in the AB library Application: Drag amp Drop. Aside from making the Accelerator Factor and its maximum value changeable via the Param() function I made 2 enhancements by some simple additional coding that were introduced by Dennis Meyers in an article in the SampC 41995 issue: 1. The start value of the AF can be set independently thus you can make the indicator react considerably faster. 2. The ParabXO does not reverse unless penetrated by a specified amount (called quotCrossover threshold in quot below) thus preventing too many whipsaws. It can be set to 0 if you don8217t want to use this modification. Please note that in Meyers8217 article he used an absolute number whereas a percentage makes more sense in my humble opinion. Written by: Thomas Ludwig acc Param(quotAcceleration 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, 0.01) afstart Optimize(quotStarting AF valuequot, afstart, 0.01, 0.1, 0.01) afmax Param(quotMaximum AF valuequot, 0.06, 0.01, 0.1, 0.01) afmax Optimize(quotMaximum AF valuequot, afmax, 0.01, 0.1, 0.01) Ct Param(quotCrossover threshold in quot, 0, 0, 1, 0.1) Ct Optimize(quotCrossover threshold in quot, Ct, 0, 1, 0.1) Ct1Ct100 IAF acc MaxAF afmax max acceleration psar Close initialize psartemp Close long 1 assume long for initial conditions af afstart starting value of the acelleration factor ep Low 0 init extreme point hp High 0 lp Low 0 for( i 2 i lt BarCount i ) if ( long ) psar i psar i-1 af ( hp 8211 psar i-1 ) psartemp i psar i (1-Ct1) else psar i psar i-1 af ( lp 8211 psar i-1 ) psartemp i psar i (1Ct1) reverse 0 check for reversal if ( long ) if ( Low i lt psar i (1-Ct1) ) long 0 reverse 1 reverse position to Short psar i hp SAR is High point in prev trade psartemp i hp lp Low i af afstart else if ( High i gt psar i (1Ct1) ) long 1 reverse 1 reverse position to long psar i lp psartemp i lp hp High i af afstart if ( reverse 0 ) if ( long ) if ( High i gt hp ) hp High i af af IAF if( af gt MaxAF ) af MaxAF if( Low i 8211 1 lt psar i ) psar i Low i 8211 1 if( Low i 8211 2 lt psar i ) psar i Low i 8211 2 else if ( Low i lt lp ) lp Low i af af IAF if( af gt MaxAF ) af MaxAF if( High i 8211 1 gt psar i ) psar i High i 8211 1 if( High i 8211 2 gt psar i ) psar i High i 8211 2 Plot( psar, DEFAULTNAME(), ParamColor( quotColorquot, colorRed ), styleDots styleNoLine styleThick ) Plot( psartemp, DEFAULTNAME(), ParamColor( quotColorquot, colorRed ), styleDots styleNoLine styleThick ) SECTIONEND() SECTIONBEGIN(quotADXquot) range Param(quotADX Periodquot, 13, 12, 25, 1) range Optimize(quotADX Periodquot, range, 20, 25, 1 ) MYADXFactor Param(quotADX Factorquot, 15, 12, 20, 1) MYADXFactor Optimize(quotADX Factorquot, MYADXFactor, 15, 20, 1) MYADX ADX(range) SECTIONEND() SECTIONBEGIN(quotTrading signalsquot) Buy Cross(Open, psartemp) AND MYADXgtMYADXFactor Short Cross(psartemp, Open) AND MYADXgtMYADXFactor Sell Cross(psartemp, Open) Cover Cross(Open, psartemp) Buy ExRem(Buy, Sell) Sell ExRem(Sell, Buy) Short ExRem(Short, Cover) Cover ExRem(Cover, Short) BuyPrice ValueWhen(Buy, Close) ShortPrice ValueWhen(Short, Close) CoverPrice ValueWhen(Cover, Close) SellPrice ValueWhen(Sell, Close) dist 1.5ATR(10) for (i2 iltBarCount i) if (Coveri) PlotText( quotnCover short: quot CoverPricei, i1.5, L i - disti-3, colorLime) PlotText( quotnnProfit: quot (ShortPricei-CoverPricei), i1.5, L i - disti-3, colorLime) else if (Selli) PlotText( quotnSell bought: quot SellPricei, i1.5, H i disti5, colorOrange) PlotText( quotnnProfit: quot (SellPricei-BuyPricei), i1.5, H i disti5, colorOrange) if(Buyi) PlotText( quotBuy: quot BuyPricei, i1.5, L i - disti-3, colorLime) else if( Shorti) PlotText( quotShort: quot ShortPricei, i1.5, H i disti5, colorOrange) PlotShapes(BuyshapeUpArrow, colorGreen, 0, Low, -28) PlotShapes(ShortshapeDownArrow, colorRed, 0, High, -28) PlotShapes(CovershapeHollowUpArrow, colorGreen, 0, Low, -45) PlotShapes(SellshapeHollowDownArrow, colorRed, 0, High, -45) printf(quotnSignal came 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 Profit: quot IIf(BarsSince(Short)gtBarsSince(Buy), ((OHLC)4-BuyPrice), (ShortPrice-(OHLC)4)) ) printf(quotnMin Profit: quot IIf(BarsSince(Short)gtBarsSince(Buy), (psar-ShortPrice), (ShortPrice-psar))) Write Messages printf(quotnnLet the profit run. quot) printf(quotnClose a call only when trailing SL hitsquot) SECTIONEND() sourcecode

No comments:

Post a Comment