-
Notifications
You must be signed in to change notification settings - Fork 0
/
Copy pathCIOPRG.LST
1736 lines (1226 loc) · 16.8 KB
/
CIOPRG.LST
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65
66
67
68
69
70
71
72
73
74
75
76
77
78
79
80
81
82
83
84
85
86
87
88
89
90
91
92
93
94
95
96
97
98
99
100
101
102
103
104
105
106
107
108
109
110
111
112
113
114
115
116
117
118
119
120
121
122
123
124
125
126
127
128
129
130
131
132
133
134
135
136
137
138
139
140
141
142
143
144
145
146
147
148
149
150
151
152
153
154
155
156
157
158
159
160
161
162
163
164
165
166
167
168
169
170
171
172
173
174
175
176
177
178
179
180
181
182
183
184
185
186
187
188
189
190
191
192
193
194
195
196
197
198
199
200
201
202
203
204
205
206
207
208
209
210
211
212
213
214
215
216
217
218
219
220
221
222
223
224
225
226
227
228
229
230
231
232
233
234
235
236
237
238
239
240
241
242
243
244
245
246
247
248
249
250
251
252
253
254
255
256
257
258
259
260
261
262
263
264
265
266
267
268
269
270
271
272
273
274
275
276
277
278
279
280
281
282
283
284
285
286
287
288
289
290
291
292
293
294
295
296
297
298
299
300
301
302
303
304
305
306
307
308
309
310
311
312
313
314
315
316
317
318
319
320
321
322
323
324
325
326
327
328
329
330
331
332
333
334
335
336
337
338
339
340
341
342
343
344
345
346
347
348
349
350
351
352
353
354
355
356
357
358
359
360
361
362
363
364
365
366
367
368
369
370
371
372
373
374
375
376
377
378
379
380
381
382
383
384
385
386
387
388
389
390
391
392
393
394
395
396
397
398
399
400
401
402
403
404
405
406
407
408
409
410
411
412
413
414
415
416
417
418
419
420
421
422
423
424
425
426
427
428
429
430
431
432
433
434
435
436
437
438
439
440
441
442
443
444
445
446
447
448
449
450
451
452
453
454
455
456
457
458
459
460
461
462
463
464
465
466
467
468
469
470
471
472
473
474
475
476
477
478
479
480
481
482
483
484
485
486
487
488
489
490
491
492
493
494
495
496
497
498
499
500
501
502
503
504
505
506
507
508
509
510
511
512
513
514
515
516
517
518
519
520
521
522
523
524
525
526
527
528
529
530
531
532
533
534
535
536
537
538
539
540
541
542
543
544
545
546
547
548
549
550
551
552
553
554
555
556
557
558
559
560
561
562
563
564
565
566
567
568
569
570
571
572
573
574
575
576
577
578
579
580
581
582
583
584
585
586
587
588
589
590
591
592
593
594
595
596
597
598
599
600
601
602
603
604
605
606
607
608
609
610
611
612
613
614
615
616
617
618
619
620
621
622
623
624
625
626
627
628
629
630
631
632
633
634
635
636
637
638
639
640
641
642
643
644
645
646
647
648
649
650
651
652
653
654
655
656
657
658
659
660
661
662
663
664
665
666
667
668
669
670
671
672
673
674
675
676
677
678
679
680
681
682
683
684
685
686
687
688
689
690
691
692
693
694
695
696
697
698
699
700
701
702
703
704
705
706
707
708
709
710
711
712
713
714
715
716
717
718
719
720
721
722
723
724
725
726
727
728
729
730
731
732
733
734
735
736
737
738
739
740
741
742
743
744
745
746
747
748
749
750
751
752
753
754
755
756
757
758
759
760
761
762
763
764
765
766
767
768
769
770
771
772
773
774
775
776
777
778
779
780
781
782
783
784
785
786
787
788
789
790
791
792
793
794
795
796
797
798
799
800
801
802
803
804
805
806
807
808
809
810
811
812
813
814
815
816
817
818
819
820
821
822
823
824
825
826
827
828
829
830
831
832
833
834
835
836
837
838
839
840
841
842
843
844
845
846
847
848
849
850
851
852
853
854
855
856
857
858
859
860
861
862
863
864
865
866
867
868
869
870
871
872
873
874
875
876
877
878
879
880
881
882
883
884
885
886
887
888
889
890
891
892
893
894
895
896
897
898
899
900
901
902
903
904
905
906
907
908
909
910
911
912
913
914
915
916
917
918
919
920
921
922
923
924
925
926
927
928
929
930
931
932
933
934
935
936
937
938
939
940
941
942
943
944
945
946
947
948
949
950
951
952
953
954
955
956
957
958
959
960
961
962
963
964
965
966
967
968
969
970
971
972
973
974
975
976
977
978
979
980
981
982
983
984
985
986
987
988
989
990
991
992
993
994
995
996
997
998
999
1000
/CIOPRG DX
//NAME STD+STD
//ATTR SC
//$M
0,0,0,0,0,0,0,0,0,0
0,0,0,0,0,0,0,0,0,0
0,0,0,0,0,0,0,0,0,0
0,0,0,0,0,0,0,0,0,0
0,0,0,0,0,0,0,0,0,0
0,0,0,0,0,0,0,0,0,0
0,0,0,0,0,0,0,0,0,0
0,0,0,0,0,0,0,0,0,0
//KEY 0
PART 1
STR #80011
OUT #70025
STR #70025
AND #82014
OR-NOT #70025
OUT #40057
STR #70025
AND #82015
OUT #40042
STR #70025
AND #82016
OUT #40056
STR #70030
AND-NOT #70034
AND #50080
STR #70031
AND #50081
OR-STR
STR #70032
AND-NOT #70036
AND #50082
OR-STR
STR #70033
AND #50083
OR-STR
AND-NOT #50063
OUT #40130
STR #50080
STR #50081
STR #50082
OR #50083
OR-STR
OR-STR
AND #40130
STR #70021
AND-NOT #50076
AND-NOT #50070
OR-STR
OUT #70021
STR #50080
AND-NOT #70021
OUT #70034
STR #50081
AND-NOT #70021
OUT #70035
STR #50082
AND-NOT #70021
OUT #70036
STR #50083
AND-NOT #70021
OUT #70037
STR #70230
AND-NOT #70234
AND #50090
STR #70231
AND #50091
OR-STR
STR #70232
AND #50092
OR-STR
STR #70233
AND-NOT #70237
AND #50093
OR-STR
AND-NOT #50063
OUT #40131
STR #50090
STR #50091
STR #50092
OR #50093
OR-STR
OR-STR
AND #40131
STR #70221
AND-NOT #50076
AND-NOT #50070
OR-STR
OUT #70221
STR #50090
AND-NOT #70221
OUT #70234
STR #50091
AND-NOT #70221
OUT #70235
STR #50092
AND-NOT #70221
OUT #70236
STR #50093
AND-NOT #70221
OUT #70237
STR #70236
OUT #70032
STR #70036
OUT #70232
STR #50010
STR #50011
STR #50012
OR #50013
OR-STR
OR-STR
OUT #70020
STR #50054
AND #50073
AND-NOT #50014
AND-NOT #70020
OUT #70011
STR #70010
AND #50073
OUT #40044
STR-NOT #70017
OR #70017
OUT #70017
STR-NOT #70016
OUT #70016
STR #70016
STR #70015
CNT M479,250
OUT #70015
STR #51530
OR #70040
AND-NOT #51531
AND-NOT #70042
AND-NOT #70043
OUT #70040
STR #51530
OUT #41130
STR #51531
OUT #41131
STR #70040
AND #50070
OUT #70041
STR #70041
OUT #41132
STR #70040
OR #70042
AND #51532
AND-NOT #50070
OUT #70042
STR #51590
OR #70240
AND-NOT #51591
AND-NOT #70242
AND-NOT #70243
OUT #70240
STR #51590
OUT #41190
STR #51591
OUT #41191
STR #70240
AND #50070
OUT #70241
STR #70241
OUT #41192
STR #70240
OR #70242
AND #51592
AND-NOT #50070
OUT #70242
PART 2
STR #20031
OUT #00010
STR #20035
OUT #00021
STR #20034
OUT #00020
STR #20032
OUT #00011
STR #20033
OUT #00012
STR #20012
OUT #40070
STR #20013
OUT #40014
STR #20015
OUT #40041
STR #20016
OUT #40040
STR #20020
OUT #70030
STR #20021
OUT #70031
STR #20022
OUT #70043
STR #20022
OUT #70243
STR #20024
OUT #70230
STR #20025
OUT #70231
STR #10010
OUT #30030
STR #50073
OUT #30011
STR #50020
OUT #30012
STR #70020
OR #50014
OUT #30013
STR #50015
OR #50016
OUT #30014
STR-NOT #40057
OR #50056
OUT #30015
STR #50054
OUT #30016
STR #50053
OUT #30017
STR #70034
OUT #30020
STR #70035
OUT #30021
STR #50157
AND #50156
OUT #30022
STR #50400
AND #50401
OUT #30023
STR #70234
OUT #30024
STR #70235
OUT #30025
STR #70040
OUT #30026
STR #70240
OUT #30027
GSTR #20050
GOUT #00030
GSTR #20060
GOUT #00040
GSTR #20070
GOUT #00050
GSTR #20080
GOUT #00060
GSTR #20090
GOUT #00070
GSTR #20100
GOUT #00080
GSTR #20110
GOUT #00090
GSTR #20120
GOUT #00100
GSTR #20130
GOUT #00110
GSTR #20140
GOUT #00120
GSTR #20150
GOUT #00130
GSTR #20160
GOUT #00140
GSTR #20170
GOUT #00150
GSTR #20180
GOUT #00160
GSTR #20190
GOUT #00170
GSTR #20200
GOUT #00180
GSTR #20210
GOUT #00190
GSTR #20220
GOUT #00200
GSTR #20230
GOUT #00210
GSTR #20240
GOUT #00220
GSTR #20250
GOUT #00230
GSTR #20260
GOUT #00240
GSTR #20270
GOUT #00250
GSTR #20280
GOUT #00260
GSTR #20290
GOUT #00270
GSTR #20300
GOUT #00280
GSTR #20310
GOUT #00290
GSTR #20320
GOUT #00300
GSTR #20330
GOUT #00310
GSTR #20340
GOUT #00320
GSTR #20350
GOUT #00330
GSTR #20360
GOUT #00340
GSTR #20370
GOUT #00350
GSTR #20380
GOUT #00360
GSTR #20390
GOUT #00370
GSTR #20400
GOUT #00380
GSTR #20410
GOUT #00390
GSTR #20420
GOUT #00400
GSTR #20430
GOUT #00410
GSTR #20440
GOUT #00420
GSTR #20450
GOUT #00430
GSTR #20460
GOUT #00440
GSTR #20470
GOUT #00450
GSTR #20480
GOUT #00460
GSTR #20490
GOUT #00470
GSTR #20500
GOUT #00480
GSTR #20510
GOUT #00490
GSTR #20520
GOUT #00500
GSTR #20530
GOUT #00510
GSTR #20540
GOUT #00520
GSTR #20550
GOUT #00530
GSTR #20560
GOUT #00540
GSTR #20570
GOUT #00550
GSTR #20580
GOUT #00560
GSTR #20590
GOUT #00570
GSTR #20600
GOUT #00580
GSTR #20610
GOUT #00590
GSTR #20620
GOUT #00600
GSTR #20630
GOUT #00610
GSTR #20640
GOUT #00620
GSTR #20650
GOUT #00630
GSTR #20660
GOUT #00640
GSTR #20670
GOUT #00650
GSTR #20680
GOUT #00660
GSTR #20690
GOUT #00670
GSTR #20700
GOUT #00680
GSTR #20710
GOUT #00690
GSTR #20720
GOUT #00700
GSTR #20730
GOUT #00710
GSTR #20740
GOUT #00720
GSTR #20750
GOUT #00730
GSTR #20760
GOUT #00740
GSTR #20770
GOUT #00750
GSTR #20780
GOUT #00760
GSTR #20790
GOUT #00770
GSTR #20800
GOUT #00780
GSTR #20810
GOUT #00790
GSTR #20820
GOUT #00800
GSTR #20830
GOUT #00810
GSTR #20840
GOUT #00820
GSTR #20850
GOUT #00830
GSTR #20860
GOUT #00840
GSTR #20870
GOUT #00850
GSTR #20880
GOUT #00860
GSTR #20890
GOUT #00870
GSTR #20900
GOUT #00880
GSTR #20910
GOUT #00890
GSTR #20920
GOUT #00900
GSTR #20930
GOUT #00910
GSTR #20940
GOUT #00920
GSTR #20950
GOUT #00930
GSTR #20960
GOUT #00940
GSTR #20970
GOUT #00950
GSTR #20980
GOUT #00960
GSTR #20990
GOUT #00970
GSTR #21000
GOUT #00980
GSTR #21010
GOUT #00990
GSTR #21020
GOUT #01000
GSTR #21030
GOUT #01010
GSTR #21040
GOUT #01020
GSTR #21050
GOUT #01030
GSTR #21060
GOUT #01040
GSTR #21070
GOUT #01050
GSTR #21080
GOUT #01060
GSTR #21090
GOUT #01070
GSTR #21100
GOUT #01080
GSTR #21110
GOUT #01090
GSTR #21120
GOUT #01100
GSTR #21130
GOUT #01110
GSTR #21140
GOUT #01120
GSTR #21150
GOUT #01130
GSTR #21160
GOUT #01140
GSTR #21170
GOUT #01150
GSTR #21180
GOUT #01160
GSTR #21190
GOUT #01170
GSTR #21200
GOUT #01180
GSTR #21210
GOUT #01190
GSTR #21220
GOUT #01200
GSTR #21230
GOUT #01210
GSTR #21240
GOUT #01220
GSTR #21250
GOUT #01230
GSTR #21260
GOUT #01240
GSTR #22550
GOUT #01250
GSTR #22560
GOUT #01260
GSTR #10020
GOUT #30040
GSTR #10030
GOUT #30050
GSTR #10040
GOUT #30060
GSTR #10050
GOUT #30070
GSTR #10060
GOUT #30080
GSTR #10070
GOUT #30090
GSTR #10080
GOUT #30100
GSTR #10090
GOUT #30110
GSTR #10100
GOUT #30120
GSTR #10110
GOUT #30130
GSTR #10120
GOUT #30140
GSTR #10130
GOUT #30150
GSTR #10140
GOUT #30160
GSTR #10150
GOUT #30170
GSTR #10160
GOUT #30180
GSTR #10170
GOUT #30190
GSTR #10180
GOUT #30200
GSTR #10190
GOUT #30210
GSTR #10200
GOUT #30220
GSTR #10210
GOUT #30230
GSTR #10220
GOUT #30240
GSTR #10230
GOUT #30250
GSTR #10240
GOUT #30260
GSTR #10250
GOUT #30270
GSTR #10260
GOUT #30280
GSTR #10270
GOUT #30290
GSTR #10280
GOUT #30300
GSTR #10290
GOUT #30310
GSTR #10300
GOUT #30320
GSTR #10310
GOUT #30330
GSTR #10320
GOUT #30340
GSTR #10330
GOUT #30350
GSTR #10340
GOUT #30360
GSTR #10350
GOUT #30370
GSTR #10360
GOUT #30380
GSTR #10370
GOUT #30390
GSTR #10380
GOUT #30400
GSTR #10390
GOUT #30410
GSTR #10400
GOUT #30420
GSTR #10410
GOUT #30430
GSTR #10420
GOUT #30440
GSTR #10430
GOUT #30450
GSTR #10440
GOUT #30460
GSTR #10450
GOUT #30470
GSTR #10460
GOUT #30480
GSTR #10470
GOUT #30490
GSTR #10480
GOUT #30500
GSTR #10490
GOUT #30510
GSTR #10500
GOUT #30520
GSTR #10510
GOUT #30530
GSTR #10520
GOUT #30540
GSTR #10530
GOUT #30550
GSTR #10540
GOUT #30560
GSTR #10550
GOUT #30570
GSTR #10560
GOUT #30580
GSTR #10570
GOUT #30590
GSTR #10580
GOUT #30600
GSTR #10590
GOUT #30610
GSTR #10600
GOUT #30620
GSTR #10610
GOUT #30630
GSTR #10620
GOUT #30640
GSTR #10630
GOUT #30650
GSTR #10640
GOUT #30660
GSTR #10650
GOUT #30670
GSTR #10660
GOUT #30680
GSTR #10670
GOUT #30690
GSTR #10680
GOUT #30700
GSTR #10690
GOUT #30710
GSTR #10700
GOUT #30720
GSTR #10710
GOUT #30730
GSTR #10720
GOUT #30740
GSTR #10730
GOUT #30750
GSTR #10740
GOUT #30760
GSTR #10750
GOUT #30770
GSTR #10760
GOUT #30780
GSTR #10770
GOUT #30790
GSTR #10780
GOUT #30800
GSTR #10790
GOUT #30810
GSTR #10800
GOUT #30820
GSTR #10810
GOUT #30830
GSTR #10820
GOUT #30840
GSTR #10830
GOUT #30850
GSTR #10840
GOUT #30860
GSTR #10850
GOUT #30870
GSTR #10860
GOUT #30880
GSTR #10870
GOUT #30890
GSTR #10880
GOUT #30900
GSTR #10890
GOUT #30910
GSTR #10900
GOUT #30920
GSTR #10910
GOUT #30930
GSTR #10920
GOUT #30940
GSTR #10930
GOUT #30950
GSTR #10940
GOUT #30960
GSTR #10950
GOUT #30970
GSTR #10960
GOUT #30980
GSTR #10970
GOUT #30990
GSTR #10980
GOUT #31000
GSTR #10990
GOUT #31010
GSTR #11000
GOUT #31020
GSTR #11010
GOUT #31030
GSTR #11020
GOUT #31040
GSTR #11030
GOUT #31050
GSTR #11040
GOUT #31060
GSTR #11050
GOUT #31070
GSTR #11060
GOUT #31080
GSTR #11070
GOUT #31090
GSTR #11080
GOUT #31100
GSTR #11090
GOUT #31110
GSTR #11100
GOUT #31120
GSTR #11110
GOUT #31130
GSTR #11120
GOUT #31140
GSTR #11130
GOUT #31150
GSTR #11140
GOUT #31160
GSTR #11150
GOUT #31170
GSTR #11160
GOUT #31180
GSTR #11170
GOUT #31190
GSTR #11180
GOUT #31200
GSTR #11190
GOUT #31210
GSTR #11200
GOUT #31220
GSTR #11210
GOUT #31230
GSTR #11220
GOUT #31240
GSTR #11230
GOUT #31250
GSTR #11240
GOUT #31260
GSTR #12530
GOUT #32550
GSTR #12540
GOUT #32560
STR-NOT #50560
OR-NOT #50561
AND #50054
AND #50066
TMR M234,1
OUT #79777
STR-NOT #79700
AND-NOT #79701
AND-NOT #79702
AND-NOT #79703
AND-NOT #79704
AND-NOT #79705
AND-NOT #79706
AND-NOT #79707
OUT #79800
STR-NOT #79710
AND-NOT #79711
AND-NOT #79712
AND-NOT #79713
AND-NOT #79714
AND-NOT #79715
AND-NOT #79716
AND-NOT #79717
OUT #79801
STR-NOT #79720
AND-NOT #79721
AND-NOT #79722
AND-NOT #79723
AND-NOT #79724
AND-NOT #79725
AND-NOT #79726
AND-NOT #79727
OUT #79802
STR-NOT #79730
AND-NOT #79731
AND-NOT #79732
AND-NOT #79733
AND-NOT #79734
AND-NOT #79735
AND-NOT #79736
AND-NOT #79737
OUT #79803
STR-NOT #79740
AND-NOT #79741
AND-NOT #79742
AND-NOT #79743
AND-NOT #79744
AND-NOT #79745
AND-NOT #79746
AND-NOT #79747
OUT #79804
STR-NOT #79750
AND-NOT #79751
AND-NOT #79752
AND-NOT #79753
AND-NOT #79754
AND-NOT #79755
AND-NOT #79756
AND-NOT #79757
OUT #79805
STR-NOT #79760
AND-NOT #79761
AND-NOT #79762
AND-NOT #79763
AND-NOT #79764
AND-NOT #79765
AND-NOT #79766
AND-NOT #79767
OUT #79806
STR-NOT #79770
AND-NOT #79771
AND-NOT #79772
AND-NOT #79773
AND-NOT #79774
AND-NOT #79775
AND-NOT #79776
AND-NOT #79777
OUT #79807
STR #79800
AND #79801
AND #79802
AND #79803
AND #79804
AND #79805
AND #79806
AND #79807
ADD 0,64,M150
STR #79777
ADD 0,63,M150
STR #79776
ADD 0,62,M150
STR #79775
ADD 0,61,M150
STR #79774
ADD 0,60,M150
STR #79773
ADD 0,59,M150
STR #79772
ADD 0,58,M150
STR #79771
ADD 0,57,M150
STR #79770
ADD 0,56,M150
STR #79767
ADD 0,55,M150
STR #79766
ADD 0,54,M150
STR #79765
ADD 0,53,M150
STR #79764
ADD 0,52,M150
STR #79763
ADD 0,51,M150
STR #79762
ADD 0,50,M150
STR #79761
ADD 0,49,M150
STR #79760
ADD 0,48,M150
STR #79757
ADD 0,47,M150
STR #79756
ADD 0,46,M150
STR #79755
ADD 0,45,M150
STR #79754
ADD 0,44,M150
STR #79753
ADD 0,43,M150
STR #79752
ADD 0,42,M150
STR #79751
ADD 0,41,M150
STR #79750
ADD 0,40,M150
STR #79747
ADD 0,39,M150
STR #79746
ADD 0,38,M150
STR #79745
ADD 0,37,M150
STR #79744
ADD 0,36,M150
STR #79743
ADD 0,35,M150
STR #79742
ADD 0,34,M150
STR #79741
ADD 0,33,M150
STR #79740
ADD 0,32,M150
STR #79737
ADD 0,31,M150
STR #79736
ADD 0,30,M150
STR #79735
ADD 0,29,M150
STR #79734
ADD 0,28,M150
STR #79733
ADD 0,27,M150
STR #79732
ADD 0,26,M150
STR #79731
ADD 0,25,M150
STR #79730
ADD 0,24,M150
STR #79727
ADD 0,23,M150
STR #79726
ADD 0,22,M150
STR #79725
ADD 0,21,M150
STR #79724
ADD 0,20,M150
STR #79723
ADD 0,19,M150
STR #79722
ADD 0,18,M150
STR #79721
ADD 0,17,M150
STR #79720
ADD 0,16,M150
STR #79717
ADD 0,15,M150
STR #79716
ADD 0,14,M150
STR #79715
ADD 0,13,M150
STR #79714
ADD 0,12,M150
STR #79713
ADD 0,11,M150
STR #79712
ADD 0,10,M150
STR #79711
ADD 0,9,M150
STR #79710
ADD 0,8,M150
STR #79707
ADD 0,7,M150
STR #79706
ADD 0,6,M150
STR #79705
ADD 0,5,M150
STR #79704
ADD 0,4,M150
STR #79703
ADD 0,3,M150
STR #79702
ADD 0,2,M150
STR #79701
ADD 0,1,M150
STR #79700
ADD 0,0,M150
STR #70017
MOV M150,W#79780
STR #79780
OUT #40220
STR #79781
OUT #40221
STR #79782
OUT #40222
STR #79783
OUT #40223
STR #79784
OUT #40224
STR #79785
OUT #40225
STR #40220
STR #40221
STR #40222
STR #40223
STR #40224
STR #40225
STR #79700
OR-STR
OR-STR
OR-STR
OR-STR
OR-STR
OR-STR
AND-NOT #40014
OUT #40012
STR-NOT #79810
AND-NOT #79811
AND-NOT #79812
AND-NOT #79813
AND-NOT #79814
AND-NOT #79815
AND-NOT #79816
AND-NOT #79817
OUT #79910
STR-NOT #79820
AND-NOT #79821
AND-NOT #79822
AND-NOT #79823
AND-NOT #79824
AND-NOT #79825
AND-NOT #79826
AND-NOT #79827
OUT #79911