![RCA CDPl8S693 Скачать руководство пользователя страница 68](http://html.mh-extra.com/html/rca/cdpl8s693/cdpl8s693_user-manual_334504068.webp)
Appendix B—UT62 Monitor Program Listing
8197
8197
8197
8197
8197
8197
8197
8197
8197
8197
8197
8197
8197
8197
8197
8197
8197
8197
8198
8198 DC17;
819A 30A4;
819C ;
0419
0420
0421
0422
0423
0424
0423
0426
0427
0428
0429
0430
0431
0432
0433
0434
0433
0436
0437
0438
0439
0440
ARE FOLLOWED BY SIX N0LLS.
USES REGISTERS
AUX AND CHAR AND A STACK LOCATION.
TYPED
& TYPE5D ALLOW AN EARLIER READ TO COMPLETE.
AUX.0 HOLDS OUTPUT CHARACTER (AT F IR S T ),
THEN THE DELAY CONSTANT BETWEEN B IT S.
CHAR.0 HOLDS THE NUMBER OF BITS ( l l ) IN
ITS LOWER DIGIT AND THE FOLLOWING CODE IN
ITS UPPER D IG IT:
0 -
BYTE OUTPUT
1 -
FIRST HEX OUTPUT
2 -
LAST NULL OUTPUT
8 -
LF OUTPUT
..REG USED:
CHAR, AUX
. .
************************************************************
ORG UT62+#0198
TYPED:
SEP DELAY;,#17
BR TYPE
819C DC17 ;
0441 TYPE5D: SEP DELAY; ,# 1 7
819E 3 8 ;
0442
SKP
819F
>
0443
819F D3;
0444 TEXIT:
SEP R5
81A0
i
0445
81A0 4 5 ;
0446 TYPE5:
LDA R5
81A1 3 8 ;
0447
SKP
81A2 >
0448
81A2 4 6 ;
0449 TYPE6:
LDA R6
81A3 3 8 ;
0450
SKP
81A4
J
0451
81A4 9FAE
0452 TYPE:
GHI CHAR;PLO AUX
81A6 FBOA
0453
XRI LF
81A8 3ABF
0454
BNZ TY5
81AA F88B
0455
LDI #8B
81AC 30C1
0456
BR TY6
81AE
;
0457
81AE 9FF6F6F6F6;
0458 TYPE2:
GHI CHAR;SHR;SHR
81B3 FCF6
0459
ADI #F6
81B5 3BB9
0460
BNF TY4
81B7 FC07
0461
ADI 7
81B9 >
0462
81B9 FFC6AE;
0463 TY4:
SMI #C6;PLO AUX
81BC F81B;
0464
LDI #lB
81BE C8;
0465
LSKP
81BF
j
0466
81BF F80B;;
0467 TY5:
LDI #0B
81C1 >
0468
81C1 AF;
0469 TY6:
PLO CHAR
81C2 8D73;
0470
GLO ASL;STXD
81C4
>
0471
81C4 7B;
0472 BEGIN:
SEQ
81C5 8EAD;
0473
GLO AUX; PLO ASL
81C7 >
0474
81C7 DC07;
0475 PREBIT: SEP DELAY; ,# 0 7
81C9 2F;
0476
DEC CHAR
81CA F 5 ;
0477
SD
81CB 8D76AD;
0478
GLO ASL;SHRC;PLO
,.THREE BIT TBffi DELAY
. .THREE BIT TIME DELAY
.PICK UP DATA
..P IC K UP DATA
..K EEP A COPY
. . I S IT A LINE-FEED ?
. . # BITS + # NULLS
..CONVERT TO HEX
. . I F A OR MORE, ADD 37
..ELSE ADD 30
. . 1 0 ADI
NO. OF BITS
.NO OF BITS
..SAVE USER'S RD.0
..START BIT
. . COPY CHAR TO RD. 0
. . 1 BIT TIME DELAY
..D EC BIT COUNT
..S E T DF = 1