1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
| use16
org 100h
jmp start
;----DATA----
prop_dirname db 'Enter directory name: $'
prop_filename db 'Enter filename: $'
prop_filetext db 'Enter file content: $'
endline db 13,10,'$'
buffer rb 242
proc_buffer rb 242
proc_name db 'proc.txt',0
handle rw 1
;------------
start:
call create_directory
call print_endline
call create_file
call print_endline
call write_file
call print_endline
call open_file
call print_endline
call process_file
jmp exit_app
;---PROGRAM METHODS---
create_directory:
call input_dirname
mov ah, 39h ;CREATING DIRECTORY
int 21h
mov ah, 3Bh ;OPEN DIRECTORY
int 21h
ret
create_file:
call input_filename
mov ah, 3Ch ;CREATING FILE
xor cx, cx
int 21h
mov [handle], ax ;SAVING FILE DESCRIPTOR
ret
write_file:
call input_filetext
mov bx, [handle] ;GETTING FILE DESCRIPTOR
mov ah, 40h ;WRITING FILE
int 21h
call close_file
ret
open_file:
mov ah, 3Dh
mov al, 2
call input_filename
int 21h
mov [handle], ax
mov bx, [handle]
mov ah, 3Fh ;OPENING FILE
mov dx, buffer
mov cx, 241
int 21h
ret
process_file:
add ax, dx
mov bx, dx
inc bx
mov si, proc_buffer
forloop:
cmp bx, ax
jge show_processed
mov cl, [bx]
mov [si], cl
add bx, 2
inc si
jmp forloop
show_processed:
call write_processed
mov byte[si], '$'
mov di, proc_buffer
call print_str
ret
write_processed:
mov dx, proc_name
mov ah, 3Ch
xor cx, cx
int 21h
mov bx, ax
mov ah, 40h
mov dx, proc_buffer
mov cx, si
sub cx, proc_buffer
int 21h
ret
input_dirname:
mov di, prop_dirname
call print_str
call input_str
ret
input_filename:
mov di, prop_filename
call print_str
call input_str
ret
input_filetext:
mov di, prop_filetext
call print_str
call input_str
ret
;---SERVICE METHODS---
close_file:
mov ah, 3Eh
mov bx, [handle]
int 21h
ret
exit_app:
mov ax, 4C00h
int 21h
print_str:
push ax
mov ah, 9
xchg dx, di
int 21h
xchg dx, di
pop ax
ret
print_endline:
push di
mov di,endline
call print_str
pop di
ret
input_str:
push ax
mov ah, 0Ah
mov [buffer], 240
mov byte[buffer+1], 0
mov dx, buffer
int 21h
xor ax, ax
mov al, [buffer+1]
add ax, dx
add ax, 2
mov si, ax
mov al, 0
mov [si], al
mov cl, [buffer+1]
add dx, 2
pop ax
ret |
(
Сообщение было отмечено S1oux как решение
Сообщение от S1oux
