Bhs Trading System

Nouveau système bhs acheter vendre nifty Ci-dessous est afl similaire à ci-dessus, que j'ai copié de ---- peut-être ce forum seulement: SECTIONBEGIN (quotMA Diffquot) T26 KMA ((C-MA (C, T)) MA )) GraphOKMA Graph0Style24 Graph0BarColorIIf (KMAgt0,5,4) GraphXSpace5 SECTIONBEGIN (quotPricequot) SetChartOptions (0, chartShowArrowschartShowDates) Plot (C, quotClosequot, ParamColor (quotColorquot, colorBlack), styleNoTitle ParamStyle (quotStylequot) GetPriceStyle ()) SECTIONEND (QuotZIG-ZAGquot) P ParamField (quotPrice fieldquot) change Param (quot changequot, 5,0,1,25,0.1) SECTIONEND () SECTIONBEGIN (quotEMAquot) P ParamField (quotPrice fieldquot, -1) Périodes Param (quotPeriodsquot, 15, Param (quotSigned avgquot, 9, 2, 200, 1) r2 Param (quotSlow avgquot, 26, 2, 200, 1) r3 Param (quotMACD Explorationquot) 2, 200, 1) ZParam (quotzigquot, 1,0,10,0.1) Cond3 Zig (C, z) gtRef (Zig (C, z) Zig (C, z), - 4) Sell Cond4 AND Cond6 Trigger WriteIf (Buy, quotBuyquot, quotquot) BF IIf (Acheter, colorPaleGreen, IIf (Sell, colorRose, colorDefault) Achat, colorDarkGreen, IIf (Sell, colorDarkRed, colorDefault)) si (Status (quotactionquot) actionIndicator) Plot (C, quotquot, colorGrey50, styleBar) PlotShapes (IIf, 30) PlotShapes (IIf (Sell, shapeDownArrow, shapeNone), colorWhite, 0, H, Offset-30) Filtre Acheter OR Vendre SetOption (quotNoDefaultColumnsquot, True) AddTextColumn (Nom (), quotSymbolquot, 77, FG, BG, 120) AddColumn AddColumn (C, quotClosequot, 1.3) AddColumn (H, quotHighquot, 1.3) AddColumn (V, quotVolumequot) AddColumn (Ref (V, -1), quotP-Volquot) AddColumn (V Ref (V, -1) 100, quotIncrease in Volquot) AddColumn (Buy, quotBuyquot, 1) Forme Acheter shapeHollowUpTriangle Vendre shapeHollowDownTriangle PlotFormes Forme, IIf (Buy, colorBlue, colorBlue), 0, IIf (Buy, Low, High) GraphXSpace 7 SECTIONEND () SECTIONBEGIN (quotEMA3quot) P ParamField (quotPrice fieldquot, -1) Périodes Param (quotPeriodsquot, 15, 2, 300 , 1, 10) SECTIONEND () SECTIONBEGIN (quotBackground text) C13Param (quotfontsquot, 20,10,30,1) C14Param (quotleft-right, 2.1.1.0,5.0,0.1) C15Param (quotup-downquot, 12,1,20 , 1) État Miny (quotaxisminyquot) Statut Maxy (quotaxismaxyquot) lvb Statut (quotlastvisiblebarquot) fvb Statut (quotfvisiblebarquot) pxwidth Statut (quotpxwidthquot) pxheight Statut (quotpxheightquot) GfxSetBkMode (transparent1) GfxSetOverlayMode (1) GfxSelectFont (quotpxheightquot) ) GfxSetTextColor (ColorRGB (217,217,213)) GfxTextOut (Nom (), Statut (quotpxwidthquot) C14, Statut (quotpxheightquot) C15) GfxSelectFont (quotTahomaquot, Etat (quotpxheightquot) C130.5) GfxSetTextColor (ColorRGB (103,103,103)) GfxTextOut (Quotpxwidthquot) C14, Statut (quotpxheightquot) C152.5) ​​GfxSelectFont (quotPhhequequot, Etat (quotpxheightquot) C130.5) GfxSetTextColor (ColorRGB (103,103,103)) GfxTextOut (quot quot, Statut (quotpxwidthquot) C14, Statut (quotpxheightquot) ) CfChartBkColor (QuotOutre couleur du panneau quot, colorLightYellow)) SetChartBkColor (ParamColor (quotBackGround) (QuotSyncronize buy short with foreign indexquot, quotNoYesquot, 1) VolminParam (quotVolume minimumquot, 5000,0,10000000, 1) Syntaxe de l'attribut " 50) VolmaxParam (quotVolume maximumquot, 1000000,0,10000000,50) priceRLParam (quotPrix Range Minquot, 150,1,20000,1) priceRHParam (quotPrix Range Maxquot, 3000,1,20000,1) PercChangeminParam (quotPercentage Change Min setquot, -25, -100, 100, 0.1) PercChangemaxParam (quotPercentage Change Max setquot, 25, -100, 100, 0.1) PerctakeProfitParam (quotTake Profit Percent Setquot, 0.5,0.3,30,0.1) PercStoplossParam (quotStopLoss Percent Setquot, 1,0.2 , 0, 0, 1) PlotOH (Open, High, Low, Close, quotquot, colorWhite, styleCa ndle) Barres 0 xpdh 90 PlotRange (TimeNum () gt 85500 ET TimeNum () lt 153500) ET (DateNum () LastValue (DateNum ) FHRange (TimeNum () gt 085500 ET TimeNum () lt 093000) ET (DateNum () LastValue (DateNum ())) FHPrices FHRange élevé FHMarker BarsSince (FHRangegt0) NumBars 36000 Intervalle (1) TimeFrameSet (inDaily) (High, -1) Réf PDL (Bas, -1) Ref PDO (Open, -1) PDC Ref (Fermer, -1) PDM (PDHPDL) 2 TimeFrameRestore () isAll True isRth TimeNum () gt 085400 ET TimeNum () Lt 093000 isdRth TimeNum () gt 085400 ET TimeNum () lt 160000 aRthL IIf (isRth, L, 1000000) aRthH IIf (isdRth, H, Null) aRthLd IIf (isdRth, L, 1000000) TOP TimeFrameExpand (TOP, inDaily, expandFirst) PDH TimeFrameExpand (PDC, inDaily, expandFirst) PDH TimeFrameExpand (PDC, inDaily, expandFirst) PDH TimeFrameExpand (PDL, inDaily, expandFirst) PDH TimeFrameExpand (PDO, inDaily, FHL TimeFrameExpand (FHL, inDaily, expandFirst) DayH TimeFrameCompress (aRthH, inDaily, compressHigh) DayH TimeFrameExpand (DayH, inDaily, expandFirst) DayL TimeFrameCompress (aRthLd, inDaily , CompressLow) DayL TimeFrameExpand (DayL, inDaily, expandFirst) AIIf ((FC4ltFC1PDH0.005), FC1,0) BIIf ((FC4ltFC2PDH0.005 ET FC4gtFC1PDH0.005), FC2,0) ClIIf ((FC4ltFC3 ET FC4gtFC2PDH0.005), FC3,0) AF (ABCl) foreign SECTIONBEGIN (quotforeign Graphique de barre d'index) VrParamList (quotIndexquot, List quotNSEI, NSEBANK, CNXIT, NSMIDCP, RELIANCE. NS, SB IN. N Squot, 0) SetForeign (Vr) HaC HaO AMA (Ref (HaC, -1), 0,5) HaH Max (H, Max (HaC, HaO)) HaL Min (L, Min (HaC, HaO)) BG3HHV 8) BR3LLV (HHV (HaH, 4) - ATR (4), 8) co IIf (HacgtBG3, colorBrightGreen, IIf (Haclt BR3, colorRed, colorGrey50)) Plot (4, quotquot, Co, styleAreastyleOwnScale styleNoLabel, 100) RestorePriceArrays () SECTIONEND () BuyPrice (DayLAF) BuyTP1 (BuyPrice (BuyPrice (BuyPrice 100))) BuyTP2 (CgtBuyTP1) SellPrice (DayH-AF) SellTP1 (SellPrice - (SellPrice (PerctakeProfit 100)) SellTP2 (CltSellTP1) (C-TOP) TOP 100) Vol (VgtVolmin ET VltVolmax) Pourcentage (percchangegtPercChangemin ET percchangeltPercChangemax) prc (CgtpriceRL ET CltpriceRH) BuyStop1 (BuyPrice - (BuyPrice (PercStoploss 100))) BuyStop2IIf ((BuyStop1lSellPrice) ET SellPriceltBuyPrice, SellPrice , BuyStop1) SellStop1 (SellPrice (SellPrice (PercStoploss 100))) SellStop2IIf ((SellStop1gtBuyPrice) ET SellPriceltBuyPrice, BuyPrice, SellStop1) BuyStopIIf Barres BarsDepuis (TimeNum () gt 85400 ET TimeNum () lt 092900) x0 BarCount-LastValue (Barres) x1 BarCount-1 TOPLine LineArray (x0, LastValue (TOP), x1, LastValue (TOP), 0) PDHLine LineArray (x0, (PDL), x1, LastValue (PDC), x1, LastValue (PDC), x1, LastValue (PDH), 0) PDL Line LineArray (x0, LastValue (PDL) 0) FHL Line LineArray (x0, LastValue (FHH), x1, LastValue (FHH), 0) LigneDeDonnéesPMLine (x0, LastValue (PDM), x1, LastValue (PDM), 0) (X0, LastValue (BuyStop2), x1, La stValue (BuyStop2), 0) BuyPlineLineArray (x0, LastValue (BuyPrice), x1, L astValue (BuyPrice), 0) BuyStoplineLineArray (x0, LastValue (FHL) ), LastValue (BuyTP1), x1, LastVa lue (BuyTP1), 0) SellPricelineLineArray (x0, LastValue (SellPrice), x1, LastValue (SellPrice), 0) SellStoplineLineArray (x0, LastValue) 0) DayLlineLineArray (x0, LastValue (DayH), 0) DayLlineLineArray (x0, LastValue (DayL), x1, LastValue (SellTP1) (IIf (pShowtradeLines, SellPriceline, Null), quotShor t Herequot, colorRed, styleDotsstyleNoRescale) PlotShapes (IIf (pShowMarkers (TitleCode (colorWhite) quotBHS2 Systemquot quot - quot Nom () quot - quot EncodeColor (colorYellow) Intervalle (2) ) EncodeColor (colorYellow) quot - quot Date () quot - quot EncodeColor (colorYellow) quot - OpenquotWriteVal (O, 1) EncodeColor (colorYellow) quot - High quot WriteVal (H, 1) EncodeColor (colorYellow) quot - Ferme quot WriteVal C, 1) EncodeColor (colorYellow) quot - Vol quot WriteVal (V, 1) WriteIf (Percchange, quot Quoti, quotquot) (quotnquot) quot Précédent DayHighquotWriteVal (PDH, 1) quot, Previous DayLowquotWriteVal (PDL , 1) quot, Aujourd'hui HighquotWriteVal (DayH, 1) quot, Todays LowquotWriteVal (DayL, 1) Comm2 (quotn quotVrquot Phase: quot) WriteIf (HacgtBG3, EncodeColor (colorBrightGreen) quotUp quot, WriteIf (HacltBR3, EncodeColor (colorRed) GfxSelectPen (colorLightBlue, 3) GfxSelectSolidBrush (colorLightYellow) GfxRoundRect (20, 55, 180, 175, 15, 15) GfxSetBkMode (1) GfxSelectFont (quotArialquot, 10) GfxSelectPen (mode 0) GfxSetOverlayMode GfxSetTextColor (colorBrown) GfxSetTextAlign (0) GfxTextOut (WriteIf (Buystop2, quotTRP niveau: quot (Buystop2), quotquot), 30, 60) GfxTextOut (WriteIf (BuyPrice, quotBuy Above: quot (BuyPrice) , 30, 75) GfxTextOut (WriteIf (BuyStop2, quotLong SL: quot (BuyStop2), quotquot), 30, 90) GfxTextOut (WriteIf (BuyTP1. QuotLong Target 1: quot (BuyTP1), quotquot), 30, 105) GfxTextOut (WriteIf (SellPrice, quotSell Below: quot (SellPrice), 30, 120) GfxTextOut (WriteIf (SellStop2, quotShort SL: , Quotquot), 30, 135) AddColumn (V, quotVolumequot, 1.0) AddColumn (Percchange, quotChange quot, 1.2) AddColumn (BuyPrice, quotquot), 30, 135 GfxTextOut (WriteIf (SellP1, quotShort Target: QuotBuy atquot, 1.2) AddColumn (BuyPrint, quotBuy Stop atquot, 1.2) AddColumn (BuyTP1, quotBuy Profit atquot, 1.2) AddColumn (SellPrice, quotShort atquot, 1.2) AddColumn (SellTP1, quotShort profit atquot, 1.2) SECTIONBEGIN (quotshort signalquot) (OHCl) 4 HaOpen AMA (HaClose, -1), 0,5) HaHigh Max (H, Max (HaClose, HaOpen)) HaLow Min (L, Min (HaClose, HaOpen)) BG2HHV (4), 8) BR2LLV (HHV (High, 4) - ATR (4), 8) SetBarFillColor (IIf (O ltC, colorSeaGreen, colorOrange)) k Optimiser (quotKquot, Param (quotKquot, 1,75,1,5,0,25 ), 1,5,0,25) Par Optimiser (quotatrquot, Param (quotatrquot, 10,3,30,1), 3,30,1) jHaClose nm (HL) rfsctor WMA (nm, PER) 0 pour (i 1 i lt BarCount i) si (Trendi-1 1) if (ji lt NWi-1) Trendi -1 NWi ji Reversi autrement Trendi 1 if ((ji - Reversi) gt NWi-1) NWi ji - Reversi Si NWi-1 si (ji gt NWi-1) Trendi 1 NWi ji - Reversi autrement Trendi -1 si ((ji Reversi) lt NWi-1) NWi ji Reversi sinon NWi NWi-1 Parcelle (NW, quotquot, IIf (Tendance 1, 6, 4), 4) BuyCross (j, nw) ShortCross (nw, j) SellCross (nw, j) (Cover, Short) PlotShapes (IIf (Buy, shapeUpArrow, shapeNone), couleurWhite, 0, halow, -30) PlotShapes (IIf (Sell, shapeHollowDownTriangle, shapeNone), colorWhite, 0 , Hahigh, -15) PlotShapes (IIf (Couche, shapeHollowUpTriangle, shapeNone), couleurWhite, 0, halow, -15) PlotShapes (IIf (Court, shapeDownArrow, shapeNone), colorWhite, 0, hahigh, -30) ------- end -------------- ADDED PIVOTS LINES LATER ---- points de pivot DayH TimeFrameGetPrice (quotHquot, inDaily, -1) yesterdays high DayL TimeFrameGetPrice (quotLquot, inDaily , -1) low DayC TimeFrameGetPrice (quotCquot, inDaily, -1) fermer DayO TimeFrameGetPrice (quotOquot, inDaily) jour courant ouvert HiDay TimeFrameGetPrice (quotHquot, inDaily) LoDay TimeFrameGetPrice (quotLocation, inDaily) PP (DayH DayL DayO DayO) 2 PP) - DayH S1 (2 PP) - DayH R2 PP R1 - S1 S2 PP S1 - R1 R3 R2 (R1 - PP) S3 S2 - (PP - S1) style StyleLine styleThick styleNoRescale rcolor colorBlue scolor colorRed pcolor couleurWhite Plot (R1 (S1, quotS1quot, scolor, style) Plot (R2, quotR2quot, rcolor, style) Plot (S2, quotS2quot, scolor, style) Plot (PP, quotPPquot, , QuotS3quot, scolor, style) Roteur (R3, quotR3quot, rcolor, style) RangeTitle EncodeColor (colorWhite) quotDay Plage quot EncodeColor (colorWhite) Couleur de fond SetChartBkColor (ParamColor (quotPanel couleur quot, colorPaleBlue)) TicDiv Param (quotTic ou PIP valuequot, (C, quotClosequot, barcolor, styleCandle styleNoLabel) EMA34 EMA (C, quotClosequot, barcolor, styleNoLabel) C, 34) LSMA LinearReg (C, 25) PI atan (1,00) 4 périodes 30 HighHigh HHV (H, périodes) LowLow LLV (L, périodes) plage 25 (HighHigh - LowLow) LowLow x1EMA34 0 x2EMA34 2 y1EMA34 0 y2EMA34 (X2EMA34 - x1EMA34) (y2EMA34 - y1EMA34) (y2EMA34 - y1EMA34)) angleAM34 (x2EMA34 - x1EMA34) TitleAngleEMA34 EncodeColor (colorWhite) quotnCE34 angle quot angleEMA34 IIf (y2EMA34 gt 0, - angleEMA34, angleEMA34) Couleur ANGLEEMA IIf (angleEMA34 gt5, couleurTurquoise, IIf (angleEMA34 lt5 ET angleEMA34 gt3.57, couleurDarkGreen, IIf (angleEMA34 lt3.57 ET angleEMA34 gt2. 14, colorPaleGreen, IIf (angleEMA34 lt2.14 ET angleEMA34 gt.71, colorLime, IIf (angleEMA34 lt-15, couleurDarkRed, IIf (angleEMA34 gt-15 ET angleEMA34 lt-13.57, colorRed, IIf (angleEMA34 gt-13.57 ET angleEMA34 lt -12,14, colorOrange, IIf (angleEMA34 gt-12.14 ET angleEMA34 lt-1.71, colorLightOrange, colorYellow)))))))) Terrain (EMA34, quotEMA 34quot, ColorANGLEEMA, styleline styleThick styleNoLabel) Terrain (LSMA, quotLSMA 25quot, IIf ( C gt lsma, colorBrightGreen, IIf (C lsma, colorTeal, colorRed)), styleLine styleThick styleNoLabel) Hld IIf (C gt Ref (MA (H, 7), -1), 1, IIf , 7), -1), -1, 0)) Valeur Hlv (Hld 0, Hld, 1) Hilo IIf (Hlv-1, MA (H, 7) CouleurBleu, colorPink) Terrain (Hilo, quotHiLoquot, Trigger, styleStaircase) Titre EncodeColor (CouleurBlanc) Nom () quot - quot EncodeColor (colorRed) Intervalle (2) EncodeColor (colorTan) quot - quot date () quot - quotquotOp-quotOquot quotquotHi - quotHquot quotquotLo-quotLquot quot quotCl-quotCquot quot quotnquot quotVol quot WriteVal (V) quot, Aujourd'hui HighquotWriteVal (DayH, 2) quot, Todays LowquotWriteVal (DAYL, 2) SECTIONBEGIN (quotBuySell-nodllquot) ---------- -------------------------------------------------- ------------- SetChartOptions (0, chartShowArrowschartShowDates) N (Titre StrFormat (quot Ouvrir g, Hi g, Lo g, Fermer g (.1f) quot, O, H, L, C, ValeurCréée (ROC (C, 1)))) T26 BHSda ((C, T)) MA (C, T)) 100 fonctions fixées Graph0BHSda Graph0Style24 Graph0BarColorIIf (BHSdagt0,5,4) GraphXSpace5 SetChartOptions (0, chartShowArrowschartShowDates ) Terrain (C, quotClosequot, ParamColor (quotColorquot, CouleurNoir), styleNoTitle styleCandle) Plot (O, quotOpenquot, ParamColor (quotColorquot, CouleurNoir), styleNoDraw) Terrain (H, quotHighquot, ParamColor (quotColorquot, CouleurNoir), styleNoDraw) Terrain (L , QuotLowquot, ParamColor (quotColorquot, colorBlack), styleNoDraw) BSAU EMA (Max (C - Ref (C, -1), 0). BHEXPerc) BSAC EMA (Max (Ref (C, -1) - C, 0), BHEXPerc) x1 (BHSMPPer-1) (BSAC Value1) (100-Value1) , C x1 Valeur1) x2 (BHSMPPer-1) ((Valeur BSAC1) (100-Valeur2) - BSAU) BSR2 IIf (x2 gt 0, C x2, C x2 (100 Valeur2) Valeur2) Tracé Paramètre (BSR1, quotquot, colorOrange, styleDashed) Tracé (BSR2, quotquot, colorPaleBlue, styleDashed) r1 12 Param (quotFast avgquot, 12, 2, 200, 1) r2 26 Param (quotSlow avgquot, 26, 2, 200, 1) Param (quotSignal avgquot, 9, 2, 200, 1) Z 1 Param (quotzigquot, 1,0,10,0.1) Cond1 Croix (MACD (r1, r2), Signal (r1, r2, r3) (Z1, r2, r3), MACD (r1, r2)) Cond6 Zig (C, z) ltRef (Zig (C , Z), - 4) Sell Cond4 AND Cond6 Trigger WriteIf (Acheter, quotBuyquot, quotquot) BSG IIf (Acheter, colorPaleGreen, IIf (Sell, colorRose, colorDefault)) BSFG IIf (Buy, colorDarkGreen ), Filtrer Achat OU Vendez SetOption (quotNoDefaultColumnsquot, Vrai) AddTextColumn (Name (), quotSymbolquot, 77, BSFG, BSG, 120) AddColumn (DateTime (), quotDatequot, formatDateTime, BSFG, BSG, 100) AddColumn (TimeNum (), quotTimequot, 1, BSFG, BSG, 100) AddColumn (Buy, quotBuyquot, AddColumn (H, quotHighquot, 1.2, BSFG, BSG, 100) AddColumn (L, quotLowquot, 1.2, BSFG, BSG, 100) AddColumn (Sell, quotSellquot, BSFG, BSG, 100) Add Colonne (C, quotClosequot, 1,2, BSFG, BSG, 100) AddColumn (V (1), P-Volquot, 1, BSFG, -1) 100), quotIncrease dans Volquot, 1, BSFG, BSG, 100) forme (Acheter shapeHollowUpTriangle) (Sell shapeHollowDownTriangle) PlotShapes (forme, IIf (Buy, colorBlue, colorBlue) ) GraphXSpace 7 ----------------------------------------------- ------------------------------------------------- -------- C1320 Param (quotfontsquot, 20,10,30,1) C142.1 Param (quotleft-rightquot, 2.1,1.0,5.0,0.1) C1512 Param (quotup-downquot, 12,1,20 , 1) Statut Miny (quotaxisminyquot) Statut Maxy (quotaxismaxyquot) lvb Statut (quotlastvisiblebarquot) fvb Statut (quotfvisiblebarquot) pxwidth Statut (quotpxwidthquot) pxheight Statut (quotpxheightquot) GfxSetBkMode (transparent1) GfxSetOverlayMode (1) GfxSelectFont (quotpxheightquot) ) GfxSetTextColor (ColorRGB (217,217,213)) GfxTextOut (Nom (), Etat (quotpxwidthquot) C14, Etat (quotpxheightquot) C15) GfxSelectFont (quotTahomaquot, Statut (quotpxheightquot) C130.4) GfxSetTextColor (ColorRGB (103,103,103)) GfxSelectFont (QuotTahomaquot, Status (quotpxheightquot) C130.45) GfxSetTextColor (couleurWhite) GfxSelectFont (quotMS Sans Serifquot, 10, 500, Faux, Faux, 0) ------------------- -------------------------------------------------- --------------------------- SetChartBkGradientFill (ParamColor (quotBgTopquot, colorDarkOliveGreen), ParamColor (quotBgBottomquot, colorDarkGrey)) pShowtradeLines ParamToggle (quotShow Trade Linesquot, QuotNoYesquot, 1) VolminParam (quotVolume minimumquot, 50,0,10000000,50) VolmaxParam (quotVolume maximumquot, 1000000,0,10000000,50) priceRLParam (quotPrix Range Minquot, 50,1,120000,1) priceRHParam (quotPrix Range Maxquot, BSPeChMa25 Param (quotPercentage Change Max setquot, 25, -100, 100, 0,1) BSPeChMi-25 Param (quotPercentage Change Min setquot, -25, -100, 100, 0,1) BSPerChMa25 Paramètre Setquot, 0.6,0.3,30,0.1) BSPerStLosParam (quotStopLoss Pourcentage Setquot, 0.25,0.2,5,0.1) BSPlRng (TimeNum () gt 90000 ET TimeNum () lt 153000) ET (DateNum () LastValue (DateNum ())) BSFHRg (TimeNum () gt 090000 ET TimeNum () lt 093000) ET (DateNum () LastValue (DateNum ())) BSFHPrc Haute BSFHRg BSFHMrk BarsSince (BSFHRggt0) NumBars 36000 Intervalle (1) TimeFrameSet (inDaily) TOP Ouvrir PDH Ref (High , -1) Réf PDL (Bas, -1) Réf PDO (Open, -1) PDC Ref (Fermer, -1) PDM (PDHPDL) 2 TimeFrameRestore () isAll True isRth TimeNum () gt 085400 ET TimeNum () lt 093000 IsdRth TimeNum () gt 085400 ET TimeNum () lt 160000 aRthL IIf (isRth, L, 1000000) aRthH IIf (isdRth, H, Null) aRthLd IIf (isdRth, L, 1000000) TOP TimeFrameExpand (TOP, inDaily, expandFirst) PDH TimeFrameExpand (PDH, inDaily, expandFirst) PDL TimeFrameExpand (PDL, inDaily, expandFirst) PDO TimeFrameExpand (PDO, inDaily, expandFirst) PDC TimeFrameExpand (PDC, inDaily, expandFirst) PDM TimeFrameExpand (PDM, inDaily, expandFirst) FHH Ref (HHV (HighBSFHRg, NumBars), - BSFHMrk) FHL TimeFrameCompress (aRthL, inDaily, compressLow) FHL TimeFrameExpand (FHL, inDaily, expandFirst) DayH TimeFrameCompress (aRthH, inDaily, compressHigh) DayH TimeFrameExpand (DayH, inDaily, expandFirst) DAYL TimeFrameCompress (aRthLd, inDaily, compressLow ) DayL TimeFrameExpand (DayL, inDaily, expandFirst) AIIf ((FC4ltFC1PDH0.005), FC1,0) BIIf ((FC4ltFC2PDH0.005 ET FC4gtFC1PDH0.005), FC2,0) ClIIf ((FC4ltFC3 ET FC4gtFC2PDH0.005), FC3, (HaC, HaO)) HaL Min (L, Min (HaC, HaO)) BG3HHV (HCl, HaO) (4), 8) BR3LLV (HHV (HaH, 4) - ATR (4), 8) coIIf (HacgtBG3, colorBlue, IIf (Haclt BR3, colorRed, colorGrey50)) BuyPrice (DayLAF ) BSByTP1 (BuyPrice (BSPerTkProf 100))) BSByTP2 (CgtBSByTP1) SellPrice (DayH-AF) BSSlTP1 (SellPrice - (SellPrice (BSPerTkProf 100))) BSSlTP2 (CltBSSlTP1) (BSPerStLos 100)) BuyStop2IIf ((BuyStop1ltSellPrice) ET SellPriceltBuyPrice, SellPrice, BuyStop1) SellStop1 (SellPrice (SellPrice (BSPerStLos 100) Prix de vente (BSPerStLos 100) Prix de vente (BSPrChgtBSPeChMi et BSPrChltBSPeChMa) prc (CgtpriceRL et CltpriceRH) ) BuyStopIIf BuyStopIIf (Buy AND NOT BSByTP2), BuyStop2, Null) BuyTPIIf (Acheter AND NOT BuyStop, BSByTP2, Null) Barres BarresDepuis (TimeNum () gt 85400 ET TimeNum (Acheter et non BuyStop, BSByTP2, Null)) SellStop2IIf (SellStop1gtBuyPrice) ET SellPriceltBuyPrice, BuyPrice, ) X0 BarCount-LastValue (Barres) x1 BarCount-1 TOPLine LineArray (x0, LastValue (TOP), x1, LastValue (TOP), 0) PDHLine LineArray (x0, LastValue (PDH), x1, LastValue (PDH) , 0) PDL Line LineArray (x0, LastValue (PDL), x1, LastValue (PDL), 0) PDCLine LineArray (x0, LastValue (PDC), x1, LastValue (PDC) , X1, LastValue (PDM), 0) FHHLine LineArray (x0, LastValue (FHH), x1, LastValue (FHH), 0) FHLLine LineArray (x0, LastValue (FHL), x1, LastValue (FHL), 0) BuyPricelineLineArray x0, LastValue (BuyPrice), x1, L astValue (BuyPrice), 0) BuyStoplineLineArray (x0, LastValue (BuyStop2), x1, La stValue (BuyStop2), 0) BuyTPlineLineArray (x0, LastValue (BSByTP1), x1, LastV aleur ( 0) SellPricLineArray (x0, LastValue (SellPrice), x1, LastValue (SellPrice), 0) SellStoplineLineArray (x0, LastValue (SellStop2), x1, LastValue (SellStop2) (Xl, LastValue (DayL), x1, LastValue (DayL), 0) DayLlineLineArray (x0, LastValue (DayH), x1, LastValue (DayH), 0) PShowtradeLines, BuyStopline, Null), quotquot, colo rBrightGreen, styleDotsstyleNoRescale styleNoLine) Plot (IIf (pShowtradeLines, SellPriceline, Null), quotquot, co lorRed, styleDotsstyleNoRescale) if (Status (quotactionquot) actionIndicator) (Titre EncodeColor (colorWhite) quotBuySell system quot Quot - quot Nom () quot - quot EncodeColor (colorYellow) Intervalle (2) EncodeColor (colorYellow) quot - quot Date () quot - quot EncodeColor (colorYellow) quotOpen quotEncodeColor (couleurWhite) WriteVal , Haute quotEncodeColor (CouleurBlanc) WriteVal (H, 8.2) EncodeColor (colorYellow) quot, Low quotEncodeColor (CouleurBlanc) WriteVal (L, 8.2) EncodeColor (colorYellow) quot, Close quotEncodeColor (CouleurBlanc) WriteVal (C, 8.2) EncodeColor (colorYellow) Quot, Vol quotEncodeColor (couleurWhite) WriteVal (V, 1) (quotnquot)) --------------------------------- -------------------------------------------------- ---------------------------------- GfxSetOverlayMode (mode 0) GfxSelectPen (colorLightBlue, 2) GfxSelectSolidBrush (colorBlack) GfxRoundRect (5,65, 250, 180, 16, 20) GfxSetBkMode (1) GfxSelectFont (quotArialquot, 12, 700, False) GfxSetTextColor (colorBrown) GfxSetTextAlign (0) GfxSetTextColor (colorPaleGreen) GfxTextOut (WriteIf (BuyPrice, quotLong Cible 1: quotWriteVal (BuyPrice, 1.2), quotquot), 15, 73) GfxSetTextColor (colorLightBlue) GfxTextOut (WriteIf (BSByTP1. quotLong Cible 2: quotWriteVal (BSByTP1,1.2), quotquot), 15, 92) GfxSetTextColor (colorRed) GfxTextOut (WriteIf (SellPrice, quotShort Cible 1: quotWriteVal (SellPrice, 1.2), quotquot), 15, 111) GfxSetTextColor (colorOrange) GfxTextOut (WriteIf (BSSlTP1, quotShort Cible 2: quotWriteVal (BSSlTP1,1.2), quotquot), 15, 129) GfxSetTextColor (CouleurBlanc) GfxTextOut (WriteIf (BuyStopline, quotInstant Sup Res: quotWriteVal (BuyStopline, 1.2), quotquot), 15, (Achetez, vendez) SellExRem (Vente, Achat) ShortExRem (Court, Couverture) CoverExRem (Cover, Short) Achetez-le sur Amazon BuyCross (j, nw) ShortCross (nw, j) LongTip (Achat, Vente) Achat (vente, achat) dist 1.5ATR (15) Buy2show0 Sell2show0 pour (i 0 i lt BarCount i) if (Buyi) PlotText (quotBuyquot WriteVal (C i, 1.2), i-5, C i - Trendi, colorWhite, colorBlue) Buy2showCi si (Selli) PlotText (quotSellquot WriteVal (C i, 1), i-5, C i Trendi, colorWhite, colorRed) Sell2showC i AlertIf (Sell, quotSOUND C: WindowsMediaDing. wavquot, quotSellquot WriteVal (H, 1.2), 2) AlertIf (Acheter, quotSOUND C: WindowsMediaDing. wavquot, quotBuyquot WriteVal (O, 1.2), 1) GfxSetBkMode (transparent1) GfxSetOverlayMode (1) GfxSelectFont (quotTahomaquot, Status (quotpxheightquot) C13) GfxSetTextAlign (6 ) GfxSetTextColor (ColorRGB (217217213)) GfxTextOut (Nom (), statut (quotpxwidthquot) C14, Status (quotpxheightquot) C15) GfxSelectFont (quotTahomaquot, Status (quotpxheightquot) C130.4) GfxSetTextColor (ColorRGB (103103103)) GfxTextOut (quotFromquot, Statut (quotpxwidthquot) C141.8, Status (quotpxheightquot) C1510.5) GfxSelectFont (quotTahomaquot, Status (quotpxheightquot) C130.45) GfxSetTextColor (CouleurBlanc) GfxTextOut (quot buysellnifty quot, Status (quotpxwidthquot) C141.8, Status (quotpxheightquot) C1511 ) GfxSelectFont (quotMS Sans Serifquot, 10, 500, Faux, Faux, 0) --------------------------- pour tracer le prix d'achat GfxSetOverlayMode mode 0) GfxSelectPen (colorGreen, 2) GfxSelectSolidBrush (CouleurNoir) GfxRoundRect (5, 181250240, 15, 15) GfxSetBkMode (1) GfxSelectFont (quotArialquot, 12, 700, False) GfxSetTextColor (colorPaleGreen) GfxSetTextAlign (0) GfxTextOut (WriteIf (Acheter OU Long. quotBUY Signal A quotWriteVal (Buy2show, 1.2), quotquot), 10, 185) GfxTextOut (WriteIf (Vente OU shrt. Signal quotSELL À quotWriteVal (Sell2show, 1.2), quotquot), 10, 185) GfxSetTextColor (colorYellow) GfxTextOut (WriteIf ( Long and not Buy, quotBUY Profit quotWriteVal (C-Buy2show, 1.2), quotquot), 10, 205) GfxTextOut (WriteIf (shrt ET NOT Sell, quotSELL Profit quotWriteVal (Sell2show-C, 1.2) GfxSelectPen (colorOrange, 2) GfxSelectSolidBrush (colorBlack) GfxRoundRect (5, 20, 250, 63, 16, 28) GfxSelectPen (colorOrange, 2) GfxTextOut (WriteIf (Long ou encadré, quotCMP quotWriteVal (C, 1.2), quotquot) 20) GfxSetBkMode (1) GfxSelectFont (quotArialquot, 12, 700, False) GfxSetTextColor (colorPaleGreen) GfxSetTextAlign (0) GfxSetTextColor (colorYellow) GfxTextOut (WriteIf (SellPrice, quotTREND INVERSION: quot (SellPrice), quotquot), 8, 25) GfxSetTextColor (ColorRed) GfxTextOut (WriteIf (nw, quot Trailing SL, quotWriteVal (nw, 1), quotquot), 8, 43) GfxTextOut (WriteIf (Cover ET NOT Buy, quot Trailing SL. GfxSetTextColor (colorGold) GfxTextOut (WriteIf (nw, quot Trailing SL., QuotWriteVal (nw, 1), quotquot), 8, 43) GfxTextOut , Quot Trailing SL, quotWriteVal (nw, 1), quotquot), 8, 43) PlotShapes (IIf (Short, shapeDownArrow, shapeNone), Paramètre (quotPlot Fibsquot, quotOffOnquot, 1) pctH 0,325 Param (quotPivot Hi quot, 0,325,0,001,2,0,0,002) HiLB 1 Param (quotUp LookBackquot, 1,1, BarCount-1, 1) pctL 0,325 Param (quotPivot Lo quot, 0,325,0,001,2,0,0,002) LoLB 1 Param (quotDown LookBackquot, 1,1, BarCount-1,1) Retour 1 Param (quotExtend Left 2quot, 1,1,500,1) Fwd 0 Param (quotPlot Forwardquot, 0, 0, 500, 1) texte ParamToggle (quotPlot Textquot, quotOffOnquot, 1) hts -14 Param (quotText Shiftquot, -14, -50,50,0.10) style ParamStyle (quotLine Stylequot, styleLine, (PRp, H, HiLB)) xRp0 LastValue (ValueWhen (pRp, x, HiLB)) pSp TroughBars (L, pctL, 1) 0 YSp0 LastValue (ValeurWhen (pSp, L, LoLB)) xSp0 LastValue (ValeurWhen (pSp, x, LoLB)) Delta yRp0 - ySp0 fonction LFI (ret) retval (Delta ret) LFIVal IIf (retour lt 1.0 ET xSp0 lt xRp0, yRp0 - retval, IIf (ret lt 1.0 ET xSp0 gt xRp0, ySp0 retval, IIf (ret gt 1.0 et xSp0 lt xRp0, yRp0 - retval, IIf (ret gt 1.0 et xSp0 gt xRp0, ySp0 retval, Null))) retour LFIVal X0Min (xSp0, xRp0) - Back x1BarCount-1 r236 LFI (0.236) r236I LastValue (r236,1) r382 LFI (0.382) r382I DernièreValeur (r382,1) r050 LFI (0.50) r050I DernièreValeur (r050,1) r618 LFI 0.618) r618I LastValue (r618,1) r786 LFI (0.786) r786I DernièreValue (r786,1) e127 LFI (1.27) e127I DernièreValeur (e127,1) e162 LFI (1.62) e162I LastValue (e162,1) e200 LFI (2.00) E200I LastValue (e200,1) e262 LFI (2.62) e262I LastValue (e262,1) e424 LFI (4.24) e424I LastValue (e424,1) p00 IIf (xSp0 gt xRp0, ySp0, yRp0) p00I LastValue (p00,1) p100 IIf (xSp0 lt xRp0, ySp0, yRp0) p100I LastValue (p100,1) color00 IIf (xSp0 gt xRp0, colorLime, colorRed) color100 IIf (xSp0 lt xRp0, colorLime, colorRed) numbars LastValue (Cum (Status (quotbarvisiblequot))) (Pt1), LastValue (BarIndex ()) - (numbars hts), p00I 0.05, couleur00) PlotText (quot23 quot WriteVal (r236,1), LastValue (BarIndex ()) - (numbars hts), r236I 0.05, couleur00) PlotText (quot38 quot WriteVal (r382,1), LastValue (BarIndex ()) - (numbars hts) , R02I 0.05, couleur00) PlotText (quot50 quot WriteVal (r050,1), LastValue (BarIndex ()) - (numbars hts), r050I 0.05, color00) ) - (numbars hts), r618I 0.05, couleur00) PlotText (quot78 quot WriteVal (r786,1), LastValue (BarIndex ()) - (numbars hts) ), LastValue (BarIndex ()) - (numbars hts), p100I 0.05, couleur00) PlotText (quot127 quot WriteVal (e127,1), LastValue (BarIndex ()) - (numbars hts), e127I 0.05, WriteVal (e162,1), LastValue (BarIndex ()) - (numbars hts), e162I 0.05, couleur00) PlotText (quot200 quot WriteVal (e200,1), LastValue (BarIndex () Color00) PlotText (quot262 quot WriteVal (e262,1), LastValue (BarIndex ()) - (numbars hts), e262I 0.05, color00) PlotText (quot424 quot WriteVal (e424,1), LastValue (BarIndex () hts),e424I 0.05, color00) YH TimeFrameGetPrice(quotHquot, inDaily, -1) yesterdays high YL TimeFrameGetPrice(quotLquot, inDaily, -1) low YC TimeFrameGetPrice(quotCquot, inDaily, -1) close YO TimeFrameGetPrice(quotOquot, inDaily) current day open Normal Pivot PP (YH YL YC) 3 R1 (2 PP) - YL R2 PP (YH - YL) R3 YH 2(PP-YL) S1 (2 PP) - YH S2 PP - (YH - YL) S3 YL - 2(YH - PP) ------------------------------------------- ---------------------------------------- SECTIONEND() SECTIONBEGIN(quotBuySell Trendquot) Buy or Sell Condition Buy Cross(EMA( Close. 3 ),EMA( Close. 23 )) Sell Cross(EMA( Close. 23 ),EMA( Close. 3 )) Plot EMA Plot( EMA( Close,23), quot23 EMAquot, ParamColor(quotColorquot, colorBlack ),styleNoRescale) Plot( EMA( Close,3), quot3 EMAquot, ParamColor(quotColorquot, colorBlack ),styleNoRescale) Plot Ribbon Ribbon1IIf( EMA( Close. 3 )gtEMA( Close. 23 ),colorGreen, IIf(EMA( Close. 23 )gtEMA( Close. 3 ), colorRed, colorYellow)) Plot(3, quotRibbonquot, Ribbon1, styleOwnScale styleArea styleNoLabel,-0.5,100) SECTIONEND() uptCgtMA(C,21) AND CgtEMA(C,8) dntCltMA(C,21) AND CltEMA(C,8) nut( CltMA(C,21) AND CgtEMA(C,8)) OR ( CgtMA(C,21) AND CltEMA(C,8)) ColIIf(dnt, colorRed, IIf( upt, colorBlueGrey, IIf(nut, colorYellow, colorTan))) Plot( C, quotClosequot, col, styleNoTitle ParamStyle(quotStylequot) GetPriceStyle() ) Filter1 AddColumn(C, quotclosequot,1.2,1,Col)