Download 2 - Point Plot For Metastock

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

0 / 5 (Votes 0)

metastock, trendline

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

{ 2-point plot, coding example v3.0
  Trendline choice 1: last High/Low in month.
  Trendline choice 2: lows at July/Dec 2006
 
  Copyright © 2003-2007 Jose Silva
  http://www.metastocktools.com }
 
{ User inputs }
extend:=Input("Extend trendline?  [1]Yes,  [0]No",0,1,1);
plot:=Input("choose event [1-2] trend",1,2,1);
choose:=Input("plot:  [1]Trendline,  [2]Event points",1,2,1);
 
{ Define events }
time1:=C=HHV(C,21);
time2:=C=LLV(C,21);
time2:=time2 AND time2<>time1;
 
{ Alternative events }
dateA:=Year()=2006 AND Month()=7;
dateA:=If(LastValue(Cum(dateA))=0,
 Year()=LastValue(Year())-1
 AND Month()=LastValue(Month()),dateA);
LoValA:=Lowest(ValueWhen(1,dateA,L));
timeA:=dateA AND L=LastValue(LoValA);
 
dateB:=Year()=2006 AND Month()=12;
dateB:=If(LastValue(Cum(dateB))=0,
 Year()=LastValue(Year())
 AND Month()=LastValue(Month()),dateB);
LoValB:=Lowest(ValueWhen(1,dateB,L));
timeB:=dateB AND L=LastValue(LoValB);
timeB:=timeB AND timeB<>timeA;
 
{ Choose events }
time1:=If(plot=1,time1,timeA);
time2:=If(plot=1,time2,timeB);
 
{ Restrict to last events }
time1:=time1
 AND Cum(time1)=LastValue(Cum(time1));
time2:=time2
 AND Cum(time2)=LastValue(Cum(time2));
 
{ Sort events }
t1pds:=LastValue(BarsSince(time1));
t2pds:=LastValue(BarsSince(time2));
x1:=If(t1pds>=t2pds,time1,time2);
x2:=If(t1pds>=t2pds,time2,time1);
y1:=If(plot=1,C,L);
y2:=If(plot=1,C,L);
 
{ Fix coordinates }
y1:=ValueWhen(1,x1,y1);
y2:=LastValue(ValueWhen(1,x2,y2));
b1:=LastValue(BarsSince(x1));
b2:=LastValue(BarsSince(x2));
 
{ Trendline definition/restriction/extension }
plot:=
 y1+BarsSince(x1)*(y2-y1)/Max(b1-b2,.000001);
b2:=LastValue(If(extend,0,b2));
plot:=Ref(Ref(plot,-b2),b2);
 
{ Plot trendline on price chart }
If(choose=1,plot,time1+time2)

Stock Portfolio Organizer

WiseTrader Toolbox

2 - Point Plot for Metastock
martin3
over 14 years ago
Metastock

Indicator / Formula

0 comments

Leave Comment