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)
|
this indicator plots 4 lines over the price, they show 2% variable zones
10 40 Vidya Zones
A:=Mov(C,10,VAR);
B:=Mov(C,40,VAR);
AUB:=A*1.01;
ALB:=(2*A)-AUB;
BUB:=B*1.01;
BLB:=(2*B)-BUB;
AUB;ALB;BUB;BLB;
The Expert, you will need the Powerpivot Plus Add-on to use this
Highlights
Long
A:=Mov(C,10,VAR);
B:=Mov(C,40,VAR);
AUB:=A*1.01;
ALB:=(2*A)-AUB;
BUB:=B*1.01;
BLB:=(2*B)-BUB;
LE:=Cross(C,AUB) AND AUB>BUB;
LX:=Cross(ALB,C) AND AUB>BUB;
SE:=Cross(ALB,C) AND ALB<BLB;
SX:=Cross(C,AUB) AND ALB<BLB;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B>0
Short
A:=Mov(C,10,VAR);
B:=Mov(C,40,VAR);
AUB:=A*1.01;
ALB:=(2*A)-AUB;
BUB:=B*1.01;
BLB:=(2*B)-BUB;
LE:=Cross(C,AUB) AND AUB>BUB;
LX:=Cross(ALB,C) AND AUB>BUB;
SE:=Cross(ALB,C) AND ALB<BLB;
SX:=Cross(C,AUB) AND ALB<BLB;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B<0
Out
A:=Mov(C,10,VAR);
B:=Mov(C,40,VAR);
AUB:=A*1.01;
ALB:=(2*A)-AUB;
BUB:=B*1.01;
BLB:=(2*B)-BUB;
LE:=Cross(C,AUB) AND AUB>BUB;
LX:=Cross(ALB,C) AND AUB>BUB;
SE:=Cross(ALB,C) AND ALB<BLB;
SX:=Cross(C,AUB) AND ALB<BLB;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B=0
Symbols
Long entry
A:=Mov(C,10,VAR);
B:=Mov(C,40,VAR);
AUB:=A*1.01;
ALB:=(2*A)-AUB;
BUB:=B*1.01;
BLB:=(2*B)-BUB;
LE:=Cross(C,AUB) AND AUB>BUB;
LX:=Cross(ALB,C) AND AUB>BUB;
SE:=Cross(ALB,C) AND ALB<BLB;
SX:=Cross(C,AUB) AND ALB<BLB;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B>0 AND Ref(B,-1)<=0
Short entry
A:=Mov(C,10,VAR);
B:=Mov(C,40,VAR);
AUB:=A*1.01;
ALB:=(2*A)-AUB;
BUB:=B*1.01;
BLB:=(2*B)-BUB;
LE:=Cross(C,AUB) AND AUB>BUB;
LX:=Cross(ALB,C) AND AUB>BUB;
SE:=Cross(ALB,C) AND ALB<BLB;
SX:=Cross(C,AUB) AND ALB<BLB;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B<0 AND Ref(B,-1)>=0
Long Exit
A:=Mov(C,10,VAR);
B:=Mov(C,40,VAR);
AUB:=A*1.01;
ALB:=(2*A)-AUB;
BUB:=B*1.01;
BLB:=(2*B)-BUB;
LE:=Cross(C,AUB) AND AUB>BUB;
LX:=Cross(ALB,C) AND AUB>BUB;
SE:=Cross(ALB,C) AND ALB<BLB;
SX:=Cross(C,AUB) AND ALB<BLB;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B=0 AND Ref(B,-1)>0
Short Exit
A:=Mov(C,10,VAR);
B:=Mov(C,40,VAR);
AUB:=A*1.01;
ALB:=(2*A)-AUB;
BUB:=B*1.01;
BLB:=(2*B)-BUB;
LE:=Cross(C,AUB) AND AUB>BUB;
LX:=Cross(ALB,C) AND AUB>BUB;
SE:=Cross(ALB,C) AND ALB<BLB;
SX:=Cross(C,AUB) AND ALB<BLB;
B:=ExtFml("PowerPivots.SysEval",LE,LX,SE,SX,"!@#$#@!");
B=0 AND Ref(B,-1)<0
|
