DALEÔ !! PIVOTS-FIVE LOW AND FIVE HIGH ! Coded by: Richard Denning 9/12/06 !COMMON SETUP INFORMATION Define periods 252. !Total look back period Define strength 12. !Number of bars on each side of pivot OTD is Offsettodate(Month(),Day(),Year()). LowR is LoVal([low],(2*strength)+1). LowM is Val([low],strength). LS if LowR = LowM. HighR is HiVal([high],(2*strength)+1). HighM is Val([high],strength). HS if HighR = HighM. !FIND FIRST PIVOT LOW LT1 is scanany(LS,periods) then OTD . LO1 is ^LT1 + Strength. LO1dte is SetDate(LO1). LowLO1 is val([low],^LO1). !FIND SECOND PIVOT LOW THAT IS BEFORE THE FIRST PIVOT LOW LT2 is scanany(LS,periods,LO1) then OTD. LO2 is ^LT2 + Strength. LO2dte is SetDate(LO2). LowLO2 is val([low],^LO2). !FIND THIRD PIVOT LOW THAT IS BEFORE THE SECOND PIVOT LOW LT3 is scanany(LS,periods,LO2) then OTD. LO3 is ^LT3 + Strength. LO3dte is SetDate(LO3). LowLO3 is val([low],^LO3). !FIND FORTH PIVOT LOW THAT IS BEFORE THE THIRD PIVOT LOW LT4 is scanany(LS,periods,LO3) then OTD. LO4 is ^LT4 + Strength. LO4dte is SetDate(LO4). LowLO4 is val([low],^LO4). !FIND FIFTH PIVOT LOW THAT IS BEFORE THE FORTH PIVOT LOW LT5 is scanany(LS,periods,LO4) then OTD. LO5 is ^LT5 + Strength. LO5dte is SetDate(LO5). LowLO5 is val([low],^LO5). !__________________________________________________________ !FIND FIRST PIVOT HIGH HT1 is scanany(HS,periods,0) then OTD . HO1 is ^HT1 + Strength. HO1dte is SetDate(HO1). HighHO1 is val([high],HO1). !FIND SECOND PIVOT HIGH THAT IS BEFORE THE FIRST PIVOT HIGH HT2 is scanany(HS,periods,HO1) then OTD. HO2 is ^HT2 + Strength. HO2dte is SetDate(HO2). HighHO2 is val([high],HO2). !FIND THIRD PIVOT HIGH THAT IS BEFORE THE SECOND PIVOT HIGH HT3 is scanany(HS,periods,HO2) then OTD. HO3 is ^HT3 + Strength. HO3dte is SetDate(HO3). HighHO3 is val([high],HO3). !FIND FORTH PIVOT HIGH THAT IS BEFORE THE THIRD PIVOT HIGH HT4 is scanany(HS,periods,HO3) then OTD. HO4 is ^HT4 + Strength. HO4dte is SetDate(HO4). HighHO4 is val([high],HO4). !FIND FIFTH PIVOT HIGH THAT IS BEFORE THE FORTH PIVOT HIGH HT5 is scanany(HS,periods,HO4) then OTD. HO5 is ^HT5 + Strength. HO5dte is SetDate(HO5). HighHO5 is val([high],HO5). !_____________________________________________________________ !MACD VALUES AT PIVOT POINTS macdLO1 is val([MACD Osc],LO1). macdLO2 is val([MACD Osc],LO2). macdLO3 is val([MACD Osc],LO3). macdLO4 is val([MACD Osc],LO4). macdLO5 is val([MACD Osc],LO5). macdHO1 is val([MACD Osc],HO1). macdHO2 is val([MACD Osc],HO2). macdHO3 is val([MACD Osc],HO3). macdHO4 is val([MACD Osc],HO4). macdHO5 is val([MACD Osc],HO5). !MACD DIVERGENCE SYSTEM USING PIVOTS !MACD PARM (12,25,9) !STOCHASTIC,SK-SD PARM (21,2,2) PV if [close] > 15 and [Volume ESA] > 10000. MACDdivgP if PV and [close] < LowLO1 and LowLO1 > LowLO2 and [SK] > [SD] and valrule([SK] < [SD],1) and [MACD Osc] > macdLO1. MACDdivgN if PV and [close] > HighHO1 and HighHO1 < HighHO2 and [SK] < [SD] and valrule([SK] > [SD],1) and [MACD Osc] < macdHO1. PD is {position days}. SX if PD >= 5. LX if PD >= 17 . !____________________________________________________________ !REPORTS ListAll if 1. Pdates if 1. Pivots if 1. POS if 1.  Rule Libraryÿÿ CCodeViewPOSÿÿ CReportView ÐSymbolÀ<¡HO1ÀO¡LO1ÀO¡HO2ÀO¡LO2ÀO¡HO3ÀO¡LO3ÀO¡HO4ÀO¡LO4ÀO¡HO5ÀO¡LO5ÀO AAPLÀABªBàBÔBCCcC$C‰CADBEPAðAPB|B¸BÜBC C CACADSK`A(B¼B|BCäB3CCTCHCAKAM¸AB4BpB¨BþBCC C3CALTR®BBCðBCC)C+C7CWCAMATªBB C”B$CÎB8CðBbCCAMGNÀA€A BBCDBC’B/C²BAMLN BA†BlBÈB’BCCFCXCAMZN