Навигация
Главная
Поиск
Форум
FAQ's
Ссылки
Карта сайта
Чат программистов

Статьи
-Delphi
-C/C++
-Turbo Pascal
-Assembler
-Java/JS
-PHP
-Perl
-DHTML
-Prolog
-GPSS
-Сайтостроительство
-CMS: PHP Fusion
-Инвестирование

Файлы
-Для программистов
-Компонеты для Delphi
-Исходники на Delphi
-Исходники на C/C++
-Книги по Delphi
-Книги по С/С++
-Книги по JAVA/JS
-Книги по Basic/VB/.NET
-Книги по PHP/MySQL
-Книги по Assembler
-PHP Fusion MOD'ы
-by Kest
Professional Download System
Реклама
Услуги

Автоматическое добавление статей на сайты на Wordpress, Joomla, DLE
Заказать продвижение сайта
Программа для рисования блок-схем
Инженерный калькулятор онлайн
Таблица сложения онлайн
Популярные статьи
OpenGL и Delphi... 65535
Форум на вашем ... 65535
HACK F.A.Q 65535
Бип из системно... 65535
Гостевая книга ... 65535
Invision Power ... 65535
Содержание сайт... 65535
Организация зап... 65535
Вызов хранимых ... 65535
Программируемая... 65535
Эмулятор микроп... 65535
Подключение Mic... 65535
Создание потоко... 65535
Приложение «Про... 65535
Оператор выбора... 65535
Создание отчето... 65101
Модуль Forms 64873
Пример работы с... 63336
ТЕХНОЛОГИИ ДОСТ... 61573
Имитационное мо... 57436
Реклама
Сейчас на сайте
Гостей: 5
На сайте нет зарегистрированных пользователей

Пользователей: 13,081
новичок: Abdukarimov A
Новости
Реклама
Выполняем курсовые и лабораторные по разным языкам программирования
Подробнее - курсовые и лабораторные на заказ
Delphi, Turbo Pascal, Assembler, C, C++, C#, Visual Basic, Java, GPSS, Prolog, 3D MAX, Компас 3D
Заказать программу для Windows Mobile, Symbian

Игра Sokoban на Delphi + Блок схемы
Моделирование автовокзала + Отчет + Блок схема
Лабораторная работа по динамическим спискам на Turbo Pascal (удаление ду...

Реклама



Подписывайся на YouTube канал о программировании, что бы не пропустить новые видео!

ПОДПИСЫВАЙСЯ на канал о программировании
Лабораторная: команды передачи управления
Текст программы:
title LAB3
page ,132
DSEG segment para public 'data'
DATA db 3Bh,20h,0Dh,32h,0A1h,24h,0A0h,0Dh,0,0Ah,20h
db 0B0h,40h,24h,0E1h,0Dh,0,24h,3Bh,30h,0C0h,0Dh
db 20h,97h,3Bh,83h,0,0A0h,20h,0D0h,27h,20h,0C6h
db 91h,0,20h,0FEh,3Bh,90h,0,3Bh,24h,17h,20h,24h
MEN db 'summa <= -16', 0Ah,0Dh,24h
SER db '-16 BOL db 'summa polozhitelna',0Ah,0Dh,24h
NET db 'kod CR ne najden',0Ah,0Dh,24h
DSEG ends
CSEG segment para public 'code'
assume ds:DSEG,cs:CSEG,ss:SSEG
JUMP proc far
;сохраняем адрес возврата
push ds
sub ax,ax
push ax
;инициализация сегмента данных
mov ax,DSEG
mov ds,ax
;поиск начального элемента в DATA
mov cx,4 ;счетчик внешних циклов
mov dx,45 ;счетчик внутренних циклов
lea si,DATA;начальный адрес данных
dec si
;начало внешнего цикла
EXT: push cx ;сохранение счетчика внешних циклов
mov cx,dx ;загрузка счетчика внутренних циклов
;вложенный цикл
LOC: inc si
cmp byte ptr[si],0Dh ; код CR?
loopne LOC
;продолжение внешнего цикла
jne NO ;код не найден
mov dx,cx
pop cx ;восстановление сч. внешних циклов
loop EXT
;сложение 5 байт без самого большого
mov cx,4 ;подготовка цикла
inc si
mov al,byte ptr[si]
cbw ;расширение знака
mov dx,ax
mov bx,ax
inc si
A: mov al,byte ptr[si]
cbw
add bx,ax
cmp dx,ax
jg B
mov dx,ax
B: inc si
loop A
sub bx,dx ;вычитание наибольшего элемента
;вывод сообщений
cmp bx,0
jg BO ;переход, если сумма >0
cmp bx, -16
jg SE ;переход, если сумма >-16, но<0
lea dx,MEN;выод сообщения, что сумма <=-16
mov ah,9h
int 21h
jmp FIN
BO: lea dx,BOL
mov ah,9h
int 21h
jmp FIN
SE: lea dx,SER
mov ah,9h
int 21h
jmp FIN
NO: lea dx,NET
mov ah,9h
int 21h
FIN: ret
JUMP endp ;конец процедуры
CSEG ends ;конец сегмента кода
SSEG segment para stack 'stack'
db 256 dup(?)
SSEG ends
end JUMP




Блок-схема нахождения суммы
Блок-схема нахождения суммы
Опубликовал Kest July 11 2010 22:36:26 · 0 Комментариев · 4994 Прочтений · Для печати

• Не нашли ответ на свой вопрос? Тогда задайте вопрос в комментариях или на форуме! •


Комментарии
Нет комментариев.
Добавить комментарий
Имя:



smiley smiley smiley smiley smiley smiley smiley smiley smiley
Запретить смайлики в комментариях

Введите проверочный код:* =
Рейтинги
Рейтинг доступен только для пользователей.

Пожалуйста, залогиньтесь или зарегистрируйтесь для голосования.

Нет данных для оценки.
Гость
Имя

Пароль



Вы не зарегистрированны?
Нажмите здесь для регистрации.

Забыли пароль?
Запросите новый здесь.
Поделиться ссылкой
Фолловь меня в Твиттере! • Смотрите канал о путешествияхКак приготовить мидии в тайланде?
Загрузки
Новые загрузки
iChat v.7.0 Final...
iComm v.6.1 - выв...
Visual Studio 200...
CodeGear RAD Stud...
Шаблон для новост...

Случайные загрузки
HTMLredaktor
Pass [Исходник на...
Autorunner
Crypt32
DemoEdit [Исходни...
Время загрузки ...
Библия хакера 2. ...
Обучение Borland ...
Flud Vkontakte.ru
Delphi 2005. Разр...
Matrix2D
Assistant
Allsubmitter 4.7 ...
PrevInst
Еext Editor
TDBF
C++ Builder 6 СПР...
PolyFlow
Создание оригинал...
Просмотр файлов и...

Топ загрузок
Приложение Клие... 100466
Delphi 7 Enterp... 86644
Converter AMR<-... 20077
GPSS World Stud... 12667
Borland C++Buil... 11760
Borland Delphi ... 8558
Turbo Pascal fo... 7037
Visual Studio 2... 4998
Калькулятор [Ис... 4760
FreeSMS v1.3.1 3541
Случайные статьи
Как заработать и р...
Операции ввода-выв...
Поле-шаблон
Выбор VPN для начи...
Модуль Server-side...
Описание микроконт...
Приём создания qua...
Реальный размер жу...
Группа блоков синх...
Лучшие слоты
Сайты для бесплатн...
Программирование: ...
Некоторые функции ...
Метрики
Использование комб...
Интерфейс на естес...
Как стать издателем
Сп 118.13330.2012
Что такое инфографика
Припаиваем светодиод
История развития в...
Документ FacebookWork
Глава 12 Защита да...
Аутентификация в с...
Упорядоченные деревья
Статистика



Друзья сайта
Программы, игры


Полезно
В какую объединенную сеть входит классовая сеть? Суммирование маршрутов Занимают ли таблицы память маршрутизатора?