Advertisement
NovaYoshi

IndexToBitmap

Jul 21st, 2014
301
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. IndexToBitmap: ; Y = $yx -> Y = index, A = mask
  2.   tya
  3.   pha
  4.   lsr
  5.   lsr
  6.   lsr
  7.   sta Temp
  8.   pla
  9.   and #7
  10.   tay
  11.   lda BitSelect,y
  12.   ldy Temp
  13.   rts
  14. BitSelect:
  15.   .byt 1, 2, 4, 8, 16, 32, 64, 128
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement