IchimokuDM Strategy on SAF40
-
Okay so I wrote this strategy today after studying some Ichimoku Trading Stategies.
It is mainly based around Ichimoku breakout strategy but also includes checks for Directional Movement and Divergence.
I wrote it for my local market (South Africa 40 Cash) on the 1Hr Timeframe on which it performs okay, which is no mean feat.
But to be completely honest i am disappointed with Ichimoku as an automated strategy in general.
But enough mumbling. Here is the code, maybe someone will find it useful.
//Stategy: IchimokuDM //Market: South Africa 40 Cash (ZAR2 Micro) //Timeframe: 1Hr //Spread: 15 //Timezone: UTC +2 Defparam Cumulateorders = False Defparam Flatbefore = 090000 Defparam Flatafter = 170000 If hour < 9 or hour > 17 then //Works in conjunction with Flat Before/After time possize = 0 If longonmarket then SELL AT MARKET ElsIf shortonmarket then EXITSHORT AT MARKET EndIf Else possize = 2 //Minimum position size EndIf P = 11 //Standard Period R = P*2 //Standard Period x 2 I = P*3 //Standard Period x 3 TS = (highest[P](high)+lowest[P](low))/2 //Tenkan-Sen KS = (highest[I](high)+lowest[I](low))/2 //Kijun-Sen CS = close[I] //Chikou-Span SA = (TS+KS)/2 //Senkou-Span A SB = (highest[I](high)+lowest[I](low))/2 //Senkou-Span B DP = DIplus[R](close) //DI+ DN = DIminus[R](close) //DI- AX = ADX[R] //ADX ATR = AverageTrueRange[P](close) If RSI[R](close) > RSI[R](close[I]) Then If close < CS Then BDIV = 1 //Buy Divergence Present SDIV = 0 EndIf EndIf If RSI[R](close) < RSI[R](close[I]) Then If close > CS Then BDIV = 0 //Sell Divergence Present SDIV = 1 EndIf EndIf If countofposition = 0 and BDIV = 1 and AX > 17 and DP > 20 and DP > DN and close > SA and close > SB and TS > KS and close > CS and Close > SA[I] and Close > SB[I] Then Buy possize*3 contracts at close + ATR stop EndIf If countofposition = 0 and SDIV = 1 and AX > 17 and DN > 20 and DP < DN and close < SA and close < SB and TS < KS and close < CS and Close < SA[I] and Close < SB[I] Then Sellshort possize*3 contracts at close - ATR stop EndIf If Longonmarket then If close < TS Then Sell possize contracts at Market //Exit third of position at close below Tenkan-Sen Line ElsIf close < TS and close < KS Then Sell possize contracts at Market //Exit third of position at close below Kijun-Sen Line ElsIf close < TS and close < KS and close < SA or close < SB Then Sell at market //Exit full position at close below Senkou-Span EndIf ElsIf Shortonmarket then If close > TS Then Exitshort possize contracts at Market //Exit third of position at close below Tenkan-Sen Line ElsIf close > TS and close > KS Then Exitshort possize contracts at Market //Exit third of position at close above Kijun-Sen Line ElsIf close > TS and close > KS and close > SA or close > SB Then Exitshort at market //Exit full position at close above Senkou-Span EndIf EndIf Set Stop pLOSS ATR*4 Set Target pPROFIT ATR*5Francesco78 thanked this postSo here is the modified code with your last addition:
//Stategy: IchimokuDM //Market: South Africa 40 Cash (ZAR2 Micro) //Timeframe: 1Hr //Spread: 15 //Timezone: UTC +2 Defparam Cumulateorders = False Defparam Flatbefore = 073000 Defparam Flatafter = 163000 If hour < 9 or hour > 17 then //Works in conjunction with Flat Before/After time possize = 0 If longonmarket then SELL AT MARKET ElsIf shortonmarket then EXITSHORT AT MARKET EndIf Else possize = 2 //Minimum position size EndIf P = 11 //Standard Period R = P*2 //Standard Period x 2 I = P*3 //Standard Period x 3 TS = (highest[P](high)+lowest[P](low))/2 //Tenkan-Sen KS = (highest[I](high)+lowest[I](low))/2 //Kijun-Sen CS = close[I] //Chikou-Span SA = (TS+KS)/2 //Senkou-Span A SB = (highest[I](high)+lowest[I](low))/2 //Senkou-Span B DP = DIplus[R](close) //DI+ DN = DIminus[R](close) //DI- AX = ADX[R] //ADX ATR = AverageTrueRange[P](close) If RSI[R](close) > RSI[R](close[I]) Then If close < CS Then BDIV = 1 //Buy Divergence Present SDIV = 0 EndIf EndIf If RSI[R](close) < RSI[R](close[I]) Then If close > CS Then BDIV = 0 //Sell Divergence Present SDIV = 1 EndIf EndIf If countofposition = 0 and BDIV = 1 and AX > 17 and DP > 20 and DP > DN and close > SA and close > SB and TS > KS and close > CS and Close > SA[I] and Close > SB[I] Then Buy possize*3 contracts at close + ATR stop EndIf If countofposition = 0 and SDIV = 1 and AX > 17 and DN > 20 and DP < DN and close < SA and close < SB and TS < KS and close < CS and Close < SA[I] and Close < SB[I] Then Sellshort possize*3 contracts at close - ATR stop EndIf If Longonmarket then If close < TS Then //If close below Tenkan-Sen Line If close < close[1] Then Sell at Market //Close position at next lower close EndIf EndIf ElsIf Shortonmarket then If close > TS Then //If close below Tenkan-Sen Line If close > close[1] Then Exitshort at Market //Close position at next higher close EndIf EndIf EndIf Set Stop pLOSS ATR*4 Set Target pPROFIT ATR*5I changed the time schedule between 07.30-16.30 for the intraday 8 points spread. Results attached, please confirm before I add it into the library! thanks.
Francesco78 thanked this postNice idea, will take a look and post any updates.
Yea, bit of a pain with the lack of partial closures, bi-directional trading and stuff- but as quick proof of concept it’s useful.
Just for future reference guys, if you are dependent on abilities such as to execute partial closures and wish to run with such features, I could actually make that happen for you using our own tools. Wouldn’t normally disclose the screen shots attached but I think there’s some good ideas and thinking out here that is out-growing PRT. (attached is monitoring views from our system)
Best,
M
Francesco78 thanked this post
- You must be logged in to reply to this topic.
Summary
This topic contains 8 replies,
has 3 voices, and was last updated by 
8 years, 9 months ago.
Topic Details
| Forum: | ProOrder: Automated Strategies & Backtesting |
| Language: | English |
| Started: | 06/08/2017 |
| Status: | Active |
| Attachments: | 4 files |
