'' examples/manual/gfx/screensync.bas
''
'' Example extracted from the FreeBASIC Manual
'' from topic 'SCREENSYNC'
''
'' See Also: https://www.freebasic.net/wiki/wikka.php?wakka=KeyPgScreensync
'' --------

'main loop
Do
  
  ' do user input
  ' calculate_a_frame
   
  ScreenSync
  
  ' draw_ a_ frame  
  
Loop Until Inkey <> ""
