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

Trend Catcher for Amibroker (AFL)

Rating:
3 / 5 (Votes 8)
Tags:
amibroker, trend

Best Indicator For MCX & F&O, Works in Lower time Frame.

Happy Trading!!!

Screenshots

Indicator / Formula

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
Title =" ";
///Coded By Joby Kumar
/// Jobyk518@gmail.com
 
_SECTION_BEGIN("Trend Cacther");
 
VAR1 = Param("Var1", 10, 1, 50, 1);
VAR2 = Param("Var2", 4, 0.5, 10, 0.5);
 
AVAR1=(High + Low)/2 - VAR2 * ATR(VAR1);
AVAR2=(High + Low)/2 + VAR2 * ATR(VAR1);
 
FLAG1 = False;
FLAG2 = False;
VAR3= Null;
VAR4 = Null;
AVAR3 = Null;
AVAR3[VAR1-1] = 0;
AVAR4 = Null;
AVAR4[VAR1-1] = 0;
AVART1 = Null;
AVART2 = Null;
 
for(i = VAR1; i < BarCount; i++)
{
    //Buy Signal Generation
    if(AVAR4[i-1] < Close[i-1] && FLAG1 == False)
    {
        AVART1[i] = True;
        FLAG1 = True;
        VAR3 = AVAR1[i];
    }
    else
    {
        AVART1[i] = False;
    }
     
    //Trailing Stop Loss Buy
    if(FLAG1 == True)
    {
        if(VAR3 < AVAR1[i])
        {
            VAR3 = AVAR1[i];
        }
        AVAR3[i] = VAR3;
    }
    else
    {
        AVAR3[i] = Null;
    }
     
    //Short Signal Generation
    if(AVAR3[i-1] > Close[i-1] && FLAG1 == True)
    {
        AVART2[i] = True;
        FLAG1 = False;
        VAR4 = AVAR2[i];
    }
    else
    {
        AVART2[i] = False;
    }
     
    //Trailing Stop Loss Short
    if(FLAG1 == False)
    {
        if(VAR4 > AVAR2[i])
        {
            VAR4 = AVAR2[i];
        }
        AVAR4[i] = VAR4;
    }
    else
    {
        AVAR4[i] = Null;
    }
}
 
Buy = ExRem(AVART1, AVART2);
Short = ExRem(AVART2, AVART1);
 
Sell = Short;
Cover = Buy;
 
 
Candlecol=IIf(BarsSince(Buy)<BarsSince(Short) AND BarsSince(Buy)!=0,colorBlue,
IIf(BarsSince(Buy)>BarsSince(Short) AND BarsSince(Short)!=0,4,1));
cc1=IIf(Buy,colorBlue,IIf(Short,colorRed,Candlecol));
SetBarFillColor(Cc1);
Plot( C, "Price", colorDefault, styleCandle );
AVAR10 = IIf(IsNull(AVAR3), L - 0.1, AVAR3);
AVAR11 = IIf(IsNull(AVAR4), H + 0.1, AVAR4);
 
Plot(AVAR10, "SL1", IIf(IsNull(AVAR3), colorBlack, colorBrightGreen), styleStaircase|styleDashed);
Plot(AVAR11, "SL2", IIf(IsNull(AVAR4), colorBlack, colorOrange), styleStaircase|styleDashed);
 
Buyshape = Buy * shapeUpArrow;
SellShape = Sell * shapeDownArrow;
PlotShapes( Buyshape, colorBrightGreen, 0, Low );
PlotShapes( SellShape, colorRed, 0, High );
 
Shortshape = Short * shapeDownArrow;
CoverShape = Cover * shapeUpArrow;
PlotShapes( Shortshape, colorOrange, 0, High, -30);
PlotShapes( CoverShape, colorTurquoise, 0, Low, -30 );
 
 
 
_SECTION_END();

4 comments

1. trinag

Good Formula Thanks for Posting

2. rdy087

this is nothing but supertrend

3. kuzukapama

It gives signals too late,,,

4. chatpurpose

very nice. its not late, identifies trend.

Leave Comment

Please login here to leave a comment.

Back