vis.my1.dbg

; boot sector program \^[\^M
l cs:100 0 0 1\^M
a 100\^M
    jmp 013e\^M
    nop\^M
\^M
a 13e\^M
                cli\^M
        mov ax, cs\^M
            mov ss, ax\^M
        mov ax, ffee\^M
        mov sp, ax  \^M
                mov ax, 07c0\^M
        mov es, ax\^M
        mov ds, ax\^M
                sti\^M
        call 2b7\^M
            jne 158\^M
            jmp 2cf\^M
        mov si, 114\^M
                call 2be\^M
                xor ah, ah\^M
            int 16\^M
                cmp ah, 23\^M
                je 177\^M
                cmp ah, 21\^M
                je 173\^M
                cmp ah, 12\^M
                je 1a3\^M
                jmp 15e\^M
        ; floppy \^[    xor dl, dl\^M
                jmp 179\^M
    ; harddisk\^[   mov dl, 80\^M
                mov si, 16c\^M
                call 2be\^M
            xor ah, ah\^M
                int 16\^M
            sub ah, 02\^M
                or ah, dl\^M
            mov byte [01e8], ah\^M
    ; shift?\^[ call 2b7\^M
            jne 194\^M
    ; boot\^[        jmp 2cf\^M
        ; write disk\^[  mov ax, 0301\^M
            xor bx, bx\^M
            mov cx, bx\^M
            inc cx\^M
            xor dx, dx\^M
            int 13\^M
    ; goto bypass\^[    jmp 2cf\^M
    ; edit partition\^[ jmp 2cf\^M
    \^M
a 214\^M
  db 57\^M
  db "Menu:",0d,0a\^M
  db "H) boot from a hard disk",0d,0a\^M
  db "F) boot from a floppy disk",0d,0a\^M
  db "E) edit partition table",0d,0a,0a\^M
\^M
a 26c\^M
  db 18\^M
  db "Enter drive#, (1=1st):",0d,0a\^M
\^M
a 285\^M
  db 31\^M
  db "Enter number of partition to make bootable(1-4)",0d,0a\^M
  \^M
a 2b7\^M
; sets zero if \^[      mov ah, 02\^M
; a shift is set\^[ int 16\^M
                cmp al, 00\^M
                ret\^M
  \^M
\^M
; print counted strings \^[\^M
a 2be\^M
            xor ch, ch\^M
                mov cl, byte [si]\^M
        mov ah, 0e\^M
                mov bx, 0003\^M
            inc si\^M
        mov al, [si]\^M
        int 10\^M
        loopnz 2c7\^M
        ret\^M
\^M
\^M
a 2cf\^M
    mov si, 0000\^M
    mov cx, 0200\^M
    mov di, cx\^M
    cld\^M
    repnz\^M
    movsb\^M
    jmp 04dd\^M
    mov ax, 0201\^M
    xor bx, bx\^M
    mov cx, bx\^M
    inc cx\^M
    xor dh, dh\^M
    mov dl, 80\^M
    int 13\^M
    cmp ah, dh\^M
    ja 02f7\^M
    cmp word [01fe], aa55\^M
    jz 02f9\^M
    int 19\^M
    jmp 0000:7c00\^M
\^M
w cs:100 0 0 1\^M
q\^M
q\^M
\^M
\^M