Download Demark (TD) Moving Average 1 For Amibroker (AFL)

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

#1 Selling Amibroker Plugin featuring:

Advanced Adaptive Indicators

Advanced Pattern Exploration

Neural Networks

And Much More ....

Find Out More Here

5 / 5 (Votes 1)

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

_SECTION_BEGIN("TD MA I");
/******************************************************************
 * TD Moving Average I:
 * Enter long: if "matrend" > 0
 * Enter short: if "matrend" < 0
 *
 * Notes: Moving average turns green whenever an uptrend trend starts.
 * It turns red whenever a down trend starts.
 *
 * Improvements: Stops are not set up to indicate that an exit was hit.
 *
 *******************************************************************/
TDBullishColor = ParamColor("Bullish Color:", colorGreen);
TDBearishColor = ParamColor("Bearish Color:", colorRed);
TDPlotStyle = ParamStyle("Plot Style", styleLine);
barlows12 = REF(HHV(L, 12),  - 1);
barhighs12 = REF(LLV(H, 12),  - 1);
mabearish5 = MA(h, 5);
mabullish5 = MA(l, 5);
mabullish = L > barlows12;
mabearish = H < barhighs12;
maplotvalue[0] = 0;
matrend[0] = 0; //no trend
nDaysCountDown = 0;
bTrend = 0;
fLastValue = 0;
 
for (x = 0; x < BarCount; x++)
{
  if (mabullish[x] == 1)
  {
    fLastValue = maplotvalue[x] = mabullish5[x];
    nDaysCountDown = 3;
    bTrend = 1;
    matrend[x] = 1;
  }
  else if (mabearish[x] == 1)
  {
    fLastValue = maplotvalue[x] = mabearish5[x];
    nDaysCountDown = 3;
    bTrend = 0-1;
    matrend[x] = 0-1;
  }
  else
  {
    nDaysCountDown = nDaysCountDown - 1;
    if (nDaysCountDown > 0-1)
    {
      matrend[x] = bTrend; //trend extends to the 3 extra bars
      if (bTrend == 1)
      {
        fLastValue = maplotvalue[x] = mabullish5[x];
      }
      else if (bTrend < 0)
      {
        fLastValue = maplotvalue[x] = mabearish5[x];
      }
    }
    else
    {
      maplotvalue[x] = fLastValue;
      matrend[x] = 0; //no trend
    }
  }
}
 
PLOT(maplotvalue, "TDMA I", IIF(mabullish > 0, TDBullishColor, IIF(mabearish > 0, TDBearishColor, colorYellow)), TDPlotStyle | styleNoRescale, null, null, 0);
 
_SECTION_END();

Stock Portfolio Organizer

WiseTrader Toolbox

Demark (TD) Moving Average 1 for Amibroker (AFL)
kaiji
about 15 years ago
Amibroker (AFL)

Screenshots

Indicator / Formula

0 comments

Leave Comment