DALE&!REVERSING MACD !Author: Johnny Dough, TASC January 2012 !Coded by: Richard Denning 11/9/2011 !www.TradersEdgeSystems.com !ABBREVIATIONS: C is [close]. H is [high]. L is [low]. O is [open]. !INPUTS: mfast is 12. mslow is 26. msig is 9. !UDFs: emaFast is expavg(C,mfast). emaSlow is expavg(C,mslow). MACD is emaFast - emaSlow. sigMACD is expavg(MACD,msig). len_X is mfast. len_Y is mslow. lvl is sigMACD. alphaX is 2 / (1 + len_X). alphaY is 2 / (1 + len_Y). !PLOT THE FOLLOWING AS SINGLE LINE INDICATOR ON PRICE CHART: PMACDeq is (expavg(C,len_X)*alphaX -expavg(C,len_Y)*alphaY)/(alphaX-alphaY). one_alphaX is 1 - alphaX. one_alphaY is 1 - alphaY. PMACDlvl is (lvl+expavg(C,len_Y)*one_alphaY - expavg(C,len_X)*one_alphaX)/(alphaX-alphaY). !PLOT THE FOLLOWING AS SINGLE LINE INDICATOR ON UPPER CHART: PMACDzero is (0+expavg(C,len_Y)*one_alphaY - expavg(C,len_X)*one_alphaX)/(alphaX-alphaY). ShowValues if 1. Buy if countof(MACD < valresult(MACD,1),9,1)=9 and valrule(C > emaSlow,1) and H > valresult(PMACDeq,1). BuyPr is max(valresult(PMACDeq,1),O). ExitBuy if C < PMACDeq. Short if countof(MACD > valresult(MACD,1),9,1)=9 and valrule(C < emaSlow,1) and L < valresult(PMACDeq,1). ShortPr is min(valresult(PMACDeq,1),O). ExitShort if C > PMACDeq. Rule Library CCodeView ShowValues CReportViewSymbol<CO PMACDzeroQPMACDeqO PMACDlvlOMACDOsigMACDOemaFastOemaSlowOmfastOmslowOlen_XOlen_YOalphaXOalphaYO one_alphaXQ one_alphaYQ8AAPLC{C~uC C}@ӡ;@sCyvC@AA@AAى>&=X?{ m?ADBEQAwA'A LA?e?8AA@AA@AAى>&=X?{ m?ADPNB% 1BPBUB%!?:?ENBcKB@AA@AAى>&=X?{ m?ADSK{ B vA B1B e?~?UB,B@AA@AAى>&=X?{ m?ALTR(BvAG*B5B~s?G:?ߡBB@AA@AAى>&=X?{ m?AMATRFAA:EA>K@A_;A@AA@AAى>&=X?{ m?AMGN\BedBaBrBuQ>KaBsaB@AA@AAى>&=X?{ m?AMZNzXC+|CBmXCnC@y6l[C]C@AA@AAى>&=X?{ m?APOLB&=X?{ m?ATVIXA0AYA`A>>1UA2PA@AA@AAى>&=X?{ m?BBBYxBdGBqyB6yB??ȼuBqB@AA@AAى>&=X?{ m?BIDU.CsBo> CRaBZ@ ? CC@AA@AAى>&=X?{ m?BIIBBvfBBsB@@bBfB@AA@AAى>&=X?{ m?BMCHBcAB< B|`BIc`gB/B@AA@AAى>&=X?{ m?BRCM= BUW BقBbB@1=>YBc-B@AA@AAى>&=X?{ m?CApAAAf>Av>ՠ>A+A@AA@AAى>&=X?{ m?CELG~BT+tB#B B|>5L?ߊBcB@AA@AAى>&=X?{ m?CERN~BŁBU~B1B%&$DBDB@AA@AAى>&=X?{ m?CHKPQlB#DBlBtBO?Bw?iB+wfB@AA@AAى>&=X?{ m?CHRWpBp9BSEB&ÛB߾0b> BB@AA@AAى>&=X?{ m?CMCSAAA)9AAp>a>yAA@AA@AAى>&=X?{ m?COSTB0ЗBBB0?pA?֧BRuB@AA@AAى>&=X?{ m?CSCOq=AGA9A:A@ >>̎AA@AA@AAى>&=X?{ m?CTAS= A&A%A7AL=ɨ&=X?{ m?CTSHB}WB]B5B?9?~B4B@AA@AAى>&=X?{ m?CTXSuBAOB֝B @@NR@B_B@AA@AAى>&=X?{ m?DELLuAXjA^{AP݆A=4>`OzA&=X?{ m?DISH ׻AfQAAAAnAA@AA@AAى>&=X?{ m?DTVף:BŝB :B1?B@?S-?ú8Bd6B@AA@AAى>&=X?{ m?EBAY BAZBBZ>~>wBB@AA@AAى>&=X?{ m?ERTSAΑA7bA% A@>?AA@AA@AAى>&=X?{ m?ESRX 4BA1BrB?#?-BO)B@AA@AAى>&=X?{ m?EXPD 0B B 84Bo=B3>t&?S2B31B@AA@AAى>&=X?{ m?EXPEA#A~vA|APݻ݇WA,A@AA@AAى>&=X?{ m?FAST{!BAEB<B F?t?B1B@AA@AAى>&=X?{ m?FISV= hB4BlBWuB?)f?EgBycB@AA@AAى>&=X?{ m?FLEX@@d@@M7>zj@>@X@@AA@AAى>&=X?{ m?FLIRAA6ALAk=0 > AA@AA@AAى>&=X?{ m?FSLR)\FBB65Bf ByB))JBи`B@AA@AAى>&=X?{ m?FWLTRAήAjA;Aѽ |&=X?{ m?GILDH"BBx&B+Ba>cY?V$B"B@AA@AAى>&=X?{ m?GOOGDxCDD@z_AdA D FD@AA@AAى>&=X?{ m?GRMNBv A7MB B/? ? B B@AA@AAى>&=X?{ m?HOLXHAvfA~AhA=L;|AzA@AA@AAى>&=X?{ m?HSIC)\BeBGnB>B/>?)!e? BB@AA@AAى>&=X?{ m?ILMN{BQBpA=qA jy>vhA/B@AA@AAى>&=X?{ m?INFYQhBBdmB`nB@??gBD`B@AA@AAى>&=X?{ m?INTCA彍ATA _A ?0/?hAk0A@AA@AAى>&=X?{ m?INTUHVBBaXBN`B`֙??xTBOB@AA@AAى>&=X?{ m?ISRGqC)~CC@CjAWACFC@AA@AAى>&=X?{ m?JBHT'BqA$+Bl-Byk?u?=(B$B@AA@AAى>&=X?{ m?JOYGHaBBBgBA@S`@;BB@AA@AAى>&=X?{ m?KLAC=B>A/=Be:B?_?7B8/B@AA@AAى>&=X?{ m?LIFEQ BrB"BB ?w> BB@AA@AAى>&=X?{ m?LINTA ׃A=RA@AtA O>.>0dA|A@AA@AAى>&=X?{ m?LLTCQB;ABAQ?f>?A"A@AA@AAى>&=X?{ m?BuySymbol<ShortSymbol<u NAS100 CBackTestProperty ShowValues1PPnx ReversingMACD ShowValuesSPXPemaFastemaSlowAAPLLST @@@@BuyExitBuyPPDx ReversingMACD BuySPXPBuyPrCnas100 @@@@Short ExitShortPPDx ReversingMACD ShortSPXPShortPrCnas100 @@@@00:00