• Domingo 16 de Mayo de 2021, 01:47

Autor Tema:  escribir archivo en mayusculas  (Leído 1597 veces)

chopperlove

  • Nuevo Miembro
  • *
  • Mensajes: 2
    • Ver Perfil
escribir archivo en mayusculas
« en: Miércoles 17 de Junio de 2009, 17:44 »
0
este código lo q'hace es realizar una copia del archivo ahí detallado,lo que quiero es que al momento de realizar la copia,el texto esté en mayúsculas...les muestro el código que tengo,por su atención gracias

TITLE Copia un Archivo de Texto

INCLUDE Irvine16.inc

.data
TamBuf = 256
archent BYTE "texto.txt",0
archsal BYTE "texto_copia.txt",0
manejadorEnt WORD ?
manejadorSal WORD ?
buffer BYTE TamBuf DUP(?)
bytesLeidos WORD ?
pString BYTE ?

.code
main PROC
mov ax,@data
mov ds,ax

;Abre el Archivo
mov ax,716Ch ;Abrir o crear extendido
mov bx,0 ;Modo = sólo lectura
mov cx,0 ;Atributo Normal
mov dx,1 ;Abrir
mov si,OFFSET archent
int 21h ;interrupcion MS-DOs
jc termina ;Termina si hay error
mov manejadorEnt,ax

;Lee el Archivo
mov ah,3Fh ;Lee Archivo
mov bx,manejadorEnt ;Manejador del archivo
mov cx,TamBuf ;Número max de bytes
mov dx,OFFSET buffer ;Apuntador del buffer
int 21h ;interrupcion MS-DOS
jc termina ;Termina si hay un error
mov bytesLeidos,ax

;Muestra lo que hay en el buffer
mov ah,40h ;Escribe en archivo
mov bx,1 ;Manejador de salida de consola
mov cx,bytesLeidos ;Número de bytes
mov dx,OFFSET buffer ;Apuntador del buffer
int 21h ;interrupcion MS-DOs
jc termina ;Termina si hay un error

;Cierra el Archivo
mov ah,3Eh ;Cerrar Archivo
mov bx,manejadorEnt ;Manejador de archivo de entrada
int 21h ;interrupcion MS-DOs
jc termina ;Termina si hay un error

;Crea la Copia
mov ax,716Ch ;Crear o abrir
mov bx,1 ;Modo = Sólo lectura
mov cx,0 ;Atributos Normales
mov dx,12h ;Acción Crear
mov si,OFFSET archsal
int 21h ;interrupcion MS-DOs
jc termina ;Termina si hay error
mov manejadorSal,ax ;Guarda el manejador

;Escribe bufer en el archivo nuevo
mov ah,40h ;Escribe archivo
mov bx,manejadorSal ;Manejador Archivo de Salida
mov cx,bytesLeidos ;Número de Bytes
mov dx,OFFSET buffer ;Apuntador del Buffer
int 21h ;interrupcion MS-DOs
jc termina ;Termina si hay error

;Cierra el Archivo
mov ah,3Eh ;Funcion : Cerrar Archivo
mov bx,manejadorSal ;manejador de archivo salida
int 21h ;interrupcion MS-DOs

termina:
call Crlf
exit

main ENDP
END main

Eternal Idol

  • Moderador
  • ******
  • Mensajes: 4696
  • Nacionalidad: ar
    • Ver Perfil
Re: escribir archivo en mayusculas
« Respuesta #1 en: Miércoles 17 de Junio de 2009, 17:48 »
0
Bueno, antes de ";Escribe bufer en el archivo nuevo" tenes que procesar el buffer. Para hacerlo simple te recomiendo crear una funcion que reciba el buffer como parametro y pase a mayuscula cada caracter (caracter = caracter - 32) de estar este en minuscula (>= 97 && <= 122).

Nacional y Popular En mi país la bandera de Eva es inmortal.


Queremos una Argentina socialmente justa, económicamente libre y  políticamente soberana.
¡Perón cumple, Evita dignifica!


La mano invisible del mercado me robo la billetera.

chopperlove

  • Nuevo Miembro
  • *
  • Mensajes: 2
    • Ver Perfil
Re: escribir archivo en mayusculas
« Respuesta #2 en: Miércoles 17 de Junio de 2009, 18:11 »
0
podrías ponerme el código???

es todo lo q'necesito,es para mi examen final,please

Eternal Idol

  • Moderador
  • ******
  • Mensajes: 4696
  • Nacionalidad: ar
    • Ver Perfil
Re: escribir archivo en mayusculas
« Respuesta #3 en: Miércoles 17 de Junio de 2009, 18:17 »
0
No, ni por casualidad voy a hacer tu examen.

Nacional y Popular En mi país la bandera de Eva es inmortal.


Queremos una Argentina socialmente justa, económicamente libre y  políticamente soberana.
¡Perón cumple, Evita dignifica!


La mano invisible del mercado me robo la billetera.