API tools faq
paste
saisri

rsi bb

saisri
Aug 7th, 2012
621
0
Never
Add comment
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 11.11 KB | None | 0 0
raw download clone embed print report
  1. _SECTION_BEGIN("CMP");
  2. GfxSelectFont("arial", 13, 700 ); GfxSetBkMode( colorBlue );
  3. GfxSetTextColor( ParamColor("Color",colorBlue) );
  4. Hor=Param("Horizontal Position",120,10,1200,1);
  5. Ver=Param("Vertical Position",100,100,1000,1550);
  6. GfxTextOut(""+C,Hor , Ver );
  7.  
  8. _SECTION_BEGIN("RSI BB");
  9.  
  10.  
  11. A1=EMA(RSI(5),21);
  12. BBtop=BBandTop(A1,9,.5);
  13. BBbot=BBandBot(A1,9,.5);
  14. Color=IIf(a1 > bbtop, colorBlue,IIf(a1 < bbbot, colorRed,colorYellow));
  15. bbtop_col = IIf (BBtop > Ref(BBtop,-1),colorBlue,colorRed);
  16. bbbot_col = IIf (BBbot > Ref(BBbot,-1),colorBlue,colorRed);
  17. Plot(a1,"",color,styleLine);
  18. Plot(BBtop,"",BBtop_col,styleDashed);
  19. Plot(BBbot,"",BBbot_col,styleDashed);
  20. Plot(50,"",31,1);
  21. Buy = a1 > bbtop;
  22. Sell = a1 < bbbot;
  23. Buy = ExRem(Buy,Sell);
  24. Sell = ExRem(Sell,Buy);
  25.  
  26. PlotShapes(Buy*shapeHollowSmallUpTriangle,colorYellow);
  27. PlotShapes(Sell*shapeHollowSmallDownTriangle,colorYellow);
  28. Plot(6, "", Color, styleOwnScale| styleArea|styleNoLabel,-0.5,100);
  29. _SECTION_END();
  30.  
  31. _SECTION_BEGIN("guppy");
  32. e3 = EMA(Close,3);
  33. e60 = EMA(Close,60);
  34. Buy_guppy = e3>e60;
  35. Sell_guppy = e60 > e3;
  36. _SECTION_END();
  37.  
  38. _SECTION_BEGIN("Fibo for all bars");
  39.  
  40. TimeFrameSet( in15Minute*2 );
  41. DH=Ref(H,-1);
  42. DL=Ref(L,-1);
  43. DC=Ref(C,-1);
  44.  
  45.  
  46. pd = ( DH+ DL + DC )/3;
  47. sd1 = (2*pd)-DH;
  48. sd2 = pd -(DH - DL);
  49. sd3 = Sd1 - (DH-DL);
  50. rd1 = (2*pd)-DL;
  51. rd2 = pd +(DH -DL);
  52. rd3 = rd1 +(DH-DL);
  53.  
  54. guppy_30min_buy = EMA(Close,15) > EMA(Close,30) AND EMA(Close,15) > EMA(Close,35) AND EMA(Close,15) > EMA(Close,40) AND EMA(Close,15) > EMA(Close,45);
  55. guppy_30min_sell = EMA(Close,15) < EMA(Close,30) AND EMA(Close,15) < EMA(Close,35) AND EMA(Close,15) < EMA(Close,40) AND EMA(Close,15) < EMA(Close,45);
  56. Buy_rsiema_30min = EMA(RSI(21),3) > EMA(RSI(21),34);
  57. Sell_rsiema_30min= EMA(RSI(21),34) > EMA(RSI(21),3);
  58. Buy_macd_30Min = MACD(3,34)>Signal(3,34,9);
  59. sell_macd_30min = MACD(3,34)<Signal(3,34,9);
  60.  
  61. EMA3 = EMA(RSI(14),3);
  62. ema27 = EMA(RSI(14),27);
  63.  
  64. diff = ema3-EMA27;
  65. EMA_Long = EMA(diff,5);
  66.  
  67. Buy_magic_30min = EMA_long > Ref(EMA_long,-1);
  68. Sell_magic_30min = EMA_long < Ref(EMA_long,-1);
  69. Buy_adx_30min = ADX(9) > Ref(ADX(9),-1) AND PDI(9) > MDI(9);
  70. sell_adx_30min = ADX(9) > Ref(ADX(9),-1) AND PDI(9) < MDI(9);
  71.  
  72. Buy_rsi_BB_30min = EMA(RSI(5),21) > BBandTop(A1,9,.5);
  73. Sell_rsi_BB_30min = EMA(RSI(5),21) < BBandBot(A1,9,.5);
  74.  
  75. TimeFrameRestore();
  76.  
  77. TimeFrameSet( in15Minute );
  78. guppy_15min_buy = EMA(Close,15) > EMA(Close,30) AND EMA(Close,15) > EMA(Close,35) AND EMA(Close,15) > EMA(Close,40) AND EMA(Close,15) > EMA(Close,45);
  79. guppy_15min_sell = EMA(Close,15) < EMA(Close,30) AND EMA(Close,15) < EMA(Close,35) AND EMA(Close,15) < EMA(Close,40) AND EMA(Close,15) < EMA(Close,45);
  80. Buy_rsiema_15min = EMA(RSI(21),3) > EMA(RSI(21),34);
  81. Sell_rsiema_15min= EMA(RSI(21),34) > EMA(RSI(21),3);
  82. Buy_macd_15Min = MACD(3,34)>Signal(3,34,9);
  83. sell_macd_15min = MACD(3,34)<Signal(3,34,9);
  84.  
  85. EMA3 = EMA(RSI(14),3);
  86. ema27 = EMA(RSI(14),27);
  87.  
  88. diff = ema3-EMA27;
  89. EMA_Long = EMA(diff,5);
  90.  
  91. Buy_magic_15min = EMA_long > Ref(EMA_long,-1);
  92. Sell_magic_15min = EMA_long < Ref(EMA_long,-1);
  93. Buy_adx_15min = ADX(9) > Ref(ADX(9),-1) AND PDI(9) > MDI(9);
  94. sell_adx_15min = ADX(9) > Ref(ADX(9),-1) AND PDI(9) < MDI(9);
  95.  
  96. Buy_rsi_BB_15min = EMA(RSI(5),21) > BBandTop(A1,9,.5);
  97. Sell_rsi_BB_15min = EMA(RSI(5),21) < BBandBot(A1,9,.5);
  98.  
  99.  
  100. TimeFrameRestore();
  101.  
  102. TimeFrameSet( in5Minute );
  103. guppy_5min_buy = EMA(Close,15) > EMA(Close,30) AND EMA(Close,15) > EMA(Close,35) AND EMA(Close,15) > EMA(Close,40) AND EMA(Close,15) > EMA(Close,45);
  104. guppy_5min_sell = EMA(Close,15) < EMA(Close,30) AND EMA(Close,15) < EMA(Close,35) AND EMA(Close,15) < EMA(Close,40) AND EMA(Close,15) < EMA(Close,45);
  105. Buy_rsiema_5min = EMA(RSI(21),3) > EMA(RSI(21),34);
  106. Sell_rsiema_5min= EMA(RSI(21),34) > EMA(RSI(21),3);
  107. Buy_macd_5Min = MACD(3,34)>Signal(3,34,9);
  108. sell_macd_5min = MACD(3,34)<Signal(3,34,9);
  109. EMA3 = EMA(RSI(14),3);
  110. ema27 = EMA(RSI(14),27);
  111.  
  112. diff = ema3-EMA27;
  113. EMA_Long = EMA(diff,5);
  114.  
  115. Buy_magic_5min = EMA_long > Ref(EMA_long,-1);
  116. Sell_magic_5min = EMA_long < Ref(EMA_long,-1);
  117.  
  118. Buy_adx_5min = ADX(9) > Ref(ADX(9),-1) AND PDI(9) > MDI(9);
  119. sell_adx_5min = ADX(9) > Ref(ADX(9),-1) AND PDI(9) < MDI(9);
  120.  
  121. Buy_rsi_BB_5min = EMA(RSI(5),21) > BBandTop(A1,9,.5);
  122. Sell_rsi_BB_5min = EMA(RSI(5),21) < BBandBot(A1,9,.5);
  123.  
  124. TimeFrameRestore();
  125.  
  126.  
  127. TimeFrameSet( in1Minute*3 );
  128. guppy_3min_buy = EMA(Close,15) > EMA(Close,30) AND EMA(Close,15) > EMA(Close,35) AND EMA(Close,15) > EMA(Close,40) AND EMA(Close,15) > EMA(Close,45);
  129. guppy_3min_sell = EMA(Close,15) < EMA(Close,30) AND EMA(Close,15) < EMA(Close,35) AND EMA(Close,15) < EMA(Close,40) AND EMA(Close,15) < EMA(Close,45);
  130. Buy_rsiema_3min = EMA(RSI(21),3) > EMA(RSI(21),34);
  131. Sell_rsiema_3min= EMA(RSI(21),34) > EMA(RSI(21),3);
  132. Buy_macd_3Min = MACD(3,34)>Signal(3,34,9);
  133. sell_macd_3min = MACD(3,34)<Signal(3,34,9);
  134. EMA3 = EMA(RSI(14),3);
  135. ema27 = EMA(RSI(14),27);
  136.  
  137. diff = ema3-EMA27;
  138. EMA_Long = EMA(diff,5);
  139.  
  140. Buy_magic_3min = EMA_long > Ref(EMA_long,-1);
  141. Sell_magic_3min = EMA_long < Ref(EMA_long,-1);
  142. Buy_adx_3min = ADX(9) > Ref(ADX(9),-1) AND PDI(9) > MDI(9);
  143. sell_adx_3min = ADX(9) > Ref(ADX(9),-1) AND PDI(9) < MDI(9);
  144.  
  145. Buy_rsi_BB_3min = EMA(RSI(5),21) > BBandTop(A1,9,.5);
  146. Sell_rsi_BB_3min = EMA(RSI(5),21) < BBandBot(A1,9,.5);
  147.  
  148. TimeFrameRestore();
  149.  
  150.  
  151. TimeFrameSet( in1Minute*2 );
  152. guppy_2min_buy = EMA(Close,15) > EMA(Close,30) AND EMA(Close,15) > EMA(Close,35) AND EMA(Close,15) > EMA(Close,40) AND EMA(Close,15) > EMA(Close,45);
  153. guppy_2min_sell = EMA(Close,15) < EMA(Close,30) AND EMA(Close,15) < EMA(Close,35) AND EMA(Close,15) < EMA(Close,40) AND EMA(Close,15) < EMA(Close,45);
  154. Buy_rsiema_2min = EMA(RSI(21),3) > EMA(RSI(21),34);
  155. Sell_rsiema_2min= EMA(RSI(21),34) > EMA(RSI(21),3);
  156. Buy_macd_2Min = MACD(3,34)>Signal(3,34,9);
  157. sell_macd_2min = MACD(3,34)<Signal(3,34,9);
  158. EMA3 = EMA(RSI(14),3);
  159. ema27 = EMA(RSI(14),27);
  160.  
  161. diff = ema3-EMA27;
  162. EMA_Long = EMA(diff,5);
  163.  
  164. Buy_magic_2min = EMA_long > Ref(EMA_long,-1);
  165. Sell_magic_2min = EMA_long < Ref(EMA_long,-1);
  166. Buy_adx_2min = ADX(9) > Ref(ADX(9),-1) AND PDI(9) > MDI(9);
  167. sell_adx_2min = ADX(9) > Ref(ADX(9),-1) AND PDI(9) < MDI(9);
  168.  
  169. Buy_rsi_BB_2min = EMA(RSI(5),21) > BBandTop(A1,9,.5);
  170. Sell_rsi_BB_2min = EMA(RSI(5),21) < BBandBot(A1,9,.5);
  171.  
  172. TimeFrameRestore();
  173.  
  174. TimeFrameSet( in1Minute );
  175. guppy_1min_buy = EMA(Close,15) > EMA(Close,30) AND EMA(Close,15) > EMA(Close,35) AND EMA(Close,15) > EMA(Close,40) AND EMA(Close,15) > EMA(Close,45);
  176. guppy_1min_sell = EMA(Close,15) < EMA(Close,30) AND EMA(Close,15) < EMA(Close,35) AND EMA(Close,15) < EMA(Close,40) AND EMA(Close,15) < EMA(Close,45);
  177. Buy_rsiema_1min = EMA(RSI(21),3) > EMA(RSI(21),34);
  178. Sell_rsiema_1min= EMA(RSI(21),34) > EMA(RSI(21),3);
  179. Buy_macd_1Min = MACD(3,34)>Signal(3,34,9);
  180. sell_macd_1min = MACD(3,34)<Signal(3,34,9);
  181. EMA3 = EMA(RSI(14),3);
  182. ema27 = EMA(RSI(14),27);
  183.  
  184. diff = ema3-EMA27;
  185. EMA_Long = EMA(diff,5);
  186.  
  187. Buy_magic_1min = EMA_long > Ref(EMA_long,-1);
  188. Sell_magic_1min = EMA_long < Ref(EMA_long,-1);
  189. Buy_adx_1min = ADX(9) > Ref(ADX(9),-1) AND PDI(9) > MDI(9);
  190. sell_adx_1min = ADX(9) > Ref(ADX(9),-1) AND PDI(9) < MDI(9);
  191. Buy_rsi_BB_1min = EMA(RSI(5),21) > BBandTop(A1,9,.5);
  192. Sell_rsi_BB_1min = EMA(RSI(5),21) < BBandBot(A1,9,.5);
  193.  
  194. TimeFrameRestore();
  195.  
  196. Title = EncodeColor(colorAqua)+ "\n15 min : " + WriteIf(guppy_15min_buy, EncodeColor(colorGreen)+ "Guppy - Buy",WriteIf(guppy_15min_sell,EncodeColor(colorRed)+ "Guppy - sell", EncodeColor(colorWhite)+ "Guppy - side"))+ WriteIf(Buy_rsiema_15min, EncodeColor(colorGreen)+ " ! RSI - Buy",WriteIf(sell_rsiema_15min,EncodeColor(colorRed)+ " ! RSI - sell", ""))+ WriteIf(Buy_macd_15min, EncodeColor(colorGreen)+ " ! MACD - Buy",WriteIf(sell_MACD_15min,EncodeColor(colorRed)+ " ! MACD - Sell", ""))+ WriteIf(Buy_magic_15min, EncodeColor(colorGreen)+ " ! Magic - Buy",WriteIf(sell_Magic_15min,EncodeColor(colorRed)+ " ! Magic - Sell", ""))+ WriteIf(Buy_ADX_15min, EncodeColor(colorGreen)+ " ! ADX - Buy",WriteIf(sell_adx_15min,EncodeColor(colorRed)+ " ! ADX - Sell",EncodeColor(colorWhite)+ " ! ADX - side"))+ WriteIf(Buy_rsi_BB_15min, EncodeColor(colorGreen)+ " ! RSI-BB - Buy",WriteIf(sell_RSI_BB_15min,EncodeColor(colorRed)+ " ! RSI-BB - Sell", ""))
  197. + EncodeColor(colorAqua)+ "\n 5 min : " + WriteIf(guppy_5min_buy, EncodeColor(colorGreen)+ "Guppy - Buy",WriteIf(guppy_5min_sell,EncodeColor(colorRed)+ "Guppy - sell", EncodeColor(colorWhite)+ "Guppy - side"))+ WriteIf(Buy_rsiema_5min, EncodeColor(colorGreen)+ " ! RSI - Buy",WriteIf(sell_rsiema_5min,EncodeColor(colorRed)+ " ! RSI - sell", ""))+ WriteIf(Buy_macd_5min, EncodeColor(colorGreen)+ " ! MACD - Buy",WriteIf(sell_MACD_5min,EncodeColor(colorRed)+ " ! MACD - Sell", ""))+ WriteIf(Buy_magic_5min, EncodeColor(colorGreen)+ " ! Magic - Buy",WriteIf(sell_Magic_5min,EncodeColor(colorRed)+ " ! Magic - Sell", ""))+ WriteIf(Buy_ADX_5min, EncodeColor(colorGreen)+ " ! ADX - Buy",WriteIf(sell_adx_5min,EncodeColor(colorRed)+ " ! ADX - Sell",EncodeColor(colorWhite)+ " ! ADX - side"))+ WriteIf(Buy_rsi_BB_5min, EncodeColor(colorGreen)+ " ! RSI-BB - Buy",WriteIf(sell_RSI_BB_5min,EncodeColor(colorRed)+ " ! RSI-BB - Sell", ""))
  198. + EncodeColor(colorAqua)+ "\n 2 min : " + WriteIf(guppy_2min_buy, EncodeColor(colorGreen)+ "Guppy - Buy",WriteIf(guppy_2min_sell,EncodeColor(colorRed)+ "Guppy - sell", EncodeColor(colorWhite)+ "Guppy - side"))+ WriteIf(Buy_rsiema_2min, EncodeColor(colorGreen)+ " ! RSI - Buy",WriteIf(sell_rsiema_2min,EncodeColor(colorRed)+ " ! RSI - sell", ""))+ WriteIf(Buy_macd_2min, EncodeColor(colorGreen)+ " ! MACD - Buy",WriteIf(sell_MACD_2min,EncodeColor(colorRed)+ " ! MACD - Sell", ""))+ WriteIf(Buy_magic_2min, EncodeColor(colorGreen)+ " ! Magic - Buy",WriteIf(sell_Magic_2min,EncodeColor(colorRed)+ " ! Magic - Sell", ""))+ WriteIf(Buy_ADX_2min, EncodeColor(colorGreen)+ " ! ADX - Buy",WriteIf(sell_adx_2min,EncodeColor(colorRed)+ " ! ADX - Sell",EncodeColor(colorWhite)+ " ! ADX - side"))+ WriteIf(Buy_rsi_BB_2min, EncodeColor(colorGreen)+ " ! RSI-BB - Buy",WriteIf(sell_RSI_BB_2min,EncodeColor(colorRed)+ " ! RSI-BB - Sell", ""))
  199. + EncodeColor(colorAqua)+ "\n 1 min : " + WriteIf(guppy_1min_buy, EncodeColor(colorGreen)+ "Guppy - Buy",WriteIf(guppy_1min_sell,EncodeColor(colorRed)+ "Guppy - sell", EncodeColor(colorWhite)+ "Guppy - side"))+ WriteIf(Buy_rsiema_1min, EncodeColor(colorGreen)+ " ! RSI - Buy",WriteIf(sell_rsiema_1min,EncodeColor(colorRed)+ " ! RSI - sell", ""))+ WriteIf(Buy_macd_1min, EncodeColor(colorGreen)+ " ! MACD - Buy",WriteIf(sell_MACD_1min,EncodeColor(colorRed)+ " ! MACD - Sell", ""))+ WriteIf(Buy_magic_1min, EncodeColor(colorGreen)+ " ! Magic - Buy",WriteIf(sell_Magic_1min,EncodeColor(colorRed)+ " ! Magic - Sell", ""))+ WriteIf(Buy_ADX_1min, EncodeColor(colorGreen)+ " ! ADX - Buy",WriteIf(sell_adx_1min,EncodeColor(colorRed)+ " ! ADX - Sell",EncodeColor(colorWhite)+ " ! ADX - side"))+ WriteIf(Buy_rsi_BB_1min, EncodeColor(colorGreen)+ " ! RSI-BB - Buy",WriteIf(sell_RSI_BB_1min,EncodeColor(colorRed)+ " ! RSI-BB - Sell", ""))
  200. ;
  201.  
  202. dist = 1.5*ATR(10);
  203.  
  204. for( i = 0; i < BarCount; i++ )
  205. {
  206. if( Buy[i] ) PlotText( "Buy\n@" + C[ i ] , i, L[ i ]-dist[i], colorBlack,colorGreen );
  207. if( Sell[i] ) PlotText( "v" , i, H[ i ]+dist[i], colorBlack, colorRed );
  208.  
  209.  
  210. }
Add Comment
Please, Sign In to add comment
Public Pastes
We use cookies for various purposes including analytics. By continuing to use Pastebin, you agree to our use of cookies as described in the Cookies Policy.  OK, I Understand
Not a member of Pastebin yet?
Sign Up, it unlocks many cool features!