0 REM COMPUTED CMDS (J. RUBIN SEPT/85):
1 :
2 REM 4 STATEMENTS, 0 FUNCTIONS
3 :
4 REM KEYWORD CHARACTERS: 23
5 :
6 REM KEYWORD    ROUTINE  LINE   SER #
7 REM S/CGOTO    CGTO     12358   167
8 REM S/CGOSUB   CGSB     12364   168
9 REM S/CRUN     CRN      12396   169
10 REM S/CRESTORE CRSR     12406   170
11 :
12 REM ================================
13 :
152 .ASC "CGOT[207]CGOSU[194]CRU[206]CRESTOR[197]"
1152 .WORD CGTO-1,CGSB-1,CRN-1,CRSR-1
12358 CGTO JSR CLIN
12360 JMP $A8A3
12362 ;
12364 CGSB LDA #3
12366 JSR $A3FB
12368 LDA $7B
12370 PHA
12372 LDA $7A
12374 PHA
12376 LDA $3A
12378 PHA
12380 LDA $39
12382 PHA
12384 LDA #$8D
12386 PHA
12388 JSR $79
12390 CGS1 JSR CGTO
12392 JMP $A7AE
12394 ;
12396 CRN LDA #0
12398 JSR $FF90
12400 JSR $A660
12402 BEQ CGS1
12404 ;
12406 CRSR JSR CLIN
12408 LDA $7A
12410 PHA
12412 LDA $7B
12414 PHA
12416 JSR $A8A3
12418 STA $42
12420 LDA $7A
12422 STA $41
12424 PLA
12426 STA $7B
12428 PLA
12430 STA $7A
12432 CRE1 RTS
12434 ;
12436 CLIN JSR $AD8A;EVAL NUM EXPR
12438 JSR $B7F7
12440 CMP #$FA
12442 BCC CRE1
12444 JMP $B248
12446 ;