
Сообщение от
Titus
Я склоняюсь к мнению, что нету там 640)
Есть. Вот обработка Esc-последовательности переключения в режим 80/64/40/32 символов в строке.
Код:
174410$:SUB #61,R0
BMI 174642$
CMP R0,#5
BHI 174642$
ASL R0
CALL @174434$(R0)
RETURN
174434$:.WORD 174450$,174526$,174614$,174560$
.WORD 174576$,174614$
174450$:MOV #120,@#5654
CLR @#5652
174462$:INCB @#5643
BIS #20,@#177716
MOV #50,@#4014
MOV #0,@#177052
174510$:CALL 171166$
CALL 171204$
CALL 171222$
RETURN
174526$:MOV #50,@#5654
CLR @#5652
174540$:CLRB @#5643
BIC #20,@#177716
CLR @#4014
BR 174510$
174560$:MOV #100,@#5654
MOV #4,@#5652
BR 174462$
174576$:MOV #40,@#5654
MOV #4,@#5652
BR 174540$
174614$:RETURN