Heikin - Ashi Candlesticks

[citation

="'Using The Heikin-Ashi Technique', by Dan Valcu Stocks & Commodities Feb 2004 and Valcu, Heikin-Ashi, How to trade without candlestick Patterns, Educofin, 2011; "]

{cmacdon’s HA bars with congestion bars.  Originally called Traffic lights}

[target=Price;]

haClose := (O+H+L+C)/4;

haOpen := (prev + hist(haClose,1))/2;

haHigh := max(H, haOpen, haClose);

haLow := min(L, haOpen, haClose);

haCl:=((O+H+L+C)/4+haOpen+Max((O+H+L+C)/4,Max(H,haOpen))+Min((O+H+L+C)/4,Min(L,haOpen)))/4;

Greenlight:=Hahigh-haopen;

Redlight:=Halow-haOpen;

{I changed this to a difference calculation so as to net off the minor congestion amounts to whatever is net up or down trend.}

LightDiff:=Greenlight+Redlight;

[linestyle=Candle;color=Green; ]

If(lightdiff >=0.000,haOpen,undefined);

If(lightdiff >=0.000, haHigh,undefined);

If(lightdiff >=0.000, haLow,undefined);

If(lightdiff >=0.000, haClose,undefined);

[linestyle=Candle;color=Red; ]

If(lightdiff <=0.000,haOpen,undefined);

If(lightdiff <=0.000, haHigh,undefined);

If(lightdiff <=0.000, haLow,undefined);

If(lightdiff <=0.000, haClose,undefined);

[linestyle=Candle;color=Black; ]

If(Greenlight >0.000 and Redlight <-0.000,haOpen,undefined);

If(Greenlight >0.000 and Redlight <-0.000, haHigh,undefined);

If(Greenlight >0.000 and Redlight <-0.000, haLow,undefined);

If(Greenlight >0.000 and Redlight <-0.000, haClose,undefined);

[citation

="'Using The Heikin-Ashi Technique', by Dan Valcu Stocks & Commodities Feb 2004 and Valcu, Heikin-Ashi, How to trade without candlestick Patterns, Educofin, 2011; "]

{This indicator creates an Oscillator with congestion bars absorbed into the closest up or down trend.  Valcu does not use oscillators this way}

haClose := (O+H+L+C)/4;

haOpen := (prev + hist(haClose,1))/2;

haHigh := max(H, haOpen, haClose);

haLow := min(L, haOpen, haClose);

haCl:=((O+H+L+C)/4+haOpen+Max((O+H+L+C)/4,Max(H,haOpen))+Min((O+H+L+C)/4,Min(L,haOpen)))/4;

Greenlight:=HaClose-haOpen;

[name=Green Traffic Lights1; linestyle=Solid; width=2] [color=Black; name=Greenlight]

Greenlight;

d:=0;

[horzline=0];

[linestyle=fill;

color=Green;]

Greenlight; [linestyle=fill;

color=RED;]d;

{This section shows shows lighter coloured bars as the differences above or below zero shrink, or in otherwords, the oscillator moves up or down from a maxima or minima.}

[name=Green Traffic Lights1; linestyle=bar; width=4] [color=Green; name=Greenlight]

If(Greenlight>=0,Greenlight,undefined);

[name=Red Traffic Lights2; linestyle=bar; width=4] [color=Orange; name=Redlight2]

If(Greenlight>=0 AND Greenlight<Hist(Greenlight,1),Greenlight,undefined);

[name=Red Traffic Lights3; linestyle=bar; width=4] [color=Red; name=Redlight]

If(Greenlight<0,Greenlight,undefined);

[name=Red Traffic Lights4; linestyle=bar; width=4] [color=Lime; name=Redlight2]

If(Greenlight<0 AND Greenlight>Hist(Greenlight,1),Greenlight,undefined);

[citation

="'Using The Heikin-Ashi Technique', by Dan Valcu Stocks & Commodities Feb 2004 and Valcu, Heikin-Ashi, How to trade without candlestick Patterns, Educofin, 2011"]

{cmacdon's HA wave vol version.  Valcu does not show Volume this way.}

haClose := (O+H+L+C)/4;

haOpen := (prev + hist(haClose,1))/2;

haHigh := max(H, haOpen, haClose);

haLow := min(L, haOpen, haClose);

haCl:=((O+H+L+C)/4+haOpen+Max((O+H+L+C)/4,Max(H,haOpen))+Min((O+H+L+C)/4,Min(L,haOpen)))/4;

Greenlight:=Hahigh-haopen;

Redlight:=Halow-haOpen;

LightDiff:=Greenlight+Redlight;

{The section shows the total or average wave volume for each up or down trend or congestion areas shown by the HA bars.  (The part of the formula can be easily adapted to most other indicators by defining the parameters for the BuyVol and downvol from any other indicator.   For instance if the indicator was a crossover of the close the set up is BuyVol =c>Ma(c,30,s) and Down Vol<Ma(c,30,s))}

v1:=input("1=Total volume on wave or 2=Average volume on wave", 2, 1, 2);

[linestyle=Bar; width=4]

[name=Preferred Buy Vol;  color=Green]

Buyvol:= Greenlight >=0.0000001 and Redlight >=-0.0000000;

BuyVol2:=If(BuyVol,+1*v,0);

TotalBuyVol:=If( BuyVol ,+1*v+prev(BuyVol2),0);

Buybars:=barssince(Buyvol2=0);

if(v1=2,TotalBuyVol,undefined);

if(v1=1,TotalBuyVol/buybars,undefined);

[name=Preferred Sell Vol;  color=Red]

Sellvol:= Greenlight <=0.0000000 and Redlight <=0.0000001;

SellVol2:=If(SellVol,+1*v,0);

TotalSellVol:=If( SellVol ,+1*v+prev(SellVol2),0);

Sellbars:=barssince(Sellvol2=0);

if(v1=2,TotalSellVol,undefined);

if(v1=1,TotalSellVol/Sellbars,undefined);

{Heikin Ashi also has congestion bars.  Refer Dan Valcu’s article in Tasc or his book, “Heikin-Ashi, How to trade without candlestick Patterms, Educofin,2011 }

[name=Congestion Vol; color=black]

Convol:= Greenlight >=0.0000001 and Redlight <=-0.0000001;

ConVol2:=If(ConVol,+1*v,0);

TotalConVol:=If( ConVol ,+1*v+prev(ConVol2),0);

Conbars:=barssince(Convol2=0);

if(v1=2,TotalConVol,undefined);

if(v1=1,TotalConVol/Conbars,undefined);

O+H+L+C)/4;

prev + hist(haClose,1))/2;

max(H, haOpen, haClose);

min(L, haOpen, haClose);

O+H+L+C)/4+haOpen+Max((O+H+L+C)/4,Max(H,haOpen))+Min((O+H+L+C)/4,Min(L,haOpen)))/4;

=solid; width=2]

=haDelta; color=Green]

=solid; width=2]

=SMAhaDelta; color=Red]

ma(haDelta,3,s);

=0]