.model small
           .code
           org    100h

cdboot:    jmp    body      
filename   db     "CDBoot.Img",0
handle     dw     0
error1     db     "Nessun CD-ROM installato.",13,10,"$"
error2     db     "Nessun CD-ROM nel lettore.",13,10,"$"

body       proc   near
           mov    ax,1500h
           xor    bx,bx
           int    2fh           ;legge la lettera del CD-ROM
           lea    dx,error1
           cmp    bx,0
           je     error
           mov    ax,1508h
           lea    bx,endcode
           xor    si,si
           mov    di,10h
           mov    dx,1
           int    2fh           ;lettura assoluta del boot sector del CD-ROM
           lea    dx,error2
           jc     error
         
           mov    ah,3ch
           xor    cx,cx
           lea    dx,filename
           int    21h
           mov    handle,ax
           mov    ah,40h
           mov    bx,handle
           mov    cx,800h
           lea    dx,endcode
           int    21h
           mov    ah,3eh
           int    21h
           jmp    quit

error:     mov    ah,9
           int    21h

quit:      int    20h
body       endp

endcode:   end    cdboot