mov ah,0        ;  clear screen
        mov al,3
        int 0x10
        mov ah,0x13 ; print string
        mov bl,0xa
        mov al,1
        mov cx,len
        mov dh,0
        mov dl,0
        mov bp,hello
        int 0x10
        hlt
hello:  db "*** Hello KVM Forum ***",0xd,0xa
len:    equ $-hello