Advertisement
Eeems

Untitled

Jun 30th, 2011
181
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
  1. #include "Header.inc"
  2. #include "Rogue.inc"
  3. .org 0
  4. .echo "Program Start: ",$
  5. .echo "Size: ",ProgEnd
  6. ; Executable Header
  7.     db 0            ; Size of Stack needed
  8. ProgStart:
  9. ; End Headers Start Data
  10.     call Newline
  11.     ld hl,08000h-1
  12.     ld bc,0FF7Fh
  13. _           inc hl
  14.             push bc
  15.             push hl
  16.                 ld a,h
  17.                 call DispHexA
  18.             pop hl \ push hl
  19.                 ld a,l
  20.                 call DispHexA
  21.             pop hl \ push hl
  22.                 ld a,':'
  23.                 call PutChar
  24.             pop hl \ push hl
  25.                 ld a,(hl)
  26.                 call DispHexA
  27.                 call Newline
  28.                 rFastCopy
  29.             pop hl
  30.             pop bc
  31.             dec c
  32.                 jr nz,-_
  33.         ld a,0ffh
  34.         ld c,a
  35.         djnz -_
  36.     call FlushKeys
  37.     call WaitKey
  38.     rEndThread
  39. ProgEnd:
  40. .echo "Program End: ",$
Advertisement
Add Comment
Please, Sign In to add comment
Advertisement