0 REM CENTRE (SEPT 4/84)              :
1 :
2 REM  1 STATEMENT, 0 FUNCTIONS
3 :
4 REM KEYWORD CHARACTERS:  6
5 :
6 REM KEYWORD     ROUTINE  LINE   SER #
7 REM CENTRE      CNTR     4144    049
8 :
9 REM ================================
10 :
112 .ASC "CENTR[197]"
1112 .WORD CNTR-1
4144 CNTR JSR $AD9E
4146 JSR $B6A3
4148 TAY
4150 PHA
4152 LDX #0
4154 CE1 DEY
4156 CPY #$FF
4158 BEQ CE2
4160 LDA ($22),Y
4162 AND #$7F
4164 CMP #$20
4166 BCC CE1
4168 INX
4170 BNE CE1
4172 CE2 TXA
4174 SEC
4176 SBC #$29
4178 BCS CE4
4180 EOR #$FF
4182 LSR
4183 LDX $D3
4184 CPX #$28
4185 BCC CE3
4186 ADC #$27
4187 CE3 STA $D3
4188 PLA
4189 JMP $AB24
4190 CE4 JMP $A571
4192 ;