git.sur5r.net Git - cc65/blob - libsrc/gamate/waitvblank.s

   1 ;
   2 ; void waitvblank (void);
   3 ;
   4
   5         .include        "gamate.inc"
   6         .include        "extzp.inc"
   7
   8         .forceimport    ticktock
   9         .export         _waitvblank
  10
  11 ; FIXME: is this actually correct?
  12
  13 .proc   _waitvblank
  14
  15         lda     tickcount
  16 @lp:    cmp     tickcount
  17         beq     @lp
  18         rts
  19
  20 .endproc