mirror of
https://github.com/uffejakobsen/acme.git
synced 2024-11-25 07:31:52 +00:00
8dc1b0ca0f
git-svn-id: https://svn.code.sf.net/p/acme-crossass/code-0/trunk@310 4df02467-bbd4-4a76-a152-e7ce94205b78
18 lines
366 B
Plaintext
18 lines
366 B
Plaintext
;ACME 0.97
|
|
|
|
*=$0801
|
|
!src "misc/basicstub.a"
|
|
jsr primm : !pet "\renter name: ", 0
|
|
jsr minibuf0
|
|
lda #0 ; terminate input
|
|
sta minibuf_buf, x
|
|
jsr primm : !pet "\ryou entered: <", 0
|
|
lda #>minibuf_buf
|
|
ldy #<minibuf_buf
|
|
jsr print_string_AAYY
|
|
jsr primm : !pet ">\rbye!\r", 0
|
|
rts
|
|
!src "misc/minibuf0.a"
|
|
!src "misc/primm.a"
|
|
!src "misc/print_string.a"
|