|
DataMuseum.dkPresents historical artifacts from the history of: MIKADOS |
This is an automatic "excavation" of a thematic subset of
See our Wiki for more about MIKADOS Excavated with: AutoArchaeologist - Free & Open Source Software. |
top - download
Length: 18693 (0x4905)
Types: SPC/1-COMAL-BIN
Notes: Mikados_B
Names: »THREE.B«
└─⟦385f097a1⟧ Bits:30008988 SPC/1 COMAL programmer til bogføring
└─⟦this⟧ »THREE.B«
└─⟦ff7f7aeee⟧ Bits:30009007 NBT 15/3-84
└─⟦this⟧ »THREE.B«
0100 DIM A1(V),A2(V),A3(V),A4(V),A5(V),A6(G),A7$(8),A8$(8),A9$(E),B0$(E) 0120 DIM RES$(15),OP1$(12),OP2$(12),B1$(12),B2$(12),B3$(12),B4$(12),B5$(12) 0130 DIM B6$(50),B7(10),B8$(10,37),B9$(8,11),C0$(12),C1$(12),C2$(12),C3$(12) 0140 DIM C4$(12),C5$(45,11),C6$(55),C7$(40),C8$(50),C9$(16),D0$(16),D1$(71) 0150 DIM D2$(27),D3$(55),D4$(34),D5$(29),D6$(37),D7$(16),D8$(16),D9$(16) 0160 DIM E0$(16),E1$(16),E2$(16,12),E9$(79),F0$(79) 0162 DIM F1$(12),DD$(6),B61$(50),DAD$(6) 0163 TI=10;EL=11;AZ=28 0170 B3$=" 0+";B5$="6,00+";B4$="100,00+" 0171 FOR I=E TO 16 0172 E2$(I)=B3$ 0173 NEXT I 0200 A6(E),A6(G),E3,E4,E5=B 0230 FOR I=E TO 79 0240 E9$=E9$+" " 0250 NEXT I 0370 PROC C(F2,F3,F4,F5) 0380 RES$=F5$;OP1$=F3$;OP2$=F4$;SI=B;FLAG=B;ART=F2-6*(F2>5) 0390 CALL "P641210:REGN" 0400 IF F2<6 AND FLAG THEN STOP 0430 F5$=RES$ 0440 ENDPROC 0441 PROC OPTÆL(F6,F7) 0442 F1$=F7$;C2$=C5$(F6) 0443 EXEC C(0,C2$,F1$,F1$) 0444 C5$(F6)=F1$(G:EL) 0445 IF J5=73 AND C5$(F6,EL)="-" THEN C5$(F6)=B3$(G:EL) 0448 ENDPROC 0450 PROC UDTÆL 0460 J=W*(F8-E) 0470 FOR F9=E TO W 0480 FOR I=E TO 5 0490 C6$((I-E)*EL+E:EL)=C5$((F9-E)*5+I) 0500 NEXT I 0510 PUT D0$,J+F9:C6$ 0520 NEXT F9 0530 EXEC F(-F8,-F9,D0$) 0540 ENDPROC 0550 PROC INDTÆL 0560 J=W*(F8-E) 0570 FOR F9=E TO W 0580 GET D0$,J+F9:C6$ 0590 FOR I=E TO 5 0600 C5$((F9-E)*5+I)=C6$((I-E)*EL+E:EL) 0610 NEXT I 0620 NEXT F9 0630 EXEC F(F8,F9,D0$) 0640 ENDPROC 0641 PROC OP(F6,F7) 0642 F1$=F7$;C2$=E2$(F6) 0643 EXEC C(0,C2$,F1$,F1$) 0644 E2$(F6)=F1$ 0645 ENDPROC 0800 PROC INLØNMOD(G5) 0810 GET C9$,G*G5-E:D1$ 0820 GET C9$,G*G5:D2$,G6,G7,G8,G9,H0,H1,H2,H3,H4,H5,H6 0830 EXEC F(1,G5,C9$) 0840 ENDPROC 0850 PROC UDLØNMOD(G5) 0860 PUT C9$,G*G5-E:D1$ 0870 PUT C9$,G*G5:D2$,G6,G7,G8,G9,H0,H1,H2,H3,H4,H5,H6 0880 EXEC F(2,G5,C9$) 0890 ENDPROC 0900 PROC CONV(H7,H8,H9) 0910 I0=H8;H7$="" 0930 REPEAT 0940 H7$=CHR((I0 MOD TI)+48)+H7$;H9=H9-E;I0=I0 DIV TI 0970 IF H9<B AND I0=B THEN H9=B 0980 UNTIL H9=B 0990 ENDPROC 1890 PROC INDVIRK 1900 OPEN C9$,R 1910 EXEC F(0,0,C9$) 1920 GET C9$,E:D3$ 1930 GET C9$,G:D4$,I8,I9,J0 1935 GET C9$,V:DAD$ 1940 ENDPROC 1950 PROC F(J1,J2,J3) 1960 IF STATUS(J3$)<>B THEN 1970 OUTPUT T 1980 PRINT "FIL-FEJL ";J3$;STATUS(J3$),J1;J2 1990 STOP 2000 ENDIF 2010 ENDPROC 2430 PROC Å 2440 EXEC CONV(OP1$,J5,2) 2450 F0$(E)=D5$(29);F0$(G,V)=OP1$;F0$(5:20)=D5$(G,21) 2480 IF F0$(43)="+" THEN F0$(43)=" " 2490 IF F0$(54)="+" THEN F0$(54)=" " 2500 IF F0$(62)="+" THEN F0$(62)=" " 2510 PRINT F0$; 2520 J6=J6+E;F0$=E9$ 2540 ENDPROC 2550 PROC Z(G5) 2560 J5=G5 2570 GET D8$,G5:D5$,J7,J8,J9 2580 EXEC F(2,G5,D8$) 2590 ENDPROC 2600 PROC CONVDATE(I1,I2) 2610 K0=I2;I1$="" 2620 FOR I=8 TO E STEP -E 2625 I1$(I)=CHR(K0 MOD TI+48) 2630 IF I MOD V=B THEN 2631 I1$(I)="-" 2632 ELSE 2633 K0=K0 DIV TI 2634 ENDIF 2690 NEXT I 2700 ENDPROC 2710 PROC Æ(I1,I2) 2720 I1$=B3$ 2730 IF I2<>B THEN 2740 I1$(W,TI)=",0";I0=ABS(I2);K0=INT((I0-INT(I0))*100+0.50001) 2770 IF I2<B THEN I1$(12)="-" 2780 FOR I=EL TO E STEP -E 2790 IF I<>W THEN 2800 I1$(I)=CHR(K0 MOD TI+48) 2810 K0=K0 DIV TI 2820 IF K0=B AND I<TI THEN I=B 2830 ELSE 2840 K0=INT(I0) 2850 ENDIF 2860 NEXT I 2870 ENDIF 2880 ENDPROC 2890 PROC PERVERT(I1,I2) 2900 I2=B 2910 FOR I=E TO LEN(I1$)-E 2920 IF I1$(I)<>" " AND I1$(I)<>"," THEN I2=TI*I2+ORD(I1$(I))-48 2930 NEXT I 2940 IF I1$(I)="-" THEN I2=-I2 2950 I2=I2/100 2960 ENDPROC 2970 PROC SKRIVBUND 2980 IF J6>B THEN 2990 WHILE J6<K1-20 3000 PRINT 3010 J6=J6+E 3020 ENDWHILE 3030 EXEC CONV(C3$,G6,6) 3040 EXEC CONV(F1$,G7,4) 3050 C3$=C3$+F1$ 3060 PRINT TAB(EL);"LØNMODTAGER ";C3$; 3070 PRINT USING " ####":F8; 3080 PRINT TAB(44);"ARBEJDSGIVER ";D3$(E,7) 3090 PRINT 3092 PRINT 3094 PRINT 3100 PRINT 3110 PRINT TAB(13);D1$(E,25);TAB(46);D3$(8,32) 3120 PRINT TAB(13);D1$(26,48) 3130 PRINT TAB(13);D1$(49,71);TAB(46);D3$(33,55) 3140 PRINT TAB(13);D2$(E,4);" ";D2$(5,18);TAB(46);D4$(E,4);" "; 3150 PRINT D4$(5,18) 3160 J6=J6+W 3170 WHILE J6<K1 3180 PRINT 3190 J6=J6+E 3200 ENDWHILE 3210 J6=B 3220 ENDIF 3230 ENDPROC 3240 PROC SKRIVHOVED(G5) 3250 PRINT 3260 A6(G5)=A6(G5)+E 3270 PRINT USING " SIDE####":A6(G5); 3275 PRINT " UDSKRIFTSDATO ";DAD$; 3280 PRINT TAB(49);"LØNPERIODEN ";A7$;" / ";A8$; 3290 CASE G5 OF 3300 WHEN E 3310 J6=6 3320 PRINT TAB(33);"LØNSPECIFIKATION" 3330 PRINT TAB(33);"****************" 3340 PRINT 3350 PRINT " LA TEKST";TAB(26);"NUMMER SALDO ENHEDER SATS "; 3360 PRINT "UDBETALT/TRUKKET"; 3370 WHEN G 3380 J6=5 3390 PRINT TAB(29);"FERIE- OG SH-OPGØRELSE" 3400 PRINT TAB(29);"**********************" 3410 PRINT 3420 ENDCASE 3430 ENDPROC 3440 PROC NÆSTE 3450 REPEAT 3460 F8=F8+E 3470 H1=E 3480 IF F8<=I9 THEN 3490 EXEC INLØNMOD(F8) 3500 IF A9$<>D2$(21) THEN H1=B 3510 IF B0$="A" AND D2$(24,25)>"89" THEN H1=B 3520 IF B0$="F" AND D2$(24,25)<"90" THEN H1=B 3530 ENDIF 3540 UNTIL H1>B 3550 ENDPROC 3560 PROC BEREGNFERIE 3570 EXEC SKRIVHOVED(2) 3580 IF K2=B THEN EXEC INDTÆL 3585 K4=H1 3590 IF A4(K3)>H1 THEN K4=A4(K3) 3595 K5=H6 3640 IF A5(K3)<H6 OR H6=B THEN K5=A5(K3) 3690 K6=K5 MOD 100-K4 MOD 100 3700 K6=K6+30*(K5 DIV 100 MOD 100-K4 DIV 100 MOD 100) 3705 K7=INT(G*I7*K6/365+0.5)/G 3710 K6=K6+365*(K5 DIV 10000-K4 DIV 10000) 3720 IF A9$="1" THEN K7=B 3770 EXEC Æ(C3$,K7) 3800 C4$=C5$(29) 3810 EXEC C(0,C3$,C4$,F1$) 3820 C5$(29)=F1$(G:EL) 3830 IF K3=V THEN 3840 EXEC Æ(C3$,I7) 3850 EXEC C(4,F1$,C3$,C4$) 3860 IF SI=G THEN F1$=C3$ 3870 ENDIF 3873 C4$=C5$(44) 3876 EXEC C(0,C4$,F1$,C4$) 3880 C5$(44)=C4$(G:EL) 3890 PRINT " FERIEKODE ";D2$(22);" OR-KODE ";D2$(24,25);" FAGGR-KODE";H5 3910 EXEC CONVDATE(C4$,K4) 3920 PRINT " ANSAT FRA ";C4$;" TIL "; 3930 EXEC CONVDATE(C4$,K5) 3940 EXEC C(3,F1$,B5$,C3$) 3945 IF C3$(8)=" " THEN C3$(8)="0" 3950 PRINT C4$;" FERIEDAGE ";F1$(7,TI);" HERAF ";C3$(8);" LØRDAGE" 3960 PRINT 3970 PRINT " LA TEKST";TAB(38);"SALDO ENHEDER SATS UDBETALT/TRUKKET"; 3990 IF C5$(16,EL)="+" THEN C5$(16,EL)=" " 4000 PRINT TAB(5);"FERIEBERETT LØN";TAB(42);"0 ";C5$(16) 4010 C5$(16)=B3$(G:EL) 4020 EXEC Z(90) 4025 EXEC OP(8,C5$(20)) 4030 F0$(42)="0";F0$(44,54)=C5$(20) 4040 EXEC Å 4050 EXEC Z(91) 4055 EXEC OP(9,C5$(17)) 4060 F0$(42)="0";F0$(44,54)=C5$(17) 4070 EXEC Å 4080 IF H0>B THEN 4090 EXEC Æ(C3$,H0) 4100 ELSE 4110 K8=INT(G9*12/365) 4120 EXEC Æ(C4$,K8) 4125 F1$=C5$(29) 4130 EXEC C(2,F1$,C4$,C3$) 4140 ENDIF 4150 B1$=C5$(20);C4$=C5$(17);C5$(20)=B3$(G:EL);C5$(17)=C5$(20) 4155 C5$(29)=C5$(20) 4190 EXEC C(0,B1$,C4$,B1$) 4200 EXEC OPTÆL(34,B1$) 4230 EXEC Z(82) 4235 F0$(33,43)=C5$(34) 4240 F0$(64+(B1$(12)="-")*6:TI)=B1$(G:TI) 4250 EXEC Å 4260 EXEC C(4,B1$,C3$,C4$) 4270 EXEC Z(92) 4280 F0$(45,54)=C3$(V:TI) 4290 IF SI=G THEN 4300 EXEC C(1,B1$,C3$,C4$) 4310 H0=B 4320 EXEC Æ(C3$,G8) 4330 F0$(56,62)=C3$(6:7) 4335 C3$(12)="-" 4340 EXEC C(2,C4$,C3$,B2$) 4350 EXEC C(3,B2$,B4$,B2$) 4355 B2$(TI,EL)="00" 4360 EXEC C(0,B1$,B2$,C0$) 4370 ELSE 4380 B2$=B3$ 4390 C0$=B1$ 4400 IF H0>B THEN 4410 EXEC C(1,C3$,B1$,C3$) 4420 EXEC PERVERT(C3$,H0) 4430 ENDIF 4440 ENDIF 4441 EXEC OPTÆL(40,B2$) 4442 EXEC OP(TI,B2$) 4444 F0$(33,43)=C5$(40) 4450 F0$(70,79)=B2$(G:TI) 4460 EXEC Å 4470 EXEC Z(93) 4480 F0$(64+6*(C0$(12)="-"):TI)=C0$(G:TI) 4490 EXEC Å 4500 PRINT 4510 J6=J6+6 4520 ENDPROC 4530 PROC BEREGNSH 4540 IF K9=B THEN 4550 EXEC SKRIVHOVED(2) 4560 IF K2=B THEN EXEC INDTÆL 4570 ENDIF 4580 PRINT " SH-KODE ";D2$(23);" OR-KODE ";D2$(24,25); 4590 PRINT " FAGGR-KODE";H5 4600 PRINT 4610 PRINT " LA TEKST";TAB(38);"SALDO ENHEDER SATS "; 4620 PRINT "UDBETALT/TRUKKET"; 4630 EXEC Z(95) 4635 EXEC OP(EL,C5$(23)) 4640 F0$(42)="0";F0$(44,54)=C5$(23) 4650 EXEC Å 4660 C3$=C5$(23);C5$(23)=B3$(G:EL) 4670 C4$=" "+C5$(26) 4675 IF C4$(12)="+" THEN EXEC C(1,B3$,C4$,C4$) 4680 EXEC Z(96) 4685 EXEC OP(12,C4$) 4690 F0$(42)="0";F0$(44,54)=C4$(G:EL) 4700 EXEC Å 4710 C5$(26)=B3$(G:EL) 4720 EXEC C(0,C3$,C4$,B1$) 4730 EXEC OPTÆL(34,B1$) 4760 EXEC Z(82) 4770 F0$(33,43)=C5$(34) 4780 EXEC Æ(C3$,G8) 4782 C4$=B3$ 4785 C3$(12)="-" 4790 IF B1$(12)="+" THEN 4795 B2$=B1$ 4800 F0$(64:TI)=B1$(G:TI) 4801 IF H0>B THEN 4802 EXEC Æ(C4$,H0) 4803 EXEC C(4,B1$,C4$,C2$) 4804 IF SI=G THEN 4805 EXEC C(1,B1$,C4$,B2$) 4806 H0=B 4807 ELSE 4808 EXEC C(1,C4$,B1$,C2$) 4809 B2$=B3$ 4810 EXEC PERVERT(C2$,H0) 4811 ENDIF 4812 ENDIF 4819 EXEC C(2,C3$,B2$,C1$) 4820 EXEC C(3,C1$,B4$,C1$) 4830 C1$(TI,EL)="00" 4840 EXEC OPTÆL(40,C1$) 4860 ELSE 4870 F0$(70:TI)=B1$(G:TI) 4880 C1$=B3$ 4890 ENDIF 4900 EXEC Å 4910 EXEC Z(97) 4915 EXEC OP(13,C1$) 4920 F0$(33,43)=C5$(40);F0$(45,54)=C4$(V:TI) 4930 F0$(56:6)=C3$(6:6);F0$(70:TI)=C1$(G:TI) 4940 EXEC Å 4950 EXEC C(0,C1$,B1$,C2$) 4960 EXEC Z(98) 4970 F0$(64+6*(C2$(12)="-"):TI)=C2$(G:TI) 4980 EXEC Å 4990 J6=J6+V 5000 ENDPROC 5010 PROC BEREGNLØN 5020 L0=(F8-E)*J0+E 5030 GET D7$,L0:D6$ 5040 IF D6$(E)="1" THEN 5042 FOR I=E TO 8 5044 B9$(I)=B3$(G:EL) 5046 NEXT I 5050 L1=E 5060 L2=B 5062 D6$(E)="2" 5064 PUT D7$,L0:D6$ 5070 EXEC SKRIVHOVED(1) 5080 EXEC INDTÆL 5090 REPEAT 5100 J5=ORD(D6$(V))-48 5110 IF D6$(4)<>" " THEN J5=J5*TI+ORD(D6$(4))-48 5120 IF J5<78 AND J5<>60 AND J5<>70 THEN 5130 EXEC Z(J5) 5140 IF J7>B THEN 5141 IF J7=G OR J7=4 OR J7=6 THEN 5143 C3$=D6$(EL:TI) 5144 EXEC OPTÆL(J7,C3$) 5146 J7=J7+E 5147 IF J7<6 THEN 5148 F1$=B9$(8) 5149 EXEC C(0,F1$,C3$,C4$) 5150 B9$(8)=C4$(G:EL) 5151 ENDIF 5152 ENDIF 5160 C3$=D6$(AZ:TI) 5170 EXEC OPTÆL(J7,C3$) 5190 ENDIF 5200 IF J8>B THEN 5220 C3$=D6$(AZ:TI) 5230 EXEC OPTÆL(J8,C3$) 5250 ENDIF 5260 IF J9>B THEN 5280 C3$=D6$(AZ:TI) 5290 EXEC OPTÆL(J9,C3$) 5310 ENDIF 5320 F0$(26:6)=D6$(5:6) 5330 CASE B=B OF 5340 WHEN (J5>B AND J5<60) OR (J5>61 AND J5<65) 5350 CASE J5 OF 5360 WHEN 41,49 5370 F0$(33,43)=C5$(J9) 5371 IF J5=49 THEN 5372 C8$(21,30)=D6$(AZ:TI) 5373 ELSE 5374 EXEC OP(2,D6$(AZ,37)) 5375 ENDIF 5380 WHEN 42 5385 EXEC OP(3,D6$(AZ,37)) 5390 F0$(33,43)=C5$(26) 5400 ENDCASE 5402 IF J5=40 THEN EXEC OP(1,D6$(AZ,37)) 5405 IF J5>61 THEN 5406 D6$(37)="-" 5407 C3$=B6$(EL+20*(J5=62)+30*(J5=64):TI);C4$=D6$(AZ:TI) 5408 EXEC C(0,C3$,C4$,C3$) 5409 B6$(EL+20*(J5=62)+30*(J5=64):TI)=C3$(V:TI) 5415 ENDIF 5418 F0$(45,54)=D6$(EL:TI) 5420 F0$(56,62)=D6$(21:7) 5430 IF D6$(37)="+" THEN 5440 F0$(65:W)=D6$(AZ:W) 5450 ELSE 5460 F0$(71,79)=D6$(AZ:W) 5470 ENDIF 5480 WHEN J5=61 OR (J5>64 AND J5<70) 5490 D6$(37)="+" 5492 IF J5>67 THEN D6$(37)="-" 5500 F1$=D6$(EL:TI) 5510 C3$=D6$(AZ:TI) 5520 EXEC C(0,F1$,C3$,C4$) 5522 IF C4$(12)="-" THEN 5524 D6$(EL:TI)=B3$(V:TI) 5526 D6$(AZ:TI)=F1$ 5528 ELSE 5530 D6$(EL:TI)=C4$(V:TI) 5531 ENDIF 5532 D6$(E)="2" 5533 D6$(37)="+" 5534 PUT D7$,L0:D6$ 5535 D6$(37)="-" 5536 IF J5=61 THEN 5537 C3$=B6$(E,TI) 5538 ELSE 5539 C3$=B61$(E+TI*(J5=66)+20*(J5=67)+30*(J5=68)+40*(J5=69):TI) 5540 ENDIF 5542 C4$=D6$(AZ:TI) 5543 EXEC C(0,C3$,C4$,C3$) 5544 IF J5=61 THEN 5545 B6$(E,TI)=C3$(V:TI) 5546 ELSE 5547 B61$(E+TI*(J5=66)+20*(J5=67)+30*(J5=68)+40*(J5=69):TI)=C3$(V:TI) 5548 ENDIF 5550 F0$(34,43)=D6$(EL:TI) 5560 F0$(71,79)=D6$(AZ:W) 5570 WHEN J5=72 5575 EXEC OP(14,D6$(EL,20)) 5580 F0$(33,43)=C5$(J8) 5590 F0$(45,54)=D6$(EL:TI) 5593 WHEN J5=73 5595 F0$(45,54)=D6$(EL:TI) 5600 WHEN J5=75 5610 F0$(45,54)=D6$(EL:TI) 5620 L2=(ORD(F0$(45))-48)*TI+ORD(F0$(46))-48 5630 L2=L2*100+(ORD(F0$(47))-48)*TI+ORD(F0$(48))-48 5640 L2=100*L2+(ORD(F0$(49))-48)*TI+ORD(F0$(50))-48 5650 ENDCASE 5660 EXEC Å 5670 FOR I=E TO 7 5680 IF D5$(I+21)="1" THEN 5690 C4$=D6$(AZ:TI) 5700 C3$=B9$(I) 5710 EXEC C(0,C4$,C3$,C4$) 5720 B9$(I)=C4$(G:EL) 5730 ENDIF 5740 NEXT I 5770 ELSE 5780 B7(L1)=L0 5790 B8$(L1)=D6$ 5800 IF J5<78 THEN L3=L1 5810 L1=L1+E 5820 ENDIF 5830 IF J5<83 THEN 5840 L0=L0+E 5850 GET D7$,L0:D6$ 5860 ENDIF 5870 UNTIL J5=83 5875 B8$(L1-G,37)="-" 5880 F1$=B8$(L1-G,AZ:TI) 5890 C3$=B9$(G) 5900 EXEC C(0,F1$,C3$,C4$) 5910 B9$(G)=C4$(G:EL) 5920 C3$=B9$(7) 5930 EXEC C(0,F1$,C3$,C4$) 5940 B9$(7)=C4$(G:EL) 5950 IF H6>B THEN 5960 C3$=B3$ 5970 ELSE 5980 IF H0>B THEN 5990 EXEC Æ(C3$,H0) 6000 ELSE 6002 K8=INT(G9*12/365) 6004 EXEC Æ(C3$,K8) 6010 C4$=B8$(L1-E,EL:TI) 6020 CASE D2$(21) OF 6030 WHEN "1" 6040 F1$="1+" 6050 EXEC C(4,F1$,C4$,C3$) 6060 IF SI<>B THEN 6100 EXEC C(2,C3$,C4$,F1$) 6110 C3$=F1$ 6120 ENDIF 6130 WHEN "2","3" 6140 F1$="7+" 6150 EXEC C(4,F1$,C4$,C3$) 6160 IF SI=B THEN 6170 K8=INT(G9*12/52) 6180 EXEC Æ(C3$,K8) 6190 ELSE 6220 EXEC C(2,C3$,C4$,C3$) 6230 ENDIF 6240 WHEN "4","5" 6250 F1$="14+" 6260 EXEC C(4,F1$,C4$,C3$) 6270 IF SI=B THEN 6280 K8=INT(G9*12/26) 6290 EXEC Æ(C3$,K8) 6300 ELSE 6330 EXEC C(2,C3$,C4$,C3$) 6340 ENDIF 6350 WHEN "6","7" 6360 F1$="30+" 6370 EXEC C(4,F1$,C4$,C3$) 6380 IF SI=B THEN 6390 EXEC Æ(C3$,G9) 6400 ELSE 6430 EXEC C(2,C3$,C4$,C3$) 6440 ENDIF 6450 ENDCASE 6470 ENDIF 6475 H6=L2 6480 ENDIF 6485 B8$(L1-E,EL:TI)=C3$(V:TI) 6490 F1$=B9$(G) 6500 EXEC C(4,F1$,C3$,C4$) 6510 IF SI=G THEN 6515 H0=B 6520 EXEC C(1,F1$,C3$,C4$) 6530 F1$=B8$(L1-E,21:7) 6540 EXEC C(2,C4$,F1$,C3$) 6550 EXEC C(3,C3$,B4$,C4$) 6555 C4$(TI,EL)="00" 6560 ELSE 6562 IF H0>B THEN 6564 EXEC C(1,C3$,F1$,C3$) 6566 EXEC PERVERT(C3$,H0) 6568 ENDIF 6570 C4$=B3$ 6580 ENDIF 6585 C4$(12)="-" 6590 B8$(L1-E,AZ:TI)=C4$(V:TI) 6600 F1$=B9$(7) 6602 EXEC C(0,F1$,C4$,C3$) 6604 B9$(7)=C3$(G:EL) 6610 FOR I=E TO L3 6630 IF B8$(I,V,4)="60" THEN 6635 EXEC Z(60) 6640 C4$=B8$(L1-E,AZ:W)+"+" 6650 F1$=B9$(G) 6660 EXEC C(4,C4$,F1$,C3$) 6670 IF SI=E THEN 6680 EXEC C(1,F1$,C4$,C3$) 6690 F1$=B8$(I,21:7) 6700 EXEC C(2,C3$,F1$,C4$) 6710 EXEC C(3,C4$,B4$,C3$) 6715 C3$(TI,EL)="00" 6720 ELSE 6730 C3$=" 0-" 6740 ENDIF 6750 C4$=B8$(I,EL:TI) 6760 EXEC C(4,C4$,C3$,F1$) 6770 IF SI=G THEN 6780 EXEC C(1,C4$,C3$,F1$) 6790 B8$(I,EL:TI)=F1$(V:TI) 6800 B8$(I,AZ:TI)=C3$(V:TI) 6810 ELSE 6820 B8$(I,EL:TI)=B3$(V:TI) 6830 B8$(I,AZ:TI)=C4$ 6840 ENDIF 6842 C3$=B8$(I,AZ:TI) 6844 C4$=B9$(7) 6846 EXEC C(1,C4$,C3$,C4$) 6848 B9$(7)=C4$(G:EL) 6852 B8$(I,E)="2" 6854 PUT D7$,B7(I):B8$(I) 6855 B8$(I,37)="-" 6860 F0$(34,43)=B8$(I,EL:TI) 6870 F0$(71,79)=B8$(I,AZ:W) 6871 C3$=B8$(I,AZ:TI) 6872 C4$=B6$(21,30) 6873 EXEC C(0,C3$,C4$,C4$) 6875 B6$(21,30)=C4$(V:TI) 6876 C4$=B9$(5) 6877 EXEC C(0,C3$,C4$,C3$) 6878 B9$(5)=C3$(G:EL) 6880 ELSE 6881 EXEC Z(70) 6882 C3$=B8$(I,AZ:TI) 6883 EXEC OP(6,C3$) 6884 EXEC OPTÆL(J9,C3$) 6890 F0$(45,54)=B8$(I,EL:TI) 6900 F0$(67,75)=B8$(I,AZ:W) 6910 ENDIF 6920 F0$(26:6)=B8$(I,5:6) 6930 F0$(56,62)=B8$(I,21:7) 6940 EXEC Å 6950 IF J5=70 THEN 6960 EXEC Z(71) 6970 C3$=B8$(L1-E,21:7) 6980 C4$=B8$(I,AZ:TI) 6990 EXEC C(2,C3$,C4$,F1$) 7000 EXEC C(3,F1$,B4$,C3$) 7010 F0$(56,62)=B8$(L1-E,21:7) 7015 C3$(TI,EL)="00" 7020 F0$(67,75)=C3$(V:W) 7022 C3$(12)="-" 7026 EXEC OPTÆL(J9,C3$) 7027 EXEC OP(7,C3$) 7030 EXEC Å 7040 ENDIF 7070 NEXT I 7071 EXEC C(0,B9$(4),B9$(5),C3$) 7072 EXEC C(0,B9$(6),C3$,C3$) 7073 C7$(31,40)=C3$(V,12) 7074 EXEC OP(5,B9$(4)) 7080 EXEC Z(76) 7090 C3$=B9$(E) 7100 EXEC OPTÆL(16,C3$) 7110 EXEC OPTÆL(EL,C3$) 7120 EXEC OPTÆL(31,C3$) 7130 F0$(33,43)=C5$(16) 7140 F0$(44,54)=B9$(E) 7150 F0$(56,62)=B9$(8,5:7) 7151 C3$=B9$(8) 7152 EXEC OPTÆL(30,C3$) 7153 C7$(E,TI)=C3$(G,EL) 7154 C8$(EL,20)=B9$(E,G:TI) 7160 EXEC Å 7170 EXEC Z(78) 7180 L3=L3+E 7190 C3$=B8$(L3,21:7) 7200 C4$=B9$(E) 7210 EXEC C(2,C3$,C4$,F1$) 7220 EXEC C(3,F1$,B4$,C3$) 7225 EXEC OP(15,C3$) 7230 F0$(45,54)=C3$(V:TI) 7250 EXEC OPTÆL(20,C3$) 7280 EXEC OPTÆL(14,C3$) 7300 F0$(33,43)=C5$(20) 7310 F0$(56,62)=B8$(L3,21:7) 7320 EXEC Å 7330 L3=L3+E 7340 IF B8$(L3,V,4)="79" THEN 7345 IF D2$(24,25)<"90" THEN 7350 EXEC Z(79) 7360 C3$=B8$(L3,21:7) 7370 C4$=B9$(E) 7380 EXEC C(2,C3$,C4$,F1$) 7390 EXEC C(3,F1$,B4$,C3$) 7395 EXEC OP(16,C3$) 7400 F0$(45,54)=C3$(V:TI) 7420 EXEC OPTÆL(15,C3$) 7450 EXEC OPTÆL(23,C3$) 7470 C3$=C5$(26) 7480 EXEC C(1,F1$,C3$,C4$) 7490 F0$(33,43)=C4$(G:EL) 7500 F0$(56,62)=B8$(L3,21:7) 7510 EXEC Å 7515 ENDIF 7520 L3=L3+E 7530 ENDIF 7540 EXEC Z(80) 7560 C3$=B8$(L3,AZ:TI) 7565 C7$(EL,20)=C3$ 7570 EXEC OPTÆL(43,C3$) 7590 F0$(33,43)=C5$(43) 7600 F0$(45,54)=B8$(L3,EL:TI) 7610 F0$(56,62)=B8$(L3,21:7) 7620 F0$(71,79)=B8$(L3,AZ:W) 7630 EXEC Å 7640 L3=L3+E 7650 EXEC Z(82) 7660 C3$=B9$(G) 7680 EXEC OPTÆL(34,C3$) 7700 F0$(33,43)=C5$(34) 7710 F0$(45,54)=B9$(G,G:TI) 7720 EXEC Å 7730 EXEC Z(83) 7740 C3$=B8$(L3,AZ:TI) 7750 C8$(31,40)=C3$ 7760 EXEC OPTÆL(40,C3$) 7780 F0$(33,43)=C5$(40) 7790 F0$(45,54)=B8$(L3,EL:TI) 7800 F0$(56,62)=B8$(L3,21:7) 7810 F0$(71,79)=B8$(L3,AZ:W) 7820 EXEC Å 7830 EXEC Z(84) 7840 C3$=B9$(V) 7850 EXEC OP(4,C3$) 7860 EXEC OPTÆL(37,C3$) 7880 F0$(33,43)=C5$(37) 7890 F0$(44,54)=B9$(V) 7892 EXEC C(0,B9$(2),B9$(3),C3$) 7894 C7$(21,30)=C3$(V,12) 7900 EXEC Å 7910 C3$=B9$(7) 7920 EXEC C(4,C3$,B3$,C4$) 7925 IF C3$(11)="-" THEN SI=E 7930 IF SI=G THEN 7940 IF H2>B AND (H3>B OR H4>B) THEN 7950 IF D4$(19,24)<>"000000" AND D4$(25,34)<>"0000000000" THEN 7960 SI=B 7970 EXEC Z(88) 7975 F0$(27,48)="Til disposition "+DD$ 7980 F0$(64:TI)=B9$(7,E:TI) 7985 C8$(41,50)=B9$(7,G:TI) 7990 EXEC CONV(OP1$,0+H2 MOD 10000,4) 8000 D5$(5:4)=OP1$ 8010 EXEC CONV(OP1$,H3,5) 8020 D5$(12:5)=OP1$ 8030 EXEC CONV(OP1$,H4,5) 8040 D5$(17:5)=OP1$ 8050 EXEC Å 8055 PUT E1$:F8,B9$(7) 8060 ENDIF 8070 ENDIF 8080 ELSE 8090 SI=G 8100 ENDIF 8110 IF SI=G THEN 8120 EXEC Z(89) 8130 F0$(64+6*(B9$(7,EL)="-"):TI)=B9$(7,E:TI) 8135 C8$(E,TI)=B9$(7,G:TI) 8140 EXEC Å 8150 ENDIF 8160 EXEC SKRIVBUND 8161 K2=E 8162 ELSE 8163 K2=B 8170 ENDIF 8180 ENDPROC 8181 D8$="P641220:" 8182 E1$="P641210:" 8190 C9$=D8$+"VIRKKART" 8200 EXEC INDVIRK 8210 CLOSE C9$ 8211 C9$=E1$+"PARMFIL" 8212 OPEN C9$,R 8213 GET C9$:A7$,A8$,DD$,E3,I6,I7,A9$ 8214 GET C9$:B0$,A1(E),A1(G),A1(V),A2(E),A2(G),A2(V) 8215 GET C9$:A4(E),A4(G),A4(V),A5(E),A5(G),A5(V) 8216 GET C9$:A3(E),A3(G),A3(V),E4,E5 8217 CLOSE C9$ 8220 C9$=D8$+"LØNMODRG" 8230 OPEN C9$,W 8240 D7$=D8$+"TRANSREG" 8250 OPEN D7$,W 8260 D0$=D8$+"TÆLLEREG" 8270 OPEN D0$,W 8280 D8$=D8$+"LØNARTRG" 8290 OPEN D8$,R 8291 D9$=E1$+"LØNJOUR" 8292 OPEN D9$,W 8293 E0$=E1$+"FRADRAG" 8294 OPEN E0$,W 8295 E1$=E1$+"LØNBILAG" 8296 OPEN E1$,W 8350 K1=72 8355 J6=B 8360 F8=B 8370 F0$=E9$ 8372 PUT D9$:A7$,A8$,A9$,B0$ 8374 PUT E0$:A7$,A8$ 8376 PUT E1$:I6 8380 OUTPUT P 8390 REPEAT 8400 EXEC NÆSTE 8410 L3,L4,K2,K9=B 8412 C7$=B3$(V:TI)+B3$(V:TI)+B3$(V:TI)+B3$(V:TI) 8414 C8$=C7$+B3$(V:TI) 8416 B6$=C8$ 8417 B61$=B6$ 8420 IF F8<=I9 THEN 8430 IF E3=E THEN 8440 J=E 8450 REPEAT 8460 IF A1(J)=F8 OR A1(J)=-E THEN J=TI 8470 J=J+E 8480 UNTIL J>V 8490 IF J=EL THEN 8500 EXEC BEREGNLØN 8520 ENDIF 8530 ENDIF 8540 IF E4=E THEN 8550 K3=ORD(D2$(22))-48 8560 IF K3<4 THEN 8570 IF A2(K3)=F8 OR A2(K3)=-E THEN 8580 EXEC BEREGNFERIE 8590 K9=E 8600 ENDIF 8610 ENDIF 8620 ENDIF 8630 IF E5=E THEN 8640 K3=ORD(D2$(23))-48 8650 IF K3<4 THEN 8660 IF A3(K3)=F8 OR A3(K3)=-E THEN 8670 EXEC BEREGNSH 8680 L4=E 8690 ENDIF 8700 ENDIF 8710 ENDIF 8720 IF K9*L4=E THEN 8730 EXEC C(0,C0$,C2$,C3$) 8731 EXEC C(4,C3$,B3$,C3$) 8732 IF SI<>B THEN 8740 EXEC C(2,C0$,B4$,C4$) 8750 EXEC C(3,C4$,C3$,C4$) 8760 EXEC C(4,C4$,B4$,C3$) 8770 IF SI=G THEN C4$=B4$ 8771 ELSE 8772 C4$=B3$ 8773 ENDIF 8780 PRINT 8790 PRINT "Nettoferiepengene udgør ";C4$(6,EL);" %" 8800 J6=J6+G 8810 ENDIF 8815 IF K2+K9+L4>B THEN 8820 EXEC SKRIVBUND 8830 EXEC UDLØNMOD(F8) 8840 EXEC UDTÆL 8843 PUT D9$:F8,C7$ 8844 PUT D9$:C8$ 8845 ENDIF 8846 IF K2=E THEN 8847 PUT E0$:F8,B6$ 8848 PUT E0$:F8,B61$ 8849 ENDIF 8850 ENDIF 8860 UNTIL F8=>I9 8861 PUT D9$:I9+E,C7$ 8862 PUT D9$:E2$(E),E2$(G),E2$(V),E2$(4),E2$(5),E2$(6) 8864 PUT D9$:E2$(7),E2$(8),E2$(W),E2$(TI),E2$(EL),E2$(12) 8866 PUT D9$:E2$(13),E2$(14),E2$(15),E2$(16) 8867 ENDFILE E0$ 8868 ENDFILE E1$ 8870 CLOSE 8875 OUTPUT T 8880 CHAIN "P641210:JOURNAL"
0x0000…004f (0,) 8da6 0100 DIM A1(V),A2(V),A3(V),A4(V),A5(V),A6(G),A7$(8),A8$(8),A9$(E),B0$(E)
0x0000…004f LineComalBin {
0x0000…004f ptr = 0x8da6 // 0x0 @0x0
0x0000…004f lno = 0x0064 // 0x2 @0x2
0x0000…004f at0004 = ╱87╱ DIM ╱ // 0x4 @0x4
0x0000…004f at0005 = ╱41╱A╱ // 0x5 @0x5
0x0000…004f at0006 = ╱31╱1╱ // 0x6 @0x6
0x0000…004f at0007 = ╱ed╱(╱ // 0x7 @0x7
0x0000…004f at0008 = ╱56╱V╱ // 0x8 @0x8
0x0000…004f at0009 = ╱ee╱)╱ // 0x9 @0x9
0x0000…004f at000a = ╱ec╱,╱ // 0xa @0xa
0x0000…004f at000b = ╱41╱A╱ // 0xb @0xb
0x0000…004f at000c = ╱32╱2╱ // 0xc @0xc
0x0000…004f at000d = ╱ed╱(╱ // 0xd @0xd
0x0000…004f at000e = ╱56╱V╱ // 0xe @0xe
0x0000…004f at000f = ╱ee╱)╱ // 0xf @0xf
0x0000…004f at0010 = ╱ec╱,╱ // 0x10 @0x10
0x0000…004f at0011 = ╱41╱A╱ // 0x11 @0x11
0x0000…004f at0012 = ╱33╱3╱ // 0x12 @0x12
0x0000…004f at0013 = ╱ed╱(╱ // 0x13 @0x13
0x0000…004f at0014 = ╱56╱V╱ // 0x14 @0x14
0x0000…004f at0015 = ╱ee╱)╱ // 0x15 @0x15
0x0000…004f at0016 = ╱ec╱,╱ // 0x16 @0x16
0x0000…004f at0017 = ╱41╱A╱ // 0x17 @0x17
0x0000…004f at0018 = ╱34╱4╱ // 0x18 @0x18
0x0000…004f at0019 = ╱ed╱(╱ // 0x19 @0x19
0x0000…004f at001a = ╱56╱V╱ // 0x1a @0x1a
0x0000…004f at001b = ╱ee╱)╱ // 0x1b @0x1b
0x0000…004f at001c = ╱ec╱,╱ // 0x1c @0x1c
0x0000…004f at001d = ╱41╱A╱ // 0x1d @0x1d
0x0000…004f at001e = ╱35╱5╱ // 0x1e @0x1e
0x0000…004f at001f = ╱ed╱(╱ // 0x1f @0x1f
0x0000…004f at0020 = ╱56╱V╱ // 0x20 @0x20
0x0000…004f at0021 = ╱ee╱)╱ // 0x21 @0x21
0x0000…004f at0022 = ╱ec╱,╱ // 0x22 @0x22
0x0000…004f at0023 = ╱41╱A╱ // 0x23 @0x23
0x0000…004f at0024 = ╱36╱6╱ // 0x24 @0x24
0x0000…004f at0025 = ╱ed╱(╱ // 0x25 @0x25
0x0000…004f at0026 = ╱47╱G╱ // 0x26 @0x26
0x0000…004f at0027 = ╱ee╱)╱ // 0x27 @0x27
0x0000…004f at0028 = ╱ec╱,╱ // 0x28 @0x28
0x0000…004f at0029 = ╱41╱A╱ // 0x29 @0x29
0x0000…004f at002a = ╱37╱7╱ // 0x2a @0x2a
0x0000…004f at002b = ╱ef╱$╱ // 0x2b @0x2b
0x0000…004f at002c = ╱ed╱(╱ // 0x2c @0x2c
0x0000…004f at002d = ╱38╱8╱ // 0x2d @0x2d
0x0000…004f at002e = ╱fe00008004╱ // 0x2e @0x2e
0x0000…004f at0033 = ╱ee╱)╱ // 0x33 @0x33
0x0000…004f at0034 = ╱ec╱,╱ // 0x34 @0x34
0x0000…004f at0035 = ╱41╱A╱ // 0x35 @0x35
0x0000…004f at0036 = ╱38╱8╱ // 0x36 @0x36
0x0000…004f at0037 = ╱ef╱$╱ // 0x37 @0x37
0x0000…004f at0038 = ╱ed╱(╱ // 0x38 @0x38
0x0000…004f at0039 = ╱38╱8╱ // 0x39 @0x39
0x0000…004f at003a = ╱fe00008004╱ // 0x3a @0x3a
0x0000…004f at003f = ╱ee╱)╱ // 0x3f @0x3f
0x0000…004f at0040 = ╱ec╱,╱ // 0x40 @0x40
0x0000…004f at0041 = ╱41╱A╱ // 0x41 @0x41
0x0000…004f at0042 = ╱39╱9╱ // 0x42 @0x42
0x0000…004f at0043 = ╱ef╱$╱ // 0x43 @0x43
0x0000…004f at0044 = ╱ed╱(╱ // 0x44 @0x44
0x0000…004f at0045 = ╱45╱E╱ // 0x45 @0x45
0x0000…004f at0046 = ╱ee╱)╱ // 0x46 @0x46
0x0000…004f at0047 = ╱ec╱,╱ // 0x47 @0x47
0x0000…004f at0048 = ╱42╱B╱ // 0x48 @0x48
0x0000…004f at0049 = ╱30╱0╱ // 0x49 @0x49
0x0000…004f at004a = ╱ef╱$╱ // 0x4a @0x4a
0x0000…004f at004b = ╱ed╱(╱ // 0x4b @0x4b
0x0000…004f at004c = ╱45╱E╱ // 0x4c @0x4c
0x0000…004f at004d = ╱ee╱)╱ // 0x4d @0x4d
0x0000…004f at004e = EOL // 0x4e @0x4e
0x0000…004f }
0x004f…00bf 8e16 0120 DIM RES$(15),OP1$(12),OP2$(12),B1$(12),B2$(12),B3$(12),B4$(12),B5$(12)
0x004f…00bf LineComalBin {
0x004f…00bf ptr = 0x8e16 // 0x4f @0x0
0x004f…00bf lno = 0x0078 // 0x51 @0x2
0x004f…00bf at0004 = ╱87╱ DIM ╱ // 0x53 @0x4
0x004f…00bf at0005 = ╱52╱R╱ // 0x54 @0x5
0x004f…00bf at0006 = ╱45╱E╱ // 0x55 @0x6
0x004f…00bf at0007 = ╱53╱S╱ // 0x56 @0x7
0x004f…00bf at0008 = ╱ef╱$╱ // 0x57 @0x8
0x004f…00bf at0009 = ╱ed╱(╱ // 0x58 @0x9
0x004f…00bf at000a = ╱31╱1╱ // 0x59 @0xa
0x004f…00bf at000b = ╱35╱5╱ // 0x5a @0xb
0x004f…00bf at000c = ╱fe0000f004╱ // 0x5b @0xc
0x004f…00bf at0011 = ╱ee╱)╱ // 0x60 @0x11
0x004f…00bf at0012 = ╱ec╱,╱ // 0x61 @0x12
0x004f…00bf at0013 = ╱4f╱O╱ // 0x62 @0x13
0x004f…00bf at0014 = ╱50╱P╱ // 0x63 @0x14
0x004f…00bf at0015 = ╱31╱1╱ // 0x64 @0x15
0x004f…00bf at0016 = ╱ef╱$╱ // 0x65 @0x16
0x004f…00bf at0017 = ╱ed╱(╱ // 0x66 @0x17
0x004f…00bf at0018 = ╱31╱1╱ // 0x67 @0x18
0x004f…00bf at0019 = ╱32╱2╱ // 0x68 @0x19
0x004f…00bf at001a = ╱fe0000c004╱ // 0x69 @0x1a
0x004f…00bf at001f = ╱ee╱)╱ // 0x6e @0x1f
0x004f…00bf at0020 = ╱ec╱,╱ // 0x6f @0x20
0x004f…00bf at0021 = ╱4f╱O╱ // 0x70 @0x21
0x004f…00bf at0022 = ╱50╱P╱ // 0x71 @0x22
0x004f…00bf at0023 = ╱32╱2╱ // 0x72 @0x23
0x004f…00bf at0024 = ╱ef╱$╱ // 0x73 @0x24
0x004f…00bf at0025 = ╱ed╱(╱ // 0x74 @0x25
0x004f…00bf at0026 = ╱31╱1╱ // 0x75 @0x26
0x004f…00bf at0027 = ╱32╱2╱ // 0x76 @0x27
0x004f…00bf at0028 = ╱fe0000c004╱ // 0x77 @0x28
0x004f…00bf at002d = ╱ee╱)╱ // 0x7c @0x2d
0x004f…00bf at002e = ╱ec╱,╱ // 0x7d @0x2e
0x004f…00bf at002f = ╱42╱B╱ // 0x7e @0x2f
0x004f…00bf at0030 = ╱31╱1╱ // 0x7f @0x30
0x004f…00bf at0031 = ╱ef╱$╱ // 0x80 @0x31
0x004f…00bf at0032 = ╱ed╱(╱ // 0x81 @0x32
0x004f…00bf at0033 = ╱31╱1╱ // 0x82 @0x33
0x004f…00bf at0034 = ╱32╱2╱ // 0x83 @0x34
0x004f…00bf at0035 = ╱fe0000c004╱ // 0x84 @0x35
0x004f…00bf at003a = ╱ee╱)╱ // 0x89 @0x3a
0x004f…00bf at003b = ╱ec╱,╱ // 0x8a @0x3b
0x004f…00bf at003c = ╱42╱B╱ // 0x8b @0x3c
0x004f…00bf at003d = ╱32╱2╱ // 0x8c @0x3d
0x004f…00bf at003e = ╱ef╱$╱ // 0x8d @0x3e
0x004f…00bf at003f = ╱ed╱(╱ // 0x8e @0x3f
0x004f…00bf at0040 = ╱31╱1╱ // 0x8f @0x40
0x004f…00bf at0041 = ╱32╱2╱ // 0x90 @0x41
0x004f…00bf at0042 = ╱fe0000c004╱ // 0x91 @0x42
0x004f…00bf at0047 = ╱ee╱)╱ // 0x96 @0x47
0x004f…00bf at0048 = ╱ec╱,╱ // 0x97 @0x48
0x004f…00bf at0049 = ╱42╱B╱ // 0x98 @0x49
0x004f…00bf at004a = ╱33╱3╱ // 0x99 @0x4a
0x004f…00bf at004b = ╱ef╱$╱ // 0x9a @0x4b
0x004f…00bf at004c = ╱ed╱(╱ // 0x9b @0x4c
0x004f…00bf at004d = ╱31╱1╱ // 0x9c @0x4d
0x004f…00bf at004e = ╱32╱2╱ // 0x9d @0x4e
0x004f…00bf at004f = ╱fe0000c004╱ // 0x9e @0x4f
0x004f…00bf at0054 = ╱ee╱)╱ // 0xa3 @0x54
0x004f…00bf at0055 = ╱ec╱,╱ // 0xa4 @0x55
0x004f…00bf at0056 = ╱42╱B╱ // 0xa5 @0x56
0x004f…00bf at0057 = ╱34╱4╱ // 0xa6 @0x57
0x004f…00bf at0058 = ╱ef╱$╱ // 0xa7 @0x58
0x004f…00bf at0059 = ╱ed╱(╱ // 0xa8 @0x59
0x004f…00bf at005a = ╱31╱1╱ // 0xa9 @0x5a
0x004f…00bf at005b = ╱32╱2╱ // 0xaa @0x5b
0x004f…00bf at005c = ╱fe0000c004╱ // 0xab @0x5c
0x004f…00bf at0061 = ╱ee╱)╱ // 0xb0 @0x61
0x004f…00bf at0062 = ╱ec╱,╱ // 0xb1 @0x62
0x004f…00bf at0063 = ╱42╱B╱ // 0xb2 @0x63
0x004f…00bf at0064 = ╱35╱5╱ // 0xb3 @0x64
0x004f…00bf at0065 = ╱ef╱$╱ // 0xb4 @0x65
0x004f…00bf at0066 = ╱ed╱(╱ // 0xb5 @0x66
0x004f…00bf at0067 = ╱31╱1╱ // 0xb6 @0x67
0x004f…00bf at0068 = ╱32╱2╱ // 0xb7 @0x68
0x004f…00bf at0069 = ╱fe0000c004╱ // 0xb8 @0x69
0x004f…00bf at006e = ╱ee╱)╱ // 0xbd @0x6e
0x004f…00bf at006f = EOL // 0xbe @0x6f
0x004f…00bf }
0x00bf…013a 8e91 0130 DIM B6$(50),B7(10),B8$(10,37),B9$(8,11),C0$(12),C1$(12),C2$(12),C3$(12)
0x00bf…013a LineComalBin {
0x00bf…013a ptr = 0x8e91 // 0xbf @0x0
0x00bf…013a lno = 0x0082 // 0xc1 @0x2
0x00bf…013a at0004 = ╱87╱ DIM ╱ // 0xc3 @0x4
0x00bf…013a at0005 = ╱42╱B╱ // 0xc4 @0x5
0x00bf…013a at0006 = ╱36╱6╱ // 0xc5 @0x6
0x00bf…013a at0007 = ╱ef╱$╱ // 0xc6 @0x7
0x00bf…013a at0008 = ╱ed╱(╱ // 0xc7 @0x8
0x00bf…013a at0009 = ╱35╱5╱ // 0xc8 @0x9
0x00bf…013a at000a = ╱30╱0╱ // 0xc9 @0xa
0x00bf…013a at000b = ╱fe0000c806╱ // 0xca @0xb
0x00bf…013a at0010 = ╱ee╱)╱ // 0xcf @0x10
0x00bf…013a at0011 = ╱ec╱,╱ // 0xd0 @0x11
0x00bf…013a at0012 = ╱42╱B╱ // 0xd1 @0x12
0x00bf…013a at0013 = ╱37╱7╱ // 0xd2 @0x13
0x00bf…013a at0014 = ╱ed╱(╱ // 0xd3 @0x14
0x00bf…013a at0015 = ╱31╱1╱ // 0xd4 @0x15
0x00bf…013a at0016 = ╱30╱0╱ // 0xd5 @0x16
0x00bf…013a at0017 = ╱fe0000a004╱ // 0xd6 @0x17
0x00bf…013a at001c = ╱ee╱)╱ // 0xdb @0x1c
0x00bf…013a at001d = ╱ec╱,╱ // 0xdc @0x1d
0x00bf…013a at001e = ╱42╱B╱ // 0xdd @0x1e
0x00bf…013a at001f = ╱38╱8╱ // 0xde @0x1f
0x00bf…013a at0020 = ╱ef╱$╱ // 0xdf @0x20
0x00bf…013a at0021 = ╱ed╱(╱ // 0xe0 @0x21
0x00bf…013a at0022 = ╱31╱1╱ // 0xe1 @0x22
0x00bf…013a at0023 = ╱30╱0╱ // 0xe2 @0x23
0x00bf…013a at0024 = ╱fe0000a004╱ // 0xe3 @0x24
0x00bf…013a at0029 = ╱ec╱,╱ // 0xe8 @0x29
0x00bf…013a at002a = ╱33╱3╱ // 0xe9 @0x2a
0x00bf…013a at002b = ╱37╱7╱ // 0xea @0x2b
0x00bf…013a at002c = ╱fe00009406╱ // 0xeb @0x2c
0x00bf…013a at0031 = ╱ee╱)╱ // 0xf0 @0x31
0x00bf…013a at0032 = ╱ec╱,╱ // 0xf1 @0x32
0x00bf…013a at0033 = ╱42╱B╱ // 0xf2 @0x33
0x00bf…013a at0034 = ╱39╱9╱ // 0xf3 @0x34
0x00bf…013a at0035 = ╱ef╱$╱ // 0xf4 @0x35
0x00bf…013a at0036 = ╱ed╱(╱ // 0xf5 @0x36
0x00bf…013a at0037 = ╱38╱8╱ // 0xf6 @0x37
0x00bf…013a at0038 = ╱fe00008004╱ // 0xf7 @0x38
0x00bf…013a at003d = ╱ec╱,╱ // 0xfc @0x3d
0x00bf…013a at003e = ╱31╱1╱ // 0xfd @0x3e
0x00bf…013a at003f = ╱31╱1╱ // 0xfe @0x3f
0x00bf…013a at0040 = ╱fe0000b004╱ // 0xff @0x40
0x00bf…013a at0045 = ╱ee╱)╱ // 0x104 @0x45
0x00bf…013a at0046 = ╱ec╱,╱ // 0x105 @0x46
0x00bf…013a at0047 = ╱43╱C╱ // 0x106 @0x47
0x00bf…013a at0048 = ╱30╱0╱ // 0x107 @0x48
0x00bf…013a at0049 = ╱ef╱$╱ // 0x108 @0x49
0x00bf…013a at004a = ╱ed╱(╱ // 0x109 @0x4a
0x00bf…013a at004b = ╱31╱1╱ // 0x10a @0x4b
0x00bf…013a at004c = ╱32╱2╱ // 0x10b @0x4c
0x00bf…013a at004d = ╱fe0000c004╱ // 0x10c @0x4d
0x00bf…013a at0052 = ╱ee╱)╱ // 0x111 @0x52
0x00bf…013a at0053 = ╱ec╱,╱ // 0x112 @0x53
0x00bf…013a at0054 = ╱43╱C╱ // 0x113 @0x54
0x00bf…013a at0055 = ╱31╱1╱ // 0x114 @0x55
0x00bf…013a at0056 = ╱ef╱$╱ // 0x115 @0x56
0x00bf…013a at0057 = ╱ed╱(╱ // 0x116 @0x57
0x00bf…013a at0058 = ╱31╱1╱ // 0x117 @0x58
0x00bf…013a at0059 = ╱32╱2╱ // 0x118 @0x59
0x00bf…013a at005a = ╱fe0000c004╱ // 0x119 @0x5a
0x00bf…013a at005f = ╱ee╱)╱ // 0x11e @0x5f
0x00bf…013a at0060 = ╱ec╱,╱ // 0x11f @0x60
0x00bf…013a at0061 = ╱43╱C╱ // 0x120 @0x61
0x00bf…013a at0062 = ╱32╱2╱ // 0x121 @0x62
0x00bf…013a at0063 = ╱ef╱$╱ // 0x122 @0x63
0x00bf…013a at0064 = ╱ed╱(╱ // 0x123 @0x64
0x00bf…013a at0065 = ╱31╱1╱ // 0x124 @0x65
0x00bf…013a at0066 = ╱32╱2╱ // 0x125 @0x66
0x00bf…013a at0067 = ╱fe0000c004╱ // 0x126 @0x67
0x00bf…013a at006c = ╱ee╱)╱ // 0x12b @0x6c
0x00bf…013a at006d = ╱ec╱,╱ // 0x12c @0x6d
0x00bf…013a at006e = ╱43╱C╱ // 0x12d @0x6e
0x00bf…013a at006f = ╱33╱3╱ // 0x12e @0x6f
0x00bf…013a at0070 = ╱ef╱$╱ // 0x12f @0x70
0x00bf…013a at0071 = ╱ed╱(╱ // 0x130 @0x71
0x00bf…013a at0072 = ╱31╱1╱ // 0x131 @0x72
0x00bf…013a at0073 = ╱32╱2╱ // 0x132 @0x73
0x00bf…013a at0074 = ╱fe0000c004╱ // 0x133 @0x74
0x00bf…013a at0079 = ╱ee╱)╱ // 0x138 @0x79
0x00bf…013a at007a = EOL // 0x139 @0x7a
0x00bf…013a }
0x013a…01af 8f06 0140 DIM C4$(12),C5$(45,11),C6$(55),C7$(40),C8$(50),C9$(16),D0$(16),D1$(71)
0x013a…01af LineComalBin {
0x013a…01af ptr = 0x8f06 // 0x13a @0x0
0x013a…01af lno = 0x008c // 0x13c @0x2
0x013a…01af at0004 = ╱87╱ DIM ╱ // 0x13e @0x4
0x013a…01af at0005 = ╱43╱C╱ // 0x13f @0x5
0x013a…01af at0006 = ╱34╱4╱ // 0x140 @0x6
0x013a…01af at0007 = ╱ef╱$╱ // 0x141 @0x7
0x013a…01af at0008 = ╱ed╱(╱ // 0x142 @0x8
0x013a…01af at0009 = ╱31╱1╱ // 0x143 @0x9
0x013a…01af at000a = ╱32╱2╱ // 0x144 @0xa
0x013a…01af at000b = ╱fe0000c004╱ // 0x145 @0xb
0x013a…01af at0010 = ╱ee╱)╱ // 0x14a @0x10
0x013a…01af at0011 = ╱ec╱,╱ // 0x14b @0x11
0x013a…01af at0012 = ╱43╱C╱ // 0x14c @0x12
0x013a…01af at0013 = ╱35╱5╱ // 0x14d @0x13
0x013a…01af at0014 = ╱ef╱$╱ // 0x14e @0x14
0x013a…01af at0015 = ╱ed╱(╱ // 0x14f @0x15
0x013a…01af at0016 = ╱34╱4╱ // 0x150 @0x16
0x013a…01af at0017 = ╱35╱5╱ // 0x151 @0x17
0x013a…01af at0018 = ╱fe0000b406╱ // 0x152 @0x18
0x013a…01af at001d = ╱ec╱,╱ // 0x157 @0x1d
0x013a…01af at001e = ╱31╱1╱ // 0x158 @0x1e
0x013a…01af at001f = ╱31╱1╱ // 0x159 @0x1f
0x013a…01af at0020 = ╱fe0000b004╱ // 0x15a @0x20
0x013a…01af at0025 = ╱ee╱)╱ // 0x15f @0x25
0x013a…01af at0026 = ╱ec╱,╱ // 0x160 @0x26
0x013a…01af at0027 = ╱43╱C╱ // 0x161 @0x27
0x013a…01af at0028 = ╱36╱6╱ // 0x162 @0x28
0x013a…01af at0029 = ╱ef╱$╱ // 0x163 @0x29
0x013a…01af at002a = ╱ed╱(╱ // 0x164 @0x2a
0x013a…01af at002b = ╱35╱5╱ // 0x165 @0x2b
0x013a…01af at002c = ╱35╱5╱ // 0x166 @0x2c
0x013a…01af at002d = ╱fe0000dc06╱ // 0x167 @0x2d
0x013a…01af at0032 = ╱ee╱)╱ // 0x16c @0x32
0x013a…01af at0033 = ╱ec╱,╱ // 0x16d @0x33
0x013a…01af at0034 = ╱43╱C╱ // 0x16e @0x34
0x013a…01af at0035 = ╱37╱7╱ // 0x16f @0x35
0x013a…01af at0036 = ╱ef╱$╱ // 0x170 @0x36
0x013a…01af at0037 = ╱ed╱(╱ // 0x171 @0x37
0x013a…01af at0038 = ╱34╱4╱ // 0x172 @0x38
0x013a…01af at0039 = ╱30╱0╱ // 0x173 @0x39
0x013a…01af at003a = ╱fe0000a006╱ // 0x174 @0x3a
0x013a…01af at003f = ╱ee╱)╱ // 0x179 @0x3f
0x013a…01af at0040 = ╱ec╱,╱ // 0x17a @0x40
0x013a…01af at0041 = ╱43╱C╱ // 0x17b @0x41
0x013a…01af at0042 = ╱38╱8╱ // 0x17c @0x42
0x013a…01af at0043 = ╱ef╱$╱ // 0x17d @0x43
0x013a…01af at0044 = ╱ed╱(╱ // 0x17e @0x44
0x013a…01af at0045 = ╱35╱5╱ // 0x17f @0x45
0x013a…01af at0046 = ╱30╱0╱ // 0x180 @0x46
0x013a…01af at0047 = ╱fe0000c806╱ // 0x181 @0x47
0x013a…01af at004c = ╱ee╱)╱ // 0x186 @0x4c
0x013a…01af at004d = ╱ec╱,╱ // 0x187 @0x4d
0x013a…01af at004e = ╱43╱C╱ // 0x188 @0x4e
0x013a…01af at004f = ╱39╱9╱ // 0x189 @0x4f
0x013a…01af at0050 = ╱ef╱$╱ // 0x18a @0x50
0x013a…01af at0051 = ╱ed╱(╱ // 0x18b @0x51
0x013a…01af at0052 = ╱31╱1╱ // 0x18c @0x52
0x013a…01af at0053 = ╱36╱6╱ // 0x18d @0x53
0x013a…01af at0054 = ╱fe00008005╱ // 0x18e @0x54
0x013a…01af at0059 = ╱ee╱)╱ // 0x193 @0x59
0x013a…01af at005a = ╱ec╱,╱ // 0x194 @0x5a
0x013a…01af at005b = ╱44╱D╱ // 0x195 @0x5b
0x013a…01af at005c = ╱30╱0╱ // 0x196 @0x5c
0x013a…01af at005d = ╱ef╱$╱ // 0x197 @0x5d
0x013a…01af at005e = ╱ed╱(╱ // 0x198 @0x5e
0x013a…01af at005f = ╱31╱1╱ // 0x199 @0x5f
0x013a…01af at0060 = ╱36╱6╱ // 0x19a @0x60
0x013a…01af at0061 = ╱fe00008005╱ // 0x19b @0x61
0x013a…01af at0066 = ╱ee╱)╱ // 0x1a0 @0x66
0x013a…01af at0067 = ╱ec╱,╱ // 0x1a1 @0x67
0x013a…01af at0068 = ╱44╱D╱ // 0x1a2 @0x68
0x013a…01af at0069 = ╱31╱1╱ // 0x1a3 @0x69
0x013a…01af at006a = ╱ef╱$╱ // 0x1a4 @0x6a
0x013a…01af at006b = ╱ed╱(╱ // 0x1a5 @0x6b
0x013a…01af at006c = ╱37╱7╱ // 0x1a6 @0x6c
0x013a…01af at006d = ╱31╱1╱ // 0x1a7 @0x6d
0x013a…01af at006e = ╱fe00008e07╱ // 0x1a8 @0x6e
0x013a…01af at0073 = ╱ee╱)╱ // 0x1ad @0x73
0x013a…01af at0074 = EOL // 0x1ae @0x74
0x013a…01af }
0x01af…021c 8f73 0150 DIM D2$(27),D3$(55),D4$(34),D5$(29),D6$(37),D7$(16),D8$(16),D9$(16)
0x01af…021c LineComalBin {
0x01af…021c ptr = 0x8f73 // 0x1af @0x0
0x01af…021c lno = 0x0096 // 0x1b1 @0x2
0x01af…021c at0004 = ╱87╱ DIM ╱ // 0x1b3 @0x4
0x01af…021c at0005 = ╱44╱D╱ // 0x1b4 @0x5
0x01af…021c at0006 = ╱32╱2╱ // 0x1b5 @0x6
0x01af…021c at0007 = ╱ef╱$╱ // 0x1b6 @0x7
0x01af…021c at0008 = ╱ed╱(╱ // 0x1b7 @0x8
0x01af…021c at0009 = ╱32╱2╱ // 0x1b8 @0x9
0x01af…021c at000a = ╱37╱7╱ // 0x1b9 @0xa
0x01af…021c at000b = ╱fe0000d805╱ // 0x1ba @0xb
0x01af…021c at0010 = ╱ee╱)╱ // 0x1bf @0x10
0x01af…021c at0011 = ╱ec╱,╱ // 0x1c0 @0x11
0x01af…021c at0012 = ╱44╱D╱ // 0x1c1 @0x12
0x01af…021c at0013 = ╱33╱3╱ // 0x1c2 @0x13
0x01af…021c at0014 = ╱ef╱$╱ // 0x1c3 @0x14
0x01af…021c at0015 = ╱ed╱(╱ // 0x1c4 @0x15
0x01af…021c at0016 = ╱35╱5╱ // 0x1c5 @0x16
0x01af…021c at0017 = ╱35╱5╱ // 0x1c6 @0x17
0x01af…021c at0018 = ╱fe0000dc06╱ // 0x1c7 @0x18
0x01af…021c at001d = ╱ee╱)╱ // 0x1cc @0x1d
0x01af…021c at001e = ╱ec╱,╱ // 0x1cd @0x1e
0x01af…021c at001f = ╱44╱D╱ // 0x1ce @0x1f
0x01af…021c at0020 = ╱34╱4╱ // 0x1cf @0x20
0x01af…021c at0021 = ╱ef╱$╱ // 0x1d0 @0x21
0x01af…021c at0022 = ╱ed╱(╱ // 0x1d1 @0x22
0x01af…021c at0023 = ╱33╱3╱ // 0x1d2 @0x23
0x01af…021c at0024 = ╱34╱4╱ // 0x1d3 @0x24
0x01af…021c at0025 = ╱fe00008806╱ // 0x1d4 @0x25
0x01af…021c at002a = ╱ee╱)╱ // 0x1d9 @0x2a
0x01af…021c at002b = ╱ec╱,╱ // 0x1da @0x2b
0x01af…021c at002c = ╱44╱D╱ // 0x1db @0x2c
0x01af…021c at002d = ╱35╱5╱ // 0x1dc @0x2d
0x01af…021c at002e = ╱ef╱$╱ // 0x1dd @0x2e
0x01af…021c at002f = ╱ed╱(╱ // 0x1de @0x2f
0x01af…021c at0030 = ╱32╱2╱ // 0x1df @0x30
0x01af…021c at0031 = ╱39╱9╱ // 0x1e0 @0x31
0x01af…021c at0032 = ╱fe0000e805╱ // 0x1e1 @0x32
0x01af…021c at0037 = ╱ee╱)╱ // 0x1e6 @0x37
0x01af…021c at0038 = ╱ec╱,╱ // 0x1e7 @0x38
0x01af…021c at0039 = ╱44╱D╱ // 0x1e8 @0x39
0x01af…021c at003a = ╱36╱6╱ // 0x1e9 @0x3a
0x01af…021c at003b = ╱ef╱$╱ // 0x1ea @0x3b
0x01af…021c at003c = ╱ed╱(╱ // 0x1eb @0x3c
0x01af…021c at003d = ╱33╱3╱ // 0x1ec @0x3d
0x01af…021c at003e = ╱37╱7╱ // 0x1ed @0x3e
0x01af…021c at003f = ╱fe00009406╱ // 0x1ee @0x3f
0x01af…021c at0044 = ╱ee╱)╱ // 0x1f3 @0x44
0x01af…021c at0045 = ╱ec╱,╱ // 0x1f4 @0x45
0x01af…021c at0046 = ╱44╱D╱ // 0x1f5 @0x46
0x01af…021c at0047 = ╱37╱7╱ // 0x1f6 @0x47
0x01af…021c at0048 = ╱ef╱$╱ // 0x1f7 @0x48
0x01af…021c at0049 = ╱ed╱(╱ // 0x1f8 @0x49
0x01af…021c at004a = ╱31╱1╱ // 0x1f9 @0x4a
0x01af…021c at004b = ╱36╱6╱ // 0x1fa @0x4b
0x01af…021c at004c = ╱fe00008005╱ // 0x1fb @0x4c
0x01af…021c at0051 = ╱ee╱)╱ // 0x200 @0x51
0x01af…021c at0052 = ╱ec╱,╱ // 0x201 @0x52
0x01af…021c at0053 = ╱44╱D╱ // 0x202 @0x53
0x01af…021c at0054 = ╱38╱8╱ // 0x203 @0x54
0x01af…021c at0055 = ╱ef╱$╱ // 0x204 @0x55
0x01af…021c at0056 = ╱ed╱(╱ // 0x205 @0x56
0x01af…021c at0057 = ╱31╱1╱ // 0x206 @0x57
0x01af…021c at0058 = ╱36╱6╱ // 0x207 @0x58
0x01af…021c at0059 = ╱fe00008005╱ // 0x208 @0x59
0x01af…021c at005e = ╱ee╱)╱ // 0x20d @0x5e
0x01af…021c at005f = ╱ec╱,╱ // 0x20e @0x5f
0x01af…021c at0060 = ╱44╱D╱ // 0x20f @0x60
0x01af…021c at0061 = ╱39╱9╱ // 0x210 @0x61
0x01af…021c at0062 = ╱ef╱$╱ // 0x211 @0x62
0x01af…021c at0063 = ╱ed╱(╱ // 0x212 @0x63
0x01af…021c at0064 = ╱31╱1╱ // 0x213 @0x64
0x01af…021c at0065 = ╱36╱6╱ // 0x214 @0x65
0x01af…021c at0066 = ╱fe00008005╱ // 0x215 @0x66
0x01af…021c at006b = ╱ee╱)╱ // 0x21a @0x6b
0x01af…021c at006c = EOL // 0x21b @0x6c
0x01af…021c }
0x021c…026a 8fc1 0160 DIM E0$(16),E1$(16),E2$(16,12),E9$(79),F0$(79)
0x021c…026a LineComalBin {
0x021c…026a ptr = 0x8fc1 // 0x21c @0x0
0x021c…026a lno = 0x00a0 // 0x21e @0x2
0x021c…026a at0004 = ╱87╱ DIM ╱ // 0x220 @0x4
0x021c…026a at0005 = ╱45╱E╱ // 0x221 @0x5
0x021c…026a at0006 = ╱30╱0╱ // 0x222 @0x6
0x021c…026a at0007 = ╱ef╱$╱ // 0x223 @0x7
0x021c…026a at0008 = ╱ed╱(╱ // 0x224 @0x8
0x021c…026a at0009 = ╱31╱1╱ // 0x225 @0x9
0x021c…026a at000a = ╱36╱6╱ // 0x226 @0xa
0x021c…026a at000b = ╱fe00008005╱ // 0x227 @0xb
0x021c…026a at0010 = ╱ee╱)╱ // 0x22c @0x10
0x021c…026a at0011 = ╱ec╱,╱ // 0x22d @0x11
0x021c…026a at0012 = ╱45╱E╱ // 0x22e @0x12
0x021c…026a at0013 = ╱31╱1╱ // 0x22f @0x13
0x021c…026a at0014 = ╱ef╱$╱ // 0x230 @0x14
0x021c…026a at0015 = ╱ed╱(╱ // 0x231 @0x15
0x021c…026a at0016 = ╱31╱1╱ // 0x232 @0x16
0x021c…026a at0017 = ╱36╱6╱ // 0x233 @0x17
0x021c…026a at0018 = ╱fe00008005╱ // 0x234 @0x18
0x021c…026a at001d = ╱ee╱)╱ // 0x239 @0x1d
0x021c…026a at001e = ╱ec╱,╱ // 0x23a @0x1e
0x021c…026a at001f = ╱45╱E╱ // 0x23b @0x1f
0x021c…026a at0020 = ╱32╱2╱ // 0x23c @0x20
0x021c…026a at0021 = ╱ef╱$╱ // 0x23d @0x21
0x021c…026a at0022 = ╱ed╱(╱ // 0x23e @0x22
0x021c…026a at0023 = ╱31╱1╱ // 0x23f @0x23
0x021c…026a at0024 = ╱36╱6╱ // 0x240 @0x24
0x021c…026a at0025 = ╱fe00008005╱ // 0x241 @0x25
0x021c…026a at002a = ╱ec╱,╱ // 0x246 @0x2a
0x021c…026a at002b = ╱31╱1╱ // 0x247 @0x2b
0x021c…026a at002c = ╱32╱2╱ // 0x248 @0x2c
0x021c…026a at002d = ╱fe0000c004╱ // 0x249 @0x2d
0x021c…026a at0032 = ╱ee╱)╱ // 0x24e @0x32
0x021c…026a at0033 = ╱ec╱,╱ // 0x24f @0x33
0x021c…026a at0034 = ╱45╱E╱ // 0x250 @0x34
0x021c…026a at0035 = ╱39╱9╱ // 0x251 @0x35
0x021c…026a at0036 = ╱ef╱$╱ // 0x252 @0x36
0x021c…026a at0037 = ╱ed╱(╱ // 0x253 @0x37
0x021c…026a at0038 = ╱37╱7╱ // 0x254 @0x38
0x021c…026a at0039 = ╱39╱9╱ // 0x255 @0x39
0x021c…026a at003a = ╱fe00009e07╱ // 0x256 @0x3a
0x021c…026a at003f = ╱ee╱)╱ // 0x25b @0x3f
0x021c…026a at0040 = ╱ec╱,╱ // 0x25c @0x40
0x021c…026a at0041 = ╱46╱F╱ // 0x25d @0x41
0x021c…026a at0042 = ╱30╱0╱ // 0x25e @0x42
0x021c…026a at0043 = ╱ef╱$╱ // 0x25f @0x43
0x021c…026a at0044 = ╱ed╱(╱ // 0x260 @0x44
0x021c…026a at0045 = ╱37╱7╱ // 0x261 @0x45
0x021c…026a at0046 = ╱39╱9╱ // 0x262 @0x46
0x021c…026a at0047 = ╱fe00009e07╱ // 0x263 @0x47
0x021c…026a at004c = ╱ee╱)╱ // 0x268 @0x4c
0x021c…026a at004d = EOL // 0x269 @0x4d
0x021c…026a }
0x026a…02a3 8ffa 0162 DIM F1$(12),DD$(6),B61$(50),DAD$(6)
0x026a…02a3 LineComalBin {
0x026a…02a3 ptr = 0x8ffa // 0x26a @0x0
0x026a…02a3 lno = 0x00a2 // 0x26c @0x2
0x026a…02a3 at0004 = ╱87╱ DIM ╱ // 0x26e @0x4
0x026a…02a3 at0005 = ╱46╱F╱ // 0x26f @0x5
0x026a…02a3 at0006 = ╱31╱1╱ // 0x270 @0x6
0x026a…02a3 at0007 = ╱ef╱$╱ // 0x271 @0x7
0x026a…02a3 at0008 = ╱ed╱(╱ // 0x272 @0x8
0x026a…02a3 at0009 = ╱31╱1╱ // 0x273 @0x9
0x026a…02a3 at000a = ╱32╱2╱ // 0x274 @0xa
0x026a…02a3 at000b = ╱fe0000c004╱ // 0x275 @0xb
0x026a…02a3 at0010 = ╱ee╱)╱ // 0x27a @0x10
0x026a…02a3 at0011 = ╱ec╱,╱ // 0x27b @0x11
0x026a…02a3 at0012 = ╱44╱D╱ // 0x27c @0x12
0x026a…02a3 at0013 = ╱44╱D╱ // 0x27d @0x13
0x026a…02a3 at0014 = ╱ef╱$╱ // 0x27e @0x14
0x026a…02a3 at0015 = ╱ed╱(╱ // 0x27f @0x15
0x026a…02a3 at0016 = ╱36╱6╱ // 0x280 @0x16
0x026a…02a3 at0017 = ╱fe0000c003╱ // 0x281 @0x17
0x026a…02a3 at001c = ╱ee╱)╱ // 0x286 @0x1c
0x026a…02a3 at001d = ╱ec╱,╱ // 0x287 @0x1d
0x026a…02a3 at001e = ╱42╱B╱ // 0x288 @0x1e
0x026a…02a3 at001f = ╱36╱6╱ // 0x289 @0x1f
0x026a…02a3 at0020 = ╱31╱1╱ // 0x28a @0x20
0x026a…02a3 at0021 = ╱ef╱$╱ // 0x28b @0x21
0x026a…02a3 at0022 = ╱ed╱(╱ // 0x28c @0x22
0x026a…02a3 at0023 = ╱35╱5╱ // 0x28d @0x23
0x026a…02a3 at0024 = ╱30╱0╱ // 0x28e @0x24
0x026a…02a3 at0025 = ╱fe0000c806╱ // 0x28f @0x25
0x026a…02a3 at002a = ╱ee╱)╱ // 0x294 @0x2a
0x026a…02a3 at002b = ╱ec╱,╱ // 0x295 @0x2b
0x026a…02a3 at002c = ╱44╱D╱ // 0x296 @0x2c
0x026a…02a3 at002d = ╱41╱A╱ // 0x297 @0x2d
0x026a…02a3 at002e = ╱44╱D╱ // 0x298 @0x2e
0x026a…02a3 at002f = ╱ef╱$╱ // 0x299 @0x2f
0x026a…02a3 at0030 = ╱ed╱(╱ // 0x29a @0x30
0x026a…02a3 at0031 = ╱36╱6╱ // 0x29b @0x31
0x026a…02a3 at0032 = ╱fe0000c003╱ // 0x29c @0x32
0x026a…02a3 at0037 = ╱ee╱)╱ // 0x2a1 @0x37
0x026a…02a3 at0038 = EOL // 0x2a2 @0x38
0x026a…02a3 }
0x02a3…02c8 901f 0163 TI=10;EL=11;AZ=28
0x02a3…02c8 LineComalBin {
0x02a3…02c8 ptr = 0x901f // 0x2a3 @0x0
0x02a3…02c8 lno = 0x00a3 // 0x2a5 @0x2
0x02a3…02c8 at0004 = ╱54╱T╱ // 0x2a7 @0x4
0x02a3…02c8 at0005 = ╱49╱I╱ // 0x2a8 @0x5
0x02a3…02c8 at0006 = ╱dc╱=╱ // 0x2a9 @0x6
0x02a3…02c8 at0007 = ╱31╱1╱ // 0x2aa @0x7
0x02a3…02c8 at0008 = ╱30╱0╱ // 0x2ab @0x8
0x02a3…02c8 at0009 = ╱fe0000a004╱ // 0x2ac @0x9
0x02a3…02c8 at000e = ╱eb╱;╱ // 0x2b1 @0xe
0x02a3…02c8 at000f = ╱45╱E╱ // 0x2b2 @0xf
0x02a3…02c8 at0010 = ╱4c╱L╱ // 0x2b3 @0x10
0x02a3…02c8 at0011 = ╱dc╱=╱ // 0x2b4 @0x11
0x02a3…02c8 at0012 = ╱31╱1╱ // 0x2b5 @0x12
0x02a3…02c8 at0013 = ╱31╱1╱ // 0x2b6 @0x13
0x02a3…02c8 at0014 = ╱fe0000b004╱ // 0x2b7 @0x14
0x02a3…02c8 at0019 = ╱eb╱;╱ // 0x2bc @0x19
0x02a3…02c8 at001a = ╱41╱A╱ // 0x2bd @0x1a
0x02a3…02c8 at001b = ╱5a╱Z╱ // 0x2be @0x1b
0x02a3…02c8 at001c = ╱dc╱=╱ // 0x2bf @0x1c
0x02a3…02c8 at001d = ╱32╱2╱ // 0x2c0 @0x1d
0x02a3…02c8 at001e = ╱38╱8╱ // 0x2c1 @0x1e
0x02a3…02c8 at001f = ╱fe0000e005╱ // 0x2c2 @0x1f
0x02a3…02c8 at0024 = EOL // 0x2c7 @0x24
0x02a3…02c8 }
0x02c8…02f9 9050 0170 B3$=" 0+";B5$="6,00+";B4$="100,00+"
0x02c8…02f9 LineComalBin {
0x02c8…02f9 ptr = 0x9050 // 0x2c8 @0x0
0x02c8…02f9 lno = 0x00aa // 0x2ca @0x2
0x02c8…02f9 at0004 = ╱42╱B╱ // 0x2cc @0x4
0x02c8…02f9 at0005 = ╱33╱3╱ // 0x2cd @0x5
0x02c8…02f9 at0006 = ╱ef╱$╱ // 0x2ce @0x6
0x02c8…02f9 at0007 = ╱dc╱=╱ // 0x2cf @0x7
0x02c8…02f9 at0008 = ╱22╱"╱ // 0x2d0 @0x8
0x02c8…02f9 at0009 = ╱20╱…╱ // 0x2d1 @0x9
0x02c8…02f9 at000a = ╱20╱…╱ // 0x2d2 @0xa
0x02c8…02f9 at000b = ╱20╱…╱ // 0x2d3 @0xb
0x02c8…02f9 at000c = ╱20╱…╱ // 0x2d4 @0xc
0x02c8…02f9 at000d = ╱20╱…╱ // 0x2d5 @0xd
0x02c8…02f9 at000e = ╱20╱…╱ // 0x2d6 @0xe
0x02c8…02f9 at000f = ╱20╱…╱ // 0x2d7 @0xf
0x02c8…02f9 at0010 = ╱20╱…╱ // 0x2d8 @0x10
0x02c8…02f9 at0011 = ╱20╱…╱ // 0x2d9 @0x11
0x02c8…02f9 at0012 = ╱20╱…╱ // 0x2da @0x12
0x02c8…02f9 at0013 = ╱30╱0╱ // 0x2db @0x13
0x02c8…02f9 at0014 = ╱2b╱+╱ // 0x2dc @0x14
0x02c8…02f9 at0015 = ╱22╱"╱ // 0x2dd @0x15
0x02c8…02f9 at0016 = ╱eb╱;╱ // 0x2de @0x16
0x02c8…02f9 at0017 = ╱42╱B╱ // 0x2df @0x17
0x02c8…02f9 at0018 = ╱35╱5╱ // 0x2e0 @0x18
0x02c8…02f9 at0019 = ╱ef╱$╱ // 0x2e1 @0x19
0x02c8…02f9 at001a = ╱dc╱=╱ // 0x2e2 @0x1a
0x02c8…02f9 at001b = ╱22╱"╱ // 0x2e3 @0x1b
0x02c8…02f9 at001c = ╱36╱6╱ // 0x2e4 @0x1c
0x02c8…02f9 at001d = ╱2c╱,╱ // 0x2e5 @0x1d
0x02c8…02f9 at001e = ╱30╱0╱ // 0x2e6 @0x1e
0x02c8…02f9 at001f = ╱30╱0╱ // 0x2e7 @0x1f
0x02c8…02f9 at0020 = ╱2b╱+╱ // 0x2e8 @0x20
0x02c8…02f9 at0021 = ╱22╱"╱ // 0x2e9 @0x21
0x02c8…02f9 at0022 = ╱eb╱;╱ // 0x2ea @0x22
0x02c8…02f9 at0023 = ╱42╱B╱ // 0x2eb @0x23
0x02c8…02f9 at0024 = ╱34╱4╱ // 0x2ec @0x24
0x02c8…02f9 at0025 = ╱ef╱$╱ // 0x2ed @0x25
0x02c8…02f9 at0026 = ╱dc╱=╱ // 0x2ee @0x26
0x02c8…02f9 at0027 = ╱22╱"╱ // 0x2ef @0x27
0x02c8…02f9 at0028 = ╱31╱1╱ // 0x2f0 @0x28
0x02c8…02f9 at0029 = ╱30╱0╱ // 0x2f1 @0x29
0x02c8…02f9 at002a = ╱30╱0╱ // 0x2f2 @0x2a
0x02c8…02f9 at002b = ╱2c╱,╱ // 0x2f3 @0x2b
0x02c8…02f9 at002c = ╱30╱0╱ // 0x2f4 @0x2c
0x02c8…02f9 at002d = ╱30╱0╱ // 0x2f5 @0x2d
0x02c8…02f9 at002e = ╱2b╱+╱ // 0x2f6 @0x2e
0x02c8…02f9 at002f = ╱22╱"╱ // 0x2f7 @0x2f
0x02c8…02f9 at0030 = EOL // 0x2f8 @0x30
0x02c8…02f9 }
0x02f9…030a 9061 0171 FOR I=E TO 16
0x02f9…030a LineComalBin {
0x02f9…030a ptr = 0x9061 // 0x2f9 @0x0
0x02f9…030a lno = 0x00ab // 0x2fb @0x2
0x02f9…030a at0004 = ╱83╱ FOR ╱ // 0x2fd @0x4
0x02f9…030a at0005 = ╱49╱I╱ // 0x2fe @0x5
0x02f9…030a at0006 = ╱dc╱=╱ // 0x2ff @0x6
0x02f9…030a at0007 = ╱45╱E╱ // 0x300 @0x7
0x02f9…030a at0008 = ╱b7╱ TO ╱ // 0x301 @0x8
0x02f9…030a at0009 = ╱31╱1╱ // 0x302 @0x9
0x02f9…030a at000a = ╱36╱6╱ // 0x303 @0xa
0x02f9…030a at000b = ╱fe00008005╱ // 0x304 @0xb
0x02f9…030a at0010 = EOL // 0x309 @0x10
0x02f9…030a }
0x030a…0319 9070 0172 E2$(I)=B3$
0x030a…0319 LineComalBin {
0x030a…0319 ptr = 0x9070 // 0x30a @0x0
0x030a…0319 lno = 0x00ac // 0x30c @0x2
0x030a…0319 at0004 = ╱45╱E╱ // 0x30e @0x4
0x030a…0319 at0005 = ╱32╱2╱ // 0x30f @0x5
0x030a…0319 at0006 = ╱ef╱$╱ // 0x310 @0x6
0x030a…0319 at0007 = ╱ed╱(╱ // 0x311 @0x7
0x030a…0319 at0008 = ╱49╱I╱ // 0x312 @0x8
0x030a…0319 at0009 = ╱ee╱)╱ // 0x313 @0x9
0x030a…0319 at000a = ╱dc╱=╱ // 0x314 @0xa
0x030a…0319 at000b = ╱42╱B╱ // 0x315 @0xb
0x030a…0319 at000c = ╱33╱3╱ // 0x316 @0xc
0x030a…0319 at000d = ╱ef╱$╱ // 0x317 @0xd
0x030a…0319 at000e = EOL // 0x318 @0xe
0x030a…0319 }
0x0319…0320 9077 0173 NEXT I
0x0319…0320 LineComalBin {
0x0319…0320 ptr = 0x9077 // 0x319 @0x0
0x0319…0320 lno = 0x00ad // 0x31b @0x2
0x0319…0320 at0004 = ╱84╱ NEXT ╱ // 0x31d @0x4
0x0319…0320 at0005 = ╱49╱I╱ // 0x31e @0x5
0x0319…0320 at0006 = EOL // 0x31f @0x6
0x0319…0320 }
0x0320…033b 9092 0200 A6(E),A6(G),E3,E4,E5=B
0x0320…033b LineComalBin {
0x0320…033b ptr = 0x9092 // 0x320 @0x0
0x0320…033b lno = 0x00c8 // 0x322 @0x2
0x0320…033b at0004 = ╱41╱A╱ // 0x324 @0x4
0x0320…033b at0005 = ╱36╱6╱ // 0x325 @0x5
0x0320…033b at0006 = ╱ed╱(╱ // 0x326 @0x6
0x0320…033b at0007 = ╱45╱E╱ // 0x327 @0x7
0x0320…033b at0008 = ╱ee╱)╱ // 0x328 @0x8
0x0320…033b at0009 = ╱ec╱,╱ // 0x329 @0x9
0x0320…033b at000a = ╱41╱A╱ // 0x32a @0xa
0x0320…033b at000b = ╱36╱6╱ // 0x32b @0xb
0x0320…033b at000c = ╱ed╱(╱ // 0x32c @0xc
0x0320…033b at000d = ╱47╱G╱ // 0x32d @0xd
0x0320…033b at000e = ╱ee╱)╱ // 0x32e @0xe
0x0320…033b at000f = ╱ec╱,╱ // 0x32f @0xf
0x0320…033b at0010 = ╱45╱E╱ // 0x330 @0x10
0x0320…033b at0011 = ╱33╱3╱ // 0x331 @0x11
0x0320…033b at0012 = ╱ec╱,╱ // 0x332 @0x12
0x0320…033b at0013 = ╱45╱E╱ // 0x333 @0x13
0x0320…033b at0014 = ╱34╱4╱ // 0x334 @0x14
0x0320…033b at0015 = ╱ec╱,╱ // 0x335 @0x15
0x0320…033b at0016 = ╱45╱E╱ // 0x336 @0x16
0x0320…033b at0017 = ╱35╱5╱ // 0x337 @0x17
0x0320…033b at0018 = ╱dc╱=╱ // 0x338 @0x18
0x0320…033b at0019 = ╱42╱B╱ // 0x339 @0x19
0x0320…033b at001a = EOL // 0x33a @0x1a
0x0320…033b }
0x033b…034c 90a3 0230 FOR I=E TO 79
0x033b…034c LineComalBin {
0x033b…034c ptr = 0x90a3 // 0x33b @0x0
0x033b…034c lno = 0x00e6 // 0x33d @0x2
0x033b…034c at0004 = ╱83╱ FOR ╱ // 0x33f @0x4
0x033b…034c at0005 = ╱49╱I╱ // 0x340 @0x5
0x033b…034c at0006 = ╱dc╱=╱ // 0x341 @0x6
0x033b…034c at0007 = ╱45╱E╱ // 0x342 @0x7
0x033b…034c at0008 = ╱b7╱ TO ╱ // 0x343 @0x8
0x033b…034c at0009 = ╱37╱7╱ // 0x344 @0x9
0x033b…034c at000a = ╱39╱9╱ // 0x345 @0xa
0x033b…034c at000b = ╱fe00009e07╱ // 0x346 @0xb
0x033b…034c at0010 = EOL // 0x34b @0x10
0x033b…034c }
0x034c…035c 90b3 0240 E9$=E9$+" "
0x034c…035c LineComalBin {
0x034c…035c ptr = 0x90b3 // 0x34c @0x0
0x034c…035c lno = 0x00f0 // 0x34e @0x2
0x034c…035c at0004 = ╱45╱E╱ // 0x350 @0x4
0x034c…035c at0005 = ╱39╱9╱ // 0x351 @0x5
0x034c…035c at0006 = ╱ef╱$╱ // 0x352 @0x6
0x034c…035c at0007 = ╱dc╱=╱ // 0x353 @0x7
0x034c…035c at0008 = ╱45╱E╱ // 0x354 @0x8
0x034c…035c at0009 = ╱39╱9╱ // 0x355 @0x9
0x034c…035c at000a = ╱ef╱$╱ // 0x356 @0xa
0x034c…035c at000b = ╱f1╱+╱ // 0x357 @0xb
0x034c…035c at000c = ╱22╱"╱ // 0x358 @0xc
0x034c…035c at000d = ╱20╱…╱ // 0x359 @0xd
0x034c…035c at000e = ╱22╱"╱ // 0x35a @0xe
0x034c…035c at000f = EOL // 0x35b @0xf
0x034c…035c }
0x035c…0363 90ba 0250 NEXT I
0x035c…0363 LineComalBin {
0x035c…0363 ptr = 0x90ba // 0x35c @0x0
0x035c…0363 lno = 0x00fa // 0x35e @0x2
0x035c…0363 at0004 = ╱84╱ NEXT ╱ // 0x360 @0x4
0x035c…0363 at0005 = ╱49╱I╱ // 0x361 @0x5
0x035c…0363 at0006 = EOL // 0x362 @0x6
0x035c…0363 }
0x0363…0377 90ce 0370 PROC C(F2,F3,F4,F5)
0x0363…0377 LineComalBin {
0x0363…0377 ptr = 0x90ce // 0x363 @0x0
0x0363…0377 lno = 0x0172 // 0x365 @0x2
0x0363…0377 at0004 = ╱9e╱ PROC ╱ // 0x367 @0x4
0x0363…0377 at0005 = ╱43╱C╱ // 0x368 @0x5
0x0363…0377 at0006 = ╱ed╱(╱ // 0x369 @0x6
0x0363…0377 at0007 = ╱46╱F╱ // 0x36a @0x7
0x0363…0377 at0008 = ╱32╱2╱ // 0x36b @0x8
0x0363…0377 at0009 = ╱ec╱,╱ // 0x36c @0x9
0x0363…0377 at000a = ╱46╱F╱ // 0x36d @0xa
0x0363…0377 at000b = ╱33╱3╱ // 0x36e @0xb
0x0363…0377 at000c = ╱ec╱,╱ // 0x36f @0xc
0x0363…0377 at000d = ╱46╱F╱ // 0x370 @0xd
0x0363…0377 at000e = ╱34╱4╱ // 0x371 @0xe
0x0363…0377 at000f = ╱ec╱,╱ // 0x372 @0xf
0x0363…0377 at0010 = ╱46╱F╱ // 0x373 @0x10
0x0363…0377 at0011 = ╱35╱5╱ // 0x374 @0x11
0x0363…0377 at0012 = ╱ee╱)╱ // 0x375 @0x12
0x0363…0377 at0013 = EOL // 0x376 @0x13
0x0363…0377 }
0x0377…03bc 9113 0380 RES$=F5$;OP1$=F3$;OP2$=F4$;SI=B;FLAG=B;ART=F2-6*(F2>5)
0x0377…03bc LineComalBin {
0x0377…03bc ptr = 0x9113 // 0x377 @0x0
0x0377…03bc lno = 0x017c // 0x379 @0x2
0x0377…03bc at0004 = ╱52╱R╱ // 0x37b @0x4
0x0377…03bc at0005 = ╱45╱E╱ // 0x37c @0x5
0x0377…03bc at0006 = ╱53╱S╱ // 0x37d @0x6
0x0377…03bc at0007 = ╱ef╱$╱ // 0x37e @0x7
0x0377…03bc at0008 = ╱dc╱=╱ // 0x37f @0x8
0x0377…03bc at0009 = ╱46╱F╱ // 0x380 @0x9
0x0377…03bc at000a = ╱35╱5╱ // 0x381 @0xa
0x0377…03bc at000b = ╱ef╱$╱ // 0x382 @0xb
0x0377…03bc at000c = ╱eb╱;╱ // 0x383 @0xc
0x0377…03bc at000d = ╱4f╱O╱ // 0x384 @0xd
0x0377…03bc at000e = ╱50╱P╱ // 0x385 @0xe
0x0377…03bc at000f = ╱31╱1╱ // 0x386 @0xf
0x0377…03bc at0010 = ╱ef╱$╱ // 0x387 @0x10
0x0377…03bc at0011 = ╱dc╱=╱ // 0x388 @0x11
0x0377…03bc at0012 = ╱46╱F╱ // 0x389 @0x12
0x0377…03bc at0013 = ╱33╱3╱ // 0x38a @0x13
0x0377…03bc at0014 = ╱ef╱$╱ // 0x38b @0x14
0x0377…03bc at0015 = ╱eb╱;╱ // 0x38c @0x15
0x0377…03bc at0016 = ╱4f╱O╱ // 0x38d @0x16
0x0377…03bc at0017 = ╱50╱P╱ // 0x38e @0x17
0x0377…03bc at0018 = ╱32╱2╱ // 0x38f @0x18
0x0377…03bc at0019 = ╱ef╱$╱ // 0x390 @0x19
0x0377…03bc at001a = ╱dc╱=╱ // 0x391 @0x1a
0x0377…03bc at001b = ╱46╱F╱ // 0x392 @0x1b
0x0377…03bc at001c = ╱34╱4╱ // 0x393 @0x1c
0x0377…03bc at001d = ╱ef╱$╱ // 0x394 @0x1d
0x0377…03bc at001e = ╱eb╱;╱ // 0x395 @0x1e
0x0377…03bc at001f = ╱53╱S╱ // 0x396 @0x1f
0x0377…03bc at0020 = ╱49╱I╱ // 0x397 @0x20
0x0377…03bc at0021 = ╱dc╱=╱ // 0x398 @0x21
0x0377…03bc at0022 = ╱42╱B╱ // 0x399 @0x22
0x0377…03bc at0023 = ╱eb╱;╱ // 0x39a @0x23
0x0377…03bc at0024 = ╱46╱F╱ // 0x39b @0x24
0x0377…03bc at0025 = ╱4c╱L╱ // 0x39c @0x25
0x0377…03bc at0026 = ╱41╱A╱ // 0x39d @0x26
0x0377…03bc at0027 = ╱47╱G╱ // 0x39e @0x27
0x0377…03bc at0028 = ╱dc╱=╱ // 0x39f @0x28
0x0377…03bc at0029 = ╱42╱B╱ // 0x3a0 @0x29
0x0377…03bc at002a = ╱eb╱;╱ // 0x3a1 @0x2a
0x0377…03bc at002b = ╱41╱A╱ // 0x3a2 @0x2b
0x0377…03bc at002c = ╱52╱R╱ // 0x3a3 @0x2c
0x0377…03bc at002d = ╱54╱T╱ // 0x3a4 @0x2d
0x0377…03bc at002e = ╱dc╱=╱ // 0x3a5 @0x2e
0x0377…03bc at002f = ╱46╱F╱ // 0x3a6 @0x2f
0x0377…03bc at0030 = ╱32╱2╱ // 0x3a7 @0x30
0x0377…03bc at0031 = ╱e3╱-╱ // 0x3a8 @0x31
0x0377…03bc at0032 = ╱36╱6╱ // 0x3a9 @0x32
0x0377…03bc at0033 = ╱fe0000c003╱ // 0x3aa @0x33
0x0377…03bc at0038 = ╱e4╱*╱ // 0x3af @0x38
0x0377…03bc at0039 = ╱ed╱(╱ // 0x3b0 @0x39
0x0377…03bc at003a = ╱46╱F╱ // 0x3b1 @0x3a
0x0377…03bc at003b = ╱32╱2╱ // 0x3b2 @0x3b
0x0377…03bc at003c = ╱de╱>╱ // 0x3b3 @0x3c
0x0377…03bc at003d = ╱35╱5╱ // 0x3b4 @0x3d
0x0377…03bc at003e = ╱fe0000a003╱ // 0x3b5 @0x3e
0x0377…03bc at0043 = ╱ee╱)╱ // 0x3ba @0x43
0x0377…03bc at0044 = EOL // 0x3bb @0x44
0x0377…03bc }
0x03bc…03d2 9129 0390 CALL "P641210:REGN"
0x03bc…03d2 LineComalBin {
0x03bc…03d2 ptr = 0x9129 // 0x3bc @0x0
0x03bc…03d2 lno = 0x0186 // 0x3be @0x2
0x03bc…03d2 at0004 = ╱adff46╱ CALL ╱ // 0x3c0 @0x4
0x03bc…03d2 at0007 = ╱22╱"╱ // 0x3c3 @0x7
0x03bc…03d2 at0008 = ╱50╱P╱ // 0x3c4 @0x8
0x03bc…03d2 at0009 = ╱36╱6╱ // 0x3c5 @0x9
0x03bc…03d2 at000a = ╱34╱4╱ // 0x3c6 @0xa
0x03bc…03d2 at000b = ╱31╱1╱ // 0x3c7 @0xb
0x03bc…03d2 at000c = ╱32╱2╱ // 0x3c8 @0xc
0x03bc…03d2 at000d = ╱31╱1╱ // 0x3c9 @0xd
0x03bc…03d2 at000e = ╱30╱0╱ // 0x3ca @0xe
0x03bc…03d2 at000f = ╱3a╱:╱ // 0x3cb @0xf
0x03bc…03d2 at0010 = ╱52╱R╱ // 0x3cc @0x10
0x03bc…03d2 at0011 = ╱45╱E╱ // 0x3cd @0x11
0x03bc…03d2 at0012 = ╱47╱G╱ // 0x3ce @0x12
0x03bc…03d2 at0013 = ╱4e╱N╱ // 0x3cf @0x13
0x03bc…03d2 at0014 = ╱22╱"╱ // 0x3d0 @0x14
0x03bc…03d2 at0015 = EOL // 0x3d1 @0x15
0x03bc…03d2 }
0x03d2…03e8 913f 0400 IF F2<6 AND FLAG THEN STOP
0x03d2…03e8 LineComalBin {
0x03d2…03e8 ptr = 0x913f // 0x3d2 @0x0
0x03d2…03e8 lno = 0x0190 // 0x3d4 @0x2
0x03d2…03e8 at0004 = ╱82╱ IF ╱ // 0x3d6 @0x4
0x03d2…03e8 at0005 = ╱46╱F╱ // 0x3d7 @0x5
0x03d2…03e8 at0006 = ╱32╱2╱ // 0x3d8 @0x6
0x03d2…03e8 at0007 = ╱dd╱<╱ // 0x3d9 @0x7
0x03d2…03e8 at0008 = ╱36╱6╱ // 0x3da @0x8
0x03d2…03e8 at0009 = ╱fe0000c003╱ // 0x3db @0x9
0x03d2…03e8 at000e = ╱da╱ AND ╱ // 0x3e0 @0xe
0x03d2…03e8 at000f = ╱46╱F╱ // 0x3e1 @0xf
0x03d2…03e8 at0010 = ╱4c╱L╱ // 0x3e2 @0x10
0x03d2…03e8 at0011 = ╱41╱A╱ // 0x3e3 @0x11
0x03d2…03e8 at0012 = ╱47╱G╱ // 0x3e4 @0x12
0x03d2…03e8 at0013 = ╱b6╱ THEN ╱ // 0x3e5 @0x13
0x03d2…03e8 at0014 = ╱8d╱ STOP ╱ // 0x3e6 @0x14
0x03d2…03e8 at0015 = EOL // 0x3e7 @0x15
0x03d2…03e8 }
0x03e8…03f5 914c 0430 F5$=RES$
0x03e8…03f5 LineComalBin {
0x03e8…03f5 ptr = 0x914c // 0x3e8 @0x0
0x03e8…03f5 lno = 0x01ae // 0x3ea @0x2
0x03e8…03f5 at0004 = ╱46╱F╱ // 0x3ec @0x4
0x03e8…03f5 at0005 = ╱35╱5╱ // 0x3ed @0x5
0x03e8…03f5 at0006 = ╱ef╱$╱ // 0x3ee @0x6
0x03e8…03f5 at0007 = ╱dc╱=╱ // 0x3ef @0x7
0x03e8…03f5 at0008 = ╱52╱R╱ // 0x3f0 @0x8
0x03e8…03f5 at0009 = ╱45╱E╱ // 0x3f1 @0x9
0x03e8…03f5 at000a = ╱53╱S╱ // 0x3f2 @0xa
0x03e8…03f5 at000b = ╱ef╱$╱ // 0x3f3 @0xb
0x03e8…03f5 at000c = EOL // 0x3f4 @0xc
0x03e8…03f5 }
0x03f5…03fb 9152 0440 ENDPROC
0x03f5…03fb LineComalBin {
0x03f5…03fb ptr = 0x9152 // 0x3f5 @0x0
0x03f5…03fb lno = 0x01b8 // 0x3f7 @0x2
0x03f5…03fb at0004 = ╱9f╱ ENDPROC ╱ // 0x3f9 @0x4
0x03f5…03fb at0005 = EOL // 0x3fa @0x5
0x03f5…03fb }
0x03fb…040d 9164 0441 PROC OPTÆL(F6,F7)
0x03fb…040d LineComalBin {
0x03fb…040d ptr = 0x9164 // 0x3fb @0x0
0x03fb…040d lno = 0x01b9 // 0x3fd @0x2
0x03fb…040d at0004 = ╱9e╱ PROC ╱ // 0x3ff @0x4
0x03fb…040d at0005 = ╱4f╱O╱ // 0x400 @0x5
0x03fb…040d at0006 = ╱50╱P╱ // 0x401 @0x6
0x03fb…040d at0007 = ╱54╱T╱ // 0x402 @0x7
0x03fb…040d at0008 = ╱5b╱Æ╱ // 0x403 @0x8
0x03fb…040d at0009 = ╱4c╱L╱ // 0x404 @0x9
0x03fb…040d at000a = ╱ed╱(╱ // 0x405 @0xa
0x03fb…040d at000b = ╱46╱F╱ // 0x406 @0xb
0x03fb…040d at000c = ╱36╱6╱ // 0x407 @0xc
0x03fb…040d at000d = ╱ec╱,╱ // 0x408 @0xd
0x03fb…040d at000e = ╱46╱F╱ // 0x409 @0xe
0x03fb…040d at000f = ╱37╱7╱ // 0x40a @0xf
0x03fb…040d at0010 = ╱ee╱)╱ // 0x40b @0x10
0x03fb…040d at0011 = EOL // 0x40c @0x11
0x03fb…040d }
0x040d…0425 917c 0442 F1$=F7$;C2$=C5$(F6)
0x040d…0425 LineComalBin {
0x040d…0425 ptr = 0x917c // 0x40d @0x0
0x040d…0425 lno = 0x01ba // 0x40f @0x2
0x040d…0425 at0004 = ╱46╱F╱ // 0x411 @0x4
0x040d…0425 at0005 = ╱31╱1╱ // 0x412 @0x5
0x040d…0425 at0006 = ╱ef╱$╱ // 0x413 @0x6
0x040d…0425 at0007 = ╱dc╱=╱ // 0x414 @0x7
0x040d…0425 at0008 = ╱46╱F╱ // 0x415 @0x8
0x040d…0425 at0009 = ╱37╱7╱ // 0x416 @0x9
0x040d…0425 at000a = ╱ef╱$╱ // 0x417 @0xa
0x040d…0425 at000b = ╱eb╱;╱ // 0x418 @0xb
0x040d…0425 at000c = ╱43╱C╱ // 0x419 @0xc
0x040d…0425 at000d = ╱32╱2╱ // 0x41a @0xd
0x040d…0425 at000e = ╱ef╱$╱ // 0x41b @0xe
0x040d…0425 at000f = ╱dc╱=╱ // 0x41c @0xf
0x040d…0425 at0010 = ╱43╱C╱ // 0x41d @0x10
0x040d…0425 at0011 = ╱35╱5╱ // 0x41e @0x11
0x040d…0425 at0012 = ╱ef╱$╱ // 0x41f @0x12
0x040d…0425 at0013 = ╱ed╱(╱ // 0x420 @0x13
0x040d…0425 at0014 = ╱46╱F╱ // 0x421 @0x14
0x040d…0425 at0015 = ╱36╱6╱ // 0x422 @0x15
0x040d…0425 at0016 = ╱ee╱)╱ // 0x423 @0x16
0x040d…0425 at0017 = EOL // 0x424 @0x17
0x040d…0425 }
0x0425…0440 9197 0443 EXEC C(0,C2$,F1$,F1$)
0x0425…0440 LineComalBin {
0x0425…0440 ptr = 0x9197 // 0x425 @0x0
0x0425…0440 lno = 0x01bb // 0x427 @0x2
0x0425…0440 at0004 = ╱9d╱ EXEC ╱ // 0x429 @0x4
0x0425…0440 at0005 = ╱43╱C╱ // 0x42a @0x5
0x0425…0440 at0006 = ╱ed╱(╱ // 0x42b @0x6
0x0425…0440 at0007 = ╱30╱0╱ // 0x42c @0x7
0x0425…0440 at0008 = ╱fe00000000╱ // 0x42d @0x8
0x0425…0440 at000d = ╱ec╱,╱ // 0x432 @0xd
0x0425…0440 at000e = ╱43╱C╱ // 0x433 @0xe
0x0425…0440 at000f = ╱32╱2╱ // 0x434 @0xf
0x0425…0440 at0010 = ╱ef╱$╱ // 0x435 @0x10
0x0425…0440 at0011 = ╱ec╱,╱ // 0x436 @0x11
0x0425…0440 at0012 = ╱46╱F╱ // 0x437 @0x12
0x0425…0440 at0013 = ╱31╱1╱ // 0x438 @0x13
0x0425…0440 at0014 = ╱ef╱$╱ // 0x439 @0x14
0x0425…0440 at0015 = ╱ec╱,╱ // 0x43a @0x15
0x0425…0440 at0016 = ╱46╱F╱ // 0x43b @0x16
0x0425…0440 at0017 = ╱31╱1╱ // 0x43c @0x17
0x0425…0440 at0018 = ╱ef╱$╱ // 0x43d @0x18
0x0425…0440 at0019 = ╱ee╱)╱ // 0x43e @0x19
0x0425…0440 at001a = EOL // 0x43f @0x1a
0x0425…0440 }
0x0440…0456 91ad 0444 C5$(F6)=F1$(G:EL)
0x0440…0456 LineComalBin {
0x0440…0456 ptr = 0x91ad // 0x440 @0x0
0x0440…0456 lno = 0x01bc // 0x442 @0x2
0x0440…0456 at0004 = ╱43╱C╱ // 0x444 @0x4
0x0440…0456 at0005 = ╱35╱5╱ // 0x445 @0x5
0x0440…0456 at0006 = ╱ef╱$╱ // 0x446 @0x6
0x0440…0456 at0007 = ╱ed╱(╱ // 0x447 @0x7
0x0440…0456 at0008 = ╱46╱F╱ // 0x448 @0x8
0x0440…0456 at0009 = ╱36╱6╱ // 0x449 @0x9
0x0440…0456 at000a = ╱ee╱)╱ // 0x44a @0xa
0x0440…0456 at000b = ╱dc╱=╱ // 0x44b @0xb
0x0440…0456 at000c = ╱46╱F╱ // 0x44c @0xc
0x0440…0456 at000d = ╱31╱1╱ // 0x44d @0xd
0x0440…0456 at000e = ╱ef╱$╱ // 0x44e @0xe
0x0440…0456 at000f = ╱ed╱(╱ // 0x44f @0xf
0x0440…0456 at0010 = ╱47╱G╱ // 0x450 @0x10
0x0440…0456 at0011 = ╱f0╱:╱ // 0x451 @0x11
0x0440…0456 at0012 = ╱45╱E╱ // 0x452 @0x12
0x0440…0456 at0013 = ╱4c╱L╱ // 0x453 @0x13
0x0440…0456 at0014 = ╱ee╱)╱ // 0x454 @0x14
0x0440…0456 at0015 = EOL // 0x455 @0x15
0x0440…0456 }
0x0456…0487 91de 0445 IF J5=73 AND C5$(F6,EL)="-" THEN C5$(F6)=B3$(G:EL)
0x0456…0487 LineComalBin {
0x0456…0487 ptr = 0x91de // 0x456 @0x0
0x0456…0487 lno = 0x01bd // 0x458 @0x2
0x0456…0487 at0004 = ╱82╱ IF ╱ // 0x45a @0x4
0x0456…0487 at0005 = ╱4a╱J╱ // 0x45b @0x5
0x0456…0487 at0006 = ╱35╱5╱ // 0x45c @0x6
0x0456…0487 at0007 = ╱dc╱=╱ // 0x45d @0x7
0x0456…0487 at0008 = ╱37╱7╱ // 0x45e @0x8
0x0456…0487 at0009 = ╱33╱3╱ // 0x45f @0x9
0x0456…0487 at000a = ╱fe00009207╱ // 0x460 @0xa
0x0456…0487 at000f = ╱da╱ AND ╱ // 0x465 @0xf
0x0456…0487 at0010 = ╱43╱C╱ // 0x466 @0x10
0x0456…0487 at0011 = ╱35╱5╱ // 0x467 @0x11
0x0456…0487 at0012 = ╱ef╱$╱ // 0x468 @0x12
0x0456…0487 at0013 = ╱ed╱(╱ // 0x469 @0x13
0x0456…0487 at0014 = ╱46╱F╱ // 0x46a @0x14
0x0456…0487 at0015 = ╱36╱6╱ // 0x46b @0x15
0x0456…0487 at0016 = ╱ec╱,╱ // 0x46c @0x16
0x0456…0487 at0017 = ╱45╱E╱ // 0x46d @0x17
0x0456…0487 at0018 = ╱4c╱L╱ // 0x46e @0x18
0x0456…0487 at0019 = ╱ee╱)╱ // 0x46f @0x19
0x0456…0487 at001a = ╱dc╱=╱ // 0x470 @0x1a
0x0456…0487 at001b = ╱22╱"╱ // 0x471 @0x1b
0x0456…0487 at001c = ╱2d╱-╱ // 0x472 @0x1c
0x0456…0487 at001d = ╱22╱"╱ // 0x473 @0x1d
0x0456…0487 at001e = ╱b6╱ THEN ╱ // 0x474 @0x1e
0x0456…0487 at001f = ╱43╱C╱ // 0x475 @0x1f
0x0456…0487 at0020 = ╱35╱5╱ // 0x476 @0x20
0x0456…0487 at0021 = ╱ef╱$╱ // 0x477 @0x21
0x0456…0487 at0022 = ╱ed╱(╱ // 0x478 @0x22
0x0456…0487 at0023 = ╱46╱F╱ // 0x479 @0x23
0x0456…0487 at0024 = ╱36╱6╱ // 0x47a @0x24
0x0456…0487 at0025 = ╱ee╱)╱ // 0x47b @0x25
0x0456…0487 at0026 = ╱dc╱=╱ // 0x47c @0x26
0x0456…0487 at0027 = ╱42╱B╱ // 0x47d @0x27
0x0456…0487 at0028 = ╱33╱3╱ // 0x47e @0x28
0x0456…0487 at0029 = ╱ef╱$╱ // 0x47f @0x29
0x0456…0487 at002a = ╱ed╱(╱ // 0x480 @0x2a
0x0456…0487 at002b = ╱47╱G╱ // 0x481 @0x2b
0x0456…0487 at002c = ╱f0╱:╱ // 0x482 @0x2c
0x0456…0487 at002d = ╱45╱E╱ // 0x483 @0x2d
0x0456…0487 at002e = ╱4c╱L╱ // 0x484 @0x2e
0x0456…0487 at002f = ╱ee╱)╱ // 0x485 @0x2f
0x0456…0487 at0030 = EOL // 0x486 @0x30
0x0456…0487 }
0x0487…048d 91e4 0448 ENDPROC
0x0487…048d LineComalBin {
0x0487…048d ptr = 0x91e4 // 0x487 @0x0
0x0487…048d lno = 0x01c0 // 0x489 @0x2
0x0487…048d at0004 = ╱9f╱ ENDPROC ╱ // 0x48b @0x4
0x0487…048d at0005 = EOL // 0x48c @0x5
0x0487…048d }
0x048d…0498 91ef 0450 PROC UDTÆL
0x048d…0498 LineComalBin {
0x048d…0498 ptr = 0x91ef // 0x48d @0x0
0x048d…0498 lno = 0x01c2 // 0x48f @0x2
0x048d…0498 at0004 = ╱9e╱ PROC ╱ // 0x491 @0x4
0x048d…0498 at0005 = ╱55╱U╱ // 0x492 @0x5
0x048d…0498 at0006 = ╱44╱D╱ // 0x493 @0x6
0x048d…0498 at0007 = ╱54╱T╱ // 0x494 @0x7
0x048d…0498 at0008 = ╱5b╱Æ╱ // 0x495 @0x8
0x048d…0498 at0009 = ╱4c╱L╱ // 0x496 @0x9
0x048d…0498 at000a = EOL // 0x497 @0xa
0x048d…0498 }
0x0498…04a7 91fe 0460 J=W*(F8-E)
0x0498…04a7 LineComalBin {
0x0498…04a7 ptr = 0x91fe // 0x498 @0x0
0x0498…04a7 lno = 0x01cc // 0x49a @0x2
0x0498…04a7 at0004 = ╱4a╱J╱ // 0x49c @0x4
0x0498…04a7 at0005 = ╱dc╱=╱ // 0x49d @0x5
0x0498…04a7 at0006 = ╱57╱W╱ // 0x49e @0x6
0x0498…04a7 at0007 = ╱e4╱*╱ // 0x49f @0x7
0x0498…04a7 at0008 = ╱ed╱(╱ // 0x4a0 @0x8
0x0498…04a7 at0009 = ╱46╱F╱ // 0x4a1 @0x9
0x0498…04a7 at000a = ╱38╱8╱ // 0x4a2 @0xa
0x0498…04a7 at000b = ╱e3╱-╱ // 0x4a3 @0xb
0x0498…04a7 at000c = ╱45╱E╱ // 0x4a4 @0xc
0x0498…04a7 at000d = ╱ee╱)╱ // 0x4a5 @0xd
0x0498…04a7 at000e = EOL // 0x4a6 @0xe
0x0498…04a7 }
0x04a7…04b3 920a 0470 FOR F9=E TO W
0x04a7…04b3 LineComalBin {
0x04a7…04b3 ptr = 0x920a // 0x4a7 @0x0
0x04a7…04b3 lno = 0x01d6 // 0x4a9 @0x2
0x04a7…04b3 at0004 = ╱83╱ FOR ╱ // 0x4ab @0x4
0x04a7…04b3 at0005 = ╱46╱F╱ // 0x4ac @0x5
0x04a7…04b3 at0006 = ╱39╱9╱ // 0x4ad @0x6
0x04a7…04b3 at0007 = ╱dc╱=╱ // 0x4ae @0x7
0x04a7…04b3 at0008 = ╱45╱E╱ // 0x4af @0x8
0x04a7…04b3 at0009 = ╱b7╱ TO ╱ // 0x4b0 @0x9
0x04a7…04b3 at000a = ╱57╱W╱ // 0x4b1 @0xa
0x04a7…04b3 at000b = EOL // 0x4b2 @0xb
0x04a7…04b3 }
0x04b3…04c3 921a 0480 FOR I=E TO 5
0x04b3…04c3 LineComalBin {
0x04b3…04c3 ptr = 0x921a // 0x4b3 @0x0
0x04b3…04c3 lno = 0x01e0 // 0x4b5 @0x2
0x04b3…04c3 at0004 = ╱83╱ FOR ╱ // 0x4b7 @0x4
0x04b3…04c3 at0005 = ╱49╱I╱ // 0x4b8 @0x5
0x04b3…04c3 at0006 = ╱dc╱=╱ // 0x4b9 @0x6
0x04b3…04c3 at0007 = ╱45╱E╱ // 0x4ba @0x7
0x04b3…04c3 at0008 = ╱b7╱ TO ╱ // 0x4bb @0x8
0x04b3…04c3 at0009 = ╱35╱5╱ // 0x4bc @0x9
0x04b3…04c3 at000a = ╱fe0000a003╱ // 0x4bd @0xa
0x04b3…04c3 at000f = EOL // 0x4c2 @0xf
0x04b3…04c3 }
0x04c3…04ef 9246 0490 C6$((I-E)*EL+E:EL)=C5$((F9-E)*5+I)
0x04c3…04ef LineComalBin {
0x04c3…04ef ptr = 0x9246 // 0x4c3 @0x0
0x04c3…04ef lno = 0x01ea // 0x4c5 @0x2
0x04c3…04ef at0004 = ╱43╱C╱ // 0x4c7 @0x4
0x04c3…04ef at0005 = ╱36╱6╱ // 0x4c8 @0x5
0x04c3…04ef at0006 = ╱ef╱$╱ // 0x4c9 @0x6
0x04c3…04ef at0007 = ╱ed╱(╱ // 0x4ca @0x7
0x04c3…04ef at0008 = ╱ed╱(╱ // 0x4cb @0x8
0x04c3…04ef at0009 = ╱49╱I╱ // 0x4cc @0x9
0x04c3…04ef at000a = ╱e3╱-╱ // 0x4cd @0xa
0x04c3…04ef at000b = ╱45╱E╱ // 0x4ce @0xb
0x04c3…04ef at000c = ╱ee╱)╱ // 0x4cf @0xc
0x04c3…04ef at000d = ╱e4╱*╱ // 0x4d0 @0xd
0x04c3…04ef at000e = ╱45╱E╱ // 0x4d1 @0xe
0x04c3…04ef at000f = ╱4c╱L╱ // 0x4d2 @0xf
0x04c3…04ef at0010 = ╱e2╱+╱ // 0x4d3 @0x10
0x04c3…04ef at0011 = ╱45╱E╱ // 0x4d4 @0x11
0x04c3…04ef at0012 = ╱f0╱:╱ // 0x4d5 @0x12
0x04c3…04ef at0013 = ╱45╱E╱ // 0x4d6 @0x13
0x04c3…04ef at0014 = ╱4c╱L╱ // 0x4d7 @0x14
0x04c3…04ef at0015 = ╱ee╱)╱ // 0x4d8 @0x15
0x04c3…04ef at0016 = ╱dc╱=╱ // 0x4d9 @0x16
0x04c3…04ef at0017 = ╱43╱C╱ // 0x4da @0x17
0x04c3…04ef at0018 = ╱35╱5╱ // 0x4db @0x18
0x04c3…04ef at0019 = ╱ef╱$╱ // 0x4dc @0x19
0x04c3…04ef at001a = ╱ed╱(╱ // 0x4dd @0x1a
0x04c3…04ef at001b = ╱ed╱(╱ // 0x4de @0x1b
0x04c3…04ef at001c = ╱46╱F╱ // 0x4df @0x1c
0x04c3…04ef at001d = ╱39╱9╱ // 0x4e0 @0x1d
0x04c3…04ef at001e = ╱e3╱-╱ // 0x4e1 @0x1e
0x04c3…04ef at001f = ╱45╱E╱ // 0x4e2 @0x1f
0x04c3…04ef at0020 = ╱ee╱)╱ // 0x4e3 @0x20
0x04c3…04ef at0021 = ╱e4╱*╱ // 0x4e4 @0x21
0x04c3…04ef at0022 = ╱35╱5╱ // 0x4e5 @0x22
0x04c3…04ef at0023 = ╱fe0000a003╱ // 0x4e6 @0x23
0x04c3…04ef at0028 = ╱e2╱+╱ // 0x4eb @0x28
0x04c3…04ef at0029 = ╱49╱I╱ // 0x4ec @0x29
0x04c3…04ef at002a = ╱ee╱)╱ // 0x4ed @0x2a
0x04c3…04ef at002b = EOL // 0x4ee @0x2b
0x04c3…04ef }
0x04ef…04f6 924d 0500 NEXT I
0x04ef…04f6 LineComalBin {
0x04ef…04f6 ptr = 0x924d // 0x4ef @0x0
0x04ef…04f6 lno = 0x01f4 // 0x4f1 @0x2
0x04ef…04f6 at0004 = ╱84╱ NEXT ╱ // 0x4f3 @0x4
0x04ef…04f6 at0005 = ╱49╱I╱ // 0x4f4 @0x5
0x04ef…04f6 at0006 = EOL // 0x4f5 @0x6
0x04ef…04f6 }
0x04f6…0508 925f 0510 PUT D0$,J+F9:C6$
0x04f6…0508 LineComalBin {
0x04f6…0508 ptr = 0x925f // 0x4f6 @0x0
0x04f6…0508 lno = 0x01fe // 0x4f8 @0x2
0x04f6…0508 at0004 = ╱aa╱ PUT ╱ // 0x4fa @0x4
0x04f6…0508 at0005 = ╱44╱D╱ // 0x4fb @0x5
0x04f6…0508 at0006 = ╱30╱0╱ // 0x4fc @0x6
0x04f6…0508 at0007 = ╱ef╱$╱ // 0x4fd @0x7
0x04f6…0508 at0008 = ╱ec╱,╱ // 0x4fe @0x8
0x04f6…0508 at0009 = ╱4a╱J╱ // 0x4ff @0x9
0x04f6…0508 at000a = ╱e2╱+╱ // 0x500 @0xa
0x04f6…0508 at000b = ╱46╱F╱ // 0x501 @0xb
0x04f6…0508 at000c = ╱39╱9╱ // 0x502 @0xc
0x04f6…0508 at000d = ╱f0╱:╱ // 0x503 @0xd
0x04f6…0508 at000e = ╱43╱C╱ // 0x504 @0xe
0x04f6…0508 at000f = ╱36╱6╱ // 0x505 @0xf
0x04f6…0508 at0010 = ╱ef╱$╱ // 0x506 @0x10
0x04f6…0508 at0011 = EOL // 0x507 @0x11
0x04f6…0508 }
0x0508…0510 9267 0520 NEXT F9
0x0508…0510 LineComalBin {
0x0508…0510 ptr = 0x9267 // 0x508 @0x0
0x0508…0510 lno = 0x0208 // 0x50a @0x2
0x0508…0510 at0004 = ╱84╱ NEXT ╱ // 0x50c @0x4
0x0508…0510 at0005 = ╱46╱F╱ // 0x50d @0x5
0x0508…0510 at0006 = ╱39╱9╱ // 0x50e @0x6
0x0508…0510 at0007 = EOL // 0x50f @0x7
0x0508…0510 }
0x0510…0524 927b 0530 EXEC F(-F8,-F9,D0$)
0x0510…0524 LineComalBin {
0x0510…0524 ptr = 0x927b // 0x510 @0x0
0x0510…0524 lno = 0x0212 // 0x512 @0x2
0x0510…0524 at0004 = ╱9d╱ EXEC ╱ // 0x514 @0x4
0x0510…0524 at0005 = ╱46╱F╱ // 0x515 @0x5
0x0510…0524 at0006 = ╱ed╱(╱ // 0x516 @0x6
0x0510…0524 at0007 = ╱e9╱-╱ // 0x517 @0x7
0x0510…0524 at0008 = ╱46╱F╱ // 0x518 @0x8
0x0510…0524 at0009 = ╱38╱8╱ // 0x519 @0x9
0x0510…0524 at000a = ╱ec╱,╱ // 0x51a @0xa
0x0510…0524 at000b = ╱e9╱-╱ // 0x51b @0xb
0x0510…0524 at000c = ╱46╱F╱ // 0x51c @0xc
0x0510…0524 at000d = ╱39╱9╱ // 0x51d @0xd
0x0510…0524 at000e = ╱ec╱,╱ // 0x51e @0xe
0x0510…0524 at000f = ╱44╱D╱ // 0x51f @0xf
0x0510…0524 at0010 = ╱30╱0╱ // 0x520 @0x10
0x0510…0524 at0011 = ╱ef╱$╱ // 0x521 @0x11
0x0510…0524 at0012 = ╱ee╱)╱ // 0x522 @0x12
0x0510…0524 at0013 = EOL // 0x523 @0x13
0x0510…0524 }
0x0524…052a 9281 0540 ENDPROC
0x0524…052a LineComalBin {
0x0524…052a ptr = 0x9281 // 0x524 @0x0
0x0524…052a lno = 0x021c // 0x526 @0x2
0x0524…052a at0004 = ╱9f╱ ENDPROC ╱ // 0x528 @0x4
0x0524…052a at0005 = EOL // 0x529 @0x5
0x0524…052a }
0x052a…0536 928d 0550 PROC INDTÆL
0x052a…0536 LineComalBin {
0x052a…0536 ptr = 0x928d // 0x52a @0x0
0x052a…0536 lno = 0x0226 // 0x52c @0x2
0x052a…0536 at0004 = ╱9e╱ PROC ╱ // 0x52e @0x4
0x052a…0536 at0005 = ╱49╱I╱ // 0x52f @0x5
0x052a…0536 at0006 = ╱4e╱N╱ // 0x530 @0x6
0x052a…0536 at0007 = ╱44╱D╱ // 0x531 @0x7
0x052a…0536 at0008 = ╱54╱T╱ // 0x532 @0x8
0x052a…0536 at0009 = ╱5b╱Æ╱ // 0x533 @0x9
0x052a…0536 at000a = ╱4c╱L╱ // 0x534 @0xa
0x052a…0536 at000b = EOL // 0x535 @0xb
0x052a…0536 }
0x0536…0545 929c 0560 J=W*(F8-E)
0x0536…0545 LineComalBin {
0x0536…0545 ptr = 0x929c // 0x536 @0x0
0x0536…0545 lno = 0x0230 // 0x538 @0x2
0x0536…0545 at0004 = ╱4a╱J╱ // 0x53a @0x4
0x0536…0545 at0005 = ╱dc╱=╱ // 0x53b @0x5
0x0536…0545 at0006 = ╱57╱W╱ // 0x53c @0x6
0x0536…0545 at0007 = ╱e4╱*╱ // 0x53d @0x7
0x0536…0545 at0008 = ╱ed╱(╱ // 0x53e @0x8
0x0536…0545 at0009 = ╱46╱F╱ // 0x53f @0x9
0x0536…0545 at000a = ╱38╱8╱ // 0x540 @0xa
0x0536…0545 at000b = ╱e3╱-╱ // 0x541 @0xb
0x0536…0545 at000c = ╱45╱E╱ // 0x542 @0xc
0x0536…0545 at000d = ╱ee╱)╱ // 0x543 @0xd
0x0536…0545 at000e = EOL // 0x544 @0xe
0x0536…0545 }
0x0545…0551 92a8 0570 FOR F9=E TO W
0x0545…0551 LineComalBin {
0x0545…0551 ptr = 0x92a8 // 0x545 @0x0
0x0545…0551 lno = 0x023a // 0x547 @0x2
0x0545…0551 at0004 = ╱83╱ FOR ╱ // 0x549 @0x4
0x0545…0551 at0005 = ╱46╱F╱ // 0x54a @0x5
0x0545…0551 at0006 = ╱39╱9╱ // 0x54b @0x6
0x0545…0551 at0007 = ╱dc╱=╱ // 0x54c @0x7
0x0545…0551 at0008 = ╱45╱E╱ // 0x54d @0x8
0x0545…0551 at0009 = ╱b7╱ TO ╱ // 0x54e @0x9
0x0545…0551 at000a = ╱57╱W╱ // 0x54f @0xa
0x0545…0551 at000b = EOL // 0x550 @0xb
0x0545…0551 }
0x0551…0563 92ba 0580 GET D0$,J+F9:C6$
0x0551…0563 LineComalBin {
0x0551…0563 ptr = 0x92ba // 0x551 @0x0
0x0551…0563 lno = 0x0244 // 0x553 @0x2
0x0551…0563 at0004 = ╱a9╱ GET ╱ // 0x555 @0x4
0x0551…0563 at0005 = ╱44╱D╱ // 0x556 @0x5
0x0551…0563 at0006 = ╱30╱0╱ // 0x557 @0x6
0x0551…0563 at0007 = ╱ef╱$╱ // 0x558 @0x7
0x0551…0563 at0008 = ╱ec╱,╱ // 0x559 @0x8
0x0551…0563 at0009 = ╱4a╱J╱ // 0x55a @0x9
0x0551…0563 at000a = ╱e2╱+╱ // 0x55b @0xa
0x0551…0563 at000b = ╱46╱F╱ // 0x55c @0xb
0x0551…0563 at000c = ╱39╱9╱ // 0x55d @0xc
0x0551…0563 at000d = ╱f0╱:╱ // 0x55e @0xd
0x0551…0563 at000e = ╱43╱C╱ // 0x55f @0xe
0x0551…0563 at000f = ╱36╱6╱ // 0x560 @0xf
0x0551…0563 at0010 = ╱ef╱$╱ // 0x561 @0x10
0x0551…0563 at0011 = EOL // 0x562 @0x11
0x0551…0563 }
0x0563…0573 92ca 0590 FOR I=E TO 5
0x0563…0573 LineComalBin {
0x0563…0573 ptr = 0x92ca // 0x563 @0x0
0x0563…0573 lno = 0x024e // 0x565 @0x2
0x0563…0573 at0004 = ╱83╱ FOR ╱ // 0x567 @0x4
0x0563…0573 at0005 = ╱49╱I╱ // 0x568 @0x5
0x0563…0573 at0006 = ╱dc╱=╱ // 0x569 @0x6
0x0563…0573 at0007 = ╱45╱E╱ // 0x56a @0x7
0x0563…0573 at0008 = ╱b7╱ TO ╱ // 0x56b @0x8
0x0563…0573 at0009 = ╱35╱5╱ // 0x56c @0x9
0x0563…0573 at000a = ╱fe0000a003╱ // 0x56d @0xa
0x0563…0573 at000f = EOL // 0x572 @0xf
0x0563…0573 }
0x0573…059f 92f6 0600 C5$((F9-E)*5+I)=C6$((I-E)*EL+E:EL)
0x0573…059f LineComalBin {
0x0573…059f ptr = 0x92f6 // 0x573 @0x0
0x0573…059f lno = 0x0258 // 0x575 @0x2
0x0573…059f at0004 = ╱43╱C╱ // 0x577 @0x4
0x0573…059f at0005 = ╱35╱5╱ // 0x578 @0x5
0x0573…059f at0006 = ╱ef╱$╱ // 0x579 @0x6
0x0573…059f at0007 = ╱ed╱(╱ // 0x57a @0x7
0x0573…059f at0008 = ╱ed╱(╱ // 0x57b @0x8
0x0573…059f at0009 = ╱46╱F╱ // 0x57c @0x9
0x0573…059f at000a = ╱39╱9╱ // 0x57d @0xa
0x0573…059f at000b = ╱e3╱-╱ // 0x57e @0xb
0x0573…059f at000c = ╱45╱E╱ // 0x57f @0xc
0x0573…059f at000d = ╱ee╱)╱ // 0x580 @0xd
0x0573…059f at000e = ╱e4╱*╱ // 0x581 @0xe
0x0573…059f at000f = ╱35╱5╱ // 0x582 @0xf
0x0573…059f at0010 = ╱fe0000a003╱ // 0x583 @0x10
0x0573…059f at0015 = ╱e2╱+╱ // 0x588 @0x15
0x0573…059f at0016 = ╱49╱I╱ // 0x589 @0x16
0x0573…059f at0017 = ╱ee╱)╱ // 0x58a @0x17
0x0573…059f at0018 = ╱dc╱=╱ // 0x58b @0x18
0x0573…059f at0019 = ╱43╱C╱ // 0x58c @0x19
0x0573…059f at001a = ╱36╱6╱ // 0x58d @0x1a
0x0573…059f at001b = ╱ef╱$╱ // 0x58e @0x1b
0x0573…059f at001c = ╱ed╱(╱ // 0x58f @0x1c
0x0573…059f at001d = ╱ed╱(╱ // 0x590 @0x1d
0x0573…059f at001e = ╱49╱I╱ // 0x591 @0x1e
0x0573…059f at001f = ╱e3╱-╱ // 0x592 @0x1f
0x0573…059f at0020 = ╱45╱E╱ // 0x593 @0x20
0x0573…059f at0021 = ╱ee╱)╱ // 0x594 @0x21
0x0573…059f at0022 = ╱e4╱*╱ // 0x595 @0x22
0x0573…059f at0023 = ╱45╱E╱ // 0x596 @0x23
0x0573…059f at0024 = ╱4c╱L╱ // 0x597 @0x24
0x0573…059f at0025 = ╱e2╱+╱ // 0x598 @0x25
0x0573…059f at0026 = ╱45╱E╱ // 0x599 @0x26
0x0573…059f at0027 = ╱f0╱:╱ // 0x59a @0x27
0x0573…059f at0028 = ╱45╱E╱ // 0x59b @0x28
0x0573…059f at0029 = ╱4c╱L╱ // 0x59c @0x29
0x0573…059f at002a = ╱ee╱)╱ // 0x59d @0x2a
0x0573…059f at002b = EOL // 0x59e @0x2b
0x0573…059f }
0x059f…05a6 92fd 0610 NEXT I
0x059f…05a6 LineComalBin {
0x059f…05a6 ptr = 0x92fd // 0x59f @0x0
0x059f…05a6 lno = 0x0262 // 0x5a1 @0x2
0x059f…05a6 at0004 = ╱84╱ NEXT ╱ // 0x5a3 @0x4
0x059f…05a6 at0005 = ╱49╱I╱ // 0x5a4 @0x5
0x059f…05a6 at0006 = EOL // 0x5a5 @0x6
0x059f…05a6 }
0x05a6…05ae 9305 0620 NEXT F9
0x05a6…05ae LineComalBin {
0x05a6…05ae ptr = 0x9305 // 0x5a6 @0x0
0x05a6…05ae lno = 0x026c // 0x5a8 @0x2
0x05a6…05ae at0004 = ╱84╱ NEXT ╱ // 0x5aa @0x4
0x05a6…05ae at0005 = ╱46╱F╱ // 0x5ab @0x5
0x05a6…05ae at0006 = ╱39╱9╱ // 0x5ac @0x6
0x05a6…05ae at0007 = EOL // 0x5ad @0x7
0x05a6…05ae }
0x05ae…05c0 9317 0630 EXEC F(F8,F9,D0$)
0x05ae…05c0 LineComalBin {
0x05ae…05c0 ptr = 0x9317 // 0x5ae @0x0
0x05ae…05c0 lno = 0x0276 // 0x5b0 @0x2
0x05ae…05c0 at0004 = ╱9d╱ EXEC ╱ // 0x5b2 @0x4
0x05ae…05c0 at0005 = ╱46╱F╱ // 0x5b3 @0x5
0x05ae…05c0 at0006 = ╱ed╱(╱ // 0x5b4 @0x6
0x05ae…05c0 at0007 = ╱46╱F╱ // 0x5b5 @0x7
0x05ae…05c0 at0008 = ╱38╱8╱ // 0x5b6 @0x8
0x05ae…05c0 at0009 = ╱ec╱,╱ // 0x5b7 @0x9
0x05ae…05c0 at000a = ╱46╱F╱ // 0x5b8 @0xa
0x05ae…05c0 at000b = ╱39╱9╱ // 0x5b9 @0xb
0x05ae…05c0 at000c = ╱ec╱,╱ // 0x5ba @0xc
0x05ae…05c0 at000d = ╱44╱D╱ // 0x5bb @0xd
0x05ae…05c0 at000e = ╱30╱0╱ // 0x5bc @0xe
0x05ae…05c0 at000f = ╱ef╱$╱ // 0x5bd @0xf
0x05ae…05c0 at0010 = ╱ee╱)╱ // 0x5be @0x10
0x05ae…05c0 at0011 = EOL // 0x5bf @0x11
0x05ae…05c0 }
0x05c0…05c6 931d 0640 ENDPROC
0x05c0…05c6 LineComalBin {
0x05c0…05c6 ptr = 0x931d // 0x5c0 @0x0
0x05c0…05c6 lno = 0x0280 // 0x5c2 @0x2
0x05c0…05c6 at0004 = ╱9f╱ ENDPROC ╱ // 0x5c4 @0x4
0x05c0…05c6 at0005 = EOL // 0x5c5 @0x5
0x05c0…05c6 }
0x05c6…05d5 932c 0641 PROC OP(F6,F7)
0x05c6…05d5 LineComalBin {
0x05c6…05d5 ptr = 0x932c // 0x5c6 @0x0
0x05c6…05d5 lno = 0x0281 // 0x5c8 @0x2
0x05c6…05d5 at0004 = ╱9e╱ PROC ╱ // 0x5ca @0x4
0x05c6…05d5 at0005 = ╱4f╱O╱ // 0x5cb @0x5
0x05c6…05d5 at0006 = ╱50╱P╱ // 0x5cc @0x6
0x05c6…05d5 at0007 = ╱ed╱(╱ // 0x5cd @0x7
0x05c6…05d5 at0008 = ╱46╱F╱ // 0x5ce @0x8
0x05c6…05d5 at0009 = ╱36╱6╱ // 0x5cf @0x9
0x05c6…05d5 at000a = ╱ec╱,╱ // 0x5d0 @0xa
0x05c6…05d5 at000b = ╱46╱F╱ // 0x5d1 @0xb
0x05c6…05d5 at000c = ╱37╱7╱ // 0x5d2 @0xc
0x05c6…05d5 at000d = ╱ee╱)╱ // 0x5d3 @0xd
0x05c6…05d5 at000e = EOL // 0x5d4 @0xe
0x05c6…05d5 }
0x05d5…05ed 9344 0642 F1$=F7$;C2$=E2$(F6)
0x05d5…05ed LineComalBin {
0x05d5…05ed ptr = 0x9344 // 0x5d5 @0x0
0x05d5…05ed lno = 0x0282 // 0x5d7 @0x2
0x05d5…05ed at0004 = ╱46╱F╱ // 0x5d9 @0x4
0x05d5…05ed at0005 = ╱31╱1╱ // 0x5da @0x5
0x05d5…05ed at0006 = ╱ef╱$╱ // 0x5db @0x6
0x05d5…05ed at0007 = ╱dc╱=╱ // 0x5dc @0x7
0x05d5…05ed at0008 = ╱46╱F╱ // 0x5dd @0x8
0x05d5…05ed at0009 = ╱37╱7╱ // 0x5de @0x9
0x05d5…05ed at000a = ╱ef╱$╱ // 0x5df @0xa
0x05d5…05ed at000b = ╱eb╱;╱ // 0x5e0 @0xb
0x05d5…05ed at000c = ╱43╱C╱ // 0x5e1 @0xc
0x05d5…05ed at000d = ╱32╱2╱ // 0x5e2 @0xd
0x05d5…05ed at000e = ╱ef╱$╱ // 0x5e3 @0xe
0x05d5…05ed at000f = ╱dc╱=╱ // 0x5e4 @0xf
0x05d5…05ed at0010 = ╱45╱E╱ // 0x5e5 @0x10
0x05d5…05ed at0011 = ╱32╱2╱ // 0x5e6 @0x11
0x05d5…05ed at0012 = ╱ef╱$╱ // 0x5e7 @0x12
0x05d5…05ed at0013 = ╱ed╱(╱ // 0x5e8 @0x13
0x05d5…05ed at0014 = ╱46╱F╱ // 0x5e9 @0x14
0x05d5…05ed at0015 = ╱36╱6╱ // 0x5ea @0x15
0x05d5…05ed at0016 = ╱ee╱)╱ // 0x5eb @0x16
0x05d5…05ed at0017 = EOL // 0x5ec @0x17
0x05d5…05ed }
0x05ed…0608 935f 0643 EXEC C(0,C2$,F1$,F1$)
0x05ed…0608 LineComalBin {
0x05ed…0608 ptr = 0x935f // 0x5ed @0x0
0x05ed…0608 lno = 0x0283 // 0x5ef @0x2
0x05ed…0608 at0004 = ╱9d╱ EXEC ╱ // 0x5f1 @0x4
0x05ed…0608 at0005 = ╱43╱C╱ // 0x5f2 @0x5
0x05ed…0608 at0006 = ╱ed╱(╱ // 0x5f3 @0x6
0x05ed…0608 at0007 = ╱30╱0╱ // 0x5f4 @0x7
0x05ed…0608 at0008 = ╱fe00000000╱ // 0x5f5 @0x8
0x05ed…0608 at000d = ╱ec╱,╱ // 0x5fa @0xd
0x05ed…0608 at000e = ╱43╱C╱ // 0x5fb @0xe
0x05ed…0608 at000f = ╱32╱2╱ // 0x5fc @0xf
0x05ed…0608 at0010 = ╱ef╱$╱ // 0x5fd @0x10
0x05ed…0608 at0011 = ╱ec╱,╱ // 0x5fe @0x11
0x05ed…0608 at0012 = ╱46╱F╱ // 0x5ff @0x12
0x05ed…0608 at0013 = ╱31╱1╱ // 0x600 @0x13
0x05ed…0608 at0014 = ╱ef╱$╱ // 0x601 @0x14
0x05ed…0608 at0015 = ╱ec╱,╱ // 0x602 @0x15
0x05ed…0608 at0016 = ╱46╱F╱ // 0x603 @0x16
0x05ed…0608 at0017 = ╱31╱1╱ // 0x604 @0x17
0x05ed…0608 at0018 = ╱ef╱$╱ // 0x605 @0x18
0x05ed…0608 at0019 = ╱ee╱)╱ // 0x606 @0x19
0x05ed…0608 at001a = EOL // 0x607 @0x1a
0x05ed…0608 }
0x0608…0618 936f 0644 E2$(F6)=F1$
0x0608…0618 LineComalBin {
0x0608…0618 ptr = 0x936f // 0x608 @0x0
0x0608…0618 lno = 0x0284 // 0x60a @0x2
0x0608…0618 at0004 = ╱45╱E╱ // 0x60c @0x4
0x0608…0618 at0005 = ╱32╱2╱ // 0x60d @0x5
0x0608…0618 at0006 = ╱ef╱$╱ // 0x60e @0x6
0x0608…0618 at0007 = ╱ed╱(╱ // 0x60f @0x7
0x0608…0618 at0008 = ╱46╱F╱ // 0x610 @0x8
0x0608…0618 at0009 = ╱36╱6╱ // 0x611 @0x9
0x0608…0618 at000a = ╱ee╱)╱ // 0x612 @0xa
0x0608…0618 at000b = ╱dc╱=╱ // 0x613 @0xb
0x0608…0618 at000c = ╱46╱F╱ // 0x614 @0xc
0x0608…0618 at000d = ╱31╱1╱ // 0x615 @0xd
0x0608…0618 at000e = ╱ef╱$╱ // 0x616 @0xe
0x0608…0618 at000f = EOL // 0x617 @0xf
0x0608…0618 }
0x0618…061e 9375 0645 ENDPROC
0x0618…061e LineComalBin {
0x0618…061e ptr = 0x9375 // 0x618 @0x0
0x0618…061e lno = 0x0285 // 0x61a @0x2
0x0618…061e at0004 = ╱9f╱ ENDPROC ╱ // 0x61c @0x4
0x0618…061e at0005 = EOL // 0x61d @0x5
0x0618…061e }
0x061e…0630 9387 0800 PROC INLØNMOD(G5)
0x061e…0630 LineComalBin {
0x061e…0630 ptr = 0x9387 // 0x61e @0x0
0x061e…0630 lno = 0x0320 // 0x620 @0x2
0x061e…0630 at0004 = ╱9e╱ PROC ╱ // 0x622 @0x4
0x061e…0630 at0005 = ╱49╱I╱ // 0x623 @0x5
0x061e…0630 at0006 = ╱4e╱N╱ // 0x624 @0x6
0x061e…0630 at0007 = ╱4c╱L╱ // 0x625 @0x7
0x061e…0630 at0008 = ╱5c╱Ø╱ // 0x626 @0x8
0x061e…0630 at0009 = ╱4e╱N╱ // 0x627 @0x9
0x061e…0630 at000a = ╱4d╱M╱ // 0x628 @0xa
0x061e…0630 at000b = ╱4f╱O╱ // 0x629 @0xb
0x061e…0630 at000c = ╱44╱D╱ // 0x62a @0xc
0x061e…0630 at000d = ╱ed╱(╱ // 0x62b @0xd
0x061e…0630 at000e = ╱47╱G╱ // 0x62c @0xe
0x061e…0630 at000f = ╱35╱5╱ // 0x62d @0xf
0x061e…0630 at0010 = ╱ee╱)╱ // 0x62e @0x10
0x061e…0630 at0011 = EOL // 0x62f @0x11
0x061e…0630 }
0x0630…0644 939b 0810 GET C9$,G*G5-E:D1$
0x0630…0644 LineComalBin {
0x0630…0644 ptr = 0x939b // 0x630 @0x0
0x0630…0644 lno = 0x032a // 0x632 @0x2
0x0630…0644 at0004 = ╱a9╱ GET ╱ // 0x634 @0x4
0x0630…0644 at0005 = ╱43╱C╱ // 0x635 @0x5
0x0630…0644 at0006 = ╱39╱9╱ // 0x636 @0x6
0x0630…0644 at0007 = ╱ef╱$╱ // 0x637 @0x7
0x0630…0644 at0008 = ╱ec╱,╱ // 0x638 @0x8
0x0630…0644 at0009 = ╱47╱G╱ // 0x639 @0x9
0x0630…0644 at000a = ╱e4╱*╱ // 0x63a @0xa
0x0630…0644 at000b = ╱47╱G╱ // 0x63b @0xb
0x0630…0644 at000c = ╱35╱5╱ // 0x63c @0xc
0x0630…0644 at000d = ╱e3╱-╱ // 0x63d @0xd
0x0630…0644 at000e = ╱45╱E╱ // 0x63e @0xe
0x0630…0644 at000f = ╱f0╱:╱ // 0x63f @0xf
0x0630…0644 at0010 = ╱44╱D╱ // 0x640 @0x10
0x0630…0644 at0011 = ╱31╱1╱ // 0x641 @0x11
0x0630…0644 at0012 = ╱ef╱$╱ // 0x642 @0x12
0x0630…0644 at0013 = EOL // 0x643 @0x13
0x0630…0644 }
0x0644…0677 93ce 0820 GET C9$,G*G5:D2$,G6,G7,G8,G9,H0,H1,H2,H3,H4,H5,H6
0x0644…0677 LineComalBin {
0x0644…0677 ptr = 0x93ce // 0x644 @0x0
0x0644…0677 lno = 0x0334 // 0x646 @0x2
0x0644…0677 at0004 = ╱a9╱ GET ╱ // 0x648 @0x4
0x0644…0677 at0005 = ╱43╱C╱ // 0x649 @0x5
0x0644…0677 at0006 = ╱39╱9╱ // 0x64a @0x6
0x0644…0677 at0007 = ╱ef╱$╱ // 0x64b @0x7
0x0644…0677 at0008 = ╱ec╱,╱ // 0x64c @0x8
0x0644…0677 at0009 = ╱47╱G╱ // 0x64d @0x9
0x0644…0677 at000a = ╱e4╱*╱ // 0x64e @0xa
0x0644…0677 at000b = ╱47╱G╱ // 0x64f @0xb
0x0644…0677 at000c = ╱35╱5╱ // 0x650 @0xc
0x0644…0677 at000d = ╱f0╱:╱ // 0x651 @0xd
0x0644…0677 at000e = ╱44╱D╱ // 0x652 @0xe
0x0644…0677 at000f = ╱32╱2╱ // 0x653 @0xf
0x0644…0677 at0010 = ╱ef╱$╱ // 0x654 @0x10
0x0644…0677 at0011 = ╱ec╱,╱ // 0x655 @0x11
0x0644…0677 at0012 = ╱47╱G╱ // 0x656 @0x12
0x0644…0677 at0013 = ╱36╱6╱ // 0x657 @0x13
0x0644…0677 at0014 = ╱ec╱,╱ // 0x658 @0x14
0x0644…0677 at0015 = ╱47╱G╱ // 0x659 @0x15
0x0644…0677 at0016 = ╱37╱7╱ // 0x65a @0x16
0x0644…0677 at0017 = ╱ec╱,╱ // 0x65b @0x17
0x0644…0677 at0018 = ╱47╱G╱ // 0x65c @0x18
0x0644…0677 at0019 = ╱38╱8╱ // 0x65d @0x19
0x0644…0677 at001a = ╱ec╱,╱ // 0x65e @0x1a
0x0644…0677 at001b = ╱47╱G╱ // 0x65f @0x1b
0x0644…0677 at001c = ╱39╱9╱ // 0x660 @0x1c
0x0644…0677 at001d = ╱ec╱,╱ // 0x661 @0x1d
0x0644…0677 at001e = ╱48╱H╱ // 0x662 @0x1e
0x0644…0677 at001f = ╱30╱0╱ // 0x663 @0x1f
0x0644…0677 at0020 = ╱ec╱,╱ // 0x664 @0x20
0x0644…0677 at0021 = ╱48╱H╱ // 0x665 @0x21
0x0644…0677 at0022 = ╱31╱1╱ // 0x666 @0x22
0x0644…0677 at0023 = ╱ec╱,╱ // 0x667 @0x23
0x0644…0677 at0024 = ╱48╱H╱ // 0x668 @0x24
0x0644…0677 at0025 = ╱32╱2╱ // 0x669 @0x25
0x0644…0677 at0026 = ╱ec╱,╱ // 0x66a @0x26
0x0644…0677 at0027 = ╱48╱H╱ // 0x66b @0x27
0x0644…0677 at0028 = ╱33╱3╱ // 0x66c @0x28
0x0644…0677 at0029 = ╱ec╱,╱ // 0x66d @0x29
0x0644…0677 at002a = ╱48╱H╱ // 0x66e @0x2a
0x0644…0677 at002b = ╱34╱4╱ // 0x66f @0x2b
0x0644…0677 at002c = ╱ec╱,╱ // 0x670 @0x2c
0x0644…0677 at002d = ╱48╱H╱ // 0x671 @0x2d
0x0644…0677 at002e = ╱35╱5╱ // 0x672 @0x2e
0x0644…0677 at002f = ╱ec╱,╱ // 0x673 @0x2f
0x0644…0677 at0030 = ╱48╱H╱ // 0x674 @0x30
0x0644…0677 at0031 = ╱36╱6╱ // 0x675 @0x31
0x0644…0677 at0032 = EOL // 0x676 @0x32
0x0644…0677 }
0x0677…068d 93e4 0830 EXEC F(1,G5,C9$)
0x0677…068d LineComalBin {
0x0677…068d ptr = 0x93e4 // 0x677 @0x0
0x0677…068d lno = 0x033e // 0x679 @0x2
0x0677…068d at0004 = ╱9d╱ EXEC ╱ // 0x67b @0x4
0x0677…068d at0005 = ╱46╱F╱ // 0x67c @0x5
0x0677…068d at0006 = ╱ed╱(╱ // 0x67d @0x6
0x0677…068d at0007 = ╱31╱1╱ // 0x67e @0x7
0x0677…068d at0008 = ╱fe00008001╱ // 0x67f @0x8
0x0677…068d at000d = ╱ec╱,╱ // 0x684 @0xd
0x0677…068d at000e = ╱47╱G╱ // 0x685 @0xe
0x0677…068d at000f = ╱35╱5╱ // 0x686 @0xf
0x0677…068d at0010 = ╱ec╱,╱ // 0x687 @0x10
0x0677…068d at0011 = ╱43╱C╱ // 0x688 @0x11
0x0677…068d at0012 = ╱39╱9╱ // 0x689 @0x12
0x0677…068d at0013 = ╱ef╱$╱ // 0x68a @0x13
0x0677…068d at0014 = ╱ee╱)╱ // 0x68b @0x14
0x0677…068d at0015 = EOL // 0x68c @0x15
0x0677…068d }
0x068d…0693 93ea 0840 ENDPROC
0x068d…0693 LineComalBin {
0x068d…0693 ptr = 0x93ea // 0x68d @0x0
0x068d…0693 lno = 0x0348 // 0x68f @0x2
0x068d…0693 at0004 = ╱9f╱ ENDPROC ╱ // 0x691 @0x4
0x068d…0693 at0005 = EOL // 0x692 @0x5
0x068d…0693 }
0x0693…06a5 93fc 0850 PROC UDLØNMOD(G5)
0x0693…06a5 LineComalBin {
0x0693…06a5 ptr = 0x93fc // 0x693 @0x0
0x0693…06a5 lno = 0x0352 // 0x695 @0x2
0x0693…06a5 at0004 = ╱9e╱ PROC ╱ // 0x697 @0x4
0x0693…06a5 at0005 = ╱55╱U╱ // 0x698 @0x5
0x0693…06a5 at0006 = ╱44╱D╱ // 0x699 @0x6
0x0693…06a5 at0007 = ╱4c╱L╱ // 0x69a @0x7
0x0693…06a5 at0008 = ╱5c╱Ø╱ // 0x69b @0x8
0x0693…06a5 at0009 = ╱4e╱N╱ // 0x69c @0x9
0x0693…06a5 at000a = ╱4d╱M╱ // 0x69d @0xa
0x0693…06a5 at000b = ╱4f╱O╱ // 0x69e @0xb
0x0693…06a5 at000c = ╱44╱D╱ // 0x69f @0xc
0x0693…06a5 at000d = ╱ed╱(╱ // 0x6a0 @0xd
0x0693…06a5 at000e = ╱47╱G╱ // 0x6a1 @0xe
0x0693…06a5 at000f = ╱35╱5╱ // 0x6a2 @0xf
0x0693…06a5 at0010 = ╱ee╱)╱ // 0x6a3 @0x10
0x0693…06a5 at0011 = EOL // 0x6a4 @0x11
0x0693…06a5 }
0x06a5…06b9 9410 0860 PUT C9$,G*G5-E:D1$
0x06a5…06b9 LineComalBin {
0x06a5…06b9 ptr = 0x9410 // 0x6a5 @0x0
0x06a5…06b9 lno = 0x035c // 0x6a7 @0x2
0x06a5…06b9 at0004 = ╱aa╱ PUT ╱ // 0x6a9 @0x4
0x06a5…06b9 at0005 = ╱43╱C╱ // 0x6aa @0x5
0x06a5…06b9 at0006 = ╱39╱9╱ // 0x6ab @0x6
0x06a5…06b9 at0007 = ╱ef╱$╱ // 0x6ac @0x7
0x06a5…06b9 at0008 = ╱ec╱,╱ // 0x6ad @0x8
0x06a5…06b9 at0009 = ╱47╱G╱ // 0x6ae @0x9
0x06a5…06b9 at000a = ╱e4╱*╱ // 0x6af @0xa
0x06a5…06b9 at000b = ╱47╱G╱ // 0x6b0 @0xb
0x06a5…06b9 at000c = ╱35╱5╱ // 0x6b1 @0xc
0x06a5…06b9 at000d = ╱e3╱-╱ // 0x6b2 @0xd
0x06a5…06b9 at000e = ╱45╱E╱ // 0x6b3 @0xe
0x06a5…06b9 at000f = ╱f0╱:╱ // 0x6b4 @0xf
0x06a5…06b9 at0010 = ╱44╱D╱ // 0x6b5 @0x10
0x06a5…06b9 at0011 = ╱31╱1╱ // 0x6b6 @0x11
0x06a5…06b9 at0012 = ╱ef╱$╱ // 0x6b7 @0x12
0x06a5…06b9 at0013 = EOL // 0x6b8 @0x13
0x06a5…06b9 }
0x06b9…06ec 9443 0870 PUT C9$,G*G5:D2$,G6,G7,G8,G9,H0,H1,H2,H3,H4,H5,H6
0x06b9…06ec LineComalBin {
0x06b9…06ec ptr = 0x9443 // 0x6b9 @0x0
0x06b9…06ec lno = 0x0366 // 0x6bb @0x2
0x06b9…06ec at0004 = ╱aa╱ PUT ╱ // 0x6bd @0x4
0x06b9…06ec at0005 = ╱43╱C╱ // 0x6be @0x5
0x06b9…06ec at0006 = ╱39╱9╱ // 0x6bf @0x6
0x06b9…06ec at0007 = ╱ef╱$╱ // 0x6c0 @0x7
0x06b9…06ec at0008 = ╱ec╱,╱ // 0x6c1 @0x8
0x06b9…06ec at0009 = ╱47╱G╱ // 0x6c2 @0x9
0x06b9…06ec at000a = ╱e4╱*╱ // 0x6c3 @0xa
0x06b9…06ec at000b = ╱47╱G╱ // 0x6c4 @0xb
0x06b9…06ec at000c = ╱35╱5╱ // 0x6c5 @0xc
0x06b9…06ec at000d = ╱f0╱:╱ // 0x6c6 @0xd
0x06b9…06ec at000e = ╱44╱D╱ // 0x6c7 @0xe
0x06b9…06ec at000f = ╱32╱2╱ // 0x6c8 @0xf
0x06b9…06ec at0010 = ╱ef╱$╱ // 0x6c9 @0x10
0x06b9…06ec at0011 = ╱ec╱,╱ // 0x6ca @0x11
0x06b9…06ec at0012 = ╱47╱G╱ // 0x6cb @0x12
0x06b9…06ec at0013 = ╱36╱6╱ // 0x6cc @0x13
0x06b9…06ec at0014 = ╱ec╱,╱ // 0x6cd @0x14
0x06b9…06ec at0015 = ╱47╱G╱ // 0x6ce @0x15
0x06b9…06ec at0016 = ╱37╱7╱ // 0x6cf @0x16
0x06b9…06ec at0017 = ╱ec╱,╱ // 0x6d0 @0x17
0x06b9…06ec at0018 = ╱47╱G╱ // 0x6d1 @0x18
0x06b9…06ec at0019 = ╱38╱8╱ // 0x6d2 @0x19
0x06b9…06ec at001a = ╱ec╱,╱ // 0x6d3 @0x1a
0x06b9…06ec at001b = ╱47╱G╱ // 0x6d4 @0x1b
0x06b9…06ec at001c = ╱39╱9╱ // 0x6d5 @0x1c
0x06b9…06ec at001d = ╱ec╱,╱ // 0x6d6 @0x1d
0x06b9…06ec at001e = ╱48╱H╱ // 0x6d7 @0x1e
0x06b9…06ec at001f = ╱30╱0╱ // 0x6d8 @0x1f
0x06b9…06ec at0020 = ╱ec╱,╱ // 0x6d9 @0x20
0x06b9…06ec at0021 = ╱48╱H╱ // 0x6da @0x21
0x06b9…06ec at0022 = ╱31╱1╱ // 0x6db @0x22
0x06b9…06ec at0023 = ╱ec╱,╱ // 0x6dc @0x23
0x06b9…06ec at0024 = ╱48╱H╱ // 0x6dd @0x24
0x06b9…06ec at0025 = ╱32╱2╱ // 0x6de @0x25
0x06b9…06ec at0026 = ╱ec╱,╱ // 0x6df @0x26
0x06b9…06ec at0027 = ╱48╱H╱ // 0x6e0 @0x27
0x06b9…06ec at0028 = ╱33╱3╱ // 0x6e1 @0x28
0x06b9…06ec at0029 = ╱ec╱,╱ // 0x6e2 @0x29
0x06b9…06ec at002a = ╱48╱H╱ // 0x6e3 @0x2a
0x06b9…06ec at002b = ╱34╱4╱ // 0x6e4 @0x2b
0x06b9…06ec at002c = ╱ec╱,╱ // 0x6e5 @0x2c
0x06b9…06ec at002d = ╱48╱H╱ // 0x6e6 @0x2d
0x06b9…06ec at002e = ╱35╱5╱ // 0x6e7 @0x2e
0x06b9…06ec at002f = ╱ec╱,╱ // 0x6e8 @0x2f
0x06b9…06ec at0030 = ╱48╱H╱ // 0x6e9 @0x30
0x06b9…06ec at0031 = ╱36╱6╱ // 0x6ea @0x31
0x06b9…06ec at0032 = EOL // 0x6eb @0x32
0x06b9…06ec }
0x06ec…0702 9459 0880 EXEC F(2,G5,C9$)
0x06ec…0702 LineComalBin {
0x06ec…0702 ptr = 0x9459 // 0x6ec @0x0
0x06ec…0702 lno = 0x0370 // 0x6ee @0x2
0x06ec…0702 at0004 = ╱9d╱ EXEC ╱ // 0x6f0 @0x4
0x06ec…0702 at0005 = ╱46╱F╱ // 0x6f1 @0x5
0x06ec…0702 at0006 = ╱ed╱(╱ // 0x6f2 @0x6
0x06ec…0702 at0007 = ╱32╱2╱ // 0x6f3 @0x7
0x06ec…0702 at0008 = ╱fe00008002╱ // 0x6f4 @0x8
0x06ec…0702 at000d = ╱ec╱,╱ // 0x6f9 @0xd
0x06ec…0702 at000e = ╱47╱G╱ // 0x6fa @0xe
0x06ec…0702 at000f = ╱35╱5╱ // 0x6fb @0xf
0x06ec…0702 at0010 = ╱ec╱,╱ // 0x6fc @0x10
0x06ec…0702 at0011 = ╱43╱C╱ // 0x6fd @0x11
0x06ec…0702 at0012 = ╱39╱9╱ // 0x6fe @0x12
0x06ec…0702 at0013 = ╱ef╱$╱ // 0x6ff @0x13
0x06ec…0702 at0014 = ╱ee╱)╱ // 0x700 @0x14
0x06ec…0702 at0015 = EOL // 0x701 @0x15
0x06ec…0702 }
0x0702…0708 945f 0890 ENDPROC
0x0702…0708 LineComalBin {
0x0702…0708 ptr = 0x945f // 0x702 @0x0
0x0702…0708 lno = 0x037a // 0x704 @0x2
0x0702…0708 at0004 = ╱9f╱ ENDPROC ╱ // 0x706 @0x4
0x0702…0708 at0005 = EOL // 0x707 @0x5
0x0702…0708 }
0x0708…071c 9473 0900 PROC CONV(H7,H8,H9)
0x0708…071c LineComalBin {
0x0708…071c ptr = 0x9473 // 0x708 @0x0
0x0708…071c lno = 0x0384 // 0x70a @0x2
0x0708…071c at0004 = ╱9e╱ PROC ╱ // 0x70c @0x4
0x0708…071c at0005 = ╱43╱C╱ // 0x70d @0x5
0x0708…071c at0006 = ╱4f╱O╱ // 0x70e @0x6
0x0708…071c at0007 = ╱4e╱N╱ // 0x70f @0x7
0x0708…071c at0008 = ╱56╱V╱ // 0x710 @0x8
0x0708…071c at0009 = ╱ed╱(╱ // 0x711 @0x9
0x0708…071c at000a = ╱48╱H╱ // 0x712 @0xa
0x0708…071c at000b = ╱37╱7╱ // 0x713 @0xb
0x0708…071c at000c = ╱ec╱,╱ // 0x714 @0xc
0x0708…071c at000d = ╱48╱H╱ // 0x715 @0xd
0x0708…071c at000e = ╱38╱8╱ // 0x716 @0xe
0x0708…071c at000f = ╱ec╱,╱ // 0x717 @0xf
0x0708…071c at0010 = ╱48╱H╱ // 0x718 @0x10
0x0708…071c at0011 = ╱39╱9╱ // 0x719 @0x11
0x0708…071c at0012 = ╱ee╱)╱ // 0x71a @0x12
0x0708…071c at0013 = EOL // 0x71b @0x13
0x0708…071c }
0x071c…072d 9484 0910 I0=H8;H7$=""
0x071c…072d LineComalBin {
0x071c…072d ptr = 0x9484 // 0x71c @0x0
0x071c…072d lno = 0x038e // 0x71e @0x2
0x071c…072d at0004 = ╱49╱I╱ // 0x720 @0x4
0x071c…072d at0005 = ╱30╱0╱ // 0x721 @0x5
0x071c…072d at0006 = ╱dc╱=╱ // 0x722 @0x6
0x071c…072d at0007 = ╱48╱H╱ // 0x723 @0x7
0x071c…072d at0008 = ╱38╱8╱ // 0x724 @0x8
0x071c…072d at0009 = ╱eb╱;╱ // 0x725 @0x9
0x071c…072d at000a = ╱48╱H╱ // 0x726 @0xa
0x071c…072d at000b = ╱37╱7╱ // 0x727 @0xb
0x071c…072d at000c = ╱ef╱$╱ // 0x728 @0xc
0x071c…072d at000d = ╱dc╱=╱ // 0x729 @0xd
0x071c…072d at000e = ╱22╱"╱ // 0x72a @0xe
0x071c…072d at000f = ╱22╱"╱ // 0x72b @0xf
0x071c…072d at0010 = EOL // 0x72c @0x10
0x071c…072d }
0x072d…0733 948a 0930 REPEAT
0x072d…0733 LineComalBin {
0x072d…0733 ptr = 0x948a // 0x72d @0x0
0x072d…0733 lno = 0x03a2 // 0x72f @0x2
0x072d…0733 at0004 = ╱97╱ REPEAT ╱ // 0x731 @0x4
0x072d…0733 at0005 = EOL // 0x732 @0x5
0x072d…0733 }
0x0733…0763 94ba 0940 H7$=CHR((I0 MOD TI)+48)+H7$;H9=H9-E;I0=I0 DIV TI
0x0733…0763 LineComalBin {
0x0733…0763 ptr = 0x94ba // 0x733 @0x0
0x0733…0763 lno = 0x03ac // 0x735 @0x2
0x0733…0763 at0004 = ╱48╱H╱ // 0x737 @0x4
0x0733…0763 at0005 = ╱37╱7╱ // 0x738 @0x5
0x0733…0763 at0006 = ╱ef╱$╱ // 0x739 @0x6
0x0733…0763 at0007 = ╱dc╱=╱ // 0x73a @0x7
0x0733…0763 at0008 = ╱cf╱CHR╱ // 0x73b @0x8
0x0733…0763 at0009 = ╱ed╱(╱ // 0x73c @0x9
0x0733…0763 at000a = ╱ed╱(╱ // 0x73d @0xa
0x0733…0763 at000b = ╱49╱I╱ // 0x73e @0xb
0x0733…0763 at000c = ╱30╱0╱ // 0x73f @0xc
0x0733…0763 at000d = ╱e8╱ MOD ╱ // 0x740 @0xd
0x0733…0763 at000e = ╱54╱T╱ // 0x741 @0xe
0x0733…0763 at000f = ╱49╱I╱ // 0x742 @0xf
0x0733…0763 at0010 = ╱ee╱)╱ // 0x743 @0x10
0x0733…0763 at0011 = ╱e2╱+╱ // 0x744 @0x11
0x0733…0763 at0012 = ╱34╱4╱ // 0x745 @0x12
0x0733…0763 at0013 = ╱38╱8╱ // 0x746 @0x13
0x0733…0763 at0014 = ╱fe0000c006╱ // 0x747 @0x14
0x0733…0763 at0019 = ╱ee╱)╱ // 0x74c @0x19
0x0733…0763 at001a = ╱f1╱+╱ // 0x74d @0x1a
0x0733…0763 at001b = ╱48╱H╱ // 0x74e @0x1b
0x0733…0763 at001c = ╱37╱7╱ // 0x74f @0x1c
0x0733…0763 at001d = ╱ef╱$╱ // 0x750 @0x1d
0x0733…0763 at001e = ╱eb╱;╱ // 0x751 @0x1e
0x0733…0763 at001f = ╱48╱H╱ // 0x752 @0x1f
0x0733…0763 at0020 = ╱39╱9╱ // 0x753 @0x20
0x0733…0763 at0021 = ╱dc╱=╱ // 0x754 @0x21
0x0733…0763 at0022 = ╱48╱H╱ // 0x755 @0x22
0x0733…0763 at0023 = ╱39╱9╱ // 0x756 @0x23
0x0733…0763 at0024 = ╱e3╱-╱ // 0x757 @0x24
0x0733…0763 at0025 = ╱45╱E╱ // 0x758 @0x25
0x0733…0763 at0026 = ╱eb╱;╱ // 0x759 @0x26
0x0733…0763 at0027 = ╱49╱I╱ // 0x75a @0x27
0x0733…0763 at0028 = ╱30╱0╱ // 0x75b @0x28
0x0733…0763 at0029 = ╱dc╱=╱ // 0x75c @0x29
0x0733…0763 at002a = ╱49╱I╱ // 0x75d @0x2a
0x0733…0763 at002b = ╱30╱0╱ // 0x75e @0x2b
0x0733…0763 at002c = ╱e7╱ DIV ╱ // 0x75f @0x2c
0x0733…0763 at002d = ╱54╱T╱ // 0x760 @0x2d
0x0733…0763 at002e = ╱49╱I╱ // 0x761 @0x2e
0x0733…0763 at002f = EOL // 0x762 @0x2f
0x0733…0763 }
0x0763…0777 94ce 0970 IF H9<B AND I0=B THEN H9=B
0x0763…0777 LineComalBin {
0x0763…0777 ptr = 0x94ce // 0x763 @0x0
0x0763…0777 lno = 0x03ca // 0x765 @0x2
0x0763…0777 at0004 = ╱82╱ IF ╱ // 0x767 @0x4
0x0763…0777 at0005 = ╱48╱H╱ // 0x768 @0x5
0x0763…0777 at0006 = ╱39╱9╱ // 0x769 @0x6
0x0763…0777 at0007 = ╱dd╱<╱ // 0x76a @0x7
0x0763…0777 at0008 = ╱42╱B╱ // 0x76b @0x8
0x0763…0777 at0009 = ╱da╱ AND ╱ // 0x76c @0x9
0x0763…0777 at000a = ╱49╱I╱ // 0x76d @0xa
0x0763…0777 at000b = ╱30╱0╱ // 0x76e @0xb
0x0763…0777 at000c = ╱dc╱=╱ // 0x76f @0xc
0x0763…0777 at000d = ╱42╱B╱ // 0x770 @0xd
0x0763…0777 at000e = ╱b6╱ THEN ╱ // 0x771 @0xe
0x0763…0777 at000f = ╱48╱H╱ // 0x772 @0xf
0x0763…0777 at0010 = ╱39╱9╱ // 0x773 @0x10
0x0763…0777 at0011 = ╱dc╱=╱ // 0x774 @0x11
0x0763…0777 at0012 = ╱42╱B╱ // 0x775 @0x12
0x0763…0777 at0013 = EOL // 0x776 @0x13
0x0763…0777 }
0x0777…0781 94d8 0980 UNTIL H9=B
0x0777…0781 LineComalBin {
0x0777…0781 ptr = 0x94d8 // 0x777 @0x0
0x0777…0781 lno = 0x03d4 // 0x779 @0x2
0x0777…0781 at0004 = ╱98╱ UNTIL ╱ // 0x77b @0x4
0x0777…0781 at0005 = ╱48╱H╱ // 0x77c @0x5
0x0777…0781 at0006 = ╱39╱9╱ // 0x77d @0x6
0x0777…0781 at0007 = ╱dc╱=╱ // 0x77e @0x7
0x0777…0781 at0008 = ╱42╱B╱ // 0x77f @0x8
0x0777…0781 at0009 = EOL // 0x780 @0x9
0x0777…0781 }
0x0781…0787 94de 0990 ENDPROC
0x0781…0787 LineComalBin {
0x0781…0787 ptr = 0x94de // 0x781 @0x0
0x0781…0787 lno = 0x03de // 0x783 @0x2
0x0781…0787 at0004 = ╱9f╱ ENDPROC ╱ // 0x785 @0x4
0x0781…0787 at0005 = EOL // 0x786 @0x5
0x0781…0787 }
0x0787…0794 94eb 1890 PROC INDVIRK
0x0787…0794 LineComalBin {
0x0787…0794 ptr = 0x94eb // 0x787 @0x0
0x0787…0794 lno = 0x0762 // 0x789 @0x2
0x0787…0794 at0004 = ╱9e╱ PROC ╱ // 0x78b @0x4
0x0787…0794 at0005 = ╱49╱I╱ // 0x78c @0x5
0x0787…0794 at0006 = ╱4e╱N╱ // 0x78d @0x6
0x0787…0794 at0007 = ╱44╱D╱ // 0x78e @0x7
0x0787…0794 at0008 = ╱56╱V╱ // 0x78f @0x8
0x0787…0794 at0009 = ╱49╱I╱ // 0x790 @0x9
0x0787…0794 at000a = ╱52╱R╱ // 0x791 @0xa
0x0787…0794 at000b = ╱4b╱K╱ // 0x792 @0xb
0x0787…0794 at000c = EOL // 0x793 @0xc
0x0787…0794 }
0x0794…079f 94f6 1900 OPEN C9$,R
0x0794…079f LineComalBin {
0x0794…079f ptr = 0x94f6 // 0x794 @0x0
0x0794…079f lno = 0x076c // 0x796 @0x2
0x0794…079f at0004 = ╱a7╱ OPEN ╱ // 0x798 @0x4
0x0794…079f at0005 = ╱43╱C╱ // 0x799 @0x5
0x0794…079f at0006 = ╱39╱9╱ // 0x79a @0x6
0x0794…079f at0007 = ╱ef╱$╱ // 0x79b @0x7
0x0794…079f at0008 = ╱ec╱,╱ // 0x79c @0x8
0x0794…079f at0009 = ╱52╱R╱ // 0x79d @0x9
0x0794…079f at000a = EOL // 0x79e @0xa
0x0794…079f }
0x079f…07b9 9510 1910 EXEC F(0,0,C9$)
0x079f…07b9 LineComalBin {
0x079f…07b9 ptr = 0x9510 // 0x79f @0x0
0x079f…07b9 lno = 0x0776 // 0x7a1 @0x2
0x079f…07b9 at0004 = ╱9d╱ EXEC ╱ // 0x7a3 @0x4
0x079f…07b9 at0005 = ╱46╱F╱ // 0x7a4 @0x5
0x079f…07b9 at0006 = ╱ed╱(╱ // 0x7a5 @0x6
0x079f…07b9 at0007 = ╱30╱0╱ // 0x7a6 @0x7
0x079f…07b9 at0008 = ╱fe00000000╱ // 0x7a7 @0x8
0x079f…07b9 at000d = ╱ec╱,╱ // 0x7ac @0xd
0x079f…07b9 at000e = ╱30╱0╱ // 0x7ad @0xe
0x079f…07b9 at000f = ╱fe00000000╱ // 0x7ae @0xf
0x079f…07b9 at0014 = ╱ec╱,╱ // 0x7b3 @0x14
0x079f…07b9 at0015 = ╱43╱C╱ // 0x7b4 @0x15
0x079f…07b9 at0016 = ╱39╱9╱ // 0x7b5 @0x16
0x079f…07b9 at0017 = ╱ef╱$╱ // 0x7b6 @0x17
0x079f…07b9 at0018 = ╱ee╱)╱ // 0x7b7 @0x18
0x079f…07b9 at0019 = EOL // 0x7b8 @0x19
0x079f…07b9 }
0x07b9…07c8 951f 1920 GET C9$,E:D3$
0x07b9…07c8 LineComalBin {
0x07b9…07c8 ptr = 0x951f // 0x7b9 @0x0
0x07b9…07c8 lno = 0x0780 // 0x7bb @0x2
0x07b9…07c8 at0004 = ╱a9╱ GET ╱ // 0x7bd @0x4
0x07b9…07c8 at0005 = ╱43╱C╱ // 0x7be @0x5
0x07b9…07c8 at0006 = ╱39╱9╱ // 0x7bf @0x6
0x07b9…07c8 at0007 = ╱ef╱$╱ // 0x7c0 @0x7
0x07b9…07c8 at0008 = ╱ec╱,╱ // 0x7c1 @0x8
0x07b9…07c8 at0009 = ╱45╱E╱ // 0x7c2 @0x9
0x07b9…07c8 at000a = ╱f0╱:╱ // 0x7c3 @0xa
0x07b9…07c8 at000b = ╱44╱D╱ // 0x7c4 @0xb
0x07b9…07c8 at000c = ╱33╱3╱ // 0x7c5 @0xc
0x07b9…07c8 at000d = ╱ef╱$╱ // 0x7c6 @0xd
0x07b9…07c8 at000e = EOL // 0x7c7 @0xe
0x07b9…07c8 }
0x07c8…07e0 9537 1930 GET C9$,G:D4$,I8,I9,J0
0x07c8…07e0 LineComalBin {
0x07c8…07e0 ptr = 0x9537 // 0x7c8 @0x0
0x07c8…07e0 lno = 0x078a // 0x7ca @0x2
0x07c8…07e0 at0004 = ╱a9╱ GET ╱ // 0x7cc @0x4
0x07c8…07e0 at0005 = ╱43╱C╱ // 0x7cd @0x5
0x07c8…07e0 at0006 = ╱39╱9╱ // 0x7ce @0x6
0x07c8…07e0 at0007 = ╱ef╱$╱ // 0x7cf @0x7
0x07c8…07e0 at0008 = ╱ec╱,╱ // 0x7d0 @0x8
0x07c8…07e0 at0009 = ╱47╱G╱ // 0x7d1 @0x9
0x07c8…07e0 at000a = ╱f0╱:╱ // 0x7d2 @0xa
0x07c8…07e0 at000b = ╱44╱D╱ // 0x7d3 @0xb
0x07c8…07e0 at000c = ╱34╱4╱ // 0x7d4 @0xc
0x07c8…07e0 at000d = ╱ef╱$╱ // 0x7d5 @0xd
0x07c8…07e0 at000e = ╱ec╱,╱ // 0x7d6 @0xe
0x07c8…07e0 at000f = ╱49╱I╱ // 0x7d7 @0xf
0x07c8…07e0 at0010 = ╱38╱8╱ // 0x7d8 @0x10
0x07c8…07e0 at0011 = ╱ec╱,╱ // 0x7d9 @0x11
0x07c8…07e0 at0012 = ╱49╱I╱ // 0x7da @0x12
0x07c8…07e0 at0013 = ╱39╱9╱ // 0x7db @0x13
0x07c8…07e0 at0014 = ╱ec╱,╱ // 0x7dc @0x14
0x07c8…07e0 at0015 = ╱4a╱J╱ // 0x7dd @0x15
0x07c8…07e0 at0016 = ╱30╱0╱ // 0x7de @0x16
0x07c8…07e0 at0017 = EOL // 0x7df @0x17
0x07c8…07e0 }
0x07e0…07f0 9547 1935 GET C9$,V:DAD$
0x07e0…07f0 LineComalBin {
0x07e0…07f0 ptr = 0x9547 // 0x7e0 @0x0
0x07e0…07f0 lno = 0x078f // 0x7e2 @0x2
0x07e0…07f0 at0004 = ╱a9╱ GET ╱ // 0x7e4 @0x4
0x07e0…07f0 at0005 = ╱43╱C╱ // 0x7e5 @0x5
0x07e0…07f0 at0006 = ╱39╱9╱ // 0x7e6 @0x6
0x07e0…07f0 at0007 = ╱ef╱$╱ // 0x7e7 @0x7
0x07e0…07f0 at0008 = ╱ec╱,╱ // 0x7e8 @0x8
0x07e0…07f0 at0009 = ╱56╱V╱ // 0x7e9 @0x9
0x07e0…07f0 at000a = ╱f0╱:╱ // 0x7ea @0xa
0x07e0…07f0 at000b = ╱44╱D╱ // 0x7eb @0xb
0x07e0…07f0 at000c = ╱41╱A╱ // 0x7ec @0xc
0x07e0…07f0 at000d = ╱44╱D╱ // 0x7ed @0xd
0x07e0…07f0 at000e = ╱ef╱$╱ // 0x7ee @0xe
0x07e0…07f0 at000f = EOL // 0x7ef @0xf
0x07e0…07f0 }
0x07f0…07f6 954d 1940 ENDPROC
0x07f0…07f6 LineComalBin {
0x07f0…07f6 ptr = 0x954d // 0x7f0 @0x0
0x07f0…07f6 lno = 0x0794 // 0x7f2 @0x2
0x07f0…07f6 at0004 = ╱9f╱ ENDPROC ╱ // 0x7f4 @0x4
0x07f0…07f6 at0005 = EOL // 0x7f5 @0x5
0x07f0…07f6 }
0x07f6…0807 955e 1950 PROC F(J1,J2,J3)
0x07f6…0807 LineComalBin {
0x07f6…0807 ptr = 0x955e // 0x7f6 @0x0
0x07f6…0807 lno = 0x079e // 0x7f8 @0x2
0x07f6…0807 at0004 = ╱9e╱ PROC ╱ // 0x7fa @0x4
0x07f6…0807 at0005 = ╱46╱F╱ // 0x7fb @0x5
0x07f6…0807 at0006 = ╱ed╱(╱ // 0x7fc @0x6
0x07f6…0807 at0007 = ╱4a╱J╱ // 0x7fd @0x7
0x07f6…0807 at0008 = ╱31╱1╱ // 0x7fe @0x8
0x07f6…0807 at0009 = ╱ec╱,╱ // 0x7ff @0x9
0x07f6…0807 at000a = ╱4a╱J╱ // 0x800 @0xa
0x07f6…0807 at000b = ╱32╱2╱ // 0x801 @0xb
0x07f6…0807 at000c = ╱ec╱,╱ // 0x802 @0xc
0x07f6…0807 at000d = ╱4a╱J╱ // 0x803 @0xd
0x07f6…0807 at000e = ╱33╱3╱ // 0x804 @0xe
0x07f6…0807 at000f = ╱ee╱)╱ // 0x805 @0xf
0x07f6…0807 at0010 = EOL // 0x806 @0x10
0x07f6…0807 }
0x0807…0816 956d 1960 IF STATUS(J3$)<>B THEN
0x0807…0816 LineComalBin {
0x0807…0816 ptr = 0x956d // 0x807 @0x0
0x0807…0816 lno = 0x07a8 // 0x809 @0x2
0x0807…0816 at0004 = ╱9c╱ IF ╱ // 0x80b @0x4
0x0807…0816 at0005 = ╱ce╱STATUS╱ // 0x80c @0x5
0x0807…0816 at0006 = ╱ed╱(╱ // 0x80d @0x6
0x0807…0816 at0007 = ╱4a╱J╱ // 0x80e @0x7
0x0807…0816 at0008 = ╱33╱3╱ // 0x80f @0x8
0x0807…0816 at0009 = ╱ef╱$╱ // 0x810 @0x9
0x0807…0816 at000a = ╱ee╱)╱ // 0x811 @0xa
0x0807…0816 at000b = ╱e1╱<>╱ // 0x812 @0xb
0x0807…0816 at000c = ╱42╱B╱ // 0x813 @0xc
0x0807…0816 at000d = ╱b6╱ THEN ╱ // 0x814 @0xd
0x0807…0816 at000e = EOL // 0x815 @0xe
0x0807…0816 }
0x0816…081d 9574 1970 OUTPUT T
0x0816…081d LineComalBin {
0x0816…081d ptr = 0x9574 // 0x816 @0x0
0x0816…081d lno = 0x07b2 // 0x818 @0x2
0x0816…081d at0004 = ╱a5╱ OUTPUT ╱ // 0x81a @0x4
0x0816…081d at0005 = ╱54╱T╱ // 0x81b @0x5
0x0816…081d at0006 = EOL // 0x81c @0x6
0x0816…081d }
0x081d…083f 9596 1980 PRINT "FIL-FEJL ";J3$;STATUS(J3$),J1;J2
0x081d…083f LineComalBin {
0x081d…083f ptr = 0x9596 // 0x81d @0x0
0x081d…083f lno = 0x07bc // 0x81f @0x2
0x081d…083f at0004 = ╱92╱ PRINT ╱ // 0x821 @0x4
0x081d…083f at0005 = ╱22╱"╱ // 0x822 @0x5
0x081d…083f at0006 = ╱46╱F╱ // 0x823 @0x6
0x081d…083f at0007 = ╱49╱I╱ // 0x824 @0x7
0x081d…083f at0008 = ╱4c╱L╱ // 0x825 @0x8
0x081d…083f at0009 = ╱2d╱-╱ // 0x826 @0x9
0x081d…083f at000a = ╱46╱F╱ // 0x827 @0xa
0x081d…083f at000b = ╱45╱E╱ // 0x828 @0xb
0x081d…083f at000c = ╱4a╱J╱ // 0x829 @0xc
0x081d…083f at000d = ╱4c╱L╱ // 0x82a @0xd
0x081d…083f at000e = ╱20╱…╱ // 0x82b @0xe
0x081d…083f at000f = ╱22╱"╱ // 0x82c @0xf
0x081d…083f at0010 = ╱eb╱;╱ // 0x82d @0x10
0x081d…083f at0011 = ╱4a╱J╱ // 0x82e @0x11
0x081d…083f at0012 = ╱33╱3╱ // 0x82f @0x12
0x081d…083f at0013 = ╱ef╱$╱ // 0x830 @0x13
0x081d…083f at0014 = ╱eb╱;╱ // 0x831 @0x14
0x081d…083f at0015 = ╱ce╱STATUS╱ // 0x832 @0x15
0x081d…083f at0016 = ╱ed╱(╱ // 0x833 @0x16
0x081d…083f at0017 = ╱4a╱J╱ // 0x834 @0x17
0x081d…083f at0018 = ╱33╱3╱ // 0x835 @0x18
0x081d…083f at0019 = ╱ef╱$╱ // 0x836 @0x19
0x081d…083f at001a = ╱ee╱)╱ // 0x837 @0x1a
0x081d…083f at001b = ╱ec╱,╱ // 0x838 @0x1b
0x081d…083f at001c = ╱4a╱J╱ // 0x839 @0x1c
0x081d…083f at001d = ╱31╱1╱ // 0x83a @0x1d
0x081d…083f at001e = ╱eb╱;╱ // 0x83b @0x1e
0x081d…083f at001f = ╱4a╱J╱ // 0x83c @0x1f
0x081d…083f at0020 = ╱32╱2╱ // 0x83d @0x20
0x081d…083f at0021 = EOL // 0x83e @0x21
0x081d…083f }
0x083f…0845 959c 1990 STOP
0x083f…0845 LineComalBin {
0x083f…0845 ptr = 0x959c // 0x83f @0x0
0x083f…0845 lno = 0x07c6 // 0x841 @0x2
0x083f…0845 at0004 = ╱8d╱ STOP ╱ // 0x843 @0x4
0x083f…0845 at0005 = EOL // 0x844 @0x5
0x083f…0845 }
0x0845…084b 95a2 2000 ENDIF
0x0845…084b LineComalBin {
0x0845…084b ptr = 0x95a2 // 0x845 @0x0
0x0845…084b lno = 0x07d0 // 0x847 @0x2
0x0845…084b at0004 = ╱9b╱ ENDIF ╱ // 0x849 @0x4
0x0845…084b at0005 = EOL // 0x84a @0x5
0x0845…084b }
0x084b…0851 95a8 2010 ENDPROC
0x084b…0851 LineComalBin {
0x084b…0851 ptr = 0x95a8 // 0x84b @0x0
0x084b…0851 lno = 0x07da // 0x84d @0x2
0x084b…0851 at0004 = ╱9f╱ ENDPROC ╱ // 0x84f @0x4
0x084b…0851 at0005 = EOL // 0x850 @0x5
0x084b…0851 }
0x0851…0858 95af 2430 PROC Å
0x0851…0858 LineComalBin {
0x0851…0858 ptr = 0x95af // 0x851 @0x0
0x0851…0858 lno = 0x097e // 0x853 @0x2
0x0851…0858 at0004 = ╱9e╱ PROC ╱ // 0x855 @0x4
0x0851…0858 at0005 = ╱5d╱Å╱ // 0x856 @0x5
0x0851…0858 at0006 = EOL // 0x857 @0x6
0x0851…0858 }
0x0858…0872 95c9 2440 EXEC CONV(OP1$,J5,2)
0x0858…0872 LineComalBin {
0x0858…0872 ptr = 0x95c9 // 0x858 @0x0
0x0858…0872 lno = 0x0988 // 0x85a @0x2
0x0858…0872 at0004 = ╱9d╱ EXEC ╱ // 0x85c @0x4
0x0858…0872 at0005 = ╱43╱C╱ // 0x85d @0x5
0x0858…0872 at0006 = ╱4f╱O╱ // 0x85e @0x6
0x0858…0872 at0007 = ╱4e╱N╱ // 0x85f @0x7
0x0858…0872 at0008 = ╱56╱V╱ // 0x860 @0x8
0x0858…0872 at0009 = ╱ed╱(╱ // 0x861 @0x9
0x0858…0872 at000a = ╱4f╱O╱ // 0x862 @0xa
0x0858…0872 at000b = ╱50╱P╱ // 0x863 @0xb
0x0858…0872 at000c = ╱31╱1╱ // 0x864 @0xc
0x0858…0872 at000d = ╱ef╱$╱ // 0x865 @0xd
0x0858…0872 at000e = ╱ec╱,╱ // 0x866 @0xe
0x0858…0872 at000f = ╱4a╱J╱ // 0x867 @0xf
0x0858…0872 at0010 = ╱35╱5╱ // 0x868 @0x10
0x0858…0872 at0011 = ╱ec╱,╱ // 0x869 @0x11
0x0858…0872 at0012 = ╱32╱2╱ // 0x86a @0x12
0x0858…0872 at0013 = ╱fe00008002╱ // 0x86b @0x13
0x0858…0872 at0018 = ╱ee╱)╱ // 0x870 @0x18
0x0858…0872 at0019 = EOL // 0x871 @0x19
0x0858…0872 }
0x0872…08bb 9612 2450 F0$(E)=D5$(29);F0$(G,V)=OP1$;F0$(5:20)=D5$(G,21)
0x0872…08bb LineComalBin {
0x0872…08bb ptr = 0x9612 // 0x872 @0x0
0x0872…08bb lno = 0x0992 // 0x874 @0x2
0x0872…08bb at0004 = ╱46╱F╱ // 0x876 @0x4
0x0872…08bb at0005 = ╱30╱0╱ // 0x877 @0x5
0x0872…08bb at0006 = ╱ef╱$╱ // 0x878 @0x6
0x0872…08bb at0007 = ╱ed╱(╱ // 0x879 @0x7
0x0872…08bb at0008 = ╱45╱E╱ // 0x87a @0x8
0x0872…08bb at0009 = ╱ee╱)╱ // 0x87b @0x9
0x0872…08bb at000a = ╱dc╱=╱ // 0x87c @0xa
0x0872…08bb at000b = ╱44╱D╱ // 0x87d @0xb
0x0872…08bb at000c = ╱35╱5╱ // 0x87e @0xc
0x0872…08bb at000d = ╱ef╱$╱ // 0x87f @0xd
0x0872…08bb at000e = ╱ed╱(╱ // 0x880 @0xe
0x0872…08bb at000f = ╱32╱2╱ // 0x881 @0xf
0x0872…08bb at0010 = ╱39╱9╱ // 0x882 @0x10
0x0872…08bb at0011 = ╱fe0000e805╱ // 0x883 @0x11
0x0872…08bb at0016 = ╱ee╱)╱ // 0x888 @0x16
0x0872…08bb at0017 = ╱eb╱;╱ // 0x889 @0x17
0x0872…08bb at0018 = ╱46╱F╱ // 0x88a @0x18
0x0872…08bb at0019 = ╱30╱0╱ // 0x88b @0x19
0x0872…08bb at001a = ╱ef╱$╱ // 0x88c @0x1a
0x0872…08bb at001b = ╱ed╱(╱ // 0x88d @0x1b
0x0872…08bb at001c = ╱47╱G╱ // 0x88e @0x1c
0x0872…08bb at001d = ╱ec╱,╱ // 0x88f @0x1d
0x0872…08bb at001e = ╱56╱V╱ // 0x890 @0x1e
0x0872…08bb at001f = ╱ee╱)╱ // 0x891 @0x1f
0x0872…08bb at0020 = ╱dc╱=╱ // 0x892 @0x20
0x0872…08bb at0021 = ╱4f╱O╱ // 0x893 @0x21
0x0872…08bb at0022 = ╱50╱P╱ // 0x894 @0x22
0x0872…08bb at0023 = ╱31╱1╱ // 0x895 @0x23
0x0872…08bb at0024 = ╱ef╱$╱ // 0x896 @0x24
0x0872…08bb at0025 = ╱eb╱;╱ // 0x897 @0x25
0x0872…08bb at0026 = ╱46╱F╱ // 0x898 @0x26
0x0872…08bb at0027 = ╱30╱0╱ // 0x899 @0x27
0x0872…08bb at0028 = ╱ef╱$╱ // 0x89a @0x28
0x0872…08bb at0029 = ╱ed╱(╱ // 0x89b @0x29
0x0872…08bb at002a = ╱35╱5╱ // 0x89c @0x2a
0x0872…08bb at002b = ╱fe0000a003╱ // 0x89d @0x2b
0x0872…08bb at0030 = ╱f0╱:╱ // 0x8a2 @0x30
0x0872…08bb at0031 = ╱32╱2╱ // 0x8a3 @0x31
0x0872…08bb at0032 = ╱30╱0╱ // 0x8a4 @0x32
0x0872…08bb at0033 = ╱fe0000a005╱ // 0x8a5 @0x33
0x0872…08bb at0038 = ╱ee╱)╱ // 0x8aa @0x38
0x0872…08bb at0039 = ╱dc╱=╱ // 0x8ab @0x39
0x0872…08bb at003a = ╱44╱D╱ // 0x8ac @0x3a
0x0872…08bb at003b = ╱35╱5╱ // 0x8ad @0x3b
0x0872…08bb at003c = ╱ef╱$╱ // 0x8ae @0x3c
0x0872…08bb at003d = ╱ed╱(╱ // 0x8af @0x3d
0x0872…08bb at003e = ╱47╱G╱ // 0x8b0 @0x3e
0x0872…08bb at003f = ╱ec╱,╱ // 0x8b1 @0x3f
0x0872…08bb at0040 = ╱32╱2╱ // 0x8b2 @0x40
0x0872…08bb at0041 = ╱31╱1╱ // 0x8b3 @0x41
0x0872…08bb at0042 = ╱fe0000a805╱ // 0x8b4 @0x42
0x0872…08bb at0047 = ╱ee╱)╱ // 0x8b9 @0x47
0x0872…08bb at0048 = EOL // 0x8ba @0x48
0x0872…08bb }
0x08bb…08e2 9639 2480 IF F0$(43)="+" THEN F0$(43)=" "
0x08bb…08e2 LineComalBin {
0x08bb…08e2 ptr = 0x9639 // 0x8bb @0x0
0x08bb…08e2 lno = 0x09b0 // 0x8bd @0x2
0x08bb…08e2 at0004 = ╱82╱ IF ╱ // 0x8bf @0x4
0x08bb…08e2 at0005 = ╱46╱F╱ // 0x8c0 @0x5
0x08bb…08e2 at0006 = ╱30╱0╱ // 0x8c1 @0x6
0x08bb…08e2 at0007 = ╱ef╱$╱ // 0x8c2 @0x7
0x08bb…08e2 at0008 = ╱ed╱(╱ // 0x8c3 @0x8
0x08bb…08e2 at0009 = ╱34╱4╱ // 0x8c4 @0x9
0x08bb…08e2 at000a = ╱33╱3╱ // 0x8c5 @0xa
0x08bb…08e2 at000b = ╱fe0000ac06╱ // 0x8c6 @0xb
0x08bb…08e2 at0010 = ╱ee╱)╱ // 0x8cb @0x10
0x08bb…08e2 at0011 = ╱dc╱=╱ // 0x8cc @0x11
0x08bb…08e2 at0012 = ╱22╱"╱ // 0x8cd @0x12
0x08bb…08e2 at0013 = ╱2b╱+╱ // 0x8ce @0x13
0x08bb…08e2 at0014 = ╱22╱"╱ // 0x8cf @0x14
0x08bb…08e2 at0015 = ╱b6╱ THEN ╱ // 0x8d0 @0x15
0x08bb…08e2 at0016 = ╱46╱F╱ // 0x8d1 @0x16
0x08bb…08e2 at0017 = ╱30╱0╱ // 0x8d2 @0x17
0x08bb…08e2 at0018 = ╱ef╱$╱ // 0x8d3 @0x18
0x08bb…08e2 at0019 = ╱ed╱(╱ // 0x8d4 @0x19
0x08bb…08e2 at001a = ╱34╱4╱ // 0x8d5 @0x1a
0x08bb…08e2 at001b = ╱33╱3╱ // 0x8d6 @0x1b
0x08bb…08e2 at001c = ╱fe0000ac06╱ // 0x8d7 @0x1c
0x08bb…08e2 at0021 = ╱ee╱)╱ // 0x8dc @0x21
0x08bb…08e2 at0022 = ╱dc╱=╱ // 0x8dd @0x22
0x08bb…08e2 at0023 = ╱22╱"╱ // 0x8de @0x23
0x08bb…08e2 at0024 = ╱20╱…╱ // 0x8df @0x24
0x08bb…08e2 at0025 = ╱22╱"╱ // 0x8e0 @0x25
0x08bb…08e2 at0026 = EOL // 0x8e1 @0x26
0x08bb…08e2 }
0x08e2…0909 9660 2490 IF F0$(54)="+" THEN F0$(54)=" "
0x08e2…0909 LineComalBin {
0x08e2…0909 ptr = 0x9660 // 0x8e2 @0x0
0x08e2…0909 lno = 0x09ba // 0x8e4 @0x2
0x08e2…0909 at0004 = ╱82╱ IF ╱ // 0x8e6 @0x4
0x08e2…0909 at0005 = ╱46╱F╱ // 0x8e7 @0x5
0x08e2…0909 at0006 = ╱30╱0╱ // 0x8e8 @0x6
0x08e2…0909 at0007 = ╱ef╱$╱ // 0x8e9 @0x7
0x08e2…0909 at0008 = ╱ed╱(╱ // 0x8ea @0x8
0x08e2…0909 at0009 = ╱35╱5╱ // 0x8eb @0x9
0x08e2…0909 at000a = ╱34╱4╱ // 0x8ec @0xa
0x08e2…0909 at000b = ╱fe0000d806╱ // 0x8ed @0xb
0x08e2…0909 at0010 = ╱ee╱)╱ // 0x8f2 @0x10
0x08e2…0909 at0011 = ╱dc╱=╱ // 0x8f3 @0x11
0x08e2…0909 at0012 = ╱22╱"╱ // 0x8f4 @0x12
0x08e2…0909 at0013 = ╱2b╱+╱ // 0x8f5 @0x13
0x08e2…0909 at0014 = ╱22╱"╱ // 0x8f6 @0x14
0x08e2…0909 at0015 = ╱b6╱ THEN ╱ // 0x8f7 @0x15
0x08e2…0909 at0016 = ╱46╱F╱ // 0x8f8 @0x16
0x08e2…0909 at0017 = ╱30╱0╱ // 0x8f9 @0x17
0x08e2…0909 at0018 = ╱ef╱$╱ // 0x8fa @0x18
0x08e2…0909 at0019 = ╱ed╱(╱ // 0x8fb @0x19
0x08e2…0909 at001a = ╱35╱5╱ // 0x8fc @0x1a
0x08e2…0909 at001b = ╱34╱4╱ // 0x8fd @0x1b
0x08e2…0909 at001c = ╱fe0000d806╱ // 0x8fe @0x1c
0x08e2…0909 at0021 = ╱ee╱)╱ // 0x903 @0x21
0x08e2…0909 at0022 = ╱dc╱=╱ // 0x904 @0x22
0x08e2…0909 at0023 = ╱22╱"╱ // 0x905 @0x23
0x08e2…0909 at0024 = ╱20╱…╱ // 0x906 @0x24
0x08e2…0909 at0025 = ╱22╱"╱ // 0x907 @0x25
0x08e2…0909 at0026 = EOL // 0x908 @0x26
0x08e2…0909 }
0x0909…0930 9687 2500 IF F0$(62)="+" THEN F0$(62)=" "
0x0909…0930 LineComalBin {
0x0909…0930 ptr = 0x9687 // 0x909 @0x0
0x0909…0930 lno = 0x09c4 // 0x90b @0x2
0x0909…0930 at0004 = ╱82╱ IF ╱ // 0x90d @0x4
0x0909…0930 at0005 = ╱46╱F╱ // 0x90e @0x5
0x0909…0930 at0006 = ╱30╱0╱ // 0x90f @0x6
0x0909…0930 at0007 = ╱ef╱$╱ // 0x910 @0x7
0x0909…0930 at0008 = ╱ed╱(╱ // 0x911 @0x8
0x0909…0930 at0009 = ╱36╱6╱ // 0x912 @0x9
0x0909…0930 at000a = ╱32╱2╱ // 0x913 @0xa
0x0909…0930 at000b = ╱fe0000f806╱ // 0x914 @0xb
0x0909…0930 at0010 = ╱ee╱)╱ // 0x919 @0x10
0x0909…0930 at0011 = ╱dc╱=╱ // 0x91a @0x11
0x0909…0930 at0012 = ╱22╱"╱ // 0x91b @0x12
0x0909…0930 at0013 = ╱2b╱+╱ // 0x91c @0x13
0x0909…0930 at0014 = ╱22╱"╱ // 0x91d @0x14
0x0909…0930 at0015 = ╱b6╱ THEN ╱ // 0x91e @0x15
0x0909…0930 at0016 = ╱46╱F╱ // 0x91f @0x16
0x0909…0930 at0017 = ╱30╱0╱ // 0x920 @0x17
0x0909…0930 at0018 = ╱ef╱$╱ // 0x921 @0x18
0x0909…0930 at0019 = ╱ed╱(╱ // 0x922 @0x19
0x0909…0930 at001a = ╱36╱6╱ // 0x923 @0x1a
0x0909…0930 at001b = ╱32╱2╱ // 0x924 @0x1b
0x0909…0930 at001c = ╱fe0000f806╱ // 0x925 @0x1c
0x0909…0930 at0021 = ╱ee╱)╱ // 0x92a @0x21
0x0909…0930 at0022 = ╱dc╱=╱ // 0x92b @0x22
0x0909…0930 at0023 = ╱22╱"╱ // 0x92c @0x23
0x0909…0930 at0024 = ╱20╱…╱ // 0x92d @0x24
0x0909…0930 at0025 = ╱22╱"╱ // 0x92e @0x25
0x0909…0930 at0026 = EOL // 0x92f @0x26
0x0909…0930 }
0x0930…093a 9691 2510 PRINT F0$;
0x0930…093a LineComalBin {
0x0930…093a ptr = 0x9691 // 0x930 @0x0
0x0930…093a lno = 0x09ce // 0x932 @0x2
0x0930…093a at0004 = ╱92╱ PRINT ╱ // 0x934 @0x4
0x0930…093a at0005 = ╱46╱F╱ // 0x935 @0x5
0x0930…093a at0006 = ╱30╱0╱ // 0x936 @0x6
0x0930…093a at0007 = ╱ef╱$╱ // 0x937 @0x7
0x0930…093a at0008 = ╱eb╱;╱ // 0x938 @0x8
0x0930…093a at0009 = EOL // 0x939 @0x9
0x0930…093a }
0x093a…094e 96a5 2520 J6=J6+E;F0$=E9$
0x093a…094e LineComalBin {
0x093a…094e ptr = 0x96a5 // 0x93a @0x0
0x093a…094e lno = 0x09d8 // 0x93c @0x2
0x093a…094e at0004 = ╱4a╱J╱ // 0x93e @0x4
0x093a…094e at0005 = ╱36╱6╱ // 0x93f @0x5
0x093a…094e at0006 = ╱dc╱=╱ // 0x940 @0x6
0x093a…094e at0007 = ╱4a╱J╱ // 0x941 @0x7
0x093a…094e at0008 = ╱36╱6╱ // 0x942 @0x8
0x093a…094e at0009 = ╱e2╱+╱ // 0x943 @0x9
0x093a…094e at000a = ╱45╱E╱ // 0x944 @0xa
0x093a…094e at000b = ╱eb╱;╱ // 0x945 @0xb
0x093a…094e at000c = ╱46╱F╱ // 0x946 @0xc
0x093a…094e at000d = ╱30╱0╱ // 0x947 @0xd
0x093a…094e at000e = ╱ef╱$╱ // 0x948 @0xe
0x093a…094e at000f = ╱dc╱=╱ // 0x949 @0xf
0x093a…094e at0010 = ╱45╱E╱ // 0x94a @0x10
0x093a…094e at0011 = ╱39╱9╱ // 0x94b @0x11
0x093a…094e at0012 = ╱ef╱$╱ // 0x94c @0x12
0x093a…094e at0013 = EOL // 0x94d @0x13
0x093a…094e }
0x094e…0954 96ab 2540 ENDPROC
0x094e…0954 LineComalBin {
0x094e…0954 ptr = 0x96ab // 0x94e @0x0
0x094e…0954 lno = 0x09ec // 0x950 @0x2
0x094e…0954 at0004 = ╱9f╱ ENDPROC ╱ // 0x952 @0x4
0x094e…0954 at0005 = EOL // 0x953 @0x5
0x094e…0954 }
0x0954…095f 96b6 2550 PROC Z(G5)
0x0954…095f LineComalBin {
0x0954…095f ptr = 0x96b6 // 0x954 @0x0
0x0954…095f lno = 0x09f6 // 0x956 @0x2
0x0954…095f at0004 = ╱9e╱ PROC ╱ // 0x958 @0x4
0x0954…095f at0005 = ╱5a╱Z╱ // 0x959 @0x5
0x0954…095f at0006 = ╱ed╱(╱ // 0x95a @0x6
0x0954…095f at0007 = ╱47╱G╱ // 0x95b @0x7
0x0954…095f at0008 = ╱35╱5╱ // 0x95c @0x8
0x0954…095f at0009 = ╱ee╱)╱ // 0x95d @0x9
0x0954…095f at000a = EOL // 0x95e @0xa
0x0954…095f }
0x095f…0969 96c0 2560 J5=G5
0x095f…0969 LineComalBin {
0x095f…0969 ptr = 0x96c0 // 0x95f @0x0
0x095f…0969 lno = 0x0a00 // 0x961 @0x2
0x095f…0969 at0004 = ╱4a╱J╱ // 0x963 @0x4
0x095f…0969 at0005 = ╱35╱5╱ // 0x964 @0x5
0x095f…0969 at0006 = ╱dc╱=╱ // 0x965 @0x6
0x095f…0969 at0007 = ╱47╱G╱ // 0x966 @0x7
0x095f…0969 at0008 = ╱35╱5╱ // 0x967 @0x8
0x095f…0969 at0009 = EOL // 0x968 @0x9
0x095f…0969 }
0x0969…0982 96d9 2570 GET D8$,G5:D5$,J7,J8,J9
0x0969…0982 LineComalBin {
0x0969…0982 ptr = 0x96d9 // 0x969 @0x0
0x0969…0982 lno = 0x0a0a // 0x96b @0x2
0x0969…0982 at0004 = ╱a9╱ GET ╱ // 0x96d @0x4
0x0969…0982 at0005 = ╱44╱D╱ // 0x96e @0x5
0x0969…0982 at0006 = ╱38╱8╱ // 0x96f @0x6
0x0969…0982 at0007 = ╱ef╱$╱ // 0x970 @0x7
0x0969…0982 at0008 = ╱ec╱,╱ // 0x971 @0x8
0x0969…0982 at0009 = ╱47╱G╱ // 0x972 @0x9
0x0969…0982 at000a = ╱35╱5╱ // 0x973 @0xa
0x0969…0982 at000b = ╱f0╱:╱ // 0x974 @0xb
0x0969…0982 at000c = ╱44╱D╱ // 0x975 @0xc
0x0969…0982 at000d = ╱35╱5╱ // 0x976 @0xd
0x0969…0982 at000e = ╱ef╱$╱ // 0x977 @0xe
0x0969…0982 at000f = ╱ec╱,╱ // 0x978 @0xf
0x0969…0982 at0010 = ╱4a╱J╱ // 0x979 @0x10
0x0969…0982 at0011 = ╱37╱7╱ // 0x97a @0x11
0x0969…0982 at0012 = ╱ec╱,╱ // 0x97b @0x12
0x0969…0982 at0013 = ╱4a╱J╱ // 0x97c @0x13
0x0969…0982 at0014 = ╱38╱8╱ // 0x97d @0x14
0x0969…0982 at0015 = ╱ec╱,╱ // 0x97e @0x15
0x0969…0982 at0016 = ╱4a╱J╱ // 0x97f @0x16
0x0969…0982 at0017 = ╱39╱9╱ // 0x980 @0x17
0x0969…0982 at0018 = EOL // 0x981 @0x18
0x0969…0982 }
0x0982…0998 96ef 2580 EXEC F(2,G5,D8$)
0x0982…0998 LineComalBin {
0x0982…0998 ptr = 0x96ef // 0x982 @0x0
0x0982…0998 lno = 0x0a14 // 0x984 @0x2
0x0982…0998 at0004 = ╱9d╱ EXEC ╱ // 0x986 @0x4
0x0982…0998 at0005 = ╱46╱F╱ // 0x987 @0x5
0x0982…0998 at0006 = ╱ed╱(╱ // 0x988 @0x6
0x0982…0998 at0007 = ╱32╱2╱ // 0x989 @0x7
0x0982…0998 at0008 = ╱fe00008002╱ // 0x98a @0x8
0x0982…0998 at000d = ╱ec╱,╱ // 0x98f @0xd
0x0982…0998 at000e = ╱47╱G╱ // 0x990 @0xe
0x0982…0998 at000f = ╱35╱5╱ // 0x991 @0xf
0x0982…0998 at0010 = ╱ec╱,╱ // 0x992 @0x10
0x0982…0998 at0011 = ╱44╱D╱ // 0x993 @0x11
0x0982…0998 at0012 = ╱38╱8╱ // 0x994 @0x12
0x0982…0998 at0013 = ╱ef╱$╱ // 0x995 @0x13
0x0982…0998 at0014 = ╱ee╱)╱ // 0x996 @0x14
0x0982…0998 at0015 = EOL // 0x997 @0x15
0x0982…0998 }
0x0998…099e 96f5 2590 ENDPROC
0x0998…099e LineComalBin {
0x0998…099e ptr = 0x96f5 // 0x998 @0x0
0x0998…099e lno = 0x0a1e // 0x99a @0x2
0x0998…099e at0004 = ╱9f╱ ENDPROC ╱ // 0x99c @0x4
0x0998…099e at0005 = EOL // 0x99d @0x5
0x0998…099e }
0x099e…09b3 970a 2600 PROC CONVDATE(I1,I2)
0x099e…09b3 LineComalBin {
0x099e…09b3 ptr = 0x970a // 0x99e @0x0
0x099e…09b3 lno = 0x0a28 // 0x9a0 @0x2
0x099e…09b3 at0004 = ╱9e╱ PROC ╱ // 0x9a2 @0x4
0x099e…09b3 at0005 = ╱43╱C╱ // 0x9a3 @0x5
0x099e…09b3 at0006 = ╱4f╱O╱ // 0x9a4 @0x6
0x099e…09b3 at0007 = ╱4e╱N╱ // 0x9a5 @0x7
0x099e…09b3 at0008 = ╱56╱V╱ // 0x9a6 @0x8
0x099e…09b3 at0009 = ╱44╱D╱ // 0x9a7 @0x9
0x099e…09b3 at000a = ╱41╱A╱ // 0x9a8 @0xa
0x099e…09b3 at000b = ╱54╱T╱ // 0x9a9 @0xb
0x099e…09b3 at000c = ╱45╱E╱ // 0x9aa @0xc
0x099e…09b3 at000d = ╱ed╱(╱ // 0x9ab @0xd
0x099e…09b3 at000e = ╱49╱I╱ // 0x9ac @0xe
0x099e…09b3 at000f = ╱31╱1╱ // 0x9ad @0xf
0x099e…09b3 at0010 = ╱ec╱,╱ // 0x9ae @0x10
0x099e…09b3 at0011 = ╱49╱I╱ // 0x9af @0x11
0x099e…09b3 at0012 = ╱32╱2╱ // 0x9b0 @0x12
0x099e…09b3 at0013 = ╱ee╱)╱ // 0x9b1 @0x13
0x099e…09b3 at0014 = EOL // 0x9b2 @0x14
0x099e…09b3 }
0x09b3…09c4 971b 2610 K0=I2;I1$=""
0x09b3…09c4 LineComalBin {
0x09b3…09c4 ptr = 0x971b // 0x9b3 @0x0
0x09b3…09c4 lno = 0x0a32 // 0x9b5 @0x2
0x09b3…09c4 at0004 = ╱4b╱K╱ // 0x9b7 @0x4
0x09b3…09c4 at0005 = ╱30╱0╱ // 0x9b8 @0x5
0x09b3…09c4 at0006 = ╱dc╱=╱ // 0x9b9 @0x6
0x09b3…09c4 at0007 = ╱49╱I╱ // 0x9ba @0x7
0x09b3…09c4 at0008 = ╱32╱2╱ // 0x9bb @0x8
0x09b3…09c4 at0009 = ╱eb╱;╱ // 0x9bc @0x9
0x09b3…09c4 at000a = ╱49╱I╱ // 0x9bd @0xa
0x09b3…09c4 at000b = ╱31╱1╱ // 0x9be @0xb
0x09b3…09c4 at000c = ╱ef╱$╱ // 0x9bf @0xc
0x09b3…09c4 at000d = ╱dc╱=╱ // 0x9c0 @0xd
0x09b3…09c4 at000e = ╱22╱"╱ // 0x9c1 @0xe
0x09b3…09c4 at000f = ╱22╱"╱ // 0x9c2 @0xf
0x09b3…09c4 at0010 = EOL // 0x9c3 @0x10
0x09b3…09c4 }
0x09c4…09d7 972e 2620 FOR I=8 TO E STEP -E
0x09c4…09d7 LineComalBin {
0x09c4…09d7 ptr = 0x972e // 0x9c4 @0x0
0x09c4…09d7 lno = 0x0a3c // 0x9c6 @0x2
0x09c4…09d7 at0004 = ╱83╱ FOR ╱ // 0x9c8 @0x4
0x09c4…09d7 at0005 = ╱49╱I╱ // 0x9c9 @0x5
0x09c4…09d7 at0006 = ╱dc╱=╱ // 0x9ca @0x6
0x09c4…09d7 at0007 = ╱38╱8╱ // 0x9cb @0x7
0x09c4…09d7 at0008 = ╱fe00008004╱ // 0x9cc @0x8
0x09c4…09d7 at000d = ╱b7╱ TO ╱ // 0x9d1 @0xd
0x09c4…09d7 at000e = ╱45╱E╱ // 0x9d2 @0xe
0x09c4…09d7 at000f = ╱b8╱ STEP ╱ // 0x9d3 @0xf
0x09c4…09d7 at0010 = ╱e9╱-╱ // 0x9d4 @0x10
0x09c4…09d7 at0011 = ╱45╱E╱ // 0x9d5 @0x11
0x09c4…09d7 at0012 = EOL // 0x9d6 @0x12
0x09c4…09d7 }
0x09d7…09f3 974a 2625 I1$(I)=CHR(K0 MOD TI+48)
0x09d7…09f3 LineComalBin {
0x09d7…09f3 ptr = 0x974a // 0x9d7 @0x0
0x09d7…09f3 lno = 0x0a41 // 0x9d9 @0x2
0x09d7…09f3 at0004 = ╱49╱I╱ // 0x9db @0x4
0x09d7…09f3 at0005 = ╱31╱1╱ // 0x9dc @0x5
0x09d7…09f3 at0006 = ╱ef╱$╱ // 0x9dd @0x6
0x09d7…09f3 at0007 = ╱ed╱(╱ // 0x9de @0x7
0x09d7…09f3 at0008 = ╱49╱I╱ // 0x9df @0x8
0x09d7…09f3 at0009 = ╱ee╱)╱ // 0x9e0 @0x9
0x09d7…09f3 at000a = ╱dc╱=╱ // 0x9e1 @0xa
0x09d7…09f3 at000b = ╱cf╱CHR╱ // 0x9e2 @0xb
0x09d7…09f3 at000c = ╱ed╱(╱ // 0x9e3 @0xc
0x09d7…09f3 at000d = ╱4b╱K╱ // 0x9e4 @0xd
0x09d7…09f3 at000e = ╱30╱0╱ // 0x9e5 @0xe
0x09d7…09f3 at000f = ╱e8╱ MOD ╱ // 0x9e6 @0xf
0x09d7…09f3 at0010 = ╱54╱T╱ // 0x9e7 @0x10
0x09d7…09f3 at0011 = ╱49╱I╱ // 0x9e8 @0x11
0x09d7…09f3 at0012 = ╱e2╱+╱ // 0x9e9 @0x12
0x09d7…09f3 at0013 = ╱34╱4╱ // 0x9ea @0x13
0x09d7…09f3 at0014 = ╱38╱8╱ // 0x9eb @0x14
0x09d7…09f3 at0015 = ╱fe0000c006╱ // 0x9ec @0x15
0x09d7…09f3 at001a = ╱ee╱)╱ // 0x9f1 @0x1a
0x09d7…09f3 at001b = EOL // 0x9f2 @0x1b
0x09d7…09f3 }
0x09f3…09ff 9756 2630 IF I MOD V=B THEN
0x09f3…09ff LineComalBin {
0x09f3…09ff ptr = 0x9756 // 0x9f3 @0x0
0x09f3…09ff lno = 0x0a46 // 0x9f5 @0x2
0x09f3…09ff at0004 = ╱9c╱ IF ╱ // 0x9f7 @0x4
0x09f3…09ff at0005 = ╱49╱I╱ // 0x9f8 @0x5
0x09f3…09ff at0006 = ╱e8╱ MOD ╱ // 0x9f9 @0x6
0x09f3…09ff at0007 = ╱56╱V╱ // 0x9fa @0x7
0x09f3…09ff at0008 = ╱dc╱=╱ // 0x9fb @0x8
0x09f3…09ff at0009 = ╱42╱B╱ // 0x9fc @0x9
0x09f3…09ff at000a = ╱b6╱ THEN ╱ // 0x9fd @0xa
0x09f3…09ff at000b = EOL // 0x9fe @0xb
0x09f3…09ff }
0x09ff…0a0e 9765 2631 I1$(I)="-"
0x09ff…0a0e LineComalBin {
0x09ff…0a0e ptr = 0x9765 // 0x9ff @0x0
0x09ff…0a0e lno = 0x0a47 // 0xa01 @0x2
0x09ff…0a0e at0004 = ╱49╱I╱ // 0xa03 @0x4
0x09ff…0a0e at0005 = ╱31╱1╱ // 0xa04 @0x5
0x09ff…0a0e at0006 = ╱ef╱$╱ // 0xa05 @0x6
0x09ff…0a0e at0007 = ╱ed╱(╱ // 0xa06 @0x7
0x09ff…0a0e at0008 = ╱49╱I╱ // 0xa07 @0x8
0x09ff…0a0e at0009 = ╱ee╱)╱ // 0xa08 @0x9
0x09ff…0a0e at000a = ╱dc╱=╱ // 0xa09 @0xa
0x09ff…0a0e at000b = ╱22╱"╱ // 0xa0a @0xb
0x09ff…0a0e at000c = ╱2d╱-╱ // 0xa0b @0xc
0x09ff…0a0e at000d = ╱22╱"╱ // 0xa0c @0xd
0x09ff…0a0e at000e = EOL // 0xa0d @0xe
0x09ff…0a0e }
0x0a0e…0a14 976b 2632 ELSE
0x0a0e…0a14 LineComalBin {
0x0a0e…0a14 ptr = 0x976b // 0xa0e @0x0
0x0a0e…0a14 lno = 0x0a48 // 0xa10 @0x2
0x0a0e…0a14 at0004 = ╱9a╱ ELSE ╱ // 0xa12 @0x4
0x0a0e…0a14 at0005 = EOL // 0xa13 @0x5
0x0a0e…0a14 }
0x0a14…0a21 9778 2633 K0=K0 DIV TI
0x0a14…0a21 LineComalBin {
0x0a14…0a21 ptr = 0x9778 // 0xa14 @0x0
0x0a14…0a21 lno = 0x0a49 // 0xa16 @0x2
0x0a14…0a21 at0004 = ╱4b╱K╱ // 0xa18 @0x4
0x0a14…0a21 at0005 = ╱30╱0╱ // 0xa19 @0x5
0x0a14…0a21 at0006 = ╱dc╱=╱ // 0xa1a @0x6
0x0a14…0a21 at0007 = ╱4b╱K╱ // 0xa1b @0x7
0x0a14…0a21 at0008 = ╱30╱0╱ // 0xa1c @0x8
0x0a14…0a21 at0009 = ╱e7╱ DIV ╱ // 0xa1d @0x9
0x0a14…0a21 at000a = ╱54╱T╱ // 0xa1e @0xa
0x0a14…0a21 at000b = ╱49╱I╱ // 0xa1f @0xb
0x0a14…0a21 at000c = EOL // 0xa20 @0xc
0x0a14…0a21 }
0x0a21…0a27 977e 2634 ENDIF
0x0a21…0a27 LineComalBin {
0x0a21…0a27 ptr = 0x977e // 0xa21 @0x0
0x0a21…0a27 lno = 0x0a4a // 0xa23 @0x2
0x0a21…0a27 at0004 = ╱9b╱ ENDIF ╱ // 0xa25 @0x4
0x0a21…0a27 at0005 = EOL // 0xa26 @0x5
0x0a21…0a27 }
0x0a27…0a2e 9785 2690 NEXT I
0x0a27…0a2e LineComalBin {
0x0a27…0a2e ptr = 0x9785 // 0xa27 @0x0
0x0a27…0a2e lno = 0x0a82 // 0xa29 @0x2
0x0a27…0a2e at0004 = ╱84╱ NEXT ╱ // 0xa2b @0x4
0x0a27…0a2e at0005 = ╱49╱I╱ // 0xa2c @0x5
0x0a27…0a2e at0006 = EOL // 0xa2d @0x6
0x0a27…0a2e }
0x0a2e…0a34 978b 2700 ENDPROC
0x0a2e…0a34 LineComalBin {
0x0a2e…0a34 ptr = 0x978b // 0xa2e @0x0
0x0a2e…0a34 lno = 0x0a8c // 0xa30 @0x2
0x0a2e…0a34 at0004 = ╱9f╱ ENDPROC ╱ // 0xa32 @0x4
0x0a2e…0a34 at0005 = EOL // 0xa33 @0x5
0x0a2e…0a34 }
0x0a34…0a42 9799 2710 PROC Æ(I1,I2)
0x0a34…0a42 LineComalBin {
0x0a34…0a42 ptr = 0x9799 // 0xa34 @0x0
0x0a34…0a42 lno = 0x0a96 // 0xa36 @0x2
0x0a34…0a42 at0004 = ╱9e╱ PROC ╱ // 0xa38 @0x4
0x0a34…0a42 at0005 = ╱5b╱Æ╱ // 0xa39 @0x5
0x0a34…0a42 at0006 = ╱ed╱(╱ // 0xa3a @0x6
0x0a34…0a42 at0007 = ╱49╱I╱ // 0xa3b @0x7
0x0a34…0a42 at0008 = ╱31╱1╱ // 0xa3c @0x8
0x0a34…0a42 at0009 = ╱ec╱,╱ // 0xa3d @0x9
0x0a34…0a42 at000a = ╱49╱I╱ // 0xa3e @0xa
0x0a34…0a42 at000b = ╱32╱2╱ // 0xa3f @0xb
0x0a34…0a42 at000c = ╱ee╱)╱ // 0xa40 @0xc
0x0a34…0a42 at000d = EOL // 0xa41 @0xd
0x0a34…0a42 }
0x0a42…0a4e 97a5 2720 I1$=B3$
0x0a42…0a4e LineComalBin {
0x0a42…0a4e ptr = 0x97a5 // 0xa42 @0x0
0x0a42…0a4e lno = 0x0aa0 // 0xa44 @0x2
0x0a42…0a4e at0004 = ╱49╱I╱ // 0xa46 @0x4
0x0a42…0a4e at0005 = ╱31╱1╱ // 0xa47 @0x5
0x0a42…0a4e at0006 = ╱ef╱$╱ // 0xa48 @0x6
0x0a42…0a4e at0007 = ╱dc╱=╱ // 0xa49 @0x7
0x0a42…0a4e at0008 = ╱42╱B╱ // 0xa4a @0x8
0x0a42…0a4e at0009 = ╱33╱3╱ // 0xa4b @0x9
0x0a42…0a4e at000a = ╱ef╱$╱ // 0xa4c @0xa
0x0a42…0a4e at000b = EOL // 0xa4d @0xb
0x0a42…0a4e }
0x0a4e…0a59 97b0 2730 IF I2<>B THEN
0x0a4e…0a59 LineComalBin {
0x0a4e…0a59 ptr = 0x97b0 // 0xa4e @0x0
0x0a4e…0a59 lno = 0x0aaa // 0xa50 @0x2
0x0a4e…0a59 at0004 = ╱9c╱ IF ╱ // 0xa52 @0x4
0x0a4e…0a59 at0005 = ╱49╱I╱ // 0xa53 @0x5
0x0a4e…0a59 at0006 = ╱32╱2╱ // 0xa54 @0x6
0x0a4e…0a59 at0007 = ╱e1╱<>╱ // 0xa55 @0x7
0x0a4e…0a59 at0008 = ╱42╱B╱ // 0xa56 @0x8
0x0a4e…0a59 at0009 = ╱b6╱ THEN ╱ // 0xa57 @0x9
0x0a4e…0a59 at000a = EOL // 0xa58 @0xa
0x0a4e…0a59 }
0x0a59…0a9c 97f3 2740 I1$(W,TI)=",0";I0=ABS(I2);K0=INT((I0-INT(I0))*100+0.50001)
0x0a59…0a9c LineComalBin {
0x0a59…0a9c ptr = 0x97f3 // 0xa59 @0x0
0x0a59…0a9c lno = 0x0ab4 // 0xa5b @0x2
0x0a59…0a9c at0004 = ╱49╱I╱ // 0xa5d @0x4
0x0a59…0a9c at0005 = ╱31╱1╱ // 0xa5e @0x5
0x0a59…0a9c at0006 = ╱ef╱$╱ // 0xa5f @0x6
0x0a59…0a9c at0007 = ╱ed╱(╱ // 0xa60 @0x7
0x0a59…0a9c at0008 = ╱57╱W╱ // 0xa61 @0x8
0x0a59…0a9c at0009 = ╱ec╱,╱ // 0xa62 @0x9
0x0a59…0a9c at000a = ╱54╱T╱ // 0xa63 @0xa
0x0a59…0a9c at000b = ╱49╱I╱ // 0xa64 @0xb
0x0a59…0a9c at000c = ╱ee╱)╱ // 0xa65 @0xc
0x0a59…0a9c at000d = ╱dc╱=╱ // 0xa66 @0xd
0x0a59…0a9c at000e = ╱22╱"╱ // 0xa67 @0xe
0x0a59…0a9c at000f = ╱2c╱,╱ // 0xa68 @0xf
0x0a59…0a9c at0010 = ╱30╱0╱ // 0xa69 @0x10
0x0a59…0a9c at0011 = ╱22╱"╱ // 0xa6a @0x11
0x0a59…0a9c at0012 = ╱eb╱;╱ // 0xa6b @0x12
0x0a59…0a9c at0013 = ╱49╱I╱ // 0xa6c @0x13
0x0a59…0a9c at0014 = ╱30╱0╱ // 0xa6d @0x14
0x0a59…0a9c at0015 = ╱dc╱=╱ // 0xa6e @0x15
0x0a59…0a9c at0016 = ╱c4╱ABS╱ // 0xa6f @0x16
0x0a59…0a9c at0017 = ╱ed╱(╱ // 0xa70 @0x17
0x0a59…0a9c at0018 = ╱49╱I╱ // 0xa71 @0x18
0x0a59…0a9c at0019 = ╱32╱2╱ // 0xa72 @0x19
0x0a59…0a9c at001a = ╱ee╱)╱ // 0xa73 @0x1a
0x0a59…0a9c at001b = ╱eb╱;╱ // 0xa74 @0x1b
0x0a59…0a9c at001c = ╱4b╱K╱ // 0xa75 @0x1c
0x0a59…0a9c at001d = ╱30╱0╱ // 0xa76 @0x1d
0x0a59…0a9c at001e = ╱dc╱=╱ // 0xa77 @0x1e
0x0a59…0a9c at001f = ╱c6╱INT╱ // 0xa78 @0x1f
0x0a59…0a9c at0020 = ╱ed╱(╱ // 0xa79 @0x20
0x0a59…0a9c at0021 = ╱ed╱(╱ // 0xa7a @0x21
0x0a59…0a9c at0022 = ╱49╱I╱ // 0xa7b @0x22
0x0a59…0a9c at0023 = ╱30╱0╱ // 0xa7c @0x23
0x0a59…0a9c at0024 = ╱e3╱-╱ // 0xa7d @0x24
0x0a59…0a9c at0025 = ╱c6╱INT╱ // 0xa7e @0x25
0x0a59…0a9c at0026 = ╱ed╱(╱ // 0xa7f @0x26
0x0a59…0a9c at0027 = ╱49╱I╱ // 0xa80 @0x27
0x0a59…0a9c at0028 = ╱30╱0╱ // 0xa81 @0x28
0x0a59…0a9c at0029 = ╱ee╱)╱ // 0xa82 @0x29
0x0a59…0a9c at002a = ╱ee╱)╱ // 0xa83 @0x2a
0x0a59…0a9c at002b = ╱e4╱*╱ // 0xa84 @0x2b
0x0a59…0a9c at002c = ╱31╱1╱ // 0xa85 @0x2c
0x0a59…0a9c at002d = ╱30╱0╱ // 0xa86 @0x2d
0x0a59…0a9c at002e = ╱30╱0╱ // 0xa87 @0x2e
0x0a59…0a9c at002f = ╱fe0000c807╱ // 0xa88 @0x2f
0x0a59…0a9c at0034 = ╱e2╱+╱ // 0xa8d @0x34
0x0a59…0a9c at0035 = ╱30╱0╱ // 0xa8e @0x35
0x0a59…0a9c at0036 = ╱2e╱.╱ // 0xa8f @0x36
0x0a59…0a9c at0037 = ╱35╱5╱ // 0xa90 @0x37
0x0a59…0a9c at0038 = ╱30╱0╱ // 0xa91 @0x38
0x0a59…0a9c at0039 = ╱30╱0╱ // 0xa92 @0x39
0x0a59…0a9c at003a = ╱30╱0╱ // 0xa93 @0x3a
0x0a59…0a9c at003b = ╱31╱1╱ // 0xa94 @0x3b
0x0a59…0a9c at003c = ╱fea7008000╱ // 0xa95 @0x3c
0x0a59…0a9c at0041 = ╱ee╱)╱ // 0xa9a @0x41
0x0a59…0a9c at0042 = EOL // 0xa9b @0x42
0x0a59…0a9c }
0x0a9c…0ab7 980e 2770 IF I2<B THEN I1$(12)="-"
0x0a9c…0ab7 LineComalBin {
0x0a9c…0ab7 ptr = 0x980e // 0xa9c @0x0
0x0a9c…0ab7 lno = 0x0ad2 // 0xa9e @0x2
0x0a9c…0ab7 at0004 = ╱82╱ IF ╱ // 0xaa0 @0x4
0x0a9c…0ab7 at0005 = ╱49╱I╱ // 0xaa1 @0x5
0x0a9c…0ab7 at0006 = ╱32╱2╱ // 0xaa2 @0x6
0x0a9c…0ab7 at0007 = ╱dd╱<╱ // 0xaa3 @0x7
0x0a9c…0ab7 at0008 = ╱42╱B╱ // 0xaa4 @0x8
0x0a9c…0ab7 at0009 = ╱b6╱ THEN ╱ // 0xaa5 @0x9
0x0a9c…0ab7 at000a = ╱49╱I╱ // 0xaa6 @0xa
0x0a9c…0ab7 at000b = ╱31╱1╱ // 0xaa7 @0xb
0x0a9c…0ab7 at000c = ╱ef╱$╱ // 0xaa8 @0xc
0x0a9c…0ab7 at000d = ╱ed╱(╱ // 0xaa9 @0xd
0x0a9c…0ab7 at000e = ╱31╱1╱ // 0xaaa @0xe
0x0a9c…0ab7 at000f = ╱32╱2╱ // 0xaab @0xf
0x0a9c…0ab7 at0010 = ╱fe0000c004╱ // 0xaac @0x10
0x0a9c…0ab7 at0015 = ╱ee╱)╱ // 0xab1 @0x15
0x0a9c…0ab7 at0016 = ╱dc╱=╱ // 0xab2 @0x16
0x0a9c…0ab7 at0017 = ╱22╱"╱ // 0xab3 @0x17
0x0a9c…0ab7 at0018 = ╱2d╱-╱ // 0xab4 @0x18
0x0a9c…0ab7 at0019 = ╱22╱"╱ // 0xab5 @0x19
0x0a9c…0ab7 at001a = EOL // 0xab6 @0x1a
0x0a9c…0ab7 }
0x0ab7…0ac6 981d 2780 FOR I=EL TO E STEP -E
0x0ab7…0ac6 LineComalBin {
0x0ab7…0ac6 ptr = 0x981d // 0xab7 @0x0
0x0ab7…0ac6 lno = 0x0adc // 0xab9 @0x2
0x0ab7…0ac6 at0004 = ╱83╱ FOR ╱ // 0xabb @0x4
0x0ab7…0ac6 at0005 = ╱49╱I╱ // 0xabc @0x5
0x0ab7…0ac6 at0006 = ╱dc╱=╱ // 0xabd @0x6
0x0ab7…0ac6 at0007 = ╱45╱E╱ // 0xabe @0x7
0x0ab7…0ac6 at0008 = ╱4c╱L╱ // 0xabf @0x8
0x0ab7…0ac6 at0009 = ╱b7╱ TO ╱ // 0xac0 @0x9
0x0ab7…0ac6 at000a = ╱45╱E╱ // 0xac1 @0xa
0x0ab7…0ac6 at000b = ╱b8╱ STEP ╱ // 0xac2 @0xb
0x0ab7…0ac6 at000c = ╱e9╱-╱ // 0xac3 @0xc
0x0ab7…0ac6 at000d = ╱45╱E╱ // 0xac4 @0xd
0x0ab7…0ac6 at000e = EOL // 0xac5 @0xe
0x0ab7…0ac6 }
0x0ac6…0ad0 9827 2790 IF I<>W THEN
0x0ac6…0ad0 LineComalBin {
0x0ac6…0ad0 ptr = 0x9827 // 0xac6 @0x0
0x0ac6…0ad0 lno = 0x0ae6 // 0xac8 @0x2
0x0ac6…0ad0 at0004 = ╱9c╱ IF ╱ // 0xaca @0x4
0x0ac6…0ad0 at0005 = ╱49╱I╱ // 0xacb @0x5
0x0ac6…0ad0 at0006 = ╱e1╱<>╱ // 0xacc @0x6
0x0ac6…0ad0 at0007 = ╱57╱W╱ // 0xacd @0x7
0x0ac6…0ad0 at0008 = ╱b6╱ THEN ╱ // 0xace @0x8
0x0ac6…0ad0 at0009 = EOL // 0xacf @0x9
0x0ac6…0ad0 }
0x0ad0…0aec 9843 2800 I1$(I)=CHR(K0 MOD TI+48)
0x0ad0…0aec LineComalBin {
0x0ad0…0aec ptr = 0x9843 // 0xad0 @0x0
0x0ad0…0aec lno = 0x0af0 // 0xad2 @0x2
0x0ad0…0aec at0004 = ╱49╱I╱ // 0xad4 @0x4
0x0ad0…0aec at0005 = ╱31╱1╱ // 0xad5 @0x5
0x0ad0…0aec at0006 = ╱ef╱$╱ // 0xad6 @0x6
0x0ad0…0aec at0007 = ╱ed╱(╱ // 0xad7 @0x7
0x0ad0…0aec at0008 = ╱49╱I╱ // 0xad8 @0x8
0x0ad0…0aec at0009 = ╱ee╱)╱ // 0xad9 @0x9
0x0ad0…0aec at000a = ╱dc╱=╱ // 0xada @0xa
0x0ad0…0aec at000b = ╱cf╱CHR╱ // 0xadb @0xb
0x0ad0…0aec at000c = ╱ed╱(╱ // 0xadc @0xc
0x0ad0…0aec at000d = ╱4b╱K╱ // 0xadd @0xd
0x0ad0…0aec at000e = ╱30╱0╱ // 0xade @0xe
0x0ad0…0aec at000f = ╱e8╱ MOD ╱ // 0xadf @0xf
0x0ad0…0aec at0010 = ╱54╱T╱ // 0xae0 @0x10
0x0ad0…0aec at0011 = ╱49╱I╱ // 0xae1 @0x11
0x0ad0…0aec at0012 = ╱e2╱+╱ // 0xae2 @0x12
0x0ad0…0aec at0013 = ╱34╱4╱ // 0xae3 @0x13
0x0ad0…0aec at0014 = ╱38╱8╱ // 0xae4 @0x14
0x0ad0…0aec at0015 = ╱fe0000c006╱ // 0xae5 @0x15
0x0ad0…0aec at001a = ╱ee╱)╱ // 0xaea @0x1a
0x0ad0…0aec at001b = EOL // 0xaeb @0x1b
0x0ad0…0aec }
0x0aec…0af9 9850 2810 K0=K0 DIV TI
0x0aec…0af9 LineComalBin {
0x0aec…0af9 ptr = 0x9850 // 0xaec @0x0
0x0aec…0af9 lno = 0x0afa // 0xaee @0x2
0x0aec…0af9 at0004 = ╱4b╱K╱ // 0xaf0 @0x4
0x0aec…0af9 at0005 = ╱30╱0╱ // 0xaf1 @0x5
0x0aec…0af9 at0006 = ╱dc╱=╱ // 0xaf2 @0x6
0x0aec…0af9 at0007 = ╱4b╱K╱ // 0xaf3 @0x7
0x0aec…0af9 at0008 = ╱30╱0╱ // 0xaf4 @0x8
0x0aec…0af9 at0009 = ╱e7╱ DIV ╱ // 0xaf5 @0x9
0x0aec…0af9 at000a = ╱54╱T╱ // 0xaf6 @0xa
0x0aec…0af9 at000b = ╱49╱I╱ // 0xaf7 @0xb
0x0aec…0af9 at000c = EOL // 0xaf8 @0xc
0x0aec…0af9 }
0x0af9…0b0c 9863 2820 IF K0=B AND I<TI THEN I=B
0x0af9…0b0c LineComalBin {
0x0af9…0b0c ptr = 0x9863 // 0xaf9 @0x0
0x0af9…0b0c lno = 0x0b04 // 0xafb @0x2
0x0af9…0b0c at0004 = ╱82╱ IF ╱ // 0xafd @0x4
0x0af9…0b0c at0005 = ╱4b╱K╱ // 0xafe @0x5
0x0af9…0b0c at0006 = ╱30╱0╱ // 0xaff @0x6
0x0af9…0b0c at0007 = ╱dc╱=╱ // 0xb00 @0x7
0x0af9…0b0c at0008 = ╱42╱B╱ // 0xb01 @0x8
0x0af9…0b0c at0009 = ╱da╱ AND ╱ // 0xb02 @0x9
0x0af9…0b0c at000a = ╱49╱I╱ // 0xb03 @0xa
0x0af9…0b0c at000b = ╱dd╱<╱ // 0xb04 @0xb
0x0af9…0b0c at000c = ╱54╱T╱ // 0xb05 @0xc
0x0af9…0b0c at000d = ╱49╱I╱ // 0xb06 @0xd
0x0af9…0b0c at000e = ╱b6╱ THEN ╱ // 0xb07 @0xe
0x0af9…0b0c at000f = ╱49╱I╱ // 0xb08 @0xf
0x0af9…0b0c at0010 = ╱dc╱=╱ // 0xb09 @0x10
0x0af9…0b0c at0011 = ╱42╱B╱ // 0xb0a @0x11
0x0af9…0b0c at0012 = EOL // 0xb0b @0x12
0x0af9…0b0c }
0x0b0c…0b12 9869 2830 ELSE
0x0b0c…0b12 LineComalBin {
0x0b0c…0b12 ptr = 0x9869 // 0xb0c @0x0
0x0b0c…0b12 lno = 0x0b0e // 0xb0e @0x2
0x0b0c…0b12 at0004 = ╱9a╱ ELSE ╱ // 0xb10 @0x4
0x0b0c…0b12 at0005 = EOL // 0xb11 @0x5
0x0b0c…0b12 }
0x0b12…0b1f 9876 2840 K0=INT(I0)
0x0b12…0b1f LineComalBin {
0x0b12…0b1f ptr = 0x9876 // 0xb12 @0x0
0x0b12…0b1f lno = 0x0b18 // 0xb14 @0x2
0x0b12…0b1f at0004 = ╱4b╱K╱ // 0xb16 @0x4
0x0b12…0b1f at0005 = ╱30╱0╱ // 0xb17 @0x5
0x0b12…0b1f at0006 = ╱dc╱=╱ // 0xb18 @0x6
0x0b12…0b1f at0007 = ╱c6╱INT╱ // 0xb19 @0x7
0x0b12…0b1f at0008 = ╱ed╱(╱ // 0xb1a @0x8
0x0b12…0b1f at0009 = ╱49╱I╱ // 0xb1b @0x9
0x0b12…0b1f at000a = ╱30╱0╱ // 0xb1c @0xa
0x0b12…0b1f at000b = ╱ee╱)╱ // 0xb1d @0xb
0x0b12…0b1f at000c = EOL // 0xb1e @0xc
0x0b12…0b1f }
0x0b1f…0b25 987c 2850 ENDIF
0x0b1f…0b25 LineComalBin {
0x0b1f…0b25 ptr = 0x987c // 0xb1f @0x0
0x0b1f…0b25 lno = 0x0b22 // 0xb21 @0x2
0x0b1f…0b25 at0004 = ╱9b╱ ENDIF ╱ // 0xb23 @0x4
0x0b1f…0b25 at0005 = EOL // 0xb24 @0x5
0x0b1f…0b25 }
0x0b25…0b2c 9883 2860 NEXT I
0x0b25…0b2c LineComalBin {
0x0b25…0b2c ptr = 0x9883 // 0xb25 @0x0
0x0b25…0b2c lno = 0x0b2c // 0xb27 @0x2
0x0b25…0b2c at0004 = ╱84╱ NEXT ╱ // 0xb29 @0x4
0x0b25…0b2c at0005 = ╱49╱I╱ // 0xb2a @0x5
0x0b25…0b2c at0006 = EOL // 0xb2b @0x6
0x0b25…0b2c }
0x0b2c…0b32 9889 2870 ENDIF
0x0b2c…0b32 LineComalBin {
0x0b2c…0b32 ptr = 0x9889 // 0xb2c @0x0
0x0b2c…0b32 lno = 0x0b36 // 0xb2e @0x2
0x0b2c…0b32 at0004 = ╱9b╱ ENDIF ╱ // 0xb30 @0x4
0x0b2c…0b32 at0005 = EOL // 0xb31 @0x5
0x0b2c…0b32 }
0x0b32…0b38 988f 2880 ENDPROC
0x0b32…0b38 LineComalBin {
0x0b32…0b38 ptr = 0x988f // 0xb32 @0x0
0x0b32…0b38 lno = 0x0b40 // 0xb34 @0x2
0x0b32…0b38 at0004 = ╱9f╱ ENDPROC ╱ // 0xb36 @0x4
0x0b32…0b38 at0005 = EOL // 0xb37 @0x5
0x0b32…0b38 }
0x0b38…0b4c 98a3 2890 PROC PERVERT(I1,I2)
0x0b38…0b4c LineComalBin {
0x0b38…0b4c ptr = 0x98a3 // 0xb38 @0x0
0x0b38…0b4c lno = 0x0b4a // 0xb3a @0x2
0x0b38…0b4c at0004 = ╱9e╱ PROC ╱ // 0xb3c @0x4
0x0b38…0b4c at0005 = ╱50╱P╱ // 0xb3d @0x5
0x0b38…0b4c at0006 = ╱45╱E╱ // 0xb3e @0x6
0x0b38…0b4c at0007 = ╱52╱R╱ // 0xb3f @0x7
0x0b38…0b4c at0008 = ╱56╱V╱ // 0xb40 @0x8
0x0b38…0b4c at0009 = ╱45╱E╱ // 0xb41 @0x9
0x0b38…0b4c at000a = ╱52╱R╱ // 0xb42 @0xa
0x0b38…0b4c at000b = ╱54╱T╱ // 0xb43 @0xb
0x0b38…0b4c at000c = ╱ed╱(╱ // 0xb44 @0xc
0x0b38…0b4c at000d = ╱49╱I╱ // 0xb45 @0xd
0x0b38…0b4c at000e = ╱31╱1╱ // 0xb46 @0xe
0x0b38…0b4c at000f = ╱ec╱,╱ // 0xb47 @0xf
0x0b38…0b4c at0010 = ╱49╱I╱ // 0xb48 @0x10
0x0b38…0b4c at0011 = ╱32╱2╱ // 0xb49 @0x11
0x0b38…0b4c at0012 = ╱ee╱)╱ // 0xb4a @0x12
0x0b38…0b4c at0013 = EOL // 0xb4b @0x13
0x0b38…0b4c }
0x0b4c…0b55 98ac 2900 I2=B
0x0b4c…0b55 LineComalBin {
0x0b4c…0b55 ptr = 0x98ac // 0xb4c @0x0
0x0b4c…0b55 lno = 0x0b54 // 0xb4e @0x2
0x0b4c…0b55 at0004 = ╱49╱I╱ // 0xb50 @0x4
0x0b4c…0b55 at0005 = ╱32╱2╱ // 0xb51 @0x5
0x0b4c…0b55 at0006 = ╱dc╱=╱ // 0xb52 @0x6
0x0b4c…0b55 at0007 = ╱42╱B╱ // 0xb53 @0x7
0x0b4c…0b55 at0008 = EOL // 0xb54 @0x8
0x0b4c…0b55 }
0x0b55…0b67 98be 2910 FOR I=E TO LEN(I1$)-E
0x0b55…0b67 LineComalBin {
0x0b55…0b67 ptr = 0x98be // 0xb55 @0x0
0x0b55…0b67 lno = 0x0b5e // 0xb57 @0x2
0x0b55…0b67 at0004 = ╱83╱ FOR ╱ // 0xb59 @0x4
0x0b55…0b67 at0005 = ╱49╱I╱ // 0xb5a @0x5
0x0b55…0b67 at0006 = ╱dc╱=╱ // 0xb5b @0x6
0x0b55…0b67 at0007 = ╱45╱E╱ // 0xb5c @0x7
0x0b55…0b67 at0008 = ╱b7╱ TO ╱ // 0xb5d @0x8
0x0b55…0b67 at0009 = ╱cc╱LEN╱ // 0xb5e @0x9
0x0b55…0b67 at000a = ╱ed╱(╱ // 0xb5f @0xa
0x0b55…0b67 at000b = ╱49╱I╱ // 0xb60 @0xb
0x0b55…0b67 at000c = ╱31╱1╱ // 0xb61 @0xc
0x0b55…0b67 at000d = ╱ef╱$╱ // 0xb62 @0xd
0x0b55…0b67 at000e = ╱ee╱)╱ // 0xb63 @0xe
0x0b55…0b67 at000f = ╱e3╱-╱ // 0xb64 @0xf
0x0b55…0b67 at0010 = ╱45╱E╱ // 0xb65 @0x10
0x0b55…0b67 at0011 = EOL // 0xb66 @0x11
0x0b55…0b67 }
0x0b67…0b9d 98f4 2920 IF I1$(I)<>" " AND I1$(I)<>"," THEN I2=TI*I2+ORD(I1$(I))-48
0x0b67…0b9d LineComalBin {
0x0b67…0b9d ptr = 0x98f4 // 0xb67 @0x0
0x0b67…0b9d lno = 0x0b68 // 0xb69 @0x2
0x0b67…0b9d at0004 = ╱82╱ IF ╱ // 0xb6b @0x4
0x0b67…0b9d at0005 = ╱49╱I╱ // 0xb6c @0x5
0x0b67…0b9d at0006 = ╱31╱1╱ // 0xb6d @0x6
0x0b67…0b9d at0007 = ╱ef╱$╱ // 0xb6e @0x7
0x0b67…0b9d at0008 = ╱ed╱(╱ // 0xb6f @0x8
0x0b67…0b9d at0009 = ╱49╱I╱ // 0xb70 @0x9
0x0b67…0b9d at000a = ╱ee╱)╱ // 0xb71 @0xa
0x0b67…0b9d at000b = ╱e1╱<>╱ // 0xb72 @0xb
0x0b67…0b9d at000c = ╱22╱"╱ // 0xb73 @0xc
0x0b67…0b9d at000d = ╱20╱…╱ // 0xb74 @0xd
0x0b67…0b9d at000e = ╱22╱"╱ // 0xb75 @0xe
0x0b67…0b9d at000f = ╱da╱ AND ╱ // 0xb76 @0xf
0x0b67…0b9d at0010 = ╱49╱I╱ // 0xb77 @0x10
0x0b67…0b9d at0011 = ╱31╱1╱ // 0xb78 @0x11
0x0b67…0b9d at0012 = ╱ef╱$╱ // 0xb79 @0x12
0x0b67…0b9d at0013 = ╱ed╱(╱ // 0xb7a @0x13
0x0b67…0b9d at0014 = ╱49╱I╱ // 0xb7b @0x14
0x0b67…0b9d at0015 = ╱ee╱)╱ // 0xb7c @0x15
0x0b67…0b9d at0016 = ╱e1╱<>╱ // 0xb7d @0x16
0x0b67…0b9d at0017 = ╱22╱"╱ // 0xb7e @0x17
0x0b67…0b9d at0018 = ╱2c╱,╱ // 0xb7f @0x18
0x0b67…0b9d at0019 = ╱22╱"╱ // 0xb80 @0x19
0x0b67…0b9d at001a = ╱b6╱ THEN ╱ // 0xb81 @0x1a
0x0b67…0b9d at001b = ╱49╱I╱ // 0xb82 @0x1b
0x0b67…0b9d at001c = ╱32╱2╱ // 0xb83 @0x1c
0x0b67…0b9d at001d = ╱dc╱=╱ // 0xb84 @0x1d
0x0b67…0b9d at001e = ╱54╱T╱ // 0xb85 @0x1e
0x0b67…0b9d at001f = ╱49╱I╱ // 0xb86 @0x1f
0x0b67…0b9d at0020 = ╱e4╱*╱ // 0xb87 @0x20
0x0b67…0b9d at0021 = ╱49╱I╱ // 0xb88 @0x21
0x0b67…0b9d at0022 = ╱32╱2╱ // 0xb89 @0x22
0x0b67…0b9d at0023 = ╱e2╱+╱ // 0xb8a @0x23
0x0b67…0b9d at0024 = ╱cd╱ORD╱ // 0xb8b @0x24
0x0b67…0b9d at0025 = ╱ed╱(╱ // 0xb8c @0x25
0x0b67…0b9d at0026 = ╱49╱I╱ // 0xb8d @0x26
0x0b67…0b9d at0027 = ╱31╱1╱ // 0xb8e @0x27
0x0b67…0b9d at0028 = ╱ef╱$╱ // 0xb8f @0x28
0x0b67…0b9d at0029 = ╱ed╱(╱ // 0xb90 @0x29
0x0b67…0b9d at002a = ╱49╱I╱ // 0xb91 @0x2a
0x0b67…0b9d at002b = ╱ee╱)╱ // 0xb92 @0x2b
0x0b67…0b9d at002c = ╱ee╱)╱ // 0xb93 @0x2c
0x0b67…0b9d at002d = ╱e3╱-╱ // 0xb94 @0x2d
0x0b67…0b9d at002e = ╱34╱4╱ // 0xb95 @0x2e
0x0b67…0b9d at002f = ╱38╱8╱ // 0xb96 @0x2f
0x0b67…0b9d at0030 = ╱fe0000c006╱ // 0xb97 @0x30
0x0b67…0b9d at0035 = EOL // 0xb9c @0x35
0x0b67…0b9d }
0x0b9d…0ba4 98fb 2930 NEXT I
0x0b9d…0ba4 LineComalBin {
0x0b9d…0ba4 ptr = 0x98fb // 0xb9d @0x0
0x0b9d…0ba4 lno = 0x0b72 // 0xb9f @0x2
0x0b9d…0ba4 at0004 = ╱84╱ NEXT ╱ // 0xba1 @0x4
0x0b9d…0ba4 at0005 = ╱49╱I╱ // 0xba2 @0x5
0x0b9d…0ba4 at0006 = EOL // 0xba3 @0x6
0x0b9d…0ba4 }
0x0ba4…0bbb 9912 2940 IF I1$(I)="-" THEN I2=-I2
0x0ba4…0bbb LineComalBin {
0x0ba4…0bbb ptr = 0x9912 // 0xba4 @0x0
0x0ba4…0bbb lno = 0x0b7c // 0xba6 @0x2
0x0ba4…0bbb at0004 = ╱82╱ IF ╱ // 0xba8 @0x4
0x0ba4…0bbb at0005 = ╱49╱I╱ // 0xba9 @0x5
0x0ba4…0bbb at0006 = ╱31╱1╱ // 0xbaa @0x6
0x0ba4…0bbb at0007 = ╱ef╱$╱ // 0xbab @0x7
0x0ba4…0bbb at0008 = ╱ed╱(╱ // 0xbac @0x8
0x0ba4…0bbb at0009 = ╱49╱I╱ // 0xbad @0x9
0x0ba4…0bbb at000a = ╱ee╱)╱ // 0xbae @0xa
0x0ba4…0bbb at000b = ╱dc╱=╱ // 0xbaf @0xb
0x0ba4…0bbb at000c = ╱22╱"╱ // 0xbb0 @0xc
0x0ba4…0bbb at000d = ╱2d╱-╱ // 0xbb1 @0xd
0x0ba4…0bbb at000e = ╱22╱"╱ // 0xbb2 @0xe
0x0ba4…0bbb at000f = ╱b6╱ THEN ╱ // 0xbb3 @0xf
0x0ba4…0bbb at0010 = ╱49╱I╱ // 0xbb4 @0x10
0x0ba4…0bbb at0011 = ╱32╱2╱ // 0xbb5 @0x11
0x0ba4…0bbb at0012 = ╱dc╱=╱ // 0xbb6 @0x12
0x0ba4…0bbb at0013 = ╱e9╱-╱ // 0xbb7 @0x13
0x0ba4…0bbb at0014 = ╱49╱I╱ // 0xbb8 @0x14
0x0ba4…0bbb at0015 = ╱32╱2╱ // 0xbb9 @0x15
0x0ba4…0bbb at0016 = EOL // 0xbba @0x16
0x0ba4…0bbb }
0x0bbb…0bce (39,) 9925 2950 I2=I2/100
0x0bbb…0bce LineComalBin {
0x0bbb…0bce ptr = 0x9925 // 0xbbb @0x0
0x0bbb…0bce lno = 0x0b86 // 0xbbd @0x2
0x0bbb…0bce at0004 = ╱49╱I╱ // 0xbbf @0x4
0x0bbb…0bce at0005 = ╱32╱2╱ // 0xbc0 @0x5
0x0bbb…0bce at0006 = ╱dc╱=╱ // 0xbc1 @0x6
0x0bbb…0bce at0007 = ╱49╱I╱ // 0xbc2 @0x7
0x0bbb…0bce at0008 = ╱32╱2╱ // 0xbc3 @0x8
0x0bbb…0bce at0009 = ╱e5╱/╱ // 0xbc4 @0x9
0x0bbb…0bce at000a = ╱31╱1╱ // 0xbc5 @0xa
0x0bbb…0bce at000b = ╱30╱0╱ // 0xbc6 @0xb
0x0bbb…0bce at000c = ╱30╱0╱ // 0xbc7 @0xc
0x0bbb…0bce at000d = ╱fe0000c807╱ // 0xbc8 @0xd
0x0bbb…0bce at0012 = EOL // 0xbcd @0x12
0x0bbb…0bce }
0x0bce…0bd4 992b 2960 ENDPROC
0x0bce…0bd4 LineComalBin {
0x0bce…0bd4 ptr = 0x992b // 0xbce @0x0
0x0bce…0bd4 lno = 0x0b90 // 0xbd0 @0x2
0x0bce…0bd4 at0004 = ╱9f╱ ENDPROC ╱ // 0xbd2 @0x4
0x0bce…0bd4 at0005 = EOL // 0xbd3 @0x5
0x0bce…0bd4 }
0x0bd4…0be3 993a 2970 PROC SKRIVBUND
0x0bd4…0be3 LineComalBin {
0x0bd4…0be3 ptr = 0x993a // 0xbd4 @0x0
0x0bd4…0be3 lno = 0x0b9a // 0xbd6 @0x2
0x0bd4…0be3 at0004 = ╱9e╱ PROC ╱ // 0xbd8 @0x4
0x0bd4…0be3 at0005 = ╱53╱S╱ // 0xbd9 @0x5
0x0bd4…0be3 at0006 = ╱4b╱K╱ // 0xbda @0x6
0x0bd4…0be3 at0007 = ╱52╱R╱ // 0xbdb @0x7
0x0bd4…0be3 at0008 = ╱49╱I╱ // 0xbdc @0x8
0x0bd4…0be3 at0009 = ╱56╱V╱ // 0xbdd @0x9
0x0bd4…0be3 at000a = ╱42╱B╱ // 0xbde @0xa
0x0bd4…0be3 at000b = ╱55╱U╱ // 0xbdf @0xb
0x0bd4…0be3 at000c = ╱4e╱N╱ // 0xbe0 @0xc
0x0bd4…0be3 at000d = ╱44╱D╱ // 0xbe1 @0xd
0x0bd4…0be3 at000e = EOL // 0xbe2 @0xe
0x0bd4…0be3 }
0x0be3…0bee 9945 2980 IF J6>B THEN
0x0be3…0bee LineComalBin {
0x0be3…0bee ptr = 0x9945 // 0xbe3 @0x0
0x0be3…0bee lno = 0x0ba4 // 0xbe5 @0x2
0x0be3…0bee at0004 = ╱9c╱ IF ╱ // 0xbe7 @0x4
0x0be3…0bee at0005 = ╱4a╱J╱ // 0xbe8 @0x5
0x0be3…0bee at0006 = ╱36╱6╱ // 0xbe9 @0x6
0x0be3…0bee at0007 = ╱de╱>╱ // 0xbea @0x7
0x0be3…0bee at0008 = ╱42╱B╱ // 0xbeb @0x8
0x0be3…0bee at0009 = ╱b6╱ THEN ╱ // 0xbec @0x9
0x0be3…0bee at000a = EOL // 0xbed @0xa
0x0be3…0bee }
0x0bee…0c01 9958 2990 WHILE J6<K1-20
0x0bee…0c01 LineComalBin {
0x0bee…0c01 ptr = 0x9958 // 0xbee @0x0
0x0bee…0c01 lno = 0x0bae // 0xbf0 @0x2
0x0bee…0c01 at0004 = ╱93╱ WHILE ╱ // 0xbf2 @0x4
0x0bee…0c01 at0005 = ╱4a╱J╱ // 0xbf3 @0x5
0x0bee…0c01 at0006 = ╱36╱6╱ // 0xbf4 @0x6
0x0bee…0c01 at0007 = ╱dd╱<╱ // 0xbf5 @0x7
0x0bee…0c01 at0008 = ╱4b╱K╱ // 0xbf6 @0x8
0x0bee…0c01 at0009 = ╱31╱1╱ // 0xbf7 @0x9
0x0bee…0c01 at000a = ╱e3╱-╱ // 0xbf8 @0xa
0x0bee…0c01 at000b = ╱32╱2╱ // 0xbf9 @0xb
0x0bee…0c01 at000c = ╱30╱0╱ // 0xbfa @0xc
0x0bee…0c01 at000d = ╱fe0000a005╱ // 0xbfb @0xd
0x0bee…0c01 at0012 = EOL // 0xc00 @0x12
0x0bee…0c01 }
0x0c01…0c07 995e 3000 PRINT
0x0c01…0c07 LineComalBin {
0x0c01…0c07 ptr = 0x995e // 0xc01 @0x0
0x0c01…0c07 lno = 0x0bb8 // 0xc03 @0x2
0x0c01…0c07 at0004 = ╱92╱ PRINT ╱ // 0xc05 @0x4
0x0c01…0c07 at0005 = EOL // 0xc06 @0x5
0x0c01…0c07 }
0x0c07…0c13 996a 3010 J6=J6+E
0x0c07…0c13 LineComalBin {
0x0c07…0c13 ptr = 0x996a // 0xc07 @0x0
0x0c07…0c13 lno = 0x0bc2 // 0xc09 @0x2
0x0c07…0c13 at0004 = ╱4a╱J╱ // 0xc0b @0x4
0x0c07…0c13 at0005 = ╱36╱6╱ // 0xc0c @0x5
0x0c07…0c13 at0006 = ╱dc╱=╱ // 0xc0d @0x6
0x0c07…0c13 at0007 = ╱4a╱J╱ // 0xc0e @0x7
0x0c07…0c13 at0008 = ╱36╱6╱ // 0xc0f @0x8
0x0c07…0c13 at0009 = ╱e2╱+╱ // 0xc10 @0x9
0x0c07…0c13 at000a = ╱45╱E╱ // 0xc11 @0xa
0x0c07…0c13 at000b = EOL // 0xc12 @0xb
0x0c07…0c13 }
0x0c13…0c19 9970 3020 ENDWHILE
0x0c13…0c19 LineComalBin {
0x0c13…0c19 ptr = 0x9970 // 0xc13 @0x0
0x0c13…0c19 lno = 0x0bcc // 0xc15 @0x2
0x0c13…0c19 at0004 = ╱94╱ ENDWHILE ╱ // 0xc17 @0x4
0x0c13…0c19 at0005 = EOL // 0xc18 @0x5
0x0c13…0c19 }
0x0c19…0c32 9989 3030 EXEC CONV(C3$,G6,6)
0x0c19…0c32 LineComalBin {
0x0c19…0c32 ptr = 0x9989 // 0xc19 @0x0
0x0c19…0c32 lno = 0x0bd6 // 0xc1b @0x2
0x0c19…0c32 at0004 = ╱9d╱ EXEC ╱ // 0xc1d @0x4
0x0c19…0c32 at0005 = ╱43╱C╱ // 0xc1e @0x5
0x0c19…0c32 at0006 = ╱4f╱O╱ // 0xc1f @0x6
0x0c19…0c32 at0007 = ╱4e╱N╱ // 0xc20 @0x7
0x0c19…0c32 at0008 = ╱56╱V╱ // 0xc21 @0x8
0x0c19…0c32 at0009 = ╱ed╱(╱ // 0xc22 @0x9
0x0c19…0c32 at000a = ╱43╱C╱ // 0xc23 @0xa
0x0c19…0c32 at000b = ╱33╱3╱ // 0xc24 @0xb
0x0c19…0c32 at000c = ╱ef╱$╱ // 0xc25 @0xc
0x0c19…0c32 at000d = ╱ec╱,╱ // 0xc26 @0xd
0x0c19…0c32 at000e = ╱47╱G╱ // 0xc27 @0xe
0x0c19…0c32 at000f = ╱36╱6╱ // 0xc28 @0xf
0x0c19…0c32 at0010 = ╱ec╱,╱ // 0xc29 @0x10
0x0c19…0c32 at0011 = ╱36╱6╱ // 0xc2a @0x11
0x0c19…0c32 at0012 = ╱fe0000c003╱ // 0xc2b @0x12
0x0c19…0c32 at0017 = ╱ee╱)╱ // 0xc30 @0x17
0x0c19…0c32 at0018 = EOL // 0xc31 @0x18
0x0c19…0c32 }
0x0c32…0c4b 99a2 3040 EXEC CONV(F1$,G7,4)
0x0c32…0c4b LineComalBin {
0x0c32…0c4b ptr = 0x99a2 // 0xc32 @0x0
0x0c32…0c4b lno = 0x0be0 // 0xc34 @0x2
0x0c32…0c4b at0004 = ╱9d╱ EXEC ╱ // 0xc36 @0x4
0x0c32…0c4b at0005 = ╱43╱C╱ // 0xc37 @0x5
0x0c32…0c4b at0006 = ╱4f╱O╱ // 0xc38 @0x6
0x0c32…0c4b at0007 = ╱4e╱N╱ // 0xc39 @0x7
0x0c32…0c4b at0008 = ╱56╱V╱ // 0xc3a @0x8
0x0c32…0c4b at0009 = ╱ed╱(╱ // 0xc3b @0x9
0x0c32…0c4b at000a = ╱46╱F╱ // 0xc3c @0xa
0x0c32…0c4b at000b = ╱31╱1╱ // 0xc3d @0xb
0x0c32…0c4b at000c = ╱ef╱$╱ // 0xc3e @0xc
0x0c32…0c4b at000d = ╱ec╱,╱ // 0xc3f @0xd
0x0c32…0c4b at000e = ╱47╱G╱ // 0xc40 @0xe
0x0c32…0c4b at000f = ╱37╱7╱ // 0xc41 @0xf
0x0c32…0c4b at0010 = ╱ec╱,╱ // 0xc42 @0x10
0x0c32…0c4b at0011 = ╱34╱4╱ // 0xc43 @0x11
0x0c32…0c4b at0012 = ╱fe00008003╱ // 0xc44 @0x12
0x0c32…0c4b at0017 = ╱ee╱)╱ // 0xc49 @0x17
0x0c32…0c4b at0018 = EOL // 0xc4a @0x18
0x0c32…0c4b }
0x0c4b…0c5b 99b2 3050 C3$=C3$+F1$
0x0c4b…0c5b LineComalBin {
0x0c4b…0c5b ptr = 0x99b2 // 0xc4b @0x0
0x0c4b…0c5b lno = 0x0bea // 0xc4d @0x2
0x0c4b…0c5b at0004 = ╱43╱C╱ // 0xc4f @0x4
0x0c4b…0c5b at0005 = ╱33╱3╱ // 0xc50 @0x5
0x0c4b…0c5b at0006 = ╱ef╱$╱ // 0xc51 @0x6
0x0c4b…0c5b at0007 = ╱dc╱=╱ // 0xc52 @0x7
0x0c4b…0c5b at0008 = ╱43╱C╱ // 0xc53 @0x8
0x0c4b…0c5b at0009 = ╱33╱3╱ // 0xc54 @0x9
0x0c4b…0c5b at000a = ╱ef╱$╱ // 0xc55 @0xa
0x0c4b…0c5b at000b = ╱f1╱+╱ // 0xc56 @0xb
0x0c4b…0c5b at000c = ╱46╱F╱ // 0xc57 @0xc
0x0c4b…0c5b at000d = ╱31╱1╱ // 0xc58 @0xd
0x0c4b…0c5b at000e = ╱ef╱$╱ // 0xc59 @0xe
0x0c4b…0c5b at000f = EOL // 0xc5a @0xf
0x0c4b…0c5b }
0x0c5b…0c7a 99d1 3060 PRINT TAB(EL);"LØNMODTAGER ";C3$;
0x0c5b…0c7a LineComalBin {
0x0c5b…0c7a ptr = 0x99d1 // 0xc5b @0x0
0x0c5b…0c7a lno = 0x0bf4 // 0xc5d @0x2
0x0c5b…0c7a at0004 = ╱92╱ PRINT ╱ // 0xc5f @0x4
0x0c5b…0c7a at0005 = ╱d2╱TAB╱ // 0xc60 @0x5
0x0c5b…0c7a at0006 = ╱ed╱(╱ // 0xc61 @0x6
0x0c5b…0c7a at0007 = ╱45╱E╱ // 0xc62 @0x7
0x0c5b…0c7a at0008 = ╱4c╱L╱ // 0xc63 @0x8
0x0c5b…0c7a at0009 = ╱ee╱)╱ // 0xc64 @0x9
0x0c5b…0c7a at000a = ╱eb╱;╱ // 0xc65 @0xa
0x0c5b…0c7a at000b = ╱22╱"╱ // 0xc66 @0xb
0x0c5b…0c7a at000c = ╱4c╱L╱ // 0xc67 @0xc
0x0c5b…0c7a at000d = ╱5c╱Ø╱ // 0xc68 @0xd
0x0c5b…0c7a at000e = ╱4e╱N╱ // 0xc69 @0xe
0x0c5b…0c7a at000f = ╱4d╱M╱ // 0xc6a @0xf
0x0c5b…0c7a at0010 = ╱4f╱O╱ // 0xc6b @0x10
0x0c5b…0c7a at0011 = ╱44╱D╱ // 0xc6c @0x11
0x0c5b…0c7a at0012 = ╱54╱T╱ // 0xc6d @0x12
0x0c5b…0c7a at0013 = ╱41╱A╱ // 0xc6e @0x13
0x0c5b…0c7a at0014 = ╱47╱G╱ // 0xc6f @0x14
0x0c5b…0c7a at0015 = ╱45╱E╱ // 0xc70 @0x15
0x0c5b…0c7a at0016 = ╱52╱R╱ // 0xc71 @0x16
0x0c5b…0c7a at0017 = ╱20╱…╱ // 0xc72 @0x17
0x0c5b…0c7a at0018 = ╱22╱"╱ // 0xc73 @0x18
0x0c5b…0c7a at0019 = ╱eb╱;╱ // 0xc74 @0x19
0x0c5b…0c7a at001a = ╱43╱C╱ // 0xc75 @0x1a
0x0c5b…0c7a at001b = ╱33╱3╱ // 0xc76 @0x1b
0x0c5b…0c7a at001c = ╱ef╱$╱ // 0xc77 @0x1c
0x0c5b…0c7a at001d = ╱eb╱;╱ // 0xc78 @0x1d
0x0c5b…0c7a at001e = EOL // 0xc79 @0x1e
0x0c5b…0c7a }
0x0c7a…0c8c 99e3 3070 PRINT USING " ####":F8;
0x0c7a…0c8c LineComalBin {
0x0c7a…0c8c ptr = 0x99e3 // 0xc7a @0x0
0x0c7a…0c8c lno = 0x0bfe // 0xc7c @0x2
0x0c7a…0c8c at0004 = ╱92╱ PRINT ╱ // 0xc7e @0x4
0x0c7a…0c8c at0005 = ╱b9╱ USING ╱ // 0xc7f @0x5
0x0c7a…0c8c at0006 = ╱22╱"╱ // 0xc80 @0x6
0x0c7a…0c8c at0007 = ╱20╱…╱ // 0xc81 @0x7
0x0c7a…0c8c at0008 = ╱23╱#╱ // 0xc82 @0x8
0x0c7a…0c8c at0009 = ╱23╱#╱ // 0xc83 @0x9
0x0c7a…0c8c at000a = ╱23╱#╱ // 0xc84 @0xa
0x0c7a…0c8c at000b = ╱23╱#╱ // 0xc85 @0xb
0x0c7a…0c8c at000c = ╱22╱"╱ // 0xc86 @0xc
0x0c7a…0c8c at000d = ╱f0╱:╱ // 0xc87 @0xd
0x0c7a…0c8c at000e = ╱46╱F╱ // 0xc88 @0xe
0x0c7a…0c8c at000f = ╱38╱8╱ // 0xc89 @0xf
0x0c7a…0c8c at0010 = ╱eb╱;╱ // 0xc8a @0x10
0x0c7a…0c8c at0011 = EOL // 0xc8b @0x11
0x0c7a…0c8c }
0x0c8c…0cba 9a11 3080 PRINT TAB(44);"ARBEJDSGIVER ";D3$(E,7)
0x0c8c…0cba LineComalBin {
0x0c8c…0cba ptr = 0x9a11 // 0xc8c @0x0
0x0c8c…0cba lno = 0x0c08 // 0xc8e @0x2
0x0c8c…0cba at0004 = ╱92╱ PRINT ╱ // 0xc90 @0x4
0x0c8c…0cba at0005 = ╱d2╱TAB╱ // 0xc91 @0x5
0x0c8c…0cba at0006 = ╱ed╱(╱ // 0xc92 @0x6
0x0c8c…0cba at0007 = ╱34╱4╱ // 0xc93 @0x7
0x0c8c…0cba at0008 = ╱34╱4╱ // 0xc94 @0x8
0x0c8c…0cba at0009 = ╱fe0000b006╱ // 0xc95 @0x9
0x0c8c…0cba at000e = ╱ee╱)╱ // 0xc9a @0xe
0x0c8c…0cba at000f = ╱eb╱;╱ // 0xc9b @0xf
0x0c8c…0cba at0010 = ╱22╱"╱ // 0xc9c @0x10
0x0c8c…0cba at0011 = ╱41╱A╱ // 0xc9d @0x11
0x0c8c…0cba at0012 = ╱52╱R╱ // 0xc9e @0x12
0x0c8c…0cba at0013 = ╱42╱B╱ // 0xc9f @0x13
0x0c8c…0cba at0014 = ╱45╱E╱ // 0xca0 @0x14
0x0c8c…0cba at0015 = ╱4a╱J╱ // 0xca1 @0x15
0x0c8c…0cba at0016 = ╱44╱D╱ // 0xca2 @0x16
0x0c8c…0cba at0017 = ╱53╱S╱ // 0xca3 @0x17
0x0c8c…0cba at0018 = ╱47╱G╱ // 0xca4 @0x18
0x0c8c…0cba at0019 = ╱49╱I╱ // 0xca5 @0x19
0x0c8c…0cba at001a = ╱56╱V╱ // 0xca6 @0x1a
0x0c8c…0cba at001b = ╱45╱E╱ // 0xca7 @0x1b
0x0c8c…0cba at001c = ╱52╱R╱ // 0xca8 @0x1c
0x0c8c…0cba at001d = ╱20╱…╱ // 0xca9 @0x1d
0x0c8c…0cba at001e = ╱22╱"╱ // 0xcaa @0x1e
0x0c8c…0cba at001f = ╱eb╱;╱ // 0xcab @0x1f
0x0c8c…0cba at0020 = ╱44╱D╱ // 0xcac @0x20
0x0c8c…0cba at0021 = ╱33╱3╱ // 0xcad @0x21
0x0c8c…0cba at0022 = ╱ef╱$╱ // 0xcae @0x22
0x0c8c…0cba at0023 = ╱ed╱(╱ // 0xcaf @0x23
0x0c8c…0cba at0024 = ╱45╱E╱ // 0xcb0 @0x24
0x0c8c…0cba at0025 = ╱ec╱,╱ // 0xcb1 @0x25
0x0c8c…0cba at0026 = ╱37╱7╱ // 0xcb2 @0x26
0x0c8c…0cba at0027 = ╱fe0000e003╱ // 0xcb3 @0x27
0x0c8c…0cba at002c = ╱ee╱)╱ // 0xcb8 @0x2c
0x0c8c…0cba at002d = EOL // 0xcb9 @0x2d
0x0c8c…0cba }
0x0cba…0cc0 9a17 3090 PRINT
0x0cba…0cc0 LineComalBin {
0x0cba…0cc0 ptr = 0x9a17 // 0xcba @0x0
0x0cba…0cc0 lno = 0x0c12 // 0xcbc @0x2
0x0cba…0cc0 at0004 = ╱92╱ PRINT ╱ // 0xcbe @0x4
0x0cba…0cc0 at0005 = EOL // 0xcbf @0x5
0x0cba…0cc0 }
0x0cc0…0cc6 9a1d 3092 PRINT
0x0cc0…0cc6 LineComalBin {
0x0cc0…0cc6 ptr = 0x9a1d // 0xcc0 @0x0
0x0cc0…0cc6 lno = 0x0c14 // 0xcc2 @0x2
0x0cc0…0cc6 at0004 = ╱92╱ PRINT ╱ // 0xcc4 @0x4
0x0cc0…0cc6 at0005 = EOL // 0xcc5 @0x5
0x0cc0…0cc6 }
0x0cc6…0ccc 9a23 3094 PRINT
0x0cc6…0ccc LineComalBin {
0x0cc6…0ccc ptr = 0x9a23 // 0xcc6 @0x0
0x0cc6…0ccc lno = 0x0c16 // 0xcc8 @0x2
0x0cc6…0ccc at0004 = ╱92╱ PRINT ╱ // 0xcca @0x4
0x0cc6…0ccc at0005 = EOL // 0xccb @0x5
0x0cc6…0ccc }
0x0ccc…0cd2 9a29 3100 PRINT
0x0ccc…0cd2 LineComalBin {
0x0ccc…0cd2 ptr = 0x9a29 // 0xccc @0x0
0x0ccc…0cd2 lno = 0x0c1c // 0xcce @0x2
0x0ccc…0cd2 at0004 = ╱92╱ PRINT ╱ // 0xcd0 @0x4
0x0ccc…0cd2 at0005 = EOL // 0xcd1 @0x5
0x0ccc…0cd2 }
0x0cd2…0d10 9a67 3110 PRINT TAB(13);D1$(E,25);TAB(46);D3$(8,32)
0x0cd2…0d10 LineComalBin {
0x0cd2…0d10 ptr = 0x9a67 // 0xcd2 @0x0
0x0cd2…0d10 lno = 0x0c26 // 0xcd4 @0x2
0x0cd2…0d10 at0004 = ╱92╱ PRINT ╱ // 0xcd6 @0x4
0x0cd2…0d10 at0005 = ╱d2╱TAB╱ // 0xcd7 @0x5
0x0cd2…0d10 at0006 = ╱ed╱(╱ // 0xcd8 @0x6
0x0cd2…0d10 at0007 = ╱31╱1╱ // 0xcd9 @0x7
0x0cd2…0d10 at0008 = ╱33╱3╱ // 0xcda @0x8
0x0cd2…0d10 at0009 = ╱fe0000d004╱ // 0xcdb @0x9
0x0cd2…0d10 at000e = ╱ee╱)╱ // 0xce0 @0xe
0x0cd2…0d10 at000f = ╱eb╱;╱ // 0xce1 @0xf
0x0cd2…0d10 at0010 = ╱44╱D╱ // 0xce2 @0x10
0x0cd2…0d10 at0011 = ╱31╱1╱ // 0xce3 @0x11
0x0cd2…0d10 at0012 = ╱ef╱$╱ // 0xce4 @0x12
0x0cd2…0d10 at0013 = ╱ed╱(╱ // 0xce5 @0x13
0x0cd2…0d10 at0014 = ╱45╱E╱ // 0xce6 @0x14
0x0cd2…0d10 at0015 = ╱ec╱,╱ // 0xce7 @0x15
0x0cd2…0d10 at0016 = ╱32╱2╱ // 0xce8 @0x16
0x0cd2…0d10 at0017 = ╱35╱5╱ // 0xce9 @0x17
0x0cd2…0d10 at0018 = ╱fe0000c805╱ // 0xcea @0x18
0x0cd2…0d10 at001d = ╱ee╱)╱ // 0xcef @0x1d
0x0cd2…0d10 at001e = ╱eb╱;╱ // 0xcf0 @0x1e
0x0cd2…0d10 at001f = ╱d2╱TAB╱ // 0xcf1 @0x1f
0x0cd2…0d10 at0020 = ╱ed╱(╱ // 0xcf2 @0x20
0x0cd2…0d10 at0021 = ╱34╱4╱ // 0xcf3 @0x21
0x0cd2…0d10 at0022 = ╱36╱6╱ // 0xcf4 @0x22
0x0cd2…0d10 at0023 = ╱fe0000b806╱ // 0xcf5 @0x23
0x0cd2…0d10 at0028 = ╱ee╱)╱ // 0xcfa @0x28
0x0cd2…0d10 at0029 = ╱eb╱;╱ // 0xcfb @0x29
0x0cd2…0d10 at002a = ╱44╱D╱ // 0xcfc @0x2a
0x0cd2…0d10 at002b = ╱33╱3╱ // 0xcfd @0x2b
0x0cd2…0d10 at002c = ╱ef╱$╱ // 0xcfe @0x2c
0x0cd2…0d10 at002d = ╱ed╱(╱ // 0xcff @0x2d
0x0cd2…0d10 at002e = ╱38╱8╱ // 0xd00 @0x2e
0x0cd2…0d10 at002f = ╱fe00008004╱ // 0xd01 @0x2f
0x0cd2…0d10 at0034 = ╱ec╱,╱ // 0xd06 @0x34
0x0cd2…0d10 at0035 = ╱33╱3╱ // 0xd07 @0x35
0x0cd2…0d10 at0036 = ╱32╱2╱ // 0xd08 @0x36
0x0cd2…0d10 at0037 = ╱fe00008006╱ // 0xd09 @0x37
0x0cd2…0d10 at003c = ╱ee╱)╱ // 0xd0e @0x3c
0x0cd2…0d10 at003d = EOL // 0xd0f @0x3d
0x0cd2…0d10 }
0x0d10…0d35 9a8c 3120 PRINT TAB(13);D1$(26,48)
0x0d10…0d35 LineComalBin {
0x0d10…0d35 ptr = 0x9a8c // 0xd10 @0x0
0x0d10…0d35 lno = 0x0c30 // 0xd12 @0x2
0x0d10…0d35 at0004 = ╱92╱ PRINT ╱ // 0xd14 @0x4
0x0d10…0d35 at0005 = ╱d2╱TAB╱ // 0xd15 @0x5
0x0d10…0d35 at0006 = ╱ed╱(╱ // 0xd16 @0x6
0x0d10…0d35 at0007 = ╱31╱1╱ // 0xd17 @0x7
0x0d10…0d35 at0008 = ╱33╱3╱ // 0xd18 @0x8
0x0d10…0d35 at0009 = ╱fe0000d004╱ // 0xd19 @0x9
0x0d10…0d35 at000e = ╱ee╱)╱ // 0xd1e @0xe
0x0d10…0d35 at000f = ╱eb╱;╱ // 0xd1f @0xf
0x0d10…0d35 at0010 = ╱44╱D╱ // 0xd20 @0x10
0x0d10…0d35 at0011 = ╱31╱1╱ // 0xd21 @0x11
0x0d10…0d35 at0012 = ╱ef╱$╱ // 0xd22 @0x12
0x0d10…0d35 at0013 = ╱ed╱(╱ // 0xd23 @0x13
0x0d10…0d35 at0014 = ╱32╱2╱ // 0xd24 @0x14
0x0d10…0d35 at0015 = ╱36╱6╱ // 0xd25 @0x15
0x0d10…0d35 at0016 = ╱fe0000d005╱ // 0xd26 @0x16
0x0d10…0d35 at001b = ╱ec╱,╱ // 0xd2b @0x1b
0x0d10…0d35 at001c = ╱34╱4╱ // 0xd2c @0x1c
0x0d10…0d35 at001d = ╱38╱8╱ // 0xd2d @0x1d
0x0d10…0d35 at001e = ╱fe0000c006╱ // 0xd2e @0x1e
0x0d10…0d35 at0023 = ╱ee╱)╱ // 0xd33 @0x23
0x0d10…0d35 at0024 = EOL // 0xd34 @0x24
0x0d10…0d35 }
0x0d35…0d7a 9ad1 3130 PRINT TAB(13);D1$(49,71);TAB(46);D3$(33,55)
0x0d35…0d7a LineComalBin {
0x0d35…0d7a ptr = 0x9ad1 // 0xd35 @0x0
0x0d35…0d7a lno = 0x0c3a // 0xd37 @0x2
0x0d35…0d7a at0004 = ╱92╱ PRINT ╱ // 0xd39 @0x4
0x0d35…0d7a at0005 = ╱d2╱TAB╱ // 0xd3a @0x5
0x0d35…0d7a at0006 = ╱ed╱(╱ // 0xd3b @0x6
0x0d35…0d7a at0007 = ╱31╱1╱ // 0xd3c @0x7
0x0d35…0d7a at0008 = ╱33╱3╱ // 0xd3d @0x8
0x0d35…0d7a at0009 = ╱fe0000d004╱ // 0xd3e @0x9
0x0d35…0d7a at000e = ╱ee╱)╱ // 0xd43 @0xe
0x0d35…0d7a at000f = ╱eb╱;╱ // 0xd44 @0xf
0x0d35…0d7a at0010 = ╱44╱D╱ // 0xd45 @0x10
0x0d35…0d7a at0011 = ╱31╱1╱ // 0xd46 @0x11
0x0d35…0d7a at0012 = ╱ef╱$╱ // 0xd47 @0x12
0x0d35…0d7a at0013 = ╱ed╱(╱ // 0xd48 @0x13
0x0d35…0d7a at0014 = ╱34╱4╱ // 0xd49 @0x14
0x0d35…0d7a at0015 = ╱39╱9╱ // 0xd4a @0x15
0x0d35…0d7a at0016 = ╱fe0000c406╱ // 0xd4b @0x16
0x0d35…0d7a at001b = ╱ec╱,╱ // 0xd50 @0x1b
0x0d35…0d7a at001c = ╱37╱7╱ // 0xd51 @0x1c
0x0d35…0d7a at001d = ╱31╱1╱ // 0xd52 @0x1d
0x0d35…0d7a at001e = ╱fe00008e07╱ // 0xd53 @0x1e
0x0d35…0d7a at0023 = ╱ee╱)╱ // 0xd58 @0x23
0x0d35…0d7a at0024 = ╱eb╱;╱ // 0xd59 @0x24
0x0d35…0d7a at0025 = ╱d2╱TAB╱ // 0xd5a @0x25
0x0d35…0d7a at0026 = ╱ed╱(╱ // 0xd5b @0x26
0x0d35…0d7a at0027 = ╱34╱4╱ // 0xd5c @0x27
0x0d35…0d7a at0028 = ╱36╱6╱ // 0xd5d @0x28
0x0d35…0d7a at0029 = ╱fe0000b806╱ // 0xd5e @0x29
0x0d35…0d7a at002e = ╱ee╱)╱ // 0xd63 @0x2e
0x0d35…0d7a at002f = ╱eb╱;╱ // 0xd64 @0x2f
0x0d35…0d7a at0030 = ╱44╱D╱ // 0xd65 @0x30
0x0d35…0d7a at0031 = ╱33╱3╱ // 0xd66 @0x31
0x0d35…0d7a at0032 = ╱ef╱$╱ // 0xd67 @0x32
0x0d35…0d7a at0033 = ╱ed╱(╱ // 0xd68 @0x33
0x0d35…0d7a at0034 = ╱33╱3╱ // 0xd69 @0x34
0x0d35…0d7a at0035 = ╱33╱3╱ // 0xd6a @0x35
0x0d35…0d7a at0036 = ╱fe00008406╱ // 0xd6b @0x36
0x0d35…0d7a at003b = ╱ec╱,╱ // 0xd70 @0x3b
0x0d35…0d7a at003c = ╱35╱5╱ // 0xd71 @0x3c
0x0d35…0d7a at003d = ╱35╱5╱ // 0xd72 @0x3d
0x0d35…0d7a at003e = ╱fe0000dc06╱ // 0xd73 @0x3e
0x0d35…0d7a at0043 = ╱ee╱)╱ // 0xd78 @0x43
0x0d35…0d7a at0044 = EOL // 0xd79 @0x44
0x0d35…0d7a }
0x0d7a…0dce 9b25 3140 PRINT TAB(13);D2$(E,4);" ";D2$(5,18);TAB(46);D4$(E,4);" ";
0x0d7a…0dce LineComalBin {
0x0d7a…0dce ptr = 0x9b25 // 0xd7a @0x0
0x0d7a…0dce lno = 0x0c44 // 0xd7c @0x2
0x0d7a…0dce at0004 = ╱92╱ PRINT ╱ // 0xd7e @0x4
0x0d7a…0dce at0005 = ╱d2╱TAB╱ // 0xd7f @0x5
0x0d7a…0dce at0006 = ╱ed╱(╱ // 0xd80 @0x6
0x0d7a…0dce at0007 = ╱31╱1╱ // 0xd81 @0x7
0x0d7a…0dce at0008 = ╱33╱3╱ // 0xd82 @0x8
0x0d7a…0dce at0009 = ╱fe0000d004╱ // 0xd83 @0x9
0x0d7a…0dce at000e = ╱ee╱)╱ // 0xd88 @0xe
0x0d7a…0dce at000f = ╱eb╱;╱ // 0xd89 @0xf
0x0d7a…0dce at0010 = ╱44╱D╱ // 0xd8a @0x10
0x0d7a…0dce at0011 = ╱32╱2╱ // 0xd8b @0x11
0x0d7a…0dce at0012 = ╱ef╱$╱ // 0xd8c @0x12
0x0d7a…0dce at0013 = ╱ed╱(╱ // 0xd8d @0x13
0x0d7a…0dce at0014 = ╱45╱E╱ // 0xd8e @0x14
0x0d7a…0dce at0015 = ╱ec╱,╱ // 0xd8f @0x15
0x0d7a…0dce at0016 = ╱34╱4╱ // 0xd90 @0x16
0x0d7a…0dce at0017 = ╱fe00008003╱ // 0xd91 @0x17
0x0d7a…0dce at001c = ╱ee╱)╱ // 0xd96 @0x1c
0x0d7a…0dce at001d = ╱eb╱;╱ // 0xd97 @0x1d
0x0d7a…0dce at001e = ╱22╱"╱ // 0xd98 @0x1e
0x0d7a…0dce at001f = ╱20╱…╱ // 0xd99 @0x1f
0x0d7a…0dce at0020 = ╱22╱"╱ // 0xd9a @0x20
0x0d7a…0dce at0021 = ╱eb╱;╱ // 0xd9b @0x21
0x0d7a…0dce at0022 = ╱44╱D╱ // 0xd9c @0x22
0x0d7a…0dce at0023 = ╱32╱2╱ // 0xd9d @0x23
0x0d7a…0dce at0024 = ╱ef╱$╱ // 0xd9e @0x24
0x0d7a…0dce at0025 = ╱ed╱(╱ // 0xd9f @0x25
0x0d7a…0dce at0026 = ╱35╱5╱ // 0xda0 @0x26
0x0d7a…0dce at0027 = ╱fe0000a003╱ // 0xda1 @0x27
0x0d7a…0dce at002c = ╱ec╱,╱ // 0xda6 @0x2c
0x0d7a…0dce at002d = ╱31╱1╱ // 0xda7 @0x2d
0x0d7a…0dce at002e = ╱38╱8╱ // 0xda8 @0x2e
0x0d7a…0dce at002f = ╱fe00009005╱ // 0xda9 @0x2f
0x0d7a…0dce at0034 = ╱ee╱)╱ // 0xdae @0x34
0x0d7a…0dce at0035 = ╱eb╱;╱ // 0xdaf @0x35
0x0d7a…0dce at0036 = ╱d2╱TAB╱ // 0xdb0 @0x36
0x0d7a…0dce at0037 = ╱ed╱(╱ // 0xdb1 @0x37
0x0d7a…0dce at0038 = ╱34╱4╱ // 0xdb2 @0x38
0x0d7a…0dce at0039 = ╱36╱6╱ // 0xdb3 @0x39
0x0d7a…0dce at003a = ╱fe0000b806╱ // 0xdb4 @0x3a
0x0d7a…0dce at003f = ╱ee╱)╱ // 0xdb9 @0x3f
0x0d7a…0dce at0040 = ╱eb╱;╱ // 0xdba @0x40
0x0d7a…0dce at0041 = ╱44╱D╱ // 0xdbb @0x41
0x0d7a…0dce at0042 = ╱34╱4╱ // 0xdbc @0x42
0x0d7a…0dce at0043 = ╱ef╱$╱ // 0xdbd @0x43
0x0d7a…0dce at0044 = ╱ed╱(╱ // 0xdbe @0x44
0x0d7a…0dce at0045 = ╱45╱E╱ // 0xdbf @0x45
0x0d7a…0dce at0046 = ╱ec╱,╱ // 0xdc0 @0x46
0x0d7a…0dce at0047 = ╱34╱4╱ // 0xdc1 @0x47
0x0d7a…0dce at0048 = ╱fe00008003╱ // 0xdc2 @0x48
0x0d7a…0dce at004d = ╱ee╱)╱ // 0xdc7 @0x4d
0x0d7a…0dce at004e = ╱eb╱;╱ // 0xdc8 @0x4e
0x0d7a…0dce at004f = ╱22╱"╱ // 0xdc9 @0x4f
0x0d7a…0dce at0050 = ╱20╱…╱ // 0xdca @0x50
0x0d7a…0dce at0051 = ╱22╱"╱ // 0xdcb @0x51
0x0d7a…0dce at0052 = ╱eb╱;╱ // 0xdcc @0x52
0x0d7a…0dce at0053 = EOL // 0xdcd @0x53
0x0d7a…0dce }
0x0dce…0de7 9b3e 3150 PRINT D4$(5,18)
0x0dce…0de7 LineComalBin {
0x0dce…0de7 ptr = 0x9b3e // 0xdce @0x0
0x0dce…0de7 lno = 0x0c4e // 0xdd0 @0x2
0x0dce…0de7 at0004 = ╱92╱ PRINT ╱ // 0xdd2 @0x4
0x0dce…0de7 at0005 = ╱44╱D╱ // 0xdd3 @0x5
0x0dce…0de7 at0006 = ╱34╱4╱ // 0xdd4 @0x6
0x0dce…0de7 at0007 = ╱ef╱$╱ // 0xdd5 @0x7
0x0dce…0de7 at0008 = ╱ed╱(╱ // 0xdd6 @0x8
0x0dce…0de7 at0009 = ╱35╱5╱ // 0xdd7 @0x9
0x0dce…0de7 at000a = ╱fe0000a003╱ // 0xdd8 @0xa
0x0dce…0de7 at000f = ╱ec╱,╱ // 0xddd @0xf
0x0dce…0de7 at0010 = ╱31╱1╱ // 0xdde @0x10
0x0dce…0de7 at0011 = ╱38╱8╱ // 0xddf @0x11
0x0dce…0de7 at0012 = ╱fe00009005╱ // 0xde0 @0x12
0x0dce…0de7 at0017 = ╱ee╱)╱ // 0xde5 @0x17
0x0dce…0de7 at0018 = EOL // 0xde6 @0x18
0x0dce…0de7 }
0x0de7…0df3 9b4a 3160 J6=J6+W
0x0de7…0df3 LineComalBin {
0x0de7…0df3 ptr = 0x9b4a // 0xde7 @0x0
0x0de7…0df3 lno = 0x0c58 // 0xde9 @0x2
0x0de7…0df3 at0004 = ╱4a╱J╱ // 0xdeb @0x4
0x0de7…0df3 at0005 = ╱36╱6╱ // 0xdec @0x5
0x0de7…0df3 at0006 = ╱dc╱=╱ // 0xded @0x6
0x0de7…0df3 at0007 = ╱4a╱J╱ // 0xdee @0x7
0x0de7…0df3 at0008 = ╱36╱6╱ // 0xdef @0x8
0x0de7…0df3 at0009 = ╱e2╱+╱ // 0xdf0 @0x9
0x0de7…0df3 at000a = ╱57╱W╱ // 0xdf1 @0xa
0x0de7…0df3 at000b = EOL // 0xdf2 @0xb
0x0de7…0df3 }
0x0df3…0dfe 9b55 3170 WHILE J6<K1
0x0df3…0dfe LineComalBin {
0x0df3…0dfe ptr = 0x9b55 // 0xdf3 @0x0
0x0df3…0dfe lno = 0x0c62 // 0xdf5 @0x2
0x0df3…0dfe at0004 = ╱93╱ WHILE ╱ // 0xdf7 @0x4
0x0df3…0dfe at0005 = ╱4a╱J╱ // 0xdf8 @0x5
0x0df3…0dfe at0006 = ╱36╱6╱ // 0xdf9 @0x6
0x0df3…0dfe at0007 = ╱dd╱<╱ // 0xdfa @0x7
0x0df3…0dfe at0008 = ╱4b╱K╱ // 0xdfb @0x8
0x0df3…0dfe at0009 = ╱31╱1╱ // 0xdfc @0x9
0x0df3…0dfe at000a = EOL // 0xdfd @0xa
0x0df3…0dfe }
0x0dfe…0e04 9b5b 3180 PRINT
0x0dfe…0e04 LineComalBin {
0x0dfe…0e04 ptr = 0x9b5b // 0xdfe @0x0
0x0dfe…0e04 lno = 0x0c6c // 0xe00 @0x2
0x0dfe…0e04 at0004 = ╱92╱ PRINT ╱ // 0xe02 @0x4
0x0dfe…0e04 at0005 = EOL // 0xe03 @0x5
0x0dfe…0e04 }
0x0e04…0e10 9b67 3190 J6=J6+E
0x0e04…0e10 LineComalBin {
0x0e04…0e10 ptr = 0x9b67 // 0xe04 @0x0
0x0e04…0e10 lno = 0x0c76 // 0xe06 @0x2
0x0e04…0e10 at0004 = ╱4a╱J╱ // 0xe08 @0x4
0x0e04…0e10 at0005 = ╱36╱6╱ // 0xe09 @0x5
0x0e04…0e10 at0006 = ╱dc╱=╱ // 0xe0a @0x6
0x0e04…0e10 at0007 = ╱4a╱J╱ // 0xe0b @0x7
0x0e04…0e10 at0008 = ╱36╱6╱ // 0xe0c @0x8
0x0e04…0e10 at0009 = ╱e2╱+╱ // 0xe0d @0x9
0x0e04…0e10 at000a = ╱45╱E╱ // 0xe0e @0xa
0x0e04…0e10 at000b = EOL // 0xe0f @0xb
0x0e04…0e10 }
0x0e10…0e16 9b6d 3200 ENDWHILE
0x0e10…0e16 LineComalBin {
0x0e10…0e16 ptr = 0x9b6d // 0xe10 @0x0
0x0e10…0e16 lno = 0x0c80 // 0xe12 @0x2
0x0e10…0e16 at0004 = ╱94╱ ENDWHILE ╱ // 0xe14 @0x4
0x0e10…0e16 at0005 = EOL // 0xe15 @0x5
0x0e10…0e16 }
0x0e16…0e1f 9b76 3210 J6=B
0x0e16…0e1f LineComalBin {
0x0e16…0e1f ptr = 0x9b76 // 0xe16 @0x0
0x0e16…0e1f lno = 0x0c8a // 0xe18 @0x2
0x0e16…0e1f at0004 = ╱4a╱J╱ // 0xe1a @0x4
0x0e16…0e1f at0005 = ╱36╱6╱ // 0xe1b @0x5
0x0e16…0e1f at0006 = ╱dc╱=╱ // 0xe1c @0x6
0x0e16…0e1f at0007 = ╱42╱B╱ // 0xe1d @0x7
0x0e16…0e1f at0008 = EOL // 0xe1e @0x8
0x0e16…0e1f }
0x0e1f…0e25 9b7c 3220 ENDIF
0x0e1f…0e25 LineComalBin {
0x0e1f…0e25 ptr = 0x9b7c // 0xe1f @0x0
0x0e1f…0e25 lno = 0x0c94 // 0xe21 @0x2
0x0e1f…0e25 at0004 = ╱9b╱ ENDIF ╱ // 0xe23 @0x4
0x0e1f…0e25 at0005 = EOL // 0xe24 @0x5
0x0e1f…0e25 }
0x0e25…0e2b 9b82 3230 ENDPROC
0x0e25…0e2b LineComalBin {
0x0e25…0e2b ptr = 0x9b82 // 0xe25 @0x0
0x0e25…0e2b lno = 0x0c9e // 0xe27 @0x2
0x0e25…0e2b at0004 = ╱9f╱ ENDPROC ╱ // 0xe29 @0x4
0x0e25…0e2b at0005 = EOL // 0xe2a @0x5
0x0e25…0e2b }
0x0e2b…0e3f 9b96 3240 PROC SKRIVHOVED(G5)
0x0e2b…0e3f LineComalBin {
0x0e2b…0e3f ptr = 0x9b96 // 0xe2b @0x0
0x0e2b…0e3f lno = 0x0ca8 // 0xe2d @0x2
0x0e2b…0e3f at0004 = ╱9e╱ PROC ╱ // 0xe2f @0x4
0x0e2b…0e3f at0005 = ╱53╱S╱ // 0xe30 @0x5
0x0e2b…0e3f at0006 = ╱4b╱K╱ // 0xe31 @0x6
0x0e2b…0e3f at0007 = ╱52╱R╱ // 0xe32 @0x7
0x0e2b…0e3f at0008 = ╱49╱I╱ // 0xe33 @0x8
0x0e2b…0e3f at0009 = ╱56╱V╱ // 0xe34 @0x9
0x0e2b…0e3f at000a = ╱48╱H╱ // 0xe35 @0xa
0x0e2b…0e3f at000b = ╱4f╱O╱ // 0xe36 @0xb
0x0e2b…0e3f at000c = ╱56╱V╱ // 0xe37 @0xc
0x0e2b…0e3f at000d = ╱45╱E╱ // 0xe38 @0xd
0x0e2b…0e3f at000e = ╱44╱D╱ // 0xe39 @0xe
0x0e2b…0e3f at000f = ╱ed╱(╱ // 0xe3a @0xf
0x0e2b…0e3f at0010 = ╱47╱G╱ // 0xe3b @0x10
0x0e2b…0e3f at0011 = ╱35╱5╱ // 0xe3c @0x11
0x0e2b…0e3f at0012 = ╱ee╱)╱ // 0xe3d @0x12
0x0e2b…0e3f at0013 = EOL // 0xe3e @0x13
0x0e2b…0e3f }
0x0e3f…0e45 9b9c 3250 PRINT
0x0e3f…0e45 LineComalBin {
0x0e3f…0e45 ptr = 0x9b9c // 0xe3f @0x0
0x0e3f…0e45 lno = 0x0cb2 // 0xe41 @0x2
0x0e3f…0e45 at0004 = ╱92╱ PRINT ╱ // 0xe43 @0x4
0x0e3f…0e45 at0005 = EOL // 0xe44 @0x5
0x0e3f…0e45 }
0x0e45…0e59 9bb0 3260 A6(G5)=A6(G5)+E
0x0e45…0e59 LineComalBin {
0x0e45…0e59 ptr = 0x9bb0 // 0xe45 @0x0
0x0e45…0e59 lno = 0x0cbc // 0xe47 @0x2
0x0e45…0e59 at0004 = ╱41╱A╱ // 0xe49 @0x4
0x0e45…0e59 at0005 = ╱36╱6╱ // 0xe4a @0x5
0x0e45…0e59 at0006 = ╱ed╱(╱ // 0xe4b @0x6
0x0e45…0e59 at0007 = ╱47╱G╱ // 0xe4c @0x7
0x0e45…0e59 at0008 = ╱35╱5╱ // 0xe4d @0x8
0x0e45…0e59 at0009 = ╱ee╱)╱ // 0xe4e @0x9
0x0e45…0e59 at000a = ╱dc╱=╱ // 0xe4f @0xa
0x0e45…0e59 at000b = ╱41╱A╱ // 0xe50 @0xb
0x0e45…0e59 at000c = ╱36╱6╱ // 0xe51 @0xc
0x0e45…0e59 at000d = ╱ed╱(╱ // 0xe52 @0xd
0x0e45…0e59 at000e = ╱47╱G╱ // 0xe53 @0xe
0x0e45…0e59 at000f = ╱35╱5╱ // 0xe54 @0xf
0x0e45…0e59 at0010 = ╱ee╱)╱ // 0xe55 @0x10
0x0e45…0e59 at0011 = ╱e2╱+╱ // 0xe56 @0x11
0x0e45…0e59 at0012 = ╱45╱E╱ // 0xe57 @0x12
0x0e45…0e59 at0013 = EOL // 0xe58 @0x13
0x0e45…0e59 }
0x0e59…0e73 9bca 3270 PRINT USING " SIDE####":A6(G5);
0x0e59…0e73 LineComalBin {
0x0e59…0e73 ptr = 0x9bca // 0xe59 @0x0
0x0e59…0e73 lno = 0x0cc6 // 0xe5b @0x2
0x0e59…0e73 at0004 = ╱92╱ PRINT ╱ // 0xe5d @0x4
0x0e59…0e73 at0005 = ╱b9╱ USING ╱ // 0xe5e @0x5
0x0e59…0e73 at0006 = ╱22╱"╱ // 0xe5f @0x6
0x0e59…0e73 at0007 = ╱20╱…╱ // 0xe60 @0x7
0x0e59…0e73 at0008 = ╱53╱S╱ // 0xe61 @0x8
0x0e59…0e73 at0009 = ╱49╱I╱ // 0xe62 @0x9
0x0e59…0e73 at000a = ╱44╱D╱ // 0xe63 @0xa
0x0e59…0e73 at000b = ╱45╱E╱ // 0xe64 @0xb
0x0e59…0e73 at000c = ╱23╱#╱ // 0xe65 @0xc
0x0e59…0e73 at000d = ╱23╱#╱ // 0xe66 @0xd
0x0e59…0e73 at000e = ╱23╱#╱ // 0xe67 @0xe
0x0e59…0e73 at000f = ╱23╱#╱ // 0xe68 @0xf
0x0e59…0e73 at0010 = ╱22╱"╱ // 0xe69 @0x10
0x0e59…0e73 at0011 = ╱f0╱:╱ // 0xe6a @0x11
0x0e59…0e73 at0012 = ╱41╱A╱ // 0xe6b @0x12
0x0e59…0e73 at0013 = ╱36╱6╱ // 0xe6c @0x13
0x0e59…0e73 at0014 = ╱ed╱(╱ // 0xe6d @0x14
0x0e59…0e73 at0015 = ╱47╱G╱ // 0xe6e @0x15
0x0e59…0e73 at0016 = ╱35╱5╱ // 0xe6f @0x16
0x0e59…0e73 at0017 = ╱ee╱)╱ // 0xe70 @0x17
0x0e59…0e73 at0018 = ╱eb╱;╱ // 0xe71 @0x18
0x0e59…0e73 at0019 = EOL // 0xe72 @0x19
0x0e59…0e73 }
0x0e73…0e94 9beb 3275 PRINT " UDSKRIFTSDATO ";DAD$;
0x0e73…0e94 LineComalBin {
0x0e73…0e94 ptr = 0x9beb // 0xe73 @0x0
0x0e73…0e94 lno = 0x0ccb // 0xe75 @0x2
0x0e73…0e94 at0004 = ╱92╱ PRINT ╱ // 0xe77 @0x4
0x0e73…0e94 at0005 = ╱22╱"╱ // 0xe78 @0x5
0x0e73…0e94 at0006 = ╱20╱…╱ // 0xe79 @0x6
0x0e73…0e94 at0007 = ╱20╱…╱ // 0xe7a @0x7
0x0e73…0e94 at0008 = ╱20╱…╱ // 0xe7b @0x8
0x0e73…0e94 at0009 = ╱20╱…╱ // 0xe7c @0x9
0x0e73…0e94 at000a = ╱20╱…╱ // 0xe7d @0xa
0x0e73…0e94 at000b = ╱55╱U╱ // 0xe7e @0xb
0x0e73…0e94 at000c = ╱44╱D╱ // 0xe7f @0xc
0x0e73…0e94 at000d = ╱53╱S╱ // 0xe80 @0xd
0x0e73…0e94 at000e = ╱4b╱K╱ // 0xe81 @0xe
0x0e73…0e94 at000f = ╱52╱R╱ // 0xe82 @0xf
0x0e73…0e94 at0010 = ╱49╱I╱ // 0xe83 @0x10
0x0e73…0e94 at0011 = ╱46╱F╱ // 0xe84 @0x11
0x0e73…0e94 at0012 = ╱54╱T╱ // 0xe85 @0x12
0x0e73…0e94 at0013 = ╱53╱S╱ // 0xe86 @0x13
0x0e73…0e94 at0014 = ╱44╱D╱ // 0xe87 @0x14
0x0e73…0e94 at0015 = ╱41╱A╱ // 0xe88 @0x15
0x0e73…0e94 at0016 = ╱54╱T╱ // 0xe89 @0x16
0x0e73…0e94 at0017 = ╱4f╱O╱ // 0xe8a @0x17
0x0e73…0e94 at0018 = ╱20╱…╱ // 0xe8b @0x18
0x0e73…0e94 at0019 = ╱22╱"╱ // 0xe8c @0x19
0x0e73…0e94 at001a = ╱eb╱;╱ // 0xe8d @0x1a
0x0e73…0e94 at001b = ╱44╱D╱ // 0xe8e @0x1b
0x0e73…0e94 at001c = ╱41╱A╱ // 0xe8f @0x1c
0x0e73…0e94 at001d = ╱44╱D╱ // 0xe90 @0x1d
0x0e73…0e94 at001e = ╱ef╱$╱ // 0xe91 @0x1e
0x0e73…0e94 at001f = ╱eb╱;╱ // 0xe92 @0x1f
0x0e73…0e94 at0020 = EOL // 0xe93 @0x20
0x0e73…0e94 }
0x0e94…0ec2 9c19 3280 PRINT TAB(49);"LØNPERIODEN ";A7$;" / ";A8$;
0x0e94…0ec2 LineComalBin {
0x0e94…0ec2 ptr = 0x9c19 // 0xe94 @0x0
0x0e94…0ec2 lno = 0x0cd0 // 0xe96 @0x2
0x0e94…0ec2 at0004 = ╱92╱ PRINT ╱ // 0xe98 @0x4
0x0e94…0ec2 at0005 = ╱d2╱TAB╱ // 0xe99 @0x5
0x0e94…0ec2 at0006 = ╱ed╱(╱ // 0xe9a @0x6
0x0e94…0ec2 at0007 = ╱34╱4╱ // 0xe9b @0x7
0x0e94…0ec2 at0008 = ╱39╱9╱ // 0xe9c @0x8
0x0e94…0ec2 at0009 = ╱fe0000c406╱ // 0xe9d @0x9
0x0e94…0ec2 at000e = ╱ee╱)╱ // 0xea2 @0xe
0x0e94…0ec2 at000f = ╱eb╱;╱ // 0xea3 @0xf
0x0e94…0ec2 at0010 = ╱22╱"╱ // 0xea4 @0x10
0x0e94…0ec2 at0011 = ╱4c╱L╱ // 0xea5 @0x11
0x0e94…0ec2 at0012 = ╱5c╱Ø╱ // 0xea6 @0x12
0x0e94…0ec2 at0013 = ╱4e╱N╱ // 0xea7 @0x13
0x0e94…0ec2 at0014 = ╱50╱P╱ // 0xea8 @0x14
0x0e94…0ec2 at0015 = ╱45╱E╱ // 0xea9 @0x15
0x0e94…0ec2 at0016 = ╱52╱R╱ // 0xeaa @0x16
0x0e94…0ec2 at0017 = ╱49╱I╱ // 0xeab @0x17
0x0e94…0ec2 at0018 = ╱4f╱O╱ // 0xeac @0x18
0x0e94…0ec2 at0019 = ╱44╱D╱ // 0xead @0x19
0x0e94…0ec2 at001a = ╱45╱E╱ // 0xeae @0x1a
0x0e94…0ec2 at001b = ╱4e╱N╱ // 0xeaf @0x1b
0x0e94…0ec2 at001c = ╱20╱…╱ // 0xeb0 @0x1c
0x0e94…0ec2 at001d = ╱22╱"╱ // 0xeb1 @0x1d
0x0e94…0ec2 at001e = ╱eb╱;╱ // 0xeb2 @0x1e
0x0e94…0ec2 at001f = ╱41╱A╱ // 0xeb3 @0x1f
0x0e94…0ec2 at0020 = ╱37╱7╱ // 0xeb4 @0x20
0x0e94…0ec2 at0021 = ╱ef╱$╱ // 0xeb5 @0x21
0x0e94…0ec2 at0022 = ╱eb╱;╱ // 0xeb6 @0x22
0x0e94…0ec2 at0023 = ╱22╱"╱ // 0xeb7 @0x23
0x0e94…0ec2 at0024 = ╱20╱…╱ // 0xeb8 @0x24
0x0e94…0ec2 at0025 = ╱2f╱/╱ // 0xeb9 @0x25
0x0e94…0ec2 at0026 = ╱20╱…╱ // 0xeba @0x26
0x0e94…0ec2 at0027 = ╱22╱"╱ // 0xebb @0x27
0x0e94…0ec2 at0028 = ╱eb╱;╱ // 0xebc @0x28
0x0e94…0ec2 at0029 = ╱41╱A╱ // 0xebd @0x29
0x0e94…0ec2 at002a = ╱38╱8╱ // 0xebe @0x2a
0x0e94…0ec2 at002b = ╱ef╱$╱ // 0xebf @0x2b
0x0e94…0ec2 at002c = ╱eb╱;╱ // 0xec0 @0x2c
0x0e94…0ec2 at002d = EOL // 0xec1 @0x2d
0x0e94…0ec2 }
0x0ec2…0ecc 9c23 3290 CASE G5 OF
0x0ec2…0ecc LineComalBin {
0x0ec2…0ecc ptr = 0x9c23 // 0xec2 @0x0
0x0ec2…0ecc lno = 0x0cda // 0xec4 @0x2
0x0ec2…0ecc at0004 = ╱a201╱ CASE ╱ // 0xec6 @0x4
0x0ec2…0ecc at0006 = ╱47╱G╱ // 0xec8 @0x6
0x0ec2…0ecc at0007 = ╱35╱5╱ // 0xec9 @0x7
0x0ec2…0ecc at0008 = ╱ba╱ OF ╱ // 0xeca @0x8
0x0ec2…0ecc at0009 = EOL // 0xecb @0x9
0x0ec2…0ecc }
0x0ecc…0ed4 9c2b 3300 WHEN E
0x0ecc…0ed4 LineComalBin {
0x0ecc…0ed4 ptr = 0x9c2b // 0xecc @0x0
0x0ecc…0ed4 lno = 0x0ce4 // 0xece @0x2
0x0ecc…0ed4 at0004 = ╱a301╱ WHEN ╱ // 0xed0 @0x4
0x0ecc…0ed4 at0006 = ╱45╱E╱ // 0xed2 @0x6
0x0ecc…0ed4 at0007 = EOL // 0xed3 @0x7
0x0ecc…0ed4 }
0x0ed4…0ee2 9c39 3310 J6=6
0x0ed4…0ee2 LineComalBin {
0x0ed4…0ee2 ptr = 0x9c39 // 0xed4 @0x0
0x0ed4…0ee2 lno = 0x0cee // 0xed6 @0x2
0x0ed4…0ee2 at0004 = ╱4a╱J╱ // 0xed8 @0x4
0x0ed4…0ee2 at0005 = ╱36╱6╱ // 0xed9 @0x5
0x0ed4…0ee2 at0006 = ╱dc╱=╱ // 0xeda @0x6
0x0ed4…0ee2 at0007 = ╱36╱6╱ // 0xedb @0x7
0x0ed4…0ee2 at0008 = ╱fe0000c003╱ // 0xedc @0x8
0x0ed4…0ee2 at000d = EOL // 0xee1 @0xd
0x0ed4…0ee2 }
0x0ee2…0f05 9c5c 3320 PRINT TAB(33);"LØNSPECIFIKATION"
0x0ee2…0f05 LineComalBin {
0x0ee2…0f05 ptr = 0x9c5c // 0xee2 @0x0
0x0ee2…0f05 lno = 0x0cf8 // 0xee4 @0x2
0x0ee2…0f05 at0004 = ╱92╱ PRINT ╱ // 0xee6 @0x4
0x0ee2…0f05 at0005 = ╱d2╱TAB╱ // 0xee7 @0x5
0x0ee2…0f05 at0006 = ╱ed╱(╱ // 0xee8 @0x6
0x0ee2…0f05 at0007 = ╱33╱3╱ // 0xee9 @0x7
0x0ee2…0f05 at0008 = ╱33╱3╱ // 0xeea @0x8
0x0ee2…0f05 at0009 = ╱fe00008406╱ // 0xeeb @0x9
0x0ee2…0f05 at000e = ╱ee╱)╱ // 0xef0 @0xe
0x0ee2…0f05 at000f = ╱eb╱;╱ // 0xef1 @0xf
0x0ee2…0f05 at0010 = ╱22╱"╱ // 0xef2 @0x10
0x0ee2…0f05 at0011 = ╱4c╱L╱ // 0xef3 @0x11
0x0ee2…0f05 at0012 = ╱5c╱Ø╱ // 0xef4 @0x12
0x0ee2…0f05 at0013 = ╱4e╱N╱ // 0xef5 @0x13
0x0ee2…0f05 at0014 = ╱53╱S╱ // 0xef6 @0x14
0x0ee2…0f05 at0015 = ╱50╱P╱ // 0xef7 @0x15
0x0ee2…0f05 at0016 = ╱45╱E╱ // 0xef8 @0x16
0x0ee2…0f05 at0017 = ╱43╱C╱ // 0xef9 @0x17
0x0ee2…0f05 at0018 = ╱49╱I╱ // 0xefa @0x18
0x0ee2…0f05 at0019 = ╱46╱F╱ // 0xefb @0x19
0x0ee2…0f05 at001a = ╱49╱I╱ // 0xefc @0x1a
0x0ee2…0f05 at001b = ╱4b╱K╱ // 0xefd @0x1b
0x0ee2…0f05 at001c = ╱41╱A╱ // 0xefe @0x1c
0x0ee2…0f05 at001d = ╱54╱T╱ // 0xeff @0x1d
0x0ee2…0f05 at001e = ╱49╱I╱ // 0xf00 @0x1e
0x0ee2…0f05 at001f = ╱4f╱O╱ // 0xf01 @0x1f
0x0ee2…0f05 at0020 = ╱4e╱N╱ // 0xf02 @0x20
0x0ee2…0f05 at0021 = ╱22╱"╱ // 0xf03 @0x21
0x0ee2…0f05 at0022 = EOL // 0xf04 @0x22
0x0ee2…0f05 }
0x0f05…0f28 9c7f 3330 PRINT TAB(33);"****************"
0x0f05…0f28 LineComalBin {
0x0f05…0f28 ptr = 0x9c7f // 0xf05 @0x0
0x0f05…0f28 lno = 0x0d02 // 0xf07 @0x2
0x0f05…0f28 at0004 = ╱92╱ PRINT ╱ // 0xf09 @0x4
0x0f05…0f28 at0005 = ╱d2╱TAB╱ // 0xf0a @0x5
0x0f05…0f28 at0006 = ╱ed╱(╱ // 0xf0b @0x6
0x0f05…0f28 at0007 = ╱33╱3╱ // 0xf0c @0x7
0x0f05…0f28 at0008 = ╱33╱3╱ // 0xf0d @0x8
0x0f05…0f28 at0009 = ╱fe00008406╱ // 0xf0e @0x9
0x0f05…0f28 at000e = ╱ee╱)╱ // 0xf13 @0xe
0x0f05…0f28 at000f = ╱eb╱;╱ // 0xf14 @0xf
0x0f05…0f28 at0010 = ╱22╱"╱ // 0xf15 @0x10
0x0f05…0f28 at0011 = ╱2a╱*╱ // 0xf16 @0x11
0x0f05…0f28 at0012 = ╱2a╱*╱ // 0xf17 @0x12
0x0f05…0f28 at0013 = ╱2a╱*╱ // 0xf18 @0x13
0x0f05…0f28 at0014 = ╱2a╱*╱ // 0xf19 @0x14
0x0f05…0f28 at0015 = ╱2a╱*╱ // 0xf1a @0x15
0x0f05…0f28 at0016 = ╱2a╱*╱ // 0xf1b @0x16
0x0f05…0f28 at0017 = ╱2a╱*╱ // 0xf1c @0x17
0x0f05…0f28 at0018 = ╱2a╱*╱ // 0xf1d @0x18
0x0f05…0f28 at0019 = ╱2a╱*╱ // 0xf1e @0x19
0x0f05…0f28 at001a = ╱2a╱*╱ // 0xf1f @0x1a
0x0f05…0f28 at001b = ╱2a╱*╱ // 0xf20 @0x1b
0x0f05…0f28 at001c = ╱2a╱*╱ // 0xf21 @0x1c
0x0f05…0f28 at001d = ╱2a╱*╱ // 0xf22 @0x1d
0x0f05…0f28 at001e = ╱2a╱*╱ // 0xf23 @0x1e
0x0f05…0f28 at001f = ╱2a╱*╱ // 0xf24 @0x1f
0x0f05…0f28 at0020 = ╱2a╱*╱ // 0xf25 @0x20
0x0f05…0f28 at0021 = ╱22╱"╱ // 0xf26 @0x21
0x0f05…0f28 at0022 = EOL // 0xf27 @0x22
0x0f05…0f28 }
0x0f28…0f2e 9c85 3340 PRINT
0x0f28…0f2e LineComalBin {
0x0f28…0f2e ptr = 0x9c85 // 0xf28 @0x0
0x0f28…0f2e lno = 0x0d0c // 0xf2a @0x2
0x0f28…0f2e at0004 = ╱92╱ PRINT ╱ // 0xf2c @0x4
0x0f28…0f2e at0005 = EOL // 0xf2d @0x5
0x0f28…0f2e }
0x0f2e…0f74 9ccb 3350 PRINT " LA TEKST";TAB(26);"NUMMER SALDO ENHEDER SATS ";
0x0f2e…0f74 LineComalBin {
0x0f2e…0f74 ptr = 0x9ccb // 0xf2e @0x0
0x0f2e…0f74 lno = 0x0d16 // 0xf30 @0x2
0x0f2e…0f74 at0004 = ╱92╱ PRINT ╱ // 0xf32 @0x4
0x0f2e…0f74 at0005 = ╱22╱"╱ // 0xf33 @0x5
0x0f2e…0f74 at0006 = ╱20╱…╱ // 0xf34 @0x6
0x0f2e…0f74 at0007 = ╱4c╱L╱ // 0xf35 @0x7
0x0f2e…0f74 at0008 = ╱41╱A╱ // 0xf36 @0x8
0x0f2e…0f74 at0009 = ╱20╱…╱ // 0xf37 @0x9
0x0f2e…0f74 at000a = ╱54╱T╱ // 0xf38 @0xa
0x0f2e…0f74 at000b = ╱45╱E╱ // 0xf39 @0xb
0x0f2e…0f74 at000c = ╱4b╱K╱ // 0xf3a @0xc
0x0f2e…0f74 at000d = ╱53╱S╱ // 0xf3b @0xd
0x0f2e…0f74 at000e = ╱54╱T╱ // 0xf3c @0xe
0x0f2e…0f74 at000f = ╱22╱"╱ // 0xf3d @0xf
0x0f2e…0f74 at0010 = ╱eb╱;╱ // 0xf3e @0x10
0x0f2e…0f74 at0011 = ╱d2╱TAB╱ // 0xf3f @0x11
0x0f2e…0f74 at0012 = ╱ed╱(╱ // 0xf40 @0x12
0x0f2e…0f74 at0013 = ╱32╱2╱ // 0xf41 @0x13
0x0f2e…0f74 at0014 = ╱36╱6╱ // 0xf42 @0x14
0x0f2e…0f74 at0015 = ╱fe0000d005╱ // 0xf43 @0x15
0x0f2e…0f74 at001a = ╱ee╱)╱ // 0xf48 @0x1a
0x0f2e…0f74 at001b = ╱eb╱;╱ // 0xf49 @0x1b
0x0f2e…0f74 at001c = ╱22╱"╱ // 0xf4a @0x1c
0x0f2e…0f74 at001d = ╱4e╱N╱ // 0xf4b @0x1d
0x0f2e…0f74 at001e = ╱55╱U╱ // 0xf4c @0x1e
0x0f2e…0f74 at001f = ╱4d╱M╱ // 0xf4d @0x1f
0x0f2e…0f74 at0020 = ╱4d╱M╱ // 0xf4e @0x20
0x0f2e…0f74 at0021 = ╱45╱E╱ // 0xf4f @0x21
0x0f2e…0f74 at0022 = ╱52╱R╱ // 0xf50 @0x22
0x0f2e…0f74 at0023 = ╱20╱…╱ // 0xf51 @0x23
0x0f2e…0f74 at0024 = ╱20╱…╱ // 0xf52 @0x24
0x0f2e…0f74 at0025 = ╱20╱…╱ // 0xf53 @0x25
0x0f2e…0f74 at0026 = ╱20╱…╱ // 0xf54 @0x26
0x0f2e…0f74 at0027 = ╱20╱…╱ // 0xf55 @0x27
0x0f2e…0f74 at0028 = ╱20╱…╱ // 0xf56 @0x28
0x0f2e…0f74 at0029 = ╱53╱S╱ // 0xf57 @0x29
0x0f2e…0f74 at002a = ╱41╱A╱ // 0xf58 @0x2a
0x0f2e…0f74 at002b = ╱4c╱L╱ // 0xf59 @0x2b
0x0f2e…0f74 at002c = ╱44╱D╱ // 0xf5a @0x2c
0x0f2e…0f74 at002d = ╱4f╱O╱ // 0xf5b @0x2d
0x0f2e…0f74 at002e = ╱20╱…╱ // 0xf5c @0x2e
0x0f2e…0f74 at002f = ╱20╱…╱ // 0xf5d @0x2f
0x0f2e…0f74 at0030 = ╱20╱…╱ // 0xf5e @0x30
0x0f2e…0f74 at0031 = ╱20╱…╱ // 0xf5f @0x31
0x0f2e…0f74 at0032 = ╱45╱E╱ // 0xf60 @0x32
0x0f2e…0f74 at0033 = ╱4e╱N╱ // 0xf61 @0x33
0x0f2e…0f74 at0034 = ╱48╱H╱ // 0xf62 @0x34
0x0f2e…0f74 at0035 = ╱45╱E╱ // 0xf63 @0x35
0x0f2e…0f74 at0036 = ╱44╱D╱ // 0xf64 @0x36
0x0f2e…0f74 at0037 = ╱45╱E╱ // 0xf65 @0x37
0x0f2e…0f74 at0038 = ╱52╱R╱ // 0xf66 @0x38
0x0f2e…0f74 at0039 = ╱20╱…╱ // 0xf67 @0x39
0x0f2e…0f74 at003a = ╱20╱…╱ // 0xf68 @0x3a
0x0f2e…0f74 at003b = ╱20╱…╱ // 0xf69 @0x3b
0x0f2e…0f74 at003c = ╱20╱…╱ // 0xf6a @0x3c
0x0f2e…0f74 at003d = ╱53╱S╱ // 0xf6b @0x3d
0x0f2e…0f74 at003e = ╱41╱A╱ // 0xf6c @0x3e
0x0f2e…0f74 at003f = ╱54╱T╱ // 0xf6d @0x3f
0x0f2e…0f74 at0040 = ╱53╱S╱ // 0xf6e @0x40
0x0f2e…0f74 at0041 = ╱20╱…╱ // 0xf6f @0x41
0x0f2e…0f74 at0042 = ╱20╱…╱ // 0xf70 @0x42
0x0f2e…0f74 at0043 = ╱22╱"╱ // 0xf71 @0x43
0x0f2e…0f74 at0044 = ╱eb╱;╱ // 0xf72 @0x44
0x0f2e…0f74 at0045 = EOL // 0xf73 @0x45
0x0f2e…0f74 }
0x0f74…0f8d 9ce4 3360 PRINT "UDBETALT/TRUKKET";
0x0f74…0f8d LineComalBin {
0x0f74…0f8d ptr = 0x9ce4 // 0xf74 @0x0
0x0f74…0f8d lno = 0x0d20 // 0xf76 @0x2
0x0f74…0f8d at0004 = ╱92╱ PRINT ╱ // 0xf78 @0x4
0x0f74…0f8d at0005 = ╱22╱"╱ // 0xf79 @0x5
0x0f74…0f8d at0006 = ╱55╱U╱ // 0xf7a @0x6
0x0f74…0f8d at0007 = ╱44╱D╱ // 0xf7b @0x7
0x0f74…0f8d at0008 = ╱42╱B╱ // 0xf7c @0x8
0x0f74…0f8d at0009 = ╱45╱E╱ // 0xf7d @0x9
0x0f74…0f8d at000a = ╱54╱T╱ // 0xf7e @0xa
0x0f74…0f8d at000b = ╱41╱A╱ // 0xf7f @0xb
0x0f74…0f8d at000c = ╱4c╱L╱ // 0xf80 @0xc
0x0f74…0f8d at000d = ╱54╱T╱ // 0xf81 @0xd
0x0f74…0f8d at000e = ╱2f╱/╱ // 0xf82 @0xe
0x0f74…0f8d at000f = ╱54╱T╱ // 0xf83 @0xf
0x0f74…0f8d at0010 = ╱52╱R╱ // 0xf84 @0x10
0x0f74…0f8d at0011 = ╱55╱U╱ // 0xf85 @0x11
0x0f74…0f8d at0012 = ╱4b╱K╱ // 0xf86 @0x12
0x0f74…0f8d at0013 = ╱4b╱K╱ // 0xf87 @0x13
0x0f74…0f8d at0014 = ╱45╱E╱ // 0xf88 @0x14
0x0f74…0f8d at0015 = ╱54╱T╱ // 0xf89 @0x15
0x0f74…0f8d at0016 = ╱22╱"╱ // 0xf8a @0x16
0x0f74…0f8d at0017 = ╱eb╱;╱ // 0xf8b @0x17
0x0f74…0f8d at0018 = EOL // 0xf8c @0x18
0x0f74…0f8d }
0x0f8d…0f95 9cec 3370 WHEN G
0x0f8d…0f95 LineComalBin {
0x0f8d…0f95 ptr = 0x9cec // 0xf8d @0x0
0x0f8d…0f95 lno = 0x0d2a // 0xf8f @0x2
0x0f8d…0f95 at0004 = ╱a301╱ WHEN ╱ // 0xf91 @0x4
0x0f8d…0f95 at0006 = ╱47╱G╱ // 0xf93 @0x6
0x0f8d…0f95 at0007 = EOL // 0xf94 @0x7
0x0f8d…0f95 }
0x0f95…0fa3 9cfa 3380 J6=5
0x0f95…0fa3 LineComalBin {
0x0f95…0fa3 ptr = 0x9cfa // 0xf95 @0x0
0x0f95…0fa3 lno = 0x0d34 // 0xf97 @0x2
0x0f95…0fa3 at0004 = ╱4a╱J╱ // 0xf99 @0x4
0x0f95…0fa3 at0005 = ╱36╱6╱ // 0xf9a @0x5
0x0f95…0fa3 at0006 = ╱dc╱=╱ // 0xf9b @0x6
0x0f95…0fa3 at0007 = ╱35╱5╱ // 0xf9c @0x7
0x0f95…0fa3 at0008 = ╱fe0000a003╱ // 0xf9d @0x8
0x0f95…0fa3 at000d = EOL // 0xfa2 @0xd
0x0f95…0fa3 }
0x0fa3…0fcc 9d23 3390 PRINT TAB(29);"FERIE- OG SH-OPGØRELSE"
0x0fa3…0fcc LineComalBin {
0x0fa3…0fcc ptr = 0x9d23 // 0xfa3 @0x0
0x0fa3…0fcc lno = 0x0d3e // 0xfa5 @0x2
0x0fa3…0fcc at0004 = ╱92╱ PRINT ╱ // 0xfa7 @0x4
0x0fa3…0fcc at0005 = ╱d2╱TAB╱ // 0xfa8 @0x5
0x0fa3…0fcc at0006 = ╱ed╱(╱ // 0xfa9 @0x6
0x0fa3…0fcc at0007 = ╱32╱2╱ // 0xfaa @0x7
0x0fa3…0fcc at0008 = ╱39╱9╱ // 0xfab @0x8
0x0fa3…0fcc at0009 = ╱fe0000e805╱ // 0xfac @0x9
0x0fa3…0fcc at000e = ╱ee╱)╱ // 0xfb1 @0xe
0x0fa3…0fcc at000f = ╱eb╱;╱ // 0xfb2 @0xf
0x0fa3…0fcc at0010 = ╱22╱"╱ // 0xfb3 @0x10
0x0fa3…0fcc at0011 = ╱46╱F╱ // 0xfb4 @0x11
0x0fa3…0fcc at0012 = ╱45╱E╱ // 0xfb5 @0x12
0x0fa3…0fcc at0013 = ╱52╱R╱ // 0xfb6 @0x13
0x0fa3…0fcc at0014 = ╱49╱I╱ // 0xfb7 @0x14
0x0fa3…0fcc at0015 = ╱45╱E╱ // 0xfb8 @0x15
0x0fa3…0fcc at0016 = ╱2d╱-╱ // 0xfb9 @0x16
0x0fa3…0fcc at0017 = ╱20╱…╱ // 0xfba @0x17
0x0fa3…0fcc at0018 = ╱4f╱O╱ // 0xfbb @0x18
0x0fa3…0fcc at0019 = ╱47╱G╱ // 0xfbc @0x19
0x0fa3…0fcc at001a = ╱20╱…╱ // 0xfbd @0x1a
0x0fa3…0fcc at001b = ╱53╱S╱ // 0xfbe @0x1b
0x0fa3…0fcc at001c = ╱48╱H╱ // 0xfbf @0x1c
0x0fa3…0fcc at001d = ╱2d╱-╱ // 0xfc0 @0x1d
0x0fa3…0fcc at001e = ╱4f╱O╱ // 0xfc1 @0x1e
0x0fa3…0fcc at001f = ╱50╱P╱ // 0xfc2 @0x1f
0x0fa3…0fcc at0020 = ╱47╱G╱ // 0xfc3 @0x20
0x0fa3…0fcc at0021 = ╱5c╱Ø╱ // 0xfc4 @0x21
0x0fa3…0fcc at0022 = ╱52╱R╱ // 0xfc5 @0x22
0x0fa3…0fcc at0023 = ╱45╱E╱ // 0xfc6 @0x23
0x0fa3…0fcc at0024 = ╱4c╱L╱ // 0xfc7 @0x24
0x0fa3…0fcc at0025 = ╱53╱S╱ // 0xfc8 @0x25
0x0fa3…0fcc at0026 = ╱45╱E╱ // 0xfc9 @0x26
0x0fa3…0fcc at0027 = ╱22╱"╱ // 0xfca @0x27
0x0fa3…0fcc at0028 = EOL // 0xfcb @0x28
0x0fa3…0fcc }
0x0fcc…0ff5 9d4c 3400 PRINT TAB(29);"**********************"
0x0fcc…0ff5 LineComalBin {
0x0fcc…0ff5 ptr = 0x9d4c // 0xfcc @0x0
0x0fcc…0ff5 lno = 0x0d48 // 0xfce @0x2
0x0fcc…0ff5 at0004 = ╱92╱ PRINT ╱ // 0xfd0 @0x4
0x0fcc…0ff5 at0005 = ╱d2╱TAB╱ // 0xfd1 @0x5
0x0fcc…0ff5 at0006 = ╱ed╱(╱ // 0xfd2 @0x6
0x0fcc…0ff5 at0007 = ╱32╱2╱ // 0xfd3 @0x7
0x0fcc…0ff5 at0008 = ╱39╱9╱ // 0xfd4 @0x8
0x0fcc…0ff5 at0009 = ╱fe0000e805╱ // 0xfd5 @0x9
0x0fcc…0ff5 at000e = ╱ee╱)╱ // 0xfda @0xe
0x0fcc…0ff5 at000f = ╱eb╱;╱ // 0xfdb @0xf
0x0fcc…0ff5 at0010 = ╱22╱"╱ // 0xfdc @0x10
0x0fcc…0ff5 at0011 = ╱2a╱*╱ // 0xfdd @0x11
0x0fcc…0ff5 at0012 = ╱2a╱*╱ // 0xfde @0x12
0x0fcc…0ff5 at0013 = ╱2a╱*╱ // 0xfdf @0x13
0x0fcc…0ff5 at0014 = ╱2a╱*╱ // 0xfe0 @0x14
0x0fcc…0ff5 at0015 = ╱2a╱*╱ // 0xfe1 @0x15
0x0fcc…0ff5 at0016 = ╱2a╱*╱ // 0xfe2 @0x16
0x0fcc…0ff5 at0017 = ╱2a╱*╱ // 0xfe3 @0x17
0x0fcc…0ff5 at0018 = ╱2a╱*╱ // 0xfe4 @0x18
0x0fcc…0ff5 at0019 = ╱2a╱*╱ // 0xfe5 @0x19
0x0fcc…0ff5 at001a = ╱2a╱*╱ // 0xfe6 @0x1a
0x0fcc…0ff5 at001b = ╱2a╱*╱ // 0xfe7 @0x1b
0x0fcc…0ff5 at001c = ╱2a╱*╱ // 0xfe8 @0x1c
0x0fcc…0ff5 at001d = ╱2a╱*╱ // 0xfe9 @0x1d
0x0fcc…0ff5 at001e = ╱2a╱*╱ // 0xfea @0x1e
0x0fcc…0ff5 at001f = ╱2a╱*╱ // 0xfeb @0x1f
0x0fcc…0ff5 at0020 = ╱2a╱*╱ // 0xfec @0x20
0x0fcc…0ff5 at0021 = ╱2a╱*╱ // 0xfed @0x21
0x0fcc…0ff5 at0022 = ╱2a╱*╱ // 0xfee @0x22
0x0fcc…0ff5 at0023 = ╱2a╱*╱ // 0xfef @0x23
0x0fcc…0ff5 at0024 = ╱2a╱*╱ // 0xff0 @0x24
0x0fcc…0ff5 at0025 = ╱2a╱*╱ // 0xff1 @0x25
0x0fcc…0ff5 at0026 = ╱2a╱*╱ // 0xff2 @0x26
0x0fcc…0ff5 at0027 = ╱22╱"╱ // 0xff3 @0x27
0x0fcc…0ff5 at0028 = EOL // 0xff4 @0x28
0x0fcc…0ff5 }
0x0ff5…0ffb 9d52 3410 PRINT
0x0ff5…0ffb LineComalBin {
0x0ff5…0ffb ptr = 0x9d52 // 0xff5 @0x0
0x0ff5…0ffb lno = 0x0d52 // 0xff7 @0x2
0x0ff5…0ffb at0004 = ╱92╱ PRINT ╱ // 0xff9 @0x4
0x0ff5…0ffb at0005 = EOL // 0xffa @0x5
0x0ff5…0ffb }
0x0ffb…1001 9d58 3420 ENDCASE
0x0ffb…1001 LineComalBin {
0x0ffb…1001 ptr = 0x9d58 // 0xffb @0x0
0x0ffb…1001 lno = 0x0d5c // 0xffd @0x2
0x0ffb…1001 at0004 = ╱a4╱ ENDCASE ╱ // 0xfff @0x4
0x0ffb…1001 at0005 = EOL // 0x1000 @0x5
0x0ffb…1001 }
0x1001…1007 9d5e 3430 ENDPROC
0x1001…1007 LineComalBin {
0x1001…1007 ptr = 0x9d5e // 0x1001 @0x0
0x1001…1007 lno = 0x0d66 // 0x1003 @0x2
0x1001…1007 at0004 = ╱9f╱ ENDPROC ╱ // 0x1005 @0x4
0x1001…1007 at0005 = EOL // 0x1006 @0x5
0x1001…1007 }
0x1007…1012 9d69 3440 PROC NÆSTE
0x1007…1012 LineComalBin {
0x1007…1012 ptr = 0x9d69 // 0x1007 @0x0
0x1007…1012 lno = 0x0d70 // 0x1009 @0x2
0x1007…1012 at0004 = ╱9e╱ PROC ╱ // 0x100b @0x4
0x1007…1012 at0005 = ╱4e╱N╱ // 0x100c @0x5
0x1007…1012 at0006 = ╱5b╱Æ╱ // 0x100d @0x6
0x1007…1012 at0007 = ╱53╱S╱ // 0x100e @0x7
0x1007…1012 at0008 = ╱54╱T╱ // 0x100f @0x8
0x1007…1012 at0009 = ╱45╱E╱ // 0x1010 @0x9
0x1007…1012 at000a = EOL // 0x1011 @0xa
0x1007…1012 }
0x1012…1018 9d6f 3450 REPEAT
0x1012…1018 LineComalBin {
0x1012…1018 ptr = 0x9d6f // 0x1012 @0x0
0x1012…1018 lno = 0x0d7a // 0x1014 @0x2
0x1012…1018 at0004 = ╱97╱ REPEAT ╱ // 0x1016 @0x4
0x1012…1018 at0005 = EOL // 0x1017 @0x5
0x1012…1018 }
0x1018…1024 9d7b 3460 F8=F8+E
0x1018…1024 LineComalBin {
0x1018…1024 ptr = 0x9d7b // 0x1018 @0x0
0x1018…1024 lno = 0x0d84 // 0x101a @0x2
0x1018…1024 at0004 = ╱46╱F╱ // 0x101c @0x4
0x1018…1024 at0005 = ╱38╱8╱ // 0x101d @0x5
0x1018…1024 at0006 = ╱dc╱=╱ // 0x101e @0x6
0x1018…1024 at0007 = ╱46╱F╱ // 0x101f @0x7
0x1018…1024 at0008 = ╱38╱8╱ // 0x1020 @0x8
0x1018…1024 at0009 = ╱e2╱+╱ // 0x1021 @0x9
0x1018…1024 at000a = ╱45╱E╱ // 0x1022 @0xa
0x1018…1024 at000b = EOL // 0x1023 @0xb
0x1018…1024 }
0x1024…102d 9d84 3470 H1=E
0x1024…102d LineComalBin {
0x1024…102d ptr = 0x9d84 // 0x1024 @0x0
0x1024…102d lno = 0x0d8e // 0x1026 @0x2
0x1024…102d at0004 = ╱48╱H╱ // 0x1028 @0x4
0x1024…102d at0005 = ╱31╱1╱ // 0x1029 @0x5
0x1024…102d at0006 = ╱dc╱=╱ // 0x102a @0x6
0x1024…102d at0007 = ╱45╱E╱ // 0x102b @0x7
0x1024…102d at0008 = EOL // 0x102c @0x8
0x1024…102d }
0x102d…1039 9d90 3480 IF F8<=I9 THEN
0x102d…1039 LineComalBin {
0x102d…1039 ptr = 0x9d90 // 0x102d @0x0
0x102d…1039 lno = 0x0d98 // 0x102f @0x2
0x102d…1039 at0004 = ╱9c╱ IF ╱ // 0x1031 @0x4
0x102d…1039 at0005 = ╱46╱F╱ // 0x1032 @0x5
0x102d…1039 at0006 = ╱38╱8╱ // 0x1033 @0x6
0x102d…1039 at0007 = ╱df╱<=╱ // 0x1034 @0x7
0x102d…1039 at0008 = ╱49╱I╱ // 0x1035 @0x8
0x102d…1039 at0009 = ╱39╱9╱ // 0x1036 @0x9
0x102d…1039 at000a = ╱b6╱ THEN ╱ // 0x1037 @0xa
0x102d…1039 at000b = EOL // 0x1038 @0xb
0x102d…1039 }
0x1039…104b 9da2 3490 EXEC INLØNMOD(F8)
0x1039…104b LineComalBin {
0x1039…104b ptr = 0x9da2 // 0x1039 @0x0
0x1039…104b lno = 0x0da2 // 0x103b @0x2
0x1039…104b at0004 = ╱9d╱ EXEC ╱ // 0x103d @0x4
0x1039…104b at0005 = ╱49╱I╱ // 0x103e @0x5
0x1039…104b at0006 = ╱4e╱N╱ // 0x103f @0x6
0x1039…104b at0007 = ╱4c╱L╱ // 0x1040 @0x7
0x1039…104b at0008 = ╱5c╱Ø╱ // 0x1041 @0x8
0x1039…104b at0009 = ╱4e╱N╱ // 0x1042 @0x9
0x1039…104b at000a = ╱4d╱M╱ // 0x1043 @0xa
0x1039…104b at000b = ╱4f╱O╱ // 0x1044 @0xb
0x1039…104b at000c = ╱44╱D╱ // 0x1045 @0xc
0x1039…104b at000d = ╱ed╱(╱ // 0x1046 @0xd
0x1039…104b at000e = ╱46╱F╱ // 0x1047 @0xe
0x1039…104b at000f = ╱38╱8╱ // 0x1048 @0xf
0x1039…104b at0010 = ╱ee╱)╱ // 0x1049 @0x10
0x1039…104b at0011 = EOL // 0x104a @0x11
0x1039…104b }
0x104b…1066 9dbd 3500 IF A9$<>D2$(21) THEN H1=B
0x104b…1066 LineComalBin {
0x104b…1066 ptr = 0x9dbd // 0x104b @0x0
0x104b…1066 lno = 0x0dac // 0x104d @0x2
0x104b…1066 at0004 = ╱82╱ IF ╱ // 0x104f @0x4
0x104b…1066 at0005 = ╱41╱A╱ // 0x1050 @0x5
0x104b…1066 at0006 = ╱39╱9╱ // 0x1051 @0x6
0x104b…1066 at0007 = ╱ef╱$╱ // 0x1052 @0x7
0x104b…1066 at0008 = ╱e1╱<>╱ // 0x1053 @0x8
0x104b…1066 at0009 = ╱44╱D╱ // 0x1054 @0x9
0x104b…1066 at000a = ╱32╱2╱ // 0x1055 @0xa
0x104b…1066 at000b = ╱ef╱$╱ // 0x1056 @0xb
0x104b…1066 at000c = ╱ed╱(╱ // 0x1057 @0xc
0x104b…1066 at000d = ╱32╱2╱ // 0x1058 @0xd
0x104b…1066 at000e = ╱31╱1╱ // 0x1059 @0xe
0x104b…1066 at000f = ╱fe0000a805╱ // 0x105a @0xf
0x104b…1066 at0014 = ╱ee╱)╱ // 0x105f @0x14
0x104b…1066 at0015 = ╱b6╱ THEN ╱ // 0x1060 @0x15
0x104b…1066 at0016 = ╱48╱H╱ // 0x1061 @0x16
0x104b…1066 at0017 = ╱31╱1╱ // 0x1062 @0x17
0x104b…1066 at0018 = ╱dc╱=╱ // 0x1063 @0x18
0x104b…1066 at0019 = ╱42╱B╱ // 0x1064 @0x19
0x104b…1066 at001a = EOL // 0x1065 @0x1a
0x104b…1066 }
0x1066…1092 9de9 3510 IF B0$="A" AND D2$(24,25)>"89" THEN H1=B
0x1066…1092 LineComalBin {
0x1066…1092 ptr = 0x9de9 // 0x1066 @0x0
0x1066…1092 lno = 0x0db6 // 0x1068 @0x2
0x1066…1092 at0004 = ╱82╱ IF ╱ // 0x106a @0x4
0x1066…1092 at0005 = ╱42╱B╱ // 0x106b @0x5
0x1066…1092 at0006 = ╱30╱0╱ // 0x106c @0x6
0x1066…1092 at0007 = ╱ef╱$╱ // 0x106d @0x7
0x1066…1092 at0008 = ╱dc╱=╱ // 0x106e @0x8
0x1066…1092 at0009 = ╱22╱"╱ // 0x106f @0x9
0x1066…1092 at000a = ╱41╱A╱ // 0x1070 @0xa
0x1066…1092 at000b = ╱22╱"╱ // 0x1071 @0xb
0x1066…1092 at000c = ╱da╱ AND ╱ // 0x1072 @0xc
0x1066…1092 at000d = ╱44╱D╱ // 0x1073 @0xd
0x1066…1092 at000e = ╱32╱2╱ // 0x1074 @0xe
0x1066…1092 at000f = ╱ef╱$╱ // 0x1075 @0xf
0x1066…1092 at0010 = ╱ed╱(╱ // 0x1076 @0x10
0x1066…1092 at0011 = ╱32╱2╱ // 0x1077 @0x11
0x1066…1092 at0012 = ╱34╱4╱ // 0x1078 @0x12
0x1066…1092 at0013 = ╱fe0000c005╱ // 0x1079 @0x13
0x1066…1092 at0018 = ╱ec╱,╱ // 0x107e @0x18
0x1066…1092 at0019 = ╱32╱2╱ // 0x107f @0x19
0x1066…1092 at001a = ╱35╱5╱ // 0x1080 @0x1a
0x1066…1092 at001b = ╱fe0000c805╱ // 0x1081 @0x1b
0x1066…1092 at0020 = ╱ee╱)╱ // 0x1086 @0x20
0x1066…1092 at0021 = ╱de╱>╱ // 0x1087 @0x21
0x1066…1092 at0022 = ╱22╱"╱ // 0x1088 @0x22
0x1066…1092 at0023 = ╱38╱8╱ // 0x1089 @0x23
0x1066…1092 at0024 = ╱39╱9╱ // 0x108a @0x24
0x1066…1092 at0025 = ╱22╱"╱ // 0x108b @0x25
0x1066…1092 at0026 = ╱b6╱ THEN ╱ // 0x108c @0x26
0x1066…1092 at0027 = ╱48╱H╱ // 0x108d @0x27
0x1066…1092 at0028 = ╱31╱1╱ // 0x108e @0x28
0x1066…1092 at0029 = ╱dc╱=╱ // 0x108f @0x29
0x1066…1092 at002a = ╱42╱B╱ // 0x1090 @0x2a
0x1066…1092 at002b = EOL // 0x1091 @0x2b
0x1066…1092 }
0x1092…10be 9e15 3520 IF B0$="F" AND D2$(24,25)<"90" THEN H1=B
0x1092…10be LineComalBin {
0x1092…10be ptr = 0x9e15 // 0x1092 @0x0
0x1092…10be lno = 0x0dc0 // 0x1094 @0x2
0x1092…10be at0004 = ╱82╱ IF ╱ // 0x1096 @0x4
0x1092…10be at0005 = ╱42╱B╱ // 0x1097 @0x5
0x1092…10be at0006 = ╱30╱0╱ // 0x1098 @0x6
0x1092…10be at0007 = ╱ef╱$╱ // 0x1099 @0x7
0x1092…10be at0008 = ╱dc╱=╱ // 0x109a @0x8
0x1092…10be at0009 = ╱22╱"╱ // 0x109b @0x9
0x1092…10be at000a = ╱46╱F╱ // 0x109c @0xa
0x1092…10be at000b = ╱22╱"╱ // 0x109d @0xb
0x1092…10be at000c = ╱da╱ AND ╱ // 0x109e @0xc
0x1092…10be at000d = ╱44╱D╱ // 0x109f @0xd
0x1092…10be at000e = ╱32╱2╱ // 0x10a0 @0xe
0x1092…10be at000f = ╱ef╱$╱ // 0x10a1 @0xf
0x1092…10be at0010 = ╱ed╱(╱ // 0x10a2 @0x10
0x1092…10be at0011 = ╱32╱2╱ // 0x10a3 @0x11
0x1092…10be at0012 = ╱34╱4╱ // 0x10a4 @0x12
0x1092…10be at0013 = ╱fe0000c005╱ // 0x10a5 @0x13
0x1092…10be at0018 = ╱ec╱,╱ // 0x10aa @0x18
0x1092…10be at0019 = ╱32╱2╱ // 0x10ab @0x19
0x1092…10be at001a = ╱35╱5╱ // 0x10ac @0x1a
0x1092…10be at001b = ╱fe0000c805╱ // 0x10ad @0x1b
0x1092…10be at0020 = ╱ee╱)╱ // 0x10b2 @0x20
0x1092…10be at0021 = ╱dd╱<╱ // 0x10b3 @0x21
0x1092…10be at0022 = ╱22╱"╱ // 0x10b4 @0x22
0x1092…10be at0023 = ╱39╱9╱ // 0x10b5 @0x23
0x1092…10be at0024 = ╱30╱0╱ // 0x10b6 @0x24
0x1092…10be at0025 = ╱22╱"╱ // 0x10b7 @0x25
0x1092…10be at0026 = ╱b6╱ THEN ╱ // 0x10b8 @0x26
0x1092…10be at0027 = ╱48╱H╱ // 0x10b9 @0x27
0x1092…10be at0028 = ╱31╱1╱ // 0x10ba @0x28
0x1092…10be at0029 = ╱dc╱=╱ // 0x10bb @0x29
0x1092…10be at002a = ╱42╱B╱ // 0x10bc @0x2a
0x1092…10be at002b = EOL // 0x10bd @0x2b
0x1092…10be }
0x10be…10c4 9e1b 3530 ENDIF
0x10be…10c4 LineComalBin {
0x10be…10c4 ptr = 0x9e1b // 0x10be @0x0
0x10be…10c4 lno = 0x0dca // 0x10c0 @0x2
0x10be…10c4 at0004 = ╱9b╱ ENDIF ╱ // 0x10c2 @0x4
0x10be…10c4 at0005 = EOL // 0x10c3 @0x5
0x10be…10c4 }
0x10c4…10ce 9e25 3540 UNTIL H1>B
0x10c4…10ce LineComalBin {
0x10c4…10ce ptr = 0x9e25 // 0x10c4 @0x0
0x10c4…10ce lno = 0x0dd4 // 0x10c6 @0x2
0x10c4…10ce at0004 = ╱98╱ UNTIL ╱ // 0x10c8 @0x4
0x10c4…10ce at0005 = ╱48╱H╱ // 0x10c9 @0x5
0x10c4…10ce at0006 = ╱31╱1╱ // 0x10ca @0x6
0x10c4…10ce at0007 = ╱de╱>╱ // 0x10cb @0x7
0x10c4…10ce at0008 = ╱42╱B╱ // 0x10cc @0x8
0x10c4…10ce at0009 = EOL // 0x10cd @0x9
0x10c4…10ce }
0x10ce…10d4 9e2b 3550 ENDPROC
0x10ce…10d4 LineComalBin {
0x10ce…10d4 ptr = 0x9e2b // 0x10ce @0x0
0x10ce…10d4 lno = 0x0dde // 0x10d0 @0x2
0x10ce…10d4 at0004 = ╱9f╱ ENDPROC ╱ // 0x10d2 @0x4
0x10ce…10d4 at0005 = EOL // 0x10d3 @0x5
0x10ce…10d4 }
0x10d4…10e5 9e3c 3560 PROC BEREGNFERIE
0x10d4…10e5 LineComalBin {
0x10d4…10e5 ptr = 0x9e3c // 0x10d4 @0x0
0x10d4…10e5 lno = 0x0de8 // 0x10d6 @0x2
0x10d4…10e5 at0004 = ╱9e╱ PROC ╱ // 0x10d8 @0x4
0x10d4…10e5 at0005 = ╱42╱B╱ // 0x10d9 @0x5
0x10d4…10e5 at0006 = ╱45╱E╱ // 0x10da @0x6
0x10d4…10e5 at0007 = ╱52╱R╱ // 0x10db @0x7
0x10d4…10e5 at0008 = ╱45╱E╱ // 0x10dc @0x8
0x10d4…10e5 at0009 = ╱47╱G╱ // 0x10dd @0x9
0x10d4…10e5 at000a = ╱4e╱N╱ // 0x10de @0xa
0x10d4…10e5 at000b = ╱46╱F╱ // 0x10df @0xb
0x10d4…10e5 at000c = ╱45╱E╱ // 0x10e0 @0xc
0x10d4…10e5 at000d = ╱52╱R╱ // 0x10e1 @0xd
0x10d4…10e5 at000e = ╱49╱I╱ // 0x10e2 @0xe
0x10d4…10e5 at000f = ╱45╱E╱ // 0x10e3 @0xf
0x10d4…10e5 at0010 = EOL // 0x10e4 @0x10
0x10d4…10e5 }
0x10e5…10fd 9e54 3570 EXEC SKRIVHOVED(2)
0x10e5…10fd LineComalBin {
0x10e5…10fd ptr = 0x9e54 // 0x10e5 @0x0
0x10e5…10fd lno = 0x0df2 // 0x10e7 @0x2
0x10e5…10fd at0004 = ╱9d╱ EXEC ╱ // 0x10e9 @0x4
0x10e5…10fd at0005 = ╱53╱S╱ // 0x10ea @0x5
0x10e5…10fd at0006 = ╱4b╱K╱ // 0x10eb @0x6
0x10e5…10fd at0007 = ╱52╱R╱ // 0x10ec @0x7
0x10e5…10fd at0008 = ╱49╱I╱ // 0x10ed @0x8
0x10e5…10fd at0009 = ╱56╱V╱ // 0x10ee @0x9
0x10e5…10fd at000a = ╱48╱H╱ // 0x10ef @0xa
0x10e5…10fd at000b = ╱4f╱O╱ // 0x10f0 @0xb
0x10e5…10fd at000c = ╱56╱V╱ // 0x10f1 @0xc
0x10e5…10fd at000d = ╱45╱E╱ // 0x10f2 @0xd
0x10e5…10fd at000e = ╱44╱D╱ // 0x10f3 @0xe
0x10e5…10fd at000f = ╱ed╱(╱ // 0x10f4 @0xf
0x10e5…10fd at0010 = ╱32╱2╱ // 0x10f5 @0x10
0x10e5…10fd at0011 = ╱fe00008002╱ // 0x10f6 @0x11
0x10e5…10fd at0016 = ╱ee╱)╱ // 0x10fb @0x16
0x10e5…10fd at0017 = EOL // 0x10fc @0x17
0x10e5…10fd }
0x10fd…110f 9e66 3580 IF K2=B THEN EXEC INDTÆL
0x10fd…110f LineComalBin {
0x10fd…110f ptr = 0x9e66 // 0x10fd @0x0
0x10fd…110f lno = 0x0dfc // 0x10ff @0x2
0x10fd…110f at0004 = ╱82╱ IF ╱ // 0x1101 @0x4
0x10fd…110f at0005 = ╱4b╱K╱ // 0x1102 @0x5
0x10fd…110f at0006 = ╱32╱2╱ // 0x1103 @0x6
0x10fd…110f at0007 = ╱dc╱=╱ // 0x1104 @0x7
0x10fd…110f at0008 = ╱42╱B╱ // 0x1105 @0x8
0x10fd…110f at0009 = ╱b6╱ THEN ╱ // 0x1106 @0x9
0x10fd…110f at000a = ╱9d╱ EXEC ╱ // 0x1107 @0xa
0x10fd…110f at000b = ╱49╱I╱ // 0x1108 @0xb
0x10fd…110f at000c = ╱4e╱N╱ // 0x1109 @0xc
0x10fd…110f at000d = ╱44╱D╱ // 0x110a @0xd
0x10fd…110f at000e = ╱54╱T╱ // 0x110b @0xe
0x10fd…110f at000f = ╱5b╱Æ╱ // 0x110c @0xf
0x10fd…110f at0010 = ╱4c╱L╱ // 0x110d @0x10
0x10fd…110f at0011 = EOL // 0x110e @0x11
0x10fd…110f }
0x110f…1119 9e70 3585 K4=H1
0x110f…1119 LineComalBin {
0x110f…1119 ptr = 0x9e70 // 0x110f @0x0
0x110f…1119 lno = 0x0e01 // 0x1111 @0x2
0x110f…1119 at0004 = ╱4b╱K╱ // 0x1113 @0x4
0x110f…1119 at0005 = ╱34╱4╱ // 0x1114 @0x5
0x110f…1119 at0006 = ╱dc╱=╱ // 0x1115 @0x6
0x110f…1119 at0007 = ╱48╱H╱ // 0x1116 @0x7
0x110f…1119 at0008 = ╱31╱1╱ // 0x1117 @0x8
0x110f…1119 at0009 = EOL // 0x1118 @0x9
0x110f…1119 }
0x1119…1132 9e89 3590 IF A4(K3)>H1 THEN K4=A4(K3)
0x1119…1132 LineComalBin {
0x1119…1132 ptr = 0x9e89 // 0x1119 @0x0
0x1119…1132 lno = 0x0e06 // 0x111b @0x2
0x1119…1132 at0004 = ╱82╱ IF ╱ // 0x111d @0x4
0x1119…1132 at0005 = ╱41╱A╱ // 0x111e @0x5
0x1119…1132 at0006 = ╱34╱4╱ // 0x111f @0x6
0x1119…1132 at0007 = ╱ed╱(╱ // 0x1120 @0x7
0x1119…1132 at0008 = ╱4b╱K╱ // 0x1121 @0x8
0x1119…1132 at0009 = ╱33╱3╱ // 0x1122 @0x9
0x1119…1132 at000a = ╱ee╱)╱ // 0x1123 @0xa
0x1119…1132 at000b = ╱de╱>╱ // 0x1124 @0xb
0x1119…1132 at000c = ╱48╱H╱ // 0x1125 @0xc
0x1119…1132 at000d = ╱31╱1╱ // 0x1126 @0xd
0x1119…1132 at000e = ╱b6╱ THEN ╱ // 0x1127 @0xe
0x1119…1132 at000f = ╱4b╱K╱ // 0x1128 @0xf
0x1119…1132 at0010 = ╱34╱4╱ // 0x1129 @0x10
0x1119…1132 at0011 = ╱dc╱=╱ // 0x112a @0x11
0x1119…1132 at0012 = ╱41╱A╱ // 0x112b @0x12
0x1119…1132 at0013 = ╱34╱4╱ // 0x112c @0x13
0x1119…1132 at0014 = ╱ed╱(╱ // 0x112d @0x14
0x1119…1132 at0015 = ╱4b╱K╱ // 0x112e @0x15
0x1119…1132 at0016 = ╱33╱3╱ // 0x112f @0x16
0x1119…1132 at0017 = ╱ee╱)╱ // 0x1130 @0x17
0x1119…1132 at0018 = EOL // 0x1131 @0x18
0x1119…1132 }
0x1132…113c 9e93 3595 K5=H6
0x1132…113c LineComalBin {
0x1132…113c ptr = 0x9e93 // 0x1132 @0x0
0x1132…113c lno = 0x0e0b // 0x1134 @0x2
0x1132…113c at0004 = ╱4b╱K╱ // 0x1136 @0x4
0x1132…113c at0005 = ╱35╱5╱ // 0x1137 @0x5
0x1132…113c at0006 = ╱dc╱=╱ // 0x1138 @0x6
0x1132…113c at0007 = ╱48╱H╱ // 0x1139 @0x7
0x1132…113c at0008 = ╱36╱6╱ // 0x113a @0x8
0x1132…113c at0009 = EOL // 0x113b @0x9
0x1132…113c }
0x113c…115a 9eb1 3640 IF A5(K3)<H6 OR H6=B THEN K5=A5(K3)
0x113c…115a LineComalBin {
0x113c…115a ptr = 0x9eb1 // 0x113c @0x0
0x113c…115a lno = 0x0e38 // 0x113e @0x2
0x113c…115a at0004 = ╱82╱ IF ╱ // 0x1140 @0x4
0x113c…115a at0005 = ╱41╱A╱ // 0x1141 @0x5
0x113c…115a at0006 = ╱35╱5╱ // 0x1142 @0x6
0x113c…115a at0007 = ╱ed╱(╱ // 0x1143 @0x7
0x113c…115a at0008 = ╱4b╱K╱ // 0x1144 @0x8
0x113c…115a at0009 = ╱33╱3╱ // 0x1145 @0x9
0x113c…115a at000a = ╱ee╱)╱ // 0x1146 @0xa
0x113c…115a at000b = ╱dd╱<╱ // 0x1147 @0xb
0x113c…115a at000c = ╱48╱H╱ // 0x1148 @0xc
0x113c…115a at000d = ╱36╱6╱ // 0x1149 @0xd
0x113c…115a at000e = ╱db╱ OR ╱ // 0x114a @0xe
0x113c…115a at000f = ╱48╱H╱ // 0x114b @0xf
0x113c…115a at0010 = ╱36╱6╱ // 0x114c @0x10
0x113c…115a at0011 = ╱dc╱=╱ // 0x114d @0x11
0x113c…115a at0012 = ╱42╱B╱ // 0x114e @0x12
0x113c…115a at0013 = ╱b6╱ THEN ╱ // 0x114f @0x13
0x113c…115a at0014 = ╱4b╱K╱ // 0x1150 @0x14
0x113c…115a at0015 = ╱35╱5╱ // 0x1151 @0x15
0x113c…115a at0016 = ╱dc╱=╱ // 0x1152 @0x16
0x113c…115a at0017 = ╱41╱A╱ // 0x1153 @0x17
0x113c…115a at0018 = ╱35╱5╱ // 0x1154 @0x18
0x113c…115a at0019 = ╱ed╱(╱ // 0x1155 @0x19
0x113c…115a at001a = ╱4b╱K╱ // 0x1156 @0x1a
0x113c…115a at001b = ╱33╱3╱ // 0x1157 @0x1b
0x113c…115a at001c = ╱ee╱)╱ // 0x1158 @0x1c
0x113c…115a at001d = EOL // 0x1159 @0x1d
0x113c…115a }
0x115a…1179 9ed0 3690 K6=K5 MOD 100-K4 MOD 100
0x115a…1179 LineComalBin {
0x115a…1179 ptr = 0x9ed0 // 0x115a @0x0
0x115a…1179 lno = 0x0e6a // 0x115c @0x2
0x115a…1179 at0004 = ╱4b╱K╱ // 0x115e @0x4
0x115a…1179 at0005 = ╱36╱6╱ // 0x115f @0x5
0x115a…1179 at0006 = ╱dc╱=╱ // 0x1160 @0x6
0x115a…1179 at0007 = ╱4b╱K╱ // 0x1161 @0x7
0x115a…1179 at0008 = ╱35╱5╱ // 0x1162 @0x8
0x115a…1179 at0009 = ╱e8╱ MOD ╱ // 0x1163 @0x9
0x115a…1179 at000a = ╱31╱1╱ // 0x1164 @0xa
0x115a…1179 at000b = ╱30╱0╱ // 0x1165 @0xb
0x115a…1179 at000c = ╱30╱0╱ // 0x1166 @0xc
0x115a…1179 at000d = ╱fe0000c807╱ // 0x1167 @0xd
0x115a…1179 at0012 = ╱e3╱-╱ // 0x116c @0x12
0x115a…1179 at0013 = ╱4b╱K╱ // 0x116d @0x13
0x115a…1179 at0014 = ╱34╱4╱ // 0x116e @0x14
0x115a…1179 at0015 = ╱e8╱ MOD ╱ // 0x116f @0x15
0x115a…1179 at0016 = ╱31╱1╱ // 0x1170 @0x16
0x115a…1179 at0017 = ╱30╱0╱ // 0x1171 @0x17
0x115a…1179 at0018 = ╱30╱0╱ // 0x1172 @0x18
0x115a…1179 at0019 = ╱fe0000c807╱ // 0x1173 @0x19
0x115a…1179 at001e = EOL // 0x1178 @0x1e
0x115a…1179 }
0x1179…11b7 9f0e 3700 K6=K6+30*(K5 DIV 100 MOD 100-K4 DIV 100 MOD 100)
0x1179…11b7 LineComalBin {
0x1179…11b7 ptr = 0x9f0e // 0x1179 @0x0
0x1179…11b7 lno = 0x0e74 // 0x117b @0x2
0x1179…11b7 at0004 = ╱4b╱K╱ // 0x117d @0x4
0x1179…11b7 at0005 = ╱36╱6╱ // 0x117e @0x5
0x1179…11b7 at0006 = ╱dc╱=╱ // 0x117f @0x6
0x1179…11b7 at0007 = ╱4b╱K╱ // 0x1180 @0x7
0x1179…11b7 at0008 = ╱36╱6╱ // 0x1181 @0x8
0x1179…11b7 at0009 = ╱e2╱+╱ // 0x1182 @0x9
0x1179…11b7 at000a = ╱33╱3╱ // 0x1183 @0xa
0x1179…11b7 at000b = ╱30╱0╱ // 0x1184 @0xb
0x1179…11b7 at000c = ╱fe0000f005╱ // 0x1185 @0xc
0x1179…11b7 at0011 = ╱e4╱*╱ // 0x118a @0x11
0x1179…11b7 at0012 = ╱ed╱(╱ // 0x118b @0x12
0x1179…11b7 at0013 = ╱4b╱K╱ // 0x118c @0x13
0x1179…11b7 at0014 = ╱35╱5╱ // 0x118d @0x14
0x1179…11b7 at0015 = ╱e7╱ DIV ╱ // 0x118e @0x15
0x1179…11b7 at0016 = ╱31╱1╱ // 0x118f @0x16
0x1179…11b7 at0017 = ╱30╱0╱ // 0x1190 @0x17
0x1179…11b7 at0018 = ╱30╱0╱ // 0x1191 @0x18
0x1179…11b7 at0019 = ╱fe0000c807╱ // 0x1192 @0x19
0x1179…11b7 at001e = ╱e8╱ MOD ╱ // 0x1197 @0x1e
0x1179…11b7 at001f = ╱31╱1╱ // 0x1198 @0x1f
0x1179…11b7 at0020 = ╱30╱0╱ // 0x1199 @0x20
0x1179…11b7 at0021 = ╱30╱0╱ // 0x119a @0x21
0x1179…11b7 at0022 = ╱fe0000c807╱ // 0x119b @0x22
0x1179…11b7 at0027 = ╱e3╱-╱ // 0x11a0 @0x27
0x1179…11b7 at0028 = ╱4b╱K╱ // 0x11a1 @0x28
0x1179…11b7 at0029 = ╱34╱4╱ // 0x11a2 @0x29
0x1179…11b7 at002a = ╱e7╱ DIV ╱ // 0x11a3 @0x2a
0x1179…11b7 at002b = ╱31╱1╱ // 0x11a4 @0x2b
0x1179…11b7 at002c = ╱30╱0╱ // 0x11a5 @0x2c
0x1179…11b7 at002d = ╱30╱0╱ // 0x11a6 @0x2d
0x1179…11b7 at002e = ╱fe0000c807╱ // 0x11a7 @0x2e
0x1179…11b7 at0033 = ╱e8╱ MOD ╱ // 0x11ac @0x33
0x1179…11b7 at0034 = ╱31╱1╱ // 0x11ad @0x34
0x1179…11b7 at0035 = ╱30╱0╱ // 0x11ae @0x35
0x1179…11b7 at0036 = ╱30╱0╱ // 0x11af @0x36
0x1179…11b7 at0037 = ╱fe0000c807╱ // 0x11b0 @0x37
0x1179…11b7 at003c = ╱ee╱)╱ // 0x11b5 @0x3c
0x1179…11b7 at003d = EOL // 0x11b6 @0x3d
0x1179…11b7 }
0x11b7…11dd 9f34 3705 K7=INT(G*I7*K6/365+0.5)/G
0x11b7…11dd LineComalBin {
0x11b7…11dd ptr = 0x9f34 // 0x11b7 @0x0
0x11b7…11dd lno = 0x0e79 // 0x11b9 @0x2
0x11b7…11dd at0004 = ╱4b╱K╱ // 0x11bb @0x4
0x11b7…11dd at0005 = ╱37╱7╱ // 0x11bc @0x5
0x11b7…11dd at0006 = ╱dc╱=╱ // 0x11bd @0x6
0x11b7…11dd at0007 = ╱c6╱INT╱ // 0x11be @0x7
0x11b7…11dd at0008 = ╱ed╱(╱ // 0x11bf @0x8
0x11b7…11dd at0009 = ╱47╱G╱ // 0x11c0 @0x9
0x11b7…11dd at000a = ╱e4╱*╱ // 0x11c1 @0xa
0x11b7…11dd at000b = ╱49╱I╱ // 0x11c2 @0xb
0x11b7…11dd at000c = ╱37╱7╱ // 0x11c3 @0xc
0x11b7…11dd at000d = ╱e4╱*╱ // 0x11c4 @0xd
0x11b7…11dd at000e = ╱4b╱K╱ // 0x11c5 @0xe
0x11b7…11dd at000f = ╱36╱6╱ // 0x11c6 @0xf
0x11b7…11dd at0010 = ╱e5╱/╱ // 0x11c7 @0x10
0x11b7…11dd at0011 = ╱33╱3╱ // 0x11c8 @0x11
0x11b7…11dd at0012 = ╱36╱6╱ // 0x11c9 @0x12
0x11b7…11dd at0013 = ╱35╱5╱ // 0x11ca @0x13
0x11b7…11dd at0014 = ╱fe0080b609╱ // 0x11cb @0x14
0x11b7…11dd at0019 = ╱e2╱+╱ // 0x11d0 @0x19
0x11b7…11dd at001a = ╱30╱0╱ // 0x11d1 @0x1a
0x11b7…11dd at001b = ╱2e╱.╱ // 0x11d2 @0x1b
0x11b7…11dd at001c = ╱35╱5╱ // 0x11d3 @0x1c
0x11b7…11dd at001d = ╱fe00008000╱ // 0x11d4 @0x1d
0x11b7…11dd at0022 = ╱ee╱)╱ // 0x11d9 @0x22
0x11b7…11dd at0023 = ╱e5╱/╱ // 0x11da @0x23
0x11b7…11dd at0024 = ╱47╱G╱ // 0x11db @0x24
0x11b7…11dd at0025 = EOL // 0x11dc @0x25
0x11b7…11dd }
0x11dd…120e 9f65 3710 K6=K6+365*(K5 DIV 10000-K4 DIV 10000)
0x11dd…120e LineComalBin {
0x11dd…120e ptr = 0x9f65 // 0x11dd @0x0
0x11dd…120e lno = 0x0e7e // 0x11df @0x2
0x11dd…120e at0004 = ╱4b╱K╱ // 0x11e1 @0x4
0x11dd…120e at0005 = ╱36╱6╱ // 0x11e2 @0x5
0x11dd…120e at0006 = ╱dc╱=╱ // 0x11e3 @0x6
0x11dd…120e at0007 = ╱4b╱K╱ // 0x11e4 @0x7
0x11dd…120e at0008 = ╱36╱6╱ // 0x11e5 @0x8
0x11dd…120e at0009 = ╱e2╱+╱ // 0x11e6 @0x9
0x11dd…120e at000a = ╱33╱3╱ // 0x11e7 @0xa
0x11dd…120e at000b = ╱36╱6╱ // 0x11e8 @0xb
0x11dd…120e at000c = ╱35╱5╱ // 0x11e9 @0xc
0x11dd…120e at000d = ╱fe0080b609╱ // 0x11ea @0xd
0x11dd…120e at0012 = ╱e4╱*╱ // 0x11ef @0x12
0x11dd…120e at0013 = ╱ed╱(╱ // 0x11f0 @0x13
0x11dd…120e at0014 = ╱4b╱K╱ // 0x11f1 @0x14
0x11dd…120e at0015 = ╱35╱5╱ // 0x11f2 @0x15
0x11dd…120e at0016 = ╱e7╱ DIV ╱ // 0x11f3 @0x16
0x11dd…120e at0017 = ╱31╱1╱ // 0x11f4 @0x17
0x11dd…120e at0018 = ╱30╱0╱ // 0x11f5 @0x18
0x11dd…120e at0019 = ╱30╱0╱ // 0x11f6 @0x19
0x11dd…120e at001a = ╱30╱0╱ // 0x11f7 @0x1a
0x11dd…120e at001b = ╱30╱0╱ // 0x11f8 @0x1b
0x11dd…120e at001c = ╱fe00409c0e╱ // 0x11f9 @0x1c
0x11dd…120e at0021 = ╱e3╱-╱ // 0x11fe @0x21
0x11dd…120e at0022 = ╱4b╱K╱ // 0x11ff @0x22
0x11dd…120e at0023 = ╱34╱4╱ // 0x1200 @0x23
0x11dd…120e at0024 = ╱e7╱ DIV ╱ // 0x1201 @0x24
0x11dd…120e at0025 = ╱31╱1╱ // 0x1202 @0x25
0x11dd…120e at0026 = ╱30╱0╱ // 0x1203 @0x26
0x11dd…120e at0027 = ╱30╱0╱ // 0x1204 @0x27
0x11dd…120e at0028 = ╱30╱0╱ // 0x1205 @0x28
0x11dd…120e at0029 = ╱30╱0╱ // 0x1206 @0x29
0x11dd…120e at002a = ╱fe00409c0e╱ // 0x1207 @0x2a
0x11dd…120e at002f = ╱ee╱)╱ // 0x120c @0x2f
0x11dd…120e at0030 = EOL // 0x120d @0x30
0x11dd…120e }
0x120e…1220 9f77 3720 IF A9$="1" THEN K7=B
0x120e…1220 LineComalBin {
0x120e…1220 ptr = 0x9f77 // 0x120e @0x0
0x120e…1220 lno = 0x0e88 // 0x1210 @0x2
0x120e…1220 at0004 = ╱82╱ IF ╱ // 0x1212 @0x4
0x120e…1220 at0005 = ╱41╱A╱ // 0x1213 @0x5
0x120e…1220 at0006 = ╱39╱9╱ // 0x1214 @0x6
0x120e…1220 at0007 = ╱ef╱$╱ // 0x1215 @0x7
0x120e…1220 at0008 = ╱dc╱=╱ // 0x1216 @0x8
0x120e…1220 at0009 = ╱22╱"╱ // 0x1217 @0x9
0x120e…1220 at000a = ╱31╱1╱ // 0x1218 @0xa
0x120e…1220 at000b = ╱22╱"╱ // 0x1219 @0xb
0x120e…1220 at000c = ╱b6╱ THEN ╱ // 0x121a @0xc
0x120e…1220 at000d = ╱4b╱K╱ // 0x121b @0xd
0x120e…1220 at000e = ╱37╱7╱ // 0x121c @0xe
0x120e…1220 at000f = ╱dc╱=╱ // 0x121d @0xf
0x120e…1220 at0010 = ╱42╱B╱ // 0x121e @0x10
0x120e…1220 at0011 = EOL // 0x121f @0x11
0x120e…1220 }
0x1220…122f 9f86 3770 EXEC Æ(C3$,K7)
0x1220…122f LineComalBin {
0x1220…122f ptr = 0x9f86 // 0x1220 @0x0
0x1220…122f lno = 0x0eba // 0x1222 @0x2
0x1220…122f at0004 = ╱9d╱ EXEC ╱ // 0x1224 @0x4
0x1220…122f at0005 = ╱5b╱Æ╱ // 0x1225 @0x5
0x1220…122f at0006 = ╱ed╱(╱ // 0x1226 @0x6
0x1220…122f at0007 = ╱43╱C╱ // 0x1227 @0x7
0x1220…122f at0008 = ╱33╱3╱ // 0x1228 @0x8
0x1220…122f at0009 = ╱ef╱$╱ // 0x1229 @0x9
0x1220…122f at000a = ╱ec╱,╱ // 0x122a @0xa
0x1220…122f at000b = ╱4b╱K╱ // 0x122b @0xb
0x1220…122f at000c = ╱37╱7╱ // 0x122c @0xc
0x1220…122f at000d = ╱ee╱)╱ // 0x122d @0xd
0x1220…122f at000e = EOL // 0x122e @0xe
0x1220…122f }
0x122f…1244 9f9b 3800 C4$=C5$(29)
0x122f…1244 LineComalBin {
0x122f…1244 ptr = 0x9f9b // 0x122f @0x0
0x122f…1244 lno = 0x0ed8 // 0x1231 @0x2
0x122f…1244 at0004 = ╱43╱C╱ // 0x1233 @0x4
0x122f…1244 at0005 = ╱34╱4╱ // 0x1234 @0x5
0x122f…1244 at0006 = ╱ef╱$╱ // 0x1235 @0x6
0x122f…1244 at0007 = ╱dc╱=╱ // 0x1236 @0x7
0x122f…1244 at0008 = ╱43╱C╱ // 0x1237 @0x8
0x122f…1244 at0009 = ╱35╱5╱ // 0x1238 @0x9
0x122f…1244 at000a = ╱ef╱$╱ // 0x1239 @0xa
0x122f…1244 at000b = ╱ed╱(╱ // 0x123a @0xb
0x122f…1244 at000c = ╱32╱2╱ // 0x123b @0xc
0x122f…1244 at000d = ╱39╱9╱ // 0x123c @0xd
0x122f…1244 at000e = ╱fe0000e805╱ // 0x123d @0xe
0x122f…1244 at0013 = ╱ee╱)╱ // 0x1242 @0x13
0x122f…1244 at0014 = EOL // 0x1243 @0x14
0x122f…1244 }
0x1244…125f 9fb6 3810 EXEC C(0,C3$,C4$,F1$)
0x1244…125f LineComalBin {
0x1244…125f ptr = 0x9fb6 // 0x1244 @0x0
0x1244…125f lno = 0x0ee2 // 0x1246 @0x2
0x1244…125f at0004 = ╱9d╱ EXEC ╱ // 0x1248 @0x4
0x1244…125f at0005 = ╱43╱C╱ // 0x1249 @0x5
0x1244…125f at0006 = ╱ed╱(╱ // 0x124a @0x6
0x1244…125f at0007 = ╱30╱0╱ // 0x124b @0x7
0x1244…125f at0008 = ╱fe00000000╱ // 0x124c @0x8
0x1244…125f at000d = ╱ec╱,╱ // 0x1251 @0xd
0x1244…125f at000e = ╱43╱C╱ // 0x1252 @0xe
0x1244…125f at000f = ╱33╱3╱ // 0x1253 @0xf
0x1244…125f at0010 = ╱ef╱$╱ // 0x1254 @0x10
0x1244…125f at0011 = ╱ec╱,╱ // 0x1255 @0x11
0x1244…125f at0012 = ╱43╱C╱ // 0x1256 @0x12
0x1244…125f at0013 = ╱34╱4╱ // 0x1257 @0x13
0x1244…125f at0014 = ╱ef╱$╱ // 0x1258 @0x14
0x1244…125f at0015 = ╱ec╱,╱ // 0x1259 @0x15
0x1244…125f at0016 = ╱46╱F╱ // 0x125a @0x16
0x1244…125f at0017 = ╱31╱1╱ // 0x125b @0x17
0x1244…125f at0018 = ╱ef╱$╱ // 0x125c @0x18
0x1244…125f at0019 = ╱ee╱)╱ // 0x125d @0x19
0x1244…125f at001a = EOL // 0x125e @0x1a
0x1244…125f }
0x125f…127a 9fd1 3820 C5$(29)=F1$(G:EL)
0x125f…127a LineComalBin {
0x125f…127a ptr = 0x9fd1 // 0x125f @0x0
0x125f…127a lno = 0x0eec // 0x1261 @0x2
0x125f…127a at0004 = ╱43╱C╱ // 0x1263 @0x4
0x125f…127a at0005 = ╱35╱5╱ // 0x1264 @0x5
0x125f…127a at0006 = ╱ef╱$╱ // 0x1265 @0x6
0x125f…127a at0007 = ╱ed╱(╱ // 0x1266 @0x7
0x125f…127a at0008 = ╱32╱2╱ // 0x1267 @0x8
0x125f…127a at0009 = ╱39╱9╱ // 0x1268 @0x9
0x125f…127a at000a = ╱fe0000e805╱ // 0x1269 @0xa
0x125f…127a at000f = ╱ee╱)╱ // 0x126e @0xf
0x125f…127a at0010 = ╱dc╱=╱ // 0x126f @0x10
0x125f…127a at0011 = ╱46╱F╱ // 0x1270 @0x11
0x125f…127a at0012 = ╱31╱1╱ // 0x1271 @0x12
0x125f…127a at0013 = ╱ef╱$╱ // 0x1272 @0x13
0x125f…127a at0014 = ╱ed╱(╱ // 0x1273 @0x14
0x125f…127a at0015 = ╱47╱G╱ // 0x1274 @0x15
0x125f…127a at0016 = ╱f0╱:╱ // 0x1275 @0x16
0x125f…127a at0017 = ╱45╱E╱ // 0x1276 @0x17
0x125f…127a at0018 = ╱4c╱L╱ // 0x1277 @0x18
0x125f…127a at0019 = ╱ee╱)╱ // 0x1278 @0x19
0x125f…127a at001a = EOL // 0x1279 @0x1a
0x125f…127a }
0x127a…1285 9fdc 3830 IF K3=V THEN
0x127a…1285 LineComalBin {
0x127a…1285 ptr = 0x9fdc // 0x127a @0x0
0x127a…1285 lno = 0x0ef6 // 0x127c @0x2
0x127a…1285 at0004 = ╱9c╱ IF ╱ // 0x127e @0x4
0x127a…1285 at0005 = ╱4b╱K╱ // 0x127f @0x5
0x127a…1285 at0006 = ╱33╱3╱ // 0x1280 @0x6
0x127a…1285 at0007 = ╱dc╱=╱ // 0x1281 @0x7
0x127a…1285 at0008 = ╱56╱V╱ // 0x1282 @0x8
0x127a…1285 at0009 = ╱b6╱ THEN ╱ // 0x1283 @0x9
0x127a…1285 at000a = EOL // 0x1284 @0xa
0x127a…1285 }
0x1285…1294 9feb 3840 EXEC Æ(C3$,I7)
0x1285…1294 LineComalBin {
0x1285…1294 ptr = 0x9feb // 0x1285 @0x0
0x1285…1294 lno = 0x0f00 // 0x1287 @0x2
0x1285…1294 at0004 = ╱9d╱ EXEC ╱ // 0x1289 @0x4
0x1285…1294 at0005 = ╱5b╱Æ╱ // 0x128a @0x5
0x1285…1294 at0006 = ╱ed╱(╱ // 0x128b @0x6
0x1285…1294 at0007 = ╱43╱C╱ // 0x128c @0x7
0x1285…1294 at0008 = ╱33╱3╱ // 0x128d @0x8
0x1285…1294 at0009 = ╱ef╱$╱ // 0x128e @0x9
0x1285…1294 at000a = ╱ec╱,╱ // 0x128f @0xa
0x1285…1294 at000b = ╱49╱I╱ // 0x1290 @0xb
0x1285…1294 at000c = ╱37╱7╱ // 0x1291 @0xc
0x1285…1294 at000d = ╱ee╱)╱ // 0x1292 @0xd
0x1285…1294 at000e = EOL // 0x1293 @0xe
0x1285…1294 }
0x1294…12af a006 3850 EXEC C(4,F1$,C3$,C4$)
0x1294…12af LineComalBin {
0x1294…12af ptr = 0xa006 // 0x1294 @0x0
0x1294…12af lno = 0x0f0a // 0x1296 @0x2
0x1294…12af at0004 = ╱9d╱ EXEC ╱ // 0x1298 @0x4
0x1294…12af at0005 = ╱43╱C╱ // 0x1299 @0x5
0x1294…12af at0006 = ╱ed╱(╱ // 0x129a @0x6
0x1294…12af at0007 = ╱34╱4╱ // 0x129b @0x7
0x1294…12af at0008 = ╱fe00008003╱ // 0x129c @0x8
0x1294…12af at000d = ╱ec╱,╱ // 0x12a1 @0xd
0x1294…12af at000e = ╱46╱F╱ // 0x12a2 @0xe
0x1294…12af at000f = ╱31╱1╱ // 0x12a3 @0xf
0x1294…12af at0010 = ╱ef╱$╱ // 0x12a4 @0x10
0x1294…12af at0011 = ╱ec╱,╱ // 0x12a5 @0x11
0x1294…12af at0012 = ╱43╱C╱ // 0x12a6 @0x12
0x1294…12af at0013 = ╱33╱3╱ // 0x12a7 @0x13
0x1294…12af at0014 = ╱ef╱$╱ // 0x12a8 @0x14
0x1294…12af at0015 = ╱ec╱,╱ // 0x12a9 @0x15
0x1294…12af at0016 = ╱43╱C╱ // 0x12aa @0x16
0x1294…12af at0017 = ╱34╱4╱ // 0x12ab @0x17
0x1294…12af at0018 = ╱ef╱$╱ // 0x12ac @0x18
0x1294…12af at0019 = ╱ee╱)╱ // 0x12ad @0x19
0x1294…12af at001a = EOL // 0x12ae @0x1a
0x1294…12af }
0x12af…12c1 a018 3860 IF SI=G THEN F1$=C3$
0x12af…12c1 LineComalBin {
0x12af…12c1 ptr = 0xa018 // 0x12af @0x0
0x12af…12c1 lno = 0x0f14 // 0x12b1 @0x2
0x12af…12c1 at0004 = ╱82╱ IF ╱ // 0x12b3 @0x4
0x12af…12c1 at0005 = ╱53╱S╱ // 0x12b4 @0x5
0x12af…12c1 at0006 = ╱49╱I╱ // 0x12b5 @0x6
0x12af…12c1 at0007 = ╱dc╱=╱ // 0x12b6 @0x7
0x12af…12c1 at0008 = ╱47╱G╱ // 0x12b7 @0x8
0x12af…12c1 at0009 = ╱b6╱ THEN ╱ // 0x12b8 @0x9
0x12af…12c1 at000a = ╱46╱F╱ // 0x12b9 @0xa
0x12af…12c1 at000b = ╱31╱1╱ // 0x12ba @0xb
0x12af…12c1 at000c = ╱ef╱$╱ // 0x12bb @0xc
0x12af…12c1 at000d = ╱dc╱=╱ // 0x12bc @0xd
0x12af…12c1 at000e = ╱43╱C╱ // 0x12bd @0xe
0x12af…12c1 at000f = ╱33╱3╱ // 0x12be @0xf
0x12af…12c1 at0010 = ╱ef╱$╱ // 0x12bf @0x10
0x12af…12c1 at0011 = EOL // 0x12c0 @0x11
0x12af…12c1 }
0x12c1…12c7 a01e 3870 ENDIF
0x12c1…12c7 LineComalBin {
0x12c1…12c7 ptr = 0xa01e // 0x12c1 @0x0
0x12c1…12c7 lno = 0x0f1e // 0x12c3 @0x2
0x12c1…12c7 at0004 = ╱9b╱ ENDIF ╱ // 0x12c5 @0x4
0x12c1…12c7 at0005 = EOL // 0x12c6 @0x5
0x12c1…12c7 }
0x12c7…12dc a033 3873 C4$=C5$(44)
0x12c7…12dc LineComalBin {
0x12c7…12dc ptr = 0xa033 // 0x12c7 @0x0
0x12c7…12dc lno = 0x0f21 // 0x12c9 @0x2
0x12c7…12dc at0004 = ╱43╱C╱ // 0x12cb @0x4
0x12c7…12dc at0005 = ╱34╱4╱ // 0x12cc @0x5
0x12c7…12dc at0006 = ╱ef╱$╱ // 0x12cd @0x6
0x12c7…12dc at0007 = ╱dc╱=╱ // 0x12ce @0x7
0x12c7…12dc at0008 = ╱43╱C╱ // 0x12cf @0x8
0x12c7…12dc at0009 = ╱35╱5╱ // 0x12d0 @0x9
0x12c7…12dc at000a = ╱ef╱$╱ // 0x12d1 @0xa
0x12c7…12dc at000b = ╱ed╱(╱ // 0x12d2 @0xb
0x12c7…12dc at000c = ╱34╱4╱ // 0x12d3 @0xc
0x12c7…12dc at000d = ╱34╱4╱ // 0x12d4 @0xd
0x12c7…12dc at000e = ╱fe0000b006╱ // 0x12d5 @0xe
0x12c7…12dc at0013 = ╱ee╱)╱ // 0x12da @0x13
0x12c7…12dc at0014 = EOL // 0x12db @0x14
0x12c7…12dc }
0x12dc…12f7 a04e 3876 EXEC C(0,C4$,F1$,C4$)
0x12dc…12f7 LineComalBin {
0x12dc…12f7 ptr = 0xa04e // 0x12dc @0x0
0x12dc…12f7 lno = 0x0f24 // 0x12de @0x2
0x12dc…12f7 at0004 = ╱9d╱ EXEC ╱ // 0x12e0 @0x4
0x12dc…12f7 at0005 = ╱43╱C╱ // 0x12e1 @0x5
0x12dc…12f7 at0006 = ╱ed╱(╱ // 0x12e2 @0x6
0x12dc…12f7 at0007 = ╱30╱0╱ // 0x12e3 @0x7
0x12dc…12f7 at0008 = ╱fe00000000╱ // 0x12e4 @0x8
0x12dc…12f7 at000d = ╱ec╱,╱ // 0x12e9 @0xd
0x12dc…12f7 at000e = ╱43╱C╱ // 0x12ea @0xe
0x12dc…12f7 at000f = ╱34╱4╱ // 0x12eb @0xf
0x12dc…12f7 at0010 = ╱ef╱$╱ // 0x12ec @0x10
0x12dc…12f7 at0011 = ╱ec╱,╱ // 0x12ed @0x11
0x12dc…12f7 at0012 = ╱46╱F╱ // 0x12ee @0x12
0x12dc…12f7 at0013 = ╱31╱1╱ // 0x12ef @0x13
0x12dc…12f7 at0014 = ╱ef╱$╱ // 0x12f0 @0x14
0x12dc…12f7 at0015 = ╱ec╱,╱ // 0x12f1 @0x15
0x12dc…12f7 at0016 = ╱43╱C╱ // 0x12f2 @0x16
0x12dc…12f7 at0017 = ╱34╱4╱ // 0x12f3 @0x17
0x12dc…12f7 at0018 = ╱ef╱$╱ // 0x12f4 @0x18
0x12dc…12f7 at0019 = ╱ee╱)╱ // 0x12f5 @0x19
0x12dc…12f7 at001a = EOL // 0x12f6 @0x1a
0x12dc…12f7 }
0x12f7…1312 a069 3880 C5$(44)=C4$(G:EL)
0x12f7…1312 LineComalBin {
0x12f7…1312 ptr = 0xa069 // 0x12f7 @0x0
0x12f7…1312 lno = 0x0f28 // 0x12f9 @0x2
0x12f7…1312 at0004 = ╱43╱C╱ // 0x12fb @0x4
0x12f7…1312 at0005 = ╱35╱5╱ // 0x12fc @0x5
0x12f7…1312 at0006 = ╱ef╱$╱ // 0x12fd @0x6
0x12f7…1312 at0007 = ╱ed╱(╱ // 0x12fe @0x7
0x12f7…1312 at0008 = ╱34╱4╱ // 0x12ff @0x8
0x12f7…1312 at0009 = ╱34╱4╱ // 0x1300 @0x9
0x12f7…1312 at000a = ╱fe0000b006╱ // 0x1301 @0xa
0x12f7…1312 at000f = ╱ee╱)╱ // 0x1306 @0xf
0x12f7…1312 at0010 = ╱dc╱=╱ // 0x1307 @0x10
0x12f7…1312 at0011 = ╱43╱C╱ // 0x1308 @0x11
0x12f7…1312 at0012 = ╱34╱4╱ // 0x1309 @0x12
0x12f7…1312 at0013 = ╱ef╱$╱ // 0x130a @0x13
0x12f7…1312 at0014 = ╱ed╱(╱ // 0x130b @0x14
0x12f7…1312 at0015 = ╱47╱G╱ // 0x130c @0x15
0x12f7…1312 at0016 = ╱f0╱:╱ // 0x130d @0x16
0x12f7…1312 at0017 = ╱45╱E╱ // 0x130e @0x17
0x12f7…1312 at0018 = ╱4c╱L╱ // 0x130f @0x18
0x12f7…1312 at0019 = ╱ee╱)╱ // 0x1310 @0x19
0x12f7…1312 at001a = EOL // 0x1311 @0x1a
0x12f7…1312 }
0x1312…1364 a0bb 3890 PRINT " FERIEKODE ";D2$(22);" OR-KODE ";D2$(24,25);" FAGGR-KODE";H5
0x1312…1364 LineComalBin {
0x1312…1364 ptr = 0xa0bb // 0x1312 @0x0
0x1312…1364 lno = 0x0f32 // 0x1314 @0x2
0x1312…1364 at0004 = ╱92╱ PRINT ╱ // 0x1316 @0x4
0x1312…1364 at0005 = ╱22╱"╱ // 0x1317 @0x5
0x1312…1364 at0006 = ╱20╱…╱ // 0x1318 @0x6
0x1312…1364 at0007 = ╱46╱F╱ // 0x1319 @0x7
0x1312…1364 at0008 = ╱45╱E╱ // 0x131a @0x8
0x1312…1364 at0009 = ╱52╱R╱ // 0x131b @0x9
0x1312…1364 at000a = ╱49╱I╱ // 0x131c @0xa
0x1312…1364 at000b = ╱45╱E╱ // 0x131d @0xb
0x1312…1364 at000c = ╱4b╱K╱ // 0x131e @0xc
0x1312…1364 at000d = ╱4f╱O╱ // 0x131f @0xd
0x1312…1364 at000e = ╱44╱D╱ // 0x1320 @0xe
0x1312…1364 at000f = ╱45╱E╱ // 0x1321 @0xf
0x1312…1364 at0010 = ╱20╱…╱ // 0x1322 @0x10
0x1312…1364 at0011 = ╱22╱"╱ // 0x1323 @0x11
0x1312…1364 at0012 = ╱eb╱;╱ // 0x1324 @0x12
0x1312…1364 at0013 = ╱44╱D╱ // 0x1325 @0x13
0x1312…1364 at0014 = ╱32╱2╱ // 0x1326 @0x14
0x1312…1364 at0015 = ╱ef╱$╱ // 0x1327 @0x15
0x1312…1364 at0016 = ╱ed╱(╱ // 0x1328 @0x16
0x1312…1364 at0017 = ╱32╱2╱ // 0x1329 @0x17
0x1312…1364 at0018 = ╱32╱2╱ // 0x132a @0x18
0x1312…1364 at0019 = ╱fe0000b005╱ // 0x132b @0x19
0x1312…1364 at001e = ╱ee╱)╱ // 0x1330 @0x1e
0x1312…1364 at001f = ╱eb╱;╱ // 0x1331 @0x1f
0x1312…1364 at0020 = ╱22╱"╱ // 0x1332 @0x20
0x1312…1364 at0021 = ╱20╱…╱ // 0x1333 @0x21
0x1312…1364 at0022 = ╱4f╱O╱ // 0x1334 @0x22
0x1312…1364 at0023 = ╱52╱R╱ // 0x1335 @0x23
0x1312…1364 at0024 = ╱2d╱-╱ // 0x1336 @0x24
0x1312…1364 at0025 = ╱4b╱K╱ // 0x1337 @0x25
0x1312…1364 at0026 = ╱4f╱O╱ // 0x1338 @0x26
0x1312…1364 at0027 = ╱44╱D╱ // 0x1339 @0x27
0x1312…1364 at0028 = ╱45╱E╱ // 0x133a @0x28
0x1312…1364 at0029 = ╱20╱…╱ // 0x133b @0x29
0x1312…1364 at002a = ╱22╱"╱ // 0x133c @0x2a
0x1312…1364 at002b = ╱eb╱;╱ // 0x133d @0x2b
0x1312…1364 at002c = ╱44╱D╱ // 0x133e @0x2c
0x1312…1364 at002d = ╱32╱2╱ // 0x133f @0x2d
0x1312…1364 at002e = ╱ef╱$╱ // 0x1340 @0x2e
0x1312…1364 at002f = ╱ed╱(╱ // 0x1341 @0x2f
0x1312…1364 at0030 = ╱32╱2╱ // 0x1342 @0x30
0x1312…1364 at0031 = ╱34╱4╱ // 0x1343 @0x31
0x1312…1364 at0032 = ╱fe0000c005╱ // 0x1344 @0x32
0x1312…1364 at0037 = ╱ec╱,╱ // 0x1349 @0x37
0x1312…1364 at0038 = ╱32╱2╱ // 0x134a @0x38
0x1312…1364 at0039 = ╱35╱5╱ // 0x134b @0x39
0x1312…1364 at003a = ╱fe0000c805╱ // 0x134c @0x3a
0x1312…1364 at003f = ╱ee╱)╱ // 0x1351 @0x3f
0x1312…1364 at0040 = ╱eb╱;╱ // 0x1352 @0x40
0x1312…1364 at0041 = ╱22╱"╱ // 0x1353 @0x41
0x1312…1364 at0042 = ╱20╱…╱ // 0x1354 @0x42
0x1312…1364 at0043 = ╱46╱F╱ // 0x1355 @0x43
0x1312…1364 at0044 = ╱41╱A╱ // 0x1356 @0x44
0x1312…1364 at0045 = ╱47╱G╱ // 0x1357 @0x45
0x1312…1364 at0046 = ╱47╱G╱ // 0x1358 @0x46
0x1312…1364 at0047 = ╱52╱R╱ // 0x1359 @0x47
0x1312…1364 at0048 = ╱2d╱-╱ // 0x135a @0x48
0x1312…1364 at0049 = ╱4b╱K╱ // 0x135b @0x49
0x1312…1364 at004a = ╱4f╱O╱ // 0x135c @0x4a
0x1312…1364 at004b = ╱44╱D╱ // 0x135d @0x4b
0x1312…1364 at004c = ╱45╱E╱ // 0x135e @0x4c
0x1312…1364 at004d = ╱22╱"╱ // 0x135f @0x4d
0x1312…1364 at004e = ╱eb╱;╱ // 0x1360 @0x4e
0x1312…1364 at004f = ╱48╱H╱ // 0x1361 @0x4f
0x1312…1364 at0050 = ╱35╱5╱ // 0x1362 @0x50
0x1312…1364 at0051 = EOL // 0x1363 @0x51
0x1312…1364 }
0x1364…137a a0d1 3910 EXEC CONVDATE(C4$,K4)
0x1364…137a LineComalBin {
0x1364…137a ptr = 0xa0d1 // 0x1364 @0x0
0x1364…137a lno = 0x0f46 // 0x1366 @0x2
0x1364…137a at0004 = ╱9d╱ EXEC ╱ // 0x1368 @0x4
0x1364…137a at0005 = ╱43╱C╱ // 0x1369 @0x5
0x1364…137a at0006 = ╱4f╱O╱ // 0x136a @0x6
0x1364…137a at0007 = ╱4e╱N╱ // 0x136b @0x7
0x1364…137a at0008 = ╱56╱V╱ // 0x136c @0x8
0x1364…137a at0009 = ╱44╱D╱ // 0x136d @0x9
0x1364…137a at000a = ╱41╱A╱ // 0x136e @0xa
0x1364…137a at000b = ╱54╱T╱ // 0x136f @0xb
0x1364…137a at000c = ╱45╱E╱ // 0x1370 @0xc
0x1364…137a at000d = ╱ed╱(╱ // 0x1371 @0xd
0x1364…137a at000e = ╱43╱C╱ // 0x1372 @0xe
0x1364…137a at000f = ╱34╱4╱ // 0x1373 @0xf
0x1364…137a at0010 = ╱ef╱$╱ // 0x1374 @0x10
0x1364…137a at0011 = ╱ec╱,╱ // 0x1375 @0x11
0x1364…137a at0012 = ╱4b╱K╱ // 0x1376 @0x12
0x1364…137a at0013 = ╱34╱4╱ // 0x1377 @0x13
0x1364…137a at0014 = ╱ee╱)╱ // 0x1378 @0x14
0x1364…137a at0015 = EOL // 0x1379 @0x15
0x1364…137a }
0x137a…139a a0f1 3920 PRINT " ANSAT FRA ";C4$;" TIL ";
0x137a…139a LineComalBin {
0x137a…139a ptr = 0xa0f1 // 0x137a @0x0
0x137a…139a lno = 0x0f50 // 0x137c @0x2
0x137a…139a at0004 = ╱92╱ PRINT ╱ // 0x137e @0x4
0x137a…139a at0005 = ╱22╱"╱ // 0x137f @0x5
0x137a…139a at0006 = ╱20╱…╱ // 0x1380 @0x6
0x137a…139a at0007 = ╱41╱A╱ // 0x1381 @0x7
0x137a…139a at0008 = ╱4e╱N╱ // 0x1382 @0x8
0x137a…139a at0009 = ╱53╱S╱ // 0x1383 @0x9
0x137a…139a at000a = ╱41╱A╱ // 0x1384 @0xa
0x137a…139a at000b = ╱54╱T╱ // 0x1385 @0xb
0x137a…139a at000c = ╱20╱…╱ // 0x1386 @0xc
0x137a…139a at000d = ╱46╱F╱ // 0x1387 @0xd
0x137a…139a at000e = ╱52╱R╱ // 0x1388 @0xe
0x137a…139a at000f = ╱41╱A╱ // 0x1389 @0xf
0x137a…139a at0010 = ╱20╱…╱ // 0x138a @0x10
0x137a…139a at0011 = ╱22╱"╱ // 0x138b @0x11
0x137a…139a at0012 = ╱eb╱;╱ // 0x138c @0x12
0x137a…139a at0013 = ╱43╱C╱ // 0x138d @0x13
0x137a…139a at0014 = ╱34╱4╱ // 0x138e @0x14
0x137a…139a at0015 = ╱ef╱$╱ // 0x138f @0x15
0x137a…139a at0016 = ╱eb╱;╱ // 0x1390 @0x16
0x137a…139a at0017 = ╱22╱"╱ // 0x1391 @0x17
0x137a…139a at0018 = ╱20╱…╱ // 0x1392 @0x18
0x137a…139a at0019 = ╱54╱T╱ // 0x1393 @0x19
0x137a…139a at001a = ╱49╱I╱ // 0x1394 @0x1a
0x137a…139a at001b = ╱4c╱L╱ // 0x1395 @0x1b
0x137a…139a at001c = ╱20╱…╱ // 0x1396 @0x1c
0x137a…139a at001d = ╱22╱"╱ // 0x1397 @0x1d
0x137a…139a at001e = ╱eb╱;╱ // 0x1398 @0x1e
0x137a…139a at001f = EOL // 0x1399 @0x1f
0x137a…139a }
0x139a…13b0 a107 3930 EXEC CONVDATE(C4$,K5)
0x139a…13b0 LineComalBin {
0x139a…13b0 ptr = 0xa107 // 0x139a @0x0
0x139a…13b0 lno = 0x0f5a // 0x139c @0x2
0x139a…13b0 at0004 = ╱9d╱ EXEC ╱ // 0x139e @0x4
0x139a…13b0 at0005 = ╱43╱C╱ // 0x139f @0x5
0x139a…13b0 at0006 = ╱4f╱O╱ // 0x13a0 @0x6
0x139a…13b0 at0007 = ╱4e╱N╱ // 0x13a1 @0x7
0x139a…13b0 at0008 = ╱56╱V╱ // 0x13a2 @0x8
0x139a…13b0 at0009 = ╱44╱D╱ // 0x13a3 @0x9
0x139a…13b0 at000a = ╱41╱A╱ // 0x13a4 @0xa
0x139a…13b0 at000b = ╱54╱T╱ // 0x13a5 @0xb
0x139a…13b0 at000c = ╱45╱E╱ // 0x13a6 @0xc
0x139a…13b0 at000d = ╱ed╱(╱ // 0x13a7 @0xd
0x139a…13b0 at000e = ╱43╱C╱ // 0x13a8 @0xe
0x139a…13b0 at000f = ╱34╱4╱ // 0x13a9 @0xf
0x139a…13b0 at0010 = ╱ef╱$╱ // 0x13aa @0x10
0x139a…13b0 at0011 = ╱ec╱,╱ // 0x13ab @0x11
0x139a…13b0 at0012 = ╱4b╱K╱ // 0x13ac @0x12
0x139a…13b0 at0013 = ╱35╱5╱ // 0x13ad @0x13
0x139a…13b0 at0014 = ╱ee╱)╱ // 0x13ae @0x14
0x139a…13b0 at0015 = EOL // 0x13af @0x15
0x139a…13b0 }
0x13b0…13cb a122 3940 EXEC C(3,F1$,B5$,C3$)
0x13b0…13cb LineComalBin {
0x13b0…13cb ptr = 0xa122 // 0x13b0 @0x0
0x13b0…13cb lno = 0x0f64 // 0x13b2 @0x2
0x13b0…13cb at0004 = ╱9d╱ EXEC ╱ // 0x13b4 @0x4
0x13b0…13cb at0005 = ╱43╱C╱ // 0x13b5 @0x5
0x13b0…13cb at0006 = ╱ed╱(╱ // 0x13b6 @0x6
0x13b0…13cb at0007 = ╱33╱3╱ // 0x13b7 @0x7
0x13b0…13cb at0008 = ╱fe0000c002╱ // 0x13b8 @0x8
0x13b0…13cb at000d = ╱ec╱,╱ // 0x13bd @0xd
0x13b0…13cb at000e = ╱46╱F╱ // 0x13be @0xe
0x13b0…13cb at000f = ╱31╱1╱ // 0x13bf @0xf
0x13b0…13cb at0010 = ╱ef╱$╱ // 0x13c0 @0x10
0x13b0…13cb at0011 = ╱ec╱,╱ // 0x13c1 @0x11
0x13b0…13cb at0012 = ╱42╱B╱ // 0x13c2 @0x12
0x13b0…13cb at0013 = ╱35╱5╱ // 0x13c3 @0x13
0x13b0…13cb at0014 = ╱ef╱$╱ // 0x13c4 @0x14
0x13b0…13cb at0015 = ╱ec╱,╱ // 0x13c5 @0x15
0x13b0…13cb at0016 = ╱43╱C╱ // 0x13c6 @0x16
0x13b0…13cb at0017 = ╱33╱3╱ // 0x13c7 @0x17
0x13b0…13cb at0018 = ╱ef╱$╱ // 0x13c8 @0x18
0x13b0…13cb at0019 = ╱ee╱)╱ // 0x13c9 @0x19
0x13b0…13cb at001a = EOL // 0x13ca @0x1a
0x13b0…13cb }
0x13cb…13f0 a147 3945 IF C3$(8)=" " THEN C3$(8)="0"
0x13cb…13f0 LineComalBin {
0x13cb…13f0 ptr = 0xa147 // 0x13cb @0x0
0x13cb…13f0 lno = 0x0f69 // 0x13cd @0x2
0x13cb…13f0 at0004 = ╱82╱ IF ╱ // 0x13cf @0x4
0x13cb…13f0 at0005 = ╱43╱C╱ // 0x13d0 @0x5
0x13cb…13f0 at0006 = ╱33╱3╱ // 0x13d1 @0x6
0x13cb…13f0 at0007 = ╱ef╱$╱ // 0x13d2 @0x7
0x13cb…13f0 at0008 = ╱ed╱(╱ // 0x13d3 @0x8
0x13cb…13f0 at0009 = ╱38╱8╱ // 0x13d4 @0x9
0x13cb…13f0 at000a = ╱fe00008004╱ // 0x13d5 @0xa
0x13cb…13f0 at000f = ╱ee╱)╱ // 0x13da @0xf
0x13cb…13f0 at0010 = ╱dc╱=╱ // 0x13db @0x10
0x13cb…13f0 at0011 = ╱22╱"╱ // 0x13dc @0x11
0x13cb…13f0 at0012 = ╱20╱…╱ // 0x13dd @0x12
0x13cb…13f0 at0013 = ╱22╱"╱ // 0x13de @0x13
0x13cb…13f0 at0014 = ╱b6╱ THEN ╱ // 0x13df @0x14
0x13cb…13f0 at0015 = ╱43╱C╱ // 0x13e0 @0x15
0x13cb…13f0 at0016 = ╱33╱3╱ // 0x13e1 @0x16
0x13cb…13f0 at0017 = ╱ef╱$╱ // 0x13e2 @0x17
0x13cb…13f0 at0018 = ╱ed╱(╱ // 0x13e3 @0x18
0x13cb…13f0 at0019 = ╱38╱8╱ // 0x13e4 @0x19
0x13cb…13f0 at001a = ╱fe00008004╱ // 0x13e5 @0x1a
0x13cb…13f0 at001f = ╱ee╱)╱ // 0x13ea @0x1f
0x13cb…13f0 at0020 = ╱dc╱=╱ // 0x13eb @0x20
0x13cb…13f0 at0021 = ╱22╱"╱ // 0x13ec @0x21
0x13cb…13f0 at0022 = ╱30╱0╱ // 0x13ed @0x22
0x13cb…13f0 at0023 = ╱22╱"╱ // 0x13ee @0x23
0x13cb…13f0 at0024 = EOL // 0x13ef @0x24
0x13cb…13f0 }
0x13f0…1437 a18e 3950 PRINT C4$;" FERIEDAGE ";F1$(7,TI);" HERAF ";C3$(8);" LØRDAGE"
0x13f0…1437 LineComalBin {
0x13f0…1437 ptr = 0xa18e // 0x13f0 @0x0
0x13f0…1437 lno = 0x0f6e // 0x13f2 @0x2
0x13f0…1437 at0004 = ╱92╱ PRINT ╱ // 0x13f4 @0x4
0x13f0…1437 at0005 = ╱43╱C╱ // 0x13f5 @0x5
0x13f0…1437 at0006 = ╱34╱4╱ // 0x13f6 @0x6
0x13f0…1437 at0007 = ╱ef╱$╱ // 0x13f7 @0x7
0x13f0…1437 at0008 = ╱eb╱;╱ // 0x13f8 @0x8
0x13f0…1437 at0009 = ╱22╱"╱ // 0x13f9 @0x9
0x13f0…1437 at000a = ╱20╱…╱ // 0x13fa @0xa
0x13f0…1437 at000b = ╱46╱F╱ // 0x13fb @0xb
0x13f0…1437 at000c = ╱45╱E╱ // 0x13fc @0xc
0x13f0…1437 at000d = ╱52╱R╱ // 0x13fd @0xd
0x13f0…1437 at000e = ╱49╱I╱ // 0x13fe @0xe
0x13f0…1437 at000f = ╱45╱E╱ // 0x13ff @0xf
0x13f0…1437 at0010 = ╱44╱D╱ // 0x1400 @0x10
0x13f0…1437 at0011 = ╱41╱A╱ // 0x1401 @0x11
0x13f0…1437 at0012 = ╱47╱G╱ // 0x1402 @0x12
0x13f0…1437 at0013 = ╱45╱E╱ // 0x1403 @0x13
0x13f0…1437 at0014 = ╱20╱…╱ // 0x1404 @0x14
0x13f0…1437 at0015 = ╱22╱"╱ // 0x1405 @0x15
0x13f0…1437 at0016 = ╱eb╱;╱ // 0x1406 @0x16
0x13f0…1437 at0017 = ╱46╱F╱ // 0x1407 @0x17
0x13f0…1437 at0018 = ╱31╱1╱ // 0x1408 @0x18
0x13f0…1437 at0019 = ╱ef╱$╱ // 0x1409 @0x19
0x13f0…1437 at001a = ╱ed╱(╱ // 0x140a @0x1a
0x13f0…1437 at001b = ╱37╱7╱ // 0x140b @0x1b
0x13f0…1437 at001c = ╱fe0000e003╱ // 0x140c @0x1c
0x13f0…1437 at0021 = ╱ec╱,╱ // 0x1411 @0x21
0x13f0…1437 at0022 = ╱54╱T╱ // 0x1412 @0x22
0x13f0…1437 at0023 = ╱49╱I╱ // 0x1413 @0x23
0x13f0…1437 at0024 = ╱ee╱)╱ // 0x1414 @0x24
0x13f0…1437 at0025 = ╱eb╱;╱ // 0x1415 @0x25
0x13f0…1437 at0026 = ╱22╱"╱ // 0x1416 @0x26
0x13f0…1437 at0027 = ╱20╱…╱ // 0x1417 @0x27
0x13f0…1437 at0028 = ╱48╱H╱ // 0x1418 @0x28
0x13f0…1437 at0029 = ╱45╱E╱ // 0x1419 @0x29
0x13f0…1437 at002a = ╱52╱R╱ // 0x141a @0x2a
0x13f0…1437 at002b = ╱41╱A╱ // 0x141b @0x2b
0x13f0…1437 at002c = ╱46╱F╱ // 0x141c @0x2c
0x13f0…1437 at002d = ╱20╱…╱ // 0x141d @0x2d
0x13f0…1437 at002e = ╱22╱"╱ // 0x141e @0x2e
0x13f0…1437 at002f = ╱eb╱;╱ // 0x141f @0x2f
0x13f0…1437 at0030 = ╱43╱C╱ // 0x1420 @0x30
0x13f0…1437 at0031 = ╱33╱3╱ // 0x1421 @0x31
0x13f0…1437 at0032 = ╱ef╱$╱ // 0x1422 @0x32
0x13f0…1437 at0033 = ╱ed╱(╱ // 0x1423 @0x33
0x13f0…1437 at0034 = ╱38╱8╱ // 0x1424 @0x34
0x13f0…1437 at0035 = ╱fe00008004╱ // 0x1425 @0x35
0x13f0…1437 at003a = ╱ee╱)╱ // 0x142a @0x3a
0x13f0…1437 at003b = ╱eb╱;╱ // 0x142b @0x3b
0x13f0…1437 at003c = ╱22╱"╱ // 0x142c @0x3c
0x13f0…1437 at003d = ╱20╱…╱ // 0x142d @0x3d
0x13f0…1437 at003e = ╱4c╱L╱ // 0x142e @0x3e
0x13f0…1437 at003f = ╱5c╱Ø╱ // 0x142f @0x3f
0x13f0…1437 at0040 = ╱52╱R╱ // 0x1430 @0x40
0x13f0…1437 at0041 = ╱44╱D╱ // 0x1431 @0x41
0x13f0…1437 at0042 = ╱41╱A╱ // 0x1432 @0x42
0x13f0…1437 at0043 = ╱47╱G╱ // 0x1433 @0x43
0x13f0…1437 at0044 = ╱45╱E╱ // 0x1434 @0x44
0x13f0…1437 at0045 = ╱22╱"╱ // 0x1435 @0x45
0x13f0…1437 at0046 = EOL // 0x1436 @0x46
0x13f0…1437 }
0x1437…143d a194 3960 PRINT
0x1437…143d LineComalBin {
0x1437…143d ptr = 0xa194 // 0x1437 @0x0
0x1437…143d lno = 0x0f78 // 0x1439 @0x2
0x1437…143d at0004 = ╱92╱ PRINT ╱ // 0x143b @0x4
0x1437…143d at0005 = EOL // 0x143c @0x5
0x1437…143d }
0x143d…1487 a1de 3970 PRINT " LA TEKST";TAB(38);"SALDO ENHEDER SATS UDBETALT/TRUKKET";
0x143d…1487 LineComalBin {
0x143d…1487 ptr = 0xa1de // 0x143d @0x0
0x143d…1487 lno = 0x0f82 // 0x143f @0x2
0x143d…1487 at0004 = ╱92╱ PRINT ╱ // 0x1441 @0x4
0x143d…1487 at0005 = ╱22╱"╱ // 0x1442 @0x5
0x143d…1487 at0006 = ╱20╱…╱ // 0x1443 @0x6
0x143d…1487 at0007 = ╱4c╱L╱ // 0x1444 @0x7
0x143d…1487 at0008 = ╱41╱A╱ // 0x1445 @0x8
0x143d…1487 at0009 = ╱20╱…╱ // 0x1446 @0x9
0x143d…1487 at000a = ╱54╱T╱ // 0x1447 @0xa
0x143d…1487 at000b = ╱45╱E╱ // 0x1448 @0xb
0x143d…1487 at000c = ╱4b╱K╱ // 0x1449 @0xc
0x143d…1487 at000d = ╱53╱S╱ // 0x144a @0xd
0x143d…1487 at000e = ╱54╱T╱ // 0x144b @0xe
0x143d…1487 at000f = ╱22╱"╱ // 0x144c @0xf
0x143d…1487 at0010 = ╱eb╱;╱ // 0x144d @0x10
0x143d…1487 at0011 = ╱d2╱TAB╱ // 0x144e @0x11
0x143d…1487 at0012 = ╱ed╱(╱ // 0x144f @0x12
0x143d…1487 at0013 = ╱33╱3╱ // 0x1450 @0x13
0x143d…1487 at0014 = ╱38╱8╱ // 0x1451 @0x14
0x143d…1487 at0015 = ╱fe00009806╱ // 0x1452 @0x15
0x143d…1487 at001a = ╱ee╱)╱ // 0x1457 @0x1a
0x143d…1487 at001b = ╱eb╱;╱ // 0x1458 @0x1b
0x143d…1487 at001c = ╱22╱"╱ // 0x1459 @0x1c
0x143d…1487 at001d = ╱53╱S╱ // 0x145a @0x1d
0x143d…1487 at001e = ╱41╱A╱ // 0x145b @0x1e
0x143d…1487 at001f = ╱4c╱L╱ // 0x145c @0x1f
0x143d…1487 at0020 = ╱44╱D╱ // 0x145d @0x20
0x143d…1487 at0021 = ╱4f╱O╱ // 0x145e @0x21
0x143d…1487 at0022 = ╱20╱…╱ // 0x145f @0x22
0x143d…1487 at0023 = ╱20╱…╱ // 0x1460 @0x23
0x143d…1487 at0024 = ╱20╱…╱ // 0x1461 @0x24
0x143d…1487 at0025 = ╱20╱…╱ // 0x1462 @0x25
0x143d…1487 at0026 = ╱45╱E╱ // 0x1463 @0x26
0x143d…1487 at0027 = ╱4e╱N╱ // 0x1464 @0x27
0x143d…1487 at0028 = ╱48╱H╱ // 0x1465 @0x28
0x143d…1487 at0029 = ╱45╱E╱ // 0x1466 @0x29
0x143d…1487 at002a = ╱44╱D╱ // 0x1467 @0x2a
0x143d…1487 at002b = ╱45╱E╱ // 0x1468 @0x2b
0x143d…1487 at002c = ╱52╱R╱ // 0x1469 @0x2c
0x143d…1487 at002d = ╱20╱…╱ // 0x146a @0x2d
0x143d…1487 at002e = ╱20╱…╱ // 0x146b @0x2e
0x143d…1487 at002f = ╱20╱…╱ // 0x146c @0x2f
0x143d…1487 at0030 = ╱20╱…╱ // 0x146d @0x30
0x143d…1487 at0031 = ╱53╱S╱ // 0x146e @0x31
0x143d…1487 at0032 = ╱41╱A╱ // 0x146f @0x32
0x143d…1487 at0033 = ╱54╱T╱ // 0x1470 @0x33
0x143d…1487 at0034 = ╱53╱S╱ // 0x1471 @0x34
0x143d…1487 at0035 = ╱20╱…╱ // 0x1472 @0x35
0x143d…1487 at0036 = ╱20╱…╱ // 0x1473 @0x36
0x143d…1487 at0037 = ╱55╱U╱ // 0x1474 @0x37
0x143d…1487 at0038 = ╱44╱D╱ // 0x1475 @0x38
0x143d…1487 at0039 = ╱42╱B╱ // 0x1476 @0x39
0x143d…1487 at003a = ╱45╱E╱ // 0x1477 @0x3a
0x143d…1487 at003b = ╱54╱T╱ // 0x1478 @0x3b
0x143d…1487 at003c = ╱41╱A╱ // 0x1479 @0x3c
0x143d…1487 at003d = ╱4c╱L╱ // 0x147a @0x3d
0x143d…1487 at003e = ╱54╱T╱ // 0x147b @0x3e
0x143d…1487 at003f = ╱2f╱/╱ // 0x147c @0x3f
0x143d…1487 at0040 = ╱54╱T╱ // 0x147d @0x40
0x143d…1487 at0041 = ╱52╱R╱ // 0x147e @0x41
0x143d…1487 at0042 = ╱55╱U╱ // 0x147f @0x42
0x143d…1487 at0043 = ╱4b╱K╱ // 0x1480 @0x43
0x143d…1487 at0044 = ╱4b╱K╱ // 0x1481 @0x44
0x143d…1487 at0045 = ╱45╱E╱ // 0x1482 @0x45
0x143d…1487 at0046 = ╱54╱T╱ // 0x1483 @0x46
0x143d…1487 at0047 = ╱22╱"╱ // 0x1484 @0x47
0x143d…1487 at0048 = ╱eb╱;╱ // 0x1485 @0x48
0x143d…1487 at0049 = EOL // 0x1486 @0x49
0x143d…1487 }
0x1487…14b4 a20b 3990 IF C5$(16,EL)="+" THEN C5$(16,EL)=" "
0x1487…14b4 LineComalBin {
0x1487…14b4 ptr = 0xa20b // 0x1487 @0x0
0x1487…14b4 lno = 0x0f96 // 0x1489 @0x2
0x1487…14b4 at0004 = ╱82╱ IF ╱ // 0x148b @0x4
0x1487…14b4 at0005 = ╱43╱C╱ // 0x148c @0x5
0x1487…14b4 at0006 = ╱35╱5╱ // 0x148d @0x6
0x1487…14b4 at0007 = ╱ef╱$╱ // 0x148e @0x7
0x1487…14b4 at0008 = ╱ed╱(╱ // 0x148f @0x8
0x1487…14b4 at0009 = ╱31╱1╱ // 0x1490 @0x9
0x1487…14b4 at000a = ╱36╱6╱ // 0x1491 @0xa
0x1487…14b4 at000b = ╱fe00008005╱ // 0x1492 @0xb
0x1487…14b4 at0010 = ╱ec╱,╱ // 0x1497 @0x10
0x1487…14b4 at0011 = ╱45╱E╱ // 0x1498 @0x11
0x1487…14b4 at0012 = ╱4c╱L╱ // 0x1499 @0x12
0x1487…14b4 at0013 = ╱ee╱)╱ // 0x149a @0x13
0x1487…14b4 at0014 = ╱dc╱=╱ // 0x149b @0x14
0x1487…14b4 at0015 = ╱22╱"╱ // 0x149c @0x15
0x1487…14b4 at0016 = ╱2b╱+╱ // 0x149d @0x16
0x1487…14b4 at0017 = ╱22╱"╱ // 0x149e @0x17
0x1487…14b4 at0018 = ╱b6╱ THEN ╱ // 0x149f @0x18
0x1487…14b4 at0019 = ╱43╱C╱ // 0x14a0 @0x19
0x1487…14b4 at001a = ╱35╱5╱ // 0x14a1 @0x1a
0x1487…14b4 at001b = ╱ef╱$╱ // 0x14a2 @0x1b
0x1487…14b4 at001c = ╱ed╱(╱ // 0x14a3 @0x1c
0x1487…14b4 at001d = ╱31╱1╱ // 0x14a4 @0x1d
0x1487…14b4 at001e = ╱36╱6╱ // 0x14a5 @0x1e
0x1487…14b4 at001f = ╱fe00008005╱ // 0x14a6 @0x1f
0x1487…14b4 at0024 = ╱ec╱,╱ // 0x14ab @0x24
0x1487…14b4 at0025 = ╱45╱E╱ // 0x14ac @0x25
0x1487…14b4 at0026 = ╱4c╱L╱ // 0x14ad @0x26
0x1487…14b4 at0027 = ╱ee╱)╱ // 0x14ae @0x27
0x1487…14b4 at0028 = ╱dc╱=╱ // 0x14af @0x28
0x1487…14b4 at0029 = ╱22╱"╱ // 0x14b0 @0x29
0x1487…14b4 at002a = ╱20╱…╱ // 0x14b1 @0x2a
0x1487…14b4 at002b = ╱22╱"╱ // 0x14b2 @0x2b
0x1487…14b4 at002c = EOL // 0x14b3 @0x2c
0x1487…14b4 }
0x14b4…14f2 a249 4000 PRINT TAB(5);"FERIEBERETT LØN";TAB(42);"0 ";C5$(16)
0x14b4…14f2 LineComalBin {
0x14b4…14f2 ptr = 0xa249 // 0x14b4 @0x0
0x14b4…14f2 lno = 0x0fa0 // 0x14b6 @0x2
0x14b4…14f2 at0004 = ╱92╱ PRINT ╱ // 0x14b8 @0x4
0x14b4…14f2 at0005 = ╱d2╱TAB╱ // 0x14b9 @0x5
0x14b4…14f2 at0006 = ╱ed╱(╱ // 0x14ba @0x6
0x14b4…14f2 at0007 = ╱35╱5╱ // 0x14bb @0x7
0x14b4…14f2 at0008 = ╱fe0000a003╱ // 0x14bc @0x8
0x14b4…14f2 at000d = ╱ee╱)╱ // 0x14c1 @0xd
0x14b4…14f2 at000e = ╱eb╱;╱ // 0x14c2 @0xe
0x14b4…14f2 at000f = ╱22╱"╱ // 0x14c3 @0xf
0x14b4…14f2 at0010 = ╱46╱F╱ // 0x14c4 @0x10
0x14b4…14f2 at0011 = ╱45╱E╱ // 0x14c5 @0x11
0x14b4…14f2 at0012 = ╱52╱R╱ // 0x14c6 @0x12
0x14b4…14f2 at0013 = ╱49╱I╱ // 0x14c7 @0x13
0x14b4…14f2 at0014 = ╱45╱E╱ // 0x14c8 @0x14
0x14b4…14f2 at0015 = ╱42╱B╱ // 0x14c9 @0x15
0x14b4…14f2 at0016 = ╱45╱E╱ // 0x14ca @0x16
0x14b4…14f2 at0017 = ╱52╱R╱ // 0x14cb @0x17
0x14b4…14f2 at0018 = ╱45╱E╱ // 0x14cc @0x18
0x14b4…14f2 at0019 = ╱54╱T╱ // 0x14cd @0x19
0x14b4…14f2 at001a = ╱54╱T╱ // 0x14ce @0x1a
0x14b4…14f2 at001b = ╱20╱…╱ // 0x14cf @0x1b
0x14b4…14f2 at001c = ╱4c╱L╱ // 0x14d0 @0x1c
0x14b4…14f2 at001d = ╱5c╱Ø╱ // 0x14d1 @0x1d
0x14b4…14f2 at001e = ╱4e╱N╱ // 0x14d2 @0x1e
0x14b4…14f2 at001f = ╱22╱"╱ // 0x14d3 @0x1f
0x14b4…14f2 at0020 = ╱eb╱;╱ // 0x14d4 @0x20
0x14b4…14f2 at0021 = ╱d2╱TAB╱ // 0x14d5 @0x21
0x14b4…14f2 at0022 = ╱ed╱(╱ // 0x14d6 @0x22
0x14b4…14f2 at0023 = ╱34╱4╱ // 0x14d7 @0x23
0x14b4…14f2 at0024 = ╱32╱2╱ // 0x14d8 @0x24
0x14b4…14f2 at0025 = ╱fe0000a806╱ // 0x14d9 @0x25
0x14b4…14f2 at002a = ╱ee╱)╱ // 0x14de @0x2a
0x14b4…14f2 at002b = ╱eb╱;╱ // 0x14df @0x2b
0x14b4…14f2 at002c = ╱22╱"╱ // 0x14e0 @0x2c
0x14b4…14f2 at002d = ╱30╱0╱ // 0x14e1 @0x2d
0x14b4…14f2 at002e = ╱20╱…╱ // 0x14e2 @0x2e
0x14b4…14f2 at002f = ╱22╱"╱ // 0x14e3 @0x2f
0x14b4…14f2 at0030 = ╱eb╱;╱ // 0x14e4 @0x30
0x14b4…14f2 at0031 = ╱43╱C╱ // 0x14e5 @0x31
0x14b4…14f2 at0032 = ╱35╱5╱ // 0x14e6 @0x32
0x14b4…14f2 at0033 = ╱ef╱$╱ // 0x14e7 @0x33
0x14b4…14f2 at0034 = ╱ed╱(╱ // 0x14e8 @0x34
0x14b4…14f2 at0035 = ╱31╱1╱ // 0x14e9 @0x35
0x14b4…14f2 at0036 = ╱36╱6╱ // 0x14ea @0x36
0x14b4…14f2 at0037 = ╱fe00008005╱ // 0x14eb @0x37
0x14b4…14f2 at003c = ╱ee╱)╱ // 0x14f0 @0x3c
0x14b4…14f2 at003d = EOL // 0x14f1 @0x3d
0x14b4…14f2 }
0x14f2…150d a264 4010 C5$(16)=B3$(G:EL)
0x14f2…150d LineComalBin {
0x14f2…150d ptr = 0xa264 // 0x14f2 @0x0
0x14f2…150d lno = 0x0faa // 0x14f4 @0x2
0x14f2…150d at0004 = ╱43╱C╱ // 0x14f6 @0x4
0x14f2…150d at0005 = ╱35╱5╱ // 0x14f7 @0x5
0x14f2…150d at0006 = ╱ef╱$╱ // 0x14f8 @0x6
0x14f2…150d at0007 = ╱ed╱(╱ // 0x14f9 @0x7
0x14f2…150d at0008 = ╱31╱1╱ // 0x14fa @0x8
0x14f2…150d at0009 = ╱36╱6╱ // 0x14fb @0x9
0x14f2…150d at000a = ╱fe00008005╱ // 0x14fc @0xa
0x14f2…150d at000f = ╱ee╱)╱ // 0x1501 @0xf
0x14f2…150d at0010 = ╱dc╱=╱ // 0x1502 @0x10
0x14f2…150d at0011 = ╱42╱B╱ // 0x1503 @0x11
0x14f2…150d at0012 = ╱33╱3╱ // 0x1504 @0x12
0x14f2…150d at0013 = ╱ef╱$╱ // 0x1505 @0x13
0x14f2…150d at0014 = ╱ed╱(╱ // 0x1506 @0x14
0x14f2…150d at0015 = ╱47╱G╱ // 0x1507 @0x15
0x14f2…150d at0016 = ╱f0╱:╱ // 0x1508 @0x16
0x14f2…150d at0017 = ╱45╱E╱ // 0x1509 @0x17
0x14f2…150d at0018 = ╱4c╱L╱ // 0x150a @0x18
0x14f2…150d at0019 = ╱ee╱)╱ // 0x150b @0x19
0x14f2…150d at001a = EOL // 0x150c @0x1a
0x14f2…150d }
0x150d…151d a274 4020 EXEC Z(90)
0x150d…151d LineComalBin {
0x150d…151d ptr = 0xa274 // 0x150d @0x0
0x150d…151d lno = 0x0fb4 // 0x150f @0x2
0x150d…151d at0004 = ╱9d╱ EXEC ╱ // 0x1511 @0x4
0x150d…151d at0005 = ╱5a╱Z╱ // 0x1512 @0x5
0x150d…151d at0006 = ╱ed╱(╱ // 0x1513 @0x6
0x150d…151d at0007 = ╱39╱9╱ // 0x1514 @0x7
0x150d…151d at0008 = ╱30╱0╱ // 0x1515 @0x8
0x150d…151d at0009 = ╱fe0000b407╱ // 0x1516 @0x9
0x150d…151d at000e = ╱ee╱)╱ // 0x151b @0xe
0x150d…151d at000f = EOL // 0x151c @0xf
0x150d…151d }
0x151d…153a a291 4025 EXEC OP(8,C5$(20))
0x151d…153a LineComalBin {
0x151d…153a ptr = 0xa291 // 0x151d @0x0
0x151d…153a lno = 0x0fb9 // 0x151f @0x2
0x151d…153a at0004 = ╱9d╱ EXEC ╱ // 0x1521 @0x4
0x151d…153a at0005 = ╱4f╱O╱ // 0x1522 @0x5
0x151d…153a at0006 = ╱50╱P╱ // 0x1523 @0x6
0x151d…153a at0007 = ╱ed╱(╱ // 0x1524 @0x7
0x151d…153a at0008 = ╱38╱8╱ // 0x1525 @0x8
0x151d…153a at0009 = ╱fe00008004╱ // 0x1526 @0x9
0x151d…153a at000e = ╱ec╱,╱ // 0x152b @0xe
0x151d…153a at000f = ╱43╱C╱ // 0x152c @0xf
0x151d…153a at0010 = ╱35╱5╱ // 0x152d @0x10
0x151d…153a at0011 = ╱ef╱$╱ // 0x152e @0x11
0x151d…153a at0012 = ╱ed╱(╱ // 0x152f @0x12
0x151d…153a at0013 = ╱32╱2╱ // 0x1530 @0x13
0x151d…153a at0014 = ╱30╱0╱ // 0x1531 @0x14
0x151d…153a at0015 = ╱fe0000a005╱ // 0x1532 @0x15
0x151d…153a at001a = ╱ee╱)╱ // 0x1537 @0x1a
0x151d…153a at001b = ╱ee╱)╱ // 0x1538 @0x1b
0x151d…153a at001c = EOL // 0x1539 @0x1c
0x151d…153a }
0x153a…1571 a2c8 4030 F0$(42)="0";F0$(44,54)=C5$(20)
0x153a…1571 LineComalBin {
0x153a…1571 ptr = 0xa2c8 // 0x153a @0x0
0x153a…1571 lno = 0x0fbe // 0x153c @0x2
0x153a…1571 at0004 = ╱46╱F╱ // 0x153e @0x4
0x153a…1571 at0005 = ╱30╱0╱ // 0x153f @0x5
0x153a…1571 at0006 = ╱ef╱$╱ // 0x1540 @0x6
0x153a…1571 at0007 = ╱ed╱(╱ // 0x1541 @0x7
0x153a…1571 at0008 = ╱34╱4╱ // 0x1542 @0x8
0x153a…1571 at0009 = ╱32╱2╱ // 0x1543 @0x9
0x153a…1571 at000a = ╱fe0000a806╱ // 0x1544 @0xa
0x153a…1571 at000f = ╱ee╱)╱ // 0x1549 @0xf
0x153a…1571 at0010 = ╱dc╱=╱ // 0x154a @0x10
0x153a…1571 at0011 = ╱22╱"╱ // 0x154b @0x11
0x153a…1571 at0012 = ╱30╱0╱ // 0x154c @0x12
0x153a…1571 at0013 = ╱22╱"╱ // 0x154d @0x13
0x153a…1571 at0014 = ╱eb╱;╱ // 0x154e @0x14
0x153a…1571 at0015 = ╱46╱F╱ // 0x154f @0x15
0x153a…1571 at0016 = ╱30╱0╱ // 0x1550 @0x16
0x153a…1571 at0017 = ╱ef╱$╱ // 0x1551 @0x17
0x153a…1571 at0018 = ╱ed╱(╱ // 0x1552 @0x18
0x153a…1571 at0019 = ╱34╱4╱ // 0x1553 @0x19
0x153a…1571 at001a = ╱34╱4╱ // 0x1554 @0x1a
0x153a…1571 at001b = ╱fe0000b006╱ // 0x1555 @0x1b
0x153a…1571 at0020 = ╱ec╱,╱ // 0x155a @0x20
0x153a…1571 at0021 = ╱35╱5╱ // 0x155b @0x21
0x153a…1571 at0022 = ╱34╱4╱ // 0x155c @0x22
0x153a…1571 at0023 = ╱fe0000d806╱ // 0x155d @0x23
0x153a…1571 at0028 = ╱ee╱)╱ // 0x1562 @0x28
0x153a…1571 at0029 = ╱dc╱=╱ // 0x1563 @0x29
0x153a…1571 at002a = ╱43╱C╱ // 0x1564 @0x2a
0x153a…1571 at002b = ╱35╱5╱ // 0x1565 @0x2b
0x153a…1571 at002c = ╱ef╱$╱ // 0x1566 @0x2c
0x153a…1571 at002d = ╱ed╱(╱ // 0x1567 @0x2d
0x153a…1571 at002e = ╱32╱2╱ // 0x1568 @0x2e
0x153a…1571 at002f = ╱30╱0╱ // 0x1569 @0x2f
0x153a…1571 at0030 = ╱fe0000a005╱ // 0x156a @0x30
0x153a…1571 at0035 = ╱ee╱)╱ // 0x156f @0x35
0x153a…1571 at0036 = EOL // 0x1570 @0x36
0x153a…1571 }
0x1571…1578 a2cf 4040 EXEC Å
0x1571…1578 LineComalBin {
0x1571…1578 ptr = 0xa2cf // 0x1571 @0x0
0x1571…1578 lno = 0x0fc8 // 0x1573 @0x2
0x1571…1578 at0004 = ╱9d╱ EXEC ╱ // 0x1575 @0x4
0x1571…1578 at0005 = ╱5d╱Å╱ // 0x1576 @0x5
0x1571…1578 at0006 = EOL // 0x1577 @0x6
0x1571…1578 }
0x1578…1588 a2df 4050 EXEC Z(91)
0x1578…1588 LineComalBin {
0x1578…1588 ptr = 0xa2df // 0x1578 @0x0
0x1578…1588 lno = 0x0fd2 // 0x157a @0x2
0x1578…1588 at0004 = ╱9d╱ EXEC ╱ // 0x157c @0x4
0x1578…1588 at0005 = ╱5a╱Z╱ // 0x157d @0x5
0x1578…1588 at0006 = ╱ed╱(╱ // 0x157e @0x6
0x1578…1588 at0007 = ╱39╱9╱ // 0x157f @0x7
0x1578…1588 at0008 = ╱31╱1╱ // 0x1580 @0x8
0x1578…1588 at0009 = ╱fe0000b607╱ // 0x1581 @0x9
0x1578…1588 at000e = ╱ee╱)╱ // 0x1586 @0xe
0x1578…1588 at000f = EOL // 0x1587 @0xf
0x1578…1588 }
0x1588…15a5 a2fc 4055 EXEC OP(9,C5$(17))
0x1588…15a5 LineComalBin {
0x1588…15a5 ptr = 0xa2fc // 0x1588 @0x0
0x1588…15a5 lno = 0x0fd7 // 0x158a @0x2
0x1588…15a5 at0004 = ╱9d╱ EXEC ╱ // 0x158c @0x4
0x1588…15a5 at0005 = ╱4f╱O╱ // 0x158d @0x5
0x1588…15a5 at0006 = ╱50╱P╱ // 0x158e @0x6
0x1588…15a5 at0007 = ╱ed╱(╱ // 0x158f @0x7
0x1588…15a5 at0008 = ╱39╱9╱ // 0x1590 @0x8
0x1588…15a5 at0009 = ╱fe00009004╱ // 0x1591 @0x9
0x1588…15a5 at000e = ╱ec╱,╱ // 0x1596 @0xe
0x1588…15a5 at000f = ╱43╱C╱ // 0x1597 @0xf
0x1588…15a5 at0010 = ╱35╱5╱ // 0x1598 @0x10
0x1588…15a5 at0011 = ╱ef╱$╱ // 0x1599 @0x11
0x1588…15a5 at0012 = ╱ed╱(╱ // 0x159a @0x12
0x1588…15a5 at0013 = ╱31╱1╱ // 0x159b @0x13
0x1588…15a5 at0014 = ╱37╱7╱ // 0x159c @0x14
0x1588…15a5 at0015 = ╱fe00008805╱ // 0x159d @0x15
0x1588…15a5 at001a = ╱ee╱)╱ // 0x15a2 @0x1a
0x1588…15a5 at001b = ╱ee╱)╱ // 0x15a3 @0x1b
0x1588…15a5 at001c = EOL // 0x15a4 @0x1c
0x1588…15a5 }
0x15a5…15dc a333 4060 F0$(42)="0";F0$(44,54)=C5$(17)
0x15a5…15dc LineComalBin {
0x15a5…15dc ptr = 0xa333 // 0x15a5 @0x0
0x15a5…15dc lno = 0x0fdc // 0x15a7 @0x2
0x15a5…15dc at0004 = ╱46╱F╱ // 0x15a9 @0x4
0x15a5…15dc at0005 = ╱30╱0╱ // 0x15aa @0x5
0x15a5…15dc at0006 = ╱ef╱$╱ // 0x15ab @0x6
0x15a5…15dc at0007 = ╱ed╱(╱ // 0x15ac @0x7
0x15a5…15dc at0008 = ╱34╱4╱ // 0x15ad @0x8
0x15a5…15dc at0009 = ╱32╱2╱ // 0x15ae @0x9
0x15a5…15dc at000a = ╱fe0000a806╱ // 0x15af @0xa
0x15a5…15dc at000f = ╱ee╱)╱ // 0x15b4 @0xf
0x15a5…15dc at0010 = ╱dc╱=╱ // 0x15b5 @0x10
0x15a5…15dc at0011 = ╱22╱"╱ // 0x15b6 @0x11
0x15a5…15dc at0012 = ╱30╱0╱ // 0x15b7 @0x12
0x15a5…15dc at0013 = ╱22╱"╱ // 0x15b8 @0x13
0x15a5…15dc at0014 = ╱eb╱;╱ // 0x15b9 @0x14
0x15a5…15dc at0015 = ╱46╱F╱ // 0x15ba @0x15
0x15a5…15dc at0016 = ╱30╱0╱ // 0x15bb @0x16
0x15a5…15dc at0017 = ╱ef╱$╱ // 0x15bc @0x17
0x15a5…15dc at0018 = ╱ed╱(╱ // 0x15bd @0x18
0x15a5…15dc at0019 = ╱34╱4╱ // 0x15be @0x19
0x15a5…15dc at001a = ╱34╱4╱ // 0x15bf @0x1a
0x15a5…15dc at001b = ╱fe0000b006╱ // 0x15c0 @0x1b
0x15a5…15dc at0020 = ╱ec╱,╱ // 0x15c5 @0x20
0x15a5…15dc at0021 = ╱35╱5╱ // 0x15c6 @0x21
0x15a5…15dc at0022 = ╱34╱4╱ // 0x15c7 @0x22
0x15a5…15dc at0023 = ╱fe0000d806╱ // 0x15c8 @0x23
0x15a5…15dc at0028 = ╱ee╱)╱ // 0x15cd @0x28
0x15a5…15dc at0029 = ╱dc╱=╱ // 0x15ce @0x29
0x15a5…15dc at002a = ╱43╱C╱ // 0x15cf @0x2a
0x15a5…15dc at002b = ╱35╱5╱ // 0x15d0 @0x2b
0x15a5…15dc at002c = ╱ef╱$╱ // 0x15d1 @0x2c
0x15a5…15dc at002d = ╱ed╱(╱ // 0x15d2 @0x2d
0x15a5…15dc at002e = ╱31╱1╱ // 0x15d3 @0x2e
0x15a5…15dc at002f = ╱37╱7╱ // 0x15d4 @0x2f
0x15a5…15dc at0030 = ╱fe00008805╱ // 0x15d5 @0x30
0x15a5…15dc at0035 = ╱ee╱)╱ // 0x15da @0x35
0x15a5…15dc at0036 = EOL // 0x15db @0x36
0x15a5…15dc }
0x15dc…15e3 a33a 4070 EXEC Å
0x15dc…15e3 LineComalBin {
0x15dc…15e3 ptr = 0xa33a // 0x15dc @0x0
0x15dc…15e3 lno = 0x0fe6 // 0x15de @0x2
0x15dc…15e3 at0004 = ╱9d╱ EXEC ╱ // 0x15e0 @0x4
0x15dc…15e3 at0005 = ╱5d╱Å╱ // 0x15e1 @0x5
0x15dc…15e3 at0006 = EOL // 0x15e2 @0x6
0x15dc…15e3 }
0x15e3…15ee a345 4080 IF H0>B THEN
0x15e3…15ee LineComalBin {
0x15e3…15ee ptr = 0xa345 // 0x15e3 @0x0
0x15e3…15ee lno = 0x0ff0 // 0x15e5 @0x2
0x15e3…15ee at0004 = ╱9c╱ IF ╱ // 0x15e7 @0x4
0x15e3…15ee at0005 = ╱48╱H╱ // 0x15e8 @0x5
0x15e3…15ee at0006 = ╱30╱0╱ // 0x15e9 @0x6
0x15e3…15ee at0007 = ╱de╱>╱ // 0x15ea @0x7
0x15e3…15ee at0008 = ╱42╱B╱ // 0x15eb @0x8
0x15e3…15ee at0009 = ╱b6╱ THEN ╱ // 0x15ec @0x9
0x15e3…15ee at000a = EOL // 0x15ed @0xa
0x15e3…15ee }
0x15ee…15fd a354 4090 EXEC Æ(C3$,H0)
0x15ee…15fd LineComalBin {
0x15ee…15fd ptr = 0xa354 // 0x15ee @0x0
0x15ee…15fd lno = 0x0ffa // 0x15f0 @0x2
0x15ee…15fd at0004 = ╱9d╱ EXEC ╱ // 0x15f2 @0x4
0x15ee…15fd at0005 = ╱5b╱Æ╱ // 0x15f3 @0x5
0x15ee…15fd at0006 = ╱ed╱(╱ // 0x15f4 @0x6
0x15ee…15fd at0007 = ╱43╱C╱ // 0x15f5 @0x7
0x15ee…15fd at0008 = ╱33╱3╱ // 0x15f6 @0x8
0x15ee…15fd at0009 = ╱ef╱$╱ // 0x15f7 @0x9
0x15ee…15fd at000a = ╱ec╱,╱ // 0x15f8 @0xa
0x15ee…15fd at000b = ╱48╱H╱ // 0x15f9 @0xb
0x15ee…15fd at000c = ╱30╱0╱ // 0x15fa @0xc
0x15ee…15fd at000d = ╱ee╱)╱ // 0x15fb @0xd
0x15ee…15fd at000e = EOL // 0x15fc @0xe
0x15ee…15fd }
0x15fd…1603 a35a 4100 ELSE
0x15fd…1603 LineComalBin {
0x15fd…1603 ptr = 0xa35a // 0x15fd @0x0
0x15fd…1603 lno = 0x1004 // 0x15ff @0x2
0x15fd…1603 at0004 = ╱9a╱ ELSE ╱ // 0x1601 @0x4
0x15fd…1603 at0005 = EOL // 0x1602 @0x5
0x15fd…1603 }
0x1603…1621 a378 4110 K8=INT(G9*12/365)
0x1603…1621 LineComalBin {
0x1603…1621 ptr = 0xa378 // 0x1603 @0x0
0x1603…1621 lno = 0x100e // 0x1605 @0x2
0x1603…1621 at0004 = ╱4b╱K╱ // 0x1607 @0x4
0x1603…1621 at0005 = ╱38╱8╱ // 0x1608 @0x5
0x1603…1621 at0006 = ╱dc╱=╱ // 0x1609 @0x6
0x1603…1621 at0007 = ╱c6╱INT╱ // 0x160a @0x7
0x1603…1621 at0008 = ╱ed╱(╱ // 0x160b @0x8
0x1603…1621 at0009 = ╱47╱G╱ // 0x160c @0x9
0x1603…1621 at000a = ╱39╱9╱ // 0x160d @0xa
0x1603…1621 at000b = ╱e4╱*╱ // 0x160e @0xb
0x1603…1621 at000c = ╱31╱1╱ // 0x160f @0xc
0x1603…1621 at000d = ╱32╱2╱ // 0x1610 @0xd
0x1603…1621 at000e = ╱fe0000c004╱ // 0x1611 @0xe
0x1603…1621 at0013 = ╱e5╱/╱ // 0x1616 @0x13
0x1603…1621 at0014 = ╱33╱3╱ // 0x1617 @0x14
0x1603…1621 at0015 = ╱36╱6╱ // 0x1618 @0x15
0x1603…1621 at0016 = ╱35╱5╱ // 0x1619 @0x16
0x1603…1621 at0017 = ╱fe0080b609╱ // 0x161a @0x17
0x1603…1621 at001c = ╱ee╱)╱ // 0x161f @0x1c
0x1603…1621 at001d = EOL // 0x1620 @0x1d
0x1603…1621 }
0x1621…1630 a387 4120 EXEC Æ(C4$,K8)
0x1621…1630 LineComalBin {
0x1621…1630 ptr = 0xa387 // 0x1621 @0x0
0x1621…1630 lno = 0x1018 // 0x1623 @0x2
0x1621…1630 at0004 = ╱9d╱ EXEC ╱ // 0x1625 @0x4
0x1621…1630 at0005 = ╱5b╱Æ╱ // 0x1626 @0x5
0x1621…1630 at0006 = ╱ed╱(╱ // 0x1627 @0x6
0x1621…1630 at0007 = ╱43╱C╱ // 0x1628 @0x7
0x1621…1630 at0008 = ╱34╱4╱ // 0x1629 @0x8
0x1621…1630 at0009 = ╱ef╱$╱ // 0x162a @0x9
0x1621…1630 at000a = ╱ec╱,╱ // 0x162b @0xa
0x1621…1630 at000b = ╱4b╱K╱ // 0x162c @0xb
0x1621…1630 at000c = ╱38╱8╱ // 0x162d @0xc
0x1621…1630 at000d = ╱ee╱)╱ // 0x162e @0xd
0x1621…1630 at000e = EOL // 0x162f @0xe
0x1621…1630 }
0x1630…1645 a39c 4125 F1$=C5$(29)
0x1630…1645 LineComalBin {
0x1630…1645 ptr = 0xa39c // 0x1630 @0x0
0x1630…1645 lno = 0x101d // 0x1632 @0x2
0x1630…1645 at0004 = ╱46╱F╱ // 0x1634 @0x4
0x1630…1645 at0005 = ╱31╱1╱ // 0x1635 @0x5
0x1630…1645 at0006 = ╱ef╱$╱ // 0x1636 @0x6
0x1630…1645 at0007 = ╱dc╱=╱ // 0x1637 @0x7
0x1630…1645 at0008 = ╱43╱C╱ // 0x1638 @0x8
0x1630…1645 at0009 = ╱35╱5╱ // 0x1639 @0x9
0x1630…1645 at000a = ╱ef╱$╱ // 0x163a @0xa
0x1630…1645 at000b = ╱ed╱(╱ // 0x163b @0xb
0x1630…1645 at000c = ╱32╱2╱ // 0x163c @0xc
0x1630…1645 at000d = ╱39╱9╱ // 0x163d @0xd
0x1630…1645 at000e = ╱fe0000e805╱ // 0x163e @0xe
0x1630…1645 at0013 = ╱ee╱)╱ // 0x1643 @0x13
0x1630…1645 at0014 = EOL // 0x1644 @0x14
0x1630…1645 }
0x1645…1660 a3b7 4130 EXEC C(2,F1$,C4$,C3$)
0x1645…1660 LineComalBin {
0x1645…1660 ptr = 0xa3b7 // 0x1645 @0x0
0x1645…1660 lno = 0x1022 // 0x1647 @0x2
0x1645…1660 at0004 = ╱9d╱ EXEC ╱ // 0x1649 @0x4
0x1645…1660 at0005 = ╱43╱C╱ // 0x164a @0x5
0x1645…1660 at0006 = ╱ed╱(╱ // 0x164b @0x6
0x1645…1660 at0007 = ╱32╱2╱ // 0x164c @0x7
0x1645…1660 at0008 = ╱fe00008002╱ // 0x164d @0x8
0x1645…1660 at000d = ╱ec╱,╱ // 0x1652 @0xd
0x1645…1660 at000e = ╱46╱F╱ // 0x1653 @0xe
0x1645…1660 at000f = ╱31╱1╱ // 0x1654 @0xf
0x1645…1660 at0010 = ╱ef╱$╱ // 0x1655 @0x10
0x1645…1660 at0011 = ╱ec╱,╱ // 0x1656 @0x11
0x1645…1660 at0012 = ╱43╱C╱ // 0x1657 @0x12
0x1645…1660 at0013 = ╱34╱4╱ // 0x1658 @0x13
0x1645…1660 at0014 = ╱ef╱$╱ // 0x1659 @0x14
0x1645…1660 at0015 = ╱ec╱,╱ // 0x165a @0x15
0x1645…1660 at0016 = ╱43╱C╱ // 0x165b @0x16
0x1645…1660 at0017 = ╱33╱3╱ // 0x165c @0x17
0x1645…1660 at0018 = ╱ef╱$╱ // 0x165d @0x18
0x1645…1660 at0019 = ╱ee╱)╱ // 0x165e @0x19
0x1645…1660 at001a = EOL // 0x165f @0x1a
0x1645…1660 }
0x1660…1666 a3bd 4140 ENDIF
0x1660…1666 LineComalBin {
0x1660…1666 ptr = 0xa3bd // 0x1660 @0x0
0x1660…1666 lno = 0x102c // 0x1662 @0x2
0x1660…1666 at0004 = ╱9b╱ ENDIF ╱ // 0x1664 @0x4
0x1660…1666 at0005 = EOL // 0x1665 @0x5
0x1660…1666 }
0x1666…16bd a414 4150 B1$=C5$(20);C4$=C5$(17);C5$(20)=B3$(G:EL);C5$(17)=C5$(20)
0x1666…16bd LineComalBin {
0x1666…16bd ptr = 0xa414 // 0x1666 @0x0
0x1666…16bd lno = 0x1036 // 0x1668 @0x2
0x1666…16bd at0004 = ╱42╱B╱ // 0x166a @0x4
0x1666…16bd at0005 = ╱31╱1╱ // 0x166b @0x5
0x1666…16bd at0006 = ╱ef╱$╱ // 0x166c @0x6
0x1666…16bd at0007 = ╱dc╱=╱ // 0x166d @0x7
0x1666…16bd at0008 = ╱43╱C╱ // 0x166e @0x8
0x1666…16bd at0009 = ╱35╱5╱ // 0x166f @0x9
0x1666…16bd at000a = ╱ef╱$╱ // 0x1670 @0xa
0x1666…16bd at000b = ╱ed╱(╱ // 0x1671 @0xb
0x1666…16bd at000c = ╱32╱2╱ // 0x1672 @0xc
0x1666…16bd at000d = ╱30╱0╱ // 0x1673 @0xd
0x1666…16bd at000e = ╱fe0000a005╱ // 0x1674 @0xe
0x1666…16bd at0013 = ╱ee╱)╱ // 0x1679 @0x13
0x1666…16bd at0014 = ╱eb╱;╱ // 0x167a @0x14
0x1666…16bd at0015 = ╱43╱C╱ // 0x167b @0x15
0x1666…16bd at0016 = ╱34╱4╱ // 0x167c @0x16
0x1666…16bd at0017 = ╱ef╱$╱ // 0x167d @0x17
0x1666…16bd at0018 = ╱dc╱=╱ // 0x167e @0x18
0x1666…16bd at0019 = ╱43╱C╱ // 0x167f @0x19
0x1666…16bd at001a = ╱35╱5╱ // 0x1680 @0x1a
0x1666…16bd at001b = ╱ef╱$╱ // 0x1681 @0x1b
0x1666…16bd at001c = ╱ed╱(╱ // 0x1682 @0x1c
0x1666…16bd at001d = ╱31╱1╱ // 0x1683 @0x1d
0x1666…16bd at001e = ╱37╱7╱ // 0x1684 @0x1e
0x1666…16bd at001f = ╱fe00008805╱ // 0x1685 @0x1f
0x1666…16bd at0024 = ╱ee╱)╱ // 0x168a @0x24
0x1666…16bd at0025 = ╱eb╱;╱ // 0x168b @0x25
0x1666…16bd at0026 = ╱43╱C╱ // 0x168c @0x26
0x1666…16bd at0027 = ╱35╱5╱ // 0x168d @0x27
0x1666…16bd at0028 = ╱ef╱$╱ // 0x168e @0x28
0x1666…16bd at0029 = ╱ed╱(╱ // 0x168f @0x29
0x1666…16bd at002a = ╱32╱2╱ // 0x1690 @0x2a
0x1666…16bd at002b = ╱30╱0╱ // 0x1691 @0x2b
0x1666…16bd at002c = ╱fe0000a005╱ // 0x1692 @0x2c
0x1666…16bd at0031 = ╱ee╱)╱ // 0x1697 @0x31
0x1666…16bd at0032 = ╱dc╱=╱ // 0x1698 @0x32
0x1666…16bd at0033 = ╱42╱B╱ // 0x1699 @0x33
0x1666…16bd at0034 = ╱33╱3╱ // 0x169a @0x34
0x1666…16bd at0035 = ╱ef╱$╱ // 0x169b @0x35
0x1666…16bd at0036 = ╱ed╱(╱ // 0x169c @0x36
0x1666…16bd at0037 = ╱47╱G╱ // 0x169d @0x37
0x1666…16bd at0038 = ╱f0╱:╱ // 0x169e @0x38
0x1666…16bd at0039 = ╱45╱E╱ // 0x169f @0x39
0x1666…16bd at003a = ╱4c╱L╱ // 0x16a0 @0x3a
0x1666…16bd at003b = ╱ee╱)╱ // 0x16a1 @0x3b
0x1666…16bd at003c = ╱eb╱;╱ // 0x16a2 @0x3c
0x1666…16bd at003d = ╱43╱C╱ // 0x16a3 @0x3d
0x1666…16bd at003e = ╱35╱5╱ // 0x16a4 @0x3e
0x1666…16bd at003f = ╱ef╱$╱ // 0x16a5 @0x3f
0x1666…16bd at0040 = ╱ed╱(╱ // 0x16a6 @0x40
0x1666…16bd at0041 = ╱31╱1╱ // 0x16a7 @0x41
0x1666…16bd at0042 = ╱37╱7╱ // 0x16a8 @0x42
0x1666…16bd at0043 = ╱fe00008805╱ // 0x16a9 @0x43
0x1666…16bd at0048 = ╱ee╱)╱ // 0x16ae @0x48
0x1666…16bd at0049 = ╱dc╱=╱ // 0x16af @0x49
0x1666…16bd at004a = ╱43╱C╱ // 0x16b0 @0x4a
0x1666…16bd at004b = ╱35╱5╱ // 0x16b1 @0x4b
0x1666…16bd at004c = ╱ef╱$╱ // 0x16b2 @0x4c
0x1666…16bd at004d = ╱ed╱(╱ // 0x16b3 @0x4d
0x1666…16bd at004e = ╱32╱2╱ // 0x16b4 @0x4e
0x1666…16bd at004f = ╱30╱0╱ // 0x16b5 @0x4f
0x1666…16bd at0050 = ╱fe0000a005╱ // 0x16b6 @0x50
0x1666…16bd at0055 = ╱ee╱)╱ // 0x16bb @0x55
0x1666…16bd at0056 = EOL // 0x16bc @0x56
0x1666…16bd }
0x16bd…16db a432 4155 C5$(29)=C5$(20)
0x16bd…16db LineComalBin {
0x16bd…16db ptr = 0xa432 // 0x16bd @0x0
0x16bd…16db lno = 0x103b // 0x16bf @0x2
0x16bd…16db at0004 = ╱43╱C╱ // 0x16c1 @0x4
0x16bd…16db at0005 = ╱35╱5╱ // 0x16c2 @0x5
0x16bd…16db at0006 = ╱ef╱$╱ // 0x16c3 @0x6
0x16bd…16db at0007 = ╱ed╱(╱ // 0x16c4 @0x7
0x16bd…16db at0008 = ╱32╱2╱ // 0x16c5 @0x8
0x16bd…16db at0009 = ╱39╱9╱ // 0x16c6 @0x9
0x16bd…16db at000a = ╱fe0000e805╱ // 0x16c7 @0xa
0x16bd…16db at000f = ╱ee╱)╱ // 0x16cc @0xf
0x16bd…16db at0010 = ╱dc╱=╱ // 0x16cd @0x10
0x16bd…16db at0011 = ╱43╱C╱ // 0x16ce @0x11
0x16bd…16db at0012 = ╱35╱5╱ // 0x16cf @0x12
0x16bd…16db at0013 = ╱ef╱$╱ // 0x16d0 @0x13
0x16bd…16db at0014 = ╱ed╱(╱ // 0x16d1 @0x14
0x16bd…16db at0015 = ╱32╱2╱ // 0x16d2 @0x15
0x16bd…16db at0016 = ╱30╱0╱ // 0x16d3 @0x16
0x16bd…16db at0017 = ╱fe0000a005╱ // 0x16d4 @0x17
0x16bd…16db at001c = ╱ee╱)╱ // 0x16d9 @0x1c
0x16bd…16db at001d = EOL // 0x16da @0x1d
0x16bd…16db }
0x16db…16f6 a44d 4190 EXEC C(0,B1$,C4$,B1$)
0x16db…16f6 LineComalBin {
0x16db…16f6 ptr = 0xa44d // 0x16db @0x0
0x16db…16f6 lno = 0x105e // 0x16dd @0x2
0x16db…16f6 at0004 = ╱9d╱ EXEC ╱ // 0x16df @0x4
0x16db…16f6 at0005 = ╱43╱C╱ // 0x16e0 @0x5
0x16db…16f6 at0006 = ╱ed╱(╱ // 0x16e1 @0x6
0x16db…16f6 at0007 = ╱30╱0╱ // 0x16e2 @0x7
0x16db…16f6 at0008 = ╱fe00000000╱ // 0x16e3 @0x8
0x16db…16f6 at000d = ╱ec╱,╱ // 0x16e8 @0xd
0x16db…16f6 at000e = ╱42╱B╱ // 0x16e9 @0xe
0x16db…16f6 at000f = ╱31╱1╱ // 0x16ea @0xf
0x16db…16f6 at0010 = ╱ef╱$╱ // 0x16eb @0x10
0x16db…16f6 at0011 = ╱ec╱,╱ // 0x16ec @0x11
0x16db…16f6 at0012 = ╱43╱C╱ // 0x16ed @0x12
0x16db…16f6 at0013 = ╱34╱4╱ // 0x16ee @0x13
0x16db…16f6 at0014 = ╱ef╱$╱ // 0x16ef @0x14
0x16db…16f6 at0015 = ╱ec╱,╱ // 0x16f0 @0x15
0x16db…16f6 at0016 = ╱42╱B╱ // 0x16f1 @0x16
0x16db…16f6 at0017 = ╱31╱1╱ // 0x16f2 @0x17
0x16db…16f6 at0018 = ╱ef╱$╱ // 0x16f3 @0x18
0x16db…16f6 at0019 = ╱ee╱)╱ // 0x16f4 @0x19
0x16db…16f6 at001a = EOL // 0x16f5 @0x1a
0x16db…16f6 }
0x16f6…170e a465 4200 EXEC OPTÆL(34,B1$)
0x16f6…170e LineComalBin {
0x16f6…170e ptr = 0xa465 // 0x16f6 @0x0
0x16f6…170e lno = 0x1068 // 0x16f8 @0x2
0x16f6…170e at0004 = ╱9d╱ EXEC ╱ // 0x16fa @0x4
0x16f6…170e at0005 = ╱4f╱O╱ // 0x16fb @0x5
0x16f6…170e at0006 = ╱50╱P╱ // 0x16fc @0x6
0x16f6…170e at0007 = ╱54╱T╱ // 0x16fd @0x7
0x16f6…170e at0008 = ╱5b╱Æ╱ // 0x16fe @0x8
0x16f6…170e at0009 = ╱4c╱L╱ // 0x16ff @0x9
0x16f6…170e at000a = ╱ed╱(╱ // 0x1700 @0xa
0x16f6…170e at000b = ╱33╱3╱ // 0x1701 @0xb
0x16f6…170e at000c = ╱34╱4╱ // 0x1702 @0xc
0x16f6…170e at000d = ╱fe00008806╱ // 0x1703 @0xd
0x16f6…170e at0012 = ╱ec╱,╱ // 0x1708 @0x12
0x16f6…170e at0013 = ╱42╱B╱ // 0x1709 @0x13
0x16f6…170e at0014 = ╱31╱1╱ // 0x170a @0x14
0x16f6…170e at0015 = ╱ef╱$╱ // 0x170b @0x15
0x16f6…170e at0016 = ╱ee╱)╱ // 0x170c @0x16
0x16f6…170e at0017 = EOL // 0x170d @0x17
0x16f6…170e }
0x170e…171e a475 4230 EXEC Z(82)
0x170e…171e LineComalBin {
0x170e…171e ptr = 0xa475 // 0x170e @0x0
0x170e…171e lno = 0x1086 // 0x1710 @0x2
0x170e…171e at0004 = ╱9d╱ EXEC ╱ // 0x1712 @0x4
0x170e…171e at0005 = ╱5a╱Z╱ // 0x1713 @0x5
0x170e…171e at0006 = ╱ed╱(╱ // 0x1714 @0x6
0x170e…171e at0007 = ╱38╱8╱ // 0x1715 @0x7
0x170e…171e at0008 = ╱32╱2╱ // 0x1716 @0x8
0x170e…171e at0009 = ╱fe0000a407╱ // 0x1717 @0x9
0x170e…171e at000e = ╱ee╱)╱ // 0x171c @0xe
0x170e…171e at000f = EOL // 0x171d @0xf
0x170e…171e }
0x171e…1744 a49b 4235 F0$(33,43)=C5$(34)
0x171e…1744 LineComalBin {
0x171e…1744 ptr = 0xa49b // 0x171e @0x0
0x171e…1744 lno = 0x108b // 0x1720 @0x2
0x171e…1744 at0004 = ╱46╱F╱ // 0x1722 @0x4
0x171e…1744 at0005 = ╱30╱0╱ // 0x1723 @0x5
0x171e…1744 at0006 = ╱ef╱$╱ // 0x1724 @0x6
0x171e…1744 at0007 = ╱ed╱(╱ // 0x1725 @0x7
0x171e…1744 at0008 = ╱33╱3╱ // 0x1726 @0x8
0x171e…1744 at0009 = ╱33╱3╱ // 0x1727 @0x9
0x171e…1744 at000a = ╱fe00008406╱ // 0x1728 @0xa
0x171e…1744 at000f = ╱ec╱,╱ // 0x172d @0xf
0x171e…1744 at0010 = ╱34╱4╱ // 0x172e @0x10
0x171e…1744 at0011 = ╱33╱3╱ // 0x172f @0x11
0x171e…1744 at0012 = ╱fe0000ac06╱ // 0x1730 @0x12
0x171e…1744 at0017 = ╱ee╱)╱ // 0x1735 @0x17
0x171e…1744 at0018 = ╱dc╱=╱ // 0x1736 @0x18
0x171e…1744 at0019 = ╱43╱C╱ // 0x1737 @0x19
0x171e…1744 at001a = ╱35╱5╱ // 0x1738 @0x1a
0x171e…1744 at001b = ╱ef╱$╱ // 0x1739 @0x1b
0x171e…1744 at001c = ╱ed╱(╱ // 0x173a @0x1c
0x171e…1744 at001d = ╱33╱3╱ // 0x173b @0x1d
0x171e…1744 at001e = ╱34╱4╱ // 0x173c @0x1e
0x171e…1744 at001f = ╱fe00008806╱ // 0x173d @0x1f
0x171e…1744 at0024 = ╱ee╱)╱ // 0x1742 @0x24
0x171e…1744 at0025 = EOL // 0x1743 @0x25
0x171e…1744 }
0x1744…177c a4d3 4240 F0$(64+(B1$(12)="-")*6:TI)=B1$(G:TI)
0x1744…177c LineComalBin {
0x1744…177c ptr = 0xa4d3 // 0x1744 @0x0
0x1744…177c lno = 0x1090 // 0x1746 @0x2
0x1744…177c at0004 = ╱46╱F╱ // 0x1748 @0x4
0x1744…177c at0005 = ╱30╱0╱ // 0x1749 @0x5
0x1744…177c at0006 = ╱ef╱$╱ // 0x174a @0x6
0x1744…177c at0007 = ╱ed╱(╱ // 0x174b @0x7
0x1744…177c at0008 = ╱36╱6╱ // 0x174c @0x8
0x1744…177c at0009 = ╱34╱4╱ // 0x174d @0x9
0x1744…177c at000a = ╱fe00008007╱ // 0x174e @0xa
0x1744…177c at000f = ╱e2╱+╱ // 0x1753 @0xf
0x1744…177c at0010 = ╱ed╱(╱ // 0x1754 @0x10
0x1744…177c at0011 = ╱42╱B╱ // 0x1755 @0x11
0x1744…177c at0012 = ╱31╱1╱ // 0x1756 @0x12
0x1744…177c at0013 = ╱ef╱$╱ // 0x1757 @0x13
0x1744…177c at0014 = ╱ed╱(╱ // 0x1758 @0x14
0x1744…177c at0015 = ╱31╱1╱ // 0x1759 @0x15
0x1744…177c at0016 = ╱32╱2╱ // 0x175a @0x16
0x1744…177c at0017 = ╱fe0000c004╱ // 0x175b @0x17
0x1744…177c at001c = ╱ee╱)╱ // 0x1760 @0x1c
0x1744…177c at001d = ╱dc╱=╱ // 0x1761 @0x1d
0x1744…177c at001e = ╱22╱"╱ // 0x1762 @0x1e
0x1744…177c at001f = ╱2d╱-╱ // 0x1763 @0x1f
0x1744…177c at0020 = ╱22╱"╱ // 0x1764 @0x20
0x1744…177c at0021 = ╱ee╱)╱ // 0x1765 @0x21
0x1744…177c at0022 = ╱e4╱*╱ // 0x1766 @0x22
0x1744…177c at0023 = ╱36╱6╱ // 0x1767 @0x23
0x1744…177c at0024 = ╱fe0000c003╱ // 0x1768 @0x24
0x1744…177c at0029 = ╱f0╱:╱ // 0x176d @0x29
0x1744…177c at002a = ╱54╱T╱ // 0x176e @0x2a
0x1744…177c at002b = ╱49╱I╱ // 0x176f @0x2b
0x1744…177c at002c = ╱ee╱)╱ // 0x1770 @0x2c
0x1744…177c at002d = ╱dc╱=╱ // 0x1771 @0x2d
0x1744…177c at002e = ╱42╱B╱ // 0x1772 @0x2e
0x1744…177c at002f = ╱31╱1╱ // 0x1773 @0x2f
0x1744…177c at0030 = ╱ef╱$╱ // 0x1774 @0x30
0x1744…177c at0031 = ╱ed╱(╱ // 0x1775 @0x31
0x1744…177c at0032 = ╱47╱G╱ // 0x1776 @0x32
0x1744…177c at0033 = ╱f0╱:╱ // 0x1777 @0x33
0x1744…177c at0034 = ╱54╱T╱ // 0x1778 @0x34
0x1744…177c at0035 = ╱49╱I╱ // 0x1779 @0x35
0x1744…177c at0036 = ╱ee╱)╱ // 0x177a @0x36
0x1744…177c at0037 = EOL // 0x177b @0x37
0x1744…177c }
0x177c…1783 a4da 4250 EXEC Å
0x177c…1783 LineComalBin {
0x177c…1783 ptr = 0xa4da // 0x177c @0x0
0x177c…1783 lno = 0x109a // 0x177e @0x2
0x177c…1783 at0004 = ╱9d╱ EXEC ╱ // 0x1780 @0x4
0x177c…1783 at0005 = ╱5d╱Å╱ // 0x1781 @0x5
0x177c…1783 at0006 = EOL // 0x1782 @0x6
0x177c…1783 }
0x1783…179e a4f5 4260 EXEC C(4,B1$,C3$,C4$)
0x1783…179e LineComalBin {
0x1783…179e ptr = 0xa4f5 // 0x1783 @0x0
0x1783…179e lno = 0x10a4 // 0x1785 @0x2
0x1783…179e at0004 = ╱9d╱ EXEC ╱ // 0x1787 @0x4
0x1783…179e at0005 = ╱43╱C╱ // 0x1788 @0x5
0x1783…179e at0006 = ╱ed╱(╱ // 0x1789 @0x6
0x1783…179e at0007 = ╱34╱4╱ // 0x178a @0x7
0x1783…179e at0008 = ╱fe00008003╱ // 0x178b @0x8
0x1783…179e at000d = ╱ec╱,╱ // 0x1790 @0xd
0x1783…179e at000e = ╱42╱B╱ // 0x1791 @0xe
0x1783…179e at000f = ╱31╱1╱ // 0x1792 @0xf
0x1783…179e at0010 = ╱ef╱$╱ // 0x1793 @0x10
0x1783…179e at0011 = ╱ec╱,╱ // 0x1794 @0x11
0x1783…179e at0012 = ╱43╱C╱ // 0x1795 @0x12
0x1783…179e at0013 = ╱33╱3╱ // 0x1796 @0x13
0x1783…179e at0014 = ╱ef╱$╱ // 0x1797 @0x14
0x1783…179e at0015 = ╱ec╱,╱ // 0x1798 @0x15
0x1783…179e at0016 = ╱43╱C╱ // 0x1799 @0x16
0x1783…179e at0017 = ╱34╱4╱ // 0x179a @0x17
0x1783…179e at0018 = ╱ef╱$╱ // 0x179b @0x18
0x1783…179e at0019 = ╱ee╱)╱ // 0x179c @0x19
0x1783…179e at001a = EOL // 0x179d @0x1a
0x1783…179e }
0x179e…17ae a505 4270 EXEC Z(92)
0x179e…17ae LineComalBin {
0x179e…17ae ptr = 0xa505 // 0x179e @0x0
0x179e…17ae lno = 0x10ae // 0x17a0 @0x2
0x179e…17ae at0004 = ╱9d╱ EXEC ╱ // 0x17a2 @0x4
0x179e…17ae at0005 = ╱5a╱Z╱ // 0x17a3 @0x5
0x179e…17ae at0006 = ╱ed╱(╱ // 0x17a4 @0x6
0x179e…17ae at0007 = ╱39╱9╱ // 0x17a5 @0x7
0x179e…17ae at0008 = ╱32╱2╱ // 0x17a6 @0x8
0x179e…17ae at0009 = ╱fe0000b807╱ // 0x17a7 @0x9
0x179e…17ae at000e = ╱ee╱)╱ // 0x17ac @0xe
0x179e…17ae at000f = EOL // 0x17ad @0xf
0x179e…17ae }
0x17ae…17d1 a528 4280 F0$(45,54)=C3$(V:TI)
0x17ae…17d1 LineComalBin {
0x17ae…17d1 ptr = 0xa528 // 0x17ae @0x0
0x17ae…17d1 lno = 0x10b8 // 0x17b0 @0x2
0x17ae…17d1 at0004 = ╱46╱F╱ // 0x17b2 @0x4
0x17ae…17d1 at0005 = ╱30╱0╱ // 0x17b3 @0x5
0x17ae…17d1 at0006 = ╱ef╱$╱ // 0x17b4 @0x6
0x17ae…17d1 at0007 = ╱ed╱(╱ // 0x17b5 @0x7
0x17ae…17d1 at0008 = ╱34╱4╱ // 0x17b6 @0x8
0x17ae…17d1 at0009 = ╱35╱5╱ // 0x17b7 @0x9
0x17ae…17d1 at000a = ╱fe0000b406╱ // 0x17b8 @0xa
0x17ae…17d1 at000f = ╱ec╱,╱ // 0x17bd @0xf
0x17ae…17d1 at0010 = ╱35╱5╱ // 0x17be @0x10
0x17ae…17d1 at0011 = ╱34╱4╱ // 0x17bf @0x11
0x17ae…17d1 at0012 = ╱fe0000d806╱ // 0x17c0 @0x12
0x17ae…17d1 at0017 = ╱ee╱)╱ // 0x17c5 @0x17
0x17ae…17d1 at0018 = ╱dc╱=╱ // 0x17c6 @0x18
0x17ae…17d1 at0019 = ╱43╱C╱ // 0x17c7 @0x19
0x17ae…17d1 at001a = ╱33╱3╱ // 0x17c8 @0x1a
0x17ae…17d1 at001b = ╱ef╱$╱ // 0x17c9 @0x1b
0x17ae…17d1 at001c = ╱ed╱(╱ // 0x17ca @0x1c
0x17ae…17d1 at001d = ╱56╱V╱ // 0x17cb @0x1d
0x17ae…17d1 at001e = ╱f0╱:╱ // 0x17cc @0x1e
0x17ae…17d1 at001f = ╱54╱T╱ // 0x17cd @0x1f
0x17ae…17d1 at0020 = ╱49╱I╱ // 0x17ce @0x20
0x17ae…17d1 at0021 = ╱ee╱)╱ // 0x17cf @0x21
0x17ae…17d1 at0022 = EOL // 0x17d0 @0x22
0x17ae…17d1 }
0x17d1…17dc a533 4290 IF SI=G THEN
0x17d1…17dc LineComalBin {
0x17d1…17dc ptr = 0xa533 // 0x17d1 @0x0
0x17d1…17dc lno = 0x10c2 // 0x17d3 @0x2
0x17d1…17dc at0004 = ╱9c╱ IF ╱ // 0x17d5 @0x4
0x17d1…17dc at0005 = ╱53╱S╱ // 0x17d6 @0x5
0x17d1…17dc at0006 = ╱49╱I╱ // 0x17d7 @0x6
0x17d1…17dc at0007 = ╱dc╱=╱ // 0x17d8 @0x7
0x17d1…17dc at0008 = ╱47╱G╱ // 0x17d9 @0x8
0x17d1…17dc at0009 = ╱b6╱ THEN ╱ // 0x17da @0x9
0x17d1…17dc at000a = EOL // 0x17db @0xa
0x17d1…17dc }
0x17dc…17f7 a54e 4300 EXEC C(1,B1$,C3$,C4$)
0x17dc…17f7 LineComalBin {
0x17dc…17f7 ptr = 0xa54e // 0x17dc @0x0
0x17dc…17f7 lno = 0x10cc // 0x17de @0x2
0x17dc…17f7 at0004 = ╱9d╱ EXEC ╱ // 0x17e0 @0x4
0x17dc…17f7 at0005 = ╱43╱C╱ // 0x17e1 @0x5
0x17dc…17f7 at0006 = ╱ed╱(╱ // 0x17e2 @0x6
0x17dc…17f7 at0007 = ╱31╱1╱ // 0x17e3 @0x7
0x17dc…17f7 at0008 = ╱fe00008001╱ // 0x17e4 @0x8
0x17dc…17f7 at000d = ╱ec╱,╱ // 0x17e9 @0xd
0x17dc…17f7 at000e = ╱42╱B╱ // 0x17ea @0xe
0x17dc…17f7 at000f = ╱31╱1╱ // 0x17eb @0xf
0x17dc…17f7 at0010 = ╱ef╱$╱ // 0x17ec @0x10
0x17dc…17f7 at0011 = ╱ec╱,╱ // 0x17ed @0x11
0x17dc…17f7 at0012 = ╱43╱C╱ // 0x17ee @0x12
0x17dc…17f7 at0013 = ╱33╱3╱ // 0x17ef @0x13
0x17dc…17f7 at0014 = ╱ef╱$╱ // 0x17f0 @0x14
0x17dc…17f7 at0015 = ╱ec╱,╱ // 0x17f1 @0x15
0x17dc…17f7 at0016 = ╱43╱C╱ // 0x17f2 @0x16
0x17dc…17f7 at0017 = ╱34╱4╱ // 0x17f3 @0x17
0x17dc…17f7 at0018 = ╱ef╱$╱ // 0x17f4 @0x18
0x17dc…17f7 at0019 = ╱ee╱)╱ // 0x17f5 @0x19
0x17dc…17f7 at001a = EOL // 0x17f6 @0x1a
0x17dc…17f7 }
0x17f7…1800 a557 4310 H0=B
0x17f7…1800 LineComalBin {
0x17f7…1800 ptr = 0xa557 // 0x17f7 @0x0
0x17f7…1800 lno = 0x10d6 // 0x17f9 @0x2
0x17f7…1800 at0004 = ╱48╱H╱ // 0x17fb @0x4
0x17f7…1800 at0005 = ╱30╱0╱ // 0x17fc @0x5
0x17f7…1800 at0006 = ╱dc╱=╱ // 0x17fd @0x6
0x17f7…1800 at0007 = ╱42╱B╱ // 0x17fe @0x7
0x17f7…1800 at0008 = EOL // 0x17ff @0x8
0x17f7…1800 }
0x1800…180f a566 4320 EXEC Æ(C3$,G8)
0x1800…180f LineComalBin {
0x1800…180f ptr = 0xa566 // 0x1800 @0x0
0x1800…180f lno = 0x10e0 // 0x1802 @0x2
0x1800…180f at0004 = ╱9d╱ EXEC ╱ // 0x1804 @0x4
0x1800…180f at0005 = ╱5b╱Æ╱ // 0x1805 @0x5
0x1800…180f at0006 = ╱ed╱(╱ // 0x1806 @0x6
0x1800…180f at0007 = ╱43╱C╱ // 0x1807 @0x7
0x1800…180f at0008 = ╱33╱3╱ // 0x1808 @0x8
0x1800…180f at0009 = ╱ef╱$╱ // 0x1809 @0x9
0x1800…180f at000a = ╱ec╱,╱ // 0x180a @0xa
0x1800…180f at000b = ╱47╱G╱ // 0x180b @0xb
0x1800…180f at000c = ╱38╱8╱ // 0x180c @0xc
0x1800…180f at000d = ╱ee╱)╱ // 0x180d @0xd
0x1800…180f at000e = EOL // 0x180e @0xe
0x1800…180f }
0x180f…183b a592 4330 F0$(56,62)=C3$(6:7)
0x180f…183b LineComalBin {
0x180f…183b ptr = 0xa592 // 0x180f @0x0
0x180f…183b lno = 0x10ea // 0x1811 @0x2
0x180f…183b at0004 = ╱46╱F╱ // 0x1813 @0x4
0x180f…183b at0005 = ╱30╱0╱ // 0x1814 @0x5
0x180f…183b at0006 = ╱ef╱$╱ // 0x1815 @0x6
0x180f…183b at0007 = ╱ed╱(╱ // 0x1816 @0x7
0x180f…183b at0008 = ╱35╱5╱ // 0x1817 @0x8
0x180f…183b at0009 = ╱36╱6╱ // 0x1818 @0x9
0x180f…183b at000a = ╱fe0000e006╱ // 0x1819 @0xa
0x180f…183b at000f = ╱ec╱,╱ // 0x181e @0xf
0x180f…183b at0010 = ╱36╱6╱ // 0x181f @0x10
0x180f…183b at0011 = ╱32╱2╱ // 0x1820 @0x11
0x180f…183b at0012 = ╱fe0000f806╱ // 0x1821 @0x12
0x180f…183b at0017 = ╱ee╱)╱ // 0x1826 @0x17
0x180f…183b at0018 = ╱dc╱=╱ // 0x1827 @0x18
0x180f…183b at0019 = ╱43╱C╱ // 0x1828 @0x19
0x180f…183b at001a = ╱33╱3╱ // 0x1829 @0x1a
0x180f…183b at001b = ╱ef╱$╱ // 0x182a @0x1b
0x180f…183b at001c = ╱ed╱(╱ // 0x182b @0x1c
0x180f…183b at001d = ╱36╱6╱ // 0x182c @0x1d
0x180f…183b at001e = ╱fe0000c003╱ // 0x182d @0x1e
0x180f…183b at0023 = ╱f0╱:╱ // 0x1832 @0x23
0x180f…183b at0024 = ╱37╱7╱ // 0x1833 @0x24
0x180f…183b at0025 = ╱fe0000e003╱ // 0x1834 @0x25
0x180f…183b at002a = ╱ee╱)╱ // 0x1839 @0x2a
0x180f…183b at002b = EOL // 0x183a @0x2b
0x180f…183b }
0x183b…1850 a5a7 4335 C3$(12)="-"
0x183b…1850 LineComalBin {
0x183b…1850 ptr = 0xa5a7 // 0x183b @0x0
0x183b…1850 lno = 0x10ef // 0x183d @0x2
0x183b…1850 at0004 = ╱43╱C╱ // 0x183f @0x4
0x183b…1850 at0005 = ╱33╱3╱ // 0x1840 @0x5
0x183b…1850 at0006 = ╱ef╱$╱ // 0x1841 @0x6
0x183b…1850 at0007 = ╱ed╱(╱ // 0x1842 @0x7
0x183b…1850 at0008 = ╱31╱1╱ // 0x1843 @0x8
0x183b…1850 at0009 = ╱32╱2╱ // 0x1844 @0x9
0x183b…1850 at000a = ╱fe0000c004╱ // 0x1845 @0xa
0x183b…1850 at000f = ╱ee╱)╱ // 0x184a @0xf
0x183b…1850 at0010 = ╱dc╱=╱ // 0x184b @0x10
0x183b…1850 at0011 = ╱22╱"╱ // 0x184c @0x11
0x183b…1850 at0012 = ╱2d╱-╱ // 0x184d @0x12
0x183b…1850 at0013 = ╱22╱"╱ // 0x184e @0x13
0x183b…1850 at0014 = EOL // 0x184f @0x14
0x183b…1850 }
0x1850…186b a5c2 4340 EXEC C(2,C4$,C3$,B2$)
0x1850…186b LineComalBin {
0x1850…186b ptr = 0xa5c2 // 0x1850 @0x0
0x1850…186b lno = 0x10f4 // 0x1852 @0x2
0x1850…186b at0004 = ╱9d╱ EXEC ╱ // 0x1854 @0x4
0x1850…186b at0005 = ╱43╱C╱ // 0x1855 @0x5
0x1850…186b at0006 = ╱ed╱(╱ // 0x1856 @0x6
0x1850…186b at0007 = ╱32╱2╱ // 0x1857 @0x7
0x1850…186b at0008 = ╱fe00008002╱ // 0x1858 @0x8
0x1850…186b at000d = ╱ec╱,╱ // 0x185d @0xd
0x1850…186b at000e = ╱43╱C╱ // 0x185e @0xe
0x1850…186b at000f = ╱34╱4╱ // 0x185f @0xf
0x1850…186b at0010 = ╱ef╱$╱ // 0x1860 @0x10
0x1850…186b at0011 = ╱ec╱,╱ // 0x1861 @0x11
0x1850…186b at0012 = ╱43╱C╱ // 0x1862 @0x12
0x1850…186b at0013 = ╱33╱3╱ // 0x1863 @0x13
0x1850…186b at0014 = ╱ef╱$╱ // 0x1864 @0x14
0x1850…186b at0015 = ╱ec╱,╱ // 0x1865 @0x15
0x1850…186b at0016 = ╱42╱B╱ // 0x1866 @0x16
0x1850…186b at0017 = ╱32╱2╱ // 0x1867 @0x17
0x1850…186b at0018 = ╱ef╱$╱ // 0x1868 @0x18
0x1850…186b at0019 = ╱ee╱)╱ // 0x1869 @0x19
0x1850…186b at001a = EOL // 0x186a @0x1a
0x1850…186b }
0x186b…1886 a5dd 4350 EXEC C(3,B2$,B4$,B2$)
0x186b…1886 LineComalBin {
0x186b…1886 ptr = 0xa5dd // 0x186b @0x0
0x186b…1886 lno = 0x10fe // 0x186d @0x2
0x186b…1886 at0004 = ╱9d╱ EXEC ╱ // 0x186f @0x4
0x186b…1886 at0005 = ╱43╱C╱ // 0x1870 @0x5
0x186b…1886 at0006 = ╱ed╱(╱ // 0x1871 @0x6
0x186b…1886 at0007 = ╱33╱3╱ // 0x1872 @0x7
0x186b…1886 at0008 = ╱fe0000c002╱ // 0x1873 @0x8
0x186b…1886 at000d = ╱ec╱,╱ // 0x1878 @0xd
0x186b…1886 at000e = ╱42╱B╱ // 0x1879 @0xe
0x186b…1886 at000f = ╱32╱2╱ // 0x187a @0xf
0x186b…1886 at0010 = ╱ef╱$╱ // 0x187b @0x10
0x186b…1886 at0011 = ╱ec╱,╱ // 0x187c @0x11
0x186b…1886 at0012 = ╱42╱B╱ // 0x187d @0x12
0x186b…1886 at0013 = ╱34╱4╱ // 0x187e @0x13
0x186b…1886 at0014 = ╱ef╱$╱ // 0x187f @0x14
0x186b…1886 at0015 = ╱ec╱,╱ // 0x1880 @0x15
0x186b…1886 at0016 = ╱42╱B╱ // 0x1881 @0x16
0x186b…1886 at0017 = ╱32╱2╱ // 0x1882 @0x17
0x186b…1886 at0018 = ╱ef╱$╱ // 0x1883 @0x18
0x186b…1886 at0019 = ╱ee╱)╱ // 0x1884 @0x19
0x186b…1886 at001a = EOL // 0x1885 @0x1a
0x186b…1886 }
0x1886…189a a5f1 4355 B2$(TI,EL)="00"
0x1886…189a LineComalBin {
0x1886…189a ptr = 0xa5f1 // 0x1886 @0x0
0x1886…189a lno = 0x1103 // 0x1888 @0x2
0x1886…189a at0004 = ╱42╱B╱ // 0x188a @0x4
0x1886…189a at0005 = ╱32╱2╱ // 0x188b @0x5
0x1886…189a at0006 = ╱ef╱$╱ // 0x188c @0x6
0x1886…189a at0007 = ╱ed╱(╱ // 0x188d @0x7
0x1886…189a at0008 = ╱54╱T╱ // 0x188e @0x8
0x1886…189a at0009 = ╱49╱I╱ // 0x188f @0x9
0x1886…189a at000a = ╱ec╱,╱ // 0x1890 @0xa
0x1886…189a at000b = ╱45╱E╱ // 0x1891 @0xb
0x1886…189a at000c = ╱4c╱L╱ // 0x1892 @0xc
0x1886…189a at000d = ╱ee╱)╱ // 0x1893 @0xd
0x1886…189a at000e = ╱dc╱=╱ // 0x1894 @0xe
0x1886…189a at000f = ╱22╱"╱ // 0x1895 @0xf
0x1886…189a at0010 = ╱30╱0╱ // 0x1896 @0x10
0x1886…189a at0011 = ╱30╱0╱ // 0x1897 @0x11
0x1886…189a at0012 = ╱22╱"╱ // 0x1898 @0x12
0x1886…189a at0013 = EOL // 0x1899 @0x13
0x1886…189a }
0x189a…18b5 a60c 4360 EXEC C(0,B1$,B2$,C0$)
0x189a…18b5 LineComalBin {
0x189a…18b5 ptr = 0xa60c // 0x189a @0x0
0x189a…18b5 lno = 0x1108 // 0x189c @0x2
0x189a…18b5 at0004 = ╱9d╱ EXEC ╱ // 0x189e @0x4
0x189a…18b5 at0005 = ╱43╱C╱ // 0x189f @0x5
0x189a…18b5 at0006 = ╱ed╱(╱ // 0x18a0 @0x6
0x189a…18b5 at0007 = ╱30╱0╱ // 0x18a1 @0x7
0x189a…18b5 at0008 = ╱fe00000000╱ // 0x18a2 @0x8
0x189a…18b5 at000d = ╱ec╱,╱ // 0x18a7 @0xd
0x189a…18b5 at000e = ╱42╱B╱ // 0x18a8 @0xe
0x189a…18b5 at000f = ╱31╱1╱ // 0x18a9 @0xf
0x189a…18b5 at0010 = ╱ef╱$╱ // 0x18aa @0x10
0x189a…18b5 at0011 = ╱ec╱,╱ // 0x18ab @0x11
0x189a…18b5 at0012 = ╱42╱B╱ // 0x18ac @0x12
0x189a…18b5 at0013 = ╱32╱2╱ // 0x18ad @0x13
0x189a…18b5 at0014 = ╱ef╱$╱ // 0x18ae @0x14
0x189a…18b5 at0015 = ╱ec╱,╱ // 0x18af @0x15
0x189a…18b5 at0016 = ╱43╱C╱ // 0x18b0 @0x16
0x189a…18b5 at0017 = ╱30╱0╱ // 0x18b1 @0x17
0x189a…18b5 at0018 = ╱ef╱$╱ // 0x18b2 @0x18
0x189a…18b5 at0019 = ╱ee╱)╱ // 0x18b3 @0x19
0x189a…18b5 at001a = EOL // 0x18b4 @0x1a
0x189a…18b5 }
0x18b5…18bb a612 4370 ELSE
0x18b5…18bb LineComalBin {
0x18b5…18bb ptr = 0xa612 // 0x18b5 @0x0
0x18b5…18bb lno = 0x1112 // 0x18b7 @0x2
0x18b5…18bb at0004 = ╱9a╱ ELSE ╱ // 0x18b9 @0x4
0x18b5…18bb at0005 = EOL // 0x18ba @0x5
0x18b5…18bb }
0x18bb…18c7 a61e 4380 B2$=B3$
0x18bb…18c7 LineComalBin {
0x18bb…18c7 ptr = 0xa61e // 0x18bb @0x0
0x18bb…18c7 lno = 0x111c // 0x18bd @0x2
0x18bb…18c7 at0004 = ╱42╱B╱ // 0x18bf @0x4
0x18bb…18c7 at0005 = ╱32╱2╱ // 0x18c0 @0x5
0x18bb…18c7 at0006 = ╱ef╱$╱ // 0x18c1 @0x6
0x18bb…18c7 at0007 = ╱dc╱=╱ // 0x18c2 @0x7
0x18bb…18c7 at0008 = ╱42╱B╱ // 0x18c3 @0x8
0x18bb…18c7 at0009 = ╱33╱3╱ // 0x18c4 @0x9
0x18bb…18c7 at000a = ╱ef╱$╱ // 0x18c5 @0xa
0x18bb…18c7 at000b = EOL // 0x18c6 @0xb
0x18bb…18c7 }
0x18c7…18d3 a62a 4390 C0$=B1$
0x18c7…18d3 LineComalBin {
0x18c7…18d3 ptr = 0xa62a // 0x18c7 @0x0
0x18c7…18d3 lno = 0x1126 // 0x18c9 @0x2
0x18c7…18d3 at0004 = ╱43╱C╱ // 0x18cb @0x4
0x18c7…18d3 at0005 = ╱30╱0╱ // 0x18cc @0x5
0x18c7…18d3 at0006 = ╱ef╱$╱ // 0x18cd @0x6
0x18c7…18d3 at0007 = ╱dc╱=╱ // 0x18ce @0x7
0x18c7…18d3 at0008 = ╱42╱B╱ // 0x18cf @0x8
0x18c7…18d3 at0009 = ╱31╱1╱ // 0x18d0 @0x9
0x18c7…18d3 at000a = ╱ef╱$╱ // 0x18d1 @0xa
0x18c7…18d3 at000b = EOL // 0x18d2 @0xb
0x18c7…18d3 }
0x18d3…18de a635 4400 IF H0>B THEN
0x18d3…18de LineComalBin {
0x18d3…18de ptr = 0xa635 // 0x18d3 @0x0
0x18d3…18de lno = 0x1130 // 0x18d5 @0x2
0x18d3…18de at0004 = ╱9c╱ IF ╱ // 0x18d7 @0x4
0x18d3…18de at0005 = ╱48╱H╱ // 0x18d8 @0x5
0x18d3…18de at0006 = ╱30╱0╱ // 0x18d9 @0x6
0x18d3…18de at0007 = ╱de╱>╱ // 0x18da @0x7
0x18d3…18de at0008 = ╱42╱B╱ // 0x18db @0x8
0x18d3…18de at0009 = ╱b6╱ THEN ╱ // 0x18dc @0x9
0x18d3…18de at000a = EOL // 0x18dd @0xa
0x18d3…18de }
0x18de…18f9 a650 4410 EXEC C(1,C3$,B1$,C3$)
0x18de…18f9 LineComalBin {
0x18de…18f9 ptr = 0xa650 // 0x18de @0x0
0x18de…18f9 lno = 0x113a // 0x18e0 @0x2
0x18de…18f9 at0004 = ╱9d╱ EXEC ╱ // 0x18e2 @0x4
0x18de…18f9 at0005 = ╱43╱C╱ // 0x18e3 @0x5
0x18de…18f9 at0006 = ╱ed╱(╱ // 0x18e4 @0x6
0x18de…18f9 at0007 = ╱31╱1╱ // 0x18e5 @0x7
0x18de…18f9 at0008 = ╱fe00008001╱ // 0x18e6 @0x8
0x18de…18f9 at000d = ╱ec╱,╱ // 0x18eb @0xd
0x18de…18f9 at000e = ╱43╱C╱ // 0x18ec @0xe
0x18de…18f9 at000f = ╱33╱3╱ // 0x18ed @0xf
0x18de…18f9 at0010 = ╱ef╱$╱ // 0x18ee @0x10
0x18de…18f9 at0011 = ╱ec╱,╱ // 0x18ef @0x11
0x18de…18f9 at0012 = ╱42╱B╱ // 0x18f0 @0x12
0x18de…18f9 at0013 = ╱31╱1╱ // 0x18f1 @0x13
0x18de…18f9 at0014 = ╱ef╱$╱ // 0x18f2 @0x14
0x18de…18f9 at0015 = ╱ec╱,╱ // 0x18f3 @0x15
0x18de…18f9 at0016 = ╱43╱C╱ // 0x18f4 @0x16
0x18de…18f9 at0017 = ╱33╱3╱ // 0x18f5 @0x17
0x18de…18f9 at0018 = ╱ef╱$╱ // 0x18f6 @0x18
0x18de…18f9 at0019 = ╱ee╱)╱ // 0x18f7 @0x19
0x18de…18f9 at001a = EOL // 0x18f8 @0x1a
0x18de…18f9 }
0x18f9…190e a665 4420 EXEC PERVERT(C3$,H0)
0x18f9…190e LineComalBin {
0x18f9…190e ptr = 0xa665 // 0x18f9 @0x0
0x18f9…190e lno = 0x1144 // 0x18fb @0x2
0x18f9…190e at0004 = ╱9d╱ EXEC ╱ // 0x18fd @0x4
0x18f9…190e at0005 = ╱50╱P╱ // 0x18fe @0x5
0x18f9…190e at0006 = ╱45╱E╱ // 0x18ff @0x6
0x18f9…190e at0007 = ╱52╱R╱ // 0x1900 @0x7
0x18f9…190e at0008 = ╱56╱V╱ // 0x1901 @0x8
0x18f9…190e at0009 = ╱45╱E╱ // 0x1902 @0x9
0x18f9…190e at000a = ╱52╱R╱ // 0x1903 @0xa
0x18f9…190e at000b = ╱54╱T╱ // 0x1904 @0xb
0x18f9…190e at000c = ╱ed╱(╱ // 0x1905 @0xc
0x18f9…190e at000d = ╱43╱C╱ // 0x1906 @0xd
0x18f9…190e at000e = ╱33╱3╱ // 0x1907 @0xe
0x18f9…190e at000f = ╱ef╱$╱ // 0x1908 @0xf
0x18f9…190e at0010 = ╱ec╱,╱ // 0x1909 @0x10
0x18f9…190e at0011 = ╱48╱H╱ // 0x190a @0x11
0x18f9…190e at0012 = ╱30╱0╱ // 0x190b @0x12
0x18f9…190e at0013 = ╱ee╱)╱ // 0x190c @0x13
0x18f9…190e at0014 = EOL // 0x190d @0x14
0x18f9…190e }
0x190e…1914 a66b 4430 ENDIF
0x190e…1914 LineComalBin {
0x190e…1914 ptr = 0xa66b // 0x190e @0x0
0x190e…1914 lno = 0x114e // 0x1910 @0x2
0x190e…1914 at0004 = ╱9b╱ ENDIF ╱ // 0x1912 @0x4
0x190e…1914 at0005 = EOL // 0x1913 @0x5
0x190e…1914 }
0x1914…191a a671 4440 ENDIF
0x1914…191a LineComalBin {
0x1914…191a ptr = 0xa671 // 0x1914 @0x0
0x1914…191a lno = 0x1158 // 0x1916 @0x2
0x1914…191a at0004 = ╱9b╱ ENDIF ╱ // 0x1918 @0x4
0x1914…191a at0005 = EOL // 0x1919 @0x5
0x1914…191a }
0x191a…1932 a689 4441 EXEC OPTÆL(40,B2$)
0x191a…1932 LineComalBin {
0x191a…1932 ptr = 0xa689 // 0x191a @0x0
0x191a…1932 lno = 0x1159 // 0x191c @0x2
0x191a…1932 at0004 = ╱9d╱ EXEC ╱ // 0x191e @0x4
0x191a…1932 at0005 = ╱4f╱O╱ // 0x191f @0x5
0x191a…1932 at0006 = ╱50╱P╱ // 0x1920 @0x6
0x191a…1932 at0007 = ╱54╱T╱ // 0x1921 @0x7
0x191a…1932 at0008 = ╱5b╱Æ╱ // 0x1922 @0x8
0x191a…1932 at0009 = ╱4c╱L╱ // 0x1923 @0x9
0x191a…1932 at000a = ╱ed╱(╱ // 0x1924 @0xa
0x191a…1932 at000b = ╱34╱4╱ // 0x1925 @0xb
0x191a…1932 at000c = ╱30╱0╱ // 0x1926 @0xc
0x191a…1932 at000d = ╱fe0000a006╱ // 0x1927 @0xd
0x191a…1932 at0012 = ╱ec╱,╱ // 0x192c @0x12
0x191a…1932 at0013 = ╱42╱B╱ // 0x192d @0x13
0x191a…1932 at0014 = ╱32╱2╱ // 0x192e @0x14
0x191a…1932 at0015 = ╱ef╱$╱ // 0x192f @0x15
0x191a…1932 at0016 = ╱ee╱)╱ // 0x1930 @0x16
0x191a…1932 at0017 = EOL // 0x1931 @0x17
0x191a…1932 }
0x1932…1942 a699 4442 EXEC OP(TI,B2$)
0x1932…1942 LineComalBin {
0x1932…1942 ptr = 0xa699 // 0x1932 @0x0
0x1932…1942 lno = 0x115a // 0x1934 @0x2
0x1932…1942 at0004 = ╱9d╱ EXEC ╱ // 0x1936 @0x4
0x1932…1942 at0005 = ╱4f╱O╱ // 0x1937 @0x5
0x1932…1942 at0006 = ╱50╱P╱ // 0x1938 @0x6
0x1932…1942 at0007 = ╱ed╱(╱ // 0x1939 @0x7
0x1932…1942 at0008 = ╱54╱T╱ // 0x193a @0x8
0x1932…1942 at0009 = ╱49╱I╱ // 0x193b @0x9
0x1932…1942 at000a = ╱ec╱,╱ // 0x193c @0xa
0x1932…1942 at000b = ╱42╱B╱ // 0x193d @0xb
0x1932…1942 at000c = ╱32╱2╱ // 0x193e @0xc
0x1932…1942 at000d = ╱ef╱$╱ // 0x193f @0xd
0x1932…1942 at000e = ╱ee╱)╱ // 0x1940 @0xe
0x1932…1942 at000f = EOL // 0x1941 @0xf
0x1932…1942 }
0x1942…1968 a6bf 4444 F0$(33,43)=C5$(40)
0x1942…1968 LineComalBin {
0x1942…1968 ptr = 0xa6bf // 0x1942 @0x0
0x1942…1968 lno = 0x115c // 0x1944 @0x2
0x1942…1968 at0004 = ╱46╱F╱ // 0x1946 @0x4
0x1942…1968 at0005 = ╱30╱0╱ // 0x1947 @0x5
0x1942…1968 at0006 = ╱ef╱$╱ // 0x1948 @0x6
0x1942…1968 at0007 = ╱ed╱(╱ // 0x1949 @0x7
0x1942…1968 at0008 = ╱33╱3╱ // 0x194a @0x8
0x1942…1968 at0009 = ╱33╱3╱ // 0x194b @0x9
0x1942…1968 at000a = ╱fe00008406╱ // 0x194c @0xa
0x1942…1968 at000f = ╱ec╱,╱ // 0x1951 @0xf
0x1942…1968 at0010 = ╱34╱4╱ // 0x1952 @0x10
0x1942…1968 at0011 = ╱33╱3╱ // 0x1953 @0x11
0x1942…1968 at0012 = ╱fe0000ac06╱ // 0x1954 @0x12
0x1942…1968 at0017 = ╱ee╱)╱ // 0x1959 @0x17
0x1942…1968 at0018 = ╱dc╱=╱ // 0x195a @0x18
0x1942…1968 at0019 = ╱43╱C╱ // 0x195b @0x19
0x1942…1968 at001a = ╱35╱5╱ // 0x195c @0x1a
0x1942…1968 at001b = ╱ef╱$╱ // 0x195d @0x1b
0x1942…1968 at001c = ╱ed╱(╱ // 0x195e @0x1c
0x1942…1968 at001d = ╱34╱4╱ // 0x195f @0x1d
0x1942…1968 at001e = ╱30╱0╱ // 0x1960 @0x1e
0x1942…1968 at001f = ╱fe0000a006╱ // 0x1961 @0x1f
0x1942…1968 at0024 = ╱ee╱)╱ // 0x1966 @0x24
0x1942…1968 at0025 = EOL // 0x1967 @0x25
0x1942…1968 }
0x1968…198b a6e2 4450 F0$(70,79)=B2$(G:TI)
0x1968…198b LineComalBin {
0x1968…198b ptr = 0xa6e2 // 0x1968 @0x0
0x1968…198b lno = 0x1162 // 0x196a @0x2
0x1968…198b at0004 = ╱46╱F╱ // 0x196c @0x4
0x1968…198b at0005 = ╱30╱0╱ // 0x196d @0x5
0x1968…198b at0006 = ╱ef╱$╱ // 0x196e @0x6
0x1968…198b at0007 = ╱ed╱(╱ // 0x196f @0x7
0x1968…198b at0008 = ╱37╱7╱ // 0x1970 @0x8
0x1968…198b at0009 = ╱30╱0╱ // 0x1971 @0x9
0x1968…198b at000a = ╱fe00008c07╱ // 0x1972 @0xa
0x1968…198b at000f = ╱ec╱,╱ // 0x1977 @0xf
0x1968…198b at0010 = ╱37╱7╱ // 0x1978 @0x10
0x1968…198b at0011 = ╱39╱9╱ // 0x1979 @0x11
0x1968…198b at0012 = ╱fe00009e07╱ // 0x197a @0x12
0x1968…198b at0017 = ╱ee╱)╱ // 0x197f @0x17
0x1968…198b at0018 = ╱dc╱=╱ // 0x1980 @0x18
0x1968…198b at0019 = ╱42╱B╱ // 0x1981 @0x19
0x1968…198b at001a = ╱32╱2╱ // 0x1982 @0x1a
0x1968…198b at001b = ╱ef╱$╱ // 0x1983 @0x1b
0x1968…198b at001c = ╱ed╱(╱ // 0x1984 @0x1c
0x1968…198b at001d = ╱47╱G╱ // 0x1985 @0x1d
0x1968…198b at001e = ╱f0╱:╱ // 0x1986 @0x1e
0x1968…198b at001f = ╱54╱T╱ // 0x1987 @0x1f
0x1968…198b at0020 = ╱49╱I╱ // 0x1988 @0x20
0x1968…198b at0021 = ╱ee╱)╱ // 0x1989 @0x21
0x1968…198b at0022 = EOL // 0x198a @0x22
0x1968…198b }
0x198b…1992 a6e9 4460 EXEC Å
0x198b…1992 LineComalBin {
0x198b…1992 ptr = 0xa6e9 // 0x198b @0x0
0x198b…1992 lno = 0x116c // 0x198d @0x2
0x198b…1992 at0004 = ╱9d╱ EXEC ╱ // 0x198f @0x4
0x198b…1992 at0005 = ╱5d╱Å╱ // 0x1990 @0x5
0x198b…1992 at0006 = EOL // 0x1991 @0x6
0x198b…1992 }
0x1992…19a2 a6f9 4470 EXEC Z(93)
0x1992…19a2 LineComalBin {
0x1992…19a2 ptr = 0xa6f9 // 0x1992 @0x0
0x1992…19a2 lno = 0x1176 // 0x1994 @0x2
0x1992…19a2 at0004 = ╱9d╱ EXEC ╱ // 0x1996 @0x4
0x1992…19a2 at0005 = ╱5a╱Z╱ // 0x1997 @0x5
0x1992…19a2 at0006 = ╱ed╱(╱ // 0x1998 @0x6
0x1992…19a2 at0007 = ╱39╱9╱ // 0x1999 @0x7
0x1992…19a2 at0008 = ╱33╱3╱ // 0x199a @0x8
0x1992…19a2 at0009 = ╱fe0000ba07╱ // 0x199b @0x9
0x1992…19a2 at000e = ╱ee╱)╱ // 0x19a0 @0xe
0x1992…19a2 at000f = EOL // 0x19a1 @0xf
0x1992…19a2 }
0x19a2…19da a731 4480 F0$(64+6*(C0$(12)="-"):TI)=C0$(G:TI)
0x19a2…19da LineComalBin {
0x19a2…19da ptr = 0xa731 // 0x19a2 @0x0
0x19a2…19da lno = 0x1180 // 0x19a4 @0x2
0x19a2…19da at0004 = ╱46╱F╱ // 0x19a6 @0x4
0x19a2…19da at0005 = ╱30╱0╱ // 0x19a7 @0x5
0x19a2…19da at0006 = ╱ef╱$╱ // 0x19a8 @0x6
0x19a2…19da at0007 = ╱ed╱(╱ // 0x19a9 @0x7
0x19a2…19da at0008 = ╱36╱6╱ // 0x19aa @0x8
0x19a2…19da at0009 = ╱34╱4╱ // 0x19ab @0x9
0x19a2…19da at000a = ╱fe00008007╱ // 0x19ac @0xa
0x19a2…19da at000f = ╱e2╱+╱ // 0x19b1 @0xf
0x19a2…19da at0010 = ╱36╱6╱ // 0x19b2 @0x10
0x19a2…19da at0011 = ╱fe0000c003╱ // 0x19b3 @0x11
0x19a2…19da at0016 = ╱e4╱*╱ // 0x19b8 @0x16
0x19a2…19da at0017 = ╱ed╱(╱ // 0x19b9 @0x17
0x19a2…19da at0018 = ╱43╱C╱ // 0x19ba @0x18
0x19a2…19da at0019 = ╱30╱0╱ // 0x19bb @0x19
0x19a2…19da at001a = ╱ef╱$╱ // 0x19bc @0x1a
0x19a2…19da at001b = ╱ed╱(╱ // 0x19bd @0x1b
0x19a2…19da at001c = ╱31╱1╱ // 0x19be @0x1c
0x19a2…19da at001d = ╱32╱2╱ // 0x19bf @0x1d
0x19a2…19da at001e = ╱fe0000c004╱ // 0x19c0 @0x1e
0x19a2…19da at0023 = ╱ee╱)╱ // 0x19c5 @0x23
0x19a2…19da at0024 = ╱dc╱=╱ // 0x19c6 @0x24
0x19a2…19da at0025 = ╱22╱"╱ // 0x19c7 @0x25
0x19a2…19da at0026 = ╱2d╱-╱ // 0x19c8 @0x26
0x19a2…19da at0027 = ╱22╱"╱ // 0x19c9 @0x27
0x19a2…19da at0028 = ╱ee╱)╱ // 0x19ca @0x28
0x19a2…19da at0029 = ╱f0╱:╱ // 0x19cb @0x29
0x19a2…19da at002a = ╱54╱T╱ // 0x19cc @0x2a
0x19a2…19da at002b = ╱49╱I╱ // 0x19cd @0x2b
0x19a2…19da at002c = ╱ee╱)╱ // 0x19ce @0x2c
0x19a2…19da at002d = ╱dc╱=╱ // 0x19cf @0x2d
0x19a2…19da at002e = ╱43╱C╱ // 0x19d0 @0x2e
0x19a2…19da at002f = ╱30╱0╱ // 0x19d1 @0x2f
0x19a2…19da at0030 = ╱ef╱$╱ // 0x19d2 @0x30
0x19a2…19da at0031 = ╱ed╱(╱ // 0x19d3 @0x31
0x19a2…19da at0032 = ╱47╱G╱ // 0x19d4 @0x32
0x19a2…19da at0033 = ╱f0╱:╱ // 0x19d5 @0x33
0x19a2…19da at0034 = ╱54╱T╱ // 0x19d6 @0x34
0x19a2…19da at0035 = ╱49╱I╱ // 0x19d7 @0x35
0x19a2…19da at0036 = ╱ee╱)╱ // 0x19d8 @0x36
0x19a2…19da at0037 = EOL // 0x19d9 @0x37
0x19a2…19da }
0x19da…19e1 a738 4490 EXEC Å
0x19da…19e1 LineComalBin {
0x19da…19e1 ptr = 0xa738 // 0x19da @0x0
0x19da…19e1 lno = 0x118a // 0x19dc @0x2
0x19da…19e1 at0004 = ╱9d╱ EXEC ╱ // 0x19de @0x4
0x19da…19e1 at0005 = ╱5d╱Å╱ // 0x19df @0x5
0x19da…19e1 at0006 = EOL // 0x19e0 @0x6
0x19da…19e1 }
0x19e1…19e7 a73e 4500 PRINT
0x19e1…19e7 LineComalBin {
0x19e1…19e7 ptr = 0xa73e // 0x19e1 @0x0
0x19e1…19e7 lno = 0x1194 // 0x19e3 @0x2
0x19e1…19e7 at0004 = ╱92╱ PRINT ╱ // 0x19e5 @0x4
0x19e1…19e7 at0005 = EOL // 0x19e6 @0x5
0x19e1…19e7 }
0x19e7…19f8 a74f 4510 J6=J6+6
0x19e7…19f8 LineComalBin {
0x19e7…19f8 ptr = 0xa74f // 0x19e7 @0x0
0x19e7…19f8 lno = 0x119e // 0x19e9 @0x2
0x19e7…19f8 at0004 = ╱4a╱J╱ // 0x19eb @0x4
0x19e7…19f8 at0005 = ╱36╱6╱ // 0x19ec @0x5
0x19e7…19f8 at0006 = ╱dc╱=╱ // 0x19ed @0x6
0x19e7…19f8 at0007 = ╱4a╱J╱ // 0x19ee @0x7
0x19e7…19f8 at0008 = ╱36╱6╱ // 0x19ef @0x8
0x19e7…19f8 at0009 = ╱e2╱+╱ // 0x19f0 @0x9
0x19e7…19f8 at000a = ╱36╱6╱ // 0x19f1 @0xa
0x19e7…19f8 at000b = ╱fe0000c003╱ // 0x19f2 @0xb
0x19e7…19f8 at0010 = EOL // 0x19f7 @0x10
0x19e7…19f8 }
0x19f8…19fe a755 4520 ENDPROC
0x19f8…19fe LineComalBin {
0x19f8…19fe ptr = 0xa755 // 0x19f8 @0x0
0x19f8…19fe lno = 0x11a8 // 0x19fa @0x2
0x19f8…19fe at0004 = ╱9f╱ ENDPROC ╱ // 0x19fc @0x4
0x19f8…19fe at0005 = EOL // 0x19fd @0x5
0x19f8…19fe }
0x19fe…1a0c a763 4530 PROC BEREGNSH
0x19fe…1a0c LineComalBin {
0x19fe…1a0c ptr = 0xa763 // 0x19fe @0x0
0x19fe…1a0c lno = 0x11b2 // 0x1a00 @0x2
0x19fe…1a0c at0004 = ╱9e╱ PROC ╱ // 0x1a02 @0x4
0x19fe…1a0c at0005 = ╱42╱B╱ // 0x1a03 @0x5
0x19fe…1a0c at0006 = ╱45╱E╱ // 0x1a04 @0x6
0x19fe…1a0c at0007 = ╱52╱R╱ // 0x1a05 @0x7
0x19fe…1a0c at0008 = ╱45╱E╱ // 0x1a06 @0x8
0x19fe…1a0c at0009 = ╱47╱G╱ // 0x1a07 @0x9
0x19fe…1a0c at000a = ╱4e╱N╱ // 0x1a08 @0xa
0x19fe…1a0c at000b = ╱53╱S╱ // 0x1a09 @0xb
0x19fe…1a0c at000c = ╱48╱H╱ // 0x1a0a @0xc
0x19fe…1a0c at000d = EOL // 0x1a0b @0xd
0x19fe…1a0c }
0x1a0c…1a17 a76e 4540 IF K9=B THEN
0x1a0c…1a17 LineComalBin {
0x1a0c…1a17 ptr = 0xa76e // 0x1a0c @0x0
0x1a0c…1a17 lno = 0x11bc // 0x1a0e @0x2
0x1a0c…1a17 at0004 = ╱9c╱ IF ╱ // 0x1a10 @0x4
0x1a0c…1a17 at0005 = ╱4b╱K╱ // 0x1a11 @0x5
0x1a0c…1a17 at0006 = ╱39╱9╱ // 0x1a12 @0x6
0x1a0c…1a17 at0007 = ╱dc╱=╱ // 0x1a13 @0x7
0x1a0c…1a17 at0008 = ╱42╱B╱ // 0x1a14 @0x8
0x1a0c…1a17 at0009 = ╱b6╱ THEN ╱ // 0x1a15 @0x9
0x1a0c…1a17 at000a = EOL // 0x1a16 @0xa
0x1a0c…1a17 }
0x1a17…1a2f a786 4550 EXEC SKRIVHOVED(2)
0x1a17…1a2f LineComalBin {
0x1a17…1a2f ptr = 0xa786 // 0x1a17 @0x0
0x1a17…1a2f lno = 0x11c6 // 0x1a19 @0x2
0x1a17…1a2f at0004 = ╱9d╱ EXEC ╱ // 0x1a1b @0x4
0x1a17…1a2f at0005 = ╱53╱S╱ // 0x1a1c @0x5
0x1a17…1a2f at0006 = ╱4b╱K╱ // 0x1a1d @0x6
0x1a17…1a2f at0007 = ╱52╱R╱ // 0x1a1e @0x7
0x1a17…1a2f at0008 = ╱49╱I╱ // 0x1a1f @0x8
0x1a17…1a2f at0009 = ╱56╱V╱ // 0x1a20 @0x9
0x1a17…1a2f at000a = ╱48╱H╱ // 0x1a21 @0xa
0x1a17…1a2f at000b = ╱4f╱O╱ // 0x1a22 @0xb
0x1a17…1a2f at000c = ╱56╱V╱ // 0x1a23 @0xc
0x1a17…1a2f at000d = ╱45╱E╱ // 0x1a24 @0xd
0x1a17…1a2f at000e = ╱44╱D╱ // 0x1a25 @0xe
0x1a17…1a2f at000f = ╱ed╱(╱ // 0x1a26 @0xf
0x1a17…1a2f at0010 = ╱32╱2╱ // 0x1a27 @0x10
0x1a17…1a2f at0011 = ╱fe00008002╱ // 0x1a28 @0x11
0x1a17…1a2f at0016 = ╱ee╱)╱ // 0x1a2d @0x16
0x1a17…1a2f at0017 = EOL // 0x1a2e @0x17
0x1a17…1a2f }
0x1a2f…1a41 a798 4560 IF K2=B THEN EXEC INDTÆL
0x1a2f…1a41 LineComalBin {
0x1a2f…1a41 ptr = 0xa798 // 0x1a2f @0x0
0x1a2f…1a41 lno = 0x11d0 // 0x1a31 @0x2
0x1a2f…1a41 at0004 = ╱82╱ IF ╱ // 0x1a33 @0x4
0x1a2f…1a41 at0005 = ╱4b╱K╱ // 0x1a34 @0x5
0x1a2f…1a41 at0006 = ╱32╱2╱ // 0x1a35 @0x6
0x1a2f…1a41 at0007 = ╱dc╱=╱ // 0x1a36 @0x7
0x1a2f…1a41 at0008 = ╱42╱B╱ // 0x1a37 @0x8
0x1a2f…1a41 at0009 = ╱b6╱ THEN ╱ // 0x1a38 @0x9
0x1a2f…1a41 at000a = ╱9d╱ EXEC ╱ // 0x1a39 @0xa
0x1a2f…1a41 at000b = ╱49╱I╱ // 0x1a3a @0xb
0x1a2f…1a41 at000c = ╱4e╱N╱ // 0x1a3b @0xc
0x1a2f…1a41 at000d = ╱44╱D╱ // 0x1a3c @0xd
0x1a2f…1a41 at000e = ╱54╱T╱ // 0x1a3d @0xe
0x1a2f…1a41 at000f = ╱5b╱Æ╱ // 0x1a3e @0xf
0x1a2f…1a41 at0010 = ╱4c╱L╱ // 0x1a3f @0x10
0x1a2f…1a41 at0011 = EOL // 0x1a40 @0x11
0x1a2f…1a41 }
0x1a41…1a47 a79e 4570 ENDIF
0x1a41…1a47 LineComalBin {
0x1a41…1a47 ptr = 0xa79e // 0x1a41 @0x0
0x1a41…1a47 lno = 0x11da // 0x1a43 @0x2
0x1a41…1a47 at0004 = ╱9b╱ ENDIF ╱ // 0x1a45 @0x4
0x1a41…1a47 at0005 = EOL // 0x1a46 @0x5
0x1a41…1a47 }
0x1a47…1a89 a7e0 4580 PRINT " SH-KODE ";D2$(23);" OR-KODE ";D2$(24,25);
0x1a47…1a89 LineComalBin {
0x1a47…1a89 ptr = 0xa7e0 // 0x1a47 @0x0
0x1a47…1a89 lno = 0x11e4 // 0x1a49 @0x2
0x1a47…1a89 at0004 = ╱92╱ PRINT ╱ // 0x1a4b @0x4
0x1a47…1a89 at0005 = ╱22╱"╱ // 0x1a4c @0x5
0x1a47…1a89 at0006 = ╱20╱…╱ // 0x1a4d @0x6
0x1a47…1a89 at0007 = ╱53╱S╱ // 0x1a4e @0x7
0x1a47…1a89 at0008 = ╱48╱H╱ // 0x1a4f @0x8
0x1a47…1a89 at0009 = ╱2d╱-╱ // 0x1a50 @0x9
0x1a47…1a89 at000a = ╱4b╱K╱ // 0x1a51 @0xa
0x1a47…1a89 at000b = ╱4f╱O╱ // 0x1a52 @0xb
0x1a47…1a89 at000c = ╱44╱D╱ // 0x1a53 @0xc
0x1a47…1a89 at000d = ╱45╱E╱ // 0x1a54 @0xd
0x1a47…1a89 at000e = ╱20╱…╱ // 0x1a55 @0xe
0x1a47…1a89 at000f = ╱20╱…╱ // 0x1a56 @0xf
0x1a47…1a89 at0010 = ╱20╱…╱ // 0x1a57 @0x10
0x1a47…1a89 at0011 = ╱22╱"╱ // 0x1a58 @0x11
0x1a47…1a89 at0012 = ╱eb╱;╱ // 0x1a59 @0x12
0x1a47…1a89 at0013 = ╱44╱D╱ // 0x1a5a @0x13
0x1a47…1a89 at0014 = ╱32╱2╱ // 0x1a5b @0x14
0x1a47…1a89 at0015 = ╱ef╱$╱ // 0x1a5c @0x15
0x1a47…1a89 at0016 = ╱ed╱(╱ // 0x1a5d @0x16
0x1a47…1a89 at0017 = ╱32╱2╱ // 0x1a5e @0x17
0x1a47…1a89 at0018 = ╱33╱3╱ // 0x1a5f @0x18
0x1a47…1a89 at0019 = ╱fe0000b805╱ // 0x1a60 @0x19
0x1a47…1a89 at001e = ╱ee╱)╱ // 0x1a65 @0x1e
0x1a47…1a89 at001f = ╱eb╱;╱ // 0x1a66 @0x1f
0x1a47…1a89 at0020 = ╱22╱"╱ // 0x1a67 @0x20
0x1a47…1a89 at0021 = ╱20╱…╱ // 0x1a68 @0x21
0x1a47…1a89 at0022 = ╱4f╱O╱ // 0x1a69 @0x22
0x1a47…1a89 at0023 = ╱52╱R╱ // 0x1a6a @0x23
0x1a47…1a89 at0024 = ╱2d╱-╱ // 0x1a6b @0x24
0x1a47…1a89 at0025 = ╱4b╱K╱ // 0x1a6c @0x25
0x1a47…1a89 at0026 = ╱4f╱O╱ // 0x1a6d @0x26
0x1a47…1a89 at0027 = ╱44╱D╱ // 0x1a6e @0x27
0x1a47…1a89 at0028 = ╱45╱E╱ // 0x1a6f @0x28
0x1a47…1a89 at0029 = ╱20╱…╱ // 0x1a70 @0x29
0x1a47…1a89 at002a = ╱22╱"╱ // 0x1a71 @0x2a
0x1a47…1a89 at002b = ╱eb╱;╱ // 0x1a72 @0x2b
0x1a47…1a89 at002c = ╱44╱D╱ // 0x1a73 @0x2c
0x1a47…1a89 at002d = ╱32╱2╱ // 0x1a74 @0x2d
0x1a47…1a89 at002e = ╱ef╱$╱ // 0x1a75 @0x2e
0x1a47…1a89 at002f = ╱ed╱(╱ // 0x1a76 @0x2f
0x1a47…1a89 at0030 = ╱32╱2╱ // 0x1a77 @0x30
0x1a47…1a89 at0031 = ╱34╱4╱ // 0x1a78 @0x31
0x1a47…1a89 at0032 = ╱fe0000c005╱ // 0x1a79 @0x32
0x1a47…1a89 at0037 = ╱ec╱,╱ // 0x1a7e @0x37
0x1a47…1a89 at0038 = ╱32╱2╱ // 0x1a7f @0x38
0x1a47…1a89 at0039 = ╱35╱5╱ // 0x1a80 @0x39
0x1a47…1a89 at003a = ╱fe0000c805╱ // 0x1a81 @0x3a
0x1a47…1a89 at003f = ╱ee╱)╱ // 0x1a86 @0x3f
0x1a47…1a89 at0040 = ╱eb╱;╱ // 0x1a87 @0x40
0x1a47…1a89 at0041 = EOL // 0x1a88 @0x41
0x1a47…1a89 }
0x1a89…1a9f a7f6 4590 PRINT " FAGGR-KODE";H5
0x1a89…1a9f LineComalBin {
0x1a89…1a9f ptr = 0xa7f6 // 0x1a89 @0x0
0x1a89…1a9f lno = 0x11ee // 0x1a8b @0x2
0x1a89…1a9f at0004 = ╱92╱ PRINT ╱ // 0x1a8d @0x4
0x1a89…1a9f at0005 = ╱22╱"╱ // 0x1a8e @0x5
0x1a89…1a9f at0006 = ╱20╱…╱ // 0x1a8f @0x6
0x1a89…1a9f at0007 = ╱46╱F╱ // 0x1a90 @0x7
0x1a89…1a9f at0008 = ╱41╱A╱ // 0x1a91 @0x8
0x1a89…1a9f at0009 = ╱47╱G╱ // 0x1a92 @0x9
0x1a89…1a9f at000a = ╱47╱G╱ // 0x1a93 @0xa
0x1a89…1a9f at000b = ╱52╱R╱ // 0x1a94 @0xb
0x1a89…1a9f at000c = ╱2d╱-╱ // 0x1a95 @0xc
0x1a89…1a9f at000d = ╱4b╱K╱ // 0x1a96 @0xd
0x1a89…1a9f at000e = ╱4f╱O╱ // 0x1a97 @0xe
0x1a89…1a9f at000f = ╱44╱D╱ // 0x1a98 @0xf
0x1a89…1a9f at0010 = ╱45╱E╱ // 0x1a99 @0x10
0x1a89…1a9f at0011 = ╱22╱"╱ // 0x1a9a @0x11
0x1a89…1a9f at0012 = ╱eb╱;╱ // 0x1a9b @0x12
0x1a89…1a9f at0013 = ╱48╱H╱ // 0x1a9c @0x13
0x1a89…1a9f at0014 = ╱35╱5╱ // 0x1a9d @0x14
0x1a89…1a9f at0015 = EOL // 0x1a9e @0x15
0x1a89…1a9f }
0x1a9f…1aa5 a7fc 4600 PRINT
0x1a9f…1aa5 LineComalBin {
0x1a9f…1aa5 ptr = 0xa7fc // 0x1a9f @0x0
0x1a9f…1aa5 lno = 0x11f8 // 0x1aa1 @0x2
0x1a9f…1aa5 at0004 = ╱92╱ PRINT ╱ // 0x1aa3 @0x4
0x1a9f…1aa5 at0005 = EOL // 0x1aa4 @0x5
0x1a9f…1aa5 }
0x1aa5…1adf a836 4610 PRINT " LA TEKST";TAB(38);"SALDO ENHEDER SATS ";
0x1aa5…1adf LineComalBin {
0x1aa5…1adf ptr = 0xa836 // 0x1aa5 @0x0
0x1aa5…1adf lno = 0x1202 // 0x1aa7 @0x2
0x1aa5…1adf at0004 = ╱92╱ PRINT ╱ // 0x1aa9 @0x4
0x1aa5…1adf at0005 = ╱22╱"╱ // 0x1aaa @0x5
0x1aa5…1adf at0006 = ╱20╱…╱ // 0x1aab @0x6
0x1aa5…1adf at0007 = ╱4c╱L╱ // 0x1aac @0x7
0x1aa5…1adf at0008 = ╱41╱A╱ // 0x1aad @0x8
0x1aa5…1adf at0009 = ╱20╱…╱ // 0x1aae @0x9
0x1aa5…1adf at000a = ╱54╱T╱ // 0x1aaf @0xa
0x1aa5…1adf at000b = ╱45╱E╱ // 0x1ab0 @0xb
0x1aa5…1adf at000c = ╱4b╱K╱ // 0x1ab1 @0xc
0x1aa5…1adf at000d = ╱53╱S╱ // 0x1ab2 @0xd
0x1aa5…1adf at000e = ╱54╱T╱ // 0x1ab3 @0xe
0x1aa5…1adf at000f = ╱22╱"╱ // 0x1ab4 @0xf
0x1aa5…1adf at0010 = ╱eb╱;╱ // 0x1ab5 @0x10
0x1aa5…1adf at0011 = ╱d2╱TAB╱ // 0x1ab6 @0x11
0x1aa5…1adf at0012 = ╱ed╱(╱ // 0x1ab7 @0x12
0x1aa5…1adf at0013 = ╱33╱3╱ // 0x1ab8 @0x13
0x1aa5…1adf at0014 = ╱38╱8╱ // 0x1ab9 @0x14
0x1aa5…1adf at0015 = ╱fe00009806╱ // 0x1aba @0x15
0x1aa5…1adf at001a = ╱ee╱)╱ // 0x1abf @0x1a
0x1aa5…1adf at001b = ╱eb╱;╱ // 0x1ac0 @0x1b
0x1aa5…1adf at001c = ╱22╱"╱ // 0x1ac1 @0x1c
0x1aa5…1adf at001d = ╱53╱S╱ // 0x1ac2 @0x1d
0x1aa5…1adf at001e = ╱41╱A╱ // 0x1ac3 @0x1e
0x1aa5…1adf at001f = ╱4c╱L╱ // 0x1ac4 @0x1f
0x1aa5…1adf at0020 = ╱44╱D╱ // 0x1ac5 @0x20
0x1aa5…1adf at0021 = ╱4f╱O╱ // 0x1ac6 @0x21
0x1aa5…1adf at0022 = ╱20╱…╱ // 0x1ac7 @0x22
0x1aa5…1adf at0023 = ╱20╱…╱ // 0x1ac8 @0x23
0x1aa5…1adf at0024 = ╱20╱…╱ // 0x1ac9 @0x24
0x1aa5…1adf at0025 = ╱20╱…╱ // 0x1aca @0x25
0x1aa5…1adf at0026 = ╱45╱E╱ // 0x1acb @0x26
0x1aa5…1adf at0027 = ╱4e╱N╱ // 0x1acc @0x27
0x1aa5…1adf at0028 = ╱48╱H╱ // 0x1acd @0x28
0x1aa5…1adf at0029 = ╱45╱E╱ // 0x1ace @0x29
0x1aa5…1adf at002a = ╱44╱D╱ // 0x1acf @0x2a
0x1aa5…1adf at002b = ╱45╱E╱ // 0x1ad0 @0x2b
0x1aa5…1adf at002c = ╱52╱R╱ // 0x1ad1 @0x2c
0x1aa5…1adf at002d = ╱20╱…╱ // 0x1ad2 @0x2d
0x1aa5…1adf at002e = ╱20╱…╱ // 0x1ad3 @0x2e
0x1aa5…1adf at002f = ╱20╱…╱ // 0x1ad4 @0x2f
0x1aa5…1adf at0030 = ╱20╱…╱ // 0x1ad5 @0x30
0x1aa5…1adf at0031 = ╱53╱S╱ // 0x1ad6 @0x31
0x1aa5…1adf at0032 = ╱41╱A╱ // 0x1ad7 @0x32
0x1aa5…1adf at0033 = ╱54╱T╱ // 0x1ad8 @0x33
0x1aa5…1adf at0034 = ╱53╱S╱ // 0x1ad9 @0x34
0x1aa5…1adf at0035 = ╱20╱…╱ // 0x1ada @0x35
0x1aa5…1adf at0036 = ╱20╱…╱ // 0x1adb @0x36
0x1aa5…1adf at0037 = ╱22╱"╱ // 0x1adc @0x37
0x1aa5…1adf at0038 = ╱eb╱;╱ // 0x1add @0x38
0x1aa5…1adf at0039 = EOL // 0x1ade @0x39
0x1aa5…1adf }
0x1adf…1af8 a84f 4620 PRINT "UDBETALT/TRUKKET";
0x1adf…1af8 LineComalBin {
0x1adf…1af8 ptr = 0xa84f // 0x1adf @0x0
0x1adf…1af8 lno = 0x120c // 0x1ae1 @0x2
0x1adf…1af8 at0004 = ╱92╱ PRINT ╱ // 0x1ae3 @0x4
0x1adf…1af8 at0005 = ╱22╱"╱ // 0x1ae4 @0x5
0x1adf…1af8 at0006 = ╱55╱U╱ // 0x1ae5 @0x6
0x1adf…1af8 at0007 = ╱44╱D╱ // 0x1ae6 @0x7
0x1adf…1af8 at0008 = ╱42╱B╱ // 0x1ae7 @0x8
0x1adf…1af8 at0009 = ╱45╱E╱ // 0x1ae8 @0x9
0x1adf…1af8 at000a = ╱54╱T╱ // 0x1ae9 @0xa
0x1adf…1af8 at000b = ╱41╱A╱ // 0x1aea @0xb
0x1adf…1af8 at000c = ╱4c╱L╱ // 0x1aeb @0xc
0x1adf…1af8 at000d = ╱54╱T╱ // 0x1aec @0xd
0x1adf…1af8 at000e = ╱2f╱/╱ // 0x1aed @0xe
0x1adf…1af8 at000f = ╱54╱T╱ // 0x1aee @0xf
0x1adf…1af8 at0010 = ╱52╱R╱ // 0x1aef @0x10
0x1adf…1af8 at0011 = ╱55╱U╱ // 0x1af0 @0x11
0x1adf…1af8 at0012 = ╱4b╱K╱ // 0x1af1 @0x12
0x1adf…1af8 at0013 = ╱4b╱K╱ // 0x1af2 @0x13
0x1adf…1af8 at0014 = ╱45╱E╱ // 0x1af3 @0x14
0x1adf…1af8 at0015 = ╱54╱T╱ // 0x1af4 @0x15
0x1adf…1af8 at0016 = ╱22╱"╱ // 0x1af5 @0x16
0x1adf…1af8 at0017 = ╱eb╱;╱ // 0x1af6 @0x17
0x1adf…1af8 at0018 = EOL // 0x1af7 @0x18
0x1adf…1af8 }
0x1af8…1b08 a85f 4630 EXEC Z(95)
0x1af8…1b08 LineComalBin {
0x1af8…1b08 ptr = 0xa85f // 0x1af8 @0x0
0x1af8…1b08 lno = 0x1216 // 0x1afa @0x2
0x1af8…1b08 at0004 = ╱9d╱ EXEC ╱ // 0x1afc @0x4
0x1af8…1b08 at0005 = ╱5a╱Z╱ // 0x1afd @0x5
0x1af8…1b08 at0006 = ╱ed╱(╱ // 0x1afe @0x6
0x1af8…1b08 at0007 = ╱39╱9╱ // 0x1aff @0x7
0x1af8…1b08 at0008 = ╱35╱5╱ // 0x1b00 @0x8
0x1af8…1b08 at0009 = ╱fe0000be07╱ // 0x1b01 @0x9
0x1af8…1b08 at000e = ╱ee╱)╱ // 0x1b06 @0xe
0x1af8…1b08 at000f = EOL // 0x1b07 @0xf
0x1af8…1b08 }
0x1b08…1b21 a878 4635 EXEC OP(EL,C5$(23))
0x1b08…1b21 LineComalBin {
0x1b08…1b21 ptr = 0xa878 // 0x1b08 @0x0
0x1b08…1b21 lno = 0x121b // 0x1b0a @0x2
0x1b08…1b21 at0004 = ╱9d╱ EXEC ╱ // 0x1b0c @0x4
0x1b08…1b21 at0005 = ╱4f╱O╱ // 0x1b0d @0x5
0x1b08…1b21 at0006 = ╱50╱P╱ // 0x1b0e @0x6
0x1b08…1b21 at0007 = ╱ed╱(╱ // 0x1b0f @0x7
0x1b08…1b21 at0008 = ╱45╱E╱ // 0x1b10 @0x8
0x1b08…1b21 at0009 = ╱4c╱L╱ // 0x1b11 @0x9
0x1b08…1b21 at000a = ╱ec╱,╱ // 0x1b12 @0xa
0x1b08…1b21 at000b = ╱43╱C╱ // 0x1b13 @0xb
0x1b08…1b21 at000c = ╱35╱5╱ // 0x1b14 @0xc
0x1b08…1b21 at000d = ╱ef╱$╱ // 0x1b15 @0xd
0x1b08…1b21 at000e = ╱ed╱(╱ // 0x1b16 @0xe
0x1b08…1b21 at000f = ╱32╱2╱ // 0x1b17 @0xf
0x1b08…1b21 at0010 = ╱33╱3╱ // 0x1b18 @0x10
0x1b08…1b21 at0011 = ╱fe0000b805╱ // 0x1b19 @0x11
0x1b08…1b21 at0016 = ╱ee╱)╱ // 0x1b1e @0x16
0x1b08…1b21 at0017 = ╱ee╱)╱ // 0x1b1f @0x17
0x1b08…1b21 at0018 = EOL // 0x1b20 @0x18
0x1b08…1b21 }
0x1b21…1b58 a8af 4640 F0$(42)="0";F0$(44,54)=C5$(23)
0x1b21…1b58 LineComalBin {
0x1b21…1b58 ptr = 0xa8af // 0x1b21 @0x0
0x1b21…1b58 lno = 0x1220 // 0x1b23 @0x2
0x1b21…1b58 at0004 = ╱46╱F╱ // 0x1b25 @0x4
0x1b21…1b58 at0005 = ╱30╱0╱ // 0x1b26 @0x5
0x1b21…1b58 at0006 = ╱ef╱$╱ // 0x1b27 @0x6
0x1b21…1b58 at0007 = ╱ed╱(╱ // 0x1b28 @0x7
0x1b21…1b58 at0008 = ╱34╱4╱ // 0x1b29 @0x8
0x1b21…1b58 at0009 = ╱32╱2╱ // 0x1b2a @0x9
0x1b21…1b58 at000a = ╱fe0000a806╱ // 0x1b2b @0xa
0x1b21…1b58 at000f = ╱ee╱)╱ // 0x1b30 @0xf
0x1b21…1b58 at0010 = ╱dc╱=╱ // 0x1b31 @0x10
0x1b21…1b58 at0011 = ╱22╱"╱ // 0x1b32 @0x11
0x1b21…1b58 at0012 = ╱30╱0╱ // 0x1b33 @0x12
0x1b21…1b58 at0013 = ╱22╱"╱ // 0x1b34 @0x13
0x1b21…1b58 at0014 = ╱eb╱;╱ // 0x1b35 @0x14
0x1b21…1b58 at0015 = ╱46╱F╱ // 0x1b36 @0x15
0x1b21…1b58 at0016 = ╱30╱0╱ // 0x1b37 @0x16
0x1b21…1b58 at0017 = ╱ef╱$╱ // 0x1b38 @0x17
0x1b21…1b58 at0018 = ╱ed╱(╱ // 0x1b39 @0x18
0x1b21…1b58 at0019 = ╱34╱4╱ // 0x1b3a @0x19
0x1b21…1b58 at001a = ╱34╱4╱ // 0x1b3b @0x1a
0x1b21…1b58 at001b = ╱fe0000b006╱ // 0x1b3c @0x1b
0x1b21…1b58 at0020 = ╱ec╱,╱ // 0x1b41 @0x20
0x1b21…1b58 at0021 = ╱35╱5╱ // 0x1b42 @0x21
0x1b21…1b58 at0022 = ╱34╱4╱ // 0x1b43 @0x22
0x1b21…1b58 at0023 = ╱fe0000d806╱ // 0x1b44 @0x23
0x1b21…1b58 at0028 = ╱ee╱)╱ // 0x1b49 @0x28
0x1b21…1b58 at0029 = ╱dc╱=╱ // 0x1b4a @0x29
0x1b21…1b58 at002a = ╱43╱C╱ // 0x1b4b @0x2a
0x1b21…1b58 at002b = ╱35╱5╱ // 0x1b4c @0x2b
0x1b21…1b58 at002c = ╱ef╱$╱ // 0x1b4d @0x2c
0x1b21…1b58 at002d = ╱ed╱(╱ // 0x1b4e @0x2d
0x1b21…1b58 at002e = ╱32╱2╱ // 0x1b4f @0x2e
0x1b21…1b58 at002f = ╱33╱3╱ // 0x1b50 @0x2f
0x1b21…1b58 at0030 = ╱fe0000b805╱ // 0x1b51 @0x30
0x1b21…1b58 at0035 = ╱ee╱)╱ // 0x1b56 @0x35
0x1b21…1b58 at0036 = EOL // 0x1b57 @0x36
0x1b21…1b58 }
0x1b58…1b5f a8b6 4650 EXEC Å
0x1b58…1b5f LineComalBin {
0x1b58…1b5f ptr = 0xa8b6 // 0x1b58 @0x0
0x1b58…1b5f lno = 0x122a // 0x1b5a @0x2
0x1b58…1b5f at0004 = ╱9d╱ EXEC ╱ // 0x1b5c @0x4
0x1b58…1b5f at0005 = ╱5d╱Å╱ // 0x1b5d @0x5
0x1b58…1b5f at0006 = EOL // 0x1b5e @0x6
0x1b58…1b5f }
0x1b5f…1b8b (91,) a8e2 4660 C3$=C5$(23);C5$(23)=B3$(G:EL)
0x1b5f…1b8b LineComalBin {
0x1b5f…1b8b ptr = 0xa8e2 // 0x1b5f @0x0
0x1b5f…1b8b lno = 0x1234 // 0x1b61 @0x2
0x1b5f…1b8b at0004 = ╱43╱C╱ // 0x1b63 @0x4
0x1b5f…1b8b at0005 = ╱33╱3╱ // 0x1b64 @0x5
0x1b5f…1b8b at0006 = ╱ef╱$╱ // 0x1b65 @0x6
0x1b5f…1b8b at0007 = ╱dc╱=╱ // 0x1b66 @0x7
0x1b5f…1b8b at0008 = ╱43╱C╱ // 0x1b67 @0x8
0x1b5f…1b8b at0009 = ╱35╱5╱ // 0x1b68 @0x9
0x1b5f…1b8b at000a = ╱ef╱$╱ // 0x1b69 @0xa
0x1b5f…1b8b at000b = ╱ed╱(╱ // 0x1b6a @0xb
0x1b5f…1b8b at000c = ╱32╱2╱ // 0x1b6b @0xc
0x1b5f…1b8b at000d = ╱33╱3╱ // 0x1b6c @0xd
0x1b5f…1b8b at000e = ╱fe0000b805╱ // 0x1b6d @0xe
0x1b5f…1b8b at0013 = ╱ee╱)╱ // 0x1b72 @0x13
0x1b5f…1b8b at0014 = ╱eb╱;╱ // 0x1b73 @0x14
0x1b5f…1b8b at0015 = ╱43╱C╱ // 0x1b74 @0x15
0x1b5f…1b8b at0016 = ╱35╱5╱ // 0x1b75 @0x16
0x1b5f…1b8b at0017 = ╱ef╱$╱ // 0x1b76 @0x17
0x1b5f…1b8b at0018 = ╱ed╱(╱ // 0x1b77 @0x18
0x1b5f…1b8b at0019 = ╱32╱2╱ // 0x1b78 @0x19
0x1b5f…1b8b at001a = ╱33╱3╱ // 0x1b79 @0x1a
0x1b5f…1b8b at001b = ╱fe0000b805╱ // 0x1b7a @0x1b
0x1b5f…1b8b at0020 = ╱ee╱)╱ // 0x1b7f @0x20
0x1b5f…1b8b at0021 = ╱dc╱=╱ // 0x1b80 @0x21
0x1b5f…1b8b at0022 = ╱42╱B╱ // 0x1b81 @0x22
0x1b5f…1b8b at0023 = ╱33╱3╱ // 0x1b82 @0x23
0x1b5f…1b8b at0024 = ╱ef╱$╱ // 0x1b83 @0x24
0x1b5f…1b8b at0025 = ╱ed╱(╱ // 0x1b84 @0x25
0x1b5f…1b8b at0026 = ╱47╱G╱ // 0x1b85 @0x26
0x1b5f…1b8b at0027 = ╱f0╱:╱ // 0x1b86 @0x27
0x1b5f…1b8b at0028 = ╱45╱E╱ // 0x1b87 @0x28
0x1b5f…1b8b at0029 = ╱4c╱L╱ // 0x1b88 @0x29
0x1b5f…1b8b at002a = ╱ee╱)╱ // 0x1b89 @0x2a
0x1b5f…1b8b at002b = EOL // 0x1b8a @0x2b
0x1b5f…1b8b }
0x1b8b…1ba4 a8fb 4670 C4$=" "+C5$(26)
0x1b8b…1ba4 LineComalBin {
0x1b8b…1ba4 ptr = 0xa8fb // 0x1b8b @0x0
0x1b8b…1ba4 lno = 0x123e // 0x1b8d @0x2
0x1b8b…1ba4 at0004 = ╱43╱C╱ // 0x1b8f @0x4
0x1b8b…1ba4 at0005 = ╱34╱4╱ // 0x1b90 @0x5
0x1b8b…1ba4 at0006 = ╱ef╱$╱ // 0x1b91 @0x6
0x1b8b…1ba4 at0007 = ╱dc╱=╱ // 0x1b92 @0x7
0x1b8b…1ba4 at0008 = ╱22╱"╱ // 0x1b93 @0x8
0x1b8b…1ba4 at0009 = ╱20╱…╱ // 0x1b94 @0x9
0x1b8b…1ba4 at000a = ╱22╱"╱ // 0x1b95 @0xa
0x1b8b…1ba4 at000b = ╱f1╱+╱ // 0x1b96 @0xb
0x1b8b…1ba4 at000c = ╱43╱C╱ // 0x1b97 @0xc
0x1b8b…1ba4 at000d = ╱35╱5╱ // 0x1b98 @0xd
0x1b8b…1ba4 at000e = ╱ef╱$╱ // 0x1b99 @0xe
0x1b8b…1ba4 at000f = ╱ed╱(╱ // 0x1b9a @0xf
0x1b8b…1ba4 at0010 = ╱32╱2╱ // 0x1b9b @0x10
0x1b8b…1ba4 at0011 = ╱36╱6╱ // 0x1b9c @0x11
0x1b8b…1ba4 at0012 = ╱fe0000d005╱ // 0x1b9d @0x12
0x1b8b…1ba4 at0017 = ╱ee╱)╱ // 0x1ba2 @0x17
0x1b8b…1ba4 at0018 = EOL // 0x1ba3 @0x18
0x1b8b…1ba4 }
0x1ba4…1bd1 a928 4675 IF C4$(12)="+" THEN EXEC C(1,B3$,C4$,C4$)
0x1ba4…1bd1 LineComalBin {
0x1ba4…1bd1 ptr = 0xa928 // 0x1ba4 @0x0
0x1ba4…1bd1 lno = 0x1243 // 0x1ba6 @0x2
0x1ba4…1bd1 at0004 = ╱82╱ IF ╱ // 0x1ba8 @0x4
0x1ba4…1bd1 at0005 = ╱43╱C╱ // 0x1ba9 @0x5
0x1ba4…1bd1 at0006 = ╱34╱4╱ // 0x1baa @0x6
0x1ba4…1bd1 at0007 = ╱ef╱$╱ // 0x1bab @0x7
0x1ba4…1bd1 at0008 = ╱ed╱(╱ // 0x1bac @0x8
0x1ba4…1bd1 at0009 = ╱31╱1╱ // 0x1bad @0x9
0x1ba4…1bd1 at000a = ╱32╱2╱ // 0x1bae @0xa
0x1ba4…1bd1 at000b = ╱fe0000c004╱ // 0x1baf @0xb
0x1ba4…1bd1 at0010 = ╱ee╱)╱ // 0x1bb4 @0x10
0x1ba4…1bd1 at0011 = ╱dc╱=╱ // 0x1bb5 @0x11
0x1ba4…1bd1 at0012 = ╱22╱"╱ // 0x1bb6 @0x12
0x1ba4…1bd1 at0013 = ╱2b╱+╱ // 0x1bb7 @0x13
0x1ba4…1bd1 at0014 = ╱22╱"╱ // 0x1bb8 @0x14
0x1ba4…1bd1 at0015 = ╱b6╱ THEN ╱ // 0x1bb9 @0x15
0x1ba4…1bd1 at0016 = ╱9d╱ EXEC ╱ // 0x1bba @0x16
0x1ba4…1bd1 at0017 = ╱43╱C╱ // 0x1bbb @0x17
0x1ba4…1bd1 at0018 = ╱ed╱(╱ // 0x1bbc @0x18
0x1ba4…1bd1 at0019 = ╱31╱1╱ // 0x1bbd @0x19
0x1ba4…1bd1 at001a = ╱fe00008001╱ // 0x1bbe @0x1a
0x1ba4…1bd1 at001f = ╱ec╱,╱ // 0x1bc3 @0x1f
0x1ba4…1bd1 at0020 = ╱42╱B╱ // 0x1bc4 @0x20
0x1ba4…1bd1 at0021 = ╱33╱3╱ // 0x1bc5 @0x21
0x1ba4…1bd1 at0022 = ╱ef╱$╱ // 0x1bc6 @0x22
0x1ba4…1bd1 at0023 = ╱ec╱,╱ // 0x1bc7 @0x23
0x1ba4…1bd1 at0024 = ╱43╱C╱ // 0x1bc8 @0x24
0x1ba4…1bd1 at0025 = ╱34╱4╱ // 0x1bc9 @0x25
0x1ba4…1bd1 at0026 = ╱ef╱$╱ // 0x1bca @0x26
0x1ba4…1bd1 at0027 = ╱ec╱,╱ // 0x1bcb @0x27
0x1ba4…1bd1 at0028 = ╱43╱C╱ // 0x1bcc @0x28
0x1ba4…1bd1 at0029 = ╱34╱4╱ // 0x1bcd @0x29
0x1ba4…1bd1 at002a = ╱ef╱$╱ // 0x1bce @0x2a
0x1ba4…1bd1 at002b = ╱ee╱)╱ // 0x1bcf @0x2b
0x1ba4…1bd1 at002c = EOL // 0x1bd0 @0x2c
0x1ba4…1bd1 }
0x1bd1…1be1 a938 4680 EXEC Z(96)
0x1bd1…1be1 LineComalBin {
0x1bd1…1be1 ptr = 0xa938 // 0x1bd1 @0x0
0x1bd1…1be1 lno = 0x1248 // 0x1bd3 @0x2
0x1bd1…1be1 at0004 = ╱9d╱ EXEC ╱ // 0x1bd5 @0x4
0x1bd1…1be1 at0005 = ╱5a╱Z╱ // 0x1bd6 @0x5
0x1bd1…1be1 at0006 = ╱ed╱(╱ // 0x1bd7 @0x6
0x1bd1…1be1 at0007 = ╱39╱9╱ // 0x1bd8 @0x7
0x1bd1…1be1 at0008 = ╱36╱6╱ // 0x1bd9 @0x8
0x1bd1…1be1 at0009 = ╱fe0000c007╱ // 0x1bda @0x9
0x1bd1…1be1 at000e = ╱ee╱)╱ // 0x1bdf @0xe
0x1bd1…1be1 at000f = EOL // 0x1be0 @0xf
0x1bd1…1be1 }
0x1be1…1bf6 a94d 4685 EXEC OP(12,C4$)
0x1be1…1bf6 LineComalBin {
0x1be1…1bf6 ptr = 0xa94d // 0x1be1 @0x0
0x1be1…1bf6 lno = 0x124d // 0x1be3 @0x2
0x1be1…1bf6 at0004 = ╱9d╱ EXEC ╱ // 0x1be5 @0x4
0x1be1…1bf6 at0005 = ╱4f╱O╱ // 0x1be6 @0x5
0x1be1…1bf6 at0006 = ╱50╱P╱ // 0x1be7 @0x6
0x1be1…1bf6 at0007 = ╱ed╱(╱ // 0x1be8 @0x7
0x1be1…1bf6 at0008 = ╱31╱1╱ // 0x1be9 @0x8
0x1be1…1bf6 at0009 = ╱32╱2╱ // 0x1bea @0x9
0x1be1…1bf6 at000a = ╱fe0000c004╱ // 0x1beb @0xa
0x1be1…1bf6 at000f = ╱ec╱,╱ // 0x1bf0 @0xf
0x1be1…1bf6 at0010 = ╱43╱C╱ // 0x1bf1 @0x10
0x1be1…1bf6 at0011 = ╱34╱4╱ // 0x1bf2 @0x11
0x1be1…1bf6 at0012 = ╱ef╱$╱ // 0x1bf3 @0x12
0x1be1…1bf6 at0013 = ╱ee╱)╱ // 0x1bf4 @0x13
0x1be1…1bf6 at0014 = EOL // 0x1bf5 @0x14
0x1be1…1bf6 }
0x1bf6…1c2a a981 4690 F0$(42)="0";F0$(44,54)=C4$(G:EL)
0x1bf6…1c2a LineComalBin {
0x1bf6…1c2a ptr = 0xa981 // 0x1bf6 @0x0
0x1bf6…1c2a lno = 0x1252 // 0x1bf8 @0x2
0x1bf6…1c2a at0004 = ╱46╱F╱ // 0x1bfa @0x4
0x1bf6…1c2a at0005 = ╱30╱0╱ // 0x1bfb @0x5
0x1bf6…1c2a at0006 = ╱ef╱$╱ // 0x1bfc @0x6
0x1bf6…1c2a at0007 = ╱ed╱(╱ // 0x1bfd @0x7
0x1bf6…1c2a at0008 = ╱34╱4╱ // 0x1bfe @0x8
0x1bf6…1c2a at0009 = ╱32╱2╱ // 0x1bff @0x9
0x1bf6…1c2a at000a = ╱fe0000a806╱ // 0x1c00 @0xa
0x1bf6…1c2a at000f = ╱ee╱)╱ // 0x1c05 @0xf
0x1bf6…1c2a at0010 = ╱dc╱=╱ // 0x1c06 @0x10
0x1bf6…1c2a at0011 = ╱22╱"╱ // 0x1c07 @0x11
0x1bf6…1c2a at0012 = ╱30╱0╱ // 0x1c08 @0x12
0x1bf6…1c2a at0013 = ╱22╱"╱ // 0x1c09 @0x13
0x1bf6…1c2a at0014 = ╱eb╱;╱ // 0x1c0a @0x14
0x1bf6…1c2a at0015 = ╱46╱F╱ // 0x1c0b @0x15
0x1bf6…1c2a at0016 = ╱30╱0╱ // 0x1c0c @0x16
0x1bf6…1c2a at0017 = ╱ef╱$╱ // 0x1c0d @0x17
0x1bf6…1c2a at0018 = ╱ed╱(╱ // 0x1c0e @0x18
0x1bf6…1c2a at0019 = ╱34╱4╱ // 0x1c0f @0x19
0x1bf6…1c2a at001a = ╱34╱4╱ // 0x1c10 @0x1a
0x1bf6…1c2a at001b = ╱fe0000b006╱ // 0x1c11 @0x1b
0x1bf6…1c2a at0020 = ╱ec╱,╱ // 0x1c16 @0x20
0x1bf6…1c2a at0021 = ╱35╱5╱ // 0x1c17 @0x21
0x1bf6…1c2a at0022 = ╱34╱4╱ // 0x1c18 @0x22
0x1bf6…1c2a at0023 = ╱fe0000d806╱ // 0x1c19 @0x23
0x1bf6…1c2a at0028 = ╱ee╱)╱ // 0x1c1e @0x28
0x1bf6…1c2a at0029 = ╱dc╱=╱ // 0x1c1f @0x29
0x1bf6…1c2a at002a = ╱43╱C╱ // 0x1c20 @0x2a
0x1bf6…1c2a at002b = ╱34╱4╱ // 0x1c21 @0x2b
0x1bf6…1c2a at002c = ╱ef╱$╱ // 0x1c22 @0x2c
0x1bf6…1c2a at002d = ╱ed╱(╱ // 0x1c23 @0x2d
0x1bf6…1c2a at002e = ╱47╱G╱ // 0x1c24 @0x2e
0x1bf6…1c2a at002f = ╱f0╱:╱ // 0x1c25 @0x2f
0x1bf6…1c2a at0030 = ╱45╱E╱ // 0x1c26 @0x30
0x1bf6…1c2a at0031 = ╱4c╱L╱ // 0x1c27 @0x31
0x1bf6…1c2a at0032 = ╱ee╱)╱ // 0x1c28 @0x32
0x1bf6…1c2a at0033 = EOL // 0x1c29 @0x33
0x1bf6…1c2a }
0x1c2a…1c31 a988 4700 EXEC Å
0x1c2a…1c31 LineComalBin {
0x1c2a…1c31 ptr = 0xa988 // 0x1c2a @0x0
0x1c2a…1c31 lno = 0x125c // 0x1c2c @0x2
0x1c2a…1c31 at0004 = ╱9d╱ EXEC ╱ // 0x1c2e @0x4
0x1c2a…1c31 at0005 = ╱5d╱Å╱ // 0x1c2f @0x5
0x1c2a…1c31 at0006 = EOL // 0x1c30 @0x6
0x1c2a…1c31 }
0x1c31…1c4c a9a3 4710 C5$(26)=B3$(G:EL)
0x1c31…1c4c LineComalBin {
0x1c31…1c4c ptr = 0xa9a3 // 0x1c31 @0x0
0x1c31…1c4c lno = 0x1266 // 0x1c33 @0x2
0x1c31…1c4c at0004 = ╱43╱C╱ // 0x1c35 @0x4
0x1c31…1c4c at0005 = ╱35╱5╱ // 0x1c36 @0x5
0x1c31…1c4c at0006 = ╱ef╱$╱ // 0x1c37 @0x6
0x1c31…1c4c at0007 = ╱ed╱(╱ // 0x1c38 @0x7
0x1c31…1c4c at0008 = ╱32╱2╱ // 0x1c39 @0x8
0x1c31…1c4c at0009 = ╱36╱6╱ // 0x1c3a @0x9
0x1c31…1c4c at000a = ╱fe0000d005╱ // 0x1c3b @0xa
0x1c31…1c4c at000f = ╱ee╱)╱ // 0x1c40 @0xf
0x1c31…1c4c at0010 = ╱dc╱=╱ // 0x1c41 @0x10
0x1c31…1c4c at0011 = ╱42╱B╱ // 0x1c42 @0x11
0x1c31…1c4c at0012 = ╱33╱3╱ // 0x1c43 @0x12
0x1c31…1c4c at0013 = ╱ef╱$╱ // 0x1c44 @0x13
0x1c31…1c4c at0014 = ╱ed╱(╱ // 0x1c45 @0x14
0x1c31…1c4c at0015 = ╱47╱G╱ // 0x1c46 @0x15
0x1c31…1c4c at0016 = ╱f0╱:╱ // 0x1c47 @0x16
0x1c31…1c4c at0017 = ╱45╱E╱ // 0x1c48 @0x17
0x1c31…1c4c at0018 = ╱4c╱L╱ // 0x1c49 @0x18
0x1c31…1c4c at0019 = ╱ee╱)╱ // 0x1c4a @0x19
0x1c31…1c4c at001a = EOL // 0x1c4b @0x1a
0x1c31…1c4c }
0x1c4c…1c67 a9be 4720 EXEC C(0,C3$,C4$,B1$)
0x1c4c…1c67 LineComalBin {
0x1c4c…1c67 ptr = 0xa9be // 0x1c4c @0x0
0x1c4c…1c67 lno = 0x1270 // 0x1c4e @0x2
0x1c4c…1c67 at0004 = ╱9d╱ EXEC ╱ // 0x1c50 @0x4
0x1c4c…1c67 at0005 = ╱43╱C╱ // 0x1c51 @0x5
0x1c4c…1c67 at0006 = ╱ed╱(╱ // 0x1c52 @0x6
0x1c4c…1c67 at0007 = ╱30╱0╱ // 0x1c53 @0x7
0x1c4c…1c67 at0008 = ╱fe00000000╱ // 0x1c54 @0x8
0x1c4c…1c67 at000d = ╱ec╱,╱ // 0x1c59 @0xd
0x1c4c…1c67 at000e = ╱43╱C╱ // 0x1c5a @0xe
0x1c4c…1c67 at000f = ╱33╱3╱ // 0x1c5b @0xf
0x1c4c…1c67 at0010 = ╱ef╱$╱ // 0x1c5c @0x10
0x1c4c…1c67 at0011 = ╱ec╱,╱ // 0x1c5d @0x11
0x1c4c…1c67 at0012 = ╱43╱C╱ // 0x1c5e @0x12
0x1c4c…1c67 at0013 = ╱34╱4╱ // 0x1c5f @0x13
0x1c4c…1c67 at0014 = ╱ef╱$╱ // 0x1c60 @0x14
0x1c4c…1c67 at0015 = ╱ec╱,╱ // 0x1c61 @0x15
0x1c4c…1c67 at0016 = ╱42╱B╱ // 0x1c62 @0x16
0x1c4c…1c67 at0017 = ╱31╱1╱ // 0x1c63 @0x17
0x1c4c…1c67 at0018 = ╱ef╱$╱ // 0x1c64 @0x18
0x1c4c…1c67 at0019 = ╱ee╱)╱ // 0x1c65 @0x19
0x1c4c…1c67 at001a = EOL // 0x1c66 @0x1a
0x1c4c…1c67 }
0x1c67…1c7f a9d6 4730 EXEC OPTÆL(34,B1$)
0x1c67…1c7f LineComalBin {
0x1c67…1c7f ptr = 0xa9d6 // 0x1c67 @0x0
0x1c67…1c7f lno = 0x127a // 0x1c69 @0x2
0x1c67…1c7f at0004 = ╱9d╱ EXEC ╱ // 0x1c6b @0x4
0x1c67…1c7f at0005 = ╱4f╱O╱ // 0x1c6c @0x5
0x1c67…1c7f at0006 = ╱50╱P╱ // 0x1c6d @0x6
0x1c67…1c7f at0007 = ╱54╱T╱ // 0x1c6e @0x7
0x1c67…1c7f at0008 = ╱5b╱Æ╱ // 0x1c6f @0x8
0x1c67…1c7f at0009 = ╱4c╱L╱ // 0x1c70 @0x9
0x1c67…1c7f at000a = ╱ed╱(╱ // 0x1c71 @0xa
0x1c67…1c7f at000b = ╱33╱3╱ // 0x1c72 @0xb
0x1c67…1c7f at000c = ╱34╱4╱ // 0x1c73 @0xc
0x1c67…1c7f at000d = ╱fe00008806╱ // 0x1c74 @0xd
0x1c67…1c7f at0012 = ╱ec╱,╱ // 0x1c79 @0x12
0x1c67…1c7f at0013 = ╱42╱B╱ // 0x1c7a @0x13
0x1c67…1c7f at0014 = ╱31╱1╱ // 0x1c7b @0x14
0x1c67…1c7f at0015 = ╱ef╱$╱ // 0x1c7c @0x15
0x1c67…1c7f at0016 = ╱ee╱)╱ // 0x1c7d @0x16
0x1c67…1c7f at0017 = EOL // 0x1c7e @0x17
0x1c67…1c7f }
0x1c7f…1c8f a9e6 4760 EXEC Z(82)
0x1c7f…1c8f LineComalBin {
0x1c7f…1c8f ptr = 0xa9e6 // 0x1c7f @0x0
0x1c7f…1c8f lno = 0x1298 // 0x1c81 @0x2
0x1c7f…1c8f at0004 = ╱9d╱ EXEC ╱ // 0x1c83 @0x4
0x1c7f…1c8f at0005 = ╱5a╱Z╱ // 0x1c84 @0x5
0x1c7f…1c8f at0006 = ╱ed╱(╱ // 0x1c85 @0x6
0x1c7f…1c8f at0007 = ╱38╱8╱ // 0x1c86 @0x7
0x1c7f…1c8f at0008 = ╱32╱2╱ // 0x1c87 @0x8
0x1c7f…1c8f at0009 = ╱fe0000a407╱ // 0x1c88 @0x9
0x1c7f…1c8f at000e = ╱ee╱)╱ // 0x1c8d @0xe
0x1c7f…1c8f at000f = EOL // 0x1c8e @0xf
0x1c7f…1c8f }
0x1c8f…1cb5 aa0c 4770 F0$(33,43)=C5$(34)
0x1c8f…1cb5 LineComalBin {
0x1c8f…1cb5 ptr = 0xaa0c // 0x1c8f @0x0
0x1c8f…1cb5 lno = 0x12a2 // 0x1c91 @0x2
0x1c8f…1cb5 at0004 = ╱46╱F╱ // 0x1c93 @0x4
0x1c8f…1cb5 at0005 = ╱30╱0╱ // 0x1c94 @0x5
0x1c8f…1cb5 at0006 = ╱ef╱$╱ // 0x1c95 @0x6
0x1c8f…1cb5 at0007 = ╱ed╱(╱ // 0x1c96 @0x7
0x1c8f…1cb5 at0008 = ╱33╱3╱ // 0x1c97 @0x8
0x1c8f…1cb5 at0009 = ╱33╱3╱ // 0x1c98 @0x9
0x1c8f…1cb5 at000a = ╱fe00008406╱ // 0x1c99 @0xa
0x1c8f…1cb5 at000f = ╱ec╱,╱ // 0x1c9e @0xf
0x1c8f…1cb5 at0010 = ╱34╱4╱ // 0x1c9f @0x10
0x1c8f…1cb5 at0011 = ╱33╱3╱ // 0x1ca0 @0x11
0x1c8f…1cb5 at0012 = ╱fe0000ac06╱ // 0x1ca1 @0x12
0x1c8f…1cb5 at0017 = ╱ee╱)╱ // 0x1ca6 @0x17
0x1c8f…1cb5 at0018 = ╱dc╱=╱ // 0x1ca7 @0x18
0x1c8f…1cb5 at0019 = ╱43╱C╱ // 0x1ca8 @0x19
0x1c8f…1cb5 at001a = ╱35╱5╱ // 0x1ca9 @0x1a
0x1c8f…1cb5 at001b = ╱ef╱$╱ // 0x1caa @0x1b
0x1c8f…1cb5 at001c = ╱ed╱(╱ // 0x1cab @0x1c
0x1c8f…1cb5 at001d = ╱33╱3╱ // 0x1cac @0x1d
0x1c8f…1cb5 at001e = ╱34╱4╱ // 0x1cad @0x1e
0x1c8f…1cb5 at001f = ╱fe00008806╱ // 0x1cae @0x1f
0x1c8f…1cb5 at0024 = ╱ee╱)╱ // 0x1cb3 @0x24
0x1c8f…1cb5 at0025 = EOL // 0x1cb4 @0x25
0x1c8f…1cb5 }
0x1cb5…1cc4 aa1b 4780 EXEC Æ(C3$,G8)
0x1cb5…1cc4 LineComalBin {
0x1cb5…1cc4 ptr = 0xaa1b // 0x1cb5 @0x0
0x1cb5…1cc4 lno = 0x12ac // 0x1cb7 @0x2
0x1cb5…1cc4 at0004 = ╱9d╱ EXEC ╱ // 0x1cb9 @0x4
0x1cb5…1cc4 at0005 = ╱5b╱Æ╱ // 0x1cba @0x5
0x1cb5…1cc4 at0006 = ╱ed╱(╱ // 0x1cbb @0x6
0x1cb5…1cc4 at0007 = ╱43╱C╱ // 0x1cbc @0x7
0x1cb5…1cc4 at0008 = ╱33╱3╱ // 0x1cbd @0x8
0x1cb5…1cc4 at0009 = ╱ef╱$╱ // 0x1cbe @0x9
0x1cb5…1cc4 at000a = ╱ec╱,╱ // 0x1cbf @0xa
0x1cb5…1cc4 at000b = ╱47╱G╱ // 0x1cc0 @0xb
0x1cb5…1cc4 at000c = ╱38╱8╱ // 0x1cc1 @0xc
0x1cb5…1cc4 at000d = ╱ee╱)╱ // 0x1cc2 @0xd
0x1cb5…1cc4 at000e = EOL // 0x1cc3 @0xe
0x1cb5…1cc4 }
0x1cc4…1cd0 aa27 4782 C4$=B3$
0x1cc4…1cd0 LineComalBin {
0x1cc4…1cd0 ptr = 0xaa27 // 0x1cc4 @0x0
0x1cc4…1cd0 lno = 0x12ae // 0x1cc6 @0x2
0x1cc4…1cd0 at0004 = ╱43╱C╱ // 0x1cc8 @0x4
0x1cc4…1cd0 at0005 = ╱34╱4╱ // 0x1cc9 @0x5
0x1cc4…1cd0 at0006 = ╱ef╱$╱ // 0x1cca @0x6
0x1cc4…1cd0 at0007 = ╱dc╱=╱ // 0x1ccb @0x7
0x1cc4…1cd0 at0008 = ╱42╱B╱ // 0x1ccc @0x8
0x1cc4…1cd0 at0009 = ╱33╱3╱ // 0x1ccd @0x9
0x1cc4…1cd0 at000a = ╱ef╱$╱ // 0x1cce @0xa
0x1cc4…1cd0 at000b = EOL // 0x1ccf @0xb
0x1cc4…1cd0 }
0x1cd0…1ce5 aa3c 4785 C3$(12)="-"
0x1cd0…1ce5 LineComalBin {
0x1cd0…1ce5 ptr = 0xaa3c // 0x1cd0 @0x0
0x1cd0…1ce5 lno = 0x12b1 // 0x1cd2 @0x2
0x1cd0…1ce5 at0004 = ╱43╱C╱ // 0x1cd4 @0x4
0x1cd0…1ce5 at0005 = ╱33╱3╱ // 0x1cd5 @0x5
0x1cd0…1ce5 at0006 = ╱ef╱$╱ // 0x1cd6 @0x6
0x1cd0…1ce5 at0007 = ╱ed╱(╱ // 0x1cd7 @0x7
0x1cd0…1ce5 at0008 = ╱31╱1╱ // 0x1cd8 @0x8
0x1cd0…1ce5 at0009 = ╱32╱2╱ // 0x1cd9 @0x9
0x1cd0…1ce5 at000a = ╱fe0000c004╱ // 0x1cda @0xa
0x1cd0…1ce5 at000f = ╱ee╱)╱ // 0x1cdf @0xf
0x1cd0…1ce5 at0010 = ╱dc╱=╱ // 0x1ce0 @0x10
0x1cd0…1ce5 at0011 = ╱22╱"╱ // 0x1ce1 @0x11
0x1cd0…1ce5 at0012 = ╱2d╱-╱ // 0x1ce2 @0x12
0x1cd0…1ce5 at0013 = ╱22╱"╱ // 0x1ce3 @0x13
0x1cd0…1ce5 at0014 = EOL // 0x1ce4 @0x14
0x1cd0…1ce5 }
0x1ce5…1cfc aa53 4790 IF B1$(12)="+" THEN
0x1ce5…1cfc LineComalBin {
0x1ce5…1cfc ptr = 0xaa53 // 0x1ce5 @0x0
0x1ce5…1cfc lno = 0x12b6 // 0x1ce7 @0x2
0x1ce5…1cfc at0004 = ╱9c╱ IF ╱ // 0x1ce9 @0x4
0x1ce5…1cfc at0005 = ╱42╱B╱ // 0x1cea @0x5
0x1ce5…1cfc at0006 = ╱31╱1╱ // 0x1ceb @0x6
0x1ce5…1cfc at0007 = ╱ef╱$╱ // 0x1cec @0x7
0x1ce5…1cfc at0008 = ╱ed╱(╱ // 0x1ced @0x8
0x1ce5…1cfc at0009 = ╱31╱1╱ // 0x1cee @0x9
0x1ce5…1cfc at000a = ╱32╱2╱ // 0x1cef @0xa
0x1ce5…1cfc at000b = ╱fe0000c004╱ // 0x1cf0 @0xb
0x1ce5…1cfc at0010 = ╱ee╱)╱ // 0x1cf5 @0x10
0x1ce5…1cfc at0011 = ╱dc╱=╱ // 0x1cf6 @0x11
0x1ce5…1cfc at0012 = ╱22╱"╱ // 0x1cf7 @0x12
0x1ce5…1cfc at0013 = ╱2b╱+╱ // 0x1cf8 @0x13
0x1ce5…1cfc at0014 = ╱22╱"╱ // 0x1cf9 @0x14
0x1ce5…1cfc at0015 = ╱b6╱ THEN ╱ // 0x1cfa @0x15
0x1ce5…1cfc at0016 = EOL // 0x1cfb @0x16
0x1ce5…1cfc }
0x1cfc…1d08 aa5f 4795 B2$=B1$
0x1cfc…1d08 LineComalBin {
0x1cfc…1d08 ptr = 0xaa5f // 0x1cfc @0x0
0x1cfc…1d08 lno = 0x12bb // 0x1cfe @0x2
0x1cfc…1d08 at0004 = ╱42╱B╱ // 0x1d00 @0x4
0x1cfc…1d08 at0005 = ╱32╱2╱ // 0x1d01 @0x5
0x1cfc…1d08 at0006 = ╱ef╱$╱ // 0x1d02 @0x6
0x1cfc…1d08 at0007 = ╱dc╱=╱ // 0x1d03 @0x7
0x1cfc…1d08 at0008 = ╱42╱B╱ // 0x1d04 @0x8
0x1cfc…1d08 at0009 = ╱31╱1╱ // 0x1d05 @0x9
0x1cfc…1d08 at000a = ╱ef╱$╱ // 0x1d06 @0xa
0x1cfc…1d08 at000b = EOL // 0x1d07 @0xb
0x1cfc…1d08 }
0x1d08…1d26 aa7d 4800 F0$(64:TI)=B1$(G:TI)
0x1d08…1d26 LineComalBin {
0x1d08…1d26 ptr = 0xaa7d // 0x1d08 @0x0
0x1d08…1d26 lno = 0x12c0 // 0x1d0a @0x2
0x1d08…1d26 at0004 = ╱46╱F╱ // 0x1d0c @0x4
0x1d08…1d26 at0005 = ╱30╱0╱ // 0x1d0d @0x5
0x1d08…1d26 at0006 = ╱ef╱$╱ // 0x1d0e @0x6
0x1d08…1d26 at0007 = ╱ed╱(╱ // 0x1d0f @0x7
0x1d08…1d26 at0008 = ╱36╱6╱ // 0x1d10 @0x8
0x1d08…1d26 at0009 = ╱34╱4╱ // 0x1d11 @0x9
0x1d08…1d26 at000a = ╱fe00008007╱ // 0x1d12 @0xa
0x1d08…1d26 at000f = ╱f0╱:╱ // 0x1d17 @0xf
0x1d08…1d26 at0010 = ╱54╱T╱ // 0x1d18 @0x10
0x1d08…1d26 at0011 = ╱49╱I╱ // 0x1d19 @0x11
0x1d08…1d26 at0012 = ╱ee╱)╱ // 0x1d1a @0x12
0x1d08…1d26 at0013 = ╱dc╱=╱ // 0x1d1b @0x13
0x1d08…1d26 at0014 = ╱42╱B╱ // 0x1d1c @0x14
0x1d08…1d26 at0015 = ╱31╱1╱ // 0x1d1d @0x15
0x1d08…1d26 at0016 = ╱ef╱$╱ // 0x1d1e @0x16
0x1d08…1d26 at0017 = ╱ed╱(╱ // 0x1d1f @0x17
0x1d08…1d26 at0018 = ╱47╱G╱ // 0x1d20 @0x18
0x1d08…1d26 at0019 = ╱f0╱:╱ // 0x1d21 @0x19
0x1d08…1d26 at001a = ╱54╱T╱ // 0x1d22 @0x1a
0x1d08…1d26 at001b = ╱49╱I╱ // 0x1d23 @0x1b
0x1d08…1d26 at001c = ╱ee╱)╱ // 0x1d24 @0x1c
0x1d08…1d26 at001d = EOL // 0x1d25 @0x1d
0x1d08…1d26 }
0x1d26…1d31 aa88 4801 IF H0>B THEN
0x1d26…1d31 LineComalBin {
0x1d26…1d31 ptr = 0xaa88 // 0x1d26 @0x0
0x1d26…1d31 lno = 0x12c1 // 0x1d28 @0x2
0x1d26…1d31 at0004 = ╱9c╱ IF ╱ // 0x1d2a @0x4
0x1d26…1d31 at0005 = ╱48╱H╱ // 0x1d2b @0x5
0x1d26…1d31 at0006 = ╱30╱0╱ // 0x1d2c @0x6
0x1d26…1d31 at0007 = ╱de╱>╱ // 0x1d2d @0x7
0x1d26…1d31 at0008 = ╱42╱B╱ // 0x1d2e @0x8
0x1d26…1d31 at0009 = ╱b6╱ THEN ╱ // 0x1d2f @0x9
0x1d26…1d31 at000a = EOL // 0x1d30 @0xa
0x1d26…1d31 }
0x1d31…1d40 aa97 4802 EXEC Æ(C4$,H0)
0x1d31…1d40 LineComalBin {
0x1d31…1d40 ptr = 0xaa97 // 0x1d31 @0x0
0x1d31…1d40 lno = 0x12c2 // 0x1d33 @0x2
0x1d31…1d40 at0004 = ╱9d╱ EXEC ╱ // 0x1d35 @0x4
0x1d31…1d40 at0005 = ╱5b╱Æ╱ // 0x1d36 @0x5
0x1d31…1d40 at0006 = ╱ed╱(╱ // 0x1d37 @0x6
0x1d31…1d40 at0007 = ╱43╱C╱ // 0x1d38 @0x7
0x1d31…1d40 at0008 = ╱34╱4╱ // 0x1d39 @0x8
0x1d31…1d40 at0009 = ╱ef╱$╱ // 0x1d3a @0x9
0x1d31…1d40 at000a = ╱ec╱,╱ // 0x1d3b @0xa
0x1d31…1d40 at000b = ╱48╱H╱ // 0x1d3c @0xb
0x1d31…1d40 at000c = ╱30╱0╱ // 0x1d3d @0xc
0x1d31…1d40 at000d = ╱ee╱)╱ // 0x1d3e @0xd
0x1d31…1d40 at000e = EOL // 0x1d3f @0xe
0x1d31…1d40 }
0x1d40…1d5b aab2 4803 EXEC C(4,B1$,C4$,C2$)
0x1d40…1d5b LineComalBin {
0x1d40…1d5b ptr = 0xaab2 // 0x1d40 @0x0
0x1d40…1d5b lno = 0x12c3 // 0x1d42 @0x2
0x1d40…1d5b at0004 = ╱9d╱ EXEC ╱ // 0x1d44 @0x4
0x1d40…1d5b at0005 = ╱43╱C╱ // 0x1d45 @0x5
0x1d40…1d5b at0006 = ╱ed╱(╱ // 0x1d46 @0x6
0x1d40…1d5b at0007 = ╱34╱4╱ // 0x1d47 @0x7
0x1d40…1d5b at0008 = ╱fe00008003╱ // 0x1d48 @0x8
0x1d40…1d5b at000d = ╱ec╱,╱ // 0x1d4d @0xd
0x1d40…1d5b at000e = ╱42╱B╱ // 0x1d4e @0xe
0x1d40…1d5b at000f = ╱31╱1╱ // 0x1d4f @0xf
0x1d40…1d5b at0010 = ╱ef╱$╱ // 0x1d50 @0x10
0x1d40…1d5b at0011 = ╱ec╱,╱ // 0x1d51 @0x11
0x1d40…1d5b at0012 = ╱43╱C╱ // 0x1d52 @0x12
0x1d40…1d5b at0013 = ╱34╱4╱ // 0x1d53 @0x13
0x1d40…1d5b at0014 = ╱ef╱$╱ // 0x1d54 @0x14
0x1d40…1d5b at0015 = ╱ec╱,╱ // 0x1d55 @0x15
0x1d40…1d5b at0016 = ╱43╱C╱ // 0x1d56 @0x16
0x1d40…1d5b at0017 = ╱32╱2╱ // 0x1d57 @0x17
0x1d40…1d5b at0018 = ╱ef╱$╱ // 0x1d58 @0x18
0x1d40…1d5b at0019 = ╱ee╱)╱ // 0x1d59 @0x19
0x1d40…1d5b at001a = EOL // 0x1d5a @0x1a
0x1d40…1d5b }
0x1d5b…1d66 aabd 4804 IF SI=G THEN
0x1d5b…1d66 LineComalBin {
0x1d5b…1d66 ptr = 0xaabd // 0x1d5b @0x0
0x1d5b…1d66 lno = 0x12c4 // 0x1d5d @0x2
0x1d5b…1d66 at0004 = ╱9c╱ IF ╱ // 0x1d5f @0x4
0x1d5b…1d66 at0005 = ╱53╱S╱ // 0x1d60 @0x5
0x1d5b…1d66 at0006 = ╱49╱I╱ // 0x1d61 @0x6
0x1d5b…1d66 at0007 = ╱dc╱=╱ // 0x1d62 @0x7
0x1d5b…1d66 at0008 = ╱47╱G╱ // 0x1d63 @0x8
0x1d5b…1d66 at0009 = ╱b6╱ THEN ╱ // 0x1d64 @0x9
0x1d5b…1d66 at000a = EOL // 0x1d65 @0xa
0x1d5b…1d66 }
0x1d66…1d81 aad8 4805 EXEC C(1,B1$,C4$,B2$)
0x1d66…1d81 LineComalBin {
0x1d66…1d81 ptr = 0xaad8 // 0x1d66 @0x0
0x1d66…1d81 lno = 0x12c5 // 0x1d68 @0x2
0x1d66…1d81 at0004 = ╱9d╱ EXEC ╱ // 0x1d6a @0x4
0x1d66…1d81 at0005 = ╱43╱C╱ // 0x1d6b @0x5
0x1d66…1d81 at0006 = ╱ed╱(╱ // 0x1d6c @0x6
0x1d66…1d81 at0007 = ╱31╱1╱ // 0x1d6d @0x7
0x1d66…1d81 at0008 = ╱fe00008001╱ // 0x1d6e @0x8
0x1d66…1d81 at000d = ╱ec╱,╱ // 0x1d73 @0xd
0x1d66…1d81 at000e = ╱42╱B╱ // 0x1d74 @0xe
0x1d66…1d81 at000f = ╱31╱1╱ // 0x1d75 @0xf
0x1d66…1d81 at0010 = ╱ef╱$╱ // 0x1d76 @0x10
0x1d66…1d81 at0011 = ╱ec╱,╱ // 0x1d77 @0x11
0x1d66…1d81 at0012 = ╱43╱C╱ // 0x1d78 @0x12
0x1d66…1d81 at0013 = ╱34╱4╱ // 0x1d79 @0x13
0x1d66…1d81 at0014 = ╱ef╱$╱ // 0x1d7a @0x14
0x1d66…1d81 at0015 = ╱ec╱,╱ // 0x1d7b @0x15
0x1d66…1d81 at0016 = ╱42╱B╱ // 0x1d7c @0x16
0x1d66…1d81 at0017 = ╱32╱2╱ // 0x1d7d @0x17
0x1d66…1d81 at0018 = ╱ef╱$╱ // 0x1d7e @0x18
0x1d66…1d81 at0019 = ╱ee╱)╱ // 0x1d7f @0x19
0x1d66…1d81 at001a = EOL // 0x1d80 @0x1a
0x1d66…1d81 }
0x1d81…1d8a aae1 4806 H0=B
0x1d81…1d8a LineComalBin {
0x1d81…1d8a ptr = 0xaae1 // 0x1d81 @0x0
0x1d81…1d8a lno = 0x12c6 // 0x1d83 @0x2
0x1d81…1d8a at0004 = ╱48╱H╱ // 0x1d85 @0x4
0x1d81…1d8a at0005 = ╱30╱0╱ // 0x1d86 @0x5
0x1d81…1d8a at0006 = ╱dc╱=╱ // 0x1d87 @0x6
0x1d81…1d8a at0007 = ╱42╱B╱ // 0x1d88 @0x7
0x1d81…1d8a at0008 = EOL // 0x1d89 @0x8
0x1d81…1d8a }
0x1d8a…1d90 aae7 4807 ELSE
0x1d8a…1d90 LineComalBin {
0x1d8a…1d90 ptr = 0xaae7 // 0x1d8a @0x0
0x1d8a…1d90 lno = 0x12c7 // 0x1d8c @0x2
0x1d8a…1d90 at0004 = ╱9a╱ ELSE ╱ // 0x1d8e @0x4
0x1d8a…1d90 at0005 = EOL // 0x1d8f @0x5
0x1d8a…1d90 }
0x1d90…1dab ab02 4808 EXEC C(1,C4$,B1$,C2$)
0x1d90…1dab LineComalBin {
0x1d90…1dab ptr = 0xab02 // 0x1d90 @0x0
0x1d90…1dab lno = 0x12c8 // 0x1d92 @0x2
0x1d90…1dab at0004 = ╱9d╱ EXEC ╱ // 0x1d94 @0x4
0x1d90…1dab at0005 = ╱43╱C╱ // 0x1d95 @0x5
0x1d90…1dab at0006 = ╱ed╱(╱ // 0x1d96 @0x6
0x1d90…1dab at0007 = ╱31╱1╱ // 0x1d97 @0x7
0x1d90…1dab at0008 = ╱fe00008001╱ // 0x1d98 @0x8
0x1d90…1dab at000d = ╱ec╱,╱ // 0x1d9d @0xd
0x1d90…1dab at000e = ╱43╱C╱ // 0x1d9e @0xe
0x1d90…1dab at000f = ╱34╱4╱ // 0x1d9f @0xf
0x1d90…1dab at0010 = ╱ef╱$╱ // 0x1da0 @0x10
0x1d90…1dab at0011 = ╱ec╱,╱ // 0x1da1 @0x11
0x1d90…1dab at0012 = ╱42╱B╱ // 0x1da2 @0x12
0x1d90…1dab at0013 = ╱31╱1╱ // 0x1da3 @0x13
0x1d90…1dab at0014 = ╱ef╱$╱ // 0x1da4 @0x14
0x1d90…1dab at0015 = ╱ec╱,╱ // 0x1da5 @0x15
0x1d90…1dab at0016 = ╱43╱C╱ // 0x1da6 @0x16
0x1d90…1dab at0017 = ╱32╱2╱ // 0x1da7 @0x17
0x1d90…1dab at0018 = ╱ef╱$╱ // 0x1da8 @0x18
0x1d90…1dab at0019 = ╱ee╱)╱ // 0x1da9 @0x19
0x1d90…1dab at001a = EOL // 0x1daa @0x1a
0x1d90…1dab }
0x1dab…1db7 ab0e 4809 B2$=B3$
0x1dab…1db7 LineComalBin {
0x1dab…1db7 ptr = 0xab0e // 0x1dab @0x0
0x1dab…1db7 lno = 0x12c9 // 0x1dad @0x2
0x1dab…1db7 at0004 = ╱42╱B╱ // 0x1daf @0x4
0x1dab…1db7 at0005 = ╱32╱2╱ // 0x1db0 @0x5
0x1dab…1db7 at0006 = ╱ef╱$╱ // 0x1db1 @0x6
0x1dab…1db7 at0007 = ╱dc╱=╱ // 0x1db2 @0x7
0x1dab…1db7 at0008 = ╱42╱B╱ // 0x1db3 @0x8
0x1dab…1db7 at0009 = ╱33╱3╱ // 0x1db4 @0x9
0x1dab…1db7 at000a = ╱ef╱$╱ // 0x1db5 @0xa
0x1dab…1db7 at000b = EOL // 0x1db6 @0xb
0x1dab…1db7 }
0x1db7…1dcc ab23 4810 EXEC PERVERT(C2$,H0)
0x1db7…1dcc LineComalBin {
0x1db7…1dcc ptr = 0xab23 // 0x1db7 @0x0
0x1db7…1dcc lno = 0x12ca // 0x1db9 @0x2
0x1db7…1dcc at0004 = ╱9d╱ EXEC ╱ // 0x1dbb @0x4
0x1db7…1dcc at0005 = ╱50╱P╱ // 0x1dbc @0x5
0x1db7…1dcc at0006 = ╱45╱E╱ // 0x1dbd @0x6
0x1db7…1dcc at0007 = ╱52╱R╱ // 0x1dbe @0x7
0x1db7…1dcc at0008 = ╱56╱V╱ // 0x1dbf @0x8
0x1db7…1dcc at0009 = ╱45╱E╱ // 0x1dc0 @0x9
0x1db7…1dcc at000a = ╱52╱R╱ // 0x1dc1 @0xa
0x1db7…1dcc at000b = ╱54╱T╱ // 0x1dc2 @0xb
0x1db7…1dcc at000c = ╱ed╱(╱ // 0x1dc3 @0xc
0x1db7…1dcc at000d = ╱43╱C╱ // 0x1dc4 @0xd
0x1db7…1dcc at000e = ╱32╱2╱ // 0x1dc5 @0xe
0x1db7…1dcc at000f = ╱ef╱$╱ // 0x1dc6 @0xf
0x1db7…1dcc at0010 = ╱ec╱,╱ // 0x1dc7 @0x10
0x1db7…1dcc at0011 = ╱48╱H╱ // 0x1dc8 @0x11
0x1db7…1dcc at0012 = ╱30╱0╱ // 0x1dc9 @0x12
0x1db7…1dcc at0013 = ╱ee╱)╱ // 0x1dca @0x13
0x1db7…1dcc at0014 = EOL // 0x1dcb @0x14
0x1db7…1dcc }
0x1dcc…1dd2 ab29 4811 ENDIF
0x1dcc…1dd2 LineComalBin {
0x1dcc…1dd2 ptr = 0xab29 // 0x1dcc @0x0
0x1dcc…1dd2 lno = 0x12cb // 0x1dce @0x2
0x1dcc…1dd2 at0004 = ╱9b╱ ENDIF ╱ // 0x1dd0 @0x4
0x1dcc…1dd2 at0005 = EOL // 0x1dd1 @0x5
0x1dcc…1dd2 }
0x1dd2…1dd8 ab2f 4812 ENDIF
0x1dd2…1dd8 LineComalBin {
0x1dd2…1dd8 ptr = 0xab2f // 0x1dd2 @0x0
0x1dd2…1dd8 lno = 0x12cc // 0x1dd4 @0x2
0x1dd2…1dd8 at0004 = ╱9b╱ ENDIF ╱ // 0x1dd6 @0x4
0x1dd2…1dd8 at0005 = EOL // 0x1dd7 @0x5
0x1dd2…1dd8 }
0x1dd8…1df3 ab4a 4819 EXEC C(2,C3$,B2$,C1$)
0x1dd8…1df3 LineComalBin {
0x1dd8…1df3 ptr = 0xab4a // 0x1dd8 @0x0
0x1dd8…1df3 lno = 0x12d3 // 0x1dda @0x2
0x1dd8…1df3 at0004 = ╱9d╱ EXEC ╱ // 0x1ddc @0x4
0x1dd8…1df3 at0005 = ╱43╱C╱ // 0x1ddd @0x5
0x1dd8…1df3 at0006 = ╱ed╱(╱ // 0x1dde @0x6
0x1dd8…1df3 at0007 = ╱32╱2╱ // 0x1ddf @0x7
0x1dd8…1df3 at0008 = ╱fe00008002╱ // 0x1de0 @0x8
0x1dd8…1df3 at000d = ╱ec╱,╱ // 0x1de5 @0xd
0x1dd8…1df3 at000e = ╱43╱C╱ // 0x1de6 @0xe
0x1dd8…1df3 at000f = ╱33╱3╱ // 0x1de7 @0xf
0x1dd8…1df3 at0010 = ╱ef╱$╱ // 0x1de8 @0x10
0x1dd8…1df3 at0011 = ╱ec╱,╱ // 0x1de9 @0x11
0x1dd8…1df3 at0012 = ╱42╱B╱ // 0x1dea @0x12
0x1dd8…1df3 at0013 = ╱32╱2╱ // 0x1deb @0x13
0x1dd8…1df3 at0014 = ╱ef╱$╱ // 0x1dec @0x14
0x1dd8…1df3 at0015 = ╱ec╱,╱ // 0x1ded @0x15
0x1dd8…1df3 at0016 = ╱43╱C╱ // 0x1dee @0x16
0x1dd8…1df3 at0017 = ╱31╱1╱ // 0x1def @0x17
0x1dd8…1df3 at0018 = ╱ef╱$╱ // 0x1df0 @0x18
0x1dd8…1df3 at0019 = ╱ee╱)╱ // 0x1df1 @0x19
0x1dd8…1df3 at001a = EOL // 0x1df2 @0x1a
0x1dd8…1df3 }
0x1df3…1e0e ab65 4820 EXEC C(3,C1$,B4$,C1$)
0x1df3…1e0e LineComalBin {
0x1df3…1e0e ptr = 0xab65 // 0x1df3 @0x0
0x1df3…1e0e lno = 0x12d4 // 0x1df5 @0x2
0x1df3…1e0e at0004 = ╱9d╱ EXEC ╱ // 0x1df7 @0x4
0x1df3…1e0e at0005 = ╱43╱C╱ // 0x1df8 @0x5
0x1df3…1e0e at0006 = ╱ed╱(╱ // 0x1df9 @0x6
0x1df3…1e0e at0007 = ╱33╱3╱ // 0x1dfa @0x7
0x1df3…1e0e at0008 = ╱fe0000c002╱ // 0x1dfb @0x8
0x1df3…1e0e at000d = ╱ec╱,╱ // 0x1e00 @0xd
0x1df3…1e0e at000e = ╱43╱C╱ // 0x1e01 @0xe
0x1df3…1e0e at000f = ╱31╱1╱ // 0x1e02 @0xf
0x1df3…1e0e at0010 = ╱ef╱$╱ // 0x1e03 @0x10
0x1df3…1e0e at0011 = ╱ec╱,╱ // 0x1e04 @0x11
0x1df3…1e0e at0012 = ╱42╱B╱ // 0x1e05 @0x12
0x1df3…1e0e at0013 = ╱34╱4╱ // 0x1e06 @0x13
0x1df3…1e0e at0014 = ╱ef╱$╱ // 0x1e07 @0x14
0x1df3…1e0e at0015 = ╱ec╱,╱ // 0x1e08 @0x15
0x1df3…1e0e at0016 = ╱43╱C╱ // 0x1e09 @0x16
0x1df3…1e0e at0017 = ╱31╱1╱ // 0x1e0a @0x17
0x1df3…1e0e at0018 = ╱ef╱$╱ // 0x1e0b @0x18
0x1df3…1e0e at0019 = ╱ee╱)╱ // 0x1e0c @0x19
0x1df3…1e0e at001a = EOL // 0x1e0d @0x1a
0x1df3…1e0e }
0x1e0e…1e22 ab79 4830 C1$(TI,EL)="00"
0x1e0e…1e22 LineComalBin {
0x1e0e…1e22 ptr = 0xab79 // 0x1e0e @0x0
0x1e0e…1e22 lno = 0x12de // 0x1e10 @0x2
0x1e0e…1e22 at0004 = ╱43╱C╱ // 0x1e12 @0x4
0x1e0e…1e22 at0005 = ╱31╱1╱ // 0x1e13 @0x5
0x1e0e…1e22 at0006 = ╱ef╱$╱ // 0x1e14 @0x6
0x1e0e…1e22 at0007 = ╱ed╱(╱ // 0x1e15 @0x7
0x1e0e…1e22 at0008 = ╱54╱T╱ // 0x1e16 @0x8
0x1e0e…1e22 at0009 = ╱49╱I╱ // 0x1e17 @0x9
0x1e0e…1e22 at000a = ╱ec╱,╱ // 0x1e18 @0xa
0x1e0e…1e22 at000b = ╱45╱E╱ // 0x1e19 @0xb
0x1e0e…1e22 at000c = ╱4c╱L╱ // 0x1e1a @0xc
0x1e0e…1e22 at000d = ╱ee╱)╱ // 0x1e1b @0xd
0x1e0e…1e22 at000e = ╱dc╱=╱ // 0x1e1c @0xe
0x1e0e…1e22 at000f = ╱22╱"╱ // 0x1e1d @0xf
0x1e0e…1e22 at0010 = ╱30╱0╱ // 0x1e1e @0x10
0x1e0e…1e22 at0011 = ╱30╱0╱ // 0x1e1f @0x11
0x1e0e…1e22 at0012 = ╱22╱"╱ // 0x1e20 @0x12
0x1e0e…1e22 at0013 = EOL // 0x1e21 @0x13
0x1e0e…1e22 }
0x1e22…1e3a ab91 4840 EXEC OPTÆL(40,C1$)
0x1e22…1e3a LineComalBin {
0x1e22…1e3a ptr = 0xab91 // 0x1e22 @0x0
0x1e22…1e3a lno = 0x12e8 // 0x1e24 @0x2
0x1e22…1e3a at0004 = ╱9d╱ EXEC ╱ // 0x1e26 @0x4
0x1e22…1e3a at0005 = ╱4f╱O╱ // 0x1e27 @0x5
0x1e22…1e3a at0006 = ╱50╱P╱ // 0x1e28 @0x6
0x1e22…1e3a at0007 = ╱54╱T╱ // 0x1e29 @0x7
0x1e22…1e3a at0008 = ╱5b╱Æ╱ // 0x1e2a @0x8
0x1e22…1e3a at0009 = ╱4c╱L╱ // 0x1e2b @0x9
0x1e22…1e3a at000a = ╱ed╱(╱ // 0x1e2c @0xa
0x1e22…1e3a at000b = ╱34╱4╱ // 0x1e2d @0xb
0x1e22…1e3a at000c = ╱30╱0╱ // 0x1e2e @0xc
0x1e22…1e3a at000d = ╱fe0000a006╱ // 0x1e2f @0xd
0x1e22…1e3a at0012 = ╱ec╱,╱ // 0x1e34 @0x12
0x1e22…1e3a at0013 = ╱43╱C╱ // 0x1e35 @0x13
0x1e22…1e3a at0014 = ╱31╱1╱ // 0x1e36 @0x14
0x1e22…1e3a at0015 = ╱ef╱$╱ // 0x1e37 @0x15
0x1e22…1e3a at0016 = ╱ee╱)╱ // 0x1e38 @0x16
0x1e22…1e3a at0017 = EOL // 0x1e39 @0x17
0x1e22…1e3a }
0x1e3a…1e40 ab97 4860 ELSE
0x1e3a…1e40 LineComalBin {
0x1e3a…1e40 ptr = 0xab97 // 0x1e3a @0x0
0x1e3a…1e40 lno = 0x12fc // 0x1e3c @0x2
0x1e3a…1e40 at0004 = ╱9a╱ ELSE ╱ // 0x1e3e @0x4
0x1e3a…1e40 at0005 = EOL // 0x1e3f @0x5
0x1e3a…1e40 }
0x1e40…1e5e abb5 4870 F0$(70:TI)=B1$(G:TI)
0x1e40…1e5e LineComalBin {
0x1e40…1e5e ptr = 0xabb5 // 0x1e40 @0x0
0x1e40…1e5e lno = 0x1306 // 0x1e42 @0x2
0x1e40…1e5e at0004 = ╱46╱F╱ // 0x1e44 @0x4
0x1e40…1e5e at0005 = ╱30╱0╱ // 0x1e45 @0x5
0x1e40…1e5e at0006 = ╱ef╱$╱ // 0x1e46 @0x6
0x1e40…1e5e at0007 = ╱ed╱(╱ // 0x1e47 @0x7
0x1e40…1e5e at0008 = ╱37╱7╱ // 0x1e48 @0x8
0x1e40…1e5e at0009 = ╱30╱0╱ // 0x1e49 @0x9
0x1e40…1e5e at000a = ╱fe00008c07╱ // 0x1e4a @0xa
0x1e40…1e5e at000f = ╱f0╱:╱ // 0x1e4f @0xf
0x1e40…1e5e at0010 = ╱54╱T╱ // 0x1e50 @0x10
0x1e40…1e5e at0011 = ╱49╱I╱ // 0x1e51 @0x11
0x1e40…1e5e at0012 = ╱ee╱)╱ // 0x1e52 @0x12
0x1e40…1e5e at0013 = ╱dc╱=╱ // 0x1e53 @0x13
0x1e40…1e5e at0014 = ╱42╱B╱ // 0x1e54 @0x14
0x1e40…1e5e at0015 = ╱31╱1╱ // 0x1e55 @0x15
0x1e40…1e5e at0016 = ╱ef╱$╱ // 0x1e56 @0x16
0x1e40…1e5e at0017 = ╱ed╱(╱ // 0x1e57 @0x17
0x1e40…1e5e at0018 = ╱47╱G╱ // 0x1e58 @0x18
0x1e40…1e5e at0019 = ╱f0╱:╱ // 0x1e59 @0x19
0x1e40…1e5e at001a = ╱54╱T╱ // 0x1e5a @0x1a
0x1e40…1e5e at001b = ╱49╱I╱ // 0x1e5b @0x1b
0x1e40…1e5e at001c = ╱ee╱)╱ // 0x1e5c @0x1c
0x1e40…1e5e at001d = EOL // 0x1e5d @0x1d
0x1e40…1e5e }
0x1e5e…1e6a abc1 4880 C1$=B3$
0x1e5e…1e6a LineComalBin {
0x1e5e…1e6a ptr = 0xabc1 // 0x1e5e @0x0
0x1e5e…1e6a lno = 0x1310 // 0x1e60 @0x2
0x1e5e…1e6a at0004 = ╱43╱C╱ // 0x1e62 @0x4
0x1e5e…1e6a at0005 = ╱31╱1╱ // 0x1e63 @0x5
0x1e5e…1e6a at0006 = ╱ef╱$╱ // 0x1e64 @0x6
0x1e5e…1e6a at0007 = ╱dc╱=╱ // 0x1e65 @0x7
0x1e5e…1e6a at0008 = ╱42╱B╱ // 0x1e66 @0x8
0x1e5e…1e6a at0009 = ╱33╱3╱ // 0x1e67 @0x9
0x1e5e…1e6a at000a = ╱ef╱$╱ // 0x1e68 @0xa
0x1e5e…1e6a at000b = EOL // 0x1e69 @0xb
0x1e5e…1e6a }
0x1e6a…1e70 abc7 4890 ENDIF
0x1e6a…1e70 LineComalBin {
0x1e6a…1e70 ptr = 0xabc7 // 0x1e6a @0x0
0x1e6a…1e70 lno = 0x131a // 0x1e6c @0x2
0x1e6a…1e70 at0004 = ╱9b╱ ENDIF ╱ // 0x1e6e @0x4
0x1e6a…1e70 at0005 = EOL // 0x1e6f @0x5
0x1e6a…1e70 }
0x1e70…1e77 abce 4900 EXEC Å
0x1e70…1e77 LineComalBin {
0x1e70…1e77 ptr = 0xabce // 0x1e70 @0x0
0x1e70…1e77 lno = 0x1324 // 0x1e72 @0x2
0x1e70…1e77 at0004 = ╱9d╱ EXEC ╱ // 0x1e74 @0x4
0x1e70…1e77 at0005 = ╱5d╱Å╱ // 0x1e75 @0x5
0x1e70…1e77 at0006 = EOL // 0x1e76 @0x6
0x1e70…1e77 }
0x1e77…1e87 abde 4910 EXEC Z(97)
0x1e77…1e87 LineComalBin {
0x1e77…1e87 ptr = 0xabde // 0x1e77 @0x0
0x1e77…1e87 lno = 0x132e // 0x1e79 @0x2
0x1e77…1e87 at0004 = ╱9d╱ EXEC ╱ // 0x1e7b @0x4
0x1e77…1e87 at0005 = ╱5a╱Z╱ // 0x1e7c @0x5
0x1e77…1e87 at0006 = ╱ed╱(╱ // 0x1e7d @0x6
0x1e77…1e87 at0007 = ╱39╱9╱ // 0x1e7e @0x7
0x1e77…1e87 at0008 = ╱37╱7╱ // 0x1e7f @0x8
0x1e77…1e87 at0009 = ╱fe0000c207╱ // 0x1e80 @0x9
0x1e77…1e87 at000e = ╱ee╱)╱ // 0x1e85 @0xe
0x1e77…1e87 at000f = EOL // 0x1e86 @0xf
0x1e77…1e87 }
0x1e87…1e9c abf3 4915 EXEC OP(13,C1$)
0x1e87…1e9c LineComalBin {
0x1e87…1e9c ptr = 0xabf3 // 0x1e87 @0x0
0x1e87…1e9c lno = 0x1333 // 0x1e89 @0x2
0x1e87…1e9c at0004 = ╱9d╱ EXEC ╱ // 0x1e8b @0x4
0x1e87…1e9c at0005 = ╱4f╱O╱ // 0x1e8c @0x5
0x1e87…1e9c at0006 = ╱50╱P╱ // 0x1e8d @0x6
0x1e87…1e9c at0007 = ╱ed╱(╱ // 0x1e8e @0x7
0x1e87…1e9c at0008 = ╱31╱1╱ // 0x1e8f @0x8
0x1e87…1e9c at0009 = ╱33╱3╱ // 0x1e90 @0x9
0x1e87…1e9c at000a = ╱fe0000d004╱ // 0x1e91 @0xa
0x1e87…1e9c at000f = ╱ec╱,╱ // 0x1e96 @0xf
0x1e87…1e9c at0010 = ╱43╱C╱ // 0x1e97 @0x10
0x1e87…1e9c at0011 = ╱31╱1╱ // 0x1e98 @0x11
0x1e87…1e9c at0012 = ╱ef╱$╱ // 0x1e99 @0x12
0x1e87…1e9c at0013 = ╱ee╱)╱ // 0x1e9a @0x13
0x1e87…1e9c at0014 = EOL // 0x1e9b @0x14
0x1e87…1e9c }
0x1e9c…1ee1 ac38 4920 F0$(33,43)=C5$(40);F0$(45,54)=C4$(V:TI)
0x1e9c…1ee1 LineComalBin {
0x1e9c…1ee1 ptr = 0xac38 // 0x1e9c @0x0
0x1e9c…1ee1 lno = 0x1338 // 0x1e9e @0x2
0x1e9c…1ee1 at0004 = ╱46╱F╱ // 0x1ea0 @0x4
0x1e9c…1ee1 at0005 = ╱30╱0╱ // 0x1ea1 @0x5
0x1e9c…1ee1 at0006 = ╱ef╱$╱ // 0x1ea2 @0x6
0x1e9c…1ee1 at0007 = ╱ed╱(╱ // 0x1ea3 @0x7
0x1e9c…1ee1 at0008 = ╱33╱3╱ // 0x1ea4 @0x8
0x1e9c…1ee1 at0009 = ╱33╱3╱ // 0x1ea5 @0x9
0x1e9c…1ee1 at000a = ╱fe00008406╱ // 0x1ea6 @0xa
0x1e9c…1ee1 at000f = ╱ec╱,╱ // 0x1eab @0xf
0x1e9c…1ee1 at0010 = ╱34╱4╱ // 0x1eac @0x10
0x1e9c…1ee1 at0011 = ╱33╱3╱ // 0x1ead @0x11
0x1e9c…1ee1 at0012 = ╱fe0000ac06╱ // 0x1eae @0x12
0x1e9c…1ee1 at0017 = ╱ee╱)╱ // 0x1eb3 @0x17
0x1e9c…1ee1 at0018 = ╱dc╱=╱ // 0x1eb4 @0x18
0x1e9c…1ee1 at0019 = ╱43╱C╱ // 0x1eb5 @0x19
0x1e9c…1ee1 at001a = ╱35╱5╱ // 0x1eb6 @0x1a
0x1e9c…1ee1 at001b = ╱ef╱$╱ // 0x1eb7 @0x1b
0x1e9c…1ee1 at001c = ╱ed╱(╱ // 0x1eb8 @0x1c
0x1e9c…1ee1 at001d = ╱34╱4╱ // 0x1eb9 @0x1d
0x1e9c…1ee1 at001e = ╱30╱0╱ // 0x1eba @0x1e
0x1e9c…1ee1 at001f = ╱fe0000a006╱ // 0x1ebb @0x1f
0x1e9c…1ee1 at0024 = ╱ee╱)╱ // 0x1ec0 @0x24
0x1e9c…1ee1 at0025 = ╱eb╱;╱ // 0x1ec1 @0x25
0x1e9c…1ee1 at0026 = ╱46╱F╱ // 0x1ec2 @0x26
0x1e9c…1ee1 at0027 = ╱30╱0╱ // 0x1ec3 @0x27
0x1e9c…1ee1 at0028 = ╱ef╱$╱ // 0x1ec4 @0x28
0x1e9c…1ee1 at0029 = ╱ed╱(╱ // 0x1ec5 @0x29
0x1e9c…1ee1 at002a = ╱34╱4╱ // 0x1ec6 @0x2a
0x1e9c…1ee1 at002b = ╱35╱5╱ // 0x1ec7 @0x2b
0x1e9c…1ee1 at002c = ╱fe0000b406╱ // 0x1ec8 @0x2c
0x1e9c…1ee1 at0031 = ╱ec╱,╱ // 0x1ecd @0x31
0x1e9c…1ee1 at0032 = ╱35╱5╱ // 0x1ece @0x32
0x1e9c…1ee1 at0033 = ╱34╱4╱ // 0x1ecf @0x33
0x1e9c…1ee1 at0034 = ╱fe0000d806╱ // 0x1ed0 @0x34
0x1e9c…1ee1 at0039 = ╱ee╱)╱ // 0x1ed5 @0x39
0x1e9c…1ee1 at003a = ╱dc╱=╱ // 0x1ed6 @0x3a
0x1e9c…1ee1 at003b = ╱43╱C╱ // 0x1ed7 @0x3b
0x1e9c…1ee1 at003c = ╱34╱4╱ // 0x1ed8 @0x3c
0x1e9c…1ee1 at003d = ╱ef╱$╱ // 0x1ed9 @0x3d
0x1e9c…1ee1 at003e = ╱ed╱(╱ // 0x1eda @0x3e
0x1e9c…1ee1 at003f = ╱56╱V╱ // 0x1edb @0x3f
0x1e9c…1ee1 at0040 = ╱f0╱:╱ // 0x1edc @0x40
0x1e9c…1ee1 at0041 = ╱54╱T╱ // 0x1edd @0x41
0x1e9c…1ee1 at0042 = ╱49╱I╱ // 0x1ede @0x42
0x1e9c…1ee1 at0043 = ╱ee╱)╱ // 0x1edf @0x43
0x1e9c…1ee1 at0044 = EOL // 0x1ee0 @0x44
0x1e9c…1ee1 }
0x1ee1…1f26 ac7d 4930 F0$(56:6)=C3$(6:6);F0$(70:TI)=C1$(G:TI)
0x1ee1…1f26 LineComalBin {
0x1ee1…1f26 ptr = 0xac7d // 0x1ee1 @0x0
0x1ee1…1f26 lno = 0x1342 // 0x1ee3 @0x2
0x1ee1…1f26 at0004 = ╱46╱F╱ // 0x1ee5 @0x4
0x1ee1…1f26 at0005 = ╱30╱0╱ // 0x1ee6 @0x5
0x1ee1…1f26 at0006 = ╱ef╱$╱ // 0x1ee7 @0x6
0x1ee1…1f26 at0007 = ╱ed╱(╱ // 0x1ee8 @0x7
0x1ee1…1f26 at0008 = ╱35╱5╱ // 0x1ee9 @0x8
0x1ee1…1f26 at0009 = ╱36╱6╱ // 0x1eea @0x9
0x1ee1…1f26 at000a = ╱fe0000e006╱ // 0x1eeb @0xa
0x1ee1…1f26 at000f = ╱f0╱:╱ // 0x1ef0 @0xf
0x1ee1…1f26 at0010 = ╱36╱6╱ // 0x1ef1 @0x10
0x1ee1…1f26 at0011 = ╱fe0000c003╱ // 0x1ef2 @0x11
0x1ee1…1f26 at0016 = ╱ee╱)╱ // 0x1ef7 @0x16
0x1ee1…1f26 at0017 = ╱dc╱=╱ // 0x1ef8 @0x17
0x1ee1…1f26 at0018 = ╱43╱C╱ // 0x1ef9 @0x18
0x1ee1…1f26 at0019 = ╱33╱3╱ // 0x1efa @0x19
0x1ee1…1f26 at001a = ╱ef╱$╱ // 0x1efb @0x1a
0x1ee1…1f26 at001b = ╱ed╱(╱ // 0x1efc @0x1b
0x1ee1…1f26 at001c = ╱36╱6╱ // 0x1efd @0x1c
0x1ee1…1f26 at001d = ╱fe0000c003╱ // 0x1efe @0x1d
0x1ee1…1f26 at0022 = ╱f0╱:╱ // 0x1f03 @0x22
0x1ee1…1f26 at0023 = ╱36╱6╱ // 0x1f04 @0x23
0x1ee1…1f26 at0024 = ╱fe0000c003╱ // 0x1f05 @0x24
0x1ee1…1f26 at0029 = ╱ee╱)╱ // 0x1f0a @0x29
0x1ee1…1f26 at002a = ╱eb╱;╱ // 0x1f0b @0x2a
0x1ee1…1f26 at002b = ╱46╱F╱ // 0x1f0c @0x2b
0x1ee1…1f26 at002c = ╱30╱0╱ // 0x1f0d @0x2c
0x1ee1…1f26 at002d = ╱ef╱$╱ // 0x1f0e @0x2d
0x1ee1…1f26 at002e = ╱ed╱(╱ // 0x1f0f @0x2e
0x1ee1…1f26 at002f = ╱37╱7╱ // 0x1f10 @0x2f
0x1ee1…1f26 at0030 = ╱30╱0╱ // 0x1f11 @0x30
0x1ee1…1f26 at0031 = ╱fe00008c07╱ // 0x1f12 @0x31
0x1ee1…1f26 at0036 = ╱f0╱:╱ // 0x1f17 @0x36
0x1ee1…1f26 at0037 = ╱54╱T╱ // 0x1f18 @0x37
0x1ee1…1f26 at0038 = ╱49╱I╱ // 0x1f19 @0x38
0x1ee1…1f26 at0039 = ╱ee╱)╱ // 0x1f1a @0x39
0x1ee1…1f26 at003a = ╱dc╱=╱ // 0x1f1b @0x3a
0x1ee1…1f26 at003b = ╱43╱C╱ // 0x1f1c @0x3b
0x1ee1…1f26 at003c = ╱31╱1╱ // 0x1f1d @0x3c
0x1ee1…1f26 at003d = ╱ef╱$╱ // 0x1f1e @0x3d
0x1ee1…1f26 at003e = ╱ed╱(╱ // 0x1f1f @0x3e
0x1ee1…1f26 at003f = ╱47╱G╱ // 0x1f20 @0x3f
0x1ee1…1f26 at0040 = ╱f0╱:╱ // 0x1f21 @0x40
0x1ee1…1f26 at0041 = ╱54╱T╱ // 0x1f22 @0x41
0x1ee1…1f26 at0042 = ╱49╱I╱ // 0x1f23 @0x42
0x1ee1…1f26 at0043 = ╱ee╱)╱ // 0x1f24 @0x43
0x1ee1…1f26 at0044 = EOL // 0x1f25 @0x44
0x1ee1…1f26 }
0x1f26…1f2d ac84 4940 EXEC Å
0x1f26…1f2d LineComalBin {
0x1f26…1f2d ptr = 0xac84 // 0x1f26 @0x0
0x1f26…1f2d lno = 0x134c // 0x1f28 @0x2
0x1f26…1f2d at0004 = ╱9d╱ EXEC ╱ // 0x1f2a @0x4
0x1f26…1f2d at0005 = ╱5d╱Å╱ // 0x1f2b @0x5
0x1f26…1f2d at0006 = EOL // 0x1f2c @0x6
0x1f26…1f2d }
0x1f2d…1f48 ac9f 4950 EXEC C(0,C1$,B1$,C2$)
0x1f2d…1f48 LineComalBin {
0x1f2d…1f48 ptr = 0xac9f // 0x1f2d @0x0
0x1f2d…1f48 lno = 0x1356 // 0x1f2f @0x2
0x1f2d…1f48 at0004 = ╱9d╱ EXEC ╱ // 0x1f31 @0x4
0x1f2d…1f48 at0005 = ╱43╱C╱ // 0x1f32 @0x5
0x1f2d…1f48 at0006 = ╱ed╱(╱ // 0x1f33 @0x6
0x1f2d…1f48 at0007 = ╱30╱0╱ // 0x1f34 @0x7
0x1f2d…1f48 at0008 = ╱fe00000000╱ // 0x1f35 @0x8
0x1f2d…1f48 at000d = ╱ec╱,╱ // 0x1f3a @0xd
0x1f2d…1f48 at000e = ╱43╱C╱ // 0x1f3b @0xe
0x1f2d…1f48 at000f = ╱31╱1╱ // 0x1f3c @0xf
0x1f2d…1f48 at0010 = ╱ef╱$╱ // 0x1f3d @0x10
0x1f2d…1f48 at0011 = ╱ec╱,╱ // 0x1f3e @0x11
0x1f2d…1f48 at0012 = ╱42╱B╱ // 0x1f3f @0x12
0x1f2d…1f48 at0013 = ╱31╱1╱ // 0x1f40 @0x13
0x1f2d…1f48 at0014 = ╱ef╱$╱ // 0x1f41 @0x14
0x1f2d…1f48 at0015 = ╱ec╱,╱ // 0x1f42 @0x15
0x1f2d…1f48 at0016 = ╱43╱C╱ // 0x1f43 @0x16
0x1f2d…1f48 at0017 = ╱32╱2╱ // 0x1f44 @0x17
0x1f2d…1f48 at0018 = ╱ef╱$╱ // 0x1f45 @0x18
0x1f2d…1f48 at0019 = ╱ee╱)╱ // 0x1f46 @0x19
0x1f2d…1f48 at001a = EOL // 0x1f47 @0x1a
0x1f2d…1f48 }
0x1f48…1f58 (104,) acaf 4960 EXEC Z(98)
0x1f48…1f58 LineComalBin {
0x1f48…1f58 ptr = 0xacaf // 0x1f48 @0x0
0x1f48…1f58 lno = 0x1360 // 0x1f4a @0x2
0x1f48…1f58 at0004 = ╱9d╱ EXEC ╱ // 0x1f4c @0x4
0x1f48…1f58 at0005 = ╱5a╱Z╱ // 0x1f4d @0x5
0x1f48…1f58 at0006 = ╱ed╱(╱ // 0x1f4e @0x6
0x1f48…1f58 at0007 = ╱39╱9╱ // 0x1f4f @0x7
0x1f48…1f58 at0008 = ╱38╱8╱ // 0x1f50 @0x8
0x1f48…1f58 at0009 = ╱fe0000c407╱ // 0x1f51 @0x9
0x1f48…1f58 at000e = ╱ee╱)╱ // 0x1f56 @0xe
0x1f48…1f58 at000f = EOL // 0x1f57 @0xf
0x1f48…1f58 }
0x1f58…1f90 ace7 4970 F0$(64+6*(C2$(12)="-"):TI)=C2$(G:TI)
0x1f58…1f90 LineComalBin {
0x1f58…1f90 ptr = 0xace7 // 0x1f58 @0x0
0x1f58…1f90 lno = 0x136a // 0x1f5a @0x2
0x1f58…1f90 at0004 = ╱46╱F╱ // 0x1f5c @0x4
0x1f58…1f90 at0005 = ╱30╱0╱ // 0x1f5d @0x5
0x1f58…1f90 at0006 = ╱ef╱$╱ // 0x1f5e @0x6
0x1f58…1f90 at0007 = ╱ed╱(╱ // 0x1f5f @0x7
0x1f58…1f90 at0008 = ╱36╱6╱ // 0x1f60 @0x8
0x1f58…1f90 at0009 = ╱34╱4╱ // 0x1f61 @0x9
0x1f58…1f90 at000a = ╱fe00008007╱ // 0x1f62 @0xa
0x1f58…1f90 at000f = ╱e2╱+╱ // 0x1f67 @0xf
0x1f58…1f90 at0010 = ╱36╱6╱ // 0x1f68 @0x10
0x1f58…1f90 at0011 = ╱fe0000c003╱ // 0x1f69 @0x11
0x1f58…1f90 at0016 = ╱e4╱*╱ // 0x1f6e @0x16
0x1f58…1f90 at0017 = ╱ed╱(╱ // 0x1f6f @0x17
0x1f58…1f90 at0018 = ╱43╱C╱ // 0x1f70 @0x18
0x1f58…1f90 at0019 = ╱32╱2╱ // 0x1f71 @0x19
0x1f58…1f90 at001a = ╱ef╱$╱ // 0x1f72 @0x1a
0x1f58…1f90 at001b = ╱ed╱(╱ // 0x1f73 @0x1b
0x1f58…1f90 at001c = ╱31╱1╱ // 0x1f74 @0x1c
0x1f58…1f90 at001d = ╱32╱2╱ // 0x1f75 @0x1d
0x1f58…1f90 at001e = ╱fe0000c004╱ // 0x1f76 @0x1e
0x1f58…1f90 at0023 = ╱ee╱)╱ // 0x1f7b @0x23
0x1f58…1f90 at0024 = ╱dc╱=╱ // 0x1f7c @0x24
0x1f58…1f90 at0025 = ╱22╱"╱ // 0x1f7d @0x25
0x1f58…1f90 at0026 = ╱2d╱-╱ // 0x1f7e @0x26
0x1f58…1f90 at0027 = ╱22╱"╱ // 0x1f7f @0x27
0x1f58…1f90 at0028 = ╱ee╱)╱ // 0x1f80 @0x28
0x1f58…1f90 at0029 = ╱f0╱:╱ // 0x1f81 @0x29
0x1f58…1f90 at002a = ╱54╱T╱ // 0x1f82 @0x2a
0x1f58…1f90 at002b = ╱49╱I╱ // 0x1f83 @0x2b
0x1f58…1f90 at002c = ╱ee╱)╱ // 0x1f84 @0x2c
0x1f58…1f90 at002d = ╱dc╱=╱ // 0x1f85 @0x2d
0x1f58…1f90 at002e = ╱43╱C╱ // 0x1f86 @0x2e
0x1f58…1f90 at002f = ╱32╱2╱ // 0x1f87 @0x2f
0x1f58…1f90 at0030 = ╱ef╱$╱ // 0x1f88 @0x30
0x1f58…1f90 at0031 = ╱ed╱(╱ // 0x1f89 @0x31
0x1f58…1f90 at0032 = ╱47╱G╱ // 0x1f8a @0x32
0x1f58…1f90 at0033 = ╱f0╱:╱ // 0x1f8b @0x33
0x1f58…1f90 at0034 = ╱54╱T╱ // 0x1f8c @0x34
0x1f58…1f90 at0035 = ╱49╱I╱ // 0x1f8d @0x35
0x1f58…1f90 at0036 = ╱ee╱)╱ // 0x1f8e @0x36
0x1f58…1f90 at0037 = EOL // 0x1f8f @0x37
0x1f58…1f90 }
0x1f90…1f97 acee 4980 EXEC Å
0x1f90…1f97 LineComalBin {
0x1f90…1f97 ptr = 0xacee // 0x1f90 @0x0
0x1f90…1f97 lno = 0x1374 // 0x1f92 @0x2
0x1f90…1f97 at0004 = ╱9d╱ EXEC ╱ // 0x1f94 @0x4
0x1f90…1f97 at0005 = ╱5d╱Å╱ // 0x1f95 @0x5
0x1f90…1f97 at0006 = EOL // 0x1f96 @0x6
0x1f90…1f97 }
0x1f97…1fa3 acfa 4990 J6=J6+V
0x1f97…1fa3 LineComalBin {
0x1f97…1fa3 ptr = 0xacfa // 0x1f97 @0x0
0x1f97…1fa3 lno = 0x137e // 0x1f99 @0x2
0x1f97…1fa3 at0004 = ╱4a╱J╱ // 0x1f9b @0x4
0x1f97…1fa3 at0005 = ╱36╱6╱ // 0x1f9c @0x5
0x1f97…1fa3 at0006 = ╱dc╱=╱ // 0x1f9d @0x6
0x1f97…1fa3 at0007 = ╱4a╱J╱ // 0x1f9e @0x7
0x1f97…1fa3 at0008 = ╱36╱6╱ // 0x1f9f @0x8
0x1f97…1fa3 at0009 = ╱e2╱+╱ // 0x1fa0 @0x9
0x1f97…1fa3 at000a = ╱56╱V╱ // 0x1fa1 @0xa
0x1f97…1fa3 at000b = EOL // 0x1fa2 @0xb
0x1f97…1fa3 }
0x1fa3…1fa9 ad00 5000 ENDPROC
0x1fa3…1fa9 LineComalBin {
0x1fa3…1fa9 ptr = 0xad00 // 0x1fa3 @0x0
0x1fa3…1fa9 lno = 0x1388 // 0x1fa5 @0x2
0x1fa3…1fa9 at0004 = ╱9f╱ ENDPROC ╱ // 0x1fa7 @0x4
0x1fa3…1fa9 at0005 = EOL // 0x1fa8 @0x5
0x1fa3…1fa9 }
0x1fa9…1fb8 ad0f 5010 PROC BEREGNLØN
0x1fa9…1fb8 LineComalBin {
0x1fa9…1fb8 ptr = 0xad0f // 0x1fa9 @0x0
0x1fa9…1fb8 lno = 0x1392 // 0x1fab @0x2
0x1fa9…1fb8 at0004 = ╱9e╱ PROC ╱ // 0x1fad @0x4
0x1fa9…1fb8 at0005 = ╱42╱B╱ // 0x1fae @0x5
0x1fa9…1fb8 at0006 = ╱45╱E╱ // 0x1faf @0x6
0x1fa9…1fb8 at0007 = ╱52╱R╱ // 0x1fb0 @0x7
0x1fa9…1fb8 at0008 = ╱45╱E╱ // 0x1fb1 @0x8
0x1fa9…1fb8 at0009 = ╱47╱G╱ // 0x1fb2 @0x9
0x1fa9…1fb8 at000a = ╱4e╱N╱ // 0x1fb3 @0xa
0x1fa9…1fb8 at000b = ╱4c╱L╱ // 0x1fb4 @0xb
0x1fa9…1fb8 at000c = ╱5c╱Ø╱ // 0x1fb5 @0xc
0x1fa9…1fb8 at000d = ╱4e╱N╱ // 0x1fb6 @0xd
0x1fa9…1fb8 at000e = EOL // 0x1fb7 @0xe
0x1fa9…1fb8 }
0x1fb8…1fcb ad22 5020 L0=(F8-E)*J0+E
0x1fb8…1fcb LineComalBin {
0x1fb8…1fcb ptr = 0xad22 // 0x1fb8 @0x0
0x1fb8…1fcb lno = 0x139c // 0x1fba @0x2
0x1fb8…1fcb at0004 = ╱4c╱L╱ // 0x1fbc @0x4
0x1fb8…1fcb at0005 = ╱30╱0╱ // 0x1fbd @0x5
0x1fb8…1fcb at0006 = ╱dc╱=╱ // 0x1fbe @0x6
0x1fb8…1fcb at0007 = ╱ed╱(╱ // 0x1fbf @0x7
0x1fb8…1fcb at0008 = ╱46╱F╱ // 0x1fc0 @0x8
0x1fb8…1fcb at0009 = ╱38╱8╱ // 0x1fc1 @0x9
0x1fb8…1fcb at000a = ╱e3╱-╱ // 0x1fc2 @0xa
0x1fb8…1fcb at000b = ╱45╱E╱ // 0x1fc3 @0xb
0x1fb8…1fcb at000c = ╱ee╱)╱ // 0x1fc4 @0xc
0x1fb8…1fcb at000d = ╱e4╱*╱ // 0x1fc5 @0xd
0x1fb8…1fcb at000e = ╱4a╱J╱ // 0x1fc6 @0xe
0x1fb8…1fcb at000f = ╱30╱0╱ // 0x1fc7 @0xf
0x1fb8…1fcb at0010 = ╱e2╱+╱ // 0x1fc8 @0x10
0x1fb8…1fcb at0011 = ╱45╱E╱ // 0x1fc9 @0x11
0x1fb8…1fcb at0012 = EOL // 0x1fca @0x12
0x1fb8…1fcb }
0x1fcb…1fdb ad32 5030 GET D7$,L0:D6$
0x1fcb…1fdb LineComalBin {
0x1fcb…1fdb ptr = 0xad32 // 0x1fcb @0x0
0x1fcb…1fdb lno = 0x13a6 // 0x1fcd @0x2
0x1fcb…1fdb at0004 = ╱a9╱ GET ╱ // 0x1fcf @0x4
0x1fcb…1fdb at0005 = ╱44╱D╱ // 0x1fd0 @0x5
0x1fcb…1fdb at0006 = ╱37╱7╱ // 0x1fd1 @0x6
0x1fcb…1fdb at0007 = ╱ef╱$╱ // 0x1fd2 @0x7
0x1fcb…1fdb at0008 = ╱ec╱,╱ // 0x1fd3 @0x8
0x1fcb…1fdb at0009 = ╱4c╱L╱ // 0x1fd4 @0x9
0x1fcb…1fdb at000a = ╱30╱0╱ // 0x1fd5 @0xa
0x1fcb…1fdb at000b = ╱f0╱:╱ // 0x1fd6 @0xb
0x1fcb…1fdb at000c = ╱44╱D╱ // 0x1fd7 @0xc
0x1fcb…1fdb at000d = ╱36╱6╱ // 0x1fd8 @0xd
0x1fcb…1fdb at000e = ╱ef╱$╱ // 0x1fd9 @0xe
0x1fcb…1fdb at000f = EOL // 0x1fda @0xf
0x1fcb…1fdb }
0x1fdb…1fec ad43 5040 IF D6$(E)="1" THEN
0x1fdb…1fec LineComalBin {
0x1fdb…1fec ptr = 0xad43 // 0x1fdb @0x0
0x1fdb…1fec lno = 0x13b0 // 0x1fdd @0x2
0x1fdb…1fec at0004 = ╱9c╱ IF ╱ // 0x1fdf @0x4
0x1fdb…1fec at0005 = ╱44╱D╱ // 0x1fe0 @0x5
0x1fdb…1fec at0006 = ╱36╱6╱ // 0x1fe1 @0x6
0x1fdb…1fec at0007 = ╱ef╱$╱ // 0x1fe2 @0x7
0x1fdb…1fec at0008 = ╱ed╱(╱ // 0x1fe3 @0x8
0x1fdb…1fec at0009 = ╱45╱E╱ // 0x1fe4 @0x9
0x1fdb…1fec at000a = ╱ee╱)╱ // 0x1fe5 @0xa
0x1fdb…1fec at000b = ╱dc╱=╱ // 0x1fe6 @0xb
0x1fdb…1fec at000c = ╱22╱"╱ // 0x1fe7 @0xc
0x1fdb…1fec at000d = ╱31╱1╱ // 0x1fe8 @0xd
0x1fdb…1fec at000e = ╱22╱"╱ // 0x1fe9 @0xe
0x1fdb…1fec at000f = ╱b6╱ THEN ╱ // 0x1fea @0xf
0x1fdb…1fec at0010 = EOL // 0x1feb @0x10
0x1fdb…1fec }
0x1fec…1ffc ad53 5042 FOR I=E TO 8
0x1fec…1ffc LineComalBin {
0x1fec…1ffc ptr = 0xad53 // 0x1fec @0x0
0x1fec…1ffc lno = 0x13b2 // 0x1fee @0x2
0x1fec…1ffc at0004 = ╱83╱ FOR ╱ // 0x1ff0 @0x4
0x1fec…1ffc at0005 = ╱49╱I╱ // 0x1ff1 @0x5
0x1fec…1ffc at0006 = ╱dc╱=╱ // 0x1ff2 @0x6
0x1fec…1ffc at0007 = ╱45╱E╱ // 0x1ff3 @0x7
0x1fec…1ffc at0008 = ╱b7╱ TO ╱ // 0x1ff4 @0x8
0x1fec…1ffc at0009 = ╱38╱8╱ // 0x1ff5 @0x9
0x1fec…1ffc at000a = ╱fe00008004╱ // 0x1ff6 @0xa
0x1fec…1ffc at000f = EOL // 0x1ffb @0xf
0x1fec…1ffc }
0x1ffc…2011 ad68 5044 B9$(I)=B3$(G:EL)
0x1ffc…2011 LineComalBin {
0x1ffc…2011 ptr = 0xad68 // 0x1ffc @0x0
0x1ffc…2011 lno = 0x13b4 // 0x1ffe @0x2
0x1ffc…2011 at0004 = ╱42╱B╱ // 0x2000 @0x4
0x1ffc…2011 at0005 = ╱39╱9╱ // 0x2001 @0x5
0x1ffc…2011 at0006 = ╱ef╱$╱ // 0x2002 @0x6
0x1ffc…2011 at0007 = ╱ed╱(╱ // 0x2003 @0x7
0x1ffc…2011 at0008 = ╱49╱I╱ // 0x2004 @0x8
0x1ffc…2011 at0009 = ╱ee╱)╱ // 0x2005 @0x9
0x1ffc…2011 at000a = ╱dc╱=╱ // 0x2006 @0xa
0x1ffc…2011 at000b = ╱42╱B╱ // 0x2007 @0xb
0x1ffc…2011 at000c = ╱33╱3╱ // 0x2008 @0xc
0x1ffc…2011 at000d = ╱ef╱$╱ // 0x2009 @0xd
0x1ffc…2011 at000e = ╱ed╱(╱ // 0x200a @0xe
0x1ffc…2011 at000f = ╱47╱G╱ // 0x200b @0xf
0x1ffc…2011 at0010 = ╱f0╱:╱ // 0x200c @0x10
0x1ffc…2011 at0011 = ╱45╱E╱ // 0x200d @0x11
0x1ffc…2011 at0012 = ╱4c╱L╱ // 0x200e @0x12
0x1ffc…2011 at0013 = ╱ee╱)╱ // 0x200f @0x13
0x1ffc…2011 at0014 = EOL // 0x2010 @0x14
0x1ffc…2011 }
0x2011…2018 ad6f 5046 NEXT I
0x2011…2018 LineComalBin {
0x2011…2018 ptr = 0xad6f // 0x2011 @0x0
0x2011…2018 lno = 0x13b6 // 0x2013 @0x2
0x2011…2018 at0004 = ╱84╱ NEXT ╱ // 0x2015 @0x4
0x2011…2018 at0005 = ╱49╱I╱ // 0x2016 @0x5
0x2011…2018 at0006 = EOL // 0x2017 @0x6
0x2011…2018 }
0x2018…2021 ad78 5050 L1=E
0x2018…2021 LineComalBin {
0x2018…2021 ptr = 0xad78 // 0x2018 @0x0
0x2018…2021 lno = 0x13ba // 0x201a @0x2
0x2018…2021 at0004 = ╱4c╱L╱ // 0x201c @0x4
0x2018…2021 at0005 = ╱31╱1╱ // 0x201d @0x5
0x2018…2021 at0006 = ╱dc╱=╱ // 0x201e @0x6
0x2018…2021 at0007 = ╱45╱E╱ // 0x201f @0x7
0x2018…2021 at0008 = EOL // 0x2020 @0x8
0x2018…2021 }
0x2021…202a ad81 5060 L2=B
0x2021…202a LineComalBin {
0x2021…202a ptr = 0xad81 // 0x2021 @0x0
0x2021…202a lno = 0x13c4 // 0x2023 @0x2
0x2021…202a at0004 = ╱4c╱L╱ // 0x2025 @0x4
0x2021…202a at0005 = ╱32╱2╱ // 0x2026 @0x5
0x2021…202a at0006 = ╱dc╱=╱ // 0x2027 @0x6
0x2021…202a at0007 = ╱42╱B╱ // 0x2028 @0x7
0x2021…202a at0008 = EOL // 0x2029 @0x8
0x2021…202a }
0x202a…2039 ad90 5062 D6$(E)="2"
0x202a…2039 LineComalBin {
0x202a…2039 ptr = 0xad90 // 0x202a @0x0
0x202a…2039 lno = 0x13c6 // 0x202c @0x2
0x202a…2039 at0004 = ╱44╱D╱ // 0x202e @0x4
0x202a…2039 at0005 = ╱36╱6╱ // 0x202f @0x5
0x202a…2039 at0006 = ╱ef╱$╱ // 0x2030 @0x6
0x202a…2039 at0007 = ╱ed╱(╱ // 0x2031 @0x7
0x202a…2039 at0008 = ╱45╱E╱ // 0x2032 @0x8
0x202a…2039 at0009 = ╱ee╱)╱ // 0x2033 @0x9
0x202a…2039 at000a = ╱dc╱=╱ // 0x2034 @0xa
0x202a…2039 at000b = ╱22╱"╱ // 0x2035 @0xb
0x202a…2039 at000c = ╱32╱2╱ // 0x2036 @0xc
0x202a…2039 at000d = ╱22╱"╱ // 0x2037 @0xd
0x202a…2039 at000e = EOL // 0x2038 @0xe
0x202a…2039 }
0x2039…2049 ada0 5064 PUT D7$,L0:D6$
0x2039…2049 LineComalBin {
0x2039…2049 ptr = 0xada0 // 0x2039 @0x0
0x2039…2049 lno = 0x13c8 // 0x203b @0x2
0x2039…2049 at0004 = ╱aa╱ PUT ╱ // 0x203d @0x4
0x2039…2049 at0005 = ╱44╱D╱ // 0x203e @0x5
0x2039…2049 at0006 = ╱37╱7╱ // 0x203f @0x6
0x2039…2049 at0007 = ╱ef╱$╱ // 0x2040 @0x7
0x2039…2049 at0008 = ╱ec╱,╱ // 0x2041 @0x8
0x2039…2049 at0009 = ╱4c╱L╱ // 0x2042 @0x9
0x2039…2049 at000a = ╱30╱0╱ // 0x2043 @0xa
0x2039…2049 at000b = ╱f0╱:╱ // 0x2044 @0xb
0x2039…2049 at000c = ╱44╱D╱ // 0x2045 @0xc
0x2039…2049 at000d = ╱36╱6╱ // 0x2046 @0xd
0x2039…2049 at000e = ╱ef╱$╱ // 0x2047 @0xe
0x2039…2049 at000f = EOL // 0x2048 @0xf
0x2039…2049 }
0x2049…2061 adb8 5070 EXEC SKRIVHOVED(1)
0x2049…2061 LineComalBin {
0x2049…2061 ptr = 0xadb8 // 0x2049 @0x0
0x2049…2061 lno = 0x13ce // 0x204b @0x2
0x2049…2061 at0004 = ╱9d╱ EXEC ╱ // 0x204d @0x4
0x2049…2061 at0005 = ╱53╱S╱ // 0x204e @0x5
0x2049…2061 at0006 = ╱4b╱K╱ // 0x204f @0x6
0x2049…2061 at0007 = ╱52╱R╱ // 0x2050 @0x7
0x2049…2061 at0008 = ╱49╱I╱ // 0x2051 @0x8
0x2049…2061 at0009 = ╱56╱V╱ // 0x2052 @0x9
0x2049…2061 at000a = ╱48╱H╱ // 0x2053 @0xa
0x2049…2061 at000b = ╱4f╱O╱ // 0x2054 @0xb
0x2049…2061 at000c = ╱56╱V╱ // 0x2055 @0xc
0x2049…2061 at000d = ╱45╱E╱ // 0x2056 @0xd
0x2049…2061 at000e = ╱44╱D╱ // 0x2057 @0xe
0x2049…2061 at000f = ╱ed╱(╱ // 0x2058 @0xf
0x2049…2061 at0010 = ╱31╱1╱ // 0x2059 @0x10
0x2049…2061 at0011 = ╱fe00008001╱ // 0x205a @0x11
0x2049…2061 at0016 = ╱ee╱)╱ // 0x205f @0x16
0x2049…2061 at0017 = EOL // 0x2060 @0x17
0x2049…2061 }
0x2061…206d adc4 5080 EXEC INDTÆL
0x2061…206d LineComalBin {
0x2061…206d ptr = 0xadc4 // 0x2061 @0x0
0x2061…206d lno = 0x13d8 // 0x2063 @0x2
0x2061…206d at0004 = ╱9d╱ EXEC ╱ // 0x2065 @0x4
0x2061…206d at0005 = ╱49╱I╱ // 0x2066 @0x5
0x2061…206d at0006 = ╱4e╱N╱ // 0x2067 @0x6
0x2061…206d at0007 = ╱44╱D╱ // 0x2068 @0x7
0x2061…206d at0008 = ╱54╱T╱ // 0x2069 @0x8
0x2061…206d at0009 = ╱5b╱Æ╱ // 0x206a @0x9
0x2061…206d at000a = ╱4c╱L╱ // 0x206b @0xa
0x2061…206d at000b = EOL // 0x206c @0xb
0x2061…206d }
0x206d…2073 adca 5090 REPEAT
0x206d…2073 LineComalBin {
0x206d…2073 ptr = 0xadca // 0x206d @0x0
0x206d…2073 lno = 0x13e2 // 0x206f @0x2
0x206d…2073 at0004 = ╱97╱ REPEAT ╱ // 0x2071 @0x4
0x206d…2073 at0005 = EOL // 0x2072 @0x5
0x206d…2073 }
0x2073…208c ade3 5100 J5=ORD(D6$(V))-48
0x2073…208c LineComalBin {
0x2073…208c ptr = 0xade3 // 0x2073 @0x0
0x2073…208c lno = 0x13ec // 0x2075 @0x2
0x2073…208c at0004 = ╱4a╱J╱ // 0x2077 @0x4
0x2073…208c at0005 = ╱35╱5╱ // 0x2078 @0x5
0x2073…208c at0006 = ╱dc╱=╱ // 0x2079 @0x6
0x2073…208c at0007 = ╱cd╱ORD╱ // 0x207a @0x7
0x2073…208c at0008 = ╱ed╱(╱ // 0x207b @0x8
0x2073…208c at0009 = ╱44╱D╱ // 0x207c @0x9
0x2073…208c at000a = ╱36╱6╱ // 0x207d @0xa
0x2073…208c at000b = ╱ef╱$╱ // 0x207e @0xb
0x2073…208c at000c = ╱ed╱(╱ // 0x207f @0xc
0x2073…208c at000d = ╱56╱V╱ // 0x2080 @0xd
0x2073…208c at000e = ╱ee╱)╱ // 0x2081 @0xe
0x2073…208c at000f = ╱ee╱)╱ // 0x2082 @0xf
0x2073…208c at0010 = ╱e3╱-╱ // 0x2083 @0x10
0x2073…208c at0011 = ╱34╱4╱ // 0x2084 @0x11
0x2073…208c at0012 = ╱38╱8╱ // 0x2085 @0x12
0x2073…208c at0013 = ╱fe0000c006╱ // 0x2086 @0x13
0x2073…208c at0018 = EOL // 0x208b @0x18
0x2073…208c }
0x208c…20c1 ae18 5110 IF D6$(4)<>" " THEN J5=J5*TI+ORD(D6$(4))-48
0x208c…20c1 LineComalBin {
0x208c…20c1 ptr = 0xae18 // 0x208c @0x0
0x208c…20c1 lno = 0x13f6 // 0x208e @0x2
0x208c…20c1 at0004 = ╱82╱ IF ╱ // 0x2090 @0x4
0x208c…20c1 at0005 = ╱44╱D╱ // 0x2091 @0x5
0x208c…20c1 at0006 = ╱36╱6╱ // 0x2092 @0x6
0x208c…20c1 at0007 = ╱ef╱$╱ // 0x2093 @0x7
0x208c…20c1 at0008 = ╱ed╱(╱ // 0x2094 @0x8
0x208c…20c1 at0009 = ╱34╱4╱ // 0x2095 @0x9
0x208c…20c1 at000a = ╱fe00008003╱ // 0x2096 @0xa
0x208c…20c1 at000f = ╱ee╱)╱ // 0x209b @0xf
0x208c…20c1 at0010 = ╱e1╱<>╱ // 0x209c @0x10
0x208c…20c1 at0011 = ╱22╱"╱ // 0x209d @0x11
0x208c…20c1 at0012 = ╱20╱…╱ // 0x209e @0x12
0x208c…20c1 at0013 = ╱22╱"╱ // 0x209f @0x13
0x208c…20c1 at0014 = ╱b6╱ THEN ╱ // 0x20a0 @0x14
0x208c…20c1 at0015 = ╱4a╱J╱ // 0x20a1 @0x15
0x208c…20c1 at0016 = ╱35╱5╱ // 0x20a2 @0x16
0x208c…20c1 at0017 = ╱dc╱=╱ // 0x20a3 @0x17
0x208c…20c1 at0018 = ╱4a╱J╱ // 0x20a4 @0x18
0x208c…20c1 at0019 = ╱35╱5╱ // 0x20a5 @0x19
0x208c…20c1 at001a = ╱e4╱*╱ // 0x20a6 @0x1a
0x208c…20c1 at001b = ╱54╱T╱ // 0x20a7 @0x1b
0x208c…20c1 at001c = ╱49╱I╱ // 0x20a8 @0x1c
0x208c…20c1 at001d = ╱e2╱+╱ // 0x20a9 @0x1d
0x208c…20c1 at001e = ╱cd╱ORD╱ // 0x20aa @0x1e
0x208c…20c1 at001f = ╱ed╱(╱ // 0x20ab @0x1f
0x208c…20c1 at0020 = ╱44╱D╱ // 0x20ac @0x20
0x208c…20c1 at0021 = ╱36╱6╱ // 0x20ad @0x21
0x208c…20c1 at0022 = ╱ef╱$╱ // 0x20ae @0x22
0x208c…20c1 at0023 = ╱ed╱(╱ // 0x20af @0x23
0x208c…20c1 at0024 = ╱34╱4╱ // 0x20b0 @0x24
0x208c…20c1 at0025 = ╱fe00008003╱ // 0x20b1 @0x25
0x208c…20c1 at002a = ╱ee╱)╱ // 0x20b6 @0x2a
0x208c…20c1 at002b = ╱ee╱)╱ // 0x20b7 @0x2b
0x208c…20c1 at002c = ╱e3╱-╱ // 0x20b8 @0x2c
0x208c…20c1 at002d = ╱34╱4╱ // 0x20b9 @0x2d
0x208c…20c1 at002e = ╱38╱8╱ // 0x20ba @0x2e
0x208c…20c1 at002f = ╱fe0000c006╱ // 0x20bb @0x2f
0x208c…20c1 at0034 = EOL // 0x20c0 @0x34
0x208c…20c1 }
0x20c1…20e8 ae3f 5120 IF J5<78 AND J5<>60 AND J5<>70 THEN
0x20c1…20e8 LineComalBin {
0x20c1…20e8 ptr = 0xae3f // 0x20c1 @0x0
0x20c1…20e8 lno = 0x1400 // 0x20c3 @0x2
0x20c1…20e8 at0004 = ╱9c╱ IF ╱ // 0x20c5 @0x4
0x20c1…20e8 at0005 = ╱4a╱J╱ // 0x20c6 @0x5
0x20c1…20e8 at0006 = ╱35╱5╱ // 0x20c7 @0x6
0x20c1…20e8 at0007 = ╱dd╱<╱ // 0x20c8 @0x7
0x20c1…20e8 at0008 = ╱37╱7╱ // 0x20c9 @0x8
0x20c1…20e8 at0009 = ╱38╱8╱ // 0x20ca @0x9
0x20c1…20e8 at000a = ╱fe00009c07╱ // 0x20cb @0xa
0x20c1…20e8 at000f = ╱da╱ AND ╱ // 0x20d0 @0xf
0x20c1…20e8 at0010 = ╱4a╱J╱ // 0x20d1 @0x10
0x20c1…20e8 at0011 = ╱35╱5╱ // 0x20d2 @0x11
0x20c1…20e8 at0012 = ╱e1╱<>╱ // 0x20d3 @0x12
0x20c1…20e8 at0013 = ╱36╱6╱ // 0x20d4 @0x13
0x20c1…20e8 at0014 = ╱30╱0╱ // 0x20d5 @0x14
0x20c1…20e8 at0015 = ╱fe0000f006╱ // 0x20d6 @0x15
0x20c1…20e8 at001a = ╱da╱ AND ╱ // 0x20db @0x1a
0x20c1…20e8 at001b = ╱4a╱J╱ // 0x20dc @0x1b
0x20c1…20e8 at001c = ╱35╱5╱ // 0x20dd @0x1c
0x20c1…20e8 at001d = ╱e1╱<>╱ // 0x20de @0x1d
0x20c1…20e8 at001e = ╱37╱7╱ // 0x20df @0x1e
0x20c1…20e8 at001f = ╱30╱0╱ // 0x20e0 @0x1f
0x20c1…20e8 at0020 = ╱fe00008c07╱ // 0x20e1 @0x20
0x20c1…20e8 at0025 = ╱b6╱ THEN ╱ // 0x20e6 @0x25
0x20c1…20e8 at0026 = EOL // 0x20e7 @0x26
0x20c1…20e8 }
0x20e8…20f3 ae4a 5130 EXEC Z(J5)
0x20e8…20f3 LineComalBin {
0x20e8…20f3 ptr = 0xae4a // 0x20e8 @0x0
0x20e8…20f3 lno = 0x140a // 0x20ea @0x2
0x20e8…20f3 at0004 = ╱9d╱ EXEC ╱ // 0x20ec @0x4
0x20e8…20f3 at0005 = ╱5a╱Z╱ // 0x20ed @0x5
0x20e8…20f3 at0006 = ╱ed╱(╱ // 0x20ee @0x6
0x20e8…20f3 at0007 = ╱4a╱J╱ // 0x20ef @0x7
0x20e8…20f3 at0008 = ╱35╱5╱ // 0x20f0 @0x8
0x20e8…20f3 at0009 = ╱ee╱)╱ // 0x20f1 @0x9
0x20e8…20f3 at000a = EOL // 0x20f2 @0xa
0x20e8…20f3 }
0x20f3…20fe ae55 5140 IF J7>B THEN
0x20f3…20fe LineComalBin {
0x20f3…20fe ptr = 0xae55 // 0x20f3 @0x0
0x20f3…20fe lno = 0x1414 // 0x20f5 @0x2
0x20f3…20fe at0004 = ╱9c╱ IF ╱ // 0x20f7 @0x4
0x20f3…20fe at0005 = ╱4a╱J╱ // 0x20f8 @0x5
0x20f3…20fe at0006 = ╱37╱7╱ // 0x20f9 @0x6
0x20f3…20fe at0007 = ╱de╱>╱ // 0x20fa @0x7
0x20f3…20fe at0008 = ╱42╱B╱ // 0x20fb @0x8
0x20f3…20fe at0009 = ╱b6╱ THEN ╱ // 0x20fc @0x9
0x20f3…20fe at000a = EOL // 0x20fd @0xa
0x20f3…20fe }
0x20fe…211d ae74 5141 IF J7=G OR J7=4 OR J7=6 THEN
0x20fe…211d LineComalBin {
0x20fe…211d ptr = 0xae74 // 0x20fe @0x0
0x20fe…211d lno = 0x1415 // 0x2100 @0x2
0x20fe…211d at0004 = ╱9c╱ IF ╱ // 0x2102 @0x4
0x20fe…211d at0005 = ╱4a╱J╱ // 0x2103 @0x5
0x20fe…211d at0006 = ╱37╱7╱ // 0x2104 @0x6
0x20fe…211d at0007 = ╱dc╱=╱ // 0x2105 @0x7
0x20fe…211d at0008 = ╱47╱G╱ // 0x2106 @0x8
0x20fe…211d at0009 = ╱db╱ OR ╱ // 0x2107 @0x9
0x20fe…211d at000a = ╱4a╱J╱ // 0x2108 @0xa
0x20fe…211d at000b = ╱37╱7╱ // 0x2109 @0xb
0x20fe…211d at000c = ╱dc╱=╱ // 0x210a @0xc
0x20fe…211d at000d = ╱34╱4╱ // 0x210b @0xd
0x20fe…211d at000e = ╱fe00008003╱ // 0x210c @0xe
0x20fe…211d at0013 = ╱db╱ OR ╱ // 0x2111 @0x13
0x20fe…211d at0014 = ╱4a╱J╱ // 0x2112 @0x14
0x20fe…211d at0015 = ╱37╱7╱ // 0x2113 @0x15
0x20fe…211d at0016 = ╱dc╱=╱ // 0x2114 @0x16
0x20fe…211d at0017 = ╱36╱6╱ // 0x2115 @0x17
0x20fe…211d at0018 = ╱fe0000c003╱ // 0x2116 @0x18
0x20fe…211d at001d = ╱b6╱ THEN ╱ // 0x211b @0x1d
0x20fe…211d at001e = EOL // 0x211c @0x1e
0x20fe…211d }
0x211d…2130 ae87 5143 C3$=D6$(EL:TI)
0x211d…2130 LineComalBin {
0x211d…2130 ptr = 0xae87 // 0x211d @0x0
0x211d…2130 lno = 0x1417 // 0x211f @0x2
0x211d…2130 at0004 = ╱43╱C╱ // 0x2121 @0x4
0x211d…2130 at0005 = ╱33╱3╱ // 0x2122 @0x5
0x211d…2130 at0006 = ╱ef╱$╱ // 0x2123 @0x6
0x211d…2130 at0007 = ╱dc╱=╱ // 0x2124 @0x7
0x211d…2130 at0008 = ╱44╱D╱ // 0x2125 @0x8
0x211d…2130 at0009 = ╱36╱6╱ // 0x2126 @0x9
0x211d…2130 at000a = ╱ef╱$╱ // 0x2127 @0xa
0x211d…2130 at000b = ╱ed╱(╱ // 0x2128 @0xb
0x211d…2130 at000c = ╱45╱E╱ // 0x2129 @0xc
0x211d…2130 at000d = ╱4c╱L╱ // 0x212a @0xd
0x211d…2130 at000e = ╱f0╱:╱ // 0x212b @0xe
0x211d…2130 at000f = ╱54╱T╱ // 0x212c @0xf
0x211d…2130 at0010 = ╱49╱I╱ // 0x212d @0x10
0x211d…2130 at0011 = ╱ee╱)╱ // 0x212e @0x11
0x211d…2130 at0012 = EOL // 0x212f @0x12
0x211d…2130 }
0x2130…2143 ae9a 5144 EXEC OPTÆL(J7,C3$)
0x2130…2143 LineComalBin {
0x2130…2143 ptr = 0xae9a // 0x2130 @0x0
0x2130…2143 lno = 0x1418 // 0x2132 @0x2
0x2130…2143 at0004 = ╱9d╱ EXEC ╱ // 0x2134 @0x4
0x2130…2143 at0005 = ╱4f╱O╱ // 0x2135 @0x5
0x2130…2143 at0006 = ╱50╱P╱ // 0x2136 @0x6
0x2130…2143 at0007 = ╱54╱T╱ // 0x2137 @0x7
0x2130…2143 at0008 = ╱5b╱Æ╱ // 0x2138 @0x8
0x2130…2143 at0009 = ╱4c╱L╱ // 0x2139 @0x9
0x2130…2143 at000a = ╱ed╱(╱ // 0x213a @0xa
0x2130…2143 at000b = ╱4a╱J╱ // 0x213b @0xb
0x2130…2143 at000c = ╱37╱7╱ // 0x213c @0xc
0x2130…2143 at000d = ╱ec╱,╱ // 0x213d @0xd
0x2130…2143 at000e = ╱43╱C╱ // 0x213e @0xe
0x2130…2143 at000f = ╱33╱3╱ // 0x213f @0xf
0x2130…2143 at0010 = ╱ef╱$╱ // 0x2140 @0x10
0x2130…2143 at0011 = ╱ee╱)╱ // 0x2141 @0x11
0x2130…2143 at0012 = EOL // 0x2142 @0x12
0x2130…2143 }
0x2143…214f aea6 5146 J7=J7+E
0x2143…214f LineComalBin {
0x2143…214f ptr = 0xaea6 // 0x2143 @0x0
0x2143…214f lno = 0x141a // 0x2145 @0x2
0x2143…214f at0004 = ╱4a╱J╱ // 0x2147 @0x4
0x2143…214f at0005 = ╱37╱7╱ // 0x2148 @0x5
0x2143…214f at0006 = ╱dc╱=╱ // 0x2149 @0x6
0x2143…214f at0007 = ╱4a╱J╱ // 0x214a @0x7
0x2143…214f at0008 = ╱37╱7╱ // 0x214b @0x8
0x2143…214f at0009 = ╱e2╱+╱ // 0x214c @0x9
0x2143…214f at000a = ╱45╱E╱ // 0x214d @0xa
0x2143…214f at000b = EOL // 0x214e @0xb
0x2143…214f }
0x214f…215f aeb6 5147 IF J7<6 THEN
0x214f…215f LineComalBin {
0x214f…215f ptr = 0xaeb6 // 0x214f @0x0
0x214f…215f lno = 0x141b // 0x2151 @0x2
0x214f…215f at0004 = ╱9c╱ IF ╱ // 0x2153 @0x4
0x214f…215f at0005 = ╱4a╱J╱ // 0x2154 @0x5
0x214f…215f at0006 = ╱37╱7╱ // 0x2155 @0x6
0x214f…215f at0007 = ╱dd╱<╱ // 0x2156 @0x7
0x214f…215f at0008 = ╱36╱6╱ // 0x2157 @0x8
0x214f…215f at0009 = ╱fe0000c003╱ // 0x2158 @0x9
0x214f…215f at000e = ╱b6╱ THEN ╱ // 0x215d @0xe
0x214f…215f at000f = EOL // 0x215e @0xf
0x214f…215f }
0x215f…2173 aeca 5148 F1$=B9$(8)
0x215f…2173 LineComalBin {
0x215f…2173 ptr = 0xaeca // 0x215f @0x0
0x215f…2173 lno = 0x141c // 0x2161 @0x2
0x215f…2173 at0004 = ╱46╱F╱ // 0x2163 @0x4
0x215f…2173 at0005 = ╱31╱1╱ // 0x2164 @0x5
0x215f…2173 at0006 = ╱ef╱$╱ // 0x2165 @0x6
0x215f…2173 at0007 = ╱dc╱=╱ // 0x2166 @0x7
0x215f…2173 at0008 = ╱42╱B╱ // 0x2167 @0x8
0x215f…2173 at0009 = ╱39╱9╱ // 0x2168 @0x9
0x215f…2173 at000a = ╱ef╱$╱ // 0x2169 @0xa
0x215f…2173 at000b = ╱ed╱(╱ // 0x216a @0xb
0x215f…2173 at000c = ╱38╱8╱ // 0x216b @0xc
0x215f…2173 at000d = ╱fe00008004╱ // 0x216c @0xd
0x215f…2173 at0012 = ╱ee╱)╱ // 0x2171 @0x12
0x215f…2173 at0013 = EOL // 0x2172 @0x13
0x215f…2173 }
0x2173…218e aee5 5149 EXEC C(0,F1$,C3$,C4$)
0x2173…218e LineComalBin {
0x2173…218e ptr = 0xaee5 // 0x2173 @0x0
0x2173…218e lno = 0x141d // 0x2175 @0x2
0x2173…218e at0004 = ╱9d╱ EXEC ╱ // 0x2177 @0x4
0x2173…218e at0005 = ╱43╱C╱ // 0x2178 @0x5
0x2173…218e at0006 = ╱ed╱(╱ // 0x2179 @0x6
0x2173…218e at0007 = ╱30╱0╱ // 0x217a @0x7
0x2173…218e at0008 = ╱fe00000000╱ // 0x217b @0x8
0x2173…218e at000d = ╱ec╱,╱ // 0x2180 @0xd
0x2173…218e at000e = ╱46╱F╱ // 0x2181 @0xe
0x2173…218e at000f = ╱31╱1╱ // 0x2182 @0xf
0x2173…218e at0010 = ╱ef╱$╱ // 0x2183 @0x10
0x2173…218e at0011 = ╱ec╱,╱ // 0x2184 @0x11
0x2173…218e at0012 = ╱43╱C╱ // 0x2185 @0x12
0x2173…218e at0013 = ╱33╱3╱ // 0x2186 @0x13
0x2173…218e at0014 = ╱ef╱$╱ // 0x2187 @0x14
0x2173…218e at0015 = ╱ec╱,╱ // 0x2188 @0x15
0x2173…218e at0016 = ╱43╱C╱ // 0x2189 @0x16
0x2173…218e at0017 = ╱34╱4╱ // 0x218a @0x17
0x2173…218e at0018 = ╱ef╱$╱ // 0x218b @0x18
0x2173…218e at0019 = ╱ee╱)╱ // 0x218c @0x19
0x2173…218e at001a = EOL // 0x218d @0x1a
0x2173…218e }
0x218e…21a8 aeff 5150 B9$(8)=C4$(G:EL)
0x218e…21a8 LineComalBin {
0x218e…21a8 ptr = 0xaeff // 0x218e @0x0
0x218e…21a8 lno = 0x141e // 0x2190 @0x2
0x218e…21a8 at0004 = ╱42╱B╱ // 0x2192 @0x4
0x218e…21a8 at0005 = ╱39╱9╱ // 0x2193 @0x5
0x218e…21a8 at0006 = ╱ef╱$╱ // 0x2194 @0x6
0x218e…21a8 at0007 = ╱ed╱(╱ // 0x2195 @0x7
0x218e…21a8 at0008 = ╱38╱8╱ // 0x2196 @0x8
0x218e…21a8 at0009 = ╱fe00008004╱ // 0x2197 @0x9
0x218e…21a8 at000e = ╱ee╱)╱ // 0x219c @0xe
0x218e…21a8 at000f = ╱dc╱=╱ // 0x219d @0xf
0x218e…21a8 at0010 = ╱43╱C╱ // 0x219e @0x10
0x218e…21a8 at0011 = ╱34╱4╱ // 0x219f @0x11
0x218e…21a8 at0012 = ╱ef╱$╱ // 0x21a0 @0x12
0x218e…21a8 at0013 = ╱ed╱(╱ // 0x21a1 @0x13
0x218e…21a8 at0014 = ╱47╱G╱ // 0x21a2 @0x14
0x218e…21a8 at0015 = ╱f0╱:╱ // 0x21a3 @0x15
0x218e…21a8 at0016 = ╱45╱E╱ // 0x21a4 @0x16
0x218e…21a8 at0017 = ╱4c╱L╱ // 0x21a5 @0x17
0x218e…21a8 at0018 = ╱ee╱)╱ // 0x21a6 @0x18
0x218e…21a8 at0019 = EOL // 0x21a7 @0x19
0x218e…21a8 }
0x21a8…21ae af05 5151 ENDIF
0x21a8…21ae LineComalBin {
0x21a8…21ae ptr = 0xaf05 // 0x21a8 @0x0
0x21a8…21ae lno = 0x141f // 0x21aa @0x2
0x21a8…21ae at0004 = ╱9b╱ ENDIF ╱ // 0x21ac @0x4
0x21a8…21ae at0005 = EOL // 0x21ad @0x5
0x21a8…21ae }
0x21ae…21b4 af0b 5152 ENDIF
0x21ae…21b4 LineComalBin {
0x21ae…21b4 ptr = 0xaf0b // 0x21ae @0x0
0x21ae…21b4 lno = 0x1420 // 0x21b0 @0x2
0x21ae…21b4 at0004 = ╱9b╱ ENDIF ╱ // 0x21b2 @0x4
0x21ae…21b4 at0005 = EOL // 0x21b3 @0x5
0x21ae…21b4 }
0x21b4…21c7 af1e 5160 C3$=D6$(AZ:TI)
0x21b4…21c7 LineComalBin {
0x21b4…21c7 ptr = 0xaf1e // 0x21b4 @0x0
0x21b4…21c7 lno = 0x1428 // 0x21b6 @0x2
0x21b4…21c7 at0004 = ╱43╱C╱ // 0x21b8 @0x4
0x21b4…21c7 at0005 = ╱33╱3╱ // 0x21b9 @0x5
0x21b4…21c7 at0006 = ╱ef╱$╱ // 0x21ba @0x6
0x21b4…21c7 at0007 = ╱dc╱=╱ // 0x21bb @0x7
0x21b4…21c7 at0008 = ╱44╱D╱ // 0x21bc @0x8
0x21b4…21c7 at0009 = ╱36╱6╱ // 0x21bd @0x9
0x21b4…21c7 at000a = ╱ef╱$╱ // 0x21be @0xa
0x21b4…21c7 at000b = ╱ed╱(╱ // 0x21bf @0xb
0x21b4…21c7 at000c = ╱41╱A╱ // 0x21c0 @0xc
0x21b4…21c7 at000d = ╱5a╱Z╱ // 0x21c1 @0xd
0x21b4…21c7 at000e = ╱f0╱:╱ // 0x21c2 @0xe
0x21b4…21c7 at000f = ╱54╱T╱ // 0x21c3 @0xf
0x21b4…21c7 at0010 = ╱49╱I╱ // 0x21c4 @0x10
0x21b4…21c7 at0011 = ╱ee╱)╱ // 0x21c5 @0x11
0x21b4…21c7 at0012 = EOL // 0x21c6 @0x12
0x21b4…21c7 }
0x21c7…21da af31 5170 EXEC OPTÆL(J7,C3$)
0x21c7…21da LineComalBin {
0x21c7…21da ptr = 0xaf31 // 0x21c7 @0x0
0x21c7…21da lno = 0x1432 // 0x21c9 @0x2
0x21c7…21da at0004 = ╱9d╱ EXEC ╱ // 0x21cb @0x4
0x21c7…21da at0005 = ╱4f╱O╱ // 0x21cc @0x5
0x21c7…21da at0006 = ╱50╱P╱ // 0x21cd @0x6
0x21c7…21da at0007 = ╱54╱T╱ // 0x21ce @0x7
0x21c7…21da at0008 = ╱5b╱Æ╱ // 0x21cf @0x8
0x21c7…21da at0009 = ╱4c╱L╱ // 0x21d0 @0x9
0x21c7…21da at000a = ╱ed╱(╱ // 0x21d1 @0xa
0x21c7…21da at000b = ╱4a╱J╱ // 0x21d2 @0xb
0x21c7…21da at000c = ╱37╱7╱ // 0x21d3 @0xc
0x21c7…21da at000d = ╱ec╱,╱ // 0x21d4 @0xd
0x21c7…21da at000e = ╱43╱C╱ // 0x21d5 @0xe
0x21c7…21da at000f = ╱33╱3╱ // 0x21d6 @0xf
0x21c7…21da at0010 = ╱ef╱$╱ // 0x21d7 @0x10
0x21c7…21da at0011 = ╱ee╱)╱ // 0x21d8 @0x11
0x21c7…21da at0012 = EOL // 0x21d9 @0x12
0x21c7…21da }
0x21da…21e0 af37 5190 ENDIF
0x21da…21e0 LineComalBin {
0x21da…21e0 ptr = 0xaf37 // 0x21da @0x0
0x21da…21e0 lno = 0x1446 // 0x21dc @0x2
0x21da…21e0 at0004 = ╱9b╱ ENDIF ╱ // 0x21de @0x4
0x21da…21e0 at0005 = EOL // 0x21df @0x5
0x21da…21e0 }
0x21e0…21eb af42 5200 IF J8>B THEN
0x21e0…21eb LineComalBin {
0x21e0…21eb ptr = 0xaf42 // 0x21e0 @0x0
0x21e0…21eb lno = 0x1450 // 0x21e2 @0x2
0x21e0…21eb at0004 = ╱9c╱ IF ╱ // 0x21e4 @0x4
0x21e0…21eb at0005 = ╱4a╱J╱ // 0x21e5 @0x5
0x21e0…21eb at0006 = ╱38╱8╱ // 0x21e6 @0x6
0x21e0…21eb at0007 = ╱de╱>╱ // 0x21e7 @0x7
0x21e0…21eb at0008 = ╱42╱B╱ // 0x21e8 @0x8
0x21e0…21eb at0009 = ╱b6╱ THEN ╱ // 0x21e9 @0x9
0x21e0…21eb at000a = EOL // 0x21ea @0xa
0x21e0…21eb }
0x21eb…21fe af55 5220 C3$=D6$(AZ:TI)
0x21eb…21fe LineComalBin {
0x21eb…21fe ptr = 0xaf55 // 0x21eb @0x0
0x21eb…21fe lno = 0x1464 // 0x21ed @0x2
0x21eb…21fe at0004 = ╱43╱C╱ // 0x21ef @0x4
0x21eb…21fe at0005 = ╱33╱3╱ // 0x21f0 @0x5
0x21eb…21fe at0006 = ╱ef╱$╱ // 0x21f1 @0x6
0x21eb…21fe at0007 = ╱dc╱=╱ // 0x21f2 @0x7
0x21eb…21fe at0008 = ╱44╱D╱ // 0x21f3 @0x8
0x21eb…21fe at0009 = ╱36╱6╱ // 0x21f4 @0x9
0x21eb…21fe at000a = ╱ef╱$╱ // 0x21f5 @0xa
0x21eb…21fe at000b = ╱ed╱(╱ // 0x21f6 @0xb
0x21eb…21fe at000c = ╱41╱A╱ // 0x21f7 @0xc
0x21eb…21fe at000d = ╱5a╱Z╱ // 0x21f8 @0xd
0x21eb…21fe at000e = ╱f0╱:╱ // 0x21f9 @0xe
0x21eb…21fe at000f = ╱54╱T╱ // 0x21fa @0xf
0x21eb…21fe at0010 = ╱49╱I╱ // 0x21fb @0x10
0x21eb…21fe at0011 = ╱ee╱)╱ // 0x21fc @0x11
0x21eb…21fe at0012 = EOL // 0x21fd @0x12
0x21eb…21fe }
0x21fe…2211 af68 5230 EXEC OPTÆL(J8,C3$)
0x21fe…2211 LineComalBin {
0x21fe…2211 ptr = 0xaf68 // 0x21fe @0x0
0x21fe…2211 lno = 0x146e // 0x2200 @0x2
0x21fe…2211 at0004 = ╱9d╱ EXEC ╱ // 0x2202 @0x4
0x21fe…2211 at0005 = ╱4f╱O╱ // 0x2203 @0x5
0x21fe…2211 at0006 = ╱50╱P╱ // 0x2204 @0x6
0x21fe…2211 at0007 = ╱54╱T╱ // 0x2205 @0x7
0x21fe…2211 at0008 = ╱5b╱Æ╱ // 0x2206 @0x8
0x21fe…2211 at0009 = ╱4c╱L╱ // 0x2207 @0x9
0x21fe…2211 at000a = ╱ed╱(╱ // 0x2208 @0xa
0x21fe…2211 at000b = ╱4a╱J╱ // 0x2209 @0xb
0x21fe…2211 at000c = ╱38╱8╱ // 0x220a @0xc
0x21fe…2211 at000d = ╱ec╱,╱ // 0x220b @0xd
0x21fe…2211 at000e = ╱43╱C╱ // 0x220c @0xe
0x21fe…2211 at000f = ╱33╱3╱ // 0x220d @0xf
0x21fe…2211 at0010 = ╱ef╱$╱ // 0x220e @0x10
0x21fe…2211 at0011 = ╱ee╱)╱ // 0x220f @0x11
0x21fe…2211 at0012 = EOL // 0x2210 @0x12
0x21fe…2211 }
0x2211…2217 af6e 5250 ENDIF
0x2211…2217 LineComalBin {
0x2211…2217 ptr = 0xaf6e // 0x2211 @0x0
0x2211…2217 lno = 0x1482 // 0x2213 @0x2
0x2211…2217 at0004 = ╱9b╱ ENDIF ╱ // 0x2215 @0x4
0x2211…2217 at0005 = EOL // 0x2216 @0x5
0x2211…2217 }
0x2217…2222 af79 5260 IF J9>B THEN
0x2217…2222 LineComalBin {
0x2217…2222 ptr = 0xaf79 // 0x2217 @0x0
0x2217…2222 lno = 0x148c // 0x2219 @0x2
0x2217…2222 at0004 = ╱9c╱ IF ╱ // 0x221b @0x4
0x2217…2222 at0005 = ╱4a╱J╱ // 0x221c @0x5
0x2217…2222 at0006 = ╱39╱9╱ // 0x221d @0x6
0x2217…2222 at0007 = ╱de╱>╱ // 0x221e @0x7
0x2217…2222 at0008 = ╱42╱B╱ // 0x221f @0x8
0x2217…2222 at0009 = ╱b6╱ THEN ╱ // 0x2220 @0x9
0x2217…2222 at000a = EOL // 0x2221 @0xa
0x2217…2222 }
0x2222…2235 af8c 5280 C3$=D6$(AZ:TI)
0x2222…2235 LineComalBin {
0x2222…2235 ptr = 0xaf8c // 0x2222 @0x0
0x2222…2235 lno = 0x14a0 // 0x2224 @0x2
0x2222…2235 at0004 = ╱43╱C╱ // 0x2226 @0x4
0x2222…2235 at0005 = ╱33╱3╱ // 0x2227 @0x5
0x2222…2235 at0006 = ╱ef╱$╱ // 0x2228 @0x6
0x2222…2235 at0007 = ╱dc╱=╱ // 0x2229 @0x7
0x2222…2235 at0008 = ╱44╱D╱ // 0x222a @0x8
0x2222…2235 at0009 = ╱36╱6╱ // 0x222b @0x9
0x2222…2235 at000a = ╱ef╱$╱ // 0x222c @0xa
0x2222…2235 at000b = ╱ed╱(╱ // 0x222d @0xb
0x2222…2235 at000c = ╱41╱A╱ // 0x222e @0xc
0x2222…2235 at000d = ╱5a╱Z╱ // 0x222f @0xd
0x2222…2235 at000e = ╱f0╱:╱ // 0x2230 @0xe
0x2222…2235 at000f = ╱54╱T╱ // 0x2231 @0xf
0x2222…2235 at0010 = ╱49╱I╱ // 0x2232 @0x10
0x2222…2235 at0011 = ╱ee╱)╱ // 0x2233 @0x11
0x2222…2235 at0012 = EOL // 0x2234 @0x12
0x2222…2235 }
0x2235…2248 af9f 5290 EXEC OPTÆL(J9,C3$)
0x2235…2248 LineComalBin {
0x2235…2248 ptr = 0xaf9f // 0x2235 @0x0
0x2235…2248 lno = 0x14aa // 0x2237 @0x2
0x2235…2248 at0004 = ╱9d╱ EXEC ╱ // 0x2239 @0x4
0x2235…2248 at0005 = ╱4f╱O╱ // 0x223a @0x5
0x2235…2248 at0006 = ╱50╱P╱ // 0x223b @0x6
0x2235…2248 at0007 = ╱54╱T╱ // 0x223c @0x7
0x2235…2248 at0008 = ╱5b╱Æ╱ // 0x223d @0x8
0x2235…2248 at0009 = ╱4c╱L╱ // 0x223e @0x9
0x2235…2248 at000a = ╱ed╱(╱ // 0x223f @0xa
0x2235…2248 at000b = ╱4a╱J╱ // 0x2240 @0xb
0x2235…2248 at000c = ╱39╱9╱ // 0x2241 @0xc
0x2235…2248 at000d = ╱ec╱,╱ // 0x2242 @0xd
0x2235…2248 at000e = ╱43╱C╱ // 0x2243 @0xe
0x2235…2248 at000f = ╱33╱3╱ // 0x2244 @0xf
0x2235…2248 at0010 = ╱ef╱$╱ // 0x2245 @0x10
0x2235…2248 at0011 = ╱ee╱)╱ // 0x2246 @0x11
0x2235…2248 at0012 = EOL // 0x2247 @0x12
0x2235…2248 }
0x2248…224e afa5 5310 ENDIF
0x2248…224e LineComalBin {
0x2248…224e ptr = 0xafa5 // 0x2248 @0x0
0x2248…224e lno = 0x14be // 0x224a @0x2
0x2248…224e at0004 = ╱9b╱ ENDIF ╱ // 0x224c @0x4
0x2248…224e at0005 = EOL // 0x224d @0x5
0x2248…224e }
0x224e…2279 afd0 5320 F0$(26:6)=D6$(5:6)
0x224e…2279 LineComalBin {
0x224e…2279 ptr = 0xafd0 // 0x224e @0x0
0x224e…2279 lno = 0x14c8 // 0x2250 @0x2
0x224e…2279 at0004 = ╱46╱F╱ // 0x2252 @0x4
0x224e…2279 at0005 = ╱30╱0╱ // 0x2253 @0x5
0x224e…2279 at0006 = ╱ef╱$╱ // 0x2254 @0x6
0x224e…2279 at0007 = ╱ed╱(╱ // 0x2255 @0x7
0x224e…2279 at0008 = ╱32╱2╱ // 0x2256 @0x8
0x224e…2279 at0009 = ╱36╱6╱ // 0x2257 @0x9
0x224e…2279 at000a = ╱fe0000d005╱ // 0x2258 @0xa
0x224e…2279 at000f = ╱f0╱:╱ // 0x225d @0xf
0x224e…2279 at0010 = ╱36╱6╱ // 0x225e @0x10
0x224e…2279 at0011 = ╱fe0000c003╱ // 0x225f @0x11
0x224e…2279 at0016 = ╱ee╱)╱ // 0x2264 @0x16
0x224e…2279 at0017 = ╱dc╱=╱ // 0x2265 @0x17
0x224e…2279 at0018 = ╱44╱D╱ // 0x2266 @0x18
0x224e…2279 at0019 = ╱36╱6╱ // 0x2267 @0x19
0x224e…2279 at001a = ╱ef╱$╱ // 0x2268 @0x1a
0x224e…2279 at001b = ╱ed╱(╱ // 0x2269 @0x1b
0x224e…2279 at001c = ╱35╱5╱ // 0x226a @0x1c
0x224e…2279 at001d = ╱fe0000a003╱ // 0x226b @0x1d
0x224e…2279 at0022 = ╱f0╱:╱ // 0x2270 @0x22
0x224e…2279 at0023 = ╱36╱6╱ // 0x2271 @0x23
0x224e…2279 at0024 = ╱fe0000c003╱ // 0x2272 @0x24
0x224e…2279 at0029 = ╱ee╱)╱ // 0x2277 @0x29
0x224e…2279 at002a = EOL // 0x2278 @0x2a
0x224e…2279 }
0x2279…2284 afdb 5330 CASE B=B OF
0x2279…2284 LineComalBin {
0x2279…2284 ptr = 0xafdb // 0x2279 @0x0
0x2279…2284 lno = 0x14d2 // 0x227b @0x2
0x2279…2284 at0004 = ╱a201╱ CASE ╱ // 0x227d @0x4
0x2279…2284 at0006 = ╱42╱B╱ // 0x227f @0x6
0x2279…2284 at0007 = ╱dc╱=╱ // 0x2280 @0x7
0x2279…2284 at0008 = ╱42╱B╱ // 0x2281 @0x8
0x2279…2284 at0009 = ╱ba╱ OF ╱ // 0x2282 @0x9
0x2279…2284 at000a = EOL // 0x2283 @0xa
0x2279…2284 }
0x2284…22b4 b00b 5340 WHEN (J5>B AND J5<60) OR (J5>61 AND J5<65)
0x2284…22b4 LineComalBin {
0x2284…22b4 ptr = 0xb00b // 0x2284 @0x0
0x2284…22b4 lno = 0x14dc // 0x2286 @0x2
0x2284…22b4 at0004 = ╱a301╱ WHEN ╱ // 0x2288 @0x4
0x2284…22b4 at0006 = ╱ed╱(╱ // 0x228a @0x6
0x2284…22b4 at0007 = ╱4a╱J╱ // 0x228b @0x7
0x2284…22b4 at0008 = ╱35╱5╱ // 0x228c @0x8
0x2284…22b4 at0009 = ╱de╱>╱ // 0x228d @0x9
0x2284…22b4 at000a = ╱42╱B╱ // 0x228e @0xa
0x2284…22b4 at000b = ╱da╱ AND ╱ // 0x228f @0xb
0x2284…22b4 at000c = ╱4a╱J╱ // 0x2290 @0xc
0x2284…22b4 at000d = ╱35╱5╱ // 0x2291 @0xd
0x2284…22b4 at000e = ╱dd╱<╱ // 0x2292 @0xe
0x2284…22b4 at000f = ╱36╱6╱ // 0x2293 @0xf
0x2284…22b4 at0010 = ╱30╱0╱ // 0x2294 @0x10
0x2284…22b4 at0011 = ╱fe0000f006╱ // 0x2295 @0x11
0x2284…22b4 at0016 = ╱ee╱)╱ // 0x229a @0x16
0x2284…22b4 at0017 = ╱db╱ OR ╱ // 0x229b @0x17
0x2284…22b4 at0018 = ╱ed╱(╱ // 0x229c @0x18
0x2284…22b4 at0019 = ╱4a╱J╱ // 0x229d @0x19
0x2284…22b4 at001a = ╱35╱5╱ // 0x229e @0x1a
0x2284…22b4 at001b = ╱de╱>╱ // 0x229f @0x1b
0x2284…22b4 at001c = ╱36╱6╱ // 0x22a0 @0x1c
0x2284…22b4 at001d = ╱31╱1╱ // 0x22a1 @0x1d
0x2284…22b4 at001e = ╱fe0000f406╱ // 0x22a2 @0x1e
0x2284…22b4 at0023 = ╱da╱ AND ╱ // 0x22a7 @0x23
0x2284…22b4 at0024 = ╱4a╱J╱ // 0x22a8 @0x24
0x2284…22b4 at0025 = ╱35╱5╱ // 0x22a9 @0x25
0x2284…22b4 at0026 = ╱dd╱<╱ // 0x22aa @0x26
0x2284…22b4 at0027 = ╱36╱6╱ // 0x22ab @0x27
0x2284…22b4 at0028 = ╱35╱5╱ // 0x22ac @0x28
0x2284…22b4 at0029 = ╱fe00008207╱ // 0x22ad @0x29
0x2284…22b4 at002e = ╱ee╱)╱ // 0x22b2 @0x2e
0x2284…22b4 at002f = EOL // 0x22b3 @0x2f
0x2284…22b4 }
0x22b4…22be b015 5350 CASE J5 OF
0x22b4…22be LineComalBin {
0x22b4…22be ptr = 0xb015 // 0x22b4 @0x0
0x22b4…22be lno = 0x14e6 // 0x22b6 @0x2
0x22b4…22be at0004 = ╱a201╱ CASE ╱ // 0x22b8 @0x4
0x22b4…22be at0006 = ╱4a╱J╱ // 0x22ba @0x6
0x22b4…22be at0007 = ╱35╱5╱ // 0x22bb @0x7
0x22b4…22be at0008 = ╱ba╱ OF ╱ // 0x22bc @0x8
0x22b4…22be at0009 = EOL // 0x22bd @0x9
0x22b4…22be }
0x22be…22d4 b02b 5360 WHEN 41,49
0x22be…22d4 LineComalBin {
0x22be…22d4 ptr = 0xb02b // 0x22be @0x0
0x22be…22d4 lno = 0x14f0 // 0x22c0 @0x2
0x22be…22d4 at0004 = ╱a301╱ WHEN ╱ // 0x22c2 @0x4
0x22be…22d4 at0006 = ╱34╱4╱ // 0x22c4 @0x6
0x22be…22d4 at0007 = ╱31╱1╱ // 0x22c5 @0x7
0x22be…22d4 at0008 = ╱fe0000a406╱ // 0x22c6 @0x8
0x22be…22d4 at000d = ╱ec╱,╱ // 0x22cb @0xd
0x22be…22d4 at000e = ╱34╱4╱ // 0x22cc @0xe
0x22be…22d4 at000f = ╱39╱9╱ // 0x22cd @0xf
0x22be…22d4 at0010 = ╱fe0000c406╱ // 0x22ce @0x10
0x22be…22d4 at0015 = EOL // 0x22d3 @0x15
0x22be…22d4 }
0x22d4…22f5 b04c 5370 F0$(33,43)=C5$(J9)
0x22d4…22f5 LineComalBin {
0x22d4…22f5 ptr = 0xb04c // 0x22d4 @0x0
0x22d4…22f5 lno = 0x14fa // 0x22d6 @0x2
0x22d4…22f5 at0004 = ╱46╱F╱ // 0x22d8 @0x4
0x22d4…22f5 at0005 = ╱30╱0╱ // 0x22d9 @0x5
0x22d4…22f5 at0006 = ╱ef╱$╱ // 0x22da @0x6
0x22d4…22f5 at0007 = ╱ed╱(╱ // 0x22db @0x7
0x22d4…22f5 at0008 = ╱33╱3╱ // 0x22dc @0x8
0x22d4…22f5 at0009 = ╱33╱3╱ // 0x22dd @0x9
0x22d4…22f5 at000a = ╱fe00008406╱ // 0x22de @0xa
0x22d4…22f5 at000f = ╱ec╱,╱ // 0x22e3 @0xf
0x22d4…22f5 at0010 = ╱34╱4╱ // 0x22e4 @0x10
0x22d4…22f5 at0011 = ╱33╱3╱ // 0x22e5 @0x11
0x22d4…22f5 at0012 = ╱fe0000ac06╱ // 0x22e6 @0x12
0x22d4…22f5 at0017 = ╱ee╱)╱ // 0x22eb @0x17
0x22d4…22f5 at0018 = ╱dc╱=╱ // 0x22ec @0x18
0x22d4…22f5 at0019 = ╱43╱C╱ // 0x22ed @0x19
0x22d4…22f5 at001a = ╱35╱5╱ // 0x22ee @0x1a
0x22d4…22f5 at001b = ╱ef╱$╱ // 0x22ef @0x1b
0x22d4…22f5 at001c = ╱ed╱(╱ // 0x22f0 @0x1c
0x22d4…22f5 at001d = ╱4a╱J╱ // 0x22f1 @0x1d
0x22d4…22f5 at001e = ╱39╱9╱ // 0x22f2 @0x1e
0x22d4…22f5 at001f = ╱ee╱)╱ // 0x22f3 @0x1f
0x22d4…22f5 at0020 = EOL // 0x22f4 @0x20
0x22d4…22f5 }
0x22f5…2306 b05d 5371 IF J5=49 THEN
0x22f5…2306 LineComalBin {
0x22f5…2306 ptr = 0xb05d // 0x22f5 @0x0
0x22f5…2306 lno = 0x14fb // 0x22f7 @0x2
0x22f5…2306 at0004 = ╱9c╱ IF ╱ // 0x22f9 @0x4
0x22f5…2306 at0005 = ╱4a╱J╱ // 0x22fa @0x5
0x22f5…2306 at0006 = ╱35╱5╱ // 0x22fb @0x6
0x22f5…2306 at0007 = ╱dc╱=╱ // 0x22fc @0x7
0x22f5…2306 at0008 = ╱34╱4╱ // 0x22fd @0x8
0x22f5…2306 at0009 = ╱39╱9╱ // 0x22fe @0x9
0x22f5…2306 at000a = ╱fe0000c406╱ // 0x22ff @0xa
0x22f5…2306 at000f = ╱b6╱ THEN ╱ // 0x2304 @0xf
0x22f5…2306 at0010 = EOL // 0x2305 @0x10
0x22f5…2306 }
0x2306…232a b081 5372 C8$(21,30)=D6$(AZ:TI)
0x2306…232a LineComalBin {
0x2306…232a ptr = 0xb081 // 0x2306 @0x0
0x2306…232a lno = 0x14fc // 0x2308 @0x2
0x2306…232a at0004 = ╱43╱C╱ // 0x230a @0x4
0x2306…232a at0005 = ╱38╱8╱ // 0x230b @0x5
0x2306…232a at0006 = ╱ef╱$╱ // 0x230c @0x6
0x2306…232a at0007 = ╱ed╱(╱ // 0x230d @0x7
0x2306…232a at0008 = ╱32╱2╱ // 0x230e @0x8
0x2306…232a at0009 = ╱31╱1╱ // 0x230f @0x9
0x2306…232a at000a = ╱fe0000a805╱ // 0x2310 @0xa
0x2306…232a at000f = ╱ec╱,╱ // 0x2315 @0xf
0x2306…232a at0010 = ╱33╱3╱ // 0x2316 @0x10
0x2306…232a at0011 = ╱30╱0╱ // 0x2317 @0x11
0x2306…232a at0012 = ╱fe0000f005╱ // 0x2318 @0x12
0x2306…232a at0017 = ╱ee╱)╱ // 0x231d @0x17
0x2306…232a at0018 = ╱dc╱=╱ // 0x231e @0x18
0x2306…232a at0019 = ╱44╱D╱ // 0x231f @0x19
0x2306…232a at001a = ╱36╱6╱ // 0x2320 @0x1a
0x2306…232a at001b = ╱ef╱$╱ // 0x2321 @0x1b
0x2306…232a at001c = ╱ed╱(╱ // 0x2322 @0x1c
0x2306…232a at001d = ╱41╱A╱ // 0x2323 @0x1d
0x2306…232a at001e = ╱5a╱Z╱ // 0x2324 @0x1e
0x2306…232a at001f = ╱f0╱:╱ // 0x2325 @0x1f
0x2306…232a at0020 = ╱54╱T╱ // 0x2326 @0x20
0x2306…232a at0021 = ╱49╱I╱ // 0x2327 @0x21
0x2306…232a at0022 = ╱ee╱)╱ // 0x2328 @0x22
0x2306…232a at0023 = EOL // 0x2329 @0x23
0x2306…232a }
0x232a…2330 b087 5373 ELSE
0x232a…2330 LineComalBin {
0x232a…2330 ptr = 0xb087 // 0x232a @0x0
0x232a…2330 lno = 0x14fd // 0x232c @0x2
0x232a…2330 at0004 = ╱9a╱ ELSE ╱ // 0x232e @0x4
0x232a…2330 at0005 = EOL // 0x232f @0x5
0x232a…2330 }
0x2330…2350 b0a7 5374 EXEC OP(2,D6$(AZ,37))
0x2330…2350 LineComalBin {
0x2330…2350 ptr = 0xb0a7 // 0x2330 @0x0
0x2330…2350 lno = 0x14fe // 0x2332 @0x2
0x2330…2350 at0004 = ╱9d╱ EXEC ╱ // 0x2334 @0x4
0x2330…2350 at0005 = ╱4f╱O╱ // 0x2335 @0x5
0x2330…2350 at0006 = ╱50╱P╱ // 0x2336 @0x6
0x2330…2350 at0007 = ╱ed╱(╱ // 0x2337 @0x7
0x2330…2350 at0008 = ╱32╱2╱ // 0x2338 @0x8
0x2330…2350 at0009 = ╱fe00008002╱ // 0x2339 @0x9
0x2330…2350 at000e = ╱ec╱,╱ // 0x233e @0xe
0x2330…2350 at000f = ╱44╱D╱ // 0x233f @0xf
0x2330…2350 at0010 = ╱36╱6╱ // 0x2340 @0x10
0x2330…2350 at0011 = ╱ef╱$╱ // 0x2341 @0x11
0x2330…2350 at0012 = ╱ed╱(╱ // 0x2342 @0x12
0x2330…2350 at0013 = ╱41╱A╱ // 0x2343 @0x13
0x2330…2350 at0014 = ╱5a╱Z╱ // 0x2344 @0x14
0x2330…2350 at0015 = ╱ec╱,╱ // 0x2345 @0x15
0x2330…2350 at0016 = ╱33╱3╱ // 0x2346 @0x16
0x2330…2350 at0017 = ╱37╱7╱ // 0x2347 @0x17
0x2330…2350 at0018 = ╱fe00009406╱ // 0x2348 @0x18
0x2330…2350 at001d = ╱ee╱)╱ // 0x234d @0x1d
0x2330…2350 at001e = ╱ee╱)╱ // 0x234e @0x1e
0x2330…2350 at001f = EOL // 0x234f @0x1f
0x2330…2350 }
0x2350…2356 b0ad 5375 ENDIF
0x2350…2356 LineComalBin {
0x2350…2356 ptr = 0xb0ad // 0x2350 @0x0
0x2350…2356 lno = 0x14ff // 0x2352 @0x2
0x2350…2356 at0004 = ╱9b╱ ENDIF ╱ // 0x2354 @0x4
0x2350…2356 at0005 = EOL // 0x2355 @0x5
0x2350…2356 }
0x2356…2364 b0bb 5380 WHEN 42
0x2356…2364 LineComalBin {
0x2356…2364 ptr = 0xb0bb // 0x2356 @0x0
0x2356…2364 lno = 0x1504 // 0x2358 @0x2
0x2356…2364 at0004 = ╱a301╱ WHEN ╱ // 0x235a @0x4
0x2356…2364 at0006 = ╱34╱4╱ // 0x235c @0x6
0x2356…2364 at0007 = ╱32╱2╱ // 0x235d @0x7
0x2356…2364 at0008 = ╱fe0000a806╱ // 0x235e @0x8
0x2356…2364 at000d = EOL // 0x2363 @0xd
0x2356…2364 }
0x2364…2384 b0db 5385 EXEC OP(3,D6$(AZ,37))
0x2364…2384 LineComalBin {
0x2364…2384 ptr = 0xb0db // 0x2364 @0x0
0x2364…2384 lno = 0x1509 // 0x2366 @0x2
0x2364…2384 at0004 = ╱9d╱ EXEC ╱ // 0x2368 @0x4
0x2364…2384 at0005 = ╱4f╱O╱ // 0x2369 @0x5
0x2364…2384 at0006 = ╱50╱P╱ // 0x236a @0x6
0x2364…2384 at0007 = ╱ed╱(╱ // 0x236b @0x7
0x2364…2384 at0008 = ╱33╱3╱ // 0x236c @0x8
0x2364…2384 at0009 = ╱fe0000c002╱ // 0x236d @0x9
0x2364…2384 at000e = ╱ec╱,╱ // 0x2372 @0xe
0x2364…2384 at000f = ╱44╱D╱ // 0x2373 @0xf
0x2364…2384 at0010 = ╱36╱6╱ // 0x2374 @0x10
0x2364…2384 at0011 = ╱ef╱$╱ // 0x2375 @0x11
0x2364…2384 at0012 = ╱ed╱(╱ // 0x2376 @0x12
0x2364…2384 at0013 = ╱41╱A╱ // 0x2377 @0x13
0x2364…2384 at0014 = ╱5a╱Z╱ // 0x2378 @0x14
0x2364…2384 at0015 = ╱ec╱,╱ // 0x2379 @0x15
0x2364…2384 at0016 = ╱33╱3╱ // 0x237a @0x16
0x2364…2384 at0017 = ╱37╱7╱ // 0x237b @0x17
0x2364…2384 at0018 = ╱fe00009406╱ // 0x237c @0x18
0x2364…2384 at001d = ╱ee╱)╱ // 0x2381 @0x1d
0x2364…2384 at001e = ╱ee╱)╱ // 0x2382 @0x1e
0x2364…2384 at001f = EOL // 0x2383 @0x1f
0x2364…2384 }
0x2384…23aa b101 5390 F0$(33,43)=C5$(26)
0x2384…23aa LineComalBin {
0x2384…23aa ptr = 0xb101 // 0x2384 @0x0
0x2384…23aa lno = 0x150e // 0x2386 @0x2
0x2384…23aa at0004 = ╱46╱F╱ // 0x2388 @0x4
0x2384…23aa at0005 = ╱30╱0╱ // 0x2389 @0x5
0x2384…23aa at0006 = ╱ef╱$╱ // 0x238a @0x6
0x2384…23aa at0007 = ╱ed╱(╱ // 0x238b @0x7
0x2384…23aa at0008 = ╱33╱3╱ // 0x238c @0x8
0x2384…23aa at0009 = ╱33╱3╱ // 0x238d @0x9
0x2384…23aa at000a = ╱fe00008406╱ // 0x238e @0xa
0x2384…23aa at000f = ╱ec╱,╱ // 0x2393 @0xf
0x2384…23aa at0010 = ╱34╱4╱ // 0x2394 @0x10
0x2384…23aa at0011 = ╱33╱3╱ // 0x2395 @0x11
0x2384…23aa at0012 = ╱fe0000ac06╱ // 0x2396 @0x12
0x2384…23aa at0017 = ╱ee╱)╱ // 0x239b @0x17
0x2384…23aa at0018 = ╱dc╱=╱ // 0x239c @0x18
0x2384…23aa at0019 = ╱43╱C╱ // 0x239d @0x19
0x2384…23aa at001a = ╱35╱5╱ // 0x239e @0x1a
0x2384…23aa at001b = ╱ef╱$╱ // 0x239f @0x1b
0x2384…23aa at001c = ╱ed╱(╱ // 0x23a0 @0x1c
0x2384…23aa at001d = ╱32╱2╱ // 0x23a1 @0x1d
0x2384…23aa at001e = ╱36╱6╱ // 0x23a2 @0x1e
0x2384…23aa at001f = ╱fe0000d005╱ // 0x23a3 @0x1f
0x2384…23aa at0024 = ╱ee╱)╱ // 0x23a8 @0x24
0x2384…23aa at0025 = EOL // 0x23a9 @0x25
0x2384…23aa }
0x23aa…23b0 b107 5400 ENDCASE
0x23aa…23b0 LineComalBin {
0x23aa…23b0 ptr = 0xb107 // 0x23aa @0x0
0x23aa…23b0 lno = 0x1518 // 0x23ac @0x2
0x23aa…23b0 at0004 = ╱a4╱ ENDCASE ╱ // 0x23ae @0x4
0x23aa…23b0 at0005 = EOL // 0x23af @0x5
0x23aa…23b0 }
0x23b0…23dc b133 5402 IF J5=40 THEN EXEC OP(1,D6$(AZ,37))
0x23b0…23dc LineComalBin {
0x23b0…23dc ptr = 0xb133 // 0x23b0 @0x0
0x23b0…23dc lno = 0x151a // 0x23b2 @0x2
0x23b0…23dc at0004 = ╱82╱ IF ╱ // 0x23b4 @0x4
0x23b0…23dc at0005 = ╱4a╱J╱ // 0x23b5 @0x5
0x23b0…23dc at0006 = ╱35╱5╱ // 0x23b6 @0x6
0x23b0…23dc at0007 = ╱dc╱=╱ // 0x23b7 @0x7
0x23b0…23dc at0008 = ╱34╱4╱ // 0x23b8 @0x8
0x23b0…23dc at0009 = ╱30╱0╱ // 0x23b9 @0x9
0x23b0…23dc at000a = ╱fe0000a006╱ // 0x23ba @0xa
0x23b0…23dc at000f = ╱b6╱ THEN ╱ // 0x23bf @0xf
0x23b0…23dc at0010 = ╱9d╱ EXEC ╱ // 0x23c0 @0x10
0x23b0…23dc at0011 = ╱4f╱O╱ // 0x23c1 @0x11
0x23b0…23dc at0012 = ╱50╱P╱ // 0x23c2 @0x12
0x23b0…23dc at0013 = ╱ed╱(╱ // 0x23c3 @0x13
0x23b0…23dc at0014 = ╱31╱1╱ // 0x23c4 @0x14
0x23b0…23dc at0015 = ╱fe00008001╱ // 0x23c5 @0x15
0x23b0…23dc at001a = ╱ec╱,╱ // 0x23ca @0x1a
0x23b0…23dc at001b = ╱44╱D╱ // 0x23cb @0x1b
0x23b0…23dc at001c = ╱36╱6╱ // 0x23cc @0x1c
0x23b0…23dc at001d = ╱ef╱$╱ // 0x23cd @0x1d
0x23b0…23dc at001e = ╱ed╱(╱ // 0x23ce @0x1e
0x23b0…23dc at001f = ╱41╱A╱ // 0x23cf @0x1f
0x23b0…23dc at0020 = ╱5a╱Z╱ // 0x23d0 @0x20
0x23b0…23dc at0021 = ╱ec╱,╱ // 0x23d1 @0x21
0x23b0…23dc at0022 = ╱33╱3╱ // 0x23d2 @0x22
0x23b0…23dc at0023 = ╱37╱7╱ // 0x23d3 @0x23
0x23b0…23dc at0024 = ╱fe00009406╱ // 0x23d4 @0x24
0x23b0…23dc at0029 = ╱ee╱)╱ // 0x23d9 @0x29
0x23b0…23dc at002a = ╱ee╱)╱ // 0x23da @0x2a
0x23b0…23dc at002b = EOL // 0x23db @0x2b
0x23b0…23dc }
0x23dc…23ed b144 5405 IF J5>61 THEN
0x23dc…23ed LineComalBin {
0x23dc…23ed ptr = 0xb144 // 0x23dc @0x0
0x23dc…23ed lno = 0x151d // 0x23de @0x2
0x23dc…23ed at0004 = ╱9c╱ IF ╱ // 0x23e0 @0x4
0x23dc…23ed at0005 = ╱4a╱J╱ // 0x23e1 @0x5
0x23dc…23ed at0006 = ╱35╱5╱ // 0x23e2 @0x6
0x23dc…23ed at0007 = ╱de╱>╱ // 0x23e3 @0x7
0x23dc…23ed at0008 = ╱36╱6╱ // 0x23e4 @0x8
0x23dc…23ed at0009 = ╱31╱1╱ // 0x23e5 @0x9
0x23dc…23ed at000a = ╱fe0000f406╱ // 0x23e6 @0xa
0x23dc…23ed at000f = ╱b6╱ THEN ╱ // 0x23eb @0xf
0x23dc…23ed at0010 = EOL // 0x23ec @0x10
0x23dc…23ed }
0x23ed…2402 b159 5406 D6$(37)="-"
0x23ed…2402 LineComalBin {
0x23ed…2402 ptr = 0xb159 // 0x23ed @0x0
0x23ed…2402 lno = 0x151e // 0x23ef @0x2
0x23ed…2402 at0004 = ╱44╱D╱ // 0x23f1 @0x4
0x23ed…2402 at0005 = ╱36╱6╱ // 0x23f2 @0x5
0x23ed…2402 at0006 = ╱ef╱$╱ // 0x23f3 @0x6
0x23ed…2402 at0007 = ╱ed╱(╱ // 0x23f4 @0x7
0x23ed…2402 at0008 = ╱33╱3╱ // 0x23f5 @0x8
0x23ed…2402 at0009 = ╱37╱7╱ // 0x23f6 @0x9
0x23ed…2402 at000a = ╱fe00009406╱ // 0x23f7 @0xa
0x23ed…2402 at000f = ╱ee╱)╱ // 0x23fc @0xf
0x23ed…2402 at0010 = ╱dc╱=╱ // 0x23fd @0x10
0x23ed…2402 at0011 = ╱22╱"╱ // 0x23fe @0x11
0x23ed…2402 at0012 = ╱2d╱-╱ // 0x23ff @0x12
0x23ed…2402 at0013 = ╱22╱"╱ // 0x2400 @0x13
0x23ed…2402 at0014 = EOL // 0x2401 @0x14
0x23ed…2402 }
0x2402…244e b1a5 5407 C3$=B6$(EL+20*(J5=62)+30*(J5=64):TI);C4$=D6$(AZ:TI)
0x2402…244e LineComalBin {
0x2402…244e ptr = 0xb1a5 // 0x2402 @0x0
0x2402…244e lno = 0x151f // 0x2404 @0x2
0x2402…244e at0004 = ╱43╱C╱ // 0x2406 @0x4
0x2402…244e at0005 = ╱33╱3╱ // 0x2407 @0x5
0x2402…244e at0006 = ╱ef╱$╱ // 0x2408 @0x6
0x2402…244e at0007 = ╱dc╱=╱ // 0x2409 @0x7
0x2402…244e at0008 = ╱42╱B╱ // 0x240a @0x8
0x2402…244e at0009 = ╱36╱6╱ // 0x240b @0x9
0x2402…244e at000a = ╱ef╱$╱ // 0x240c @0xa
0x2402…244e at000b = ╱ed╱(╱ // 0x240d @0xb
0x2402…244e at000c = ╱45╱E╱ // 0x240e @0xc
0x2402…244e at000d = ╱4c╱L╱ // 0x240f @0xd
0x2402…244e at000e = ╱e2╱+╱ // 0x2410 @0xe
0x2402…244e at000f = ╱32╱2╱ // 0x2411 @0xf
0x2402…244e at0010 = ╱30╱0╱ // 0x2412 @0x10
0x2402…244e at0011 = ╱fe0000a005╱ // 0x2413 @0x11
0x2402…244e at0016 = ╱e4╱*╱ // 0x2418 @0x16
0x2402…244e at0017 = ╱ed╱(╱ // 0x2419 @0x17
0x2402…244e at0018 = ╱4a╱J╱ // 0x241a @0x18
0x2402…244e at0019 = ╱35╱5╱ // 0x241b @0x19
0x2402…244e at001a = ╱dc╱=╱ // 0x241c @0x1a
0x2402…244e at001b = ╱36╱6╱ // 0x241d @0x1b
0x2402…244e at001c = ╱32╱2╱ // 0x241e @0x1c
0x2402…244e at001d = ╱fe0000f806╱ // 0x241f @0x1d
0x2402…244e at0022 = ╱ee╱)╱ // 0x2424 @0x22
0x2402…244e at0023 = ╱e2╱+╱ // 0x2425 @0x23
0x2402…244e at0024 = ╱33╱3╱ // 0x2426 @0x24
0x2402…244e at0025 = ╱30╱0╱ // 0x2427 @0x25
0x2402…244e at0026 = ╱fe0000f005╱ // 0x2428 @0x26
0x2402…244e at002b = ╱e4╱*╱ // 0x242d @0x2b
0x2402…244e at002c = ╱ed╱(╱ // 0x242e @0x2c
0x2402…244e at002d = ╱4a╱J╱ // 0x242f @0x2d
0x2402…244e at002e = ╱35╱5╱ // 0x2430 @0x2e
0x2402…244e at002f = ╱dc╱=╱ // 0x2431 @0x2f
0x2402…244e at0030 = ╱36╱6╱ // 0x2432 @0x30
0x2402…244e at0031 = ╱34╱4╱ // 0x2433 @0x31
0x2402…244e at0032 = ╱fe00008007╱ // 0x2434 @0x32
0x2402…244e at0037 = ╱ee╱)╱ // 0x2439 @0x37
0x2402…244e at0038 = ╱f0╱:╱ // 0x243a @0x38
0x2402…244e at0039 = ╱54╱T╱ // 0x243b @0x39
0x2402…244e at003a = ╱49╱I╱ // 0x243c @0x3a
0x2402…244e at003b = ╱ee╱)╱ // 0x243d @0x3b
0x2402…244e at003c = ╱eb╱;╱ // 0x243e @0x3c
0x2402…244e at003d = ╱43╱C╱ // 0x243f @0x3d
0x2402…244e at003e = ╱34╱4╱ // 0x2440 @0x3e
0x2402…244e at003f = ╱ef╱$╱ // 0x2441 @0x3f
0x2402…244e at0040 = ╱dc╱=╱ // 0x2442 @0x40
0x2402…244e at0041 = ╱44╱D╱ // 0x2443 @0x41
0x2402…244e at0042 = ╱36╱6╱ // 0x2444 @0x42
0x2402…244e at0043 = ╱ef╱$╱ // 0x2445 @0x43
0x2402…244e at0044 = ╱ed╱(╱ // 0x2446 @0x44
0x2402…244e at0045 = ╱41╱A╱ // 0x2447 @0x45
0x2402…244e at0046 = ╱5a╱Z╱ // 0x2448 @0x46
0x2402…244e at0047 = ╱f0╱:╱ // 0x2449 @0x47
0x2402…244e at0048 = ╱54╱T╱ // 0x244a @0x48
0x2402…244e at0049 = ╱49╱I╱ // 0x244b @0x49
0x2402…244e at004a = ╱ee╱)╱ // 0x244c @0x4a
0x2402…244e at004b = EOL // 0x244d @0x4b
0x2402…244e }
0x244e…2469 b1c0 5408 EXEC C(0,C3$,C4$,C3$)
0x244e…2469 LineComalBin {
0x244e…2469 ptr = 0xb1c0 // 0x244e @0x0
0x244e…2469 lno = 0x1520 // 0x2450 @0x2
0x244e…2469 at0004 = ╱9d╱ EXEC ╱ // 0x2452 @0x4
0x244e…2469 at0005 = ╱43╱C╱ // 0x2453 @0x5
0x244e…2469 at0006 = ╱ed╱(╱ // 0x2454 @0x6
0x244e…2469 at0007 = ╱30╱0╱ // 0x2455 @0x7
0x244e…2469 at0008 = ╱fe00000000╱ // 0x2456 @0x8
0x244e…2469 at000d = ╱ec╱,╱ // 0x245b @0xd
0x244e…2469 at000e = ╱43╱C╱ // 0x245c @0xe
0x244e…2469 at000f = ╱33╱3╱ // 0x245d @0xf
0x244e…2469 at0010 = ╱ef╱$╱ // 0x245e @0x10
0x244e…2469 at0011 = ╱ec╱,╱ // 0x245f @0x11
0x244e…2469 at0012 = ╱43╱C╱ // 0x2460 @0x12
0x244e…2469 at0013 = ╱34╱4╱ // 0x2461 @0x13
0x244e…2469 at0014 = ╱ef╱$╱ // 0x2462 @0x14
0x244e…2469 at0015 = ╱ec╱,╱ // 0x2463 @0x15
0x244e…2469 at0016 = ╱43╱C╱ // 0x2464 @0x16
0x244e…2469 at0017 = ╱33╱3╱ // 0x2465 @0x17
0x244e…2469 at0018 = ╱ef╱$╱ // 0x2466 @0x18
0x244e…2469 at0019 = ╱ee╱)╱ // 0x2467 @0x19
0x244e…2469 at001a = EOL // 0x2468 @0x1a
0x244e…2469 }
0x2469…24ac b203 5409 B6$(EL+20*(J5=62)+30*(J5=64):TI)=C3$(V:TI)
0x2469…24ac LineComalBin {
0x2469…24ac ptr = 0xb203 // 0x2469 @0x0
0x2469…24ac lno = 0x1521 // 0x246b @0x2
0x2469…24ac at0004 = ╱42╱B╱ // 0x246d @0x4
0x2469…24ac at0005 = ╱36╱6╱ // 0x246e @0x5
0x2469…24ac at0006 = ╱ef╱$╱ // 0x246f @0x6
0x2469…24ac at0007 = ╱ed╱(╱ // 0x2470 @0x7
0x2469…24ac at0008 = ╱45╱E╱ // 0x2471 @0x8
0x2469…24ac at0009 = ╱4c╱L╱ // 0x2472 @0x9
0x2469…24ac at000a = ╱e2╱+╱ // 0x2473 @0xa
0x2469…24ac at000b = ╱32╱2╱ // 0x2474 @0xb
0x2469…24ac at000c = ╱30╱0╱ // 0x2475 @0xc
0x2469…24ac at000d = ╱fe0000a005╱ // 0x2476 @0xd
0x2469…24ac at0012 = ╱e4╱*╱ // 0x247b @0x12
0x2469…24ac at0013 = ╱ed╱(╱ // 0x247c @0x13
0x2469…24ac at0014 = ╱4a╱J╱ // 0x247d @0x14
0x2469…24ac at0015 = ╱35╱5╱ // 0x247e @0x15
0x2469…24ac at0016 = ╱dc╱=╱ // 0x247f @0x16
0x2469…24ac at0017 = ╱36╱6╱ // 0x2480 @0x17
0x2469…24ac at0018 = ╱32╱2╱ // 0x2481 @0x18
0x2469…24ac at0019 = ╱fe0000f806╱ // 0x2482 @0x19
0x2469…24ac at001e = ╱ee╱)╱ // 0x2487 @0x1e
0x2469…24ac at001f = ╱e2╱+╱ // 0x2488 @0x1f
0x2469…24ac at0020 = ╱33╱3╱ // 0x2489 @0x20
0x2469…24ac at0021 = ╱30╱0╱ // 0x248a @0x21
0x2469…24ac at0022 = ╱fe0000f005╱ // 0x248b @0x22
0x2469…24ac at0027 = ╱e4╱*╱ // 0x2490 @0x27
0x2469…24ac at0028 = ╱ed╱(╱ // 0x2491 @0x28
0x2469…24ac at0029 = ╱4a╱J╱ // 0x2492 @0x29
0x2469…24ac at002a = ╱35╱5╱ // 0x2493 @0x2a
0x2469…24ac at002b = ╱dc╱=╱ // 0x2494 @0x2b
0x2469…24ac at002c = ╱36╱6╱ // 0x2495 @0x2c
0x2469…24ac at002d = ╱34╱4╱ // 0x2496 @0x2d
0x2469…24ac at002e = ╱fe00008007╱ // 0x2497 @0x2e
0x2469…24ac at0033 = ╱ee╱)╱ // 0x249c @0x33
0x2469…24ac at0034 = ╱f0╱:╱ // 0x249d @0x34
0x2469…24ac at0035 = ╱54╱T╱ // 0x249e @0x35
0x2469…24ac at0036 = ╱49╱I╱ // 0x249f @0x36
0x2469…24ac at0037 = ╱ee╱)╱ // 0x24a0 @0x37
0x2469…24ac at0038 = ╱dc╱=╱ // 0x24a1 @0x38
0x2469…24ac at0039 = ╱43╱C╱ // 0x24a2 @0x39
0x2469…24ac at003a = ╱33╱3╱ // 0x24a3 @0x3a
0x2469…24ac at003b = ╱ef╱$╱ // 0x24a4 @0x3b
0x2469…24ac at003c = ╱ed╱(╱ // 0x24a5 @0x3c
0x2469…24ac at003d = ╱56╱V╱ // 0x24a6 @0x3d
0x2469…24ac at003e = ╱f0╱:╱ // 0x24a7 @0x3e
0x2469…24ac at003f = ╱54╱T╱ // 0x24a8 @0x3f
0x2469…24ac at0040 = ╱49╱I╱ // 0x24a9 @0x40
0x2469…24ac at0041 = ╱ee╱)╱ // 0x24aa @0x41
0x2469…24ac at0042 = EOL // 0x24ab @0x42
0x2469…24ac }
0x24ac…24b2 b209 5415 ENDIF
0x24ac…24b2 LineComalBin {
0x24ac…24b2 ptr = 0xb209 // 0x24ac @0x0
0x24ac…24b2 lno = 0x1527 // 0x24ae @0x2
0x24ac…24b2 at0004 = ╱9b╱ ENDIF ╱ // 0x24b0 @0x4
0x24ac…24b2 at0005 = EOL // 0x24b1 @0x5
0x24ac…24b2 }
0x24b2…24d6 (122,) b22d 5418 F0$(45,54)=D6$(EL:TI)
0x24b2…24d6 LineComalBin {
0x24b2…24d6 ptr = 0xb22d // 0x24b2 @0x0
0x24b2…24d6 lno = 0x152a // 0x24b4 @0x2
0x24b2…24d6 at0004 = ╱46╱F╱ // 0x24b6 @0x4
0x24b2…24d6 at0005 = ╱30╱0╱ // 0x24b7 @0x5
0x24b2…24d6 at0006 = ╱ef╱$╱ // 0x24b8 @0x6
0x24b2…24d6 at0007 = ╱ed╱(╱ // 0x24b9 @0x7
0x24b2…24d6 at0008 = ╱34╱4╱ // 0x24ba @0x8
0x24b2…24d6 at0009 = ╱35╱5╱ // 0x24bb @0x9
0x24b2…24d6 at000a = ╱fe0000b406╱ // 0x24bc @0xa
0x24b2…24d6 at000f = ╱ec╱,╱ // 0x24c1 @0xf
0x24b2…24d6 at0010 = ╱35╱5╱ // 0x24c2 @0x10
0x24b2…24d6 at0011 = ╱34╱4╱ // 0x24c3 @0x11
0x24b2…24d6 at0012 = ╱fe0000d806╱ // 0x24c4 @0x12
0x24b2…24d6 at0017 = ╱ee╱)╱ // 0x24c9 @0x17
0x24b2…24d6 at0018 = ╱dc╱=╱ // 0x24ca @0x18
0x24b2…24d6 at0019 = ╱44╱D╱ // 0x24cb @0x19
0x24b2…24d6 at001a = ╱36╱6╱ // 0x24cc @0x1a
0x24b2…24d6 at001b = ╱ef╱$╱ // 0x24cd @0x1b
0x24b2…24d6 at001c = ╱ed╱(╱ // 0x24ce @0x1c
0x24b2…24d6 at001d = ╱45╱E╱ // 0x24cf @0x1d
0x24b2…24d6 at001e = ╱4c╱L╱ // 0x24d0 @0x1e
0x24b2…24d6 at001f = ╱f0╱:╱ // 0x24d1 @0x1f
0x24b2…24d6 at0020 = ╱54╱T╱ // 0x24d2 @0x20
0x24b2…24d6 at0021 = ╱49╱I╱ // 0x24d3 @0x21
0x24b2…24d6 at0022 = ╱ee╱)╱ // 0x24d4 @0x22
0x24b2…24d6 at0023 = EOL // 0x24d5 @0x23
0x24b2…24d6 }
0x24d6…2503 b25a 5420 F0$(56,62)=D6$(21:7)
0x24d6…2503 LineComalBin {
0x24d6…2503 ptr = 0xb25a // 0x24d6 @0x0
0x24d6…2503 lno = 0x152c // 0x24d8 @0x2
0x24d6…2503 at0004 = ╱46╱F╱ // 0x24da @0x4
0x24d6…2503 at0005 = ╱30╱0╱ // 0x24db @0x5
0x24d6…2503 at0006 = ╱ef╱$╱ // 0x24dc @0x6
0x24d6…2503 at0007 = ╱ed╱(╱ // 0x24dd @0x7
0x24d6…2503 at0008 = ╱35╱5╱ // 0x24de @0x8
0x24d6…2503 at0009 = ╱36╱6╱ // 0x24df @0x9
0x24d6…2503 at000a = ╱fe0000e006╱ // 0x24e0 @0xa
0x24d6…2503 at000f = ╱ec╱,╱ // 0x24e5 @0xf
0x24d6…2503 at0010 = ╱36╱6╱ // 0x24e6 @0x10
0x24d6…2503 at0011 = ╱32╱2╱ // 0x24e7 @0x11
0x24d6…2503 at0012 = ╱fe0000f806╱ // 0x24e8 @0x12
0x24d6…2503 at0017 = ╱ee╱)╱ // 0x24ed @0x17
0x24d6…2503 at0018 = ╱dc╱=╱ // 0x24ee @0x18
0x24d6…2503 at0019 = ╱44╱D╱ // 0x24ef @0x19
0x24d6…2503 at001a = ╱36╱6╱ // 0x24f0 @0x1a
0x24d6…2503 at001b = ╱ef╱$╱ // 0x24f1 @0x1b
0x24d6…2503 at001c = ╱ed╱(╱ // 0x24f2 @0x1c
0x24d6…2503 at001d = ╱32╱2╱ // 0x24f3 @0x1d
0x24d6…2503 at001e = ╱31╱1╱ // 0x24f4 @0x1e
0x24d6…2503 at001f = ╱fe0000a805╱ // 0x24f5 @0x1f
0x24d6…2503 at0024 = ╱f0╱:╱ // 0x24fa @0x24
0x24d6…2503 at0025 = ╱37╱7╱ // 0x24fb @0x25
0x24d6…2503 at0026 = ╱fe0000e003╱ // 0x24fc @0x26
0x24d6…2503 at002b = ╱ee╱)╱ // 0x2501 @0x2b
0x24d6…2503 at002c = EOL // 0x2502 @0x2c
0x24d6…2503 }
0x2503…251a b271 5430 IF D6$(37)="+" THEN
0x2503…251a LineComalBin {
0x2503…251a ptr = 0xb271 // 0x2503 @0x0
0x2503…251a lno = 0x1536 // 0x2505 @0x2
0x2503…251a at0004 = ╱9c╱ IF ╱ // 0x2507 @0x4
0x2503…251a at0005 = ╱44╱D╱ // 0x2508 @0x5
0x2503…251a at0006 = ╱36╱6╱ // 0x2509 @0x6
0x2503…251a at0007 = ╱ef╱$╱ // 0x250a @0x7
0x2503…251a at0008 = ╱ed╱(╱ // 0x250b @0x8
0x2503…251a at0009 = ╱33╱3╱ // 0x250c @0x9
0x2503…251a at000a = ╱37╱7╱ // 0x250d @0xa
0x2503…251a at000b = ╱fe00009406╱ // 0x250e @0xb
0x2503…251a at0010 = ╱ee╱)╱ // 0x2513 @0x10
0x2503…251a at0011 = ╱dc╱=╱ // 0x2514 @0x11
0x2503…251a at0012 = ╱22╱"╱ // 0x2515 @0x12
0x2503…251a at0013 = ╱2b╱+╱ // 0x2516 @0x13
0x2503…251a at0014 = ╱22╱"╱ // 0x2517 @0x14
0x2503…251a at0015 = ╱b6╱ THEN ╱ // 0x2518 @0x15
0x2503…251a at0016 = EOL // 0x2519 @0x16
0x2503…251a }
0x251a…2537 b28e 5440 F0$(65:W)=D6$(AZ:W)
0x251a…2537 LineComalBin {
0x251a…2537 ptr = 0xb28e // 0x251a @0x0
0x251a…2537 lno = 0x1540 // 0x251c @0x2
0x251a…2537 at0004 = ╱46╱F╱ // 0x251e @0x4
0x251a…2537 at0005 = ╱30╱0╱ // 0x251f @0x5
0x251a…2537 at0006 = ╱ef╱$╱ // 0x2520 @0x6
0x251a…2537 at0007 = ╱ed╱(╱ // 0x2521 @0x7
0x251a…2537 at0008 = ╱36╱6╱ // 0x2522 @0x8
0x251a…2537 at0009 = ╱35╱5╱ // 0x2523 @0x9
0x251a…2537 at000a = ╱fe00008207╱ // 0x2524 @0xa
0x251a…2537 at000f = ╱f0╱:╱ // 0x2529 @0xf
0x251a…2537 at0010 = ╱57╱W╱ // 0x252a @0x10
0x251a…2537 at0011 = ╱ee╱)╱ // 0x252b @0x11
0x251a…2537 at0012 = ╱dc╱=╱ // 0x252c @0x12
0x251a…2537 at0013 = ╱44╱D╱ // 0x252d @0x13
0x251a…2537 at0014 = ╱36╱6╱ // 0x252e @0x14
0x251a…2537 at0015 = ╱ef╱$╱ // 0x252f @0x15
0x251a…2537 at0016 = ╱ed╱(╱ // 0x2530 @0x16
0x251a…2537 at0017 = ╱41╱A╱ // 0x2531 @0x17
0x251a…2537 at0018 = ╱5a╱Z╱ // 0x2532 @0x18
0x251a…2537 at0019 = ╱f0╱:╱ // 0x2533 @0x19
0x251a…2537 at001a = ╱57╱W╱ // 0x2534 @0x1a
0x251a…2537 at001b = ╱ee╱)╱ // 0x2535 @0x1b
0x251a…2537 at001c = EOL // 0x2536 @0x1c
0x251a…2537 }
0x2537…253d b294 5450 ELSE
0x2537…253d LineComalBin {
0x2537…253d ptr = 0xb294 // 0x2537 @0x0
0x2537…253d lno = 0x154a // 0x2539 @0x2
0x2537…253d at0004 = ╱9a╱ ELSE ╱ // 0x253b @0x4
0x2537…253d at0005 = EOL // 0x253c @0x5
0x2537…253d }
0x253d…2560 b2b7 5460 F0$(71,79)=D6$(AZ:W)
0x253d…2560 LineComalBin {
0x253d…2560 ptr = 0xb2b7 // 0x253d @0x0
0x253d…2560 lno = 0x1554 // 0x253f @0x2
0x253d…2560 at0004 = ╱46╱F╱ // 0x2541 @0x4
0x253d…2560 at0005 = ╱30╱0╱ // 0x2542 @0x5
0x253d…2560 at0006 = ╱ef╱$╱ // 0x2543 @0x6
0x253d…2560 at0007 = ╱ed╱(╱ // 0x2544 @0x7
0x253d…2560 at0008 = ╱37╱7╱ // 0x2545 @0x8
0x253d…2560 at0009 = ╱31╱1╱ // 0x2546 @0x9
0x253d…2560 at000a = ╱fe00008e07╱ // 0x2547 @0xa
0x253d…2560 at000f = ╱ec╱,╱ // 0x254c @0xf
0x253d…2560 at0010 = ╱37╱7╱ // 0x254d @0x10
0x253d…2560 at0011 = ╱39╱9╱ // 0x254e @0x11
0x253d…2560 at0012 = ╱fe00009e07╱ // 0x254f @0x12
0x253d…2560 at0017 = ╱ee╱)╱ // 0x2554 @0x17
0x253d…2560 at0018 = ╱dc╱=╱ // 0x2555 @0x18
0x253d…2560 at0019 = ╱44╱D╱ // 0x2556 @0x19
0x253d…2560 at001a = ╱36╱6╱ // 0x2557 @0x1a
0x253d…2560 at001b = ╱ef╱$╱ // 0x2558 @0x1b
0x253d…2560 at001c = ╱ed╱(╱ // 0x2559 @0x1c
0x253d…2560 at001d = ╱41╱A╱ // 0x255a @0x1d
0x253d…2560 at001e = ╱5a╱Z╱ // 0x255b @0x1e
0x253d…2560 at001f = ╱f0╱:╱ // 0x255c @0x1f
0x253d…2560 at0020 = ╱57╱W╱ // 0x255d @0x20
0x253d…2560 at0021 = ╱ee╱)╱ // 0x255e @0x21
0x253d…2560 at0022 = EOL // 0x255f @0x22
0x253d…2560 }
0x2560…2566 b2bd 5470 ENDIF
0x2560…2566 LineComalBin {
0x2560…2566 ptr = 0xb2bd // 0x2560 @0x0
0x2560…2566 lno = 0x155e // 0x2562 @0x2
0x2560…2566 at0004 = ╱9b╱ ENDIF ╱ // 0x2564 @0x4
0x2560…2566 at0005 = EOL // 0x2565 @0x5
0x2560…2566 }
0x2566…258f b2e6 5480 WHEN J5=61 OR (J5>64 AND J5<70)
0x2566…258f LineComalBin {
0x2566…258f ptr = 0xb2e6 // 0x2566 @0x0
0x2566…258f lno = 0x1568 // 0x2568 @0x2
0x2566…258f at0004 = ╱a301╱ WHEN ╱ // 0x256a @0x4
0x2566…258f at0006 = ╱4a╱J╱ // 0x256c @0x6
0x2566…258f at0007 = ╱35╱5╱ // 0x256d @0x7
0x2566…258f at0008 = ╱dc╱=╱ // 0x256e @0x8
0x2566…258f at0009 = ╱36╱6╱ // 0x256f @0x9
0x2566…258f at000a = ╱31╱1╱ // 0x2570 @0xa
0x2566…258f at000b = ╱fe0000f406╱ // 0x2571 @0xb
0x2566…258f at0010 = ╱db╱ OR ╱ // 0x2576 @0x10
0x2566…258f at0011 = ╱ed╱(╱ // 0x2577 @0x11
0x2566…258f at0012 = ╱4a╱J╱ // 0x2578 @0x12
0x2566…258f at0013 = ╱35╱5╱ // 0x2579 @0x13
0x2566…258f at0014 = ╱de╱>╱ // 0x257a @0x14
0x2566…258f at0015 = ╱36╱6╱ // 0x257b @0x15
0x2566…258f at0016 = ╱34╱4╱ // 0x257c @0x16
0x2566…258f at0017 = ╱fe00008007╱ // 0x257d @0x17
0x2566…258f at001c = ╱da╱ AND ╱ // 0x2582 @0x1c
0x2566…258f at001d = ╱4a╱J╱ // 0x2583 @0x1d
0x2566…258f at001e = ╱35╱5╱ // 0x2584 @0x1e
0x2566…258f at001f = ╱dd╱<╱ // 0x2585 @0x1f
0x2566…258f at0020 = ╱37╱7╱ // 0x2586 @0x20
0x2566…258f at0021 = ╱30╱0╱ // 0x2587 @0x21
0x2566…258f at0022 = ╱fe00008c07╱ // 0x2588 @0x22
0x2566…258f at0027 = ╱ee╱)╱ // 0x258d @0x27
0x2566…258f at0028 = EOL // 0x258e @0x28
0x2566…258f }
0x258f…25a4 b2fb 5490 D6$(37)="+"
0x258f…25a4 LineComalBin {
0x258f…25a4 ptr = 0xb2fb // 0x258f @0x0
0x258f…25a4 lno = 0x1572 // 0x2591 @0x2
0x258f…25a4 at0004 = ╱44╱D╱ // 0x2593 @0x4
0x258f…25a4 at0005 = ╱36╱6╱ // 0x2594 @0x5
0x258f…25a4 at0006 = ╱ef╱$╱ // 0x2595 @0x6
0x258f…25a4 at0007 = ╱ed╱(╱ // 0x2596 @0x7
0x258f…25a4 at0008 = ╱33╱3╱ // 0x2597 @0x8
0x258f…25a4 at0009 = ╱37╱7╱ // 0x2598 @0x9
0x258f…25a4 at000a = ╱fe00009406╱ // 0x2599 @0xa
0x258f…25a4 at000f = ╱ee╱)╱ // 0x259e @0xf
0x258f…25a4 at0010 = ╱dc╱=╱ // 0x259f @0x10
0x258f…25a4 at0011 = ╱22╱"╱ // 0x25a0 @0x11
0x258f…25a4 at0012 = ╱2b╱+╱ // 0x25a1 @0x12
0x258f…25a4 at0013 = ╱22╱"╱ // 0x25a2 @0x13
0x258f…25a4 at0014 = EOL // 0x25a3 @0x14
0x258f…25a4 }
0x25a4…25c5 b31c 5492 IF J5>67 THEN D6$(37)="-"
0x25a4…25c5 LineComalBin {
0x25a4…25c5 ptr = 0xb31c // 0x25a4 @0x0
0x25a4…25c5 lno = 0x1574 // 0x25a6 @0x2
0x25a4…25c5 at0004 = ╱82╱ IF ╱ // 0x25a8 @0x4
0x25a4…25c5 at0005 = ╱4a╱J╱ // 0x25a9 @0x5
0x25a4…25c5 at0006 = ╱35╱5╱ // 0x25aa @0x6
0x25a4…25c5 at0007 = ╱de╱>╱ // 0x25ab @0x7
0x25a4…25c5 at0008 = ╱36╱6╱ // 0x25ac @0x8
0x25a4…25c5 at0009 = ╱37╱7╱ // 0x25ad @0x9
0x25a4…25c5 at000a = ╱fe00008607╱ // 0x25ae @0xa
0x25a4…25c5 at000f = ╱b6╱ THEN ╱ // 0x25b3 @0xf
0x25a4…25c5 at0010 = ╱44╱D╱ // 0x25b4 @0x10
0x25a4…25c5 at0011 = ╱36╱6╱ // 0x25b5 @0x11
0x25a4…25c5 at0012 = ╱ef╱$╱ // 0x25b6 @0x12
0x25a4…25c5 at0013 = ╱ed╱(╱ // 0x25b7 @0x13
0x25a4…25c5 at0014 = ╱33╱3╱ // 0x25b8 @0x14
0x25a4…25c5 at0015 = ╱37╱7╱ // 0x25b9 @0x15
0x25a4…25c5 at0016 = ╱fe00009406╱ // 0x25ba @0x16
0x25a4…25c5 at001b = ╱ee╱)╱ // 0x25bf @0x1b
0x25a4…25c5 at001c = ╱dc╱=╱ // 0x25c0 @0x1c
0x25a4…25c5 at001d = ╱22╱"╱ // 0x25c1 @0x1d
0x25a4…25c5 at001e = ╱2d╱-╱ // 0x25c2 @0x1e
0x25a4…25c5 at001f = ╱22╱"╱ // 0x25c3 @0x1f
0x25a4…25c5 at0020 = EOL // 0x25c4 @0x20
0x25a4…25c5 }
0x25c5…25d8 b32f 5500 F1$=D6$(EL:TI)
0x25c5…25d8 LineComalBin {
0x25c5…25d8 ptr = 0xb32f // 0x25c5 @0x0
0x25c5…25d8 lno = 0x157c // 0x25c7 @0x2
0x25c5…25d8 at0004 = ╱46╱F╱ // 0x25c9 @0x4
0x25c5…25d8 at0005 = ╱31╱1╱ // 0x25ca @0x5
0x25c5…25d8 at0006 = ╱ef╱$╱ // 0x25cb @0x6
0x25c5…25d8 at0007 = ╱dc╱=╱ // 0x25cc @0x7
0x25c5…25d8 at0008 = ╱44╱D╱ // 0x25cd @0x8
0x25c5…25d8 at0009 = ╱36╱6╱ // 0x25ce @0x9
0x25c5…25d8 at000a = ╱ef╱$╱ // 0x25cf @0xa
0x25c5…25d8 at000b = ╱ed╱(╱ // 0x25d0 @0xb
0x25c5…25d8 at000c = ╱45╱E╱ // 0x25d1 @0xc
0x25c5…25d8 at000d = ╱4c╱L╱ // 0x25d2 @0xd
0x25c5…25d8 at000e = ╱f0╱:╱ // 0x25d3 @0xe
0x25c5…25d8 at000f = ╱54╱T╱ // 0x25d4 @0xf
0x25c5…25d8 at0010 = ╱49╱I╱ // 0x25d5 @0x10
0x25c5…25d8 at0011 = ╱ee╱)╱ // 0x25d6 @0x11
0x25c5…25d8 at0012 = EOL // 0x25d7 @0x12
0x25c5…25d8 }
0x25d8…25eb b342 5510 C3$=D6$(AZ:TI)
0x25d8…25eb LineComalBin {
0x25d8…25eb ptr = 0xb342 // 0x25d8 @0x0
0x25d8…25eb lno = 0x1586 // 0x25da @0x2
0x25d8…25eb at0004 = ╱43╱C╱ // 0x25dc @0x4
0x25d8…25eb at0005 = ╱33╱3╱ // 0x25dd @0x5
0x25d8…25eb at0006 = ╱ef╱$╱ // 0x25de @0x6
0x25d8…25eb at0007 = ╱dc╱=╱ // 0x25df @0x7
0x25d8…25eb at0008 = ╱44╱D╱ // 0x25e0 @0x8
0x25d8…25eb at0009 = ╱36╱6╱ // 0x25e1 @0x9
0x25d8…25eb at000a = ╱ef╱$╱ // 0x25e2 @0xa
0x25d8…25eb at000b = ╱ed╱(╱ // 0x25e3 @0xb
0x25d8…25eb at000c = ╱41╱A╱ // 0x25e4 @0xc
0x25d8…25eb at000d = ╱5a╱Z╱ // 0x25e5 @0xd
0x25d8…25eb at000e = ╱f0╱:╱ // 0x25e6 @0xe
0x25d8…25eb at000f = ╱54╱T╱ // 0x25e7 @0xf
0x25d8…25eb at0010 = ╱49╱I╱ // 0x25e8 @0x10
0x25d8…25eb at0011 = ╱ee╱)╱ // 0x25e9 @0x11
0x25d8…25eb at0012 = EOL // 0x25ea @0x12
0x25d8…25eb }
0x25eb…2606 b35d 5520 EXEC C(0,F1$,C3$,C4$)
0x25eb…2606 LineComalBin {
0x25eb…2606 ptr = 0xb35d // 0x25eb @0x0
0x25eb…2606 lno = 0x1590 // 0x25ed @0x2
0x25eb…2606 at0004 = ╱9d╱ EXEC ╱ // 0x25ef @0x4
0x25eb…2606 at0005 = ╱43╱C╱ // 0x25f0 @0x5
0x25eb…2606 at0006 = ╱ed╱(╱ // 0x25f1 @0x6
0x25eb…2606 at0007 = ╱30╱0╱ // 0x25f2 @0x7
0x25eb…2606 at0008 = ╱fe00000000╱ // 0x25f3 @0x8
0x25eb…2606 at000d = ╱ec╱,╱ // 0x25f8 @0xd
0x25eb…2606 at000e = ╱46╱F╱ // 0x25f9 @0xe
0x25eb…2606 at000f = ╱31╱1╱ // 0x25fa @0xf
0x25eb…2606 at0010 = ╱ef╱$╱ // 0x25fb @0x10
0x25eb…2606 at0011 = ╱ec╱,╱ // 0x25fc @0x11
0x25eb…2606 at0012 = ╱43╱C╱ // 0x25fd @0x12
0x25eb…2606 at0013 = ╱33╱3╱ // 0x25fe @0x13
0x25eb…2606 at0014 = ╱ef╱$╱ // 0x25ff @0x14
0x25eb…2606 at0015 = ╱ec╱,╱ // 0x2600 @0x15
0x25eb…2606 at0016 = ╱43╱C╱ // 0x2601 @0x16
0x25eb…2606 at0017 = ╱34╱4╱ // 0x2602 @0x17
0x25eb…2606 at0018 = ╱ef╱$╱ // 0x2603 @0x18
0x25eb…2606 at0019 = ╱ee╱)╱ // 0x2604 @0x19
0x25eb…2606 at001a = EOL // 0x2605 @0x1a
0x25eb…2606 }
0x2606…261d b374 5522 IF C4$(12)="-" THEN
0x2606…261d LineComalBin {
0x2606…261d ptr = 0xb374 // 0x2606 @0x0
0x2606…261d lno = 0x1592 // 0x2608 @0x2
0x2606…261d at0004 = ╱9c╱ IF ╱ // 0x260a @0x4
0x2606…261d at0005 = ╱43╱C╱ // 0x260b @0x5
0x2606…261d at0006 = ╱34╱4╱ // 0x260c @0x6
0x2606…261d at0007 = ╱ef╱$╱ // 0x260d @0x7
0x2606…261d at0008 = ╱ed╱(╱ // 0x260e @0x8
0x2606…261d at0009 = ╱31╱1╱ // 0x260f @0x9
0x2606…261d at000a = ╱32╱2╱ // 0x2610 @0xa
0x2606…261d at000b = ╱fe0000c004╱ // 0x2611 @0xb
0x2606…261d at0010 = ╱ee╱)╱ // 0x2616 @0x10
0x2606…261d at0011 = ╱dc╱=╱ // 0x2617 @0x11
0x2606…261d at0012 = ╱22╱"╱ // 0x2618 @0x12
0x2606…261d at0013 = ╱2d╱-╱ // 0x2619 @0x13
0x2606…261d at0014 = ╱22╱"╱ // 0x261a @0x14
0x2606…261d at0015 = ╱b6╱ THEN ╱ // 0x261b @0x15
0x2606…261d at0016 = EOL // 0x261c @0x16
0x2606…261d }
0x261d…2636 b38d 5524 D6$(EL:TI)=B3$(V:TI)
0x261d…2636 LineComalBin {
0x261d…2636 ptr = 0xb38d // 0x261d @0x0
0x261d…2636 lno = 0x1594 // 0x261f @0x2
0x261d…2636 at0004 = ╱44╱D╱ // 0x2621 @0x4
0x261d…2636 at0005 = ╱36╱6╱ // 0x2622 @0x5
0x261d…2636 at0006 = ╱ef╱$╱ // 0x2623 @0x6
0x261d…2636 at0007 = ╱ed╱(╱ // 0x2624 @0x7
0x261d…2636 at0008 = ╱45╱E╱ // 0x2625 @0x8
0x261d…2636 at0009 = ╱4c╱L╱ // 0x2626 @0x9
0x261d…2636 at000a = ╱f0╱:╱ // 0x2627 @0xa
0x261d…2636 at000b = ╱54╱T╱ // 0x2628 @0xb
0x261d…2636 at000c = ╱49╱I╱ // 0x2629 @0xc
0x261d…2636 at000d = ╱ee╱)╱ // 0x262a @0xd
0x261d…2636 at000e = ╱dc╱=╱ // 0x262b @0xe
0x261d…2636 at000f = ╱42╱B╱ // 0x262c @0xf
0x261d…2636 at0010 = ╱33╱3╱ // 0x262d @0x10
0x261d…2636 at0011 = ╱ef╱$╱ // 0x262e @0x11
0x261d…2636 at0012 = ╱ed╱(╱ // 0x262f @0x12
0x261d…2636 at0013 = ╱56╱V╱ // 0x2630 @0x13
0x261d…2636 at0014 = ╱f0╱:╱ // 0x2631 @0x14
0x261d…2636 at0015 = ╱54╱T╱ // 0x2632 @0x15
0x261d…2636 at0016 = ╱49╱I╱ // 0x2633 @0x16
0x261d…2636 at0017 = ╱ee╱)╱ // 0x2634 @0x17
0x261d…2636 at0018 = EOL // 0x2635 @0x18
0x261d…2636 }
0x2636…2649 b3a0 5526 D6$(AZ:TI)=F1$
0x2636…2649 LineComalBin {
0x2636…2649 ptr = 0xb3a0 // 0x2636 @0x0
0x2636…2649 lno = 0x1596 // 0x2638 @0x2
0x2636…2649 at0004 = ╱44╱D╱ // 0x263a @0x4
0x2636…2649 at0005 = ╱36╱6╱ // 0x263b @0x5
0x2636…2649 at0006 = ╱ef╱$╱ // 0x263c @0x6
0x2636…2649 at0007 = ╱ed╱(╱ // 0x263d @0x7
0x2636…2649 at0008 = ╱41╱A╱ // 0x263e @0x8
0x2636…2649 at0009 = ╱5a╱Z╱ // 0x263f @0x9
0x2636…2649 at000a = ╱f0╱:╱ // 0x2640 @0xa
0x2636…2649 at000b = ╱54╱T╱ // 0x2641 @0xb
0x2636…2649 at000c = ╱49╱I╱ // 0x2642 @0xc
0x2636…2649 at000d = ╱ee╱)╱ // 0x2643 @0xd
0x2636…2649 at000e = ╱dc╱=╱ // 0x2644 @0xe
0x2636…2649 at000f = ╱46╱F╱ // 0x2645 @0xf
0x2636…2649 at0010 = ╱31╱1╱ // 0x2646 @0x10
0x2636…2649 at0011 = ╱ef╱$╱ // 0x2647 @0x11
0x2636…2649 at0012 = EOL // 0x2648 @0x12
0x2636…2649 }
0x2649…264f b3a6 5528 ELSE
0x2649…264f LineComalBin {
0x2649…264f ptr = 0xb3a6 // 0x2649 @0x0
0x2649…264f lno = 0x1598 // 0x264b @0x2
0x2649…264f at0004 = ╱9a╱ ELSE ╱ // 0x264d @0x4
0x2649…264f at0005 = EOL // 0x264e @0x5
0x2649…264f }
0x264f…2668 b3bf 5530 D6$(EL:TI)=C4$(V:TI)
0x264f…2668 LineComalBin {
0x264f…2668 ptr = 0xb3bf // 0x264f @0x0
0x264f…2668 lno = 0x159a // 0x2651 @0x2
0x264f…2668 at0004 = ╱44╱D╱ // 0x2653 @0x4
0x264f…2668 at0005 = ╱36╱6╱ // 0x2654 @0x5
0x264f…2668 at0006 = ╱ef╱$╱ // 0x2655 @0x6
0x264f…2668 at0007 = ╱ed╱(╱ // 0x2656 @0x7
0x264f…2668 at0008 = ╱45╱E╱ // 0x2657 @0x8
0x264f…2668 at0009 = ╱4c╱L╱ // 0x2658 @0x9
0x264f…2668 at000a = ╱f0╱:╱ // 0x2659 @0xa
0x264f…2668 at000b = ╱54╱T╱ // 0x265a @0xb
0x264f…2668 at000c = ╱49╱I╱ // 0x265b @0xc
0x264f…2668 at000d = ╱ee╱)╱ // 0x265c @0xd
0x264f…2668 at000e = ╱dc╱=╱ // 0x265d @0xe
0x264f…2668 at000f = ╱43╱C╱ // 0x265e @0xf
0x264f…2668 at0010 = ╱34╱4╱ // 0x265f @0x10
0x264f…2668 at0011 = ╱ef╱$╱ // 0x2660 @0x11
0x264f…2668 at0012 = ╱ed╱(╱ // 0x2661 @0x12
0x264f…2668 at0013 = ╱56╱V╱ // 0x2662 @0x13
0x264f…2668 at0014 = ╱f0╱:╱ // 0x2663 @0x14
0x264f…2668 at0015 = ╱54╱T╱ // 0x2664 @0x15
0x264f…2668 at0016 = ╱49╱I╱ // 0x2665 @0x16
0x264f…2668 at0017 = ╱ee╱)╱ // 0x2666 @0x17
0x264f…2668 at0018 = EOL // 0x2667 @0x18
0x264f…2668 }
0x2668…266e b3c5 5531 ENDIF
0x2668…266e LineComalBin {
0x2668…266e ptr = 0xb3c5 // 0x2668 @0x0
0x2668…266e lno = 0x159b // 0x266a @0x2
0x2668…266e at0004 = ╱9b╱ ENDIF ╱ // 0x266c @0x4
0x2668…266e at0005 = EOL // 0x266d @0x5
0x2668…266e }
0x266e…267d b3d4 5532 D6$(E)="2"
0x266e…267d LineComalBin {
0x266e…267d ptr = 0xb3d4 // 0x266e @0x0
0x266e…267d lno = 0x159c // 0x2670 @0x2
0x266e…267d at0004 = ╱44╱D╱ // 0x2672 @0x4
0x266e…267d at0005 = ╱36╱6╱ // 0x2673 @0x5
0x266e…267d at0006 = ╱ef╱$╱ // 0x2674 @0x6
0x266e…267d at0007 = ╱ed╱(╱ // 0x2675 @0x7
0x266e…267d at0008 = ╱45╱E╱ // 0x2676 @0x8
0x266e…267d at0009 = ╱ee╱)╱ // 0x2677 @0x9
0x266e…267d at000a = ╱dc╱=╱ // 0x2678 @0xa
0x266e…267d at000b = ╱22╱"╱ // 0x2679 @0xb
0x266e…267d at000c = ╱32╱2╱ // 0x267a @0xc
0x266e…267d at000d = ╱22╱"╱ // 0x267b @0xd
0x266e…267d at000e = EOL // 0x267c @0xe
0x266e…267d }
0x267d…2692 b3e9 5533 D6$(37)="+"
0x267d…2692 LineComalBin {
0x267d…2692 ptr = 0xb3e9 // 0x267d @0x0
0x267d…2692 lno = 0x159d // 0x267f @0x2
0x267d…2692 at0004 = ╱44╱D╱ // 0x2681 @0x4
0x267d…2692 at0005 = ╱36╱6╱ // 0x2682 @0x5
0x267d…2692 at0006 = ╱ef╱$╱ // 0x2683 @0x6
0x267d…2692 at0007 = ╱ed╱(╱ // 0x2684 @0x7
0x267d…2692 at0008 = ╱33╱3╱ // 0x2685 @0x8
0x267d…2692 at0009 = ╱37╱7╱ // 0x2686 @0x9
0x267d…2692 at000a = ╱fe00009406╱ // 0x2687 @0xa
0x267d…2692 at000f = ╱ee╱)╱ // 0x268c @0xf
0x267d…2692 at0010 = ╱dc╱=╱ // 0x268d @0x10
0x267d…2692 at0011 = ╱22╱"╱ // 0x268e @0x11
0x267d…2692 at0012 = ╱2b╱+╱ // 0x268f @0x12
0x267d…2692 at0013 = ╱22╱"╱ // 0x2690 @0x13
0x267d…2692 at0014 = EOL // 0x2691 @0x14
0x267d…2692 }
0x2692…26a2 b3f9 5534 PUT D7$,L0:D6$
0x2692…26a2 LineComalBin {
0x2692…26a2 ptr = 0xb3f9 // 0x2692 @0x0
0x2692…26a2 lno = 0x159e // 0x2694 @0x2
0x2692…26a2 at0004 = ╱aa╱ PUT ╱ // 0x2696 @0x4
0x2692…26a2 at0005 = ╱44╱D╱ // 0x2697 @0x5
0x2692…26a2 at0006 = ╱37╱7╱ // 0x2698 @0x6
0x2692…26a2 at0007 = ╱ef╱$╱ // 0x2699 @0x7
0x2692…26a2 at0008 = ╱ec╱,╱ // 0x269a @0x8
0x2692…26a2 at0009 = ╱4c╱L╱ // 0x269b @0x9
0x2692…26a2 at000a = ╱30╱0╱ // 0x269c @0xa
0x2692…26a2 at000b = ╱f0╱:╱ // 0x269d @0xb
0x2692…26a2 at000c = ╱44╱D╱ // 0x269e @0xc
0x2692…26a2 at000d = ╱36╱6╱ // 0x269f @0xd
0x2692…26a2 at000e = ╱ef╱$╱ // 0x26a0 @0xe
0x2692…26a2 at000f = EOL // 0x26a1 @0xf
0x2692…26a2 }
0x26a2…26b7 b40e 5535 D6$(37)="-"
0x26a2…26b7 LineComalBin {
0x26a2…26b7 ptr = 0xb40e // 0x26a2 @0x0
0x26a2…26b7 lno = 0x159f // 0x26a4 @0x2
0x26a2…26b7 at0004 = ╱44╱D╱ // 0x26a6 @0x4
0x26a2…26b7 at0005 = ╱36╱6╱ // 0x26a7 @0x5
0x26a2…26b7 at0006 = ╱ef╱$╱ // 0x26a8 @0x6
0x26a2…26b7 at0007 = ╱ed╱(╱ // 0x26a9 @0x7
0x26a2…26b7 at0008 = ╱33╱3╱ // 0x26aa @0x8
0x26a2…26b7 at0009 = ╱37╱7╱ // 0x26ab @0x9
0x26a2…26b7 at000a = ╱fe00009406╱ // 0x26ac @0xa
0x26a2…26b7 at000f = ╱ee╱)╱ // 0x26b1 @0xf
0x26a2…26b7 at0010 = ╱dc╱=╱ // 0x26b2 @0x10
0x26a2…26b7 at0011 = ╱22╱"╱ // 0x26b3 @0x11
0x26a2…26b7 at0012 = ╱2d╱-╱ // 0x26b4 @0x12
0x26a2…26b7 at0013 = ╱22╱"╱ // 0x26b5 @0x13
0x26a2…26b7 at0014 = EOL // 0x26b6 @0x14
0x26a2…26b7 }
0x26b7…26c8 b41f 5536 IF J5=61 THEN
0x26b7…26c8 LineComalBin {
0x26b7…26c8 ptr = 0xb41f // 0x26b7 @0x0
0x26b7…26c8 lno = 0x15a0 // 0x26b9 @0x2
0x26b7…26c8 at0004 = ╱9c╱ IF ╱ // 0x26bb @0x4
0x26b7…26c8 at0005 = ╱4a╱J╱ // 0x26bc @0x5
0x26b7…26c8 at0006 = ╱35╱5╱ // 0x26bd @0x6
0x26b7…26c8 at0007 = ╱dc╱=╱ // 0x26be @0x7
0x26b7…26c8 at0008 = ╱36╱6╱ // 0x26bf @0x8
0x26b7…26c8 at0009 = ╱31╱1╱ // 0x26c0 @0x9
0x26b7…26c8 at000a = ╱fe0000f406╱ // 0x26c1 @0xa
0x26b7…26c8 at000f = ╱b6╱ THEN ╱ // 0x26c6 @0xf
0x26b7…26c8 at0010 = EOL // 0x26c7 @0x10
0x26b7…26c8 }
0x26c8…26da b431 5537 C3$=B6$(E,TI)
0x26c8…26da LineComalBin {
0x26c8…26da ptr = 0xb431 // 0x26c8 @0x0
0x26c8…26da lno = 0x15a1 // 0x26ca @0x2
0x26c8…26da at0004 = ╱43╱C╱ // 0x26cc @0x4
0x26c8…26da at0005 = ╱33╱3╱ // 0x26cd @0x5
0x26c8…26da at0006 = ╱ef╱$╱ // 0x26ce @0x6
0x26c8…26da at0007 = ╱dc╱=╱ // 0x26cf @0x7
0x26c8…26da at0008 = ╱42╱B╱ // 0x26d0 @0x8
0x26c8…26da at0009 = ╱36╱6╱ // 0x26d1 @0x9
0x26c8…26da at000a = ╱ef╱$╱ // 0x26d2 @0xa
0x26c8…26da at000b = ╱ed╱(╱ // 0x26d3 @0xb
0x26c8…26da at000c = ╱45╱E╱ // 0x26d4 @0xc
0x26c8…26da at000d = ╱ec╱,╱ // 0x26d5 @0xd
0x26c8…26da at000e = ╱54╱T╱ // 0x26d6 @0xe
0x26c8…26da at000f = ╱49╱I╱ // 0x26d7 @0xf
0x26c8…26da at0010 = ╱ee╱)╱ // 0x26d8 @0x10
0x26c8…26da at0011 = EOL // 0x26d9 @0x11
0x26c8…26da }
0x26da…26e0 b437 5538 ELSE
0x26da…26e0 LineComalBin {
0x26da…26e0 ptr = 0xb437 // 0x26da @0x0
0x26da…26e0 lno = 0x15a2 // 0x26dc @0x2
0x26da…26e0 at0004 = ╱9a╱ ELSE ╱ // 0x26de @0x4
0x26da…26e0 at0005 = EOL // 0x26df @0x5
0x26da…26e0 }
0x26e0…2742 b499 5539 C3$=B61$(E+TI*(J5=66)+20*(J5=67)+30*(J5=68)+40*(J5=69):TI)
0x26e0…2742 LineComalBin {
0x26e0…2742 ptr = 0xb499 // 0x26e0 @0x0
0x26e0…2742 lno = 0x15a3 // 0x26e2 @0x2
0x26e0…2742 at0004 = ╱43╱C╱ // 0x26e4 @0x4
0x26e0…2742 at0005 = ╱33╱3╱ // 0x26e5 @0x5
0x26e0…2742 at0006 = ╱ef╱$╱ // 0x26e6 @0x6
0x26e0…2742 at0007 = ╱dc╱=╱ // 0x26e7 @0x7
0x26e0…2742 at0008 = ╱42╱B╱ // 0x26e8 @0x8
0x26e0…2742 at0009 = ╱36╱6╱ // 0x26e9 @0x9
0x26e0…2742 at000a = ╱31╱1╱ // 0x26ea @0xa
0x26e0…2742 at000b = ╱ef╱$╱ // 0x26eb @0xb
0x26e0…2742 at000c = ╱ed╱(╱ // 0x26ec @0xc
0x26e0…2742 at000d = ╱45╱E╱ // 0x26ed @0xd
0x26e0…2742 at000e = ╱e2╱+╱ // 0x26ee @0xe
0x26e0…2742 at000f = ╱54╱T╱ // 0x26ef @0xf
0x26e0…2742 at0010 = ╱49╱I╱ // 0x26f0 @0x10
0x26e0…2742 at0011 = ╱e4╱*╱ // 0x26f1 @0x11
0x26e0…2742 at0012 = ╱ed╱(╱ // 0x26f2 @0x12
0x26e0…2742 at0013 = ╱4a╱J╱ // 0x26f3 @0x13
0x26e0…2742 at0014 = ╱35╱5╱ // 0x26f4 @0x14
0x26e0…2742 at0015 = ╱dc╱=╱ // 0x26f5 @0x15
0x26e0…2742 at0016 = ╱36╱6╱ // 0x26f6 @0x16
0x26e0…2742 at0017 = ╱36╱6╱ // 0x26f7 @0x17
0x26e0…2742 at0018 = ╱fe00008407╱ // 0x26f8 @0x18
0x26e0…2742 at001d = ╱ee╱)╱ // 0x26fd @0x1d
0x26e0…2742 at001e = ╱e2╱+╱ // 0x26fe @0x1e
0x26e0…2742 at001f = ╱32╱2╱ // 0x26ff @0x1f
0x26e0…2742 at0020 = ╱30╱0╱ // 0x2700 @0x20
0x26e0…2742 at0021 = ╱fe0000a005╱ // 0x2701 @0x21
0x26e0…2742 at0026 = ╱e4╱*╱ // 0x2706 @0x26
0x26e0…2742 at0027 = ╱ed╱(╱ // 0x2707 @0x27
0x26e0…2742 at0028 = ╱4a╱J╱ // 0x2708 @0x28
0x26e0…2742 at0029 = ╱35╱5╱ // 0x2709 @0x29
0x26e0…2742 at002a = ╱dc╱=╱ // 0x270a @0x2a
0x26e0…2742 at002b = ╱36╱6╱ // 0x270b @0x2b
0x26e0…2742 at002c = ╱37╱7╱ // 0x270c @0x2c
0x26e0…2742 at002d = ╱fe00008607╱ // 0x270d @0x2d
0x26e0…2742 at0032 = ╱ee╱)╱ // 0x2712 @0x32
0x26e0…2742 at0033 = ╱e2╱+╱ // 0x2713 @0x33
0x26e0…2742 at0034 = ╱33╱3╱ // 0x2714 @0x34
0x26e0…2742 at0035 = ╱30╱0╱ // 0x2715 @0x35
0x26e0…2742 at0036 = ╱fe0000f005╱ // 0x2716 @0x36
0x26e0…2742 at003b = ╱e4╱*╱ // 0x271b @0x3b
0x26e0…2742 at003c = ╱ed╱(╱ // 0x271c @0x3c
0x26e0…2742 at003d = ╱4a╱J╱ // 0x271d @0x3d
0x26e0…2742 at003e = ╱35╱5╱ // 0x271e @0x3e
0x26e0…2742 at003f = ╱dc╱=╱ // 0x271f @0x3f
0x26e0…2742 at0040 = ╱36╱6╱ // 0x2720 @0x40
0x26e0…2742 at0041 = ╱38╱8╱ // 0x2721 @0x41
0x26e0…2742 at0042 = ╱fe00008807╱ // 0x2722 @0x42
0x26e0…2742 at0047 = ╱ee╱)╱ // 0x2727 @0x47
0x26e0…2742 at0048 = ╱e2╱+╱ // 0x2728 @0x48
0x26e0…2742 at0049 = ╱34╱4╱ // 0x2729 @0x49
0x26e0…2742 at004a = ╱30╱0╱ // 0x272a @0x4a
0x26e0…2742 at004b = ╱fe0000a006╱ // 0x272b @0x4b
0x26e0…2742 at0050 = ╱e4╱*╱ // 0x2730 @0x50
0x26e0…2742 at0051 = ╱ed╱(╱ // 0x2731 @0x51
0x26e0…2742 at0052 = ╱4a╱J╱ // 0x2732 @0x52
0x26e0…2742 at0053 = ╱35╱5╱ // 0x2733 @0x53
0x26e0…2742 at0054 = ╱dc╱=╱ // 0x2734 @0x54
0x26e0…2742 at0055 = ╱36╱6╱ // 0x2735 @0x55
0x26e0…2742 at0056 = ╱39╱9╱ // 0x2736 @0x56
0x26e0…2742 at0057 = ╱fe00008a07╱ // 0x2737 @0x57
0x26e0…2742 at005c = ╱ee╱)╱ // 0x273c @0x5c
0x26e0…2742 at005d = ╱f0╱:╱ // 0x273d @0x5d
0x26e0…2742 at005e = ╱54╱T╱ // 0x273e @0x5e
0x26e0…2742 at005f = ╱49╱I╱ // 0x273f @0x5f
0x26e0…2742 at0060 = ╱ee╱)╱ // 0x2740 @0x60
0x26e0…2742 at0061 = EOL // 0x2741 @0x61
0x26e0…2742 }
0x2742…2748 b49f 5540 ENDIF
0x2742…2748 LineComalBin {
0x2742…2748 ptr = 0xb49f // 0x2742 @0x0
0x2742…2748 lno = 0x15a4 // 0x2744 @0x2
0x2742…2748 at0004 = ╱9b╱ ENDIF ╱ // 0x2746 @0x4
0x2742…2748 at0005 = EOL // 0x2747 @0x5
0x2742…2748 }
0x2748…275b b4b2 5542 C4$=D6$(AZ:TI)
0x2748…275b LineComalBin {
0x2748…275b ptr = 0xb4b2 // 0x2748 @0x0
0x2748…275b lno = 0x15a6 // 0x274a @0x2
0x2748…275b at0004 = ╱43╱C╱ // 0x274c @0x4
0x2748…275b at0005 = ╱34╱4╱ // 0x274d @0x5
0x2748…275b at0006 = ╱ef╱$╱ // 0x274e @0x6
0x2748…275b at0007 = ╱dc╱=╱ // 0x274f @0x7
0x2748…275b at0008 = ╱44╱D╱ // 0x2750 @0x8
0x2748…275b at0009 = ╱36╱6╱ // 0x2751 @0x9
0x2748…275b at000a = ╱ef╱$╱ // 0x2752 @0xa
0x2748…275b at000b = ╱ed╱(╱ // 0x2753 @0xb
0x2748…275b at000c = ╱41╱A╱ // 0x2754 @0xc
0x2748…275b at000d = ╱5a╱Z╱ // 0x2755 @0xd
0x2748…275b at000e = ╱f0╱:╱ // 0x2756 @0xe
0x2748…275b at000f = ╱54╱T╱ // 0x2757 @0xf
0x2748…275b at0010 = ╱49╱I╱ // 0x2758 @0x10
0x2748…275b at0011 = ╱ee╱)╱ // 0x2759 @0x11
0x2748…275b at0012 = EOL // 0x275a @0x12
0x2748…275b }
0x275b…2776 b4cd 5543 EXEC C(0,C3$,C4$,C3$)
0x275b…2776 LineComalBin {
0x275b…2776 ptr = 0xb4cd // 0x275b @0x0
0x275b…2776 lno = 0x15a7 // 0x275d @0x2
0x275b…2776 at0004 = ╱9d╱ EXEC ╱ // 0x275f @0x4
0x275b…2776 at0005 = ╱43╱C╱ // 0x2760 @0x5
0x275b…2776 at0006 = ╱ed╱(╱ // 0x2761 @0x6
0x275b…2776 at0007 = ╱30╱0╱ // 0x2762 @0x7
0x275b…2776 at0008 = ╱fe00000000╱ // 0x2763 @0x8
0x275b…2776 at000d = ╱ec╱,╱ // 0x2768 @0xd
0x275b…2776 at000e = ╱43╱C╱ // 0x2769 @0xe
0x275b…2776 at000f = ╱33╱3╱ // 0x276a @0xf
0x275b…2776 at0010 = ╱ef╱$╱ // 0x276b @0x10
0x275b…2776 at0011 = ╱ec╱,╱ // 0x276c @0x11
0x275b…2776 at0012 = ╱43╱C╱ // 0x276d @0x12
0x275b…2776 at0013 = ╱34╱4╱ // 0x276e @0x13
0x275b…2776 at0014 = ╱ef╱$╱ // 0x276f @0x14
0x275b…2776 at0015 = ╱ec╱,╱ // 0x2770 @0x15
0x275b…2776 at0016 = ╱43╱C╱ // 0x2771 @0x16
0x275b…2776 at0017 = ╱33╱3╱ // 0x2772 @0x17
0x275b…2776 at0018 = ╱ef╱$╱ // 0x2773 @0x18
0x275b…2776 at0019 = ╱ee╱)╱ // 0x2774 @0x19
0x275b…2776 at001a = EOL // 0x2775 @0x1a
0x275b…2776 }
0x2776…2787 b4de 5544 IF J5=61 THEN
0x2776…2787 LineComalBin {
0x2776…2787 ptr = 0xb4de // 0x2776 @0x0
0x2776…2787 lno = 0x15a8 // 0x2778 @0x2
0x2776…2787 at0004 = ╱9c╱ IF ╱ // 0x277a @0x4
0x2776…2787 at0005 = ╱4a╱J╱ // 0x277b @0x5
0x2776…2787 at0006 = ╱35╱5╱ // 0x277c @0x6
0x2776…2787 at0007 = ╱dc╱=╱ // 0x277d @0x7
0x2776…2787 at0008 = ╱36╱6╱ // 0x277e @0x8
0x2776…2787 at0009 = ╱31╱1╱ // 0x277f @0x9
0x2776…2787 at000a = ╱fe0000f406╱ // 0x2780 @0xa
0x2776…2787 at000f = ╱b6╱ THEN ╱ // 0x2785 @0xf
0x2776…2787 at0010 = EOL // 0x2786 @0x10
0x2776…2787 }
0x2787…279f b4f6 5545 B6$(E,TI)=C3$(V:TI)
0x2787…279f LineComalBin {
0x2787…279f ptr = 0xb4f6 // 0x2787 @0x0
0x2787…279f lno = 0x15a9 // 0x2789 @0x2
0x2787…279f at0004 = ╱42╱B╱ // 0x278b @0x4
0x2787…279f at0005 = ╱36╱6╱ // 0x278c @0x5
0x2787…279f at0006 = ╱ef╱$╱ // 0x278d @0x6
0x2787…279f at0007 = ╱ed╱(╱ // 0x278e @0x7
0x2787…279f at0008 = ╱45╱E╱ // 0x278f @0x8
0x2787…279f at0009 = ╱ec╱,╱ // 0x2790 @0x9
0x2787…279f at000a = ╱54╱T╱ // 0x2791 @0xa
0x2787…279f at000b = ╱49╱I╱ // 0x2792 @0xb
0x2787…279f at000c = ╱ee╱)╱ // 0x2793 @0xc
0x2787…279f at000d = ╱dc╱=╱ // 0x2794 @0xd
0x2787…279f at000e = ╱43╱C╱ // 0x2795 @0xe
0x2787…279f at000f = ╱33╱3╱ // 0x2796 @0xf
0x2787…279f at0010 = ╱ef╱$╱ // 0x2797 @0x10
0x2787…279f at0011 = ╱ed╱(╱ // 0x2798 @0x11
0x2787…279f at0012 = ╱56╱V╱ // 0x2799 @0x12
0x2787…279f at0013 = ╱f0╱:╱ // 0x279a @0x13
0x2787…279f at0014 = ╱54╱T╱ // 0x279b @0x14
0x2787…279f at0015 = ╱49╱I╱ // 0x279c @0x15
0x2787…279f at0016 = ╱ee╱)╱ // 0x279d @0x16
0x2787…279f at0017 = EOL // 0x279e @0x17
0x2787…279f }
0x279f…27a5 b4fc 5546 ELSE
0x279f…27a5 LineComalBin {
0x279f…27a5 ptr = 0xb4fc // 0x279f @0x0
0x279f…27a5 lno = 0x15aa // 0x27a1 @0x2
0x279f…27a5 at0004 = ╱9a╱ ELSE ╱ // 0x27a3 @0x4
0x279f…27a5 at0005 = EOL // 0x27a4 @0x5
0x279f…27a5 }
0x27a5…280d b564 5547 B61$(E+TI*(J5=66)+20*(J5=67)+30*(J5=68)+40*(J5=69):TI)=C3$(V:TI)
0x27a5…280d LineComalBin {
0x27a5…280d ptr = 0xb564 // 0x27a5 @0x0
0x27a5…280d lno = 0x15ab // 0x27a7 @0x2
0x27a5…280d at0004 = ╱42╱B╱ // 0x27a9 @0x4
0x27a5…280d at0005 = ╱36╱6╱ // 0x27aa @0x5
0x27a5…280d at0006 = ╱31╱1╱ // 0x27ab @0x6
0x27a5…280d at0007 = ╱ef╱$╱ // 0x27ac @0x7
0x27a5…280d at0008 = ╱ed╱(╱ // 0x27ad @0x8
0x27a5…280d at0009 = ╱45╱E╱ // 0x27ae @0x9
0x27a5…280d at000a = ╱e2╱+╱ // 0x27af @0xa
0x27a5…280d at000b = ╱54╱T╱ // 0x27b0 @0xb
0x27a5…280d at000c = ╱49╱I╱ // 0x27b1 @0xc
0x27a5…280d at000d = ╱e4╱*╱ // 0x27b2 @0xd
0x27a5…280d at000e = ╱ed╱(╱ // 0x27b3 @0xe
0x27a5…280d at000f = ╱4a╱J╱ // 0x27b4 @0xf
0x27a5…280d at0010 = ╱35╱5╱ // 0x27b5 @0x10
0x27a5…280d at0011 = ╱dc╱=╱ // 0x27b6 @0x11
0x27a5…280d at0012 = ╱36╱6╱ // 0x27b7 @0x12
0x27a5…280d at0013 = ╱36╱6╱ // 0x27b8 @0x13
0x27a5…280d at0014 = ╱fe00008407╱ // 0x27b9 @0x14
0x27a5…280d at0019 = ╱ee╱)╱ // 0x27be @0x19
0x27a5…280d at001a = ╱e2╱+╱ // 0x27bf @0x1a
0x27a5…280d at001b = ╱32╱2╱ // 0x27c0 @0x1b
0x27a5…280d at001c = ╱30╱0╱ // 0x27c1 @0x1c
0x27a5…280d at001d = ╱fe0000a005╱ // 0x27c2 @0x1d
0x27a5…280d at0022 = ╱e4╱*╱ // 0x27c7 @0x22
0x27a5…280d at0023 = ╱ed╱(╱ // 0x27c8 @0x23
0x27a5…280d at0024 = ╱4a╱J╱ // 0x27c9 @0x24
0x27a5…280d at0025 = ╱35╱5╱ // 0x27ca @0x25
0x27a5…280d at0026 = ╱dc╱=╱ // 0x27cb @0x26
0x27a5…280d at0027 = ╱36╱6╱ // 0x27cc @0x27
0x27a5…280d at0028 = ╱37╱7╱ // 0x27cd @0x28
0x27a5…280d at0029 = ╱fe00008607╱ // 0x27ce @0x29
0x27a5…280d at002e = ╱ee╱)╱ // 0x27d3 @0x2e
0x27a5…280d at002f = ╱e2╱+╱ // 0x27d4 @0x2f
0x27a5…280d at0030 = ╱33╱3╱ // 0x27d5 @0x30
0x27a5…280d at0031 = ╱30╱0╱ // 0x27d6 @0x31
0x27a5…280d at0032 = ╱fe0000f005╱ // 0x27d7 @0x32
0x27a5…280d at0037 = ╱e4╱*╱ // 0x27dc @0x37
0x27a5…280d at0038 = ╱ed╱(╱ // 0x27dd @0x38
0x27a5…280d at0039 = ╱4a╱J╱ // 0x27de @0x39
0x27a5…280d at003a = ╱35╱5╱ // 0x27df @0x3a
0x27a5…280d at003b = ╱dc╱=╱ // 0x27e0 @0x3b
0x27a5…280d at003c = ╱36╱6╱ // 0x27e1 @0x3c
0x27a5…280d at003d = ╱38╱8╱ // 0x27e2 @0x3d
0x27a5…280d at003e = ╱fe00008807╱ // 0x27e3 @0x3e
0x27a5…280d at0043 = ╱ee╱)╱ // 0x27e8 @0x43
0x27a5…280d at0044 = ╱e2╱+╱ // 0x27e9 @0x44
0x27a5…280d at0045 = ╱34╱4╱ // 0x27ea @0x45
0x27a5…280d at0046 = ╱30╱0╱ // 0x27eb @0x46
0x27a5…280d at0047 = ╱fe0000a006╱ // 0x27ec @0x47
0x27a5…280d at004c = ╱e4╱*╱ // 0x27f1 @0x4c
0x27a5…280d at004d = ╱ed╱(╱ // 0x27f2 @0x4d
0x27a5…280d at004e = ╱4a╱J╱ // 0x27f3 @0x4e
0x27a5…280d at004f = ╱35╱5╱ // 0x27f4 @0x4f
0x27a5…280d at0050 = ╱dc╱=╱ // 0x27f5 @0x50
0x27a5…280d at0051 = ╱36╱6╱ // 0x27f6 @0x51
0x27a5…280d at0052 = ╱39╱9╱ // 0x27f7 @0x52
0x27a5…280d at0053 = ╱fe00008a07╱ // 0x27f8 @0x53
0x27a5…280d at0058 = ╱ee╱)╱ // 0x27fd @0x58
0x27a5…280d at0059 = ╱f0╱:╱ // 0x27fe @0x59
0x27a5…280d at005a = ╱54╱T╱ // 0x27ff @0x5a
0x27a5…280d at005b = ╱49╱I╱ // 0x2800 @0x5b
0x27a5…280d at005c = ╱ee╱)╱ // 0x2801 @0x5c
0x27a5…280d at005d = ╱dc╱=╱ // 0x2802 @0x5d
0x27a5…280d at005e = ╱43╱C╱ // 0x2803 @0x5e
0x27a5…280d at005f = ╱33╱3╱ // 0x2804 @0x5f
0x27a5…280d at0060 = ╱ef╱$╱ // 0x2805 @0x60
0x27a5…280d at0061 = ╱ed╱(╱ // 0x2806 @0x61
0x27a5…280d at0062 = ╱56╱V╱ // 0x2807 @0x62
0x27a5…280d at0063 = ╱f0╱:╱ // 0x2808 @0x63
0x27a5…280d at0064 = ╱54╱T╱ // 0x2809 @0x64
0x27a5…280d at0065 = ╱49╱I╱ // 0x280a @0x65
0x27a5…280d at0066 = ╱ee╱)╱ // 0x280b @0x66
0x27a5…280d at0067 = EOL // 0x280c @0x67
0x27a5…280d }
0x280d…2813 b56a 5548 ENDIF
0x280d…2813 LineComalBin {
0x280d…2813 ptr = 0xb56a // 0x280d @0x0
0x280d…2813 lno = 0x15ac // 0x280f @0x2
0x280d…2813 at0004 = ╱9b╱ ENDIF ╱ // 0x2811 @0x4
0x280d…2813 at0005 = EOL // 0x2812 @0x5
0x280d…2813 }
0x2813…2837 b58e 5550 F0$(34,43)=D6$(EL:TI)
0x2813…2837 LineComalBin {
0x2813…2837 ptr = 0xb58e // 0x2813 @0x0
0x2813…2837 lno = 0x15ae // 0x2815 @0x2
0x2813…2837 at0004 = ╱46╱F╱ // 0x2817 @0x4
0x2813…2837 at0005 = ╱30╱0╱ // 0x2818 @0x5
0x2813…2837 at0006 = ╱ef╱$╱ // 0x2819 @0x6
0x2813…2837 at0007 = ╱ed╱(╱ // 0x281a @0x7
0x2813…2837 at0008 = ╱33╱3╱ // 0x281b @0x8
0x2813…2837 at0009 = ╱34╱4╱ // 0x281c @0x9
0x2813…2837 at000a = ╱fe00008806╱ // 0x281d @0xa
0x2813…2837 at000f = ╱ec╱,╱ // 0x2822 @0xf
0x2813…2837 at0010 = ╱34╱4╱ // 0x2823 @0x10
0x2813…2837 at0011 = ╱33╱3╱ // 0x2824 @0x11
0x2813…2837 at0012 = ╱fe0000ac06╱ // 0x2825 @0x12
0x2813…2837 at0017 = ╱ee╱)╱ // 0x282a @0x17
0x2813…2837 at0018 = ╱dc╱=╱ // 0x282b @0x18
0x2813…2837 at0019 = ╱44╱D╱ // 0x282c @0x19
0x2813…2837 at001a = ╱36╱6╱ // 0x282d @0x1a
0x2813…2837 at001b = ╱ef╱$╱ // 0x282e @0x1b
0x2813…2837 at001c = ╱ed╱(╱ // 0x282f @0x1c
0x2813…2837 at001d = ╱45╱E╱ // 0x2830 @0x1d
0x2813…2837 at001e = ╱4c╱L╱ // 0x2831 @0x1e
0x2813…2837 at001f = ╱f0╱:╱ // 0x2832 @0x1f
0x2813…2837 at0020 = ╱54╱T╱ // 0x2833 @0x20
0x2813…2837 at0021 = ╱49╱I╱ // 0x2834 @0x21
0x2813…2837 at0022 = ╱ee╱)╱ // 0x2835 @0x22
0x2813…2837 at0023 = EOL // 0x2836 @0x23
0x2813…2837 }
0x2837…285a b5b1 5560 F0$(71,79)=D6$(AZ:W)
0x2837…285a LineComalBin {
0x2837…285a ptr = 0xb5b1 // 0x2837 @0x0
0x2837…285a lno = 0x15b8 // 0x2839 @0x2
0x2837…285a at0004 = ╱46╱F╱ // 0x283b @0x4
0x2837…285a at0005 = ╱30╱0╱ // 0x283c @0x5
0x2837…285a at0006 = ╱ef╱$╱ // 0x283d @0x6
0x2837…285a at0007 = ╱ed╱(╱ // 0x283e @0x7
0x2837…285a at0008 = ╱37╱7╱ // 0x283f @0x8
0x2837…285a at0009 = ╱31╱1╱ // 0x2840 @0x9
0x2837…285a at000a = ╱fe00008e07╱ // 0x2841 @0xa
0x2837…285a at000f = ╱ec╱,╱ // 0x2846 @0xf
0x2837…285a at0010 = ╱37╱7╱ // 0x2847 @0x10
0x2837…285a at0011 = ╱39╱9╱ // 0x2848 @0x11
0x2837…285a at0012 = ╱fe00009e07╱ // 0x2849 @0x12
0x2837…285a at0017 = ╱ee╱)╱ // 0x284e @0x17
0x2837…285a at0018 = ╱dc╱=╱ // 0x284f @0x18
0x2837…285a at0019 = ╱44╱D╱ // 0x2850 @0x19
0x2837…285a at001a = ╱36╱6╱ // 0x2851 @0x1a
0x2837…285a at001b = ╱ef╱$╱ // 0x2852 @0x1b
0x2837…285a at001c = ╱ed╱(╱ // 0x2853 @0x1c
0x2837…285a at001d = ╱41╱A╱ // 0x2854 @0x1d
0x2837…285a at001e = ╱5a╱Z╱ // 0x2855 @0x1e
0x2837…285a at001f = ╱f0╱:╱ // 0x2856 @0x1f
0x2837…285a at0020 = ╱57╱W╱ // 0x2857 @0x20
0x2837…285a at0021 = ╱ee╱)╱ // 0x2858 @0x21
0x2837…285a at0022 = EOL // 0x2859 @0x22
0x2837…285a }
0x285a…286b b5c2 5570 WHEN J5=72
0x285a…286b LineComalBin {
0x285a…286b ptr = 0xb5c2 // 0x285a @0x0
0x285a…286b lno = 0x15c2 // 0x285c @0x2
0x285a…286b at0004 = ╱a301╱ WHEN ╱ // 0x285e @0x4
0x285a…286b at0006 = ╱4a╱J╱ // 0x2860 @0x6
0x285a…286b at0007 = ╱35╱5╱ // 0x2861 @0x7
0x285a…286b at0008 = ╱dc╱=╱ // 0x2862 @0x8
0x285a…286b at0009 = ╱37╱7╱ // 0x2863 @0x9
0x285a…286b at000a = ╱32╱2╱ // 0x2864 @0xa
0x285a…286b at000b = ╱fe00009007╱ // 0x2865 @0xb
0x285a…286b at0010 = EOL // 0x286a @0x10
0x285a…286b }
0x286b…288c b5e3 5575 EXEC OP(14,D6$(EL,20))
0x286b…288c LineComalBin {
0x286b…288c ptr = 0xb5e3 // 0x286b @0x0
0x286b…288c lno = 0x15c7 // 0x286d @0x2
0x286b…288c at0004 = ╱9d╱ EXEC ╱ // 0x286f @0x4
0x286b…288c at0005 = ╱4f╱O╱ // 0x2870 @0x5
0x286b…288c at0006 = ╱50╱P╱ // 0x2871 @0x6
0x286b…288c at0007 = ╱ed╱(╱ // 0x2872 @0x7
0x286b…288c at0008 = ╱31╱1╱ // 0x2873 @0x8
0x286b…288c at0009 = ╱34╱4╱ // 0x2874 @0x9
0x286b…288c at000a = ╱fe0000e004╱ // 0x2875 @0xa
0x286b…288c at000f = ╱ec╱,╱ // 0x287a @0xf
0x286b…288c at0010 = ╱44╱D╱ // 0x287b @0x10
0x286b…288c at0011 = ╱36╱6╱ // 0x287c @0x11
0x286b…288c at0012 = ╱ef╱$╱ // 0x287d @0x12
0x286b…288c at0013 = ╱ed╱(╱ // 0x287e @0x13
0x286b…288c at0014 = ╱45╱E╱ // 0x287f @0x14
0x286b…288c at0015 = ╱4c╱L╱ // 0x2880 @0x15
0x286b…288c at0016 = ╱ec╱,╱ // 0x2881 @0x16
0x286b…288c at0017 = ╱32╱2╱ // 0x2882 @0x17
0x286b…288c at0018 = ╱30╱0╱ // 0x2883 @0x18
0x286b…288c at0019 = ╱fe0000a005╱ // 0x2884 @0x19
0x286b…288c at001e = ╱ee╱)╱ // 0x2889 @0x1e
0x286b…288c at001f = ╱ee╱)╱ // 0x288a @0x1f
0x286b…288c at0020 = EOL // 0x288b @0x20
0x286b…288c }
0x288c…28ad b604 5580 F0$(33,43)=C5$(J8)
0x288c…28ad LineComalBin {
0x288c…28ad ptr = 0xb604 // 0x288c @0x0
0x288c…28ad lno = 0x15cc // 0x288e @0x2
0x288c…28ad at0004 = ╱46╱F╱ // 0x2890 @0x4
0x288c…28ad at0005 = ╱30╱0╱ // 0x2891 @0x5
0x288c…28ad at0006 = ╱ef╱$╱ // 0x2892 @0x6
0x288c…28ad at0007 = ╱ed╱(╱ // 0x2893 @0x7
0x288c…28ad at0008 = ╱33╱3╱ // 0x2894 @0x8
0x288c…28ad at0009 = ╱33╱3╱ // 0x2895 @0x9
0x288c…28ad at000a = ╱fe00008406╱ // 0x2896 @0xa
0x288c…28ad at000f = ╱ec╱,╱ // 0x289b @0xf
0x288c…28ad at0010 = ╱34╱4╱ // 0x289c @0x10
0x288c…28ad at0011 = ╱33╱3╱ // 0x289d @0x11
0x288c…28ad at0012 = ╱fe0000ac06╱ // 0x289e @0x12
0x288c…28ad at0017 = ╱ee╱)╱ // 0x28a3 @0x17
0x288c…28ad at0018 = ╱dc╱=╱ // 0x28a4 @0x18
0x288c…28ad at0019 = ╱43╱C╱ // 0x28a5 @0x19
0x288c…28ad at001a = ╱35╱5╱ // 0x28a6 @0x1a
0x288c…28ad at001b = ╱ef╱$╱ // 0x28a7 @0x1b
0x288c…28ad at001c = ╱ed╱(╱ // 0x28a8 @0x1c
0x288c…28ad at001d = ╱4a╱J╱ // 0x28a9 @0x1d
0x288c…28ad at001e = ╱38╱8╱ // 0x28aa @0x1e
0x288c…28ad at001f = ╱ee╱)╱ // 0x28ab @0x1f
0x288c…28ad at0020 = EOL // 0x28ac @0x20
0x288c…28ad }
0x28ad…28d1 b628 5590 F0$(45,54)=D6$(EL:TI)
0x28ad…28d1 LineComalBin {
0x28ad…28d1 ptr = 0xb628 // 0x28ad @0x0
0x28ad…28d1 lno = 0x15d6 // 0x28af @0x2
0x28ad…28d1 at0004 = ╱46╱F╱ // 0x28b1 @0x4
0x28ad…28d1 at0005 = ╱30╱0╱ // 0x28b2 @0x5
0x28ad…28d1 at0006 = ╱ef╱$╱ // 0x28b3 @0x6
0x28ad…28d1 at0007 = ╱ed╱(╱ // 0x28b4 @0x7
0x28ad…28d1 at0008 = ╱34╱4╱ // 0x28b5 @0x8
0x28ad…28d1 at0009 = ╱35╱5╱ // 0x28b6 @0x9
0x28ad…28d1 at000a = ╱fe0000b406╱ // 0x28b7 @0xa
0x28ad…28d1 at000f = ╱ec╱,╱ // 0x28bc @0xf
0x28ad…28d1 at0010 = ╱35╱5╱ // 0x28bd @0x10
0x28ad…28d1 at0011 = ╱34╱4╱ // 0x28be @0x11
0x28ad…28d1 at0012 = ╱fe0000d806╱ // 0x28bf @0x12
0x28ad…28d1 at0017 = ╱ee╱)╱ // 0x28c4 @0x17
0x28ad…28d1 at0018 = ╱dc╱=╱ // 0x28c5 @0x18
0x28ad…28d1 at0019 = ╱44╱D╱ // 0x28c6 @0x19
0x28ad…28d1 at001a = ╱36╱6╱ // 0x28c7 @0x1a
0x28ad…28d1 at001b = ╱ef╱$╱ // 0x28c8 @0x1b
0x28ad…28d1 at001c = ╱ed╱(╱ // 0x28c9 @0x1c
0x28ad…28d1 at001d = ╱45╱E╱ // 0x28ca @0x1d
0x28ad…28d1 at001e = ╱4c╱L╱ // 0x28cb @0x1e
0x28ad…28d1 at001f = ╱f0╱:╱ // 0x28cc @0x1f
0x28ad…28d1 at0020 = ╱54╱T╱ // 0x28cd @0x20
0x28ad…28d1 at0021 = ╱49╱I╱ // 0x28ce @0x21
0x28ad…28d1 at0022 = ╱ee╱)╱ // 0x28cf @0x22
0x28ad…28d1 at0023 = EOL // 0x28d0 @0x23
0x28ad…28d1 }
0x28d1…28e2 b639 5593 WHEN J5=73
0x28d1…28e2 LineComalBin {
0x28d1…28e2 ptr = 0xb639 // 0x28d1 @0x0
0x28d1…28e2 lno = 0x15d9 // 0x28d3 @0x2
0x28d1…28e2 at0004 = ╱a301╱ WHEN ╱ // 0x28d5 @0x4
0x28d1…28e2 at0006 = ╱4a╱J╱ // 0x28d7 @0x6
0x28d1…28e2 at0007 = ╱35╱5╱ // 0x28d8 @0x7
0x28d1…28e2 at0008 = ╱dc╱=╱ // 0x28d9 @0x8
0x28d1…28e2 at0009 = ╱37╱7╱ // 0x28da @0x9
0x28d1…28e2 at000a = ╱33╱3╱ // 0x28db @0xa
0x28d1…28e2 at000b = ╱fe00009207╱ // 0x28dc @0xb
0x28d1…28e2 at0010 = EOL // 0x28e1 @0x10
0x28d1…28e2 }
0x28e2…2906 b65d 5595 F0$(45,54)=D6$(EL:TI)
0x28e2…2906 LineComalBin {
0x28e2…2906 ptr = 0xb65d // 0x28e2 @0x0
0x28e2…2906 lno = 0x15db // 0x28e4 @0x2
0x28e2…2906 at0004 = ╱46╱F╱ // 0x28e6 @0x4
0x28e2…2906 at0005 = ╱30╱0╱ // 0x28e7 @0x5
0x28e2…2906 at0006 = ╱ef╱$╱ // 0x28e8 @0x6
0x28e2…2906 at0007 = ╱ed╱(╱ // 0x28e9 @0x7
0x28e2…2906 at0008 = ╱34╱4╱ // 0x28ea @0x8
0x28e2…2906 at0009 = ╱35╱5╱ // 0x28eb @0x9
0x28e2…2906 at000a = ╱fe0000b406╱ // 0x28ec @0xa
0x28e2…2906 at000f = ╱ec╱,╱ // 0x28f1 @0xf
0x28e2…2906 at0010 = ╱35╱5╱ // 0x28f2 @0x10
0x28e2…2906 at0011 = ╱34╱4╱ // 0x28f3 @0x11
0x28e2…2906 at0012 = ╱fe0000d806╱ // 0x28f4 @0x12
0x28e2…2906 at0017 = ╱ee╱)╱ // 0x28f9 @0x17
0x28e2…2906 at0018 = ╱dc╱=╱ // 0x28fa @0x18
0x28e2…2906 at0019 = ╱44╱D╱ // 0x28fb @0x19
0x28e2…2906 at001a = ╱36╱6╱ // 0x28fc @0x1a
0x28e2…2906 at001b = ╱ef╱$╱ // 0x28fd @0x1b
0x28e2…2906 at001c = ╱ed╱(╱ // 0x28fe @0x1c
0x28e2…2906 at001d = ╱45╱E╱ // 0x28ff @0x1d
0x28e2…2906 at001e = ╱4c╱L╱ // 0x2900 @0x1e
0x28e2…2906 at001f = ╱f0╱:╱ // 0x2901 @0x1f
0x28e2…2906 at0020 = ╱54╱T╱ // 0x2902 @0x20
0x28e2…2906 at0021 = ╱49╱I╱ // 0x2903 @0x21
0x28e2…2906 at0022 = ╱ee╱)╱ // 0x2904 @0x22
0x28e2…2906 at0023 = EOL // 0x2905 @0x23
0x28e2…2906 }
0x2906…2917 b66e 5600 WHEN J5=75
0x2906…2917 LineComalBin {
0x2906…2917 ptr = 0xb66e // 0x2906 @0x0
0x2906…2917 lno = 0x15e0 // 0x2908 @0x2
0x2906…2917 at0004 = ╱a301╱ WHEN ╱ // 0x290a @0x4
0x2906…2917 at0006 = ╱4a╱J╱ // 0x290c @0x6
0x2906…2917 at0007 = ╱35╱5╱ // 0x290d @0x7
0x2906…2917 at0008 = ╱dc╱=╱ // 0x290e @0x8
0x2906…2917 at0009 = ╱37╱7╱ // 0x290f @0x9
0x2906…2917 at000a = ╱35╱5╱ // 0x2910 @0xa
0x2906…2917 at000b = ╱fe00009607╱ // 0x2911 @0xb
0x2906…2917 at0010 = EOL // 0x2916 @0x10
0x2906…2917 }
0x2917…293b b692 5610 F0$(45,54)=D6$(EL:TI)
0x2917…293b LineComalBin {
0x2917…293b ptr = 0xb692 // 0x2917 @0x0
0x2917…293b lno = 0x15ea // 0x2919 @0x2
0x2917…293b at0004 = ╱46╱F╱ // 0x291b @0x4
0x2917…293b at0005 = ╱30╱0╱ // 0x291c @0x5
0x2917…293b at0006 = ╱ef╱$╱ // 0x291d @0x6
0x2917…293b at0007 = ╱ed╱(╱ // 0x291e @0x7
0x2917…293b at0008 = ╱34╱4╱ // 0x291f @0x8
0x2917…293b at0009 = ╱35╱5╱ // 0x2920 @0x9
0x2917…293b at000a = ╱fe0000b406╱ // 0x2921 @0xa
0x2917…293b at000f = ╱ec╱,╱ // 0x2926 @0xf
0x2917…293b at0010 = ╱35╱5╱ // 0x2927 @0x10
0x2917…293b at0011 = ╱34╱4╱ // 0x2928 @0x11
0x2917…293b at0012 = ╱fe0000d806╱ // 0x2929 @0x12
0x2917…293b at0017 = ╱ee╱)╱ // 0x292e @0x17
0x2917…293b at0018 = ╱dc╱=╱ // 0x292f @0x18
0x2917…293b at0019 = ╱44╱D╱ // 0x2930 @0x19
0x2917…293b at001a = ╱36╱6╱ // 0x2931 @0x1a
0x2917…293b at001b = ╱ef╱$╱ // 0x2932 @0x1b
0x2917…293b at001c = ╱ed╱(╱ // 0x2933 @0x1c
0x2917…293b at001d = ╱45╱E╱ // 0x2934 @0x1d
0x2917…293b at001e = ╱4c╱L╱ // 0x2935 @0x1e
0x2917…293b at001f = ╱f0╱:╱ // 0x2936 @0x1f
0x2917…293b at0020 = ╱54╱T╱ // 0x2937 @0x20
0x2917…293b at0021 = ╱49╱I╱ // 0x2938 @0x21
0x2917…293b at0022 = ╱ee╱)╱ // 0x2939 @0x22
0x2917…293b at0023 = EOL // 0x293a @0x23
0x2917…293b }
0x293b…2977 b6ce 5620 L2=(ORD(F0$(45))-48)*TI+ORD(F0$(46))-48
0x293b…2977 LineComalBin {
0x293b…2977 ptr = 0xb6ce // 0x293b @0x0
0x293b…2977 lno = 0x15f4 // 0x293d @0x2
0x293b…2977 at0004 = ╱4c╱L╱ // 0x293f @0x4
0x293b…2977 at0005 = ╱32╱2╱ // 0x2940 @0x5
0x293b…2977 at0006 = ╱dc╱=╱ // 0x2941 @0x6
0x293b…2977 at0007 = ╱ed╱(╱ // 0x2942 @0x7
0x293b…2977 at0008 = ╱cd╱ORD╱ // 0x2943 @0x8
0x293b…2977 at0009 = ╱ed╱(╱ // 0x2944 @0x9
0x293b…2977 at000a = ╱46╱F╱ // 0x2945 @0xa
0x293b…2977 at000b = ╱30╱0╱ // 0x2946 @0xb
0x293b…2977 at000c = ╱ef╱$╱ // 0x2947 @0xc
0x293b…2977 at000d = ╱ed╱(╱ // 0x2948 @0xd
0x293b…2977 at000e = ╱34╱4╱ // 0x2949 @0xe
0x293b…2977 at000f = ╱35╱5╱ // 0x294a @0xf
0x293b…2977 at0010 = ╱fe0000b406╱ // 0x294b @0x10
0x293b…2977 at0015 = ╱ee╱)╱ // 0x2950 @0x15
0x293b…2977 at0016 = ╱ee╱)╱ // 0x2951 @0x16
0x293b…2977 at0017 = ╱e3╱-╱ // 0x2952 @0x17
0x293b…2977 at0018 = ╱34╱4╱ // 0x2953 @0x18
0x293b…2977 at0019 = ╱38╱8╱ // 0x2954 @0x19
0x293b…2977 at001a = ╱fe0000c006╱ // 0x2955 @0x1a
0x293b…2977 at001f = ╱ee╱)╱ // 0x295a @0x1f
0x293b…2977 at0020 = ╱e4╱*╱ // 0x295b @0x20
0x293b…2977 at0021 = ╱54╱T╱ // 0x295c @0x21
0x293b…2977 at0022 = ╱49╱I╱ // 0x295d @0x22
0x293b…2977 at0023 = ╱e2╱+╱ // 0x295e @0x23
0x293b…2977 at0024 = ╱cd╱ORD╱ // 0x295f @0x24
0x293b…2977 at0025 = ╱ed╱(╱ // 0x2960 @0x25
0x293b…2977 at0026 = ╱46╱F╱ // 0x2961 @0x26
0x293b…2977 at0027 = ╱30╱0╱ // 0x2962 @0x27
0x293b…2977 at0028 = ╱ef╱$╱ // 0x2963 @0x28
0x293b…2977 at0029 = ╱ed╱(╱ // 0x2964 @0x29
0x293b…2977 at002a = ╱34╱4╱ // 0x2965 @0x2a
0x293b…2977 at002b = ╱36╱6╱ // 0x2966 @0x2b
0x293b…2977 at002c = ╱fe0000b806╱ // 0x2967 @0x2c
0x293b…2977 at0031 = ╱ee╱)╱ // 0x296c @0x31
0x293b…2977 at0032 = ╱ee╱)╱ // 0x296d @0x32
0x293b…2977 at0033 = ╱e3╱-╱ // 0x296e @0x33
0x293b…2977 at0034 = ╱34╱4╱ // 0x296f @0x34
0x293b…2977 at0035 = ╱38╱8╱ // 0x2970 @0x35
0x293b…2977 at0036 = ╱fe0000c006╱ // 0x2971 @0x36
0x293b…2977 at003b = EOL // 0x2976 @0x3b
0x293b…2977 }
0x2977…29bf b716 5630 L2=L2*100+(ORD(F0$(47))-48)*TI+ORD(F0$(48))-48
0x2977…29bf LineComalBin {
0x2977…29bf ptr = 0xb716 // 0x2977 @0x0
0x2977…29bf lno = 0x15fe // 0x2979 @0x2
0x2977…29bf at0004 = ╱4c╱L╱ // 0x297b @0x4
0x2977…29bf at0005 = ╱32╱2╱ // 0x297c @0x5
0x2977…29bf at0006 = ╱dc╱=╱ // 0x297d @0x6
0x2977…29bf at0007 = ╱4c╱L╱ // 0x297e @0x7
0x2977…29bf at0008 = ╱32╱2╱ // 0x297f @0x8
0x2977…29bf at0009 = ╱e4╱*╱ // 0x2980 @0x9
0x2977…29bf at000a = ╱31╱1╱ // 0x2981 @0xa
0x2977…29bf at000b = ╱30╱0╱ // 0x2982 @0xb
0x2977…29bf at000c = ╱30╱0╱ // 0x2983 @0xc
0x2977…29bf at000d = ╱fe0000c807╱ // 0x2984 @0xd
0x2977…29bf at0012 = ╱e2╱+╱ // 0x2989 @0x12
0x2977…29bf at0013 = ╱ed╱(╱ // 0x298a @0x13
0x2977…29bf at0014 = ╱cd╱ORD╱ // 0x298b @0x14
0x2977…29bf at0015 = ╱ed╱(╱ // 0x298c @0x15
0x2977…29bf at0016 = ╱46╱F╱ // 0x298d @0x16
0x2977…29bf at0017 = ╱30╱0╱ // 0x298e @0x17
0x2977…29bf at0018 = ╱ef╱$╱ // 0x298f @0x18
0x2977…29bf at0019 = ╱ed╱(╱ // 0x2990 @0x19
0x2977…29bf at001a = ╱34╱4╱ // 0x2991 @0x1a
0x2977…29bf at001b = ╱37╱7╱ // 0x2992 @0x1b
0x2977…29bf at001c = ╱fe0000bc06╱ // 0x2993 @0x1c
0x2977…29bf at0021 = ╱ee╱)╱ // 0x2998 @0x21
0x2977…29bf at0022 = ╱ee╱)╱ // 0x2999 @0x22
0x2977…29bf at0023 = ╱e3╱-╱ // 0x299a @0x23
0x2977…29bf at0024 = ╱34╱4╱ // 0x299b @0x24
0x2977…29bf at0025 = ╱38╱8╱ // 0x299c @0x25
0x2977…29bf at0026 = ╱fe0000c006╱ // 0x299d @0x26
0x2977…29bf at002b = ╱ee╱)╱ // 0x29a2 @0x2b
0x2977…29bf at002c = ╱e4╱*╱ // 0x29a3 @0x2c
0x2977…29bf at002d = ╱54╱T╱ // 0x29a4 @0x2d
0x2977…29bf at002e = ╱49╱I╱ // 0x29a5 @0x2e
0x2977…29bf at002f = ╱e2╱+╱ // 0x29a6 @0x2f
0x2977…29bf at0030 = ╱cd╱ORD╱ // 0x29a7 @0x30
0x2977…29bf at0031 = ╱ed╱(╱ // 0x29a8 @0x31
0x2977…29bf at0032 = ╱46╱F╱ // 0x29a9 @0x32
0x2977…29bf at0033 = ╱30╱0╱ // 0x29aa @0x33
0x2977…29bf at0034 = ╱ef╱$╱ // 0x29ab @0x34
0x2977…29bf at0035 = ╱ed╱(╱ // 0x29ac @0x35
0x2977…29bf at0036 = ╱34╱4╱ // 0x29ad @0x36
0x2977…29bf at0037 = ╱38╱8╱ // 0x29ae @0x37
0x2977…29bf at0038 = ╱fe0000c006╱ // 0x29af @0x38
0x2977…29bf at003d = ╱ee╱)╱ // 0x29b4 @0x3d
0x2977…29bf at003e = ╱ee╱)╱ // 0x29b5 @0x3e
0x2977…29bf at003f = ╱e3╱-╱ // 0x29b6 @0x3f
0x2977…29bf at0040 = ╱34╱4╱ // 0x29b7 @0x40
0x2977…29bf at0041 = ╱38╱8╱ // 0x29b8 @0x41
0x2977…29bf at0042 = ╱fe0000c006╱ // 0x29b9 @0x42
0x2977…29bf at0047 = EOL // 0x29be @0x47
0x2977…29bf }
0x29bf…2a07 b75e 5640 L2=100*L2+(ORD(F0$(49))-48)*TI+ORD(F0$(50))-48
0x29bf…2a07 LineComalBin {
0x29bf…2a07 ptr = 0xb75e // 0x29bf @0x0
0x29bf…2a07 lno = 0x1608 // 0x29c1 @0x2
0x29bf…2a07 at0004 = ╱4c╱L╱ // 0x29c3 @0x4
0x29bf…2a07 at0005 = ╱32╱2╱ // 0x29c4 @0x5
0x29bf…2a07 at0006 = ╱dc╱=╱ // 0x29c5 @0x6
0x29bf…2a07 at0007 = ╱31╱1╱ // 0x29c6 @0x7
0x29bf…2a07 at0008 = ╱30╱0╱ // 0x29c7 @0x8
0x29bf…2a07 at0009 = ╱30╱0╱ // 0x29c8 @0x9
0x29bf…2a07 at000a = ╱fe0000c807╱ // 0x29c9 @0xa
0x29bf…2a07 at000f = ╱e4╱*╱ // 0x29ce @0xf
0x29bf…2a07 at0010 = ╱4c╱L╱ // 0x29cf @0x10
0x29bf…2a07 at0011 = ╱32╱2╱ // 0x29d0 @0x11
0x29bf…2a07 at0012 = ╱e2╱+╱ // 0x29d1 @0x12
0x29bf…2a07 at0013 = ╱ed╱(╱ // 0x29d2 @0x13
0x29bf…2a07 at0014 = ╱cd╱ORD╱ // 0x29d3 @0x14
0x29bf…2a07 at0015 = ╱ed╱(╱ // 0x29d4 @0x15
0x29bf…2a07 at0016 = ╱46╱F╱ // 0x29d5 @0x16
0x29bf…2a07 at0017 = ╱30╱0╱ // 0x29d6 @0x17
0x29bf…2a07 at0018 = ╱ef╱$╱ // 0x29d7 @0x18
0x29bf…2a07 at0019 = ╱ed╱(╱ // 0x29d8 @0x19
0x29bf…2a07 at001a = ╱34╱4╱ // 0x29d9 @0x1a
0x29bf…2a07 at001b = ╱39╱9╱ // 0x29da @0x1b
0x29bf…2a07 at001c = ╱fe0000c406╱ // 0x29db @0x1c
0x29bf…2a07 at0021 = ╱ee╱)╱ // 0x29e0 @0x21
0x29bf…2a07 at0022 = ╱ee╱)╱ // 0x29e1 @0x22
0x29bf…2a07 at0023 = ╱e3╱-╱ // 0x29e2 @0x23
0x29bf…2a07 at0024 = ╱34╱4╱ // 0x29e3 @0x24
0x29bf…2a07 at0025 = ╱38╱8╱ // 0x29e4 @0x25
0x29bf…2a07 at0026 = ╱fe0000c006╱ // 0x29e5 @0x26
0x29bf…2a07 at002b = ╱ee╱)╱ // 0x29ea @0x2b
0x29bf…2a07 at002c = ╱e4╱*╱ // 0x29eb @0x2c
0x29bf…2a07 at002d = ╱54╱T╱ // 0x29ec @0x2d
0x29bf…2a07 at002e = ╱49╱I╱ // 0x29ed @0x2e
0x29bf…2a07 at002f = ╱e2╱+╱ // 0x29ee @0x2f
0x29bf…2a07 at0030 = ╱cd╱ORD╱ // 0x29ef @0x30
0x29bf…2a07 at0031 = ╱ed╱(╱ // 0x29f0 @0x31
0x29bf…2a07 at0032 = ╱46╱F╱ // 0x29f1 @0x32
0x29bf…2a07 at0033 = ╱30╱0╱ // 0x29f2 @0x33
0x29bf…2a07 at0034 = ╱ef╱$╱ // 0x29f3 @0x34
0x29bf…2a07 at0035 = ╱ed╱(╱ // 0x29f4 @0x35
0x29bf…2a07 at0036 = ╱35╱5╱ // 0x29f5 @0x36
0x29bf…2a07 at0037 = ╱30╱0╱ // 0x29f6 @0x37
0x29bf…2a07 at0038 = ╱fe0000c806╱ // 0x29f7 @0x38
0x29bf…2a07 at003d = ╱ee╱)╱ // 0x29fc @0x3d
0x29bf…2a07 at003e = ╱ee╱)╱ // 0x29fd @0x3e
0x29bf…2a07 at003f = ╱e3╱-╱ // 0x29fe @0x3f
0x29bf…2a07 at0040 = ╱34╱4╱ // 0x29ff @0x40
0x29bf…2a07 at0041 = ╱38╱8╱ // 0x2a00 @0x41
0x29bf…2a07 at0042 = ╱fe0000c006╱ // 0x2a01 @0x42
0x29bf…2a07 at0047 = EOL // 0x2a06 @0x47
0x29bf…2a07 }
0x2a07…2a0d b764 5650 ENDCASE
0x2a07…2a0d LineComalBin {
0x2a07…2a0d ptr = 0xb764 // 0x2a07 @0x0
0x2a07…2a0d lno = 0x1612 // 0x2a09 @0x2
0x2a07…2a0d at0004 = ╱a4╱ ENDCASE ╱ // 0x2a0b @0x4
0x2a07…2a0d at0005 = EOL // 0x2a0c @0x5
0x2a07…2a0d }
0x2a0d…2a14 b76b 5660 EXEC Å
0x2a0d…2a14 LineComalBin {
0x2a0d…2a14 ptr = 0xb76b // 0x2a0d @0x0
0x2a0d…2a14 lno = 0x161c // 0x2a0f @0x2
0x2a0d…2a14 at0004 = ╱9d╱ EXEC ╱ // 0x2a11 @0x4
0x2a0d…2a14 at0005 = ╱5d╱Å╱ // 0x2a12 @0x5
0x2a0d…2a14 at0006 = EOL // 0x2a13 @0x6
0x2a0d…2a14 }
0x2a14…2a24 b77b 5670 FOR I=E TO 7
0x2a14…2a24 LineComalBin {
0x2a14…2a24 ptr = 0xb77b // 0x2a14 @0x0
0x2a14…2a24 lno = 0x1626 // 0x2a16 @0x2
0x2a14…2a24 at0004 = ╱83╱ FOR ╱ // 0x2a18 @0x4
0x2a14…2a24 at0005 = ╱49╱I╱ // 0x2a19 @0x5
0x2a14…2a24 at0006 = ╱dc╱=╱ // 0x2a1a @0x6
0x2a14…2a24 at0007 = ╱45╱E╱ // 0x2a1b @0x7
0x2a14…2a24 at0008 = ╱b7╱ TO ╱ // 0x2a1c @0x8
0x2a14…2a24 at0009 = ╱37╱7╱ // 0x2a1d @0x9
0x2a14…2a24 at000a = ╱fe0000e003╱ // 0x2a1e @0xa
0x2a14…2a24 at000f = EOL // 0x2a23 @0xf
0x2a14…2a24 }
0x2a24…2a3d b794 5680 IF D5$(I+21)="1" THEN
0x2a24…2a3d LineComalBin {
0x2a24…2a3d ptr = 0xb794 // 0x2a24 @0x0
0x2a24…2a3d lno = 0x1630 // 0x2a26 @0x2
0x2a24…2a3d at0004 = ╱9c╱ IF ╱ // 0x2a28 @0x4
0x2a24…2a3d at0005 = ╱44╱D╱ // 0x2a29 @0x5
0x2a24…2a3d at0006 = ╱35╱5╱ // 0x2a2a @0x6
0x2a24…2a3d at0007 = ╱ef╱$╱ // 0x2a2b @0x7
0x2a24…2a3d at0008 = ╱ed╱(╱ // 0x2a2c @0x8
0x2a24…2a3d at0009 = ╱49╱I╱ // 0x2a2d @0x9
0x2a24…2a3d at000a = ╱e2╱+╱ // 0x2a2e @0xa
0x2a24…2a3d at000b = ╱32╱2╱ // 0x2a2f @0xb
0x2a24…2a3d at000c = ╱31╱1╱ // 0x2a30 @0xc
0x2a24…2a3d at000d = ╱fe0000a805╱ // 0x2a31 @0xd
0x2a24…2a3d at0012 = ╱ee╱)╱ // 0x2a36 @0x12
0x2a24…2a3d at0013 = ╱dc╱=╱ // 0x2a37 @0x13
0x2a24…2a3d at0014 = ╱22╱"╱ // 0x2a38 @0x14
0x2a24…2a3d at0015 = ╱31╱1╱ // 0x2a39 @0x15
0x2a24…2a3d at0016 = ╱22╱"╱ // 0x2a3a @0x16
0x2a24…2a3d at0017 = ╱b6╱ THEN ╱ // 0x2a3b @0x17
0x2a24…2a3d at0018 = EOL // 0x2a3c @0x18
0x2a24…2a3d }
0x2a3d…2a50 b7a7 5690 C4$=D6$(AZ:TI)
0x2a3d…2a50 LineComalBin {
0x2a3d…2a50 ptr = 0xb7a7 // 0x2a3d @0x0
0x2a3d…2a50 lno = 0x163a // 0x2a3f @0x2
0x2a3d…2a50 at0004 = ╱43╱C╱ // 0x2a41 @0x4
0x2a3d…2a50 at0005 = ╱34╱4╱ // 0x2a42 @0x5
0x2a3d…2a50 at0006 = ╱ef╱$╱ // 0x2a43 @0x6
0x2a3d…2a50 at0007 = ╱dc╱=╱ // 0x2a44 @0x7
0x2a3d…2a50 at0008 = ╱44╱D╱ // 0x2a45 @0x8
0x2a3d…2a50 at0009 = ╱36╱6╱ // 0x2a46 @0x9
0x2a3d…2a50 at000a = ╱ef╱$╱ // 0x2a47 @0xa
0x2a3d…2a50 at000b = ╱ed╱(╱ // 0x2a48 @0xb
0x2a3d…2a50 at000c = ╱41╱A╱ // 0x2a49 @0xc
0x2a3d…2a50 at000d = ╱5a╱Z╱ // 0x2a4a @0xd
0x2a3d…2a50 at000e = ╱f0╱:╱ // 0x2a4b @0xe
0x2a3d…2a50 at000f = ╱54╱T╱ // 0x2a4c @0xf
0x2a3d…2a50 at0010 = ╱49╱I╱ // 0x2a4d @0x10
0x2a3d…2a50 at0011 = ╱ee╱)╱ // 0x2a4e @0x11
0x2a3d…2a50 at0012 = EOL // 0x2a4f @0x12
0x2a3d…2a50 }
0x2a50…2a5f b7b6 5700 C3$=B9$(I)
0x2a50…2a5f LineComalBin {
0x2a50…2a5f ptr = 0xb7b6 // 0x2a50 @0x0
0x2a50…2a5f lno = 0x1644 // 0x2a52 @0x2
0x2a50…2a5f at0004 = ╱43╱C╱ // 0x2a54 @0x4
0x2a50…2a5f at0005 = ╱33╱3╱ // 0x2a55 @0x5
0x2a50…2a5f at0006 = ╱ef╱$╱ // 0x2a56 @0x6
0x2a50…2a5f at0007 = ╱dc╱=╱ // 0x2a57 @0x7
0x2a50…2a5f at0008 = ╱42╱B╱ // 0x2a58 @0x8
0x2a50…2a5f at0009 = ╱39╱9╱ // 0x2a59 @0x9
0x2a50…2a5f at000a = ╱ef╱$╱ // 0x2a5a @0xa
0x2a50…2a5f at000b = ╱ed╱(╱ // 0x2a5b @0xb
0x2a50…2a5f at000c = ╱49╱I╱ // 0x2a5c @0xc
0x2a50…2a5f at000d = ╱ee╱)╱ // 0x2a5d @0xd
0x2a50…2a5f at000e = EOL // 0x2a5e @0xe
0x2a50…2a5f }
0x2a5f…2a7a b7d1 5710 EXEC C(0,C4$,C3$,C4$)
0x2a5f…2a7a LineComalBin {
0x2a5f…2a7a ptr = 0xb7d1 // 0x2a5f @0x0
0x2a5f…2a7a lno = 0x164e // 0x2a61 @0x2
0x2a5f…2a7a at0004 = ╱9d╱ EXEC ╱ // 0x2a63 @0x4
0x2a5f…2a7a at0005 = ╱43╱C╱ // 0x2a64 @0x5
0x2a5f…2a7a at0006 = ╱ed╱(╱ // 0x2a65 @0x6
0x2a5f…2a7a at0007 = ╱30╱0╱ // 0x2a66 @0x7
0x2a5f…2a7a at0008 = ╱fe00000000╱ // 0x2a67 @0x8
0x2a5f…2a7a at000d = ╱ec╱,╱ // 0x2a6c @0xd
0x2a5f…2a7a at000e = ╱43╱C╱ // 0x2a6d @0xe
0x2a5f…2a7a at000f = ╱34╱4╱ // 0x2a6e @0xf
0x2a5f…2a7a at0010 = ╱ef╱$╱ // 0x2a6f @0x10
0x2a5f…2a7a at0011 = ╱ec╱,╱ // 0x2a70 @0x11
0x2a5f…2a7a at0012 = ╱43╱C╱ // 0x2a71 @0x12
0x2a5f…2a7a at0013 = ╱33╱3╱ // 0x2a72 @0x13
0x2a5f…2a7a at0014 = ╱ef╱$╱ // 0x2a73 @0x14
0x2a5f…2a7a at0015 = ╱ec╱,╱ // 0x2a74 @0x15
0x2a5f…2a7a at0016 = ╱43╱C╱ // 0x2a75 @0x16
0x2a5f…2a7a at0017 = ╱34╱4╱ // 0x2a76 @0x17
0x2a5f…2a7a at0018 = ╱ef╱$╱ // 0x2a77 @0x18
0x2a5f…2a7a at0019 = ╱ee╱)╱ // 0x2a78 @0x19
0x2a5f…2a7a at001a = EOL // 0x2a79 @0x1a
0x2a5f…2a7a }
0x2a7a…2a8f b7e6 5720 B9$(I)=C4$(G:EL)
0x2a7a…2a8f LineComalBin {
0x2a7a…2a8f ptr = 0xb7e6 // 0x2a7a @0x0
0x2a7a…2a8f lno = 0x1658 // 0x2a7c @0x2
0x2a7a…2a8f at0004 = ╱42╱B╱ // 0x2a7e @0x4
0x2a7a…2a8f at0005 = ╱39╱9╱ // 0x2a7f @0x5
0x2a7a…2a8f at0006 = ╱ef╱$╱ // 0x2a80 @0x6
0x2a7a…2a8f at0007 = ╱ed╱(╱ // 0x2a81 @0x7
0x2a7a…2a8f at0008 = ╱49╱I╱ // 0x2a82 @0x8
0x2a7a…2a8f at0009 = ╱ee╱)╱ // 0x2a83 @0x9
0x2a7a…2a8f at000a = ╱dc╱=╱ // 0x2a84 @0xa
0x2a7a…2a8f at000b = ╱43╱C╱ // 0x2a85 @0xb
0x2a7a…2a8f at000c = ╱34╱4╱ // 0x2a86 @0xc
0x2a7a…2a8f at000d = ╱ef╱$╱ // 0x2a87 @0xd
0x2a7a…2a8f at000e = ╱ed╱(╱ // 0x2a88 @0xe
0x2a7a…2a8f at000f = ╱47╱G╱ // 0x2a89 @0xf
0x2a7a…2a8f at0010 = ╱f0╱:╱ // 0x2a8a @0x10
0x2a7a…2a8f at0011 = ╱45╱E╱ // 0x2a8b @0x11
0x2a7a…2a8f at0012 = ╱4c╱L╱ // 0x2a8c @0x12
0x2a7a…2a8f at0013 = ╱ee╱)╱ // 0x2a8d @0x13
0x2a7a…2a8f at0014 = EOL // 0x2a8e @0x14
0x2a7a…2a8f }
0x2a8f…2a95 b7ec 5730 ENDIF
0x2a8f…2a95 LineComalBin {
0x2a8f…2a95 ptr = 0xb7ec // 0x2a8f @0x0
0x2a8f…2a95 lno = 0x1662 // 0x2a91 @0x2
0x2a8f…2a95 at0004 = ╱9b╱ ENDIF ╱ // 0x2a93 @0x4
0x2a8f…2a95 at0005 = EOL // 0x2a94 @0x5
0x2a8f…2a95 }
0x2a95…2a9c b7f3 5740 NEXT I
0x2a95…2a9c LineComalBin {
0x2a95…2a9c ptr = 0xb7f3 // 0x2a95 @0x0
0x2a95…2a9c lno = 0x166c // 0x2a97 @0x2
0x2a95…2a9c at0004 = ╱84╱ NEXT ╱ // 0x2a99 @0x4
0x2a95…2a9c at0005 = ╱49╱I╱ // 0x2a9a @0x5
0x2a95…2a9c at0006 = EOL // 0x2a9b @0x6
0x2a95…2a9c }
0x2a9c…2aa2 b7f9 5770 ELSE
0x2a9c…2aa2 LineComalBin {
0x2a9c…2aa2 ptr = 0xb7f9 // 0x2a9c @0x0
0x2a9c…2aa2 lno = 0x168a // 0x2a9e @0x2
0x2a9c…2aa2 at0004 = ╱9a╱ ELSE ╱ // 0x2aa0 @0x4
0x2a9c…2aa2 at0005 = EOL // 0x2aa1 @0x5
0x2a9c…2aa2 }
0x2aa2…2ab0 b807 5780 B7(L1)=L0
0x2aa2…2ab0 LineComalBin {
0x2aa2…2ab0 ptr = 0xb807 // 0x2aa2 @0x0
0x2aa2…2ab0 lno = 0x1694 // 0x2aa4 @0x2
0x2aa2…2ab0 at0004 = ╱42╱B╱ // 0x2aa6 @0x4
0x2aa2…2ab0 at0005 = ╱37╱7╱ // 0x2aa7 @0x5
0x2aa2…2ab0 at0006 = ╱ed╱(╱ // 0x2aa8 @0x6
0x2aa2…2ab0 at0007 = ╱4c╱L╱ // 0x2aa9 @0x7
0x2aa2…2ab0 at0008 = ╱31╱1╱ // 0x2aaa @0x8
0x2aa2…2ab0 at0009 = ╱ee╱)╱ // 0x2aab @0x9
0x2aa2…2ab0 at000a = ╱dc╱=╱ // 0x2aac @0xa
0x2aa2…2ab0 at000b = ╱4c╱L╱ // 0x2aad @0xb
0x2aa2…2ab0 at000c = ╱30╱0╱ // 0x2aae @0xc
0x2aa2…2ab0 at000d = EOL // 0x2aaf @0xd
0x2aa2…2ab0 }
0x2ab0…2ac0 b817 5790 B8$(L1)=D6$
0x2ab0…2ac0 LineComalBin {
0x2ab0…2ac0 ptr = 0xb817 // 0x2ab0 @0x0
0x2ab0…2ac0 lno = 0x169e // 0x2ab2 @0x2
0x2ab0…2ac0 at0004 = ╱42╱B╱ // 0x2ab4 @0x4
0x2ab0…2ac0 at0005 = ╱38╱8╱ // 0x2ab5 @0x5
0x2ab0…2ac0 at0006 = ╱ef╱$╱ // 0x2ab6 @0x6
0x2ab0…2ac0 at0007 = ╱ed╱(╱ // 0x2ab7 @0x7
0x2ab0…2ac0 at0008 = ╱4c╱L╱ // 0x2ab8 @0x8
0x2ab0…2ac0 at0009 = ╱31╱1╱ // 0x2ab9 @0x9
0x2ab0…2ac0 at000a = ╱ee╱)╱ // 0x2aba @0xa
0x2ab0…2ac0 at000b = ╱dc╱=╱ // 0x2abb @0xb
0x2ab0…2ac0 at000c = ╱44╱D╱ // 0x2abc @0xc
0x2ab0…2ac0 at000d = ╱36╱6╱ // 0x2abd @0xd
0x2ab0…2ac0 at000e = ╱ef╱$╱ // 0x2abe @0xe
0x2ab0…2ac0 at000f = EOL // 0x2abf @0xf
0x2ab0…2ac0 }
0x2ac0…2ad6 b82d 5800 IF J5<78 THEN L3=L1
0x2ac0…2ad6 LineComalBin {
0x2ac0…2ad6 ptr = 0xb82d // 0x2ac0 @0x0
0x2ac0…2ad6 lno = 0x16a8 // 0x2ac2 @0x2
0x2ac0…2ad6 at0004 = ╱82╱ IF ╱ // 0x2ac4 @0x4
0x2ac0…2ad6 at0005 = ╱4a╱J╱ // 0x2ac5 @0x5
0x2ac0…2ad6 at0006 = ╱35╱5╱ // 0x2ac6 @0x6
0x2ac0…2ad6 at0007 = ╱dd╱<╱ // 0x2ac7 @0x7
0x2ac0…2ad6 at0008 = ╱37╱7╱ // 0x2ac8 @0x8
0x2ac0…2ad6 at0009 = ╱38╱8╱ // 0x2ac9 @0x9
0x2ac0…2ad6 at000a = ╱fe00009c07╱ // 0x2aca @0xa
0x2ac0…2ad6 at000f = ╱b6╱ THEN ╱ // 0x2acf @0xf
0x2ac0…2ad6 at0010 = ╱4c╱L╱ // 0x2ad0 @0x10
0x2ac0…2ad6 at0011 = ╱33╱3╱ // 0x2ad1 @0x11
0x2ac0…2ad6 at0012 = ╱dc╱=╱ // 0x2ad2 @0x12
0x2ac0…2ad6 at0013 = ╱4c╱L╱ // 0x2ad3 @0x13
0x2ac0…2ad6 at0014 = ╱31╱1╱ // 0x2ad4 @0x14
0x2ac0…2ad6 at0015 = EOL // 0x2ad5 @0x15
0x2ac0…2ad6 }
0x2ad6…2ae2 b839 5810 L1=L1+E
0x2ad6…2ae2 LineComalBin {
0x2ad6…2ae2 ptr = 0xb839 // 0x2ad6 @0x0
0x2ad6…2ae2 lno = 0x16b2 // 0x2ad8 @0x2
0x2ad6…2ae2 at0004 = ╱4c╱L╱ // 0x2ada @0x4
0x2ad6…2ae2 at0005 = ╱31╱1╱ // 0x2adb @0x5
0x2ad6…2ae2 at0006 = ╱dc╱=╱ // 0x2adc @0x6
0x2ad6…2ae2 at0007 = ╱4c╱L╱ // 0x2add @0x7
0x2ad6…2ae2 at0008 = ╱31╱1╱ // 0x2ade @0x8
0x2ad6…2ae2 at0009 = ╱e2╱+╱ // 0x2adf @0x9
0x2ad6…2ae2 at000a = ╱45╱E╱ // 0x2ae0 @0xa
0x2ad6…2ae2 at000b = EOL // 0x2ae1 @0xb
0x2ad6…2ae2 }
0x2ae2…2ae8 b83f 5820 ENDIF
0x2ae2…2ae8 LineComalBin {
0x2ae2…2ae8 ptr = 0xb83f // 0x2ae2 @0x0
0x2ae2…2ae8 lno = 0x16bc // 0x2ae4 @0x2
0x2ae2…2ae8 at0004 = ╱9b╱ ENDIF ╱ // 0x2ae6 @0x4
0x2ae2…2ae8 at0005 = EOL // 0x2ae7 @0x5
0x2ae2…2ae8 }
0x2ae8…2af9 b850 5830 IF J5<83 THEN
0x2ae8…2af9 LineComalBin {
0x2ae8…2af9 ptr = 0xb850 // 0x2ae8 @0x0
0x2ae8…2af9 lno = 0x16c6 // 0x2aea @0x2
0x2ae8…2af9 at0004 = ╱9c╱ IF ╱ // 0x2aec @0x4
0x2ae8…2af9 at0005 = ╱4a╱J╱ // 0x2aed @0x5
0x2ae8…2af9 at0006 = ╱35╱5╱ // 0x2aee @0x6
0x2ae8…2af9 at0007 = ╱dd╱<╱ // 0x2aef @0x7
0x2ae8…2af9 at0008 = ╱38╱8╱ // 0x2af0 @0x8
0x2ae8…2af9 at0009 = ╱33╱3╱ // 0x2af1 @0x9
0x2ae8…2af9 at000a = ╱fe0000a607╱ // 0x2af2 @0xa
0x2ae8…2af9 at000f = ╱b6╱ THEN ╱ // 0x2af7 @0xf
0x2ae8…2af9 at0010 = EOL // 0x2af8 @0x10
0x2ae8…2af9 }
0x2af9…2b05 b85c 5840 L0=L0+E
0x2af9…2b05 LineComalBin {
0x2af9…2b05 ptr = 0xb85c // 0x2af9 @0x0
0x2af9…2b05 lno = 0x16d0 // 0x2afb @0x2
0x2af9…2b05 at0004 = ╱4c╱L╱ // 0x2afd @0x4
0x2af9…2b05 at0005 = ╱30╱0╱ // 0x2afe @0x5
0x2af9…2b05 at0006 = ╱dc╱=╱ // 0x2aff @0x6
0x2af9…2b05 at0007 = ╱4c╱L╱ // 0x2b00 @0x7
0x2af9…2b05 at0008 = ╱30╱0╱ // 0x2b01 @0x8
0x2af9…2b05 at0009 = ╱e2╱+╱ // 0x2b02 @0x9
0x2af9…2b05 at000a = ╱45╱E╱ // 0x2b03 @0xa
0x2af9…2b05 at000b = EOL // 0x2b04 @0xb
0x2af9…2b05 }
0x2b05…2b15 b86c 5850 GET D7$,L0:D6$
0x2b05…2b15 LineComalBin {
0x2b05…2b15 ptr = 0xb86c // 0x2b05 @0x0
0x2b05…2b15 lno = 0x16da // 0x2b07 @0x2
0x2b05…2b15 at0004 = ╱a9╱ GET ╱ // 0x2b09 @0x4
0x2b05…2b15 at0005 = ╱44╱D╱ // 0x2b0a @0x5
0x2b05…2b15 at0006 = ╱37╱7╱ // 0x2b0b @0x6
0x2b05…2b15 at0007 = ╱ef╱$╱ // 0x2b0c @0x7
0x2b05…2b15 at0008 = ╱ec╱,╱ // 0x2b0d @0x8
0x2b05…2b15 at0009 = ╱4c╱L╱ // 0x2b0e @0x9
0x2b05…2b15 at000a = ╱30╱0╱ // 0x2b0f @0xa
0x2b05…2b15 at000b = ╱f0╱:╱ // 0x2b10 @0xb
0x2b05…2b15 at000c = ╱44╱D╱ // 0x2b11 @0xc
0x2b05…2b15 at000d = ╱36╱6╱ // 0x2b12 @0xd
0x2b05…2b15 at000e = ╱ef╱$╱ // 0x2b13 @0xe
0x2b05…2b15 at000f = EOL // 0x2b14 @0xf
0x2b05…2b15 }
0x2b15…2b1b b872 5860 ENDIF
0x2b15…2b1b LineComalBin {
0x2b15…2b1b ptr = 0xb872 // 0x2b15 @0x0
0x2b15…2b1b lno = 0x16e4 // 0x2b17 @0x2
0x2b15…2b1b at0004 = ╱9b╱ ENDIF ╱ // 0x2b19 @0x4
0x2b15…2b1b at0005 = EOL // 0x2b1a @0x5
0x2b15…2b1b }
0x2b1b…2b2b b882 5870 UNTIL J5=83
0x2b1b…2b2b LineComalBin {
0x2b1b…2b2b ptr = 0xb882 // 0x2b1b @0x0
0x2b1b…2b2b lno = 0x16ee // 0x2b1d @0x2
0x2b1b…2b2b at0004 = ╱98╱ UNTIL ╱ // 0x2b1f @0x4
0x2b1b…2b2b at0005 = ╱4a╱J╱ // 0x2b20 @0x5
0x2b1b…2b2b at0006 = ╱35╱5╱ // 0x2b21 @0x6
0x2b1b…2b2b at0007 = ╱dc╱=╱ // 0x2b22 @0x7
0x2b1b…2b2b at0008 = ╱38╱8╱ // 0x2b23 @0x8
0x2b1b…2b2b at0009 = ╱33╱3╱ // 0x2b24 @0x9
0x2b1b…2b2b at000a = ╱fe0000a607╱ // 0x2b25 @0xa
0x2b1b…2b2b at000f = EOL // 0x2b2a @0xf
0x2b1b…2b2b }
0x2b2b…2b45 b89c 5875 B8$(L1-G,37)="-"
0x2b2b…2b45 LineComalBin {
0x2b2b…2b45 ptr = 0xb89c // 0x2b2b @0x0
0x2b2b…2b45 lno = 0x16f3 // 0x2b2d @0x2
0x2b2b…2b45 at0004 = ╱42╱B╱ // 0x2b2f @0x4
0x2b2b…2b45 at0005 = ╱38╱8╱ // 0x2b30 @0x5
0x2b2b…2b45 at0006 = ╱ef╱$╱ // 0x2b31 @0x6
0x2b2b…2b45 at0007 = ╱ed╱(╱ // 0x2b32 @0x7
0x2b2b…2b45 at0008 = ╱4c╱L╱ // 0x2b33 @0x8
0x2b2b…2b45 at0009 = ╱31╱1╱ // 0x2b34 @0x9
0x2b2b…2b45 at000a = ╱e3╱-╱ // 0x2b35 @0xa
0x2b2b…2b45 at000b = ╱47╱G╱ // 0x2b36 @0xb
0x2b2b…2b45 at000c = ╱ec╱,╱ // 0x2b37 @0xc
0x2b2b…2b45 at000d = ╱33╱3╱ // 0x2b38 @0xd
0x2b2b…2b45 at000e = ╱37╱7╱ // 0x2b39 @0xe
0x2b2b…2b45 at000f = ╱fe00009406╱ // 0x2b3a @0xf
0x2b2b…2b45 at0014 = ╱ee╱)╱ // 0x2b3f @0x14
0x2b2b…2b45 at0015 = ╱dc╱=╱ // 0x2b40 @0x15
0x2b2b…2b45 at0016 = ╱22╱"╱ // 0x2b41 @0x16
0x2b2b…2b45 at0017 = ╱2d╱-╱ // 0x2b42 @0x17
0x2b2b…2b45 at0018 = ╱22╱"╱ // 0x2b43 @0x18
0x2b2b…2b45 at0019 = EOL // 0x2b44 @0x19
0x2b2b…2b45 }
0x2b45…2b5d b8b4 5880 F1$=B8$(L1-G,AZ:TI)
0x2b45…2b5d LineComalBin {
0x2b45…2b5d ptr = 0xb8b4 // 0x2b45 @0x0
0x2b45…2b5d lno = 0x16f8 // 0x2b47 @0x2
0x2b45…2b5d at0004 = ╱46╱F╱ // 0x2b49 @0x4
0x2b45…2b5d at0005 = ╱31╱1╱ // 0x2b4a @0x5
0x2b45…2b5d at0006 = ╱ef╱$╱ // 0x2b4b @0x6
0x2b45…2b5d at0007 = ╱dc╱=╱ // 0x2b4c @0x7
0x2b45…2b5d at0008 = ╱42╱B╱ // 0x2b4d @0x8
0x2b45…2b5d at0009 = ╱38╱8╱ // 0x2b4e @0x9
0x2b45…2b5d at000a = ╱ef╱$╱ // 0x2b4f @0xa
0x2b45…2b5d at000b = ╱ed╱(╱ // 0x2b50 @0xb
0x2b45…2b5d at000c = ╱4c╱L╱ // 0x2b51 @0xc
0x2b45…2b5d at000d = ╱31╱1╱ // 0x2b52 @0xd
0x2b45…2b5d at000e = ╱e3╱-╱ // 0x2b53 @0xe
0x2b45…2b5d at000f = ╱47╱G╱ // 0x2b54 @0xf
0x2b45…2b5d at0010 = ╱ec╱,╱ // 0x2b55 @0x10
0x2b45…2b5d at0011 = ╱41╱A╱ // 0x2b56 @0x11
0x2b45…2b5d at0012 = ╱5a╱Z╱ // 0x2b57 @0x12
0x2b45…2b5d at0013 = ╱f0╱:╱ // 0x2b58 @0x13
0x2b45…2b5d at0014 = ╱54╱T╱ // 0x2b59 @0x14
0x2b45…2b5d at0015 = ╱49╱I╱ // 0x2b5a @0x15
0x2b45…2b5d at0016 = ╱ee╱)╱ // 0x2b5b @0x16
0x2b45…2b5d at0017 = EOL // 0x2b5c @0x17
0x2b45…2b5d }
0x2b5d…2b6c b8c3 5890 C3$=B9$(G)
0x2b5d…2b6c LineComalBin {
0x2b5d…2b6c ptr = 0xb8c3 // 0x2b5d @0x0
0x2b5d…2b6c lno = 0x1702 // 0x2b5f @0x2
0x2b5d…2b6c at0004 = ╱43╱C╱ // 0x2b61 @0x4
0x2b5d…2b6c at0005 = ╱33╱3╱ // 0x2b62 @0x5
0x2b5d…2b6c at0006 = ╱ef╱$╱ // 0x2b63 @0x6
0x2b5d…2b6c at0007 = ╱dc╱=╱ // 0x2b64 @0x7
0x2b5d…2b6c at0008 = ╱42╱B╱ // 0x2b65 @0x8
0x2b5d…2b6c at0009 = ╱39╱9╱ // 0x2b66 @0x9
0x2b5d…2b6c at000a = ╱ef╱$╱ // 0x2b67 @0xa
0x2b5d…2b6c at000b = ╱ed╱(╱ // 0x2b68 @0xb
0x2b5d…2b6c at000c = ╱47╱G╱ // 0x2b69 @0xc
0x2b5d…2b6c at000d = ╱ee╱)╱ // 0x2b6a @0xd
0x2b5d…2b6c at000e = EOL // 0x2b6b @0xe
0x2b5d…2b6c }
0x2b6c…2b87 b8de 5900 EXEC C(0,F1$,C3$,C4$)
0x2b6c…2b87 LineComalBin {
0x2b6c…2b87 ptr = 0xb8de // 0x2b6c @0x0
0x2b6c…2b87 lno = 0x170c // 0x2b6e @0x2
0x2b6c…2b87 at0004 = ╱9d╱ EXEC ╱ // 0x2b70 @0x4
0x2b6c…2b87 at0005 = ╱43╱C╱ // 0x2b71 @0x5
0x2b6c…2b87 at0006 = ╱ed╱(╱ // 0x2b72 @0x6
0x2b6c…2b87 at0007 = ╱30╱0╱ // 0x2b73 @0x7
0x2b6c…2b87 at0008 = ╱fe00000000╱ // 0x2b74 @0x8
0x2b6c…2b87 at000d = ╱ec╱,╱ // 0x2b79 @0xd
0x2b6c…2b87 at000e = ╱46╱F╱ // 0x2b7a @0xe
0x2b6c…2b87 at000f = ╱31╱1╱ // 0x2b7b @0xf
0x2b6c…2b87 at0010 = ╱ef╱$╱ // 0x2b7c @0x10
0x2b6c…2b87 at0011 = ╱ec╱,╱ // 0x2b7d @0x11
0x2b6c…2b87 at0012 = ╱43╱C╱ // 0x2b7e @0x12
0x2b6c…2b87 at0013 = ╱33╱3╱ // 0x2b7f @0x13
0x2b6c…2b87 at0014 = ╱ef╱$╱ // 0x2b80 @0x14
0x2b6c…2b87 at0015 = ╱ec╱,╱ // 0x2b81 @0x15
0x2b6c…2b87 at0016 = ╱43╱C╱ // 0x2b82 @0x16
0x2b6c…2b87 at0017 = ╱34╱4╱ // 0x2b83 @0x17
0x2b6c…2b87 at0018 = ╱ef╱$╱ // 0x2b84 @0x18
0x2b6c…2b87 at0019 = ╱ee╱)╱ // 0x2b85 @0x19
0x2b6c…2b87 at001a = EOL // 0x2b86 @0x1a
0x2b6c…2b87 }
0x2b87…2b9c b8f3 5910 B9$(G)=C4$(G:EL)
0x2b87…2b9c LineComalBin {
0x2b87…2b9c ptr = 0xb8f3 // 0x2b87 @0x0
0x2b87…2b9c lno = 0x1716 // 0x2b89 @0x2
0x2b87…2b9c at0004 = ╱42╱B╱ // 0x2b8b @0x4
0x2b87…2b9c at0005 = ╱39╱9╱ // 0x2b8c @0x5
0x2b87…2b9c at0006 = ╱ef╱$╱ // 0x2b8d @0x6
0x2b87…2b9c at0007 = ╱ed╱(╱ // 0x2b8e @0x7
0x2b87…2b9c at0008 = ╱47╱G╱ // 0x2b8f @0x8
0x2b87…2b9c at0009 = ╱ee╱)╱ // 0x2b90 @0x9
0x2b87…2b9c at000a = ╱dc╱=╱ // 0x2b91 @0xa
0x2b87…2b9c at000b = ╱43╱C╱ // 0x2b92 @0xb
0x2b87…2b9c at000c = ╱34╱4╱ // 0x2b93 @0xc
0x2b87…2b9c at000d = ╱ef╱$╱ // 0x2b94 @0xd
0x2b87…2b9c at000e = ╱ed╱(╱ // 0x2b95 @0xe
0x2b87…2b9c at000f = ╱47╱G╱ // 0x2b96 @0xf
0x2b87…2b9c at0010 = ╱f0╱:╱ // 0x2b97 @0x10
0x2b87…2b9c at0011 = ╱45╱E╱ // 0x2b98 @0x11
0x2b87…2b9c at0012 = ╱4c╱L╱ // 0x2b99 @0x12
0x2b87…2b9c at0013 = ╱ee╱)╱ // 0x2b9a @0x13
0x2b87…2b9c at0014 = EOL // 0x2b9b @0x14
0x2b87…2b9c }
0x2b9c…2bb0 b907 5920 C3$=B9$(7)
0x2b9c…2bb0 LineComalBin {
0x2b9c…2bb0 ptr = 0xb907 // 0x2b9c @0x0
0x2b9c…2bb0 lno = 0x1720 // 0x2b9e @0x2
0x2b9c…2bb0 at0004 = ╱43╱C╱ // 0x2ba0 @0x4
0x2b9c…2bb0 at0005 = ╱33╱3╱ // 0x2ba1 @0x5
0x2b9c…2bb0 at0006 = ╱ef╱$╱ // 0x2ba2 @0x6
0x2b9c…2bb0 at0007 = ╱dc╱=╱ // 0x2ba3 @0x7
0x2b9c…2bb0 at0008 = ╱42╱B╱ // 0x2ba4 @0x8
0x2b9c…2bb0 at0009 = ╱39╱9╱ // 0x2ba5 @0x9
0x2b9c…2bb0 at000a = ╱ef╱$╱ // 0x2ba6 @0xa
0x2b9c…2bb0 at000b = ╱ed╱(╱ // 0x2ba7 @0xb
0x2b9c…2bb0 at000c = ╱37╱7╱ // 0x2ba8 @0xc
0x2b9c…2bb0 at000d = ╱fe0000e003╱ // 0x2ba9 @0xd
0x2b9c…2bb0 at0012 = ╱ee╱)╱ // 0x2bae @0x12
0x2b9c…2bb0 at0013 = EOL // 0x2baf @0x13
0x2b9c…2bb0 }
0x2bb0…2bcb b922 5930 EXEC C(0,F1$,C3$,C4$)
0x2bb0…2bcb LineComalBin {
0x2bb0…2bcb ptr = 0xb922 // 0x2bb0 @0x0
0x2bb0…2bcb lno = 0x172a // 0x2bb2 @0x2
0x2bb0…2bcb at0004 = ╱9d╱ EXEC ╱ // 0x2bb4 @0x4
0x2bb0…2bcb at0005 = ╱43╱C╱ // 0x2bb5 @0x5
0x2bb0…2bcb at0006 = ╱ed╱(╱ // 0x2bb6 @0x6
0x2bb0…2bcb at0007 = ╱30╱0╱ // 0x2bb7 @0x7
0x2bb0…2bcb at0008 = ╱fe00000000╱ // 0x2bb8 @0x8
0x2bb0…2bcb at000d = ╱ec╱,╱ // 0x2bbd @0xd
0x2bb0…2bcb at000e = ╱46╱F╱ // 0x2bbe @0xe
0x2bb0…2bcb at000f = ╱31╱1╱ // 0x2bbf @0xf
0x2bb0…2bcb at0010 = ╱ef╱$╱ // 0x2bc0 @0x10
0x2bb0…2bcb at0011 = ╱ec╱,╱ // 0x2bc1 @0x11
0x2bb0…2bcb at0012 = ╱43╱C╱ // 0x2bc2 @0x12
0x2bb0…2bcb at0013 = ╱33╱3╱ // 0x2bc3 @0x13
0x2bb0…2bcb at0014 = ╱ef╱$╱ // 0x2bc4 @0x14
0x2bb0…2bcb at0015 = ╱ec╱,╱ // 0x2bc5 @0x15
0x2bb0…2bcb at0016 = ╱43╱C╱ // 0x2bc6 @0x16
0x2bb0…2bcb at0017 = ╱34╱4╱ // 0x2bc7 @0x17
0x2bb0…2bcb at0018 = ╱ef╱$╱ // 0x2bc8 @0x18
0x2bb0…2bcb at0019 = ╱ee╱)╱ // 0x2bc9 @0x19
0x2bb0…2bcb at001a = EOL // 0x2bca @0x1a
0x2bb0…2bcb }
0x2bcb…2be5 b93c 5940 B9$(7)=C4$(G:EL)
0x2bcb…2be5 LineComalBin {
0x2bcb…2be5 ptr = 0xb93c // 0x2bcb @0x0
0x2bcb…2be5 lno = 0x1734 // 0x2bcd @0x2
0x2bcb…2be5 at0004 = ╱42╱B╱ // 0x2bcf @0x4
0x2bcb…2be5 at0005 = ╱39╱9╱ // 0x2bd0 @0x5
0x2bcb…2be5 at0006 = ╱ef╱$╱ // 0x2bd1 @0x6
0x2bcb…2be5 at0007 = ╱ed╱(╱ // 0x2bd2 @0x7
0x2bcb…2be5 at0008 = ╱37╱7╱ // 0x2bd3 @0x8
0x2bcb…2be5 at0009 = ╱fe0000e003╱ // 0x2bd4 @0x9
0x2bcb…2be5 at000e = ╱ee╱)╱ // 0x2bd9 @0xe
0x2bcb…2be5 at000f = ╱dc╱=╱ // 0x2bda @0xf
0x2bcb…2be5 at0010 = ╱43╱C╱ // 0x2bdb @0x10
0x2bcb…2be5 at0011 = ╱34╱4╱ // 0x2bdc @0x11
0x2bcb…2be5 at0012 = ╱ef╱$╱ // 0x2bdd @0x12
0x2bcb…2be5 at0013 = ╱ed╱(╱ // 0x2bde @0x13
0x2bcb…2be5 at0014 = ╱47╱G╱ // 0x2bdf @0x14
0x2bcb…2be5 at0015 = ╱f0╱:╱ // 0x2be0 @0x15
0x2bcb…2be5 at0016 = ╱45╱E╱ // 0x2be1 @0x16
0x2bcb…2be5 at0017 = ╱4c╱L╱ // 0x2be2 @0x17
0x2bcb…2be5 at0018 = ╱ee╱)╱ // 0x2be3 @0x18
0x2bcb…2be5 at0019 = EOL // 0x2be4 @0x19
0x2bcb…2be5 }
0x2be5…2bf0 b947 5950 IF H6>B THEN
0x2be5…2bf0 LineComalBin {
0x2be5…2bf0 ptr = 0xb947 // 0x2be5 @0x0
0x2be5…2bf0 lno = 0x173e // 0x2be7 @0x2
0x2be5…2bf0 at0004 = ╱9c╱ IF ╱ // 0x2be9 @0x4
0x2be5…2bf0 at0005 = ╱48╱H╱ // 0x2bea @0x5
0x2be5…2bf0 at0006 = ╱36╱6╱ // 0x2beb @0x6
0x2be5…2bf0 at0007 = ╱de╱>╱ // 0x2bec @0x7
0x2be5…2bf0 at0008 = ╱42╱B╱ // 0x2bed @0x8
0x2be5…2bf0 at0009 = ╱b6╱ THEN ╱ // 0x2bee @0x9
0x2be5…2bf0 at000a = EOL // 0x2bef @0xa
0x2be5…2bf0 }
0x2bf0…2bfc b953 5960 C3$=B3$
0x2bf0…2bfc LineComalBin {
0x2bf0…2bfc ptr = 0xb953 // 0x2bf0 @0x0
0x2bf0…2bfc lno = 0x1748 // 0x2bf2 @0x2
0x2bf0…2bfc at0004 = ╱43╱C╱ // 0x2bf4 @0x4
0x2bf0…2bfc at0005 = ╱33╱3╱ // 0x2bf5 @0x5
0x2bf0…2bfc at0006 = ╱ef╱$╱ // 0x2bf6 @0x6
0x2bf0…2bfc at0007 = ╱dc╱=╱ // 0x2bf7 @0x7
0x2bf0…2bfc at0008 = ╱42╱B╱ // 0x2bf8 @0x8
0x2bf0…2bfc at0009 = ╱33╱3╱ // 0x2bf9 @0x9
0x2bf0…2bfc at000a = ╱ef╱$╱ // 0x2bfa @0xa
0x2bf0…2bfc at000b = EOL // 0x2bfb @0xb
0x2bf0…2bfc }
0x2bfc…2c02 b959 5970 ELSE
0x2bfc…2c02 LineComalBin {
0x2bfc…2c02 ptr = 0xb959 // 0x2bfc @0x0
0x2bfc…2c02 lno = 0x1752 // 0x2bfe @0x2
0x2bfc…2c02 at0004 = ╱9a╱ ELSE ╱ // 0x2c00 @0x4
0x2bfc…2c02 at0005 = EOL // 0x2c01 @0x5
0x2bfc…2c02 }
0x2c02…2c0d b964 5980 IF H0>B THEN
0x2c02…2c0d LineComalBin {
0x2c02…2c0d ptr = 0xb964 // 0x2c02 @0x0
0x2c02…2c0d lno = 0x175c // 0x2c04 @0x2
0x2c02…2c0d at0004 = ╱9c╱ IF ╱ // 0x2c06 @0x4
0x2c02…2c0d at0005 = ╱48╱H╱ // 0x2c07 @0x5
0x2c02…2c0d at0006 = ╱30╱0╱ // 0x2c08 @0x6
0x2c02…2c0d at0007 = ╱de╱>╱ // 0x2c09 @0x7
0x2c02…2c0d at0008 = ╱42╱B╱ // 0x2c0a @0x8
0x2c02…2c0d at0009 = ╱b6╱ THEN ╱ // 0x2c0b @0x9
0x2c02…2c0d at000a = EOL // 0x2c0c @0xa
0x2c02…2c0d }
0x2c0d…2c1c b973 5990 EXEC Æ(C3$,H0)
0x2c0d…2c1c LineComalBin {
0x2c0d…2c1c ptr = 0xb973 // 0x2c0d @0x0
0x2c0d…2c1c lno = 0x1766 // 0x2c0f @0x2
0x2c0d…2c1c at0004 = ╱9d╱ EXEC ╱ // 0x2c11 @0x4
0x2c0d…2c1c at0005 = ╱5b╱Æ╱ // 0x2c12 @0x5
0x2c0d…2c1c at0006 = ╱ed╱(╱ // 0x2c13 @0x6
0x2c0d…2c1c at0007 = ╱43╱C╱ // 0x2c14 @0x7
0x2c0d…2c1c at0008 = ╱33╱3╱ // 0x2c15 @0x8
0x2c0d…2c1c at0009 = ╱ef╱$╱ // 0x2c16 @0x9
0x2c0d…2c1c at000a = ╱ec╱,╱ // 0x2c17 @0xa
0x2c0d…2c1c at000b = ╱48╱H╱ // 0x2c18 @0xb
0x2c0d…2c1c at000c = ╱30╱0╱ // 0x2c19 @0xc
0x2c0d…2c1c at000d = ╱ee╱)╱ // 0x2c1a @0xd
0x2c0d…2c1c at000e = EOL // 0x2c1b @0xe
0x2c0d…2c1c }
0x2c1c…2c22 b979 6000 ELSE
0x2c1c…2c22 LineComalBin {
0x2c1c…2c22 ptr = 0xb979 // 0x2c1c @0x0
0x2c1c…2c22 lno = 0x1770 // 0x2c1e @0x2
0x2c1c…2c22 at0004 = ╱9a╱ ELSE ╱ // 0x2c20 @0x4
0x2c1c…2c22 at0005 = EOL // 0x2c21 @0x5
0x2c1c…2c22 }
0x2c22…2c40 b997 6002 K8=INT(G9*12/365)
0x2c22…2c40 LineComalBin {
0x2c22…2c40 ptr = 0xb997 // 0x2c22 @0x0
0x2c22…2c40 lno = 0x1772 // 0x2c24 @0x2
0x2c22…2c40 at0004 = ╱4b╱K╱ // 0x2c26 @0x4
0x2c22…2c40 at0005 = ╱38╱8╱ // 0x2c27 @0x5
0x2c22…2c40 at0006 = ╱dc╱=╱ // 0x2c28 @0x6
0x2c22…2c40 at0007 = ╱c6╱INT╱ // 0x2c29 @0x7
0x2c22…2c40 at0008 = ╱ed╱(╱ // 0x2c2a @0x8
0x2c22…2c40 at0009 = ╱47╱G╱ // 0x2c2b @0x9
0x2c22…2c40 at000a = ╱39╱9╱ // 0x2c2c @0xa
0x2c22…2c40 at000b = ╱e4╱*╱ // 0x2c2d @0xb
0x2c22…2c40 at000c = ╱31╱1╱ // 0x2c2e @0xc
0x2c22…2c40 at000d = ╱32╱2╱ // 0x2c2f @0xd
0x2c22…2c40 at000e = ╱fe0000c004╱ // 0x2c30 @0xe
0x2c22…2c40 at0013 = ╱e5╱/╱ // 0x2c35 @0x13
0x2c22…2c40 at0014 = ╱33╱3╱ // 0x2c36 @0x14
0x2c22…2c40 at0015 = ╱36╱6╱ // 0x2c37 @0x15
0x2c22…2c40 at0016 = ╱35╱5╱ // 0x2c38 @0x16
0x2c22…2c40 at0017 = ╱fe0080b609╱ // 0x2c39 @0x17
0x2c22…2c40 at001c = ╱ee╱)╱ // 0x2c3e @0x1c
0x2c22…2c40 at001d = EOL // 0x2c3f @0x1d
0x2c22…2c40 }
0x2c40…2c4f b9a6 6004 EXEC Æ(C3$,K8)
0x2c40…2c4f LineComalBin {
0x2c40…2c4f ptr = 0xb9a6 // 0x2c40 @0x0
0x2c40…2c4f lno = 0x1774 // 0x2c42 @0x2
0x2c40…2c4f at0004 = ╱9d╱ EXEC ╱ // 0x2c44 @0x4
0x2c40…2c4f at0005 = ╱5b╱Æ╱ // 0x2c45 @0x5
0x2c40…2c4f at0006 = ╱ed╱(╱ // 0x2c46 @0x6
0x2c40…2c4f at0007 = ╱43╱C╱ // 0x2c47 @0x7
0x2c40…2c4f at0008 = ╱33╱3╱ // 0x2c48 @0x8
0x2c40…2c4f at0009 = ╱ef╱$╱ // 0x2c49 @0x9
0x2c40…2c4f at000a = ╱ec╱,╱ // 0x2c4a @0xa
0x2c40…2c4f at000b = ╱4b╱K╱ // 0x2c4b @0xb
0x2c40…2c4f at000c = ╱38╱8╱ // 0x2c4c @0xc
0x2c40…2c4f at000d = ╱ee╱)╱ // 0x2c4d @0xd
0x2c40…2c4f at000e = EOL // 0x2c4e @0xe
0x2c40…2c4f }
0x2c4f…2c67 b9be 6010 C4$=B8$(L1-E,EL:TI)
0x2c4f…2c67 LineComalBin {
0x2c4f…2c67 ptr = 0xb9be // 0x2c4f @0x0
0x2c4f…2c67 lno = 0x177a // 0x2c51 @0x2
0x2c4f…2c67 at0004 = ╱43╱C╱ // 0x2c53 @0x4
0x2c4f…2c67 at0005 = ╱34╱4╱ // 0x2c54 @0x5
0x2c4f…2c67 at0006 = ╱ef╱$╱ // 0x2c55 @0x6
0x2c4f…2c67 at0007 = ╱dc╱=╱ // 0x2c56 @0x7
0x2c4f…2c67 at0008 = ╱42╱B╱ // 0x2c57 @0x8
0x2c4f…2c67 at0009 = ╱38╱8╱ // 0x2c58 @0x9
0x2c4f…2c67 at000a = ╱ef╱$╱ // 0x2c59 @0xa
0x2c4f…2c67 at000b = ╱ed╱(╱ // 0x2c5a @0xb
0x2c4f…2c67 at000c = ╱4c╱L╱ // 0x2c5b @0xc
0x2c4f…2c67 at000d = ╱31╱1╱ // 0x2c5c @0xd
0x2c4f…2c67 at000e = ╱e3╱-╱ // 0x2c5d @0xe
0x2c4f…2c67 at000f = ╱45╱E╱ // 0x2c5e @0xf
0x2c4f…2c67 at0010 = ╱ec╱,╱ // 0x2c5f @0x10
0x2c4f…2c67 at0011 = ╱45╱E╱ // 0x2c60 @0x11
0x2c4f…2c67 at0012 = ╱4c╱L╱ // 0x2c61 @0x12
0x2c4f…2c67 at0013 = ╱f0╱:╱ // 0x2c62 @0x13
0x2c4f…2c67 at0014 = ╱54╱T╱ // 0x2c63 @0x14
0x2c4f…2c67 at0015 = ╱49╱I╱ // 0x2c64 @0x15
0x2c4f…2c67 at0016 = ╱ee╱)╱ // 0x2c65 @0x16
0x2c4f…2c67 at0017 = EOL // 0x2c66 @0x17
0x2c4f…2c67 }
0x2c67…2c7b b9d2 6020 CASE D2$(21) OF
0x2c67…2c7b LineComalBin {
0x2c67…2c7b ptr = 0xb9d2 // 0x2c67 @0x0
0x2c67…2c7b lno = 0x1784 // 0x2c69 @0x2
0x2c67…2c7b at0004 = ╱a200╱ CASE ╱ // 0x2c6b @0x4
0x2c67…2c7b at0006 = ╱44╱D╱ // 0x2c6d @0x6
0x2c67…2c7b at0007 = ╱32╱2╱ // 0x2c6e @0x7
0x2c67…2c7b at0008 = ╱ef╱$╱ // 0x2c6f @0x8
0x2c67…2c7b at0009 = ╱ed╱(╱ // 0x2c70 @0x9
0x2c67…2c7b at000a = ╱32╱2╱ // 0x2c71 @0xa
0x2c67…2c7b at000b = ╱31╱1╱ // 0x2c72 @0xb
0x2c67…2c7b at000c = ╱fe0000a805╱ // 0x2c73 @0xc
0x2c67…2c7b at0011 = ╱ee╱)╱ // 0x2c78 @0x11
0x2c67…2c7b at0012 = ╱ba╱ OF ╱ // 0x2c79 @0x12
0x2c67…2c7b at0013 = EOL // 0x2c7a @0x13
0x2c67…2c7b }
0x2c7b…2c85 b9dc 6030 WHEN "1"
0x2c7b…2c85 LineComalBin {
0x2c7b…2c85 ptr = 0xb9dc // 0x2c7b @0x0
0x2c7b…2c85 lno = 0x178e // 0x2c7d @0x2
0x2c7b…2c85 at0004 = ╱a300╱ WHEN ╱ // 0x2c7f @0x4
0x2c7b…2c85 at0006 = ╱22╱"╱ // 0x2c81 @0x6
0x2c7b…2c85 at0007 = ╱31╱1╱ // 0x2c82 @0x7
0x2c7b…2c85 at0008 = ╱22╱"╱ // 0x2c83 @0x8
0x2c7b…2c85 at0009 = EOL // 0x2c84 @0x9
0x2c7b…2c85 }
0x2c85…2c92 b9e9 6040 F1$="1+"
0x2c85…2c92 LineComalBin {
0x2c85…2c92 ptr = 0xb9e9 // 0x2c85 @0x0
0x2c85…2c92 lno = 0x1798 // 0x2c87 @0x2
0x2c85…2c92 at0004 = ╱46╱F╱ // 0x2c89 @0x4
0x2c85…2c92 at0005 = ╱31╱1╱ // 0x2c8a @0x5
0x2c85…2c92 at0006 = ╱ef╱$╱ // 0x2c8b @0x6
0x2c85…2c92 at0007 = ╱dc╱=╱ // 0x2c8c @0x7
0x2c85…2c92 at0008 = ╱22╱"╱ // 0x2c8d @0x8
0x2c85…2c92 at0009 = ╱31╱1╱ // 0x2c8e @0x9
0x2c85…2c92 at000a = ╱2b╱+╱ // 0x2c8f @0xa
0x2c85…2c92 at000b = ╱22╱"╱ // 0x2c90 @0xb
0x2c85…2c92 at000c = EOL // 0x2c91 @0xc
0x2c85…2c92 }
0x2c92…2cad ba04 6050 EXEC C(4,F1$,C4$,C3$)
0x2c92…2cad LineComalBin {
0x2c92…2cad ptr = 0xba04 // 0x2c92 @0x0
0x2c92…2cad lno = 0x17a2 // 0x2c94 @0x2
0x2c92…2cad at0004 = ╱9d╱ EXEC ╱ // 0x2c96 @0x4
0x2c92…2cad at0005 = ╱43╱C╱ // 0x2c97 @0x5
0x2c92…2cad at0006 = ╱ed╱(╱ // 0x2c98 @0x6
0x2c92…2cad at0007 = ╱34╱4╱ // 0x2c99 @0x7
0x2c92…2cad at0008 = ╱fe00008003╱ // 0x2c9a @0x8
0x2c92…2cad at000d = ╱ec╱,╱ // 0x2c9f @0xd
0x2c92…2cad at000e = ╱46╱F╱ // 0x2ca0 @0xe
0x2c92…2cad at000f = ╱31╱1╱ // 0x2ca1 @0xf
0x2c92…2cad at0010 = ╱ef╱$╱ // 0x2ca2 @0x10
0x2c92…2cad at0011 = ╱ec╱,╱ // 0x2ca3 @0x11
0x2c92…2cad at0012 = ╱43╱C╱ // 0x2ca4 @0x12
0x2c92…2cad at0013 = ╱34╱4╱ // 0x2ca5 @0x13
0x2c92…2cad at0014 = ╱ef╱$╱ // 0x2ca6 @0x14
0x2c92…2cad at0015 = ╱ec╱,╱ // 0x2ca7 @0x15
0x2c92…2cad at0016 = ╱43╱C╱ // 0x2ca8 @0x16
0x2c92…2cad at0017 = ╱33╱3╱ // 0x2ca9 @0x17
0x2c92…2cad at0018 = ╱ef╱$╱ // 0x2caa @0x18
0x2c92…2cad at0019 = ╱ee╱)╱ // 0x2cab @0x19
0x2c92…2cad at001a = EOL // 0x2cac @0x1a
0x2c92…2cad }
0x2cad…2cb8 ba0f 6060 IF SI<>B THEN
0x2cad…2cb8 LineComalBin {
0x2cad…2cb8 ptr = 0xba0f // 0x2cad @0x0
0x2cad…2cb8 lno = 0x17ac // 0x2caf @0x2
0x2cad…2cb8 at0004 = ╱9c╱ IF ╱ // 0x2cb1 @0x4
0x2cad…2cb8 at0005 = ╱53╱S╱ // 0x2cb2 @0x5
0x2cad…2cb8 at0006 = ╱49╱I╱ // 0x2cb3 @0x6
0x2cad…2cb8 at0007 = ╱e1╱<>╱ // 0x2cb4 @0x7
0x2cad…2cb8 at0008 = ╱42╱B╱ // 0x2cb5 @0x8
0x2cad…2cb8 at0009 = ╱b6╱ THEN ╱ // 0x2cb6 @0x9
0x2cad…2cb8 at000a = EOL // 0x2cb7 @0xa
0x2cad…2cb8 }
0x2cb8…2cd3 ba2a 6100 EXEC C(2,C3$,C4$,F1$)
0x2cb8…2cd3 LineComalBin {
0x2cb8…2cd3 ptr = 0xba2a // 0x2cb8 @0x0
0x2cb8…2cd3 lno = 0x17d4 // 0x2cba @0x2
0x2cb8…2cd3 at0004 = ╱9d╱ EXEC ╱ // 0x2cbc @0x4
0x2cb8…2cd3 at0005 = ╱43╱C╱ // 0x2cbd @0x5
0x2cb8…2cd3 at0006 = ╱ed╱(╱ // 0x2cbe @0x6
0x2cb8…2cd3 at0007 = ╱32╱2╱ // 0x2cbf @0x7
0x2cb8…2cd3 at0008 = ╱fe00008002╱ // 0x2cc0 @0x8
0x2cb8…2cd3 at000d = ╱ec╱,╱ // 0x2cc5 @0xd
0x2cb8…2cd3 at000e = ╱43╱C╱ // 0x2cc6 @0xe
0x2cb8…2cd3 at000f = ╱33╱3╱ // 0x2cc7 @0xf
0x2cb8…2cd3 at0010 = ╱ef╱$╱ // 0x2cc8 @0x10
0x2cb8…2cd3 at0011 = ╱ec╱,╱ // 0x2cc9 @0x11
0x2cb8…2cd3 at0012 = ╱43╱C╱ // 0x2cca @0x12
0x2cb8…2cd3 at0013 = ╱34╱4╱ // 0x2ccb @0x13
0x2cb8…2cd3 at0014 = ╱ef╱$╱ // 0x2ccc @0x14
0x2cb8…2cd3 at0015 = ╱ec╱,╱ // 0x2ccd @0x15
0x2cb8…2cd3 at0016 = ╱46╱F╱ // 0x2cce @0x16
0x2cb8…2cd3 at0017 = ╱31╱1╱ // 0x2ccf @0x17
0x2cb8…2cd3 at0018 = ╱ef╱$╱ // 0x2cd0 @0x18
0x2cb8…2cd3 at0019 = ╱ee╱)╱ // 0x2cd1 @0x19
0x2cb8…2cd3 at001a = EOL // 0x2cd2 @0x1a
0x2cb8…2cd3 }
0x2cd3…2cdf ba36 6110 C3$=F1$
0x2cd3…2cdf LineComalBin {
0x2cd3…2cdf ptr = 0xba36 // 0x2cd3 @0x0
0x2cd3…2cdf lno = 0x17de // 0x2cd5 @0x2
0x2cd3…2cdf at0004 = ╱43╱C╱ // 0x2cd7 @0x4
0x2cd3…2cdf at0005 = ╱33╱3╱ // 0x2cd8 @0x5
0x2cd3…2cdf at0006 = ╱ef╱$╱ // 0x2cd9 @0x6
0x2cd3…2cdf at0007 = ╱dc╱=╱ // 0x2cda @0x7
0x2cd3…2cdf at0008 = ╱46╱F╱ // 0x2cdb @0x8
0x2cd3…2cdf at0009 = ╱31╱1╱ // 0x2cdc @0x9
0x2cd3…2cdf at000a = ╱ef╱$╱ // 0x2cdd @0xa
0x2cd3…2cdf at000b = EOL // 0x2cde @0xb
0x2cd3…2cdf }
0x2cdf…2ce5 ba3c 6120 ENDIF
0x2cdf…2ce5 LineComalBin {
0x2cdf…2ce5 ptr = 0xba3c // 0x2cdf @0x0
0x2cdf…2ce5 lno = 0x17e8 // 0x2ce1 @0x2
0x2cdf…2ce5 at0004 = ╱9b╱ ENDIF ╱ // 0x2ce3 @0x4
0x2cdf…2ce5 at0005 = EOL // 0x2ce4 @0x5
0x2cdf…2ce5 }
0x2ce5…2cf3 ba4a 6130 WHEN "2","3"
0x2ce5…2cf3 LineComalBin {
0x2ce5…2cf3 ptr = 0xba4a // 0x2ce5 @0x0
0x2ce5…2cf3 lno = 0x17f2 // 0x2ce7 @0x2
0x2ce5…2cf3 at0004 = ╱a300╱ WHEN ╱ // 0x2ce9 @0x4
0x2ce5…2cf3 at0006 = ╱22╱"╱ // 0x2ceb @0x6
0x2ce5…2cf3 at0007 = ╱32╱2╱ // 0x2cec @0x7
0x2ce5…2cf3 at0008 = ╱22╱"╱ // 0x2ced @0x8
0x2ce5…2cf3 at0009 = ╱ec╱,╱ // 0x2cee @0x9
0x2ce5…2cf3 at000a = ╱22╱"╱ // 0x2cef @0xa
0x2ce5…2cf3 at000b = ╱33╱3╱ // 0x2cf0 @0xb
0x2ce5…2cf3 at000c = ╱22╱"╱ // 0x2cf1 @0xc
0x2ce5…2cf3 at000d = EOL // 0x2cf2 @0xd
0x2ce5…2cf3 }
0x2cf3…2d00 ba57 6140 F1$="7+"
0x2cf3…2d00 LineComalBin {
0x2cf3…2d00 ptr = 0xba57 // 0x2cf3 @0x0
0x2cf3…2d00 lno = 0x17fc // 0x2cf5 @0x2
0x2cf3…2d00 at0004 = ╱46╱F╱ // 0x2cf7 @0x4
0x2cf3…2d00 at0005 = ╱31╱1╱ // 0x2cf8 @0x5
0x2cf3…2d00 at0006 = ╱ef╱$╱ // 0x2cf9 @0x6
0x2cf3…2d00 at0007 = ╱dc╱=╱ // 0x2cfa @0x7
0x2cf3…2d00 at0008 = ╱22╱"╱ // 0x2cfb @0x8
0x2cf3…2d00 at0009 = ╱37╱7╱ // 0x2cfc @0x9
0x2cf3…2d00 at000a = ╱2b╱+╱ // 0x2cfd @0xa
0x2cf3…2d00 at000b = ╱22╱"╱ // 0x2cfe @0xb
0x2cf3…2d00 at000c = EOL // 0x2cff @0xc
0x2cf3…2d00 }
0x2d00…2d1b ba72 6150 EXEC C(4,F1$,C4$,C3$)
0x2d00…2d1b LineComalBin {
0x2d00…2d1b ptr = 0xba72 // 0x2d00 @0x0
0x2d00…2d1b lno = 0x1806 // 0x2d02 @0x2
0x2d00…2d1b at0004 = ╱9d╱ EXEC ╱ // 0x2d04 @0x4
0x2d00…2d1b at0005 = ╱43╱C╱ // 0x2d05 @0x5
0x2d00…2d1b at0006 = ╱ed╱(╱ // 0x2d06 @0x6
0x2d00…2d1b at0007 = ╱34╱4╱ // 0x2d07 @0x7
0x2d00…2d1b at0008 = ╱fe00008003╱ // 0x2d08 @0x8
0x2d00…2d1b at000d = ╱ec╱,╱ // 0x2d0d @0xd
0x2d00…2d1b at000e = ╱46╱F╱ // 0x2d0e @0xe
0x2d00…2d1b at000f = ╱31╱1╱ // 0x2d0f @0xf
0x2d00…2d1b at0010 = ╱ef╱$╱ // 0x2d10 @0x10
0x2d00…2d1b at0011 = ╱ec╱,╱ // 0x2d11 @0x11
0x2d00…2d1b at0012 = ╱43╱C╱ // 0x2d12 @0x12
0x2d00…2d1b at0013 = ╱34╱4╱ // 0x2d13 @0x13
0x2d00…2d1b at0014 = ╱ef╱$╱ // 0x2d14 @0x14
0x2d00…2d1b at0015 = ╱ec╱,╱ // 0x2d15 @0x15
0x2d00…2d1b at0016 = ╱43╱C╱ // 0x2d16 @0x16
0x2d00…2d1b at0017 = ╱33╱3╱ // 0x2d17 @0x17
0x2d00…2d1b at0018 = ╱ef╱$╱ // 0x2d18 @0x18
0x2d00…2d1b at0019 = ╱ee╱)╱ // 0x2d19 @0x19
0x2d00…2d1b at001a = EOL // 0x2d1a @0x1a
0x2d00…2d1b }
0x2d1b…2d26 ba7d 6160 IF SI=B THEN
0x2d1b…2d26 LineComalBin {
0x2d1b…2d26 ptr = 0xba7d // 0x2d1b @0x0
0x2d1b…2d26 lno = 0x1810 // 0x2d1d @0x2
0x2d1b…2d26 at0004 = ╱9c╱ IF ╱ // 0x2d1f @0x4
0x2d1b…2d26 at0005 = ╱53╱S╱ // 0x2d20 @0x5
0x2d1b…2d26 at0006 = ╱49╱I╱ // 0x2d21 @0x6
0x2d1b…2d26 at0007 = ╱dc╱=╱ // 0x2d22 @0x7
0x2d1b…2d26 at0008 = ╱42╱B╱ // 0x2d23 @0x8
0x2d1b…2d26 at0009 = ╱b6╱ THEN ╱ // 0x2d24 @0x9
0x2d1b…2d26 at000a = EOL // 0x2d25 @0xa
0x2d1b…2d26 }
0x2d26…2d43 ba9a 6170 K8=INT(G9*12/52)
0x2d26…2d43 LineComalBin {
0x2d26…2d43 ptr = 0xba9a // 0x2d26 @0x0
0x2d26…2d43 lno = 0x181a // 0x2d28 @0x2
0x2d26…2d43 at0004 = ╱4b╱K╱ // 0x2d2a @0x4
0x2d26…2d43 at0005 = ╱38╱8╱ // 0x2d2b @0x5
0x2d26…2d43 at0006 = ╱dc╱=╱ // 0x2d2c @0x6
0x2d26…2d43 at0007 = ╱c6╱INT╱ // 0x2d2d @0x7
0x2d26…2d43 at0008 = ╱ed╱(╱ // 0x2d2e @0x8
0x2d26…2d43 at0009 = ╱47╱G╱ // 0x2d2f @0x9
0x2d26…2d43 at000a = ╱39╱9╱ // 0x2d30 @0xa
0x2d26…2d43 at000b = ╱e4╱*╱ // 0x2d31 @0xb
0x2d26…2d43 at000c = ╱31╱1╱ // 0x2d32 @0xc
0x2d26…2d43 at000d = ╱32╱2╱ // 0x2d33 @0xd
0x2d26…2d43 at000e = ╱fe0000c004╱ // 0x2d34 @0xe
0x2d26…2d43 at0013 = ╱e5╱/╱ // 0x2d39 @0x13
0x2d26…2d43 at0014 = ╱35╱5╱ // 0x2d3a @0x14
0x2d26…2d43 at0015 = ╱32╱2╱ // 0x2d3b @0x15
0x2d26…2d43 at0016 = ╱fe0000d006╱ // 0x2d3c @0x16
0x2d26…2d43 at001b = ╱ee╱)╱ // 0x2d41 @0x1b
0x2d26…2d43 at001c = EOL // 0x2d42 @0x1c
0x2d26…2d43 }
0x2d43…2d52 baa9 6180 EXEC Æ(C3$,K8)
0x2d43…2d52 LineComalBin {
0x2d43…2d52 ptr = 0xbaa9 // 0x2d43 @0x0
0x2d43…2d52 lno = 0x1824 // 0x2d45 @0x2
0x2d43…2d52 at0004 = ╱9d╱ EXEC ╱ // 0x2d47 @0x4
0x2d43…2d52 at0005 = ╱5b╱Æ╱ // 0x2d48 @0x5
0x2d43…2d52 at0006 = ╱ed╱(╱ // 0x2d49 @0x6
0x2d43…2d52 at0007 = ╱43╱C╱ // 0x2d4a @0x7
0x2d43…2d52 at0008 = ╱33╱3╱ // 0x2d4b @0x8
0x2d43…2d52 at0009 = ╱ef╱$╱ // 0x2d4c @0x9
0x2d43…2d52 at000a = ╱ec╱,╱ // 0x2d4d @0xa
0x2d43…2d52 at000b = ╱4b╱K╱ // 0x2d4e @0xb
0x2d43…2d52 at000c = ╱38╱8╱ // 0x2d4f @0xc
0x2d43…2d52 at000d = ╱ee╱)╱ // 0x2d50 @0xd
0x2d43…2d52 at000e = EOL // 0x2d51 @0xe
0x2d43…2d52 }
0x2d52…2d58 baaf 6190 ELSE
0x2d52…2d58 LineComalBin {
0x2d52…2d58 ptr = 0xbaaf // 0x2d52 @0x0
0x2d52…2d58 lno = 0x182e // 0x2d54 @0x2
0x2d52…2d58 at0004 = ╱9a╱ ELSE ╱ // 0x2d56 @0x4
0x2d52…2d58 at0005 = EOL // 0x2d57 @0x5
0x2d52…2d58 }
0x2d58…2d73 baca 6220 EXEC C(2,C3$,C4$,C3$)
0x2d58…2d73 LineComalBin {
0x2d58…2d73 ptr = 0xbaca // 0x2d58 @0x0
0x2d58…2d73 lno = 0x184c // 0x2d5a @0x2
0x2d58…2d73 at0004 = ╱9d╱ EXEC ╱ // 0x2d5c @0x4
0x2d58…2d73 at0005 = ╱43╱C╱ // 0x2d5d @0x5
0x2d58…2d73 at0006 = ╱ed╱(╱ // 0x2d5e @0x6
0x2d58…2d73 at0007 = ╱32╱2╱ // 0x2d5f @0x7
0x2d58…2d73 at0008 = ╱fe00008002╱ // 0x2d60 @0x8
0x2d58…2d73 at000d = ╱ec╱,╱ // 0x2d65 @0xd
0x2d58…2d73 at000e = ╱43╱C╱ // 0x2d66 @0xe
0x2d58…2d73 at000f = ╱33╱3╱ // 0x2d67 @0xf
0x2d58…2d73 at0010 = ╱ef╱$╱ // 0x2d68 @0x10
0x2d58…2d73 at0011 = ╱ec╱,╱ // 0x2d69 @0x11
0x2d58…2d73 at0012 = ╱43╱C╱ // 0x2d6a @0x12
0x2d58…2d73 at0013 = ╱34╱4╱ // 0x2d6b @0x13
0x2d58…2d73 at0014 = ╱ef╱$╱ // 0x2d6c @0x14
0x2d58…2d73 at0015 = ╱ec╱,╱ // 0x2d6d @0x15
0x2d58…2d73 at0016 = ╱43╱C╱ // 0x2d6e @0x16
0x2d58…2d73 at0017 = ╱33╱3╱ // 0x2d6f @0x17
0x2d58…2d73 at0018 = ╱ef╱$╱ // 0x2d70 @0x18
0x2d58…2d73 at0019 = ╱ee╱)╱ // 0x2d71 @0x19
0x2d58…2d73 at001a = EOL // 0x2d72 @0x1a
0x2d58…2d73 }
0x2d73…2d79 bad0 6230 ENDIF
0x2d73…2d79 LineComalBin {
0x2d73…2d79 ptr = 0xbad0 // 0x2d73 @0x0
0x2d73…2d79 lno = 0x1856 // 0x2d75 @0x2
0x2d73…2d79 at0004 = ╱9b╱ ENDIF ╱ // 0x2d77 @0x4
0x2d73…2d79 at0005 = EOL // 0x2d78 @0x5
0x2d73…2d79 }
0x2d79…2d87 bade 6240 WHEN "4","5"
0x2d79…2d87 LineComalBin {
0x2d79…2d87 ptr = 0xbade // 0x2d79 @0x0
0x2d79…2d87 lno = 0x1860 // 0x2d7b @0x2
0x2d79…2d87 at0004 = ╱a300╱ WHEN ╱ // 0x2d7d @0x4
0x2d79…2d87 at0006 = ╱22╱"╱ // 0x2d7f @0x6
0x2d79…2d87 at0007 = ╱34╱4╱ // 0x2d80 @0x7
0x2d79…2d87 at0008 = ╱22╱"╱ // 0x2d81 @0x8
0x2d79…2d87 at0009 = ╱ec╱,╱ // 0x2d82 @0x9
0x2d79…2d87 at000a = ╱22╱"╱ // 0x2d83 @0xa
0x2d79…2d87 at000b = ╱35╱5╱ // 0x2d84 @0xb
0x2d79…2d87 at000c = ╱22╱"╱ // 0x2d85 @0xc
0x2d79…2d87 at000d = EOL // 0x2d86 @0xd
0x2d79…2d87 }
0x2d87…2d95 baec 6250 F1$="14+"
0x2d87…2d95 LineComalBin {
0x2d87…2d95 ptr = 0xbaec // 0x2d87 @0x0
0x2d87…2d95 lno = 0x186a // 0x2d89 @0x2
0x2d87…2d95 at0004 = ╱46╱F╱ // 0x2d8b @0x4
0x2d87…2d95 at0005 = ╱31╱1╱ // 0x2d8c @0x5
0x2d87…2d95 at0006 = ╱ef╱$╱ // 0x2d8d @0x6
0x2d87…2d95 at0007 = ╱dc╱=╱ // 0x2d8e @0x7
0x2d87…2d95 at0008 = ╱22╱"╱ // 0x2d8f @0x8
0x2d87…2d95 at0009 = ╱31╱1╱ // 0x2d90 @0x9
0x2d87…2d95 at000a = ╱34╱4╱ // 0x2d91 @0xa
0x2d87…2d95 at000b = ╱2b╱+╱ // 0x2d92 @0xb
0x2d87…2d95 at000c = ╱22╱"╱ // 0x2d93 @0xc
0x2d87…2d95 at000d = EOL // 0x2d94 @0xd
0x2d87…2d95 }
0x2d95…2db0 bb07 6260 EXEC C(4,F1$,C4$,C3$)
0x2d95…2db0 LineComalBin {
0x2d95…2db0 ptr = 0xbb07 // 0x2d95 @0x0
0x2d95…2db0 lno = 0x1874 // 0x2d97 @0x2
0x2d95…2db0 at0004 = ╱9d╱ EXEC ╱ // 0x2d99 @0x4
0x2d95…2db0 at0005 = ╱43╱C╱ // 0x2d9a @0x5
0x2d95…2db0 at0006 = ╱ed╱(╱ // 0x2d9b @0x6
0x2d95…2db0 at0007 = ╱34╱4╱ // 0x2d9c @0x7
0x2d95…2db0 at0008 = ╱fe00008003╱ // 0x2d9d @0x8
0x2d95…2db0 at000d = ╱ec╱,╱ // 0x2da2 @0xd
0x2d95…2db0 at000e = ╱46╱F╱ // 0x2da3 @0xe
0x2d95…2db0 at000f = ╱31╱1╱ // 0x2da4 @0xf
0x2d95…2db0 at0010 = ╱ef╱$╱ // 0x2da5 @0x10
0x2d95…2db0 at0011 = ╱ec╱,╱ // 0x2da6 @0x11
0x2d95…2db0 at0012 = ╱43╱C╱ // 0x2da7 @0x12
0x2d95…2db0 at0013 = ╱34╱4╱ // 0x2da8 @0x13
0x2d95…2db0 at0014 = ╱ef╱$╱ // 0x2da9 @0x14
0x2d95…2db0 at0015 = ╱ec╱,╱ // 0x2daa @0x15
0x2d95…2db0 at0016 = ╱43╱C╱ // 0x2dab @0x16
0x2d95…2db0 at0017 = ╱33╱3╱ // 0x2dac @0x17
0x2d95…2db0 at0018 = ╱ef╱$╱ // 0x2dad @0x18
0x2d95…2db0 at0019 = ╱ee╱)╱ // 0x2dae @0x19
0x2d95…2db0 at001a = EOL // 0x2daf @0x1a
0x2d95…2db0 }
0x2db0…2dbb bb12 6270 IF SI=B THEN
0x2db0…2dbb LineComalBin {
0x2db0…2dbb ptr = 0xbb12 // 0x2db0 @0x0
0x2db0…2dbb lno = 0x187e // 0x2db2 @0x2
0x2db0…2dbb at0004 = ╱9c╱ IF ╱ // 0x2db4 @0x4
0x2db0…2dbb at0005 = ╱53╱S╱ // 0x2db5 @0x5
0x2db0…2dbb at0006 = ╱49╱I╱ // 0x2db6 @0x6
0x2db0…2dbb at0007 = ╱dc╱=╱ // 0x2db7 @0x7
0x2db0…2dbb at0008 = ╱42╱B╱ // 0x2db8 @0x8
0x2db0…2dbb at0009 = ╱b6╱ THEN ╱ // 0x2db9 @0x9
0x2db0…2dbb at000a = EOL // 0x2dba @0xa
0x2db0…2dbb }
0x2dbb…2dd8 bb2f 6280 K8=INT(G9*12/26)
0x2dbb…2dd8 LineComalBin {
0x2dbb…2dd8 ptr = 0xbb2f // 0x2dbb @0x0
0x2dbb…2dd8 lno = 0x1888 // 0x2dbd @0x2
0x2dbb…2dd8 at0004 = ╱4b╱K╱ // 0x2dbf @0x4
0x2dbb…2dd8 at0005 = ╱38╱8╱ // 0x2dc0 @0x5
0x2dbb…2dd8 at0006 = ╱dc╱=╱ // 0x2dc1 @0x6
0x2dbb…2dd8 at0007 = ╱c6╱INT╱ // 0x2dc2 @0x7
0x2dbb…2dd8 at0008 = ╱ed╱(╱ // 0x2dc3 @0x8
0x2dbb…2dd8 at0009 = ╱47╱G╱ // 0x2dc4 @0x9
0x2dbb…2dd8 at000a = ╱39╱9╱ // 0x2dc5 @0xa
0x2dbb…2dd8 at000b = ╱e4╱*╱ // 0x2dc6 @0xb
0x2dbb…2dd8 at000c = ╱31╱1╱ // 0x2dc7 @0xc
0x2dbb…2dd8 at000d = ╱32╱2╱ // 0x2dc8 @0xd
0x2dbb…2dd8 at000e = ╱fe0000c004╱ // 0x2dc9 @0xe
0x2dbb…2dd8 at0013 = ╱e5╱/╱ // 0x2dce @0x13
0x2dbb…2dd8 at0014 = ╱32╱2╱ // 0x2dcf @0x14
0x2dbb…2dd8 at0015 = ╱36╱6╱ // 0x2dd0 @0x15
0x2dbb…2dd8 at0016 = ╱fe0000d005╱ // 0x2dd1 @0x16
0x2dbb…2dd8 at001b = ╱ee╱)╱ // 0x2dd6 @0x1b
0x2dbb…2dd8 at001c = EOL // 0x2dd7 @0x1c
0x2dbb…2dd8 }
0x2dd8…2de7 bb3e 6290 EXEC Æ(C3$,K8)
0x2dd8…2de7 LineComalBin {
0x2dd8…2de7 ptr = 0xbb3e // 0x2dd8 @0x0
0x2dd8…2de7 lno = 0x1892 // 0x2dda @0x2
0x2dd8…2de7 at0004 = ╱9d╱ EXEC ╱ // 0x2ddc @0x4
0x2dd8…2de7 at0005 = ╱5b╱Æ╱ // 0x2ddd @0x5
0x2dd8…2de7 at0006 = ╱ed╱(╱ // 0x2dde @0x6
0x2dd8…2de7 at0007 = ╱43╱C╱ // 0x2ddf @0x7
0x2dd8…2de7 at0008 = ╱33╱3╱ // 0x2de0 @0x8
0x2dd8…2de7 at0009 = ╱ef╱$╱ // 0x2de1 @0x9
0x2dd8…2de7 at000a = ╱ec╱,╱ // 0x2de2 @0xa
0x2dd8…2de7 at000b = ╱4b╱K╱ // 0x2de3 @0xb
0x2dd8…2de7 at000c = ╱38╱8╱ // 0x2de4 @0xc
0x2dd8…2de7 at000d = ╱ee╱)╱ // 0x2de5 @0xd
0x2dd8…2de7 at000e = EOL // 0x2de6 @0xe
0x2dd8…2de7 }
0x2de7…2ded bb44 6300 ELSE
0x2de7…2ded LineComalBin {
0x2de7…2ded ptr = 0xbb44 // 0x2de7 @0x0
0x2de7…2ded lno = 0x189c // 0x2de9 @0x2
0x2de7…2ded at0004 = ╱9a╱ ELSE ╱ // 0x2deb @0x4
0x2de7…2ded at0005 = EOL // 0x2dec @0x5
0x2de7…2ded }
0x2ded…2e08 bb5f 6330 EXEC C(2,C3$,C4$,C3$)
0x2ded…2e08 LineComalBin {
0x2ded…2e08 ptr = 0xbb5f // 0x2ded @0x0
0x2ded…2e08 lno = 0x18ba // 0x2def @0x2
0x2ded…2e08 at0004 = ╱9d╱ EXEC ╱ // 0x2df1 @0x4
0x2ded…2e08 at0005 = ╱43╱C╱ // 0x2df2 @0x5
0x2ded…2e08 at0006 = ╱ed╱(╱ // 0x2df3 @0x6
0x2ded…2e08 at0007 = ╱32╱2╱ // 0x2df4 @0x7
0x2ded…2e08 at0008 = ╱fe00008002╱ // 0x2df5 @0x8
0x2ded…2e08 at000d = ╱ec╱,╱ // 0x2dfa @0xd
0x2ded…2e08 at000e = ╱43╱C╱ // 0x2dfb @0xe
0x2ded…2e08 at000f = ╱33╱3╱ // 0x2dfc @0xf
0x2ded…2e08 at0010 = ╱ef╱$╱ // 0x2dfd @0x10
0x2ded…2e08 at0011 = ╱ec╱,╱ // 0x2dfe @0x11
0x2ded…2e08 at0012 = ╱43╱C╱ // 0x2dff @0x12
0x2ded…2e08 at0013 = ╱34╱4╱ // 0x2e00 @0x13
0x2ded…2e08 at0014 = ╱ef╱$╱ // 0x2e01 @0x14
0x2ded…2e08 at0015 = ╱ec╱,╱ // 0x2e02 @0x15
0x2ded…2e08 at0016 = ╱43╱C╱ // 0x2e03 @0x16
0x2ded…2e08 at0017 = ╱33╱3╱ // 0x2e04 @0x17
0x2ded…2e08 at0018 = ╱ef╱$╱ // 0x2e05 @0x18
0x2ded…2e08 at0019 = ╱ee╱)╱ // 0x2e06 @0x19
0x2ded…2e08 at001a = EOL // 0x2e07 @0x1a
0x2ded…2e08 }
0x2e08…2e0e bb65 6340 ENDIF
0x2e08…2e0e LineComalBin {
0x2e08…2e0e ptr = 0xbb65 // 0x2e08 @0x0
0x2e08…2e0e lno = 0x18c4 // 0x2e0a @0x2
0x2e08…2e0e at0004 = ╱9b╱ ENDIF ╱ // 0x2e0c @0x4
0x2e08…2e0e at0005 = EOL // 0x2e0d @0x5
0x2e08…2e0e }
0x2e0e…2e1c bb73 6350 WHEN "6","7"
0x2e0e…2e1c LineComalBin {
0x2e0e…2e1c ptr = 0xbb73 // 0x2e0e @0x0
0x2e0e…2e1c lno = 0x18ce // 0x2e10 @0x2
0x2e0e…2e1c at0004 = ╱a300╱ WHEN ╱ // 0x2e12 @0x4
0x2e0e…2e1c at0006 = ╱22╱"╱ // 0x2e14 @0x6
0x2e0e…2e1c at0007 = ╱36╱6╱ // 0x2e15 @0x7
0x2e0e…2e1c at0008 = ╱22╱"╱ // 0x2e16 @0x8
0x2e0e…2e1c at0009 = ╱ec╱,╱ // 0x2e17 @0x9
0x2e0e…2e1c at000a = ╱22╱"╱ // 0x2e18 @0xa
0x2e0e…2e1c at000b = ╱37╱7╱ // 0x2e19 @0xb
0x2e0e…2e1c at000c = ╱22╱"╱ // 0x2e1a @0xc
0x2e0e…2e1c at000d = EOL // 0x2e1b @0xd
0x2e0e…2e1c }
0x2e1c…2e2a bb81 6360 F1$="30+"
0x2e1c…2e2a LineComalBin {
0x2e1c…2e2a ptr = 0xbb81 // 0x2e1c @0x0
0x2e1c…2e2a lno = 0x18d8 // 0x2e1e @0x2
0x2e1c…2e2a at0004 = ╱46╱F╱ // 0x2e20 @0x4
0x2e1c…2e2a at0005 = ╱31╱1╱ // 0x2e21 @0x5
0x2e1c…2e2a at0006 = ╱ef╱$╱ // 0x2e22 @0x6
0x2e1c…2e2a at0007 = ╱dc╱=╱ // 0x2e23 @0x7
0x2e1c…2e2a at0008 = ╱22╱"╱ // 0x2e24 @0x8
0x2e1c…2e2a at0009 = ╱33╱3╱ // 0x2e25 @0x9
0x2e1c…2e2a at000a = ╱30╱0╱ // 0x2e26 @0xa
0x2e1c…2e2a at000b = ╱2b╱+╱ // 0x2e27 @0xb
0x2e1c…2e2a at000c = ╱22╱"╱ // 0x2e28 @0xc
0x2e1c…2e2a at000d = EOL // 0x2e29 @0xd
0x2e1c…2e2a }
0x2e2a…2e45 bb9c 6370 EXEC C(4,F1$,C4$,C3$)
0x2e2a…2e45 LineComalBin {
0x2e2a…2e45 ptr = 0xbb9c // 0x2e2a @0x0
0x2e2a…2e45 lno = 0x18e2 // 0x2e2c @0x2
0x2e2a…2e45 at0004 = ╱9d╱ EXEC ╱ // 0x2e2e @0x4
0x2e2a…2e45 at0005 = ╱43╱C╱ // 0x2e2f @0x5
0x2e2a…2e45 at0006 = ╱ed╱(╱ // 0x2e30 @0x6
0x2e2a…2e45 at0007 = ╱34╱4╱ // 0x2e31 @0x7
0x2e2a…2e45 at0008 = ╱fe00008003╱ // 0x2e32 @0x8
0x2e2a…2e45 at000d = ╱ec╱,╱ // 0x2e37 @0xd
0x2e2a…2e45 at000e = ╱46╱F╱ // 0x2e38 @0xe
0x2e2a…2e45 at000f = ╱31╱1╱ // 0x2e39 @0xf
0x2e2a…2e45 at0010 = ╱ef╱$╱ // 0x2e3a @0x10
0x2e2a…2e45 at0011 = ╱ec╱,╱ // 0x2e3b @0x11
0x2e2a…2e45 at0012 = ╱43╱C╱ // 0x2e3c @0x12
0x2e2a…2e45 at0013 = ╱34╱4╱ // 0x2e3d @0x13
0x2e2a…2e45 at0014 = ╱ef╱$╱ // 0x2e3e @0x14
0x2e2a…2e45 at0015 = ╱ec╱,╱ // 0x2e3f @0x15
0x2e2a…2e45 at0016 = ╱43╱C╱ // 0x2e40 @0x16
0x2e2a…2e45 at0017 = ╱33╱3╱ // 0x2e41 @0x17
0x2e2a…2e45 at0018 = ╱ef╱$╱ // 0x2e42 @0x18
0x2e2a…2e45 at0019 = ╱ee╱)╱ // 0x2e43 @0x19
0x2e2a…2e45 at001a = EOL // 0x2e44 @0x1a
0x2e2a…2e45 }
0x2e45…2e50 bba7 6380 IF SI=B THEN
0x2e45…2e50 LineComalBin {
0x2e45…2e50 ptr = 0xbba7 // 0x2e45 @0x0
0x2e45…2e50 lno = 0x18ec // 0x2e47 @0x2
0x2e45…2e50 at0004 = ╱9c╱ IF ╱ // 0x2e49 @0x4
0x2e45…2e50 at0005 = ╱53╱S╱ // 0x2e4a @0x5
0x2e45…2e50 at0006 = ╱49╱I╱ // 0x2e4b @0x6
0x2e45…2e50 at0007 = ╱dc╱=╱ // 0x2e4c @0x7
0x2e45…2e50 at0008 = ╱42╱B╱ // 0x2e4d @0x8
0x2e45…2e50 at0009 = ╱b6╱ THEN ╱ // 0x2e4e @0x9
0x2e45…2e50 at000a = EOL // 0x2e4f @0xa
0x2e45…2e50 }
0x2e50…2e5f bbb6 6390 EXEC Æ(C3$,G9)
0x2e50…2e5f LineComalBin {
0x2e50…2e5f ptr = 0xbbb6 // 0x2e50 @0x0
0x2e50…2e5f lno = 0x18f6 // 0x2e52 @0x2
0x2e50…2e5f at0004 = ╱9d╱ EXEC ╱ // 0x2e54 @0x4
0x2e50…2e5f at0005 = ╱5b╱Æ╱ // 0x2e55 @0x5
0x2e50…2e5f at0006 = ╱ed╱(╱ // 0x2e56 @0x6
0x2e50…2e5f at0007 = ╱43╱C╱ // 0x2e57 @0x7
0x2e50…2e5f at0008 = ╱33╱3╱ // 0x2e58 @0x8
0x2e50…2e5f at0009 = ╱ef╱$╱ // 0x2e59 @0x9
0x2e50…2e5f at000a = ╱ec╱,╱ // 0x2e5a @0xa
0x2e50…2e5f at000b = ╱47╱G╱ // 0x2e5b @0xb
0x2e50…2e5f at000c = ╱39╱9╱ // 0x2e5c @0xc
0x2e50…2e5f at000d = ╱ee╱)╱ // 0x2e5d @0xd
0x2e50…2e5f at000e = EOL // 0x2e5e @0xe
0x2e50…2e5f }
0x2e5f…2e65 bbbc 6400 ELSE
0x2e5f…2e65 LineComalBin {
0x2e5f…2e65 ptr = 0xbbbc // 0x2e5f @0x0
0x2e5f…2e65 lno = 0x1900 // 0x2e61 @0x2
0x2e5f…2e65 at0004 = ╱9a╱ ELSE ╱ // 0x2e63 @0x4
0x2e5f…2e65 at0005 = EOL // 0x2e64 @0x5
0x2e5f…2e65 }
0x2e65…2e80 bbd7 6430 EXEC C(2,C3$,C4$,C3$)
0x2e65…2e80 LineComalBin {
0x2e65…2e80 ptr = 0xbbd7 // 0x2e65 @0x0
0x2e65…2e80 lno = 0x191e // 0x2e67 @0x2
0x2e65…2e80 at0004 = ╱9d╱ EXEC ╱ // 0x2e69 @0x4
0x2e65…2e80 at0005 = ╱43╱C╱ // 0x2e6a @0x5
0x2e65…2e80 at0006 = ╱ed╱(╱ // 0x2e6b @0x6
0x2e65…2e80 at0007 = ╱32╱2╱ // 0x2e6c @0x7
0x2e65…2e80 at0008 = ╱fe00008002╱ // 0x2e6d @0x8
0x2e65…2e80 at000d = ╱ec╱,╱ // 0x2e72 @0xd
0x2e65…2e80 at000e = ╱43╱C╱ // 0x2e73 @0xe
0x2e65…2e80 at000f = ╱33╱3╱ // 0x2e74 @0xf
0x2e65…2e80 at0010 = ╱ef╱$╱ // 0x2e75 @0x10
0x2e65…2e80 at0011 = ╱ec╱,╱ // 0x2e76 @0x11
0x2e65…2e80 at0012 = ╱43╱C╱ // 0x2e77 @0x12
0x2e65…2e80 at0013 = ╱34╱4╱ // 0x2e78 @0x13
0x2e65…2e80 at0014 = ╱ef╱$╱ // 0x2e79 @0x14
0x2e65…2e80 at0015 = ╱ec╱,╱ // 0x2e7a @0x15
0x2e65…2e80 at0016 = ╱43╱C╱ // 0x2e7b @0x16
0x2e65…2e80 at0017 = ╱33╱3╱ // 0x2e7c @0x17
0x2e65…2e80 at0018 = ╱ef╱$╱ // 0x2e7d @0x18
0x2e65…2e80 at0019 = ╱ee╱)╱ // 0x2e7e @0x19
0x2e65…2e80 at001a = EOL // 0x2e7f @0x1a
0x2e65…2e80 }
0x2e80…2e86 bbdd 6440 ENDIF
0x2e80…2e86 LineComalBin {
0x2e80…2e86 ptr = 0xbbdd // 0x2e80 @0x0
0x2e80…2e86 lno = 0x1928 // 0x2e82 @0x2
0x2e80…2e86 at0004 = ╱9b╱ ENDIF ╱ // 0x2e84 @0x4
0x2e80…2e86 at0005 = EOL // 0x2e85 @0x5
0x2e80…2e86 }
0x2e86…2e8c bbe3 6450 ENDCASE
0x2e86…2e8c LineComalBin {
0x2e86…2e8c ptr = 0xbbe3 // 0x2e86 @0x0
0x2e86…2e8c lno = 0x1932 // 0x2e88 @0x2
0x2e86…2e8c at0004 = ╱a4╱ ENDCASE ╱ // 0x2e8a @0x4
0x2e86…2e8c at0005 = EOL // 0x2e8b @0x5
0x2e86…2e8c }
0x2e8c…2e92 bbe9 6470 ENDIF
0x2e8c…2e92 LineComalBin {
0x2e8c…2e92 ptr = 0xbbe9 // 0x2e8c @0x0
0x2e8c…2e92 lno = 0x1946 // 0x2e8e @0x2
0x2e8c…2e92 at0004 = ╱9b╱ ENDIF ╱ // 0x2e90 @0x4
0x2e8c…2e92 at0005 = EOL // 0x2e91 @0x5
0x2e8c…2e92 }
0x2e92…2e9c bbf3 6475 H6=L2
0x2e92…2e9c LineComalBin {
0x2e92…2e9c ptr = 0xbbf3 // 0x2e92 @0x0
0x2e92…2e9c lno = 0x194b // 0x2e94 @0x2
0x2e92…2e9c at0004 = ╱48╱H╱ // 0x2e96 @0x4
0x2e92…2e9c at0005 = ╱36╱6╱ // 0x2e97 @0x5
0x2e92…2e9c at0006 = ╱dc╱=╱ // 0x2e98 @0x6
0x2e92…2e9c at0007 = ╱4c╱L╱ // 0x2e99 @0x7
0x2e92…2e9c at0008 = ╱32╱2╱ // 0x2e9a @0x8
0x2e92…2e9c at0009 = EOL // 0x2e9b @0x9
0x2e92…2e9c }
0x2e9c…2ea2 bbf9 6480 ENDIF
0x2e9c…2ea2 LineComalBin {
0x2e9c…2ea2 ptr = 0xbbf9 // 0x2e9c @0x0
0x2e9c…2ea2 lno = 0x1950 // 0x2e9e @0x2
0x2e9c…2ea2 at0004 = ╱9b╱ ENDIF ╱ // 0x2ea0 @0x4
0x2e9c…2ea2 at0005 = EOL // 0x2ea1 @0x5
0x2e9c…2ea2 }
0x2ea2…2ec0 bc17 6485 B8$(L1-E,EL:TI)=C3$(V:TI)
0x2ea2…2ec0 LineComalBin {
0x2ea2…2ec0 ptr = 0xbc17 // 0x2ea2 @0x0
0x2ea2…2ec0 lno = 0x1955 // 0x2ea4 @0x2
0x2ea2…2ec0 at0004 = ╱42╱B╱ // 0x2ea6 @0x4
0x2ea2…2ec0 at0005 = ╱38╱8╱ // 0x2ea7 @0x5
0x2ea2…2ec0 at0006 = ╱ef╱$╱ // 0x2ea8 @0x6
0x2ea2…2ec0 at0007 = ╱ed╱(╱ // 0x2ea9 @0x7
0x2ea2…2ec0 at0008 = ╱4c╱L╱ // 0x2eaa @0x8
0x2ea2…2ec0 at0009 = ╱31╱1╱ // 0x2eab @0x9
0x2ea2…2ec0 at000a = ╱e3╱-╱ // 0x2eac @0xa
0x2ea2…2ec0 at000b = ╱45╱E╱ // 0x2ead @0xb
0x2ea2…2ec0 at000c = ╱ec╱,╱ // 0x2eae @0xc
0x2ea2…2ec0 at000d = ╱45╱E╱ // 0x2eaf @0xd
0x2ea2…2ec0 at000e = ╱4c╱L╱ // 0x2eb0 @0xe
0x2ea2…2ec0 at000f = ╱f0╱:╱ // 0x2eb1 @0xf
0x2ea2…2ec0 at0010 = ╱54╱T╱ // 0x2eb2 @0x10
0x2ea2…2ec0 at0011 = ╱49╱I╱ // 0x2eb3 @0x11
0x2ea2…2ec0 at0012 = ╱ee╱)╱ // 0x2eb4 @0x12
0x2ea2…2ec0 at0013 = ╱dc╱=╱ // 0x2eb5 @0x13
0x2ea2…2ec0 at0014 = ╱43╱C╱ // 0x2eb6 @0x14
0x2ea2…2ec0 at0015 = ╱33╱3╱ // 0x2eb7 @0x15
0x2ea2…2ec0 at0016 = ╱ef╱$╱ // 0x2eb8 @0x16
0x2ea2…2ec0 at0017 = ╱ed╱(╱ // 0x2eb9 @0x17
0x2ea2…2ec0 at0018 = ╱56╱V╱ // 0x2eba @0x18
0x2ea2…2ec0 at0019 = ╱f0╱:╱ // 0x2ebb @0x19
0x2ea2…2ec0 at001a = ╱54╱T╱ // 0x2ebc @0x1a
0x2ea2…2ec0 at001b = ╱49╱I╱ // 0x2ebd @0x1b
0x2ea2…2ec0 at001c = ╱ee╱)╱ // 0x2ebe @0x1c
0x2ea2…2ec0 at001d = EOL // 0x2ebf @0x1d
0x2ea2…2ec0 }
0x2ec0…2ecf bc26 6490 F1$=B9$(G)
0x2ec0…2ecf LineComalBin {
0x2ec0…2ecf ptr = 0xbc26 // 0x2ec0 @0x0
0x2ec0…2ecf lno = 0x195a // 0x2ec2 @0x2
0x2ec0…2ecf at0004 = ╱46╱F╱ // 0x2ec4 @0x4
0x2ec0…2ecf at0005 = ╱31╱1╱ // 0x2ec5 @0x5
0x2ec0…2ecf at0006 = ╱ef╱$╱ // 0x2ec6 @0x6
0x2ec0…2ecf at0007 = ╱dc╱=╱ // 0x2ec7 @0x7
0x2ec0…2ecf at0008 = ╱42╱B╱ // 0x2ec8 @0x8
0x2ec0…2ecf at0009 = ╱39╱9╱ // 0x2ec9 @0x9
0x2ec0…2ecf at000a = ╱ef╱$╱ // 0x2eca @0xa
0x2ec0…2ecf at000b = ╱ed╱(╱ // 0x2ecb @0xb
0x2ec0…2ecf at000c = ╱47╱G╱ // 0x2ecc @0xc
0x2ec0…2ecf at000d = ╱ee╱)╱ // 0x2ecd @0xd
0x2ec0…2ecf at000e = EOL // 0x2ece @0xe
0x2ec0…2ecf }
0x2ecf…2eea bc41 6500 EXEC C(4,F1$,C3$,C4$)
0x2ecf…2eea LineComalBin {
0x2ecf…2eea ptr = 0xbc41 // 0x2ecf @0x0
0x2ecf…2eea lno = 0x1964 // 0x2ed1 @0x2
0x2ecf…2eea at0004 = ╱9d╱ EXEC ╱ // 0x2ed3 @0x4
0x2ecf…2eea at0005 = ╱43╱C╱ // 0x2ed4 @0x5
0x2ecf…2eea at0006 = ╱ed╱(╱ // 0x2ed5 @0x6
0x2ecf…2eea at0007 = ╱34╱4╱ // 0x2ed6 @0x7
0x2ecf…2eea at0008 = ╱fe00008003╱ // 0x2ed7 @0x8
0x2ecf…2eea at000d = ╱ec╱,╱ // 0x2edc @0xd
0x2ecf…2eea at000e = ╱46╱F╱ // 0x2edd @0xe
0x2ecf…2eea at000f = ╱31╱1╱ // 0x2ede @0xf
0x2ecf…2eea at0010 = ╱ef╱$╱ // 0x2edf @0x10
0x2ecf…2eea at0011 = ╱ec╱,╱ // 0x2ee0 @0x11
0x2ecf…2eea at0012 = ╱43╱C╱ // 0x2ee1 @0x12
0x2ecf…2eea at0013 = ╱33╱3╱ // 0x2ee2 @0x13
0x2ecf…2eea at0014 = ╱ef╱$╱ // 0x2ee3 @0x14
0x2ecf…2eea at0015 = ╱ec╱,╱ // 0x2ee4 @0x15
0x2ecf…2eea at0016 = ╱43╱C╱ // 0x2ee5 @0x16
0x2ecf…2eea at0017 = ╱34╱4╱ // 0x2ee6 @0x17
0x2ecf…2eea at0018 = ╱ef╱$╱ // 0x2ee7 @0x18
0x2ecf…2eea at0019 = ╱ee╱)╱ // 0x2ee8 @0x19
0x2ecf…2eea at001a = EOL // 0x2ee9 @0x1a
0x2ecf…2eea }
0x2eea…2ef5 bc4c 6510 IF SI=G THEN
0x2eea…2ef5 LineComalBin {
0x2eea…2ef5 ptr = 0xbc4c // 0x2eea @0x0
0x2eea…2ef5 lno = 0x196e // 0x2eec @0x2
0x2eea…2ef5 at0004 = ╱9c╱ IF ╱ // 0x2eee @0x4
0x2eea…2ef5 at0005 = ╱53╱S╱ // 0x2eef @0x5
0x2eea…2ef5 at0006 = ╱49╱I╱ // 0x2ef0 @0x6
0x2eea…2ef5 at0007 = ╱dc╱=╱ // 0x2ef1 @0x7
0x2eea…2ef5 at0008 = ╱47╱G╱ // 0x2ef2 @0x8
0x2eea…2ef5 at0009 = ╱b6╱ THEN ╱ // 0x2ef3 @0x9
0x2eea…2ef5 at000a = EOL // 0x2ef4 @0xa
0x2eea…2ef5 }
0x2ef5…2efe bc55 6515 H0=B
0x2ef5…2efe LineComalBin {
0x2ef5…2efe ptr = 0xbc55 // 0x2ef5 @0x0
0x2ef5…2efe lno = 0x1973 // 0x2ef7 @0x2
0x2ef5…2efe at0004 = ╱48╱H╱ // 0x2ef9 @0x4
0x2ef5…2efe at0005 = ╱30╱0╱ // 0x2efa @0x5
0x2ef5…2efe at0006 = ╱dc╱=╱ // 0x2efb @0x6
0x2ef5…2efe at0007 = ╱42╱B╱ // 0x2efc @0x7
0x2ef5…2efe at0008 = EOL // 0x2efd @0x8
0x2ef5…2efe }
0x2efe…2f19 bc70 6520 EXEC C(1,F1$,C3$,C4$)
0x2efe…2f19 LineComalBin {
0x2efe…2f19 ptr = 0xbc70 // 0x2efe @0x0
0x2efe…2f19 lno = 0x1978 // 0x2f00 @0x2
0x2efe…2f19 at0004 = ╱9d╱ EXEC ╱ // 0x2f02 @0x4
0x2efe…2f19 at0005 = ╱43╱C╱ // 0x2f03 @0x5
0x2efe…2f19 at0006 = ╱ed╱(╱ // 0x2f04 @0x6
0x2efe…2f19 at0007 = ╱31╱1╱ // 0x2f05 @0x7
0x2efe…2f19 at0008 = ╱fe00008001╱ // 0x2f06 @0x8
0x2efe…2f19 at000d = ╱ec╱,╱ // 0x2f0b @0xd
0x2efe…2f19 at000e = ╱46╱F╱ // 0x2f0c @0xe
0x2efe…2f19 at000f = ╱31╱1╱ // 0x2f0d @0xf
0x2efe…2f19 at0010 = ╱ef╱$╱ // 0x2f0e @0x10
0x2efe…2f19 at0011 = ╱ec╱,╱ // 0x2f0f @0x11
0x2efe…2f19 at0012 = ╱43╱C╱ // 0x2f10 @0x12
0x2efe…2f19 at0013 = ╱33╱3╱ // 0x2f11 @0x13
0x2efe…2f19 at0014 = ╱ef╱$╱ // 0x2f12 @0x14
0x2efe…2f19 at0015 = ╱ec╱,╱ // 0x2f13 @0x15
0x2efe…2f19 at0016 = ╱43╱C╱ // 0x2f14 @0x16
0x2efe…2f19 at0017 = ╱34╱4╱ // 0x2f15 @0x17
0x2efe…2f19 at0018 = ╱ef╱$╱ // 0x2f16 @0x18
0x2efe…2f19 at0019 = ╱ee╱)╱ // 0x2f17 @0x19
0x2efe…2f19 at001a = EOL // 0x2f18 @0x1a
0x2efe…2f19 }
0x2f19…2f3a bc91 6530 F1$=B8$(L1-E,21:7)
0x2f19…2f3a LineComalBin {
0x2f19…2f3a ptr = 0xbc91 // 0x2f19 @0x0
0x2f19…2f3a lno = 0x1982 // 0x2f1b @0x2
0x2f19…2f3a at0004 = ╱46╱F╱ // 0x2f1d @0x4
0x2f19…2f3a at0005 = ╱31╱1╱ // 0x2f1e @0x5
0x2f19…2f3a at0006 = ╱ef╱$╱ // 0x2f1f @0x6
0x2f19…2f3a at0007 = ╱dc╱=╱ // 0x2f20 @0x7
0x2f19…2f3a at0008 = ╱42╱B╱ // 0x2f21 @0x8
0x2f19…2f3a at0009 = ╱38╱8╱ // 0x2f22 @0x9
0x2f19…2f3a at000a = ╱ef╱$╱ // 0x2f23 @0xa
0x2f19…2f3a at000b = ╱ed╱(╱ // 0x2f24 @0xb
0x2f19…2f3a at000c = ╱4c╱L╱ // 0x2f25 @0xc
0x2f19…2f3a at000d = ╱31╱1╱ // 0x2f26 @0xd
0x2f19…2f3a at000e = ╱e3╱-╱ // 0x2f27 @0xe
0x2f19…2f3a at000f = ╱45╱E╱ // 0x2f28 @0xf
0x2f19…2f3a at0010 = ╱ec╱,╱ // 0x2f29 @0x10
0x2f19…2f3a at0011 = ╱32╱2╱ // 0x2f2a @0x11
0x2f19…2f3a at0012 = ╱31╱1╱ // 0x2f2b @0x12
0x2f19…2f3a at0013 = ╱fe0000a805╱ // 0x2f2c @0x13
0x2f19…2f3a at0018 = ╱f0╱:╱ // 0x2f31 @0x18
0x2f19…2f3a at0019 = ╱37╱7╱ // 0x2f32 @0x19
0x2f19…2f3a at001a = ╱fe0000e003╱ // 0x2f33 @0x1a
0x2f19…2f3a at001f = ╱ee╱)╱ // 0x2f38 @0x1f
0x2f19…2f3a at0020 = EOL // 0x2f39 @0x20
0x2f19…2f3a }
0x2f3a…2f55 bcac 6540 EXEC C(2,C4$,F1$,C3$)
0x2f3a…2f55 LineComalBin {
0x2f3a…2f55 ptr = 0xbcac // 0x2f3a @0x0
0x2f3a…2f55 lno = 0x198c // 0x2f3c @0x2
0x2f3a…2f55 at0004 = ╱9d╱ EXEC ╱ // 0x2f3e @0x4
0x2f3a…2f55 at0005 = ╱43╱C╱ // 0x2f3f @0x5
0x2f3a…2f55 at0006 = ╱ed╱(╱ // 0x2f40 @0x6
0x2f3a…2f55 at0007 = ╱32╱2╱ // 0x2f41 @0x7
0x2f3a…2f55 at0008 = ╱fe00008002╱ // 0x2f42 @0x8
0x2f3a…2f55 at000d = ╱ec╱,╱ // 0x2f47 @0xd
0x2f3a…2f55 at000e = ╱43╱C╱ // 0x2f48 @0xe
0x2f3a…2f55 at000f = ╱34╱4╱ // 0x2f49 @0xf
0x2f3a…2f55 at0010 = ╱ef╱$╱ // 0x2f4a @0x10
0x2f3a…2f55 at0011 = ╱ec╱,╱ // 0x2f4b @0x11
0x2f3a…2f55 at0012 = ╱46╱F╱ // 0x2f4c @0x12
0x2f3a…2f55 at0013 = ╱31╱1╱ // 0x2f4d @0x13
0x2f3a…2f55 at0014 = ╱ef╱$╱ // 0x2f4e @0x14
0x2f3a…2f55 at0015 = ╱ec╱,╱ // 0x2f4f @0x15
0x2f3a…2f55 at0016 = ╱43╱C╱ // 0x2f50 @0x16
0x2f3a…2f55 at0017 = ╱33╱3╱ // 0x2f51 @0x17
0x2f3a…2f55 at0018 = ╱ef╱$╱ // 0x2f52 @0x18
0x2f3a…2f55 at0019 = ╱ee╱)╱ // 0x2f53 @0x19
0x2f3a…2f55 at001a = EOL // 0x2f54 @0x1a
0x2f3a…2f55 }
0x2f55…2f70 bcc7 6550 EXEC C(3,C3$,B4$,C4$)
0x2f55…2f70 LineComalBin {
0x2f55…2f70 ptr = 0xbcc7 // 0x2f55 @0x0
0x2f55…2f70 lno = 0x1996 // 0x2f57 @0x2
0x2f55…2f70 at0004 = ╱9d╱ EXEC ╱ // 0x2f59 @0x4
0x2f55…2f70 at0005 = ╱43╱C╱ // 0x2f5a @0x5
0x2f55…2f70 at0006 = ╱ed╱(╱ // 0x2f5b @0x6
0x2f55…2f70 at0007 = ╱33╱3╱ // 0x2f5c @0x7
0x2f55…2f70 at0008 = ╱fe0000c002╱ // 0x2f5d @0x8
0x2f55…2f70 at000d = ╱ec╱,╱ // 0x2f62 @0xd
0x2f55…2f70 at000e = ╱43╱C╱ // 0x2f63 @0xe
0x2f55…2f70 at000f = ╱33╱3╱ // 0x2f64 @0xf
0x2f55…2f70 at0010 = ╱ef╱$╱ // 0x2f65 @0x10
0x2f55…2f70 at0011 = ╱ec╱,╱ // 0x2f66 @0x11
0x2f55…2f70 at0012 = ╱42╱B╱ // 0x2f67 @0x12
0x2f55…2f70 at0013 = ╱34╱4╱ // 0x2f68 @0x13
0x2f55…2f70 at0014 = ╱ef╱$╱ // 0x2f69 @0x14
0x2f55…2f70 at0015 = ╱ec╱,╱ // 0x2f6a @0x15
0x2f55…2f70 at0016 = ╱43╱C╱ // 0x2f6b @0x16
0x2f55…2f70 at0017 = ╱34╱4╱ // 0x2f6c @0x17
0x2f55…2f70 at0018 = ╱ef╱$╱ // 0x2f6d @0x18
0x2f55…2f70 at0019 = ╱ee╱)╱ // 0x2f6e @0x19
0x2f55…2f70 at001a = EOL // 0x2f6f @0x1a
0x2f55…2f70 }
0x2f70…2f84 bcdb 6555 C4$(TI,EL)="00"
0x2f70…2f84 LineComalBin {
0x2f70…2f84 ptr = 0xbcdb // 0x2f70 @0x0
0x2f70…2f84 lno = 0x199b // 0x2f72 @0x2
0x2f70…2f84 at0004 = ╱43╱C╱ // 0x2f74 @0x4
0x2f70…2f84 at0005 = ╱34╱4╱ // 0x2f75 @0x5
0x2f70…2f84 at0006 = ╱ef╱$╱ // 0x2f76 @0x6
0x2f70…2f84 at0007 = ╱ed╱(╱ // 0x2f77 @0x7
0x2f70…2f84 at0008 = ╱54╱T╱ // 0x2f78 @0x8
0x2f70…2f84 at0009 = ╱49╱I╱ // 0x2f79 @0x9
0x2f70…2f84 at000a = ╱ec╱,╱ // 0x2f7a @0xa
0x2f70…2f84 at000b = ╱45╱E╱ // 0x2f7b @0xb
0x2f70…2f84 at000c = ╱4c╱L╱ // 0x2f7c @0xc
0x2f70…2f84 at000d = ╱ee╱)╱ // 0x2f7d @0xd
0x2f70…2f84 at000e = ╱dc╱=╱ // 0x2f7e @0xe
0x2f70…2f84 at000f = ╱22╱"╱ // 0x2f7f @0xf
0x2f70…2f84 at0010 = ╱30╱0╱ // 0x2f80 @0x10
0x2f70…2f84 at0011 = ╱30╱0╱ // 0x2f81 @0x11
0x2f70…2f84 at0012 = ╱22╱"╱ // 0x2f82 @0x12
0x2f70…2f84 at0013 = EOL // 0x2f83 @0x13
0x2f70…2f84 }
0x2f84…2f8a bce1 6560 ELSE
0x2f84…2f8a LineComalBin {
0x2f84…2f8a ptr = 0xbce1 // 0x2f84 @0x0
0x2f84…2f8a lno = 0x19a0 // 0x2f86 @0x2
0x2f84…2f8a at0004 = ╱9a╱ ELSE ╱ // 0x2f88 @0x4
0x2f84…2f8a at0005 = EOL // 0x2f89 @0x5
0x2f84…2f8a }
0x2f8a…2f95 bcec 6562 IF H0>B THEN
0x2f8a…2f95 LineComalBin {
0x2f8a…2f95 ptr = 0xbcec // 0x2f8a @0x0
0x2f8a…2f95 lno = 0x19a2 // 0x2f8c @0x2
0x2f8a…2f95 at0004 = ╱9c╱ IF ╱ // 0x2f8e @0x4
0x2f8a…2f95 at0005 = ╱48╱H╱ // 0x2f8f @0x5
0x2f8a…2f95 at0006 = ╱30╱0╱ // 0x2f90 @0x6
0x2f8a…2f95 at0007 = ╱de╱>╱ // 0x2f91 @0x7
0x2f8a…2f95 at0008 = ╱42╱B╱ // 0x2f92 @0x8
0x2f8a…2f95 at0009 = ╱b6╱ THEN ╱ // 0x2f93 @0x9
0x2f8a…2f95 at000a = EOL // 0x2f94 @0xa
0x2f8a…2f95 }
0x2f95…2fb0 bd07 6564 EXEC C(1,C3$,F1$,C3$)
0x2f95…2fb0 LineComalBin {
0x2f95…2fb0 ptr = 0xbd07 // 0x2f95 @0x0
0x2f95…2fb0 lno = 0x19a4 // 0x2f97 @0x2
0x2f95…2fb0 at0004 = ╱9d╱ EXEC ╱ // 0x2f99 @0x4
0x2f95…2fb0 at0005 = ╱43╱C╱ // 0x2f9a @0x5
0x2f95…2fb0 at0006 = ╱ed╱(╱ // 0x2f9b @0x6
0x2f95…2fb0 at0007 = ╱31╱1╱ // 0x2f9c @0x7
0x2f95…2fb0 at0008 = ╱fe00008001╱ // 0x2f9d @0x8
0x2f95…2fb0 at000d = ╱ec╱,╱ // 0x2fa2 @0xd
0x2f95…2fb0 at000e = ╱43╱C╱ // 0x2fa3 @0xe
0x2f95…2fb0 at000f = ╱33╱3╱ // 0x2fa4 @0xf
0x2f95…2fb0 at0010 = ╱ef╱$╱ // 0x2fa5 @0x10
0x2f95…2fb0 at0011 = ╱ec╱,╱ // 0x2fa6 @0x11
0x2f95…2fb0 at0012 = ╱46╱F╱ // 0x2fa7 @0x12
0x2f95…2fb0 at0013 = ╱31╱1╱ // 0x2fa8 @0x13
0x2f95…2fb0 at0014 = ╱ef╱$╱ // 0x2fa9 @0x14
0x2f95…2fb0 at0015 = ╱ec╱,╱ // 0x2faa @0x15
0x2f95…2fb0 at0016 = ╱43╱C╱ // 0x2fab @0x16
0x2f95…2fb0 at0017 = ╱33╱3╱ // 0x2fac @0x17
0x2f95…2fb0 at0018 = ╱ef╱$╱ // 0x2fad @0x18
0x2f95…2fb0 at0019 = ╱ee╱)╱ // 0x2fae @0x19
0x2f95…2fb0 at001a = EOL // 0x2faf @0x1a
0x2f95…2fb0 }
0x2fb0…2fc5 bd1c 6566 EXEC PERVERT(C3$,H0)
0x2fb0…2fc5 LineComalBin {
0x2fb0…2fc5 ptr = 0xbd1c // 0x2fb0 @0x0
0x2fb0…2fc5 lno = 0x19a6 // 0x2fb2 @0x2
0x2fb0…2fc5 at0004 = ╱9d╱ EXEC ╱ // 0x2fb4 @0x4
0x2fb0…2fc5 at0005 = ╱50╱P╱ // 0x2fb5 @0x5
0x2fb0…2fc5 at0006 = ╱45╱E╱ // 0x2fb6 @0x6
0x2fb0…2fc5 at0007 = ╱52╱R╱ // 0x2fb7 @0x7
0x2fb0…2fc5 at0008 = ╱56╱V╱ // 0x2fb8 @0x8
0x2fb0…2fc5 at0009 = ╱45╱E╱ // 0x2fb9 @0x9
0x2fb0…2fc5 at000a = ╱52╱R╱ // 0x2fba @0xa
0x2fb0…2fc5 at000b = ╱54╱T╱ // 0x2fbb @0xb
0x2fb0…2fc5 at000c = ╱ed╱(╱ // 0x2fbc @0xc
0x2fb0…2fc5 at000d = ╱43╱C╱ // 0x2fbd @0xd
0x2fb0…2fc5 at000e = ╱33╱3╱ // 0x2fbe @0xe
0x2fb0…2fc5 at000f = ╱ef╱$╱ // 0x2fbf @0xf
0x2fb0…2fc5 at0010 = ╱ec╱,╱ // 0x2fc0 @0x10
0x2fb0…2fc5 at0011 = ╱48╱H╱ // 0x2fc1 @0x11
0x2fb0…2fc5 at0012 = ╱30╱0╱ // 0x2fc2 @0x12
0x2fb0…2fc5 at0013 = ╱ee╱)╱ // 0x2fc3 @0x13
0x2fb0…2fc5 at0014 = EOL // 0x2fc4 @0x14
0x2fb0…2fc5 }
0x2fc5…2fcb bd22 6568 ENDIF
0x2fc5…2fcb LineComalBin {
0x2fc5…2fcb ptr = 0xbd22 // 0x2fc5 @0x0
0x2fc5…2fcb lno = 0x19a8 // 0x2fc7 @0x2
0x2fc5…2fcb at0004 = ╱9b╱ ENDIF ╱ // 0x2fc9 @0x4
0x2fc5…2fcb at0005 = EOL // 0x2fca @0x5
0x2fc5…2fcb }
0x2fcb…2fd7 bd2e 6570 C4$=B3$
0x2fcb…2fd7 LineComalBin {
0x2fcb…2fd7 ptr = 0xbd2e // 0x2fcb @0x0
0x2fcb…2fd7 lno = 0x19aa // 0x2fcd @0x2
0x2fcb…2fd7 at0004 = ╱43╱C╱ // 0x2fcf @0x4
0x2fcb…2fd7 at0005 = ╱34╱4╱ // 0x2fd0 @0x5
0x2fcb…2fd7 at0006 = ╱ef╱$╱ // 0x2fd1 @0x6
0x2fcb…2fd7 at0007 = ╱dc╱=╱ // 0x2fd2 @0x7
0x2fcb…2fd7 at0008 = ╱42╱B╱ // 0x2fd3 @0x8
0x2fcb…2fd7 at0009 = ╱33╱3╱ // 0x2fd4 @0x9
0x2fcb…2fd7 at000a = ╱ef╱$╱ // 0x2fd5 @0xa
0x2fcb…2fd7 at000b = EOL // 0x2fd6 @0xb
0x2fcb…2fd7 }
0x2fd7…2fdd bd34 6580 ENDIF
0x2fd7…2fdd LineComalBin {
0x2fd7…2fdd ptr = 0xbd34 // 0x2fd7 @0x0
0x2fd7…2fdd lno = 0x19b4 // 0x2fd9 @0x2
0x2fd7…2fdd at0004 = ╱9b╱ ENDIF ╱ // 0x2fdb @0x4
0x2fd7…2fdd at0005 = EOL // 0x2fdc @0x5
0x2fd7…2fdd }
0x2fdd…2ff2 bd49 6585 C4$(12)="-"
0x2fdd…2ff2 LineComalBin {
0x2fdd…2ff2 ptr = 0xbd49 // 0x2fdd @0x0
0x2fdd…2ff2 lno = 0x19b9 // 0x2fdf @0x2
0x2fdd…2ff2 at0004 = ╱43╱C╱ // 0x2fe1 @0x4
0x2fdd…2ff2 at0005 = ╱34╱4╱ // 0x2fe2 @0x5
0x2fdd…2ff2 at0006 = ╱ef╱$╱ // 0x2fe3 @0x6
0x2fdd…2ff2 at0007 = ╱ed╱(╱ // 0x2fe4 @0x7
0x2fdd…2ff2 at0008 = ╱31╱1╱ // 0x2fe5 @0x8
0x2fdd…2ff2 at0009 = ╱32╱2╱ // 0x2fe6 @0x9
0x2fdd…2ff2 at000a = ╱fe0000c004╱ // 0x2fe7 @0xa
0x2fdd…2ff2 at000f = ╱ee╱)╱ // 0x2fec @0xf
0x2fdd…2ff2 at0010 = ╱dc╱=╱ // 0x2fed @0x10
0x2fdd…2ff2 at0011 = ╱22╱"╱ // 0x2fee @0x11
0x2fdd…2ff2 at0012 = ╱2d╱-╱ // 0x2fef @0x12
0x2fdd…2ff2 at0013 = ╱22╱"╱ // 0x2ff0 @0x13
0x2fdd…2ff2 at0014 = EOL // 0x2ff1 @0x14
0x2fdd…2ff2 }
0x2ff2…3010 bd67 6590 B8$(L1-E,AZ:TI)=C4$(V:TI)
0x2ff2…3010 LineComalBin {
0x2ff2…3010 ptr = 0xbd67 // 0x2ff2 @0x0
0x2ff2…3010 lno = 0x19be // 0x2ff4 @0x2
0x2ff2…3010 at0004 = ╱42╱B╱ // 0x2ff6 @0x4
0x2ff2…3010 at0005 = ╱38╱8╱ // 0x2ff7 @0x5
0x2ff2…3010 at0006 = ╱ef╱$╱ // 0x2ff8 @0x6
0x2ff2…3010 at0007 = ╱ed╱(╱ // 0x2ff9 @0x7
0x2ff2…3010 at0008 = ╱4c╱L╱ // 0x2ffa @0x8
0x2ff2…3010 at0009 = ╱31╱1╱ // 0x2ffb @0x9
0x2ff2…3010 at000a = ╱e3╱-╱ // 0x2ffc @0xa
0x2ff2…3010 at000b = ╱45╱E╱ // 0x2ffd @0xb
0x2ff2…3010 at000c = ╱ec╱,╱ // 0x2ffe @0xc
0x2ff2…3010 at000d = ╱41╱A╱ // 0x2fff @0xd
0x2ff2…3010 at000e = ╱5a╱Z╱ // 0x3000 @0xe
0x2ff2…3010 at000f = ╱f0╱:╱ // 0x3001 @0xf
0x2ff2…3010 at0010 = ╱54╱T╱ // 0x3002 @0x10
0x2ff2…3010 at0011 = ╱49╱I╱ // 0x3003 @0x11
0x2ff2…3010 at0012 = ╱ee╱)╱ // 0x3004 @0x12
0x2ff2…3010 at0013 = ╱dc╱=╱ // 0x3005 @0x13
0x2ff2…3010 at0014 = ╱43╱C╱ // 0x3006 @0x14
0x2ff2…3010 at0015 = ╱34╱4╱ // 0x3007 @0x15
0x2ff2…3010 at0016 = ╱ef╱$╱ // 0x3008 @0x16
0x2ff2…3010 at0017 = ╱ed╱(╱ // 0x3009 @0x17
0x2ff2…3010 at0018 = ╱56╱V╱ // 0x300a @0x18
0x2ff2…3010 at0019 = ╱f0╱:╱ // 0x300b @0x19
0x2ff2…3010 at001a = ╱54╱T╱ // 0x300c @0x1a
0x2ff2…3010 at001b = ╱49╱I╱ // 0x300d @0x1b
0x2ff2…3010 at001c = ╱ee╱)╱ // 0x300e @0x1c
0x2ff2…3010 at001d = EOL // 0x300f @0x1d
0x2ff2…3010 }
0x3010…3024 bd7b 6600 F1$=B9$(7)
0x3010…3024 LineComalBin {
0x3010…3024 ptr = 0xbd7b // 0x3010 @0x0
0x3010…3024 lno = 0x19c8 // 0x3012 @0x2
0x3010…3024 at0004 = ╱46╱F╱ // 0x3014 @0x4
0x3010…3024 at0005 = ╱31╱1╱ // 0x3015 @0x5
0x3010…3024 at0006 = ╱ef╱$╱ // 0x3016 @0x6
0x3010…3024 at0007 = ╱dc╱=╱ // 0x3017 @0x7
0x3010…3024 at0008 = ╱42╱B╱ // 0x3018 @0x8
0x3010…3024 at0009 = ╱39╱9╱ // 0x3019 @0x9
0x3010…3024 at000a = ╱ef╱$╱ // 0x301a @0xa
0x3010…3024 at000b = ╱ed╱(╱ // 0x301b @0xb
0x3010…3024 at000c = ╱37╱7╱ // 0x301c @0xc
0x3010…3024 at000d = ╱fe0000e003╱ // 0x301d @0xd
0x3010…3024 at0012 = ╱ee╱)╱ // 0x3022 @0x12
0x3010…3024 at0013 = EOL // 0x3023 @0x13
0x3010…3024 }
0x3024…303f bd96 6602 EXEC C(0,F1$,C4$,C3$)
0x3024…303f LineComalBin {
0x3024…303f ptr = 0xbd96 // 0x3024 @0x0
0x3024…303f lno = 0x19ca // 0x3026 @0x2
0x3024…303f at0004 = ╱9d╱ EXEC ╱ // 0x3028 @0x4
0x3024…303f at0005 = ╱43╱C╱ // 0x3029 @0x5
0x3024…303f at0006 = ╱ed╱(╱ // 0x302a @0x6
0x3024…303f at0007 = ╱30╱0╱ // 0x302b @0x7
0x3024…303f at0008 = ╱fe00000000╱ // 0x302c @0x8
0x3024…303f at000d = ╱ec╱,╱ // 0x3031 @0xd
0x3024…303f at000e = ╱46╱F╱ // 0x3032 @0xe
0x3024…303f at000f = ╱31╱1╱ // 0x3033 @0xf
0x3024…303f at0010 = ╱ef╱$╱ // 0x3034 @0x10
0x3024…303f at0011 = ╱ec╱,╱ // 0x3035 @0x11
0x3024…303f at0012 = ╱43╱C╱ // 0x3036 @0x12
0x3024…303f at0013 = ╱34╱4╱ // 0x3037 @0x13
0x3024…303f at0014 = ╱ef╱$╱ // 0x3038 @0x14
0x3024…303f at0015 = ╱ec╱,╱ // 0x3039 @0x15
0x3024…303f at0016 = ╱43╱C╱ // 0x303a @0x16
0x3024…303f at0017 = ╱33╱3╱ // 0x303b @0x17
0x3024…303f at0018 = ╱ef╱$╱ // 0x303c @0x18
0x3024…303f at0019 = ╱ee╱)╱ // 0x303d @0x19
0x3024…303f at001a = EOL // 0x303e @0x1a
0x3024…303f }
0x303f…3059 bdb0 6604 B9$(7)=C3$(G:EL)
0x303f…3059 LineComalBin {
0x303f…3059 ptr = 0xbdb0 // 0x303f @0x0
0x303f…3059 lno = 0x19cc // 0x3041 @0x2
0x303f…3059 at0004 = ╱42╱B╱ // 0x3043 @0x4
0x303f…3059 at0005 = ╱39╱9╱ // 0x3044 @0x5
0x303f…3059 at0006 = ╱ef╱$╱ // 0x3045 @0x6
0x303f…3059 at0007 = ╱ed╱(╱ // 0x3046 @0x7
0x303f…3059 at0008 = ╱37╱7╱ // 0x3047 @0x8
0x303f…3059 at0009 = ╱fe0000e003╱ // 0x3048 @0x9
0x303f…3059 at000e = ╱ee╱)╱ // 0x304d @0xe
0x303f…3059 at000f = ╱dc╱=╱ // 0x304e @0xf
0x303f…3059 at0010 = ╱43╱C╱ // 0x304f @0x10
0x303f…3059 at0011 = ╱33╱3╱ // 0x3050 @0x11
0x303f…3059 at0012 = ╱ef╱$╱ // 0x3051 @0x12
0x303f…3059 at0013 = ╱ed╱(╱ // 0x3052 @0x13
0x303f…3059 at0014 = ╱47╱G╱ // 0x3053 @0x14
0x303f…3059 at0015 = ╱f0╱:╱ // 0x3054 @0x15
0x303f…3059 at0016 = ╱45╱E╱ // 0x3055 @0x16
0x303f…3059 at0017 = ╱4c╱L╱ // 0x3056 @0x17
0x303f…3059 at0018 = ╱ee╱)╱ // 0x3057 @0x18
0x303f…3059 at0019 = EOL // 0x3058 @0x19
0x303f…3059 }
0x3059…3065 bdbc 6610 FOR I=E TO L3
0x3059…3065 LineComalBin {
0x3059…3065 ptr = 0xbdbc // 0x3059 @0x0
0x3059…3065 lno = 0x19d2 // 0x305b @0x2
0x3059…3065 at0004 = ╱83╱ FOR ╱ // 0x305d @0x4
0x3059…3065 at0005 = ╱49╱I╱ // 0x305e @0x5
0x3059…3065 at0006 = ╱dc╱=╱ // 0x305f @0x6
0x3059…3065 at0007 = ╱45╱E╱ // 0x3060 @0x7
0x3059…3065 at0008 = ╱b7╱ TO ╱ // 0x3061 @0x8
0x3059…3065 at0009 = ╱4c╱L╱ // 0x3062 @0x9
0x3059…3065 at000a = ╱33╱3╱ // 0x3063 @0xa
0x3059…3065 at000b = EOL // 0x3064 @0xb
0x3059…3065 }
0x3065…3080 bdd7 6630 IF B8$(I,V,4)="60" THEN
0x3065…3080 LineComalBin {
0x3065…3080 ptr = 0xbdd7 // 0x3065 @0x0
0x3065…3080 lno = 0x19e6 // 0x3067 @0x2
0x3065…3080 at0004 = ╱9c╱ IF ╱ // 0x3069 @0x4
0x3065…3080 at0005 = ╱42╱B╱ // 0x306a @0x5
0x3065…3080 at0006 = ╱38╱8╱ // 0x306b @0x6
0x3065…3080 at0007 = ╱ef╱$╱ // 0x306c @0x7
0x3065…3080 at0008 = ╱ed╱(╱ // 0x306d @0x8
0x3065…3080 at0009 = ╱49╱I╱ // 0x306e @0x9
0x3065…3080 at000a = ╱ec╱,╱ // 0x306f @0xa
0x3065…3080 at000b = ╱56╱V╱ // 0x3070 @0xb
0x3065…3080 at000c = ╱ec╱,╱ // 0x3071 @0xc
0x3065…3080 at000d = ╱34╱4╱ // 0x3072 @0xd
0x3065…3080 at000e = ╱fe00008003╱ // 0x3073 @0xe
0x3065…3080 at0013 = ╱ee╱)╱ // 0x3078 @0x13
0x3065…3080 at0014 = ╱dc╱=╱ // 0x3079 @0x14
0x3065…3080 at0015 = ╱22╱"╱ // 0x307a @0x15
0x3065…3080 at0016 = ╱36╱6╱ // 0x307b @0x16
0x3065…3080 at0017 = ╱30╱0╱ // 0x307c @0x17
0x3065…3080 at0018 = ╱22╱"╱ // 0x307d @0x18
0x3065…3080 at0019 = ╱b6╱ THEN ╱ // 0x307e @0x19
0x3065…3080 at001a = EOL // 0x307f @0x1a
0x3065…3080 }
0x3080…3090 bde7 6635 EXEC Z(60)
0x3080…3090 LineComalBin {
0x3080…3090 ptr = 0xbde7 // 0x3080 @0x0
0x3080…3090 lno = 0x19eb // 0x3082 @0x2
0x3080…3090 at0004 = ╱9d╱ EXEC ╱ // 0x3084 @0x4
0x3080…3090 at0005 = ╱5a╱Z╱ // 0x3085 @0x5
0x3080…3090 at0006 = ╱ed╱(╱ // 0x3086 @0x6
0x3080…3090 at0007 = ╱36╱6╱ // 0x3087 @0x7
0x3080…3090 at0008 = ╱30╱0╱ // 0x3088 @0x8
0x3080…3090 at0009 = ╱fe0000f006╱ // 0x3089 @0x9
0x3080…3090 at000e = ╱ee╱)╱ // 0x308e @0xe
0x3080…3090 at000f = EOL // 0x308f @0xf
0x3080…3090 }
0x3090…30ab be02 6640 C4$=B8$(L1-E,AZ:W)+"+"
0x3090…30ab LineComalBin {
0x3090…30ab ptr = 0xbe02 // 0x3090 @0x0
0x3090…30ab lno = 0x19f0 // 0x3092 @0x2
0x3090…30ab at0004 = ╱43╱C╱ // 0x3094 @0x4
0x3090…30ab at0005 = ╱34╱4╱ // 0x3095 @0x5
0x3090…30ab at0006 = ╱ef╱$╱ // 0x3096 @0x6
0x3090…30ab at0007 = ╱dc╱=╱ // 0x3097 @0x7
0x3090…30ab at0008 = ╱42╱B╱ // 0x3098 @0x8
0x3090…30ab at0009 = ╱38╱8╱ // 0x3099 @0x9
0x3090…30ab at000a = ╱ef╱$╱ // 0x309a @0xa
0x3090…30ab at000b = ╱ed╱(╱ // 0x309b @0xb
0x3090…30ab at000c = ╱4c╱L╱ // 0x309c @0xc
0x3090…30ab at000d = ╱31╱1╱ // 0x309d @0xd
0x3090…30ab at000e = ╱e3╱-╱ // 0x309e @0xe
0x3090…30ab at000f = ╱45╱E╱ // 0x309f @0xf
0x3090…30ab at0010 = ╱ec╱,╱ // 0x30a0 @0x10
0x3090…30ab at0011 = ╱41╱A╱ // 0x30a1 @0x11
0x3090…30ab at0012 = ╱5a╱Z╱ // 0x30a2 @0x12
0x3090…30ab at0013 = ╱f0╱:╱ // 0x30a3 @0x13
0x3090…30ab at0014 = ╱57╱W╱ // 0x30a4 @0x14
0x3090…30ab at0015 = ╱ee╱)╱ // 0x30a5 @0x15
0x3090…30ab at0016 = ╱f1╱+╱ // 0x30a6 @0x16
0x3090…30ab at0017 = ╱22╱"╱ // 0x30a7 @0x17
0x3090…30ab at0018 = ╱2b╱+╱ // 0x30a8 @0x18
0x3090…30ab at0019 = ╱22╱"╱ // 0x30a9 @0x19
0x3090…30ab at001a = EOL // 0x30aa @0x1a
0x3090…30ab }
0x30ab…30ba be11 6650 F1$=B9$(G)
0x30ab…30ba LineComalBin {
0x30ab…30ba ptr = 0xbe11 // 0x30ab @0x0
0x30ab…30ba lno = 0x19fa // 0x30ad @0x2
0x30ab…30ba at0004 = ╱46╱F╱ // 0x30af @0x4
0x30ab…30ba at0005 = ╱31╱1╱ // 0x30b0 @0x5
0x30ab…30ba at0006 = ╱ef╱$╱ // 0x30b1 @0x6
0x30ab…30ba at0007 = ╱dc╱=╱ // 0x30b2 @0x7
0x30ab…30ba at0008 = ╱42╱B╱ // 0x30b3 @0x8
0x30ab…30ba at0009 = ╱39╱9╱ // 0x30b4 @0x9
0x30ab…30ba at000a = ╱ef╱$╱ // 0x30b5 @0xa
0x30ab…30ba at000b = ╱ed╱(╱ // 0x30b6 @0xb
0x30ab…30ba at000c = ╱47╱G╱ // 0x30b7 @0xc
0x30ab…30ba at000d = ╱ee╱)╱ // 0x30b8 @0xd
0x30ab…30ba at000e = EOL // 0x30b9 @0xe
0x30ab…30ba }
0x30ba…30d5 (162,) be2c 6660 EXEC C(4,C4$,F1$,C3$)
0x30ba…30d5 LineComalBin {
0x30ba…30d5 ptr = 0xbe2c // 0x30ba @0x0
0x30ba…30d5 lno = 0x1a04 // 0x30bc @0x2
0x30ba…30d5 at0004 = ╱9d╱ EXEC ╱ // 0x30be @0x4
0x30ba…30d5 at0005 = ╱43╱C╱ // 0x30bf @0x5
0x30ba…30d5 at0006 = ╱ed╱(╱ // 0x30c0 @0x6
0x30ba…30d5 at0007 = ╱34╱4╱ // 0x30c1 @0x7
0x30ba…30d5 at0008 = ╱fe00008003╱ // 0x30c2 @0x8
0x30ba…30d5 at000d = ╱ec╱,╱ // 0x30c7 @0xd
0x30ba…30d5 at000e = ╱43╱C╱ // 0x30c8 @0xe
0x30ba…30d5 at000f = ╱34╱4╱ // 0x30c9 @0xf
0x30ba…30d5 at0010 = ╱ef╱$╱ // 0x30ca @0x10
0x30ba…30d5 at0011 = ╱ec╱,╱ // 0x30cb @0x11
0x30ba…30d5 at0012 = ╱46╱F╱ // 0x30cc @0x12
0x30ba…30d5 at0013 = ╱31╱1╱ // 0x30cd @0x13
0x30ba…30d5 at0014 = ╱ef╱$╱ // 0x30ce @0x14
0x30ba…30d5 at0015 = ╱ec╱,╱ // 0x30cf @0x15
0x30ba…30d5 at0016 = ╱43╱C╱ // 0x30d0 @0x16
0x30ba…30d5 at0017 = ╱33╱3╱ // 0x30d1 @0x17
0x30ba…30d5 at0018 = ╱ef╱$╱ // 0x30d2 @0x18
0x30ba…30d5 at0019 = ╱ee╱)╱ // 0x30d3 @0x19
0x30ba…30d5 at001a = EOL // 0x30d4 @0x1a
0x30ba…30d5 }
0x30d5…30e0 be37 6670 IF SI=E THEN
0x30d5…30e0 LineComalBin {
0x30d5…30e0 ptr = 0xbe37 // 0x30d5 @0x0
0x30d5…30e0 lno = 0x1a0e // 0x30d7 @0x2
0x30d5…30e0 at0004 = ╱9c╱ IF ╱ // 0x30d9 @0x4
0x30d5…30e0 at0005 = ╱53╱S╱ // 0x30da @0x5
0x30d5…30e0 at0006 = ╱49╱I╱ // 0x30db @0x6
0x30d5…30e0 at0007 = ╱dc╱=╱ // 0x30dc @0x7
0x30d5…30e0 at0008 = ╱45╱E╱ // 0x30dd @0x8
0x30d5…30e0 at0009 = ╱b6╱ THEN ╱ // 0x30de @0x9
0x30d5…30e0 at000a = EOL // 0x30df @0xa
0x30d5…30e0 }
0x30e0…30fb be52 6680 EXEC C(1,F1$,C4$,C3$)
0x30e0…30fb LineComalBin {
0x30e0…30fb ptr = 0xbe52 // 0x30e0 @0x0
0x30e0…30fb lno = 0x1a18 // 0x30e2 @0x2
0x30e0…30fb at0004 = ╱9d╱ EXEC ╱ // 0x30e4 @0x4
0x30e0…30fb at0005 = ╱43╱C╱ // 0x30e5 @0x5
0x30e0…30fb at0006 = ╱ed╱(╱ // 0x30e6 @0x6
0x30e0…30fb at0007 = ╱31╱1╱ // 0x30e7 @0x7
0x30e0…30fb at0008 = ╱fe00008001╱ // 0x30e8 @0x8
0x30e0…30fb at000d = ╱ec╱,╱ // 0x30ed @0xd
0x30e0…30fb at000e = ╱46╱F╱ // 0x30ee @0xe
0x30e0…30fb at000f = ╱31╱1╱ // 0x30ef @0xf
0x30e0…30fb at0010 = ╱ef╱$╱ // 0x30f0 @0x10
0x30e0…30fb at0011 = ╱ec╱,╱ // 0x30f1 @0x11
0x30e0…30fb at0012 = ╱43╱C╱ // 0x30f2 @0x12
0x30e0…30fb at0013 = ╱34╱4╱ // 0x30f3 @0x13
0x30e0…30fb at0014 = ╱ef╱$╱ // 0x30f4 @0x14
0x30e0…30fb at0015 = ╱ec╱,╱ // 0x30f5 @0x15
0x30e0…30fb at0016 = ╱43╱C╱ // 0x30f6 @0x16
0x30e0…30fb at0017 = ╱33╱3╱ // 0x30f7 @0x17
0x30e0…30fb at0018 = ╱ef╱$╱ // 0x30f8 @0x18
0x30e0…30fb at0019 = ╱ee╱)╱ // 0x30f9 @0x19
0x30e0…30fb at001a = EOL // 0x30fa @0x1a
0x30e0…30fb }
0x30fb…3119 be70 6690 F1$=B8$(I,21:7)
0x30fb…3119 LineComalBin {
0x30fb…3119 ptr = 0xbe70 // 0x30fb @0x0
0x30fb…3119 lno = 0x1a22 // 0x30fd @0x2
0x30fb…3119 at0004 = ╱46╱F╱ // 0x30ff @0x4
0x30fb…3119 at0005 = ╱31╱1╱ // 0x3100 @0x5
0x30fb…3119 at0006 = ╱ef╱$╱ // 0x3101 @0x6
0x30fb…3119 at0007 = ╱dc╱=╱ // 0x3102 @0x7
0x30fb…3119 at0008 = ╱42╱B╱ // 0x3103 @0x8
0x30fb…3119 at0009 = ╱38╱8╱ // 0x3104 @0x9
0x30fb…3119 at000a = ╱ef╱$╱ // 0x3105 @0xa
0x30fb…3119 at000b = ╱ed╱(╱ // 0x3106 @0xb
0x30fb…3119 at000c = ╱49╱I╱ // 0x3107 @0xc
0x30fb…3119 at000d = ╱ec╱,╱ // 0x3108 @0xd
0x30fb…3119 at000e = ╱32╱2╱ // 0x3109 @0xe
0x30fb…3119 at000f = ╱31╱1╱ // 0x310a @0xf
0x30fb…3119 at0010 = ╱fe0000a805╱ // 0x310b @0x10
0x30fb…3119 at0015 = ╱f0╱:╱ // 0x3110 @0x15
0x30fb…3119 at0016 = ╱37╱7╱ // 0x3111 @0x16
0x30fb…3119 at0017 = ╱fe0000e003╱ // 0x3112 @0x17
0x30fb…3119 at001c = ╱ee╱)╱ // 0x3117 @0x1c
0x30fb…3119 at001d = EOL // 0x3118 @0x1d
0x30fb…3119 }
0x3119…3134 be8b 6700 EXEC C(2,C3$,F1$,C4$)
0x3119…3134 LineComalBin {
0x3119…3134 ptr = 0xbe8b // 0x3119 @0x0
0x3119…3134 lno = 0x1a2c // 0x311b @0x2
0x3119…3134 at0004 = ╱9d╱ EXEC ╱ // 0x311d @0x4
0x3119…3134 at0005 = ╱43╱C╱ // 0x311e @0x5
0x3119…3134 at0006 = ╱ed╱(╱ // 0x311f @0x6
0x3119…3134 at0007 = ╱32╱2╱ // 0x3120 @0x7
0x3119…3134 at0008 = ╱fe00008002╱ // 0x3121 @0x8
0x3119…3134 at000d = ╱ec╱,╱ // 0x3126 @0xd
0x3119…3134 at000e = ╱43╱C╱ // 0x3127 @0xe
0x3119…3134 at000f = ╱33╱3╱ // 0x3128 @0xf
0x3119…3134 at0010 = ╱ef╱$╱ // 0x3129 @0x10
0x3119…3134 at0011 = ╱ec╱,╱ // 0x312a @0x11
0x3119…3134 at0012 = ╱46╱F╱ // 0x312b @0x12
0x3119…3134 at0013 = ╱31╱1╱ // 0x312c @0x13
0x3119…3134 at0014 = ╱ef╱$╱ // 0x312d @0x14
0x3119…3134 at0015 = ╱ec╱,╱ // 0x312e @0x15
0x3119…3134 at0016 = ╱43╱C╱ // 0x312f @0x16
0x3119…3134 at0017 = ╱34╱4╱ // 0x3130 @0x17
0x3119…3134 at0018 = ╱ef╱$╱ // 0x3131 @0x18
0x3119…3134 at0019 = ╱ee╱)╱ // 0x3132 @0x19
0x3119…3134 at001a = EOL // 0x3133 @0x1a
0x3119…3134 }
0x3134…314f bea6 6710 EXEC C(3,C4$,B4$,C3$)
0x3134…314f LineComalBin {
0x3134…314f ptr = 0xbea6 // 0x3134 @0x0
0x3134…314f lno = 0x1a36 // 0x3136 @0x2
0x3134…314f at0004 = ╱9d╱ EXEC ╱ // 0x3138 @0x4
0x3134…314f at0005 = ╱43╱C╱ // 0x3139 @0x5
0x3134…314f at0006 = ╱ed╱(╱ // 0x313a @0x6
0x3134…314f at0007 = ╱33╱3╱ // 0x313b @0x7
0x3134…314f at0008 = ╱fe0000c002╱ // 0x313c @0x8
0x3134…314f at000d = ╱ec╱,╱ // 0x3141 @0xd
0x3134…314f at000e = ╱43╱C╱ // 0x3142 @0xe
0x3134…314f at000f = ╱34╱4╱ // 0x3143 @0xf
0x3134…314f at0010 = ╱ef╱$╱ // 0x3144 @0x10
0x3134…314f at0011 = ╱ec╱,╱ // 0x3145 @0x11
0x3134…314f at0012 = ╱42╱B╱ // 0x3146 @0x12
0x3134…314f at0013 = ╱34╱4╱ // 0x3147 @0x13
0x3134…314f at0014 = ╱ef╱$╱ // 0x3148 @0x14
0x3134…314f at0015 = ╱ec╱,╱ // 0x3149 @0x15
0x3134…314f at0016 = ╱43╱C╱ // 0x314a @0x16
0x3134…314f at0017 = ╱33╱3╱ // 0x314b @0x17
0x3134…314f at0018 = ╱ef╱$╱ // 0x314c @0x18
0x3134…314f at0019 = ╱ee╱)╱ // 0x314d @0x19
0x3134…314f at001a = EOL // 0x314e @0x1a
0x3134…314f }
0x314f…3163 beba 6715 C3$(TI,EL)="00"
0x314f…3163 LineComalBin {
0x314f…3163 ptr = 0xbeba // 0x314f @0x0
0x314f…3163 lno = 0x1a3b // 0x3151 @0x2
0x314f…3163 at0004 = ╱43╱C╱ // 0x3153 @0x4
0x314f…3163 at0005 = ╱33╱3╱ // 0x3154 @0x5
0x314f…3163 at0006 = ╱ef╱$╱ // 0x3155 @0x6
0x314f…3163 at0007 = ╱ed╱(╱ // 0x3156 @0x7
0x314f…3163 at0008 = ╱54╱T╱ // 0x3157 @0x8
0x314f…3163 at0009 = ╱49╱I╱ // 0x3158 @0x9
0x314f…3163 at000a = ╱ec╱,╱ // 0x3159 @0xa
0x314f…3163 at000b = ╱45╱E╱ // 0x315a @0xb
0x314f…3163 at000c = ╱4c╱L╱ // 0x315b @0xc
0x314f…3163 at000d = ╱ee╱)╱ // 0x315c @0xd
0x314f…3163 at000e = ╱dc╱=╱ // 0x315d @0xe
0x314f…3163 at000f = ╱22╱"╱ // 0x315e @0xf
0x314f…3163 at0010 = ╱30╱0╱ // 0x315f @0x10
0x314f…3163 at0011 = ╱30╱0╱ // 0x3160 @0x11
0x314f…3163 at0012 = ╱22╱"╱ // 0x3161 @0x12
0x314f…3163 at0013 = EOL // 0x3162 @0x13
0x314f…3163 }
0x3163…3169 bec0 6720 ELSE
0x3163…3169 LineComalBin {
0x3163…3169 ptr = 0xbec0 // 0x3163 @0x0
0x3163…3169 lno = 0x1a40 // 0x3165 @0x2
0x3163…3169 at0004 = ╱9a╱ ELSE ╱ // 0x3167 @0x4
0x3163…3169 at0005 = EOL // 0x3168 @0x5
0x3163…3169 }
0x3169…3180 bed7 6730 C3$=" 0-"
0x3169…3180 LineComalBin {
0x3169…3180 ptr = 0xbed7 // 0x3169 @0x0
0x3169…3180 lno = 0x1a4a // 0x316b @0x2
0x3169…3180 at0004 = ╱43╱C╱ // 0x316d @0x4
0x3169…3180 at0005 = ╱33╱3╱ // 0x316e @0x5
0x3169…3180 at0006 = ╱ef╱$╱ // 0x316f @0x6
0x3169…3180 at0007 = ╱dc╱=╱ // 0x3170 @0x7
0x3169…3180 at0008 = ╱22╱"╱ // 0x3171 @0x8
0x3169…3180 at0009 = ╱20╱…╱ // 0x3172 @0x9
0x3169…3180 at000a = ╱20╱…╱ // 0x3173 @0xa
0x3169…3180 at000b = ╱20╱…╱ // 0x3174 @0xb
0x3169…3180 at000c = ╱20╱…╱ // 0x3175 @0xc
0x3169…3180 at000d = ╱20╱…╱ // 0x3176 @0xd
0x3169…3180 at000e = ╱20╱…╱ // 0x3177 @0xe
0x3169…3180 at000f = ╱20╱…╱ // 0x3178 @0xf
0x3169…3180 at0010 = ╱20╱…╱ // 0x3179 @0x10
0x3169…3180 at0011 = ╱20╱…╱ // 0x317a @0x11
0x3169…3180 at0012 = ╱20╱…╱ // 0x317b @0x12
0x3169…3180 at0013 = ╱30╱0╱ // 0x317c @0x13
0x3169…3180 at0014 = ╱2d╱-╱ // 0x317d @0x14
0x3169…3180 at0015 = ╱22╱"╱ // 0x317e @0x15
0x3169…3180 at0016 = EOL // 0x317f @0x16
0x3169…3180 }
0x3180…3186 bedd 6740 ENDIF
0x3180…3186 LineComalBin {
0x3180…3186 ptr = 0xbedd // 0x3180 @0x0
0x3180…3186 lno = 0x1a54 // 0x3182 @0x2
0x3180…3186 at0004 = ╱9b╱ ENDIF ╱ // 0x3184 @0x4
0x3180…3186 at0005 = EOL // 0x3185 @0x5
0x3180…3186 }
0x3186…319b bef2 6750 C4$=B8$(I,EL:TI)
0x3186…319b LineComalBin {
0x3186…319b ptr = 0xbef2 // 0x3186 @0x0
0x3186…319b lno = 0x1a5e // 0x3188 @0x2
0x3186…319b at0004 = ╱43╱C╱ // 0x318a @0x4
0x3186…319b at0005 = ╱34╱4╱ // 0x318b @0x5
0x3186…319b at0006 = ╱ef╱$╱ // 0x318c @0x6
0x3186…319b at0007 = ╱dc╱=╱ // 0x318d @0x7
0x3186…319b at0008 = ╱42╱B╱ // 0x318e @0x8
0x3186…319b at0009 = ╱38╱8╱ // 0x318f @0x9
0x3186…319b at000a = ╱ef╱$╱ // 0x3190 @0xa
0x3186…319b at000b = ╱ed╱(╱ // 0x3191 @0xb
0x3186…319b at000c = ╱49╱I╱ // 0x3192 @0xc
0x3186…319b at000d = ╱ec╱,╱ // 0x3193 @0xd
0x3186…319b at000e = ╱45╱E╱ // 0x3194 @0xe
0x3186…319b at000f = ╱4c╱L╱ // 0x3195 @0xf
0x3186…319b at0010 = ╱f0╱:╱ // 0x3196 @0x10
0x3186…319b at0011 = ╱54╱T╱ // 0x3197 @0x11
0x3186…319b at0012 = ╱49╱I╱ // 0x3198 @0x12
0x3186…319b at0013 = ╱ee╱)╱ // 0x3199 @0x13
0x3186…319b at0014 = EOL // 0x319a @0x14
0x3186…319b }
0x319b…31b6 bf0d 6760 EXEC C(4,C4$,C3$,F1$)
0x319b…31b6 LineComalBin {
0x319b…31b6 ptr = 0xbf0d // 0x319b @0x0
0x319b…31b6 lno = 0x1a68 // 0x319d @0x2
0x319b…31b6 at0004 = ╱9d╱ EXEC ╱ // 0x319f @0x4
0x319b…31b6 at0005 = ╱43╱C╱ // 0x31a0 @0x5
0x319b…31b6 at0006 = ╱ed╱(╱ // 0x31a1 @0x6
0x319b…31b6 at0007 = ╱34╱4╱ // 0x31a2 @0x7
0x319b…31b6 at0008 = ╱fe00008003╱ // 0x31a3 @0x8
0x319b…31b6 at000d = ╱ec╱,╱ // 0x31a8 @0xd
0x319b…31b6 at000e = ╱43╱C╱ // 0x31a9 @0xe
0x319b…31b6 at000f = ╱34╱4╱ // 0x31aa @0xf
0x319b…31b6 at0010 = ╱ef╱$╱ // 0x31ab @0x10
0x319b…31b6 at0011 = ╱ec╱,╱ // 0x31ac @0x11
0x319b…31b6 at0012 = ╱43╱C╱ // 0x31ad @0x12
0x319b…31b6 at0013 = ╱33╱3╱ // 0x31ae @0x13
0x319b…31b6 at0014 = ╱ef╱$╱ // 0x31af @0x14
0x319b…31b6 at0015 = ╱ec╱,╱ // 0x31b0 @0x15
0x319b…31b6 at0016 = ╱46╱F╱ // 0x31b1 @0x16
0x319b…31b6 at0017 = ╱31╱1╱ // 0x31b2 @0x17
0x319b…31b6 at0018 = ╱ef╱$╱ // 0x31b3 @0x18
0x319b…31b6 at0019 = ╱ee╱)╱ // 0x31b4 @0x19
0x319b…31b6 at001a = EOL // 0x31b5 @0x1a
0x319b…31b6 }
0x31b6…31c1 bf18 6770 IF SI=G THEN
0x31b6…31c1 LineComalBin {
0x31b6…31c1 ptr = 0xbf18 // 0x31b6 @0x0
0x31b6…31c1 lno = 0x1a72 // 0x31b8 @0x2
0x31b6…31c1 at0004 = ╱9c╱ IF ╱ // 0x31ba @0x4
0x31b6…31c1 at0005 = ╱53╱S╱ // 0x31bb @0x5
0x31b6…31c1 at0006 = ╱49╱I╱ // 0x31bc @0x6
0x31b6…31c1 at0007 = ╱dc╱=╱ // 0x31bd @0x7
0x31b6…31c1 at0008 = ╱47╱G╱ // 0x31be @0x8
0x31b6…31c1 at0009 = ╱b6╱ THEN ╱ // 0x31bf @0x9
0x31b6…31c1 at000a = EOL // 0x31c0 @0xa
0x31b6…31c1 }
0x31c1…31dc bf33 6780 EXEC C(1,C4$,C3$,F1$)
0x31c1…31dc LineComalBin {
0x31c1…31dc ptr = 0xbf33 // 0x31c1 @0x0
0x31c1…31dc lno = 0x1a7c // 0x31c3 @0x2
0x31c1…31dc at0004 = ╱9d╱ EXEC ╱ // 0x31c5 @0x4
0x31c1…31dc at0005 = ╱43╱C╱ // 0x31c6 @0x5
0x31c1…31dc at0006 = ╱ed╱(╱ // 0x31c7 @0x6
0x31c1…31dc at0007 = ╱31╱1╱ // 0x31c8 @0x7
0x31c1…31dc at0008 = ╱fe00008001╱ // 0x31c9 @0x8
0x31c1…31dc at000d = ╱ec╱,╱ // 0x31ce @0xd
0x31c1…31dc at000e = ╱43╱C╱ // 0x31cf @0xe
0x31c1…31dc at000f = ╱34╱4╱ // 0x31d0 @0xf
0x31c1…31dc at0010 = ╱ef╱$╱ // 0x31d1 @0x10
0x31c1…31dc at0011 = ╱ec╱,╱ // 0x31d2 @0x11
0x31c1…31dc at0012 = ╱43╱C╱ // 0x31d3 @0x12
0x31c1…31dc at0013 = ╱33╱3╱ // 0x31d4 @0x13
0x31c1…31dc at0014 = ╱ef╱$╱ // 0x31d5 @0x14
0x31c1…31dc at0015 = ╱ec╱,╱ // 0x31d6 @0x15
0x31c1…31dc at0016 = ╱46╱F╱ // 0x31d7 @0x16
0x31c1…31dc at0017 = ╱31╱1╱ // 0x31d8 @0x17
0x31c1…31dc at0018 = ╱ef╱$╱ // 0x31d9 @0x18
0x31c1…31dc at0019 = ╱ee╱)╱ // 0x31da @0x19
0x31c1…31dc at001a = EOL // 0x31db @0x1a
0x31c1…31dc }
0x31dc…31f7 bf4e 6790 B8$(I,EL:TI)=F1$(V:TI)
0x31dc…31f7 LineComalBin {
0x31dc…31f7 ptr = 0xbf4e // 0x31dc @0x0
0x31dc…31f7 lno = 0x1a86 // 0x31de @0x2
0x31dc…31f7 at0004 = ╱42╱B╱ // 0x31e0 @0x4
0x31dc…31f7 at0005 = ╱38╱8╱ // 0x31e1 @0x5
0x31dc…31f7 at0006 = ╱ef╱$╱ // 0x31e2 @0x6
0x31dc…31f7 at0007 = ╱ed╱(╱ // 0x31e3 @0x7
0x31dc…31f7 at0008 = ╱49╱I╱ // 0x31e4 @0x8
0x31dc…31f7 at0009 = ╱ec╱,╱ // 0x31e5 @0x9
0x31dc…31f7 at000a = ╱45╱E╱ // 0x31e6 @0xa
0x31dc…31f7 at000b = ╱4c╱L╱ // 0x31e7 @0xb
0x31dc…31f7 at000c = ╱f0╱:╱ // 0x31e8 @0xc
0x31dc…31f7 at000d = ╱54╱T╱ // 0x31e9 @0xd
0x31dc…31f7 at000e = ╱49╱I╱ // 0x31ea @0xe
0x31dc…31f7 at000f = ╱ee╱)╱ // 0x31eb @0xf
0x31dc…31f7 at0010 = ╱dc╱=╱ // 0x31ec @0x10
0x31dc…31f7 at0011 = ╱46╱F╱ // 0x31ed @0x11
0x31dc…31f7 at0012 = ╱31╱1╱ // 0x31ee @0x12
0x31dc…31f7 at0013 = ╱ef╱$╱ // 0x31ef @0x13
0x31dc…31f7 at0014 = ╱ed╱(╱ // 0x31f0 @0x14
0x31dc…31f7 at0015 = ╱56╱V╱ // 0x31f1 @0x15
0x31dc…31f7 at0016 = ╱f0╱:╱ // 0x31f2 @0x16
0x31dc…31f7 at0017 = ╱54╱T╱ // 0x31f3 @0x17
0x31dc…31f7 at0018 = ╱49╱I╱ // 0x31f4 @0x18
0x31dc…31f7 at0019 = ╱ee╱)╱ // 0x31f5 @0x19
0x31dc…31f7 at001a = EOL // 0x31f6 @0x1a
0x31dc…31f7 }
0x31f7…3212 bf69 6800 B8$(I,AZ:TI)=C3$(V:TI)
0x31f7…3212 LineComalBin {
0x31f7…3212 ptr = 0xbf69 // 0x31f7 @0x0
0x31f7…3212 lno = 0x1a90 // 0x31f9 @0x2
0x31f7…3212 at0004 = ╱42╱B╱ // 0x31fb @0x4
0x31f7…3212 at0005 = ╱38╱8╱ // 0x31fc @0x5
0x31f7…3212 at0006 = ╱ef╱$╱ // 0x31fd @0x6
0x31f7…3212 at0007 = ╱ed╱(╱ // 0x31fe @0x7
0x31f7…3212 at0008 = ╱49╱I╱ // 0x31ff @0x8
0x31f7…3212 at0009 = ╱ec╱,╱ // 0x3200 @0x9
0x31f7…3212 at000a = ╱41╱A╱ // 0x3201 @0xa
0x31f7…3212 at000b = ╱5a╱Z╱ // 0x3202 @0xb
0x31f7…3212 at000c = ╱f0╱:╱ // 0x3203 @0xc
0x31f7…3212 at000d = ╱54╱T╱ // 0x3204 @0xd
0x31f7…3212 at000e = ╱49╱I╱ // 0x3205 @0xe
0x31f7…3212 at000f = ╱ee╱)╱ // 0x3206 @0xf
0x31f7…3212 at0010 = ╱dc╱=╱ // 0x3207 @0x10
0x31f7…3212 at0011 = ╱43╱C╱ // 0x3208 @0x11
0x31f7…3212 at0012 = ╱33╱3╱ // 0x3209 @0x12
0x31f7…3212 at0013 = ╱ef╱$╱ // 0x320a @0x13
0x31f7…3212 at0014 = ╱ed╱(╱ // 0x320b @0x14
0x31f7…3212 at0015 = ╱56╱V╱ // 0x320c @0x15
0x31f7…3212 at0016 = ╱f0╱:╱ // 0x320d @0x16
0x31f7…3212 at0017 = ╱54╱T╱ // 0x320e @0x17
0x31f7…3212 at0018 = ╱49╱I╱ // 0x320f @0x18
0x31f7…3212 at0019 = ╱ee╱)╱ // 0x3210 @0x19
0x31f7…3212 at001a = EOL // 0x3211 @0x1a
0x31f7…3212 }
0x3212…3218 bf6f 6810 ELSE
0x3212…3218 LineComalBin {
0x3212…3218 ptr = 0xbf6f // 0x3212 @0x0
0x3212…3218 lno = 0x1a9a // 0x3214 @0x2
0x3212…3218 at0004 = ╱9a╱ ELSE ╱ // 0x3216 @0x4
0x3212…3218 at0005 = EOL // 0x3217 @0x5
0x3212…3218 }
0x3218…3233 bf8a 6820 B8$(I,EL:TI)=B3$(V:TI)
0x3218…3233 LineComalBin {
0x3218…3233 ptr = 0xbf8a // 0x3218 @0x0
0x3218…3233 lno = 0x1aa4 // 0x321a @0x2
0x3218…3233 at0004 = ╱42╱B╱ // 0x321c @0x4
0x3218…3233 at0005 = ╱38╱8╱ // 0x321d @0x5
0x3218…3233 at0006 = ╱ef╱$╱ // 0x321e @0x6
0x3218…3233 at0007 = ╱ed╱(╱ // 0x321f @0x7
0x3218…3233 at0008 = ╱49╱I╱ // 0x3220 @0x8
0x3218…3233 at0009 = ╱ec╱,╱ // 0x3221 @0x9
0x3218…3233 at000a = ╱45╱E╱ // 0x3222 @0xa
0x3218…3233 at000b = ╱4c╱L╱ // 0x3223 @0xb
0x3218…3233 at000c = ╱f0╱:╱ // 0x3224 @0xc
0x3218…3233 at000d = ╱54╱T╱ // 0x3225 @0xd
0x3218…3233 at000e = ╱49╱I╱ // 0x3226 @0xe
0x3218…3233 at000f = ╱ee╱)╱ // 0x3227 @0xf
0x3218…3233 at0010 = ╱dc╱=╱ // 0x3228 @0x10
0x3218…3233 at0011 = ╱42╱B╱ // 0x3229 @0x11
0x3218…3233 at0012 = ╱33╱3╱ // 0x322a @0x12
0x3218…3233 at0013 = ╱ef╱$╱ // 0x322b @0x13
0x3218…3233 at0014 = ╱ed╱(╱ // 0x322c @0x14
0x3218…3233 at0015 = ╱56╱V╱ // 0x322d @0x15
0x3218…3233 at0016 = ╱f0╱:╱ // 0x322e @0x16
0x3218…3233 at0017 = ╱54╱T╱ // 0x322f @0x17
0x3218…3233 at0018 = ╱49╱I╱ // 0x3230 @0x18
0x3218…3233 at0019 = ╱ee╱)╱ // 0x3231 @0x19
0x3218…3233 at001a = EOL // 0x3232 @0x1a
0x3218…3233 }
0x3233…3248 bf9f 6830 B8$(I,AZ:TI)=C4$
0x3233…3248 LineComalBin {
0x3233…3248 ptr = 0xbf9f // 0x3233 @0x0
0x3233…3248 lno = 0x1aae // 0x3235 @0x2
0x3233…3248 at0004 = ╱42╱B╱ // 0x3237 @0x4
0x3233…3248 at0005 = ╱38╱8╱ // 0x3238 @0x5
0x3233…3248 at0006 = ╱ef╱$╱ // 0x3239 @0x6
0x3233…3248 at0007 = ╱ed╱(╱ // 0x323a @0x7
0x3233…3248 at0008 = ╱49╱I╱ // 0x323b @0x8
0x3233…3248 at0009 = ╱ec╱,╱ // 0x323c @0x9
0x3233…3248 at000a = ╱41╱A╱ // 0x323d @0xa
0x3233…3248 at000b = ╱5a╱Z╱ // 0x323e @0xb
0x3233…3248 at000c = ╱f0╱:╱ // 0x323f @0xc
0x3233…3248 at000d = ╱54╱T╱ // 0x3240 @0xd
0x3233…3248 at000e = ╱49╱I╱ // 0x3241 @0xe
0x3233…3248 at000f = ╱ee╱)╱ // 0x3242 @0xf
0x3233…3248 at0010 = ╱dc╱=╱ // 0x3243 @0x10
0x3233…3248 at0011 = ╱43╱C╱ // 0x3244 @0x11
0x3233…3248 at0012 = ╱34╱4╱ // 0x3245 @0x12
0x3233…3248 at0013 = ╱ef╱$╱ // 0x3246 @0x13
0x3233…3248 at0014 = EOL // 0x3247 @0x14
0x3233…3248 }
0x3248…324e bfa5 6840 ENDIF
0x3248…324e LineComalBin {
0x3248…324e ptr = 0xbfa5 // 0x3248 @0x0
0x3248…324e lno = 0x1ab8 // 0x324a @0x2
0x3248…324e at0004 = ╱9b╱ ENDIF ╱ // 0x324c @0x4
0x3248…324e at0005 = EOL // 0x324d @0x5
0x3248…324e }
0x324e…3263 bfba 6842 C3$=B8$(I,AZ:TI)
0x324e…3263 LineComalBin {
0x324e…3263 ptr = 0xbfba // 0x324e @0x0
0x324e…3263 lno = 0x1aba // 0x3250 @0x2
0x324e…3263 at0004 = ╱43╱C╱ // 0x3252 @0x4
0x324e…3263 at0005 = ╱33╱3╱ // 0x3253 @0x5
0x324e…3263 at0006 = ╱ef╱$╱ // 0x3254 @0x6
0x324e…3263 at0007 = ╱dc╱=╱ // 0x3255 @0x7
0x324e…3263 at0008 = ╱42╱B╱ // 0x3256 @0x8
0x324e…3263 at0009 = ╱38╱8╱ // 0x3257 @0x9
0x324e…3263 at000a = ╱ef╱$╱ // 0x3258 @0xa
0x324e…3263 at000b = ╱ed╱(╱ // 0x3259 @0xb
0x324e…3263 at000c = ╱49╱I╱ // 0x325a @0xc
0x324e…3263 at000d = ╱ec╱,╱ // 0x325b @0xd
0x324e…3263 at000e = ╱41╱A╱ // 0x325c @0xe
0x324e…3263 at000f = ╱5a╱Z╱ // 0x325d @0xf
0x324e…3263 at0010 = ╱f0╱:╱ // 0x325e @0x10
0x324e…3263 at0011 = ╱54╱T╱ // 0x325f @0x11
0x324e…3263 at0012 = ╱49╱I╱ // 0x3260 @0x12
0x324e…3263 at0013 = ╱ee╱)╱ // 0x3261 @0x13
0x324e…3263 at0014 = EOL // 0x3262 @0x14
0x324e…3263 }
0x3263…3277 bfce 6844 C4$=B9$(7)
0x3263…3277 LineComalBin {
0x3263…3277 ptr = 0xbfce // 0x3263 @0x0
0x3263…3277 lno = 0x1abc // 0x3265 @0x2
0x3263…3277 at0004 = ╱43╱C╱ // 0x3267 @0x4
0x3263…3277 at0005 = ╱34╱4╱ // 0x3268 @0x5
0x3263…3277 at0006 = ╱ef╱$╱ // 0x3269 @0x6
0x3263…3277 at0007 = ╱dc╱=╱ // 0x326a @0x7
0x3263…3277 at0008 = ╱42╱B╱ // 0x326b @0x8
0x3263…3277 at0009 = ╱39╱9╱ // 0x326c @0x9
0x3263…3277 at000a = ╱ef╱$╱ // 0x326d @0xa
0x3263…3277 at000b = ╱ed╱(╱ // 0x326e @0xb
0x3263…3277 at000c = ╱37╱7╱ // 0x326f @0xc
0x3263…3277 at000d = ╱fe0000e003╱ // 0x3270 @0xd
0x3263…3277 at0012 = ╱ee╱)╱ // 0x3275 @0x12
0x3263…3277 at0013 = EOL // 0x3276 @0x13
0x3263…3277 }
0x3277…3292 bfe9 6846 EXEC C(1,C4$,C3$,C4$)
0x3277…3292 LineComalBin {
0x3277…3292 ptr = 0xbfe9 // 0x3277 @0x0
0x3277…3292 lno = 0x1abe // 0x3279 @0x2
0x3277…3292 at0004 = ╱9d╱ EXEC ╱ // 0x327b @0x4
0x3277…3292 at0005 = ╱43╱C╱ // 0x327c @0x5
0x3277…3292 at0006 = ╱ed╱(╱ // 0x327d @0x6
0x3277…3292 at0007 = ╱31╱1╱ // 0x327e @0x7
0x3277…3292 at0008 = ╱fe00008001╱ // 0x327f @0x8
0x3277…3292 at000d = ╱ec╱,╱ // 0x3284 @0xd
0x3277…3292 at000e = ╱43╱C╱ // 0x3285 @0xe
0x3277…3292 at000f = ╱34╱4╱ // 0x3286 @0xf
0x3277…3292 at0010 = ╱ef╱$╱ // 0x3287 @0x10
0x3277…3292 at0011 = ╱ec╱,╱ // 0x3288 @0x11
0x3277…3292 at0012 = ╱43╱C╱ // 0x3289 @0x12
0x3277…3292 at0013 = ╱33╱3╱ // 0x328a @0x13
0x3277…3292 at0014 = ╱ef╱$╱ // 0x328b @0x14
0x3277…3292 at0015 = ╱ec╱,╱ // 0x328c @0x15
0x3277…3292 at0016 = ╱43╱C╱ // 0x328d @0x16
0x3277…3292 at0017 = ╱34╱4╱ // 0x328e @0x17
0x3277…3292 at0018 = ╱ef╱$╱ // 0x328f @0x18
0x3277…3292 at0019 = ╱ee╱)╱ // 0x3290 @0x19
0x3277…3292 at001a = EOL // 0x3291 @0x1a
0x3277…3292 }
0x3292…32ac c003 6848 B9$(7)=C4$(G:EL)
0x3292…32ac LineComalBin {
0x3292…32ac ptr = 0xc003 // 0x3292 @0x0
0x3292…32ac lno = 0x1ac0 // 0x3294 @0x2
0x3292…32ac at0004 = ╱42╱B╱ // 0x3296 @0x4
0x3292…32ac at0005 = ╱39╱9╱ // 0x3297 @0x5
0x3292…32ac at0006 = ╱ef╱$╱ // 0x3298 @0x6
0x3292…32ac at0007 = ╱ed╱(╱ // 0x3299 @0x7
0x3292…32ac at0008 = ╱37╱7╱ // 0x329a @0x8
0x3292…32ac at0009 = ╱fe0000e003╱ // 0x329b @0x9
0x3292…32ac at000e = ╱ee╱)╱ // 0x32a0 @0xe
0x3292…32ac at000f = ╱dc╱=╱ // 0x32a1 @0xf
0x3292…32ac at0010 = ╱43╱C╱ // 0x32a2 @0x10
0x3292…32ac at0011 = ╱34╱4╱ // 0x32a3 @0x11
0x3292…32ac at0012 = ╱ef╱$╱ // 0x32a4 @0x12
0x3292…32ac at0013 = ╱ed╱(╱ // 0x32a5 @0x13
0x3292…32ac at0014 = ╱47╱G╱ // 0x32a6 @0x14
0x3292…32ac at0015 = ╱f0╱:╱ // 0x32a7 @0x15
0x3292…32ac at0016 = ╱45╱E╱ // 0x32a8 @0x16
0x3292…32ac at0017 = ╱4c╱L╱ // 0x32a9 @0x17
0x3292…32ac at0018 = ╱ee╱)╱ // 0x32aa @0x18
0x3292…32ac at0019 = EOL // 0x32ab @0x19
0x3292…32ac }
0x32ac…32bd c014 6852 B8$(I,E)="2"
0x32ac…32bd LineComalBin {
0x32ac…32bd ptr = 0xc014 // 0x32ac @0x0
0x32ac…32bd lno = 0x1ac4 // 0x32ae @0x2
0x32ac…32bd at0004 = ╱42╱B╱ // 0x32b0 @0x4
0x32ac…32bd at0005 = ╱38╱8╱ // 0x32b1 @0x5
0x32ac…32bd at0006 = ╱ef╱$╱ // 0x32b2 @0x6
0x32ac…32bd at0007 = ╱ed╱(╱ // 0x32b3 @0x7
0x32ac…32bd at0008 = ╱49╱I╱ // 0x32b4 @0x8
0x32ac…32bd at0009 = ╱ec╱,╱ // 0x32b5 @0x9
0x32ac…32bd at000a = ╱45╱E╱ // 0x32b6 @0xa
0x32ac…32bd at000b = ╱ee╱)╱ // 0x32b7 @0xb
0x32ac…32bd at000c = ╱dc╱=╱ // 0x32b8 @0xc
0x32ac…32bd at000d = ╱22╱"╱ // 0x32b9 @0xd
0x32ac…32bd at000e = ╱32╱2╱ // 0x32ba @0xe
0x32ac…32bd at000f = ╱22╱"╱ // 0x32bb @0xf
0x32ac…32bd at0010 = EOL // 0x32bc @0x10
0x32ac…32bd }
0x32bd…32d3 c02a 6854 PUT D7$,B7(I):B8$(I)
0x32bd…32d3 LineComalBin {
0x32bd…32d3 ptr = 0xc02a // 0x32bd @0x0
0x32bd…32d3 lno = 0x1ac6 // 0x32bf @0x2
0x32bd…32d3 at0004 = ╱aa╱ PUT ╱ // 0x32c1 @0x4
0x32bd…32d3 at0005 = ╱44╱D╱ // 0x32c2 @0x5
0x32bd…32d3 at0006 = ╱37╱7╱ // 0x32c3 @0x6
0x32bd…32d3 at0007 = ╱ef╱$╱ // 0x32c4 @0x7
0x32bd…32d3 at0008 = ╱ec╱,╱ // 0x32c5 @0x8
0x32bd…32d3 at0009 = ╱42╱B╱ // 0x32c6 @0x9
0x32bd…32d3 at000a = ╱37╱7╱ // 0x32c7 @0xa
0x32bd…32d3 at000b = ╱ed╱(╱ // 0x32c8 @0xb
0x32bd…32d3 at000c = ╱49╱I╱ // 0x32c9 @0xc
0x32bd…32d3 at000d = ╱ee╱)╱ // 0x32ca @0xd
0x32bd…32d3 at000e = ╱f0╱:╱ // 0x32cb @0xe
0x32bd…32d3 at000f = ╱42╱B╱ // 0x32cc @0xf
0x32bd…32d3 at0010 = ╱38╱8╱ // 0x32cd @0x10
0x32bd…32d3 at0011 = ╱ef╱$╱ // 0x32ce @0x11
0x32bd…32d3 at0012 = ╱ed╱(╱ // 0x32cf @0x12
0x32bd…32d3 at0013 = ╱49╱I╱ // 0x32d0 @0x13
0x32bd…32d3 at0014 = ╱ee╱)╱ // 0x32d1 @0x14
0x32bd…32d3 at0015 = EOL // 0x32d2 @0x15
0x32bd…32d3 }
0x32d3…32ea c041 6855 B8$(I,37)="-"
0x32d3…32ea LineComalBin {
0x32d3…32ea ptr = 0xc041 // 0x32d3 @0x0
0x32d3…32ea lno = 0x1ac7 // 0x32d5 @0x2
0x32d3…32ea at0004 = ╱42╱B╱ // 0x32d7 @0x4
0x32d3…32ea at0005 = ╱38╱8╱ // 0x32d8 @0x5
0x32d3…32ea at0006 = ╱ef╱$╱ // 0x32d9 @0x6
0x32d3…32ea at0007 = ╱ed╱(╱ // 0x32da @0x7
0x32d3…32ea at0008 = ╱49╱I╱ // 0x32db @0x8
0x32d3…32ea at0009 = ╱ec╱,╱ // 0x32dc @0x9
0x32d3…32ea at000a = ╱33╱3╱ // 0x32dd @0xa
0x32d3…32ea at000b = ╱37╱7╱ // 0x32de @0xb
0x32d3…32ea at000c = ╱fe00009406╱ // 0x32df @0xc
0x32d3…32ea at0011 = ╱ee╱)╱ // 0x32e4 @0x11
0x32d3…32ea at0012 = ╱dc╱=╱ // 0x32e5 @0x12
0x32d3…32ea at0013 = ╱22╱"╱ // 0x32e6 @0x13
0x32d3…32ea at0014 = ╱2d╱-╱ // 0x32e7 @0x14
0x32d3…32ea at0015 = ╱22╱"╱ // 0x32e8 @0x15
0x32d3…32ea at0016 = EOL // 0x32e9 @0x16
0x32d3…32ea }
0x32ea…3310 c067 6860 F0$(34,43)=B8$(I,EL:TI)
0x32ea…3310 LineComalBin {
0x32ea…3310 ptr = 0xc067 // 0x32ea @0x0
0x32ea…3310 lno = 0x1acc // 0x32ec @0x2
0x32ea…3310 at0004 = ╱46╱F╱ // 0x32ee @0x4
0x32ea…3310 at0005 = ╱30╱0╱ // 0x32ef @0x5
0x32ea…3310 at0006 = ╱ef╱$╱ // 0x32f0 @0x6
0x32ea…3310 at0007 = ╱ed╱(╱ // 0x32f1 @0x7
0x32ea…3310 at0008 = ╱33╱3╱ // 0x32f2 @0x8
0x32ea…3310 at0009 = ╱34╱4╱ // 0x32f3 @0x9
0x32ea…3310 at000a = ╱fe00008806╱ // 0x32f4 @0xa
0x32ea…3310 at000f = ╱ec╱,╱ // 0x32f9 @0xf
0x32ea…3310 at0010 = ╱34╱4╱ // 0x32fa @0x10
0x32ea…3310 at0011 = ╱33╱3╱ // 0x32fb @0x11
0x32ea…3310 at0012 = ╱fe0000ac06╱ // 0x32fc @0x12
0x32ea…3310 at0017 = ╱ee╱)╱ // 0x3301 @0x17
0x32ea…3310 at0018 = ╱dc╱=╱ // 0x3302 @0x18
0x32ea…3310 at0019 = ╱42╱B╱ // 0x3303 @0x19
0x32ea…3310 at001a = ╱38╱8╱ // 0x3304 @0x1a
0x32ea…3310 at001b = ╱ef╱$╱ // 0x3305 @0x1b
0x32ea…3310 at001c = ╱ed╱(╱ // 0x3306 @0x1c
0x32ea…3310 at001d = ╱49╱I╱ // 0x3307 @0x1d
0x32ea…3310 at001e = ╱ec╱,╱ // 0x3308 @0x1e
0x32ea…3310 at001f = ╱45╱E╱ // 0x3309 @0x1f
0x32ea…3310 at0020 = ╱4c╱L╱ // 0x330a @0x20
0x32ea…3310 at0021 = ╱f0╱:╱ // 0x330b @0x21
0x32ea…3310 at0022 = ╱54╱T╱ // 0x330c @0x22
0x32ea…3310 at0023 = ╱49╱I╱ // 0x330d @0x23
0x32ea…3310 at0024 = ╱ee╱)╱ // 0x330e @0x24
0x32ea…3310 at0025 = EOL // 0x330f @0x25
0x32ea…3310 }
0x3310…3335 c08c 6870 F0$(71,79)=B8$(I,AZ:W)
0x3310…3335 LineComalBin {
0x3310…3335 ptr = 0xc08c // 0x3310 @0x0
0x3310…3335 lno = 0x1ad6 // 0x3312 @0x2
0x3310…3335 at0004 = ╱46╱F╱ // 0x3314 @0x4
0x3310…3335 at0005 = ╱30╱0╱ // 0x3315 @0x5
0x3310…3335 at0006 = ╱ef╱$╱ // 0x3316 @0x6
0x3310…3335 at0007 = ╱ed╱(╱ // 0x3317 @0x7
0x3310…3335 at0008 = ╱37╱7╱ // 0x3318 @0x8
0x3310…3335 at0009 = ╱31╱1╱ // 0x3319 @0x9
0x3310…3335 at000a = ╱fe00008e07╱ // 0x331a @0xa
0x3310…3335 at000f = ╱ec╱,╱ // 0x331f @0xf
0x3310…3335 at0010 = ╱37╱7╱ // 0x3320 @0x10
0x3310…3335 at0011 = ╱39╱9╱ // 0x3321 @0x11
0x3310…3335 at0012 = ╱fe00009e07╱ // 0x3322 @0x12
0x3310…3335 at0017 = ╱ee╱)╱ // 0x3327 @0x17
0x3310…3335 at0018 = ╱dc╱=╱ // 0x3328 @0x18
0x3310…3335 at0019 = ╱42╱B╱ // 0x3329 @0x19
0x3310…3335 at001a = ╱38╱8╱ // 0x332a @0x1a
0x3310…3335 at001b = ╱ef╱$╱ // 0x332b @0x1b
0x3310…3335 at001c = ╱ed╱(╱ // 0x332c @0x1c
0x3310…3335 at001d = ╱49╱I╱ // 0x332d @0x1d
0x3310…3335 at001e = ╱ec╱,╱ // 0x332e @0x1e
0x3310…3335 at001f = ╱41╱A╱ // 0x332f @0x1f
0x3310…3335 at0020 = ╱5a╱Z╱ // 0x3330 @0x20
0x3310…3335 at0021 = ╱f0╱:╱ // 0x3331 @0x21
0x3310…3335 at0022 = ╱57╱W╱ // 0x3332 @0x22
0x3310…3335 at0023 = ╱ee╱)╱ // 0x3333 @0x23
0x3310…3335 at0024 = EOL // 0x3334 @0x24
0x3310…3335 }
0x3335…334a c0a1 6871 C3$=B8$(I,AZ:TI)
0x3335…334a LineComalBin {
0x3335…334a ptr = 0xc0a1 // 0x3335 @0x0
0x3335…334a lno = 0x1ad7 // 0x3337 @0x2
0x3335…334a at0004 = ╱43╱C╱ // 0x3339 @0x4
0x3335…334a at0005 = ╱33╱3╱ // 0x333a @0x5
0x3335…334a at0006 = ╱ef╱$╱ // 0x333b @0x6
0x3335…334a at0007 = ╱dc╱=╱ // 0x333c @0x7
0x3335…334a at0008 = ╱42╱B╱ // 0x333d @0x8
0x3335…334a at0009 = ╱38╱8╱ // 0x333e @0x9
0x3335…334a at000a = ╱ef╱$╱ // 0x333f @0xa
0x3335…334a at000b = ╱ed╱(╱ // 0x3340 @0xb
0x3335…334a at000c = ╱49╱I╱ // 0x3341 @0xc
0x3335…334a at000d = ╱ec╱,╱ // 0x3342 @0xd
0x3335…334a at000e = ╱41╱A╱ // 0x3343 @0xe
0x3335…334a at000f = ╱5a╱Z╱ // 0x3344 @0xf
0x3335…334a at0010 = ╱f0╱:╱ // 0x3345 @0x10
0x3335…334a at0011 = ╱54╱T╱ // 0x3346 @0x11
0x3335…334a at0012 = ╱49╱I╱ // 0x3347 @0x12
0x3335…334a at0013 = ╱ee╱)╱ // 0x3348 @0x13
0x3335…334a at0014 = EOL // 0x3349 @0x14
0x3335…334a }
0x334a…3367 c0be 6872 C4$=B6$(21,30)
0x334a…3367 LineComalBin {
0x334a…3367 ptr = 0xc0be // 0x334a @0x0
0x334a…3367 lno = 0x1ad8 // 0x334c @0x2
0x334a…3367 at0004 = ╱43╱C╱ // 0x334e @0x4
0x334a…3367 at0005 = ╱34╱4╱ // 0x334f @0x5
0x334a…3367 at0006 = ╱ef╱$╱ // 0x3350 @0x6
0x334a…3367 at0007 = ╱dc╱=╱ // 0x3351 @0x7
0x334a…3367 at0008 = ╱42╱B╱ // 0x3352 @0x8
0x334a…3367 at0009 = ╱36╱6╱ // 0x3353 @0x9
0x334a…3367 at000a = ╱ef╱$╱ // 0x3354 @0xa
0x334a…3367 at000b = ╱ed╱(╱ // 0x3355 @0xb
0x334a…3367 at000c = ╱32╱2╱ // 0x3356 @0xc
0x334a…3367 at000d = ╱31╱1╱ // 0x3357 @0xd
0x334a…3367 at000e = ╱fe0000a805╱ // 0x3358 @0xe
0x334a…3367 at0013 = ╱ec╱,╱ // 0x335d @0x13
0x334a…3367 at0014 = ╱33╱3╱ // 0x335e @0x14
0x334a…3367 at0015 = ╱30╱0╱ // 0x335f @0x15
0x334a…3367 at0016 = ╱fe0000f005╱ // 0x3360 @0x16
0x334a…3367 at001b = ╱ee╱)╱ // 0x3365 @0x1b
0x334a…3367 at001c = EOL // 0x3366 @0x1c
0x334a…3367 }
0x3367…3382 c0d9 6873 EXEC C(0,C3$,C4$,C4$)
0x3367…3382 LineComalBin {
0x3367…3382 ptr = 0xc0d9 // 0x3367 @0x0
0x3367…3382 lno = 0x1ad9 // 0x3369 @0x2
0x3367…3382 at0004 = ╱9d╱ EXEC ╱ // 0x336b @0x4
0x3367…3382 at0005 = ╱43╱C╱ // 0x336c @0x5
0x3367…3382 at0006 = ╱ed╱(╱ // 0x336d @0x6
0x3367…3382 at0007 = ╱30╱0╱ // 0x336e @0x7
0x3367…3382 at0008 = ╱fe00000000╱ // 0x336f @0x8
0x3367…3382 at000d = ╱ec╱,╱ // 0x3374 @0xd
0x3367…3382 at000e = ╱43╱C╱ // 0x3375 @0xe
0x3367…3382 at000f = ╱33╱3╱ // 0x3376 @0xf
0x3367…3382 at0010 = ╱ef╱$╱ // 0x3377 @0x10
0x3367…3382 at0011 = ╱ec╱,╱ // 0x3378 @0x11
0x3367…3382 at0012 = ╱43╱C╱ // 0x3379 @0x12
0x3367…3382 at0013 = ╱34╱4╱ // 0x337a @0x13
0x3367…3382 at0014 = ╱ef╱$╱ // 0x337b @0x14
0x3367…3382 at0015 = ╱ec╱,╱ // 0x337c @0x15
0x3367…3382 at0016 = ╱43╱C╱ // 0x337d @0x16
0x3367…3382 at0017 = ╱34╱4╱ // 0x337e @0x17
0x3367…3382 at0018 = ╱ef╱$╱ // 0x337f @0x18
0x3367…3382 at0019 = ╱ee╱)╱ // 0x3380 @0x19
0x3367…3382 at001a = EOL // 0x3381 @0x1a
0x3367…3382 }
0x3382…33a5 c0fc 6875 B6$(21,30)=C4$(V:TI)
0x3382…33a5 LineComalBin {
0x3382…33a5 ptr = 0xc0fc // 0x3382 @0x0
0x3382…33a5 lno = 0x1adb // 0x3384 @0x2
0x3382…33a5 at0004 = ╱42╱B╱ // 0x3386 @0x4
0x3382…33a5 at0005 = ╱36╱6╱ // 0x3387 @0x5
0x3382…33a5 at0006 = ╱ef╱$╱ // 0x3388 @0x6
0x3382…33a5 at0007 = ╱ed╱(╱ // 0x3389 @0x7
0x3382…33a5 at0008 = ╱32╱2╱ // 0x338a @0x8
0x3382…33a5 at0009 = ╱31╱1╱ // 0x338b @0x9
0x3382…33a5 at000a = ╱fe0000a805╱ // 0x338c @0xa
0x3382…33a5 at000f = ╱ec╱,╱ // 0x3391 @0xf
0x3382…33a5 at0010 = ╱33╱3╱ // 0x3392 @0x10
0x3382…33a5 at0011 = ╱30╱0╱ // 0x3393 @0x11
0x3382…33a5 at0012 = ╱fe0000f005╱ // 0x3394 @0x12
0x3382…33a5 at0017 = ╱ee╱)╱ // 0x3399 @0x17
0x3382…33a5 at0018 = ╱dc╱=╱ // 0x339a @0x18
0x3382…33a5 at0019 = ╱43╱C╱ // 0x339b @0x19
0x3382…33a5 at001a = ╱34╱4╱ // 0x339c @0x1a
0x3382…33a5 at001b = ╱ef╱$╱ // 0x339d @0x1b
0x3382…33a5 at001c = ╱ed╱(╱ // 0x339e @0x1c
0x3382…33a5 at001d = ╱56╱V╱ // 0x339f @0x1d
0x3382…33a5 at001e = ╱f0╱:╱ // 0x33a0 @0x1e
0x3382…33a5 at001f = ╱54╱T╱ // 0x33a1 @0x1f
0x3382…33a5 at0020 = ╱49╱I╱ // 0x33a2 @0x20
0x3382…33a5 at0021 = ╱ee╱)╱ // 0x33a3 @0x21
0x3382…33a5 at0022 = EOL // 0x33a4 @0x22
0x3382…33a5 }
0x33a5…33b9 c110 6876 C4$=B9$(5)
0x33a5…33b9 LineComalBin {
0x33a5…33b9 ptr = 0xc110 // 0x33a5 @0x0
0x33a5…33b9 lno = 0x1adc // 0x33a7 @0x2
0x33a5…33b9 at0004 = ╱43╱C╱ // 0x33a9 @0x4
0x33a5…33b9 at0005 = ╱34╱4╱ // 0x33aa @0x5
0x33a5…33b9 at0006 = ╱ef╱$╱ // 0x33ab @0x6
0x33a5…33b9 at0007 = ╱dc╱=╱ // 0x33ac @0x7
0x33a5…33b9 at0008 = ╱42╱B╱ // 0x33ad @0x8
0x33a5…33b9 at0009 = ╱39╱9╱ // 0x33ae @0x9
0x33a5…33b9 at000a = ╱ef╱$╱ // 0x33af @0xa
0x33a5…33b9 at000b = ╱ed╱(╱ // 0x33b0 @0xb
0x33a5…33b9 at000c = ╱35╱5╱ // 0x33b1 @0xc
0x33a5…33b9 at000d = ╱fe0000a003╱ // 0x33b2 @0xd
0x33a5…33b9 at0012 = ╱ee╱)╱ // 0x33b7 @0x12
0x33a5…33b9 at0013 = EOL // 0x33b8 @0x13
0x33a5…33b9 }
0x33b9…33d4 c12b 6877 EXEC C(0,C3$,C4$,C3$)
0x33b9…33d4 LineComalBin {
0x33b9…33d4 ptr = 0xc12b // 0x33b9 @0x0
0x33b9…33d4 lno = 0x1add // 0x33bb @0x2
0x33b9…33d4 at0004 = ╱9d╱ EXEC ╱ // 0x33bd @0x4
0x33b9…33d4 at0005 = ╱43╱C╱ // 0x33be @0x5
0x33b9…33d4 at0006 = ╱ed╱(╱ // 0x33bf @0x6
0x33b9…33d4 at0007 = ╱30╱0╱ // 0x33c0 @0x7
0x33b9…33d4 at0008 = ╱fe00000000╱ // 0x33c1 @0x8
0x33b9…33d4 at000d = ╱ec╱,╱ // 0x33c6 @0xd
0x33b9…33d4 at000e = ╱43╱C╱ // 0x33c7 @0xe
0x33b9…33d4 at000f = ╱33╱3╱ // 0x33c8 @0xf
0x33b9…33d4 at0010 = ╱ef╱$╱ // 0x33c9 @0x10
0x33b9…33d4 at0011 = ╱ec╱,╱ // 0x33ca @0x11
0x33b9…33d4 at0012 = ╱43╱C╱ // 0x33cb @0x12
0x33b9…33d4 at0013 = ╱34╱4╱ // 0x33cc @0x13
0x33b9…33d4 at0014 = ╱ef╱$╱ // 0x33cd @0x14
0x33b9…33d4 at0015 = ╱ec╱,╱ // 0x33ce @0x15
0x33b9…33d4 at0016 = ╱43╱C╱ // 0x33cf @0x16
0x33b9…33d4 at0017 = ╱33╱3╱ // 0x33d0 @0x17
0x33b9…33d4 at0018 = ╱ef╱$╱ // 0x33d1 @0x18
0x33b9…33d4 at0019 = ╱ee╱)╱ // 0x33d2 @0x19
0x33b9…33d4 at001a = EOL // 0x33d3 @0x1a
0x33b9…33d4 }
0x33d4…33ee c145 6878 B9$(5)=C3$(G:EL)
0x33d4…33ee LineComalBin {
0x33d4…33ee ptr = 0xc145 // 0x33d4 @0x0
0x33d4…33ee lno = 0x1ade // 0x33d6 @0x2
0x33d4…33ee at0004 = ╱42╱B╱ // 0x33d8 @0x4
0x33d4…33ee at0005 = ╱39╱9╱ // 0x33d9 @0x5
0x33d4…33ee at0006 = ╱ef╱$╱ // 0x33da @0x6
0x33d4…33ee at0007 = ╱ed╱(╱ // 0x33db @0x7
0x33d4…33ee at0008 = ╱35╱5╱ // 0x33dc @0x8
0x33d4…33ee at0009 = ╱fe0000a003╱ // 0x33dd @0x9
0x33d4…33ee at000e = ╱ee╱)╱ // 0x33e2 @0xe
0x33d4…33ee at000f = ╱dc╱=╱ // 0x33e3 @0xf
0x33d4…33ee at0010 = ╱43╱C╱ // 0x33e4 @0x10
0x33d4…33ee at0011 = ╱33╱3╱ // 0x33e5 @0x11
0x33d4…33ee at0012 = ╱ef╱$╱ // 0x33e6 @0x12
0x33d4…33ee at0013 = ╱ed╱(╱ // 0x33e7 @0x13
0x33d4…33ee at0014 = ╱47╱G╱ // 0x33e8 @0x14
0x33d4…33ee at0015 = ╱f0╱:╱ // 0x33e9 @0x15
0x33d4…33ee at0016 = ╱45╱E╱ // 0x33ea @0x16
0x33d4…33ee at0017 = ╱4c╱L╱ // 0x33eb @0x17
0x33d4…33ee at0018 = ╱ee╱)╱ // 0x33ec @0x18
0x33d4…33ee at0019 = EOL // 0x33ed @0x19
0x33d4…33ee }
0x33ee…33f4 c14b 6880 ELSE
0x33ee…33f4 LineComalBin {
0x33ee…33f4 ptr = 0xc14b // 0x33ee @0x0
0x33ee…33f4 lno = 0x1ae0 // 0x33f0 @0x2
0x33ee…33f4 at0004 = ╱9a╱ ELSE ╱ // 0x33f2 @0x4
0x33ee…33f4 at0005 = EOL // 0x33f3 @0x5
0x33ee…33f4 }
0x33f4…3404 c15b 6881 EXEC Z(70)
0x33f4…3404 LineComalBin {
0x33f4…3404 ptr = 0xc15b // 0x33f4 @0x0
0x33f4…3404 lno = 0x1ae1 // 0x33f6 @0x2
0x33f4…3404 at0004 = ╱9d╱ EXEC ╱ // 0x33f8 @0x4
0x33f4…3404 at0005 = ╱5a╱Z╱ // 0x33f9 @0x5
0x33f4…3404 at0006 = ╱ed╱(╱ // 0x33fa @0x6
0x33f4…3404 at0007 = ╱37╱7╱ // 0x33fb @0x7
0x33f4…3404 at0008 = ╱30╱0╱ // 0x33fc @0x8
0x33f4…3404 at0009 = ╱fe00008c07╱ // 0x33fd @0x9
0x33f4…3404 at000e = ╱ee╱)╱ // 0x3402 @0xe
0x33f4…3404 at000f = EOL // 0x3403 @0xf
0x33f4…3404 }
0x3404…3419 c170 6882 C3$=B8$(I,AZ:TI)
0x3404…3419 LineComalBin {
0x3404…3419 ptr = 0xc170 // 0x3404 @0x0
0x3404…3419 lno = 0x1ae2 // 0x3406 @0x2
0x3404…3419 at0004 = ╱43╱C╱ // 0x3408 @0x4
0x3404…3419 at0005 = ╱33╱3╱ // 0x3409 @0x5
0x3404…3419 at0006 = ╱ef╱$╱ // 0x340a @0x6
0x3404…3419 at0007 = ╱dc╱=╱ // 0x340b @0x7
0x3404…3419 at0008 = ╱42╱B╱ // 0x340c @0x8
0x3404…3419 at0009 = ╱38╱8╱ // 0x340d @0x9
0x3404…3419 at000a = ╱ef╱$╱ // 0x340e @0xa
0x3404…3419 at000b = ╱ed╱(╱ // 0x340f @0xb
0x3404…3419 at000c = ╱49╱I╱ // 0x3410 @0xc
0x3404…3419 at000d = ╱ec╱,╱ // 0x3411 @0xd
0x3404…3419 at000e = ╱41╱A╱ // 0x3412 @0xe
0x3404…3419 at000f = ╱5a╱Z╱ // 0x3413 @0xf
0x3404…3419 at0010 = ╱f0╱:╱ // 0x3414 @0x10
0x3404…3419 at0011 = ╱54╱T╱ // 0x3415 @0x11
0x3404…3419 at0012 = ╱49╱I╱ // 0x3416 @0x12
0x3404…3419 at0013 = ╱ee╱)╱ // 0x3417 @0x13
0x3404…3419 at0014 = EOL // 0x3418 @0x14
0x3404…3419 }
0x3419…342d c184 6883 EXEC OP(6,C3$)
0x3419…342d LineComalBin {
0x3419…342d ptr = 0xc184 // 0x3419 @0x0
0x3419…342d lno = 0x1ae3 // 0x341b @0x2
0x3419…342d at0004 = ╱9d╱ EXEC ╱ // 0x341d @0x4
0x3419…342d at0005 = ╱4f╱O╱ // 0x341e @0x5
0x3419…342d at0006 = ╱50╱P╱ // 0x341f @0x6
0x3419…342d at0007 = ╱ed╱(╱ // 0x3420 @0x7
0x3419…342d at0008 = ╱36╱6╱ // 0x3421 @0x8
0x3419…342d at0009 = ╱fe0000c003╱ // 0x3422 @0x9
0x3419…342d at000e = ╱ec╱,╱ // 0x3427 @0xe
0x3419…342d at000f = ╱43╱C╱ // 0x3428 @0xf
0x3419…342d at0010 = ╱33╱3╱ // 0x3429 @0x10
0x3419…342d at0011 = ╱ef╱$╱ // 0x342a @0x11
0x3419…342d at0012 = ╱ee╱)╱ // 0x342b @0x12
0x3419…342d at0013 = EOL // 0x342c @0x13
0x3419…342d }
0x342d…3440 c197 6884 EXEC OPTÆL(J9,C3$)
0x342d…3440 LineComalBin {
0x342d…3440 ptr = 0xc197 // 0x342d @0x0
0x342d…3440 lno = 0x1ae4 // 0x342f @0x2
0x342d…3440 at0004 = ╱9d╱ EXEC ╱ // 0x3431 @0x4
0x342d…3440 at0005 = ╱4f╱O╱ // 0x3432 @0x5
0x342d…3440 at0006 = ╱50╱P╱ // 0x3433 @0x6
0x342d…3440 at0007 = ╱54╱T╱ // 0x3434 @0x7
0x342d…3440 at0008 = ╱5b╱Æ╱ // 0x3435 @0x8
0x342d…3440 at0009 = ╱4c╱L╱ // 0x3436 @0x9
0x342d…3440 at000a = ╱ed╱(╱ // 0x3437 @0xa
0x342d…3440 at000b = ╱4a╱J╱ // 0x3438 @0xb
0x342d…3440 at000c = ╱39╱9╱ // 0x3439 @0xc
0x342d…3440 at000d = ╱ec╱,╱ // 0x343a @0xd
0x342d…3440 at000e = ╱43╱C╱ // 0x343b @0xe
0x342d…3440 at000f = ╱33╱3╱ // 0x343c @0xf
0x342d…3440 at0010 = ╱ef╱$╱ // 0x343d @0x10
0x342d…3440 at0011 = ╱ee╱)╱ // 0x343e @0x11
0x342d…3440 at0012 = EOL // 0x343f @0x12
0x342d…3440 }
0x3440…3466 c1bd 6890 F0$(45,54)=B8$(I,EL:TI)
0x3440…3466 LineComalBin {
0x3440…3466 ptr = 0xc1bd // 0x3440 @0x0
0x3440…3466 lno = 0x1aea // 0x3442 @0x2
0x3440…3466 at0004 = ╱46╱F╱ // 0x3444 @0x4
0x3440…3466 at0005 = ╱30╱0╱ // 0x3445 @0x5
0x3440…3466 at0006 = ╱ef╱$╱ // 0x3446 @0x6
0x3440…3466 at0007 = ╱ed╱(╱ // 0x3447 @0x7
0x3440…3466 at0008 = ╱34╱4╱ // 0x3448 @0x8
0x3440…3466 at0009 = ╱35╱5╱ // 0x3449 @0x9
0x3440…3466 at000a = ╱fe0000b406╱ // 0x344a @0xa
0x3440…3466 at000f = ╱ec╱,╱ // 0x344f @0xf
0x3440…3466 at0010 = ╱35╱5╱ // 0x3450 @0x10
0x3440…3466 at0011 = ╱34╱4╱ // 0x3451 @0x11
0x3440…3466 at0012 = ╱fe0000d806╱ // 0x3452 @0x12
0x3440…3466 at0017 = ╱ee╱)╱ // 0x3457 @0x17
0x3440…3466 at0018 = ╱dc╱=╱ // 0x3458 @0x18
0x3440…3466 at0019 = ╱42╱B╱ // 0x3459 @0x19
0x3440…3466 at001a = ╱38╱8╱ // 0x345a @0x1a
0x3440…3466 at001b = ╱ef╱$╱ // 0x345b @0x1b
0x3440…3466 at001c = ╱ed╱(╱ // 0x345c @0x1c
0x3440…3466 at001d = ╱49╱I╱ // 0x345d @0x1d
0x3440…3466 at001e = ╱ec╱,╱ // 0x345e @0x1e
0x3440…3466 at001f = ╱45╱E╱ // 0x345f @0x1f
0x3440…3466 at0020 = ╱4c╱L╱ // 0x3460 @0x20
0x3440…3466 at0021 = ╱f0╱:╱ // 0x3461 @0x21
0x3440…3466 at0022 = ╱54╱T╱ // 0x3462 @0x22
0x3440…3466 at0023 = ╱49╱I╱ // 0x3463 @0x23
0x3440…3466 at0024 = ╱ee╱)╱ // 0x3464 @0x24
0x3440…3466 at0025 = EOL // 0x3465 @0x25
0x3440…3466 }
0x3466…348b c1e2 6900 F0$(67,75)=B8$(I,AZ:W)
0x3466…348b LineComalBin {
0x3466…348b ptr = 0xc1e2 // 0x3466 @0x0
0x3466…348b lno = 0x1af4 // 0x3468 @0x2
0x3466…348b at0004 = ╱46╱F╱ // 0x346a @0x4
0x3466…348b at0005 = ╱30╱0╱ // 0x346b @0x5
0x3466…348b at0006 = ╱ef╱$╱ // 0x346c @0x6
0x3466…348b at0007 = ╱ed╱(╱ // 0x346d @0x7
0x3466…348b at0008 = ╱36╱6╱ // 0x346e @0x8
0x3466…348b at0009 = ╱37╱7╱ // 0x346f @0x9
0x3466…348b at000a = ╱fe00008607╱ // 0x3470 @0xa
0x3466…348b at000f = ╱ec╱,╱ // 0x3475 @0xf
0x3466…348b at0010 = ╱37╱7╱ // 0x3476 @0x10
0x3466…348b at0011 = ╱35╱5╱ // 0x3477 @0x11
0x3466…348b at0012 = ╱fe00009607╱ // 0x3478 @0x12
0x3466…348b at0017 = ╱ee╱)╱ // 0x347d @0x17
0x3466…348b at0018 = ╱dc╱=╱ // 0x347e @0x18
0x3466…348b at0019 = ╱42╱B╱ // 0x347f @0x19
0x3466…348b at001a = ╱38╱8╱ // 0x3480 @0x1a
0x3466…348b at001b = ╱ef╱$╱ // 0x3481 @0x1b
0x3466…348b at001c = ╱ed╱(╱ // 0x3482 @0x1c
0x3466…348b at001d = ╱49╱I╱ // 0x3483 @0x1d
0x3466…348b at001e = ╱ec╱,╱ // 0x3484 @0x1e
0x3466…348b at001f = ╱41╱A╱ // 0x3485 @0x1f
0x3466…348b at0020 = ╱5a╱Z╱ // 0x3486 @0x20
0x3466…348b at0021 = ╱f0╱:╱ // 0x3487 @0x21
0x3466…348b at0022 = ╱57╱W╱ // 0x3488 @0x22
0x3466…348b at0023 = ╱ee╱)╱ // 0x3489 @0x23
0x3466…348b at0024 = EOL // 0x348a @0x24
0x3466…348b }
0x348b…3491 c1e8 6910 ENDIF
0x348b…3491 LineComalBin {
0x348b…3491 ptr = 0xc1e8 // 0x348b @0x0
0x348b…3491 lno = 0x1afe // 0x348d @0x2
0x348b…3491 at0004 = ╱9b╱ ENDIF ╱ // 0x348f @0x4
0x348b…3491 at0005 = EOL // 0x3490 @0x5
0x348b…3491 }
0x3491…34be c215 6920 F0$(26:6)=B8$(I,5:6)
0x3491…34be LineComalBin {
0x3491…34be ptr = 0xc215 // 0x3491 @0x0
0x3491…34be lno = 0x1b08 // 0x3493 @0x2
0x3491…34be at0004 = ╱46╱F╱ // 0x3495 @0x4
0x3491…34be at0005 = ╱30╱0╱ // 0x3496 @0x5
0x3491…34be at0006 = ╱ef╱$╱ // 0x3497 @0x6
0x3491…34be at0007 = ╱ed╱(╱ // 0x3498 @0x7
0x3491…34be at0008 = ╱32╱2╱ // 0x3499 @0x8
0x3491…34be at0009 = ╱36╱6╱ // 0x349a @0x9
0x3491…34be at000a = ╱fe0000d005╱ // 0x349b @0xa
0x3491…34be at000f = ╱f0╱:╱ // 0x34a0 @0xf
0x3491…34be at0010 = ╱36╱6╱ // 0x34a1 @0x10
0x3491…34be at0011 = ╱fe0000c003╱ // 0x34a2 @0x11
0x3491…34be at0016 = ╱ee╱)╱ // 0x34a7 @0x16
0x3491…34be at0017 = ╱dc╱=╱ // 0x34a8 @0x17
0x3491…34be at0018 = ╱42╱B╱ // 0x34a9 @0x18
0x3491…34be at0019 = ╱38╱8╱ // 0x34aa @0x19
0x3491…34be at001a = ╱ef╱$╱ // 0x34ab @0x1a
0x3491…34be at001b = ╱ed╱(╱ // 0x34ac @0x1b
0x3491…34be at001c = ╱49╱I╱ // 0x34ad @0x1c
0x3491…34be at001d = ╱ec╱,╱ // 0x34ae @0x1d
0x3491…34be at001e = ╱35╱5╱ // 0x34af @0x1e
0x3491…34be at001f = ╱fe0000a003╱ // 0x34b0 @0x1f
0x3491…34be at0024 = ╱f0╱:╱ // 0x34b5 @0x24
0x3491…34be at0025 = ╱36╱6╱ // 0x34b6 @0x25
0x3491…34be at0026 = ╱fe0000c003╱ // 0x34b7 @0x26
0x3491…34be at002b = ╱ee╱)╱ // 0x34bc @0x2b
0x3491…34be at002c = EOL // 0x34bd @0x2c
0x3491…34be }
0x34be…34ed c244 6930 F0$(56,62)=B8$(I,21:7)
0x34be…34ed LineComalBin {
0x34be…34ed ptr = 0xc244 // 0x34be @0x0
0x34be…34ed lno = 0x1b12 // 0x34c0 @0x2
0x34be…34ed at0004 = ╱46╱F╱ // 0x34c2 @0x4
0x34be…34ed at0005 = ╱30╱0╱ // 0x34c3 @0x5
0x34be…34ed at0006 = ╱ef╱$╱ // 0x34c4 @0x6
0x34be…34ed at0007 = ╱ed╱(╱ // 0x34c5 @0x7
0x34be…34ed at0008 = ╱35╱5╱ // 0x34c6 @0x8
0x34be…34ed at0009 = ╱36╱6╱ // 0x34c7 @0x9
0x34be…34ed at000a = ╱fe0000e006╱ // 0x34c8 @0xa
0x34be…34ed at000f = ╱ec╱,╱ // 0x34cd @0xf
0x34be…34ed at0010 = ╱36╱6╱ // 0x34ce @0x10
0x34be…34ed at0011 = ╱32╱2╱ // 0x34cf @0x11
0x34be…34ed at0012 = ╱fe0000f806╱ // 0x34d0 @0x12
0x34be…34ed at0017 = ╱ee╱)╱ // 0x34d5 @0x17
0x34be…34ed at0018 = ╱dc╱=╱ // 0x34d6 @0x18
0x34be…34ed at0019 = ╱42╱B╱ // 0x34d7 @0x19
0x34be…34ed at001a = ╱38╱8╱ // 0x34d8 @0x1a
0x34be…34ed at001b = ╱ef╱$╱ // 0x34d9 @0x1b
0x34be…34ed at001c = ╱ed╱(╱ // 0x34da @0x1c
0x34be…34ed at001d = ╱49╱I╱ // 0x34db @0x1d
0x34be…34ed at001e = ╱ec╱,╱ // 0x34dc @0x1e
0x34be…34ed at001f = ╱32╱2╱ // 0x34dd @0x1f
0x34be…34ed at0020 = ╱31╱1╱ // 0x34de @0x20
0x34be…34ed at0021 = ╱fe0000a805╱ // 0x34df @0x21
0x34be…34ed at0026 = ╱f0╱:╱ // 0x34e4 @0x26
0x34be…34ed at0027 = ╱37╱7╱ // 0x34e5 @0x27
0x34be…34ed at0028 = ╱fe0000e003╱ // 0x34e6 @0x28
0x34be…34ed at002d = ╱ee╱)╱ // 0x34eb @0x2d
0x34be…34ed at002e = EOL // 0x34ec @0x2e
0x34be…34ed }
0x34ed…34f4 c24b 6940 EXEC Å
0x34ed…34f4 LineComalBin {
0x34ed…34f4 ptr = 0xc24b // 0x34ed @0x0
0x34ed…34f4 lno = 0x1b1c // 0x34ef @0x2
0x34ed…34f4 at0004 = ╱9d╱ EXEC ╱ // 0x34f1 @0x4
0x34ed…34f4 at0005 = ╱5d╱Å╱ // 0x34f2 @0x5
0x34ed…34f4 at0006 = EOL // 0x34f3 @0x6
0x34ed…34f4 }
0x34f4…3505 c25c 6950 IF J5=70 THEN
0x34f4…3505 LineComalBin {
0x34f4…3505 ptr = 0xc25c // 0x34f4 @0x0
0x34f4…3505 lno = 0x1b26 // 0x34f6 @0x2
0x34f4…3505 at0004 = ╱9c╱ IF ╱ // 0x34f8 @0x4
0x34f4…3505 at0005 = ╱4a╱J╱ // 0x34f9 @0x5
0x34f4…3505 at0006 = ╱35╱5╱ // 0x34fa @0x6
0x34f4…3505 at0007 = ╱dc╱=╱ // 0x34fb @0x7
0x34f4…3505 at0008 = ╱37╱7╱ // 0x34fc @0x8
0x34f4…3505 at0009 = ╱30╱0╱ // 0x34fd @0x9
0x34f4…3505 at000a = ╱fe00008c07╱ // 0x34fe @0xa
0x34f4…3505 at000f = ╱b6╱ THEN ╱ // 0x3503 @0xf
0x34f4…3505 at0010 = EOL // 0x3504 @0x10
0x34f4…3505 }
0x3505…3515 c26c 6960 EXEC Z(71)
0x3505…3515 LineComalBin {
0x3505…3515 ptr = 0xc26c // 0x3505 @0x0
0x3505…3515 lno = 0x1b30 // 0x3507 @0x2
0x3505…3515 at0004 = ╱9d╱ EXEC ╱ // 0x3509 @0x4
0x3505…3515 at0005 = ╱5a╱Z╱ // 0x350a @0x5
0x3505…3515 at0006 = ╱ed╱(╱ // 0x350b @0x6
0x3505…3515 at0007 = ╱37╱7╱ // 0x350c @0x7
0x3505…3515 at0008 = ╱31╱1╱ // 0x350d @0x8
0x3505…3515 at0009 = ╱fe00008e07╱ // 0x350e @0x9
0x3505…3515 at000e = ╱ee╱)╱ // 0x3513 @0xe
0x3505…3515 at000f = EOL // 0x3514 @0xf
0x3505…3515 }
0x3515…3536 c28d 6970 C3$=B8$(L1-E,21:7)
0x3515…3536 LineComalBin {
0x3515…3536 ptr = 0xc28d // 0x3515 @0x0
0x3515…3536 lno = 0x1b3a // 0x3517 @0x2
0x3515…3536 at0004 = ╱43╱C╱ // 0x3519 @0x4
0x3515…3536 at0005 = ╱33╱3╱ // 0x351a @0x5
0x3515…3536 at0006 = ╱ef╱$╱ // 0x351b @0x6
0x3515…3536 at0007 = ╱dc╱=╱ // 0x351c @0x7
0x3515…3536 at0008 = ╱42╱B╱ // 0x351d @0x8
0x3515…3536 at0009 = ╱38╱8╱ // 0x351e @0x9
0x3515…3536 at000a = ╱ef╱$╱ // 0x351f @0xa
0x3515…3536 at000b = ╱ed╱(╱ // 0x3520 @0xb
0x3515…3536 at000c = ╱4c╱L╱ // 0x3521 @0xc
0x3515…3536 at000d = ╱31╱1╱ // 0x3522 @0xd
0x3515…3536 at000e = ╱e3╱-╱ // 0x3523 @0xe
0x3515…3536 at000f = ╱45╱E╱ // 0x3524 @0xf
0x3515…3536 at0010 = ╱ec╱,╱ // 0x3525 @0x10
0x3515…3536 at0011 = ╱32╱2╱ // 0x3526 @0x11
0x3515…3536 at0012 = ╱31╱1╱ // 0x3527 @0x12
0x3515…3536 at0013 = ╱fe0000a805╱ // 0x3528 @0x13
0x3515…3536 at0018 = ╱f0╱:╱ // 0x352d @0x18
0x3515…3536 at0019 = ╱37╱7╱ // 0x352e @0x19
0x3515…3536 at001a = ╱fe0000e003╱ // 0x352f @0x1a
0x3515…3536 at001f = ╱ee╱)╱ // 0x3534 @0x1f
0x3515…3536 at0020 = EOL // 0x3535 @0x20
0x3515…3536 }
0x3536…354b c2a2 6980 C4$=B8$(I,AZ:TI)
0x3536…354b LineComalBin {
0x3536…354b ptr = 0xc2a2 // 0x3536 @0x0
0x3536…354b lno = 0x1b44 // 0x3538 @0x2
0x3536…354b at0004 = ╱43╱C╱ // 0x353a @0x4
0x3536…354b at0005 = ╱34╱4╱ // 0x353b @0x5
0x3536…354b at0006 = ╱ef╱$╱ // 0x353c @0x6
0x3536…354b at0007 = ╱dc╱=╱ // 0x353d @0x7
0x3536…354b at0008 = ╱42╱B╱ // 0x353e @0x8
0x3536…354b at0009 = ╱38╱8╱ // 0x353f @0x9
0x3536…354b at000a = ╱ef╱$╱ // 0x3540 @0xa
0x3536…354b at000b = ╱ed╱(╱ // 0x3541 @0xb
0x3536…354b at000c = ╱49╱I╱ // 0x3542 @0xc
0x3536…354b at000d = ╱ec╱,╱ // 0x3543 @0xd
0x3536…354b at000e = ╱41╱A╱ // 0x3544 @0xe
0x3536…354b at000f = ╱5a╱Z╱ // 0x3545 @0xf
0x3536…354b at0010 = ╱f0╱:╱ // 0x3546 @0x10
0x3536…354b at0011 = ╱54╱T╱ // 0x3547 @0x11
0x3536…354b at0012 = ╱49╱I╱ // 0x3548 @0x12
0x3536…354b at0013 = ╱ee╱)╱ // 0x3549 @0x13
0x3536…354b at0014 = EOL // 0x354a @0x14
0x3536…354b }
0x354b…3566 c2bd 6990 EXEC C(2,C3$,C4$,F1$)
0x354b…3566 LineComalBin {
0x354b…3566 ptr = 0xc2bd // 0x354b @0x0
0x354b…3566 lno = 0x1b4e // 0x354d @0x2
0x354b…3566 at0004 = ╱9d╱ EXEC ╱ // 0x354f @0x4
0x354b…3566 at0005 = ╱43╱C╱ // 0x3550 @0x5
0x354b…3566 at0006 = ╱ed╱(╱ // 0x3551 @0x6
0x354b…3566 at0007 = ╱32╱2╱ // 0x3552 @0x7
0x354b…3566 at0008 = ╱fe00008002╱ // 0x3553 @0x8
0x354b…3566 at000d = ╱ec╱,╱ // 0x3558 @0xd
0x354b…3566 at000e = ╱43╱C╱ // 0x3559 @0xe
0x354b…3566 at000f = ╱33╱3╱ // 0x355a @0xf
0x354b…3566 at0010 = ╱ef╱$╱ // 0x355b @0x10
0x354b…3566 at0011 = ╱ec╱,╱ // 0x355c @0x11
0x354b…3566 at0012 = ╱43╱C╱ // 0x355d @0x12
0x354b…3566 at0013 = ╱34╱4╱ // 0x355e @0x13
0x354b…3566 at0014 = ╱ef╱$╱ // 0x355f @0x14
0x354b…3566 at0015 = ╱ec╱,╱ // 0x3560 @0x15
0x354b…3566 at0016 = ╱46╱F╱ // 0x3561 @0x16
0x354b…3566 at0017 = ╱31╱1╱ // 0x3562 @0x17
0x354b…3566 at0018 = ╱ef╱$╱ // 0x3563 @0x18
0x354b…3566 at0019 = ╱ee╱)╱ // 0x3564 @0x19
0x354b…3566 at001a = EOL // 0x3565 @0x1a
0x354b…3566 }
0x3566…3581 c2d8 7000 EXEC C(3,F1$,B4$,C3$)
0x3566…3581 LineComalBin {
0x3566…3581 ptr = 0xc2d8 // 0x3566 @0x0
0x3566…3581 lno = 0x1b58 // 0x3568 @0x2
0x3566…3581 at0004 = ╱9d╱ EXEC ╱ // 0x356a @0x4
0x3566…3581 at0005 = ╱43╱C╱ // 0x356b @0x5
0x3566…3581 at0006 = ╱ed╱(╱ // 0x356c @0x6
0x3566…3581 at0007 = ╱33╱3╱ // 0x356d @0x7
0x3566…3581 at0008 = ╱fe0000c002╱ // 0x356e @0x8
0x3566…3581 at000d = ╱ec╱,╱ // 0x3573 @0xd
0x3566…3581 at000e = ╱46╱F╱ // 0x3574 @0xe
0x3566…3581 at000f = ╱31╱1╱ // 0x3575 @0xf
0x3566…3581 at0010 = ╱ef╱$╱ // 0x3576 @0x10
0x3566…3581 at0011 = ╱ec╱,╱ // 0x3577 @0x11
0x3566…3581 at0012 = ╱42╱B╱ // 0x3578 @0x12
0x3566…3581 at0013 = ╱34╱4╱ // 0x3579 @0x13
0x3566…3581 at0014 = ╱ef╱$╱ // 0x357a @0x14
0x3566…3581 at0015 = ╱ec╱,╱ // 0x357b @0x15
0x3566…3581 at0016 = ╱43╱C╱ // 0x357c @0x16
0x3566…3581 at0017 = ╱33╱3╱ // 0x357d @0x17
0x3566…3581 at0018 = ╱ef╱$╱ // 0x357e @0x18
0x3566…3581 at0019 = ╱ee╱)╱ // 0x357f @0x19
0x3566…3581 at001a = EOL // 0x3580 @0x1a
0x3566…3581 }
0x3581…35b3 c30a 7010 F0$(56,62)=B8$(L1-E,21:7)
0x3581…35b3 LineComalBin {
0x3581…35b3 ptr = 0xc30a // 0x3581 @0x0
0x3581…35b3 lno = 0x1b62 // 0x3583 @0x2
0x3581…35b3 at0004 = ╱46╱F╱ // 0x3585 @0x4
0x3581…35b3 at0005 = ╱30╱0╱ // 0x3586 @0x5
0x3581…35b3 at0006 = ╱ef╱$╱ // 0x3587 @0x6
0x3581…35b3 at0007 = ╱ed╱(╱ // 0x3588 @0x7
0x3581…35b3 at0008 = ╱35╱5╱ // 0x3589 @0x8
0x3581…35b3 at0009 = ╱36╱6╱ // 0x358a @0x9
0x3581…35b3 at000a = ╱fe0000e006╱ // 0x358b @0xa
0x3581…35b3 at000f = ╱ec╱,╱ // 0x3590 @0xf
0x3581…35b3 at0010 = ╱36╱6╱ // 0x3591 @0x10
0x3581…35b3 at0011 = ╱32╱2╱ // 0x3592 @0x11
0x3581…35b3 at0012 = ╱fe0000f806╱ // 0x3593 @0x12
0x3581…35b3 at0017 = ╱ee╱)╱ // 0x3598 @0x17
0x3581…35b3 at0018 = ╱dc╱=╱ // 0x3599 @0x18
0x3581…35b3 at0019 = ╱42╱B╱ // 0x359a @0x19
0x3581…35b3 at001a = ╱38╱8╱ // 0x359b @0x1a
0x3581…35b3 at001b = ╱ef╱$╱ // 0x359c @0x1b
0x3581…35b3 at001c = ╱ed╱(╱ // 0x359d @0x1c
0x3581…35b3 at001d = ╱4c╱L╱ // 0x359e @0x1d
0x3581…35b3 at001e = ╱31╱1╱ // 0x359f @0x1e
0x3581…35b3 at001f = ╱e3╱-╱ // 0x35a0 @0x1f
0x3581…35b3 at0020 = ╱45╱E╱ // 0x35a1 @0x20
0x3581…35b3 at0021 = ╱ec╱,╱ // 0x35a2 @0x21
0x3581…35b3 at0022 = ╱32╱2╱ // 0x35a3 @0x22
0x3581…35b3 at0023 = ╱31╱1╱ // 0x35a4 @0x23
0x3581…35b3 at0024 = ╱fe0000a805╱ // 0x35a5 @0x24
0x3581…35b3 at0029 = ╱f0╱:╱ // 0x35aa @0x29
0x3581…35b3 at002a = ╱37╱7╱ // 0x35ab @0x2a
0x3581…35b3 at002b = ╱fe0000e003╱ // 0x35ac @0x2b
0x3581…35b3 at0030 = ╱ee╱)╱ // 0x35b1 @0x30
0x3581…35b3 at0031 = EOL // 0x35b2 @0x31
0x3581…35b3 }
0x35b3…35c7 c31e 7015 C3$(TI,EL)="00"
0x35b3…35c7 LineComalBin {
0x35b3…35c7 ptr = 0xc31e // 0x35b3 @0x0
0x35b3…35c7 lno = 0x1b67 // 0x35b5 @0x2
0x35b3…35c7 at0004 = ╱43╱C╱ // 0x35b7 @0x4
0x35b3…35c7 at0005 = ╱33╱3╱ // 0x35b8 @0x5
0x35b3…35c7 at0006 = ╱ef╱$╱ // 0x35b9 @0x6
0x35b3…35c7 at0007 = ╱ed╱(╱ // 0x35ba @0x7
0x35b3…35c7 at0008 = ╱54╱T╱ // 0x35bb @0x8
0x35b3…35c7 at0009 = ╱49╱I╱ // 0x35bc @0x9
0x35b3…35c7 at000a = ╱ec╱,╱ // 0x35bd @0xa
0x35b3…35c7 at000b = ╱45╱E╱ // 0x35be @0xb
0x35b3…35c7 at000c = ╱4c╱L╱ // 0x35bf @0xc
0x35b3…35c7 at000d = ╱ee╱)╱ // 0x35c0 @0xd
0x35b3…35c7 at000e = ╱dc╱=╱ // 0x35c1 @0xe
0x35b3…35c7 at000f = ╱22╱"╱ // 0x35c2 @0xf
0x35b3…35c7 at0010 = ╱30╱0╱ // 0x35c3 @0x10
0x35b3…35c7 at0011 = ╱30╱0╱ // 0x35c4 @0x11
0x35b3…35c7 at0012 = ╱22╱"╱ // 0x35c5 @0x12
0x35b3…35c7 at0013 = EOL // 0x35c6 @0x13
0x35b3…35c7 }
0x35c7…35e9 c340 7020 F0$(67,75)=C3$(V:W)
0x35c7…35e9 LineComalBin {
0x35c7…35e9 ptr = 0xc340 // 0x35c7 @0x0
0x35c7…35e9 lno = 0x1b6c // 0x35c9 @0x2
0x35c7…35e9 at0004 = ╱46╱F╱ // 0x35cb @0x4
0x35c7…35e9 at0005 = ╱30╱0╱ // 0x35cc @0x5
0x35c7…35e9 at0006 = ╱ef╱$╱ // 0x35cd @0x6
0x35c7…35e9 at0007 = ╱ed╱(╱ // 0x35ce @0x7
0x35c7…35e9 at0008 = ╱36╱6╱ // 0x35cf @0x8
0x35c7…35e9 at0009 = ╱37╱7╱ // 0x35d0 @0x9
0x35c7…35e9 at000a = ╱fe00008607╱ // 0x35d1 @0xa
0x35c7…35e9 at000f = ╱ec╱,╱ // 0x35d6 @0xf
0x35c7…35e9 at0010 = ╱37╱7╱ // 0x35d7 @0x10
0x35c7…35e9 at0011 = ╱35╱5╱ // 0x35d8 @0x11
0x35c7…35e9 at0012 = ╱fe00009607╱ // 0x35d9 @0x12
0x35c7…35e9 at0017 = ╱ee╱)╱ // 0x35de @0x17
0x35c7…35e9 at0018 = ╱dc╱=╱ // 0x35df @0x18
0x35c7…35e9 at0019 = ╱43╱C╱ // 0x35e0 @0x19
0x35c7…35e9 at001a = ╱33╱3╱ // 0x35e1 @0x1a
0x35c7…35e9 at001b = ╱ef╱$╱ // 0x35e2 @0x1b
0x35c7…35e9 at001c = ╱ed╱(╱ // 0x35e3 @0x1c
0x35c7…35e9 at001d = ╱56╱V╱ // 0x35e4 @0x1d
0x35c7…35e9 at001e = ╱f0╱:╱ // 0x35e5 @0x1e
0x35c7…35e9 at001f = ╱57╱W╱ // 0x35e6 @0x1f
0x35c7…35e9 at0020 = ╱ee╱)╱ // 0x35e7 @0x20
0x35c7…35e9 at0021 = EOL // 0x35e8 @0x21
0x35c7…35e9 }
0x35e9…35fe c355 7022 C3$(12)="-"
0x35e9…35fe LineComalBin {
0x35e9…35fe ptr = 0xc355 // 0x35e9 @0x0
0x35e9…35fe lno = 0x1b6e // 0x35eb @0x2
0x35e9…35fe at0004 = ╱43╱C╱ // 0x35ed @0x4
0x35e9…35fe at0005 = ╱33╱3╱ // 0x35ee @0x5
0x35e9…35fe at0006 = ╱ef╱$╱ // 0x35ef @0x6
0x35e9…35fe at0007 = ╱ed╱(╱ // 0x35f0 @0x7
0x35e9…35fe at0008 = ╱31╱1╱ // 0x35f1 @0x8
0x35e9…35fe at0009 = ╱32╱2╱ // 0x35f2 @0x9
0x35e9…35fe at000a = ╱fe0000c004╱ // 0x35f3 @0xa
0x35e9…35fe at000f = ╱ee╱)╱ // 0x35f8 @0xf
0x35e9…35fe at0010 = ╱dc╱=╱ // 0x35f9 @0x10
0x35e9…35fe at0011 = ╱22╱"╱ // 0x35fa @0x11
0x35e9…35fe at0012 = ╱2d╱-╱ // 0x35fb @0x12
0x35e9…35fe at0013 = ╱22╱"╱ // 0x35fc @0x13
0x35e9…35fe at0014 = EOL // 0x35fd @0x14
0x35e9…35fe }
0x35fe…3611 c368 7026 EXEC OPTÆL(J9,C3$)
0x35fe…3611 LineComalBin {
0x35fe…3611 ptr = 0xc368 // 0x35fe @0x0
0x35fe…3611 lno = 0x1b72 // 0x3600 @0x2
0x35fe…3611 at0004 = ╱9d╱ EXEC ╱ // 0x3602 @0x4
0x35fe…3611 at0005 = ╱4f╱O╱ // 0x3603 @0x5
0x35fe…3611 at0006 = ╱50╱P╱ // 0x3604 @0x6
0x35fe…3611 at0007 = ╱54╱T╱ // 0x3605 @0x7
0x35fe…3611 at0008 = ╱5b╱Æ╱ // 0x3606 @0x8
0x35fe…3611 at0009 = ╱4c╱L╱ // 0x3607 @0x9
0x35fe…3611 at000a = ╱ed╱(╱ // 0x3608 @0xa
0x35fe…3611 at000b = ╱4a╱J╱ // 0x3609 @0xb
0x35fe…3611 at000c = ╱39╱9╱ // 0x360a @0xc
0x35fe…3611 at000d = ╱ec╱,╱ // 0x360b @0xd
0x35fe…3611 at000e = ╱43╱C╱ // 0x360c @0xe
0x35fe…3611 at000f = ╱33╱3╱ // 0x360d @0xf
0x35fe…3611 at0010 = ╱ef╱$╱ // 0x360e @0x10
0x35fe…3611 at0011 = ╱ee╱)╱ // 0x360f @0x11
0x35fe…3611 at0012 = EOL // 0x3610 @0x12
0x35fe…3611 }
0x3611…3625 c37c 7027 EXEC OP(7,C3$)
0x3611…3625 LineComalBin {
0x3611…3625 ptr = 0xc37c // 0x3611 @0x0
0x3611…3625 lno = 0x1b73 // 0x3613 @0x2
0x3611…3625 at0004 = ╱9d╱ EXEC ╱ // 0x3615 @0x4
0x3611…3625 at0005 = ╱4f╱O╱ // 0x3616 @0x5
0x3611…3625 at0006 = ╱50╱P╱ // 0x3617 @0x6
0x3611…3625 at0007 = ╱ed╱(╱ // 0x3618 @0x7
0x3611…3625 at0008 = ╱37╱7╱ // 0x3619 @0x8
0x3611…3625 at0009 = ╱fe0000e003╱ // 0x361a @0x9
0x3611…3625 at000e = ╱ec╱,╱ // 0x361f @0xe
0x3611…3625 at000f = ╱43╱C╱ // 0x3620 @0xf
0x3611…3625 at0010 = ╱33╱3╱ // 0x3621 @0x10
0x3611…3625 at0011 = ╱ef╱$╱ // 0x3622 @0x11
0x3611…3625 at0012 = ╱ee╱)╱ // 0x3623 @0x12
0x3611…3625 at0013 = EOL // 0x3624 @0x13
0x3611…3625 }
0x3625…362c c383 7030 EXEC Å
0x3625…362c LineComalBin {
0x3625…362c ptr = 0xc383 // 0x3625 @0x0
0x3625…362c lno = 0x1b76 // 0x3627 @0x2
0x3625…362c at0004 = ╱9d╱ EXEC ╱ // 0x3629 @0x4
0x3625…362c at0005 = ╱5d╱Å╱ // 0x362a @0x5
0x3625…362c at0006 = EOL // 0x362b @0x6
0x3625…362c }
0x362c…3632 c389 7040 ENDIF
0x362c…3632 LineComalBin {
0x362c…3632 ptr = 0xc389 // 0x362c @0x0
0x362c…3632 lno = 0x1b80 // 0x362e @0x2
0x362c…3632 at0004 = ╱9b╱ ENDIF ╱ // 0x3630 @0x4
0x362c…3632 at0005 = EOL // 0x3631 @0x5
0x362c…3632 }
0x3632…3639 c390 7070 NEXT I
0x3632…3639 LineComalBin {
0x3632…3639 ptr = 0xc390 // 0x3632 @0x0
0x3632…3639 lno = 0x1b9e // 0x3634 @0x2
0x3632…3639 at0004 = ╱84╱ NEXT ╱ // 0x3636 @0x4
0x3632…3639 at0005 = ╱49╱I╱ // 0x3637 @0x5
0x3632…3639 at0006 = EOL // 0x3638 @0x6
0x3632…3639 }
0x3639…3664 c3bb 7071 EXEC C(0,B9$(4),B9$(5),C3$)
0x3639…3664 LineComalBin {
0x3639…3664 ptr = 0xc3bb // 0x3639 @0x0
0x3639…3664 lno = 0x1b9f // 0x363b @0x2
0x3639…3664 at0004 = ╱9d╱ EXEC ╱ // 0x363d @0x4
0x3639…3664 at0005 = ╱43╱C╱ // 0x363e @0x5
0x3639…3664 at0006 = ╱ed╱(╱ // 0x363f @0x6
0x3639…3664 at0007 = ╱30╱0╱ // 0x3640 @0x7
0x3639…3664 at0008 = ╱fe00000000╱ // 0x3641 @0x8
0x3639…3664 at000d = ╱ec╱,╱ // 0x3646 @0xd
0x3639…3664 at000e = ╱42╱B╱ // 0x3647 @0xe
0x3639…3664 at000f = ╱39╱9╱ // 0x3648 @0xf
0x3639…3664 at0010 = ╱ef╱$╱ // 0x3649 @0x10
0x3639…3664 at0011 = ╱ed╱(╱ // 0x364a @0x11
0x3639…3664 at0012 = ╱34╱4╱ // 0x364b @0x12
0x3639…3664 at0013 = ╱fe00008003╱ // 0x364c @0x13
0x3639…3664 at0018 = ╱ee╱)╱ // 0x3651 @0x18
0x3639…3664 at0019 = ╱ec╱,╱ // 0x3652 @0x19
0x3639…3664 at001a = ╱42╱B╱ // 0x3653 @0x1a
0x3639…3664 at001b = ╱39╱9╱ // 0x3654 @0x1b
0x3639…3664 at001c = ╱ef╱$╱ // 0x3655 @0x1c
0x3639…3664 at001d = ╱ed╱(╱ // 0x3656 @0x1d
0x3639…3664 at001e = ╱35╱5╱ // 0x3657 @0x1e
0x3639…3664 at001f = ╱fe0000a003╱ // 0x3658 @0x1f
0x3639…3664 at0024 = ╱ee╱)╱ // 0x365d @0x24
0x3639…3664 at0025 = ╱ec╱,╱ // 0x365e @0x25
0x3639…3664 at0026 = ╱43╱C╱ // 0x365f @0x26
0x3639…3664 at0027 = ╱33╱3╱ // 0x3660 @0x27
0x3639…3664 at0028 = ╱ef╱$╱ // 0x3661 @0x28
0x3639…3664 at0029 = ╱ee╱)╱ // 0x3662 @0x29
0x3639…3664 at002a = EOL // 0x3663 @0x2a
0x3639…3664 }
0x3664…3687 c3de 7072 EXEC C(0,B9$(6),C3$,C3$)
0x3664…3687 LineComalBin {
0x3664…3687 ptr = 0xc3de // 0x3664 @0x0
0x3664…3687 lno = 0x1ba0 // 0x3666 @0x2
0x3664…3687 at0004 = ╱9d╱ EXEC ╱ // 0x3668 @0x4
0x3664…3687 at0005 = ╱43╱C╱ // 0x3669 @0x5
0x3664…3687 at0006 = ╱ed╱(╱ // 0x366a @0x6
0x3664…3687 at0007 = ╱30╱0╱ // 0x366b @0x7
0x3664…3687 at0008 = ╱fe00000000╱ // 0x366c @0x8
0x3664…3687 at000d = ╱ec╱,╱ // 0x3671 @0xd
0x3664…3687 at000e = ╱42╱B╱ // 0x3672 @0xe
0x3664…3687 at000f = ╱39╱9╱ // 0x3673 @0xf
0x3664…3687 at0010 = ╱ef╱$╱ // 0x3674 @0x10
0x3664…3687 at0011 = ╱ed╱(╱ // 0x3675 @0x11
0x3664…3687 at0012 = ╱36╱6╱ // 0x3676 @0x12
0x3664…3687 at0013 = ╱fe0000c003╱ // 0x3677 @0x13
0x3664…3687 at0018 = ╱ee╱)╱ // 0x367c @0x18
0x3664…3687 at0019 = ╱ec╱,╱ // 0x367d @0x19
0x3664…3687 at001a = ╱43╱C╱ // 0x367e @0x1a
0x3664…3687 at001b = ╱33╱3╱ // 0x367f @0x1b
0x3664…3687 at001c = ╱ef╱$╱ // 0x3680 @0x1c
0x3664…3687 at001d = ╱ec╱,╱ // 0x3681 @0x1d
0x3664…3687 at001e = ╱43╱C╱ // 0x3682 @0x1e
0x3664…3687 at001f = ╱33╱3╱ // 0x3683 @0x1f
0x3664…3687 at0020 = ╱ef╱$╱ // 0x3684 @0x20
0x3664…3687 at0021 = ╱ee╱)╱ // 0x3685 @0x21
0x3664…3687 at0022 = EOL // 0x3686 @0x22
0x3664…3687 }
0x3687…36af c406 7073 C7$(31,40)=C3$(V,12)
0x3687…36af LineComalBin {
0x3687…36af ptr = 0xc406 // 0x3687 @0x0
0x3687…36af lno = 0x1ba1 // 0x3689 @0x2
0x3687…36af at0004 = ╱43╱C╱ // 0x368b @0x4
0x3687…36af at0005 = ╱37╱7╱ // 0x368c @0x5
0x3687…36af at0006 = ╱ef╱$╱ // 0x368d @0x6
0x3687…36af at0007 = ╱ed╱(╱ // 0x368e @0x7
0x3687…36af at0008 = ╱33╱3╱ // 0x368f @0x8
0x3687…36af at0009 = ╱31╱1╱ // 0x3690 @0x9
0x3687…36af at000a = ╱fe0000f805╱ // 0x3691 @0xa
0x3687…36af at000f = ╱ec╱,╱ // 0x3696 @0xf
0x3687…36af at0010 = ╱34╱4╱ // 0x3697 @0x10
0x3687…36af at0011 = ╱30╱0╱ // 0x3698 @0x11
0x3687…36af at0012 = ╱fe0000a006╱ // 0x3699 @0x12
0x3687…36af at0017 = ╱ee╱)╱ // 0x369e @0x17
0x3687…36af at0018 = ╱dc╱=╱ // 0x369f @0x18
0x3687…36af at0019 = ╱43╱C╱ // 0x36a0 @0x19
0x3687…36af at001a = ╱33╱3╱ // 0x36a1 @0x1a
0x3687…36af at001b = ╱ef╱$╱ // 0x36a2 @0x1b
0x3687…36af at001c = ╱ed╱(╱ // 0x36a3 @0x1c
0x3687…36af at001d = ╱56╱V╱ // 0x36a4 @0x1d
0x3687…36af at001e = ╱ec╱,╱ // 0x36a5 @0x1e
0x3687…36af at001f = ╱31╱1╱ // 0x36a6 @0x1f
0x3687…36af at0020 = ╱32╱2╱ // 0x36a7 @0x20
0x3687…36af at0021 = ╱fe0000c004╱ // 0x36a8 @0x21
0x3687…36af at0026 = ╱ee╱)╱ // 0x36ad @0x26
0x3687…36af at0027 = EOL // 0x36ae @0x27
0x3687…36af }
0x36af…36cb c422 7074 EXEC OP(5,B9$(4))
0x36af…36cb LineComalBin {
0x36af…36cb ptr = 0xc422 // 0x36af @0x0
0x36af…36cb lno = 0x1ba2 // 0x36b1 @0x2
0x36af…36cb at0004 = ╱9d╱ EXEC ╱ // 0x36b3 @0x4
0x36af…36cb at0005 = ╱4f╱O╱ // 0x36b4 @0x5
0x36af…36cb at0006 = ╱50╱P╱ // 0x36b5 @0x6
0x36af…36cb at0007 = ╱ed╱(╱ // 0x36b6 @0x7
0x36af…36cb at0008 = ╱35╱5╱ // 0x36b7 @0x8
0x36af…36cb at0009 = ╱fe0000a003╱ // 0x36b8 @0x9
0x36af…36cb at000e = ╱ec╱,╱ // 0x36bd @0xe
0x36af…36cb at000f = ╱42╱B╱ // 0x36be @0xf
0x36af…36cb at0010 = ╱39╱9╱ // 0x36bf @0x10
0x36af…36cb at0011 = ╱ef╱$╱ // 0x36c0 @0x11
0x36af…36cb at0012 = ╱ed╱(╱ // 0x36c1 @0x12
0x36af…36cb at0013 = ╱34╱4╱ // 0x36c2 @0x13
0x36af…36cb at0014 = ╱fe00008003╱ // 0x36c3 @0x14
0x36af…36cb at0019 = ╱ee╱)╱ // 0x36c8 @0x19
0x36af…36cb at001a = ╱ee╱)╱ // 0x36c9 @0x1a
0x36af…36cb at001b = EOL // 0x36ca @0x1b
0x36af…36cb }
0x36cb…36db c432 7080 EXEC Z(76)
0x36cb…36db LineComalBin {
0x36cb…36db ptr = 0xc432 // 0x36cb @0x0
0x36cb…36db lno = 0x1ba8 // 0x36cd @0x2
0x36cb…36db at0004 = ╱9d╱ EXEC ╱ // 0x36cf @0x4
0x36cb…36db at0005 = ╱5a╱Z╱ // 0x36d0 @0x5
0x36cb…36db at0006 = ╱ed╱(╱ // 0x36d1 @0x6
0x36cb…36db at0007 = ╱37╱7╱ // 0x36d2 @0x7
0x36cb…36db at0008 = ╱36╱6╱ // 0x36d3 @0x8
0x36cb…36db at0009 = ╱fe00009807╱ // 0x36d4 @0x9
0x36cb…36db at000e = ╱ee╱)╱ // 0x36d9 @0xe
0x36cb…36db at000f = EOL // 0x36da @0xf
0x36cb…36db }
0x36db…36ea c441 7090 C3$=B9$(E)
0x36db…36ea LineComalBin {
0x36db…36ea ptr = 0xc441 // 0x36db @0x0
0x36db…36ea lno = 0x1bb2 // 0x36dd @0x2
0x36db…36ea at0004 = ╱43╱C╱ // 0x36df @0x4
0x36db…36ea at0005 = ╱33╱3╱ // 0x36e0 @0x5
0x36db…36ea at0006 = ╱ef╱$╱ // 0x36e1 @0x6
0x36db…36ea at0007 = ╱dc╱=╱ // 0x36e2 @0x7
0x36db…36ea at0008 = ╱42╱B╱ // 0x36e3 @0x8
0x36db…36ea at0009 = ╱39╱9╱ // 0x36e4 @0x9
0x36db…36ea at000a = ╱ef╱$╱ // 0x36e5 @0xa
0x36db…36ea at000b = ╱ed╱(╱ // 0x36e6 @0xb
0x36db…36ea at000c = ╱45╱E╱ // 0x36e7 @0xc
0x36db…36ea at000d = ╱ee╱)╱ // 0x36e8 @0xd
0x36db…36ea at000e = EOL // 0x36e9 @0xe
0x36db…36ea }
0x36ea…3702 c459 7100 EXEC OPTÆL(16,C3$)
0x36ea…3702 LineComalBin {
0x36ea…3702 ptr = 0xc459 // 0x36ea @0x0
0x36ea…3702 lno = 0x1bbc // 0x36ec @0x2
0x36ea…3702 at0004 = ╱9d╱ EXEC ╱ // 0x36ee @0x4
0x36ea…3702 at0005 = ╱4f╱O╱ // 0x36ef @0x5
0x36ea…3702 at0006 = ╱50╱P╱ // 0x36f0 @0x6
0x36ea…3702 at0007 = ╱54╱T╱ // 0x36f1 @0x7
0x36ea…3702 at0008 = ╱5b╱Æ╱ // 0x36f2 @0x8
0x36ea…3702 at0009 = ╱4c╱L╱ // 0x36f3 @0x9
0x36ea…3702 at000a = ╱ed╱(╱ // 0x36f4 @0xa
0x36ea…3702 at000b = ╱31╱1╱ // 0x36f5 @0xb
0x36ea…3702 at000c = ╱36╱6╱ // 0x36f6 @0xc
0x36ea…3702 at000d = ╱fe00008005╱ // 0x36f7 @0xd
0x36ea…3702 at0012 = ╱ec╱,╱ // 0x36fc @0x12
0x36ea…3702 at0013 = ╱43╱C╱ // 0x36fd @0x13
0x36ea…3702 at0014 = ╱33╱3╱ // 0x36fe @0x14
0x36ea…3702 at0015 = ╱ef╱$╱ // 0x36ff @0x15
0x36ea…3702 at0016 = ╱ee╱)╱ // 0x3700 @0x16
0x36ea…3702 at0017 = EOL // 0x3701 @0x17
0x36ea…3702 }
0x3702…3715 c46c 7110 EXEC OPTÆL(EL,C3$)
0x3702…3715 LineComalBin {
0x3702…3715 ptr = 0xc46c // 0x3702 @0x0
0x3702…3715 lno = 0x1bc6 // 0x3704 @0x2
0x3702…3715 at0004 = ╱9d╱ EXEC ╱ // 0x3706 @0x4
0x3702…3715 at0005 = ╱4f╱O╱ // 0x3707 @0x5
0x3702…3715 at0006 = ╱50╱P╱ // 0x3708 @0x6
0x3702…3715 at0007 = ╱54╱T╱ // 0x3709 @0x7
0x3702…3715 at0008 = ╱5b╱Æ╱ // 0x370a @0x8
0x3702…3715 at0009 = ╱4c╱L╱ // 0x370b @0x9
0x3702…3715 at000a = ╱ed╱(╱ // 0x370c @0xa
0x3702…3715 at000b = ╱45╱E╱ // 0x370d @0xb
0x3702…3715 at000c = ╱4c╱L╱ // 0x370e @0xc
0x3702…3715 at000d = ╱ec╱,╱ // 0x370f @0xd
0x3702…3715 at000e = ╱43╱C╱ // 0x3710 @0xe
0x3702…3715 at000f = ╱33╱3╱ // 0x3711 @0xf
0x3702…3715 at0010 = ╱ef╱$╱ // 0x3712 @0x10
0x3702…3715 at0011 = ╱ee╱)╱ // 0x3713 @0x11
0x3702…3715 at0012 = EOL // 0x3714 @0x12
0x3702…3715 }
0x3715…372d c484 7120 EXEC OPTÆL(31,C3$)
0x3715…372d LineComalBin {
0x3715…372d ptr = 0xc484 // 0x3715 @0x0
0x3715…372d lno = 0x1bd0 // 0x3717 @0x2
0x3715…372d at0004 = ╱9d╱ EXEC ╱ // 0x3719 @0x4
0x3715…372d at0005 = ╱4f╱O╱ // 0x371a @0x5
0x3715…372d at0006 = ╱50╱P╱ // 0x371b @0x6
0x3715…372d at0007 = ╱54╱T╱ // 0x371c @0x7
0x3715…372d at0008 = ╱5b╱Æ╱ // 0x371d @0x8
0x3715…372d at0009 = ╱4c╱L╱ // 0x371e @0x9
0x3715…372d at000a = ╱ed╱(╱ // 0x371f @0xa
0x3715…372d at000b = ╱33╱3╱ // 0x3720 @0xb
0x3715…372d at000c = ╱31╱1╱ // 0x3721 @0xc
0x3715…372d at000d = ╱fe0000f805╱ // 0x3722 @0xd
0x3715…372d at0012 = ╱ec╱,╱ // 0x3727 @0x12
0x3715…372d at0013 = ╱43╱C╱ // 0x3728 @0x13
0x3715…372d at0014 = ╱33╱3╱ // 0x3729 @0x14
0x3715…372d at0015 = ╱ef╱$╱ // 0x372a @0x15
0x3715…372d at0016 = ╱ee╱)╱ // 0x372b @0x16
0x3715…372d at0017 = EOL // 0x372c @0x17
0x3715…372d }
0x372d…3753 c4aa 7130 F0$(33,43)=C5$(16)
0x372d…3753 LineComalBin {
0x372d…3753 ptr = 0xc4aa // 0x372d @0x0
0x372d…3753 lno = 0x1bda // 0x372f @0x2
0x372d…3753 at0004 = ╱46╱F╱ // 0x3731 @0x4
0x372d…3753 at0005 = ╱30╱0╱ // 0x3732 @0x5
0x372d…3753 at0006 = ╱ef╱$╱ // 0x3733 @0x6
0x372d…3753 at0007 = ╱ed╱(╱ // 0x3734 @0x7
0x372d…3753 at0008 = ╱33╱3╱ // 0x3735 @0x8
0x372d…3753 at0009 = ╱33╱3╱ // 0x3736 @0x9
0x372d…3753 at000a = ╱fe00008406╱ // 0x3737 @0xa
0x372d…3753 at000f = ╱ec╱,╱ // 0x373c @0xf
0x372d…3753 at0010 = ╱34╱4╱ // 0x373d @0x10
0x372d…3753 at0011 = ╱33╱3╱ // 0x373e @0x11
0x372d…3753 at0012 = ╱fe0000ac06╱ // 0x373f @0x12
0x372d…3753 at0017 = ╱ee╱)╱ // 0x3744 @0x17
0x372d…3753 at0018 = ╱dc╱=╱ // 0x3745 @0x18
0x372d…3753 at0019 = ╱43╱C╱ // 0x3746 @0x19
0x372d…3753 at001a = ╱35╱5╱ // 0x3747 @0x1a
0x372d…3753 at001b = ╱ef╱$╱ // 0x3748 @0x1b
0x372d…3753 at001c = ╱ed╱(╱ // 0x3749 @0x1c
0x372d…3753 at001d = ╱31╱1╱ // 0x374a @0x1d
0x372d…3753 at001e = ╱36╱6╱ // 0x374b @0x1e
0x372d…3753 at001f = ╱fe00008005╱ // 0x374c @0x1f
0x372d…3753 at0024 = ╱ee╱)╱ // 0x3751 @0x24
0x372d…3753 at0025 = EOL // 0x3752 @0x25
0x372d…3753 }
0x3753…3773 c4ca 7140 F0$(44,54)=B9$(E)
0x3753…3773 LineComalBin {
0x3753…3773 ptr = 0xc4ca // 0x3753 @0x0
0x3753…3773 lno = 0x1be4 // 0x3755 @0x2
0x3753…3773 at0004 = ╱46╱F╱ // 0x3757 @0x4
0x3753…3773 at0005 = ╱30╱0╱ // 0x3758 @0x5
0x3753…3773 at0006 = ╱ef╱$╱ // 0x3759 @0x6
0x3753…3773 at0007 = ╱ed╱(╱ // 0x375a @0x7
0x3753…3773 at0008 = ╱34╱4╱ // 0x375b @0x8
0x3753…3773 at0009 = ╱34╱4╱ // 0x375c @0x9
0x3753…3773 at000a = ╱fe0000b006╱ // 0x375d @0xa
0x3753…3773 at000f = ╱ec╱,╱ // 0x3762 @0xf
0x3753…3773 at0010 = ╱35╱5╱ // 0x3763 @0x10
0x3753…3773 at0011 = ╱34╱4╱ // 0x3764 @0x11
0x3753…3773 at0012 = ╱fe0000d806╱ // 0x3765 @0x12
0x3753…3773 at0017 = ╱ee╱)╱ // 0x376a @0x17
0x3753…3773 at0018 = ╱dc╱=╱ // 0x376b @0x18
0x3753…3773 at0019 = ╱42╱B╱ // 0x376c @0x19
0x3753…3773 at001a = ╱39╱9╱ // 0x376d @0x1a
0x3753…3773 at001b = ╱ef╱$╱ // 0x376e @0x1b
0x3753…3773 at001c = ╱ed╱(╱ // 0x376f @0x1c
0x3753…3773 at001d = ╱45╱E╱ // 0x3770 @0x1d
0x3753…3773 at001e = ╱ee╱)╱ // 0x3771 @0x1e
0x3753…3773 at001f = EOL // 0x3772 @0x1f
0x3753…3773 }
0x3773…37a6 c4fd 7150 F0$(56,62)=B9$(8,5:7)
0x3773…37a6 LineComalBin {
0x3773…37a6 ptr = 0xc4fd // 0x3773 @0x0
0x3773…37a6 lno = 0x1bee // 0x3775 @0x2
0x3773…37a6 at0004 = ╱46╱F╱ // 0x3777 @0x4
0x3773…37a6 at0005 = ╱30╱0╱ // 0x3778 @0x5
0x3773…37a6 at0006 = ╱ef╱$╱ // 0x3779 @0x6
0x3773…37a6 at0007 = ╱ed╱(╱ // 0x377a @0x7
0x3773…37a6 at0008 = ╱35╱5╱ // 0x377b @0x8
0x3773…37a6 at0009 = ╱36╱6╱ // 0x377c @0x9
0x3773…37a6 at000a = ╱fe0000e006╱ // 0x377d @0xa
0x3773…37a6 at000f = ╱ec╱,╱ // 0x3782 @0xf
0x3773…37a6 at0010 = ╱36╱6╱ // 0x3783 @0x10
0x3773…37a6 at0011 = ╱32╱2╱ // 0x3784 @0x11
0x3773…37a6 at0012 = ╱fe0000f806╱ // 0x3785 @0x12
0x3773…37a6 at0017 = ╱ee╱)╱ // 0x378a @0x17
0x3773…37a6 at0018 = ╱dc╱=╱ // 0x378b @0x18
0x3773…37a6 at0019 = ╱42╱B╱ // 0x378c @0x19
0x3773…37a6 at001a = ╱39╱9╱ // 0x378d @0x1a
0x3773…37a6 at001b = ╱ef╱$╱ // 0x378e @0x1b
0x3773…37a6 at001c = ╱ed╱(╱ // 0x378f @0x1c
0x3773…37a6 at001d = ╱38╱8╱ // 0x3790 @0x1d
0x3773…37a6 at001e = ╱fe00008004╱ // 0x3791 @0x1e
0x3773…37a6 at0023 = ╱ec╱,╱ // 0x3796 @0x23
0x3773…37a6 at0024 = ╱35╱5╱ // 0x3797 @0x24
0x3773…37a6 at0025 = ╱fe0000a003╱ // 0x3798 @0x25
0x3773…37a6 at002a = ╱f0╱:╱ // 0x379d @0x2a
0x3773…37a6 at002b = ╱37╱7╱ // 0x379e @0x2b
0x3773…37a6 at002c = ╱fe0000e003╱ // 0x379f @0x2c
0x3773…37a6 at0031 = ╱ee╱)╱ // 0x37a4 @0x31
0x3773…37a6 at0032 = EOL // 0x37a5 @0x32
0x3773…37a6 }
0x37a6…37ba c511 7151 C3$=B9$(8)
0x37a6…37ba LineComalBin {
0x37a6…37ba ptr = 0xc511 // 0x37a6 @0x0
0x37a6…37ba lno = 0x1bef // 0x37a8 @0x2
0x37a6…37ba at0004 = ╱43╱C╱ // 0x37aa @0x4
0x37a6…37ba at0005 = ╱33╱3╱ // 0x37ab @0x5
0x37a6…37ba at0006 = ╱ef╱$╱ // 0x37ac @0x6
0x37a6…37ba at0007 = ╱dc╱=╱ // 0x37ad @0x7
0x37a6…37ba at0008 = ╱42╱B╱ // 0x37ae @0x8
0x37a6…37ba at0009 = ╱39╱9╱ // 0x37af @0x9
0x37a6…37ba at000a = ╱ef╱$╱ // 0x37b0 @0xa
0x37a6…37ba at000b = ╱ed╱(╱ // 0x37b1 @0xb
0x37a6…37ba at000c = ╱38╱8╱ // 0x37b2 @0xc
0x37a6…37ba at000d = ╱fe00008004╱ // 0x37b3 @0xd
0x37a6…37ba at0012 = ╱ee╱)╱ // 0x37b8 @0x12
0x37a6…37ba at0013 = EOL // 0x37b9 @0x13
0x37a6…37ba }
0x37ba…37d2 c529 7152 EXEC OPTÆL(30,C3$)
0x37ba…37d2 LineComalBin {
0x37ba…37d2 ptr = 0xc529 // 0x37ba @0x0
0x37ba…37d2 lno = 0x1bf0 // 0x37bc @0x2
0x37ba…37d2 at0004 = ╱9d╱ EXEC ╱ // 0x37be @0x4
0x37ba…37d2 at0005 = ╱4f╱O╱ // 0x37bf @0x5
0x37ba…37d2 at0006 = ╱50╱P╱ // 0x37c0 @0x6
0x37ba…37d2 at0007 = ╱54╱T╱ // 0x37c1 @0x7
0x37ba…37d2 at0008 = ╱5b╱Æ╱ // 0x37c2 @0x8
0x37ba…37d2 at0009 = ╱4c╱L╱ // 0x37c3 @0x9
0x37ba…37d2 at000a = ╱ed╱(╱ // 0x37c4 @0xa
0x37ba…37d2 at000b = ╱33╱3╱ // 0x37c5 @0xb
0x37ba…37d2 at000c = ╱30╱0╱ // 0x37c6 @0xc
0x37ba…37d2 at000d = ╱fe0000f005╱ // 0x37c7 @0xd
0x37ba…37d2 at0012 = ╱ec╱,╱ // 0x37cc @0x12
0x37ba…37d2 at0013 = ╱43╱C╱ // 0x37cd @0x13
0x37ba…37d2 at0014 = ╱33╱3╱ // 0x37ce @0x14
0x37ba…37d2 at0015 = ╱ef╱$╱ // 0x37cf @0x15
0x37ba…37d2 at0016 = ╱ee╱)╱ // 0x37d0 @0x16
0x37ba…37d2 at0017 = EOL // 0x37d1 @0x17
0x37ba…37d2 }
0x37d2…37ea c541 7153 C7$(E,TI)=C3$(G,EL)
0x37d2…37ea LineComalBin {
0x37d2…37ea ptr = 0xc541 // 0x37d2 @0x0
0x37d2…37ea lno = 0x1bf1 // 0x37d4 @0x2
0x37d2…37ea at0004 = ╱43╱C╱ // 0x37d6 @0x4
0x37d2…37ea at0005 = ╱37╱7╱ // 0x37d7 @0x5
0x37d2…37ea at0006 = ╱ef╱$╱ // 0x37d8 @0x6
0x37d2…37ea at0007 = ╱ed╱(╱ // 0x37d9 @0x7
0x37d2…37ea at0008 = ╱45╱E╱ // 0x37da @0x8
0x37d2…37ea at0009 = ╱ec╱,╱ // 0x37db @0x9
0x37d2…37ea at000a = ╱54╱T╱ // 0x37dc @0xa
0x37d2…37ea at000b = ╱49╱I╱ // 0x37dd @0xb
0x37d2…37ea at000c = ╱ee╱)╱ // 0x37de @0xc
0x37d2…37ea at000d = ╱dc╱=╱ // 0x37df @0xd
0x37d2…37ea at000e = ╱43╱C╱ // 0x37e0 @0xe
0x37d2…37ea at000f = ╱33╱3╱ // 0x37e1 @0xf
0x37d2…37ea at0010 = ╱ef╱$╱ // 0x37e2 @0x10
0x37d2…37ea at0011 = ╱ed╱(╱ // 0x37e3 @0x11
0x37d2…37ea at0012 = ╱47╱G╱ // 0x37e4 @0x12
0x37d2…37ea at0013 = ╱ec╱,╱ // 0x37e5 @0x13
0x37d2…37ea at0014 = ╱45╱E╱ // 0x37e6 @0x14
0x37d2…37ea at0015 = ╱4c╱L╱ // 0x37e7 @0x15
0x37d2…37ea at0016 = ╱ee╱)╱ // 0x37e8 @0x16
0x37d2…37ea at0017 = EOL // 0x37e9 @0x17
0x37d2…37ea }
0x37ea…380a c561 7154 C8$(EL,20)=B9$(E,G:TI)
0x37ea…380a LineComalBin {
0x37ea…380a ptr = 0xc561 // 0x37ea @0x0
0x37ea…380a lno = 0x1bf2 // 0x37ec @0x2
0x37ea…380a at0004 = ╱43╱C╱ // 0x37ee @0x4
0x37ea…380a at0005 = ╱38╱8╱ // 0x37ef @0x5
0x37ea…380a at0006 = ╱ef╱$╱ // 0x37f0 @0x6
0x37ea…380a at0007 = ╱ed╱(╱ // 0x37f1 @0x7
0x37ea…380a at0008 = ╱45╱E╱ // 0x37f2 @0x8
0x37ea…380a at0009 = ╱4c╱L╱ // 0x37f3 @0x9
0x37ea…380a at000a = ╱ec╱,╱ // 0x37f4 @0xa
0x37ea…380a at000b = ╱32╱2╱ // 0x37f5 @0xb
0x37ea…380a at000c = ╱30╱0╱ // 0x37f6 @0xc
0x37ea…380a at000d = ╱fe0000a005╱ // 0x37f7 @0xd
0x37ea…380a at0012 = ╱ee╱)╱ // 0x37fc @0x12
0x37ea…380a at0013 = ╱dc╱=╱ // 0x37fd @0x13
0x37ea…380a at0014 = ╱42╱B╱ // 0x37fe @0x14
0x37ea…380a at0015 = ╱39╱9╱ // 0x37ff @0x15
0x37ea…380a at0016 = ╱ef╱$╱ // 0x3800 @0x16
0x37ea…380a at0017 = ╱ed╱(╱ // 0x3801 @0x17
0x37ea…380a at0018 = ╱45╱E╱ // 0x3802 @0x18
0x37ea…380a at0019 = ╱ec╱,╱ // 0x3803 @0x19
0x37ea…380a at001a = ╱47╱G╱ // 0x3804 @0x1a
0x37ea…380a at001b = ╱f0╱:╱ // 0x3805 @0x1b
0x37ea…380a at001c = ╱54╱T╱ // 0x3806 @0x1c
0x37ea…380a at001d = ╱49╱I╱ // 0x3807 @0x1d
0x37ea…380a at001e = ╱ee╱)╱ // 0x3808 @0x1e
0x37ea…380a at001f = EOL // 0x3809 @0x1f
0x37ea…380a }
0x380a…3811 c568 7160 EXEC Å
0x380a…3811 LineComalBin {
0x380a…3811 ptr = 0xc568 // 0x380a @0x0
0x380a…3811 lno = 0x1bf8 // 0x380c @0x2
0x380a…3811 at0004 = ╱9d╱ EXEC ╱ // 0x380e @0x4
0x380a…3811 at0005 = ╱5d╱Å╱ // 0x380f @0x5
0x380a…3811 at0006 = EOL // 0x3810 @0x6
0x380a…3811 }
0x3811…3821 c578 7170 EXEC Z(78)
0x3811…3821 LineComalBin {
0x3811…3821 ptr = 0xc578 // 0x3811 @0x0
0x3811…3821 lno = 0x1c02 // 0x3813 @0x2
0x3811…3821 at0004 = ╱9d╱ EXEC ╱ // 0x3815 @0x4
0x3811…3821 at0005 = ╱5a╱Z╱ // 0x3816 @0x5
0x3811…3821 at0006 = ╱ed╱(╱ // 0x3817 @0x6
0x3811…3821 at0007 = ╱37╱7╱ // 0x3818 @0x7
0x3811…3821 at0008 = ╱38╱8╱ // 0x3819 @0x8
0x3811…3821 at0009 = ╱fe00009c07╱ // 0x381a @0x9
0x3811…3821 at000e = ╱ee╱)╱ // 0x381f @0xe
0x3811…3821 at000f = EOL // 0x3820 @0xf
0x3811…3821 }
0x3821…382d c584 7180 L3=L3+E
0x3821…382d LineComalBin {
0x3821…382d ptr = 0xc584 // 0x3821 @0x0
0x3821…382d lno = 0x1c0c // 0x3823 @0x2
0x3821…382d at0004 = ╱4c╱L╱ // 0x3825 @0x4
0x3821…382d at0005 = ╱33╱3╱ // 0x3826 @0x5
0x3821…382d at0006 = ╱dc╱=╱ // 0x3827 @0x6
0x3821…382d at0007 = ╱4c╱L╱ // 0x3828 @0x7
0x3821…382d at0008 = ╱33╱3╱ // 0x3829 @0x8
0x3821…382d at0009 = ╱e2╱+╱ // 0x382a @0x9
0x3821…382d at000a = ╱45╱E╱ // 0x382b @0xa
0x3821…382d at000b = EOL // 0x382c @0xb
0x3821…382d }
0x382d…384c c5a3 7190 C3$=B8$(L3,21:7)
0x382d…384c LineComalBin {
0x382d…384c ptr = 0xc5a3 // 0x382d @0x0
0x382d…384c lno = 0x1c16 // 0x382f @0x2
0x382d…384c at0004 = ╱43╱C╱ // 0x3831 @0x4
0x382d…384c at0005 = ╱33╱3╱ // 0x3832 @0x5
0x382d…384c at0006 = ╱ef╱$╱ // 0x3833 @0x6
0x382d…384c at0007 = ╱dc╱=╱ // 0x3834 @0x7
0x382d…384c at0008 = ╱42╱B╱ // 0x3835 @0x8
0x382d…384c at0009 = ╱38╱8╱ // 0x3836 @0x9
0x382d…384c at000a = ╱ef╱$╱ // 0x3837 @0xa
0x382d…384c at000b = ╱ed╱(╱ // 0x3838 @0xb
0x382d…384c at000c = ╱4c╱L╱ // 0x3839 @0xc
0x382d…384c at000d = ╱33╱3╱ // 0x383a @0xd
0x382d…384c at000e = ╱ec╱,╱ // 0x383b @0xe
0x382d…384c at000f = ╱32╱2╱ // 0x383c @0xf
0x382d…384c at0010 = ╱31╱1╱ // 0x383d @0x10
0x382d…384c at0011 = ╱fe0000a805╱ // 0x383e @0x11
0x382d…384c at0016 = ╱f0╱:╱ // 0x3843 @0x16
0x382d…384c at0017 = ╱37╱7╱ // 0x3844 @0x17
0x382d…384c at0018 = ╱fe0000e003╱ // 0x3845 @0x18
0x382d…384c at001d = ╱ee╱)╱ // 0x384a @0x1d
0x382d…384c at001e = EOL // 0x384b @0x1e
0x382d…384c }
0x384c…385b c5b2 7200 C4$=B9$(E)
0x384c…385b LineComalBin {
0x384c…385b ptr = 0xc5b2 // 0x384c @0x0
0x384c…385b lno = 0x1c20 // 0x384e @0x2
0x384c…385b at0004 = ╱43╱C╱ // 0x3850 @0x4
0x384c…385b at0005 = ╱34╱4╱ // 0x3851 @0x5
0x384c…385b at0006 = ╱ef╱$╱ // 0x3852 @0x6
0x384c…385b at0007 = ╱dc╱=╱ // 0x3853 @0x7
0x384c…385b at0008 = ╱42╱B╱ // 0x3854 @0x8
0x384c…385b at0009 = ╱39╱9╱ // 0x3855 @0x9
0x384c…385b at000a = ╱ef╱$╱ // 0x3856 @0xa
0x384c…385b at000b = ╱ed╱(╱ // 0x3857 @0xb
0x384c…385b at000c = ╱45╱E╱ // 0x3858 @0xc
0x384c…385b at000d = ╱ee╱)╱ // 0x3859 @0xd
0x384c…385b at000e = EOL // 0x385a @0xe
0x384c…385b }
0x385b…3876 c5cd 7210 EXEC C(2,C3$,C4$,F1$)
0x385b…3876 LineComalBin {
0x385b…3876 ptr = 0xc5cd // 0x385b @0x0
0x385b…3876 lno = 0x1c2a // 0x385d @0x2
0x385b…3876 at0004 = ╱9d╱ EXEC ╱ // 0x385f @0x4
0x385b…3876 at0005 = ╱43╱C╱ // 0x3860 @0x5
0x385b…3876 at0006 = ╱ed╱(╱ // 0x3861 @0x6
0x385b…3876 at0007 = ╱32╱2╱ // 0x3862 @0x7
0x385b…3876 at0008 = ╱fe00008002╱ // 0x3863 @0x8
0x385b…3876 at000d = ╱ec╱,╱ // 0x3868 @0xd
0x385b…3876 at000e = ╱43╱C╱ // 0x3869 @0xe
0x385b…3876 at000f = ╱33╱3╱ // 0x386a @0xf
0x385b…3876 at0010 = ╱ef╱$╱ // 0x386b @0x10
0x385b…3876 at0011 = ╱ec╱,╱ // 0x386c @0x11
0x385b…3876 at0012 = ╱43╱C╱ // 0x386d @0x12
0x385b…3876 at0013 = ╱34╱4╱ // 0x386e @0x13
0x385b…3876 at0014 = ╱ef╱$╱ // 0x386f @0x14
0x385b…3876 at0015 = ╱ec╱,╱ // 0x3870 @0x15
0x385b…3876 at0016 = ╱46╱F╱ // 0x3871 @0x16
0x385b…3876 at0017 = ╱31╱1╱ // 0x3872 @0x17
0x385b…3876 at0018 = ╱ef╱$╱ // 0x3873 @0x18
0x385b…3876 at0019 = ╱ee╱)╱ // 0x3874 @0x19
0x385b…3876 at001a = EOL // 0x3875 @0x1a
0x385b…3876 }
0x3876…3891 c5e8 7220 EXEC C(3,F1$,B4$,C3$)
0x3876…3891 LineComalBin {
0x3876…3891 ptr = 0xc5e8 // 0x3876 @0x0
0x3876…3891 lno = 0x1c34 // 0x3878 @0x2
0x3876…3891 at0004 = ╱9d╱ EXEC ╱ // 0x387a @0x4
0x3876…3891 at0005 = ╱43╱C╱ // 0x387b @0x5
0x3876…3891 at0006 = ╱ed╱(╱ // 0x387c @0x6
0x3876…3891 at0007 = ╱33╱3╱ // 0x387d @0x7
0x3876…3891 at0008 = ╱fe0000c002╱ // 0x387e @0x8
0x3876…3891 at000d = ╱ec╱,╱ // 0x3883 @0xd
0x3876…3891 at000e = ╱46╱F╱ // 0x3884 @0xe
0x3876…3891 at000f = ╱31╱1╱ // 0x3885 @0xf
0x3876…3891 at0010 = ╱ef╱$╱ // 0x3886 @0x10
0x3876…3891 at0011 = ╱ec╱,╱ // 0x3887 @0x11
0x3876…3891 at0012 = ╱42╱B╱ // 0x3888 @0x12
0x3876…3891 at0013 = ╱34╱4╱ // 0x3889 @0x13
0x3876…3891 at0014 = ╱ef╱$╱ // 0x388a @0x14
0x3876…3891 at0015 = ╱ec╱,╱ // 0x388b @0x15
0x3876…3891 at0016 = ╱43╱C╱ // 0x388c @0x16
0x3876…3891 at0017 = ╱33╱3╱ // 0x388d @0x17
0x3876…3891 at0018 = ╱ef╱$╱ // 0x388e @0x18
0x3876…3891 at0019 = ╱ee╱)╱ // 0x388f @0x19
0x3876…3891 at001a = EOL // 0x3890 @0x1a
0x3876…3891 }
0x3891…38a6 c5fd 7225 EXEC OP(15,C3$)
0x3891…38a6 LineComalBin {
0x3891…38a6 ptr = 0xc5fd // 0x3891 @0x0
0x3891…38a6 lno = 0x1c39 // 0x3893 @0x2
0x3891…38a6 at0004 = ╱9d╱ EXEC ╱ // 0x3895 @0x4
0x3891…38a6 at0005 = ╱4f╱O╱ // 0x3896 @0x5
0x3891…38a6 at0006 = ╱50╱P╱ // 0x3897 @0x6
0x3891…38a6 at0007 = ╱ed╱(╱ // 0x3898 @0x7
0x3891…38a6 at0008 = ╱31╱1╱ // 0x3899 @0x8
0x3891…38a6 at0009 = ╱35╱5╱ // 0x389a @0x9
0x3891…38a6 at000a = ╱fe0000f004╱ // 0x389b @0xa
0x3891…38a6 at000f = ╱ec╱,╱ // 0x38a0 @0xf
0x3891…38a6 at0010 = ╱43╱C╱ // 0x38a1 @0x10
0x3891…38a6 at0011 = ╱33╱3╱ // 0x38a2 @0x11
0x3891…38a6 at0012 = ╱ef╱$╱ // 0x38a3 @0x12
0x3891…38a6 at0013 = ╱ee╱)╱ // 0x38a4 @0x13
0x3891…38a6 at0014 = EOL // 0x38a5 @0x14
0x3891…38a6 }
0x38a6…38c9 c620 7230 F0$(45,54)=C3$(V:TI)
0x38a6…38c9 LineComalBin {
0x38a6…38c9 ptr = 0xc620 // 0x38a6 @0x0
0x38a6…38c9 lno = 0x1c3e // 0x38a8 @0x2
0x38a6…38c9 at0004 = ╱46╱F╱ // 0x38aa @0x4
0x38a6…38c9 at0005 = ╱30╱0╱ // 0x38ab @0x5
0x38a6…38c9 at0006 = ╱ef╱$╱ // 0x38ac @0x6
0x38a6…38c9 at0007 = ╱ed╱(╱ // 0x38ad @0x7
0x38a6…38c9 at0008 = ╱34╱4╱ // 0x38ae @0x8
0x38a6…38c9 at0009 = ╱35╱5╱ // 0x38af @0x9
0x38a6…38c9 at000a = ╱fe0000b406╱ // 0x38b0 @0xa
0x38a6…38c9 at000f = ╱ec╱,╱ // 0x38b5 @0xf
0x38a6…38c9 at0010 = ╱35╱5╱ // 0x38b6 @0x10
0x38a6…38c9 at0011 = ╱34╱4╱ // 0x38b7 @0x11
0x38a6…38c9 at0012 = ╱fe0000d806╱ // 0x38b8 @0x12
0x38a6…38c9 at0017 = ╱ee╱)╱ // 0x38bd @0x17
0x38a6…38c9 at0018 = ╱dc╱=╱ // 0x38be @0x18
0x38a6…38c9 at0019 = ╱43╱C╱ // 0x38bf @0x19
0x38a6…38c9 at001a = ╱33╱3╱ // 0x38c0 @0x1a
0x38a6…38c9 at001b = ╱ef╱$╱ // 0x38c1 @0x1b
0x38a6…38c9 at001c = ╱ed╱(╱ // 0x38c2 @0x1c
0x38a6…38c9 at001d = ╱56╱V╱ // 0x38c3 @0x1d
0x38a6…38c9 at001e = ╱f0╱:╱ // 0x38c4 @0x1e
0x38a6…38c9 at001f = ╱54╱T╱ // 0x38c5 @0x1f
0x38a6…38c9 at0020 = ╱49╱I╱ // 0x38c6 @0x20
0x38a6…38c9 at0021 = ╱ee╱)╱ // 0x38c7 @0x21
0x38a6…38c9 at0022 = EOL // 0x38c8 @0x22
0x38a6…38c9 }
0x38c9…38e1 c638 7250 EXEC OPTÆL(20,C3$)
0x38c9…38e1 LineComalBin {
0x38c9…38e1 ptr = 0xc638 // 0x38c9 @0x0
0x38c9…38e1 lno = 0x1c52 // 0x38cb @0x2
0x38c9…38e1 at0004 = ╱9d╱ EXEC ╱ // 0x38cd @0x4
0x38c9…38e1 at0005 = ╱4f╱O╱ // 0x38ce @0x5
0x38c9…38e1 at0006 = ╱50╱P╱ // 0x38cf @0x6
0x38c9…38e1 at0007 = ╱54╱T╱ // 0x38d0 @0x7
0x38c9…38e1 at0008 = ╱5b╱Æ╱ // 0x38d1 @0x8
0x38c9…38e1 at0009 = ╱4c╱L╱ // 0x38d2 @0x9
0x38c9…38e1 at000a = ╱ed╱(╱ // 0x38d3 @0xa
0x38c9…38e1 at000b = ╱32╱2╱ // 0x38d4 @0xb
0x38c9…38e1 at000c = ╱30╱0╱ // 0x38d5 @0xc
0x38c9…38e1 at000d = ╱fe0000a005╱ // 0x38d6 @0xd
0x38c9…38e1 at0012 = ╱ec╱,╱ // 0x38db @0x12
0x38c9…38e1 at0013 = ╱43╱C╱ // 0x38dc @0x13
0x38c9…38e1 at0014 = ╱33╱3╱ // 0x38dd @0x14
0x38c9…38e1 at0015 = ╱ef╱$╱ // 0x38de @0x15
0x38c9…38e1 at0016 = ╱ee╱)╱ // 0x38df @0x16
0x38c9…38e1 at0017 = EOL // 0x38e0 @0x17
0x38c9…38e1 }
0x38e1…38f9 c650 7280 EXEC OPTÆL(14,C3$)
0x38e1…38f9 LineComalBin {
0x38e1…38f9 ptr = 0xc650 // 0x38e1 @0x0
0x38e1…38f9 lno = 0x1c70 // 0x38e3 @0x2
0x38e1…38f9 at0004 = ╱9d╱ EXEC ╱ // 0x38e5 @0x4
0x38e1…38f9 at0005 = ╱4f╱O╱ // 0x38e6 @0x5
0x38e1…38f9 at0006 = ╱50╱P╱ // 0x38e7 @0x6
0x38e1…38f9 at0007 = ╱54╱T╱ // 0x38e8 @0x7
0x38e1…38f9 at0008 = ╱5b╱Æ╱ // 0x38e9 @0x8
0x38e1…38f9 at0009 = ╱4c╱L╱ // 0x38ea @0x9
0x38e1…38f9 at000a = ╱ed╱(╱ // 0x38eb @0xa
0x38e1…38f9 at000b = ╱31╱1╱ // 0x38ec @0xb
0x38e1…38f9 at000c = ╱34╱4╱ // 0x38ed @0xc
0x38e1…38f9 at000d = ╱fe0000e004╱ // 0x38ee @0xd
0x38e1…38f9 at0012 = ╱ec╱,╱ // 0x38f3 @0x12
0x38e1…38f9 at0013 = ╱43╱C╱ // 0x38f4 @0x13
0x38e1…38f9 at0014 = ╱33╱3╱ // 0x38f5 @0x14
0x38e1…38f9 at0015 = ╱ef╱$╱ // 0x38f6 @0x15
0x38e1…38f9 at0016 = ╱ee╱)╱ // 0x38f7 @0x16
0x38e1…38f9 at0017 = EOL // 0x38f8 @0x17
0x38e1…38f9 }
0x38f9…391f c676 7300 F0$(33,43)=C5$(20)
0x38f9…391f LineComalBin {
0x38f9…391f ptr = 0xc676 // 0x38f9 @0x0
0x38f9…391f lno = 0x1c84 // 0x38fb @0x2
0x38f9…391f at0004 = ╱46╱F╱ // 0x38fd @0x4
0x38f9…391f at0005 = ╱30╱0╱ // 0x38fe @0x5
0x38f9…391f at0006 = ╱ef╱$╱ // 0x38ff @0x6
0x38f9…391f at0007 = ╱ed╱(╱ // 0x3900 @0x7
0x38f9…391f at0008 = ╱33╱3╱ // 0x3901 @0x8
0x38f9…391f at0009 = ╱33╱3╱ // 0x3902 @0x9
0x38f9…391f at000a = ╱fe00008406╱ // 0x3903 @0xa
0x38f9…391f at000f = ╱ec╱,╱ // 0x3908 @0xf
0x38f9…391f at0010 = ╱34╱4╱ // 0x3909 @0x10
0x38f9…391f at0011 = ╱33╱3╱ // 0x390a @0x11
0x38f9…391f at0012 = ╱fe0000ac06╱ // 0x390b @0x12
0x38f9…391f at0017 = ╱ee╱)╱ // 0x3910 @0x17
0x38f9…391f at0018 = ╱dc╱=╱ // 0x3911 @0x18
0x38f9…391f at0019 = ╱43╱C╱ // 0x3912 @0x19
0x38f9…391f at001a = ╱35╱5╱ // 0x3913 @0x1a
0x38f9…391f at001b = ╱ef╱$╱ // 0x3914 @0x1b
0x38f9…391f at001c = ╱ed╱(╱ // 0x3915 @0x1c
0x38f9…391f at001d = ╱32╱2╱ // 0x3916 @0x1d
0x38f9…391f at001e = ╱30╱0╱ // 0x3917 @0x1e
0x38f9…391f at001f = ╱fe0000a005╱ // 0x3918 @0x1f
0x38f9…391f at0024 = ╱ee╱)╱ // 0x391d @0x24
0x38f9…391f at0025 = EOL // 0x391e @0x25
0x38f9…391f }
0x391f…394f c6a6 7310 F0$(56,62)=B8$(L3,21:7)
0x391f…394f LineComalBin {
0x391f…394f ptr = 0xc6a6 // 0x391f @0x0
0x391f…394f lno = 0x1c8e // 0x3921 @0x2
0x391f…394f at0004 = ╱46╱F╱ // 0x3923 @0x4
0x391f…394f at0005 = ╱30╱0╱ // 0x3924 @0x5
0x391f…394f at0006 = ╱ef╱$╱ // 0x3925 @0x6
0x391f…394f at0007 = ╱ed╱(╱ // 0x3926 @0x7
0x391f…394f at0008 = ╱35╱5╱ // 0x3927 @0x8
0x391f…394f at0009 = ╱36╱6╱ // 0x3928 @0x9
0x391f…394f at000a = ╱fe0000e006╱ // 0x3929 @0xa
0x391f…394f at000f = ╱ec╱,╱ // 0x392e @0xf
0x391f…394f at0010 = ╱36╱6╱ // 0x392f @0x10
0x391f…394f at0011 = ╱32╱2╱ // 0x3930 @0x11
0x391f…394f at0012 = ╱fe0000f806╱ // 0x3931 @0x12
0x391f…394f at0017 = ╱ee╱)╱ // 0x3936 @0x17
0x391f…394f at0018 = ╱dc╱=╱ // 0x3937 @0x18
0x391f…394f at0019 = ╱42╱B╱ // 0x3938 @0x19
0x391f…394f at001a = ╱38╱8╱ // 0x3939 @0x1a
0x391f…394f at001b = ╱ef╱$╱ // 0x393a @0x1b
0x391f…394f at001c = ╱ed╱(╱ // 0x393b @0x1c
0x391f…394f at001d = ╱4c╱L╱ // 0x393c @0x1d
0x391f…394f at001e = ╱33╱3╱ // 0x393d @0x1e
0x391f…394f at001f = ╱ec╱,╱ // 0x393e @0x1f
0x391f…394f at0020 = ╱32╱2╱ // 0x393f @0x20
0x391f…394f at0021 = ╱31╱1╱ // 0x3940 @0x21
0x391f…394f at0022 = ╱fe0000a805╱ // 0x3941 @0x22
0x391f…394f at0027 = ╱f0╱:╱ // 0x3946 @0x27
0x391f…394f at0028 = ╱37╱7╱ // 0x3947 @0x28
0x391f…394f at0029 = ╱fe0000e003╱ // 0x3948 @0x29
0x391f…394f at002e = ╱ee╱)╱ // 0x394d @0x2e
0x391f…394f at002f = EOL // 0x394e @0x2f
0x391f…394f }
0x394f…3956 c6ad 7320 EXEC Å
0x394f…3956 LineComalBin {
0x394f…3956 ptr = 0xc6ad // 0x394f @0x0
0x394f…3956 lno = 0x1c98 // 0x3951 @0x2
0x394f…3956 at0004 = ╱9d╱ EXEC ╱ // 0x3953 @0x4
0x394f…3956 at0005 = ╱5d╱Å╱ // 0x3954 @0x5
0x394f…3956 at0006 = EOL // 0x3955 @0x6
0x394f…3956 }
0x3956…3962 c6b9 7330 L3=L3+E
0x3956…3962 LineComalBin {
0x3956…3962 ptr = 0xc6b9 // 0x3956 @0x0
0x3956…3962 lno = 0x1ca2 // 0x3958 @0x2
0x3956…3962 at0004 = ╱4c╱L╱ // 0x395a @0x4
0x3956…3962 at0005 = ╱33╱3╱ // 0x395b @0x5
0x3956…3962 at0006 = ╱dc╱=╱ // 0x395c @0x6
0x3956…3962 at0007 = ╱4c╱L╱ // 0x395d @0x7
0x3956…3962 at0008 = ╱33╱3╱ // 0x395e @0x8
0x3956…3962 at0009 = ╱e2╱+╱ // 0x395f @0x9
0x3956…3962 at000a = ╱45╱E╱ // 0x3960 @0xa
0x3956…3962 at000b = EOL // 0x3961 @0xb
0x3956…3962 }
0x3962…397e c6d5 7340 IF B8$(L3,V,4)="79" THEN
0x3962…397e LineComalBin {
0x3962…397e ptr = 0xc6d5 // 0x3962 @0x0
0x3962…397e lno = 0x1cac // 0x3964 @0x2
0x3962…397e at0004 = ╱9c╱ IF ╱ // 0x3966 @0x4
0x3962…397e at0005 = ╱42╱B╱ // 0x3967 @0x5
0x3962…397e at0006 = ╱38╱8╱ // 0x3968 @0x6
0x3962…397e at0007 = ╱ef╱$╱ // 0x3969 @0x7
0x3962…397e at0008 = ╱ed╱(╱ // 0x396a @0x8
0x3962…397e at0009 = ╱4c╱L╱ // 0x396b @0x9
0x3962…397e at000a = ╱33╱3╱ // 0x396c @0xa
0x3962…397e at000b = ╱ec╱,╱ // 0x396d @0xb
0x3962…397e at000c = ╱56╱V╱ // 0x396e @0xc
0x3962…397e at000d = ╱ec╱,╱ // 0x396f @0xd
0x3962…397e at000e = ╱34╱4╱ // 0x3970 @0xe
0x3962…397e at000f = ╱fe00008003╱ // 0x3971 @0xf
0x3962…397e at0014 = ╱ee╱)╱ // 0x3976 @0x14
0x3962…397e at0015 = ╱dc╱=╱ // 0x3977 @0x15
0x3962…397e at0016 = ╱22╱"╱ // 0x3978 @0x16
0x3962…397e at0017 = ╱37╱7╱ // 0x3979 @0x17
0x3962…397e at0018 = ╱39╱9╱ // 0x397a @0x18
0x3962…397e at0019 = ╱22╱"╱ // 0x397b @0x19
0x3962…397e at001a = ╱b6╱ THEN ╱ // 0x397c @0x1a
0x3962…397e at001b = EOL // 0x397d @0x1b
0x3962…397e }
0x397e…399e c6f5 7345 IF D2$(24,25)<"90" THEN
0x397e…399e LineComalBin {
0x397e…399e ptr = 0xc6f5 // 0x397e @0x0
0x397e…399e lno = 0x1cb1 // 0x3980 @0x2
0x397e…399e at0004 = ╱9c╱ IF ╱ // 0x3982 @0x4
0x397e…399e at0005 = ╱44╱D╱ // 0x3983 @0x5
0x397e…399e at0006 = ╱32╱2╱ // 0x3984 @0x6
0x397e…399e at0007 = ╱ef╱$╱ // 0x3985 @0x7
0x397e…399e at0008 = ╱ed╱(╱ // 0x3986 @0x8
0x397e…399e at0009 = ╱32╱2╱ // 0x3987 @0x9
0x397e…399e at000a = ╱34╱4╱ // 0x3988 @0xa
0x397e…399e at000b = ╱fe0000c005╱ // 0x3989 @0xb
0x397e…399e at0010 = ╱ec╱,╱ // 0x398e @0x10
0x397e…399e at0011 = ╱32╱2╱ // 0x398f @0x11
0x397e…399e at0012 = ╱35╱5╱ // 0x3990 @0x12
0x397e…399e at0013 = ╱fe0000c805╱ // 0x3991 @0x13
0x397e…399e at0018 = ╱ee╱)╱ // 0x3996 @0x18
0x397e…399e at0019 = ╱dd╱<╱ // 0x3997 @0x19
0x397e…399e at001a = ╱22╱"╱ // 0x3998 @0x1a
0x397e…399e at001b = ╱39╱9╱ // 0x3999 @0x1b
0x397e…399e at001c = ╱30╱0╱ // 0x399a @0x1c
0x397e…399e at001d = ╱22╱"╱ // 0x399b @0x1d
0x397e…399e at001e = ╱b6╱ THEN ╱ // 0x399c @0x1e
0x397e…399e at001f = EOL // 0x399d @0x1f
0x397e…399e }
0x399e…39ae c705 7350 EXEC Z(79)
0x399e…39ae LineComalBin {
0x399e…39ae ptr = 0xc705 // 0x399e @0x0
0x399e…39ae lno = 0x1cb6 // 0x39a0 @0x2
0x399e…39ae at0004 = ╱9d╱ EXEC ╱ // 0x39a2 @0x4
0x399e…39ae at0005 = ╱5a╱Z╱ // 0x39a3 @0x5
0x399e…39ae at0006 = ╱ed╱(╱ // 0x39a4 @0x6
0x399e…39ae at0007 = ╱37╱7╱ // 0x39a5 @0x7
0x399e…39ae at0008 = ╱39╱9╱ // 0x39a6 @0x8
0x399e…39ae at0009 = ╱fe00009e07╱ // 0x39a7 @0x9
0x399e…39ae at000e = ╱ee╱)╱ // 0x39ac @0xe
0x399e…39ae at000f = EOL // 0x39ad @0xf
0x399e…39ae }
0x39ae…39cd c724 7360 C3$=B8$(L3,21:7)
0x39ae…39cd LineComalBin {
0x39ae…39cd ptr = 0xc724 // 0x39ae @0x0
0x39ae…39cd lno = 0x1cc0 // 0x39b0 @0x2
0x39ae…39cd at0004 = ╱43╱C╱ // 0x39b2 @0x4
0x39ae…39cd at0005 = ╱33╱3╱ // 0x39b3 @0x5
0x39ae…39cd at0006 = ╱ef╱$╱ // 0x39b4 @0x6
0x39ae…39cd at0007 = ╱dc╱=╱ // 0x39b5 @0x7
0x39ae…39cd at0008 = ╱42╱B╱ // 0x39b6 @0x8
0x39ae…39cd at0009 = ╱38╱8╱ // 0x39b7 @0x9
0x39ae…39cd at000a = ╱ef╱$╱ // 0x39b8 @0xa
0x39ae…39cd at000b = ╱ed╱(╱ // 0x39b9 @0xb
0x39ae…39cd at000c = ╱4c╱L╱ // 0x39ba @0xc
0x39ae…39cd at000d = ╱33╱3╱ // 0x39bb @0xd
0x39ae…39cd at000e = ╱ec╱,╱ // 0x39bc @0xe
0x39ae…39cd at000f = ╱32╱2╱ // 0x39bd @0xf
0x39ae…39cd at0010 = ╱31╱1╱ // 0x39be @0x10
0x39ae…39cd at0011 = ╱fe0000a805╱ // 0x39bf @0x11
0x39ae…39cd at0016 = ╱f0╱:╱ // 0x39c4 @0x16
0x39ae…39cd at0017 = ╱37╱7╱ // 0x39c5 @0x17
0x39ae…39cd at0018 = ╱fe0000e003╱ // 0x39c6 @0x18
0x39ae…39cd at001d = ╱ee╱)╱ // 0x39cb @0x1d
0x39ae…39cd at001e = EOL // 0x39cc @0x1e
0x39ae…39cd }
0x39cd…39dc c733 7370 C4$=B9$(E)
0x39cd…39dc LineComalBin {
0x39cd…39dc ptr = 0xc733 // 0x39cd @0x0
0x39cd…39dc lno = 0x1cca // 0x39cf @0x2
0x39cd…39dc at0004 = ╱43╱C╱ // 0x39d1 @0x4
0x39cd…39dc at0005 = ╱34╱4╱ // 0x39d2 @0x5
0x39cd…39dc at0006 = ╱ef╱$╱ // 0x39d3 @0x6
0x39cd…39dc at0007 = ╱dc╱=╱ // 0x39d4 @0x7
0x39cd…39dc at0008 = ╱42╱B╱ // 0x39d5 @0x8
0x39cd…39dc at0009 = ╱39╱9╱ // 0x39d6 @0x9
0x39cd…39dc at000a = ╱ef╱$╱ // 0x39d7 @0xa
0x39cd…39dc at000b = ╱ed╱(╱ // 0x39d8 @0xb
0x39cd…39dc at000c = ╱45╱E╱ // 0x39d9 @0xc
0x39cd…39dc at000d = ╱ee╱)╱ // 0x39da @0xd
0x39cd…39dc at000e = EOL // 0x39db @0xe
0x39cd…39dc }
0x39dc…39f7 c74e 7380 EXEC C(2,C3$,C4$,F1$)
0x39dc…39f7 LineComalBin {
0x39dc…39f7 ptr = 0xc74e // 0x39dc @0x0
0x39dc…39f7 lno = 0x1cd4 // 0x39de @0x2
0x39dc…39f7 at0004 = ╱9d╱ EXEC ╱ // 0x39e0 @0x4
0x39dc…39f7 at0005 = ╱43╱C╱ // 0x39e1 @0x5
0x39dc…39f7 at0006 = ╱ed╱(╱ // 0x39e2 @0x6
0x39dc…39f7 at0007 = ╱32╱2╱ // 0x39e3 @0x7
0x39dc…39f7 at0008 = ╱fe00008002╱ // 0x39e4 @0x8
0x39dc…39f7 at000d = ╱ec╱,╱ // 0x39e9 @0xd
0x39dc…39f7 at000e = ╱43╱C╱ // 0x39ea @0xe
0x39dc…39f7 at000f = ╱33╱3╱ // 0x39eb @0xf
0x39dc…39f7 at0010 = ╱ef╱$╱ // 0x39ec @0x10
0x39dc…39f7 at0011 = ╱ec╱,╱ // 0x39ed @0x11
0x39dc…39f7 at0012 = ╱43╱C╱ // 0x39ee @0x12
0x39dc…39f7 at0013 = ╱34╱4╱ // 0x39ef @0x13
0x39dc…39f7 at0014 = ╱ef╱$╱ // 0x39f0 @0x14
0x39dc…39f7 at0015 = ╱ec╱,╱ // 0x39f1 @0x15
0x39dc…39f7 at0016 = ╱46╱F╱ // 0x39f2 @0x16
0x39dc…39f7 at0017 = ╱31╱1╱ // 0x39f3 @0x17
0x39dc…39f7 at0018 = ╱ef╱$╱ // 0x39f4 @0x18
0x39dc…39f7 at0019 = ╱ee╱)╱ // 0x39f5 @0x19
0x39dc…39f7 at001a = EOL // 0x39f6 @0x1a
0x39dc…39f7 }
0x39f7…3a12 c769 7390 EXEC C(3,F1$,B4$,C3$)
0x39f7…3a12 LineComalBin {
0x39f7…3a12 ptr = 0xc769 // 0x39f7 @0x0
0x39f7…3a12 lno = 0x1cde // 0x39f9 @0x2
0x39f7…3a12 at0004 = ╱9d╱ EXEC ╱ // 0x39fb @0x4
0x39f7…3a12 at0005 = ╱43╱C╱ // 0x39fc @0x5
0x39f7…3a12 at0006 = ╱ed╱(╱ // 0x39fd @0x6
0x39f7…3a12 at0007 = ╱33╱3╱ // 0x39fe @0x7
0x39f7…3a12 at0008 = ╱fe0000c002╱ // 0x39ff @0x8
0x39f7…3a12 at000d = ╱ec╱,╱ // 0x3a04 @0xd
0x39f7…3a12 at000e = ╱46╱F╱ // 0x3a05 @0xe
0x39f7…3a12 at000f = ╱31╱1╱ // 0x3a06 @0xf
0x39f7…3a12 at0010 = ╱ef╱$╱ // 0x3a07 @0x10
0x39f7…3a12 at0011 = ╱ec╱,╱ // 0x3a08 @0x11
0x39f7…3a12 at0012 = ╱42╱B╱ // 0x3a09 @0x12
0x39f7…3a12 at0013 = ╱34╱4╱ // 0x3a0a @0x13
0x39f7…3a12 at0014 = ╱ef╱$╱ // 0x3a0b @0x14
0x39f7…3a12 at0015 = ╱ec╱,╱ // 0x3a0c @0x15
0x39f7…3a12 at0016 = ╱43╱C╱ // 0x3a0d @0x16
0x39f7…3a12 at0017 = ╱33╱3╱ // 0x3a0e @0x17
0x39f7…3a12 at0018 = ╱ef╱$╱ // 0x3a0f @0x18
0x39f7…3a12 at0019 = ╱ee╱)╱ // 0x3a10 @0x19
0x39f7…3a12 at001a = EOL // 0x3a11 @0x1a
0x39f7…3a12 }
0x3a12…3a27 c77e 7395 EXEC OP(16,C3$)
0x3a12…3a27 LineComalBin {
0x3a12…3a27 ptr = 0xc77e // 0x3a12 @0x0
0x3a12…3a27 lno = 0x1ce3 // 0x3a14 @0x2
0x3a12…3a27 at0004 = ╱9d╱ EXEC ╱ // 0x3a16 @0x4
0x3a12…3a27 at0005 = ╱4f╱O╱ // 0x3a17 @0x5
0x3a12…3a27 at0006 = ╱50╱P╱ // 0x3a18 @0x6
0x3a12…3a27 at0007 = ╱ed╱(╱ // 0x3a19 @0x7
0x3a12…3a27 at0008 = ╱31╱1╱ // 0x3a1a @0x8
0x3a12…3a27 at0009 = ╱36╱6╱ // 0x3a1b @0x9
0x3a12…3a27 at000a = ╱fe00008005╱ // 0x3a1c @0xa
0x3a12…3a27 at000f = ╱ec╱,╱ // 0x3a21 @0xf
0x3a12…3a27 at0010 = ╱43╱C╱ // 0x3a22 @0x10
0x3a12…3a27 at0011 = ╱33╱3╱ // 0x3a23 @0x11
0x3a12…3a27 at0012 = ╱ef╱$╱ // 0x3a24 @0x12
0x3a12…3a27 at0013 = ╱ee╱)╱ // 0x3a25 @0x13
0x3a12…3a27 at0014 = EOL // 0x3a26 @0x14
0x3a12…3a27 }
0x3a27…3a4a c7a1 7400 F0$(45,54)=C3$(V:TI)
0x3a27…3a4a LineComalBin {
0x3a27…3a4a ptr = 0xc7a1 // 0x3a27 @0x0
0x3a27…3a4a lno = 0x1ce8 // 0x3a29 @0x2
0x3a27…3a4a at0004 = ╱46╱F╱ // 0x3a2b @0x4
0x3a27…3a4a at0005 = ╱30╱0╱ // 0x3a2c @0x5
0x3a27…3a4a at0006 = ╱ef╱$╱ // 0x3a2d @0x6
0x3a27…3a4a at0007 = ╱ed╱(╱ // 0x3a2e @0x7
0x3a27…3a4a at0008 = ╱34╱4╱ // 0x3a2f @0x8
0x3a27…3a4a at0009 = ╱35╱5╱ // 0x3a30 @0x9
0x3a27…3a4a at000a = ╱fe0000b406╱ // 0x3a31 @0xa
0x3a27…3a4a at000f = ╱ec╱,╱ // 0x3a36 @0xf
0x3a27…3a4a at0010 = ╱35╱5╱ // 0x3a37 @0x10
0x3a27…3a4a at0011 = ╱34╱4╱ // 0x3a38 @0x11
0x3a27…3a4a at0012 = ╱fe0000d806╱ // 0x3a39 @0x12
0x3a27…3a4a at0017 = ╱ee╱)╱ // 0x3a3e @0x17
0x3a27…3a4a at0018 = ╱dc╱=╱ // 0x3a3f @0x18
0x3a27…3a4a at0019 = ╱43╱C╱ // 0x3a40 @0x19
0x3a27…3a4a at001a = ╱33╱3╱ // 0x3a41 @0x1a
0x3a27…3a4a at001b = ╱ef╱$╱ // 0x3a42 @0x1b
0x3a27…3a4a at001c = ╱ed╱(╱ // 0x3a43 @0x1c
0x3a27…3a4a at001d = ╱56╱V╱ // 0x3a44 @0x1d
0x3a27…3a4a at001e = ╱f0╱:╱ // 0x3a45 @0x1e
0x3a27…3a4a at001f = ╱54╱T╱ // 0x3a46 @0x1f
0x3a27…3a4a at0020 = ╱49╱I╱ // 0x3a47 @0x20
0x3a27…3a4a at0021 = ╱ee╱)╱ // 0x3a48 @0x21
0x3a27…3a4a at0022 = EOL // 0x3a49 @0x22
0x3a27…3a4a }
0x3a4a…3a62 c7b9 7420 EXEC OPTÆL(15,C3$)
0x3a4a…3a62 LineComalBin {
0x3a4a…3a62 ptr = 0xc7b9 // 0x3a4a @0x0
0x3a4a…3a62 lno = 0x1cfc // 0x3a4c @0x2
0x3a4a…3a62 at0004 = ╱9d╱ EXEC ╱ // 0x3a4e @0x4
0x3a4a…3a62 at0005 = ╱4f╱O╱ // 0x3a4f @0x5
0x3a4a…3a62 at0006 = ╱50╱P╱ // 0x3a50 @0x6
0x3a4a…3a62 at0007 = ╱54╱T╱ // 0x3a51 @0x7
0x3a4a…3a62 at0008 = ╱5b╱Æ╱ // 0x3a52 @0x8
0x3a4a…3a62 at0009 = ╱4c╱L╱ // 0x3a53 @0x9
0x3a4a…3a62 at000a = ╱ed╱(╱ // 0x3a54 @0xa
0x3a4a…3a62 at000b = ╱31╱1╱ // 0x3a55 @0xb
0x3a4a…3a62 at000c = ╱35╱5╱ // 0x3a56 @0xc
0x3a4a…3a62 at000d = ╱fe0000f004╱ // 0x3a57 @0xd
0x3a4a…3a62 at0012 = ╱ec╱,╱ // 0x3a5c @0x12
0x3a4a…3a62 at0013 = ╱43╱C╱ // 0x3a5d @0x13
0x3a4a…3a62 at0014 = ╱33╱3╱ // 0x3a5e @0x14
0x3a4a…3a62 at0015 = ╱ef╱$╱ // 0x3a5f @0x15
0x3a4a…3a62 at0016 = ╱ee╱)╱ // 0x3a60 @0x16
0x3a4a…3a62 at0017 = EOL // 0x3a61 @0x17
0x3a4a…3a62 }
0x3a62…3a7a c7d1 7450 EXEC OPTÆL(23,C3$)
0x3a62…3a7a LineComalBin {
0x3a62…3a7a ptr = 0xc7d1 // 0x3a62 @0x0
0x3a62…3a7a lno = 0x1d1a // 0x3a64 @0x2
0x3a62…3a7a at0004 = ╱9d╱ EXEC ╱ // 0x3a66 @0x4
0x3a62…3a7a at0005 = ╱4f╱O╱ // 0x3a67 @0x5
0x3a62…3a7a at0006 = ╱50╱P╱ // 0x3a68 @0x6
0x3a62…3a7a at0007 = ╱54╱T╱ // 0x3a69 @0x7
0x3a62…3a7a at0008 = ╱5b╱Æ╱ // 0x3a6a @0x8
0x3a62…3a7a at0009 = ╱4c╱L╱ // 0x3a6b @0x9
0x3a62…3a7a at000a = ╱ed╱(╱ // 0x3a6c @0xa
0x3a62…3a7a at000b = ╱32╱2╱ // 0x3a6d @0xb
0x3a62…3a7a at000c = ╱33╱3╱ // 0x3a6e @0xc
0x3a62…3a7a at000d = ╱fe0000b805╱ // 0x3a6f @0xd
0x3a62…3a7a at0012 = ╱ec╱,╱ // 0x3a74 @0x12
0x3a62…3a7a at0013 = ╱43╱C╱ // 0x3a75 @0x13
0x3a62…3a7a at0014 = ╱33╱3╱ // 0x3a76 @0x14
0x3a62…3a7a at0015 = ╱ef╱$╱ // 0x3a77 @0x15
0x3a62…3a7a at0016 = ╱ee╱)╱ // 0x3a78 @0x16
0x3a62…3a7a at0017 = EOL // 0x3a79 @0x17
0x3a62…3a7a }
0x3a7a…3a8f c7e6 7470 C3$=C5$(26)
0x3a7a…3a8f LineComalBin {
0x3a7a…3a8f ptr = 0xc7e6 // 0x3a7a @0x0
0x3a7a…3a8f lno = 0x1d2e // 0x3a7c @0x2
0x3a7a…3a8f at0004 = ╱43╱C╱ // 0x3a7e @0x4
0x3a7a…3a8f at0005 = ╱33╱3╱ // 0x3a7f @0x5
0x3a7a…3a8f at0006 = ╱ef╱$╱ // 0x3a80 @0x6
0x3a7a…3a8f at0007 = ╱dc╱=╱ // 0x3a81 @0x7
0x3a7a…3a8f at0008 = ╱43╱C╱ // 0x3a82 @0x8
0x3a7a…3a8f at0009 = ╱35╱5╱ // 0x3a83 @0x9
0x3a7a…3a8f at000a = ╱ef╱$╱ // 0x3a84 @0xa
0x3a7a…3a8f at000b = ╱ed╱(╱ // 0x3a85 @0xb
0x3a7a…3a8f at000c = ╱32╱2╱ // 0x3a86 @0xc
0x3a7a…3a8f at000d = ╱36╱6╱ // 0x3a87 @0xd
0x3a7a…3a8f at000e = ╱fe0000d005╱ // 0x3a88 @0xe
0x3a7a…3a8f at0013 = ╱ee╱)╱ // 0x3a8d @0x13
0x3a7a…3a8f at0014 = EOL // 0x3a8e @0x14
0x3a7a…3a8f }
0x3a8f…3aaa c801 7480 EXEC C(1,F1$,C3$,C4$)
0x3a8f…3aaa LineComalBin {
0x3a8f…3aaa ptr = 0xc801 // 0x3a8f @0x0
0x3a8f…3aaa lno = 0x1d38 // 0x3a91 @0x2
0x3a8f…3aaa at0004 = ╱9d╱ EXEC ╱ // 0x3a93 @0x4
0x3a8f…3aaa at0005 = ╱43╱C╱ // 0x3a94 @0x5
0x3a8f…3aaa at0006 = ╱ed╱(╱ // 0x3a95 @0x6
0x3a8f…3aaa at0007 = ╱31╱1╱ // 0x3a96 @0x7
0x3a8f…3aaa at0008 = ╱fe00008001╱ // 0x3a97 @0x8
0x3a8f…3aaa at000d = ╱ec╱,╱ // 0x3a9c @0xd
0x3a8f…3aaa at000e = ╱46╱F╱ // 0x3a9d @0xe
0x3a8f…3aaa at000f = ╱31╱1╱ // 0x3a9e @0xf
0x3a8f…3aaa at0010 = ╱ef╱$╱ // 0x3a9f @0x10
0x3a8f…3aaa at0011 = ╱ec╱,╱ // 0x3aa0 @0x11
0x3a8f…3aaa at0012 = ╱43╱C╱ // 0x3aa1 @0x12
0x3a8f…3aaa at0013 = ╱33╱3╱ // 0x3aa2 @0x13
0x3a8f…3aaa at0014 = ╱ef╱$╱ // 0x3aa3 @0x14
0x3a8f…3aaa at0015 = ╱ec╱,╱ // 0x3aa4 @0x15
0x3a8f…3aaa at0016 = ╱43╱C╱ // 0x3aa5 @0x16
0x3a8f…3aaa at0017 = ╱34╱4╱ // 0x3aa6 @0x17
0x3a8f…3aaa at0018 = ╱ef╱$╱ // 0x3aa7 @0x18
0x3a8f…3aaa at0019 = ╱ee╱)╱ // 0x3aa8 @0x19
0x3a8f…3aaa at001a = EOL // 0x3aa9 @0x1a
0x3a8f…3aaa }
0x3aaa…3acd c824 7490 F0$(33,43)=C4$(G:EL)
0x3aaa…3acd LineComalBin {
0x3aaa…3acd ptr = 0xc824 // 0x3aaa @0x0
0x3aaa…3acd lno = 0x1d42 // 0x3aac @0x2
0x3aaa…3acd at0004 = ╱46╱F╱ // 0x3aae @0x4
0x3aaa…3acd at0005 = ╱30╱0╱ // 0x3aaf @0x5
0x3aaa…3acd at0006 = ╱ef╱$╱ // 0x3ab0 @0x6
0x3aaa…3acd at0007 = ╱ed╱(╱ // 0x3ab1 @0x7
0x3aaa…3acd at0008 = ╱33╱3╱ // 0x3ab2 @0x8
0x3aaa…3acd at0009 = ╱33╱3╱ // 0x3ab3 @0x9
0x3aaa…3acd at000a = ╱fe00008406╱ // 0x3ab4 @0xa
0x3aaa…3acd at000f = ╱ec╱,╱ // 0x3ab9 @0xf
0x3aaa…3acd at0010 = ╱34╱4╱ // 0x3aba @0x10
0x3aaa…3acd at0011 = ╱33╱3╱ // 0x3abb @0x11
0x3aaa…3acd at0012 = ╱fe0000ac06╱ // 0x3abc @0x12
0x3aaa…3acd at0017 = ╱ee╱)╱ // 0x3ac1 @0x17
0x3aaa…3acd at0018 = ╱dc╱=╱ // 0x3ac2 @0x18
0x3aaa…3acd at0019 = ╱43╱C╱ // 0x3ac3 @0x19
0x3aaa…3acd at001a = ╱34╱4╱ // 0x3ac4 @0x1a
0x3aaa…3acd at001b = ╱ef╱$╱ // 0x3ac5 @0x1b
0x3aaa…3acd at001c = ╱ed╱(╱ // 0x3ac6 @0x1c
0x3aaa…3acd at001d = ╱47╱G╱ // 0x3ac7 @0x1d
0x3aaa…3acd at001e = ╱f0╱:╱ // 0x3ac8 @0x1e
0x3aaa…3acd at001f = ╱45╱E╱ // 0x3ac9 @0x1f
0x3aaa…3acd at0020 = ╱4c╱L╱ // 0x3aca @0x20
0x3aaa…3acd at0021 = ╱ee╱)╱ // 0x3acb @0x21
0x3aaa…3acd at0022 = EOL // 0x3acc @0x22
0x3aaa…3acd }
0x3acd…3afd c854 7500 F0$(56,62)=B8$(L3,21:7)
0x3acd…3afd LineComalBin {
0x3acd…3afd ptr = 0xc854 // 0x3acd @0x0
0x3acd…3afd lno = 0x1d4c // 0x3acf @0x2
0x3acd…3afd at0004 = ╱46╱F╱ // 0x3ad1 @0x4
0x3acd…3afd at0005 = ╱30╱0╱ // 0x3ad2 @0x5
0x3acd…3afd at0006 = ╱ef╱$╱ // 0x3ad3 @0x6
0x3acd…3afd at0007 = ╱ed╱(╱ // 0x3ad4 @0x7
0x3acd…3afd at0008 = ╱35╱5╱ // 0x3ad5 @0x8
0x3acd…3afd at0009 = ╱36╱6╱ // 0x3ad6 @0x9
0x3acd…3afd at000a = ╱fe0000e006╱ // 0x3ad7 @0xa
0x3acd…3afd at000f = ╱ec╱,╱ // 0x3adc @0xf
0x3acd…3afd at0010 = ╱36╱6╱ // 0x3add @0x10
0x3acd…3afd at0011 = ╱32╱2╱ // 0x3ade @0x11
0x3acd…3afd at0012 = ╱fe0000f806╱ // 0x3adf @0x12
0x3acd…3afd at0017 = ╱ee╱)╱ // 0x3ae4 @0x17
0x3acd…3afd at0018 = ╱dc╱=╱ // 0x3ae5 @0x18
0x3acd…3afd at0019 = ╱42╱B╱ // 0x3ae6 @0x19
0x3acd…3afd at001a = ╱38╱8╱ // 0x3ae7 @0x1a
0x3acd…3afd at001b = ╱ef╱$╱ // 0x3ae8 @0x1b
0x3acd…3afd at001c = ╱ed╱(╱ // 0x3ae9 @0x1c
0x3acd…3afd at001d = ╱4c╱L╱ // 0x3aea @0x1d
0x3acd…3afd at001e = ╱33╱3╱ // 0x3aeb @0x1e
0x3acd…3afd at001f = ╱ec╱,╱ // 0x3aec @0x1f
0x3acd…3afd at0020 = ╱32╱2╱ // 0x3aed @0x20
0x3acd…3afd at0021 = ╱31╱1╱ // 0x3aee @0x21
0x3acd…3afd at0022 = ╱fe0000a805╱ // 0x3aef @0x22
0x3acd…3afd at0027 = ╱f0╱:╱ // 0x3af4 @0x27
0x3acd…3afd at0028 = ╱37╱7╱ // 0x3af5 @0x28
0x3acd…3afd at0029 = ╱fe0000e003╱ // 0x3af6 @0x29
0x3acd…3afd at002e = ╱ee╱)╱ // 0x3afb @0x2e
0x3acd…3afd at002f = EOL // 0x3afc @0x2f
0x3acd…3afd }
0x3afd…3b04 c85b 7510 EXEC Å
0x3afd…3b04 LineComalBin {
0x3afd…3b04 ptr = 0xc85b // 0x3afd @0x0
0x3afd…3b04 lno = 0x1d56 // 0x3aff @0x2
0x3afd…3b04 at0004 = ╱9d╱ EXEC ╱ // 0x3b01 @0x4
0x3afd…3b04 at0005 = ╱5d╱Å╱ // 0x3b02 @0x5
0x3afd…3b04 at0006 = EOL // 0x3b03 @0x6
0x3afd…3b04 }
0x3b04…3b0a c861 7515 ENDIF
0x3b04…3b0a LineComalBin {
0x3b04…3b0a ptr = 0xc861 // 0x3b04 @0x0
0x3b04…3b0a lno = 0x1d5b // 0x3b06 @0x2
0x3b04…3b0a at0004 = ╱9b╱ ENDIF ╱ // 0x3b08 @0x4
0x3b04…3b0a at0005 = EOL // 0x3b09 @0x5
0x3b04…3b0a }
0x3b0a…3b16 c86d 7520 L3=L3+E
0x3b0a…3b16 LineComalBin {
0x3b0a…3b16 ptr = 0xc86d // 0x3b0a @0x0
0x3b0a…3b16 lno = 0x1d60 // 0x3b0c @0x2
0x3b0a…3b16 at0004 = ╱4c╱L╱ // 0x3b0e @0x4
0x3b0a…3b16 at0005 = ╱33╱3╱ // 0x3b0f @0x5
0x3b0a…3b16 at0006 = ╱dc╱=╱ // 0x3b10 @0x6
0x3b0a…3b16 at0007 = ╱4c╱L╱ // 0x3b11 @0x7
0x3b0a…3b16 at0008 = ╱33╱3╱ // 0x3b12 @0x8
0x3b0a…3b16 at0009 = ╱e2╱+╱ // 0x3b13 @0x9
0x3b0a…3b16 at000a = ╱45╱E╱ // 0x3b14 @0xa
0x3b0a…3b16 at000b = EOL // 0x3b15 @0xb
0x3b0a…3b16 }
0x3b16…3b1c c873 7530 ENDIF
0x3b16…3b1c LineComalBin {
0x3b16…3b1c ptr = 0xc873 // 0x3b16 @0x0
0x3b16…3b1c lno = 0x1d6a // 0x3b18 @0x2
0x3b16…3b1c at0004 = ╱9b╱ ENDIF ╱ // 0x3b1a @0x4
0x3b16…3b1c at0005 = EOL // 0x3b1b @0x5
0x3b16…3b1c }
0x3b1c…3b2c c883 7540 EXEC Z(80)
0x3b1c…3b2c LineComalBin {
0x3b1c…3b2c ptr = 0xc883 // 0x3b1c @0x0
0x3b1c…3b2c lno = 0x1d74 // 0x3b1e @0x2
0x3b1c…3b2c at0004 = ╱9d╱ EXEC ╱ // 0x3b20 @0x4
0x3b1c…3b2c at0005 = ╱5a╱Z╱ // 0x3b21 @0x5
0x3b1c…3b2c at0006 = ╱ed╱(╱ // 0x3b22 @0x6
0x3b1c…3b2c at0007 = ╱38╱8╱ // 0x3b23 @0x7
0x3b1c…3b2c at0008 = ╱30╱0╱ // 0x3b24 @0x8
0x3b1c…3b2c at0009 = ╱fe0000a007╱ // 0x3b25 @0x9
0x3b1c…3b2c at000e = ╱ee╱)╱ // 0x3b2a @0xe
0x3b1c…3b2c at000f = EOL // 0x3b2b @0xf
0x3b1c…3b2c }
0x3b2c…3b42 c899 7560 C3$=B8$(L3,AZ:TI)
0x3b2c…3b42 LineComalBin {
0x3b2c…3b42 ptr = 0xc899 // 0x3b2c @0x0
0x3b2c…3b42 lno = 0x1d88 // 0x3b2e @0x2
0x3b2c…3b42 at0004 = ╱43╱C╱ // 0x3b30 @0x4
0x3b2c…3b42 at0005 = ╱33╱3╱ // 0x3b31 @0x5
0x3b2c…3b42 at0006 = ╱ef╱$╱ // 0x3b32 @0x6
0x3b2c…3b42 at0007 = ╱dc╱=╱ // 0x3b33 @0x7
0x3b2c…3b42 at0008 = ╱42╱B╱ // 0x3b34 @0x8
0x3b2c…3b42 at0009 = ╱38╱8╱ // 0x3b35 @0x9
0x3b2c…3b42 at000a = ╱ef╱$╱ // 0x3b36 @0xa
0x3b2c…3b42 at000b = ╱ed╱(╱ // 0x3b37 @0xb
0x3b2c…3b42 at000c = ╱4c╱L╱ // 0x3b38 @0xc
0x3b2c…3b42 at000d = ╱33╱3╱ // 0x3b39 @0xd
0x3b2c…3b42 at000e = ╱ec╱,╱ // 0x3b3a @0xe
0x3b2c…3b42 at000f = ╱41╱A╱ // 0x3b3b @0xf
0x3b2c…3b42 at0010 = ╱5a╱Z╱ // 0x3b3c @0x10
0x3b2c…3b42 at0011 = ╱f0╱:╱ // 0x3b3d @0x11
0x3b2c…3b42 at0012 = ╱54╱T╱ // 0x3b3e @0x12
0x3b2c…3b42 at0013 = ╱49╱I╱ // 0x3b3f @0x13
0x3b2c…3b42 at0014 = ╱ee╱)╱ // 0x3b40 @0x14
0x3b2c…3b42 at0015 = EOL // 0x3b41 @0x15
0x3b2c…3b42 }
0x3b42…3b5a c8b1 7565 C7$(EL,20)=C3$
0x3b42…3b5a LineComalBin {
0x3b42…3b5a ptr = 0xc8b1 // 0x3b42 @0x0
0x3b42…3b5a lno = 0x1d8d // 0x3b44 @0x2
0x3b42…3b5a at0004 = ╱43╱C╱ // 0x3b46 @0x4
0x3b42…3b5a at0005 = ╱37╱7╱ // 0x3b47 @0x5
0x3b42…3b5a at0006 = ╱ef╱$╱ // 0x3b48 @0x6
0x3b42…3b5a at0007 = ╱ed╱(╱ // 0x3b49 @0x7
0x3b42…3b5a at0008 = ╱45╱E╱ // 0x3b4a @0x8
0x3b42…3b5a at0009 = ╱4c╱L╱ // 0x3b4b @0x9
0x3b42…3b5a at000a = ╱ec╱,╱ // 0x3b4c @0xa
0x3b42…3b5a at000b = ╱32╱2╱ // 0x3b4d @0xb
0x3b42…3b5a at000c = ╱30╱0╱ // 0x3b4e @0xc
0x3b42…3b5a at000d = ╱fe0000a005╱ // 0x3b4f @0xd
0x3b42…3b5a at0012 = ╱ee╱)╱ // 0x3b54 @0x12
0x3b42…3b5a at0013 = ╱dc╱=╱ // 0x3b55 @0x13
0x3b42…3b5a at0014 = ╱43╱C╱ // 0x3b56 @0x14
0x3b42…3b5a at0015 = ╱33╱3╱ // 0x3b57 @0x15
0x3b42…3b5a at0016 = ╱ef╱$╱ // 0x3b58 @0x16
0x3b42…3b5a at0017 = EOL // 0x3b59 @0x17
0x3b42…3b5a }
0x3b5a…3b72 c8c9 7570 EXEC OPTÆL(43,C3$)
0x3b5a…3b72 LineComalBin {
0x3b5a…3b72 ptr = 0xc8c9 // 0x3b5a @0x0
0x3b5a…3b72 lno = 0x1d92 // 0x3b5c @0x2
0x3b5a…3b72 at0004 = ╱9d╱ EXEC ╱ // 0x3b5e @0x4
0x3b5a…3b72 at0005 = ╱4f╱O╱ // 0x3b5f @0x5
0x3b5a…3b72 at0006 = ╱50╱P╱ // 0x3b60 @0x6
0x3b5a…3b72 at0007 = ╱54╱T╱ // 0x3b61 @0x7
0x3b5a…3b72 at0008 = ╱5b╱Æ╱ // 0x3b62 @0x8
0x3b5a…3b72 at0009 = ╱4c╱L╱ // 0x3b63 @0x9
0x3b5a…3b72 at000a = ╱ed╱(╱ // 0x3b64 @0xa
0x3b5a…3b72 at000b = ╱34╱4╱ // 0x3b65 @0xb
0x3b5a…3b72 at000c = ╱33╱3╱ // 0x3b66 @0xc
0x3b5a…3b72 at000d = ╱fe0000ac06╱ // 0x3b67 @0xd
0x3b5a…3b72 at0012 = ╱ec╱,╱ // 0x3b6c @0x12
0x3b5a…3b72 at0013 = ╱43╱C╱ // 0x3b6d @0x13
0x3b5a…3b72 at0014 = ╱33╱3╱ // 0x3b6e @0x14
0x3b5a…3b72 at0015 = ╱ef╱$╱ // 0x3b6f @0x15
0x3b5a…3b72 at0016 = ╱ee╱)╱ // 0x3b70 @0x16
0x3b5a…3b72 at0017 = EOL // 0x3b71 @0x17
0x3b5a…3b72 }
0x3b72…3b98 c8ef 7590 F0$(33,43)=C5$(43)
0x3b72…3b98 LineComalBin {
0x3b72…3b98 ptr = 0xc8ef // 0x3b72 @0x0
0x3b72…3b98 lno = 0x1da6 // 0x3b74 @0x2
0x3b72…3b98 at0004 = ╱46╱F╱ // 0x3b76 @0x4
0x3b72…3b98 at0005 = ╱30╱0╱ // 0x3b77 @0x5
0x3b72…3b98 at0006 = ╱ef╱$╱ // 0x3b78 @0x6
0x3b72…3b98 at0007 = ╱ed╱(╱ // 0x3b79 @0x7
0x3b72…3b98 at0008 = ╱33╱3╱ // 0x3b7a @0x8
0x3b72…3b98 at0009 = ╱33╱3╱ // 0x3b7b @0x9
0x3b72…3b98 at000a = ╱fe00008406╱ // 0x3b7c @0xa
0x3b72…3b98 at000f = ╱ec╱,╱ // 0x3b81 @0xf
0x3b72…3b98 at0010 = ╱34╱4╱ // 0x3b82 @0x10
0x3b72…3b98 at0011 = ╱33╱3╱ // 0x3b83 @0x11
0x3b72…3b98 at0012 = ╱fe0000ac06╱ // 0x3b84 @0x12
0x3b72…3b98 at0017 = ╱ee╱)╱ // 0x3b89 @0x17
0x3b72…3b98 at0018 = ╱dc╱=╱ // 0x3b8a @0x18
0x3b72…3b98 at0019 = ╱43╱C╱ // 0x3b8b @0x19
0x3b72…3b98 at001a = ╱35╱5╱ // 0x3b8c @0x1a
0x3b72…3b98 at001b = ╱ef╱$╱ // 0x3b8d @0x1b
0x3b72…3b98 at001c = ╱ed╱(╱ // 0x3b8e @0x1c
0x3b72…3b98 at001d = ╱34╱4╱ // 0x3b8f @0x1d
0x3b72…3b98 at001e = ╱33╱3╱ // 0x3b90 @0x1e
0x3b72…3b98 at001f = ╱fe0000ac06╱ // 0x3b91 @0x1f
0x3b72…3b98 at0024 = ╱ee╱)╱ // 0x3b96 @0x24
0x3b72…3b98 at0025 = EOL // 0x3b97 @0x25
0x3b72…3b98 }
0x3b98…3bbf c916 7600 F0$(45,54)=B8$(L3,EL:TI)
0x3b98…3bbf LineComalBin {
0x3b98…3bbf ptr = 0xc916 // 0x3b98 @0x0
0x3b98…3bbf lno = 0x1db0 // 0x3b9a @0x2
0x3b98…3bbf at0004 = ╱46╱F╱ // 0x3b9c @0x4
0x3b98…3bbf at0005 = ╱30╱0╱ // 0x3b9d @0x5
0x3b98…3bbf at0006 = ╱ef╱$╱ // 0x3b9e @0x6
0x3b98…3bbf at0007 = ╱ed╱(╱ // 0x3b9f @0x7
0x3b98…3bbf at0008 = ╱34╱4╱ // 0x3ba0 @0x8
0x3b98…3bbf at0009 = ╱35╱5╱ // 0x3ba1 @0x9
0x3b98…3bbf at000a = ╱fe0000b406╱ // 0x3ba2 @0xa
0x3b98…3bbf at000f = ╱ec╱,╱ // 0x3ba7 @0xf
0x3b98…3bbf at0010 = ╱35╱5╱ // 0x3ba8 @0x10
0x3b98…3bbf at0011 = ╱34╱4╱ // 0x3ba9 @0x11
0x3b98…3bbf at0012 = ╱fe0000d806╱ // 0x3baa @0x12
0x3b98…3bbf at0017 = ╱ee╱)╱ // 0x3baf @0x17
0x3b98…3bbf at0018 = ╱dc╱=╱ // 0x3bb0 @0x18
0x3b98…3bbf at0019 = ╱42╱B╱ // 0x3bb1 @0x19
0x3b98…3bbf at001a = ╱38╱8╱ // 0x3bb2 @0x1a
0x3b98…3bbf at001b = ╱ef╱$╱ // 0x3bb3 @0x1b
0x3b98…3bbf at001c = ╱ed╱(╱ // 0x3bb4 @0x1c
0x3b98…3bbf at001d = ╱4c╱L╱ // 0x3bb5 @0x1d
0x3b98…3bbf at001e = ╱33╱3╱ // 0x3bb6 @0x1e
0x3b98…3bbf at001f = ╱ec╱,╱ // 0x3bb7 @0x1f
0x3b98…3bbf at0020 = ╱45╱E╱ // 0x3bb8 @0x20
0x3b98…3bbf at0021 = ╱4c╱L╱ // 0x3bb9 @0x21
0x3b98…3bbf at0022 = ╱f0╱:╱ // 0x3bba @0x22
0x3b98…3bbf at0023 = ╱54╱T╱ // 0x3bbb @0x23
0x3b98…3bbf at0024 = ╱49╱I╱ // 0x3bbc @0x24
0x3b98…3bbf at0025 = ╱ee╱)╱ // 0x3bbd @0x25
0x3b98…3bbf at0026 = EOL // 0x3bbe @0x26
0x3b98…3bbf }
0x3bbf…3bef c946 7610 F0$(56,62)=B8$(L3,21:7)
0x3bbf…3bef LineComalBin {
0x3bbf…3bef ptr = 0xc946 // 0x3bbf @0x0
0x3bbf…3bef lno = 0x1dba // 0x3bc1 @0x2
0x3bbf…3bef at0004 = ╱46╱F╱ // 0x3bc3 @0x4
0x3bbf…3bef at0005 = ╱30╱0╱ // 0x3bc4 @0x5
0x3bbf…3bef at0006 = ╱ef╱$╱ // 0x3bc5 @0x6
0x3bbf…3bef at0007 = ╱ed╱(╱ // 0x3bc6 @0x7
0x3bbf…3bef at0008 = ╱35╱5╱ // 0x3bc7 @0x8
0x3bbf…3bef at0009 = ╱36╱6╱ // 0x3bc8 @0x9
0x3bbf…3bef at000a = ╱fe0000e006╱ // 0x3bc9 @0xa
0x3bbf…3bef at000f = ╱ec╱,╱ // 0x3bce @0xf
0x3bbf…3bef at0010 = ╱36╱6╱ // 0x3bcf @0x10
0x3bbf…3bef at0011 = ╱32╱2╱ // 0x3bd0 @0x11
0x3bbf…3bef at0012 = ╱fe0000f806╱ // 0x3bd1 @0x12
0x3bbf…3bef at0017 = ╱ee╱)╱ // 0x3bd6 @0x17
0x3bbf…3bef at0018 = ╱dc╱=╱ // 0x3bd7 @0x18
0x3bbf…3bef at0019 = ╱42╱B╱ // 0x3bd8 @0x19
0x3bbf…3bef at001a = ╱38╱8╱ // 0x3bd9 @0x1a
0x3bbf…3bef at001b = ╱ef╱$╱ // 0x3bda @0x1b
0x3bbf…3bef at001c = ╱ed╱(╱ // 0x3bdb @0x1c
0x3bbf…3bef at001d = ╱4c╱L╱ // 0x3bdc @0x1d
0x3bbf…3bef at001e = ╱33╱3╱ // 0x3bdd @0x1e
0x3bbf…3bef at001f = ╱ec╱,╱ // 0x3bde @0x1f
0x3bbf…3bef at0020 = ╱32╱2╱ // 0x3bdf @0x20
0x3bbf…3bef at0021 = ╱31╱1╱ // 0x3be0 @0x21
0x3bbf…3bef at0022 = ╱fe0000a805╱ // 0x3be1 @0x22
0x3bbf…3bef at0027 = ╱f0╱:╱ // 0x3be6 @0x27
0x3bbf…3bef at0028 = ╱37╱7╱ // 0x3be7 @0x28
0x3bbf…3bef at0029 = ╱fe0000e003╱ // 0x3be8 @0x29
0x3bbf…3bef at002e = ╱ee╱)╱ // 0x3bed @0x2e
0x3bbf…3bef at002f = EOL // 0x3bee @0x2f
0x3bbf…3bef }
0x3bef…3c15 c96c 7620 F0$(71,79)=B8$(L3,AZ:W)
0x3bef…3c15 LineComalBin {
0x3bef…3c15 ptr = 0xc96c // 0x3bef @0x0
0x3bef…3c15 lno = 0x1dc4 // 0x3bf1 @0x2
0x3bef…3c15 at0004 = ╱46╱F╱ // 0x3bf3 @0x4
0x3bef…3c15 at0005 = ╱30╱0╱ // 0x3bf4 @0x5
0x3bef…3c15 at0006 = ╱ef╱$╱ // 0x3bf5 @0x6
0x3bef…3c15 at0007 = ╱ed╱(╱ // 0x3bf6 @0x7
0x3bef…3c15 at0008 = ╱37╱7╱ // 0x3bf7 @0x8
0x3bef…3c15 at0009 = ╱31╱1╱ // 0x3bf8 @0x9
0x3bef…3c15 at000a = ╱fe00008e07╱ // 0x3bf9 @0xa
0x3bef…3c15 at000f = ╱ec╱,╱ // 0x3bfe @0xf
0x3bef…3c15 at0010 = ╱37╱7╱ // 0x3bff @0x10
0x3bef…3c15 at0011 = ╱39╱9╱ // 0x3c00 @0x11
0x3bef…3c15 at0012 = ╱fe00009e07╱ // 0x3c01 @0x12
0x3bef…3c15 at0017 = ╱ee╱)╱ // 0x3c06 @0x17
0x3bef…3c15 at0018 = ╱dc╱=╱ // 0x3c07 @0x18
0x3bef…3c15 at0019 = ╱42╱B╱ // 0x3c08 @0x19
0x3bef…3c15 at001a = ╱38╱8╱ // 0x3c09 @0x1a
0x3bef…3c15 at001b = ╱ef╱$╱ // 0x3c0a @0x1b
0x3bef…3c15 at001c = ╱ed╱(╱ // 0x3c0b @0x1c
0x3bef…3c15 at001d = ╱4c╱L╱ // 0x3c0c @0x1d
0x3bef…3c15 at001e = ╱33╱3╱ // 0x3c0d @0x1e
0x3bef…3c15 at001f = ╱ec╱,╱ // 0x3c0e @0x1f
0x3bef…3c15 at0020 = ╱41╱A╱ // 0x3c0f @0x20
0x3bef…3c15 at0021 = ╱5a╱Z╱ // 0x3c10 @0x21
0x3bef…3c15 at0022 = ╱f0╱:╱ // 0x3c11 @0x22
0x3bef…3c15 at0023 = ╱57╱W╱ // 0x3c12 @0x23
0x3bef…3c15 at0024 = ╱ee╱)╱ // 0x3c13 @0x24
0x3bef…3c15 at0025 = EOL // 0x3c14 @0x25
0x3bef…3c15 }
0x3c15…3c1c c973 7630 EXEC Å
0x3c15…3c1c LineComalBin {
0x3c15…3c1c ptr = 0xc973 // 0x3c15 @0x0
0x3c15…3c1c lno = 0x1dce // 0x3c17 @0x2
0x3c15…3c1c at0004 = ╱9d╱ EXEC ╱ // 0x3c19 @0x4
0x3c15…3c1c at0005 = ╱5d╱Å╱ // 0x3c1a @0x5
0x3c15…3c1c at0006 = EOL // 0x3c1b @0x6
0x3c15…3c1c }
0x3c1c…3c28 c97f 7640 L3=L3+E
0x3c1c…3c28 LineComalBin {
0x3c1c…3c28 ptr = 0xc97f // 0x3c1c @0x0
0x3c1c…3c28 lno = 0x1dd8 // 0x3c1e @0x2
0x3c1c…3c28 at0004 = ╱4c╱L╱ // 0x3c20 @0x4
0x3c1c…3c28 at0005 = ╱33╱3╱ // 0x3c21 @0x5
0x3c1c…3c28 at0006 = ╱dc╱=╱ // 0x3c22 @0x6
0x3c1c…3c28 at0007 = ╱4c╱L╱ // 0x3c23 @0x7
0x3c1c…3c28 at0008 = ╱33╱3╱ // 0x3c24 @0x8
0x3c1c…3c28 at0009 = ╱e2╱+╱ // 0x3c25 @0x9
0x3c1c…3c28 at000a = ╱45╱E╱ // 0x3c26 @0xa
0x3c1c…3c28 at000b = EOL // 0x3c27 @0xb
0x3c1c…3c28 }
0x3c28…3c38 (200,) c98f 7650 EXEC Z(82)
0x3c28…3c38 LineComalBin {
0x3c28…3c38 ptr = 0xc98f // 0x3c28 @0x0
0x3c28…3c38 lno = 0x1de2 // 0x3c2a @0x2
0x3c28…3c38 at0004 = ╱9d╱ EXEC ╱ // 0x3c2c @0x4
0x3c28…3c38 at0005 = ╱5a╱Z╱ // 0x3c2d @0x5
0x3c28…3c38 at0006 = ╱ed╱(╱ // 0x3c2e @0x6
0x3c28…3c38 at0007 = ╱38╱8╱ // 0x3c2f @0x7
0x3c28…3c38 at0008 = ╱32╱2╱ // 0x3c30 @0x8
0x3c28…3c38 at0009 = ╱fe0000a407╱ // 0x3c31 @0x9
0x3c28…3c38 at000e = ╱ee╱)╱ // 0x3c36 @0xe
0x3c28…3c38 at000f = EOL // 0x3c37 @0xf
0x3c28…3c38 }
0x3c38…3c47 c99e 7660 C3$=B9$(G)
0x3c38…3c47 LineComalBin {
0x3c38…3c47 ptr = 0xc99e // 0x3c38 @0x0
0x3c38…3c47 lno = 0x1dec // 0x3c3a @0x2
0x3c38…3c47 at0004 = ╱43╱C╱ // 0x3c3c @0x4
0x3c38…3c47 at0005 = ╱33╱3╱ // 0x3c3d @0x5
0x3c38…3c47 at0006 = ╱ef╱$╱ // 0x3c3e @0x6
0x3c38…3c47 at0007 = ╱dc╱=╱ // 0x3c3f @0x7
0x3c38…3c47 at0008 = ╱42╱B╱ // 0x3c40 @0x8
0x3c38…3c47 at0009 = ╱39╱9╱ // 0x3c41 @0x9
0x3c38…3c47 at000a = ╱ef╱$╱ // 0x3c42 @0xa
0x3c38…3c47 at000b = ╱ed╱(╱ // 0x3c43 @0xb
0x3c38…3c47 at000c = ╱47╱G╱ // 0x3c44 @0xc
0x3c38…3c47 at000d = ╱ee╱)╱ // 0x3c45 @0xd
0x3c38…3c47 at000e = EOL // 0x3c46 @0xe
0x3c38…3c47 }
0x3c47…3c5f c9b6 7680 EXEC OPTÆL(34,C3$)
0x3c47…3c5f LineComalBin {
0x3c47…3c5f ptr = 0xc9b6 // 0x3c47 @0x0
0x3c47…3c5f lno = 0x1e00 // 0x3c49 @0x2
0x3c47…3c5f at0004 = ╱9d╱ EXEC ╱ // 0x3c4b @0x4
0x3c47…3c5f at0005 = ╱4f╱O╱ // 0x3c4c @0x5
0x3c47…3c5f at0006 = ╱50╱P╱ // 0x3c4d @0x6
0x3c47…3c5f at0007 = ╱54╱T╱ // 0x3c4e @0x7
0x3c47…3c5f at0008 = ╱5b╱Æ╱ // 0x3c4f @0x8
0x3c47…3c5f at0009 = ╱4c╱L╱ // 0x3c50 @0x9
0x3c47…3c5f at000a = ╱ed╱(╱ // 0x3c51 @0xa
0x3c47…3c5f at000b = ╱33╱3╱ // 0x3c52 @0xb
0x3c47…3c5f at000c = ╱34╱4╱ // 0x3c53 @0xc
0x3c47…3c5f at000d = ╱fe00008806╱ // 0x3c54 @0xd
0x3c47…3c5f at0012 = ╱ec╱,╱ // 0x3c59 @0x12
0x3c47…3c5f at0013 = ╱43╱C╱ // 0x3c5a @0x13
0x3c47…3c5f at0014 = ╱33╱3╱ // 0x3c5b @0x14
0x3c47…3c5f at0015 = ╱ef╱$╱ // 0x3c5c @0x15
0x3c47…3c5f at0016 = ╱ee╱)╱ // 0x3c5d @0x16
0x3c47…3c5f at0017 = EOL // 0x3c5e @0x17
0x3c47…3c5f }
0x3c5f…3c85 c9dc 7700 F0$(33,43)=C5$(34)
0x3c5f…3c85 LineComalBin {
0x3c5f…3c85 ptr = 0xc9dc // 0x3c5f @0x0
0x3c5f…3c85 lno = 0x1e14 // 0x3c61 @0x2
0x3c5f…3c85 at0004 = ╱46╱F╱ // 0x3c63 @0x4
0x3c5f…3c85 at0005 = ╱30╱0╱ // 0x3c64 @0x5
0x3c5f…3c85 at0006 = ╱ef╱$╱ // 0x3c65 @0x6
0x3c5f…3c85 at0007 = ╱ed╱(╱ // 0x3c66 @0x7
0x3c5f…3c85 at0008 = ╱33╱3╱ // 0x3c67 @0x8
0x3c5f…3c85 at0009 = ╱33╱3╱ // 0x3c68 @0x9
0x3c5f…3c85 at000a = ╱fe00008406╱ // 0x3c69 @0xa
0x3c5f…3c85 at000f = ╱ec╱,╱ // 0x3c6e @0xf
0x3c5f…3c85 at0010 = ╱34╱4╱ // 0x3c6f @0x10
0x3c5f…3c85 at0011 = ╱33╱3╱ // 0x3c70 @0x11
0x3c5f…3c85 at0012 = ╱fe0000ac06╱ // 0x3c71 @0x12
0x3c5f…3c85 at0017 = ╱ee╱)╱ // 0x3c76 @0x17
0x3c5f…3c85 at0018 = ╱dc╱=╱ // 0x3c77 @0x18
0x3c5f…3c85 at0019 = ╱43╱C╱ // 0x3c78 @0x19
0x3c5f…3c85 at001a = ╱35╱5╱ // 0x3c79 @0x1a
0x3c5f…3c85 at001b = ╱ef╱$╱ // 0x3c7a @0x1b
0x3c5f…3c85 at001c = ╱ed╱(╱ // 0x3c7b @0x1c
0x3c5f…3c85 at001d = ╱33╱3╱ // 0x3c7c @0x1d
0x3c5f…3c85 at001e = ╱34╱4╱ // 0x3c7d @0x1e
0x3c5f…3c85 at001f = ╱fe00008806╱ // 0x3c7e @0x1f
0x3c5f…3c85 at0024 = ╱ee╱)╱ // 0x3c83 @0x24
0x3c5f…3c85 at0025 = EOL // 0x3c84 @0x25
0x3c5f…3c85 }
0x3c85…3caa ca01 7710 F0$(45,54)=B9$(G,G:TI)
0x3c85…3caa LineComalBin {
0x3c85…3caa ptr = 0xca01 // 0x3c85 @0x0
0x3c85…3caa lno = 0x1e1e // 0x3c87 @0x2
0x3c85…3caa at0004 = ╱46╱F╱ // 0x3c89 @0x4
0x3c85…3caa at0005 = ╱30╱0╱ // 0x3c8a @0x5
0x3c85…3caa at0006 = ╱ef╱$╱ // 0x3c8b @0x6
0x3c85…3caa at0007 = ╱ed╱(╱ // 0x3c8c @0x7
0x3c85…3caa at0008 = ╱34╱4╱ // 0x3c8d @0x8
0x3c85…3caa at0009 = ╱35╱5╱ // 0x3c8e @0x9
0x3c85…3caa at000a = ╱fe0000b406╱ // 0x3c8f @0xa
0x3c85…3caa at000f = ╱ec╱,╱ // 0x3c94 @0xf
0x3c85…3caa at0010 = ╱35╱5╱ // 0x3c95 @0x10
0x3c85…3caa at0011 = ╱34╱4╱ // 0x3c96 @0x11
0x3c85…3caa at0012 = ╱fe0000d806╱ // 0x3c97 @0x12
0x3c85…3caa at0017 = ╱ee╱)╱ // 0x3c9c @0x17
0x3c85…3caa at0018 = ╱dc╱=╱ // 0x3c9d @0x18
0x3c85…3caa at0019 = ╱42╱B╱ // 0x3c9e @0x19
0x3c85…3caa at001a = ╱39╱9╱ // 0x3c9f @0x1a
0x3c85…3caa at001b = ╱ef╱$╱ // 0x3ca0 @0x1b
0x3c85…3caa at001c = ╱ed╱(╱ // 0x3ca1 @0x1c
0x3c85…3caa at001d = ╱47╱G╱ // 0x3ca2 @0x1d
0x3c85…3caa at001e = ╱ec╱,╱ // 0x3ca3 @0x1e
0x3c85…3caa at001f = ╱47╱G╱ // 0x3ca4 @0x1f
0x3c85…3caa at0020 = ╱f0╱:╱ // 0x3ca5 @0x20
0x3c85…3caa at0021 = ╱54╱T╱ // 0x3ca6 @0x21
0x3c85…3caa at0022 = ╱49╱I╱ // 0x3ca7 @0x22
0x3c85…3caa at0023 = ╱ee╱)╱ // 0x3ca8 @0x23
0x3c85…3caa at0024 = EOL // 0x3ca9 @0x24
0x3c85…3caa }
0x3caa…3cb1 ca08 7720 EXEC Å
0x3caa…3cb1 LineComalBin {
0x3caa…3cb1 ptr = 0xca08 // 0x3caa @0x0
0x3caa…3cb1 lno = 0x1e28 // 0x3cac @0x2
0x3caa…3cb1 at0004 = ╱9d╱ EXEC ╱ // 0x3cae @0x4
0x3caa…3cb1 at0005 = ╱5d╱Å╱ // 0x3caf @0x5
0x3caa…3cb1 at0006 = EOL // 0x3cb0 @0x6
0x3caa…3cb1 }
0x3cb1…3cc1 ca18 7730 EXEC Z(83)
0x3cb1…3cc1 LineComalBin {
0x3cb1…3cc1 ptr = 0xca18 // 0x3cb1 @0x0
0x3cb1…3cc1 lno = 0x1e32 // 0x3cb3 @0x2
0x3cb1…3cc1 at0004 = ╱9d╱ EXEC ╱ // 0x3cb5 @0x4
0x3cb1…3cc1 at0005 = ╱5a╱Z╱ // 0x3cb6 @0x5
0x3cb1…3cc1 at0006 = ╱ed╱(╱ // 0x3cb7 @0x6
0x3cb1…3cc1 at0007 = ╱38╱8╱ // 0x3cb8 @0x7
0x3cb1…3cc1 at0008 = ╱33╱3╱ // 0x3cb9 @0x8
0x3cb1…3cc1 at0009 = ╱fe0000a607╱ // 0x3cba @0x9
0x3cb1…3cc1 at000e = ╱ee╱)╱ // 0x3cbf @0xe
0x3cb1…3cc1 at000f = EOL // 0x3cc0 @0xf
0x3cb1…3cc1 }
0x3cc1…3cd7 ca2e 7740 C3$=B8$(L3,AZ:TI)
0x3cc1…3cd7 LineComalBin {
0x3cc1…3cd7 ptr = 0xca2e // 0x3cc1 @0x0
0x3cc1…3cd7 lno = 0x1e3c // 0x3cc3 @0x2
0x3cc1…3cd7 at0004 = ╱43╱C╱ // 0x3cc5 @0x4
0x3cc1…3cd7 at0005 = ╱33╱3╱ // 0x3cc6 @0x5
0x3cc1…3cd7 at0006 = ╱ef╱$╱ // 0x3cc7 @0x6
0x3cc1…3cd7 at0007 = ╱dc╱=╱ // 0x3cc8 @0x7
0x3cc1…3cd7 at0008 = ╱42╱B╱ // 0x3cc9 @0x8
0x3cc1…3cd7 at0009 = ╱38╱8╱ // 0x3cca @0x9
0x3cc1…3cd7 at000a = ╱ef╱$╱ // 0x3ccb @0xa
0x3cc1…3cd7 at000b = ╱ed╱(╱ // 0x3ccc @0xb
0x3cc1…3cd7 at000c = ╱4c╱L╱ // 0x3ccd @0xc
0x3cc1…3cd7 at000d = ╱33╱3╱ // 0x3cce @0xd
0x3cc1…3cd7 at000e = ╱ec╱,╱ // 0x3ccf @0xe
0x3cc1…3cd7 at000f = ╱41╱A╱ // 0x3cd0 @0xf
0x3cc1…3cd7 at0010 = ╱5a╱Z╱ // 0x3cd1 @0x10
0x3cc1…3cd7 at0011 = ╱f0╱:╱ // 0x3cd2 @0x11
0x3cc1…3cd7 at0012 = ╱54╱T╱ // 0x3cd3 @0x12
0x3cc1…3cd7 at0013 = ╱49╱I╱ // 0x3cd4 @0x13
0x3cc1…3cd7 at0014 = ╱ee╱)╱ // 0x3cd5 @0x14
0x3cc1…3cd7 at0015 = EOL // 0x3cd6 @0x15
0x3cc1…3cd7 }
0x3cd7…3cf4 ca4b 7750 C8$(31,40)=C3$
0x3cd7…3cf4 LineComalBin {
0x3cd7…3cf4 ptr = 0xca4b // 0x3cd7 @0x0
0x3cd7…3cf4 lno = 0x1e46 // 0x3cd9 @0x2
0x3cd7…3cf4 at0004 = ╱43╱C╱ // 0x3cdb @0x4
0x3cd7…3cf4 at0005 = ╱38╱8╱ // 0x3cdc @0x5
0x3cd7…3cf4 at0006 = ╱ef╱$╱ // 0x3cdd @0x6
0x3cd7…3cf4 at0007 = ╱ed╱(╱ // 0x3cde @0x7
0x3cd7…3cf4 at0008 = ╱33╱3╱ // 0x3cdf @0x8
0x3cd7…3cf4 at0009 = ╱31╱1╱ // 0x3ce0 @0x9
0x3cd7…3cf4 at000a = ╱fe0000f805╱ // 0x3ce1 @0xa
0x3cd7…3cf4 at000f = ╱ec╱,╱ // 0x3ce6 @0xf
0x3cd7…3cf4 at0010 = ╱34╱4╱ // 0x3ce7 @0x10
0x3cd7…3cf4 at0011 = ╱30╱0╱ // 0x3ce8 @0x11
0x3cd7…3cf4 at0012 = ╱fe0000a006╱ // 0x3ce9 @0x12
0x3cd7…3cf4 at0017 = ╱ee╱)╱ // 0x3cee @0x17
0x3cd7…3cf4 at0018 = ╱dc╱=╱ // 0x3cef @0x18
0x3cd7…3cf4 at0019 = ╱43╱C╱ // 0x3cf0 @0x19
0x3cd7…3cf4 at001a = ╱33╱3╱ // 0x3cf1 @0x1a
0x3cd7…3cf4 at001b = ╱ef╱$╱ // 0x3cf2 @0x1b
0x3cd7…3cf4 at001c = EOL // 0x3cf3 @0x1c
0x3cd7…3cf4 }
0x3cf4…3d0c ca63 7760 EXEC OPTÆL(40,C3$)
0x3cf4…3d0c LineComalBin {
0x3cf4…3d0c ptr = 0xca63 // 0x3cf4 @0x0
0x3cf4…3d0c lno = 0x1e50 // 0x3cf6 @0x2
0x3cf4…3d0c at0004 = ╱9d╱ EXEC ╱ // 0x3cf8 @0x4
0x3cf4…3d0c at0005 = ╱4f╱O╱ // 0x3cf9 @0x5
0x3cf4…3d0c at0006 = ╱50╱P╱ // 0x3cfa @0x6
0x3cf4…3d0c at0007 = ╱54╱T╱ // 0x3cfb @0x7
0x3cf4…3d0c at0008 = ╱5b╱Æ╱ // 0x3cfc @0x8
0x3cf4…3d0c at0009 = ╱4c╱L╱ // 0x3cfd @0x9
0x3cf4…3d0c at000a = ╱ed╱(╱ // 0x3cfe @0xa
0x3cf4…3d0c at000b = ╱34╱4╱ // 0x3cff @0xb
0x3cf4…3d0c at000c = ╱30╱0╱ // 0x3d00 @0xc
0x3cf4…3d0c at000d = ╱fe0000a006╱ // 0x3d01 @0xd
0x3cf4…3d0c at0012 = ╱ec╱,╱ // 0x3d06 @0x12
0x3cf4…3d0c at0013 = ╱43╱C╱ // 0x3d07 @0x13
0x3cf4…3d0c at0014 = ╱33╱3╱ // 0x3d08 @0x14
0x3cf4…3d0c at0015 = ╱ef╱$╱ // 0x3d09 @0x15
0x3cf4…3d0c at0016 = ╱ee╱)╱ // 0x3d0a @0x16
0x3cf4…3d0c at0017 = EOL // 0x3d0b @0x17
0x3cf4…3d0c }
0x3d0c…3d32 ca89 7780 F0$(33,43)=C5$(40)
0x3d0c…3d32 LineComalBin {
0x3d0c…3d32 ptr = 0xca89 // 0x3d0c @0x0
0x3d0c…3d32 lno = 0x1e64 // 0x3d0e @0x2
0x3d0c…3d32 at0004 = ╱46╱F╱ // 0x3d10 @0x4
0x3d0c…3d32 at0005 = ╱30╱0╱ // 0x3d11 @0x5
0x3d0c…3d32 at0006 = ╱ef╱$╱ // 0x3d12 @0x6
0x3d0c…3d32 at0007 = ╱ed╱(╱ // 0x3d13 @0x7
0x3d0c…3d32 at0008 = ╱33╱3╱ // 0x3d14 @0x8
0x3d0c…3d32 at0009 = ╱33╱3╱ // 0x3d15 @0x9
0x3d0c…3d32 at000a = ╱fe00008406╱ // 0x3d16 @0xa
0x3d0c…3d32 at000f = ╱ec╱,╱ // 0x3d1b @0xf
0x3d0c…3d32 at0010 = ╱34╱4╱ // 0x3d1c @0x10
0x3d0c…3d32 at0011 = ╱33╱3╱ // 0x3d1d @0x11
0x3d0c…3d32 at0012 = ╱fe0000ac06╱ // 0x3d1e @0x12
0x3d0c…3d32 at0017 = ╱ee╱)╱ // 0x3d23 @0x17
0x3d0c…3d32 at0018 = ╱dc╱=╱ // 0x3d24 @0x18
0x3d0c…3d32 at0019 = ╱43╱C╱ // 0x3d25 @0x19
0x3d0c…3d32 at001a = ╱35╱5╱ // 0x3d26 @0x1a
0x3d0c…3d32 at001b = ╱ef╱$╱ // 0x3d27 @0x1b
0x3d0c…3d32 at001c = ╱ed╱(╱ // 0x3d28 @0x1c
0x3d0c…3d32 at001d = ╱34╱4╱ // 0x3d29 @0x1d
0x3d0c…3d32 at001e = ╱30╱0╱ // 0x3d2a @0x1e
0x3d0c…3d32 at001f = ╱fe0000a006╱ // 0x3d2b @0x1f
0x3d0c…3d32 at0024 = ╱ee╱)╱ // 0x3d30 @0x24
0x3d0c…3d32 at0025 = EOL // 0x3d31 @0x25
0x3d0c…3d32 }
0x3d32…3d59 cab0 7790 F0$(45,54)=B8$(L3,EL:TI)
0x3d32…3d59 LineComalBin {
0x3d32…3d59 ptr = 0xcab0 // 0x3d32 @0x0
0x3d32…3d59 lno = 0x1e6e // 0x3d34 @0x2
0x3d32…3d59 at0004 = ╱46╱F╱ // 0x3d36 @0x4
0x3d32…3d59 at0005 = ╱30╱0╱ // 0x3d37 @0x5
0x3d32…3d59 at0006 = ╱ef╱$╱ // 0x3d38 @0x6
0x3d32…3d59 at0007 = ╱ed╱(╱ // 0x3d39 @0x7
0x3d32…3d59 at0008 = ╱34╱4╱ // 0x3d3a @0x8
0x3d32…3d59 at0009 = ╱35╱5╱ // 0x3d3b @0x9
0x3d32…3d59 at000a = ╱fe0000b406╱ // 0x3d3c @0xa
0x3d32…3d59 at000f = ╱ec╱,╱ // 0x3d41 @0xf
0x3d32…3d59 at0010 = ╱35╱5╱ // 0x3d42 @0x10
0x3d32…3d59 at0011 = ╱34╱4╱ // 0x3d43 @0x11
0x3d32…3d59 at0012 = ╱fe0000d806╱ // 0x3d44 @0x12
0x3d32…3d59 at0017 = ╱ee╱)╱ // 0x3d49 @0x17
0x3d32…3d59 at0018 = ╱dc╱=╱ // 0x3d4a @0x18
0x3d32…3d59 at0019 = ╱42╱B╱ // 0x3d4b @0x19
0x3d32…3d59 at001a = ╱38╱8╱ // 0x3d4c @0x1a
0x3d32…3d59 at001b = ╱ef╱$╱ // 0x3d4d @0x1b
0x3d32…3d59 at001c = ╱ed╱(╱ // 0x3d4e @0x1c
0x3d32…3d59 at001d = ╱4c╱L╱ // 0x3d4f @0x1d
0x3d32…3d59 at001e = ╱33╱3╱ // 0x3d50 @0x1e
0x3d32…3d59 at001f = ╱ec╱,╱ // 0x3d51 @0x1f
0x3d32…3d59 at0020 = ╱45╱E╱ // 0x3d52 @0x20
0x3d32…3d59 at0021 = ╱4c╱L╱ // 0x3d53 @0x21
0x3d32…3d59 at0022 = ╱f0╱:╱ // 0x3d54 @0x22
0x3d32…3d59 at0023 = ╱54╱T╱ // 0x3d55 @0x23
0x3d32…3d59 at0024 = ╱49╱I╱ // 0x3d56 @0x24
0x3d32…3d59 at0025 = ╱ee╱)╱ // 0x3d57 @0x25
0x3d32…3d59 at0026 = EOL // 0x3d58 @0x26
0x3d32…3d59 }
0x3d59…3d89 cae0 7800 F0$(56,62)=B8$(L3,21:7)
0x3d59…3d89 LineComalBin {
0x3d59…3d89 ptr = 0xcae0 // 0x3d59 @0x0
0x3d59…3d89 lno = 0x1e78 // 0x3d5b @0x2
0x3d59…3d89 at0004 = ╱46╱F╱ // 0x3d5d @0x4
0x3d59…3d89 at0005 = ╱30╱0╱ // 0x3d5e @0x5
0x3d59…3d89 at0006 = ╱ef╱$╱ // 0x3d5f @0x6
0x3d59…3d89 at0007 = ╱ed╱(╱ // 0x3d60 @0x7
0x3d59…3d89 at0008 = ╱35╱5╱ // 0x3d61 @0x8
0x3d59…3d89 at0009 = ╱36╱6╱ // 0x3d62 @0x9
0x3d59…3d89 at000a = ╱fe0000e006╱ // 0x3d63 @0xa
0x3d59…3d89 at000f = ╱ec╱,╱ // 0x3d68 @0xf
0x3d59…3d89 at0010 = ╱36╱6╱ // 0x3d69 @0x10
0x3d59…3d89 at0011 = ╱32╱2╱ // 0x3d6a @0x11
0x3d59…3d89 at0012 = ╱fe0000f806╱ // 0x3d6b @0x12
0x3d59…3d89 at0017 = ╱ee╱)╱ // 0x3d70 @0x17
0x3d59…3d89 at0018 = ╱dc╱=╱ // 0x3d71 @0x18
0x3d59…3d89 at0019 = ╱42╱B╱ // 0x3d72 @0x19
0x3d59…3d89 at001a = ╱38╱8╱ // 0x3d73 @0x1a
0x3d59…3d89 at001b = ╱ef╱$╱ // 0x3d74 @0x1b
0x3d59…3d89 at001c = ╱ed╱(╱ // 0x3d75 @0x1c
0x3d59…3d89 at001d = ╱4c╱L╱ // 0x3d76 @0x1d
0x3d59…3d89 at001e = ╱33╱3╱ // 0x3d77 @0x1e
0x3d59…3d89 at001f = ╱ec╱,╱ // 0x3d78 @0x1f
0x3d59…3d89 at0020 = ╱32╱2╱ // 0x3d79 @0x20
0x3d59…3d89 at0021 = ╱31╱1╱ // 0x3d7a @0x21
0x3d59…3d89 at0022 = ╱fe0000a805╱ // 0x3d7b @0x22
0x3d59…3d89 at0027 = ╱f0╱:╱ // 0x3d80 @0x27
0x3d59…3d89 at0028 = ╱37╱7╱ // 0x3d81 @0x28
0x3d59…3d89 at0029 = ╱fe0000e003╱ // 0x3d82 @0x29
0x3d59…3d89 at002e = ╱ee╱)╱ // 0x3d87 @0x2e
0x3d59…3d89 at002f = EOL // 0x3d88 @0x2f
0x3d59…3d89 }
0x3d89…3daf cb06 7810 F0$(71,79)=B8$(L3,AZ:W)
0x3d89…3daf LineComalBin {
0x3d89…3daf ptr = 0xcb06 // 0x3d89 @0x0
0x3d89…3daf lno = 0x1e82 // 0x3d8b @0x2
0x3d89…3daf at0004 = ╱46╱F╱ // 0x3d8d @0x4
0x3d89…3daf at0005 = ╱30╱0╱ // 0x3d8e @0x5
0x3d89…3daf at0006 = ╱ef╱$╱ // 0x3d8f @0x6
0x3d89…3daf at0007 = ╱ed╱(╱ // 0x3d90 @0x7
0x3d89…3daf at0008 = ╱37╱7╱ // 0x3d91 @0x8
0x3d89…3daf at0009 = ╱31╱1╱ // 0x3d92 @0x9
0x3d89…3daf at000a = ╱fe00008e07╱ // 0x3d93 @0xa
0x3d89…3daf at000f = ╱ec╱,╱ // 0x3d98 @0xf
0x3d89…3daf at0010 = ╱37╱7╱ // 0x3d99 @0x10
0x3d89…3daf at0011 = ╱39╱9╱ // 0x3d9a @0x11
0x3d89…3daf at0012 = ╱fe00009e07╱ // 0x3d9b @0x12
0x3d89…3daf at0017 = ╱ee╱)╱ // 0x3da0 @0x17
0x3d89…3daf at0018 = ╱dc╱=╱ // 0x3da1 @0x18
0x3d89…3daf at0019 = ╱42╱B╱ // 0x3da2 @0x19
0x3d89…3daf at001a = ╱38╱8╱ // 0x3da3 @0x1a
0x3d89…3daf at001b = ╱ef╱$╱ // 0x3da4 @0x1b
0x3d89…3daf at001c = ╱ed╱(╱ // 0x3da5 @0x1c
0x3d89…3daf at001d = ╱4c╱L╱ // 0x3da6 @0x1d
0x3d89…3daf at001e = ╱33╱3╱ // 0x3da7 @0x1e
0x3d89…3daf at001f = ╱ec╱,╱ // 0x3da8 @0x1f
0x3d89…3daf at0020 = ╱41╱A╱ // 0x3da9 @0x20
0x3d89…3daf at0021 = ╱5a╱Z╱ // 0x3daa @0x21
0x3d89…3daf at0022 = ╱f0╱:╱ // 0x3dab @0x22
0x3d89…3daf at0023 = ╱57╱W╱ // 0x3dac @0x23
0x3d89…3daf at0024 = ╱ee╱)╱ // 0x3dad @0x24
0x3d89…3daf at0025 = EOL // 0x3dae @0x25
0x3d89…3daf }
0x3daf…3db6 cb0d 7820 EXEC Å
0x3daf…3db6 LineComalBin {
0x3daf…3db6 ptr = 0xcb0d // 0x3daf @0x0
0x3daf…3db6 lno = 0x1e8c // 0x3db1 @0x2
0x3daf…3db6 at0004 = ╱9d╱ EXEC ╱ // 0x3db3 @0x4
0x3daf…3db6 at0005 = ╱5d╱Å╱ // 0x3db4 @0x5
0x3daf…3db6 at0006 = EOL // 0x3db5 @0x6
0x3daf…3db6 }
0x3db6…3dc6 cb1d 7830 EXEC Z(84)
0x3db6…3dc6 LineComalBin {
0x3db6…3dc6 ptr = 0xcb1d // 0x3db6 @0x0
0x3db6…3dc6 lno = 0x1e96 // 0x3db8 @0x2
0x3db6…3dc6 at0004 = ╱9d╱ EXEC ╱ // 0x3dba @0x4
0x3db6…3dc6 at0005 = ╱5a╱Z╱ // 0x3dbb @0x5
0x3db6…3dc6 at0006 = ╱ed╱(╱ // 0x3dbc @0x6
0x3db6…3dc6 at0007 = ╱38╱8╱ // 0x3dbd @0x7
0x3db6…3dc6 at0008 = ╱34╱4╱ // 0x3dbe @0x8
0x3db6…3dc6 at0009 = ╱fe0000a807╱ // 0x3dbf @0x9
0x3db6…3dc6 at000e = ╱ee╱)╱ // 0x3dc4 @0xe
0x3db6…3dc6 at000f = EOL // 0x3dc5 @0xf
0x3db6…3dc6 }
0x3dc6…3dd5 cb2c 7840 C3$=B9$(V)
0x3dc6…3dd5 LineComalBin {
0x3dc6…3dd5 ptr = 0xcb2c // 0x3dc6 @0x0
0x3dc6…3dd5 lno = 0x1ea0 // 0x3dc8 @0x2
0x3dc6…3dd5 at0004 = ╱43╱C╱ // 0x3dca @0x4
0x3dc6…3dd5 at0005 = ╱33╱3╱ // 0x3dcb @0x5
0x3dc6…3dd5 at0006 = ╱ef╱$╱ // 0x3dcc @0x6
0x3dc6…3dd5 at0007 = ╱dc╱=╱ // 0x3dcd @0x7
0x3dc6…3dd5 at0008 = ╱42╱B╱ // 0x3dce @0x8
0x3dc6…3dd5 at0009 = ╱39╱9╱ // 0x3dcf @0x9
0x3dc6…3dd5 at000a = ╱ef╱$╱ // 0x3dd0 @0xa
0x3dc6…3dd5 at000b = ╱ed╱(╱ // 0x3dd1 @0xb
0x3dc6…3dd5 at000c = ╱56╱V╱ // 0x3dd2 @0xc
0x3dc6…3dd5 at000d = ╱ee╱)╱ // 0x3dd3 @0xd
0x3dc6…3dd5 at000e = EOL // 0x3dd4 @0xe
0x3dc6…3dd5 }
0x3dd5…3de9 cb40 7850 EXEC OP(4,C3$)
0x3dd5…3de9 LineComalBin {
0x3dd5…3de9 ptr = 0xcb40 // 0x3dd5 @0x0
0x3dd5…3de9 lno = 0x1eaa // 0x3dd7 @0x2
0x3dd5…3de9 at0004 = ╱9d╱ EXEC ╱ // 0x3dd9 @0x4
0x3dd5…3de9 at0005 = ╱4f╱O╱ // 0x3dda @0x5
0x3dd5…3de9 at0006 = ╱50╱P╱ // 0x3ddb @0x6
0x3dd5…3de9 at0007 = ╱ed╱(╱ // 0x3ddc @0x7
0x3dd5…3de9 at0008 = ╱34╱4╱ // 0x3ddd @0x8
0x3dd5…3de9 at0009 = ╱fe00008003╱ // 0x3dde @0x9
0x3dd5…3de9 at000e = ╱ec╱,╱ // 0x3de3 @0xe
0x3dd5…3de9 at000f = ╱43╱C╱ // 0x3de4 @0xf
0x3dd5…3de9 at0010 = ╱33╱3╱ // 0x3de5 @0x10
0x3dd5…3de9 at0011 = ╱ef╱$╱ // 0x3de6 @0x11
0x3dd5…3de9 at0012 = ╱ee╱)╱ // 0x3de7 @0x12
0x3dd5…3de9 at0013 = EOL // 0x3de8 @0x13
0x3dd5…3de9 }
0x3de9…3e01 cb58 7860 EXEC OPTÆL(37,C3$)
0x3de9…3e01 LineComalBin {
0x3de9…3e01 ptr = 0xcb58 // 0x3de9 @0x0
0x3de9…3e01 lno = 0x1eb4 // 0x3deb @0x2
0x3de9…3e01 at0004 = ╱9d╱ EXEC ╱ // 0x3ded @0x4
0x3de9…3e01 at0005 = ╱4f╱O╱ // 0x3dee @0x5
0x3de9…3e01 at0006 = ╱50╱P╱ // 0x3def @0x6
0x3de9…3e01 at0007 = ╱54╱T╱ // 0x3df0 @0x7
0x3de9…3e01 at0008 = ╱5b╱Æ╱ // 0x3df1 @0x8
0x3de9…3e01 at0009 = ╱4c╱L╱ // 0x3df2 @0x9
0x3de9…3e01 at000a = ╱ed╱(╱ // 0x3df3 @0xa
0x3de9…3e01 at000b = ╱33╱3╱ // 0x3df4 @0xb
0x3de9…3e01 at000c = ╱37╱7╱ // 0x3df5 @0xc
0x3de9…3e01 at000d = ╱fe00009406╱ // 0x3df6 @0xd
0x3de9…3e01 at0012 = ╱ec╱,╱ // 0x3dfb @0x12
0x3de9…3e01 at0013 = ╱43╱C╱ // 0x3dfc @0x13
0x3de9…3e01 at0014 = ╱33╱3╱ // 0x3dfd @0x14
0x3de9…3e01 at0015 = ╱ef╱$╱ // 0x3dfe @0x15
0x3de9…3e01 at0016 = ╱ee╱)╱ // 0x3dff @0x16
0x3de9…3e01 at0017 = EOL // 0x3e00 @0x17
0x3de9…3e01 }
0x3e01…3e27 cb7e 7880 F0$(33,43)=C5$(37)
0x3e01…3e27 LineComalBin {
0x3e01…3e27 ptr = 0xcb7e // 0x3e01 @0x0
0x3e01…3e27 lno = 0x1ec8 // 0x3e03 @0x2
0x3e01…3e27 at0004 = ╱46╱F╱ // 0x3e05 @0x4
0x3e01…3e27 at0005 = ╱30╱0╱ // 0x3e06 @0x5
0x3e01…3e27 at0006 = ╱ef╱$╱ // 0x3e07 @0x6
0x3e01…3e27 at0007 = ╱ed╱(╱ // 0x3e08 @0x7
0x3e01…3e27 at0008 = ╱33╱3╱ // 0x3e09 @0x8
0x3e01…3e27 at0009 = ╱33╱3╱ // 0x3e0a @0x9
0x3e01…3e27 at000a = ╱fe00008406╱ // 0x3e0b @0xa
0x3e01…3e27 at000f = ╱ec╱,╱ // 0x3e10 @0xf
0x3e01…3e27 at0010 = ╱34╱4╱ // 0x3e11 @0x10
0x3e01…3e27 at0011 = ╱33╱3╱ // 0x3e12 @0x11
0x3e01…3e27 at0012 = ╱fe0000ac06╱ // 0x3e13 @0x12
0x3e01…3e27 at0017 = ╱ee╱)╱ // 0x3e18 @0x17
0x3e01…3e27 at0018 = ╱dc╱=╱ // 0x3e19 @0x18
0x3e01…3e27 at0019 = ╱43╱C╱ // 0x3e1a @0x19
0x3e01…3e27 at001a = ╱35╱5╱ // 0x3e1b @0x1a
0x3e01…3e27 at001b = ╱ef╱$╱ // 0x3e1c @0x1b
0x3e01…3e27 at001c = ╱ed╱(╱ // 0x3e1d @0x1c
0x3e01…3e27 at001d = ╱33╱3╱ // 0x3e1e @0x1d
0x3e01…3e27 at001e = ╱37╱7╱ // 0x3e1f @0x1e
0x3e01…3e27 at001f = ╱fe00009406╱ // 0x3e20 @0x1f
0x3e01…3e27 at0024 = ╱ee╱)╱ // 0x3e25 @0x24
0x3e01…3e27 at0025 = EOL // 0x3e26 @0x25
0x3e01…3e27 }
0x3e27…3e47 cb9e 7890 F0$(44,54)=B9$(V)
0x3e27…3e47 LineComalBin {
0x3e27…3e47 ptr = 0xcb9e // 0x3e27 @0x0
0x3e27…3e47 lno = 0x1ed2 // 0x3e29 @0x2
0x3e27…3e47 at0004 = ╱46╱F╱ // 0x3e2b @0x4
0x3e27…3e47 at0005 = ╱30╱0╱ // 0x3e2c @0x5
0x3e27…3e47 at0006 = ╱ef╱$╱ // 0x3e2d @0x6
0x3e27…3e47 at0007 = ╱ed╱(╱ // 0x3e2e @0x7
0x3e27…3e47 at0008 = ╱34╱4╱ // 0x3e2f @0x8
0x3e27…3e47 at0009 = ╱34╱4╱ // 0x3e30 @0x9
0x3e27…3e47 at000a = ╱fe0000b006╱ // 0x3e31 @0xa
0x3e27…3e47 at000f = ╱ec╱,╱ // 0x3e36 @0xf
0x3e27…3e47 at0010 = ╱35╱5╱ // 0x3e37 @0x10
0x3e27…3e47 at0011 = ╱34╱4╱ // 0x3e38 @0x11
0x3e27…3e47 at0012 = ╱fe0000d806╱ // 0x3e39 @0x12
0x3e27…3e47 at0017 = ╱ee╱)╱ // 0x3e3e @0x17
0x3e27…3e47 at0018 = ╱dc╱=╱ // 0x3e3f @0x18
0x3e27…3e47 at0019 = ╱42╱B╱ // 0x3e40 @0x19
0x3e27…3e47 at001a = ╱39╱9╱ // 0x3e41 @0x1a
0x3e27…3e47 at001b = ╱ef╱$╱ // 0x3e42 @0x1b
0x3e27…3e47 at001c = ╱ed╱(╱ // 0x3e43 @0x1c
0x3e27…3e47 at001d = ╱56╱V╱ // 0x3e44 @0x1d
0x3e27…3e47 at001e = ╱ee╱)╱ // 0x3e45 @0x1e
0x3e27…3e47 at001f = EOL // 0x3e46 @0x1f
0x3e27…3e47 }
0x3e47…3e72 cbc9 7892 EXEC C(0,B9$(2),B9$(3),C3$)
0x3e47…3e72 LineComalBin {
0x3e47…3e72 ptr = 0xcbc9 // 0x3e47 @0x0
0x3e47…3e72 lno = 0x1ed4 // 0x3e49 @0x2
0x3e47…3e72 at0004 = ╱9d╱ EXEC ╱ // 0x3e4b @0x4
0x3e47…3e72 at0005 = ╱43╱C╱ // 0x3e4c @0x5
0x3e47…3e72 at0006 = ╱ed╱(╱ // 0x3e4d @0x6
0x3e47…3e72 at0007 = ╱30╱0╱ // 0x3e4e @0x7
0x3e47…3e72 at0008 = ╱fe00000000╱ // 0x3e4f @0x8
0x3e47…3e72 at000d = ╱ec╱,╱ // 0x3e54 @0xd
0x3e47…3e72 at000e = ╱42╱B╱ // 0x3e55 @0xe
0x3e47…3e72 at000f = ╱39╱9╱ // 0x3e56 @0xf
0x3e47…3e72 at0010 = ╱ef╱$╱ // 0x3e57 @0x10
0x3e47…3e72 at0011 = ╱ed╱(╱ // 0x3e58 @0x11
0x3e47…3e72 at0012 = ╱32╱2╱ // 0x3e59 @0x12
0x3e47…3e72 at0013 = ╱fe00008002╱ // 0x3e5a @0x13
0x3e47…3e72 at0018 = ╱ee╱)╱ // 0x3e5f @0x18
0x3e47…3e72 at0019 = ╱ec╱,╱ // 0x3e60 @0x19
0x3e47…3e72 at001a = ╱42╱B╱ // 0x3e61 @0x1a
0x3e47…3e72 at001b = ╱39╱9╱ // 0x3e62 @0x1b
0x3e47…3e72 at001c = ╱ef╱$╱ // 0x3e63 @0x1c
0x3e47…3e72 at001d = ╱ed╱(╱ // 0x3e64 @0x1d
0x3e47…3e72 at001e = ╱33╱3╱ // 0x3e65 @0x1e
0x3e47…3e72 at001f = ╱fe0000c002╱ // 0x3e66 @0x1f
0x3e47…3e72 at0024 = ╱ee╱)╱ // 0x3e6b @0x24
0x3e47…3e72 at0025 = ╱ec╱,╱ // 0x3e6c @0x25
0x3e47…3e72 at0026 = ╱43╱C╱ // 0x3e6d @0x26
0x3e47…3e72 at0027 = ╱33╱3╱ // 0x3e6e @0x27
0x3e47…3e72 at0028 = ╱ef╱$╱ // 0x3e6f @0x28
0x3e47…3e72 at0029 = ╱ee╱)╱ // 0x3e70 @0x29
0x3e47…3e72 at002a = EOL // 0x3e71 @0x2a
0x3e47…3e72 }
0x3e72…3e9a cbf1 7894 C7$(21,30)=C3$(V,12)
0x3e72…3e9a LineComalBin {
0x3e72…3e9a ptr = 0xcbf1 // 0x3e72 @0x0
0x3e72…3e9a lno = 0x1ed6 // 0x3e74 @0x2
0x3e72…3e9a at0004 = ╱43╱C╱ // 0x3e76 @0x4
0x3e72…3e9a at0005 = ╱37╱7╱ // 0x3e77 @0x5
0x3e72…3e9a at0006 = ╱ef╱$╱ // 0x3e78 @0x6
0x3e72…3e9a at0007 = ╱ed╱(╱ // 0x3e79 @0x7
0x3e72…3e9a at0008 = ╱32╱2╱ // 0x3e7a @0x8
0x3e72…3e9a at0009 = ╱31╱1╱ // 0x3e7b @0x9
0x3e72…3e9a at000a = ╱fe0000a805╱ // 0x3e7c @0xa
0x3e72…3e9a at000f = ╱ec╱,╱ // 0x3e81 @0xf
0x3e72…3e9a at0010 = ╱33╱3╱ // 0x3e82 @0x10
0x3e72…3e9a at0011 = ╱30╱0╱ // 0x3e83 @0x11
0x3e72…3e9a at0012 = ╱fe0000f005╱ // 0x3e84 @0x12
0x3e72…3e9a at0017 = ╱ee╱)╱ // 0x3e89 @0x17
0x3e72…3e9a at0018 = ╱dc╱=╱ // 0x3e8a @0x18
0x3e72…3e9a at0019 = ╱43╱C╱ // 0x3e8b @0x19
0x3e72…3e9a at001a = ╱33╱3╱ // 0x3e8c @0x1a
0x3e72…3e9a at001b = ╱ef╱$╱ // 0x3e8d @0x1b
0x3e72…3e9a at001c = ╱ed╱(╱ // 0x3e8e @0x1c
0x3e72…3e9a at001d = ╱56╱V╱ // 0x3e8f @0x1d
0x3e72…3e9a at001e = ╱ec╱,╱ // 0x3e90 @0x1e
0x3e72…3e9a at001f = ╱31╱1╱ // 0x3e91 @0x1f
0x3e72…3e9a at0020 = ╱32╱2╱ // 0x3e92 @0x20
0x3e72…3e9a at0021 = ╱fe0000c004╱ // 0x3e93 @0x21
0x3e72…3e9a at0026 = ╱ee╱)╱ // 0x3e98 @0x26
0x3e72…3e9a at0027 = EOL // 0x3e99 @0x27
0x3e72…3e9a }
0x3e9a…3ea1 cbf8 7900 EXEC Å
0x3e9a…3ea1 LineComalBin {
0x3e9a…3ea1 ptr = 0xcbf8 // 0x3e9a @0x0
0x3e9a…3ea1 lno = 0x1edc // 0x3e9c @0x2
0x3e9a…3ea1 at0004 = ╱9d╱ EXEC ╱ // 0x3e9e @0x4
0x3e9a…3ea1 at0005 = ╱5d╱Å╱ // 0x3e9f @0x5
0x3e9a…3ea1 at0006 = EOL // 0x3ea0 @0x6
0x3e9a…3ea1 }
0x3ea1…3eb5 cc0c 7910 C3$=B9$(7)
0x3ea1…3eb5 LineComalBin {
0x3ea1…3eb5 ptr = 0xcc0c // 0x3ea1 @0x0
0x3ea1…3eb5 lno = 0x1ee6 // 0x3ea3 @0x2
0x3ea1…3eb5 at0004 = ╱43╱C╱ // 0x3ea5 @0x4
0x3ea1…3eb5 at0005 = ╱33╱3╱ // 0x3ea6 @0x5
0x3ea1…3eb5 at0006 = ╱ef╱$╱ // 0x3ea7 @0x6
0x3ea1…3eb5 at0007 = ╱dc╱=╱ // 0x3ea8 @0x7
0x3ea1…3eb5 at0008 = ╱42╱B╱ // 0x3ea9 @0x8
0x3ea1…3eb5 at0009 = ╱39╱9╱ // 0x3eaa @0x9
0x3ea1…3eb5 at000a = ╱ef╱$╱ // 0x3eab @0xa
0x3ea1…3eb5 at000b = ╱ed╱(╱ // 0x3eac @0xb
0x3ea1…3eb5 at000c = ╱37╱7╱ // 0x3ead @0xc
0x3ea1…3eb5 at000d = ╱fe0000e003╱ // 0x3eae @0xd
0x3ea1…3eb5 at0012 = ╱ee╱)╱ // 0x3eb3 @0x12
0x3ea1…3eb5 at0013 = EOL // 0x3eb4 @0x13
0x3ea1…3eb5 }
0x3eb5…3ed0 cc27 7920 EXEC C(4,C3$,B3$,C4$)
0x3eb5…3ed0 LineComalBin {
0x3eb5…3ed0 ptr = 0xcc27 // 0x3eb5 @0x0
0x3eb5…3ed0 lno = 0x1ef0 // 0x3eb7 @0x2
0x3eb5…3ed0 at0004 = ╱9d╱ EXEC ╱ // 0x3eb9 @0x4
0x3eb5…3ed0 at0005 = ╱43╱C╱ // 0x3eba @0x5
0x3eb5…3ed0 at0006 = ╱ed╱(╱ // 0x3ebb @0x6
0x3eb5…3ed0 at0007 = ╱34╱4╱ // 0x3ebc @0x7
0x3eb5…3ed0 at0008 = ╱fe00008003╱ // 0x3ebd @0x8
0x3eb5…3ed0 at000d = ╱ec╱,╱ // 0x3ec2 @0xd
0x3eb5…3ed0 at000e = ╱43╱C╱ // 0x3ec3 @0xe
0x3eb5…3ed0 at000f = ╱33╱3╱ // 0x3ec4 @0xf
0x3eb5…3ed0 at0010 = ╱ef╱$╱ // 0x3ec5 @0x10
0x3eb5…3ed0 at0011 = ╱ec╱,╱ // 0x3ec6 @0x11
0x3eb5…3ed0 at0012 = ╱42╱B╱ // 0x3ec7 @0x12
0x3eb5…3ed0 at0013 = ╱33╱3╱ // 0x3ec8 @0x13
0x3eb5…3ed0 at0014 = ╱ef╱$╱ // 0x3ec9 @0x14
0x3eb5…3ed0 at0015 = ╱ec╱,╱ // 0x3eca @0x15
0x3eb5…3ed0 at0016 = ╱43╱C╱ // 0x3ecb @0x16
0x3eb5…3ed0 at0017 = ╱34╱4╱ // 0x3ecc @0x17
0x3eb5…3ed0 at0018 = ╱ef╱$╱ // 0x3ecd @0x18
0x3eb5…3ed0 at0019 = ╱ee╱)╱ // 0x3ece @0x19
0x3eb5…3ed0 at001a = EOL // 0x3ecf @0x1a
0x3eb5…3ed0 }
0x3ed0…3eeb cc42 7925 IF C3$(11)="-" THEN SI=E
0x3ed0…3eeb LineComalBin {
0x3ed0…3eeb ptr = 0xcc42 // 0x3ed0 @0x0
0x3ed0…3eeb lno = 0x1ef5 // 0x3ed2 @0x2
0x3ed0…3eeb at0004 = ╱82╱ IF ╱ // 0x3ed4 @0x4
0x3ed0…3eeb at0005 = ╱43╱C╱ // 0x3ed5 @0x5
0x3ed0…3eeb at0006 = ╱33╱3╱ // 0x3ed6 @0x6
0x3ed0…3eeb at0007 = ╱ef╱$╱ // 0x3ed7 @0x7
0x3ed0…3eeb at0008 = ╱ed╱(╱ // 0x3ed8 @0x8
0x3ed0…3eeb at0009 = ╱31╱1╱ // 0x3ed9 @0x9
0x3ed0…3eeb at000a = ╱31╱1╱ // 0x3eda @0xa
0x3ed0…3eeb at000b = ╱fe0000b004╱ // 0x3edb @0xb
0x3ed0…3eeb at0010 = ╱ee╱)╱ // 0x3ee0 @0x10
0x3ed0…3eeb at0011 = ╱dc╱=╱ // 0x3ee1 @0x11
0x3ed0…3eeb at0012 = ╱22╱"╱ // 0x3ee2 @0x12
0x3ed0…3eeb at0013 = ╱2d╱-╱ // 0x3ee3 @0x13
0x3ed0…3eeb at0014 = ╱22╱"╱ // 0x3ee4 @0x14
0x3ed0…3eeb at0015 = ╱b6╱ THEN ╱ // 0x3ee5 @0x15
0x3ed0…3eeb at0016 = ╱53╱S╱ // 0x3ee6 @0x16
0x3ed0…3eeb at0017 = ╱49╱I╱ // 0x3ee7 @0x17
0x3ed0…3eeb at0018 = ╱dc╱=╱ // 0x3ee8 @0x18
0x3ed0…3eeb at0019 = ╱45╱E╱ // 0x3ee9 @0x19
0x3ed0…3eeb at001a = EOL // 0x3eea @0x1a
0x3ed0…3eeb }
0x3eeb…3ef6 cc4d 7930 IF SI=G THEN
0x3eeb…3ef6 LineComalBin {
0x3eeb…3ef6 ptr = 0xcc4d // 0x3eeb @0x0
0x3eeb…3ef6 lno = 0x1efa // 0x3eed @0x2
0x3eeb…3ef6 at0004 = ╱9c╱ IF ╱ // 0x3eef @0x4
0x3eeb…3ef6 at0005 = ╱53╱S╱ // 0x3ef0 @0x5
0x3eeb…3ef6 at0006 = ╱49╱I╱ // 0x3ef1 @0x6
0x3eeb…3ef6 at0007 = ╱dc╱=╱ // 0x3ef2 @0x7
0x3eeb…3ef6 at0008 = ╱47╱G╱ // 0x3ef3 @0x8
0x3eeb…3ef6 at0009 = ╱b6╱ THEN ╱ // 0x3ef4 @0x9
0x3eeb…3ef6 at000a = EOL // 0x3ef5 @0xa
0x3eeb…3ef6 }
0x3ef6…3f0d cc64 7940 IF H2>B AND (H3>B OR H4>B) THEN
0x3ef6…3f0d LineComalBin {
0x3ef6…3f0d ptr = 0xcc64 // 0x3ef6 @0x0
0x3ef6…3f0d lno = 0x1f04 // 0x3ef8 @0x2
0x3ef6…3f0d at0004 = ╱9c╱ IF ╱ // 0x3efa @0x4
0x3ef6…3f0d at0005 = ╱48╱H╱ // 0x3efb @0x5
0x3ef6…3f0d at0006 = ╱32╱2╱ // 0x3efc @0x6
0x3ef6…3f0d at0007 = ╱de╱>╱ // 0x3efd @0x7
0x3ef6…3f0d at0008 = ╱42╱B╱ // 0x3efe @0x8
0x3ef6…3f0d at0009 = ╱da╱ AND ╱ // 0x3eff @0x9
0x3ef6…3f0d at000a = ╱ed╱(╱ // 0x3f00 @0xa
0x3ef6…3f0d at000b = ╱48╱H╱ // 0x3f01 @0xb
0x3ef6…3f0d at000c = ╱33╱3╱ // 0x3f02 @0xc
0x3ef6…3f0d at000d = ╱de╱>╱ // 0x3f03 @0xd
0x3ef6…3f0d at000e = ╱42╱B╱ // 0x3f04 @0xe
0x3ef6…3f0d at000f = ╱db╱ OR ╱ // 0x3f05 @0xf
0x3ef6…3f0d at0010 = ╱48╱H╱ // 0x3f06 @0x10
0x3ef6…3f0d at0011 = ╱34╱4╱ // 0x3f07 @0x11
0x3ef6…3f0d at0012 = ╱de╱>╱ // 0x3f08 @0x12
0x3ef6…3f0d at0013 = ╱42╱B╱ // 0x3f09 @0x13
0x3ef6…3f0d at0014 = ╱ee╱)╱ // 0x3f0a @0x14
0x3ef6…3f0d at0015 = ╱b6╱ THEN ╱ // 0x3f0b @0x15
0x3ef6…3f0d at0016 = EOL // 0x3f0c @0x16
0x3ef6…3f0d }
0x3f0d…3f53 ccaa 7950 IF D4$(19,24)<>"000000" AND D4$(25,34)<>"0000000000" THEN
0x3f0d…3f53 LineComalBin {
0x3f0d…3f53 ptr = 0xccaa // 0x3f0d @0x0
0x3f0d…3f53 lno = 0x1f0e // 0x3f0f @0x2
0x3f0d…3f53 at0004 = ╱9c╱ IF ╱ // 0x3f11 @0x4
0x3f0d…3f53 at0005 = ╱44╱D╱ // 0x3f12 @0x5
0x3f0d…3f53 at0006 = ╱34╱4╱ // 0x3f13 @0x6
0x3f0d…3f53 at0007 = ╱ef╱$╱ // 0x3f14 @0x7
0x3f0d…3f53 at0008 = ╱ed╱(╱ // 0x3f15 @0x8
0x3f0d…3f53 at0009 = ╱31╱1╱ // 0x3f16 @0x9
0x3f0d…3f53 at000a = ╱39╱9╱ // 0x3f17 @0xa
0x3f0d…3f53 at000b = ╱fe00009805╱ // 0x3f18 @0xb
0x3f0d…3f53 at0010 = ╱ec╱,╱ // 0x3f1d @0x10
0x3f0d…3f53 at0011 = ╱32╱2╱ // 0x3f1e @0x11
0x3f0d…3f53 at0012 = ╱34╱4╱ // 0x3f1f @0x12
0x3f0d…3f53 at0013 = ╱fe0000c005╱ // 0x3f20 @0x13
0x3f0d…3f53 at0018 = ╱ee╱)╱ // 0x3f25 @0x18
0x3f0d…3f53 at0019 = ╱e1╱<>╱ // 0x3f26 @0x19
0x3f0d…3f53 at001a = ╱22╱"╱ // 0x3f27 @0x1a
0x3f0d…3f53 at001b = ╱30╱0╱ // 0x3f28 @0x1b
0x3f0d…3f53 at001c = ╱30╱0╱ // 0x3f29 @0x1c
0x3f0d…3f53 at001d = ╱30╱0╱ // 0x3f2a @0x1d
0x3f0d…3f53 at001e = ╱30╱0╱ // 0x3f2b @0x1e
0x3f0d…3f53 at001f = ╱30╱0╱ // 0x3f2c @0x1f
0x3f0d…3f53 at0020 = ╱30╱0╱ // 0x3f2d @0x20
0x3f0d…3f53 at0021 = ╱22╱"╱ // 0x3f2e @0x21
0x3f0d…3f53 at0022 = ╱da╱ AND ╱ // 0x3f2f @0x22
0x3f0d…3f53 at0023 = ╱44╱D╱ // 0x3f30 @0x23
0x3f0d…3f53 at0024 = ╱34╱4╱ // 0x3f31 @0x24
0x3f0d…3f53 at0025 = ╱ef╱$╱ // 0x3f32 @0x25
0x3f0d…3f53 at0026 = ╱ed╱(╱ // 0x3f33 @0x26
0x3f0d…3f53 at0027 = ╱32╱2╱ // 0x3f34 @0x27
0x3f0d…3f53 at0028 = ╱35╱5╱ // 0x3f35 @0x28
0x3f0d…3f53 at0029 = ╱fe0000c805╱ // 0x3f36 @0x29
0x3f0d…3f53 at002e = ╱ec╱,╱ // 0x3f3b @0x2e
0x3f0d…3f53 at002f = ╱33╱3╱ // 0x3f3c @0x2f
0x3f0d…3f53 at0030 = ╱34╱4╱ // 0x3f3d @0x30
0x3f0d…3f53 at0031 = ╱fe00008806╱ // 0x3f3e @0x31
0x3f0d…3f53 at0036 = ╱ee╱)╱ // 0x3f43 @0x36
0x3f0d…3f53 at0037 = ╱e1╱<>╱ // 0x3f44 @0x37
0x3f0d…3f53 at0038 = ╱22╱"╱ // 0x3f45 @0x38
0x3f0d…3f53 at0039 = ╱30╱0╱ // 0x3f46 @0x39
0x3f0d…3f53 at003a = ╱30╱0╱ // 0x3f47 @0x3a
0x3f0d…3f53 at003b = ╱30╱0╱ // 0x3f48 @0x3b
0x3f0d…3f53 at003c = ╱30╱0╱ // 0x3f49 @0x3c
0x3f0d…3f53 at003d = ╱30╱0╱ // 0x3f4a @0x3d
0x3f0d…3f53 at003e = ╱30╱0╱ // 0x3f4b @0x3e
0x3f0d…3f53 at003f = ╱30╱0╱ // 0x3f4c @0x3f
0x3f0d…3f53 at0040 = ╱30╱0╱ // 0x3f4d @0x40
0x3f0d…3f53 at0041 = ╱30╱0╱ // 0x3f4e @0x41
0x3f0d…3f53 at0042 = ╱30╱0╱ // 0x3f4f @0x42
0x3f0d…3f53 at0043 = ╱22╱"╱ // 0x3f50 @0x43
0x3f0d…3f53 at0044 = ╱b6╱ THEN ╱ // 0x3f51 @0x44
0x3f0d…3f53 at0045 = EOL // 0x3f52 @0x45
0x3f0d…3f53 }
0x3f53…3f5c ccb3 7960 SI=B
0x3f53…3f5c LineComalBin {
0x3f53…3f5c ptr = 0xccb3 // 0x3f53 @0x0
0x3f53…3f5c lno = 0x1f18 // 0x3f55 @0x2
0x3f53…3f5c at0004 = ╱53╱S╱ // 0x3f57 @0x4
0x3f53…3f5c at0005 = ╱49╱I╱ // 0x3f58 @0x5
0x3f53…3f5c at0006 = ╱dc╱=╱ // 0x3f59 @0x6
0x3f53…3f5c at0007 = ╱42╱B╱ // 0x3f5a @0x7
0x3f53…3f5c at0008 = EOL // 0x3f5b @0x8
0x3f53…3f5c }
0x3f5c…3f6c ccc3 7970 EXEC Z(88)
0x3f5c…3f6c LineComalBin {
0x3f5c…3f6c ptr = 0xccc3 // 0x3f5c @0x0
0x3f5c…3f6c lno = 0x1f22 // 0x3f5e @0x2
0x3f5c…3f6c at0004 = ╱9d╱ EXEC ╱ // 0x3f60 @0x4
0x3f5c…3f6c at0005 = ╱5a╱Z╱ // 0x3f61 @0x5
0x3f5c…3f6c at0006 = ╱ed╱(╱ // 0x3f62 @0x6
0x3f5c…3f6c at0007 = ╱38╱8╱ // 0x3f63 @0x7
0x3f5c…3f6c at0008 = ╱38╱8╱ // 0x3f64 @0x8
0x3f5c…3f6c at0009 = ╱fe0000b007╱ // 0x3f65 @0x9
0x3f5c…3f6c at000e = ╱ee╱)╱ // 0x3f6a @0xe
0x3f5c…3f6c at000f = EOL // 0x3f6b @0xf
0x3f5c…3f6c }
0x3f6c…3f9c ccf3 7975 F0$(27,48)="Til disposition "+DD$
0x3f6c…3f9c LineComalBin {
0x3f6c…3f9c ptr = 0xccf3 // 0x3f6c @0x0
0x3f6c…3f9c lno = 0x1f27 // 0x3f6e @0x2
0x3f6c…3f9c at0004 = ╱46╱F╱ // 0x3f70 @0x4
0x3f6c…3f9c at0005 = ╱30╱0╱ // 0x3f71 @0x5
0x3f6c…3f9c at0006 = ╱ef╱$╱ // 0x3f72 @0x6
0x3f6c…3f9c at0007 = ╱ed╱(╱ // 0x3f73 @0x7
0x3f6c…3f9c at0008 = ╱32╱2╱ // 0x3f74 @0x8
0x3f6c…3f9c at0009 = ╱37╱7╱ // 0x3f75 @0x9
0x3f6c…3f9c at000a = ╱fe0000d805╱ // 0x3f76 @0xa
0x3f6c…3f9c at000f = ╱ec╱,╱ // 0x3f7b @0xf
0x3f6c…3f9c at0010 = ╱34╱4╱ // 0x3f7c @0x10
0x3f6c…3f9c at0011 = ╱38╱8╱ // 0x3f7d @0x11
0x3f6c…3f9c at0012 = ╱fe0000c006╱ // 0x3f7e @0x12
0x3f6c…3f9c at0017 = ╱ee╱)╱ // 0x3f83 @0x17
0x3f6c…3f9c at0018 = ╱dc╱=╱ // 0x3f84 @0x18
0x3f6c…3f9c at0019 = ╱22╱"╱ // 0x3f85 @0x19
0x3f6c…3f9c at001a = ╱54╱T╱ // 0x3f86 @0x1a
0x3f6c…3f9c at001b = ╱69╱i╱ // 0x3f87 @0x1b
0x3f6c…3f9c at001c = ╱6c╱l╱ // 0x3f88 @0x1c
0x3f6c…3f9c at001d = ╱20╱…╱ // 0x3f89 @0x1d
0x3f6c…3f9c at001e = ╱64╱d╱ // 0x3f8a @0x1e
0x3f6c…3f9c at001f = ╱69╱i╱ // 0x3f8b @0x1f
0x3f6c…3f9c at0020 = ╱73╱s╱ // 0x3f8c @0x20
0x3f6c…3f9c at0021 = ╱70╱p╱ // 0x3f8d @0x21
0x3f6c…3f9c at0022 = ╱6f╱o╱ // 0x3f8e @0x22
0x3f6c…3f9c at0023 = ╱73╱s╱ // 0x3f8f @0x23
0x3f6c…3f9c at0024 = ╱69╱i╱ // 0x3f90 @0x24
0x3f6c…3f9c at0025 = ╱74╱t╱ // 0x3f91 @0x25
0x3f6c…3f9c at0026 = ╱69╱i╱ // 0x3f92 @0x26
0x3f6c…3f9c at0027 = ╱6f╱o╱ // 0x3f93 @0x27
0x3f6c…3f9c at0028 = ╱6e╱n╱ // 0x3f94 @0x28
0x3f6c…3f9c at0029 = ╱20╱…╱ // 0x3f95 @0x29
0x3f6c…3f9c at002a = ╱22╱"╱ // 0x3f96 @0x2a
0x3f6c…3f9c at002b = ╱f1╱+╱ // 0x3f97 @0x2b
0x3f6c…3f9c at002c = ╱44╱D╱ // 0x3f98 @0x2c
0x3f6c…3f9c at002d = ╱44╱D╱ // 0x3f99 @0x2d
0x3f6c…3f9c at002e = ╱ef╱$╱ // 0x3f9a @0x2e
0x3f6c…3f9c at002f = EOL // 0x3f9b @0x2f
0x3f6c…3f9c }
0x3f9c…3fc1 cd18 7980 F0$(64:TI)=B9$(7,E:TI)
0x3f9c…3fc1 LineComalBin {
0x3f9c…3fc1 ptr = 0xcd18 // 0x3f9c @0x0
0x3f9c…3fc1 lno = 0x1f2c // 0x3f9e @0x2
0x3f9c…3fc1 at0004 = ╱46╱F╱ // 0x3fa0 @0x4
0x3f9c…3fc1 at0005 = ╱30╱0╱ // 0x3fa1 @0x5
0x3f9c…3fc1 at0006 = ╱ef╱$╱ // 0x3fa2 @0x6
0x3f9c…3fc1 at0007 = ╱ed╱(╱ // 0x3fa3 @0x7
0x3f9c…3fc1 at0008 = ╱36╱6╱ // 0x3fa4 @0x8
0x3f9c…3fc1 at0009 = ╱34╱4╱ // 0x3fa5 @0x9
0x3f9c…3fc1 at000a = ╱fe00008007╱ // 0x3fa6 @0xa
0x3f9c…3fc1 at000f = ╱f0╱:╱ // 0x3fab @0xf
0x3f9c…3fc1 at0010 = ╱54╱T╱ // 0x3fac @0x10
0x3f9c…3fc1 at0011 = ╱49╱I╱ // 0x3fad @0x11
0x3f9c…3fc1 at0012 = ╱ee╱)╱ // 0x3fae @0x12
0x3f9c…3fc1 at0013 = ╱dc╱=╱ // 0x3faf @0x13
0x3f9c…3fc1 at0014 = ╱42╱B╱ // 0x3fb0 @0x14
0x3f9c…3fc1 at0015 = ╱39╱9╱ // 0x3fb1 @0x15
0x3f9c…3fc1 at0016 = ╱ef╱$╱ // 0x3fb2 @0x16
0x3f9c…3fc1 at0017 = ╱ed╱(╱ // 0x3fb3 @0x17
0x3f9c…3fc1 at0018 = ╱37╱7╱ // 0x3fb4 @0x18
0x3f9c…3fc1 at0019 = ╱fe0000e003╱ // 0x3fb5 @0x19
0x3f9c…3fc1 at001e = ╱ec╱,╱ // 0x3fba @0x1e
0x3f9c…3fc1 at001f = ╱45╱E╱ // 0x3fbb @0x1f
0x3f9c…3fc1 at0020 = ╱f0╱:╱ // 0x3fbc @0x20
0x3f9c…3fc1 at0021 = ╱54╱T╱ // 0x3fbd @0x21
0x3f9c…3fc1 at0022 = ╱49╱I╱ // 0x3fbe @0x22
0x3f9c…3fc1 at0023 = ╱ee╱)╱ // 0x3fbf @0x23
0x3f9c…3fc1 at0024 = EOL // 0x3fc0 @0x24
0x3f9c…3fc1 }
0x3fc1…3feb cd42 7985 C8$(41,50)=B9$(7,G:TI)
0x3fc1…3feb LineComalBin {
0x3fc1…3feb ptr = 0xcd42 // 0x3fc1 @0x0
0x3fc1…3feb lno = 0x1f31 // 0x3fc3 @0x2
0x3fc1…3feb at0004 = ╱43╱C╱ // 0x3fc5 @0x4
0x3fc1…3feb at0005 = ╱38╱8╱ // 0x3fc6 @0x5
0x3fc1…3feb at0006 = ╱ef╱$╱ // 0x3fc7 @0x6
0x3fc1…3feb at0007 = ╱ed╱(╱ // 0x3fc8 @0x7
0x3fc1…3feb at0008 = ╱34╱4╱ // 0x3fc9 @0x8
0x3fc1…3feb at0009 = ╱31╱1╱ // 0x3fca @0x9
0x3fc1…3feb at000a = ╱fe0000a406╱ // 0x3fcb @0xa
0x3fc1…3feb at000f = ╱ec╱,╱ // 0x3fd0 @0xf
0x3fc1…3feb at0010 = ╱35╱5╱ // 0x3fd1 @0x10
0x3fc1…3feb at0011 = ╱30╱0╱ // 0x3fd2 @0x11
0x3fc1…3feb at0012 = ╱fe0000c806╱ // 0x3fd3 @0x12
0x3fc1…3feb at0017 = ╱ee╱)╱ // 0x3fd8 @0x17
0x3fc1…3feb at0018 = ╱dc╱=╱ // 0x3fd9 @0x18
0x3fc1…3feb at0019 = ╱42╱B╱ // 0x3fda @0x19
0x3fc1…3feb at001a = ╱39╱9╱ // 0x3fdb @0x1a
0x3fc1…3feb at001b = ╱ef╱$╱ // 0x3fdc @0x1b
0x3fc1…3feb at001c = ╱ed╱(╱ // 0x3fdd @0x1c
0x3fc1…3feb at001d = ╱37╱7╱ // 0x3fde @0x1d
0x3fc1…3feb at001e = ╱fe0000e003╱ // 0x3fdf @0x1e
0x3fc1…3feb at0023 = ╱ec╱,╱ // 0x3fe4 @0x23
0x3fc1…3feb at0024 = ╱47╱G╱ // 0x3fe5 @0x24
0x3fc1…3feb at0025 = ╱f0╱:╱ // 0x3fe6 @0x25
0x3fc1…3feb at0026 = ╱54╱T╱ // 0x3fe7 @0x26
0x3fc1…3feb at0027 = ╱49╱I╱ // 0x3fe8 @0x27
0x3fc1…3feb at0028 = ╱ee╱)╱ // 0x3fe9 @0x28
0x3fc1…3feb at0029 = EOL // 0x3fea @0x29
0x3fc1…3feb }
0x3feb…4017 cd6e 7990 EXEC CONV(OP1$,0+H2 MOD 10000,4)
0x3feb…4017 LineComalBin {
0x3feb…4017 ptr = 0xcd6e // 0x3feb @0x0
0x3feb…4017 lno = 0x1f36 // 0x3fed @0x2
0x3feb…4017 at0004 = ╱9d╱ EXEC ╱ // 0x3fef @0x4
0x3feb…4017 at0005 = ╱43╱C╱ // 0x3ff0 @0x5
0x3feb…4017 at0006 = ╱4f╱O╱ // 0x3ff1 @0x6
0x3feb…4017 at0007 = ╱4e╱N╱ // 0x3ff2 @0x7
0x3feb…4017 at0008 = ╱56╱V╱ // 0x3ff3 @0x8
0x3feb…4017 at0009 = ╱ed╱(╱ // 0x3ff4 @0x9
0x3feb…4017 at000a = ╱4f╱O╱ // 0x3ff5 @0xa
0x3feb…4017 at000b = ╱50╱P╱ // 0x3ff6 @0xb
0x3feb…4017 at000c = ╱31╱1╱ // 0x3ff7 @0xc
0x3feb…4017 at000d = ╱ef╱$╱ // 0x3ff8 @0xd
0x3feb…4017 at000e = ╱ec╱,╱ // 0x3ff9 @0xe
0x3feb…4017 at000f = ╱30╱0╱ // 0x3ffa @0xf
0x3feb…4017 at0010 = ╱fe00000000╱ // 0x3ffb @0x10
0x3feb…4017 at0015 = ╱e2╱+╱ // 0x4000 @0x15
0x3feb…4017 at0016 = ╱48╱H╱ // 0x4001 @0x16
0x3feb…4017 at0017 = ╱32╱2╱ // 0x4002 @0x17
0x3feb…4017 at0018 = ╱e8╱ MOD ╱ // 0x4003 @0x18
0x3feb…4017 at0019 = ╱31╱1╱ // 0x4004 @0x19
0x3feb…4017 at001a = ╱30╱0╱ // 0x4005 @0x1a
0x3feb…4017 at001b = ╱30╱0╱ // 0x4006 @0x1b
0x3feb…4017 at001c = ╱30╱0╱ // 0x4007 @0x1c
0x3feb…4017 at001d = ╱30╱0╱ // 0x4008 @0x1d
0x3feb…4017 at001e = ╱fe00409c0e╱ // 0x4009 @0x1e
0x3feb…4017 at0023 = ╱ec╱,╱ // 0x400e @0x23
0x3feb…4017 at0024 = ╱34╱4╱ // 0x400f @0x24
0x3feb…4017 at0025 = ╱fe00008003╱ // 0x4010 @0x25
0x3feb…4017 at002a = ╱ee╱)╱ // 0x4015 @0x2a
0x3feb…4017 at002b = EOL // 0x4016 @0x2b
0x3feb…4017 }
0x4017…4033 cd8a 8000 D5$(5:4)=OP1$
0x4017…4033 LineComalBin {
0x4017…4033 ptr = 0xcd8a // 0x4017 @0x0
0x4017…4033 lno = 0x1f40 // 0x4019 @0x2
0x4017…4033 at0004 = ╱44╱D╱ // 0x401b @0x4
0x4017…4033 at0005 = ╱35╱5╱ // 0x401c @0x5
0x4017…4033 at0006 = ╱ef╱$╱ // 0x401d @0x6
0x4017…4033 at0007 = ╱ed╱(╱ // 0x401e @0x7
0x4017…4033 at0008 = ╱35╱5╱ // 0x401f @0x8
0x4017…4033 at0009 = ╱fe0000a003╱ // 0x4020 @0x9
0x4017…4033 at000e = ╱f0╱:╱ // 0x4025 @0xe
0x4017…4033 at000f = ╱34╱4╱ // 0x4026 @0xf
0x4017…4033 at0010 = ╱fe00008003╱ // 0x4027 @0x10
0x4017…4033 at0015 = ╱ee╱)╱ // 0x402c @0x15
0x4017…4033 at0016 = ╱dc╱=╱ // 0x402d @0x16
0x4017…4033 at0017 = ╱4f╱O╱ // 0x402e @0x17
0x4017…4033 at0018 = ╱50╱P╱ // 0x402f @0x18
0x4017…4033 at0019 = ╱31╱1╱ // 0x4030 @0x19
0x4017…4033 at001a = ╱ef╱$╱ // 0x4031 @0x1a
0x4017…4033 at001b = EOL // 0x4032 @0x1b
0x4017…4033 }
0x4033…404d cda4 8010 EXEC CONV(OP1$,H3,5)
0x4033…404d LineComalBin {
0x4033…404d ptr = 0xcda4 // 0x4033 @0x0
0x4033…404d lno = 0x1f4a // 0x4035 @0x2
0x4033…404d at0004 = ╱9d╱ EXEC ╱ // 0x4037 @0x4
0x4033…404d at0005 = ╱43╱C╱ // 0x4038 @0x5
0x4033…404d at0006 = ╱4f╱O╱ // 0x4039 @0x6
0x4033…404d at0007 = ╱4e╱N╱ // 0x403a @0x7
0x4033…404d at0008 = ╱56╱V╱ // 0x403b @0x8
0x4033…404d at0009 = ╱ed╱(╱ // 0x403c @0x9
0x4033…404d at000a = ╱4f╱O╱ // 0x403d @0xa
0x4033…404d at000b = ╱50╱P╱ // 0x403e @0xb
0x4033…404d at000c = ╱31╱1╱ // 0x403f @0xc
0x4033…404d at000d = ╱ef╱$╱ // 0x4040 @0xd
0x4033…404d at000e = ╱ec╱,╱ // 0x4041 @0xe
0x4033…404d at000f = ╱48╱H╱ // 0x4042 @0xf
0x4033…404d at0010 = ╱33╱3╱ // 0x4043 @0x10
0x4033…404d at0011 = ╱ec╱,╱ // 0x4044 @0x11
0x4033…404d at0012 = ╱35╱5╱ // 0x4045 @0x12
0x4033…404d at0013 = ╱fe0000a003╱ // 0x4046 @0x13
0x4033…404d at0018 = ╱ee╱)╱ // 0x404b @0x18
0x4033…404d at0019 = EOL // 0x404c @0x19
0x4033…404d }
0x404d…406a cdc1 8020 D5$(12:5)=OP1$
0x404d…406a LineComalBin {
0x404d…406a ptr = 0xcdc1 // 0x404d @0x0
0x404d…406a lno = 0x1f54 // 0x404f @0x2
0x404d…406a at0004 = ╱44╱D╱ // 0x4051 @0x4
0x404d…406a at0005 = ╱35╱5╱ // 0x4052 @0x5
0x404d…406a at0006 = ╱ef╱$╱ // 0x4053 @0x6
0x404d…406a at0007 = ╱ed╱(╱ // 0x4054 @0x7
0x404d…406a at0008 = ╱31╱1╱ // 0x4055 @0x8
0x404d…406a at0009 = ╱32╱2╱ // 0x4056 @0x9
0x404d…406a at000a = ╱fe0000c004╱ // 0x4057 @0xa
0x404d…406a at000f = ╱f0╱:╱ // 0x405c @0xf
0x404d…406a at0010 = ╱35╱5╱ // 0x405d @0x10
0x404d…406a at0011 = ╱fe0000a003╱ // 0x405e @0x11
0x404d…406a at0016 = ╱ee╱)╱ // 0x4063 @0x16
0x404d…406a at0017 = ╱dc╱=╱ // 0x4064 @0x17
0x404d…406a at0018 = ╱4f╱O╱ // 0x4065 @0x18
0x404d…406a at0019 = ╱50╱P╱ // 0x4066 @0x19
0x404d…406a at001a = ╱31╱1╱ // 0x4067 @0x1a
0x404d…406a at001b = ╱ef╱$╱ // 0x4068 @0x1b
0x404d…406a at001c = EOL // 0x4069 @0x1c
0x404d…406a }
0x406a…4084 cddb 8030 EXEC CONV(OP1$,H4,5)
0x406a…4084 LineComalBin {
0x406a…4084 ptr = 0xcddb // 0x406a @0x0
0x406a…4084 lno = 0x1f5e // 0x406c @0x2
0x406a…4084 at0004 = ╱9d╱ EXEC ╱ // 0x406e @0x4
0x406a…4084 at0005 = ╱43╱C╱ // 0x406f @0x5
0x406a…4084 at0006 = ╱4f╱O╱ // 0x4070 @0x6
0x406a…4084 at0007 = ╱4e╱N╱ // 0x4071 @0x7
0x406a…4084 at0008 = ╱56╱V╱ // 0x4072 @0x8
0x406a…4084 at0009 = ╱ed╱(╱ // 0x4073 @0x9
0x406a…4084 at000a = ╱4f╱O╱ // 0x4074 @0xa
0x406a…4084 at000b = ╱50╱P╱ // 0x4075 @0xb
0x406a…4084 at000c = ╱31╱1╱ // 0x4076 @0xc
0x406a…4084 at000d = ╱ef╱$╱ // 0x4077 @0xd
0x406a…4084 at000e = ╱ec╱,╱ // 0x4078 @0xe
0x406a…4084 at000f = ╱48╱H╱ // 0x4079 @0xf
0x406a…4084 at0010 = ╱34╱4╱ // 0x407a @0x10
0x406a…4084 at0011 = ╱ec╱,╱ // 0x407b @0x11
0x406a…4084 at0012 = ╱35╱5╱ // 0x407c @0x12
0x406a…4084 at0013 = ╱fe0000a003╱ // 0x407d @0x13
0x406a…4084 at0018 = ╱ee╱)╱ // 0x4082 @0x18
0x406a…4084 at0019 = EOL // 0x4083 @0x19
0x406a…4084 }
0x4084…40a1 cdf8 8040 D5$(17:5)=OP1$
0x4084…40a1 LineComalBin {
0x4084…40a1 ptr = 0xcdf8 // 0x4084 @0x0
0x4084…40a1 lno = 0x1f68 // 0x4086 @0x2
0x4084…40a1 at0004 = ╱44╱D╱ // 0x4088 @0x4
0x4084…40a1 at0005 = ╱35╱5╱ // 0x4089 @0x5
0x4084…40a1 at0006 = ╱ef╱$╱ // 0x408a @0x6
0x4084…40a1 at0007 = ╱ed╱(╱ // 0x408b @0x7
0x4084…40a1 at0008 = ╱31╱1╱ // 0x408c @0x8
0x4084…40a1 at0009 = ╱37╱7╱ // 0x408d @0x9
0x4084…40a1 at000a = ╱fe00008805╱ // 0x408e @0xa
0x4084…40a1 at000f = ╱f0╱:╱ // 0x4093 @0xf
0x4084…40a1 at0010 = ╱35╱5╱ // 0x4094 @0x10
0x4084…40a1 at0011 = ╱fe0000a003╱ // 0x4095 @0x11
0x4084…40a1 at0016 = ╱ee╱)╱ // 0x409a @0x16
0x4084…40a1 at0017 = ╱dc╱=╱ // 0x409b @0x17
0x4084…40a1 at0018 = ╱4f╱O╱ // 0x409c @0x18
0x4084…40a1 at0019 = ╱50╱P╱ // 0x409d @0x19
0x4084…40a1 at001a = ╱31╱1╱ // 0x409e @0x1a
0x4084…40a1 at001b = ╱ef╱$╱ // 0x409f @0x1b
0x4084…40a1 at001c = EOL // 0x40a0 @0x1c
0x4084…40a1 }
0x40a1…40a8 cdff 8050 EXEC Å
0x40a1…40a8 LineComalBin {
0x40a1…40a8 ptr = 0xcdff // 0x40a1 @0x0
0x40a1…40a8 lno = 0x1f72 // 0x40a3 @0x2
0x40a1…40a8 at0004 = ╱9d╱ EXEC ╱ // 0x40a5 @0x4
0x40a1…40a8 at0005 = ╱5d╱Å╱ // 0x40a6 @0x5
0x40a1…40a8 at0006 = EOL // 0x40a7 @0x6
0x40a1…40a8 }
0x40a8…40c0 ce17 8055 PUT E1$:F8,B9$(7)
0x40a8…40c0 LineComalBin {
0x40a8…40c0 ptr = 0xce17 // 0x40a8 @0x0
0x40a8…40c0 lno = 0x1f77 // 0x40aa @0x2
0x40a8…40c0 at0004 = ╱aa╱ PUT ╱ // 0x40ac @0x4
0x40a8…40c0 at0005 = ╱45╱E╱ // 0x40ad @0x5
0x40a8…40c0 at0006 = ╱31╱1╱ // 0x40ae @0x6
0x40a8…40c0 at0007 = ╱ef╱$╱ // 0x40af @0x7
0x40a8…40c0 at0008 = ╱f0╱:╱ // 0x40b0 @0x8
0x40a8…40c0 at0009 = ╱46╱F╱ // 0x40b1 @0x9
0x40a8…40c0 at000a = ╱38╱8╱ // 0x40b2 @0xa
0x40a8…40c0 at000b = ╱ec╱,╱ // 0x40b3 @0xb
0x40a8…40c0 at000c = ╱42╱B╱ // 0x40b4 @0xc
0x40a8…40c0 at000d = ╱39╱9╱ // 0x40b5 @0xd
0x40a8…40c0 at000e = ╱ef╱$╱ // 0x40b6 @0xe
0x40a8…40c0 at000f = ╱ed╱(╱ // 0x40b7 @0xf
0x40a8…40c0 at0010 = ╱37╱7╱ // 0x40b8 @0x10
0x40a8…40c0 at0011 = ╱fe0000e003╱ // 0x40b9 @0x11
0x40a8…40c0 at0016 = ╱ee╱)╱ // 0x40be @0x16
0x40a8…40c0 at0017 = EOL // 0x40bf @0x17
0x40a8…40c0 }
0x40c0…40c6 ce1d 8060 ENDIF
0x40c0…40c6 LineComalBin {
0x40c0…40c6 ptr = 0xce1d // 0x40c0 @0x0
0x40c0…40c6 lno = 0x1f7c // 0x40c2 @0x2
0x40c0…40c6 at0004 = ╱9b╱ ENDIF ╱ // 0x40c4 @0x4
0x40c0…40c6 at0005 = EOL // 0x40c5 @0x5
0x40c0…40c6 }
0x40c6…40cc ce23 8070 ENDIF
0x40c6…40cc LineComalBin {
0x40c6…40cc ptr = 0xce23 // 0x40c6 @0x0
0x40c6…40cc lno = 0x1f86 // 0x40c8 @0x2
0x40c6…40cc at0004 = ╱9b╱ ENDIF ╱ // 0x40ca @0x4
0x40c6…40cc at0005 = EOL // 0x40cb @0x5
0x40c6…40cc }
0x40cc…40d2 ce29 8080 ELSE
0x40cc…40d2 LineComalBin {
0x40cc…40d2 ptr = 0xce29 // 0x40cc @0x0
0x40cc…40d2 lno = 0x1f90 // 0x40ce @0x2
0x40cc…40d2 at0004 = ╱9a╱ ELSE ╱ // 0x40d0 @0x4
0x40cc…40d2 at0005 = EOL // 0x40d1 @0x5
0x40cc…40d2 }
0x40d2…40db ce32 8090 SI=G
0x40d2…40db LineComalBin {
0x40d2…40db ptr = 0xce32 // 0x40d2 @0x0
0x40d2…40db lno = 0x1f9a // 0x40d4 @0x2
0x40d2…40db at0004 = ╱53╱S╱ // 0x40d6 @0x4
0x40d2…40db at0005 = ╱49╱I╱ // 0x40d7 @0x5
0x40d2…40db at0006 = ╱dc╱=╱ // 0x40d8 @0x6
0x40d2…40db at0007 = ╱47╱G╱ // 0x40d9 @0x7
0x40d2…40db at0008 = EOL // 0x40da @0x8
0x40d2…40db }
0x40db…40e1 ce38 8100 ENDIF
0x40db…40e1 LineComalBin {
0x40db…40e1 ptr = 0xce38 // 0x40db @0x0
0x40db…40e1 lno = 0x1fa4 // 0x40dd @0x2
0x40db…40e1 at0004 = ╱9b╱ ENDIF ╱ // 0x40df @0x4
0x40db…40e1 at0005 = EOL // 0x40e0 @0x5
0x40db…40e1 }
0x40e1…40ec ce43 8110 IF SI=G THEN
0x40e1…40ec LineComalBin {
0x40e1…40ec ptr = 0xce43 // 0x40e1 @0x0
0x40e1…40ec lno = 0x1fae // 0x40e3 @0x2
0x40e1…40ec at0004 = ╱9c╱ IF ╱ // 0x40e5 @0x4
0x40e1…40ec at0005 = ╱53╱S╱ // 0x40e6 @0x5
0x40e1…40ec at0006 = ╱49╱I╱ // 0x40e7 @0x6
0x40e1…40ec at0007 = ╱dc╱=╱ // 0x40e8 @0x7
0x40e1…40ec at0008 = ╱47╱G╱ // 0x40e9 @0x8
0x40e1…40ec at0009 = ╱b6╱ THEN ╱ // 0x40ea @0x9
0x40e1…40ec at000a = EOL // 0x40eb @0xa
0x40e1…40ec }
0x40ec…40fc ce53 8120 EXEC Z(89)
0x40ec…40fc LineComalBin {
0x40ec…40fc ptr = 0xce53 // 0x40ec @0x0
0x40ec…40fc lno = 0x1fb8 // 0x40ee @0x2
0x40ec…40fc at0004 = ╱9d╱ EXEC ╱ // 0x40f0 @0x4
0x40ec…40fc at0005 = ╱5a╱Z╱ // 0x40f1 @0x5
0x40ec…40fc at0006 = ╱ed╱(╱ // 0x40f2 @0x6
0x40ec…40fc at0007 = ╱38╱8╱ // 0x40f3 @0x7
0x40ec…40fc at0008 = ╱39╱9╱ // 0x40f4 @0x8
0x40ec…40fc at0009 = ╱fe0000b207╱ // 0x40f5 @0x9
0x40ec…40fc at000e = ╱ee╱)╱ // 0x40fa @0xe
0x40ec…40fc at000f = EOL // 0x40fb @0xf
0x40ec…40fc }
0x40fc…413d ce94 8130 F0$(64+6*(B9$(7,EL)="-"):TI)=B9$(7,E:TI)
0x40fc…413d LineComalBin {
0x40fc…413d ptr = 0xce94 // 0x40fc @0x0
0x40fc…413d lno = 0x1fc2 // 0x40fe @0x2
0x40fc…413d at0004 = ╱46╱F╱ // 0x4100 @0x4
0x40fc…413d at0005 = ╱30╱0╱ // 0x4101 @0x5
0x40fc…413d at0006 = ╱ef╱$╱ // 0x4102 @0x6
0x40fc…413d at0007 = ╱ed╱(╱ // 0x4103 @0x7
0x40fc…413d at0008 = ╱36╱6╱ // 0x4104 @0x8
0x40fc…413d at0009 = ╱34╱4╱ // 0x4105 @0x9
0x40fc…413d at000a = ╱fe00008007╱ // 0x4106 @0xa
0x40fc…413d at000f = ╱e2╱+╱ // 0x410b @0xf
0x40fc…413d at0010 = ╱36╱6╱ // 0x410c @0x10
0x40fc…413d at0011 = ╱fe0000c003╱ // 0x410d @0x11
0x40fc…413d at0016 = ╱e4╱*╱ // 0x4112 @0x16
0x40fc…413d at0017 = ╱ed╱(╱ // 0x4113 @0x17
0x40fc…413d at0018 = ╱42╱B╱ // 0x4114 @0x18
0x40fc…413d at0019 = ╱39╱9╱ // 0x4115 @0x19
0x40fc…413d at001a = ╱ef╱$╱ // 0x4116 @0x1a
0x40fc…413d at001b = ╱ed╱(╱ // 0x4117 @0x1b
0x40fc…413d at001c = ╱37╱7╱ // 0x4118 @0x1c
0x40fc…413d at001d = ╱fe0000e003╱ // 0x4119 @0x1d
0x40fc…413d at0022 = ╱ec╱,╱ // 0x411e @0x22
0x40fc…413d at0023 = ╱45╱E╱ // 0x411f @0x23
0x40fc…413d at0024 = ╱4c╱L╱ // 0x4120 @0x24
0x40fc…413d at0025 = ╱ee╱)╱ // 0x4121 @0x25
0x40fc…413d at0026 = ╱dc╱=╱ // 0x4122 @0x26
0x40fc…413d at0027 = ╱22╱"╱ // 0x4123 @0x27
0x40fc…413d at0028 = ╱2d╱-╱ // 0x4124 @0x28
0x40fc…413d at0029 = ╱22╱"╱ // 0x4125 @0x29
0x40fc…413d at002a = ╱ee╱)╱ // 0x4126 @0x2a
0x40fc…413d at002b = ╱f0╱:╱ // 0x4127 @0x2b
0x40fc…413d at002c = ╱54╱T╱ // 0x4128 @0x2c
0x40fc…413d at002d = ╱49╱I╱ // 0x4129 @0x2d
0x40fc…413d at002e = ╱ee╱)╱ // 0x412a @0x2e
0x40fc…413d at002f = ╱dc╱=╱ // 0x412b @0x2f
0x40fc…413d at0030 = ╱42╱B╱ // 0x412c @0x30
0x40fc…413d at0031 = ╱39╱9╱ // 0x412d @0x31
0x40fc…413d at0032 = ╱ef╱$╱ // 0x412e @0x32
0x40fc…413d at0033 = ╱ed╱(╱ // 0x412f @0x33
0x40fc…413d at0034 = ╱37╱7╱ // 0x4130 @0x34
0x40fc…413d at0035 = ╱fe0000e003╱ // 0x4131 @0x35
0x40fc…413d at003a = ╱ec╱,╱ // 0x4136 @0x3a
0x40fc…413d at003b = ╱45╱E╱ // 0x4137 @0x3b
0x40fc…413d at003c = ╱f0╱:╱ // 0x4138 @0x3c
0x40fc…413d at003d = ╱54╱T╱ // 0x4139 @0x3d
0x40fc…413d at003e = ╱49╱I╱ // 0x413a @0x3e
0x40fc…413d at003f = ╱ee╱)╱ // 0x413b @0x3f
0x40fc…413d at0040 = EOL // 0x413c @0x40
0x40fc…413d }
0x413d…415c ceb3 8135 C8$(E,TI)=B9$(7,G:TI)
0x413d…415c LineComalBin {
0x413d…415c ptr = 0xceb3 // 0x413d @0x0
0x413d…415c lno = 0x1fc7 // 0x413f @0x2
0x413d…415c at0004 = ╱43╱C╱ // 0x4141 @0x4
0x413d…415c at0005 = ╱38╱8╱ // 0x4142 @0x5
0x413d…415c at0006 = ╱ef╱$╱ // 0x4143 @0x6
0x413d…415c at0007 = ╱ed╱(╱ // 0x4144 @0x7
0x413d…415c at0008 = ╱45╱E╱ // 0x4145 @0x8
0x413d…415c at0009 = ╱ec╱,╱ // 0x4146 @0x9
0x413d…415c at000a = ╱54╱T╱ // 0x4147 @0xa
0x413d…415c at000b = ╱49╱I╱ // 0x4148 @0xb
0x413d…415c at000c = ╱ee╱)╱ // 0x4149 @0xc
0x413d…415c at000d = ╱dc╱=╱ // 0x414a @0xd
0x413d…415c at000e = ╱42╱B╱ // 0x414b @0xe
0x413d…415c at000f = ╱39╱9╱ // 0x414c @0xf
0x413d…415c at0010 = ╱ef╱$╱ // 0x414d @0x10
0x413d…415c at0011 = ╱ed╱(╱ // 0x414e @0x11
0x413d…415c at0012 = ╱37╱7╱ // 0x414f @0x12
0x413d…415c at0013 = ╱fe0000e003╱ // 0x4150 @0x13
0x413d…415c at0018 = ╱ec╱,╱ // 0x4155 @0x18
0x413d…415c at0019 = ╱47╱G╱ // 0x4156 @0x19
0x413d…415c at001a = ╱f0╱:╱ // 0x4157 @0x1a
0x413d…415c at001b = ╱54╱T╱ // 0x4158 @0x1b
0x413d…415c at001c = ╱49╱I╱ // 0x4159 @0x1c
0x413d…415c at001d = ╱ee╱)╱ // 0x415a @0x1d
0x413d…415c at001e = EOL // 0x415b @0x1e
0x413d…415c }
0x415c…4163 ceba 8140 EXEC Å
0x415c…4163 LineComalBin {
0x415c…4163 ptr = 0xceba // 0x415c @0x0
0x415c…4163 lno = 0x1fcc // 0x415e @0x2
0x415c…4163 at0004 = ╱9d╱ EXEC ╱ // 0x4160 @0x4
0x415c…4163 at0005 = ╱5d╱Å╱ // 0x4161 @0x5
0x415c…4163 at0006 = EOL // 0x4162 @0x6
0x415c…4163 }
0x4163…4169 cec0 8150 ENDIF
0x4163…4169 LineComalBin {
0x4163…4169 ptr = 0xcec0 // 0x4163 @0x0
0x4163…4169 lno = 0x1fd6 // 0x4165 @0x2
0x4163…4169 at0004 = ╱9b╱ ENDIF ╱ // 0x4167 @0x4
0x4163…4169 at0005 = EOL // 0x4168 @0x5
0x4163…4169 }
0x4169…4178 cecf 8160 EXEC SKRIVBUND
0x4169…4178 LineComalBin {
0x4169…4178 ptr = 0xcecf // 0x4169 @0x0
0x4169…4178 lno = 0x1fe0 // 0x416b @0x2
0x4169…4178 at0004 = ╱9d╱ EXEC ╱ // 0x416d @0x4
0x4169…4178 at0005 = ╱53╱S╱ // 0x416e @0x5
0x4169…4178 at0006 = ╱4b╱K╱ // 0x416f @0x6
0x4169…4178 at0007 = ╱52╱R╱ // 0x4170 @0x7
0x4169…4178 at0008 = ╱49╱I╱ // 0x4171 @0x8
0x4169…4178 at0009 = ╱56╱V╱ // 0x4172 @0x9
0x4169…4178 at000a = ╱42╱B╱ // 0x4173 @0xa
0x4169…4178 at000b = ╱55╱U╱ // 0x4174 @0xb
0x4169…4178 at000c = ╱4e╱N╱ // 0x4175 @0xc
0x4169…4178 at000d = ╱44╱D╱ // 0x4176 @0xd
0x4169…4178 at000e = EOL // 0x4177 @0xe
0x4169…4178 }
0x4178…4181 ced8 8161 K2=E
0x4178…4181 LineComalBin {
0x4178…4181 ptr = 0xced8 // 0x4178 @0x0
0x4178…4181 lno = 0x1fe1 // 0x417a @0x2
0x4178…4181 at0004 = ╱4b╱K╱ // 0x417c @0x4
0x4178…4181 at0005 = ╱32╱2╱ // 0x417d @0x5
0x4178…4181 at0006 = ╱dc╱=╱ // 0x417e @0x6
0x4178…4181 at0007 = ╱45╱E╱ // 0x417f @0x7
0x4178…4181 at0008 = EOL // 0x4180 @0x8
0x4178…4181 }
0x4181…4187 cede 8162 ELSE
0x4181…4187 LineComalBin {
0x4181…4187 ptr = 0xcede // 0x4181 @0x0
0x4181…4187 lno = 0x1fe2 // 0x4183 @0x2
0x4181…4187 at0004 = ╱9a╱ ELSE ╱ // 0x4185 @0x4
0x4181…4187 at0005 = EOL // 0x4186 @0x5
0x4181…4187 }
0x4187…4190 cee7 8163 K2=B
0x4187…4190 LineComalBin {
0x4187…4190 ptr = 0xcee7 // 0x4187 @0x0
0x4187…4190 lno = 0x1fe3 // 0x4189 @0x2
0x4187…4190 at0004 = ╱4b╱K╱ // 0x418b @0x4
0x4187…4190 at0005 = ╱32╱2╱ // 0x418c @0x5
0x4187…4190 at0006 = ╱dc╱=╱ // 0x418d @0x6
0x4187…4190 at0007 = ╱42╱B╱ // 0x418e @0x7
0x4187…4190 at0008 = EOL // 0x418f @0x8
0x4187…4190 }
0x4190…4196 ceed 8170 ENDIF
0x4190…4196 LineComalBin {
0x4190…4196 ptr = 0xceed // 0x4190 @0x0
0x4190…4196 lno = 0x1fea // 0x4192 @0x2
0x4190…4196 at0004 = ╱9b╱ ENDIF ╱ // 0x4194 @0x4
0x4190…4196 at0005 = EOL // 0x4195 @0x5
0x4190…4196 }
0x4196…419c cef3 8180 ENDPROC
0x4196…419c LineComalBin {
0x4196…419c ptr = 0xcef3 // 0x4196 @0x0
0x4196…419c lno = 0x1ff4 // 0x4198 @0x2
0x4196…419c at0004 = ╱9f╱ ENDPROC ╱ // 0x419a @0x4
0x4196…419c at0005 = EOL // 0x419b @0x5
0x4196…419c }
0x419c…41af cf06 8181 D8$="P641220:"
0x419c…41af LineComalBin {
0x419c…41af ptr = 0xcf06 // 0x419c @0x0
0x419c…41af lno = 0x1ff5 // 0x419e @0x2
0x419c…41af at0004 = ╱44╱D╱ // 0x41a0 @0x4
0x419c…41af at0005 = ╱38╱8╱ // 0x41a1 @0x5
0x419c…41af at0006 = ╱ef╱$╱ // 0x41a2 @0x6
0x419c…41af at0007 = ╱dc╱=╱ // 0x41a3 @0x7
0x419c…41af at0008 = ╱22╱"╱ // 0x41a4 @0x8
0x419c…41af at0009 = ╱50╱P╱ // 0x41a5 @0x9
0x419c…41af at000a = ╱36╱6╱ // 0x41a6 @0xa
0x419c…41af at000b = ╱34╱4╱ // 0x41a7 @0xb
0x419c…41af at000c = ╱31╱1╱ // 0x41a8 @0xc
0x419c…41af at000d = ╱32╱2╱ // 0x41a9 @0xd
0x419c…41af at000e = ╱32╱2╱ // 0x41aa @0xe
0x419c…41af at000f = ╱30╱0╱ // 0x41ab @0xf
0x419c…41af at0010 = ╱3a╱:╱ // 0x41ac @0x10
0x419c…41af at0011 = ╱22╱"╱ // 0x41ad @0x11
0x419c…41af at0012 = EOL // 0x41ae @0x12
0x419c…41af }
0x41af…41c2 cf19 8182 E1$="P641210:"
0x41af…41c2 LineComalBin {
0x41af…41c2 ptr = 0xcf19 // 0x41af @0x0
0x41af…41c2 lno = 0x1ff6 // 0x41b1 @0x2
0x41af…41c2 at0004 = ╱45╱E╱ // 0x41b3 @0x4
0x41af…41c2 at0005 = ╱31╱1╱ // 0x41b4 @0x5
0x41af…41c2 at0006 = ╱ef╱$╱ // 0x41b5 @0x6
0x41af…41c2 at0007 = ╱dc╱=╱ // 0x41b6 @0x7
0x41af…41c2 at0008 = ╱22╱"╱ // 0x41b7 @0x8
0x41af…41c2 at0009 = ╱50╱P╱ // 0x41b8 @0x9
0x41af…41c2 at000a = ╱36╱6╱ // 0x41b9 @0xa
0x41af…41c2 at000b = ╱34╱4╱ // 0x41ba @0xb
0x41af…41c2 at000c = ╱31╱1╱ // 0x41bb @0xc
0x41af…41c2 at000d = ╱32╱2╱ // 0x41bc @0xd
0x41af…41c2 at000e = ╱31╱1╱ // 0x41bd @0xe
0x41af…41c2 at000f = ╱30╱0╱ // 0x41be @0xf
0x41af…41c2 at0010 = ╱3a╱:╱ // 0x41bf @0x10
0x41af…41c2 at0011 = ╱22╱"╱ // 0x41c0 @0x11
0x41af…41c2 at0012 = EOL // 0x41c1 @0x12
0x41af…41c2 }
0x41c2…41d9 cf30 8190 C9$=D8$+"VIRKKART"
0x41c2…41d9 LineComalBin {
0x41c2…41d9 ptr = 0xcf30 // 0x41c2 @0x0
0x41c2…41d9 lno = 0x1ffe // 0x41c4 @0x2
0x41c2…41d9 at0004 = ╱43╱C╱ // 0x41c6 @0x4
0x41c2…41d9 at0005 = ╱39╱9╱ // 0x41c7 @0x5
0x41c2…41d9 at0006 = ╱ef╱$╱ // 0x41c8 @0x6
0x41c2…41d9 at0007 = ╱dc╱=╱ // 0x41c9 @0x7
0x41c2…41d9 at0008 = ╱44╱D╱ // 0x41ca @0x8
0x41c2…41d9 at0009 = ╱38╱8╱ // 0x41cb @0x9
0x41c2…41d9 at000a = ╱ef╱$╱ // 0x41cc @0xa
0x41c2…41d9 at000b = ╱f1╱+╱ // 0x41cd @0xb
0x41c2…41d9 at000c = ╱22╱"╱ // 0x41ce @0xc
0x41c2…41d9 at000d = ╱56╱V╱ // 0x41cf @0xd
0x41c2…41d9 at000e = ╱49╱I╱ // 0x41d0 @0xe
0x41c2…41d9 at000f = ╱52╱R╱ // 0x41d1 @0xf
0x41c2…41d9 at0010 = ╱4b╱K╱ // 0x41d2 @0x10
0x41c2…41d9 at0011 = ╱4b╱K╱ // 0x41d3 @0x11
0x41c2…41d9 at0012 = ╱41╱A╱ // 0x41d4 @0x12
0x41c2…41d9 at0013 = ╱52╱R╱ // 0x41d5 @0x13
0x41c2…41d9 at0014 = ╱54╱T╱ // 0x41d6 @0x14
0x41c2…41d9 at0015 = ╱22╱"╱ // 0x41d7 @0x15
0x41c2…41d9 at0016 = EOL // 0x41d8 @0x16
0x41c2…41d9 }
0x41d9…41e6 cf3d 8200 EXEC INDVIRK
0x41d9…41e6 LineComalBin {
0x41d9…41e6 ptr = 0xcf3d // 0x41d9 @0x0
0x41d9…41e6 lno = 0x2008 // 0x41db @0x2
0x41d9…41e6 at0004 = ╱9d╱ EXEC ╱ // 0x41dd @0x4
0x41d9…41e6 at0005 = ╱49╱I╱ // 0x41de @0x5
0x41d9…41e6 at0006 = ╱4e╱N╱ // 0x41df @0x6
0x41d9…41e6 at0007 = ╱44╱D╱ // 0x41e0 @0x7
0x41d9…41e6 at0008 = ╱56╱V╱ // 0x41e1 @0x8
0x41d9…41e6 at0009 = ╱49╱I╱ // 0x41e2 @0x9
0x41d9…41e6 at000a = ╱52╱R╱ // 0x41e3 @0xa
0x41d9…41e6 at000b = ╱4b╱K╱ // 0x41e4 @0xb
0x41d9…41e6 at000c = EOL // 0x41e5 @0xc
0x41d9…41e6 }
0x41e6…41ef cf46 8210 CLOSE C9$
0x41e6…41ef LineComalBin {
0x41e6…41ef ptr = 0xcf46 // 0x41e6 @0x0
0x41e6…41ef lno = 0x2012 // 0x41e8 @0x2
0x41e6…41ef at0004 = ╱a8╱ CLOSE ╱ // 0x41ea @0x4
0x41e6…41ef at0005 = ╱43╱C╱ // 0x41eb @0x5
0x41e6…41ef at0006 = ╱39╱9╱ // 0x41ec @0x6
0x41e6…41ef at0007 = ╱ef╱$╱ // 0x41ed @0x7
0x41e6…41ef at0008 = EOL // 0x41ee @0x8
0x41e6…41ef }
0x41ef…4205 cf5c 8211 C9$=E1$+"PARMFIL"
0x41ef…4205 LineComalBin {
0x41ef…4205 ptr = 0xcf5c // 0x41ef @0x0
0x41ef…4205 lno = 0x2013 // 0x41f1 @0x2
0x41ef…4205 at0004 = ╱43╱C╱ // 0x41f3 @0x4
0x41ef…4205 at0005 = ╱39╱9╱ // 0x41f4 @0x5
0x41ef…4205 at0006 = ╱ef╱$╱ // 0x41f5 @0x6
0x41ef…4205 at0007 = ╱dc╱=╱ // 0x41f6 @0x7
0x41ef…4205 at0008 = ╱45╱E╱ // 0x41f7 @0x8
0x41ef…4205 at0009 = ╱31╱1╱ // 0x41f8 @0x9
0x41ef…4205 at000a = ╱ef╱$╱ // 0x41f9 @0xa
0x41ef…4205 at000b = ╱f1╱+╱ // 0x41fa @0xb
0x41ef…4205 at000c = ╱22╱"╱ // 0x41fb @0xc
0x41ef…4205 at000d = ╱50╱P╱ // 0x41fc @0xd
0x41ef…4205 at000e = ╱41╱A╱ // 0x41fd @0xe
0x41ef…4205 at000f = ╱52╱R╱ // 0x41fe @0xf
0x41ef…4205 at0010 = ╱4d╱M╱ // 0x41ff @0x10
0x41ef…4205 at0011 = ╱46╱F╱ // 0x4200 @0x11
0x41ef…4205 at0012 = ╱49╱I╱ // 0x4201 @0x12
0x41ef…4205 at0013 = ╱4c╱L╱ // 0x4202 @0x13
0x41ef…4205 at0014 = ╱22╱"╱ // 0x4203 @0x14
0x41ef…4205 at0015 = EOL // 0x4204 @0x15
0x41ef…4205 }
0x4205…4210 cf67 8212 OPEN C9$,R
0x4205…4210 LineComalBin {
0x4205…4210 ptr = 0xcf67 // 0x4205 @0x0
0x4205…4210 lno = 0x2014 // 0x4207 @0x2
0x4205…4210 at0004 = ╱a7╱ OPEN ╱ // 0x4209 @0x4
0x4205…4210 at0005 = ╱43╱C╱ // 0x420a @0x5
0x4205…4210 at0006 = ╱39╱9╱ // 0x420b @0x6
0x4205…4210 at0007 = ╱ef╱$╱ // 0x420c @0x7
0x4205…4210 at0008 = ╱ec╱,╱ // 0x420d @0x8
0x4205…4210 at0009 = ╱52╱R╱ // 0x420e @0x9
0x4205…4210 at000a = EOL // 0x420f @0xa
0x4205…4210 }
0x4210…4232 cf89 8213 GET C9$:A7$,A8$,DD$,E3,I6,I7,A9$
0x4210…4232 LineComalBin {
0x4210…4232 ptr = 0xcf89 // 0x4210 @0x0
0x4210…4232 lno = 0x2015 // 0x4212 @0x2
0x4210…4232 at0004 = ╱a9╱ GET ╱ // 0x4214 @0x4
0x4210…4232 at0005 = ╱43╱C╱ // 0x4215 @0x5
0x4210…4232 at0006 = ╱39╱9╱ // 0x4216 @0x6
0x4210…4232 at0007 = ╱ef╱$╱ // 0x4217 @0x7
0x4210…4232 at0008 = ╱f0╱:╱ // 0x4218 @0x8
0x4210…4232 at0009 = ╱41╱A╱ // 0x4219 @0x9
0x4210…4232 at000a = ╱37╱7╱ // 0x421a @0xa
0x4210…4232 at000b = ╱ef╱$╱ // 0x421b @0xb
0x4210…4232 at000c = ╱ec╱,╱ // 0x421c @0xc
0x4210…4232 at000d = ╱41╱A╱ // 0x421d @0xd
0x4210…4232 at000e = ╱38╱8╱ // 0x421e @0xe
0x4210…4232 at000f = ╱ef╱$╱ // 0x421f @0xf
0x4210…4232 at0010 = ╱ec╱,╱ // 0x4220 @0x10
0x4210…4232 at0011 = ╱44╱D╱ // 0x4221 @0x11
0x4210…4232 at0012 = ╱44╱D╱ // 0x4222 @0x12
0x4210…4232 at0013 = ╱ef╱$╱ // 0x4223 @0x13
0x4210…4232 at0014 = ╱ec╱,╱ // 0x4224 @0x14
0x4210…4232 at0015 = ╱45╱E╱ // 0x4225 @0x15
0x4210…4232 at0016 = ╱33╱3╱ // 0x4226 @0x16
0x4210…4232 at0017 = ╱ec╱,╱ // 0x4227 @0x17
0x4210…4232 at0018 = ╱49╱I╱ // 0x4228 @0x18
0x4210…4232 at0019 = ╱36╱6╱ // 0x4229 @0x19
0x4210…4232 at001a = ╱ec╱,╱ // 0x422a @0x1a
0x4210…4232 at001b = ╱49╱I╱ // 0x422b @0x1b
0x4210…4232 at001c = ╱37╱7╱ // 0x422c @0x1c
0x4210…4232 at001d = ╱ec╱,╱ // 0x422d @0x1d
0x4210…4232 at001e = ╱41╱A╱ // 0x422e @0x1e
0x4210…4232 at001f = ╱39╱9╱ // 0x422f @0x1f
0x4210…4232 at0020 = ╱ef╱$╱ // 0x4230 @0x20
0x4210…4232 at0021 = EOL // 0x4231 @0x21
0x4210…4232 }
0x4232…4263 cfba 8214 GET C9$:B0$,A1(E),A1(G),A1(V),A2(E),A2(G),A2(V)
0x4232…4263 LineComalBin {
0x4232…4263 ptr = 0xcfba // 0x4232 @0x0
0x4232…4263 lno = 0x2016 // 0x4234 @0x2
0x4232…4263 at0004 = ╱a9╱ GET ╱ // 0x4236 @0x4
0x4232…4263 at0005 = ╱43╱C╱ // 0x4237 @0x5
0x4232…4263 at0006 = ╱39╱9╱ // 0x4238 @0x6
0x4232…4263 at0007 = ╱ef╱$╱ // 0x4239 @0x7
0x4232…4263 at0008 = ╱f0╱:╱ // 0x423a @0x8
0x4232…4263 at0009 = ╱42╱B╱ // 0x423b @0x9
0x4232…4263 at000a = ╱30╱0╱ // 0x423c @0xa
0x4232…4263 at000b = ╱ef╱$╱ // 0x423d @0xb
0x4232…4263 at000c = ╱ec╱,╱ // 0x423e @0xc
0x4232…4263 at000d = ╱41╱A╱ // 0x423f @0xd
0x4232…4263 at000e = ╱31╱1╱ // 0x4240 @0xe
0x4232…4263 at000f = ╱ed╱(╱ // 0x4241 @0xf
0x4232…4263 at0010 = ╱45╱E╱ // 0x4242 @0x10
0x4232…4263 at0011 = ╱ee╱)╱ // 0x4243 @0x11
0x4232…4263 at0012 = ╱ec╱,╱ // 0x4244 @0x12
0x4232…4263 at0013 = ╱41╱A╱ // 0x4245 @0x13
0x4232…4263 at0014 = ╱31╱1╱ // 0x4246 @0x14
0x4232…4263 at0015 = ╱ed╱(╱ // 0x4247 @0x15
0x4232…4263 at0016 = ╱47╱G╱ // 0x4248 @0x16
0x4232…4263 at0017 = ╱ee╱)╱ // 0x4249 @0x17
0x4232…4263 at0018 = ╱ec╱,╱ // 0x424a @0x18
0x4232…4263 at0019 = ╱41╱A╱ // 0x424b @0x19
0x4232…4263 at001a = ╱31╱1╱ // 0x424c @0x1a
0x4232…4263 at001b = ╱ed╱(╱ // 0x424d @0x1b
0x4232…4263 at001c = ╱56╱V╱ // 0x424e @0x1c
0x4232…4263 at001d = ╱ee╱)╱ // 0x424f @0x1d
0x4232…4263 at001e = ╱ec╱,╱ // 0x4250 @0x1e
0x4232…4263 at001f = ╱41╱A╱ // 0x4251 @0x1f
0x4232…4263 at0020 = ╱32╱2╱ // 0x4252 @0x20
0x4232…4263 at0021 = ╱ed╱(╱ // 0x4253 @0x21
0x4232…4263 at0022 = ╱45╱E╱ // 0x4254 @0x22
0x4232…4263 at0023 = ╱ee╱)╱ // 0x4255 @0x23
0x4232…4263 at0024 = ╱ec╱,╱ // 0x4256 @0x24
0x4232…4263 at0025 = ╱41╱A╱ // 0x4257 @0x25
0x4232…4263 at0026 = ╱32╱2╱ // 0x4258 @0x26
0x4232…4263 at0027 = ╱ed╱(╱ // 0x4259 @0x27
0x4232…4263 at0028 = ╱47╱G╱ // 0x425a @0x28
0x4232…4263 at0029 = ╱ee╱)╱ // 0x425b @0x29
0x4232…4263 at002a = ╱ec╱,╱ // 0x425c @0x2a
0x4232…4263 at002b = ╱41╱A╱ // 0x425d @0x2b
0x4232…4263 at002c = ╱32╱2╱ // 0x425e @0x2c
0x4232…4263 at002d = ╱ed╱(╱ // 0x425f @0x2d
0x4232…4263 at002e = ╱56╱V╱ // 0x4260 @0x2e
0x4232…4263 at002f = ╱ee╱)╱ // 0x4261 @0x2f
0x4232…4263 at0030 = EOL // 0x4262 @0x30
0x4232…4263 }
0x4263…4290 cfe7 8215 GET C9$:A4(E),A4(G),A4(V),A5(E),A5(G),A5(V)
0x4263…4290 LineComalBin {
0x4263…4290 ptr = 0xcfe7 // 0x4263 @0x0
0x4263…4290 lno = 0x2017 // 0x4265 @0x2
0x4263…4290 at0004 = ╱a9╱ GET ╱ // 0x4267 @0x4
0x4263…4290 at0005 = ╱43╱C╱ // 0x4268 @0x5
0x4263…4290 at0006 = ╱39╱9╱ // 0x4269 @0x6
0x4263…4290 at0007 = ╱ef╱$╱ // 0x426a @0x7
0x4263…4290 at0008 = ╱f0╱:╱ // 0x426b @0x8
0x4263…4290 at0009 = ╱41╱A╱ // 0x426c @0x9
0x4263…4290 at000a = ╱34╱4╱ // 0x426d @0xa
0x4263…4290 at000b = ╱ed╱(╱ // 0x426e @0xb
0x4263…4290 at000c = ╱45╱E╱ // 0x426f @0xc
0x4263…4290 at000d = ╱ee╱)╱ // 0x4270 @0xd
0x4263…4290 at000e = ╱ec╱,╱ // 0x4271 @0xe
0x4263…4290 at000f = ╱41╱A╱ // 0x4272 @0xf
0x4263…4290 at0010 = ╱34╱4╱ // 0x4273 @0x10
0x4263…4290 at0011 = ╱ed╱(╱ // 0x4274 @0x11
0x4263…4290 at0012 = ╱47╱G╱ // 0x4275 @0x12
0x4263…4290 at0013 = ╱ee╱)╱ // 0x4276 @0x13
0x4263…4290 at0014 = ╱ec╱,╱ // 0x4277 @0x14
0x4263…4290 at0015 = ╱41╱A╱ // 0x4278 @0x15
0x4263…4290 at0016 = ╱34╱4╱ // 0x4279 @0x16
0x4263…4290 at0017 = ╱ed╱(╱ // 0x427a @0x17
0x4263…4290 at0018 = ╱56╱V╱ // 0x427b @0x18
0x4263…4290 at0019 = ╱ee╱)╱ // 0x427c @0x19
0x4263…4290 at001a = ╱ec╱,╱ // 0x427d @0x1a
0x4263…4290 at001b = ╱41╱A╱ // 0x427e @0x1b
0x4263…4290 at001c = ╱35╱5╱ // 0x427f @0x1c
0x4263…4290 at001d = ╱ed╱(╱ // 0x4280 @0x1d
0x4263…4290 at001e = ╱45╱E╱ // 0x4281 @0x1e
0x4263…4290 at001f = ╱ee╱)╱ // 0x4282 @0x1f
0x4263…4290 at0020 = ╱ec╱,╱ // 0x4283 @0x20
0x4263…4290 at0021 = ╱41╱A╱ // 0x4284 @0x21
0x4263…4290 at0022 = ╱35╱5╱ // 0x4285 @0x22
0x4263…4290 at0023 = ╱ed╱(╱ // 0x4286 @0x23
0x4263…4290 at0024 = ╱47╱G╱ // 0x4287 @0x24
0x4263…4290 at0025 = ╱ee╱)╱ // 0x4288 @0x25
0x4263…4290 at0026 = ╱ec╱,╱ // 0x4289 @0x26
0x4263…4290 at0027 = ╱41╱A╱ // 0x428a @0x27
0x4263…4290 at0028 = ╱35╱5╱ // 0x428b @0x28
0x4263…4290 at0029 = ╱ed╱(╱ // 0x428c @0x29
0x4263…4290 at002a = ╱56╱V╱ // 0x428d @0x2a
0x4263…4290 at002b = ╱ee╱)╱ // 0x428e @0x2b
0x4263…4290 at002c = EOL // 0x428f @0x2c
0x4263…4290 }
0x4290…42b1 d008 8216 GET C9$:A3(E),A3(G),A3(V),E4,E5
0x4290…42b1 LineComalBin {
0x4290…42b1 ptr = 0xd008 // 0x4290 @0x0
0x4290…42b1 lno = 0x2018 // 0x4292 @0x2
0x4290…42b1 at0004 = ╱a9╱ GET ╱ // 0x4294 @0x4
0x4290…42b1 at0005 = ╱43╱C╱ // 0x4295 @0x5
0x4290…42b1 at0006 = ╱39╱9╱ // 0x4296 @0x6
0x4290…42b1 at0007 = ╱ef╱$╱ // 0x4297 @0x7
0x4290…42b1 at0008 = ╱f0╱:╱ // 0x4298 @0x8
0x4290…42b1 at0009 = ╱41╱A╱ // 0x4299 @0x9
0x4290…42b1 at000a = ╱33╱3╱ // 0x429a @0xa
0x4290…42b1 at000b = ╱ed╱(╱ // 0x429b @0xb
0x4290…42b1 at000c = ╱45╱E╱ // 0x429c @0xc
0x4290…42b1 at000d = ╱ee╱)╱ // 0x429d @0xd
0x4290…42b1 at000e = ╱ec╱,╱ // 0x429e @0xe
0x4290…42b1 at000f = ╱41╱A╱ // 0x429f @0xf
0x4290…42b1 at0010 = ╱33╱3╱ // 0x42a0 @0x10
0x4290…42b1 at0011 = ╱ed╱(╱ // 0x42a1 @0x11
0x4290…42b1 at0012 = ╱47╱G╱ // 0x42a2 @0x12
0x4290…42b1 at0013 = ╱ee╱)╱ // 0x42a3 @0x13
0x4290…42b1 at0014 = ╱ec╱,╱ // 0x42a4 @0x14
0x4290…42b1 at0015 = ╱41╱A╱ // 0x42a5 @0x15
0x4290…42b1 at0016 = ╱33╱3╱ // 0x42a6 @0x16
0x4290…42b1 at0017 = ╱ed╱(╱ // 0x42a7 @0x17
0x4290…42b1 at0018 = ╱56╱V╱ // 0x42a8 @0x18
0x4290…42b1 at0019 = ╱ee╱)╱ // 0x42a9 @0x19
0x4290…42b1 at001a = ╱ec╱,╱ // 0x42aa @0x1a
0x4290…42b1 at001b = ╱45╱E╱ // 0x42ab @0x1b
0x4290…42b1 at001c = ╱34╱4╱ // 0x42ac @0x1c
0x4290…42b1 at001d = ╱ec╱,╱ // 0x42ad @0x1d
0x4290…42b1 at001e = ╱45╱E╱ // 0x42ae @0x1e
0x4290…42b1 at001f = ╱35╱5╱ // 0x42af @0x1f
0x4290…42b1 at0020 = EOL // 0x42b0 @0x20
0x4290…42b1 }
0x42b1…42ba d011 8217 CLOSE C9$
0x42b1…42ba LineComalBin {
0x42b1…42ba ptr = 0xd011 // 0x42b1 @0x0
0x42b1…42ba lno = 0x2019 // 0x42b3 @0x2
0x42b1…42ba at0004 = ╱a8╱ CLOSE ╱ // 0x42b5 @0x4
0x42b1…42ba at0005 = ╱43╱C╱ // 0x42b6 @0x5
0x42b1…42ba at0006 = ╱39╱9╱ // 0x42b7 @0x6
0x42b1…42ba at0007 = ╱ef╱$╱ // 0x42b8 @0x7
0x42b1…42ba at0008 = EOL // 0x42b9 @0x8
0x42b1…42ba }
0x42ba…42d1 d028 8220 C9$=D8$+"LØNMODRG"
0x42ba…42d1 LineComalBin {
0x42ba…42d1 ptr = 0xd028 // 0x42ba @0x0
0x42ba…42d1 lno = 0x201c // 0x42bc @0x2
0x42ba…42d1 at0004 = ╱43╱C╱ // 0x42be @0x4
0x42ba…42d1 at0005 = ╱39╱9╱ // 0x42bf @0x5
0x42ba…42d1 at0006 = ╱ef╱$╱ // 0x42c0 @0x6
0x42ba…42d1 at0007 = ╱dc╱=╱ // 0x42c1 @0x7
0x42ba…42d1 at0008 = ╱44╱D╱ // 0x42c2 @0x8
0x42ba…42d1 at0009 = ╱38╱8╱ // 0x42c3 @0x9
0x42ba…42d1 at000a = ╱ef╱$╱ // 0x42c4 @0xa
0x42ba…42d1 at000b = ╱f1╱+╱ // 0x42c5 @0xb
0x42ba…42d1 at000c = ╱22╱"╱ // 0x42c6 @0xc
0x42ba…42d1 at000d = ╱4c╱L╱ // 0x42c7 @0xd
0x42ba…42d1 at000e = ╱5c╱Ø╱ // 0x42c8 @0xe
0x42ba…42d1 at000f = ╱4e╱N╱ // 0x42c9 @0xf
0x42ba…42d1 at0010 = ╱4d╱M╱ // 0x42ca @0x10
0x42ba…42d1 at0011 = ╱4f╱O╱ // 0x42cb @0x11
0x42ba…42d1 at0012 = ╱44╱D╱ // 0x42cc @0x12
0x42ba…42d1 at0013 = ╱52╱R╱ // 0x42cd @0x13
0x42ba…42d1 at0014 = ╱47╱G╱ // 0x42ce @0x14
0x42ba…42d1 at0015 = ╱22╱"╱ // 0x42cf @0x15
0x42ba…42d1 at0016 = EOL // 0x42d0 @0x16
0x42ba…42d1 }
0x42d1…42dc d033 8230 OPEN C9$,W
0x42d1…42dc LineComalBin {
0x42d1…42dc ptr = 0xd033 // 0x42d1 @0x0
0x42d1…42dc lno = 0x2026 // 0x42d3 @0x2
0x42d1…42dc at0004 = ╱a7╱ OPEN ╱ // 0x42d5 @0x4
0x42d1…42dc at0005 = ╱43╱C╱ // 0x42d6 @0x5
0x42d1…42dc at0006 = ╱39╱9╱ // 0x42d7 @0x6
0x42d1…42dc at0007 = ╱ef╱$╱ // 0x42d8 @0x7
0x42d1…42dc at0008 = ╱ec╱,╱ // 0x42d9 @0x8
0x42d1…42dc at0009 = ╱57╱W╱ // 0x42da @0x9
0x42d1…42dc at000a = EOL // 0x42db @0xa
0x42d1…42dc }
0x42dc…42f3 d04a 8240 D7$=D8$+"TRANSREG"
0x42dc…42f3 LineComalBin {
0x42dc…42f3 ptr = 0xd04a // 0x42dc @0x0
0x42dc…42f3 lno = 0x2030 // 0x42de @0x2
0x42dc…42f3 at0004 = ╱44╱D╱ // 0x42e0 @0x4
0x42dc…42f3 at0005 = ╱37╱7╱ // 0x42e1 @0x5
0x42dc…42f3 at0006 = ╱ef╱$╱ // 0x42e2 @0x6
0x42dc…42f3 at0007 = ╱dc╱=╱ // 0x42e3 @0x7
0x42dc…42f3 at0008 = ╱44╱D╱ // 0x42e4 @0x8
0x42dc…42f3 at0009 = ╱38╱8╱ // 0x42e5 @0x9
0x42dc…42f3 at000a = ╱ef╱$╱ // 0x42e6 @0xa
0x42dc…42f3 at000b = ╱f1╱+╱ // 0x42e7 @0xb
0x42dc…42f3 at000c = ╱22╱"╱ // 0x42e8 @0xc
0x42dc…42f3 at000d = ╱54╱T╱ // 0x42e9 @0xd
0x42dc…42f3 at000e = ╱52╱R╱ // 0x42ea @0xe
0x42dc…42f3 at000f = ╱41╱A╱ // 0x42eb @0xf
0x42dc…42f3 at0010 = ╱4e╱N╱ // 0x42ec @0x10
0x42dc…42f3 at0011 = ╱53╱S╱ // 0x42ed @0x11
0x42dc…42f3 at0012 = ╱52╱R╱ // 0x42ee @0x12
0x42dc…42f3 at0013 = ╱45╱E╱ // 0x42ef @0x13
0x42dc…42f3 at0014 = ╱47╱G╱ // 0x42f0 @0x14
0x42dc…42f3 at0015 = ╱22╱"╱ // 0x42f1 @0x15
0x42dc…42f3 at0016 = EOL // 0x42f2 @0x16
0x42dc…42f3 }
0x42f3…42fe d055 8250 OPEN D7$,W
0x42f3…42fe LineComalBin {
0x42f3…42fe ptr = 0xd055 // 0x42f3 @0x0
0x42f3…42fe lno = 0x203a // 0x42f5 @0x2
0x42f3…42fe at0004 = ╱a7╱ OPEN ╱ // 0x42f7 @0x4
0x42f3…42fe at0005 = ╱44╱D╱ // 0x42f8 @0x5
0x42f3…42fe at0006 = ╱37╱7╱ // 0x42f9 @0x6
0x42f3…42fe at0007 = ╱ef╱$╱ // 0x42fa @0x7
0x42f3…42fe at0008 = ╱ec╱,╱ // 0x42fb @0x8
0x42f3…42fe at0009 = ╱57╱W╱ // 0x42fc @0x9
0x42f3…42fe at000a = EOL // 0x42fd @0xa
0x42f3…42fe }
0x42fe…4315 d06c 8260 D0$=D8$+"TÆLLEREG"
0x42fe…4315 LineComalBin {
0x42fe…4315 ptr = 0xd06c // 0x42fe @0x0
0x42fe…4315 lno = 0x2044 // 0x4300 @0x2
0x42fe…4315 at0004 = ╱44╱D╱ // 0x4302 @0x4
0x42fe…4315 at0005 = ╱30╱0╱ // 0x4303 @0x5
0x42fe…4315 at0006 = ╱ef╱$╱ // 0x4304 @0x6
0x42fe…4315 at0007 = ╱dc╱=╱ // 0x4305 @0x7
0x42fe…4315 at0008 = ╱44╱D╱ // 0x4306 @0x8
0x42fe…4315 at0009 = ╱38╱8╱ // 0x4307 @0x9
0x42fe…4315 at000a = ╱ef╱$╱ // 0x4308 @0xa
0x42fe…4315 at000b = ╱f1╱+╱ // 0x4309 @0xb
0x42fe…4315 at000c = ╱22╱"╱ // 0x430a @0xc
0x42fe…4315 at000d = ╱54╱T╱ // 0x430b @0xd
0x42fe…4315 at000e = ╱5b╱Æ╱ // 0x430c @0xe
0x42fe…4315 at000f = ╱4c╱L╱ // 0x430d @0xf
0x42fe…4315 at0010 = ╱4c╱L╱ // 0x430e @0x10
0x42fe…4315 at0011 = ╱45╱E╱ // 0x430f @0x11
0x42fe…4315 at0012 = ╱52╱R╱ // 0x4310 @0x12
0x42fe…4315 at0013 = ╱45╱E╱ // 0x4311 @0x13
0x42fe…4315 at0014 = ╱47╱G╱ // 0x4312 @0x14
0x42fe…4315 at0015 = ╱22╱"╱ // 0x4313 @0x15
0x42fe…4315 at0016 = EOL // 0x4314 @0x16
0x42fe…4315 }
0x4315…4320 d077 8270 OPEN D0$,W
0x4315…4320 LineComalBin {
0x4315…4320 ptr = 0xd077 // 0x4315 @0x0
0x4315…4320 lno = 0x204e // 0x4317 @0x2
0x4315…4320 at0004 = ╱a7╱ OPEN ╱ // 0x4319 @0x4
0x4315…4320 at0005 = ╱44╱D╱ // 0x431a @0x5
0x4315…4320 at0006 = ╱30╱0╱ // 0x431b @0x6
0x4315…4320 at0007 = ╱ef╱$╱ // 0x431c @0x7
0x4315…4320 at0008 = ╱ec╱,╱ // 0x431d @0x8
0x4315…4320 at0009 = ╱57╱W╱ // 0x431e @0x9
0x4315…4320 at000a = EOL // 0x431f @0xa
0x4315…4320 }
0x4320…4337 d08e 8280 D8$=D8$+"LØNARTRG"
0x4320…4337 LineComalBin {
0x4320…4337 ptr = 0xd08e // 0x4320 @0x0
0x4320…4337 lno = 0x2058 // 0x4322 @0x2
0x4320…4337 at0004 = ╱44╱D╱ // 0x4324 @0x4
0x4320…4337 at0005 = ╱38╱8╱ // 0x4325 @0x5
0x4320…4337 at0006 = ╱ef╱$╱ // 0x4326 @0x6
0x4320…4337 at0007 = ╱dc╱=╱ // 0x4327 @0x7
0x4320…4337 at0008 = ╱44╱D╱ // 0x4328 @0x8
0x4320…4337 at0009 = ╱38╱8╱ // 0x4329 @0x9
0x4320…4337 at000a = ╱ef╱$╱ // 0x432a @0xa
0x4320…4337 at000b = ╱f1╱+╱ // 0x432b @0xb
0x4320…4337 at000c = ╱22╱"╱ // 0x432c @0xc
0x4320…4337 at000d = ╱4c╱L╱ // 0x432d @0xd
0x4320…4337 at000e = ╱5c╱Ø╱ // 0x432e @0xe
0x4320…4337 at000f = ╱4e╱N╱ // 0x432f @0xf
0x4320…4337 at0010 = ╱41╱A╱ // 0x4330 @0x10
0x4320…4337 at0011 = ╱52╱R╱ // 0x4331 @0x11
0x4320…4337 at0012 = ╱54╱T╱ // 0x4332 @0x12
0x4320…4337 at0013 = ╱52╱R╱ // 0x4333 @0x13
0x4320…4337 at0014 = ╱47╱G╱ // 0x4334 @0x14
0x4320…4337 at0015 = ╱22╱"╱ // 0x4335 @0x15
0x4320…4337 at0016 = EOL // 0x4336 @0x16
0x4320…4337 }
0x4337…4342 d099 8290 OPEN D8$,R
0x4337…4342 LineComalBin {
0x4337…4342 ptr = 0xd099 // 0x4337 @0x0
0x4337…4342 lno = 0x2062 // 0x4339 @0x2
0x4337…4342 at0004 = ╱a7╱ OPEN ╱ // 0x433b @0x4
0x4337…4342 at0005 = ╱44╱D╱ // 0x433c @0x5
0x4337…4342 at0006 = ╱38╱8╱ // 0x433d @0x6
0x4337…4342 at0007 = ╱ef╱$╱ // 0x433e @0x7
0x4337…4342 at0008 = ╱ec╱,╱ // 0x433f @0x8
0x4337…4342 at0009 = ╱52╱R╱ // 0x4340 @0x9
0x4337…4342 at000a = EOL // 0x4341 @0xa
0x4337…4342 }
0x4342…4358 d0af 8291 D9$=E1$+"LØNJOUR"
0x4342…4358 LineComalBin {
0x4342…4358 ptr = 0xd0af // 0x4342 @0x0
0x4342…4358 lno = 0x2063 // 0x4344 @0x2
0x4342…4358 at0004 = ╱44╱D╱ // 0x4346 @0x4
0x4342…4358 at0005 = ╱39╱9╱ // 0x4347 @0x5
0x4342…4358 at0006 = ╱ef╱$╱ // 0x4348 @0x6
0x4342…4358 at0007 = ╱dc╱=╱ // 0x4349 @0x7
0x4342…4358 at0008 = ╱45╱E╱ // 0x434a @0x8
0x4342…4358 at0009 = ╱31╱1╱ // 0x434b @0x9
0x4342…4358 at000a = ╱ef╱$╱ // 0x434c @0xa
0x4342…4358 at000b = ╱f1╱+╱ // 0x434d @0xb
0x4342…4358 at000c = ╱22╱"╱ // 0x434e @0xc
0x4342…4358 at000d = ╱4c╱L╱ // 0x434f @0xd
0x4342…4358 at000e = ╱5c╱Ø╱ // 0x4350 @0xe
0x4342…4358 at000f = ╱4e╱N╱ // 0x4351 @0xf
0x4342…4358 at0010 = ╱4a╱J╱ // 0x4352 @0x10
0x4342…4358 at0011 = ╱4f╱O╱ // 0x4353 @0x11
0x4342…4358 at0012 = ╱55╱U╱ // 0x4354 @0x12
0x4342…4358 at0013 = ╱52╱R╱ // 0x4355 @0x13
0x4342…4358 at0014 = ╱22╱"╱ // 0x4356 @0x14
0x4342…4358 at0015 = EOL // 0x4357 @0x15
0x4342…4358 }
0x4358…4363 d0ba 8292 OPEN D9$,W
0x4358…4363 LineComalBin {
0x4358…4363 ptr = 0xd0ba // 0x4358 @0x0
0x4358…4363 lno = 0x2064 // 0x435a @0x2
0x4358…4363 at0004 = ╱a7╱ OPEN ╱ // 0x435c @0x4
0x4358…4363 at0005 = ╱44╱D╱ // 0x435d @0x5
0x4358…4363 at0006 = ╱39╱9╱ // 0x435e @0x6
0x4358…4363 at0007 = ╱ef╱$╱ // 0x435f @0x7
0x4358…4363 at0008 = ╱ec╱,╱ // 0x4360 @0x8
0x4358…4363 at0009 = ╱57╱W╱ // 0x4361 @0x9
0x4358…4363 at000a = EOL // 0x4362 @0xa
0x4358…4363 }
0x4363…4379 d0d0 8293 E0$=E1$+"FRADRAG"
0x4363…4379 LineComalBin {
0x4363…4379 ptr = 0xd0d0 // 0x4363 @0x0
0x4363…4379 lno = 0x2065 // 0x4365 @0x2
0x4363…4379 at0004 = ╱45╱E╱ // 0x4367 @0x4
0x4363…4379 at0005 = ╱30╱0╱ // 0x4368 @0x5
0x4363…4379 at0006 = ╱ef╱$╱ // 0x4369 @0x6
0x4363…4379 at0007 = ╱dc╱=╱ // 0x436a @0x7
0x4363…4379 at0008 = ╱45╱E╱ // 0x436b @0x8
0x4363…4379 at0009 = ╱31╱1╱ // 0x436c @0x9
0x4363…4379 at000a = ╱ef╱$╱ // 0x436d @0xa
0x4363…4379 at000b = ╱f1╱+╱ // 0x436e @0xb
0x4363…4379 at000c = ╱22╱"╱ // 0x436f @0xc
0x4363…4379 at000d = ╱46╱F╱ // 0x4370 @0xd
0x4363…4379 at000e = ╱52╱R╱ // 0x4371 @0xe
0x4363…4379 at000f = ╱41╱A╱ // 0x4372 @0xf
0x4363…4379 at0010 = ╱44╱D╱ // 0x4373 @0x10
0x4363…4379 at0011 = ╱52╱R╱ // 0x4374 @0x11
0x4363…4379 at0012 = ╱41╱A╱ // 0x4375 @0x12
0x4363…4379 at0013 = ╱47╱G╱ // 0x4376 @0x13
0x4363…4379 at0014 = ╱22╱"╱ // 0x4377 @0x14
0x4363…4379 at0015 = EOL // 0x4378 @0x15
0x4363…4379 }
0x4379…4384 d0db 8294 OPEN E0$,W
0x4379…4384 LineComalBin {
0x4379…4384 ptr = 0xd0db // 0x4379 @0x0
0x4379…4384 lno = 0x2066 // 0x437b @0x2
0x4379…4384 at0004 = ╱a7╱ OPEN ╱ // 0x437d @0x4
0x4379…4384 at0005 = ╱45╱E╱ // 0x437e @0x5
0x4379…4384 at0006 = ╱30╱0╱ // 0x437f @0x6
0x4379…4384 at0007 = ╱ef╱$╱ // 0x4380 @0x7
0x4379…4384 at0008 = ╱ec╱,╱ // 0x4381 @0x8
0x4379…4384 at0009 = ╱57╱W╱ // 0x4382 @0x9
0x4379…4384 at000a = EOL // 0x4383 @0xa
0x4379…4384 }
0x4384…439b d0f2 8295 E1$=E1$+"LØNBILAG"
0x4384…439b LineComalBin {
0x4384…439b ptr = 0xd0f2 // 0x4384 @0x0
0x4384…439b lno = 0x2067 // 0x4386 @0x2
0x4384…439b at0004 = ╱45╱E╱ // 0x4388 @0x4
0x4384…439b at0005 = ╱31╱1╱ // 0x4389 @0x5
0x4384…439b at0006 = ╱ef╱$╱ // 0x438a @0x6
0x4384…439b at0007 = ╱dc╱=╱ // 0x438b @0x7
0x4384…439b at0008 = ╱45╱E╱ // 0x438c @0x8
0x4384…439b at0009 = ╱31╱1╱ // 0x438d @0x9
0x4384…439b at000a = ╱ef╱$╱ // 0x438e @0xa
0x4384…439b at000b = ╱f1╱+╱ // 0x438f @0xb
0x4384…439b at000c = ╱22╱"╱ // 0x4390 @0xc
0x4384…439b at000d = ╱4c╱L╱ // 0x4391 @0xd
0x4384…439b at000e = ╱5c╱Ø╱ // 0x4392 @0xe
0x4384…439b at000f = ╱4e╱N╱ // 0x4393 @0xf
0x4384…439b at0010 = ╱42╱B╱ // 0x4394 @0x10
0x4384…439b at0011 = ╱49╱I╱ // 0x4395 @0x11
0x4384…439b at0012 = ╱4c╱L╱ // 0x4396 @0x12
0x4384…439b at0013 = ╱41╱A╱ // 0x4397 @0x13
0x4384…439b at0014 = ╱47╱G╱ // 0x4398 @0x14
0x4384…439b at0015 = ╱22╱"╱ // 0x4399 @0x15
0x4384…439b at0016 = EOL // 0x439a @0x16
0x4384…439b }
0x439b…43a6 d0fd 8296 OPEN E1$,W
0x439b…43a6 LineComalBin {
0x439b…43a6 ptr = 0xd0fd // 0x439b @0x0
0x439b…43a6 lno = 0x2068 // 0x439d @0x2
0x439b…43a6 at0004 = ╱a7╱ OPEN ╱ // 0x439f @0x4
0x439b…43a6 at0005 = ╱45╱E╱ // 0x43a0 @0x5
0x439b…43a6 at0006 = ╱31╱1╱ // 0x43a1 @0x6
0x439b…43a6 at0007 = ╱ef╱$╱ // 0x43a2 @0x7
0x439b…43a6 at0008 = ╱ec╱,╱ // 0x43a3 @0x8
0x439b…43a6 at0009 = ╱57╱W╱ // 0x43a4 @0x9
0x439b…43a6 at000a = EOL // 0x43a5 @0xa
0x439b…43a6 }
0x43a6…43b5 d10c 8350 K1=72
0x43a6…43b5 LineComalBin {
0x43a6…43b5 ptr = 0xd10c // 0x43a6 @0x0
0x43a6…43b5 lno = 0x209e // 0x43a8 @0x2
0x43a6…43b5 at0004 = ╱4b╱K╱ // 0x43aa @0x4
0x43a6…43b5 at0005 = ╱31╱1╱ // 0x43ab @0x5
0x43a6…43b5 at0006 = ╱dc╱=╱ // 0x43ac @0x6
0x43a6…43b5 at0007 = ╱37╱7╱ // 0x43ad @0x7
0x43a6…43b5 at0008 = ╱32╱2╱ // 0x43ae @0x8
0x43a6…43b5 at0009 = ╱fe00009007╱ // 0x43af @0x9
0x43a6…43b5 at000e = EOL // 0x43b4 @0xe
0x43a6…43b5 }
0x43b5…43be d115 8355 J6=B
0x43b5…43be LineComalBin {
0x43b5…43be ptr = 0xd115 // 0x43b5 @0x0
0x43b5…43be lno = 0x20a3 // 0x43b7 @0x2
0x43b5…43be at0004 = ╱4a╱J╱ // 0x43b9 @0x4
0x43b5…43be at0005 = ╱36╱6╱ // 0x43ba @0x5
0x43b5…43be at0006 = ╱dc╱=╱ // 0x43bb @0x6
0x43b5…43be at0007 = ╱42╱B╱ // 0x43bc @0x7
0x43b5…43be at0008 = EOL // 0x43bd @0x8
0x43b5…43be }
0x43be…43c7 d11e 8360 F8=B
0x43be…43c7 LineComalBin {
0x43be…43c7 ptr = 0xd11e // 0x43be @0x0
0x43be…43c7 lno = 0x20a8 // 0x43c0 @0x2
0x43be…43c7 at0004 = ╱46╱F╱ // 0x43c2 @0x4
0x43be…43c7 at0005 = ╱38╱8╱ // 0x43c3 @0x5
0x43be…43c7 at0006 = ╱dc╱=╱ // 0x43c4 @0x6
0x43be…43c7 at0007 = ╱42╱B╱ // 0x43c5 @0x7
0x43be…43c7 at0008 = EOL // 0x43c6 @0x8
0x43be…43c7 }
0x43c7…43d3 d12a 8370 F0$=E9$
0x43c7…43d3 LineComalBin {
0x43c7…43d3 ptr = 0xd12a // 0x43c7 @0x0
0x43c7…43d3 lno = 0x20b2 // 0x43c9 @0x2
0x43c7…43d3 at0004 = ╱46╱F╱ // 0x43cb @0x4
0x43c7…43d3 at0005 = ╱30╱0╱ // 0x43cc @0x5
0x43c7…43d3 at0006 = ╱ef╱$╱ // 0x43cd @0x6
0x43c7…43d3 at0007 = ╱dc╱=╱ // 0x43ce @0x7
0x43c7…43d3 at0008 = ╱45╱E╱ // 0x43cf @0x8
0x43c7…43d3 at0009 = ╱39╱9╱ // 0x43d0 @0x9
0x43c7…43d3 at000a = ╱ef╱$╱ // 0x43d1 @0xa
0x43c7…43d3 at000b = EOL // 0x43d2 @0xb
0x43c7…43d3 }
0x43d3…43ec d143 8372 PUT D9$:A7$,A8$,A9$,B0$
0x43d3…43ec LineComalBin {
0x43d3…43ec ptr = 0xd143 // 0x43d3 @0x0
0x43d3…43ec lno = 0x20b4 // 0x43d5 @0x2
0x43d3…43ec at0004 = ╱aa╱ PUT ╱ // 0x43d7 @0x4
0x43d3…43ec at0005 = ╱44╱D╱ // 0x43d8 @0x5
0x43d3…43ec at0006 = ╱39╱9╱ // 0x43d9 @0x6
0x43d3…43ec at0007 = ╱ef╱$╱ // 0x43da @0x7
0x43d3…43ec at0008 = ╱f0╱:╱ // 0x43db @0x8
0x43d3…43ec at0009 = ╱41╱A╱ // 0x43dc @0x9
0x43d3…43ec at000a = ╱37╱7╱ // 0x43dd @0xa
0x43d3…43ec at000b = ╱ef╱$╱ // 0x43de @0xb
0x43d3…43ec at000c = ╱ec╱,╱ // 0x43df @0xc
0x43d3…43ec at000d = ╱41╱A╱ // 0x43e0 @0xd
0x43d3…43ec at000e = ╱38╱8╱ // 0x43e1 @0xe
0x43d3…43ec at000f = ╱ef╱$╱ // 0x43e2 @0xf
0x43d3…43ec at0010 = ╱ec╱,╱ // 0x43e3 @0x10
0x43d3…43ec at0011 = ╱41╱A╱ // 0x43e4 @0x11
0x43d3…43ec at0012 = ╱39╱9╱ // 0x43e5 @0x12
0x43d3…43ec at0013 = ╱ef╱$╱ // 0x43e6 @0x13
0x43d3…43ec at0014 = ╱ec╱,╱ // 0x43e7 @0x14
0x43d3…43ec at0015 = ╱42╱B╱ // 0x43e8 @0x15
0x43d3…43ec at0016 = ╱30╱0╱ // 0x43e9 @0x16
0x43d3…43ec at0017 = ╱ef╱$╱ // 0x43ea @0x17
0x43d3…43ec at0018 = EOL // 0x43eb @0x18
0x43d3…43ec }
0x43ec…43fd d154 8374 PUT E0$:A7$,A8$
0x43ec…43fd LineComalBin {
0x43ec…43fd ptr = 0xd154 // 0x43ec @0x0
0x43ec…43fd lno = 0x20b6 // 0x43ee @0x2
0x43ec…43fd at0004 = ╱aa╱ PUT ╱ // 0x43f0 @0x4
0x43ec…43fd at0005 = ╱45╱E╱ // 0x43f1 @0x5
0x43ec…43fd at0006 = ╱30╱0╱ // 0x43f2 @0x6
0x43ec…43fd at0007 = ╱ef╱$╱ // 0x43f3 @0x7
0x43ec…43fd at0008 = ╱f0╱:╱ // 0x43f4 @0x8
0x43ec…43fd at0009 = ╱41╱A╱ // 0x43f5 @0x9
0x43ec…43fd at000a = ╱37╱7╱ // 0x43f6 @0xa
0x43ec…43fd at000b = ╱ef╱$╱ // 0x43f7 @0xb
0x43ec…43fd at000c = ╱ec╱,╱ // 0x43f8 @0xc
0x43ec…43fd at000d = ╱41╱A╱ // 0x43f9 @0xd
0x43ec…43fd at000e = ╱38╱8╱ // 0x43fa @0xe
0x43ec…43fd at000f = ╱ef╱$╱ // 0x43fb @0xf
0x43ec…43fd at0010 = EOL // 0x43fc @0x10
0x43ec…43fd }
0x43fd…4409 d160 8376 PUT E1$:I6
0x43fd…4409 LineComalBin {
0x43fd…4409 ptr = 0xd160 // 0x43fd @0x0
0x43fd…4409 lno = 0x20b8 // 0x43ff @0x2
0x43fd…4409 at0004 = ╱aa╱ PUT ╱ // 0x4401 @0x4
0x43fd…4409 at0005 = ╱45╱E╱ // 0x4402 @0x5
0x43fd…4409 at0006 = ╱31╱1╱ // 0x4403 @0x6
0x43fd…4409 at0007 = ╱ef╱$╱ // 0x4404 @0x7
0x43fd…4409 at0008 = ╱f0╱:╱ // 0x4405 @0x8
0x43fd…4409 at0009 = ╱49╱I╱ // 0x4406 @0x9
0x43fd…4409 at000a = ╱36╱6╱ // 0x4407 @0xa
0x43fd…4409 at000b = EOL // 0x4408 @0xb
0x43fd…4409 }
0x4409…4410 d167 8380 OUTPUT P
0x4409…4410 LineComalBin {
0x4409…4410 ptr = 0xd167 // 0x4409 @0x0
0x4409…4410 lno = 0x20bc // 0x440b @0x2
0x4409…4410 at0004 = ╱a5╱ OUTPUT ╱ // 0x440d @0x4
0x4409…4410 at0005 = ╱50╱P╱ // 0x440e @0x5
0x4409…4410 at0006 = EOL // 0x440f @0x6
0x4409…4410 }
0x4410…4416 d16d 8390 REPEAT
0x4410…4416 LineComalBin {
0x4410…4416 ptr = 0xd16d // 0x4410 @0x0
0x4410…4416 lno = 0x20c6 // 0x4412 @0x2
0x4410…4416 at0004 = ╱97╱ REPEAT ╱ // 0x4414 @0x4
0x4410…4416 at0005 = EOL // 0x4415 @0x5
0x4410…4416 }
0x4416…4421 d178 8400 EXEC NÆSTE
0x4416…4421 LineComalBin {
0x4416…4421 ptr = 0xd178 // 0x4416 @0x0
0x4416…4421 lno = 0x20d0 // 0x4418 @0x2
0x4416…4421 at0004 = ╱9d╱ EXEC ╱ // 0x441a @0x4
0x4416…4421 at0005 = ╱4e╱N╱ // 0x441b @0x5
0x4416…4421 at0006 = ╱5b╱Æ╱ // 0x441c @0x6
0x4416…4421 at0007 = ╱53╱S╱ // 0x441d @0x7
0x4416…4421 at0008 = ╱54╱T╱ // 0x441e @0x8
0x4416…4421 at0009 = ╱45╱E╱ // 0x441f @0x9
0x4416…4421 at000a = EOL // 0x4420 @0xa
0x4416…4421 }
0x4421…4433 d18a 8410 L3,L4,K2,K9=B
0x4421…4433 LineComalBin {
0x4421…4433 ptr = 0xd18a // 0x4421 @0x0
0x4421…4433 lno = 0x20da // 0x4423 @0x2
0x4421…4433 at0004 = ╱4c╱L╱ // 0x4425 @0x4
0x4421…4433 at0005 = ╱33╱3╱ // 0x4426 @0x5
0x4421…4433 at0006 = ╱ec╱,╱ // 0x4427 @0x6
0x4421…4433 at0007 = ╱4c╱L╱ // 0x4428 @0x7
0x4421…4433 at0008 = ╱34╱4╱ // 0x4429 @0x8
0x4421…4433 at0009 = ╱ec╱,╱ // 0x442a @0x9
0x4421…4433 at000a = ╱4b╱K╱ // 0x442b @0xa
0x4421…4433 at000b = ╱32╱2╱ // 0x442c @0xb
0x4421…4433 at000c = ╱ec╱,╱ // 0x442d @0xc
0x4421…4433 at000d = ╱4b╱K╱ // 0x442e @0xd
0x4421…4433 at000e = ╱39╱9╱ // 0x442f @0xe
0x4421…4433 at000f = ╱dc╱=╱ // 0x4430 @0xf
0x4421…4433 at0010 = ╱42╱B╱ // 0x4431 @0x10
0x4421…4433 at0011 = EOL // 0x4432 @0x11
0x4421…4433 }
0x4433…4463 d1ba 8412 C7$=B3$(V:TI)+B3$(V:TI)+B3$(V:TI)+B3$(V:TI)
0x4433…4463 LineComalBin {
0x4433…4463 ptr = 0xd1ba // 0x4433 @0x0
0x4433…4463 lno = 0x20dc // 0x4435 @0x2
0x4433…4463 at0004 = ╱43╱C╱ // 0x4437 @0x4
0x4433…4463 at0005 = ╱37╱7╱ // 0x4438 @0x5
0x4433…4463 at0006 = ╱ef╱$╱ // 0x4439 @0x6
0x4433…4463 at0007 = ╱dc╱=╱ // 0x443a @0x7
0x4433…4463 at0008 = ╱42╱B╱ // 0x443b @0x8
0x4433…4463 at0009 = ╱33╱3╱ // 0x443c @0x9
0x4433…4463 at000a = ╱ef╱$╱ // 0x443d @0xa
0x4433…4463 at000b = ╱ed╱(╱ // 0x443e @0xb
0x4433…4463 at000c = ╱56╱V╱ // 0x443f @0xc
0x4433…4463 at000d = ╱f0╱:╱ // 0x4440 @0xd
0x4433…4463 at000e = ╱54╱T╱ // 0x4441 @0xe
0x4433…4463 at000f = ╱49╱I╱ // 0x4442 @0xf
0x4433…4463 at0010 = ╱ee╱)╱ // 0x4443 @0x10
0x4433…4463 at0011 = ╱f1╱+╱ // 0x4444 @0x11
0x4433…4463 at0012 = ╱42╱B╱ // 0x4445 @0x12
0x4433…4463 at0013 = ╱33╱3╱ // 0x4446 @0x13
0x4433…4463 at0014 = ╱ef╱$╱ // 0x4447 @0x14
0x4433…4463 at0015 = ╱ed╱(╱ // 0x4448 @0x15
0x4433…4463 at0016 = ╱56╱V╱ // 0x4449 @0x16
0x4433…4463 at0017 = ╱f0╱:╱ // 0x444a @0x17
0x4433…4463 at0018 = ╱54╱T╱ // 0x444b @0x18
0x4433…4463 at0019 = ╱49╱I╱ // 0x444c @0x19
0x4433…4463 at001a = ╱ee╱)╱ // 0x444d @0x1a
0x4433…4463 at001b = ╱f1╱+╱ // 0x444e @0x1b
0x4433…4463 at001c = ╱42╱B╱ // 0x444f @0x1c
0x4433…4463 at001d = ╱33╱3╱ // 0x4450 @0x1d
0x4433…4463 at001e = ╱ef╱$╱ // 0x4451 @0x1e
0x4433…4463 at001f = ╱ed╱(╱ // 0x4452 @0x1f
0x4433…4463 at0020 = ╱56╱V╱ // 0x4453 @0x20
0x4433…4463 at0021 = ╱f0╱:╱ // 0x4454 @0x21
0x4433…4463 at0022 = ╱54╱T╱ // 0x4455 @0x22
0x4433…4463 at0023 = ╱49╱I╱ // 0x4456 @0x23
0x4433…4463 at0024 = ╱ee╱)╱ // 0x4457 @0x24
0x4433…4463 at0025 = ╱f1╱+╱ // 0x4458 @0x25
0x4433…4463 at0026 = ╱42╱B╱ // 0x4459 @0x26
0x4433…4463 at0027 = ╱33╱3╱ // 0x445a @0x27
0x4433…4463 at0028 = ╱ef╱$╱ // 0x445b @0x28
0x4433…4463 at0029 = ╱ed╱(╱ // 0x445c @0x29
0x4433…4463 at002a = ╱56╱V╱ // 0x445d @0x2a
0x4433…4463 at002b = ╱f0╱:╱ // 0x445e @0x2b
0x4433…4463 at002c = ╱54╱T╱ // 0x445f @0x2c
0x4433…4463 at002d = ╱49╱I╱ // 0x4460 @0x2d
0x4433…4463 at002e = ╱ee╱)╱ // 0x4461 @0x2e
0x4433…4463 at002f = EOL // 0x4462 @0x2f
0x4433…4463 }
0x4463…4479 d1d0 8414 C8$=C7$+B3$(V:TI)
0x4463…4479 LineComalBin {
0x4463…4479 ptr = 0xd1d0 // 0x4463 @0x0
0x4463…4479 lno = 0x20de // 0x4465 @0x2
0x4463…4479 at0004 = ╱43╱C╱ // 0x4467 @0x4
0x4463…4479 at0005 = ╱38╱8╱ // 0x4468 @0x5
0x4463…4479 at0006 = ╱ef╱$╱ // 0x4469 @0x6
0x4463…4479 at0007 = ╱dc╱=╱ // 0x446a @0x7
0x4463…4479 at0008 = ╱43╱C╱ // 0x446b @0x8
0x4463…4479 at0009 = ╱37╱7╱ // 0x446c @0x9
0x4463…4479 at000a = ╱ef╱$╱ // 0x446d @0xa
0x4463…4479 at000b = ╱f1╱+╱ // 0x446e @0xb
0x4463…4479 at000c = ╱42╱B╱ // 0x446f @0xc
0x4463…4479 at000d = ╱33╱3╱ // 0x4470 @0xd
0x4463…4479 at000e = ╱ef╱$╱ // 0x4471 @0xe
0x4463…4479 at000f = ╱ed╱(╱ // 0x4472 @0xf
0x4463…4479 at0010 = ╱56╱V╱ // 0x4473 @0x10
0x4463…4479 at0011 = ╱f0╱:╱ // 0x4474 @0x11
0x4463…4479 at0012 = ╱54╱T╱ // 0x4475 @0x12
0x4463…4479 at0013 = ╱49╱I╱ // 0x4476 @0x13
0x4463…4479 at0014 = ╱ee╱)╱ // 0x4477 @0x14
0x4463…4479 at0015 = EOL // 0x4478 @0x15
0x4463…4479 }
0x4479…4485 d1dc 8416 B6$=C8$
0x4479…4485 LineComalBin {
0x4479…4485 ptr = 0xd1dc // 0x4479 @0x0
0x4479…4485 lno = 0x20e0 // 0x447b @0x2
0x4479…4485 at0004 = ╱42╱B╱ // 0x447d @0x4
0x4479…4485 at0005 = ╱36╱6╱ // 0x447e @0x5
0x4479…4485 at0006 = ╱ef╱$╱ // 0x447f @0x6
0x4479…4485 at0007 = ╱dc╱=╱ // 0x4480 @0x7
0x4479…4485 at0008 = ╱43╱C╱ // 0x4481 @0x8
0x4479…4485 at0009 = ╱38╱8╱ // 0x4482 @0x9
0x4479…4485 at000a = ╱ef╱$╱ // 0x4483 @0xa
0x4479…4485 at000b = EOL // 0x4484 @0xb
0x4479…4485 }
0x4485…4492 d1e9 8417 B61$=B6$
0x4485…4492 LineComalBin {
0x4485…4492 ptr = 0xd1e9 // 0x4485 @0x0
0x4485…4492 lno = 0x20e1 // 0x4487 @0x2
0x4485…4492 at0004 = ╱42╱B╱ // 0x4489 @0x4
0x4485…4492 at0005 = ╱36╱6╱ // 0x448a @0x5
0x4485…4492 at0006 = ╱31╱1╱ // 0x448b @0x6
0x4485…4492 at0007 = ╱ef╱$╱ // 0x448c @0x7
0x4485…4492 at0008 = ╱dc╱=╱ // 0x448d @0x8
0x4485…4492 at0009 = ╱42╱B╱ // 0x448e @0x9
0x4485…4492 at000a = ╱36╱6╱ // 0x448f @0xa
0x4485…4492 at000b = ╱ef╱$╱ // 0x4490 @0xb
0x4485…4492 at000c = EOL // 0x4491 @0xc
0x4485…4492 }
0x4492…449e d1f5 8420 IF F8<=I9 THEN
0x4492…449e LineComalBin {
0x4492…449e ptr = 0xd1f5 // 0x4492 @0x0
0x4492…449e lno = 0x20e4 // 0x4494 @0x2
0x4492…449e at0004 = ╱9c╱ IF ╱ // 0x4496 @0x4
0x4492…449e at0005 = ╱46╱F╱ // 0x4497 @0x5
0x4492…449e at0006 = ╱38╱8╱ // 0x4498 @0x6
0x4492…449e at0007 = ╱df╱<=╱ // 0x4499 @0x7
0x4492…449e at0008 = ╱49╱I╱ // 0x449a @0x8
0x4492…449e at0009 = ╱39╱9╱ // 0x449b @0x9
0x4492…449e at000a = ╱b6╱ THEN ╱ // 0x449c @0xa
0x4492…449e at000b = EOL // 0x449d @0xb
0x4492…449e }
0x449e…44a9 d200 8430 IF E3=E THEN
0x449e…44a9 LineComalBin {
0x449e…44a9 ptr = 0xd200 // 0x449e @0x0
0x449e…44a9 lno = 0x20ee // 0x44a0 @0x2
0x449e…44a9 at0004 = ╱9c╱ IF ╱ // 0x44a2 @0x4
0x449e…44a9 at0005 = ╱45╱E╱ // 0x44a3 @0x5
0x449e…44a9 at0006 = ╱33╱3╱ // 0x44a4 @0x6
0x449e…44a9 at0007 = ╱dc╱=╱ // 0x44a5 @0x7
0x449e…44a9 at0008 = ╱45╱E╱ // 0x44a6 @0x8
0x449e…44a9 at0009 = ╱b6╱ THEN ╱ // 0x44a7 @0x9
0x449e…44a9 at000a = EOL // 0x44a8 @0xa
0x449e…44a9 }
0x44a9…44b1 d208 8440 J=E
0x44a9…44b1 LineComalBin {
0x44a9…44b1 ptr = 0xd208 // 0x44a9 @0x0
0x44a9…44b1 lno = 0x20f8 // 0x44ab @0x2
0x44a9…44b1 at0004 = ╱4a╱J╱ // 0x44ad @0x4
0x44a9…44b1 at0005 = ╱dc╱=╱ // 0x44ae @0x5
0x44a9…44b1 at0006 = ╱45╱E╱ // 0x44af @0x6
0x44a9…44b1 at0007 = EOL // 0x44b0 @0x7
0x44a9…44b1 }
0x44b1…44b7 d20e 8450 REPEAT
0x44b1…44b7 LineComalBin {
0x44b1…44b7 ptr = 0xd20e // 0x44b1 @0x0
0x44b1…44b7 lno = 0x2102 // 0x44b3 @0x2
0x44b1…44b7 at0004 = ╱97╱ REPEAT ╱ // 0x44b5 @0x4
0x44b1…44b7 at0005 = EOL // 0x44b6 @0x5
0x44b1…44b7 }
0x44b7…44d3 d22a 8460 IF A1(J)=F8 OR A1(J)=-E THEN J=TI
0x44b7…44d3 LineComalBin {
0x44b7…44d3 ptr = 0xd22a // 0x44b7 @0x0
0x44b7…44d3 lno = 0x210c // 0x44b9 @0x2
0x44b7…44d3 at0004 = ╱82╱ IF ╱ // 0x44bb @0x4
0x44b7…44d3 at0005 = ╱41╱A╱ // 0x44bc @0x5
0x44b7…44d3 at0006 = ╱31╱1╱ // 0x44bd @0x6
0x44b7…44d3 at0007 = ╱ed╱(╱ // 0x44be @0x7
0x44b7…44d3 at0008 = ╱4a╱J╱ // 0x44bf @0x8
0x44b7…44d3 at0009 = ╱ee╱)╱ // 0x44c0 @0x9
0x44b7…44d3 at000a = ╱dc╱=╱ // 0x44c1 @0xa
0x44b7…44d3 at000b = ╱46╱F╱ // 0x44c2 @0xb
0x44b7…44d3 at000c = ╱38╱8╱ // 0x44c3 @0xc
0x44b7…44d3 at000d = ╱db╱ OR ╱ // 0x44c4 @0xd
0x44b7…44d3 at000e = ╱41╱A╱ // 0x44c5 @0xe
0x44b7…44d3 at000f = ╱31╱1╱ // 0x44c6 @0xf
0x44b7…44d3 at0010 = ╱ed╱(╱ // 0x44c7 @0x10
0x44b7…44d3 at0011 = ╱4a╱J╱ // 0x44c8 @0x11
0x44b7…44d3 at0012 = ╱ee╱)╱ // 0x44c9 @0x12
0x44b7…44d3 at0013 = ╱dc╱=╱ // 0x44ca @0x13
0x44b7…44d3 at0014 = ╱e9╱-╱ // 0x44cb @0x14
0x44b7…44d3 at0015 = ╱45╱E╱ // 0x44cc @0x15
0x44b7…44d3 at0016 = ╱b6╱ THEN ╱ // 0x44cd @0x16
0x44b7…44d3 at0017 = ╱4a╱J╱ // 0x44ce @0x17
0x44b7…44d3 at0018 = ╱dc╱=╱ // 0x44cf @0x18
0x44b7…44d3 at0019 = ╱54╱T╱ // 0x44d0 @0x19
0x44b7…44d3 at001a = ╱49╱I╱ // 0x44d1 @0x1a
0x44b7…44d3 at001b = EOL // 0x44d2 @0x1b
0x44b7…44d3 }
0x44d3…44dd d234 8470 J=J+E
0x44d3…44dd LineComalBin {
0x44d3…44dd ptr = 0xd234 // 0x44d3 @0x0
0x44d3…44dd lno = 0x2116 // 0x44d5 @0x2
0x44d3…44dd at0004 = ╱4a╱J╱ // 0x44d7 @0x4
0x44d3…44dd at0005 = ╱dc╱=╱ // 0x44d8 @0x5
0x44d3…44dd at0006 = ╱4a╱J╱ // 0x44d9 @0x6
0x44d3…44dd at0007 = ╱e2╱+╱ // 0x44da @0x7
0x44d3…44dd at0008 = ╱45╱E╱ // 0x44db @0x8
0x44d3…44dd at0009 = EOL // 0x44dc @0x9
0x44d3…44dd }
0x44dd…44e6 d23d 8480 UNTIL J>V
0x44dd…44e6 LineComalBin {
0x44dd…44e6 ptr = 0xd23d // 0x44dd @0x0
0x44dd…44e6 lno = 0x2120 // 0x44df @0x2
0x44dd…44e6 at0004 = ╱98╱ UNTIL ╱ // 0x44e1 @0x4
0x44dd…44e6 at0005 = ╱4a╱J╱ // 0x44e2 @0x5
0x44dd…44e6 at0006 = ╱de╱>╱ // 0x44e3 @0x6
0x44dd…44e6 at0007 = ╱56╱V╱ // 0x44e4 @0x7
0x44dd…44e6 at0008 = EOL // 0x44e5 @0x8
0x44dd…44e6 }
0x44e6…44f1 d248 8490 IF J=EL THEN
0x44e6…44f1 LineComalBin {
0x44e6…44f1 ptr = 0xd248 // 0x44e6 @0x0
0x44e6…44f1 lno = 0x212a // 0x44e8 @0x2
0x44e6…44f1 at0004 = ╱9c╱ IF ╱ // 0x44ea @0x4
0x44e6…44f1 at0005 = ╱4a╱J╱ // 0x44eb @0x5
0x44e6…44f1 at0006 = ╱dc╱=╱ // 0x44ec @0x6
0x44e6…44f1 at0007 = ╱45╱E╱ // 0x44ed @0x7
0x44e6…44f1 at0008 = ╱4c╱L╱ // 0x44ee @0x8
0x44e6…44f1 at0009 = ╱b6╱ THEN ╱ // 0x44ef @0x9
0x44e6…44f1 at000a = EOL // 0x44f0 @0xa
0x44e6…44f1 }
0x44f1…4500 d257 8500 EXEC BEREGNLØN
0x44f1…4500 LineComalBin {
0x44f1…4500 ptr = 0xd257 // 0x44f1 @0x0
0x44f1…4500 lno = 0x2134 // 0x44f3 @0x2
0x44f1…4500 at0004 = ╱9d╱ EXEC ╱ // 0x44f5 @0x4
0x44f1…4500 at0005 = ╱42╱B╱ // 0x44f6 @0x5
0x44f1…4500 at0006 = ╱45╱E╱ // 0x44f7 @0x6
0x44f1…4500 at0007 = ╱52╱R╱ // 0x44f8 @0x7
0x44f1…4500 at0008 = ╱45╱E╱ // 0x44f9 @0x8
0x44f1…4500 at0009 = ╱47╱G╱ // 0x44fa @0x9
0x44f1…4500 at000a = ╱4e╱N╱ // 0x44fb @0xa
0x44f1…4500 at000b = ╱4c╱L╱ // 0x44fc @0xb
0x44f1…4500 at000c = ╱5c╱Ø╱ // 0x44fd @0xc
0x44f1…4500 at000d = ╱4e╱N╱ // 0x44fe @0xd
0x44f1…4500 at000e = EOL // 0x44ff @0xe
0x44f1…4500 }
0x4500…4506 d25d 8520 ENDIF
0x4500…4506 LineComalBin {
0x4500…4506 ptr = 0xd25d // 0x4500 @0x0
0x4500…4506 lno = 0x2148 // 0x4502 @0x2
0x4500…4506 at0004 = ╱9b╱ ENDIF ╱ // 0x4504 @0x4
0x4500…4506 at0005 = EOL // 0x4505 @0x5
0x4500…4506 }
0x4506…450c d263 8530 ENDIF
0x4506…450c LineComalBin {
0x4506…450c ptr = 0xd263 // 0x4506 @0x0
0x4506…450c lno = 0x2152 // 0x4508 @0x2
0x4506…450c at0004 = ╱9b╱ ENDIF ╱ // 0x450a @0x4
0x4506…450c at0005 = EOL // 0x450b @0x5
0x4506…450c }
0x450c…4517 d26e 8540 IF E4=E THEN
0x450c…4517 LineComalBin {
0x450c…4517 ptr = 0xd26e // 0x450c @0x0
0x450c…4517 lno = 0x215c // 0x450e @0x2
0x450c…4517 at0004 = ╱9c╱ IF ╱ // 0x4510 @0x4
0x450c…4517 at0005 = ╱45╱E╱ // 0x4511 @0x5
0x450c…4517 at0006 = ╱34╱4╱ // 0x4512 @0x6
0x450c…4517 at0007 = ╱dc╱=╱ // 0x4513 @0x7
0x450c…4517 at0008 = ╱45╱E╱ // 0x4514 @0x8
0x450c…4517 at0009 = ╱b6╱ THEN ╱ // 0x4515 @0x9
0x450c…4517 at000a = EOL // 0x4516 @0xa
0x450c…4517 }
0x4517…4536 d28d 8550 K3=ORD(D2$(22))-48
0x4517…4536 LineComalBin {
0x4517…4536 ptr = 0xd28d // 0x4517 @0x0
0x4517…4536 lno = 0x2166 // 0x4519 @0x2
0x4517…4536 at0004 = ╱4b╱K╱ // 0x451b @0x4
0x4517…4536 at0005 = ╱33╱3╱ // 0x451c @0x5
0x4517…4536 at0006 = ╱dc╱=╱ // 0x451d @0x6
0x4517…4536 at0007 = ╱cd╱ORD╱ // 0x451e @0x7
0x4517…4536 at0008 = ╱ed╱(╱ // 0x451f @0x8
0x4517…4536 at0009 = ╱44╱D╱ // 0x4520 @0x9
0x4517…4536 at000a = ╱32╱2╱ // 0x4521 @0xa
0x4517…4536 at000b = ╱ef╱$╱ // 0x4522 @0xb
0x4517…4536 at000c = ╱ed╱(╱ // 0x4523 @0xc
0x4517…4536 at000d = ╱32╱2╱ // 0x4524 @0xd
0x4517…4536 at000e = ╱32╱2╱ // 0x4525 @0xe
0x4517…4536 at000f = ╱fe0000b005╱ // 0x4526 @0xf
0x4517…4536 at0014 = ╱ee╱)╱ // 0x452b @0x14
0x4517…4536 at0015 = ╱ee╱)╱ // 0x452c @0x15
0x4517…4536 at0016 = ╱e3╱-╱ // 0x452d @0x16
0x4517…4536 at0017 = ╱34╱4╱ // 0x452e @0x17
0x4517…4536 at0018 = ╱38╱8╱ // 0x452f @0x18
0x4517…4536 at0019 = ╱fe0000c006╱ // 0x4530 @0x19
0x4517…4536 at001e = EOL // 0x4535 @0x1e
0x4517…4536 }
0x4536…4546 d29d 8560 IF K3<4 THEN
0x4536…4546 LineComalBin {
0x4536…4546 ptr = 0xd29d // 0x4536 @0x0
0x4536…4546 lno = 0x2170 // 0x4538 @0x2
0x4536…4546 at0004 = ╱9c╱ IF ╱ // 0x453a @0x4
0x4536…4546 at0005 = ╱4b╱K╱ // 0x453b @0x5
0x4536…4546 at0006 = ╱33╱3╱ // 0x453c @0x6
0x4536…4546 at0007 = ╱dd╱<╱ // 0x453d @0x7
0x4536…4546 at0008 = ╱34╱4╱ // 0x453e @0x8
0x4536…4546 at0009 = ╱fe00008003╱ // 0x453f @0x9
0x4536…4546 at000e = ╱b6╱ THEN ╱ // 0x4544 @0xe
0x4536…4546 at000f = EOL // 0x4545 @0xf
0x4536…4546 }
0x4546…4560 d2b7 8570 IF A2(K3)=F8 OR A2(K3)=-E THEN
0x4546…4560 LineComalBin {
0x4546…4560 ptr = 0xd2b7 // 0x4546 @0x0
0x4546…4560 lno = 0x217a // 0x4548 @0x2
0x4546…4560 at0004 = ╱9c╱ IF ╱ // 0x454a @0x4
0x4546…4560 at0005 = ╱41╱A╱ // 0x454b @0x5
0x4546…4560 at0006 = ╱32╱2╱ // 0x454c @0x6
0x4546…4560 at0007 = ╱ed╱(╱ // 0x454d @0x7
0x4546…4560 at0008 = ╱4b╱K╱ // 0x454e @0x8
0x4546…4560 at0009 = ╱33╱3╱ // 0x454f @0x9
0x4546…4560 at000a = ╱ee╱)╱ // 0x4550 @0xa
0x4546…4560 at000b = ╱dc╱=╱ // 0x4551 @0xb
0x4546…4560 at000c = ╱46╱F╱ // 0x4552 @0xc
0x4546…4560 at000d = ╱38╱8╱ // 0x4553 @0xd
0x4546…4560 at000e = ╱db╱ OR ╱ // 0x4554 @0xe
0x4546…4560 at000f = ╱41╱A╱ // 0x4555 @0xf
0x4546…4560 at0010 = ╱32╱2╱ // 0x4556 @0x10
0x4546…4560 at0011 = ╱ed╱(╱ // 0x4557 @0x11
0x4546…4560 at0012 = ╱4b╱K╱ // 0x4558 @0x12
0x4546…4560 at0013 = ╱33╱3╱ // 0x4559 @0x13
0x4546…4560 at0014 = ╱ee╱)╱ // 0x455a @0x14
0x4546…4560 at0015 = ╱dc╱=╱ // 0x455b @0x15
0x4546…4560 at0016 = ╱e9╱-╱ // 0x455c @0x16
0x4546…4560 at0017 = ╱45╱E╱ // 0x455d @0x17
0x4546…4560 at0018 = ╱b6╱ THEN ╱ // 0x455e @0x18
0x4546…4560 at0019 = EOL // 0x455f @0x19
0x4546…4560 }
0x4560…4571 d2c8 8580 EXEC BEREGNFERIE
0x4560…4571 LineComalBin {
0x4560…4571 ptr = 0xd2c8 // 0x4560 @0x0
0x4560…4571 lno = 0x2184 // 0x4562 @0x2
0x4560…4571 at0004 = ╱9d╱ EXEC ╱ // 0x4564 @0x4
0x4560…4571 at0005 = ╱42╱B╱ // 0x4565 @0x5
0x4560…4571 at0006 = ╱45╱E╱ // 0x4566 @0x6
0x4560…4571 at0007 = ╱52╱R╱ // 0x4567 @0x7
0x4560…4571 at0008 = ╱45╱E╱ // 0x4568 @0x8
0x4560…4571 at0009 = ╱47╱G╱ // 0x4569 @0x9
0x4560…4571 at000a = ╱4e╱N╱ // 0x456a @0xa
0x4560…4571 at000b = ╱46╱F╱ // 0x456b @0xb
0x4560…4571 at000c = ╱45╱E╱ // 0x456c @0xc
0x4560…4571 at000d = ╱52╱R╱ // 0x456d @0xd
0x4560…4571 at000e = ╱49╱I╱ // 0x456e @0xe
0x4560…4571 at000f = ╱45╱E╱ // 0x456f @0xf
0x4560…4571 at0010 = EOL // 0x4570 @0x10
0x4560…4571 }
0x4571…457a d2d1 8590 K9=E
0x4571…457a LineComalBin {
0x4571…457a ptr = 0xd2d1 // 0x4571 @0x0
0x4571…457a lno = 0x218e // 0x4573 @0x2
0x4571…457a at0004 = ╱4b╱K╱ // 0x4575 @0x4
0x4571…457a at0005 = ╱39╱9╱ // 0x4576 @0x5
0x4571…457a at0006 = ╱dc╱=╱ // 0x4577 @0x6
0x4571…457a at0007 = ╱45╱E╱ // 0x4578 @0x7
0x4571…457a at0008 = EOL // 0x4579 @0x8
0x4571…457a }
0x457a…4580 d2d7 8600 ENDIF
0x457a…4580 LineComalBin {
0x457a…4580 ptr = 0xd2d7 // 0x457a @0x0
0x457a…4580 lno = 0x2198 // 0x457c @0x2
0x457a…4580 at0004 = ╱9b╱ ENDIF ╱ // 0x457e @0x4
0x457a…4580 at0005 = EOL // 0x457f @0x5
0x457a…4580 }
0x4580…4586 d2dd 8610 ENDIF
0x4580…4586 LineComalBin {
0x4580…4586 ptr = 0xd2dd // 0x4580 @0x0
0x4580…4586 lno = 0x21a2 // 0x4582 @0x2
0x4580…4586 at0004 = ╱9b╱ ENDIF ╱ // 0x4584 @0x4
0x4580…4586 at0005 = EOL // 0x4585 @0x5
0x4580…4586 }
0x4586…458c d2e3 8620 ENDIF
0x4586…458c LineComalBin {
0x4586…458c ptr = 0xd2e3 // 0x4586 @0x0
0x4586…458c lno = 0x21ac // 0x4588 @0x2
0x4586…458c at0004 = ╱9b╱ ENDIF ╱ // 0x458a @0x4
0x4586…458c at0005 = EOL // 0x458b @0x5
0x4586…458c }
0x458c…4597 d2ee 8630 IF E5=E THEN
0x458c…4597 LineComalBin {
0x458c…4597 ptr = 0xd2ee // 0x458c @0x0
0x458c…4597 lno = 0x21b6 // 0x458e @0x2
0x458c…4597 at0004 = ╱9c╱ IF ╱ // 0x4590 @0x4
0x458c…4597 at0005 = ╱45╱E╱ // 0x4591 @0x5
0x458c…4597 at0006 = ╱35╱5╱ // 0x4592 @0x6
0x458c…4597 at0007 = ╱dc╱=╱ // 0x4593 @0x7
0x458c…4597 at0008 = ╱45╱E╱ // 0x4594 @0x8
0x458c…4597 at0009 = ╱b6╱ THEN ╱ // 0x4595 @0x9
0x458c…4597 at000a = EOL // 0x4596 @0xa
0x458c…4597 }
0x4597…45b6 d30d 8640 K3=ORD(D2$(23))-48
0x4597…45b6 LineComalBin {
0x4597…45b6 ptr = 0xd30d // 0x4597 @0x0
0x4597…45b6 lno = 0x21c0 // 0x4599 @0x2
0x4597…45b6 at0004 = ╱4b╱K╱ // 0x459b @0x4
0x4597…45b6 at0005 = ╱33╱3╱ // 0x459c @0x5
0x4597…45b6 at0006 = ╱dc╱=╱ // 0x459d @0x6
0x4597…45b6 at0007 = ╱cd╱ORD╱ // 0x459e @0x7
0x4597…45b6 at0008 = ╱ed╱(╱ // 0x459f @0x8
0x4597…45b6 at0009 = ╱44╱D╱ // 0x45a0 @0x9
0x4597…45b6 at000a = ╱32╱2╱ // 0x45a1 @0xa
0x4597…45b6 at000b = ╱ef╱$╱ // 0x45a2 @0xb
0x4597…45b6 at000c = ╱ed╱(╱ // 0x45a3 @0xc
0x4597…45b6 at000d = ╱32╱2╱ // 0x45a4 @0xd
0x4597…45b6 at000e = ╱33╱3╱ // 0x45a5 @0xe
0x4597…45b6 at000f = ╱fe0000b805╱ // 0x45a6 @0xf
0x4597…45b6 at0014 = ╱ee╱)╱ // 0x45ab @0x14
0x4597…45b6 at0015 = ╱ee╱)╱ // 0x45ac @0x15
0x4597…45b6 at0016 = ╱e3╱-╱ // 0x45ad @0x16
0x4597…45b6 at0017 = ╱34╱4╱ // 0x45ae @0x17
0x4597…45b6 at0018 = ╱38╱8╱ // 0x45af @0x18
0x4597…45b6 at0019 = ╱fe0000c006╱ // 0x45b0 @0x19
0x4597…45b6 at001e = EOL // 0x45b5 @0x1e
0x4597…45b6 }
0x45b6…45c6 d31d 8650 IF K3<4 THEN
0x45b6…45c6 LineComalBin {
0x45b6…45c6 ptr = 0xd31d // 0x45b6 @0x0
0x45b6…45c6 lno = 0x21ca // 0x45b8 @0x2
0x45b6…45c6 at0004 = ╱9c╱ IF ╱ // 0x45ba @0x4
0x45b6…45c6 at0005 = ╱4b╱K╱ // 0x45bb @0x5
0x45b6…45c6 at0006 = ╱33╱3╱ // 0x45bc @0x6
0x45b6…45c6 at0007 = ╱dd╱<╱ // 0x45bd @0x7
0x45b6…45c6 at0008 = ╱34╱4╱ // 0x45be @0x8
0x45b6…45c6 at0009 = ╱fe00008003╱ // 0x45bf @0x9
0x45b6…45c6 at000e = ╱b6╱ THEN ╱ // 0x45c4 @0xe
0x45b6…45c6 at000f = EOL // 0x45c5 @0xf
0x45b6…45c6 }
0x45c6…45e0 d337 8660 IF A3(K3)=F8 OR A3(K3)=-E THEN
0x45c6…45e0 LineComalBin {
0x45c6…45e0 ptr = 0xd337 // 0x45c6 @0x0
0x45c6…45e0 lno = 0x21d4 // 0x45c8 @0x2
0x45c6…45e0 at0004 = ╱9c╱ IF ╱ // 0x45ca @0x4
0x45c6…45e0 at0005 = ╱41╱A╱ // 0x45cb @0x5
0x45c6…45e0 at0006 = ╱33╱3╱ // 0x45cc @0x6
0x45c6…45e0 at0007 = ╱ed╱(╱ // 0x45cd @0x7
0x45c6…45e0 at0008 = ╱4b╱K╱ // 0x45ce @0x8
0x45c6…45e0 at0009 = ╱33╱3╱ // 0x45cf @0x9
0x45c6…45e0 at000a = ╱ee╱)╱ // 0x45d0 @0xa
0x45c6…45e0 at000b = ╱dc╱=╱ // 0x45d1 @0xb
0x45c6…45e0 at000c = ╱46╱F╱ // 0x45d2 @0xc
0x45c6…45e0 at000d = ╱38╱8╱ // 0x45d3 @0xd
0x45c6…45e0 at000e = ╱db╱ OR ╱ // 0x45d4 @0xe
0x45c6…45e0 at000f = ╱41╱A╱ // 0x45d5 @0xf
0x45c6…45e0 at0010 = ╱33╱3╱ // 0x45d6 @0x10
0x45c6…45e0 at0011 = ╱ed╱(╱ // 0x45d7 @0x11
0x45c6…45e0 at0012 = ╱4b╱K╱ // 0x45d8 @0x12
0x45c6…45e0 at0013 = ╱33╱3╱ // 0x45d9 @0x13
0x45c6…45e0 at0014 = ╱ee╱)╱ // 0x45da @0x14
0x45c6…45e0 at0015 = ╱dc╱=╱ // 0x45db @0x15
0x45c6…45e0 at0016 = ╱e9╱-╱ // 0x45dc @0x16
0x45c6…45e0 at0017 = ╱45╱E╱ // 0x45dd @0x17
0x45c6…45e0 at0018 = ╱b6╱ THEN ╱ // 0x45de @0x18
0x45c6…45e0 at0019 = EOL // 0x45df @0x19
0x45c6…45e0 }
0x45e0…45ee d345 8670 EXEC BEREGNSH
0x45e0…45ee LineComalBin {
0x45e0…45ee ptr = 0xd345 // 0x45e0 @0x0
0x45e0…45ee lno = 0x21de // 0x45e2 @0x2
0x45e0…45ee at0004 = ╱9d╱ EXEC ╱ // 0x45e4 @0x4
0x45e0…45ee at0005 = ╱42╱B╱ // 0x45e5 @0x5
0x45e0…45ee at0006 = ╱45╱E╱ // 0x45e6 @0x6
0x45e0…45ee at0007 = ╱52╱R╱ // 0x45e7 @0x7
0x45e0…45ee at0008 = ╱45╱E╱ // 0x45e8 @0x8
0x45e0…45ee at0009 = ╱47╱G╱ // 0x45e9 @0x9
0x45e0…45ee at000a = ╱4e╱N╱ // 0x45ea @0xa
0x45e0…45ee at000b = ╱53╱S╱ // 0x45eb @0xb
0x45e0…45ee at000c = ╱48╱H╱ // 0x45ec @0xc
0x45e0…45ee at000d = EOL // 0x45ed @0xd
0x45e0…45ee }
0x45ee…45f7 d34e 8680 L4=E
0x45ee…45f7 LineComalBin {
0x45ee…45f7 ptr = 0xd34e // 0x45ee @0x0
0x45ee…45f7 lno = 0x21e8 // 0x45f0 @0x2
0x45ee…45f7 at0004 = ╱4c╱L╱ // 0x45f2 @0x4
0x45ee…45f7 at0005 = ╱34╱4╱ // 0x45f3 @0x5
0x45ee…45f7 at0006 = ╱dc╱=╱ // 0x45f4 @0x6
0x45ee…45f7 at0007 = ╱45╱E╱ // 0x45f5 @0x7
0x45ee…45f7 at0008 = EOL // 0x45f6 @0x8
0x45ee…45f7 }
0x45f7…45fd d354 8690 ENDIF
0x45f7…45fd LineComalBin {
0x45f7…45fd ptr = 0xd354 // 0x45f7 @0x0
0x45f7…45fd lno = 0x21f2 // 0x45f9 @0x2
0x45f7…45fd at0004 = ╱9b╱ ENDIF ╱ // 0x45fb @0x4
0x45f7…45fd at0005 = EOL // 0x45fc @0x5
0x45f7…45fd }
0x45fd…4603 d35a 8700 ENDIF
0x45fd…4603 LineComalBin {
0x45fd…4603 ptr = 0xd35a // 0x45fd @0x0
0x45fd…4603 lno = 0x21fc // 0x45ff @0x2
0x45fd…4603 at0004 = ╱9b╱ ENDIF ╱ // 0x4601 @0x4
0x45fd…4603 at0005 = EOL // 0x4602 @0x5
0x45fd…4603 }
0x4603…4609 d360 8710 ENDIF
0x4603…4609 LineComalBin {
0x4603…4609 ptr = 0xd360 // 0x4603 @0x0
0x4603…4609 lno = 0x2206 // 0x4605 @0x2
0x4603…4609 at0004 = ╱9b╱ ENDIF ╱ // 0x4607 @0x4
0x4603…4609 at0005 = EOL // 0x4608 @0x5
0x4603…4609 }
0x4609…4617 d36e 8720 IF K9*L4=E THEN
0x4609…4617 LineComalBin {
0x4609…4617 ptr = 0xd36e // 0x4609 @0x0
0x4609…4617 lno = 0x2210 // 0x460b @0x2
0x4609…4617 at0004 = ╱9c╱ IF ╱ // 0x460d @0x4
0x4609…4617 at0005 = ╱4b╱K╱ // 0x460e @0x5
0x4609…4617 at0006 = ╱39╱9╱ // 0x460f @0x6
0x4609…4617 at0007 = ╱e4╱*╱ // 0x4610 @0x7
0x4609…4617 at0008 = ╱4c╱L╱ // 0x4611 @0x8
0x4609…4617 at0009 = ╱34╱4╱ // 0x4612 @0x9
0x4609…4617 at000a = ╱dc╱=╱ // 0x4613 @0xa
0x4609…4617 at000b = ╱45╱E╱ // 0x4614 @0xb
0x4609…4617 at000c = ╱b6╱ THEN ╱ // 0x4615 @0xc
0x4609…4617 at000d = EOL // 0x4616 @0xd
0x4609…4617 }
0x4617…4632 d389 8730 EXEC C(0,C0$,C2$,C3$)
0x4617…4632 LineComalBin {
0x4617…4632 ptr = 0xd389 // 0x4617 @0x0
0x4617…4632 lno = 0x221a // 0x4619 @0x2
0x4617…4632 at0004 = ╱9d╱ EXEC ╱ // 0x461b @0x4
0x4617…4632 at0005 = ╱43╱C╱ // 0x461c @0x5
0x4617…4632 at0006 = ╱ed╱(╱ // 0x461d @0x6
0x4617…4632 at0007 = ╱30╱0╱ // 0x461e @0x7
0x4617…4632 at0008 = ╱fe00000000╱ // 0x461f @0x8
0x4617…4632 at000d = ╱ec╱,╱ // 0x4624 @0xd
0x4617…4632 at000e = ╱43╱C╱ // 0x4625 @0xe
0x4617…4632 at000f = ╱30╱0╱ // 0x4626 @0xf
0x4617…4632 at0010 = ╱ef╱$╱ // 0x4627 @0x10
0x4617…4632 at0011 = ╱ec╱,╱ // 0x4628 @0x11
0x4617…4632 at0012 = ╱43╱C╱ // 0x4629 @0x12
0x4617…4632 at0013 = ╱32╱2╱ // 0x462a @0x13
0x4617…4632 at0014 = ╱ef╱$╱ // 0x462b @0x14
0x4617…4632 at0015 = ╱ec╱,╱ // 0x462c @0x15
0x4617…4632 at0016 = ╱43╱C╱ // 0x462d @0x16
0x4617…4632 at0017 = ╱33╱3╱ // 0x462e @0x17
0x4617…4632 at0018 = ╱ef╱$╱ // 0x462f @0x18
0x4617…4632 at0019 = ╱ee╱)╱ // 0x4630 @0x19
0x4617…4632 at001a = EOL // 0x4631 @0x1a
0x4617…4632 }
0x4632…464d d3a4 8731 EXEC C(4,C3$,B3$,C3$)
0x4632…464d LineComalBin {
0x4632…464d ptr = 0xd3a4 // 0x4632 @0x0
0x4632…464d lno = 0x221b // 0x4634 @0x2
0x4632…464d at0004 = ╱9d╱ EXEC ╱ // 0x4636 @0x4
0x4632…464d at0005 = ╱43╱C╱ // 0x4637 @0x5
0x4632…464d at0006 = ╱ed╱(╱ // 0x4638 @0x6
0x4632…464d at0007 = ╱34╱4╱ // 0x4639 @0x7
0x4632…464d at0008 = ╱fe00008003╱ // 0x463a @0x8
0x4632…464d at000d = ╱ec╱,╱ // 0x463f @0xd
0x4632…464d at000e = ╱43╱C╱ // 0x4640 @0xe
0x4632…464d at000f = ╱33╱3╱ // 0x4641 @0xf
0x4632…464d at0010 = ╱ef╱$╱ // 0x4642 @0x10
0x4632…464d at0011 = ╱ec╱,╱ // 0x4643 @0x11
0x4632…464d at0012 = ╱42╱B╱ // 0x4644 @0x12
0x4632…464d at0013 = ╱33╱3╱ // 0x4645 @0x13
0x4632…464d at0014 = ╱ef╱$╱ // 0x4646 @0x14
0x4632…464d at0015 = ╱ec╱,╱ // 0x4647 @0x15
0x4632…464d at0016 = ╱43╱C╱ // 0x4648 @0x16
0x4632…464d at0017 = ╱33╱3╱ // 0x4649 @0x17
0x4632…464d at0018 = ╱ef╱$╱ // 0x464a @0x18
0x4632…464d at0019 = ╱ee╱)╱ // 0x464b @0x19
0x4632…464d at001a = EOL // 0x464c @0x1a
0x4632…464d }
0x464d…4658 d3af 8732 IF SI<>B THEN
0x464d…4658 LineComalBin {
0x464d…4658 ptr = 0xd3af // 0x464d @0x0
0x464d…4658 lno = 0x221c // 0x464f @0x2
0x464d…4658 at0004 = ╱9c╱ IF ╱ // 0x4651 @0x4
0x464d…4658 at0005 = ╱53╱S╱ // 0x4652 @0x5
0x464d…4658 at0006 = ╱49╱I╱ // 0x4653 @0x6
0x464d…4658 at0007 = ╱e1╱<>╱ // 0x4654 @0x7
0x464d…4658 at0008 = ╱42╱B╱ // 0x4655 @0x8
0x464d…4658 at0009 = ╱b6╱ THEN ╱ // 0x4656 @0x9
0x464d…4658 at000a = EOL // 0x4657 @0xa
0x464d…4658 }
0x4658…4673 d3ca 8740 EXEC C(2,C0$,B4$,C4$)
0x4658…4673 LineComalBin {
0x4658…4673 ptr = 0xd3ca // 0x4658 @0x0
0x4658…4673 lno = 0x2224 // 0x465a @0x2
0x4658…4673 at0004 = ╱9d╱ EXEC ╱ // 0x465c @0x4
0x4658…4673 at0005 = ╱43╱C╱ // 0x465d @0x5
0x4658…4673 at0006 = ╱ed╱(╱ // 0x465e @0x6
0x4658…4673 at0007 = ╱32╱2╱ // 0x465f @0x7
0x4658…4673 at0008 = ╱fe00008002╱ // 0x4660 @0x8
0x4658…4673 at000d = ╱ec╱,╱ // 0x4665 @0xd
0x4658…4673 at000e = ╱43╱C╱ // 0x4666 @0xe
0x4658…4673 at000f = ╱30╱0╱ // 0x4667 @0xf
0x4658…4673 at0010 = ╱ef╱$╱ // 0x4668 @0x10
0x4658…4673 at0011 = ╱ec╱,╱ // 0x4669 @0x11
0x4658…4673 at0012 = ╱42╱B╱ // 0x466a @0x12
0x4658…4673 at0013 = ╱34╱4╱ // 0x466b @0x13
0x4658…4673 at0014 = ╱ef╱$╱ // 0x466c @0x14
0x4658…4673 at0015 = ╱ec╱,╱ // 0x466d @0x15
0x4658…4673 at0016 = ╱43╱C╱ // 0x466e @0x16
0x4658…4673 at0017 = ╱34╱4╱ // 0x466f @0x17
0x4658…4673 at0018 = ╱ef╱$╱ // 0x4670 @0x18
0x4658…4673 at0019 = ╱ee╱)╱ // 0x4671 @0x19
0x4658…4673 at001a = EOL // 0x4672 @0x1a
0x4658…4673 }
0x4673…468e d3e5 8750 EXEC C(3,C4$,C3$,C4$)
0x4673…468e LineComalBin {
0x4673…468e ptr = 0xd3e5 // 0x4673 @0x0
0x4673…468e lno = 0x222e // 0x4675 @0x2
0x4673…468e at0004 = ╱9d╱ EXEC ╱ // 0x4677 @0x4
0x4673…468e at0005 = ╱43╱C╱ // 0x4678 @0x5
0x4673…468e at0006 = ╱ed╱(╱ // 0x4679 @0x6
0x4673…468e at0007 = ╱33╱3╱ // 0x467a @0x7
0x4673…468e at0008 = ╱fe0000c002╱ // 0x467b @0x8
0x4673…468e at000d = ╱ec╱,╱ // 0x4680 @0xd
0x4673…468e at000e = ╱43╱C╱ // 0x4681 @0xe
0x4673…468e at000f = ╱34╱4╱ // 0x4682 @0xf
0x4673…468e at0010 = ╱ef╱$╱ // 0x4683 @0x10
0x4673…468e at0011 = ╱ec╱,╱ // 0x4684 @0x11
0x4673…468e at0012 = ╱43╱C╱ // 0x4685 @0x12
0x4673…468e at0013 = ╱33╱3╱ // 0x4686 @0x13
0x4673…468e at0014 = ╱ef╱$╱ // 0x4687 @0x14
0x4673…468e at0015 = ╱ec╱,╱ // 0x4688 @0x15
0x4673…468e at0016 = ╱43╱C╱ // 0x4689 @0x16
0x4673…468e at0017 = ╱34╱4╱ // 0x468a @0x17
0x4673…468e at0018 = ╱ef╱$╱ // 0x468b @0x18
0x4673…468e at0019 = ╱ee╱)╱ // 0x468c @0x19
0x4673…468e at001a = EOL // 0x468d @0x1a
0x4673…468e }
0x468e…46a9 d400 8760 EXEC C(4,C4$,B4$,C3$)
0x468e…46a9 LineComalBin {
0x468e…46a9 ptr = 0xd400 // 0x468e @0x0
0x468e…46a9 lno = 0x2238 // 0x4690 @0x2
0x468e…46a9 at0004 = ╱9d╱ EXEC ╱ // 0x4692 @0x4
0x468e…46a9 at0005 = ╱43╱C╱ // 0x4693 @0x5
0x468e…46a9 at0006 = ╱ed╱(╱ // 0x4694 @0x6
0x468e…46a9 at0007 = ╱34╱4╱ // 0x4695 @0x7
0x468e…46a9 at0008 = ╱fe00008003╱ // 0x4696 @0x8
0x468e…46a9 at000d = ╱ec╱,╱ // 0x469b @0xd
0x468e…46a9 at000e = ╱43╱C╱ // 0x469c @0xe
0x468e…46a9 at000f = ╱34╱4╱ // 0x469d @0xf
0x468e…46a9 at0010 = ╱ef╱$╱ // 0x469e @0x10
0x468e…46a9 at0011 = ╱ec╱,╱ // 0x469f @0x11
0x468e…46a9 at0012 = ╱42╱B╱ // 0x46a0 @0x12
0x468e…46a9 at0013 = ╱34╱4╱ // 0x46a1 @0x13
0x468e…46a9 at0014 = ╱ef╱$╱ // 0x46a2 @0x14
0x468e…46a9 at0015 = ╱ec╱,╱ // 0x46a3 @0x15
0x468e…46a9 at0016 = ╱43╱C╱ // 0x46a4 @0x16
0x468e…46a9 at0017 = ╱33╱3╱ // 0x46a5 @0x17
0x468e…46a9 at0018 = ╱ef╱$╱ // 0x46a6 @0x18
0x468e…46a9 at0019 = ╱ee╱)╱ // 0x46a7 @0x19
0x468e…46a9 at001a = EOL // 0x46a8 @0x1a
0x468e…46a9 }
0x46a9…46bb d412 8770 IF SI=G THEN C4$=B4$
0x46a9…46bb LineComalBin {
0x46a9…46bb ptr = 0xd412 // 0x46a9 @0x0
0x46a9…46bb lno = 0x2242 // 0x46ab @0x2
0x46a9…46bb at0004 = ╱82╱ IF ╱ // 0x46ad @0x4
0x46a9…46bb at0005 = ╱53╱S╱ // 0x46ae @0x5
0x46a9…46bb at0006 = ╱49╱I╱ // 0x46af @0x6
0x46a9…46bb at0007 = ╱dc╱=╱ // 0x46b0 @0x7
0x46a9…46bb at0008 = ╱47╱G╱ // 0x46b1 @0x8
0x46a9…46bb at0009 = ╱b6╱ THEN ╱ // 0x46b2 @0x9
0x46a9…46bb at000a = ╱43╱C╱ // 0x46b3 @0xa
0x46a9…46bb at000b = ╱34╱4╱ // 0x46b4 @0xb
0x46a9…46bb at000c = ╱ef╱$╱ // 0x46b5 @0xc
0x46a9…46bb at000d = ╱dc╱=╱ // 0x46b6 @0xd
0x46a9…46bb at000e = ╱42╱B╱ // 0x46b7 @0xe
0x46a9…46bb at000f = ╱34╱4╱ // 0x46b8 @0xf
0x46a9…46bb at0010 = ╱ef╱$╱ // 0x46b9 @0x10
0x46a9…46bb at0011 = EOL // 0x46ba @0x11
0x46a9…46bb }
0x46bb…46c1 d418 8771 ELSE
0x46bb…46c1 LineComalBin {
0x46bb…46c1 ptr = 0xd418 // 0x46bb @0x0
0x46bb…46c1 lno = 0x2243 // 0x46bd @0x2
0x46bb…46c1 at0004 = ╱9a╱ ELSE ╱ // 0x46bf @0x4
0x46bb…46c1 at0005 = EOL // 0x46c0 @0x5
0x46bb…46c1 }
0x46c1…46cd d424 8772 C4$=B3$
0x46c1…46cd LineComalBin {
0x46c1…46cd ptr = 0xd424 // 0x46c1 @0x0
0x46c1…46cd lno = 0x2244 // 0x46c3 @0x2
0x46c1…46cd at0004 = ╱43╱C╱ // 0x46c5 @0x4
0x46c1…46cd at0005 = ╱34╱4╱ // 0x46c6 @0x5
0x46c1…46cd at0006 = ╱ef╱$╱ // 0x46c7 @0x6
0x46c1…46cd at0007 = ╱dc╱=╱ // 0x46c8 @0x7
0x46c1…46cd at0008 = ╱42╱B╱ // 0x46c9 @0x8
0x46c1…46cd at0009 = ╱33╱3╱ // 0x46ca @0x9
0x46c1…46cd at000a = ╱ef╱$╱ // 0x46cb @0xa
0x46c1…46cd at000b = EOL // 0x46cc @0xb
0x46c1…46cd }
0x46cd…46d3 d42a 8773 ENDIF
0x46cd…46d3 LineComalBin {
0x46cd…46d3 ptr = 0xd42a // 0x46cd @0x0
0x46cd…46d3 lno = 0x2245 // 0x46cf @0x2
0x46cd…46d3 at0004 = ╱9b╱ ENDIF ╱ // 0x46d1 @0x4
0x46cd…46d3 at0005 = EOL // 0x46d2 @0x5
0x46cd…46d3 }
0x46d3…46d9 d430 8780 PRINT
0x46d3…46d9 LineComalBin {
0x46d3…46d9 ptr = 0xd430 // 0x46d3 @0x0
0x46d3…46d9 lno = 0x224c // 0x46d5 @0x2
0x46d3…46d9 at0004 = ╱92╱ PRINT ╱ // 0x46d7 @0x4
0x46d3…46d9 at0005 = EOL // 0x46d8 @0x5
0x46d3…46d9 }
0x46d9…470d d464 8790 PRINT "Nettoferiepengene udgør ";C4$(6,EL);" %"
0x46d9…470d LineComalBin {
0x46d9…470d ptr = 0xd464 // 0x46d9 @0x0
0x46d9…470d lno = 0x2256 // 0x46db @0x2
0x46d9…470d at0004 = ╱92╱ PRINT ╱ // 0x46dd @0x4
0x46d9…470d at0005 = ╱22╱"╱ // 0x46de @0x5
0x46d9…470d at0006 = ╱4e╱N╱ // 0x46df @0x6
0x46d9…470d at0007 = ╱65╱e╱ // 0x46e0 @0x7
0x46d9…470d at0008 = ╱74╱t╱ // 0x46e1 @0x8
0x46d9…470d at0009 = ╱74╱t╱ // 0x46e2 @0x9
0x46d9…470d at000a = ╱6f╱o╱ // 0x46e3 @0xa
0x46d9…470d at000b = ╱66╱f╱ // 0x46e4 @0xb
0x46d9…470d at000c = ╱65╱e╱ // 0x46e5 @0xc
0x46d9…470d at000d = ╱72╱r╱ // 0x46e6 @0xd
0x46d9…470d at000e = ╱69╱i╱ // 0x46e7 @0xe
0x46d9…470d at000f = ╱65╱e╱ // 0x46e8 @0xf
0x46d9…470d at0010 = ╱70╱p╱ // 0x46e9 @0x10
0x46d9…470d at0011 = ╱65╱e╱ // 0x46ea @0x11
0x46d9…470d at0012 = ╱6e╱n╱ // 0x46eb @0x12
0x46d9…470d at0013 = ╱67╱g╱ // 0x46ec @0x13
0x46d9…470d at0014 = ╱65╱e╱ // 0x46ed @0x14
0x46d9…470d at0015 = ╱6e╱n╱ // 0x46ee @0x15
0x46d9…470d at0016 = ╱65╱e╱ // 0x46ef @0x16
0x46d9…470d at0017 = ╱20╱…╱ // 0x46f0 @0x17
0x46d9…470d at0018 = ╱75╱u╱ // 0x46f1 @0x18
0x46d9…470d at0019 = ╱64╱d╱ // 0x46f2 @0x19
0x46d9…470d at001a = ╱67╱g╱ // 0x46f3 @0x1a
0x46d9…470d at001b = ╱7c╱ø╱ // 0x46f4 @0x1b
0x46d9…470d at001c = ╱72╱r╱ // 0x46f5 @0x1c
0x46d9…470d at001d = ╱20╱…╱ // 0x46f6 @0x1d
0x46d9…470d at001e = ╱22╱"╱ // 0x46f7 @0x1e
0x46d9…470d at001f = ╱eb╱;╱ // 0x46f8 @0x1f
0x46d9…470d at0020 = ╱43╱C╱ // 0x46f9 @0x20
0x46d9…470d at0021 = ╱34╱4╱ // 0x46fa @0x21
0x46d9…470d at0022 = ╱ef╱$╱ // 0x46fb @0x22
0x46d9…470d at0023 = ╱ed╱(╱ // 0x46fc @0x23
0x46d9…470d at0024 = ╱36╱6╱ // 0x46fd @0x24
0x46d9…470d at0025 = ╱fe0000c003╱ // 0x46fe @0x25
0x46d9…470d at002a = ╱ec╱,╱ // 0x4703 @0x2a
0x46d9…470d at002b = ╱45╱E╱ // 0x4704 @0x2b
0x46d9…470d at002c = ╱4c╱L╱ // 0x4705 @0x2c
0x46d9…470d at002d = ╱ee╱)╱ // 0x4706 @0x2d
0x46d9…470d at002e = ╱eb╱;╱ // 0x4707 @0x2e
0x46d9…470d at002f = ╱22╱"╱ // 0x4708 @0x2f
0x46d9…470d at0030 = ╱20╱…╱ // 0x4709 @0x30
0x46d9…470d at0031 = ╱25╱%╱ // 0x470a @0x31
0x46d9…470d at0032 = ╱22╱"╱ // 0x470b @0x32
0x46d9…470d at0033 = EOL // 0x470c @0x33
0x46d9…470d }
0x470d…4719 d470 8800 J6=J6+G
0x470d…4719 LineComalBin {
0x470d…4719 ptr = 0xd470 // 0x470d @0x0
0x470d…4719 lno = 0x2260 // 0x470f @0x2
0x470d…4719 at0004 = ╱4a╱J╱ // 0x4711 @0x4
0x470d…4719 at0005 = ╱36╱6╱ // 0x4712 @0x5
0x470d…4719 at0006 = ╱dc╱=╱ // 0x4713 @0x6
0x470d…4719 at0007 = ╱4a╱J╱ // 0x4714 @0x7
0x470d…4719 at0008 = ╱36╱6╱ // 0x4715 @0x8
0x470d…4719 at0009 = ╱e2╱+╱ // 0x4716 @0x9
0x470d…4719 at000a = ╱47╱G╱ // 0x4717 @0xa
0x470d…4719 at000b = EOL // 0x4718 @0xb
0x470d…4719 }
0x4719…471f d476 8810 ENDIF
0x4719…471f LineComalBin {
0x4719…471f ptr = 0xd476 // 0x4719 @0x0
0x4719…471f lno = 0x226a // 0x471b @0x2
0x4719…471f at0004 = ╱9b╱ ENDIF ╱ // 0x471d @0x4
0x4719…471f at0005 = EOL // 0x471e @0x5
0x4719…471f }
0x471f…4730 d487 8815 IF K2+K9+L4>B THEN
0x471f…4730 LineComalBin {
0x471f…4730 ptr = 0xd487 // 0x471f @0x0
0x471f…4730 lno = 0x226f // 0x4721 @0x2
0x471f…4730 at0004 = ╱9c╱ IF ╱ // 0x4723 @0x4
0x471f…4730 at0005 = ╱4b╱K╱ // 0x4724 @0x5
0x471f…4730 at0006 = ╱32╱2╱ // 0x4725 @0x6
0x471f…4730 at0007 = ╱e2╱+╱ // 0x4726 @0x7
0x471f…4730 at0008 = ╱4b╱K╱ // 0x4727 @0x8
0x471f…4730 at0009 = ╱39╱9╱ // 0x4728 @0x9
0x471f…4730 at000a = ╱e2╱+╱ // 0x4729 @0xa
0x471f…4730 at000b = ╱4c╱L╱ // 0x472a @0xb
0x471f…4730 at000c = ╱34╱4╱ // 0x472b @0xc
0x471f…4730 at000d = ╱de╱>╱ // 0x472c @0xd
0x471f…4730 at000e = ╱42╱B╱ // 0x472d @0xe
0x471f…4730 at000f = ╱b6╱ THEN ╱ // 0x472e @0xf
0x471f…4730 at0010 = EOL // 0x472f @0x10
0x471f…4730 }
0x4730…473f d496 8820 EXEC SKRIVBUND
0x4730…473f LineComalBin {
0x4730…473f ptr = 0xd496 // 0x4730 @0x0
0x4730…473f lno = 0x2274 // 0x4732 @0x2
0x4730…473f at0004 = ╱9d╱ EXEC ╱ // 0x4734 @0x4
0x4730…473f at0005 = ╱53╱S╱ // 0x4735 @0x5
0x4730…473f at0006 = ╱4b╱K╱ // 0x4736 @0x6
0x4730…473f at0007 = ╱52╱R╱ // 0x4737 @0x7
0x4730…473f at0008 = ╱49╱I╱ // 0x4738 @0x8
0x4730…473f at0009 = ╱56╱V╱ // 0x4739 @0x9
0x4730…473f at000a = ╱42╱B╱ // 0x473a @0xa
0x4730…473f at000b = ╱55╱U╱ // 0x473b @0xb
0x4730…473f at000c = ╱4e╱N╱ // 0x473c @0xc
0x4730…473f at000d = ╱44╱D╱ // 0x473d @0xd
0x4730…473f at000e = EOL // 0x473e @0xe
0x4730…473f }
0x473f…4751 d4a8 8830 EXEC UDLØNMOD(F8)
0x473f…4751 LineComalBin {
0x473f…4751 ptr = 0xd4a8 // 0x473f @0x0
0x473f…4751 lno = 0x227e // 0x4741 @0x2
0x473f…4751 at0004 = ╱9d╱ EXEC ╱ // 0x4743 @0x4
0x473f…4751 at0005 = ╱55╱U╱ // 0x4744 @0x5
0x473f…4751 at0006 = ╱44╱D╱ // 0x4745 @0x6
0x473f…4751 at0007 = ╱4c╱L╱ // 0x4746 @0x7
0x473f…4751 at0008 = ╱5c╱Ø╱ // 0x4747 @0x8
0x473f…4751 at0009 = ╱4e╱N╱ // 0x4748 @0x9
0x473f…4751 at000a = ╱4d╱M╱ // 0x4749 @0xa
0x473f…4751 at000b = ╱4f╱O╱ // 0x474a @0xb
0x473f…4751 at000c = ╱44╱D╱ // 0x474b @0xc
0x473f…4751 at000d = ╱ed╱(╱ // 0x474c @0xd
0x473f…4751 at000e = ╱46╱F╱ // 0x474d @0xe
0x473f…4751 at000f = ╱38╱8╱ // 0x474e @0xf
0x473f…4751 at0010 = ╱ee╱)╱ // 0x474f @0x10
0x473f…4751 at0011 = EOL // 0x4750 @0x11
0x473f…4751 }
0x4751…475c d4b3 8840 EXEC UDTÆL
0x4751…475c LineComalBin {
0x4751…475c ptr = 0xd4b3 // 0x4751 @0x0
0x4751…475c lno = 0x2288 // 0x4753 @0x2
0x4751…475c at0004 = ╱9d╱ EXEC ╱ // 0x4755 @0x4
0x4751…475c at0005 = ╱55╱U╱ // 0x4756 @0x5
0x4751…475c at0006 = ╱44╱D╱ // 0x4757 @0x6
0x4751…475c at0007 = ╱54╱T╱ // 0x4758 @0x7
0x4751…475c at0008 = ╱5b╱Æ╱ // 0x4759 @0x8
0x4751…475c at0009 = ╱4c╱L╱ // 0x475a @0x9
0x4751…475c at000a = EOL // 0x475b @0xa
0x4751…475c }
0x475c…476c d4c3 8843 PUT D9$:F8,C7$
0x475c…476c LineComalBin {
0x475c…476c ptr = 0xd4c3 // 0x475c @0x0
0x475c…476c lno = 0x228b // 0x475e @0x2
0x475c…476c at0004 = ╱aa╱ PUT ╱ // 0x4760 @0x4
0x475c…476c at0005 = ╱44╱D╱ // 0x4761 @0x5
0x475c…476c at0006 = ╱39╱9╱ // 0x4762 @0x6
0x475c…476c at0007 = ╱ef╱$╱ // 0x4763 @0x7
0x475c…476c at0008 = ╱f0╱:╱ // 0x4764 @0x8
0x475c…476c at0009 = ╱46╱F╱ // 0x4765 @0x9
0x475c…476c at000a = ╱38╱8╱ // 0x4766 @0xa
0x475c…476c at000b = ╱ec╱,╱ // 0x4767 @0xb
0x475c…476c at000c = ╱43╱C╱ // 0x4768 @0xc
0x475c…476c at000d = ╱37╱7╱ // 0x4769 @0xd
0x475c…476c at000e = ╱ef╱$╱ // 0x476a @0xe
0x475c…476c at000f = EOL // 0x476b @0xf
0x475c…476c }
0x476c…4779 d4d0 8844 PUT D9$:C8$
0x476c…4779 LineComalBin {
0x476c…4779 ptr = 0xd4d0 // 0x476c @0x0
0x476c…4779 lno = 0x228c // 0x476e @0x2
0x476c…4779 at0004 = ╱aa╱ PUT ╱ // 0x4770 @0x4
0x476c…4779 at0005 = ╱44╱D╱ // 0x4771 @0x5
0x476c…4779 at0006 = ╱39╱9╱ // 0x4772 @0x6
0x476c…4779 at0007 = ╱ef╱$╱ // 0x4773 @0x7
0x476c…4779 at0008 = ╱f0╱:╱ // 0x4774 @0x8
0x476c…4779 at0009 = ╱43╱C╱ // 0x4775 @0x9
0x476c…4779 at000a = ╱38╱8╱ // 0x4776 @0xa
0x476c…4779 at000b = ╱ef╱$╱ // 0x4777 @0xb
0x476c…4779 at000c = EOL // 0x4778 @0xc
0x476c…4779 }
0x4779…477f d4d6 8845 ENDIF
0x4779…477f LineComalBin {
0x4779…477f ptr = 0xd4d6 // 0x4779 @0x0
0x4779…477f lno = 0x228d // 0x477b @0x2
0x4779…477f at0004 = ╱9b╱ ENDIF ╱ // 0x477d @0x4
0x4779…477f at0005 = EOL // 0x477e @0x5
0x4779…477f }
0x477f…478a d4e1 8846 IF K2=E THEN
0x477f…478a LineComalBin {
0x477f…478a ptr = 0xd4e1 // 0x477f @0x0
0x477f…478a lno = 0x228e // 0x4781 @0x2
0x477f…478a at0004 = ╱9c╱ IF ╱ // 0x4783 @0x4
0x477f…478a at0005 = ╱4b╱K╱ // 0x4784 @0x5
0x477f…478a at0006 = ╱32╱2╱ // 0x4785 @0x6
0x477f…478a at0007 = ╱dc╱=╱ // 0x4786 @0x7
0x477f…478a at0008 = ╱45╱E╱ // 0x4787 @0x8
0x477f…478a at0009 = ╱b6╱ THEN ╱ // 0x4788 @0x9
0x477f…478a at000a = EOL // 0x4789 @0xa
0x477f…478a }
0x478a…479a d4f1 8847 PUT E0$:F8,B6$
0x478a…479a LineComalBin {
0x478a…479a ptr = 0xd4f1 // 0x478a @0x0
0x478a…479a lno = 0x228f // 0x478c @0x2
0x478a…479a at0004 = ╱aa╱ PUT ╱ // 0x478e @0x4
0x478a…479a at0005 = ╱45╱E╱ // 0x478f @0x5
0x478a…479a at0006 = ╱30╱0╱ // 0x4790 @0x6
0x478a…479a at0007 = ╱ef╱$╱ // 0x4791 @0x7
0x478a…479a at0008 = ╱f0╱:╱ // 0x4792 @0x8
0x478a…479a at0009 = ╱46╱F╱ // 0x4793 @0x9
0x478a…479a at000a = ╱38╱8╱ // 0x4794 @0xa
0x478a…479a at000b = ╱ec╱,╱ // 0x4795 @0xb
0x478a…479a at000c = ╱42╱B╱ // 0x4796 @0xc
0x478a…479a at000d = ╱36╱6╱ // 0x4797 @0xd
0x478a…479a at000e = ╱ef╱$╱ // 0x4798 @0xe
0x478a…479a at000f = EOL // 0x4799 @0xf
0x478a…479a }
0x479a…47ab d502 8848 PUT E0$:F8,B61$
0x479a…47ab LineComalBin {
0x479a…47ab ptr = 0xd502 // 0x479a @0x0
0x479a…47ab lno = 0x2290 // 0x479c @0x2
0x479a…47ab at0004 = ╱aa╱ PUT ╱ // 0x479e @0x4
0x479a…47ab at0005 = ╱45╱E╱ // 0x479f @0x5
0x479a…47ab at0006 = ╱30╱0╱ // 0x47a0 @0x6
0x479a…47ab at0007 = ╱ef╱$╱ // 0x47a1 @0x7
0x479a…47ab at0008 = ╱f0╱:╱ // 0x47a2 @0x8
0x479a…47ab at0009 = ╱46╱F╱ // 0x47a3 @0x9
0x479a…47ab at000a = ╱38╱8╱ // 0x47a4 @0xa
0x479a…47ab at000b = ╱ec╱,╱ // 0x47a5 @0xb
0x479a…47ab at000c = ╱42╱B╱ // 0x47a6 @0xc
0x479a…47ab at000d = ╱36╱6╱ // 0x47a7 @0xd
0x479a…47ab at000e = ╱31╱1╱ // 0x47a8 @0xe
0x479a…47ab at000f = ╱ef╱$╱ // 0x47a9 @0xf
0x479a…47ab at0010 = EOL // 0x47aa @0x10
0x479a…47ab }
0x47ab…47b1 d508 8849 ENDIF
0x47ab…47b1 LineComalBin {
0x47ab…47b1 ptr = 0xd508 // 0x47ab @0x0
0x47ab…47b1 lno = 0x2291 // 0x47ad @0x2
0x47ab…47b1 at0004 = ╱9b╱ ENDIF ╱ // 0x47af @0x4
0x47ab…47b1 at0005 = EOL // 0x47b0 @0x5
0x47ab…47b1 }
0x47b1…47b7 d50e 8850 ENDIF
0x47b1…47b7 LineComalBin {
0x47b1…47b7 ptr = 0xd50e // 0x47b1 @0x0
0x47b1…47b7 lno = 0x2292 // 0x47b3 @0x2
0x47b1…47b7 at0004 = ╱9b╱ ENDIF ╱ // 0x47b5 @0x4
0x47b1…47b7 at0005 = EOL // 0x47b6 @0x5
0x47b1…47b7 }
0x47b7…47c2 d519 8860 UNTIL F8=>I9
0x47b7…47c2 LineComalBin {
0x47b7…47c2 ptr = 0xd519 // 0x47b7 @0x0
0x47b7…47c2 lno = 0x229c // 0x47b9 @0x2
0x47b7…47c2 at0004 = ╱98╱ UNTIL ╱ // 0x47bb @0x4
0x47b7…47c2 at0005 = ╱46╱F╱ // 0x47bc @0x5
0x47b7…47c2 at0006 = ╱38╱8╱ // 0x47bd @0x6
0x47b7…47c2 at0007 = ╱e0╱=>╱ // 0x47be @0x7
0x47b7…47c2 at0008 = ╱49╱I╱ // 0x47bf @0x8
0x47b7…47c2 at0009 = ╱39╱9╱ // 0x47c0 @0x9
0x47b7…47c2 at000a = EOL // 0x47c1 @0xa
0x47b7…47c2 }
0x47c2…47d4 d52b 8861 PUT D9$:I9+E,C7$
0x47c2…47d4 LineComalBin {
0x47c2…47d4 ptr = 0xd52b // 0x47c2 @0x0
0x47c2…47d4 lno = 0x229d // 0x47c4 @0x2
0x47c2…47d4 at0004 = ╱aa╱ PUT ╱ // 0x47c6 @0x4
0x47c2…47d4 at0005 = ╱44╱D╱ // 0x47c7 @0x5
0x47c2…47d4 at0006 = ╱39╱9╱ // 0x47c8 @0x6
0x47c2…47d4 at0007 = ╱ef╱$╱ // 0x47c9 @0x7
0x47c2…47d4 at0008 = ╱f0╱:╱ // 0x47ca @0x8
0x47c2…47d4 at0009 = ╱49╱I╱ // 0x47cb @0x9
0x47c2…47d4 at000a = ╱39╱9╱ // 0x47cc @0xa
0x47c2…47d4 at000b = ╱e2╱+╱ // 0x47cd @0xb
0x47c2…47d4 at000c = ╱45╱E╱ // 0x47ce @0xc
0x47c2…47d4 at000d = ╱ec╱,╱ // 0x47cf @0xd
0x47c2…47d4 at000e = ╱43╱C╱ // 0x47d0 @0xe
0x47c2…47d4 at000f = ╱37╱7╱ // 0x47d1 @0xf
0x47c2…47d4 at0010 = ╱ef╱$╱ // 0x47d2 @0x10
0x47c2…47d4 at0011 = EOL // 0x47d3 @0x11
0x47c2…47d4 }
0x47d4…4816 d56d 8862 PUT D9$:E2$(E),E2$(G),E2$(V),E2$(4),E2$(5),E2$(6)
0x47d4…4816 LineComalBin {
0x47d4…4816 ptr = 0xd56d // 0x47d4 @0x0
0x47d4…4816 lno = 0x229e // 0x47d6 @0x2
0x47d4…4816 at0004 = ╱aa╱ PUT ╱ // 0x47d8 @0x4
0x47d4…4816 at0005 = ╱44╱D╱ // 0x47d9 @0x5
0x47d4…4816 at0006 = ╱39╱9╱ // 0x47da @0x6
0x47d4…4816 at0007 = ╱ef╱$╱ // 0x47db @0x7
0x47d4…4816 at0008 = ╱f0╱:╱ // 0x47dc @0x8
0x47d4…4816 at0009 = ╱45╱E╱ // 0x47dd @0x9
0x47d4…4816 at000a = ╱32╱2╱ // 0x47de @0xa
0x47d4…4816 at000b = ╱ef╱$╱ // 0x47df @0xb
0x47d4…4816 at000c = ╱ed╱(╱ // 0x47e0 @0xc
0x47d4…4816 at000d = ╱45╱E╱ // 0x47e1 @0xd
0x47d4…4816 at000e = ╱ee╱)╱ // 0x47e2 @0xe
0x47d4…4816 at000f = ╱ec╱,╱ // 0x47e3 @0xf
0x47d4…4816 at0010 = ╱45╱E╱ // 0x47e4 @0x10
0x47d4…4816 at0011 = ╱32╱2╱ // 0x47e5 @0x11
0x47d4…4816 at0012 = ╱ef╱$╱ // 0x47e6 @0x12
0x47d4…4816 at0013 = ╱ed╱(╱ // 0x47e7 @0x13
0x47d4…4816 at0014 = ╱47╱G╱ // 0x47e8 @0x14
0x47d4…4816 at0015 = ╱ee╱)╱ // 0x47e9 @0x15
0x47d4…4816 at0016 = ╱ec╱,╱ // 0x47ea @0x16
0x47d4…4816 at0017 = ╱45╱E╱ // 0x47eb @0x17
0x47d4…4816 at0018 = ╱32╱2╱ // 0x47ec @0x18
0x47d4…4816 at0019 = ╱ef╱$╱ // 0x47ed @0x19
0x47d4…4816 at001a = ╱ed╱(╱ // 0x47ee @0x1a
0x47d4…4816 at001b = ╱56╱V╱ // 0x47ef @0x1b
0x47d4…4816 at001c = ╱ee╱)╱ // 0x47f0 @0x1c
0x47d4…4816 at001d = ╱ec╱,╱ // 0x47f1 @0x1d
0x47d4…4816 at001e = ╱45╱E╱ // 0x47f2 @0x1e
0x47d4…4816 at001f = ╱32╱2╱ // 0x47f3 @0x1f
0x47d4…4816 at0020 = ╱ef╱$╱ // 0x47f4 @0x20
0x47d4…4816 at0021 = ╱ed╱(╱ // 0x47f5 @0x21
0x47d4…4816 at0022 = ╱34╱4╱ // 0x47f6 @0x22
0x47d4…4816 at0023 = ╱fe00008003╱ // 0x47f7 @0x23
0x47d4…4816 at0028 = ╱ee╱)╱ // 0x47fc @0x28
0x47d4…4816 at0029 = ╱ec╱,╱ // 0x47fd @0x29
0x47d4…4816 at002a = ╱45╱E╱ // 0x47fe @0x2a
0x47d4…4816 at002b = ╱32╱2╱ // 0x47ff @0x2b
0x47d4…4816 at002c = ╱ef╱$╱ // 0x4800 @0x2c
0x47d4…4816 at002d = ╱ed╱(╱ // 0x4801 @0x2d
0x47d4…4816 at002e = ╱35╱5╱ // 0x4802 @0x2e
0x47d4…4816 at002f = ╱fe0000a003╱ // 0x4803 @0x2f
0x47d4…4816 at0034 = ╱ee╱)╱ // 0x4808 @0x34
0x47d4…4816 at0035 = ╱ec╱,╱ // 0x4809 @0x35
0x47d4…4816 at0036 = ╱45╱E╱ // 0x480a @0x36
0x47d4…4816 at0037 = ╱32╱2╱ // 0x480b @0x37
0x47d4…4816 at0038 = ╱ef╱$╱ // 0x480c @0x38
0x47d4…4816 at0039 = ╱ed╱(╱ // 0x480d @0x39
0x47d4…4816 at003a = ╱36╱6╱ // 0x480e @0x3a
0x47d4…4816 at003b = ╱fe0000c003╱ // 0x480f @0x3b
0x47d4…4816 at0040 = ╱ee╱)╱ // 0x4814 @0x40
0x47d4…4816 at0041 = EOL // 0x4815 @0x41
0x47d4…4816 }
0x4816…485b d5b2 8864 PUT D9$:E2$(7),E2$(8),E2$(W),E2$(TI),E2$(EL),E2$(12)
0x4816…485b LineComalBin {
0x4816…485b ptr = 0xd5b2 // 0x4816 @0x0
0x4816…485b lno = 0x22a0 // 0x4818 @0x2
0x4816…485b at0004 = ╱aa╱ PUT ╱ // 0x481a @0x4
0x4816…485b at0005 = ╱44╱D╱ // 0x481b @0x5
0x4816…485b at0006 = ╱39╱9╱ // 0x481c @0x6
0x4816…485b at0007 = ╱ef╱$╱ // 0x481d @0x7
0x4816…485b at0008 = ╱f0╱:╱ // 0x481e @0x8
0x4816…485b at0009 = ╱45╱E╱ // 0x481f @0x9
0x4816…485b at000a = ╱32╱2╱ // 0x4820 @0xa
0x4816…485b at000b = ╱ef╱$╱ // 0x4821 @0xb
0x4816…485b at000c = ╱ed╱(╱ // 0x4822 @0xc
0x4816…485b at000d = ╱37╱7╱ // 0x4823 @0xd
0x4816…485b at000e = ╱fe0000e003╱ // 0x4824 @0xe
0x4816…485b at0013 = ╱ee╱)╱ // 0x4829 @0x13
0x4816…485b at0014 = ╱ec╱,╱ // 0x482a @0x14
0x4816…485b at0015 = ╱45╱E╱ // 0x482b @0x15
0x4816…485b at0016 = ╱32╱2╱ // 0x482c @0x16
0x4816…485b at0017 = ╱ef╱$╱ // 0x482d @0x17
0x4816…485b at0018 = ╱ed╱(╱ // 0x482e @0x18
0x4816…485b at0019 = ╱38╱8╱ // 0x482f @0x19
0x4816…485b at001a = ╱fe00008004╱ // 0x4830 @0x1a
0x4816…485b at001f = ╱ee╱)╱ // 0x4835 @0x1f
0x4816…485b at0020 = ╱ec╱,╱ // 0x4836 @0x20
0x4816…485b at0021 = ╱45╱E╱ // 0x4837 @0x21
0x4816…485b at0022 = ╱32╱2╱ // 0x4838 @0x22
0x4816…485b at0023 = ╱ef╱$╱ // 0x4839 @0x23
0x4816…485b at0024 = ╱ed╱(╱ // 0x483a @0x24
0x4816…485b at0025 = ╱57╱W╱ // 0x483b @0x25
0x4816…485b at0026 = ╱ee╱)╱ // 0x483c @0x26
0x4816…485b at0027 = ╱ec╱,╱ // 0x483d @0x27
0x4816…485b at0028 = ╱45╱E╱ // 0x483e @0x28
0x4816…485b at0029 = ╱32╱2╱ // 0x483f @0x29
0x4816…485b at002a = ╱ef╱$╱ // 0x4840 @0x2a
0x4816…485b at002b = ╱ed╱(╱ // 0x4841 @0x2b
0x4816…485b at002c = ╱54╱T╱ // 0x4842 @0x2c
0x4816…485b at002d = ╱49╱I╱ // 0x4843 @0x2d
0x4816…485b at002e = ╱ee╱)╱ // 0x4844 @0x2e
0x4816…485b at002f = ╱ec╱,╱ // 0x4845 @0x2f
0x4816…485b at0030 = ╱45╱E╱ // 0x4846 @0x30
0x4816…485b at0031 = ╱32╱2╱ // 0x4847 @0x31
0x4816…485b at0032 = ╱ef╱$╱ // 0x4848 @0x32
0x4816…485b at0033 = ╱ed╱(╱ // 0x4849 @0x33
0x4816…485b at0034 = ╱45╱E╱ // 0x484a @0x34
0x4816…485b at0035 = ╱4c╱L╱ // 0x484b @0x35
0x4816…485b at0036 = ╱ee╱)╱ // 0x484c @0x36
0x4816…485b at0037 = ╱ec╱,╱ // 0x484d @0x37
0x4816…485b at0038 = ╱45╱E╱ // 0x484e @0x38
0x4816…485b at0039 = ╱32╱2╱ // 0x484f @0x39
0x4816…485b at003a = ╱ef╱$╱ // 0x4850 @0x3a
0x4816…485b at003b = ╱ed╱(╱ // 0x4851 @0x3b
0x4816…485b at003c = ╱31╱1╱ // 0x4852 @0x3c
0x4816…485b at003d = ╱32╱2╱ // 0x4853 @0x3d
0x4816…485b at003e = ╱fe0000c004╱ // 0x4854 @0x3e
0x4816…485b at0043 = ╱ee╱)╱ // 0x4859 @0x43
0x4816…485b at0044 = EOL // 0x485a @0x44
0x4816…485b }
0x485b…4898 d5ef 8866 PUT D9$:E2$(13),E2$(14),E2$(15),E2$(16)
0x485b…4898 LineComalBin {
0x485b…4898 ptr = 0xd5ef // 0x485b @0x0
0x485b…4898 lno = 0x22a2 // 0x485d @0x2
0x485b…4898 at0004 = ╱aa╱ PUT ╱ // 0x485f @0x4
0x485b…4898 at0005 = ╱44╱D╱ // 0x4860 @0x5
0x485b…4898 at0006 = ╱39╱9╱ // 0x4861 @0x6
0x485b…4898 at0007 = ╱ef╱$╱ // 0x4862 @0x7
0x485b…4898 at0008 = ╱f0╱:╱ // 0x4863 @0x8
0x485b…4898 at0009 = ╱45╱E╱ // 0x4864 @0x9
0x485b…4898 at000a = ╱32╱2╱ // 0x4865 @0xa
0x485b…4898 at000b = ╱ef╱$╱ // 0x4866 @0xb
0x485b…4898 at000c = ╱ed╱(╱ // 0x4867 @0xc
0x485b…4898 at000d = ╱31╱1╱ // 0x4868 @0xd
0x485b…4898 at000e = ╱33╱3╱ // 0x4869 @0xe
0x485b…4898 at000f = ╱fe0000d004╱ // 0x486a @0xf
0x485b…4898 at0014 = ╱ee╱)╱ // 0x486f @0x14
0x485b…4898 at0015 = ╱ec╱,╱ // 0x4870 @0x15
0x485b…4898 at0016 = ╱45╱E╱ // 0x4871 @0x16
0x485b…4898 at0017 = ╱32╱2╱ // 0x4872 @0x17
0x485b…4898 at0018 = ╱ef╱$╱ // 0x4873 @0x18
0x485b…4898 at0019 = ╱ed╱(╱ // 0x4874 @0x19
0x485b…4898 at001a = ╱31╱1╱ // 0x4875 @0x1a
0x485b…4898 at001b = ╱34╱4╱ // 0x4876 @0x1b
0x485b…4898 at001c = ╱fe0000e004╱ // 0x4877 @0x1c
0x485b…4898 at0021 = ╱ee╱)╱ // 0x487c @0x21
0x485b…4898 at0022 = ╱ec╱,╱ // 0x487d @0x22
0x485b…4898 at0023 = ╱45╱E╱ // 0x487e @0x23
0x485b…4898 at0024 = ╱32╱2╱ // 0x487f @0x24
0x485b…4898 at0025 = ╱ef╱$╱ // 0x4880 @0x25
0x485b…4898 at0026 = ╱ed╱(╱ // 0x4881 @0x26
0x485b…4898 at0027 = ╱31╱1╱ // 0x4882 @0x27
0x485b…4898 at0028 = ╱35╱5╱ // 0x4883 @0x28
0x485b…4898 at0029 = ╱fe0000f004╱ // 0x4884 @0x29
0x485b…4898 at002e = ╱ee╱)╱ // 0x4889 @0x2e
0x485b…4898 at002f = ╱ec╱,╱ // 0x488a @0x2f
0x485b…4898 at0030 = ╱45╱E╱ // 0x488b @0x30
0x485b…4898 at0031 = ╱32╱2╱ // 0x488c @0x31
0x485b…4898 at0032 = ╱ef╱$╱ // 0x488d @0x32
0x485b…4898 at0033 = ╱ed╱(╱ // 0x488e @0x33
0x485b…4898 at0034 = ╱31╱1╱ // 0x488f @0x34
0x485b…4898 at0035 = ╱36╱6╱ // 0x4890 @0x35
0x485b…4898 at0036 = ╱fe00008005╱ // 0x4891 @0x36
0x485b…4898 at003b = ╱ee╱)╱ // 0x4896 @0x3b
0x485b…4898 at003c = EOL // 0x4897 @0x3c
0x485b…4898 }
0x4898…48a1 d5f8 8867 ENDFILE E0$
0x4898…48a1 LineComalBin {
0x4898…48a1 ptr = 0xd5f8 // 0x4898 @0x0
0x4898…48a1 lno = 0x22a3 // 0x489a @0x2
0x4898…48a1 at0004 = ╱ab╱ ENDFILE ╱ // 0x489c @0x4
0x4898…48a1 at0005 = ╱45╱E╱ // 0x489d @0x5
0x4898…48a1 at0006 = ╱30╱0╱ // 0x489e @0x6
0x4898…48a1 at0007 = ╱ef╱$╱ // 0x489f @0x7
0x4898…48a1 at0008 = EOL // 0x48a0 @0x8
0x4898…48a1 }
0x48a1…48aa d601 8868 ENDFILE E1$
0x48a1…48aa LineComalBin {
0x48a1…48aa ptr = 0xd601 // 0x48a1 @0x0
0x48a1…48aa lno = 0x22a4 // 0x48a3 @0x2
0x48a1…48aa at0004 = ╱ab╱ ENDFILE ╱ // 0x48a5 @0x4
0x48a1…48aa at0005 = ╱45╱E╱ // 0x48a6 @0x5
0x48a1…48aa at0006 = ╱31╱1╱ // 0x48a7 @0x6
0x48a1…48aa at0007 = ╱ef╱$╱ // 0x48a8 @0x7
0x48a1…48aa at0008 = EOL // 0x48a9 @0x8
0x48a1…48aa }
0x48aa…48b0 d607 8870 CLOSE
0x48aa…48b0 LineComalBin {
0x48aa…48b0 ptr = 0xd607 // 0x48aa @0x0
0x48aa…48b0 lno = 0x22a6 // 0x48ac @0x2
0x48aa…48b0 at0004 = ╱a8╱ CLOSE ╱ // 0x48ae @0x4
0x48aa…48b0 at0005 = EOL // 0x48af @0x5
0x48aa…48b0 }
0x48b0…48b7 d60e 8875 OUTPUT T
0x48b0…48b7 LineComalBin {
0x48b0…48b7 ptr = 0xd60e // 0x48b0 @0x0
0x48b0…48b7 lno = 0x22ab // 0x48b2 @0x2
0x48b0…48b7 at0004 = ╱a5╱ OUTPUT ╱ // 0x48b4 @0x4
0x48b0…48b7 at0005 = ╱54╱T╱ // 0x48b5 @0x5
0x48b0…48b7 at0006 = EOL // 0x48b6 @0x6
0x48b0…48b7 }
0x48b7…48ce 0000 8880 CHAIN "P641210:JOURNAL"
0x48b7…48ce LineComalBin {
0x48b7…48ce ptr = 0x0000 // 0x48b7 @0x0
0x48b7…48ce lno = 0x22b0 // 0x48b9 @0x2
0x48b7…48ce at0004 = ╱ac╱ CHAIN ╱ // 0x48bb @0x4
0x48b7…48ce at0005 = ╱22╱"╱ // 0x48bc @0x5
0x48b7…48ce at0006 = ╱50╱P╱ // 0x48bd @0x6
0x48b7…48ce at0007 = ╱36╱6╱ // 0x48be @0x7
0x48b7…48ce at0008 = ╱34╱4╱ // 0x48bf @0x8
0x48b7…48ce at0009 = ╱31╱1╱ // 0x48c0 @0x9
0x48b7…48ce at000a = ╱32╱2╱ // 0x48c1 @0xa
0x48b7…48ce at000b = ╱31╱1╱ // 0x48c2 @0xb
0x48b7…48ce at000c = ╱30╱0╱ // 0x48c3 @0xc
0x48b7…48ce at000d = ╱3a╱:╱ // 0x48c4 @0xd
0x48b7…48ce at000e = ╱4a╱J╱ // 0x48c5 @0xe
0x48b7…48ce at000f = ╱4f╱O╱ // 0x48c6 @0xf
0x48b7…48ce at0010 = ╱55╱U╱ // 0x48c7 @0x10
0x48b7…48ce at0011 = ╱52╱R╱ // 0x48c8 @0x11
0x48b7…48ce at0012 = ╱4e╱N╱ // 0x48c9 @0x12
0x48b7…48ce at0013 = ╱41╱A╱ // 0x48ca @0x13
0x48b7…48ce at0014 = ╱4c╱L╱ // 0x48cb @0x14
0x48b7…48ce at0015 = ╱22╱"╱ // 0x48cc @0x15
0x48b7…48ce at0016 = EOL // 0x48cd @0x16
0x48b7…48ce }
0x48ce…48e0 57 8d 5a 00 42 dc 30 fe 00 00 00 00 eb 45 dc 31 fe 00 ┆W Z B 0 E 1 ┆
0x48e0…48ff 00 80 01 eb 47 dc 32 fe 00 00 80 02 eb 56 dc 33 fe 00 00 c0 02 eb 57 dc 39 fe 00 00 90 04 ff ┆ G 2 V 3 W 9 ┆
0x48ff…4905 (243,) 57 8d 25 d6 10 00 ┆W % ┆