// Heiken Ashi Smoothed
// http://www.o-bo.com
//

// mettre en variables, les 4 variables suivantes:
// periode1=6
// lissage1=3
// periode2=2
// lissage2=2

if barindex >periode1 then
	habaseopen=average[periode1,lissage1](open)
	habaseclose=average[periode1,lissage1](close)
	habaselow=average[periode1,lissage1](low)
	habasehigh=average[periode1,lissage1](high)
endif

once haopen=habaseopen

haclose=(habaseopen+habaseclose+habaselow+habasehigh)/4
if barindex>periode1+1 then
	haopen=(haopen[1]+haclose[1])/2
endif

hasopen=average[periode2,lissage2](haopen)
hasclose=average[periode2,lissage2](haclose)

space=(max(hasopen,hasclose)-min(hasopen,hasclose))/10
hasfill1=min(hasopen,hasclose)+1*space
hasfill2=min(hasopen,hasclose)+2*space
hasfill3=min(hasopen,hasclose)+3*space
hasfill4=min(hasopen,hasclose)+4*space
hasfill5=min(hasopen,hasclose)+5*space
hasfill6=min(hasopen,hasclose)+6*space
hasfill7=min(hasopen,hasclose)+7*space
hasfill8=min(hasopen,hasclose)+8*space
hasfill9=min(hasopen,hasclose)+9*space

return hasopen,hasclose, hasfill1, hasfill2, hasfill3, hasfill4, hasfill5, hasfill6, hasfill7, hasfill8, hasfill9