mirror of
https://gitlab.os-k.eu/os-k-team/kvisc.git
synced 2023-08-25 14:05:46 +02:00
39 lines
471 B
Plaintext
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
|
|
|