ARCHIVOS

LENGUAJE ENSAMBLADOR

Programa que abre un archivo de texto cuyo nombre está dado en las variables del programa. El programa es capaz de escribir texto en el archivo sin perderse la información existente en el mismo. También tiene la opción de borrar el archivo y comprobar errores al momento de intentar abrir un archivo inexistente.

coloca macro ren, col
;macro que coloca el cursor según las coordenadas dadas
MOV AH,2
MOV BH,00
MOV DH,ren ;RENGLON
MOV DL,col ;COLUMNA
INT 10H endm ;----------------------------------------------------------------------------- limpia macro
;macro que limpia la pantalla y pone el texto blanco y fondo azul
MOV AH,06
MOV BH,1Fh ;FONDO AZUL TEXTO BLANCO
MOV CX,0000 ;INICIO …ver más…

mov bx,manejador ;El manejador correspondiente mov cx,255 ; quiero copiar 255 bytes lea dx, buffer ;se van a copiar a la variable 'buffer' int 21h ;ejecutar la interrupción.

mov ah,3eh ;servicio para cerrar el archivo mov bx,manejador ;el manejador int 21h ;ejecutar interrupcion

mov al,'$' lea di,buffer

busca: cmp [di],al je finn

inc di add cont,1 jmp busca

finn: mov al,10 mov [di],al inc di mov al,13 mov [di],al inc di

;ingresa cadena que vas a guardar en el archivo
MOV AH,0AH
LEA DX,NOM
INT 21H

lea si,cad mov cx,0 mov cl,longr copia: mov al,[si] mov [di],al inc si inc di loop copia

mov ah,3ch ; Función utilizada para crear archivo mov cx,00 ; Atributo del archivo 00= normal lea dx,ruta int 21h ;Llama de la interrupción

jc errorn ;si la bandera de acarreo se prendió es que hubo un error mov manejador,ax ;el manejador queda en ax, para guardarlo lo moveré a una variable dw

jmp bien

errorn: despliega lol mov ah,01 int 21h ret bien:

mov al,cont add longr,al add longr,2

mov ah,3dh ;servicio para