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+>0032Expression operand
Definition: S+>0032
Results to: >0032

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+>0070Expression operand
Definition: S+>0070
Results to: >0070

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+>0AC0Expression operand
Definition: S+>0AC0
Results to: >0AC0

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+>0B24Expression operand
Definition: S+>0B24
Results to: >0B24

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+>1648Expression operand
Definition: S+>1648
Results to: >1648

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+>164EExpression operand
Definition: S+>164E
Results to: >164E

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+>1642Expression operand
Definition: S+>1642
Results to: >1642

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+>15D6Expression operand
Definition: S+>15D6
Results to: >15D6

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+>163CExpression operand
Definition: S+>163C
Results to: >163C

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+>1F2EExpression operand
Definition: S+>1F2E
Results to: >1F2E

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+>1868Expression operand
Definition: S+>1868
Results to: >1868

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+>1FA8Expression operand
Definition: S+>1FA8
Results to: >1FA8

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+>1FC8Expression operand
Definition: S+>1FC8
Results to: >1FC8

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+>1FDAExpression operand
Definition: S+>1FDA
Results to: >1FDA

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>]
>400Expression operandGROM WRITE DATA OFFSET (FROM R13)

0000VRSOFFEQUDefine assembly-time constant
Directive that initializes constants

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

0000GWAOFFEQUDefine assembly-time constant
Directive that initializes constants

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

0000VRDOFFEQUDefine assembly-time constant
Directive that initializes constants

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

0000SGCADREQUDefine assembly-time constant
Directive that initializes constants

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

0000*

0000* RAM EQUATES

0000*

0000PADEQUDefine assembly-time constant
Directive that initializes constants

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

0000FACEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
PAD+>4AExpression operand
Definition: PAD+>4A
Results to: >834A

Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

0000FDVSREQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
FAC+>0AExpression operand
Definition: FAC+>0A
Results to: >8354

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
DIVISOR STORE DURING DIVISION

0000ARGEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
PAD+>5CExpression operand
Definition: PAD+>5C
Results to: >835C

Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

0000PLAYEREQUDefine assembly-time constant
Directive that initializes constants

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

Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

0000SIGNEQUDefine assembly-time constant
Directive that initializes constants

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

Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

0000EXPEQUDefine assembly-time constant
Directive that initializes constants

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

Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

0000STATUSEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
PAD+>7CExpression operand
Definition: PAD+>7C
Results to: >837C

Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

0000ERRCDEQUDefine assembly-time constant
Directive that initializes constants

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

Symbol STATUS is defined at location >0000
Symbol STATUS is defined as PAD+>7C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

0000GROMFGEQUDefine assembly-time constant
Directive that initializes constants

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

Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

0000*

0000WKSCEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
PAD+>C0Expression operand
Definition: PAD+>C0
Results to: >83C0

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

0000WKSEEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
PAD+>E0Expression operand
Definition: PAD+>E0
Results to: >83E0

Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >83E1

Symbol WKSE is defined at location >0000
Symbol WKSE is defined as PAD+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >83E3

Symbol WKSE is defined at location >0000
Symbol WKSE is defined as PAD+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >83E5

Symbol WKSE is defined at location >0000
Symbol WKSE is defined as PAD+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >83E7

Symbol WKSE is defined at location >0000
Symbol WKSE is defined as PAD+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >83ED

Symbol WKSE is defined at location >0000
Symbol WKSE is defined as PAD+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >83EF

Symbol WKSE is defined at location >0000
Symbol WKSE is defined as PAD+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >83F1

Symbol WKSE is defined at location >0000
Symbol WKSE is defined as PAD+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >83F3

Symbol WKSE is defined at location >0000
Symbol WKSE is defined as PAD+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >83F5

Symbol WKSE is defined at location >0000
Symbol WKSE is defined as PAD+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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>]
>8000Expression operand

0000*

0000GREQUDefine assembly-time constant
Directive that initializes constants

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

0000VRDEQUDefine assembly-time constant
Directive that initializes constants

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

0000VRSEQUDefine assembly-time constant
Directive that initializes constants

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

0000VWDEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
>8C00Expression operandVDP WRITE DATA

0000VWAEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
>8C02Expression operandVDP WRITE ADDRESS

0000*

0000* MISC. EQUATES

0000HIBYTEEQUDefine assembly-time constant
Directive that initializes constants

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

0000OFERREQUDefine assembly-time constant
Directive that initializes constants

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

0000DZERREQUDefine assembly-time constant
Directive that initializes constants

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

0000SGNBITEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
>8000Expression 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+>0D1AExpression operand
Definition: S+>0D1A
Results to: >0D1A

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: >0F54

Symbol ROUND is a pointer to location >0F54
,ROUNUExpression operand
Definition: ROUNU
Results to: >0FB2

Symbol ROUNU is a pointer to location >0FB2
,STEXITExpression operand
Definition: STEXIT
Results to: >0FA4

Symbol STEXIT is a pointer to location >0FA4
,OVEXPExpression operand
Definition: OVEXP
Results to: >0FC2

Symbol OVEXP is a pointer to location >0FC2
,OVExpression operand
Definition: OV
Results to: >0FCC

Symbol OV is a pointer to location >0FCC
,FADDExpression operand
Definition: FADD
Results to: >0D80

Symbol FADD is a pointer to location >0D80
,FSUBExpression operand
Definition: FSUB
Results to: >0D7C

Symbol FSUB is a pointer to location >0D7C

0D2ADATAInitialize Word
Directive that initializes constants

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

Symbol FMULT is a pointer to location >0E88
,FDIVExpression operand
Definition: FDIV
Results to: >0FF4

Symbol FDIV is a pointer to location >0FF4
,FCOMPExpression operand
Definition: FCOMP
Results to: >0D3A

Symbol FCOMP is a pointer to location >0D3A
,SADDExpression operand
Definition: SADD
Results to: >0D84

Symbol SADD is a pointer to location >0D84
,SSUBExpression operand
Definition: SSUB
Results to: >0D74

Symbol SSUB is a pointer to location >0D74
,SMULTExpression operand
Definition: SMULT
Results to: >0E8C

Symbol SMULT is a pointer to location >0E8C
,SDIVExpression operand
Definition: SDIV
Results to: >0FF8

Symbol SDIV is a pointer to location >0FF8
,SCOMPExpression operand
Definition: SCOMP
Results to: >0D46

Symbol SCOMP is a pointer to location >0D46

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: >0FAA

Symbol STEX01 is a pointer to location >0FAA
LOAD EXIT FOR GPL COMPARE

0D40JMPUnconditional Jump
Jump and Branch instruction

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

Symbol FCOMP1 is a pointer to location >0D50

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: >0D4C

Symbol SCOMP1 is a pointer to location >0D4C

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: >0FAA

Symbol STEX01 is a pointer to location >0FAA
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: >1FA8

Symbol POPSTK is defined at location >0000
Symbol POPSTK is defined as S+>1FA8
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: >835C

Symbol ARG is defined at location >0000
Symbol ARG is defined as PAD+>5C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

0D54LILoad Immediate
Load and Move instruction

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

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

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: >0D72

Symbol FCOMRT is a pointer to location >0D72
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: >0D72

Symbol FCOMRT is a pointer to location >0D72
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: >0D68

Symbol FCOM01 is a pointer to location >0D68
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: >0D72

Symbol FCOMRT is a pointer to location >0D72
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: >0D72

Symbol FCOMRT is a pointer to location >0D72

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: >1FA8

Symbol POPSTK is defined at location >0000
Symbol POPSTK is defined as S+>1FA8
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: >834A

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >0D8A

Symbol FADD1 is a pointer to location >0D8A

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: >1FA8

Symbol POPSTK is defined at location >0000
Symbol POPSTK is defined as S+>1FA8
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: >835C

Symbol ARG is defined at location >0000
Symbol ARG is defined as PAD+>5C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,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: >0DA4

Symbol FADD02 is a pointer to location >0DA4
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: >834A

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,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: >0DA8

Symbol FADD03 is a pointer to location >0DA8
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: >8366

Symbol ARG is defined at location >0000
Symbol ARG is defined as PAD+>5C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,@FAC+>8(R1)Indexed Memory operand
Definition: @FAC+>8(R1)
Results to: >8354

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

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: >0D9A

Symbol FADD01 is a pointer to location >0D9A

0DA4FADD02BBranch
Jump and Branch instruction

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

Symbol STEX is a pointer to location >0FA6
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: >834A

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
TAKE ABSOLUTE VAL OF FAC

0DAEABSAbsolute Value
Arithmetic instruction

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

Symbol ARG is defined at location >0000
Symbol ARG is defined as PAD+>5C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >8358

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,@ARG+>8(R3)Indexed Memory operand
Definition: @ARG+>8(R3)
Results to: >836A

Symbol ARG is defined at location >0000
Symbol ARG is defined as PAD+>5C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

0DBCJGTJump if Greater Than
Jump and Branch instruction

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

Symbol FADD05 is a pointer to location >0DDA
TRUE INITIALLY

0DBEJLTJump if Less Than
Jump and Branch instruction

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

Symbol FADD21 is a pointer to location >0DC6
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: >0DB6

Symbol FADD20 is a pointer to location >0DB6
COMPARE ALL 4 WORDS

0DC4JMPUnconditional Jump
Jump and Branch instruction

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

Symbol FADD05 is a pointer to location >0DDA
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: >836A

Symbol ARG is defined at location >0000
Symbol ARG is defined as PAD+>5C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,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: >8358

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,@ARG+>8(R3)Indexed Memory operand
Definition: @ARG+>8(R3)
Results to: >836A

Symbol ARG is defined at location >0000
Symbol ARG is defined as PAD+>5C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

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: >8358

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

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: >0DC6

Symbol FADD21 is a pointer to location >0DC6
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: >8352

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
CLEAR GUARD DIGITS FOR FAC

0DE0CLRClear
Logical instruction

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

Symbol ARG is defined at location >0000
Symbol ARG is defined as PAD+>5C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >8375

Symbol SIGN is defined at location >0000
Symbol SIGN is defined as PAD+>75
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >834A

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,@R6LSBSymbolic Memory operand
Definition: @R6LSB
Results to: >83ED

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >8376

Symbol EXP is defined at location >0000
Symbol EXP is defined as PAD+>76
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >834A

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >835C

Symbol ARG is defined at location >0000
Symbol ARG is defined as PAD+>5C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,@R6LSBSymbolic Memory operand
Definition: @R6LSB
Results to: >83ED

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >0E84

Symbol FADD15 is a pointer to location >0E84
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: >0100

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

0E0ALILoad Immediate
Load and Move instruction

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

Symbol HIBYTE is defined at location >0000
Symbol HIBYTE is defined as >0100
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: >8353

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >8365

Symbol ARG is defined at location >0000
Symbol ARG is defined as PAD+>5C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >0E62

Symbol FADD11 is a pointer to location >0E62
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: >0E2E

Symbol FADD07 is a pointer to location >0E2E
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: >0E22

Symbol FADD06 is a pointer to location >0E22
ADDED, THEN CONTINUE

0E36JMPUnconditional Jump
Jump and Branch instruction

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

Symbol FADD09 is a pointer to location >0E3C
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: >0E38

Symbol FADD08 is a pointer to location >0E38
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: >0E38

Symbol FADD08 is a pointer to location >0E38
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: >834A

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,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: >0E60

Symbol FADD10 is a pointer to location >0E60
NO, ROUND RESULT

0E4AINCIncrement
Arithmetic instruction

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

Symbol EXP is defined at location >0000
Symbol EXP is defined as PAD+>76
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

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: >8352

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

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: >0E59

$ represents the location >0E5A

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: >0E56

Symbol FADD30 is a pointer to location >0E56

0E60FADD10JMPUnconditional Jump
Jump and Branch instruction

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

Symbol ROUN1 is a pointer to location >0F56

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: >0E6E

Symbol FADD12 is a pointer to location >0E6E

0E66JEQJump if Equal
Jump and Branch instruction

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

Symbol FADD12 is a pointer to location >0E6E

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: >0E62

Symbol FADD11 is a pointer to location >0E62

0E76JMPUnconditional Jump
Jump and Branch instruction

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

Symbol FADD14 is a pointer to location >0E7E

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: >0E78

Symbol FADD13 is a pointer to location >0E78

0E82JMPUnconditional Jump
Jump and Branch instruction

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

Symbol NORMAL is a pointer to location >0F1C

0E84FADD15BBranch
Jump and Branch instruction

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

Symbol PACKUP is a pointer to location >0F86

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: >0E92

Symbol FMULT1 is a pointer to location >0E92

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: >1FA8

Symbol POPSTK is defined at location >0000
Symbol POPSTK is defined as S+>1FA8
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: >834A

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >835C

Symbol ARG is defined at location >0000
Symbol ARG is defined as PAD+>5C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

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: >0F2A

Symbol FMULZR is a pointer to location >0F2A
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: >0F2A

Symbol FMULZR is a pointer to location >0F2A
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,->3FImmediate 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: >8376

Symbol EXP is defined at location >0000
Symbol EXP is defined as PAD+>76
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

0EB6MOVBMove Byte
Load and Move instruction

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

Symbol SIGN is defined at location >0000
Symbol SIGN is defined as PAD+>75
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >8352

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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+>10Immediate Value operand
Definition: FAC+>10
Results to: >835A

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
FORMED

0EC4JNEJump if Not Equal
Jump and Branch instruction

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

Symbol FMCLR is a pointer to location >0EBE
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: >8352

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >0ECA

Symbol FMUL02 is a pointer to location >0ECA
  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: >836A

Symbol ARG is defined at location >0000
Symbol ARG is defined as PAD+>5C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,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: >0ED4

Symbol FMUL03 is a pointer to location >0ED4
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: >83E1

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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,>064Immediate 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: >83E7

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >8364

Symbol ARG is defined at location >0000
Symbol ARG is defined as PAD+>5C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,*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: >83E5

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >83E3

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >0EF4

Symbol FMUL05 is a pointer to location >0EF4
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: >834A

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

0F16JGTJump if Greater Than
Jump and Branch instruction

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

Symbol FMUL04 is a pointer to location >0EEA
THEN CONTINUE

0F18FMENDCLRClear
Logical instruction

[<label>] b CLR b <gas> b [<comment>]
@FAC+>0ASymbolic Memory operand
Definition: @FAC+>0A
Results to: >8354

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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+>0A(R1)Indexed Memory operand
Definition: @FAC+>0A(R1)
Results to: >8356

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,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: >0F34

Symbol NORM02 is a pointer to location >0F34
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: >0F20

Symbol NORM01 is a pointer to location >0F20
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: >834A

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
INSTALL FLOATING ZERO

0F2ECLRClear
Logical instruction

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

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
CLEAR POSSIBLE BASIC TYPE CODE

0F32JMPUnconditional Jump
Jump and Branch instruction

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

Symbol STEX is a pointer to location >0FA6
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: >0F56

Symbol ROUN1 is a pointer to location >0F56
YES, FINISH

0F3CSSubtract Words
Arithmetic instruction

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

Symbol EXP is defined at location >0000
Symbol EXP is defined as PAD+>76
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >834B

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
POINT TO FIRST BYTE OF FAC

0F44NORM03MOVBMove Byte
Load and Move instruction

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

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,*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: >0F44

Symbol NORM03 is a pointer to location >0F44
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: >0F4C

Symbol NORM04 is a pointer to location >0F4C
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: >0F56

Symbol ROUN1 is a pointer to location >0F56
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,>32*HIBYTEImmediate Value operand
Definition: >32*HIBYTE
Results to: >3200

Symbol HIBYTE is defined at location >0000
Symbol HIBYTE is defined as >0100

0F5ACCompare Words
Compare instruction

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

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,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: >0F86

Symbol PACKUP is a pointer to location >0F86
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: >0100

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

0F68LILoad Immediate
Load and Move instruction

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

Symbol HIBYTE is defined at location >0000
Symbol HIBYTE is defined as >0100
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: >834C

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >834C

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,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: >0F86

Symbol PACKUP is a pointer to location >0F86
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: >834C

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >0F6C

Symbol ROUN02 is a pointer to location >0F6C
THEN CARRY TO NEXT HIGHER BYTE

0F7EINCIncrement
Arithmetic instruction

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

Symbol EXP is defined at location >0000
Symbol EXP is defined as PAD+>76
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >834B

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >8376

Symbol EXP is defined at location >0000
Symbol EXP is defined as PAD+>76
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,R3Workspace Register operand

0F8ACICompare Immediate
Compare instruction

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

0F8EJHEJump if High or Equal
Jump and Branch instruction

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

Symbol OVEXP1 is a pointer to location >0FC4

0F90MOVBMove Byte
Load and Move instruction

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

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
Register R3 resolves to the Register number.
Register R3 resolves to the Register number.
,@FACSymbolic Memory operand
Definition: @FAC
Results to: >834A

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >8375

Symbol SIGN is defined at location >0000
Symbol SIGN is defined as PAD+>75
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,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: >0FA2

Symbol PACK01 is a pointer to location >0FA2

0F9ENEGNegate
Arithmetic instruction

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

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
THEN INVERT 1ST WORD

0FA2PACK01JMPUnconditional Jump
Jump and Branch instruction

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

Symbol STEX is a pointer to location >0FA6
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: >834A

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,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: >837C

Symbol STATUS is defined at location >0000
Symbol STATUS is defined as PAD+>7C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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+>0ASymbolic Memory operand
Definition: @FAC+>0A
Results to: >8354

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,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: >0F64

Symbol ROUNUP is a pointer to location >0F64
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: >0200

Symbol DZERR is defined at location >0000
Symbol DZERR is defined as >0200
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: >0FD2

Symbol BIGFLT is a pointer to location >0FD2
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: >8376

Symbol EXP is defined at location >0000
Symbol EXP is defined as PAD+>76
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,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: >0F2A

Symbol FMULZR is a pointer to location >0F2A
YES, RETURN ZERO

0FCAJMPUnconditional Jump
Jump and Branch instruction

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

Symbol OV1 is a pointer to location >0FCE
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: >0100

Symbol OFERR is defined at location >0000
Symbol OFERR is defined as >0100

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,->7F63Immediate 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: >8375

Symbol SIGN is defined at location >0000
Symbol SIGN is defined as PAD+>75
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,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: >0FDE

Symbol BIGF01 is a pointer to location >0FDE
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: >834A

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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,>6363Immediate 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+>0ASymbolic Memory operand
Definition: @FAC+>0A
Results to: >8354

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
PLACE ERROR CODE IN RAM

0FF2JMPUnconditional Jump
Jump and Branch instruction

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

Symbol STEX is a pointer to location >0FA6
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: >0FFE

Symbol FDIV1 is a pointer to location >0FFE

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: >1FA8

Symbol POPSTK is defined at location >0000
Symbol POPSTK is defined as S+>1FA8
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: >834A

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >835C

Symbol ARG is defined at location >0000
Symbol ARG is defined as PAD+>5C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >8375

Symbol SIGN is defined at location >0000
Symbol SIGN is defined as PAD+>75
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >0FBC

Symbol DIVZER is a pointer to location >0FBC
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: >0F2A

Symbol FMULZR is a pointer to location >0F2A
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,>40Immediate 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: >8376

Symbol EXP is defined at location >0000
Symbol EXP is defined as PAD+>76
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >8364

Symbol ARG is defined at location >0000
Symbol ARG is defined as PAD+>5C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

102CFDV01MOVMove Word
Load and Move instruction

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

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: >102C

Symbol FDV01 is a pointer to location >102C
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: >835C

Symbol ARG is defined at location >0000
Symbol ARG is defined as PAD+>5C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >83E1

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >83E3

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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,>064Immediate Value operandRADIX

1046HX0064EQUDefine assembly-time constant
Directive that initializes constants

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

$ represents the location >1046

1046D045EQUDefine assembly-time constant
Directive that initializes constants

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

$ represents the location >1046

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: >8355

Symbol FDVSR is defined at location >0000
Symbol FDVSR is defined as FAC+>0A
Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,@R2LSBSymbolic Memory operand
Definition: @R2LSB
Results to: >83E5

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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,>31Immediate 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: >1090

Symbol FDIV06 is a pointer to location >1090
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: >835C

Symbol FDVSR is defined at location >0000
Symbol FDVSR is defined as FAC+>0A
Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

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: >1064

Symbol FDIV04 is a pointer to location >1064
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: >106E

Symbol FDIV05 is a pointer to location >106E
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: >8354

Symbol FDVSR is defined at location >0000
Symbol FDVSR is defined as FAC+>0A
Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

1084JNEJump if Not Equal
Jump and Branch instruction

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

Symbol FDVLPA is a pointer to location >108C

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: >8364

Symbol ARG is defined at location >0000
Symbol ARG is defined as PAD+>5C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

108AJMPUnconditional Jump
Jump and Branch instruction

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

Symbol FDVLP is a pointer to location >1060

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: >835C

Symbol ARG is defined at location >0000
Symbol ARG is defined as PAD+>5C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >8360

Symbol FDVSR is defined at location >0000
Symbol FDVSR is defined as FAC+>0A
Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,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: >1094

Symbol FDIV07 is a pointer to location >1094
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: >8355

Symbol FDVSR is defined at location >0000
Symbol FDVSR is defined as FAC+>0A
Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,@R7LSBSymbolic Memory operand
Definition: @R7LSB
Results to: >83EF

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >1044

Symbol HX0064 is defined at location >1046
Symbol HX0064 is defined as $->2
$ represents the location >1046
,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: >8356

Symbol FDVSR is defined at location >0000
Symbol FDVSR is defined as FAC+>0A
Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,@R8LSBSymbolic Memory operand
Definition: @R8LSB
Results to: >83F1

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >835C

Symbol ARG is defined at location >0000
Symbol ARG is defined as PAD+>5C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >83E5

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >1044

Symbol HX0064 is defined at location >1046
Symbol HX0064 is defined as $->2
$ represents the location >1046
,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: >0017
,@R0LSBSymbolic Memory operand
Definition: @R0LSB
Results to: >83E1

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >1044

Symbol HX0064 is defined at location >1046
Symbol HX0064 is defined as $->2
$ represents the location >1046
,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: >0018
,@R0LSBSymbolic Memory operand
Definition: @R0LSB
Results to: >83E1

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >1044

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

10E4JEQJump if Equal
Jump and Branch instruction

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

Symbol FDIV09 is a pointer to location >10EA
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: >10F0

Symbol FDIV11 is a pointer to location >10F0
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: >10EC

Symbol FDIV10 is a pointer to location >10EC
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: >1148

Symbol FDIV16 is a pointer to location >1148
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: >835C

Symbol FDVSR is defined at location >0000
Symbol FDVSR is defined as FAC+>0A
Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,@R0LSBSymbolic Memory operand
Definition: @R0LSB
Results to: >83E1

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >1044

Symbol HX0064 is defined at location >1046
Symbol HX0064 is defined as $->2
$ represents the location >1046
,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: >83E3

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >111A

Symbol FDIV13 is a pointer to location >111A
IS RESULT +VE?

1112JEQJump if Equal
Jump and Branch instruction

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

Symbol FDIV13 is a pointer to location >111A
OR ZERO ?

1114ABAdd Bytes
Arithmetic instruction

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

Symbol HX0064 is defined at location >1046
Symbol HX0064 is defined as $->2
$ represents the location >1046
,*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: >10FC

Symbol FDIV12 is a pointer to location >10FC
NO, CONTINUE SUBTRACTING

1120SBSubtract Bytes
Arithmetic instruction

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

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >1148

Symbol FDIV16 is a pointer to location >1148
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: >1148

Symbol FDIV16 is a pointer to location >1148
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: >835C

Symbol FDVSR is defined at location >0000
Symbol FDVSR is defined as FAC+>0A
Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,*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: >1045

Symbol HX0064 is defined at location >1046
Symbol HX0064 is defined as $->2
$ represents the location >1046
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: >1142

Symbol FDIV15 is a pointer to location >1142
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: >1045

Symbol HX0064 is defined at location >1046
Symbol HX0064 is defined as $->2
$ represents the location >1046
,*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: >0E59

Symbol HX01 is defined at location >0E5A
Symbol HX01 is defined as $->1
$ represents the location >0E5A
,@->1(R11)Indexed Memory operand
Definition: @->1(R11)
Results to: >0015
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: >112E

Symbol FDIV14 is a pointer to location >112E
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: >83E5

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
Register R2 resolves to the Register number.
Register R2 resolves to the Register number.
,@FDVSR(R5)Indexed Memory operand
Definition: @FDVSR(R5)
Results to: >835E

Symbol FDVSR is defined at location >0000
Symbol FDVSR is defined as FAC+>0A
Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
               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: >10BA

Symbol FDIV08 is a pointer to location >10BA
NO, CONTINUE

1154BBranch
Jump and Branch instruction

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

Symbol FMEND is a pointer to location >0F18
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>]
>3203Expression 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: >1172

Symbol CSI02 is a pointer to location >1172

1162CSI01MPYMultiply
Arithmetic instruction

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

Symbol HX000A is defined at location >117C
Symbol HX000A is defined as $->2
$ represents the location >117C
,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: >1184

Symbol CSI05 is a pointer to location >1184
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: >1184

Symbol CSI05 is a pointer to location >1184
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,>0AImmediate 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: >117A

$ represents the location >117C

117CJLJump if Logical Low
Jump and Branch instruction

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

Symbol CSI01 is a pointer to location >1162
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: >118E

Symbol CSNZ10 is a pointer to location >118E
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: >1190

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

1188JMPUnconditional Jump
Jump and Branch instruction

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

Symbol CSI02 is a pointer to location >1172
CONTINUE WITH STRING

118ACSNZERBBranch
Jump and Branch instruction

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

Symbol FMULZR is a pointer to location >0F2A

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+>0CSymbolic Memory operand
Definition: @FAC+>0C
Results to: >8356

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

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: >118A

Symbol CSNZER is a pointer to location >118A
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: >8376

Symbol EXP is defined at location >0000
Symbol EXP is defined as PAD+>76
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
SET EXPONENT SIGN

119EBBranch
Jump and Branch instruction

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

Symbol OVEXP1 is a pointer to location >0FC4
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: >8389

Symbol GROMFG is defined at location >0000
Symbol GROMFG is defined as PAD+>89
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,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: >11AE

Symbol CSN is a pointer to location >11AE

11A8LILoad Immediate
Load and Move instruction

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

Symbol GETCHG is defined at location >0000
Symbol GETCHG is defined as S+>1FDA
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: >11B2

Symbol CSN01 is a pointer to location >11B2

11AECSNLILoad Immediate
Load and Move instruction

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

Symbol GETCH is defined at location >0000
Symbol GETCH is defined as S+>1FC8
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>]
@>8356Symbolic Memory operand
Definition: @>8356
Results to: >8356
,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: >11CC

Symbol CSN02 is a pointer to location >11CC
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: >11D0

Symbol CSN04 is a pointer to location >11D0
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: >11CE

Symbol CSN03 is a pointer to location >11CE
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: >8375

Symbol SIGN is defined at location >0000
Symbol SIGN is defined as PAD+>75
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >11E6

Symbol CSN06 is a pointer to location >11E6

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: >11F2

Symbol CSN07 is a pointer to location >11F2
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: >11E2

Symbol CSN05 is a pointer to location >11E2
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: >1220

Symbol CSNG is a pointer to location >1220
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: >1202

Symbol CSNF03 is a pointer to location >1202
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: >120E

Symbol CSNF04 is a pointer to location >120E
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: >1200

Symbol CSNF02 is a pointer to location >1200

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: >121C

Symbol CSNF05 is a pointer to location >121C
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: >120E

Symbol CSNF04 is a pointer to location >120E
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: >118A

Symbol CSNZER is a pointer to location >118A
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: >124C

Symbol CSNH is a pointer to location >124C
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: >1242

Symbol CSNG03 is a pointer to location >1242
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: >1240

Symbol CSNG02 is a pointer to location >1240
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: >1242

Symbol CSNG03 is a pointer to location >1242

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: >115A

Symbol CSINT is a pointer to location >115A
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: >124C

Symbol CSNH is a pointer to location >124C

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+>0CSymbolic Memory operand
Definition: @FAC+>0C
Results to: >8356

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >118A

Symbol CSNZER is a pointer to location >118A
YES

1256AIAdd Immediate
Arithmetic instruction

[<label>] b AI b <wa>,<iop> b [<comment>]
R4Workspace Register operand,>080Immediate 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: >8376

Symbol EXP is defined at location >0000
Symbol EXP is defined as PAD+>76
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

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: >834B

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

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: >1294

Symbol CSNH03 is a pointer to location >1294
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: >1272

Symbol CSNH01 is a pointer to location >1272

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: >1290

Symbol CSNH02 is a pointer to location >1290
1'S DIGIT

1286MPYMultiply
Arithmetic instruction

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

Symbol HX000A is defined at location >117C
Symbol HX000A is defined as $->2
$ represents the location >117C
,R8Workspace Register operand

128AMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@R9LSBSymbolic Memory operand
Definition: @R9LSB
Results to: >83F3

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >1272

Symbol CSNH01 is a pointer to location >1272
GET ONE'S DIGIT

1290CSNH02ABAdd Bytes
Arithmetic instruction

[<label>] b AB b <gas>,<gad> b [<comment>]
@R8LSBSymbolic Memory operand
Definition: @R8LSB
Results to: >83F1

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >1272

Symbol CSNH01 is a pointer to location >1272
YES

129CBBranch
Jump and Branch instruction

[<label>] b B b <gas> b [<comment>]
@ROUN1Symbolic Memory operand
Definition: @ROUN1
Results to: >0F56

Symbol ROUN1 is a pointer to location >0F56
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: >11AE

Symbol CSN is a pointer to location >11AE

12A2DATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
CSNGRExpression operand
Definition: CSNGR
Results to: >11A2

Symbol CSNGR is a pointer to location >11A2

12A4DATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
CFIExpression operand
Definition: CFI
Results to: >12B8

Symbol CFI is a pointer to location >12B8

12A6DATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
SYMBExpression operand
Definition: SYMB
Results to: >1648

Symbol SYMB is defined at location >0000
Symbol SYMB is defined as S+>1648
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: >164E

Symbol SMBB is defined at location >0000
Symbol SMBB is defined as S+>164E
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: >1642

Symbol ASSGNV is defined at location >0000
Symbol ASSGNV is defined as S+>1642
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: >15D6

Symbol FBSYMB is defined at location >0000
Symbol FBSYMB is defined as S+>15D6
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: >163C

Symbol VPUSHG is defined at location >0000
Symbol VPUSHG is defined as S+>163C
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: >1F2E

Symbol VPOP is defined at location >0000
Symbol VPOP is defined as S+>1F2E
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: >0AC0

Symbol SROM is defined at location >0000
Symbol SROM is defined as S+>0AC0
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: >0B24

Symbol SGROM is defined at location >0000
Symbol SGROM is defined as S+>0B24
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: >1868

Symbol PGMCH is defined at location >0000
Symbol PGMCH is defined as S+>1868
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: >834A

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,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: >1342

Symbol CFISI1 is a pointer to location >1342
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: >834B

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >834A

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >834A

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
,R5Workspace Register operand
GET EXPONENT

12D0CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R5Workspace Register operand,>3F00Immediate 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: >133E

Symbol CFIRI is a pointer to location >133E
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: >1308

Symbol CFI03 is a pointer to location >1308
.01<NUMBER<1, RESULT = 1

12D8CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R5Workspace Register operand,>4100Immediate 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: >1302

Symbol CFI02 is a pointer to location >1302
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: >12F0

Symbol CFI01 is a pointer to location >12F0
IT IS BETWEEN 100 AND 10000

12E0CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R5Workspace Register operand,>4200Immediate 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: >1330

Symbol CFI08 is a pointer to location >1330
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: >83E1

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >1320

Symbol DEC100 is a pointer to location >1320
,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: >83E7

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >1320

Symbol DEC100 is a pointer to location >1320
,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: >1330

Symbol CFI08 is a pointer to location >1330
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: >1330

Symbol CFI08 is a pointer to location >1330
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: >83E7

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >1158

Symbol HX3203 is a pointer to location >1158
IS ROUNDING NECESSARY

130CJLTJump if Less Than
Jump and Branch instruction

[<label>] b JLT b <exp> b [<comment>]
CFI06Expression operand
Definition: CFI06
Results to: >1324

Symbol CFI06 is a pointer to location >1324
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: >1322

Symbol CFI05 is a pointer to location >1322
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: >1322

Symbol CFI05 is a pointer to location >1322
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: >1322

Symbol CFI05 is a pointer to location >1322
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: >8352

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >1314

Symbol CFI04 is a pointer to location >1314
NO LOOK AT NEXT ONE

131EJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
CFI06Expression operand
Definition: CFI06
Results to: >1324

Symbol CFI06 is a pointer to location >1324
ROUND DOWN

1320DEC100DATAInitialize Word
Directive that initializes constants

[<label>] b DATA b <exp>[,<exp>]... b [<comment>]
>064Expression 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: >8000

Symbol SGNBIT is defined at location >0000
Symbol SGNBIT is defined as >8000
IS RESULT 32768?

1328JLJump if Logical Low
Jump and Branch instruction

[<label>] b JL b <exp> b [<comment>]
CFIRSIExpression operand
Definition: CFIRSI
Results to: >1338

Symbol CFIRSI is a pointer to location >1338
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: >1330

Symbol CFI08 is a pointer to location >1330
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: >133C

Symbol CFIRS2 is a pointer to location >133C
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: >1159

Symbol HX3203 is a pointer to location >1158
,@FDVSRSymbolic Memory operand
Definition: @FDVSR
Results to: >8354

Symbol FDVSR is defined at location >0000
Symbol FDVSR is defined as FAC+>0A
Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >133E

Symbol CFIRI is a pointer to location >133E
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: >834A

Symbol FAC is defined at location >0000
Symbol FAC is defined as PAD+>4A
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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>]
>0010Expression 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,>0300Immediate Value operandLOAD LEADER COUNT FIRST

134CLILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,>1E19Immediate Value operandLOAD SBZ INSTN

1350LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R3Workspace Register operand,>0023Immediate 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: >13BA

Symbol INIT is a pointer to location >13BA
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: >13E2

Symbol BOUT is a pointer to location >13E2
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: >1360

Symbol WRITE0 is a pointer to location >1360
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: >137E

Symbol LEAD is a pointer to location >137E
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: >83F5

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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,>40Immediate 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: >FC1C

Symbol VRDOFF is defined at location >0000
Symbol VRDOFF is defined as ->402
,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: >1396

Symbol WRBYT is a pointer to location >1396
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: >137A

Symbol REWRI is a pointer to location >137A
REWRITE

13ACAIAdd Immediate
Arithmetic instruction

[<label>] b AI b <wa>,<iop> b [<comment>]
R10Workspace Register operand,>40Immediate 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: >137A

Symbol REWRI is a pointer to location >137A
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: >155E

Symbol STTIM is a pointer to location >155E
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,>3FImmediate 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: >83E1

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >0032

Symbol HX0020 is defined at location >0000
Symbol HX0020 is defined as S+>0032
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>]
>0CCruBit Displacement operandTURN OFF ??? INTPUT

13D8LDCRLoad CRU
Control and CRU instruction

[<label>] b LDCR b <gas>,<cnt> b [<comment>]
R3Workspace Register operand,>FCruBit 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: >135C

Symbol HX0300 is a pointer to location >135C
,R8Workspace Register operand

13F0HXSPINEQUDefine assembly-time constant
Directive that initializes constants

<label> b EQU b <exp> b [<comment>]
$Expression operand
Definition: $
Results to: >13F0

$ represents the location >13F0

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: >13FC

Symbol BOUT1 is a pointer to location >13FC
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: >135C

Symbol HX0300 is a pointer to location >135C
,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: >13E8

Symbol BOUT0 is a pointer to location >13E8
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: >141A

Symbol TIMER1 is a pointer to location >141A
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: >83C0

Symbol WKSC is defined at location >0000
Symbol WKSC is defined as PAD+>C0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >13F0

Symbol HXSPIN is defined at location >13F0
Symbol HXSPIN is defined as $
$ represents the location >13F0
DOING A SPIN?

1414JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
TIMER1Expression operand
Definition: TIMER1
Results to: >141A

Symbol TIMER1 is a pointer to location >141A
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: >83C0

Symbol WKSC is defined at location >0000
Symbol WKSC is defined as PAD+>C0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300

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: >83EC

Symbol WKSE is defined at location >0000
Symbol WKSE is defined as PAD+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >1418

Symbol TIMER2 is a pointer to location >1418
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>]
>21Expression 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: >1344

Symbol HX0010 is a pointer to location >1344
,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: >1436

Symbol READA is a pointer to location >1436

142E* = BR TABLE

142EREADSZCSet Zeros Corresponding
Logical instruction

[<label>] b SZC b <gas>,<gad> b [<comment>]
@HX0010Symbolic Memory operand
Definition: @HX0010
Results to: >1344

Symbol HX0010 is a pointer to location >1344
,R14Workspace Register operand
RESET VERIFY BIT

1432LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R0Workspace Register operand,>4000Immediate 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,>002BImmediate 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: >1438

$ represents the location >143A

143ABLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@INITSymbolic Memory operand
Definition: @INIT
Results to: >13BA

Symbol INIT is a pointer to location >13BA
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: >1443

Symbol HX20 is a pointer to location >1442
,@ERRCDSymbolic Memory operand
Definition: @ERRCD
Results to: >837C

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+>7C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
ASSUME TIME OUT ERROR

1448READ12LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R8Workspace Register operand,>07530Immediate 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: >1458

Symbol READ0 is a pointer to location >1458
LOAD TIME-OUT RETRY ADR

1454READ00LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R3Workspace Register operand,>2BImmediate Value operandIF FALSE START

1458READ0ANDIAND Immediate
Logical instruction

[<label>] b ANDI b <wa>,<iop> b [<comment>]
R1Workspace Register operand,>FFImmediate 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: >145A

$ represents the location >145C

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: >155E

Symbol STTIM is a pointer to location >155E
RETRY ERROR

1460LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R2Workspace Register operand,>30Immediate 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: >146A

Symbol READ1 is a pointer to location >146A
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: >1572

Symbol RDBIT is a pointer to location >1572
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: >1472

Symbol READ15 is a pointer to location >1472

1470JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
READ0Expression operand
Definition: READ0
Results to: >1458

Symbol READ0 is a pointer to location >1458
"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: >146A

Symbol READ1 is a pointer to location >146A
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,>7FFFImmediate 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,>FCruBit 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: >15BA

Symbol FLUXC is a pointer to location >15BA
FIND BIT

1488JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
ENDLExpression operand
Definition: ENDL
Results to: >148C

Symbol ENDL is a pointer to location >148C
CHANGE-DEC NO. OF BITS

148AJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
LOOPExpression operand
Definition: LOOP
Results to: >1484

Symbol LOOP is a pointer to location >1484
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: >1484

Symbol LOOP is a pointer to location >1484
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,>FCruBit 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: >14B0

Symbol READ5 is a pointer to location >14B0
RTN ADR FOR SUBSUBROUTINE

14A6CICompare Immediate
Compare instruction

[<label>] b CI b <wa>,<iop> b [<comment>]
R3Workspace Register operand,>001FImmediate 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: >1454

Symbol READ00 is a pointer to location >1454
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: >1580

Symbol RDBIT2 is a pointer to location >1580
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: >1572

Symbol RDBIT is a pointer to location >1572
AGAIN READ BIT INPUT

14B4JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
READ5Expression operand
Definition: READ5
Results to: >14B0

Symbol READ5 is a pointer to location >14B0
"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: >1572

Symbol RDBIT is a pointer to location >1572
NEXT BIT PHASE

14BEJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
READ0Expression operand
Definition: READ0
Results to: >1458

Symbol READ0 is a pointer to location >1458
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: >14BA

Symbol READ3 is a pointer to location >14BA
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: >14F8

Symbol ERROR1 is a pointer to location >14F8
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: >152E

Symbol DUMP3 is a pointer to location >152E
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: >1424

Symbol HX2100 is a pointer to location >1424
,@ERRCDSymbolic Memory operand
Definition: @ERRCD
Results to: >837C

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+>7C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >15A0

Symbol RDBYTE is a pointer to location >15A0
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: >155E

Symbol STTIM is a pointer to location >155E
** 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: >15A0

Symbol RDBYTE is a pointer to location >15A0
READ CHECK SUM

14E8JNEJump if Not Equal
Jump and Branch instruction

[<label>] b JNE b <exp> b [<comment>]
STTIMExpression operand
Definition: STTIM
Results to: >155E

Symbol STTIM is a pointer to location >155E
BAD BLOCK COUNT DATA

14EAJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
DUMP4Expression operand
Definition: DUMP4
Results to: >1526

Symbol DUMP4 is a pointer to location >1526
LOOP AROUND TO FIRST READ

14ECRDLOOPANDIAND Immediate
Logical instruction

[<label>] b ANDI b <wa>,<iop> b [<comment>]
R7Workspace Register operand,>FFImmediate 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: >15A0

Symbol RDBYTE is a pointer to location >15A0
READ RECORDED CHKSUM

14F6JEQJump if Equal
Jump and Branch instruction

[<label>] b JEQ b <exp> b [<comment>]
DUMPExpression operand
Definition: DUMP
Results to: >1506

Symbol DUMP is a pointer to location >1506
**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: >155E

Symbol STTIM is a pointer to location >155E
YES, FLAG ERROR

14FCMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@R0LSBSymbolic Memory operand
Definition: @R0LSB
Results to: >83E1

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >1448

Symbol READ12 is a pointer to location >1448
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: >151A

Symbol DUMP2 is a pointer to location >151A
YES, SO DON'T READ AGAIN

150ALILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R2Workspace Register operand,>49Immediate 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: >1516

Symbol DUMPX is a pointer to location >1516

1512BLBranch and Link
Jump and Branch instruction

[<label>] b BL b <gas> b [<comment>]
@RDBYTESymbolic Memory operand
Definition: @RDBYTE
Results to: >15A0

Symbol RDBYTE is a pointer to location >15A0
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: >150E

Symbol DUMP1 is a pointer to location >150E
READ SOME MORE

151ADUMP2AIAdd Immediate
Arithmetic instruction

[<label>] b AI b <wa>,<iop> b [<comment>]
R0Workspace Register operand,>40Immediate 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: >83E1

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+>E0
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >1448

Symbol READ12 is a pointer to location >1448
READY...MORE BLOCKS TO GO

152CJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
DONEExpression operand
Definition: DONE
Results to: >1558

Symbol DONE is a pointer to location >1558
NO MORE TO READ

152EDUMP3LILoad Immediate
Load and Move instruction

[<label>] b LI b <wa>,<iop> b [<comment>]
R2Workspace Register operand,>40Immediate 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: >15A0

Symbol RDBYTE is a pointer to location >15A0
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: >1344

Symbol HX0010 is a pointer to location >1344
,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: >154E

Symbol STO is a pointer to location >154E
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: >FC1C

Symbol VRDOFF is defined at location >0000
Symbol VRDOFF is defined as ->402
,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: >1552

Symbol STO1 is a pointer to location >1552
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: >1552

Symbol STO1 is a pointer to location >1552
YYES, IGNORE BAD COMPARISONS

154CJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
ERROR1Expression operand
Definition: ERROR1
Results to: >14F8

Symbol ERROR1 is a pointer to location >14F8
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: >001C

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: >1534

Symbol RDL0 is a pointer to location >1534
NO.. NOT YET

1556JMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
RDLOOPExpression operand
Definition: RDLOOP
Results to: >14EC

Symbol RDLOOP is a pointer to location >14EC
COMPLETE READ LOOP

1558DONEMOVBMove Byte
Load and Move instruction

[<label>] b MOVB b <gas>,<gad> b [<comment>]
@HX002BSymbolic Memory operand
Definition: @HX002B
Results to: >1438

Symbol HX002B is defined at location >143A
Symbol HX002B is defined as $->2
$ represents the location >143A
,@ERRCDSymbolic Memory operand
Definition: @ERRCD
Results to: >837C

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+>7C
Symbol PAD is defined at location >0000
Symbol PAD is defined as >8300
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: >1344

Symbol HX0010 is a pointer to location >1344
,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: >0032

Symbol HX0020 is defined at location >0000
Symbol HX0020 is defined as S+>0032
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>]
>0CCruBit 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: >0070

Symbol NEXT is defined at location >0000
Symbol NEXT is defined as S+>0070
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: >15BA

Symbol FLUXC is a pointer to location >15BA
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,>FF00Immediate 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: >145A

Symbol HX00FF is defined at location >145C
Symbol HX00FF is defined as $->2
$ represents the location >145C
,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: >158C

Symbol F2 is a pointer to location >158C
INPUT IS A ZERO

1586F1TBTest Bit
Control and CRU instruction

[<label>] b TB b <disp> b [<comment>]
>1BCruBit 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: >1590

Symbol RDBIT1 is a pointer to location >1590
CHANGED

158AJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
F1Expression operand
Definition: F1
Results to: >1586

Symbol F1 is a pointer to location >1586
NO CHANGE

158CF2TBTest Bit
Control and CRU instruction

[<label>] b TB b <disp> b [<comment>]
>1BCruBit 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: >158C

Symbol F2 is a pointer to location >158C
NO CHANGE, WAIT SOME MORE

1590RDBIT1LDCRLoad CRU
Control and CRU instruction

[<label>] b LDCR b <gas>,<cnt> b [<comment>]
R3Workspace Register operand,>FCruBit 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,>FFImmediate 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: >145A

Symbol HX00FF is defined at location >145C
Symbol HX00FF is defined as $->2
$ represents the location >145C
,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: >1572

Symbol RDBIT is a pointer to location >1572
READ ONE BIT

15AEJMPUnconditional Jump
Jump and Branch instruction

[<label>] b JMP b <exp> b [<comment>]
RDBYT1Expression operand
Definition: RDBYT1
Results to: >15B2

Symbol RDBYT1 is a pointer to location >15B2
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: >15A8

Symbol RDBYT0 is a pointer to location >15A8
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>]
>1BCruBit 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: >15CA

Symbol FLUXC1 is a pointer to location >15CA
INPUT LINE SET

15BECZCCompare Zeros Corresponding
Compare instruction

[<label>] b CZC b <gas>,<wad> b [<comment>]
@HX00FFSymbolic Memory operand
Definition: @HX00FF
Results to: >145A

Symbol HX00FF is defined at location >145C
Symbol HX00FF is defined as $->2
$ represents the location >145C
,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: >15D0

Symbol FLUXC2 is a pointer to location >15D0
INPUT LINE WAS LOW

15C4FLUXC0XORExclusive OR
Logical instruction

[<label>] b XOR b <gas>,<wad> b [<comment>]
@HX00FFSymbolic Memory operand
Definition: @HX00FF
Results to: >145A

Symbol HX00FF is defined at location >145C
Symbol HX00FF is defined as $->2
$ represents the location >145C
,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: >145A

Symbol HX00FF is defined at location >145C
Symbol HX00FF is defined as $->2
$ represents the location >145C
,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: >15C4

Symbol FLUXC0 is a pointer to location >15C4
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>]