تقریبا همه این بازی جالب انجام دادن کد این بازی با زبان اسمبلی امیدوارم لذت ببرید . البته یک اعتراف کنم من این برنامه رو خودم اجرا نکردم البته امیدوارم خطا نداشته باشه .
ادامه مطلب ... ;----------------------------------------------
;Deleting file
; ---------------------------------------------
ermac macro ;//print error message if can't delete file
lea dx,errormsg
mov ah,09h
int 21h
endm
;//////////////////////////////////
okmac macro ;//print the file deleted succsesfuly if it can delete file
lea dx,okmsg
mov ah,09h
int 21h
endm
;//////////////////////////////////
datasg segment 'code'
fil db 'c:\programmer.blogsky.com.txt',00h
okmsg db 'the file deleted succsesfuly',"$"
errormsg db 'error in deleting file',"$"
datasg ends
;--------------------------------
codesg segment 'code'
main proc far
assume ds:datasg,cs:codesg
mov ax,datasg
mov ds,ax
lea dx,fil ;/file name that maust be deleted
mov ah,41h ;/function for deleting file
int 21h ;/interupt for deleting directory
jnc l1 ;/go to l1 if deleting file is succsessfull
ermac ;/call error macro and print error message if can't delete file
jmp l2 ;/goto end program
l1: okmac ;/call okmac if it can delete file and print successfull
l2: mov ax,4c00h;/end of program
int 21h
main endp
codesg ends
end main
;----------------------------------------------
;CRETING DIRECTORY
; ---------------------------------------------
ermac macro ;//print error message if can't creat directory
lea dx,errormsg
mov ah,09h
int 21h
endm
;//////////////////////////////////
okmac macro ;//print the directory created succsesfuly if it can creat directory
lea dx,okmsg
mov ah,09h
int 21h
endm
;//////////////////////////////////
datasg segment 'code'
dir db 'c:\moji',00h
okmsg db 'the directory created succsesfuly',"$"
errormsg db 'error in creatin directory',"$"
datasg ends
;--------------------------------
codesg segment 'code'
main proc far
assume ds:datasg,cs:codesg
mov ax,datasg
mov ds,ax
lea dx,dir ;/directory name that maust be created
mov ah,39h ;/function for creatin directory
int 21h ;/interupt for creating directory
jnc l1 ;/go to l1 if creating directory is succsess full
ermac ;/call error macro and print error message if can't creat directory
jmp l2 ;/goto end program
l1: okmac ;/call okmac if it can creat directory and print successfull
l2: mov ax,4c00h;/end of program
int 21h
main endp
codesg ends
end main