1
0
mirror of https://gitlab.os-k.eu/os-k-team/kvisc.git synced 2023-08-25 14:05:46 +02:00
kvisc/dos/main.k

46 lines
564 B
Plaintext
Raw Normal View History

2019-05-30 12:44:56 +02:00
; The OS/K Team licenses this file to you under the MIT license.
2019-05-30 12:27:13 +02:00
; See the LICENSE file in the project root for more information.
;
; Main function
;
main:
enter
2019-05-30 21:46:00 +02:00
mov ax0, .buf
call print
prn 10
2019-05-30 12:39:24 +02:00
mov ax0, .msg
call print
2019-05-30 18:31:50 +02:00
mov ax0, .buf
mov ax1, .msg
2019-05-30 21:46:00 +02:00
mov ax2, 5
call strnzcpy
2019-05-30 18:31:50 +02:00
2019-05-30 19:07:04 +02:00
prn 10
2019-05-30 18:31:50 +02:00
mov ax0, .buf
2019-05-30 21:46:00 +02:00
mov ax1, 10
call print_n
2019-05-30 12:39:24 +02:00
leave
ret
2019-05-30 21:46:00 +02:00
.msg = "HelloWorld :)"
.buf = "!!!!!!!!!!!!!"
2019-05-30 12:39:24 +02:00
;
; Exit function
;
exit:
enter
mov ax0, .msg
2019-05-30 12:27:13 +02:00
call print
leave
ret
2019-05-30 12:39:24 +02:00
.msg = "Goodbye World :(\n"