diff options
| author | Ian C <ianc@noddybox.co.uk> | 2016-04-06 23:37:07 +0100 |
|---|---|---|
| committer | Ian C <ianc@noddybox.co.uk> | 2016-04-06 23:37:07 +0100 |
| commit | d99a9070450157dd8fc3e5d6ad5172af4cc0be59 (patch) | |
| tree | 55d0b494d0ea1d1df8df08fe9f95495a5b7acc98 /src/example/zx81.asm | |
| parent | fdef5d70c1890c7970f31061184a73e699ccd9fb (diff) | |
Added ZX81 output driver
Diffstat (limited to 'src/example/zx81.asm')
| -rw-r--r-- | src/example/zx81.asm | 34 |
1 files changed, 34 insertions, 0 deletions
diff --git a/src/example/zx81.asm b/src/example/zx81.asm new file mode 100644 index 0000000..3a0021c --- /dev/null +++ b/src/example/zx81.asm @@ -0,0 +1,34 @@ + ; Simple example ZX81 code + ; + + option output-file,zx81.p + option output-format,zx81 + + option zx81-margin,pal + option zx81-autorun,on + option zx81-collapse-dfile,off + + option codepage,zx81 + +DFILE: equ 16396 + + org 16514 + + ld hl,(DFILE) + inc hl + ld de,hello +loop: + ld a,(de) + cp 255 + ret z + ld (hl),a + inc hl + inc de + + ld a,(hl) + cp $76 + jr nz,loop + inc hl + jr loop + +hello: db "HELLO|WORLD hello world (#69.99 well spent)",255 |