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

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