MIL-DTL-24784 / 21B (SH)
XYZ ROUTINE- PROGRAM LISTING
MEMORY
LOC
CONTENTS
LABEL
ORD
ADR
MOD
CONSTANT
SC
NOTES
L
01443
000330700
FRS
030700
01447
051510457
TMI
01457
01453
034706277
TRA
06277
01457
000077632
SET
37632
01463
034706403
ORG
06403
ORG
06103
06102
001037632
A1
STO
TEMPR
1
SAVE INSERTED NUMBER
06107
035106123
TMI
A3
-/- NEGATIVE INSERT
06113
014077763
A2
GET
ONE
KEY FOR FIX RESET
06117
035035357
STO
KTYPF
TYPE OF RESET KEY
06123
000077760
A3
GET
ZERO
06127
035037633
STO
TEMPR
2
CLEAR RESET /NRS/ KEY
06122
000077632
GET
TEMPR
1
06137
004706147
TRA
SUB 1
GO TO RESET NUMBER SUBROUTINE
06143
000706327
TRA
A14
06137
055437634
SUB1
STV*
TEMPR
ENTRANCE - RESET NUMBER SUBRTN
3
06153
034313700
A4
PRS
1
06157
035106243
IMI
RE13
CHECK LAST BCD BIT FOR SIGN
06163
034313700
A5
PRS
1
06167
035106213
TMI
**5
CHECK 2ND BCD BIT FOR SIGN
06173
034333600
A6
FRS
2
CHECK 3RD AND 4TH BITS
06177
002206177
TMI
OUT
06203
034077633
A7
GET
TEMPR
2
TEMPORARY RESET KEY
06207
002737634
TRA
TEMPR
3
EXIT - RESET NUMBER SUBROUTINE
06213
005077766
A8
EXT
MAXNO
06217
034333600
FRS
FRS
2
CHECK 3RD AND 4TH BITS
06223
002206277
TMI
OUT
06227
044041030
A0
GET
020000000
KEY TO RESET 2
06233
005477633
A10
ADD
TEMPR
2
06237
005737344
TRA
TEMPR
3
EXIT - RESET NUMBER ROUTINE
06243
034313700
RE13
PRS
06247
035106303
TMI
RE3
CHECK 2ND BIT FOR SIGN
06253
034077766
A11
EXT
MAXNO
06257
034333600
FRS
2
CHECK 3RD AND 4TH BITS
06263
001106277
TMI
OUT
06267
034077762
A12
GET
HALF
KEY TO RESET 1
FIGURE 21-38. Coding instruction sheet.
67
For Parts Inquires call Parts Hangar, Inc (727) 493-0744
© Copyright 2015 Integrated Publishing, Inc.
A Service Disabled Veteran Owned Small Business