22.01.2018, 14:50 [+3 UTC]
в нашей команде: 2 491 чел. | участники онлайн: 8 (рекорд: 21)

:: РЕГИСТРАЦИЯ

:: консультации

:: задать вопрос

:: все разделы

:: правила

:: новости

:: участники

:: доска почёта

:: форум

:: блоги

:: поиск

:: статистика

:: наш журнал

:: наши встречи

:: наша галерея

:: отзывы о нас

:: поддержка

:: руководство

Версия системы:
7.42 (30.12.2017)

Общие новости:
02.01.2018, 09:46

Форум:
12.01.2018, 10:25

Последний вопрос:
22.01.2018, 12:46

Последний ответ:
22.01.2018, 09:43

Последняя рассылка:
22.01.2018, 01:15

Писем в очереди:
0

Мы в соцсетях:

Наша кнопка:

RFpro.ru - здесь вам помогут!

Отзывы о нас:
29.01.2010, 11:16 »
Мироненко Николай Николаевич
Спасибо, Вы мне очень помогли :))) [вопрос № 176328, ответ № 258984]
18.06.2016, 01:33 »
Алексеев Владимир Николаевич
Огромное Вам Спасибо за образование! В нашей глухомани мне бы никто так не растолковал! [вопрос № 189582, ответ № 273941]
25.07.2010, 18:11 »
Kosowichev
спасибо, в пн попробую [вопрос № 179578, ответ № 262646]

РАЗДЕЛ • Assembler

Создание программ на языке Assembler.

[администратор рассылки: Лысков Игорь Витальевич (Старший модератор)]

Лучшие эксперты в этом разделе

Коцюрбенко Алексей aka Жерар
Статус: Мастер-Эксперт
Рейтинг: 608
Зенченко Константин Николаевич
Статус: Модератор
Рейтинг: 380
Лысков Игорь Витальевич
Статус: Старший модератор
Рейтинг: 371

Перейти к консультации №:
 

Консультация онлайн # 138119
Раздел: • Assembler
Автор вопроса: Делий Роман
Отправлена: 27.05.2008, 17:39
Поступило ответов: 2

Как написать процедуру на ассемблере такого типа:
Procedure xxx(x,y:integer);
begin
x:=x+y;
end;
как оформить такую процедуру я знаю а вот как ей передать параметры нет(((
побывал через стек командами Push...Pop не получаться ... программа дает ошибку или просто закрываться(((

Состояние: Консультация закрыта

Ответ # 224595 от Trulala

Здравствуйте, Делий Роман !

Мне кажется, что эта процедура ошибочна, так как возврат результата в одном из параметров не самый красивый вариант.
Вероятно, здесь имеет место подпрограмма-функция (тогда xxx:= x+y;) или же параметры являются указателями на x и y.

function xxx(x,y:integer):longint;
begin
xxx:= x+y;
end;

Возможный вариант смотрите в приложении; TurboPascal генерирует не совсем корректный код для такой функции.

Приложение:


Консультировал: Trulala
Дата отправки: 28.05.2008, 07:27

Рейтинг ответа:

0

[подробно]

Сообщение
модераторам

Отправлять сообщения
модераторам могут
только участники портала.
ВОЙТИ НА ПОРТАЛ »
регистрация »

Здравствуйте, Делий Роман !

Смотрите приложение.
В программе есть две процедуры ХХХр(чистый паскаль) и ХХХа(почти чистых ассемблер, т.к. формирование пролога и эпилога процедуры берет на себя компилятор).
Процедура ХХХр вызывается с помощью ассемблера, а ХХХа - паскалем.
Вот и вся передача данных через стек.
Удачи!

Приложение:


Консультировал: Зенченко Константин Николаевич (Модератор)
Дата отправки: 28.05.2008, 23:27

Рейтинг ответа:

0

[подробно]

Сообщение
модераторам

Отправлять сообщения
модераторам могут
только участники портала.
ВОЙТИ НА ПОРТАЛ »
регистрация »

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

Яндекс Rambler's Top100

главная страница | поддержка | задать вопрос

Время генерирования страницы: 0.15637 сек.

© 2001-2018, Портал RFPRO.RU, Россия
Калашников О.А.  |  Гладенюк А.Г.
Версия системы: 7.42 от 30.12.2017