/*[[
	Name := EMA Cross
	Author := Hapsa
	Link := http://www.metaquotes.net/
	Separate Window := No
	Separate Window := No
	First Color := Fuchsia
	First Draw Type := Symbol
	First Symbol := 108
	Use Second Data := Yes
	Second Color := Aqua
	Second Draw Type := Symbol
	Second Symbol := 108
]]*/
Input : FastPeriod(5), SlowPeriod(20);
Variable : shift(0);
Variable : iMASlowPrevious(0), iMaSlowCurrent(0), iMaFastPrevious(0), iMaFastCurrent(0);
Variable : val1(0), val2(0);

SetLoopCount(0);

For shift=Bars-1 Downto 0 Begin
	val1=0;
	val2=0;
	
	iMaSlowPrevious = iMAEx(SlowPeriod, MODE_EMA, 0, PRICE_CLOSE, shift-1);
	iMaSlowCurrent = iMAEx(SlowPeriod, MODE_EMA, 0, PRICE_CLOSE, shift);
	iMaFastPrevious = iMAEx(FastPeriod, MODE_EMA, 0, PRICE_CLOSE, shift-1);
	iMaFastCurrent = iMAEx(FastPeriod, MODE_EMA, 0, PRICE_CLOSE, shift);
	
	If iMaFastPrevious<iMaSlowPrevious and iMaFastCurrent>iMASlowCurrent Then val1=High[shift];
	
	If iMaFastPrevious>iMaSlowPrevious and iMaFastCurrent<iMASlowCurrent Then val2=Low[shift];
	 
	SetIndexValue(shift,val1+5*point);
	SetIndexValue2(shift,val2-5*point);
End;