mirror of
https://gitlab.os-k.eu/os-k-team/kvisc.git
synced 2023-08-25 14:05:46 +02:00
42 lines
507 B
Plaintext
42 lines
507 B
Plaintext
; The OS/K Team licences 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:
|
|
enter
|
|
mov rcx, v_print_max
|
|
|
|
.1:
|
|
test b[ax0], b[ax0]
|
|
jz .2
|
|
prn b[ax0]
|
|
inc ax0
|
|
loop .1
|
|
|
|
.2:
|
|
leave
|
|
ret
|
|
|
|
;
|
|
; Print exactly ax1 characters
|
|
;
|
|
print_n:
|
|
enter
|
|
mov rcx, ax1
|
|
|
|
.1:
|
|
prn b[ax0]
|
|
inc ax0
|
|
loop .1
|
|
|
|
leave
|
|
ret
|
|
|