Создание каталога. Имя каталога вводится с клавиатуры

@menreys · Регистрация: 29.01.2017

Студворк — интернет-сервис помощи студентам

за что отвечает первая строка и на что flat assembler может ругаться ссылаясь на эту строку, можно ли преобразовать этот код для создания каталога?

Assembler
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
st segment para 'stack'  
db 256 dup(0)
st ends
cod segment para public 'code'
assume ss:st;cs:cod;es:data;ds:data
start push ds
mov ax,0
push ax
mov ax,offset data
mov dx,ax
call pro
retf
start endp
;--------------------------------------------------------
pro proc near
mov dx,offset str
mov ah,09h      
int 21h
;--------------------------------------------------------
mov dx,offset ndir
mov ah,0Ah              
int 21h
;--------------------------------------------------------
mov ah,0
mov bx,dx
mov al,1[bx]           
add bx,ax               
mov 2[bx],ah
;--------------------------------------------------------
add dx,2
mov ah,30h       
int 21h
;--------------------------------------------------------
jnc k
mov dx,offset strerr   
mov ah,09h
int 21h
;--------------------------------------------------------
k: ret
pro endp
cod ends
data segment para public 'data'
ndir db 80 dup(0)
str db 'Ввести имя каталога :',0dh,0ah,'$'
strerr db 'Ошибка',0dh,0ah,'$'
data ends
end start

@menreys · 06.12.2017, 15:13 **[ТС]**

за что отвечает первая строка и на что flat assembler может ругаться ссылаясь на эту строку, можно ли преобразовать этот код для создания каталога?

Assembler
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
st segment para 'stack'  
db 256 dup(0)
st ends
cod segment para public 'code'
assume ss:st;cs:cod;es:data;ds:data
start push ds
mov ax,0
push ax
mov ax,offset data
mov dx,ax
call pro
retf
start endp
;--------------------------------------------------------
pro proc near
mov dx,offset str
mov ah,09h      
int 21h
;--------------------------------------------------------
mov dx,offset ndir
mov ah,0Ah              
int 21h
;--------------------------------------------------------
mov ah,0
mov bx,dx
mov al,1[bx]           
add bx,ax               
mov 2[bx],ah
;--------------------------------------------------------
add dx,2
mov ah,30h       
int 21h
;--------------------------------------------------------
jnc k
mov dx,offset strerr   
mov ah,09h
int 21h
;--------------------------------------------------------
k: ret
pro endp
cod ends
data segment para public 'data'
ndir db 80 dup(0)
str db 'Ввести имя каталога :',0dh,0ah,'$'
strerr db 'Ошибка',0dh,0ah,'$'
data ends
end start

ФедосеевПавел · 06.12.2017, 19:20

Данный исходник для другого компилятора - tasm. Для FASM нужно менять все служебные слова и что-то ещё в синтаксисе.
Пример подобной программы https://www.cyberforum.ru/fasm/thread1882005.html

@Constantin Cat · 06.12.2017, 20:04

Сообщение от ФедосеевПавел

для другого компилятора - tasm

Вы только на половину правы, masm ЭТО тоже проглотит.
ЭТО потому, что с ГРУБЫМИ ошибками и все они в начале программы:

Assembler
1
2
3
4
5
6
steck segment para 'stack'  - st зарезервированное слово за сопроцессором
db 256 dup(0)
steck ends -см. выше
cod segment para public 'code'
assume ss:steck,cs:cod,es:data,ds:data - см. выше, и ; - это комментарий :)
start proc - конец подпрограммы есть, а начало

добавил миниатюру

Новые блоги и статьи Все статьи Все блоги /
Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США. Programma_Boinc 26.12.2025 Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США. Нашел на реддите интересную статью под названием «Кто-нибудь знает, где получить бесплатный компьютер или. . .	Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Programma_Boinc 23.12.2025 Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .	PhpStorm 2025.3: WSL Terminal всегда стартует в ~ and_y87 14.12.2025 PhpStorm 2025. 3: WSL Terminal всегда стартует в ~ (home), игнорируя директорию проекта Симптом: После обновления до PhpStorm 2025. 3 встроенный терминал WSL открывается в домашней директории. . .	Как объединить две одинаковые БД Access с разными данными VikBal 11.12.2025 Помогите пожалуйста !! Как объединить 2 одинаковые БД Access с разными данными.	Новый ноутбук volvo 07.12.2025 Всем привет. По скидке в "черную пятницу" взял себе новый ноутбук Lenovo ThinkBook 16 G7 на Амазоне: Ryzen 5 7533HS 64 Gb DDR5 1Tb NVMe 16" Full HD Display Win11 Pro
Музыка, написанная Искусственным Интеллектом volvo 04.12.2025 Всем привет. Некоторое время назад меня заинтересовало, что уже умеет ИИ в плане написания музыки для песен, и, собственно, исполнения этих самых песен. Стихов у нас много, уже вышли 4 книги, еще 3. . .	От async/await к виртуальным потокам в Python IndentationError 23.11.2025 Армин Ронахер поставил под сомнение async/ await. Создатель Flask заявляет: цветные функции - провал, виртуальные потоки - решение. Не threading-динозавры, а новое поколение лёгких потоков. Откат?. . .	Поиск "дружественных имён" СОМ портов Argus19 22.11.2025 Поиск "дружественных имён" СОМ портов На странице: https:/ / norseev. ru/ 2018/ 01/ 04/ comportlist_windows/ нашёл схожую тему. Там приведён код на С++, который показывает только имена СОМ портов, типа,. . .	Сколько Государство потратило денег на меня, обеспечивая инсулином. Programma_Boinc 20.11.2025 Сколько Государство потратило денег на меня, обеспечивая инсулином. Вот решила сделать интересный приблизительный подсчет, сколько государство потратило на меня денег на покупку инсулинов. . . .	Ломающие изменения в C#.NStar Alpha Etyuhibosecyu 20.11.2025 Уже можно не только тестировать, но и пользоваться C#. NStar - писать оконные приложения, содержащие надписи, кнопки, текстовые поля и даже изображения, например, моя игра "Три в ряд" написана на этом. . .

ФедосеевПавел Модератор 8645 / 4480 / 1669 Регистрация: 01.02.2015 Сообщений: 13,888 Записей в блоге: 11
	06.12.2017, 19:20
	Данный исходник для другого компилятора - tasm. Для FASM нужно менять все служебные слова и что-то ещё в синтаксисе. Пример подобной программы https://www.cyberforum.ru/fasm/thread1882005.html 0