0000FLTPTIDTProgram Identifier
Directive that affects the Assembler output

[<label>] b IDT b '<string>' b [<comment>]

0000TITLPage Title
Directive that affects the Assembler output

[<label>] b TITL b '<string>' b [<comment>]
'T.I. 99/4A FLOATING POINT & CASSETTE'Character String operand

0000*

0000* HIGH ROM >0FF4 TO >1FFF

0000*

0000*

0000* MEMORY ALLOCATION:

0000* 0 - >1FFF       INTERNAL ROM

0000* >2000 - >3FFF   MEMORY EXPANSION PERIPHERAL

0000* >4000 - >5FFF   PERIPHERAL EXPANSION ( DECODED TO I/O CON)

0000* >6000 - >7FFF   CARTRIDGE ROM/RAM (GROM CONNECTOR)

0000* >8000 - >83FF   INTERNAL RAM (ONLY 8300 - 83FF USED)

0000* >8300 - >83FF   SCRATCH PAD RAM

0000* >8400           SOUND

0000* >8800           VDP READ DATA

0000* >8802           VDP READ STATUS

0000* >8C00           VDP WRITE DATA

0000* >8C02           VDP WRITE ADDRESS

0000* >9000           SPEECH READ

0000* >9400           SPEECH WRITE

0000* >9800           GROM READ DATA

0000* >9802           GROM READ ADDRESS

0000* >9C00           GROM WRITE DATA

0000* >9C02           GROM WRITE ADDRESS

0000* >A000 - >FFFF   MEMORY EXPANSION PERIPHERAL

0000*

0000* CRU ALLOCATION

0000* 0000-0FFE INTERNAL USE

0000* 1000-10FE UNASSIGNED

0000* 1100-11FE DISK CONTROLLER CARD

0000* 1200-12FE MODEMS

0000* 1300-13FE RS232 (PRIMARY)

0000* 1400-14FE UNASSIGNED

0000* 1500-15FE RS232 (SECONDARY)

0000* 1600-16FE UNASSIGNED

0000* 1700-17FE HEX-BUS

0000* 1800-18FE THERMAL PRINTER

0000* 1900-19FE EPROM PROGRAMMER

0000* 1A00-1BFE UNASSIGNED

0000* 1C00-1CFE VIDEO CONTROLLER CARD

0000* 1D00-1DFE IEE 488 CONTROLLER CARD

0000* 1E00-1EFE UNASSIGNED

0000* 1F00-1FFE P-CODE CARD

0000*

0000* 9901 CRU BIT ALLOCATIONS

0000* 0    CONTROL

0000* 1    EXTERNAL INTERRUPT

0000* 2    VDP VERT. SYNC INTERRUPT

0000* 3    9901 INTERNAL TIMER INTERRUPT

0000*      KEYBOARD '=' LINE

0000*      JOYSTICK 'FIRE'

0000* 4    KEYBOARD 'SPACE' LINE

0000*      JOYSTICK 'LEFT'

0000* 5    KEYBOARD 'ENTER' LINE

0000*      JOYSTICK 'RIGHT'

0000* 6    KEYBOARD '0' LINE

0000*      JOYSTICK 'DOWN'

0000* 7    KEYBOARD 'FCTN' LINE

0000*      JOYSTICK 'UP'

0000* 8    KEYBOARD 'SHIFT' LINE

0000* 9    KEYBOARD 'CTRL' LINE

0000* 10   KEYBOARD 'Z' LINE

0000* 11   NOT USED AS INTERRUPT

0000* 12   RESERVED, HIGH LEVEL

0000* 13-15 NOT USED AS INTERRUPT

0000*

0000* 16   RESERVED

0000* 17   RESERVED

0000* 18   BIT 2 OF KEYBOARD SELECT

0000* 19   BIT 1 OF KEYBOARD SELECT

0000* 20   BIT 0 (MSB) OF KEYBOARD SELECT

0000* 21   KEYBOARD ALPHA LOCK

0000* 22   CASSETTE CONTROL 1 (MOTOR CONTROL)

0000* 23   CASSETTE CONTROL 2 (MOTOR CONTROL)

0000* 24   AUDIO GATE

0000* 25   MAG TAPE OUT

0000* 26   RESERVED

0000* 27   MAG TAPE INPUT

0000* 28-31 NOT USED IN I/O MAPPING

0000*

0000*************************************

0000*  DEFINITIONS FOR BASIC INTERPRETER

0000*

0000DEFExternal Definition
Directive that Links programs

[<label>] b DEF b <symbol>[,<symbol>]... b [<comment>]
CSNGRSymbol operand,SADDSymbol operand,SCOMPBSymbol operand,SSUBSymbol operand,SDIVSymbol operand,CFISymbol operand,SMULTSymbol operand

0000*

0000*  DEFINITIONS FOR GPL INTERPRETER

0000*

0000DEFExternal Definition
Directive that Links programs

[<label>] b DEF b <symbol>[,<symbol>]... b [<comment>]
XTABSymbol operand,WRITESymbol operand,TIMERSymbol operand,VERIFYSymbol operand,READSymbol operand

0000*

0000* REFERENCES INTO GPL ROM FROM FPT ROM

0000*

0000HX0020EQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
S+0050Expression operand
Definition: S+0050
Results to: 0050

Symbol S is defined at location 0000
Symbol S is defined as 0

0000NEXTEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
S+0112Expression operand
Definition: S+0112
Results to: 0112

Symbol S is defined at location 0000
Symbol S is defined as 0

0000SROMEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
S+2752Expression operand
Definition: S+2752
Results to: 2752

Symbol S is defined at location 0000
Symbol S is defined as 0

0000SGROMEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
S+2852Expression operand
Definition: S+2852
Results to: 2852

Symbol S is defined at location 0000
Symbol S is defined as 0

0000*

0000* REFERENCES INTO BASIC ROM FROM FPT ROM

0000*

0000SYMBEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
S+5704Expression operand
Definition: S+5704
Results to: 5704

Symbol S is defined at location 0000
Symbol S is defined as 0

0000SMBBEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
S+5710Expression operand
Definition: S+5710
Results to: 5710

Symbol S is defined at location 0000
Symbol S is defined as 0

0000ASSGNVEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
S+5698Expression operand
Definition: S+5698
Results to: 5698

Symbol S is defined at location 0000
Symbol S is defined as 0

0000FBSYMBEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
S+5590Expression operand
Definition: S+5590
Results to: 5590

Symbol S is defined at location 0000
Symbol S is defined as 0

0000VPUSHGEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
S+5692Expression operand
Definition: S+5692
Results to: 5692

Symbol S is defined at location 0000
Symbol S is defined as 0

0000VPOPEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
S+7982Expression operand
Definition: S+7982
Results to: 7982

Symbol S is defined at location 0000
Symbol S is defined as 0

0000PGMCHEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
S+6248Expression operand
Definition: S+6248
Results to: 6248

Symbol S is defined at location 0000
Symbol S is defined as 0

0000POPSTKEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
S+8104Expression operand
Definition: S+8104
Results to: 8104

Symbol S is defined at location 0000
Symbol S is defined as 0

0000GETCHEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
S+8136Expression operand
Definition: S+8136
Results to: 8136

Symbol S is defined at location 0000
Symbol S is defined as 0

0000GETCHGEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
S+8154Expression operand
Definition: S+8154
Results to: 8154

Symbol S is defined at location 0000
Symbol S is defined as 0

0000*

0000* EQUATES

0000*

0000VWDOFFEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
-2Expression operandVDP WRITE DATA OFFSET (FROM R15)

0000GRAOFFEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
2Expression operandGROM READ ADDRESS OFFSET (FROM R13)

0000GWDOFFEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
1024Expression operandGROM WRITE DATA OFFSET (FROM R13)

0000VRSOFFEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
-1024Expression operandVDP READ STATUS OFFSET (FROM R15)

0000GWAOFFEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
1026Expression operandWRITE ADDRESS OFFSET(FROM R13)

0000VRDOFFEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
-1026Expression operandVDP READ DATA OFFSET (FROM R15)

0000SGCADREQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
33792Expression operandSOUND CHIP

0000*

0000* RAM EQUATES

0000*

0000PADEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
33536Expression operand

0000FACEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
PAD+74Expression operand
Definition: PAD+74
Results to: 33610

Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

0000FDVSREQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
FAC+10Expression operand
Definition: FAC+10
Results to: 33620

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
DIVISOR STORE DURING DIVISION

0000ARGEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
PAD+92Expression operand
Definition: PAD+92
Results to: 33628

Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

0000PLAYEREQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
PAD+116Expression operand
Definition: PAD+116
Results to: 33652

Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

0000SIGNEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
PAD+117Expression operand
Definition: PAD+117
Results to: 33653

Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

0000EXPEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
PAD+118Expression operand
Definition: PAD+118
Results to: 33654

Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

0000STATUSEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
PAD+124Expression operand
Definition: PAD+124
Results to: 33660

Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

0000ERRCDEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
STATUSExpression operand
Definition: STATUS
Results to: 33660

Symbol STATUS is defined at location 0000
Symbol STATUS is defined as PAD+124
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

0000GROMFGEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
PAD+137Expression operand
Definition: PAD+137
Results to: 33673

Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

0000*

0000WKSCEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
PAD+192Expression operand
Definition: PAD+192
Results to: 33728

Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
INT. 1 WORKSPACE

0000WKSEEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
PAD+224Expression operand
Definition: PAD+224
Results to: 33760

Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
MAIN WORKSPACE

0000R0LSBEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
WKSE+R0+R0+1Expression operand
Definition: WKSE+R0+R0+1
Results to: 33761

Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R0 resolves to the Register number.
Register R0 resolves to the Register number.

0000R1LSBEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
WKSE+R1+R1+1Expression operand
Definition: WKSE+R1+R1+1
Results to: 33763

Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R1 resolves to the Register number.
Register R1 resolves to the Register number.

0000R2LSBEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
WKSE+R2+R2+1Expression operand
Definition: WKSE+R2+R2+1
Results to: 33765

Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R2 resolves to the Register number.
Register R2 resolves to the Register number.

0000R3LSBEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
WKSE+R3+R3+1Expression operand
Definition: WKSE+R3+R3+1
Results to: 33767

Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R3 resolves to the Register number.
Register R3 resolves to the Register number.

0000R6LSBEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
WKSE+R6+R6+1Expression operand
Definition: WKSE+R6+R6+1
Results to: 33773

Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R6 resolves to the Register number.
Register R6 resolves to the Register number.

0000R7LSBEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
WKSE+R7+R7+1Expression operand
Definition: WKSE+R7+R7+1
Results to: 33775

Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R7 resolves to the Register number.
Register R7 resolves to the Register number.

0000R8LSBEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
WKSE+R8+R8+1Expression operand
Definition: WKSE+R8+R8+1
Results to: 33777

Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R8 resolves to the Register number.
Register R8 resolves to the Register number.

0000R9LSBEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
WKSE+R9+R9+1Expression operand
Definition: WKSE+R9+R9+1
Results to: 33779

Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R9 resolves to the Register number.
Register R9 resolves to the Register number.

0000R10LSBEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
WKSE+R10+R10+1Expression operand
Definition: WKSE+R10+R10+1
Results to: 33781

Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R10 resolves to the Register number.
Register R10 resolves to the Register number.

0000*

0000VDPREGEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
32768Expression operand

0000*

0000GREQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
38912Expression operandGROM READ (DATA)

0000VRDEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
34816Expression operandVDP READ DATA

0000VRSEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
34818Expression operandVDP READ STATUS

0000VWDEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
35840Expression operandVDP WRITE DATA

0000VWAEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
35842Expression operandVDP WRITE ADDRESS

0000*

0000* MISC. EQUATES

0000HIBYTEEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
0256Expression operand

0000OFERREQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
0256Expression operandOVERFLOW ERROR CODE

0000DZERREQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
0512Expression operandDIVIDE BY ZERO ERROR CODE

0000SGNBITEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
32768Expression operand

0000*

0000SEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
0Expression operand

0D1AAORGAbsolute Origin
Directive that affects the Location Counter

[<label>] b AORG b <wd-exp> b [<comment>]
S+3354Expression operand
Definition: S+3354
Results to: 3354

Symbol S is defined at location 0000
Symbol S is defined as 0

0D1A*

0D1AFLTTABDATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
0Expression operand,ROUNDExpression operand
Definition: ROUND
Results to: 3924

Symbol ROUND is a pointer to location 3924
,ROUNUExpression operand
Definition: ROUNU
Results to: 4018

Symbol ROUNU is a pointer to location 4018
,STEXITExpression operand
Definition: STEXIT
Results to: 4004

Symbol STEXIT is a pointer to location 4004
,OVEXPExpression operand
Definition: OVEXP
Results to: 4034

Symbol OVEXP is a pointer to location 4034
,OVExpression operand
Definition: OV
Results to: 4044

Symbol OV is a pointer to location 4044
,FADDExpression operand
Definition: FADD
Results to: 3456

Symbol FADD is a pointer to location 3456
,FSUBExpression operand
Definition: FSUB
Results to: 3452

Symbol FSUB is a pointer to location 3452

0D2ADATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
FMULTExpression operand
Definition: FMULT
Results to: 3720

Symbol FMULT is a pointer to location 3720
,FDIVExpression operand
Definition: FDIV
Results to: 4084

Symbol FDIV is a pointer to location 4084
,FCOMPExpression operand
Definition: FCOMP
Results to: 3386

Symbol FCOMP is a pointer to location 3386
,SADDExpression operand
Definition: SADD
Results to: 3460

Symbol SADD is a pointer to location 3460
,SSUBExpression operand
Definition: SSUB
Results to: 3444

Symbol SSUB is a pointer to location 3444
,SMULTExpression operand
Definition: SMULT
Results to: 3724

Symbol SMULT is a pointer to location 3724
,SDIVExpression operand
Definition: SDIV
Results to: 4088

Symbol SDIV is a pointer to location 4088
,SCOMPExpression operand
Definition: SCOMP
Results to: 3398

Symbol SCOMP is a pointer to location 3398

0D3A*

0D3A* FLOATING COMPARE

0D3A*

0D3A* = BR TABLE

0D3AFCOMPMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R11Workspace Register operand,R10Workspace Register operand

0D3CLILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R3Workspace Register operand,STEX01Immediate Value operand
Definition: STEX01
Results to: 4010

Symbol STEX01 is a pointer to location 4010
LOAD EXIT FOR GPL COMPARE

0D40JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
FCOMP1Expression operand
Definition: FCOMP1
Results to: 3408

Symbol FCOMP1 is a pointer to location 3408

0D42*

0D42* STACK COMPARE ENTRY FOR BASIC

0D42*

0D42* = BL

0D42SCOMPBMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R11Workspace Register operand,R3Workspace Register operandDON'T USE STEX01 FOR BASIC

0D44JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
SCOMP1Expression operand
Definition: SCOMP1
Results to: 3404

Symbol SCOMP1 is a pointer to location 3404

0D46*

0D46* STACK COMPARE ENTRY FOR GPL

0D46*

0D46SCOMPLILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R3Workspace Register operand,STEX01Immediate Value operand
Definition: STEX01
Results to: 4010

Symbol STEX01 is a pointer to location 4010
EXIT FOR GPL COMPARE

0D4AMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R11Workspace Register operand,R10Workspace Register operand

0D4CSCOMP1BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@POPSTKSymbolic Memory operand
Definition: @POPSTK
Results to: 8104

Symbol POPSTK is defined at location 0000
Symbol POPSTK is defined as S+8104
Symbol S is defined at location 0000
Symbol S is defined as 0
STACK COMPARE

0D50FCOMP1LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R7Workspace Register operand,ARGImmediate Value operand
Definition: ARG
Results to: 33628

Symbol ARG is defined at location 0000
Symbol ARG is defined as PAD+92
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

0D54LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R5Workspace Register operand,FACImmediate Value operand
Definition: FAC
Results to: 33610

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

0D58CCompare Words
Compare instruction

[<label>] b C b <gas>,<gad> b [<comment>]
*R7Indirect Workspace Register operand,*R5+Indirect Workspace Register Auto Increment operandCOMPARE THE 1ST WORDS

0D5AJNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
FCOMRTExpression operand
Definition: FCOMRT
Results to: 3442

Symbol FCOMRT is a pointer to location 3442
DONE COMPARING IF NOT EQ

0D5CMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
*R7+Indirect Workspace Register Auto Increment operand,R6Workspace Register operandSIGN OF NUMBERS

0D5EJEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
FCOMRTExpression operand
Definition: FCOMRT
Results to: 3442

Symbol FCOMRT is a pointer to location 3442
NUMBERS ARE ZERO AND EQ

0D60JGTJump if Greater Than
Jump and Branch instruction

[<label>] b JGT b <exp> b [<comment>]
FCOM01Expression operand
Definition: FCOM01
Results to: 3432

Symbol FCOM01 is a pointer to location 3432
BOTH NEGATIVE

0D62MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R5Workspace Register operand,R6Workspace Register operand

0D64MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R7Workspace Register operand,R5Workspace Register operand

0D66MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R6Workspace Register operand,R7Workspace Register operand

0D68FCOM01CCompare Words
Compare instruction

[<label>] b C b <gas>,<gad> b [<comment>]
*R7+Indirect Workspace Register Auto Increment operand,*R5+Indirect Workspace Register Auto Increment operandBOTH +VE

0D6AJNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
FCOMRTExpression operand
Definition: FCOMRT
Results to: 3442

Symbol FCOMRT is a pointer to location 3442
CONTINUE COMP'G UNTIL UNEQUAL

0D6CCCompare Words
Compare instruction

[<label>] b C b <gas>,<gad> b [<comment>]
*R7+Indirect Workspace Register Auto Increment operand,*R5+Indirect Workspace Register Auto Increment operandOR END OF NUMBER

0D6EJNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
FCOMRTExpression operand
Definition: FCOMRT
Results to: 3442

Symbol FCOMRT is a pointer to location 3442

0D70CCompare Words
Compare instruction

[<label>] b C b <gas>,<gad> b [<comment>]
*R7Indirect Workspace Register operand,*R5Indirect Workspace Register operandTHE LAST ENVELOPE!

0D72FCOMRTBBranch
Jump and Branch instruction

[<label>] b B b <gas> b [<comment>]
*R3Indirect Workspace Register operandEXIT AS SPECIFIED

0D74*

0D74* FLOATING ADDITION AND SUBTRACTION

0D74* THE TOP 2 STACK ELEMENTS ARE POPPED, ADDED (OR SUBT'D)

0D74* AND THE RESULT PUSHED ONTO THE STACK

0D74* = BL *R2

0D74SSUBMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R11Workspace Register operand,R10Workspace Register operandSAVE RTN ADR

0D76BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@POPSTKSymbolic Memory operand
Definition: @POPSTK
Results to: 8104

Symbol POPSTK is defined at location 0000
Symbol POPSTK is defined as S+8104
Symbol S is defined at location 0000
Symbol S is defined as 0
STACK SUBTRACTION

0D7AMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R10Workspace Register operand,R11Workspace Register operand

0D7CFSUBNEGNegate
Arithmetic instruction

[<label>] b NEG b <gas> b [<comment>]
@FACSymbolic Memory operand
Definition: @FAC
Results to: 33610

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
NEGATE THE RH ARGUMENT

0D80FADDMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R11Workspace Register operand,R10Workspace Register operandSAVE RTN

0D82JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
FADD1Expression operand
Definition: FADD1
Results to: 3466

Symbol FADD1 is a pointer to location 3466

0D84* = BL *R2

0D84SADDMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R11Workspace Register operand,R10Workspace Register operandSAVE RTN

0D86BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@POPSTKSymbolic Memory operand
Definition: @POPSTK
Results to: 8104

Symbol POPSTK is defined at location 0000
Symbol POPSTK is defined as S+8104
Symbol S is defined at location 0000
Symbol S is defined as 0

0D8AFADD1MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
@ARGSymbolic Memory operand
Definition: @ARG
Results to: 33628

Symbol ARG is defined at location 0000
Symbol ARG is defined as PAD+92
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,R7Workspace Register operand
IS ARG. ZERO?

0D8EJEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
FADD02Expression operand
Definition: FADD02
Results to: 3492

Symbol FADD02 is a pointer to location 3492
YES, NO CHANGE TO FAC

0D90MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
@FACSymbolic Memory operand
Definition: @FAC
Results to: 33610

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,R8Workspace Register operand
IS FAC ZERO?

0D94JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
FADD03Expression operand
Definition: FADD03
Results to: 3496

Symbol FADD03 is a pointer to location 3496
NO, GO ADD FAC TO ARG

0D96LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R1Workspace Register operand,-8Immediate Value operandYES, MOVE ARG TO FAC

0D9AFADD01MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
@ARG+8(R1)Indexed Memory operand
Definition: @ARG+8(R1)
Results to: 33638

Symbol ARG is defined at location 0000
Symbol ARG is defined as PAD+92
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,@FAC+8(R1)Indexed Memory operand
Definition: @FAC+8(R1)
Results to: 33620

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

0DA0INCTIncrement by Two
Arithmetic instruction

[<label>] b INCT b <gas> b [<comment>]
R1Workspace Register operand

0DA2JLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
FADD01Expression operand
Definition: FADD01
Results to: 3482

Symbol FADD01 is a pointer to location 3482

0DA4FADD02BBranch
Jump and Branch instruction

[<label>] b B b <gas> b [<comment>]
@STEXSymbolic Memory operand
Definition: @STEX
Results to: 4006

Symbol STEX is a pointer to location 4006
EXIT TO GLI WITH STATUS

0DA8FADD03XORExclusive OR
Logical instruction

[<label>] b XOR b <gas>,<wad> b [<comment>]
R8Workspace Register operand,R7Workspace Register operandSIGN DIFFERENCE

0DAAABSAbsolute Value
Arithmetic instruction

[<label>] b ABS b <gas> b [<comment>]
@FACSymbolic Memory operand
Definition: @FAC
Results to: 33610

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
TAKE ABSOLUTE VAL OF FAC

0DAEABSAbsolute Value
Arithmetic instruction

[<label>] b ABS b <gas> b [<comment>]
@ARGSymbolic Memory operand
Definition: @ARG
Results to: 33628

Symbol ARG is defined at location 0000
Symbol ARG is defined as PAD+92
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
AND ARG

0DB2LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R3Workspace Register operand,-8Immediate Value operandENSURE THAT THE LARGEST NO.

0DB6*                                           IS IN FAC

0DB6FADD20CCompare Words
Compare instruction

[<label>] b C b <gas>,<gad> b [<comment>]
@FAC+8(R3)Indexed Memory operand
Definition: @FAC+8(R3)
Results to: 33624

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,@ARG+8(R3)Indexed Memory operand
Definition: @ARG+8(R3)
Results to: 33642

Symbol ARG is defined at location 0000
Symbol ARG is defined as PAD+92
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

0DBCJGTJump if Greater Than
Jump and Branch instruction

[<label>] b JGT b <exp> b [<comment>]
FADD05Expression operand
Definition: FADD05
Results to: 3546

Symbol FADD05 is a pointer to location 3546
TRUE INITIALLY

0DBEJLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
FADD21Expression operand
Definition: FADD21
Results to: 3526

Symbol FADD21 is a pointer to location 3526
NEED TO SWAY THIS WORD & FOLLOWING

0DC0INCTIncrement by Two
Arithmetic instruction

[<label>] b INCT b <gas> b [<comment>]
R3Workspace Register operand

0DC2JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
FADD20Expression operand
Definition: FADD20
Results to: 3510

Symbol FADD20 is a pointer to location 3510
COMPARE ALL 4 WORDS

0DC4JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
FADD05Expression operand
Definition: FADD05
Results to: 3546

Symbol FADD05 is a pointer to location 3546
FAC = ARG

0DC6FADD21MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
@ARG+8(R3)Indexed Memory operand
Definition: @ARG+8(R3)
Results to: 33642

Symbol ARG is defined at location 0000
Symbol ARG is defined as PAD+92
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,R0Workspace Register operand

0DCAMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
@FAC+8(R3)Indexed Memory operand
Definition: @FAC+8(R3)
Results to: 33624

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,@ARG+8(R3)Indexed Memory operand
Definition: @ARG+8(R3)
Results to: 33642

Symbol ARG is defined at location 0000
Symbol ARG is defined as PAD+92
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

0DD0MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R0Workspace Register operand,@FAC+8(R3)Indexed Memory operand
Definition: @FAC+8(R3)
Results to: 33624

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

0DD4INCTIncrement by Two
Arithmetic instruction

[<label>] b INCT b <gas> b [<comment>]
R3Workspace Register operand

0DD6JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
FADD21Expression operand
Definition: FADD21
Results to: 3526

Symbol FADD21 is a pointer to location 3526
CONTINUE THE SWAP

0DD8XORExclusive OR
Logical instruction

[<label>] b XOR b <gas>,<wad> b [<comment>]
R7Workspace Register operand,R8Workspace Register operand

0DDAFADD05CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R5Workspace Register operandHANDY ZERO

0DDCCLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
@FAC+8Symbolic Memory operand
Definition: @FAC+8
Results to: 33618

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
CLEAR GUARD DIGITS FOR FAC

0DE0CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
@ARG+8Symbolic Memory operand
Definition: @ARG+8
Results to: 33636

Symbol ARG is defined at location 0000
Symbol ARG is defined as PAD+92
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
AND ARG

0DE4MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
R8Workspace Register operand,@SIGNSymbolic Memory operand
Definition: @SIGN
Results to: 33653

Symbol SIGN is defined at location 0000
Symbol SIGN is defined as PAD+117
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
SAVE RESULT SIGN

0DE8CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R6Workspace Register operandCLEAR HIGH BYTE OF EXP DIFF

0DEAMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@FACSymbolic Memory operand
Definition: @FAC
Results to: 33610

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,@R6LSBSymbolic Memory operand
Definition: @R6LSB
Results to: 33773

Symbol R6LSB is defined at location 0000
Symbol R6LSB is defined as WKSE+R6+R6+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R6 resolves to the Register number.
Register R6 resolves to the Register number.
FAC EXP TO R6 LSB

0DF0MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R6Workspace Register operand,@EXPSymbolic Memory operand
Definition: @EXP
Results to: 33654

Symbol EXP is defined at location 0000
Symbol EXP is defined as PAD+118
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
USE FAC EXP AS RESULT EXP

0DF4MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
R5Workspace Register operand,@FACSymbolic Memory operand
Definition: @FAC
Results to: 33610

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
CLEAR HIGH BYTE OF FAC TO CHECK

0DF8*                                           FOR OVERFLOW

0DF8SBSubtract Bytes
Arithmetic instruction

[<label>] b SB b <gas>,<gad> b [<comment>]
@ARGSymbolic Memory operand
Definition: @ARG
Results to: 33628

Symbol ARG is defined at location 0000
Symbol ARG is defined as PAD+92
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,@R6LSBSymbolic Memory operand
Definition: @R6LSB
Results to: 33773

Symbol R6LSB is defined at location 0000
Symbol R6LSB is defined as WKSE+R6+R6+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R6 resolves to the Register number.
Register R6 resolves to the Register number.
SUBTRACT SMALLER EXPONENT

0DFECICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R6Workspace Register operand,7Immediate Value operandSMALLER NUMBER TOO SMALL TO

0E02*                            AFFECT THE SUM?

0E02JGTJump if Greater Than
Jump and Branch instruction

[<label>] b JGT b <exp> b [<comment>]
FADD15Expression operand
Definition: FADD15
Results to: 3716

Symbol FADD15 is a pointer to location 3716
YES, RTN WITH LARGER NO. IN FAC

0E04MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R6Workspace Register operand,R0Workspace Register operandEXPONENT DIFFERENCE

0E06LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,HIBYTEImmediate Value operand
Definition: HIBYTE
Results to: 0256

Symbol HIBYTE is defined at location 0000
Symbol HIBYTE is defined as 0256
1 FOR BYTE OPERATIONS

0E0ALILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R9Workspace Register operand,100*HIBYTEImmediate Value operand
Definition: 100*HIBYTE
Results to: 25600

Symbol HIBYTE is defined at location 0000
Symbol HIBYTE is defined as 0256
100 FOR BYTE OPERATIONS

0E0ELILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R5Workspace Register operand,FAC+9Immediate Value operand
Definition: FAC+9
Results to: 33619

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
POINTER TO LOW BYTE OF BIG NO.

0E12LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R6Workspace Register operand,ARG+9Immediate Value operand
Definition: ARG+9
Results to: 33637

Symbol ARG is defined at location 0000
Symbol ARG is defined as PAD+92
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
AND LOW BYTE OF SMALL NO.

0E16SSubtract Words
Arithmetic instruction

[<label>] b S b <gas>,<gad> b [<comment>]
R0Workspace Register operand,R6Workspace Register operandADJ ARG POINTER TO ALIGN RADIX

0E18MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R0Workspace Register operand,R4Workspace Register operandADD/SUB LOOP COUNT IS

0E1AAIAdd Immediate
Arithmetic instruction

[<label>] b AI b <wa>,<iop> b [<comment>]
R4Workspace Register operand,-9Immediate Value operandBYTES LEFT IN SMALL NUMBER

0E1EMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R7Workspace Register operand,R1Workspace Register operand2 NO'S HAVE SAME SIGN?

0E20JLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
FADD11Expression operand
Definition: FADD11
Results to: 3682

Symbol FADD11 is a pointer to location 3682
NO, SUB THEN, YES ADD THEM

0E22FADD06ABAdd Bytes
Arithmetic instruction

[<label>] b AB b <gas>,<gad> b [<comment>]
*R6Indirect Workspace Register operand,*R5Indirect Workspace Register operandADD A BYTE OF SMALL TO LARGER

0E24CBCompare Bytes
Compare instruction

[<label>] b CB b <gas>,<gad> b [<comment>]
*R5Indirect Workspace Register operand,R9Workspace Register operandIF SUM LT RADIX

0E26JLJump if Logical Low
Jump and Branch instruction

[<label>] b JL b <exp> b [<comment>]
FADD07Expression operand
Definition: FADD07
Results to: 3630

Symbol FADD07 is a pointer to location 3630
THEN CONTINUE TO NEXT BYTE

0E28SBSubtract Bytes
Arithmetic instruction

[<label>] b SB b <gas>,<gad> b [<comment>]
R9Workspace Register operand,*R5Indirect Workspace Register operandSUBTACT RADIX FROM THIS BYTE

0E2AABAdd Bytes
Arithmetic instruction

[<label>] b AB b <gas>,<gad> b [<comment>]
R8Workspace Register operand,@-1(R5)Indexed Memory operand
Definition: @-1(R5)
Results to: 0009
AND ADD CARRY TO NEXT BYTE

0E2EFADD07DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R5Workspace Register operandTO NEXT HIGHER BIG NO. BYTE

0E30DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R6Workspace Register operand AND NEXT HIGHER SMALL BYTE

0E32INCIncrement
Arithmetic instruction

[<label>] b INC b <gas> b [<comment>]
R4Workspace Register operandIF NOT ALL SIGN IF BYTES OF SMALL

0E34JLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
FADD06Expression operand
Definition: FADD06
Results to: 3618

Symbol FADD06 is a pointer to location 3618
ADDED, THEN CONTINUE

0E36JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
FADD09Expression operand
Definition: FADD09
Results to: 3644

Symbol FADD09 is a pointer to location 3644
ELSE PROPAGATE CARRY

0E38FADD08DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R5Workspace Register operandWAS LARGER, POINT TO NEXT BYTE

0E3AABAdd Bytes
Arithmetic instruction

[<label>] b AB b <gas>,<gad> b [<comment>]
R8Workspace Register operand,*R5Indirect Workspace Register operandADD CARRY TO NEXT BYTE

0E3CFADD09SBSubtract Bytes
Arithmetic instruction

[<label>] b SB b <gas>,<gad> b [<comment>]
R9Workspace Register operand,*R5Indirect Workspace Register operandSUB RADIX FROM NEXT BYTE

0E3EJGTJump if Greater Than
Jump and Branch instruction

[<label>] b JGT b <exp> b [<comment>]
FADD08Expression operand
Definition: FADD08
Results to: 3640

Symbol FADD08 is a pointer to location 3640
DONE IF REACHED ONE BYTE

0E40*                             SMALLER THAN RADIX

0E40JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
FADD08Expression operand
Definition: FADD08
Results to: 3640

Symbol FADD08 is a pointer to location 3640
CONTINUE IF RESULT = RADIX

0E42ABAdd Bytes
Arithmetic instruction

[<label>] b AB b <gas>,<gad> b [<comment>]
R9Workspace Register operand,*R5Indirect Workspace Register operandRADIX SUB'S ONCE TOO OFTEN

0E44MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@FACSymbolic Memory operand
Definition: @FAC
Results to: 33610

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,R1Workspace Register operand
CARRY OUT OF HIGH ORDER RESULT?

0E48JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
FADD10Expression operand
Definition: FADD10
Results to: 3680

Symbol FADD10 is a pointer to location 3680
NO, ROUND RESULT

0E4AINCIncrement
Arithmetic instruction

[<label>] b INC b <gas> b [<comment>]
@EXPSymbolic Memory operand
Definition: @EXP
Results to: 33654

Symbol EXP is defined at location 0000
Symbol EXP is defined as PAD+118
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

0E4ELILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R1Workspace Register operand,FAC+8Immediate Value operand
Definition: FAC+8
Results to: 33618

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

0E52LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R2Workspace Register operand,9Immediate Value operand

0E56FADD30MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
*R1Indirect Workspace Register operand,@1(R1)Indexed Memory operand
Definition: @1(R1)
Results to: 0003
SHIFT FAC RIGHT ONE BYTE

0E5AHX01EQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
$-1Expression operand
Definition: $-1
Results to: 3673

$ represents the location 3674

0E5ADECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R1Workspace Register operand

0E5CDECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R2Workspace Register operand

0E5EJNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
FADD30Expression operand
Definition: FADD30
Results to: 3670

Symbol FADD30 is a pointer to location 3670

0E60FADD10JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
ROUN1Expression operand
Definition: ROUN1
Results to: 3926

Symbol ROUN1 is a pointer to location 3926

0E62*

0E62FADD11SBSubtract Bytes
Arithmetic instruction

[<label>] b SB b <gas>,<gad> b [<comment>]
*R6Indirect Workspace Register operand,*R5Indirect Workspace Register operandSUB A BYTE OF SMALL FROM BIG

0E64JGTJump if Greater Than
Jump and Branch instruction

[<label>] b JGT b <exp> b [<comment>]
FADD12Expression operand
Definition: FADD12
Results to: 3694

Symbol FADD12 is a pointer to location 3694

0E66JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
FADD12Expression operand
Definition: FADD12
Results to: 3694

Symbol FADD12 is a pointer to location 3694

0E68ABAdd Bytes
Arithmetic instruction

[<label>] b AB b <gas>,<gad> b [<comment>]
R9Workspace Register operand,*R5Indirect Workspace Register operand

0E6ASBSubtract Bytes
Arithmetic instruction

[<label>] b SB b <gas>,<gad> b [<comment>]
R8Workspace Register operand,@-1(R5)Indexed Memory operand
Definition: @-1(R5)
Results to: 0009

0E6EFADD12DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R5Workspace Register operand

0E70DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R6Workspace Register operand

0E72INCIncrement
Arithmetic instruction

[<label>] b INC b <gas> b [<comment>]
R4Workspace Register operand

0E74JLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
FADD11Expression operand
Definition: FADD11
Results to: 3682

Symbol FADD11 is a pointer to location 3682

0E76JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
FADD14Expression operand
Definition: FADD14
Results to: 3710

Symbol FADD14 is a pointer to location 3710

0E78FADD13ABAdd Bytes
Arithmetic instruction

[<label>] b AB b <gas>,<gad> b [<comment>]
R9Workspace Register operand,*R5Indirect Workspace Register operand

0E7ADECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R5Workspace Register operand

0E7CSBSubtract Bytes
Arithmetic instruction

[<label>] b SB b <gas>,<gad> b [<comment>]
R8Workspace Register operand,*R5Indirect Workspace Register operand

0E7EFADD14MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
*R5Indirect Workspace Register operand,R4Workspace Register operand

0E80JLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
FADD13Expression operand
Definition: FADD13
Results to: 3704

Symbol FADD13 is a pointer to location 3704

0E82JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
NORMALExpression operand
Definition: NORMAL
Results to: 3868

Symbol NORMAL is a pointer to location 3868

0E84FADD15BBranch
Jump and Branch instruction

[<label>] b B b <gas> b [<comment>]
@PACKUPSymbolic Memory operand
Definition: @PACKUP
Results to: 3974

Symbol PACKUP is a pointer to location 3974

0E88*

0E88* FLATING MULTIPLICATION    FAC:= ARG * FAC

0E88*

0E88* ENTRY NOT KNOWN

0E88FMULTMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R11Workspace Register operand,R10Workspace Register operandSAVE RTN

0E8AJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
FMULT1Expression operand
Definition: FMULT1
Results to: 3730

Symbol FMULT1 is a pointer to location 3730

0E8C* = BL *R2

0E8CSMULTMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R11Workspace Register operand,R10Workspace Register operandSTACK MULTIPLICATION

0E8EBLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@POPSTKSymbolic Memory operand
Definition: @POPSTK
Results to: 8104

Symbol POPSTK is defined at location 0000
Symbol POPSTK is defined as S+8104
Symbol S is defined at location 0000
Symbol S is defined as 0

0E92FMULT1LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R3Workspace Register operand,FACImmediate Value operand
Definition: FAC
Results to: 33610

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
IF FAC IS ZERO

0E96LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R5Workspace Register operand,ARGImmediate Value operand
Definition: ARG
Results to: 33628

Symbol ARG is defined at location 0000
Symbol ARG is defined as PAD+92
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

0E9AMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
*R3Indirect Workspace Register operand,R8Workspace Register operandIF FAC IS ZERO

0E9CJEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
FMULZRExpression operand
Definition: FMULZR
Results to: 3882

Symbol FMULZR is a pointer to location 3882
THEN RESULT IS ZERO

0E9EXORExclusive OR
Logical instruction

[<label>] b XOR b <gas>,<wad> b [<comment>]
*R5Indirect Workspace Register operand,R8Workspace Register operandCOMPUTE SIGN RESULT

0EA0ABSAbsolute Value
Arithmetic instruction

[<label>] b ABS b <gas> b [<comment>]
*R5Indirect Workspace Register operandIF ARG IS ZERO

0EA2JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
FMULZRExpression operand
Definition: FMULZR
Results to: 3882

Symbol FMULZR is a pointer to location 3882
THEN ZERO FAC AND RTN

0EA4ABSAbsolute Value
Arithmetic instruction

[<label>] b ABS b <gas> b [<comment>]
*R3Indirect Workspace Register operandTAKE ABS VALUE OF FAC

0EA6CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R9Workspace Register operand  TO ZERO LOW BYTE OF RESULT EXP

0EA8MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
*R3Indirect Workspace Register operand,R9Workspace Register operandRESULT EXP = FAC EXP

0EAAABAdd Bytes
Arithmetic instruction

[<label>] b AB b <gas>,<gad> b [<comment>]
*R5Indirect Workspace Register operand,R9Workspace Register operand +ARG EXP

0EACSWPBSwap Bytes
Load and Move instruction

[<label>] b SWPB b <gas> b [<comment>]
R9Workspace Register operand

0EAEAIAdd Immediate
Arithmetic instruction

[<label>] b AI b <wa>,<iop> b [<comment>]
R9Workspace Register operand,-63Immediate Value operand - BIAS

0EB2MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R9Workspace Register operand,@EXPSymbolic Memory operand
Definition: @EXP
Results to: 33654

Symbol EXP is defined at location 0000
Symbol EXP is defined as PAD+118
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

0EB6MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
R8Workspace Register operand,@SIGNSymbolic Memory operand
Definition: @SIGN
Results to: 33653

Symbol SIGN is defined at location 0000
Symbol SIGN is defined as PAD+117
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
SAVE TILL NORMAL, ROUND

0EBALILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R5Workspace Register operand,FAC+8Immediate Value operand
Definition: FAC+8
Results to: 33618

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
LOW ORDER DIGITS

0EBEFMCLRCLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
*R5+Indirect Workspace Register Auto Increment operand WILL BE

0EC0CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R5Workspace Register operand,FAC+16Immediate Value operand
Definition: FAC+16
Results to: 33626

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
FORMED

0EC4JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
FMCLRExpression operand
Definition: FMCLR
Results to: 3774

Symbol FMCLR is a pointer to location 3774
HERE

0EC6*

0EC6*  R0-R1    WORK REGISTERS FOR MPY, DIV

0EC6*  R2       CURRENT RESULT DIGIT

0EC6*  R3       CURRENT FAC DIGIT

0EC6*  R4       REGISTER NUMBER LOOP COUNT

0EC6*  R5       FAC LOOP COUNT

0EC6*  R6       POINTER TO RESULT IN FAC

0EC6*  R7       NUMBER OF SIGNIF. BYTES IN ARG FRACTION

0EC6*  R8       RB(R0) POINTER

0EC6*  R9       RADIX 100 VALUE

0EC6LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R5Workspace Register operand,FAC+8Immediate Value operand
Definition: FAC+8
Results to: 33618

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
BYTES IN FAC +1

0ECAFMUL02DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R5Workspace Register operandCHANGE SIGNIF. BYTE COUNT

0ECCMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
*R5Indirect Workspace Register operand,R0Workspace Register operandIF NEXT FAC BYTE IS ZERO

0ECECECEJEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
FMUL02Expression operand
Definition: FMUL02
Results to: 3786

Symbol FMUL02 is a pointer to location 3786
  THEN DECREMENT COUNT FOR IT

0ED0LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R7Workspace Register operand,8Immediate Value operandCOUNT SIGNIF. BYTES IN ARG

0ED4FMUL03DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R7Workspace Register operandDEC. FOR ZERO BYTE

0ED6MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@ARG(R7)Indexed Memory operand
Definition: @ARG(R7)
Results to: 33642

Symbol ARG is defined at location 0000
Symbol ARG is defined as PAD+92
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,R0Workspace Register operand
IF THIS BYTE OF ARG IS ZERO

0EDAJEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
FMUL03Expression operand
Definition: FMUL03
Results to: 3796

Symbol FMUL03 is a pointer to location 3796
THEN DEC. COUNT

0EDCCLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R0Workspace Register operandMPY, DIV WORK REGR

0EDEMPYMultiply
Arithmetic instruction

[<label>] b MPY b <gas>,<wad> b [<comment>]
R0Workspace Register operand,R2Workspace Register operandCURRENT RESULT IN HIGH BYTE

0EE0MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R5Workspace Register operand,R6Workspace Register operand

0EE2LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,R0LSBImmediate Value operand
Definition: R0LSB
Results to: 33761

Symbol R0LSB is defined at location 0000
Symbol R0LSB is defined as WKSE+R0+R0+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R0 resolves to the Register number.
Register R0 resolves to the Register number.
RB (R0)

0EE6LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R9Workspace Register operand,100Immediate Value operandRADIX

0EEAFMUL04MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R7Workspace Register operand,R4Workspace Register operandINNER LOOP CTR = BYTES IN ARG

0EECAAdd Words
Arithmetic instruction

[<label>] b A b <gas>,<gad> b [<comment>]
R7Workspace Register operand,R6Workspace Register operandRESULT PTR TO END OF NEXT PARTIAL

0EEE*                             PRODUCT

0EEEMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
*R5Indirect Workspace Register operand,@R3LSBSymbolic Memory operand
Definition: @R3LSB
Results to: 33767

Symbol R3LSB is defined at location 0000
Symbol R3LSB is defined as WKSE+R3+R3+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R3 resolves to the Register number.
Register R3 resolves to the Register number.
RB(R3) IS NEXT DIGIT OF FAC

0EF2MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
R3Workspace Register operand,*R5Indirect Workspace Register operandCLEAR FAC DIGIT FOR NEXT PARTIAL

0EF4FMUL05MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@ARG(R4)Indexed Memory operand
Definition: @ARG(R4)
Results to: 33636

Symbol ARG is defined at location 0000
Symbol ARG is defined as PAD+92
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,*R8Indirect Workspace Register operand
GET NEXT DIGIT OF ARG

0EF8MPYMultiply
Arithmetic instruction

[<label>] b MPY b <gas>,<wad> b [<comment>]
R3Workspace Register operand,R0Workspace Register operand AND MPY IT

0EFAMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
*R6Indirect Workspace Register operand,@R2LSBSymbolic Memory operand
Definition: @R2LSB
Results to: 33765

Symbol R2LSB is defined at location 0000
Symbol R2LSB is defined as WKSE+R2+R2+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R2 resolves to the Register number.
Register R2 resolves to the Register number.
TO CORRESPONDING PARTIAL PRODUCT

0EFE*                             DIGIT IN RB (R2)

0EFEAAdd Words
Arithmetic instruction

[<label>] b A b <gas>,<gad> b [<comment>]
R2Workspace Register operand,R1Workspace Register operandADD IN NEXT PARTIAL PROD DIGIT

0F00DIVDivide
Arithmetic instruction

[<label>] b DIV b <gas>,<wad> b [<comment>]
R9Workspace Register operand,R0Workspace Register operandCONVERT PRODUCT TO RADIX DIGIT

0F02*                             AND CARRY

0F02MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@R1LSBSymbolic Memory operand
Definition: @R1LSB
Results to: 33763

Symbol R1LSB is defined at location 0000
Symbol R1LSB is defined as WKSE+R1+R1+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R1 resolves to the Register number.
Register R1 resolves to the Register number.
,*R6Indirect Workspace Register operand
STORE NEW RESULT DIGIT IN FAC

0F06DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R6Workspace Register operandPOINT TO NEXT HIGHER BYTE OF RESULT

0F08ABAdd Bytes
Arithmetic instruction

[<label>] b AB b <gas>,<gad> b [<comment>]
*R8Indirect Workspace Register operand,*R6Indirect Workspace Register operandADD IN CARRY TO NEXT HIGHER BYTE

0F0A*                             OF RESULT

0F0ADECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R4Workspace Register operandIF ALL ARG DIGITS NOT DONE,

0F0CJGTJump if Greater Than
Jump and Branch instruction

[<label>] b JGT b <exp> b [<comment>]
FMUL05Expression operand
Definition: FMUL05
Results to: 3828

Symbol FMUL05 is a pointer to location 3828
THEN CONTINUE

0F0EDECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R6Workspace Register operandPOINT TO START OF NEXT PARTIAL PROD

0F10DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R5Workspace Register operandIF FAC DIGITS REMAIN

0F12CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R5Workspace Register operand,FACImmediate Value operand
Definition: FAC
Results to: 33610

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

0F16JGTJump if Greater Than
Jump and Branch instruction

[<label>] b JGT b <exp> b [<comment>]
FMUL04Expression operand
Definition: FMUL04
Results to: 3818

Symbol FMUL04 is a pointer to location 3818
THEN CONTINUE

0F18FMENDCLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
@FAC+10Symbolic Memory operand
Definition: @FAC+10
Results to: 33620

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
CLEAR ERROR INDICATOR

0F1C*

0F1C* SIGN      DESTROYS R0 - R2

0F1C*

0F1CNORMALLILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R1Workspace Register operand,-9Immediate Value operandNUMBER OF BYTES IN FAC INCLUDING

0F20*                             GUARD BYTES

0F20NORM01MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@FAC+10(R1)Indexed Memory operand
Definition: @FAC+10(R1)
Results to: 33622

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,R2Workspace Register operand
IS NEXT BYTE OF FAC NON-ZERO?

0F24JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
NORM02Expression operand
Definition: NORM02
Results to: 3892

Symbol NORM02 is a pointer to location 3892
YES, SHIFT REST LEFT

0F26INCIncrement
Arithmetic instruction

[<label>] b INC b <gas> b [<comment>]
R1Workspace Register operandNO, ALL BYTES ZERO?

0F28JLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
NORM01Expression operand
Definition: NORM01
Results to: 3872

Symbol NORM01 is a pointer to location 3872
YES, LOOK AT NEXT BYTE

0F2A*

0F2A* ZERO FAC, SETS FAC =0

0F2A*

0F2AFMULZRCLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
@FACSymbolic Memory operand
Definition: @FAC
Results to: 33610

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
INSTALL FLOATING ZERO

0F2ECLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
@FAC+2Symbolic Memory operand
Definition: @FAC+2
Results to: 33612

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
CLEAR POSSIBLE BASIC TYPE CODE

0F32JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
STEXExpression operand
Definition: STEX
Results to: 4006

Symbol STEX is a pointer to location 4006
AND EXIT WITH STATUS

0F34NORM02MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R1Workspace Register operand,R0Workspace Register operandNUMBER OF NON-ZERO BYTES

0F36AIAdd Immediate
Arithmetic instruction

[<label>] b AI b <wa>,<iop> b [<comment>]
R0Workspace Register operand,9Immediate Value operandFIRST BYTE NON-ZERO?

0F3AJEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
ROUN1Expression operand
Definition: ROUN1
Results to: 3926

Symbol ROUN1 is a pointer to location 3926
YES, FINISH

0F3CSSubtract Words
Arithmetic instruction

[<label>] b S b <gas>,<gad> b [<comment>]
R0Workspace Register operand,@EXPSymbolic Memory operand
Definition: @EXP
Results to: 33654

Symbol EXP is defined at location 0000
Symbol EXP is defined as PAD+118
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
NO, ADJUST EXPONENT FOR SHIFT

0F40LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R2Workspace Register operand,FAC+1Immediate Value operand
Definition: FAC+1
Results to: 33611

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
POINT TO FIRST BYTE OF FAC

0F44NORM03MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@FAC+10(R1)Indexed Memory operand
Definition: @FAC+10(R1)
Results to: 33622

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,*R2+Indirect Workspace Register Auto Increment operand
MOVE NON-ZERO BYTE

0F48*                             TO FAC FIRST DIGIT

0F48INCIncrement
Arithmetic instruction

[<label>] b INC b <gas> b [<comment>]
R1Workspace Register operandIF NON-ZERO BYTES REMAIN

0F4AJLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
NORM03Expression operand
Definition: NORM03
Results to: 3908

Symbol NORM03 is a pointer to location 3908
THEN MOVE ANOTHER BYTE

0F4CNORM04MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
R1Workspace Register operand,*R2+Indirect Workspace Register Auto Increment operandMOVE A ZERO

0F4EDECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R0Workspace Register operandLAST BYTE DONE?

0F50JGTJump if Greater Than
Jump and Branch instruction

[<label>] b JGT b <exp> b [<comment>]
NORM04Expression operand
Definition: NORM04
Results to: 3916

Symbol NORM04 is a pointer to location 3916
NO, CONTINUE

0F52*                            YES, ROUND THE NO. IN FAC AND FINISH

0F52*

0F52* ROUND THE NUMBER IN THE FAC USING THE GUARD DIGITS

0F52*           DESTROYS R0-R2

0F52* ENTRY NOT KNOWN

0F52JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
ROUN1Expression operand
Definition: ROUN1
Results to: 3926

Symbol ROUN1 is a pointer to location 3926
SKIP SAVE IF INTERNAL CALL

0F54ROUNDMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R11Workspace Register operand,R10Workspace Register operandSAVE RTN

0F56ROUN1LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R0Workspace Register operand,50*HIBYTEImmediate Value operand
Definition: 50*HIBYTE
Results to: 12800

Symbol HIBYTE is defined at location 0000
Symbol HIBYTE is defined as 0256

0F5ACCompare Words
Compare instruction

[<label>] b C b <gas>,<gad> b [<comment>]
@FAC+8Symbolic Memory operand
Definition: @FAC+8
Results to: 33618

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,R0Workspace Register operand
IS ROUNDING NECESSARY?

0F5EJLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
PACKUPExpression operand
Definition: PACKUP
Results to: 3974

Symbol PACKUP is a pointer to location 3974
NO, PUT EXPONENT BACK

0F60LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R1Workspace Register operand,7Immediate Value operandROUND UP, GET NO. OF FAC BYTES

0F64ROUNUPLILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R2Workspace Register operand,1*HIBYTEImmediate Value operand
Definition: 1*HIBYTE
Results to: 0256

Symbol HIBYTE is defined at location 0000
Symbol HIBYTE is defined as 0256
1 (FOR BYTE INSTN)

0F68LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R0Workspace Register operand,100*HIBYTEImmediate Value operand
Definition: 100*HIBYTE
Results to: 25600

Symbol HIBYTE is defined at location 0000
Symbol HIBYTE is defined as 0256
100 (SAME)

0F6CROUN02ABAdd Bytes
Arithmetic instruction

[<label>] b AB b <gas>,<gad> b [<comment>]
R2Workspace Register operand,@FAC(R1)Indexed Memory operand
Definition: @FAC(R1)
Results to: 33612

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
ADD ONE TO A BYTE OF FAC

0F70CBCompare Bytes
Compare instruction

[<label>] b CB b <gas>,<gad> b [<comment>]
@FAC(R1)Indexed Memory operand
Definition: @FAC(R1)
Results to: 33612

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,R0Workspace Register operand
IF BYTE NOT GREATER THAN RADIX

0F74JLJump if Logical Low
Jump and Branch instruction

[<label>] b JL b <exp> b [<comment>]
PACKUPExpression operand
Definition: PACKUP
Results to: 3974

Symbol PACKUP is a pointer to location 3974
THEN PUT EXPONENT IN FAC

0F76SBSubtract Bytes
Arithmetic instruction

[<label>] b SB b <gas>,<gad> b [<comment>]
R0Workspace Register operand,@FAC(R1)Indexed Memory operand
Definition: @FAC(R1)
Results to: 33612

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
BRING DIGIT BACK IN RANGE

0F7ADECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R1Workspace Register operandIF CARRY PAST HIGH BYTE OF FAC

0F7CJGTJump if Greater Than
Jump and Branch instruction

[<label>] b JGT b <exp> b [<comment>]
ROUN02Expression operand
Definition: ROUN02
Results to: 3948

Symbol ROUN02 is a pointer to location 3948
THEN CARRY TO NEXT HIGHER BYTE

0F7EINCIncrement
Arithmetic instruction

[<label>] b INC b <gas> b [<comment>]
@EXPSymbolic Memory operand
Definition: @EXP
Results to: 33654

Symbol EXP is defined at location 0000
Symbol EXP is defined as PAD+118
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
FRACTION HAS OVERFLOWED (WAS ALL 9'S)

0F82*                             SHIFT NO. BY ADDING 1 TO EXP

0F82MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
R2Workspace Register operand,@FAC+1Symbolic Memory operand
Definition: @FAC+1
Results to: 33611

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
MAKE THE HIGH BYTE A 1

0F86*

0F86* PUT SIGN AND EXPONENT IN FAC

0F86*

0F86PACKUPMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
@EXPSymbolic Memory operand
Definition: @EXP
Results to: 33654

Symbol EXP is defined at location 0000
Symbol EXP is defined as PAD+118
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,R3Workspace Register operand

0F8ACICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R3Workspace Register operand,128Immediate Value operand

0F8EJHEJump if High or Equal
Jump and Branch instruction

[<label>] b JHE b <exp> b [<comment>]
OVEXP1Expression operand
Definition: OVEXP1
Results to: 4036

Symbol OVEXP1 is a pointer to location 4036

0F90MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@R3LSBSymbolic Memory operand
Definition: @R3LSB
Results to: 33767

Symbol R3LSB is defined at location 0000
Symbol R3LSB is defined as WKSE+R3+R3+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R3 resolves to the Register number.
Register R3 resolves to the Register number.
,@FACSymbolic Memory operand
Definition: @FAC
Results to: 33610

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
PUT EXPONENT IN FAC

0F96MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@SIGNSymbolic Memory operand
Definition: @SIGN
Results to: 33653

Symbol SIGN is defined at location 0000
Symbol SIGN is defined as PAD+117
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,R2Workspace Register operand

0F9AINVInvert
Logical instruction

[<label>] b INV b <gas> b [<comment>]
R2Workspace Register operandIF SIGN IS -VE

0F9CJLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
PACK01Expression operand
Definition: PACK01
Results to: 4002

Symbol PACK01 is a pointer to location 4002

0F9ENEGNegate
Arithmetic instruction

[<label>] b NEG b <gas> b [<comment>]
@FACSymbolic Memory operand
Definition: @FAC
Results to: 33610

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
THEN INVERT 1ST WORD

0FA2PACK01JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
STEXExpression operand
Definition: STEX
Results to: 4006

Symbol STEX is a pointer to location 4006
SKIP SAVE IF INTERNAL CALL

0FA4* ENTRY NOT KNOWN

0FA4STEXITMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R11Workspace Register operand,R10Workspace Register operandSAVE RETURN ADR

0FA6STEXMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
@FACSymbolic Memory operand
Definition: @FAC
Results to: 33610

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,R1Workspace Register operand
SET STATUS ON FAC

0FAASTEX01STSTStore Status
Load and Move instruction

[<label>] b STST b <wa> b [<comment>]
R2Workspace Register operandAND PUT IT

0FACMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
R2Workspace Register operand,@STATUSSymbolic Memory operand
Definition: @STATUS
Results to: 33660

Symbol STATUS is defined at location 0000
Symbol STATUS is defined as PAD+124
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
IN THE STATUS REGISTER

0FB0BBranch
Jump and Branch instruction

[<label>] b B b <gas> b [<comment>]
*R10Indirect Workspace Register operandTHEN RETURN TO GLI

0FB2* ROUND FAC BEGINING AT DIGIT SPECIFIED IN ARG

0FB2* ENTRY NOT KNOWN

0FB2ROUNUMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R11Workspace Register operand,R10Workspace Register operandSAVE RTN

0FB4MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@FAC+10Symbolic Memory operand
Definition: @FAC+10
Results to: 33620

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,R1Workspace Register operand
PICK UP OFFSET

0FB8SRLShift Right Logical
Workspace Register shift instruction

[<label>] b SRL b <wa>,<scnt> b [<comment>]
R1Workspace Register operand,8Shift Count operand

0FBAJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
ROUNUPExpression operand
Definition: ROUNUP
Results to: 3940

Symbol ROUNUP is a pointer to location 3940
AND DO IT

0FBC*

0FBC* ERROR ROUTINE EXITS

0FBC*

0FBC*  DIVIDE BY ZERO EXIT

0FBC*

0FBC* ENTRY NOT KNOWN

0FBCDIVZERLILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R9Workspace Register operand,DZERRImmediate Value operand
Definition: DZERR
Results to: 0512

Symbol DZERR is defined at location 0000
Symbol DZERR is defined as 0512
DIVIDE BY ZERO CODE FOR USER

0FC0JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
BIGFLTExpression operand
Definition: BIGFLT
Results to: 4050

Symbol BIGFLT is a pointer to location 4050
LARGEST MAGNITUDE WITH SIGN

0FC2* ----- OVER/UNDERFLOW -----

0FC2* ENTRY NOT KNOWN

0FC2OVEXPMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R11Workspace Register operand,R10Workspace Register operandSAVE RTN

0FC4OVEXP1MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@EXPSymbolic Memory operand
Definition: @EXP
Results to: 33654

Symbol EXP is defined at location 0000
Symbol EXP is defined as PAD+118
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,R2Workspace Register operand
IS EXPONENT -VE?

0FC8JLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
FMULZRExpression operand
Definition: FMULZR
Results to: 3882

Symbol FMULZR is a pointer to location 3882
YES, RETURN ZERO

0FCAJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
OV1Expression operand
Definition: OV1
Results to: 4046

Symbol OV1 is a pointer to location 4046
SKIP SAVE IF INTERNAL CALL

0FCC* ENTRY NOT KNOWN

0FCCOVMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R11Workspace Register operand,R10Workspace Register operandSAVE RTN

0FCEOV1LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R9Workspace Register operand,OFERRImmediate Value operand
Definition: OFERR
Results to: 0256

Symbol OFERR is defined at location 0000
Symbol OFERR is defined as 0256

0FD2* SUPPLY THE LARGEST MAGNITUDE VALUE WITH PROPER SIGN

0FD2BIGFLTLILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R0Workspace Register operand,-32611Immediate Value operandHIGH WORD OF LARGEST VALUE

0FD6MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@SIGNSymbolic Memory operand
Definition: @SIGN
Results to: 33653

Symbol SIGN is defined at location 0000
Symbol SIGN is defined as PAD+117
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,R2Workspace Register operand
IS FAC -VE

0FDAJLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
BIGF01Expression operand
Definition: BIGF01
Results to: 4062

Symbol BIGF01 is a pointer to location 4062
YES, PUT HIGH WORD IN FAC

0FDCNEGNegate
Arithmetic instruction

[<label>] b NEG b <gas> b [<comment>]
R0Workspace Register operand

0FDEBIGF01LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R2Workspace Register operand,FACImmediate Value operand
Definition: FAC
Results to: 33610

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
GET PRT TO FAC

0FE2MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R0Workspace Register operand,*R2+Indirect Workspace Register Auto Increment operandPUT APPROPRIATE HIGH WORD IN FAC

0FE4LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R0Workspace Register operand,25443Immediate Value operandGET 99'S

0FE8MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R0Workspace Register operand,*R2+Indirect Workspace Register Auto Increment operandPUT IN FAC TO GIVE LARGEST POS

0FEAMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R0Workspace Register operand,*R2+Indirect Workspace Register Auto Increment operandOR MOST NEG NUMBER

0FECMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R0Workspace Register operand,*R2Indirect Workspace Register operand

0FEEMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
R9Workspace Register operand,@FAC+10Symbolic Memory operand
Definition: @FAC+10
Results to: 33620

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
PLACE ERROR CODE IN RAM

0FF2JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
STEXExpression operand
Definition: STEX
Results to: 4006

Symbol STEX is a pointer to location 4006
NO ROUTINE SPECIFIED, RETURN

0FF4*

0FF4* FLOATING DIVISION   FAC = ARG / FAC

0FF4*

0FF4* = BR TABLE

0FF4FDIVMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R11Workspace Register operand,R10Workspace Register operand

0FF6JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
FDIV1Expression operand
Definition: FDIV1
Results to: 4094

Symbol FDIV1 is a pointer to location 4094

0FF8SDIVMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R11Workspace Register operand,R10Workspace Register operandSVE RTN

0FFABLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@POPSTKSymbolic Memory operand
Definition: @POPSTK
Results to: 8104

Symbol POPSTK is defined at location 0000
Symbol POPSTK is defined as S+8104
Symbol S is defined at location 0000
Symbol S is defined as 0
STACK DIVISION

0FFEFDIV1LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R3Workspace Register operand,FACImmediate Value operand
Definition: FAC
Results to: 33610

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
PTR TO FAC

1002MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
*R3Indirect Workspace Register operand,R8Workspace Register operandGET DIVISOR 1ST WORD

1004LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R0Workspace Register operand,ARGImmediate Value operand
Definition: ARG
Results to: 33628

Symbol ARG is defined at location 0000
Symbol ARG is defined as PAD+92
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
PTR TO ARG

1008XORExclusive OR
Logical instruction

[<label>] b XOR b <gas>,<wad> b [<comment>]
*R0Indirect Workspace Register operand,R8Workspace Register operandNO, COMPUTE SIGN OF QUOTIENT

100AMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
R8Workspace Register operand,@SIGNSymbolic Memory operand
Definition: @SIGN
Results to: 33653

Symbol SIGN is defined at location 0000
Symbol SIGN is defined as PAD+117
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
SAVE SAME

100EABSAbsolute Value
Arithmetic instruction

[<label>] b ABS b <gas> b [<comment>]
*R3Indirect Workspace Register operandABS OF DIVISOR

1010D010JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
DIVZERExpression operand
Definition: DIVZER
Results to: 4028

Symbol DIVZER is a pointer to location 4028
CAN'T BE ZERO

1012ABSAbsolute Value
Arithmetic instruction

[<label>] b ABS b <gas> b [<comment>]
*R0Indirect Workspace Register operandIS DIVIDEND ZERO?

1014JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
FMULZRExpression operand
Definition: FMULZR
Results to: 3882

Symbol FMULZR is a pointer to location 3882
YES, RESULT IS ZERO

1016MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
*R0Indirect Workspace Register operand,R9Workspace Register operandGET DIVIDENT EXP

1018SBSubtract Bytes
Arithmetic instruction

[<label>] b SB b <gas>,<gad> b [<comment>]
*R3Indirect Workspace Register operand,R9Workspace Register operandSUB EXP'S TO GET QUOTIENT EXP

101ASRAShift Right Arithmetic
Workspace Register shift instruction

[<label>] b SRA b <wa>,<scnt> b [<comment>]
R9Workspace Register operand,8Shift Count operandGET DIFF IN LOW BYTE

101CAIAdd Immediate
Arithmetic instruction

[<label>] b AI b <wa>,<iop> b [<comment>]
R9Workspace Register operand,64Immediate Value operandADD BIAS TO EXPONENT

1020MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R9Workspace Register operand,@EXPSymbolic Memory operand
Definition: @EXP
Results to: 33654

Symbol EXP is defined at location 0000
Symbol EXP is defined as PAD+118
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
AND SAVE FOR RESULT

1024LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R4Workspace Register operand,4Immediate Value operand

1028LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R5Workspace Register operand,ARG+8Immediate Value operand
Definition: ARG+8
Results to: 33636

Symbol ARG is defined at location 0000
Symbol ARG is defined as PAD+92
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

102CFDV01MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
*R3+Indirect Workspace Register Auto Increment operand,@10-2(R3)Indexed Memory operand
Definition: @10-2(R3)
Results to: 0014

1030CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
*R5+Indirect Workspace Register Auto Increment operand

1032DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R4Workspace Register operand

1034JGTJump if Greater Than
Jump and Branch instruction

[<label>] b JGT b <exp> b [<comment>]
FDV01Expression operand
Definition: FDV01
Results to: 4140

Symbol FDV01 is a pointer to location 4140
LOOP TILL 4 BYTE MOVED

1036MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
R4Workspace Register operand,@ARGSymbolic Memory operand
Definition: @ARG
Results to: 33628

Symbol ARG is defined at location 0000
Symbol ARG is defined as PAD+92
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
CLEAR EXTRA HIGH BYTE OF DIVIDEND

103A*

103A* REFS FOR DIVISION ALGORITHM:

103A* DONALD E. KNUTH, THE ART OF COMPUTER PROGRAMMING, VOLUME 2

103A* SEMINUMERICAL ALGORITHMS, ADDISON-WESLEY, 1969, P 235 FF

103A*

103A* THE DIVIDEND IS THE SERIES OF RADIX DIGITS:

103A*    U0,U1,U2 .... U7  (IN ARG)

103A* THE DIVISOR IS THE SERIES OF RADIX DIGITS:

103A*    V1,V2,V3 .... V7  (IN FAC+8 OR FDVSR)

103A* (U0 IS THE EXTRA HIGH BYTE OF THE DIVIDEND)

103A*

103A* NORMALIZE DIVISOR AND DIVIDEND SO V1 GT 50

103A* IF V1 LT 50, MULTIPLY DIVISOR AND DIVIDEND BY

103A* INT(100/(V1+1))

103A*

103A* R0-R1     MPY, DIV WORK REGS

103A* R2        CARRY

103A* R3        MULTIPLIER

103A* R4        LOOP COUNT

103A* R5        PTR TO RB (R0)

103A* R6        PRT TO RB(R1)

103A* R77       100

103A*

103ALILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R5Workspace Register operand,R0LSBImmediate Value operand
Definition: R0LSB
Results to: 33761

Symbol R0LSB is defined at location 0000
Symbol R0LSB is defined as WKSE+R0+R0+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R0 resolves to the Register number.
Register R0 resolves to the Register number.
GET POINTERS INTO MULTIPLY

103ELILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R6Workspace Register operand,R1LSBImmediate Value operand
Definition: R1LSB
Results to: 33763

Symbol R1LSB is defined at location 0000
Symbol R1LSB is defined as WKSE+R1+R1+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R1 resolves to the Register number.
Register R1 resolves to the Register number.
WORK AREA

1042LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R7Workspace Register operand,100Immediate Value operandRADIX

1046HX0064EQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
$-2Expression operand
Definition: $-2
Results to: 4164

$ represents the location 4166

1046D045EQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
$-1Expression operand
Definition: $-1
Results to: 4165

$ represents the location 4166

1046CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R2Workspace Register operandCLEARR HIGH BYTE OF WHERE V1 WILL BE

1048MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@FDVSR+1Symbolic Memory operand
Definition: @FDVSR+1
Results to: 33621

Symbol FDVSR is defined at location 0000
Symbol FDVSR is defined as FAC+10
Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,@R2LSBSymbolic Memory operand
Definition: @R2LSB
Results to: 33765

Symbol R2LSB is defined at location 0000
Symbol R2LSB is defined as WKSE+R2+R2+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R2 resolves to the Register number.
Register R2 resolves to the Register number.
GET V1 IN RB(R2)

104ECICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R2Workspace Register operand,49Immediate Value operandIS V1 ALREADY NORMALIZED?

1052JGTJump if Greater Than
Jump and Branch instruction

[<label>] b JGT b <exp> b [<comment>]
FDIV06Expression operand
Definition: FDIV06
Results to: 4240

Symbol FDIV06 is a pointer to location 4240
YES, PROCEED WITH DIVISION

1054INCIncrement
Arithmetic instruction

[<label>] b INC b <gas> b [<comment>]
R2Workspace Register operandNO, COMPUTE V1+1

1056CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R3Workspace Register operandGET RADIX IN 2 REGS FOR DIV

1058MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R7Workspace Register operand,R4Workspace Register operandGET RADIX

105ADIVDivide
Arithmetic instruction

[<label>] b DIV b <gas>,<wad> b [<comment>]
R2Workspace Register operand,R3Workspace Register operandCOMPUTE MULTIPLIER =INT(100/V1+1))

105CLILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R9Workspace Register operand,FDVSR+8Immediate Value operand
Definition: FDVSR+8
Results to: 33628

Symbol FDVSR is defined at location 0000
Symbol FDVSR is defined as FAC+10
Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

1060FDVLPLILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R4Workspace Register operand,8Immediate Value operandGET NO. OF BYTES IN DIVIDEND+1

1064FDIV04DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R4Workspace Register operandIGNORE ZERO BYTES AT END

1066DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R9Workspace Register operand

1068MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
*R9Indirect Workspace Register operand,R0Workspace Register operandIS NEXT HIGHER ORDER BYTE ZERO?

106AJEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
FDIV04Expression operand
Definition: FDIV04
Results to: 4196

Symbol FDIV04 is a pointer to location 4196
YES, KEEP LOOKING FOR NON-ZERO

106CCLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R0Workspace Register operandNO, LEAR CARRY INTO LOW ORDER BYTE

106EFDIV05MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R0Workspace Register operand,R2Workspace Register operandSAVE CARRY FROM LAST BYTE

1070MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
*R9Indirect Workspace Register operand,*R5Indirect Workspace Register operandGET NEXT BYTE OF DIVIDEND

1072MPYMultiply
Arithmetic instruction

[<label>] b MPY b <gas>,<wad> b [<comment>]
R3Workspace Register operand,R0Workspace Register operandMULTIPLY THIS BYTE BY MULTIPLIER

1074AAdd Words
Arithmetic instruction

[<label>] b A b <gas>,<gad> b [<comment>]
R2Workspace Register operand,R1Workspace Register operandADD IN CARRY FROM PREVIOUS BYTE

1076DIVDivide
Arithmetic instruction

[<label>] b DIV b <gas>,<wad> b [<comment>]
R7Workspace Register operand,R0Workspace Register operandCNVRT TO A RADIX DIGIT AND A CARRY

1078MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
*R6Indirect Workspace Register operand,*R9Indirect Workspace Register operandPUT RESULT BYTE IN DIVIDEND

107ADECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R9Workspace Register operand

107CDECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R4Workspace Register operandLOOP UNTIL ALL DIVIDEND BYTES

107EJGTJump if Greater Than
Jump and Branch instruction

[<label>] b JGT b <exp> b [<comment>]
FDIV05Expression operand
Definition: FDIV05
Results to: 4206

Symbol FDIV05 is a pointer to location 4206
NO, CONTINUE MULTIPLYING

1080CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R9Workspace Register operand,FDVSRImmediate Value operand
Definition: FDVSR
Results to: 33620

Symbol FDVSR is defined at location 0000
Symbol FDVSR is defined as FAC+10
Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

1084JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
FDVLPAExpression operand
Definition: FDVLPA
Results to: 4236

Symbol FDVLPA is a pointer to location 4236

1086LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R9Workspace Register operand,ARG+8Immediate Value operand
Definition: ARG+8
Results to: 33636

Symbol ARG is defined at location 0000
Symbol ARG is defined as PAD+92
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

108AJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
FDVLPExpression operand
Definition: FDVLP
Results to: 4192

Symbol FDVLP is a pointer to location 4192

108CFDVLPAMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
*R5Indirect Workspace Register operand,@ARGSymbolic Memory operand
Definition: @ARG
Results to: 33628

Symbol ARG is defined at location 0000
Symbol ARG is defined as PAD+92
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
YES, PUT CARRY OUT OF HIGH ORDER

1090*                             IN HIGHEST BYTE

1090*

1090* DIVIDE LOOP:

1090*  U(J) IS THE HIGHEST ORDER BYTE OF WHAT IS LEFT OF THE DIVIDEND

1090*  EACH QUOTIENT DIGIT IS ESTIMATED AS FOLLOWS:

1090*   IF U(J) = V1 THEN Q := 99

1090*       ELSE Q:= INT((100*U(J)+U(J+1))/V1)

1090*   IF V2*Q GT (100*U(J)+U(J+1)-Q*V1)*100+U(J+2)

1090*       THEN Q := Q-1 ADN THE TEST IS REPEATED.

1090* THIS WILL ENSURE THAT Q-1 LE NEXT-QUOTIENT-DIGIT LE Q.

1090*  NOTE THAT 100*U(J)+U(J+1)-Q*V1 =

1090*  REMAINDER ((100*U(J)+U(J+1))/V1

1090* Q*V IS THEN SUBTRACTED FROM U

1090* IF THE RESULT IS -VE, V IS ADDED BACK IN AND A:= Q-1 (THE PROB

1090* -ABILITY OF ADDING BACK IS APPROX .03)

1090*

1090* R0-R1     TEMPORARY

1090* R2        NEXT QUOTIENT DIGIT

1090* R3-R4     TEMPORARY

1090* R5        QUOTIENT BYTE LOOP COUNT

1090* R6        NUMBER OF SIGNIFICANT BYTES IN DIVISOR

1090* R7        V1

1090* R8        V2

1090* R9        100*V1+V2

1090* R11       POINTER INTO DIVIDEND (USUALLY POINTS TO U(J)

1090*

1090FDIV06LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R6Workspace Register operand,8Immediate Value operandNUMBER OF DIVISOR BYTES +1

1094FDIV07DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R6Workspace Register operandCOMPUTE NO. OF SIG BYTES IN

1096*                            DIVISOR

1096MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@FDVSR(R6)Indexed Memory operand
Definition: @FDVSR(R6)
Results to: 33632

Symbol FDVSR is defined at location 0000
Symbol FDVSR is defined as FAC+10
Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,R0Workspace Register operand
GET NEXT HIGHER ORDER BYTE

109AJEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
FDIV07Expression operand
Definition: FDIV07
Results to: 4244

Symbol FDIV07 is a pointer to location 4244
IGNORE IF ZERO

109CCLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R7Workspace Register operandCLR HIGH BYTE OF WHERE V1 WILL BE

109EMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@FDVSR+1Symbolic Memory operand
Definition: @FDVSR+1
Results to: 33621

Symbol FDVSR is defined at location 0000
Symbol FDVSR is defined as FAC+10
Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,@R7LSBSymbolic Memory operand
Definition: @R7LSB
Results to: 33775

Symbol R7LSB is defined at location 0000
Symbol R7LSB is defined as WKSE+R7+R7+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R7 resolves to the Register number.
Register R7 resolves to the Register number.
RB(R7) IS V1

10A4MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R7Workspace Register operand,R8Workspace Register operandCOPY V1 TO COMPUTE 100*V1

10A6MPYMultiply
Arithmetic instruction

[<label>] b MPY b <gas>,<wad> b [<comment>]
@HX0064Symbolic Memory operand
Definition: @HX0064
Results to: 4164

Symbol HX0064 is defined at location 4166
Symbol HX0064 is defined as $-2
$ represents the location 4166
,R8Workspace Register operand
COMPUTE 100*V1

10AAMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@FDVSR+2Symbolic Memory operand
Definition: @FDVSR+2
Results to: 33622

Symbol FDVSR is defined at location 0000
Symbol FDVSR is defined as FAC+10
Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,@R8LSBSymbolic Memory operand
Definition: @R8LSB
Results to: 33777

Symbol R8LSB is defined at location 0000
Symbol R8LSB is defined as WKSE+R8+R8+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R8 resolves to the Register number.
Register R8 resolves to the Register number.
GET V2 (HIGH BYTE IS ZERO)

10B0AAdd Words
Arithmetic instruction

[<label>] b A b <gas>,<gad> b [<comment>]
R8Workspace Register operand,R9Workspace Register operandCOMPUTE 100*V1+V2

10B2LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R5Workspace Register operand,-9Immediate Value operandCOMPUTE 9 BYTES OF QUOTIENT

10B6LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R11Workspace Register operand,ARGImmediate Value operand
Definition: ARG
Results to: 33628

Symbol ARG is defined at location 0000
Symbol ARG is defined as PAD+92
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
PTR TO HIGH BYTE OF DIVIDEND

10BAFDIV08CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R2Workspace Register operandCLEAR HIGH BYTE OF WHERE U(J) WILL BE

10BCMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
*R11Indirect Workspace Register operand,@R2LSBSymbolic Memory operand
Definition: @R2LSB
Results to: 33765

Symbol R2LSB is defined at location 0000
Symbol R2LSB is defined as WKSE+R2+R2+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R2 resolves to the Register number.
Register R2 resolves to the Register number.
RB(R2) IS U(J)

10C0MPYMultiply
Arithmetic instruction

[<label>] b MPY b <gas>,<wad> b [<comment>]
@HX0064Symbolic Memory operand
Definition: @HX0064
Results to: 4164

Symbol HX0064 is defined at location 4166
Symbol HX0064 is defined as $-2
$ represents the location 4166
,R2Workspace Register operand
COMPUTE 100*U(J)

10C4CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R0Workspace Register operandWHERE U(J+1) WILL BE

10C6MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@1(R11)Indexed Memory operand
Definition: @1(R11)
Results to: 0023
,@R0LSBSymbolic Memory operand
Definition: @R0LSB
Results to: 33761

Symbol R0LSB is defined at location 0000
Symbol R0LSB is defined as WKSE+R0+R0+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R0 resolves to the Register number.
Register R0 resolves to the Register number.
GET U(J+1)

10CCAAdd Words
Arithmetic instruction

[<label>] b A b <gas>,<gad> b [<comment>]
R0Workspace Register operand,R3Workspace Register operand100*U(J)+U(J+1)

10CEDIVDivide
Arithmetic instruction

[<label>] b DIV b <gas>,<wad> b [<comment>]
R7Workspace Register operand,R2Workspace Register operandGET Q AND REMAINDER

10D0MPYMultiply
Arithmetic instruction

[<label>] b MPY b <gas>,<wad> b [<comment>]
@HX0064Symbolic Memory operand
Definition: @HX0064
Results to: 4164

Symbol HX0064 is defined at location 4166
Symbol HX0064 is defined as $-2
$ represents the location 4166
,R3Workspace Register operand
100* REMAINDER

10D4MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@2(R11)Indexed Memory operand
Definition: @2(R11)
Results to: 0024
,@R0LSBSymbolic Memory operand
Definition: @R0LSB
Results to: 33761

Symbol R0LSB is defined at location 0000
Symbol R0LSB is defined as WKSE+R0+R0+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R0 resolves to the Register number.
Register R0 resolves to the Register number.
U(J+2)

10DAAAdd Words
Arithmetic instruction

[<label>] b A b <gas>,<gad> b [<comment>]
R0Workspace Register operand,R4Workspace Register operand100*REM + U(J+2)

10DCMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R2Workspace Register operand,R0Workspace Register operandGET Q FOR THE TEST

10DEMPYMultiply
Arithmetic instruction

[<label>] b MPY b <gas>,<wad> b [<comment>]
R8Workspace Register operand,R0Workspace Register operandCOMPUTE V2*Q

10E0CCompare Words
Compare instruction

[<label>] b C b <gas>,<gad> b [<comment>]
R2Workspace Register operand,@HX0064Symbolic Memory operand
Definition: @HX0064
Results to: 4164

Symbol HX0064 is defined at location 4166
Symbol HX0064 is defined as $-2
$ represents the location 4166
DOES Q=100?

10E4JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
FDIV09Expression operand
Definition: FDIV09
Results to: 4330

Symbol FDIV09 is a pointer to location 4330
YES, MAKE Q=99

10E6SSubtract Words
Arithmetic instruction

[<label>] b S b <gas>,<gad> b [<comment>]
R4Workspace Register operand,R1Workspace Register operandNO, COMPUTE V2*Q-(100*REM+U(J+2)

10E8JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
FDIV11Expression operand
Definition: FDIV11
Results to: 4336

Symbol FDIV11 is a pointer to location 4336
GO CHECK IF IT IS IN RANGE

10EAFDIV09SSubtract Words
Arithmetic instruction

[<label>] b S b <gas>,<gad> b [<comment>]
R4Workspace Register operand,R1Workspace Register operandCOMPUTE V2*Q-(100*REM+U(J+2))

10ECFDIV10DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R2Workspace Register operandDECREMENT Q

10EESSubtract Words
Arithmetic instruction

[<label>] b S b <gas>,<gad> b [<comment>]
R9Workspace Register operand,R1Workspace Register operandCOMPUTE ABOVE FOR NEW Q

10F0FDIV11JGTJump if Greater Than
Jump and Branch instruction

[<label>] b JGT b <exp> b [<comment>]
FDIV10Expression operand
Definition: FDIV10
Results to: 4332

Symbol FDIV10 is a pointer to location 4332
IF Q TOO BIG, MAKE IT SMALLER

10F2MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R2Workspace Register operand,R2Workspace Register operandIS Q ZERO?

10F4JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
FDIV16Expression operand
Definition: FDIV16
Results to: 4424

Symbol FDIV16 is a pointer to location 4424
YES, DO NOTHING

10F6*                            NO, SUBTRACT Q*V FROM U

10F6*

10F6* R0-R1     TEMPORARY

10F6* R2        NEXT QUOTIENT DIGIT

10F6* R3        CARRY

10F6* R4        LOOP COUNT

10F6* R5        QUOTIENT BYTE LOOP COUNT

10F6* R6        NUMBER OF SIGNIFICANT BYTES IN DIVISOR

10F6* R7        V1

10F6* R8        V2

10F6* R9        100*V1+V2

10F6* R11       POINTER INTO DIVIDEND (USUALLY POINTS TO U(J)

10F6*

10F6CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R3Workspace Register operandCLEAR CARRY INTO 1ST BYTE

10F8MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R6Workspace Register operand,R4Workspace Register operandGET DIVISOR LOOP COUNT

10FAAAdd Words
Arithmetic instruction

[<label>] b A b <gas>,<gad> b [<comment>]
R6Workspace Register operand,R11Workspace Register operandTO LOW BYTE OF DIVID. OF INTEREST

10FCFDIV12MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R0Workspace Register operand,R3Workspace Register operandSAVE CARRY FROM PREV. BYTE

10FEMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@FDVSR(R4)Indexed Memory operand
Definition: @FDVSR(R4)
Results to: 33628

Symbol FDVSR is defined at location 0000
Symbol FDVSR is defined as FAC+10
Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,@R0LSBSymbolic Memory operand
Definition: @R0LSB
Results to: 33761

Symbol R0LSB is defined at location 0000
Symbol R0LSB is defined as WKSE+R0+R0+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R0 resolves to the Register number.
Register R0 resolves to the Register number.
               GET NXT BYTE DIVISOR

1104MPYMultiply
Arithmetic instruction

[<label>] b MPY b <gas>,<wad> b [<comment>]
R2Workspace Register operand,R0Workspace Register operandMPY BYTE OF DIVSR BY QUOTIENT

1106AAdd Words
Arithmetic instruction

[<label>] b A b <gas>,<gad> b [<comment>]
R3Workspace Register operand,R1Workspace Register operandADD IN CARRY FROM LAST DVSR BYTE

1108DIVDivide
Arithmetic instruction

[<label>] b DIV b <gas>,<wad> b [<comment>]
@HX0064Symbolic Memory operand
Definition: @HX0064
Results to: 4164

Symbol HX0064 is defined at location 4166
Symbol HX0064 is defined as $-2
$ represents the location 4166
,R0Workspace Register operand
CONVERT TO A RADIX 100 DIGIT

110CSBSubtract Bytes
Arithmetic instruction

[<label>] b SB b <gas>,<gad> b [<comment>]
@R1LSBSymbolic Memory operand
Definition: @R1LSB
Results to: 33763

Symbol R1LSB is defined at location 0000
Symbol R1LSB is defined as WKSE+R1+R1+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R1 resolves to the Register number.
Register R1 resolves to the Register number.
,*R11Indirect Workspace Register operand
SUB. PRODUCT BYTE FROM DIVIDEND

1110JGTJump if Greater Than
Jump and Branch instruction

[<label>] b JGT b <exp> b [<comment>]
FDIV13Expression operand
Definition: FDIV13
Results to: 4378

Symbol FDIV13 is a pointer to location 4378
IS RESULT +VE?

1112JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
FDIV13Expression operand
Definition: FDIV13
Results to: 4378

Symbol FDIV13 is a pointer to location 4378
OR ZERO ?

1114ABAdd Bytes
Arithmetic instruction

[<label>] b AB b <gas>,<gad> b [<comment>]
@HX0064+1Symbolic Memory operand
Definition: @HX0064+1
Results to: 4165

Symbol HX0064 is defined at location 4166
Symbol HX0064 is defined as $-2
$ represents the location 4166
,*R11Indirect Workspace Register operand
NO, ADD RADIX BACK

1118INCIncrement
Arithmetic instruction

[<label>] b INC b <gas> b [<comment>]
R0Workspace Register operandINC PRODUCT CARRY TO BORROW FROM

111A*                             NEXT BYTE

111AFDIV13DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R11Workspace Register operandPOINT TO NEXT HIGHER BYTE OF DVDND

111CDECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R4Workspace Register operandSUB'D ALL BYTES OF DIVISOR?

111EJGTJump if Greater Than
Jump and Branch instruction

[<label>] b JGT b <exp> b [<comment>]
FDIV12Expression operand
Definition: FDIV12
Results to: 4348

Symbol FDIV12 is a pointer to location 4348
NO, CONTINUE SUBTRACTING

1120SBSubtract Bytes
Arithmetic instruction

[<label>] b SB b <gas>,<gad> b [<comment>]
@R0LSBSymbolic Memory operand
Definition: @R0LSB
Results to: 33761

Symbol R0LSB is defined at location 0000
Symbol R0LSB is defined as WKSE+R0+R0+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R0 resolves to the Register number.
Register R0 resolves to the Register number.
,*R11Indirect Workspace Register operand
YES, SUB CARRY FROM DIVISOR PRODUCT

1124JGTJump if Greater Than
Jump and Branch instruction

[<label>] b JGT b <exp> b [<comment>]
FDIV16Expression operand
Definition: FDIV16
Results to: 4424

Symbol FDIV16 is a pointer to location 4424
HIGH ORDER FROM HIGHEST ORDER

1126JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
FDIV16Expression operand
Definition: FDIV16
Results to: 4424

Symbol FDIV16 is a pointer to location 4424
DIVIDEND BYTE. -VE RESULT?

1128*                            YES, ADD DIVIDEND BACK IN, Q WAS

1128*                            ONE TOO BIG

1128DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R2Workspace Register operandDEC Q, WAS ONE TOO BIG

112AMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R6Workspace Register operand,R4Workspace Register operandGET ADD-BACK LOOP COUNT

112CAAdd Words
Arithmetic instruction

[<label>] b A b <gas>,<gad> b [<comment>]
R6Workspace Register operand,R11Workspace Register operandPNT TO LOW ORDER BYTE OF DVDND

112E*                            OF INTEREST

112EFDIV14ABAdd Bytes
Arithmetic instruction

[<label>] b AB b <gas>,<gad> b [<comment>]
@FDVSR(R4)Indexed Memory operand
Definition: @FDVSR(R4)
Results to: 33628

Symbol FDVSR is defined at location 0000
Symbol FDVSR is defined as FAC+10
Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,*R11Indirect Workspace Register operand
ADD BYTE OF DVSR TO DVDND

1132CBCompare Bytes
Compare instruction

[<label>] b CB b <gas>,<gad> b [<comment>]
*R11Indirect Workspace Register operand,@HX0064+1Symbolic Memory operand
Definition: @HX0064+1
Results to: 4165

Symbol HX0064 is defined at location 4166
Symbol HX0064 is defined as $-2
$ represents the location 4166
RESULT LARGER THAN RADIX?

1136JLJump if Logical Low
Jump and Branch instruction

[<label>] b JL b <exp> b [<comment>]
FDIV15Expression operand
Definition: FDIV15
Results to: 4418

Symbol FDIV15 is a pointer to location 4418
NO, RESULT IS CORRECT

1138SBSubtract Bytes
Arithmetic instruction

[<label>] b SB b <gas>,<gad> b [<comment>]
@HX0064+1Symbolic Memory operand
Definition: @HX0064+1
Results to: 4165

Symbol HX0064 is defined at location 4166
Symbol HX0064 is defined as $-2
$ represents the location 4166
,*R11Indirect Workspace Register operand
YES, SUBTRACT RADIX

113CABAdd Bytes
Arithmetic instruction

[<label>] b AB b <gas>,<gad> b [<comment>]
@HX01Symbolic Memory operand
Definition: @HX01
Results to: 3673

Symbol HX01 is defined at location 3674
Symbol HX01 is defined as $-1
$ represents the location 3674
,@-1(R11)Indexed Memory operand
Definition: @-1(R11)
Results to: 0021
ADD 1 FOR CARRY TO HIGHER BYTE

1142FDIV15DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R11Workspace Register operandTO NEXT HIGHER BYTE OF DIVIDEND

1144DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R4Workspace Register operandDONE ADDING IN ALL BYTES OF DVDND?

1146JGTJump if Greater Than
Jump and Branch instruction

[<label>] b JGT b <exp> b [<comment>]
FDIV14Expression operand
Definition: FDIV14
Results to: 4398

Symbol FDIV14 is a pointer to location 4398
NO, ADD IN THE NEXT ONE

1148FDIV16MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@R2LSBSymbolic Memory operand
Definition: @R2LSB
Results to: 33765

Symbol R2LSB is defined at location 0000
Symbol R2LSB is defined as WKSE+R2+R2+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R2 resolves to the Register number.
Register R2 resolves to the Register number.
,@FDVSR(R5)Indexed Memory operand
Definition: @FDVSR(R5)
Results to: 33630

Symbol FDVSR is defined at location 0000
Symbol FDVSR is defined as FAC+10
Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
               PUT AWAY NEXT QUOT BYTE

114EINCIncrement
Arithmetic instruction

[<label>] b INC b <gas> b [<comment>]
R11Workspace Register operandHIGH ORDER OF NEXT SIGNIF DVDND

1150INCIncrement
Arithmetic instruction

[<label>] b INC b <gas> b [<comment>]
R5Workspace Register operandCOMPUTED ALL NECESS. BYTES OF QUO?

1152JLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
FDIV08Expression operand
Definition: FDIV08
Results to: 4282

Symbol FDIV08 is a pointer to location 4282
NO, CONTINUE

1154BBranch
Jump and Branch instruction

[<label>] b B b <gas> b [<comment>]
@FMENDSymbolic Memory operand
Definition: @FMEND
Results to: 3864

Symbol FMEND is a pointer to location 3864
YES, NORMALIZE AND FINISH UP

1158*

1158* STRING TO NUMBER CONVERSIONS

1158* R0   POINTER

1158* R1   EXPONENT SIGN

1158* R2   TP1 (SAVED TEXT POINTER)

1158* R3   ADR. OF GETCH (FOR BL)

1158* R4   ACCUMULATOR FOR CSINT

1158* R5   ACCUMULATOR FOR CSINT

1158* R6   TEXT POINTER

1158* R7   RELATIVE POSITION COUNTER

1158* R8   CURRENT CHARACTER (LSBYTE)

1158* R9   UNUSED

1158* R10  SAVED LINK

1158* R11  LINK

1158* R12  NON-ZERO CHARACTER POINTER

1158*

1158* CALLED WITH FAX = ADR. OF STRING

1158* RETURNS WITH CONTAINING NUMBER

1158*

1158* RPOS-RELATIVE POSITION OF FIRST NONZERO DIGIT

1158*       WRT ONE'S DIGIT

1158*      EG. 10,+1; 1,+0; .1,-1; .01,-2

1158*

1158*

1158*  CONVERT STRING TO INTEGER, VALUE RETURNED IN R4

1158*

1158HX3203DATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
12803Expression operand

115A* = BL, REQUIRES R3 SET UP ON ENTRY

115ACSINTCLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R4Workspace Register operand

115CCLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R0Workspace Register operandCHAR COUNTER FOR EXPONENT

115EMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R11Workspace Register operand,R9Workspace Register operand

1160JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
CSI02Expression operand
Definition: CSI02
Results to: 4466

Symbol CSI02 is a pointer to location 4466

1162CSI01MPYMultiply
Arithmetic instruction

[<label>] b MPY b <gas>,<wad> b [<comment>]
@HX000ASymbolic Memory operand
Definition: @HX000A
Results to: 4474

Symbol HX000A is defined at location 4476
Symbol HX000A is defined as $-2
$ represents the location 4476
,R4Workspace Register operand

1166MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R4Workspace Register operand,R4Workspace Register operandTEST FOR OVERFLOW

1168JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
CSI05Expression operand
Definition: CSI05
Results to: 4484

Symbol CSI05 is a pointer to location 4484
YES, OVERFLOW

116AINCIncrement
Arithmetic instruction

[<label>] b INC b <gas> b [<comment>]
R0Workspace Register operandCOUNT THE CHAR

116CAAdd Words
Arithmetic instruction

[<label>] b A b <gas>,<gad> b [<comment>]
R8Workspace Register operand,R5Workspace Register operand

116EMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R5Workspace Register operand,R4Workspace Register operandIS INTEGER >32767

1170JLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
CSI05Expression operand
Definition: CSI05
Results to: 4484

Symbol CSI05 is a pointer to location 4484
YES, TOO BIG

1172CSI02BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
*R3Indirect Workspace Register operandGET NEXT DIGIT

1174AIAdd Immediate
Arithmetic instruction

[<label>] b AI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,-'0'Immediate Value operandASCII TO BINARY

1178CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,10Immediate Value operandCOMPARE TO TEN

117CHX000AEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
$-2Expression operand
Definition: $-2
Results to: 4474

$ represents the location 4476

117CJLJump if Logical Low
Jump and Branch instruction

[<label>] b JL b <exp> b [<comment>]
CSI01Expression operand
Definition: CSI01
Results to: 4450

Symbol CSI01 is a pointer to location 4450
CHAR OK

117EMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R0Workspace Register operand,R0Workspace Register operandANY CHARS?

1180JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
CSNZ10Expression operand
Definition: CSNZ10
Results to: 4494

Symbol CSNZ10 is a pointer to location 4494
NO - ERROR

1182BBranch
Jump and Branch instruction

[<label>] b B b <gas> b [<comment>]
*R9Indirect Workspace Register operandRETURN GOOD

1184CSI05LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R9Workspace Register operand,CSNOFLImmediate Value operand
Definition: CSNOFL
Results to: 4496

Symbol CSNOFL is a pointer to location 4496
SET RTN ADR. TO ERROR

1188JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
CSI02Expression operand
Definition: CSI02
Results to: 4466

Symbol CSI02 is a pointer to location 4466
CONTINUE WITH STRING

118ACSNZERBBranch
Jump and Branch instruction

[<label>] b B b <gas> b [<comment>]
@FMULZRSymbolic Memory operand
Definition: @FMULZR
Results to: 3882

Symbol FMULZR is a pointer to location 3882

118ECSNZ10BBranch
Jump and Branch instruction

[<label>] b B b <gas> b [<comment>]
*R10Indirect Workspace Register operandRETURN

1190* = B *R9

1190CSNOFLDECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R6Workspace Register operand

1192MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R6Workspace Register operand,@FAC+12Symbolic Memory operand
Definition: @FAC+12
Results to: 33622

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

1196CCompare Words
Compare instruction

[<label>] b C b <gas>,<gad> b [<comment>]
R12Workspace Register operand,R2Workspace Register operandIS MANTISSA ZERO?

1198JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
CSNZERExpression operand
Definition: CSNZER
Results to: 4490

Symbol CSNZER is a pointer to location 4490
YES, NUMBER IS ZERO

119AMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R1Workspace Register operand,@EXPSymbolic Memory operand
Definition: @EXP
Results to: 33654

Symbol EXP is defined at location 0000
Symbol EXP is defined as PAD+118
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
SET EXPONENT SIGN

119EBBranch
Jump and Branch instruction

[<label>] b B b <gas> b [<comment>]
@OVEXP1Symbolic Memory operand
Definition: @OVEXP1
Results to: 4036

Symbol OVEXP1 is a pointer to location 4036
GO TO ERROR ROUTINE

11A2*

11A2* CONVERT STRING TO NUMBER    GROM ENTRY

11A2*

11A2* =BL

11A2CSNGRMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@GROMFGSymbolic Memory operand
Definition: @GROMFG
Results to: 33673

Symbol GROMFG is defined at location 0000
Symbol GROMFG is defined as PAD+137
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,R3Workspace Register operand
TEST FOR GROM

11A6JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
CSNExpression operand
Definition: CSN
Results to: 4526

Symbol CSN is a pointer to location 4526

11A8LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R3Workspace Register operand,GETCHGImmediate Value operand
Definition: GETCHG
Results to: 8154

Symbol GETCHG is defined at location 0000
Symbol GETCHG is defined as S+8154
Symbol S is defined at location 0000
Symbol S is defined as 0
ROUTINE TO GET GROM CHAR

11ACJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
CSN01Expression operand
Definition: CSN01
Results to: 4530

Symbol CSN01 is a pointer to location 4530

11AECSNLILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R3Workspace Register operand,GETCHImmediate Value operand
Definition: GETCH
Results to: 8136

Symbol GETCH is defined at location 0000
Symbol GETCH is defined as S+8136
Symbol S is defined at location 0000
Symbol S is defined as 0
ADDR OF GETCH ROUTINE

11B2CSN01MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R11Workspace Register operand,R10Workspace Register operand

11B4MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
@33622Symbolic Memory operand
Definition: @33622
Results to: 33622
,R6Workspace Register operand
INIT TEXT POINTER

11B8BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
*R3Indirect Workspace Register operandGET CHAR

11BACLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R7Workspace Register operandSIGN

11BCMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R6Workspace Register operand,R2Workspace Register operandSAVE REQUIRED DIGIT POINTER

11BECICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,'+'Immediate Value operandIS CHAR A PLUS?

11C2JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
CSN02Expression operand
Definition: CSN02
Results to: 4556

Symbol CSN02 is a pointer to location 4556
YES, IGNORE

11C4CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,'-'Immediate Value operandIS IT A MINUS?

11C8JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
CSN04Expression operand
Definition: CSN04
Results to: 4560

Symbol CSN04 is a pointer to location 4560
NO

11CASETOSet to One
Logical instruction

[<label>] b SETO b <gas> b [<comment>]
R7Workspace Register operandNEGATIVE

11CCCSN02INCIncrement
Arithmetic instruction

[<label>] b INC b <gas> b [<comment>]
R2Workspace Register operand

11CECSN03BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
*R3Indirect Workspace Register operandGET NEXT CHAR

11D0CSN04CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,'0'Immediate Value operandZERO?

11D4JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
CSN03Expression operand
Definition: CSN03
Results to: 4558

Symbol CSN03 is a pointer to location 4558
YES

11D6MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
R7Workspace Register operand,@SIGNSymbolic Memory operand
Definition: @SIGN
Results to: 33653

Symbol SIGN is defined at location 0000
Symbol SIGN is defined as PAD+117
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
SAVE S[GO

11DAMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R6Workspace Register operand,R12Workspace Register operand

11DCDECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R12Workspace Register operandFIRST NON-ZERO CHARR

11DESETOSet to One
Logical instruction

[<label>] b SETO b <gas> b [<comment>]
R7Workspace Register operandINIT RELATIVE POSN

11E0JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
CSN06Expression operand
Definition: CSN06
Results to: 4582

Symbol CSN06 is a pointer to location 4582

11E2CSN05INCIncrement
Arithmetic instruction

[<label>] b INC b <gas> b [<comment>]
R7Workspace Register operandINC RELATIVE POSN

11E4BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
*R3Indirect Workspace Register operand

11E6CSN06CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,'0'Immediate Value operandLESS THAN A ZERO?

11EAJLJump if Logical Low
Jump and Branch instruction

[<label>] b JL b <exp> b [<comment>]
CSN07Expression operand
Definition: CSN07
Results to: 4594

Symbol CSN07 is a pointer to location 4594
YES

11ECCICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,'9'Immediate Value operandLESS THAN 9?

11F0JLEJump if Low or Equal
Jump and Branch instruction

[<label>] b JLE b <exp> b [<comment>]
CSN05Expression operand
Definition: CSN05
Results to: 4578

Symbol CSN05 is a pointer to location 4578
YES

11F2CSN07CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,'.'Immediate Value operandEND OF INTEGER PART?

11F6JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
CSNGExpression operand
Definition: CSNG
Results to: 4640

Symbol CSNG is a pointer to location 4640
LOOK FOR EXPONENT OR END

11F8*

11F8* COVERT A FLOATING POINT NUMBER

11F8*

11F8INCIncrement
Arithmetic instruction

[<label>] b INC b <gas> b [<comment>]
R2Workspace Register operandMOVE DIGIT POINTER PAST DEC. POINT

11FAMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R7Workspace Register operand,R7Workspace Register operand

11FCJLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
CSNF03Expression operand
Definition: CSNF03
Results to: 4610

Symbol CSNF03 is a pointer to location 4610
NO SIGNIF DIGIT TO LEFT OF

11FEJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
CSNF04Expression operand
Definition: CSNF04
Results to: 4622

Symbol CSNF04 is a pointer to location 4622
LOOK FOR LAST DIGIT

1200CSNF02DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R7Workspace Register operand

1202CSNF03BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
*R3Indirect Workspace Register operandGET NEXT CHAR

1204CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,'0'Immediate Value operandIGNORE LEADING ZEROS

1208JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
CSNF02Expression operand
Definition: CSNF02
Results to: 4608

Symbol CSNF02 is a pointer to location 4608

120ADECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R6Workspace Register operand

120C* THIS IS FIRST SIGNIFICANT DIGIT OF THE END OF THE NUMBER,

120C* POINT BACK TO FIRST NON-ZERO CHAR.

120CMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R6Workspace Register operand,R12Workspace Register operand

120ECSNF04BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
*R3Indirect Workspace Register operand

1210CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,'0'Immediate Value operand

1214JLJump if Logical Low
Jump and Branch instruction

[<label>] b JL b <exp> b [<comment>]
CSNF05Expression operand
Definition: CSNF05
Results to: 4636

Symbol CSNF05 is a pointer to location 4636
TOO SMALL FOR DIGIT

1216CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,'9'Immediate Value operand

121AJLEJump if Low or Equal
Jump and Branch instruction

[<label>] b JLE b <exp> b [<comment>]
CSNF04Expression operand
Definition: CSNF04
Results to: 4622

Symbol CSNF04 is a pointer to location 4622
IN RANGE, KEEP LOOKING

121CCSNF05CCompare Words
Compare instruction

[<label>] b C b <gas>,<gad> b [<comment>]
R6Workspace Register operand,R2Workspace Register operand

121EJEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
CSNZERExpression operand
Definition: CSNZER
Results to: 4490

Symbol CSNZER is a pointer to location 4490
NUMBER HAS NO DIGITS **BAD**

1220* --- LOOK FOR EXPONENT OR END OF NUMBER

1220CSNGMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R6Workspace Register operand,R2Workspace Register operandPOINTER TO LAST CHAR +2

1222CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R4Workspace Register operand

1224DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R2Workspace Register operand

1226CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R1Workspace Register operand

1228CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,'E'Immediate Value operandIS NEXT CHAR AN 'E'

122CJNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
CSNHExpression operand
Definition: CSNH
Results to: 4684

Symbol CSNH is a pointer to location 4684
NO, EXP. DEFAULT = 0

122EBLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
*R3Indirect Workspace Register operand

1230CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,'+'Immediate Value operandGET A PLUS

1234JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
CSNG03Expression operand
Definition: CSNG03
Results to: 4674

Symbol CSNG03 is a pointer to location 4674
IGNORE PLUS SIGN

1236CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,'-'Immediate Value operandGET A MINUS

123AJNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
CSNG02Expression operand
Definition: CSNG02
Results to: 4672

Symbol CSNG02 is a pointer to location 4672
NOT MINUS SIGN

123CD23CDECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R1Workspace Register operandCHANGE SIGN TO NEGATIVE

123EJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
CSNG03Expression operand
Definition: CSNG03
Results to: 4674

Symbol CSNG03 is a pointer to location 4674

1240*

1240CSNG02DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R6Workspace Register operandBACK UP

1242CSNG03BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@CSINTSymbolic Memory operand
Definition: @CSINT
Results to: 4442

Symbol CSINT is a pointer to location 4442
GET INTEGER VALUE

1246MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
R1Workspace Register operand,R1Workspace Register operand

1248JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
CSNHExpression operand
Definition: CSNH
Results to: 4684

Symbol CSNH is a pointer to location 4684

124ANEGNegate
Arithmetic instruction

[<label>] b NEG b <gas> b [<comment>]
R4Workspace Register operand

124C* ------ PACK FRACTION INTO FAC

124CCSNHDECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R6Workspace Register operandPOINT TO 1ST CHAR AFTER

124EMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R6Workspace Register operand,@FAC+12Symbolic Memory operand
Definition: @FAC+12
Results to: 33622

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
STORE FIRST NON CONVERTED POSN

1252CCompare Words
Compare instruction

[<label>] b C b <gas>,<gad> b [<comment>]
R12Workspace Register operand,R2Workspace Register operandWAS THE FRACTION ZERO?

1254JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
CSNZERExpression operand
Definition: CSNZER
Results to: 4490

Symbol CSNZER is a pointer to location 4490
YES

1256AIAdd Immediate
Arithmetic instruction

[<label>] b AI b <wa>,<iop> b [<comment>]
R4Workspace Register operand,128Immediate Value operand

125ACLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R1Workspace Register operandCLEAR WORK REGISTER

125CAAdd Words
Arithmetic instruction

[<label>] b A b <gas>,<gad> b [<comment>]
R7Workspace Register operand,R4Workspace Register operandCOPY EXPONENT FOR PLACE FLAG

125EMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R4Workspace Register operand,R7Workspace Register operand

1260SRAShift Right Arithmetic
Workspace Register shift instruction

[<label>] b SRA b <wa>,<scnt> b [<comment>]
R4Workspace Register operand,1Shift Count operandBASE 100

1262MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R4Workspace Register operand,@EXPSymbolic Memory operand
Definition: @EXP
Results to: 33654

Symbol EXP is defined at location 0000
Symbol EXP is defined as PAD+118
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

1266SRCShift Right Circular
Workspace Register shift instruction

[<label>] b SRC b <wa>,<scnt> b [<comment>]
R7Workspace Register operand,1Shift Count operand

1268LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R5Workspace Register operand,8Immediate Value operandINIT LOOP

126CLILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R0Workspace Register operand,FAC+1Immediate Value operand
Definition: FAC+1
Results to: 33611

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

1270MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R12Workspace Register operand,R6Workspace Register operand

1272CSNH01CCompare Words
Compare instruction

[<label>] b C b <gas>,<gad> b [<comment>]
R6Workspace Register operand,R2Workspace Register operandEND OF FRACTION

1274JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
CSNH03Expression operand
Definition: CSNH03
Results to: 4756

Symbol CSNH03 is a pointer to location 4756
YES ZERO UNUSED FRACTION

1276BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
*R3Indirect Workspace Register operandGET NEXT CHAR

1278CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,'.'Immediate Value operandIGNORE DECIMAL POINT

127CJEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
CSNH01Expression operand
Definition: CSNH01
Results to: 4722

Symbol CSNH01 is a pointer to location 4722

127EAIAdd Immediate
Arithmetic instruction

[<label>] b AI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,-'0'Immediate Value operandASCII TO BINARY

1282INVInvert
Logical instruction

[<label>] b INV b <gas> b [<comment>]
R7Workspace Register operand

1284JLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
CSNH02Expression operand
Definition: CSNH02
Results to: 4752

Symbol CSNH02 is a pointer to location 4752
1'S DIGIT

1286MPYMultiply
Arithmetic instruction

[<label>] b MPY b <gas>,<wad> b [<comment>]
@HX000ASymbolic Memory operand
Definition: @HX000A
Results to: 4474

Symbol HX000A is defined at location 4476
Symbol HX000A is defined as $-2
$ represents the location 4476
,R8Workspace Register operand

128AMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@R9LSBSymbolic Memory operand
Definition: @R9LSB
Results to: 33779

Symbol R9LSB is defined at location 0000
Symbol R9LSB is defined as WKSE+R9+R9+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R9 resolves to the Register number.
Register R9 resolves to the Register number.
,R1Workspace Register operand
SAVE

128EJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
CSNH01Expression operand
Definition: CSNH01
Results to: 4722

Symbol CSNH01 is a pointer to location 4722
GET ONE'S DIGIT

1290CSNH02ABAdd Bytes
Arithmetic instruction

[<label>] b AB b <gas>,<gad> b [<comment>]
@R8LSBSymbolic Memory operand
Definition: @R8LSB
Results to: 33777

Symbol R8LSB is defined at location 0000
Symbol R8LSB is defined as WKSE+R8+R8+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R8 resolves to the Register number.
Register R8 resolves to the Register number.
,R1Workspace Register operand
ADD ONES AND TENS DIGIT

1294CSNH03MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
R1Workspace Register operand,*R0+Indirect Workspace Register Auto Increment operandSTORE DIGIT

1296CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R1Workspace Register operandIN CASE NUMBER ENDS

1298DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R5Workspace Register operandMORE?

129AJNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
CSNH01Expression operand
Definition: CSNH01
Results to: 4722

Symbol CSNH01 is a pointer to location 4722
YES

129CBBranch
Jump and Branch instruction

[<label>] b B b <gas> b [<comment>]
@ROUN1Symbolic Memory operand
Definition: @ROUN1
Results to: 3926

Symbol ROUN1 is a pointer to location 3926
RETURN

12A0* BRANCH TABLE, REF NOT KNOWN

12A0XTABDATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
CSNExpression operand
Definition: CSN
Results to: 4526

Symbol CSN is a pointer to location 4526

12A2DATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
CSNGRExpression operand
Definition: CSNGR
Results to: 4514

Symbol CSNGR is a pointer to location 4514

12A4DATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
CFIExpression operand
Definition: CFI
Results to: 4792

Symbol CFI is a pointer to location 4792

12A6DATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
SYMBExpression operand
Definition: SYMB
Results to: 5704

Symbol SYMB is defined at location 0000
Symbol SYMB is defined as S+5704
Symbol S is defined at location 0000
Symbol S is defined as 0

12A8DATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
SMBBExpression operand
Definition: SMBB
Results to: 5710

Symbol SMBB is defined at location 0000
Symbol SMBB is defined as S+5710
Symbol S is defined at location 0000
Symbol S is defined as 0

12AADATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
ASSGNVExpression operand
Definition: ASSGNV
Results to: 5698

Symbol ASSGNV is defined at location 0000
Symbol ASSGNV is defined as S+5698
Symbol S is defined at location 0000
Symbol S is defined as 0

12ACDATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
FBSYMBExpression operand
Definition: FBSYMB
Results to: 5590

Symbol FBSYMB is defined at location 0000
Symbol FBSYMB is defined as S+5590
Symbol S is defined at location 0000
Symbol S is defined as 0

12AEDATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
VPUSHGExpression operand
Definition: VPUSHG
Results to: 5692

Symbol VPUSHG is defined at location 0000
Symbol VPUSHG is defined as S+5692
Symbol S is defined at location 0000
Symbol S is defined as 0

12B0DATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
VPOPExpression operand
Definition: VPOP
Results to: 7982

Symbol VPOP is defined at location 0000
Symbol VPOP is defined as S+7982
Symbol S is defined at location 0000
Symbol S is defined as 0

12B2DATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
SROMExpression operand
Definition: SROM
Results to: 2752

Symbol SROM is defined at location 0000
Symbol SROM is defined as S+2752
Symbol S is defined at location 0000
Symbol S is defined as 0

12B4DATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
SGROMExpression operand
Definition: SGROM
Results to: 2852

Symbol SGROM is defined at location 0000
Symbol SGROM is defined as S+2852
Symbol S is defined at location 0000
Symbol S is defined as 0

12B6DATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
PGMCHExpression operand
Definition: PGMCH
Results to: 6248

Symbol PGMCH is defined at location 0000
Symbol PGMCH is defined as S+6248
Symbol S is defined at location 0000
Symbol S is defined as 0

12B8*

12B8* FLOATING TO INTEGER CONVERSION

12B8* FAC HAS FLOATING NUMBER, RETURNS WITH INTEGER IN FAC'S FIRST

12B8* INTEGER IS 16 BIT TWO'S COMPLEMENT

12B8* = BL

12B8CFIMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
@FACSymbolic Memory operand
Definition: @FAC
Results to: 33610

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,R4Workspace Register operand
IS FAC ZERO?

12BCJEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
CFISI1Expression operand
Definition: CFISI1
Results to: 4930

Symbol CFISI1 is a pointer to location 4930
YES, ALL DONE

12BECLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R0Workspace Register operandZERO RESULT IN CASE FAC = 0

12C0LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R2Workspace Register operand,FAC+1Immediate Value operand
Definition: FAC+1
Results to: 33611

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
GET PTR R0 HIGH ORDER BYTE OF FAC

12C4CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R3Workspace Register operandCLEAR HI BYTE OF CURRENT FRACTION D

12C6ABSAbsolute Value
Arithmetic instruction

[<label>] b ABS b <gas> b [<comment>]
@FACSymbolic Memory operand
Definition: @FAC
Results to: 33610

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
MAKE SURE 1ST DIGIT IS +VE

12CACLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R5Workspace Register operandCLR LOW BYTE OF WHERE EXPONENT WILL BE

12CCMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@FACSymbolic Memory operand
Definition: @FAC
Results to: 33610

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
,R5Workspace Register operand
GET EXPONENT

12D0CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R5Workspace Register operand,16128Immediate Value operandIS NUMBER LESS THAN ONE?

12D4JLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
CFIRIExpression operand
Definition: CFIRI
Results to: 4926

Symbol CFIRI is a pointer to location 4926
YES RESULT IS <.01, RESULT =0

12D6JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
CFI03Expression operand
Definition: CFI03
Results to: 4872

Symbol CFI03 is a pointer to location 4872
.01<NUMBER<1, RESULT = 1

12D8CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R5Workspace Register operand,16640Immediate Value operandIS NUMBER LESS THAN 100000

12DCJLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
CFI02Expression operand
Definition: CFI02
Results to: 4866

Symbol CFI02 is a pointer to location 4866
IT IS BETWEEN 1 AND 100

12DEJEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
CFI01Expression operand
Definition: CFI01
Results to: 4848

Symbol CFI01 is a pointer to location 4848
IT IS BETWEEN 100 AND 10000

12E0CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R5Workspace Register operand,16896Immediate Value operandIS NUMBER TOO BIG TO CONVERT

12E4JHJump if Logical High
Jump and Branch instruction

[<label>] b JH b <exp> b [<comment>]
CFI08Expression operand
Definition: CFI08
Results to: 4912

Symbol CFI08 is a pointer to location 4912
TOO BIG, ERROR

12E6MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
*R2+Indirect Workspace Register Auto Increment operand,@R0LSBSymbolic Memory operand
Definition: @R0LSB
Results to: 33761

Symbol R0LSB is defined at location 0000
Symbol R0LSB is defined as WKSE+R0+R0+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R0 resolves to the Register number.
Register R0 resolves to the Register number.
GET DIGIT

12EAMPYMultiply
Arithmetic instruction

[<label>] b MPY b <gas>,<wad> b [<comment>]
@DEC100Symbolic Memory operand
Definition: @DEC100
Results to: 4896

Symbol DEC100 is a pointer to location 4896
,R0Workspace Register operand
MPY BY RADIX TO CONVERT TO BI

12EEMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R1Workspace Register operand,R0Workspace Register operandGET RESULT OF MPY FOR NEXT DIGIT

12F0CFI01MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
*R2+Indirect Workspace Register Auto Increment operand,@R3LSBSymbolic Memory operand
Definition: @R3LSB
Results to: 33767

Symbol R3LSB is defined at location 0000
Symbol R3LSB is defined as WKSE+R3+R3+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R3 resolves to the Register number.
Register R3 resolves to the Register number.
GET NEXT DIGIT

12F4AAdd Words
Arithmetic instruction

[<label>] b A b <gas>,<gad> b [<comment>]
R3Workspace Register operand,R0Workspace Register operandADD TO PREVIOUS RESULT

12F6MPYMultiply
Arithmetic instruction

[<label>] b MPY b <gas>,<wad> b [<comment>]
@DEC100Symbolic Memory operand
Definition: @DEC100
Results to: 4896

Symbol DEC100 is a pointer to location 4896
,R0Workspace Register operand
MULTIPLY BY RADIX

12FAMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R0Workspace Register operand,R0Workspace Register operandTEST FOR OVERFLOW

12FCJNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
CFI08Expression operand
Definition: CFI08
Results to: 4912

Symbol CFI08 is a pointer to location 4912
YES, ERROR

12FEMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R1Workspace Register operand,R0Workspace Register operandNO - GET RESULT FOR LAST DIGIT

1300JLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
CFI08Expression operand
Definition: CFI08
Results to: 4912

Symbol CFI08 is a pointer to location 4912
OVERFLOW IF HI BIT SET

1302CFI02MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
*R2+Indirect Workspace Register Auto Increment operand,@R3LSBSymbolic Memory operand
Definition: @R3LSB
Results to: 33767

Symbol R3LSB is defined at location 0000
Symbol R3LSB is defined as WKSE+R3+R3+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R3 resolves to the Register number.
Register R3 resolves to the Register number.
GET LAST RADIX DIGIT TO LEFT OF PO

1306AAdd Words
Arithmetic instruction

[<label>] b A b <gas>,<gad> b [<comment>]
R3Workspace Register operand,R0Workspace Register operandADD IT TO RESULT

1308CFI03CBCompare Bytes
Compare instruction

[<label>] b CB b <gas>,<gad> b [<comment>]
*R2+Indirect Workspace Register Auto Increment operand,@HX3203Symbolic Memory operand
Definition: @HX3203
Results to: 4440

Symbol HX3203 is a pointer to location 4440
IS ROUNDING NECESSARY

130CJLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
CFI06Expression operand
Definition: CFI06
Results to: 4900

Symbol CFI06 is a pointer to location 4900
NO PUT ON PROPER SIGN

130EJGTJump if Greater Than
Jump and Branch instruction

[<label>] b JGT b <exp> b [<comment>]
CFI05Expression operand
Definition: CFI05
Results to: 4898

Symbol CFI05 is a pointer to location 4898
YES ADD A 1 TO IT

1310MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R4Workspace Register operand,R4Workspace Register operandMAYBE -- ??????

1312JGTJump if Greater Than
Jump and Branch instruction

[<label>] b JGT b <exp> b [<comment>]
CFI05Expression operand
Definition: CFI05
Results to: 4898

Symbol CFI05 is a pointer to location 4898
NONZERO ROUND UP

1314CFI04MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
*R2+Indirect Workspace Register Auto Increment operand,R3Workspace Register operandGET NEXT RADIX DIGIT

1316JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
CFI05Expression operand
Definition: CFI05
Results to: 4898

Symbol CFI05 is a pointer to location 4898
NON ZERO, ROUND UP

1318CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R2Workspace Register operand,FAC+8Immediate Value operand
Definition: FAC+8
Results to: 33618

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
LOOK AT REST OF DIGITS

131CJLJump if Logical Low
Jump and Branch instruction

[<label>] b JL b <exp> b [<comment>]
CFI04Expression operand
Definition: CFI04
Results to: 4884

Symbol CFI04 is a pointer to location 4884
NO LOOK AT NEXT ONE

131EJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
CFI06Expression operand
Definition: CFI06
Results to: 4900

Symbol CFI06 is a pointer to location 4900
ROUND DOWN

1320DEC100DATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
100Expression operand

1322CFI05INCIncrement
Arithmetic instruction

[<label>] b INC b <gas> b [<comment>]
R0Workspace Register operandROUND UP

1324CFI06CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R0Workspace Register operand,SGNBITImmediate Value operand
Definition: SGNBIT
Results to: 32768

Symbol SGNBIT is defined at location 0000
Symbol SGNBIT is defined as 32768
IS RESULT 32768?

1328JLJump if Logical Low
Jump and Branch instruction

[<label>] b JL b <exp> b [<comment>]
CFIRSIExpression operand
Definition: CFIRSI
Results to: 4920

Symbol CFIRSI is a pointer to location 4920
NO PUT ON THE PROPER SIGN

132AJHJump if Logical High
Jump and Branch instruction

[<label>] b JH b <exp> b [<comment>]
CFI08Expression operand
Definition: CFI08
Results to: 4912

Symbol CFI08 is a pointer to location 4912
NO IT IS GREATER -- OVERFLOW

132CMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R4Workspace Register operand,R4Workspace Register operandIS NUMBER NEGATIVE?

132EJLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
CFIRS2Expression operand
Definition: CFIRS2
Results to: 4924

Symbol CFIRS2 is a pointer to location 4924
YES, PUT ON CORRECT SIGN

1330CFI08MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@HX3203+1Symbolic Memory operand
Definition: @HX3203+1
Results to: 4441

Symbol HX3203 is a pointer to location 4440
,@FDVSRSymbolic Memory operand
Definition: @FDVSR
Results to: 33620

Symbol FDVSR is defined at location 0000
Symbol FDVSR is defined as FAC+10
Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
OVERFLOW RTN TO ERROR LCN

1336RTReturn


[<label>] b RT b [<comment>]
   (ERROR CODE)

1338CFIRSIINVInvert
Logical instruction

[<label>] b INV b <gas> b [<comment>]
R4Workspace Register operandIS NUMBER -VE?

133AJLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
CFIRIExpression operand
Definition: CFIRI
Results to: 4926

Symbol CFIRI is a pointer to location 4926
NO RETURN +VE NUMBER

133CCFIRS2NEGNegate
Arithmetic instruction

[<label>] b NEG b <gas> b [<comment>]
R0Workspace Register operandRTN -VE NO.

133ECFIRIMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R0Workspace Register operand,@FACSymbolic Memory operand
Definition: @FAC
Results to: 33610

Symbol FAC is defined at location 0000
Symbol FAC is defined as PAD+74
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
RTN NO. IN FAC

1342CFISI1RTReturn


[<label>] b RT b [<comment>]

1344*

1344* THIS IS A SET OF ROUTINES DEFINED FOR AUDIO CASSETTE

1344* COMMUNICATION. THEY ARE ENTERED THROUGH A GRAPHICS

1344* LANGUAGE PROGRAM, WHICH GIVES INFORMATION LIKE THE NO.

1344* OF BLOCKS (=64 BYTES) TO BE WRITTEN, OR THE NUMBER OF

1344* FREE BLOCKS IN CASE OF READ MODE; THE VDP START ADR.

1344* AND THE BAUD RATE.

1344*   THE ROUTINES TAKE CARE OF THE NECESSARY ENCODING/

1344* DECODING AND THE ERROR CHECKING.

1344*

1344* THE BIPHASE FORMAT, USED IN THIS SET OF ROUTINES, HAS

1344* THE FOLLOWING REPRESENTATIONS FOR THE BINARY DIGITS:

1344*

1344*     ---------------             ---------         ----

1344*    |               |           |         |       |

1344* ---                 ---     ---           -------

1344*     <-----"0"----->            <---- "1"--------->

1344*

1344* REPRESENTATIONS OF THE BITS MAY BE CHANGED IN PHASE BY

1344* 180 DEGREES, DEPENDING UPON THE VALUE OF THE BIT STREAM

1344* AFTER THE PREVIOUS BIT.

1344*

1344*    PRINCIPLES OF OPERATION

1344*

1344*          WRITING

1344*   THE ACTUAL IMPLEMENTATION OF THE BIPHASE RECORDING SCHEME

1344* IS RELATIVELY SIMPLE. THE VALUE FOR THE DATA RATE, AS INDICATED

1344* BY THE GRAPHICS LANGUAGE PROGRAM, IS USED AS A TIMER VALUE FOR

1344* THE INTERNAL TMS9985 TIMER/COUNTER. IT IS USED AS A TIMER VALUE

1344* FOR HALF A BIT CELL.

1344*

1344*      ------------                    ------        ----

1344*     |            |                  |      |      |

1344*  ---              ---            ---        ------

1344*     |<----><---->                    <-----><----->

1344*         DRATE                            DRATE

1344*

1344*   EACH BIT CELL THUS CONSISTS OF TWO TIMER INTERVALS. THE TIMER

1344* INTERRUPT AT THE BEGINING OF EACH BIT CELL CAUSES THE OUTPUT LINE

1344* TO CHANGE VALUE. THE NEXT TIMER INTERRUPT, IN THE MIDDLE OF THE

1344* BIT CELL, ONLY CHANGES THE VALUE OF THE OUTPUT LINE IF THE BIT TO

1344* BE OUTPUT EQUALS A BINARY "1".

1344*

1344*          READING

1344*    ON READING BACK, THE BASIC TIMER INTERVAL TIME IS SET TO 1.5

1344* TIMES THE DRATE OF THE WRITE SECTION. THE TIMER IS SYYNCHRONIZED

1344* ON THE FLUX CHANGE AT THE BEGINING OF THE BIT CELL. AFTER THE TIMER

1344* HAS GIVEN AN INTERRUPT, THE CURRENT INPUT LINE VALUE IS COMPARED TO

1344* THE VALUE AT THE BEGINING OF THE BIT CELL. IF THIS VALUE HAS

1344* CHANGED, THE BIT VALUE IS ASSUMED TO BE "1" IF NOT, IT WILL BE

1344* A "0"

1344*      TO PROVIDE A TIME-OUT MECHANISM THE TIMER AUTOMATICALLY

1344* RESTARTS ITSELF WITH THE SAME RATE.  IF THE TIMER TIMES OUT BEFORE

1344* THE NEXT FLUX CHANGE, AN ILLEGAL BIT LENGTH IS ASSUMED, AND AN

1344* ERROR RETURN CODE IS PRODUCED.

1344*

1344*********************************************************************

1344*

1344*    CASSETTE WRITE ROUTINE

1344*

1344* WRITES N BLOCKS OF 64 BYTES TO THE AUDIO CASSETTE.

1344*

1344* THE OUTPUT FORMAT USED IS:

1344*   - ZERO LEADER CONSISTING OF LDCNT ZEROES

1344*   - SYNC BYTE (8 "1" BITS)

1344*   - NUMBER OF BLOCKS TO FOLLOW (8 BITS)

1344*   - CHECKSUM (8 BITS)

1344*   - 2*N BLOCKS, CONSISTING OF:

1344*      - 8 BYTES OF ZERO

1344*      - 1 BYTE OF ONES

1344*      - 64 BYTES OF INFORMATION

1344*      - CHECKSUM (8 BITS)

1344*   - EACH BLOCK IS REPEATED TWICE. THE LEADING ZEROES AND

1344*     ONES ARE USED FOR TIMING AND TO R

1344*   - TRAILER OF EIGHT "1" BITS

1344*

1344*      REGISTER DEFINITION

1344*

1344*  R0  TEMPORARY

1344*  R1  PHASE FLAG REGISTER

1344*  R2  COUNTER/BYTE COUNTER

1344*  R3  DATA RATE COUNTER

1344*  R4  BYTE

1344*  R5  BLOCK COUNT

1344*  R6  LOOP COUNT

1344*  R7  CHECKSUM

1344*  R8  SET/RESET OUTPUT INSTRUCTION

1344*  R12 CRU BASE REGISTER = TIMER CRU

1344*

1344*********************************************************************

1344*      THE GRAPHICS LANGUAGE PROGRAM PROVIDES THE FOLLOWING

1344*  INFORMATION:

1344*     (R1)  DATA LENGTH IN BYTES

1344*     (R1) +2   VDP RAM START ADDRESS

1344*

1344*  THE DATA SHOULD BE READ BACK AT THE SAME BAUD RATE AT WHICH

1344*  IT WAS WRITTEN.

1344*

1344HX0010DATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
0016Expression operand

1346* = BR TABLE

1346*

1346* WRITE ROUTINE

1346*

1346WRITECLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R0Workspace Register operandNO OFFSET FOR VIDEO ADR.

1348LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R2Workspace Register operand,0768Immediate Value operandLOAD LEADER COUNT FIRST

134CLILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,7705Immediate Value operandLOAD SBZ INSTN

1350LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R3Workspace Register operand,0035Immediate Value operandSET DATA RATE AT 1500 BAUD

1354BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@INITSymbolic Memory operand
Definition: @INIT
Results to: 5050

Symbol INIT is a pointer to location 5050
INIT. FURTHER

1358LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R0Workspace Register operand,BOUTImmediate Value operand
Definition: BOUT
Results to: 5090

Symbol BOUT is a pointer to location 5090
SAVE    BYTES

135CHX0300LIMILoad Interrupt Mask Immediate
Load and Move instruction

[<label>] b LIMI b <iop> b [<comment>]
1Immediate Value operandLABEL IS NASTY!

1360WRITE0CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R4Workspace Register operand

1362BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
*R0Indirect Workspace Register operandWRITE BYTE OF LEADER

1364DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R2Workspace Register operandCOMPLETE LEADER

1366JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
WRITE0Expression operand
Definition: WRITE0
Results to: 4960

Symbol WRITE0 is a pointer to location 4960
AND RTN IF NOT COMPLETED

1368SETOSet to One
Logical instruction

[<label>] b SETO b <gas> b [<comment>]
R4Workspace Register operandBYTE =>FFFF (SYNC BYTE)

136ABLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
*R0Indirect Workspace Register operand

136CMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R5Workspace Register operand,R4Workspace Register operandWRITE BLOCKCOUNT TO TAPE

136ESWPBSwap Bytes
Load and Move instruction

[<label>] b SWPB b <gas> b [<comment>]
R4Workspace Register operand

1370BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
*R0Indirect Workspace Register operandAND OUTPUT AGAIN

1372MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R5Workspace Register operand,R4Workspace Register operandTWICE (ONE CHECKSUM)

1374SWPBSwap Bytes
Load and Move instruction

[<label>] b SWPB b <gas> b [<comment>]
R4Workspace Register operand

1376BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
*R0Indirect Workspace Register operand

1378CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R9Workspace Register operandUSED TO SEE IF 2ND RECD. WAS WRITTEN

137AREWRILILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R2Workspace Register operand,8Immediate Value operandWRITE 8 BYTES OF ZERO

137ELEADCLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R4Workspace Register operandZERO

1380BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
*R0Indirect Workspace Register operandWRITE THEM

1382DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R2Workspace Register operandMORE?

1384JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
LEADExpression operand
Definition: LEAD
Results to: 4990

Symbol LEAD is a pointer to location 4990
YES

1386SETOSet to One
Logical instruction

[<label>] b SETO b <gas> b [<comment>]
R4Workspace Register operandWRITE ALL ONES BYTE

1388BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
*R0Indirect Workspace Register operandWRITE IT

138AMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@R10LSBSymbolic Memory operand
Definition: @R10LSB
Results to: 33781

Symbol R10LSB is defined at location 0000
Symbol R10LSB is defined as WKSE+R10+R10+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R10 resolves to the Register number.
Register R10 resolves to the Register number.
,*R15Indirect Workspace Register operand
RESTORE VDP ADR.

138ELILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R2Workspace Register operand,64Immediate Value operandLOAD COUNT WITH ONE BLOCK

1392MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
R10Workspace Register operand,*R15Indirect Workspace Register operand

1394CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R7Workspace Register operandCLEAR CHECKSUM

1396WRBYTCLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R4Workspace Register operand

1398MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@VRDOFF(R15)Indexed Memory operand
Definition: @VRDOFF(R15)
Results to: 64540

Symbol VRDOFF is defined at location 0000
Symbol VRDOFF is defined as -1026
,R4Workspace Register operand
VDP DATA TO R4 MSB

139CAAdd Words
Arithmetic instruction

[<label>] b A b <gas>,<gad> b [<comment>]
R4Workspace Register operand,R7Workspace Register operandADD BYTE TO CHEKCSUM

139EBLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
*R0Indirect Workspace Register operandOUTPUT BYTE TO TAPE

13A0DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R2Workspace Register operandDEC. BYTE COUNTER

13A2JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
WRBYTExpression operand
Definition: WRBYT
Results to: 5014

Symbol WRBYT is a pointer to location 5014
WRITE ALL 64 BYTES

13A4MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R7Workspace Register operand,R4Workspace Register operandOUTPUT CHECKSUM

13A6BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
*R0Indirect Workspace Register operand

13A8INVInvert
Logical instruction

[<label>] b INV b <gas> b [<comment>]
R9Workspace Register operand2ND TIME RECORD WRITTEN?

13AAJNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
REWRIExpression operand
Definition: REWRI
Results to: 4986

Symbol REWRI is a pointer to location 4986
REWRITE

13ACAIAdd Immediate
Arithmetic instruction

[<label>] b AI b <wa>,<iop> b [<comment>]
R10Workspace Register operand,64Immediate Value operandBUMP ADR. TO NEXT RECD

13B0DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R5Workspace Register operandDONE ALL BLOCKS?

13B2JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
REWRIExpression operand
Definition: REWRI
Results to: 4986

Symbol REWRI is a pointer to location 4986
NO... NOT YET, CONTINUE

13B4SPINUnknown Instruction


replaceMe
WAIT FOR COMPLETION OF LAST CYCLE

13B6BBranch
Jump and Branch instruction

[<label>] b B b <gas> b [<comment>]
@STTIMSymbolic Memory operand
Definition: @STTIM
Results to: 5470

Symbol STTIM is a pointer to location 5470
STOP TIMER AND EXIT

13BA*

13BA* INITIALIZATION ROUTINE

13BA*

13BAINITMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
*R1+Indirect Workspace Register Auto Increment operand,R5Workspace Register operandCOPY NO. OF BLOCKS IN BLKCNT

13BCAIAdd Immediate
Arithmetic instruction

[<label>] b AI b <wa>,<iop> b [<comment>]
R5Workspace Register operand,63Immediate Value operandCOMPUTE IN BLOCKS OF 64 BYTES

13C0SRLShift Right Logical
Workspace Register shift instruction

[<label>] b SRL b <wa>,<scnt> b [<comment>]
R5Workspace Register operand,6Shift Count operandDIVIDE BY 2**6=64

13C2SOCSet Ones Corresponding
Logical instruction

[<label>] b SOC b <gas>,<gad> b [<comment>]
*R1Indirect Workspace Register operand,R0Workspace Register operandCOPY ADR. + OFFSET IN R0

13C4MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R0Workspace Register operand,R10Workspace Register operandSAVE ADR FOR WRITING DUPLICATES

13C6MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@R0LSBSymbolic Memory operand
Definition: @R0LSB
Results to: 33761

Symbol R0LSB is defined at location 0000
Symbol R0LSB is defined as WKSE+R0+R0+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R0 resolves to the Register number.
Register R0 resolves to the Register number.
,*R15Indirect Workspace Register operand
COPY IN VIDEO ADR

13CACLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R1Workspace Register operandINIT THE ERROR FLAG

13CCCLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R12Workspace Register operandCRU BASE

13CEMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
R0Workspace Register operand,*R15Indirect Workspace Register operandCOPIED...

13D0SOCSet Ones Corresponding
Logical instruction

[<label>] b SOC b <gas>,<gad> b [<comment>]
@HX0020Symbolic Memory operand
Definition: @HX0020
Results to: 0050

Symbol HX0020 is defined at location 0000
Symbol HX0020 is defined as S+0050
Symbol S is defined at location 0000
Symbol S is defined as 0
,R14Workspace Register operand
SET TIMER INTPT FLAG

13D4SBZSet CRU Bit to Logic Zero
Control and CRU instruction

[<label>] b SBZ b <disp> b [<comment>]
2CruBit Displacement operandTURN OFF VDP INTPT

13D6SBZSet CRU Bit to Logic Zero
Control and CRU instruction

[<label>] b SBZ b <disp> b [<comment>]
12CruBit Displacement operandTURN OFF ??? INTPUT

13D8LDCRLoad CRU
Control and CRU instruction

[<label>] b LDCR b <gas>,<cnt> b [<comment>]
R3Workspace Register operand,15CruBit Address operandLOAD TIMER

13DASBZSet CRU Bit to Logic Zero
Control and CRU instruction

[<label>] b SBZ b <disp> b [<comment>]
0CruBit Displacement operandENABLE INTS

13DCSBZSet CRU Bit to Logic Zero
Control and CRU instruction

[<label>] b SBZ b <disp> b [<comment>]
1CruBit Displacement operandTURN OFF EXTERNAL INT.

13DESBOSet CRU Bit to Logic One
Control and CRU instruction

[<label>] b SBO b <disp> b [<comment>]
3CruBit Displacement operandENABLE CLOCK INTPT

13E0RTReturn


[<label>] b RT b [<comment>]
AND RTN

13E2*

13E2* BYTE OUTPUT ROUTINE

13E2*

13E2BOUTLILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R6Workspace Register operand,8Immediate Value operandLOAD LOOP COUNTER

13E6INVInvert
Logical instruction

[<label>] b INV b <gas> b [<comment>]
R4Workspace Register operandINVERT FOR ENABLING "0" BIT JUMP

13E8BOUT0SPINUnknown Instruction


replaceMe
IDLE AROUND UNTIL LAST CYCLE OF

13EAXExecute
Jump and Branch instruction

[<label>] b X b <gas> b [<comment>]
R8Workspace Register operandALWAYS FLIP AT START OF BIT

13ECXORExclusive OR
Logical instruction

[<label>] b XOR b <gas>,<wad> b [<comment>]
@HX0300Symbolic Memory operand
Definition: @HX0300
Results to: 4956

Symbol HX0300 is a pointer to location 4956
,R8Workspace Register operand

13F0HXSPINEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
$Expression operand
Definition: $
Results to: 5104

$ represents the location 5104

13F0D3F0SPINUnknown Instruction


replaceMe
PREVIOUS BYTE+1ST OF THIS BYTE

13F2MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R4Workspace Register operand,R4Workspace Register operandTEST HIGHEST BIT FOR NEW FLIP CHECK

13F4JLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
BOUT1Expression operand
Definition: BOUT1
Results to: 5116

Symbol BOUT1 is a pointer to location 5116
BIT SET MEANS NO FLIP (SEE INV)

13F6XExecute
Jump and Branch instruction

[<label>] b X b <gas> b [<comment>]
R8Workspace Register operandFLIP OUTPUT LINE

13F8XORExclusive OR
Logical instruction

[<label>] b XOR b <gas>,<wad> b [<comment>]
@HX0300Symbolic Memory operand
Definition: @HX0300
Results to: 4956

Symbol HX0300 is a pointer to location 4956
,R8Workspace Register operand
REVERSE INSTN

13FCBOUT1SLAShift Left Arithmetic
Workspace Register shift instruction

[<label>] b SLA b <wa>,<scnt> b [<comment>]
R4Workspace Register operand,1Shift Count operandGET NEXT BIT READY FOR OUTPUT

13FEDECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R6Workspace Register operandHAS BEEN COMPLETED... THEN LOOP

1400JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
BOUT0Expression operand
Definition: BOUT0
Results to: 5096

Symbol BOUT0 is a pointer to location 5096
UNTIL BYTE COMPLETED

1402RTReturn


[<label>] b RT b [<comment>]
RETURN IF BYTE COMPLETED

1404*

1404* TIMER INTERRUPT ROUTINE

1404*

1404TIMERSBZSet CRU Bit to Logic Zero
Control and CRU instruction

[<label>] b SBZ b <disp> b [<comment>]
0CruBit Displacement operandMAKE SURE WE'RE IN INTPT MODE

1406SBOSet CRU Bit to Logic One
Control and CRU instruction

[<label>] b SBO b <disp> b [<comment>]
3CruBit Displacement operandCLEAR DECREMENTER INTPT

1408MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R1Workspace Register operand,R1Workspace Register operandTEST FLAG REGISTER

140AJLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
TIMER1Expression operand
Definition: TIMER1
Results to: 5146

Symbol TIMER1 is a pointer to location 5146
FLAG SET -> ERROR EXIT

140CLWPILoad Workspace Pointer Immediate
Load and Move instruction

[<label>] b LWPI b <iop> b [<comment>]
WKSCImmediate Value operand
Definition: WKSC
Results to: 33728

Symbol WKSC is defined at location 0000
Symbol WKSC is defined as PAD+192
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
BACK TO REGULAR WORKSPACE

1410CCompare Words
Compare instruction

[<label>] b C b <gas>,<gad> b [<comment>]
*R14Indirect Workspace Register operand,@HXSPINSymbolic Memory operand
Definition: @HXSPIN
Results to: 5104

Symbol HXSPIN is defined at location 5104
Symbol HXSPIN is defined as $
$ represents the location 5104
DOING A SPIN?

1414JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
TIMER1Expression operand
Definition: TIMER1
Results to: 5146

Symbol TIMER1 is a pointer to location 5146
NO, DON'T INC ADR.

1416INCTIncrement by Two
Arithmetic instruction

[<label>] b INCT b <gas> b [<comment>]
R14Workspace Register operandBYPASS SPIN

1418TIMER2RTWPReturn With Workspace Pointer
Jump and Branch instruction

[<label>] b RTWP b [<comment>]
AND RETURN

141ATIMER1LWPILoad Workspace Pointer Immediate
Load and Move instruction

[<label>] b LWPI b <iop> b [<comment>]
WKSCImmediate Value operand
Definition: WKSC
Results to: 33728

Symbol WKSC is defined at location 0000
Symbol WKSC is defined as PAD+192
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536

141EMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
@WKSE+R6+R6Symbolic Memory operand
Definition: @WKSE+R6+R6
Results to: 33772

Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R6 resolves to the Register number.
Register R6 resolves to the Register number.
,R14Workspace Register operand
GET EXIT ADDRESS

1422JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
TIMER2Expression operand
Definition: TIMER2
Results to: 5144

Symbol TIMER2 is a pointer to location 5144
AND EXIT

1424*

1424*  READ REGISTER DEFINITIONS

1424*

1424*  R0  TEMPORARY

1424*  R1  ERROR EXIT/INPUT LEVEL FLAG

1424*  R2  COUNTER/BYTE COUNTER

1424*  R3  DATA RATE COUNTER

1424*  R4  BYTE

1424*  R5  BLOCK COUNT

1424*  R6  BIT LENGTH ERROR EXIT ADR

1424*  R7  CHECKSUM

1424*  R8  RETRY COUNT/BYTE COUNT

1424*  R12 CRU BASE REGISTER = TIMER CRU

1424*

1424*

1424* CASSETTE READ ROUTINES

1424*

1424HX2100BYTEInitialize Byte
Directive that initializes constants

[<label>] b BYTE b <exp>[,<exp>]... b [<comment>]
33Expression operand,0Expression operand

1426*

1426* DEVIATION OF UP TO -25 TO +50 PERCENT OF THE

1426*    NOMINAL BAUD RATE IS PERMITTED

1426*

1426VERIFYSOCSet Ones Corresponding
Logical instruction

[<label>] b SOC b <gas>,<gad> b [<comment>]
@HX0010Symbolic Memory operand
Definition: @HX0010
Results to: 4932

Symbol HX0010 is a pointer to location 4932
,R14Workspace Register operand
SET VERIFY BIT

142ACLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R0Workspace Register operandSET ADR BIT TO READ FROM VDP

142CJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
READAExpression operand
Definition: READA
Results to: 5174

Symbol READA is a pointer to location 5174

142E* = BR TABLE

142EREADSZCSet Zeros Corresponding
Logical instruction

[<label>] b SZC b <gas>,<gad> b [<comment>]
@HX0010Symbolic Memory operand
Definition: @HX0010
Results to: 4932

Symbol HX0010 is a pointer to location 4932
,R14Workspace Register operand
RESET VERIFY BIT

1432LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R0Workspace Register operand,16384Immediate Value operandSET ADR. BIT TO WRITE TO VDP

1436READALILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R3Workspace Register operand,0043Immediate Value operandSET BAUDRATE IN

143AHX002BEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
$-2Expression operand
Definition: $-2
Results to: 5176

$ represents the location 5178

143ABLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@INITSymbolic Memory operand
Definition: @INIT
Results to: 5050

Symbol INIT is a pointer to location 5050
AND INIT

143EMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R10Workspace Register operand,R7Workspace Register operandSAVE VDP ADR.

1440CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R0Workspace Register operandINDICATE FIRST RECORD

1442HX20MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@HX20+1Symbolic Memory operand
Definition: @HX20+1
Results to: 5187

Symbol HX20 is a pointer to location 5186
,@ERRCDSymbolic Memory operand
Definition: @ERRCD
Results to: 33660

Symbol ERRCD is defined at location 0000
Symbol ERRCD is defined as STATUS
Symbol STATUS is defined at location 0000
Symbol STATUS is defined as PAD+124
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
ASSUME TIME OUT ERROR

1448READ12LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,30000Immediate Value operandLOAD RETRY COUNT FOR 10 SECS

144CLIMILoad Interrupt Mask Immediate
Load and Move instruction

[<label>] b LIMI b <iop> b [<comment>]
1Immediate Value operandALLOW TIMER INTPTS

1450LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R6Workspace Register operand,READ0Immediate Value operand
Definition: READ0
Results to: 5208

Symbol READ0 is a pointer to location 5208
LOAD TIME-OUT RETRY ADR

1454READ00LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R3Workspace Register operand,43Immediate Value operandIF FALSE START

1458READ0ANDIAND Immediate
Logical instruction

[<label>] b ANDI b <wa>,<iop> b [<comment>]
R1Workspace Register operand,255Immediate Value operandCLEAR FLAG TO PREVENT ERROR HANG UP

145CHX00FFEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
$-2Expression operand
Definition: $-2
Results to: 5210

$ represents the location 5212

145CDECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R8Workspace Register operandCOUNT FOR ONE RETRY

145EJEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
STTIMExpression operand
Definition: STTIM
Results to: 5470

Symbol STTIM is a pointer to location 5470
RETRY ERROR

1460LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R2Workspace Register operand,48Immediate Value operandCOUNT AT LEAST 48 ZEROES

1464MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R0Workspace Register operand,R0Workspace Register operandAM I IN THE MIDDLE?

1466JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
READ1Expression operand
Definition: READ1
Results to: 5226

Symbol READ1 is a pointer to location 5226
YES LOOK FOR 48 ZEROES

1468AAdd Words
Arithmetic instruction

[<label>] b A b <gas>,<gad> b [<comment>]
R2Workspace Register operand,R2Workspace Register operandNO LOOK FOR MORE

146AREAD1BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@RDBITSymbolic Memory operand
Definition: @RDBIT
Results to: 5490

Symbol RDBIT is a pointer to location 5490
GET A BIT ** TIME OUT GIVES RETRY

146EJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
READ15Expression operand
Definition: READ15
Results to: 5234

Symbol READ15 is a pointer to location 5234

1470JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
READ0Expression operand
Definition: READ0
Results to: 5208

Symbol READ0 is a pointer to location 5208
"1" RETURN

1472READ15DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R2Workspace Register operandDETECTED A "0" BIT, COUNT IT

1474JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
READ1Expression operand
Definition: READ1
Results to: 5226

Symbol READ1 is a pointer to location 5226
AND CONTINUE TILL DONE

1476* --- CALCULATE ACTUAL BIT RATE BASED ON 8 ZERO BIT TIMES ---

1476LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R9Workspace Register operand,32767Immediate Value operandBIG COUNT FOR TIMER

147ALILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,8Immediate Value operandNUMBER OF BITS TO AVERAGE

147ELDCRLoad CRU
Control and CRU instruction

[<label>] b LDCR b <gas>,<cnt> b [<comment>]
R9Workspace Register operand,15CruBit Address operandSET TIMER

1480SBZSet CRU Bit to Logic Zero
Control and CRU instruction

[<label>] b SBZ b <disp> b [<comment>]
0CruBit Displacement operandTURN ON 9901 INTPTS

1482SBOSet CRU Bit to Logic One
Control and CRU instruction

[<label>] b SBO b <disp> b [<comment>]
3CruBit Displacement operandENABLE CLOCK INTPT

1484LOOPBLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@FLUXCSymbolic Memory operand
Definition: @FLUXC
Results to: 5562

Symbol FLUXC is a pointer to location 5562
FIND BIT

1488JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
ENDLExpression operand
Definition: ENDL
Results to: 5260

Symbol ENDL is a pointer to location 5260
CHANGE-DEC NO. OF BITS

148AJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
LOOPExpression operand
Definition: LOOP
Results to: 5252

Symbol LOOP is a pointer to location 5252
NO CHANGE, KEEP LOOKING

148CENDLDECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R8Workspace Register operandLOOK FOR MORE ???

148EJNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
LOOPExpression operand
Definition: LOOP
Results to: 5252

Symbol LOOP is a pointer to location 5252
YES

1490SBOSet CRU Bit to Logic One
Control and CRU instruction

[<label>] b SBO b <disp> b [<comment>]
0CruBit Displacement operandSET 9901 TO CLOCK

1492STCRStore CRU
Control and CRU instruction

[<label>] b STCR b <gas>,<cnt> b [<comment>]
R3Workspace Register operand,15CruBit Address operandREAD TIMER

1494SSubtract Words
Arithmetic instruction

[<label>] b S b <gas>,<gad> b [<comment>]
R3Workspace Register operand,R9Workspace Register operandHOW MUCH TIME USED?

1496MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R9Workspace Register operand,R3Workspace Register operandSAVE CELL TIME

1498SLAShift Left Arithmetic
Workspace Register shift instruction

[<label>] b SLA b <wa>,<scnt> b [<comment>]
R9Workspace Register operand,2Shift Count operandCELL TIME * 4

149AAAdd Words
Arithmetic instruction

[<label>] b A b <gas>,<gad> b [<comment>]
R9Workspace Register operand,R3Workspace Register operandMAKE NEW 3/4 BIT TIME

149CSRLShift Right Logical
Workspace Register shift instruction

[<label>] b SRL b <wa>,<scnt> b [<comment>]
R3Workspace Register operand,6Shift Count operand5/8 CELL TIME/2

149EORIOR Immediate
Logical instruction

[<label>] b ORI b <wa>,<iop> b [<comment>]
R3Workspace Register operand,0001Immediate Value operandSET 9901 TO CLOCK

14A2LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R10Workspace Register operand,READ5Immediate Value operand
Definition: READ5
Results to: 5296

Symbol READ5 is a pointer to location 5296
RTN ADR FOR SUBSUBROUTINE

14A6CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R3Workspace Register operand,0031Immediate Value operandMAKE SURE FREQ. NOT TOO SMALL

14AAJLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
READ00Expression operand
Definition: READ00
Results to: 5204

Symbol READ00 is a pointer to location 5204
TOO SMALL, LOOK FOR REAL ZEROS

14ACBBranch
Jump and Branch instruction

[<label>] b B b <gas> b [<comment>]
@RDBIT2Symbolic Memory operand
Definition: @RDBIT2
Results to: 5504

Symbol RDBIT2 is a pointer to location 5504
LOAD NEW BIT TIME

14B0*

14B0READ5BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@RDBITSymbolic Memory operand
Definition: @RDBIT
Results to: 5490

Symbol RDBIT is a pointer to location 5490
AGAIN READ BIT INPUT

14B4JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
READ5Expression operand
Definition: READ5
Results to: 5296

Symbol READ5 is a pointer to location 5296
"0" IS STILL OK

14B6* ENTRY NOT KNOWN

14B6D4B6LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R2Workspace Register operand,7Immediate Value operandSHOULD BE "ALL ONE" BYTE

14BAREAD3BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@RDBITSymbolic Memory operand
Definition: @RDBIT
Results to: 5490

Symbol RDBIT is a pointer to location 5490
NEXT BIT PHASE

14BEJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
READ0Expression operand
Definition: READ0
Results to: 5208

Symbol READ0 is a pointer to location 5208
FALSE ALARM-NOT A REAL LEADER

14C0DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R2Workspace Register operandALL SYNC BYTE DONE?

14C2JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
READ3Expression operand
Definition: READ3
Results to: 5306

Symbol READ3 is a pointer to location 5306
NO...KEEP ACCEPTING "1" BITS

14C4LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R6Workspace Register operand,ERROR1Immediate Value operand
Definition: ERROR1
Results to: 5368

Symbol ERROR1 is a pointer to location 5368
GET SET FOR ERROR EXIT

14C8* AT THIS POINT WE ARE SYNCHRONIZED ON THE DATA STREAM

14C8* COMING IN FROM THE CASSETTE, BOTH ON BIT AND R4 LEVEL

14C8* ALL DATA COMING IN NOW SHOULD BE CORRECT. IF NOT WE

14C8* TAKE THE ERROR EXIT

14C8MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R0Workspace Register operand,R0Workspace Register operandDO I READ BLOCK COUNTS?

14CAJNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
DUMP3Expression operand
Definition: DUMP3
Results to: 5422

Symbol DUMP3 is a pointer to location 5422
I ALREADY READ THEM

14CCMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@HX2100Symbolic Memory operand
Definition: @HX2100
Results to: 5156

Symbol HX2100 is a pointer to location 5156
,@ERRCDSymbolic Memory operand
Definition: @ERRCD
Results to: 33660

Symbol ERRCD is defined at location 0000
Symbol ERRCD is defined as STATUS
Symbol STATUS is defined at location 0000
Symbol STATUS is defined as PAD+124
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
ASSUME NOT ENOUGH BLOCKS

14D2MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R7Workspace Register operand,R0Workspace Register operand

14D4CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R7Workspace Register operandINIT CHECK SUM

14D6BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@RDBYTESymbolic Memory operand
Definition: @RDBYTE
Results to: 5536

Symbol RDBYTE is a pointer to location 5536
CALL READ BYTE ROUTINE

14DACCompare Words
Compare instruction

[<label>] b C b <gas>,<gad> b [<comment>]
R5Workspace Register operand,R4Workspace Register operandENOUGH SPACE AVAILABLE??

14DCJLJump if Logical Low
Jump and Branch instruction

[<label>] b JL b <exp> b [<comment>]
STTIMExpression operand
Definition: STTIM
Results to: 5470

Symbol STTIM is a pointer to location 5470
** ERROR ** NOT ENOUGH SPACE

14DEMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R4Workspace Register operand,R5Workspace Register operandREAD NO. OF BLOCKS ON TAPE

14E0INCIncrement
Arithmetic instruction

[<label>] b INC b <gas> b [<comment>]
R5Workspace Register operandAND INC FOR EASE OF PROGRAMMING

14E2NEGNegate
Arithmetic instruction

[<label>] b NEG b <gas> b [<comment>]
R7Workspace Register operandPREPARE FOR BLOCK COUNT CHECK

14E4BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@RDBYTESymbolic Memory operand
Definition: @RDBYTE
Results to: 5536

Symbol RDBYTE is a pointer to location 5536
READ CHECK SUM

14E8JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
STTIMExpression operand
Definition: STTIM
Results to: 5470

Symbol STTIM is a pointer to location 5470
BAD BLOCK COUNT DATA

14EAJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
DUMP4Expression operand
Definition: DUMP4
Results to: 5414

Symbol DUMP4 is a pointer to location 5414
LOOP AROUND TO FIRST READ

14ECRDLOOPANDIAND Immediate
Logical instruction

[<label>] b ANDI b <wa>,<iop> b [<comment>]
R7Workspace Register operand,255Immediate Value operandUSE ONLY LOWER BYTE OF CHKSUM

14F0NEGNegate
Arithmetic instruction

[<label>] b NEG b <gas> b [<comment>]
R7Workspace Register operandNEGATTE FOR ZERO RESULT

14F2BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@RDBYTESymbolic Memory operand
Definition: @RDBYTE
Results to: 5536

Symbol RDBYTE is a pointer to location 5536
READ RECORDED CHKSUM

14F6JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
DUMPExpression operand
Definition: DUMP
Results to: 5382

Symbol DUMP is a pointer to location 5382
**NO ERROR** CHKSUM CORRECT

14F8ERROR1MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R5Workspace Register operand,R5Workspace Register operandERROR ON 2ND RECORD

14FAJLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
STTIMExpression operand
Definition: STTIM
Results to: 5470

Symbol STTIM is a pointer to location 5470
YES, FLAG ERROR

14FCMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@R0LSBSymbolic Memory operand
Definition: @R0LSB
Results to: 33761

Symbol R0LSB is defined at location 0000
Symbol R0LSB is defined as WKSE+R0+R0+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R0 resolves to the Register number.
Register R0 resolves to the Register number.
,*R15Indirect Workspace Register operand
RESTORE VDP ADR.

1500NEGNegate
Arithmetic instruction

[<label>] b NEG b <gas> b [<comment>]
R5Workspace Register operandNO, TRY 2ND READING

1502MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
R0Workspace Register operand,*R15Indirect Workspace Register operand

1504JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
READ12Expression operand
Definition: READ12
Results to: 5192

Symbol READ12 is a pointer to location 5192
READ AGAIN

1506DUMPMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R5Workspace Register operand,R5Workspace Register operandHAS 2ND RECORD BEEN READ?

1508JLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
DUMP2Expression operand
Definition: DUMP2
Results to: 5402

Symbol DUMP2 is a pointer to location 5402
YES, SO DON'T READ AGAIN

150ALILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R2Workspace Register operand,73Immediate Value operandSKIP NEXT RECORD

150EDUMP1LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R6Workspace Register operand,DUMPXImmediate Value operand
Definition: DUMPX
Results to: 5398

Symbol DUMPX is a pointer to location 5398

1512BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@RDBYTESymbolic Memory operand
Definition: @RDBYTE
Results to: 5536

Symbol RDBYTE is a pointer to location 5536
WAIT FOR A BYTE

1516DUMPXDECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R2Workspace Register operandMORE TO READ?

1518JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
DUMP1Expression operand
Definition: DUMP1
Results to: 5390

Symbol DUMP1 is a pointer to location 5390
READ SOME MORE

151ADUMP2AIAdd Immediate
Arithmetic instruction

[<label>] b AI b <wa>,<iop> b [<comment>]
R0Workspace Register operand,64Immediate Value operandBUMP RECORD ADR. IN VDP

151EMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@R0LSBSymbolic Memory operand
Definition: @R0LSB
Results to: 33761

Symbol R0LSB is defined at location 0000
Symbol R0LSB is defined as WKSE+R0+R0+1
Symbol WKSE is defined at location 0000
Symbol WKSE is defined as PAD+224
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
Register R0 resolves to the Register number.
Register R0 resolves to the Register number.
,*R15Indirect Workspace Register operand
OUTPUT ADR. TO VDP

1522ABSAbsolute Value
Arithmetic instruction

[<label>] b ABS b <gas> b [<comment>]
R5Workspace Register operandSET FLAG FOR 1ST RECORD

1524MOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
R0Workspace Register operand,*R15Indirect Workspace Register operand

1526DUMP4CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R7Workspace Register operandCLEAR CHKSUM AFTER DUMPING

1528DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R5Workspace Register operandREDUCE NO. OF BLOCKS TO READ

152AJNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
READ12Expression operand
Definition: READ12
Results to: 5192

Symbol READ12 is a pointer to location 5192
READY...MORE BLOCKS TO GO

152CJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
DONEExpression operand
Definition: DONE
Results to: 5464

Symbol DONE is a pointer to location 5464
NO MORE TO READ

152EDUMP3LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R2Workspace Register operand,64Immediate Value operandSTART OUT FOR 128 BYTES

1532CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R7Workspace Register operandZERO CHKSUM FOR NEXT RECORD

1534RDL0BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@RDBYTESymbolic Memory operand
Definition: @RDBYTE
Results to: 5536

Symbol RDBYTE is a pointer to location 5536
READ ONE BYTE

1538SWPBSwap Bytes
Load and Move instruction

[<label>] b SWPB b <gas> b [<comment>]
R4Workspace Register operandSWAP TO UPPER BYTE

153ACOCCompare Ones Corresponding
Compare instruction

[<label>] b COC b <gas>,<wad> b [<comment>]
@HX0010Symbolic Memory operand
Definition: @HX0010
Results to: 4932

Symbol HX0010 is a pointer to location 4932
,R14Workspace Register operand
IS IT A VERIFY

153EJNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
STOExpression operand
Definition: STO
Results to: 5454

Symbol STO is a pointer to location 5454
NO, SO STORE IT

1540SBSubtract Bytes
Arithmetic instruction

[<label>] b SB b <gas>,<gad> b [<comment>]
@VRDOFF(R15)Indexed Memory operand
Definition: @VRDOFF(R15)
Results to: 64540

Symbol VRDOFF is defined at location 0000
Symbol VRDOFF is defined as -1026
,R4Workspace Register operand
IS IT RIGHT?

1544JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
STO1Expression operand
Definition: STO1
Results to: 5458

Symbol STO1 is a pointer to location 5458
YES, CONTINUE

1546CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R5Workspace Register operand,1Immediate Value operandLAST RECORD?

154AJEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
STO1Expression operand
Definition: STO1
Results to: 5458

Symbol STO1 is a pointer to location 5458
YYES, IGNORE BAD COMPARISONS

154CJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
ERROR1Expression operand
Definition: ERROR1
Results to: 5368

Symbol ERROR1 is a pointer to location 5368
NO, TRY READING 2ND RECORD

154ESTOMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
R4Workspace Register operand,@VWDOFF(R15)Indexed Memory operand
Definition: @VWDOFF(R15)
Results to: 0028

Symbol VWDOFF is defined at location 0000
Symbol VWDOFF is defined as -2
WRITE DATA TO VDP

1552STO1DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R2Workspace Register operandSEE IF DONE

1554JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
RDL0Expression operand
Definition: RDL0
Results to: 5428

Symbol RDL0 is a pointer to location 5428
NO.. NOT YET

1556JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
RDLOOPExpression operand
Definition: RDLOOP
Results to: 5356

Symbol RDLOOP is a pointer to location 5356
COMPLETE READ LOOP

1558DONEMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@HX002BSymbolic Memory operand
Definition: @HX002B
Results to: 5176

Symbol HX002B is defined at location 5178
Symbol HX002B is defined as $-2
$ represents the location 5178
,@ERRCDSymbolic Memory operand
Definition: @ERRCD
Results to: 33660

Symbol ERRCD is defined at location 0000
Symbol ERRCD is defined as STATUS
Symbol STATUS is defined at location 0000
Symbol STATUS is defined as PAD+124
Symbol PAD is defined at location 0000
Symbol PAD is defined as 33536
CLEAR ERROR CODE

155E* ------ ALSO ERROR EXIT --------

155ESTTIMSZCSet Zeros Corresponding
Logical instruction

[<label>] b SZC b <gas>,<gad> b [<comment>]
@HX0010Symbolic Memory operand
Definition: @HX0010
Results to: 4932

Symbol HX0010 is a pointer to location 4932
,R14Workspace Register operand
FREE UP BIT

1562SZCSet Zeros Corresponding
Logical instruction

[<label>] b SZC b <gas>,<gad> b [<comment>]
@HX0020Symbolic Memory operand
Definition: @HX0020
Results to: 0050

Symbol HX0020 is defined at location 0000
Symbol HX0020 is defined as S+0050
Symbol S is defined at location 0000
Symbol S is defined as 0
,R14Workspace Register operand
TURN OFF TIMER INTPT FLAG

1566SBZSet CRU Bit to Logic Zero
Control and CRU instruction

[<label>] b SBZ b <disp> b [<comment>]
3CruBit Displacement operandTURN OFF TIMER INTPT MASK BIT

1568SBOSet CRU Bit to Logic One
Control and CRU instruction

[<label>] b SBO b <disp> b [<comment>]
12CruBit Displacement operandENABLE    INTERRUPT

156ASBOSet CRU Bit to Logic One
Control and CRU instruction

[<label>] b SBO b <disp> b [<comment>]
1CruBit Displacement operandENABLE EXT INTPT

156CSBOSet CRU Bit to Logic One
Control and CRU instruction

[<label>] b SBO b <disp> b [<comment>]
2CruBit Displacement operandENABLE VDP INTPT

156EBBranch
Jump and Branch instruction

[<label>] b B b <gas> b [<comment>]
@NEXTSymbolic Memory operand
Definition: @NEXT
Results to: 0112

Symbol NEXT is defined at location 0000
Symbol NEXT is defined as S+0112
Symbol S is defined at location 0000
Symbol S is defined as 0

1572*

1572*  BIT INPUT ROUTINE

1572*

1572* READ ONE BIT FROM THE INPUT STREAM. RETURN TO CALLER+2

1572* IF BIT READ IS "1"

1572*     THE VALUE OF THE BIT CELL IS COMPUTED BY DETERMINING

1572* THE INPUT LINE VALUE AT 3/4 OF THE BIT CELL LENGTH. IF THE

1572* INPUT LINE LEVEL HAS CHANGED DURING THAT PERIOD, THE BIT

1572* READ = "1"; IF NOT, THE BIT READ = "0"

1572*     THE NEXT FLUX CHANGE SHOULD COME WITHIN 3/4 OF A BIT

1572* CELL, IN ORDER TO ACCEPT THE BIT

1572*

1572RDBITMOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R11Workspace Register operand,R10Workspace Register operandSAVE RTN ADR. IN LEVEL 2

1574SPINUnknown Instruction


replaceMe
WAIT FOR END OF CYCLE

1576BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@FLUXCSymbolic Memory operand
Definition: @FLUXC
Results to: 5562

Symbol FLUXC is a pointer to location 5562
SEE IF WE HAD A FLUX CHANGE

157AINCTIncrement by Two
Arithmetic instruction

[<label>] b INCT b <gas> b [<comment>]
R10Workspace Register operandIF SO... UPDATE RTN ADR

157CORIOR Immediate
Logical instruction

[<label>] b ORI b <wa>,<iop> b [<comment>]
R1Workspace Register operand,65280Immediate Value operandSET FLAG FOR ERROR EXIT

1580RDBIT2CZCCompare Zeros Corresponding
Compare instruction

[<label>] b CZC b <gas>,<wad> b [<comment>]
@HX00FFSymbolic Memory operand
Definition: @HX00FF
Results to: 5210

Symbol HX00FF is defined at location 5212
Symbol HX00FF is defined as $-2
$ represents the location 5212
,R1Workspace Register operand
WHICH WAY IS CHANGED FLUX?

1584JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
F2Expression operand
Definition: F2
Results to: 5516

Symbol F2 is a pointer to location 5516
INPUT IS A ZERO

1586F1TBTest Bit
Control and CRU instruction

[<label>] b TB b <disp> b [<comment>]
27CruBit Displacement operandWAIT FOR A CHANGE

1588JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
RDBIT1Expression operand
Definition: RDBIT1
Results to: 5520

Symbol RDBIT1 is a pointer to location 5520
CHANGED

158AJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
F1Expression operand
Definition: F1
Results to: 5510

Symbol F1 is a pointer to location 5510
NO CHANGE

158CF2TBTest Bit
Control and CRU instruction

[<label>] b TB b <disp> b [<comment>]
27CruBit Displacement operandWAIT FOR A CHANGE

158EJNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
F2Expression operand
Definition: F2
Results to: 5516

Symbol F2 is a pointer to location 5516
NO CHANGE, WAIT SOME MORE

1590RDBIT1LDCRLoad CRU
Control and CRU instruction

[<label>] b LDCR b <gas>,<cnt> b [<comment>]
R3Workspace Register operand,15CruBit Address operandAN ERROR EXIT

1592SBZSet CRU Bit to Logic Zero
Control and CRU instruction

[<label>] b SBZ b <disp> b [<comment>]
0CruBit Displacement operandENABLE INTPTS

1594SBOSet CRU Bit to Logic One
Control and CRU instruction

[<label>] b SBO b <disp> b [<comment>]
3CruBit Displacement operandENABLE CLOCK INTPT

1596ANDIAND Immediate
Logical instruction

[<label>] b ANDI b <wa>,<iop> b [<comment>]
R1Workspace Register operand,255Immediate Value operandRESET ERROR FLAG TO PREVENT CHANGE

159AXORExclusive OR
Logical instruction

[<label>] b XOR b <gas>,<wad> b [<comment>]
@HX00FFSymbolic Memory operand
Definition: @HX00FF
Results to: 5210

Symbol HX00FF is defined at location 5212
Symbol HX00FF is defined as $-2
$ represents the location 5212
,R1Workspace Register operand
RECORD FLUX CHANGE

159EBBranch
Jump and Branch instruction

[<label>] b B b <gas> b [<comment>]
*R10Indirect Workspace Register operandTIMER... THEN EXIT ON LEVEL 2

15A0* ----- BYTE READ ROUTINE ------

15A0* THE R4 READ ROUTINE IS SIMPLE AND STRAIGHT FORWARD.

15A0* ONLY REMEMBER THAT WE ARE DEALING WITH THREE LEVELS

15A0* OF SUBROUTINES HERE, SO WE MUST SAVE THE RTN ADR IN R9

15A0*

15A0RDBYTELILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,8Immediate Value operandLOAD BYTE COUNTER

15A4CLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
R4Workspace Register operandCLEAR RESULT

15A6MOVMove Word
Load and Move instruction

[<label>] b MOV b <gas>,<gad> b [<comment>]
R11Workspace Register operand,R9Workspace Register operandSAVE RTN ADR. IN LEVEL 3

15A8RDBYT0SLAShift Left Arithmetic
Workspace Register shift instruction

[<label>] b SLA b <wa>,<scnt> b [<comment>]
R4Workspace Register operand,1Shift Count operandRESULT ONE BIT TO THE LEFT

15AABLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@RDBITSymbolic Memory operand
Definition: @RDBIT
Results to: 5490

Symbol RDBIT is a pointer to location 5490
READ ONE BIT

15AEJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
RDBYT1Expression operand
Definition: RDBYT1
Results to: 5554

Symbol RDBYT1 is a pointer to location 5554
AVOID COUNTING ZEROS

15B0INCIncrement
Arithmetic instruction

[<label>] b INC b <gas> b [<comment>]
R4Workspace Register operandIF IT'S A "1", INC. BYTE

15B2RDBYT1DECDecrement
Arithmetic instruction

[<label>] b DEC b <gas> b [<comment>]
R8Workspace Register operandCONTINUE??

15B4JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
RDBYT0Expression operand
Definition: RDBYT0
Results to: 5544

Symbol RDBYT0 is a pointer to location 5544
YEP...

15B6AAdd Words
Arithmetic instruction

[<label>] b A b <gas>,<gad> b [<comment>]
R4Workspace Register operand,R7Workspace Register operandUPDATE CHKSUM *** CONDITION CODES

15B8BBranch
Jump and Branch instruction

[<label>] b B b <gas> b [<comment>]
*R9Indirect Workspace Register operandRTN FROM BYTE READING (LEVEL 3)

15BA* FLUX CHANGE CONTROL ROUTINE

15BA* RETURNS TO (R11) IF FLUX HAS CHANGED, (R11) +2 IF FLUX

15BA* HASN'T CHANGED SINCE LAST OUTPUT VALUE.

15BA*

15BAFLUXCTBTest Bit
Control and CRU instruction

[<label>] b TB b <disp> b [<comment>]
27CruBit Displacement operandCONTROL VALUE OF INPUT LINE

15BCJEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
FLUXC1Expression operand
Definition: FLUXC1
Results to: 5578

Symbol FLUXC1 is a pointer to location 5578
INPUT LINE SET

15BECZCCompare Zeros Corresponding
Compare instruction

[<label>] b CZC b <gas>,<wad> b [<comment>]
@HX00FFSymbolic Memory operand
Definition: @HX00FF
Results to: 5210

Symbol HX00FF is defined at location 5212
Symbol HX00FF is defined as $-2
$ represents the location 5212
,R1Workspace Register operand
WAS INPUT LINE HIGH LAST TIME?

15C2JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
FLUXC2Expression operand
Definition: FLUXC2
Results to: 5584

Symbol FLUXC2 is a pointer to location 5584
INPUT LINE WAS LOW

15C4FLUXC0XORExclusive OR
Logical instruction

[<label>] b XOR b <gas>,<wad> b [<comment>]
@HX00FFSymbolic Memory operand
Definition: @HX00FF
Results to: 5210

Symbol HX00FF is defined at location 5212
Symbol HX00FF is defined as $-2
$ represents the location 5212
,R1Workspace Register operand
FLIP FLAG(INPUT LINE CHANGED)

15C8RTReturn


[<label>] b RT b [<comment>]
& RETURN

15CAFLUXC1CZCCompare Zeros Corresponding
Compare instruction

[<label>] b CZC b <gas>,<wad> b [<comment>]
@HX00FFSymbolic Memory operand
Definition: @HX00FF
Results to: 5210

Symbol HX00FF is defined at location 5212
Symbol HX00FF is defined as $-2
$ represents the location 5212
,R1Workspace Register operand
INPUT LINE HIGH AGAIN?

15CEJEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
FLUXC0Expression operand
Definition: FLUXC0
Results to: 5572

Symbol FLUXC0 is a pointer to location 5572
INPUT LINE WAS  LOW -> CHANGE

15D0FLUXC2INCTIncrement by Two
Arithmetic instruction

[<label>] b INCT b <gas> b [<comment>]
R11Workspace Register operandUPDATE RTN ADR, NO CHANGE

15D2RTReturn


[<label>] b RT b [<comment>]