kvisc/ka/crt/prn/print.k

39 lines
471 B
Plaintext

; The OS/K Team licenses this file to you under the MIT license.
; See the LICENSE file in the project root for more information.
;
; Max amount of characters that print() will print
;
v_print_max := 0xFF
;
; Print a string
;
print:
mov rcx, v_print_max
.1:
test b[ax0], b[ax0]
jmp.z .2
prn b[ax0]
inc ax0
loop .1
.2:
ret
;
; Print exactly ax1 characters
;
print_n:
mov rcx, ax1
.1:
prn b[ax0]
inc ax0
loop .1
ret