Навигация
Главная
Поиск
Форум
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
Пример работы с... 65535
ТЕХНОЛОГИИ ДОСТ... 65535
Организация зап... 65535
Вызов хранимых ... 65535
Создание отчето... 65535
Эмулятор микроп... 65535
Подключение Mic... 65535
Создание потоко... 65535
Приложение «Про... 65535
21 ошибка прогр... 65535
Гостевая книга ... 65535
Форум на вашем ... 65535
HACK F.A.Q 65535
Содержание сайт... 65535
Invision Power ... 65535
Программируемая... 65535
Оператор выбора... 65535
Модуль Forms 65535
Реклама
Сейчас на сайте
Гостей: 5
На сайте нет зарегистрированных пользователей

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

Моделирование интернет кафе на GPSS + Отчет
Калькулятор на Delphi с переводом в другую систему исчисления + Блок схемы
Моделирование работы класса персональных компьютеров на GPSS + Отчет + Б...

Реклама



Подписывайся на 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 Июль 11 2010 22:36:26 · 0 Комментариев · 5665 Прочтений · Для печати

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


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



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

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

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

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

Пароль



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

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

Случайные загрузки
Battle.Net - мони...
Панель "Случайное...
Генетический алго...
Создание оригинал...
FatScrollbar
ScrollCredit
isoCanvas (Редакт...
THttpScan v4.1
Основы Delphi. Пр...
Assembler. Практикум
Конвертирование и...
PHP 5
SUIPack
MiniTetris [Исход...
База данных фильм...
Delphi 2005. Разр...
Электронный магаз...
TsHintManager
Размещение элемен...
Защита от спама ...

Топ загрузок
Приложение Клие... 100721
Delphi 7 Enterp... 96510
Converter AMR<-... 20213
GPSS World Stud... 16901
Borland C++Buil... 14084
Borland Delphi ... 9932
Turbo Pascal fo... 7299
Калькулятор [Ис... 5787
Visual Studio 2... 5168
FreeSMS v1.3.1 3643
Случайные статьи
Стандартные подпро...
В словаре, который...
Правила работы с И...
Есть еще несколько...
Метаданные
Фирма Adobe
Отображение в Dat...
Двоичная композиция
О ВРЕМЕНИ, О П...
функцию брандмауэр...
Функции
Установка модуля A...
Очереди имеют след...
ChatSession.h
Программы для прод...
QueryInterface реф...
Ваша цель — опреде...
Команда SELECT
Создание простейше...
Правильность и сос...
СВОЙСТВО ИЛИ ПОЛЕ?
Установка чипа дл...
Регистрация и упра...
Строка соединения
Выработка решенияК...
Статистика



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


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