| 123456789101112131415161718192021222324252627282930313233 |
- .model small
- .code
- org 100h
- start:
- mov ah, 3ch
- mov cx, 0
- mov dx, offset fname
- int 21h
- jc error
- mov bx,ax
- loop1: mov ah, 0Ah
- mov dx, offset leng
- int 21h
- mov di, offset reals
- cmp byte ptr [di],0
- je inend
- mov di, offset reals
- mov cl, [di]
- mov ch, 0
- mov dx, offset inpstr
- mov ah, 40h
- int 21h
- jmp loop1
- inend: mov ah, 3eh
- int 21h
- error: int 20h
- fname db 'text.txt',0
- leng db 128
- reals db ?
- inpstr db 128 dup (?)
- end start
|
