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

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