.
Тест: ANSI1.SAV - проверяет работу ANSI-парсера.
Код:
;
; ANSI1.MAC - ANSI parser test #1
;
.MCall .Print, .Exit
START:
.Print #TstStr
.Exit
TstStr: .ASCII <33>'<'
.ASCII <33>'[2J'
.ASCII <33>'[0;0H0'
.ASCII <33>'[0;0;2;2H1'
.ASCII <33>'[0;0;2;2;4H2'
.ASCII <33>'[6;0H'
.ASCIZ ' ANSI parser test #1'
.Even
.End START
На терминале PuTTY результат такой:

- - - Добавлено - - -
Тест: ANSI2.SAV - проверяет работу ANSI-парсера.
Код:
;
; ANSI2.MAC - ANSI parser test #2
;
.MCall .Print, .Exit
START:
.Print #TstStr
.Exit
TstStr: .ASCII <33>'<'
.ASCII <33>'[2J'
.ASCII <33>'[1;2H'
.ASCII '12345'
.ASCII <33>'[2;2H' <33>'[4;0;7m'
.ASCII '12345'
.ASCII <33>'[3;2H' <33>'[0;7;0;4m'
.ASCII '12345'
.ASCII <33>'[4;2H' <33>'[4;0;7;0m'
.ASCII '12345'
.ASCII <33>'[6;0H'
.ASCIZ ' ANSI parser test #2'
.Even
.End START
На терминале PuTTY результат такой: