Exemplo n.º 1
0
        public void shubhascanner()
        {
            AFMisc.SectionBegin("Shubhalabha");

            //Taking user input
            var Minprice           = AFTools.Param("Select Minimum price ", 100, 1, 20000);
            var Maxprice           = AFTools.Param("Select Maximum price ", 1000, 1, 20000);
            var Minvolume          = AFTools.Param("Select Minimum Volume ", 10000, 100, 50000000);
            var Maxvolume          = AFTools.Param("Select Maximum Volume ", 500000, 100, 50000000);
            var Daysavgvol         = AFTools.Param("Select no. of days to calculate Avg Volume ", 10, 1, 400);
            var avgvol             = AFTools.Param("Avg Volume ", 10000, 100, 50000000);
            var pricechangedays    = AFTools.Param("Select no. of days to calculate % price change ", 10, 1, 400);
            var pricechangepercent = AFTools.Param("Select Price change % ", 2, 1, 100);



            var LeadEMA   = AFTools.Param("Select no. of days to calculate lead AFAvg.Ema ", 5, 1, 400);
            var MediumEMA = AFTools.Param("Select no. of days to calculate Mediaum AFAvg.Ema ", 13, 1, 400);
            var LagEMA    = AFTools.Param("Select no. of days to calculate Lag AFAvg.Ema ", 26, 1, 400);
            var LongEMA   = AFTools.Param("Select no. of days to calculate Long AFAvg.Ema ", 200, 1, 400);
            var LeadSMA   = AFTools.Param("Select no. of days to calculate lead SMA ", 10, 1, 400);
            var MediumSMA = AFTools.Param("Select no. of days to calculate Medium SMA ", 50, 1, 400);
            var LagSMA    = AFTools.Param("Select no. of days to calculate Lag SMA ", 100, 1, 400);
            var LongSMA   = AFTools.Param("Select no. of days to calculate Long SMA ", 200, 1, 400);

            // Buy Sell condition



            //Buy = (Close > EMA (Close,LongEMA))AND ((EMA (Close,LeadEMA) > EMA (Close,LAGEMA)));

            Buy = (AFTools.Cross(AFAvg.Ema(Close, 5), AFAvg.Ema(Close, 13)) & AFTools.Cross(AFAvg.Ema(Close, 5), AFAvg.Ema(Close, 26)) & Close > Minprice & Close <Maxprice& Volume> Minvolume & Volume < Maxvolume & avgvol < AFInd.Roc(Volume, Daysavgvol) & AFInd.Roc(Close, pricechangedays) < Close);
            AFMisc.AddColumn(AFInd.Roc(Close, pricechangedays), "close % change");
            AFMisc.AddColumn(AFInd.Roc(Volume, Daysavgvol), "volume % change");



            // Buy Sell condition backup to try anything.
            //Buy =( Close >  Lastcloseuserinput AND   DROC > shortchangeuserinput AND WROC > longchangeuserinput AND  Volume >Voluserinput AND ATR(ATRbaruserinput)>ATRuserinput AND BBandTop( Close, BBrangeuserinput, BBwidthuserinput ) > Close );
            //Sell = ( Close >  Lastcloseuserinput AND DROC < shortchangeuserinput AND WROC < longchangeuserinput AND  Volume >Voluserinput AND ATR(ATRbaruserinput)>ATRuserinput AND BBandBot( Close, BBrangeuserinput, BBwidthuserinput ) < Close );

            // Comment following two lines if you want to get signals without swing signals.

            //Buy=ExRem(Buy,Sell);
            //Sell=ExRem(Sell,Buy);

            // Enable following to get all data without buy sell.
            //Filter = 1;

            Filter = Buy;
            //Adding column to report

            //AFMisc.AddTextColumn( AFInfo.FullName(), "Company AFInfo.Name", 77 ,Color.Green);
            //AFMisc.AddColumn(Volume,"Last Volume ",1.2f,Color.Green);
            //AFMisc.AddColumn(Close,"Last Close  ",1.2f,Color.Green);
            //AddColumn(WROC,"Long term % change",1.2,colorGreen);
            //AddColumn(ATR(ATRbaruserinput) ,"Last ATR",1.2,colorGreen);
            //AddColumn(EMA(Close, EMA1shorttermuserinput),"EMA1 Short term",1.2, colorGreen);
            //AddColumn(EMA(Close, EMA2longtermuserinput),"EMA2 Long term",1.2, colorGreen);
            //AddColumn(BBandTop(Close, BBrangeuserinput, BBwidthuserinput ),"Bollinger band upper  ",1.2,colorGreen );
            //AddColumn(bbdiff,"Diff BBup & close   ",1.2,colorGreen );
            //AddColumn(BBandBot(Close, BBrangeuserinput, BBwidthuserinput ),"Bollinger band lower  ",1.2,colorGreen );
            //ddColumn(bbdiffb,"Diff BBbot & close   ",1.2,colorGreen );



            // This prints report with Buy and Sell.

            AFMisc.AddColumn(Buy, "Buy", 1.2f, Color.Green);
            AFMisc.AddColumn(Sell, "Sell", 1.2f, Color.Green);

            // This marks buy and sell on charts.

            AFGraph.PlotShapes(AFTools.Iif(Buy, Shape.Square, Shape.None), Color.Green, 0, Low, 30);
            AFGraph.PlotShapes(AFTools.Iif(Sell, Shape.Square, Shape.None), Color.Red, 0, High, 30);

            AFMisc.SectionEnd();
        }
Exemplo n.º 2
0
        public void abc()
        {
            AFMisc.SectionBegin("Shubhalabha");

//Taking user input
            var Voluserinput           = AFTools.Param("Select Volume ", 800000, 1, 8000000);
            var Lastcloseuserinput     = AFTools.Param("Select Last Close is Greater Than condition ", 100, 1, 10000);
            var ATRuserinput           = AFTools.Param("Select AFInd.Atr is Greater Than condition ", 10, 1, 10000);
            var ATRbaruserinput        = AFTools.Param("Select AFInd.Atr Bar configuration ", 1, 1, 10000);
            var EMA1shorttermuserinput = AFTools.Param("Select Short AFAvg.Ema value ", 5, 1, 100);
            var EMA2longtermuserinput  = AFTools.Param("Select long AFAvg.Ema value ", 26, 1, 100);
            var BBrangeuserinput       = AFTools.Param("BB-range ", 15, 1, 100);
            var BBwidthuserinput       = AFTools.Param("BB-width ", 2, 1, 100);
            var Shorttermuserinput     = AFTools.Param("Select Short term duration", 5, 1, 365);
            var Longtermuserinput      = AFTools.Param("Select Long term duration", 30, 10, 365);
            var shortchangeuserinput   = AFTools.Param("Select % change for Short term", 3.81f, 1, 100);
            var longchangeuserinput    = AFTools.Param("Select % change for one long term", 2.49f, 1, 100);
            var bbup   = AFInd.BBandTop(Close, BBrangeuserinput, BBwidthuserinput);
            var bbdiff = Close - bbup;


// Buy Sell condition

            Buy  = (Close > Lastcloseuserinput & Close <AFAvg.Ema(Close, EMA1shorttermuserinput)&  Volume> Voluserinput & AFInd.Atr(ATRbaruserinput) > ATRuserinput & AFInd.BBandTop(Close, BBrangeuserinput, BBwidthuserinput) > Close);
            Sell = (Close > Lastcloseuserinput & Close <AFAvg.Ema(Close, EMA2longtermuserinput)& Volume> Voluserinput & AFInd.Atr(ATRbaruserinput) > ATRuserinput & AFInd.BBandBot(Close, BBrangeuserinput, BBwidthuserinput) < Close);


// Buy Sell condition backup to try anything.

//Buy =( Close >  Lastcloseuserinput AND Close < EMA(Close, EMA1shorttermuserinput)  AND   DROC > shortchangeuserinput AND WROC > longchangeuserinput AND  Volume >Voluserinput AND ATR(ATRbaruserinput)>ATRuserinput AND BBandTop( Close, BBrangeuserinput, BBwidthuserinput ) > Close );
//Sell = ( Close >  Lastcloseuserinput AND Close < EMA(Close, EMA2longtermuserinput)  AND   DROC < shortchangeuserinput AND WROC < longchangeuserinput AND  Volume >Voluserinput AND ATR(ATRbaruserinput)>ATRuserinput AND BBandBot( Close, BBrangeuserinput, BBwidthuserinput ) < Close )

// Comment following two lines if you want to get signals without swing signals.

//Buy=ExRem(Buy,Sell);
//Sell=ExRem(Sell,Buy);

// Enable following to get all data without buy sell.
//Filter = 1;

            Filter = Buy | Sell;
//Adding column to report


            AFMisc.AddTextColumn(AFInfo.FullName(), "Company AFInfo.Name", 77, Color.Green);
            AFMisc.AddColumn(Volume, "Last Volume ", 1.2f, Color.Green);
            AFMisc.AddColumn(Close, "Last Close  ", 1.2f, Color.Green);

            AFMisc.AddColumn(AFInd.Atr(ATRbaruserinput), "Last AFInd.Atr", 1.2f, Color.Green);
            AFMisc.AddColumn(AFAvg.Ema(Close, EMA1shorttermuserinput), "EMA1 Short term", 1.2f, Color.Green);
            AFMisc.AddColumn(AFAvg.Ema(Close, EMA2longtermuserinput), "EMA2 Long term", 1.2f, Color.Green);
            AFMisc.AddColumn(AFInd.BBandTop(Close, BBrangeuserinput, BBwidthuserinput), "Bollinger band upper  ", 1.2f, Color.Green);
            AFMisc.AddColumn(bbdiff, "Diff bbup & Close   ", 1.2f, Color.Green);

// This prints report with Buy and Sell.

            AFMisc.AddColumn(Buy, "Buy", 1.2f, Color.Green);
            AFMisc.AddColumn(Sell, "Sell", 1.2f, Color.Green);

// This marks buy and sell on charts.



            AFMisc.SectionEnd();
        }