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

[form]

в СТАЛКЕРЕ, например, игроку предлагается число в самом начале ввести, наверняка
для инициализации генератора )) А можно подробней о .GTIM - ведь если сам буду
читать застряну надолго с этим ?

.GTIM #AREA,#TIME

AREA: .BLKW 2
TIME: .BLKW 2

возвращает число тиков (50 в секунду) набежавших с начала суток (со времени включения если время не выставляли).

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

Я когда свой тетрис делал - вполне хватало постоянного дергания генератора с реальным использованием только когда нужно.

[hobot]

Я когда свой тетрис делал - вполне хватало постоянного дергания генератора с реальным использованием только когда нужно.

У меня тут видишь ли какая штука - все объекты при первом запуске всегда на одних и тех же местах тогда получаются.
.GTIM #AREA,#TIME

AREA: .BLKW 2
TIME: .BLKW 2

возвращает в какую переменную из этих двух?
Я бы сразу сделал тогда нужную строчку и всё забыл бы пока об этом ! )))

[form]

У меня тут видишь ли какая штука - все объекты при первом запуске всегда на одних и тех же местах тогда получаются.
.GTIM #AREA,#TIME

AREA: .BLKW 2
TIME: .BLKW 2

возвращает в какую переменную из этих двух?
Я бы сразу сделал тогда нужную строчку и всё забыл бы пока об этом ! )))

В TIME. Не помню только порядок: 32bit значение пишется сначала старшее слово, потом младшее, но в каком-то месте было исключение кажется как раз со временем - вобщем проверь

[hobot]

В TIME

Ok! Попробую, попутно конечно почитаю все эти макрокоманды, просто пока
время на другую часть хотелось-бы потратить )))


________________
первый скриншот:
так ещё хуже ))) И даже если бы не трапилось всё равно
на старте одно и то же число - засада однако для меня !

второй скриншот:
насочинял ещё один "не вариант" на второй картинке )))

третий скриншот:
вернул пока к первоначальному (что-бы запуск не терять)
надо что-то для инициализации в R1 случайное кидать (((

[Titus]

Как в макроассемблере сделать макросы для команд сохранения регистров в стеке?

Хочу, чтобы PUSH Rx транслировалось, как MOV Rx,-(SP). И т.д.

[form]

Как в макроассемблере сделать макросы для команд сохранения регистров в стеке?

Хочу, чтобы PUSH Rx транслировалось, как MOV Rx,-(SP). И т.д.

Например так - если без наворотов:

.MACRO  PUSH    ARG
.IRP    X,<ARG>
        MOV     X,-(SP)
.ENDR
.ENDM

        PUSH    R1
        PUSH    <R2,R3>

---------- Post added at 22:19 ---------- Previous post was at 22:15 ----------

Кстати о сохранении регистров...
Поскольку эта процедура обычно выполняется в подпрограммах, можно кое-что упростить. К примеру так:

$SAVAL::
	MOV	R4,-(SP)	;СОХРАНЯЕМ R4
	MOV	R3,-(SP)	;R3
	MOV	R2,-(SP)	;R2
	MOV	R1,-(SP)	;R1
	MOV	R0,-(SP)	;R0
	MOV	12(SP),-(SP)	;ПЕРЕНОСИМ АДРЕС ВОЗВРАТА
	MOV	R5,14(SP)	;СОХРАНЯЕМ R5
	JSR	PC,@(SP)+	;СОПРОГРАМИМ ВЫЗВАВШЕГО
	MOV	(SP)+,R0	;ВОССТАНАВЛИВАЕМ R0
	MOV	(SP)+,R1	;R1
	MOV	(SP)+,R2	;R2
	MOV	(SP)+,R3	;R3
	MOV	(SP)+,R4	;R4
	MOV	(SP)+,R5	;R5
	RETURN

Тогда в подпрограмме делаем CALL $SAVAL, у нас сохраняются все регистры, когда делается RETURN, они сами восстановятся и будет возврат куда надо. Кстати родная DECовская подпрограмма

---------- Post added at 22:27 ---------- Previous post was at 22:19 ----------

Вообще, рекомендую обратить внимание на библиотеку ULBLIB которая лежит в RT-11 V5.7 сорцовом ките (с исходниками и описанием в них что подпрограммы делают). Весьма удобная вещь - многие RSXовские подпрограммы (увы, не все) в ней есть. Особенно полезны- сохранения регистров в разных сочетаниях, конвертация чисел/radix-50 <> ascii, арифметика без EIS итд.

[Advertiser]

[Titus]

Немножко потестил скорость работы процессоров на УКНЦ - ужаснулся, какой тормоз периферийный процессор. Команды типа MOV Rx,Rx он выполняет за 16 тактов, вместо 8, как если бы время памяти было 1Т. Сначала показалось странным, но потом разобрался. Во-первых, как это я раньше не заметил, шина данных ОЗУ ПП - 8-битная! И все 16-битные транзакции выполняются в 2 раза медленнее. Во-вторых, доступ к ОЗУ возможен только во время временного слота 'Ц.П.', который наступает раз в 4 такта. Т.е. 2 такта на слот 'Ц.Э.' (цикл экрана), и 2 такта на 'Ц.П.' (цикл процессора). В общем, имеем около 390тыс. операций типа регистр/регистр на ПП, что более, чем в два раза медленнее, чем на том же Спектруме, не смотря на то, что тактовая частота ПП 6.25МГц.

[form]

Немножко потестил скорость работы процессоров на УКНЦ - ужаснулся, какой тормоз периферийный процессор. Команды типа MOV Rx,Rx он выполняет за 16 тактов, вместо 8

А приоритет процессору подымал перед тестом?

[Titus]

А приоритет процессору подымал перед тестом?

Приоритет относительно чего? Видеоконтроллера? Это невозможно. А доступ в ОЗУ со стороны ЦП и ПП происходят в параллель, и друг-другу не мешают.

[form]

Приоритет относительно чего? Видеоконтроллера? Это невозможно. А доступ в ОЗУ со стороны ЦП и ПП происходят в параллель, и друг-другу не мешают.

Приоритет процессора - его параметр. Это не только возможно, но и необходимо.

Нужно делать MTPS #200 перед началом теста. Иначе все, что генерит прерывания будет прерывать твой тест.

Если же используется таймер (прерывания) для отсчета, тогда надо позаботиться, чтобы все остальное не мешалось - на всякий случай