1
0
mirror of https://github.com/pkimpel/retro-220.git synced 2026-02-26 00:34:04 +00:00
Files
pkimpel.retro-220/software/BALGOL/BALGOL-Library/READ.card

146 lines
23 KiB
Plaintext

1 REORD .00.0
1 READ F4247 SW,1,* .00.0
1 STA 8 X,04 ,01.0
1 STA 8 Y,04 .02.0
1 IFL 8 Y,04,1 .03.0
1 STP 8 U .04.0
1 BUN 8 X .05.0
1 LDB 8 SW .06.0
1 CLL - 0 .07.0
1 CLL 8 S6 .08.0
1 A STP 6 0100 .09.0
1 F4246 0117,30,0100 .10.0
1 CLL 8 I .11.0
1 IFL 8 I,05,2 .12.0
1 LDB 8 SW .13.0
1 IBB 8 B,9999 .14.0
1 DLB 8 S6,64,0 .15.0
1 CAD M+1 .16.0
1 IBB 8 AC,9999 .17.0
1 B DLB 8 I,94,0 .18.0
1 CAD - M+1 .19.0
1 LDB 8 I .20.0
1 SLA - 0 .21.0
1 IFL 8 I,05,2 .22.0
1 LDR 8 S6 .23.0
1 BFR 8 AD,00,0 .24.0
1 DBB 8 A,160 .25.0
1 DLB 8 S6,44,0 .26.0
1 BFA 8 K,22,13 .27.0
1 SRA 8 .28.0
1 SLA - 0 .29.0
1 ADL 8 N .30.0
1 DFL 8 S6,41,2 .31.0
1 BRP 8 B .32.0
1 CAD 8 N .33.0
1 STP 8 U .34.0
1 BUN 8 X .35.0
1 *B DFL 8 S6,52,12 .36.0
1 BUN 8 B .37.0
1 AD DBB 8 A,162 .38.0
1 BFA 8 G,11,8 .39.0
1 BFA 8 P,22,03 .40.0
1 BFA 8 Q,22,20 .41.0
1 BFA 8 Q,22,34 .42.0
1 BFA 8 C,22,23 .43.0
1 BFA 8 CD,22,13 .44.0
1 BFA 8 A+,22,14 .45.0
1 O LDB 8 S3 .46.0
1 IBB 8 B,9999 .47.0
1 STP 8 U .48.0
1 BUN 8 W .49.0
1 BUN 8 B .50.0
1 *A IFL 8 I,94,16 .51.0
1 BUN 8 O .52.0
1 K CLL 8 S6 .53.0
1 CAD 8 N .54.0
1 STP 8 U .55.0
1 IBB 8 X,9992 .56.0
1 BUN 8 B .57.0
1 C IFL 8 S5,00,1 .58.0
1 STP 8 U .59.0
1 BUN 8 W .60.0
1 IFL 8 S2,00,1 .61.0
1 BUN 8 B .62.0
1 Q IFL 8 S1,00,1 .63.0
1 BUN 8 B .64.0
1 P LDR 8 T .65.0
1 STR 8 D,22 .66.0
1 IFL 8 S4,00,1 .67.0
1 BUN 8 B .68.0
1 G SLA 0 1 .69.0
1 LDR 8 N .70.0
1 SLT 0 1 .71.0
1 STR 8 N .72.0
1 DFL 8 D,22,1 .73.0
1 IFL 8 S3,00,1 .74.0
1 BUN 8 B .75.0
1 W LDR 8 S2 .76.0
1 BZR 8 E .77.0
1 LDB 8 S1 .78.0
1 CSU 8 N .79.0
1 SLA 8 .80.0
1 IBB 8 *+2,9999 .81.0
1 LSA 0 .82.0
1 SUA 8 F .83.0
1 DFL 8 F,12,10 .84.0
1 BRP 8 X .85.0
1 LSA 0 .86.0
1 BUN 8 X .87.0
1 J LDB 8 S5 .88.0
1 DBB 8 L,1 .89.0
1 X STP 0 * .90.0
1 Y BUN 0 * .91.0
1 BSA 8 Z,9 .92.0
1 STB 8 Y,04 .93.0
1 V LDB 8 S .94.0
1 CLL 8 D .95.0
1 RTF 8 D,7 .96.0
1 U BUN 0 * .97.0
1 L STA 8 F .98.0
1 BUN 8 V .99.0
1 Z LDB 8 READ 01.00.0
1 CLL 8 SW 01.01.0
1 BUN - 0 1.02.0
1 E CAD 8 N 1.03.0
1 LDB 8 S4 01.04.0
1 IBB 8 S,9999 01.05.0
1 ADD 8 D 01.06.0
1 FAD 8 D 01.07.0
1 S LDB 8 S1 01.08.0
1 IBB 8 J,9999 01.09.0
1 LSA 0 1 01.10.0
1 BUN 8 J 01.11.0
1 AC CFA 8 ST1,08 01.12.0
1 BCU 8 B 01.13.0
1 LDR M+2 01.14.0
1 CFR 8 ST2,00 01.15.0
1 BCU 8 B 01.16.0
1 LDB 8 SW 01.17.0
1 IFL - 0,00,1 01.18.0
1 BUN 8 Z 01.19.0
1 CD LDB 8 S3 01.20.0
1 IBB 8 B-,9999 01.21.0
1 DFL 8 I,05,2 01.22.0
1 BUN 8 O+2 01.23.0
1 T CNST +5800000000 01.24.0
1 ST1 CNST $5SENT$ 01.25.0
1 ST2 CNST $INEL $ 01.26.0
1 R CNST +5110000000 01.27.0
1 SW HLT 0 0 01.28.0
1 D HLT 0 0 01.29.0
1 S1 HLT 0 0 1.30.0
1 S2 HLT 0 0 01.31.0
1 S3 HLT 0 0 01.32.0
1 S4 HLT 0 0 01.33.0
1 S5 HLT 0 0 01.34.0
1 N HLT 0 0 01.35.0
1 S6 HLT 0 0 01.36.0
1 F HLT 0 0 01.37.0
1 I HLT 0 0 01.38.0
1 M DEFN 100 01.39.0
1 CNST 40000990000 01.40.0
1 CNST $READ REED=1 $ 01.41.0
1 CNST 90000000000 1.42.0
1 FINI 1 01.43.0