Странности с Int 13h

Привет!
Пользуясь случаем, поздравляю всех российских программеров,
и всех остальных с Днем Конституции!

А теперь тема:
Я тут от нефиг делать пишу игрушечную ОСьку, просто так из
технического интереса. Так вот: У меня начальный загрузчик
подвешивает машину. Я стал разбираться и после серии тестов
начал очень сильно склоняться к мысли, что висяк происходит
где-то в внутри кода int 13h. Вы можете сказать, что это
бред, но я другого объяснения не нахожу. А может и правда
такое возможно? И какие, интересно, могут быть этому причи
ны? Машина и флоповод исправны. (DOS с дискеты грузится, да
и тестовые программки работаю щие через int 13h, которые я
писал, работают.

Вот полный исходник моего загрузчика:


BITS 16

%define Kernel_Size 1024
%define DEBUG

segment .text

Entry:
org 0x7C00
jmp short StartBoot
nop
OemName db "DEMOS "
SecSize dw 512
ClusSize db 1
ResSec dw 0
FatCnt db 2
RootSize dw 224
TotSec dw 2880
Media db 0xF0
FatSize dw 9
SecPerTrk dw 18
Heads dw 2
Hidden dd 0
TotSec2 dd 0
DrvNo db 0
Reserv db 0
Sign db ')'
SerialNo dd 0
Volume db "SYSTEM "
FatID db "FAT12 "

StartBoot:
; Организуем стек в конце стандартной памяти
cli
mov ax, 0x9FE0
mov ss, ax
mov sp, 0x200
sti
; Грузим ядро
push cs
pop ds
mov si, Msg1
call Print
call Load_Krnl
%ifdef DEBUG
jmp $
%endif

; ************* ДОБРО ПОЖАЛОВАТЬ В DEMOS ! *************

db 0xEA
dw 0
dw 0x8000

Load_Krnl:
; Желательно сбросить контроллер FDD
.L2
xor ax, ax
xor dx, dx
int 0x13
jc .L2
; Читаем и проверяем первый сектор корневого каталога
; Там должна быть запись о файле DEMOS.SYS
.L1
mov si, 19
mov ax, 0x8000
mov es, ax
xor bx, bx
call SecRead
%ifdef DEBUG
mov si, Msg1 ; СЮДА ИЗ SecRead Я УЖЕ НЕ ВОЗВРА-
; ЩАЮСЬ!
call Print
%endif
call SystemDisk ; Проверяем наличие файла ядра
; Читаем файл ядра
mov si, 33
mov cx, Kernel_Size
shr cx, 9
.L2:
call SecRead
inc si
add bx, 512
loop .L2
ret

Print:
cld
mov ah, 0x0E
.L1:
lodsb
or al, al
jz .L99
int 0x10
jmp .L1
.L99:
ret

SecRead:
; На входе:
; si = Абсолютный номер сектора;
; es:bx = Адрес буфера
push ax
push bx
push cx
push dx
push bx
mov ax, si
mov bl, 18
div bl
inc ah
mov cl, ah ; cl = номер сектора
mov dh, al ; dh = номер головки
and dh, 1
mov dl, 0 ; dl = диск
mov ax, si
mov bl, 36
div bl
mov ch, al ; ch = номер цилиндра
mov ax, 0x0201
pop bx
int 0x13
%ifdef DEBUG
; В отладочных целях на экран выводится код ошибки int 13h,
; но до сюда я тоже не дохожу :(
pushf
shr ax, 8
add al, 0x30
mov ah, 0x0E
int 0x10
popf
%endif
pop dx
pop cx
pop bx
pop ax
jnc .L1
mov si, Msg2
jmp Error
.L1:
ret

SystemDisk:
ret

Error:
call Print
err1:
jmp err1

DirItem db "DEMOS ", "SYS", 7
times 14 db 0
dw 33
dd Kernel_Size

Msg1 db 0Dh, 0Ah,"Starting DEMOS...", 0Dh, 0Ah,0
Msg2 db 0Dh, 0Ah, "Bad sector.", 0Dh, 0Ah, 0
Msg3 db 0Dh, 0Ah, "Invalid system disk.", 0Dh, 0Ah, 0

LastByte:

Len equ LastByte - Entry + 2

times (512 - Len) db 0
dw 55AAh