C64 Kernal Disassembly - Bank $A000 Please check out the Notable Development's Javascript minimiser at www.ndl-jsdevtools.com

View Bank at $E000
 
$A000 .DW BASIC_ColdStart
$A002 .DW BASIC_WarmStart
$A004 .DB "CBMBASIC"
$A00C .DW $a830 ; $80 - END
$A00E .DW $a741 ; $81 - FOR
$A010 .DW $ad1d ; $82 - NEXT
$A012 .DW $a8f7 ; $83 - DATA
$A014 .DW $aba4 ; $84 - INPUT#
$A016 .DW $abbe ; $85 - INPUT
$A018 .DW $b080 ; $86 - DIM
$A01A .DW $ac05 ; $87 - READ
$A01C .DW $a9a4 ; $88 - LET
$A01E .DW $a89f ; $89 - GOTO
Loc_a020 .DW $a870 ; $8A - RUN
$A022 .DW $a927 ; $8B - IF
$A024 .DW $a81c ; $8C - RESTORE
$A026 .DW $a882 ; $8D - GOSUB
$A028 .DW $a8d1 ; $8E - RETURN
$A02A .DW $a93a ; $8F - REM
$A02C .DW $a82e ; $90 - STOP
$A02E .DW $a94a ; $91 - ON
$A030 .DW $b82c ; $92 - WAIT
$A032 .DW $e167 ; $93 - LOAD
$A034 .DW $e155 ; $94 - SAVE
$A036 .DW $e164 ; $95 - VERIFY
$A038 .DW $b3b2 ; $96 - DEF
$A03A .DW $b823 ; $97 - POKE
$A03C .DW $aa7f ; $98 - PRINT#
$A03E .DW $aa9f ; $99 - PRINT
$A040 .DW $a856 ; $9A - CONT
$A042 .DW $a69b ; $9B - LIST
$A044 .DW $a65d ; $9C - CLR
$A046 .DW $aa85 ; $9D - CMD
$A048 .DW $e129 ; $9E - SYS
$A04A .DW $e1bd ; $9F - OPEN
$A04C .DW $e1c6 ; $A0 - CLOSE
$A04E .DW $ab7a ; $A1 - GET
$A050 .DW $a641 ; $A2 - NEW

$A052 .DW $bc39 ; $A3 - TAB(
$A054 .DW $bccc ; $A4 - TO
$A056 .DW $bc58 ; $A5 - FN
$A058 .DW $310 ; $A6 - SPC(
$A05A .DW $b37d ; $A7 - THEN
$A05C .DW $b39e ; $A8 - NOT
$A05E .DW $bf71 ; $A9 - STEP
$A060 .DW $e097 ; $AA - +
$A062 .DW $b9ea ; $AB - -
$A064 .DW $bfed ; $AC - *
$A066 .DW $e264 ; $AD - /
$A068 .DW $e26b ; $AE - Pi Character
$A06A .DW $e2b4 ; $AF - AND
$A06C .DW $e30e ; $B0 - OR
$A06E .DW $b80d ; $B1 - >
$A070 .DW $b77c ; $B2 - =
$A072 .DW $b465 ; $B3 - <
$A074 .DW $b7ad ; $B4 - SGN
$A076 .DW $b78b ; $B5 - INT
$A078 .DW $b6ec ; $B6 - ABS
$A07A .DW $b700 ; $B7 - USR
$A07C .DW $b72c ; $B8 - FRE
$A07E .DW $b737 ; $B9 - POS
$A080 .DB $79
$A081 .DW Funct_b867+2
$A083 .DB $79
$A084 .DW Funct_b850+2
$A086 .DB $7b
$A087 .DW Funct_ba28+2
$A089 .DB $7b
$A08A .DW Loc_bb0f+2
$A08C .DB $7f
$A08D .DW $BF78+2
$A08F .DB $50
$A090 .DW $AFE8
$A092 .DB $46
$A093 .DW $AFE3+2
$A095 .DB $7d
$A096 .DW $BFB2+1
$A098 .DB $5a
$A099 .DB $d3
$A09A .DB $ae
$A09B .DB $64
$A09C .DB $15
$A09D .DB $b0
BASIC_Keywords .DB "EN",$c4 ; $80 - END
$A0A1 .DB "FO",$d2 ; $81 - FOR
$A0A4 .DB "NEX",$d4 ; $82 - NEXT
$A0A8 .DB "DAT",$c1 ; $83 - DATA
$A0AC .DB "INPUT",$a3 ; $84 - INPUT#
$A0B2 .DB "INPU",$d4 ; $85 - INPUT
$A0B7 .DB "DI",$cd ; $86 - DIM
$A0BA .DB "REA",$c4 ; $87 - READ
$A0BE .DB "LE",$d4 ; $88 - LET
$A0C1 .DB "GOT",$cf ; $89 - GOTO
$A0C5 .DB "RU",$ce ; $8A - RUN
$A0C8 .DB "I",$c6 ; $8B - IF
$A0CA .DB "RESTOR",$c5 ; $8C - RESTORE
$A0D1 .DB "GOSU",$c2 ; $8D - GOSUB
$A0D6 .DB "RETUR",$ce ; $8E - RETURN
$A0DC .DB "RE",$cd ; $8F - REM
$A0DF .DB "STO",$d0 ; $90 - STOP
$A0E3 .DB "O",$ce ; $91 - ON
$A0E5 .DB "WAI",$d4 ; $92 - WAIT
$A0E9 .DB "LOA",$c4 ; $93 - LOAD
$A0ED .DB "SAV",$c5 ; $94 - SAVE
$A0F1 .DB "VERIF",$d9 ; $95 - VERIFY
$A0F7 .DB "DE",$c6 ; $96 - DEF
$A0FA .DB "POK",$c5 ; $97 - POKE
$A0FE .DB "PRINT",$a3 ; $98 - PRINT#
$A104 .DB "PRIN",$d4 ; $99 - PRINT
$A109 .DB "CON",$d4 ; $9A - CONT
$A10D .DB "LIS",$d4 ; $9B - LIST
$A111 .DB "CL",$d2 ; $9C - CLR
$A114 .DB "CM",$c4 ; $9D - CMD
$A117 .DB "SY",$d3 ; $9E - SYS
$A11A .DB "OPE",$ce ; $9F - OPEN
$A11E .DB "CLOS",$c5 ; $A0 - CLOSE
$A123 .DB "GE",$d4 ; $A1 - GET
$A126 .DB "NE",$d7 ; $A2 - NEW

; Function Keywords

$A129 .DB "TAB",$a8 ; $A3 - TAB(
$A12D .DB "T",$cf ; $A4 - TO
$A12F .DB "F",$ce ; $A5 - FN
$A131 .DB "SPC",$a8 ; $A6 - SPC(
$A135 .DB "THE",$ce ; $A7 - THEN
$A139 .DB "NO",$d4 ; $A8 - NOT
$A13C .DB "STE",$d0 ; $A9 - STEP
$A140 .DB $ab ; $AA - +
$A141 .DB $ad ; $AB - -
$A142 .DB $aa ; $AC - *
$A143 .DB $af ; $AD - /
$A144 .DB $de ; $AE - Pi Character
$A145 .DB "AN",$c4 ; $AF - AND
$A148 .DB "O",$d2 ; $B0 - OR
$A14A .DB $be ; $B1 - >
$A14B .DB $bd ; $B2 - =
$A14C .DB $bc ; $B3 - <
$A14D .DB "SG",$ce ; $B4 - SGN
$A150 .DB "IN",$d4 ; $B5 - INT
$A153 .DB "AB",$d3 ; $B6 - ABS
$A156 .DB "US",$d2 ; $B7 - USR
$A159 .DB "FR",$c5 ; $B8 - FRE
$A15C .DB "PO",$d3 ; $B9 - POS
$A15F .DB "SQ",$d2 ; $BA - SQR
$A162 .DB "RN",$c4 ; $BB - RND
$A165 .DB "LO",$c7 ; $BC - LOG
$A168 .DB "EX",$d0 ; $BD - EXP
$A16B .DB "CO",$d3 ; $BE - COS
$A16E .DB "SI",$ce ; $BF - SIN
$A171 .DB "TA",$ce ; $C0 - TAN
$A174 .DB "AT",$ce ; $C1 - ATN
$A177 .DB "PEE",$cb ; $C2 - PEEK
$A17B .DB "LE",$ce ; $C3 - LEN
$A17E .DB "STR",$a4 ; $C4 - STR$
$A182 .DB "VA",$cc ; $C5 - VAL
$A185 .DB "AS",$c3 ; $C6 - ASC
$A188 .DB "CHR",$a4 ; $C7 - CHR$
$A18C .DB "LEFT",$a4 ; $C8 - LEFT$
$A191 .DB "RIGHT",$a4 ; $C9 - RIGHT$
$A197 .DB "MID",$a4 ; $CA - MID$
$A19B .DB "G",$cf ; $CB - GO
$A19D .DB $0 ; End ot Keyword List

$A19E .DB "TOO MANY FILE",$d3
$A1AC .DB "FILE OPE",$ce
$A1B5 .DB "FILE NOT OPE",$ce
$A1C2 .DB "FILE NOT FOUN",$c4
$A1D0 .DB "DEVICE NOT PRESEN",$d4
$A1E2 .DB "NOT INPUT FIL",$c5
$A1F0 .DB "NOT OUTPUT FIL",$c5
$A1FF .DB "MISSING FILE NAM",$c5
$A210 .DB "ILLEGAL DEVICE NUMBE",$d2
$A225 .DB "NEXT WITHOUT FO",$d2
$A235 .DB "SYNTA",$d8
Txt_ReturnWithoutGosub .DB "RETURN WITHOUT GOSU",$c2
Txt_OutOfData .DB "OUT OF DAT",$c1
$A25A .DB "ILLEGAL QUANTIT",$d9
$A26A .DB "OVERFLO",$d7
$A272 .DB "OUT OF MEMOR",$d9
$A27F .DB "UNDEF'D STATEMEN",$d4
$A290 .DB "BAD SUBSCRIP",$d4
$A29D .DB "REDIM'D ARRA",$d9
$A2AA .DB "DIVISION BY ZER",$cf
$A2BA .DB "ILLEGAL DIREC",$d4
$A2C8 .DB "TYPE MISMATC",$c8
$A2D5 .DB "STRING TOO LON",$c7
$A2E4 .DB "FILE DAT",$c1
$A2ED .DB "FORMULA TOO COMPLE",$d8
$A300 .DB "CAN'T CONTINU",$c5
$A30E .DB "UNDEF'D FUNCTIO",$ce
$A31E .DB "VERIF",$d9
$A324 .DB "LOA",$c4
$A328 .DW $A19E
$A32A .DW $A1AC
$A32C .DW $A1B5
$A32E .DW $A1C2
$A330 .DW $A1D0
$A332 .DW $A1E2
$A334 .DW $A1F0
$A336 .DW $A1FF
$A338 .DW $A210
$A33A .DW $A225
$A33C .DW $A235
$A33E .DW Txt_ReturnWithoutGosub
$A340 .DW Txt_OutOfData
$A342 .DW $A25A
$A344 .DW $A26A
$A346 .DW $A272
$A348 .DW $A27F
$A34A .DW $A290
$A34C .DW $A29D
$A34E .DW $A2AA
$A350 .DW $A2BA
$A352 .DW $A2C8
$A354 .DW $A2D5
$A356 .DW $A2E4
$A358 .DW $A2ED
$A35A .DW $A300
$A35C .DW $A30E
$A35E .DW $A31E
$A360 .DW $A324
$A362 .DW BreakText+2
OKText .DB $0d,"OK",$0d,$00
ErrorText .DB " ERROR",$00
Loc_a371 .DB " IN ",$00
ReadyText .DB $0d,$0a,"READY.",$0d,$0a,$00
BreakText .DB $0d,$0a,"BREAK",$00
$A389 .DB $a0
Funct_a38a TSX
$A38B INX
$A38C INX
$A38D INX
$A38E INX
Loc_a38f LDA $0101,X
$A392 CMP #$81
$A394 BNE Loc_a3b7
$A396 LDA $4A
$A398 BNE Loc_a3a4
$A39A LDA $0102,X
$A39D STA $49
$A39F LDA $0103,X
$A3A2 STA $4A
Loc_a3a4 CMP $0103,X
$A3A7 BNE Loc_a3b0
$A3A9 LDA $49
$A3AB CMP $0102,X
$A3AE BEQ Loc_a3b7
Loc_a3b0 TXA
$A3B1 CLC
$A3B2 ADC #$12
$A3B4 TAX
$A3B5 BNE Loc_a38f
Loc_a3b7 RTS

Funct_a3b8 JSR Funct_a408
$A3BB STA $31
$A3BD STY $32
Funct_a3bf SEC
$A3C0 LDA $5A
$A3C2 SBC BASIC_CurrentLineData
$A3C4 STA StringPtr?_0x22
$A3C6 TAY
$A3C7 LDA $5B
$A3C9 SBC BASIC_CurrentLineData+1
$A3CB TAX
$A3CC INX
$A3CD TYA
$A3CE BEQ Loc_a3f3
$A3D0 LDA $5A
$A3D2 SEC
$A3D3 SBC StringPtr?_0x22
$A3D5 STA $5A
$A3D7 BCS Loc_a3dc
$A3D9 DEC $5B
$A3DB SEC
Loc_a3dc LDA $58
$A3DE SBC StringPtr?_0x22
$A3E0 STA $58
$A3E2 BCS Loc_a3ec
$A3E4 DEC $59
$A3E6 BCC Loc_a3ec
Loc_a3e8 LDA ($5A),Y
$A3EA STA ($58),Y
Loc_a3ec DEY
$A3ED BNE Loc_a3e8
$A3EF LDA ($5A),Y
$A3F1 STA ($58),Y
Loc_a3f3 DEC $5B
$A3F5 DEC $59
$A3F7 DEX
$A3F8 BNE Loc_a3ec
$A3FA RTS

Funct_a3fb ASL
$A3FC ADC #$3e
$A3FE BCS Loc_a435
$A400 STA StringPtr?_0x22
$A402 TSX
$A403 CPX StringPtr?_0x22
$A405 BCC Loc_a435
$A407 RTS

Funct_a408 CPY $34
$A40A BCC Exit_a434
$A40C BNE Loc_a412
$A40E CMP $33
$A410 BCC Exit_a434
Loc_a412 PHA
$A413 LDX #$9
$A415 TYA
Loc_a416 PHA
$A417 LDA $57,X
$A419 DEX
$A41A BPL Loc_a416
$A41C JSR Funct_b526
$A41F LDX #$f7
Loc_a421 PLA
$A422 STA $61,X
$A424 INX
$A425 BMI Loc_a421
$A427 PLA
$A428 TAY
$A429 PLA
$A42A CPY $34
$A42C BCC Exit_a434
$A42E BNE Loc_a435
$A430 CMP $33
$A432 BCS Loc_a435
Exit_a434 RTS

Loc_a435 LDX #$10
Loc_a437 JMP (BASIC_ErrorVector)

Basic_DisplayError TXA
$A43B ASL
$A43C TAX
$A43D LDA $A324+2,X
$A440 STA StringPtr?_0x22
$A442 LDA $A324+3,X
$A445 STA StringPtr?_0x22+1
$A447 JSR CallRestoreIOVct
$A44A LDA #$0
$A44C STA $13
$A44E JSR BASIC_PrintCRLF_aad7
$A451 JSR Funct_ab45
$A454 LDY #$0
Loc_a456 LDA (StringPtr?_0x22),Y
$A458 PHA
$A459 AND #$7f
$A45B JSR BASIC_OutChar_ab47
$A45E INY
$A45F PLA
$A460 BPL Loc_a456
$A462 JSR Funct_a67a
$A465 LDA #<ErrorText
$A467 LDY #>ErrorText
Loc_a469 JSR PrintStingYA_ab1e
$A46C LDY $3A
$A46E INY
$A46F BEQ Loc_a474
$A471 JSR Funct_bdc2
Loc_a474 LDA #<ReadyText
$A476 LDY #>ReadyText
$A478 JSR PrintStingYA_ab1e
$A47B LDA #$80
$A47D JSR Funct_ff90
Loc_a480 JMP (BasicVector1)
$A483 JSR BASIC_GetCMDLine?
$A486 STX BASIC_CMDPtrMinus1
$A488 STY BASIC_CMDPtrMinus1+1
$A48A JSR BASIC_GetNextCMDLineChar
$A48D TAX
$A48E BEQ Loc_a480
$A490 LDX #$ff
$A492 STX $3A
$A494 BCC Loc_a49c
$A496 JSR Funct_a579CallTokenise
$A499 JMP Loc_a7e1
Loc_a49c JSR BASIC_GetRawInt
$A49F JSR Funct_a579CallTokenise
$A4A2 STY BASIC_CurrentToken
$A4A4 JSR BASIC_FindLineNumber
$A4A7 BCC Loc_a4ed
$A4A9 LDY #$1
$A4AB LDA (BASIC_CurrentLineData),Y
$A4AD STA StringPtr?_0x22+1
$A4AF LDA LoadAddressLo
$A4B1 STA StringPtr?_0x22
$A4B3 LDA BASIC_CurrentLineData+1
$A4B5 STA $25
$A4B7 LDA BASIC_CurrentLineData
$A4B9 DEY
$A4BA SBC (BASIC_CurrentLineData),Y
$A4BC CLC
$A4BD ADC LoadAddressLo
$A4BF STA LoadAddressLo
$A4C1 STA $24
$A4C3 LDA LoadAddressHi
$A4C5 ADC #$ff
$A4C7 STA LoadAddressHi
$A4C9 SBC BASIC_CurrentLineData+1
$A4CB TAX
$A4CC SEC
$A4CD LDA BASIC_CurrentLineData
$A4CF SBC LoadAddressLo
$A4D1 TAY
$A4D2 BCS Loc_a4d7
$A4D4 INX
$A4D5 DEC $25
Loc_a4d7 CLC
$A4D8 ADC StringPtr?_0x22
$A4DA BCC Loc_a4df
$A4DC DEC StringPtr?_0x22+1
$A4DE CLC
Loc_a4df LDA (StringPtr?_0x22),Y
$A4E1 STA ($24),Y
$A4E3 INY
$A4E4 BNE Loc_a4df
$A4E6 INC StringPtr?_0x22+1
$A4E8 INC $25
$A4EA DEX
$A4EB BNE Loc_a4df
Loc_a4ed JSR Loc_a659
$A4F0 JSR Funct_a533
$A4F3 LDA BASIC_CMDLineBuffer
$A4F6 BEQ Loc_a480
$A4F8 CLC
$A4F9 LDA LoadAddressLo
$A4FB STA $5A
$A4FD ADC BASIC_CurrentToken
$A4FF STA $58
$A501 LDY LoadAddressHi
$A503 STY $5B
$A505 BCC Loc_a508
$A507 INY
Loc_a508 STY $59
$A50A JSR Funct_a3b8
$A50D LDA BASIC_CurrentInt
$A50F LDY BASIC_CurrentInt+1
$A511 STA $01FE
$A514 STY $01FF
$A517 LDA $31
$A519 LDY $32
$A51B STA LoadAddressLo
$A51D STY LoadAddressHi
$A51F LDY BASIC_CurrentToken
$A521 DEY
Loc_a522 LDA $01FC,Y
$A525 STA (BASIC_CurrentLineData),Y
$A527 DEY
$A528 BPL Loc_a522
Loc_a52a JSR Loc_a659
$A52D JSR Funct_a533
$A530 JMP Loc_a480

Funct_a533 LDA BasicCodeStartAddress
$A535 LDY BasicCodeStartAddress+1
$A537 STA StringPtr?_0x22
$A539 STY StringPtr?_0x22+1
$A53B CLC
Loc_a53c LDY #$1
$A53E LDA (StringPtr?_0x22),Y
$A540 BEQ Loc_a55f
$A542 LDY #$4
Loc_a544 INY
$A545 LDA (StringPtr?_0x22),Y
$A547 BNE Loc_a544
$A549 INY
$A54A TYA
$A54B ADC StringPtr?_0x22
$A54D TAX
$A54E LDY #$0
$A550 STA (StringPtr?_0x22),Y
$A552 LDA StringPtr?_0x22+1
$A554 ADC #$0
$A556 INY
$A557 STA (StringPtr?_0x22),Y
$A559 STX StringPtr?_0x22
$A55B STA StringPtr?_0x22+1
$A55D BCC Loc_a53c
Loc_a55f RTS

; returns : Y,X contains address of Command -1

BASIC_GetCMDLine? LDX #$0
Loc_a562 JSR BASIC_ReadCmdLine?
$A565 CMP #$d
$A567 BEQ Loc_a576
$A569 STA BASIC_CMDLineBuffer,X
$A56C INX
$A56D CPX #$59
$A56F BCC Loc_a562
$A571 LDX #$17
$A573 JMP Loc_a437
Loc_a576 JMP BASIC_FinishCmdLine
Funct_a579CallTokenise JMP (BASIC_TokeniseCMDVec)

BASIC_TokeniseCmdLine LDX BASIC_CMDPtrMinus1
$A57E LDY #$4
$A580 STY $0F
Loc_a582 LDA BASIC_CMDLineBuffer,X
$A585 BPL Loc_a58e
$A587 CMP #$ff
$A589 BEQ Loc_a5c9
$A58B INX
$A58C BNE Loc_a582
Loc_a58e CMP #$20
$A590 BEQ Loc_a5c9
$A592 STA $08
$A594 CMP #$22
$A596 BEQ Loc_a5ee
$A598 BIT $0F
$A59A BVS Loc_a5c9
$A59C CMP #$3f
$A59E BNE Loc_a5a4
$A5A0 LDA #$99
$A5A2 BNE Loc_a5c9
Loc_a5a4 CMP #$30
$A5A6 BCC Loc_a5ac
$A5A8 CMP #$3c
$A5AA BCC Loc_a5c9
Loc_a5ac STY $71
$A5AE LDY #$0
$A5B0 STY BASIC_CurrentToken
$A5B2 DEY
$A5B3 STX BASIC_CMDPtrMinus1
$A5B5 DEX

; Compare command with keyword

Loc_a5b6 INY
$A5B7 INX
BASIC_CmpKeywordLoop LDA BASIC_CMDLineBuffer,X
$A5BB SEC
$A5BC SBC BASIC_Keywords,Y
$A5BF BEQ Loc_a5b6

; Has end of command been found?

$A5C1 CMP #$80
$A5C3 BNE Loc_a5f5

; Token has been found. Or $80 to the token Value

$A5C5 ORA
BASIC_CurrentToken
Loc_a5c7 LDY $71
Loc_a5c9 INX
$A5CA INY
$A5CB STA $01FB,Y
$A5CE LDA $01FB,Y
$A5D1 BEQ Loc_a609
$A5D3 SEC
$A5D4 SBC #$3a
$A5D6 BEQ Loc_a5dc
$A5D8 CMP #$49
$A5DA BNE Loc_a5de
Loc_a5dc STA $0F
Loc_a5de SEC
$A5DF SBC #$55
$A5E1 BNE Loc_a582
$A5E3 STA $08
Loc_a5e5 LDA BASIC_CMDLineBuffer,X
$A5E8 BEQ Loc_a5c9
$A5EA CMP $08
$A5EC BEQ Loc_a5c9
Loc_a5ee INY
$A5EF STA $01FB,Y
$A5F2 INX
$A5F3 BNE Loc_a5e5
Loc_a5f5 LDX BASIC_CMDPtrMinus1
$A5F7 INC BASIC_CurrentToken
BASIC_MoveToNextKeyword INY
$A5FA LDA $A09D,Y ; Keyword list -1
$A5FD BPL BASIC_MoveToNextKeyword
$A5FF LDA BASIC_Keywords,Y
$A602 BNE BASIC_CmpKeywordLoop
$A604 LDA BASIC_CMDLineBuffer,X
$A607 BPL Loc_a5c7
Loc_a609 STA $01FD,Y
$A60C DEC BASIC_CMDPtrMinus1+1
$A60E LDA #$ff
$A610 STA BASIC_CMDPtrMinus1
$A612 RTS

BASIC_FindLineNumber LDA BasicCodeStartAddress
$A615 LDX BasicCodeStartAddress+1
BASIC_FindLineNumberP2 LDY #$1
$A619 STA BASIC_CurrentLineData
$A61B STX BASIC_CurrentLineData+1
$A61D LDA (BASIC_CurrentLineData),Y
$A61F BEQ Exit_a640
$A621 INY
$A622 INY
$A623 LDA BASIC_CurrentInt+1
$A625 CMP (BASIC_CurrentLineData),Y
$A627 BCC Exit_a641
$A629 BEQ Loc_a62e
$A62B DEY
$A62C BNE Loc_a637
Loc_a62e LDA BASIC_CurrentInt
$A630 DEY
$A631 CMP (BASIC_CurrentLineData),Y
$A633 BCC Exit_a641
$A635 BEQ Exit_a641
Loc_a637 DEY
$A638 LDA (BASIC_CurrentLineData),Y
$A63A TAX
$A63B DEY
$A63C LDA (BASIC_CurrentLineData),Y
$A63E BCS BASIC_FindLineNumberP2
Exit_a640 CLC
Exit_a641 RTS


; *************************************************
; Function : BASIC_Exec_NEW
;
; Parameters
;
;
; Return Value :
;
; *************************************************

BASIC_Exec_NEW BNE
Exit_a641
Loc_a644 LDA #$0
$A646 TAY
$A647 STA (BasicCodeStartAddress),Y
$A649 INY
$A64A STA (BasicCodeStartAddress),Y
$A64C LDA BasicCodeStartAddress
$A64E CLC
$A64F ADC #$2
$A651 STA LoadAddressLo
$A653 LDA BasicCodeStartAddress+1
$A655 ADC #$0
$A657 STA LoadAddressHi
Loc_a659 JSR Funct_a68e
$A65C LDA #$0
$A65E BNE Loc_a68d
Funct_a660 JSR Funct_ffe7
Loc_a663 LDA $37
$A665 LDY $38
$A667 STA $33
$A669 STY $34
$A66B LDA LoadAddressLo
$A66D LDY LoadAddressHi
$A66F STA ExecuteAddressLo
$A671 STY ExecuteAddressHi
$A673 STA $31
$A675 STY $32
Loc_a677 JSR Funct_a81d
Funct_a67a LDX #$19
$A67C STX $16
$A67E PLA
$A67F TAY
$A680 PLA
$A681 LDX #$fa
$A683 TXS
$A684 PHA
$A685 TYA
$A686 PHA
$A687 LDA #$0
$A689 STA $3E
$A68B STA $10
Loc_a68d RTS

Funct_a68e CLC
$A68F LDA BasicCodeStartAddress
$A691 ADC #$ff
$A693 STA BASIC_CMDPtrMinus1
$A695 LDA BasicCodeStartAddress+1
$A697 ADC #$ff
$A699 STA BASIC_CMDPtrMinus1+1
$A69B RTS

$A69C BCC Loc_a6a4
$A69E BEQ Loc_a6a4
$A6A0 CMP #$ab ; Is command LIST- ?
$A6A2 BNE Loc_a68d
Loc_a6a4 JSR BASIC_GetRawInt
$A6A7 JSR BASIC_FindLineNumber
$A6AA JSR BASIC_GetCrntCMDLineChar
$A6AD BEQ Loc_a6bb
$A6AF CMP #$ab
$A6B1 BNE Exit_a641
$A6B3 JSR BASIC_GetNextCMDLineChar
$A6B6 JSR BASIC_GetRawInt
$A6B9 BNE Exit_a641
Loc_a6bb PLA
$A6BC PLA
$A6BD LDA BASIC_CurrentInt
$A6BF ORA BASIC_CurrentInt+1
$A6C1 BNE Loc_a6c9
$A6C3 LDA #$ff
$A6C5 STA BASIC_CurrentInt
$A6C7 STA BASIC_CurrentInt+1
Loc_a6c9 LDY #$1
$A6CB STY $0F
$A6CD LDA (BASIC_CurrentLineData),Y
$A6CF BEQ BASIC_ListFinished
$A6D1 JSR BASIC_TestBreak?_a82c
$A6D4 JSR BASIC_PrintCRLF_aad7
$A6D7 INY
$A6D8 LDA (BASIC_CurrentLineData),Y
$A6DA TAX
$A6DB INY
$A6DC LDA (BASIC_CurrentLineData),Y
$A6DE CMP BASIC_CurrentInt+1
$A6E0 BNE Loc_a6e6
$A6E2 CPX BASIC_CurrentInt
$A6E4 BEQ Loc_a6e8
Loc_a6e6 BCS BASIC_ListFinished
Loc_a6e8 STY $49
$A6EA JSR BASIC_PrintInt ; Print line number
$A6ED LDA #$20
BASIC_ListContinue_a6ef LDY $49
$A6F1 AND #$7f
BASIC_ListContinue_a6f3 JSR BASIC_OutChar_ab47 ; Print space
$A6F6 CMP #$22
$A6F8 BNE Loc_a700
$A6FA LDA $0F
$A6FC EOR #$ff
$A6FE STA $0F
Loc_a700 INY
$A701 BEQ BASIC_ListFinished
$A703 LDA (BASIC_CurrentLineData),Y
$A705 BNE Loc_a717
$A707 TAY
$A708 LDA (BASIC_CurrentLineData),Y
$A70A TAX
$A70B INY
$A70C LDA (BASIC_CurrentLineData),Y
$A70E STX BASIC_CurrentLineData
$A710 STA BASIC_CurrentLineData+1
$A712 BNE Loc_a6c9

BASIC_ListFinished JMP Loc_e386
Loc_a717 JMP (BASIC_OutputKeywordVec)

BASIC_OutputKeyword BPL BASIC_ListContinue_a6f3
$A71C CMP #$ff
$A71E BEQ BASIC_ListContinue_a6f3
$A720 BIT $0F
$A722 BMI BASIC_ListContinue_a6f3
$A724 SEC
$A725 SBC #$7f
$A727 TAX
$A728 STY $49 ; Save offset in Line Data
$A72A LDY #$ff
Loc_a72c DEX
$A72D BEQ Loc_a737
Loc_a72f INY
$A730 LDA BASIC_Keywords,Y
$A733 BPL Loc_a72f
$A735 BMI Loc_a72c
Loc_a737 INY
$A738 LDA BASIC_Keywords,Y
$A73B BMI BASIC_ListContinue_a6ef
$A73D JSR BASIC_OutChar_ab47
$A740 BNE Loc_a737

BASIC_Exec_FOR LDA #$80
$A744 STA $10
$A746 JSR BASIC_Exec_LET
$A749 JSR Funct_a38a
$A74C BNE Loc_a753
$A74E TXA
$A74F ADC #$f
$A751 TAX
$A752 TXS
Loc_a753 PLA
$A754 PLA
$A755 LDA #$9
$A757 JSR Funct_a3fb
$A75A JSR Funct_a906
$A75D CLC
$A75E TYA
$A75F ADC BASIC_CMDPtrMinus1
$A761 PHA
$A762 LDA BASIC_CMDPtrMinus1+1
$A764 ADC #$0
$A766 PHA
Loc_a767 LDA $3A
$A769 PHA
$A76A LDA $39
$A76C PHA
$A76D LDA #$a4
$A76F JSR Funct_aeff
$A772 JSR Funct_ad8d
$A775 JSR Funct_ad8a
$A778 LDA $66
$A77A ORA #$7f
$A77C AND $62
$A77E STA $62
$A780 LDA #$8b
$A782 LDY #$a7
$A784 STA StringPtr?_0x22
$A786 STY StringPtr?_0x22+1
$A788 JMP Loc_ae43

$A78B LDA #$bc
$A78D LDY #$b9
$A78F JSR Funct_bba2
$A792 JSR BASIC_GetCrntCMDLineChar
$A795 CMP #$a9
$A797 BNE Loc_a79f
$A799 JSR BASIC_GetNextCMDLineChar
$A79C JSR Funct_ad8a
Loc_a79f JSR Funct_bc2b
$A7A2 JSR Funct_ae38
$A7A5 LDA $4A
$A7A7 PHA
$A7A8 LDA $49
$A7AA PHA
$A7AB LDA #$81
$A7AD PHA
Loc_a7ae JSR BASIC_TestBreak?_a82c
$A7B1 LDA BASIC_CMDPtrMinus1
$A7B3 LDY BASIC_CMDPtrMinus1+1
$A7B5 CPY #$2
$A7B7 NOP
$A7B8 BEQ Loc_a7be
$A7BA STA $3D
$A7BC STY $3E
Loc_a7be LDY #$0
$A7C0 LDA (BASIC_CMDPtrMinus1),Y
$A7C2 BNE Loc_a807
$A7C4 LDY #$2
$A7C6 LDA (BASIC_CMDPtrMinus1),Y
$A7C8 CLC
$A7C9 BNE Loc_a7ce
$A7CB JMP Loc_a84b
Loc_a7ce INY
$A7CF LDA (BASIC_CMDPtrMinus1),Y
$A7D1 STA $39
$A7D3 INY
$A7D4 LDA (BASIC_CMDPtrMinus1),Y
$A7D6 STA $3A
$A7D8 TYA
$A7D9 ADC BASIC_CMDPtrMinus1
$A7DB STA BASIC_CMDPtrMinus1
$A7DD BCC Loc_a7e1
$A7DF INC BASIC_CMDPtrMinus1+1
Loc_a7e1 JMP ($0308)

BASIC_ExecuteCommand JSR BASIC_GetNextCMDLineChar
$A7E7 JSR Funct_a7ed
$A7EA JMP Loc_a7ae

Funct_a7ed BEQ Exit_a82b
Loc_a7ef SBC #$80
$A7F1 BCC Loc_a804
$A7F3 CMP #$23
$A7F5 BCS Loc_a80e

; Lookup address for handling token
; Addresses are -1

$A7F7 ASL
$A7F8 TAY
$A7F9 LDA $A00C+1,Y
$A7FC PHA
$A7FD LDA $A00C,Y
$A800 PHA
$A801 JMP BASIC_GetNextCMDLineChar

Loc_a804 JMP BASIC_Exec_LET
Loc_a807 CMP #$3a
$A809 BEQ Loc_a7e1
Loc_a80b JMP Loc_af08
Loc_a80e CMP #$4b
$A810 BNE Loc_a80b
$A812 JSR BASIC_GetNextCMDLineChar
$A815 LDA #$a4
$A817 JSR Funct_aeff
$A81A JMP BASIC_Exec_GOTO

Funct_a81d SEC
$A81E LDA BasicCodeStartAddress
$A820 SBC #$1
$A822 LDY BasicCodeStartAddress+1
$A824 BCS Loc_a827
$A826 DEY
Loc_a827 STA $41
$A829 STY $42
Exit_a82b RTS

BASIC_TestBreak?_a82c JSR CallTestStopVector
$A82F BCS Loc_a832
BASIC_Exec_END CLC
Loc_a832 BNE Exit_a870
$A834 LDA BASIC_CMDPtrMinus1
$A836 LDY BASIC_CMDPtrMinus1+1
$A838 LDX $3A
$A83A INX
$A83B BEQ Loc_a849
$A83D STA $3D
$A83F STY $3E
$A841 LDA $39
$A843 LDY $3A
$A845 STA $3B
$A847 STY $3C
Loc_a849 PLA
$A84A PLA
Loc_a84b LDA #$81 ; Break text
$A84D LDY #$a3
$A84F BCC Loc_a854
$A851 JMP Loc_a469
Loc_a854 JMP Loc_e386
$A857 BNE Exit_a870
$A859 LDX #$1a
$A85B LDY $3E
$A85D BNE Loc_a862
$A85F JMP Loc_a437
Loc_a862 LDA $3D
$A864 STA BASIC_CMDPtrMinus1
$A866 STY BASIC_CMDPtrMinus1+1
$A868 LDA $3B
$A86A LDY $3C
$A86C STA $39
$A86E STY $3A
Exit_a870 RTS

BASIC_Exec_RUN PHP
$A872 LDA #$0
$A874 JSR Funct_ff90
$A877 PLP
$A878 BNE Loc_a87d
$A87A JMP Loc_a659
Loc_a87d JSR Funct_a660
$A880 JMP Loc_a897
$A883 LDA #$3
$A885 JSR Funct_a3fb
$A888 LDA BASIC_CMDPtrMinus1+1
$A88A PHA
$A88B LDA BASIC_CMDPtrMinus1
$A88D PHA
$A88E LDA $3A
$A890 PHA
$A891 LDA $39
$A893 PHA
$A894 LDA #$8d
$A896 PHA
Loc_a897 JSR BASIC_GetCrntCMDLineChar
$A89A JSR BASIC_Exec_GOTO
$A89D JMP Loc_a7ae
BASIC_Exec_GOTO JSR BASIC_GetRawInt
$A8A3 JSR Funct_a909
$A8A6 SEC
$A8A7 LDA $39
$A8A9 SBC BASIC_CurrentInt
$A8AB LDA $3A
$A8AD SBC BASIC_CurrentInt+1
$A8AF BCS Loc_a8bc
$A8B1 TYA
$A8B2 SEC
$A8B3 ADC BASIC_CMDPtrMinus1
$A8B5 LDX BASIC_CMDPtrMinus1+1
$A8B7 BCC Loc_a8c0
$A8B9 INX
$A8BA BCS Loc_a8c0
Loc_a8bc LDA BasicCodeStartAddress
$A8BE LDX BasicCodeStartAddress+1
Loc_a8c0 JSR BASIC_FindLineNumberP2
$A8C3 BCC Loc_a8e3
$A8C5 LDA BASIC_CurrentLineData
$A8C7 SBC #$1
$A8C9 STA BASIC_CMDPtrMinus1
$A8CB LDA BASIC_CurrentLineData+1
$A8CD SBC #$0
$A8CF STA BASIC_CMDPtrMinus1+1
Exit_a8d1 RTS

$A8D2 .DB $d0
$A8D3 .DB $fd
$A8D4 .DB $a9
$A8D5 .DB $ff
$A8D6 .DB $85
$A8D7 .DB $4a
$A8D8 JSR Funct_a38a
$A8DB TXS
$A8DC CMP #$8d
$A8DE BEQ Loc_a8eb
$A8E0 LDX #$c
$A8E2 BIT $11A2
$A8E5 JMP Loc_a437
Loc_a8e8 JMP Loc_af08
Loc_a8eb PLA
$A8EC PLA
$A8ED STA $39
$A8EF PLA
$A8F0 STA $3A
$A8F2 PLA
$A8F3 STA BASIC_CMDPtrMinus1
$A8F5 PLA
$A8F6 STA BASIC_CMDPtrMinus1+1
BASIC_Exec_DATA JSR Funct_a906
BASIC_CMDFinish TYA
$A8FC CLC
$A8FD ADC BASIC_CMDPtrMinus1
$A8FF STA BASIC_CMDPtrMinus1
$A901 BCC Exit_a905
$A903 INC BASIC_CMDPtrMinus1+1
Exit_a905 RTS

Funct_a906 LDX #$3a
$A908 BIT $00A2
$A90B STX $07
$A90D LDY #$0
$A90F STY $08
Loc_a911 LDA $08
$A913 LDX $07
$A915 STA $07
$A917 STX $08
Loc_a919 LDA (BASIC_CMDPtrMinus1),Y
$A91B BEQ Exit_a905
$A91D CMP $08
$A91F BEQ Exit_a905
$A921 INY
$A922 CMP #$22 ; Is character a double quote?
$A924 BNE Loc_a919
$A926 BEQ Loc_a911

$A928 JSR Funct_ad9e
$A92B JSR BASIC_GetCrntCMDLineChar
$A92E CMP #$89
$A930 BEQ Loc_a937
$A932 LDA #$a7
$A934 JSR Funct_aeff
Loc_a937 LDA $61
$A939 BNE Loc_a940

; *************************************************
; Function : BASIC_Exec_REM
;
; Parameters
;
;
; Return Value :
;
; *************************************************

BASIC_Exec_REM JSR
Funct_a909
$A93E BEQ BASIC_CMDFinish
Loc_a940 JSR BASIC_GetCrntCMDLineChar
$A943 BCS Loc_a948
$A945 JMP BASIC_Exec_GOTO
Loc_a948 JMP Funct_a7ed
$A94B JSR Loc_b79e
$A94E PHA
$A94F CMP #$8d
$A951 BEQ Loc_a957
Loc_a953 CMP #$89
$A955 BNE Loc_a8e8
Loc_a957 DEC $65
$A959 BNE Loc_a95f
$A95B PLA
$A95C JMP Loc_a7ef
Loc_a95f JSR BASIC_GetNextCMDLineChar
$A962 JSR BASIC_GetRawInt
$A965 CMP #$2c
$A967 BEQ Loc_a957
$A969 PLA
Exit_a96a RTS

BASIC_GetRawInt LDX #$0
$A96D STX BASIC_CurrentInt
$A96F STX BASIC_CurrentInt+1
Loc_a971 BCS Exit_a96a
$A973 SBC #$2f
$A975 STA $07
$A977 LDA BASIC_CurrentInt+1
$A979 STA StringPtr?_0x22
$A97B CMP #$19
$A97D BCS Loc_a953
$A97F LDA BASIC_CurrentInt
$A981 ASL
$A982 ROL StringPtr?_0x22
$A984 ASL
$A985 ROL StringPtr?_0x22
$A987 ADC BASIC_CurrentInt
$A989 STA BASIC_CurrentInt
$A98B LDA StringPtr?_0x22
$A98D ADC BASIC_CurrentInt+1
$A98F STA BASIC_CurrentInt+1
$A991 ASL BASIC_CurrentInt
$A993 ROL BASIC_CurrentInt+1
$A995 LDA BASIC_CurrentInt
$A997 ADC $07
$A999 STA BASIC_CurrentInt
$A99B BCC Loc_a99f
$A99D INC BASIC_CurrentInt+1
Loc_a99f JSR BASIC_GetNextCMDLineChar
$A9A2 JMP Loc_a971
BASIC_Exec_LET JSR Funct_b08b
$A9A8 STA $49
$A9AA STY $4A
$A9AC LDA #$b2
$A9AE JSR Funct_aeff
$A9B1 LDA $0E
$A9B3 PHA
$A9B4 LDA $0D
$A9B6 PHA
$A9B7 JSR Funct_ad9e
$A9BA PLA
$A9BB ROL
$A9BC JSR Funct_ad90
$A9BF BNE Loc_a9d9
$A9C1 PLA
Funct_a9c2 BPL Loc_a9d6
$A9C4 JSR Funct_bc1b
$A9C7 JSR Funct_b1bf
$A9CA LDY #$0
$A9CC LDA $64
$A9CE STA ($49),Y
$A9D0 INY
$A9D1 LDA $65
$A9D3 STA ($49),Y
$A9D5 RTS

Loc_a9d6 JMP Loc_bbd0
Loc_a9d9 PLA
Funct_a9da LDY $4A
$A9DC CPY #$bf
$A9DE BNE Loc_aa2c
$A9E0 JSR Funct_b6a6
$A9E3 CMP #$6
$A9E5 BNE Loc_aa24
$A9E7 LDY #$0
$A9E9 STY $61
$A9EB STY $66
Loc_a9ed STY $71
$A9EF JSR Funct_aa1d
$A9F2 JSR Funct_bae2
$A9F5 INC $71
$A9F7 LDY $71
$A9F9 JSR Funct_aa1d
$A9FC JSR Funct_bc0c
$A9FF TAX
$AA00 BEQ Loc_aa07
$AA02 INX
$AA03 TXA
$AA04 JSR Funct_baed
Loc_aa07 LDY $71
$AA09 INY
$AA0A CPY #$6
$AA0C BNE Loc_a9ed
$AA0E JSR Funct_bae2
$AA11 JSR BASIC_ReadInt?_bc9b
$AA14 LDX $64
$AA16 LDY $63
$AA18 LDA $65
$AA1A JMP Loc_ffdb
Funct_aa1d LDA (StringPtr?_0x22),Y
$AA1F JSR Funct_80
$AA22 BCC Loc_aa27
Loc_aa24 JMP Loc_b248
Loc_aa27 SBC #$2f
$AA29 JMP Loc_bd7e
Loc_aa2c LDY #$2
$AA2E LDA ($64),Y
$AA30 CMP $34
$AA32 BCC Loc_aa4b
$AA34 BNE Loc_aa3d
$AA36 DEY
$AA37 LDA ($64),Y
$AA39 CMP $33
$AA3B BCC Loc_aa4b
Loc_aa3d LDY $65
$AA3F CPY LoadAddressHi
$AA41 BCC Loc_aa4b
$AA43 BNE Loc_aa52
$AA45 LDA $64
$AA47 CMP LoadAddressLo
$AA49 BCS Loc_aa52
Loc_aa4b LDA $64
$AA4D LDY $65
$AA4F JMP Loc_aa68
Loc_aa52 LDY #$0
$AA54 LDA ($64),Y
$AA56 JSR Funct_b475
$AA59 LDA $50
$AA5B LDY $51
$AA5D STA $6F
$AA5F STY $70
$AA61 JSR Funct_b67a
$AA64 LDA #$61
$AA66 LDY #$0
Loc_aa68 STA $50
$AA6A STY $51
$AA6C JSR Funct_b6db
$AA6F LDY #$0
$AA71 LDA ($50),Y
$AA73 STA ($49),Y
$AA75 INY
$AA76 LDA ($50),Y
$AA78 STA ($49),Y
$AA7A INY
$AA7B LDA ($50),Y
$AA7D STA ($49),Y
$AA7F RTS

$AA80 JSR Funct_aa86
$AA83 JMP Loc_abb5
Funct_aa86 JSR Loc_b79e
$AA89 BEQ Loc_aa90
$AA8B LDA #$2c
$AA8D JSR Funct_aeff
Loc_aa90 PHP
$AA91 STX $13
$AA93 JSR Funct_e118
$AA96 PLP
$AA97 JMP Loc_aaa0
Loc_aa9a JSR Funct_ab21
Loc_aa9d JSR BASIC_GetCrntCMDLineChar
Loc_aaa0 BEQ BASIC_PrintCRLF_aad7
Loc_aaa2 BEQ Exit_aae7
$AAA4 CMP #$a3
$AAA6 BEQ Loc_aaf8
$AAA8 CMP #$a6
$AAAA CLC
$AAAB BEQ Loc_aaf8
$AAAD CMP #$2c
$AAAF BEQ Loc_aae8
$AAB1 CMP #$3b
$AAB3 BEQ Loc_ab13
$AAB5 JSR Funct_ad9e
$AAB8 BIT $0D
$AABA BMI Loc_aa9a
$AABC JSR Funct_bddd
$AABF JSR Funct_b487
$AAC2 JSR Funct_ab21
$AAC5 JSR Funct_ab3b
$AAC8 BNE Loc_aa9d
BASIC_FinishCmdLine LDA #$0
$AACC STA BASIC_CMDLineBuffer,X ; Zero terminate command string
$AACF LDX #$ff
$AAD1 LDY #$1
$AAD3 LDA $13
$AAD5 BNE Exit_aae7
BASIC_PrintCRLF_aad7 LDA #$d ; Print out CR
$AAD9 JSR BASIC_OutChar_ab47
$AADC BIT $13
$AADE BPL Funct_aae5
$AAE0 LDA #$a ; Print out LF
$AAE2 JSR BASIC_OutChar_ab47
Funct_aae5 EOR #$ff
Exit_aae7 RTS

Loc_aae8 SEC
$AAE9 JSR Funct_fff0
$AAEC TYA
$AAED SEC
Loc_aaee SBC #$a
$AAF0 BCS Loc_aaee
$AAF2 EOR #$ff
$AAF4 ADC #$1
$AAF6 BNE Loc_ab0e
Loc_aaf8 PHP
$AAF9 SEC
$AAFA JSR Funct_fff0
$AAFD STY $09
$AAFF JSR Funct_b79b
$AB02 CMP #$29
$AB04 BNE Loc_ab5f
$AB06 PLP
$AB07 BCC Loc_ab0f
$AB09 TXA
$AB0A SBC $09
$AB0C BCC Loc_ab13
Loc_ab0e TAX
Loc_ab0f INX
Loc_ab10 DEX
$AB11 BNE Loc_ab19
Loc_ab13 JSR BASIC_GetNextCMDLineChar
$AB16 JMP Loc_aaa2
Loc_ab19 JSR Funct_ab3b
$AB1C BNE Loc_ab10
PrintStingYA_ab1e JSR Funct_b487
Funct_ab21 JSR Funct_b6a6
$AB24 TAX
$AB25 LDY #$0
$AB27 INX
Loc_ab28 DEX
$AB29 BEQ Exit_aae7
$AB2B LDA (StringPtr?_0x22),Y
$AB2D JSR BASIC_OutChar_ab47
$AB30 INY
$AB31 CMP #$d
$AB33 BNE Loc_ab28
$AB35 JSR Funct_aae5
$AB38 JMP Loc_ab28
Funct_ab3b LDA $13
$AB3D BEQ Loc_ab42
$AB3F LDA #$20
$AB41 BIT $1DA9
$AB44 BIT $3FA9
BASIC_OutChar_ab47 JSR BASIC_OurChar_e10c
$AB4A AND #$ff
$AB4C RTS

Loc_ab4d LDA $11
$AB4F BEQ Loc_ab62
$AB51 BMI Loc_ab57
$AB53 LDY #$ff
$AB55 BNE Loc_ab5b
Loc_ab57 LDA $3F
$AB59 LDY $40
Loc_ab5b STA $39
$AB5D STY $3A
Loc_ab5f JMP Loc_af08
Loc_ab62 LDA $13
$AB64 BEQ Loc_ab6b
$AB66 LDX #$18
$AB68 JMP Loc_a437
Loc_ab6b LDA #<Text_RedoFromStart
$AB6D LDY #>Text_RedoFromStart
$AB6F JSR PrintStingYA_ab1e
$AB72 LDA $3D
$AB74 LDY $3E
$AB76 STA BASIC_CMDPtrMinus1
$AB78 STY BASIC_CMDPtrMinus1+1
$AB7A RTS

$AB7B JSR Funct_b3a6
$AB7E CMP #$23
$AB80 BNE Loc_ab92
$AB82 JSR BASIC_GetNextCMDLineChar
$AB85 JSR Loc_b79e
$AB88 LDA #$2c
$AB8A JSR Funct_aeff
$AB8D STX $13
$AB8F JSR Funct_e11e
Loc_ab92 LDX #$1
$AB94 LDY #$2
$AB96 LDA #$0
$AB98 STA $0201
$AB9B LDA #$40
$AB9D JSR Funct_ac0f
$ABA0 LDX $13
$ABA2 BNE Loc_abb7
$ABA4 RTS

BASIC_Exec_INPUTHASH JSR Loc_b79e
$ABA8 LDA #$2c
$ABAA JSR Funct_aeff
$ABAD STX $13
$ABAF JSR Funct_e11e
$ABB2 JSR Funct_abce
Loc_abb5 LDA $13
Loc_abb7 JSR CallRestoreIOVct
$ABBA LDX #$0
$ABBC STX $13
$ABBE RTS

BASIC_Exec_INPUT CMP #$22
$ABC1 BNE Funct_abce
$ABC3 JSR Funct_aebd
$ABC6 LDA #$3b
$ABC8 JSR Funct_aeff
$ABCB JSR Funct_ab21
Funct_abce JSR Funct_b3a6
$ABD1 LDA #$2c
$ABD3 STA $01FF
Loc_abd6 JSR Funct_abf9
$ABD9 LDA $13
$ABDB BEQ Loc_abea
$ABDD JSR Funct_ffb7
$ABE0 AND #$2
$ABE2 BEQ Loc_abea
$ABE4 JSR Loc_abb5
$ABE7 JMP BASIC_Exec_DATA
Loc_abea LDA BASIC_CMDLineBuffer
$ABED BNE Loc_ac0d
$ABEF LDA $13
$ABF1 BNE Loc_abd6
$ABF3 JSR Funct_a906
$ABF6 JMP BASIC_CMDFinish
Funct_abf9 LDA $13
$ABFB BNE Loc_ac03
$ABFD JSR Funct_ab45
$AC00 JSR Funct_ab3b
Loc_ac03 JMP BASIC_GetCMDLine?

BASIC_Exec_READ LDX $41
$AC08 LDY $42
$AC0A LDA #$98
$AC0C BIT $00A9
Funct_ac0f STA $11
$AC11 STX $43
$AC13 STY $44
Loc_ac15 JSR Funct_b08b
$AC18 STA $49
$AC1A STY $4A
$AC1C LDA BASIC_CMDPtrMinus1
$AC1E LDY BASIC_CMDPtrMinus1+1
$AC20 STA $4B
$AC22 STY $4C
$AC24 LDX $43
$AC26 LDY $44
$AC28 STX BASIC_CMDPtrMinus1
$AC2A STY BASIC_CMDPtrMinus1+1
$AC2C JSR BASIC_GetCrntCMDLineChar
$AC2F BNE Loc_ac51
$AC31 BIT $11
$AC33 BVC Loc_ac41
$AC35 JSR Funct_e124
$AC38 STA BASIC_CMDLineBuffer
$AC3B LDX #$ff
$AC3D LDY #$1
$AC3F BNE Loc_ac4d
Loc_ac41 BMI Loc_acb8
$AC43 LDA $13
$AC45 BNE Loc_ac4a
$AC47 JSR Funct_ab45
Loc_ac4a JSR Funct_abf9
Loc_ac4d STX BASIC_CMDPtrMinus1
$AC4F STY BASIC_CMDPtrMinus1+1
Loc_ac51 JSR BASIC_GetNextCMDLineChar
$AC54 BIT $0D
$AC56 BPL Loc_ac89
$AC58 BIT $11
$AC5A BVC Loc_ac65
$AC5C INX
$AC5D STX BASIC_CMDPtrMinus1
$AC5F LDA #$0
$AC61 STA $07
$AC63 BEQ Loc_ac71
Loc_ac65 STA $07
$AC67 CMP #$22
$AC69 BEQ Loc_ac72
$AC6B LDA #$3a
$AC6D STA $07
$AC6F LDA #$2c
Loc_ac71 CLC
Loc_ac72 STA $08
$AC74 LDA BASIC_CMDPtrMinus1
$AC76 LDY BASIC_CMDPtrMinus1+1
$AC78 ADC #$0
$AC7A BCC Loc_ac7d
$AC7C INY
Loc_ac7d JSR Loc_b48d
$AC80 JSR Loc_b7e2
$AC83 JSR Funct_a9da
$AC86 JMP Loc_ac91
Loc_ac89 JSR Loc_bcf3
$AC8C LDA $0E
$AC8E JSR Funct_a9c2
Loc_ac91 JSR BASIC_GetCrntCMDLineChar
$AC94 BEQ Loc_ac9d
$AC96 CMP #$2c
$AC98 BEQ Loc_ac9d
$AC9A JMP Loc_ab4d
Loc_ac9d LDA BASIC_CMDPtrMinus1
$AC9F LDY BASIC_CMDPtrMinus1+1
$ACA1 STA $43
$ACA3 STY $44
$ACA5 LDA $4B
$ACA7 LDY $4C
$ACA9 STA BASIC_CMDPtrMinus1
$ACAB STY BASIC_CMDPtrMinus1+1
$ACAD JSR BASIC_GetCrntCMDLineChar
$ACB0 BEQ Loc_acdf
$ACB2 JSR Funct_aefd
$ACB5 JMP Loc_ac15
Loc_acb8 JSR Funct_a906
$ACBB INY
$ACBC TAX
$ACBD BNE Loc_acd1
$ACBF LDX #$d
$ACC1 INY
$ACC2 LDA (BASIC_CMDPtrMinus1),Y
$ACC4 BEQ Loc_ad32
$ACC6 INY
$ACC7 LDA (BASIC_CMDPtrMinus1),Y
$ACC9 STA $3F
$ACCB INY
$ACCC LDA (BASIC_CMDPtrMinus1),Y
$ACCE INY
$ACCF STA $40
Loc_acd1 JSR BASIC_CMDFinish
$ACD4 JSR BASIC_GetCrntCMDLineChar
$ACD7 TAX
$ACD8 CPX #$83
$ACDA BNE Loc_acb8
$ACDC JMP Loc_ac51
Loc_acdf LDA $43
$ACE1 LDY $44
$ACE3 LDX $11
$ACE5 BPL Loc_acea
$ACE7 JMP Loc_a827
Loc_acea LDY #$0
$ACEC LDA ($43),Y
$ACEE BEQ Exit_acfb
$ACF0 LDA $13
$ACF2 BNE Exit_acfb
$ACF4 LDA #<Text_ExtraIgnored
$ACF6 LDY #>Text_ExtraIgnored
$ACF8 JMP PrintStingYA_ab1e
Exit_acfb RTS

Text_ExtraIgnored .DB "?EXTRA IGNORED",$0d,$00
Text_RedoFromStart .DB "?REDO FROM START",$0d,$00

BASIC_Exec_NEXT BNE Funct_ad24
$AD20 LDY #$0
$AD22 BEQ Loc_ad27
Funct_ad24 JSR Funct_b08b
Loc_ad27 STA $49
$AD29 STY $4A
$AD2B JSR Funct_a38a
$AD2E BEQ Loc_ad35
$AD30 LDX #$a
Loc_ad32 JMP Loc_a437
Loc_ad35 TXS
$AD36 TXA
$AD37 CLC
$AD38 ADC #$4
$AD3A PHA
$AD3B ADC #$6
$AD3D STA $24
$AD3F PLA
$AD40 LDY #$1
$AD42 JSR Funct_bba2
$AD45 TSX
$AD46 LDA $0109,X
$AD49 STA $66
$AD4B LDA $49
$AD4D LDY $4A
$AD4F JSR Funct_b867
$AD52 JSR Loc_bbd0
$AD55 LDY #$1
$AD57 JSR Funct_bc5d
$AD5A TSX
$AD5B SEC
$AD5C SBC $0109,X
$AD5F BEQ Loc_ad78
$AD61 LDA $010F,X
$AD64 STA $39
$AD66 LDA $0110,X
$AD69 STA $3A
$AD6B LDA $0112,X
$AD6E STA BASIC_CMDPtrMinus1
$AD70 LDA $0111,X
$AD73 STA BASIC_CMDPtrMinus1+1
Loc_ad75 JMP Loc_a7ae
Loc_ad78 TXA
$AD79 ADC #$11
$AD7B TAX
$AD7C TXS
$AD7D JSR BASIC_GetCrntCMDLineChar
$AD80 CMP #$2c
$AD82 BNE Loc_ad75
$AD84 JSR BASIC_GetNextCMDLineChar
$AD87 JSR Funct_ad24
Funct_ad8a JSR Funct_ad9e
Funct_ad8d CLC
$AD8E BIT $38
Funct_ad90 BIT $0D
$AD92 BMI Loc_ad97
$AD94 BCS Loc_ad99
Loc_ad96 RTS
Loc_ad97 BCS Loc_ad96
Loc_ad99 LDX #$16
$AD9B JMP Loc_a437
Funct_ad9e LDX BASIC_CMDPtrMinus1
$ADA0 BNE Loc_ada4
$ADA2 DEC BASIC_CMDPtrMinus1+1
Loc_ada4 DEC BASIC_CMDPtrMinus1
$ADA6 LDX #$0
$ADA8 BIT $48
$ADAA TXA
$ADAB PHA
$ADAC LDA #$1
$ADAE JSR Funct_a3fb
$ADB1 JSR Funct_ae83
$ADB4 LDA #$0
$ADB6 STA $4D
Loc_adb8 JSR BASIC_GetCrntCMDLineChar
Loc_adbb SEC
$ADBC SBC #$b1
$ADBE BCC Loc_add7
$ADC0 CMP #$3
$ADC2 BCS Loc_add7
$ADC4 CMP #$1
$ADC6 ROL
$ADC7 EOR #$1
$ADC9 EOR $4D
$ADCB CMP $4D
$ADCD BCC Loc_ae30
$ADCF STA $4D
$ADD1 JSR BASIC_GetNextCMDLineChar
$ADD4 JMP Loc_adbb
Loc_add7 LDX $4D
$ADD9 BNE Loc_ae07
$ADDB BCS Loc_ae58
$ADDD ADC #$7
$ADDF BCC Loc_ae58
$ADE1 ADC $0D
$ADE3 BNE Loc_ade8
$ADE5 JMP Loc_b63d
Loc_ade8 ADC #$ff
$ADEA STA StringPtr?_0x22
$ADEC ASL
$ADED ADC StringPtr?_0x22
$ADEF TAY
Loc_adf0 PLA
$ADF1 CMP $A080,Y
$ADF4 BCS Loc_ae5d
$ADF6 JSR Funct_ad8d
Loc_adf9 PHA
Loc_adfa JSR Funct_ae20
$ADFD PLA
$ADFE LDY $4B
$AE00 BPL Loc_ae19
$AE02 TAX
$AE03 BEQ Loc_ae5b
$AE05 BNE Loc_ae66
Loc_ae07 LSR $0D
$AE09 TXA
$AE0A ROL
$AE0B LDX BASIC_CMDPtrMinus1
$AE0D BNE Loc_ae11
$AE0F DEC BASIC_CMDPtrMinus1+1
Loc_ae11 DEC BASIC_CMDPtrMinus1
$AE13 LDY #$1b
$AE15 STA $4D
$AE17 BNE Loc_adf0
Loc_ae19 CMP $A080,Y
$AE1C BCS Loc_ae66
$AE1E BCC Loc_adf9
Funct_ae20 LDA $A082,Y
$AE23 PHA
$AE24 LDA $A081,Y
$AE27 PHA
$AE28 JSR Funct_ae33
$AE2B LDA $4D
$AE2D JMP Loc_ada9
Loc_ae30 JMP Loc_af08
Funct_ae33 LDA $66
$AE35 LDX $A080,Y
Funct_ae38 TAY
$AE39 PLA
$AE3A STA StringPtr?_0x22
$AE3C INC StringPtr?_0x22
$AE3E PLA
$AE3F STA StringPtr?_0x22+1
$AE41 TYA
$AE42 PHA
Loc_ae43 JSR Funct_bc1b
$AE46 LDA $65
$AE48 PHA
$AE49 LDA $64
$AE4B PHA
$AE4C LDA $63
$AE4E PHA
$AE4F LDA $62
$AE51 PHA
$AE52 LDA $61
$AE54 PHA
$AE55 JMP (StringPtr?_0x22)
Loc_ae58 LDY #$ff
$AE5A PLA
Loc_ae5b BEQ Loc_ae80
Loc_ae5d CMP #$64
$AE5F BEQ Loc_ae64
$AE61 JSR Funct_ad8d
Loc_ae64 STY $4B
Loc_ae66 PLA
$AE67 LSR
$AE68 STA $12
$AE6A PLA
$AE6B STA $69
$AE6D PLA
$AE6E STA $6A
$AE70 PLA
$AE71 STA $6B
$AE73 PLA
$AE74 STA $6C
$AE76 PLA
$AE77 STA $6D
$AE79 PLA
$AE7A STA $6E
$AE7C EOR $66
$AE7E STA $6F
Loc_ae80 LDA $61
$AE82 RTS
Funct_ae83 JMP (BASIC_ExecuteCmdVec)
$AE86 LDA #$0
$AE88 STA $0D
Loc_ae8a JSR BASIC_GetNextCMDLineChar
$AE8D BCS Loc_ae92
Loc_ae8f JMP Loc_bcf3
Loc_ae92 JSR Funct_b113
$AE95 BCC Loc_ae9a
$AE97 JMP Loc_af28
Loc_ae9a CMP #$ff
$AE9C BNE Loc_aead
$AE9E LDA #$a8
$AEA0 LDY #$ae
$AEA2 JSR Funct_bba2
$AEA5 JMP BASIC_GetNextCMDLineChar
$AEA8 .DB $82
$AEA9 .DB $49
$AEAA .DB $f
$AEAB .DB $da
$AEAC .DB $a1
Loc_aead CMP #$2e
$AEAF BEQ Loc_ae8f
$AEB1 CMP #$ab
$AEB3 BEQ Loc_af0d
$AEB5 CMP #$aa
$AEB7 BEQ Loc_ae8a
$AEB9 CMP #$22
$AEBB BNE Loc_aecc
Funct_aebd LDA BASIC_CMDPtrMinus1
$AEBF LDY BASIC_CMDPtrMinus1+1
$AEC1 ADC #$0
$AEC3 BCC Loc_aec6
$AEC5 INY
Loc_aec6 JSR Funct_b487
$AEC9 JMP Loc_b7e2
Loc_aecc CMP #$a8
$AECE BNE Loc_aee3
$AED0 LDY #$18
$AED2 BNE Loc_af0f
$AED4 JSR Funct_b1bf
$AED7 LDA $65
$AED9 EOR #$ff
$AEDB TAY
$AEDC LDA $64
$AEDE EOR #$ff
$AEE0 JMP Loc_b391
Loc_aee3 CMP #$a5
$AEE5 BNE Loc_aeea
$AEE7 JMP Loc_b3f4
Loc_aeea CMP #$b4
$AEEC BCC Loc_aef1
$AEEE JMP Loc_afa7
Loc_aef1 JSR Funct_aefa
$AEF4 JSR Funct_ad9e
Funct_aef7 LDA #$29
$AEF9 BIT $28A9
$AEFC BIT $2CA9
Funct_aeff LDY #$0
$AF01 CMP (BASIC_CMDPtrMinus1),Y
$AF03 BNE Loc_af08
$AF05 JMP BASIC_GetNextCMDLineChar
Loc_af08 LDX #$b
$AF0A JMP Loc_a437

Loc_af0d LDY #$15
Loc_af0f PLA
$AF10 PLA
$AF11 JMP Loc_adfa

Funct_af14 SEC
$AF15 LDA $64
$AF17 SBC #$0
$AF19 LDA $65
$AF1B SBC #$a0
$AF1D BCC Exit_af27
$AF1F LDA #$a2
$AF21 SBC $64
$AF23 LDA #$e3
$AF25 SBC $65
Exit_af27 RTS

Loc_af28 JSR Funct_b08b
$AF2B STA $64
$AF2D STY $65
$AF2F LDX $45
$AF31 LDY $46
$AF33 LDA $0D
$AF35 BEQ Loc_af5d
$AF37 LDA #$0
$AF39 STA $70
$AF3B JSR Funct_af14
$AF3E BCC Exit_af5c
$AF40 CPX #$54
$AF42 BNE Exit_af5c
$AF44 CPY #$c9
$AF46 BNE Exit_af5c
$AF48 JSR Funct_af84
$AF4B STY $5E
$AF4D DEY
$AF4E STY $71
$AF50 LDY #$6
$AF52 STY $5D
$AF54 LDY #$24
$AF56 JSR Funct_be68
$AF59 JMP Loc_b46f
Exit_af5c RTS
Loc_af5d BIT $0E
$AF5F BPL Loc_af6e
$AF61 LDY #$0
$AF63 LDA ($64),Y
$AF65 TAX
$AF66 INY
$AF67 LDA ($64),Y
$AF69 TAY
$AF6A TXA
$AF6B JMP Loc_b391
Loc_af6e JSR Funct_af14
$AF71 BCC Loc_afa0
$AF73 CPX #$54
$AF75 BNE Loc_af92
$AF77 CPY #$49
$AF79 BNE Loc_afa0
$AF7B JSR Funct_af84
$AF7E TYA
$AF7F LDX #$a0
$AF81 JMP Loc_bc4f
Funct_af84 JSR Funct_ffde
$AF87 STX $64
$AF89 STY $63
$AF8B STA $65
$AF8D LDY #$0
$AF8F STY $62
$AF91 RTS
Loc_af92 CPX #$53
$AF94 BNE Loc_afa0
$AF96 CPY #$54
$AF98 BNE Loc_afa0
$AF9A JSR Funct_ffb7
$AF9D JMP Loc_bc3c
Loc_afa0 LDA $64
$AFA2 LDY $65
$AFA4 JMP Funct_bba2
Loc_afa7 ASL
$AFA8 PHA
$AFA9 TAX
$AFAA JSR BASIC_GetNextCMDLineChar
$AFAD CPX #$8f
$AFAF BCC Loc_afd1
$AFB1 JSR Funct_aefa
$AFB4 JSR Funct_ad9e
$AFB7 JSR Funct_aefd
$AFBA JSR Funct_ad8f
$AFBD PLA
$AFBE TAX
$AFBF LDA $65
$AFC1 PHA
$AFC2 LDA $64
$AFC4 PHA
$AFC5 TXA
$AFC6 PHA
$AFC7 JSR Loc_b79e
$AFCA PLA
$AFCB TAY
$AFCC TXA
$AFCD PHA
$AFCE JMP Loc_afd6
Loc_afd1 JSR Loc_aef1
$AFD4 PLA
$AFD5 TAY
Loc_afd6 LDA $9FEA,Y
$AFD9 STA $55
$AFDB LDA $9FEB,Y
$AFDE STA $56
$AFE0 JSR Funct_54
$AFE3 JMP Funct_ad8d
$AFE6 LDY #$ff
$AFE8 BIT $00A0
$AFEB STY BASIC_CurrentToken
$AFED JSR Funct_b1bf
$AFF0 LDA $64
$AFF2 EOR BASIC_CurrentToken
$AFF4 STA $07
$AFF6 LDA $65
$AFF8 EOR BASIC_CurrentToken
$AFFA STA $08
$AFFC JSR Funct_bbfc
$AFFF JSR Funct_b1bf
$B002 LDA $65
$B004 EOR BASIC_CurrentToken
$B006 AND $08
$B008 EOR BASIC_CurrentToken
$B00A TAY
$B00B LDA $64
$B00D EOR BASIC_CurrentToken
$B00F AND $07
$B011 EOR BASIC_CurrentToken
$B013 JMP Loc_b391

$B016 JSR Funct_ad90
$B019 BCS Loc_b02e
$B01B LDA $6E
$B01D ORA #$7f
$B01F AND $6A
$B021 STA $6A
$B023 LDA #$69
$B025 LDY #$0
$B027 JSR Funct_bc5b
$B02A TAX
$B02B JMP Loc_b061
Loc_b02e LDA #$0
$B030 STA $0D
$B032 DEC $4D
$B034 JSR Funct_b6a6
$B037 STA $61
$B039 STX $62
$B03B STY $63
$B03D LDA $6C
$B03F LDY $6D
$B041 JSR Funct_b6aa
$B044 STX $6C
$B046 STY $6D
$B048 TAX
$B049 SEC
$B04A SBC $61
$B04C BEQ Loc_b056
$B04E LDA #$1
$B050 BCC Loc_b056
$B052 LDX $61
$B054 LDA #$ff
Loc_b056 STA $66
$B058 LDY #$ff
$B05A INX
Loc_b05b INY
$B05C DEX
$B05D BNE Loc_b066
$B05F LDX $66
Loc_b061 BMI Loc_b072
$B063 CLC
$B064 BCC Loc_b072
Loc_b066 LDA ($6C),Y
$B068 CMP ($62),Y
$B06A BEQ Loc_b05b
$B06C LDX #$ff
$B06E BCS Loc_b072
$B070 LDX #$1
Loc_b072 INX
$B073 TXA
$B074 ROL
$B075 AND $12
$B077 BEQ Loc_b07b
$B079 LDA #$ff
Loc_b07b JMP Loc_bc3c
Loc_b07e JSR Funct_aefd
BASIC_Exec_DIM TAX
$B082 JSR Funct_b090
$B085 JSR BASIC_GetCrntCMDLineChar
$B088 BNE Loc_b07e
$B08A RTS
Funct_b08b LDX #$0
$B08D JSR BASIC_GetCrntCMDLineChar
Funct_b090 STX $0C
Funct_b092 STA $45
$B094 JSR BASIC_GetCrntCMDLineChar
$B097 JSR Funct_b113
$B09A BCS Loc_b09f
Loc_b09c JMP Loc_af08
Loc_b09f LDX #$0
$B0A1 STX $0D
$B0A3 STX $0E
$B0A5 JSR BASIC_GetNextCMDLineChar
$B0A8 BCC Loc_b0af
$B0AA JSR Funct_b113
$B0AD BCC Loc_b0ba
Loc_b0af TAX
Loc_b0b0 JSR BASIC_GetNextCMDLineChar
$B0B3 BCC Loc_b0b0
$B0B5 JSR Funct_b113
$B0B8 BCS Loc_b0b0
Loc_b0ba CMP #$24
$B0BC BNE Loc_b0c4
$B0BE LDA #$ff
$B0C0 STA $0D
$B0C2 BNE Loc_b0d4
Loc_b0c4 CMP #$25
$B0C6 BNE Loc_b0db
$B0C8 LDA $10
$B0CA BNE Loc_b09c
$B0CC LDA #$80
$B0CE STA $0E
$B0D0 ORA $45
$B0D2 STA $45
Loc_b0d4 TXA
$B0D5 ORA #$80
$B0D7 TAX
$B0D8 JSR BASIC_GetNextCMDLineChar
Loc_b0db STX $46
$B0DD SEC
$B0DE ORA $10
$B0E0 SBC #$28
$B0E2 BNE Loc_b0e7
$B0E4 JMP Loc_b1d1
Loc_b0e7 LDY #$0
$B0E9 STY $10
$B0EB LDA LoadAddressLo
$B0ED LDX LoadAddressHi
Loc_b0ef STX BASIC_CurrentLineData+1
Loc_b0f1 STA BASIC_CurrentLineData
$B0F3 CPX ExecuteAddressHi
$B0F5 BNE Loc_b0fb
$B0F7 CMP ExecuteAddressLo
$B0F9 BEQ Loc_b11d
Loc_b0fb LDA $45
$B0FD CMP (BASIC_CurrentLineData),Y
$B0FF BNE Loc_b109
$B101 LDA $46
$B103 INY
$B104 CMP (BASIC_CurrentLineData),Y
$B106 BEQ Loc_b185
$B108 DEY
Loc_b109 CLC
$B10A LDA BASIC_CurrentLineData
$B10C ADC #$7
$B10E BCC Loc_b0f1
$B110 INX
$B111 BNE Loc_b0ef
Funct_b113 CMP #$41
$B115 BCC Exit_b11c
$B117 SBC #$5b
$B119 SEC
$B11A SBC #$a5
Exit_b11c RTS

Loc_b11d PLA
$B11E PHA
$B11F CMP #$2a
$B121 BNE Loc_b128
Loc_b123 LDA #$13
$B125 LDY #$bf
$B127 RTS
Loc_b128 LDA $45
$B12A LDY $46
$B12C CMP #$54
$B12E BNE Loc_b13b
$B130 CPY #$c9
$B132 BEQ Loc_b123
$B134 CPY #$49
$B136 BNE Loc_b13b
Loc_b138 JMP Loc_af08
Loc_b13b CMP #$53
$B13D BNE Loc_b143
$B13F CPY #$54
$B141 BEQ Loc_b138
Loc_b143 LDA ExecuteAddressLo
$B145 LDY ExecuteAddressHi
$B147 STA BASIC_CurrentLineData
$B149 STY BASIC_CurrentLineData+1
$B14B LDA $31
$B14D LDY $32
$B14F STA $5A
$B151 STY $5B
$B153 CLC
$B154 ADC #$7
$B156 BCC Loc_b159
$B158 INY
Loc_b159 STA $58
$B15B STY $59
$B15D JSR Funct_a3b8
$B160 LDA $58
$B162 LDY $59
$B164 INY
$B165 STA ExecuteAddressLo
$B167 STY ExecuteAddressHi
$B169 LDY #$0
$B16B LDA $45
$B16D STA (BASIC_CurrentLineData),Y
$B16F INY
$B170 LDA $46
$B172 STA (BASIC_CurrentLineData),Y
$B174 LDA #$0
$B176 INY
$B177 STA (BASIC_CurrentLineData),Y
$B179 INY
$B17A STA (BASIC_CurrentLineData),Y
$B17C INY
$B17D STA (BASIC_CurrentLineData),Y
$B17F INY
$B180 STA (BASIC_CurrentLineData),Y
$B182 INY
$B183 STA (BASIC_CurrentLineData),Y
Loc_b185 LDA BASIC_CurrentLineData
$B187 CLC
$B188 ADC #$2
$B18A LDY BASIC_CurrentLineData+1
$B18C BCC Loc_b18f
$B18E INY
Loc_b18f STA $47
$B191 STY $48
$B193 RTS

Funct_b194 LDA BASIC_CurrentToken
$B196 ASL
$B197 ADC #$5
$B199 ADC BASIC_CurrentLineData
$B19B LDY BASIC_CurrentLineData+1
$B19D BCC Loc_b1a0
$B19F INY
Loc_b1a0 STA $58
$B1A2 STY $59
$B1A4 RTS

$B1A5 .DB $90
$B1A6 .DB $80
$B1A7 .DB $0
$B1A8 .DB $0
$B1A9 .DB $0
$B1AA .DB $20
$B1AB .DB $bf
$B1AC .DB $b1
$B1AD .DB $a5
$B1AE .DB $64
$B1AF .DB $a4
$B1B0 .DB $65
$B1B1 .DB $60
Funct_b1b2 JSR BASIC_GetNextCMDLineChar
$B1B5 JSR Funct_ad9e
Funct_b1b8 JSR Funct_ad8d
$B1BB LDA $66
$B1BD BMI Loc_b1cc
Funct_b1bf LDA $61
$B1C1 CMP #$90
$B1C3 BCC Loc_b1ce
$B1C5 LDA #$a5
$B1C7 LDY #$b1
$B1C9 JSR Funct_bc5b
Loc_b1cc BNE Loc_b248
Loc_b1ce JMP BASIC_ReadInt?_bc9b
Loc_b1d1 LDA $0C
$B1D3 ORA $0E
$B1D5 PHA
$B1D6 LDA $0D
$B1D8 PHA
$B1D9 LDY #$0
Loc_b1db TYA
$B1DC PHA
$B1DD LDA $46
$B1DF PHA
$B1E0 LDA $45
$B1E2 PHA
$B1E3 JSR Funct_b1b2
$B1E6 PLA
$B1E7 STA $45
$B1E9 PLA
$B1EA STA $46
$B1EC PLA
$B1ED TAY
$B1EE TSX
$B1EF LDA $0102,X
$B1F2 PHA
$B1F3 LDA $0101,X
$B1F6 PHA
$B1F7 LDA $64
$B1F9 STA $0102,X
$B1FC LDA $65
$B1FE STA $0101,X
$B201 INY
$B202 JSR BASIC_GetCrntCMDLineChar
$B205 CMP #$2c
$B207 BEQ Loc_b1db
$B209 STY BASIC_CurrentToken
$B20B JSR Funct_aef7
$B20E PLA
$B20F STA $0D
$B211 PLA
$B212 STA $0E
$B214 AND #$7f
$B216 STA $0C
$B218 LDX ExecuteAddressLo
$B21A LDA ExecuteAddressHi
Loc_b21c STX BASIC_CurrentLineData
$B21E STA BASIC_CurrentLineData+1
$B220 CMP $32
$B222 BNE Loc_b228
$B224 CPX $31
$B226 BEQ Loc_b261
Loc_b228 LDY #$0
$B22A LDA (BASIC_CurrentLineData),Y
$B22C INY
$B22D CMP $45
$B22F BNE Loc_b237
$B231 LDA $46
$B233 CMP (BASIC_CurrentLineData),Y
$B235 BEQ Loc_b24d
Loc_b237 INY
$B238 LDA (BASIC_CurrentLineData),Y
$B23A CLC
$B23B ADC BASIC_CurrentLineData
$B23D TAX
$B23E INY
$B23F LDA (BASIC_CurrentLineData),Y
$B241 ADC BASIC_CurrentLineData+1
$B243 BCC Loc_b21c
Loc_b245 LDX #$12
$B247 BIT $0EA2
Loc_b24a JMP Loc_a437
Loc_b24d LDX #$13
$B24F LDA $0C
$B251 BNE Loc_b24a
$B253 JSR Funct_b194
$B256 LDA BASIC_CurrentToken
$B258 LDY #$4
$B25A CMP (BASIC_CurrentLineData),Y
$B25C BNE Loc_b245
$B25E JMP Loc_b2ea
Loc_b261 JSR Funct_b194
$B264 JSR Funct_a408
$B267 LDY #$0
$B269 STY $72
$B26B LDX #$5
$B26D LDA $45
$B26F STA (BASIC_CurrentLineData),Y
$B271 BPL Loc_b274
$B273 DEX
Loc_b274 INY
$B275 LDA $46
$B277 STA (BASIC_CurrentLineData),Y
$B279 BPL Loc_b27d
$B27B DEX
$B27C DEX
Loc_b27d STX $71
$B27F LDA BASIC_CurrentToken
$B281 INY
$B282 INY
$B283 INY
$B284 STA (BASIC_CurrentLineData),Y
Loc_b286 LDX #$b
$B288 LDA #$0
$B28A BIT $0C
$B28C BVC Loc_b296
$B28E PLA
$B28F CLC
$B290 ADC #$1
$B292 TAX
$B293 PLA
$B294 ADC #$0
Loc_b296 INY
$B297 STA (BASIC_CurrentLineData),Y
$B299 INY
$B29A TXA
$B29B STA (BASIC_CurrentLineData),Y
$B29D JSR Funct_b34c
$B2A0 STX $71
$B2A2 STA $72
$B2A4 LDY StringPtr?_0x22
$B2A6 DEC BASIC_CurrentToken
$B2A8 BNE Loc_b286
$B2AA ADC $59
$B2AC BCS Loc_b30b
$B2AE STA $59
$B2B0 TAY
$B2B1 TXA
$B2B2 ADC $58
$B2B4 BCC Loc_b2b9
$B2B6 INY
$B2B7 BEQ Loc_b30b
Loc_b2b9 JSR Funct_a408
$B2BC STA $31
$B2BE STY $32
$B2C0 LDA #$0
$B2C2 INC $72
$B2C4 LDY $71
$B2C6 BEQ Loc_b2cd
Loc_b2c8 DEY
$B2C9 STA ($58),Y
$B2CB BNE Loc_b2c8
Loc_b2cd DEC $59
$B2CF DEC $72
$B2D1 BNE Loc_b2c8
$B2D3 INC $59
$B2D5 SEC
$B2D6 LDA $31
$B2D8 SBC BASIC_CurrentLineData
$B2DA LDY #$2
$B2DC STA (BASIC_CurrentLineData),Y
$B2DE LDA $32
$B2E0 INY
$B2E1 SBC BASIC_CurrentLineData+1
$B2E3 STA (BASIC_CurrentLineData),Y
$B2E5 LDA $0C
$B2E7 BNE Loc_b34b
$B2E9 INY
Loc_b2ea LDA (BASIC_CurrentLineData),Y
$B2EC STA BASIC_CurrentToken
$B2EE LDA #$0
$B2F0 STA $71
Loc_b2f2 STA $72
$B2F4 INY
$B2F5 PLA
$B2F6 TAX
$B2F7 STA $64
$B2F9 PLA
$B2FA STA $65
$B2FC CMP (BASIC_CurrentLineData),Y
$B2FE BCC Loc_b30e
$B300 BNE Loc_b308
$B302 INY
$B303 TXA
$B304 CMP (BASIC_CurrentLineData),Y
$B306 BCC Loc_b30f
Loc_b308 JMP Loc_b245
Loc_b30b JMP Loc_a435
Loc_b30e INY
Loc_b30f LDA $72
$B311 ORA $71
$B313 CLC
$B314 BEQ Loc_b320
$B316 JSR Funct_b34c
$B319 TXA
$B31A ADC $64
$B31C TAX
$B31D TYA
$B31E LDY StringPtr?_0x22
Loc_b320 ADC $65
$B322 STX $71
$B324 DEC BASIC_CurrentToken
$B326 BNE Loc_b2f2
$B328 STA $72
$B32A LDX #$5
$B32C LDA $45
$B32E BPL Loc_b331
$B330 DEX
Loc_b331 LDA $46
$B333 BPL Loc_b337
$B335 DEX
$B336 DEX
Loc_b337 STX $28
$B339 LDA #$0
$B33B JSR Funct_b355
$B33E TXA
$B33F ADC $58
$B341 STA $47
$B343 TYA
$B344 ADC $59
$B346 STA $48
$B348 TAY
$B349 LDA $47
Loc_b34b RTS

Funct_b34c STY StringPtr?_0x22
$B34E LDA (BASIC_CurrentLineData),Y
$B350 STA $28
$B352 DEY
$B353 LDA (BASIC_CurrentLineData),Y
Funct_b355 STA $29
$B357 LDA #$10
$B359 STA $5D
$B35B LDX #$0
$B35D LDY #$0
Loc_b35f TXA
$B360 ASL
$B361 TAX
$B362 TYA
$B363 ROL
$B364 TAY
$B365 BCS Loc_b30b
$B367 ASL $71
$B369 ROL $72
$B36B BCC Loc_b378
$B36D CLC
$B36E TXA
$B36F ADC $28
$B371 TAX
$B372 TYA
$B373 ADC $29
$B375 TAY
$B376 BCS Loc_b30b
Loc_b378 DEC $5D
$B37A BNE Loc_b35f
$B37C RTS

$B37D LDA $0D
$B37F BEQ Loc_b384
$B381 JSR Funct_b6a6
Loc_b384 JSR Funct_b526
$B387 SEC
$B388 LDA $33
$B38A SBC $31
$B38C TAY
$B38D LDA $34
$B38F SBC $32
Loc_b391 LDX #$0
$B393 STX $0D
$B395 STA $62
$B397 STY $63
$B399 LDX #$90
$B39B JMP Loc_bc44

$B39E .DB $38
$B39F .DB $20
$B3A0 .DB $f0
$B3A1 .DB $ff
Loc_b3a2 .DB $a9
$B3A3 .DB $0
$B3A4 .DB $f0
$B3A5 .DB $eb
Funct_b3a6 LDX $3A
$B3A8 INX
$B3A9 BNE Loc_b34b
$B3AB LDX #$15
$B3AD BIT $1BA2
$B3B0 JMP Loc_a437

$B3B3 JSR Funct_b3e1
$B3B6 JSR Funct_b3a6
$B3B9 JSR Funct_aefa
$B3BC LDA #$80
$B3BE STA $10
$B3C0 JSR Funct_b08b
$B3C3 JSR Funct_ad8d
$B3C6 JSR Funct_aef7
$B3C9 LDA #$b2
$B3CB JSR Funct_aeff
$B3CE PHA
$B3CF LDA $48
$B3D1 PHA
$B3D2 LDA $47
$B3D4 PHA
$B3D5 LDA BASIC_CMDPtrMinus1+1
$B3D7 PHA
$B3D8 LDA BASIC_CMDPtrMinus1
$B3DA PHA
$B3DB JSR BASIC_Exec_DATA
$B3DE JMP Loc_b44f
Funct_b3e1 LDA #$a5
$B3E3 JSR Funct_aeff
$B3E6 ORA #$80
$B3E8 STA $10
$B3EA JSR Funct_b092
$B3ED STA $4E
$B3EF STY $4F
$B3F1 JMP Funct_ad8d
Loc_b3f4 JSR Funct_b3e1
$B3F7 LDA $4F
$B3F9 PHA
$B3FA LDA $4E
$B3FC PHA
$B3FD JSR Loc_aef1
$B400 JSR Funct_ad8d
$B403 PLA
$B404 STA $4E
$B406 PLA
$B407 STA $4F
$B409 LDY #$2
$B40B LDA ($4E),Y
$B40D STA $47
$B40F TAX
$B410 INY
$B411 LDA ($4E),Y
$B413 BEQ Loc_b3ae
$B415 STA $48
$B417 INY
Loc_b418 LDA ($47),Y
$B41A PHA
$B41B DEY
$B41C BPL Loc_b418
$B41E LDY $48
$B420 JSR Loc_bbd4
$B423 LDA BASIC_CMDPtrMinus1+1
$B425 PHA
$B426 LDA BASIC_CMDPtrMinus1
$B428 PHA
$B429 LDA ($4E),Y
$B42B STA BASIC_CMDPtrMinus1
$B42D INY
$B42E LDA ($4E),Y
$B430 STA BASIC_CMDPtrMinus1+1
$B432 LDA $48
$B434 PHA
$B435 LDA $47
$B437 PHA
$B438 JSR Funct_ad8a
$B43B PLA
$B43C STA $4E
$B43E PLA
$B43F STA $4F
$B441 JSR BASIC_GetCrntCMDLineChar
$B444 BEQ Loc_b449
$B446 JMP Loc_af08
Loc_b449 PLA
$B44A STA BASIC_CMDPtrMinus1
$B44C PLA
$B44D STA BASIC_CMDPtrMinus1+1
Loc_b44f LDY #$0
$B451 PLA
$B452 STA ($4E),Y
$B454 PLA
$B455 INY
$B456 STA ($4E),Y
$B458 PLA
$B459 INY
$B45A STA ($4E),Y
$B45C PLA
$B45D INY
$B45E STA ($4E),Y
$B460 PLA
$B461 INY
$B462 STA ($4E),Y
$B464 RTS
$B465 JSR Funct_ad8d
$B468 LDY #$0
$B46A JSR Funct_bddf
$B46D PLA
$B46E PLA
Loc_b46f LDA #$ff
$B471 LDY #$0
$B473 BEQ Funct_b487
Funct_b475 LDX $64
$B477 LDY $65
$B479 STX $50
$B47B STY $51
Funct_b47d JSR Funct_b4f4
$B480 STX $62
$B482 STY $63
$B484 STA $61
$B486 RTS
Funct_b487 LDX #$22
$B489 STX $07
$B48B STX $08
Loc_b48d STA $6F
$B48F STY $70
$B491 STA $62
$B493 STY $63
$B495 LDY #$ff
Loc_b497 INY
$B498 LDA ($6F),Y
$B49A BEQ Loc_b4a8
$B49C CMP $07
$B49E BEQ Loc_b4a4
$B4A0 CMP $08
$B4A2 BNE Loc_b497
Loc_b4a4 CMP #$22
$B4A6 BEQ Loc_b4a9
Loc_b4a8 CLC
Loc_b4a9 STY $61
$B4AB TYA
$B4AC ADC $6F
$B4AE STA $71
$B4B0 LDX $70
$B4B2 BCC Loc_b4b5
$B4B4 INX
Loc_b4b5 STX $72
$B4B7 LDA $70
$B4B9 BEQ Loc_b4bf
$B4BB CMP #$2
$B4BD BNE Loc_b4ca
Loc_b4bf TYA
$B4C0 JSR Funct_b475
$B4C3 LDX $6F
$B4C5 LDY $70
$B4C7 JSR Funct_b688
Loc_b4ca LDX $16
$B4CC CPX #$22
$B4CE BNE Loc_b4d5
$B4D0 LDX #$19
Loc_b4d2 JMP Loc_a437
Loc_b4d5 LDA $61
$B4D7 STA $00,X
$B4D9 LDA $62
$B4DB STA $01,X
$B4DD LDA $63
$B4DF STA $02,X
$B4E1 LDY #$0
$B4E3 STX $64
$B4E5 STY $65
$B4E7 STY $70
$B4E9 DEY
$B4EA STY $0D
$B4EC STX $17
$B4EE INX
$B4EF INX
$B4F0 INX
$B4F1 STX $16
$B4F3 RTS
Funct_b4f4 LSR $0F
Loc_b4f6 PHA
$B4F7 EOR #$ff
$B4F9 SEC
$B4FA ADC $33
$B4FC LDY $34
$B4FE BCS Loc_b501
$B500 DEY
Loc_b501 CPY $32
$B503 BCC Loc_b516
$B505 BNE Loc_b50b
$B507 CMP $31
$B509 BCC Loc_b516
Loc_b50b STA $33
$B50D STY $34
$B50F STA $35
$B511 STY $36
$B513 TAX
$B514 PLA
$B515 RTS
Loc_b516 LDX #$10
$B518 LDA $0F
$B51A BMI Loc_b4d2
$B51C JSR Funct_b526
$B51F LDA #$80
$B521 STA $0F
$B523 PLA
$B524 BNE Loc_b4f6
Funct_b526 LDX $37
$B528 LDA $38
Loc_b52a STX $33
$B52C STA $34
$B52E LDY #$0
$B530 STY $4F
$B532 STY $4E
$B534 LDA $31
$B536 LDX $32
$B538 STA BASIC_CurrentLineData
$B53A STX BASIC_CurrentLineData+1
$B53C LDA #$19
$B53E LDX #$0
$B540 STA StringPtr?_0x22
$B542 STX StringPtr?_0x22+1
Loc_b544 CMP $16
$B546 BEQ Loc_b54d
$B548 JSR Funct_b5c7
$B54B BEQ Loc_b544
Loc_b54d LDA #$7
$B54F STA $53
$B551 LDA LoadAddressLo
$B553 LDX LoadAddressHi
$B555 STA StringPtr?_0x22
$B557 STX StringPtr?_0x22+1
Loc_b559 CPX ExecuteAddressHi
$B55B BNE Loc_b561
$B55D CMP ExecuteAddressLo
$B55F BEQ Loc_b566
Loc_b561 JSR Loc_b5bd
$B564 BEQ Loc_b559
Loc_b566 STA $58
$B568 STX $59
$B56A LDA #$3
$B56C STA $53
Loc_b56e LDA $58
$B570 LDX $59
Loc_b572 CPX $32
$B574 BNE Loc_b57d
$B576 CMP $31
$B578 BNE Loc_b57d
$B57A JMP Loc_b606
Loc_b57d STA StringPtr?_0x22
$B57F STX StringPtr?_0x22+1
$B581 LDY #$0
$B583 LDA (StringPtr?_0x22),Y
$B585 TAX
$B586 INY
$B587 LDA (StringPtr?_0x22),Y
$B589 PHP
$B58A INY
$B58B LDA (StringPtr?_0x22),Y
$B58D ADC $58
$B58F STA $58
$B591 INY
$B592 LDA (StringPtr?_0x22),Y
$B594 ADC $59
$B596 STA $59
$B598 PLP
$B599 BPL Loc_b56e
$B59B TXA
$B59C BMI Loc_b56e
$B59E INY
$B59F LDA (StringPtr?_0x22),Y
$B5A1 LDY #$0
$B5A3 ASL
$B5A4 ADC #$5
$B5A6 ADC StringPtr?_0x22
$B5A8 STA StringPtr?_0x22
$B5AA BCC Loc_b5ae
$B5AC INC StringPtr?_0x22+1
Loc_b5ae LDX StringPtr?_0x22+1
Loc_b5b0 CPX $59
$B5B2 BNE Loc_b5b8
$B5B4 CMP $58
$B5B6 BEQ Loc_b572
Loc_b5b8 JSR Funct_b5c7
$B5BB BEQ Loc_b5b0
Loc_b5bd LDA (StringPtr?_0x22),Y
$B5BF BMI Loc_b5f6
$B5C1 INY
$B5C2 LDA (StringPtr?_0x22),Y
$B5C4 BPL Loc_b5f6
$B5C6 INY
Funct_b5c7 LDA (StringPtr?_0x22),Y
$B5C9 BEQ Loc_b5f6
$B5CB INY
$B5CC LDA (StringPtr?_0x22),Y
$B5CE TAX
$B5CF INY
$B5D0 LDA (StringPtr?_0x22),Y
$B5D2 CMP $34
$B5D4 BCC Loc_b5dc
$B5D6 BNE Loc_b5f6
$B5D8 CPX $33
$B5DA BCS Loc_b5f6
Loc_b5dc CMP BASIC_CurrentLineData+1
$B5DE BCC Loc_b5f6
$B5E0 BNE Loc_b5e6
$B5E2 CPX BASIC_CurrentLineData
$B5E4 BCC Loc_b5f6
Loc_b5e6 STX BASIC_CurrentLineData
$B5E8 STA BASIC_CurrentLineData+1
$B5EA LDA StringPtr?_0x22
$B5EC LDX StringPtr?_0x22+1
$B5EE STA $4E
$B5F0 STX $4F
$B5F2 LDA $53
$B5F4 STA $55
Loc_b5f6 LDA $53
$B5F8 CLC
$B5F9 ADC StringPtr?_0x22
$B5FB STA StringPtr?_0x22
$B5FD BCC Loc_b601
$B5FF INC StringPtr?_0x22+1
Loc_b601 LDX StringPtr?_0x22+1
$B603 LDY #$0
$B605 RTS
Loc_b606 LDA $4F
$B608 ORA $4E
$B60A BEQ Loc_b601
$B60C LDA $55
$B60E AND #$4
$B610 LSR
$B611 TAY
$B612 STA $55
$B614 LDA ($4E),Y
$B616 ADC BASIC_CurrentLineData
$B618 STA $5A
$B61A LDA BASIC_CurrentLineData+1
$B61C ADC #$0
$B61E STA $5B
$B620 LDA $33
$B622 LDX $34
$B624 STA $58
$B626 STX $59
$B628 JSR Funct_a3bf
$B62B LDY $55
$B62D INY
$B62E LDA $58
$B630 STA ($4E),Y
$B632 TAX
$B633 INC $59
$B635 LDA $59
$B637 INY
$B638 STA ($4E),Y
$B63A JMP Loc_b52a
Loc_b63d LDA $65
$B63F PHA
$B640 LDA $64
$B642 PHA
$B643 JSR Funct_ae83
$B646 JSR Funct_ad8f
$B649 PLA
$B64A STA $6F
$B64C PLA
$B64D STA $70
$B64F LDY #$0
$B651 LDA ($6F),Y
$B653 CLC
$B654 ADC ($64),Y
$B656 BCC Loc_b65d
$B658 LDX #$17
$B65A JMP Loc_a437
Loc_b65d JSR Funct_b475
$B660 JSR Funct_b67a
$B663 LDA $50
$B665 LDY $51
$B667 JSR Funct_b6aa
$B66A JSR Funct_b68c
$B66D LDA $6F
$B66F LDY $70
$B671 JSR Funct_b6aa
$B674 JSR Loc_b4ca
$B677 JMP Loc_adb8
Funct_b67a LDY #$0
$B67C LDA ($6F),Y
$B67E PHA
$B67F INY
$B680 LDA ($6F),Y
$B682 TAX
$B683 INY
$B684 LDA ($6F),Y
$B686 TAY
$B687 PLA
Funct_b688 STX StringPtr?_0x22
$B68A STY StringPtr?_0x22+1
Funct_b68c TAY
$B68D BEQ Loc_b699
$B68F PHA
Loc_b690 DEY
$B691 LDA (StringPtr?_0x22),Y
$B693 STA ($35),Y
$B695 TYA
$B696 BNE Loc_b690
$B698 PLA
Loc_b699 CLC
$B69A ADC $35
$B69C STA $35
$B69E BCC Exit_b6a2
$B6A0 INC $36
Exit_b6a2 RTS

BASIC_GetString?_b6a3 JSR Funct_ad8f
Funct_b6a6 LDA $64
$B6A8 LDY $65
Funct_b6aa STA StringPtr?_0x22
$B6AC STY StringPtr?_0x22+1
$B6AE JSR Funct_b6db
$B6B1 PHP
$B6B2 LDY #$0
$B6B4 LDA (StringPtr?_0x22),Y
$B6B6 PHA
$B6B7 INY
$B6B8 LDA (StringPtr?_0x22),Y
$B6BA TAX
$B6BB INY
$B6BC LDA (StringPtr?_0x22),Y
$B6BE TAY
$B6BF PLA
$B6C0 PLP
$B6C1 BNE Loc_b6d6
$B6C3 CPY $34
$B6C5 BNE Loc_b6d6
$B6C7 CPX $33
$B6C9 BNE Loc_b6d6
$B6CB PHA
$B6CC CLC
$B6CD ADC $33
$B6CF STA $33
$B6D1 BCC Loc_b6d5
$B6D3 INC $34
Loc_b6d5 PLA
Loc_b6d6 STX StringPtr?_0x22
$B6D8 STY StringPtr?_0x22+1
$B6DA RTS
Funct_b6db CPY $18
$B6DD BNE Exit_b6eb
$B6DF CMP $17
$B6E1 BNE Exit_b6eb
$B6E3 STA $16
$B6E5 SBC #$3
$B6E7 STA $17
$B6E9 LDY #$0
Exit_b6eb RTS

$B6EC .DB $20
$B6ED .DB $a1
$B6EE .DB $b7
$B6EF .DB $8a
$B6F0 .DB $48
$B6F1 .DB $a9
$B6F2 .DB $1
$B6F3 .DB $20
$B6F4 .DB $7d
$B6F5 .DB $b4
$B6F6 .DB $68
$B6F7 .DB $a0
$B6F8 .DB $0
$B6F9 .DB $91
$B6FA .DB $62
$B6FB .DB $68
$B6FC .DB $68
$B6FD .DB $4c
$B6FE .DB $ca
$B6FF .DB $b4
$B700 JSR Funct_b761
$B703 CMP ($50),Y
$B705 TYA
Loc_b706 BCC Loc_b70c
$B708 LDA ($50),Y
$B70A TAX
$B70B TYA
Loc_b70c PHA
Loc_b70d TXA
Loc_b70e PHA
$B70F JSR Funct_b47d
$B712 LDA $50
$B714 LDY $51
$B716 JSR Funct_b6aa
$B719 PLA
$B71A TAY
$B71B PLA
$B71C CLC
$B71D ADC StringPtr?_0x22
$B71F STA StringPtr?_0x22
$B721 BCC Loc_b725
$B723 INC StringPtr?_0x22+1
Loc_b725 TYA
$B726 JSR Funct_b68c
$B729 JMP Loc_b4ca
$B72C .DB $20
$B72D .DB $61
$B72E .DB $b7
$B72F .DB $18
$B730 .DB $f1
$B731 .DB $50
$B732 .DB $49
$B733 .DB $ff
$B734 .DB $4c
$B735 .DB $6
$B736 .DB $b7
$B737 .DB $a9
$B738 .DB $ff
$B739 .DB $85
$B73A .DB $65
$B73B .DB $20
$B73C .DB $79
$B73D .DB $0
$B73E .DB $c9
$B73F .DB $29
$B740 .DB $f0
$B741 .DB $6
$B742 .DB $20
$B743 .DB $fd
$B744 .DB $ae
$B745 .DB $20
$B746 .DB $9e
$B747 .DB $b7
Loc_b748 JSR Funct_b761
$B74B BEQ Loc_b798
$B74D DEX
$B74E TXA
$B74F PHA
$B750 CLC
$B751 LDX #$0
$B753 SBC ($50),Y
$B755 BCS Loc_b70d
$B757 EOR #$ff
$B759 CMP $65
$B75B BCC Loc_b70e
$B75D LDA $65
$B75F BCS Loc_b70e
Funct_b761 JSR Funct_aef7
$B764 PLA
$B765 TAY
$B766 PLA
$B767 STA $55
$B769 PLA
$B76A PLA
$B76B PLA
$B76C TAX
$B76D PLA
$B76E STA $50
$B770 PLA
$B771 STA $51
$B773 LDA $55
$B775 PHA
$B776 TYA
$B777 PHA
$B778 LDY #$0
$B77A TXA
$B77B RTS

$B77C .DB $20
$B77D .DB $82
$B77E .DB $b7
$B77F .DB $4c
$B780 .DB $a2
$B781 .DB $b3
Funct_b782 .DB $20
$B783 .DB $a3
$B784 .DB $b6
$B785 .DB $a2
$B786 .DB $0
$B787 .DB $86
$B788 .DB $d
$B789 .DB $a8
$B78A .DB $60
$B78B .DB $20
$B78C .DB $82
$B78D .DB $b7
$B78E .DB $f0
$B78F .DB $8
$B790 .DB $a0
$B791 .DB $0
$B792 .DB $b1
$B793 .DB $22
$B794 .DB $a8
$B795 .DB $4c
$B796 .DB $a2
$B797 .DB $b3
Loc_b798 JMP Loc_b248
Funct_b79b JSR BASIC_GetNextCMDLineChar
Loc_b79e JSR Funct_ad8a
Funct_b7a1 JSR Funct_b1b8
$B7A4 LDX $64
$B7A6 BNE Loc_b798
$B7A8 LDX $65
$B7AA JMP BASIC_GetCrntCMDLineChar
$B7AD .DB $20
$B7AE .DB $82
$B7AF .DB $b7
$B7B0 .DB $d0
$B7B1 .DB $3
$B7B2 .DB $4c
$B7B3 .DB $f7
$B7B4 .DB $b8
Loc_b7b5 .DB $a6
$B7B6 .DB $7a
$B7B7 .DB $a4
$B7B8 .DB $7b
$B7B9 .DB $86
$B7BA .DB $71
$B7BB .DB $84
$B7BC .DB $72
$B7BD .DB $a6
$B7BE .DB $22
$B7BF .DB $86
$B7C0 .DB $7a
$B7C1 .DB $18
$B7C2 .DB $65
$B7C3 .DB $22
$B7C4 .DB $85
$B7C5 .DB $24
$B7C6 .DB $a6
$B7C7 .DB $23
$B7C8 .DB $86
$B7C9 .DB $7b
$B7CA .DB $90
$B7CB .DB $1
$B7CC .DB $e8
Loc_b7cd .DB $86
$B7CE .DB $25
$B7CF .DB $a0
$B7D0 .DB $0
$B7D1 .DB $b1
$B7D2 .DB $24
$B7D3 .DB $48
$B7D4 .DB $98
$B7D5 .DB $91
$B7D6 .DB $24
$B7D7 .DB $20
$B7D8 .DB $79
$B7D9 .DB $0
$B7DA .DB $20
$B7DB .DB $f3
$B7DC .DB $bc
$B7DD .DB $68
$B7DE .DB $a0
$B7DF .DB $0
$B7E0 .DB $91
$B7E1 .DB $24
Loc_b7e2 LDX $71
$B7E4 LDY $72
$B7E6 STX BASIC_CMDPtrMinus1
$B7E8 STY BASIC_CMDPtrMinus1+1
$B7EA RTS
Funct_b7eb JSR Funct_ad8a
$B7EE JSR BASIC_ReadInt?_b7f7
Funct_b7f1 JSR Funct_aefd
$B7F4 JMP Loc_b79e
BASIC_ReadInt?_b7f7 LDA $66
$B7F9 BMI Loc_b798
$B7FB LDA $61
$B7FD CMP #$91
$B7FF BCS Loc_b798
$B801 JSR BASIC_ReadInt?_bc9b
$B804 LDA $64
$B806 LDY $65
$B808 STY BASIC_CurrentInt
$B80A STA BASIC_CurrentInt+1
$B80C RTS

$B80D .DB $a5
$B80E .DB $15
$B80F .DB $48
$B810 .DB $a5
$B811 .DB $14
$B812 .DB $48
$B813 .DB $20
$B814 .DB $f7
$B815 .DB $b7
$B816 .DB $a0
$B817 .DB $0
$B818 .DB $b1
$B819 .DB $14
$B81A .DB $a8
$B81B .DB $68
$B81C .DB $85
$B81D .DB $14
$B81E .DB $68
$B81F .DB $85
$B820 .DB $15
$B821 .DB $4c
$B822 .DB $a2
$B823 .DB $b3
$B824 JSR Funct_b7eb
$B827 TXA
$B828 LDY #$0
$B82A STA (BASIC_CurrentInt),Y
$B82C RTS
$B82D .DB $20
$B82E .DB $eb
$B82F .DB $b7
$B830 .DB $86
$B831 .DB $49
$B832 .DB $a2
$B833 .DB $0
$B834 .DB $20
$B835 .DB $79
$B836 .DB $0
$B837 .DB $f0
$B838 .DB $3
$B839 .DB $20
$B83A .DB $f1
$B83B .DB $b7
Loc_b83c .DB $86
$B83D .DB $4a
$B83E .DB $a0
$B83F .DB $0
Loc_b840 .DB $b1
$B841 .DB $14
$B842 .DB $45
$B843 .DB $4a
$B844 .DB $25
$B845 .DB $49
$B846 .DB $f0
$B847 .DB $f8
Exit_b848 RTS

Funct_b849 LDA #$11
$B84B LDY #$bf
$B84D JMP Funct_b867
Funct_b850 JSR Funct_ba8c
Funct_b853 LDA $66
$B855 EOR #$ff
$B857 STA $66
$B859 EOR $6E
$B85B STA $6F
$B85D LDA $61
$B85F JMP Loc_b86a
Loc_b862 JSR Funct_b999
$B865 BCC Loc_b8a3
Funct_b867 JSR Funct_ba8c
Loc_b86a BNE Loc_b86f
$B86C JMP Funct_bbfc
Loc_b86f LDX $70
$B871 STX $56
$B873 LDX #$69
$B875 LDA $69
Funct_b877 TAY
$B878 BEQ Exit_b848
$B87A SEC
$B87B SBC $61
$B87D BEQ Loc_b8a3
$B87F BCC Loc_b893
$B881 STY $61
$B883 LDY $6E
$B885 STY $66
$B887 EOR #$ff
$B889 ADC #$0
$B88B LDY #$0
$B88D STY $56
$B88F LDX #$61
$B891 BNE Loc_b897
Loc_b893 LDY #$0
$B895 STY $70
Loc_b897 CMP #$f9
$B899 BMI Loc_b862
$B89B TAY
$B89C LDA $70
$B89E LSR $01,X
$B8A0 JSR Funct_b9b0
Loc_b8a3 BIT $6F
$B8A5 BPL Loc_b8fe
$B8A7 LDY #$61
$B8A9 CPX #$69
$B8AB BEQ Loc_b8af
$B8AD LDY #$69
Loc_b8af SEC
$B8B0 EOR #$ff
$B8B2 ADC $56
$B8B4 STA $70
$B8B6 LDA $0004,Y
$B8B9 SBC $04,X
$B8BB STA $65
$B8BD LDA $0003,Y
$B8C0 SBC $03,X
$B8C2 STA $64
$B8C4 LDA $0002,Y
$B8C7 SBC $02,X
$B8C9 STA $63
$B8CB LDA $0001,Y
$B8CE SBC $01,X
$B8D0 STA $62
Loc_b8d2 BCS Funct_b8d7
$B8D4 JSR Funct_b947
Funct_b8d7 LDY #$0
$B8D9 TYA
$B8DA CLC
Loc_b8db LDX $62
$B8DD BNE Loc_b929
$B8DF LDX $63
$B8E1 STX $62
$B8E3 LDX $64
$B8E5 STX $63
$B8E7 LDX $65
$B8E9 STX $64
$B8EB LDX $70
$B8ED STX $65
$B8EF STY $70
$B8F1 ADC #$8
$B8F3 CMP #$20
$B8F5 BNE Loc_b8db
Loc_b8f7 LDA #$0
Loc_b8f9 STA $61
Loc_b8fb STA $66
$B8FD RTS

Loc_b8fe ADC $56
$B900 STA $70
$B902 LDA $65
$B904 ADC $6D
$B906 STA $65
$B908 LDA $64
$B90A ADC $6C
$B90C STA $64
$B90E LDA $63
$B910 ADC $6B
$B912 STA $63
$B914 LDA $62
$B916 ADC $6A
$B918 STA $62
$B91A JMP Loc_b936
Loc_b91d ADC #$1
$B91F ASL $70
$B921 ROL $65
$B923 ROL $64
$B925 ROL $63
$B927 ROL $62
Loc_b929 BPL Loc_b91d
$B92B SEC
$B92C SBC $61
$B92E BCS Loc_b8f7
$B930 EOR #$ff
$B932 ADC #$1
$B934 STA $61
Loc_b936 BCC Loc_b946
Loc_b938 INC $61
$B93A BEQ Loc_b97e
$B93C ROR $62
$B93E ROR $63
$B940 ROR $64
$B942 ROR $65
$B944 ROR $70
Loc_b946 RTS
Funct_b947 LDA $66
$B949 EOR #$ff
$B94B STA $66
Funct_b94d LDA $62
$B94F EOR #$ff
$B951 STA $62
$B953 LDA $63
$B955 EOR #$ff
$B957 STA $63
$B959 LDA $64
$B95B EOR #$ff
$B95D STA $64
$B95F LDA $65
$B961 EOR #$ff
$B963 STA $65
$B965 LDA $70
$B967 EOR #$ff
$B969 STA $70
$B96B INC $70
$B96D BNE Loc_b97d
Funct_b96f INC $65
$B971 BNE Loc_b97d
$B973 INC $64
$B975 BNE Loc_b97d
$B977 INC $63
$B979 BNE Loc_b97d
$B97B INC $62
Loc_b97d RTS
Loc_b97e LDX #$f
$B980 JMP Loc_a437
Loc_b983 LDX #$25
Loc_b985 LDY $04,X
$B987 STY $70
$B989 LDY $03,X
$B98B STY $04,X
$B98D LDY $02,X
$B98F STY $03,X
$B991 LDY $01,X
$B993 STY $02,X
$B995 LDY $68
$B997 STY $01,X
Funct_b999 ADC #$8
$B99B BMI Loc_b985
$B99D BEQ Loc_b985
$B99F SBC #$8
$B9A1 TAY
$B9A2 LDA $70
$B9A4 BCS Loc_b9ba
Loc_b9a6 ASL $01,X
$B9A8 BCC Loc_b9ac
$B9AA INC $01,X
Loc_b9ac ROR $01,X
$B9AE ROR $01,X
Funct_b9b0 ROR $02,X
$B9B2 ROR $03,X
$B9B4 ROR $04,X
$B9B6 ROR
$B9B7 INY
$B9B8 BNE Loc_b9a6
Loc_b9ba CLC
$B9BB RTS
$B9BC .DB $81
$B9BD .DB $0
$B9BE .DB $0
$B9BF .DB $0
$B9C0 .DB $0
$B9C1 .DB $3
$B9C2 .DB $7f
$B9C3 .DB $5e
$B9C4 .DB $56
$B9C5 .DB $cb
$B9C6 .DB $79
$B9C7 .DB $80
$B9C8 .DB $13
$B9C9 .DB $9b
$B9CA .DB $b
$B9CB .DB $64
$B9CC .DB $80
$B9CD .DB $76
$B9CE .DB $38
$B9CF .DB $93
$B9D0 .DB $16
$B9D1 .DB $82
$B9D2 .DB $38
$B9D3 .DB $aa
$B9D4 .DB $3b
$B9D5 .DB $20
$B9D6 .DB $80
$B9D7 .DB $35
$B9D8 .DB $4
$B9D9 .DB $f3
$B9DA .DB $34
$B9DB .DB $81
$B9DC .DB $35
$B9DD .DB $4
$B9DE .DB $f3
$B9DF .DB $34
$B9E0 .DB $80
$B9E1 .DB $80
$B9E2 .DB $0
$B9E3 .DB $0
$B9E4 .DB $0
$B9E5 .DB $80
$B9E6 .DB $31
$B9E7 .DB $72
$B9E8 .DB $17
$B9E9 .DB $f8
Funct_b9ea JSR Funct_bc2b
$B9ED BEQ Loc_b9f1
$B9EF BPL Loc_b9f4
Loc_b9f1 JMP Loc_b248
Loc_b9f4 LDA $61
$B9F6 SBC #$7f
$B9F8 PHA
$B9F9 LDA #$80
$B9FB STA $61
$B9FD LDA #$d6
$B9FF LDY #$b9
$BA01 JSR Funct_b867
$BA04 LDA #$db
$BA06 LDY #$b9
$BA08 JSR Loc_bb0f
$BA0B LDA #$bc
$BA0D LDY #$b9
$BA0F JSR Funct_b850
$BA12 LDA #$c1
$BA14 LDY #$b9
$BA16 JSR Loc_e043
$BA19 LDA #$e0
$BA1B LDY #$b9
$BA1D JSR Funct_b867
$BA20 PLA
$BA21 JSR Loc_bd7e
$BA24 LDA #$e5
$BA26 LDY #$b9
Funct_ba28 JSR Funct_ba8c
$BA2B BNE Loc_ba30
$BA2D JMP Loc_ba8b
Loc_ba30 JSR Funct_bab7
$BA33 LDA #$0
$BA35 STA $26
$BA37 STA $27
$BA39 STA $28
$BA3B STA $29
$BA3D LDA $70
$BA3F JSR Funct_ba59
$BA42 LDA $65
$BA44 JSR Funct_ba59
$BA47 LDA $64
$BA49 JSR Funct_ba59
$BA4C LDA $63
$BA4E JSR Funct_ba59
$BA51 LDA $62
$BA53 JSR Funct_ba5e
$BA56 JMP Loc_bb8f
Funct_ba59 BNE Funct_ba5e
$BA5B JMP Loc_b983
Funct_ba5e LSR
$BA5F ORA #$80
Loc_ba61 TAY
$BA62 BCC Loc_ba7d
$BA64 CLC
$BA65 LDA $29
$BA67 ADC $6D
$BA69 STA $29
$BA6B LDA $28
$BA6D ADC $6C
$BA6F STA $28
$BA71 LDA $27
$BA73 ADC $6B
$BA75 STA $27
$BA77 LDA $26
$BA79 ADC $6A
$BA7B STA $26
Loc_ba7d ROR $26
$BA7F ROR $27
$BA81 ROR $28
$BA83 ROR $29
$BA85 ROR $70
$BA87 TYA
$BA88 LSR
$BA89 BNE Loc_ba61
Loc_ba8b RTS
Funct_ba8c STA StringPtr?_0x22
$BA8E STY StringPtr?_0x22+1
$BA90 LDY #$4
$BA92 LDA (StringPtr?_0x22),Y
$BA94 STA $6D
$BA96 DEY
$BA97 LDA (StringPtr?_0x22),Y
$BA99 STA $6C
$BA9B DEY
$BA9C LDA (StringPtr?_0x22),Y
$BA9E STA $6B
$BAA0 DEY
$BAA1 LDA (StringPtr?_0x22),Y
$BAA3 STA $6E
$BAA5 EOR $66
$BAA7 STA $6F
$BAA9 LDA $6E
$BAAB ORA #$80
$BAAD STA $6A
$BAAF DEY
$BAB0 LDA (StringPtr?_0x22),Y
$BAB2 STA $69
$BAB4 LDA $61
$BAB6 RTS
Funct_bab7 LDA $69
Funct_bab9 BEQ Loc_bada
$BABB CLC
$BABC ADC $61
$BABE BCC Loc_bac4
$BAC0 BMI Loc_badf
$BAC2 CLC
$BAC3 BIT $1410
$BAC6 ADC #$80
$BAC8 STA $61
$BACA BNE Loc_bacf
$BACC JMP Loc_b8fb
Loc_bacf LDA $6F
$BAD1 STA $66
$BAD3 RTS
Funct_bad4 LDA $66
$BAD6 EOR #$ff
$BAD8 BMI Loc_badf
Loc_bada PLA
$BADB PLA
$BADC JMP Loc_b8f7
Loc_badf JMP Loc_b97e
Funct_bae2 JSR Funct_bc0c
$BAE5 TAX
$BAE6 BEQ Loc_baf8
$BAE8 CLC
$BAE9 ADC #$2
$BAEB BCS Loc_badf
Funct_baed LDX #$0
$BAEF STX $6F
$BAF1 JSR Funct_b877
$BAF4 INC $61
$BAF6 BEQ Loc_badf
Loc_baf8 RTS
$BAF9 .DB $84
$BAFA .DB $20
$BAFB .DB $0
$BAFC .DB $0
$BAFD .DB $0
Loc_bafe JSR Funct_bc0c
$BB01 LDA #$f9
$BB03 LDY #$ba
$BB05 LDX #$0
Funct_bb07 STX $6F
$BB09 JSR Funct_bba2
$BB0C JMP Loc_bb12
Loc_bb0f JSR Funct_ba8c
Loc_bb12 BEQ Loc_bb8a
$BB14 JSR Funct_bc1b
$BB17 LDA #$0
$BB19 SEC
$BB1A SBC $61
$BB1C STA $61
$BB1E JSR Funct_bab7
$BB21 INC $61
$BB23 BEQ Loc_badf
$BB25 LDX #$fc
$BB27 LDA #$1
Loc_bb29 LDY $6A
$BB2B CPY $62
$BB2D BNE Loc_bb3f
$BB2F LDY $6B
$BB31 CPY $63
$BB33 BNE Loc_bb3f
$BB35 LDY $6C
$BB37 CPY $64
$BB39 BNE Loc_bb3f
$BB3B LDY $6D
$BB3D CPY $65
Loc_bb3f PHP
$BB40 ROL
$BB41 BCC Loc_bb4c
$BB43 INX
$BB44 STA $29,X
$BB46 BEQ Loc_bb7a
$BB48 BPL Loc_bb7e
$BB4A LDA #$1
Loc_bb4c PLP
$BB4D BCS Loc_bb5d
Loc_bb4f ASL $6D
$BB51 ROL $6C
$BB53 ROL $6B
$BB55 ROL $6A
$BB57 BCS Loc_bb3f
$BB59 BMI Loc_bb29
$BB5B BPL Loc_bb3f
Loc_bb5d TAY
$BB5E LDA $6D
$BB60 SBC $65
$BB62 STA $6D
$BB64 LDA $6C
$BB66 SBC $64
$BB68 STA $6C
$BB6A LDA $6B
$BB6C SBC $63
$BB6E STA $6B
$BB70 LDA $6A
$BB72 SBC $62
$BB74 STA $6A
$BB76 TYA
$BB77 JMP Loc_bb4f
Loc_bb7a LDA #$40
$BB7C BNE Loc_bb4c
Loc_bb7e ASL
$BB7F ASL
$BB80 ASL
$BB81 ASL
$BB82 ASL
$BB83 ASL
$BB84 STA $70
$BB86 PLP
$BB87 JMP Loc_bb8f
Loc_bb8a LDX #$14
$BB8C JMP Loc_a437
Loc_bb8f LDA $26
$BB91 STA $62
$BB93 LDA $27
$BB95 STA $63
$BB97 LDA $28
$BB99 STA $64
$BB9B LDA $29
$BB9D STA $65
$BB9F JMP Funct_b8d7
Funct_bba2 STA StringPtr?_0x22
$BBA4 STY StringPtr?_0x22+1
$BBA6 LDY #$4
$BBA8 LDA (StringPtr?_0x22),Y
$BBAA STA $65
$BBAC DEY
$BBAD LDA (StringPtr?_0x22),Y
$BBAF STA $64
$BBB1 DEY
$BBB2 LDA (StringPtr?_0x22),Y
$BBB4 STA $63
$BBB6 DEY
$BBB7 LDA (StringPtr?_0x22),Y
$BBB9 STA $66
$BBBB ORA #$80
$BBBD STA $62
$BBBF DEY
$BBC0 LDA (StringPtr?_0x22),Y
$BBC2 STA $61
$BBC4 STY $70
$BBC6 RTS
Funct_bbc7 LDX #$5c
$BBC9 BIT $57A2
$BBCC LDY #$0
$BBCE BEQ Loc_bbd4
Loc_bbd0 LDX $49
$BBD2 LDY $4A
Loc_bbd4 JSR Funct_bc1b
$BBD7 STX StringPtr?_0x22
$BBD9 STY StringPtr?_0x22+1
$BBDB LDY #$4
$BBDD LDA $65
$BBDF STA (StringPtr?_0x22),Y
$BBE1 DEY
$BBE2 LDA $64
$BBE4 STA (StringPtr?_0x22),Y
$BBE6 DEY
$BBE7 LDA $63
$BBE9 STA (StringPtr?_0x22),Y
$BBEB DEY
$BBEC LDA $66
$BBEE ORA #$7f
$BBF0 AND $62
$BBF2 STA (StringPtr?_0x22),Y
$BBF4 DEY
$BBF5 LDA $61
$BBF7 STA (StringPtr?_0x22),Y
$BBF9 STY $70
$BBFB RTS
Funct_bbfc LDA $6E
Funct_bbfe STA $66
$BC00 LDX #$5
Loc_bc02 LDA $68,X
$BC04 STA BASIC_CurrentLineData+1,X
$BC06 DEX
$BC07 BNE Loc_bc02
$BC09 STX $70
$BC0B RTS
Funct_bc0c JSR Funct_bc1b
Funct_bc0f LDX #$6
Loc_bc11 LDA BASIC_CurrentLineData+1,X
$BC13 STA $68,X
$BC15 DEX
$BC16 BNE Loc_bc11
$BC18 STX $70
Loc_bc1a RTS
Funct_bc1b LDA $61
$BC1D BEQ Loc_bc1a
$BC1F ASL $70
$BC21 BCC Loc_bc1a
Funct_bc23 JSR Funct_b96f
$BC26 BNE Loc_bc1a
$BC28 JMP Loc_b938
Funct_bc2b LDA $61
$BC2D BEQ Loc_bc38
Loc_bc2f LDA $66
Loc_bc31 ROL
$BC32 LDA #$ff
$BC34 BCS Loc_bc38
$BC36 LDA #$1
Loc_bc38 RTS
$BC39 JSR Funct_bc2b
Loc_bc3c STA $62
$BC3E LDA #$0
$BC40 STA $63
$BC42 LDX #$88
Loc_bc44 LDA $62
$BC46 EOR #$ff
$BC48 ROL
Funct_bc49 LDA #$0
$BC4B STA $65
$BC4D STA $64
Loc_bc4f STX $61
$BC51 STA $70
$BC53 STA $66
$BC55 JMP Loc_b8d2
$BC58 .DB $46
$BC59 .DB $66
$BC5A .DB $60
Funct_bc5b STA $24
Funct_bc5d STY $25
$BC5F LDY #$0
$BC61 LDA ($24),Y
$BC63 INY
$BC64 TAX
$BC65 BEQ Funct_bc2b
$BC67 LDA ($24),Y
$BC69 EOR $66
$BC6B BMI Loc_bc2f
$BC6D CPX $61
$BC6F BNE Loc_bc92
$BC71 LDA ($24),Y
$BC73 ORA #$80
$BC75 CMP $62
$BC77 BNE Loc_bc92
$BC79 INY
$BC7A LDA ($24),Y
$BC7C CMP $63
$BC7E BNE Loc_bc92
$BC80 INY
$BC81 LDA ($24),Y
$BC83 CMP $64
$BC85 BNE Loc_bc92
$BC87 INY
$BC88 LDA #$7f
$BC8A CMP $70
$BC8C LDA ($24),Y
$BC8E SBC $65
$BC90 BEQ Loc_bcba
Loc_bc92 LDA $66
$BC94 BCC Loc_bc98
$BC96 EOR #$ff
Loc_bc98 JMP Loc_bc31
BASIC_ReadInt?_bc9b LDA $61
$BC9D BEQ Loc_bce9
$BC9F SEC
$BCA0 SBC #$a0
$BCA2 BIT $66
$BCA4 BPL Loc_bcaf
$BCA6 TAX
$BCA7 LDA #$ff
$BCA9 STA $68
$BCAB JSR Funct_b94d
$BCAE TXA
Loc_bcaf LDX #$61
$BCB1 CMP #$f9
$BCB3 BPL Loc_bcbb
$BCB5 JSR Funct_b999
$BCB8 STY $68
Loc_bcba RTS
Loc_bcbb TAY
$BCBC LDA $66
$BCBE AND #$80
$BCC0 LSR $62
$BCC2 ORA $62
$BCC4 STA $62
$BCC6 JSR Funct_b9b0
$BCC9 STY $68
$BCCB RTS
Funct_bccc LDA $61
$BCCE CMP #$a0
$BCD0 BCS Loc_bcf2
$BCD2 JSR BASIC_ReadInt?_bc9b
$BCD5 STY $70
$BCD7 LDA $66
$BCD9 STY $66
$BCDB EOR #$80
$BCDD ROL
$BCDE LDA #$a0
$BCE0 STA $61
$BCE2 LDA $65
$BCE4 STA $07
$BCE6 JMP Loc_b8d2
Loc_bce9 STA $62
$BCEB STA $63
$BCED STA $64
$BCEF STA $65
$BCF1 TAY
Loc_bcf2 RTS
Loc_bcf3 LDY #$0
$BCF5 LDX #$a
Loc_bcf7 STY $5D,X
$BCF9 DEX
$BCFA BPL Loc_bcf7
$BCFC BCC Loc_bd0d
$BCFE CMP #$2d
$BD00 BNE Loc_bd06
$BD02 STX $67
$BD04 BEQ Loc_bd0a
Loc_bd06 CMP #$2b
$BD08 BNE Loc_bd0f
Loc_bd0a JSR BASIC_GetNextCMDLineChar
Loc_bd0d BCC Loc_bd6a
Loc_bd0f CMP #$2e
$BD11 BEQ Loc_bd41
$BD13 CMP #$45
$BD15 BNE Loc_bd47
$BD17 JSR BASIC_GetNextCMDLineChar
$BD1A BCC Loc_bd33
$BD1C CMP #$ab
$BD1E BEQ Loc_bd2e
$BD20 CMP #$2d
$BD22 BEQ Loc_bd2e
$BD24 CMP #$aa
$BD26 BEQ Loc_bd30
$BD28 CMP #$2b
$BD2A BEQ Loc_bd30
$BD2C BNE Loc_bd35
Loc_bd2e ROR BASIC_CurrentLineData+1
Loc_bd30 JSR BASIC_GetNextCMDLineChar
Loc_bd33 BCC Loc_bd91
Loc_bd35 BIT BASIC_CurrentLineData+1
$BD37 BPL Loc_bd47
$BD39 LDA #$0
$BD3B SEC
$BD3C SBC $5E
$BD3E JMP Loc_bd49
Loc_bd41 ROR BASIC_CurrentLineData
$BD43 BIT BASIC_CurrentLineData
$BD45 BVC Loc_bd0a
Loc_bd47 LDA $5E
Loc_bd49 SEC
$BD4A SBC $5D
$BD4C STA $5E
$BD4E BEQ Loc_bd62
$BD50 BPL Loc_bd5b
Loc_bd52 JSR Loc_bafe
$BD55 INC $5E
$BD57 BNE Loc_bd52
$BD59 BEQ Loc_bd62
Loc_bd5b JSR Funct_bae2
$BD5E DEC $5E
$BD60 BNE Loc_bd5b
Loc_bd62 LDA $67
$BD64 BMI Loc_bd67
$BD66 RTS
Loc_bd67 JMP Funct_bfb4
Loc_bd6a PHA
$BD6B BIT BASIC_CurrentLineData
$BD6D BPL Loc_bd71
$BD6F INC $5D
Loc_bd71 JSR Funct_bae2
$BD74 PLA
$BD75 SEC
$BD76 SBC #$30
$BD78 JSR Loc_bd7e
$BD7B JMP Loc_bd0a
Loc_bd7e PHA
$BD7F JSR Funct_bc0c
$BD82 PLA
$BD83 JSR Loc_bc3c
$BD86 LDA $6E
$BD88 EOR $66
$BD8A STA $6F
$BD8C LDX $61
$BD8E JMP Loc_b86a
Loc_bd91 LDA $5E
$BD93 CMP #$a
$BD95 BCC Loc_bda0
$BD97 LDA #$64
$BD99 BIT BASIC_CurrentLineData+1
$BD9B BMI Loc_bdae
$BD9D JMP Loc_b97e
Loc_bda0 ASL
$BDA1 ASL
$BDA2 CLC
$BDA3 ADC $5E
$BDA5 ASL
$BDA6 CLC
$BDA7 LDY #$0
$BDA9 ADC (BASIC_CMDPtrMinus1),Y
$BDAB SEC
$BDAC SBC #$30
Loc_bdae STA $5E
$BDB0 JMP Loc_bd30
$BDB3 .DB $9b
$BDB4 .DB $3e
$BDB5 .DB $bc
$BDB6 .DB $1f
$BDB7 .DB $fd
$BDB8 .DB $9e
$BDB9 .DB $6e
$BDBA .DB $6b
$BDBB .DB $27
$BDBC .DB $fd
$BDBD .DB $9e
$BDBE .DB $6e
$BDBF .DB $6b
$BDC0 .DB $28
$BDC1 .DB $0
Funct_bdc2 LDA #<Loc_a371
$BDC4 LDY #>Loc_a371
$BDC6 JSR PrintStringYA_bdda
$BDC9 LDA $3A
$BDCB LDX $39
BASIC_PrintInt STA $62
$BDCF STX $63
$BDD1 LDX #$90
$BDD3 SEC
$BDD4 JSR Funct_bc49
$BDD7 JSR Funct_bddf
PrintStringYA_bdda JMP PrintStingYA_ab1e

Funct_bddd LDY #$1
Funct_bddf LDA #$20
$BDE1 BIT $66
$BDE3 BPL Loc_bde7
$BDE5 LDA #$2d
Loc_bde7 STA $00FF,Y
$BDEA STA $66
$BDEC STY $71
$BDEE INY
$BDEF LDA #$30
$BDF1 LDX $61
$BDF3 BNE Loc_bdf8
$BDF5 JMP Loc_bf04
Loc_bdf8 LDA #$0
$BDFA CPX #$80
$BDFC BEQ Loc_be00
$BDFE BCS Loc_be09
Loc_be00 LDA #$bd
$BE02 LDY #$bd
$BE04 JSR Funct_ba28
$BE07 LDA #$f7
Loc_be09 STA $5D
Loc_be0b LDA #$b8
$BE0D LDY #$bd
$BE0F JSR Funct_bc5b
$BE12 BEQ Loc_be32
$BE14 BPL Loc_be28
Loc_be16 LDA #$b3
$BE18 LDY #$bd
$BE1A JSR Funct_bc5b
$BE1D BEQ Loc_be21
$BE1F BPL Loc_be2f
Loc_be21 JSR Funct_bae2
$BE24 DEC $5D
$BE26 BNE Loc_be16
Loc_be28 JSR Loc_bafe
$BE2B INC $5D
$BE2D BNE Loc_be0b
Loc_be2f JSR Funct_b849
Loc_be32 JSR BASIC_ReadInt?_bc9b
$BE35 LDX #$1
$BE37 LDA $5D
$BE39 CLC
$BE3A ADC #$a
$BE3C BMI Loc_be47
$BE3E CMP #$b
$BE40 BCS Loc_be48
$BE42 ADC #$ff
$BE44 TAX
$BE45 LDA #$2
Loc_be47 SEC
Loc_be48 SBC #$2
$BE4A STA $5E
$BE4C STX $5D
$BE4E TXA
$BE4F BEQ Loc_be53
$BE51 BPL Loc_be66
Loc_be53 LDY $71
$BE55 LDA #$2e
$BE57 INY
$BE58 STA $00FF,Y
$BE5B TXA
$BE5C BEQ Loc_be64
$BE5E LDA #$30
$BE60 INY
$BE61 STA $00FF,Y
Loc_be64 STY $71
Loc_be66 LDY #$0
Funct_be68 LDX #$80
Loc_be6a LDA $65
$BE6C CLC
$BE6D ADC $BF19,Y
$BE70 STA $65
$BE72 LDA $64
$BE74 ADC $BF18,Y
$BE77 STA $64
$BE79 LDA $63
$BE7B ADC $BF17,Y
$BE7E STA $63
$BE80 LDA $62
$BE82 ADC $BF16,Y
$BE85 STA $62
$BE87 INX
$BE88 BCS Loc_be8e
$BE8A BPL Loc_be6a
$BE8C BMI Loc_be90
Loc_be8e BMI Loc_be6a
Loc_be90 TXA
$BE91 BCC Loc_be97
$BE93 EOR #$ff
$BE95 ADC #$a
Loc_be97 ADC #$2f
$BE99 INY
$BE9A INY
$BE9B INY
$BE9C INY
$BE9D STY $47
$BE9F LDY $71
$BEA1 INY
$BEA2 TAX
$BEA3 AND #$7f
$BEA5 STA $00FF,Y
$BEA8 DEC $5D
$BEAA BNE Loc_beb2
$BEAC LDA #$2e
$BEAE INY
$BEAF STA $00FF,Y
Loc_beb2 STY $71
$BEB4 LDY $47
$BEB6 TXA
$BEB7 EOR #$ff
$BEB9 AND #$80
$BEBB TAX
$BEBC CPY #$24
$BEBE BEQ Loc_bec4
$BEC0 CPY #$3c
$BEC2 BNE Loc_be6a
Loc_bec4 LDY $71
Loc_bec6 LDA $00FF,Y
$BEC9 DEY
$BECA CMP #$30
$BECC BEQ Loc_bec6
$BECE CMP #$2e
$BED0 BEQ Loc_bed3
$BED2 INY
Loc_bed3 LDA #$2b
$BED5 LDX $5E
$BED7 BEQ Loc_bf07
$BED9 BPL Loc_bee3
$BEDB LDA #$0
$BEDD SEC
$BEDE SBC $5E
$BEE0 TAX
$BEE1 LDA #$2d
Loc_bee3 STA $0101,Y
$BEE6 LDA #$45
$BEE8 STA $0100,Y
$BEEB TXA
$BEEC LDX #$2f
$BEEE SEC
Loc_beef INX
$BEF0 SBC #$a
$BEF2 BCS Loc_beef
$BEF4 ADC #$3a
$BEF6 STA $0103,Y
$BEF9 TXA
$BEFA STA $0102,Y
$BEFD LDA #$0
$BEFF STA $0104,Y
$BF02 BEQ Loc_bf0c
Loc_bf04 STA $00FF,Y
Loc_bf07 LDA #$0
$BF09 STA $0100,Y
Loc_bf0c LDA #$0
$BF0E LDY #$1
$BF10 RTS
$BF11 .DB $80
$BF12 .DB $0
$BF13 .DB $0
$BF14 .DB $0
$BF15 .DB $0
$BF16 .DB $fa
$BF17 .DB $a
$BF18 .DB $1f
$BF19 .DB $0
$BF1A .DB $0
$BF1B .DB $98
$BF1C .DB $96
$BF1D .DB $80
$BF1E .DB $ff
$BF1F .DB $f0
$BF20 .DB $bd
$BF21 .DB $c0
$BF22 .DB $0
$BF23 .DB $1
$BF24 .DB $86
$BF25 .DB $a0
$BF26 .DB $ff
$BF27 .DB $ff
$BF28 .DB $d8
$BF29 .DB $f0
$BF2A .DB $0
$BF2B .DB $0
$BF2C .DB $3
$BF2D .DB $e8
$BF2E .DB $ff
$BF2F .DB $ff
$BF30 .DB $ff
$BF31 .DB $9c
$BF32 .DB $0
$BF33 .DB $0
$BF34 .DB $0
$BF35 .DB $a
$BF36 .DB $ff
$BF37 .DB $ff
$BF38 .DB $ff
$BF39 .DB $ff
$BF3A .DB $ff
$BF3B .DB $df
$BF3C .DB $a
$BF3D .DB $80
$BF3E .DB $0
$BF3F .DB $3
$BF40 .DB $4b
$BF41 .DB $c0
$BF42 .DB $ff
$BF43 .DB $ff
$BF44 .DB $73
$BF45 .DB $60
$BF46 .DB $0
$BF47 .DB $0
$BF48 .DB $e
$BF49 .DB $10
$BF4A .DB $ff
$BF4B .DB $ff
$BF4C .DB $fd
$BF4D .DB $a8
$BF4E .DB $0
$BF4F .DB $0
$BF50 .DB $0
$BF51 .DB $3c
$BF52 .DB $ec
$BF53 .DB $aa
$BF54 .DB $aa
$BF55 .DB $aa
$BF56 .DB $aa
$BF57 .DB $aa
$BF58 .DB $aa
$BF59 .DB $aa
$BF5A .DB $aa
$BF5B .DB $aa
$BF5C .DB $aa
$BF5D .DB $aa
$BF5E .DB $aa
$BF5F .DB $aa
$BF60 .DB $aa
$BF61 .DB $aa
$BF62 .DB $aa
$BF63 .DB $aa
$BF64 .DB $aa
$BF65 .DB $aa
$BF66 .DB $aa
$BF67 .DB $aa
$BF68 .DB $aa
$BF69 .DB $aa
$BF6A .DB $aa
$BF6B .DB $aa
$BF6C .DB $aa
$BF6D .DB $aa
$BF6E .DB $aa
$BF6F .DB $aa
$BF70 .DB $aa
$BF71 .DB $20
$BF72 .DB $c
$BF73 .DB $bc
$BF74 .DB $a9
$BF75 .DB $11
$BF76 .DB $a0
$BF77 .DB $bf
$BF78 JSR Funct_bba2
$BF7B BEQ Loc_bfed
$BF7D LDA $69
$BF7F BNE Loc_bf84
$BF81 JMP Loc_b8f9
Loc_bf84 LDX #$4e
$BF86 LDY #$0
$BF88 JSR Loc_bbd4
$BF8B LDA $6E
$BF8D BPL Loc_bf9e
$BF8F JSR Funct_bccc
$BF92 LDA #$4e
$BF94 LDY #$0
$BF96 JSR Funct_bc5b
$BF99 BNE Loc_bf9e
$BF9B TYA
$BF9C LDY $07
Loc_bf9e JSR Funct_bbfe
$BFA1 TYA
$BFA2 PHA
$BFA3 JSR Funct_b9ea
$BFA6 LDA #$4e
$BFA8 LDY #$0
$BFAA JSR Funct_ba28
$BFAD JSR Loc_bfed
$BFB0 PLA
$BFB1 LSR
$BFB2 BCC Loc_bfbe
Funct_bfb4 LDA $61
$BFB6 BEQ Loc_bfbe
$BFB8 LDA $66
$BFBA EOR #$ff
$BFBC STA $66
Loc_bfbe RTS
$BFBF .DB $81
$BFC0 .DB $38
$BFC1 .DB $aa
$BFC2 .DB $3b
$BFC3 .DB $29
$BFC4 .DB $7
$BFC5 .DB $71
$BFC6 .DB $34
$BFC7 .DB $58
$BFC8 .DB $3e
$BFC9 .DB $56
$BFCA .DB $74
$BFCB .DB $16
$BFCC .DB $7e
$BFCD .DB $b3
$BFCE .DB $1b
$BFCF .DB $77
$BFD0 .DB $2f
$BFD1 .DB $ee
$BFD2 .DB $e3
$BFD3 .DB $85
$BFD4 .DB $7a
$BFD5 .DB $1d
$BFD6 .DB $84
$BFD7 .DB $1c
$BFD8 .DB $2a
$BFD9 .DB $7c
$BFDA .DB $63
$BFDB .DB $59
$BFDC .DB $58
$BFDD .DB $a
$BFDE .DB $7e
$BFDF .DB $75
$BFE0 .DB $fd
$BFE1 .DB $e7
$BFE2 .DB $c6
$BFE3 .DB $80
$BFE4 .DB $31
$BFE5 .DB $72
$BFE6 .DB $18
$BFE7 .DB $10
$BFE8 .DB $81
$BFE9 .DB $0
$BFEA .DB $0
$BFEB .DB $0
$BFEC .DB $0
Loc_bfed LDA #$bf
$BFEF LDY #$bf
$BFF1 JSR Funct_ba28
$BFF4 LDA $70
$BFF6 ADC #$50
$BFF8 BCC Loc_bffd
$BFFA JSR Funct_bc23
Loc_bffd JMP Funct_e000


 Created with the Notable Developments Disassembler.