Advertisement
Guest User

Untitled

a guest
Oct 18th, 2019
80
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 1.28 KB | None | 0 0
  1. 10BB: 3E 04 ld a,$04
  2. 10BD: D3 1D out ($1D),a ; 1d = 04
  3.  
  4. 10BF: 01 FF 1F ld bc,$1FFF
  5. 10C2: 21 00 C0 ld hl,$C000
  6. 10C5: 11 01 C0 ld de,$C001
  7. 10C8: 3E 01 ld a,$01
  8. 10CA: D3 17 out ($17),a ; 17 = 01
  9. 10CC: 77 ld (hl),a ; write c000
  10. 10CD: ED B0 ldir
  11. 10CF: 4F ld c,a ; c = 01
  12.  
  13. 10D0: CB 27 sla a
  14. 10D2: D3 17 out ($17),a ; 17 = 02
  15. 10D4: 11 00 20 ld de,$2000
  16. 10D7: 21 00 C0 ld hl,$C000
  17.  
  18. 10DA: 7E ld a,(hl) ; read c000
  19. 10DB: B9 cp c
  20. 10DC: 20 17 jr nz,$10F5 ; error if not matched (c000-dfff)
  21.  
  22. 10DE: CB EC set 5,h ; hl = e000
  23. 10E0: 7E ld a,(hl)
  24. 10E1: CB AC res 5,h ; hl = c000
  25. 10E3: B9 cp c
  26. 10E4: 20 0F jr nz,$10F5 ; error if not matched (e000-ffff)
  27.  
  28. 10E6: CB 26 sla (hl) ; c000 = 02
  29. 10E8: 23 inc hl
  30. 10E9: 1B dec de
  31. 10EA: 7B ld a,e
  32. 10EB: B2 or d
  33. 10EC: 20 EC jr nz,$10DA ; next value
  34.  
  35. 10EE: CB 21 sla c
  36. 10F0: 79 ld a,c
  37. 10F1: 30 DD jr nc,$10D0 ; next ?
  38. 10F3: 18 06 jr $10FB
  39.  
  40. ; ram error
  41. 10F5: ED 57 ld a,i
  42. 10F7: F6 04 or $04
  43. 10F9: ED 47 ld i,a
  44. 10FB: C9 ret
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement