Willem Cazander
7da08eb10d
Some checks failed
Run test asserts / Test-Asserts (pull_request) Failing after 2m4s
24 lines
219 B
Plaintext
24 lines
219 B
Plaintext
title M80 CP/M Hello world
|
|
.Z80
|
|
|
|
WRITESTR EQU 9h
|
|
BDOS EQU 5h
|
|
|
|
ASEG
|
|
ORG 0100H
|
|
|
|
MAIN:
|
|
LD C,WRITESTR
|
|
LD DE,TXT_HELLO
|
|
CALL BDOS
|
|
NOP_BOMB:
|
|
NOP
|
|
JP NOP_BOMB
|
|
RET
|
|
|
|
TXT_HELLO:
|
|
DB "M80: Hello world...$"
|
|
|
|
END
|
|
DSEG
|