Advertisement
Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- _SECTION_BEGIN("MA Diff");
- T=26;
- KMA=((C-MA(C,T))/MA(C,T))*100;
- Graph0=KMA;
- Graph0Style=2+4;
- Graph0BarColor=IIf(KMA>0,5,4);
- GraphXSpace=5;
- _SECTION_END();
- SetChartBkColor(colorGrey40);
- cx=Param("cxposn",1000,0,1000,1);
- cy=Param("cyposn",6,0,1000,1);
- GfxSetBkColor(ColorRGB(200,50,300));
- GfxSelectFont( "Bodoni MT",18,98, False);
- GfxSetTextColor( colorWhite);
- GfxTextOut(" "+C+" ", cx, cy );
- _SECTION_BEGIN("Name");
- GfxSetOverlayMode(1);
- GfxSelectFont("Tahoma", Status("pxheight")/20);
- GfxSetTextAlign( 6 );// center alignment
- GfxSetTextColor( ColorHSB( 10, 300, 20 ) );
- GfxSetBkMode(0); // transparent
- GfxTextOut( Name(), Status("pxwidth")/2, Status("pxheight")/20 );
- GfxSelectFont("Tahoma", Status("pxheight")/22);
- GfxTextOut( "SUBHAS801", Status("pxwidth")/8, Status("pxheight")/8 );
- //GfxSelectFont("Tahoma", Status("pxheight")/10 );
- //GfxSelectFont("Tahoma", Status("pxheight")/26 );
- _SECTION_END();
- e30 = EMA(Close,240);
- f30 = EMA(Close,20);
- Plot(EMA(Close,20),"fine2",colorBrightGreen,styleDots);
- Plot(EMA(Close,240),"fine3",colorWhite,styleDots);
- _SECTION_BEGIN("trend candle");
- ////////////////////////////////////
- // Heikin_Ashi For Amibroker
- ////////////////////////////////////
- HaClose =EMA((O+H+L+C)/4,3);
- HaOpen = AMA( Ref( HaClose, -1 ), 0.5 );
- HaHigh = Max( H, Max( HaClose, HaOpen ) );
- HaLow = Min( L, Min( HaClose, HaOpen ) );
- PlotOHLC( Open, High, Low, Close, "Modified " + Name(), colorBrown, styleCandle | styleNoLabel );
- //SetChartBkGradientFill( ParamColor("BgTop", colorBrightGreen),ParamColor("BgBottom", colorSeaGreen));
- Title="";
- _SECTION_END();
- Buy = Cross(f30, e30);
- Sell = Cross(e30, f30 );
- AlertIf( Cross( f30,e30), "SOUND C:\\Windows\\Media\\Ringin.wav", "BUY-STRONG SIGNAL stockxray", 2 );
- AlertIf( Cross( e30, f30 ), "SOUND C:\\Windows\\Media\\Ringin.wav","SELL-STRONG SIGNAL stockxray", 2 );
- _SECTION_BEGIN("MABIUTS");
- SetChartOptions(0,chartShowArrows|chartShowDates);
- _N(Title = StrFormat("{{NAME}} - {{INTERVAL}} {{DATE}} Open %g, Hi %g, Lo %g, Close %g (%.1f%%) Vol " +WriteVal( V, 1.0 ) +" {{VALUES}}", O, H, L, C, SelectedValue( ROC( C, 1 )) ));
- Buy=EMA(C,13)>EMA(EMA(C,13),9) AND Cross (C,Peak(C,5,1));
- Sell=Cross (EMA(EMA(C,13),9),EMA(C,13));
- MYcolor = IIf( EMA(C,13)>EMA(EMA(C,13),9) AND C>Peak(C,2,1), colorGreen, IIf(EMA(C,13)>EMA(EMA(C,13),9) AND C<Peak(C,2,1),colorBlue, colorBrown ));
- //PlotOHLC( Open, High, Low, Close, "", Mycolor, styleBar );
- shape = Buy * shapeHollowStar + Sell * shapeHollowStar;
- PlotShapes( shape, IIf( Buy, colorGreen, colorRed ),0, IIf( Buy, Low, High ) );
- GraphXSpace = 5;
- dist = 1.5*ATR(10);
- for( i = 0; i < BarCount; i++ )
- if( Buy[i] )
- //PlotText( "Buy\n@" + C[ i ], i, L[ i ]-dist[i], colorGreen );
- if( Sell[i] )
- //PlotText( "Sell\n@" + C[ i ], i, H[ i ]+dist[i], colorRed);
- _SECTION_END();
- //P = ParamField("Price field",-1);
- //Periods = Param("Periods", 89, 2, 300, 1, 10 );
- //Plot( WMA( P, Periods ), _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") );
- //m = 0;
- _SECTION_BEGIN("WMA89");
- P = ParamField("Field");
- Type = ParamList("Type", "Weighted,Simple,Exponential,Double Exponential,Tripple Exponential,Wilders");
- Periods89 = Param("Periods89", 89, 2, 300 );
- Displacement2 = Param("Displacement2", 2, -50, 50 );
- //Plot( WMA( P, Periods89 ), _DEFAULT_NAME(), colorBlue, styleStaircase+styleLine, 0, 0, Displacement2 );
- _SECTION_END();
- //P = ParamField("Price field",-1);
- //Periods = Param("Periods", 89, 2, 300, 1, 10 );
- //Plot( WMA( P, Periods ), _DEFAULT_NAME(), ParamColor( "Color", colorCycle ), ParamStyle("Style") );
- //m = 0;
- _SECTION_BEGIN("Volume At Price");
- //PlotVAPOverlay( Param("Lines", 300, 100, 1000, 1 ), Param("Width", 5, 1, 100, 1 ), ParamColor("Color", colorCycle ), ParamToggle("Side", "Left|Right" ) | 4*ParamToggle("Z-order", "On top|Behind", 1 ) );
- _SECTION_END();
- //Displacement = Param("Displacement", 1, -50, 50 );
- //m = 0;
- _SECTION_END();
- Pivot = ParamToggle("Pivot_day", "No|Yes", 1);
- if(Pivot)
- {
- H1= TimeFrameGetPrice("H", inDaily, -1); // yesterdays high
- L1 = TimeFrameGetPrice("L", inDaily, -1); // low
- C1= TimeFrameGetPrice("C", inDaily, -1); // close
- Op = TimeFrameGetPrice("O", inDaily)-1; // current day open
- }
- else
- {
- H1 = TimeFrameGetPrice("H", inDaily); // yesterdays high
- L1 = TimeFrameGetPrice("L", inDaily); // low
- C1= TimeFrameGetPrice("C", inDaily);
- Op = TimeFrameGetPrice("O", inDaily); // current day open
- }
- // PIVOT Calculation
- PP = (H1+ L1 +L1 + C1 )/4;
- PPA = (H1+ H1 +L1 + C1 )/4;
- Plot(PP, "best up",colorBlack,4+8+2048 );
- Plot(PPA, "best down",colorBlack,4+8+2048 );
- //Plot( (H1),"HH",colorBrown,4+8+2048);
- //Plot( (L1),"LL",colorAqua,4+8+2048);
- _SECTION_END();
- //---- pivot points
- DayH = TimeFrameGetPrice("H", inDaily, -1);// yesterdays high
- DayL = TimeFrameGetPrice("L", inDaily, -1);//low
- DayC = TimeFrameGetPrice("C", inDaily, -1);//close
- DayO = TimeFrameGetPrice("O", inDaily);// current day open
- HiDay = TimeFrameGetPrice("H", inDaily);
- LoDay = TimeFrameGetPrice("L", inDaily);
- R2 = Prec(DayC+(DayH-DayL)*0.382,4);
- R3 = Prec(DayC+(DayH-DayL)*0.618,4);
- R4 = Prec(DayC+(DayH-DayL),4);
- S2 = Prec(DayC-(DayH-DayL)*0.382,4);
- S3 = Prec(DayC-(DayH-DayL)*0.618,4);
- S4 = Prec(DayC-(DayH-DayL),4);
- rcolor = colorLightBlue;
- scolor = colorLightBlue;
- style = styleLine | styleThick + styleNoRescale;
- Plot(R2, "UP Trg 1",rcolor,style);
- Plot(R3, "UP Trg 2",rcolor,style);
- Plot(R4, "UP Trg 3",rcolor,style);
- Plot(S2, "DWN Trg1",scolor,style);
- Plot(S3, "DWN Trg2", scolor, style);
- Plot(S4, "DWN Trg3", scolor, style);
- DDayO = TimeFrameGetPrice("O", inDaily);// current day open
- DHiDay = TimeFrameGetPrice("H", inDaily);
- DLoDay = TimeFrameGetPrice("L", inDaily);
- Title = "" + Name() + ", " + Interval(2) + ", " + Date() +
- EncodeColor(colorPink) + "\nO " + EncodeColor(colorYellow) + O +
- EncodeColor(colorPink) + ", H : " + EncodeColor(colorBrightGreen) + H +
- EncodeColor(colorPink) + ", L : " + EncodeColor(colorWhite) + L +
- EncodeColor(colorPink) + ", C : " + EncodeColor(colorWhite) + C +
- "\n DLY-OPEN : " +DDayO + " Day-High : " +DHiDay + " Day-LOW : " + DLoDay +
- "\n"+ " Stoploss: " +e30 ;
- //PlotOHLC( Open, High, Low, Close, "", barcolor1, styleLine+styleNoLabel|styleThick+styleCandle );
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement