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

WDF2 for Amibroker (AFL)

Copy & Paste Friendly
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
/*************************************
  Created by Kelvinhand
 
***************************************/
global g_m, g_s;
 
_SECTION_BEGIN("Background");
SetChartBkGradientFill( ParamColor("BgTop", colorBlack),ParamColor("BgBottom", colorBlack), colorLightGrey);
_SECTION_END();
 
 
_SECTION_BEGIN("Enable/Disable");
ShowMACDLine = ParamToggle("Show MACD Line?", "No|Yes");
ShowBB = ParamToggle("Show MACD-BB?", "No|Yes", 1);
ShowStdDev = ParamToggle("Show MA For StdDev?", "No|Yes", 1);
_SECTION_END();
 
 
_SECTION_BEGIN("Styles");
sShapeBtwBB = ParamList("Shape between BB", "Small|Big", 1);
_SECTION_END();
 
 
_SECTION_BEGIN("Colors");
cMacdLine=ParamColor("MACD Line", colorOrange);
cUprBB = ParamColor("UpperBand", colorBlueGrey);
cLwrBB = ParamColor("LowerBand", colorBlueGrey);
 
cMacdGeUprBB = ParamColor("MacdGeUprBB", colorBrightGreen);
cMacdLeLwrBB = ParamColor("MacdLeLwrBB", ColorRGB(255,0,255));
 
cMacdLtUprBB = ParamColor("MacdLtUprBB", colorRed);
cMacdGtLwrBB = ParamColor("MacdGtLwrBB", colorDarkGreen);
 
cZLUp = ParamColor("Above Zeroline", ColorRGB(0,0,140));
cZLDn = ParamColor("Below Zeroline", ColorRGB(130,0,0));
 
_SECTION_END();
 
 
_SECTION_BEGIN("MACDBB");
r1 = Param("Fast MA Period", 12);
r2 = Param("Slow MA Period", 26);
//r3 = Param("Signal Period", 9);
 
r4 = Param("StdDev Period",  10);
SDCnt = Param("StdDev", 1.0, 1,10, 0.1);
 
MAforStdDev = ParamList("MA for StdDev", "SMA|EMA");
 
_SECTION_END();
 
 
 
 
g_m= EMA(C,r1)-EMA(C,r2);
m1 = Ref(g_m, -1);
 
if (MAforStdDev=="EMA")
  g_s = EMA(g_m,r4);
else
  g_s = MA(g_m,r4);
 
 
SD = StDev( g_m, r4);
 
BBtop= g_s + SDCnt*sD;
BBbot= g_s - SDCnt*sD;
 
 
 
if (ShowMACDLine) Plot(g_m,"",cMacdLine);
 
 
if (ShowBB)
{
 ThisColor = IIf(g_m>=BBtop AND g_m>=m1, cMacdGeUprBB,
        IIf(g_m<=BBbot AND g_m<=m1, cMacdLeLwrBB,
        IIf(g_m>g_s, cMacdLtUprBB, cMacdGtLwrBB)));
 
Plot(g_m,"MACD", ThisColor,styleDots|styleNoLine);
 
if (sShapeBtwBB=="Big")
{
ThisShape = IIf(g_m>BBtop, shapeNone,
            IIf(g_m<BBbot, shapeNone,
            shapeSmallCircle));
 
PlotShapes( ThisShape, ThisColor,0,Null, 0  );
}
 
 
}
 
if (ShowStdDev)
Plot(g_s,"MidBand", colorDarkGrey, styleDashed|styleNoLabel);
 
if (ShowBB)
{
Plot(BBtop,"UprBand",cUprBB, styleNoLabel);
Plot(BBbot,"LwrBand",cLwrBB, styleNoLabel);
}
 
 
 
 
Plot(0,"", IIf(g_m>=0, colorBlue, colorRed), styleNoLabel);
 
 
RequestTimedRefresh( 0 );
Back