Code:
[org 0x0100]
jmp start
message: db 'BC230200414'
length: dw 11
clrscr:
push es
push ax
push di
mov ax, 0xb800
mov es, ax
mov di, 0
nextloc:
mov word [es:di], 0x2020
add di, 2
cmp di, 4000
jne nextloc
pop di
pop ax
pop es
ret
printstr:
push bp
mov bp, sp
push es
push ax
push cx
push si
push di
mov ax, 0xb800
mov es, ax
mov al, 80
mul byte [bp + 10]
add ax, [bp + 12]
shl ax, 1
mov di, ax
mov si, [bp + 6]
mov cx, [bp + 4]
mov ah, [bp + 8]
nextchar:
lodsb
stosw
loop nextchar
pop di
pop si
pop cx
pop ax
pop es
pop bp
ret 10
start:
call clrscr
mov ax, 69
push ax
mov ax, 0
push ax
mov ax, 4
push ax
mov ax, message
push ax
push word [length]
call printstr
mov ax, 0x4c00
int 0x21
Output: