|
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: 8919 (0x22d7)
Types: SPC/1-COMAL-BIN
Notes: Mikados_B
Names: »ÅRSAFS.B«
└─⟦385f097a1⟧ Bits:30008988 SPC/1 COMAL programmer til bogføring
└─⟦this⟧ »ÅRSAFS.B«
└─⟦ff7f7aeee⟧ Bits:30009007 NBT 15/3-84
└─⟦this⟧ »ÅRSAFS.B«
0100 DIM RES$(15),OP1$(12),OP2$(12),N$(6),K1$(17),A$(E),TAL4$(12),BLANK$(25) 0110 DIM UBELØB1$(14),UBELØB2$(14),STREG$(71),FÅDK$(12),FMDK$(12),GLNAVN$(25) 0120 DIM DAT$(8),FÅKREDIT$(12),FÅDEBET$(12),FMKREDIT$(12),FMDEBET$(12) 0130 DIM FMKODE$(E),FNAVN$(25),FUKODE$(E),SALDO13$(12),SALDO3$(12),K10$(17) 0140 DIM SALDO2$(12),SALDO11$(12),SALDO1$(12),SALDO12$(12),SUM$(12),SUM1$(14) 0150 DIM K2$(17),K3$(17),K4$(17),K5$(17),T1(W),K$(26,11),K6$(17),K7$(17) 0155 DIM DV$(10),T2(W),SALDO14$(12),GLNAVN1$(25) 0160 PROC CALC(ART,B1,B2,ES) 0170 OP1$=B1$;OP2$=B2$;RES$=ES$;SI=B;FLAG=B 0180 CALL "P641210:REGN" 0190 ES$=RES$ 0200 IF FLAG<>B THEN STOP 0210 ENDPROC 0220 PROC DATOUD(DA1,DA2) 0230 DA3=DA1 0240 DA2$=" " 0250 FOR J=8 TO E STEP -E 0260 IF J MOD V=B THEN 0270 DA2$(J)="." 0280 ELSE 0290 DA2$(J)=CHR(DA3 MOD 10+48) 0300 DA3=DA3 DIV 10 0310 ENDIF 0320 NEXT J 0330 ENDPROC 0340 PROC INDTAB(T,MANTAL,L10) 0350 J=MANTAL DIV 32+E 0360 FOR I=J TO MANTAL DIV 4+J-E 0370 H=(I-J)*4+E;H1=H+E;H2=H+G;H3=H+V 0380 GET L10$,I:T(H,E),T(H,G),T(H1,E),T(H1,G),T(H2,E),T(H2,G),T(H3,E),T(H3,G) 0390 EXEC FEJL(E,E,L10$) 0400 NEXT I 0410 ENDPROC 0420 PROC UNDIND(V2,U1,Z) 0430 OPEN V2$,R 0440 EXEC FEJL(14,E,V2$) 0450 GET V2$,U1:Z(E,E),Z(E,G),Z(G,E),Z(G,G),Z(V,E),Z(V,G),Z(4,E),Z(4,G) 0460 EXEC FEJL(14,G,V2$) 0470 CLOSE V2$ 0480 EXEC FEJL(14,V,V2$) 0490 ENDPROC ;UNDIND 0500 PROC UNDUD(V3,U2,T) 0510 PUT V3$,U2:T(E,E),T(E,G),T(G,E),T(G,G),T(V,E),T(V,G),T(4,E),T(4,G) 0520 EXEC FEJL(16,E,V3$) 0530 ENDPROC ;UNDUD 0540 PROC HOVUD(V4,MPOSTANTAL4,S) 0550 FOR I=E TO MPOSTANTAL4 DIV 160 0560 J=(I-E)*4+E;J1=J+E;J2=J+G;J3=J+V 0570 PUT V4$,I:S(J,E),S(J,G),S(J1,E),S(J1,G),S(J2,E),S(J2,G),S(J3,E),S(J3,G) 0580 EXEC FEJL(17,G,V4$) 0590 NEXT I 0600 ENDPROC 0610 PROC HENTPOST 0620 S1=FTAB(FPIL3,G) 0630 GET K3$,S1:FNR,FNAVN$ 0640 EXEC FEJL(G,G,K3$) 0650 GET K3$,S1+E:FMKODE$,FMDEBET$,FMKREDIT$ 0660 EXEC FEJL(G,V,K3$) 0670 GET K3$,S1+G:FUKODE$,FÅDEBET$,FÅKREDIT$ 0680 EXEC FEJL(G,4,K3$) 0690 ENDPROC 0700 PROC FINDPOST1(TAB4,Q,MANT2,NØGL5,PIL6,L8) 0710 PIL1=MANT2 DIV 8;PIL6=PIL1;CEKS=E;MANT3=MANT2 DIV 4;MANT4=MANT2 DIV 32 0720 REPEAT 0730 IF NØGL5=TAB4(PIL6) OR PIL1=E THEN EXIT 0740 PIL1=(PIL1+E) DIV G;PIL6=PIL6+PIL1*(E-G*(NØGL5<TAB4(PIL6))) 0750 IF PIL6<E THEN PIL6=MANT3 0760 UNTIL PIL1=B 0770 IF TAB4(PIL6)>NØGL5 THEN PIL6=PIL6-E*(PIL6>E) 0780 PIL6=MANT4+PIL6 0790 GET L8$,PIL6:Q(E,E),Q(E,G),Q(G,E),Q(G,G),Q(V,E),Q(V,G),Q(4,E),Q(4,G) 0800 EXEC FEJL(E,E,L8$) 0810 FOR PIL6=E TO 4 0820 IF NØGL5=Q(PIL6,E) THEN EXIT 0830 NEXT PIL6 0840 IF PIL6<>5 THEN CEKS=B 0850 ENDPROC 0860 PROC NRTEST(NUM1) 0870 P=B;TEST2=B;KTAL=B;L=LEN(NUM1$) 0880 IF L>6 THEN EXIT 0890 CASE L OF 0900 FOR I=E TO L 0910 P1=INT(ORD(NUM1$(I))-48) 0920 IF P1<B OR P1>W THEN TEST2=E 0930 P=P*10+P1 0940 NEXT I 0950 KTAL=P DIV 10000 0960 WHEN B 0970 P=-E 0980 WHEN E 0990 CASE NUM1$ OF 1000 P=INT(ORD(NUM1$)-48) 1010 WHEN "D","d" 1020 P=-G 1030 WHEN "A","a" 1040 P=-V 1050 WHEN "M","m" 1060 P=-4 1070 WHEN "J","j" 1080 P=-7 1090 WHEN "N","n" 1100 P=-8 1110 ENDCASE 1120 ENDCASE 1130 ENDPROC 1140 PROC FEJL(NR1,NR2,NR3) 1150 IF STATUS(NR3$)<>B THEN 1160 PRINT STATUS(NR3$),NR1,NR2,NR3$ 1170 STOP 1180 ENDIF 1190 ENDPROC 1200 PROC TUD(BLB1,UBLB1,TEGN,STØR) 1210 EXEC CALC(5,BLB1$,TAL4$,UBLB1$) 1220 IF TEGN=B THEN 1230 UBLB1$=UBLB1$(E:13) 1240 ELSE 1250 IF TEGN=E AND UBLB1$(LEN(UBLB1$))="+" THEN 1260 UBLB1$(LEN(UBLB1$))=" " 1270 ENDIF 1280 ENDIF 1290 IF STØR=E THEN 1300 UBLB1$=UBLB1$(4:LEN(UBLB1$)-V) 1310 ENDIF 1320 ENDPROC 1330 PROC HOVEDUD(UDATO,USIDE) 1340 EXEC DATOUD(UDATO,DAT$) 1345 PRINT TAB(67);DV$;" " 1350 PRINT TAB(10);CHR(14);"Balance";CHR(15);TAB(44);"Dato : ";DAT$; 1360 PRINT USING " Side :###":USIDE 1370 PRINT " " 1380 PRINT TAB(46);"Årets" 1390 PRINT TAB(V);"Nr Kontonavn";TAB(42);"Debet Kredit" 1400 PRINT TAB(8);STREG$ 1410 ENDPROC 1420 PROC LINIEUD(NR4,NAVN1,SAL1) 1430 PRINT USING "###### ":NR4; 1440 EXEC TUD(SAL1$,UBELØB1$,B,B) 1450 PRINT NAVN1$;TAB(35+15*(SAL1$(LEN(SAL1$))="-"));UBELØB1$ 1460 ENDPROC 1470 PROC NYSIDE(GFNR9,GLNAVN9) 1480 FOR LINIE=LINIE TO 40 1490 PRINT CHR(10); 1500 NEXT LINIE 1510 PRINT " " 1520 BSIDE=BSIDE+E 1530 EXEC HOVEDUD(T1(7),BSIDE) 1540 PRINT " " 1545 IF GFNR9>B THEN 1550 PRINT USING "###### ":GFNR9; 1560 EXEC CALC(4,SALDO12$,TAL4$,TAL4$) 1570 IF SI<>B THEN 1580 PRINT GLNAVN9$;" Fortsat" 1590 ELSE 1600 PRINT GLNAVN9$ 1610 ENDIF 1620 PRINT TAB(8);STREG$(E:25+7*(SI<>B)) 1630 LINIE=5 1640 ELSE 1650 LINIE=V 1651 ENDIF 1652 PRINT " " 1653 ENDPROC 1660 K1$="P641220:SYSTEM1" 1670 OPEN K1$,R 1680 EXEC FEJL(W,E,K1$) 1690 GET K1$,E:MFANTAL,MDANTAL,MKANTAL 1700 EXEC FEJL(W,G,K1$) 1710 GET K1$,V:DPOST,KPOST,MFPOST,MDPOST 1720 EXEC FEJL(W,21,K1$) 1730 GET K1$,4:MKPOST,MFAK,MVGR,MKGR 1740 EXEC FEJL(W,V,K1$) 1750 GET K1$,5:MKRGR 1760 EXEC FEJL(W,4,K1$) 1770 GET K1$,8:DIVNR,DIVDNR,DIFNR,DTAL 1780 EXEC FEJL(W,5,K1$) 1790 GET K1$,W:KRTAL 1800 EXEC FEJL(W,6,K1$) 1810 GET K1$,10:N$ 1820 EXEC FEJL(W,7,K1$) 1830 FOR I=E TO 26 1840 GET K1$,I+10:K$(I) 1850 EXEC FEJL(W,8,K1$) 1860 NEXT I 1870 CLOSE K1$ 1880 EXEC FEJL(W,11,K1$) 1890 K3$=N$+K$(5);K4$=N$+K$(V);K5$=N$+K$(5);K6$=N$+K$(6);K7$=N$+K$(7) 1900 K10$=N$+K$(26);K2$=N$+K$(E) 1910 DIM FTAB(MFANTAL,G) 1920 OPEN K10$,W 1930 EXEC FEJL(W,12,K10$) 1940 GET K10$,G:T1(E),T1(G),T1(V),T1(4),T1(5),T1(6),T1(7),T1(8),T1(W) 1950 EXEC FEJL(W,13,K10$) 1960 GET K10$,14:AFIN 1970 EXEC FEJL(W,14,K10$) 1980 GET K10$,17:T2(E),T2(G),T2(V),T2(4),T2(5),T2(6),T2(7),T2(8),T2(W) 1990 EXEC FEJL(W,18,K10$) 2000 T2(G)=G 2010 PUT K10$,17:T2(E),T2(G),T2(V),T2(4),T2(5),T2(6),T2(7),T2(8),T2(W) 2020 EXEC FEJL(W,19,K10$) 2021 GET K10$,20:DV$ 2022 EXEC FEJL(W,22,K10$) 2030 CLOSE K10$ 2040 EXEC FEJL(W,15,K10$) 2050 OPEN K2$,R 2060 EXEC FEJL(W,16,K2$) 2070 OPEN K5$,R 2080 EXEC FEJL(W,17,K5$) 2090 EXEC INDTAB(FTAB,MFANTAL,K2$) 2100 BLANK$=" " 2110 STREG$="------------------------------------";STREG$=STREG$+STREG$ 2120 REPEAT 2130 OUTPUT T 2140 CLEAR 2150 REPEAT 2160 CURSOR 15,13 2170 INPUT "Monter papir til udskrift af balance og tast RETURN",A$ 2180 UNTIL ORD(A$)=255 2190 BSIDE=E;GLNAVN$=BLANK$;LINIE=E;SALDO14$="0+";GFNR1=B;GLNAVN1$=BLANK$ 2200 SALDO11$="0+";SALDO12$="0+";SALDO13$="0+";TAL4$="0+";GFNR=B 2210 OUTPUT P 2220 EXEC HOVEDUD(T1(7),BSIDE) 2230 FOR FPIL3=E TO AFIN 2240 IF FTAB(FPIL3,E)=100000 THEN EXIT 2250 EXEC HENTPOST 2260 FGRUP=INT(ORD(FUKODE$)-48) 2270 EXEC CALC(B,FÅDEBET$,FÅKREDIT$,FÅDK$) 2280 CASE FGRUP OF 2290 STOP 2300 WHEN B 2310 IF LINIE>39 THEN EXEC NYSIDE(GFNR,GLNAVN$) 2320 EXEC LINIEUD(FNR,FNAVN$,FÅDK$) 2330 LINIE=LINIE+E 2340 EXEC CALC(B,SALDO11$,FÅDK$,SALDO11$) 2350 EXEC CALC(B,SALDO12$,FÅDK$,SALDO12$) 2360 EXEC CALC(B,SALDO13$,FÅDK$,SALDO13$) 2370 EXEC CALC(B,SALDO14$,FÅDK$,SALDO14$) 2380 WHEN E 2390 IF LINIE>39 THEN EXEC NYSIDE(GFNR,GLNAVN$) 2400 FNR2=FNR DIV 1000 2410 FNR1=FNR DIV 10000;DTAL1=DTAL*10000+MKGR;KRTAL1=KRTAL*10000+MKRGR 2420 IF FNR1=DTAL AND DTAL1=>FNR OR FNR2=KRTAL AND KRTAL1=>FNR THEN 2430 EXEC CALC(B,SALDO12$,FÅDK$,SALDO12$) 2440 EXEC CALC(B,SALDO13$,FÅDK$,SALDO13$) 2450 EXEC CALC(B,SALDO14$,FÅDK$,SALDO14$) 2460 EXEC LINIEUD(FNR,FNAVN$,FÅDK$) 2470 ELSE 2480 EXEC LINIEUD(FNR,FNAVN$,SALDO11$) 2490 SALDO11$="0+" 2500 ENDIF 2510 PRINT " " 2520 LINIE=LINIE+G 2530 WHEN G 2540 IF GFNR>B THEN 2550 IF LINIE>37 THEN EXEC NYSIDE(GFNR,GLNAVN$) 2560 PRINT " " 2570 PRINT TAB(8);STREG$(E:71) 2580 EXEC LINIEUD(GFNR,GLNAVN$(1:23),SALDO12$) 2590 LINIE=LINIE+V 2600 ENDIF 2610 GLNAVN$=FNAVN$;GFNR=FNR;SALDO12$="0+";SALDO11$="0+" 2620 IF LINIE>34 THEN 2630 EXEC NYSIDE(GFNR,GLNAVN$) 2640 ELSE 2650 PRINT CHR(10) 2660 PRINT CHR(10) 2670 PRINT USING "###### ":FNR; 2680 PRINT GLNAVN$ 2690 PRINT TAB(8);STREG$(E:LEN(GLNAVN$)) 2700 PRINT " " 2710 LINIE=LINIE+5 2720 ENDIF 2730 WHEN V 2740 IF LINIE>37 AND GFNR>B THEN EXEC NYSIDE(GFNR,GLNAVN$) 2750 IF GFNR>B THEN 2760 PRINT " " 2770 PRINT TAB(8);STREG$(E:71) 2780 EXEC LINIEUD(GFNR,GLNAVN$,SALDO12$) 2790 SALDO12$="0+";LINIE=LINIE+V;GFNR=B 2800 ENDIF 2810 IF LINIE>36 THEN EXEC NYSIDE(GFNR,GLNAVN$) 2820 PRINT " " 2830 PRINT TAB(8);STREG$(E:71) 2840 EXEC LINIEUD(FNR,FNAVN$,SALDO13$) 2850 SALDO11$="0+" 2860 PRINT TAB(8);STREG$(E:71) 2870 PRINT " " 2880 LINIE=LINIE+5 2890 WHEN 4 2900 IF GFNR>B THEN 2910 IF LINIE>37 THEN EXEC NYSIDE(GFNR,GLNAVN$) 2920 PRINT " " 2930 PRINT TAB(8);STREG$(E:71) 2940 EXEC LINIEUD(GFNR,GLNAVN$,SALDO12$) 2950 LINIE=LINIE+V;GFNR=B;GLNAVN$=BLANK$ 2960 ENDIF 2970 IF GFNR1>B THEN 2980 IF LINIE>37 THEN EXEC NYSIDE(GFNR1,GLNAVN1$) 2990 PRINT " " 3000 PRINT TAB(8);STREG$(E:71) 3010 EXEC LINIEUD(GFNR1,GLNAVN1$,SALDO14$) 3020 LINIE=LINIE+V;GFNR1=B;GLNAVN1$=BLANK$ 3030 ENDIF 3040 SALDO11$="0+";SALDO12$="0+";SALDO14$="0+" 3050 GLNAVN1$=FNAVN$;GFNR1=FNR 3060 IF LINIE>34 THEN 3070 EXEC NYSIDE(GFNR1,GLNAVN1$) 3080 ELSE 3090 PRINT CHR(10) 3100 PRINT CHR(10) 3110 PRINT " " 3120 PRINT USING "###### ":FNR; 3130 PRINT GLNAVN1$ 3140 PRINT TAB(8);STREG$(E:LEN(GLNAVN$)) 3150 PRINT " " 3160 LINIE=LINIE+5 3170 ENDIF 3180 ENDCASE 3190 NEXT FPIL3 3200 IF GFNR>B THEN 3210 IF LINIE>37 THEN EXEC NYSIDE(GFNR,GLNAVN$) 3220 PRINT " " 3230 PRINT TAB(8);STREG$(E:71) 3240 EXEC LINIEUD(GFNR,GLNAVN$,SALDO12$) 3250 SALDO12$="0+";LINIE=LINIE+V;GFNR=B 3260 SALDO11$="0+" 3270 ENDIF 3271 IF GFNR1>B THEN 3272 IF LINIE>37 THEN EXEC NYSIDE(GFNR1,GLNAVN1$) 3273 PRINT " " 3274 PRINT TAB(8);STREG$(E:71) 3275 EXEC LINIEUD(GFNR1,GLNAVN1$,SALDO14$) 3276 LINIE=LINIE+V 3277 ENDIF 3280 IF LINIE>36 THEN EXEC NYSIDE(GFNR1,GLNAVN1$) 3290 GLNAVN$="Difference";GFNR=100000 3300 PRINT " " 3310 PRINT TAB(8);STREG$(E:71) 3320 EXEC LINIEUD(GFNR,GLNAVN$,SALDO13$) 3330 PRINT TAB(8);STREG$(E:71) 3340 FOR LINIE=LINIE TO 37 3350 PRINT CHR(10); 3360 NEXT LINIE 3370 PRINT " " 3380 OUTPUT T 3390 CLEAR 3400 REPEAT 3410 CURSOR 15,13 3420 INPUT "Ønskes balance gentaget (J/N)",A$ 3430 EXEC NRTEST(A$) 3440 UNTIL P=-7 OR P=-8 3450 UNTIL P=-8 3460 CLOSE 3470 CHAIN "P641210:ÅKOPI"
0x0000…006c (0,) 8dc3 0100 DIM RES$(15),OP1$(12),OP2$(12),N$(6),K1$(17),A$(E),TAL4$(12),BLANK$(25)
0x0000…006c LineComalBin {
0x0000…006c ptr = 0x8dc3 // 0x0 @0x0
0x0000…006c lno = 0x0064 // 0x2 @0x2
0x0000…006c at0004 = ╱87╱ DIM ╱ // 0x4 @0x4
0x0000…006c at0005 = ╱52╱R╱ // 0x5 @0x5
0x0000…006c at0006 = ╱45╱E╱ // 0x6 @0x6
0x0000…006c at0007 = ╱53╱S╱ // 0x7 @0x7
0x0000…006c at0008 = ╱ef╱$╱ // 0x8 @0x8
0x0000…006c at0009 = ╱ed╱(╱ // 0x9 @0x9
0x0000…006c at000a = ╱31╱1╱ // 0xa @0xa
0x0000…006c at000b = ╱35╱5╱ // 0xb @0xb
0x0000…006c at000c = ╱fe0000f004╱ // 0xc @0xc
0x0000…006c at0011 = ╱ee╱)╱ // 0x11 @0x11
0x0000…006c at0012 = ╱ec╱,╱ // 0x12 @0x12
0x0000…006c at0013 = ╱4f╱O╱ // 0x13 @0x13
0x0000…006c at0014 = ╱50╱P╱ // 0x14 @0x14
0x0000…006c at0015 = ╱31╱1╱ // 0x15 @0x15
0x0000…006c at0016 = ╱ef╱$╱ // 0x16 @0x16
0x0000…006c at0017 = ╱ed╱(╱ // 0x17 @0x17
0x0000…006c at0018 = ╱31╱1╱ // 0x18 @0x18
0x0000…006c at0019 = ╱32╱2╱ // 0x19 @0x19
0x0000…006c at001a = ╱fe0000c004╱ // 0x1a @0x1a
0x0000…006c at001f = ╱ee╱)╱ // 0x1f @0x1f
0x0000…006c at0020 = ╱ec╱,╱ // 0x20 @0x20
0x0000…006c at0021 = ╱4f╱O╱ // 0x21 @0x21
0x0000…006c at0022 = ╱50╱P╱ // 0x22 @0x22
0x0000…006c at0023 = ╱32╱2╱ // 0x23 @0x23
0x0000…006c at0024 = ╱ef╱$╱ // 0x24 @0x24
0x0000…006c at0025 = ╱ed╱(╱ // 0x25 @0x25
0x0000…006c at0026 = ╱31╱1╱ // 0x26 @0x26
0x0000…006c at0027 = ╱32╱2╱ // 0x27 @0x27
0x0000…006c at0028 = ╱fe0000c004╱ // 0x28 @0x28
0x0000…006c at002d = ╱ee╱)╱ // 0x2d @0x2d
0x0000…006c at002e = ╱ec╱,╱ // 0x2e @0x2e
0x0000…006c at002f = ╱4e╱N╱ // 0x2f @0x2f
0x0000…006c at0030 = ╱ef╱$╱ // 0x30 @0x30
0x0000…006c at0031 = ╱ed╱(╱ // 0x31 @0x31
0x0000…006c at0032 = ╱36╱6╱ // 0x32 @0x32
0x0000…006c at0033 = ╱fe0000c003╱ // 0x33 @0x33
0x0000…006c at0038 = ╱ee╱)╱ // 0x38 @0x38
0x0000…006c at0039 = ╱ec╱,╱ // 0x39 @0x39
0x0000…006c at003a = ╱4b╱K╱ // 0x3a @0x3a
0x0000…006c at003b = ╱31╱1╱ // 0x3b @0x3b
0x0000…006c at003c = ╱ef╱$╱ // 0x3c @0x3c
0x0000…006c at003d = ╱ed╱(╱ // 0x3d @0x3d
0x0000…006c at003e = ╱31╱1╱ // 0x3e @0x3e
0x0000…006c at003f = ╱37╱7╱ // 0x3f @0x3f
0x0000…006c at0040 = ╱fe00008805╱ // 0x40 @0x40
0x0000…006c at0045 = ╱ee╱)╱ // 0x45 @0x45
0x0000…006c at0046 = ╱ec╱,╱ // 0x46 @0x46
0x0000…006c at0047 = ╱41╱A╱ // 0x47 @0x47
0x0000…006c at0048 = ╱ef╱$╱ // 0x48 @0x48
0x0000…006c at0049 = ╱ed╱(╱ // 0x49 @0x49
0x0000…006c at004a = ╱45╱E╱ // 0x4a @0x4a
0x0000…006c at004b = ╱ee╱)╱ // 0x4b @0x4b
0x0000…006c at004c = ╱ec╱,╱ // 0x4c @0x4c
0x0000…006c at004d = ╱54╱T╱ // 0x4d @0x4d
0x0000…006c at004e = ╱41╱A╱ // 0x4e @0x4e
0x0000…006c at004f = ╱4c╱L╱ // 0x4f @0x4f
0x0000…006c at0050 = ╱34╱4╱ // 0x50 @0x50
0x0000…006c at0051 = ╱ef╱$╱ // 0x51 @0x51
0x0000…006c at0052 = ╱ed╱(╱ // 0x52 @0x52
0x0000…006c at0053 = ╱31╱1╱ // 0x53 @0x53
0x0000…006c at0054 = ╱32╱2╱ // 0x54 @0x54
0x0000…006c at0055 = ╱fe0000c004╱ // 0x55 @0x55
0x0000…006c at005a = ╱ee╱)╱ // 0x5a @0x5a
0x0000…006c at005b = ╱ec╱,╱ // 0x5b @0x5b
0x0000…006c at005c = ╱42╱B╱ // 0x5c @0x5c
0x0000…006c at005d = ╱4c╱L╱ // 0x5d @0x5d
0x0000…006c at005e = ╱41╱A╱ // 0x5e @0x5e
0x0000…006c at005f = ╱4e╱N╱ // 0x5f @0x5f
0x0000…006c at0060 = ╱4b╱K╱ // 0x60 @0x60
0x0000…006c at0061 = ╱ef╱$╱ // 0x61 @0x61
0x0000…006c at0062 = ╱ed╱(╱ // 0x62 @0x62
0x0000…006c at0063 = ╱32╱2╱ // 0x63 @0x63
0x0000…006c at0064 = ╱35╱5╱ // 0x64 @0x64
0x0000…006c at0065 = ╱fe0000c805╱ // 0x65 @0x65
0x0000…006c at006a = ╱ee╱)╱ // 0x6a @0x6a
0x0000…006c at006b = EOL // 0x6b @0x6b
0x0000…006c }
0x006c…00d4 8e2b 0110 DIM UBELØB1$(14),UBELØB2$(14),STREG$(71),FÅDK$(12),FMDK$(12),GLNAVN$(25)
0x006c…00d4 LineComalBin {
0x006c…00d4 ptr = 0x8e2b // 0x6c @0x0
0x006c…00d4 lno = 0x006e // 0x6e @0x2
0x006c…00d4 at0004 = ╱87╱ DIM ╱ // 0x70 @0x4
0x006c…00d4 at0005 = ╱55╱U╱ // 0x71 @0x5
0x006c…00d4 at0006 = ╱42╱B╱ // 0x72 @0x6
0x006c…00d4 at0007 = ╱45╱E╱ // 0x73 @0x7
0x006c…00d4 at0008 = ╱4c╱L╱ // 0x74 @0x8
0x006c…00d4 at0009 = ╱5c╱Ø╱ // 0x75 @0x9
0x006c…00d4 at000a = ╱42╱B╱ // 0x76 @0xa
0x006c…00d4 at000b = ╱31╱1╱ // 0x77 @0xb
0x006c…00d4 at000c = ╱ef╱$╱ // 0x78 @0xc
0x006c…00d4 at000d = ╱ed╱(╱ // 0x79 @0xd
0x006c…00d4 at000e = ╱31╱1╱ // 0x7a @0xe
0x006c…00d4 at000f = ╱34╱4╱ // 0x7b @0xf
0x006c…00d4 at0010 = ╱fe0000e004╱ // 0x7c @0x10
0x006c…00d4 at0015 = ╱ee╱)╱ // 0x81 @0x15
0x006c…00d4 at0016 = ╱ec╱,╱ // 0x82 @0x16
0x006c…00d4 at0017 = ╱55╱U╱ // 0x83 @0x17
0x006c…00d4 at0018 = ╱42╱B╱ // 0x84 @0x18
0x006c…00d4 at0019 = ╱45╱E╱ // 0x85 @0x19
0x006c…00d4 at001a = ╱4c╱L╱ // 0x86 @0x1a
0x006c…00d4 at001b = ╱5c╱Ø╱ // 0x87 @0x1b
0x006c…00d4 at001c = ╱42╱B╱ // 0x88 @0x1c
0x006c…00d4 at001d = ╱32╱2╱ // 0x89 @0x1d
0x006c…00d4 at001e = ╱ef╱$╱ // 0x8a @0x1e
0x006c…00d4 at001f = ╱ed╱(╱ // 0x8b @0x1f
0x006c…00d4 at0020 = ╱31╱1╱ // 0x8c @0x20
0x006c…00d4 at0021 = ╱34╱4╱ // 0x8d @0x21
0x006c…00d4 at0022 = ╱fe0000e004╱ // 0x8e @0x22
0x006c…00d4 at0027 = ╱ee╱)╱ // 0x93 @0x27
0x006c…00d4 at0028 = ╱ec╱,╱ // 0x94 @0x28
0x006c…00d4 at0029 = ╱53╱S╱ // 0x95 @0x29
0x006c…00d4 at002a = ╱54╱T╱ // 0x96 @0x2a
0x006c…00d4 at002b = ╱52╱R╱ // 0x97 @0x2b
0x006c…00d4 at002c = ╱45╱E╱ // 0x98 @0x2c
0x006c…00d4 at002d = ╱47╱G╱ // 0x99 @0x2d
0x006c…00d4 at002e = ╱ef╱$╱ // 0x9a @0x2e
0x006c…00d4 at002f = ╱ed╱(╱ // 0x9b @0x2f
0x006c…00d4 at0030 = ╱37╱7╱ // 0x9c @0x30
0x006c…00d4 at0031 = ╱31╱1╱ // 0x9d @0x31
0x006c…00d4 at0032 = ╱fe00008e07╱ // 0x9e @0x32
0x006c…00d4 at0037 = ╱ee╱)╱ // 0xa3 @0x37
0x006c…00d4 at0038 = ╱ec╱,╱ // 0xa4 @0x38
0x006c…00d4 at0039 = ╱46╱F╱ // 0xa5 @0x39
0x006c…00d4 at003a = ╱5d╱Å╱ // 0xa6 @0x3a
0x006c…00d4 at003b = ╱44╱D╱ // 0xa7 @0x3b
0x006c…00d4 at003c = ╱4b╱K╱ // 0xa8 @0x3c
0x006c…00d4 at003d = ╱ef╱$╱ // 0xa9 @0x3d
0x006c…00d4 at003e = ╱ed╱(╱ // 0xaa @0x3e
0x006c…00d4 at003f = ╱31╱1╱ // 0xab @0x3f
0x006c…00d4 at0040 = ╱32╱2╱ // 0xac @0x40
0x006c…00d4 at0041 = ╱fe0000c004╱ // 0xad @0x41
0x006c…00d4 at0046 = ╱ee╱)╱ // 0xb2 @0x46
0x006c…00d4 at0047 = ╱ec╱,╱ // 0xb3 @0x47
0x006c…00d4 at0048 = ╱46╱F╱ // 0xb4 @0x48
0x006c…00d4 at0049 = ╱4d╱M╱ // 0xb5 @0x49
0x006c…00d4 at004a = ╱44╱D╱ // 0xb6 @0x4a
0x006c…00d4 at004b = ╱4b╱K╱ // 0xb7 @0x4b
0x006c…00d4 at004c = ╱ef╱$╱ // 0xb8 @0x4c
0x006c…00d4 at004d = ╱ed╱(╱ // 0xb9 @0x4d
0x006c…00d4 at004e = ╱31╱1╱ // 0xba @0x4e
0x006c…00d4 at004f = ╱32╱2╱ // 0xbb @0x4f
0x006c…00d4 at0050 = ╱fe0000c004╱ // 0xbc @0x50
0x006c…00d4 at0055 = ╱ee╱)╱ // 0xc1 @0x55
0x006c…00d4 at0056 = ╱ec╱,╱ // 0xc2 @0x56
0x006c…00d4 at0057 = ╱47╱G╱ // 0xc3 @0x57
0x006c…00d4 at0058 = ╱4c╱L╱ // 0xc4 @0x58
0x006c…00d4 at0059 = ╱4e╱N╱ // 0xc5 @0x59
0x006c…00d4 at005a = ╱41╱A╱ // 0xc6 @0x5a
0x006c…00d4 at005b = ╱56╱V╱ // 0xc7 @0x5b
0x006c…00d4 at005c = ╱4e╱N╱ // 0xc8 @0x5c
0x006c…00d4 at005d = ╱ef╱$╱ // 0xc9 @0x5d
0x006c…00d4 at005e = ╱ed╱(╱ // 0xca @0x5e
0x006c…00d4 at005f = ╱32╱2╱ // 0xcb @0x5f
0x006c…00d4 at0060 = ╱35╱5╱ // 0xcc @0x60
0x006c…00d4 at0061 = ╱fe0000c805╱ // 0xcd @0x61
0x006c…00d4 at0066 = ╱ee╱)╱ // 0xd2 @0x66
0x006c…00d4 at0067 = EOL // 0xd3 @0x67
0x006c…00d4 }
0x00d4…0130 8e87 0120 DIM DAT$(8),FÅKREDIT$(12),FÅDEBET$(12),FMKREDIT$(12),FMDEBET$(12)
0x00d4…0130 LineComalBin {
0x00d4…0130 ptr = 0x8e87 // 0xd4 @0x0
0x00d4…0130 lno = 0x0078 // 0xd6 @0x2
0x00d4…0130 at0004 = ╱87╱ DIM ╱ // 0xd8 @0x4
0x00d4…0130 at0005 = ╱44╱D╱ // 0xd9 @0x5
0x00d4…0130 at0006 = ╱41╱A╱ // 0xda @0x6
0x00d4…0130 at0007 = ╱54╱T╱ // 0xdb @0x7
0x00d4…0130 at0008 = ╱ef╱$╱ // 0xdc @0x8
0x00d4…0130 at0009 = ╱ed╱(╱ // 0xdd @0x9
0x00d4…0130 at000a = ╱38╱8╱ // 0xde @0xa
0x00d4…0130 at000b = ╱fe00008004╱ // 0xdf @0xb
0x00d4…0130 at0010 = ╱ee╱)╱ // 0xe4 @0x10
0x00d4…0130 at0011 = ╱ec╱,╱ // 0xe5 @0x11
0x00d4…0130 at0012 = ╱46╱F╱ // 0xe6 @0x12
0x00d4…0130 at0013 = ╱5d╱Å╱ // 0xe7 @0x13
0x00d4…0130 at0014 = ╱4b╱K╱ // 0xe8 @0x14
0x00d4…0130 at0015 = ╱52╱R╱ // 0xe9 @0x15
0x00d4…0130 at0016 = ╱45╱E╱ // 0xea @0x16
0x00d4…0130 at0017 = ╱44╱D╱ // 0xeb @0x17
0x00d4…0130 at0018 = ╱49╱I╱ // 0xec @0x18
0x00d4…0130 at0019 = ╱54╱T╱ // 0xed @0x19
0x00d4…0130 at001a = ╱ef╱$╱ // 0xee @0x1a
0x00d4…0130 at001b = ╱ed╱(╱ // 0xef @0x1b
0x00d4…0130 at001c = ╱31╱1╱ // 0xf0 @0x1c
0x00d4…0130 at001d = ╱32╱2╱ // 0xf1 @0x1d
0x00d4…0130 at001e = ╱fe0000c004╱ // 0xf2 @0x1e
0x00d4…0130 at0023 = ╱ee╱)╱ // 0xf7 @0x23
0x00d4…0130 at0024 = ╱ec╱,╱ // 0xf8 @0x24
0x00d4…0130 at0025 = ╱46╱F╱ // 0xf9 @0x25
0x00d4…0130 at0026 = ╱5d╱Å╱ // 0xfa @0x26
0x00d4…0130 at0027 = ╱44╱D╱ // 0xfb @0x27
0x00d4…0130 at0028 = ╱45╱E╱ // 0xfc @0x28
0x00d4…0130 at0029 = ╱42╱B╱ // 0xfd @0x29
0x00d4…0130 at002a = ╱45╱E╱ // 0xfe @0x2a
0x00d4…0130 at002b = ╱54╱T╱ // 0xff @0x2b
0x00d4…0130 at002c = ╱ef╱$╱ // 0x100 @0x2c
0x00d4…0130 at002d = ╱ed╱(╱ // 0x101 @0x2d
0x00d4…0130 at002e = ╱31╱1╱ // 0x102 @0x2e
0x00d4…0130 at002f = ╱32╱2╱ // 0x103 @0x2f
0x00d4…0130 at0030 = ╱fe0000c004╱ // 0x104 @0x30
0x00d4…0130 at0035 = ╱ee╱)╱ // 0x109 @0x35
0x00d4…0130 at0036 = ╱ec╱,╱ // 0x10a @0x36
0x00d4…0130 at0037 = ╱46╱F╱ // 0x10b @0x37
0x00d4…0130 at0038 = ╱4d╱M╱ // 0x10c @0x38
0x00d4…0130 at0039 = ╱4b╱K╱ // 0x10d @0x39
0x00d4…0130 at003a = ╱52╱R╱ // 0x10e @0x3a
0x00d4…0130 at003b = ╱45╱E╱ // 0x10f @0x3b
0x00d4…0130 at003c = ╱44╱D╱ // 0x110 @0x3c
0x00d4…0130 at003d = ╱49╱I╱ // 0x111 @0x3d
0x00d4…0130 at003e = ╱54╱T╱ // 0x112 @0x3e
0x00d4…0130 at003f = ╱ef╱$╱ // 0x113 @0x3f
0x00d4…0130 at0040 = ╱ed╱(╱ // 0x114 @0x40
0x00d4…0130 at0041 = ╱31╱1╱ // 0x115 @0x41
0x00d4…0130 at0042 = ╱32╱2╱ // 0x116 @0x42
0x00d4…0130 at0043 = ╱fe0000c004╱ // 0x117 @0x43
0x00d4…0130 at0048 = ╱ee╱)╱ // 0x11c @0x48
0x00d4…0130 at0049 = ╱ec╱,╱ // 0x11d @0x49
0x00d4…0130 at004a = ╱46╱F╱ // 0x11e @0x4a
0x00d4…0130 at004b = ╱4d╱M╱ // 0x11f @0x4b
0x00d4…0130 at004c = ╱44╱D╱ // 0x120 @0x4c
0x00d4…0130 at004d = ╱45╱E╱ // 0x121 @0x4d
0x00d4…0130 at004e = ╱42╱B╱ // 0x122 @0x4e
0x00d4…0130 at004f = ╱45╱E╱ // 0x123 @0x4f
0x00d4…0130 at0050 = ╱54╱T╱ // 0x124 @0x50
0x00d4…0130 at0051 = ╱ef╱$╱ // 0x125 @0x51
0x00d4…0130 at0052 = ╱ed╱(╱ // 0x126 @0x52
0x00d4…0130 at0053 = ╱31╱1╱ // 0x127 @0x53
0x00d4…0130 at0054 = ╱32╱2╱ // 0x128 @0x54
0x00d4…0130 at0055 = ╱fe0000c004╱ // 0x129 @0x55
0x00d4…0130 at005a = ╱ee╱)╱ // 0x12e @0x5a
0x00d4…0130 at005b = EOL // 0x12f @0x5b
0x00d4…0130 }
0x0130…018c 8ee3 0130 DIM FMKODE$(E),FNAVN$(25),FUKODE$(E),SALDO13$(12),SALDO3$(12),K10$(17)
0x0130…018c LineComalBin {
0x0130…018c ptr = 0x8ee3 // 0x130 @0x0
0x0130…018c lno = 0x0082 // 0x132 @0x2
0x0130…018c at0004 = ╱87╱ DIM ╱ // 0x134 @0x4
0x0130…018c at0005 = ╱46╱F╱ // 0x135 @0x5
0x0130…018c at0006 = ╱4d╱M╱ // 0x136 @0x6
0x0130…018c at0007 = ╱4b╱K╱ // 0x137 @0x7
0x0130…018c at0008 = ╱4f╱O╱ // 0x138 @0x8
0x0130…018c at0009 = ╱44╱D╱ // 0x139 @0x9
0x0130…018c at000a = ╱45╱E╱ // 0x13a @0xa
0x0130…018c at000b = ╱ef╱$╱ // 0x13b @0xb
0x0130…018c at000c = ╱ed╱(╱ // 0x13c @0xc
0x0130…018c at000d = ╱45╱E╱ // 0x13d @0xd
0x0130…018c at000e = ╱ee╱)╱ // 0x13e @0xe
0x0130…018c at000f = ╱ec╱,╱ // 0x13f @0xf
0x0130…018c at0010 = ╱46╱F╱ // 0x140 @0x10
0x0130…018c at0011 = ╱4e╱N╱ // 0x141 @0x11
0x0130…018c at0012 = ╱41╱A╱ // 0x142 @0x12
0x0130…018c at0013 = ╱56╱V╱ // 0x143 @0x13
0x0130…018c at0014 = ╱4e╱N╱ // 0x144 @0x14
0x0130…018c at0015 = ╱ef╱$╱ // 0x145 @0x15
0x0130…018c at0016 = ╱ed╱(╱ // 0x146 @0x16
0x0130…018c at0017 = ╱32╱2╱ // 0x147 @0x17
0x0130…018c at0018 = ╱35╱5╱ // 0x148 @0x18
0x0130…018c at0019 = ╱fe0000c805╱ // 0x149 @0x19
0x0130…018c at001e = ╱ee╱)╱ // 0x14e @0x1e
0x0130…018c at001f = ╱ec╱,╱ // 0x14f @0x1f
0x0130…018c at0020 = ╱46╱F╱ // 0x150 @0x20
0x0130…018c at0021 = ╱55╱U╱ // 0x151 @0x21
0x0130…018c at0022 = ╱4b╱K╱ // 0x152 @0x22
0x0130…018c at0023 = ╱4f╱O╱ // 0x153 @0x23
0x0130…018c at0024 = ╱44╱D╱ // 0x154 @0x24
0x0130…018c at0025 = ╱45╱E╱ // 0x155 @0x25
0x0130…018c at0026 = ╱ef╱$╱ // 0x156 @0x26
0x0130…018c at0027 = ╱ed╱(╱ // 0x157 @0x27
0x0130…018c at0028 = ╱45╱E╱ // 0x158 @0x28
0x0130…018c at0029 = ╱ee╱)╱ // 0x159 @0x29
0x0130…018c at002a = ╱ec╱,╱ // 0x15a @0x2a
0x0130…018c at002b = ╱53╱S╱ // 0x15b @0x2b
0x0130…018c at002c = ╱41╱A╱ // 0x15c @0x2c
0x0130…018c at002d = ╱4c╱L╱ // 0x15d @0x2d
0x0130…018c at002e = ╱44╱D╱ // 0x15e @0x2e
0x0130…018c at002f = ╱4f╱O╱ // 0x15f @0x2f
0x0130…018c at0030 = ╱31╱1╱ // 0x160 @0x30
0x0130…018c at0031 = ╱33╱3╱ // 0x161 @0x31
0x0130…018c at0032 = ╱ef╱$╱ // 0x162 @0x32
0x0130…018c at0033 = ╱ed╱(╱ // 0x163 @0x33
0x0130…018c at0034 = ╱31╱1╱ // 0x164 @0x34
0x0130…018c at0035 = ╱32╱2╱ // 0x165 @0x35
0x0130…018c at0036 = ╱fe0000c004╱ // 0x166 @0x36
0x0130…018c at003b = ╱ee╱)╱ // 0x16b @0x3b
0x0130…018c at003c = ╱ec╱,╱ // 0x16c @0x3c
0x0130…018c at003d = ╱53╱S╱ // 0x16d @0x3d
0x0130…018c at003e = ╱41╱A╱ // 0x16e @0x3e
0x0130…018c at003f = ╱4c╱L╱ // 0x16f @0x3f
0x0130…018c at0040 = ╱44╱D╱ // 0x170 @0x40
0x0130…018c at0041 = ╱4f╱O╱ // 0x171 @0x41
0x0130…018c at0042 = ╱33╱3╱ // 0x172 @0x42
0x0130…018c at0043 = ╱ef╱$╱ // 0x173 @0x43
0x0130…018c at0044 = ╱ed╱(╱ // 0x174 @0x44
0x0130…018c at0045 = ╱31╱1╱ // 0x175 @0x45
0x0130…018c at0046 = ╱32╱2╱ // 0x176 @0x46
0x0130…018c at0047 = ╱fe0000c004╱ // 0x177 @0x47
0x0130…018c at004c = ╱ee╱)╱ // 0x17c @0x4c
0x0130…018c at004d = ╱ec╱,╱ // 0x17d @0x4d
0x0130…018c at004e = ╱4b╱K╱ // 0x17e @0x4e
0x0130…018c at004f = ╱31╱1╱ // 0x17f @0x4f
0x0130…018c at0050 = ╱30╱0╱ // 0x180 @0x50
0x0130…018c at0051 = ╱ef╱$╱ // 0x181 @0x51
0x0130…018c at0052 = ╱ed╱(╱ // 0x182 @0x52
0x0130…018c at0053 = ╱31╱1╱ // 0x183 @0x53
0x0130…018c at0054 = ╱37╱7╱ // 0x184 @0x54
0x0130…018c at0055 = ╱fe00008805╱ // 0x185 @0x55
0x0130…018c at005a = ╱ee╱)╱ // 0x18a @0x5a
0x0130…018c at005b = EOL // 0x18b @0x5b
0x0130…018c }
0x018c…01f4 8f4b 0140 DIM SALDO2$(12),SALDO11$(12),SALDO1$(12),SALDO12$(12),SUM$(12),SUM1$(14)
0x018c…01f4 LineComalBin {
0x018c…01f4 ptr = 0x8f4b // 0x18c @0x0
0x018c…01f4 lno = 0x008c // 0x18e @0x2
0x018c…01f4 at0004 = ╱87╱ DIM ╱ // 0x190 @0x4
0x018c…01f4 at0005 = ╱53╱S╱ // 0x191 @0x5
0x018c…01f4 at0006 = ╱41╱A╱ // 0x192 @0x6
0x018c…01f4 at0007 = ╱4c╱L╱ // 0x193 @0x7
0x018c…01f4 at0008 = ╱44╱D╱ // 0x194 @0x8
0x018c…01f4 at0009 = ╱4f╱O╱ // 0x195 @0x9
0x018c…01f4 at000a = ╱32╱2╱ // 0x196 @0xa
0x018c…01f4 at000b = ╱ef╱$╱ // 0x197 @0xb
0x018c…01f4 at000c = ╱ed╱(╱ // 0x198 @0xc
0x018c…01f4 at000d = ╱31╱1╱ // 0x199 @0xd
0x018c…01f4 at000e = ╱32╱2╱ // 0x19a @0xe
0x018c…01f4 at000f = ╱fe0000c004╱ // 0x19b @0xf
0x018c…01f4 at0014 = ╱ee╱)╱ // 0x1a0 @0x14
0x018c…01f4 at0015 = ╱ec╱,╱ // 0x1a1 @0x15
0x018c…01f4 at0016 = ╱53╱S╱ // 0x1a2 @0x16
0x018c…01f4 at0017 = ╱41╱A╱ // 0x1a3 @0x17
0x018c…01f4 at0018 = ╱4c╱L╱ // 0x1a4 @0x18
0x018c…01f4 at0019 = ╱44╱D╱ // 0x1a5 @0x19
0x018c…01f4 at001a = ╱4f╱O╱ // 0x1a6 @0x1a
0x018c…01f4 at001b = ╱31╱1╱ // 0x1a7 @0x1b
0x018c…01f4 at001c = ╱31╱1╱ // 0x1a8 @0x1c
0x018c…01f4 at001d = ╱ef╱$╱ // 0x1a9 @0x1d
0x018c…01f4 at001e = ╱ed╱(╱ // 0x1aa @0x1e
0x018c…01f4 at001f = ╱31╱1╱ // 0x1ab @0x1f
0x018c…01f4 at0020 = ╱32╱2╱ // 0x1ac @0x20
0x018c…01f4 at0021 = ╱fe0000c004╱ // 0x1ad @0x21
0x018c…01f4 at0026 = ╱ee╱)╱ // 0x1b2 @0x26
0x018c…01f4 at0027 = ╱ec╱,╱ // 0x1b3 @0x27
0x018c…01f4 at0028 = ╱53╱S╱ // 0x1b4 @0x28
0x018c…01f4 at0029 = ╱41╱A╱ // 0x1b5 @0x29
0x018c…01f4 at002a = ╱4c╱L╱ // 0x1b6 @0x2a
0x018c…01f4 at002b = ╱44╱D╱ // 0x1b7 @0x2b
0x018c…01f4 at002c = ╱4f╱O╱ // 0x1b8 @0x2c
0x018c…01f4 at002d = ╱31╱1╱ // 0x1b9 @0x2d
0x018c…01f4 at002e = ╱ef╱$╱ // 0x1ba @0x2e
0x018c…01f4 at002f = ╱ed╱(╱ // 0x1bb @0x2f
0x018c…01f4 at0030 = ╱31╱1╱ // 0x1bc @0x30
0x018c…01f4 at0031 = ╱32╱2╱ // 0x1bd @0x31
0x018c…01f4 at0032 = ╱fe0000c004╱ // 0x1be @0x32
0x018c…01f4 at0037 = ╱ee╱)╱ // 0x1c3 @0x37
0x018c…01f4 at0038 = ╱ec╱,╱ // 0x1c4 @0x38
0x018c…01f4 at0039 = ╱53╱S╱ // 0x1c5 @0x39
0x018c…01f4 at003a = ╱41╱A╱ // 0x1c6 @0x3a
0x018c…01f4 at003b = ╱4c╱L╱ // 0x1c7 @0x3b
0x018c…01f4 at003c = ╱44╱D╱ // 0x1c8 @0x3c
0x018c…01f4 at003d = ╱4f╱O╱ // 0x1c9 @0x3d
0x018c…01f4 at003e = ╱31╱1╱ // 0x1ca @0x3e
0x018c…01f4 at003f = ╱32╱2╱ // 0x1cb @0x3f
0x018c…01f4 at0040 = ╱ef╱$╱ // 0x1cc @0x40
0x018c…01f4 at0041 = ╱ed╱(╱ // 0x1cd @0x41
0x018c…01f4 at0042 = ╱31╱1╱ // 0x1ce @0x42
0x018c…01f4 at0043 = ╱32╱2╱ // 0x1cf @0x43
0x018c…01f4 at0044 = ╱fe0000c004╱ // 0x1d0 @0x44
0x018c…01f4 at0049 = ╱ee╱)╱ // 0x1d5 @0x49
0x018c…01f4 at004a = ╱ec╱,╱ // 0x1d6 @0x4a
0x018c…01f4 at004b = ╱53╱S╱ // 0x1d7 @0x4b
0x018c…01f4 at004c = ╱55╱U╱ // 0x1d8 @0x4c
0x018c…01f4 at004d = ╱4d╱M╱ // 0x1d9 @0x4d
0x018c…01f4 at004e = ╱ef╱$╱ // 0x1da @0x4e
0x018c…01f4 at004f = ╱ed╱(╱ // 0x1db @0x4f
0x018c…01f4 at0050 = ╱31╱1╱ // 0x1dc @0x50
0x018c…01f4 at0051 = ╱32╱2╱ // 0x1dd @0x51
0x018c…01f4 at0052 = ╱fe0000c004╱ // 0x1de @0x52
0x018c…01f4 at0057 = ╱ee╱)╱ // 0x1e3 @0x57
0x018c…01f4 at0058 = ╱ec╱,╱ // 0x1e4 @0x58
0x018c…01f4 at0059 = ╱53╱S╱ // 0x1e5 @0x59
0x018c…01f4 at005a = ╱55╱U╱ // 0x1e6 @0x5a
0x018c…01f4 at005b = ╱4d╱M╱ // 0x1e7 @0x5b
0x018c…01f4 at005c = ╱31╱1╱ // 0x1e8 @0x5c
0x018c…01f4 at005d = ╱ef╱$╱ // 0x1e9 @0x5d
0x018c…01f4 at005e = ╱ed╱(╱ // 0x1ea @0x5e
0x018c…01f4 at005f = ╱31╱1╱ // 0x1eb @0x5f
0x018c…01f4 at0060 = ╱34╱4╱ // 0x1ec @0x60
0x018c…01f4 at0061 = ╱fe0000e004╱ // 0x1ed @0x61
0x018c…01f4 at0066 = ╱ee╱)╱ // 0x1f2 @0x66
0x018c…01f4 at0067 = EOL // 0x1f3 @0x67
0x018c…01f4 }
0x01f4…0261 8fb8 0150 DIM K2$(17),K3$(17),K4$(17),K5$(17),T1(W),K$(26,11),K6$(17),K7$(17)
0x01f4…0261 LineComalBin {
0x01f4…0261 ptr = 0x8fb8 // 0x1f4 @0x0
0x01f4…0261 lno = 0x0096 // 0x1f6 @0x2
0x01f4…0261 at0004 = ╱87╱ DIM ╱ // 0x1f8 @0x4
0x01f4…0261 at0005 = ╱4b╱K╱ // 0x1f9 @0x5
0x01f4…0261 at0006 = ╱32╱2╱ // 0x1fa @0x6
0x01f4…0261 at0007 = ╱ef╱$╱ // 0x1fb @0x7
0x01f4…0261 at0008 = ╱ed╱(╱ // 0x1fc @0x8
0x01f4…0261 at0009 = ╱31╱1╱ // 0x1fd @0x9
0x01f4…0261 at000a = ╱37╱7╱ // 0x1fe @0xa
0x01f4…0261 at000b = ╱fe00008805╱ // 0x1ff @0xb
0x01f4…0261 at0010 = ╱ee╱)╱ // 0x204 @0x10
0x01f4…0261 at0011 = ╱ec╱,╱ // 0x205 @0x11
0x01f4…0261 at0012 = ╱4b╱K╱ // 0x206 @0x12
0x01f4…0261 at0013 = ╱33╱3╱ // 0x207 @0x13
0x01f4…0261 at0014 = ╱ef╱$╱ // 0x208 @0x14
0x01f4…0261 at0015 = ╱ed╱(╱ // 0x209 @0x15
0x01f4…0261 at0016 = ╱31╱1╱ // 0x20a @0x16
0x01f4…0261 at0017 = ╱37╱7╱ // 0x20b @0x17
0x01f4…0261 at0018 = ╱fe00008805╱ // 0x20c @0x18
0x01f4…0261 at001d = ╱ee╱)╱ // 0x211 @0x1d
0x01f4…0261 at001e = ╱ec╱,╱ // 0x212 @0x1e
0x01f4…0261 at001f = ╱4b╱K╱ // 0x213 @0x1f
0x01f4…0261 at0020 = ╱34╱4╱ // 0x214 @0x20
0x01f4…0261 at0021 = ╱ef╱$╱ // 0x215 @0x21
0x01f4…0261 at0022 = ╱ed╱(╱ // 0x216 @0x22
0x01f4…0261 at0023 = ╱31╱1╱ // 0x217 @0x23
0x01f4…0261 at0024 = ╱37╱7╱ // 0x218 @0x24
0x01f4…0261 at0025 = ╱fe00008805╱ // 0x219 @0x25
0x01f4…0261 at002a = ╱ee╱)╱ // 0x21e @0x2a
0x01f4…0261 at002b = ╱ec╱,╱ // 0x21f @0x2b
0x01f4…0261 at002c = ╱4b╱K╱ // 0x220 @0x2c
0x01f4…0261 at002d = ╱35╱5╱ // 0x221 @0x2d
0x01f4…0261 at002e = ╱ef╱$╱ // 0x222 @0x2e
0x01f4…0261 at002f = ╱ed╱(╱ // 0x223 @0x2f
0x01f4…0261 at0030 = ╱31╱1╱ // 0x224 @0x30
0x01f4…0261 at0031 = ╱37╱7╱ // 0x225 @0x31
0x01f4…0261 at0032 = ╱fe00008805╱ // 0x226 @0x32
0x01f4…0261 at0037 = ╱ee╱)╱ // 0x22b @0x37
0x01f4…0261 at0038 = ╱ec╱,╱ // 0x22c @0x38
0x01f4…0261 at0039 = ╱54╱T╱ // 0x22d @0x39
0x01f4…0261 at003a = ╱31╱1╱ // 0x22e @0x3a
0x01f4…0261 at003b = ╱ed╱(╱ // 0x22f @0x3b
0x01f4…0261 at003c = ╱57╱W╱ // 0x230 @0x3c
0x01f4…0261 at003d = ╱ee╱)╱ // 0x231 @0x3d
0x01f4…0261 at003e = ╱ec╱,╱ // 0x232 @0x3e
0x01f4…0261 at003f = ╱4b╱K╱ // 0x233 @0x3f
0x01f4…0261 at0040 = ╱ef╱$╱ // 0x234 @0x40
0x01f4…0261 at0041 = ╱ed╱(╱ // 0x235 @0x41
0x01f4…0261 at0042 = ╱32╱2╱ // 0x236 @0x42
0x01f4…0261 at0043 = ╱36╱6╱ // 0x237 @0x43
0x01f4…0261 at0044 = ╱fe0000d005╱ // 0x238 @0x44
0x01f4…0261 at0049 = ╱ec╱,╱ // 0x23d @0x49
0x01f4…0261 at004a = ╱31╱1╱ // 0x23e @0x4a
0x01f4…0261 at004b = ╱31╱1╱ // 0x23f @0x4b
0x01f4…0261 at004c = ╱fe0000b004╱ // 0x240 @0x4c
0x01f4…0261 at0051 = ╱ee╱)╱ // 0x245 @0x51
0x01f4…0261 at0052 = ╱ec╱,╱ // 0x246 @0x52
0x01f4…0261 at0053 = ╱4b╱K╱ // 0x247 @0x53
0x01f4…0261 at0054 = ╱36╱6╱ // 0x248 @0x54
0x01f4…0261 at0055 = ╱ef╱$╱ // 0x249 @0x55
0x01f4…0261 at0056 = ╱ed╱(╱ // 0x24a @0x56
0x01f4…0261 at0057 = ╱31╱1╱ // 0x24b @0x57
0x01f4…0261 at0058 = ╱37╱7╱ // 0x24c @0x58
0x01f4…0261 at0059 = ╱fe00008805╱ // 0x24d @0x59
0x01f4…0261 at005e = ╱ee╱)╱ // 0x252 @0x5e
0x01f4…0261 at005f = ╱ec╱,╱ // 0x253 @0x5f
0x01f4…0261 at0060 = ╱4b╱K╱ // 0x254 @0x60
0x01f4…0261 at0061 = ╱37╱7╱ // 0x255 @0x61
0x01f4…0261 at0062 = ╱ef╱$╱ // 0x256 @0x62
0x01f4…0261 at0063 = ╱ed╱(╱ // 0x257 @0x63
0x01f4…0261 at0064 = ╱31╱1╱ // 0x258 @0x64
0x01f4…0261 at0065 = ╱37╱7╱ // 0x259 @0x65
0x01f4…0261 at0066 = ╱fe00008805╱ // 0x25a @0x66
0x01f4…0261 at006b = ╱ee╱)╱ // 0x25f @0x6b
0x01f4…0261 at006c = EOL // 0x260 @0x6c
0x01f4…0261 }
0x0261…029d 8ff4 0155 DIM DV$(10),T2(W),SALDO14$(12),GLNAVN1$(25)
0x0261…029d LineComalBin {
0x0261…029d ptr = 0x8ff4 // 0x261 @0x0
0x0261…029d lno = 0x009b // 0x263 @0x2
0x0261…029d at0004 = ╱87╱ DIM ╱ // 0x265 @0x4
0x0261…029d at0005 = ╱44╱D╱ // 0x266 @0x5
0x0261…029d at0006 = ╱56╱V╱ // 0x267 @0x6
0x0261…029d at0007 = ╱ef╱$╱ // 0x268 @0x7
0x0261…029d at0008 = ╱ed╱(╱ // 0x269 @0x8
0x0261…029d at0009 = ╱31╱1╱ // 0x26a @0x9
0x0261…029d at000a = ╱30╱0╱ // 0x26b @0xa
0x0261…029d at000b = ╱fe0000a004╱ // 0x26c @0xb
0x0261…029d at0010 = ╱ee╱)╱ // 0x271 @0x10
0x0261…029d at0011 = ╱ec╱,╱ // 0x272 @0x11
0x0261…029d at0012 = ╱54╱T╱ // 0x273 @0x12
0x0261…029d at0013 = ╱32╱2╱ // 0x274 @0x13
0x0261…029d at0014 = ╱ed╱(╱ // 0x275 @0x14
0x0261…029d at0015 = ╱57╱W╱ // 0x276 @0x15
0x0261…029d at0016 = ╱ee╱)╱ // 0x277 @0x16
0x0261…029d at0017 = ╱ec╱,╱ // 0x278 @0x17
0x0261…029d at0018 = ╱53╱S╱ // 0x279 @0x18
0x0261…029d at0019 = ╱41╱A╱ // 0x27a @0x19
0x0261…029d at001a = ╱4c╱L╱ // 0x27b @0x1a
0x0261…029d at001b = ╱44╱D╱ // 0x27c @0x1b
0x0261…029d at001c = ╱4f╱O╱ // 0x27d @0x1c
0x0261…029d at001d = ╱31╱1╱ // 0x27e @0x1d
0x0261…029d at001e = ╱34╱4╱ // 0x27f @0x1e
0x0261…029d at001f = ╱ef╱$╱ // 0x280 @0x1f
0x0261…029d at0020 = ╱ed╱(╱ // 0x281 @0x20
0x0261…029d at0021 = ╱31╱1╱ // 0x282 @0x21
0x0261…029d at0022 = ╱32╱2╱ // 0x283 @0x22
0x0261…029d at0023 = ╱fe0000c004╱ // 0x284 @0x23
0x0261…029d at0028 = ╱ee╱)╱ // 0x289 @0x28
0x0261…029d at0029 = ╱ec╱,╱ // 0x28a @0x29
0x0261…029d at002a = ╱47╱G╱ // 0x28b @0x2a
0x0261…029d at002b = ╱4c╱L╱ // 0x28c @0x2b
0x0261…029d at002c = ╱4e╱N╱ // 0x28d @0x2c
0x0261…029d at002d = ╱41╱A╱ // 0x28e @0x2d
0x0261…029d at002e = ╱56╱V╱ // 0x28f @0x2e
0x0261…029d at002f = ╱4e╱N╱ // 0x290 @0x2f
0x0261…029d at0030 = ╱31╱1╱ // 0x291 @0x30
0x0261…029d at0031 = ╱ef╱$╱ // 0x292 @0x31
0x0261…029d at0032 = ╱ed╱(╱ // 0x293 @0x32
0x0261…029d at0033 = ╱32╱2╱ // 0x294 @0x33
0x0261…029d at0034 = ╱35╱5╱ // 0x295 @0x34
0x0261…029d at0035 = ╱fe0000c805╱ // 0x296 @0x35
0x0261…029d at003a = ╱ee╱)╱ // 0x29b @0x3a
0x0261…029d at003b = EOL // 0x29c @0x3b
0x0261…029d }
0x029d…02b5 900c 0160 PROC CALC(ART,B1,B2,ES)
0x029d…02b5 LineComalBin {
0x029d…02b5 ptr = 0x900c // 0x29d @0x0
0x029d…02b5 lno = 0x00a0 // 0x29f @0x2
0x029d…02b5 at0004 = ╱9e╱ PROC ╱ // 0x2a1 @0x4
0x029d…02b5 at0005 = ╱43╱C╱ // 0x2a2 @0x5
0x029d…02b5 at0006 = ╱41╱A╱ // 0x2a3 @0x6
0x029d…02b5 at0007 = ╱4c╱L╱ // 0x2a4 @0x7
0x029d…02b5 at0008 = ╱43╱C╱ // 0x2a5 @0x8
0x029d…02b5 at0009 = ╱ed╱(╱ // 0x2a6 @0x9
0x029d…02b5 at000a = ╱41╱A╱ // 0x2a7 @0xa
0x029d…02b5 at000b = ╱52╱R╱ // 0x2a8 @0xb
0x029d…02b5 at000c = ╱54╱T╱ // 0x2a9 @0xc
0x029d…02b5 at000d = ╱ec╱,╱ // 0x2aa @0xd
0x029d…02b5 at000e = ╱42╱B╱ // 0x2ab @0xe
0x029d…02b5 at000f = ╱31╱1╱ // 0x2ac @0xf
0x029d…02b5 at0010 = ╱ec╱,╱ // 0x2ad @0x10
0x029d…02b5 at0011 = ╱42╱B╱ // 0x2ae @0x11
0x029d…02b5 at0012 = ╱32╱2╱ // 0x2af @0x12
0x029d…02b5 at0013 = ╱ec╱,╱ // 0x2b0 @0x13
0x029d…02b5 at0014 = ╱45╱E╱ // 0x2b1 @0x14
0x029d…02b5 at0015 = ╱53╱S╱ // 0x2b2 @0x15
0x029d…02b5 at0016 = ╱ee╱)╱ // 0x2b3 @0x16
0x029d…02b5 at0017 = EOL // 0x2b4 @0x17
0x029d…02b5 }
0x02b5…02e0 (9,) 9037 0170 OP1$=B1$;OP2$=B2$;RES$=ES$;SI=B;FLAG=B
0x02b5…02e0 LineComalBin {
0x02b5…02e0 ptr = 0x9037 // 0x2b5 @0x0
0x02b5…02e0 lno = 0x00aa // 0x2b7 @0x2
0x02b5…02e0 at0004 = ╱4f╱O╱ // 0x2b9 @0x4
0x02b5…02e0 at0005 = ╱50╱P╱ // 0x2ba @0x5
0x02b5…02e0 at0006 = ╱31╱1╱ // 0x2bb @0x6
0x02b5…02e0 at0007 = ╱ef╱$╱ // 0x2bc @0x7
0x02b5…02e0 at0008 = ╱dc╱=╱ // 0x2bd @0x8
0x02b5…02e0 at0009 = ╱42╱B╱ // 0x2be @0x9
0x02b5…02e0 at000a = ╱31╱1╱ // 0x2bf @0xa
0x02b5…02e0 at000b = ╱ef╱$╱ // 0x2c0 @0xb
0x02b5…02e0 at000c = ╱eb╱;╱ // 0x2c1 @0xc
0x02b5…02e0 at000d = ╱4f╱O╱ // 0x2c2 @0xd
0x02b5…02e0 at000e = ╱50╱P╱ // 0x2c3 @0xe
0x02b5…02e0 at000f = ╱32╱2╱ // 0x2c4 @0xf
0x02b5…02e0 at0010 = ╱ef╱$╱ // 0x2c5 @0x10
0x02b5…02e0 at0011 = ╱dc╱=╱ // 0x2c6 @0x11
0x02b5…02e0 at0012 = ╱42╱B╱ // 0x2c7 @0x12
0x02b5…02e0 at0013 = ╱32╱2╱ // 0x2c8 @0x13
0x02b5…02e0 at0014 = ╱ef╱$╱ // 0x2c9 @0x14
0x02b5…02e0 at0015 = ╱eb╱;╱ // 0x2ca @0x15
0x02b5…02e0 at0016 = ╱52╱R╱ // 0x2cb @0x16
0x02b5…02e0 at0017 = ╱45╱E╱ // 0x2cc @0x17
0x02b5…02e0 at0018 = ╱53╱S╱ // 0x2cd @0x18
0x02b5…02e0 at0019 = ╱ef╱$╱ // 0x2ce @0x19
0x02b5…02e0 at001a = ╱dc╱=╱ // 0x2cf @0x1a
0x02b5…02e0 at001b = ╱45╱E╱ // 0x2d0 @0x1b
0x02b5…02e0 at001c = ╱53╱S╱ // 0x2d1 @0x1c
0x02b5…02e0 at001d = ╱ef╱$╱ // 0x2d2 @0x1d
0x02b5…02e0 at001e = ╱eb╱;╱ // 0x2d3 @0x1e
0x02b5…02e0 at001f = ╱53╱S╱ // 0x2d4 @0x1f
0x02b5…02e0 at0020 = ╱49╱I╱ // 0x2d5 @0x20
0x02b5…02e0 at0021 = ╱dc╱=╱ // 0x2d6 @0x21
0x02b5…02e0 at0022 = ╱42╱B╱ // 0x2d7 @0x22
0x02b5…02e0 at0023 = ╱eb╱;╱ // 0x2d8 @0x23
0x02b5…02e0 at0024 = ╱46╱F╱ // 0x2d9 @0x24
0x02b5…02e0 at0025 = ╱4c╱L╱ // 0x2da @0x25
0x02b5…02e0 at0026 = ╱41╱A╱ // 0x2db @0x26
0x02b5…02e0 at0027 = ╱47╱G╱ // 0x2dc @0x27
0x02b5…02e0 at0028 = ╱dc╱=╱ // 0x2dd @0x28
0x02b5…02e0 at0029 = ╱42╱B╱ // 0x2de @0x29
0x02b5…02e0 at002a = EOL // 0x2df @0x2a
0x02b5…02e0 }
0x02e0…02f6 904d 0180 CALL "P641210:REGN"
0x02e0…02f6 LineComalBin {
0x02e0…02f6 ptr = 0x904d // 0x2e0 @0x0
0x02e0…02f6 lno = 0x00b4 // 0x2e2 @0x2
0x02e0…02f6 at0004 = ╱ad9fff╱ CALL ╱ // 0x2e4 @0x4
0x02e0…02f6 at0007 = ╱22╱"╱ // 0x2e7 @0x7
0x02e0…02f6 at0008 = ╱50╱P╱ // 0x2e8 @0x8
0x02e0…02f6 at0009 = ╱36╱6╱ // 0x2e9 @0x9
0x02e0…02f6 at000a = ╱34╱4╱ // 0x2ea @0xa
0x02e0…02f6 at000b = ╱31╱1╱ // 0x2eb @0xb
0x02e0…02f6 at000c = ╱32╱2╱ // 0x2ec @0xc
0x02e0…02f6 at000d = ╱31╱1╱ // 0x2ed @0xd
0x02e0…02f6 at000e = ╱30╱0╱ // 0x2ee @0xe
0x02e0…02f6 at000f = ╱3a╱:╱ // 0x2ef @0xf
0x02e0…02f6 at0010 = ╱52╱R╱ // 0x2f0 @0x10
0x02e0…02f6 at0011 = ╱45╱E╱ // 0x2f1 @0x11
0x02e0…02f6 at0012 = ╱47╱G╱ // 0x2f2 @0x12
0x02e0…02f6 at0013 = ╱4e╱N╱ // 0x2f3 @0x13
0x02e0…02f6 at0014 = ╱22╱"╱ // 0x2f4 @0x14
0x02e0…02f6 at0015 = EOL // 0x2f5 @0x15
0x02e0…02f6 }
0x02f6…0303 905a 0190 ES$=RES$
0x02f6…0303 LineComalBin {
0x02f6…0303 ptr = 0x905a // 0x2f6 @0x0
0x02f6…0303 lno = 0x00be // 0x2f8 @0x2
0x02f6…0303 at0004 = ╱45╱E╱ // 0x2fa @0x4
0x02f6…0303 at0005 = ╱53╱S╱ // 0x2fb @0x5
0x02f6…0303 at0006 = ╱ef╱$╱ // 0x2fc @0x6
0x02f6…0303 at0007 = ╱dc╱=╱ // 0x2fd @0x7
0x02f6…0303 at0008 = ╱52╱R╱ // 0x2fe @0x8
0x02f6…0303 at0009 = ╱45╱E╱ // 0x2ff @0x9
0x02f6…0303 at000a = ╱53╱S╱ // 0x300 @0xa
0x02f6…0303 at000b = ╱ef╱$╱ // 0x301 @0xb
0x02f6…0303 at000c = EOL // 0x302 @0xc
0x02f6…0303 }
0x0303…0311 9068 0200 IF FLAG<>B THEN STOP
0x0303…0311 LineComalBin {
0x0303…0311 ptr = 0x9068 // 0x303 @0x0
0x0303…0311 lno = 0x00c8 // 0x305 @0x2
0x0303…0311 at0004 = ╱82╱ IF ╱ // 0x307 @0x4
0x0303…0311 at0005 = ╱46╱F╱ // 0x308 @0x5
0x0303…0311 at0006 = ╱4c╱L╱ // 0x309 @0x6
0x0303…0311 at0007 = ╱41╱A╱ // 0x30a @0x7
0x0303…0311 at0008 = ╱47╱G╱ // 0x30b @0x8
0x0303…0311 at0009 = ╱e1╱<>╱ // 0x30c @0x9
0x0303…0311 at000a = ╱42╱B╱ // 0x30d @0xa
0x0303…0311 at000b = ╱b6╱ THEN ╱ // 0x30e @0xb
0x0303…0311 at000c = ╱8d╱ STOP ╱ // 0x30f @0xc
0x0303…0311 at000d = EOL // 0x310 @0xd
0x0303…0311 }
0x0311…0317 906e 0210 ENDPROC
0x0311…0317 LineComalBin {
0x0311…0317 ptr = 0x906e // 0x311 @0x0
0x0311…0317 lno = 0x00d2 // 0x313 @0x2
0x0311…0317 at0004 = ╱9f╱ ENDPROC ╱ // 0x315 @0x4
0x0311…0317 at0005 = EOL // 0x316 @0x5
0x0311…0317 }
0x0317…032c 9083 0220 PROC DATOUD(DA1,DA2)
0x0317…032c LineComalBin {
0x0317…032c ptr = 0x9083 // 0x317 @0x0
0x0317…032c lno = 0x00dc // 0x319 @0x2
0x0317…032c at0004 = ╱9e╱ PROC ╱ // 0x31b @0x4
0x0317…032c at0005 = ╱44╱D╱ // 0x31c @0x5
0x0317…032c at0006 = ╱41╱A╱ // 0x31d @0x6
0x0317…032c at0007 = ╱54╱T╱ // 0x31e @0x7
0x0317…032c at0008 = ╱4f╱O╱ // 0x31f @0x8
0x0317…032c at0009 = ╱55╱U╱ // 0x320 @0x9
0x0317…032c at000a = ╱44╱D╱ // 0x321 @0xa
0x0317…032c at000b = ╱ed╱(╱ // 0x322 @0xb
0x0317…032c at000c = ╱44╱D╱ // 0x323 @0xc
0x0317…032c at000d = ╱41╱A╱ // 0x324 @0xd
0x0317…032c at000e = ╱31╱1╱ // 0x325 @0xe
0x0317…032c at000f = ╱ec╱,╱ // 0x326 @0xf
0x0317…032c at0010 = ╱44╱D╱ // 0x327 @0x10
0x0317…032c at0011 = ╱41╱A╱ // 0x328 @0x11
0x0317…032c at0012 = ╱32╱2╱ // 0x329 @0x12
0x0317…032c at0013 = ╱ee╱)╱ // 0x32a @0x13
0x0317…032c at0014 = EOL // 0x32b @0x14
0x0317…032c }
0x032c…0338 908f 0230 DA3=DA1
0x032c…0338 LineComalBin {
0x032c…0338 ptr = 0x908f // 0x32c @0x0
0x032c…0338 lno = 0x00e6 // 0x32e @0x2
0x032c…0338 at0004 = ╱44╱D╱ // 0x330 @0x4
0x032c…0338 at0005 = ╱41╱A╱ // 0x331 @0x5
0x032c…0338 at0006 = ╱33╱3╱ // 0x332 @0x6
0x032c…0338 at0007 = ╱dc╱=╱ // 0x333 @0x7
0x032c…0338 at0008 = ╱44╱D╱ // 0x334 @0x8
0x032c…0338 at0009 = ╱41╱A╱ // 0x335 @0x9
0x032c…0338 at000a = ╱31╱1╱ // 0x336 @0xa
0x032c…0338 at000b = EOL // 0x337 @0xb
0x032c…0338 }
0x0338…034c 90a3 0240 DA2$=" "
0x0338…034c LineComalBin {
0x0338…034c ptr = 0x90a3 // 0x338 @0x0
0x0338…034c lno = 0x00f0 // 0x33a @0x2
0x0338…034c at0004 = ╱44╱D╱ // 0x33c @0x4
0x0338…034c at0005 = ╱41╱A╱ // 0x33d @0x5
0x0338…034c at0006 = ╱32╱2╱ // 0x33e @0x6
0x0338…034c at0007 = ╱ef╱$╱ // 0x33f @0x7
0x0338…034c at0008 = ╱dc╱=╱ // 0x340 @0x8
0x0338…034c at0009 = ╱22╱"╱ // 0x341 @0x9
0x0338…034c at000a = ╱20╱…╱ // 0x342 @0xa
0x0338…034c at000b = ╱20╱…╱ // 0x343 @0xb
0x0338…034c at000c = ╱20╱…╱ // 0x344 @0xc
0x0338…034c at000d = ╱20╱…╱ // 0x345 @0xd
0x0338…034c at000e = ╱20╱…╱ // 0x346 @0xe
0x0338…034c at000f = ╱20╱…╱ // 0x347 @0xf
0x0338…034c at0010 = ╱20╱…╱ // 0x348 @0x10
0x0338…034c at0011 = ╱20╱…╱ // 0x349 @0x11
0x0338…034c at0012 = ╱22╱"╱ // 0x34a @0x12
0x0338…034c at0013 = EOL // 0x34b @0x13
0x0338…034c }
0x034c…035f 90b6 0250 FOR J=8 TO E STEP -E
0x034c…035f LineComalBin {
0x034c…035f ptr = 0x90b6 // 0x34c @0x0
0x034c…035f lno = 0x00fa // 0x34e @0x2
0x034c…035f at0004 = ╱83╱ FOR ╱ // 0x350 @0x4
0x034c…035f at0005 = ╱4a╱J╱ // 0x351 @0x5
0x034c…035f at0006 = ╱dc╱=╱ // 0x352 @0x6
0x034c…035f at0007 = ╱38╱8╱ // 0x353 @0x7
0x034c…035f at0008 = ╱fe00008004╱ // 0x354 @0x8
0x034c…035f at000d = ╱b7╱ TO ╱ // 0x359 @0xd
0x034c…035f at000e = ╱45╱E╱ // 0x35a @0xe
0x034c…035f at000f = ╱b8╱ STEP ╱ // 0x35b @0xf
0x034c…035f at0010 = ╱e9╱-╱ // 0x35c @0x10
0x034c…035f at0011 = ╱45╱E╱ // 0x35d @0x11
0x034c…035f at0012 = EOL // 0x35e @0x12
0x034c…035f }
0x035f…036b 90c2 0260 IF J MOD V=B THEN
0x035f…036b LineComalBin {
0x035f…036b ptr = 0x90c2 // 0x35f @0x0
0x035f…036b lno = 0x0104 // 0x361 @0x2
0x035f…036b at0004 = ╱9c╱ IF ╱ // 0x363 @0x4
0x035f…036b at0005 = ╱4a╱J╱ // 0x364 @0x5
0x035f…036b at0006 = ╱e8╱ MOD ╱ // 0x365 @0x6
0x035f…036b at0007 = ╱56╱V╱ // 0x366 @0x7
0x035f…036b at0008 = ╱dc╱=╱ // 0x367 @0x8
0x035f…036b at0009 = ╱42╱B╱ // 0x368 @0x9
0x035f…036b at000a = ╱b6╱ THEN ╱ // 0x369 @0xa
0x035f…036b at000b = EOL // 0x36a @0xb
0x035f…036b }
0x036b…037b 90d2 0270 DA2$(J)="."
0x036b…037b LineComalBin {
0x036b…037b ptr = 0x90d2 // 0x36b @0x0
0x036b…037b lno = 0x010e // 0x36d @0x2
0x036b…037b at0004 = ╱44╱D╱ // 0x36f @0x4
0x036b…037b at0005 = ╱41╱A╱ // 0x370 @0x5
0x036b…037b at0006 = ╱32╱2╱ // 0x371 @0x6
0x036b…037b at0007 = ╱ef╱$╱ // 0x372 @0x7
0x036b…037b at0008 = ╱ed╱(╱ // 0x373 @0x8
0x036b…037b at0009 = ╱4a╱J╱ // 0x374 @0x9
0x036b…037b at000a = ╱ee╱)╱ // 0x375 @0xa
0x036b…037b at000b = ╱dc╱=╱ // 0x376 @0xb
0x036b…037b at000c = ╱22╱"╱ // 0x377 @0xc
0x036b…037b at000d = ╱2e╱.╱ // 0x378 @0xd
0x036b…037b at000e = ╱22╱"╱ // 0x379 @0xe
0x036b…037b at000f = EOL // 0x37a @0xf
0x036b…037b }
0x037b…0381 90d8 0280 ELSE
0x037b…0381 LineComalBin {
0x037b…0381 ptr = 0x90d8 // 0x37b @0x0
0x037b…0381 lno = 0x0118 // 0x37d @0x2
0x037b…0381 at0004 = ╱9a╱ ELSE ╱ // 0x37f @0x4
0x037b…0381 at0005 = EOL // 0x380 @0x5
0x037b…0381 }
0x0381…03a4 90fb 0290 DA2$(J)=CHR(DA3 MOD 10+48)
0x0381…03a4 LineComalBin {
0x0381…03a4 ptr = 0x90fb // 0x381 @0x0
0x0381…03a4 lno = 0x0122 // 0x383 @0x2
0x0381…03a4 at0004 = ╱44╱D╱ // 0x385 @0x4
0x0381…03a4 at0005 = ╱41╱A╱ // 0x386 @0x5
0x0381…03a4 at0006 = ╱32╱2╱ // 0x387 @0x6
0x0381…03a4 at0007 = ╱ef╱$╱ // 0x388 @0x7
0x0381…03a4 at0008 = ╱ed╱(╱ // 0x389 @0x8
0x0381…03a4 at0009 = ╱4a╱J╱ // 0x38a @0x9
0x0381…03a4 at000a = ╱ee╱)╱ // 0x38b @0xa
0x0381…03a4 at000b = ╱dc╱=╱ // 0x38c @0xb
0x0381…03a4 at000c = ╱cf╱CHR╱ // 0x38d @0xc
0x0381…03a4 at000d = ╱ed╱(╱ // 0x38e @0xd
0x0381…03a4 at000e = ╱44╱D╱ // 0x38f @0xe
0x0381…03a4 at000f = ╱41╱A╱ // 0x390 @0xf
0x0381…03a4 at0010 = ╱33╱3╱ // 0x391 @0x10
0x0381…03a4 at0011 = ╱e8╱ MOD ╱ // 0x392 @0x11
0x0381…03a4 at0012 = ╱31╱1╱ // 0x393 @0x12
0x0381…03a4 at0013 = ╱30╱0╱ // 0x394 @0x13
0x0381…03a4 at0014 = ╱fe0000a004╱ // 0x395 @0x14
0x0381…03a4 at0019 = ╱e2╱+╱ // 0x39a @0x19
0x0381…03a4 at001a = ╱34╱4╱ // 0x39b @0x1a
0x0381…03a4 at001b = ╱38╱8╱ // 0x39c @0x1b
0x0381…03a4 at001c = ╱fe0000c006╱ // 0x39d @0x1c
0x0381…03a4 at0021 = ╱ee╱)╱ // 0x3a2 @0x21
0x0381…03a4 at0022 = EOL // 0x3a3 @0x22
0x0381…03a4 }
0x03a4…03b8 910f 0300 DA3=DA3 DIV 10
0x03a4…03b8 LineComalBin {
0x03a4…03b8 ptr = 0x910f // 0x3a4 @0x0
0x03a4…03b8 lno = 0x012c // 0x3a6 @0x2
0x03a4…03b8 at0004 = ╱44╱D╱ // 0x3a8 @0x4
0x03a4…03b8 at0005 = ╱41╱A╱ // 0x3a9 @0x5
0x03a4…03b8 at0006 = ╱33╱3╱ // 0x3aa @0x6
0x03a4…03b8 at0007 = ╱dc╱=╱ // 0x3ab @0x7
0x03a4…03b8 at0008 = ╱44╱D╱ // 0x3ac @0x8
0x03a4…03b8 at0009 = ╱41╱A╱ // 0x3ad @0x9
0x03a4…03b8 at000a = ╱33╱3╱ // 0x3ae @0xa
0x03a4…03b8 at000b = ╱e7╱ DIV ╱ // 0x3af @0xb
0x03a4…03b8 at000c = ╱31╱1╱ // 0x3b0 @0xc
0x03a4…03b8 at000d = ╱30╱0╱ // 0x3b1 @0xd
0x03a4…03b8 at000e = ╱fe0000a004╱ // 0x3b2 @0xe
0x03a4…03b8 at0013 = EOL // 0x3b7 @0x13
0x03a4…03b8 }
0x03b8…03be 9115 0310 ENDIF
0x03b8…03be LineComalBin {
0x03b8…03be ptr = 0x9115 // 0x3b8 @0x0
0x03b8…03be lno = 0x0136 // 0x3ba @0x2
0x03b8…03be at0004 = ╱9b╱ ENDIF ╱ // 0x3bc @0x4
0x03b8…03be at0005 = EOL // 0x3bd @0x5
0x03b8…03be }
0x03be…03c5 911c 0320 NEXT J
0x03be…03c5 LineComalBin {
0x03be…03c5 ptr = 0x911c // 0x3be @0x0
0x03be…03c5 lno = 0x0140 // 0x3c0 @0x2
0x03be…03c5 at0004 = ╱84╱ NEXT ╱ // 0x3c2 @0x4
0x03be…03c5 at0005 = ╱4a╱J╱ // 0x3c3 @0x5
0x03be…03c5 at0006 = EOL // 0x3c4 @0x6
0x03be…03c5 }
0x03c5…03cb 9122 0330 ENDPROC
0x03c5…03cb LineComalBin {
0x03c5…03cb ptr = 0x9122 // 0x3c5 @0x0
0x03c5…03cb lno = 0x014a // 0x3c7 @0x2
0x03c5…03cb at0004 = ╱9f╱ ENDPROC ╱ // 0x3c9 @0x4
0x03c5…03cb at0005 = EOL // 0x3ca @0x5
0x03c5…03cb }
0x03cb…03e5 913c 0340 PROC INDTAB(T,MANTAL,L10)
0x03cb…03e5 LineComalBin {
0x03cb…03e5 ptr = 0x913c // 0x3cb @0x0
0x03cb…03e5 lno = 0x0154 // 0x3cd @0x2
0x03cb…03e5 at0004 = ╱9e╱ PROC ╱ // 0x3cf @0x4
0x03cb…03e5 at0005 = ╱49╱I╱ // 0x3d0 @0x5
0x03cb…03e5 at0006 = ╱4e╱N╱ // 0x3d1 @0x6
0x03cb…03e5 at0007 = ╱44╱D╱ // 0x3d2 @0x7
0x03cb…03e5 at0008 = ╱54╱T╱ // 0x3d3 @0x8
0x03cb…03e5 at0009 = ╱41╱A╱ // 0x3d4 @0x9
0x03cb…03e5 at000a = ╱42╱B╱ // 0x3d5 @0xa
0x03cb…03e5 at000b = ╱ed╱(╱ // 0x3d6 @0xb
0x03cb…03e5 at000c = ╱54╱T╱ // 0x3d7 @0xc
0x03cb…03e5 at000d = ╱ec╱,╱ // 0x3d8 @0xd
0x03cb…03e5 at000e = ╱4d╱M╱ // 0x3d9 @0xe
0x03cb…03e5 at000f = ╱41╱A╱ // 0x3da @0xf
0x03cb…03e5 at0010 = ╱4e╱N╱ // 0x3db @0x10
0x03cb…03e5 at0011 = ╱54╱T╱ // 0x3dc @0x11
0x03cb…03e5 at0012 = ╱41╱A╱ // 0x3dd @0x12
0x03cb…03e5 at0013 = ╱4c╱L╱ // 0x3de @0x13
0x03cb…03e5 at0014 = ╱ec╱,╱ // 0x3df @0x14
0x03cb…03e5 at0015 = ╱4c╱L╱ // 0x3e0 @0x15
0x03cb…03e5 at0016 = ╱31╱1╱ // 0x3e1 @0x16
0x03cb…03e5 at0017 = ╱30╱0╱ // 0x3e2 @0x17
0x03cb…03e5 at0018 = ╱ee╱)╱ // 0x3e3 @0x18
0x03cb…03e5 at0019 = EOL // 0x3e4 @0x19
0x03cb…03e5 }
0x03e5…03fc 9153 0350 J=MANTAL DIV 32+E
0x03e5…03fc LineComalBin {
0x03e5…03fc ptr = 0x9153 // 0x3e5 @0x0
0x03e5…03fc lno = 0x015e // 0x3e7 @0x2
0x03e5…03fc at0004 = ╱4a╱J╱ // 0x3e9 @0x4
0x03e5…03fc at0005 = ╱dc╱=╱ // 0x3ea @0x5
0x03e5…03fc at0006 = ╱4d╱M╱ // 0x3eb @0x6
0x03e5…03fc at0007 = ╱41╱A╱ // 0x3ec @0x7
0x03e5…03fc at0008 = ╱4e╱N╱ // 0x3ed @0x8
0x03e5…03fc at0009 = ╱54╱T╱ // 0x3ee @0x9
0x03e5…03fc at000a = ╱41╱A╱ // 0x3ef @0xa
0x03e5…03fc at000b = ╱4c╱L╱ // 0x3f0 @0xb
0x03e5…03fc at000c = ╱e7╱ DIV ╱ // 0x3f1 @0xc
0x03e5…03fc at000d = ╱33╱3╱ // 0x3f2 @0xd
0x03e5…03fc at000e = ╱32╱2╱ // 0x3f3 @0xe
0x03e5…03fc at000f = ╱fe00008006╱ // 0x3f4 @0xf
0x03e5…03fc at0014 = ╱e2╱+╱ // 0x3f9 @0x14
0x03e5…03fc at0015 = ╱45╱E╱ // 0x3fa @0x15
0x03e5…03fc at0016 = EOL // 0x3fb @0x16
0x03e5…03fc }
0x03fc…0417 916e 0360 FOR I=J TO MANTAL DIV 4+J-E
0x03fc…0417 LineComalBin {
0x03fc…0417 ptr = 0x916e // 0x3fc @0x0
0x03fc…0417 lno = 0x0168 // 0x3fe @0x2
0x03fc…0417 at0004 = ╱83╱ FOR ╱ // 0x400 @0x4
0x03fc…0417 at0005 = ╱49╱I╱ // 0x401 @0x5
0x03fc…0417 at0006 = ╱dc╱=╱ // 0x402 @0x6
0x03fc…0417 at0007 = ╱4a╱J╱ // 0x403 @0x7
0x03fc…0417 at0008 = ╱b7╱ TO ╱ // 0x404 @0x8
0x03fc…0417 at0009 = ╱4d╱M╱ // 0x405 @0x9
0x03fc…0417 at000a = ╱41╱A╱ // 0x406 @0xa
0x03fc…0417 at000b = ╱4e╱N╱ // 0x407 @0xb
0x03fc…0417 at000c = ╱54╱T╱ // 0x408 @0xc
0x03fc…0417 at000d = ╱41╱A╱ // 0x409 @0xd
0x03fc…0417 at000e = ╱4c╱L╱ // 0x40a @0xe
0x03fc…0417 at000f = ╱e7╱ DIV ╱ // 0x40b @0xf
0x03fc…0417 at0010 = ╱34╱4╱ // 0x40c @0x10
0x03fc…0417 at0011 = ╱fe00008003╱ // 0x40d @0x11
0x03fc…0417 at0016 = ╱e2╱+╱ // 0x412 @0x16
0x03fc…0417 at0017 = ╱4a╱J╱ // 0x413 @0x17
0x03fc…0417 at0018 = ╱e3╱-╱ // 0x414 @0x18
0x03fc…0417 at0019 = ╱45╱E╱ // 0x415 @0x19
0x03fc…0417 at001a = EOL // 0x416 @0x1a
0x03fc…0417 }
0x0417…0441 9198 0370 H=(I-J)*4+E;H1=H+E;H2=H+G;H3=H+V
0x0417…0441 LineComalBin {
0x0417…0441 ptr = 0x9198 // 0x417 @0x0
0x0417…0441 lno = 0x0172 // 0x419 @0x2
0x0417…0441 at0004 = ╱48╱H╱ // 0x41b @0x4
0x0417…0441 at0005 = ╱dc╱=╱ // 0x41c @0x5
0x0417…0441 at0006 = ╱ed╱(╱ // 0x41d @0x6
0x0417…0441 at0007 = ╱49╱I╱ // 0x41e @0x7
0x0417…0441 at0008 = ╱e3╱-╱ // 0x41f @0x8
0x0417…0441 at0009 = ╱4a╱J╱ // 0x420 @0x9
0x0417…0441 at000a = ╱ee╱)╱ // 0x421 @0xa
0x0417…0441 at000b = ╱e4╱*╱ // 0x422 @0xb
0x0417…0441 at000c = ╱34╱4╱ // 0x423 @0xc
0x0417…0441 at000d = ╱fe00008003╱ // 0x424 @0xd
0x0417…0441 at0012 = ╱e2╱+╱ // 0x429 @0x12
0x0417…0441 at0013 = ╱45╱E╱ // 0x42a @0x13
0x0417…0441 at0014 = ╱eb╱;╱ // 0x42b @0x14
0x0417…0441 at0015 = ╱48╱H╱ // 0x42c @0x15
0x0417…0441 at0016 = ╱31╱1╱ // 0x42d @0x16
0x0417…0441 at0017 = ╱dc╱=╱ // 0x42e @0x17
0x0417…0441 at0018 = ╱48╱H╱ // 0x42f @0x18
0x0417…0441 at0019 = ╱e2╱+╱ // 0x430 @0x19
0x0417…0441 at001a = ╱45╱E╱ // 0x431 @0x1a
0x0417…0441 at001b = ╱eb╱;╱ // 0x432 @0x1b
0x0417…0441 at001c = ╱48╱H╱ // 0x433 @0x1c
0x0417…0441 at001d = ╱32╱2╱ // 0x434 @0x1d
0x0417…0441 at001e = ╱dc╱=╱ // 0x435 @0x1e
0x0417…0441 at001f = ╱48╱H╱ // 0x436 @0x1f
0x0417…0441 at0020 = ╱e2╱+╱ // 0x437 @0x20
0x0417…0441 at0021 = ╱47╱G╱ // 0x438 @0x21
0x0417…0441 at0022 = ╱eb╱;╱ // 0x439 @0x22
0x0417…0441 at0023 = ╱48╱H╱ // 0x43a @0x23
0x0417…0441 at0024 = ╱33╱3╱ // 0x43b @0x24
0x0417…0441 at0025 = ╱dc╱=╱ // 0x43c @0x25
0x0417…0441 at0026 = ╱48╱H╱ // 0x43d @0x26
0x0417…0441 at0027 = ╱e2╱+╱ // 0x43e @0x27
0x0417…0441 at0028 = ╱56╱V╱ // 0x43f @0x28
0x0417…0441 at0029 = EOL // 0x440 @0x29
0x0417…0441 }
0x0441…048b 91e2 0380 GET L10$,I:T(H,E),T(H,G),T(H1,E),T(H1,G),T(H2,E),T(H2,G),T(H3,E),T(H3,G)
0x0441…048b LineComalBin {
0x0441…048b ptr = 0x91e2 // 0x441 @0x0
0x0441…048b lno = 0x017c // 0x443 @0x2
0x0441…048b at0004 = ╱a9╱ GET ╱ // 0x445 @0x4
0x0441…048b at0005 = ╱4c╱L╱ // 0x446 @0x5
0x0441…048b at0006 = ╱31╱1╱ // 0x447 @0x6
0x0441…048b at0007 = ╱30╱0╱ // 0x448 @0x7
0x0441…048b at0008 = ╱ef╱$╱ // 0x449 @0x8
0x0441…048b at0009 = ╱ec╱,╱ // 0x44a @0x9
0x0441…048b at000a = ╱49╱I╱ // 0x44b @0xa
0x0441…048b at000b = ╱f0╱:╱ // 0x44c @0xb
0x0441…048b at000c = ╱54╱T╱ // 0x44d @0xc
0x0441…048b at000d = ╱ed╱(╱ // 0x44e @0xd
0x0441…048b at000e = ╱48╱H╱ // 0x44f @0xe
0x0441…048b at000f = ╱ec╱,╱ // 0x450 @0xf
0x0441…048b at0010 = ╱45╱E╱ // 0x451 @0x10
0x0441…048b at0011 = ╱ee╱)╱ // 0x452 @0x11
0x0441…048b at0012 = ╱ec╱,╱ // 0x453 @0x12
0x0441…048b at0013 = ╱54╱T╱ // 0x454 @0x13
0x0441…048b at0014 = ╱ed╱(╱ // 0x455 @0x14
0x0441…048b at0015 = ╱48╱H╱ // 0x456 @0x15
0x0441…048b at0016 = ╱ec╱,╱ // 0x457 @0x16
0x0441…048b at0017 = ╱47╱G╱ // 0x458 @0x17
0x0441…048b at0018 = ╱ee╱)╱ // 0x459 @0x18
0x0441…048b at0019 = ╱ec╱,╱ // 0x45a @0x19
0x0441…048b at001a = ╱54╱T╱ // 0x45b @0x1a
0x0441…048b at001b = ╱ed╱(╱ // 0x45c @0x1b
0x0441…048b at001c = ╱48╱H╱ // 0x45d @0x1c
0x0441…048b at001d = ╱31╱1╱ // 0x45e @0x1d
0x0441…048b at001e = ╱ec╱,╱ // 0x45f @0x1e
0x0441…048b at001f = ╱45╱E╱ // 0x460 @0x1f
0x0441…048b at0020 = ╱ee╱)╱ // 0x461 @0x20
0x0441…048b at0021 = ╱ec╱,╱ // 0x462 @0x21
0x0441…048b at0022 = ╱54╱T╱ // 0x463 @0x22
0x0441…048b at0023 = ╱ed╱(╱ // 0x464 @0x23
0x0441…048b at0024 = ╱48╱H╱ // 0x465 @0x24
0x0441…048b at0025 = ╱31╱1╱ // 0x466 @0x25
0x0441…048b at0026 = ╱ec╱,╱ // 0x467 @0x26
0x0441…048b at0027 = ╱47╱G╱ // 0x468 @0x27
0x0441…048b at0028 = ╱ee╱)╱ // 0x469 @0x28
0x0441…048b at0029 = ╱ec╱,╱ // 0x46a @0x29
0x0441…048b at002a = ╱54╱T╱ // 0x46b @0x2a
0x0441…048b at002b = ╱ed╱(╱ // 0x46c @0x2b
0x0441…048b at002c = ╱48╱H╱ // 0x46d @0x2c
0x0441…048b at002d = ╱32╱2╱ // 0x46e @0x2d
0x0441…048b at002e = ╱ec╱,╱ // 0x46f @0x2e
0x0441…048b at002f = ╱45╱E╱ // 0x470 @0x2f
0x0441…048b at0030 = ╱ee╱)╱ // 0x471 @0x30
0x0441…048b at0031 = ╱ec╱,╱ // 0x472 @0x31
0x0441…048b at0032 = ╱54╱T╱ // 0x473 @0x32
0x0441…048b at0033 = ╱ed╱(╱ // 0x474 @0x33
0x0441…048b at0034 = ╱48╱H╱ // 0x475 @0x34
0x0441…048b at0035 = ╱32╱2╱ // 0x476 @0x35
0x0441…048b at0036 = ╱ec╱,╱ // 0x477 @0x36
0x0441…048b at0037 = ╱47╱G╱ // 0x478 @0x37
0x0441…048b at0038 = ╱ee╱)╱ // 0x479 @0x38
0x0441…048b at0039 = ╱ec╱,╱ // 0x47a @0x39
0x0441…048b at003a = ╱54╱T╱ // 0x47b @0x3a
0x0441…048b at003b = ╱ed╱(╱ // 0x47c @0x3b
0x0441…048b at003c = ╱48╱H╱ // 0x47d @0x3c
0x0441…048b at003d = ╱33╱3╱ // 0x47e @0x3d
0x0441…048b at003e = ╱ec╱,╱ // 0x47f @0x3e
0x0441…048b at003f = ╱45╱E╱ // 0x480 @0x3f
0x0441…048b at0040 = ╱ee╱)╱ // 0x481 @0x40
0x0441…048b at0041 = ╱ec╱,╱ // 0x482 @0x41
0x0441…048b at0042 = ╱54╱T╱ // 0x483 @0x42
0x0441…048b at0043 = ╱ed╱(╱ // 0x484 @0x43
0x0441…048b at0044 = ╱48╱H╱ // 0x485 @0x44
0x0441…048b at0045 = ╱33╱3╱ // 0x486 @0x45
0x0441…048b at0046 = ╱ec╱,╱ // 0x487 @0x46
0x0441…048b at0047 = ╱47╱G╱ // 0x488 @0x47
0x0441…048b at0048 = ╱ee╱)╱ // 0x489 @0x48
0x0441…048b at0049 = EOL // 0x48a @0x49
0x0441…048b }
0x048b…049f 91f6 0390 EXEC FEJL(E,E,L10$)
0x048b…049f LineComalBin {
0x048b…049f ptr = 0x91f6 // 0x48b @0x0
0x048b…049f lno = 0x0186 // 0x48d @0x2
0x048b…049f at0004 = ╱9d╱ EXEC ╱ // 0x48f @0x4
0x048b…049f at0005 = ╱46╱F╱ // 0x490 @0x5
0x048b…049f at0006 = ╱45╱E╱ // 0x491 @0x6
0x048b…049f at0007 = ╱4a╱J╱ // 0x492 @0x7
0x048b…049f at0008 = ╱4c╱L╱ // 0x493 @0x8
0x048b…049f at0009 = ╱ed╱(╱ // 0x494 @0x9
0x048b…049f at000a = ╱45╱E╱ // 0x495 @0xa
0x048b…049f at000b = ╱ec╱,╱ // 0x496 @0xb
0x048b…049f at000c = ╱45╱E╱ // 0x497 @0xc
0x048b…049f at000d = ╱ec╱,╱ // 0x498 @0xd
0x048b…049f at000e = ╱4c╱L╱ // 0x499 @0xe
0x048b…049f at000f = ╱31╱1╱ // 0x49a @0xf
0x048b…049f at0010 = ╱30╱0╱ // 0x49b @0x10
0x048b…049f at0011 = ╱ef╱$╱ // 0x49c @0x11
0x048b…049f at0012 = ╱ee╱)╱ // 0x49d @0x12
0x048b…049f at0013 = EOL // 0x49e @0x13
0x048b…049f }
0x049f…04a6 91fd 0400 NEXT I
0x049f…04a6 LineComalBin {
0x049f…04a6 ptr = 0x91fd // 0x49f @0x0
0x049f…04a6 lno = 0x0190 // 0x4a1 @0x2
0x049f…04a6 at0004 = ╱84╱ NEXT ╱ // 0x4a3 @0x4
0x049f…04a6 at0005 = ╱49╱I╱ // 0x4a4 @0x5
0x049f…04a6 at0006 = EOL // 0x4a5 @0x6
0x049f…04a6 }
0x04a6…04ac 9203 0410 ENDPROC
0x04a6…04ac LineComalBin {
0x04a6…04ac ptr = 0x9203 // 0x4a6 @0x0
0x04a6…04ac lno = 0x019a // 0x4a8 @0x2
0x04a6…04ac at0004 = ╱9f╱ ENDPROC ╱ // 0x4aa @0x4
0x04a6…04ac at0005 = EOL // 0x4ab @0x5
0x04a6…04ac }
0x04ac…04c1 9218 0420 PROC UNDIND(V2,U1,Z)
0x04ac…04c1 LineComalBin {
0x04ac…04c1 ptr = 0x9218 // 0x4ac @0x0
0x04ac…04c1 lno = 0x01a4 // 0x4ae @0x2
0x04ac…04c1 at0004 = ╱9e╱ PROC ╱ // 0x4b0 @0x4
0x04ac…04c1 at0005 = ╱55╱U╱ // 0x4b1 @0x5
0x04ac…04c1 at0006 = ╱4e╱N╱ // 0x4b2 @0x6
0x04ac…04c1 at0007 = ╱44╱D╱ // 0x4b3 @0x7
0x04ac…04c1 at0008 = ╱49╱I╱ // 0x4b4 @0x8
0x04ac…04c1 at0009 = ╱4e╱N╱ // 0x4b5 @0x9
0x04ac…04c1 at000a = ╱44╱D╱ // 0x4b6 @0xa
0x04ac…04c1 at000b = ╱ed╱(╱ // 0x4b7 @0xb
0x04ac…04c1 at000c = ╱56╱V╱ // 0x4b8 @0xc
0x04ac…04c1 at000d = ╱32╱2╱ // 0x4b9 @0xd
0x04ac…04c1 at000e = ╱ec╱,╱ // 0x4ba @0xe
0x04ac…04c1 at000f = ╱55╱U╱ // 0x4bb @0xf
0x04ac…04c1 at0010 = ╱31╱1╱ // 0x4bc @0x10
0x04ac…04c1 at0011 = ╱ec╱,╱ // 0x4bd @0x11
0x04ac…04c1 at0012 = ╱5a╱Z╱ // 0x4be @0x12
0x04ac…04c1 at0013 = ╱ee╱)╱ // 0x4bf @0x13
0x04ac…04c1 at0014 = EOL // 0x4c0 @0x14
0x04ac…04c1 }
0x04c1…04cc 9223 0430 OPEN V2$,R
0x04c1…04cc LineComalBin {
0x04c1…04cc ptr = 0x9223 // 0x4c1 @0x0
0x04c1…04cc lno = 0x01ae // 0x4c3 @0x2
0x04c1…04cc at0004 = ╱a7╱ OPEN ╱ // 0x4c5 @0x4
0x04c1…04cc at0005 = ╱56╱V╱ // 0x4c6 @0x5
0x04c1…04cc at0006 = ╱32╱2╱ // 0x4c7 @0x6
0x04c1…04cc at0007 = ╱ef╱$╱ // 0x4c8 @0x7
0x04c1…04cc at0008 = ╱ec╱,╱ // 0x4c9 @0x8
0x04c1…04cc at0009 = ╱52╱R╱ // 0x4ca @0x9
0x04c1…04cc at000a = EOL // 0x4cb @0xa
0x04c1…04cc }
0x04cc…04e5 923c 0440 EXEC FEJL(14,E,V2$)
0x04cc…04e5 LineComalBin {
0x04cc…04e5 ptr = 0x923c // 0x4cc @0x0
0x04cc…04e5 lno = 0x01b8 // 0x4ce @0x2
0x04cc…04e5 at0004 = ╱9d╱ EXEC ╱ // 0x4d0 @0x4
0x04cc…04e5 at0005 = ╱46╱F╱ // 0x4d1 @0x5
0x04cc…04e5 at0006 = ╱45╱E╱ // 0x4d2 @0x6
0x04cc…04e5 at0007 = ╱4a╱J╱ // 0x4d3 @0x7
0x04cc…04e5 at0008 = ╱4c╱L╱ // 0x4d4 @0x8
0x04cc…04e5 at0009 = ╱ed╱(╱ // 0x4d5 @0x9
0x04cc…04e5 at000a = ╱31╱1╱ // 0x4d6 @0xa
0x04cc…04e5 at000b = ╱34╱4╱ // 0x4d7 @0xb
0x04cc…04e5 at000c = ╱fe0000e004╱ // 0x4d8 @0xc
0x04cc…04e5 at0011 = ╱ec╱,╱ // 0x4dd @0x11
0x04cc…04e5 at0012 = ╱45╱E╱ // 0x4de @0x12
0x04cc…04e5 at0013 = ╱ec╱,╱ // 0x4df @0x13
0x04cc…04e5 at0014 = ╱56╱V╱ // 0x4e0 @0x14
0x04cc…04e5 at0015 = ╱32╱2╱ // 0x4e1 @0x15
0x04cc…04e5 at0016 = ╱ef╱$╱ // 0x4e2 @0x16
0x04cc…04e5 at0017 = ╱ee╱)╱ // 0x4e3 @0x17
0x04cc…04e5 at0018 = EOL // 0x4e4 @0x18
0x04cc…04e5 }
0x04e5…0533 928a 0450 GET V2$,U1:Z(E,E),Z(E,G),Z(G,E),Z(G,G),Z(V,E),Z(V,G),Z(4,E),Z(4,G)
0x04e5…0533 LineComalBin {
0x04e5…0533 ptr = 0x928a // 0x4e5 @0x0
0x04e5…0533 lno = 0x01c2 // 0x4e7 @0x2
0x04e5…0533 at0004 = ╱a9╱ GET ╱ // 0x4e9 @0x4
0x04e5…0533 at0005 = ╱56╱V╱ // 0x4ea @0x5
0x04e5…0533 at0006 = ╱32╱2╱ // 0x4eb @0x6
0x04e5…0533 at0007 = ╱ef╱$╱ // 0x4ec @0x7
0x04e5…0533 at0008 = ╱ec╱,╱ // 0x4ed @0x8
0x04e5…0533 at0009 = ╱55╱U╱ // 0x4ee @0x9
0x04e5…0533 at000a = ╱31╱1╱ // 0x4ef @0xa
0x04e5…0533 at000b = ╱f0╱:╱ // 0x4f0 @0xb
0x04e5…0533 at000c = ╱5a╱Z╱ // 0x4f1 @0xc
0x04e5…0533 at000d = ╱ed╱(╱ // 0x4f2 @0xd
0x04e5…0533 at000e = ╱45╱E╱ // 0x4f3 @0xe
0x04e5…0533 at000f = ╱ec╱,╱ // 0x4f4 @0xf
0x04e5…0533 at0010 = ╱45╱E╱ // 0x4f5 @0x10
0x04e5…0533 at0011 = ╱ee╱)╱ // 0x4f6 @0x11
0x04e5…0533 at0012 = ╱ec╱,╱ // 0x4f7 @0x12
0x04e5…0533 at0013 = ╱5a╱Z╱ // 0x4f8 @0x13
0x04e5…0533 at0014 = ╱ed╱(╱ // 0x4f9 @0x14
0x04e5…0533 at0015 = ╱45╱E╱ // 0x4fa @0x15
0x04e5…0533 at0016 = ╱ec╱,╱ // 0x4fb @0x16
0x04e5…0533 at0017 = ╱47╱G╱ // 0x4fc @0x17
0x04e5…0533 at0018 = ╱ee╱)╱ // 0x4fd @0x18
0x04e5…0533 at0019 = ╱ec╱,╱ // 0x4fe @0x19
0x04e5…0533 at001a = ╱5a╱Z╱ // 0x4ff @0x1a
0x04e5…0533 at001b = ╱ed╱(╱ // 0x500 @0x1b
0x04e5…0533 at001c = ╱47╱G╱ // 0x501 @0x1c
0x04e5…0533 at001d = ╱ec╱,╱ // 0x502 @0x1d
0x04e5…0533 at001e = ╱45╱E╱ // 0x503 @0x1e
0x04e5…0533 at001f = ╱ee╱)╱ // 0x504 @0x1f
0x04e5…0533 at0020 = ╱ec╱,╱ // 0x505 @0x20
0x04e5…0533 at0021 = ╱5a╱Z╱ // 0x506 @0x21
0x04e5…0533 at0022 = ╱ed╱(╱ // 0x507 @0x22
0x04e5…0533 at0023 = ╱47╱G╱ // 0x508 @0x23
0x04e5…0533 at0024 = ╱ec╱,╱ // 0x509 @0x24
0x04e5…0533 at0025 = ╱47╱G╱ // 0x50a @0x25
0x04e5…0533 at0026 = ╱ee╱)╱ // 0x50b @0x26
0x04e5…0533 at0027 = ╱ec╱,╱ // 0x50c @0x27
0x04e5…0533 at0028 = ╱5a╱Z╱ // 0x50d @0x28
0x04e5…0533 at0029 = ╱ed╱(╱ // 0x50e @0x29
0x04e5…0533 at002a = ╱56╱V╱ // 0x50f @0x2a
0x04e5…0533 at002b = ╱ec╱,╱ // 0x510 @0x2b
0x04e5…0533 at002c = ╱45╱E╱ // 0x511 @0x2c
0x04e5…0533 at002d = ╱ee╱)╱ // 0x512 @0x2d
0x04e5…0533 at002e = ╱ec╱,╱ // 0x513 @0x2e
0x04e5…0533 at002f = ╱5a╱Z╱ // 0x514 @0x2f
0x04e5…0533 at0030 = ╱ed╱(╱ // 0x515 @0x30
0x04e5…0533 at0031 = ╱56╱V╱ // 0x516 @0x31
0x04e5…0533 at0032 = ╱ec╱,╱ // 0x517 @0x32
0x04e5…0533 at0033 = ╱47╱G╱ // 0x518 @0x33
0x04e5…0533 at0034 = ╱ee╱)╱ // 0x519 @0x34
0x04e5…0533 at0035 = ╱ec╱,╱ // 0x51a @0x35
0x04e5…0533 at0036 = ╱5a╱Z╱ // 0x51b @0x36
0x04e5…0533 at0037 = ╱ed╱(╱ // 0x51c @0x37
0x04e5…0533 at0038 = ╱34╱4╱ // 0x51d @0x38
0x04e5…0533 at0039 = ╱fe00008003╱ // 0x51e @0x39
0x04e5…0533 at003e = ╱ec╱,╱ // 0x523 @0x3e
0x04e5…0533 at003f = ╱45╱E╱ // 0x524 @0x3f
0x04e5…0533 at0040 = ╱ee╱)╱ // 0x525 @0x40
0x04e5…0533 at0041 = ╱ec╱,╱ // 0x526 @0x41
0x04e5…0533 at0042 = ╱5a╱Z╱ // 0x527 @0x42
0x04e5…0533 at0043 = ╱ed╱(╱ // 0x528 @0x43
0x04e5…0533 at0044 = ╱34╱4╱ // 0x529 @0x44
0x04e5…0533 at0045 = ╱fe00008003╱ // 0x52a @0x45
0x04e5…0533 at004a = ╱ec╱,╱ // 0x52f @0x4a
0x04e5…0533 at004b = ╱47╱G╱ // 0x530 @0x4b
0x04e5…0533 at004c = ╱ee╱)╱ // 0x531 @0x4c
0x04e5…0533 at004d = EOL // 0x532 @0x4d
0x04e5…0533 }
0x0533…054c 92a3 0460 EXEC FEJL(14,G,V2$)
0x0533…054c LineComalBin {
0x0533…054c ptr = 0x92a3 // 0x533 @0x0
0x0533…054c lno = 0x01cc // 0x535 @0x2
0x0533…054c at0004 = ╱9d╱ EXEC ╱ // 0x537 @0x4
0x0533…054c at0005 = ╱46╱F╱ // 0x538 @0x5
0x0533…054c at0006 = ╱45╱E╱ // 0x539 @0x6
0x0533…054c at0007 = ╱4a╱J╱ // 0x53a @0x7
0x0533…054c at0008 = ╱4c╱L╱ // 0x53b @0x8
0x0533…054c at0009 = ╱ed╱(╱ // 0x53c @0x9
0x0533…054c at000a = ╱31╱1╱ // 0x53d @0xa
0x0533…054c at000b = ╱34╱4╱ // 0x53e @0xb
0x0533…054c at000c = ╱fe0000e004╱ // 0x53f @0xc
0x0533…054c at0011 = ╱ec╱,╱ // 0x544 @0x11
0x0533…054c at0012 = ╱47╱G╱ // 0x545 @0x12
0x0533…054c at0013 = ╱ec╱,╱ // 0x546 @0x13
0x0533…054c at0014 = ╱56╱V╱ // 0x547 @0x14
0x0533…054c at0015 = ╱32╱2╱ // 0x548 @0x15
0x0533…054c at0016 = ╱ef╱$╱ // 0x549 @0x16
0x0533…054c at0017 = ╱ee╱)╱ // 0x54a @0x17
0x0533…054c at0018 = EOL // 0x54b @0x18
0x0533…054c }
0x054c…0555 92ac 0470 CLOSE V2$
0x054c…0555 LineComalBin {
0x054c…0555 ptr = 0x92ac // 0x54c @0x0
0x054c…0555 lno = 0x01d6 // 0x54e @0x2
0x054c…0555 at0004 = ╱a8╱ CLOSE ╱ // 0x550 @0x4
0x054c…0555 at0005 = ╱56╱V╱ // 0x551 @0x5
0x054c…0555 at0006 = ╱32╱2╱ // 0x552 @0x6
0x054c…0555 at0007 = ╱ef╱$╱ // 0x553 @0x7
0x054c…0555 at0008 = EOL // 0x554 @0x8
0x054c…0555 }
0x0555…056e 92c5 0480 EXEC FEJL(14,V,V2$)
0x0555…056e LineComalBin {
0x0555…056e ptr = 0x92c5 // 0x555 @0x0
0x0555…056e lno = 0x01e0 // 0x557 @0x2
0x0555…056e at0004 = ╱9d╱ EXEC ╱ // 0x559 @0x4
0x0555…056e at0005 = ╱46╱F╱ // 0x55a @0x5
0x0555…056e at0006 = ╱45╱E╱ // 0x55b @0x6
0x0555…056e at0007 = ╱4a╱J╱ // 0x55c @0x7
0x0555…056e at0008 = ╱4c╱L╱ // 0x55d @0x8
0x0555…056e at0009 = ╱ed╱(╱ // 0x55e @0x9
0x0555…056e at000a = ╱31╱1╱ // 0x55f @0xa
0x0555…056e at000b = ╱34╱4╱ // 0x560 @0xb
0x0555…056e at000c = ╱fe0000e004╱ // 0x561 @0xc
0x0555…056e at0011 = ╱ec╱,╱ // 0x566 @0x11
0x0555…056e at0012 = ╱56╱V╱ // 0x567 @0x12
0x0555…056e at0013 = ╱ec╱,╱ // 0x568 @0x13
0x0555…056e at0014 = ╱56╱V╱ // 0x569 @0x14
0x0555…056e at0015 = ╱32╱2╱ // 0x56a @0x15
0x0555…056e at0016 = ╱ef╱$╱ // 0x56b @0x16
0x0555…056e at0017 = ╱ee╱)╱ // 0x56c @0x17
0x0555…056e at0018 = EOL // 0x56d @0x18
0x0555…056e }
0x056e…057b 92d2 0490 ENDPROC ;UNDIND
0x056e…057b LineComalBin {
0x056e…057b ptr = 0x92d2 // 0x56e @0x0
0x056e…057b lno = 0x01ea // 0x570 @0x2
0x056e…057b at0004 = ╱9f╱ ENDPROC ╱ // 0x572 @0x4
0x056e…057b at0005 = ╱eb╱;╱ // 0x573 @0x5
0x056e…057b at0006 = ╱55╱U╱ // 0x574 @0x6
0x056e…057b at0007 = ╱4e╱N╱ // 0x575 @0x7
0x056e…057b at0008 = ╱44╱D╱ // 0x576 @0x8
0x056e…057b at0009 = ╱49╱I╱ // 0x577 @0x9
0x056e…057b at000a = ╱4e╱N╱ // 0x578 @0xa
0x056e…057b at000b = ╱44╱D╱ // 0x579 @0xb
0x056e…057b at000c = EOL // 0x57a @0xc
0x056e…057b }
0x057b…058f 92e6 0500 PROC UNDUD(V3,U2,T)
0x057b…058f LineComalBin {
0x057b…058f ptr = 0x92e6 // 0x57b @0x0
0x057b…058f lno = 0x01f4 // 0x57d @0x2
0x057b…058f at0004 = ╱9e╱ PROC ╱ // 0x57f @0x4
0x057b…058f at0005 = ╱55╱U╱ // 0x580 @0x5
0x057b…058f at0006 = ╱4e╱N╱ // 0x581 @0x6
0x057b…058f at0007 = ╱44╱D╱ // 0x582 @0x7
0x057b…058f at0008 = ╱55╱U╱ // 0x583 @0x8
0x057b…058f at0009 = ╱44╱D╱ // 0x584 @0x9
0x057b…058f at000a = ╱ed╱(╱ // 0x585 @0xa
0x057b…058f at000b = ╱56╱V╱ // 0x586 @0xb
0x057b…058f at000c = ╱33╱3╱ // 0x587 @0xc
0x057b…058f at000d = ╱ec╱,╱ // 0x588 @0xd
0x057b…058f at000e = ╱55╱U╱ // 0x589 @0xe
0x057b…058f at000f = ╱32╱2╱ // 0x58a @0xf
0x057b…058f at0010 = ╱ec╱,╱ // 0x58b @0x10
0x057b…058f at0011 = ╱54╱T╱ // 0x58c @0x11
0x057b…058f at0012 = ╱ee╱)╱ // 0x58d @0x12
0x057b…058f at0013 = EOL // 0x58e @0x13
0x057b…058f }
0x058f…05dd 9334 0510 PUT V3$,U2:T(E,E),T(E,G),T(G,E),T(G,G),T(V,E),T(V,G),T(4,E),T(4,G)
0x058f…05dd LineComalBin {
0x058f…05dd ptr = 0x9334 // 0x58f @0x0
0x058f…05dd lno = 0x01fe // 0x591 @0x2
0x058f…05dd at0004 = ╱aa╱ PUT ╱ // 0x593 @0x4
0x058f…05dd at0005 = ╱56╱V╱ // 0x594 @0x5
0x058f…05dd at0006 = ╱33╱3╱ // 0x595 @0x6
0x058f…05dd at0007 = ╱ef╱$╱ // 0x596 @0x7
0x058f…05dd at0008 = ╱ec╱,╱ // 0x597 @0x8
0x058f…05dd at0009 = ╱55╱U╱ // 0x598 @0x9
0x058f…05dd at000a = ╱32╱2╱ // 0x599 @0xa
0x058f…05dd at000b = ╱f0╱:╱ // 0x59a @0xb
0x058f…05dd at000c = ╱54╱T╱ // 0x59b @0xc
0x058f…05dd at000d = ╱ed╱(╱ // 0x59c @0xd
0x058f…05dd at000e = ╱45╱E╱ // 0x59d @0xe
0x058f…05dd at000f = ╱ec╱,╱ // 0x59e @0xf
0x058f…05dd at0010 = ╱45╱E╱ // 0x59f @0x10
0x058f…05dd at0011 = ╱ee╱)╱ // 0x5a0 @0x11
0x058f…05dd at0012 = ╱ec╱,╱ // 0x5a1 @0x12
0x058f…05dd at0013 = ╱54╱T╱ // 0x5a2 @0x13
0x058f…05dd at0014 = ╱ed╱(╱ // 0x5a3 @0x14
0x058f…05dd at0015 = ╱45╱E╱ // 0x5a4 @0x15
0x058f…05dd at0016 = ╱ec╱,╱ // 0x5a5 @0x16
0x058f…05dd at0017 = ╱47╱G╱ // 0x5a6 @0x17
0x058f…05dd at0018 = ╱ee╱)╱ // 0x5a7 @0x18
0x058f…05dd at0019 = ╱ec╱,╱ // 0x5a8 @0x19
0x058f…05dd at001a = ╱54╱T╱ // 0x5a9 @0x1a
0x058f…05dd at001b = ╱ed╱(╱ // 0x5aa @0x1b
0x058f…05dd at001c = ╱47╱G╱ // 0x5ab @0x1c
0x058f…05dd at001d = ╱ec╱,╱ // 0x5ac @0x1d
0x058f…05dd at001e = ╱45╱E╱ // 0x5ad @0x1e
0x058f…05dd at001f = ╱ee╱)╱ // 0x5ae @0x1f
0x058f…05dd at0020 = ╱ec╱,╱ // 0x5af @0x20
0x058f…05dd at0021 = ╱54╱T╱ // 0x5b0 @0x21
0x058f…05dd at0022 = ╱ed╱(╱ // 0x5b1 @0x22
0x058f…05dd at0023 = ╱47╱G╱ // 0x5b2 @0x23
0x058f…05dd at0024 = ╱ec╱,╱ // 0x5b3 @0x24
0x058f…05dd at0025 = ╱47╱G╱ // 0x5b4 @0x25
0x058f…05dd at0026 = ╱ee╱)╱ // 0x5b5 @0x26
0x058f…05dd at0027 = ╱ec╱,╱ // 0x5b6 @0x27
0x058f…05dd at0028 = ╱54╱T╱ // 0x5b7 @0x28
0x058f…05dd at0029 = ╱ed╱(╱ // 0x5b8 @0x29
0x058f…05dd at002a = ╱56╱V╱ // 0x5b9 @0x2a
0x058f…05dd at002b = ╱ec╱,╱ // 0x5ba @0x2b
0x058f…05dd at002c = ╱45╱E╱ // 0x5bb @0x2c
0x058f…05dd at002d = ╱ee╱)╱ // 0x5bc @0x2d
0x058f…05dd at002e = ╱ec╱,╱ // 0x5bd @0x2e
0x058f…05dd at002f = ╱54╱T╱ // 0x5be @0x2f
0x058f…05dd at0030 = ╱ed╱(╱ // 0x5bf @0x30
0x058f…05dd at0031 = ╱56╱V╱ // 0x5c0 @0x31
0x058f…05dd at0032 = ╱ec╱,╱ // 0x5c1 @0x32
0x058f…05dd at0033 = ╱47╱G╱ // 0x5c2 @0x33
0x058f…05dd at0034 = ╱ee╱)╱ // 0x5c3 @0x34
0x058f…05dd at0035 = ╱ec╱,╱ // 0x5c4 @0x35
0x058f…05dd at0036 = ╱54╱T╱ // 0x5c5 @0x36
0x058f…05dd at0037 = ╱ed╱(╱ // 0x5c6 @0x37
0x058f…05dd at0038 = ╱34╱4╱ // 0x5c7 @0x38
0x058f…05dd at0039 = ╱fe00008003╱ // 0x5c8 @0x39
0x058f…05dd at003e = ╱ec╱,╱ // 0x5cd @0x3e
0x058f…05dd at003f = ╱45╱E╱ // 0x5ce @0x3f
0x058f…05dd at0040 = ╱ee╱)╱ // 0x5cf @0x40
0x058f…05dd at0041 = ╱ec╱,╱ // 0x5d0 @0x41
0x058f…05dd at0042 = ╱54╱T╱ // 0x5d1 @0x42
0x058f…05dd at0043 = ╱ed╱(╱ // 0x5d2 @0x43
0x058f…05dd at0044 = ╱34╱4╱ // 0x5d3 @0x44
0x058f…05dd at0045 = ╱fe00008003╱ // 0x5d4 @0x45
0x058f…05dd at004a = ╱ec╱,╱ // 0x5d9 @0x4a
0x058f…05dd at004b = ╱47╱G╱ // 0x5da @0x4b
0x058f…05dd at004c = ╱ee╱)╱ // 0x5db @0x4c
0x058f…05dd at004d = EOL // 0x5dc @0x4d
0x058f…05dd }
0x05dd…05f6 934d 0520 EXEC FEJL(16,E,V3$)
0x05dd…05f6 LineComalBin {
0x05dd…05f6 ptr = 0x934d // 0x5dd @0x0
0x05dd…05f6 lno = 0x0208 // 0x5df @0x2
0x05dd…05f6 at0004 = ╱9d╱ EXEC ╱ // 0x5e1 @0x4
0x05dd…05f6 at0005 = ╱46╱F╱ // 0x5e2 @0x5
0x05dd…05f6 at0006 = ╱45╱E╱ // 0x5e3 @0x6
0x05dd…05f6 at0007 = ╱4a╱J╱ // 0x5e4 @0x7
0x05dd…05f6 at0008 = ╱4c╱L╱ // 0x5e5 @0x8
0x05dd…05f6 at0009 = ╱ed╱(╱ // 0x5e6 @0x9
0x05dd…05f6 at000a = ╱31╱1╱ // 0x5e7 @0xa
0x05dd…05f6 at000b = ╱36╱6╱ // 0x5e8 @0xb
0x05dd…05f6 at000c = ╱fe00008005╱ // 0x5e9 @0xc
0x05dd…05f6 at0011 = ╱ec╱,╱ // 0x5ee @0x11
0x05dd…05f6 at0012 = ╱45╱E╱ // 0x5ef @0x12
0x05dd…05f6 at0013 = ╱ec╱,╱ // 0x5f0 @0x13
0x05dd…05f6 at0014 = ╱56╱V╱ // 0x5f1 @0x14
0x05dd…05f6 at0015 = ╱33╱3╱ // 0x5f2 @0x15
0x05dd…05f6 at0016 = ╱ef╱$╱ // 0x5f3 @0x16
0x05dd…05f6 at0017 = ╱ee╱)╱ // 0x5f4 @0x17
0x05dd…05f6 at0018 = EOL // 0x5f5 @0x18
0x05dd…05f6 }
0x05f6…0602 9359 0530 ENDPROC ;UNDUD
0x05f6…0602 LineComalBin {
0x05f6…0602 ptr = 0x9359 // 0x5f6 @0x0
0x05f6…0602 lno = 0x0212 // 0x5f8 @0x2
0x05f6…0602 at0004 = ╱9f╱ ENDPROC ╱ // 0x5fa @0x4
0x05f6…0602 at0005 = ╱eb╱;╱ // 0x5fb @0x5
0x05f6…0602 at0006 = ╱55╱U╱ // 0x5fc @0x6
0x05f6…0602 at0007 = ╱4e╱N╱ // 0x5fd @0x7
0x05f6…0602 at0008 = ╱44╱D╱ // 0x5fe @0x8
0x05f6…0602 at0009 = ╱55╱U╱ // 0x5ff @0x9
0x05f6…0602 at000a = ╱44╱D╱ // 0x600 @0xa
0x05f6…0602 at000b = EOL // 0x601 @0xb
0x05f6…0602 }
0x0602…061f 9376 0540 PROC HOVUD(V4,MPOSTANTAL4,S)
0x0602…061f LineComalBin {
0x0602…061f ptr = 0x9376 // 0x602 @0x0
0x0602…061f lno = 0x021c // 0x604 @0x2
0x0602…061f at0004 = ╱9e╱ PROC ╱ // 0x606 @0x4
0x0602…061f at0005 = ╱48╱H╱ // 0x607 @0x5
0x0602…061f at0006 = ╱4f╱O╱ // 0x608 @0x6
0x0602…061f at0007 = ╱56╱V╱ // 0x609 @0x7
0x0602…061f at0008 = ╱55╱U╱ // 0x60a @0x8
0x0602…061f at0009 = ╱44╱D╱ // 0x60b @0x9
0x0602…061f at000a = ╱ed╱(╱ // 0x60c @0xa
0x0602…061f at000b = ╱56╱V╱ // 0x60d @0xb
0x0602…061f at000c = ╱34╱4╱ // 0x60e @0xc
0x0602…061f at000d = ╱ec╱,╱ // 0x60f @0xd
0x0602…061f at000e = ╱4d╱M╱ // 0x610 @0xe
0x0602…061f at000f = ╱50╱P╱ // 0x611 @0xf
0x0602…061f at0010 = ╱4f╱O╱ // 0x612 @0x10
0x0602…061f at0011 = ╱53╱S╱ // 0x613 @0x11
0x0602…061f at0012 = ╱54╱T╱ // 0x614 @0x12
0x0602…061f at0013 = ╱41╱A╱ // 0x615 @0x13
0x0602…061f at0014 = ╱4e╱N╱ // 0x616 @0x14
0x0602…061f at0015 = ╱54╱T╱ // 0x617 @0x15
0x0602…061f at0016 = ╱41╱A╱ // 0x618 @0x16
0x0602…061f at0017 = ╱4c╱L╱ // 0x619 @0x17
0x0602…061f at0018 = ╱34╱4╱ // 0x61a @0x18
0x0602…061f at0019 = ╱ec╱,╱ // 0x61b @0x19
0x0602…061f at001a = ╱53╱S╱ // 0x61c @0x1a
0x0602…061f at001b = ╱ee╱)╱ // 0x61d @0x1b
0x0602…061f at001c = EOL // 0x61e @0x1c
0x0602…061f }
0x061f…063d 9394 0550 FOR I=E TO MPOSTANTAL4 DIV 160
0x061f…063d LineComalBin {
0x061f…063d ptr = 0x9394 // 0x61f @0x0
0x061f…063d lno = 0x0226 // 0x621 @0x2
0x061f…063d at0004 = ╱83╱ FOR ╱ // 0x623 @0x4
0x061f…063d at0005 = ╱49╱I╱ // 0x624 @0x5
0x061f…063d at0006 = ╱dc╱=╱ // 0x625 @0x6
0x061f…063d at0007 = ╱45╱E╱ // 0x626 @0x7
0x061f…063d at0008 = ╱b7╱ TO ╱ // 0x627 @0x8
0x061f…063d at0009 = ╱4d╱M╱ // 0x628 @0x9
0x061f…063d at000a = ╱50╱P╱ // 0x629 @0xa
0x061f…063d at000b = ╱4f╱O╱ // 0x62a @0xb
0x061f…063d at000c = ╱53╱S╱ // 0x62b @0xc
0x061f…063d at000d = ╱54╱T╱ // 0x62c @0xd
0x061f…063d at000e = ╱41╱A╱ // 0x62d @0xe
0x061f…063d at000f = ╱4e╱N╱ // 0x62e @0xf
0x061f…063d at0010 = ╱54╱T╱ // 0x62f @0x10
0x061f…063d at0011 = ╱41╱A╱ // 0x630 @0x11
0x061f…063d at0012 = ╱4c╱L╱ // 0x631 @0x12
0x061f…063d at0013 = ╱34╱4╱ // 0x632 @0x13
0x061f…063d at0014 = ╱e7╱ DIV ╱ // 0x633 @0x14
0x061f…063d at0015 = ╱31╱1╱ // 0x634 @0x15
0x061f…063d at0016 = ╱36╱6╱ // 0x635 @0x16
0x061f…063d at0017 = ╱30╱0╱ // 0x636 @0x17
0x061f…063d at0018 = ╱fe0000a008╱ // 0x637 @0x18
0x061f…063d at001d = EOL // 0x63c @0x1d
0x061f…063d }
0x063d…0667 93be 0560 J=(I-E)*4+E;J1=J+E;J2=J+G;J3=J+V
0x063d…0667 LineComalBin {
0x063d…0667 ptr = 0x93be // 0x63d @0x0
0x063d…0667 lno = 0x0230 // 0x63f @0x2
0x063d…0667 at0004 = ╱4a╱J╱ // 0x641 @0x4
0x063d…0667 at0005 = ╱dc╱=╱ // 0x642 @0x5
0x063d…0667 at0006 = ╱ed╱(╱ // 0x643 @0x6
0x063d…0667 at0007 = ╱49╱I╱ // 0x644 @0x7
0x063d…0667 at0008 = ╱e3╱-╱ // 0x645 @0x8
0x063d…0667 at0009 = ╱45╱E╱ // 0x646 @0x9
0x063d…0667 at000a = ╱ee╱)╱ // 0x647 @0xa
0x063d…0667 at000b = ╱e4╱*╱ // 0x648 @0xb
0x063d…0667 at000c = ╱34╱4╱ // 0x649 @0xc
0x063d…0667 at000d = ╱fe00008003╱ // 0x64a @0xd
0x063d…0667 at0012 = ╱e2╱+╱ // 0x64f @0x12
0x063d…0667 at0013 = ╱45╱E╱ // 0x650 @0x13
0x063d…0667 at0014 = ╱eb╱;╱ // 0x651 @0x14
0x063d…0667 at0015 = ╱4a╱J╱ // 0x652 @0x15
0x063d…0667 at0016 = ╱31╱1╱ // 0x653 @0x16
0x063d…0667 at0017 = ╱dc╱=╱ // 0x654 @0x17
0x063d…0667 at0018 = ╱4a╱J╱ // 0x655 @0x18
0x063d…0667 at0019 = ╱e2╱+╱ // 0x656 @0x19
0x063d…0667 at001a = ╱45╱E╱ // 0x657 @0x1a
0x063d…0667 at001b = ╱eb╱;╱ // 0x658 @0x1b
0x063d…0667 at001c = ╱4a╱J╱ // 0x659 @0x1c
0x063d…0667 at001d = ╱32╱2╱ // 0x65a @0x1d
0x063d…0667 at001e = ╱dc╱=╱ // 0x65b @0x1e
0x063d…0667 at001f = ╱4a╱J╱ // 0x65c @0x1f
0x063d…0667 at0020 = ╱e2╱+╱ // 0x65d @0x20
0x063d…0667 at0021 = ╱47╱G╱ // 0x65e @0x21
0x063d…0667 at0022 = ╱eb╱;╱ // 0x65f @0x22
0x063d…0667 at0023 = ╱4a╱J╱ // 0x660 @0x23
0x063d…0667 at0024 = ╱33╱3╱ // 0x661 @0x24
0x063d…0667 at0025 = ╱dc╱=╱ // 0x662 @0x25
0x063d…0667 at0026 = ╱4a╱J╱ // 0x663 @0x26
0x063d…0667 at0027 = ╱e2╱+╱ // 0x664 @0x27
0x063d…0667 at0028 = ╱56╱V╱ // 0x665 @0x28
0x063d…0667 at0029 = EOL // 0x666 @0x29
0x063d…0667 }
0x0667…06b0 9407 0570 PUT V4$,I:S(J,E),S(J,G),S(J1,E),S(J1,G),S(J2,E),S(J2,G),S(J3,E),S(J3,G)
0x0667…06b0 LineComalBin {
0x0667…06b0 ptr = 0x9407 // 0x667 @0x0
0x0667…06b0 lno = 0x023a // 0x669 @0x2
0x0667…06b0 at0004 = ╱aa╱ PUT ╱ // 0x66b @0x4
0x0667…06b0 at0005 = ╱56╱V╱ // 0x66c @0x5
0x0667…06b0 at0006 = ╱34╱4╱ // 0x66d @0x6
0x0667…06b0 at0007 = ╱ef╱$╱ // 0x66e @0x7
0x0667…06b0 at0008 = ╱ec╱,╱ // 0x66f @0x8
0x0667…06b0 at0009 = ╱49╱I╱ // 0x670 @0x9
0x0667…06b0 at000a = ╱f0╱:╱ // 0x671 @0xa
0x0667…06b0 at000b = ╱53╱S╱ // 0x672 @0xb
0x0667…06b0 at000c = ╱ed╱(╱ // 0x673 @0xc
0x0667…06b0 at000d = ╱4a╱J╱ // 0x674 @0xd
0x0667…06b0 at000e = ╱ec╱,╱ // 0x675 @0xe
0x0667…06b0 at000f = ╱45╱E╱ // 0x676 @0xf
0x0667…06b0 at0010 = ╱ee╱)╱ // 0x677 @0x10
0x0667…06b0 at0011 = ╱ec╱,╱ // 0x678 @0x11
0x0667…06b0 at0012 = ╱53╱S╱ // 0x679 @0x12
0x0667…06b0 at0013 = ╱ed╱(╱ // 0x67a @0x13
0x0667…06b0 at0014 = ╱4a╱J╱ // 0x67b @0x14
0x0667…06b0 at0015 = ╱ec╱,╱ // 0x67c @0x15
0x0667…06b0 at0016 = ╱47╱G╱ // 0x67d @0x16
0x0667…06b0 at0017 = ╱ee╱)╱ // 0x67e @0x17
0x0667…06b0 at0018 = ╱ec╱,╱ // 0x67f @0x18
0x0667…06b0 at0019 = ╱53╱S╱ // 0x680 @0x19
0x0667…06b0 at001a = ╱ed╱(╱ // 0x681 @0x1a
0x0667…06b0 at001b = ╱4a╱J╱ // 0x682 @0x1b
0x0667…06b0 at001c = ╱31╱1╱ // 0x683 @0x1c
0x0667…06b0 at001d = ╱ec╱,╱ // 0x684 @0x1d
0x0667…06b0 at001e = ╱45╱E╱ // 0x685 @0x1e
0x0667…06b0 at001f = ╱ee╱)╱ // 0x686 @0x1f
0x0667…06b0 at0020 = ╱ec╱,╱ // 0x687 @0x20
0x0667…06b0 at0021 = ╱53╱S╱ // 0x688 @0x21
0x0667…06b0 at0022 = ╱ed╱(╱ // 0x689 @0x22
0x0667…06b0 at0023 = ╱4a╱J╱ // 0x68a @0x23
0x0667…06b0 at0024 = ╱31╱1╱ // 0x68b @0x24
0x0667…06b0 at0025 = ╱ec╱,╱ // 0x68c @0x25
0x0667…06b0 at0026 = ╱47╱G╱ // 0x68d @0x26
0x0667…06b0 at0027 = ╱ee╱)╱ // 0x68e @0x27
0x0667…06b0 at0028 = ╱ec╱,╱ // 0x68f @0x28
0x0667…06b0 at0029 = ╱53╱S╱ // 0x690 @0x29
0x0667…06b0 at002a = ╱ed╱(╱ // 0x691 @0x2a
0x0667…06b0 at002b = ╱4a╱J╱ // 0x692 @0x2b
0x0667…06b0 at002c = ╱32╱2╱ // 0x693 @0x2c
0x0667…06b0 at002d = ╱ec╱,╱ // 0x694 @0x2d
0x0667…06b0 at002e = ╱45╱E╱ // 0x695 @0x2e
0x0667…06b0 at002f = ╱ee╱)╱ // 0x696 @0x2f
0x0667…06b0 at0030 = ╱ec╱,╱ // 0x697 @0x30
0x0667…06b0 at0031 = ╱53╱S╱ // 0x698 @0x31
0x0667…06b0 at0032 = ╱ed╱(╱ // 0x699 @0x32
0x0667…06b0 at0033 = ╱4a╱J╱ // 0x69a @0x33
0x0667…06b0 at0034 = ╱32╱2╱ // 0x69b @0x34
0x0667…06b0 at0035 = ╱ec╱,╱ // 0x69c @0x35
0x0667…06b0 at0036 = ╱47╱G╱ // 0x69d @0x36
0x0667…06b0 at0037 = ╱ee╱)╱ // 0x69e @0x37
0x0667…06b0 at0038 = ╱ec╱,╱ // 0x69f @0x38
0x0667…06b0 at0039 = ╱53╱S╱ // 0x6a0 @0x39
0x0667…06b0 at003a = ╱ed╱(╱ // 0x6a1 @0x3a
0x0667…06b0 at003b = ╱4a╱J╱ // 0x6a2 @0x3b
0x0667…06b0 at003c = ╱33╱3╱ // 0x6a3 @0x3c
0x0667…06b0 at003d = ╱ec╱,╱ // 0x6a4 @0x3d
0x0667…06b0 at003e = ╱45╱E╱ // 0x6a5 @0x3e
0x0667…06b0 at003f = ╱ee╱)╱ // 0x6a6 @0x3f
0x0667…06b0 at0040 = ╱ec╱,╱ // 0x6a7 @0x40
0x0667…06b0 at0041 = ╱53╱S╱ // 0x6a8 @0x41
0x0667…06b0 at0042 = ╱ed╱(╱ // 0x6a9 @0x42
0x0667…06b0 at0043 = ╱4a╱J╱ // 0x6aa @0x43
0x0667…06b0 at0044 = ╱33╱3╱ // 0x6ab @0x44
0x0667…06b0 at0045 = ╱ec╱,╱ // 0x6ac @0x45
0x0667…06b0 at0046 = ╱47╱G╱ // 0x6ad @0x46
0x0667…06b0 at0047 = ╱ee╱)╱ // 0x6ae @0x47
0x0667…06b0 at0048 = EOL // 0x6af @0x48
0x0667…06b0 }
0x06b0…06c9 9420 0580 EXEC FEJL(17,G,V4$)
0x06b0…06c9 LineComalBin {
0x06b0…06c9 ptr = 0x9420 // 0x6b0 @0x0
0x06b0…06c9 lno = 0x0244 // 0x6b2 @0x2
0x06b0…06c9 at0004 = ╱9d╱ EXEC ╱ // 0x6b4 @0x4
0x06b0…06c9 at0005 = ╱46╱F╱ // 0x6b5 @0x5
0x06b0…06c9 at0006 = ╱45╱E╱ // 0x6b6 @0x6
0x06b0…06c9 at0007 = ╱4a╱J╱ // 0x6b7 @0x7
0x06b0…06c9 at0008 = ╱4c╱L╱ // 0x6b8 @0x8
0x06b0…06c9 at0009 = ╱ed╱(╱ // 0x6b9 @0x9
0x06b0…06c9 at000a = ╱31╱1╱ // 0x6ba @0xa
0x06b0…06c9 at000b = ╱37╱7╱ // 0x6bb @0xb
0x06b0…06c9 at000c = ╱fe00008805╱ // 0x6bc @0xc
0x06b0…06c9 at0011 = ╱ec╱,╱ // 0x6c1 @0x11
0x06b0…06c9 at0012 = ╱47╱G╱ // 0x6c2 @0x12
0x06b0…06c9 at0013 = ╱ec╱,╱ // 0x6c3 @0x13
0x06b0…06c9 at0014 = ╱56╱V╱ // 0x6c4 @0x14
0x06b0…06c9 at0015 = ╱34╱4╱ // 0x6c5 @0x15
0x06b0…06c9 at0016 = ╱ef╱$╱ // 0x6c6 @0x16
0x06b0…06c9 at0017 = ╱ee╱)╱ // 0x6c7 @0x17
0x06b0…06c9 at0018 = EOL // 0x6c8 @0x18
0x06b0…06c9 }
0x06c9…06d0 9427 0590 NEXT I
0x06c9…06d0 LineComalBin {
0x06c9…06d0 ptr = 0x9427 // 0x6c9 @0x0
0x06c9…06d0 lno = 0x024e // 0x6cb @0x2
0x06c9…06d0 at0004 = ╱84╱ NEXT ╱ // 0x6cd @0x4
0x06c9…06d0 at0005 = ╱49╱I╱ // 0x6ce @0x5
0x06c9…06d0 at0006 = EOL // 0x6cf @0x6
0x06c9…06d0 }
0x06d0…06d6 942d 0600 ENDPROC
0x06d0…06d6 LineComalBin {
0x06d0…06d6 ptr = 0x942d // 0x6d0 @0x0
0x06d0…06d6 lno = 0x0258 // 0x6d2 @0x2
0x06d0…06d6 at0004 = ╱9f╱ ENDPROC ╱ // 0x6d4 @0x4
0x06d0…06d6 at0005 = EOL // 0x6d5 @0x5
0x06d0…06d6 }
0x06d6…06e4 943b 0610 PROC HENTPOST
0x06d6…06e4 LineComalBin {
0x06d6…06e4 ptr = 0x943b // 0x6d6 @0x0
0x06d6…06e4 lno = 0x0262 // 0x6d8 @0x2
0x06d6…06e4 at0004 = ╱9e╱ PROC ╱ // 0x6da @0x4
0x06d6…06e4 at0005 = ╱48╱H╱ // 0x6db @0x5
0x06d6…06e4 at0006 = ╱45╱E╱ // 0x6dc @0x6
0x06d6…06e4 at0007 = ╱4e╱N╱ // 0x6dd @0x7
0x06d6…06e4 at0008 = ╱54╱T╱ // 0x6de @0x8
0x06d6…06e4 at0009 = ╱50╱P╱ // 0x6df @0x9
0x06d6…06e4 at000a = ╱4f╱O╱ // 0x6e0 @0xa
0x06d6…06e4 at000b = ╱53╱S╱ // 0x6e1 @0xb
0x06d6…06e4 at000c = ╱54╱T╱ // 0x6e2 @0xc
0x06d6…06e4 at000d = EOL // 0x6e3 @0xd
0x06d6…06e4 }
0x06e4…06f9 9450 0620 S1=FTAB(FPIL3,G)
0x06e4…06f9 LineComalBin {
0x06e4…06f9 ptr = 0x9450 // 0x6e4 @0x0
0x06e4…06f9 lno = 0x026c // 0x6e6 @0x2
0x06e4…06f9 at0004 = ╱53╱S╱ // 0x6e8 @0x4
0x06e4…06f9 at0005 = ╱31╱1╱ // 0x6e9 @0x5
0x06e4…06f9 at0006 = ╱dc╱=╱ // 0x6ea @0x6
0x06e4…06f9 at0007 = ╱46╱F╱ // 0x6eb @0x7
0x06e4…06f9 at0008 = ╱54╱T╱ // 0x6ec @0x8
0x06e4…06f9 at0009 = ╱41╱A╱ // 0x6ed @0x9
0x06e4…06f9 at000a = ╱42╱B╱ // 0x6ee @0xa
0x06e4…06f9 at000b = ╱ed╱(╱ // 0x6ef @0xb
0x06e4…06f9 at000c = ╱46╱F╱ // 0x6f0 @0xc
0x06e4…06f9 at000d = ╱50╱P╱ // 0x6f1 @0xd
0x06e4…06f9 at000e = ╱49╱I╱ // 0x6f2 @0xe
0x06e4…06f9 at000f = ╱4c╱L╱ // 0x6f3 @0xf
0x06e4…06f9 at0010 = ╱33╱3╱ // 0x6f4 @0x10
0x06e4…06f9 at0011 = ╱ec╱,╱ // 0x6f5 @0x11
0x06e4…06f9 at0012 = ╱47╱G╱ // 0x6f6 @0x12
0x06e4…06f9 at0013 = ╱ee╱)╱ // 0x6f7 @0x13
0x06e4…06f9 at0014 = EOL // 0x6f8 @0x14
0x06e4…06f9 }
0x06f9…0710 9467 0630 GET K3$,S1:FNR,FNAVN$
0x06f9…0710 LineComalBin {
0x06f9…0710 ptr = 0x9467 // 0x6f9 @0x0
0x06f9…0710 lno = 0x0276 // 0x6fb @0x2
0x06f9…0710 at0004 = ╱a9╱ GET ╱ // 0x6fd @0x4
0x06f9…0710 at0005 = ╱4b╱K╱ // 0x6fe @0x5
0x06f9…0710 at0006 = ╱33╱3╱ // 0x6ff @0x6
0x06f9…0710 at0007 = ╱ef╱$╱ // 0x700 @0x7
0x06f9…0710 at0008 = ╱ec╱,╱ // 0x701 @0x8
0x06f9…0710 at0009 = ╱53╱S╱ // 0x702 @0x9
0x06f9…0710 at000a = ╱31╱1╱ // 0x703 @0xa
0x06f9…0710 at000b = ╱f0╱:╱ // 0x704 @0xb
0x06f9…0710 at000c = ╱46╱F╱ // 0x705 @0xc
0x06f9…0710 at000d = ╱4e╱N╱ // 0x706 @0xd
0x06f9…0710 at000e = ╱52╱R╱ // 0x707 @0xe
0x06f9…0710 at000f = ╱ec╱,╱ // 0x708 @0xf
0x06f9…0710 at0010 = ╱46╱F╱ // 0x709 @0x10
0x06f9…0710 at0011 = ╱4e╱N╱ // 0x70a @0x11
0x06f9…0710 at0012 = ╱41╱A╱ // 0x70b @0x12
0x06f9…0710 at0013 = ╱56╱V╱ // 0x70c @0x13
0x06f9…0710 at0014 = ╱4e╱N╱ // 0x70d @0x14
0x06f9…0710 at0015 = ╱ef╱$╱ // 0x70e @0x15
0x06f9…0710 at0016 = EOL // 0x70f @0x16
0x06f9…0710 }
0x0710…0723 947a 0640 EXEC FEJL(G,G,K3$)
0x0710…0723 LineComalBin {
0x0710…0723 ptr = 0x947a // 0x710 @0x0
0x0710…0723 lno = 0x0280 // 0x712 @0x2
0x0710…0723 at0004 = ╱9d╱ EXEC ╱ // 0x714 @0x4
0x0710…0723 at0005 = ╱46╱F╱ // 0x715 @0x5
0x0710…0723 at0006 = ╱45╱E╱ // 0x716 @0x6
0x0710…0723 at0007 = ╱4a╱J╱ // 0x717 @0x7
0x0710…0723 at0008 = ╱4c╱L╱ // 0x718 @0x8
0x0710…0723 at0009 = ╱ed╱(╱ // 0x719 @0x9
0x0710…0723 at000a = ╱47╱G╱ // 0x71a @0xa
0x0710…0723 at000b = ╱ec╱,╱ // 0x71b @0xb
0x0710…0723 at000c = ╱47╱G╱ // 0x71c @0xc
0x0710…0723 at000d = ╱ec╱,╱ // 0x71d @0xd
0x0710…0723 at000e = ╱4b╱K╱ // 0x71e @0xe
0x0710…0723 at000f = ╱33╱3╱ // 0x71f @0xf
0x0710…0723 at0010 = ╱ef╱$╱ // 0x720 @0x10
0x0710…0723 at0011 = ╱ee╱)╱ // 0x721 @0x11
0x0710…0723 at0012 = EOL // 0x722 @0x12
0x0710…0723 }
0x0723…074c 94a3 0650 GET K3$,S1+E:FMKODE$,FMDEBET$,FMKREDIT$
0x0723…074c LineComalBin {
0x0723…074c ptr = 0x94a3 // 0x723 @0x0
0x0723…074c lno = 0x028a // 0x725 @0x2
0x0723…074c at0004 = ╱a9╱ GET ╱ // 0x727 @0x4
0x0723…074c at0005 = ╱4b╱K╱ // 0x728 @0x5
0x0723…074c at0006 = ╱33╱3╱ // 0x729 @0x6
0x0723…074c at0007 = ╱ef╱$╱ // 0x72a @0x7
0x0723…074c at0008 = ╱ec╱,╱ // 0x72b @0x8
0x0723…074c at0009 = ╱53╱S╱ // 0x72c @0x9
0x0723…074c at000a = ╱31╱1╱ // 0x72d @0xa
0x0723…074c at000b = ╱e2╱+╱ // 0x72e @0xb
0x0723…074c at000c = ╱45╱E╱ // 0x72f @0xc
0x0723…074c at000d = ╱f0╱:╱ // 0x730 @0xd
0x0723…074c at000e = ╱46╱F╱ // 0x731 @0xe
0x0723…074c at000f = ╱4d╱M╱ // 0x732 @0xf
0x0723…074c at0010 = ╱4b╱K╱ // 0x733 @0x10
0x0723…074c at0011 = ╱4f╱O╱ // 0x734 @0x11
0x0723…074c at0012 = ╱44╱D╱ // 0x735 @0x12
0x0723…074c at0013 = ╱45╱E╱ // 0x736 @0x13
0x0723…074c at0014 = ╱ef╱$╱ // 0x737 @0x14
0x0723…074c at0015 = ╱ec╱,╱ // 0x738 @0x15
0x0723…074c at0016 = ╱46╱F╱ // 0x739 @0x16
0x0723…074c at0017 = ╱4d╱M╱ // 0x73a @0x17
0x0723…074c at0018 = ╱44╱D╱ // 0x73b @0x18
0x0723…074c at0019 = ╱45╱E╱ // 0x73c @0x19
0x0723…074c at001a = ╱42╱B╱ // 0x73d @0x1a
0x0723…074c at001b = ╱45╱E╱ // 0x73e @0x1b
0x0723…074c at001c = ╱54╱T╱ // 0x73f @0x1c
0x0723…074c at001d = ╱ef╱$╱ // 0x740 @0x1d
0x0723…074c at001e = ╱ec╱,╱ // 0x741 @0x1e
0x0723…074c at001f = ╱46╱F╱ // 0x742 @0x1f
0x0723…074c at0020 = ╱4d╱M╱ // 0x743 @0x20
0x0723…074c at0021 = ╱4b╱K╱ // 0x744 @0x21
0x0723…074c at0022 = ╱52╱R╱ // 0x745 @0x22
0x0723…074c at0023 = ╱45╱E╱ // 0x746 @0x23
0x0723…074c at0024 = ╱44╱D╱ // 0x747 @0x24
0x0723…074c at0025 = ╱49╱I╱ // 0x748 @0x25
0x0723…074c at0026 = ╱54╱T╱ // 0x749 @0x26
0x0723…074c at0027 = ╱ef╱$╱ // 0x74a @0x27
0x0723…074c at0028 = EOL // 0x74b @0x28
0x0723…074c }
0x074c…075f 94b6 0660 EXEC FEJL(G,V,K3$)
0x074c…075f LineComalBin {
0x074c…075f ptr = 0x94b6 // 0x74c @0x0
0x074c…075f lno = 0x0294 // 0x74e @0x2
0x074c…075f at0004 = ╱9d╱ EXEC ╱ // 0x750 @0x4
0x074c…075f at0005 = ╱46╱F╱ // 0x751 @0x5
0x074c…075f at0006 = ╱45╱E╱ // 0x752 @0x6
0x074c…075f at0007 = ╱4a╱J╱ // 0x753 @0x7
0x074c…075f at0008 = ╱4c╱L╱ // 0x754 @0x8
0x074c…075f at0009 = ╱ed╱(╱ // 0x755 @0x9
0x074c…075f at000a = ╱47╱G╱ // 0x756 @0xa
0x074c…075f at000b = ╱ec╱,╱ // 0x757 @0xb
0x074c…075f at000c = ╱56╱V╱ // 0x758 @0xc
0x074c…075f at000d = ╱ec╱,╱ // 0x759 @0xd
0x074c…075f at000e = ╱4b╱K╱ // 0x75a @0xe
0x074c…075f at000f = ╱33╱3╱ // 0x75b @0xf
0x074c…075f at0010 = ╱ef╱$╱ // 0x75c @0x10
0x074c…075f at0011 = ╱ee╱)╱ // 0x75d @0x11
0x074c…075f at0012 = EOL // 0x75e @0x12
0x074c…075f }
0x075f…0788 94df 0670 GET K3$,S1+G:FUKODE$,FÅDEBET$,FÅKREDIT$
0x075f…0788 LineComalBin {
0x075f…0788 ptr = 0x94df // 0x75f @0x0
0x075f…0788 lno = 0x029e // 0x761 @0x2
0x075f…0788 at0004 = ╱a9╱ GET ╱ // 0x763 @0x4
0x075f…0788 at0005 = ╱4b╱K╱ // 0x764 @0x5
0x075f…0788 at0006 = ╱33╱3╱ // 0x765 @0x6
0x075f…0788 at0007 = ╱ef╱$╱ // 0x766 @0x7
0x075f…0788 at0008 = ╱ec╱,╱ // 0x767 @0x8
0x075f…0788 at0009 = ╱53╱S╱ // 0x768 @0x9
0x075f…0788 at000a = ╱31╱1╱ // 0x769 @0xa
0x075f…0788 at000b = ╱e2╱+╱ // 0x76a @0xb
0x075f…0788 at000c = ╱47╱G╱ // 0x76b @0xc
0x075f…0788 at000d = ╱f0╱:╱ // 0x76c @0xd
0x075f…0788 at000e = ╱46╱F╱ // 0x76d @0xe
0x075f…0788 at000f = ╱55╱U╱ // 0x76e @0xf
0x075f…0788 at0010 = ╱4b╱K╱ // 0x76f @0x10
0x075f…0788 at0011 = ╱4f╱O╱ // 0x770 @0x11
0x075f…0788 at0012 = ╱44╱D╱ // 0x771 @0x12
0x075f…0788 at0013 = ╱45╱E╱ // 0x772 @0x13
0x075f…0788 at0014 = ╱ef╱$╱ // 0x773 @0x14
0x075f…0788 at0015 = ╱ec╱,╱ // 0x774 @0x15
0x075f…0788 at0016 = ╱46╱F╱ // 0x775 @0x16
0x075f…0788 at0017 = ╱5d╱Å╱ // 0x776 @0x17
0x075f…0788 at0018 = ╱44╱D╱ // 0x777 @0x18
0x075f…0788 at0019 = ╱45╱E╱ // 0x778 @0x19
0x075f…0788 at001a = ╱42╱B╱ // 0x779 @0x1a
0x075f…0788 at001b = ╱45╱E╱ // 0x77a @0x1b
0x075f…0788 at001c = ╱54╱T╱ // 0x77b @0x1c
0x075f…0788 at001d = ╱ef╱$╱ // 0x77c @0x1d
0x075f…0788 at001e = ╱ec╱,╱ // 0x77d @0x1e
0x075f…0788 at001f = ╱46╱F╱ // 0x77e @0x1f
0x075f…0788 at0020 = ╱5d╱Å╱ // 0x77f @0x20
0x075f…0788 at0021 = ╱4b╱K╱ // 0x780 @0x21
0x075f…0788 at0022 = ╱52╱R╱ // 0x781 @0x22
0x075f…0788 at0023 = ╱45╱E╱ // 0x782 @0x23
0x075f…0788 at0024 = ╱44╱D╱ // 0x783 @0x24
0x075f…0788 at0025 = ╱49╱I╱ // 0x784 @0x25
0x075f…0788 at0026 = ╱54╱T╱ // 0x785 @0x26
0x075f…0788 at0027 = ╱ef╱$╱ // 0x786 @0x27
0x075f…0788 at0028 = EOL // 0x787 @0x28
0x075f…0788 }
0x0788…07a0 94f7 0680 EXEC FEJL(G,4,K3$)
0x0788…07a0 LineComalBin {
0x0788…07a0 ptr = 0x94f7 // 0x788 @0x0
0x0788…07a0 lno = 0x02a8 // 0x78a @0x2
0x0788…07a0 at0004 = ╱9d╱ EXEC ╱ // 0x78c @0x4
0x0788…07a0 at0005 = ╱46╱F╱ // 0x78d @0x5
0x0788…07a0 at0006 = ╱45╱E╱ // 0x78e @0x6
0x0788…07a0 at0007 = ╱4a╱J╱ // 0x78f @0x7
0x0788…07a0 at0008 = ╱4c╱L╱ // 0x790 @0x8
0x0788…07a0 at0009 = ╱ed╱(╱ // 0x791 @0x9
0x0788…07a0 at000a = ╱47╱G╱ // 0x792 @0xa
0x0788…07a0 at000b = ╱ec╱,╱ // 0x793 @0xb
0x0788…07a0 at000c = ╱34╱4╱ // 0x794 @0xc
0x0788…07a0 at000d = ╱fe00008003╱ // 0x795 @0xd
0x0788…07a0 at0012 = ╱ec╱,╱ // 0x79a @0x12
0x0788…07a0 at0013 = ╱4b╱K╱ // 0x79b @0x13
0x0788…07a0 at0014 = ╱33╱3╱ // 0x79c @0x14
0x0788…07a0 at0015 = ╱ef╱$╱ // 0x79d @0x15
0x0788…07a0 at0016 = ╱ee╱)╱ // 0x79e @0x16
0x0788…07a0 at0017 = EOL // 0x79f @0x17
0x0788…07a0 }
0x07a0…07a6 94fd 0690 ENDPROC
0x07a0…07a6 LineComalBin {
0x07a0…07a6 ptr = 0x94fd // 0x7a0 @0x0
0x07a0…07a6 lno = 0x02b2 // 0x7a2 @0x2
0x07a0…07a6 at0004 = ╱9f╱ ENDPROC ╱ // 0x7a4 @0x4
0x07a0…07a6 at0005 = EOL // 0x7a5 @0x5
0x07a0…07a6 }
0x07a6…07d1 9528 0700 PROC FINDPOST1(TAB4,Q,MANT2,NØGL5,PIL6,L8)
0x07a6…07d1 LineComalBin {
0x07a6…07d1 ptr = 0x9528 // 0x7a6 @0x0
0x07a6…07d1 lno = 0x02bc // 0x7a8 @0x2
0x07a6…07d1 at0004 = ╱9e╱ PROC ╱ // 0x7aa @0x4
0x07a6…07d1 at0005 = ╱46╱F╱ // 0x7ab @0x5
0x07a6…07d1 at0006 = ╱49╱I╱ // 0x7ac @0x6
0x07a6…07d1 at0007 = ╱4e╱N╱ // 0x7ad @0x7
0x07a6…07d1 at0008 = ╱44╱D╱ // 0x7ae @0x8
0x07a6…07d1 at0009 = ╱50╱P╱ // 0x7af @0x9
0x07a6…07d1 at000a = ╱4f╱O╱ // 0x7b0 @0xa
0x07a6…07d1 at000b = ╱53╱S╱ // 0x7b1 @0xb
0x07a6…07d1 at000c = ╱54╱T╱ // 0x7b2 @0xc
0x07a6…07d1 at000d = ╱31╱1╱ // 0x7b3 @0xd
0x07a6…07d1 at000e = ╱ed╱(╱ // 0x7b4 @0xe
0x07a6…07d1 at000f = ╱54╱T╱ // 0x7b5 @0xf
0x07a6…07d1 at0010 = ╱41╱A╱ // 0x7b6 @0x10
0x07a6…07d1 at0011 = ╱42╱B╱ // 0x7b7 @0x11
0x07a6…07d1 at0012 = ╱34╱4╱ // 0x7b8 @0x12
0x07a6…07d1 at0013 = ╱ec╱,╱ // 0x7b9 @0x13
0x07a6…07d1 at0014 = ╱51╱Q╱ // 0x7ba @0x14
0x07a6…07d1 at0015 = ╱ec╱,╱ // 0x7bb @0x15
0x07a6…07d1 at0016 = ╱4d╱M╱ // 0x7bc @0x16
0x07a6…07d1 at0017 = ╱41╱A╱ // 0x7bd @0x17
0x07a6…07d1 at0018 = ╱4e╱N╱ // 0x7be @0x18
0x07a6…07d1 at0019 = ╱54╱T╱ // 0x7bf @0x19
0x07a6…07d1 at001a = ╱32╱2╱ // 0x7c0 @0x1a
0x07a6…07d1 at001b = ╱ec╱,╱ // 0x7c1 @0x1b
0x07a6…07d1 at001c = ╱4e╱N╱ // 0x7c2 @0x1c
0x07a6…07d1 at001d = ╱5c╱Ø╱ // 0x7c3 @0x1d
0x07a6…07d1 at001e = ╱47╱G╱ // 0x7c4 @0x1e
0x07a6…07d1 at001f = ╱4c╱L╱ // 0x7c5 @0x1f
0x07a6…07d1 at0020 = ╱35╱5╱ // 0x7c6 @0x20
0x07a6…07d1 at0021 = ╱ec╱,╱ // 0x7c7 @0x21
0x07a6…07d1 at0022 = ╱50╱P╱ // 0x7c8 @0x22
0x07a6…07d1 at0023 = ╱49╱I╱ // 0x7c9 @0x23
0x07a6…07d1 at0024 = ╱4c╱L╱ // 0x7ca @0x24
0x07a6…07d1 at0025 = ╱36╱6╱ // 0x7cb @0x25
0x07a6…07d1 at0026 = ╱ec╱,╱ // 0x7cc @0x26
0x07a6…07d1 at0027 = ╱4c╱L╱ // 0x7cd @0x27
0x07a6…07d1 at0028 = ╱38╱8╱ // 0x7ce @0x28
0x07a6…07d1 at0029 = ╱ee╱)╱ // 0x7cf @0x29
0x07a6…07d1 at002a = EOL // 0x7d0 @0x2a
0x07a6…07d1 }
0x07d1…081f 9576 0710 PIL1=MANT2 DIV 8;PIL6=PIL1;CEKS=E;MANT3=MANT2 DIV 4;MANT4=MANT2 DIV 32
0x07d1…081f LineComalBin {
0x07d1…081f ptr = 0x9576 // 0x7d1 @0x0
0x07d1…081f lno = 0x02c6 // 0x7d3 @0x2
0x07d1…081f at0004 = ╱50╱P╱ // 0x7d5 @0x4
0x07d1…081f at0005 = ╱49╱I╱ // 0x7d6 @0x5
0x07d1…081f at0006 = ╱4c╱L╱ // 0x7d7 @0x6
0x07d1…081f at0007 = ╱31╱1╱ // 0x7d8 @0x7
0x07d1…081f at0008 = ╱dc╱=╱ // 0x7d9 @0x8
0x07d1…081f at0009 = ╱4d╱M╱ // 0x7da @0x9
0x07d1…081f at000a = ╱41╱A╱ // 0x7db @0xa
0x07d1…081f at000b = ╱4e╱N╱ // 0x7dc @0xb
0x07d1…081f at000c = ╱54╱T╱ // 0x7dd @0xc
0x07d1…081f at000d = ╱32╱2╱ // 0x7de @0xd
0x07d1…081f at000e = ╱e7╱ DIV ╱ // 0x7df @0xe
0x07d1…081f at000f = ╱38╱8╱ // 0x7e0 @0xf
0x07d1…081f at0010 = ╱fe00008004╱ // 0x7e1 @0x10
0x07d1…081f at0015 = ╱eb╱;╱ // 0x7e6 @0x15
0x07d1…081f at0016 = ╱50╱P╱ // 0x7e7 @0x16
0x07d1…081f at0017 = ╱49╱I╱ // 0x7e8 @0x17
0x07d1…081f at0018 = ╱4c╱L╱ // 0x7e9 @0x18
0x07d1…081f at0019 = ╱36╱6╱ // 0x7ea @0x19
0x07d1…081f at001a = ╱dc╱=╱ // 0x7eb @0x1a
0x07d1…081f at001b = ╱50╱P╱ // 0x7ec @0x1b
0x07d1…081f at001c = ╱49╱I╱ // 0x7ed @0x1c
0x07d1…081f at001d = ╱4c╱L╱ // 0x7ee @0x1d
0x07d1…081f at001e = ╱31╱1╱ // 0x7ef @0x1e
0x07d1…081f at001f = ╱eb╱;╱ // 0x7f0 @0x1f
0x07d1…081f at0020 = ╱43╱C╱ // 0x7f1 @0x20
0x07d1…081f at0021 = ╱45╱E╱ // 0x7f2 @0x21
0x07d1…081f at0022 = ╱4b╱K╱ // 0x7f3 @0x22
0x07d1…081f at0023 = ╱53╱S╱ // 0x7f4 @0x23
0x07d1…081f at0024 = ╱dc╱=╱ // 0x7f5 @0x24
0x07d1…081f at0025 = ╱45╱E╱ // 0x7f6 @0x25
0x07d1…081f at0026 = ╱eb╱;╱ // 0x7f7 @0x26
0x07d1…081f at0027 = ╱4d╱M╱ // 0x7f8 @0x27
0x07d1…081f at0028 = ╱41╱A╱ // 0x7f9 @0x28
0x07d1…081f at0029 = ╱4e╱N╱ // 0x7fa @0x29
0x07d1…081f at002a = ╱54╱T╱ // 0x7fb @0x2a
0x07d1…081f at002b = ╱33╱3╱ // 0x7fc @0x2b
0x07d1…081f at002c = ╱dc╱=╱ // 0x7fd @0x2c
0x07d1…081f at002d = ╱4d╱M╱ // 0x7fe @0x2d
0x07d1…081f at002e = ╱41╱A╱ // 0x7ff @0x2e
0x07d1…081f at002f = ╱4e╱N╱ // 0x800 @0x2f
0x07d1…081f at0030 = ╱54╱T╱ // 0x801 @0x30
0x07d1…081f at0031 = ╱32╱2╱ // 0x802 @0x31
0x07d1…081f at0032 = ╱e7╱ DIV ╱ // 0x803 @0x32
0x07d1…081f at0033 = ╱34╱4╱ // 0x804 @0x33
0x07d1…081f at0034 = ╱fe00008003╱ // 0x805 @0x34
0x07d1…081f at0039 = ╱eb╱;╱ // 0x80a @0x39
0x07d1…081f at003a = ╱4d╱M╱ // 0x80b @0x3a
0x07d1…081f at003b = ╱41╱A╱ // 0x80c @0x3b
0x07d1…081f at003c = ╱4e╱N╱ // 0x80d @0x3c
0x07d1…081f at003d = ╱54╱T╱ // 0x80e @0x3d
0x07d1…081f at003e = ╱34╱4╱ // 0x80f @0x3e
0x07d1…081f at003f = ╱dc╱=╱ // 0x810 @0x3f
0x07d1…081f at0040 = ╱4d╱M╱ // 0x811 @0x40
0x07d1…081f at0041 = ╱41╱A╱ // 0x812 @0x41
0x07d1…081f at0042 = ╱4e╱N╱ // 0x813 @0x42
0x07d1…081f at0043 = ╱54╱T╱ // 0x814 @0x43
0x07d1…081f at0044 = ╱32╱2╱ // 0x815 @0x44
0x07d1…081f at0045 = ╱e7╱ DIV ╱ // 0x816 @0x45
0x07d1…081f at0046 = ╱33╱3╱ // 0x817 @0x46
0x07d1…081f at0047 = ╱32╱2╱ // 0x818 @0x47
0x07d1…081f at0048 = ╱fe00008006╱ // 0x819 @0x48
0x07d1…081f at004d = EOL // 0x81e @0x4d
0x07d1…081f }
0x081f…0825 (27,) 957c 0720 REPEAT
0x081f…0825 LineComalBin {
0x081f…0825 ptr = 0x957c // 0x81f @0x0
0x081f…0825 lno = 0x02d0 // 0x821 @0x2
0x081f…0825 at0004 = ╱97╱ REPEAT ╱ // 0x823 @0x4
0x081f…0825 at0005 = EOL // 0x824 @0x5
0x081f…0825 }
0x0825…0844 959b 0730 IF NØGL5=TAB4(PIL6) OR PIL1=E THEN EXIT
0x0825…0844 LineComalBin {
0x0825…0844 ptr = 0x959b // 0x825 @0x0
0x0825…0844 lno = 0x02da // 0x827 @0x2
0x0825…0844 at0004 = ╱82╱ IF ╱ // 0x829 @0x4
0x0825…0844 at0005 = ╱4e╱N╱ // 0x82a @0x5
0x0825…0844 at0006 = ╱5c╱Ø╱ // 0x82b @0x6
0x0825…0844 at0007 = ╱47╱G╱ // 0x82c @0x7
0x0825…0844 at0008 = ╱4c╱L╱ // 0x82d @0x8
0x0825…0844 at0009 = ╱35╱5╱ // 0x82e @0x9
0x0825…0844 at000a = ╱dc╱=╱ // 0x82f @0xa
0x0825…0844 at000b = ╱54╱T╱ // 0x830 @0xb
0x0825…0844 at000c = ╱41╱A╱ // 0x831 @0xc
0x0825…0844 at000d = ╱42╱B╱ // 0x832 @0xd
0x0825…0844 at000e = ╱34╱4╱ // 0x833 @0xe
0x0825…0844 at000f = ╱ed╱(╱ // 0x834 @0xf
0x0825…0844 at0010 = ╱50╱P╱ // 0x835 @0x10
0x0825…0844 at0011 = ╱49╱I╱ // 0x836 @0x11
0x0825…0844 at0012 = ╱4c╱L╱ // 0x837 @0x12
0x0825…0844 at0013 = ╱36╱6╱ // 0x838 @0x13
0x0825…0844 at0014 = ╱ee╱)╱ // 0x839 @0x14
0x0825…0844 at0015 = ╱db╱ OR ╱ // 0x83a @0x15
0x0825…0844 at0016 = ╱50╱P╱ // 0x83b @0x16
0x0825…0844 at0017 = ╱49╱I╱ // 0x83c @0x17
0x0825…0844 at0018 = ╱4c╱L╱ // 0x83d @0x18
0x0825…0844 at0019 = ╱31╱1╱ // 0x83e @0x19
0x0825…0844 at001a = ╱dc╱=╱ // 0x83f @0x1a
0x0825…0844 at001b = ╱45╱E╱ // 0x840 @0x1b
0x0825…0844 at001c = ╱b6╱ THEN ╱ // 0x841 @0x1c
0x0825…0844 at001d = ╱99╱ EXIT ╱ // 0x842 @0x1d
0x0825…0844 at001e = EOL // 0x843 @0x1e
0x0825…0844 }
0x0844…0880 95d7 0740 PIL1=(PIL1+E) DIV G;PIL6=PIL6+PIL1*(E-G*(NØGL5<TAB4(PIL6)))
0x0844…0880 LineComalBin {
0x0844…0880 ptr = 0x95d7 // 0x844 @0x0
0x0844…0880 lno = 0x02e4 // 0x846 @0x2
0x0844…0880 at0004 = ╱50╱P╱ // 0x848 @0x4
0x0844…0880 at0005 = ╱49╱I╱ // 0x849 @0x5
0x0844…0880 at0006 = ╱4c╱L╱ // 0x84a @0x6
0x0844…0880 at0007 = ╱31╱1╱ // 0x84b @0x7
0x0844…0880 at0008 = ╱dc╱=╱ // 0x84c @0x8
0x0844…0880 at0009 = ╱ed╱(╱ // 0x84d @0x9
0x0844…0880 at000a = ╱50╱P╱ // 0x84e @0xa
0x0844…0880 at000b = ╱49╱I╱ // 0x84f @0xb
0x0844…0880 at000c = ╱4c╱L╱ // 0x850 @0xc
0x0844…0880 at000d = ╱31╱1╱ // 0x851 @0xd
0x0844…0880 at000e = ╱e2╱+╱ // 0x852 @0xe
0x0844…0880 at000f = ╱45╱E╱ // 0x853 @0xf
0x0844…0880 at0010 = ╱ee╱)╱ // 0x854 @0x10
0x0844…0880 at0011 = ╱e7╱ DIV ╱ // 0x855 @0x11
0x0844…0880 at0012 = ╱47╱G╱ // 0x856 @0x12
0x0844…0880 at0013 = ╱eb╱;╱ // 0x857 @0x13
0x0844…0880 at0014 = ╱50╱P╱ // 0x858 @0x14
0x0844…0880 at0015 = ╱49╱I╱ // 0x859 @0x15
0x0844…0880 at0016 = ╱4c╱L╱ // 0x85a @0x16
0x0844…0880 at0017 = ╱36╱6╱ // 0x85b @0x17
0x0844…0880 at0018 = ╱dc╱=╱ // 0x85c @0x18
0x0844…0880 at0019 = ╱50╱P╱ // 0x85d @0x19
0x0844…0880 at001a = ╱49╱I╱ // 0x85e @0x1a
0x0844…0880 at001b = ╱4c╱L╱ // 0x85f @0x1b
0x0844…0880 at001c = ╱36╱6╱ // 0x860 @0x1c
0x0844…0880 at001d = ╱e2╱+╱ // 0x861 @0x1d
0x0844…0880 at001e = ╱50╱P╱ // 0x862 @0x1e
0x0844…0880 at001f = ╱49╱I╱ // 0x863 @0x1f
0x0844…0880 at0020 = ╱4c╱L╱ // 0x864 @0x20
0x0844…0880 at0021 = ╱31╱1╱ // 0x865 @0x21
0x0844…0880 at0022 = ╱e4╱*╱ // 0x866 @0x22
0x0844…0880 at0023 = ╱ed╱(╱ // 0x867 @0x23
0x0844…0880 at0024 = ╱45╱E╱ // 0x868 @0x24
0x0844…0880 at0025 = ╱e3╱-╱ // 0x869 @0x25
0x0844…0880 at0026 = ╱47╱G╱ // 0x86a @0x26
0x0844…0880 at0027 = ╱e4╱*╱ // 0x86b @0x27
0x0844…0880 at0028 = ╱ed╱(╱ // 0x86c @0x28
0x0844…0880 at0029 = ╱4e╱N╱ // 0x86d @0x29
0x0844…0880 at002a = ╱5c╱Ø╱ // 0x86e @0x2a
0x0844…0880 at002b = ╱47╱G╱ // 0x86f @0x2b
0x0844…0880 at002c = ╱4c╱L╱ // 0x870 @0x2c
0x0844…0880 at002d = ╱35╱5╱ // 0x871 @0x2d
0x0844…0880 at002e = ╱dd╱<╱ // 0x872 @0x2e
0x0844…0880 at002f = ╱54╱T╱ // 0x873 @0x2f
0x0844…0880 at0030 = ╱41╱A╱ // 0x874 @0x30
0x0844…0880 at0031 = ╱42╱B╱ // 0x875 @0x31
0x0844…0880 at0032 = ╱34╱4╱ // 0x876 @0x32
0x0844…0880 at0033 = ╱ed╱(╱ // 0x877 @0x33
0x0844…0880 at0034 = ╱50╱P╱ // 0x878 @0x34
0x0844…0880 at0035 = ╱49╱I╱ // 0x879 @0x35
0x0844…0880 at0036 = ╱4c╱L╱ // 0x87a @0x36
0x0844…0880 at0037 = ╱36╱6╱ // 0x87b @0x37
0x0844…0880 at0038 = ╱ee╱)╱ // 0x87c @0x38
0x0844…0880 at0039 = ╱ee╱)╱ // 0x87d @0x39
0x0844…0880 at003a = ╱ee╱)╱ // 0x87e @0x3a
0x0844…0880 at003b = EOL // 0x87f @0x3b
0x0844…0880 }
0x0880…0897 95ee 0750 IF PIL6<E THEN PIL6=MANT3
0x0880…0897 LineComalBin {
0x0880…0897 ptr = 0x95ee // 0x880 @0x0
0x0880…0897 lno = 0x02ee // 0x882 @0x2
0x0880…0897 at0004 = ╱82╱ IF ╱ // 0x884 @0x4
0x0880…0897 at0005 = ╱50╱P╱ // 0x885 @0x5
0x0880…0897 at0006 = ╱49╱I╱ // 0x886 @0x6
0x0880…0897 at0007 = ╱4c╱L╱ // 0x887 @0x7
0x0880…0897 at0008 = ╱36╱6╱ // 0x888 @0x8
0x0880…0897 at0009 = ╱dd╱<╱ // 0x889 @0x9
0x0880…0897 at000a = ╱45╱E╱ // 0x88a @0xa
0x0880…0897 at000b = ╱b6╱ THEN ╱ // 0x88b @0xb
0x0880…0897 at000c = ╱50╱P╱ // 0x88c @0xc
0x0880…0897 at000d = ╱49╱I╱ // 0x88d @0xd
0x0880…0897 at000e = ╱4c╱L╱ // 0x88e @0xe
0x0880…0897 at000f = ╱36╱6╱ // 0x88f @0xf
0x0880…0897 at0010 = ╱dc╱=╱ // 0x890 @0x10
0x0880…0897 at0011 = ╱4d╱M╱ // 0x891 @0x11
0x0880…0897 at0012 = ╱41╱A╱ // 0x892 @0x12
0x0880…0897 at0013 = ╱4e╱N╱ // 0x893 @0x13
0x0880…0897 at0014 = ╱54╱T╱ // 0x894 @0x14
0x0880…0897 at0015 = ╱33╱3╱ // 0x895 @0x15
0x0880…0897 at0016 = EOL // 0x896 @0x16
0x0880…0897 }
0x0897…08a3 95fa 0760 UNTIL PIL1=B
0x0897…08a3 LineComalBin {
0x0897…08a3 ptr = 0x95fa // 0x897 @0x0
0x0897…08a3 lno = 0x02f8 // 0x899 @0x2
0x0897…08a3 at0004 = ╱98╱ UNTIL ╱ // 0x89b @0x4
0x0897…08a3 at0005 = ╱50╱P╱ // 0x89c @0x5
0x0897…08a3 at0006 = ╱49╱I╱ // 0x89d @0x6
0x0897…08a3 at0007 = ╱4c╱L╱ // 0x89e @0x7
0x0897…08a3 at0008 = ╱31╱1╱ // 0x89f @0x8
0x0897…08a3 at0009 = ╱dc╱=╱ // 0x8a0 @0x9
0x0897…08a3 at000a = ╱42╱B╱ // 0x8a1 @0xa
0x0897…08a3 at000b = EOL // 0x8a2 @0xb
0x0897…08a3 }
0x08a3…08ce 9625 0770 IF TAB4(PIL6)>NØGL5 THEN PIL6=PIL6-E*(PIL6>E)
0x08a3…08ce LineComalBin {
0x08a3…08ce ptr = 0x9625 // 0x8a3 @0x0
0x08a3…08ce lno = 0x0302 // 0x8a5 @0x2
0x08a3…08ce at0004 = ╱82╱ IF ╱ // 0x8a7 @0x4
0x08a3…08ce at0005 = ╱54╱T╱ // 0x8a8 @0x5
0x08a3…08ce at0006 = ╱41╱A╱ // 0x8a9 @0x6
0x08a3…08ce at0007 = ╱42╱B╱ // 0x8aa @0x7
0x08a3…08ce at0008 = ╱34╱4╱ // 0x8ab @0x8
0x08a3…08ce at0009 = ╱ed╱(╱ // 0x8ac @0x9
0x08a3…08ce at000a = ╱50╱P╱ // 0x8ad @0xa
0x08a3…08ce at000b = ╱49╱I╱ // 0x8ae @0xb
0x08a3…08ce at000c = ╱4c╱L╱ // 0x8af @0xc
0x08a3…08ce at000d = ╱36╱6╱ // 0x8b0 @0xd
0x08a3…08ce at000e = ╱ee╱)╱ // 0x8b1 @0xe
0x08a3…08ce at000f = ╱de╱>╱ // 0x8b2 @0xf
0x08a3…08ce at0010 = ╱4e╱N╱ // 0x8b3 @0x10
0x08a3…08ce at0011 = ╱5c╱Ø╱ // 0x8b4 @0x11
0x08a3…08ce at0012 = ╱47╱G╱ // 0x8b5 @0x12
0x08a3…08ce at0013 = ╱4c╱L╱ // 0x8b6 @0x13
0x08a3…08ce at0014 = ╱35╱5╱ // 0x8b7 @0x14
0x08a3…08ce at0015 = ╱b6╱ THEN ╱ // 0x8b8 @0x15
0x08a3…08ce at0016 = ╱50╱P╱ // 0x8b9 @0x16
0x08a3…08ce at0017 = ╱49╱I╱ // 0x8ba @0x17
0x08a3…08ce at0018 = ╱4c╱L╱ // 0x8bb @0x18
0x08a3…08ce at0019 = ╱36╱6╱ // 0x8bc @0x19
0x08a3…08ce at001a = ╱dc╱=╱ // 0x8bd @0x1a
0x08a3…08ce at001b = ╱50╱P╱ // 0x8be @0x1b
0x08a3…08ce at001c = ╱49╱I╱ // 0x8bf @0x1c
0x08a3…08ce at001d = ╱4c╱L╱ // 0x8c0 @0x1d
0x08a3…08ce at001e = ╱36╱6╱ // 0x8c1 @0x1e
0x08a3…08ce at001f = ╱e3╱-╱ // 0x8c2 @0x1f
0x08a3…08ce at0020 = ╱45╱E╱ // 0x8c3 @0x20
0x08a3…08ce at0021 = ╱e4╱*╱ // 0x8c4 @0x21
0x08a3…08ce at0022 = ╱ed╱(╱ // 0x8c5 @0x22
0x08a3…08ce at0023 = ╱50╱P╱ // 0x8c6 @0x23
0x08a3…08ce at0024 = ╱49╱I╱ // 0x8c7 @0x24
0x08a3…08ce at0025 = ╱4c╱L╱ // 0x8c8 @0x25
0x08a3…08ce at0026 = ╱36╱6╱ // 0x8c9 @0x26
0x08a3…08ce at0027 = ╱de╱>╱ // 0x8ca @0x27
0x08a3…08ce at0028 = ╱45╱E╱ // 0x8cb @0x28
0x08a3…08ce at0029 = ╱ee╱)╱ // 0x8cc @0x29
0x08a3…08ce at002a = EOL // 0x8cd @0x2a
0x08a3…08ce }
0x08ce…08e2 9639 0780 PIL6=MANT4+PIL6
0x08ce…08e2 LineComalBin {
0x08ce…08e2 ptr = 0x9639 // 0x8ce @0x0
0x08ce…08e2 lno = 0x030c // 0x8d0 @0x2
0x08ce…08e2 at0004 = ╱50╱P╱ // 0x8d2 @0x4
0x08ce…08e2 at0005 = ╱49╱I╱ // 0x8d3 @0x5
0x08ce…08e2 at0006 = ╱4c╱L╱ // 0x8d4 @0x6
0x08ce…08e2 at0007 = ╱36╱6╱ // 0x8d5 @0x7
0x08ce…08e2 at0008 = ╱dc╱=╱ // 0x8d6 @0x8
0x08ce…08e2 at0009 = ╱4d╱M╱ // 0x8d7 @0x9
0x08ce…08e2 at000a = ╱41╱A╱ // 0x8d8 @0xa
0x08ce…08e2 at000b = ╱4e╱N╱ // 0x8d9 @0xb
0x08ce…08e2 at000c = ╱54╱T╱ // 0x8da @0xc
0x08ce…08e2 at000d = ╱34╱4╱ // 0x8db @0xd
0x08ce…08e2 at000e = ╱e2╱+╱ // 0x8dc @0xe
0x08ce…08e2 at000f = ╱50╱P╱ // 0x8dd @0xf
0x08ce…08e2 at0010 = ╱49╱I╱ // 0x8de @0x10
0x08ce…08e2 at0011 = ╱4c╱L╱ // 0x8df @0x11
0x08ce…08e2 at0012 = ╱36╱6╱ // 0x8e0 @0x12
0x08ce…08e2 at0013 = EOL // 0x8e1 @0x13
0x08ce…08e2 }
0x08e2…0932 9689 0790 GET L8$,PIL6:Q(E,E),Q(E,G),Q(G,E),Q(G,G),Q(V,E),Q(V,G),Q(4,E),Q(4,G)
0x08e2…0932 LineComalBin {
0x08e2…0932 ptr = 0x9689 // 0x8e2 @0x0
0x08e2…0932 lno = 0x0316 // 0x8e4 @0x2
0x08e2…0932 at0004 = ╱a9╱ GET ╱ // 0x8e6 @0x4
0x08e2…0932 at0005 = ╱4c╱L╱ // 0x8e7 @0x5
0x08e2…0932 at0006 = ╱38╱8╱ // 0x8e8 @0x6
0x08e2…0932 at0007 = ╱ef╱$╱ // 0x8e9 @0x7
0x08e2…0932 at0008 = ╱ec╱,╱ // 0x8ea @0x8
0x08e2…0932 at0009 = ╱50╱P╱ // 0x8eb @0x9
0x08e2…0932 at000a = ╱49╱I╱ // 0x8ec @0xa
0x08e2…0932 at000b = ╱4c╱L╱ // 0x8ed @0xb
0x08e2…0932 at000c = ╱36╱6╱ // 0x8ee @0xc
0x08e2…0932 at000d = ╱f0╱:╱ // 0x8ef @0xd
0x08e2…0932 at000e = ╱51╱Q╱ // 0x8f0 @0xe
0x08e2…0932 at000f = ╱ed╱(╱ // 0x8f1 @0xf
0x08e2…0932 at0010 = ╱45╱E╱ // 0x8f2 @0x10
0x08e2…0932 at0011 = ╱ec╱,╱ // 0x8f3 @0x11
0x08e2…0932 at0012 = ╱45╱E╱ // 0x8f4 @0x12
0x08e2…0932 at0013 = ╱ee╱)╱ // 0x8f5 @0x13
0x08e2…0932 at0014 = ╱ec╱,╱ // 0x8f6 @0x14
0x08e2…0932 at0015 = ╱51╱Q╱ // 0x8f7 @0x15
0x08e2…0932 at0016 = ╱ed╱(╱ // 0x8f8 @0x16
0x08e2…0932 at0017 = ╱45╱E╱ // 0x8f9 @0x17
0x08e2…0932 at0018 = ╱ec╱,╱ // 0x8fa @0x18
0x08e2…0932 at0019 = ╱47╱G╱ // 0x8fb @0x19
0x08e2…0932 at001a = ╱ee╱)╱ // 0x8fc @0x1a
0x08e2…0932 at001b = ╱ec╱,╱ // 0x8fd @0x1b
0x08e2…0932 at001c = ╱51╱Q╱ // 0x8fe @0x1c
0x08e2…0932 at001d = ╱ed╱(╱ // 0x8ff @0x1d
0x08e2…0932 at001e = ╱47╱G╱ // 0x900 @0x1e
0x08e2…0932 at001f = ╱ec╱,╱ // 0x901 @0x1f
0x08e2…0932 at0020 = ╱45╱E╱ // 0x902 @0x20
0x08e2…0932 at0021 = ╱ee╱)╱ // 0x903 @0x21
0x08e2…0932 at0022 = ╱ec╱,╱ // 0x904 @0x22
0x08e2…0932 at0023 = ╱51╱Q╱ // 0x905 @0x23
0x08e2…0932 at0024 = ╱ed╱(╱ // 0x906 @0x24
0x08e2…0932 at0025 = ╱47╱G╱ // 0x907 @0x25
0x08e2…0932 at0026 = ╱ec╱,╱ // 0x908 @0x26
0x08e2…0932 at0027 = ╱47╱G╱ // 0x909 @0x27
0x08e2…0932 at0028 = ╱ee╱)╱ // 0x90a @0x28
0x08e2…0932 at0029 = ╱ec╱,╱ // 0x90b @0x29
0x08e2…0932 at002a = ╱51╱Q╱ // 0x90c @0x2a
0x08e2…0932 at002b = ╱ed╱(╱ // 0x90d @0x2b
0x08e2…0932 at002c = ╱56╱V╱ // 0x90e @0x2c
0x08e2…0932 at002d = ╱ec╱,╱ // 0x90f @0x2d
0x08e2…0932 at002e = ╱45╱E╱ // 0x910 @0x2e
0x08e2…0932 at002f = ╱ee╱)╱ // 0x911 @0x2f
0x08e2…0932 at0030 = ╱ec╱,╱ // 0x912 @0x30
0x08e2…0932 at0031 = ╱51╱Q╱ // 0x913 @0x31
0x08e2…0932 at0032 = ╱ed╱(╱ // 0x914 @0x32
0x08e2…0932 at0033 = ╱56╱V╱ // 0x915 @0x33
0x08e2…0932 at0034 = ╱ec╱,╱ // 0x916 @0x34
0x08e2…0932 at0035 = ╱47╱G╱ // 0x917 @0x35
0x08e2…0932 at0036 = ╱ee╱)╱ // 0x918 @0x36
0x08e2…0932 at0037 = ╱ec╱,╱ // 0x919 @0x37
0x08e2…0932 at0038 = ╱51╱Q╱ // 0x91a @0x38
0x08e2…0932 at0039 = ╱ed╱(╱ // 0x91b @0x39
0x08e2…0932 at003a = ╱34╱4╱ // 0x91c @0x3a
0x08e2…0932 at003b = ╱fe00008003╱ // 0x91d @0x3b
0x08e2…0932 at0040 = ╱ec╱,╱ // 0x922 @0x40
0x08e2…0932 at0041 = ╱45╱E╱ // 0x923 @0x41
0x08e2…0932 at0042 = ╱ee╱)╱ // 0x924 @0x42
0x08e2…0932 at0043 = ╱ec╱,╱ // 0x925 @0x43
0x08e2…0932 at0044 = ╱51╱Q╱ // 0x926 @0x44
0x08e2…0932 at0045 = ╱ed╱(╱ // 0x927 @0x45
0x08e2…0932 at0046 = ╱34╱4╱ // 0x928 @0x46
0x08e2…0932 at0047 = ╱fe00008003╱ // 0x929 @0x47
0x08e2…0932 at004c = ╱ec╱,╱ // 0x92e @0x4c
0x08e2…0932 at004d = ╱47╱G╱ // 0x92f @0x4d
0x08e2…0932 at004e = ╱ee╱)╱ // 0x930 @0x4e
0x08e2…0932 at004f = EOL // 0x931 @0x4f
0x08e2…0932 }
0x0932…0945 969c 0800 EXEC FEJL(E,E,L8$)
0x0932…0945 LineComalBin {
0x0932…0945 ptr = 0x969c // 0x932 @0x0
0x0932…0945 lno = 0x0320 // 0x934 @0x2
0x0932…0945 at0004 = ╱9d╱ EXEC ╱ // 0x936 @0x4
0x0932…0945 at0005 = ╱46╱F╱ // 0x937 @0x5
0x0932…0945 at0006 = ╱45╱E╱ // 0x938 @0x6
0x0932…0945 at0007 = ╱4a╱J╱ // 0x939 @0x7
0x0932…0945 at0008 = ╱4c╱L╱ // 0x93a @0x8
0x0932…0945 at0009 = ╱ed╱(╱ // 0x93b @0x9
0x0932…0945 at000a = ╱45╱E╱ // 0x93c @0xa
0x0932…0945 at000b = ╱ec╱,╱ // 0x93d @0xb
0x0932…0945 at000c = ╱45╱E╱ // 0x93e @0xc
0x0932…0945 at000d = ╱ec╱,╱ // 0x93f @0xd
0x0932…0945 at000e = ╱4c╱L╱ // 0x940 @0xe
0x0932…0945 at000f = ╱38╱8╱ // 0x941 @0xf
0x0932…0945 at0010 = ╱ef╱$╱ // 0x942 @0x10
0x0932…0945 at0011 = ╱ee╱)╱ // 0x943 @0x11
0x0932…0945 at0012 = EOL // 0x944 @0x12
0x0932…0945 }
0x0945…0958 96af 0810 FOR PIL6=E TO 4
0x0945…0958 LineComalBin {
0x0945…0958 ptr = 0x96af // 0x945 @0x0
0x0945…0958 lno = 0x032a // 0x947 @0x2
0x0945…0958 at0004 = ╱83╱ FOR ╱ // 0x949 @0x4
0x0945…0958 at0005 = ╱50╱P╱ // 0x94a @0x5
0x0945…0958 at0006 = ╱49╱I╱ // 0x94b @0x6
0x0945…0958 at0007 = ╱4c╱L╱ // 0x94c @0x7
0x0945…0958 at0008 = ╱36╱6╱ // 0x94d @0x8
0x0945…0958 at0009 = ╱dc╱=╱ // 0x94e @0x9
0x0945…0958 at000a = ╱45╱E╱ // 0x94f @0xa
0x0945…0958 at000b = ╱b7╱ TO ╱ // 0x950 @0xb
0x0945…0958 at000c = ╱34╱4╱ // 0x951 @0xc
0x0945…0958 at000d = ╱fe00008003╱ // 0x952 @0xd
0x0945…0958 at0012 = EOL // 0x957 @0x12
0x0945…0958 }
0x0958…096f 96c6 0820 IF NØGL5=Q(PIL6,E) THEN EXIT
0x0958…096f LineComalBin {
0x0958…096f ptr = 0x96c6 // 0x958 @0x0
0x0958…096f lno = 0x0334 // 0x95a @0x2
0x0958…096f at0004 = ╱82╱ IF ╱ // 0x95c @0x4
0x0958…096f at0005 = ╱4e╱N╱ // 0x95d @0x5
0x0958…096f at0006 = ╱5c╱Ø╱ // 0x95e @0x6
0x0958…096f at0007 = ╱47╱G╱ // 0x95f @0x7
0x0958…096f at0008 = ╱4c╱L╱ // 0x960 @0x8
0x0958…096f at0009 = ╱35╱5╱ // 0x961 @0x9
0x0958…096f at000a = ╱dc╱=╱ // 0x962 @0xa
0x0958…096f at000b = ╱51╱Q╱ // 0x963 @0xb
0x0958…096f at000c = ╱ed╱(╱ // 0x964 @0xc
0x0958…096f at000d = ╱50╱P╱ // 0x965 @0xd
0x0958…096f at000e = ╱49╱I╱ // 0x966 @0xe
0x0958…096f at000f = ╱4c╱L╱ // 0x967 @0xf
0x0958…096f at0010 = ╱36╱6╱ // 0x968 @0x10
0x0958…096f at0011 = ╱ec╱,╱ // 0x969 @0x11
0x0958…096f at0012 = ╱45╱E╱ // 0x96a @0x12
0x0958…096f at0013 = ╱ee╱)╱ // 0x96b @0x13
0x0958…096f at0014 = ╱b6╱ THEN ╱ // 0x96c @0x14
0x0958…096f at0015 = ╱99╱ EXIT ╱ // 0x96d @0x15
0x0958…096f at0016 = EOL // 0x96e @0x16
0x0958…096f }
0x096f…0979 96d0 0830 NEXT PIL6
0x096f…0979 LineComalBin {
0x096f…0979 ptr = 0x96d0 // 0x96f @0x0
0x096f…0979 lno = 0x033e // 0x971 @0x2
0x096f…0979 at0004 = ╱84╱ NEXT ╱ // 0x973 @0x4
0x096f…0979 at0005 = ╱50╱P╱ // 0x974 @0x5
0x096f…0979 at0006 = ╱49╱I╱ // 0x975 @0x6
0x096f…0979 at0007 = ╱4c╱L╱ // 0x976 @0x7
0x096f…0979 at0008 = ╱36╱6╱ // 0x977 @0x8
0x096f…0979 at0009 = EOL // 0x978 @0x9
0x096f…0979 }
0x0979…0991 96e8 0840 IF PIL6<>5 THEN CEKS=B
0x0979…0991 LineComalBin {
0x0979…0991 ptr = 0x96e8 // 0x979 @0x0
0x0979…0991 lno = 0x0348 // 0x97b @0x2
0x0979…0991 at0004 = ╱82╱ IF ╱ // 0x97d @0x4
0x0979…0991 at0005 = ╱50╱P╱ // 0x97e @0x5
0x0979…0991 at0006 = ╱49╱I╱ // 0x97f @0x6
0x0979…0991 at0007 = ╱4c╱L╱ // 0x980 @0x7
0x0979…0991 at0008 = ╱36╱6╱ // 0x981 @0x8
0x0979…0991 at0009 = ╱e1╱<>╱ // 0x982 @0x9
0x0979…0991 at000a = ╱35╱5╱ // 0x983 @0xa
0x0979…0991 at000b = ╱fe0000a003╱ // 0x984 @0xb
0x0979…0991 at0010 = ╱b6╱ THEN ╱ // 0x989 @0x10
0x0979…0991 at0011 = ╱43╱C╱ // 0x98a @0x11
0x0979…0991 at0012 = ╱45╱E╱ // 0x98b @0x12
0x0979…0991 at0013 = ╱4b╱K╱ // 0x98c @0x13
0x0979…0991 at0014 = ╱53╱S╱ // 0x98d @0x14
0x0979…0991 at0015 = ╱dc╱=╱ // 0x98e @0x15
0x0979…0991 at0016 = ╱42╱B╱ // 0x98f @0x16
0x0979…0991 at0017 = EOL // 0x990 @0x17
0x0979…0991 }
0x0991…0997 96ee 0850 ENDPROC
0x0991…0997 LineComalBin {
0x0991…0997 ptr = 0x96ee // 0x991 @0x0
0x0991…0997 lno = 0x0352 // 0x993 @0x2
0x0991…0997 at0004 = ╱9f╱ ENDPROC ╱ // 0x995 @0x4
0x0991…0997 at0005 = EOL // 0x996 @0x5
0x0991…0997 }
0x0997…09a9 9700 0860 PROC NRTEST(NUM1)
0x0997…09a9 LineComalBin {
0x0997…09a9 ptr = 0x9700 // 0x997 @0x0
0x0997…09a9 lno = 0x035c // 0x999 @0x2
0x0997…09a9 at0004 = ╱9e╱ PROC ╱ // 0x99b @0x4
0x0997…09a9 at0005 = ╱4e╱N╱ // 0x99c @0x5
0x0997…09a9 at0006 = ╱52╱R╱ // 0x99d @0x6
0x0997…09a9 at0007 = ╱54╱T╱ // 0x99e @0x7
0x0997…09a9 at0008 = ╱45╱E╱ // 0x99f @0x8
0x0997…09a9 at0009 = ╱53╱S╱ // 0x9a0 @0x9
0x0997…09a9 at000a = ╱54╱T╱ // 0x9a1 @0xa
0x0997…09a9 at000b = ╱ed╱(╱ // 0x9a2 @0xb
0x0997…09a9 at000c = ╱4e╱N╱ // 0x9a3 @0xc
0x0997…09a9 at000d = ╱55╱U╱ // 0x9a4 @0xd
0x0997…09a9 at000e = ╱4d╱M╱ // 0x9a5 @0xe
0x0997…09a9 at000f = ╱31╱1╱ // 0x9a6 @0xf
0x0997…09a9 at0010 = ╱ee╱)╱ // 0x9a7 @0x10
0x0997…09a9 at0011 = EOL // 0x9a8 @0x11
0x0997…09a9 }
0x09a9…09cb 9722 0870 P=B;TEST2=B;KTAL=B;L=LEN(NUM1$)
0x09a9…09cb LineComalBin {
0x09a9…09cb ptr = 0x9722 // 0x9a9 @0x0
0x09a9…09cb lno = 0x0366 // 0x9ab @0x2
0x09a9…09cb at0004 = ╱50╱P╱ // 0x9ad @0x4
0x09a9…09cb at0005 = ╱dc╱=╱ // 0x9ae @0x5
0x09a9…09cb at0006 = ╱42╱B╱ // 0x9af @0x6
0x09a9…09cb at0007 = ╱eb╱;╱ // 0x9b0 @0x7
0x09a9…09cb at0008 = ╱54╱T╱ // 0x9b1 @0x8
0x09a9…09cb at0009 = ╱45╱E╱ // 0x9b2 @0x9
0x09a9…09cb at000a = ╱53╱S╱ // 0x9b3 @0xa
0x09a9…09cb at000b = ╱54╱T╱ // 0x9b4 @0xb
0x09a9…09cb at000c = ╱32╱2╱ // 0x9b5 @0xc
0x09a9…09cb at000d = ╱dc╱=╱ // 0x9b6 @0xd
0x09a9…09cb at000e = ╱42╱B╱ // 0x9b7 @0xe
0x09a9…09cb at000f = ╱eb╱;╱ // 0x9b8 @0xf
0x09a9…09cb at0010 = ╱4b╱K╱ // 0x9b9 @0x10
0x09a9…09cb at0011 = ╱54╱T╱ // 0x9ba @0x11
0x09a9…09cb at0012 = ╱41╱A╱ // 0x9bb @0x12
0x09a9…09cb at0013 = ╱4c╱L╱ // 0x9bc @0x13
0x09a9…09cb at0014 = ╱dc╱=╱ // 0x9bd @0x14
0x09a9…09cb at0015 = ╱42╱B╱ // 0x9be @0x15
0x09a9…09cb at0016 = ╱eb╱;╱ // 0x9bf @0x16
0x09a9…09cb at0017 = ╱4c╱L╱ // 0x9c0 @0x17
0x09a9…09cb at0018 = ╱dc╱=╱ // 0x9c1 @0x18
0x09a9…09cb at0019 = ╱cc╱LEN╱ // 0x9c2 @0x19
0x09a9…09cb at001a = ╱ed╱(╱ // 0x9c3 @0x1a
0x09a9…09cb at001b = ╱4e╱N╱ // 0x9c4 @0x1b
0x09a9…09cb at001c = ╱55╱U╱ // 0x9c5 @0x1c
0x09a9…09cb at001d = ╱4d╱M╱ // 0x9c6 @0x1d
0x09a9…09cb at001e = ╱31╱1╱ // 0x9c7 @0x1e
0x09a9…09cb at001f = ╱ef╱$╱ // 0x9c8 @0x1f
0x09a9…09cb at0020 = ╱ee╱)╱ // 0x9c9 @0x20
0x09a9…09cb at0021 = EOL // 0x9ca @0x21
0x09a9…09cb }
0x09cb…09db 9732 0880 IF L>6 THEN EXIT
0x09cb…09db LineComalBin {
0x09cb…09db ptr = 0x9732 // 0x9cb @0x0
0x09cb…09db lno = 0x0370 // 0x9cd @0x2
0x09cb…09db at0004 = ╱82╱ IF ╱ // 0x9cf @0x4
0x09cb…09db at0005 = ╱4c╱L╱ // 0x9d0 @0x5
0x09cb…09db at0006 = ╱de╱>╱ // 0x9d1 @0x6
0x09cb…09db at0007 = ╱36╱6╱ // 0x9d2 @0x7
0x09cb…09db at0008 = ╱fe0000c003╱ // 0x9d3 @0x8
0x09cb…09db at000d = ╱b6╱ THEN ╱ // 0x9d8 @0xd
0x09cb…09db at000e = ╱99╱ EXIT ╱ // 0x9d9 @0xe
0x09cb…09db at000f = EOL // 0x9da @0xf
0x09cb…09db }
0x09db…09e4 973b 0890 CASE L OF
0x09db…09e4 LineComalBin {
0x09db…09e4 ptr = 0x973b // 0x9db @0x0
0x09db…09e4 lno = 0x037a // 0x9dd @0x2
0x09db…09e4 at0004 = ╱a201╱ CASE ╱ // 0x9df @0x4
0x09db…09e4 at0006 = ╱4c╱L╱ // 0x9e1 @0x6
0x09db…09e4 at0007 = ╱ba╱ OF ╱ // 0x9e2 @0x7
0x09db…09e4 at0008 = EOL // 0x9e3 @0x8
0x09db…09e4 }
0x09e4…09ef 9746 0900 FOR I=E TO L
0x09e4…09ef LineComalBin {
0x09e4…09ef ptr = 0x9746 // 0x9e4 @0x0
0x09e4…09ef lno = 0x0384 // 0x9e6 @0x2
0x09e4…09ef at0004 = ╱83╱ FOR ╱ // 0x9e8 @0x4
0x09e4…09ef at0005 = ╱49╱I╱ // 0x9e9 @0x5
0x09e4…09ef at0006 = ╱dc╱=╱ // 0x9ea @0x6
0x09e4…09ef at0007 = ╱45╱E╱ // 0x9eb @0x7
0x09e4…09ef at0008 = ╱b7╱ TO ╱ // 0x9ec @0x8
0x09e4…09ef at0009 = ╱4c╱L╱ // 0x9ed @0x9
0x09e4…09ef at000a = EOL // 0x9ee @0xa
0x09e4…09ef }
0x09ef…0a0d 9764 0910 P1=INT(ORD(NUM1$(I))-48)
0x09ef…0a0d LineComalBin {
0x09ef…0a0d ptr = 0x9764 // 0x9ef @0x0
0x09ef…0a0d lno = 0x038e // 0x9f1 @0x2
0x09ef…0a0d at0004 = ╱50╱P╱ // 0x9f3 @0x4
0x09ef…0a0d at0005 = ╱31╱1╱ // 0x9f4 @0x5
0x09ef…0a0d at0006 = ╱dc╱=╱ // 0x9f5 @0x6
0x09ef…0a0d at0007 = ╱c6╱INT╱ // 0x9f6 @0x7
0x09ef…0a0d at0008 = ╱ed╱(╱ // 0x9f7 @0x8
0x09ef…0a0d at0009 = ╱cd╱ORD╱ // 0x9f8 @0x9
0x09ef…0a0d at000a = ╱ed╱(╱ // 0x9f9 @0xa
0x09ef…0a0d at000b = ╱4e╱N╱ // 0x9fa @0xb
0x09ef…0a0d at000c = ╱55╱U╱ // 0x9fb @0xc
0x09ef…0a0d at000d = ╱4d╱M╱ // 0x9fc @0xd
0x09ef…0a0d at000e = ╱31╱1╱ // 0x9fd @0xe
0x09ef…0a0d at000f = ╱ef╱$╱ // 0x9fe @0xf
0x09ef…0a0d at0010 = ╱ed╱(╱ // 0x9ff @0x10
0x09ef…0a0d at0011 = ╱49╱I╱ // 0xa00 @0x11
0x09ef…0a0d at0012 = ╱ee╱)╱ // 0xa01 @0x12
0x09ef…0a0d at0013 = ╱ee╱)╱ // 0xa02 @0x13
0x09ef…0a0d at0014 = ╱e3╱-╱ // 0xa03 @0x14
0x09ef…0a0d at0015 = ╱34╱4╱ // 0xa04 @0x15
0x09ef…0a0d at0016 = ╱38╱8╱ // 0xa05 @0x16
0x09ef…0a0d at0017 = ╱fe0000c006╱ // 0xa06 @0x17
0x09ef…0a0d at001c = ╱ee╱)╱ // 0xa0b @0x1c
0x09ef…0a0d at001d = EOL // 0xa0c @0x1d
0x09ef…0a0d }
0x0a0d…0a24 977b 0920 IF P1<B OR P1>W THEN TEST2=E
0x0a0d…0a24 LineComalBin {
0x0a0d…0a24 ptr = 0x977b // 0xa0d @0x0
0x0a0d…0a24 lno = 0x0398 // 0xa0f @0x2
0x0a0d…0a24 at0004 = ╱82╱ IF ╱ // 0xa11 @0x4
0x0a0d…0a24 at0005 = ╱50╱P╱ // 0xa12 @0x5
0x0a0d…0a24 at0006 = ╱31╱1╱ // 0xa13 @0x6
0x0a0d…0a24 at0007 = ╱dd╱<╱ // 0xa14 @0x7
0x0a0d…0a24 at0008 = ╱42╱B╱ // 0xa15 @0x8
0x0a0d…0a24 at0009 = ╱db╱ OR ╱ // 0xa16 @0x9
0x0a0d…0a24 at000a = ╱50╱P╱ // 0xa17 @0xa
0x0a0d…0a24 at000b = ╱31╱1╱ // 0xa18 @0xb
0x0a0d…0a24 at000c = ╱de╱>╱ // 0xa19 @0xc
0x0a0d…0a24 at000d = ╱57╱W╱ // 0xa1a @0xd
0x0a0d…0a24 at000e = ╱b6╱ THEN ╱ // 0xa1b @0xe
0x0a0d…0a24 at000f = ╱54╱T╱ // 0xa1c @0xf
0x0a0d…0a24 at0010 = ╱45╱E╱ // 0xa1d @0x10
0x0a0d…0a24 at0011 = ╱53╱S╱ // 0xa1e @0x11
0x0a0d…0a24 at0012 = ╱54╱T╱ // 0xa1f @0x12
0x0a0d…0a24 at0013 = ╱32╱2╱ // 0xa20 @0x13
0x0a0d…0a24 at0014 = ╱dc╱=╱ // 0xa21 @0x14
0x0a0d…0a24 at0015 = ╱45╱E╱ // 0xa22 @0x15
0x0a0d…0a24 at0016 = EOL // 0xa23 @0x16
0x0a0d…0a24 }
0x0a24…0a37 978e 0930 P=P*10+P1
0x0a24…0a37 LineComalBin {
0x0a24…0a37 ptr = 0x978e // 0xa24 @0x0
0x0a24…0a37 lno = 0x03a2 // 0xa26 @0x2
0x0a24…0a37 at0004 = ╱50╱P╱ // 0xa28 @0x4
0x0a24…0a37 at0005 = ╱dc╱=╱ // 0xa29 @0x5
0x0a24…0a37 at0006 = ╱50╱P╱ // 0xa2a @0x6
0x0a24…0a37 at0007 = ╱e4╱*╱ // 0xa2b @0x7
0x0a24…0a37 at0008 = ╱31╱1╱ // 0xa2c @0x8
0x0a24…0a37 at0009 = ╱30╱0╱ // 0xa2d @0x9
0x0a24…0a37 at000a = ╱fe0000a004╱ // 0xa2e @0xa
0x0a24…0a37 at000f = ╱e2╱+╱ // 0xa33 @0xf
0x0a24…0a37 at0010 = ╱50╱P╱ // 0xa34 @0x10
0x0a24…0a37 at0011 = ╱31╱1╱ // 0xa35 @0x11
0x0a24…0a37 at0012 = EOL // 0xa36 @0x12
0x0a24…0a37 }
0x0a37…0a3e 9795 0940 NEXT I
0x0a37…0a3e LineComalBin {
0x0a37…0a3e ptr = 0x9795 // 0xa37 @0x0
0x0a37…0a3e lno = 0x03ac // 0xa39 @0x2
0x0a37…0a3e at0004 = ╱84╱ NEXT ╱ // 0xa3b @0x4
0x0a37…0a3e at0005 = ╱49╱I╱ // 0xa3c @0x5
0x0a37…0a3e at0006 = EOL // 0xa3d @0x6
0x0a37…0a3e }
0x0a3e…0a54 97ab 0950 KTAL=P DIV 10000
0x0a3e…0a54 LineComalBin {
0x0a3e…0a54 ptr = 0x97ab // 0xa3e @0x0
0x0a3e…0a54 lno = 0x03b6 // 0xa40 @0x2
0x0a3e…0a54 at0004 = ╱4b╱K╱ // 0xa42 @0x4
0x0a3e…0a54 at0005 = ╱54╱T╱ // 0xa43 @0x5
0x0a3e…0a54 at0006 = ╱41╱A╱ // 0xa44 @0x6
0x0a3e…0a54 at0007 = ╱4c╱L╱ // 0xa45 @0x7
0x0a3e…0a54 at0008 = ╱dc╱=╱ // 0xa46 @0x8
0x0a3e…0a54 at0009 = ╱50╱P╱ // 0xa47 @0x9
0x0a3e…0a54 at000a = ╱e7╱ DIV ╱ // 0xa48 @0xa
0x0a3e…0a54 at000b = ╱31╱1╱ // 0xa49 @0xb
0x0a3e…0a54 at000c = ╱30╱0╱ // 0xa4a @0xc
0x0a3e…0a54 at000d = ╱30╱0╱ // 0xa4b @0xd
0x0a3e…0a54 at000e = ╱30╱0╱ // 0xa4c @0xe
0x0a3e…0a54 at000f = ╱30╱0╱ // 0xa4d @0xf
0x0a3e…0a54 at0010 = ╱fe00409c0e╱ // 0xa4e @0x10
0x0a3e…0a54 at0015 = EOL // 0xa53 @0x15
0x0a3e…0a54 }
0x0a54…0a5c 97b3 0960 WHEN B
0x0a54…0a5c LineComalBin {
0x0a54…0a5c ptr = 0x97b3 // 0xa54 @0x0
0x0a54…0a5c lno = 0x03c0 // 0xa56 @0x2
0x0a54…0a5c at0004 = ╱a301╱ WHEN ╱ // 0xa58 @0x4
0x0a54…0a5c at0006 = ╱42╱B╱ // 0xa5a @0x6
0x0a54…0a5c at0007 = EOL // 0xa5b @0x7
0x0a54…0a5c }
0x0a5c…0a65 97bc 0970 P=-E
0x0a5c…0a65 LineComalBin {
0x0a5c…0a65 ptr = 0x97bc // 0xa5c @0x0
0x0a5c…0a65 lno = 0x03ca // 0xa5e @0x2
0x0a5c…0a65 at0004 = ╱50╱P╱ // 0xa60 @0x4
0x0a5c…0a65 at0005 = ╱dc╱=╱ // 0xa61 @0x5
0x0a5c…0a65 at0006 = ╱e9╱-╱ // 0xa62 @0x6
0x0a5c…0a65 at0007 = ╱45╱E╱ // 0xa63 @0x7
0x0a5c…0a65 at0008 = EOL // 0xa64 @0x8
0x0a5c…0a65 }
0x0a65…0a6d 97c4 0980 WHEN E
0x0a65…0a6d LineComalBin {
0x0a65…0a6d ptr = 0x97c4 // 0xa65 @0x0
0x0a65…0a6d lno = 0x03d4 // 0xa67 @0x2
0x0a65…0a6d at0004 = ╱a301╱ WHEN ╱ // 0xa69 @0x4
0x0a65…0a6d at0006 = ╱45╱E╱ // 0xa6b @0x6
0x0a65…0a6d at0007 = EOL // 0xa6c @0x7
0x0a65…0a6d }
0x0a6d…0a7a 97d1 0990 CASE NUM1$ OF
0x0a6d…0a7a LineComalBin {
0x0a6d…0a7a ptr = 0x97d1 // 0xa6d @0x0
0x0a6d…0a7a lno = 0x03de // 0xa6f @0x2
0x0a6d…0a7a at0004 = ╱a200╱ CASE ╱ // 0xa71 @0x4
0x0a6d…0a7a at0006 = ╱4e╱N╱ // 0xa73 @0x6
0x0a6d…0a7a at0007 = ╱55╱U╱ // 0xa74 @0x7
0x0a6d…0a7a at0008 = ╱4d╱M╱ // 0xa75 @0x8
0x0a6d…0a7a at0009 = ╱31╱1╱ // 0xa76 @0x9
0x0a6d…0a7a at000a = ╱ef╱$╱ // 0xa77 @0xa
0x0a6d…0a7a at000b = ╱ba╱ OF ╱ // 0xa78 @0xb
0x0a6d…0a7a at000c = EOL // 0xa79 @0xc
0x0a6d…0a7a }
0x0a7a…0a94 97eb 1000 P=INT(ORD(NUM1$)-48)
0x0a7a…0a94 LineComalBin {
0x0a7a…0a94 ptr = 0x97eb // 0xa7a @0x0
0x0a7a…0a94 lno = 0x03e8 // 0xa7c @0x2
0x0a7a…0a94 at0004 = ╱50╱P╱ // 0xa7e @0x4
0x0a7a…0a94 at0005 = ╱dc╱=╱ // 0xa7f @0x5
0x0a7a…0a94 at0006 = ╱c6╱INT╱ // 0xa80 @0x6
0x0a7a…0a94 at0007 = ╱ed╱(╱ // 0xa81 @0x7
0x0a7a…0a94 at0008 = ╱cd╱ORD╱ // 0xa82 @0x8
0x0a7a…0a94 at0009 = ╱ed╱(╱ // 0xa83 @0x9
0x0a7a…0a94 at000a = ╱4e╱N╱ // 0xa84 @0xa
0x0a7a…0a94 at000b = ╱55╱U╱ // 0xa85 @0xb
0x0a7a…0a94 at000c = ╱4d╱M╱ // 0xa86 @0xc
0x0a7a…0a94 at000d = ╱31╱1╱ // 0xa87 @0xd
0x0a7a…0a94 at000e = ╱ef╱$╱ // 0xa88 @0xe
0x0a7a…0a94 at000f = ╱ee╱)╱ // 0xa89 @0xf
0x0a7a…0a94 at0010 = ╱e3╱-╱ // 0xa8a @0x10
0x0a7a…0a94 at0011 = ╱34╱4╱ // 0xa8b @0x11
0x0a7a…0a94 at0012 = ╱38╱8╱ // 0xa8c @0x12
0x0a7a…0a94 at0013 = ╱fe0000c006╱ // 0xa8d @0x13
0x0a7a…0a94 at0018 = ╱ee╱)╱ // 0xa92 @0x18
0x0a7a…0a94 at0019 = EOL // 0xa93 @0x19
0x0a7a…0a94 }
0x0a94…0aa2 97f9 1010 WHEN "D","d"
0x0a94…0aa2 LineComalBin {
0x0a94…0aa2 ptr = 0x97f9 // 0xa94 @0x0
0x0a94…0aa2 lno = 0x03f2 // 0xa96 @0x2
0x0a94…0aa2 at0004 = ╱a300╱ WHEN ╱ // 0xa98 @0x4
0x0a94…0aa2 at0006 = ╱22╱"╱ // 0xa9a @0x6
0x0a94…0aa2 at0007 = ╱44╱D╱ // 0xa9b @0x7
0x0a94…0aa2 at0008 = ╱22╱"╱ // 0xa9c @0x8
0x0a94…0aa2 at0009 = ╱ec╱,╱ // 0xa9d @0x9
0x0a94…0aa2 at000a = ╱22╱"╱ // 0xa9e @0xa
0x0a94…0aa2 at000b = ╱64╱d╱ // 0xa9f @0xb
0x0a94…0aa2 at000c = ╱22╱"╱ // 0xaa0 @0xc
0x0a94…0aa2 at000d = EOL // 0xaa1 @0xd
0x0a94…0aa2 }
0x0aa2…0aab 9802 1020 P=-G
0x0aa2…0aab LineComalBin {
0x0aa2…0aab ptr = 0x9802 // 0xaa2 @0x0
0x0aa2…0aab lno = 0x03fc // 0xaa4 @0x2
0x0aa2…0aab at0004 = ╱50╱P╱ // 0xaa6 @0x4
0x0aa2…0aab at0005 = ╱dc╱=╱ // 0xaa7 @0x5
0x0aa2…0aab at0006 = ╱e9╱-╱ // 0xaa8 @0x6
0x0aa2…0aab at0007 = ╱47╱G╱ // 0xaa9 @0x7
0x0aa2…0aab at0008 = EOL // 0xaaa @0x8
0x0aa2…0aab }
0x0aab…0ab9 9810 1030 WHEN "A","a"
0x0aab…0ab9 LineComalBin {
0x0aab…0ab9 ptr = 0x9810 // 0xaab @0x0
0x0aab…0ab9 lno = 0x0406 // 0xaad @0x2
0x0aab…0ab9 at0004 = ╱a300╱ WHEN ╱ // 0xaaf @0x4
0x0aab…0ab9 at0006 = ╱22╱"╱ // 0xab1 @0x6
0x0aab…0ab9 at0007 = ╱41╱A╱ // 0xab2 @0x7
0x0aab…0ab9 at0008 = ╱22╱"╱ // 0xab3 @0x8
0x0aab…0ab9 at0009 = ╱ec╱,╱ // 0xab4 @0x9
0x0aab…0ab9 at000a = ╱22╱"╱ // 0xab5 @0xa
0x0aab…0ab9 at000b = ╱61╱a╱ // 0xab6 @0xb
0x0aab…0ab9 at000c = ╱22╱"╱ // 0xab7 @0xc
0x0aab…0ab9 at000d = EOL // 0xab8 @0xd
0x0aab…0ab9 }
0x0ab9…0ac2 9819 1040 P=-V
0x0ab9…0ac2 LineComalBin {
0x0ab9…0ac2 ptr = 0x9819 // 0xab9 @0x0
0x0ab9…0ac2 lno = 0x0410 // 0xabb @0x2
0x0ab9…0ac2 at0004 = ╱50╱P╱ // 0xabd @0x4
0x0ab9…0ac2 at0005 = ╱dc╱=╱ // 0xabe @0x5
0x0ab9…0ac2 at0006 = ╱e9╱-╱ // 0xabf @0x6
0x0ab9…0ac2 at0007 = ╱56╱V╱ // 0xac0 @0x7
0x0ab9…0ac2 at0008 = EOL // 0xac1 @0x8
0x0ab9…0ac2 }
0x0ac2…0ad0 9827 1050 WHEN "M","m"
0x0ac2…0ad0 LineComalBin {
0x0ac2…0ad0 ptr = 0x9827 // 0xac2 @0x0
0x0ac2…0ad0 lno = 0x041a // 0xac4 @0x2
0x0ac2…0ad0 at0004 = ╱a300╱ WHEN ╱ // 0xac6 @0x4
0x0ac2…0ad0 at0006 = ╱22╱"╱ // 0xac8 @0x6
0x0ac2…0ad0 at0007 = ╱4d╱M╱ // 0xac9 @0x7
0x0ac2…0ad0 at0008 = ╱22╱"╱ // 0xaca @0x8
0x0ac2…0ad0 at0009 = ╱ec╱,╱ // 0xacb @0x9
0x0ac2…0ad0 at000a = ╱22╱"╱ // 0xacc @0xa
0x0ac2…0ad0 at000b = ╱6d╱m╱ // 0xacd @0xb
0x0ac2…0ad0 at000c = ╱22╱"╱ // 0xace @0xc
0x0ac2…0ad0 at000d = EOL // 0xacf @0xd
0x0ac2…0ad0 }
0x0ad0…0ade 9835 1060 P=-4
0x0ad0…0ade LineComalBin {
0x0ad0…0ade ptr = 0x9835 // 0xad0 @0x0
0x0ad0…0ade lno = 0x0424 // 0xad2 @0x2
0x0ad0…0ade at0004 = ╱50╱P╱ // 0xad4 @0x4
0x0ad0…0ade at0005 = ╱dc╱=╱ // 0xad5 @0x5
0x0ad0…0ade at0006 = ╱e9╱-╱ // 0xad6 @0x6
0x0ad0…0ade at0007 = ╱34╱4╱ // 0xad7 @0x7
0x0ad0…0ade at0008 = ╱fe00008003╱ // 0xad8 @0x8
0x0ad0…0ade at000d = EOL // 0xadd @0xd
0x0ad0…0ade }
0x0ade…0aec 9843 1070 WHEN "J","j"
0x0ade…0aec LineComalBin {
0x0ade…0aec ptr = 0x9843 // 0xade @0x0
0x0ade…0aec lno = 0x042e // 0xae0 @0x2
0x0ade…0aec at0004 = ╱a300╱ WHEN ╱ // 0xae2 @0x4
0x0ade…0aec at0006 = ╱22╱"╱ // 0xae4 @0x6
0x0ade…0aec at0007 = ╱4a╱J╱ // 0xae5 @0x7
0x0ade…0aec at0008 = ╱22╱"╱ // 0xae6 @0x8
0x0ade…0aec at0009 = ╱ec╱,╱ // 0xae7 @0x9
0x0ade…0aec at000a = ╱22╱"╱ // 0xae8 @0xa
0x0ade…0aec at000b = ╱6a╱j╱ // 0xae9 @0xb
0x0ade…0aec at000c = ╱22╱"╱ // 0xaea @0xc
0x0ade…0aec at000d = EOL // 0xaeb @0xd
0x0ade…0aec }
0x0aec…0afa 9851 1080 P=-7
0x0aec…0afa LineComalBin {
0x0aec…0afa ptr = 0x9851 // 0xaec @0x0
0x0aec…0afa lno = 0x0438 // 0xaee @0x2
0x0aec…0afa at0004 = ╱50╱P╱ // 0xaf0 @0x4
0x0aec…0afa at0005 = ╱dc╱=╱ // 0xaf1 @0x5
0x0aec…0afa at0006 = ╱e9╱-╱ // 0xaf2 @0x6
0x0aec…0afa at0007 = ╱37╱7╱ // 0xaf3 @0x7
0x0aec…0afa at0008 = ╱fe0000e003╱ // 0xaf4 @0x8
0x0aec…0afa at000d = EOL // 0xaf9 @0xd
0x0aec…0afa }
0x0afa…0b08 985f 1090 WHEN "N","n"
0x0afa…0b08 LineComalBin {
0x0afa…0b08 ptr = 0x985f // 0xafa @0x0
0x0afa…0b08 lno = 0x0442 // 0xafc @0x2
0x0afa…0b08 at0004 = ╱a300╱ WHEN ╱ // 0xafe @0x4
0x0afa…0b08 at0006 = ╱22╱"╱ // 0xb00 @0x6
0x0afa…0b08 at0007 = ╱4e╱N╱ // 0xb01 @0x7
0x0afa…0b08 at0008 = ╱22╱"╱ // 0xb02 @0x8
0x0afa…0b08 at0009 = ╱ec╱,╱ // 0xb03 @0x9
0x0afa…0b08 at000a = ╱22╱"╱ // 0xb04 @0xa
0x0afa…0b08 at000b = ╱6e╱n╱ // 0xb05 @0xb
0x0afa…0b08 at000c = ╱22╱"╱ // 0xb06 @0xc
0x0afa…0b08 at000d = EOL // 0xb07 @0xd
0x0afa…0b08 }
0x0b08…0b16 986d 1100 P=-8
0x0b08…0b16 LineComalBin {
0x0b08…0b16 ptr = 0x986d // 0xb08 @0x0
0x0b08…0b16 lno = 0x044c // 0xb0a @0x2
0x0b08…0b16 at0004 = ╱50╱P╱ // 0xb0c @0x4
0x0b08…0b16 at0005 = ╱dc╱=╱ // 0xb0d @0x5
0x0b08…0b16 at0006 = ╱e9╱-╱ // 0xb0e @0x6
0x0b08…0b16 at0007 = ╱38╱8╱ // 0xb0f @0x7
0x0b08…0b16 at0008 = ╱fe00008004╱ // 0xb10 @0x8
0x0b08…0b16 at000d = EOL // 0xb15 @0xd
0x0b08…0b16 }
0x0b16…0b1c 9873 1110 ENDCASE
0x0b16…0b1c LineComalBin {
0x0b16…0b1c ptr = 0x9873 // 0xb16 @0x0
0x0b16…0b1c lno = 0x0456 // 0xb18 @0x2
0x0b16…0b1c at0004 = ╱a4╱ ENDCASE ╱ // 0xb1a @0x4
0x0b16…0b1c at0005 = EOL // 0xb1b @0x5
0x0b16…0b1c }
0x0b1c…0b22 9879 1120 ENDCASE
0x0b1c…0b22 LineComalBin {
0x0b1c…0b22 ptr = 0x9879 // 0xb1c @0x0
0x0b1c…0b22 lno = 0x0460 // 0xb1e @0x2
0x0b1c…0b22 at0004 = ╱a4╱ ENDCASE ╱ // 0xb20 @0x4
0x0b1c…0b22 at0005 = EOL // 0xb21 @0x5
0x0b1c…0b22 }
0x0b22…0b28 987f 1130 ENDPROC
0x0b22…0b28 LineComalBin {
0x0b22…0b28 ptr = 0x987f // 0xb22 @0x0
0x0b22…0b28 lno = 0x046a // 0xb24 @0x2
0x0b22…0b28 at0004 = ╱9f╱ ENDPROC ╱ // 0xb26 @0x4
0x0b22…0b28 at0005 = EOL // 0xb27 @0x5
0x0b22…0b28 }
0x0b28…0b3f 9896 1140 PROC FEJL(NR1,NR2,NR3)
0x0b28…0b3f LineComalBin {
0x0b28…0b3f ptr = 0x9896 // 0xb28 @0x0
0x0b28…0b3f lno = 0x0474 // 0xb2a @0x2
0x0b28…0b3f at0004 = ╱9e╱ PROC ╱ // 0xb2c @0x4
0x0b28…0b3f at0005 = ╱46╱F╱ // 0xb2d @0x5
0x0b28…0b3f at0006 = ╱45╱E╱ // 0xb2e @0x6
0x0b28…0b3f at0007 = ╱4a╱J╱ // 0xb2f @0x7
0x0b28…0b3f at0008 = ╱4c╱L╱ // 0xb30 @0x8
0x0b28…0b3f at0009 = ╱ed╱(╱ // 0xb31 @0x9
0x0b28…0b3f at000a = ╱4e╱N╱ // 0xb32 @0xa
0x0b28…0b3f at000b = ╱52╱R╱ // 0xb33 @0xb
0x0b28…0b3f at000c = ╱31╱1╱ // 0xb34 @0xc
0x0b28…0b3f at000d = ╱ec╱,╱ // 0xb35 @0xd
0x0b28…0b3f at000e = ╱4e╱N╱ // 0xb36 @0xe
0x0b28…0b3f at000f = ╱52╱R╱ // 0xb37 @0xf
0x0b28…0b3f at0010 = ╱32╱2╱ // 0xb38 @0x10
0x0b28…0b3f at0011 = ╱ec╱,╱ // 0xb39 @0x11
0x0b28…0b3f at0012 = ╱4e╱N╱ // 0xb3a @0x12
0x0b28…0b3f at0013 = ╱52╱R╱ // 0xb3b @0x13
0x0b28…0b3f at0014 = ╱33╱3╱ // 0xb3c @0x14
0x0b28…0b3f at0015 = ╱ee╱)╱ // 0xb3d @0x15
0x0b28…0b3f at0016 = EOL // 0xb3e @0x16
0x0b28…0b3f }
0x0b3f…0b4f 98a6 1150 IF STATUS(NR3$)<>B THEN
0x0b3f…0b4f LineComalBin {
0x0b3f…0b4f ptr = 0x98a6 // 0xb3f @0x0
0x0b3f…0b4f lno = 0x047e // 0xb41 @0x2
0x0b3f…0b4f at0004 = ╱9c╱ IF ╱ // 0xb43 @0x4
0x0b3f…0b4f at0005 = ╱ce╱STATUS╱ // 0xb44 @0x5
0x0b3f…0b4f at0006 = ╱ed╱(╱ // 0xb45 @0x6
0x0b3f…0b4f at0007 = ╱4e╱N╱ // 0xb46 @0x7
0x0b3f…0b4f at0008 = ╱52╱R╱ // 0xb47 @0x8
0x0b3f…0b4f at0009 = ╱33╱3╱ // 0xb48 @0x9
0x0b3f…0b4f at000a = ╱ef╱$╱ // 0xb49 @0xa
0x0b3f…0b4f at000b = ╱ee╱)╱ // 0xb4a @0xb
0x0b3f…0b4f at000c = ╱e1╱<>╱ // 0xb4b @0xc
0x0b3f…0b4f at000d = ╱42╱B╱ // 0xb4c @0xd
0x0b3f…0b4f at000e = ╱b6╱ THEN ╱ // 0xb4d @0xe
0x0b3f…0b4f at000f = EOL // 0xb4e @0xf
0x0b3f…0b4f }
0x0b4f…0b69 98c0 1160 PRINT STATUS(NR3$),NR1,NR2,NR3$
0x0b4f…0b69 LineComalBin {
0x0b4f…0b69 ptr = 0x98c0 // 0xb4f @0x0
0x0b4f…0b69 lno = 0x0488 // 0xb51 @0x2
0x0b4f…0b69 at0004 = ╱92╱ PRINT ╱ // 0xb53 @0x4
0x0b4f…0b69 at0005 = ╱ce╱STATUS╱ // 0xb54 @0x5
0x0b4f…0b69 at0006 = ╱ed╱(╱ // 0xb55 @0x6
0x0b4f…0b69 at0007 = ╱4e╱N╱ // 0xb56 @0x7
0x0b4f…0b69 at0008 = ╱52╱R╱ // 0xb57 @0x8
0x0b4f…0b69 at0009 = ╱33╱3╱ // 0xb58 @0x9
0x0b4f…0b69 at000a = ╱ef╱$╱ // 0xb59 @0xa
0x0b4f…0b69 at000b = ╱ee╱)╱ // 0xb5a @0xb
0x0b4f…0b69 at000c = ╱ec╱,╱ // 0xb5b @0xc
0x0b4f…0b69 at000d = ╱4e╱N╱ // 0xb5c @0xd
0x0b4f…0b69 at000e = ╱52╱R╱ // 0xb5d @0xe
0x0b4f…0b69 at000f = ╱31╱1╱ // 0xb5e @0xf
0x0b4f…0b69 at0010 = ╱ec╱,╱ // 0xb5f @0x10
0x0b4f…0b69 at0011 = ╱4e╱N╱ // 0xb60 @0x11
0x0b4f…0b69 at0012 = ╱52╱R╱ // 0xb61 @0x12
0x0b4f…0b69 at0013 = ╱32╱2╱ // 0xb62 @0x13
0x0b4f…0b69 at0014 = ╱ec╱,╱ // 0xb63 @0x14
0x0b4f…0b69 at0015 = ╱4e╱N╱ // 0xb64 @0x15
0x0b4f…0b69 at0016 = ╱52╱R╱ // 0xb65 @0x16
0x0b4f…0b69 at0017 = ╱33╱3╱ // 0xb66 @0x17
0x0b4f…0b69 at0018 = ╱ef╱$╱ // 0xb67 @0x18
0x0b4f…0b69 at0019 = EOL // 0xb68 @0x19
0x0b4f…0b69 }
0x0b69…0b6f 98c6 1170 STOP
0x0b69…0b6f LineComalBin {
0x0b69…0b6f ptr = 0x98c6 // 0xb69 @0x0
0x0b69…0b6f lno = 0x0492 // 0xb6b @0x2
0x0b69…0b6f at0004 = ╱8d╱ STOP ╱ // 0xb6d @0x4
0x0b69…0b6f at0005 = EOL // 0xb6e @0x5
0x0b69…0b6f }
0x0b6f…0b75 98cc 1180 ENDIF
0x0b6f…0b75 LineComalBin {
0x0b6f…0b75 ptr = 0x98cc // 0xb6f @0x0
0x0b6f…0b75 lno = 0x049c // 0xb71 @0x2
0x0b6f…0b75 at0004 = ╱9b╱ ENDIF ╱ // 0xb73 @0x4
0x0b6f…0b75 at0005 = EOL // 0xb74 @0x5
0x0b6f…0b75 }
0x0b75…0b7b 98d2 1190 ENDPROC
0x0b75…0b7b LineComalBin {
0x0b75…0b7b ptr = 0x98d2 // 0xb75 @0x0
0x0b75…0b7b lno = 0x04a6 // 0xb77 @0x2
0x0b75…0b7b at0004 = ╱9f╱ ENDPROC ╱ // 0xb79 @0x4
0x0b75…0b7b at0005 = EOL // 0xb7a @0x5
0x0b75…0b7b }
0x0b7b…0b9a 98f1 1200 PROC TUD(BLB1,UBLB1,TEGN,STØR)
0x0b7b…0b9a LineComalBin {
0x0b7b…0b9a ptr = 0x98f1 // 0xb7b @0x0
0x0b7b…0b9a lno = 0x04b0 // 0xb7d @0x2
0x0b7b…0b9a at0004 = ╱9e╱ PROC ╱ // 0xb7f @0x4
0x0b7b…0b9a at0005 = ╱54╱T╱ // 0xb80 @0x5
0x0b7b…0b9a at0006 = ╱55╱U╱ // 0xb81 @0x6
0x0b7b…0b9a at0007 = ╱44╱D╱ // 0xb82 @0x7
0x0b7b…0b9a at0008 = ╱ed╱(╱ // 0xb83 @0x8
0x0b7b…0b9a at0009 = ╱42╱B╱ // 0xb84 @0x9
0x0b7b…0b9a at000a = ╱4c╱L╱ // 0xb85 @0xa
0x0b7b…0b9a at000b = ╱42╱B╱ // 0xb86 @0xb
0x0b7b…0b9a at000c = ╱31╱1╱ // 0xb87 @0xc
0x0b7b…0b9a at000d = ╱ec╱,╱ // 0xb88 @0xd
0x0b7b…0b9a at000e = ╱55╱U╱ // 0xb89 @0xe
0x0b7b…0b9a at000f = ╱42╱B╱ // 0xb8a @0xf
0x0b7b…0b9a at0010 = ╱4c╱L╱ // 0xb8b @0x10
0x0b7b…0b9a at0011 = ╱42╱B╱ // 0xb8c @0x11
0x0b7b…0b9a at0012 = ╱31╱1╱ // 0xb8d @0x12
0x0b7b…0b9a at0013 = ╱ec╱,╱ // 0xb8e @0x13
0x0b7b…0b9a at0014 = ╱54╱T╱ // 0xb8f @0x14
0x0b7b…0b9a at0015 = ╱45╱E╱ // 0xb90 @0x15
0x0b7b…0b9a at0016 = ╱47╱G╱ // 0xb91 @0x16
0x0b7b…0b9a at0017 = ╱4e╱N╱ // 0xb92 @0x17
0x0b7b…0b9a at0018 = ╱ec╱,╱ // 0xb93 @0x18
0x0b7b…0b9a at0019 = ╱53╱S╱ // 0xb94 @0x19
0x0b7b…0b9a at001a = ╱54╱T╱ // 0xb95 @0x1a
0x0b7b…0b9a at001b = ╱5c╱Ø╱ // 0xb96 @0x1b
0x0b7b…0b9a at001c = ╱52╱R╱ // 0xb97 @0x1c
0x0b7b…0b9a at001d = ╱ee╱)╱ // 0xb98 @0x1d
0x0b7b…0b9a at001e = EOL // 0xb99 @0x1e
0x0b7b…0b9a }
0x0b9a…0bbf 9916 1210 EXEC CALC(5,BLB1$,TAL4$,UBLB1$)
0x0b9a…0bbf LineComalBin {
0x0b9a…0bbf ptr = 0x9916 // 0xb9a @0x0
0x0b9a…0bbf lno = 0x04ba // 0xb9c @0x2
0x0b9a…0bbf at0004 = ╱9d╱ EXEC ╱ // 0xb9e @0x4
0x0b9a…0bbf at0005 = ╱43╱C╱ // 0xb9f @0x5
0x0b9a…0bbf at0006 = ╱41╱A╱ // 0xba0 @0x6
0x0b9a…0bbf at0007 = ╱4c╱L╱ // 0xba1 @0x7
0x0b9a…0bbf at0008 = ╱43╱C╱ // 0xba2 @0x8
0x0b9a…0bbf at0009 = ╱ed╱(╱ // 0xba3 @0x9
0x0b9a…0bbf at000a = ╱35╱5╱ // 0xba4 @0xa
0x0b9a…0bbf at000b = ╱fe0000a003╱ // 0xba5 @0xb
0x0b9a…0bbf at0010 = ╱ec╱,╱ // 0xbaa @0x10
0x0b9a…0bbf at0011 = ╱42╱B╱ // 0xbab @0x11
0x0b9a…0bbf at0012 = ╱4c╱L╱ // 0xbac @0x12
0x0b9a…0bbf at0013 = ╱42╱B╱ // 0xbad @0x13
0x0b9a…0bbf at0014 = ╱31╱1╱ // 0xbae @0x14
0x0b9a…0bbf at0015 = ╱ef╱$╱ // 0xbaf @0x15
0x0b9a…0bbf at0016 = ╱ec╱,╱ // 0xbb0 @0x16
0x0b9a…0bbf at0017 = ╱54╱T╱ // 0xbb1 @0x17
0x0b9a…0bbf at0018 = ╱41╱A╱ // 0xbb2 @0x18
0x0b9a…0bbf at0019 = ╱4c╱L╱ // 0xbb3 @0x19
0x0b9a…0bbf at001a = ╱34╱4╱ // 0xbb4 @0x1a
0x0b9a…0bbf at001b = ╱ef╱$╱ // 0xbb5 @0x1b
0x0b9a…0bbf at001c = ╱ec╱,╱ // 0xbb6 @0x1c
0x0b9a…0bbf at001d = ╱55╱U╱ // 0xbb7 @0x1d
0x0b9a…0bbf at001e = ╱42╱B╱ // 0xbb8 @0x1e
0x0b9a…0bbf at001f = ╱4c╱L╱ // 0xbb9 @0x1f
0x0b9a…0bbf at0020 = ╱42╱B╱ // 0xbba @0x20
0x0b9a…0bbf at0021 = ╱31╱1╱ // 0xbbb @0x21
0x0b9a…0bbf at0022 = ╱ef╱$╱ // 0xbbc @0x22
0x0b9a…0bbf at0023 = ╱ee╱)╱ // 0xbbd @0x23
0x0b9a…0bbf at0024 = EOL // 0xbbe @0x24
0x0b9a…0bbf }
0x0bbf…0bcc 9923 1220 IF TEGN=B THEN
0x0bbf…0bcc LineComalBin {
0x0bbf…0bcc ptr = 0x9923 // 0xbbf @0x0
0x0bbf…0bcc lno = 0x04c4 // 0xbc1 @0x2
0x0bbf…0bcc at0004 = ╱9c╱ IF ╱ // 0xbc3 @0x4
0x0bbf…0bcc at0005 = ╱54╱T╱ // 0xbc4 @0x5
0x0bbf…0bcc at0006 = ╱45╱E╱ // 0xbc5 @0x6
0x0bbf…0bcc at0007 = ╱47╱G╱ // 0xbc6 @0x7
0x0bbf…0bcc at0008 = ╱4e╱N╱ // 0xbc7 @0x8
0x0bbf…0bcc at0009 = ╱dc╱=╱ // 0xbc8 @0x9
0x0bbf…0bcc at000a = ╱42╱B╱ // 0xbc9 @0xa
0x0bbf…0bcc at000b = ╱b6╱ THEN ╱ // 0xbca @0xb
0x0bbf…0bcc at000c = EOL // 0xbcb @0xc
0x0bbf…0bcc }
0x0bcc…0be9 9940 1230 UBLB1$=UBLB1$(E:13)
0x0bcc…0be9 LineComalBin {
0x0bcc…0be9 ptr = 0x9940 // 0xbcc @0x0
0x0bcc…0be9 lno = 0x04ce // 0xbce @0x2
0x0bcc…0be9 at0004 = ╱55╱U╱ // 0xbd0 @0x4
0x0bcc…0be9 at0005 = ╱42╱B╱ // 0xbd1 @0x5
0x0bcc…0be9 at0006 = ╱4c╱L╱ // 0xbd2 @0x6
0x0bcc…0be9 at0007 = ╱42╱B╱ // 0xbd3 @0x7
0x0bcc…0be9 at0008 = ╱31╱1╱ // 0xbd4 @0x8
0x0bcc…0be9 at0009 = ╱ef╱$╱ // 0xbd5 @0x9
0x0bcc…0be9 at000a = ╱dc╱=╱ // 0xbd6 @0xa
0x0bcc…0be9 at000b = ╱55╱U╱ // 0xbd7 @0xb
0x0bcc…0be9 at000c = ╱42╱B╱ // 0xbd8 @0xc
0x0bcc…0be9 at000d = ╱4c╱L╱ // 0xbd9 @0xd
0x0bcc…0be9 at000e = ╱42╱B╱ // 0xbda @0xe
0x0bcc…0be9 at000f = ╱31╱1╱ // 0xbdb @0xf
0x0bcc…0be9 at0010 = ╱ef╱$╱ // 0xbdc @0x10
0x0bcc…0be9 at0011 = ╱ed╱(╱ // 0xbdd @0x11
0x0bcc…0be9 at0012 = ╱45╱E╱ // 0xbde @0x12
0x0bcc…0be9 at0013 = ╱f0╱:╱ // 0xbdf @0x13
0x0bcc…0be9 at0014 = ╱31╱1╱ // 0xbe0 @0x14
0x0bcc…0be9 at0015 = ╱33╱3╱ // 0xbe1 @0x15
0x0bcc…0be9 at0016 = ╱fe0000d004╱ // 0xbe2 @0x16
0x0bcc…0be9 at001b = ╱ee╱)╱ // 0xbe7 @0x1b
0x0bcc…0be9 at001c = EOL // 0xbe8 @0x1c
0x0bcc…0be9 }
0x0be9…0bef 9946 1240 ELSE
0x0be9…0bef LineComalBin {
0x0be9…0bef ptr = 0x9946 // 0xbe9 @0x0
0x0be9…0bef lno = 0x04d8 // 0xbeb @0x2
0x0be9…0bef at0004 = ╱9a╱ ELSE ╱ // 0xbed @0x4
0x0be9…0bef at0005 = EOL // 0xbee @0x5
0x0be9…0bef }
0x0bef…0c12 9969 1250 IF TEGN=E AND UBLB1$(LEN(UBLB1$))="+" THEN
0x0bef…0c12 LineComalBin {
0x0bef…0c12 ptr = 0x9969 // 0xbef @0x0
0x0bef…0c12 lno = 0x04e2 // 0xbf1 @0x2
0x0bef…0c12 at0004 = ╱9c╱ IF ╱ // 0xbf3 @0x4
0x0bef…0c12 at0005 = ╱54╱T╱ // 0xbf4 @0x5
0x0bef…0c12 at0006 = ╱45╱E╱ // 0xbf5 @0x6
0x0bef…0c12 at0007 = ╱47╱G╱ // 0xbf6 @0x7
0x0bef…0c12 at0008 = ╱4e╱N╱ // 0xbf7 @0x8
0x0bef…0c12 at0009 = ╱dc╱=╱ // 0xbf8 @0x9
0x0bef…0c12 at000a = ╱45╱E╱ // 0xbf9 @0xa
0x0bef…0c12 at000b = ╱da╱ AND ╱ // 0xbfa @0xb
0x0bef…0c12 at000c = ╱55╱U╱ // 0xbfb @0xc
0x0bef…0c12 at000d = ╱42╱B╱ // 0xbfc @0xd
0x0bef…0c12 at000e = ╱4c╱L╱ // 0xbfd @0xe
0x0bef…0c12 at000f = ╱42╱B╱ // 0xbfe @0xf
0x0bef…0c12 at0010 = ╱31╱1╱ // 0xbff @0x10
0x0bef…0c12 at0011 = ╱ef╱$╱ // 0xc00 @0x11
0x0bef…0c12 at0012 = ╱ed╱(╱ // 0xc01 @0x12
0x0bef…0c12 at0013 = ╱cc╱LEN╱ // 0xc02 @0x13
0x0bef…0c12 at0014 = ╱ed╱(╱ // 0xc03 @0x14
0x0bef…0c12 at0015 = ╱55╱U╱ // 0xc04 @0x15
0x0bef…0c12 at0016 = ╱42╱B╱ // 0xc05 @0x16
0x0bef…0c12 at0017 = ╱4c╱L╱ // 0xc06 @0x17
0x0bef…0c12 at0018 = ╱42╱B╱ // 0xc07 @0x18
0x0bef…0c12 at0019 = ╱31╱1╱ // 0xc08 @0x19
0x0bef…0c12 at001a = ╱ef╱$╱ // 0xc09 @0x1a
0x0bef…0c12 at001b = ╱ee╱)╱ // 0xc0a @0x1b
0x0bef…0c12 at001c = ╱ee╱)╱ // 0xc0b @0x1c
0x0bef…0c12 at001d = ╱dc╱=╱ // 0xc0c @0x1d
0x0bef…0c12 at001e = ╱22╱"╱ // 0xc0d @0x1e
0x0bef…0c12 at001f = ╱2b╱+╱ // 0xc0e @0x1f
0x0bef…0c12 at0020 = ╱22╱"╱ // 0xc0f @0x20
0x0bef…0c12 at0021 = ╱b6╱ THEN ╱ // 0xc10 @0x21
0x0bef…0c12 at0022 = EOL // 0xc11 @0x22
0x0bef…0c12 }
0x0c12…0c2c 9983 1260 UBLB1$(LEN(UBLB1$))=" "
0x0c12…0c2c LineComalBin {
0x0c12…0c2c ptr = 0x9983 // 0xc12 @0x0
0x0c12…0c2c lno = 0x04ec // 0xc14 @0x2
0x0c12…0c2c at0004 = ╱55╱U╱ // 0xc16 @0x4
0x0c12…0c2c at0005 = ╱42╱B╱ // 0xc17 @0x5
0x0c12…0c2c at0006 = ╱4c╱L╱ // 0xc18 @0x6
0x0c12…0c2c at0007 = ╱42╱B╱ // 0xc19 @0x7
0x0c12…0c2c at0008 = ╱31╱1╱ // 0xc1a @0x8
0x0c12…0c2c at0009 = ╱ef╱$╱ // 0xc1b @0x9
0x0c12…0c2c at000a = ╱ed╱(╱ // 0xc1c @0xa
0x0c12…0c2c at000b = ╱cc╱LEN╱ // 0xc1d @0xb
0x0c12…0c2c at000c = ╱ed╱(╱ // 0xc1e @0xc
0x0c12…0c2c at000d = ╱55╱U╱ // 0xc1f @0xd
0x0c12…0c2c at000e = ╱42╱B╱ // 0xc20 @0xe
0x0c12…0c2c at000f = ╱4c╱L╱ // 0xc21 @0xf
0x0c12…0c2c at0010 = ╱42╱B╱ // 0xc22 @0x10
0x0c12…0c2c at0011 = ╱31╱1╱ // 0xc23 @0x11
0x0c12…0c2c at0012 = ╱ef╱$╱ // 0xc24 @0x12
0x0c12…0c2c at0013 = ╱ee╱)╱ // 0xc25 @0x13
0x0c12…0c2c at0014 = ╱ee╱)╱ // 0xc26 @0x14
0x0c12…0c2c at0015 = ╱dc╱=╱ // 0xc27 @0x15
0x0c12…0c2c at0016 = ╱22╱"╱ // 0xc28 @0x16
0x0c12…0c2c at0017 = ╱20╱…╱ // 0xc29 @0x17
0x0c12…0c2c at0018 = ╱22╱"╱ // 0xc2a @0x18
0x0c12…0c2c at0019 = EOL // 0xc2b @0x19
0x0c12…0c2c }
0x0c2c…0c32 9989 1270 ENDIF
0x0c2c…0c32 LineComalBin {
0x0c2c…0c32 ptr = 0x9989 // 0xc2c @0x0
0x0c2c…0c32 lno = 0x04f6 // 0xc2e @0x2
0x0c2c…0c32 at0004 = ╱9b╱ ENDIF ╱ // 0xc30 @0x4
0x0c2c…0c32 at0005 = EOL // 0xc31 @0x5
0x0c2c…0c32 }
0x0c32…0c38 998f 1280 ENDIF
0x0c32…0c38 LineComalBin {
0x0c32…0c38 ptr = 0x998f // 0xc32 @0x0
0x0c32…0c38 lno = 0x0500 // 0xc34 @0x2
0x0c32…0c38 at0004 = ╱9b╱ ENDIF ╱ // 0xc36 @0x4
0x0c32…0c38 at0005 = EOL // 0xc37 @0x5
0x0c32…0c38 }
0x0c38…0c45 999c 1290 IF STØR=E THEN
0x0c38…0c45 LineComalBin {
0x0c38…0c45 ptr = 0x999c // 0xc38 @0x0
0x0c38…0c45 lno = 0x050a // 0xc3a @0x2
0x0c38…0c45 at0004 = ╱9c╱ IF ╱ // 0xc3c @0x4
0x0c38…0c45 at0005 = ╱53╱S╱ // 0xc3d @0x5
0x0c38…0c45 at0006 = ╱54╱T╱ // 0xc3e @0x6
0x0c38…0c45 at0007 = ╱5c╱Ø╱ // 0xc3f @0x7
0x0c38…0c45 at0008 = ╱52╱R╱ // 0xc40 @0x8
0x0c38…0c45 at0009 = ╱dc╱=╱ // 0xc41 @0x9
0x0c38…0c45 at000a = ╱45╱E╱ // 0xc42 @0xa
0x0c38…0c45 at000b = ╱b6╱ THEN ╱ // 0xc43 @0xb
0x0c38…0c45 at000c = EOL // 0xc44 @0xc
0x0c38…0c45 }
0x0c45…0c6b 99c2 1300 UBLB1$=UBLB1$(4:LEN(UBLB1$)-V)
0x0c45…0c6b LineComalBin {
0x0c45…0c6b ptr = 0x99c2 // 0xc45 @0x0
0x0c45…0c6b lno = 0x0514 // 0xc47 @0x2
0x0c45…0c6b at0004 = ╱55╱U╱ // 0xc49 @0x4
0x0c45…0c6b at0005 = ╱42╱B╱ // 0xc4a @0x5
0x0c45…0c6b at0006 = ╱4c╱L╱ // 0xc4b @0x6
0x0c45…0c6b at0007 = ╱42╱B╱ // 0xc4c @0x7
0x0c45…0c6b at0008 = ╱31╱1╱ // 0xc4d @0x8
0x0c45…0c6b at0009 = ╱ef╱$╱ // 0xc4e @0x9
0x0c45…0c6b at000a = ╱dc╱=╱ // 0xc4f @0xa
0x0c45…0c6b at000b = ╱55╱U╱ // 0xc50 @0xb
0x0c45…0c6b at000c = ╱42╱B╱ // 0xc51 @0xc
0x0c45…0c6b at000d = ╱4c╱L╱ // 0xc52 @0xd
0x0c45…0c6b at000e = ╱42╱B╱ // 0xc53 @0xe
0x0c45…0c6b at000f = ╱31╱1╱ // 0xc54 @0xf
0x0c45…0c6b at0010 = ╱ef╱$╱ // 0xc55 @0x10
0x0c45…0c6b at0011 = ╱ed╱(╱ // 0xc56 @0x11
0x0c45…0c6b at0012 = ╱34╱4╱ // 0xc57 @0x12
0x0c45…0c6b at0013 = ╱fe00008003╱ // 0xc58 @0x13
0x0c45…0c6b at0018 = ╱f0╱:╱ // 0xc5d @0x18
0x0c45…0c6b at0019 = ╱cc╱LEN╱ // 0xc5e @0x19
0x0c45…0c6b at001a = ╱ed╱(╱ // 0xc5f @0x1a
0x0c45…0c6b at001b = ╱55╱U╱ // 0xc60 @0x1b
0x0c45…0c6b at001c = ╱42╱B╱ // 0xc61 @0x1c
0x0c45…0c6b at001d = ╱4c╱L╱ // 0xc62 @0x1d
0x0c45…0c6b at001e = ╱42╱B╱ // 0xc63 @0x1e
0x0c45…0c6b at001f = ╱31╱1╱ // 0xc64 @0x1f
0x0c45…0c6b at0020 = ╱ef╱$╱ // 0xc65 @0x20
0x0c45…0c6b at0021 = ╱ee╱)╱ // 0xc66 @0x21
0x0c45…0c6b at0022 = ╱e3╱-╱ // 0xc67 @0x22
0x0c45…0c6b at0023 = ╱56╱V╱ // 0xc68 @0x23
0x0c45…0c6b at0024 = ╱ee╱)╱ // 0xc69 @0x24
0x0c45…0c6b at0025 = EOL // 0xc6a @0x25
0x0c45…0c6b }
0x0c6b…0c71 99c8 1310 ENDIF
0x0c6b…0c71 LineComalBin {
0x0c6b…0c71 ptr = 0x99c8 // 0xc6b @0x0
0x0c6b…0c71 lno = 0x051e // 0xc6d @0x2
0x0c6b…0c71 at0004 = ╱9b╱ ENDIF ╱ // 0xc6f @0x4
0x0c6b…0c71 at0005 = EOL // 0xc70 @0x5
0x0c6b…0c71 }
0x0c71…0c77 99ce 1320 ENDPROC
0x0c71…0c77 LineComalBin {
0x0c71…0c77 ptr = 0x99ce // 0xc71 @0x0
0x0c71…0c77 lno = 0x0528 // 0xc73 @0x2
0x0c71…0c77 at0004 = ╱9f╱ ENDPROC ╱ // 0xc75 @0x4
0x0c71…0c77 at0005 = EOL // 0xc76 @0x5
0x0c71…0c77 }
0x0c77…0c91 99e8 1330 PROC HOVEDUD(UDATO,USIDE)
0x0c77…0c91 LineComalBin {
0x0c77…0c91 ptr = 0x99e8 // 0xc77 @0x0
0x0c77…0c91 lno = 0x0532 // 0xc79 @0x2
0x0c77…0c91 at0004 = ╱9e╱ PROC ╱ // 0xc7b @0x4
0x0c77…0c91 at0005 = ╱48╱H╱ // 0xc7c @0x5
0x0c77…0c91 at0006 = ╱4f╱O╱ // 0xc7d @0x6
0x0c77…0c91 at0007 = ╱56╱V╱ // 0xc7e @0x7
0x0c77…0c91 at0008 = ╱45╱E╱ // 0xc7f @0x8
0x0c77…0c91 at0009 = ╱44╱D╱ // 0xc80 @0x9
0x0c77…0c91 at000a = ╱55╱U╱ // 0xc81 @0xa
0x0c77…0c91 at000b = ╱44╱D╱ // 0xc82 @0xb
0x0c77…0c91 at000c = ╱ed╱(╱ // 0xc83 @0xc
0x0c77…0c91 at000d = ╱55╱U╱ // 0xc84 @0xd
0x0c77…0c91 at000e = ╱44╱D╱ // 0xc85 @0xe
0x0c77…0c91 at000f = ╱41╱A╱ // 0xc86 @0xf
0x0c77…0c91 at0010 = ╱54╱T╱ // 0xc87 @0x10
0x0c77…0c91 at0011 = ╱4f╱O╱ // 0xc88 @0x11
0x0c77…0c91 at0012 = ╱ec╱,╱ // 0xc89 @0x12
0x0c77…0c91 at0013 = ╱55╱U╱ // 0xc8a @0x13
0x0c77…0c91 at0014 = ╱53╱S╱ // 0xc8b @0x14
0x0c77…0c91 at0015 = ╱49╱I╱ // 0xc8c @0x15
0x0c77…0c91 at0016 = ╱44╱D╱ // 0xc8d @0x16
0x0c77…0c91 at0017 = ╱45╱E╱ // 0xc8e @0x17
0x0c77…0c91 at0018 = ╱ee╱)╱ // 0xc8f @0x18
0x0c77…0c91 at0019 = EOL // 0xc90 @0x19
0x0c77…0c91 }
0x0c91…0ca9 9a00 1340 EXEC DATOUD(UDATO,DAT$)
0x0c91…0ca9 LineComalBin {
0x0c91…0ca9 ptr = 0x9a00 // 0xc91 @0x0
0x0c91…0ca9 lno = 0x053c // 0xc93 @0x2
0x0c91…0ca9 at0004 = ╱9d╱ EXEC ╱ // 0xc95 @0x4
0x0c91…0ca9 at0005 = ╱44╱D╱ // 0xc96 @0x5
0x0c91…0ca9 at0006 = ╱41╱A╱ // 0xc97 @0x6
0x0c91…0ca9 at0007 = ╱54╱T╱ // 0xc98 @0x7
0x0c91…0ca9 at0008 = ╱4f╱O╱ // 0xc99 @0x8
0x0c91…0ca9 at0009 = ╱55╱U╱ // 0xc9a @0x9
0x0c91…0ca9 at000a = ╱44╱D╱ // 0xc9b @0xa
0x0c91…0ca9 at000b = ╱ed╱(╱ // 0xc9c @0xb
0x0c91…0ca9 at000c = ╱55╱U╱ // 0xc9d @0xc
0x0c91…0ca9 at000d = ╱44╱D╱ // 0xc9e @0xd
0x0c91…0ca9 at000e = ╱41╱A╱ // 0xc9f @0xe
0x0c91…0ca9 at000f = ╱54╱T╱ // 0xca0 @0xf
0x0c91…0ca9 at0010 = ╱4f╱O╱ // 0xca1 @0x10
0x0c91…0ca9 at0011 = ╱ec╱,╱ // 0xca2 @0x11
0x0c91…0ca9 at0012 = ╱44╱D╱ // 0xca3 @0x12
0x0c91…0ca9 at0013 = ╱41╱A╱ // 0xca4 @0x13
0x0c91…0ca9 at0014 = ╱54╱T╱ // 0xca5 @0x14
0x0c91…0ca9 at0015 = ╱ef╱$╱ // 0xca6 @0x15
0x0c91…0ca9 at0016 = ╱ee╱)╱ // 0xca7 @0x16
0x0c91…0ca9 at0017 = EOL // 0xca8 @0x17
0x0c91…0ca9 }
0x0ca9…0cc1 9a18 1345 PRINT TAB(67);DV$;" "
0x0ca9…0cc1 LineComalBin {
0x0ca9…0cc1 ptr = 0x9a18 // 0xca9 @0x0
0x0ca9…0cc1 lno = 0x0541 // 0xcab @0x2
0x0ca9…0cc1 at0004 = ╱92╱ PRINT ╱ // 0xcad @0x4
0x0ca9…0cc1 at0005 = ╱d2╱TAB╱ // 0xcae @0x5
0x0ca9…0cc1 at0006 = ╱ed╱(╱ // 0xcaf @0x6
0x0ca9…0cc1 at0007 = ╱36╱6╱ // 0xcb0 @0x7
0x0ca9…0cc1 at0008 = ╱37╱7╱ // 0xcb1 @0x8
0x0ca9…0cc1 at0009 = ╱fe00008607╱ // 0xcb2 @0x9
0x0ca9…0cc1 at000e = ╱ee╱)╱ // 0xcb7 @0xe
0x0ca9…0cc1 at000f = ╱eb╱;╱ // 0xcb8 @0xf
0x0ca9…0cc1 at0010 = ╱44╱D╱ // 0xcb9 @0x10
0x0ca9…0cc1 at0011 = ╱56╱V╱ // 0xcba @0x11
0x0ca9…0cc1 at0012 = ╱ef╱$╱ // 0xcbb @0x12
0x0ca9…0cc1 at0013 = ╱eb╱;╱ // 0xcbc @0x13
0x0ca9…0cc1 at0014 = ╱22╱"╱ // 0xcbd @0x14
0x0ca9…0cc1 at0015 = ╱20╱…╱ // 0xcbe @0x15
0x0ca9…0cc1 at0016 = ╱22╱"╱ // 0xcbf @0x16
0x0ca9…0cc1 at0017 = EOL // 0xcc0 @0x17
0x0ca9…0cc1 }
0x0cc1…0d0c 9a63 1350 PRINT TAB(10);CHR(14);"Balance";CHR(15);TAB(44);"Dato : ";DAT$;
0x0cc1…0d0c LineComalBin {
0x0cc1…0d0c ptr = 0x9a63 // 0xcc1 @0x0
0x0cc1…0d0c lno = 0x0546 // 0xcc3 @0x2
0x0cc1…0d0c at0004 = ╱92╱ PRINT ╱ // 0xcc5 @0x4
0x0cc1…0d0c at0005 = ╱d2╱TAB╱ // 0xcc6 @0x5
0x0cc1…0d0c at0006 = ╱ed╱(╱ // 0xcc7 @0x6
0x0cc1…0d0c at0007 = ╱31╱1╱ // 0xcc8 @0x7
0x0cc1…0d0c at0008 = ╱30╱0╱ // 0xcc9 @0x8
0x0cc1…0d0c at0009 = ╱fe0000a004╱ // 0xcca @0x9
0x0cc1…0d0c at000e = ╱ee╱)╱ // 0xccf @0xe
0x0cc1…0d0c at000f = ╱eb╱;╱ // 0xcd0 @0xf
0x0cc1…0d0c at0010 = ╱cf╱CHR╱ // 0xcd1 @0x10
0x0cc1…0d0c at0011 = ╱ed╱(╱ // 0xcd2 @0x11
0x0cc1…0d0c at0012 = ╱31╱1╱ // 0xcd3 @0x12
0x0cc1…0d0c at0013 = ╱34╱4╱ // 0xcd4 @0x13
0x0cc1…0d0c at0014 = ╱fe0000e004╱ // 0xcd5 @0x14
0x0cc1…0d0c at0019 = ╱ee╱)╱ // 0xcda @0x19
0x0cc1…0d0c at001a = ╱eb╱;╱ // 0xcdb @0x1a
0x0cc1…0d0c at001b = ╱22╱"╱ // 0xcdc @0x1b
0x0cc1…0d0c at001c = ╱42╱B╱ // 0xcdd @0x1c
0x0cc1…0d0c at001d = ╱61╱a╱ // 0xcde @0x1d
0x0cc1…0d0c at001e = ╱6c╱l╱ // 0xcdf @0x1e
0x0cc1…0d0c at001f = ╱61╱a╱ // 0xce0 @0x1f
0x0cc1…0d0c at0020 = ╱6e╱n╱ // 0xce1 @0x20
0x0cc1…0d0c at0021 = ╱63╱c╱ // 0xce2 @0x21
0x0cc1…0d0c at0022 = ╱65╱e╱ // 0xce3 @0x22
0x0cc1…0d0c at0023 = ╱22╱"╱ // 0xce4 @0x23
0x0cc1…0d0c at0024 = ╱eb╱;╱ // 0xce5 @0x24
0x0cc1…0d0c at0025 = ╱cf╱CHR╱ // 0xce6 @0x25
0x0cc1…0d0c at0026 = ╱ed╱(╱ // 0xce7 @0x26
0x0cc1…0d0c at0027 = ╱31╱1╱ // 0xce8 @0x27
0x0cc1…0d0c at0028 = ╱35╱5╱ // 0xce9 @0x28
0x0cc1…0d0c at0029 = ╱fe0000f004╱ // 0xcea @0x29
0x0cc1…0d0c at002e = ╱ee╱)╱ // 0xcef @0x2e
0x0cc1…0d0c at002f = ╱eb╱;╱ // 0xcf0 @0x2f
0x0cc1…0d0c at0030 = ╱d2╱TAB╱ // 0xcf1 @0x30
0x0cc1…0d0c at0031 = ╱ed╱(╱ // 0xcf2 @0x31
0x0cc1…0d0c at0032 = ╱34╱4╱ // 0xcf3 @0x32
0x0cc1…0d0c at0033 = ╱34╱4╱ // 0xcf4 @0x33
0x0cc1…0d0c at0034 = ╱fe0000b006╱ // 0xcf5 @0x34
0x0cc1…0d0c at0039 = ╱ee╱)╱ // 0xcfa @0x39
0x0cc1…0d0c at003a = ╱eb╱;╱ // 0xcfb @0x3a
0x0cc1…0d0c at003b = ╱22╱"╱ // 0xcfc @0x3b
0x0cc1…0d0c at003c = ╱44╱D╱ // 0xcfd @0x3c
0x0cc1…0d0c at003d = ╱61╱a╱ // 0xcfe @0x3d
0x0cc1…0d0c at003e = ╱74╱t╱ // 0xcff @0x3e
0x0cc1…0d0c at003f = ╱6f╱o╱ // 0xd00 @0x3f
0x0cc1…0d0c at0040 = ╱20╱…╱ // 0xd01 @0x40
0x0cc1…0d0c at0041 = ╱3a╱:╱ // 0xd02 @0x41
0x0cc1…0d0c at0042 = ╱20╱…╱ // 0xd03 @0x42
0x0cc1…0d0c at0043 = ╱22╱"╱ // 0xd04 @0x43
0x0cc1…0d0c at0044 = ╱eb╱;╱ // 0xd05 @0x44
0x0cc1…0d0c at0045 = ╱44╱D╱ // 0xd06 @0x45
0x0cc1…0d0c at0046 = ╱41╱A╱ // 0xd07 @0x46
0x0cc1…0d0c at0047 = ╱54╱T╱ // 0xd08 @0x47
0x0cc1…0d0c at0048 = ╱ef╱$╱ // 0xd09 @0x48
0x0cc1…0d0c at0049 = ╱eb╱;╱ // 0xd0a @0x49
0x0cc1…0d0c at004a = EOL // 0xd0b @0x4a
0x0cc1…0d0c }
0x0d0c…0d27 9a7e 1360 PRINT USING " Side :###":USIDE
0x0d0c…0d27 LineComalBin {
0x0d0c…0d27 ptr = 0x9a7e // 0xd0c @0x0
0x0d0c…0d27 lno = 0x0550 // 0xd0e @0x2
0x0d0c…0d27 at0004 = ╱92╱ PRINT ╱ // 0xd10 @0x4
0x0d0c…0d27 at0005 = ╱b9╱ USING ╱ // 0xd11 @0x5
0x0d0c…0d27 at0006 = ╱22╱"╱ // 0xd12 @0x6
0x0d0c…0d27 at0007 = ╱20╱…╱ // 0xd13 @0x7
0x0d0c…0d27 at0008 = ╱20╱…╱ // 0xd14 @0x8
0x0d0c…0d27 at0009 = ╱20╱…╱ // 0xd15 @0x9
0x0d0c…0d27 at000a = ╱53╱S╱ // 0xd16 @0xa
0x0d0c…0d27 at000b = ╱69╱i╱ // 0xd17 @0xb
0x0d0c…0d27 at000c = ╱64╱d╱ // 0xd18 @0xc
0x0d0c…0d27 at000d = ╱65╱e╱ // 0xd19 @0xd
0x0d0c…0d27 at000e = ╱20╱…╱ // 0xd1a @0xe
0x0d0c…0d27 at000f = ╱3a╱:╱ // 0xd1b @0xf
0x0d0c…0d27 at0010 = ╱23╱#╱ // 0xd1c @0x10
0x0d0c…0d27 at0011 = ╱23╱#╱ // 0xd1d @0x11
0x0d0c…0d27 at0012 = ╱23╱#╱ // 0xd1e @0x12
0x0d0c…0d27 at0013 = ╱22╱"╱ // 0xd1f @0x13
0x0d0c…0d27 at0014 = ╱f0╱:╱ // 0xd20 @0x14
0x0d0c…0d27 at0015 = ╱55╱U╱ // 0xd21 @0x15
0x0d0c…0d27 at0016 = ╱53╱S╱ // 0xd22 @0x16
0x0d0c…0d27 at0017 = ╱49╱I╱ // 0xd23 @0x17
0x0d0c…0d27 at0018 = ╱44╱D╱ // 0xd24 @0x18
0x0d0c…0d27 at0019 = ╱45╱E╱ // 0xd25 @0x19
0x0d0c…0d27 at001a = EOL // 0xd26 @0x1a
0x0d0c…0d27 }
0x0d27…0d30 9a87 1370 PRINT " "
0x0d27…0d30 LineComalBin {
0x0d27…0d30 ptr = 0x9a87 // 0xd27 @0x0
0x0d27…0d30 lno = 0x055a // 0xd29 @0x2
0x0d27…0d30 at0004 = ╱92╱ PRINT ╱ // 0xd2b @0x4
0x0d27…0d30 at0005 = ╱22╱"╱ // 0xd2c @0x5
0x0d27…0d30 at0006 = ╱20╱…╱ // 0xd2d @0x6
0x0d27…0d30 at0007 = ╱22╱"╱ // 0xd2e @0x7
0x0d27…0d30 at0008 = EOL // 0xd2f @0x8
0x0d27…0d30 }
0x0d30…0d48 9a9f 1380 PRINT TAB(46);"Årets"
0x0d30…0d48 LineComalBin {
0x0d30…0d48 ptr = 0x9a9f // 0xd30 @0x0
0x0d30…0d48 lno = 0x0564 // 0xd32 @0x2
0x0d30…0d48 at0004 = ╱92╱ PRINT ╱ // 0xd34 @0x4
0x0d30…0d48 at0005 = ╱d2╱TAB╱ // 0xd35 @0x5
0x0d30…0d48 at0006 = ╱ed╱(╱ // 0xd36 @0x6
0x0d30…0d48 at0007 = ╱34╱4╱ // 0xd37 @0x7
0x0d30…0d48 at0008 = ╱36╱6╱ // 0xd38 @0x8
0x0d30…0d48 at0009 = ╱fe0000b806╱ // 0xd39 @0x9
0x0d30…0d48 at000e = ╱ee╱)╱ // 0xd3e @0xe
0x0d30…0d48 at000f = ╱eb╱;╱ // 0xd3f @0xf
0x0d30…0d48 at0010 = ╱22╱"╱ // 0xd40 @0x10
0x0d30…0d48 at0011 = ╱5d╱Å╱ // 0xd41 @0x11
0x0d30…0d48 at0012 = ╱72╱r╱ // 0xd42 @0x12
0x0d30…0d48 at0013 = ╱65╱e╱ // 0xd43 @0x13
0x0d30…0d48 at0014 = ╱74╱t╱ // 0xd44 @0x14
0x0d30…0d48 at0015 = ╱73╱s╱ // 0xd45 @0x15
0x0d30…0d48 at0016 = ╱22╱"╱ // 0xd46 @0x16
0x0d30…0d48 at0017 = EOL // 0xd47 @0x17
0x0d30…0d48 }
0x0d48…0d83 9ada 1390 PRINT TAB(V);"Nr Kontonavn";TAB(42);"Debet Kredit"
0x0d48…0d83 LineComalBin {
0x0d48…0d83 ptr = 0x9ada // 0xd48 @0x0
0x0d48…0d83 lno = 0x056e // 0xd4a @0x2
0x0d48…0d83 at0004 = ╱92╱ PRINT ╱ // 0xd4c @0x4
0x0d48…0d83 at0005 = ╱d2╱TAB╱ // 0xd4d @0x5
0x0d48…0d83 at0006 = ╱ed╱(╱ // 0xd4e @0x6
0x0d48…0d83 at0007 = ╱56╱V╱ // 0xd4f @0x7
0x0d48…0d83 at0008 = ╱ee╱)╱ // 0xd50 @0x8
0x0d48…0d83 at0009 = ╱eb╱;╱ // 0xd51 @0x9
0x0d48…0d83 at000a = ╱22╱"╱ // 0xd52 @0xa
0x0d48…0d83 at000b = ╱4e╱N╱ // 0xd53 @0xb
0x0d48…0d83 at000c = ╱72╱r╱ // 0xd54 @0xc
0x0d48…0d83 at000d = ╱20╱…╱ // 0xd55 @0xd
0x0d48…0d83 at000e = ╱20╱…╱ // 0xd56 @0xe
0x0d48…0d83 at000f = ╱20╱…╱ // 0xd57 @0xf
0x0d48…0d83 at0010 = ╱20╱…╱ // 0xd58 @0x10
0x0d48…0d83 at0011 = ╱4b╱K╱ // 0xd59 @0x11
0x0d48…0d83 at0012 = ╱6f╱o╱ // 0xd5a @0x12
0x0d48…0d83 at0013 = ╱6e╱n╱ // 0xd5b @0x13
0x0d48…0d83 at0014 = ╱74╱t╱ // 0xd5c @0x14
0x0d48…0d83 at0015 = ╱6f╱o╱ // 0xd5d @0x15
0x0d48…0d83 at0016 = ╱6e╱n╱ // 0xd5e @0x16
0x0d48…0d83 at0017 = ╱61╱a╱ // 0xd5f @0x17
0x0d48…0d83 at0018 = ╱76╱v╱ // 0xd60 @0x18
0x0d48…0d83 at0019 = ╱6e╱n╱ // 0xd61 @0x19
0x0d48…0d83 at001a = ╱22╱"╱ // 0xd62 @0x1a
0x0d48…0d83 at001b = ╱eb╱;╱ // 0xd63 @0x1b
0x0d48…0d83 at001c = ╱d2╱TAB╱ // 0xd64 @0x1c
0x0d48…0d83 at001d = ╱ed╱(╱ // 0xd65 @0x1d
0x0d48…0d83 at001e = ╱34╱4╱ // 0xd66 @0x1e
0x0d48…0d83 at001f = ╱32╱2╱ // 0xd67 @0x1f
0x0d48…0d83 at0020 = ╱fe0000a806╱ // 0xd68 @0x20
0x0d48…0d83 at0025 = ╱ee╱)╱ // 0xd6d @0x25
0x0d48…0d83 at0026 = ╱eb╱;╱ // 0xd6e @0x26
0x0d48…0d83 at0027 = ╱22╱"╱ // 0xd6f @0x27
0x0d48…0d83 at0028 = ╱44╱D╱ // 0xd70 @0x28
0x0d48…0d83 at0029 = ╱65╱e╱ // 0xd71 @0x29
0x0d48…0d83 at002a = ╱62╱b╱ // 0xd72 @0x2a
0x0d48…0d83 at002b = ╱65╱e╱ // 0xd73 @0x2b
0x0d48…0d83 at002c = ╱74╱t╱ // 0xd74 @0x2c
0x0d48…0d83 at002d = ╱20╱…╱ // 0xd75 @0x2d
0x0d48…0d83 at002e = ╱20╱…╱ // 0xd76 @0x2e
0x0d48…0d83 at002f = ╱20╱…╱ // 0xd77 @0x2f
0x0d48…0d83 at0030 = ╱20╱…╱ // 0xd78 @0x30
0x0d48…0d83 at0031 = ╱20╱…╱ // 0xd79 @0x31
0x0d48…0d83 at0032 = ╱20╱…╱ // 0xd7a @0x32
0x0d48…0d83 at0033 = ╱4b╱K╱ // 0xd7b @0x33
0x0d48…0d83 at0034 = ╱72╱r╱ // 0xd7c @0x34
0x0d48…0d83 at0035 = ╱65╱e╱ // 0xd7d @0x35
0x0d48…0d83 at0036 = ╱64╱d╱ // 0xd7e @0x36
0x0d48…0d83 at0037 = ╱69╱i╱ // 0xd7f @0x37
0x0d48…0d83 at0038 = ╱74╱t╱ // 0xd80 @0x38
0x0d48…0d83 at0039 = ╱22╱"╱ // 0xd81 @0x39
0x0d48…0d83 at003a = EOL // 0xd82 @0x3a
0x0d48…0d83 }
0x0d83…0d99 9af0 1400 PRINT TAB(8);STREG$
0x0d83…0d99 LineComalBin {
0x0d83…0d99 ptr = 0x9af0 // 0xd83 @0x0
0x0d83…0d99 lno = 0x0578 // 0xd85 @0x2
0x0d83…0d99 at0004 = ╱92╱ PRINT ╱ // 0xd87 @0x4
0x0d83…0d99 at0005 = ╱d2╱TAB╱ // 0xd88 @0x5
0x0d83…0d99 at0006 = ╱ed╱(╱ // 0xd89 @0x6
0x0d83…0d99 at0007 = ╱38╱8╱ // 0xd8a @0x7
0x0d83…0d99 at0008 = ╱fe00008004╱ // 0xd8b @0x8
0x0d83…0d99 at000d = ╱ee╱)╱ // 0xd90 @0xd
0x0d83…0d99 at000e = ╱eb╱;╱ // 0xd91 @0xe
0x0d83…0d99 at000f = ╱53╱S╱ // 0xd92 @0xf
0x0d83…0d99 at0010 = ╱54╱T╱ // 0xd93 @0x10
0x0d83…0d99 at0011 = ╱52╱R╱ // 0xd94 @0x11
0x0d83…0d99 at0012 = ╱45╱E╱ // 0xd95 @0x12
0x0d83…0d99 at0013 = ╱47╱G╱ // 0xd96 @0x13
0x0d83…0d99 at0014 = ╱ef╱$╱ // 0xd97 @0x14
0x0d83…0d99 at0015 = EOL // 0xd98 @0x15
0x0d83…0d99 }
0x0d99…0d9f 9af6 1410 ENDPROC
0x0d99…0d9f LineComalBin {
0x0d99…0d9f ptr = 0x9af6 // 0xd99 @0x0
0x0d99…0d9f lno = 0x0582 // 0xd9b @0x2
0x0d99…0d9f at0004 = ╱9f╱ ENDPROC ╱ // 0xd9d @0x4
0x0d99…0d9f at0005 = EOL // 0xd9e @0x5
0x0d99…0d9f }
0x0d9f…0dbc 9b13 1420 PROC LINIEUD(NR4,NAVN1,SAL1)
0x0d9f…0dbc LineComalBin {
0x0d9f…0dbc ptr = 0x9b13 // 0xd9f @0x0
0x0d9f…0dbc lno = 0x058c // 0xda1 @0x2
0x0d9f…0dbc at0004 = ╱9e╱ PROC ╱ // 0xda3 @0x4
0x0d9f…0dbc at0005 = ╱4c╱L╱ // 0xda4 @0x5
0x0d9f…0dbc at0006 = ╱49╱I╱ // 0xda5 @0x6
0x0d9f…0dbc at0007 = ╱4e╱N╱ // 0xda6 @0x7
0x0d9f…0dbc at0008 = ╱49╱I╱ // 0xda7 @0x8
0x0d9f…0dbc at0009 = ╱45╱E╱ // 0xda8 @0x9
0x0d9f…0dbc at000a = ╱55╱U╱ // 0xda9 @0xa
0x0d9f…0dbc at000b = ╱44╱D╱ // 0xdaa @0xb
0x0d9f…0dbc at000c = ╱ed╱(╱ // 0xdab @0xc
0x0d9f…0dbc at000d = ╱4e╱N╱ // 0xdac @0xd
0x0d9f…0dbc at000e = ╱52╱R╱ // 0xdad @0xe
0x0d9f…0dbc at000f = ╱34╱4╱ // 0xdae @0xf
0x0d9f…0dbc at0010 = ╱ec╱,╱ // 0xdaf @0x10
0x0d9f…0dbc at0011 = ╱4e╱N╱ // 0xdb0 @0x11
0x0d9f…0dbc at0012 = ╱41╱A╱ // 0xdb1 @0x12
0x0d9f…0dbc at0013 = ╱56╱V╱ // 0xdb2 @0x13
0x0d9f…0dbc at0014 = ╱4e╱N╱ // 0xdb3 @0x14
0x0d9f…0dbc at0015 = ╱31╱1╱ // 0xdb4 @0x15
0x0d9f…0dbc at0016 = ╱ec╱,╱ // 0xdb5 @0x16
0x0d9f…0dbc at0017 = ╱53╱S╱ // 0xdb6 @0x17
0x0d9f…0dbc at0018 = ╱41╱A╱ // 0xdb7 @0x18
0x0d9f…0dbc at0019 = ╱4c╱L╱ // 0xdb8 @0x19
0x0d9f…0dbc at001a = ╱31╱1╱ // 0xdb9 @0x1a
0x0d9f…0dbc at001b = ╱ee╱)╱ // 0xdba @0x1b
0x0d9f…0dbc at001c = EOL // 0xdbb @0x1c
0x0d9f…0dbc }
0x0dbc…0dd1 9b28 1430 PRINT USING "###### ":NR4;
0x0dbc…0dd1 LineComalBin {
0x0dbc…0dd1 ptr = 0x9b28 // 0xdbc @0x0
0x0dbc…0dd1 lno = 0x0596 // 0xdbe @0x2
0x0dbc…0dd1 at0004 = ╱92╱ PRINT ╱ // 0xdc0 @0x4
0x0dbc…0dd1 at0005 = ╱b9╱ USING ╱ // 0xdc1 @0x5
0x0dbc…0dd1 at0006 = ╱22╱"╱ // 0xdc2 @0x6
0x0dbc…0dd1 at0007 = ╱23╱#╱ // 0xdc3 @0x7
0x0dbc…0dd1 at0008 = ╱23╱#╱ // 0xdc4 @0x8
0x0dbc…0dd1 at0009 = ╱23╱#╱ // 0xdc5 @0x9
0x0dbc…0dd1 at000a = ╱23╱#╱ // 0xdc6 @0xa
0x0dbc…0dd1 at000b = ╱23╱#╱ // 0xdc7 @0xb
0x0dbc…0dd1 at000c = ╱23╱#╱ // 0xdc8 @0xc
0x0dbc…0dd1 at000d = ╱20╱…╱ // 0xdc9 @0xd
0x0dbc…0dd1 at000e = ╱22╱"╱ // 0xdca @0xe
0x0dbc…0dd1 at000f = ╱f0╱:╱ // 0xdcb @0xf
0x0dbc…0dd1 at0010 = ╱4e╱N╱ // 0xdcc @0x10
0x0dbc…0dd1 at0011 = ╱52╱R╱ // 0xdcd @0x11
0x0dbc…0dd1 at0012 = ╱34╱4╱ // 0xdce @0x12
0x0dbc…0dd1 at0013 = ╱eb╱;╱ // 0xdcf @0x13
0x0dbc…0dd1 at0014 = EOL // 0xdd0 @0x14
0x0dbc…0dd1 }
0x0dd1…0dee 9b45 1440 EXEC TUD(SAL1$,UBELØB1$,B,B)
0x0dd1…0dee LineComalBin {
0x0dd1…0dee ptr = 0x9b45 // 0xdd1 @0x0
0x0dd1…0dee lno = 0x05a0 // 0xdd3 @0x2
0x0dd1…0dee at0004 = ╱9d╱ EXEC ╱ // 0xdd5 @0x4
0x0dd1…0dee at0005 = ╱54╱T╱ // 0xdd6 @0x5
0x0dd1…0dee at0006 = ╱55╱U╱ // 0xdd7 @0x6
0x0dd1…0dee at0007 = ╱44╱D╱ // 0xdd8 @0x7
0x0dd1…0dee at0008 = ╱ed╱(╱ // 0xdd9 @0x8
0x0dd1…0dee at0009 = ╱53╱S╱ // 0xdda @0x9
0x0dd1…0dee at000a = ╱41╱A╱ // 0xddb @0xa
0x0dd1…0dee at000b = ╱4c╱L╱ // 0xddc @0xb
0x0dd1…0dee at000c = ╱31╱1╱ // 0xddd @0xc
0x0dd1…0dee at000d = ╱ef╱$╱ // 0xdde @0xd
0x0dd1…0dee at000e = ╱ec╱,╱ // 0xddf @0xe
0x0dd1…0dee at000f = ╱55╱U╱ // 0xde0 @0xf
0x0dd1…0dee at0010 = ╱42╱B╱ // 0xde1 @0x10
0x0dd1…0dee at0011 = ╱45╱E╱ // 0xde2 @0x11
0x0dd1…0dee at0012 = ╱4c╱L╱ // 0xde3 @0x12
0x0dd1…0dee at0013 = ╱5c╱Ø╱ // 0xde4 @0x13
0x0dd1…0dee at0014 = ╱42╱B╱ // 0xde5 @0x14
0x0dd1…0dee at0015 = ╱31╱1╱ // 0xde6 @0x15
0x0dd1…0dee at0016 = ╱ef╱$╱ // 0xde7 @0x16
0x0dd1…0dee at0017 = ╱ec╱,╱ // 0xde8 @0x17
0x0dd1…0dee at0018 = ╱42╱B╱ // 0xde9 @0x18
0x0dd1…0dee at0019 = ╱ec╱,╱ // 0xdea @0x19
0x0dd1…0dee at001a = ╱42╱B╱ // 0xdeb @0x1a
0x0dd1…0dee at001b = ╱ee╱)╱ // 0xdec @0x1b
0x0dd1…0dee at001c = EOL // 0xded @0x1c
0x0dd1…0dee }
0x0dee…0e2c 9b83 1450 PRINT NAVN1$;TAB(35+15*(SAL1$(LEN(SAL1$))="-"));UBELØB1$
0x0dee…0e2c LineComalBin {
0x0dee…0e2c ptr = 0x9b83 // 0xdee @0x0
0x0dee…0e2c lno = 0x05aa // 0xdf0 @0x2
0x0dee…0e2c at0004 = ╱92╱ PRINT ╱ // 0xdf2 @0x4
0x0dee…0e2c at0005 = ╱4e╱N╱ // 0xdf3 @0x5
0x0dee…0e2c at0006 = ╱41╱A╱ // 0xdf4 @0x6
0x0dee…0e2c at0007 = ╱56╱V╱ // 0xdf5 @0x7
0x0dee…0e2c at0008 = ╱4e╱N╱ // 0xdf6 @0x8
0x0dee…0e2c at0009 = ╱31╱1╱ // 0xdf7 @0x9
0x0dee…0e2c at000a = ╱ef╱$╱ // 0xdf8 @0xa
0x0dee…0e2c at000b = ╱eb╱;╱ // 0xdf9 @0xb
0x0dee…0e2c at000c = ╱d2╱TAB╱ // 0xdfa @0xc
0x0dee…0e2c at000d = ╱ed╱(╱ // 0xdfb @0xd
0x0dee…0e2c at000e = ╱33╱3╱ // 0xdfc @0xe
0x0dee…0e2c at000f = ╱35╱5╱ // 0xdfd @0xf
0x0dee…0e2c at0010 = ╱fe00008c06╱ // 0xdfe @0x10
0x0dee…0e2c at0015 = ╱e2╱+╱ // 0xe03 @0x15
0x0dee…0e2c at0016 = ╱31╱1╱ // 0xe04 @0x16
0x0dee…0e2c at0017 = ╱35╱5╱ // 0xe05 @0x17
0x0dee…0e2c at0018 = ╱fe0000f004╱ // 0xe06 @0x18
0x0dee…0e2c at001d = ╱e4╱*╱ // 0xe0b @0x1d
0x0dee…0e2c at001e = ╱ed╱(╱ // 0xe0c @0x1e
0x0dee…0e2c at001f = ╱53╱S╱ // 0xe0d @0x1f
0x0dee…0e2c at0020 = ╱41╱A╱ // 0xe0e @0x20
0x0dee…0e2c at0021 = ╱4c╱L╱ // 0xe0f @0x21
0x0dee…0e2c at0022 = ╱31╱1╱ // 0xe10 @0x22
0x0dee…0e2c at0023 = ╱ef╱$╱ // 0xe11 @0x23
0x0dee…0e2c at0024 = ╱ed╱(╱ // 0xe12 @0x24
0x0dee…0e2c at0025 = ╱cc╱LEN╱ // 0xe13 @0x25
0x0dee…0e2c at0026 = ╱ed╱(╱ // 0xe14 @0x26
0x0dee…0e2c at0027 = ╱53╱S╱ // 0xe15 @0x27
0x0dee…0e2c at0028 = ╱41╱A╱ // 0xe16 @0x28
0x0dee…0e2c at0029 = ╱4c╱L╱ // 0xe17 @0x29
0x0dee…0e2c at002a = ╱31╱1╱ // 0xe18 @0x2a
0x0dee…0e2c at002b = ╱ef╱$╱ // 0xe19 @0x2b
0x0dee…0e2c at002c = ╱ee╱)╱ // 0xe1a @0x2c
0x0dee…0e2c at002d = ╱ee╱)╱ // 0xe1b @0x2d
0x0dee…0e2c at002e = ╱dc╱=╱ // 0xe1c @0x2e
0x0dee…0e2c at002f = ╱22╱"╱ // 0xe1d @0x2f
0x0dee…0e2c at0030 = ╱2d╱-╱ // 0xe1e @0x30
0x0dee…0e2c at0031 = ╱22╱"╱ // 0xe1f @0x31
0x0dee…0e2c at0032 = ╱ee╱)╱ // 0xe20 @0x32
0x0dee…0e2c at0033 = ╱ee╱)╱ // 0xe21 @0x33
0x0dee…0e2c at0034 = ╱eb╱;╱ // 0xe22 @0x34
0x0dee…0e2c at0035 = ╱55╱U╱ // 0xe23 @0x35
0x0dee…0e2c at0036 = ╱42╱B╱ // 0xe24 @0x36
0x0dee…0e2c at0037 = ╱45╱E╱ // 0xe25 @0x37
0x0dee…0e2c at0038 = ╱4c╱L╱ // 0xe26 @0x38
0x0dee…0e2c at0039 = ╱5c╱Ø╱ // 0xe27 @0x39
0x0dee…0e2c at003a = ╱42╱B╱ // 0xe28 @0x3a
0x0dee…0e2c at003b = ╱31╱1╱ // 0xe29 @0x3b
0x0dee…0e2c at003c = ╱ef╱$╱ // 0xe2a @0x3c
0x0dee…0e2c at003d = EOL // 0xe2b @0x3d
0x0dee…0e2c }
0x0e2c…0e32 9b89 1460 ENDPROC
0x0e2c…0e32 LineComalBin {
0x0e2c…0e32 ptr = 0x9b89 // 0xe2c @0x0
0x0e2c…0e32 lno = 0x05b4 // 0xe2e @0x2
0x0e2c…0e32 at0004 = ╱9f╱ ENDPROC ╱ // 0xe30 @0x4
0x0e2c…0e32 at0005 = EOL // 0xe31 @0x5
0x0e2c…0e32 }
0x0e32…0e4d 9ba4 1470 PROC NYSIDE(GFNR9,GLNAVN9)
0x0e32…0e4d LineComalBin {
0x0e32…0e4d ptr = 0x9ba4 // 0xe32 @0x0
0x0e32…0e4d lno = 0x05be // 0xe34 @0x2
0x0e32…0e4d at0004 = ╱9e╱ PROC ╱ // 0xe36 @0x4
0x0e32…0e4d at0005 = ╱4e╱N╱ // 0xe37 @0x5
0x0e32…0e4d at0006 = ╱59╱Y╱ // 0xe38 @0x6
0x0e32…0e4d at0007 = ╱53╱S╱ // 0xe39 @0x7
0x0e32…0e4d at0008 = ╱49╱I╱ // 0xe3a @0x8
0x0e32…0e4d at0009 = ╱44╱D╱ // 0xe3b @0x9
0x0e32…0e4d at000a = ╱45╱E╱ // 0xe3c @0xa
0x0e32…0e4d at000b = ╱ed╱(╱ // 0xe3d @0xb
0x0e32…0e4d at000c = ╱47╱G╱ // 0xe3e @0xc
0x0e32…0e4d at000d = ╱46╱F╱ // 0xe3f @0xd
0x0e32…0e4d at000e = ╱4e╱N╱ // 0xe40 @0xe
0x0e32…0e4d at000f = ╱52╱R╱ // 0xe41 @0xf
0x0e32…0e4d at0010 = ╱39╱9╱ // 0xe42 @0x10
0x0e32…0e4d at0011 = ╱ec╱,╱ // 0xe43 @0x11
0x0e32…0e4d at0012 = ╱47╱G╱ // 0xe44 @0x12
0x0e32…0e4d at0013 = ╱4c╱L╱ // 0xe45 @0x13
0x0e32…0e4d at0014 = ╱4e╱N╱ // 0xe46 @0x14
0x0e32…0e4d at0015 = ╱41╱A╱ // 0xe47 @0x15
0x0e32…0e4d at0016 = ╱56╱V╱ // 0xe48 @0x16
0x0e32…0e4d at0017 = ╱4e╱N╱ // 0xe49 @0x17
0x0e32…0e4d at0018 = ╱39╱9╱ // 0xe4a @0x18
0x0e32…0e4d at0019 = ╱ee╱)╱ // 0xe4b @0x19
0x0e32…0e4d at001a = EOL // 0xe4c @0x1a
0x0e32…0e4d }
0x0e4d…0e66 9bbd 1480 FOR LINIE=LINIE TO 40
0x0e4d…0e66 LineComalBin {
0x0e4d…0e66 ptr = 0x9bbd // 0xe4d @0x0
0x0e4d…0e66 lno = 0x05c8 // 0xe4f @0x2
0x0e4d…0e66 at0004 = ╱83╱ FOR ╱ // 0xe51 @0x4
0x0e4d…0e66 at0005 = ╱4c╱L╱ // 0xe52 @0x5
0x0e4d…0e66 at0006 = ╱49╱I╱ // 0xe53 @0x6
0x0e4d…0e66 at0007 = ╱4e╱N╱ // 0xe54 @0x7
0x0e4d…0e66 at0008 = ╱49╱I╱ // 0xe55 @0x8
0x0e4d…0e66 at0009 = ╱45╱E╱ // 0xe56 @0x9
0x0e4d…0e66 at000a = ╱dc╱=╱ // 0xe57 @0xa
0x0e4d…0e66 at000b = ╱4c╱L╱ // 0xe58 @0xb
0x0e4d…0e66 at000c = ╱49╱I╱ // 0xe59 @0xc
0x0e4d…0e66 at000d = ╱4e╱N╱ // 0xe5a @0xd
0x0e4d…0e66 at000e = ╱49╱I╱ // 0xe5b @0xe
0x0e4d…0e66 at000f = ╱45╱E╱ // 0xe5c @0xf
0x0e4d…0e66 at0010 = ╱b7╱ TO ╱ // 0xe5d @0x10
0x0e4d…0e66 at0011 = ╱34╱4╱ // 0xe5e @0x11
0x0e4d…0e66 at0012 = ╱30╱0╱ // 0xe5f @0x12
0x0e4d…0e66 at0013 = ╱fe0000a006╱ // 0xe60 @0x13
0x0e4d…0e66 at0018 = EOL // 0xe65 @0x18
0x0e4d…0e66 }
0x0e66…0e77 9bce 1490 PRINT CHR(10);
0x0e66…0e77 LineComalBin {
0x0e66…0e77 ptr = 0x9bce // 0xe66 @0x0
0x0e66…0e77 lno = 0x05d2 // 0xe68 @0x2
0x0e66…0e77 at0004 = ╱92╱ PRINT ╱ // 0xe6a @0x4
0x0e66…0e77 at0005 = ╱cf╱CHR╱ // 0xe6b @0x5
0x0e66…0e77 at0006 = ╱ed╱(╱ // 0xe6c @0x6
0x0e66…0e77 at0007 = ╱31╱1╱ // 0xe6d @0x7
0x0e66…0e77 at0008 = ╱30╱0╱ // 0xe6e @0x8
0x0e66…0e77 at0009 = ╱fe0000a004╱ // 0xe6f @0x9
0x0e66…0e77 at000e = ╱ee╱)╱ // 0xe74 @0xe
0x0e66…0e77 at000f = ╱eb╱;╱ // 0xe75 @0xf
0x0e66…0e77 at0010 = EOL // 0xe76 @0x10
0x0e66…0e77 }
0x0e77…0e82 9bd9 1500 NEXT LINIE
0x0e77…0e82 LineComalBin {
0x0e77…0e82 ptr = 0x9bd9 // 0xe77 @0x0
0x0e77…0e82 lno = 0x05dc // 0xe79 @0x2
0x0e77…0e82 at0004 = ╱84╱ NEXT ╱ // 0xe7b @0x4
0x0e77…0e82 at0005 = ╱4c╱L╱ // 0xe7c @0x5
0x0e77…0e82 at0006 = ╱49╱I╱ // 0xe7d @0x6
0x0e77…0e82 at0007 = ╱4e╱N╱ // 0xe7e @0x7
0x0e77…0e82 at0008 = ╱49╱I╱ // 0xe7f @0x8
0x0e77…0e82 at0009 = ╱45╱E╱ // 0xe80 @0x9
0x0e77…0e82 at000a = EOL // 0xe81 @0xa
0x0e77…0e82 }
0x0e82…0e8b 9be2 1510 PRINT " "
0x0e82…0e8b LineComalBin {
0x0e82…0e8b ptr = 0x9be2 // 0xe82 @0x0
0x0e82…0e8b lno = 0x05e6 // 0xe84 @0x2
0x0e82…0e8b at0004 = ╱92╱ PRINT ╱ // 0xe86 @0x4
0x0e82…0e8b at0005 = ╱22╱"╱ // 0xe87 @0x5
0x0e82…0e8b at0006 = ╱20╱…╱ // 0xe88 @0x6
0x0e82…0e8b at0007 = ╱22╱"╱ // 0xe89 @0x7
0x0e82…0e8b at0008 = EOL // 0xe8a @0x8
0x0e82…0e8b }
0x0e8b…0e9d 9bf4 1520 BSIDE=BSIDE+E
0x0e8b…0e9d LineComalBin {
0x0e8b…0e9d ptr = 0x9bf4 // 0xe8b @0x0
0x0e8b…0e9d lno = 0x05f0 // 0xe8d @0x2
0x0e8b…0e9d at0004 = ╱42╱B╱ // 0xe8f @0x4
0x0e8b…0e9d at0005 = ╱53╱S╱ // 0xe90 @0x5
0x0e8b…0e9d at0006 = ╱49╱I╱ // 0xe91 @0x6
0x0e8b…0e9d at0007 = ╱44╱D╱ // 0xe92 @0x7
0x0e8b…0e9d at0008 = ╱45╱E╱ // 0xe93 @0x8
0x0e8b…0e9d at0009 = ╱dc╱=╱ // 0xe94 @0x9
0x0e8b…0e9d at000a = ╱42╱B╱ // 0xe95 @0xa
0x0e8b…0e9d at000b = ╱53╱S╱ // 0xe96 @0xb
0x0e8b…0e9d at000c = ╱49╱I╱ // 0xe97 @0xc
0x0e8b…0e9d at000d = ╱44╱D╱ // 0xe98 @0xd
0x0e8b…0e9d at000e = ╱45╱E╱ // 0xe99 @0xe
0x0e8b…0e9d at000f = ╱e2╱+╱ // 0xe9a @0xf
0x0e8b…0e9d at0010 = ╱45╱E╱ // 0xe9b @0x10
0x0e8b…0e9d at0011 = EOL // 0xe9c @0x11
0x0e8b…0e9d }
0x0e9d…0ebc 9c13 1530 EXEC HOVEDUD(T1(7),BSIDE)
0x0e9d…0ebc LineComalBin {
0x0e9d…0ebc ptr = 0x9c13 // 0xe9d @0x0
0x0e9d…0ebc lno = 0x05fa // 0xe9f @0x2
0x0e9d…0ebc at0004 = ╱9d╱ EXEC ╱ // 0xea1 @0x4
0x0e9d…0ebc at0005 = ╱48╱H╱ // 0xea2 @0x5
0x0e9d…0ebc at0006 = ╱4f╱O╱ // 0xea3 @0x6
0x0e9d…0ebc at0007 = ╱56╱V╱ // 0xea4 @0x7
0x0e9d…0ebc at0008 = ╱45╱E╱ // 0xea5 @0x8
0x0e9d…0ebc at0009 = ╱44╱D╱ // 0xea6 @0x9
0x0e9d…0ebc at000a = ╱55╱U╱ // 0xea7 @0xa
0x0e9d…0ebc at000b = ╱44╱D╱ // 0xea8 @0xb
0x0e9d…0ebc at000c = ╱ed╱(╱ // 0xea9 @0xc
0x0e9d…0ebc at000d = ╱54╱T╱ // 0xeaa @0xd
0x0e9d…0ebc at000e = ╱31╱1╱ // 0xeab @0xe
0x0e9d…0ebc at000f = ╱ed╱(╱ // 0xeac @0xf
0x0e9d…0ebc at0010 = ╱37╱7╱ // 0xead @0x10
0x0e9d…0ebc at0011 = ╱fe0000e003╱ // 0xeae @0x11
0x0e9d…0ebc at0016 = ╱ee╱)╱ // 0xeb3 @0x16
0x0e9d…0ebc at0017 = ╱ec╱,╱ // 0xeb4 @0x17
0x0e9d…0ebc at0018 = ╱42╱B╱ // 0xeb5 @0x18
0x0e9d…0ebc at0019 = ╱53╱S╱ // 0xeb6 @0x19
0x0e9d…0ebc at001a = ╱49╱I╱ // 0xeb7 @0x1a
0x0e9d…0ebc at001b = ╱44╱D╱ // 0xeb8 @0x1b
0x0e9d…0ebc at001c = ╱45╱E╱ // 0xeb9 @0x1c
0x0e9d…0ebc at001d = ╱ee╱)╱ // 0xeba @0x1d
0x0e9d…0ebc at001e = EOL // 0xebb @0x1e
0x0e9d…0ebc }
0x0ebc…0ec5 9c1c 1540 PRINT " "
0x0ebc…0ec5 LineComalBin {
0x0ebc…0ec5 ptr = 0x9c1c // 0xebc @0x0
0x0ebc…0ec5 lno = 0x0604 // 0xebe @0x2
0x0ebc…0ec5 at0004 = ╱92╱ PRINT ╱ // 0xec0 @0x4
0x0ebc…0ec5 at0005 = ╱22╱"╱ // 0xec1 @0x5
0x0ebc…0ec5 at0006 = ╱20╱…╱ // 0xec2 @0x6
0x0ebc…0ec5 at0007 = ╱22╱"╱ // 0xec3 @0x7
0x0ebc…0ec5 at0008 = EOL // 0xec4 @0x8
0x0ebc…0ec5 }
0x0ec5…0ed3 9c2a 1545 IF GFNR9>B THEN
0x0ec5…0ed3 LineComalBin {
0x0ec5…0ed3 ptr = 0x9c2a // 0xec5 @0x0
0x0ec5…0ed3 lno = 0x0609 // 0xec7 @0x2
0x0ec5…0ed3 at0004 = ╱9c╱ IF ╱ // 0xec9 @0x4
0x0ec5…0ed3 at0005 = ╱47╱G╱ // 0xeca @0x5
0x0ec5…0ed3 at0006 = ╱46╱F╱ // 0xecb @0x6
0x0ec5…0ed3 at0007 = ╱4e╱N╱ // 0xecc @0x7
0x0ec5…0ed3 at0008 = ╱52╱R╱ // 0xecd @0x8
0x0ec5…0ed3 at0009 = ╱39╱9╱ // 0xece @0x9
0x0ec5…0ed3 at000a = ╱de╱>╱ // 0xecf @0xa
0x0ec5…0ed3 at000b = ╱42╱B╱ // 0xed0 @0xb
0x0ec5…0ed3 at000c = ╱b6╱ THEN ╱ // 0xed1 @0xc
0x0ec5…0ed3 at000d = EOL // 0xed2 @0xd
0x0ec5…0ed3 }
0x0ed3…0eea 9c41 1550 PRINT USING "###### ":GFNR9;
0x0ed3…0eea LineComalBin {
0x0ed3…0eea ptr = 0x9c41 // 0xed3 @0x0
0x0ed3…0eea lno = 0x060e // 0xed5 @0x2
0x0ed3…0eea at0004 = ╱92╱ PRINT ╱ // 0xed7 @0x4
0x0ed3…0eea at0005 = ╱b9╱ USING ╱ // 0xed8 @0x5
0x0ed3…0eea at0006 = ╱22╱"╱ // 0xed9 @0x6
0x0ed3…0eea at0007 = ╱23╱#╱ // 0xeda @0x7
0x0ed3…0eea at0008 = ╱23╱#╱ // 0xedb @0x8
0x0ed3…0eea at0009 = ╱23╱#╱ // 0xedc @0x9
0x0ed3…0eea at000a = ╱23╱#╱ // 0xedd @0xa
0x0ed3…0eea at000b = ╱23╱#╱ // 0xede @0xb
0x0ed3…0eea at000c = ╱23╱#╱ // 0xedf @0xc
0x0ed3…0eea at000d = ╱20╱…╱ // 0xee0 @0xd
0x0ed3…0eea at000e = ╱22╱"╱ // 0xee1 @0xe
0x0ed3…0eea at000f = ╱f0╱:╱ // 0xee2 @0xf
0x0ed3…0eea at0010 = ╱47╱G╱ // 0xee3 @0x10
0x0ed3…0eea at0011 = ╱46╱F╱ // 0xee4 @0x11
0x0ed3…0eea at0012 = ╱4e╱N╱ // 0xee5 @0x12
0x0ed3…0eea at0013 = ╱52╱R╱ // 0xee6 @0x13
0x0ed3…0eea at0014 = ╱39╱9╱ // 0xee7 @0x14
0x0ed3…0eea at0015 = ╱eb╱;╱ // 0xee8 @0x15
0x0ed3…0eea at0016 = EOL // 0xee9 @0x16
0x0ed3…0eea }
0x0eea…0f11 9c68 1560 EXEC CALC(4,SALDO12$,TAL4$,TAL4$)
0x0eea…0f11 LineComalBin {
0x0eea…0f11 ptr = 0x9c68 // 0xeea @0x0
0x0eea…0f11 lno = 0x0618 // 0xeec @0x2
0x0eea…0f11 at0004 = ╱9d╱ EXEC ╱ // 0xeee @0x4
0x0eea…0f11 at0005 = ╱43╱C╱ // 0xeef @0x5
0x0eea…0f11 at0006 = ╱41╱A╱ // 0xef0 @0x6
0x0eea…0f11 at0007 = ╱4c╱L╱ // 0xef1 @0x7
0x0eea…0f11 at0008 = ╱43╱C╱ // 0xef2 @0x8
0x0eea…0f11 at0009 = ╱ed╱(╱ // 0xef3 @0x9
0x0eea…0f11 at000a = ╱34╱4╱ // 0xef4 @0xa
0x0eea…0f11 at000b = ╱fe00008003╱ // 0xef5 @0xb
0x0eea…0f11 at0010 = ╱ec╱,╱ // 0xefa @0x10
0x0eea…0f11 at0011 = ╱53╱S╱ // 0xefb @0x11
0x0eea…0f11 at0012 = ╱41╱A╱ // 0xefc @0x12
0x0eea…0f11 at0013 = ╱4c╱L╱ // 0xefd @0x13
0x0eea…0f11 at0014 = ╱44╱D╱ // 0xefe @0x14
0x0eea…0f11 at0015 = ╱4f╱O╱ // 0xeff @0x15
0x0eea…0f11 at0016 = ╱31╱1╱ // 0xf00 @0x16
0x0eea…0f11 at0017 = ╱32╱2╱ // 0xf01 @0x17
0x0eea…0f11 at0018 = ╱ef╱$╱ // 0xf02 @0x18
0x0eea…0f11 at0019 = ╱ec╱,╱ // 0xf03 @0x19
0x0eea…0f11 at001a = ╱54╱T╱ // 0xf04 @0x1a
0x0eea…0f11 at001b = ╱41╱A╱ // 0xf05 @0x1b
0x0eea…0f11 at001c = ╱4c╱L╱ // 0xf06 @0x1c
0x0eea…0f11 at001d = ╱34╱4╱ // 0xf07 @0x1d
0x0eea…0f11 at001e = ╱ef╱$╱ // 0xf08 @0x1e
0x0eea…0f11 at001f = ╱ec╱,╱ // 0xf09 @0x1f
0x0eea…0f11 at0020 = ╱54╱T╱ // 0xf0a @0x20
0x0eea…0f11 at0021 = ╱41╱A╱ // 0xf0b @0x21
0x0eea…0f11 at0022 = ╱4c╱L╱ // 0xf0c @0x22
0x0eea…0f11 at0023 = ╱34╱4╱ // 0xf0d @0x23
0x0eea…0f11 at0024 = ╱ef╱$╱ // 0xf0e @0x24
0x0eea…0f11 at0025 = ╱ee╱)╱ // 0xf0f @0x25
0x0eea…0f11 at0026 = EOL // 0xf10 @0x26
0x0eea…0f11 }
0x0f11…0f1c 9c73 1570 IF SI<>B THEN
0x0f11…0f1c LineComalBin {
0x0f11…0f1c ptr = 0x9c73 // 0xf11 @0x0
0x0f11…0f1c lno = 0x0622 // 0xf13 @0x2
0x0f11…0f1c at0004 = ╱9c╱ IF ╱ // 0xf15 @0x4
0x0f11…0f1c at0005 = ╱53╱S╱ // 0xf16 @0x5
0x0f11…0f1c at0006 = ╱49╱I╱ // 0xf17 @0x6
0x0f11…0f1c at0007 = ╱e1╱<>╱ // 0xf18 @0x7
0x0f11…0f1c at0008 = ╱42╱B╱ // 0xf19 @0x8
0x0f11…0f1c at0009 = ╱b6╱ THEN ╱ // 0xf1a @0x9
0x0f11…0f1c at000a = EOL // 0xf1b @0xa
0x0f11…0f1c }
0x0f1c…0f35 9c8c 1580 PRINT GLNAVN9$;" Fortsat"
0x0f1c…0f35 LineComalBin {
0x0f1c…0f35 ptr = 0x9c8c // 0xf1c @0x0
0x0f1c…0f35 lno = 0x062c // 0xf1e @0x2
0x0f1c…0f35 at0004 = ╱92╱ PRINT ╱ // 0xf20 @0x4
0x0f1c…0f35 at0005 = ╱47╱G╱ // 0xf21 @0x5
0x0f1c…0f35 at0006 = ╱4c╱L╱ // 0xf22 @0x6
0x0f1c…0f35 at0007 = ╱4e╱N╱ // 0xf23 @0x7
0x0f1c…0f35 at0008 = ╱41╱A╱ // 0xf24 @0x8
0x0f1c…0f35 at0009 = ╱56╱V╱ // 0xf25 @0x9
0x0f1c…0f35 at000a = ╱4e╱N╱ // 0xf26 @0xa
0x0f1c…0f35 at000b = ╱39╱9╱ // 0xf27 @0xb
0x0f1c…0f35 at000c = ╱ef╱$╱ // 0xf28 @0xc
0x0f1c…0f35 at000d = ╱eb╱;╱ // 0xf29 @0xd
0x0f1c…0f35 at000e = ╱22╱"╱ // 0xf2a @0xe
0x0f1c…0f35 at000f = ╱20╱…╱ // 0xf2b @0xf
0x0f1c…0f35 at0010 = ╱46╱F╱ // 0xf2c @0x10
0x0f1c…0f35 at0011 = ╱6f╱o╱ // 0xf2d @0x11
0x0f1c…0f35 at0012 = ╱72╱r╱ // 0xf2e @0x12
0x0f1c…0f35 at0013 = ╱74╱t╱ // 0xf2f @0x13
0x0f1c…0f35 at0014 = ╱73╱s╱ // 0xf30 @0x14
0x0f1c…0f35 at0015 = ╱61╱a╱ // 0xf31 @0x15
0x0f1c…0f35 at0016 = ╱74╱t╱ // 0xf32 @0x16
0x0f1c…0f35 at0017 = ╱22╱"╱ // 0xf33 @0x17
0x0f1c…0f35 at0018 = EOL // 0xf34 @0x18
0x0f1c…0f35 }
0x0f35…0f3b 9c92 1590 ELSE
0x0f35…0f3b LineComalBin {
0x0f35…0f3b ptr = 0x9c92 // 0xf35 @0x0
0x0f35…0f3b lno = 0x0636 // 0xf37 @0x2
0x0f35…0f3b at0004 = ╱9a╱ ELSE ╱ // 0xf39 @0x4
0x0f35…0f3b at0005 = EOL // 0xf3a @0x5
0x0f35…0f3b }
0x0f3b…0f49 9ca0 1600 PRINT GLNAVN9$
0x0f3b…0f49 LineComalBin {
0x0f3b…0f49 ptr = 0x9ca0 // 0xf3b @0x0
0x0f3b…0f49 lno = 0x0640 // 0xf3d @0x2
0x0f3b…0f49 at0004 = ╱92╱ PRINT ╱ // 0xf3f @0x4
0x0f3b…0f49 at0005 = ╱47╱G╱ // 0xf40 @0x5
0x0f3b…0f49 at0006 = ╱4c╱L╱ // 0xf41 @0x6
0x0f3b…0f49 at0007 = ╱4e╱N╱ // 0xf42 @0x7
0x0f3b…0f49 at0008 = ╱41╱A╱ // 0xf43 @0x8
0x0f3b…0f49 at0009 = ╱56╱V╱ // 0xf44 @0x9
0x0f3b…0f49 at000a = ╱4e╱N╱ // 0xf45 @0xa
0x0f3b…0f49 at000b = ╱39╱9╱ // 0xf46 @0xb
0x0f3b…0f49 at000c = ╱ef╱$╱ // 0xf47 @0xc
0x0f3b…0f49 at000d = EOL // 0xf48 @0xd
0x0f3b…0f49 }
0x0f49…0f4f 9ca6 1610 ENDIF
0x0f49…0f4f LineComalBin {
0x0f49…0f4f ptr = 0x9ca6 // 0xf49 @0x0
0x0f49…0f4f lno = 0x064a // 0xf4b @0x2
0x0f49…0f4f at0004 = ╱9b╱ ENDIF ╱ // 0xf4d @0x4
0x0f49…0f4f at0005 = EOL // 0xf4e @0x5
0x0f49…0f4f }
0x0f4f…0f7e 9cd5 1620 PRINT TAB(8);STREG$(E:25+7*(SI<>B))
0x0f4f…0f7e LineComalBin {
0x0f4f…0f7e ptr = 0x9cd5 // 0xf4f @0x0
0x0f4f…0f7e lno = 0x0654 // 0xf51 @0x2
0x0f4f…0f7e at0004 = ╱92╱ PRINT ╱ // 0xf53 @0x4
0x0f4f…0f7e at0005 = ╱d2╱TAB╱ // 0xf54 @0x5
0x0f4f…0f7e at0006 = ╱ed╱(╱ // 0xf55 @0x6
0x0f4f…0f7e at0007 = ╱38╱8╱ // 0xf56 @0x7
0x0f4f…0f7e at0008 = ╱fe00008004╱ // 0xf57 @0x8
0x0f4f…0f7e at000d = ╱ee╱)╱ // 0xf5c @0xd
0x0f4f…0f7e at000e = ╱eb╱;╱ // 0xf5d @0xe
0x0f4f…0f7e at000f = ╱53╱S╱ // 0xf5e @0xf
0x0f4f…0f7e at0010 = ╱54╱T╱ // 0xf5f @0x10
0x0f4f…0f7e at0011 = ╱52╱R╱ // 0xf60 @0x11
0x0f4f…0f7e at0012 = ╱45╱E╱ // 0xf61 @0x12
0x0f4f…0f7e at0013 = ╱47╱G╱ // 0xf62 @0x13
0x0f4f…0f7e at0014 = ╱ef╱$╱ // 0xf63 @0x14
0x0f4f…0f7e at0015 = ╱ed╱(╱ // 0xf64 @0x15
0x0f4f…0f7e at0016 = ╱45╱E╱ // 0xf65 @0x16
0x0f4f…0f7e at0017 = ╱f0╱:╱ // 0xf66 @0x17
0x0f4f…0f7e at0018 = ╱32╱2╱ // 0xf67 @0x18
0x0f4f…0f7e at0019 = ╱35╱5╱ // 0xf68 @0x19
0x0f4f…0f7e at001a = ╱fe0000c805╱ // 0xf69 @0x1a
0x0f4f…0f7e at001f = ╱e2╱+╱ // 0xf6e @0x1f
0x0f4f…0f7e at0020 = ╱37╱7╱ // 0xf6f @0x20
0x0f4f…0f7e at0021 = ╱fe0000e003╱ // 0xf70 @0x21
0x0f4f…0f7e at0026 = ╱e4╱*╱ // 0xf75 @0x26
0x0f4f…0f7e at0027 = ╱ed╱(╱ // 0xf76 @0x27
0x0f4f…0f7e at0028 = ╱53╱S╱ // 0xf77 @0x28
0x0f4f…0f7e at0029 = ╱49╱I╱ // 0xf78 @0x29
0x0f4f…0f7e at002a = ╱e1╱<>╱ // 0xf79 @0x2a
0x0f4f…0f7e at002b = ╱42╱B╱ // 0xf7a @0x2b
0x0f4f…0f7e at002c = ╱ee╱)╱ // 0xf7b @0x2c
0x0f4f…0f7e at002d = ╱ee╱)╱ // 0xf7c @0x2d
0x0f4f…0f7e at002e = EOL // 0xf7d @0x2e
0x0f4f…0f7e }
0x0f7e…0f8f 9ce6 1630 LINIE=5
0x0f7e…0f8f LineComalBin {
0x0f7e…0f8f ptr = 0x9ce6 // 0xf7e @0x0
0x0f7e…0f8f lno = 0x065e // 0xf80 @0x2
0x0f7e…0f8f at0004 = ╱4c╱L╱ // 0xf82 @0x4
0x0f7e…0f8f at0005 = ╱49╱I╱ // 0xf83 @0x5
0x0f7e…0f8f at0006 = ╱4e╱N╱ // 0xf84 @0x6
0x0f7e…0f8f at0007 = ╱49╱I╱ // 0xf85 @0x7
0x0f7e…0f8f at0008 = ╱45╱E╱ // 0xf86 @0x8
0x0f7e…0f8f at0009 = ╱dc╱=╱ // 0xf87 @0x9
0x0f7e…0f8f at000a = ╱35╱5╱ // 0xf88 @0xa
0x0f7e…0f8f at000b = ╱fe0000a003╱ // 0xf89 @0xb
0x0f7e…0f8f at0010 = EOL // 0xf8e @0x10
0x0f7e…0f8f }
0x0f8f…0f95 9cec 1640 ELSE
0x0f8f…0f95 LineComalBin {
0x0f8f…0f95 ptr = 0x9cec // 0xf8f @0x0
0x0f8f…0f95 lno = 0x0668 // 0xf91 @0x2
0x0f8f…0f95 at0004 = ╱9a╱ ELSE ╱ // 0xf93 @0x4
0x0f8f…0f95 at0005 = EOL // 0xf94 @0x5
0x0f8f…0f95 }
0x0f95…0fa1 9cf8 1650 LINIE=V
0x0f95…0fa1 LineComalBin {
0x0f95…0fa1 ptr = 0x9cf8 // 0xf95 @0x0
0x0f95…0fa1 lno = 0x0672 // 0xf97 @0x2
0x0f95…0fa1 at0004 = ╱4c╱L╱ // 0xf99 @0x4
0x0f95…0fa1 at0005 = ╱49╱I╱ // 0xf9a @0x5
0x0f95…0fa1 at0006 = ╱4e╱N╱ // 0xf9b @0x6
0x0f95…0fa1 at0007 = ╱49╱I╱ // 0xf9c @0x7
0x0f95…0fa1 at0008 = ╱45╱E╱ // 0xf9d @0x8
0x0f95…0fa1 at0009 = ╱dc╱=╱ // 0xf9e @0x9
0x0f95…0fa1 at000a = ╱56╱V╱ // 0xf9f @0xa
0x0f95…0fa1 at000b = EOL // 0xfa0 @0xb
0x0f95…0fa1 }
0x0fa1…0fa7 9cfe 1651 ENDIF
0x0fa1…0fa7 LineComalBin {
0x0fa1…0fa7 ptr = 0x9cfe // 0xfa1 @0x0
0x0fa1…0fa7 lno = 0x0673 // 0xfa3 @0x2
0x0fa1…0fa7 at0004 = ╱9b╱ ENDIF ╱ // 0xfa5 @0x4
0x0fa1…0fa7 at0005 = EOL // 0xfa6 @0x5
0x0fa1…0fa7 }
0x0fa7…0fb0 9d07 1652 PRINT " "
0x0fa7…0fb0 LineComalBin {
0x0fa7…0fb0 ptr = 0x9d07 // 0xfa7 @0x0
0x0fa7…0fb0 lno = 0x0674 // 0xfa9 @0x2
0x0fa7…0fb0 at0004 = ╱92╱ PRINT ╱ // 0xfab @0x4
0x0fa7…0fb0 at0005 = ╱22╱"╱ // 0xfac @0x5
0x0fa7…0fb0 at0006 = ╱20╱…╱ // 0xfad @0x6
0x0fa7…0fb0 at0007 = ╱22╱"╱ // 0xfae @0x7
0x0fa7…0fb0 at0008 = EOL // 0xfaf @0x8
0x0fa7…0fb0 }
0x0fb0…0fb6 9d0d 1653 ENDPROC
0x0fb0…0fb6 LineComalBin {
0x0fb0…0fb6 ptr = 0x9d0d // 0xfb0 @0x0
0x0fb0…0fb6 lno = 0x0675 // 0xfb2 @0x2
0x0fb0…0fb6 at0004 = ╱9f╱ ENDPROC ╱ // 0xfb4 @0x4
0x0fb0…0fb6 at0005 = EOL // 0xfb5 @0x5
0x0fb0…0fb6 }
0x0fb6…0fd0 9d27 1660 K1$="P641220:SYSTEM1"
0x0fb6…0fd0 LineComalBin {
0x0fb6…0fd0 ptr = 0x9d27 // 0xfb6 @0x0
0x0fb6…0fd0 lno = 0x067c // 0xfb8 @0x2
0x0fb6…0fd0 at0004 = ╱4b╱K╱ // 0xfba @0x4
0x0fb6…0fd0 at0005 = ╱31╱1╱ // 0xfbb @0x5
0x0fb6…0fd0 at0006 = ╱ef╱$╱ // 0xfbc @0x6
0x0fb6…0fd0 at0007 = ╱dc╱=╱ // 0xfbd @0x7
0x0fb6…0fd0 at0008 = ╱22╱"╱ // 0xfbe @0x8
0x0fb6…0fd0 at0009 = ╱50╱P╱ // 0xfbf @0x9
0x0fb6…0fd0 at000a = ╱36╱6╱ // 0xfc0 @0xa
0x0fb6…0fd0 at000b = ╱34╱4╱ // 0xfc1 @0xb
0x0fb6…0fd0 at000c = ╱31╱1╱ // 0xfc2 @0xc
0x0fb6…0fd0 at000d = ╱32╱2╱ // 0xfc3 @0xd
0x0fb6…0fd0 at000e = ╱32╱2╱ // 0xfc4 @0xe
0x0fb6…0fd0 at000f = ╱30╱0╱ // 0xfc5 @0xf
0x0fb6…0fd0 at0010 = ╱3a╱:╱ // 0xfc6 @0x10
0x0fb6…0fd0 at0011 = ╱53╱S╱ // 0xfc7 @0x11
0x0fb6…0fd0 at0012 = ╱59╱Y╱ // 0xfc8 @0x12
0x0fb6…0fd0 at0013 = ╱53╱S╱ // 0xfc9 @0x13
0x0fb6…0fd0 at0014 = ╱54╱T╱ // 0xfca @0x14
0x0fb6…0fd0 at0015 = ╱45╱E╱ // 0xfcb @0x15
0x0fb6…0fd0 at0016 = ╱4d╱M╱ // 0xfcc @0x16
0x0fb6…0fd0 at0017 = ╱31╱1╱ // 0xfcd @0x17
0x0fb6…0fd0 at0018 = ╱22╱"╱ // 0xfce @0x18
0x0fb6…0fd0 at0019 = EOL // 0xfcf @0x19
0x0fb6…0fd0 }
0x0fd0…0fdb 9d32 1670 OPEN K1$,R
0x0fd0…0fdb LineComalBin {
0x0fd0…0fdb ptr = 0x9d32 // 0xfd0 @0x0
0x0fd0…0fdb lno = 0x0686 // 0xfd2 @0x2
0x0fd0…0fdb at0004 = ╱a7╱ OPEN ╱ // 0xfd4 @0x4
0x0fd0…0fdb at0005 = ╱4b╱K╱ // 0xfd5 @0x5
0x0fd0…0fdb at0006 = ╱31╱1╱ // 0xfd6 @0x6
0x0fd0…0fdb at0007 = ╱ef╱$╱ // 0xfd7 @0x7
0x0fd0…0fdb at0008 = ╱ec╱,╱ // 0xfd8 @0x8
0x0fd0…0fdb at0009 = ╱52╱R╱ // 0xfd9 @0x9
0x0fd0…0fdb at000a = EOL // 0xfda @0xa
0x0fd0…0fdb }
0x0fdb…0fee 9d45 1680 EXEC FEJL(W,E,K1$)
0x0fdb…0fee LineComalBin {
0x0fdb…0fee ptr = 0x9d45 // 0xfdb @0x0
0x0fdb…0fee lno = 0x0690 // 0xfdd @0x2
0x0fdb…0fee at0004 = ╱9d╱ EXEC ╱ // 0xfdf @0x4
0x0fdb…0fee at0005 = ╱46╱F╱ // 0xfe0 @0x5
0x0fdb…0fee at0006 = ╱45╱E╱ // 0xfe1 @0x6
0x0fdb…0fee at0007 = ╱4a╱J╱ // 0xfe2 @0x7
0x0fdb…0fee at0008 = ╱4c╱L╱ // 0xfe3 @0x8
0x0fdb…0fee at0009 = ╱ed╱(╱ // 0xfe4 @0x9
0x0fdb…0fee at000a = ╱57╱W╱ // 0xfe5 @0xa
0x0fdb…0fee at000b = ╱ec╱,╱ // 0xfe6 @0xb
0x0fdb…0fee at000c = ╱45╱E╱ // 0xfe7 @0xc
0x0fdb…0fee at000d = ╱ec╱,╱ // 0xfe8 @0xd
0x0fdb…0fee at000e = ╱4b╱K╱ // 0xfe9 @0xe
0x0fdb…0fee at000f = ╱31╱1╱ // 0xfea @0xf
0x0fdb…0fee at0010 = ╱ef╱$╱ // 0xfeb @0x10
0x0fdb…0fee at0011 = ╱ee╱)╱ // 0xfec @0x11
0x0fdb…0fee at0012 = EOL // 0xfed @0x12
0x0fdb…0fee }
0x0fee…1011 9d68 1690 GET K1$,E:MFANTAL,MDANTAL,MKANTAL
0x0fee…1011 LineComalBin {
0x0fee…1011 ptr = 0x9d68 // 0xfee @0x0
0x0fee…1011 lno = 0x069a // 0xff0 @0x2
0x0fee…1011 at0004 = ╱a9╱ GET ╱ // 0xff2 @0x4
0x0fee…1011 at0005 = ╱4b╱K╱ // 0xff3 @0x5
0x0fee…1011 at0006 = ╱31╱1╱ // 0xff4 @0x6
0x0fee…1011 at0007 = ╱ef╱$╱ // 0xff5 @0x7
0x0fee…1011 at0008 = ╱ec╱,╱ // 0xff6 @0x8
0x0fee…1011 at0009 = ╱45╱E╱ // 0xff7 @0x9
0x0fee…1011 at000a = ╱f0╱:╱ // 0xff8 @0xa
0x0fee…1011 at000b = ╱4d╱M╱ // 0xff9 @0xb
0x0fee…1011 at000c = ╱46╱F╱ // 0xffa @0xc
0x0fee…1011 at000d = ╱41╱A╱ // 0xffb @0xd
0x0fee…1011 at000e = ╱4e╱N╱ // 0xffc @0xe
0x0fee…1011 at000f = ╱54╱T╱ // 0xffd @0xf
0x0fee…1011 at0010 = ╱41╱A╱ // 0xffe @0x10
0x0fee…1011 at0011 = ╱4c╱L╱ // 0xfff @0x11
0x0fee…1011 at0012 = ╱ec╱,╱ // 0x1000 @0x12
0x0fee…1011 at0013 = ╱4d╱M╱ // 0x1001 @0x13
0x0fee…1011 at0014 = ╱44╱D╱ // 0x1002 @0x14
0x0fee…1011 at0015 = ╱41╱A╱ // 0x1003 @0x15
0x0fee…1011 at0016 = ╱4e╱N╱ // 0x1004 @0x16
0x0fee…1011 at0017 = ╱54╱T╱ // 0x1005 @0x17
0x0fee…1011 at0018 = ╱41╱A╱ // 0x1006 @0x18
0x0fee…1011 at0019 = ╱4c╱L╱ // 0x1007 @0x19
0x0fee…1011 at001a = ╱ec╱,╱ // 0x1008 @0x1a
0x0fee…1011 at001b = ╱4d╱M╱ // 0x1009 @0x1b
0x0fee…1011 at001c = ╱4b╱K╱ // 0x100a @0x1c
0x0fee…1011 at001d = ╱41╱A╱ // 0x100b @0x1d
0x0fee…1011 at001e = ╱4e╱N╱ // 0x100c @0x1e
0x0fee…1011 at001f = ╱54╱T╱ // 0x100d @0x1f
0x0fee…1011 at0020 = ╱41╱A╱ // 0x100e @0x20
0x0fee…1011 at0021 = ╱4c╱L╱ // 0x100f @0x21
0x0fee…1011 at0022 = EOL // 0x1010 @0x22
0x0fee…1011 }
0x1011…1024 9d7b 1700 EXEC FEJL(W,G,K1$)
0x1011…1024 LineComalBin {
0x1011…1024 ptr = 0x9d7b // 0x1011 @0x0
0x1011…1024 lno = 0x06a4 // 0x1013 @0x2
0x1011…1024 at0004 = ╱9d╱ EXEC ╱ // 0x1015 @0x4
0x1011…1024 at0005 = ╱46╱F╱ // 0x1016 @0x5
0x1011…1024 at0006 = ╱45╱E╱ // 0x1017 @0x6
0x1011…1024 at0007 = ╱4a╱J╱ // 0x1018 @0x7
0x1011…1024 at0008 = ╱4c╱L╱ // 0x1019 @0x8
0x1011…1024 at0009 = ╱ed╱(╱ // 0x101a @0x9
0x1011…1024 at000a = ╱57╱W╱ // 0x101b @0xa
0x1011…1024 at000b = ╱ec╱,╱ // 0x101c @0xb
0x1011…1024 at000c = ╱47╱G╱ // 0x101d @0xc
0x1011…1024 at000d = ╱ec╱,╱ // 0x101e @0xd
0x1011…1024 at000e = ╱4b╱K╱ // 0x101f @0xe
0x1011…1024 at000f = ╱31╱1╱ // 0x1020 @0xf
0x1011…1024 at0010 = ╱ef╱$╱ // 0x1021 @0x10
0x1011…1024 at0011 = ╱ee╱)╱ // 0x1022 @0x11
0x1011…1024 at0012 = EOL // 0x1023 @0x12
0x1011…1024 }
0x1024…1049 9da0 1710 GET K1$,V:DPOST,KPOST,MFPOST,MDPOST
0x1024…1049 LineComalBin {
0x1024…1049 ptr = 0x9da0 // 0x1024 @0x0
0x1024…1049 lno = 0x06ae // 0x1026 @0x2
0x1024…1049 at0004 = ╱a9╱ GET ╱ // 0x1028 @0x4
0x1024…1049 at0005 = ╱4b╱K╱ // 0x1029 @0x5
0x1024…1049 at0006 = ╱31╱1╱ // 0x102a @0x6
0x1024…1049 at0007 = ╱ef╱$╱ // 0x102b @0x7
0x1024…1049 at0008 = ╱ec╱,╱ // 0x102c @0x8
0x1024…1049 at0009 = ╱56╱V╱ // 0x102d @0x9
0x1024…1049 at000a = ╱f0╱:╱ // 0x102e @0xa
0x1024…1049 at000b = ╱44╱D╱ // 0x102f @0xb
0x1024…1049 at000c = ╱50╱P╱ // 0x1030 @0xc
0x1024…1049 at000d = ╱4f╱O╱ // 0x1031 @0xd
0x1024…1049 at000e = ╱53╱S╱ // 0x1032 @0xe
0x1024…1049 at000f = ╱54╱T╱ // 0x1033 @0xf
0x1024…1049 at0010 = ╱ec╱,╱ // 0x1034 @0x10
0x1024…1049 at0011 = ╱4b╱K╱ // 0x1035 @0x11
0x1024…1049 at0012 = ╱50╱P╱ // 0x1036 @0x12
0x1024…1049 at0013 = ╱4f╱O╱ // 0x1037 @0x13
0x1024…1049 at0014 = ╱53╱S╱ // 0x1038 @0x14
0x1024…1049 at0015 = ╱54╱T╱ // 0x1039 @0x15
0x1024…1049 at0016 = ╱ec╱,╱ // 0x103a @0x16
0x1024…1049 at0017 = ╱4d╱M╱ // 0x103b @0x17
0x1024…1049 at0018 = ╱46╱F╱ // 0x103c @0x18
0x1024…1049 at0019 = ╱50╱P╱ // 0x103d @0x19
0x1024…1049 at001a = ╱4f╱O╱ // 0x103e @0x1a
0x1024…1049 at001b = ╱53╱S╱ // 0x103f @0x1b
0x1024…1049 at001c = ╱54╱T╱ // 0x1040 @0x1c
0x1024…1049 at001d = ╱ec╱,╱ // 0x1041 @0x1d
0x1024…1049 at001e = ╱4d╱M╱ // 0x1042 @0x1e
0x1024…1049 at001f = ╱44╱D╱ // 0x1043 @0x1f
0x1024…1049 at0020 = ╱50╱P╱ // 0x1044 @0x20
0x1024…1049 at0021 = ╱4f╱O╱ // 0x1045 @0x21
0x1024…1049 at0022 = ╱53╱S╱ // 0x1046 @0x22
0x1024…1049 at0023 = ╱54╱T╱ // 0x1047 @0x23
0x1024…1049 at0024 = EOL // 0x1048 @0x24
0x1024…1049 }
0x1049…1062 9db9 1720 EXEC FEJL(W,21,K1$)
0x1049…1062 LineComalBin {
0x1049…1062 ptr = 0x9db9 // 0x1049 @0x0
0x1049…1062 lno = 0x06b8 // 0x104b @0x2
0x1049…1062 at0004 = ╱9d╱ EXEC ╱ // 0x104d @0x4
0x1049…1062 at0005 = ╱46╱F╱ // 0x104e @0x5
0x1049…1062 at0006 = ╱45╱E╱ // 0x104f @0x6
0x1049…1062 at0007 = ╱4a╱J╱ // 0x1050 @0x7
0x1049…1062 at0008 = ╱4c╱L╱ // 0x1051 @0x8
0x1049…1062 at0009 = ╱ed╱(╱ // 0x1052 @0x9
0x1049…1062 at000a = ╱57╱W╱ // 0x1053 @0xa
0x1049…1062 at000b = ╱ec╱,╱ // 0x1054 @0xb
0x1049…1062 at000c = ╱32╱2╱ // 0x1055 @0xc
0x1049…1062 at000d = ╱31╱1╱ // 0x1056 @0xd
0x1049…1062 at000e = ╱fe0000a805╱ // 0x1057 @0xe
0x1049…1062 at0013 = ╱ec╱,╱ // 0x105c @0x13
0x1049…1062 at0014 = ╱4b╱K╱ // 0x105d @0x14
0x1049…1062 at0015 = ╱31╱1╱ // 0x105e @0x15
0x1049…1062 at0016 = ╱ef╱$╱ // 0x105f @0x16
0x1049…1062 at0017 = ╱ee╱)╱ // 0x1060 @0x17
0x1049…1062 at0018 = EOL // 0x1061 @0x18
0x1049…1062 }
0x1062…1088 9ddf 1730 GET K1$,4:MKPOST,MFAK,MVGR,MKGR
0x1062…1088 LineComalBin {
0x1062…1088 ptr = 0x9ddf // 0x1062 @0x0
0x1062…1088 lno = 0x06c2 // 0x1064 @0x2
0x1062…1088 at0004 = ╱a9╱ GET ╱ // 0x1066 @0x4
0x1062…1088 at0005 = ╱4b╱K╱ // 0x1067 @0x5
0x1062…1088 at0006 = ╱31╱1╱ // 0x1068 @0x6
0x1062…1088 at0007 = ╱ef╱$╱ // 0x1069 @0x7
0x1062…1088 at0008 = ╱ec╱,╱ // 0x106a @0x8
0x1062…1088 at0009 = ╱34╱4╱ // 0x106b @0x9
0x1062…1088 at000a = ╱fe00008003╱ // 0x106c @0xa
0x1062…1088 at000f = ╱f0╱:╱ // 0x1071 @0xf
0x1062…1088 at0010 = ╱4d╱M╱ // 0x1072 @0x10
0x1062…1088 at0011 = ╱4b╱K╱ // 0x1073 @0x11
0x1062…1088 at0012 = ╱50╱P╱ // 0x1074 @0x12
0x1062…1088 at0013 = ╱4f╱O╱ // 0x1075 @0x13
0x1062…1088 at0014 = ╱53╱S╱ // 0x1076 @0x14
0x1062…1088 at0015 = ╱54╱T╱ // 0x1077 @0x15
0x1062…1088 at0016 = ╱ec╱,╱ // 0x1078 @0x16
0x1062…1088 at0017 = ╱4d╱M╱ // 0x1079 @0x17
0x1062…1088 at0018 = ╱46╱F╱ // 0x107a @0x18
0x1062…1088 at0019 = ╱41╱A╱ // 0x107b @0x19
0x1062…1088 at001a = ╱4b╱K╱ // 0x107c @0x1a
0x1062…1088 at001b = ╱ec╱,╱ // 0x107d @0x1b
0x1062…1088 at001c = ╱4d╱M╱ // 0x107e @0x1c
0x1062…1088 at001d = ╱56╱V╱ // 0x107f @0x1d
0x1062…1088 at001e = ╱47╱G╱ // 0x1080 @0x1e
0x1062…1088 at001f = ╱52╱R╱ // 0x1081 @0x1f
0x1062…1088 at0020 = ╱ec╱,╱ // 0x1082 @0x20
0x1062…1088 at0021 = ╱4d╱M╱ // 0x1083 @0x21
0x1062…1088 at0022 = ╱4b╱K╱ // 0x1084 @0x22
0x1062…1088 at0023 = ╱47╱G╱ // 0x1085 @0x23
0x1062…1088 at0024 = ╱52╱R╱ // 0x1086 @0x24
0x1062…1088 at0025 = EOL // 0x1087 @0x25
0x1062…1088 }
0x1088…109b 9df2 1740 EXEC FEJL(W,V,K1$)
0x1088…109b LineComalBin {
0x1088…109b ptr = 0x9df2 // 0x1088 @0x0
0x1088…109b lno = 0x06cc // 0x108a @0x2
0x1088…109b at0004 = ╱9d╱ EXEC ╱ // 0x108c @0x4
0x1088…109b at0005 = ╱46╱F╱ // 0x108d @0x5
0x1088…109b at0006 = ╱45╱E╱ // 0x108e @0x6
0x1088…109b at0007 = ╱4a╱J╱ // 0x108f @0x7
0x1088…109b at0008 = ╱4c╱L╱ // 0x1090 @0x8
0x1088…109b at0009 = ╱ed╱(╱ // 0x1091 @0x9
0x1088…109b at000a = ╱57╱W╱ // 0x1092 @0xa
0x1088…109b at000b = ╱ec╱,╱ // 0x1093 @0xb
0x1088…109b at000c = ╱56╱V╱ // 0x1094 @0xc
0x1088…109b at000d = ╱ec╱,╱ // 0x1095 @0xd
0x1088…109b at000e = ╱4b╱K╱ // 0x1096 @0xe
0x1088…109b at000f = ╱31╱1╱ // 0x1097 @0xf
0x1088…109b at0010 = ╱ef╱$╱ // 0x1098 @0x10
0x1088…109b at0011 = ╱ee╱)╱ // 0x1099 @0x11
0x1088…109b at0012 = EOL // 0x109a @0x12
0x1088…109b }
0x109b…10b1 9e08 1750 GET K1$,5:MKRGR
0x109b…10b1 LineComalBin {
0x109b…10b1 ptr = 0x9e08 // 0x109b @0x0
0x109b…10b1 lno = 0x06d6 // 0x109d @0x2
0x109b…10b1 at0004 = ╱a9╱ GET ╱ // 0x109f @0x4
0x109b…10b1 at0005 = ╱4b╱K╱ // 0x10a0 @0x5
0x109b…10b1 at0006 = ╱31╱1╱ // 0x10a1 @0x6
0x109b…10b1 at0007 = ╱ef╱$╱ // 0x10a2 @0x7
0x109b…10b1 at0008 = ╱ec╱,╱ // 0x10a3 @0x8
0x109b…10b1 at0009 = ╱35╱5╱ // 0x10a4 @0x9
0x109b…10b1 at000a = ╱fe0000a003╱ // 0x10a5 @0xa
0x109b…10b1 at000f = ╱f0╱:╱ // 0x10aa @0xf
0x109b…10b1 at0010 = ╱4d╱M╱ // 0x10ab @0x10
0x109b…10b1 at0011 = ╱4b╱K╱ // 0x10ac @0x11
0x109b…10b1 at0012 = ╱52╱R╱ // 0x10ad @0x12
0x109b…10b1 at0013 = ╱47╱G╱ // 0x10ae @0x13
0x109b…10b1 at0014 = ╱52╱R╱ // 0x10af @0x14
0x109b…10b1 at0015 = EOL // 0x10b0 @0x15
0x109b…10b1 }
0x10b1…10c9 9e20 1760 EXEC FEJL(W,4,K1$)
0x10b1…10c9 LineComalBin {
0x10b1…10c9 ptr = 0x9e20 // 0x10b1 @0x0
0x10b1…10c9 lno = 0x06e0 // 0x10b3 @0x2
0x10b1…10c9 at0004 = ╱9d╱ EXEC ╱ // 0x10b5 @0x4
0x10b1…10c9 at0005 = ╱46╱F╱ // 0x10b6 @0x5
0x10b1…10c9 at0006 = ╱45╱E╱ // 0x10b7 @0x6
0x10b1…10c9 at0007 = ╱4a╱J╱ // 0x10b8 @0x7
0x10b1…10c9 at0008 = ╱4c╱L╱ // 0x10b9 @0x8
0x10b1…10c9 at0009 = ╱ed╱(╱ // 0x10ba @0x9
0x10b1…10c9 at000a = ╱57╱W╱ // 0x10bb @0xa
0x10b1…10c9 at000b = ╱ec╱,╱ // 0x10bc @0xb
0x10b1…10c9 at000c = ╱34╱4╱ // 0x10bd @0xc
0x10b1…10c9 at000d = ╱fe00008003╱ // 0x10be @0xd
0x10b1…10c9 at0012 = ╱ec╱,╱ // 0x10c3 @0x12
0x10b1…10c9 at0013 = ╱4b╱K╱ // 0x10c4 @0x13
0x10b1…10c9 at0014 = ╱31╱1╱ // 0x10c5 @0x14
0x10b1…10c9 at0015 = ╱ef╱$╱ // 0x10c6 @0x15
0x10b1…10c9 at0016 = ╱ee╱)╱ // 0x10c7 @0x16
0x10b1…10c9 at0017 = EOL // 0x10c8 @0x17
0x10b1…10c9 }
0x10c9…10f1 9e48 1770 GET K1$,8:DIVNR,DIVDNR,DIFNR,DTAL
0x10c9…10f1 LineComalBin {
0x10c9…10f1 ptr = 0x9e48 // 0x10c9 @0x0
0x10c9…10f1 lno = 0x06ea // 0x10cb @0x2
0x10c9…10f1 at0004 = ╱a9╱ GET ╱ // 0x10cd @0x4
0x10c9…10f1 at0005 = ╱4b╱K╱ // 0x10ce @0x5
0x10c9…10f1 at0006 = ╱31╱1╱ // 0x10cf @0x6
0x10c9…10f1 at0007 = ╱ef╱$╱ // 0x10d0 @0x7
0x10c9…10f1 at0008 = ╱ec╱,╱ // 0x10d1 @0x8
0x10c9…10f1 at0009 = ╱38╱8╱ // 0x10d2 @0x9
0x10c9…10f1 at000a = ╱fe00008004╱ // 0x10d3 @0xa
0x10c9…10f1 at000f = ╱f0╱:╱ // 0x10d8 @0xf
0x10c9…10f1 at0010 = ╱44╱D╱ // 0x10d9 @0x10
0x10c9…10f1 at0011 = ╱49╱I╱ // 0x10da @0x11
0x10c9…10f1 at0012 = ╱56╱V╱ // 0x10db @0x12
0x10c9…10f1 at0013 = ╱4e╱N╱ // 0x10dc @0x13
0x10c9…10f1 at0014 = ╱52╱R╱ // 0x10dd @0x14
0x10c9…10f1 at0015 = ╱ec╱,╱ // 0x10de @0x15
0x10c9…10f1 at0016 = ╱44╱D╱ // 0x10df @0x16
0x10c9…10f1 at0017 = ╱49╱I╱ // 0x10e0 @0x17
0x10c9…10f1 at0018 = ╱56╱V╱ // 0x10e1 @0x18
0x10c9…10f1 at0019 = ╱44╱D╱ // 0x10e2 @0x19
0x10c9…10f1 at001a = ╱4e╱N╱ // 0x10e3 @0x1a
0x10c9…10f1 at001b = ╱52╱R╱ // 0x10e4 @0x1b
0x10c9…10f1 at001c = ╱ec╱,╱ // 0x10e5 @0x1c
0x10c9…10f1 at001d = ╱44╱D╱ // 0x10e6 @0x1d
0x10c9…10f1 at001e = ╱49╱I╱ // 0x10e7 @0x1e
0x10c9…10f1 at001f = ╱46╱F╱ // 0x10e8 @0x1f
0x10c9…10f1 at0020 = ╱4e╱N╱ // 0x10e9 @0x20
0x10c9…10f1 at0021 = ╱52╱R╱ // 0x10ea @0x21
0x10c9…10f1 at0022 = ╱ec╱,╱ // 0x10eb @0x22
0x10c9…10f1 at0023 = ╱44╱D╱ // 0x10ec @0x23
0x10c9…10f1 at0024 = ╱54╱T╱ // 0x10ed @0x24
0x10c9…10f1 at0025 = ╱41╱A╱ // 0x10ee @0x25
0x10c9…10f1 at0026 = ╱4c╱L╱ // 0x10ef @0x26
0x10c9…10f1 at0027 = EOL // 0x10f0 @0x27
0x10c9…10f1 }
0x10f1…1109 9e60 1780 EXEC FEJL(W,5,K1$)
0x10f1…1109 LineComalBin {
0x10f1…1109 ptr = 0x9e60 // 0x10f1 @0x0
0x10f1…1109 lno = 0x06f4 // 0x10f3 @0x2
0x10f1…1109 at0004 = ╱9d╱ EXEC ╱ // 0x10f5 @0x4
0x10f1…1109 at0005 = ╱46╱F╱ // 0x10f6 @0x5
0x10f1…1109 at0006 = ╱45╱E╱ // 0x10f7 @0x6
0x10f1…1109 at0007 = ╱4a╱J╱ // 0x10f8 @0x7
0x10f1…1109 at0008 = ╱4c╱L╱ // 0x10f9 @0x8
0x10f1…1109 at0009 = ╱ed╱(╱ // 0x10fa @0x9
0x10f1…1109 at000a = ╱57╱W╱ // 0x10fb @0xa
0x10f1…1109 at000b = ╱ec╱,╱ // 0x10fc @0xb
0x10f1…1109 at000c = ╱35╱5╱ // 0x10fd @0xc
0x10f1…1109 at000d = ╱fe0000a003╱ // 0x10fe @0xd
0x10f1…1109 at0012 = ╱ec╱,╱ // 0x1103 @0x12
0x10f1…1109 at0013 = ╱4b╱K╱ // 0x1104 @0x13
0x10f1…1109 at0014 = ╱31╱1╱ // 0x1105 @0x14
0x10f1…1109 at0015 = ╱ef╱$╱ // 0x1106 @0x15
0x10f1…1109 at0016 = ╱ee╱)╱ // 0x1107 @0x16
0x10f1…1109 at0017 = EOL // 0x1108 @0x17
0x10f1…1109 }
0x1109…111a 9e71 1790 GET K1$,W:KRTAL
0x1109…111a LineComalBin {
0x1109…111a ptr = 0x9e71 // 0x1109 @0x0
0x1109…111a lno = 0x06fe // 0x110b @0x2
0x1109…111a at0004 = ╱a9╱ GET ╱ // 0x110d @0x4
0x1109…111a at0005 = ╱4b╱K╱ // 0x110e @0x5
0x1109…111a at0006 = ╱31╱1╱ // 0x110f @0x6
0x1109…111a at0007 = ╱ef╱$╱ // 0x1110 @0x7
0x1109…111a at0008 = ╱ec╱,╱ // 0x1111 @0x8
0x1109…111a at0009 = ╱57╱W╱ // 0x1112 @0x9
0x1109…111a at000a = ╱f0╱:╱ // 0x1113 @0xa
0x1109…111a at000b = ╱4b╱K╱ // 0x1114 @0xb
0x1109…111a at000c = ╱52╱R╱ // 0x1115 @0xc
0x1109…111a at000d = ╱54╱T╱ // 0x1116 @0xd
0x1109…111a at000e = ╱41╱A╱ // 0x1117 @0xe
0x1109…111a at000f = ╱4c╱L╱ // 0x1118 @0xf
0x1109…111a at0010 = EOL // 0x1119 @0x10
0x1109…111a }
0x111a…1132 9e89 1800 EXEC FEJL(W,6,K1$)
0x111a…1132 LineComalBin {
0x111a…1132 ptr = 0x9e89 // 0x111a @0x0
0x111a…1132 lno = 0x0708 // 0x111c @0x2
0x111a…1132 at0004 = ╱9d╱ EXEC ╱ // 0x111e @0x4
0x111a…1132 at0005 = ╱46╱F╱ // 0x111f @0x5
0x111a…1132 at0006 = ╱45╱E╱ // 0x1120 @0x6
0x111a…1132 at0007 = ╱4a╱J╱ // 0x1121 @0x7
0x111a…1132 at0008 = ╱4c╱L╱ // 0x1122 @0x8
0x111a…1132 at0009 = ╱ed╱(╱ // 0x1123 @0x9
0x111a…1132 at000a = ╱57╱W╱ // 0x1124 @0xa
0x111a…1132 at000b = ╱ec╱,╱ // 0x1125 @0xb
0x111a…1132 at000c = ╱36╱6╱ // 0x1126 @0xc
0x111a…1132 at000d = ╱fe0000c003╱ // 0x1127 @0xd
0x111a…1132 at0012 = ╱ec╱,╱ // 0x112c @0x12
0x111a…1132 at0013 = ╱4b╱K╱ // 0x112d @0x13
0x111a…1132 at0014 = ╱31╱1╱ // 0x112e @0x14
0x111a…1132 at0015 = ╱ef╱$╱ // 0x112f @0x15
0x111a…1132 at0016 = ╱ee╱)╱ // 0x1130 @0x16
0x111a…1132 at0017 = EOL // 0x1131 @0x17
0x111a…1132 }
0x1132…1146 9e9d 1810 GET K1$,10:N$
0x1132…1146 LineComalBin {
0x1132…1146 ptr = 0x9e9d // 0x1132 @0x0
0x1132…1146 lno = 0x0712 // 0x1134 @0x2
0x1132…1146 at0004 = ╱a9╱ GET ╱ // 0x1136 @0x4
0x1132…1146 at0005 = ╱4b╱K╱ // 0x1137 @0x5
0x1132…1146 at0006 = ╱31╱1╱ // 0x1138 @0x6
0x1132…1146 at0007 = ╱ef╱$╱ // 0x1139 @0x7
0x1132…1146 at0008 = ╱ec╱,╱ // 0x113a @0x8
0x1132…1146 at0009 = ╱31╱1╱ // 0x113b @0x9
0x1132…1146 at000a = ╱30╱0╱ // 0x113c @0xa
0x1132…1146 at000b = ╱fe0000a004╱ // 0x113d @0xb
0x1132…1146 at0010 = ╱f0╱:╱ // 0x1142 @0x10
0x1132…1146 at0011 = ╱4e╱N╱ // 0x1143 @0x11
0x1132…1146 at0012 = ╱ef╱$╱ // 0x1144 @0x12
0x1132…1146 at0013 = EOL // 0x1145 @0x13
0x1132…1146 }
0x1146…115e 9eb5 1820 EXEC FEJL(W,7,K1$)
0x1146…115e LineComalBin {
0x1146…115e ptr = 0x9eb5 // 0x1146 @0x0
0x1146…115e lno = 0x071c // 0x1148 @0x2
0x1146…115e at0004 = ╱9d╱ EXEC ╱ // 0x114a @0x4
0x1146…115e at0005 = ╱46╱F╱ // 0x114b @0x5
0x1146…115e at0006 = ╱45╱E╱ // 0x114c @0x6
0x1146…115e at0007 = ╱4a╱J╱ // 0x114d @0x7
0x1146…115e at0008 = ╱4c╱L╱ // 0x114e @0x8
0x1146…115e at0009 = ╱ed╱(╱ // 0x114f @0x9
0x1146…115e at000a = ╱57╱W╱ // 0x1150 @0xa
0x1146…115e at000b = ╱ec╱,╱ // 0x1151 @0xb
0x1146…115e at000c = ╱37╱7╱ // 0x1152 @0xc
0x1146…115e at000d = ╱fe0000e003╱ // 0x1153 @0xd
0x1146…115e at0012 = ╱ec╱,╱ // 0x1158 @0x12
0x1146…115e at0013 = ╱4b╱K╱ // 0x1159 @0x13
0x1146…115e at0014 = ╱31╱1╱ // 0x115a @0x14
0x1146…115e at0015 = ╱ef╱$╱ // 0x115b @0x15
0x1146…115e at0016 = ╱ee╱)╱ // 0x115c @0x16
0x1146…115e at0017 = EOL // 0x115d @0x17
0x1146…115e }
0x115e…116f 9ec6 1830 FOR I=E TO 26
0x115e…116f LineComalBin {
0x115e…116f ptr = 0x9ec6 // 0x115e @0x0
0x115e…116f lno = 0x0726 // 0x1160 @0x2
0x115e…116f at0004 = ╱83╱ FOR ╱ // 0x1162 @0x4
0x115e…116f at0005 = ╱49╱I╱ // 0x1163 @0x5
0x115e…116f at0006 = ╱dc╱=╱ // 0x1164 @0x6
0x115e…116f at0007 = ╱45╱E╱ // 0x1165 @0x7
0x115e…116f at0008 = ╱b7╱ TO ╱ // 0x1166 @0x8
0x115e…116f at0009 = ╱32╱2╱ // 0x1167 @0x9
0x115e…116f at000a = ╱36╱6╱ // 0x1168 @0xa
0x115e…116f at000b = ╱fe0000d005╱ // 0x1169 @0xb
0x115e…116f at0010 = EOL // 0x116e @0x10
0x115e…116f }
0x116f…1188 9edf 1840 GET K1$,I+10:K$(I)
0x116f…1188 LineComalBin {
0x116f…1188 ptr = 0x9edf // 0x116f @0x0
0x116f…1188 lno = 0x0730 // 0x1171 @0x2
0x116f…1188 at0004 = ╱a9╱ GET ╱ // 0x1173 @0x4
0x116f…1188 at0005 = ╱4b╱K╱ // 0x1174 @0x5
0x116f…1188 at0006 = ╱31╱1╱ // 0x1175 @0x6
0x116f…1188 at0007 = ╱ef╱$╱ // 0x1176 @0x7
0x116f…1188 at0008 = ╱ec╱,╱ // 0x1177 @0x8
0x116f…1188 at0009 = ╱49╱I╱ // 0x1178 @0x9
0x116f…1188 at000a = ╱e2╱+╱ // 0x1179 @0xa
0x116f…1188 at000b = ╱31╱1╱ // 0x117a @0xb
0x116f…1188 at000c = ╱30╱0╱ // 0x117b @0xc
0x116f…1188 at000d = ╱fe0000a004╱ // 0x117c @0xd
0x116f…1188 at0012 = ╱f0╱:╱ // 0x1181 @0x12
0x116f…1188 at0013 = ╱4b╱K╱ // 0x1182 @0x13
0x116f…1188 at0014 = ╱ef╱$╱ // 0x1183 @0x14
0x116f…1188 at0015 = ╱ed╱(╱ // 0x1184 @0x15
0x116f…1188 at0016 = ╱49╱I╱ // 0x1185 @0x16
0x116f…1188 at0017 = ╱ee╱)╱ // 0x1186 @0x17
0x116f…1188 at0018 = EOL // 0x1187 @0x18
0x116f…1188 }
0x1188…11a0 9ef7 1850 EXEC FEJL(W,8,K1$)
0x1188…11a0 LineComalBin {
0x1188…11a0 ptr = 0x9ef7 // 0x1188 @0x0
0x1188…11a0 lno = 0x073a // 0x118a @0x2
0x1188…11a0 at0004 = ╱9d╱ EXEC ╱ // 0x118c @0x4
0x1188…11a0 at0005 = ╱46╱F╱ // 0x118d @0x5
0x1188…11a0 at0006 = ╱45╱E╱ // 0x118e @0x6
0x1188…11a0 at0007 = ╱4a╱J╱ // 0x118f @0x7
0x1188…11a0 at0008 = ╱4c╱L╱ // 0x1190 @0x8
0x1188…11a0 at0009 = ╱ed╱(╱ // 0x1191 @0x9
0x1188…11a0 at000a = ╱57╱W╱ // 0x1192 @0xa
0x1188…11a0 at000b = ╱ec╱,╱ // 0x1193 @0xb
0x1188…11a0 at000c = ╱38╱8╱ // 0x1194 @0xc
0x1188…11a0 at000d = ╱fe00008004╱ // 0x1195 @0xd
0x1188…11a0 at0012 = ╱ec╱,╱ // 0x119a @0x12
0x1188…11a0 at0013 = ╱4b╱K╱ // 0x119b @0x13
0x1188…11a0 at0014 = ╱31╱1╱ // 0x119c @0x14
0x1188…11a0 at0015 = ╱ef╱$╱ // 0x119d @0x15
0x1188…11a0 at0016 = ╱ee╱)╱ // 0x119e @0x16
0x1188…11a0 at0017 = EOL // 0x119f @0x17
0x1188…11a0 }
0x11a0…11a7 9efe 1860 NEXT I
0x11a0…11a7 LineComalBin {
0x11a0…11a7 ptr = 0x9efe // 0x11a0 @0x0
0x11a0…11a7 lno = 0x0744 // 0x11a2 @0x2
0x11a0…11a7 at0004 = ╱84╱ NEXT ╱ // 0x11a4 @0x4
0x11a0…11a7 at0005 = ╱49╱I╱ // 0x11a5 @0x5
0x11a0…11a7 at0006 = EOL // 0x11a6 @0x6
0x11a0…11a7 }
0x11a7…11b0 9f07 1870 CLOSE K1$
0x11a7…11b0 LineComalBin {
0x11a7…11b0 ptr = 0x9f07 // 0x11a7 @0x0
0x11a7…11b0 lno = 0x074e // 0x11a9 @0x2
0x11a7…11b0 at0004 = ╱a8╱ CLOSE ╱ // 0x11ab @0x4
0x11a7…11b0 at0005 = ╱4b╱K╱ // 0x11ac @0x5
0x11a7…11b0 at0006 = ╱31╱1╱ // 0x11ad @0x6
0x11a7…11b0 at0007 = ╱ef╱$╱ // 0x11ae @0x7
0x11a7…11b0 at0008 = EOL // 0x11af @0x8
0x11a7…11b0 }
0x11b0…11c9 9f20 1880 EXEC FEJL(W,11,K1$)
0x11b0…11c9 LineComalBin {
0x11b0…11c9 ptr = 0x9f20 // 0x11b0 @0x0
0x11b0…11c9 lno = 0x0758 // 0x11b2 @0x2
0x11b0…11c9 at0004 = ╱9d╱ EXEC ╱ // 0x11b4 @0x4
0x11b0…11c9 at0005 = ╱46╱F╱ // 0x11b5 @0x5
0x11b0…11c9 at0006 = ╱45╱E╱ // 0x11b6 @0x6
0x11b0…11c9 at0007 = ╱4a╱J╱ // 0x11b7 @0x7
0x11b0…11c9 at0008 = ╱4c╱L╱ // 0x11b8 @0x8
0x11b0…11c9 at0009 = ╱ed╱(╱ // 0x11b9 @0x9
0x11b0…11c9 at000a = ╱57╱W╱ // 0x11ba @0xa
0x11b0…11c9 at000b = ╱ec╱,╱ // 0x11bb @0xb
0x11b0…11c9 at000c = ╱31╱1╱ // 0x11bc @0xc
0x11b0…11c9 at000d = ╱31╱1╱ // 0x11bd @0xd
0x11b0…11c9 at000e = ╱fe0000b004╱ // 0x11be @0xe
0x11b0…11c9 at0013 = ╱ec╱,╱ // 0x11c3 @0x13
0x11b0…11c9 at0014 = ╱4b╱K╱ // 0x11c4 @0x14
0x11b0…11c9 at0015 = ╱31╱1╱ // 0x11c5 @0x15
0x11b0…11c9 at0016 = ╱ef╱$╱ // 0x11c6 @0x16
0x11b0…11c9 at0017 = ╱ee╱)╱ // 0x11c7 @0x17
0x11b0…11c9 at0018 = EOL // 0x11c8 @0x18
0x11b0…11c9 }
0x11c9…1222 9f79 1890 K3$=N$+K$(5);K4$=N$+K$(V);K5$=N$+K$(5);K6$=N$+K$(6);K7$=N$+K$(7)
0x11c9…1222 LineComalBin {
0x11c9…1222 ptr = 0x9f79 // 0x11c9 @0x0
0x11c9…1222 lno = 0x0762 // 0x11cb @0x2
0x11c9…1222 at0004 = ╱4b╱K╱ // 0x11cd @0x4
0x11c9…1222 at0005 = ╱33╱3╱ // 0x11ce @0x5
0x11c9…1222 at0006 = ╱ef╱$╱ // 0x11cf @0x6
0x11c9…1222 at0007 = ╱dc╱=╱ // 0x11d0 @0x7
0x11c9…1222 at0008 = ╱4e╱N╱ // 0x11d1 @0x8
0x11c9…1222 at0009 = ╱ef╱$╱ // 0x11d2 @0x9
0x11c9…1222 at000a = ╱f1╱+╱ // 0x11d3 @0xa
0x11c9…1222 at000b = ╱4b╱K╱ // 0x11d4 @0xb
0x11c9…1222 at000c = ╱ef╱$╱ // 0x11d5 @0xc
0x11c9…1222 at000d = ╱ed╱(╱ // 0x11d6 @0xd
0x11c9…1222 at000e = ╱35╱5╱ // 0x11d7 @0xe
0x11c9…1222 at000f = ╱fe0000a003╱ // 0x11d8 @0xf
0x11c9…1222 at0014 = ╱ee╱)╱ // 0x11dd @0x14
0x11c9…1222 at0015 = ╱eb╱;╱ // 0x11de @0x15
0x11c9…1222 at0016 = ╱4b╱K╱ // 0x11df @0x16
0x11c9…1222 at0017 = ╱34╱4╱ // 0x11e0 @0x17
0x11c9…1222 at0018 = ╱ef╱$╱ // 0x11e1 @0x18
0x11c9…1222 at0019 = ╱dc╱=╱ // 0x11e2 @0x19
0x11c9…1222 at001a = ╱4e╱N╱ // 0x11e3 @0x1a
0x11c9…1222 at001b = ╱ef╱$╱ // 0x11e4 @0x1b
0x11c9…1222 at001c = ╱f1╱+╱ // 0x11e5 @0x1c
0x11c9…1222 at001d = ╱4b╱K╱ // 0x11e6 @0x1d
0x11c9…1222 at001e = ╱ef╱$╱ // 0x11e7 @0x1e
0x11c9…1222 at001f = ╱ed╱(╱ // 0x11e8 @0x1f
0x11c9…1222 at0020 = ╱56╱V╱ // 0x11e9 @0x20
0x11c9…1222 at0021 = ╱ee╱)╱ // 0x11ea @0x21
0x11c9…1222 at0022 = ╱eb╱;╱ // 0x11eb @0x22
0x11c9…1222 at0023 = ╱4b╱K╱ // 0x11ec @0x23
0x11c9…1222 at0024 = ╱35╱5╱ // 0x11ed @0x24
0x11c9…1222 at0025 = ╱ef╱$╱ // 0x11ee @0x25
0x11c9…1222 at0026 = ╱dc╱=╱ // 0x11ef @0x26
0x11c9…1222 at0027 = ╱4e╱N╱ // 0x11f0 @0x27
0x11c9…1222 at0028 = ╱ef╱$╱ // 0x11f1 @0x28
0x11c9…1222 at0029 = ╱f1╱+╱ // 0x11f2 @0x29
0x11c9…1222 at002a = ╱4b╱K╱ // 0x11f3 @0x2a
0x11c9…1222 at002b = ╱ef╱$╱ // 0x11f4 @0x2b
0x11c9…1222 at002c = ╱ed╱(╱ // 0x11f5 @0x2c
0x11c9…1222 at002d = ╱35╱5╱ // 0x11f6 @0x2d
0x11c9…1222 at002e = ╱fe0000a003╱ // 0x11f7 @0x2e
0x11c9…1222 at0033 = ╱ee╱)╱ // 0x11fc @0x33
0x11c9…1222 at0034 = ╱eb╱;╱ // 0x11fd @0x34
0x11c9…1222 at0035 = ╱4b╱K╱ // 0x11fe @0x35
0x11c9…1222 at0036 = ╱36╱6╱ // 0x11ff @0x36
0x11c9…1222 at0037 = ╱ef╱$╱ // 0x1200 @0x37
0x11c9…1222 at0038 = ╱dc╱=╱ // 0x1201 @0x38
0x11c9…1222 at0039 = ╱4e╱N╱ // 0x1202 @0x39
0x11c9…1222 at003a = ╱ef╱$╱ // 0x1203 @0x3a
0x11c9…1222 at003b = ╱f1╱+╱ // 0x1204 @0x3b
0x11c9…1222 at003c = ╱4b╱K╱ // 0x1205 @0x3c
0x11c9…1222 at003d = ╱ef╱$╱ // 0x1206 @0x3d
0x11c9…1222 at003e = ╱ed╱(╱ // 0x1207 @0x3e
0x11c9…1222 at003f = ╱36╱6╱ // 0x1208 @0x3f
0x11c9…1222 at0040 = ╱fe0000c003╱ // 0x1209 @0x40
0x11c9…1222 at0045 = ╱ee╱)╱ // 0x120e @0x45
0x11c9…1222 at0046 = ╱eb╱;╱ // 0x120f @0x46
0x11c9…1222 at0047 = ╱4b╱K╱ // 0x1210 @0x47
0x11c9…1222 at0048 = ╱37╱7╱ // 0x1211 @0x48
0x11c9…1222 at0049 = ╱ef╱$╱ // 0x1212 @0x49
0x11c9…1222 at004a = ╱dc╱=╱ // 0x1213 @0x4a
0x11c9…1222 at004b = ╱4e╱N╱ // 0x1214 @0x4b
0x11c9…1222 at004c = ╱ef╱$╱ // 0x1215 @0x4c
0x11c9…1222 at004d = ╱f1╱+╱ // 0x1216 @0x4d
0x11c9…1222 at004e = ╱4b╱K╱ // 0x1217 @0x4e
0x11c9…1222 at004f = ╱ef╱$╱ // 0x1218 @0x4f
0x11c9…1222 at0050 = ╱ed╱(╱ // 0x1219 @0x50
0x11c9…1222 at0051 = ╱37╱7╱ // 0x121a @0x51
0x11c9…1222 at0052 = ╱fe0000e003╱ // 0x121b @0x52
0x11c9…1222 at0057 = ╱ee╱)╱ // 0x1220 @0x57
0x11c9…1222 at0058 = EOL // 0x1221 @0x58
0x11c9…1222 }
0x1222…1247 9f9e 1900 K10$=N$+K$(26);K2$=N$+K$(E)
0x1222…1247 LineComalBin {
0x1222…1247 ptr = 0x9f9e // 0x1222 @0x0
0x1222…1247 lno = 0x076c // 0x1224 @0x2
0x1222…1247 at0004 = ╱4b╱K╱ // 0x1226 @0x4
0x1222…1247 at0005 = ╱31╱1╱ // 0x1227 @0x5
0x1222…1247 at0006 = ╱30╱0╱ // 0x1228 @0x6
0x1222…1247 at0007 = ╱ef╱$╱ // 0x1229 @0x7
0x1222…1247 at0008 = ╱dc╱=╱ // 0x122a @0x8
0x1222…1247 at0009 = ╱4e╱N╱ // 0x122b @0x9
0x1222…1247 at000a = ╱ef╱$╱ // 0x122c @0xa
0x1222…1247 at000b = ╱f1╱+╱ // 0x122d @0xb
0x1222…1247 at000c = ╱4b╱K╱ // 0x122e @0xc
0x1222…1247 at000d = ╱ef╱$╱ // 0x122f @0xd
0x1222…1247 at000e = ╱ed╱(╱ // 0x1230 @0xe
0x1222…1247 at000f = ╱32╱2╱ // 0x1231 @0xf
0x1222…1247 at0010 = ╱36╱6╱ // 0x1232 @0x10
0x1222…1247 at0011 = ╱fe0000d005╱ // 0x1233 @0x11
0x1222…1247 at0016 = ╱ee╱)╱ // 0x1238 @0x16
0x1222…1247 at0017 = ╱eb╱;╱ // 0x1239 @0x17
0x1222…1247 at0018 = ╱4b╱K╱ // 0x123a @0x18
0x1222…1247 at0019 = ╱32╱2╱ // 0x123b @0x19
0x1222…1247 at001a = ╱ef╱$╱ // 0x123c @0x1a
0x1222…1247 at001b = ╱dc╱=╱ // 0x123d @0x1b
0x1222…1247 at001c = ╱4e╱N╱ // 0x123e @0x1c
0x1222…1247 at001d = ╱ef╱$╱ // 0x123f @0x1d
0x1222…1247 at001e = ╱f1╱+╱ // 0x1240 @0x1e
0x1222…1247 at001f = ╱4b╱K╱ // 0x1241 @0x1f
0x1222…1247 at0020 = ╱ef╱$╱ // 0x1242 @0x20
0x1222…1247 at0021 = ╱ed╱(╱ // 0x1243 @0x21
0x1222…1247 at0022 = ╱45╱E╱ // 0x1244 @0x22
0x1222…1247 at0023 = ╱ee╱)╱ // 0x1245 @0x23
0x1222…1247 at0024 = EOL // 0x1246 @0x24
0x1222…1247 }
0x1247…125c 9fb3 1910 DIM FTAB(MFANTAL,G)
0x1247…125c LineComalBin {
0x1247…125c ptr = 0x9fb3 // 0x1247 @0x0
0x1247…125c lno = 0x0776 // 0x1249 @0x2
0x1247…125c at0004 = ╱87╱ DIM ╱ // 0x124b @0x4
0x1247…125c at0005 = ╱46╱F╱ // 0x124c @0x5
0x1247…125c at0006 = ╱54╱T╱ // 0x124d @0x6
0x1247…125c at0007 = ╱41╱A╱ // 0x124e @0x7
0x1247…125c at0008 = ╱42╱B╱ // 0x124f @0x8
0x1247…125c at0009 = ╱ed╱(╱ // 0x1250 @0x9
0x1247…125c at000a = ╱4d╱M╱ // 0x1251 @0xa
0x1247…125c at000b = ╱46╱F╱ // 0x1252 @0xb
0x1247…125c at000c = ╱41╱A╱ // 0x1253 @0xc
0x1247…125c at000d = ╱4e╱N╱ // 0x1254 @0xd
0x1247…125c at000e = ╱54╱T╱ // 0x1255 @0xe
0x1247…125c at000f = ╱41╱A╱ // 0x1256 @0xf
0x1247…125c at0010 = ╱4c╱L╱ // 0x1257 @0x10
0x1247…125c at0011 = ╱ec╱,╱ // 0x1258 @0x11
0x1247…125c at0012 = ╱47╱G╱ // 0x1259 @0x12
0x1247…125c at0013 = ╱ee╱)╱ // 0x125a @0x13
0x1247…125c at0014 = EOL // 0x125b @0x14
0x1247…125c }
0x125c…1268 9fbf 1920 OPEN K10$,W
0x125c…1268 LineComalBin {
0x125c…1268 ptr = 0x9fbf // 0x125c @0x0
0x125c…1268 lno = 0x0780 // 0x125e @0x2
0x125c…1268 at0004 = ╱a7╱ OPEN ╱ // 0x1260 @0x4
0x125c…1268 at0005 = ╱4b╱K╱ // 0x1261 @0x5
0x125c…1268 at0006 = ╱31╱1╱ // 0x1262 @0x6
0x125c…1268 at0007 = ╱30╱0╱ // 0x1263 @0x7
0x125c…1268 at0008 = ╱ef╱$╱ // 0x1264 @0x8
0x125c…1268 at0009 = ╱ec╱,╱ // 0x1265 @0x9
0x125c…1268 at000a = ╱57╱W╱ // 0x1266 @0xa
0x125c…1268 at000b = EOL // 0x1267 @0xb
0x125c…1268 }
0x1268…1282 9fd9 1930 EXEC FEJL(W,12,K10$)
0x1268…1282 LineComalBin {
0x1268…1282 ptr = 0x9fd9 // 0x1268 @0x0
0x1268…1282 lno = 0x078a // 0x126a @0x2
0x1268…1282 at0004 = ╱9d╱ EXEC ╱ // 0x126c @0x4
0x1268…1282 at0005 = ╱46╱F╱ // 0x126d @0x5
0x1268…1282 at0006 = ╱45╱E╱ // 0x126e @0x6
0x1268…1282 at0007 = ╱4a╱J╱ // 0x126f @0x7
0x1268…1282 at0008 = ╱4c╱L╱ // 0x1270 @0x8
0x1268…1282 at0009 = ╱ed╱(╱ // 0x1271 @0x9
0x1268…1282 at000a = ╱57╱W╱ // 0x1272 @0xa
0x1268…1282 at000b = ╱ec╱,╱ // 0x1273 @0xb
0x1268…1282 at000c = ╱31╱1╱ // 0x1274 @0xc
0x1268…1282 at000d = ╱32╱2╱ // 0x1275 @0xd
0x1268…1282 at000e = ╱fe0000c004╱ // 0x1276 @0xe
0x1268…1282 at0013 = ╱ec╱,╱ // 0x127b @0x13
0x1268…1282 at0014 = ╱4b╱K╱ // 0x127c @0x14
0x1268…1282 at0015 = ╱31╱1╱ // 0x127d @0x15
0x1268…1282 at0016 = ╱30╱0╱ // 0x127e @0x16
0x1268…1282 at0017 = ╱ef╱$╱ // 0x127f @0x17
0x1268…1282 at0018 = ╱ee╱)╱ // 0x1280 @0x18
0x1268…1282 at0019 = EOL // 0x1281 @0x19
0x1268…1282 }
0x1282…12dd a034 1940 GET K10$,G:T1(E),T1(G),T1(V),T1(4),T1(5),T1(6),T1(7),T1(8),T1(W)
0x1282…12dd LineComalBin {
0x1282…12dd ptr = 0xa034 // 0x1282 @0x0
0x1282…12dd lno = 0x0794 // 0x1284 @0x2
0x1282…12dd at0004 = ╱a9╱ GET ╱ // 0x1286 @0x4
0x1282…12dd at0005 = ╱4b╱K╱ // 0x1287 @0x5
0x1282…12dd at0006 = ╱31╱1╱ // 0x1288 @0x6
0x1282…12dd at0007 = ╱30╱0╱ // 0x1289 @0x7
0x1282…12dd at0008 = ╱ef╱$╱ // 0x128a @0x8
0x1282…12dd at0009 = ╱ec╱,╱ // 0x128b @0x9
0x1282…12dd at000a = ╱47╱G╱ // 0x128c @0xa
0x1282…12dd at000b = ╱f0╱:╱ // 0x128d @0xb
0x1282…12dd at000c = ╱54╱T╱ // 0x128e @0xc
0x1282…12dd at000d = ╱31╱1╱ // 0x128f @0xd
0x1282…12dd at000e = ╱ed╱(╱ // 0x1290 @0xe
0x1282…12dd at000f = ╱45╱E╱ // 0x1291 @0xf
0x1282…12dd at0010 = ╱ee╱)╱ // 0x1292 @0x10
0x1282…12dd at0011 = ╱ec╱,╱ // 0x1293 @0x11
0x1282…12dd at0012 = ╱54╱T╱ // 0x1294 @0x12
0x1282…12dd at0013 = ╱31╱1╱ // 0x1295 @0x13
0x1282…12dd at0014 = ╱ed╱(╱ // 0x1296 @0x14
0x1282…12dd at0015 = ╱47╱G╱ // 0x1297 @0x15
0x1282…12dd at0016 = ╱ee╱)╱ // 0x1298 @0x16
0x1282…12dd at0017 = ╱ec╱,╱ // 0x1299 @0x17
0x1282…12dd at0018 = ╱54╱T╱ // 0x129a @0x18
0x1282…12dd at0019 = ╱31╱1╱ // 0x129b @0x19
0x1282…12dd at001a = ╱ed╱(╱ // 0x129c @0x1a
0x1282…12dd at001b = ╱56╱V╱ // 0x129d @0x1b
0x1282…12dd at001c = ╱ee╱)╱ // 0x129e @0x1c
0x1282…12dd at001d = ╱ec╱,╱ // 0x129f @0x1d
0x1282…12dd at001e = ╱54╱T╱ // 0x12a0 @0x1e
0x1282…12dd at001f = ╱31╱1╱ // 0x12a1 @0x1f
0x1282…12dd at0020 = ╱ed╱(╱ // 0x12a2 @0x20
0x1282…12dd at0021 = ╱34╱4╱ // 0x12a3 @0x21
0x1282…12dd at0022 = ╱fe00008003╱ // 0x12a4 @0x22
0x1282…12dd at0027 = ╱ee╱)╱ // 0x12a9 @0x27
0x1282…12dd at0028 = ╱ec╱,╱ // 0x12aa @0x28
0x1282…12dd at0029 = ╱54╱T╱ // 0x12ab @0x29
0x1282…12dd at002a = ╱31╱1╱ // 0x12ac @0x2a
0x1282…12dd at002b = ╱ed╱(╱ // 0x12ad @0x2b
0x1282…12dd at002c = ╱35╱5╱ // 0x12ae @0x2c
0x1282…12dd at002d = ╱fe0000a003╱ // 0x12af @0x2d
0x1282…12dd at0032 = ╱ee╱)╱ // 0x12b4 @0x32
0x1282…12dd at0033 = ╱ec╱,╱ // 0x12b5 @0x33
0x1282…12dd at0034 = ╱54╱T╱ // 0x12b6 @0x34
0x1282…12dd at0035 = ╱31╱1╱ // 0x12b7 @0x35
0x1282…12dd at0036 = ╱ed╱(╱ // 0x12b8 @0x36
0x1282…12dd at0037 = ╱36╱6╱ // 0x12b9 @0x37
0x1282…12dd at0038 = ╱fe0000c003╱ // 0x12ba @0x38
0x1282…12dd at003d = ╱ee╱)╱ // 0x12bf @0x3d
0x1282…12dd at003e = ╱ec╱,╱ // 0x12c0 @0x3e
0x1282…12dd at003f = ╱54╱T╱ // 0x12c1 @0x3f
0x1282…12dd at0040 = ╱31╱1╱ // 0x12c2 @0x40
0x1282…12dd at0041 = ╱ed╱(╱ // 0x12c3 @0x41
0x1282…12dd at0042 = ╱37╱7╱ // 0x12c4 @0x42
0x1282…12dd at0043 = ╱fe0000e003╱ // 0x12c5 @0x43
0x1282…12dd at0048 = ╱ee╱)╱ // 0x12ca @0x48
0x1282…12dd at0049 = ╱ec╱,╱ // 0x12cb @0x49
0x1282…12dd at004a = ╱54╱T╱ // 0x12cc @0x4a
0x1282…12dd at004b = ╱31╱1╱ // 0x12cd @0x4b
0x1282…12dd at004c = ╱ed╱(╱ // 0x12ce @0x4c
0x1282…12dd at004d = ╱38╱8╱ // 0x12cf @0x4d
0x1282…12dd at004e = ╱fe00008004╱ // 0x12d0 @0x4e
0x1282…12dd at0053 = ╱ee╱)╱ // 0x12d5 @0x53
0x1282…12dd at0054 = ╱ec╱,╱ // 0x12d6 @0x54
0x1282…12dd at0055 = ╱54╱T╱ // 0x12d7 @0x55
0x1282…12dd at0056 = ╱31╱1╱ // 0x12d8 @0x56
0x1282…12dd at0057 = ╱ed╱(╱ // 0x12d9 @0x57
0x1282…12dd at0058 = ╱57╱W╱ // 0x12da @0x58
0x1282…12dd at0059 = ╱ee╱)╱ // 0x12db @0x59
0x1282…12dd at005a = EOL // 0x12dc @0x5a
0x1282…12dd }
0x12dd…12f7 a04e 1950 EXEC FEJL(W,13,K10$)
0x12dd…12f7 LineComalBin {
0x12dd…12f7 ptr = 0xa04e // 0x12dd @0x0
0x12dd…12f7 lno = 0x079e // 0x12df @0x2
0x12dd…12f7 at0004 = ╱9d╱ EXEC ╱ // 0x12e1 @0x4
0x12dd…12f7 at0005 = ╱46╱F╱ // 0x12e2 @0x5
0x12dd…12f7 at0006 = ╱45╱E╱ // 0x12e3 @0x6
0x12dd…12f7 at0007 = ╱4a╱J╱ // 0x12e4 @0x7
0x12dd…12f7 at0008 = ╱4c╱L╱ // 0x12e5 @0x8
0x12dd…12f7 at0009 = ╱ed╱(╱ // 0x12e6 @0x9
0x12dd…12f7 at000a = ╱57╱W╱ // 0x12e7 @0xa
0x12dd…12f7 at000b = ╱ec╱,╱ // 0x12e8 @0xb
0x12dd…12f7 at000c = ╱31╱1╱ // 0x12e9 @0xc
0x12dd…12f7 at000d = ╱33╱3╱ // 0x12ea @0xd
0x12dd…12f7 at000e = ╱fe0000d004╱ // 0x12eb @0xe
0x12dd…12f7 at0013 = ╱ec╱,╱ // 0x12f0 @0x13
0x12dd…12f7 at0014 = ╱4b╱K╱ // 0x12f1 @0x14
0x12dd…12f7 at0015 = ╱31╱1╱ // 0x12f2 @0x15
0x12dd…12f7 at0016 = ╱30╱0╱ // 0x12f3 @0x16
0x12dd…12f7 at0017 = ╱ef╱$╱ // 0x12f4 @0x17
0x12dd…12f7 at0018 = ╱ee╱)╱ // 0x12f5 @0x18
0x12dd…12f7 at0019 = EOL // 0x12f6 @0x19
0x12dd…12f7 }
0x12f7…130e a065 1960 GET K10$,14:AFIN
0x12f7…130e LineComalBin {
0x12f7…130e ptr = 0xa065 // 0x12f7 @0x0
0x12f7…130e lno = 0x07a8 // 0x12f9 @0x2
0x12f7…130e at0004 = ╱a9╱ GET ╱ // 0x12fb @0x4
0x12f7…130e at0005 = ╱4b╱K╱ // 0x12fc @0x5
0x12f7…130e at0006 = ╱31╱1╱ // 0x12fd @0x6
0x12f7…130e at0007 = ╱30╱0╱ // 0x12fe @0x7
0x12f7…130e at0008 = ╱ef╱$╱ // 0x12ff @0x8
0x12f7…130e at0009 = ╱ec╱,╱ // 0x1300 @0x9
0x12f7…130e at000a = ╱31╱1╱ // 0x1301 @0xa
0x12f7…130e at000b = ╱34╱4╱ // 0x1302 @0xb
0x12f7…130e at000c = ╱fe0000e004╱ // 0x1303 @0xc
0x12f7…130e at0011 = ╱f0╱:╱ // 0x1308 @0x11
0x12f7…130e at0012 = ╱41╱A╱ // 0x1309 @0x12
0x12f7…130e at0013 = ╱46╱F╱ // 0x130a @0x13
0x12f7…130e at0014 = ╱49╱I╱ // 0x130b @0x14
0x12f7…130e at0015 = ╱4e╱N╱ // 0x130c @0x15
0x12f7…130e at0016 = EOL // 0x130d @0x16
0x12f7…130e }
0x130e…1328 a07f 1970 EXEC FEJL(W,14,K10$)
0x130e…1328 LineComalBin {
0x130e…1328 ptr = 0xa07f // 0x130e @0x0
0x130e…1328 lno = 0x07b2 // 0x1310 @0x2
0x130e…1328 at0004 = ╱9d╱ EXEC ╱ // 0x1312 @0x4
0x130e…1328 at0005 = ╱46╱F╱ // 0x1313 @0x5
0x130e…1328 at0006 = ╱45╱E╱ // 0x1314 @0x6
0x130e…1328 at0007 = ╱4a╱J╱ // 0x1315 @0x7
0x130e…1328 at0008 = ╱4c╱L╱ // 0x1316 @0x8
0x130e…1328 at0009 = ╱ed╱(╱ // 0x1317 @0x9
0x130e…1328 at000a = ╱57╱W╱ // 0x1318 @0xa
0x130e…1328 at000b = ╱ec╱,╱ // 0x1319 @0xb
0x130e…1328 at000c = ╱31╱1╱ // 0x131a @0xc
0x130e…1328 at000d = ╱34╱4╱ // 0x131b @0xd
0x130e…1328 at000e = ╱fe0000e004╱ // 0x131c @0xe
0x130e…1328 at0013 = ╱ec╱,╱ // 0x1321 @0x13
0x130e…1328 at0014 = ╱4b╱K╱ // 0x1322 @0x14
0x130e…1328 at0015 = ╱31╱1╱ // 0x1323 @0x15
0x130e…1328 at0016 = ╱30╱0╱ // 0x1324 @0x16
0x130e…1328 at0017 = ╱ef╱$╱ // 0x1325 @0x17
0x130e…1328 at0018 = ╱ee╱)╱ // 0x1326 @0x18
0x130e…1328 at0019 = EOL // 0x1327 @0x19
0x130e…1328 }
0x1328…1389 a0e0 1980 GET K10$,17:T2(E),T2(G),T2(V),T2(4),T2(5),T2(6),T2(7),T2(8),T2(W)
0x1328…1389 LineComalBin {
0x1328…1389 ptr = 0xa0e0 // 0x1328 @0x0
0x1328…1389 lno = 0x07bc // 0x132a @0x2
0x1328…1389 at0004 = ╱a9╱ GET ╱ // 0x132c @0x4
0x1328…1389 at0005 = ╱4b╱K╱ // 0x132d @0x5
0x1328…1389 at0006 = ╱31╱1╱ // 0x132e @0x6
0x1328…1389 at0007 = ╱30╱0╱ // 0x132f @0x7
0x1328…1389 at0008 = ╱ef╱$╱ // 0x1330 @0x8
0x1328…1389 at0009 = ╱ec╱,╱ // 0x1331 @0x9
0x1328…1389 at000a = ╱31╱1╱ // 0x1332 @0xa
0x1328…1389 at000b = ╱37╱7╱ // 0x1333 @0xb
0x1328…1389 at000c = ╱fe00008805╱ // 0x1334 @0xc
0x1328…1389 at0011 = ╱f0╱:╱ // 0x1339 @0x11
0x1328…1389 at0012 = ╱54╱T╱ // 0x133a @0x12
0x1328…1389 at0013 = ╱32╱2╱ // 0x133b @0x13
0x1328…1389 at0014 = ╱ed╱(╱ // 0x133c @0x14
0x1328…1389 at0015 = ╱45╱E╱ // 0x133d @0x15
0x1328…1389 at0016 = ╱ee╱)╱ // 0x133e @0x16
0x1328…1389 at0017 = ╱ec╱,╱ // 0x133f @0x17
0x1328…1389 at0018 = ╱54╱T╱ // 0x1340 @0x18
0x1328…1389 at0019 = ╱32╱2╱ // 0x1341 @0x19
0x1328…1389 at001a = ╱ed╱(╱ // 0x1342 @0x1a
0x1328…1389 at001b = ╱47╱G╱ // 0x1343 @0x1b
0x1328…1389 at001c = ╱ee╱)╱ // 0x1344 @0x1c
0x1328…1389 at001d = ╱ec╱,╱ // 0x1345 @0x1d
0x1328…1389 at001e = ╱54╱T╱ // 0x1346 @0x1e
0x1328…1389 at001f = ╱32╱2╱ // 0x1347 @0x1f
0x1328…1389 at0020 = ╱ed╱(╱ // 0x1348 @0x20
0x1328…1389 at0021 = ╱56╱V╱ // 0x1349 @0x21
0x1328…1389 at0022 = ╱ee╱)╱ // 0x134a @0x22
0x1328…1389 at0023 = ╱ec╱,╱ // 0x134b @0x23
0x1328…1389 at0024 = ╱54╱T╱ // 0x134c @0x24
0x1328…1389 at0025 = ╱32╱2╱ // 0x134d @0x25
0x1328…1389 at0026 = ╱ed╱(╱ // 0x134e @0x26
0x1328…1389 at0027 = ╱34╱4╱ // 0x134f @0x27
0x1328…1389 at0028 = ╱fe00008003╱ // 0x1350 @0x28
0x1328…1389 at002d = ╱ee╱)╱ // 0x1355 @0x2d
0x1328…1389 at002e = ╱ec╱,╱ // 0x1356 @0x2e
0x1328…1389 at002f = ╱54╱T╱ // 0x1357 @0x2f
0x1328…1389 at0030 = ╱32╱2╱ // 0x1358 @0x30
0x1328…1389 at0031 = ╱ed╱(╱ // 0x1359 @0x31
0x1328…1389 at0032 = ╱35╱5╱ // 0x135a @0x32
0x1328…1389 at0033 = ╱fe0000a003╱ // 0x135b @0x33
0x1328…1389 at0038 = ╱ee╱)╱ // 0x1360 @0x38
0x1328…1389 at0039 = ╱ec╱,╱ // 0x1361 @0x39
0x1328…1389 at003a = ╱54╱T╱ // 0x1362 @0x3a
0x1328…1389 at003b = ╱32╱2╱ // 0x1363 @0x3b
0x1328…1389 at003c = ╱ed╱(╱ // 0x1364 @0x3c
0x1328…1389 at003d = ╱36╱6╱ // 0x1365 @0x3d
0x1328…1389 at003e = ╱fe0000c003╱ // 0x1366 @0x3e
0x1328…1389 at0043 = ╱ee╱)╱ // 0x136b @0x43
0x1328…1389 at0044 = ╱ec╱,╱ // 0x136c @0x44
0x1328…1389 at0045 = ╱54╱T╱ // 0x136d @0x45
0x1328…1389 at0046 = ╱32╱2╱ // 0x136e @0x46
0x1328…1389 at0047 = ╱ed╱(╱ // 0x136f @0x47
0x1328…1389 at0048 = ╱37╱7╱ // 0x1370 @0x48
0x1328…1389 at0049 = ╱fe0000e003╱ // 0x1371 @0x49
0x1328…1389 at004e = ╱ee╱)╱ // 0x1376 @0x4e
0x1328…1389 at004f = ╱ec╱,╱ // 0x1377 @0x4f
0x1328…1389 at0050 = ╱54╱T╱ // 0x1378 @0x50
0x1328…1389 at0051 = ╱32╱2╱ // 0x1379 @0x51
0x1328…1389 at0052 = ╱ed╱(╱ // 0x137a @0x52
0x1328…1389 at0053 = ╱38╱8╱ // 0x137b @0x53
0x1328…1389 at0054 = ╱fe00008004╱ // 0x137c @0x54
0x1328…1389 at0059 = ╱ee╱)╱ // 0x1381 @0x59
0x1328…1389 at005a = ╱ec╱,╱ // 0x1382 @0x5a
0x1328…1389 at005b = ╱54╱T╱ // 0x1383 @0x5b
0x1328…1389 at005c = ╱32╱2╱ // 0x1384 @0x5c
0x1328…1389 at005d = ╱ed╱(╱ // 0x1385 @0x5d
0x1328…1389 at005e = ╱57╱W╱ // 0x1386 @0x5e
0x1328…1389 at005f = ╱ee╱)╱ // 0x1387 @0x5f
0x1328…1389 at0060 = EOL // 0x1388 @0x60
0x1328…1389 }
0x1389…13a3 a0fa 1990 EXEC FEJL(W,18,K10$)
0x1389…13a3 LineComalBin {
0x1389…13a3 ptr = 0xa0fa // 0x1389 @0x0
0x1389…13a3 lno = 0x07c6 // 0x138b @0x2
0x1389…13a3 at0004 = ╱9d╱ EXEC ╱ // 0x138d @0x4
0x1389…13a3 at0005 = ╱46╱F╱ // 0x138e @0x5
0x1389…13a3 at0006 = ╱45╱E╱ // 0x138f @0x6
0x1389…13a3 at0007 = ╱4a╱J╱ // 0x1390 @0x7
0x1389…13a3 at0008 = ╱4c╱L╱ // 0x1391 @0x8
0x1389…13a3 at0009 = ╱ed╱(╱ // 0x1392 @0x9
0x1389…13a3 at000a = ╱57╱W╱ // 0x1393 @0xa
0x1389…13a3 at000b = ╱ec╱,╱ // 0x1394 @0xb
0x1389…13a3 at000c = ╱31╱1╱ // 0x1395 @0xc
0x1389…13a3 at000d = ╱38╱8╱ // 0x1396 @0xd
0x1389…13a3 at000e = ╱fe00009005╱ // 0x1397 @0xe
0x1389…13a3 at0013 = ╱ec╱,╱ // 0x139c @0x13
0x1389…13a3 at0014 = ╱4b╱K╱ // 0x139d @0x14
0x1389…13a3 at0015 = ╱31╱1╱ // 0x139e @0x15
0x1389…13a3 at0016 = ╱30╱0╱ // 0x139f @0x16
0x1389…13a3 at0017 = ╱ef╱$╱ // 0x13a0 @0x17
0x1389…13a3 at0018 = ╱ee╱)╱ // 0x13a1 @0x18
0x1389…13a3 at0019 = EOL // 0x13a2 @0x19
0x1389…13a3 }
0x13a3…13af a106 2000 T2(G)=G
0x13a3…13af LineComalBin {
0x13a3…13af ptr = 0xa106 // 0x13a3 @0x0
0x13a3…13af lno = 0x07d0 // 0x13a5 @0x2
0x13a3…13af at0004 = ╱54╱T╱ // 0x13a7 @0x4
0x13a3…13af at0005 = ╱32╱2╱ // 0x13a8 @0x5
0x13a3…13af at0006 = ╱ed╱(╱ // 0x13a9 @0x6
0x13a3…13af at0007 = ╱47╱G╱ // 0x13aa @0x7
0x13a3…13af at0008 = ╱ee╱)╱ // 0x13ab @0x8
0x13a3…13af at0009 = ╱dc╱=╱ // 0x13ac @0x9
0x13a3…13af at000a = ╱47╱G╱ // 0x13ad @0xa
0x13a3…13af at000b = EOL // 0x13ae @0xb
0x13a3…13af }
0x13af…1410 a167 2010 PUT K10$,17:T2(E),T2(G),T2(V),T2(4),T2(5),T2(6),T2(7),T2(8),T2(W)
0x13af…1410 LineComalBin {
0x13af…1410 ptr = 0xa167 // 0x13af @0x0
0x13af…1410 lno = 0x07da // 0x13b1 @0x2
0x13af…1410 at0004 = ╱aa╱ PUT ╱ // 0x13b3 @0x4
0x13af…1410 at0005 = ╱4b╱K╱ // 0x13b4 @0x5
0x13af…1410 at0006 = ╱31╱1╱ // 0x13b5 @0x6
0x13af…1410 at0007 = ╱30╱0╱ // 0x13b6 @0x7
0x13af…1410 at0008 = ╱ef╱$╱ // 0x13b7 @0x8
0x13af…1410 at0009 = ╱ec╱,╱ // 0x13b8 @0x9
0x13af…1410 at000a = ╱31╱1╱ // 0x13b9 @0xa
0x13af…1410 at000b = ╱37╱7╱ // 0x13ba @0xb
0x13af…1410 at000c = ╱fe00008805╱ // 0x13bb @0xc
0x13af…1410 at0011 = ╱f0╱:╱ // 0x13c0 @0x11
0x13af…1410 at0012 = ╱54╱T╱ // 0x13c1 @0x12
0x13af…1410 at0013 = ╱32╱2╱ // 0x13c2 @0x13
0x13af…1410 at0014 = ╱ed╱(╱ // 0x13c3 @0x14
0x13af…1410 at0015 = ╱45╱E╱ // 0x13c4 @0x15
0x13af…1410 at0016 = ╱ee╱)╱ // 0x13c5 @0x16
0x13af…1410 at0017 = ╱ec╱,╱ // 0x13c6 @0x17
0x13af…1410 at0018 = ╱54╱T╱ // 0x13c7 @0x18
0x13af…1410 at0019 = ╱32╱2╱ // 0x13c8 @0x19
0x13af…1410 at001a = ╱ed╱(╱ // 0x13c9 @0x1a
0x13af…1410 at001b = ╱47╱G╱ // 0x13ca @0x1b
0x13af…1410 at001c = ╱ee╱)╱ // 0x13cb @0x1c
0x13af…1410 at001d = ╱ec╱,╱ // 0x13cc @0x1d
0x13af…1410 at001e = ╱54╱T╱ // 0x13cd @0x1e
0x13af…1410 at001f = ╱32╱2╱ // 0x13ce @0x1f
0x13af…1410 at0020 = ╱ed╱(╱ // 0x13cf @0x20
0x13af…1410 at0021 = ╱56╱V╱ // 0x13d0 @0x21
0x13af…1410 at0022 = ╱ee╱)╱ // 0x13d1 @0x22
0x13af…1410 at0023 = ╱ec╱,╱ // 0x13d2 @0x23
0x13af…1410 at0024 = ╱54╱T╱ // 0x13d3 @0x24
0x13af…1410 at0025 = ╱32╱2╱ // 0x13d4 @0x25
0x13af…1410 at0026 = ╱ed╱(╱ // 0x13d5 @0x26
0x13af…1410 at0027 = ╱34╱4╱ // 0x13d6 @0x27
0x13af…1410 at0028 = ╱fe00008003╱ // 0x13d7 @0x28
0x13af…1410 at002d = ╱ee╱)╱ // 0x13dc @0x2d
0x13af…1410 at002e = ╱ec╱,╱ // 0x13dd @0x2e
0x13af…1410 at002f = ╱54╱T╱ // 0x13de @0x2f
0x13af…1410 at0030 = ╱32╱2╱ // 0x13df @0x30
0x13af…1410 at0031 = ╱ed╱(╱ // 0x13e0 @0x31
0x13af…1410 at0032 = ╱35╱5╱ // 0x13e1 @0x32
0x13af…1410 at0033 = ╱fe0000a003╱ // 0x13e2 @0x33
0x13af…1410 at0038 = ╱ee╱)╱ // 0x13e7 @0x38
0x13af…1410 at0039 = ╱ec╱,╱ // 0x13e8 @0x39
0x13af…1410 at003a = ╱54╱T╱ // 0x13e9 @0x3a
0x13af…1410 at003b = ╱32╱2╱ // 0x13ea @0x3b
0x13af…1410 at003c = ╱ed╱(╱ // 0x13eb @0x3c
0x13af…1410 at003d = ╱36╱6╱ // 0x13ec @0x3d
0x13af…1410 at003e = ╱fe0000c003╱ // 0x13ed @0x3e
0x13af…1410 at0043 = ╱ee╱)╱ // 0x13f2 @0x43
0x13af…1410 at0044 = ╱ec╱,╱ // 0x13f3 @0x44
0x13af…1410 at0045 = ╱54╱T╱ // 0x13f4 @0x45
0x13af…1410 at0046 = ╱32╱2╱ // 0x13f5 @0x46
0x13af…1410 at0047 = ╱ed╱(╱ // 0x13f6 @0x47
0x13af…1410 at0048 = ╱37╱7╱ // 0x13f7 @0x48
0x13af…1410 at0049 = ╱fe0000e003╱ // 0x13f8 @0x49
0x13af…1410 at004e = ╱ee╱)╱ // 0x13fd @0x4e
0x13af…1410 at004f = ╱ec╱,╱ // 0x13fe @0x4f
0x13af…1410 at0050 = ╱54╱T╱ // 0x13ff @0x50
0x13af…1410 at0051 = ╱32╱2╱ // 0x1400 @0x51
0x13af…1410 at0052 = ╱ed╱(╱ // 0x1401 @0x52
0x13af…1410 at0053 = ╱38╱8╱ // 0x1402 @0x53
0x13af…1410 at0054 = ╱fe00008004╱ // 0x1403 @0x54
0x13af…1410 at0059 = ╱ee╱)╱ // 0x1408 @0x59
0x13af…1410 at005a = ╱ec╱,╱ // 0x1409 @0x5a
0x13af…1410 at005b = ╱54╱T╱ // 0x140a @0x5b
0x13af…1410 at005c = ╱32╱2╱ // 0x140b @0x5c
0x13af…1410 at005d = ╱ed╱(╱ // 0x140c @0x5d
0x13af…1410 at005e = ╱57╱W╱ // 0x140d @0x5e
0x13af…1410 at005f = ╱ee╱)╱ // 0x140e @0x5f
0x13af…1410 at0060 = EOL // 0x140f @0x60
0x13af…1410 }
0x1410…142a a181 2020 EXEC FEJL(W,19,K10$)
0x1410…142a LineComalBin {
0x1410…142a ptr = 0xa181 // 0x1410 @0x0
0x1410…142a lno = 0x07e4 // 0x1412 @0x2
0x1410…142a at0004 = ╱9d╱ EXEC ╱ // 0x1414 @0x4
0x1410…142a at0005 = ╱46╱F╱ // 0x1415 @0x5
0x1410…142a at0006 = ╱45╱E╱ // 0x1416 @0x6
0x1410…142a at0007 = ╱4a╱J╱ // 0x1417 @0x7
0x1410…142a at0008 = ╱4c╱L╱ // 0x1418 @0x8
0x1410…142a at0009 = ╱ed╱(╱ // 0x1419 @0x9
0x1410…142a at000a = ╱57╱W╱ // 0x141a @0xa
0x1410…142a at000b = ╱ec╱,╱ // 0x141b @0xb
0x1410…142a at000c = ╱31╱1╱ // 0x141c @0xc
0x1410…142a at000d = ╱39╱9╱ // 0x141d @0xd
0x1410…142a at000e = ╱fe00009805╱ // 0x141e @0xe
0x1410…142a at0013 = ╱ec╱,╱ // 0x1423 @0x13
0x1410…142a at0014 = ╱4b╱K╱ // 0x1424 @0x14
0x1410…142a at0015 = ╱31╱1╱ // 0x1425 @0x15
0x1410…142a at0016 = ╱30╱0╱ // 0x1426 @0x16
0x1410…142a at0017 = ╱ef╱$╱ // 0x1427 @0x17
0x1410…142a at0018 = ╱ee╱)╱ // 0x1428 @0x18
0x1410…142a at0019 = EOL // 0x1429 @0x19
0x1410…142a }
0x142a…1440 a197 2021 GET K10$,20:DV$
0x142a…1440 LineComalBin {
0x142a…1440 ptr = 0xa197 // 0x142a @0x0
0x142a…1440 lno = 0x07e5 // 0x142c @0x2
0x142a…1440 at0004 = ╱a9╱ GET ╱ // 0x142e @0x4
0x142a…1440 at0005 = ╱4b╱K╱ // 0x142f @0x5
0x142a…1440 at0006 = ╱31╱1╱ // 0x1430 @0x6
0x142a…1440 at0007 = ╱30╱0╱ // 0x1431 @0x7
0x142a…1440 at0008 = ╱ef╱$╱ // 0x1432 @0x8
0x142a…1440 at0009 = ╱ec╱,╱ // 0x1433 @0x9
0x142a…1440 at000a = ╱32╱2╱ // 0x1434 @0xa
0x142a…1440 at000b = ╱30╱0╱ // 0x1435 @0xb
0x142a…1440 at000c = ╱fe0000a005╱ // 0x1436 @0xc
0x142a…1440 at0011 = ╱f0╱:╱ // 0x143b @0x11
0x142a…1440 at0012 = ╱44╱D╱ // 0x143c @0x12
0x142a…1440 at0013 = ╱56╱V╱ // 0x143d @0x13
0x142a…1440 at0014 = ╱ef╱$╱ // 0x143e @0x14
0x142a…1440 at0015 = EOL // 0x143f @0x15
0x142a…1440 }
0x1440…145a a1b1 2022 EXEC FEJL(W,22,K10$)
0x1440…145a LineComalBin {
0x1440…145a ptr = 0xa1b1 // 0x1440 @0x0
0x1440…145a lno = 0x07e6 // 0x1442 @0x2
0x1440…145a at0004 = ╱9d╱ EXEC ╱ // 0x1444 @0x4
0x1440…145a at0005 = ╱46╱F╱ // 0x1445 @0x5
0x1440…145a at0006 = ╱45╱E╱ // 0x1446 @0x6
0x1440…145a at0007 = ╱4a╱J╱ // 0x1447 @0x7
0x1440…145a at0008 = ╱4c╱L╱ // 0x1448 @0x8
0x1440…145a at0009 = ╱ed╱(╱ // 0x1449 @0x9
0x1440…145a at000a = ╱57╱W╱ // 0x144a @0xa
0x1440…145a at000b = ╱ec╱,╱ // 0x144b @0xb
0x1440…145a at000c = ╱32╱2╱ // 0x144c @0xc
0x1440…145a at000d = ╱32╱2╱ // 0x144d @0xd
0x1440…145a at000e = ╱fe0000b005╱ // 0x144e @0xe
0x1440…145a at0013 = ╱ec╱,╱ // 0x1453 @0x13
0x1440…145a at0014 = ╱4b╱K╱ // 0x1454 @0x14
0x1440…145a at0015 = ╱31╱1╱ // 0x1455 @0x15
0x1440…145a at0016 = ╱30╱0╱ // 0x1456 @0x16
0x1440…145a at0017 = ╱ef╱$╱ // 0x1457 @0x17
0x1440…145a at0018 = ╱ee╱)╱ // 0x1458 @0x18
0x1440…145a at0019 = EOL // 0x1459 @0x19
0x1440…145a }
0x145a…1464 a1bb 2030 CLOSE K10$
0x145a…1464 LineComalBin {
0x145a…1464 ptr = 0xa1bb // 0x145a @0x0
0x145a…1464 lno = 0x07ee // 0x145c @0x2
0x145a…1464 at0004 = ╱a8╱ CLOSE ╱ // 0x145e @0x4
0x145a…1464 at0005 = ╱4b╱K╱ // 0x145f @0x5
0x145a…1464 at0006 = ╱31╱1╱ // 0x1460 @0x6
0x145a…1464 at0007 = ╱30╱0╱ // 0x1461 @0x7
0x145a…1464 at0008 = ╱ef╱$╱ // 0x1462 @0x8
0x145a…1464 at0009 = EOL // 0x1463 @0x9
0x145a…1464 }
0x1464…147e a1d5 2040 EXEC FEJL(W,15,K10$)
0x1464…147e LineComalBin {
0x1464…147e ptr = 0xa1d5 // 0x1464 @0x0
0x1464…147e lno = 0x07f8 // 0x1466 @0x2
0x1464…147e at0004 = ╱9d╱ EXEC ╱ // 0x1468 @0x4
0x1464…147e at0005 = ╱46╱F╱ // 0x1469 @0x5
0x1464…147e at0006 = ╱45╱E╱ // 0x146a @0x6
0x1464…147e at0007 = ╱4a╱J╱ // 0x146b @0x7
0x1464…147e at0008 = ╱4c╱L╱ // 0x146c @0x8
0x1464…147e at0009 = ╱ed╱(╱ // 0x146d @0x9
0x1464…147e at000a = ╱57╱W╱ // 0x146e @0xa
0x1464…147e at000b = ╱ec╱,╱ // 0x146f @0xb
0x1464…147e at000c = ╱31╱1╱ // 0x1470 @0xc
0x1464…147e at000d = ╱35╱5╱ // 0x1471 @0xd
0x1464…147e at000e = ╱fe0000f004╱ // 0x1472 @0xe
0x1464…147e at0013 = ╱ec╱,╱ // 0x1477 @0x13
0x1464…147e at0014 = ╱4b╱K╱ // 0x1478 @0x14
0x1464…147e at0015 = ╱31╱1╱ // 0x1479 @0x15
0x1464…147e at0016 = ╱30╱0╱ // 0x147a @0x16
0x1464…147e at0017 = ╱ef╱$╱ // 0x147b @0x17
0x1464…147e at0018 = ╱ee╱)╱ // 0x147c @0x18
0x1464…147e at0019 = EOL // 0x147d @0x19
0x1464…147e }
0x147e…1489 a1e0 2050 OPEN K2$,R
0x147e…1489 LineComalBin {
0x147e…1489 ptr = 0xa1e0 // 0x147e @0x0
0x147e…1489 lno = 0x0802 // 0x1480 @0x2
0x147e…1489 at0004 = ╱a7╱ OPEN ╱ // 0x1482 @0x4
0x147e…1489 at0005 = ╱4b╱K╱ // 0x1483 @0x5
0x147e…1489 at0006 = ╱32╱2╱ // 0x1484 @0x6
0x147e…1489 at0007 = ╱ef╱$╱ // 0x1485 @0x7
0x147e…1489 at0008 = ╱ec╱,╱ // 0x1486 @0x8
0x147e…1489 at0009 = ╱52╱R╱ // 0x1487 @0x9
0x147e…1489 at000a = EOL // 0x1488 @0xa
0x147e…1489 }
0x1489…14a2 a1f9 2060 EXEC FEJL(W,16,K2$)
0x1489…14a2 LineComalBin {
0x1489…14a2 ptr = 0xa1f9 // 0x1489 @0x0
0x1489…14a2 lno = 0x080c // 0x148b @0x2
0x1489…14a2 at0004 = ╱9d╱ EXEC ╱ // 0x148d @0x4
0x1489…14a2 at0005 = ╱46╱F╱ // 0x148e @0x5
0x1489…14a2 at0006 = ╱45╱E╱ // 0x148f @0x6
0x1489…14a2 at0007 = ╱4a╱J╱ // 0x1490 @0x7
0x1489…14a2 at0008 = ╱4c╱L╱ // 0x1491 @0x8
0x1489…14a2 at0009 = ╱ed╱(╱ // 0x1492 @0x9
0x1489…14a2 at000a = ╱57╱W╱ // 0x1493 @0xa
0x1489…14a2 at000b = ╱ec╱,╱ // 0x1494 @0xb
0x1489…14a2 at000c = ╱31╱1╱ // 0x1495 @0xc
0x1489…14a2 at000d = ╱36╱6╱ // 0x1496 @0xd
0x1489…14a2 at000e = ╱fe00008005╱ // 0x1497 @0xe
0x1489…14a2 at0013 = ╱ec╱,╱ // 0x149c @0x13
0x1489…14a2 at0014 = ╱4b╱K╱ // 0x149d @0x14
0x1489…14a2 at0015 = ╱32╱2╱ // 0x149e @0x15
0x1489…14a2 at0016 = ╱ef╱$╱ // 0x149f @0x16
0x1489…14a2 at0017 = ╱ee╱)╱ // 0x14a0 @0x17
0x1489…14a2 at0018 = EOL // 0x14a1 @0x18
0x1489…14a2 }
0x14a2…14ad a204 2070 OPEN K5$,R
0x14a2…14ad LineComalBin {
0x14a2…14ad ptr = 0xa204 // 0x14a2 @0x0
0x14a2…14ad lno = 0x0816 // 0x14a4 @0x2
0x14a2…14ad at0004 = ╱a7╱ OPEN ╱ // 0x14a6 @0x4
0x14a2…14ad at0005 = ╱4b╱K╱ // 0x14a7 @0x5
0x14a2…14ad at0006 = ╱35╱5╱ // 0x14a8 @0x6
0x14a2…14ad at0007 = ╱ef╱$╱ // 0x14a9 @0x7
0x14a2…14ad at0008 = ╱ec╱,╱ // 0x14aa @0x8
0x14a2…14ad at0009 = ╱52╱R╱ // 0x14ab @0x9
0x14a2…14ad at000a = EOL // 0x14ac @0xa
0x14a2…14ad }
0x14ad…14c6 a21d 2080 EXEC FEJL(W,17,K5$)
0x14ad…14c6 LineComalBin {
0x14ad…14c6 ptr = 0xa21d // 0x14ad @0x0
0x14ad…14c6 lno = 0x0820 // 0x14af @0x2
0x14ad…14c6 at0004 = ╱9d╱ EXEC ╱ // 0x14b1 @0x4
0x14ad…14c6 at0005 = ╱46╱F╱ // 0x14b2 @0x5
0x14ad…14c6 at0006 = ╱45╱E╱ // 0x14b3 @0x6
0x14ad…14c6 at0007 = ╱4a╱J╱ // 0x14b4 @0x7
0x14ad…14c6 at0008 = ╱4c╱L╱ // 0x14b5 @0x8
0x14ad…14c6 at0009 = ╱ed╱(╱ // 0x14b6 @0x9
0x14ad…14c6 at000a = ╱57╱W╱ // 0x14b7 @0xa
0x14ad…14c6 at000b = ╱ec╱,╱ // 0x14b8 @0xb
0x14ad…14c6 at000c = ╱31╱1╱ // 0x14b9 @0xc
0x14ad…14c6 at000d = ╱37╱7╱ // 0x14ba @0xd
0x14ad…14c6 at000e = ╱fe00008805╱ // 0x14bb @0xe
0x14ad…14c6 at0013 = ╱ec╱,╱ // 0x14c0 @0x13
0x14ad…14c6 at0014 = ╱4b╱K╱ // 0x14c1 @0x14
0x14ad…14c6 at0015 = ╱35╱5╱ // 0x14c2 @0x15
0x14ad…14c6 at0016 = ╱ef╱$╱ // 0x14c3 @0x16
0x14ad…14c6 at0017 = ╱ee╱)╱ // 0x14c4 @0x17
0x14ad…14c6 at0018 = EOL // 0x14c5 @0x18
0x14ad…14c6 }
0x14c6…14e4 a23b 2090 EXEC INDTAB(FTAB,MFANTAL,K2$)
0x14c6…14e4 LineComalBin {
0x14c6…14e4 ptr = 0xa23b // 0x14c6 @0x0
0x14c6…14e4 lno = 0x082a // 0x14c8 @0x2
0x14c6…14e4 at0004 = ╱9d╱ EXEC ╱ // 0x14ca @0x4
0x14c6…14e4 at0005 = ╱49╱I╱ // 0x14cb @0x5
0x14c6…14e4 at0006 = ╱4e╱N╱ // 0x14cc @0x6
0x14c6…14e4 at0007 = ╱44╱D╱ // 0x14cd @0x7
0x14c6…14e4 at0008 = ╱54╱T╱ // 0x14ce @0x8
0x14c6…14e4 at0009 = ╱41╱A╱ // 0x14cf @0x9
0x14c6…14e4 at000a = ╱42╱B╱ // 0x14d0 @0xa
0x14c6…14e4 at000b = ╱ed╱(╱ // 0x14d1 @0xb
0x14c6…14e4 at000c = ╱46╱F╱ // 0x14d2 @0xc
0x14c6…14e4 at000d = ╱54╱T╱ // 0x14d3 @0xd
0x14c6…14e4 at000e = ╱41╱A╱ // 0x14d4 @0xe
0x14c6…14e4 at000f = ╱42╱B╱ // 0x14d5 @0xf
0x14c6…14e4 at0010 = ╱ec╱,╱ // 0x14d6 @0x10
0x14c6…14e4 at0011 = ╱4d╱M╱ // 0x14d7 @0x11
0x14c6…14e4 at0012 = ╱46╱F╱ // 0x14d8 @0x12
0x14c6…14e4 at0013 = ╱41╱A╱ // 0x14d9 @0x13
0x14c6…14e4 at0014 = ╱4e╱N╱ // 0x14da @0x14
0x14c6…14e4 at0015 = ╱54╱T╱ // 0x14db @0x15
0x14c6…14e4 at0016 = ╱41╱A╱ // 0x14dc @0x16
0x14c6…14e4 at0017 = ╱4c╱L╱ // 0x14dd @0x17
0x14c6…14e4 at0018 = ╱ec╱,╱ // 0x14de @0x18
0x14c6…14e4 at0019 = ╱4b╱K╱ // 0x14df @0x19
0x14c6…14e4 at001a = ╱32╱2╱ // 0x14e0 @0x1a
0x14c6…14e4 at001b = ╱ef╱$╱ // 0x14e1 @0x1b
0x14c6…14e4 at001c = ╱ee╱)╱ // 0x14e2 @0x1c
0x14c6…14e4 at001d = EOL // 0x14e3 @0x1d
0x14c6…14e4 }
0x14e4…150a a261 2100 BLANK$=" "
0x14e4…150a LineComalBin {
0x14e4…150a ptr = 0xa261 // 0x14e4 @0x0
0x14e4…150a lno = 0x0834 // 0x14e6 @0x2
0x14e4…150a at0004 = ╱42╱B╱ // 0x14e8 @0x4
0x14e4…150a at0005 = ╱4c╱L╱ // 0x14e9 @0x5
0x14e4…150a at0006 = ╱41╱A╱ // 0x14ea @0x6
0x14e4…150a at0007 = ╱4e╱N╱ // 0x14eb @0x7
0x14e4…150a at0008 = ╱4b╱K╱ // 0x14ec @0x8
0x14e4…150a at0009 = ╱ef╱$╱ // 0x14ed @0x9
0x14e4…150a at000a = ╱dc╱=╱ // 0x14ee @0xa
0x14e4…150a at000b = ╱22╱"╱ // 0x14ef @0xb
0x14e4…150a at000c = ╱20╱…╱ // 0x14f0 @0xc
0x14e4…150a at000d = ╱20╱…╱ // 0x14f1 @0xd
0x14e4…150a at000e = ╱20╱…╱ // 0x14f2 @0xe
0x14e4…150a at000f = ╱20╱…╱ // 0x14f3 @0xf
0x14e4…150a at0010 = ╱20╱…╱ // 0x14f4 @0x10
0x14e4…150a at0011 = ╱20╱…╱ // 0x14f5 @0x11
0x14e4…150a at0012 = ╱20╱…╱ // 0x14f6 @0x12
0x14e4…150a at0013 = ╱20╱…╱ // 0x14f7 @0x13
0x14e4…150a at0014 = ╱20╱…╱ // 0x14f8 @0x14
0x14e4…150a at0015 = ╱20╱…╱ // 0x14f9 @0x15
0x14e4…150a at0016 = ╱20╱…╱ // 0x14fa @0x16
0x14e4…150a at0017 = ╱20╱…╱ // 0x14fb @0x17
0x14e4…150a at0018 = ╱20╱…╱ // 0x14fc @0x18
0x14e4…150a at0019 = ╱20╱…╱ // 0x14fd @0x19
0x14e4…150a at001a = ╱20╱…╱ // 0x14fe @0x1a
0x14e4…150a at001b = ╱20╱…╱ // 0x14ff @0x1b
0x14e4…150a at001c = ╱20╱…╱ // 0x1500 @0x1c
0x14e4…150a at001d = ╱20╱…╱ // 0x1501 @0x1d
0x14e4…150a at001e = ╱20╱…╱ // 0x1502 @0x1e
0x14e4…150a at001f = ╱20╱…╱ // 0x1503 @0x1f
0x14e4…150a at0020 = ╱20╱…╱ // 0x1504 @0x20
0x14e4…150a at0021 = ╱20╱…╱ // 0x1505 @0x21
0x14e4…150a at0022 = ╱20╱…╱ // 0x1506 @0x22
0x14e4…150a at0023 = ╱20╱…╱ // 0x1507 @0x23
0x14e4…150a at0024 = ╱22╱"╱ // 0x1508 @0x24
0x14e4…150a at0025 = EOL // 0x1509 @0x25
0x14e4…150a }
0x150a…1551 a2a8 2110 STREG$="------------------------------------";STREG$=STREG$+STREG$
0x150a…1551 LineComalBin {
0x150a…1551 ptr = 0xa2a8 // 0x150a @0x0
0x150a…1551 lno = 0x083e // 0x150c @0x2
0x150a…1551 at0004 = ╱53╱S╱ // 0x150e @0x4
0x150a…1551 at0005 = ╱54╱T╱ // 0x150f @0x5
0x150a…1551 at0006 = ╱52╱R╱ // 0x1510 @0x6
0x150a…1551 at0007 = ╱45╱E╱ // 0x1511 @0x7
0x150a…1551 at0008 = ╱47╱G╱ // 0x1512 @0x8
0x150a…1551 at0009 = ╱ef╱$╱ // 0x1513 @0x9
0x150a…1551 at000a = ╱dc╱=╱ // 0x1514 @0xa
0x150a…1551 at000b = ╱22╱"╱ // 0x1515 @0xb
0x150a…1551 at000c = ╱2d╱-╱ // 0x1516 @0xc
0x150a…1551 at000d = ╱2d╱-╱ // 0x1517 @0xd
0x150a…1551 at000e = ╱2d╱-╱ // 0x1518 @0xe
0x150a…1551 at000f = ╱2d╱-╱ // 0x1519 @0xf
0x150a…1551 at0010 = ╱2d╱-╱ // 0x151a @0x10
0x150a…1551 at0011 = ╱2d╱-╱ // 0x151b @0x11
0x150a…1551 at0012 = ╱2d╱-╱ // 0x151c @0x12
0x150a…1551 at0013 = ╱2d╱-╱ // 0x151d @0x13
0x150a…1551 at0014 = ╱2d╱-╱ // 0x151e @0x14
0x150a…1551 at0015 = ╱2d╱-╱ // 0x151f @0x15
0x150a…1551 at0016 = ╱2d╱-╱ // 0x1520 @0x16
0x150a…1551 at0017 = ╱2d╱-╱ // 0x1521 @0x17
0x150a…1551 at0018 = ╱2d╱-╱ // 0x1522 @0x18
0x150a…1551 at0019 = ╱2d╱-╱ // 0x1523 @0x19
0x150a…1551 at001a = ╱2d╱-╱ // 0x1524 @0x1a
0x150a…1551 at001b = ╱2d╱-╱ // 0x1525 @0x1b
0x150a…1551 at001c = ╱2d╱-╱ // 0x1526 @0x1c
0x150a…1551 at001d = ╱2d╱-╱ // 0x1527 @0x1d
0x150a…1551 at001e = ╱2d╱-╱ // 0x1528 @0x1e
0x150a…1551 at001f = ╱2d╱-╱ // 0x1529 @0x1f
0x150a…1551 at0020 = ╱2d╱-╱ // 0x152a @0x20
0x150a…1551 at0021 = ╱2d╱-╱ // 0x152b @0x21
0x150a…1551 at0022 = ╱2d╱-╱ // 0x152c @0x22
0x150a…1551 at0023 = ╱2d╱-╱ // 0x152d @0x23
0x150a…1551 at0024 = ╱2d╱-╱ // 0x152e @0x24
0x150a…1551 at0025 = ╱2d╱-╱ // 0x152f @0x25
0x150a…1551 at0026 = ╱2d╱-╱ // 0x1530 @0x26
0x150a…1551 at0027 = ╱2d╱-╱ // 0x1531 @0x27
0x150a…1551 at0028 = ╱2d╱-╱ // 0x1532 @0x28
0x150a…1551 at0029 = ╱2d╱-╱ // 0x1533 @0x29
0x150a…1551 at002a = ╱2d╱-╱ // 0x1534 @0x2a
0x150a…1551 at002b = ╱2d╱-╱ // 0x1535 @0x2b
0x150a…1551 at002c = ╱2d╱-╱ // 0x1536 @0x2c
0x150a…1551 at002d = ╱2d╱-╱ // 0x1537 @0x2d
0x150a…1551 at002e = ╱2d╱-╱ // 0x1538 @0x2e
0x150a…1551 at002f = ╱2d╱-╱ // 0x1539 @0x2f
0x150a…1551 at0030 = ╱22╱"╱ // 0x153a @0x30
0x150a…1551 at0031 = ╱eb╱;╱ // 0x153b @0x31
0x150a…1551 at0032 = ╱53╱S╱ // 0x153c @0x32
0x150a…1551 at0033 = ╱54╱T╱ // 0x153d @0x33
0x150a…1551 at0034 = ╱52╱R╱ // 0x153e @0x34
0x150a…1551 at0035 = ╱45╱E╱ // 0x153f @0x35
0x150a…1551 at0036 = ╱47╱G╱ // 0x1540 @0x36
0x150a…1551 at0037 = ╱ef╱$╱ // 0x1541 @0x37
0x150a…1551 at0038 = ╱dc╱=╱ // 0x1542 @0x38
0x150a…1551 at0039 = ╱53╱S╱ // 0x1543 @0x39
0x150a…1551 at003a = ╱54╱T╱ // 0x1544 @0x3a
0x150a…1551 at003b = ╱52╱R╱ // 0x1545 @0x3b
0x150a…1551 at003c = ╱45╱E╱ // 0x1546 @0x3c
0x150a…1551 at003d = ╱47╱G╱ // 0x1547 @0x3d
0x150a…1551 at003e = ╱ef╱$╱ // 0x1548 @0x3e
0x150a…1551 at003f = ╱f1╱+╱ // 0x1549 @0x3f
0x150a…1551 at0040 = ╱53╱S╱ // 0x154a @0x40
0x150a…1551 at0041 = ╱54╱T╱ // 0x154b @0x41
0x150a…1551 at0042 = ╱52╱R╱ // 0x154c @0x42
0x150a…1551 at0043 = ╱45╱E╱ // 0x154d @0x43
0x150a…1551 at0044 = ╱47╱G╱ // 0x154e @0x44
0x150a…1551 at0045 = ╱ef╱$╱ // 0x154f @0x45
0x150a…1551 at0046 = EOL // 0x1550 @0x46
0x150a…1551 }
0x1551…1557 a2ae 2120 REPEAT
0x1551…1557 LineComalBin {
0x1551…1557 ptr = 0xa2ae // 0x1551 @0x0
0x1551…1557 lno = 0x0848 // 0x1553 @0x2
0x1551…1557 at0004 = ╱97╱ REPEAT ╱ // 0x1555 @0x4
0x1551…1557 at0005 = EOL // 0x1556 @0x5
0x1551…1557 }
0x1557…155e a2b5 2130 OUTPUT T
0x1557…155e LineComalBin {
0x1557…155e ptr = 0xa2b5 // 0x1557 @0x0
0x1557…155e lno = 0x0852 // 0x1559 @0x2
0x1557…155e at0004 = ╱a5╱ OUTPUT ╱ // 0x155b @0x4
0x1557…155e at0005 = ╱54╱T╱ // 0x155c @0x5
0x1557…155e at0006 = EOL // 0x155d @0x6
0x1557…155e }
0x155e…1564 a2bb 2140 CLEAR
0x155e…1564 LineComalBin {
0x155e…1564 ptr = 0xa2bb // 0x155e @0x0
0x155e…1564 lno = 0x085c // 0x1560 @0x2
0x155e…1564 at0004 = ╱a0╱ CLEAR ╱ // 0x1562 @0x4
0x155e…1564 at0005 = EOL // 0x1563 @0x5
0x155e…1564 }
0x1564…156a a2c1 2150 REPEAT
0x1564…156a LineComalBin {
0x1564…156a ptr = 0xa2c1 // 0x1564 @0x0
0x1564…156a lno = 0x0866 // 0x1566 @0x2
0x1564…156a at0004 = ╱97╱ REPEAT ╱ // 0x1568 @0x4
0x1564…156a at0005 = EOL // 0x1569 @0x5
0x1564…156a }
0x156a…157f a2d6 2160 CURSOR 15,13
0x156a…157f LineComalBin {
0x156a…157f ptr = 0xa2d6 // 0x156a @0x0
0x156a…157f lno = 0x0870 // 0x156c @0x2
0x156a…157f at0004 = ╱a1╱ CURSOR ╱ // 0x156e @0x4
0x156a…157f at0005 = ╱31╱1╱ // 0x156f @0x5
0x156a…157f at0006 = ╱35╱5╱ // 0x1570 @0x6
0x156a…157f at0007 = ╱fe0000f004╱ // 0x1571 @0x7
0x156a…157f at000c = ╱ec╱,╱ // 0x1576 @0xc
0x156a…157f at000d = ╱31╱1╱ // 0x1577 @0xd
0x156a…157f at000e = ╱33╱3╱ // 0x1578 @0xe
0x156a…157f at000f = ╱fe0000d004╱ // 0x1579 @0xf
0x156a…157f at0014 = EOL // 0x157e @0x14
0x156a…157f }
0x157f…15bd a314 2170 INPUT "Monter papir til udskrift af balance og tast RETURN",A$
0x157f…15bd LineComalBin {
0x157f…15bd ptr = 0xa314 // 0x157f @0x0
0x157f…15bd lno = 0x087a // 0x1581 @0x2
0x157f…15bd at0004 = ╱91╱ INPUT ╱ // 0x1583 @0x4
0x157f…15bd at0005 = ╱22╱"╱ // 0x1584 @0x5
0x157f…15bd at0006 = ╱4d╱M╱ // 0x1585 @0x6
0x157f…15bd at0007 = ╱6f╱o╱ // 0x1586 @0x7
0x157f…15bd at0008 = ╱6e╱n╱ // 0x1587 @0x8
0x157f…15bd at0009 = ╱74╱t╱ // 0x1588 @0x9
0x157f…15bd at000a = ╱65╱e╱ // 0x1589 @0xa
0x157f…15bd at000b = ╱72╱r╱ // 0x158a @0xb
0x157f…15bd at000c = ╱20╱…╱ // 0x158b @0xc
0x157f…15bd at000d = ╱70╱p╱ // 0x158c @0xd
0x157f…15bd at000e = ╱61╱a╱ // 0x158d @0xe
0x157f…15bd at000f = ╱70╱p╱ // 0x158e @0xf
0x157f…15bd at0010 = ╱69╱i╱ // 0x158f @0x10
0x157f…15bd at0011 = ╱72╱r╱ // 0x1590 @0x11
0x157f…15bd at0012 = ╱20╱…╱ // 0x1591 @0x12
0x157f…15bd at0013 = ╱74╱t╱ // 0x1592 @0x13
0x157f…15bd at0014 = ╱69╱i╱ // 0x1593 @0x14
0x157f…15bd at0015 = ╱6c╱l╱ // 0x1594 @0x15
0x157f…15bd at0016 = ╱20╱…╱ // 0x1595 @0x16
0x157f…15bd at0017 = ╱75╱u╱ // 0x1596 @0x17
0x157f…15bd at0018 = ╱64╱d╱ // 0x1597 @0x18
0x157f…15bd at0019 = ╱73╱s╱ // 0x1598 @0x19
0x157f…15bd at001a = ╱6b╱k╱ // 0x1599 @0x1a
0x157f…15bd at001b = ╱72╱r╱ // 0x159a @0x1b
0x157f…15bd at001c = ╱69╱i╱ // 0x159b @0x1c
0x157f…15bd at001d = ╱66╱f╱ // 0x159c @0x1d
0x157f…15bd at001e = ╱74╱t╱ // 0x159d @0x1e
0x157f…15bd at001f = ╱20╱…╱ // 0x159e @0x1f
0x157f…15bd at0020 = ╱61╱a╱ // 0x159f @0x20
0x157f…15bd at0021 = ╱66╱f╱ // 0x15a0 @0x21
0x157f…15bd at0022 = ╱20╱…╱ // 0x15a1 @0x22
0x157f…15bd at0023 = ╱62╱b╱ // 0x15a2 @0x23
0x157f…15bd at0024 = ╱61╱a╱ // 0x15a3 @0x24
0x157f…15bd at0025 = ╱6c╱l╱ // 0x15a4 @0x25
0x157f…15bd at0026 = ╱61╱a╱ // 0x15a5 @0x26
0x157f…15bd at0027 = ╱6e╱n╱ // 0x15a6 @0x27
0x157f…15bd at0028 = ╱63╱c╱ // 0x15a7 @0x28
0x157f…15bd at0029 = ╱65╱e╱ // 0x15a8 @0x29
0x157f…15bd at002a = ╱20╱…╱ // 0x15a9 @0x2a
0x157f…15bd at002b = ╱6f╱o╱ // 0x15aa @0x2b
0x157f…15bd at002c = ╱67╱g╱ // 0x15ab @0x2c
0x157f…15bd at002d = ╱20╱…╱ // 0x15ac @0x2d
0x157f…15bd at002e = ╱74╱t╱ // 0x15ad @0x2e
0x157f…15bd at002f = ╱61╱a╱ // 0x15ae @0x2f
0x157f…15bd at0030 = ╱73╱s╱ // 0x15af @0x30
0x157f…15bd at0031 = ╱74╱t╱ // 0x15b0 @0x31
0x157f…15bd at0032 = ╱20╱…╱ // 0x15b1 @0x32
0x157f…15bd at0033 = ╱52╱R╱ // 0x15b2 @0x33
0x157f…15bd at0034 = ╱45╱E╱ // 0x15b3 @0x34
0x157f…15bd at0035 = ╱54╱T╱ // 0x15b4 @0x35
0x157f…15bd at0036 = ╱55╱U╱ // 0x15b5 @0x36
0x157f…15bd at0037 = ╱52╱R╱ // 0x15b6 @0x37
0x157f…15bd at0038 = ╱4e╱N╱ // 0x15b7 @0x38
0x157f…15bd at0039 = ╱22╱"╱ // 0x15b8 @0x39
0x157f…15bd at003a = ╱ec╱,╱ // 0x15b9 @0x3a
0x157f…15bd at003b = ╱41╱A╱ // 0x15ba @0x3b
0x157f…15bd at003c = ╱ef╱$╱ // 0x15bb @0x3c
0x157f…15bd at003d = EOL // 0x15bc @0x3d
0x157f…15bd }
0x15bd…15d1 a328 2180 UNTIL ORD(A$)=255
0x15bd…15d1 LineComalBin {
0x15bd…15d1 ptr = 0xa328 // 0x15bd @0x0
0x15bd…15d1 lno = 0x0884 // 0x15bf @0x2
0x15bd…15d1 at0004 = ╱98╱ UNTIL ╱ // 0x15c1 @0x4
0x15bd…15d1 at0005 = ╱cd╱ORD╱ // 0x15c2 @0x5
0x15bd…15d1 at0006 = ╱ed╱(╱ // 0x15c3 @0x6
0x15bd…15d1 at0007 = ╱41╱A╱ // 0x15c4 @0x7
0x15bd…15d1 at0008 = ╱ef╱$╱ // 0x15c5 @0x8
0x15bd…15d1 at0009 = ╱ee╱)╱ // 0x15c6 @0x9
0x15bd…15d1 at000a = ╱dc╱=╱ // 0x15c7 @0xa
0x15bd…15d1 at000b = ╱32╱2╱ // 0x15c8 @0xb
0x15bd…15d1 at000c = ╱35╱5╱ // 0x15c9 @0xc
0x15bd…15d1 at000d = ╱35╱5╱ // 0x15ca @0xd
0x15bd…15d1 at000e = ╱fe0000ff08╱ // 0x15cb @0xe
0x15bd…15d1 at0013 = EOL // 0x15d0 @0x13
0x15bd…15d1 }
0x15d1…161a a371 2190 BSIDE=E;GLNAVN$=BLANK$;LINIE=E;SALDO14$="0+";GFNR1=B;GLNAVN1$=BLANK$
0x15d1…161a LineComalBin {
0x15d1…161a ptr = 0xa371 // 0x15d1 @0x0
0x15d1…161a lno = 0x088e // 0x15d3 @0x2
0x15d1…161a at0004 = ╱42╱B╱ // 0x15d5 @0x4
0x15d1…161a at0005 = ╱53╱S╱ // 0x15d6 @0x5
0x15d1…161a at0006 = ╱49╱I╱ // 0x15d7 @0x6
0x15d1…161a at0007 = ╱44╱D╱ // 0x15d8 @0x7
0x15d1…161a at0008 = ╱45╱E╱ // 0x15d9 @0x8
0x15d1…161a at0009 = ╱dc╱=╱ // 0x15da @0x9
0x15d1…161a at000a = ╱45╱E╱ // 0x15db @0xa
0x15d1…161a at000b = ╱eb╱;╱ // 0x15dc @0xb
0x15d1…161a at000c = ╱47╱G╱ // 0x15dd @0xc
0x15d1…161a at000d = ╱4c╱L╱ // 0x15de @0xd
0x15d1…161a at000e = ╱4e╱N╱ // 0x15df @0xe
0x15d1…161a at000f = ╱41╱A╱ // 0x15e0 @0xf
0x15d1…161a at0010 = ╱56╱V╱ // 0x15e1 @0x10
0x15d1…161a at0011 = ╱4e╱N╱ // 0x15e2 @0x11
0x15d1…161a at0012 = ╱ef╱$╱ // 0x15e3 @0x12
0x15d1…161a at0013 = ╱dc╱=╱ // 0x15e4 @0x13
0x15d1…161a at0014 = ╱42╱B╱ // 0x15e5 @0x14
0x15d1…161a at0015 = ╱4c╱L╱ // 0x15e6 @0x15
0x15d1…161a at0016 = ╱41╱A╱ // 0x15e7 @0x16
0x15d1…161a at0017 = ╱4e╱N╱ // 0x15e8 @0x17
0x15d1…161a at0018 = ╱4b╱K╱ // 0x15e9 @0x18
0x15d1…161a at0019 = ╱ef╱$╱ // 0x15ea @0x19
0x15d1…161a at001a = ╱eb╱;╱ // 0x15eb @0x1a
0x15d1…161a at001b = ╱4c╱L╱ // 0x15ec @0x1b
0x15d1…161a at001c = ╱49╱I╱ // 0x15ed @0x1c
0x15d1…161a at001d = ╱4e╱N╱ // 0x15ee @0x1d
0x15d1…161a at001e = ╱49╱I╱ // 0x15ef @0x1e
0x15d1…161a at001f = ╱45╱E╱ // 0x15f0 @0x1f
0x15d1…161a at0020 = ╱dc╱=╱ // 0x15f1 @0x20
0x15d1…161a at0021 = ╱45╱E╱ // 0x15f2 @0x21
0x15d1…161a at0022 = ╱eb╱;╱ // 0x15f3 @0x22
0x15d1…161a at0023 = ╱53╱S╱ // 0x15f4 @0x23
0x15d1…161a at0024 = ╱41╱A╱ // 0x15f5 @0x24
0x15d1…161a at0025 = ╱4c╱L╱ // 0x15f6 @0x25
0x15d1…161a at0026 = ╱44╱D╱ // 0x15f7 @0x26
0x15d1…161a at0027 = ╱4f╱O╱ // 0x15f8 @0x27
0x15d1…161a at0028 = ╱31╱1╱ // 0x15f9 @0x28
0x15d1…161a at0029 = ╱34╱4╱ // 0x15fa @0x29
0x15d1…161a at002a = ╱ef╱$╱ // 0x15fb @0x2a
0x15d1…161a at002b = ╱dc╱=╱ // 0x15fc @0x2b
0x15d1…161a at002c = ╱22╱"╱ // 0x15fd @0x2c
0x15d1…161a at002d = ╱30╱0╱ // 0x15fe @0x2d
0x15d1…161a at002e = ╱2b╱+╱ // 0x15ff @0x2e
0x15d1…161a at002f = ╱22╱"╱ // 0x1600 @0x2f
0x15d1…161a at0030 = ╱eb╱;╱ // 0x1601 @0x30
0x15d1…161a at0031 = ╱47╱G╱ // 0x1602 @0x31
0x15d1…161a at0032 = ╱46╱F╱ // 0x1603 @0x32
0x15d1…161a at0033 = ╱4e╱N╱ // 0x1604 @0x33
0x15d1…161a at0034 = ╱52╱R╱ // 0x1605 @0x34
0x15d1…161a at0035 = ╱31╱1╱ // 0x1606 @0x35
0x15d1…161a at0036 = ╱dc╱=╱ // 0x1607 @0x36
0x15d1…161a at0037 = ╱42╱B╱ // 0x1608 @0x37
0x15d1…161a at0038 = ╱eb╱;╱ // 0x1609 @0x38
0x15d1…161a at0039 = ╱47╱G╱ // 0x160a @0x39
0x15d1…161a at003a = ╱4c╱L╱ // 0x160b @0x3a
0x15d1…161a at003b = ╱4e╱N╱ // 0x160c @0x3b
0x15d1…161a at003c = ╱41╱A╱ // 0x160d @0x3c
0x15d1…161a at003d = ╱56╱V╱ // 0x160e @0x3d
0x15d1…161a at003e = ╱4e╱N╱ // 0x160f @0x3e
0x15d1…161a at003f = ╱31╱1╱ // 0x1610 @0x3f
0x15d1…161a at0040 = ╱ef╱$╱ // 0x1611 @0x40
0x15d1…161a at0041 = ╱dc╱=╱ // 0x1612 @0x41
0x15d1…161a at0042 = ╱42╱B╱ // 0x1613 @0x42
0x15d1…161a at0043 = ╱4c╱L╱ // 0x1614 @0x43
0x15d1…161a at0044 = ╱41╱A╱ // 0x1615 @0x44
0x15d1…161a at0045 = ╱4e╱N╱ // 0x1616 @0x45
0x15d1…161a at0046 = ╱4b╱K╱ // 0x1617 @0x46
0x15d1…161a at0047 = ╱ef╱$╱ // 0x1618 @0x47
0x15d1…161a at0048 = EOL // 0x1619 @0x48
0x15d1…161a }
0x161a…165a a3b1 2200 SALDO11$="0+";SALDO12$="0+";SALDO13$="0+";TAL4$="0+";GFNR=B
0x161a…165a LineComalBin {
0x161a…165a ptr = 0xa3b1 // 0x161a @0x0
0x161a…165a lno = 0x0898 // 0x161c @0x2
0x161a…165a at0004 = ╱53╱S╱ // 0x161e @0x4
0x161a…165a at0005 = ╱41╱A╱ // 0x161f @0x5
0x161a…165a at0006 = ╱4c╱L╱ // 0x1620 @0x6
0x161a…165a at0007 = ╱44╱D╱ // 0x1621 @0x7
0x161a…165a at0008 = ╱4f╱O╱ // 0x1622 @0x8
0x161a…165a at0009 = ╱31╱1╱ // 0x1623 @0x9
0x161a…165a at000a = ╱31╱1╱ // 0x1624 @0xa
0x161a…165a at000b = ╱ef╱$╱ // 0x1625 @0xb
0x161a…165a at000c = ╱dc╱=╱ // 0x1626 @0xc
0x161a…165a at000d = ╱22╱"╱ // 0x1627 @0xd
0x161a…165a at000e = ╱30╱0╱ // 0x1628 @0xe
0x161a…165a at000f = ╱2b╱+╱ // 0x1629 @0xf
0x161a…165a at0010 = ╱22╱"╱ // 0x162a @0x10
0x161a…165a at0011 = ╱eb╱;╱ // 0x162b @0x11
0x161a…165a at0012 = ╱53╱S╱ // 0x162c @0x12
0x161a…165a at0013 = ╱41╱A╱ // 0x162d @0x13
0x161a…165a at0014 = ╱4c╱L╱ // 0x162e @0x14
0x161a…165a at0015 = ╱44╱D╱ // 0x162f @0x15
0x161a…165a at0016 = ╱4f╱O╱ // 0x1630 @0x16
0x161a…165a at0017 = ╱31╱1╱ // 0x1631 @0x17
0x161a…165a at0018 = ╱32╱2╱ // 0x1632 @0x18
0x161a…165a at0019 = ╱ef╱$╱ // 0x1633 @0x19
0x161a…165a at001a = ╱dc╱=╱ // 0x1634 @0x1a
0x161a…165a at001b = ╱22╱"╱ // 0x1635 @0x1b
0x161a…165a at001c = ╱30╱0╱ // 0x1636 @0x1c
0x161a…165a at001d = ╱2b╱+╱ // 0x1637 @0x1d
0x161a…165a at001e = ╱22╱"╱ // 0x1638 @0x1e
0x161a…165a at001f = ╱eb╱;╱ // 0x1639 @0x1f
0x161a…165a at0020 = ╱53╱S╱ // 0x163a @0x20
0x161a…165a at0021 = ╱41╱A╱ // 0x163b @0x21
0x161a…165a at0022 = ╱4c╱L╱ // 0x163c @0x22
0x161a…165a at0023 = ╱44╱D╱ // 0x163d @0x23
0x161a…165a at0024 = ╱4f╱O╱ // 0x163e @0x24
0x161a…165a at0025 = ╱31╱1╱ // 0x163f @0x25
0x161a…165a at0026 = ╱33╱3╱ // 0x1640 @0x26
0x161a…165a at0027 = ╱ef╱$╱ // 0x1641 @0x27
0x161a…165a at0028 = ╱dc╱=╱ // 0x1642 @0x28
0x161a…165a at0029 = ╱22╱"╱ // 0x1643 @0x29
0x161a…165a at002a = ╱30╱0╱ // 0x1644 @0x2a
0x161a…165a at002b = ╱2b╱+╱ // 0x1645 @0x2b
0x161a…165a at002c = ╱22╱"╱ // 0x1646 @0x2c
0x161a…165a at002d = ╱eb╱;╱ // 0x1647 @0x2d
0x161a…165a at002e = ╱54╱T╱ // 0x1648 @0x2e
0x161a…165a at002f = ╱41╱A╱ // 0x1649 @0x2f
0x161a…165a at0030 = ╱4c╱L╱ // 0x164a @0x30
0x161a…165a at0031 = ╱34╱4╱ // 0x164b @0x31
0x161a…165a at0032 = ╱ef╱$╱ // 0x164c @0x32
0x161a…165a at0033 = ╱dc╱=╱ // 0x164d @0x33
0x161a…165a at0034 = ╱22╱"╱ // 0x164e @0x34
0x161a…165a at0035 = ╱30╱0╱ // 0x164f @0x35
0x161a…165a at0036 = ╱2b╱+╱ // 0x1650 @0x36
0x161a…165a at0037 = ╱22╱"╱ // 0x1651 @0x37
0x161a…165a at0038 = ╱eb╱;╱ // 0x1652 @0x38
0x161a…165a at0039 = ╱47╱G╱ // 0x1653 @0x39
0x161a…165a at003a = ╱46╱F╱ // 0x1654 @0x3a
0x161a…165a at003b = ╱4e╱N╱ // 0x1655 @0x3b
0x161a…165a at003c = ╱52╱R╱ // 0x1656 @0x3c
0x161a…165a at003d = ╱dc╱=╱ // 0x1657 @0x3d
0x161a…165a at003e = ╱42╱B╱ // 0x1658 @0x3e
0x161a…165a at003f = EOL // 0x1659 @0x3f
0x161a…165a }
0x165a…1661 a3b8 2210 OUTPUT P
0x165a…1661 LineComalBin {
0x165a…1661 ptr = 0xa3b8 // 0x165a @0x0
0x165a…1661 lno = 0x08a2 // 0x165c @0x2
0x165a…1661 at0004 = ╱a5╱ OUTPUT ╱ // 0x165e @0x4
0x165a…1661 at0005 = ╱50╱P╱ // 0x165f @0x5
0x165a…1661 at0006 = EOL // 0x1660 @0x6
0x165a…1661 }
0x1661…1680 a3d7 2220 EXEC HOVEDUD(T1(7),BSIDE)
0x1661…1680 LineComalBin {
0x1661…1680 ptr = 0xa3d7 // 0x1661 @0x0
0x1661…1680 lno = 0x08ac // 0x1663 @0x2
0x1661…1680 at0004 = ╱9d╱ EXEC ╱ // 0x1665 @0x4
0x1661…1680 at0005 = ╱48╱H╱ // 0x1666 @0x5
0x1661…1680 at0006 = ╱4f╱O╱ // 0x1667 @0x6
0x1661…1680 at0007 = ╱56╱V╱ // 0x1668 @0x7
0x1661…1680 at0008 = ╱45╱E╱ // 0x1669 @0x8
0x1661…1680 at0009 = ╱44╱D╱ // 0x166a @0x9
0x1661…1680 at000a = ╱55╱U╱ // 0x166b @0xa
0x1661…1680 at000b = ╱44╱D╱ // 0x166c @0xb
0x1661…1680 at000c = ╱ed╱(╱ // 0x166d @0xc
0x1661…1680 at000d = ╱54╱T╱ // 0x166e @0xd
0x1661…1680 at000e = ╱31╱1╱ // 0x166f @0xe
0x1661…1680 at000f = ╱ed╱(╱ // 0x1670 @0xf
0x1661…1680 at0010 = ╱37╱7╱ // 0x1671 @0x10
0x1661…1680 at0011 = ╱fe0000e003╱ // 0x1672 @0x11
0x1661…1680 at0016 = ╱ee╱)╱ // 0x1677 @0x16
0x1661…1680 at0017 = ╱ec╱,╱ // 0x1678 @0x17
0x1661…1680 at0018 = ╱42╱B╱ // 0x1679 @0x18
0x1661…1680 at0019 = ╱53╱S╱ // 0x167a @0x19
0x1661…1680 at001a = ╱49╱I╱ // 0x167b @0x1a
0x1661…1680 at001b = ╱44╱D╱ // 0x167c @0x1b
0x1661…1680 at001c = ╱45╱E╱ // 0x167d @0x1c
0x1661…1680 at001d = ╱ee╱)╱ // 0x167e @0x1d
0x1661…1680 at001e = EOL // 0x167f @0x1e
0x1661…1680 }
0x1680…1692 a3e9 2230 FOR FPIL3=E TO AFIN
0x1680…1692 LineComalBin {
0x1680…1692 ptr = 0xa3e9 // 0x1680 @0x0
0x1680…1692 lno = 0x08b6 // 0x1682 @0x2
0x1680…1692 at0004 = ╱83╱ FOR ╱ // 0x1684 @0x4
0x1680…1692 at0005 = ╱46╱F╱ // 0x1685 @0x5
0x1680…1692 at0006 = ╱50╱P╱ // 0x1686 @0x6
0x1680…1692 at0007 = ╱49╱I╱ // 0x1687 @0x7
0x1680…1692 at0008 = ╱4c╱L╱ // 0x1688 @0x8
0x1680…1692 at0009 = ╱33╱3╱ // 0x1689 @0x9
0x1680…1692 at000a = ╱dc╱=╱ // 0x168a @0xa
0x1680…1692 at000b = ╱45╱E╱ // 0x168b @0xb
0x1680…1692 at000c = ╱b7╱ TO ╱ // 0x168c @0xc
0x1680…1692 at000d = ╱41╱A╱ // 0x168d @0xd
0x1680…1692 at000e = ╱46╱F╱ // 0x168e @0xe
0x1680…1692 at000f = ╱49╱I╱ // 0x168f @0xf
0x1680…1692 at0010 = ╱4e╱N╱ // 0x1690 @0x10
0x1680…1692 at0011 = EOL // 0x1691 @0x11
0x1680…1692 }
0x1692…16b3 a40a 2240 IF FTAB(FPIL3,E)=100000 THEN EXIT
0x1692…16b3 LineComalBin {
0x1692…16b3 ptr = 0xa40a // 0x1692 @0x0
0x1692…16b3 lno = 0x08c0 // 0x1694 @0x2
0x1692…16b3 at0004 = ╱82╱ IF ╱ // 0x1696 @0x4
0x1692…16b3 at0005 = ╱46╱F╱ // 0x1697 @0x5
0x1692…16b3 at0006 = ╱54╱T╱ // 0x1698 @0x6
0x1692…16b3 at0007 = ╱41╱A╱ // 0x1699 @0x7
0x1692…16b3 at0008 = ╱42╱B╱ // 0x169a @0x8
0x1692…16b3 at0009 = ╱ed╱(╱ // 0x169b @0x9
0x1692…16b3 at000a = ╱46╱F╱ // 0x169c @0xa
0x1692…16b3 at000b = ╱50╱P╱ // 0x169d @0xb
0x1692…16b3 at000c = ╱49╱I╱ // 0x169e @0xc
0x1692…16b3 at000d = ╱4c╱L╱ // 0x169f @0xd
0x1692…16b3 at000e = ╱33╱3╱ // 0x16a0 @0xe
0x1692…16b3 at000f = ╱ec╱,╱ // 0x16a1 @0xf
0x1692…16b3 at0010 = ╱45╱E╱ // 0x16a2 @0x10
0x1692…16b3 at0011 = ╱ee╱)╱ // 0x16a3 @0x11
0x1692…16b3 at0012 = ╱dc╱=╱ // 0x16a4 @0x12
0x1692…16b3 at0013 = ╱31╱1╱ // 0x16a5 @0x13
0x1692…16b3 at0014 = ╱30╱0╱ // 0x16a6 @0x14
0x1692…16b3 at0015 = ╱30╱0╱ // 0x16a7 @0x15
0x1692…16b3 at0016 = ╱30╱0╱ // 0x16a8 @0x16
0x1692…16b3 at0017 = ╱30╱0╱ // 0x16a9 @0x17
0x1692…16b3 at0018 = ╱30╱0╱ // 0x16aa @0x18
0x1692…16b3 at0019 = ╱fe0050c311╱ // 0x16ab @0x19
0x1692…16b3 at001e = ╱b6╱ THEN ╱ // 0x16b0 @0x1e
0x1692…16b3 at001f = ╱99╱ EXIT ╱ // 0x16b1 @0x1f
0x1692…16b3 at0020 = EOL // 0x16b2 @0x20
0x1692…16b3 }
0x16b3…16c1 a418 2250 EXEC HENTPOST
0x16b3…16c1 LineComalBin {
0x16b3…16c1 ptr = 0xa418 // 0x16b3 @0x0
0x16b3…16c1 lno = 0x08ca // 0x16b5 @0x2
0x16b3…16c1 at0004 = ╱9d╱ EXEC ╱ // 0x16b7 @0x4
0x16b3…16c1 at0005 = ╱48╱H╱ // 0x16b8 @0x5
0x16b3…16c1 at0006 = ╱45╱E╱ // 0x16b9 @0x6
0x16b3…16c1 at0007 = ╱4e╱N╱ // 0x16ba @0x7
0x16b3…16c1 at0008 = ╱54╱T╱ // 0x16bb @0x8
0x16b3…16c1 at0009 = ╱50╱P╱ // 0x16bc @0x9
0x16b3…16c1 at000a = ╱4f╱O╱ // 0x16bd @0xa
0x16b3…16c1 at000b = ╱53╱S╱ // 0x16be @0xb
0x16b3…16c1 at000c = ╱54╱T╱ // 0x16bf @0xc
0x16b3…16c1 at000d = EOL // 0x16c0 @0xd
0x16b3…16c1 }
0x16c1…16e1 a438 2260 FGRUP=INT(ORD(FUKODE$)-48)
0x16c1…16e1 LineComalBin {
0x16c1…16e1 ptr = 0xa438 // 0x16c1 @0x0
0x16c1…16e1 lno = 0x08d4 // 0x16c3 @0x2
0x16c1…16e1 at0004 = ╱46╱F╱ // 0x16c5 @0x4
0x16c1…16e1 at0005 = ╱47╱G╱ // 0x16c6 @0x5
0x16c1…16e1 at0006 = ╱52╱R╱ // 0x16c7 @0x6
0x16c1…16e1 at0007 = ╱55╱U╱ // 0x16c8 @0x7
0x16c1…16e1 at0008 = ╱50╱P╱ // 0x16c9 @0x8
0x16c1…16e1 at0009 = ╱dc╱=╱ // 0x16ca @0x9
0x16c1…16e1 at000a = ╱c6╱INT╱ // 0x16cb @0xa
0x16c1…16e1 at000b = ╱ed╱(╱ // 0x16cc @0xb
0x16c1…16e1 at000c = ╱cd╱ORD╱ // 0x16cd @0xc
0x16c1…16e1 at000d = ╱ed╱(╱ // 0x16ce @0xd
0x16c1…16e1 at000e = ╱46╱F╱ // 0x16cf @0xe
0x16c1…16e1 at000f = ╱55╱U╱ // 0x16d0 @0xf
0x16c1…16e1 at0010 = ╱4b╱K╱ // 0x16d1 @0x10
0x16c1…16e1 at0011 = ╱4f╱O╱ // 0x16d2 @0x11
0x16c1…16e1 at0012 = ╱44╱D╱ // 0x16d3 @0x12
0x16c1…16e1 at0013 = ╱45╱E╱ // 0x16d4 @0x13
0x16c1…16e1 at0014 = ╱ef╱$╱ // 0x16d5 @0x14
0x16c1…16e1 at0015 = ╱ee╱)╱ // 0x16d6 @0x15
0x16c1…16e1 at0016 = ╱e3╱-╱ // 0x16d7 @0x16
0x16c1…16e1 at0017 = ╱34╱4╱ // 0x16d8 @0x17
0x16c1…16e1 at0018 = ╱38╱8╱ // 0x16d9 @0x18
0x16c1…16e1 at0019 = ╱fe0000c006╱ // 0x16da @0x19
0x16c1…16e1 at001e = ╱ee╱)╱ // 0x16df @0x1e
0x16c1…16e1 at001f = EOL // 0x16e0 @0x1f
0x16c1…16e1 }
0x16e1…1707 a45e 2270 EXEC CALC(B,FÅDEBET$,FÅKREDIT$,FÅDK$)
0x16e1…1707 LineComalBin {
0x16e1…1707 ptr = 0xa45e // 0x16e1 @0x0
0x16e1…1707 lno = 0x08de // 0x16e3 @0x2
0x16e1…1707 at0004 = ╱9d╱ EXEC ╱ // 0x16e5 @0x4
0x16e1…1707 at0005 = ╱43╱C╱ // 0x16e6 @0x5
0x16e1…1707 at0006 = ╱41╱A╱ // 0x16e7 @0x6
0x16e1…1707 at0007 = ╱4c╱L╱ // 0x16e8 @0x7
0x16e1…1707 at0008 = ╱43╱C╱ // 0x16e9 @0x8
0x16e1…1707 at0009 = ╱ed╱(╱ // 0x16ea @0x9
0x16e1…1707 at000a = ╱42╱B╱ // 0x16eb @0xa
0x16e1…1707 at000b = ╱ec╱,╱ // 0x16ec @0xb
0x16e1…1707 at000c = ╱46╱F╱ // 0x16ed @0xc
0x16e1…1707 at000d = ╱5d╱Å╱ // 0x16ee @0xd
0x16e1…1707 at000e = ╱44╱D╱ // 0x16ef @0xe
0x16e1…1707 at000f = ╱45╱E╱ // 0x16f0 @0xf
0x16e1…1707 at0010 = ╱42╱B╱ // 0x16f1 @0x10
0x16e1…1707 at0011 = ╱45╱E╱ // 0x16f2 @0x11
0x16e1…1707 at0012 = ╱54╱T╱ // 0x16f3 @0x12
0x16e1…1707 at0013 = ╱ef╱$╱ // 0x16f4 @0x13
0x16e1…1707 at0014 = ╱ec╱,╱ // 0x16f5 @0x14
0x16e1…1707 at0015 = ╱46╱F╱ // 0x16f6 @0x15
0x16e1…1707 at0016 = ╱5d╱Å╱ // 0x16f7 @0x16
0x16e1…1707 at0017 = ╱4b╱K╱ // 0x16f8 @0x17
0x16e1…1707 at0018 = ╱52╱R╱ // 0x16f9 @0x18
0x16e1…1707 at0019 = ╱45╱E╱ // 0x16fa @0x19
0x16e1…1707 at001a = ╱44╱D╱ // 0x16fb @0x1a
0x16e1…1707 at001b = ╱49╱I╱ // 0x16fc @0x1b
0x16e1…1707 at001c = ╱54╱T╱ // 0x16fd @0x1c
0x16e1…1707 at001d = ╱ef╱$╱ // 0x16fe @0x1d
0x16e1…1707 at001e = ╱ec╱,╱ // 0x16ff @0x1e
0x16e1…1707 at001f = ╱46╱F╱ // 0x1700 @0x1f
0x16e1…1707 at0020 = ╱5d╱Å╱ // 0x1701 @0x20
0x16e1…1707 at0021 = ╱44╱D╱ // 0x1702 @0x21
0x16e1…1707 at0022 = ╱4b╱K╱ // 0x1703 @0x22
0x16e1…1707 at0023 = ╱ef╱$╱ // 0x1704 @0x23
0x16e1…1707 at0024 = ╱ee╱)╱ // 0x1705 @0x24
0x16e1…1707 at0025 = EOL // 0x1706 @0x25
0x16e1…1707 }
0x1707…1714 a46b 2280 CASE FGRUP OF
0x1707…1714 LineComalBin {
0x1707…1714 ptr = 0xa46b // 0x1707 @0x0
0x1707…1714 lno = 0x08e8 // 0x1709 @0x2
0x1707…1714 at0004 = ╱a201╱ CASE ╱ // 0x170b @0x4
0x1707…1714 at0006 = ╱46╱F╱ // 0x170d @0x6
0x1707…1714 at0007 = ╱47╱G╱ // 0x170e @0x7
0x1707…1714 at0008 = ╱52╱R╱ // 0x170f @0x8
0x1707…1714 at0009 = ╱55╱U╱ // 0x1710 @0x9
0x1707…1714 at000a = ╱50╱P╱ // 0x1711 @0xa
0x1707…1714 at000b = ╱ba╱ OF ╱ // 0x1712 @0xb
0x1707…1714 at000c = EOL // 0x1713 @0xc
0x1707…1714 }
0x1714…171a a471 2290 STOP
0x1714…171a LineComalBin {
0x1714…171a ptr = 0xa471 // 0x1714 @0x0
0x1714…171a lno = 0x08f2 // 0x1716 @0x2
0x1714…171a at0004 = ╱8d╱ STOP ╱ // 0x1718 @0x4
0x1714…171a at0005 = EOL // 0x1719 @0x5
0x1714…171a }
0x171a…1722 a479 2300 WHEN B
0x171a…1722 LineComalBin {
0x171a…1722 ptr = 0xa479 // 0x171a @0x0
0x171a…1722 lno = 0x08fc // 0x171c @0x2
0x171a…1722 at0004 = ╱a301╱ WHEN ╱ // 0x171e @0x4
0x171a…1722 at0006 = ╱42╱B╱ // 0x1720 @0x6
0x171a…1722 at0007 = EOL // 0x1721 @0x7
0x171a…1722 }
0x1722…174b a4a2 2310 IF LINIE>39 THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x1722…174b LineComalBin {
0x1722…174b ptr = 0xa4a2 // 0x1722 @0x0
0x1722…174b lno = 0x0906 // 0x1724 @0x2
0x1722…174b at0004 = ╱82╱ IF ╱ // 0x1726 @0x4
0x1722…174b at0005 = ╱4c╱L╱ // 0x1727 @0x5
0x1722…174b at0006 = ╱49╱I╱ // 0x1728 @0x6
0x1722…174b at0007 = ╱4e╱N╱ // 0x1729 @0x7
0x1722…174b at0008 = ╱49╱I╱ // 0x172a @0x8
0x1722…174b at0009 = ╱45╱E╱ // 0x172b @0x9
0x1722…174b at000a = ╱de╱>╱ // 0x172c @0xa
0x1722…174b at000b = ╱33╱3╱ // 0x172d @0xb
0x1722…174b at000c = ╱39╱9╱ // 0x172e @0xc
0x1722…174b at000d = ╱fe00009c06╱ // 0x172f @0xd
0x1722…174b at0012 = ╱b6╱ THEN ╱ // 0x1734 @0x12
0x1722…174b at0013 = ╱9d╱ EXEC ╱ // 0x1735 @0x13
0x1722…174b at0014 = ╱4e╱N╱ // 0x1736 @0x14
0x1722…174b at0015 = ╱59╱Y╱ // 0x1737 @0x15
0x1722…174b at0016 = ╱53╱S╱ // 0x1738 @0x16
0x1722…174b at0017 = ╱49╱I╱ // 0x1739 @0x17
0x1722…174b at0018 = ╱44╱D╱ // 0x173a @0x18
0x1722…174b at0019 = ╱45╱E╱ // 0x173b @0x19
0x1722…174b at001a = ╱ed╱(╱ // 0x173c @0x1a
0x1722…174b at001b = ╱47╱G╱ // 0x173d @0x1b
0x1722…174b at001c = ╱46╱F╱ // 0x173e @0x1c
0x1722…174b at001d = ╱4e╱N╱ // 0x173f @0x1d
0x1722…174b at001e = ╱52╱R╱ // 0x1740 @0x1e
0x1722…174b at001f = ╱ec╱,╱ // 0x1741 @0x1f
0x1722…174b at0020 = ╱47╱G╱ // 0x1742 @0x20
0x1722…174b at0021 = ╱4c╱L╱ // 0x1743 @0x21
0x1722…174b at0022 = ╱4e╱N╱ // 0x1744 @0x22
0x1722…174b at0023 = ╱41╱A╱ // 0x1745 @0x23
0x1722…174b at0024 = ╱56╱V╱ // 0x1746 @0x24
0x1722…174b at0025 = ╱4e╱N╱ // 0x1747 @0x25
0x1722…174b at0026 = ╱ef╱$╱ // 0x1748 @0x26
0x1722…174b at0027 = ╱ee╱)╱ // 0x1749 @0x27
0x1722…174b at0028 = EOL // 0x174a @0x28
0x1722…174b }
0x174b…176a a4c1 2320 EXEC LINIEUD(FNR,FNAVN$,FÅDK$)
0x174b…176a LineComalBin {
0x174b…176a ptr = 0xa4c1 // 0x174b @0x0
0x174b…176a lno = 0x0910 // 0x174d @0x2
0x174b…176a at0004 = ╱9d╱ EXEC ╱ // 0x174f @0x4
0x174b…176a at0005 = ╱4c╱L╱ // 0x1750 @0x5
0x174b…176a at0006 = ╱49╱I╱ // 0x1751 @0x6
0x174b…176a at0007 = ╱4e╱N╱ // 0x1752 @0x7
0x174b…176a at0008 = ╱49╱I╱ // 0x1753 @0x8
0x174b…176a at0009 = ╱45╱E╱ // 0x1754 @0x9
0x174b…176a at000a = ╱55╱U╱ // 0x1755 @0xa
0x174b…176a at000b = ╱44╱D╱ // 0x1756 @0xb
0x174b…176a at000c = ╱ed╱(╱ // 0x1757 @0xc
0x174b…176a at000d = ╱46╱F╱ // 0x1758 @0xd
0x174b…176a at000e = ╱4e╱N╱ // 0x1759 @0xe
0x174b…176a at000f = ╱52╱R╱ // 0x175a @0xf
0x174b…176a at0010 = ╱ec╱,╱ // 0x175b @0x10
0x174b…176a at0011 = ╱46╱F╱ // 0x175c @0x11
0x174b…176a at0012 = ╱4e╱N╱ // 0x175d @0x12
0x174b…176a at0013 = ╱41╱A╱ // 0x175e @0x13
0x174b…176a at0014 = ╱56╱V╱ // 0x175f @0x14
0x174b…176a at0015 = ╱4e╱N╱ // 0x1760 @0x15
0x174b…176a at0016 = ╱ef╱$╱ // 0x1761 @0x16
0x174b…176a at0017 = ╱ec╱,╱ // 0x1762 @0x17
0x174b…176a at0018 = ╱46╱F╱ // 0x1763 @0x18
0x174b…176a at0019 = ╱5d╱Å╱ // 0x1764 @0x19
0x174b…176a at001a = ╱44╱D╱ // 0x1765 @0x1a
0x174b…176a at001b = ╱4b╱K╱ // 0x1766 @0x1b
0x174b…176a at001c = ╱ef╱$╱ // 0x1767 @0x1c
0x174b…176a at001d = ╱ee╱)╱ // 0x1768 @0x1d
0x174b…176a at001e = EOL // 0x1769 @0x1e
0x174b…176a }
0x176a…177c a4d3 2330 LINIE=LINIE+E
0x176a…177c LineComalBin {
0x176a…177c ptr = 0xa4d3 // 0x176a @0x0
0x176a…177c lno = 0x091a // 0x176c @0x2
0x176a…177c at0004 = ╱4c╱L╱ // 0x176e @0x4
0x176a…177c at0005 = ╱49╱I╱ // 0x176f @0x5
0x176a…177c at0006 = ╱4e╱N╱ // 0x1770 @0x6
0x176a…177c at0007 = ╱49╱I╱ // 0x1771 @0x7
0x176a…177c at0008 = ╱45╱E╱ // 0x1772 @0x8
0x176a…177c at0009 = ╱dc╱=╱ // 0x1773 @0x9
0x176a…177c at000a = ╱4c╱L╱ // 0x1774 @0xa
0x176a…177c at000b = ╱49╱I╱ // 0x1775 @0xb
0x176a…177c at000c = ╱4e╱N╱ // 0x1776 @0xc
0x176a…177c at000d = ╱49╱I╱ // 0x1777 @0xd
0x176a…177c at000e = ╱45╱E╱ // 0x1778 @0xe
0x176a…177c at000f = ╱e2╱+╱ // 0x1779 @0xf
0x176a…177c at0010 = ╱45╱E╱ // 0x177a @0x10
0x176a…177c at0011 = EOL // 0x177b @0x11
0x176a…177c }
0x177c…17a1 a4f8 2340 EXEC CALC(B,SALDO11$,FÅDK$,SALDO11$)
0x177c…17a1 LineComalBin {
0x177c…17a1 ptr = 0xa4f8 // 0x177c @0x0
0x177c…17a1 lno = 0x0924 // 0x177e @0x2
0x177c…17a1 at0004 = ╱9d╱ EXEC ╱ // 0x1780 @0x4
0x177c…17a1 at0005 = ╱43╱C╱ // 0x1781 @0x5
0x177c…17a1 at0006 = ╱41╱A╱ // 0x1782 @0x6
0x177c…17a1 at0007 = ╱4c╱L╱ // 0x1783 @0x7
0x177c…17a1 at0008 = ╱43╱C╱ // 0x1784 @0x8
0x177c…17a1 at0009 = ╱ed╱(╱ // 0x1785 @0x9
0x177c…17a1 at000a = ╱42╱B╱ // 0x1786 @0xa
0x177c…17a1 at000b = ╱ec╱,╱ // 0x1787 @0xb
0x177c…17a1 at000c = ╱53╱S╱ // 0x1788 @0xc
0x177c…17a1 at000d = ╱41╱A╱ // 0x1789 @0xd
0x177c…17a1 at000e = ╱4c╱L╱ // 0x178a @0xe
0x177c…17a1 at000f = ╱44╱D╱ // 0x178b @0xf
0x177c…17a1 at0010 = ╱4f╱O╱ // 0x178c @0x10
0x177c…17a1 at0011 = ╱31╱1╱ // 0x178d @0x11
0x177c…17a1 at0012 = ╱31╱1╱ // 0x178e @0x12
0x177c…17a1 at0013 = ╱ef╱$╱ // 0x178f @0x13
0x177c…17a1 at0014 = ╱ec╱,╱ // 0x1790 @0x14
0x177c…17a1 at0015 = ╱46╱F╱ // 0x1791 @0x15
0x177c…17a1 at0016 = ╱5d╱Å╱ // 0x1792 @0x16
0x177c…17a1 at0017 = ╱44╱D╱ // 0x1793 @0x17
0x177c…17a1 at0018 = ╱4b╱K╱ // 0x1794 @0x18
0x177c…17a1 at0019 = ╱ef╱$╱ // 0x1795 @0x19
0x177c…17a1 at001a = ╱ec╱,╱ // 0x1796 @0x1a
0x177c…17a1 at001b = ╱53╱S╱ // 0x1797 @0x1b
0x177c…17a1 at001c = ╱41╱A╱ // 0x1798 @0x1c
0x177c…17a1 at001d = ╱4c╱L╱ // 0x1799 @0x1d
0x177c…17a1 at001e = ╱44╱D╱ // 0x179a @0x1e
0x177c…17a1 at001f = ╱4f╱O╱ // 0x179b @0x1f
0x177c…17a1 at0020 = ╱31╱1╱ // 0x179c @0x20
0x177c…17a1 at0021 = ╱31╱1╱ // 0x179d @0x21
0x177c…17a1 at0022 = ╱ef╱$╱ // 0x179e @0x22
0x177c…17a1 at0023 = ╱ee╱)╱ // 0x179f @0x23
0x177c…17a1 at0024 = EOL // 0x17a0 @0x24
0x177c…17a1 }
0x17a1…17c6 a51d 2350 EXEC CALC(B,SALDO12$,FÅDK$,SALDO12$)
0x17a1…17c6 LineComalBin {
0x17a1…17c6 ptr = 0xa51d // 0x17a1 @0x0
0x17a1…17c6 lno = 0x092e // 0x17a3 @0x2
0x17a1…17c6 at0004 = ╱9d╱ EXEC ╱ // 0x17a5 @0x4
0x17a1…17c6 at0005 = ╱43╱C╱ // 0x17a6 @0x5
0x17a1…17c6 at0006 = ╱41╱A╱ // 0x17a7 @0x6
0x17a1…17c6 at0007 = ╱4c╱L╱ // 0x17a8 @0x7
0x17a1…17c6 at0008 = ╱43╱C╱ // 0x17a9 @0x8
0x17a1…17c6 at0009 = ╱ed╱(╱ // 0x17aa @0x9
0x17a1…17c6 at000a = ╱42╱B╱ // 0x17ab @0xa
0x17a1…17c6 at000b = ╱ec╱,╱ // 0x17ac @0xb
0x17a1…17c6 at000c = ╱53╱S╱ // 0x17ad @0xc
0x17a1…17c6 at000d = ╱41╱A╱ // 0x17ae @0xd
0x17a1…17c6 at000e = ╱4c╱L╱ // 0x17af @0xe
0x17a1…17c6 at000f = ╱44╱D╱ // 0x17b0 @0xf
0x17a1…17c6 at0010 = ╱4f╱O╱ // 0x17b1 @0x10
0x17a1…17c6 at0011 = ╱31╱1╱ // 0x17b2 @0x11
0x17a1…17c6 at0012 = ╱32╱2╱ // 0x17b3 @0x12
0x17a1…17c6 at0013 = ╱ef╱$╱ // 0x17b4 @0x13
0x17a1…17c6 at0014 = ╱ec╱,╱ // 0x17b5 @0x14
0x17a1…17c6 at0015 = ╱46╱F╱ // 0x17b6 @0x15
0x17a1…17c6 at0016 = ╱5d╱Å╱ // 0x17b7 @0x16
0x17a1…17c6 at0017 = ╱44╱D╱ // 0x17b8 @0x17
0x17a1…17c6 at0018 = ╱4b╱K╱ // 0x17b9 @0x18
0x17a1…17c6 at0019 = ╱ef╱$╱ // 0x17ba @0x19
0x17a1…17c6 at001a = ╱ec╱,╱ // 0x17bb @0x1a
0x17a1…17c6 at001b = ╱53╱S╱ // 0x17bc @0x1b
0x17a1…17c6 at001c = ╱41╱A╱ // 0x17bd @0x1c
0x17a1…17c6 at001d = ╱4c╱L╱ // 0x17be @0x1d
0x17a1…17c6 at001e = ╱44╱D╱ // 0x17bf @0x1e
0x17a1…17c6 at001f = ╱4f╱O╱ // 0x17c0 @0x1f
0x17a1…17c6 at0020 = ╱31╱1╱ // 0x17c1 @0x20
0x17a1…17c6 at0021 = ╱32╱2╱ // 0x17c2 @0x21
0x17a1…17c6 at0022 = ╱ef╱$╱ // 0x17c3 @0x22
0x17a1…17c6 at0023 = ╱ee╱)╱ // 0x17c4 @0x23
0x17a1…17c6 at0024 = EOL // 0x17c5 @0x24
0x17a1…17c6 }
0x17c6…17eb a542 2360 EXEC CALC(B,SALDO13$,FÅDK$,SALDO13$)
0x17c6…17eb LineComalBin {
0x17c6…17eb ptr = 0xa542 // 0x17c6 @0x0
0x17c6…17eb lno = 0x0938 // 0x17c8 @0x2
0x17c6…17eb at0004 = ╱9d╱ EXEC ╱ // 0x17ca @0x4
0x17c6…17eb at0005 = ╱43╱C╱ // 0x17cb @0x5
0x17c6…17eb at0006 = ╱41╱A╱ // 0x17cc @0x6
0x17c6…17eb at0007 = ╱4c╱L╱ // 0x17cd @0x7
0x17c6…17eb at0008 = ╱43╱C╱ // 0x17ce @0x8
0x17c6…17eb at0009 = ╱ed╱(╱ // 0x17cf @0x9
0x17c6…17eb at000a = ╱42╱B╱ // 0x17d0 @0xa
0x17c6…17eb at000b = ╱ec╱,╱ // 0x17d1 @0xb
0x17c6…17eb at000c = ╱53╱S╱ // 0x17d2 @0xc
0x17c6…17eb at000d = ╱41╱A╱ // 0x17d3 @0xd
0x17c6…17eb at000e = ╱4c╱L╱ // 0x17d4 @0xe
0x17c6…17eb at000f = ╱44╱D╱ // 0x17d5 @0xf
0x17c6…17eb at0010 = ╱4f╱O╱ // 0x17d6 @0x10
0x17c6…17eb at0011 = ╱31╱1╱ // 0x17d7 @0x11
0x17c6…17eb at0012 = ╱33╱3╱ // 0x17d8 @0x12
0x17c6…17eb at0013 = ╱ef╱$╱ // 0x17d9 @0x13
0x17c6…17eb at0014 = ╱ec╱,╱ // 0x17da @0x14
0x17c6…17eb at0015 = ╱46╱F╱ // 0x17db @0x15
0x17c6…17eb at0016 = ╱5d╱Å╱ // 0x17dc @0x16
0x17c6…17eb at0017 = ╱44╱D╱ // 0x17dd @0x17
0x17c6…17eb at0018 = ╱4b╱K╱ // 0x17de @0x18
0x17c6…17eb at0019 = ╱ef╱$╱ // 0x17df @0x19
0x17c6…17eb at001a = ╱ec╱,╱ // 0x17e0 @0x1a
0x17c6…17eb at001b = ╱53╱S╱ // 0x17e1 @0x1b
0x17c6…17eb at001c = ╱41╱A╱ // 0x17e2 @0x1c
0x17c6…17eb at001d = ╱4c╱L╱ // 0x17e3 @0x1d
0x17c6…17eb at001e = ╱44╱D╱ // 0x17e4 @0x1e
0x17c6…17eb at001f = ╱4f╱O╱ // 0x17e5 @0x1f
0x17c6…17eb at0020 = ╱31╱1╱ // 0x17e6 @0x20
0x17c6…17eb at0021 = ╱33╱3╱ // 0x17e7 @0x21
0x17c6…17eb at0022 = ╱ef╱$╱ // 0x17e8 @0x22
0x17c6…17eb at0023 = ╱ee╱)╱ // 0x17e9 @0x23
0x17c6…17eb at0024 = EOL // 0x17ea @0x24
0x17c6…17eb }
0x17eb…1810 a567 2370 EXEC CALC(B,SALDO14$,FÅDK$,SALDO14$)
0x17eb…1810 LineComalBin {
0x17eb…1810 ptr = 0xa567 // 0x17eb @0x0
0x17eb…1810 lno = 0x0942 // 0x17ed @0x2
0x17eb…1810 at0004 = ╱9d╱ EXEC ╱ // 0x17ef @0x4
0x17eb…1810 at0005 = ╱43╱C╱ // 0x17f0 @0x5
0x17eb…1810 at0006 = ╱41╱A╱ // 0x17f1 @0x6
0x17eb…1810 at0007 = ╱4c╱L╱ // 0x17f2 @0x7
0x17eb…1810 at0008 = ╱43╱C╱ // 0x17f3 @0x8
0x17eb…1810 at0009 = ╱ed╱(╱ // 0x17f4 @0x9
0x17eb…1810 at000a = ╱42╱B╱ // 0x17f5 @0xa
0x17eb…1810 at000b = ╱ec╱,╱ // 0x17f6 @0xb
0x17eb…1810 at000c = ╱53╱S╱ // 0x17f7 @0xc
0x17eb…1810 at000d = ╱41╱A╱ // 0x17f8 @0xd
0x17eb…1810 at000e = ╱4c╱L╱ // 0x17f9 @0xe
0x17eb…1810 at000f = ╱44╱D╱ // 0x17fa @0xf
0x17eb…1810 at0010 = ╱4f╱O╱ // 0x17fb @0x10
0x17eb…1810 at0011 = ╱31╱1╱ // 0x17fc @0x11
0x17eb…1810 at0012 = ╱34╱4╱ // 0x17fd @0x12
0x17eb…1810 at0013 = ╱ef╱$╱ // 0x17fe @0x13
0x17eb…1810 at0014 = ╱ec╱,╱ // 0x17ff @0x14
0x17eb…1810 at0015 = ╱46╱F╱ // 0x1800 @0x15
0x17eb…1810 at0016 = ╱5d╱Å╱ // 0x1801 @0x16
0x17eb…1810 at0017 = ╱44╱D╱ // 0x1802 @0x17
0x17eb…1810 at0018 = ╱4b╱K╱ // 0x1803 @0x18
0x17eb…1810 at0019 = ╱ef╱$╱ // 0x1804 @0x19
0x17eb…1810 at001a = ╱ec╱,╱ // 0x1805 @0x1a
0x17eb…1810 at001b = ╱53╱S╱ // 0x1806 @0x1b
0x17eb…1810 at001c = ╱41╱A╱ // 0x1807 @0x1c
0x17eb…1810 at001d = ╱4c╱L╱ // 0x1808 @0x1d
0x17eb…1810 at001e = ╱44╱D╱ // 0x1809 @0x1e
0x17eb…1810 at001f = ╱4f╱O╱ // 0x180a @0x1f
0x17eb…1810 at0020 = ╱31╱1╱ // 0x180b @0x20
0x17eb…1810 at0021 = ╱34╱4╱ // 0x180c @0x21
0x17eb…1810 at0022 = ╱ef╱$╱ // 0x180d @0x22
0x17eb…1810 at0023 = ╱ee╱)╱ // 0x180e @0x23
0x17eb…1810 at0024 = EOL // 0x180f @0x24
0x17eb…1810 }
0x1810…1818 (80,) a56f 2380 WHEN E
0x1810…1818 LineComalBin {
0x1810…1818 ptr = 0xa56f // 0x1810 @0x0
0x1810…1818 lno = 0x094c // 0x1812 @0x2
0x1810…1818 at0004 = ╱a301╱ WHEN ╱ // 0x1814 @0x4
0x1810…1818 at0006 = ╱45╱E╱ // 0x1816 @0x6
0x1810…1818 at0007 = EOL // 0x1817 @0x7
0x1810…1818 }
0x1818…1841 a598 2390 IF LINIE>39 THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x1818…1841 LineComalBin {
0x1818…1841 ptr = 0xa598 // 0x1818 @0x0
0x1818…1841 lno = 0x0956 // 0x181a @0x2
0x1818…1841 at0004 = ╱82╱ IF ╱ // 0x181c @0x4
0x1818…1841 at0005 = ╱4c╱L╱ // 0x181d @0x5
0x1818…1841 at0006 = ╱49╱I╱ // 0x181e @0x6
0x1818…1841 at0007 = ╱4e╱N╱ // 0x181f @0x7
0x1818…1841 at0008 = ╱49╱I╱ // 0x1820 @0x8
0x1818…1841 at0009 = ╱45╱E╱ // 0x1821 @0x9
0x1818…1841 at000a = ╱de╱>╱ // 0x1822 @0xa
0x1818…1841 at000b = ╱33╱3╱ // 0x1823 @0xb
0x1818…1841 at000c = ╱39╱9╱ // 0x1824 @0xc
0x1818…1841 at000d = ╱fe00009c06╱ // 0x1825 @0xd
0x1818…1841 at0012 = ╱b6╱ THEN ╱ // 0x182a @0x12
0x1818…1841 at0013 = ╱9d╱ EXEC ╱ // 0x182b @0x13
0x1818…1841 at0014 = ╱4e╱N╱ // 0x182c @0x14
0x1818…1841 at0015 = ╱59╱Y╱ // 0x182d @0x15
0x1818…1841 at0016 = ╱53╱S╱ // 0x182e @0x16
0x1818…1841 at0017 = ╱49╱I╱ // 0x182f @0x17
0x1818…1841 at0018 = ╱44╱D╱ // 0x1830 @0x18
0x1818…1841 at0019 = ╱45╱E╱ // 0x1831 @0x19
0x1818…1841 at001a = ╱ed╱(╱ // 0x1832 @0x1a
0x1818…1841 at001b = ╱47╱G╱ // 0x1833 @0x1b
0x1818…1841 at001c = ╱46╱F╱ // 0x1834 @0x1c
0x1818…1841 at001d = ╱4e╱N╱ // 0x1835 @0x1d
0x1818…1841 at001e = ╱52╱R╱ // 0x1836 @0x1e
0x1818…1841 at001f = ╱ec╱,╱ // 0x1837 @0x1f
0x1818…1841 at0020 = ╱47╱G╱ // 0x1838 @0x20
0x1818…1841 at0021 = ╱4c╱L╱ // 0x1839 @0x21
0x1818…1841 at0022 = ╱4e╱N╱ // 0x183a @0x22
0x1818…1841 at0023 = ╱41╱A╱ // 0x183b @0x23
0x1818…1841 at0024 = ╱56╱V╱ // 0x183c @0x24
0x1818…1841 at0025 = ╱4e╱N╱ // 0x183d @0x25
0x1818…1841 at0026 = ╱ef╱$╱ // 0x183e @0x26
0x1818…1841 at0027 = ╱ee╱)╱ // 0x183f @0x27
0x1818…1841 at0028 = EOL // 0x1840 @0x28
0x1818…1841 }
0x1841…1858 a5af 2400 FNR2=FNR DIV 1000
0x1841…1858 LineComalBin {
0x1841…1858 ptr = 0xa5af // 0x1841 @0x0
0x1841…1858 lno = 0x0960 // 0x1843 @0x2
0x1841…1858 at0004 = ╱46╱F╱ // 0x1845 @0x4
0x1841…1858 at0005 = ╱4e╱N╱ // 0x1846 @0x5
0x1841…1858 at0006 = ╱52╱R╱ // 0x1847 @0x6
0x1841…1858 at0007 = ╱32╱2╱ // 0x1848 @0x7
0x1841…1858 at0008 = ╱dc╱=╱ // 0x1849 @0x8
0x1841…1858 at0009 = ╱46╱F╱ // 0x184a @0x9
0x1841…1858 at000a = ╱4e╱N╱ // 0x184b @0xa
0x1841…1858 at000b = ╱52╱R╱ // 0x184c @0xb
0x1841…1858 at000c = ╱e7╱ DIV ╱ // 0x184d @0xc
0x1841…1858 at000d = ╱31╱1╱ // 0x184e @0xd
0x1841…1858 at000e = ╱30╱0╱ // 0x184f @0xe
0x1841…1858 at000f = ╱30╱0╱ // 0x1850 @0xf
0x1841…1858 at0010 = ╱30╱0╱ // 0x1851 @0x10
0x1841…1858 at0011 = ╱fe0000fa0a╱ // 0x1852 @0x11
0x1841…1858 at0016 = EOL // 0x1857 @0x16
0x1841…1858 }
0x1858…18a9 a600 2410 FNR1=FNR DIV 10000;DTAL1=DTAL*10000+MKGR;KRTAL1=KRTAL*10000+MKRGR
0x1858…18a9 LineComalBin {
0x1858…18a9 ptr = 0xa600 // 0x1858 @0x0
0x1858…18a9 lno = 0x096a // 0x185a @0x2
0x1858…18a9 at0004 = ╱46╱F╱ // 0x185c @0x4
0x1858…18a9 at0005 = ╱4e╱N╱ // 0x185d @0x5
0x1858…18a9 at0006 = ╱52╱R╱ // 0x185e @0x6
0x1858…18a9 at0007 = ╱31╱1╱ // 0x185f @0x7
0x1858…18a9 at0008 = ╱dc╱=╱ // 0x1860 @0x8
0x1858…18a9 at0009 = ╱46╱F╱ // 0x1861 @0x9
0x1858…18a9 at000a = ╱4e╱N╱ // 0x1862 @0xa
0x1858…18a9 at000b = ╱52╱R╱ // 0x1863 @0xb
0x1858…18a9 at000c = ╱e7╱ DIV ╱ // 0x1864 @0xc
0x1858…18a9 at000d = ╱31╱1╱ // 0x1865 @0xd
0x1858…18a9 at000e = ╱30╱0╱ // 0x1866 @0xe
0x1858…18a9 at000f = ╱30╱0╱ // 0x1867 @0xf
0x1858…18a9 at0010 = ╱30╱0╱ // 0x1868 @0x10
0x1858…18a9 at0011 = ╱30╱0╱ // 0x1869 @0x11
0x1858…18a9 at0012 = ╱fe00409c0e╱ // 0x186a @0x12
0x1858…18a9 at0017 = ╱eb╱;╱ // 0x186f @0x17
0x1858…18a9 at0018 = ╱44╱D╱ // 0x1870 @0x18
0x1858…18a9 at0019 = ╱54╱T╱ // 0x1871 @0x19
0x1858…18a9 at001a = ╱41╱A╱ // 0x1872 @0x1a
0x1858…18a9 at001b = ╱4c╱L╱ // 0x1873 @0x1b
0x1858…18a9 at001c = ╱31╱1╱ // 0x1874 @0x1c
0x1858…18a9 at001d = ╱dc╱=╱ // 0x1875 @0x1d
0x1858…18a9 at001e = ╱44╱D╱ // 0x1876 @0x1e
0x1858…18a9 at001f = ╱54╱T╱ // 0x1877 @0x1f
0x1858…18a9 at0020 = ╱41╱A╱ // 0x1878 @0x20
0x1858…18a9 at0021 = ╱4c╱L╱ // 0x1879 @0x21
0x1858…18a9 at0022 = ╱e4╱*╱ // 0x187a @0x22
0x1858…18a9 at0023 = ╱31╱1╱ // 0x187b @0x23
0x1858…18a9 at0024 = ╱30╱0╱ // 0x187c @0x24
0x1858…18a9 at0025 = ╱30╱0╱ // 0x187d @0x25
0x1858…18a9 at0026 = ╱30╱0╱ // 0x187e @0x26
0x1858…18a9 at0027 = ╱30╱0╱ // 0x187f @0x27
0x1858…18a9 at0028 = ╱fe00409c0e╱ // 0x1880 @0x28
0x1858…18a9 at002d = ╱e2╱+╱ // 0x1885 @0x2d
0x1858…18a9 at002e = ╱4d╱M╱ // 0x1886 @0x2e
0x1858…18a9 at002f = ╱4b╱K╱ // 0x1887 @0x2f
0x1858…18a9 at0030 = ╱47╱G╱ // 0x1888 @0x30
0x1858…18a9 at0031 = ╱52╱R╱ // 0x1889 @0x31
0x1858…18a9 at0032 = ╱eb╱;╱ // 0x188a @0x32
0x1858…18a9 at0033 = ╱4b╱K╱ // 0x188b @0x33
0x1858…18a9 at0034 = ╱52╱R╱ // 0x188c @0x34
0x1858…18a9 at0035 = ╱54╱T╱ // 0x188d @0x35
0x1858…18a9 at0036 = ╱41╱A╱ // 0x188e @0x36
0x1858…18a9 at0037 = ╱4c╱L╱ // 0x188f @0x37
0x1858…18a9 at0038 = ╱31╱1╱ // 0x1890 @0x38
0x1858…18a9 at0039 = ╱dc╱=╱ // 0x1891 @0x39
0x1858…18a9 at003a = ╱4b╱K╱ // 0x1892 @0x3a
0x1858…18a9 at003b = ╱52╱R╱ // 0x1893 @0x3b
0x1858…18a9 at003c = ╱54╱T╱ // 0x1894 @0x3c
0x1858…18a9 at003d = ╱41╱A╱ // 0x1895 @0x3d
0x1858…18a9 at003e = ╱4c╱L╱ // 0x1896 @0x3e
0x1858…18a9 at003f = ╱e4╱*╱ // 0x1897 @0x3f
0x1858…18a9 at0040 = ╱31╱1╱ // 0x1898 @0x40
0x1858…18a9 at0041 = ╱30╱0╱ // 0x1899 @0x41
0x1858…18a9 at0042 = ╱30╱0╱ // 0x189a @0x42
0x1858…18a9 at0043 = ╱30╱0╱ // 0x189b @0x43
0x1858…18a9 at0044 = ╱30╱0╱ // 0x189c @0x44
0x1858…18a9 at0045 = ╱fe00409c0e╱ // 0x189d @0x45
0x1858…18a9 at004a = ╱e2╱+╱ // 0x18a2 @0x4a
0x1858…18a9 at004b = ╱4d╱M╱ // 0x18a3 @0x4b
0x1858…18a9 at004c = ╱4b╱K╱ // 0x18a4 @0x4c
0x1858…18a9 at004d = ╱52╱R╱ // 0x18a5 @0x4d
0x1858…18a9 at004e = ╱47╱G╱ // 0x18a6 @0x4e
0x1858…18a9 at004f = ╱52╱R╱ // 0x18a7 @0x4f
0x1858…18a9 at0050 = EOL // 0x18a8 @0x50
0x1858…18a9 }
0x18a9…18d9 a630 2420 IF FNR1=DTAL AND DTAL1=>FNR OR FNR2=KRTAL AND KRTAL1=>FNR THEN
0x18a9…18d9 LineComalBin {
0x18a9…18d9 ptr = 0xa630 // 0x18a9 @0x0
0x18a9…18d9 lno = 0x0974 // 0x18ab @0x2
0x18a9…18d9 at0004 = ╱9c╱ IF ╱ // 0x18ad @0x4
0x18a9…18d9 at0005 = ╱46╱F╱ // 0x18ae @0x5
0x18a9…18d9 at0006 = ╱4e╱N╱ // 0x18af @0x6
0x18a9…18d9 at0007 = ╱52╱R╱ // 0x18b0 @0x7
0x18a9…18d9 at0008 = ╱31╱1╱ // 0x18b1 @0x8
0x18a9…18d9 at0009 = ╱dc╱=╱ // 0x18b2 @0x9
0x18a9…18d9 at000a = ╱44╱D╱ // 0x18b3 @0xa
0x18a9…18d9 at000b = ╱54╱T╱ // 0x18b4 @0xb
0x18a9…18d9 at000c = ╱41╱A╱ // 0x18b5 @0xc
0x18a9…18d9 at000d = ╱4c╱L╱ // 0x18b6 @0xd
0x18a9…18d9 at000e = ╱da╱ AND ╱ // 0x18b7 @0xe
0x18a9…18d9 at000f = ╱44╱D╱ // 0x18b8 @0xf
0x18a9…18d9 at0010 = ╱54╱T╱ // 0x18b9 @0x10
0x18a9…18d9 at0011 = ╱41╱A╱ // 0x18ba @0x11
0x18a9…18d9 at0012 = ╱4c╱L╱ // 0x18bb @0x12
0x18a9…18d9 at0013 = ╱31╱1╱ // 0x18bc @0x13
0x18a9…18d9 at0014 = ╱e0╱=>╱ // 0x18bd @0x14
0x18a9…18d9 at0015 = ╱46╱F╱ // 0x18be @0x15
0x18a9…18d9 at0016 = ╱4e╱N╱ // 0x18bf @0x16
0x18a9…18d9 at0017 = ╱52╱R╱ // 0x18c0 @0x17
0x18a9…18d9 at0018 = ╱db╱ OR ╱ // 0x18c1 @0x18
0x18a9…18d9 at0019 = ╱46╱F╱ // 0x18c2 @0x19
0x18a9…18d9 at001a = ╱4e╱N╱ // 0x18c3 @0x1a
0x18a9…18d9 at001b = ╱52╱R╱ // 0x18c4 @0x1b
0x18a9…18d9 at001c = ╱32╱2╱ // 0x18c5 @0x1c
0x18a9…18d9 at001d = ╱dc╱=╱ // 0x18c6 @0x1d
0x18a9…18d9 at001e = ╱4b╱K╱ // 0x18c7 @0x1e
0x18a9…18d9 at001f = ╱52╱R╱ // 0x18c8 @0x1f
0x18a9…18d9 at0020 = ╱54╱T╱ // 0x18c9 @0x20
0x18a9…18d9 at0021 = ╱41╱A╱ // 0x18ca @0x21
0x18a9…18d9 at0022 = ╱4c╱L╱ // 0x18cb @0x22
0x18a9…18d9 at0023 = ╱da╱ AND ╱ // 0x18cc @0x23
0x18a9…18d9 at0024 = ╱4b╱K╱ // 0x18cd @0x24
0x18a9…18d9 at0025 = ╱52╱R╱ // 0x18ce @0x25
0x18a9…18d9 at0026 = ╱54╱T╱ // 0x18cf @0x26
0x18a9…18d9 at0027 = ╱41╱A╱ // 0x18d0 @0x27
0x18a9…18d9 at0028 = ╱4c╱L╱ // 0x18d1 @0x28
0x18a9…18d9 at0029 = ╱31╱1╱ // 0x18d2 @0x29
0x18a9…18d9 at002a = ╱e0╱=>╱ // 0x18d3 @0x2a
0x18a9…18d9 at002b = ╱46╱F╱ // 0x18d4 @0x2b
0x18a9…18d9 at002c = ╱4e╱N╱ // 0x18d5 @0x2c
0x18a9…18d9 at002d = ╱52╱R╱ // 0x18d6 @0x2d
0x18a9…18d9 at002e = ╱b6╱ THEN ╱ // 0x18d7 @0x2e
0x18a9…18d9 at002f = EOL // 0x18d8 @0x2f
0x18a9…18d9 }
0x18d9…18fe a655 2430 EXEC CALC(B,SALDO12$,FÅDK$,SALDO12$)
0x18d9…18fe LineComalBin {
0x18d9…18fe ptr = 0xa655 // 0x18d9 @0x0
0x18d9…18fe lno = 0x097e // 0x18db @0x2
0x18d9…18fe at0004 = ╱9d╱ EXEC ╱ // 0x18dd @0x4
0x18d9…18fe at0005 = ╱43╱C╱ // 0x18de @0x5
0x18d9…18fe at0006 = ╱41╱A╱ // 0x18df @0x6
0x18d9…18fe at0007 = ╱4c╱L╱ // 0x18e0 @0x7
0x18d9…18fe at0008 = ╱43╱C╱ // 0x18e1 @0x8
0x18d9…18fe at0009 = ╱ed╱(╱ // 0x18e2 @0x9
0x18d9…18fe at000a = ╱42╱B╱ // 0x18e3 @0xa
0x18d9…18fe at000b = ╱ec╱,╱ // 0x18e4 @0xb
0x18d9…18fe at000c = ╱53╱S╱ // 0x18e5 @0xc
0x18d9…18fe at000d = ╱41╱A╱ // 0x18e6 @0xd
0x18d9…18fe at000e = ╱4c╱L╱ // 0x18e7 @0xe
0x18d9…18fe at000f = ╱44╱D╱ // 0x18e8 @0xf
0x18d9…18fe at0010 = ╱4f╱O╱ // 0x18e9 @0x10
0x18d9…18fe at0011 = ╱31╱1╱ // 0x18ea @0x11
0x18d9…18fe at0012 = ╱32╱2╱ // 0x18eb @0x12
0x18d9…18fe at0013 = ╱ef╱$╱ // 0x18ec @0x13
0x18d9…18fe at0014 = ╱ec╱,╱ // 0x18ed @0x14
0x18d9…18fe at0015 = ╱46╱F╱ // 0x18ee @0x15
0x18d9…18fe at0016 = ╱5d╱Å╱ // 0x18ef @0x16
0x18d9…18fe at0017 = ╱44╱D╱ // 0x18f0 @0x17
0x18d9…18fe at0018 = ╱4b╱K╱ // 0x18f1 @0x18
0x18d9…18fe at0019 = ╱ef╱$╱ // 0x18f2 @0x19
0x18d9…18fe at001a = ╱ec╱,╱ // 0x18f3 @0x1a
0x18d9…18fe at001b = ╱53╱S╱ // 0x18f4 @0x1b
0x18d9…18fe at001c = ╱41╱A╱ // 0x18f5 @0x1c
0x18d9…18fe at001d = ╱4c╱L╱ // 0x18f6 @0x1d
0x18d9…18fe at001e = ╱44╱D╱ // 0x18f7 @0x1e
0x18d9…18fe at001f = ╱4f╱O╱ // 0x18f8 @0x1f
0x18d9…18fe at0020 = ╱31╱1╱ // 0x18f9 @0x20
0x18d9…18fe at0021 = ╱32╱2╱ // 0x18fa @0x21
0x18d9…18fe at0022 = ╱ef╱$╱ // 0x18fb @0x22
0x18d9…18fe at0023 = ╱ee╱)╱ // 0x18fc @0x23
0x18d9…18fe at0024 = EOL // 0x18fd @0x24
0x18d9…18fe }
0x18fe…1923 a67a 2440 EXEC CALC(B,SALDO13$,FÅDK$,SALDO13$)
0x18fe…1923 LineComalBin {
0x18fe…1923 ptr = 0xa67a // 0x18fe @0x0
0x18fe…1923 lno = 0x0988 // 0x1900 @0x2
0x18fe…1923 at0004 = ╱9d╱ EXEC ╱ // 0x1902 @0x4
0x18fe…1923 at0005 = ╱43╱C╱ // 0x1903 @0x5
0x18fe…1923 at0006 = ╱41╱A╱ // 0x1904 @0x6
0x18fe…1923 at0007 = ╱4c╱L╱ // 0x1905 @0x7
0x18fe…1923 at0008 = ╱43╱C╱ // 0x1906 @0x8
0x18fe…1923 at0009 = ╱ed╱(╱ // 0x1907 @0x9
0x18fe…1923 at000a = ╱42╱B╱ // 0x1908 @0xa
0x18fe…1923 at000b = ╱ec╱,╱ // 0x1909 @0xb
0x18fe…1923 at000c = ╱53╱S╱ // 0x190a @0xc
0x18fe…1923 at000d = ╱41╱A╱ // 0x190b @0xd
0x18fe…1923 at000e = ╱4c╱L╱ // 0x190c @0xe
0x18fe…1923 at000f = ╱44╱D╱ // 0x190d @0xf
0x18fe…1923 at0010 = ╱4f╱O╱ // 0x190e @0x10
0x18fe…1923 at0011 = ╱31╱1╱ // 0x190f @0x11
0x18fe…1923 at0012 = ╱33╱3╱ // 0x1910 @0x12
0x18fe…1923 at0013 = ╱ef╱$╱ // 0x1911 @0x13
0x18fe…1923 at0014 = ╱ec╱,╱ // 0x1912 @0x14
0x18fe…1923 at0015 = ╱46╱F╱ // 0x1913 @0x15
0x18fe…1923 at0016 = ╱5d╱Å╱ // 0x1914 @0x16
0x18fe…1923 at0017 = ╱44╱D╱ // 0x1915 @0x17
0x18fe…1923 at0018 = ╱4b╱K╱ // 0x1916 @0x18
0x18fe…1923 at0019 = ╱ef╱$╱ // 0x1917 @0x19
0x18fe…1923 at001a = ╱ec╱,╱ // 0x1918 @0x1a
0x18fe…1923 at001b = ╱53╱S╱ // 0x1919 @0x1b
0x18fe…1923 at001c = ╱41╱A╱ // 0x191a @0x1c
0x18fe…1923 at001d = ╱4c╱L╱ // 0x191b @0x1d
0x18fe…1923 at001e = ╱44╱D╱ // 0x191c @0x1e
0x18fe…1923 at001f = ╱4f╱O╱ // 0x191d @0x1f
0x18fe…1923 at0020 = ╱31╱1╱ // 0x191e @0x20
0x18fe…1923 at0021 = ╱33╱3╱ // 0x191f @0x21
0x18fe…1923 at0022 = ╱ef╱$╱ // 0x1920 @0x22
0x18fe…1923 at0023 = ╱ee╱)╱ // 0x1921 @0x23
0x18fe…1923 at0024 = EOL // 0x1922 @0x24
0x18fe…1923 }
0x1923…1948 a69f 2450 EXEC CALC(B,SALDO14$,FÅDK$,SALDO14$)
0x1923…1948 LineComalBin {
0x1923…1948 ptr = 0xa69f // 0x1923 @0x0
0x1923…1948 lno = 0x0992 // 0x1925 @0x2
0x1923…1948 at0004 = ╱9d╱ EXEC ╱ // 0x1927 @0x4
0x1923…1948 at0005 = ╱43╱C╱ // 0x1928 @0x5
0x1923…1948 at0006 = ╱41╱A╱ // 0x1929 @0x6
0x1923…1948 at0007 = ╱4c╱L╱ // 0x192a @0x7
0x1923…1948 at0008 = ╱43╱C╱ // 0x192b @0x8
0x1923…1948 at0009 = ╱ed╱(╱ // 0x192c @0x9
0x1923…1948 at000a = ╱42╱B╱ // 0x192d @0xa
0x1923…1948 at000b = ╱ec╱,╱ // 0x192e @0xb
0x1923…1948 at000c = ╱53╱S╱ // 0x192f @0xc
0x1923…1948 at000d = ╱41╱A╱ // 0x1930 @0xd
0x1923…1948 at000e = ╱4c╱L╱ // 0x1931 @0xe
0x1923…1948 at000f = ╱44╱D╱ // 0x1932 @0xf
0x1923…1948 at0010 = ╱4f╱O╱ // 0x1933 @0x10
0x1923…1948 at0011 = ╱31╱1╱ // 0x1934 @0x11
0x1923…1948 at0012 = ╱34╱4╱ // 0x1935 @0x12
0x1923…1948 at0013 = ╱ef╱$╱ // 0x1936 @0x13
0x1923…1948 at0014 = ╱ec╱,╱ // 0x1937 @0x14
0x1923…1948 at0015 = ╱46╱F╱ // 0x1938 @0x15
0x1923…1948 at0016 = ╱5d╱Å╱ // 0x1939 @0x16
0x1923…1948 at0017 = ╱44╱D╱ // 0x193a @0x17
0x1923…1948 at0018 = ╱4b╱K╱ // 0x193b @0x18
0x1923…1948 at0019 = ╱ef╱$╱ // 0x193c @0x19
0x1923…1948 at001a = ╱ec╱,╱ // 0x193d @0x1a
0x1923…1948 at001b = ╱53╱S╱ // 0x193e @0x1b
0x1923…1948 at001c = ╱41╱A╱ // 0x193f @0x1c
0x1923…1948 at001d = ╱4c╱L╱ // 0x1940 @0x1d
0x1923…1948 at001e = ╱44╱D╱ // 0x1941 @0x1e
0x1923…1948 at001f = ╱4f╱O╱ // 0x1942 @0x1f
0x1923…1948 at0020 = ╱31╱1╱ // 0x1943 @0x20
0x1923…1948 at0021 = ╱34╱4╱ // 0x1944 @0x21
0x1923…1948 at0022 = ╱ef╱$╱ // 0x1945 @0x22
0x1923…1948 at0023 = ╱ee╱)╱ // 0x1946 @0x23
0x1923…1948 at0024 = EOL // 0x1947 @0x24
0x1923…1948 }
0x1948…1967 a6be 2460 EXEC LINIEUD(FNR,FNAVN$,FÅDK$)
0x1948…1967 LineComalBin {
0x1948…1967 ptr = 0xa6be // 0x1948 @0x0
0x1948…1967 lno = 0x099c // 0x194a @0x2
0x1948…1967 at0004 = ╱9d╱ EXEC ╱ // 0x194c @0x4
0x1948…1967 at0005 = ╱4c╱L╱ // 0x194d @0x5
0x1948…1967 at0006 = ╱49╱I╱ // 0x194e @0x6
0x1948…1967 at0007 = ╱4e╱N╱ // 0x194f @0x7
0x1948…1967 at0008 = ╱49╱I╱ // 0x1950 @0x8
0x1948…1967 at0009 = ╱45╱E╱ // 0x1951 @0x9
0x1948…1967 at000a = ╱55╱U╱ // 0x1952 @0xa
0x1948…1967 at000b = ╱44╱D╱ // 0x1953 @0xb
0x1948…1967 at000c = ╱ed╱(╱ // 0x1954 @0xc
0x1948…1967 at000d = ╱46╱F╱ // 0x1955 @0xd
0x1948…1967 at000e = ╱4e╱N╱ // 0x1956 @0xe
0x1948…1967 at000f = ╱52╱R╱ // 0x1957 @0xf
0x1948…1967 at0010 = ╱ec╱,╱ // 0x1958 @0x10
0x1948…1967 at0011 = ╱46╱F╱ // 0x1959 @0x11
0x1948…1967 at0012 = ╱4e╱N╱ // 0x195a @0x12
0x1948…1967 at0013 = ╱41╱A╱ // 0x195b @0x13
0x1948…1967 at0014 = ╱56╱V╱ // 0x195c @0x14
0x1948…1967 at0015 = ╱4e╱N╱ // 0x195d @0x15
0x1948…1967 at0016 = ╱ef╱$╱ // 0x195e @0x16
0x1948…1967 at0017 = ╱ec╱,╱ // 0x195f @0x17
0x1948…1967 at0018 = ╱46╱F╱ // 0x1960 @0x18
0x1948…1967 at0019 = ╱5d╱Å╱ // 0x1961 @0x19
0x1948…1967 at001a = ╱44╱D╱ // 0x1962 @0x1a
0x1948…1967 at001b = ╱4b╱K╱ // 0x1963 @0x1b
0x1948…1967 at001c = ╱ef╱$╱ // 0x1964 @0x1c
0x1948…1967 at001d = ╱ee╱)╱ // 0x1965 @0x1d
0x1948…1967 at001e = EOL // 0x1966 @0x1e
0x1948…1967 }
0x1967…196d a6c4 2470 ELSE
0x1967…196d LineComalBin {
0x1967…196d ptr = 0xa6c4 // 0x1967 @0x0
0x1967…196d lno = 0x09a6 // 0x1969 @0x2
0x1967…196d at0004 = ╱9a╱ ELSE ╱ // 0x196b @0x4
0x1967…196d at0005 = EOL // 0x196c @0x5
0x1967…196d }
0x196d…198f a6e6 2480 EXEC LINIEUD(FNR,FNAVN$,SALDO11$)
0x196d…198f LineComalBin {
0x196d…198f ptr = 0xa6e6 // 0x196d @0x0
0x196d…198f lno = 0x09b0 // 0x196f @0x2
0x196d…198f at0004 = ╱9d╱ EXEC ╱ // 0x1971 @0x4
0x196d…198f at0005 = ╱4c╱L╱ // 0x1972 @0x5
0x196d…198f at0006 = ╱49╱I╱ // 0x1973 @0x6
0x196d…198f at0007 = ╱4e╱N╱ // 0x1974 @0x7
0x196d…198f at0008 = ╱49╱I╱ // 0x1975 @0x8
0x196d…198f at0009 = ╱45╱E╱ // 0x1976 @0x9
0x196d…198f at000a = ╱55╱U╱ // 0x1977 @0xa
0x196d…198f at000b = ╱44╱D╱ // 0x1978 @0xb
0x196d…198f at000c = ╱ed╱(╱ // 0x1979 @0xc
0x196d…198f at000d = ╱46╱F╱ // 0x197a @0xd
0x196d…198f at000e = ╱4e╱N╱ // 0x197b @0xe
0x196d…198f at000f = ╱52╱R╱ // 0x197c @0xf
0x196d…198f at0010 = ╱ec╱,╱ // 0x197d @0x10
0x196d…198f at0011 = ╱46╱F╱ // 0x197e @0x11
0x196d…198f at0012 = ╱4e╱N╱ // 0x197f @0x12
0x196d…198f at0013 = ╱41╱A╱ // 0x1980 @0x13
0x196d…198f at0014 = ╱56╱V╱ // 0x1981 @0x14
0x196d…198f at0015 = ╱4e╱N╱ // 0x1982 @0x15
0x196d…198f at0016 = ╱ef╱$╱ // 0x1983 @0x16
0x196d…198f at0017 = ╱ec╱,╱ // 0x1984 @0x17
0x196d…198f at0018 = ╱53╱S╱ // 0x1985 @0x18
0x196d…198f at0019 = ╱41╱A╱ // 0x1986 @0x19
0x196d…198f at001a = ╱4c╱L╱ // 0x1987 @0x1a
0x196d…198f at001b = ╱44╱D╱ // 0x1988 @0x1b
0x196d…198f at001c = ╱4f╱O╱ // 0x1989 @0x1c
0x196d…198f at001d = ╱31╱1╱ // 0x198a @0x1d
0x196d…198f at001e = ╱31╱1╱ // 0x198b @0x1e
0x196d…198f at001f = ╱ef╱$╱ // 0x198c @0x1f
0x196d…198f at0020 = ╱ee╱)╱ // 0x198d @0x20
0x196d…198f at0021 = EOL // 0x198e @0x21
0x196d…198f }
0x198f…19a1 a6f8 2490 SALDO11$="0+"
0x198f…19a1 LineComalBin {
0x198f…19a1 ptr = 0xa6f8 // 0x198f @0x0
0x198f…19a1 lno = 0x09ba // 0x1991 @0x2
0x198f…19a1 at0004 = ╱53╱S╱ // 0x1993 @0x4
0x198f…19a1 at0005 = ╱41╱A╱ // 0x1994 @0x5
0x198f…19a1 at0006 = ╱4c╱L╱ // 0x1995 @0x6
0x198f…19a1 at0007 = ╱44╱D╱ // 0x1996 @0x7
0x198f…19a1 at0008 = ╱4f╱O╱ // 0x1997 @0x8
0x198f…19a1 at0009 = ╱31╱1╱ // 0x1998 @0x9
0x198f…19a1 at000a = ╱31╱1╱ // 0x1999 @0xa
0x198f…19a1 at000b = ╱ef╱$╱ // 0x199a @0xb
0x198f…19a1 at000c = ╱dc╱=╱ // 0x199b @0xc
0x198f…19a1 at000d = ╱22╱"╱ // 0x199c @0xd
0x198f…19a1 at000e = ╱30╱0╱ // 0x199d @0xe
0x198f…19a1 at000f = ╱2b╱+╱ // 0x199e @0xf
0x198f…19a1 at0010 = ╱22╱"╱ // 0x199f @0x10
0x198f…19a1 at0011 = EOL // 0x19a0 @0x11
0x198f…19a1 }
0x19a1…19a7 a6fe 2500 ENDIF
0x19a1…19a7 LineComalBin {
0x19a1…19a7 ptr = 0xa6fe // 0x19a1 @0x0
0x19a1…19a7 lno = 0x09c4 // 0x19a3 @0x2
0x19a1…19a7 at0004 = ╱9b╱ ENDIF ╱ // 0x19a5 @0x4
0x19a1…19a7 at0005 = EOL // 0x19a6 @0x5
0x19a1…19a7 }
0x19a7…19b0 a707 2510 PRINT " "
0x19a7…19b0 LineComalBin {
0x19a7…19b0 ptr = 0xa707 // 0x19a7 @0x0
0x19a7…19b0 lno = 0x09ce // 0x19a9 @0x2
0x19a7…19b0 at0004 = ╱92╱ PRINT ╱ // 0x19ab @0x4
0x19a7…19b0 at0005 = ╱22╱"╱ // 0x19ac @0x5
0x19a7…19b0 at0006 = ╱20╱…╱ // 0x19ad @0x6
0x19a7…19b0 at0007 = ╱22╱"╱ // 0x19ae @0x7
0x19a7…19b0 at0008 = EOL // 0x19af @0x8
0x19a7…19b0 }
0x19b0…19c2 a719 2520 LINIE=LINIE+G
0x19b0…19c2 LineComalBin {
0x19b0…19c2 ptr = 0xa719 // 0x19b0 @0x0
0x19b0…19c2 lno = 0x09d8 // 0x19b2 @0x2
0x19b0…19c2 at0004 = ╱4c╱L╱ // 0x19b4 @0x4
0x19b0…19c2 at0005 = ╱49╱I╱ // 0x19b5 @0x5
0x19b0…19c2 at0006 = ╱4e╱N╱ // 0x19b6 @0x6
0x19b0…19c2 at0007 = ╱49╱I╱ // 0x19b7 @0x7
0x19b0…19c2 at0008 = ╱45╱E╱ // 0x19b8 @0x8
0x19b0…19c2 at0009 = ╱dc╱=╱ // 0x19b9 @0x9
0x19b0…19c2 at000a = ╱4c╱L╱ // 0x19ba @0xa
0x19b0…19c2 at000b = ╱49╱I╱ // 0x19bb @0xb
0x19b0…19c2 at000c = ╱4e╱N╱ // 0x19bc @0xc
0x19b0…19c2 at000d = ╱49╱I╱ // 0x19bd @0xd
0x19b0…19c2 at000e = ╱45╱E╱ // 0x19be @0xe
0x19b0…19c2 at000f = ╱e2╱+╱ // 0x19bf @0xf
0x19b0…19c2 at0010 = ╱47╱G╱ // 0x19c0 @0x10
0x19b0…19c2 at0011 = EOL // 0x19c1 @0x11
0x19b0…19c2 }
0x19c2…19ca a721 2530 WHEN G
0x19c2…19ca LineComalBin {
0x19c2…19ca ptr = 0xa721 // 0x19c2 @0x0
0x19c2…19ca lno = 0x09e2 // 0x19c4 @0x2
0x19c2…19ca at0004 = ╱a301╱ WHEN ╱ // 0x19c6 @0x4
0x19c2…19ca at0006 = ╱47╱G╱ // 0x19c8 @0x6
0x19c2…19ca at0007 = EOL // 0x19c9 @0x7
0x19c2…19ca }
0x19ca…19d7 a72e 2540 IF GFNR>B THEN
0x19ca…19d7 LineComalBin {
0x19ca…19d7 ptr = 0xa72e // 0x19ca @0x0
0x19ca…19d7 lno = 0x09ec // 0x19cc @0x2
0x19ca…19d7 at0004 = ╱9c╱ IF ╱ // 0x19ce @0x4
0x19ca…19d7 at0005 = ╱47╱G╱ // 0x19cf @0x5
0x19ca…19d7 at0006 = ╱46╱F╱ // 0x19d0 @0x6
0x19ca…19d7 at0007 = ╱4e╱N╱ // 0x19d1 @0x7
0x19ca…19d7 at0008 = ╱52╱R╱ // 0x19d2 @0x8
0x19ca…19d7 at0009 = ╱de╱>╱ // 0x19d3 @0x9
0x19ca…19d7 at000a = ╱42╱B╱ // 0x19d4 @0xa
0x19ca…19d7 at000b = ╱b6╱ THEN ╱ // 0x19d5 @0xb
0x19ca…19d7 at000c = EOL // 0x19d6 @0xc
0x19ca…19d7 }
0x19d7…1a00 a757 2550 IF LINIE>37 THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x19d7…1a00 LineComalBin {
0x19d7…1a00 ptr = 0xa757 // 0x19d7 @0x0
0x19d7…1a00 lno = 0x09f6 // 0x19d9 @0x2
0x19d7…1a00 at0004 = ╱82╱ IF ╱ // 0x19db @0x4
0x19d7…1a00 at0005 = ╱4c╱L╱ // 0x19dc @0x5
0x19d7…1a00 at0006 = ╱49╱I╱ // 0x19dd @0x6
0x19d7…1a00 at0007 = ╱4e╱N╱ // 0x19de @0x7
0x19d7…1a00 at0008 = ╱49╱I╱ // 0x19df @0x8
0x19d7…1a00 at0009 = ╱45╱E╱ // 0x19e0 @0x9
0x19d7…1a00 at000a = ╱de╱>╱ // 0x19e1 @0xa
0x19d7…1a00 at000b = ╱33╱3╱ // 0x19e2 @0xb
0x19d7…1a00 at000c = ╱37╱7╱ // 0x19e3 @0xc
0x19d7…1a00 at000d = ╱fe00009406╱ // 0x19e4 @0xd
0x19d7…1a00 at0012 = ╱b6╱ THEN ╱ // 0x19e9 @0x12
0x19d7…1a00 at0013 = ╱9d╱ EXEC ╱ // 0x19ea @0x13
0x19d7…1a00 at0014 = ╱4e╱N╱ // 0x19eb @0x14
0x19d7…1a00 at0015 = ╱59╱Y╱ // 0x19ec @0x15
0x19d7…1a00 at0016 = ╱53╱S╱ // 0x19ed @0x16
0x19d7…1a00 at0017 = ╱49╱I╱ // 0x19ee @0x17
0x19d7…1a00 at0018 = ╱44╱D╱ // 0x19ef @0x18
0x19d7…1a00 at0019 = ╱45╱E╱ // 0x19f0 @0x19
0x19d7…1a00 at001a = ╱ed╱(╱ // 0x19f1 @0x1a
0x19d7…1a00 at001b = ╱47╱G╱ // 0x19f2 @0x1b
0x19d7…1a00 at001c = ╱46╱F╱ // 0x19f3 @0x1c
0x19d7…1a00 at001d = ╱4e╱N╱ // 0x19f4 @0x1d
0x19d7…1a00 at001e = ╱52╱R╱ // 0x19f5 @0x1e
0x19d7…1a00 at001f = ╱ec╱,╱ // 0x19f6 @0x1f
0x19d7…1a00 at0020 = ╱47╱G╱ // 0x19f7 @0x20
0x19d7…1a00 at0021 = ╱4c╱L╱ // 0x19f8 @0x21
0x19d7…1a00 at0022 = ╱4e╱N╱ // 0x19f9 @0x22
0x19d7…1a00 at0023 = ╱41╱A╱ // 0x19fa @0x23
0x19d7…1a00 at0024 = ╱56╱V╱ // 0x19fb @0x24
0x19d7…1a00 at0025 = ╱4e╱N╱ // 0x19fc @0x25
0x19d7…1a00 at0026 = ╱ef╱$╱ // 0x19fd @0x26
0x19d7…1a00 at0027 = ╱ee╱)╱ // 0x19fe @0x27
0x19d7…1a00 at0028 = EOL // 0x19ff @0x28
0x19d7…1a00 }
0x1a00…1a09 a760 2560 PRINT " "
0x1a00…1a09 LineComalBin {
0x1a00…1a09 ptr = 0xa760 // 0x1a00 @0x0
0x1a00…1a09 lno = 0x0a00 // 0x1a02 @0x2
0x1a00…1a09 at0004 = ╱92╱ PRINT ╱ // 0x1a04 @0x4
0x1a00…1a09 at0005 = ╱22╱"╱ // 0x1a05 @0x5
0x1a00…1a09 at0006 = ╱20╱…╱ // 0x1a06 @0x6
0x1a00…1a09 at0007 = ╱22╱"╱ // 0x1a07 @0x7
0x1a00…1a09 at0008 = EOL // 0x1a08 @0x8
0x1a00…1a09 }
0x1a09…1a2a a781 2570 PRINT TAB(8);STREG$(E:71)
0x1a09…1a2a LineComalBin {
0x1a09…1a2a ptr = 0xa781 // 0x1a09 @0x0
0x1a09…1a2a lno = 0x0a0a // 0x1a0b @0x2
0x1a09…1a2a at0004 = ╱92╱ PRINT ╱ // 0x1a0d @0x4
0x1a09…1a2a at0005 = ╱d2╱TAB╱ // 0x1a0e @0x5
0x1a09…1a2a at0006 = ╱ed╱(╱ // 0x1a0f @0x6
0x1a09…1a2a at0007 = ╱38╱8╱ // 0x1a10 @0x7
0x1a09…1a2a at0008 = ╱fe00008004╱ // 0x1a11 @0x8
0x1a09…1a2a at000d = ╱ee╱)╱ // 0x1a16 @0xd
0x1a09…1a2a at000e = ╱eb╱;╱ // 0x1a17 @0xe
0x1a09…1a2a at000f = ╱53╱S╱ // 0x1a18 @0xf
0x1a09…1a2a at0010 = ╱54╱T╱ // 0x1a19 @0x10
0x1a09…1a2a at0011 = ╱52╱R╱ // 0x1a1a @0x11
0x1a09…1a2a at0012 = ╱45╱E╱ // 0x1a1b @0x12
0x1a09…1a2a at0013 = ╱47╱G╱ // 0x1a1c @0x13
0x1a09…1a2a at0014 = ╱ef╱$╱ // 0x1a1d @0x14
0x1a09…1a2a at0015 = ╱ed╱(╱ // 0x1a1e @0x15
0x1a09…1a2a at0016 = ╱45╱E╱ // 0x1a1f @0x16
0x1a09…1a2a at0017 = ╱f0╱:╱ // 0x1a20 @0x17
0x1a09…1a2a at0018 = ╱37╱7╱ // 0x1a21 @0x18
0x1a09…1a2a at0019 = ╱31╱1╱ // 0x1a22 @0x19
0x1a09…1a2a at001a = ╱fe00008e07╱ // 0x1a23 @0x1a
0x1a09…1a2a at001f = ╱ee╱)╱ // 0x1a28 @0x1f
0x1a09…1a2a at0020 = EOL // 0x1a29 @0x20
0x1a09…1a2a }
0x1a2a…1a5e a7b5 2580 EXEC LINIEUD(GFNR,GLNAVN$(1:23),SALDO12$)
0x1a2a…1a5e LineComalBin {
0x1a2a…1a5e ptr = 0xa7b5 // 0x1a2a @0x0
0x1a2a…1a5e lno = 0x0a14 // 0x1a2c @0x2
0x1a2a…1a5e at0004 = ╱9d╱ EXEC ╱ // 0x1a2e @0x4
0x1a2a…1a5e at0005 = ╱4c╱L╱ // 0x1a2f @0x5
0x1a2a…1a5e at0006 = ╱49╱I╱ // 0x1a30 @0x6
0x1a2a…1a5e at0007 = ╱4e╱N╱ // 0x1a31 @0x7
0x1a2a…1a5e at0008 = ╱49╱I╱ // 0x1a32 @0x8
0x1a2a…1a5e at0009 = ╱45╱E╱ // 0x1a33 @0x9
0x1a2a…1a5e at000a = ╱55╱U╱ // 0x1a34 @0xa
0x1a2a…1a5e at000b = ╱44╱D╱ // 0x1a35 @0xb
0x1a2a…1a5e at000c = ╱ed╱(╱ // 0x1a36 @0xc
0x1a2a…1a5e at000d = ╱47╱G╱ // 0x1a37 @0xd
0x1a2a…1a5e at000e = ╱46╱F╱ // 0x1a38 @0xe
0x1a2a…1a5e at000f = ╱4e╱N╱ // 0x1a39 @0xf
0x1a2a…1a5e at0010 = ╱52╱R╱ // 0x1a3a @0x10
0x1a2a…1a5e at0011 = ╱ec╱,╱ // 0x1a3b @0x11
0x1a2a…1a5e at0012 = ╱47╱G╱ // 0x1a3c @0x12
0x1a2a…1a5e at0013 = ╱4c╱L╱ // 0x1a3d @0x13
0x1a2a…1a5e at0014 = ╱4e╱N╱ // 0x1a3e @0x14
0x1a2a…1a5e at0015 = ╱41╱A╱ // 0x1a3f @0x15
0x1a2a…1a5e at0016 = ╱56╱V╱ // 0x1a40 @0x16
0x1a2a…1a5e at0017 = ╱4e╱N╱ // 0x1a41 @0x17
0x1a2a…1a5e at0018 = ╱ef╱$╱ // 0x1a42 @0x18
0x1a2a…1a5e at0019 = ╱ed╱(╱ // 0x1a43 @0x19
0x1a2a…1a5e at001a = ╱31╱1╱ // 0x1a44 @0x1a
0x1a2a…1a5e at001b = ╱fe00008001╱ // 0x1a45 @0x1b
0x1a2a…1a5e at0020 = ╱f0╱:╱ // 0x1a4a @0x20
0x1a2a…1a5e at0021 = ╱32╱2╱ // 0x1a4b @0x21
0x1a2a…1a5e at0022 = ╱33╱3╱ // 0x1a4c @0x22
0x1a2a…1a5e at0023 = ╱fe0000b805╱ // 0x1a4d @0x23
0x1a2a…1a5e at0028 = ╱ee╱)╱ // 0x1a52 @0x28
0x1a2a…1a5e at0029 = ╱ec╱,╱ // 0x1a53 @0x29
0x1a2a…1a5e at002a = ╱53╱S╱ // 0x1a54 @0x2a
0x1a2a…1a5e at002b = ╱41╱A╱ // 0x1a55 @0x2b
0x1a2a…1a5e at002c = ╱4c╱L╱ // 0x1a56 @0x2c
0x1a2a…1a5e at002d = ╱44╱D╱ // 0x1a57 @0x2d
0x1a2a…1a5e at002e = ╱4f╱O╱ // 0x1a58 @0x2e
0x1a2a…1a5e at002f = ╱31╱1╱ // 0x1a59 @0x2f
0x1a2a…1a5e at0030 = ╱32╱2╱ // 0x1a5a @0x30
0x1a2a…1a5e at0031 = ╱ef╱$╱ // 0x1a5b @0x31
0x1a2a…1a5e at0032 = ╱ee╱)╱ // 0x1a5c @0x32
0x1a2a…1a5e at0033 = EOL // 0x1a5d @0x33
0x1a2a…1a5e }
0x1a5e…1a70 a7c7 2590 LINIE=LINIE+V
0x1a5e…1a70 LineComalBin {
0x1a5e…1a70 ptr = 0xa7c7 // 0x1a5e @0x0
0x1a5e…1a70 lno = 0x0a1e // 0x1a60 @0x2
0x1a5e…1a70 at0004 = ╱4c╱L╱ // 0x1a62 @0x4
0x1a5e…1a70 at0005 = ╱49╱I╱ // 0x1a63 @0x5
0x1a5e…1a70 at0006 = ╱4e╱N╱ // 0x1a64 @0x6
0x1a5e…1a70 at0007 = ╱49╱I╱ // 0x1a65 @0x7
0x1a5e…1a70 at0008 = ╱45╱E╱ // 0x1a66 @0x8
0x1a5e…1a70 at0009 = ╱dc╱=╱ // 0x1a67 @0x9
0x1a5e…1a70 at000a = ╱4c╱L╱ // 0x1a68 @0xa
0x1a5e…1a70 at000b = ╱49╱I╱ // 0x1a69 @0xb
0x1a5e…1a70 at000c = ╱4e╱N╱ // 0x1a6a @0xc
0x1a5e…1a70 at000d = ╱49╱I╱ // 0x1a6b @0xd
0x1a5e…1a70 at000e = ╱45╱E╱ // 0x1a6c @0xe
0x1a5e…1a70 at000f = ╱e2╱+╱ // 0x1a6d @0xf
0x1a5e…1a70 at0010 = ╱56╱V╱ // 0x1a6e @0x10
0x1a5e…1a70 at0011 = EOL // 0x1a6f @0x11
0x1a5e…1a70 }
0x1a70…1a76 a7cd 2600 ENDIF
0x1a70…1a76 LineComalBin {
0x1a70…1a76 ptr = 0xa7cd // 0x1a70 @0x0
0x1a70…1a76 lno = 0x0a28 // 0x1a72 @0x2
0x1a70…1a76 at0004 = ╱9b╱ ENDIF ╱ // 0x1a74 @0x4
0x1a70…1a76 at0005 = EOL // 0x1a75 @0x5
0x1a70…1a76 }
0x1a76…1aae a805 2610 GLNAVN$=FNAVN$;GFNR=FNR;SALDO12$="0+";SALDO11$="0+"
0x1a76…1aae LineComalBin {
0x1a76…1aae ptr = 0xa805 // 0x1a76 @0x0
0x1a76…1aae lno = 0x0a32 // 0x1a78 @0x2
0x1a76…1aae at0004 = ╱47╱G╱ // 0x1a7a @0x4
0x1a76…1aae at0005 = ╱4c╱L╱ // 0x1a7b @0x5
0x1a76…1aae at0006 = ╱4e╱N╱ // 0x1a7c @0x6
0x1a76…1aae at0007 = ╱41╱A╱ // 0x1a7d @0x7
0x1a76…1aae at0008 = ╱56╱V╱ // 0x1a7e @0x8
0x1a76…1aae at0009 = ╱4e╱N╱ // 0x1a7f @0x9
0x1a76…1aae at000a = ╱ef╱$╱ // 0x1a80 @0xa
0x1a76…1aae at000b = ╱dc╱=╱ // 0x1a81 @0xb
0x1a76…1aae at000c = ╱46╱F╱ // 0x1a82 @0xc
0x1a76…1aae at000d = ╱4e╱N╱ // 0x1a83 @0xd
0x1a76…1aae at000e = ╱41╱A╱ // 0x1a84 @0xe
0x1a76…1aae at000f = ╱56╱V╱ // 0x1a85 @0xf
0x1a76…1aae at0010 = ╱4e╱N╱ // 0x1a86 @0x10
0x1a76…1aae at0011 = ╱ef╱$╱ // 0x1a87 @0x11
0x1a76…1aae at0012 = ╱eb╱;╱ // 0x1a88 @0x12
0x1a76…1aae at0013 = ╱47╱G╱ // 0x1a89 @0x13
0x1a76…1aae at0014 = ╱46╱F╱ // 0x1a8a @0x14
0x1a76…1aae at0015 = ╱4e╱N╱ // 0x1a8b @0x15
0x1a76…1aae at0016 = ╱52╱R╱ // 0x1a8c @0x16
0x1a76…1aae at0017 = ╱dc╱=╱ // 0x1a8d @0x17
0x1a76…1aae at0018 = ╱46╱F╱ // 0x1a8e @0x18
0x1a76…1aae at0019 = ╱4e╱N╱ // 0x1a8f @0x19
0x1a76…1aae at001a = ╱52╱R╱ // 0x1a90 @0x1a
0x1a76…1aae at001b = ╱eb╱;╱ // 0x1a91 @0x1b
0x1a76…1aae at001c = ╱53╱S╱ // 0x1a92 @0x1c
0x1a76…1aae at001d = ╱41╱A╱ // 0x1a93 @0x1d
0x1a76…1aae at001e = ╱4c╱L╱ // 0x1a94 @0x1e
0x1a76…1aae at001f = ╱44╱D╱ // 0x1a95 @0x1f
0x1a76…1aae at0020 = ╱4f╱O╱ // 0x1a96 @0x20
0x1a76…1aae at0021 = ╱31╱1╱ // 0x1a97 @0x21
0x1a76…1aae at0022 = ╱32╱2╱ // 0x1a98 @0x22
0x1a76…1aae at0023 = ╱ef╱$╱ // 0x1a99 @0x23
0x1a76…1aae at0024 = ╱dc╱=╱ // 0x1a9a @0x24
0x1a76…1aae at0025 = ╱22╱"╱ // 0x1a9b @0x25
0x1a76…1aae at0026 = ╱30╱0╱ // 0x1a9c @0x26
0x1a76…1aae at0027 = ╱2b╱+╱ // 0x1a9d @0x27
0x1a76…1aae at0028 = ╱22╱"╱ // 0x1a9e @0x28
0x1a76…1aae at0029 = ╱eb╱;╱ // 0x1a9f @0x29
0x1a76…1aae at002a = ╱53╱S╱ // 0x1aa0 @0x2a
0x1a76…1aae at002b = ╱41╱A╱ // 0x1aa1 @0x2b
0x1a76…1aae at002c = ╱4c╱L╱ // 0x1aa2 @0x2c
0x1a76…1aae at002d = ╱44╱D╱ // 0x1aa3 @0x2d
0x1a76…1aae at002e = ╱4f╱O╱ // 0x1aa4 @0x2e
0x1a76…1aae at002f = ╱31╱1╱ // 0x1aa5 @0x2f
0x1a76…1aae at0030 = ╱31╱1╱ // 0x1aa6 @0x30
0x1a76…1aae at0031 = ╱ef╱$╱ // 0x1aa7 @0x31
0x1a76…1aae at0032 = ╱dc╱=╱ // 0x1aa8 @0x32
0x1a76…1aae at0033 = ╱22╱"╱ // 0x1aa9 @0x33
0x1a76…1aae at0034 = ╱30╱0╱ // 0x1aaa @0x34
0x1a76…1aae at0035 = ╱2b╱+╱ // 0x1aab @0x35
0x1a76…1aae at0036 = ╱22╱"╱ // 0x1aac @0x36
0x1a76…1aae at0037 = EOL // 0x1aad @0x37
0x1a76…1aae }
0x1aae…1ac2 a819 2620 IF LINIE>34 THEN
0x1aae…1ac2 LineComalBin {
0x1aae…1ac2 ptr = 0xa819 // 0x1aae @0x0
0x1aae…1ac2 lno = 0x0a3c // 0x1ab0 @0x2
0x1aae…1ac2 at0004 = ╱9c╱ IF ╱ // 0x1ab2 @0x4
0x1aae…1ac2 at0005 = ╱4c╱L╱ // 0x1ab3 @0x5
0x1aae…1ac2 at0006 = ╱49╱I╱ // 0x1ab4 @0x6
0x1aae…1ac2 at0007 = ╱4e╱N╱ // 0x1ab5 @0x7
0x1aae…1ac2 at0008 = ╱49╱I╱ // 0x1ab6 @0x8
0x1aae…1ac2 at0009 = ╱45╱E╱ // 0x1ab7 @0x9
0x1aae…1ac2 at000a = ╱de╱>╱ // 0x1ab8 @0xa
0x1aae…1ac2 at000b = ╱33╱3╱ // 0x1ab9 @0xb
0x1aae…1ac2 at000c = ╱34╱4╱ // 0x1aba @0xc
0x1aae…1ac2 at000d = ╱fe00008806╱ // 0x1abb @0xd
0x1aae…1ac2 at0012 = ╱b6╱ THEN ╱ // 0x1ac0 @0x12
0x1aae…1ac2 at0013 = EOL // 0x1ac1 @0x13
0x1aae…1ac2 }
0x1ac2…1adc a833 2630 EXEC NYSIDE(GFNR,GLNAVN$)
0x1ac2…1adc LineComalBin {
0x1ac2…1adc ptr = 0xa833 // 0x1ac2 @0x0
0x1ac2…1adc lno = 0x0a46 // 0x1ac4 @0x2
0x1ac2…1adc at0004 = ╱9d╱ EXEC ╱ // 0x1ac6 @0x4
0x1ac2…1adc at0005 = ╱4e╱N╱ // 0x1ac7 @0x5
0x1ac2…1adc at0006 = ╱59╱Y╱ // 0x1ac8 @0x6
0x1ac2…1adc at0007 = ╱53╱S╱ // 0x1ac9 @0x7
0x1ac2…1adc at0008 = ╱49╱I╱ // 0x1aca @0x8
0x1ac2…1adc at0009 = ╱44╱D╱ // 0x1acb @0x9
0x1ac2…1adc at000a = ╱45╱E╱ // 0x1acc @0xa
0x1ac2…1adc at000b = ╱ed╱(╱ // 0x1acd @0xb
0x1ac2…1adc at000c = ╱47╱G╱ // 0x1ace @0xc
0x1ac2…1adc at000d = ╱46╱F╱ // 0x1acf @0xd
0x1ac2…1adc at000e = ╱4e╱N╱ // 0x1ad0 @0xe
0x1ac2…1adc at000f = ╱52╱R╱ // 0x1ad1 @0xf
0x1ac2…1adc at0010 = ╱ec╱,╱ // 0x1ad2 @0x10
0x1ac2…1adc at0011 = ╱47╱G╱ // 0x1ad3 @0x11
0x1ac2…1adc at0012 = ╱4c╱L╱ // 0x1ad4 @0x12
0x1ac2…1adc at0013 = ╱4e╱N╱ // 0x1ad5 @0x13
0x1ac2…1adc at0014 = ╱41╱A╱ // 0x1ad6 @0x14
0x1ac2…1adc at0015 = ╱56╱V╱ // 0x1ad7 @0x15
0x1ac2…1adc at0016 = ╱4e╱N╱ // 0x1ad8 @0x16
0x1ac2…1adc at0017 = ╱ef╱$╱ // 0x1ad9 @0x17
0x1ac2…1adc at0018 = ╱ee╱)╱ // 0x1ada @0x18
0x1ac2…1adc at0019 = EOL // 0x1adb @0x19
0x1ac2…1adc }
0x1adc…1ae2 a839 2640 ELSE
0x1adc…1ae2 LineComalBin {
0x1adc…1ae2 ptr = 0xa839 // 0x1adc @0x0
0x1adc…1ae2 lno = 0x0a50 // 0x1ade @0x2
0x1adc…1ae2 at0004 = ╱9a╱ ELSE ╱ // 0x1ae0 @0x4
0x1adc…1ae2 at0005 = EOL // 0x1ae1 @0x5
0x1adc…1ae2 }
0x1ae2…1af2 a849 2650 PRINT CHR(10)
0x1ae2…1af2 LineComalBin {
0x1ae2…1af2 ptr = 0xa849 // 0x1ae2 @0x0
0x1ae2…1af2 lno = 0x0a5a // 0x1ae4 @0x2
0x1ae2…1af2 at0004 = ╱92╱ PRINT ╱ // 0x1ae6 @0x4
0x1ae2…1af2 at0005 = ╱cf╱CHR╱ // 0x1ae7 @0x5
0x1ae2…1af2 at0006 = ╱ed╱(╱ // 0x1ae8 @0x6
0x1ae2…1af2 at0007 = ╱31╱1╱ // 0x1ae9 @0x7
0x1ae2…1af2 at0008 = ╱30╱0╱ // 0x1aea @0x8
0x1ae2…1af2 at0009 = ╱fe0000a004╱ // 0x1aeb @0x9
0x1ae2…1af2 at000e = ╱ee╱)╱ // 0x1af0 @0xe
0x1ae2…1af2 at000f = EOL // 0x1af1 @0xf
0x1ae2…1af2 }
0x1af2…1b02 a859 2660 PRINT CHR(10)
0x1af2…1b02 LineComalBin {
0x1af2…1b02 ptr = 0xa859 // 0x1af2 @0x0
0x1af2…1b02 lno = 0x0a64 // 0x1af4 @0x2
0x1af2…1b02 at0004 = ╱92╱ PRINT ╱ // 0x1af6 @0x4
0x1af2…1b02 at0005 = ╱cf╱CHR╱ // 0x1af7 @0x5
0x1af2…1b02 at0006 = ╱ed╱(╱ // 0x1af8 @0x6
0x1af2…1b02 at0007 = ╱31╱1╱ // 0x1af9 @0x7
0x1af2…1b02 at0008 = ╱30╱0╱ // 0x1afa @0x8
0x1af2…1b02 at0009 = ╱fe0000a004╱ // 0x1afb @0x9
0x1af2…1b02 at000e = ╱ee╱)╱ // 0x1b00 @0xe
0x1af2…1b02 at000f = EOL // 0x1b01 @0xf
0x1af2…1b02 }
0x1b02…1b17 a86e 2670 PRINT USING "###### ":FNR;
0x1b02…1b17 LineComalBin {
0x1b02…1b17 ptr = 0xa86e // 0x1b02 @0x0
0x1b02…1b17 lno = 0x0a6e // 0x1b04 @0x2
0x1b02…1b17 at0004 = ╱92╱ PRINT ╱ // 0x1b06 @0x4
0x1b02…1b17 at0005 = ╱b9╱ USING ╱ // 0x1b07 @0x5
0x1b02…1b17 at0006 = ╱22╱"╱ // 0x1b08 @0x6
0x1b02…1b17 at0007 = ╱23╱#╱ // 0x1b09 @0x7
0x1b02…1b17 at0008 = ╱23╱#╱ // 0x1b0a @0x8
0x1b02…1b17 at0009 = ╱23╱#╱ // 0x1b0b @0x9
0x1b02…1b17 at000a = ╱23╱#╱ // 0x1b0c @0xa
0x1b02…1b17 at000b = ╱23╱#╱ // 0x1b0d @0xb
0x1b02…1b17 at000c = ╱23╱#╱ // 0x1b0e @0xc
0x1b02…1b17 at000d = ╱20╱…╱ // 0x1b0f @0xd
0x1b02…1b17 at000e = ╱22╱"╱ // 0x1b10 @0xe
0x1b02…1b17 at000f = ╱f0╱:╱ // 0x1b11 @0xf
0x1b02…1b17 at0010 = ╱46╱F╱ // 0x1b12 @0x10
0x1b02…1b17 at0011 = ╱4e╱N╱ // 0x1b13 @0x11
0x1b02…1b17 at0012 = ╱52╱R╱ // 0x1b14 @0x12
0x1b02…1b17 at0013 = ╱eb╱;╱ // 0x1b15 @0x13
0x1b02…1b17 at0014 = EOL // 0x1b16 @0x14
0x1b02…1b17 }
0x1b17…1b24 a87b 2680 PRINT GLNAVN$
0x1b17…1b24 LineComalBin {
0x1b17…1b24 ptr = 0xa87b // 0x1b17 @0x0
0x1b17…1b24 lno = 0x0a78 // 0x1b19 @0x2
0x1b17…1b24 at0004 = ╱92╱ PRINT ╱ // 0x1b1b @0x4
0x1b17…1b24 at0005 = ╱47╱G╱ // 0x1b1c @0x5
0x1b17…1b24 at0006 = ╱4c╱L╱ // 0x1b1d @0x6
0x1b17…1b24 at0007 = ╱4e╱N╱ // 0x1b1e @0x7
0x1b17…1b24 at0008 = ╱41╱A╱ // 0x1b1f @0x8
0x1b17…1b24 at0009 = ╱56╱V╱ // 0x1b20 @0x9
0x1b17…1b24 at000a = ╱4e╱N╱ // 0x1b21 @0xa
0x1b17…1b24 at000b = ╱ef╱$╱ // 0x1b22 @0xb
0x1b17…1b24 at000c = EOL // 0x1b23 @0xc
0x1b17…1b24 }
0x1b24…1b48 a89f 2690 PRINT TAB(8);STREG$(E:LEN(GLNAVN$))
0x1b24…1b48 LineComalBin {
0x1b24…1b48 ptr = 0xa89f // 0x1b24 @0x0
0x1b24…1b48 lno = 0x0a82 // 0x1b26 @0x2
0x1b24…1b48 at0004 = ╱92╱ PRINT ╱ // 0x1b28 @0x4
0x1b24…1b48 at0005 = ╱d2╱TAB╱ // 0x1b29 @0x5
0x1b24…1b48 at0006 = ╱ed╱(╱ // 0x1b2a @0x6
0x1b24…1b48 at0007 = ╱38╱8╱ // 0x1b2b @0x7
0x1b24…1b48 at0008 = ╱fe00008004╱ // 0x1b2c @0x8
0x1b24…1b48 at000d = ╱ee╱)╱ // 0x1b31 @0xd
0x1b24…1b48 at000e = ╱eb╱;╱ // 0x1b32 @0xe
0x1b24…1b48 at000f = ╱53╱S╱ // 0x1b33 @0xf
0x1b24…1b48 at0010 = ╱54╱T╱ // 0x1b34 @0x10
0x1b24…1b48 at0011 = ╱52╱R╱ // 0x1b35 @0x11
0x1b24…1b48 at0012 = ╱45╱E╱ // 0x1b36 @0x12
0x1b24…1b48 at0013 = ╱47╱G╱ // 0x1b37 @0x13
0x1b24…1b48 at0014 = ╱ef╱$╱ // 0x1b38 @0x14
0x1b24…1b48 at0015 = ╱ed╱(╱ // 0x1b39 @0x15
0x1b24…1b48 at0016 = ╱45╱E╱ // 0x1b3a @0x16
0x1b24…1b48 at0017 = ╱f0╱:╱ // 0x1b3b @0x17
0x1b24…1b48 at0018 = ╱cc╱LEN╱ // 0x1b3c @0x18
0x1b24…1b48 at0019 = ╱ed╱(╱ // 0x1b3d @0x19
0x1b24…1b48 at001a = ╱47╱G╱ // 0x1b3e @0x1a
0x1b24…1b48 at001b = ╱4c╱L╱ // 0x1b3f @0x1b
0x1b24…1b48 at001c = ╱4e╱N╱ // 0x1b40 @0x1c
0x1b24…1b48 at001d = ╱41╱A╱ // 0x1b41 @0x1d
0x1b24…1b48 at001e = ╱56╱V╱ // 0x1b42 @0x1e
0x1b24…1b48 at001f = ╱4e╱N╱ // 0x1b43 @0x1f
0x1b24…1b48 at0020 = ╱ef╱$╱ // 0x1b44 @0x20
0x1b24…1b48 at0021 = ╱ee╱)╱ // 0x1b45 @0x21
0x1b24…1b48 at0022 = ╱ee╱)╱ // 0x1b46 @0x22
0x1b24…1b48 at0023 = EOL // 0x1b47 @0x23
0x1b24…1b48 }
0x1b48…1b51 a8a8 2700 PRINT " "
0x1b48…1b51 LineComalBin {
0x1b48…1b51 ptr = 0xa8a8 // 0x1b48 @0x0
0x1b48…1b51 lno = 0x0a8c // 0x1b4a @0x2
0x1b48…1b51 at0004 = ╱92╱ PRINT ╱ // 0x1b4c @0x4
0x1b48…1b51 at0005 = ╱22╱"╱ // 0x1b4d @0x5
0x1b48…1b51 at0006 = ╱20╱…╱ // 0x1b4e @0x6
0x1b48…1b51 at0007 = ╱22╱"╱ // 0x1b4f @0x7
0x1b48…1b51 at0008 = EOL // 0x1b50 @0x8
0x1b48…1b51 }
0x1b51…1b68 a8bf 2710 LINIE=LINIE+5
0x1b51…1b68 LineComalBin {
0x1b51…1b68 ptr = 0xa8bf // 0x1b51 @0x0
0x1b51…1b68 lno = 0x0a96 // 0x1b53 @0x2
0x1b51…1b68 at0004 = ╱4c╱L╱ // 0x1b55 @0x4
0x1b51…1b68 at0005 = ╱49╱I╱ // 0x1b56 @0x5
0x1b51…1b68 at0006 = ╱4e╱N╱ // 0x1b57 @0x6
0x1b51…1b68 at0007 = ╱49╱I╱ // 0x1b58 @0x7
0x1b51…1b68 at0008 = ╱45╱E╱ // 0x1b59 @0x8
0x1b51…1b68 at0009 = ╱dc╱=╱ // 0x1b5a @0x9
0x1b51…1b68 at000a = ╱4c╱L╱ // 0x1b5b @0xa
0x1b51…1b68 at000b = ╱49╱I╱ // 0x1b5c @0xb
0x1b51…1b68 at000c = ╱4e╱N╱ // 0x1b5d @0xc
0x1b51…1b68 at000d = ╱49╱I╱ // 0x1b5e @0xd
0x1b51…1b68 at000e = ╱45╱E╱ // 0x1b5f @0xe
0x1b51…1b68 at000f = ╱e2╱+╱ // 0x1b60 @0xf
0x1b51…1b68 at0010 = ╱35╱5╱ // 0x1b61 @0x10
0x1b51…1b68 at0011 = ╱fe0000a003╱ // 0x1b62 @0x11
0x1b51…1b68 at0016 = EOL // 0x1b67 @0x16
0x1b51…1b68 }
0x1b68…1b6e a8c5 2720 ENDIF
0x1b68…1b6e LineComalBin {
0x1b68…1b6e ptr = 0xa8c5 // 0x1b68 @0x0
0x1b68…1b6e lno = 0x0aa0 // 0x1b6a @0x2
0x1b68…1b6e at0004 = ╱9b╱ ENDIF ╱ // 0x1b6c @0x4
0x1b68…1b6e at0005 = EOL // 0x1b6d @0x5
0x1b68…1b6e }
0x1b6e…1b76 a8cd 2730 WHEN V
0x1b6e…1b76 LineComalBin {
0x1b6e…1b76 ptr = 0xa8cd // 0x1b6e @0x0
0x1b6e…1b76 lno = 0x0aaa // 0x1b70 @0x2
0x1b6e…1b76 at0004 = ╱a301╱ WHEN ╱ // 0x1b72 @0x4
0x1b6e…1b76 at0006 = ╱56╱V╱ // 0x1b74 @0x6
0x1b6e…1b76 at0007 = EOL // 0x1b75 @0x7
0x1b6e…1b76 }
0x1b76…1ba6 a8fd 2740 IF LINIE>37 AND GFNR>B THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x1b76…1ba6 LineComalBin {
0x1b76…1ba6 ptr = 0xa8fd // 0x1b76 @0x0
0x1b76…1ba6 lno = 0x0ab4 // 0x1b78 @0x2
0x1b76…1ba6 at0004 = ╱82╱ IF ╱ // 0x1b7a @0x4
0x1b76…1ba6 at0005 = ╱4c╱L╱ // 0x1b7b @0x5
0x1b76…1ba6 at0006 = ╱49╱I╱ // 0x1b7c @0x6
0x1b76…1ba6 at0007 = ╱4e╱N╱ // 0x1b7d @0x7
0x1b76…1ba6 at0008 = ╱49╱I╱ // 0x1b7e @0x8
0x1b76…1ba6 at0009 = ╱45╱E╱ // 0x1b7f @0x9
0x1b76…1ba6 at000a = ╱de╱>╱ // 0x1b80 @0xa
0x1b76…1ba6 at000b = ╱33╱3╱ // 0x1b81 @0xb
0x1b76…1ba6 at000c = ╱37╱7╱ // 0x1b82 @0xc
0x1b76…1ba6 at000d = ╱fe00009406╱ // 0x1b83 @0xd
0x1b76…1ba6 at0012 = ╱da╱ AND ╱ // 0x1b88 @0x12
0x1b76…1ba6 at0013 = ╱47╱G╱ // 0x1b89 @0x13
0x1b76…1ba6 at0014 = ╱46╱F╱ // 0x1b8a @0x14
0x1b76…1ba6 at0015 = ╱4e╱N╱ // 0x1b8b @0x15
0x1b76…1ba6 at0016 = ╱52╱R╱ // 0x1b8c @0x16
0x1b76…1ba6 at0017 = ╱de╱>╱ // 0x1b8d @0x17
0x1b76…1ba6 at0018 = ╱42╱B╱ // 0x1b8e @0x18
0x1b76…1ba6 at0019 = ╱b6╱ THEN ╱ // 0x1b8f @0x19
0x1b76…1ba6 at001a = ╱9d╱ EXEC ╱ // 0x1b90 @0x1a
0x1b76…1ba6 at001b = ╱4e╱N╱ // 0x1b91 @0x1b
0x1b76…1ba6 at001c = ╱59╱Y╱ // 0x1b92 @0x1c
0x1b76…1ba6 at001d = ╱53╱S╱ // 0x1b93 @0x1d
0x1b76…1ba6 at001e = ╱49╱I╱ // 0x1b94 @0x1e
0x1b76…1ba6 at001f = ╱44╱D╱ // 0x1b95 @0x1f
0x1b76…1ba6 at0020 = ╱45╱E╱ // 0x1b96 @0x20
0x1b76…1ba6 at0021 = ╱ed╱(╱ // 0x1b97 @0x21
0x1b76…1ba6 at0022 = ╱47╱G╱ // 0x1b98 @0x22
0x1b76…1ba6 at0023 = ╱46╱F╱ // 0x1b99 @0x23
0x1b76…1ba6 at0024 = ╱4e╱N╱ // 0x1b9a @0x24
0x1b76…1ba6 at0025 = ╱52╱R╱ // 0x1b9b @0x25
0x1b76…1ba6 at0026 = ╱ec╱,╱ // 0x1b9c @0x26
0x1b76…1ba6 at0027 = ╱47╱G╱ // 0x1b9d @0x27
0x1b76…1ba6 at0028 = ╱4c╱L╱ // 0x1b9e @0x28
0x1b76…1ba6 at0029 = ╱4e╱N╱ // 0x1b9f @0x29
0x1b76…1ba6 at002a = ╱41╱A╱ // 0x1ba0 @0x2a
0x1b76…1ba6 at002b = ╱56╱V╱ // 0x1ba1 @0x2b
0x1b76…1ba6 at002c = ╱4e╱N╱ // 0x1ba2 @0x2c
0x1b76…1ba6 at002d = ╱ef╱$╱ // 0x1ba3 @0x2d
0x1b76…1ba6 at002e = ╱ee╱)╱ // 0x1ba4 @0x2e
0x1b76…1ba6 at002f = EOL // 0x1ba5 @0x2f
0x1b76…1ba6 }
0x1ba6…1bb3 a90a 2750 IF GFNR>B THEN
0x1ba6…1bb3 LineComalBin {
0x1ba6…1bb3 ptr = 0xa90a // 0x1ba6 @0x0
0x1ba6…1bb3 lno = 0x0abe // 0x1ba8 @0x2
0x1ba6…1bb3 at0004 = ╱9c╱ IF ╱ // 0x1baa @0x4
0x1ba6…1bb3 at0005 = ╱47╱G╱ // 0x1bab @0x5
0x1ba6…1bb3 at0006 = ╱46╱F╱ // 0x1bac @0x6
0x1ba6…1bb3 at0007 = ╱4e╱N╱ // 0x1bad @0x7
0x1ba6…1bb3 at0008 = ╱52╱R╱ // 0x1bae @0x8
0x1ba6…1bb3 at0009 = ╱de╱>╱ // 0x1baf @0x9
0x1ba6…1bb3 at000a = ╱42╱B╱ // 0x1bb0 @0xa
0x1ba6…1bb3 at000b = ╱b6╱ THEN ╱ // 0x1bb1 @0xb
0x1ba6…1bb3 at000c = EOL // 0x1bb2 @0xc
0x1ba6…1bb3 }
0x1bb3…1bbc a913 2760 PRINT " "
0x1bb3…1bbc LineComalBin {
0x1bb3…1bbc ptr = 0xa913 // 0x1bb3 @0x0
0x1bb3…1bbc lno = 0x0ac8 // 0x1bb5 @0x2
0x1bb3…1bbc at0004 = ╱92╱ PRINT ╱ // 0x1bb7 @0x4
0x1bb3…1bbc at0005 = ╱22╱"╱ // 0x1bb8 @0x5
0x1bb3…1bbc at0006 = ╱20╱…╱ // 0x1bb9 @0x6
0x1bb3…1bbc at0007 = ╱22╱"╱ // 0x1bba @0x7
0x1bb3…1bbc at0008 = EOL // 0x1bbb @0x8
0x1bb3…1bbc }
0x1bbc…1bdd a934 2770 PRINT TAB(8);STREG$(E:71)
0x1bbc…1bdd LineComalBin {
0x1bbc…1bdd ptr = 0xa934 // 0x1bbc @0x0
0x1bbc…1bdd lno = 0x0ad2 // 0x1bbe @0x2
0x1bbc…1bdd at0004 = ╱92╱ PRINT ╱ // 0x1bc0 @0x4
0x1bbc…1bdd at0005 = ╱d2╱TAB╱ // 0x1bc1 @0x5
0x1bbc…1bdd at0006 = ╱ed╱(╱ // 0x1bc2 @0x6
0x1bbc…1bdd at0007 = ╱38╱8╱ // 0x1bc3 @0x7
0x1bbc…1bdd at0008 = ╱fe00008004╱ // 0x1bc4 @0x8
0x1bbc…1bdd at000d = ╱ee╱)╱ // 0x1bc9 @0xd
0x1bbc…1bdd at000e = ╱eb╱;╱ // 0x1bca @0xe
0x1bbc…1bdd at000f = ╱53╱S╱ // 0x1bcb @0xf
0x1bbc…1bdd at0010 = ╱54╱T╱ // 0x1bcc @0x10
0x1bbc…1bdd at0011 = ╱52╱R╱ // 0x1bcd @0x11
0x1bbc…1bdd at0012 = ╱45╱E╱ // 0x1bce @0x12
0x1bbc…1bdd at0013 = ╱47╱G╱ // 0x1bcf @0x13
0x1bbc…1bdd at0014 = ╱ef╱$╱ // 0x1bd0 @0x14
0x1bbc…1bdd at0015 = ╱ed╱(╱ // 0x1bd1 @0x15
0x1bbc…1bdd at0016 = ╱45╱E╱ // 0x1bd2 @0x16
0x1bbc…1bdd at0017 = ╱f0╱:╱ // 0x1bd3 @0x17
0x1bbc…1bdd at0018 = ╱37╱7╱ // 0x1bd4 @0x18
0x1bbc…1bdd at0019 = ╱31╱1╱ // 0x1bd5 @0x19
0x1bbc…1bdd at001a = ╱fe00008e07╱ // 0x1bd6 @0x1a
0x1bbc…1bdd at001f = ╱ee╱)╱ // 0x1bdb @0x1f
0x1bbc…1bdd at0020 = EOL // 0x1bdc @0x20
0x1bbc…1bdd }
0x1bdd…1c01 a958 2780 EXEC LINIEUD(GFNR,GLNAVN$,SALDO12$)
0x1bdd…1c01 LineComalBin {
0x1bdd…1c01 ptr = 0xa958 // 0x1bdd @0x0
0x1bdd…1c01 lno = 0x0adc // 0x1bdf @0x2
0x1bdd…1c01 at0004 = ╱9d╱ EXEC ╱ // 0x1be1 @0x4
0x1bdd…1c01 at0005 = ╱4c╱L╱ // 0x1be2 @0x5
0x1bdd…1c01 at0006 = ╱49╱I╱ // 0x1be3 @0x6
0x1bdd…1c01 at0007 = ╱4e╱N╱ // 0x1be4 @0x7
0x1bdd…1c01 at0008 = ╱49╱I╱ // 0x1be5 @0x8
0x1bdd…1c01 at0009 = ╱45╱E╱ // 0x1be6 @0x9
0x1bdd…1c01 at000a = ╱55╱U╱ // 0x1be7 @0xa
0x1bdd…1c01 at000b = ╱44╱D╱ // 0x1be8 @0xb
0x1bdd…1c01 at000c = ╱ed╱(╱ // 0x1be9 @0xc
0x1bdd…1c01 at000d = ╱47╱G╱ // 0x1bea @0xd
0x1bdd…1c01 at000e = ╱46╱F╱ // 0x1beb @0xe
0x1bdd…1c01 at000f = ╱4e╱N╱ // 0x1bec @0xf
0x1bdd…1c01 at0010 = ╱52╱R╱ // 0x1bed @0x10
0x1bdd…1c01 at0011 = ╱ec╱,╱ // 0x1bee @0x11
0x1bdd…1c01 at0012 = ╱47╱G╱ // 0x1bef @0x12
0x1bdd…1c01 at0013 = ╱4c╱L╱ // 0x1bf0 @0x13
0x1bdd…1c01 at0014 = ╱4e╱N╱ // 0x1bf1 @0x14
0x1bdd…1c01 at0015 = ╱41╱A╱ // 0x1bf2 @0x15
0x1bdd…1c01 at0016 = ╱56╱V╱ // 0x1bf3 @0x16
0x1bdd…1c01 at0017 = ╱4e╱N╱ // 0x1bf4 @0x17
0x1bdd…1c01 at0018 = ╱ef╱$╱ // 0x1bf5 @0x18
0x1bdd…1c01 at0019 = ╱ec╱,╱ // 0x1bf6 @0x19
0x1bdd…1c01 at001a = ╱53╱S╱ // 0x1bf7 @0x1a
0x1bdd…1c01 at001b = ╱41╱A╱ // 0x1bf8 @0x1b
0x1bdd…1c01 at001c = ╱4c╱L╱ // 0x1bf9 @0x1c
0x1bdd…1c01 at001d = ╱44╱D╱ // 0x1bfa @0x1d
0x1bdd…1c01 at001e = ╱4f╱O╱ // 0x1bfb @0x1e
0x1bdd…1c01 at001f = ╱31╱1╱ // 0x1bfc @0x1f
0x1bdd…1c01 at0020 = ╱32╱2╱ // 0x1bfd @0x20
0x1bdd…1c01 at0021 = ╱ef╱$╱ // 0x1bfe @0x21
0x1bdd…1c01 at0022 = ╱ee╱)╱ // 0x1bff @0x22
0x1bdd…1c01 at0023 = EOL // 0x1c00 @0x23
0x1bdd…1c01 }
0x1c01…1c28 a97f 2790 SALDO12$="0+";LINIE=LINIE+V;GFNR=B
0x1c01…1c28 LineComalBin {
0x1c01…1c28 ptr = 0xa97f // 0x1c01 @0x0
0x1c01…1c28 lno = 0x0ae6 // 0x1c03 @0x2
0x1c01…1c28 at0004 = ╱53╱S╱ // 0x1c05 @0x4
0x1c01…1c28 at0005 = ╱41╱A╱ // 0x1c06 @0x5
0x1c01…1c28 at0006 = ╱4c╱L╱ // 0x1c07 @0x6
0x1c01…1c28 at0007 = ╱44╱D╱ // 0x1c08 @0x7
0x1c01…1c28 at0008 = ╱4f╱O╱ // 0x1c09 @0x8
0x1c01…1c28 at0009 = ╱31╱1╱ // 0x1c0a @0x9
0x1c01…1c28 at000a = ╱32╱2╱ // 0x1c0b @0xa
0x1c01…1c28 at000b = ╱ef╱$╱ // 0x1c0c @0xb
0x1c01…1c28 at000c = ╱dc╱=╱ // 0x1c0d @0xc
0x1c01…1c28 at000d = ╱22╱"╱ // 0x1c0e @0xd
0x1c01…1c28 at000e = ╱30╱0╱ // 0x1c0f @0xe
0x1c01…1c28 at000f = ╱2b╱+╱ // 0x1c10 @0xf
0x1c01…1c28 at0010 = ╱22╱"╱ // 0x1c11 @0x10
0x1c01…1c28 at0011 = ╱eb╱;╱ // 0x1c12 @0x11
0x1c01…1c28 at0012 = ╱4c╱L╱ // 0x1c13 @0x12
0x1c01…1c28 at0013 = ╱49╱I╱ // 0x1c14 @0x13
0x1c01…1c28 at0014 = ╱4e╱N╱ // 0x1c15 @0x14
0x1c01…1c28 at0015 = ╱49╱I╱ // 0x1c16 @0x15
0x1c01…1c28 at0016 = ╱45╱E╱ // 0x1c17 @0x16
0x1c01…1c28 at0017 = ╱dc╱=╱ // 0x1c18 @0x17
0x1c01…1c28 at0018 = ╱4c╱L╱ // 0x1c19 @0x18
0x1c01…1c28 at0019 = ╱49╱I╱ // 0x1c1a @0x19
0x1c01…1c28 at001a = ╱4e╱N╱ // 0x1c1b @0x1a
0x1c01…1c28 at001b = ╱49╱I╱ // 0x1c1c @0x1b
0x1c01…1c28 at001c = ╱45╱E╱ // 0x1c1d @0x1c
0x1c01…1c28 at001d = ╱e2╱+╱ // 0x1c1e @0x1d
0x1c01…1c28 at001e = ╱56╱V╱ // 0x1c1f @0x1e
0x1c01…1c28 at001f = ╱eb╱;╱ // 0x1c20 @0x1f
0x1c01…1c28 at0020 = ╱47╱G╱ // 0x1c21 @0x20
0x1c01…1c28 at0021 = ╱46╱F╱ // 0x1c22 @0x21
0x1c01…1c28 at0022 = ╱4e╱N╱ // 0x1c23 @0x22
0x1c01…1c28 at0023 = ╱52╱R╱ // 0x1c24 @0x23
0x1c01…1c28 at0024 = ╱dc╱=╱ // 0x1c25 @0x24
0x1c01…1c28 at0025 = ╱42╱B╱ // 0x1c26 @0x25
0x1c01…1c28 at0026 = EOL // 0x1c27 @0x26
0x1c01…1c28 }
0x1c28…1c2e a985 2800 ENDIF
0x1c28…1c2e LineComalBin {
0x1c28…1c2e ptr = 0xa985 // 0x1c28 @0x0
0x1c28…1c2e lno = 0x0af0 // 0x1c2a @0x2
0x1c28…1c2e at0004 = ╱9b╱ ENDIF ╱ // 0x1c2c @0x4
0x1c28…1c2e at0005 = EOL // 0x1c2d @0x5
0x1c28…1c2e }
0x1c2e…1c57 a9ae 2810 IF LINIE>36 THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x1c2e…1c57 LineComalBin {
0x1c2e…1c57 ptr = 0xa9ae // 0x1c2e @0x0
0x1c2e…1c57 lno = 0x0afa // 0x1c30 @0x2
0x1c2e…1c57 at0004 = ╱82╱ IF ╱ // 0x1c32 @0x4
0x1c2e…1c57 at0005 = ╱4c╱L╱ // 0x1c33 @0x5
0x1c2e…1c57 at0006 = ╱49╱I╱ // 0x1c34 @0x6
0x1c2e…1c57 at0007 = ╱4e╱N╱ // 0x1c35 @0x7
0x1c2e…1c57 at0008 = ╱49╱I╱ // 0x1c36 @0x8
0x1c2e…1c57 at0009 = ╱45╱E╱ // 0x1c37 @0x9
0x1c2e…1c57 at000a = ╱de╱>╱ // 0x1c38 @0xa
0x1c2e…1c57 at000b = ╱33╱3╱ // 0x1c39 @0xb
0x1c2e…1c57 at000c = ╱36╱6╱ // 0x1c3a @0xc
0x1c2e…1c57 at000d = ╱fe00009006╱ // 0x1c3b @0xd
0x1c2e…1c57 at0012 = ╱b6╱ THEN ╱ // 0x1c40 @0x12
0x1c2e…1c57 at0013 = ╱9d╱ EXEC ╱ // 0x1c41 @0x13
0x1c2e…1c57 at0014 = ╱4e╱N╱ // 0x1c42 @0x14
0x1c2e…1c57 at0015 = ╱59╱Y╱ // 0x1c43 @0x15
0x1c2e…1c57 at0016 = ╱53╱S╱ // 0x1c44 @0x16
0x1c2e…1c57 at0017 = ╱49╱I╱ // 0x1c45 @0x17
0x1c2e…1c57 at0018 = ╱44╱D╱ // 0x1c46 @0x18
0x1c2e…1c57 at0019 = ╱45╱E╱ // 0x1c47 @0x19
0x1c2e…1c57 at001a = ╱ed╱(╱ // 0x1c48 @0x1a
0x1c2e…1c57 at001b = ╱47╱G╱ // 0x1c49 @0x1b
0x1c2e…1c57 at001c = ╱46╱F╱ // 0x1c4a @0x1c
0x1c2e…1c57 at001d = ╱4e╱N╱ // 0x1c4b @0x1d
0x1c2e…1c57 at001e = ╱52╱R╱ // 0x1c4c @0x1e
0x1c2e…1c57 at001f = ╱ec╱,╱ // 0x1c4d @0x1f
0x1c2e…1c57 at0020 = ╱47╱G╱ // 0x1c4e @0x20
0x1c2e…1c57 at0021 = ╱4c╱L╱ // 0x1c4f @0x21
0x1c2e…1c57 at0022 = ╱4e╱N╱ // 0x1c50 @0x22
0x1c2e…1c57 at0023 = ╱41╱A╱ // 0x1c51 @0x23
0x1c2e…1c57 at0024 = ╱56╱V╱ // 0x1c52 @0x24
0x1c2e…1c57 at0025 = ╱4e╱N╱ // 0x1c53 @0x25
0x1c2e…1c57 at0026 = ╱ef╱$╱ // 0x1c54 @0x26
0x1c2e…1c57 at0027 = ╱ee╱)╱ // 0x1c55 @0x27
0x1c2e…1c57 at0028 = EOL // 0x1c56 @0x28
0x1c2e…1c57 }
0x1c57…1c60 a9b7 2820 PRINT " "
0x1c57…1c60 LineComalBin {
0x1c57…1c60 ptr = 0xa9b7 // 0x1c57 @0x0
0x1c57…1c60 lno = 0x0b04 // 0x1c59 @0x2
0x1c57…1c60 at0004 = ╱92╱ PRINT ╱ // 0x1c5b @0x4
0x1c57…1c60 at0005 = ╱22╱"╱ // 0x1c5c @0x5
0x1c57…1c60 at0006 = ╱20╱…╱ // 0x1c5d @0x6
0x1c57…1c60 at0007 = ╱22╱"╱ // 0x1c5e @0x7
0x1c57…1c60 at0008 = EOL // 0x1c5f @0x8
0x1c57…1c60 }
0x1c60…1c81 a9d8 2830 PRINT TAB(8);STREG$(E:71)
0x1c60…1c81 LineComalBin {
0x1c60…1c81 ptr = 0xa9d8 // 0x1c60 @0x0
0x1c60…1c81 lno = 0x0b0e // 0x1c62 @0x2
0x1c60…1c81 at0004 = ╱92╱ PRINT ╱ // 0x1c64 @0x4
0x1c60…1c81 at0005 = ╱d2╱TAB╱ // 0x1c65 @0x5
0x1c60…1c81 at0006 = ╱ed╱(╱ // 0x1c66 @0x6
0x1c60…1c81 at0007 = ╱38╱8╱ // 0x1c67 @0x7
0x1c60…1c81 at0008 = ╱fe00008004╱ // 0x1c68 @0x8
0x1c60…1c81 at000d = ╱ee╱)╱ // 0x1c6d @0xd
0x1c60…1c81 at000e = ╱eb╱;╱ // 0x1c6e @0xe
0x1c60…1c81 at000f = ╱53╱S╱ // 0x1c6f @0xf
0x1c60…1c81 at0010 = ╱54╱T╱ // 0x1c70 @0x10
0x1c60…1c81 at0011 = ╱52╱R╱ // 0x1c71 @0x11
0x1c60…1c81 at0012 = ╱45╱E╱ // 0x1c72 @0x12
0x1c60…1c81 at0013 = ╱47╱G╱ // 0x1c73 @0x13
0x1c60…1c81 at0014 = ╱ef╱$╱ // 0x1c74 @0x14
0x1c60…1c81 at0015 = ╱ed╱(╱ // 0x1c75 @0x15
0x1c60…1c81 at0016 = ╱45╱E╱ // 0x1c76 @0x16
0x1c60…1c81 at0017 = ╱f0╱:╱ // 0x1c77 @0x17
0x1c60…1c81 at0018 = ╱37╱7╱ // 0x1c78 @0x18
0x1c60…1c81 at0019 = ╱31╱1╱ // 0x1c79 @0x19
0x1c60…1c81 at001a = ╱fe00008e07╱ // 0x1c7a @0x1a
0x1c60…1c81 at001f = ╱ee╱)╱ // 0x1c7f @0x1f
0x1c60…1c81 at0020 = EOL // 0x1c80 @0x20
0x1c60…1c81 }
0x1c81…1ca3 a9fa 2840 EXEC LINIEUD(FNR,FNAVN$,SALDO13$)
0x1c81…1ca3 LineComalBin {
0x1c81…1ca3 ptr = 0xa9fa // 0x1c81 @0x0
0x1c81…1ca3 lno = 0x0b18 // 0x1c83 @0x2
0x1c81…1ca3 at0004 = ╱9d╱ EXEC ╱ // 0x1c85 @0x4
0x1c81…1ca3 at0005 = ╱4c╱L╱ // 0x1c86 @0x5
0x1c81…1ca3 at0006 = ╱49╱I╱ // 0x1c87 @0x6
0x1c81…1ca3 at0007 = ╱4e╱N╱ // 0x1c88 @0x7
0x1c81…1ca3 at0008 = ╱49╱I╱ // 0x1c89 @0x8
0x1c81…1ca3 at0009 = ╱45╱E╱ // 0x1c8a @0x9
0x1c81…1ca3 at000a = ╱55╱U╱ // 0x1c8b @0xa
0x1c81…1ca3 at000b = ╱44╱D╱ // 0x1c8c @0xb
0x1c81…1ca3 at000c = ╱ed╱(╱ // 0x1c8d @0xc
0x1c81…1ca3 at000d = ╱46╱F╱ // 0x1c8e @0xd
0x1c81…1ca3 at000e = ╱4e╱N╱ // 0x1c8f @0xe
0x1c81…1ca3 at000f = ╱52╱R╱ // 0x1c90 @0xf
0x1c81…1ca3 at0010 = ╱ec╱,╱ // 0x1c91 @0x10
0x1c81…1ca3 at0011 = ╱46╱F╱ // 0x1c92 @0x11
0x1c81…1ca3 at0012 = ╱4e╱N╱ // 0x1c93 @0x12
0x1c81…1ca3 at0013 = ╱41╱A╱ // 0x1c94 @0x13
0x1c81…1ca3 at0014 = ╱56╱V╱ // 0x1c95 @0x14
0x1c81…1ca3 at0015 = ╱4e╱N╱ // 0x1c96 @0x15
0x1c81…1ca3 at0016 = ╱ef╱$╱ // 0x1c97 @0x16
0x1c81…1ca3 at0017 = ╱ec╱,╱ // 0x1c98 @0x17
0x1c81…1ca3 at0018 = ╱53╱S╱ // 0x1c99 @0x18
0x1c81…1ca3 at0019 = ╱41╱A╱ // 0x1c9a @0x19
0x1c81…1ca3 at001a = ╱4c╱L╱ // 0x1c9b @0x1a
0x1c81…1ca3 at001b = ╱44╱D╱ // 0x1c9c @0x1b
0x1c81…1ca3 at001c = ╱4f╱O╱ // 0x1c9d @0x1c
0x1c81…1ca3 at001d = ╱31╱1╱ // 0x1c9e @0x1d
0x1c81…1ca3 at001e = ╱33╱3╱ // 0x1c9f @0x1e
0x1c81…1ca3 at001f = ╱ef╱$╱ // 0x1ca0 @0x1f
0x1c81…1ca3 at0020 = ╱ee╱)╱ // 0x1ca1 @0x20
0x1c81…1ca3 at0021 = EOL // 0x1ca2 @0x21
0x1c81…1ca3 }
0x1ca3…1cb5 aa0c 2850 SALDO11$="0+"
0x1ca3…1cb5 LineComalBin {
0x1ca3…1cb5 ptr = 0xaa0c // 0x1ca3 @0x0
0x1ca3…1cb5 lno = 0x0b22 // 0x1ca5 @0x2
0x1ca3…1cb5 at0004 = ╱53╱S╱ // 0x1ca7 @0x4
0x1ca3…1cb5 at0005 = ╱41╱A╱ // 0x1ca8 @0x5
0x1ca3…1cb5 at0006 = ╱4c╱L╱ // 0x1ca9 @0x6
0x1ca3…1cb5 at0007 = ╱44╱D╱ // 0x1caa @0x7
0x1ca3…1cb5 at0008 = ╱4f╱O╱ // 0x1cab @0x8
0x1ca3…1cb5 at0009 = ╱31╱1╱ // 0x1cac @0x9
0x1ca3…1cb5 at000a = ╱31╱1╱ // 0x1cad @0xa
0x1ca3…1cb5 at000b = ╱ef╱$╱ // 0x1cae @0xb
0x1ca3…1cb5 at000c = ╱dc╱=╱ // 0x1caf @0xc
0x1ca3…1cb5 at000d = ╱22╱"╱ // 0x1cb0 @0xd
0x1ca3…1cb5 at000e = ╱30╱0╱ // 0x1cb1 @0xe
0x1ca3…1cb5 at000f = ╱2b╱+╱ // 0x1cb2 @0xf
0x1ca3…1cb5 at0010 = ╱22╱"╱ // 0x1cb3 @0x10
0x1ca3…1cb5 at0011 = EOL // 0x1cb4 @0x11
0x1ca3…1cb5 }
0x1cb5…1cd6 aa2d 2860 PRINT TAB(8);STREG$(E:71)
0x1cb5…1cd6 LineComalBin {
0x1cb5…1cd6 ptr = 0xaa2d // 0x1cb5 @0x0
0x1cb5…1cd6 lno = 0x0b2c // 0x1cb7 @0x2
0x1cb5…1cd6 at0004 = ╱92╱ PRINT ╱ // 0x1cb9 @0x4
0x1cb5…1cd6 at0005 = ╱d2╱TAB╱ // 0x1cba @0x5
0x1cb5…1cd6 at0006 = ╱ed╱(╱ // 0x1cbb @0x6
0x1cb5…1cd6 at0007 = ╱38╱8╱ // 0x1cbc @0x7
0x1cb5…1cd6 at0008 = ╱fe00008004╱ // 0x1cbd @0x8
0x1cb5…1cd6 at000d = ╱ee╱)╱ // 0x1cc2 @0xd
0x1cb5…1cd6 at000e = ╱eb╱;╱ // 0x1cc3 @0xe
0x1cb5…1cd6 at000f = ╱53╱S╱ // 0x1cc4 @0xf
0x1cb5…1cd6 at0010 = ╱54╱T╱ // 0x1cc5 @0x10
0x1cb5…1cd6 at0011 = ╱52╱R╱ // 0x1cc6 @0x11
0x1cb5…1cd6 at0012 = ╱45╱E╱ // 0x1cc7 @0x12
0x1cb5…1cd6 at0013 = ╱47╱G╱ // 0x1cc8 @0x13
0x1cb5…1cd6 at0014 = ╱ef╱$╱ // 0x1cc9 @0x14
0x1cb5…1cd6 at0015 = ╱ed╱(╱ // 0x1cca @0x15
0x1cb5…1cd6 at0016 = ╱45╱E╱ // 0x1ccb @0x16
0x1cb5…1cd6 at0017 = ╱f0╱:╱ // 0x1ccc @0x17
0x1cb5…1cd6 at0018 = ╱37╱7╱ // 0x1ccd @0x18
0x1cb5…1cd6 at0019 = ╱31╱1╱ // 0x1cce @0x19
0x1cb5…1cd6 at001a = ╱fe00008e07╱ // 0x1ccf @0x1a
0x1cb5…1cd6 at001f = ╱ee╱)╱ // 0x1cd4 @0x1f
0x1cb5…1cd6 at0020 = EOL // 0x1cd5 @0x20
0x1cb5…1cd6 }
0x1cd6…1cdf aa36 2870 PRINT " "
0x1cd6…1cdf LineComalBin {
0x1cd6…1cdf ptr = 0xaa36 // 0x1cd6 @0x0
0x1cd6…1cdf lno = 0x0b36 // 0x1cd8 @0x2
0x1cd6…1cdf at0004 = ╱92╱ PRINT ╱ // 0x1cda @0x4
0x1cd6…1cdf at0005 = ╱22╱"╱ // 0x1cdb @0x5
0x1cd6…1cdf at0006 = ╱20╱…╱ // 0x1cdc @0x6
0x1cd6…1cdf at0007 = ╱22╱"╱ // 0x1cdd @0x7
0x1cd6…1cdf at0008 = EOL // 0x1cde @0x8
0x1cd6…1cdf }
0x1cdf…1cf6 aa4d 2880 LINIE=LINIE+5
0x1cdf…1cf6 LineComalBin {
0x1cdf…1cf6 ptr = 0xaa4d // 0x1cdf @0x0
0x1cdf…1cf6 lno = 0x0b40 // 0x1ce1 @0x2
0x1cdf…1cf6 at0004 = ╱4c╱L╱ // 0x1ce3 @0x4
0x1cdf…1cf6 at0005 = ╱49╱I╱ // 0x1ce4 @0x5
0x1cdf…1cf6 at0006 = ╱4e╱N╱ // 0x1ce5 @0x6
0x1cdf…1cf6 at0007 = ╱49╱I╱ // 0x1ce6 @0x7
0x1cdf…1cf6 at0008 = ╱45╱E╱ // 0x1ce7 @0x8
0x1cdf…1cf6 at0009 = ╱dc╱=╱ // 0x1ce8 @0x9
0x1cdf…1cf6 at000a = ╱4c╱L╱ // 0x1ce9 @0xa
0x1cdf…1cf6 at000b = ╱49╱I╱ // 0x1cea @0xb
0x1cdf…1cf6 at000c = ╱4e╱N╱ // 0x1ceb @0xc
0x1cdf…1cf6 at000d = ╱49╱I╱ // 0x1cec @0xd
0x1cdf…1cf6 at000e = ╱45╱E╱ // 0x1ced @0xe
0x1cdf…1cf6 at000f = ╱e2╱+╱ // 0x1cee @0xf
0x1cdf…1cf6 at0010 = ╱35╱5╱ // 0x1cef @0x10
0x1cdf…1cf6 at0011 = ╱fe0000a003╱ // 0x1cf0 @0x11
0x1cdf…1cf6 at0016 = EOL // 0x1cf5 @0x16
0x1cdf…1cf6 }
0x1cf6…1d03 aa5a 2890 WHEN 4
0x1cf6…1d03 LineComalBin {
0x1cf6…1d03 ptr = 0xaa5a // 0x1cf6 @0x0
0x1cf6…1d03 lno = 0x0b4a // 0x1cf8 @0x2
0x1cf6…1d03 at0004 = ╱a301╱ WHEN ╱ // 0x1cfa @0x4
0x1cf6…1d03 at0006 = ╱34╱4╱ // 0x1cfc @0x6
0x1cf6…1d03 at0007 = ╱fe00008003╱ // 0x1cfd @0x7
0x1cf6…1d03 at000c = EOL // 0x1d02 @0xc
0x1cf6…1d03 }
0x1d03…1d10 aa67 2900 IF GFNR>B THEN
0x1d03…1d10 LineComalBin {
0x1d03…1d10 ptr = 0xaa67 // 0x1d03 @0x0
0x1d03…1d10 lno = 0x0b54 // 0x1d05 @0x2
0x1d03…1d10 at0004 = ╱9c╱ IF ╱ // 0x1d07 @0x4
0x1d03…1d10 at0005 = ╱47╱G╱ // 0x1d08 @0x5
0x1d03…1d10 at0006 = ╱46╱F╱ // 0x1d09 @0x6
0x1d03…1d10 at0007 = ╱4e╱N╱ // 0x1d0a @0x7
0x1d03…1d10 at0008 = ╱52╱R╱ // 0x1d0b @0x8
0x1d03…1d10 at0009 = ╱de╱>╱ // 0x1d0c @0x9
0x1d03…1d10 at000a = ╱42╱B╱ // 0x1d0d @0xa
0x1d03…1d10 at000b = ╱b6╱ THEN ╱ // 0x1d0e @0xb
0x1d03…1d10 at000c = EOL // 0x1d0f @0xc
0x1d03…1d10 }
0x1d10…1d39 aa90 2910 IF LINIE>37 THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x1d10…1d39 LineComalBin {
0x1d10…1d39 ptr = 0xaa90 // 0x1d10 @0x0
0x1d10…1d39 lno = 0x0b5e // 0x1d12 @0x2
0x1d10…1d39 at0004 = ╱82╱ IF ╱ // 0x1d14 @0x4
0x1d10…1d39 at0005 = ╱4c╱L╱ // 0x1d15 @0x5
0x1d10…1d39 at0006 = ╱49╱I╱ // 0x1d16 @0x6
0x1d10…1d39 at0007 = ╱4e╱N╱ // 0x1d17 @0x7
0x1d10…1d39 at0008 = ╱49╱I╱ // 0x1d18 @0x8
0x1d10…1d39 at0009 = ╱45╱E╱ // 0x1d19 @0x9
0x1d10…1d39 at000a = ╱de╱>╱ // 0x1d1a @0xa
0x1d10…1d39 at000b = ╱33╱3╱ // 0x1d1b @0xb
0x1d10…1d39 at000c = ╱37╱7╱ // 0x1d1c @0xc
0x1d10…1d39 at000d = ╱fe00009406╱ // 0x1d1d @0xd
0x1d10…1d39 at0012 = ╱b6╱ THEN ╱ // 0x1d22 @0x12
0x1d10…1d39 at0013 = ╱9d╱ EXEC ╱ // 0x1d23 @0x13
0x1d10…1d39 at0014 = ╱4e╱N╱ // 0x1d24 @0x14
0x1d10…1d39 at0015 = ╱59╱Y╱ // 0x1d25 @0x15
0x1d10…1d39 at0016 = ╱53╱S╱ // 0x1d26 @0x16
0x1d10…1d39 at0017 = ╱49╱I╱ // 0x1d27 @0x17
0x1d10…1d39 at0018 = ╱44╱D╱ // 0x1d28 @0x18
0x1d10…1d39 at0019 = ╱45╱E╱ // 0x1d29 @0x19
0x1d10…1d39 at001a = ╱ed╱(╱ // 0x1d2a @0x1a
0x1d10…1d39 at001b = ╱47╱G╱ // 0x1d2b @0x1b
0x1d10…1d39 at001c = ╱46╱F╱ // 0x1d2c @0x1c
0x1d10…1d39 at001d = ╱4e╱N╱ // 0x1d2d @0x1d
0x1d10…1d39 at001e = ╱52╱R╱ // 0x1d2e @0x1e
0x1d10…1d39 at001f = ╱ec╱,╱ // 0x1d2f @0x1f
0x1d10…1d39 at0020 = ╱47╱G╱ // 0x1d30 @0x20
0x1d10…1d39 at0021 = ╱4c╱L╱ // 0x1d31 @0x21
0x1d10…1d39 at0022 = ╱4e╱N╱ // 0x1d32 @0x22
0x1d10…1d39 at0023 = ╱41╱A╱ // 0x1d33 @0x23
0x1d10…1d39 at0024 = ╱56╱V╱ // 0x1d34 @0x24
0x1d10…1d39 at0025 = ╱4e╱N╱ // 0x1d35 @0x25
0x1d10…1d39 at0026 = ╱ef╱$╱ // 0x1d36 @0x26
0x1d10…1d39 at0027 = ╱ee╱)╱ // 0x1d37 @0x27
0x1d10…1d39 at0028 = EOL // 0x1d38 @0x28
0x1d10…1d39 }
0x1d39…1d42 aa99 2920 PRINT " "
0x1d39…1d42 LineComalBin {
0x1d39…1d42 ptr = 0xaa99 // 0x1d39 @0x0
0x1d39…1d42 lno = 0x0b68 // 0x1d3b @0x2
0x1d39…1d42 at0004 = ╱92╱ PRINT ╱ // 0x1d3d @0x4
0x1d39…1d42 at0005 = ╱22╱"╱ // 0x1d3e @0x5
0x1d39…1d42 at0006 = ╱20╱…╱ // 0x1d3f @0x6
0x1d39…1d42 at0007 = ╱22╱"╱ // 0x1d40 @0x7
0x1d39…1d42 at0008 = EOL // 0x1d41 @0x8
0x1d39…1d42 }
0x1d42…1d63 aaba 2930 PRINT TAB(8);STREG$(E:71)
0x1d42…1d63 LineComalBin {
0x1d42…1d63 ptr = 0xaaba // 0x1d42 @0x0
0x1d42…1d63 lno = 0x0b72 // 0x1d44 @0x2
0x1d42…1d63 at0004 = ╱92╱ PRINT ╱ // 0x1d46 @0x4
0x1d42…1d63 at0005 = ╱d2╱TAB╱ // 0x1d47 @0x5
0x1d42…1d63 at0006 = ╱ed╱(╱ // 0x1d48 @0x6
0x1d42…1d63 at0007 = ╱38╱8╱ // 0x1d49 @0x7
0x1d42…1d63 at0008 = ╱fe00008004╱ // 0x1d4a @0x8
0x1d42…1d63 at000d = ╱ee╱)╱ // 0x1d4f @0xd
0x1d42…1d63 at000e = ╱eb╱;╱ // 0x1d50 @0xe
0x1d42…1d63 at000f = ╱53╱S╱ // 0x1d51 @0xf
0x1d42…1d63 at0010 = ╱54╱T╱ // 0x1d52 @0x10
0x1d42…1d63 at0011 = ╱52╱R╱ // 0x1d53 @0x11
0x1d42…1d63 at0012 = ╱45╱E╱ // 0x1d54 @0x12
0x1d42…1d63 at0013 = ╱47╱G╱ // 0x1d55 @0x13
0x1d42…1d63 at0014 = ╱ef╱$╱ // 0x1d56 @0x14
0x1d42…1d63 at0015 = ╱ed╱(╱ // 0x1d57 @0x15
0x1d42…1d63 at0016 = ╱45╱E╱ // 0x1d58 @0x16
0x1d42…1d63 at0017 = ╱f0╱:╱ // 0x1d59 @0x17
0x1d42…1d63 at0018 = ╱37╱7╱ // 0x1d5a @0x18
0x1d42…1d63 at0019 = ╱31╱1╱ // 0x1d5b @0x19
0x1d42…1d63 at001a = ╱fe00008e07╱ // 0x1d5c @0x1a
0x1d42…1d63 at001f = ╱ee╱)╱ // 0x1d61 @0x1f
0x1d42…1d63 at0020 = EOL // 0x1d62 @0x20
0x1d42…1d63 }
0x1d63…1d87 aade 2940 EXEC LINIEUD(GFNR,GLNAVN$,SALDO12$)
0x1d63…1d87 LineComalBin {
0x1d63…1d87 ptr = 0xaade // 0x1d63 @0x0
0x1d63…1d87 lno = 0x0b7c // 0x1d65 @0x2
0x1d63…1d87 at0004 = ╱9d╱ EXEC ╱ // 0x1d67 @0x4
0x1d63…1d87 at0005 = ╱4c╱L╱ // 0x1d68 @0x5
0x1d63…1d87 at0006 = ╱49╱I╱ // 0x1d69 @0x6
0x1d63…1d87 at0007 = ╱4e╱N╱ // 0x1d6a @0x7
0x1d63…1d87 at0008 = ╱49╱I╱ // 0x1d6b @0x8
0x1d63…1d87 at0009 = ╱45╱E╱ // 0x1d6c @0x9
0x1d63…1d87 at000a = ╱55╱U╱ // 0x1d6d @0xa
0x1d63…1d87 at000b = ╱44╱D╱ // 0x1d6e @0xb
0x1d63…1d87 at000c = ╱ed╱(╱ // 0x1d6f @0xc
0x1d63…1d87 at000d = ╱47╱G╱ // 0x1d70 @0xd
0x1d63…1d87 at000e = ╱46╱F╱ // 0x1d71 @0xe
0x1d63…1d87 at000f = ╱4e╱N╱ // 0x1d72 @0xf
0x1d63…1d87 at0010 = ╱52╱R╱ // 0x1d73 @0x10
0x1d63…1d87 at0011 = ╱ec╱,╱ // 0x1d74 @0x11
0x1d63…1d87 at0012 = ╱47╱G╱ // 0x1d75 @0x12
0x1d63…1d87 at0013 = ╱4c╱L╱ // 0x1d76 @0x13
0x1d63…1d87 at0014 = ╱4e╱N╱ // 0x1d77 @0x14
0x1d63…1d87 at0015 = ╱41╱A╱ // 0x1d78 @0x15
0x1d63…1d87 at0016 = ╱56╱V╱ // 0x1d79 @0x16
0x1d63…1d87 at0017 = ╱4e╱N╱ // 0x1d7a @0x17
0x1d63…1d87 at0018 = ╱ef╱$╱ // 0x1d7b @0x18
0x1d63…1d87 at0019 = ╱ec╱,╱ // 0x1d7c @0x19
0x1d63…1d87 at001a = ╱53╱S╱ // 0x1d7d @0x1a
0x1d63…1d87 at001b = ╱41╱A╱ // 0x1d7e @0x1b
0x1d63…1d87 at001c = ╱4c╱L╱ // 0x1d7f @0x1c
0x1d63…1d87 at001d = ╱44╱D╱ // 0x1d80 @0x1d
0x1d63…1d87 at001e = ╱4f╱O╱ // 0x1d81 @0x1e
0x1d63…1d87 at001f = ╱31╱1╱ // 0x1d82 @0x1f
0x1d63…1d87 at0020 = ╱32╱2╱ // 0x1d83 @0x20
0x1d63…1d87 at0021 = ╱ef╱$╱ // 0x1d84 @0x21
0x1d63…1d87 at0022 = ╱ee╱)╱ // 0x1d85 @0x22
0x1d63…1d87 at0023 = EOL // 0x1d86 @0x23
0x1d63…1d87 }
0x1d87…1daf ab06 2950 LINIE=LINIE+V;GFNR=B;GLNAVN$=BLANK$
0x1d87…1daf LineComalBin {
0x1d87…1daf ptr = 0xab06 // 0x1d87 @0x0
0x1d87…1daf lno = 0x0b86 // 0x1d89 @0x2
0x1d87…1daf at0004 = ╱4c╱L╱ // 0x1d8b @0x4
0x1d87…1daf at0005 = ╱49╱I╱ // 0x1d8c @0x5
0x1d87…1daf at0006 = ╱4e╱N╱ // 0x1d8d @0x6
0x1d87…1daf at0007 = ╱49╱I╱ // 0x1d8e @0x7
0x1d87…1daf at0008 = ╱45╱E╱ // 0x1d8f @0x8
0x1d87…1daf at0009 = ╱dc╱=╱ // 0x1d90 @0x9
0x1d87…1daf at000a = ╱4c╱L╱ // 0x1d91 @0xa
0x1d87…1daf at000b = ╱49╱I╱ // 0x1d92 @0xb
0x1d87…1daf at000c = ╱4e╱N╱ // 0x1d93 @0xc
0x1d87…1daf at000d = ╱49╱I╱ // 0x1d94 @0xd
0x1d87…1daf at000e = ╱45╱E╱ // 0x1d95 @0xe
0x1d87…1daf at000f = ╱e2╱+╱ // 0x1d96 @0xf
0x1d87…1daf at0010 = ╱56╱V╱ // 0x1d97 @0x10
0x1d87…1daf at0011 = ╱eb╱;╱ // 0x1d98 @0x11
0x1d87…1daf at0012 = ╱47╱G╱ // 0x1d99 @0x12
0x1d87…1daf at0013 = ╱46╱F╱ // 0x1d9a @0x13
0x1d87…1daf at0014 = ╱4e╱N╱ // 0x1d9b @0x14
0x1d87…1daf at0015 = ╱52╱R╱ // 0x1d9c @0x15
0x1d87…1daf at0016 = ╱dc╱=╱ // 0x1d9d @0x16
0x1d87…1daf at0017 = ╱42╱B╱ // 0x1d9e @0x17
0x1d87…1daf at0018 = ╱eb╱;╱ // 0x1d9f @0x18
0x1d87…1daf at0019 = ╱47╱G╱ // 0x1da0 @0x19
0x1d87…1daf at001a = ╱4c╱L╱ // 0x1da1 @0x1a
0x1d87…1daf at001b = ╱4e╱N╱ // 0x1da2 @0x1b
0x1d87…1daf at001c = ╱41╱A╱ // 0x1da3 @0x1c
0x1d87…1daf at001d = ╱56╱V╱ // 0x1da4 @0x1d
0x1d87…1daf at001e = ╱4e╱N╱ // 0x1da5 @0x1e
0x1d87…1daf at001f = ╱ef╱$╱ // 0x1da6 @0x1f
0x1d87…1daf at0020 = ╱dc╱=╱ // 0x1da7 @0x20
0x1d87…1daf at0021 = ╱42╱B╱ // 0x1da8 @0x21
0x1d87…1daf at0022 = ╱4c╱L╱ // 0x1da9 @0x22
0x1d87…1daf at0023 = ╱41╱A╱ // 0x1daa @0x23
0x1d87…1daf at0024 = ╱4e╱N╱ // 0x1dab @0x24
0x1d87…1daf at0025 = ╱4b╱K╱ // 0x1dac @0x25
0x1d87…1daf at0026 = ╱ef╱$╱ // 0x1dad @0x26
0x1d87…1daf at0027 = EOL // 0x1dae @0x27
0x1d87…1daf }
0x1daf…1db5 ab0c 2960 ENDIF
0x1daf…1db5 LineComalBin {
0x1daf…1db5 ptr = 0xab0c // 0x1daf @0x0
0x1daf…1db5 lno = 0x0b90 // 0x1db1 @0x2
0x1daf…1db5 at0004 = ╱9b╱ ENDIF ╱ // 0x1db3 @0x4
0x1daf…1db5 at0005 = EOL // 0x1db4 @0x5
0x1daf…1db5 }
0x1db5…1dc3 ab1a 2970 IF GFNR1>B THEN
0x1db5…1dc3 LineComalBin {
0x1db5…1dc3 ptr = 0xab1a // 0x1db5 @0x0
0x1db5…1dc3 lno = 0x0b9a // 0x1db7 @0x2
0x1db5…1dc3 at0004 = ╱9c╱ IF ╱ // 0x1db9 @0x4
0x1db5…1dc3 at0005 = ╱47╱G╱ // 0x1dba @0x5
0x1db5…1dc3 at0006 = ╱46╱F╱ // 0x1dbb @0x6
0x1db5…1dc3 at0007 = ╱4e╱N╱ // 0x1dbc @0x7
0x1db5…1dc3 at0008 = ╱52╱R╱ // 0x1dbd @0x8
0x1db5…1dc3 at0009 = ╱31╱1╱ // 0x1dbe @0x9
0x1db5…1dc3 at000a = ╱de╱>╱ // 0x1dbf @0xa
0x1db5…1dc3 at000b = ╱42╱B╱ // 0x1dc0 @0xb
0x1db5…1dc3 at000c = ╱b6╱ THEN ╱ // 0x1dc1 @0xc
0x1db5…1dc3 at000d = EOL // 0x1dc2 @0xd
0x1db5…1dc3 }
0x1dc3…1dee ab45 2980 IF LINIE>37 THEN EXEC NYSIDE(GFNR1,GLNAVN1$)
0x1dc3…1dee LineComalBin {
0x1dc3…1dee ptr = 0xab45 // 0x1dc3 @0x0
0x1dc3…1dee lno = 0x0ba4 // 0x1dc5 @0x2
0x1dc3…1dee at0004 = ╱82╱ IF ╱ // 0x1dc7 @0x4
0x1dc3…1dee at0005 = ╱4c╱L╱ // 0x1dc8 @0x5
0x1dc3…1dee at0006 = ╱49╱I╱ // 0x1dc9 @0x6
0x1dc3…1dee at0007 = ╱4e╱N╱ // 0x1dca @0x7
0x1dc3…1dee at0008 = ╱49╱I╱ // 0x1dcb @0x8
0x1dc3…1dee at0009 = ╱45╱E╱ // 0x1dcc @0x9
0x1dc3…1dee at000a = ╱de╱>╱ // 0x1dcd @0xa
0x1dc3…1dee at000b = ╱33╱3╱ // 0x1dce @0xb
0x1dc3…1dee at000c = ╱37╱7╱ // 0x1dcf @0xc
0x1dc3…1dee at000d = ╱fe00009406╱ // 0x1dd0 @0xd
0x1dc3…1dee at0012 = ╱b6╱ THEN ╱ // 0x1dd5 @0x12
0x1dc3…1dee at0013 = ╱9d╱ EXEC ╱ // 0x1dd6 @0x13
0x1dc3…1dee at0014 = ╱4e╱N╱ // 0x1dd7 @0x14
0x1dc3…1dee at0015 = ╱59╱Y╱ // 0x1dd8 @0x15
0x1dc3…1dee at0016 = ╱53╱S╱ // 0x1dd9 @0x16
0x1dc3…1dee at0017 = ╱49╱I╱ // 0x1dda @0x17
0x1dc3…1dee at0018 = ╱44╱D╱ // 0x1ddb @0x18
0x1dc3…1dee at0019 = ╱45╱E╱ // 0x1ddc @0x19
0x1dc3…1dee at001a = ╱ed╱(╱ // 0x1ddd @0x1a
0x1dc3…1dee at001b = ╱47╱G╱ // 0x1dde @0x1b
0x1dc3…1dee at001c = ╱46╱F╱ // 0x1ddf @0x1c
0x1dc3…1dee at001d = ╱4e╱N╱ // 0x1de0 @0x1d
0x1dc3…1dee at001e = ╱52╱R╱ // 0x1de1 @0x1e
0x1dc3…1dee at001f = ╱31╱1╱ // 0x1de2 @0x1f
0x1dc3…1dee at0020 = ╱ec╱,╱ // 0x1de3 @0x20
0x1dc3…1dee at0021 = ╱47╱G╱ // 0x1de4 @0x21
0x1dc3…1dee at0022 = ╱4c╱L╱ // 0x1de5 @0x22
0x1dc3…1dee at0023 = ╱4e╱N╱ // 0x1de6 @0x23
0x1dc3…1dee at0024 = ╱41╱A╱ // 0x1de7 @0x24
0x1dc3…1dee at0025 = ╱56╱V╱ // 0x1de8 @0x25
0x1dc3…1dee at0026 = ╱4e╱N╱ // 0x1de9 @0x26
0x1dc3…1dee at0027 = ╱31╱1╱ // 0x1dea @0x27
0x1dc3…1dee at0028 = ╱ef╱$╱ // 0x1deb @0x28
0x1dc3…1dee at0029 = ╱ee╱)╱ // 0x1dec @0x29
0x1dc3…1dee at002a = EOL // 0x1ded @0x2a
0x1dc3…1dee }
0x1dee…1df7 ab4e 2990 PRINT " "
0x1dee…1df7 LineComalBin {
0x1dee…1df7 ptr = 0xab4e // 0x1dee @0x0
0x1dee…1df7 lno = 0x0bae // 0x1df0 @0x2
0x1dee…1df7 at0004 = ╱92╱ PRINT ╱ // 0x1df2 @0x4
0x1dee…1df7 at0005 = ╱22╱"╱ // 0x1df3 @0x5
0x1dee…1df7 at0006 = ╱20╱…╱ // 0x1df4 @0x6
0x1dee…1df7 at0007 = ╱22╱"╱ // 0x1df5 @0x7
0x1dee…1df7 at0008 = EOL // 0x1df6 @0x8
0x1dee…1df7 }
0x1df7…1e18 ab6f 3000 PRINT TAB(8);STREG$(E:71)
0x1df7…1e18 LineComalBin {
0x1df7…1e18 ptr = 0xab6f // 0x1df7 @0x0
0x1df7…1e18 lno = 0x0bb8 // 0x1df9 @0x2
0x1df7…1e18 at0004 = ╱92╱ PRINT ╱ // 0x1dfb @0x4
0x1df7…1e18 at0005 = ╱d2╱TAB╱ // 0x1dfc @0x5
0x1df7…1e18 at0006 = ╱ed╱(╱ // 0x1dfd @0x6
0x1df7…1e18 at0007 = ╱38╱8╱ // 0x1dfe @0x7
0x1df7…1e18 at0008 = ╱fe00008004╱ // 0x1dff @0x8
0x1df7…1e18 at000d = ╱ee╱)╱ // 0x1e04 @0xd
0x1df7…1e18 at000e = ╱eb╱;╱ // 0x1e05 @0xe
0x1df7…1e18 at000f = ╱53╱S╱ // 0x1e06 @0xf
0x1df7…1e18 at0010 = ╱54╱T╱ // 0x1e07 @0x10
0x1df7…1e18 at0011 = ╱52╱R╱ // 0x1e08 @0x11
0x1df7…1e18 at0012 = ╱45╱E╱ // 0x1e09 @0x12
0x1df7…1e18 at0013 = ╱47╱G╱ // 0x1e0a @0x13
0x1df7…1e18 at0014 = ╱ef╱$╱ // 0x1e0b @0x14
0x1df7…1e18 at0015 = ╱ed╱(╱ // 0x1e0c @0x15
0x1df7…1e18 at0016 = ╱45╱E╱ // 0x1e0d @0x16
0x1df7…1e18 at0017 = ╱f0╱:╱ // 0x1e0e @0x17
0x1df7…1e18 at0018 = ╱37╱7╱ // 0x1e0f @0x18
0x1df7…1e18 at0019 = ╱31╱1╱ // 0x1e10 @0x19
0x1df7…1e18 at001a = ╱fe00008e07╱ // 0x1e11 @0x1a
0x1df7…1e18 at001f = ╱ee╱)╱ // 0x1e16 @0x1f
0x1df7…1e18 at0020 = EOL // 0x1e17 @0x20
0x1df7…1e18 }
0x1e18…1e3e ab95 3010 EXEC LINIEUD(GFNR1,GLNAVN1$,SALDO14$)
0x1e18…1e3e LineComalBin {
0x1e18…1e3e ptr = 0xab95 // 0x1e18 @0x0
0x1e18…1e3e lno = 0x0bc2 // 0x1e1a @0x2
0x1e18…1e3e at0004 = ╱9d╱ EXEC ╱ // 0x1e1c @0x4
0x1e18…1e3e at0005 = ╱4c╱L╱ // 0x1e1d @0x5
0x1e18…1e3e at0006 = ╱49╱I╱ // 0x1e1e @0x6
0x1e18…1e3e at0007 = ╱4e╱N╱ // 0x1e1f @0x7
0x1e18…1e3e at0008 = ╱49╱I╱ // 0x1e20 @0x8
0x1e18…1e3e at0009 = ╱45╱E╱ // 0x1e21 @0x9
0x1e18…1e3e at000a = ╱55╱U╱ // 0x1e22 @0xa
0x1e18…1e3e at000b = ╱44╱D╱ // 0x1e23 @0xb
0x1e18…1e3e at000c = ╱ed╱(╱ // 0x1e24 @0xc
0x1e18…1e3e at000d = ╱47╱G╱ // 0x1e25 @0xd
0x1e18…1e3e at000e = ╱46╱F╱ // 0x1e26 @0xe
0x1e18…1e3e at000f = ╱4e╱N╱ // 0x1e27 @0xf
0x1e18…1e3e at0010 = ╱52╱R╱ // 0x1e28 @0x10
0x1e18…1e3e at0011 = ╱31╱1╱ // 0x1e29 @0x11
0x1e18…1e3e at0012 = ╱ec╱,╱ // 0x1e2a @0x12
0x1e18…1e3e at0013 = ╱47╱G╱ // 0x1e2b @0x13
0x1e18…1e3e at0014 = ╱4c╱L╱ // 0x1e2c @0x14
0x1e18…1e3e at0015 = ╱4e╱N╱ // 0x1e2d @0x15
0x1e18…1e3e at0016 = ╱41╱A╱ // 0x1e2e @0x16
0x1e18…1e3e at0017 = ╱56╱V╱ // 0x1e2f @0x17
0x1e18…1e3e at0018 = ╱4e╱N╱ // 0x1e30 @0x18
0x1e18…1e3e at0019 = ╱31╱1╱ // 0x1e31 @0x19
0x1e18…1e3e at001a = ╱ef╱$╱ // 0x1e32 @0x1a
0x1e18…1e3e at001b = ╱ec╱,╱ // 0x1e33 @0x1b
0x1e18…1e3e at001c = ╱53╱S╱ // 0x1e34 @0x1c
0x1e18…1e3e at001d = ╱41╱A╱ // 0x1e35 @0x1d
0x1e18…1e3e at001e = ╱4c╱L╱ // 0x1e36 @0x1e
0x1e18…1e3e at001f = ╱44╱D╱ // 0x1e37 @0x1f
0x1e18…1e3e at0020 = ╱4f╱O╱ // 0x1e38 @0x20
0x1e18…1e3e at0021 = ╱31╱1╱ // 0x1e39 @0x21
0x1e18…1e3e at0022 = ╱34╱4╱ // 0x1e3a @0x22
0x1e18…1e3e at0023 = ╱ef╱$╱ // 0x1e3b @0x23
0x1e18…1e3e at0024 = ╱ee╱)╱ // 0x1e3c @0x24
0x1e18…1e3e at0025 = EOL // 0x1e3d @0x25
0x1e18…1e3e }
0x1e3e…1e68 abbf 3020 LINIE=LINIE+V;GFNR1=B;GLNAVN1$=BLANK$
0x1e3e…1e68 LineComalBin {
0x1e3e…1e68 ptr = 0xabbf // 0x1e3e @0x0
0x1e3e…1e68 lno = 0x0bcc // 0x1e40 @0x2
0x1e3e…1e68 at0004 = ╱4c╱L╱ // 0x1e42 @0x4
0x1e3e…1e68 at0005 = ╱49╱I╱ // 0x1e43 @0x5
0x1e3e…1e68 at0006 = ╱4e╱N╱ // 0x1e44 @0x6
0x1e3e…1e68 at0007 = ╱49╱I╱ // 0x1e45 @0x7
0x1e3e…1e68 at0008 = ╱45╱E╱ // 0x1e46 @0x8
0x1e3e…1e68 at0009 = ╱dc╱=╱ // 0x1e47 @0x9
0x1e3e…1e68 at000a = ╱4c╱L╱ // 0x1e48 @0xa
0x1e3e…1e68 at000b = ╱49╱I╱ // 0x1e49 @0xb
0x1e3e…1e68 at000c = ╱4e╱N╱ // 0x1e4a @0xc
0x1e3e…1e68 at000d = ╱49╱I╱ // 0x1e4b @0xd
0x1e3e…1e68 at000e = ╱45╱E╱ // 0x1e4c @0xe
0x1e3e…1e68 at000f = ╱e2╱+╱ // 0x1e4d @0xf
0x1e3e…1e68 at0010 = ╱56╱V╱ // 0x1e4e @0x10
0x1e3e…1e68 at0011 = ╱eb╱;╱ // 0x1e4f @0x11
0x1e3e…1e68 at0012 = ╱47╱G╱ // 0x1e50 @0x12
0x1e3e…1e68 at0013 = ╱46╱F╱ // 0x1e51 @0x13
0x1e3e…1e68 at0014 = ╱4e╱N╱ // 0x1e52 @0x14
0x1e3e…1e68 at0015 = ╱52╱R╱ // 0x1e53 @0x15
0x1e3e…1e68 at0016 = ╱31╱1╱ // 0x1e54 @0x16
0x1e3e…1e68 at0017 = ╱dc╱=╱ // 0x1e55 @0x17
0x1e3e…1e68 at0018 = ╱42╱B╱ // 0x1e56 @0x18
0x1e3e…1e68 at0019 = ╱eb╱;╱ // 0x1e57 @0x19
0x1e3e…1e68 at001a = ╱47╱G╱ // 0x1e58 @0x1a
0x1e3e…1e68 at001b = ╱4c╱L╱ // 0x1e59 @0x1b
0x1e3e…1e68 at001c = ╱4e╱N╱ // 0x1e5a @0x1c
0x1e3e…1e68 at001d = ╱41╱A╱ // 0x1e5b @0x1d
0x1e3e…1e68 at001e = ╱56╱V╱ // 0x1e5c @0x1e
0x1e3e…1e68 at001f = ╱4e╱N╱ // 0x1e5d @0x1f
0x1e3e…1e68 at0020 = ╱31╱1╱ // 0x1e5e @0x20
0x1e3e…1e68 at0021 = ╱ef╱$╱ // 0x1e5f @0x21
0x1e3e…1e68 at0022 = ╱dc╱=╱ // 0x1e60 @0x22
0x1e3e…1e68 at0023 = ╱42╱B╱ // 0x1e61 @0x23
0x1e3e…1e68 at0024 = ╱4c╱L╱ // 0x1e62 @0x24
0x1e3e…1e68 at0025 = ╱41╱A╱ // 0x1e63 @0x25
0x1e3e…1e68 at0026 = ╱4e╱N╱ // 0x1e64 @0x26
0x1e3e…1e68 at0027 = ╱4b╱K╱ // 0x1e65 @0x27
0x1e3e…1e68 at0028 = ╱ef╱$╱ // 0x1e66 @0x28
0x1e3e…1e68 at0029 = EOL // 0x1e67 @0x29
0x1e3e…1e68 }
0x1e68…1e6e abc5 3030 ENDIF
0x1e68…1e6e LineComalBin {
0x1e68…1e6e ptr = 0xabc5 // 0x1e68 @0x0
0x1e68…1e6e lno = 0x0bd6 // 0x1e6a @0x2
0x1e68…1e6e at0004 = ╱9b╱ ENDIF ╱ // 0x1e6c @0x4
0x1e68…1e6e at0005 = EOL // 0x1e6d @0x5
0x1e68…1e6e }
0x1e6e…1e9c abf3 3040 SALDO11$="0+";SALDO12$="0+";SALDO14$="0+"
0x1e6e…1e9c LineComalBin {
0x1e6e…1e9c ptr = 0xabf3 // 0x1e6e @0x0
0x1e6e…1e9c lno = 0x0be0 // 0x1e70 @0x2
0x1e6e…1e9c at0004 = ╱53╱S╱ // 0x1e72 @0x4
0x1e6e…1e9c at0005 = ╱41╱A╱ // 0x1e73 @0x5
0x1e6e…1e9c at0006 = ╱4c╱L╱ // 0x1e74 @0x6
0x1e6e…1e9c at0007 = ╱44╱D╱ // 0x1e75 @0x7
0x1e6e…1e9c at0008 = ╱4f╱O╱ // 0x1e76 @0x8
0x1e6e…1e9c at0009 = ╱31╱1╱ // 0x1e77 @0x9
0x1e6e…1e9c at000a = ╱31╱1╱ // 0x1e78 @0xa
0x1e6e…1e9c at000b = ╱ef╱$╱ // 0x1e79 @0xb
0x1e6e…1e9c at000c = ╱dc╱=╱ // 0x1e7a @0xc
0x1e6e…1e9c at000d = ╱22╱"╱ // 0x1e7b @0xd
0x1e6e…1e9c at000e = ╱30╱0╱ // 0x1e7c @0xe
0x1e6e…1e9c at000f = ╱2b╱+╱ // 0x1e7d @0xf
0x1e6e…1e9c at0010 = ╱22╱"╱ // 0x1e7e @0x10
0x1e6e…1e9c at0011 = ╱eb╱;╱ // 0x1e7f @0x11
0x1e6e…1e9c at0012 = ╱53╱S╱ // 0x1e80 @0x12
0x1e6e…1e9c at0013 = ╱41╱A╱ // 0x1e81 @0x13
0x1e6e…1e9c at0014 = ╱4c╱L╱ // 0x1e82 @0x14
0x1e6e…1e9c at0015 = ╱44╱D╱ // 0x1e83 @0x15
0x1e6e…1e9c at0016 = ╱4f╱O╱ // 0x1e84 @0x16
0x1e6e…1e9c at0017 = ╱31╱1╱ // 0x1e85 @0x17
0x1e6e…1e9c at0018 = ╱32╱2╱ // 0x1e86 @0x18
0x1e6e…1e9c at0019 = ╱ef╱$╱ // 0x1e87 @0x19
0x1e6e…1e9c at001a = ╱dc╱=╱ // 0x1e88 @0x1a
0x1e6e…1e9c at001b = ╱22╱"╱ // 0x1e89 @0x1b
0x1e6e…1e9c at001c = ╱30╱0╱ // 0x1e8a @0x1c
0x1e6e…1e9c at001d = ╱2b╱+╱ // 0x1e8b @0x1d
0x1e6e…1e9c at001e = ╱22╱"╱ // 0x1e8c @0x1e
0x1e6e…1e9c at001f = ╱eb╱;╱ // 0x1e8d @0x1f
0x1e6e…1e9c at0020 = ╱53╱S╱ // 0x1e8e @0x20
0x1e6e…1e9c at0021 = ╱41╱A╱ // 0x1e8f @0x21
0x1e6e…1e9c at0022 = ╱4c╱L╱ // 0x1e90 @0x22
0x1e6e…1e9c at0023 = ╱44╱D╱ // 0x1e91 @0x23
0x1e6e…1e9c at0024 = ╱4f╱O╱ // 0x1e92 @0x24
0x1e6e…1e9c at0025 = ╱31╱1╱ // 0x1e93 @0x25
0x1e6e…1e9c at0026 = ╱34╱4╱ // 0x1e94 @0x26
0x1e6e…1e9c at0027 = ╱ef╱$╱ // 0x1e95 @0x27
0x1e6e…1e9c at0028 = ╱dc╱=╱ // 0x1e96 @0x28
0x1e6e…1e9c at0029 = ╱22╱"╱ // 0x1e97 @0x29
0x1e6e…1e9c at002a = ╱30╱0╱ // 0x1e98 @0x2a
0x1e6e…1e9c at002b = ╱2b╱+╱ // 0x1e99 @0x2b
0x1e6e…1e9c at002c = ╱22╱"╱ // 0x1e9a @0x2c
0x1e6e…1e9c at002d = EOL // 0x1e9b @0x2d
0x1e6e…1e9c }
0x1e9c…1eba ac11 3050 GLNAVN1$=FNAVN$;GFNR1=FNR
0x1e9c…1eba LineComalBin {
0x1e9c…1eba ptr = 0xac11 // 0x1e9c @0x0
0x1e9c…1eba lno = 0x0bea // 0x1e9e @0x2
0x1e9c…1eba at0004 = ╱47╱G╱ // 0x1ea0 @0x4
0x1e9c…1eba at0005 = ╱4c╱L╱ // 0x1ea1 @0x5
0x1e9c…1eba at0006 = ╱4e╱N╱ // 0x1ea2 @0x6
0x1e9c…1eba at0007 = ╱41╱A╱ // 0x1ea3 @0x7
0x1e9c…1eba at0008 = ╱56╱V╱ // 0x1ea4 @0x8
0x1e9c…1eba at0009 = ╱4e╱N╱ // 0x1ea5 @0x9
0x1e9c…1eba at000a = ╱31╱1╱ // 0x1ea6 @0xa
0x1e9c…1eba at000b = ╱ef╱$╱ // 0x1ea7 @0xb
0x1e9c…1eba at000c = ╱dc╱=╱ // 0x1ea8 @0xc
0x1e9c…1eba at000d = ╱46╱F╱ // 0x1ea9 @0xd
0x1e9c…1eba at000e = ╱4e╱N╱ // 0x1eaa @0xe
0x1e9c…1eba at000f = ╱41╱A╱ // 0x1eab @0xf
0x1e9c…1eba at0010 = ╱56╱V╱ // 0x1eac @0x10
0x1e9c…1eba at0011 = ╱4e╱N╱ // 0x1ead @0x11
0x1e9c…1eba at0012 = ╱ef╱$╱ // 0x1eae @0x12
0x1e9c…1eba at0013 = ╱eb╱;╱ // 0x1eaf @0x13
0x1e9c…1eba at0014 = ╱47╱G╱ // 0x1eb0 @0x14
0x1e9c…1eba at0015 = ╱46╱F╱ // 0x1eb1 @0x15
0x1e9c…1eba at0016 = ╱4e╱N╱ // 0x1eb2 @0x16
0x1e9c…1eba at0017 = ╱52╱R╱ // 0x1eb3 @0x17
0x1e9c…1eba at0018 = ╱31╱1╱ // 0x1eb4 @0x18
0x1e9c…1eba at0019 = ╱dc╱=╱ // 0x1eb5 @0x19
0x1e9c…1eba at001a = ╱46╱F╱ // 0x1eb6 @0x1a
0x1e9c…1eba at001b = ╱4e╱N╱ // 0x1eb7 @0x1b
0x1e9c…1eba at001c = ╱52╱R╱ // 0x1eb8 @0x1c
0x1e9c…1eba at001d = EOL // 0x1eb9 @0x1d
0x1e9c…1eba }
0x1eba…1ece ac25 3060 IF LINIE>34 THEN
0x1eba…1ece LineComalBin {
0x1eba…1ece ptr = 0xac25 // 0x1eba @0x0
0x1eba…1ece lno = 0x0bf4 // 0x1ebc @0x2
0x1eba…1ece at0004 = ╱9c╱ IF ╱ // 0x1ebe @0x4
0x1eba…1ece at0005 = ╱4c╱L╱ // 0x1ebf @0x5
0x1eba…1ece at0006 = ╱49╱I╱ // 0x1ec0 @0x6
0x1eba…1ece at0007 = ╱4e╱N╱ // 0x1ec1 @0x7
0x1eba…1ece at0008 = ╱49╱I╱ // 0x1ec2 @0x8
0x1eba…1ece at0009 = ╱45╱E╱ // 0x1ec3 @0x9
0x1eba…1ece at000a = ╱de╱>╱ // 0x1ec4 @0xa
0x1eba…1ece at000b = ╱33╱3╱ // 0x1ec5 @0xb
0x1eba…1ece at000c = ╱34╱4╱ // 0x1ec6 @0xc
0x1eba…1ece at000d = ╱fe00008806╱ // 0x1ec7 @0xd
0x1eba…1ece at0012 = ╱b6╱ THEN ╱ // 0x1ecc @0x12
0x1eba…1ece at0013 = EOL // 0x1ecd @0x13
0x1eba…1ece }
0x1ece…1eea ac41 3070 EXEC NYSIDE(GFNR1,GLNAVN1$)
0x1ece…1eea LineComalBin {
0x1ece…1eea ptr = 0xac41 // 0x1ece @0x0
0x1ece…1eea lno = 0x0bfe // 0x1ed0 @0x2
0x1ece…1eea at0004 = ╱9d╱ EXEC ╱ // 0x1ed2 @0x4
0x1ece…1eea at0005 = ╱4e╱N╱ // 0x1ed3 @0x5
0x1ece…1eea at0006 = ╱59╱Y╱ // 0x1ed4 @0x6
0x1ece…1eea at0007 = ╱53╱S╱ // 0x1ed5 @0x7
0x1ece…1eea at0008 = ╱49╱I╱ // 0x1ed6 @0x8
0x1ece…1eea at0009 = ╱44╱D╱ // 0x1ed7 @0x9
0x1ece…1eea at000a = ╱45╱E╱ // 0x1ed8 @0xa
0x1ece…1eea at000b = ╱ed╱(╱ // 0x1ed9 @0xb
0x1ece…1eea at000c = ╱47╱G╱ // 0x1eda @0xc
0x1ece…1eea at000d = ╱46╱F╱ // 0x1edb @0xd
0x1ece…1eea at000e = ╱4e╱N╱ // 0x1edc @0xe
0x1ece…1eea at000f = ╱52╱R╱ // 0x1edd @0xf
0x1ece…1eea at0010 = ╱31╱1╱ // 0x1ede @0x10
0x1ece…1eea at0011 = ╱ec╱,╱ // 0x1edf @0x11
0x1ece…1eea at0012 = ╱47╱G╱ // 0x1ee0 @0x12
0x1ece…1eea at0013 = ╱4c╱L╱ // 0x1ee1 @0x13
0x1ece…1eea at0014 = ╱4e╱N╱ // 0x1ee2 @0x14
0x1ece…1eea at0015 = ╱41╱A╱ // 0x1ee3 @0x15
0x1ece…1eea at0016 = ╱56╱V╱ // 0x1ee4 @0x16
0x1ece…1eea at0017 = ╱4e╱N╱ // 0x1ee5 @0x17
0x1ece…1eea at0018 = ╱31╱1╱ // 0x1ee6 @0x18
0x1ece…1eea at0019 = ╱ef╱$╱ // 0x1ee7 @0x19
0x1ece…1eea at001a = ╱ee╱)╱ // 0x1ee8 @0x1a
0x1ece…1eea at001b = EOL // 0x1ee9 @0x1b
0x1ece…1eea }
0x1eea…1ef0 ac47 3080 ELSE
0x1eea…1ef0 LineComalBin {
0x1eea…1ef0 ptr = 0xac47 // 0x1eea @0x0
0x1eea…1ef0 lno = 0x0c08 // 0x1eec @0x2
0x1eea…1ef0 at0004 = ╱9a╱ ELSE ╱ // 0x1eee @0x4
0x1eea…1ef0 at0005 = EOL // 0x1eef @0x5
0x1eea…1ef0 }
0x1ef0…1f00 ac57 3090 PRINT CHR(10)
0x1ef0…1f00 LineComalBin {
0x1ef0…1f00 ptr = 0xac57 // 0x1ef0 @0x0
0x1ef0…1f00 lno = 0x0c12 // 0x1ef2 @0x2
0x1ef0…1f00 at0004 = ╱92╱ PRINT ╱ // 0x1ef4 @0x4
0x1ef0…1f00 at0005 = ╱cf╱CHR╱ // 0x1ef5 @0x5
0x1ef0…1f00 at0006 = ╱ed╱(╱ // 0x1ef6 @0x6
0x1ef0…1f00 at0007 = ╱31╱1╱ // 0x1ef7 @0x7
0x1ef0…1f00 at0008 = ╱30╱0╱ // 0x1ef8 @0x8
0x1ef0…1f00 at0009 = ╱fe0000a004╱ // 0x1ef9 @0x9
0x1ef0…1f00 at000e = ╱ee╱)╱ // 0x1efe @0xe
0x1ef0…1f00 at000f = EOL // 0x1eff @0xf
0x1ef0…1f00 }
0x1f00…1f10 ac67 3100 PRINT CHR(10)
0x1f00…1f10 LineComalBin {
0x1f00…1f10 ptr = 0xac67 // 0x1f00 @0x0
0x1f00…1f10 lno = 0x0c1c // 0x1f02 @0x2
0x1f00…1f10 at0004 = ╱92╱ PRINT ╱ // 0x1f04 @0x4
0x1f00…1f10 at0005 = ╱cf╱CHR╱ // 0x1f05 @0x5
0x1f00…1f10 at0006 = ╱ed╱(╱ // 0x1f06 @0x6
0x1f00…1f10 at0007 = ╱31╱1╱ // 0x1f07 @0x7
0x1f00…1f10 at0008 = ╱30╱0╱ // 0x1f08 @0x8
0x1f00…1f10 at0009 = ╱fe0000a004╱ // 0x1f09 @0x9
0x1f00…1f10 at000e = ╱ee╱)╱ // 0x1f0e @0xe
0x1f00…1f10 at000f = EOL // 0x1f0f @0xf
0x1f00…1f10 }
0x1f10…1f19 ac70 3110 PRINT " "
0x1f10…1f19 LineComalBin {
0x1f10…1f19 ptr = 0xac70 // 0x1f10 @0x0
0x1f10…1f19 lno = 0x0c26 // 0x1f12 @0x2
0x1f10…1f19 at0004 = ╱92╱ PRINT ╱ // 0x1f14 @0x4
0x1f10…1f19 at0005 = ╱22╱"╱ // 0x1f15 @0x5
0x1f10…1f19 at0006 = ╱20╱…╱ // 0x1f16 @0x6
0x1f10…1f19 at0007 = ╱22╱"╱ // 0x1f17 @0x7
0x1f10…1f19 at0008 = EOL // 0x1f18 @0x8
0x1f10…1f19 }
0x1f19…1f2e ac85 3120 PRINT USING "###### ":FNR;
0x1f19…1f2e LineComalBin {
0x1f19…1f2e ptr = 0xac85 // 0x1f19 @0x0
0x1f19…1f2e lno = 0x0c30 // 0x1f1b @0x2
0x1f19…1f2e at0004 = ╱92╱ PRINT ╱ // 0x1f1d @0x4
0x1f19…1f2e at0005 = ╱b9╱ USING ╱ // 0x1f1e @0x5
0x1f19…1f2e at0006 = ╱22╱"╱ // 0x1f1f @0x6
0x1f19…1f2e at0007 = ╱23╱#╱ // 0x1f20 @0x7
0x1f19…1f2e at0008 = ╱23╱#╱ // 0x1f21 @0x8
0x1f19…1f2e at0009 = ╱23╱#╱ // 0x1f22 @0x9
0x1f19…1f2e at000a = ╱23╱#╱ // 0x1f23 @0xa
0x1f19…1f2e at000b = ╱23╱#╱ // 0x1f24 @0xb
0x1f19…1f2e at000c = ╱23╱#╱ // 0x1f25 @0xc
0x1f19…1f2e at000d = ╱20╱…╱ // 0x1f26 @0xd
0x1f19…1f2e at000e = ╱22╱"╱ // 0x1f27 @0xe
0x1f19…1f2e at000f = ╱f0╱:╱ // 0x1f28 @0xf
0x1f19…1f2e at0010 = ╱46╱F╱ // 0x1f29 @0x10
0x1f19…1f2e at0011 = ╱4e╱N╱ // 0x1f2a @0x11
0x1f19…1f2e at0012 = ╱52╱R╱ // 0x1f2b @0x12
0x1f19…1f2e at0013 = ╱eb╱;╱ // 0x1f2c @0x13
0x1f19…1f2e at0014 = EOL // 0x1f2d @0x14
0x1f19…1f2e }
0x1f2e…1f3c ac93 3130 PRINT GLNAVN1$
0x1f2e…1f3c LineComalBin {
0x1f2e…1f3c ptr = 0xac93 // 0x1f2e @0x0
0x1f2e…1f3c lno = 0x0c3a // 0x1f30 @0x2
0x1f2e…1f3c at0004 = ╱92╱ PRINT ╱ // 0x1f32 @0x4
0x1f2e…1f3c at0005 = ╱47╱G╱ // 0x1f33 @0x5
0x1f2e…1f3c at0006 = ╱4c╱L╱ // 0x1f34 @0x6
0x1f2e…1f3c at0007 = ╱4e╱N╱ // 0x1f35 @0x7
0x1f2e…1f3c at0008 = ╱41╱A╱ // 0x1f36 @0x8
0x1f2e…1f3c at0009 = ╱56╱V╱ // 0x1f37 @0x9
0x1f2e…1f3c at000a = ╱4e╱N╱ // 0x1f38 @0xa
0x1f2e…1f3c at000b = ╱31╱1╱ // 0x1f39 @0xb
0x1f2e…1f3c at000c = ╱ef╱$╱ // 0x1f3a @0xc
0x1f2e…1f3c at000d = EOL // 0x1f3b @0xd
0x1f2e…1f3c }
0x1f3c…1f60 acb7 3140 PRINT TAB(8);STREG$(E:LEN(GLNAVN$))
0x1f3c…1f60 LineComalBin {
0x1f3c…1f60 ptr = 0xacb7 // 0x1f3c @0x0
0x1f3c…1f60 lno = 0x0c44 // 0x1f3e @0x2
0x1f3c…1f60 at0004 = ╱92╱ PRINT ╱ // 0x1f40 @0x4
0x1f3c…1f60 at0005 = ╱d2╱TAB╱ // 0x1f41 @0x5
0x1f3c…1f60 at0006 = ╱ed╱(╱ // 0x1f42 @0x6
0x1f3c…1f60 at0007 = ╱38╱8╱ // 0x1f43 @0x7
0x1f3c…1f60 at0008 = ╱fe00008004╱ // 0x1f44 @0x8
0x1f3c…1f60 at000d = ╱ee╱)╱ // 0x1f49 @0xd
0x1f3c…1f60 at000e = ╱eb╱;╱ // 0x1f4a @0xe
0x1f3c…1f60 at000f = ╱53╱S╱ // 0x1f4b @0xf
0x1f3c…1f60 at0010 = ╱54╱T╱ // 0x1f4c @0x10
0x1f3c…1f60 at0011 = ╱52╱R╱ // 0x1f4d @0x11
0x1f3c…1f60 at0012 = ╱45╱E╱ // 0x1f4e @0x12
0x1f3c…1f60 at0013 = ╱47╱G╱ // 0x1f4f @0x13
0x1f3c…1f60 at0014 = ╱ef╱$╱ // 0x1f50 @0x14
0x1f3c…1f60 at0015 = ╱ed╱(╱ // 0x1f51 @0x15
0x1f3c…1f60 at0016 = ╱45╱E╱ // 0x1f52 @0x16
0x1f3c…1f60 at0017 = ╱f0╱:╱ // 0x1f53 @0x17
0x1f3c…1f60 at0018 = ╱cc╱LEN╱ // 0x1f54 @0x18
0x1f3c…1f60 at0019 = ╱ed╱(╱ // 0x1f55 @0x19
0x1f3c…1f60 at001a = ╱47╱G╱ // 0x1f56 @0x1a
0x1f3c…1f60 at001b = ╱4c╱L╱ // 0x1f57 @0x1b
0x1f3c…1f60 at001c = ╱4e╱N╱ // 0x1f58 @0x1c
0x1f3c…1f60 at001d = ╱41╱A╱ // 0x1f59 @0x1d
0x1f3c…1f60 at001e = ╱56╱V╱ // 0x1f5a @0x1e
0x1f3c…1f60 at001f = ╱4e╱N╱ // 0x1f5b @0x1f
0x1f3c…1f60 at0020 = ╱ef╱$╱ // 0x1f5c @0x20
0x1f3c…1f60 at0021 = ╱ee╱)╱ // 0x1f5d @0x21
0x1f3c…1f60 at0022 = ╱ee╱)╱ // 0x1f5e @0x22
0x1f3c…1f60 at0023 = EOL // 0x1f5f @0x23
0x1f3c…1f60 }
0x1f60…1f69 acc0 3150 PRINT " "
0x1f60…1f69 LineComalBin {
0x1f60…1f69 ptr = 0xacc0 // 0x1f60 @0x0
0x1f60…1f69 lno = 0x0c4e // 0x1f62 @0x2
0x1f60…1f69 at0004 = ╱92╱ PRINT ╱ // 0x1f64 @0x4
0x1f60…1f69 at0005 = ╱22╱"╱ // 0x1f65 @0x5
0x1f60…1f69 at0006 = ╱20╱…╱ // 0x1f66 @0x6
0x1f60…1f69 at0007 = ╱22╱"╱ // 0x1f67 @0x7
0x1f60…1f69 at0008 = EOL // 0x1f68 @0x8
0x1f60…1f69 }
0x1f69…1f80 acd7 3160 LINIE=LINIE+5
0x1f69…1f80 LineComalBin {
0x1f69…1f80 ptr = 0xacd7 // 0x1f69 @0x0
0x1f69…1f80 lno = 0x0c58 // 0x1f6b @0x2
0x1f69…1f80 at0004 = ╱4c╱L╱ // 0x1f6d @0x4
0x1f69…1f80 at0005 = ╱49╱I╱ // 0x1f6e @0x5
0x1f69…1f80 at0006 = ╱4e╱N╱ // 0x1f6f @0x6
0x1f69…1f80 at0007 = ╱49╱I╱ // 0x1f70 @0x7
0x1f69…1f80 at0008 = ╱45╱E╱ // 0x1f71 @0x8
0x1f69…1f80 at0009 = ╱dc╱=╱ // 0x1f72 @0x9
0x1f69…1f80 at000a = ╱4c╱L╱ // 0x1f73 @0xa
0x1f69…1f80 at000b = ╱49╱I╱ // 0x1f74 @0xb
0x1f69…1f80 at000c = ╱4e╱N╱ // 0x1f75 @0xc
0x1f69…1f80 at000d = ╱49╱I╱ // 0x1f76 @0xd
0x1f69…1f80 at000e = ╱45╱E╱ // 0x1f77 @0xe
0x1f69…1f80 at000f = ╱e2╱+╱ // 0x1f78 @0xf
0x1f69…1f80 at0010 = ╱35╱5╱ // 0x1f79 @0x10
0x1f69…1f80 at0011 = ╱fe0000a003╱ // 0x1f7a @0x11
0x1f69…1f80 at0016 = EOL // 0x1f7f @0x16
0x1f69…1f80 }
0x1f80…1f86 acdd 3170 ENDIF
0x1f80…1f86 LineComalBin {
0x1f80…1f86 ptr = 0xacdd // 0x1f80 @0x0
0x1f80…1f86 lno = 0x0c62 // 0x1f82 @0x2
0x1f80…1f86 at0004 = ╱9b╱ ENDIF ╱ // 0x1f84 @0x4
0x1f80…1f86 at0005 = EOL // 0x1f85 @0x5
0x1f80…1f86 }
0x1f86…1f8c ace3 3180 ENDCASE
0x1f86…1f8c LineComalBin {
0x1f86…1f8c ptr = 0xace3 // 0x1f86 @0x0
0x1f86…1f8c lno = 0x0c6c // 0x1f88 @0x2
0x1f86…1f8c at0004 = ╱a4╱ ENDCASE ╱ // 0x1f8a @0x4
0x1f86…1f8c at0005 = EOL // 0x1f8b @0x5
0x1f86…1f8c }
0x1f8c…1f97 acee 3190 NEXT FPIL3
0x1f8c…1f97 LineComalBin {
0x1f8c…1f97 ptr = 0xacee // 0x1f8c @0x0
0x1f8c…1f97 lno = 0x0c76 // 0x1f8e @0x2
0x1f8c…1f97 at0004 = ╱84╱ NEXT ╱ // 0x1f90 @0x4
0x1f8c…1f97 at0005 = ╱46╱F╱ // 0x1f91 @0x5
0x1f8c…1f97 at0006 = ╱50╱P╱ // 0x1f92 @0x6
0x1f8c…1f97 at0007 = ╱49╱I╱ // 0x1f93 @0x7
0x1f8c…1f97 at0008 = ╱4c╱L╱ // 0x1f94 @0x8
0x1f8c…1f97 at0009 = ╱33╱3╱ // 0x1f95 @0x9
0x1f8c…1f97 at000a = EOL // 0x1f96 @0xa
0x1f8c…1f97 }
0x1f97…1fa4 acfb 3200 IF GFNR>B THEN
0x1f97…1fa4 LineComalBin {
0x1f97…1fa4 ptr = 0xacfb // 0x1f97 @0x0
0x1f97…1fa4 lno = 0x0c80 // 0x1f99 @0x2
0x1f97…1fa4 at0004 = ╱9c╱ IF ╱ // 0x1f9b @0x4
0x1f97…1fa4 at0005 = ╱47╱G╱ // 0x1f9c @0x5
0x1f97…1fa4 at0006 = ╱46╱F╱ // 0x1f9d @0x6
0x1f97…1fa4 at0007 = ╱4e╱N╱ // 0x1f9e @0x7
0x1f97…1fa4 at0008 = ╱52╱R╱ // 0x1f9f @0x8
0x1f97…1fa4 at0009 = ╱de╱>╱ // 0x1fa0 @0x9
0x1f97…1fa4 at000a = ╱42╱B╱ // 0x1fa1 @0xa
0x1f97…1fa4 at000b = ╱b6╱ THEN ╱ // 0x1fa2 @0xb
0x1f97…1fa4 at000c = EOL // 0x1fa3 @0xc
0x1f97…1fa4 }
0x1fa4…1fcd ad24 3210 IF LINIE>37 THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x1fa4…1fcd LineComalBin {
0x1fa4…1fcd ptr = 0xad24 // 0x1fa4 @0x0
0x1fa4…1fcd lno = 0x0c8a // 0x1fa6 @0x2
0x1fa4…1fcd at0004 = ╱82╱ IF ╱ // 0x1fa8 @0x4
0x1fa4…1fcd at0005 = ╱4c╱L╱ // 0x1fa9 @0x5
0x1fa4…1fcd at0006 = ╱49╱I╱ // 0x1faa @0x6
0x1fa4…1fcd at0007 = ╱4e╱N╱ // 0x1fab @0x7
0x1fa4…1fcd at0008 = ╱49╱I╱ // 0x1fac @0x8
0x1fa4…1fcd at0009 = ╱45╱E╱ // 0x1fad @0x9
0x1fa4…1fcd at000a = ╱de╱>╱ // 0x1fae @0xa
0x1fa4…1fcd at000b = ╱33╱3╱ // 0x1faf @0xb
0x1fa4…1fcd at000c = ╱37╱7╱ // 0x1fb0 @0xc
0x1fa4…1fcd at000d = ╱fe00009406╱ // 0x1fb1 @0xd
0x1fa4…1fcd at0012 = ╱b6╱ THEN ╱ // 0x1fb6 @0x12
0x1fa4…1fcd at0013 = ╱9d╱ EXEC ╱ // 0x1fb7 @0x13
0x1fa4…1fcd at0014 = ╱4e╱N╱ // 0x1fb8 @0x14
0x1fa4…1fcd at0015 = ╱59╱Y╱ // 0x1fb9 @0x15
0x1fa4…1fcd at0016 = ╱53╱S╱ // 0x1fba @0x16
0x1fa4…1fcd at0017 = ╱49╱I╱ // 0x1fbb @0x17
0x1fa4…1fcd at0018 = ╱44╱D╱ // 0x1fbc @0x18
0x1fa4…1fcd at0019 = ╱45╱E╱ // 0x1fbd @0x19
0x1fa4…1fcd at001a = ╱ed╱(╱ // 0x1fbe @0x1a
0x1fa4…1fcd at001b = ╱47╱G╱ // 0x1fbf @0x1b
0x1fa4…1fcd at001c = ╱46╱F╱ // 0x1fc0 @0x1c
0x1fa4…1fcd at001d = ╱4e╱N╱ // 0x1fc1 @0x1d
0x1fa4…1fcd at001e = ╱52╱R╱ // 0x1fc2 @0x1e
0x1fa4…1fcd at001f = ╱ec╱,╱ // 0x1fc3 @0x1f
0x1fa4…1fcd at0020 = ╱47╱G╱ // 0x1fc4 @0x20
0x1fa4…1fcd at0021 = ╱4c╱L╱ // 0x1fc5 @0x21
0x1fa4…1fcd at0022 = ╱4e╱N╱ // 0x1fc6 @0x22
0x1fa4…1fcd at0023 = ╱41╱A╱ // 0x1fc7 @0x23
0x1fa4…1fcd at0024 = ╱56╱V╱ // 0x1fc8 @0x24
0x1fa4…1fcd at0025 = ╱4e╱N╱ // 0x1fc9 @0x25
0x1fa4…1fcd at0026 = ╱ef╱$╱ // 0x1fca @0x26
0x1fa4…1fcd at0027 = ╱ee╱)╱ // 0x1fcb @0x27
0x1fa4…1fcd at0028 = EOL // 0x1fcc @0x28
0x1fa4…1fcd }
0x1fcd…1fd6 ad2d 3220 PRINT " "
0x1fcd…1fd6 LineComalBin {
0x1fcd…1fd6 ptr = 0xad2d // 0x1fcd @0x0
0x1fcd…1fd6 lno = 0x0c94 // 0x1fcf @0x2
0x1fcd…1fd6 at0004 = ╱92╱ PRINT ╱ // 0x1fd1 @0x4
0x1fcd…1fd6 at0005 = ╱22╱"╱ // 0x1fd2 @0x5
0x1fcd…1fd6 at0006 = ╱20╱…╱ // 0x1fd3 @0x6
0x1fcd…1fd6 at0007 = ╱22╱"╱ // 0x1fd4 @0x7
0x1fcd…1fd6 at0008 = EOL // 0x1fd5 @0x8
0x1fcd…1fd6 }
0x1fd6…1ff7 ad4e 3230 PRINT TAB(8);STREG$(E:71)
0x1fd6…1ff7 LineComalBin {
0x1fd6…1ff7 ptr = 0xad4e // 0x1fd6 @0x0
0x1fd6…1ff7 lno = 0x0c9e // 0x1fd8 @0x2
0x1fd6…1ff7 at0004 = ╱92╱ PRINT ╱ // 0x1fda @0x4
0x1fd6…1ff7 at0005 = ╱d2╱TAB╱ // 0x1fdb @0x5
0x1fd6…1ff7 at0006 = ╱ed╱(╱ // 0x1fdc @0x6
0x1fd6…1ff7 at0007 = ╱38╱8╱ // 0x1fdd @0x7
0x1fd6…1ff7 at0008 = ╱fe00008004╱ // 0x1fde @0x8
0x1fd6…1ff7 at000d = ╱ee╱)╱ // 0x1fe3 @0xd
0x1fd6…1ff7 at000e = ╱eb╱;╱ // 0x1fe4 @0xe
0x1fd6…1ff7 at000f = ╱53╱S╱ // 0x1fe5 @0xf
0x1fd6…1ff7 at0010 = ╱54╱T╱ // 0x1fe6 @0x10
0x1fd6…1ff7 at0011 = ╱52╱R╱ // 0x1fe7 @0x11
0x1fd6…1ff7 at0012 = ╱45╱E╱ // 0x1fe8 @0x12
0x1fd6…1ff7 at0013 = ╱47╱G╱ // 0x1fe9 @0x13
0x1fd6…1ff7 at0014 = ╱ef╱$╱ // 0x1fea @0x14
0x1fd6…1ff7 at0015 = ╱ed╱(╱ // 0x1feb @0x15
0x1fd6…1ff7 at0016 = ╱45╱E╱ // 0x1fec @0x16
0x1fd6…1ff7 at0017 = ╱f0╱:╱ // 0x1fed @0x17
0x1fd6…1ff7 at0018 = ╱37╱7╱ // 0x1fee @0x18
0x1fd6…1ff7 at0019 = ╱31╱1╱ // 0x1fef @0x19
0x1fd6…1ff7 at001a = ╱fe00008e07╱ // 0x1ff0 @0x1a
0x1fd6…1ff7 at001f = ╱ee╱)╱ // 0x1ff5 @0x1f
0x1fd6…1ff7 at0020 = EOL // 0x1ff6 @0x20
0x1fd6…1ff7 }
0x1ff7…201b ad72 3240 EXEC LINIEUD(GFNR,GLNAVN$,SALDO12$)
0x1ff7…201b LineComalBin {
0x1ff7…201b ptr = 0xad72 // 0x1ff7 @0x0
0x1ff7…201b lno = 0x0ca8 // 0x1ff9 @0x2
0x1ff7…201b at0004 = ╱9d╱ EXEC ╱ // 0x1ffb @0x4
0x1ff7…201b at0005 = ╱4c╱L╱ // 0x1ffc @0x5
0x1ff7…201b at0006 = ╱49╱I╱ // 0x1ffd @0x6
0x1ff7…201b at0007 = ╱4e╱N╱ // 0x1ffe @0x7
0x1ff7…201b at0008 = ╱49╱I╱ // 0x1fff @0x8
0x1ff7…201b at0009 = ╱45╱E╱ // 0x2000 @0x9
0x1ff7…201b at000a = ╱55╱U╱ // 0x2001 @0xa
0x1ff7…201b at000b = ╱44╱D╱ // 0x2002 @0xb
0x1ff7…201b at000c = ╱ed╱(╱ // 0x2003 @0xc
0x1ff7…201b at000d = ╱47╱G╱ // 0x2004 @0xd
0x1ff7…201b at000e = ╱46╱F╱ // 0x2005 @0xe
0x1ff7…201b at000f = ╱4e╱N╱ // 0x2006 @0xf
0x1ff7…201b at0010 = ╱52╱R╱ // 0x2007 @0x10
0x1ff7…201b at0011 = ╱ec╱,╱ // 0x2008 @0x11
0x1ff7…201b at0012 = ╱47╱G╱ // 0x2009 @0x12
0x1ff7…201b at0013 = ╱4c╱L╱ // 0x200a @0x13
0x1ff7…201b at0014 = ╱4e╱N╱ // 0x200b @0x14
0x1ff7…201b at0015 = ╱41╱A╱ // 0x200c @0x15
0x1ff7…201b at0016 = ╱56╱V╱ // 0x200d @0x16
0x1ff7…201b at0017 = ╱4e╱N╱ // 0x200e @0x17
0x1ff7…201b at0018 = ╱ef╱$╱ // 0x200f @0x18
0x1ff7…201b at0019 = ╱ec╱,╱ // 0x2010 @0x19
0x1ff7…201b at001a = ╱53╱S╱ // 0x2011 @0x1a
0x1ff7…201b at001b = ╱41╱A╱ // 0x2012 @0x1b
0x1ff7…201b at001c = ╱4c╱L╱ // 0x2013 @0x1c
0x1ff7…201b at001d = ╱44╱D╱ // 0x2014 @0x1d
0x1ff7…201b at001e = ╱4f╱O╱ // 0x2015 @0x1e
0x1ff7…201b at001f = ╱31╱1╱ // 0x2016 @0x1f
0x1ff7…201b at0020 = ╱32╱2╱ // 0x2017 @0x20
0x1ff7…201b at0021 = ╱ef╱$╱ // 0x2018 @0x21
0x1ff7…201b at0022 = ╱ee╱)╱ // 0x2019 @0x22
0x1ff7…201b at0023 = EOL // 0x201a @0x23
0x1ff7…201b }
0x201b…2042 ad99 3250 SALDO12$="0+";LINIE=LINIE+V;GFNR=B
0x201b…2042 LineComalBin {
0x201b…2042 ptr = 0xad99 // 0x201b @0x0
0x201b…2042 lno = 0x0cb2 // 0x201d @0x2
0x201b…2042 at0004 = ╱53╱S╱ // 0x201f @0x4
0x201b…2042 at0005 = ╱41╱A╱ // 0x2020 @0x5
0x201b…2042 at0006 = ╱4c╱L╱ // 0x2021 @0x6
0x201b…2042 at0007 = ╱44╱D╱ // 0x2022 @0x7
0x201b…2042 at0008 = ╱4f╱O╱ // 0x2023 @0x8
0x201b…2042 at0009 = ╱31╱1╱ // 0x2024 @0x9
0x201b…2042 at000a = ╱32╱2╱ // 0x2025 @0xa
0x201b…2042 at000b = ╱ef╱$╱ // 0x2026 @0xb
0x201b…2042 at000c = ╱dc╱=╱ // 0x2027 @0xc
0x201b…2042 at000d = ╱22╱"╱ // 0x2028 @0xd
0x201b…2042 at000e = ╱30╱0╱ // 0x2029 @0xe
0x201b…2042 at000f = ╱2b╱+╱ // 0x202a @0xf
0x201b…2042 at0010 = ╱22╱"╱ // 0x202b @0x10
0x201b…2042 at0011 = ╱eb╱;╱ // 0x202c @0x11
0x201b…2042 at0012 = ╱4c╱L╱ // 0x202d @0x12
0x201b…2042 at0013 = ╱49╱I╱ // 0x202e @0x13
0x201b…2042 at0014 = ╱4e╱N╱ // 0x202f @0x14
0x201b…2042 at0015 = ╱49╱I╱ // 0x2030 @0x15
0x201b…2042 at0016 = ╱45╱E╱ // 0x2031 @0x16
0x201b…2042 at0017 = ╱dc╱=╱ // 0x2032 @0x17
0x201b…2042 at0018 = ╱4c╱L╱ // 0x2033 @0x18
0x201b…2042 at0019 = ╱49╱I╱ // 0x2034 @0x19
0x201b…2042 at001a = ╱4e╱N╱ // 0x2035 @0x1a
0x201b…2042 at001b = ╱49╱I╱ // 0x2036 @0x1b
0x201b…2042 at001c = ╱45╱E╱ // 0x2037 @0x1c
0x201b…2042 at001d = ╱e2╱+╱ // 0x2038 @0x1d
0x201b…2042 at001e = ╱56╱V╱ // 0x2039 @0x1e
0x201b…2042 at001f = ╱eb╱;╱ // 0x203a @0x1f
0x201b…2042 at0020 = ╱47╱G╱ // 0x203b @0x20
0x201b…2042 at0021 = ╱46╱F╱ // 0x203c @0x21
0x201b…2042 at0022 = ╱4e╱N╱ // 0x203d @0x22
0x201b…2042 at0023 = ╱52╱R╱ // 0x203e @0x23
0x201b…2042 at0024 = ╱dc╱=╱ // 0x203f @0x24
0x201b…2042 at0025 = ╱42╱B╱ // 0x2040 @0x25
0x201b…2042 at0026 = EOL // 0x2041 @0x26
0x201b…2042 }
0x2042…2054 adab 3260 SALDO11$="0+"
0x2042…2054 LineComalBin {
0x2042…2054 ptr = 0xadab // 0x2042 @0x0
0x2042…2054 lno = 0x0cbc // 0x2044 @0x2
0x2042…2054 at0004 = ╱53╱S╱ // 0x2046 @0x4
0x2042…2054 at0005 = ╱41╱A╱ // 0x2047 @0x5
0x2042…2054 at0006 = ╱4c╱L╱ // 0x2048 @0x6
0x2042…2054 at0007 = ╱44╱D╱ // 0x2049 @0x7
0x2042…2054 at0008 = ╱4f╱O╱ // 0x204a @0x8
0x2042…2054 at0009 = ╱31╱1╱ // 0x204b @0x9
0x2042…2054 at000a = ╱31╱1╱ // 0x204c @0xa
0x2042…2054 at000b = ╱ef╱$╱ // 0x204d @0xb
0x2042…2054 at000c = ╱dc╱=╱ // 0x204e @0xc
0x2042…2054 at000d = ╱22╱"╱ // 0x204f @0xd
0x2042…2054 at000e = ╱30╱0╱ // 0x2050 @0xe
0x2042…2054 at000f = ╱2b╱+╱ // 0x2051 @0xf
0x2042…2054 at0010 = ╱22╱"╱ // 0x2052 @0x10
0x2042…2054 at0011 = EOL // 0x2053 @0x11
0x2042…2054 }
0x2054…205a adb1 3270 ENDIF
0x2054…205a LineComalBin {
0x2054…205a ptr = 0xadb1 // 0x2054 @0x0
0x2054…205a lno = 0x0cc6 // 0x2056 @0x2
0x2054…205a at0004 = ╱9b╱ ENDIF ╱ // 0x2058 @0x4
0x2054…205a at0005 = EOL // 0x2059 @0x5
0x2054…205a }
0x205a…2068 adbf 3271 IF GFNR1>B THEN
0x205a…2068 LineComalBin {
0x205a…2068 ptr = 0xadbf // 0x205a @0x0
0x205a…2068 lno = 0x0cc7 // 0x205c @0x2
0x205a…2068 at0004 = ╱9c╱ IF ╱ // 0x205e @0x4
0x205a…2068 at0005 = ╱47╱G╱ // 0x205f @0x5
0x205a…2068 at0006 = ╱46╱F╱ // 0x2060 @0x6
0x205a…2068 at0007 = ╱4e╱N╱ // 0x2061 @0x7
0x205a…2068 at0008 = ╱52╱R╱ // 0x2062 @0x8
0x205a…2068 at0009 = ╱31╱1╱ // 0x2063 @0x9
0x205a…2068 at000a = ╱de╱>╱ // 0x2064 @0xa
0x205a…2068 at000b = ╱42╱B╱ // 0x2065 @0xb
0x205a…2068 at000c = ╱b6╱ THEN ╱ // 0x2066 @0xc
0x205a…2068 at000d = EOL // 0x2067 @0xd
0x205a…2068 }
0x2068…2093 adea 3272 IF LINIE>37 THEN EXEC NYSIDE(GFNR1,GLNAVN1$)
0x2068…2093 LineComalBin {
0x2068…2093 ptr = 0xadea // 0x2068 @0x0
0x2068…2093 lno = 0x0cc8 // 0x206a @0x2
0x2068…2093 at0004 = ╱82╱ IF ╱ // 0x206c @0x4
0x2068…2093 at0005 = ╱4c╱L╱ // 0x206d @0x5
0x2068…2093 at0006 = ╱49╱I╱ // 0x206e @0x6
0x2068…2093 at0007 = ╱4e╱N╱ // 0x206f @0x7
0x2068…2093 at0008 = ╱49╱I╱ // 0x2070 @0x8
0x2068…2093 at0009 = ╱45╱E╱ // 0x2071 @0x9
0x2068…2093 at000a = ╱de╱>╱ // 0x2072 @0xa
0x2068…2093 at000b = ╱33╱3╱ // 0x2073 @0xb
0x2068…2093 at000c = ╱37╱7╱ // 0x2074 @0xc
0x2068…2093 at000d = ╱fe00009406╱ // 0x2075 @0xd
0x2068…2093 at0012 = ╱b6╱ THEN ╱ // 0x207a @0x12
0x2068…2093 at0013 = ╱9d╱ EXEC ╱ // 0x207b @0x13
0x2068…2093 at0014 = ╱4e╱N╱ // 0x207c @0x14
0x2068…2093 at0015 = ╱59╱Y╱ // 0x207d @0x15
0x2068…2093 at0016 = ╱53╱S╱ // 0x207e @0x16
0x2068…2093 at0017 = ╱49╱I╱ // 0x207f @0x17
0x2068…2093 at0018 = ╱44╱D╱ // 0x2080 @0x18
0x2068…2093 at0019 = ╱45╱E╱ // 0x2081 @0x19
0x2068…2093 at001a = ╱ed╱(╱ // 0x2082 @0x1a
0x2068…2093 at001b = ╱47╱G╱ // 0x2083 @0x1b
0x2068…2093 at001c = ╱46╱F╱ // 0x2084 @0x1c
0x2068…2093 at001d = ╱4e╱N╱ // 0x2085 @0x1d
0x2068…2093 at001e = ╱52╱R╱ // 0x2086 @0x1e
0x2068…2093 at001f = ╱31╱1╱ // 0x2087 @0x1f
0x2068…2093 at0020 = ╱ec╱,╱ // 0x2088 @0x20
0x2068…2093 at0021 = ╱47╱G╱ // 0x2089 @0x21
0x2068…2093 at0022 = ╱4c╱L╱ // 0x208a @0x22
0x2068…2093 at0023 = ╱4e╱N╱ // 0x208b @0x23
0x2068…2093 at0024 = ╱41╱A╱ // 0x208c @0x24
0x2068…2093 at0025 = ╱56╱V╱ // 0x208d @0x25
0x2068…2093 at0026 = ╱4e╱N╱ // 0x208e @0x26
0x2068…2093 at0027 = ╱31╱1╱ // 0x208f @0x27
0x2068…2093 at0028 = ╱ef╱$╱ // 0x2090 @0x28
0x2068…2093 at0029 = ╱ee╱)╱ // 0x2091 @0x29
0x2068…2093 at002a = EOL // 0x2092 @0x2a
0x2068…2093 }
0x2093…209c adf3 3273 PRINT " "
0x2093…209c LineComalBin {
0x2093…209c ptr = 0xadf3 // 0x2093 @0x0
0x2093…209c lno = 0x0cc9 // 0x2095 @0x2
0x2093…209c at0004 = ╱92╱ PRINT ╱ // 0x2097 @0x4
0x2093…209c at0005 = ╱22╱"╱ // 0x2098 @0x5
0x2093…209c at0006 = ╱20╱…╱ // 0x2099 @0x6
0x2093…209c at0007 = ╱22╱"╱ // 0x209a @0x7
0x2093…209c at0008 = EOL // 0x209b @0x8
0x2093…209c }
0x209c…20bd ae14 3274 PRINT TAB(8);STREG$(E:71)
0x209c…20bd LineComalBin {
0x209c…20bd ptr = 0xae14 // 0x209c @0x0
0x209c…20bd lno = 0x0cca // 0x209e @0x2
0x209c…20bd at0004 = ╱92╱ PRINT ╱ // 0x20a0 @0x4
0x209c…20bd at0005 = ╱d2╱TAB╱ // 0x20a1 @0x5
0x209c…20bd at0006 = ╱ed╱(╱ // 0x20a2 @0x6
0x209c…20bd at0007 = ╱38╱8╱ // 0x20a3 @0x7
0x209c…20bd at0008 = ╱fe00008004╱ // 0x20a4 @0x8
0x209c…20bd at000d = ╱ee╱)╱ // 0x20a9 @0xd
0x209c…20bd at000e = ╱eb╱;╱ // 0x20aa @0xe
0x209c…20bd at000f = ╱53╱S╱ // 0x20ab @0xf
0x209c…20bd at0010 = ╱54╱T╱ // 0x20ac @0x10
0x209c…20bd at0011 = ╱52╱R╱ // 0x20ad @0x11
0x209c…20bd at0012 = ╱45╱E╱ // 0x20ae @0x12
0x209c…20bd at0013 = ╱47╱G╱ // 0x20af @0x13
0x209c…20bd at0014 = ╱ef╱$╱ // 0x20b0 @0x14
0x209c…20bd at0015 = ╱ed╱(╱ // 0x20b1 @0x15
0x209c…20bd at0016 = ╱45╱E╱ // 0x20b2 @0x16
0x209c…20bd at0017 = ╱f0╱:╱ // 0x20b3 @0x17
0x209c…20bd at0018 = ╱37╱7╱ // 0x20b4 @0x18
0x209c…20bd at0019 = ╱31╱1╱ // 0x20b5 @0x19
0x209c…20bd at001a = ╱fe00008e07╱ // 0x20b6 @0x1a
0x209c…20bd at001f = ╱ee╱)╱ // 0x20bb @0x1f
0x209c…20bd at0020 = EOL // 0x20bc @0x20
0x209c…20bd }
0x20bd…20e3 ae3a 3275 EXEC LINIEUD(GFNR1,GLNAVN1$,SALDO14$)
0x20bd…20e3 LineComalBin {
0x20bd…20e3 ptr = 0xae3a // 0x20bd @0x0
0x20bd…20e3 lno = 0x0ccb // 0x20bf @0x2
0x20bd…20e3 at0004 = ╱9d╱ EXEC ╱ // 0x20c1 @0x4
0x20bd…20e3 at0005 = ╱4c╱L╱ // 0x20c2 @0x5
0x20bd…20e3 at0006 = ╱49╱I╱ // 0x20c3 @0x6
0x20bd…20e3 at0007 = ╱4e╱N╱ // 0x20c4 @0x7
0x20bd…20e3 at0008 = ╱49╱I╱ // 0x20c5 @0x8
0x20bd…20e3 at0009 = ╱45╱E╱ // 0x20c6 @0x9
0x20bd…20e3 at000a = ╱55╱U╱ // 0x20c7 @0xa
0x20bd…20e3 at000b = ╱44╱D╱ // 0x20c8 @0xb
0x20bd…20e3 at000c = ╱ed╱(╱ // 0x20c9 @0xc
0x20bd…20e3 at000d = ╱47╱G╱ // 0x20ca @0xd
0x20bd…20e3 at000e = ╱46╱F╱ // 0x20cb @0xe
0x20bd…20e3 at000f = ╱4e╱N╱ // 0x20cc @0xf
0x20bd…20e3 at0010 = ╱52╱R╱ // 0x20cd @0x10
0x20bd…20e3 at0011 = ╱31╱1╱ // 0x20ce @0x11
0x20bd…20e3 at0012 = ╱ec╱,╱ // 0x20cf @0x12
0x20bd…20e3 at0013 = ╱47╱G╱ // 0x20d0 @0x13
0x20bd…20e3 at0014 = ╱4c╱L╱ // 0x20d1 @0x14
0x20bd…20e3 at0015 = ╱4e╱N╱ // 0x20d2 @0x15
0x20bd…20e3 at0016 = ╱41╱A╱ // 0x20d3 @0x16
0x20bd…20e3 at0017 = ╱56╱V╱ // 0x20d4 @0x17
0x20bd…20e3 at0018 = ╱4e╱N╱ // 0x20d5 @0x18
0x20bd…20e3 at0019 = ╱31╱1╱ // 0x20d6 @0x19
0x20bd…20e3 at001a = ╱ef╱$╱ // 0x20d7 @0x1a
0x20bd…20e3 at001b = ╱ec╱,╱ // 0x20d8 @0x1b
0x20bd…20e3 at001c = ╱53╱S╱ // 0x20d9 @0x1c
0x20bd…20e3 at001d = ╱41╱A╱ // 0x20da @0x1d
0x20bd…20e3 at001e = ╱4c╱L╱ // 0x20db @0x1e
0x20bd…20e3 at001f = ╱44╱D╱ // 0x20dc @0x1f
0x20bd…20e3 at0020 = ╱4f╱O╱ // 0x20dd @0x20
0x20bd…20e3 at0021 = ╱31╱1╱ // 0x20de @0x21
0x20bd…20e3 at0022 = ╱34╱4╱ // 0x20df @0x22
0x20bd…20e3 at0023 = ╱ef╱$╱ // 0x20e0 @0x23
0x20bd…20e3 at0024 = ╱ee╱)╱ // 0x20e1 @0x24
0x20bd…20e3 at0025 = EOL // 0x20e2 @0x25
0x20bd…20e3 }
0x20e3…20f5 ae4c 3276 LINIE=LINIE+V
0x20e3…20f5 LineComalBin {
0x20e3…20f5 ptr = 0xae4c // 0x20e3 @0x0
0x20e3…20f5 lno = 0x0ccc // 0x20e5 @0x2
0x20e3…20f5 at0004 = ╱4c╱L╱ // 0x20e7 @0x4
0x20e3…20f5 at0005 = ╱49╱I╱ // 0x20e8 @0x5
0x20e3…20f5 at0006 = ╱4e╱N╱ // 0x20e9 @0x6
0x20e3…20f5 at0007 = ╱49╱I╱ // 0x20ea @0x7
0x20e3…20f5 at0008 = ╱45╱E╱ // 0x20eb @0x8
0x20e3…20f5 at0009 = ╱dc╱=╱ // 0x20ec @0x9
0x20e3…20f5 at000a = ╱4c╱L╱ // 0x20ed @0xa
0x20e3…20f5 at000b = ╱49╱I╱ // 0x20ee @0xb
0x20e3…20f5 at000c = ╱4e╱N╱ // 0x20ef @0xc
0x20e3…20f5 at000d = ╱49╱I╱ // 0x20f0 @0xd
0x20e3…20f5 at000e = ╱45╱E╱ // 0x20f1 @0xe
0x20e3…20f5 at000f = ╱e2╱+╱ // 0x20f2 @0xf
0x20e3…20f5 at0010 = ╱56╱V╱ // 0x20f3 @0x10
0x20e3…20f5 at0011 = EOL // 0x20f4 @0x11
0x20e3…20f5 }
0x20f5…20fb ae52 3277 ENDIF
0x20f5…20fb LineComalBin {
0x20f5…20fb ptr = 0xae52 // 0x20f5 @0x0
0x20f5…20fb lno = 0x0ccd // 0x20f7 @0x2
0x20f5…20fb at0004 = ╱9b╱ ENDIF ╱ // 0x20f9 @0x4
0x20f5…20fb at0005 = EOL // 0x20fa @0x5
0x20f5…20fb }
0x20fb…2126 ae7d 3280 IF LINIE>36 THEN EXEC NYSIDE(GFNR1,GLNAVN1$)
0x20fb…2126 LineComalBin {
0x20fb…2126 ptr = 0xae7d // 0x20fb @0x0
0x20fb…2126 lno = 0x0cd0 // 0x20fd @0x2
0x20fb…2126 at0004 = ╱82╱ IF ╱ // 0x20ff @0x4
0x20fb…2126 at0005 = ╱4c╱L╱ // 0x2100 @0x5
0x20fb…2126 at0006 = ╱49╱I╱ // 0x2101 @0x6
0x20fb…2126 at0007 = ╱4e╱N╱ // 0x2102 @0x7
0x20fb…2126 at0008 = ╱49╱I╱ // 0x2103 @0x8
0x20fb…2126 at0009 = ╱45╱E╱ // 0x2104 @0x9
0x20fb…2126 at000a = ╱de╱>╱ // 0x2105 @0xa
0x20fb…2126 at000b = ╱33╱3╱ // 0x2106 @0xb
0x20fb…2126 at000c = ╱36╱6╱ // 0x2107 @0xc
0x20fb…2126 at000d = ╱fe00009006╱ // 0x2108 @0xd
0x20fb…2126 at0012 = ╱b6╱ THEN ╱ // 0x210d @0x12
0x20fb…2126 at0013 = ╱9d╱ EXEC ╱ // 0x210e @0x13
0x20fb…2126 at0014 = ╱4e╱N╱ // 0x210f @0x14
0x20fb…2126 at0015 = ╱59╱Y╱ // 0x2110 @0x15
0x20fb…2126 at0016 = ╱53╱S╱ // 0x2111 @0x16
0x20fb…2126 at0017 = ╱49╱I╱ // 0x2112 @0x17
0x20fb…2126 at0018 = ╱44╱D╱ // 0x2113 @0x18
0x20fb…2126 at0019 = ╱45╱E╱ // 0x2114 @0x19
0x20fb…2126 at001a = ╱ed╱(╱ // 0x2115 @0x1a
0x20fb…2126 at001b = ╱47╱G╱ // 0x2116 @0x1b
0x20fb…2126 at001c = ╱46╱F╱ // 0x2117 @0x1c
0x20fb…2126 at001d = ╱4e╱N╱ // 0x2118 @0x1d
0x20fb…2126 at001e = ╱52╱R╱ // 0x2119 @0x1e
0x20fb…2126 at001f = ╱31╱1╱ // 0x211a @0x1f
0x20fb…2126 at0020 = ╱ec╱,╱ // 0x211b @0x20
0x20fb…2126 at0021 = ╱47╱G╱ // 0x211c @0x21
0x20fb…2126 at0022 = ╱4c╱L╱ // 0x211d @0x22
0x20fb…2126 at0023 = ╱4e╱N╱ // 0x211e @0x23
0x20fb…2126 at0024 = ╱41╱A╱ // 0x211f @0x24
0x20fb…2126 at0025 = ╱56╱V╱ // 0x2120 @0x25
0x20fb…2126 at0026 = ╱4e╱N╱ // 0x2121 @0x26
0x20fb…2126 at0027 = ╱31╱1╱ // 0x2122 @0x27
0x20fb…2126 at0028 = ╱ef╱$╱ // 0x2123 @0x28
0x20fb…2126 at0029 = ╱ee╱)╱ // 0x2124 @0x29
0x20fb…2126 at002a = EOL // 0x2125 @0x2a
0x20fb…2126 }
0x2126…2150 aea7 3290 GLNAVN$="Difference";GFNR=100000
0x2126…2150 LineComalBin {
0x2126…2150 ptr = 0xaea7 // 0x2126 @0x0
0x2126…2150 lno = 0x0cda // 0x2128 @0x2
0x2126…2150 at0004 = ╱47╱G╱ // 0x212a @0x4
0x2126…2150 at0005 = ╱4c╱L╱ // 0x212b @0x5
0x2126…2150 at0006 = ╱4e╱N╱ // 0x212c @0x6
0x2126…2150 at0007 = ╱41╱A╱ // 0x212d @0x7
0x2126…2150 at0008 = ╱56╱V╱ // 0x212e @0x8
0x2126…2150 at0009 = ╱4e╱N╱ // 0x212f @0x9
0x2126…2150 at000a = ╱ef╱$╱ // 0x2130 @0xa
0x2126…2150 at000b = ╱dc╱=╱ // 0x2131 @0xb
0x2126…2150 at000c = ╱22╱"╱ // 0x2132 @0xc
0x2126…2150 at000d = ╱44╱D╱ // 0x2133 @0xd
0x2126…2150 at000e = ╱69╱i╱ // 0x2134 @0xe
0x2126…2150 at000f = ╱66╱f╱ // 0x2135 @0xf
0x2126…2150 at0010 = ╱66╱f╱ // 0x2136 @0x10
0x2126…2150 at0011 = ╱65╱e╱ // 0x2137 @0x11
0x2126…2150 at0012 = ╱72╱r╱ // 0x2138 @0x12
0x2126…2150 at0013 = ╱65╱e╱ // 0x2139 @0x13
0x2126…2150 at0014 = ╱6e╱n╱ // 0x213a @0x14
0x2126…2150 at0015 = ╱63╱c╱ // 0x213b @0x15
0x2126…2150 at0016 = ╱65╱e╱ // 0x213c @0x16
0x2126…2150 at0017 = ╱22╱"╱ // 0x213d @0x17
0x2126…2150 at0018 = ╱eb╱;╱ // 0x213e @0x18
0x2126…2150 at0019 = ╱47╱G╱ // 0x213f @0x19
0x2126…2150 at001a = ╱46╱F╱ // 0x2140 @0x1a
0x2126…2150 at001b = ╱4e╱N╱ // 0x2141 @0x1b
0x2126…2150 at001c = ╱52╱R╱ // 0x2142 @0x1c
0x2126…2150 at001d = ╱dc╱=╱ // 0x2143 @0x1d
0x2126…2150 at001e = ╱31╱1╱ // 0x2144 @0x1e
0x2126…2150 at001f = ╱30╱0╱ // 0x2145 @0x1f
0x2126…2150 at0020 = ╱30╱0╱ // 0x2146 @0x20
0x2126…2150 at0021 = ╱30╱0╱ // 0x2147 @0x21
0x2126…2150 at0022 = ╱30╱0╱ // 0x2148 @0x22
0x2126…2150 at0023 = ╱30╱0╱ // 0x2149 @0x23
0x2126…2150 at0024 = ╱fe0050c311╱ // 0x214a @0x24
0x2126…2150 at0029 = EOL // 0x214f @0x29
0x2126…2150 }
0x2150…2159 aeb0 3300 PRINT " "
0x2150…2159 LineComalBin {
0x2150…2159 ptr = 0xaeb0 // 0x2150 @0x0
0x2150…2159 lno = 0x0ce4 // 0x2152 @0x2
0x2150…2159 at0004 = ╱92╱ PRINT ╱ // 0x2154 @0x4
0x2150…2159 at0005 = ╱22╱"╱ // 0x2155 @0x5
0x2150…2159 at0006 = ╱20╱…╱ // 0x2156 @0x6
0x2150…2159 at0007 = ╱22╱"╱ // 0x2157 @0x7
0x2150…2159 at0008 = EOL // 0x2158 @0x8
0x2150…2159 }
0x2159…217a aed1 3310 PRINT TAB(8);STREG$(E:71)
0x2159…217a LineComalBin {
0x2159…217a ptr = 0xaed1 // 0x2159 @0x0
0x2159…217a lno = 0x0cee // 0x215b @0x2
0x2159…217a at0004 = ╱92╱ PRINT ╱ // 0x215d @0x4
0x2159…217a at0005 = ╱d2╱TAB╱ // 0x215e @0x5
0x2159…217a at0006 = ╱ed╱(╱ // 0x215f @0x6
0x2159…217a at0007 = ╱38╱8╱ // 0x2160 @0x7
0x2159…217a at0008 = ╱fe00008004╱ // 0x2161 @0x8
0x2159…217a at000d = ╱ee╱)╱ // 0x2166 @0xd
0x2159…217a at000e = ╱eb╱;╱ // 0x2167 @0xe
0x2159…217a at000f = ╱53╱S╱ // 0x2168 @0xf
0x2159…217a at0010 = ╱54╱T╱ // 0x2169 @0x10
0x2159…217a at0011 = ╱52╱R╱ // 0x216a @0x11
0x2159…217a at0012 = ╱45╱E╱ // 0x216b @0x12
0x2159…217a at0013 = ╱47╱G╱ // 0x216c @0x13
0x2159…217a at0014 = ╱ef╱$╱ // 0x216d @0x14
0x2159…217a at0015 = ╱ed╱(╱ // 0x216e @0x15
0x2159…217a at0016 = ╱45╱E╱ // 0x216f @0x16
0x2159…217a at0017 = ╱f0╱:╱ // 0x2170 @0x17
0x2159…217a at0018 = ╱37╱7╱ // 0x2171 @0x18
0x2159…217a at0019 = ╱31╱1╱ // 0x2172 @0x19
0x2159…217a at001a = ╱fe00008e07╱ // 0x2173 @0x1a
0x2159…217a at001f = ╱ee╱)╱ // 0x2178 @0x1f
0x2159…217a at0020 = EOL // 0x2179 @0x20
0x2159…217a }
0x217a…219e aef5 3320 EXEC LINIEUD(GFNR,GLNAVN$,SALDO13$)
0x217a…219e LineComalBin {
0x217a…219e ptr = 0xaef5 // 0x217a @0x0
0x217a…219e lno = 0x0cf8 // 0x217c @0x2
0x217a…219e at0004 = ╱9d╱ EXEC ╱ // 0x217e @0x4
0x217a…219e at0005 = ╱4c╱L╱ // 0x217f @0x5
0x217a…219e at0006 = ╱49╱I╱ // 0x2180 @0x6
0x217a…219e at0007 = ╱4e╱N╱ // 0x2181 @0x7
0x217a…219e at0008 = ╱49╱I╱ // 0x2182 @0x8
0x217a…219e at0009 = ╱45╱E╱ // 0x2183 @0x9
0x217a…219e at000a = ╱55╱U╱ // 0x2184 @0xa
0x217a…219e at000b = ╱44╱D╱ // 0x2185 @0xb
0x217a…219e at000c = ╱ed╱(╱ // 0x2186 @0xc
0x217a…219e at000d = ╱47╱G╱ // 0x2187 @0xd
0x217a…219e at000e = ╱46╱F╱ // 0x2188 @0xe
0x217a…219e at000f = ╱4e╱N╱ // 0x2189 @0xf
0x217a…219e at0010 = ╱52╱R╱ // 0x218a @0x10
0x217a…219e at0011 = ╱ec╱,╱ // 0x218b @0x11
0x217a…219e at0012 = ╱47╱G╱ // 0x218c @0x12
0x217a…219e at0013 = ╱4c╱L╱ // 0x218d @0x13
0x217a…219e at0014 = ╱4e╱N╱ // 0x218e @0x14
0x217a…219e at0015 = ╱41╱A╱ // 0x218f @0x15
0x217a…219e at0016 = ╱56╱V╱ // 0x2190 @0x16
0x217a…219e at0017 = ╱4e╱N╱ // 0x2191 @0x17
0x217a…219e at0018 = ╱ef╱$╱ // 0x2192 @0x18
0x217a…219e at0019 = ╱ec╱,╱ // 0x2193 @0x19
0x217a…219e at001a = ╱53╱S╱ // 0x2194 @0x1a
0x217a…219e at001b = ╱41╱A╱ // 0x2195 @0x1b
0x217a…219e at001c = ╱4c╱L╱ // 0x2196 @0x1c
0x217a…219e at001d = ╱44╱D╱ // 0x2197 @0x1d
0x217a…219e at001e = ╱4f╱O╱ // 0x2198 @0x1e
0x217a…219e at001f = ╱31╱1╱ // 0x2199 @0x1f
0x217a…219e at0020 = ╱33╱3╱ // 0x219a @0x20
0x217a…219e at0021 = ╱ef╱$╱ // 0x219b @0x21
0x217a…219e at0022 = ╱ee╱)╱ // 0x219c @0x22
0x217a…219e at0023 = EOL // 0x219d @0x23
0x217a…219e }
0x219e…21bf af16 3330 PRINT TAB(8);STREG$(E:71)
0x219e…21bf LineComalBin {
0x219e…21bf ptr = 0xaf16 // 0x219e @0x0
0x219e…21bf lno = 0x0d02 // 0x21a0 @0x2
0x219e…21bf at0004 = ╱92╱ PRINT ╱ // 0x21a2 @0x4
0x219e…21bf at0005 = ╱d2╱TAB╱ // 0x21a3 @0x5
0x219e…21bf at0006 = ╱ed╱(╱ // 0x21a4 @0x6
0x219e…21bf at0007 = ╱38╱8╱ // 0x21a5 @0x7
0x219e…21bf at0008 = ╱fe00008004╱ // 0x21a6 @0x8
0x219e…21bf at000d = ╱ee╱)╱ // 0x21ab @0xd
0x219e…21bf at000e = ╱eb╱;╱ // 0x21ac @0xe
0x219e…21bf at000f = ╱53╱S╱ // 0x21ad @0xf
0x219e…21bf at0010 = ╱54╱T╱ // 0x21ae @0x10
0x219e…21bf at0011 = ╱52╱R╱ // 0x21af @0x11
0x219e…21bf at0012 = ╱45╱E╱ // 0x21b0 @0x12
0x219e…21bf at0013 = ╱47╱G╱ // 0x21b1 @0x13
0x219e…21bf at0014 = ╱ef╱$╱ // 0x21b2 @0x14
0x219e…21bf at0015 = ╱ed╱(╱ // 0x21b3 @0x15
0x219e…21bf at0016 = ╱45╱E╱ // 0x21b4 @0x16
0x219e…21bf at0017 = ╱f0╱:╱ // 0x21b5 @0x17
0x219e…21bf at0018 = ╱37╱7╱ // 0x21b6 @0x18
0x219e…21bf at0019 = ╱31╱1╱ // 0x21b7 @0x19
0x219e…21bf at001a = ╱fe00008e07╱ // 0x21b8 @0x1a
0x219e…21bf at001f = ╱ee╱)╱ // 0x21bd @0x1f
0x219e…21bf at0020 = EOL // 0x21be @0x20
0x219e…21bf }
0x21bf…21d8 af2f 3340 FOR LINIE=LINIE TO 37
0x21bf…21d8 LineComalBin {
0x21bf…21d8 ptr = 0xaf2f // 0x21bf @0x0
0x21bf…21d8 lno = 0x0d0c // 0x21c1 @0x2
0x21bf…21d8 at0004 = ╱83╱ FOR ╱ // 0x21c3 @0x4
0x21bf…21d8 at0005 = ╱4c╱L╱ // 0x21c4 @0x5
0x21bf…21d8 at0006 = ╱49╱I╱ // 0x21c5 @0x6
0x21bf…21d8 at0007 = ╱4e╱N╱ // 0x21c6 @0x7
0x21bf…21d8 at0008 = ╱49╱I╱ // 0x21c7 @0x8
0x21bf…21d8 at0009 = ╱45╱E╱ // 0x21c8 @0x9
0x21bf…21d8 at000a = ╱dc╱=╱ // 0x21c9 @0xa
0x21bf…21d8 at000b = ╱4c╱L╱ // 0x21ca @0xb
0x21bf…21d8 at000c = ╱49╱I╱ // 0x21cb @0xc
0x21bf…21d8 at000d = ╱4e╱N╱ // 0x21cc @0xd
0x21bf…21d8 at000e = ╱49╱I╱ // 0x21cd @0xe
0x21bf…21d8 at000f = ╱45╱E╱ // 0x21ce @0xf
0x21bf…21d8 at0010 = ╱b7╱ TO ╱ // 0x21cf @0x10
0x21bf…21d8 at0011 = ╱33╱3╱ // 0x21d0 @0x11
0x21bf…21d8 at0012 = ╱37╱7╱ // 0x21d1 @0x12
0x21bf…21d8 at0013 = ╱fe00009406╱ // 0x21d2 @0x13
0x21bf…21d8 at0018 = EOL // 0x21d7 @0x18
0x21bf…21d8 }
0x21d8…21e9 af40 3350 PRINT CHR(10);
0x21d8…21e9 LineComalBin {
0x21d8…21e9 ptr = 0xaf40 // 0x21d8 @0x0
0x21d8…21e9 lno = 0x0d16 // 0x21da @0x2
0x21d8…21e9 at0004 = ╱92╱ PRINT ╱ // 0x21dc @0x4
0x21d8…21e9 at0005 = ╱cf╱CHR╱ // 0x21dd @0x5
0x21d8…21e9 at0006 = ╱ed╱(╱ // 0x21de @0x6
0x21d8…21e9 at0007 = ╱31╱1╱ // 0x21df @0x7
0x21d8…21e9 at0008 = ╱30╱0╱ // 0x21e0 @0x8
0x21d8…21e9 at0009 = ╱fe0000a004╱ // 0x21e1 @0x9
0x21d8…21e9 at000e = ╱ee╱)╱ // 0x21e6 @0xe
0x21d8…21e9 at000f = ╱eb╱;╱ // 0x21e7 @0xf
0x21d8…21e9 at0010 = EOL // 0x21e8 @0x10
0x21d8…21e9 }
0x21e9…21f4 af4b 3360 NEXT LINIE
0x21e9…21f4 LineComalBin {
0x21e9…21f4 ptr = 0xaf4b // 0x21e9 @0x0
0x21e9…21f4 lno = 0x0d20 // 0x21eb @0x2
0x21e9…21f4 at0004 = ╱84╱ NEXT ╱ // 0x21ed @0x4
0x21e9…21f4 at0005 = ╱4c╱L╱ // 0x21ee @0x5
0x21e9…21f4 at0006 = ╱49╱I╱ // 0x21ef @0x6
0x21e9…21f4 at0007 = ╱4e╱N╱ // 0x21f0 @0x7
0x21e9…21f4 at0008 = ╱49╱I╱ // 0x21f1 @0x8
0x21e9…21f4 at0009 = ╱45╱E╱ // 0x21f2 @0x9
0x21e9…21f4 at000a = EOL // 0x21f3 @0xa
0x21e9…21f4 }
0x21f4…21fd af54 3370 PRINT " "
0x21f4…21fd LineComalBin {
0x21f4…21fd ptr = 0xaf54 // 0x21f4 @0x0
0x21f4…21fd lno = 0x0d2a // 0x21f6 @0x2
0x21f4…21fd at0004 = ╱92╱ PRINT ╱ // 0x21f8 @0x4
0x21f4…21fd at0005 = ╱22╱"╱ // 0x21f9 @0x5
0x21f4…21fd at0006 = ╱20╱…╱ // 0x21fa @0x6
0x21f4…21fd at0007 = ╱22╱"╱ // 0x21fb @0x7
0x21f4…21fd at0008 = EOL // 0x21fc @0x8
0x21f4…21fd }
0x21fd…2204 (113,) af5b 3380 OUTPUT T
0x21fd…2204 LineComalBin {
0x21fd…2204 ptr = 0xaf5b // 0x21fd @0x0
0x21fd…2204 lno = 0x0d34 // 0x21ff @0x2
0x21fd…2204 at0004 = ╱a5╱ OUTPUT ╱ // 0x2201 @0x4
0x21fd…2204 at0005 = ╱54╱T╱ // 0x2202 @0x5
0x21fd…2204 at0006 = EOL // 0x2203 @0x6
0x21fd…2204 }
0x2204…220a af61 3390 CLEAR
0x2204…220a LineComalBin {
0x2204…220a ptr = 0xaf61 // 0x2204 @0x0
0x2204…220a lno = 0x0d3e // 0x2206 @0x2
0x2204…220a at0004 = ╱a0╱ CLEAR ╱ // 0x2208 @0x4
0x2204…220a at0005 = EOL // 0x2209 @0x5
0x2204…220a }
0x220a…2210 af67 3400 REPEAT
0x220a…2210 LineComalBin {
0x220a…2210 ptr = 0xaf67 // 0x220a @0x0
0x220a…2210 lno = 0x0d48 // 0x220c @0x2
0x220a…2210 at0004 = ╱97╱ REPEAT ╱ // 0x220e @0x4
0x220a…2210 at0005 = EOL // 0x220f @0x5
0x220a…2210 }
0x2210…2225 af7c 3410 CURSOR 15,13
0x2210…2225 LineComalBin {
0x2210…2225 ptr = 0xaf7c // 0x2210 @0x0
0x2210…2225 lno = 0x0d52 // 0x2212 @0x2
0x2210…2225 at0004 = ╱a1╱ CURSOR ╱ // 0x2214 @0x4
0x2210…2225 at0005 = ╱31╱1╱ // 0x2215 @0x5
0x2210…2225 at0006 = ╱35╱5╱ // 0x2216 @0x6
0x2210…2225 at0007 = ╱fe0000f004╱ // 0x2217 @0x7
0x2210…2225 at000c = ╱ec╱,╱ // 0x221c @0xc
0x2210…2225 at000d = ╱31╱1╱ // 0x221d @0xd
0x2210…2225 at000e = ╱33╱3╱ // 0x221e @0xe
0x2210…2225 at000f = ╱fe0000d004╱ // 0x221f @0xf
0x2210…2225 at0014 = EOL // 0x2224 @0x14
0x2210…2225 }
0x2225…224d afa4 3420 INPUT "Ønskes balance gentaget (J/N)",A$
0x2225…224d LineComalBin {
0x2225…224d ptr = 0xafa4 // 0x2225 @0x0
0x2225…224d lno = 0x0d5c // 0x2227 @0x2
0x2225…224d at0004 = ╱91╱ INPUT ╱ // 0x2229 @0x4
0x2225…224d at0005 = ╱22╱"╱ // 0x222a @0x5
0x2225…224d at0006 = ╱5c╱Ø╱ // 0x222b @0x6
0x2225…224d at0007 = ╱6e╱n╱ // 0x222c @0x7
0x2225…224d at0008 = ╱73╱s╱ // 0x222d @0x8
0x2225…224d at0009 = ╱6b╱k╱ // 0x222e @0x9
0x2225…224d at000a = ╱65╱e╱ // 0x222f @0xa
0x2225…224d at000b = ╱73╱s╱ // 0x2230 @0xb
0x2225…224d at000c = ╱20╱…╱ // 0x2231 @0xc
0x2225…224d at000d = ╱62╱b╱ // 0x2232 @0xd
0x2225…224d at000e = ╱61╱a╱ // 0x2233 @0xe
0x2225…224d at000f = ╱6c╱l╱ // 0x2234 @0xf
0x2225…224d at0010 = ╱61╱a╱ // 0x2235 @0x10
0x2225…224d at0011 = ╱6e╱n╱ // 0x2236 @0x11
0x2225…224d at0012 = ╱63╱c╱ // 0x2237 @0x12
0x2225…224d at0013 = ╱65╱e╱ // 0x2238 @0x13
0x2225…224d at0014 = ╱20╱…╱ // 0x2239 @0x14
0x2225…224d at0015 = ╱67╱g╱ // 0x223a @0x15
0x2225…224d at0016 = ╱65╱e╱ // 0x223b @0x16
0x2225…224d at0017 = ╱6e╱n╱ // 0x223c @0x17
0x2225…224d at0018 = ╱74╱t╱ // 0x223d @0x18
0x2225…224d at0019 = ╱61╱a╱ // 0x223e @0x19
0x2225…224d at001a = ╱67╱g╱ // 0x223f @0x1a
0x2225…224d at001b = ╱65╱e╱ // 0x2240 @0x1b
0x2225…224d at001c = ╱74╱t╱ // 0x2241 @0x1c
0x2225…224d at001d = ╱20╱…╱ // 0x2242 @0x1d
0x2225…224d at001e = ╱28╱(╱ // 0x2243 @0x1e
0x2225…224d at001f = ╱4a╱J╱ // 0x2244 @0x1f
0x2225…224d at0020 = ╱2f╱/╱ // 0x2245 @0x20
0x2225…224d at0021 = ╱4e╱N╱ // 0x2246 @0x21
0x2225…224d at0022 = ╱29╱)╱ // 0x2247 @0x22
0x2225…224d at0023 = ╱22╱"╱ // 0x2248 @0x23
0x2225…224d at0024 = ╱ec╱,╱ // 0x2249 @0x24
0x2225…224d at0025 = ╱41╱A╱ // 0x224a @0x25
0x2225…224d at0026 = ╱ef╱$╱ // 0x224b @0x26
0x2225…224d at0027 = EOL // 0x224c @0x27
0x2225…224d }
0x224d…225d afb4 3430 EXEC NRTEST(A$)
0x224d…225d LineComalBin {
0x224d…225d ptr = 0xafb4 // 0x224d @0x0
0x224d…225d lno = 0x0d66 // 0x224f @0x2
0x224d…225d at0004 = ╱9d╱ EXEC ╱ // 0x2251 @0x4
0x224d…225d at0005 = ╱4e╱N╱ // 0x2252 @0x5
0x224d…225d at0006 = ╱52╱R╱ // 0x2253 @0x6
0x224d…225d at0007 = ╱54╱T╱ // 0x2254 @0x7
0x224d…225d at0008 = ╱45╱E╱ // 0x2255 @0x8
0x224d…225d at0009 = ╱53╱S╱ // 0x2256 @0x9
0x224d…225d at000a = ╱54╱T╱ // 0x2257 @0xa
0x224d…225d at000b = ╱ed╱(╱ // 0x2258 @0xb
0x224d…225d at000c = ╱41╱A╱ // 0x2259 @0xc
0x224d…225d at000d = ╱ef╱$╱ // 0x225a @0xd
0x224d…225d at000e = ╱ee╱)╱ // 0x225b @0xe
0x224d…225d at000f = EOL // 0x225c @0xf
0x224d…225d }
0x225d…2276 afcd 3440 UNTIL P=-7 OR P=-8
0x225d…2276 LineComalBin {
0x225d…2276 ptr = 0xafcd // 0x225d @0x0
0x225d…2276 lno = 0x0d70 // 0x225f @0x2
0x225d…2276 at0004 = ╱98╱ UNTIL ╱ // 0x2261 @0x4
0x225d…2276 at0005 = ╱50╱P╱ // 0x2262 @0x5
0x225d…2276 at0006 = ╱dc╱=╱ // 0x2263 @0x6
0x225d…2276 at0007 = ╱e9╱-╱ // 0x2264 @0x7
0x225d…2276 at0008 = ╱37╱7╱ // 0x2265 @0x8
0x225d…2276 at0009 = ╱fe0000e003╱ // 0x2266 @0x9
0x225d…2276 at000e = ╱db╱ OR ╱ // 0x226b @0xe
0x225d…2276 at000f = ╱50╱P╱ // 0x226c @0xf
0x225d…2276 at0010 = ╱dc╱=╱ // 0x226d @0x10
0x225d…2276 at0011 = ╱e9╱-╱ // 0x226e @0x11
0x225d…2276 at0012 = ╱38╱8╱ // 0x226f @0x12
0x225d…2276 at0013 = ╱fe00008004╱ // 0x2270 @0x13
0x225d…2276 at0018 = EOL // 0x2275 @0x18
0x225d…2276 }
0x2276…2285 afdc 3450 UNTIL P=-8
0x2276…2285 LineComalBin {
0x2276…2285 ptr = 0xafdc // 0x2276 @0x0
0x2276…2285 lno = 0x0d7a // 0x2278 @0x2
0x2276…2285 at0004 = ╱98╱ UNTIL ╱ // 0x227a @0x4
0x2276…2285 at0005 = ╱50╱P╱ // 0x227b @0x5
0x2276…2285 at0006 = ╱dc╱=╱ // 0x227c @0x6
0x2276…2285 at0007 = ╱e9╱-╱ // 0x227d @0x7
0x2276…2285 at0008 = ╱38╱8╱ // 0x227e @0x8
0x2276…2285 at0009 = ╱fe00008004╱ // 0x227f @0x9
0x2276…2285 at000e = EOL // 0x2284 @0xe
0x2276…2285 }
0x2285…228b afe2 3460 CLOSE
0x2285…228b LineComalBin {
0x2285…228b ptr = 0xafe2 // 0x2285 @0x0
0x2285…228b lno = 0x0d84 // 0x2287 @0x2
0x2285…228b at0004 = ╱a8╱ CLOSE ╱ // 0x2289 @0x4
0x2285…228b at0005 = EOL // 0x228a @0x5
0x2285…228b }
0x228b…22a0 0000 3470 CHAIN "P641210:ÅKOPI"
0x228b…22a0 LineComalBin {
0x228b…22a0 ptr = 0x0000 // 0x228b @0x0
0x228b…22a0 lno = 0x0d8e // 0x228d @0x2
0x228b…22a0 at0004 = ╱ac╱ CHAIN ╱ // 0x228f @0x4
0x228b…22a0 at0005 = ╱22╱"╱ // 0x2290 @0x5
0x228b…22a0 at0006 = ╱50╱P╱ // 0x2291 @0x6
0x228b…22a0 at0007 = ╱36╱6╱ // 0x2292 @0x7
0x228b…22a0 at0008 = ╱34╱4╱ // 0x2293 @0x8
0x228b…22a0 at0009 = ╱31╱1╱ // 0x2294 @0x9
0x228b…22a0 at000a = ╱32╱2╱ // 0x2295 @0xa
0x228b…22a0 at000b = ╱31╱1╱ // 0x2296 @0xb
0x228b…22a0 at000c = ╱30╱0╱ // 0x2297 @0xc
0x228b…22a0 at000d = ╱3a╱:╱ // 0x2298 @0xd
0x228b…22a0 at000e = ╱5d╱Å╱ // 0x2299 @0xe
0x228b…22a0 at000f = ╱4b╱K╱ // 0x229a @0xf
0x228b…22a0 at0010 = ╱4f╱O╱ // 0x229b @0x10
0x228b…22a0 at0011 = ╱50╱P╱ // 0x229c @0x11
0x228b…22a0 at0012 = ╱49╱I╱ // 0x229d @0x12
0x228b…22a0 at0013 = ╱22╱"╱ // 0x229e @0x13
0x228b…22a0 at0014 = EOL // 0x229f @0x14
0x228b…22a0 }
0x22a0…22c0 57 8d 5a 00 42 dc 30 fe 00 00 00 00 eb 45 dc 31 fe 00 00 80 01 eb 47 dc 32 fe 00 00 80 02 eb 56 ┆W Z B 0 E 1 G 2 V┆
0x22c0…22d1 dc 33 fe 00 00 c0 02 eb 57 dc 39 fe 00 00 90 04 ff ┆ 3 W 9 ┆
0x22d1…22d7 (116,) 57 8d f7 af 10 00 ┆W ┆