acme version

This commit is contained in:
2019-04-01 17:29:52 +11:00
parent 57e7e2dd6a
commit 381e5c2344
2 changed files with 42 additions and 0 deletions

5
jacme/Makefile Normal file
View File

@@ -0,0 +1,5 @@
jimmy.prg: jimmy.S
acme --color --cpu 6510 --format cbm -o $@ $<
clean:
rm -f jimmy.prg

37
jacme/jimmy.S Normal file
View File

@@ -0,0 +1,37 @@
* = $0801 ; basic bootstrap
!byte $0c, $08, $0a, $00, $9e, $20
!byte $34, $30, $39, $36, $00, $00
!byte $00
* = $1000 ; actual progrem starts here
ldx #$08 ; Screen colours
stx $d020
ldx #$00
stx $d021
jsr $e544 ; clear screen
jsr print_string
loop:
lda $dc01 ; Scans the keyboard buffer
cmp #$ef ; If user presses Space ($ef) then quit
bne loop
rts
print_string:
ldx #$00
print_loop:
lda message,x
cmp #$0 ; return on null terminator
bne print_continue
rts
print_continue:
sta $0428,x
inx
jmp print_loop
message !scr "welcome to scat os@"