git.sur5r.net Git - cc65/blob - libsrc/runtime/dec.s

   1 ;
   2 ; Ullrich von Bassewitz, 29.12.1999
   3 ;
   4 ; CC65 runtime: Decrement ax by constant or value in Y
   5 ;
   6
   7         .export         decaxy
   8         .export         decax2, decax1
   9         .importzp       tmp1
  10
  11
  12 decaxy: sty     tmp1
  13         sec
  14         sbc     tmp1
  15         bcs     *+3
  16         dex
  17         rts
  18
  19 decax2: sec
  20         sbc     #2
  21         bcs     *+3
  22         dex
  23         rts
  24
  25 decax1: sec
  26         sbc     #1
  27         bcs     *+3
  28         dex
  29         rts
  30
  31