org 0x7c00mov ax,cxmov ds,axmov es,axxor ax,axmov dx,1mov ax,0mov cx,100AGAIN: add ax,dx inc dx loop AGAIN
lea si,[BootMessage]add si,3next:     xor dx,dx     mov bx,[dive]     div bx     add dl,30H     mov [si],dl     dec si     or ax,ax     jnz next     call dispstr     jmp $
dispstr:mov ax,BootMessagemov bp,axmov cx,5mov ax,0x1301mov bx,0x000cmov dl,100int 0x10ret
BootMessage db   0,0,0,0dive   dw 10times (510-($-$$)) db   0dw   0xaa55