#HighX!=PlayerX[0]!-1*32
#HighY!=PlayerY[0]!-1*32
#SetImageTranslucent("High2.bmp",HighX!,HighY!,32,32)
:Plot
#Wait(Move$)
#If Move$="UP"
{
      #HighY!=HighY!-32
	#TempY!=Y!-1
      #SetImageTranslucent("High2.bmp",HighX!,HighY!,32,32)
      #If HighY!~=Queue[TempY!]!
            {	
}
}
#Branch(:Plot)
#Wait()

    Source: geocities.com/the_dark_hawk