私が取り組んでいる ASM の割り当てで、この小さな問題が発生しています。それは魔法のように機能します... TDを使用すると。私はアセンブリが初めてなので、何が問題なのか本当にわかりません。
.txt ファイルに含まれる各 ASCII コードの文字数 (a の数、b の数など) を画面に出力する必要があります。最初に int 21h/3dh を使用してファイルを開き、ハンドルを作成してから、バイトの一部をバッファリングして処理し、ファイルの終わりに達するまで次の部分をバッファリングします。前述のとおり、TurboDebugger を使用して実行すると、完全に動作します。ただし、コマンドラインから単純に実行すると、ファイルハンドルさえ作成されません。3回目の中断後にCFを設定しますが、これはエラーを意味します。
私は自分がしなければならないことをしていないと本当に思っています。これについて助けていただければ幸いです。ありがとう!ところで、TASMを使用してコンパイルしています。私のコードの一部を投稿しても役に立たないと思いますが、そうでない場合は喜んで投稿を変更します。
これはコード全体です。スペイン語のコメントについては申し訳ありません
NLCR macro
mov dl, 0dh ;Caracter a imprimir a dl
mov ah, 02h ;Preparo la impresion de un caracter
int 21h ;Ejecuto
mov dl, 0ah ;Caracter a imprimir a dl
mov ah, 02h ;Preparo la impresion de un caracter
int 21h ;Ejecuto
endm
SData Segment para 'Data'
msgerrorab db "Error al abrir el archivo.$"
msgerrorca db "Error al cargar el archivo.$"
msgnombre db "Ingrese el nombre del archivo a abrir: $"
msgnoexiste db "Error: el archivo no existe.$"
msgimprimir db "========= Caracter ========== Cantidad =======",10,13,"$"
msglinea1 db "=== $"
caracter db 0
msglinea2 db " ========== $"
cuantos dw 0
msglinea3 db "==========",10,13,"$"
msgtecla db "Presione una tecla para mostrar mas...$"
noarchivo db "$$"
nombre db 20 Dup(?)
buffer db 4096 Dup(4)
handle dw 0
caracteres dw 255 Dup(0)
cantidad dw 0
eof db 0
bytesinv db 10 dup("$")
bytes db 10 dup("$")
contador db 0
SData EndS
pila segment stack 'stack'
dw 256 dup (?)
pila ends
CSeg Segment para public 'Code'
Begin:
Assume CS:CSeg, DS:SData,SS:pila
LeeChar Proc ;Procedure para leer un caracter y guardarlo. Lo salva en AL
xor ax,ax ;Limpia el ax para guardar el resultado
mov ah, 08h ;Prepara el servicio para leer un caracter
int 21h ;Lo ejecuta
ret ;Retorna
LeeChar endP
ImpChar Proc ;Similar, pero imprime un caracter
xor ax,ax ;Limpia el ax para guardar el resultado
mov ah,02h ;Prepara el servicio para imprimir un caracter
int 21h ;Lo ejecuta
ret ;Retorna
ImpChar endP
ImpStr Proc ;Similar, pero imprime un caracter
xor ax,ax ;Limpia el ax para guardar el resultado
mov ah,09h ;Prepara el servicio para imprimir un caracter
int 21h ;Lo ejecuta
ret ;Retorna
ImpStr endP
ImpNum Proc ;el numero en ax, el bx en 000A, dx en 0, y el di en 0.
hexadec: ;Con esto se pasa "a decimal", es decir convierte los caracteres a numeros para ser impresos.
div bx ;Divido por 10 y consigo en DL el numero de mas a la derecha
add dx, 30h ;Sumo 48 para pasarlo a caracter. EL MODULO QUEDA EN DX
mov bytesinv[di], dl ;Lo guardo en el vector
xor dx,dx ;Limpio para volverlo a hacer
inc di ;Aumento el indice del vector
cmp ax,0 ;Si ya no queda nada
je resfinal ;Brinco al resultado final
jmp hexadec ;Si todavia queda, hago el proceso de division de nuevo
resfinal: ;Inversion de los caracteres
xor si,si
mov al, bytesinv[di-1] ;Estas dos lineas vuelcan el vector en otro, pero en el orden que corresponde
mov bytes[si],al ;Pasa al nuevo vector los caracteres
dec di ;Decrementa para mover el indice
inc si ;Aumento el indice del vector
cmp di,0 ;Si ya no queda nada
jne resfinal
lea dx, bytes
xor ax,ax
mov ah,09h
int 21h
ret
ImpNum endP
;;;;;;;;;;;;;;;;;;;;;;;
;Comienzo del programa;
;;;;;;;;;;;;;;;;;;;;;;;
inicio: mov ax,SData ;Con estas dos lineas, pasamos la direccion del segmento SData y lo pasamos al ds
mov ds,ax
mov ax,pila
mov ss,ax
leernombre:
xor di,di
xor ax,ax ;Limpio AX
xor dx,dx ;Limpio DX
lea dx, msgnombre ;Cargo el offset del mensaje que pide el nombre
mov ah,09h ;Preparo el servicio de impresion
int 21h ;Ejecuto
xor ax,ax ;Limpio AX
xor dx,dx ;Limpio DX
lea dx, noarchivo ;Carga el offset de donde voy a guardar el nombre del archivo
mov ah,0ah ;Preparo el servicio de entrada buffereada
int 21h ;Ejecuto
nlcr ;New line carriage return
xor ah,ah ;Limpio AH
mov al, noarchivo[1] ;En narchivo[1] esta la cantidad de caracteres que mide el nombre de archivo
mov di,ax ;Lo paso al DI para usarlo como indice
mov noarchivo[di+2],0 ;La posicion di+2 del nombre contiene el Enter, o 0ah. Lo convierto en 0.
mov ah,3dh ;Preparo el servicio de creacion de handle para abrir el archivo
mov al,0 ;En modo de solo lectura
lea dx, nombre ;Cargo el offset del nombre en DX, sin los bytes que sobran antes
int 21h ;Ejecuto. El handle queda en AX
jc errorabrir
mov handle,ax ;Lo paso a su variable correspondiente
jmp cargarbuffer
errorabrir:
lea dx, msgerrorab ;Cargo el offset del mensaje que pide el nombre
mov ah,09h ;Preparo el servicio de impresion
int 21h
jmp final
errorcarga:
lea dx, msgerrorca ;Cargo el offset del mensaje que pide el nombre
mov ah,09h ;Preparo el servicio de impresion
int 21h
jmp final
cargarbuffer:
xor ax,ax ;Limpio AX
xor bx,bx
lea dx, buffer ;Cargo el offset del buffer de texto
mov ah,3fh ;Preparo el servicio para mover el contenido del archivo
mov bx,handle ;Uso el handle que me genero la int 21/3dh
mov cx,10 ;Voy a guardar 4096 caracteres a la vez
int 21h
jc errorcarga
mov cantidad,ax ;Cargo la cantidad de caracteres leidos
cmp cantidad,4096 ;Si es menor a lo que le dije que cargara, llego al end of file
jl endoffile ;
xor si,si
xor ax,ax
mov bx,handle
mov ah,3eh
int 21h
jmp procesarbuffer
endoffile:
mov eof,1
jmp procesarbuffer
procesarbuffer:
xor bx,bx
xor ax,ax
xor di,di
xor dx,dx
mov bl,2
mov al,buffer[si]
mul bl
mov di,ax
inc caracteres[di]
inc si
cmp si,cantidad
jne procesarbuffer
cmp eof,1
je imprimir
jmp cargarbuffer
imprimir:
xor di,di
xor dx,dx
xor ax,ax
xor bx,bx
mov di,0
mov si,0
lea dx, msgimprimir
mov ah,09h
int 21h
linea: cmp caracteres[di],0
je noimprime
inc contador
mov ax,si
mov caracter,al
lea dx, msglinea1
mov ah,09h
int 21h
mov dl,caracter
xor ax,ax
mov ah,02h
int 21h
lea dx, msglinea2
xor ax,ax
mov ah,09h
int 21h
push di
push si
mov ax, caracteres[di]
mov bx,10
xor dx,dx
xor di,di
call ImpNum
pop si
pop di
inc di
inc di
inc si
nlcr
cmp si,254
je final
cmp contador,20
je pidetecla
jmp linea
noimprime:
inc di
inc di
inc si
cmp si,254
je final
jmp linea
pidetecla:
lea dx, msgtecla
xor ax,ax
mov ah,09h
int 21h
xor ax,ax
mov ah,08h
int 21h
nlcr
jmp linea
final:
xor ax,ax ;Limpia el al y prepara el ah para la salida.
mov ax,4c00h ;Servicio AH=4c int 21h para salir del programa.
int 21h ;Llamada al DOS. Termine el programa.
CSeg EndS ;Fin del segmento de código.
End inicio ;Fin del programa la etiqueta al final dice en que punto debe comenzar el programa.
割り込みが返すエラー コードは 5 のようです。これは、アクセスが拒否されたことを意味します。パス ファイルが原因でしょうか?? ファイルは、コンパイルしているのと同じフォルダーにあり、 F:\dos\tasm\a.txt です。ちなみにDosBoxを使っています。