Первая программа с макросами

@_War_ · Регистрация: 20.10.2013

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

Здравствуйте . Возникла такая задача : нужно уравнение (1,1ab – 3)/ab решить с помощью макросов . Как я понял , нужно создать макрос , в котором описывается операция ab.
Вот я пытался сделать , всё запускается , без ошибок , но почему-то выдаёт не правильный результат : 0-целая часть , 47 - дробная часть .
А должно быть 1 и 4 . ( при условии , что a=5, b=10)
Вот мой код:

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
.686                      ;(1,1ab-3)/ab   = (1,1* (5*10) -3)/ (5*10)
.model flat,stdcall                     
option casemap:none  
include \masm32\include\windows.inc
include \masm32\include\kernel32.inc
include \masm32\include\fpu.inc
include \masm32\include\user32.inc       
includelib \masm32\lib\user32.lib
includelib \masm32\lib\kernel32.lib
 
mMulAB macro _a,_b    ;;макрос (a*b)
mov eax,_a
mul _b     
mov res,eax            ;;res=_a*_b 
endm                   ;;конец макроса
.data
_a dd 5
_b dd 10
_op1 dd 1,1
_op2 dd 3
res dd 0              ;результат макроса mMulAB
res1 dd 0
res2 dd 0
res3 dd 0
buf dd ?,0
ifmt db "Y=%d,%d",0dh,0ah,0ah,0
titl db "Программа",0
.code
_Start:
mMulAB [_a],[_b]   ;вызов макроса
mov eax,_op1    ;eax=1,1
mov ebx,res     ;ebx=res
mul ebx         ;eax=1,1*res
mov res1,eax    ;res1=1,1*ab
mov ecx,_op2    ;ecx=3
sub res1,ecx    ;res1=1,1*ab-3
mMulAB [_a],[_b]   ;вызов макроса
xor edx,edx
mov eax,res1       ;eax =1,1*ab-3
mov ebx,res        ;ebx=res (макрос)      
div ebx 
mov res2,eax
mov res3,edx
invoke wsprintf,ADDR buf,ADDR ifmt,res2,res3
invoke MessageBox, 0, ADDR buf,ADDR titl, MB_OK
invoke ExitProcess,0
end _Start

Никак не могу понять , что я делаю не так с этими макросами .Помогите , пожалуйста , найти ошибку.Заранее огромное спасибо!

@volvo · 23.10.2013, 09:32

Сообщение от _War_

но почему-то выдаёт не правильный результат

Почему-то? А что, есть какие-то сомнения? Смотри: строка №20 - что будет в op1 по-твоему? Значение 1.1, или две отдельных единицы, не связанных друг с другом? Вот ты и перемножаешь ab на 1, отнимаешь 3, и делишь нацело на ab. Чему будет равно
(1 * 5*10 - 3) div (5*10) ? Как раз и получается 0 целых и 47 в остатке...

Тебе надо работать с сопроцессором, и делить не 47/50, а 52/50 (а для этого умножать 50 не на 1, а на 1.1), тогда и получится ожидаемое 1.04

@_War_ · 23.10.2013, 20:19 **[ТС]**

Сообщение от UI

Почему-то? А что, есть какие-то сомнения? Смотри: строка №20 - что будет в op1 по-твоему? Значение 1.1, или две отдельных единицы, не связанных друг с другом? Вот ты и перемножаешь ab на 1, отнимаешь 3, и делишь нацело на ab. Чему будет равно
(1 * 5*10 - 3) div (5*10) ? Как раз и получается 0 целых и 47 в остатке...

Тебе надо работать с сопроцессором, и делить не 47/50, а 52/50 (а для этого умножать 50 не на 1, а на 1.1), тогда и получится ожидаемое 1.04

Это я уже потом сам понял ) Спасибо за ответ . Не сообразил сначала.

Новые блоги и статьи Все статьи Все блоги /
Управление камерой с помощью скрипта OrbitControls.js на Three.js: Вращение, зум и панорамирование 8Observer8 05.03.2026 Содержание блога Финальная демка в браузере работает на Desktop и мобильных браузерах. Итоговый код: orbit-controls-threejs-js. zip. На мобильном - сканируйте QR-код. Вращайте камеру одним пальцем,. . .	SDL3 для Web (WebAssembly): Синхронизация спрайтов SDL3 и тел Box2D 8Observer8 04.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-sync-physics-sprites-sdl3-c. zip На первой гифке отладочные линии отключены, а на второй включены:. . .	SDL3 для Web (WebAssembly): Идентификация объектов на Box2D v3 - использование userData и событий коллизий 8Observer8 02.03.2026 Содержание блога Финальная демка в браузере. Итоговый код: finish-collision-events-sdl3-c. zip Сканируйте QR-код на мобильном и вы увидите, что появится джойстик для управления главным героем. . . .	Реалии Hrethgir 01.03.2026 Нет, я не закончил до сих пор симулятор. Эта задача сложнее. Не получилось уйти в плавсостав, но оно и к лучшему, возможно. Точнее получалось - но сварщиком в палубную команду, а это значит, в моём. . .
Ритм жизни kumehtar 27.02.2026 Иногда приходится жить в ритме, где дел становится всё больше, а вовлечения в происходящее — всё меньше. Плотный график не даёт вниманию закрепиться ни на одном событии. Утро начинается с быстрых,. . .	SDL3 для Web (WebAssembly): Сборка библиотек: SDL3, Box2D, FreeType, SDL3_ttf, SDL3_mixer и SDL3_image из исходников с помощью CMake и Emscripten 8Observer8 27.02.2026 Недавно вышла версия 3. 4. 2 библиотеки SDL3. На странице официальной релиза доступны исходники, готовые DLL (для x86, x64, arm64), а также библиотеки для разработки под Android, MinGW и Visual Studio. . . .	SDL3 для Web (WebAssembly): Реализация движения на Box2D v3 - трение и коллизии с повёрнутыми стенами 8Observer8 20.02.2026 Содержание блога Box2D позволяет легко создать главного героя, который не проходит сквозь стены и перемещается с заданным трением о препятствия, которые можно располагать под углом, как верхнее. . .	Конвертировать закладки radiotray-ng в m3u-плейлист damix 19.02.2026 Это можно сделать скриптом для PowerShell. Использование . \СonvertRadiotrayToM3U. ps1 <path_to_bookmarks. json> Рядом с файлом bookmarks. json появится файл bookmarks. m3u с результатом. # Check if. . .