Timing Solutions for Swing Traders: A Novel Approach to Successful Trading Using Technical Analysis and Financial Astrology

APPENDIX 4

Formulas in MetaStock Format*

MOMENTUM TIMING OSCILLATOR AS USED IN FIGURE 2.3

Length1:=Input("Base Unit",2,100,21);

Length2:=Input("First Period",2,100,13);

Length3:=Input("Second Period",1,100,8);

Length4:=Input("Third Period",1,100,8);

Cycle:=Input("Cycle",1,100,21);

plot:=Input("Select Plot, 1=OB Lines, 2=AutoLines 3=Cycle Zones", 1,3,3);

n:=(RSI(Length1)-LLV(RSI(Length1),Length2));

k:=(HHV((RSI(Length1)),Length2)-LLV(RSI(Length1),Length2));

k2:=If(k=0,0.000001,k);

Osc:=100*n/k2;

OscAvg1:=(2*Mov(Osc,Length3,S)-100);

OscAvg2:=Mov(OscAvg1,Length4,S);

StdP:=1.2*Stdev(oscavg2,89);

StdM:=Neg(1.2*Stdev(oscavg2,89));

n2:=(Fml("frhlc")-LLV(Fml("frhlc"),Cycle));

k2:=HHV((Fml("frhlc")),Cycle)-LLV(Fml("frhlc"),Cycle);

k22:=If(k2=0,0.000001,k2);

OscAvg12:=(2*Mov((100*n2/k22),Length2,S)-100);

RwUp:=(45+Stdev(OscAvg12,2));

RwDn:=Neg(45+Stdev(oscavg12,2));

Zone:=If(oscavg12>0,RwUp,If(oscavg12<=0,RwDn,RwUp));

If(plot=1,50,If(plot=2,StdP,Zone));

If(plot=1,Neg(50),If(plot=2,StdM,Zone));

OscAvg1; OscAvg2; 0;

{Frhlc: Function referred to in the formula Momentum Timing Oscillator}

frhlc:=(((RSI(HIGH,13))+(RSI(LOW,13))+(2*(RSI(CLOSE,13))))/4);

frhlc;

VOLUME ZONE OSCILLATOR AS REFERRED TO IN FIGURE 2.10 AND FIGURE 5.8

VZO was developed by Walid Khalil and David Steckler. The following VZO is modified for merging of plots of volume ratio compressed indicator and planetary aspects indicators.

prd:=Input("Period",1,200,13);

avg:=Input("Average",2,200,8);