mirror of
https://github.com/uffejakobsen/acme.git
synced 2024-11-22 03:30:46 +00:00
125d525b7d
git-svn-id: https://svn.code.sf.net/p/acme-crossass/code-0/trunk@309 4df02467-bbd4-4a76-a152-e7ce94205b78
28 lines
471 B
Plaintext
28 lines
471 B
Plaintext
;ACME 0.97
|
|
|
|
; zp variables
|
|
!addr ptr = $fb
|
|
|
|
; kernal
|
|
!addr k_chrout = $ffd2
|
|
|
|
; print zero-terminated string
|
|
print_string_AAYY
|
|
sta ptr + 1 ; store high byte of pointer
|
|
lda #0 ; and clear low byte of pointer so we can use "(ptr), y"
|
|
sta ptr
|
|
beq +
|
|
;;;
|
|
--- jsr k_chrout
|
|
iny
|
|
bne +
|
|
; fix high byte
|
|
inc ptr + 1
|
|
+ lda (ptr), y
|
|
bne ---
|
|
rts
|
|
|
|
!eof
|
|
There is also a version in the c64 basic rom (strout, $ab1e), but that one
|
|
stops at double quotes.
|