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

[form]

В приложении - тест скорости вывода символов в порт терминала - CPS.SAV с исходником.

Есть два варианта теста:

1. CPS.SAV - без ожидания прерывания по WAIT.
2. CPS2.SAV - с ожиданием прерывания по WAIT.

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

Сейчас посмотрим.
Главное однотерминальную систему загрузить

[Titus]

Только что окончательно обнаружил, что на моей тестовой УКНЦ'шке периферийный процессор тактируется 8-ю мегагерцами! Помнится, мне товарищ, который подарил ее, говорил, что разгонял ПП. Придется переходить на вторую УКНЦ.

[form]

Только что окончательно обнаружил, что на моей тестовой УКНЦ'шке периферийный процессор тактируется 8-ю мегагерцами! Помнится, мне товарищ, который подарил ее, говорил, что разгонял ПП. Придется переходить на вторую УКНЦ.

Проверь на живом УКНЦ, ну и может пригодится когда - пример одной проги и для ЦП и для ПП

В эмуляторе пашет

	.TITLE	PPCP
	.IDENT	/V01.00/

$USRSP	==	42			;USER STACK POINTER
CR	=	15			;CARRIAGE RETURN
LF	=	12			;LINE FEED

	.MCALL	.EXIT,.TTYOUT	;SYSTEM MACRO CALLS

START::	CMP	@#$USRSP,SP		;RUNNING UNDER RT-11?
	BEQ	10$			;EQ->YES
	MOV	#PR.PP,PRINT		;UPDATE PRINT HANDLER
	MOV	#EX.PP,EXIT		;UPDATE EXIT HANDLER
10$:	MOV	#TEXT,R1		;POINT TO ASCIZ STRING
	CALL	@PRINT			;PRINT IT
	JMP	@EXIT			;EXIT

PR.PP::	MOV	R1,10$			;SET STRING ADDRESS
	JSR	R4,@#163006		;PRINT STRING
10$:	.BLKW				;
	RETURN				;RETURN

PR.RT::	MOVB	(R1)+,R0		;GET CHAR
	BEQ	10$			;EQ -> END OF LINE
	.TTYOUT				;PRINT CHARACTER
	BR	PR.RT			;LOOP
10$:	RETURN				;RETURN

EX.RT::	.EXIT				;EXIT TO OS

EX.PP::	MOV	#START,R1		;FREE MEMORY AND EXIT
	JMP	@#176300		;

PRINT::	.WORD	PR.RT			;RT-11 BY DEFAULT
EXIT::	.WORD	EX.RT			;

TEXT:	.ASCIZ	<CR><LF>/HELLO WORLD!/<CR><LF>

	.END	START

[form]

В приложении - тест скорости вывода символов в порт терминала - CPS.SAV с исходником.

Есть два варианта теста:

1. CPS.SAV - без ожидания прерывания по WAIT.
2. CPS2.SAV - с ожиданием прерывания по WAIT.

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

На консоли при 9600 оба теста 960.
На DLV11-J пробовать не стал так как терминал прога не учитывает, а из-за русского текста внутри компилиться не желает (патчить MACRO нет охоты)

[Titus]

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

Проверил на реальной УКНЦ, нетурбированной. Оказалось еще медленней - 20 тактов.

---------- Post added at 19:05 ---------- Previous post was at 19:03 ----------

Проверь на живом УКНЦ, ну и может пригодится когда - пример одной проги и для ЦП и для ПП

В эмуляторе пашет

Проверю, если приложишь диск с программой)

[form]

Проверил на реальной УКНЦ, нетурбированной. Оказалось еще медленней - 20 тактов.

---------- Post added at 19:05 ---------- Previous post was at 19:03 ----------


Проверю, если приложишь диск с программой)

Держи.
А кто собственно мешает с помощью E11 класть что угодно в образы?

[Advertiser]

[Patron]

На консоли при 9600 оба теста 960.

Так и должно быть при 10 бит на байт.

Интересно, какая реальная скорость при выводе в порт терминала у УКНЦ..

[form]

Так и должно быть при 10 бит на байт.

Интересно, какая реальная скорость при выводе в порт терминала у УКНЦ..

Ну стандартный 9600,N,8,1
На УКНЦ тащить муторно - надо дискеты задействовать

[Titus]

Проверь на живом УКНЦ, ну и может пригодится когда - пример одной проги и для ЦП и для ПП

В эмуляторе пашет

Да, на реале тоже работает.

[form]

Да, на реале тоже работает.

Ну и отлично.
В реале если большие объемы данных надо выводить (сразу), надо учесть, что на ЦП продолжает работать система и еще будет "." выводить