Rank: Advanced Member
Groups: Registered, Registered Users, Subscribers Joined: 10/29/2004(UTC) Posts: 1,394 Location: Glastonbury, CT
Was thanked: 2 time(s) in 2 post(s)
|
Highlights
long
A30:=ExtFml("MSX_KSR.CER",C,30);
RWH:=(H-Ref(L,-30))/(A30*Sqrt(30));
RWL:=(Ref(H,-30)-L)/(A30*Sqrt(30));
Pk:=Mov((RWH-RWL),3,W);
A:=ExtFml("MSX_KSR.CER",C,5);
Val1.5:=If(Pk>0,Max(HHV(H-1.5*A,10),Ref(HHV(H-1.5*A,10),-1)),Min(LLV(L+1.5*A,10),Ref(LLV(L+1.5*A,10),-1)));
TD:=ExtFml("PowerPivots.TrendDirection",1,2);
LE:=C>Val1.5 AND TD=1;
SE:=C<Val1.5 AND TD=-1;
SX:=C>Val1.5 AND TD<=0;
LX:=C<Val1.5 AND TD>=0;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B>0
Short
A30:=ExtFml("MSX_KSR.CER",C,30);
RWH:=(H-Ref(L,-30))/(A30*Sqrt(30));
RWL:=(Ref(H,-30)-L)/(A30*Sqrt(30));
Pk:=Mov((RWH-RWL),3,W);
A:=ExtFml("MSX_KSR.CER",C,5);
Val1.5:=If(Pk>0,Max(HHV(H-1.5*A,10),Ref(HHV(H-1.5*A,10),-1)),Min(LLV(L+1.5*A,10),Ref(LLV(L+1.5*A,10),-1)));
TD:=ExtFml("PowerPivots.TrendDirection",1,2);
LE:=C>Val1.5 AND TD=1;
SE:=C<Val1.5 AND TD=-1;
SX:=C>Val1.5 AND TD<=0;
LX:=C<Val1.5 AND TD>=0;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B<0
Out
A30:=ExtFml("MSX_KSR.CER",C,30);
RWH:=(H-Ref(L,-30))/(A30*Sqrt(30));
RWL:=(Ref(H,-30)-L)/(A30*Sqrt(30));
Pk:=Mov((RWH-RWL),3,W);
A:=ExtFml("MSX_KSR.CER",C,5);
Val1.5:=If(Pk>0,Max(HHV(H-1.5*A,10),Ref(HHV(H-1.5*A,10),-1)),Min(LLV(L+1.5*A,10),Ref(LLV(L+1.5*A,10),-1)));
TD:=ExtFml("PowerPivots.TrendDirection",1,2);
LE:=C>Val1.5 AND TD=1;
SE:=C<Val1.5 AND TD=-1;
SX:=C>Val1.5 AND TD<=0;
LX:=C<Val1.5 AND TD>=0;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B=0
Symbols
Long entry
A30:=ExtFml("MSX_KSR.CER",C,30);
RWH:=(H-Ref(L,-30))/(A30*Sqrt(30));
RWL:=(Ref(H,-30)-L)/(A30*Sqrt(30));
Pk:=Mov((RWH-RWL),3,W);
A:=ExtFml("MSX_KSR.CER",C,5);
Val1.5:=If(Pk>0,Max(HHV(H-1.5*A,10),Ref(HHV(H-1.5*A,10),-1)),Min(LLV(L+1.5*A,10),Ref(LLV(L+1.5*A,10),-1)));
TD:=ExtFml("PowerPivots.TrendDirection",1,2);
LE:=C>Val1.5 AND TD=1;
SE:=C<Val1.5 AND TD=-1;
SX:=C>Val1.5 AND TD<=0;
LX:=C<Val1.5 AND TD>=0;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B>0 AND Ref(B,-1)<=0
Short Entry
A30:=ExtFml("MSX_KSR.CER",C,30);
RWH:=(H-Ref(L,-30))/(A30*Sqrt(30));
RWL:=(Ref(H,-30)-L)/(A30*Sqrt(30));
Pk:=Mov((RWH-RWL),3,W);
A:=ExtFml("MSX_KSR.CER",C,5);
Val1.5:=If(Pk>0,Max(HHV(H-1.5*A,10),Ref(HHV(H-1.5*A,10),-1)),Min(LLV(L+1.5*A,10),Ref(LLV(L+1.5*A,10),-1)));
TD:=ExtFml("PowerPivots.TrendDirection",1,2);
LE:=C>Val1.5 AND TD=1;
SE:=C<Val1.5 AND TD=-1;
SX:=C>Val1.5 AND TD<=0;
LX:=C<Val1.5 AND TD>=0;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B<0 AND Ref(B,-1)>=0
Long exit
A30:=ExtFml("MSX_KSR.CER",C,30);
RWH:=(H-Ref(L,-30))/(A30*Sqrt(30));
RWL:=(Ref(H,-30)-L)/(A30*Sqrt(30));
Pk:=Mov((RWH-RWL),3,W);
A:=ExtFml("MSX_KSR.CER",C,5);
Val1.5:=If(Pk>0,Max(HHV(H-1.5*A,10),Ref(HHV(H-1.5*A,10),-1)),Min(LLV(L+1.5*A,10),Ref(LLV(L+1.5*A,10),-1)));
TD:=ExtFml("PowerPivots.TrendDirection",1,2);
LE:=C>Val1.5 AND TD=1;
SE:=C<Val1.5 AND TD=-1;
SX:=C>Val1.5 AND TD<=0;
LX:=C<Val1.5 AND TD>=0;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B=0 AND Ref(B,-1)>0
Short exit
A30:=ExtFml("MSX_KSR.CER",C,30);
RWH:=(H-Ref(L,-30))/(A30*Sqrt(30));
RWL:=(Ref(H,-30)-L)/(A30*Sqrt(30));
Pk:=Mov((RWH-RWL),3,W);
A:=ExtFml("MSX_KSR.CER",C,5);
Val1.5:=If(Pk>0,Max(HHV(H-1.5*A,10),Ref(HHV(H-1.5*A,10),-1)),Min(LLV(L+1.5*A,10),Ref(LLV(L+1.5*A,10),-1)));
TD:=ExtFml("PowerPivots.TrendDirection",1,2);
LE:=C>Val1.5 AND TD=1;
SE:=C<Val1.5 AND TD=-1;
SX:=C>Val1.5 AND TD<=0;
LX:=C<Val1.5 AND TD>=0;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B=0 AND Ref(B,-1)<0
|