Platformer in Scheme