Программирование на УКНЦ как?

Цитата:

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

1$: BIT #200, @#177564
BEQ 1$
Но проще так:
1$: TSTB @#177564
BPL 1$

Спасибо, Patron ! Я просто плаваю в этом откровенно, просто именно такой
вариант работает, а простенький не работает ) То есть сравнение с нулём но с приставкой B и даже значение #200 как бы и не нужно.
То есть получится Макрос можно так оформить

Код:

.MACRO .TTT COM 1$: TSTB @#177564 BPL 1$ MOV COM, @#177566 .ENDM

---------- Post added at 18:01 ---------- Previous post was at 17:55 ----------

Тогда ещё вопрос - принципиально что такое параметр COM в данном макрокоманде?
Имею в виду один код или последовательность?

Вложений: 1

игроделанье )

ПРОГРАММИРОВАНИЕ ))) Для меня это просто хобби, поэтому не удивляйтесь,
что какие-то моменты уже обжёванно - пережёванные могут мне не быть явными.

Я уже писал на форуме, что делаю простенькую (символьную, но цветную "смайл"),
игрушку для УК-НЦ. Добился очень правильной "своевременной" реакции на
нажатие кнопок путём подбора задержки внутри цикла.

Всё что сейчас работает, это "непрерывный" цикл (типо пульса)
внутри которого идут в такой последовательности:

Код:

repeat /* основной цикл */ секция-= Обновление экрана -персонаж -статистика секция-=(задержка DELAY - для плавности цикла в целом значение подбирал экспериментально) секция-=опрос клавиатуры оформлен так: (через глобальные переменные (регистры УК-НЦшки) VAR INKEY ORIGIN 177560B: INTEGER; KEY ORIGIN 177562B: INTEGER; ... IF((INKEY AND 128)<>0) THEN (спасибо form'у ! - сначало я просто ноль туда писал и был этому рад !) ... в зависимости от значения нажатой кнопки УПР+Ц - вызывает процедуру CANCEL (по сути EXIT, только там можно будет что то ещё подвесить, типа "ПОКА ПОКА!") Либо перемещение АВАТАРА, 12346789 - меняет значение переменной АВАТАР.НАПРАВЛЕНИЕ 5 - это стоять на месте. секция-=смотрим изменился ли НАПРАВЛЕНИЕ и если да меняем координаты АВАТАРА. until 0>0 /* конец тела основного цикла */

http://s4.rimg.info/8e12b96d087ec7ce...229be3bf91.gif

Это я всё к тому, что я пытался ввести одного АВАТАРА - которым
управлял бы ИИ, и начинаются беды с плавностью, то есть реакция
на клавиатуру становится немного не чёткой, а это не позволяет
управлять игроком адекватно, а ведь ещё пульки должны летать, да
и вражин лучше бы больше 1-го завести, буду рад любые советы по
оптимизации услышать - вплоть до "ЗАВЯЗЫВАЙ С ПРОГРАММАМИ, ХОБОТ!"

Прилепил недоделку что-бы можно было пощупать в UKNCBTL.
Там файл называется TGAME.SAV, дискета загрузочная.
Это просто рабочая модель. Идея игровая есть и сюжет там
будет и брифинг и всё такое, но сначала математика )))

Цитата:

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

То есть сравнение с нулём но с приставкой B и даже значение #200 как бы и не нужно.

Признаком готовности к передаче байта на экран служит бит 0200 в регистре статуса передатчика.

Конструкция (A AND R)=0 ( так же как и BIT #200,@#177564 ) проверяет на равенство нулю не весь регистр статуса, а только его бит 0200.
TSTB @#177564 проверяет младший байт регистра, для которого бит 0200 является битом знака.

Метки в макросах лучше не использовать, а байт отправлять командой MOVB:

Код:

.MACRO .TTT ARG TSTB @#177564 BPL .-4. MOVB ARG, @#177566 .ENDM

Цитата:

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

принципиально что такое параметр COM в данном макрокоманде? Имею в виду один код или последовательность?

Да, принципиально.

Чтобы результат вызова .TTT < #'Y #'E #'S > совпал с результатом вызова .TTT #'Y | .TTT #'E | .TTT #'S - макрос должен выглядеть так:

Код:

.MACRO .TTT ARGS .IRP ARG, <ARGS> .IF NB ARG TSTB @#177564 BPL .-4. MOVB ARG, @#177566 .ENDC .ENDM .ENDM

Цитата:

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

Метки в макросах лучше не использовать

Метки можно безопасно использовать в макросах, но нужно указать, что они являются локальными для макроса.

Код:

.MACRO XXX,?L1,?L2 L1: ... ... L2: ... .ENDM

Вложений: 1

ещё раз про RANDOM !!!

Уселся попинать игрульку и снова затык с RND,
я в этой теме уже вопрос задавал - но вот дошло по практики:

Код:

FUNCTION RND: REAL; VAR V: INTEGER; BEGIN /*$C BR M1 RN: .WORD 435 ; проблемная константа!!! чем заменить??? M1: MOV RN, R1 MUL #12869, R1 ADD #6925, R1 MOV R1, RN BIC #^O100000, R1 MOV R1, V(SP) */ RND:=V/32767; END;

Сразу скажу что функцию взял из старых исходников школьных времён.
Ей можно пользоваться, но данном случае у меня получается "узор"
и "время" для бонусов на уровне одинаковый всё время !
(см. миниатюру)
Я помню, что form, мне советовал использовать GetTime??? Но как это оформить ? Вместо RN - кидать в R1 что то из её параметров? А строка

Код:

MOV R1, RN

тогда вообще не нужна?
Хелп!
Неужели в памяти всё время одинаковый рисунок?
Должна же быть какая-то ячейка содержание которой случайно по определению и тогда её содержимое и можно было бы использовать?
Таймер?
Или RN - можно сделать глобальной и ввести дополнительную процедуру
RANDOMIZE которая бы писала туда что-то "случайное" - результат вычислений ???
:confused_std:
Нужно авторитетное мнение для "супер-программиста" hobota!

На самом деле проблема для меня в том, что из хелпа
я не вникаю в главное !!!

Код:

ПРИМЕР. .TITLE .GTIM.MAC ;В ЭТОМ ПРИМЕРЕ ПОЛЬЗОВАТЕЛЬ ПОЛУЧАЕТ ТЕКУЩЕЕ ВРЕМЯ ;В ТИКАХ. .MCALL .GTIM,.EXIT START: .GTIM #AREA,#TICKS ;ОПРЕДЕЛИТЬ ТЕКУЩЕЕ ;ВРЕМЯ .EXIT TICKS: .WORD 0,0 AREA: .BLKW 2 .END START

Куда в этом примере пишется определённое значение?
Моя "версия", что в #TICKS ?
:confused_std:

---------- Post added at 14:26 ---------- Previous post was at 14:23 ----------

Да и макрос зависит от поддержки таймера монитором?
Может это тупик заведомо?

Цитата:

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

Если бы не TRAP

Я не большой спец по системным вызовам, поэтому всегда делаю так, как советуют в их описании.

В описании вызова .GTIM написано, что первый аргумент - адрес пустого блока из двух слов ( а не двух байтов ) для системных целей, а второй аргумент - адрес блока из двух слов, куда будет записан результат вызова:

Код:

Area: .BlkW 2 Buf: .Word 0 Ticks: .Word 0 START: .GTIM #Area, #Buf

После вызова в слове Buf будет старшее слово счётчика тиков, а в слове Ticks - младшее ( именно оно инкрементируется 50 раз в секунду ).

Вложений: 1

Цитата:

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

В описании вызова .GTIM написано,

хочу просто убедиться, что мы один и тот же документ читаем?

Код:

5.3.16. .GTIM ЗАПРОС .GTIM ПОЗВОЛЯЕТ ПРОГРАММЕ ОПРЕДЕЛИТЬ ТЕКУЩЕЕ ВРЕМЯ СУТОК. ВЕЛИЧИНА ВРЕМЕНИ ОПРЕДЕЛЯЕТСЯ В ТИКАХ (1 ТИК=1/50 С). ФОРМАТ МАКРОКОМАНДЫ: .GTIM AREA,ADDR ГДЕ AREA - АДРЕС БЛОКА ИЗ 2-Х СЛОВ АРГУМЕНТОВ ЕМТ; ADDR - АДРЕС БЛОКА ИЗ 2-Х СЛОВ, СОДЕРЖАЩЕГО ЗНАЧЕНИЕ ВРЕМЕНИ ВО ВНУТРЕННЕМ ФОРМАТЕ; ПЕРВОЕ СЛОВО СОДЕРЖИТ СТАР- ШИЕ РАЗРЯДЫ, ВТОРОЕ СЛОВО - МЛАДШИЕ. ФОРМАТ БЛОКА АРГУМЕНТОВ: AREA: .BYTE 0,21 .WORD ADDR ПОЛЬЗОВАТЕЛЬ ДОЛЖЕН ПРЕДУСМОТРЕТЬ В СВОЕЙ ПРОГРАММЕ ОПЕРАЦИЮ ПРЕОБРАЗОВАНИЯ ТИКОВ В ЧАСЫ-МИНУТЫ-СЕКУНДЫ. В РЕЖИМЕ FB ВЕЛИЧИНА ВРЕМЕНИ АВТОМАТИЧЕСКИ ВОССТАНАВЛИВАЕТСЯ ПОСЛЕ 24:00:, В РЕЖИМЕ SJ ОПЕРАЦИЯ ВОССТАНОВЛЕНИЯ ВЫПОЛ- НЯЕТСЯ, ЕСЛИ ПРИ ГЕНЕРАЦИИ СИСТЕМЫ БЫЛА ОПРЕДЕЛЕНА ПОДДЕРЖ- КА ТАЙМЕРА.

И да, спасибо! Сейчас буду дальше двигаться, нашёл ещё вариант RND
правда он там почти "отдельная программа" - т.е. очень много строчек.
:smile:

Что находится у RT-11 по адресу ОЗУ 170?

Цитата:

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

Что находится у RT-11 по адресу ОЗУ 170?

Адрес обработчика прерываний по вектору 170 :)