OpenEuphoria

Hello,

I am trying to make a wrapper example of the keyboard example that is found on the Allegro 5 API wiki. I think I have the code right, but it is not working correctly. Anyone help and notice if I'm doing something wrong?

 
--program should end when ESC is pressed, but it does not happen 
while run = 1 do 
	al_wait_for_event(event,0) 
	 
	if key = ALLEGRO_KEY_ESCAPE then 
		run = 0 
	end if 
	 
end while 

https://wiki.allegro.cc/index.php?title=Basic_Keyboard_Example -The link to the keyboard example

Any help is appericated.