TileGen Routine

z80 » Graphics

  1. ;======================================
  2. ; tilegen by James Malcolm (me@jgmalcolm.com)
  3. ; draws 16x8 tile map
  4. ;======================================
  5. tilegen:
  6. ld ix,$fc00
  7. ld b,8
  8. loop_row:
  9. push bc
  10. columns:
  11. ld b,16
  12. loop_columns:
  13. push hl
  14. ld l,(hl)
  15. ld h,0
  16. add hl,hl
  17. add hl,hl
  18. add hl,hl
  19. ld de,tile0
  20. add hl,de
  21. draw_tile:
  22. ld de,$10
  23. ld c,b
  24. ld b,8
  25. push ix
  26. draw_tile_loop:
  27. ld a,(hl)
  28. ld (ix),a
  29. add ix,de
  30. inc hl
  31. djnz draw_tile_loop
  32. pop ix
  33. ld b,c
  34. pop hl
  35. inc hl
  36. inc ix
  37. djnz loop_columns
  38. ld de,$10*7
  39. add ix,de
  40. pop bc
  41. djnz loop_row
  42. ret


More from z80 » Graphics
Find a Pixel // Grayscale // Pixel Manipulation // The Screen // Sprites // SDR8 Routine // Tile Maps // TileGen Routine