Re: Funny Moves
- Posted by Liona Kerslake <paulk at UNISERVE.COM> Nov 21, 2000
- 433 views
Sorry for the enigmatic letter, I don't like to give away what I'm working on 'till it's decent. So, here is the piece of code that's causing the problem: Please and thanks for looking at it. --Thomas ---/\=== --Start your binary! integer action atom LEFT,RIGHT LEFT=333 RIGHT=331 procedure walkLEFT() if action=LEFT then display_image({sides,ups}, walkL[2]) --just BMPs* pause(.1) display_image({sides,ups}, blackout[2]) * display_image({sides,ups}, walkR[2]) * pause(.1) sides+=1 end if end procedure procedure walkRIGHT() if action=RIGHT then display_image({sides,ups}, walkL[2]) pause(.1) display_image({sides,ups}, blackout[2]) display_image({sides,ups}, walkR[2]) pause(.1) sides-=2 end if end procedure procedure walkies() action=get_key() if action=LEFT then walkLEFT() elsif action=RIGHT then walkRIGHT() end if end procedure while 1 do walkies() end while