[EquisMetaStock Group] Pivot Point Exploration

["Wiro Hardy" <wiro.pribadi@xxxxxxxxx>]

Below is the code to draw monthly pivot on a daily chart. It's draw
S1, S2, R1 and R2 line. Based on this code, I try to write a
exploration code to scan which securities are close near S1 and S2,
but none of them seems to be work :(

I also try to add to the indicator code to draw S3 and R3 line and
again, it didn't work.
Would any please help me to code the exploration and modified the
indicator code to draw S3 and R3 line?

Many thanks,
Wiro.

m:=Month()<>Ref(Month(),-1);

{ Month's OHLC }
{Om:=ValueWhen(2,m,O);}
Hm:=ValueWhen(1,m,HighestSince(2,m,H));
Hm:=ValueWhen(1,Hm>0,Hm);
Lm:=ValueWhen(1,m,LowestSince(2,m,L));
Lm:=ValueWhen(1,Lm>0,Lm);
Cm:=ValueWhen(1,m,Ref(C,-1));

{ Pivot levels }
p1:=(Hm+Lm+Cm)/3+Hm-Lm;
p2:=(Hm+Lm+Cm)/3*2-Lm;
p3:=(Hm+Lm+Cm)/3*2-Hm;
p4:=(Hm+Lm+Cm)/3-Hm+Lm;

{ Plot on daily chart }
p1;p2;p3;p4


 
Yahoo! Groups Links

<*> To visit your group on the web, go to:
    http://groups.yahoo.com/group/equismetastock/

<*> Your email settings:
    Individual Email | Traditional

<*> To change settings online go to:
    http://groups.yahoo.com/group/equismetastock/join
    (Yahoo! ID required)

<*> To change settings via email:
    mailto:equismetastock-digest@xxxxxxxxxxxxxxx 
    mailto:equismetastock-fullfeatured@xxxxxxxxxxxxxxx

<*> To unsubscribe from this group, send an email to:
    equismetastock-unsubscribe@xxxxxxxxxxxxxxx

<*> Your use of Yahoo! Groups is subject to:
    http://docs.yahoo.com/info/terms/