Scalping indicator

Category: Indicators By: ALE Created: December 15, 2017, 11:38 AM
December 15, 2017, 11:38 AM
Indicators
16 Comments

This is a new scalping Indicator, with buy and sell arrows that appear when a new signal is detected, and point out the direction that the price should go in the following candles.

It is based on a couple of Universal oscillator.

// SCALPING DAX INIDCATOR, USABLE ON ANY TOOL, SET UP TIME FRAME 1 MINUTE.
// PRC CONTRIBUTE_ ALE_15/12/2017
//DEFPARAM CALCULATEONLASTBARS=50000
//WHB=6
//WHS=6
//BIB=6
//BIS=6
//PPKKS=0.994
//PPKKB=0.994
//RES=3
//SUP=3


// GRAPHIC VARIABLES
PIP                 = 1*Pipsize      //ARROW DISTANCE
LIN                 = 20             //LENGTH OF SEGMENT OF SUPPORT OR RESISTENCE
RESISTENCE          = RES*Pipsize    //DISTANCE OF THE SEGMENT OF THE RESISTENCE
SUPPORT             = SUP*Pipsize    //DISTANCE OF THE SEGMENT OF THE SUPPORT
// ENABLED PARNER   1-0 / ON-OFF
ONCE PrEnabled01    = P01           // SWITCH INDICATOR P01,P02 ETC ..

//////////////////////////////////////////////////////////////////////
// MODIFIED UNIVERSAL OSCILLATOR 1
whitenoiseB= (Close - Close[WHS])
if barindex>BIS then
 a11= exp(-1.414 * 3.14159 / BIS)
 b11= 2*a11 * Cos(1.414*180 /BIS)
 c22= b11
 c33= -a11 * a11
 c11= 1 - c22 - c33
 filtB= c11 * (whitenoiseB + whitenoiseB[1])/2+ c22*filtB[1] + c33*filtB[1]
 filt11 = filtB
 if ABS(filt11)>pkB[1] then
  pkB = ABS(filt11)
 else
  pkB = PPKKS * pkB[1]
 endif
 if pkB=0 then
  denomB = -1
 else
  denomB = pkB
 endif
 if denomB = -1 then
  resultB = resultB[1]
 else
  resultB = filt11/pkB
 endif
endif
// MODIFIED UNIVERSAL OSCILLATOR 2
whitenoise= (Close - Close[WHB])
if barindex>BIB then
 // super smoother filter
 a1= (-1.414 * 3.14159 / BIB)
 b1= 2*a1 * Cos(1.414*180 /BIB)
 c2= b1
 c3= -a1 * a1
 c1= 1 - c2 - c3
 filt= c1 * (whitenoise + whitenoise[1])/2+ c2*filt[1] + c3*filt[1]
 filt1 = filt
 if ABS(filt1)>pk[1] then
  pk = ABS(filt1)
 else
  pk = PPKKB * pk[1]
 endif
 if pk=0 then
  denom = -1
 else
  denom = pk
 endif
 if denom = -1 then
  resultS = resultS[1]
 else
  resultS = filt1/pk
 endif
endif

//////////////////////////////////////////////////////////////////////
//PATNER UP 1
PrUp01 =  results <-0.5
PrUp01 =  PrUp01 and  results crosses over resultb
PrUp01 = (PrUp01 and PrEnabled01)
//PATNER DOWN 1
PrDw01 = results >0.5
PrDw01 = PrDw01 and results crosses under resultb
PrDw01 = (PrDw01 and PrEnabled01)

//////////////////////////////////////////////////////////////////////
// COLORS OF THE ARROW AND SEGMENT
IF PrUp01 THEN
 R=0
 G=128
 B=255
ELSIF PrDw01 THEN
 R=0
 G=128
 B=255
endif

if  TIME >=80000 and time <=210000 THEN
 if PrUp01  then
  DRAWARROWUP(barindex,LOW-PIP)coloured(R,G,B)
  DRAWSEGMENT(barindex,LOW-SUPPORT,barindex-LIN, LOW-SUPPORT )coloured(R,G,B)
 elsif PrDw01  then
  DRAWARROWDOWN(barindex,HIGH+PIP)coloured(R,G,B)
  DRAWSEGMENT(barindex,HIGH+RESISTENCE,barindex-LIN, HIGH+RESISTENCE)coloured(R,G,B)
 endif
ENDIF

RETURN

Download
Filename: SCALPING-INDICATOR-V2.itf
Downloads: 1574
ALE Master
My name is Alessandro, i'm a trader since 2006 You can find me on my website: <a href="http://www.automatictrading.it/" rel="dofollow">www.automatictrading.it</a> <strong>(trading programming services Italy)</strong> Italy
Author’s Profile

Comments

Logo Logo
Loading...