مشکل در ارتباط با فابل

[saber187518]

با سلام خدمت اساتید بزرگوار
دوستان به یک مشکل عجیب و بد برخورد کردم.من قبلا چند تا برنامه برای کارکردن با فایل نوشتم.
جالبه حالا که برنامه مینویسم نمیتونم با فایل متنی ارتباط برقرار کنم و اطلاعات رو داخلش بریزم و یا اگر گاهی اوقت میریزه نمیتونم بخونم.
از همه اینها جالبتر اینکه کد هایی که قبلا نوشتم هم دیگه کار نمیکنند.
یکی از بچه ها گفت شاید سیستم رو عوض کنی بشه ولی الان دقیقا من سه تا سیستم توخونه از بقیه قرض کردم که درست بشه اما تو همشون همون مشکل پیش میاد.
خواهش میکنم کمکم کنین
اینم کدهایی که من مینویسم.
کد ایجاد فایل که کار میکنه


create_file proc near
mov ah,3ch
lea dx,pathname
mov cx,00h
int 21h
mov filehandle,ax
ret
create_file endp

از اینجا به بعد کدها بعضی وقت ها کار میکنند بعضی وقتها هم نه
کد باز کردن فایل برای خواندن


open_file_read proc near
mov ah,3dh
mov al,0
lea dx,pathname
int 21h
ret
open_file_read endp

کد باز کردن فایل برای نوشتن


open_file_write proc near
mov ah,3dh
mov al,1
lea dx,pathname
int 21h
ret
open_file_write endp

کد نوشتن در فایل


write_file proc near
mov ah,40h
mov bx,filehandle
mov cx,30
lea dx,namerec
int 21h
ret
write_file endp

کد خواندن از فایل


read_file proc near
mov ah,3fh
mov bx,filehandle
mov cx,30
lea dx,namerec
int 21h
ret
read_file endp

کد بستن فایل


close_file proc near
mov ah,3eh
mov bx,filehandle
int 21h
ret
close_file endp

راستی من با TASM کار میکنم. و باید با همین هم آماده کنم.
این زیر برنامه هایی رو هم که بالا نوشتم رو داخل main فراخوانی میکنم.
ممنون میشم اساتید بزرگوار راهنمایی کنن.

[xman_1365_x]

همه زير برنامه ها درسته ، احتمالا مشكلي در نوشتن دارين كه سورس رو قرار بدين بررسي كنم
موفق باشي