Modified example from FB for keyboard input for SDL

[Z!re]

Code:

Dim key as ubyte ptr
Do
       key = SDL_GetKeystate(0)
Loop Until Peek(key + SDLK_ESCAPE)

Can be simplified to:

Code:

Dim key as ubyte ptr
Do
       key = SDL_GetKeystate(0)
Loop Until key[SDLK_ESCAPE]

Fancy, ey?