//////////////////////////////////////////////////////////////////////////////////////////////////////

Sub doTrans(x)
	call x.filters.item(0).Apply()
	x.style.visibility=""
	call x.filters.item(0).Play()
End Sub

//////////////////////////////////////////////////////////////////////////////////////////////////////