Apple II manual Rdaddr LDY

Models: II

1 257
Download 257 pages 49.17 Kb
Page 201
Image 201

3663

FBB8 20 3B E8

 

JSR

BLANK2

 

3664

FBBB 20 3B E8

 

JSR

BLANK2

 

3665

FBBE 4C 06 FE

 

JMP

MNEM

;JUMP TO INPUT MNEMONIC OPCODE

3666

FBC1 A9 00

MODEM

LDA

#00

;SET UP TO FORM MODE MATCH

3667

FBC3 8D 26 01

 

STA

TMASK1

 

3668

FBC6 8D 27 01

 

STA

TMASK2

 

3669

FBC9 20 3E E8

 

JSR

BLANK

 

3670

FBCC AC 2E 01

 

LDY

TYPE

 

3671

FBCF 38

 

SEC

 

 

3672

FBD0 6E 26 01

PNTLUP ROR TMASK1

;SHIFT POINTER TO INSTRUCTION TYPE

3673

FBD3 6E 27 01

 

ROR

TMASK2

 

3674

FBD6 88

 

DEY

 

 

3675

FBD7 D0 F7

 

BNE

PNTLUP

 

3676

FBD9

 

 

 

 

3677

FBD9

;TEST FOR ONE BYTE INSTRUCTION

3678

FBD9 AC 2E 01

 

LDY

TYPE

 

3679

FBDC C0 0D

 

CPY

#$0D

 

3680

FBDE D0 05

 

BNE

RDADDR

 

3681

FBE0 A2 00

 

LDX

#00

 

3682

FBE2

 

 

 

 

3683

FBE2

;INPUT

ADRESS FIELD

 

3684

FBE2 4C CB FC

 

JMP

OPCOMP

 

3685

FBE5 A0 06

RDADDR LDY

#06

;CLEAR ADDRESS FIELD (NON HEX)

3686

FBE7 A9 51

 

LDA

#'Q'

 

3687

FBE9 99 32 01

CLRLUP STA

ADFLD-1,Y

 

3688

FBEC 88

 

DEY

 

 

3689

FBED D0 FA

 

BNE CLRLUP

;(LEAVES Y = 0 FOR NEXT PHASE)

3690

FBEF 20 5F E9

 

JSR RDRUP

;WITH RUBOUT

3691

FBF2 C9 20

 

CMP

#' '

;IGNORE SPACE CHARACTERS

3692

FBF4 F0 EF

 

BEQ

RDADDR

 

3693

FBF6 99 33 01

STORCH STA

ADFLD,Y

;STORE ADDRESS CHARACTER

3694

FBF9 C8

 

INY

 

 

3695

FBFA C0 07

 

CPY

#07

 

3696

FBFC B0 5C

 

BCS

TRY56

 

3697

FBFE 20 5F E9

 

JSR

RDRUP

;READ REMAINDER OF ADDRESS CHARS

3698

FC01 C9 20

 

CMP

#' '

;THRU WHEN <SPACE> OR <CR>

3699

FC03 D0 05

 

BNE

STOR1

 

3700

FC05 EE 37 A4

 

INC

CODFLG

;SET CODE FLG

3701

FC08 D0 04

 

BNE

EVAL

 

3702

FC0A C9 0D

STOR1

CMP

#CR

;CHECK FOR <CR>

3703

FC0C D0 E8

 

BNE

STORCH

 

3704

FC0E

 

 

 

 

3705

FC0E

;SEPARATE ADDRESS MODE FROM ADDRESS FIELD

3706

FC0E 8C 31 A4

EVAL

STY TEMPX

;TEMPX NOW HAS NUMBER OF CHAR

3707

FC11 AD 33 01

 

LDA ADFLD

;CHECK FIRST CHAR FOR # OR (

3708

FC14 C9 23

 

CMP

#'#'

 

3709

FC16 F0 25

 

BEQ

HATCJ

 

3710

FC18 C9 28

 

CMP

#'('

 

3711

FC1A F0 5A

 

BEQ

PAREN

 

3712

FC1C AD 31 A4

 

LDA

TEMPX

;CHECK FOR ACCUMULATOR MODE

3713

FC1F C9 01

 

CMP

#01

 

3714

FC21 D0 05

 

BNE

TRYZP

 

3715

FC23 A2 01

ACCUM

LDX

#01

 

3716

FC25 4C CB FC

 

JMP

OPCOMP

 

3717

FC28 C9 02

TRYZP

CMP

#02

;CHECK FOR ZERO PAGE MODE

3718

FC2A D0 14

 

BNE

TRY34

 

3719

FC2C AD 2E 01

 

LDA

TYPE

;CHCK FOR BRNCH WITH RELATIVE ADDR`

3720

FC2F C9 0C

 

CMP

#$0C

 

3721

FC31 D0 05

 

BNE

ZPAGE

 

3722

FC33 A2 02

 

LDX

#02

 

3723

FC35 4C CB FC

 

JMP

OPCOMP

 

3724

FC38 A2 05

ZPAGE

LDX

#05

 

 

 

 

 

 

 

Page 201
Image 201
Apple II manual Rdaddr LDY