Stock Portfolio Organizer
The ultimate porfolio management solution.
WiseTrader Toolbox
#1 Selling Amibroker Plugin featuring:
MAGIC NUMBER N OPEN = HIGH LOW for Amibroker (AFL)
TRICKS FROM SANTU BABA
REMEMBER THIS TRICK
WHENEVER U FIND LAST 4 DIGITS SAME TO SAME THEN ITS MAGIC FIGURE
IF ITS HIGH THEN ITS SHORT
IF ITS LOW THEN ITS LONG
TODAY SEE NIFTY SPOT HIGH
8460.60
SEE LAST 4 DIGITS
xx60.60
MADE INTO AFL TO CHECK… RUN THIS PROGRAM IN EXPLORATION IN DAILY TIME FRAME TO GET BEST RESULT STILL MANUAL INTERVENTION IS REQUIRED TO CHECK HIGH N LOW
RUN IN INTRADAY AS TIMEFRAME DAILY EXPLORATION.
Screenshots
Indicator / Formula
1 2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 26 27 28 29 30 31 32 33 34 35 36 37 38 39 40 41 42 43 44 45 46 47 48 49 50 51 52 53 54 55 56 57 58 59 60 61 62 63 64 65 66 67 68 69 70 71 72 73 74 75 76 77 78 79 80 81 82 83 84 85 86 87 88 89 90 91 92 93 94 95 96 97 98 99 100 101 102 103 104 105 106 107 108 109 110 111 112 113 114 115 116 117 118 119 120 121 122 123 124 125 126 127 128 129 130 131 132 133 134 135 136 137 138 139 140 141 142 143 144 145 146 147 148 149 150 151 152 153 154 155 156 157 158 159 160 161 162 163 164 165 166 167 168 169 170 171 172 173 174 175 176 177 178 179 180 181 182 183 184 185 186 187 188 189 190 191 192 193 194 195 196 197 198 199 200 201 202 203 204 205 206 207 208 209 210 211 212 213 214 215 216 217 218 219 220 221 222 223 224 225 226 227 228 229 230 231 232 233 234 235 | // ************************************************************ // @@@@@@@@@@@@@@@@@@CHART PANE SETTING @@@@@@@@@@@@@@@@@@@@@@@ // ============================================================ _SECTION_BEGIN ( "Chart Pane" ); SetChartOptions (0, chartShowArrows | chartShowDates ); //SetChartBkColor(ParamColor("Outer Panel",ColorRGB(30, 30, 30))); //SetChartBkGradientFill(ParamColor("Upper Chart",colorSkyblue),ParamColor("LowerChart",colorDarkGrey)); GraphXSpace =10; //SetBarFillColor(IIf(C>O,colorgreen,IIf(C<O,colorred,colorblue))); // Plot(C,"close",(IIf(C>O,colorgreen,IIf(C<O,colorred,colorblue))); Title = EncodeColor ( ColorRGB (127, 179, 213))+ Title = Name () + " " + EncodeColor ( ColorRGB (41, 128, 185)) + Date () + " " + EncodeColor ( ColorRGB (127, 179, 213)) + "{{INTERVAL}} " + EncodeColor ( ColorRGB (127, 179, 213))+ " Open = " + EncodeColor ( ColorRGB (41, 128, 185))+ WriteVal ( O ,1.2) + EncodeColor ( ColorRGB (127, 179, 213))+ " High = " + EncodeColor ( ColorRGB (41, 128, 185)) + WriteVal ( H ,1.2) + EncodeColor ( ColorRGB (127, 179, 213))+ " Low = " + EncodeColor ( ColorRGB (41, 128, 185))+ WriteVal ( L ,1.2) + EncodeColor ( ColorRGB (127, 179, 213))+ " Close = " + EncodeColor ( ColorRGB (41, 128, 185))+ WriteVal ( C ,1.2)+ EncodeColor ( ColorRGB (127, 179, 213))+ " Volume = " + EncodeColor ( ColorRGB (41, 128, 185))+ WriteVal ( V ,1); Plot ( V , "Volume" , ColorRGB (27, 79, 114), styleHistogram | styleOwnScale | styleThick , 10); Plot ( Day ()!= Ref ( Day (),-1), "" , ColorRGB (25,33,25), styleHistogram | styleDashed | styleNoLabel | styleOwnScale ); _SECTION_END (); // ************************************************************ // @@@@@@@@@@@@@@@@@@CANDLE AND MAGNIFIED PRICE N TIME@@@@@@@@@ // ============================================================ _SECTION_BEGIN ( "Grid_HourDay" ); per3= Param ( "Mov. Avg.20" ,20,2,300,1); per15= Param ( "Mov. Avg.50" ,50,2,300,1); avg3 = MA ( C ,per3); avg15 = MA ( C ,per15); Buy1= Cross (avg3,avg15); Sell1= Cross (avg15,avg3); SetBarFillColor ( IIf ( avg3 > avg15, colorGreen , colorRed ) ); Plot ( C , "Price" , IIf ( avg3 > avg15, colorGreen , colorRed ), styleCandle ); //Magnified Market Price GfxSelectFont ( "Times New Roman" , 30, 700, True ); GfxSetBkMode ( 1 ); GfxSetTextColor ( colorLime ); GfxTextOut ( "" + C , 700 , 10 ); YC= TimeFrameGetPrice ( "C" , inDaily ,-1); DD= Prec ( C -YC,2); xx= Prec ((DD/YC)*100,2); GfxSelectFont ( "Times New Roman" , 11, 700, True ); GfxSetBkMode ( 1 ); GfxSetTextColor ( colorGreen ); GfxTextOut ( "" +DD+ " (" +xx+ "%)" , 700 , 50 ); _SECTION_END (); _SECTION_BEGIN ( "Grid_HourDay" ); ShowGrid = ParamToggle ( "Show Grid" , "No|Yes" , 1); if (ShowGrid == 1) { grid_DAY = IIf ( Day () != Ref ( Day (), -1), 1, 0); grid_DAY_color = ParamColor ( "?olorDAY" , colorBlue ); Plot (grid_DAY, "" , grid_DAY_color, styleHistogram | styleThick | styleNoLabel | styleNoRescale | styleOwnScale ); grid_HOUR = IIf ( Hour () != Ref ( Hour (), -1), 1, 0); grid_HOUR_color = ParamColor ( "?olorHOUR" , colorBrown ); Plot (grid_HOUR, "" , grid_HOUR_color, styleHistogram | styleDashed | styleNoLabel | styleNoRescale | styleOwnScale ); } else {} _SECTION_END (); // ************************************************************ // @@@@@@@@@@@@@@@@@@CONDITIONAL SETTING @@@@@@@@@@@@@@@@@@@@@@ // ============================================================ _SECTION_BEGIN ( "CONDITIONAL SETTING " ); GfxSetTextColor ( colorBlack ); GfxSelectSolidBrush ( colorGreen ); // this is the box background color GfxSelectPen ( colorRed , 2); // broader color // GETTING TIME FRAME VALUE DH= TimeFrameGetPrice ( "H" , inDaily ,0); DL= TimeFrameGetPrice ( "L" , inDaily ,0); Plot (DH, "HIGH" , colorBlue , styleLine ); Plot (DL, "Low" , colorGreen , styleLine ); GfxTextOut ( ( "HIGH = " +DH), 13,40); GfxTextOut ( ( "LOW = " +Dl ), 13,60); //DC= TimeFrameGetPrice("C",inDaily,-1); ClAll= TimeNum ()>=152000; LET= TimeNum ()<=150000; //Entry-Exit //BASE FORMULA //B=1; //C=100; //D=(A-(B*int(A/B))); // A=125.25 (125.25-(1*INT(125.25/1))) = 0.25 //E=((A-(C*int(A/C)))-D); //((125.25-(100*INT(125.25/100))) - 0.25) = 25 //F=D*C; // 0.25 * 100 = 25 // FOR CHECKING IF DAYHIGH IS MAGIC NUMBER B=1; CC=100; DHD = (DH - ( B * int ( DH / B ))); //A = DH DHE = (DH - ( CC * int ( DH / CC )) - DHD); //A = DH AND D = DHD DHF = DHD * CC; GfxTextOut ( ( "DHD = " +DHD ), 13,80); GfxTextOut ( ( "DHE = " +DHE ), 13,100); GfxTextOut ( ( "DHF = " +DHF ), 13,120); SCond = DHE==DHF!=0; Short = ValueWhen ( IIf (SCond,DHE, Null ),DH,1); //CoverPrice = ShortPrice + Short * 0.005; // FOR CHECKING IF DAYLOW IS MAGIC NUMBER DLD = (DL - ( B * int ( DL / B ))); //A = DH DLE = (DL - ( CC * int ( DL / CC )) - DLD); //A = DL AND D = DLD DLF = DLD * CC; BCond = DLE==DLF!=0; Buy = ValueWhen ( IIf (BCond,DLE, Null ),DL,1); //Sell = Buy + Buy * //GfxTextOut( ("HIGH = "+DHE ), 13,40); //GfxTextOut( ("LOW = "+DLE ), 13,60); GfxSelectSolidBrush ( colorRed ); GfxTextOut ( ( "DLD = " +DLD ), 13,140); GfxTextOut ( ( "DLE = " +DLE ), 13,160); GfxTextOut ( ( "DLF = " +DLF ), 13,180); GfxTextOut ( ( "BCOND = " +BCOND ), 13,200); GfxTextOut ( ( "SCOND = " +SCOND ), 13,220); //Remove Excessive signals Buy = ExRem ( Buy , Short ) ; Short = ExRem ( Short , Buy ); //Sell =ExRem(Sell,Buy) ; //Cover=ExRem(Cover,Short); // PLOTTING SHAPE PlotShapes ( IIf ( Buy , shapeSquare , shapeNone ), colorGreen , 0, L , Offset=-25); PlotShapes ( IIf ( Buy , shapeSquare , shapeNone ), colorLime , 0, L , Offset=-35); PlotShapes ( IIf ( Buy , shapeUpArrow , shapeNone ), colorWhite , 0, L , Offset=-30); PlotShapes ( IIf ( Short , shapeSquare , shapeNone ), colorOrange , 0, H , Offset=25); PlotShapes ( IIf ( Short , shapeSquare , shapeNone ), colorRed , 0, H , Offset=35); PlotShapes ( IIf ( Short , shapeDownArrow , shapeNone ), colorWhite , 0, H , Offset=-30); _SECTION_END (); // OPEN HIGH LOW // ************************************************************ // @@@@@@@@@@@@@@@@@@CONDITIONAL SETTING @@@@@@@@@@@@@@@@@@@@@@ // ============================================================ _SECTION_BEGIN ( "OPEN=HIGH=LOW " ); TimeFrameSet ( inDaily ); V1= V ; V2= Ref ( V ,-1); V3= LLV ( L ,250); OI1= Ref (OI,-1); OI2=(OI-OI1)/1000; L1= LLV ( L ,250); L2= L ; H1= H ; Oa= Open ; Ha= High ; La= Low ; Cond11=Oa==Ha; Cond12=Oa==La; BuyOHL = Cond12; ShortOHL= Cond11; Cc = Close > 100; in = Inside (); TimeFrameRestore (); //Remove Excessive signals BuyOHL= ExRem (BuyOHL,ShortOHL); ShortOHL= ExRem (ShortOHL,BuyOHL); //Filter = cc AND BuyOHL OR ShortOHL OR in ; _SECTION_END (); // END OF HIGH LOW // ************************************************************ // @@@@@@@@@@@@@@@@@@EXPLORATION SETTING @@@@@@@@@@@@@@@@@@@@@@ // ============================================================ _SECTION_BEGIN ( "Exploration" ); OHLMAG = ParamToggle ( "OHL/MAGIC" , "OHL|MAGIC" ); TimeFrameSet ( inDaily ); //Settings for exploration Value1 = V ; Value2 = V *( H - L ); Value3 = V /( H - L ); Climax = (Value2 == HHV (Value2,10)); VolumeBlast = V > Ref ( V , -1) AND Climax AND V > 2* WMA ( V , 8 ); //Filter = (CCLOSE) AND (Buy OR Short); if (OHLMAG==0) { Filter = cc AND BuyOHL OR ShortOHL OR in ; //OHL // OHL AddColumn ( IIf ( BuyOHL, 66, colorRed ), "BuyOHL" , formatChar, 1, bkcolor = IIf ( BuyOHL, 43, colorRed ) ); } else { Filter = (cc) AND (BCOND OR SCOND); // MAGIC NUMBER // MAGIC NUMBER AddColumn ( IIf ( SCOND, 66, colorRed ), "Buy" , formatChar, 1, bkcolor = IIf ( SCOND, 43, colorRed ) ); } AddColumn ( C , "CMP" , 1.2, colorDefault , colorLightBlue ); AddColumn ( Open , "Open" ); AddColumn ( High , "High/SELL" ); AddColumn ( Low , "Low/BUY" ); AddColumn ( Volume , "Volume" ,1.0, colorDefault , IIf (VolumeBlast, colorBlue , colorYellow )); //AddColumn(BCOND,"BUY"); //AddColumn(SCOND,"SELL"); AddColumn (in, "inside day" ); SetSortColumns (-2,-8,-3); TimeFrameRestore (); _SECTION_END (); |
7 comments
Leave Comment
Please login here to leave a comment.
Back
very nice will see in live market
TRADING HAS TO BE DONE ON CONFIRMATIONS NOT ON MAGICSSSSSSSSSSSSSSSSSSSSS………….
Spasha did you checked it in exploration….i found it good may be in real time results will be differ that’s why i am not very satisfied with offline result.
@Spasha it is fancy name for the system at least user try to help us by providing knowledge and techniques at least appreciate him/her. Put your attitude at your home…
explain if fig xx60.60 . compare with 84
explain in detail my email is singhjagdeepak@gmail.com
my e mal id arvindmoslsgnr@yahoo.in
if any more goodafl pl. let me know aand send e mail please
thanks
difficult to understand pl. explain arvindmoslsgnr@yahoo.in