Advertisement
Runer112

Untitled

Jul 6th, 2011
148
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.79 KB | None | 0 0
  1. Disp4Lvl:
  2. ld hl,appBackUpScreen
  3. ld de,plotSScreen
  4. push hl
  5. ld a,$07
  6. out ($10),a ;?? cc into
  7. ld a,%11011011
  8. or a
  9. ld hl,flags+asm_flag2
  10. inc (hl)
  11. jr z,__Disp4Lvlskip
  12. rra
  13. ld b,(hl)
  14. inc b
  15. jr z,__Disp4Lvlskip
  16. rra
  17. ld (hl),-2
  18. __Disp4LvlSkip:
  19. ex af,af'
  20. pop hl
  21. ld a,$80
  22. __Disp4LvlEntry:
  23. out ($10),a ;76+cc into, 71cc loop
  24. push af
  25. ex (sp),hl ;waste
  26. ex (sp),hl ;waste
  27. nop ;waste
  28. ld a,$20
  29. out ($10),a ;71cc into
  30. ld b,12
  31. __Disp4LvlLoop:
  32. ex af,af'
  33. rra
  34. ld c,a
  35. ex af,af'
  36. ld a,(de)
  37. xor (hl)
  38. and c
  39. xor (hl)
  40. inc de
  41. inc hl
  42. out ($11),a ;71cc into, 77cc loop
  43. djnz __Disp4LvlLoop
  44. inc bc ;waste
  45. ex af,af'
  46. rra
  47. ex af,af'
  48. pop af
  49. inc a
  50. bit 6,a
  51. jr z,__Disp4LvlEntry
  52. __Disp4LvlDone:
  53. ld a,$05
  54. out ($10),a ;73cc into
  55. ret
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement