以下是安装程序。
assume cs:code
code segment
start: mov ax,0
       mov es,ax
       mov ax,cs
       mov ds,ax
       mov di,200h
       mov si,offset int7ch
       mov cx,offset int7chend-offset int7ch
       cld
       rep movsb
       mov word ptr es:[7ch*4],200h
       mov word ptr es:[7ch*4+2],0
       mov ax,4c00h
       int 21h
int7ch: call diskM
        cmp bx,2879
        ja return
        mov al,1
        mov dl,0   
        cmp ah,1
        ja return
        je first
        mov ah,2
        int 13h
return: iret
 first: mov ah,3
        int 13h
        jmp short return
diskM: push ax           ;//此程序功能通过传参数bx返回ch、cl，dh.
       push bx            
       mov ax,bx        
       mov dx,0
       mov bx,1440
       div bx           ;//逻辑扇区号/(1440)
       push ax          ;//保存商
       mov ax,dx         ;//传余数作被除数.
       mov bl,18
       div bl          ;//(rem(逻辑扇区号/1440))/18  
       mov ch,al       ;//返回ch磁道号
       inc ah           ;//余数自加1.
       mov cl,ah       ;//返回cl扇区号
       pop dx          ;//取商
       mov dh,dl       ;//返回dh磁面号. int(bx/1440)<255.所以dl即为商.
       pop bx
       pop ax
       ret
int7chend: nop
code ends
end start