Сопроцессор: вычисление гиперболического тангенса

@vantusb · Регистрация: 24.10.2010

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

помогите пожалуйста разобраться с передачей результатов из ассемблера в сишник.
в ассемблере вычисляю гиперболический тангенс.данные source передаются из c++ а вернуть надо в result. в с++ функция asmth(&source,&result).

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
;.model small
;e2x-1/e2x+1
 
                .386
_TEXT           segment use32 para public 'CODE'
                public  _asmth
                public  __CItanh
source equ qword ptr [ebp+8]
result equ qword ptr [ebp+12]
 
_asmth          proc    near
                assume  cs:_TEXT
                push    ebp
                mov     ebp,esp
                fld     qword ptr [ebp+8]       ; загрузка в стек
                fld     st                      ; дублируем
                fadd                            ; 2*x
                fldl2e                          ; log по основан 2 от (e)
                fmulp   st(1),st                ; x * log base 2(e)
                fst     st(1)                   ; copy
                frndint                         ; округлен до целого
                fsub    st(1),st                ; вычитание
                fxch                            ; обмен st, st(1)
                f2xm1                           ; вычисление 2 в степени (x - 1)
                fld1                            ; загрузка единицы
                fadd                            ; сложение;2 to the x
                fscale                          ; Scale by power of 2
                fstp    st(1)                   ; Set new stack top and pop
                fld1                            ; загрузка единицы
                fadd                            ; вычисление exp(2*x)+1
                fld1                            ; загрузка единицы
                fld1                            ; загрузка единицы
                fadd                            ; Set divisor to 2
                fdivr                           ; Compute 2/(exp(2*x)+1)
                fld1                            ; загрузка единицы
                fsubr                           ; вычислен th
        ;fstp qword ptr [ebp+12];result
                pop     ebp                     ; Restore register bp
                ret
_asmth          endp
 
__CItanh        proc    near
                assume  cs:_TEXT
                sub     esp,8                   ; Allocate stack space for x
                fstp    qword ptr [esp]         ; Copy x onto stack
                call    _asmth                  ; Call tanh
                add     esp,8                   ; Remove x from stack
                ret
__CItanh        endp
 
_TEXT           ends                            ;End of segment
                end                             ;End of module

C++
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
#include <stdio.h>
#include <math.h>
#include <conio.h>
 
extern "C"
{
    void asmth(float *source,float *result);
}
int main()
{
    float source=0;
    float result=0;
    printf("Vvedite x:");
    scanf("%f", &source);
    printf("C++ Tanh=%f\n",tanh(source));
    asmth(&source,&result);
    printf("AsmTh = %f\n", result);
    return 0;
}

@vantusb · 08.11.2010, 00:46 **[ТС]**

собственно разобрался..если надо кому скину без ошибок код..

@X_A_A · 14.03.2017, 19:14

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

если надо кому скину без ошибок код..

Очень надо)
Хотя спустя 7 лет ответа я, наверное, не дождусь(

@Manowar · 14.03.2017, 21:13

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

Хотя спустя 7 лет ответа я, наверное, не дождусь(

Создай тему, выложи свои наработки, идеи, помогут. Или в плюсах гугли.

ФедосеевПавел · 14.03.2017, 21:18

мановар,
Но ведь понятно, что у него ничего нет. А из плюсов переносят сюда.

Основной политикой форума является "можешь помочь - помогай", поэтому чуть позже удалю ваше и моё сообщения.

@Manowar · 14.03.2017, 21:54

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

можешь помочь - помогай

А чем помочь то ??? Я просто не понимаю. Я готов помочь, но эти задания меня ставят не то что в тупик, а в прямой ступор. ТС сам не знает что хочет, а я тем более.

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

А из плюсов переносят сюда.

Не знаю что у Вас кто и чего переносит
Перенос элементов из одного массива в другой (ассемблерная вставка)
Помогайте разъяснять, я в этом не мастер.

ФедосеевПавел · 14.03.2017, 22:18

Думаю, что у обоих пользователей одинаковая задача - многофайловая компиляция. Один из файлов - исходник на ассемблере.
Можно предположить, что приведённый код верен, но есть ошибки в оформлении кода .model small и в соглашении о вызовах - результат должен возвращаться в стеке сопроцессора.

Вопросы про асм вставки в С/С++ часто публикуют именно в разделе ассемблера. Поэтому я несколько преувеличил про перенос тем.

Добавлено через 2 минуты
Чем помочь - в данном случае опубликовать изменённый исходник.

Добавлено через 9 минут
Прошу прощения. У меня закончился длинный день. Уже не очень отчётливо воспринимаю мир.

@X_A_A · 14.03.2017, 23:01

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

Но ведь понятно, что у него ничего нет.

Скажу честно, Вы правы. Дело в том, что ассемблер мне не нужен, ковыряться в нем я пыталась и писать код самостоятельно - 2 недели убитого времени впустую. Помочь мне некому, ибо преподавание никакое - на отвали, а инфы не особо много внятной даже в инете, желание самостоятельно разбираться отпало напрочь.

У меня попалось задание один в один с данным, а именно:
"Разработать подпрограмму соответствующую стандарту связей языка Си с двумя аргументами (source,result), которая вычисляет (с использованием сопроцессора) гиперболический тангенс"
Поэтому какой смысл создавать новую тему. Просто надеялась на чудо, ведь тому кто разобрался, кинуть код или указать на ошибки одна минута.

@vantusb · 15.03.2017, 10:53 **[ТС]**

блин кто вспомнил эту тему.7 лет прошло.я уже с этим сто лет не связывался.если не забуду дома в архивах поищу остатки былых времен.

Новые блоги и статьи Все статьи Все блоги /
Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ФедосеевПавел 06.01.2026 Owen Logic: О недопустимости использования связки «аналоговый ПИД» + RegKZR ВВЕДЕНИЕ Введу сокращения: аналоговый ПИД — ПИД регулятор с управляющим выходом в виде числа в диапазоне от 0% до. . .	Модель микоризы: классовый агентный подход 2 anaschu 06.01.2026 репозиторий https:/ / github. com/ shumilovas/ fungi ветка по-частям. коммит Create переделка под биомассу. txt вход sc, но sm считается внутри мицелия. кстати, обьем тоже должен там считаться. . . .	Расчёт токов в цепи постоянного тока igorrr37 05.01.2026 / * Дана цепь постоянного тока с сопротивлениями и напряжениями. Надо найти токи в ветвях. Программа составляет систему уравнений по 1 и 2 законам Кирхгофа и решает её. Последовательность действий:. . .	Новый CodeBlocs. Версия 25.03 palva 04.01.2026 Оказывается, недавно вышла новая версия CodeBlocks за номером 25. 03. Когда-то давно я возился с только что вышедшей тогда версией 20. 03. С тех пор я давно снёс всё с компьютера и забыл. Теперь. . .
Модель микоризы: классовый агентный подход anaschu 02.01.2026 Раньше это было два гриба и бактерия. Теперь три гриба, растение. И на уровне агентов добавится между грибами или бактериями взаимодействий. До того я пробовал подход через многомерные массивы,. . .	Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Programma_Boinc 28.12.2025 Советы по крайней бережливости. Внимание, это ОЧЕНЬ длинный пост. Налог на собак: https:/ / ********/ gallery/ V06K53e Финансовый отчет в Excel: https:/ / ********/ gallery/ bKBkQFf Пост отсюда. . .	Кто-нибудь знает, где можно бесплатно получить настольный компьютер или ноутбук? США. Programma_Boinc 26.12.2025 Нашел на реддите интересную статью под названием Anyone know where to get a free Desktop or Laptop? Ниже её машинный перевод. После долгих разбирательств я наконец-то вернула себе. . .	Thinkpad X220 Tablet — это лучший бюджетный ноутбук для учёбы, точка. Programma_Boinc 23.12.2025 Рецензия / Мнение/ Перевод Нашел на реддите интересную статью под названием The Thinkpad X220 Tablet is the best budget school laptop period . Ниже её машинный перевод. Thinkpad X220 Tablet —. . .

@vantusb 0 / 0 / 0 Регистрация: 24.10.2010 Сообщений: 16
	08.11.2010, 00:46 [ТС]
	собственно разобрался..если надо кому скину без ошибок код.. 0

ФедосеевПавел Модератор 8647 / 4482 / 1669 Регистрация: 01.02.2015 Сообщений: 13,889 Записей в блоге: 12
	14.03.2017, 21:18
	мановар, Но ведь понятно, что у него ничего нет. А из плюсов переносят сюда. Основной политикой форума является "можешь помочь - помогай", поэтому чуть позже удалю ваше и моё сообщения. 0

ФедосеевПавел Модератор 8647 / 4482 / 1669 Регистрация: 01.02.2015 Сообщений: 13,889 Записей в блоге: 12
	14.03.2017, 22:18
	Думаю, что у обоих пользователей одинаковая задача - многофайловая компиляция. Один из файлов - исходник на ассемблере. Можно предположить, что приведённый код верен, но есть ошибки в оформлении кода `.model small` и в соглашении о вызовах - результат должен возвращаться в стеке сопроцессора. Вопросы про асм вставки в С/С++ часто публикуют именно в разделе ассемблера. Поэтому я несколько преувеличил про перенос тем. Добавлено через 2 минуты Чем помочь - в данном случае опубликовать изменённый исходник. Добавлено через 9 минут Прошу прощения. У меня закончился длинный день. Уже не очень отчётливо воспринимаю мир. 0

@vantusb 0 / 0 / 0 Регистрация: 24.10.2010 Сообщений: 16
	15.03.2017, 10:53 [ТС]
	блин кто вспомнил эту тему.7 лет прошло.я уже с этим сто лет не связывался.если не забуду дома в архивах поищу остатки былых времен. 0