Исправление ошибок.Нужно вывести на консоль информации о системе, что-то наподобие SystemInfo.exe

@Babanchik · Регистрация: 21.12.2018

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

Помогите исправить ошибки.Нужно вывести на консоль информации о системе, что-то наподобие SystemInfo.exe.
Заранее спасибо.
Функции которые подключаю

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
includelib import32.lib
includelib user32.lib
includelib kernel32.lib   
extrn ExitProcess:near
 extrn GetCommandLineA:near
 extrn CreateFileA:near
 extrn CloseHandle:near
 extrn GetStdHandle:near
 extrn GetSystemInfo:near
 extrn GetComputerName:near
 extrn ReadFile:near
 extrn WriteFile:near
 extrn WriteConsoleA:near
 extrn CharToOemA:near
 extrn _wsprintfA:near
 extrn _lstrlenA:near
; присваивания для облегчения читаемости кода
 GetCommandLine equ GetCommandLineA
 CreateFile equ CreateFileA
; определения констант и типов
STD_OUTPUT_HANDLE  equ -11
GENERIC_READ   equ 80000000h
GENERIC_WRITE   equ 40000000h
OPEN_EXISTING   equ 3

Основной код

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
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
include console.inc
.386
.model FLAT,STDCALL
 
.data
hStdout dd ?
SYS_INFO STRUC
 
pattern db " Tip proccesora:",0
pattern386 db "PROCESSOR_INTEL_386",13,10,0
pattern486 db "PROCESSOR_INTEL_486 ",13,10,0
pattern586 db "PROCESSOR_INTEL_PENTIUM",13,10,0
pattern2200 db "PROCESSOR_INTEL_IA64",13,10,0
pattern8664 db "PROCESSOR_AMD_X8664 ",13,10,0
 
 
core db " Kolichestvo yader:%i",13,10,0
nam db " PK name:%i",13,10,0
arch db " Architecture:",0
NAME_PC db "MY_PC",13,10,0
 
 
arch9 db " PROCESSOR_ARCHITECTURE_AMD64",13,10,0
arch5 db " PROCESSOR_ARCHITECTURE_ARM",13,10,0
arch6 db " PROCESSOR_ARCHITECTURE_IA64",13,10,0
arch0 db " PROCESSOR_ARCHITECTURE_INTEL",13,10,0
 SYS_INFO ENDS
 
buff    dd ?
buff1   dd ?
 
hcons dd ?
hfile  dd ?
buf db 100 dup(0)
bufer db 300 dup(0)
numb dd ?
numw dd ?
nameout db 'CONOUT$'
.code
_start: 
call GetStdHandle, offset STD_OUTPUT_HANDLE
  mov hStdout,eax
 call GetSystemInfo, offset SYS_INFO
 
  
  call _wsprintfA,offset buff, offset pattern
 call _lstrlenA, offset buff
 call WriteConsoleA, hStdout, offset buff, eax, 0,0 
 
 mov edi, SYS_INFO.dwProcessorType
 cmp edi , 386
 je m386
 
 cmp edi , 486
 je m486
 
 cmp edi , 586
 je m586
 
 cmp edi , 2200
 je m2200
 
 cmp edi , 8664
 je m8664
 
 
m386:call _wsprintfA,offset buff, offset pattern386
jmp m2
m486:call _wsprintfA,offset buff, offset pattern486
jmp m2
m586: call _wsprintfA,offset buff, offset pattern586
jmp m2
m2200: call _wsprintfA,offset buff, offset pattern2200
jmp m2
m8664: call _wsprintfA,offset buff, offset pattern8664
m2: call _lstrlenA, offset buff
 call WriteConsoleA, hStdout, offset buff, eax, 0,0 
 
 call _wsprintfA,offset buff, offset core, offset SYS_INFO.dwNumberOfProcessors
 call _lstrlenA, offset buff
 call WriteConsoleA, hStdout, offset buff, eax, 0,0 
 
  call _wsprintfA,offset buff, offset arch
 call _lstrlenA, offset buff 
 call WriteConsoleA, hStdout, offset buff, eax, 0,0
 
 
 
 cmp SYS_INFO.wProcessorArchitecture , 9
 je mAMD
 
 cmp SYS_INFO.wProcessorArchitecture, 5
 je mARM
 
 cmp SYS_INFO.wProcessorArchitecture , 6
 je mIA
 
 cmp SYS_INFO.wProcessorArchitecture , 0
 je mInt
 
 
mAMD:call _wsprintfA,offset buff, offset arch9
jmp m3
mARM:call _wsprintfA,offset buff, offset arch5
jmp m3
mIA: call _wsprintfA,offset buff, offset arch6
jmp m3
mInt: call _wsprintfA,offset buff, offset arch0
jmp m3
m3: call _lstrlenA, offset buff
 call WriteConsoleA, hStdout, offset buff, eax, 0,0 
 
 call GetComputerName , buff1, 4
 call _lstrlenA, offset buff1
 call WriteConsoleA, hStdout, offset buff1, eax, 0,0 
 
m1:call ExitProcess,0
end _start

@Babanchik · 19.12.2019, 23:16 **[ТС]**

Внесены небольшие изменения в основной код

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
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
include console.inc
.386
.model FLAT,STDCALL
 
.data
hStdout dd ?
SYS_INFO STRUC
wProcessorArchitecture dw ?
wReserved dw ?
dwPageSize dd ?
lpMinimumApplicationAddress dd ?
lpMaximumApplicationAddress dd ?
dwActiveProcessorMask dd ?
dwNumberOfProcessors dd ?
dwProcessorType dd ?
dwAllocationGranularity dd ?
wProcessorLevel dw ?
wProcessorRevision dw ?
SYS_INFO ENDS
 
pattern db " Tip proccesora:",0
pattern386 db "PROCESSOR_INTEL_386",13,10,0
pattern486 db "PROCESSOR_INTEL_486 ",13,10,0
pattern586 db "PROCESSOR_INTEL_PENTIUM",13,10,0
pattern2200 db "PROCESSOR_INTEL_IA64",13,10,0
pattern8664 db "PROCESSOR_AMD_X8664 ",13,10,0
 
 
core db " Kolichestvo yader:%i",13,10,0
nam db " PK name:%i",13,10,0
arch db " Architecture:",0
NAME_PC db "MY_PC",13,10,0
 
 
arch9 db " PROCESSOR_ARCHITECTURE_AMD64",13,10,0
arch5 db " PROCESSOR_ARCHITECTURE_ARM",13,10,0
arch6 db " PROCESSOR_ARCHITECTURE_IA64",13,10,0
arch0 db " PROCESSOR_ARCHITECTURE_INTEL",13,10,0
 
 
buff    dd ?
buff1   dd ?
 
hcons dd ?
hfile  dd ?
buf db 100 dup(0)
bufer db 300 dup(0)
numb dd ?
numw dd ?
nameout db 'CONOUT$'
.code
_start: 
call GetStdHandle, offset STD_OUTPUT_HANDLE
  mov hStdout,eax
 call GetSystemInfo, offset SYS_INFO
 
  
  call _wsprintfA,offset buff, offset pattern
 call _lstrlenA, offset buff
 call WriteConsoleA, hStdout, offset buff, eax, 0,0 
 
 mov edi, SYS_INFO.dwProcessorType
 cmp edi , 386
 je m386
 
 cmp edi , 486
 je m486
 
 cmp edi , 586
 je m586
 
 cmp edi , 2200
 je m2200
 
 cmp edi , 8664
 je m8664
 
 
m386:call _wsprintfA,offset buff, offset pattern386
jmp m2
m486:call _wsprintfA,offset buff, offset pattern486
jmp m2
m586: call _wsprintfA,offset buff, offset pattern586
jmp m2
m2200: call _wsprintfA,offset buff, offset pattern2200
jmp m2
m8664: call _wsprintfA,offset buff, offset pattern8664
m2: call _lstrlenA, offset buff
 call WriteConsoleA, hStdout, offset buff, eax, 0,0 
 
 call _wsprintfA,offset buff, offset core, offset SYS_INFO.dwNumberOfProcessors
 call _lstrlenA, offset buff
 call WriteConsoleA, hStdout, offset buff, eax, 0,0 
 
  call _wsprintfA,offset buff, offset arch
 call _lstrlenA, offset buff 
 call WriteConsoleA, hStdout, offset buff, eax, 0,0
 
 
 
 cmp SYS_INFO.wProcessorArchitecture , 9
 je mAMD
 
 cmp SYS_INFO.wProcessorArchitecture, 5
 je mARM
 
 cmp SYS_INFO.wProcessorArchitecture , 6
 je mIA
 
 cmp SYS_INFO.wProcessorArchitecture , 0
 je mInt
 
 
mAMD:call _wsprintfA,offset buff, offset arch9
jmp m3
mARM:call _wsprintfA,offset buff, offset arch5
jmp m3
mIA: call _wsprintfA,offset buff, offset arch6
jmp m3
mInt: call _wsprintfA,offset buff, offset arch0
jmp m3
m3: call _lstrlenA, offset buff
 call WriteConsoleA, hStdout, offset buff, eax, 0,0 
 
 call GetComputerName , buff1, 4
 call _lstrlenA, offset buff1
 call WriteConsoleA, hStdout, offset buff1, eax, 0,0 
 
m1:call ExitProcess,0
end _start

@Babanchik · 24.12.2019, 19:44 **[ТС]**

не запускается программа.
Задание такое, нужно вывести на консоль информацию о системе компьютера наподобие SystemInfo
Заранее спасибо.

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
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
include console.inc
includelib import32.lib
 
.386
.model FLAT,STDCALL
 
.data
hStdout dd ?
 
SYSTEM_INFO STRUC
wProcessorArchitecture dw ?
wReserved dw ?
dwPageSize dd ?
lpMinimumApplicationAddress dd ?
lpMaximumApplicationAddress dd ?
dwActiveProcessorMask dd ?
dwNumberOfProcessors dd ?
dwProcessorType dd ?
dwAllocationGranularity dd ?
wProcessorLevel dw ?
wProcessorRevision dw ?
SYSTEM_INFO ENDS
 
pattern db " Tip proccesora:",0
pattern386 db "PROCESSOR_INTEL_386",13,10,0
pattern486 db "PROCESSOR_INTEL_486 ",13,10,0
pattern586 db "PROCESSOR_INTEL_PENTIUM",13,10,0
pattern2200 db "PROCESSOR_INTEL_IA64",13,10,0
pattern8664 db "PROCESSOR_AMD_X8664 ",13,10,0
 
core db " Kolichestvo yader:%i",13,10,0
nam db " PK name:%i",13,10,0
arch db " Architecture:",0
NAME_PC db "MY_PC",13,10,0
 
arch9 db " PROCESSOR_ARCHITECTURE_AMD64",13,10,0
arch5 db " PROCESSOR_ARCHITECTURE_ARM",13,10,0
arch6 db " PROCESSOR_ARCHITECTURE_IA64",13,10,0
arch0 db " PROCESSOR_ARCHITECTURE_INTEL",13,10,0
 
buff dd ?
buff1 dd ?
 
hcons dd ?
hfile dd ?
buf db 100 dup(0)
bufer db 300 dup(0)
numb dd ?
numw dd ?
nameout db 'CONOUT$'
.code
 
_start: 
call GetStdHandle, offset STD_OUTPUT_HANDLE
mov hStdout,eax
call GetSystemInfo, offset SYSTEM_INFO
 
call _wsprintfA,offset buff, offset pattern
call lstrlenA, offset buff
call WriteConsoleA, hStdout, offset buff, eax, 0,0 
 
mov edi, SYSTEM_INFO.dwProcessorType
cmp edi, 386
je m386
 
cmp edi, 486
je m486
 
cmp edi, 586
je m586
 
cmp edi, 2200
je m2200
 
cmp edi, 8664
je m8664
 
m386:call _wsprintfA,offset buff, offset pattern386
jmp m2
m486:call _wsprintfA,offset buff, offset pattern486
jmp m2
m586: call _wsprintfA,offset buff, offset pattern586
jmp m2
m2200: call _wsprintfA,offset buff, offset pattern2200
jmp m2
m8664: call _wsprintfA,offset buff, offset pattern8664
m2: call lstrlenA, offset buff
call WriteConsoleA, hStdout, offset buff, eax, 0,0 
 
call _wsprintfA,offset buff, offset core, offset SYSTEM_INFO.dwNumberOfProcessors
call lstrlenA, offset buff
call WriteConsoleA, hStdout, offset buff, eax, 0,0 
 
call _wsprintfA,offset buff, offset arch
call lstrlenA, offset buff 
call WriteConsoleA, hStdout, offset buff, eax, 0,0
 
mov edi,SYSTEM_INFO.wProcessorArchitecture
cmp edi,9
je mAMD
 
cmp edi, 5
je mARM
 
cmp edi, 6
je mIA
 
cmp edi, 0
je mInt
 
mAMD:call _wsprintfA,offset buff, offset arch9
jmp m3
mARM:call _wsprintfA,offset buff, offset arch5
jmp m3
mIA: call _wsprintfA,offset buff, offset arch6
jmp m3
mInt: call _wsprintfA,offset buff, offset arch0
jmp m3
m3: call lstrlenA, offset buff
call WriteConsoleA, hStdout, offset buff, eax, 0,0 
 
call GetComputerNameA, buff1, 4
call lstrlenA, offset buff1
call WriteConsoleA, hStdout, offset buff1, eax, 0,0 
 
m1:call ExitProcess,0
end _start

@liv · 24.12.2019, 20:48

Babanchik, переделал под MASM32. TASM32 не пользуюсь...
Главная ошибка здесь:

Assembler
1
invoke GetStdHandle, STD_OUTPUT_HANDLE

а не offset
Кроме этого, в наличии было еще несколько ошибок. Сравни...

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
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
.586
.model flat, stdcall
option casemap:none
include \masm32\include\windows.inc
include \masm32\include\kernel32.inc
include \masm32\include\user32.inc
include \masm32\macros\macros.asm
include \masm32\include\msvcrt.inc
includelib \masm32\lib\kernel32.lib
includelib \masm32\lib\masm32.lib
includelib \masm32\lib\user32.lib
includelib \masm32\lib\msvcrt.lib
 
.data
hStdout dd ?
 
s_i SYSTEM_INFO <>
 
pattern db " Tip proccesora:",0
pattern386 db "PROCESSOR_INTEL_386",13,10,0
pattern486 db "PROCESSOR_INTEL_486 ",13,10,0
pattern586 db "PROCESSOR_INTEL_PENTIUM",13,10,0
pattern2200 db "PROCESSOR_INTEL_IA64",13,10,0
pattern8664 db "PROCESSOR_AMD_X8664 ",13,10,0
 
core db " Kolichestvo yader:%i",13,10,0
nam db " PK name:%i",13,10,0
arch db " Architecture:",0
NAME_PC db "MY_PC",13,10,0
 
arch9 db " PROCESSOR_ARCHITECTURE_AMD64",13,10,0
arch5 db " PROCESSOR_ARCHITECTURE_ARM",13,10,0
arch6 db " PROCESSOR_ARCHITECTURE_IA64",13,10,0
arch0 db " PROCESSOR_ARCHITECTURE_INTEL",13,10,0
 
buff dd ?
buff1 dd ?
 
hcons dd ?
hfile dd ?
buf db 100 dup(0)
bufer db 300 dup(0)
numb dd ?
numw dd ?
nameout db 'CONOUT$'
.code
 
_start: 
invoke GetStdHandle, STD_OUTPUT_HANDLE
mov hStdout,eax
invoke GetSystemInfo, offset s_i
 
invoke wsprintfA,offset buff, offset pattern
invoke lstrlenA, offset buff
invoke WriteConsoleA, hStdout, offset buff, eax, 0,0 
 
mov edi, s_i.dwProcessorType
cmp edi, 386
je m386
 
cmp edi, 486
je m486
 
cmp edi, 586
je m586
 
cmp edi, 2200
je m2200
 
cmp edi, 8664
je m8664
 
m386:invoke wsprintfA,offset buff, offset pattern386
jmp m2
m486:invoke wsprintfA,offset buff, offset pattern486
jmp m2
m586: invoke wsprintfA,offset buff, offset pattern586
jmp m2
m2200: invoke wsprintfA,offset buff, offset pattern2200
jmp m2
m8664: invoke wsprintfA,offset buff, offset pattern8664
m2: invoke lstrlenA, offset buff
invoke WriteConsoleA, hStdout, offset buff, eax, 0,0 
 
invoke wsprintfA,offset buff, offset core, s_i.dwNumberOfProcessors
invoke lstrlenA, offset buff
invoke WriteConsoleA, hStdout, offset buff, eax, 0,0 
 
invoke wsprintfA,offset buff, offset arch
invoke lstrlenA, offset buff 
invoke WriteConsoleA, hStdout, offset buff, eax, 0,0
 
movzx edi,s_i.wProcessorArchitecture
cmp edi,9
je mAMD
 
cmp edi, 5
je mARM
 
cmp edi, 6
je mIA
 
cmp edi, 0
je mInt
 
mAMD:invoke wsprintfA,offset buff, offset arch9
jmp m3
mARM:invoke wsprintfA,offset buff, offset arch5
jmp m3
mIA: invoke wsprintfA,offset buff, offset arch6
jmp m3
mInt: invoke wsprintfA,offset buff, offset arch0
jmp m3
m3: invoke lstrlenA, offset buff
invoke WriteConsoleA, hStdout, offset buff, eax, 0,0 
 
mov numb, 299
invoke GetComputerNameA, offset bufer, offset numb
invoke lstrlenA, offset bufer
invoke WriteConsoleA, hStdout, offset bufer, eax, 0,0 
 
m1:invoke ExitProcess,0
end _start

@Babanchik · 24.12.2019, 22:15 **[ТС]**

Спасибо.
я поменял, но теперь жалуется на

Assembler
1
 call _wsprintfA,offset buff, offset core,SYSTEM_INFO.dwNumberOfProcessors

Пишет что 1)"*Warning*CALLPROC<1>Reserved word used as symbol:PUSH"
2)"*Error*CALLPROC<1>Undefined: ."

Новые блоги и статьи Все статьи Все блоги /
SDL3 для Web (WebAssembly): Обработчик клика мыши в браузере ПК и касания экрана в браузере на мобильном устройстве 8Observer8 02.02.2026 Содержание блога Для начала пошагово создадим рабочий пример для подготовки к экспериментам в браузере ПК и в браузере мобильного устройства. Потом напишем обработчик клика мыши и обработчик. . .	Философия технологии iceja 01.02.2026 На мой взгляд у человека в технических проектах остается роль генерального директора. Все остальное нейронки делают уже лучше человека. Они не могут нести предпринимательские риски, не могут. . .	SDL3 для Web (WebAssembly): Вывод текста со шрифтом TTF с помощью SDL3_ttf 8Observer8 01.02.2026 Содержание блога В этой пошаговой инструкции создадим с нуля веб-приложение, которое выводит текст в окне браузера. Запустим на Android на локальном сервере. Загрузим Release на бесплатный. . .	SDL3 для Web (WebAssembly): Сборка C/C++ проекта из консоли 8Observer8 30.01.2026 Содержание блога Если вы откроете примеры для начинающих на официальном репозитории SDL3 в папке: examples, то вы увидите, что все примеры используют следующие четыре обязательные функции, а. . .
SDL3 для Web (WebAssembly): Установка Emscripten SDK (emsdk) и CMake для сборки C и C++ приложений в Wasm 8Observer8 30.01.2026 Содержание блога Для того чтобы скачать Emscripten SDK (emsdk) необходимо сначало скачать и уставить Git: Install for Windows. Следуйте стандартной процедуре установки Git через установщик. . . .	SDL3 для Android: Подключение Box2D v3, физика и отрисовка коллайдеров 8Observer8 29.01.2026 Содержание блога Box2D - это библиотека для 2D физики для анимаций и игр. С её помощью можно определять были ли коллизии между конкретными объектами. Версия v3 была полностью переписана на Си, в. . .	Инструменты COM: Сохранение данный из VARIANT в файл и загрузка из файла в VARIANT bedvit 28.01.2026 Сохранение базовых типов COM и массивов (одномерных или двухмерных) любой вложенности (деревья) в файл, с возможностью выбора алгоритмов сжатия и шифрования. Часть библиотеки BedvitCOM Использованы. . .	SDL3 для Android: Загрузка PNG с альфа-каналом с помощью SDL_LoadPNG (без SDL3_image) 8Observer8 28.01.2026 Содержание блога SDL3 имеет собственные средства для загрузки и отображения PNG-файлов с альфа-каналом и базовой работы с ними. В этой инструкции используется функция SDL_LoadPNG(), которая. . .