import graphics, sdl, sdl_image, colors
import os, strutils

var surface: graphics.PSurface = newScreenSurface(640, 480)
var event: TEvent
var x:int=0

block game_loop:

  while true:
    sleep(50)
    surface.FillRect((0,0,640,480), colBlack);
    surface.drawCircle((x, 100), 60, colRed)
    SDL.UpdateRect(surface.s, 0, 0, 640, 480)
    x=x+1

    if event.kind == KEYDOWN:
      echo "hello"
      break game_loop
    if event.kind == QUITEV:
      echo "hello"
      break game_loop