diff options
Diffstat (limited to 'emucpm.z80')
| -rw-r--r-- | emucpm.z80 | 29 |
1 files changed, 29 insertions, 0 deletions
diff --git a/emucpm.z80 b/emucpm.z80 new file mode 100644 index 0000000..befecee --- /dev/null +++ b/emucpm.z80 @@ -0,0 +1,29 @@ +; +; Quick hack to emulate some CPM bdos calls (well, enough to make it work) +; + org 0 + halt + + org 5 + jp cpm + + org $ff00 +cpm: + ld a,9 + cp c + jr z,print_string + ld a,2 + cp c + jr z,print_char + ret + +print_string: + ld bc,$0082 + out (c),a + ret + +print_char: + ld a,e + ld bc,$0080 + out (c),a + ret |