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 ....
WiseTrader Toolbox
#1 Selling Amibroker Plugin featuring:
Advanced Adaptive Indicators
Advanced Pattern Exploration
Neural Networks
And Much More ....
Volume Oscillator for Amibroker (AFL)
Copy & Paste Friendly
Back
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 | _SECTION_BEGIN ( "Volume Oscillator" ); Title= Name ()+ " Volume Oscillator " ; PlusDM= IIf ( High > Ref ( High ,-1) AND Low >= Ref ( Low ,-1), High - Ref ( High ,-1), IIf ( High > Ref ( High ,-1) AND Low < Ref ( Low ,-1) AND High - Ref ( High ,-1)> Ref ( Low ,-1)- Low , High - Ref ( High ,-1),0)); Vm= log ( EMA ( V ,3)); Buy = ( C - L )*Vm+ ( H - O )*Vm + IIf ( C > O ,( C - O )*Vm,0) + PlusDM*Vm + IIf ( Ref ( C ,-1)< O ,( O - Ref ( C ,-1))*Vm,0); MinDM = IIf ( Low < Ref ( Low ,-1) AND High <= Ref ( High ,-1), Ref ( Low ,-1)- Low , IIf ( High > Ref ( High ,-1) AND Low < Ref ( Low ,-1) AND High - Ref ( High ,-1)< Ref ( Low ,-1)- Low , Ref ( Low ,-1)- Low , 0)); Sell = ( H - C )*Vm + ( O - L )*Vm + IIf ( C < O ,( O - C )*Vm,0) + MinDM*Vm + IIf ( Ref ( C ,-1)> O ,( Ref ( C ,-1)- O )*Vm,0); Wm= Wilders ( Wilders ( Buy ,3)- Wilders ( Sell ,3),3); Graph1=Wm; Graph2= MA (Wm,9); Graph0=0; Graph0Style=Graph1Style=Graph2Style=5; Graph2Color=32; Buy = Cross ( Graph1, Graph2 ); Sell = Cross ( Graph2, Graph1 ); PlotShapes ( shapeUpArrow * Buy , colorGreen ,0,Graph2); PlotShapes ( shapeDownArrow * Sell , colorRed ,0,Graph1); Filter = ( Buy ==1) ; NumColumns = 6; Column0 = Ref ( C +0.065,-1); Column0Format = 1.2; Column0Name = "Trigger Price" ; WriteVal ( C +0.065); Column1 = C ; Column1Name = "Close " ; WriteVal ( C ); Column1Format = 1.2; Column2 = MA ( V ,17); Column2Name = "17 Ma Vol " ; WriteVal ( MA ( V ,17) ); Column2Format = 1.0; Column3 = MA ( C ,17)/ MA ( C ,50); Column3Name = "% 17/50 " ; WriteVal ( MA ( C ,17)/ MA ( C ,50) ); Column3Format = 1.2; Column3Format = 1.2; Column4= MA ( C ,17); Column4Name= "17 C ma" ; WriteVal ( MA ( C ,17) ); Column4Format = 1.2; Column4= MA ( C ,50); Column4Name= "50 C ma" ; WriteVal ( MA ( C ,50) ); Column4Format = 1.2; Column5=Wm; Column5Name= "Vol Osc" ; WriteVal (Wm); Column5Format=1.2; _SECTION_END (); |