Пока пью кофе на работе, пара слов касаемо TSTVM2 и не только

Вместо
Код:
BIS     #TTSPC$,@#$JSW
достаточно просто сделать
Код:
        .ASECT
        .=$JSW
        .WORD   TTSPC$
        .PSECT
в начале программы.

Теперь пара слов на предмет CTRL/C - в примерах:
Код:
        .SCCA   #AREA,#FLAG             ;БЛОКИРУЕМ CTRL/C
...
        .TTYIN                           
        CMP     #3,R0                   ;НАЖАТ CTRL/C?
...
        TST     FLAG                    ;НАЖАТ ДВОЙНОЙ CTRL/C?
        BNE     ...                     ;ДА
Насчет векторов 4/10, прямо на примере TSTVM2:
Код:
        .TRPSET #AREA,#TRINT            ;УСТАНАВЛИВАЕМ ОБРАБОТЧИК 4/10
...
TRINT:: MOV     #42401,R5               ;ЗНАЧЕНИЕ ДЛЯ TRAP TO 4
        ADC     R5                      ;ЕСЛИ C=1, ЭТО TRAP TO 10
        ...

AREA:   .BLKW   2
FLAG:   .BLKW
как-то так...

Ну и пара мыслей вслух... Если MFPS/MTPS заменить на TRAP 1/TRAP 2 (к примеру), тест можно будет гонять на всех машинах которые представлены на форуме (например в Э100/25 нет ни MFPS ни MTPS), а также легко адаптировать для запуска в RTEM и RSTS/E...