home *** CD-ROM | disk | FTP | other *** search
/ Share Gallery 1 / share_gal_1.zip / share_gal_1 / LA / LA026.ZIP / 6502BD.SIM < prev    next >
Text File  |  1990-10-22  |  339b  |  40 lines
  1. fc 6502
  2. pa1000
  3. ay
  4. ldy  $0711
  5. ldx  #$0
  6. txa
  7. sta  $0708,x
  8. inx
  9. dey
  10. bne  $1006h
  11. lda  $0710
  12. clc
  13. rol
  14. rol
  15. rol
  16. sta  $0712
  17. clc
  18. ldx  #$0
  19. ldy  $0710
  20. lda  $0700,x
  21. rol
  22. sta  $0700,x
  23. inx
  24. dey
  25. bne  $101d
  26. ldx  #$0
  27. ldy  $0711
  28. lda  $0708,x
  29. sed
  30. adc  $0708,x
  31. sta  $0708,x
  32. inx
  33. dey
  34. bne  $102d
  35. dec  $0712
  36. bne  $1018
  37. stp
  38. end
  39.  
  40.