WiseStockTrader.com Trading Program Listings
Indicators
Submit New Indicator
All Amibroker (AFL) Metastock eSignal (EFS) NinjaTrader
Function Index
Paste Bin
Register
Login

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

ADX Indicator with Commentary for Amibroker (AFL)
futat
over 14 years ago
Amibroker (AFL)

Rating:
3 / 5 (Votes 2)
Tags:
oscillator, amibroker, commentary

Use ADX to find out the direction. Includes commentary to help analysis.

Similar Indicators / Formulas

ADX with Commentary
Submitted by ibrahimatm almost 15 years ago
MACD
Submitted by futat over 14 years ago
RSI with Commentary
Submitted by ibrahimatm almost 15 years ago
RSI COMPOSTIE
Submitted by MIKE1 almost 15 years ago
Score Card
Submitted by Nahid over 14 years ago
Volatility Ratio
Submitted by walid over 14 years ago

Indicator / Formula

Indicator
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
_SECTION_BEGIN("ADX");
// ADX/DMI Indicator
range = Param("Periods", 14, 2, 200, 1 );
Plot( ad = ADX(range), _DEFAULT_NAME(), ParamColor( "ADX color", colorBlue ), ParamStyle("ADX style", styleThick ) );
Plot( pd = PDI(range), "+DI", ParamColor( "+DI color", colorGreen ), ParamStyle("+DI style") );
Plot( md = MDI(range), "-DI", ParamColor( "-DI color", colorRed ), ParamStyle("-DI style") );
 
if( Status("action") == actionCommentary )
{
ep = IIf( pd > md,
          ValueWhen( Cross( pd, md ), High ),
          ValueWhen( Cross( md, pd ), Low ) );
 
good = IIf( pd > md,
            High > ep,
            Low < ep );
 
bs = IIf( pd > md,
          BarsSince( Cross( pd, md ) ),
          BarsSince( Cross( md, pd ) ) );
 
printf("Directional movement:\n");
printf("\nPlus directional movement index line (+DI) is currently "+
WriteIf( pd > md,"above", "below")+
" minus directional movement index (-DI)");
 
printf("\nIt crossed "+
WriteIf( pd > md, "above", "below" )
+ " " +
WriteVal( bs, 1.0 ) + " bars ago.\n");
 
 
printf("\nWelles Wilder (the author of Directional Movement indicator) suggests buying when the +DI rises above the -DI and selling when the +DI falls below the -DI.");
 
printf("\n" + WriteIf( bs < 4,
"\nSince the crossover happened just recently, this may be a good opportunity to enter " +
WriteIf( pd > md, "long" , "short" ) +
" trade (or close already open "+
WriteIf( pd > md, "short", "long")+
" trade (if any)\n",
"\nCrossover happened more than 3 bars ago, so it is too late to act on this signal.\n")+
 
WriteIf( bs < 4,
"Wilder, however, suggest to qualify simple +DI/-DI crossover with 'extreme point rule'. When the +DI rises above the -DI, the extreme price is the high price on the day the lines cross. When the +DI falls below the -DI, the extreme price is the low price on the day the lines cross. The extreme point is then used as a trigger point at which you should implement the trade.\n","")+
WriteIf( bs < 4, "Current extreme point value is " +
WriteVal( ep ) + "." +
WriteIf( good, " Since today's " +
WriteIf( pd > md,
"high ("+WriteVal( High ) +") is higher",
"low ("+WriteVal(Low)+") is lower" ) +
" than extreme point so the rule is fulfilled and " +
WriteIf( pd > md, "buy","sell")+
" signal is confirmed.\n",
"Until now this rule is NOT fulfilled, so it is suggested to wait for the confirmation.\n"),""));
 
falling = ROC( Ad, 2 ) < 0;
 
strength = IIf( Ad < 15 OR ( Ad < 25 AND falling ), 0,
           IIf( Ad < 25 OR ( Ad < 35 AND falling ), 1,
                2 ) );
 
printf("\nTrend strength:\n");
 
printf("\nThe ADX is currently " + WriteVal( Ad ) + " and "
+WriteIf( falling, "falling.", "rising." ));
 
printf("\nThis suggests that the trend is "+
WriteIf( strength == 0,
"rather weak or very weak. Important: when trend is weak directional movement system generates signal too frequently and whipsaws can 'eat' all your profits.",
WriteIf( strength == 2,
"rather strong.",
"medium in its strength.")));
 
printf("\n\nThis commentary is not a recommendation to buy or sell. Use at your own risk.");
}
_SECTION_END();
 
_SECTION_BEGIN("ADX Indicator");
//Trend Following Systems DO NOT work when ADX is Below 20 - Tech Analysis A-Z; page 120
 
P1 = Param("Period",14,0,100,1);
 
MyPDI= PDI(P1);//Positive Directional Indicator
 
MyMDI= MDI(P1);//Negative Directional Indicator (Minus)
 
MyADX= ADX(P1);//Average Directional Movement Index
 
//Green ADX Line=Rising; Red ADX Line=Falling
 
col = IIf( MyADX > Ref( MyADX, -1 ), colorGreen, colorIndigo );
 
Plot( MyPDI,"+DI",colorBlue, styleLine);
 
Plot( MyMDI,"-DI",colorRed, styleLine);
 
Plot( MyADX,"ADX",col, styleLine);
 
Title=Name()+ " " + Date() + " Price: " + C + EncodeColor(colorIndigo) +"  ADX" + WriteVal( MyADX )+ EncodeColor(colorBlue) + "  +DMI" + WriteVal( MyPDI )+ EncodeColor(colorRed) + "  -DMI" + WriteVal( MyMDI );
_SECTION_END();

0 comments

Leave Comment

Please login here to leave a comment.

Back

We try to maintain hiqhest possible level of service - most formulas, oscillators, indicators and systems are submitted by anonymous users. Therefore www.WiseStockTrader.com does not take any responsibility for it's quality. If you use any of this information, use it at your own risk. You are responsible for your own trading decisions. Be sure to verify that any information you see on these pages is correct, and is applicable to your particular trade. In no case will www.WiseStockTrader.com be responsible for your trading gains or losses.

News Contact Us Terms and Conditions Privacy Policy