Uknc start disasm
From Felixl.com
Jump to navigationJump to search;--- Старт ПП 160300 013704 MOV @#172660, R4 160302 172660 160304 005000 CLR R0 160306 010406 MOV R4, SP 160310 100465 BMI 160464 160312 032737 BIT #000020, @#177716 160314 000020 160316 177716 160320 001404 BEQ 160332 160332 012737 MOV #000040, @#177716 160334 000040 160336 177716 160340 004767 JSR PC, 173252 ; Вызов подпрограммы - подготовка образа ПЗУ для ЦП 160342 012706 160344 012737 MOV #070045, @#177010 160346 070045 160350 177010 160352 016437 MOV 000042(R4), @#177014 160354 000042 160356 177014 160360 005037 CLR @#177716 160362 177716 160364 012700 MOV #000100, R0 160366 000100 160370 077001 SOB R0, 160370 ; Цикл 160372 012737 MOV #100000, @#177716 160374 100000 160376 177716 160400 004767 JSR PC, 160410 ; Вызов подпрограммы - тест ПЗУ 160402 000004 160404 000300 SWAB R0 160406 000432 BR 160474 ;---
160410 - Начало теста ПЗУ ... 160462 RTS PC ; Возврат; R0 - результат
160474 - Начало теста ОЗУ ПП, первые 16384 байт, и их очистки ... 160534 - Завершение цикла
;--- Процедура - подготовка образа ПЗУ для ЦП 173252 012737 MOV #070000, @#177010 173254 070000 173256 177010 173260 012701 MOV #160000, R1 173262 160000 173264 012700 MOV #005305, R0 173266 005305 173270 012137 MOV (R1)+, @#177014 ; <-+ 173272 177014 ; | 173274 005237 INC @#177010 ; | 173276 177010 ; | 173300 077005 SOB R0, 173270 ; --+ 173302 012701 MOV #173356, R1 173304 173356 173306 012700 MOV #000044, R0 173310 000044 173312 012137 MOV (R1)+, @#177014 ; <-+ 173314 177014 ; | 173316 005237 INC @#177010 ; | 173320 177010 ; | 173322 077005 SOB R0, 173312 ; --+ 173324 013737 MOV @#177716, @#177014 173326 177716 173330 177014 173332 012701 MOV #173466, R1 173334 173466 173336 012137 MOV (R1)+, @#177010 ; <-+ 173340 177010 ; | 173342 012737 MOV #000600, @#177014 ; | 173344 000600 ; | 173346 177014 ; | 173350 005711 TST (R1) ; | 173352 001371 BNE 173336 ; --+ 173354 000207 RTS PC ;---