Тесты ВМ1

[Alex_K]

Уважаемые владельцы реальных БК-0010-01, выполните в Бейсике такую программку:

10 DATA &O010046,&O012700
20 DATA &O000520,&O010020
30 DATA &O016715,&O000004
40 DATA &O012600,&O000207
100 RESTORE
110 FOR I%=&O500 TO &O516 STEP 2
120 READ A%
130 POKE I%,A%
140 NEXT I%
150 DEF USR0=&O500
160 A%=USR0(0%)
170 PRINT OCT$(A%)

Хотелось бы узнать, какой результат получается - 520 или 522.
Сама программка:

000500: MOV R0,-(SP)
000502: MOV #520,R0
000506: MOV R0,(R0)+
000510: MOV 520,@R5
000514: MOV (SP)+,R0
000516: RETURN
000520: .BLKW 1

[Advertiser]

[PDP-11]

Хотелось бы узнать, какой результат получается - 520 или 522.

520

[nzeemin]

Проходя по шагам тест 791401, исправил работу команд MARK, MFPS и RTT.
Теперь тест выдает:
<00>
<0e>k prohod
<0e>k prohod
<0e>k prohod
...и так далее в цикле.
(В угловых скобках записаны коды неотображаемых символов.)