ayuda con creacion de archivos
Publicado por kstillo (2 intervenciones) el 01/11/2009 06:19:23
hola espero me ayuden... como crear un archivo en c: con este codigo..
title tarea
.model small
.stack
.data
arreglo db 80 DUP (?)
msj db "ingresa un caracter","$"
slinea db 10,13,"$"
aux db ?,"$"
conta db ?,"$"
PATHNM1 db 'C:\ACCOUNTS.fil',00H
HANDLE1 dw ?
.code
inicio:
mov ax,@data
mov ds,ax
mov cx,50h
salto: ;inicio del ciclo
mov bx,50h
mov ah,09
mov dx,offset slinea
int 21h
mov dx,offset msj
int 21h
mov dx,offset slinea
int 21h
mov ah,01h
int 21h
cmp al,13
je rompe
sub bx,cx
mov arreglo[bx],al
loop salto ;retorno del ciclo
rompe:
mov bx,cx
mov cx,50h
sub cx,bx
mov conta,cl
mov ah,09h
salto2:
mov al,conta
mov bx,offset arreglo
sub al,cl
xlat arreglo
mov aux,al
mov dx,offset aux
int 21h
loop salto2 ;retorna el ciclo 2
mov ah,4Ch
int 21h
; ..........................................
; segun asi lo cree yo pero no aparece el archivo en c:
mov ah,3ch
mov cx,00
lea dx,PATHNM1
int 21h ;el arcivo
jc rompe
mov HANDLE1,ax
end inicio
title tarea
.model small
.stack
.data
arreglo db 80 DUP (?)
msj db "ingresa un caracter","$"
slinea db 10,13,"$"
aux db ?,"$"
conta db ?,"$"
PATHNM1 db 'C:\ACCOUNTS.fil',00H
HANDLE1 dw ?
.code
inicio:
mov ax,@data
mov ds,ax
mov cx,50h
salto: ;inicio del ciclo
mov bx,50h
mov ah,09
mov dx,offset slinea
int 21h
mov dx,offset msj
int 21h
mov dx,offset slinea
int 21h
mov ah,01h
int 21h
cmp al,13
je rompe
sub bx,cx
mov arreglo[bx],al
loop salto ;retorno del ciclo
rompe:
mov bx,cx
mov cx,50h
sub cx,bx
mov conta,cl
mov ah,09h
salto2:
mov al,conta
mov bx,offset arreglo
sub al,cl
xlat arreglo
mov aux,al
mov dx,offset aux
int 21h
loop salto2 ;retorna el ciclo 2
mov ah,4Ch
int 21h
; ..........................................
; segun asi lo cree yo pero no aparece el archivo en c:
mov ah,3ch
mov cx,00
lea dx,PATHNM1
int 21h ;el arcivo
jc rompe
mov HANDLE1,ax
end inicio
Valora esta pregunta
0