Stock Portfolio Organizer

The ultimate porfolio management solution.

Shares, Margin, CFD's, Futures and Forex
EOD and Realtime
Dividends and Trust Distributions
And Much More ....
For Portfolio Manager Click Here

WiseTrader Toolbox

#1 Selling Amibroker Plugin featuring:

Advanced Adaptive Indicators
Advanced Pattern Exploration
Neural Networks
And Much More ....
Find Out More Here

Swing trade for Amibroker (AFL)

Copy & Paste Friendly
_SECTION_BEGIN("BACK COLR");
SetChartBkGradientFill( ParamColor("BgTop", colorDarkGreen),
ParamColor("BgBottom", colorBlack),ParamColor("titleblock",colorDarkGreen));




_SECTION_BEGIN("Flower");
Show_color = ParamToggle("Display CandleColor", "No|Yes", 1);
r1 = Param( "ColorFast avg", 5, 2, 200, 1 );
r2 = Param( "ColorSlow avg", 10, 2, 200, 1 );
r3 = Param( "ColorSignal avg", 5, 2, 200, 1 );

Prd1=Param("ATR Period",4,1,20,1);
Prd2=Param("Look Back",7,1,20,1);
green = HHV(LLV(L,Prd1)+ATR(Prd1),Prd2);
red = LLV(HHV(H,Prd1)-ATR(Prd1),Prd2);
flowerClose = EMA((Open+High+Low+Close)/4,3) ;
flowerOpen = EMA((Ref(Open,-1) + Ref(flowerClose,-1))/2,3);
Temp = Max(High, flowerOpen);
flowerHigh = EMA(Max(Temp, flowerClose),3);
Temp = Min(Low,flowerOpen);
flowerLow = EMA(Min(Temp, flowerClose),3);

m1=MACD(r1,r2);
s1=Signal(r1,r2,r3);
mycolor=IIf(m1<0 AND m1>s1, colorBrightGreen,IIf(m1>0 AND

m1>s1,colorBrightGreen,IIf(m1>0 AND m1<s1,colorRed,colorRed)));
if(Show_color)
{
ColorHighliter = myColor;
SetBarFillColor( ColorHighliter );
}
barColor=IIf(C>Green ,colorBrightGreen,IIf(C < RED,colorRed,colorRed));
PlotOHLC( IIf(floweropen<flowerClose, floweropen,flowerClose),flowerHigh,flowerLow,IIf(flowerOpen<flowerClose, flowerClose,flowerOpen), "Close", barColor, styleNoTitle | styleCandle);


//flowerlow=L;
//flowerhigh=H;
//Plot(C,"",colorRed,styleCandle);
_SECTION_END();
 //Magfied Market Price
FS=Param("Font Size",30,11,100,1);
GfxSelectFont("Times New Roman", FS, 700, True ); 
GfxSetBkMode( colorWhite );  
GfxSetTextColor( ParamColor("Color",colorGold) ); 
Hor=Param("Horizontal Position",1084,1,1200,1);
Ver=Param("Vertical Position",53,1,830,1); 
GfxTextOut(""+C, Hor , Ver );
YC=TimeFrameGetPrice("C",inDaily,-1);
DD=Prec(C-YC,2);
xx=Prec((DD/YC)*100,2);
GfxSelectFont("Times New Roman", 11, 700, True ); 
GfxSetBkMode( colorBlack );  
GfxSetTextColor(ParamColor("Color",colorYellow) ); 
GfxTextOut(""+DD+"  ("+xx+"%)", Hor , Ver+45 );

_SECTION_BEGIN("Breakout Setting");
no=Param( "Swing", 8, 1, 55 );
//tsl_col=ParamColor( "Color", colorLightGrey );

res=HHV(H,no);
sup=LLV(L,no);
avd=IIf(C>Ref(res,-1),1,IIf(C<Ref(sup,-1),-1,0));
avn=ValueWhen(avd!=0,avd,1);
tsl=IIf(avn==1,sup,res);
Buy=Cover=Ref(Cross(H,tsl),-1) ;
Sell=Short=Ref(Cross(tsl,L),-1) ;

//Plot(tsl, _DEFAULT_NAME(), tsl_col, styleStaircase);
Buyperiods=Ref(Param("Breakout periods best is usually 18",5,1,100,1,1),-1);
Sellperiods=Ref(Param("Exit Breakout",5,1,100,1,1),-1);



PlotShapes(IIf(Buy, shapeSquare,shapeNone) ,colorBlue,0, flowerLow, Offset=-10) ; 
PlotShapes(IIf(Buy, shapeUpArrow,shapeNone) ,colorLime,0, flowerLow, Offset=-10) ;
PlotShapes(IIf(Sell, shapeSquare,shapeNone),colorRed,0, flowerHigh, Offset=-1) ;
PlotShapes(IIf(Sell, shapeDownArrow,shapeNone),colorLime,0, flowerHigh, Offset=-1) ;
dist = 1*ATR(10);
dist1 = 1*ATR(10);
GfxSelectFont( "Tahoma", 13, 100 );
GfxSetBkMode( 1 );

for( i = 0; i < BarCount; i++ ) 
{ 
if( Buy[i] ) 
 {
  PlotText( "Buy =" + L[ i ] + "\nTGT= " + (L[i]*1.0045) + "\nSL= " + (L[i]*0.9970), i, flowerLow[ i ]-dist[i], colorBrightGreen, colorBlack );
 }
 if( Sell[i] )
 {
  PlotText( "Sell =" + H[ i ] + "\nT= " + (H[i]*0.995) + "\nSL= " + (H[i]*1.0025), i, flowerHigh[ i ]+dist1[i], colorOrange, colorBlack ); 
 }
}


color = IIf((BarsSince(Sell))>(BarsSince(Buy)), colorBrightGreen,colorRed); 
//Plot(C,"",color,64); 
_SECTION_BEGIN("sys");

x=Param("xposn",315,0,1000,1);
y=Param("yposn",421,0,1000,1);


GfxSetTextColor(colorOrange);
GfxTextOut( ( " "),60,y+40);
GfxSetTextColor(colorWhite);
GfxTextOut( ( ""),10,y+60);
GfxSetTextColor(colorGreen);
GfxTextOut( ( ""),30,y+80);
_SECTION_BEGIN("Background text");
C11=ParamColor("up panel",colorBlack );
C12=ParamColor("dn panel",colorBlack );
C13=Param("fonts",20,10,30,1 );
C14=Param("left-right",2.1,1.0,5.0,0.1 );
C15=Param("up-down",8,1,30,1 );
Miny = Status("axisminy");
Maxy = Status("axismaxy");
lvb = Status("lastvisiblebar");
fvb = Status("firstvisiblebar");
pxwidth = Status("pxwidth");
pxheight = Status("pxheight");
GfxSetBkMode( 0 ); 
GfxSelectFont("Tahoma", 12, 500, False, False, 0);
GfxSetTextColor(colorCustom12); 
GfxSetTextAlign( 6 );
GfxSelectFont("Tahoma", 15, 600, False, False, 0);
GfxSetTextColor(colorWhite); 
GfxSetTextAlign( 6 );
GfxSelectFont("Tahoma", 12, 400, False, False, 0);
GfxSetTextColor(colorBrightGreen);
GfxSelectFont("Tahoma", 12, 400, False, False, 0);
GfxSetTextColor(colorRed);
pricechange=(C-Ref(C,-1))*100/Ref(C,-1);
changeponit=C-Ref(C,-1);
Vlp=Param("Volume lookback period",15,10,300,10);
Vrg=MA(V,Vlp);
St = StDev(Vrg,Vlp); 
Vp3 = Vrg + 3*st; 
Vp2 = Vrg + 2*st;;
Vp1 = Vrg + 1*st;;
Vn1 = Vrg -1*st; 
Vn2 = Vrg -2*st; 

x=Param("xposn",1,0,1000,1);
y=Param("yposn",1,0,1000,1);

GfxGradientRect( 1, 1, 1400, 40, colorDarkGreen, colorBlack);
GfxSetBkMode(0);
GfxSelectFont( "Georgia", 18, 800, False );
GfxSetTextColor( colorGold );
GfxTextOut( "Trobo.in", x+600, y+10 );
GfxSelectFont( "Tahoma", 16, 800, False );
GfxSetTextColor( colorGold );
GfxTextOut( Name(), x+120, y+10 );
GfxSelectFont( "Century Gothic", 15, 100, False );
GfxSetTextColor( colorGold );
//GfxTextOut( Date(), x+1000, y+10 );
GfxSelectFont( "Comic Sans MS", 15, 500, False );
GfxSetTextColor( colorGold );
GfxTextOut( Interval(2), x+300, y+10 );
//------------------------------------------------------------ H, L, O, C----------------------
GfxGradientRect( 1, 40, 1400, 55, colorDarkGreen, colorBlack );
GfxSetBkMode(0);
GfxSelectFont( "arial", 10, 700, False );
GfxSetTextColor( colorGold );
GfxTextOut( "High:"+WriteVal(H,1.2), x+60, y+40 );
GfxSelectFont( "Areal", 10, 700, False );
GfxSetTextColor( colorGold );
GfxTextOut( "Low:"+WriteVal(L,1.2), x+160, y+40 );
GfxSelectFont( "Areal", 10, 700, False );
GfxSetTextColor( colorGold );
GfxTextOut( "Open:"+WriteVal(O,1.2), x+260, y+40 );
GfxSelectFont( "Areal", 10, 700, False );
GfxSetTextColor( colorGold );
GfxTextOut( "Close:"+WriteVal(C,1.2), x+360, y+40 );

GfxSelectFont( "COMIC SANS MS", 12, 100, False );
GfxSetTextColor( colorGold );
GfxTextOut( "", x+1000, y+35 );
GfxSelectFont( "ALGERIAN", 15, 100 );
GfxTextOut( (""), 135, y +75);
T = Ref(C,-1);

GraphXSpace = 30;
Back