mirror of
https://github.com/pkimpel/retro-220.git
synced 2026-02-28 09:17:57 +00:00
e38dddfb79
Transcribed from "SAMPLE PROGRAM 2" in Appendix D of the
"Burroughs 220 Assembler-Compiler" manual, Bulletin 5024, April 1960.
Assemble with the BAC-Assembler. This manual was found at CBI:
Burroughs Corporation Records, Product Literature (CBI 90),
Charles Babbage Institute, University of Minnesota, Minneapolis.
https://archives.lib.umn.edu/repositories/3/resources/186.
Series 74, box 5, folder 17.
415 lines
3.0 KiB
XML
415 lines
3.0 KiB
XML
61000040000
|
|
300000
|
|
460430
|
|
420444
|
|
460431
|
|
0260290326
|
|
460432
|
|
420445
|
|
460433
|
|
0260290352
|
|
1100580000
|
|
1450000
|
|
1000580000
|
|
1000590015
|
|
120446
|
|
300012
|
|
4101260011
|
|
403260012
|
|
300020
|
|
4101270011
|
|
403270012
|
|
400434
|
|
100446
|
|
170434
|
|
360046
|
|
420431
|
|
10000100404
|
|
420432
|
|
10000400326
|
|
1200029
|
|
02400432
|
|
100431
|
|
0225360035
|
|
120446
|
|
400431
|
|
300010
|
|
100447
|
|
130433
|
|
490007
|
|
3210400044
|
|
100445
|
|
120433
|
|
410400044
|
|
420432
|
|
326200044
|
|
0290044
|
|
300067
|
|
420433
|
|
10000100378
|
|
420432
|
|
10000400326
|
|
1200051
|
|
02400432
|
|
100433
|
|
0225360057
|
|
120446
|
|
400433
|
|
300010
|
|
100447
|
|
130431
|
|
490007
|
|
3210400066
|
|
100444
|
|
120431
|
|
410400066
|
|
420432
|
|
326200066
|
|
0290066
|
|
100430
|
|
120446
|
|
400430
|
|
103360072
|
|
300002
|
|
10090448
|
|
1450000
|
|
80000
|
|
180449
|
|
1340078
|
|
1450000
|
|
400435
|
|
120446
|
|
0252360087
|
|
400432
|
|
420435
|
|
30090089
|
|
10010090326
|
|
10090450
|
|
300000
|
|
1450000
|
|
300081
|
|
2FIRST
|
|
2 CARD
|
|
2
|
|
300092
|
|
420432
|
|
10000100326
|
|
400436
|
|
100432
|
|
120446
|
|
0252360107
|
|
400432
|
|
180435
|
|
1350092
|
|
30090109
|
|
10090436
|
|
440000
|
|
300001
|
|
300093
|
|
1450000
|
|
300099
|
|
2||LAS
|
|
2T CAR
|
|
2D
|
|
460437
|
|
440000
|
|
300001
|
|
460438
|
|
460439
|
|
460440
|
|
460441
|
|
100153
|
|
400152
|
|
100183
|
|
400182
|
|
100289
|
|
400288
|
|
020090133
|
|
1450000
|
|
80000
|
|
360130
|
|
400442
|
|
02011090442
|
|
10090450
|
|
300135
|
|
2||STA
|
|
2KE
|
|
440092
|
|
300093
|
|
10090436
|
|
100436
|
|
6241360141
|
|
300142
|
|
1260438
|
|
5108360146
|
|
6241360150
|
|
100451
|
|
300151
|
|
480004
|
|
170446
|
|
360144
|
|
300151
|
|
100452
|
|
190440
|
|
0
|
|
300155
|
|
300159
|
|
100154
|
|
400152
|
|
10090453
|
|
300135
|
|
440092
|
|
300093
|
|
10090454
|
|
10090436
|
|
100436
|
|
6241360166
|
|
300167
|
|
1260439
|
|
5108360171
|
|
6241360175
|
|
100451
|
|
300176
|
|
480004
|
|
170446
|
|
360169
|
|
300176
|
|
100452
|
|
190441
|
|
10090455
|
|
10090454
|
|
1450000
|
|
80000
|
|
360222
|
|
0
|
|
300185
|
|
300189
|
|
100184
|
|
400182
|
|
100440
|
|
0221360191
|
|
10090440
|
|
300261
|
|
020090217
|
|
440092
|
|
300093
|
|
10090454
|
|
10090436
|
|
10090453
|
|
100436
|
|
5108360202
|
|
6241360206
|
|
100451
|
|
300207
|
|
6100360200
|
|
480004
|
|
170446
|
|
300207
|
|
100452
|
|
120441
|
|
400441
|
|
0221360219
|
|
10090454
|
|
10090441
|
|
100442
|
|
140456
|
|
1490009
|
|
190437
|
|
300321
|
|
2BLACK
|
|
2JACK
|
|
10090454
|
|
020090217
|
|
300321
|
|
100184
|
|
400182
|
|
440092
|
|
300093
|
|
10090436
|
|
100436
|
|
6241360230
|
|
300231
|
|
1260438
|
|
5108360235
|
|
6241360239
|
|
100451
|
|
300240
|
|
480004
|
|
170446
|
|
360233
|
|
300240
|
|
100452
|
|
190440
|
|
100440
|
|
180457
|
|
340245
|
|
300177
|
|
100438
|
|
360250
|
|
1270438
|
|
10270440
|
|
300241
|
|
10090453
|
|
10090458
|
|
100437
|
|
130442
|
|
400437
|
|
440092
|
|
300093
|
|
10090454
|
|
10090436
|
|
10090453
|
|
300321
|
|
440092
|
|
300093
|
|
10090454
|
|
10090436
|
|
10090453
|
|
100436
|
|
6241360269
|
|
300270
|
|
1260439
|
|
5108360274
|
|
6241360278
|
|
100451
|
|
300279
|
|
480004
|
|
170446
|
|
360272
|
|
300279
|
|
100452
|
|
190441
|
|
100441
|
|
180459
|
|
340286
|
|
100290
|
|
400288
|
|
300261
|
|
180457
|
|
340300
|
|
0
|
|
300291
|
|
300294
|
|
410290
|
|
1400288
|
|
350297
|
|
10090454
|
|
10090441
|
|
300311
|
|
10090454
|
|
020090217
|
|
300315
|
|
100439
|
|
360303
|
|
300308
|
|
10090454
|
|
10090458
|
|
100442
|
|
190443
|
|
300321
|
|
1270439
|
|
10270441
|
|
300280
|
|
100440
|
|
180441
|
|
340319
|
|
350321
|
|
100437
|
|
130442
|
|
400437
|
|
300321
|
|
100442
|
|
190437
|
|
10090460
|
|
10090461
|
|
10090462
|
|
02011090437
|
|
300115
|
|
2 A S
|
|
2 K S
|
|
2 Q S
|
|
2 J S
|
|
2 10 S
|
|
2 9 S
|
|
2 8 S
|
|
2 7 S
|
|
2 6 S
|
|
2 5 S
|
|
2 4 S
|
|
2 3 S
|
|
2 2 S
|
|
2 A H
|
|
2 K H
|
|
2 Q H
|
|
2 J H
|
|
2 10 H
|
|
2 9 H
|
|
2 8 H
|
|
2 7 H
|
|
2 6 H
|
|
2 5 H
|
|
2 4 H
|
|
2 3 H
|
|
2 2 H
|
|
2 A D
|
|
2 K D
|
|
2 Q D
|
|
2 J D
|
|
2 10 D
|
|
2 9 D
|
|
2 8 D
|
|
2 7 D
|
|
2 6 D
|
|
2 5 D
|
|
2 4 D
|
|
2 3 D
|
|
2 2 D
|
|
2 A C
|
|
2 K C
|
|
2 Q C
|
|
2 J C
|
|
2 10 C
|
|
2 9 C
|
|
2 8 C
|
|
2 7 C
|
|
2 6 C
|
|
2 5 C
|
|
2 4 C
|
|
2 3 C
|
|
2 2 C
|
|
61000040430
|
|
0
|
|
0
|
|
0
|
|
0
|
|
0
|
|
0
|
|
0
|
|
0
|
|
0
|
|
0
|
|
0
|
|
0
|
|
0
|
|
0
|
|
404
|
|
378
|
|
1
|
|
026
|
|
2|CUT|
|
|
52
|
|
2||~__
|
|
10
|
|
11
|
|
2|~___
|
|
2~____
|
|
2|CARD
|
|
15
|
|
021
|
|
2 BUST
|
|
16
|
|
2||___
|
|
2SCORE
|
|
2__
|
|
60000300112
|