Отправляет email-рассылки с помощью сервиса Sendsay
  Все выпуски  

RFpro.ru: Ассемблер? Это просто! Учимся программировать


Хостинг портала RFpro.ru:
Московский хостер
Профессиональный платный хостинг на базе Windows 2008

РАССЫЛКИ ПОРТАЛА RFPRO.RU

Чемпионы рейтинга экспертов в этой рассылке

_Ayl_
Статус: Студент
Рейтинг: 1363
∙ повысить рейтинг »
Boriss
Статус: Академик
Рейтинг: 1078
∙ повысить рейтинг »
Jimhucksly
Статус: 5-й класс
Рейтинг: 789
∙ повысить рейтинг »

/ КОМПЬЮТЕРЫ И ПО / Программирование / Assembler (Ассемблер)

Номер выпуска:1263
Дата выхода:18.10.2009, 13:00
Администратор рассылки:Лысков Игорь Витальевич, Модератор
Подписчиков / экспертов:435 / 66
Вопросов / ответов:1 / 1
IRC-канал по теме:#assembler

Вопрос № 173239: Здравствуйте, Уважаемые Эксперты! Мне нужно написать подпрограмму для подсчета суммы области памяти (вещественные числа двойной точности, начало задано в SI, количество – в регистре CX) для Intel 80x87....



Вопрос № 173239:

Здравствуйте, Уважаемые Эксперты! Мне нужно написать подпрограмму для подсчета суммы области памяти (вещественные числа двойной точности, начало задано в SI, количество – в регистре CX) для Intel 80x87.

Отправлен: 13.10.2009, 12:54
Вопрос задал: hindsight, Посетитель
Всего ответов: 1
Страница вопроса »


Отвечает amnick, 3-й класс :
Здравствуйте, hindsight.
Комментарии больше, чем сама подпрограмма. Проверял с TASM 3.1. Функция должна работать на любых CPU 8086 и выше при наличии сопроцессора (8086+8087, 80286+80287 и т.д.).

LOCALS @@
MODEL COMPACT ; замените на нужное

CODESEG

; вычисление суммы массива вещественных чисел двойной точности
; Вход:
; SI - начало массива
; CX - количество элементов
; предполагается, что DS указывает на нужный сегмент данных
; Выход:
; ST(0) - результат
; SI - указывает на адрес за концом массива (SI += CX*8)
; CS = 0
; Остальные регистры не меняются

array_sum proc near
fwait ; не нужно для 80387 и выше
fldz ; result = 0
jcxz @@exit ; нет элементов в массиве
@@next:
fwait ; не нужно для 80387 и выше
fadd qword ptr [si] ; result += array[i]
add si,8 ; к следующему элементу
loop @@next
@@exit: ; ST(0) - результат
ret
array_sum endp

end

Успехов!

Ответ отправил: amnick, 3-й класс
Ответ отправлен: 13.10.2009, 15:26

Оценка ответа: 5
Комментарий к оценке:
Огромное спасибо! Все отлично написано!

Как сказать этому эксперту "спасибо"?
  • Отправить SMS #thank 255373 на номер 1151 (Россия) | Еще номера »
  • Отправить WebMoney:
  • Вам помогли? Пожалуйста, поблагодарите эксперта за это!


    Оценить выпуск »
    Нам очень важно Ваше мнение об этом выпуске рассылки!

    Задать вопрос экспертам этой рассылки »

    Скажите "спасибо" эксперту, который помог Вам!

    Отправьте СМС-сообщение с тестом #thank НОМЕР_ОТВЕТА
    на короткий номер 1151 (Россия)

    Номер ответа и конкретный текст СМС указан внизу каждого ответа.

    Полный список номеров »

    * Стоимость одного СМС-сообщения от 7.15 руб. и зависит от оператора сотовой связи. (полный список тарифов)
    ** При ошибочном вводе номера ответа или текста #thank услуга считается оказанной, денежные средства не возвращаются.
    *** Сумма выплаты эксперту-автору ответа расчитывается из суммы перечислений на портал от биллинговой компании.


    © 2001-2009, Портал RFpro.ru, Россия
    Авторское право: ООО "Мастер-Эксперт Про"
    Автор: Калашников О.А. | Программирование: Гладенюк А.Г.
    Хостинг: Компания "Московский хостер"
    Версия системы: 2009.6.9 от 25.09.2009

    В избранное