Not a member of Pastebin yet?
Sign Up,
it unlocks many cool features!
- #include "Header.inc"
- #include "Rogue.inc"
- .org 0
- .echo "Program Start: ",$
- .echo "Size: ",ProgEnd
- ; Executable Header
- db 0 ; Size of Stack needed
- ProgStart:
- ; End Headers Start Data
- call Newline
- ld hl,08000h-1
- ld bc,0FF7Fh
- _ inc hl
- push bc
- push hl
- ld a,h
- call DispHexA
- pop hl \ push hl
- ld a,l
- call DispHexA
- pop hl \ push hl
- ld a,':'
- ld a,(hl)
- call DispHexA
- call Newline
- rFastCopy
- pop hl
- pop bc
- dec c
- ld a,c
- or a
- jr nz,-_
- ld a,0ffh
- ld c,a
- djnz -_
- call FlushKeys
- call WaitKey
- rEndThread
- ProgEnd:
- .echo "Program End: ",$
Add Comment
Please, Sign In to add comment