|
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: 7898 (0x1eda)
Types: SPC/1-COMAL-BIN
Notes: Mikados_B
Names: »BALANCE.B«
└─⟦385f097a1⟧ Bits:30008988 SPC/1 COMAL programmer til bogføring
└─⟦this⟧ »BALANCE.B«
└─⟦ff7f7aeee⟧ Bits:30009007 NBT 15/3-84
└─⟦this⟧ »BALANCE.B«
0090 REM BALANCE 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) 0140 DIM SALDO2$(12),SALDO11$(12),SALDO1$(12),SALDO12$(12),SALDO14$(12) 0150 DIM K2$(17),K3$(17),K4$(17),K5$(17),T1(W),LAND$(W,12),DV$(10) 0160 DIM GLNAVN1$(25),SALDO4$(12) 0170 PROC CALC(ART,B1,B2,ES) 0180 OP1$=B1$;OP2$=B2$;RES$=ES$;SI=B;FLAG=B 0190 CALL "P641210:REGN" 0200 ES$=RES$ 0210 IF FLAG<>B THEN STOP 0220 ENDPROC 0230 PROC DATOUD(DA1,DA2) 0240 DA3=DA1 0250 DA2$=" " 0260 FOR J=8 TO E STEP -E 0270 IF J MOD V=B THEN 0280 DA2$(J)="." 0290 ELSE 0300 DA2$(J)=CHR(DA3 MOD 10+48) 0310 DA3=DA3 DIV 10 0320 ENDIF 0330 NEXT J 0340 ENDPROC 0350 PROC INDTAB(T,MANTAL,L10) 0360 J=MANTAL DIV 32+E 0370 FOR I=J TO MANTAL DIV 4+J-E 0380 H=(I-J)*4+E;H1=H+E;H2=H+G;H3=H+V 0390 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) 0400 EXEC FEJL(E,E,L10$) 0410 NEXT I 0420 ENDPROC 0430 PROC HENTPOST 0440 S1=FTAB(FPIL3,G) 0450 GET K3$,S1:FNR,FNAVN$ 0460 EXEC FEJL(G,G,K3$) 0470 GET K3$,S1+E:FMKODE$,FMDEBET$,FMKREDIT$ 0480 EXEC FEJL(G,V,K3$) 0490 GET K3$,S1+G:FUKODE$,FÅDEBET$,FÅKREDIT$ 0500 EXEC FEJL(G,4,K3$) 0510 ENDPROC 0520 PROC FEJL(NR1,NR2,NR3) 0530 IF STATUS(NR3$)<>B THEN 0540 PRINT STATUS(NR3$),NR1,NR2,NR3$ 0550 STOP 0560 ENDIF 0570 ENDPROC 0580 PROC TUD(BLB1,UBLB1,TEGN,STØR) 0590 EXEC CALC(5,BLB1$,TAL4$,UBLB1$) 0600 IF TEGN=B THEN 0610 UBLB1$=UBLB1$(E:13) 0620 ELSE 0630 IF TEGN=E AND UBLB1$(LEN(UBLB1$))="+" THEN 0640 UBLB1$(LEN(UBLB1$))=" " 0650 ENDIF 0660 ENDIF 0670 IF STØR=E THEN 0680 UBLB1$=UBLB1$(4:LEN(UBLB1$)-V) 0690 ENDIF 0700 ENDPROC 0710 PROC HOVEDUD(UDATO,USIDE) 0720 EXEC DATOUD(UDATO,DAT$) 0730 PRINT TAB(67);DV$;" " 0740 PRINT TAB(10);CHR(14);"Balance";CHR(15);TAB(44);"Dato : ";DAT$; 0750 PRINT USING " Side :###":USIDE 0760 PRINT " " 0770 PRINT TAB(40);"Månedens";TAB(66);"Årets" 0780 PRINT TAB(V);"Nr Kontonavn";TAB(35);"Debet Kredit Debet"; 0790 PRINT " Kredit" 0800 PRINT TAB(8);STREG$ 0810 ENDPROC 0820 PROC LINIEUD(NR4,NAVN1,SAL1,SAL2) 0830 PRINT USING "###### ":NR4; 0840 EXEC TUD(SAL1$,UBELØB1$,B,B) 0850 EXEC TUD(SAL2$,UBELØB2$,B,B) 0860 PRINT NAVN1$;TAB(33+W*(SAL1$(LEN(SAL1$))="-"));UBELØB1$; 0870 PRINT TAB(56+10*(SAL2$(LEN(SAL2$))="-"));UBELØB2$ 0880 ENDPROC 0890 PROC NYSIDE(GFNR9,GLNAVN9) 0900 FOR LINIE=LINIE TO 41 0910 PRINT " " 0920 NEXT LINIE 0930 PRINT " " 0940 BSIDE=BSIDE+E 0950 EXEC HOVEDUD(T1(7),BSIDE) 0960 PRINT " " 0970 IF GFNR9>B THEN 0980 PRINT USING "###### ":GFNR9; 0990 EXEC CALC(4,SALDO12$,TAL4$,TAL4$) 1000 IF SI<>B THEN 1010 PRINT GLNAVN9$;" Fortsat" 1020 ELSE 1030 PRINT GLNAVN9$ 1040 ENDIF 1050 PRINT TAB(8);STREG$(E:25+7*(SI<>B)) 1060 LINIE=5 1070 ELSE 1080 LINIE=V 1090 ENDIF 1100 PRINT " " 1110 ENDPROC 1120 K1$="P641220:SYSTEM1" 1130 OPEN K1$,R 1140 EXEC FEJL(W,E,K1$) 1150 GET K1$,E:MFANTAL 1160 EXEC FEJL(W,G,K1$) 1170 GET K1$,4:MKPOST,MFAK,MVGR,MKGR 1180 EXEC FEJL(W,V,K1$) 1190 GET K1$,5:MKRGR 1200 EXEC FEJL(W,4,K1$) 1210 GET K1$,8:DIVNR,DIVDNR,DIFNR,DTAL 1220 EXEC FEJL(W,5,K1$) 1230 GET K1$,W:KRTAL 1240 EXEC FEJL(W,6,K1$) 1250 GET K1$,10:N$ 1260 EXEC FEJL(W,7,K1$) 1270 GET K1$,11:K2$ 1280 EXEC FEJL(W,8,K1$) 1290 GET K1$,15:K3$ 1300 EXEC FEJL(W,W,K1$) 1310 GET K1$,36:K4$ 1320 EXEC FEJL(W,10,K1$) 1330 CLOSE K1$ 1340 EXEC FEJL(W,11,K1$) 1350 K2$=N$+K2$;K3$=N$+K3$ 1360 K4$=N$+K4$ 1370 DIM FTAB(MFANTAL,G) 1380 OPEN K4$,R 1390 EXEC FEJL(W,12,K4$) 1400 GET K4$,G:T1(E),T1(G),T1(V),T1(4),T1(5),T1(6),T1(7),T1(8),T1(W) 1410 EXEC FEJL(W,13,K4$) 1420 GET K4$,14:AFIN 1430 EXEC FEJL(W,14,K4$) 1440 GET K4$,20:DV$ 1450 EXEC FEJL(W,30,K4$) 1460 CLOSE K4$ 1470 EXEC FEJL(W,15,K4$) 1480 OPEN K2$,R 1490 EXEC FEJL(W,16,K2$) 1500 OPEN K3$,R 1510 EXEC FEJL(W,17,K3$) 1520 EXEC INDTAB(FTAB,MFANTAL,K2$) 1530 BLANK$=" " 1540 STREG$="------------------------------------";STREG$=STREG$+STREG$ 1550 REPEAT 1560 OUTPUT T 1570 CLEAR 1580 CURSOR 30,G 1590 PRINT "Balanceprogram" 1600 CURSOR 15,5 1610 PRINT "0: Færdig" 1620 CURSOR 15,7 1630 PRINT "1: Totalbalance" 1640 CURSOR 15,W 1650 PRINT "2: Gruppebalance" 1660 REPEAT 1670 CURSOR 18,12 1680 PRINT "Vælg type " 1690 CURSOR 28,12 1700 INPUT A$ 1710 TOTAL=ORD(A$)-48 1720 UNTIL TOTAL>-E AND TOTAL<V 1730 IF TOTAL=B THEN EXIT 1740 CLEAR 1750 REPEAT 1760 CURSOR 15,13 1770 INPUT "Monter papir til udskrift af balance og tast RETURN",A$ 1780 UNTIL ORD(A$)=255 1790 BSIDE=E;GLNAVN$=BLANK$;LINIE=E;SALDO1$="0+";SALDO2$="0+";SALDO3$="0+" 1800 SALDO3$="0+";SALDO11$="0+";SALDO12$="0+";SALDO13$="0+";TAL4$="0+";GFNR=B 1810 SALDO4$="0+";SALDO14$="0+";GFNR1=B;GLNAVN1$=BLANK$ 1820 OUTPUT P 1830 EXEC HOVEDUD(T1(7),BSIDE) 1840 FOR FPIL3=E TO AFIN 1850 IF FTAB(FPIL3,E)=100000 THEN EXIT 1860 EXEC HENTPOST 1870 FGRUP=INT(ORD(FUKODE$)-48) 1880 EXEC CALC(B,FMDEBET$,FMKREDIT$,FMDK$) 1890 EXEC CALC(B,FÅDEBET$,FÅKREDIT$,FÅDK$) 1900 CASE FGRUP OF 1910 STOP 1920 WHEN B 1930 IF TOTAL=E THEN 1940 IF LINIE>39 THEN EXEC NYSIDE(GFNR,GLNAVN$) 1950 EXEC LINIEUD(FNR,FNAVN$,FMDK$,FÅDK$) 1960 LINIE=LINIE+E 1970 ENDIF 1980 EXEC CALC(B,SALDO1$,FMDK$,SALDO1$) 1990 EXEC CALC(B,SALDO11$,FÅDK$,SALDO11$) 2000 EXEC CALC(B,SALDO2$,FMDK$,SALDO2$) 2010 EXEC CALC(B,SALDO12$,FÅDK$,SALDO12$) 2020 EXEC CALC(B,SALDO3$,FMDK$,SALDO3$) 2030 EXEC CALC(B,SALDO13$,FÅDK$,SALDO13$) 2040 EXEC CALC(B,SALDO4$,FMDK$,SALDO4$) 2050 EXEC CALC(B,SALDO14$,FÅDK$,SALDO14$) 2060 WHEN E 2070 IF LINIE>39 THEN EXEC NYSIDE(GFNR,GLNAVN$) 2080 FNR2=FNR DIV 1000 2090 FNR1=FNR DIV 10000;DTAL1=DTAL*10000+MKGR;KRTAL1=KRTAL*1000+MKRGR 2100 IF FNR1=DTAL AND DTAL1=>FNR OR FNR2=KRTAL AND KRTAL1=>FNR THEN 2110 EXEC CALC(B,SALDO2$,FMDK$,SALDO2$) 2120 EXEC CALC(B,SALDO12$,FÅDK$,SALDO12$) 2130 EXEC CALC(B,SALDO3$,FMDK$,SALDO3$) 2140 EXEC CALC(B,SALDO13$,FÅDK$,SALDO13$) 2150 EXEC CALC(B,SALDO4$,FMDK$,SALDO4$) 2160 EXEC CALC(B,SALDO14$,FÅDK$,SALDO14$) 2170 EXEC LINIEUD(FNR,FNAVN$,FMDK$,FÅDK$) 2180 ELSE 2190 EXEC LINIEUD(FNR,FNAVN$,SALDO1$,SALDO11$) 2200 SALDO1$="0+";SALDO11$="0+" 2210 ENDIF 2220 PRINT " " 2230 LINIE=LINIE+G 2240 WHEN G 2250 IF GFNR>B THEN 2260 IF LINIE>37 THEN EXEC NYSIDE(GFNR,GLNAVN$) 2270 PRINT " " 2280 PRINT TAB(8);STREG$(E:71) 2290 EXEC LINIEUD(GFNR,GLNAVN$,SALDO2$,SALDO12$) 2300 LINIE=LINIE+V 2310 ENDIF 2320 SALDO2$="0+";SALDO12$="0+" 2330 SALDO1$="0+";SALDO11$="0+" 2340 GLNAVN$=FNAVN$;GFNR=FNR 2350 IF LINIE>34 THEN 2360 EXEC NYSIDE(GFNR,GLNAVN$) 2370 ELSE 2375 PRINT " " 2380 PRINT " " 2390 PRINT USING "###### ":FNR; 2400 PRINT GLNAVN$ 2410 PRINT TAB(8);STREG$(E:LEN(GLNAVN$)) 2420 PRINT " " 2430 LINIE=LINIE+5 2440 ENDIF 2450 WHEN V 2460 IF LINIE>37 AND GFNR>B THEN EXEC NYSIDE(GFNR,GLNAVN$) 2470 IF GFNR>B THEN 2480 PRINT " " 2490 PRINT TAB(8);STREG$(E:71) 2500 EXEC LINIEUD(GFNR,GLNAVN$,SALDO2$,SALDO12$) 2510 SALDO2$="0+";SALDO12$="0+";LINIE=LINIE+V;GFNR=B 2520 ENDIF 2530 IF LINIE>36 THEN EXEC NYSIDE(GFNR,GLNAVN$) 2540 PRINT " " 2550 PRINT TAB(8);STREG$(E:71) 2560 EXEC LINIEUD(FNR,FNAVN$,SALDO3$,SALDO13$) 2570 SALDO1$="0+";SALDO11$="0+" 2580 PRINT TAB(8);STREG$(E:71) 2590 PRINT " " 2600 LINIE=LINIE+5 2610 WHEN 4 2620 IF GFNR>B THEN 2630 IF LINIE>37 THEN EXEC NYSIDE(GFNR,GLNAVN$) 2640 PRINT " " 2650 PRINT TAB(8);STREG$(E:71) 2660 EXEC LINIEUD(GFNR,GLNAVN$,SALDO2$,SALDO12$) 2670 LINIE=LINIE+V;GFNR=B;GLNAVN$=BLANK$ 2680 ENDIF 2690 IF GFNR1>B THEN 2700 IF LINIE>37 THEN EXEC NYSIDE(GFNR1,GLNAVN1$) 2710 PRINT " " 2720 PRINT TAB(8);STREG$(E:71) 2730 EXEC LINIEUD(GFNR1,GLNAVN1$,SALDO4$,SALDO14$) 2740 LINIE=LINIE+V;GFNR1=B;GLNAVN1$=BLANK$ 2750 ENDIF 2760 SALDO1$="0+";SALDO11$="0+";SALDO2$="0+";SALDO12$="0+";SALDO4$="0+" 2770 SALDO14$="0+" 2780 GLNAVN1$=FNAVN$;GFNR1=FNR 2790 IF LINIE>34 THEN 2800 EXEC NYSIDE(GFNR1,GLNAVN1$) 2810 ELSE 2815 PRINT " " 2820 PRINT " " 2830 PRINT USING "###### ":FNR; 2840 PRINT GLNAVN1$ 2850 PRINT TAB(8);STREG$(E:LEN(GLNAVN$)) 2860 PRINT " " 2870 LINIE=LINIE+5 2880 ENDIF 2890 ENDCASE 2900 NEXT FPIL3 2910 IF GFNR>B THEN 2920 IF LINIE>37 THEN EXEC NYSIDE(GFNR,GLNAVN$) 2930 PRINT " " 2940 PRINT TAB(8);STREG$(E:71) 2950 EXEC LINIEUD(GFNR,GLNAVN$,SALDO2$,SALDO12$) 2960 SALDO2$="0+";SALDO12$="0+";LINIE=LINIE+V;GFNR=B 2970 SALDO1$="0+";SALDO11$="0+" 2980 ENDIF 2990 IF GFNR1>B THEN 3000 IF LINIE>37 THEN EXEC NYSIDE(GFNR1,GLNAVN1$) 3010 PRINT " " 3020 PRINT TAB(8);STREG$(E:71) 3030 EXEC LINIEUD(GFNR1,GLNAVN1$,SALDO4$,SALDO14$) 3040 LINIE=LINIE+V 3050 ENDIF 3060 IF LINIE>36 THEN EXEC NYSIDE(GFNR1,GLNAVN1$) 3070 GLNAVN$="Difference";GFNR=100000 3080 PRINT " " 3090 PRINT TAB(8);STREG$(E:71) 3100 EXEC LINIEUD(GFNR,GLNAVN$,SALDO3$,SALDO13$) 3110 PRINT TAB(8);STREG$(E:71) 3120 FOR LINIE=LINIE TO 37 3130 PRINT " " 3140 NEXT LINIE 3150 PRINT " " 3160 UNTIL TOTAL=B 3170 OUTPUT T 3180 CHAIN "P641210:OPSTART"
0x0000…000d (0,) abfa 0090 REM BALANCE
0x0000…000d LineComalBin {
0x0000…000d ptr = 0xabfa // 0x0 @0x0
0x0000…000d lno = 0x005a // 0x2 @0x2
0x0000…000d at0004 = ╱89╱ REM ╱ // 0x4 @0x4
0x0000…000d at0005 = ╱42╱B╱ // 0x5 @0x5
0x0000…000d at0006 = ╱41╱A╱ // 0x6 @0x6
0x0000…000d at0007 = ╱4c╱L╱ // 0x7 @0x7
0x0000…000d at0008 = ╱41╱A╱ // 0x8 @0x8
0x0000…000d at0009 = ╱4e╱N╱ // 0x9 @0x9
0x0000…000d at000a = ╱43╱C╱ // 0xa @0xa
0x0000…000d at000b = ╱45╱E╱ // 0xb @0xb
0x0000…000d at000c = EOL // 0xc @0xc
0x0000…000d }
0x000d…0079 8dd0 0100 DIM RES$(15),OP1$(12),OP2$(12),N$(6),K1$(17),A$(E),TAL4$(12),BLANK$(25)
0x000d…0079 LineComalBin {
0x000d…0079 ptr = 0x8dd0 // 0xd @0x0
0x000d…0079 lno = 0x0064 // 0xf @0x2
0x000d…0079 at0004 = ╱87╱ DIM ╱ // 0x11 @0x4
0x000d…0079 at0005 = ╱52╱R╱ // 0x12 @0x5
0x000d…0079 at0006 = ╱45╱E╱ // 0x13 @0x6
0x000d…0079 at0007 = ╱53╱S╱ // 0x14 @0x7
0x000d…0079 at0008 = ╱ef╱$╱ // 0x15 @0x8
0x000d…0079 at0009 = ╱ed╱(╱ // 0x16 @0x9
0x000d…0079 at000a = ╱31╱1╱ // 0x17 @0xa
0x000d…0079 at000b = ╱35╱5╱ // 0x18 @0xb
0x000d…0079 at000c = ╱fe0000f004╱ // 0x19 @0xc
0x000d…0079 at0011 = ╱ee╱)╱ // 0x1e @0x11
0x000d…0079 at0012 = ╱ec╱,╱ // 0x1f @0x12
0x000d…0079 at0013 = ╱4f╱O╱ // 0x20 @0x13
0x000d…0079 at0014 = ╱50╱P╱ // 0x21 @0x14
0x000d…0079 at0015 = ╱31╱1╱ // 0x22 @0x15
0x000d…0079 at0016 = ╱ef╱$╱ // 0x23 @0x16
0x000d…0079 at0017 = ╱ed╱(╱ // 0x24 @0x17
0x000d…0079 at0018 = ╱31╱1╱ // 0x25 @0x18
0x000d…0079 at0019 = ╱32╱2╱ // 0x26 @0x19
0x000d…0079 at001a = ╱fe0000c004╱ // 0x27 @0x1a
0x000d…0079 at001f = ╱ee╱)╱ // 0x2c @0x1f
0x000d…0079 at0020 = ╱ec╱,╱ // 0x2d @0x20
0x000d…0079 at0021 = ╱4f╱O╱ // 0x2e @0x21
0x000d…0079 at0022 = ╱50╱P╱ // 0x2f @0x22
0x000d…0079 at0023 = ╱32╱2╱ // 0x30 @0x23
0x000d…0079 at0024 = ╱ef╱$╱ // 0x31 @0x24
0x000d…0079 at0025 = ╱ed╱(╱ // 0x32 @0x25
0x000d…0079 at0026 = ╱31╱1╱ // 0x33 @0x26
0x000d…0079 at0027 = ╱32╱2╱ // 0x34 @0x27
0x000d…0079 at0028 = ╱fe0000c004╱ // 0x35 @0x28
0x000d…0079 at002d = ╱ee╱)╱ // 0x3a @0x2d
0x000d…0079 at002e = ╱ec╱,╱ // 0x3b @0x2e
0x000d…0079 at002f = ╱4e╱N╱ // 0x3c @0x2f
0x000d…0079 at0030 = ╱ef╱$╱ // 0x3d @0x30
0x000d…0079 at0031 = ╱ed╱(╱ // 0x3e @0x31
0x000d…0079 at0032 = ╱36╱6╱ // 0x3f @0x32
0x000d…0079 at0033 = ╱fe0000c003╱ // 0x40 @0x33
0x000d…0079 at0038 = ╱ee╱)╱ // 0x45 @0x38
0x000d…0079 at0039 = ╱ec╱,╱ // 0x46 @0x39
0x000d…0079 at003a = ╱4b╱K╱ // 0x47 @0x3a
0x000d…0079 at003b = ╱31╱1╱ // 0x48 @0x3b
0x000d…0079 at003c = ╱ef╱$╱ // 0x49 @0x3c
0x000d…0079 at003d = ╱ed╱(╱ // 0x4a @0x3d
0x000d…0079 at003e = ╱31╱1╱ // 0x4b @0x3e
0x000d…0079 at003f = ╱37╱7╱ // 0x4c @0x3f
0x000d…0079 at0040 = ╱fe00008805╱ // 0x4d @0x40
0x000d…0079 at0045 = ╱ee╱)╱ // 0x52 @0x45
0x000d…0079 at0046 = ╱ec╱,╱ // 0x53 @0x46
0x000d…0079 at0047 = ╱41╱A╱ // 0x54 @0x47
0x000d…0079 at0048 = ╱ef╱$╱ // 0x55 @0x48
0x000d…0079 at0049 = ╱ed╱(╱ // 0x56 @0x49
0x000d…0079 at004a = ╱45╱E╱ // 0x57 @0x4a
0x000d…0079 at004b = ╱ee╱)╱ // 0x58 @0x4b
0x000d…0079 at004c = ╱ec╱,╱ // 0x59 @0x4c
0x000d…0079 at004d = ╱54╱T╱ // 0x5a @0x4d
0x000d…0079 at004e = ╱41╱A╱ // 0x5b @0x4e
0x000d…0079 at004f = ╱4c╱L╱ // 0x5c @0x4f
0x000d…0079 at0050 = ╱34╱4╱ // 0x5d @0x50
0x000d…0079 at0051 = ╱ef╱$╱ // 0x5e @0x51
0x000d…0079 at0052 = ╱ed╱(╱ // 0x5f @0x52
0x000d…0079 at0053 = ╱31╱1╱ // 0x60 @0x53
0x000d…0079 at0054 = ╱32╱2╱ // 0x61 @0x54
0x000d…0079 at0055 = ╱fe0000c004╱ // 0x62 @0x55
0x000d…0079 at005a = ╱ee╱)╱ // 0x67 @0x5a
0x000d…0079 at005b = ╱ec╱,╱ // 0x68 @0x5b
0x000d…0079 at005c = ╱42╱B╱ // 0x69 @0x5c
0x000d…0079 at005d = ╱4c╱L╱ // 0x6a @0x5d
0x000d…0079 at005e = ╱41╱A╱ // 0x6b @0x5e
0x000d…0079 at005f = ╱4e╱N╱ // 0x6c @0x5f
0x000d…0079 at0060 = ╱4b╱K╱ // 0x6d @0x60
0x000d…0079 at0061 = ╱ef╱$╱ // 0x6e @0x61
0x000d…0079 at0062 = ╱ed╱(╱ // 0x6f @0x62
0x000d…0079 at0063 = ╱32╱2╱ // 0x70 @0x63
0x000d…0079 at0064 = ╱35╱5╱ // 0x71 @0x64
0x000d…0079 at0065 = ╱fe0000c805╱ // 0x72 @0x65
0x000d…0079 at006a = ╱ee╱)╱ // 0x77 @0x6a
0x000d…0079 at006b = EOL // 0x78 @0x6b
0x000d…0079 }
0x0079…00e1 8e38 0110 DIM UBELØB1$(14),UBELØB2$(14),STREG$(71),FÅDK$(12),FMDK$(12),GLNAVN$(25)
0x0079…00e1 LineComalBin {
0x0079…00e1 ptr = 0x8e38 // 0x79 @0x0
0x0079…00e1 lno = 0x006e // 0x7b @0x2
0x0079…00e1 at0004 = ╱87╱ DIM ╱ // 0x7d @0x4
0x0079…00e1 at0005 = ╱55╱U╱ // 0x7e @0x5
0x0079…00e1 at0006 = ╱42╱B╱ // 0x7f @0x6
0x0079…00e1 at0007 = ╱45╱E╱ // 0x80 @0x7
0x0079…00e1 at0008 = ╱4c╱L╱ // 0x81 @0x8
0x0079…00e1 at0009 = ╱5c╱Ø╱ // 0x82 @0x9
0x0079…00e1 at000a = ╱42╱B╱ // 0x83 @0xa
0x0079…00e1 at000b = ╱31╱1╱ // 0x84 @0xb
0x0079…00e1 at000c = ╱ef╱$╱ // 0x85 @0xc
0x0079…00e1 at000d = ╱ed╱(╱ // 0x86 @0xd
0x0079…00e1 at000e = ╱31╱1╱ // 0x87 @0xe
0x0079…00e1 at000f = ╱34╱4╱ // 0x88 @0xf
0x0079…00e1 at0010 = ╱fe0000e004╱ // 0x89 @0x10
0x0079…00e1 at0015 = ╱ee╱)╱ // 0x8e @0x15
0x0079…00e1 at0016 = ╱ec╱,╱ // 0x8f @0x16
0x0079…00e1 at0017 = ╱55╱U╱ // 0x90 @0x17
0x0079…00e1 at0018 = ╱42╱B╱ // 0x91 @0x18
0x0079…00e1 at0019 = ╱45╱E╱ // 0x92 @0x19
0x0079…00e1 at001a = ╱4c╱L╱ // 0x93 @0x1a
0x0079…00e1 at001b = ╱5c╱Ø╱ // 0x94 @0x1b
0x0079…00e1 at001c = ╱42╱B╱ // 0x95 @0x1c
0x0079…00e1 at001d = ╱32╱2╱ // 0x96 @0x1d
0x0079…00e1 at001e = ╱ef╱$╱ // 0x97 @0x1e
0x0079…00e1 at001f = ╱ed╱(╱ // 0x98 @0x1f
0x0079…00e1 at0020 = ╱31╱1╱ // 0x99 @0x20
0x0079…00e1 at0021 = ╱34╱4╱ // 0x9a @0x21
0x0079…00e1 at0022 = ╱fe0000e004╱ // 0x9b @0x22
0x0079…00e1 at0027 = ╱ee╱)╱ // 0xa0 @0x27
0x0079…00e1 at0028 = ╱ec╱,╱ // 0xa1 @0x28
0x0079…00e1 at0029 = ╱53╱S╱ // 0xa2 @0x29
0x0079…00e1 at002a = ╱54╱T╱ // 0xa3 @0x2a
0x0079…00e1 at002b = ╱52╱R╱ // 0xa4 @0x2b
0x0079…00e1 at002c = ╱45╱E╱ // 0xa5 @0x2c
0x0079…00e1 at002d = ╱47╱G╱ // 0xa6 @0x2d
0x0079…00e1 at002e = ╱ef╱$╱ // 0xa7 @0x2e
0x0079…00e1 at002f = ╱ed╱(╱ // 0xa8 @0x2f
0x0079…00e1 at0030 = ╱37╱7╱ // 0xa9 @0x30
0x0079…00e1 at0031 = ╱31╱1╱ // 0xaa @0x31
0x0079…00e1 at0032 = ╱fe00008e07╱ // 0xab @0x32
0x0079…00e1 at0037 = ╱ee╱)╱ // 0xb0 @0x37
0x0079…00e1 at0038 = ╱ec╱,╱ // 0xb1 @0x38
0x0079…00e1 at0039 = ╱46╱F╱ // 0xb2 @0x39
0x0079…00e1 at003a = ╱5d╱Å╱ // 0xb3 @0x3a
0x0079…00e1 at003b = ╱44╱D╱ // 0xb4 @0x3b
0x0079…00e1 at003c = ╱4b╱K╱ // 0xb5 @0x3c
0x0079…00e1 at003d = ╱ef╱$╱ // 0xb6 @0x3d
0x0079…00e1 at003e = ╱ed╱(╱ // 0xb7 @0x3e
0x0079…00e1 at003f = ╱31╱1╱ // 0xb8 @0x3f
0x0079…00e1 at0040 = ╱32╱2╱ // 0xb9 @0x40
0x0079…00e1 at0041 = ╱fe0000c004╱ // 0xba @0x41
0x0079…00e1 at0046 = ╱ee╱)╱ // 0xbf @0x46
0x0079…00e1 at0047 = ╱ec╱,╱ // 0xc0 @0x47
0x0079…00e1 at0048 = ╱46╱F╱ // 0xc1 @0x48
0x0079…00e1 at0049 = ╱4d╱M╱ // 0xc2 @0x49
0x0079…00e1 at004a = ╱44╱D╱ // 0xc3 @0x4a
0x0079…00e1 at004b = ╱4b╱K╱ // 0xc4 @0x4b
0x0079…00e1 at004c = ╱ef╱$╱ // 0xc5 @0x4c
0x0079…00e1 at004d = ╱ed╱(╱ // 0xc6 @0x4d
0x0079…00e1 at004e = ╱31╱1╱ // 0xc7 @0x4e
0x0079…00e1 at004f = ╱32╱2╱ // 0xc8 @0x4f
0x0079…00e1 at0050 = ╱fe0000c004╱ // 0xc9 @0x50
0x0079…00e1 at0055 = ╱ee╱)╱ // 0xce @0x55
0x0079…00e1 at0056 = ╱ec╱,╱ // 0xcf @0x56
0x0079…00e1 at0057 = ╱47╱G╱ // 0xd0 @0x57
0x0079…00e1 at0058 = ╱4c╱L╱ // 0xd1 @0x58
0x0079…00e1 at0059 = ╱4e╱N╱ // 0xd2 @0x59
0x0079…00e1 at005a = ╱41╱A╱ // 0xd3 @0x5a
0x0079…00e1 at005b = ╱56╱V╱ // 0xd4 @0x5b
0x0079…00e1 at005c = ╱4e╱N╱ // 0xd5 @0x5c
0x0079…00e1 at005d = ╱ef╱$╱ // 0xd6 @0x5d
0x0079…00e1 at005e = ╱ed╱(╱ // 0xd7 @0x5e
0x0079…00e1 at005f = ╱32╱2╱ // 0xd8 @0x5f
0x0079…00e1 at0060 = ╱35╱5╱ // 0xd9 @0x60
0x0079…00e1 at0061 = ╱fe0000c805╱ // 0xda @0x61
0x0079…00e1 at0066 = ╱ee╱)╱ // 0xdf @0x66
0x0079…00e1 at0067 = EOL // 0xe0 @0x67
0x0079…00e1 }
0x00e1…013d 8e94 0120 DIM DAT$(8),FÅKREDIT$(12),FÅDEBET$(12),FMKREDIT$(12),FMDEBET$(12)
0x00e1…013d LineComalBin {
0x00e1…013d ptr = 0x8e94 // 0xe1 @0x0
0x00e1…013d lno = 0x0078 // 0xe3 @0x2
0x00e1…013d at0004 = ╱87╱ DIM ╱ // 0xe5 @0x4
0x00e1…013d at0005 = ╱44╱D╱ // 0xe6 @0x5
0x00e1…013d at0006 = ╱41╱A╱ // 0xe7 @0x6
0x00e1…013d at0007 = ╱54╱T╱ // 0xe8 @0x7
0x00e1…013d at0008 = ╱ef╱$╱ // 0xe9 @0x8
0x00e1…013d at0009 = ╱ed╱(╱ // 0xea @0x9
0x00e1…013d at000a = ╱38╱8╱ // 0xeb @0xa
0x00e1…013d at000b = ╱fe00008004╱ // 0xec @0xb
0x00e1…013d at0010 = ╱ee╱)╱ // 0xf1 @0x10
0x00e1…013d at0011 = ╱ec╱,╱ // 0xf2 @0x11
0x00e1…013d at0012 = ╱46╱F╱ // 0xf3 @0x12
0x00e1…013d at0013 = ╱5d╱Å╱ // 0xf4 @0x13
0x00e1…013d at0014 = ╱4b╱K╱ // 0xf5 @0x14
0x00e1…013d at0015 = ╱52╱R╱ // 0xf6 @0x15
0x00e1…013d at0016 = ╱45╱E╱ // 0xf7 @0x16
0x00e1…013d at0017 = ╱44╱D╱ // 0xf8 @0x17
0x00e1…013d at0018 = ╱49╱I╱ // 0xf9 @0x18
0x00e1…013d at0019 = ╱54╱T╱ // 0xfa @0x19
0x00e1…013d at001a = ╱ef╱$╱ // 0xfb @0x1a
0x00e1…013d at001b = ╱ed╱(╱ // 0xfc @0x1b
0x00e1…013d at001c = ╱31╱1╱ // 0xfd @0x1c
0x00e1…013d at001d = ╱32╱2╱ // 0xfe @0x1d
0x00e1…013d at001e = ╱fe0000c004╱ // 0xff @0x1e
0x00e1…013d at0023 = ╱ee╱)╱ // 0x104 @0x23
0x00e1…013d at0024 = ╱ec╱,╱ // 0x105 @0x24
0x00e1…013d at0025 = ╱46╱F╱ // 0x106 @0x25
0x00e1…013d at0026 = ╱5d╱Å╱ // 0x107 @0x26
0x00e1…013d at0027 = ╱44╱D╱ // 0x108 @0x27
0x00e1…013d at0028 = ╱45╱E╱ // 0x109 @0x28
0x00e1…013d at0029 = ╱42╱B╱ // 0x10a @0x29
0x00e1…013d at002a = ╱45╱E╱ // 0x10b @0x2a
0x00e1…013d at002b = ╱54╱T╱ // 0x10c @0x2b
0x00e1…013d at002c = ╱ef╱$╱ // 0x10d @0x2c
0x00e1…013d at002d = ╱ed╱(╱ // 0x10e @0x2d
0x00e1…013d at002e = ╱31╱1╱ // 0x10f @0x2e
0x00e1…013d at002f = ╱32╱2╱ // 0x110 @0x2f
0x00e1…013d at0030 = ╱fe0000c004╱ // 0x111 @0x30
0x00e1…013d at0035 = ╱ee╱)╱ // 0x116 @0x35
0x00e1…013d at0036 = ╱ec╱,╱ // 0x117 @0x36
0x00e1…013d at0037 = ╱46╱F╱ // 0x118 @0x37
0x00e1…013d at0038 = ╱4d╱M╱ // 0x119 @0x38
0x00e1…013d at0039 = ╱4b╱K╱ // 0x11a @0x39
0x00e1…013d at003a = ╱52╱R╱ // 0x11b @0x3a
0x00e1…013d at003b = ╱45╱E╱ // 0x11c @0x3b
0x00e1…013d at003c = ╱44╱D╱ // 0x11d @0x3c
0x00e1…013d at003d = ╱49╱I╱ // 0x11e @0x3d
0x00e1…013d at003e = ╱54╱T╱ // 0x11f @0x3e
0x00e1…013d at003f = ╱ef╱$╱ // 0x120 @0x3f
0x00e1…013d at0040 = ╱ed╱(╱ // 0x121 @0x40
0x00e1…013d at0041 = ╱31╱1╱ // 0x122 @0x41
0x00e1…013d at0042 = ╱32╱2╱ // 0x123 @0x42
0x00e1…013d at0043 = ╱fe0000c004╱ // 0x124 @0x43
0x00e1…013d at0048 = ╱ee╱)╱ // 0x129 @0x48
0x00e1…013d at0049 = ╱ec╱,╱ // 0x12a @0x49
0x00e1…013d at004a = ╱46╱F╱ // 0x12b @0x4a
0x00e1…013d at004b = ╱4d╱M╱ // 0x12c @0x4b
0x00e1…013d at004c = ╱44╱D╱ // 0x12d @0x4c
0x00e1…013d at004d = ╱45╱E╱ // 0x12e @0x4d
0x00e1…013d at004e = ╱42╱B╱ // 0x12f @0x4e
0x00e1…013d at004f = ╱45╱E╱ // 0x130 @0x4f
0x00e1…013d at0050 = ╱54╱T╱ // 0x131 @0x50
0x00e1…013d at0051 = ╱ef╱$╱ // 0x132 @0x51
0x00e1…013d at0052 = ╱ed╱(╱ // 0x133 @0x52
0x00e1…013d at0053 = ╱31╱1╱ // 0x134 @0x53
0x00e1…013d at0054 = ╱32╱2╱ // 0x135 @0x54
0x00e1…013d at0055 = ╱fe0000c004╱ // 0x136 @0x55
0x00e1…013d at005a = ╱ee╱)╱ // 0x13b @0x5a
0x00e1…013d at005b = EOL // 0x13c @0x5b
0x00e1…013d }
0x013d…018b 8ee2 0130 DIM FMKODE$(E),FNAVN$(25),FUKODE$(E),SALDO13$(12),SALDO3$(12)
0x013d…018b LineComalBin {
0x013d…018b ptr = 0x8ee2 // 0x13d @0x0
0x013d…018b lno = 0x0082 // 0x13f @0x2
0x013d…018b at0004 = ╱87╱ DIM ╱ // 0x141 @0x4
0x013d…018b at0005 = ╱46╱F╱ // 0x142 @0x5
0x013d…018b at0006 = ╱4d╱M╱ // 0x143 @0x6
0x013d…018b at0007 = ╱4b╱K╱ // 0x144 @0x7
0x013d…018b at0008 = ╱4f╱O╱ // 0x145 @0x8
0x013d…018b at0009 = ╱44╱D╱ // 0x146 @0x9
0x013d…018b at000a = ╱45╱E╱ // 0x147 @0xa
0x013d…018b at000b = ╱ef╱$╱ // 0x148 @0xb
0x013d…018b at000c = ╱ed╱(╱ // 0x149 @0xc
0x013d…018b at000d = ╱45╱E╱ // 0x14a @0xd
0x013d…018b at000e = ╱ee╱)╱ // 0x14b @0xe
0x013d…018b at000f = ╱ec╱,╱ // 0x14c @0xf
0x013d…018b at0010 = ╱46╱F╱ // 0x14d @0x10
0x013d…018b at0011 = ╱4e╱N╱ // 0x14e @0x11
0x013d…018b at0012 = ╱41╱A╱ // 0x14f @0x12
0x013d…018b at0013 = ╱56╱V╱ // 0x150 @0x13
0x013d…018b at0014 = ╱4e╱N╱ // 0x151 @0x14
0x013d…018b at0015 = ╱ef╱$╱ // 0x152 @0x15
0x013d…018b at0016 = ╱ed╱(╱ // 0x153 @0x16
0x013d…018b at0017 = ╱32╱2╱ // 0x154 @0x17
0x013d…018b at0018 = ╱35╱5╱ // 0x155 @0x18
0x013d…018b at0019 = ╱fe0000c805╱ // 0x156 @0x19
0x013d…018b at001e = ╱ee╱)╱ // 0x15b @0x1e
0x013d…018b at001f = ╱ec╱,╱ // 0x15c @0x1f
0x013d…018b at0020 = ╱46╱F╱ // 0x15d @0x20
0x013d…018b at0021 = ╱55╱U╱ // 0x15e @0x21
0x013d…018b at0022 = ╱4b╱K╱ // 0x15f @0x22
0x013d…018b at0023 = ╱4f╱O╱ // 0x160 @0x23
0x013d…018b at0024 = ╱44╱D╱ // 0x161 @0x24
0x013d…018b at0025 = ╱45╱E╱ // 0x162 @0x25
0x013d…018b at0026 = ╱ef╱$╱ // 0x163 @0x26
0x013d…018b at0027 = ╱ed╱(╱ // 0x164 @0x27
0x013d…018b at0028 = ╱45╱E╱ // 0x165 @0x28
0x013d…018b at0029 = ╱ee╱)╱ // 0x166 @0x29
0x013d…018b at002a = ╱ec╱,╱ // 0x167 @0x2a
0x013d…018b at002b = ╱53╱S╱ // 0x168 @0x2b
0x013d…018b at002c = ╱41╱A╱ // 0x169 @0x2c
0x013d…018b at002d = ╱4c╱L╱ // 0x16a @0x2d
0x013d…018b at002e = ╱44╱D╱ // 0x16b @0x2e
0x013d…018b at002f = ╱4f╱O╱ // 0x16c @0x2f
0x013d…018b at0030 = ╱31╱1╱ // 0x16d @0x30
0x013d…018b at0031 = ╱33╱3╱ // 0x16e @0x31
0x013d…018b at0032 = ╱ef╱$╱ // 0x16f @0x32
0x013d…018b at0033 = ╱ed╱(╱ // 0x170 @0x33
0x013d…018b at0034 = ╱31╱1╱ // 0x171 @0x34
0x013d…018b at0035 = ╱32╱2╱ // 0x172 @0x35
0x013d…018b at0036 = ╱fe0000c004╱ // 0x173 @0x36
0x013d…018b at003b = ╱ee╱)╱ // 0x178 @0x3b
0x013d…018b at003c = ╱ec╱,╱ // 0x179 @0x3c
0x013d…018b at003d = ╱53╱S╱ // 0x17a @0x3d
0x013d…018b at003e = ╱41╱A╱ // 0x17b @0x3e
0x013d…018b at003f = ╱4c╱L╱ // 0x17c @0x3f
0x013d…018b at0040 = ╱44╱D╱ // 0x17d @0x40
0x013d…018b at0041 = ╱4f╱O╱ // 0x17e @0x41
0x013d…018b at0042 = ╱33╱3╱ // 0x17f @0x42
0x013d…018b at0043 = ╱ef╱$╱ // 0x180 @0x43
0x013d…018b at0044 = ╱ed╱(╱ // 0x181 @0x44
0x013d…018b at0045 = ╱31╱1╱ // 0x182 @0x45
0x013d…018b at0046 = ╱32╱2╱ // 0x183 @0x46
0x013d…018b at0047 = ╱fe0000c004╱ // 0x184 @0x47
0x013d…018b at004c = ╱ee╱)╱ // 0x189 @0x4c
0x013d…018b at004d = EOL // 0x18a @0x4d
0x013d…018b }
0x018b…01e8 8f3f 0140 DIM SALDO2$(12),SALDO11$(12),SALDO1$(12),SALDO12$(12),SALDO14$(12)
0x018b…01e8 LineComalBin {
0x018b…01e8 ptr = 0x8f3f // 0x18b @0x0
0x018b…01e8 lno = 0x008c // 0x18d @0x2
0x018b…01e8 at0004 = ╱87╱ DIM ╱ // 0x18f @0x4
0x018b…01e8 at0005 = ╱53╱S╱ // 0x190 @0x5
0x018b…01e8 at0006 = ╱41╱A╱ // 0x191 @0x6
0x018b…01e8 at0007 = ╱4c╱L╱ // 0x192 @0x7
0x018b…01e8 at0008 = ╱44╱D╱ // 0x193 @0x8
0x018b…01e8 at0009 = ╱4f╱O╱ // 0x194 @0x9
0x018b…01e8 at000a = ╱32╱2╱ // 0x195 @0xa
0x018b…01e8 at000b = ╱ef╱$╱ // 0x196 @0xb
0x018b…01e8 at000c = ╱ed╱(╱ // 0x197 @0xc
0x018b…01e8 at000d = ╱31╱1╱ // 0x198 @0xd
0x018b…01e8 at000e = ╱32╱2╱ // 0x199 @0xe
0x018b…01e8 at000f = ╱fe0000c004╱ // 0x19a @0xf
0x018b…01e8 at0014 = ╱ee╱)╱ // 0x19f @0x14
0x018b…01e8 at0015 = ╱ec╱,╱ // 0x1a0 @0x15
0x018b…01e8 at0016 = ╱53╱S╱ // 0x1a1 @0x16
0x018b…01e8 at0017 = ╱41╱A╱ // 0x1a2 @0x17
0x018b…01e8 at0018 = ╱4c╱L╱ // 0x1a3 @0x18
0x018b…01e8 at0019 = ╱44╱D╱ // 0x1a4 @0x19
0x018b…01e8 at001a = ╱4f╱O╱ // 0x1a5 @0x1a
0x018b…01e8 at001b = ╱31╱1╱ // 0x1a6 @0x1b
0x018b…01e8 at001c = ╱31╱1╱ // 0x1a7 @0x1c
0x018b…01e8 at001d = ╱ef╱$╱ // 0x1a8 @0x1d
0x018b…01e8 at001e = ╱ed╱(╱ // 0x1a9 @0x1e
0x018b…01e8 at001f = ╱31╱1╱ // 0x1aa @0x1f
0x018b…01e8 at0020 = ╱32╱2╱ // 0x1ab @0x20
0x018b…01e8 at0021 = ╱fe0000c004╱ // 0x1ac @0x21
0x018b…01e8 at0026 = ╱ee╱)╱ // 0x1b1 @0x26
0x018b…01e8 at0027 = ╱ec╱,╱ // 0x1b2 @0x27
0x018b…01e8 at0028 = ╱53╱S╱ // 0x1b3 @0x28
0x018b…01e8 at0029 = ╱41╱A╱ // 0x1b4 @0x29
0x018b…01e8 at002a = ╱4c╱L╱ // 0x1b5 @0x2a
0x018b…01e8 at002b = ╱44╱D╱ // 0x1b6 @0x2b
0x018b…01e8 at002c = ╱4f╱O╱ // 0x1b7 @0x2c
0x018b…01e8 at002d = ╱31╱1╱ // 0x1b8 @0x2d
0x018b…01e8 at002e = ╱ef╱$╱ // 0x1b9 @0x2e
0x018b…01e8 at002f = ╱ed╱(╱ // 0x1ba @0x2f
0x018b…01e8 at0030 = ╱31╱1╱ // 0x1bb @0x30
0x018b…01e8 at0031 = ╱32╱2╱ // 0x1bc @0x31
0x018b…01e8 at0032 = ╱fe0000c004╱ // 0x1bd @0x32
0x018b…01e8 at0037 = ╱ee╱)╱ // 0x1c2 @0x37
0x018b…01e8 at0038 = ╱ec╱,╱ // 0x1c3 @0x38
0x018b…01e8 at0039 = ╱53╱S╱ // 0x1c4 @0x39
0x018b…01e8 at003a = ╱41╱A╱ // 0x1c5 @0x3a
0x018b…01e8 at003b = ╱4c╱L╱ // 0x1c6 @0x3b
0x018b…01e8 at003c = ╱44╱D╱ // 0x1c7 @0x3c
0x018b…01e8 at003d = ╱4f╱O╱ // 0x1c8 @0x3d
0x018b…01e8 at003e = ╱31╱1╱ // 0x1c9 @0x3e
0x018b…01e8 at003f = ╱32╱2╱ // 0x1ca @0x3f
0x018b…01e8 at0040 = ╱ef╱$╱ // 0x1cb @0x40
0x018b…01e8 at0041 = ╱ed╱(╱ // 0x1cc @0x41
0x018b…01e8 at0042 = ╱31╱1╱ // 0x1cd @0x42
0x018b…01e8 at0043 = ╱32╱2╱ // 0x1ce @0x43
0x018b…01e8 at0044 = ╱fe0000c004╱ // 0x1cf @0x44
0x018b…01e8 at0049 = ╱ee╱)╱ // 0x1d4 @0x49
0x018b…01e8 at004a = ╱ec╱,╱ // 0x1d5 @0x4a
0x018b…01e8 at004b = ╱53╱S╱ // 0x1d6 @0x4b
0x018b…01e8 at004c = ╱41╱A╱ // 0x1d7 @0x4c
0x018b…01e8 at004d = ╱4c╱L╱ // 0x1d8 @0x4d
0x018b…01e8 at004e = ╱44╱D╱ // 0x1d9 @0x4e
0x018b…01e8 at004f = ╱4f╱O╱ // 0x1da @0x4f
0x018b…01e8 at0050 = ╱31╱1╱ // 0x1db @0x50
0x018b…01e8 at0051 = ╱34╱4╱ // 0x1dc @0x51
0x018b…01e8 at0052 = ╱ef╱$╱ // 0x1dd @0x52
0x018b…01e8 at0053 = ╱ed╱(╱ // 0x1de @0x53
0x018b…01e8 at0054 = ╱31╱1╱ // 0x1df @0x54
0x018b…01e8 at0055 = ╱32╱2╱ // 0x1e0 @0x55
0x018b…01e8 at0056 = ╱fe0000c004╱ // 0x1e1 @0x56
0x018b…01e8 at005b = ╱ee╱)╱ // 0x1e6 @0x5b
0x018b…01e8 at005c = EOL // 0x1e7 @0x5c
0x018b…01e8 }
0x01e8…0245 8f9c 0150 DIM K2$(17),K3$(17),K4$(17),K5$(17),T1(W),LAND$(W,12),DV$(10)
0x01e8…0245 LineComalBin {
0x01e8…0245 ptr = 0x8f9c // 0x1e8 @0x0
0x01e8…0245 lno = 0x0096 // 0x1ea @0x2
0x01e8…0245 at0004 = ╱87╱ DIM ╱ // 0x1ec @0x4
0x01e8…0245 at0005 = ╱4b╱K╱ // 0x1ed @0x5
0x01e8…0245 at0006 = ╱32╱2╱ // 0x1ee @0x6
0x01e8…0245 at0007 = ╱ef╱$╱ // 0x1ef @0x7
0x01e8…0245 at0008 = ╱ed╱(╱ // 0x1f0 @0x8
0x01e8…0245 at0009 = ╱31╱1╱ // 0x1f1 @0x9
0x01e8…0245 at000a = ╱37╱7╱ // 0x1f2 @0xa
0x01e8…0245 at000b = ╱fe00008805╱ // 0x1f3 @0xb
0x01e8…0245 at0010 = ╱ee╱)╱ // 0x1f8 @0x10
0x01e8…0245 at0011 = ╱ec╱,╱ // 0x1f9 @0x11
0x01e8…0245 at0012 = ╱4b╱K╱ // 0x1fa @0x12
0x01e8…0245 at0013 = ╱33╱3╱ // 0x1fb @0x13
0x01e8…0245 at0014 = ╱ef╱$╱ // 0x1fc @0x14
0x01e8…0245 at0015 = ╱ed╱(╱ // 0x1fd @0x15
0x01e8…0245 at0016 = ╱31╱1╱ // 0x1fe @0x16
0x01e8…0245 at0017 = ╱37╱7╱ // 0x1ff @0x17
0x01e8…0245 at0018 = ╱fe00008805╱ // 0x200 @0x18
0x01e8…0245 at001d = ╱ee╱)╱ // 0x205 @0x1d
0x01e8…0245 at001e = ╱ec╱,╱ // 0x206 @0x1e
0x01e8…0245 at001f = ╱4b╱K╱ // 0x207 @0x1f
0x01e8…0245 at0020 = ╱34╱4╱ // 0x208 @0x20
0x01e8…0245 at0021 = ╱ef╱$╱ // 0x209 @0x21
0x01e8…0245 at0022 = ╱ed╱(╱ // 0x20a @0x22
0x01e8…0245 at0023 = ╱31╱1╱ // 0x20b @0x23
0x01e8…0245 at0024 = ╱37╱7╱ // 0x20c @0x24
0x01e8…0245 at0025 = ╱fe00008805╱ // 0x20d @0x25
0x01e8…0245 at002a = ╱ee╱)╱ // 0x212 @0x2a
0x01e8…0245 at002b = ╱ec╱,╱ // 0x213 @0x2b
0x01e8…0245 at002c = ╱4b╱K╱ // 0x214 @0x2c
0x01e8…0245 at002d = ╱35╱5╱ // 0x215 @0x2d
0x01e8…0245 at002e = ╱ef╱$╱ // 0x216 @0x2e
0x01e8…0245 at002f = ╱ed╱(╱ // 0x217 @0x2f
0x01e8…0245 at0030 = ╱31╱1╱ // 0x218 @0x30
0x01e8…0245 at0031 = ╱37╱7╱ // 0x219 @0x31
0x01e8…0245 at0032 = ╱fe00008805╱ // 0x21a @0x32
0x01e8…0245 at0037 = ╱ee╱)╱ // 0x21f @0x37
0x01e8…0245 at0038 = ╱ec╱,╱ // 0x220 @0x38
0x01e8…0245 at0039 = ╱54╱T╱ // 0x221 @0x39
0x01e8…0245 at003a = ╱31╱1╱ // 0x222 @0x3a
0x01e8…0245 at003b = ╱ed╱(╱ // 0x223 @0x3b
0x01e8…0245 at003c = ╱57╱W╱ // 0x224 @0x3c
0x01e8…0245 at003d = ╱ee╱)╱ // 0x225 @0x3d
0x01e8…0245 at003e = ╱ec╱,╱ // 0x226 @0x3e
0x01e8…0245 at003f = ╱4c╱L╱ // 0x227 @0x3f
0x01e8…0245 at0040 = ╱41╱A╱ // 0x228 @0x40
0x01e8…0245 at0041 = ╱4e╱N╱ // 0x229 @0x41
0x01e8…0245 at0042 = ╱44╱D╱ // 0x22a @0x42
0x01e8…0245 at0043 = ╱ef╱$╱ // 0x22b @0x43
0x01e8…0245 at0044 = ╱ed╱(╱ // 0x22c @0x44
0x01e8…0245 at0045 = ╱57╱W╱ // 0x22d @0x45
0x01e8…0245 at0046 = ╱ec╱,╱ // 0x22e @0x46
0x01e8…0245 at0047 = ╱31╱1╱ // 0x22f @0x47
0x01e8…0245 at0048 = ╱32╱2╱ // 0x230 @0x48
0x01e8…0245 at0049 = ╱fe0000c004╱ // 0x231 @0x49
0x01e8…0245 at004e = ╱ee╱)╱ // 0x236 @0x4e
0x01e8…0245 at004f = ╱ec╱,╱ // 0x237 @0x4f
0x01e8…0245 at0050 = ╱44╱D╱ // 0x238 @0x50
0x01e8…0245 at0051 = ╱56╱V╱ // 0x239 @0x51
0x01e8…0245 at0052 = ╱ef╱$╱ // 0x23a @0x52
0x01e8…0245 at0053 = ╱ed╱(╱ // 0x23b @0x53
0x01e8…0245 at0054 = ╱31╱1╱ // 0x23c @0x54
0x01e8…0245 at0055 = ╱30╱0╱ // 0x23d @0x55
0x01e8…0245 at0056 = ╱fe0000a004╱ // 0x23e @0x56
0x01e8…0245 at005b = ╱ee╱)╱ // 0x243 @0x5b
0x01e8…0245 at005c = EOL // 0x244 @0x5c
0x01e8…0245 }
0x0245…026d 8fc4 0160 DIM GLNAVN1$(25),SALDO4$(12)
0x0245…026d LineComalBin {
0x0245…026d ptr = 0x8fc4 // 0x245 @0x0
0x0245…026d lno = 0x00a0 // 0x247 @0x2
0x0245…026d at0004 = ╱87╱ DIM ╱ // 0x249 @0x4
0x0245…026d at0005 = ╱47╱G╱ // 0x24a @0x5
0x0245…026d at0006 = ╱4c╱L╱ // 0x24b @0x6
0x0245…026d at0007 = ╱4e╱N╱ // 0x24c @0x7
0x0245…026d at0008 = ╱41╱A╱ // 0x24d @0x8
0x0245…026d at0009 = ╱56╱V╱ // 0x24e @0x9
0x0245…026d at000a = ╱4e╱N╱ // 0x24f @0xa
0x0245…026d at000b = ╱31╱1╱ // 0x250 @0xb
0x0245…026d at000c = ╱ef╱$╱ // 0x251 @0xc
0x0245…026d at000d = ╱ed╱(╱ // 0x252 @0xd
0x0245…026d at000e = ╱32╱2╱ // 0x253 @0xe
0x0245…026d at000f = ╱35╱5╱ // 0x254 @0xf
0x0245…026d at0010 = ╱fe0000c805╱ // 0x255 @0x10
0x0245…026d at0015 = ╱ee╱)╱ // 0x25a @0x15
0x0245…026d at0016 = ╱ec╱,╱ // 0x25b @0x16
0x0245…026d at0017 = ╱53╱S╱ // 0x25c @0x17
0x0245…026d at0018 = ╱41╱A╱ // 0x25d @0x18
0x0245…026d at0019 = ╱4c╱L╱ // 0x25e @0x19
0x0245…026d at001a = ╱44╱D╱ // 0x25f @0x1a
0x0245…026d at001b = ╱4f╱O╱ // 0x260 @0x1b
0x0245…026d at001c = ╱34╱4╱ // 0x261 @0x1c
0x0245…026d at001d = ╱ef╱$╱ // 0x262 @0x1d
0x0245…026d at001e = ╱ed╱(╱ // 0x263 @0x1e
0x0245…026d at001f = ╱31╱1╱ // 0x264 @0x1f
0x0245…026d at0020 = ╱32╱2╱ // 0x265 @0x20
0x0245…026d at0021 = ╱fe0000c004╱ // 0x266 @0x21
0x0245…026d at0026 = ╱ee╱)╱ // 0x26b @0x26
0x0245…026d at0027 = EOL // 0x26c @0x27
0x0245…026d }
0x026d…0285 8fdc 0170 PROC CALC(ART,B1,B2,ES)
0x026d…0285 LineComalBin {
0x026d…0285 ptr = 0x8fdc // 0x26d @0x0
0x026d…0285 lno = 0x00aa // 0x26f @0x2
0x026d…0285 at0004 = ╱9e╱ PROC ╱ // 0x271 @0x4
0x026d…0285 at0005 = ╱43╱C╱ // 0x272 @0x5
0x026d…0285 at0006 = ╱41╱A╱ // 0x273 @0x6
0x026d…0285 at0007 = ╱4c╱L╱ // 0x274 @0x7
0x026d…0285 at0008 = ╱43╱C╱ // 0x275 @0x8
0x026d…0285 at0009 = ╱ed╱(╱ // 0x276 @0x9
0x026d…0285 at000a = ╱41╱A╱ // 0x277 @0xa
0x026d…0285 at000b = ╱52╱R╱ // 0x278 @0xb
0x026d…0285 at000c = ╱54╱T╱ // 0x279 @0xc
0x026d…0285 at000d = ╱ec╱,╱ // 0x27a @0xd
0x026d…0285 at000e = ╱42╱B╱ // 0x27b @0xe
0x026d…0285 at000f = ╱31╱1╱ // 0x27c @0xf
0x026d…0285 at0010 = ╱ec╱,╱ // 0x27d @0x10
0x026d…0285 at0011 = ╱42╱B╱ // 0x27e @0x11
0x026d…0285 at0012 = ╱32╱2╱ // 0x27f @0x12
0x026d…0285 at0013 = ╱ec╱,╱ // 0x280 @0x13
0x026d…0285 at0014 = ╱45╱E╱ // 0x281 @0x14
0x026d…0285 at0015 = ╱53╱S╱ // 0x282 @0x15
0x026d…0285 at0016 = ╱ee╱)╱ // 0x283 @0x16
0x026d…0285 at0017 = EOL // 0x284 @0x17
0x026d…0285 }
0x0285…02b0 9007 0180 OP1$=B1$;OP2$=B2$;RES$=ES$;SI=B;FLAG=B
0x0285…02b0 LineComalBin {
0x0285…02b0 ptr = 0x9007 // 0x285 @0x0
0x0285…02b0 lno = 0x00b4 // 0x287 @0x2
0x0285…02b0 at0004 = ╱4f╱O╱ // 0x289 @0x4
0x0285…02b0 at0005 = ╱50╱P╱ // 0x28a @0x5
0x0285…02b0 at0006 = ╱31╱1╱ // 0x28b @0x6
0x0285…02b0 at0007 = ╱ef╱$╱ // 0x28c @0x7
0x0285…02b0 at0008 = ╱dc╱=╱ // 0x28d @0x8
0x0285…02b0 at0009 = ╱42╱B╱ // 0x28e @0x9
0x0285…02b0 at000a = ╱31╱1╱ // 0x28f @0xa
0x0285…02b0 at000b = ╱ef╱$╱ // 0x290 @0xb
0x0285…02b0 at000c = ╱eb╱;╱ // 0x291 @0xc
0x0285…02b0 at000d = ╱4f╱O╱ // 0x292 @0xd
0x0285…02b0 at000e = ╱50╱P╱ // 0x293 @0xe
0x0285…02b0 at000f = ╱32╱2╱ // 0x294 @0xf
0x0285…02b0 at0010 = ╱ef╱$╱ // 0x295 @0x10
0x0285…02b0 at0011 = ╱dc╱=╱ // 0x296 @0x11
0x0285…02b0 at0012 = ╱42╱B╱ // 0x297 @0x12
0x0285…02b0 at0013 = ╱32╱2╱ // 0x298 @0x13
0x0285…02b0 at0014 = ╱ef╱$╱ // 0x299 @0x14
0x0285…02b0 at0015 = ╱eb╱;╱ // 0x29a @0x15
0x0285…02b0 at0016 = ╱52╱R╱ // 0x29b @0x16
0x0285…02b0 at0017 = ╱45╱E╱ // 0x29c @0x17
0x0285…02b0 at0018 = ╱53╱S╱ // 0x29d @0x18
0x0285…02b0 at0019 = ╱ef╱$╱ // 0x29e @0x19
0x0285…02b0 at001a = ╱dc╱=╱ // 0x29f @0x1a
0x0285…02b0 at001b = ╱45╱E╱ // 0x2a0 @0x1b
0x0285…02b0 at001c = ╱53╱S╱ // 0x2a1 @0x1c
0x0285…02b0 at001d = ╱ef╱$╱ // 0x2a2 @0x1d
0x0285…02b0 at001e = ╱eb╱;╱ // 0x2a3 @0x1e
0x0285…02b0 at001f = ╱53╱S╱ // 0x2a4 @0x1f
0x0285…02b0 at0020 = ╱49╱I╱ // 0x2a5 @0x20
0x0285…02b0 at0021 = ╱dc╱=╱ // 0x2a6 @0x21
0x0285…02b0 at0022 = ╱42╱B╱ // 0x2a7 @0x22
0x0285…02b0 at0023 = ╱eb╱;╱ // 0x2a8 @0x23
0x0285…02b0 at0024 = ╱46╱F╱ // 0x2a9 @0x24
0x0285…02b0 at0025 = ╱4c╱L╱ // 0x2aa @0x25
0x0285…02b0 at0026 = ╱41╱A╱ // 0x2ab @0x26
0x0285…02b0 at0027 = ╱47╱G╱ // 0x2ac @0x27
0x0285…02b0 at0028 = ╱dc╱=╱ // 0x2ad @0x28
0x0285…02b0 at0029 = ╱42╱B╱ // 0x2ae @0x29
0x0285…02b0 at002a = EOL // 0x2af @0x2a
0x0285…02b0 }
0x02b0…02c6 901d 0190 CALL "P641210:REGN"
0x02b0…02c6 LineComalBin {
0x02b0…02c6 ptr = 0x901d // 0x2b0 @0x0
0x02b0…02c6 lno = 0x00be // 0x2b2 @0x2
0x02b0…02c6 at0004 = ╱adeeec╱ CALL ╱ // 0x2b4 @0x4
0x02b0…02c6 at0007 = ╱22╱"╱ // 0x2b7 @0x7
0x02b0…02c6 at0008 = ╱50╱P╱ // 0x2b8 @0x8
0x02b0…02c6 at0009 = ╱36╱6╱ // 0x2b9 @0x9
0x02b0…02c6 at000a = ╱34╱4╱ // 0x2ba @0xa
0x02b0…02c6 at000b = ╱31╱1╱ // 0x2bb @0xb
0x02b0…02c6 at000c = ╱32╱2╱ // 0x2bc @0xc
0x02b0…02c6 at000d = ╱31╱1╱ // 0x2bd @0xd
0x02b0…02c6 at000e = ╱30╱0╱ // 0x2be @0xe
0x02b0…02c6 at000f = ╱3a╱:╱ // 0x2bf @0xf
0x02b0…02c6 at0010 = ╱52╱R╱ // 0x2c0 @0x10
0x02b0…02c6 at0011 = ╱45╱E╱ // 0x2c1 @0x11
0x02b0…02c6 at0012 = ╱47╱G╱ // 0x2c2 @0x12
0x02b0…02c6 at0013 = ╱4e╱N╱ // 0x2c3 @0x13
0x02b0…02c6 at0014 = ╱22╱"╱ // 0x2c4 @0x14
0x02b0…02c6 at0015 = EOL // 0x2c5 @0x15
0x02b0…02c6 }
0x02c6…02d3 902a 0200 ES$=RES$
0x02c6…02d3 LineComalBin {
0x02c6…02d3 ptr = 0x902a // 0x2c6 @0x0
0x02c6…02d3 lno = 0x00c8 // 0x2c8 @0x2
0x02c6…02d3 at0004 = ╱45╱E╱ // 0x2ca @0x4
0x02c6…02d3 at0005 = ╱53╱S╱ // 0x2cb @0x5
0x02c6…02d3 at0006 = ╱ef╱$╱ // 0x2cc @0x6
0x02c6…02d3 at0007 = ╱dc╱=╱ // 0x2cd @0x7
0x02c6…02d3 at0008 = ╱52╱R╱ // 0x2ce @0x8
0x02c6…02d3 at0009 = ╱45╱E╱ // 0x2cf @0x9
0x02c6…02d3 at000a = ╱53╱S╱ // 0x2d0 @0xa
0x02c6…02d3 at000b = ╱ef╱$╱ // 0x2d1 @0xb
0x02c6…02d3 at000c = EOL // 0x2d2 @0xc
0x02c6…02d3 }
0x02d3…02e1 9038 0210 IF FLAG<>B THEN STOP
0x02d3…02e1 LineComalBin {
0x02d3…02e1 ptr = 0x9038 // 0x2d3 @0x0
0x02d3…02e1 lno = 0x00d2 // 0x2d5 @0x2
0x02d3…02e1 at0004 = ╱82╱ IF ╱ // 0x2d7 @0x4
0x02d3…02e1 at0005 = ╱46╱F╱ // 0x2d8 @0x5
0x02d3…02e1 at0006 = ╱4c╱L╱ // 0x2d9 @0x6
0x02d3…02e1 at0007 = ╱41╱A╱ // 0x2da @0x7
0x02d3…02e1 at0008 = ╱47╱G╱ // 0x2db @0x8
0x02d3…02e1 at0009 = ╱e1╱<>╱ // 0x2dc @0x9
0x02d3…02e1 at000a = ╱42╱B╱ // 0x2dd @0xa
0x02d3…02e1 at000b = ╱b6╱ THEN ╱ // 0x2de @0xb
0x02d3…02e1 at000c = ╱8d╱ STOP ╱ // 0x2df @0xc
0x02d3…02e1 at000d = EOL // 0x2e0 @0xd
0x02d3…02e1 }
0x02e1…02e7 903e 0220 ENDPROC
0x02e1…02e7 LineComalBin {
0x02e1…02e7 ptr = 0x903e // 0x2e1 @0x0
0x02e1…02e7 lno = 0x00dc // 0x2e3 @0x2
0x02e1…02e7 at0004 = ╱9f╱ ENDPROC ╱ // 0x2e5 @0x4
0x02e1…02e7 at0005 = EOL // 0x2e6 @0x5
0x02e1…02e7 }
0x02e7…02fc 9053 0230 PROC DATOUD(DA1,DA2)
0x02e7…02fc LineComalBin {
0x02e7…02fc ptr = 0x9053 // 0x2e7 @0x0
0x02e7…02fc lno = 0x00e6 // 0x2e9 @0x2
0x02e7…02fc at0004 = ╱9e╱ PROC ╱ // 0x2eb @0x4
0x02e7…02fc at0005 = ╱44╱D╱ // 0x2ec @0x5
0x02e7…02fc at0006 = ╱41╱A╱ // 0x2ed @0x6
0x02e7…02fc at0007 = ╱54╱T╱ // 0x2ee @0x7
0x02e7…02fc at0008 = ╱4f╱O╱ // 0x2ef @0x8
0x02e7…02fc at0009 = ╱55╱U╱ // 0x2f0 @0x9
0x02e7…02fc at000a = ╱44╱D╱ // 0x2f1 @0xa
0x02e7…02fc at000b = ╱ed╱(╱ // 0x2f2 @0xb
0x02e7…02fc at000c = ╱44╱D╱ // 0x2f3 @0xc
0x02e7…02fc at000d = ╱41╱A╱ // 0x2f4 @0xd
0x02e7…02fc at000e = ╱31╱1╱ // 0x2f5 @0xe
0x02e7…02fc at000f = ╱ec╱,╱ // 0x2f6 @0xf
0x02e7…02fc at0010 = ╱44╱D╱ // 0x2f7 @0x10
0x02e7…02fc at0011 = ╱41╱A╱ // 0x2f8 @0x11
0x02e7…02fc at0012 = ╱32╱2╱ // 0x2f9 @0x12
0x02e7…02fc at0013 = ╱ee╱)╱ // 0x2fa @0x13
0x02e7…02fc at0014 = EOL // 0x2fb @0x14
0x02e7…02fc }
0x02fc…0308 905f 0240 DA3=DA1
0x02fc…0308 LineComalBin {
0x02fc…0308 ptr = 0x905f // 0x2fc @0x0
0x02fc…0308 lno = 0x00f0 // 0x2fe @0x2
0x02fc…0308 at0004 = ╱44╱D╱ // 0x300 @0x4
0x02fc…0308 at0005 = ╱41╱A╱ // 0x301 @0x5
0x02fc…0308 at0006 = ╱33╱3╱ // 0x302 @0x6
0x02fc…0308 at0007 = ╱dc╱=╱ // 0x303 @0x7
0x02fc…0308 at0008 = ╱44╱D╱ // 0x304 @0x8
0x02fc…0308 at0009 = ╱41╱A╱ // 0x305 @0x9
0x02fc…0308 at000a = ╱31╱1╱ // 0x306 @0xa
0x02fc…0308 at000b = EOL // 0x307 @0xb
0x02fc…0308 }
0x0308…031c 9073 0250 DA2$=" "
0x0308…031c LineComalBin {
0x0308…031c ptr = 0x9073 // 0x308 @0x0
0x0308…031c lno = 0x00fa // 0x30a @0x2
0x0308…031c at0004 = ╱44╱D╱ // 0x30c @0x4
0x0308…031c at0005 = ╱41╱A╱ // 0x30d @0x5
0x0308…031c at0006 = ╱32╱2╱ // 0x30e @0x6
0x0308…031c at0007 = ╱ef╱$╱ // 0x30f @0x7
0x0308…031c at0008 = ╱dc╱=╱ // 0x310 @0x8
0x0308…031c at0009 = ╱22╱"╱ // 0x311 @0x9
0x0308…031c at000a = ╱20╱…╱ // 0x312 @0xa
0x0308…031c at000b = ╱20╱…╱ // 0x313 @0xb
0x0308…031c at000c = ╱20╱…╱ // 0x314 @0xc
0x0308…031c at000d = ╱20╱…╱ // 0x315 @0xd
0x0308…031c at000e = ╱20╱…╱ // 0x316 @0xe
0x0308…031c at000f = ╱20╱…╱ // 0x317 @0xf
0x0308…031c at0010 = ╱20╱…╱ // 0x318 @0x10
0x0308…031c at0011 = ╱20╱…╱ // 0x319 @0x11
0x0308…031c at0012 = ╱22╱"╱ // 0x31a @0x12
0x0308…031c at0013 = EOL // 0x31b @0x13
0x0308…031c }
0x031c…032f 9086 0260 FOR J=8 TO E STEP -E
0x031c…032f LineComalBin {
0x031c…032f ptr = 0x9086 // 0x31c @0x0
0x031c…032f lno = 0x0104 // 0x31e @0x2
0x031c…032f at0004 = ╱83╱ FOR ╱ // 0x320 @0x4
0x031c…032f at0005 = ╱4a╱J╱ // 0x321 @0x5
0x031c…032f at0006 = ╱dc╱=╱ // 0x322 @0x6
0x031c…032f at0007 = ╱38╱8╱ // 0x323 @0x7
0x031c…032f at0008 = ╱fe00008004╱ // 0x324 @0x8
0x031c…032f at000d = ╱b7╱ TO ╱ // 0x329 @0xd
0x031c…032f at000e = ╱45╱E╱ // 0x32a @0xe
0x031c…032f at000f = ╱b8╱ STEP ╱ // 0x32b @0xf
0x031c…032f at0010 = ╱e9╱-╱ // 0x32c @0x10
0x031c…032f at0011 = ╱45╱E╱ // 0x32d @0x11
0x031c…032f at0012 = EOL // 0x32e @0x12
0x031c…032f }
0x032f…033b 9092 0270 IF J MOD V=B THEN
0x032f…033b LineComalBin {
0x032f…033b ptr = 0x9092 // 0x32f @0x0
0x032f…033b lno = 0x010e // 0x331 @0x2
0x032f…033b at0004 = ╱9c╱ IF ╱ // 0x333 @0x4
0x032f…033b at0005 = ╱4a╱J╱ // 0x334 @0x5
0x032f…033b at0006 = ╱e8╱ MOD ╱ // 0x335 @0x6
0x032f…033b at0007 = ╱56╱V╱ // 0x336 @0x7
0x032f…033b at0008 = ╱dc╱=╱ // 0x337 @0x8
0x032f…033b at0009 = ╱42╱B╱ // 0x338 @0x9
0x032f…033b at000a = ╱b6╱ THEN ╱ // 0x339 @0xa
0x032f…033b at000b = EOL // 0x33a @0xb
0x032f…033b }
0x033b…034b 90a2 0280 DA2$(J)="."
0x033b…034b LineComalBin {
0x033b…034b ptr = 0x90a2 // 0x33b @0x0
0x033b…034b lno = 0x0118 // 0x33d @0x2
0x033b…034b at0004 = ╱44╱D╱ // 0x33f @0x4
0x033b…034b at0005 = ╱41╱A╱ // 0x340 @0x5
0x033b…034b at0006 = ╱32╱2╱ // 0x341 @0x6
0x033b…034b at0007 = ╱ef╱$╱ // 0x342 @0x7
0x033b…034b at0008 = ╱ed╱(╱ // 0x343 @0x8
0x033b…034b at0009 = ╱4a╱J╱ // 0x344 @0x9
0x033b…034b at000a = ╱ee╱)╱ // 0x345 @0xa
0x033b…034b at000b = ╱dc╱=╱ // 0x346 @0xb
0x033b…034b at000c = ╱22╱"╱ // 0x347 @0xc
0x033b…034b at000d = ╱2e╱.╱ // 0x348 @0xd
0x033b…034b at000e = ╱22╱"╱ // 0x349 @0xe
0x033b…034b at000f = EOL // 0x34a @0xf
0x033b…034b }
0x034b…0351 90a8 0290 ELSE
0x034b…0351 LineComalBin {
0x034b…0351 ptr = 0x90a8 // 0x34b @0x0
0x034b…0351 lno = 0x0122 // 0x34d @0x2
0x034b…0351 at0004 = ╱9a╱ ELSE ╱ // 0x34f @0x4
0x034b…0351 at0005 = EOL // 0x350 @0x5
0x034b…0351 }
0x0351…0374 90cb 0300 DA2$(J)=CHR(DA3 MOD 10+48)
0x0351…0374 LineComalBin {
0x0351…0374 ptr = 0x90cb // 0x351 @0x0
0x0351…0374 lno = 0x012c // 0x353 @0x2
0x0351…0374 at0004 = ╱44╱D╱ // 0x355 @0x4
0x0351…0374 at0005 = ╱41╱A╱ // 0x356 @0x5
0x0351…0374 at0006 = ╱32╱2╱ // 0x357 @0x6
0x0351…0374 at0007 = ╱ef╱$╱ // 0x358 @0x7
0x0351…0374 at0008 = ╱ed╱(╱ // 0x359 @0x8
0x0351…0374 at0009 = ╱4a╱J╱ // 0x35a @0x9
0x0351…0374 at000a = ╱ee╱)╱ // 0x35b @0xa
0x0351…0374 at000b = ╱dc╱=╱ // 0x35c @0xb
0x0351…0374 at000c = ╱cf╱CHR╱ // 0x35d @0xc
0x0351…0374 at000d = ╱ed╱(╱ // 0x35e @0xd
0x0351…0374 at000e = ╱44╱D╱ // 0x35f @0xe
0x0351…0374 at000f = ╱41╱A╱ // 0x360 @0xf
0x0351…0374 at0010 = ╱33╱3╱ // 0x361 @0x10
0x0351…0374 at0011 = ╱e8╱ MOD ╱ // 0x362 @0x11
0x0351…0374 at0012 = ╱31╱1╱ // 0x363 @0x12
0x0351…0374 at0013 = ╱30╱0╱ // 0x364 @0x13
0x0351…0374 at0014 = ╱fe0000a004╱ // 0x365 @0x14
0x0351…0374 at0019 = ╱e2╱+╱ // 0x36a @0x19
0x0351…0374 at001a = ╱34╱4╱ // 0x36b @0x1a
0x0351…0374 at001b = ╱38╱8╱ // 0x36c @0x1b
0x0351…0374 at001c = ╱fe0000c006╱ // 0x36d @0x1c
0x0351…0374 at0021 = ╱ee╱)╱ // 0x372 @0x21
0x0351…0374 at0022 = EOL // 0x373 @0x22
0x0351…0374 }
0x0374…0388 90df 0310 DA3=DA3 DIV 10
0x0374…0388 LineComalBin {
0x0374…0388 ptr = 0x90df // 0x374 @0x0
0x0374…0388 lno = 0x0136 // 0x376 @0x2
0x0374…0388 at0004 = ╱44╱D╱ // 0x378 @0x4
0x0374…0388 at0005 = ╱41╱A╱ // 0x379 @0x5
0x0374…0388 at0006 = ╱33╱3╱ // 0x37a @0x6
0x0374…0388 at0007 = ╱dc╱=╱ // 0x37b @0x7
0x0374…0388 at0008 = ╱44╱D╱ // 0x37c @0x8
0x0374…0388 at0009 = ╱41╱A╱ // 0x37d @0x9
0x0374…0388 at000a = ╱33╱3╱ // 0x37e @0xa
0x0374…0388 at000b = ╱e7╱ DIV ╱ // 0x37f @0xb
0x0374…0388 at000c = ╱31╱1╱ // 0x380 @0xc
0x0374…0388 at000d = ╱30╱0╱ // 0x381 @0xd
0x0374…0388 at000e = ╱fe0000a004╱ // 0x382 @0xe
0x0374…0388 at0013 = EOL // 0x387 @0x13
0x0374…0388 }
0x0388…038e 90e5 0320 ENDIF
0x0388…038e LineComalBin {
0x0388…038e ptr = 0x90e5 // 0x388 @0x0
0x0388…038e lno = 0x0140 // 0x38a @0x2
0x0388…038e at0004 = ╱9b╱ ENDIF ╱ // 0x38c @0x4
0x0388…038e at0005 = EOL // 0x38d @0x5
0x0388…038e }
0x038e…0395 90ec 0330 NEXT J
0x038e…0395 LineComalBin {
0x038e…0395 ptr = 0x90ec // 0x38e @0x0
0x038e…0395 lno = 0x014a // 0x390 @0x2
0x038e…0395 at0004 = ╱84╱ NEXT ╱ // 0x392 @0x4
0x038e…0395 at0005 = ╱4a╱J╱ // 0x393 @0x5
0x038e…0395 at0006 = EOL // 0x394 @0x6
0x038e…0395 }
0x0395…039b 90f2 0340 ENDPROC
0x0395…039b LineComalBin {
0x0395…039b ptr = 0x90f2 // 0x395 @0x0
0x0395…039b lno = 0x0154 // 0x397 @0x2
0x0395…039b at0004 = ╱9f╱ ENDPROC ╱ // 0x399 @0x4
0x0395…039b at0005 = EOL // 0x39a @0x5
0x0395…039b }
0x039b…03b5 910c 0350 PROC INDTAB(T,MANTAL,L10)
0x039b…03b5 LineComalBin {
0x039b…03b5 ptr = 0x910c // 0x39b @0x0
0x039b…03b5 lno = 0x015e // 0x39d @0x2
0x039b…03b5 at0004 = ╱9e╱ PROC ╱ // 0x39f @0x4
0x039b…03b5 at0005 = ╱49╱I╱ // 0x3a0 @0x5
0x039b…03b5 at0006 = ╱4e╱N╱ // 0x3a1 @0x6
0x039b…03b5 at0007 = ╱44╱D╱ // 0x3a2 @0x7
0x039b…03b5 at0008 = ╱54╱T╱ // 0x3a3 @0x8
0x039b…03b5 at0009 = ╱41╱A╱ // 0x3a4 @0x9
0x039b…03b5 at000a = ╱42╱B╱ // 0x3a5 @0xa
0x039b…03b5 at000b = ╱ed╱(╱ // 0x3a6 @0xb
0x039b…03b5 at000c = ╱54╱T╱ // 0x3a7 @0xc
0x039b…03b5 at000d = ╱ec╱,╱ // 0x3a8 @0xd
0x039b…03b5 at000e = ╱4d╱M╱ // 0x3a9 @0xe
0x039b…03b5 at000f = ╱41╱A╱ // 0x3aa @0xf
0x039b…03b5 at0010 = ╱4e╱N╱ // 0x3ab @0x10
0x039b…03b5 at0011 = ╱54╱T╱ // 0x3ac @0x11
0x039b…03b5 at0012 = ╱41╱A╱ // 0x3ad @0x12
0x039b…03b5 at0013 = ╱4c╱L╱ // 0x3ae @0x13
0x039b…03b5 at0014 = ╱ec╱,╱ // 0x3af @0x14
0x039b…03b5 at0015 = ╱4c╱L╱ // 0x3b0 @0x15
0x039b…03b5 at0016 = ╱31╱1╱ // 0x3b1 @0x16
0x039b…03b5 at0017 = ╱30╱0╱ // 0x3b2 @0x17
0x039b…03b5 at0018 = ╱ee╱)╱ // 0x3b3 @0x18
0x039b…03b5 at0019 = EOL // 0x3b4 @0x19
0x039b…03b5 }
0x03b5…03cc 9123 0360 J=MANTAL DIV 32+E
0x03b5…03cc LineComalBin {
0x03b5…03cc ptr = 0x9123 // 0x3b5 @0x0
0x03b5…03cc lno = 0x0168 // 0x3b7 @0x2
0x03b5…03cc at0004 = ╱4a╱J╱ // 0x3b9 @0x4
0x03b5…03cc at0005 = ╱dc╱=╱ // 0x3ba @0x5
0x03b5…03cc at0006 = ╱4d╱M╱ // 0x3bb @0x6
0x03b5…03cc at0007 = ╱41╱A╱ // 0x3bc @0x7
0x03b5…03cc at0008 = ╱4e╱N╱ // 0x3bd @0x8
0x03b5…03cc at0009 = ╱54╱T╱ // 0x3be @0x9
0x03b5…03cc at000a = ╱41╱A╱ // 0x3bf @0xa
0x03b5…03cc at000b = ╱4c╱L╱ // 0x3c0 @0xb
0x03b5…03cc at000c = ╱e7╱ DIV ╱ // 0x3c1 @0xc
0x03b5…03cc at000d = ╱33╱3╱ // 0x3c2 @0xd
0x03b5…03cc at000e = ╱32╱2╱ // 0x3c3 @0xe
0x03b5…03cc at000f = ╱fe00008006╱ // 0x3c4 @0xf
0x03b5…03cc at0014 = ╱e2╱+╱ // 0x3c9 @0x14
0x03b5…03cc at0015 = ╱45╱E╱ // 0x3ca @0x15
0x03b5…03cc at0016 = EOL // 0x3cb @0x16
0x03b5…03cc }
0x03cc…03e7 913e 0370 FOR I=J TO MANTAL DIV 4+J-E
0x03cc…03e7 LineComalBin {
0x03cc…03e7 ptr = 0x913e // 0x3cc @0x0
0x03cc…03e7 lno = 0x0172 // 0x3ce @0x2
0x03cc…03e7 at0004 = ╱83╱ FOR ╱ // 0x3d0 @0x4
0x03cc…03e7 at0005 = ╱49╱I╱ // 0x3d1 @0x5
0x03cc…03e7 at0006 = ╱dc╱=╱ // 0x3d2 @0x6
0x03cc…03e7 at0007 = ╱4a╱J╱ // 0x3d3 @0x7
0x03cc…03e7 at0008 = ╱b7╱ TO ╱ // 0x3d4 @0x8
0x03cc…03e7 at0009 = ╱4d╱M╱ // 0x3d5 @0x9
0x03cc…03e7 at000a = ╱41╱A╱ // 0x3d6 @0xa
0x03cc…03e7 at000b = ╱4e╱N╱ // 0x3d7 @0xb
0x03cc…03e7 at000c = ╱54╱T╱ // 0x3d8 @0xc
0x03cc…03e7 at000d = ╱41╱A╱ // 0x3d9 @0xd
0x03cc…03e7 at000e = ╱4c╱L╱ // 0x3da @0xe
0x03cc…03e7 at000f = ╱e7╱ DIV ╱ // 0x3db @0xf
0x03cc…03e7 at0010 = ╱34╱4╱ // 0x3dc @0x10
0x03cc…03e7 at0011 = ╱fe00008003╱ // 0x3dd @0x11
0x03cc…03e7 at0016 = ╱e2╱+╱ // 0x3e2 @0x16
0x03cc…03e7 at0017 = ╱4a╱J╱ // 0x3e3 @0x17
0x03cc…03e7 at0018 = ╱e3╱-╱ // 0x3e4 @0x18
0x03cc…03e7 at0019 = ╱45╱E╱ // 0x3e5 @0x19
0x03cc…03e7 at001a = EOL // 0x3e6 @0x1a
0x03cc…03e7 }
0x03e7…0411 9168 0380 H=(I-J)*4+E;H1=H+E;H2=H+G;H3=H+V
0x03e7…0411 LineComalBin {
0x03e7…0411 ptr = 0x9168 // 0x3e7 @0x0
0x03e7…0411 lno = 0x017c // 0x3e9 @0x2
0x03e7…0411 at0004 = ╱48╱H╱ // 0x3eb @0x4
0x03e7…0411 at0005 = ╱dc╱=╱ // 0x3ec @0x5
0x03e7…0411 at0006 = ╱ed╱(╱ // 0x3ed @0x6
0x03e7…0411 at0007 = ╱49╱I╱ // 0x3ee @0x7
0x03e7…0411 at0008 = ╱e3╱-╱ // 0x3ef @0x8
0x03e7…0411 at0009 = ╱4a╱J╱ // 0x3f0 @0x9
0x03e7…0411 at000a = ╱ee╱)╱ // 0x3f1 @0xa
0x03e7…0411 at000b = ╱e4╱*╱ // 0x3f2 @0xb
0x03e7…0411 at000c = ╱34╱4╱ // 0x3f3 @0xc
0x03e7…0411 at000d = ╱fe00008003╱ // 0x3f4 @0xd
0x03e7…0411 at0012 = ╱e2╱+╱ // 0x3f9 @0x12
0x03e7…0411 at0013 = ╱45╱E╱ // 0x3fa @0x13
0x03e7…0411 at0014 = ╱eb╱;╱ // 0x3fb @0x14
0x03e7…0411 at0015 = ╱48╱H╱ // 0x3fc @0x15
0x03e7…0411 at0016 = ╱31╱1╱ // 0x3fd @0x16
0x03e7…0411 at0017 = ╱dc╱=╱ // 0x3fe @0x17
0x03e7…0411 at0018 = ╱48╱H╱ // 0x3ff @0x18
0x03e7…0411 at0019 = ╱e2╱+╱ // 0x400 @0x19
0x03e7…0411 at001a = ╱45╱E╱ // 0x401 @0x1a
0x03e7…0411 at001b = ╱eb╱;╱ // 0x402 @0x1b
0x03e7…0411 at001c = ╱48╱H╱ // 0x403 @0x1c
0x03e7…0411 at001d = ╱32╱2╱ // 0x404 @0x1d
0x03e7…0411 at001e = ╱dc╱=╱ // 0x405 @0x1e
0x03e7…0411 at001f = ╱48╱H╱ // 0x406 @0x1f
0x03e7…0411 at0020 = ╱e2╱+╱ // 0x407 @0x20
0x03e7…0411 at0021 = ╱47╱G╱ // 0x408 @0x21
0x03e7…0411 at0022 = ╱eb╱;╱ // 0x409 @0x22
0x03e7…0411 at0023 = ╱48╱H╱ // 0x40a @0x23
0x03e7…0411 at0024 = ╱33╱3╱ // 0x40b @0x24
0x03e7…0411 at0025 = ╱dc╱=╱ // 0x40c @0x25
0x03e7…0411 at0026 = ╱48╱H╱ // 0x40d @0x26
0x03e7…0411 at0027 = ╱e2╱+╱ // 0x40e @0x27
0x03e7…0411 at0028 = ╱56╱V╱ // 0x40f @0x28
0x03e7…0411 at0029 = EOL // 0x410 @0x29
0x03e7…0411 }
0x0411…045b 91b2 0390 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)
0x0411…045b LineComalBin {
0x0411…045b ptr = 0x91b2 // 0x411 @0x0
0x0411…045b lno = 0x0186 // 0x413 @0x2
0x0411…045b at0004 = ╱a9╱ GET ╱ // 0x415 @0x4
0x0411…045b at0005 = ╱4c╱L╱ // 0x416 @0x5
0x0411…045b at0006 = ╱31╱1╱ // 0x417 @0x6
0x0411…045b at0007 = ╱30╱0╱ // 0x418 @0x7
0x0411…045b at0008 = ╱ef╱$╱ // 0x419 @0x8
0x0411…045b at0009 = ╱ec╱,╱ // 0x41a @0x9
0x0411…045b at000a = ╱49╱I╱ // 0x41b @0xa
0x0411…045b at000b = ╱f0╱:╱ // 0x41c @0xb
0x0411…045b at000c = ╱54╱T╱ // 0x41d @0xc
0x0411…045b at000d = ╱ed╱(╱ // 0x41e @0xd
0x0411…045b at000e = ╱48╱H╱ // 0x41f @0xe
0x0411…045b at000f = ╱ec╱,╱ // 0x420 @0xf
0x0411…045b at0010 = ╱45╱E╱ // 0x421 @0x10
0x0411…045b at0011 = ╱ee╱)╱ // 0x422 @0x11
0x0411…045b at0012 = ╱ec╱,╱ // 0x423 @0x12
0x0411…045b at0013 = ╱54╱T╱ // 0x424 @0x13
0x0411…045b at0014 = ╱ed╱(╱ // 0x425 @0x14
0x0411…045b at0015 = ╱48╱H╱ // 0x426 @0x15
0x0411…045b at0016 = ╱ec╱,╱ // 0x427 @0x16
0x0411…045b at0017 = ╱47╱G╱ // 0x428 @0x17
0x0411…045b at0018 = ╱ee╱)╱ // 0x429 @0x18
0x0411…045b at0019 = ╱ec╱,╱ // 0x42a @0x19
0x0411…045b at001a = ╱54╱T╱ // 0x42b @0x1a
0x0411…045b at001b = ╱ed╱(╱ // 0x42c @0x1b
0x0411…045b at001c = ╱48╱H╱ // 0x42d @0x1c
0x0411…045b at001d = ╱31╱1╱ // 0x42e @0x1d
0x0411…045b at001e = ╱ec╱,╱ // 0x42f @0x1e
0x0411…045b at001f = ╱45╱E╱ // 0x430 @0x1f
0x0411…045b at0020 = ╱ee╱)╱ // 0x431 @0x20
0x0411…045b at0021 = ╱ec╱,╱ // 0x432 @0x21
0x0411…045b at0022 = ╱54╱T╱ // 0x433 @0x22
0x0411…045b at0023 = ╱ed╱(╱ // 0x434 @0x23
0x0411…045b at0024 = ╱48╱H╱ // 0x435 @0x24
0x0411…045b at0025 = ╱31╱1╱ // 0x436 @0x25
0x0411…045b at0026 = ╱ec╱,╱ // 0x437 @0x26
0x0411…045b at0027 = ╱47╱G╱ // 0x438 @0x27
0x0411…045b at0028 = ╱ee╱)╱ // 0x439 @0x28
0x0411…045b at0029 = ╱ec╱,╱ // 0x43a @0x29
0x0411…045b at002a = ╱54╱T╱ // 0x43b @0x2a
0x0411…045b at002b = ╱ed╱(╱ // 0x43c @0x2b
0x0411…045b at002c = ╱48╱H╱ // 0x43d @0x2c
0x0411…045b at002d = ╱32╱2╱ // 0x43e @0x2d
0x0411…045b at002e = ╱ec╱,╱ // 0x43f @0x2e
0x0411…045b at002f = ╱45╱E╱ // 0x440 @0x2f
0x0411…045b at0030 = ╱ee╱)╱ // 0x441 @0x30
0x0411…045b at0031 = ╱ec╱,╱ // 0x442 @0x31
0x0411…045b at0032 = ╱54╱T╱ // 0x443 @0x32
0x0411…045b at0033 = ╱ed╱(╱ // 0x444 @0x33
0x0411…045b at0034 = ╱48╱H╱ // 0x445 @0x34
0x0411…045b at0035 = ╱32╱2╱ // 0x446 @0x35
0x0411…045b at0036 = ╱ec╱,╱ // 0x447 @0x36
0x0411…045b at0037 = ╱47╱G╱ // 0x448 @0x37
0x0411…045b at0038 = ╱ee╱)╱ // 0x449 @0x38
0x0411…045b at0039 = ╱ec╱,╱ // 0x44a @0x39
0x0411…045b at003a = ╱54╱T╱ // 0x44b @0x3a
0x0411…045b at003b = ╱ed╱(╱ // 0x44c @0x3b
0x0411…045b at003c = ╱48╱H╱ // 0x44d @0x3c
0x0411…045b at003d = ╱33╱3╱ // 0x44e @0x3d
0x0411…045b at003e = ╱ec╱,╱ // 0x44f @0x3e
0x0411…045b at003f = ╱45╱E╱ // 0x450 @0x3f
0x0411…045b at0040 = ╱ee╱)╱ // 0x451 @0x40
0x0411…045b at0041 = ╱ec╱,╱ // 0x452 @0x41
0x0411…045b at0042 = ╱54╱T╱ // 0x453 @0x42
0x0411…045b at0043 = ╱ed╱(╱ // 0x454 @0x43
0x0411…045b at0044 = ╱48╱H╱ // 0x455 @0x44
0x0411…045b at0045 = ╱33╱3╱ // 0x456 @0x45
0x0411…045b at0046 = ╱ec╱,╱ // 0x457 @0x46
0x0411…045b at0047 = ╱47╱G╱ // 0x458 @0x47
0x0411…045b at0048 = ╱ee╱)╱ // 0x459 @0x48
0x0411…045b at0049 = EOL // 0x45a @0x49
0x0411…045b }
0x045b…046f 91c6 0400 EXEC FEJL(E,E,L10$)
0x045b…046f LineComalBin {
0x045b…046f ptr = 0x91c6 // 0x45b @0x0
0x045b…046f lno = 0x0190 // 0x45d @0x2
0x045b…046f at0004 = ╱9d╱ EXEC ╱ // 0x45f @0x4
0x045b…046f at0005 = ╱46╱F╱ // 0x460 @0x5
0x045b…046f at0006 = ╱45╱E╱ // 0x461 @0x6
0x045b…046f at0007 = ╱4a╱J╱ // 0x462 @0x7
0x045b…046f at0008 = ╱4c╱L╱ // 0x463 @0x8
0x045b…046f at0009 = ╱ed╱(╱ // 0x464 @0x9
0x045b…046f at000a = ╱45╱E╱ // 0x465 @0xa
0x045b…046f at000b = ╱ec╱,╱ // 0x466 @0xb
0x045b…046f at000c = ╱45╱E╱ // 0x467 @0xc
0x045b…046f at000d = ╱ec╱,╱ // 0x468 @0xd
0x045b…046f at000e = ╱4c╱L╱ // 0x469 @0xe
0x045b…046f at000f = ╱31╱1╱ // 0x46a @0xf
0x045b…046f at0010 = ╱30╱0╱ // 0x46b @0x10
0x045b…046f at0011 = ╱ef╱$╱ // 0x46c @0x11
0x045b…046f at0012 = ╱ee╱)╱ // 0x46d @0x12
0x045b…046f at0013 = EOL // 0x46e @0x13
0x045b…046f }
0x046f…0476 91cd 0410 NEXT I
0x046f…0476 LineComalBin {
0x046f…0476 ptr = 0x91cd // 0x46f @0x0
0x046f…0476 lno = 0x019a // 0x471 @0x2
0x046f…0476 at0004 = ╱84╱ NEXT ╱ // 0x473 @0x4
0x046f…0476 at0005 = ╱49╱I╱ // 0x474 @0x5
0x046f…0476 at0006 = EOL // 0x475 @0x6
0x046f…0476 }
0x0476…047c 91d3 0420 ENDPROC
0x0476…047c LineComalBin {
0x0476…047c ptr = 0x91d3 // 0x476 @0x0
0x0476…047c lno = 0x01a4 // 0x478 @0x2
0x0476…047c at0004 = ╱9f╱ ENDPROC ╱ // 0x47a @0x4
0x0476…047c at0005 = EOL // 0x47b @0x5
0x0476…047c }
0x047c…048a 91e1 0430 PROC HENTPOST
0x047c…048a LineComalBin {
0x047c…048a ptr = 0x91e1 // 0x47c @0x0
0x047c…048a lno = 0x01ae // 0x47e @0x2
0x047c…048a at0004 = ╱9e╱ PROC ╱ // 0x480 @0x4
0x047c…048a at0005 = ╱48╱H╱ // 0x481 @0x5
0x047c…048a at0006 = ╱45╱E╱ // 0x482 @0x6
0x047c…048a at0007 = ╱4e╱N╱ // 0x483 @0x7
0x047c…048a at0008 = ╱54╱T╱ // 0x484 @0x8
0x047c…048a at0009 = ╱50╱P╱ // 0x485 @0x9
0x047c…048a at000a = ╱4f╱O╱ // 0x486 @0xa
0x047c…048a at000b = ╱53╱S╱ // 0x487 @0xb
0x047c…048a at000c = ╱54╱T╱ // 0x488 @0xc
0x047c…048a at000d = EOL // 0x489 @0xd
0x047c…048a }
0x048a…049f 91f6 0440 S1=FTAB(FPIL3,G)
0x048a…049f LineComalBin {
0x048a…049f ptr = 0x91f6 // 0x48a @0x0
0x048a…049f lno = 0x01b8 // 0x48c @0x2
0x048a…049f at0004 = ╱53╱S╱ // 0x48e @0x4
0x048a…049f at0005 = ╱31╱1╱ // 0x48f @0x5
0x048a…049f at0006 = ╱dc╱=╱ // 0x490 @0x6
0x048a…049f at0007 = ╱46╱F╱ // 0x491 @0x7
0x048a…049f at0008 = ╱54╱T╱ // 0x492 @0x8
0x048a…049f at0009 = ╱41╱A╱ // 0x493 @0x9
0x048a…049f at000a = ╱42╱B╱ // 0x494 @0xa
0x048a…049f at000b = ╱ed╱(╱ // 0x495 @0xb
0x048a…049f at000c = ╱46╱F╱ // 0x496 @0xc
0x048a…049f at000d = ╱50╱P╱ // 0x497 @0xd
0x048a…049f at000e = ╱49╱I╱ // 0x498 @0xe
0x048a…049f at000f = ╱4c╱L╱ // 0x499 @0xf
0x048a…049f at0010 = ╱33╱3╱ // 0x49a @0x10
0x048a…049f at0011 = ╱ec╱,╱ // 0x49b @0x11
0x048a…049f at0012 = ╱47╱G╱ // 0x49c @0x12
0x048a…049f at0013 = ╱ee╱)╱ // 0x49d @0x13
0x048a…049f at0014 = EOL // 0x49e @0x14
0x048a…049f }
0x049f…04b6 920d 0450 GET K3$,S1:FNR,FNAVN$
0x049f…04b6 LineComalBin {
0x049f…04b6 ptr = 0x920d // 0x49f @0x0
0x049f…04b6 lno = 0x01c2 // 0x4a1 @0x2
0x049f…04b6 at0004 = ╱a9╱ GET ╱ // 0x4a3 @0x4
0x049f…04b6 at0005 = ╱4b╱K╱ // 0x4a4 @0x5
0x049f…04b6 at0006 = ╱33╱3╱ // 0x4a5 @0x6
0x049f…04b6 at0007 = ╱ef╱$╱ // 0x4a6 @0x7
0x049f…04b6 at0008 = ╱ec╱,╱ // 0x4a7 @0x8
0x049f…04b6 at0009 = ╱53╱S╱ // 0x4a8 @0x9
0x049f…04b6 at000a = ╱31╱1╱ // 0x4a9 @0xa
0x049f…04b6 at000b = ╱f0╱:╱ // 0x4aa @0xb
0x049f…04b6 at000c = ╱46╱F╱ // 0x4ab @0xc
0x049f…04b6 at000d = ╱4e╱N╱ // 0x4ac @0xd
0x049f…04b6 at000e = ╱52╱R╱ // 0x4ad @0xe
0x049f…04b6 at000f = ╱ec╱,╱ // 0x4ae @0xf
0x049f…04b6 at0010 = ╱46╱F╱ // 0x4af @0x10
0x049f…04b6 at0011 = ╱4e╱N╱ // 0x4b0 @0x11
0x049f…04b6 at0012 = ╱41╱A╱ // 0x4b1 @0x12
0x049f…04b6 at0013 = ╱56╱V╱ // 0x4b2 @0x13
0x049f…04b6 at0014 = ╱4e╱N╱ // 0x4b3 @0x14
0x049f…04b6 at0015 = ╱ef╱$╱ // 0x4b4 @0x15
0x049f…04b6 at0016 = EOL // 0x4b5 @0x16
0x049f…04b6 }
0x04b6…04c9 9220 0460 EXEC FEJL(G,G,K3$)
0x04b6…04c9 LineComalBin {
0x04b6…04c9 ptr = 0x9220 // 0x4b6 @0x0
0x04b6…04c9 lno = 0x01cc // 0x4b8 @0x2
0x04b6…04c9 at0004 = ╱9d╱ EXEC ╱ // 0x4ba @0x4
0x04b6…04c9 at0005 = ╱46╱F╱ // 0x4bb @0x5
0x04b6…04c9 at0006 = ╱45╱E╱ // 0x4bc @0x6
0x04b6…04c9 at0007 = ╱4a╱J╱ // 0x4bd @0x7
0x04b6…04c9 at0008 = ╱4c╱L╱ // 0x4be @0x8
0x04b6…04c9 at0009 = ╱ed╱(╱ // 0x4bf @0x9
0x04b6…04c9 at000a = ╱47╱G╱ // 0x4c0 @0xa
0x04b6…04c9 at000b = ╱ec╱,╱ // 0x4c1 @0xb
0x04b6…04c9 at000c = ╱47╱G╱ // 0x4c2 @0xc
0x04b6…04c9 at000d = ╱ec╱,╱ // 0x4c3 @0xd
0x04b6…04c9 at000e = ╱4b╱K╱ // 0x4c4 @0xe
0x04b6…04c9 at000f = ╱33╱3╱ // 0x4c5 @0xf
0x04b6…04c9 at0010 = ╱ef╱$╱ // 0x4c6 @0x10
0x04b6…04c9 at0011 = ╱ee╱)╱ // 0x4c7 @0x11
0x04b6…04c9 at0012 = EOL // 0x4c8 @0x12
0x04b6…04c9 }
0x04c9…04f2 9249 0470 GET K3$,S1+E:FMKODE$,FMDEBET$,FMKREDIT$
0x04c9…04f2 LineComalBin {
0x04c9…04f2 ptr = 0x9249 // 0x4c9 @0x0
0x04c9…04f2 lno = 0x01d6 // 0x4cb @0x2
0x04c9…04f2 at0004 = ╱a9╱ GET ╱ // 0x4cd @0x4
0x04c9…04f2 at0005 = ╱4b╱K╱ // 0x4ce @0x5
0x04c9…04f2 at0006 = ╱33╱3╱ // 0x4cf @0x6
0x04c9…04f2 at0007 = ╱ef╱$╱ // 0x4d0 @0x7
0x04c9…04f2 at0008 = ╱ec╱,╱ // 0x4d1 @0x8
0x04c9…04f2 at0009 = ╱53╱S╱ // 0x4d2 @0x9
0x04c9…04f2 at000a = ╱31╱1╱ // 0x4d3 @0xa
0x04c9…04f2 at000b = ╱e2╱+╱ // 0x4d4 @0xb
0x04c9…04f2 at000c = ╱45╱E╱ // 0x4d5 @0xc
0x04c9…04f2 at000d = ╱f0╱:╱ // 0x4d6 @0xd
0x04c9…04f2 at000e = ╱46╱F╱ // 0x4d7 @0xe
0x04c9…04f2 at000f = ╱4d╱M╱ // 0x4d8 @0xf
0x04c9…04f2 at0010 = ╱4b╱K╱ // 0x4d9 @0x10
0x04c9…04f2 at0011 = ╱4f╱O╱ // 0x4da @0x11
0x04c9…04f2 at0012 = ╱44╱D╱ // 0x4db @0x12
0x04c9…04f2 at0013 = ╱45╱E╱ // 0x4dc @0x13
0x04c9…04f2 at0014 = ╱ef╱$╱ // 0x4dd @0x14
0x04c9…04f2 at0015 = ╱ec╱,╱ // 0x4de @0x15
0x04c9…04f2 at0016 = ╱46╱F╱ // 0x4df @0x16
0x04c9…04f2 at0017 = ╱4d╱M╱ // 0x4e0 @0x17
0x04c9…04f2 at0018 = ╱44╱D╱ // 0x4e1 @0x18
0x04c9…04f2 at0019 = ╱45╱E╱ // 0x4e2 @0x19
0x04c9…04f2 at001a = ╱42╱B╱ // 0x4e3 @0x1a
0x04c9…04f2 at001b = ╱45╱E╱ // 0x4e4 @0x1b
0x04c9…04f2 at001c = ╱54╱T╱ // 0x4e5 @0x1c
0x04c9…04f2 at001d = ╱ef╱$╱ // 0x4e6 @0x1d
0x04c9…04f2 at001e = ╱ec╱,╱ // 0x4e7 @0x1e
0x04c9…04f2 at001f = ╱46╱F╱ // 0x4e8 @0x1f
0x04c9…04f2 at0020 = ╱4d╱M╱ // 0x4e9 @0x20
0x04c9…04f2 at0021 = ╱4b╱K╱ // 0x4ea @0x21
0x04c9…04f2 at0022 = ╱52╱R╱ // 0x4eb @0x22
0x04c9…04f2 at0023 = ╱45╱E╱ // 0x4ec @0x23
0x04c9…04f2 at0024 = ╱44╱D╱ // 0x4ed @0x24
0x04c9…04f2 at0025 = ╱49╱I╱ // 0x4ee @0x25
0x04c9…04f2 at0026 = ╱54╱T╱ // 0x4ef @0x26
0x04c9…04f2 at0027 = ╱ef╱$╱ // 0x4f0 @0x27
0x04c9…04f2 at0028 = EOL // 0x4f1 @0x28
0x04c9…04f2 }
0x04f2…0505 925c 0480 EXEC FEJL(G,V,K3$)
0x04f2…0505 LineComalBin {
0x04f2…0505 ptr = 0x925c // 0x4f2 @0x0
0x04f2…0505 lno = 0x01e0 // 0x4f4 @0x2
0x04f2…0505 at0004 = ╱9d╱ EXEC ╱ // 0x4f6 @0x4
0x04f2…0505 at0005 = ╱46╱F╱ // 0x4f7 @0x5
0x04f2…0505 at0006 = ╱45╱E╱ // 0x4f8 @0x6
0x04f2…0505 at0007 = ╱4a╱J╱ // 0x4f9 @0x7
0x04f2…0505 at0008 = ╱4c╱L╱ // 0x4fa @0x8
0x04f2…0505 at0009 = ╱ed╱(╱ // 0x4fb @0x9
0x04f2…0505 at000a = ╱47╱G╱ // 0x4fc @0xa
0x04f2…0505 at000b = ╱ec╱,╱ // 0x4fd @0xb
0x04f2…0505 at000c = ╱56╱V╱ // 0x4fe @0xc
0x04f2…0505 at000d = ╱ec╱,╱ // 0x4ff @0xd
0x04f2…0505 at000e = ╱4b╱K╱ // 0x500 @0xe
0x04f2…0505 at000f = ╱33╱3╱ // 0x501 @0xf
0x04f2…0505 at0010 = ╱ef╱$╱ // 0x502 @0x10
0x04f2…0505 at0011 = ╱ee╱)╱ // 0x503 @0x11
0x04f2…0505 at0012 = EOL // 0x504 @0x12
0x04f2…0505 }
0x0505…052e 9285 0490 GET K3$,S1+G:FUKODE$,FÅDEBET$,FÅKREDIT$
0x0505…052e LineComalBin {
0x0505…052e ptr = 0x9285 // 0x505 @0x0
0x0505…052e lno = 0x01ea // 0x507 @0x2
0x0505…052e at0004 = ╱a9╱ GET ╱ // 0x509 @0x4
0x0505…052e at0005 = ╱4b╱K╱ // 0x50a @0x5
0x0505…052e at0006 = ╱33╱3╱ // 0x50b @0x6
0x0505…052e at0007 = ╱ef╱$╱ // 0x50c @0x7
0x0505…052e at0008 = ╱ec╱,╱ // 0x50d @0x8
0x0505…052e at0009 = ╱53╱S╱ // 0x50e @0x9
0x0505…052e at000a = ╱31╱1╱ // 0x50f @0xa
0x0505…052e at000b = ╱e2╱+╱ // 0x510 @0xb
0x0505…052e at000c = ╱47╱G╱ // 0x511 @0xc
0x0505…052e at000d = ╱f0╱:╱ // 0x512 @0xd
0x0505…052e at000e = ╱46╱F╱ // 0x513 @0xe
0x0505…052e at000f = ╱55╱U╱ // 0x514 @0xf
0x0505…052e at0010 = ╱4b╱K╱ // 0x515 @0x10
0x0505…052e at0011 = ╱4f╱O╱ // 0x516 @0x11
0x0505…052e at0012 = ╱44╱D╱ // 0x517 @0x12
0x0505…052e at0013 = ╱45╱E╱ // 0x518 @0x13
0x0505…052e at0014 = ╱ef╱$╱ // 0x519 @0x14
0x0505…052e at0015 = ╱ec╱,╱ // 0x51a @0x15
0x0505…052e at0016 = ╱46╱F╱ // 0x51b @0x16
0x0505…052e at0017 = ╱5d╱Å╱ // 0x51c @0x17
0x0505…052e at0018 = ╱44╱D╱ // 0x51d @0x18
0x0505…052e at0019 = ╱45╱E╱ // 0x51e @0x19
0x0505…052e at001a = ╱42╱B╱ // 0x51f @0x1a
0x0505…052e at001b = ╱45╱E╱ // 0x520 @0x1b
0x0505…052e at001c = ╱54╱T╱ // 0x521 @0x1c
0x0505…052e at001d = ╱ef╱$╱ // 0x522 @0x1d
0x0505…052e at001e = ╱ec╱,╱ // 0x523 @0x1e
0x0505…052e at001f = ╱46╱F╱ // 0x524 @0x1f
0x0505…052e at0020 = ╱5d╱Å╱ // 0x525 @0x20
0x0505…052e at0021 = ╱4b╱K╱ // 0x526 @0x21
0x0505…052e at0022 = ╱52╱R╱ // 0x527 @0x22
0x0505…052e at0023 = ╱45╱E╱ // 0x528 @0x23
0x0505…052e at0024 = ╱44╱D╱ // 0x529 @0x24
0x0505…052e at0025 = ╱49╱I╱ // 0x52a @0x25
0x0505…052e at0026 = ╱54╱T╱ // 0x52b @0x26
0x0505…052e at0027 = ╱ef╱$╱ // 0x52c @0x27
0x0505…052e at0028 = EOL // 0x52d @0x28
0x0505…052e }
0x052e…0546 929d 0500 EXEC FEJL(G,4,K3$)
0x052e…0546 LineComalBin {
0x052e…0546 ptr = 0x929d // 0x52e @0x0
0x052e…0546 lno = 0x01f4 // 0x530 @0x2
0x052e…0546 at0004 = ╱9d╱ EXEC ╱ // 0x532 @0x4
0x052e…0546 at0005 = ╱46╱F╱ // 0x533 @0x5
0x052e…0546 at0006 = ╱45╱E╱ // 0x534 @0x6
0x052e…0546 at0007 = ╱4a╱J╱ // 0x535 @0x7
0x052e…0546 at0008 = ╱4c╱L╱ // 0x536 @0x8
0x052e…0546 at0009 = ╱ed╱(╱ // 0x537 @0x9
0x052e…0546 at000a = ╱47╱G╱ // 0x538 @0xa
0x052e…0546 at000b = ╱ec╱,╱ // 0x539 @0xb
0x052e…0546 at000c = ╱34╱4╱ // 0x53a @0xc
0x052e…0546 at000d = ╱fe00008003╱ // 0x53b @0xd
0x052e…0546 at0012 = ╱ec╱,╱ // 0x540 @0x12
0x052e…0546 at0013 = ╱4b╱K╱ // 0x541 @0x13
0x052e…0546 at0014 = ╱33╱3╱ // 0x542 @0x14
0x052e…0546 at0015 = ╱ef╱$╱ // 0x543 @0x15
0x052e…0546 at0016 = ╱ee╱)╱ // 0x544 @0x16
0x052e…0546 at0017 = EOL // 0x545 @0x17
0x052e…0546 }
0x0546…054c 92a3 0510 ENDPROC
0x0546…054c LineComalBin {
0x0546…054c ptr = 0x92a3 // 0x546 @0x0
0x0546…054c lno = 0x01fe // 0x548 @0x2
0x0546…054c at0004 = ╱9f╱ ENDPROC ╱ // 0x54a @0x4
0x0546…054c at0005 = EOL // 0x54b @0x5
0x0546…054c }
0x054c…0563 92ba 0520 PROC FEJL(NR1,NR2,NR3)
0x054c…0563 LineComalBin {
0x054c…0563 ptr = 0x92ba // 0x54c @0x0
0x054c…0563 lno = 0x0208 // 0x54e @0x2
0x054c…0563 at0004 = ╱9e╱ PROC ╱ // 0x550 @0x4
0x054c…0563 at0005 = ╱46╱F╱ // 0x551 @0x5
0x054c…0563 at0006 = ╱45╱E╱ // 0x552 @0x6
0x054c…0563 at0007 = ╱4a╱J╱ // 0x553 @0x7
0x054c…0563 at0008 = ╱4c╱L╱ // 0x554 @0x8
0x054c…0563 at0009 = ╱ed╱(╱ // 0x555 @0x9
0x054c…0563 at000a = ╱4e╱N╱ // 0x556 @0xa
0x054c…0563 at000b = ╱52╱R╱ // 0x557 @0xb
0x054c…0563 at000c = ╱31╱1╱ // 0x558 @0xc
0x054c…0563 at000d = ╱ec╱,╱ // 0x559 @0xd
0x054c…0563 at000e = ╱4e╱N╱ // 0x55a @0xe
0x054c…0563 at000f = ╱52╱R╱ // 0x55b @0xf
0x054c…0563 at0010 = ╱32╱2╱ // 0x55c @0x10
0x054c…0563 at0011 = ╱ec╱,╱ // 0x55d @0x11
0x054c…0563 at0012 = ╱4e╱N╱ // 0x55e @0x12
0x054c…0563 at0013 = ╱52╱R╱ // 0x55f @0x13
0x054c…0563 at0014 = ╱33╱3╱ // 0x560 @0x14
0x054c…0563 at0015 = ╱ee╱)╱ // 0x561 @0x15
0x054c…0563 at0016 = EOL // 0x562 @0x16
0x054c…0563 }
0x0563…0573 92ca 0530 IF STATUS(NR3$)<>B THEN
0x0563…0573 LineComalBin {
0x0563…0573 ptr = 0x92ca // 0x563 @0x0
0x0563…0573 lno = 0x0212 // 0x565 @0x2
0x0563…0573 at0004 = ╱9c╱ IF ╱ // 0x567 @0x4
0x0563…0573 at0005 = ╱ce╱STATUS╱ // 0x568 @0x5
0x0563…0573 at0006 = ╱ed╱(╱ // 0x569 @0x6
0x0563…0573 at0007 = ╱4e╱N╱ // 0x56a @0x7
0x0563…0573 at0008 = ╱52╱R╱ // 0x56b @0x8
0x0563…0573 at0009 = ╱33╱3╱ // 0x56c @0x9
0x0563…0573 at000a = ╱ef╱$╱ // 0x56d @0xa
0x0563…0573 at000b = ╱ee╱)╱ // 0x56e @0xb
0x0563…0573 at000c = ╱e1╱<>╱ // 0x56f @0xc
0x0563…0573 at000d = ╱42╱B╱ // 0x570 @0xd
0x0563…0573 at000e = ╱b6╱ THEN ╱ // 0x571 @0xe
0x0563…0573 at000f = EOL // 0x572 @0xf
0x0563…0573 }
0x0573…058d 92e4 0540 PRINT STATUS(NR3$),NR1,NR2,NR3$
0x0573…058d LineComalBin {
0x0573…058d ptr = 0x92e4 // 0x573 @0x0
0x0573…058d lno = 0x021c // 0x575 @0x2
0x0573…058d at0004 = ╱92╱ PRINT ╱ // 0x577 @0x4
0x0573…058d at0005 = ╱ce╱STATUS╱ // 0x578 @0x5
0x0573…058d at0006 = ╱ed╱(╱ // 0x579 @0x6
0x0573…058d at0007 = ╱4e╱N╱ // 0x57a @0x7
0x0573…058d at0008 = ╱52╱R╱ // 0x57b @0x8
0x0573…058d at0009 = ╱33╱3╱ // 0x57c @0x9
0x0573…058d at000a = ╱ef╱$╱ // 0x57d @0xa
0x0573…058d at000b = ╱ee╱)╱ // 0x57e @0xb
0x0573…058d at000c = ╱ec╱,╱ // 0x57f @0xc
0x0573…058d at000d = ╱4e╱N╱ // 0x580 @0xd
0x0573…058d at000e = ╱52╱R╱ // 0x581 @0xe
0x0573…058d at000f = ╱31╱1╱ // 0x582 @0xf
0x0573…058d at0010 = ╱ec╱,╱ // 0x583 @0x10
0x0573…058d at0011 = ╱4e╱N╱ // 0x584 @0x11
0x0573…058d at0012 = ╱52╱R╱ // 0x585 @0x12
0x0573…058d at0013 = ╱32╱2╱ // 0x586 @0x13
0x0573…058d at0014 = ╱ec╱,╱ // 0x587 @0x14
0x0573…058d at0015 = ╱4e╱N╱ // 0x588 @0x15
0x0573…058d at0016 = ╱52╱R╱ // 0x589 @0x16
0x0573…058d at0017 = ╱33╱3╱ // 0x58a @0x17
0x0573…058d at0018 = ╱ef╱$╱ // 0x58b @0x18
0x0573…058d at0019 = EOL // 0x58c @0x19
0x0573…058d }
0x058d…0593 92ea 0550 STOP
0x058d…0593 LineComalBin {
0x058d…0593 ptr = 0x92ea // 0x58d @0x0
0x058d…0593 lno = 0x0226 // 0x58f @0x2
0x058d…0593 at0004 = ╱8d╱ STOP ╱ // 0x591 @0x4
0x058d…0593 at0005 = EOL // 0x592 @0x5
0x058d…0593 }
0x0593…0599 92f0 0560 ENDIF
0x0593…0599 LineComalBin {
0x0593…0599 ptr = 0x92f0 // 0x593 @0x0
0x0593…0599 lno = 0x0230 // 0x595 @0x2
0x0593…0599 at0004 = ╱9b╱ ENDIF ╱ // 0x597 @0x4
0x0593…0599 at0005 = EOL // 0x598 @0x5
0x0593…0599 }
0x0599…059f 92f6 0570 ENDPROC
0x0599…059f LineComalBin {
0x0599…059f ptr = 0x92f6 // 0x599 @0x0
0x0599…059f lno = 0x023a // 0x59b @0x2
0x0599…059f at0004 = ╱9f╱ ENDPROC ╱ // 0x59d @0x4
0x0599…059f at0005 = EOL // 0x59e @0x5
0x0599…059f }
0x059f…05be 9315 0580 PROC TUD(BLB1,UBLB1,TEGN,STØR)
0x059f…05be LineComalBin {
0x059f…05be ptr = 0x9315 // 0x59f @0x0
0x059f…05be lno = 0x0244 // 0x5a1 @0x2
0x059f…05be at0004 = ╱9e╱ PROC ╱ // 0x5a3 @0x4
0x059f…05be at0005 = ╱54╱T╱ // 0x5a4 @0x5
0x059f…05be at0006 = ╱55╱U╱ // 0x5a5 @0x6
0x059f…05be at0007 = ╱44╱D╱ // 0x5a6 @0x7
0x059f…05be at0008 = ╱ed╱(╱ // 0x5a7 @0x8
0x059f…05be at0009 = ╱42╱B╱ // 0x5a8 @0x9
0x059f…05be at000a = ╱4c╱L╱ // 0x5a9 @0xa
0x059f…05be at000b = ╱42╱B╱ // 0x5aa @0xb
0x059f…05be at000c = ╱31╱1╱ // 0x5ab @0xc
0x059f…05be at000d = ╱ec╱,╱ // 0x5ac @0xd
0x059f…05be at000e = ╱55╱U╱ // 0x5ad @0xe
0x059f…05be at000f = ╱42╱B╱ // 0x5ae @0xf
0x059f…05be at0010 = ╱4c╱L╱ // 0x5af @0x10
0x059f…05be at0011 = ╱42╱B╱ // 0x5b0 @0x11
0x059f…05be at0012 = ╱31╱1╱ // 0x5b1 @0x12
0x059f…05be at0013 = ╱ec╱,╱ // 0x5b2 @0x13
0x059f…05be at0014 = ╱54╱T╱ // 0x5b3 @0x14
0x059f…05be at0015 = ╱45╱E╱ // 0x5b4 @0x15
0x059f…05be at0016 = ╱47╱G╱ // 0x5b5 @0x16
0x059f…05be at0017 = ╱4e╱N╱ // 0x5b6 @0x17
0x059f…05be at0018 = ╱ec╱,╱ // 0x5b7 @0x18
0x059f…05be at0019 = ╱53╱S╱ // 0x5b8 @0x19
0x059f…05be at001a = ╱54╱T╱ // 0x5b9 @0x1a
0x059f…05be at001b = ╱5c╱Ø╱ // 0x5ba @0x1b
0x059f…05be at001c = ╱52╱R╱ // 0x5bb @0x1c
0x059f…05be at001d = ╱ee╱)╱ // 0x5bc @0x1d
0x059f…05be at001e = EOL // 0x5bd @0x1e
0x059f…05be }
0x05be…05e3 933a 0590 EXEC CALC(5,BLB1$,TAL4$,UBLB1$)
0x05be…05e3 LineComalBin {
0x05be…05e3 ptr = 0x933a // 0x5be @0x0
0x05be…05e3 lno = 0x024e // 0x5c0 @0x2
0x05be…05e3 at0004 = ╱9d╱ EXEC ╱ // 0x5c2 @0x4
0x05be…05e3 at0005 = ╱43╱C╱ // 0x5c3 @0x5
0x05be…05e3 at0006 = ╱41╱A╱ // 0x5c4 @0x6
0x05be…05e3 at0007 = ╱4c╱L╱ // 0x5c5 @0x7
0x05be…05e3 at0008 = ╱43╱C╱ // 0x5c6 @0x8
0x05be…05e3 at0009 = ╱ed╱(╱ // 0x5c7 @0x9
0x05be…05e3 at000a = ╱35╱5╱ // 0x5c8 @0xa
0x05be…05e3 at000b = ╱fe0000a003╱ // 0x5c9 @0xb
0x05be…05e3 at0010 = ╱ec╱,╱ // 0x5ce @0x10
0x05be…05e3 at0011 = ╱42╱B╱ // 0x5cf @0x11
0x05be…05e3 at0012 = ╱4c╱L╱ // 0x5d0 @0x12
0x05be…05e3 at0013 = ╱42╱B╱ // 0x5d1 @0x13
0x05be…05e3 at0014 = ╱31╱1╱ // 0x5d2 @0x14
0x05be…05e3 at0015 = ╱ef╱$╱ // 0x5d3 @0x15
0x05be…05e3 at0016 = ╱ec╱,╱ // 0x5d4 @0x16
0x05be…05e3 at0017 = ╱54╱T╱ // 0x5d5 @0x17
0x05be…05e3 at0018 = ╱41╱A╱ // 0x5d6 @0x18
0x05be…05e3 at0019 = ╱4c╱L╱ // 0x5d7 @0x19
0x05be…05e3 at001a = ╱34╱4╱ // 0x5d8 @0x1a
0x05be…05e3 at001b = ╱ef╱$╱ // 0x5d9 @0x1b
0x05be…05e3 at001c = ╱ec╱,╱ // 0x5da @0x1c
0x05be…05e3 at001d = ╱55╱U╱ // 0x5db @0x1d
0x05be…05e3 at001e = ╱42╱B╱ // 0x5dc @0x1e
0x05be…05e3 at001f = ╱4c╱L╱ // 0x5dd @0x1f
0x05be…05e3 at0020 = ╱42╱B╱ // 0x5de @0x20
0x05be…05e3 at0021 = ╱31╱1╱ // 0x5df @0x21
0x05be…05e3 at0022 = ╱ef╱$╱ // 0x5e0 @0x22
0x05be…05e3 at0023 = ╱ee╱)╱ // 0x5e1 @0x23
0x05be…05e3 at0024 = EOL // 0x5e2 @0x24
0x05be…05e3 }
0x05e3…05f0 9347 0600 IF TEGN=B THEN
0x05e3…05f0 LineComalBin {
0x05e3…05f0 ptr = 0x9347 // 0x5e3 @0x0
0x05e3…05f0 lno = 0x0258 // 0x5e5 @0x2
0x05e3…05f0 at0004 = ╱9c╱ IF ╱ // 0x5e7 @0x4
0x05e3…05f0 at0005 = ╱54╱T╱ // 0x5e8 @0x5
0x05e3…05f0 at0006 = ╱45╱E╱ // 0x5e9 @0x6
0x05e3…05f0 at0007 = ╱47╱G╱ // 0x5ea @0x7
0x05e3…05f0 at0008 = ╱4e╱N╱ // 0x5eb @0x8
0x05e3…05f0 at0009 = ╱dc╱=╱ // 0x5ec @0x9
0x05e3…05f0 at000a = ╱42╱B╱ // 0x5ed @0xa
0x05e3…05f0 at000b = ╱b6╱ THEN ╱ // 0x5ee @0xb
0x05e3…05f0 at000c = EOL // 0x5ef @0xc
0x05e3…05f0 }
0x05f0…060d 9364 0610 UBLB1$=UBLB1$(E:13)
0x05f0…060d LineComalBin {
0x05f0…060d ptr = 0x9364 // 0x5f0 @0x0
0x05f0…060d lno = 0x0262 // 0x5f2 @0x2
0x05f0…060d at0004 = ╱55╱U╱ // 0x5f4 @0x4
0x05f0…060d at0005 = ╱42╱B╱ // 0x5f5 @0x5
0x05f0…060d at0006 = ╱4c╱L╱ // 0x5f6 @0x6
0x05f0…060d at0007 = ╱42╱B╱ // 0x5f7 @0x7
0x05f0…060d at0008 = ╱31╱1╱ // 0x5f8 @0x8
0x05f0…060d at0009 = ╱ef╱$╱ // 0x5f9 @0x9
0x05f0…060d at000a = ╱dc╱=╱ // 0x5fa @0xa
0x05f0…060d at000b = ╱55╱U╱ // 0x5fb @0xb
0x05f0…060d at000c = ╱42╱B╱ // 0x5fc @0xc
0x05f0…060d at000d = ╱4c╱L╱ // 0x5fd @0xd
0x05f0…060d at000e = ╱42╱B╱ // 0x5fe @0xe
0x05f0…060d at000f = ╱31╱1╱ // 0x5ff @0xf
0x05f0…060d at0010 = ╱ef╱$╱ // 0x600 @0x10
0x05f0…060d at0011 = ╱ed╱(╱ // 0x601 @0x11
0x05f0…060d at0012 = ╱45╱E╱ // 0x602 @0x12
0x05f0…060d at0013 = ╱f0╱:╱ // 0x603 @0x13
0x05f0…060d at0014 = ╱31╱1╱ // 0x604 @0x14
0x05f0…060d at0015 = ╱33╱3╱ // 0x605 @0x15
0x05f0…060d at0016 = ╱fe0000d004╱ // 0x606 @0x16
0x05f0…060d at001b = ╱ee╱)╱ // 0x60b @0x1b
0x05f0…060d at001c = EOL // 0x60c @0x1c
0x05f0…060d }
0x060d…0613 936a 0620 ELSE
0x060d…0613 LineComalBin {
0x060d…0613 ptr = 0x936a // 0x60d @0x0
0x060d…0613 lno = 0x026c // 0x60f @0x2
0x060d…0613 at0004 = ╱9a╱ ELSE ╱ // 0x611 @0x4
0x060d…0613 at0005 = EOL // 0x612 @0x5
0x060d…0613 }
0x0613…0636 938d 0630 IF TEGN=E AND UBLB1$(LEN(UBLB1$))="+" THEN
0x0613…0636 LineComalBin {
0x0613…0636 ptr = 0x938d // 0x613 @0x0
0x0613…0636 lno = 0x0276 // 0x615 @0x2
0x0613…0636 at0004 = ╱9c╱ IF ╱ // 0x617 @0x4
0x0613…0636 at0005 = ╱54╱T╱ // 0x618 @0x5
0x0613…0636 at0006 = ╱45╱E╱ // 0x619 @0x6
0x0613…0636 at0007 = ╱47╱G╱ // 0x61a @0x7
0x0613…0636 at0008 = ╱4e╱N╱ // 0x61b @0x8
0x0613…0636 at0009 = ╱dc╱=╱ // 0x61c @0x9
0x0613…0636 at000a = ╱45╱E╱ // 0x61d @0xa
0x0613…0636 at000b = ╱da╱ AND ╱ // 0x61e @0xb
0x0613…0636 at000c = ╱55╱U╱ // 0x61f @0xc
0x0613…0636 at000d = ╱42╱B╱ // 0x620 @0xd
0x0613…0636 at000e = ╱4c╱L╱ // 0x621 @0xe
0x0613…0636 at000f = ╱42╱B╱ // 0x622 @0xf
0x0613…0636 at0010 = ╱31╱1╱ // 0x623 @0x10
0x0613…0636 at0011 = ╱ef╱$╱ // 0x624 @0x11
0x0613…0636 at0012 = ╱ed╱(╱ // 0x625 @0x12
0x0613…0636 at0013 = ╱cc╱LEN╱ // 0x626 @0x13
0x0613…0636 at0014 = ╱ed╱(╱ // 0x627 @0x14
0x0613…0636 at0015 = ╱55╱U╱ // 0x628 @0x15
0x0613…0636 at0016 = ╱42╱B╱ // 0x629 @0x16
0x0613…0636 at0017 = ╱4c╱L╱ // 0x62a @0x17
0x0613…0636 at0018 = ╱42╱B╱ // 0x62b @0x18
0x0613…0636 at0019 = ╱31╱1╱ // 0x62c @0x19
0x0613…0636 at001a = ╱ef╱$╱ // 0x62d @0x1a
0x0613…0636 at001b = ╱ee╱)╱ // 0x62e @0x1b
0x0613…0636 at001c = ╱ee╱)╱ // 0x62f @0x1c
0x0613…0636 at001d = ╱dc╱=╱ // 0x630 @0x1d
0x0613…0636 at001e = ╱22╱"╱ // 0x631 @0x1e
0x0613…0636 at001f = ╱2b╱+╱ // 0x632 @0x1f
0x0613…0636 at0020 = ╱22╱"╱ // 0x633 @0x20
0x0613…0636 at0021 = ╱b6╱ THEN ╱ // 0x634 @0x21
0x0613…0636 at0022 = EOL // 0x635 @0x22
0x0613…0636 }
0x0636…0650 93a7 0640 UBLB1$(LEN(UBLB1$))=" "
0x0636…0650 LineComalBin {
0x0636…0650 ptr = 0x93a7 // 0x636 @0x0
0x0636…0650 lno = 0x0280 // 0x638 @0x2
0x0636…0650 at0004 = ╱55╱U╱ // 0x63a @0x4
0x0636…0650 at0005 = ╱42╱B╱ // 0x63b @0x5
0x0636…0650 at0006 = ╱4c╱L╱ // 0x63c @0x6
0x0636…0650 at0007 = ╱42╱B╱ // 0x63d @0x7
0x0636…0650 at0008 = ╱31╱1╱ // 0x63e @0x8
0x0636…0650 at0009 = ╱ef╱$╱ // 0x63f @0x9
0x0636…0650 at000a = ╱ed╱(╱ // 0x640 @0xa
0x0636…0650 at000b = ╱cc╱LEN╱ // 0x641 @0xb
0x0636…0650 at000c = ╱ed╱(╱ // 0x642 @0xc
0x0636…0650 at000d = ╱55╱U╱ // 0x643 @0xd
0x0636…0650 at000e = ╱42╱B╱ // 0x644 @0xe
0x0636…0650 at000f = ╱4c╱L╱ // 0x645 @0xf
0x0636…0650 at0010 = ╱42╱B╱ // 0x646 @0x10
0x0636…0650 at0011 = ╱31╱1╱ // 0x647 @0x11
0x0636…0650 at0012 = ╱ef╱$╱ // 0x648 @0x12
0x0636…0650 at0013 = ╱ee╱)╱ // 0x649 @0x13
0x0636…0650 at0014 = ╱ee╱)╱ // 0x64a @0x14
0x0636…0650 at0015 = ╱dc╱=╱ // 0x64b @0x15
0x0636…0650 at0016 = ╱22╱"╱ // 0x64c @0x16
0x0636…0650 at0017 = ╱20╱…╱ // 0x64d @0x17
0x0636…0650 at0018 = ╱22╱"╱ // 0x64e @0x18
0x0636…0650 at0019 = EOL // 0x64f @0x19
0x0636…0650 }
0x0650…0656 93ad 0650 ENDIF
0x0650…0656 LineComalBin {
0x0650…0656 ptr = 0x93ad // 0x650 @0x0
0x0650…0656 lno = 0x028a // 0x652 @0x2
0x0650…0656 at0004 = ╱9b╱ ENDIF ╱ // 0x654 @0x4
0x0650…0656 at0005 = EOL // 0x655 @0x5
0x0650…0656 }
0x0656…065c 93b3 0660 ENDIF
0x0656…065c LineComalBin {
0x0656…065c ptr = 0x93b3 // 0x656 @0x0
0x0656…065c lno = 0x0294 // 0x658 @0x2
0x0656…065c at0004 = ╱9b╱ ENDIF ╱ // 0x65a @0x4
0x0656…065c at0005 = EOL // 0x65b @0x5
0x0656…065c }
0x065c…0669 93c0 0670 IF STØR=E THEN
0x065c…0669 LineComalBin {
0x065c…0669 ptr = 0x93c0 // 0x65c @0x0
0x065c…0669 lno = 0x029e // 0x65e @0x2
0x065c…0669 at0004 = ╱9c╱ IF ╱ // 0x660 @0x4
0x065c…0669 at0005 = ╱53╱S╱ // 0x661 @0x5
0x065c…0669 at0006 = ╱54╱T╱ // 0x662 @0x6
0x065c…0669 at0007 = ╱5c╱Ø╱ // 0x663 @0x7
0x065c…0669 at0008 = ╱52╱R╱ // 0x664 @0x8
0x065c…0669 at0009 = ╱dc╱=╱ // 0x665 @0x9
0x065c…0669 at000a = ╱45╱E╱ // 0x666 @0xa
0x065c…0669 at000b = ╱b6╱ THEN ╱ // 0x667 @0xb
0x065c…0669 at000c = EOL // 0x668 @0xc
0x065c…0669 }
0x0669…068f 93e6 0680 UBLB1$=UBLB1$(4:LEN(UBLB1$)-V)
0x0669…068f LineComalBin {
0x0669…068f ptr = 0x93e6 // 0x669 @0x0
0x0669…068f lno = 0x02a8 // 0x66b @0x2
0x0669…068f at0004 = ╱55╱U╱ // 0x66d @0x4
0x0669…068f at0005 = ╱42╱B╱ // 0x66e @0x5
0x0669…068f at0006 = ╱4c╱L╱ // 0x66f @0x6
0x0669…068f at0007 = ╱42╱B╱ // 0x670 @0x7
0x0669…068f at0008 = ╱31╱1╱ // 0x671 @0x8
0x0669…068f at0009 = ╱ef╱$╱ // 0x672 @0x9
0x0669…068f at000a = ╱dc╱=╱ // 0x673 @0xa
0x0669…068f at000b = ╱55╱U╱ // 0x674 @0xb
0x0669…068f at000c = ╱42╱B╱ // 0x675 @0xc
0x0669…068f at000d = ╱4c╱L╱ // 0x676 @0xd
0x0669…068f at000e = ╱42╱B╱ // 0x677 @0xe
0x0669…068f at000f = ╱31╱1╱ // 0x678 @0xf
0x0669…068f at0010 = ╱ef╱$╱ // 0x679 @0x10
0x0669…068f at0011 = ╱ed╱(╱ // 0x67a @0x11
0x0669…068f at0012 = ╱34╱4╱ // 0x67b @0x12
0x0669…068f at0013 = ╱fe00008003╱ // 0x67c @0x13
0x0669…068f at0018 = ╱f0╱:╱ // 0x681 @0x18
0x0669…068f at0019 = ╱cc╱LEN╱ // 0x682 @0x19
0x0669…068f at001a = ╱ed╱(╱ // 0x683 @0x1a
0x0669…068f at001b = ╱55╱U╱ // 0x684 @0x1b
0x0669…068f at001c = ╱42╱B╱ // 0x685 @0x1c
0x0669…068f at001d = ╱4c╱L╱ // 0x686 @0x1d
0x0669…068f at001e = ╱42╱B╱ // 0x687 @0x1e
0x0669…068f at001f = ╱31╱1╱ // 0x688 @0x1f
0x0669…068f at0020 = ╱ef╱$╱ // 0x689 @0x20
0x0669…068f at0021 = ╱ee╱)╱ // 0x68a @0x21
0x0669…068f at0022 = ╱e3╱-╱ // 0x68b @0x22
0x0669…068f at0023 = ╱56╱V╱ // 0x68c @0x23
0x0669…068f at0024 = ╱ee╱)╱ // 0x68d @0x24
0x0669…068f at0025 = EOL // 0x68e @0x25
0x0669…068f }
0x068f…0695 93ec 0690 ENDIF
0x068f…0695 LineComalBin {
0x068f…0695 ptr = 0x93ec // 0x68f @0x0
0x068f…0695 lno = 0x02b2 // 0x691 @0x2
0x068f…0695 at0004 = ╱9b╱ ENDIF ╱ // 0x693 @0x4
0x068f…0695 at0005 = EOL // 0x694 @0x5
0x068f…0695 }
0x0695…069b 93f2 0700 ENDPROC
0x0695…069b LineComalBin {
0x0695…069b ptr = 0x93f2 // 0x695 @0x0
0x0695…069b lno = 0x02bc // 0x697 @0x2
0x0695…069b at0004 = ╱9f╱ ENDPROC ╱ // 0x699 @0x4
0x0695…069b at0005 = EOL // 0x69a @0x5
0x0695…069b }
0x069b…06b5 940c 0710 PROC HOVEDUD(UDATO,USIDE)
0x069b…06b5 LineComalBin {
0x069b…06b5 ptr = 0x940c // 0x69b @0x0
0x069b…06b5 lno = 0x02c6 // 0x69d @0x2
0x069b…06b5 at0004 = ╱9e╱ PROC ╱ // 0x69f @0x4
0x069b…06b5 at0005 = ╱48╱H╱ // 0x6a0 @0x5
0x069b…06b5 at0006 = ╱4f╱O╱ // 0x6a1 @0x6
0x069b…06b5 at0007 = ╱56╱V╱ // 0x6a2 @0x7
0x069b…06b5 at0008 = ╱45╱E╱ // 0x6a3 @0x8
0x069b…06b5 at0009 = ╱44╱D╱ // 0x6a4 @0x9
0x069b…06b5 at000a = ╱55╱U╱ // 0x6a5 @0xa
0x069b…06b5 at000b = ╱44╱D╱ // 0x6a6 @0xb
0x069b…06b5 at000c = ╱ed╱(╱ // 0x6a7 @0xc
0x069b…06b5 at000d = ╱55╱U╱ // 0x6a8 @0xd
0x069b…06b5 at000e = ╱44╱D╱ // 0x6a9 @0xe
0x069b…06b5 at000f = ╱41╱A╱ // 0x6aa @0xf
0x069b…06b5 at0010 = ╱54╱T╱ // 0x6ab @0x10
0x069b…06b5 at0011 = ╱4f╱O╱ // 0x6ac @0x11
0x069b…06b5 at0012 = ╱ec╱,╱ // 0x6ad @0x12
0x069b…06b5 at0013 = ╱55╱U╱ // 0x6ae @0x13
0x069b…06b5 at0014 = ╱53╱S╱ // 0x6af @0x14
0x069b…06b5 at0015 = ╱49╱I╱ // 0x6b0 @0x15
0x069b…06b5 at0016 = ╱44╱D╱ // 0x6b1 @0x16
0x069b…06b5 at0017 = ╱45╱E╱ // 0x6b2 @0x17
0x069b…06b5 at0018 = ╱ee╱)╱ // 0x6b3 @0x18
0x069b…06b5 at0019 = EOL // 0x6b4 @0x19
0x069b…06b5 }
0x06b5…06cd 9424 0720 EXEC DATOUD(UDATO,DAT$)
0x06b5…06cd LineComalBin {
0x06b5…06cd ptr = 0x9424 // 0x6b5 @0x0
0x06b5…06cd lno = 0x02d0 // 0x6b7 @0x2
0x06b5…06cd at0004 = ╱9d╱ EXEC ╱ // 0x6b9 @0x4
0x06b5…06cd at0005 = ╱44╱D╱ // 0x6ba @0x5
0x06b5…06cd at0006 = ╱41╱A╱ // 0x6bb @0x6
0x06b5…06cd at0007 = ╱54╱T╱ // 0x6bc @0x7
0x06b5…06cd at0008 = ╱4f╱O╱ // 0x6bd @0x8
0x06b5…06cd at0009 = ╱55╱U╱ // 0x6be @0x9
0x06b5…06cd at000a = ╱44╱D╱ // 0x6bf @0xa
0x06b5…06cd at000b = ╱ed╱(╱ // 0x6c0 @0xb
0x06b5…06cd at000c = ╱55╱U╱ // 0x6c1 @0xc
0x06b5…06cd at000d = ╱44╱D╱ // 0x6c2 @0xd
0x06b5…06cd at000e = ╱41╱A╱ // 0x6c3 @0xe
0x06b5…06cd at000f = ╱54╱T╱ // 0x6c4 @0xf
0x06b5…06cd at0010 = ╱4f╱O╱ // 0x6c5 @0x10
0x06b5…06cd at0011 = ╱ec╱,╱ // 0x6c6 @0x11
0x06b5…06cd at0012 = ╱44╱D╱ // 0x6c7 @0x12
0x06b5…06cd at0013 = ╱41╱A╱ // 0x6c8 @0x13
0x06b5…06cd at0014 = ╱54╱T╱ // 0x6c9 @0x14
0x06b5…06cd at0015 = ╱ef╱$╱ // 0x6ca @0x15
0x06b5…06cd at0016 = ╱ee╱)╱ // 0x6cb @0x16
0x06b5…06cd at0017 = EOL // 0x6cc @0x17
0x06b5…06cd }
0x06cd…06e5 943c 0730 PRINT TAB(67);DV$;" "
0x06cd…06e5 LineComalBin {
0x06cd…06e5 ptr = 0x943c // 0x6cd @0x0
0x06cd…06e5 lno = 0x02da // 0x6cf @0x2
0x06cd…06e5 at0004 = ╱92╱ PRINT ╱ // 0x6d1 @0x4
0x06cd…06e5 at0005 = ╱d2╱TAB╱ // 0x6d2 @0x5
0x06cd…06e5 at0006 = ╱ed╱(╱ // 0x6d3 @0x6
0x06cd…06e5 at0007 = ╱36╱6╱ // 0x6d4 @0x7
0x06cd…06e5 at0008 = ╱37╱7╱ // 0x6d5 @0x8
0x06cd…06e5 at0009 = ╱fe00008607╱ // 0x6d6 @0x9
0x06cd…06e5 at000e = ╱ee╱)╱ // 0x6db @0xe
0x06cd…06e5 at000f = ╱eb╱;╱ // 0x6dc @0xf
0x06cd…06e5 at0010 = ╱44╱D╱ // 0x6dd @0x10
0x06cd…06e5 at0011 = ╱56╱V╱ // 0x6de @0x11
0x06cd…06e5 at0012 = ╱ef╱$╱ // 0x6df @0x12
0x06cd…06e5 at0013 = ╱eb╱;╱ // 0x6e0 @0x13
0x06cd…06e5 at0014 = ╱22╱"╱ // 0x6e1 @0x14
0x06cd…06e5 at0015 = ╱20╱…╱ // 0x6e2 @0x15
0x06cd…06e5 at0016 = ╱22╱"╱ // 0x6e3 @0x16
0x06cd…06e5 at0017 = EOL // 0x6e4 @0x17
0x06cd…06e5 }
0x06e5…0730 9487 0740 PRINT TAB(10);CHR(14);"Balance";CHR(15);TAB(44);"Dato : ";DAT$;
0x06e5…0730 LineComalBin {
0x06e5…0730 ptr = 0x9487 // 0x6e5 @0x0
0x06e5…0730 lno = 0x02e4 // 0x6e7 @0x2
0x06e5…0730 at0004 = ╱92╱ PRINT ╱ // 0x6e9 @0x4
0x06e5…0730 at0005 = ╱d2╱TAB╱ // 0x6ea @0x5
0x06e5…0730 at0006 = ╱ed╱(╱ // 0x6eb @0x6
0x06e5…0730 at0007 = ╱31╱1╱ // 0x6ec @0x7
0x06e5…0730 at0008 = ╱30╱0╱ // 0x6ed @0x8
0x06e5…0730 at0009 = ╱fe0000a004╱ // 0x6ee @0x9
0x06e5…0730 at000e = ╱ee╱)╱ // 0x6f3 @0xe
0x06e5…0730 at000f = ╱eb╱;╱ // 0x6f4 @0xf
0x06e5…0730 at0010 = ╱cf╱CHR╱ // 0x6f5 @0x10
0x06e5…0730 at0011 = ╱ed╱(╱ // 0x6f6 @0x11
0x06e5…0730 at0012 = ╱31╱1╱ // 0x6f7 @0x12
0x06e5…0730 at0013 = ╱34╱4╱ // 0x6f8 @0x13
0x06e5…0730 at0014 = ╱fe0000e004╱ // 0x6f9 @0x14
0x06e5…0730 at0019 = ╱ee╱)╱ // 0x6fe @0x19
0x06e5…0730 at001a = ╱eb╱;╱ // 0x6ff @0x1a
0x06e5…0730 at001b = ╱22╱"╱ // 0x700 @0x1b
0x06e5…0730 at001c = ╱42╱B╱ // 0x701 @0x1c
0x06e5…0730 at001d = ╱61╱a╱ // 0x702 @0x1d
0x06e5…0730 at001e = ╱6c╱l╱ // 0x703 @0x1e
0x06e5…0730 at001f = ╱61╱a╱ // 0x704 @0x1f
0x06e5…0730 at0020 = ╱6e╱n╱ // 0x705 @0x20
0x06e5…0730 at0021 = ╱63╱c╱ // 0x706 @0x21
0x06e5…0730 at0022 = ╱65╱e╱ // 0x707 @0x22
0x06e5…0730 at0023 = ╱22╱"╱ // 0x708 @0x23
0x06e5…0730 at0024 = ╱eb╱;╱ // 0x709 @0x24
0x06e5…0730 at0025 = ╱cf╱CHR╱ // 0x70a @0x25
0x06e5…0730 at0026 = ╱ed╱(╱ // 0x70b @0x26
0x06e5…0730 at0027 = ╱31╱1╱ // 0x70c @0x27
0x06e5…0730 at0028 = ╱35╱5╱ // 0x70d @0x28
0x06e5…0730 at0029 = ╱fe0000f004╱ // 0x70e @0x29
0x06e5…0730 at002e = ╱ee╱)╱ // 0x713 @0x2e
0x06e5…0730 at002f = ╱eb╱;╱ // 0x714 @0x2f
0x06e5…0730 at0030 = ╱d2╱TAB╱ // 0x715 @0x30
0x06e5…0730 at0031 = ╱ed╱(╱ // 0x716 @0x31
0x06e5…0730 at0032 = ╱34╱4╱ // 0x717 @0x32
0x06e5…0730 at0033 = ╱34╱4╱ // 0x718 @0x33
0x06e5…0730 at0034 = ╱fe0000b006╱ // 0x719 @0x34
0x06e5…0730 at0039 = ╱ee╱)╱ // 0x71e @0x39
0x06e5…0730 at003a = ╱eb╱;╱ // 0x71f @0x3a
0x06e5…0730 at003b = ╱22╱"╱ // 0x720 @0x3b
0x06e5…0730 at003c = ╱44╱D╱ // 0x721 @0x3c
0x06e5…0730 at003d = ╱61╱a╱ // 0x722 @0x3d
0x06e5…0730 at003e = ╱74╱t╱ // 0x723 @0x3e
0x06e5…0730 at003f = ╱6f╱o╱ // 0x724 @0x3f
0x06e5…0730 at0040 = ╱20╱…╱ // 0x725 @0x40
0x06e5…0730 at0041 = ╱3a╱:╱ // 0x726 @0x41
0x06e5…0730 at0042 = ╱20╱…╱ // 0x727 @0x42
0x06e5…0730 at0043 = ╱22╱"╱ // 0x728 @0x43
0x06e5…0730 at0044 = ╱eb╱;╱ // 0x729 @0x44
0x06e5…0730 at0045 = ╱44╱D╱ // 0x72a @0x45
0x06e5…0730 at0046 = ╱41╱A╱ // 0x72b @0x46
0x06e5…0730 at0047 = ╱54╱T╱ // 0x72c @0x47
0x06e5…0730 at0048 = ╱ef╱$╱ // 0x72d @0x48
0x06e5…0730 at0049 = ╱eb╱;╱ // 0x72e @0x49
0x06e5…0730 at004a = EOL // 0x72f @0x4a
0x06e5…0730 }
0x0730…074b 94a2 0750 PRINT USING " Side :###":USIDE
0x0730…074b LineComalBin {
0x0730…074b ptr = 0x94a2 // 0x730 @0x0
0x0730…074b lno = 0x02ee // 0x732 @0x2
0x0730…074b at0004 = ╱92╱ PRINT ╱ // 0x734 @0x4
0x0730…074b at0005 = ╱b9╱ USING ╱ // 0x735 @0x5
0x0730…074b at0006 = ╱22╱"╱ // 0x736 @0x6
0x0730…074b at0007 = ╱20╱…╱ // 0x737 @0x7
0x0730…074b at0008 = ╱20╱…╱ // 0x738 @0x8
0x0730…074b at0009 = ╱20╱…╱ // 0x739 @0x9
0x0730…074b at000a = ╱53╱S╱ // 0x73a @0xa
0x0730…074b at000b = ╱69╱i╱ // 0x73b @0xb
0x0730…074b at000c = ╱64╱d╱ // 0x73c @0xc
0x0730…074b at000d = ╱65╱e╱ // 0x73d @0xd
0x0730…074b at000e = ╱20╱…╱ // 0x73e @0xe
0x0730…074b at000f = ╱3a╱:╱ // 0x73f @0xf
0x0730…074b at0010 = ╱23╱#╱ // 0x740 @0x10
0x0730…074b at0011 = ╱23╱#╱ // 0x741 @0x11
0x0730…074b at0012 = ╱23╱#╱ // 0x742 @0x12
0x0730…074b at0013 = ╱22╱"╱ // 0x743 @0x13
0x0730…074b at0014 = ╱f0╱:╱ // 0x744 @0x14
0x0730…074b at0015 = ╱55╱U╱ // 0x745 @0x15
0x0730…074b at0016 = ╱53╱S╱ // 0x746 @0x16
0x0730…074b at0017 = ╱49╱I╱ // 0x747 @0x17
0x0730…074b at0018 = ╱44╱D╱ // 0x748 @0x18
0x0730…074b at0019 = ╱45╱E╱ // 0x749 @0x19
0x0730…074b at001a = EOL // 0x74a @0x1a
0x0730…074b }
0x074b…0754 94ab 0760 PRINT " "
0x074b…0754 LineComalBin {
0x074b…0754 ptr = 0x94ab // 0x74b @0x0
0x074b…0754 lno = 0x02f8 // 0x74d @0x2
0x074b…0754 at0004 = ╱92╱ PRINT ╱ // 0x74f @0x4
0x074b…0754 at0005 = ╱22╱"╱ // 0x750 @0x5
0x074b…0754 at0006 = ╱20╱…╱ // 0x751 @0x6
0x074b…0754 at0007 = ╱22╱"╱ // 0x752 @0x7
0x074b…0754 at0008 = EOL // 0x753 @0x8
0x074b…0754 }
0x0754…0782 94d9 0770 PRINT TAB(40);"Månedens";TAB(66);"Årets"
0x0754…0782 LineComalBin {
0x0754…0782 ptr = 0x94d9 // 0x754 @0x0
0x0754…0782 lno = 0x0302 // 0x756 @0x2
0x0754…0782 at0004 = ╱92╱ PRINT ╱ // 0x758 @0x4
0x0754…0782 at0005 = ╱d2╱TAB╱ // 0x759 @0x5
0x0754…0782 at0006 = ╱ed╱(╱ // 0x75a @0x6
0x0754…0782 at0007 = ╱34╱4╱ // 0x75b @0x7
0x0754…0782 at0008 = ╱30╱0╱ // 0x75c @0x8
0x0754…0782 at0009 = ╱fe0000a006╱ // 0x75d @0x9
0x0754…0782 at000e = ╱ee╱)╱ // 0x762 @0xe
0x0754…0782 at000f = ╱eb╱;╱ // 0x763 @0xf
0x0754…0782 at0010 = ╱22╱"╱ // 0x764 @0x10
0x0754…0782 at0011 = ╱4d╱M╱ // 0x765 @0x11
0x0754…0782 at0012 = ╱7d╱å╱ // 0x766 @0x12
0x0754…0782 at0013 = ╱6e╱n╱ // 0x767 @0x13
0x0754…0782 at0014 = ╱65╱e╱ // 0x768 @0x14
0x0754…0782 at0015 = ╱64╱d╱ // 0x769 @0x15
0x0754…0782 at0016 = ╱65╱e╱ // 0x76a @0x16
0x0754…0782 at0017 = ╱6e╱n╱ // 0x76b @0x17
0x0754…0782 at0018 = ╱73╱s╱ // 0x76c @0x18
0x0754…0782 at0019 = ╱22╱"╱ // 0x76d @0x19
0x0754…0782 at001a = ╱eb╱;╱ // 0x76e @0x1a
0x0754…0782 at001b = ╱d2╱TAB╱ // 0x76f @0x1b
0x0754…0782 at001c = ╱ed╱(╱ // 0x770 @0x1c
0x0754…0782 at001d = ╱36╱6╱ // 0x771 @0x1d
0x0754…0782 at001e = ╱36╱6╱ // 0x772 @0x1e
0x0754…0782 at001f = ╱fe00008407╱ // 0x773 @0x1f
0x0754…0782 at0024 = ╱ee╱)╱ // 0x778 @0x24
0x0754…0782 at0025 = ╱eb╱;╱ // 0x779 @0x25
0x0754…0782 at0026 = ╱22╱"╱ // 0x77a @0x26
0x0754…0782 at0027 = ╱5d╱Å╱ // 0x77b @0x27
0x0754…0782 at0028 = ╱72╱r╱ // 0x77c @0x28
0x0754…0782 at0029 = ╱65╱e╱ // 0x77d @0x29
0x0754…0782 at002a = ╱74╱t╱ // 0x77e @0x2a
0x0754…0782 at002b = ╱73╱s╱ // 0x77f @0x2b
0x0754…0782 at002c = ╱22╱"╱ // 0x780 @0x2c
0x0754…0782 at002d = EOL // 0x781 @0x2d
0x0754…0782 }
0x0782…07ca 9521 0780 PRINT TAB(V);"Nr Kontonavn";TAB(35);"Debet Kredit Debet";
0x0782…07ca LineComalBin {
0x0782…07ca ptr = 0x9521 // 0x782 @0x0
0x0782…07ca lno = 0x030c // 0x784 @0x2
0x0782…07ca at0004 = ╱92╱ PRINT ╱ // 0x786 @0x4
0x0782…07ca at0005 = ╱d2╱TAB╱ // 0x787 @0x5
0x0782…07ca at0006 = ╱ed╱(╱ // 0x788 @0x6
0x0782…07ca at0007 = ╱56╱V╱ // 0x789 @0x7
0x0782…07ca at0008 = ╱ee╱)╱ // 0x78a @0x8
0x0782…07ca at0009 = ╱eb╱;╱ // 0x78b @0x9
0x0782…07ca at000a = ╱22╱"╱ // 0x78c @0xa
0x0782…07ca at000b = ╱4e╱N╱ // 0x78d @0xb
0x0782…07ca at000c = ╱72╱r╱ // 0x78e @0xc
0x0782…07ca at000d = ╱20╱…╱ // 0x78f @0xd
0x0782…07ca at000e = ╱20╱…╱ // 0x790 @0xe
0x0782…07ca at000f = ╱20╱…╱ // 0x791 @0xf
0x0782…07ca at0010 = ╱20╱…╱ // 0x792 @0x10
0x0782…07ca at0011 = ╱4b╱K╱ // 0x793 @0x11
0x0782…07ca at0012 = ╱6f╱o╱ // 0x794 @0x12
0x0782…07ca at0013 = ╱6e╱n╱ // 0x795 @0x13
0x0782…07ca at0014 = ╱74╱t╱ // 0x796 @0x14
0x0782…07ca at0015 = ╱6f╱o╱ // 0x797 @0x15
0x0782…07ca at0016 = ╱6e╱n╱ // 0x798 @0x16
0x0782…07ca at0017 = ╱61╱a╱ // 0x799 @0x17
0x0782…07ca at0018 = ╱76╱v╱ // 0x79a @0x18
0x0782…07ca at0019 = ╱6e╱n╱ // 0x79b @0x19
0x0782…07ca at001a = ╱22╱"╱ // 0x79c @0x1a
0x0782…07ca at001b = ╱eb╱;╱ // 0x79d @0x1b
0x0782…07ca at001c = ╱d2╱TAB╱ // 0x79e @0x1c
0x0782…07ca at001d = ╱ed╱(╱ // 0x79f @0x1d
0x0782…07ca at001e = ╱33╱3╱ // 0x7a0 @0x1e
0x0782…07ca at001f = ╱35╱5╱ // 0x7a1 @0x1f
0x0782…07ca at0020 = ╱fe00008c06╱ // 0x7a2 @0x20
0x0782…07ca at0025 = ╱ee╱)╱ // 0x7a7 @0x25
0x0782…07ca at0026 = ╱eb╱;╱ // 0x7a8 @0x26
0x0782…07ca at0027 = ╱22╱"╱ // 0x7a9 @0x27
0x0782…07ca at0028 = ╱44╱D╱ // 0x7aa @0x28
0x0782…07ca at0029 = ╱65╱e╱ // 0x7ab @0x29
0x0782…07ca at002a = ╱62╱b╱ // 0x7ac @0x2a
0x0782…07ca at002b = ╱65╱e╱ // 0x7ad @0x2b
0x0782…07ca at002c = ╱74╱t╱ // 0x7ae @0x2c
0x0782…07ca at002d = ╱20╱…╱ // 0x7af @0x2d
0x0782…07ca at002e = ╱20╱…╱ // 0x7b0 @0x2e
0x0782…07ca at002f = ╱20╱…╱ // 0x7b1 @0x2f
0x0782…07ca at0030 = ╱20╱…╱ // 0x7b2 @0x30
0x0782…07ca at0031 = ╱20╱…╱ // 0x7b3 @0x31
0x0782…07ca at0032 = ╱20╱…╱ // 0x7b4 @0x32
0x0782…07ca at0033 = ╱4b╱K╱ // 0x7b5 @0x33
0x0782…07ca at0034 = ╱72╱r╱ // 0x7b6 @0x34
0x0782…07ca at0035 = ╱65╱e╱ // 0x7b7 @0x35
0x0782…07ca at0036 = ╱64╱d╱ // 0x7b8 @0x36
0x0782…07ca at0037 = ╱69╱i╱ // 0x7b9 @0x37
0x0782…07ca at0038 = ╱74╱t╱ // 0x7ba @0x38
0x0782…07ca at0039 = ╱20╱…╱ // 0x7bb @0x39
0x0782…07ca at003a = ╱20╱…╱ // 0x7bc @0x3a
0x0782…07ca at003b = ╱20╱…╱ // 0x7bd @0x3b
0x0782…07ca at003c = ╱20╱…╱ // 0x7be @0x3c
0x0782…07ca at003d = ╱20╱…╱ // 0x7bf @0x3d
0x0782…07ca at003e = ╱20╱…╱ // 0x7c0 @0x3e
0x0782…07ca at003f = ╱20╱…╱ // 0x7c1 @0x3f
0x0782…07ca at0040 = ╱44╱D╱ // 0x7c2 @0x40
0x0782…07ca at0041 = ╱65╱e╱ // 0x7c3 @0x41
0x0782…07ca at0042 = ╱62╱b╱ // 0x7c4 @0x42
0x0782…07ca at0043 = ╱65╱e╱ // 0x7c5 @0x43
0x0782…07ca at0044 = ╱74╱t╱ // 0x7c6 @0x44
0x0782…07ca at0045 = ╱22╱"╱ // 0x7c7 @0x45
0x0782…07ca at0046 = ╱eb╱;╱ // 0x7c8 @0x46
0x0782…07ca at0047 = EOL // 0x7c9 @0x47
0x0782…07ca }
0x07ca…07df 9536 0790 PRINT " Kredit"
0x07ca…07df LineComalBin {
0x07ca…07df ptr = 0x9536 // 0x7ca @0x0
0x07ca…07df lno = 0x0316 // 0x7cc @0x2
0x07ca…07df at0004 = ╱92╱ PRINT ╱ // 0x7ce @0x4
0x07ca…07df at0005 = ╱22╱"╱ // 0x7cf @0x5
0x07ca…07df at0006 = ╱20╱…╱ // 0x7d0 @0x6
0x07ca…07df at0007 = ╱20╱…╱ // 0x7d1 @0x7
0x07ca…07df at0008 = ╱20╱…╱ // 0x7d2 @0x8
0x07ca…07df at0009 = ╱20╱…╱ // 0x7d3 @0x9
0x07ca…07df at000a = ╱20╱…╱ // 0x7d4 @0xa
0x07ca…07df at000b = ╱20╱…╱ // 0x7d5 @0xb
0x07ca…07df at000c = ╱20╱…╱ // 0x7d6 @0xc
0x07ca…07df at000d = ╱4b╱K╱ // 0x7d7 @0xd
0x07ca…07df at000e = ╱72╱r╱ // 0x7d8 @0xe
0x07ca…07df at000f = ╱65╱e╱ // 0x7d9 @0xf
0x07ca…07df at0010 = ╱64╱d╱ // 0x7da @0x10
0x07ca…07df at0011 = ╱69╱i╱ // 0x7db @0x11
0x07ca…07df at0012 = ╱74╱t╱ // 0x7dc @0x12
0x07ca…07df at0013 = ╱22╱"╱ // 0x7dd @0x13
0x07ca…07df at0014 = EOL // 0x7de @0x14
0x07ca…07df }
0x07df…07f5 954c 0800 PRINT TAB(8);STREG$
0x07df…07f5 LineComalBin {
0x07df…07f5 ptr = 0x954c // 0x7df @0x0
0x07df…07f5 lno = 0x0320 // 0x7e1 @0x2
0x07df…07f5 at0004 = ╱92╱ PRINT ╱ // 0x7e3 @0x4
0x07df…07f5 at0005 = ╱d2╱TAB╱ // 0x7e4 @0x5
0x07df…07f5 at0006 = ╱ed╱(╱ // 0x7e5 @0x6
0x07df…07f5 at0007 = ╱38╱8╱ // 0x7e6 @0x7
0x07df…07f5 at0008 = ╱fe00008004╱ // 0x7e7 @0x8
0x07df…07f5 at000d = ╱ee╱)╱ // 0x7ec @0xd
0x07df…07f5 at000e = ╱eb╱;╱ // 0x7ed @0xe
0x07df…07f5 at000f = ╱53╱S╱ // 0x7ee @0xf
0x07df…07f5 at0010 = ╱54╱T╱ // 0x7ef @0x10
0x07df…07f5 at0011 = ╱52╱R╱ // 0x7f0 @0x11
0x07df…07f5 at0012 = ╱45╱E╱ // 0x7f1 @0x12
0x07df…07f5 at0013 = ╱47╱G╱ // 0x7f2 @0x13
0x07df…07f5 at0014 = ╱ef╱$╱ // 0x7f3 @0x14
0x07df…07f5 at0015 = EOL // 0x7f4 @0x15
0x07df…07f5 }
0x07f5…07fb 9552 0810 ENDPROC
0x07f5…07fb LineComalBin {
0x07f5…07fb ptr = 0x9552 // 0x7f5 @0x0
0x07f5…07fb lno = 0x032a // 0x7f7 @0x2
0x07f5…07fb at0004 = ╱9f╱ ENDPROC ╱ // 0x7f9 @0x4
0x07f5…07fb at0005 = EOL // 0x7fa @0x5
0x07f5…07fb }
0x07fb…081d 9574 0820 PROC LINIEUD(NR4,NAVN1,SAL1,SAL2)
0x07fb…081d LineComalBin {
0x07fb…081d ptr = 0x9574 // 0x7fb @0x0
0x07fb…081d lno = 0x0334 // 0x7fd @0x2
0x07fb…081d at0004 = ╱9e╱ PROC ╱ // 0x7ff @0x4
0x07fb…081d at0005 = ╱4c╱L╱ // 0x800 @0x5
0x07fb…081d at0006 = ╱49╱I╱ // 0x801 @0x6
0x07fb…081d at0007 = ╱4e╱N╱ // 0x802 @0x7
0x07fb…081d at0008 = ╱49╱I╱ // 0x803 @0x8
0x07fb…081d at0009 = ╱45╱E╱ // 0x804 @0x9
0x07fb…081d at000a = ╱55╱U╱ // 0x805 @0xa
0x07fb…081d at000b = ╱44╱D╱ // 0x806 @0xb
0x07fb…081d at000c = ╱ed╱(╱ // 0x807 @0xc
0x07fb…081d at000d = ╱4e╱N╱ // 0x808 @0xd
0x07fb…081d at000e = ╱52╱R╱ // 0x809 @0xe
0x07fb…081d at000f = ╱34╱4╱ // 0x80a @0xf
0x07fb…081d at0010 = ╱ec╱,╱ // 0x80b @0x10
0x07fb…081d at0011 = ╱4e╱N╱ // 0x80c @0x11
0x07fb…081d at0012 = ╱41╱A╱ // 0x80d @0x12
0x07fb…081d at0013 = ╱56╱V╱ // 0x80e @0x13
0x07fb…081d at0014 = ╱4e╱N╱ // 0x80f @0x14
0x07fb…081d at0015 = ╱31╱1╱ // 0x810 @0x15
0x07fb…081d at0016 = ╱ec╱,╱ // 0x811 @0x16
0x07fb…081d at0017 = ╱53╱S╱ // 0x812 @0x17
0x07fb…081d at0018 = ╱41╱A╱ // 0x813 @0x18
0x07fb…081d at0019 = ╱4c╱L╱ // 0x814 @0x19
0x07fb…081d at001a = ╱31╱1╱ // 0x815 @0x1a
0x07fb…081d at001b = ╱ec╱,╱ // 0x816 @0x1b
0x07fb…081d at001c = ╱53╱S╱ // 0x817 @0x1c
0x07fb…081d at001d = ╱41╱A╱ // 0x818 @0x1d
0x07fb…081d at001e = ╱4c╱L╱ // 0x819 @0x1e
0x07fb…081d at001f = ╱32╱2╱ // 0x81a @0x1f
0x07fb…081d at0020 = ╱ee╱)╱ // 0x81b @0x20
0x07fb…081d at0021 = EOL // 0x81c @0x21
0x07fb…081d }
0x081d…0832 9589 0830 PRINT USING "###### ":NR4;
0x081d…0832 LineComalBin {
0x081d…0832 ptr = 0x9589 // 0x81d @0x0
0x081d…0832 lno = 0x033e // 0x81f @0x2
0x081d…0832 at0004 = ╱92╱ PRINT ╱ // 0x821 @0x4
0x081d…0832 at0005 = ╱b9╱ USING ╱ // 0x822 @0x5
0x081d…0832 at0006 = ╱22╱"╱ // 0x823 @0x6
0x081d…0832 at0007 = ╱23╱#╱ // 0x824 @0x7
0x081d…0832 at0008 = ╱23╱#╱ // 0x825 @0x8
0x081d…0832 at0009 = ╱23╱#╱ // 0x826 @0x9
0x081d…0832 at000a = ╱23╱#╱ // 0x827 @0xa
0x081d…0832 at000b = ╱23╱#╱ // 0x828 @0xb
0x081d…0832 at000c = ╱23╱#╱ // 0x829 @0xc
0x081d…0832 at000d = ╱20╱…╱ // 0x82a @0xd
0x081d…0832 at000e = ╱22╱"╱ // 0x82b @0xe
0x081d…0832 at000f = ╱f0╱:╱ // 0x82c @0xf
0x081d…0832 at0010 = ╱4e╱N╱ // 0x82d @0x10
0x081d…0832 at0011 = ╱52╱R╱ // 0x82e @0x11
0x081d…0832 at0012 = ╱34╱4╱ // 0x82f @0x12
0x081d…0832 at0013 = ╱eb╱;╱ // 0x830 @0x13
0x081d…0832 at0014 = EOL // 0x831 @0x14
0x081d…0832 }
0x0832…084f 95a6 0840 EXEC TUD(SAL1$,UBELØB1$,B,B)
0x0832…084f LineComalBin {
0x0832…084f ptr = 0x95a6 // 0x832 @0x0
0x0832…084f lno = 0x0348 // 0x834 @0x2
0x0832…084f at0004 = ╱9d╱ EXEC ╱ // 0x836 @0x4
0x0832…084f at0005 = ╱54╱T╱ // 0x837 @0x5
0x0832…084f at0006 = ╱55╱U╱ // 0x838 @0x6
0x0832…084f at0007 = ╱44╱D╱ // 0x839 @0x7
0x0832…084f at0008 = ╱ed╱(╱ // 0x83a @0x8
0x0832…084f at0009 = ╱53╱S╱ // 0x83b @0x9
0x0832…084f at000a = ╱41╱A╱ // 0x83c @0xa
0x0832…084f at000b = ╱4c╱L╱ // 0x83d @0xb
0x0832…084f at000c = ╱31╱1╱ // 0x83e @0xc
0x0832…084f at000d = ╱ef╱$╱ // 0x83f @0xd
0x0832…084f at000e = ╱ec╱,╱ // 0x840 @0xe
0x0832…084f at000f = ╱55╱U╱ // 0x841 @0xf
0x0832…084f at0010 = ╱42╱B╱ // 0x842 @0x10
0x0832…084f at0011 = ╱45╱E╱ // 0x843 @0x11
0x0832…084f at0012 = ╱4c╱L╱ // 0x844 @0x12
0x0832…084f at0013 = ╱5c╱Ø╱ // 0x845 @0x13
0x0832…084f at0014 = ╱42╱B╱ // 0x846 @0x14
0x0832…084f at0015 = ╱31╱1╱ // 0x847 @0x15
0x0832…084f at0016 = ╱ef╱$╱ // 0x848 @0x16
0x0832…084f at0017 = ╱ec╱,╱ // 0x849 @0x17
0x0832…084f at0018 = ╱42╱B╱ // 0x84a @0x18
0x0832…084f at0019 = ╱ec╱,╱ // 0x84b @0x19
0x0832…084f at001a = ╱42╱B╱ // 0x84c @0x1a
0x0832…084f at001b = ╱ee╱)╱ // 0x84d @0x1b
0x0832…084f at001c = EOL // 0x84e @0x1c
0x0832…084f }
0x084f…086c 95c3 0850 EXEC TUD(SAL2$,UBELØB2$,B,B)
0x084f…086c LineComalBin {
0x084f…086c ptr = 0x95c3 // 0x84f @0x0
0x084f…086c lno = 0x0352 // 0x851 @0x2
0x084f…086c at0004 = ╱9d╱ EXEC ╱ // 0x853 @0x4
0x084f…086c at0005 = ╱54╱T╱ // 0x854 @0x5
0x084f…086c at0006 = ╱55╱U╱ // 0x855 @0x6
0x084f…086c at0007 = ╱44╱D╱ // 0x856 @0x7
0x084f…086c at0008 = ╱ed╱(╱ // 0x857 @0x8
0x084f…086c at0009 = ╱53╱S╱ // 0x858 @0x9
0x084f…086c at000a = ╱41╱A╱ // 0x859 @0xa
0x084f…086c at000b = ╱4c╱L╱ // 0x85a @0xb
0x084f…086c at000c = ╱32╱2╱ // 0x85b @0xc
0x084f…086c at000d = ╱ef╱$╱ // 0x85c @0xd
0x084f…086c at000e = ╱ec╱,╱ // 0x85d @0xe
0x084f…086c at000f = ╱55╱U╱ // 0x85e @0xf
0x084f…086c at0010 = ╱42╱B╱ // 0x85f @0x10
0x084f…086c at0011 = ╱45╱E╱ // 0x860 @0x11
0x084f…086c at0012 = ╱4c╱L╱ // 0x861 @0x12
0x084f…086c at0013 = ╱5c╱Ø╱ // 0x862 @0x13
0x084f…086c at0014 = ╱42╱B╱ // 0x863 @0x14
0x084f…086c at0015 = ╱32╱2╱ // 0x864 @0x15
0x084f…086c at0016 = ╱ef╱$╱ // 0x865 @0x16
0x084f…086c at0017 = ╱ec╱,╱ // 0x866 @0x17
0x084f…086c at0018 = ╱42╱B╱ // 0x867 @0x18
0x084f…086c at0019 = ╱ec╱,╱ // 0x868 @0x19
0x084f…086c at001a = ╱42╱B╱ // 0x869 @0x1a
0x084f…086c at001b = ╱ee╱)╱ // 0x86a @0x1b
0x084f…086c at001c = EOL // 0x86b @0x1c
0x084f…086c }
0x086c…08a5 (28,) 95fc 0860 PRINT NAVN1$;TAB(33+W*(SAL1$(LEN(SAL1$))="-"));UBELØB1$;
0x086c…08a5 LineComalBin {
0x086c…08a5 ptr = 0x95fc // 0x86c @0x0
0x086c…08a5 lno = 0x035c // 0x86e @0x2
0x086c…08a5 at0004 = ╱92╱ PRINT ╱ // 0x870 @0x4
0x086c…08a5 at0005 = ╱4e╱N╱ // 0x871 @0x5
0x086c…08a5 at0006 = ╱41╱A╱ // 0x872 @0x6
0x086c…08a5 at0007 = ╱56╱V╱ // 0x873 @0x7
0x086c…08a5 at0008 = ╱4e╱N╱ // 0x874 @0x8
0x086c…08a5 at0009 = ╱31╱1╱ // 0x875 @0x9
0x086c…08a5 at000a = ╱ef╱$╱ // 0x876 @0xa
0x086c…08a5 at000b = ╱eb╱;╱ // 0x877 @0xb
0x086c…08a5 at000c = ╱d2╱TAB╱ // 0x878 @0xc
0x086c…08a5 at000d = ╱ed╱(╱ // 0x879 @0xd
0x086c…08a5 at000e = ╱33╱3╱ // 0x87a @0xe
0x086c…08a5 at000f = ╱33╱3╱ // 0x87b @0xf
0x086c…08a5 at0010 = ╱fe00008406╱ // 0x87c @0x10
0x086c…08a5 at0015 = ╱e2╱+╱ // 0x881 @0x15
0x086c…08a5 at0016 = ╱57╱W╱ // 0x882 @0x16
0x086c…08a5 at0017 = ╱e4╱*╱ // 0x883 @0x17
0x086c…08a5 at0018 = ╱ed╱(╱ // 0x884 @0x18
0x086c…08a5 at0019 = ╱53╱S╱ // 0x885 @0x19
0x086c…08a5 at001a = ╱41╱A╱ // 0x886 @0x1a
0x086c…08a5 at001b = ╱4c╱L╱ // 0x887 @0x1b
0x086c…08a5 at001c = ╱31╱1╱ // 0x888 @0x1c
0x086c…08a5 at001d = ╱ef╱$╱ // 0x889 @0x1d
0x086c…08a5 at001e = ╱ed╱(╱ // 0x88a @0x1e
0x086c…08a5 at001f = ╱cc╱LEN╱ // 0x88b @0x1f
0x086c…08a5 at0020 = ╱ed╱(╱ // 0x88c @0x20
0x086c…08a5 at0021 = ╱53╱S╱ // 0x88d @0x21
0x086c…08a5 at0022 = ╱41╱A╱ // 0x88e @0x22
0x086c…08a5 at0023 = ╱4c╱L╱ // 0x88f @0x23
0x086c…08a5 at0024 = ╱31╱1╱ // 0x890 @0x24
0x086c…08a5 at0025 = ╱ef╱$╱ // 0x891 @0x25
0x086c…08a5 at0026 = ╱ee╱)╱ // 0x892 @0x26
0x086c…08a5 at0027 = ╱ee╱)╱ // 0x893 @0x27
0x086c…08a5 at0028 = ╱dc╱=╱ // 0x894 @0x28
0x086c…08a5 at0029 = ╱22╱"╱ // 0x895 @0x29
0x086c…08a5 at002a = ╱2d╱-╱ // 0x896 @0x2a
0x086c…08a5 at002b = ╱22╱"╱ // 0x897 @0x2b
0x086c…08a5 at002c = ╱ee╱)╱ // 0x898 @0x2c
0x086c…08a5 at002d = ╱ee╱)╱ // 0x899 @0x2d
0x086c…08a5 at002e = ╱eb╱;╱ // 0x89a @0x2e
0x086c…08a5 at002f = ╱55╱U╱ // 0x89b @0x2f
0x086c…08a5 at0030 = ╱42╱B╱ // 0x89c @0x30
0x086c…08a5 at0031 = ╱45╱E╱ // 0x89d @0x31
0x086c…08a5 at0032 = ╱4c╱L╱ // 0x89e @0x32
0x086c…08a5 at0033 = ╱5c╱Ø╱ // 0x89f @0x33
0x086c…08a5 at0034 = ╱42╱B╱ // 0x8a0 @0x34
0x086c…08a5 at0035 = ╱31╱1╱ // 0x8a1 @0x35
0x086c…08a5 at0036 = ╱ef╱$╱ // 0x8a2 @0x36
0x086c…08a5 at0037 = ╱eb╱;╱ // 0x8a3 @0x37
0x086c…08a5 at0038 = EOL // 0x8a4 @0x38
0x086c…08a5 }
0x08a5…08dc 9633 0870 PRINT TAB(56+10*(SAL2$(LEN(SAL2$))="-"));UBELØB2$
0x08a5…08dc LineComalBin {
0x08a5…08dc ptr = 0x9633 // 0x8a5 @0x0
0x08a5…08dc lno = 0x0366 // 0x8a7 @0x2
0x08a5…08dc at0004 = ╱92╱ PRINT ╱ // 0x8a9 @0x4
0x08a5…08dc at0005 = ╱d2╱TAB╱ // 0x8aa @0x5
0x08a5…08dc at0006 = ╱ed╱(╱ // 0x8ab @0x6
0x08a5…08dc at0007 = ╱35╱5╱ // 0x8ac @0x7
0x08a5…08dc at0008 = ╱36╱6╱ // 0x8ad @0x8
0x08a5…08dc at0009 = ╱fe0000e006╱ // 0x8ae @0x9
0x08a5…08dc at000e = ╱e2╱+╱ // 0x8b3 @0xe
0x08a5…08dc at000f = ╱31╱1╱ // 0x8b4 @0xf
0x08a5…08dc at0010 = ╱30╱0╱ // 0x8b5 @0x10
0x08a5…08dc at0011 = ╱fe0000a004╱ // 0x8b6 @0x11
0x08a5…08dc at0016 = ╱e4╱*╱ // 0x8bb @0x16
0x08a5…08dc at0017 = ╱ed╱(╱ // 0x8bc @0x17
0x08a5…08dc at0018 = ╱53╱S╱ // 0x8bd @0x18
0x08a5…08dc at0019 = ╱41╱A╱ // 0x8be @0x19
0x08a5…08dc at001a = ╱4c╱L╱ // 0x8bf @0x1a
0x08a5…08dc at001b = ╱32╱2╱ // 0x8c0 @0x1b
0x08a5…08dc at001c = ╱ef╱$╱ // 0x8c1 @0x1c
0x08a5…08dc at001d = ╱ed╱(╱ // 0x8c2 @0x1d
0x08a5…08dc at001e = ╱cc╱LEN╱ // 0x8c3 @0x1e
0x08a5…08dc at001f = ╱ed╱(╱ // 0x8c4 @0x1f
0x08a5…08dc at0020 = ╱53╱S╱ // 0x8c5 @0x20
0x08a5…08dc at0021 = ╱41╱A╱ // 0x8c6 @0x21
0x08a5…08dc at0022 = ╱4c╱L╱ // 0x8c7 @0x22
0x08a5…08dc at0023 = ╱32╱2╱ // 0x8c8 @0x23
0x08a5…08dc at0024 = ╱ef╱$╱ // 0x8c9 @0x24
0x08a5…08dc at0025 = ╱ee╱)╱ // 0x8ca @0x25
0x08a5…08dc at0026 = ╱ee╱)╱ // 0x8cb @0x26
0x08a5…08dc at0027 = ╱dc╱=╱ // 0x8cc @0x27
0x08a5…08dc at0028 = ╱22╱"╱ // 0x8cd @0x28
0x08a5…08dc at0029 = ╱2d╱-╱ // 0x8ce @0x29
0x08a5…08dc at002a = ╱22╱"╱ // 0x8cf @0x2a
0x08a5…08dc at002b = ╱ee╱)╱ // 0x8d0 @0x2b
0x08a5…08dc at002c = ╱ee╱)╱ // 0x8d1 @0x2c
0x08a5…08dc at002d = ╱eb╱;╱ // 0x8d2 @0x2d
0x08a5…08dc at002e = ╱55╱U╱ // 0x8d3 @0x2e
0x08a5…08dc at002f = ╱42╱B╱ // 0x8d4 @0x2f
0x08a5…08dc at0030 = ╱45╱E╱ // 0x8d5 @0x30
0x08a5…08dc at0031 = ╱4c╱L╱ // 0x8d6 @0x31
0x08a5…08dc at0032 = ╱5c╱Ø╱ // 0x8d7 @0x32
0x08a5…08dc at0033 = ╱42╱B╱ // 0x8d8 @0x33
0x08a5…08dc at0034 = ╱32╱2╱ // 0x8d9 @0x34
0x08a5…08dc at0035 = ╱ef╱$╱ // 0x8da @0x35
0x08a5…08dc at0036 = EOL // 0x8db @0x36
0x08a5…08dc }
0x08dc…08e2 9639 0880 ENDPROC
0x08dc…08e2 LineComalBin {
0x08dc…08e2 ptr = 0x9639 // 0x8dc @0x0
0x08dc…08e2 lno = 0x0370 // 0x8de @0x2
0x08dc…08e2 at0004 = ╱9f╱ ENDPROC ╱ // 0x8e0 @0x4
0x08dc…08e2 at0005 = EOL // 0x8e1 @0x5
0x08dc…08e2 }
0x08e2…08fd 9654 0890 PROC NYSIDE(GFNR9,GLNAVN9)
0x08e2…08fd LineComalBin {
0x08e2…08fd ptr = 0x9654 // 0x8e2 @0x0
0x08e2…08fd lno = 0x037a // 0x8e4 @0x2
0x08e2…08fd at0004 = ╱9e╱ PROC ╱ // 0x8e6 @0x4
0x08e2…08fd at0005 = ╱4e╱N╱ // 0x8e7 @0x5
0x08e2…08fd at0006 = ╱59╱Y╱ // 0x8e8 @0x6
0x08e2…08fd at0007 = ╱53╱S╱ // 0x8e9 @0x7
0x08e2…08fd at0008 = ╱49╱I╱ // 0x8ea @0x8
0x08e2…08fd at0009 = ╱44╱D╱ // 0x8eb @0x9
0x08e2…08fd at000a = ╱45╱E╱ // 0x8ec @0xa
0x08e2…08fd at000b = ╱ed╱(╱ // 0x8ed @0xb
0x08e2…08fd at000c = ╱47╱G╱ // 0x8ee @0xc
0x08e2…08fd at000d = ╱46╱F╱ // 0x8ef @0xd
0x08e2…08fd at000e = ╱4e╱N╱ // 0x8f0 @0xe
0x08e2…08fd at000f = ╱52╱R╱ // 0x8f1 @0xf
0x08e2…08fd at0010 = ╱39╱9╱ // 0x8f2 @0x10
0x08e2…08fd at0011 = ╱ec╱,╱ // 0x8f3 @0x11
0x08e2…08fd at0012 = ╱47╱G╱ // 0x8f4 @0x12
0x08e2…08fd at0013 = ╱4c╱L╱ // 0x8f5 @0x13
0x08e2…08fd at0014 = ╱4e╱N╱ // 0x8f6 @0x14
0x08e2…08fd at0015 = ╱41╱A╱ // 0x8f7 @0x15
0x08e2…08fd at0016 = ╱56╱V╱ // 0x8f8 @0x16
0x08e2…08fd at0017 = ╱4e╱N╱ // 0x8f9 @0x17
0x08e2…08fd at0018 = ╱39╱9╱ // 0x8fa @0x18
0x08e2…08fd at0019 = ╱ee╱)╱ // 0x8fb @0x19
0x08e2…08fd at001a = EOL // 0x8fc @0x1a
0x08e2…08fd }
0x08fd…0916 966d 0900 FOR LINIE=LINIE TO 41
0x08fd…0916 LineComalBin {
0x08fd…0916 ptr = 0x966d // 0x8fd @0x0
0x08fd…0916 lno = 0x0384 // 0x8ff @0x2
0x08fd…0916 at0004 = ╱83╱ FOR ╱ // 0x901 @0x4
0x08fd…0916 at0005 = ╱4c╱L╱ // 0x902 @0x5
0x08fd…0916 at0006 = ╱49╱I╱ // 0x903 @0x6
0x08fd…0916 at0007 = ╱4e╱N╱ // 0x904 @0x7
0x08fd…0916 at0008 = ╱49╱I╱ // 0x905 @0x8
0x08fd…0916 at0009 = ╱45╱E╱ // 0x906 @0x9
0x08fd…0916 at000a = ╱dc╱=╱ // 0x907 @0xa
0x08fd…0916 at000b = ╱4c╱L╱ // 0x908 @0xb
0x08fd…0916 at000c = ╱49╱I╱ // 0x909 @0xc
0x08fd…0916 at000d = ╱4e╱N╱ // 0x90a @0xd
0x08fd…0916 at000e = ╱49╱I╱ // 0x90b @0xe
0x08fd…0916 at000f = ╱45╱E╱ // 0x90c @0xf
0x08fd…0916 at0010 = ╱b7╱ TO ╱ // 0x90d @0x10
0x08fd…0916 at0011 = ╱34╱4╱ // 0x90e @0x11
0x08fd…0916 at0012 = ╱31╱1╱ // 0x90f @0x12
0x08fd…0916 at0013 = ╱fe0000a406╱ // 0x910 @0x13
0x08fd…0916 at0018 = EOL // 0x915 @0x18
0x08fd…0916 }
0x0916…091f 9676 0910 PRINT " "
0x0916…091f LineComalBin {
0x0916…091f ptr = 0x9676 // 0x916 @0x0
0x0916…091f lno = 0x038e // 0x918 @0x2
0x0916…091f at0004 = ╱92╱ PRINT ╱ // 0x91a @0x4
0x0916…091f at0005 = ╱22╱"╱ // 0x91b @0x5
0x0916…091f at0006 = ╱20╱…╱ // 0x91c @0x6
0x0916…091f at0007 = ╱22╱"╱ // 0x91d @0x7
0x0916…091f at0008 = EOL // 0x91e @0x8
0x0916…091f }
0x091f…092a 9681 0920 NEXT LINIE
0x091f…092a LineComalBin {
0x091f…092a ptr = 0x9681 // 0x91f @0x0
0x091f…092a lno = 0x0398 // 0x921 @0x2
0x091f…092a at0004 = ╱84╱ NEXT ╱ // 0x923 @0x4
0x091f…092a at0005 = ╱4c╱L╱ // 0x924 @0x5
0x091f…092a at0006 = ╱49╱I╱ // 0x925 @0x6
0x091f…092a at0007 = ╱4e╱N╱ // 0x926 @0x7
0x091f…092a at0008 = ╱49╱I╱ // 0x927 @0x8
0x091f…092a at0009 = ╱45╱E╱ // 0x928 @0x9
0x091f…092a at000a = EOL // 0x929 @0xa
0x091f…092a }
0x092a…0933 968a 0930 PRINT " "
0x092a…0933 LineComalBin {
0x092a…0933 ptr = 0x968a // 0x92a @0x0
0x092a…0933 lno = 0x03a2 // 0x92c @0x2
0x092a…0933 at0004 = ╱92╱ PRINT ╱ // 0x92e @0x4
0x092a…0933 at0005 = ╱22╱"╱ // 0x92f @0x5
0x092a…0933 at0006 = ╱20╱…╱ // 0x930 @0x6
0x092a…0933 at0007 = ╱22╱"╱ // 0x931 @0x7
0x092a…0933 at0008 = EOL // 0x932 @0x8
0x092a…0933 }
0x0933…0945 969c 0940 BSIDE=BSIDE+E
0x0933…0945 LineComalBin {
0x0933…0945 ptr = 0x969c // 0x933 @0x0
0x0933…0945 lno = 0x03ac // 0x935 @0x2
0x0933…0945 at0004 = ╱42╱B╱ // 0x937 @0x4
0x0933…0945 at0005 = ╱53╱S╱ // 0x938 @0x5
0x0933…0945 at0006 = ╱49╱I╱ // 0x939 @0x6
0x0933…0945 at0007 = ╱44╱D╱ // 0x93a @0x7
0x0933…0945 at0008 = ╱45╱E╱ // 0x93b @0x8
0x0933…0945 at0009 = ╱dc╱=╱ // 0x93c @0x9
0x0933…0945 at000a = ╱42╱B╱ // 0x93d @0xa
0x0933…0945 at000b = ╱53╱S╱ // 0x93e @0xb
0x0933…0945 at000c = ╱49╱I╱ // 0x93f @0xc
0x0933…0945 at000d = ╱44╱D╱ // 0x940 @0xd
0x0933…0945 at000e = ╱45╱E╱ // 0x941 @0xe
0x0933…0945 at000f = ╱e2╱+╱ // 0x942 @0xf
0x0933…0945 at0010 = ╱45╱E╱ // 0x943 @0x10
0x0933…0945 at0011 = EOL // 0x944 @0x11
0x0933…0945 }
0x0945…0964 96bb 0950 EXEC HOVEDUD(T1(7),BSIDE)
0x0945…0964 LineComalBin {
0x0945…0964 ptr = 0x96bb // 0x945 @0x0
0x0945…0964 lno = 0x03b6 // 0x947 @0x2
0x0945…0964 at0004 = ╱9d╱ EXEC ╱ // 0x949 @0x4
0x0945…0964 at0005 = ╱48╱H╱ // 0x94a @0x5
0x0945…0964 at0006 = ╱4f╱O╱ // 0x94b @0x6
0x0945…0964 at0007 = ╱56╱V╱ // 0x94c @0x7
0x0945…0964 at0008 = ╱45╱E╱ // 0x94d @0x8
0x0945…0964 at0009 = ╱44╱D╱ // 0x94e @0x9
0x0945…0964 at000a = ╱55╱U╱ // 0x94f @0xa
0x0945…0964 at000b = ╱44╱D╱ // 0x950 @0xb
0x0945…0964 at000c = ╱ed╱(╱ // 0x951 @0xc
0x0945…0964 at000d = ╱54╱T╱ // 0x952 @0xd
0x0945…0964 at000e = ╱31╱1╱ // 0x953 @0xe
0x0945…0964 at000f = ╱ed╱(╱ // 0x954 @0xf
0x0945…0964 at0010 = ╱37╱7╱ // 0x955 @0x10
0x0945…0964 at0011 = ╱fe0000e003╱ // 0x956 @0x11
0x0945…0964 at0016 = ╱ee╱)╱ // 0x95b @0x16
0x0945…0964 at0017 = ╱ec╱,╱ // 0x95c @0x17
0x0945…0964 at0018 = ╱42╱B╱ // 0x95d @0x18
0x0945…0964 at0019 = ╱53╱S╱ // 0x95e @0x19
0x0945…0964 at001a = ╱49╱I╱ // 0x95f @0x1a
0x0945…0964 at001b = ╱44╱D╱ // 0x960 @0x1b
0x0945…0964 at001c = ╱45╱E╱ // 0x961 @0x1c
0x0945…0964 at001d = ╱ee╱)╱ // 0x962 @0x1d
0x0945…0964 at001e = EOL // 0x963 @0x1e
0x0945…0964 }
0x0964…096d 96c4 0960 PRINT " "
0x0964…096d LineComalBin {
0x0964…096d ptr = 0x96c4 // 0x964 @0x0
0x0964…096d lno = 0x03c0 // 0x966 @0x2
0x0964…096d at0004 = ╱92╱ PRINT ╱ // 0x968 @0x4
0x0964…096d at0005 = ╱22╱"╱ // 0x969 @0x5
0x0964…096d at0006 = ╱20╱…╱ // 0x96a @0x6
0x0964…096d at0007 = ╱22╱"╱ // 0x96b @0x7
0x0964…096d at0008 = EOL // 0x96c @0x8
0x0964…096d }
0x096d…097b 96d2 0970 IF GFNR9>B THEN
0x096d…097b LineComalBin {
0x096d…097b ptr = 0x96d2 // 0x96d @0x0
0x096d…097b lno = 0x03ca // 0x96f @0x2
0x096d…097b at0004 = ╱9c╱ IF ╱ // 0x971 @0x4
0x096d…097b at0005 = ╱47╱G╱ // 0x972 @0x5
0x096d…097b at0006 = ╱46╱F╱ // 0x973 @0x6
0x096d…097b at0007 = ╱4e╱N╱ // 0x974 @0x7
0x096d…097b at0008 = ╱52╱R╱ // 0x975 @0x8
0x096d…097b at0009 = ╱39╱9╱ // 0x976 @0x9
0x096d…097b at000a = ╱de╱>╱ // 0x977 @0xa
0x096d…097b at000b = ╱42╱B╱ // 0x978 @0xb
0x096d…097b at000c = ╱b6╱ THEN ╱ // 0x979 @0xc
0x096d…097b at000d = EOL // 0x97a @0xd
0x096d…097b }
0x097b…0992 96e9 0980 PRINT USING "###### ":GFNR9;
0x097b…0992 LineComalBin {
0x097b…0992 ptr = 0x96e9 // 0x97b @0x0
0x097b…0992 lno = 0x03d4 // 0x97d @0x2
0x097b…0992 at0004 = ╱92╱ PRINT ╱ // 0x97f @0x4
0x097b…0992 at0005 = ╱b9╱ USING ╱ // 0x980 @0x5
0x097b…0992 at0006 = ╱22╱"╱ // 0x981 @0x6
0x097b…0992 at0007 = ╱23╱#╱ // 0x982 @0x7
0x097b…0992 at0008 = ╱23╱#╱ // 0x983 @0x8
0x097b…0992 at0009 = ╱23╱#╱ // 0x984 @0x9
0x097b…0992 at000a = ╱23╱#╱ // 0x985 @0xa
0x097b…0992 at000b = ╱23╱#╱ // 0x986 @0xb
0x097b…0992 at000c = ╱23╱#╱ // 0x987 @0xc
0x097b…0992 at000d = ╱20╱…╱ // 0x988 @0xd
0x097b…0992 at000e = ╱22╱"╱ // 0x989 @0xe
0x097b…0992 at000f = ╱f0╱:╱ // 0x98a @0xf
0x097b…0992 at0010 = ╱47╱G╱ // 0x98b @0x10
0x097b…0992 at0011 = ╱46╱F╱ // 0x98c @0x11
0x097b…0992 at0012 = ╱4e╱N╱ // 0x98d @0x12
0x097b…0992 at0013 = ╱52╱R╱ // 0x98e @0x13
0x097b…0992 at0014 = ╱39╱9╱ // 0x98f @0x14
0x097b…0992 at0015 = ╱eb╱;╱ // 0x990 @0x15
0x097b…0992 at0016 = EOL // 0x991 @0x16
0x097b…0992 }
0x0992…09b9 9710 0990 EXEC CALC(4,SALDO12$,TAL4$,TAL4$)
0x0992…09b9 LineComalBin {
0x0992…09b9 ptr = 0x9710 // 0x992 @0x0
0x0992…09b9 lno = 0x03de // 0x994 @0x2
0x0992…09b9 at0004 = ╱9d╱ EXEC ╱ // 0x996 @0x4
0x0992…09b9 at0005 = ╱43╱C╱ // 0x997 @0x5
0x0992…09b9 at0006 = ╱41╱A╱ // 0x998 @0x6
0x0992…09b9 at0007 = ╱4c╱L╱ // 0x999 @0x7
0x0992…09b9 at0008 = ╱43╱C╱ // 0x99a @0x8
0x0992…09b9 at0009 = ╱ed╱(╱ // 0x99b @0x9
0x0992…09b9 at000a = ╱34╱4╱ // 0x99c @0xa
0x0992…09b9 at000b = ╱fe00008003╱ // 0x99d @0xb
0x0992…09b9 at0010 = ╱ec╱,╱ // 0x9a2 @0x10
0x0992…09b9 at0011 = ╱53╱S╱ // 0x9a3 @0x11
0x0992…09b9 at0012 = ╱41╱A╱ // 0x9a4 @0x12
0x0992…09b9 at0013 = ╱4c╱L╱ // 0x9a5 @0x13
0x0992…09b9 at0014 = ╱44╱D╱ // 0x9a6 @0x14
0x0992…09b9 at0015 = ╱4f╱O╱ // 0x9a7 @0x15
0x0992…09b9 at0016 = ╱31╱1╱ // 0x9a8 @0x16
0x0992…09b9 at0017 = ╱32╱2╱ // 0x9a9 @0x17
0x0992…09b9 at0018 = ╱ef╱$╱ // 0x9aa @0x18
0x0992…09b9 at0019 = ╱ec╱,╱ // 0x9ab @0x19
0x0992…09b9 at001a = ╱54╱T╱ // 0x9ac @0x1a
0x0992…09b9 at001b = ╱41╱A╱ // 0x9ad @0x1b
0x0992…09b9 at001c = ╱4c╱L╱ // 0x9ae @0x1c
0x0992…09b9 at001d = ╱34╱4╱ // 0x9af @0x1d
0x0992…09b9 at001e = ╱ef╱$╱ // 0x9b0 @0x1e
0x0992…09b9 at001f = ╱ec╱,╱ // 0x9b1 @0x1f
0x0992…09b9 at0020 = ╱54╱T╱ // 0x9b2 @0x20
0x0992…09b9 at0021 = ╱41╱A╱ // 0x9b3 @0x21
0x0992…09b9 at0022 = ╱4c╱L╱ // 0x9b4 @0x22
0x0992…09b9 at0023 = ╱34╱4╱ // 0x9b5 @0x23
0x0992…09b9 at0024 = ╱ef╱$╱ // 0x9b6 @0x24
0x0992…09b9 at0025 = ╱ee╱)╱ // 0x9b7 @0x25
0x0992…09b9 at0026 = EOL // 0x9b8 @0x26
0x0992…09b9 }
0x09b9…09c4 971b 1000 IF SI<>B THEN
0x09b9…09c4 LineComalBin {
0x09b9…09c4 ptr = 0x971b // 0x9b9 @0x0
0x09b9…09c4 lno = 0x03e8 // 0x9bb @0x2
0x09b9…09c4 at0004 = ╱9c╱ IF ╱ // 0x9bd @0x4
0x09b9…09c4 at0005 = ╱53╱S╱ // 0x9be @0x5
0x09b9…09c4 at0006 = ╱49╱I╱ // 0x9bf @0x6
0x09b9…09c4 at0007 = ╱e1╱<>╱ // 0x9c0 @0x7
0x09b9…09c4 at0008 = ╱42╱B╱ // 0x9c1 @0x8
0x09b9…09c4 at0009 = ╱b6╱ THEN ╱ // 0x9c2 @0x9
0x09b9…09c4 at000a = EOL // 0x9c3 @0xa
0x09b9…09c4 }
0x09c4…09dd 9734 1010 PRINT GLNAVN9$;" Fortsat"
0x09c4…09dd LineComalBin {
0x09c4…09dd ptr = 0x9734 // 0x9c4 @0x0
0x09c4…09dd lno = 0x03f2 // 0x9c6 @0x2
0x09c4…09dd at0004 = ╱92╱ PRINT ╱ // 0x9c8 @0x4
0x09c4…09dd at0005 = ╱47╱G╱ // 0x9c9 @0x5
0x09c4…09dd at0006 = ╱4c╱L╱ // 0x9ca @0x6
0x09c4…09dd at0007 = ╱4e╱N╱ // 0x9cb @0x7
0x09c4…09dd at0008 = ╱41╱A╱ // 0x9cc @0x8
0x09c4…09dd at0009 = ╱56╱V╱ // 0x9cd @0x9
0x09c4…09dd at000a = ╱4e╱N╱ // 0x9ce @0xa
0x09c4…09dd at000b = ╱39╱9╱ // 0x9cf @0xb
0x09c4…09dd at000c = ╱ef╱$╱ // 0x9d0 @0xc
0x09c4…09dd at000d = ╱eb╱;╱ // 0x9d1 @0xd
0x09c4…09dd at000e = ╱22╱"╱ // 0x9d2 @0xe
0x09c4…09dd at000f = ╱20╱…╱ // 0x9d3 @0xf
0x09c4…09dd at0010 = ╱46╱F╱ // 0x9d4 @0x10
0x09c4…09dd at0011 = ╱6f╱o╱ // 0x9d5 @0x11
0x09c4…09dd at0012 = ╱72╱r╱ // 0x9d6 @0x12
0x09c4…09dd at0013 = ╱74╱t╱ // 0x9d7 @0x13
0x09c4…09dd at0014 = ╱73╱s╱ // 0x9d8 @0x14
0x09c4…09dd at0015 = ╱61╱a╱ // 0x9d9 @0x15
0x09c4…09dd at0016 = ╱74╱t╱ // 0x9da @0x16
0x09c4…09dd at0017 = ╱22╱"╱ // 0x9db @0x17
0x09c4…09dd at0018 = EOL // 0x9dc @0x18
0x09c4…09dd }
0x09dd…09e3 973a 1020 ELSE
0x09dd…09e3 LineComalBin {
0x09dd…09e3 ptr = 0x973a // 0x9dd @0x0
0x09dd…09e3 lno = 0x03fc // 0x9df @0x2
0x09dd…09e3 at0004 = ╱9a╱ ELSE ╱ // 0x9e1 @0x4
0x09dd…09e3 at0005 = EOL // 0x9e2 @0x5
0x09dd…09e3 }
0x09e3…09f1 9748 1030 PRINT GLNAVN9$
0x09e3…09f1 LineComalBin {
0x09e3…09f1 ptr = 0x9748 // 0x9e3 @0x0
0x09e3…09f1 lno = 0x0406 // 0x9e5 @0x2
0x09e3…09f1 at0004 = ╱92╱ PRINT ╱ // 0x9e7 @0x4
0x09e3…09f1 at0005 = ╱47╱G╱ // 0x9e8 @0x5
0x09e3…09f1 at0006 = ╱4c╱L╱ // 0x9e9 @0x6
0x09e3…09f1 at0007 = ╱4e╱N╱ // 0x9ea @0x7
0x09e3…09f1 at0008 = ╱41╱A╱ // 0x9eb @0x8
0x09e3…09f1 at0009 = ╱56╱V╱ // 0x9ec @0x9
0x09e3…09f1 at000a = ╱4e╱N╱ // 0x9ed @0xa
0x09e3…09f1 at000b = ╱39╱9╱ // 0x9ee @0xb
0x09e3…09f1 at000c = ╱ef╱$╱ // 0x9ef @0xc
0x09e3…09f1 at000d = EOL // 0x9f0 @0xd
0x09e3…09f1 }
0x09f1…09f7 974e 1040 ENDIF
0x09f1…09f7 LineComalBin {
0x09f1…09f7 ptr = 0x974e // 0x9f1 @0x0
0x09f1…09f7 lno = 0x0410 // 0x9f3 @0x2
0x09f1…09f7 at0004 = ╱9b╱ ENDIF ╱ // 0x9f5 @0x4
0x09f1…09f7 at0005 = EOL // 0x9f6 @0x5
0x09f1…09f7 }
0x09f7…0a26 977d 1050 PRINT TAB(8);STREG$(E:25+7*(SI<>B))
0x09f7…0a26 LineComalBin {
0x09f7…0a26 ptr = 0x977d // 0x9f7 @0x0
0x09f7…0a26 lno = 0x041a // 0x9f9 @0x2
0x09f7…0a26 at0004 = ╱92╱ PRINT ╱ // 0x9fb @0x4
0x09f7…0a26 at0005 = ╱d2╱TAB╱ // 0x9fc @0x5
0x09f7…0a26 at0006 = ╱ed╱(╱ // 0x9fd @0x6
0x09f7…0a26 at0007 = ╱38╱8╱ // 0x9fe @0x7
0x09f7…0a26 at0008 = ╱fe00008004╱ // 0x9ff @0x8
0x09f7…0a26 at000d = ╱ee╱)╱ // 0xa04 @0xd
0x09f7…0a26 at000e = ╱eb╱;╱ // 0xa05 @0xe
0x09f7…0a26 at000f = ╱53╱S╱ // 0xa06 @0xf
0x09f7…0a26 at0010 = ╱54╱T╱ // 0xa07 @0x10
0x09f7…0a26 at0011 = ╱52╱R╱ // 0xa08 @0x11
0x09f7…0a26 at0012 = ╱45╱E╱ // 0xa09 @0x12
0x09f7…0a26 at0013 = ╱47╱G╱ // 0xa0a @0x13
0x09f7…0a26 at0014 = ╱ef╱$╱ // 0xa0b @0x14
0x09f7…0a26 at0015 = ╱ed╱(╱ // 0xa0c @0x15
0x09f7…0a26 at0016 = ╱45╱E╱ // 0xa0d @0x16
0x09f7…0a26 at0017 = ╱f0╱:╱ // 0xa0e @0x17
0x09f7…0a26 at0018 = ╱32╱2╱ // 0xa0f @0x18
0x09f7…0a26 at0019 = ╱35╱5╱ // 0xa10 @0x19
0x09f7…0a26 at001a = ╱fe0000c805╱ // 0xa11 @0x1a
0x09f7…0a26 at001f = ╱e2╱+╱ // 0xa16 @0x1f
0x09f7…0a26 at0020 = ╱37╱7╱ // 0xa17 @0x20
0x09f7…0a26 at0021 = ╱fe0000e003╱ // 0xa18 @0x21
0x09f7…0a26 at0026 = ╱e4╱*╱ // 0xa1d @0x26
0x09f7…0a26 at0027 = ╱ed╱(╱ // 0xa1e @0x27
0x09f7…0a26 at0028 = ╱53╱S╱ // 0xa1f @0x28
0x09f7…0a26 at0029 = ╱49╱I╱ // 0xa20 @0x29
0x09f7…0a26 at002a = ╱e1╱<>╱ // 0xa21 @0x2a
0x09f7…0a26 at002b = ╱42╱B╱ // 0xa22 @0x2b
0x09f7…0a26 at002c = ╱ee╱)╱ // 0xa23 @0x2c
0x09f7…0a26 at002d = ╱ee╱)╱ // 0xa24 @0x2d
0x09f7…0a26 at002e = EOL // 0xa25 @0x2e
0x09f7…0a26 }
0x0a26…0a37 978e 1060 LINIE=5
0x0a26…0a37 LineComalBin {
0x0a26…0a37 ptr = 0x978e // 0xa26 @0x0
0x0a26…0a37 lno = 0x0424 // 0xa28 @0x2
0x0a26…0a37 at0004 = ╱4c╱L╱ // 0xa2a @0x4
0x0a26…0a37 at0005 = ╱49╱I╱ // 0xa2b @0x5
0x0a26…0a37 at0006 = ╱4e╱N╱ // 0xa2c @0x6
0x0a26…0a37 at0007 = ╱49╱I╱ // 0xa2d @0x7
0x0a26…0a37 at0008 = ╱45╱E╱ // 0xa2e @0x8
0x0a26…0a37 at0009 = ╱dc╱=╱ // 0xa2f @0x9
0x0a26…0a37 at000a = ╱35╱5╱ // 0xa30 @0xa
0x0a26…0a37 at000b = ╱fe0000a003╱ // 0xa31 @0xb
0x0a26…0a37 at0010 = EOL // 0xa36 @0x10
0x0a26…0a37 }
0x0a37…0a3d 9794 1070 ELSE
0x0a37…0a3d LineComalBin {
0x0a37…0a3d ptr = 0x9794 // 0xa37 @0x0
0x0a37…0a3d lno = 0x042e // 0xa39 @0x2
0x0a37…0a3d at0004 = ╱9a╱ ELSE ╱ // 0xa3b @0x4
0x0a37…0a3d at0005 = EOL // 0xa3c @0x5
0x0a37…0a3d }
0x0a3d…0a49 97a0 1080 LINIE=V
0x0a3d…0a49 LineComalBin {
0x0a3d…0a49 ptr = 0x97a0 // 0xa3d @0x0
0x0a3d…0a49 lno = 0x0438 // 0xa3f @0x2
0x0a3d…0a49 at0004 = ╱4c╱L╱ // 0xa41 @0x4
0x0a3d…0a49 at0005 = ╱49╱I╱ // 0xa42 @0x5
0x0a3d…0a49 at0006 = ╱4e╱N╱ // 0xa43 @0x6
0x0a3d…0a49 at0007 = ╱49╱I╱ // 0xa44 @0x7
0x0a3d…0a49 at0008 = ╱45╱E╱ // 0xa45 @0x8
0x0a3d…0a49 at0009 = ╱dc╱=╱ // 0xa46 @0x9
0x0a3d…0a49 at000a = ╱56╱V╱ // 0xa47 @0xa
0x0a3d…0a49 at000b = EOL // 0xa48 @0xb
0x0a3d…0a49 }
0x0a49…0a4f 97a6 1090 ENDIF
0x0a49…0a4f LineComalBin {
0x0a49…0a4f ptr = 0x97a6 // 0xa49 @0x0
0x0a49…0a4f lno = 0x0442 // 0xa4b @0x2
0x0a49…0a4f at0004 = ╱9b╱ ENDIF ╱ // 0xa4d @0x4
0x0a49…0a4f at0005 = EOL // 0xa4e @0x5
0x0a49…0a4f }
0x0a4f…0a58 97af 1100 PRINT " "
0x0a4f…0a58 LineComalBin {
0x0a4f…0a58 ptr = 0x97af // 0xa4f @0x0
0x0a4f…0a58 lno = 0x044c // 0xa51 @0x2
0x0a4f…0a58 at0004 = ╱92╱ PRINT ╱ // 0xa53 @0x4
0x0a4f…0a58 at0005 = ╱22╱"╱ // 0xa54 @0x5
0x0a4f…0a58 at0006 = ╱20╱…╱ // 0xa55 @0x6
0x0a4f…0a58 at0007 = ╱22╱"╱ // 0xa56 @0x7
0x0a4f…0a58 at0008 = EOL // 0xa57 @0x8
0x0a4f…0a58 }
0x0a58…0a5e 97b5 1110 ENDPROC
0x0a58…0a5e LineComalBin {
0x0a58…0a5e ptr = 0x97b5 // 0xa58 @0x0
0x0a58…0a5e lno = 0x0456 // 0xa5a @0x2
0x0a58…0a5e at0004 = ╱9f╱ ENDPROC ╱ // 0xa5c @0x4
0x0a58…0a5e at0005 = EOL // 0xa5d @0x5
0x0a58…0a5e }
0x0a5e…0a78 97cf 1120 K1$="P641220:SYSTEM1"
0x0a5e…0a78 LineComalBin {
0x0a5e…0a78 ptr = 0x97cf // 0xa5e @0x0
0x0a5e…0a78 lno = 0x0460 // 0xa60 @0x2
0x0a5e…0a78 at0004 = ╱4b╱K╱ // 0xa62 @0x4
0x0a5e…0a78 at0005 = ╱31╱1╱ // 0xa63 @0x5
0x0a5e…0a78 at0006 = ╱ef╱$╱ // 0xa64 @0x6
0x0a5e…0a78 at0007 = ╱dc╱=╱ // 0xa65 @0x7
0x0a5e…0a78 at0008 = ╱22╱"╱ // 0xa66 @0x8
0x0a5e…0a78 at0009 = ╱50╱P╱ // 0xa67 @0x9
0x0a5e…0a78 at000a = ╱36╱6╱ // 0xa68 @0xa
0x0a5e…0a78 at000b = ╱34╱4╱ // 0xa69 @0xb
0x0a5e…0a78 at000c = ╱31╱1╱ // 0xa6a @0xc
0x0a5e…0a78 at000d = ╱32╱2╱ // 0xa6b @0xd
0x0a5e…0a78 at000e = ╱32╱2╱ // 0xa6c @0xe
0x0a5e…0a78 at000f = ╱30╱0╱ // 0xa6d @0xf
0x0a5e…0a78 at0010 = ╱3a╱:╱ // 0xa6e @0x10
0x0a5e…0a78 at0011 = ╱53╱S╱ // 0xa6f @0x11
0x0a5e…0a78 at0012 = ╱59╱Y╱ // 0xa70 @0x12
0x0a5e…0a78 at0013 = ╱53╱S╱ // 0xa71 @0x13
0x0a5e…0a78 at0014 = ╱54╱T╱ // 0xa72 @0x14
0x0a5e…0a78 at0015 = ╱45╱E╱ // 0xa73 @0x15
0x0a5e…0a78 at0016 = ╱4d╱M╱ // 0xa74 @0x16
0x0a5e…0a78 at0017 = ╱31╱1╱ // 0xa75 @0x17
0x0a5e…0a78 at0018 = ╱22╱"╱ // 0xa76 @0x18
0x0a5e…0a78 at0019 = EOL // 0xa77 @0x19
0x0a5e…0a78 }
0x0a78…0a83 97da 1130 OPEN K1$,R
0x0a78…0a83 LineComalBin {
0x0a78…0a83 ptr = 0x97da // 0xa78 @0x0
0x0a78…0a83 lno = 0x046a // 0xa7a @0x2
0x0a78…0a83 at0004 = ╱a7╱ OPEN ╱ // 0xa7c @0x4
0x0a78…0a83 at0005 = ╱4b╱K╱ // 0xa7d @0x5
0x0a78…0a83 at0006 = ╱31╱1╱ // 0xa7e @0x6
0x0a78…0a83 at0007 = ╱ef╱$╱ // 0xa7f @0x7
0x0a78…0a83 at0008 = ╱ec╱,╱ // 0xa80 @0x8
0x0a78…0a83 at0009 = ╱52╱R╱ // 0xa81 @0x9
0x0a78…0a83 at000a = EOL // 0xa82 @0xa
0x0a78…0a83 }
0x0a83…0a96 97ed 1140 EXEC FEJL(W,E,K1$)
0x0a83…0a96 LineComalBin {
0x0a83…0a96 ptr = 0x97ed // 0xa83 @0x0
0x0a83…0a96 lno = 0x0474 // 0xa85 @0x2
0x0a83…0a96 at0004 = ╱9d╱ EXEC ╱ // 0xa87 @0x4
0x0a83…0a96 at0005 = ╱46╱F╱ // 0xa88 @0x5
0x0a83…0a96 at0006 = ╱45╱E╱ // 0xa89 @0x6
0x0a83…0a96 at0007 = ╱4a╱J╱ // 0xa8a @0x7
0x0a83…0a96 at0008 = ╱4c╱L╱ // 0xa8b @0x8
0x0a83…0a96 at0009 = ╱ed╱(╱ // 0xa8c @0x9
0x0a83…0a96 at000a = ╱57╱W╱ // 0xa8d @0xa
0x0a83…0a96 at000b = ╱ec╱,╱ // 0xa8e @0xb
0x0a83…0a96 at000c = ╱45╱E╱ // 0xa8f @0xc
0x0a83…0a96 at000d = ╱ec╱,╱ // 0xa90 @0xd
0x0a83…0a96 at000e = ╱4b╱K╱ // 0xa91 @0xe
0x0a83…0a96 at000f = ╱31╱1╱ // 0xa92 @0xf
0x0a83…0a96 at0010 = ╱ef╱$╱ // 0xa93 @0x10
0x0a83…0a96 at0011 = ╱ee╱)╱ // 0xa94 @0x11
0x0a83…0a96 at0012 = EOL // 0xa95 @0x12
0x0a83…0a96 }
0x0a96…0aa9 9800 1150 GET K1$,E:MFANTAL
0x0a96…0aa9 LineComalBin {
0x0a96…0aa9 ptr = 0x9800 // 0xa96 @0x0
0x0a96…0aa9 lno = 0x047e // 0xa98 @0x2
0x0a96…0aa9 at0004 = ╱a9╱ GET ╱ // 0xa9a @0x4
0x0a96…0aa9 at0005 = ╱4b╱K╱ // 0xa9b @0x5
0x0a96…0aa9 at0006 = ╱31╱1╱ // 0xa9c @0x6
0x0a96…0aa9 at0007 = ╱ef╱$╱ // 0xa9d @0x7
0x0a96…0aa9 at0008 = ╱ec╱,╱ // 0xa9e @0x8
0x0a96…0aa9 at0009 = ╱45╱E╱ // 0xa9f @0x9
0x0a96…0aa9 at000a = ╱f0╱:╱ // 0xaa0 @0xa
0x0a96…0aa9 at000b = ╱4d╱M╱ // 0xaa1 @0xb
0x0a96…0aa9 at000c = ╱46╱F╱ // 0xaa2 @0xc
0x0a96…0aa9 at000d = ╱41╱A╱ // 0xaa3 @0xd
0x0a96…0aa9 at000e = ╱4e╱N╱ // 0xaa4 @0xe
0x0a96…0aa9 at000f = ╱54╱T╱ // 0xaa5 @0xf
0x0a96…0aa9 at0010 = ╱41╱A╱ // 0xaa6 @0x10
0x0a96…0aa9 at0011 = ╱4c╱L╱ // 0xaa7 @0x11
0x0a96…0aa9 at0012 = EOL // 0xaa8 @0x12
0x0a96…0aa9 }
0x0aa9…0abc 9813 1160 EXEC FEJL(W,G,K1$)
0x0aa9…0abc LineComalBin {
0x0aa9…0abc ptr = 0x9813 // 0xaa9 @0x0
0x0aa9…0abc lno = 0x0488 // 0xaab @0x2
0x0aa9…0abc at0004 = ╱9d╱ EXEC ╱ // 0xaad @0x4
0x0aa9…0abc at0005 = ╱46╱F╱ // 0xaae @0x5
0x0aa9…0abc at0006 = ╱45╱E╱ // 0xaaf @0x6
0x0aa9…0abc at0007 = ╱4a╱J╱ // 0xab0 @0x7
0x0aa9…0abc at0008 = ╱4c╱L╱ // 0xab1 @0x8
0x0aa9…0abc at0009 = ╱ed╱(╱ // 0xab2 @0x9
0x0aa9…0abc at000a = ╱57╱W╱ // 0xab3 @0xa
0x0aa9…0abc at000b = ╱ec╱,╱ // 0xab4 @0xb
0x0aa9…0abc at000c = ╱47╱G╱ // 0xab5 @0xc
0x0aa9…0abc at000d = ╱ec╱,╱ // 0xab6 @0xd
0x0aa9…0abc at000e = ╱4b╱K╱ // 0xab7 @0xe
0x0aa9…0abc at000f = ╱31╱1╱ // 0xab8 @0xf
0x0aa9…0abc at0010 = ╱ef╱$╱ // 0xab9 @0x10
0x0aa9…0abc at0011 = ╱ee╱)╱ // 0xaba @0x11
0x0aa9…0abc at0012 = EOL // 0xabb @0x12
0x0aa9…0abc }
0x0abc…0ae2 9839 1170 GET K1$,4:MKPOST,MFAK,MVGR,MKGR
0x0abc…0ae2 LineComalBin {
0x0abc…0ae2 ptr = 0x9839 // 0xabc @0x0
0x0abc…0ae2 lno = 0x0492 // 0xabe @0x2
0x0abc…0ae2 at0004 = ╱a9╱ GET ╱ // 0xac0 @0x4
0x0abc…0ae2 at0005 = ╱4b╱K╱ // 0xac1 @0x5
0x0abc…0ae2 at0006 = ╱31╱1╱ // 0xac2 @0x6
0x0abc…0ae2 at0007 = ╱ef╱$╱ // 0xac3 @0x7
0x0abc…0ae2 at0008 = ╱ec╱,╱ // 0xac4 @0x8
0x0abc…0ae2 at0009 = ╱34╱4╱ // 0xac5 @0x9
0x0abc…0ae2 at000a = ╱fe00008003╱ // 0xac6 @0xa
0x0abc…0ae2 at000f = ╱f0╱:╱ // 0xacb @0xf
0x0abc…0ae2 at0010 = ╱4d╱M╱ // 0xacc @0x10
0x0abc…0ae2 at0011 = ╱4b╱K╱ // 0xacd @0x11
0x0abc…0ae2 at0012 = ╱50╱P╱ // 0xace @0x12
0x0abc…0ae2 at0013 = ╱4f╱O╱ // 0xacf @0x13
0x0abc…0ae2 at0014 = ╱53╱S╱ // 0xad0 @0x14
0x0abc…0ae2 at0015 = ╱54╱T╱ // 0xad1 @0x15
0x0abc…0ae2 at0016 = ╱ec╱,╱ // 0xad2 @0x16
0x0abc…0ae2 at0017 = ╱4d╱M╱ // 0xad3 @0x17
0x0abc…0ae2 at0018 = ╱46╱F╱ // 0xad4 @0x18
0x0abc…0ae2 at0019 = ╱41╱A╱ // 0xad5 @0x19
0x0abc…0ae2 at001a = ╱4b╱K╱ // 0xad6 @0x1a
0x0abc…0ae2 at001b = ╱ec╱,╱ // 0xad7 @0x1b
0x0abc…0ae2 at001c = ╱4d╱M╱ // 0xad8 @0x1c
0x0abc…0ae2 at001d = ╱56╱V╱ // 0xad9 @0x1d
0x0abc…0ae2 at001e = ╱47╱G╱ // 0xada @0x1e
0x0abc…0ae2 at001f = ╱52╱R╱ // 0xadb @0x1f
0x0abc…0ae2 at0020 = ╱ec╱,╱ // 0xadc @0x20
0x0abc…0ae2 at0021 = ╱4d╱M╱ // 0xadd @0x21
0x0abc…0ae2 at0022 = ╱4b╱K╱ // 0xade @0x22
0x0abc…0ae2 at0023 = ╱47╱G╱ // 0xadf @0x23
0x0abc…0ae2 at0024 = ╱52╱R╱ // 0xae0 @0x24
0x0abc…0ae2 at0025 = EOL // 0xae1 @0x25
0x0abc…0ae2 }
0x0ae2…0af5 984c 1180 EXEC FEJL(W,V,K1$)
0x0ae2…0af5 LineComalBin {
0x0ae2…0af5 ptr = 0x984c // 0xae2 @0x0
0x0ae2…0af5 lno = 0x049c // 0xae4 @0x2
0x0ae2…0af5 at0004 = ╱9d╱ EXEC ╱ // 0xae6 @0x4
0x0ae2…0af5 at0005 = ╱46╱F╱ // 0xae7 @0x5
0x0ae2…0af5 at0006 = ╱45╱E╱ // 0xae8 @0x6
0x0ae2…0af5 at0007 = ╱4a╱J╱ // 0xae9 @0x7
0x0ae2…0af5 at0008 = ╱4c╱L╱ // 0xaea @0x8
0x0ae2…0af5 at0009 = ╱ed╱(╱ // 0xaeb @0x9
0x0ae2…0af5 at000a = ╱57╱W╱ // 0xaec @0xa
0x0ae2…0af5 at000b = ╱ec╱,╱ // 0xaed @0xb
0x0ae2…0af5 at000c = ╱56╱V╱ // 0xaee @0xc
0x0ae2…0af5 at000d = ╱ec╱,╱ // 0xaef @0xd
0x0ae2…0af5 at000e = ╱4b╱K╱ // 0xaf0 @0xe
0x0ae2…0af5 at000f = ╱31╱1╱ // 0xaf1 @0xf
0x0ae2…0af5 at0010 = ╱ef╱$╱ // 0xaf2 @0x10
0x0ae2…0af5 at0011 = ╱ee╱)╱ // 0xaf3 @0x11
0x0ae2…0af5 at0012 = EOL // 0xaf4 @0x12
0x0ae2…0af5 }
0x0af5…0b0b 9862 1190 GET K1$,5:MKRGR
0x0af5…0b0b LineComalBin {
0x0af5…0b0b ptr = 0x9862 // 0xaf5 @0x0
0x0af5…0b0b lno = 0x04a6 // 0xaf7 @0x2
0x0af5…0b0b at0004 = ╱a9╱ GET ╱ // 0xaf9 @0x4
0x0af5…0b0b at0005 = ╱4b╱K╱ // 0xafa @0x5
0x0af5…0b0b at0006 = ╱31╱1╱ // 0xafb @0x6
0x0af5…0b0b at0007 = ╱ef╱$╱ // 0xafc @0x7
0x0af5…0b0b at0008 = ╱ec╱,╱ // 0xafd @0x8
0x0af5…0b0b at0009 = ╱35╱5╱ // 0xafe @0x9
0x0af5…0b0b at000a = ╱fe0000a003╱ // 0xaff @0xa
0x0af5…0b0b at000f = ╱f0╱:╱ // 0xb04 @0xf
0x0af5…0b0b at0010 = ╱4d╱M╱ // 0xb05 @0x10
0x0af5…0b0b at0011 = ╱4b╱K╱ // 0xb06 @0x11
0x0af5…0b0b at0012 = ╱52╱R╱ // 0xb07 @0x12
0x0af5…0b0b at0013 = ╱47╱G╱ // 0xb08 @0x13
0x0af5…0b0b at0014 = ╱52╱R╱ // 0xb09 @0x14
0x0af5…0b0b at0015 = EOL // 0xb0a @0x15
0x0af5…0b0b }
0x0b0b…0b23 987a 1200 EXEC FEJL(W,4,K1$)
0x0b0b…0b23 LineComalBin {
0x0b0b…0b23 ptr = 0x987a // 0xb0b @0x0
0x0b0b…0b23 lno = 0x04b0 // 0xb0d @0x2
0x0b0b…0b23 at0004 = ╱9d╱ EXEC ╱ // 0xb0f @0x4
0x0b0b…0b23 at0005 = ╱46╱F╱ // 0xb10 @0x5
0x0b0b…0b23 at0006 = ╱45╱E╱ // 0xb11 @0x6
0x0b0b…0b23 at0007 = ╱4a╱J╱ // 0xb12 @0x7
0x0b0b…0b23 at0008 = ╱4c╱L╱ // 0xb13 @0x8
0x0b0b…0b23 at0009 = ╱ed╱(╱ // 0xb14 @0x9
0x0b0b…0b23 at000a = ╱57╱W╱ // 0xb15 @0xa
0x0b0b…0b23 at000b = ╱ec╱,╱ // 0xb16 @0xb
0x0b0b…0b23 at000c = ╱34╱4╱ // 0xb17 @0xc
0x0b0b…0b23 at000d = ╱fe00008003╱ // 0xb18 @0xd
0x0b0b…0b23 at0012 = ╱ec╱,╱ // 0xb1d @0x12
0x0b0b…0b23 at0013 = ╱4b╱K╱ // 0xb1e @0x13
0x0b0b…0b23 at0014 = ╱31╱1╱ // 0xb1f @0x14
0x0b0b…0b23 at0015 = ╱ef╱$╱ // 0xb20 @0x15
0x0b0b…0b23 at0016 = ╱ee╱)╱ // 0xb21 @0x16
0x0b0b…0b23 at0017 = EOL // 0xb22 @0x17
0x0b0b…0b23 }
0x0b23…0b4b 98a2 1210 GET K1$,8:DIVNR,DIVDNR,DIFNR,DTAL
0x0b23…0b4b LineComalBin {
0x0b23…0b4b ptr = 0x98a2 // 0xb23 @0x0
0x0b23…0b4b lno = 0x04ba // 0xb25 @0x2
0x0b23…0b4b at0004 = ╱a9╱ GET ╱ // 0xb27 @0x4
0x0b23…0b4b at0005 = ╱4b╱K╱ // 0xb28 @0x5
0x0b23…0b4b at0006 = ╱31╱1╱ // 0xb29 @0x6
0x0b23…0b4b at0007 = ╱ef╱$╱ // 0xb2a @0x7
0x0b23…0b4b at0008 = ╱ec╱,╱ // 0xb2b @0x8
0x0b23…0b4b at0009 = ╱38╱8╱ // 0xb2c @0x9
0x0b23…0b4b at000a = ╱fe00008004╱ // 0xb2d @0xa
0x0b23…0b4b at000f = ╱f0╱:╱ // 0xb32 @0xf
0x0b23…0b4b at0010 = ╱44╱D╱ // 0xb33 @0x10
0x0b23…0b4b at0011 = ╱49╱I╱ // 0xb34 @0x11
0x0b23…0b4b at0012 = ╱56╱V╱ // 0xb35 @0x12
0x0b23…0b4b at0013 = ╱4e╱N╱ // 0xb36 @0x13
0x0b23…0b4b at0014 = ╱52╱R╱ // 0xb37 @0x14
0x0b23…0b4b at0015 = ╱ec╱,╱ // 0xb38 @0x15
0x0b23…0b4b at0016 = ╱44╱D╱ // 0xb39 @0x16
0x0b23…0b4b at0017 = ╱49╱I╱ // 0xb3a @0x17
0x0b23…0b4b at0018 = ╱56╱V╱ // 0xb3b @0x18
0x0b23…0b4b at0019 = ╱44╱D╱ // 0xb3c @0x19
0x0b23…0b4b at001a = ╱4e╱N╱ // 0xb3d @0x1a
0x0b23…0b4b at001b = ╱52╱R╱ // 0xb3e @0x1b
0x0b23…0b4b at001c = ╱ec╱,╱ // 0xb3f @0x1c
0x0b23…0b4b at001d = ╱44╱D╱ // 0xb40 @0x1d
0x0b23…0b4b at001e = ╱49╱I╱ // 0xb41 @0x1e
0x0b23…0b4b at001f = ╱46╱F╱ // 0xb42 @0x1f
0x0b23…0b4b at0020 = ╱4e╱N╱ // 0xb43 @0x20
0x0b23…0b4b at0021 = ╱52╱R╱ // 0xb44 @0x21
0x0b23…0b4b at0022 = ╱ec╱,╱ // 0xb45 @0x22
0x0b23…0b4b at0023 = ╱44╱D╱ // 0xb46 @0x23
0x0b23…0b4b at0024 = ╱54╱T╱ // 0xb47 @0x24
0x0b23…0b4b at0025 = ╱41╱A╱ // 0xb48 @0x25
0x0b23…0b4b at0026 = ╱4c╱L╱ // 0xb49 @0x26
0x0b23…0b4b at0027 = EOL // 0xb4a @0x27
0x0b23…0b4b }
0x0b4b…0b63 98ba 1220 EXEC FEJL(W,5,K1$)
0x0b4b…0b63 LineComalBin {
0x0b4b…0b63 ptr = 0x98ba // 0xb4b @0x0
0x0b4b…0b63 lno = 0x04c4 // 0xb4d @0x2
0x0b4b…0b63 at0004 = ╱9d╱ EXEC ╱ // 0xb4f @0x4
0x0b4b…0b63 at0005 = ╱46╱F╱ // 0xb50 @0x5
0x0b4b…0b63 at0006 = ╱45╱E╱ // 0xb51 @0x6
0x0b4b…0b63 at0007 = ╱4a╱J╱ // 0xb52 @0x7
0x0b4b…0b63 at0008 = ╱4c╱L╱ // 0xb53 @0x8
0x0b4b…0b63 at0009 = ╱ed╱(╱ // 0xb54 @0x9
0x0b4b…0b63 at000a = ╱57╱W╱ // 0xb55 @0xa
0x0b4b…0b63 at000b = ╱ec╱,╱ // 0xb56 @0xb
0x0b4b…0b63 at000c = ╱35╱5╱ // 0xb57 @0xc
0x0b4b…0b63 at000d = ╱fe0000a003╱ // 0xb58 @0xd
0x0b4b…0b63 at0012 = ╱ec╱,╱ // 0xb5d @0x12
0x0b4b…0b63 at0013 = ╱4b╱K╱ // 0xb5e @0x13
0x0b4b…0b63 at0014 = ╱31╱1╱ // 0xb5f @0x14
0x0b4b…0b63 at0015 = ╱ef╱$╱ // 0xb60 @0x15
0x0b4b…0b63 at0016 = ╱ee╱)╱ // 0xb61 @0x16
0x0b4b…0b63 at0017 = EOL // 0xb62 @0x17
0x0b4b…0b63 }
0x0b63…0b74 98cb 1230 GET K1$,W:KRTAL
0x0b63…0b74 LineComalBin {
0x0b63…0b74 ptr = 0x98cb // 0xb63 @0x0
0x0b63…0b74 lno = 0x04ce // 0xb65 @0x2
0x0b63…0b74 at0004 = ╱a9╱ GET ╱ // 0xb67 @0x4
0x0b63…0b74 at0005 = ╱4b╱K╱ // 0xb68 @0x5
0x0b63…0b74 at0006 = ╱31╱1╱ // 0xb69 @0x6
0x0b63…0b74 at0007 = ╱ef╱$╱ // 0xb6a @0x7
0x0b63…0b74 at0008 = ╱ec╱,╱ // 0xb6b @0x8
0x0b63…0b74 at0009 = ╱57╱W╱ // 0xb6c @0x9
0x0b63…0b74 at000a = ╱f0╱:╱ // 0xb6d @0xa
0x0b63…0b74 at000b = ╱4b╱K╱ // 0xb6e @0xb
0x0b63…0b74 at000c = ╱52╱R╱ // 0xb6f @0xc
0x0b63…0b74 at000d = ╱54╱T╱ // 0xb70 @0xd
0x0b63…0b74 at000e = ╱41╱A╱ // 0xb71 @0xe
0x0b63…0b74 at000f = ╱4c╱L╱ // 0xb72 @0xf
0x0b63…0b74 at0010 = EOL // 0xb73 @0x10
0x0b63…0b74 }
0x0b74…0b8c 98e3 1240 EXEC FEJL(W,6,K1$)
0x0b74…0b8c LineComalBin {
0x0b74…0b8c ptr = 0x98e3 // 0xb74 @0x0
0x0b74…0b8c lno = 0x04d8 // 0xb76 @0x2
0x0b74…0b8c at0004 = ╱9d╱ EXEC ╱ // 0xb78 @0x4
0x0b74…0b8c at0005 = ╱46╱F╱ // 0xb79 @0x5
0x0b74…0b8c at0006 = ╱45╱E╱ // 0xb7a @0x6
0x0b74…0b8c at0007 = ╱4a╱J╱ // 0xb7b @0x7
0x0b74…0b8c at0008 = ╱4c╱L╱ // 0xb7c @0x8
0x0b74…0b8c at0009 = ╱ed╱(╱ // 0xb7d @0x9
0x0b74…0b8c at000a = ╱57╱W╱ // 0xb7e @0xa
0x0b74…0b8c at000b = ╱ec╱,╱ // 0xb7f @0xb
0x0b74…0b8c at000c = ╱36╱6╱ // 0xb80 @0xc
0x0b74…0b8c at000d = ╱fe0000c003╱ // 0xb81 @0xd
0x0b74…0b8c at0012 = ╱ec╱,╱ // 0xb86 @0x12
0x0b74…0b8c at0013 = ╱4b╱K╱ // 0xb87 @0x13
0x0b74…0b8c at0014 = ╱31╱1╱ // 0xb88 @0x14
0x0b74…0b8c at0015 = ╱ef╱$╱ // 0xb89 @0x15
0x0b74…0b8c at0016 = ╱ee╱)╱ // 0xb8a @0x16
0x0b74…0b8c at0017 = EOL // 0xb8b @0x17
0x0b74…0b8c }
0x0b8c…0ba0 98f7 1250 GET K1$,10:N$
0x0b8c…0ba0 LineComalBin {
0x0b8c…0ba0 ptr = 0x98f7 // 0xb8c @0x0
0x0b8c…0ba0 lno = 0x04e2 // 0xb8e @0x2
0x0b8c…0ba0 at0004 = ╱a9╱ GET ╱ // 0xb90 @0x4
0x0b8c…0ba0 at0005 = ╱4b╱K╱ // 0xb91 @0x5
0x0b8c…0ba0 at0006 = ╱31╱1╱ // 0xb92 @0x6
0x0b8c…0ba0 at0007 = ╱ef╱$╱ // 0xb93 @0x7
0x0b8c…0ba0 at0008 = ╱ec╱,╱ // 0xb94 @0x8
0x0b8c…0ba0 at0009 = ╱31╱1╱ // 0xb95 @0x9
0x0b8c…0ba0 at000a = ╱30╱0╱ // 0xb96 @0xa
0x0b8c…0ba0 at000b = ╱fe0000a004╱ // 0xb97 @0xb
0x0b8c…0ba0 at0010 = ╱f0╱:╱ // 0xb9c @0x10
0x0b8c…0ba0 at0011 = ╱4e╱N╱ // 0xb9d @0x11
0x0b8c…0ba0 at0012 = ╱ef╱$╱ // 0xb9e @0x12
0x0b8c…0ba0 at0013 = EOL // 0xb9f @0x13
0x0b8c…0ba0 }
0x0ba0…0bb8 990f 1260 EXEC FEJL(W,7,K1$)
0x0ba0…0bb8 LineComalBin {
0x0ba0…0bb8 ptr = 0x990f // 0xba0 @0x0
0x0ba0…0bb8 lno = 0x04ec // 0xba2 @0x2
0x0ba0…0bb8 at0004 = ╱9d╱ EXEC ╱ // 0xba4 @0x4
0x0ba0…0bb8 at0005 = ╱46╱F╱ // 0xba5 @0x5
0x0ba0…0bb8 at0006 = ╱45╱E╱ // 0xba6 @0x6
0x0ba0…0bb8 at0007 = ╱4a╱J╱ // 0xba7 @0x7
0x0ba0…0bb8 at0008 = ╱4c╱L╱ // 0xba8 @0x8
0x0ba0…0bb8 at0009 = ╱ed╱(╱ // 0xba9 @0x9
0x0ba0…0bb8 at000a = ╱57╱W╱ // 0xbaa @0xa
0x0ba0…0bb8 at000b = ╱ec╱,╱ // 0xbab @0xb
0x0ba0…0bb8 at000c = ╱37╱7╱ // 0xbac @0xc
0x0ba0…0bb8 at000d = ╱fe0000e003╱ // 0xbad @0xd
0x0ba0…0bb8 at0012 = ╱ec╱,╱ // 0xbb2 @0x12
0x0ba0…0bb8 at0013 = ╱4b╱K╱ // 0xbb3 @0x13
0x0ba0…0bb8 at0014 = ╱31╱1╱ // 0xbb4 @0x14
0x0ba0…0bb8 at0015 = ╱ef╱$╱ // 0xbb5 @0x15
0x0ba0…0bb8 at0016 = ╱ee╱)╱ // 0xbb6 @0x16
0x0ba0…0bb8 at0017 = EOL // 0xbb7 @0x17
0x0ba0…0bb8 }
0x0bb8…0bcd 9924 1270 GET K1$,11:K2$
0x0bb8…0bcd LineComalBin {
0x0bb8…0bcd ptr = 0x9924 // 0xbb8 @0x0
0x0bb8…0bcd lno = 0x04f6 // 0xbba @0x2
0x0bb8…0bcd at0004 = ╱a9╱ GET ╱ // 0xbbc @0x4
0x0bb8…0bcd at0005 = ╱4b╱K╱ // 0xbbd @0x5
0x0bb8…0bcd at0006 = ╱31╱1╱ // 0xbbe @0x6
0x0bb8…0bcd at0007 = ╱ef╱$╱ // 0xbbf @0x7
0x0bb8…0bcd at0008 = ╱ec╱,╱ // 0xbc0 @0x8
0x0bb8…0bcd at0009 = ╱31╱1╱ // 0xbc1 @0x9
0x0bb8…0bcd at000a = ╱31╱1╱ // 0xbc2 @0xa
0x0bb8…0bcd at000b = ╱fe0000b004╱ // 0xbc3 @0xb
0x0bb8…0bcd at0010 = ╱f0╱:╱ // 0xbc8 @0x10
0x0bb8…0bcd at0011 = ╱4b╱K╱ // 0xbc9 @0x11
0x0bb8…0bcd at0012 = ╱32╱2╱ // 0xbca @0x12
0x0bb8…0bcd at0013 = ╱ef╱$╱ // 0xbcb @0x13
0x0bb8…0bcd at0014 = EOL // 0xbcc @0x14
0x0bb8…0bcd }
0x0bcd…0be5 993c 1280 EXEC FEJL(W,8,K1$)
0x0bcd…0be5 LineComalBin {
0x0bcd…0be5 ptr = 0x993c // 0xbcd @0x0
0x0bcd…0be5 lno = 0x0500 // 0xbcf @0x2
0x0bcd…0be5 at0004 = ╱9d╱ EXEC ╱ // 0xbd1 @0x4
0x0bcd…0be5 at0005 = ╱46╱F╱ // 0xbd2 @0x5
0x0bcd…0be5 at0006 = ╱45╱E╱ // 0xbd3 @0x6
0x0bcd…0be5 at0007 = ╱4a╱J╱ // 0xbd4 @0x7
0x0bcd…0be5 at0008 = ╱4c╱L╱ // 0xbd5 @0x8
0x0bcd…0be5 at0009 = ╱ed╱(╱ // 0xbd6 @0x9
0x0bcd…0be5 at000a = ╱57╱W╱ // 0xbd7 @0xa
0x0bcd…0be5 at000b = ╱ec╱,╱ // 0xbd8 @0xb
0x0bcd…0be5 at000c = ╱38╱8╱ // 0xbd9 @0xc
0x0bcd…0be5 at000d = ╱fe00008004╱ // 0xbda @0xd
0x0bcd…0be5 at0012 = ╱ec╱,╱ // 0xbdf @0x12
0x0bcd…0be5 at0013 = ╱4b╱K╱ // 0xbe0 @0x13
0x0bcd…0be5 at0014 = ╱31╱1╱ // 0xbe1 @0x14
0x0bcd…0be5 at0015 = ╱ef╱$╱ // 0xbe2 @0x15
0x0bcd…0be5 at0016 = ╱ee╱)╱ // 0xbe3 @0x16
0x0bcd…0be5 at0017 = EOL // 0xbe4 @0x17
0x0bcd…0be5 }
0x0be5…0bfa 9951 1290 GET K1$,15:K3$
0x0be5…0bfa LineComalBin {
0x0be5…0bfa ptr = 0x9951 // 0xbe5 @0x0
0x0be5…0bfa lno = 0x050a // 0xbe7 @0x2
0x0be5…0bfa at0004 = ╱a9╱ GET ╱ // 0xbe9 @0x4
0x0be5…0bfa at0005 = ╱4b╱K╱ // 0xbea @0x5
0x0be5…0bfa at0006 = ╱31╱1╱ // 0xbeb @0x6
0x0be5…0bfa at0007 = ╱ef╱$╱ // 0xbec @0x7
0x0be5…0bfa at0008 = ╱ec╱,╱ // 0xbed @0x8
0x0be5…0bfa at0009 = ╱31╱1╱ // 0xbee @0x9
0x0be5…0bfa at000a = ╱35╱5╱ // 0xbef @0xa
0x0be5…0bfa at000b = ╱fe0000f004╱ // 0xbf0 @0xb
0x0be5…0bfa at0010 = ╱f0╱:╱ // 0xbf5 @0x10
0x0be5…0bfa at0011 = ╱4b╱K╱ // 0xbf6 @0x11
0x0be5…0bfa at0012 = ╱33╱3╱ // 0xbf7 @0x12
0x0be5…0bfa at0013 = ╱ef╱$╱ // 0xbf8 @0x13
0x0be5…0bfa at0014 = EOL // 0xbf9 @0x14
0x0be5…0bfa }
0x0bfa…0c0d 9964 1300 EXEC FEJL(W,W,K1$)
0x0bfa…0c0d LineComalBin {
0x0bfa…0c0d ptr = 0x9964 // 0xbfa @0x0
0x0bfa…0c0d lno = 0x0514 // 0xbfc @0x2
0x0bfa…0c0d at0004 = ╱9d╱ EXEC ╱ // 0xbfe @0x4
0x0bfa…0c0d at0005 = ╱46╱F╱ // 0xbff @0x5
0x0bfa…0c0d at0006 = ╱45╱E╱ // 0xc00 @0x6
0x0bfa…0c0d at0007 = ╱4a╱J╱ // 0xc01 @0x7
0x0bfa…0c0d at0008 = ╱4c╱L╱ // 0xc02 @0x8
0x0bfa…0c0d at0009 = ╱ed╱(╱ // 0xc03 @0x9
0x0bfa…0c0d at000a = ╱57╱W╱ // 0xc04 @0xa
0x0bfa…0c0d at000b = ╱ec╱,╱ // 0xc05 @0xb
0x0bfa…0c0d at000c = ╱57╱W╱ // 0xc06 @0xc
0x0bfa…0c0d at000d = ╱ec╱,╱ // 0xc07 @0xd
0x0bfa…0c0d at000e = ╱4b╱K╱ // 0xc08 @0xe
0x0bfa…0c0d at000f = ╱31╱1╱ // 0xc09 @0xf
0x0bfa…0c0d at0010 = ╱ef╱$╱ // 0xc0a @0x10
0x0bfa…0c0d at0011 = ╱ee╱)╱ // 0xc0b @0x11
0x0bfa…0c0d at0012 = EOL // 0xc0c @0x12
0x0bfa…0c0d }
0x0c0d…0c22 9979 1310 GET K1$,36:K4$
0x0c0d…0c22 LineComalBin {
0x0c0d…0c22 ptr = 0x9979 // 0xc0d @0x0
0x0c0d…0c22 lno = 0x051e // 0xc0f @0x2
0x0c0d…0c22 at0004 = ╱a9╱ GET ╱ // 0xc11 @0x4
0x0c0d…0c22 at0005 = ╱4b╱K╱ // 0xc12 @0x5
0x0c0d…0c22 at0006 = ╱31╱1╱ // 0xc13 @0x6
0x0c0d…0c22 at0007 = ╱ef╱$╱ // 0xc14 @0x7
0x0c0d…0c22 at0008 = ╱ec╱,╱ // 0xc15 @0x8
0x0c0d…0c22 at0009 = ╱33╱3╱ // 0xc16 @0x9
0x0c0d…0c22 at000a = ╱36╱6╱ // 0xc17 @0xa
0x0c0d…0c22 at000b = ╱fe00009006╱ // 0xc18 @0xb
0x0c0d…0c22 at0010 = ╱f0╱:╱ // 0xc1d @0x10
0x0c0d…0c22 at0011 = ╱4b╱K╱ // 0xc1e @0x11
0x0c0d…0c22 at0012 = ╱34╱4╱ // 0xc1f @0x12
0x0c0d…0c22 at0013 = ╱ef╱$╱ // 0xc20 @0x13
0x0c0d…0c22 at0014 = EOL // 0xc21 @0x14
0x0c0d…0c22 }
0x0c22…0c3b 9992 1320 EXEC FEJL(W,10,K1$)
0x0c22…0c3b LineComalBin {
0x0c22…0c3b ptr = 0x9992 // 0xc22 @0x0
0x0c22…0c3b lno = 0x0528 // 0xc24 @0x2
0x0c22…0c3b at0004 = ╱9d╱ EXEC ╱ // 0xc26 @0x4
0x0c22…0c3b at0005 = ╱46╱F╱ // 0xc27 @0x5
0x0c22…0c3b at0006 = ╱45╱E╱ // 0xc28 @0x6
0x0c22…0c3b at0007 = ╱4a╱J╱ // 0xc29 @0x7
0x0c22…0c3b at0008 = ╱4c╱L╱ // 0xc2a @0x8
0x0c22…0c3b at0009 = ╱ed╱(╱ // 0xc2b @0x9
0x0c22…0c3b at000a = ╱57╱W╱ // 0xc2c @0xa
0x0c22…0c3b at000b = ╱ec╱,╱ // 0xc2d @0xb
0x0c22…0c3b at000c = ╱31╱1╱ // 0xc2e @0xc
0x0c22…0c3b at000d = ╱30╱0╱ // 0xc2f @0xd
0x0c22…0c3b at000e = ╱fe0000a004╱ // 0xc30 @0xe
0x0c22…0c3b at0013 = ╱ec╱,╱ // 0xc35 @0x13
0x0c22…0c3b at0014 = ╱4b╱K╱ // 0xc36 @0x14
0x0c22…0c3b at0015 = ╱31╱1╱ // 0xc37 @0x15
0x0c22…0c3b at0016 = ╱ef╱$╱ // 0xc38 @0x16
0x0c22…0c3b at0017 = ╱ee╱)╱ // 0xc39 @0x17
0x0c22…0c3b at0018 = EOL // 0xc3a @0x18
0x0c22…0c3b }
0x0c3b…0c44 999b 1330 CLOSE K1$
0x0c3b…0c44 LineComalBin {
0x0c3b…0c44 ptr = 0x999b // 0xc3b @0x0
0x0c3b…0c44 lno = 0x0532 // 0xc3d @0x2
0x0c3b…0c44 at0004 = ╱a8╱ CLOSE ╱ // 0xc3f @0x4
0x0c3b…0c44 at0005 = ╱4b╱K╱ // 0xc40 @0x5
0x0c3b…0c44 at0006 = ╱31╱1╱ // 0xc41 @0x6
0x0c3b…0c44 at0007 = ╱ef╱$╱ // 0xc42 @0x7
0x0c3b…0c44 at0008 = EOL // 0xc43 @0x8
0x0c3b…0c44 }
0x0c44…0c5d 99b4 1340 EXEC FEJL(W,11,K1$)
0x0c44…0c5d LineComalBin {
0x0c44…0c5d ptr = 0x99b4 // 0xc44 @0x0
0x0c44…0c5d lno = 0x053c // 0xc46 @0x2
0x0c44…0c5d at0004 = ╱9d╱ EXEC ╱ // 0xc48 @0x4
0x0c44…0c5d at0005 = ╱46╱F╱ // 0xc49 @0x5
0x0c44…0c5d at0006 = ╱45╱E╱ // 0xc4a @0x6
0x0c44…0c5d at0007 = ╱4a╱J╱ // 0xc4b @0x7
0x0c44…0c5d at0008 = ╱4c╱L╱ // 0xc4c @0x8
0x0c44…0c5d at0009 = ╱ed╱(╱ // 0xc4d @0x9
0x0c44…0c5d at000a = ╱57╱W╱ // 0xc4e @0xa
0x0c44…0c5d at000b = ╱ec╱,╱ // 0xc4f @0xb
0x0c44…0c5d at000c = ╱31╱1╱ // 0xc50 @0xc
0x0c44…0c5d at000d = ╱31╱1╱ // 0xc51 @0xd
0x0c44…0c5d at000e = ╱fe0000b004╱ // 0xc52 @0xe
0x0c44…0c5d at0013 = ╱ec╱,╱ // 0xc57 @0x13
0x0c44…0c5d at0014 = ╱4b╱K╱ // 0xc58 @0x14
0x0c44…0c5d at0015 = ╱31╱1╱ // 0xc59 @0x15
0x0c44…0c5d at0016 = ╱ef╱$╱ // 0xc5a @0x16
0x0c44…0c5d at0017 = ╱ee╱)╱ // 0xc5b @0x17
0x0c44…0c5d at0018 = EOL // 0xc5c @0x18
0x0c44…0c5d }
0x0c5d…0c77 99ce 1350 K2$=N$+K2$;K3$=N$+K3$
0x0c5d…0c77 LineComalBin {
0x0c5d…0c77 ptr = 0x99ce // 0xc5d @0x0
0x0c5d…0c77 lno = 0x0546 // 0xc5f @0x2
0x0c5d…0c77 at0004 = ╱4b╱K╱ // 0xc61 @0x4
0x0c5d…0c77 at0005 = ╱32╱2╱ // 0xc62 @0x5
0x0c5d…0c77 at0006 = ╱ef╱$╱ // 0xc63 @0x6
0x0c5d…0c77 at0007 = ╱dc╱=╱ // 0xc64 @0x7
0x0c5d…0c77 at0008 = ╱4e╱N╱ // 0xc65 @0x8
0x0c5d…0c77 at0009 = ╱ef╱$╱ // 0xc66 @0x9
0x0c5d…0c77 at000a = ╱f1╱+╱ // 0xc67 @0xa
0x0c5d…0c77 at000b = ╱4b╱K╱ // 0xc68 @0xb
0x0c5d…0c77 at000c = ╱32╱2╱ // 0xc69 @0xc
0x0c5d…0c77 at000d = ╱ef╱$╱ // 0xc6a @0xd
0x0c5d…0c77 at000e = ╱eb╱;╱ // 0xc6b @0xe
0x0c5d…0c77 at000f = ╱4b╱K╱ // 0xc6c @0xf
0x0c5d…0c77 at0010 = ╱33╱3╱ // 0xc6d @0x10
0x0c5d…0c77 at0011 = ╱ef╱$╱ // 0xc6e @0x11
0x0c5d…0c77 at0012 = ╱dc╱=╱ // 0xc6f @0x12
0x0c5d…0c77 at0013 = ╱4e╱N╱ // 0xc70 @0x13
0x0c5d…0c77 at0014 = ╱ef╱$╱ // 0xc71 @0x14
0x0c5d…0c77 at0015 = ╱f1╱+╱ // 0xc72 @0x15
0x0c5d…0c77 at0016 = ╱4b╱K╱ // 0xc73 @0x16
0x0c5d…0c77 at0017 = ╱33╱3╱ // 0xc74 @0x17
0x0c5d…0c77 at0018 = ╱ef╱$╱ // 0xc75 @0x18
0x0c5d…0c77 at0019 = EOL // 0xc76 @0x19
0x0c5d…0c77 }
0x0c77…0c86 99dd 1360 K4$=N$+K4$
0x0c77…0c86 LineComalBin {
0x0c77…0c86 ptr = 0x99dd // 0xc77 @0x0
0x0c77…0c86 lno = 0x0550 // 0xc79 @0x2
0x0c77…0c86 at0004 = ╱4b╱K╱ // 0xc7b @0x4
0x0c77…0c86 at0005 = ╱34╱4╱ // 0xc7c @0x5
0x0c77…0c86 at0006 = ╱ef╱$╱ // 0xc7d @0x6
0x0c77…0c86 at0007 = ╱dc╱=╱ // 0xc7e @0x7
0x0c77…0c86 at0008 = ╱4e╱N╱ // 0xc7f @0x8
0x0c77…0c86 at0009 = ╱ef╱$╱ // 0xc80 @0x9
0x0c77…0c86 at000a = ╱f1╱+╱ // 0xc81 @0xa
0x0c77…0c86 at000b = ╱4b╱K╱ // 0xc82 @0xb
0x0c77…0c86 at000c = ╱34╱4╱ // 0xc83 @0xc
0x0c77…0c86 at000d = ╱ef╱$╱ // 0xc84 @0xd
0x0c77…0c86 at000e = EOL // 0xc85 @0xe
0x0c77…0c86 }
0x0c86…0c9b 99f2 1370 DIM FTAB(MFANTAL,G)
0x0c86…0c9b LineComalBin {
0x0c86…0c9b ptr = 0x99f2 // 0xc86 @0x0
0x0c86…0c9b lno = 0x055a // 0xc88 @0x2
0x0c86…0c9b at0004 = ╱87╱ DIM ╱ // 0xc8a @0x4
0x0c86…0c9b at0005 = ╱46╱F╱ // 0xc8b @0x5
0x0c86…0c9b at0006 = ╱54╱T╱ // 0xc8c @0x6
0x0c86…0c9b at0007 = ╱41╱A╱ // 0xc8d @0x7
0x0c86…0c9b at0008 = ╱42╱B╱ // 0xc8e @0x8
0x0c86…0c9b at0009 = ╱ed╱(╱ // 0xc8f @0x9
0x0c86…0c9b at000a = ╱4d╱M╱ // 0xc90 @0xa
0x0c86…0c9b at000b = ╱46╱F╱ // 0xc91 @0xb
0x0c86…0c9b at000c = ╱41╱A╱ // 0xc92 @0xc
0x0c86…0c9b at000d = ╱4e╱N╱ // 0xc93 @0xd
0x0c86…0c9b at000e = ╱54╱T╱ // 0xc94 @0xe
0x0c86…0c9b at000f = ╱41╱A╱ // 0xc95 @0xf
0x0c86…0c9b at0010 = ╱4c╱L╱ // 0xc96 @0x10
0x0c86…0c9b at0011 = ╱ec╱,╱ // 0xc97 @0x11
0x0c86…0c9b at0012 = ╱47╱G╱ // 0xc98 @0x12
0x0c86…0c9b at0013 = ╱ee╱)╱ // 0xc99 @0x13
0x0c86…0c9b at0014 = EOL // 0xc9a @0x14
0x0c86…0c9b }
0x0c9b…0ca6 99fd 1380 OPEN K4$,R
0x0c9b…0ca6 LineComalBin {
0x0c9b…0ca6 ptr = 0x99fd // 0xc9b @0x0
0x0c9b…0ca6 lno = 0x0564 // 0xc9d @0x2
0x0c9b…0ca6 at0004 = ╱a7╱ OPEN ╱ // 0xc9f @0x4
0x0c9b…0ca6 at0005 = ╱4b╱K╱ // 0xca0 @0x5
0x0c9b…0ca6 at0006 = ╱34╱4╱ // 0xca1 @0x6
0x0c9b…0ca6 at0007 = ╱ef╱$╱ // 0xca2 @0x7
0x0c9b…0ca6 at0008 = ╱ec╱,╱ // 0xca3 @0x8
0x0c9b…0ca6 at0009 = ╱52╱R╱ // 0xca4 @0x9
0x0c9b…0ca6 at000a = EOL // 0xca5 @0xa
0x0c9b…0ca6 }
0x0ca6…0cbf 9a16 1390 EXEC FEJL(W,12,K4$)
0x0ca6…0cbf LineComalBin {
0x0ca6…0cbf ptr = 0x9a16 // 0xca6 @0x0
0x0ca6…0cbf lno = 0x056e // 0xca8 @0x2
0x0ca6…0cbf at0004 = ╱9d╱ EXEC ╱ // 0xcaa @0x4
0x0ca6…0cbf at0005 = ╱46╱F╱ // 0xcab @0x5
0x0ca6…0cbf at0006 = ╱45╱E╱ // 0xcac @0x6
0x0ca6…0cbf at0007 = ╱4a╱J╱ // 0xcad @0x7
0x0ca6…0cbf at0008 = ╱4c╱L╱ // 0xcae @0x8
0x0ca6…0cbf at0009 = ╱ed╱(╱ // 0xcaf @0x9
0x0ca6…0cbf at000a = ╱57╱W╱ // 0xcb0 @0xa
0x0ca6…0cbf at000b = ╱ec╱,╱ // 0xcb1 @0xb
0x0ca6…0cbf at000c = ╱31╱1╱ // 0xcb2 @0xc
0x0ca6…0cbf at000d = ╱32╱2╱ // 0xcb3 @0xd
0x0ca6…0cbf at000e = ╱fe0000c004╱ // 0xcb4 @0xe
0x0ca6…0cbf at0013 = ╱ec╱,╱ // 0xcb9 @0x13
0x0ca6…0cbf at0014 = ╱4b╱K╱ // 0xcba @0x14
0x0ca6…0cbf at0015 = ╱34╱4╱ // 0xcbb @0x15
0x0ca6…0cbf at0016 = ╱ef╱$╱ // 0xcbc @0x16
0x0ca6…0cbf at0017 = ╱ee╱)╱ // 0xcbd @0x17
0x0ca6…0cbf at0018 = EOL // 0xcbe @0x18
0x0ca6…0cbf }
0x0cbf…0d19 9a70 1400 GET K4$,G:T1(E),T1(G),T1(V),T1(4),T1(5),T1(6),T1(7),T1(8),T1(W)
0x0cbf…0d19 LineComalBin {
0x0cbf…0d19 ptr = 0x9a70 // 0xcbf @0x0
0x0cbf…0d19 lno = 0x0578 // 0xcc1 @0x2
0x0cbf…0d19 at0004 = ╱a9╱ GET ╱ // 0xcc3 @0x4
0x0cbf…0d19 at0005 = ╱4b╱K╱ // 0xcc4 @0x5
0x0cbf…0d19 at0006 = ╱34╱4╱ // 0xcc5 @0x6
0x0cbf…0d19 at0007 = ╱ef╱$╱ // 0xcc6 @0x7
0x0cbf…0d19 at0008 = ╱ec╱,╱ // 0xcc7 @0x8
0x0cbf…0d19 at0009 = ╱47╱G╱ // 0xcc8 @0x9
0x0cbf…0d19 at000a = ╱f0╱:╱ // 0xcc9 @0xa
0x0cbf…0d19 at000b = ╱54╱T╱ // 0xcca @0xb
0x0cbf…0d19 at000c = ╱31╱1╱ // 0xccb @0xc
0x0cbf…0d19 at000d = ╱ed╱(╱ // 0xccc @0xd
0x0cbf…0d19 at000e = ╱45╱E╱ // 0xccd @0xe
0x0cbf…0d19 at000f = ╱ee╱)╱ // 0xcce @0xf
0x0cbf…0d19 at0010 = ╱ec╱,╱ // 0xccf @0x10
0x0cbf…0d19 at0011 = ╱54╱T╱ // 0xcd0 @0x11
0x0cbf…0d19 at0012 = ╱31╱1╱ // 0xcd1 @0x12
0x0cbf…0d19 at0013 = ╱ed╱(╱ // 0xcd2 @0x13
0x0cbf…0d19 at0014 = ╱47╱G╱ // 0xcd3 @0x14
0x0cbf…0d19 at0015 = ╱ee╱)╱ // 0xcd4 @0x15
0x0cbf…0d19 at0016 = ╱ec╱,╱ // 0xcd5 @0x16
0x0cbf…0d19 at0017 = ╱54╱T╱ // 0xcd6 @0x17
0x0cbf…0d19 at0018 = ╱31╱1╱ // 0xcd7 @0x18
0x0cbf…0d19 at0019 = ╱ed╱(╱ // 0xcd8 @0x19
0x0cbf…0d19 at001a = ╱56╱V╱ // 0xcd9 @0x1a
0x0cbf…0d19 at001b = ╱ee╱)╱ // 0xcda @0x1b
0x0cbf…0d19 at001c = ╱ec╱,╱ // 0xcdb @0x1c
0x0cbf…0d19 at001d = ╱54╱T╱ // 0xcdc @0x1d
0x0cbf…0d19 at001e = ╱31╱1╱ // 0xcdd @0x1e
0x0cbf…0d19 at001f = ╱ed╱(╱ // 0xcde @0x1f
0x0cbf…0d19 at0020 = ╱34╱4╱ // 0xcdf @0x20
0x0cbf…0d19 at0021 = ╱fe00008003╱ // 0xce0 @0x21
0x0cbf…0d19 at0026 = ╱ee╱)╱ // 0xce5 @0x26
0x0cbf…0d19 at0027 = ╱ec╱,╱ // 0xce6 @0x27
0x0cbf…0d19 at0028 = ╱54╱T╱ // 0xce7 @0x28
0x0cbf…0d19 at0029 = ╱31╱1╱ // 0xce8 @0x29
0x0cbf…0d19 at002a = ╱ed╱(╱ // 0xce9 @0x2a
0x0cbf…0d19 at002b = ╱35╱5╱ // 0xcea @0x2b
0x0cbf…0d19 at002c = ╱fe0000a003╱ // 0xceb @0x2c
0x0cbf…0d19 at0031 = ╱ee╱)╱ // 0xcf0 @0x31
0x0cbf…0d19 at0032 = ╱ec╱,╱ // 0xcf1 @0x32
0x0cbf…0d19 at0033 = ╱54╱T╱ // 0xcf2 @0x33
0x0cbf…0d19 at0034 = ╱31╱1╱ // 0xcf3 @0x34
0x0cbf…0d19 at0035 = ╱ed╱(╱ // 0xcf4 @0x35
0x0cbf…0d19 at0036 = ╱36╱6╱ // 0xcf5 @0x36
0x0cbf…0d19 at0037 = ╱fe0000c003╱ // 0xcf6 @0x37
0x0cbf…0d19 at003c = ╱ee╱)╱ // 0xcfb @0x3c
0x0cbf…0d19 at003d = ╱ec╱,╱ // 0xcfc @0x3d
0x0cbf…0d19 at003e = ╱54╱T╱ // 0xcfd @0x3e
0x0cbf…0d19 at003f = ╱31╱1╱ // 0xcfe @0x3f
0x0cbf…0d19 at0040 = ╱ed╱(╱ // 0xcff @0x40
0x0cbf…0d19 at0041 = ╱37╱7╱ // 0xd00 @0x41
0x0cbf…0d19 at0042 = ╱fe0000e003╱ // 0xd01 @0x42
0x0cbf…0d19 at0047 = ╱ee╱)╱ // 0xd06 @0x47
0x0cbf…0d19 at0048 = ╱ec╱,╱ // 0xd07 @0x48
0x0cbf…0d19 at0049 = ╱54╱T╱ // 0xd08 @0x49
0x0cbf…0d19 at004a = ╱31╱1╱ // 0xd09 @0x4a
0x0cbf…0d19 at004b = ╱ed╱(╱ // 0xd0a @0x4b
0x0cbf…0d19 at004c = ╱38╱8╱ // 0xd0b @0x4c
0x0cbf…0d19 at004d = ╱fe00008004╱ // 0xd0c @0x4d
0x0cbf…0d19 at0052 = ╱ee╱)╱ // 0xd11 @0x52
0x0cbf…0d19 at0053 = ╱ec╱,╱ // 0xd12 @0x53
0x0cbf…0d19 at0054 = ╱54╱T╱ // 0xd13 @0x54
0x0cbf…0d19 at0055 = ╱31╱1╱ // 0xd14 @0x55
0x0cbf…0d19 at0056 = ╱ed╱(╱ // 0xd15 @0x56
0x0cbf…0d19 at0057 = ╱57╱W╱ // 0xd16 @0x57
0x0cbf…0d19 at0058 = ╱ee╱)╱ // 0xd17 @0x58
0x0cbf…0d19 at0059 = EOL // 0xd18 @0x59
0x0cbf…0d19 }
0x0d19…0d32 9a89 1410 EXEC FEJL(W,13,K4$)
0x0d19…0d32 LineComalBin {
0x0d19…0d32 ptr = 0x9a89 // 0xd19 @0x0
0x0d19…0d32 lno = 0x0582 // 0xd1b @0x2
0x0d19…0d32 at0004 = ╱9d╱ EXEC ╱ // 0xd1d @0x4
0x0d19…0d32 at0005 = ╱46╱F╱ // 0xd1e @0x5
0x0d19…0d32 at0006 = ╱45╱E╱ // 0xd1f @0x6
0x0d19…0d32 at0007 = ╱4a╱J╱ // 0xd20 @0x7
0x0d19…0d32 at0008 = ╱4c╱L╱ // 0xd21 @0x8
0x0d19…0d32 at0009 = ╱ed╱(╱ // 0xd22 @0x9
0x0d19…0d32 at000a = ╱57╱W╱ // 0xd23 @0xa
0x0d19…0d32 at000b = ╱ec╱,╱ // 0xd24 @0xb
0x0d19…0d32 at000c = ╱31╱1╱ // 0xd25 @0xc
0x0d19…0d32 at000d = ╱33╱3╱ // 0xd26 @0xd
0x0d19…0d32 at000e = ╱fe0000d004╱ // 0xd27 @0xe
0x0d19…0d32 at0013 = ╱ec╱,╱ // 0xd2c @0x13
0x0d19…0d32 at0014 = ╱4b╱K╱ // 0xd2d @0x14
0x0d19…0d32 at0015 = ╱34╱4╱ // 0xd2e @0x15
0x0d19…0d32 at0016 = ╱ef╱$╱ // 0xd2f @0x16
0x0d19…0d32 at0017 = ╱ee╱)╱ // 0xd30 @0x17
0x0d19…0d32 at0018 = EOL // 0xd31 @0x18
0x0d19…0d32 }
0x0d32…0d48 9a9f 1420 GET K4$,14:AFIN
0x0d32…0d48 LineComalBin {
0x0d32…0d48 ptr = 0x9a9f // 0xd32 @0x0
0x0d32…0d48 lno = 0x058c // 0xd34 @0x2
0x0d32…0d48 at0004 = ╱a9╱ GET ╱ // 0xd36 @0x4
0x0d32…0d48 at0005 = ╱4b╱K╱ // 0xd37 @0x5
0x0d32…0d48 at0006 = ╱34╱4╱ // 0xd38 @0x6
0x0d32…0d48 at0007 = ╱ef╱$╱ // 0xd39 @0x7
0x0d32…0d48 at0008 = ╱ec╱,╱ // 0xd3a @0x8
0x0d32…0d48 at0009 = ╱31╱1╱ // 0xd3b @0x9
0x0d32…0d48 at000a = ╱34╱4╱ // 0xd3c @0xa
0x0d32…0d48 at000b = ╱fe0000e004╱ // 0xd3d @0xb
0x0d32…0d48 at0010 = ╱f0╱:╱ // 0xd42 @0x10
0x0d32…0d48 at0011 = ╱41╱A╱ // 0xd43 @0x11
0x0d32…0d48 at0012 = ╱46╱F╱ // 0xd44 @0x12
0x0d32…0d48 at0013 = ╱49╱I╱ // 0xd45 @0x13
0x0d32…0d48 at0014 = ╱4e╱N╱ // 0xd46 @0x14
0x0d32…0d48 at0015 = EOL // 0xd47 @0x15
0x0d32…0d48 }
0x0d48…0d61 9ab8 1430 EXEC FEJL(W,14,K4$)
0x0d48…0d61 LineComalBin {
0x0d48…0d61 ptr = 0x9ab8 // 0xd48 @0x0
0x0d48…0d61 lno = 0x0596 // 0xd4a @0x2
0x0d48…0d61 at0004 = ╱9d╱ EXEC ╱ // 0xd4c @0x4
0x0d48…0d61 at0005 = ╱46╱F╱ // 0xd4d @0x5
0x0d48…0d61 at0006 = ╱45╱E╱ // 0xd4e @0x6
0x0d48…0d61 at0007 = ╱4a╱J╱ // 0xd4f @0x7
0x0d48…0d61 at0008 = ╱4c╱L╱ // 0xd50 @0x8
0x0d48…0d61 at0009 = ╱ed╱(╱ // 0xd51 @0x9
0x0d48…0d61 at000a = ╱57╱W╱ // 0xd52 @0xa
0x0d48…0d61 at000b = ╱ec╱,╱ // 0xd53 @0xb
0x0d48…0d61 at000c = ╱31╱1╱ // 0xd54 @0xc
0x0d48…0d61 at000d = ╱34╱4╱ // 0xd55 @0xd
0x0d48…0d61 at000e = ╱fe0000e004╱ // 0xd56 @0xe
0x0d48…0d61 at0013 = ╱ec╱,╱ // 0xd5b @0x13
0x0d48…0d61 at0014 = ╱4b╱K╱ // 0xd5c @0x14
0x0d48…0d61 at0015 = ╱34╱4╱ // 0xd5d @0x15
0x0d48…0d61 at0016 = ╱ef╱$╱ // 0xd5e @0x16
0x0d48…0d61 at0017 = ╱ee╱)╱ // 0xd5f @0x17
0x0d48…0d61 at0018 = EOL // 0xd60 @0x18
0x0d48…0d61 }
0x0d61…0d76 9acd 1440 GET K4$,20:DV$
0x0d61…0d76 LineComalBin {
0x0d61…0d76 ptr = 0x9acd // 0xd61 @0x0
0x0d61…0d76 lno = 0x05a0 // 0xd63 @0x2
0x0d61…0d76 at0004 = ╱a9╱ GET ╱ // 0xd65 @0x4
0x0d61…0d76 at0005 = ╱4b╱K╱ // 0xd66 @0x5
0x0d61…0d76 at0006 = ╱34╱4╱ // 0xd67 @0x6
0x0d61…0d76 at0007 = ╱ef╱$╱ // 0xd68 @0x7
0x0d61…0d76 at0008 = ╱ec╱,╱ // 0xd69 @0x8
0x0d61…0d76 at0009 = ╱32╱2╱ // 0xd6a @0x9
0x0d61…0d76 at000a = ╱30╱0╱ // 0xd6b @0xa
0x0d61…0d76 at000b = ╱fe0000a005╱ // 0xd6c @0xb
0x0d61…0d76 at0010 = ╱f0╱:╱ // 0xd71 @0x10
0x0d61…0d76 at0011 = ╱44╱D╱ // 0xd72 @0x11
0x0d61…0d76 at0012 = ╱56╱V╱ // 0xd73 @0x12
0x0d61…0d76 at0013 = ╱ef╱$╱ // 0xd74 @0x13
0x0d61…0d76 at0014 = EOL // 0xd75 @0x14
0x0d61…0d76 }
0x0d76…0d8f 9ae6 1450 EXEC FEJL(W,30,K4$)
0x0d76…0d8f LineComalBin {
0x0d76…0d8f ptr = 0x9ae6 // 0xd76 @0x0
0x0d76…0d8f lno = 0x05aa // 0xd78 @0x2
0x0d76…0d8f at0004 = ╱9d╱ EXEC ╱ // 0xd7a @0x4
0x0d76…0d8f at0005 = ╱46╱F╱ // 0xd7b @0x5
0x0d76…0d8f at0006 = ╱45╱E╱ // 0xd7c @0x6
0x0d76…0d8f at0007 = ╱4a╱J╱ // 0xd7d @0x7
0x0d76…0d8f at0008 = ╱4c╱L╱ // 0xd7e @0x8
0x0d76…0d8f at0009 = ╱ed╱(╱ // 0xd7f @0x9
0x0d76…0d8f at000a = ╱57╱W╱ // 0xd80 @0xa
0x0d76…0d8f at000b = ╱ec╱,╱ // 0xd81 @0xb
0x0d76…0d8f at000c = ╱33╱3╱ // 0xd82 @0xc
0x0d76…0d8f at000d = ╱30╱0╱ // 0xd83 @0xd
0x0d76…0d8f at000e = ╱fe0000f005╱ // 0xd84 @0xe
0x0d76…0d8f at0013 = ╱ec╱,╱ // 0xd89 @0x13
0x0d76…0d8f at0014 = ╱4b╱K╱ // 0xd8a @0x14
0x0d76…0d8f at0015 = ╱34╱4╱ // 0xd8b @0x15
0x0d76…0d8f at0016 = ╱ef╱$╱ // 0xd8c @0x16
0x0d76…0d8f at0017 = ╱ee╱)╱ // 0xd8d @0x17
0x0d76…0d8f at0018 = EOL // 0xd8e @0x18
0x0d76…0d8f }
0x0d8f…0d98 9aef 1460 CLOSE K4$
0x0d8f…0d98 LineComalBin {
0x0d8f…0d98 ptr = 0x9aef // 0xd8f @0x0
0x0d8f…0d98 lno = 0x05b4 // 0xd91 @0x2
0x0d8f…0d98 at0004 = ╱a8╱ CLOSE ╱ // 0xd93 @0x4
0x0d8f…0d98 at0005 = ╱4b╱K╱ // 0xd94 @0x5
0x0d8f…0d98 at0006 = ╱34╱4╱ // 0xd95 @0x6
0x0d8f…0d98 at0007 = ╱ef╱$╱ // 0xd96 @0x7
0x0d8f…0d98 at0008 = EOL // 0xd97 @0x8
0x0d8f…0d98 }
0x0d98…0db1 9b08 1470 EXEC FEJL(W,15,K4$)
0x0d98…0db1 LineComalBin {
0x0d98…0db1 ptr = 0x9b08 // 0xd98 @0x0
0x0d98…0db1 lno = 0x05be // 0xd9a @0x2
0x0d98…0db1 at0004 = ╱9d╱ EXEC ╱ // 0xd9c @0x4
0x0d98…0db1 at0005 = ╱46╱F╱ // 0xd9d @0x5
0x0d98…0db1 at0006 = ╱45╱E╱ // 0xd9e @0x6
0x0d98…0db1 at0007 = ╱4a╱J╱ // 0xd9f @0x7
0x0d98…0db1 at0008 = ╱4c╱L╱ // 0xda0 @0x8
0x0d98…0db1 at0009 = ╱ed╱(╱ // 0xda1 @0x9
0x0d98…0db1 at000a = ╱57╱W╱ // 0xda2 @0xa
0x0d98…0db1 at000b = ╱ec╱,╱ // 0xda3 @0xb
0x0d98…0db1 at000c = ╱31╱1╱ // 0xda4 @0xc
0x0d98…0db1 at000d = ╱35╱5╱ // 0xda5 @0xd
0x0d98…0db1 at000e = ╱fe0000f004╱ // 0xda6 @0xe
0x0d98…0db1 at0013 = ╱ec╱,╱ // 0xdab @0x13
0x0d98…0db1 at0014 = ╱4b╱K╱ // 0xdac @0x14
0x0d98…0db1 at0015 = ╱34╱4╱ // 0xdad @0x15
0x0d98…0db1 at0016 = ╱ef╱$╱ // 0xdae @0x16
0x0d98…0db1 at0017 = ╱ee╱)╱ // 0xdaf @0x17
0x0d98…0db1 at0018 = EOL // 0xdb0 @0x18
0x0d98…0db1 }
0x0db1…0dbc 9b13 1480 OPEN K2$,R
0x0db1…0dbc LineComalBin {
0x0db1…0dbc ptr = 0x9b13 // 0xdb1 @0x0
0x0db1…0dbc lno = 0x05c8 // 0xdb3 @0x2
0x0db1…0dbc at0004 = ╱a7╱ OPEN ╱ // 0xdb5 @0x4
0x0db1…0dbc at0005 = ╱4b╱K╱ // 0xdb6 @0x5
0x0db1…0dbc at0006 = ╱32╱2╱ // 0xdb7 @0x6
0x0db1…0dbc at0007 = ╱ef╱$╱ // 0xdb8 @0x7
0x0db1…0dbc at0008 = ╱ec╱,╱ // 0xdb9 @0x8
0x0db1…0dbc at0009 = ╱52╱R╱ // 0xdba @0x9
0x0db1…0dbc at000a = EOL // 0xdbb @0xa
0x0db1…0dbc }
0x0dbc…0dd5 9b2c 1490 EXEC FEJL(W,16,K2$)
0x0dbc…0dd5 LineComalBin {
0x0dbc…0dd5 ptr = 0x9b2c // 0xdbc @0x0
0x0dbc…0dd5 lno = 0x05d2 // 0xdbe @0x2
0x0dbc…0dd5 at0004 = ╱9d╱ EXEC ╱ // 0xdc0 @0x4
0x0dbc…0dd5 at0005 = ╱46╱F╱ // 0xdc1 @0x5
0x0dbc…0dd5 at0006 = ╱45╱E╱ // 0xdc2 @0x6
0x0dbc…0dd5 at0007 = ╱4a╱J╱ // 0xdc3 @0x7
0x0dbc…0dd5 at0008 = ╱4c╱L╱ // 0xdc4 @0x8
0x0dbc…0dd5 at0009 = ╱ed╱(╱ // 0xdc5 @0x9
0x0dbc…0dd5 at000a = ╱57╱W╱ // 0xdc6 @0xa
0x0dbc…0dd5 at000b = ╱ec╱,╱ // 0xdc7 @0xb
0x0dbc…0dd5 at000c = ╱31╱1╱ // 0xdc8 @0xc
0x0dbc…0dd5 at000d = ╱36╱6╱ // 0xdc9 @0xd
0x0dbc…0dd5 at000e = ╱fe00008005╱ // 0xdca @0xe
0x0dbc…0dd5 at0013 = ╱ec╱,╱ // 0xdcf @0x13
0x0dbc…0dd5 at0014 = ╱4b╱K╱ // 0xdd0 @0x14
0x0dbc…0dd5 at0015 = ╱32╱2╱ // 0xdd1 @0x15
0x0dbc…0dd5 at0016 = ╱ef╱$╱ // 0xdd2 @0x16
0x0dbc…0dd5 at0017 = ╱ee╱)╱ // 0xdd3 @0x17
0x0dbc…0dd5 at0018 = EOL // 0xdd4 @0x18
0x0dbc…0dd5 }
0x0dd5…0de0 9b37 1500 OPEN K3$,R
0x0dd5…0de0 LineComalBin {
0x0dd5…0de0 ptr = 0x9b37 // 0xdd5 @0x0
0x0dd5…0de0 lno = 0x05dc // 0xdd7 @0x2
0x0dd5…0de0 at0004 = ╱a7╱ OPEN ╱ // 0xdd9 @0x4
0x0dd5…0de0 at0005 = ╱4b╱K╱ // 0xdda @0x5
0x0dd5…0de0 at0006 = ╱33╱3╱ // 0xddb @0x6
0x0dd5…0de0 at0007 = ╱ef╱$╱ // 0xddc @0x7
0x0dd5…0de0 at0008 = ╱ec╱,╱ // 0xddd @0x8
0x0dd5…0de0 at0009 = ╱52╱R╱ // 0xdde @0x9
0x0dd5…0de0 at000a = EOL // 0xddf @0xa
0x0dd5…0de0 }
0x0de0…0df9 9b50 1510 EXEC FEJL(W,17,K3$)
0x0de0…0df9 LineComalBin {
0x0de0…0df9 ptr = 0x9b50 // 0xde0 @0x0
0x0de0…0df9 lno = 0x05e6 // 0xde2 @0x2
0x0de0…0df9 at0004 = ╱9d╱ EXEC ╱ // 0xde4 @0x4
0x0de0…0df9 at0005 = ╱46╱F╱ // 0xde5 @0x5
0x0de0…0df9 at0006 = ╱45╱E╱ // 0xde6 @0x6
0x0de0…0df9 at0007 = ╱4a╱J╱ // 0xde7 @0x7
0x0de0…0df9 at0008 = ╱4c╱L╱ // 0xde8 @0x8
0x0de0…0df9 at0009 = ╱ed╱(╱ // 0xde9 @0x9
0x0de0…0df9 at000a = ╱57╱W╱ // 0xdea @0xa
0x0de0…0df9 at000b = ╱ec╱,╱ // 0xdeb @0xb
0x0de0…0df9 at000c = ╱31╱1╱ // 0xdec @0xc
0x0de0…0df9 at000d = ╱37╱7╱ // 0xded @0xd
0x0de0…0df9 at000e = ╱fe00008805╱ // 0xdee @0xe
0x0de0…0df9 at0013 = ╱ec╱,╱ // 0xdf3 @0x13
0x0de0…0df9 at0014 = ╱4b╱K╱ // 0xdf4 @0x14
0x0de0…0df9 at0015 = ╱33╱3╱ // 0xdf5 @0x15
0x0de0…0df9 at0016 = ╱ef╱$╱ // 0xdf6 @0x16
0x0de0…0df9 at0017 = ╱ee╱)╱ // 0xdf7 @0x17
0x0de0…0df9 at0018 = EOL // 0xdf8 @0x18
0x0de0…0df9 }
0x0df9…0e17 9b6e 1520 EXEC INDTAB(FTAB,MFANTAL,K2$)
0x0df9…0e17 LineComalBin {
0x0df9…0e17 ptr = 0x9b6e // 0xdf9 @0x0
0x0df9…0e17 lno = 0x05f0 // 0xdfb @0x2
0x0df9…0e17 at0004 = ╱9d╱ EXEC ╱ // 0xdfd @0x4
0x0df9…0e17 at0005 = ╱49╱I╱ // 0xdfe @0x5
0x0df9…0e17 at0006 = ╱4e╱N╱ // 0xdff @0x6
0x0df9…0e17 at0007 = ╱44╱D╱ // 0xe00 @0x7
0x0df9…0e17 at0008 = ╱54╱T╱ // 0xe01 @0x8
0x0df9…0e17 at0009 = ╱41╱A╱ // 0xe02 @0x9
0x0df9…0e17 at000a = ╱42╱B╱ // 0xe03 @0xa
0x0df9…0e17 at000b = ╱ed╱(╱ // 0xe04 @0xb
0x0df9…0e17 at000c = ╱46╱F╱ // 0xe05 @0xc
0x0df9…0e17 at000d = ╱54╱T╱ // 0xe06 @0xd
0x0df9…0e17 at000e = ╱41╱A╱ // 0xe07 @0xe
0x0df9…0e17 at000f = ╱42╱B╱ // 0xe08 @0xf
0x0df9…0e17 at0010 = ╱ec╱,╱ // 0xe09 @0x10
0x0df9…0e17 at0011 = ╱4d╱M╱ // 0xe0a @0x11
0x0df9…0e17 at0012 = ╱46╱F╱ // 0xe0b @0x12
0x0df9…0e17 at0013 = ╱41╱A╱ // 0xe0c @0x13
0x0df9…0e17 at0014 = ╱4e╱N╱ // 0xe0d @0x14
0x0df9…0e17 at0015 = ╱54╱T╱ // 0xe0e @0x15
0x0df9…0e17 at0016 = ╱41╱A╱ // 0xe0f @0x16
0x0df9…0e17 at0017 = ╱4c╱L╱ // 0xe10 @0x17
0x0df9…0e17 at0018 = ╱ec╱,╱ // 0xe11 @0x18
0x0df9…0e17 at0019 = ╱4b╱K╱ // 0xe12 @0x19
0x0df9…0e17 at001a = ╱32╱2╱ // 0xe13 @0x1a
0x0df9…0e17 at001b = ╱ef╱$╱ // 0xe14 @0x1b
0x0df9…0e17 at001c = ╱ee╱)╱ // 0xe15 @0x1c
0x0df9…0e17 at001d = EOL // 0xe16 @0x1d
0x0df9…0e17 }
0x0e17…0e3d 9b94 1530 BLANK$=" "
0x0e17…0e3d LineComalBin {
0x0e17…0e3d ptr = 0x9b94 // 0xe17 @0x0
0x0e17…0e3d lno = 0x05fa // 0xe19 @0x2
0x0e17…0e3d at0004 = ╱42╱B╱ // 0xe1b @0x4
0x0e17…0e3d at0005 = ╱4c╱L╱ // 0xe1c @0x5
0x0e17…0e3d at0006 = ╱41╱A╱ // 0xe1d @0x6
0x0e17…0e3d at0007 = ╱4e╱N╱ // 0xe1e @0x7
0x0e17…0e3d at0008 = ╱4b╱K╱ // 0xe1f @0x8
0x0e17…0e3d at0009 = ╱ef╱$╱ // 0xe20 @0x9
0x0e17…0e3d at000a = ╱dc╱=╱ // 0xe21 @0xa
0x0e17…0e3d at000b = ╱22╱"╱ // 0xe22 @0xb
0x0e17…0e3d at000c = ╱20╱…╱ // 0xe23 @0xc
0x0e17…0e3d at000d = ╱20╱…╱ // 0xe24 @0xd
0x0e17…0e3d at000e = ╱20╱…╱ // 0xe25 @0xe
0x0e17…0e3d at000f = ╱20╱…╱ // 0xe26 @0xf
0x0e17…0e3d at0010 = ╱20╱…╱ // 0xe27 @0x10
0x0e17…0e3d at0011 = ╱20╱…╱ // 0xe28 @0x11
0x0e17…0e3d at0012 = ╱20╱…╱ // 0xe29 @0x12
0x0e17…0e3d at0013 = ╱20╱…╱ // 0xe2a @0x13
0x0e17…0e3d at0014 = ╱20╱…╱ // 0xe2b @0x14
0x0e17…0e3d at0015 = ╱20╱…╱ // 0xe2c @0x15
0x0e17…0e3d at0016 = ╱20╱…╱ // 0xe2d @0x16
0x0e17…0e3d at0017 = ╱20╱…╱ // 0xe2e @0x17
0x0e17…0e3d at0018 = ╱20╱…╱ // 0xe2f @0x18
0x0e17…0e3d at0019 = ╱20╱…╱ // 0xe30 @0x19
0x0e17…0e3d at001a = ╱20╱…╱ // 0xe31 @0x1a
0x0e17…0e3d at001b = ╱20╱…╱ // 0xe32 @0x1b
0x0e17…0e3d at001c = ╱20╱…╱ // 0xe33 @0x1c
0x0e17…0e3d at001d = ╱20╱…╱ // 0xe34 @0x1d
0x0e17…0e3d at001e = ╱20╱…╱ // 0xe35 @0x1e
0x0e17…0e3d at001f = ╱20╱…╱ // 0xe36 @0x1f
0x0e17…0e3d at0020 = ╱20╱…╱ // 0xe37 @0x20
0x0e17…0e3d at0021 = ╱20╱…╱ // 0xe38 @0x21
0x0e17…0e3d at0022 = ╱20╱…╱ // 0xe39 @0x22
0x0e17…0e3d at0023 = ╱20╱…╱ // 0xe3a @0x23
0x0e17…0e3d at0024 = ╱22╱"╱ // 0xe3b @0x24
0x0e17…0e3d at0025 = EOL // 0xe3c @0x25
0x0e17…0e3d }
0x0e3d…0e84 9bdb 1540 STREG$="------------------------------------";STREG$=STREG$+STREG$
0x0e3d…0e84 LineComalBin {
0x0e3d…0e84 ptr = 0x9bdb // 0xe3d @0x0
0x0e3d…0e84 lno = 0x0604 // 0xe3f @0x2
0x0e3d…0e84 at0004 = ╱53╱S╱ // 0xe41 @0x4
0x0e3d…0e84 at0005 = ╱54╱T╱ // 0xe42 @0x5
0x0e3d…0e84 at0006 = ╱52╱R╱ // 0xe43 @0x6
0x0e3d…0e84 at0007 = ╱45╱E╱ // 0xe44 @0x7
0x0e3d…0e84 at0008 = ╱47╱G╱ // 0xe45 @0x8
0x0e3d…0e84 at0009 = ╱ef╱$╱ // 0xe46 @0x9
0x0e3d…0e84 at000a = ╱dc╱=╱ // 0xe47 @0xa
0x0e3d…0e84 at000b = ╱22╱"╱ // 0xe48 @0xb
0x0e3d…0e84 at000c = ╱2d╱-╱ // 0xe49 @0xc
0x0e3d…0e84 at000d = ╱2d╱-╱ // 0xe4a @0xd
0x0e3d…0e84 at000e = ╱2d╱-╱ // 0xe4b @0xe
0x0e3d…0e84 at000f = ╱2d╱-╱ // 0xe4c @0xf
0x0e3d…0e84 at0010 = ╱2d╱-╱ // 0xe4d @0x10
0x0e3d…0e84 at0011 = ╱2d╱-╱ // 0xe4e @0x11
0x0e3d…0e84 at0012 = ╱2d╱-╱ // 0xe4f @0x12
0x0e3d…0e84 at0013 = ╱2d╱-╱ // 0xe50 @0x13
0x0e3d…0e84 at0014 = ╱2d╱-╱ // 0xe51 @0x14
0x0e3d…0e84 at0015 = ╱2d╱-╱ // 0xe52 @0x15
0x0e3d…0e84 at0016 = ╱2d╱-╱ // 0xe53 @0x16
0x0e3d…0e84 at0017 = ╱2d╱-╱ // 0xe54 @0x17
0x0e3d…0e84 at0018 = ╱2d╱-╱ // 0xe55 @0x18
0x0e3d…0e84 at0019 = ╱2d╱-╱ // 0xe56 @0x19
0x0e3d…0e84 at001a = ╱2d╱-╱ // 0xe57 @0x1a
0x0e3d…0e84 at001b = ╱2d╱-╱ // 0xe58 @0x1b
0x0e3d…0e84 at001c = ╱2d╱-╱ // 0xe59 @0x1c
0x0e3d…0e84 at001d = ╱2d╱-╱ // 0xe5a @0x1d
0x0e3d…0e84 at001e = ╱2d╱-╱ // 0xe5b @0x1e
0x0e3d…0e84 at001f = ╱2d╱-╱ // 0xe5c @0x1f
0x0e3d…0e84 at0020 = ╱2d╱-╱ // 0xe5d @0x20
0x0e3d…0e84 at0021 = ╱2d╱-╱ // 0xe5e @0x21
0x0e3d…0e84 at0022 = ╱2d╱-╱ // 0xe5f @0x22
0x0e3d…0e84 at0023 = ╱2d╱-╱ // 0xe60 @0x23
0x0e3d…0e84 at0024 = ╱2d╱-╱ // 0xe61 @0x24
0x0e3d…0e84 at0025 = ╱2d╱-╱ // 0xe62 @0x25
0x0e3d…0e84 at0026 = ╱2d╱-╱ // 0xe63 @0x26
0x0e3d…0e84 at0027 = ╱2d╱-╱ // 0xe64 @0x27
0x0e3d…0e84 at0028 = ╱2d╱-╱ // 0xe65 @0x28
0x0e3d…0e84 at0029 = ╱2d╱-╱ // 0xe66 @0x29
0x0e3d…0e84 at002a = ╱2d╱-╱ // 0xe67 @0x2a
0x0e3d…0e84 at002b = ╱2d╱-╱ // 0xe68 @0x2b
0x0e3d…0e84 at002c = ╱2d╱-╱ // 0xe69 @0x2c
0x0e3d…0e84 at002d = ╱2d╱-╱ // 0xe6a @0x2d
0x0e3d…0e84 at002e = ╱2d╱-╱ // 0xe6b @0x2e
0x0e3d…0e84 at002f = ╱2d╱-╱ // 0xe6c @0x2f
0x0e3d…0e84 at0030 = ╱22╱"╱ // 0xe6d @0x30
0x0e3d…0e84 at0031 = ╱eb╱;╱ // 0xe6e @0x31
0x0e3d…0e84 at0032 = ╱53╱S╱ // 0xe6f @0x32
0x0e3d…0e84 at0033 = ╱54╱T╱ // 0xe70 @0x33
0x0e3d…0e84 at0034 = ╱52╱R╱ // 0xe71 @0x34
0x0e3d…0e84 at0035 = ╱45╱E╱ // 0xe72 @0x35
0x0e3d…0e84 at0036 = ╱47╱G╱ // 0xe73 @0x36
0x0e3d…0e84 at0037 = ╱ef╱$╱ // 0xe74 @0x37
0x0e3d…0e84 at0038 = ╱dc╱=╱ // 0xe75 @0x38
0x0e3d…0e84 at0039 = ╱53╱S╱ // 0xe76 @0x39
0x0e3d…0e84 at003a = ╱54╱T╱ // 0xe77 @0x3a
0x0e3d…0e84 at003b = ╱52╱R╱ // 0xe78 @0x3b
0x0e3d…0e84 at003c = ╱45╱E╱ // 0xe79 @0x3c
0x0e3d…0e84 at003d = ╱47╱G╱ // 0xe7a @0x3d
0x0e3d…0e84 at003e = ╱ef╱$╱ // 0xe7b @0x3e
0x0e3d…0e84 at003f = ╱f1╱+╱ // 0xe7c @0x3f
0x0e3d…0e84 at0040 = ╱53╱S╱ // 0xe7d @0x40
0x0e3d…0e84 at0041 = ╱54╱T╱ // 0xe7e @0x41
0x0e3d…0e84 at0042 = ╱52╱R╱ // 0xe7f @0x42
0x0e3d…0e84 at0043 = ╱45╱E╱ // 0xe80 @0x43
0x0e3d…0e84 at0044 = ╱47╱G╱ // 0xe81 @0x44
0x0e3d…0e84 at0045 = ╱ef╱$╱ // 0xe82 @0x45
0x0e3d…0e84 at0046 = EOL // 0xe83 @0x46
0x0e3d…0e84 }
0x0e84…0e8a 9be1 1550 REPEAT
0x0e84…0e8a LineComalBin {
0x0e84…0e8a ptr = 0x9be1 // 0xe84 @0x0
0x0e84…0e8a lno = 0x060e // 0xe86 @0x2
0x0e84…0e8a at0004 = ╱97╱ REPEAT ╱ // 0xe88 @0x4
0x0e84…0e8a at0005 = EOL // 0xe89 @0x5
0x0e84…0e8a }
0x0e8a…0e91 9be8 1560 OUTPUT T
0x0e8a…0e91 LineComalBin {
0x0e8a…0e91 ptr = 0x9be8 // 0xe8a @0x0
0x0e8a…0e91 lno = 0x0618 // 0xe8c @0x2
0x0e8a…0e91 at0004 = ╱a5╱ OUTPUT ╱ // 0xe8e @0x4
0x0e8a…0e91 at0005 = ╱54╱T╱ // 0xe8f @0x5
0x0e8a…0e91 at0006 = EOL // 0xe90 @0x6
0x0e8a…0e91 }
0x0e91…0e97 9bee 1570 CLEAR
0x0e91…0e97 LineComalBin {
0x0e91…0e97 ptr = 0x9bee // 0xe91 @0x0
0x0e91…0e97 lno = 0x0622 // 0xe93 @0x2
0x0e91…0e97 at0004 = ╱a0╱ CLEAR ╱ // 0xe95 @0x4
0x0e91…0e97 at0005 = EOL // 0xe96 @0x5
0x0e91…0e97 }
0x0e97…0ea6 9bfd 1580 CURSOR 30,G
0x0e97…0ea6 LineComalBin {
0x0e97…0ea6 ptr = 0x9bfd // 0xe97 @0x0
0x0e97…0ea6 lno = 0x062c // 0xe99 @0x2
0x0e97…0ea6 at0004 = ╱a1╱ CURSOR ╱ // 0xe9b @0x4
0x0e97…0ea6 at0005 = ╱33╱3╱ // 0xe9c @0x5
0x0e97…0ea6 at0006 = ╱30╱0╱ // 0xe9d @0x6
0x0e97…0ea6 at0007 = ╱fe0000f005╱ // 0xe9e @0x7
0x0e97…0ea6 at000c = ╱ec╱,╱ // 0xea3 @0xc
0x0e97…0ea6 at000d = ╱47╱G╱ // 0xea4 @0xd
0x0e97…0ea6 at000e = EOL // 0xea5 @0xe
0x0e97…0ea6 }
0x0ea6…0ebc 9c13 1590 PRINT "Balanceprogram"
0x0ea6…0ebc LineComalBin {
0x0ea6…0ebc ptr = 0x9c13 // 0xea6 @0x0
0x0ea6…0ebc lno = 0x0636 // 0xea8 @0x2
0x0ea6…0ebc at0004 = ╱92╱ PRINT ╱ // 0xeaa @0x4
0x0ea6…0ebc at0005 = ╱22╱"╱ // 0xeab @0x5
0x0ea6…0ebc at0006 = ╱42╱B╱ // 0xeac @0x6
0x0ea6…0ebc at0007 = ╱61╱a╱ // 0xead @0x7
0x0ea6…0ebc at0008 = ╱6c╱l╱ // 0xeae @0x8
0x0ea6…0ebc at0009 = ╱61╱a╱ // 0xeaf @0x9
0x0ea6…0ebc at000a = ╱6e╱n╱ // 0xeb0 @0xa
0x0ea6…0ebc at000b = ╱63╱c╱ // 0xeb1 @0xb
0x0ea6…0ebc at000c = ╱65╱e╱ // 0xeb2 @0xc
0x0ea6…0ebc at000d = ╱70╱p╱ // 0xeb3 @0xd
0x0ea6…0ebc at000e = ╱72╱r╱ // 0xeb4 @0xe
0x0ea6…0ebc at000f = ╱6f╱o╱ // 0xeb5 @0xf
0x0ea6…0ebc at0010 = ╱67╱g╱ // 0xeb6 @0x10
0x0ea6…0ebc at0011 = ╱72╱r╱ // 0xeb7 @0x11
0x0ea6…0ebc at0012 = ╱61╱a╱ // 0xeb8 @0x12
0x0ea6…0ebc at0013 = ╱6d╱m╱ // 0xeb9 @0x13
0x0ea6…0ebc at0014 = ╱22╱"╱ // 0xeba @0x14
0x0ea6…0ebc at0015 = EOL // 0xebb @0x15
0x0ea6…0ebc }
0x0ebc…0ed0 9c27 1600 CURSOR 15,5
0x0ebc…0ed0 LineComalBin {
0x0ebc…0ed0 ptr = 0x9c27 // 0xebc @0x0
0x0ebc…0ed0 lno = 0x0640 // 0xebe @0x2
0x0ebc…0ed0 at0004 = ╱a1╱ CURSOR ╱ // 0xec0 @0x4
0x0ebc…0ed0 at0005 = ╱31╱1╱ // 0xec1 @0x5
0x0ebc…0ed0 at0006 = ╱35╱5╱ // 0xec2 @0x6
0x0ebc…0ed0 at0007 = ╱fe0000f004╱ // 0xec3 @0x7
0x0ebc…0ed0 at000c = ╱ec╱,╱ // 0xec8 @0xc
0x0ebc…0ed0 at000d = ╱35╱5╱ // 0xec9 @0xd
0x0ebc…0ed0 at000e = ╱fe0000a003╱ // 0xeca @0xe
0x0ebc…0ed0 at0013 = EOL // 0xecf @0x13
0x0ebc…0ed0 }
0x0ed0…0ee1 9c38 1610 PRINT "0: Færdig"
0x0ed0…0ee1 LineComalBin {
0x0ed0…0ee1 ptr = 0x9c38 // 0xed0 @0x0
0x0ed0…0ee1 lno = 0x064a // 0xed2 @0x2
0x0ed0…0ee1 at0004 = ╱92╱ PRINT ╱ // 0xed4 @0x4
0x0ed0…0ee1 at0005 = ╱22╱"╱ // 0xed5 @0x5
0x0ed0…0ee1 at0006 = ╱30╱0╱ // 0xed6 @0x6
0x0ed0…0ee1 at0007 = ╱3a╱:╱ // 0xed7 @0x7
0x0ed0…0ee1 at0008 = ╱20╱…╱ // 0xed8 @0x8
0x0ed0…0ee1 at0009 = ╱46╱F╱ // 0xed9 @0x9
0x0ed0…0ee1 at000a = ╱7b╱æ╱ // 0xeda @0xa
0x0ed0…0ee1 at000b = ╱72╱r╱ // 0xedb @0xb
0x0ed0…0ee1 at000c = ╱64╱d╱ // 0xedc @0xc
0x0ed0…0ee1 at000d = ╱69╱i╱ // 0xedd @0xd
0x0ed0…0ee1 at000e = ╱67╱g╱ // 0xede @0xe
0x0ed0…0ee1 at000f = ╱22╱"╱ // 0xedf @0xf
0x0ed0…0ee1 at0010 = EOL // 0xee0 @0x10
0x0ed0…0ee1 }
0x0ee1…0ef5 9c4c 1620 CURSOR 15,7
0x0ee1…0ef5 LineComalBin {
0x0ee1…0ef5 ptr = 0x9c4c // 0xee1 @0x0
0x0ee1…0ef5 lno = 0x0654 // 0xee3 @0x2
0x0ee1…0ef5 at0004 = ╱a1╱ CURSOR ╱ // 0xee5 @0x4
0x0ee1…0ef5 at0005 = ╱31╱1╱ // 0xee6 @0x5
0x0ee1…0ef5 at0006 = ╱35╱5╱ // 0xee7 @0x6
0x0ee1…0ef5 at0007 = ╱fe0000f004╱ // 0xee8 @0x7
0x0ee1…0ef5 at000c = ╱ec╱,╱ // 0xeed @0xc
0x0ee1…0ef5 at000d = ╱37╱7╱ // 0xeee @0xd
0x0ee1…0ef5 at000e = ╱fe0000e003╱ // 0xeef @0xe
0x0ee1…0ef5 at0013 = EOL // 0xef4 @0x13
0x0ee1…0ef5 }
0x0ef5…0f0c 9c63 1630 PRINT "1: Totalbalance"
0x0ef5…0f0c LineComalBin {
0x0ef5…0f0c ptr = 0x9c63 // 0xef5 @0x0
0x0ef5…0f0c lno = 0x065e // 0xef7 @0x2
0x0ef5…0f0c at0004 = ╱92╱ PRINT ╱ // 0xef9 @0x4
0x0ef5…0f0c at0005 = ╱22╱"╱ // 0xefa @0x5
0x0ef5…0f0c at0006 = ╱31╱1╱ // 0xefb @0x6
0x0ef5…0f0c at0007 = ╱3a╱:╱ // 0xefc @0x7
0x0ef5…0f0c at0008 = ╱20╱…╱ // 0xefd @0x8
0x0ef5…0f0c at0009 = ╱54╱T╱ // 0xefe @0x9
0x0ef5…0f0c at000a = ╱6f╱o╱ // 0xeff @0xa
0x0ef5…0f0c at000b = ╱74╱t╱ // 0xf00 @0xb
0x0ef5…0f0c at000c = ╱61╱a╱ // 0xf01 @0xc
0x0ef5…0f0c at000d = ╱6c╱l╱ // 0xf02 @0xd
0x0ef5…0f0c at000e = ╱62╱b╱ // 0xf03 @0xe
0x0ef5…0f0c at000f = ╱61╱a╱ // 0xf04 @0xf
0x0ef5…0f0c at0010 = ╱6c╱l╱ // 0xf05 @0x10
0x0ef5…0f0c at0011 = ╱61╱a╱ // 0xf06 @0x11
0x0ef5…0f0c at0012 = ╱6e╱n╱ // 0xf07 @0x12
0x0ef5…0f0c at0013 = ╱63╱c╱ // 0xf08 @0x13
0x0ef5…0f0c at0014 = ╱65╱e╱ // 0xf09 @0x14
0x0ef5…0f0c at0015 = ╱22╱"╱ // 0xf0a @0x15
0x0ef5…0f0c at0016 = EOL // 0xf0b @0x16
0x0ef5…0f0c }
0x0f0c…0f1b 9c72 1640 CURSOR 15,W
0x0f0c…0f1b LineComalBin {
0x0f0c…0f1b ptr = 0x9c72 // 0xf0c @0x0
0x0f0c…0f1b lno = 0x0668 // 0xf0e @0x2
0x0f0c…0f1b at0004 = ╱a1╱ CURSOR ╱ // 0xf10 @0x4
0x0f0c…0f1b at0005 = ╱31╱1╱ // 0xf11 @0x5
0x0f0c…0f1b at0006 = ╱35╱5╱ // 0xf12 @0x6
0x0f0c…0f1b at0007 = ╱fe0000f004╱ // 0xf13 @0x7
0x0f0c…0f1b at000c = ╱ec╱,╱ // 0xf18 @0xc
0x0f0c…0f1b at000d = ╱57╱W╱ // 0xf19 @0xd
0x0f0c…0f1b at000e = EOL // 0xf1a @0xe
0x0f0c…0f1b }
0x0f1b…0f33 9c8a 1650 PRINT "2: Gruppebalance"
0x0f1b…0f33 LineComalBin {
0x0f1b…0f33 ptr = 0x9c8a // 0xf1b @0x0
0x0f1b…0f33 lno = 0x0672 // 0xf1d @0x2
0x0f1b…0f33 at0004 = ╱92╱ PRINT ╱ // 0xf1f @0x4
0x0f1b…0f33 at0005 = ╱22╱"╱ // 0xf20 @0x5
0x0f1b…0f33 at0006 = ╱32╱2╱ // 0xf21 @0x6
0x0f1b…0f33 at0007 = ╱3a╱:╱ // 0xf22 @0x7
0x0f1b…0f33 at0008 = ╱20╱…╱ // 0xf23 @0x8
0x0f1b…0f33 at0009 = ╱47╱G╱ // 0xf24 @0x9
0x0f1b…0f33 at000a = ╱72╱r╱ // 0xf25 @0xa
0x0f1b…0f33 at000b = ╱75╱u╱ // 0xf26 @0xb
0x0f1b…0f33 at000c = ╱70╱p╱ // 0xf27 @0xc
0x0f1b…0f33 at000d = ╱70╱p╱ // 0xf28 @0xd
0x0f1b…0f33 at000e = ╱65╱e╱ // 0xf29 @0xe
0x0f1b…0f33 at000f = ╱62╱b╱ // 0xf2a @0xf
0x0f1b…0f33 at0010 = ╱61╱a╱ // 0xf2b @0x10
0x0f1b…0f33 at0011 = ╱6c╱l╱ // 0xf2c @0x11
0x0f1b…0f33 at0012 = ╱61╱a╱ // 0xf2d @0x12
0x0f1b…0f33 at0013 = ╱6e╱n╱ // 0xf2e @0x13
0x0f1b…0f33 at0014 = ╱63╱c╱ // 0xf2f @0x14
0x0f1b…0f33 at0015 = ╱65╱e╱ // 0xf30 @0x15
0x0f1b…0f33 at0016 = ╱22╱"╱ // 0xf31 @0x16
0x0f1b…0f33 at0017 = EOL // 0xf32 @0x17
0x0f1b…0f33 }
0x0f33…0f39 9c90 1660 REPEAT
0x0f33…0f39 LineComalBin {
0x0f33…0f39 ptr = 0x9c90 // 0xf33 @0x0
0x0f33…0f39 lno = 0x067c // 0xf35 @0x2
0x0f33…0f39 at0004 = ╱97╱ REPEAT ╱ // 0xf37 @0x4
0x0f33…0f39 at0005 = EOL // 0xf38 @0x5
0x0f33…0f39 }
0x0f39…0f4e 9ca5 1670 CURSOR 18,12
0x0f39…0f4e LineComalBin {
0x0f39…0f4e ptr = 0x9ca5 // 0xf39 @0x0
0x0f39…0f4e lno = 0x0686 // 0xf3b @0x2
0x0f39…0f4e at0004 = ╱a1╱ CURSOR ╱ // 0xf3d @0x4
0x0f39…0f4e at0005 = ╱31╱1╱ // 0xf3e @0x5
0x0f39…0f4e at0006 = ╱38╱8╱ // 0xf3f @0x6
0x0f39…0f4e at0007 = ╱fe00009005╱ // 0xf40 @0x7
0x0f39…0f4e at000c = ╱ec╱,╱ // 0xf45 @0xc
0x0f39…0f4e at000d = ╱31╱1╱ // 0xf46 @0xd
0x0f39…0f4e at000e = ╱32╱2╱ // 0xf47 @0xe
0x0f39…0f4e at000f = ╱fe0000c004╱ // 0xf48 @0xf
0x0f39…0f4e at0014 = EOL // 0xf4d @0x14
0x0f39…0f4e }
0x0f4e…0f67 9cbe 1680 PRINT "Vælg type "
0x0f4e…0f67 LineComalBin {
0x0f4e…0f67 ptr = 0x9cbe // 0xf4e @0x0
0x0f4e…0f67 lno = 0x0690 // 0xf50 @0x2
0x0f4e…0f67 at0004 = ╱92╱ PRINT ╱ // 0xf52 @0x4
0x0f4e…0f67 at0005 = ╱22╱"╱ // 0xf53 @0x5
0x0f4e…0f67 at0006 = ╱56╱V╱ // 0xf54 @0x6
0x0f4e…0f67 at0007 = ╱7b╱æ╱ // 0xf55 @0x7
0x0f4e…0f67 at0008 = ╱6c╱l╱ // 0xf56 @0x8
0x0f4e…0f67 at0009 = ╱67╱g╱ // 0xf57 @0x9
0x0f4e…0f67 at000a = ╱20╱…╱ // 0xf58 @0xa
0x0f4e…0f67 at000b = ╱74╱t╱ // 0xf59 @0xb
0x0f4e…0f67 at000c = ╱79╱y╱ // 0xf5a @0xc
0x0f4e…0f67 at000d = ╱70╱p╱ // 0xf5b @0xd
0x0f4e…0f67 at000e = ╱65╱e╱ // 0xf5c @0xe
0x0f4e…0f67 at000f = ╱20╱…╱ // 0xf5d @0xf
0x0f4e…0f67 at0010 = ╱20╱…╱ // 0xf5e @0x10
0x0f4e…0f67 at0011 = ╱20╱…╱ // 0xf5f @0x11
0x0f4e…0f67 at0012 = ╱20╱…╱ // 0xf60 @0x12
0x0f4e…0f67 at0013 = ╱20╱…╱ // 0xf61 @0x13
0x0f4e…0f67 at0014 = ╱20╱…╱ // 0xf62 @0x14
0x0f4e…0f67 at0015 = ╱20╱…╱ // 0xf63 @0x15
0x0f4e…0f67 at0016 = ╱20╱…╱ // 0xf64 @0x16
0x0f4e…0f67 at0017 = ╱22╱"╱ // 0xf65 @0x17
0x0f4e…0f67 at0018 = EOL // 0xf66 @0x18
0x0f4e…0f67 }
0x0f67…0f7c 9cd3 1690 CURSOR 28,12
0x0f67…0f7c LineComalBin {
0x0f67…0f7c ptr = 0x9cd3 // 0xf67 @0x0
0x0f67…0f7c lno = 0x069a // 0xf69 @0x2
0x0f67…0f7c at0004 = ╱a1╱ CURSOR ╱ // 0xf6b @0x4
0x0f67…0f7c at0005 = ╱32╱2╱ // 0xf6c @0x5
0x0f67…0f7c at0006 = ╱38╱8╱ // 0xf6d @0x6
0x0f67…0f7c at0007 = ╱fe0000e005╱ // 0xf6e @0x7
0x0f67…0f7c at000c = ╱ec╱,╱ // 0xf73 @0xc
0x0f67…0f7c at000d = ╱31╱1╱ // 0xf74 @0xd
0x0f67…0f7c at000e = ╱32╱2╱ // 0xf75 @0xe
0x0f67…0f7c at000f = ╱fe0000c004╱ // 0xf76 @0xf
0x0f67…0f7c at0014 = EOL // 0xf7b @0x14
0x0f67…0f7c }
0x0f7c…0f84 9cdb 1700 INPUT A$
0x0f7c…0f84 LineComalBin {
0x0f7c…0f84 ptr = 0x9cdb // 0xf7c @0x0
0x0f7c…0f84 lno = 0x06a4 // 0xf7e @0x2
0x0f7c…0f84 at0004 = ╱91╱ INPUT ╱ // 0xf80 @0x4
0x0f7c…0f84 at0005 = ╱41╱A╱ // 0xf81 @0x5
0x0f7c…0f84 at0006 = ╱ef╱$╱ // 0xf82 @0x6
0x0f7c…0f84 at0007 = EOL // 0xf83 @0x7
0x0f7c…0f84 }
0x0f84…0f9c 9cf3 1710 TOTAL=ORD(A$)-48
0x0f84…0f9c LineComalBin {
0x0f84…0f9c ptr = 0x9cf3 // 0xf84 @0x0
0x0f84…0f9c lno = 0x06ae // 0xf86 @0x2
0x0f84…0f9c at0004 = ╱54╱T╱ // 0xf88 @0x4
0x0f84…0f9c at0005 = ╱4f╱O╱ // 0xf89 @0x5
0x0f84…0f9c at0006 = ╱54╱T╱ // 0xf8a @0x6
0x0f84…0f9c at0007 = ╱41╱A╱ // 0xf8b @0x7
0x0f84…0f9c at0008 = ╱4c╱L╱ // 0xf8c @0x8
0x0f84…0f9c at0009 = ╱dc╱=╱ // 0xf8d @0x9
0x0f84…0f9c at000a = ╱cd╱ORD╱ // 0xf8e @0xa
0x0f84…0f9c at000b = ╱ed╱(╱ // 0xf8f @0xb
0x0f84…0f9c at000c = ╱41╱A╱ // 0xf90 @0xc
0x0f84…0f9c at000d = ╱ef╱$╱ // 0xf91 @0xd
0x0f84…0f9c at000e = ╱ee╱)╱ // 0xf92 @0xe
0x0f84…0f9c at000f = ╱e3╱-╱ // 0xf93 @0xf
0x0f84…0f9c at0010 = ╱34╱4╱ // 0xf94 @0x10
0x0f84…0f9c at0011 = ╱38╱8╱ // 0xf95 @0x11
0x0f84…0f9c at0012 = ╱fe0000c006╱ // 0xf96 @0x12
0x0f84…0f9c at0017 = EOL // 0xf9b @0x17
0x0f84…0f9c }
0x0f9c…0fb2 9d09 1720 UNTIL TOTAL>-E AND TOTAL<V
0x0f9c…0fb2 LineComalBin {
0x0f9c…0fb2 ptr = 0x9d09 // 0xf9c @0x0
0x0f9c…0fb2 lno = 0x06b8 // 0xf9e @0x2
0x0f9c…0fb2 at0004 = ╱98╱ UNTIL ╱ // 0xfa0 @0x4
0x0f9c…0fb2 at0005 = ╱54╱T╱ // 0xfa1 @0x5
0x0f9c…0fb2 at0006 = ╱4f╱O╱ // 0xfa2 @0x6
0x0f9c…0fb2 at0007 = ╱54╱T╱ // 0xfa3 @0x7
0x0f9c…0fb2 at0008 = ╱41╱A╱ // 0xfa4 @0x8
0x0f9c…0fb2 at0009 = ╱4c╱L╱ // 0xfa5 @0x9
0x0f9c…0fb2 at000a = ╱de╱>╱ // 0xfa6 @0xa
0x0f9c…0fb2 at000b = ╱e9╱-╱ // 0xfa7 @0xb
0x0f9c…0fb2 at000c = ╱45╱E╱ // 0xfa8 @0xc
0x0f9c…0fb2 at000d = ╱da╱ AND ╱ // 0xfa9 @0xd
0x0f9c…0fb2 at000e = ╱54╱T╱ // 0xfaa @0xe
0x0f9c…0fb2 at000f = ╱4f╱O╱ // 0xfab @0xf
0x0f9c…0fb2 at0010 = ╱54╱T╱ // 0xfac @0x10
0x0f9c…0fb2 at0011 = ╱41╱A╱ // 0xfad @0x11
0x0f9c…0fb2 at0012 = ╱4c╱L╱ // 0xfae @0x12
0x0f9c…0fb2 at0013 = ╱dd╱<╱ // 0xfaf @0x13
0x0f9c…0fb2 at0014 = ╱56╱V╱ // 0xfb0 @0x14
0x0f9c…0fb2 at0015 = EOL // 0xfb1 @0x15
0x0f9c…0fb2 }
0x0fb2…0fc1 9d18 1730 IF TOTAL=B THEN EXIT
0x0fb2…0fc1 LineComalBin {
0x0fb2…0fc1 ptr = 0x9d18 // 0xfb2 @0x0
0x0fb2…0fc1 lno = 0x06c2 // 0xfb4 @0x2
0x0fb2…0fc1 at0004 = ╱82╱ IF ╱ // 0xfb6 @0x4
0x0fb2…0fc1 at0005 = ╱54╱T╱ // 0xfb7 @0x5
0x0fb2…0fc1 at0006 = ╱4f╱O╱ // 0xfb8 @0x6
0x0fb2…0fc1 at0007 = ╱54╱T╱ // 0xfb9 @0x7
0x0fb2…0fc1 at0008 = ╱41╱A╱ // 0xfba @0x8
0x0fb2…0fc1 at0009 = ╱4c╱L╱ // 0xfbb @0x9
0x0fb2…0fc1 at000a = ╱dc╱=╱ // 0xfbc @0xa
0x0fb2…0fc1 at000b = ╱42╱B╱ // 0xfbd @0xb
0x0fb2…0fc1 at000c = ╱b6╱ THEN ╱ // 0xfbe @0xc
0x0fb2…0fc1 at000d = ╱99╱ EXIT ╱ // 0xfbf @0xd
0x0fb2…0fc1 at000e = EOL // 0xfc0 @0xe
0x0fb2…0fc1 }
0x0fc1…0fc7 9d1e 1740 CLEAR
0x0fc1…0fc7 LineComalBin {
0x0fc1…0fc7 ptr = 0x9d1e // 0xfc1 @0x0
0x0fc1…0fc7 lno = 0x06cc // 0xfc3 @0x2
0x0fc1…0fc7 at0004 = ╱a0╱ CLEAR ╱ // 0xfc5 @0x4
0x0fc1…0fc7 at0005 = EOL // 0xfc6 @0x5
0x0fc1…0fc7 }
0x0fc7…0fcd 9d24 1750 REPEAT
0x0fc7…0fcd LineComalBin {
0x0fc7…0fcd ptr = 0x9d24 // 0xfc7 @0x0
0x0fc7…0fcd lno = 0x06d6 // 0xfc9 @0x2
0x0fc7…0fcd at0004 = ╱97╱ REPEAT ╱ // 0xfcb @0x4
0x0fc7…0fcd at0005 = EOL // 0xfcc @0x5
0x0fc7…0fcd }
0x0fcd…0fe2 9d39 1760 CURSOR 15,13
0x0fcd…0fe2 LineComalBin {
0x0fcd…0fe2 ptr = 0x9d39 // 0xfcd @0x0
0x0fcd…0fe2 lno = 0x06e0 // 0xfcf @0x2
0x0fcd…0fe2 at0004 = ╱a1╱ CURSOR ╱ // 0xfd1 @0x4
0x0fcd…0fe2 at0005 = ╱31╱1╱ // 0xfd2 @0x5
0x0fcd…0fe2 at0006 = ╱35╱5╱ // 0xfd3 @0x6
0x0fcd…0fe2 at0007 = ╱fe0000f004╱ // 0xfd4 @0x7
0x0fcd…0fe2 at000c = ╱ec╱,╱ // 0xfd9 @0xc
0x0fcd…0fe2 at000d = ╱31╱1╱ // 0xfda @0xd
0x0fcd…0fe2 at000e = ╱33╱3╱ // 0xfdb @0xe
0x0fcd…0fe2 at000f = ╱fe0000d004╱ // 0xfdc @0xf
0x0fcd…0fe2 at0014 = EOL // 0xfe1 @0x14
0x0fcd…0fe2 }
0x0fe2…1020 9d77 1770 INPUT "Monter papir til udskrift af balance og tast RETURN",A$
0x0fe2…1020 LineComalBin {
0x0fe2…1020 ptr = 0x9d77 // 0xfe2 @0x0
0x0fe2…1020 lno = 0x06ea // 0xfe4 @0x2
0x0fe2…1020 at0004 = ╱91╱ INPUT ╱ // 0xfe6 @0x4
0x0fe2…1020 at0005 = ╱22╱"╱ // 0xfe7 @0x5
0x0fe2…1020 at0006 = ╱4d╱M╱ // 0xfe8 @0x6
0x0fe2…1020 at0007 = ╱6f╱o╱ // 0xfe9 @0x7
0x0fe2…1020 at0008 = ╱6e╱n╱ // 0xfea @0x8
0x0fe2…1020 at0009 = ╱74╱t╱ // 0xfeb @0x9
0x0fe2…1020 at000a = ╱65╱e╱ // 0xfec @0xa
0x0fe2…1020 at000b = ╱72╱r╱ // 0xfed @0xb
0x0fe2…1020 at000c = ╱20╱…╱ // 0xfee @0xc
0x0fe2…1020 at000d = ╱70╱p╱ // 0xfef @0xd
0x0fe2…1020 at000e = ╱61╱a╱ // 0xff0 @0xe
0x0fe2…1020 at000f = ╱70╱p╱ // 0xff1 @0xf
0x0fe2…1020 at0010 = ╱69╱i╱ // 0xff2 @0x10
0x0fe2…1020 at0011 = ╱72╱r╱ // 0xff3 @0x11
0x0fe2…1020 at0012 = ╱20╱…╱ // 0xff4 @0x12
0x0fe2…1020 at0013 = ╱74╱t╱ // 0xff5 @0x13
0x0fe2…1020 at0014 = ╱69╱i╱ // 0xff6 @0x14
0x0fe2…1020 at0015 = ╱6c╱l╱ // 0xff7 @0x15
0x0fe2…1020 at0016 = ╱20╱…╱ // 0xff8 @0x16
0x0fe2…1020 at0017 = ╱75╱u╱ // 0xff9 @0x17
0x0fe2…1020 at0018 = ╱64╱d╱ // 0xffa @0x18
0x0fe2…1020 at0019 = ╱73╱s╱ // 0xffb @0x19
0x0fe2…1020 at001a = ╱6b╱k╱ // 0xffc @0x1a
0x0fe2…1020 at001b = ╱72╱r╱ // 0xffd @0x1b
0x0fe2…1020 at001c = ╱69╱i╱ // 0xffe @0x1c
0x0fe2…1020 at001d = ╱66╱f╱ // 0xfff @0x1d
0x0fe2…1020 at001e = ╱74╱t╱ // 0x1000 @0x1e
0x0fe2…1020 at001f = ╱20╱…╱ // 0x1001 @0x1f
0x0fe2…1020 at0020 = ╱61╱a╱ // 0x1002 @0x20
0x0fe2…1020 at0021 = ╱66╱f╱ // 0x1003 @0x21
0x0fe2…1020 at0022 = ╱20╱…╱ // 0x1004 @0x22
0x0fe2…1020 at0023 = ╱62╱b╱ // 0x1005 @0x23
0x0fe2…1020 at0024 = ╱61╱a╱ // 0x1006 @0x24
0x0fe2…1020 at0025 = ╱6c╱l╱ // 0x1007 @0x25
0x0fe2…1020 at0026 = ╱61╱a╱ // 0x1008 @0x26
0x0fe2…1020 at0027 = ╱6e╱n╱ // 0x1009 @0x27
0x0fe2…1020 at0028 = ╱63╱c╱ // 0x100a @0x28
0x0fe2…1020 at0029 = ╱65╱e╱ // 0x100b @0x29
0x0fe2…1020 at002a = ╱20╱…╱ // 0x100c @0x2a
0x0fe2…1020 at002b = ╱6f╱o╱ // 0x100d @0x2b
0x0fe2…1020 at002c = ╱67╱g╱ // 0x100e @0x2c
0x0fe2…1020 at002d = ╱20╱…╱ // 0x100f @0x2d
0x0fe2…1020 at002e = ╱74╱t╱ // 0x1010 @0x2e
0x0fe2…1020 at002f = ╱61╱a╱ // 0x1011 @0x2f
0x0fe2…1020 at0030 = ╱73╱s╱ // 0x1012 @0x30
0x0fe2…1020 at0031 = ╱74╱t╱ // 0x1013 @0x31
0x0fe2…1020 at0032 = ╱20╱…╱ // 0x1014 @0x32
0x0fe2…1020 at0033 = ╱52╱R╱ // 0x1015 @0x33
0x0fe2…1020 at0034 = ╱45╱E╱ // 0x1016 @0x34
0x0fe2…1020 at0035 = ╱54╱T╱ // 0x1017 @0x35
0x0fe2…1020 at0036 = ╱55╱U╱ // 0x1018 @0x36
0x0fe2…1020 at0037 = ╱52╱R╱ // 0x1019 @0x37
0x0fe2…1020 at0038 = ╱4e╱N╱ // 0x101a @0x38
0x0fe2…1020 at0039 = ╱22╱"╱ // 0x101b @0x39
0x0fe2…1020 at003a = ╱ec╱,╱ // 0x101c @0x3a
0x0fe2…1020 at003b = ╱41╱A╱ // 0x101d @0x3b
0x0fe2…1020 at003c = ╱ef╱$╱ // 0x101e @0x3c
0x0fe2…1020 at003d = EOL // 0x101f @0x3d
0x0fe2…1020 }
0x1020…1034 9d8b 1780 UNTIL ORD(A$)=255
0x1020…1034 LineComalBin {
0x1020…1034 ptr = 0x9d8b // 0x1020 @0x0
0x1020…1034 lno = 0x06f4 // 0x1022 @0x2
0x1020…1034 at0004 = ╱98╱ UNTIL ╱ // 0x1024 @0x4
0x1020…1034 at0005 = ╱cd╱ORD╱ // 0x1025 @0x5
0x1020…1034 at0006 = ╱ed╱(╱ // 0x1026 @0x6
0x1020…1034 at0007 = ╱41╱A╱ // 0x1027 @0x7
0x1020…1034 at0008 = ╱ef╱$╱ // 0x1028 @0x8
0x1020…1034 at0009 = ╱ee╱)╱ // 0x1029 @0x9
0x1020…1034 at000a = ╱dc╱=╱ // 0x102a @0xa
0x1020…1034 at000b = ╱32╱2╱ // 0x102b @0xb
0x1020…1034 at000c = ╱35╱5╱ // 0x102c @0xc
0x1020…1034 at000d = ╱35╱5╱ // 0x102d @0xd
0x1020…1034 at000e = ╱fe0000ff08╱ // 0x102e @0xe
0x1020…1034 at0013 = EOL // 0x1033 @0x13
0x1020…1034 }
0x1034…107e 9dd5 1790 BSIDE=E;GLNAVN$=BLANK$;LINIE=E;SALDO1$="0+";SALDO2$="0+";SALDO3$="0+"
0x1034…107e LineComalBin {
0x1034…107e ptr = 0x9dd5 // 0x1034 @0x0
0x1034…107e lno = 0x06fe // 0x1036 @0x2
0x1034…107e at0004 = ╱42╱B╱ // 0x1038 @0x4
0x1034…107e at0005 = ╱53╱S╱ // 0x1039 @0x5
0x1034…107e at0006 = ╱49╱I╱ // 0x103a @0x6
0x1034…107e at0007 = ╱44╱D╱ // 0x103b @0x7
0x1034…107e at0008 = ╱45╱E╱ // 0x103c @0x8
0x1034…107e at0009 = ╱dc╱=╱ // 0x103d @0x9
0x1034…107e at000a = ╱45╱E╱ // 0x103e @0xa
0x1034…107e at000b = ╱eb╱;╱ // 0x103f @0xb
0x1034…107e at000c = ╱47╱G╱ // 0x1040 @0xc
0x1034…107e at000d = ╱4c╱L╱ // 0x1041 @0xd
0x1034…107e at000e = ╱4e╱N╱ // 0x1042 @0xe
0x1034…107e at000f = ╱41╱A╱ // 0x1043 @0xf
0x1034…107e at0010 = ╱56╱V╱ // 0x1044 @0x10
0x1034…107e at0011 = ╱4e╱N╱ // 0x1045 @0x11
0x1034…107e at0012 = ╱ef╱$╱ // 0x1046 @0x12
0x1034…107e at0013 = ╱dc╱=╱ // 0x1047 @0x13
0x1034…107e at0014 = ╱42╱B╱ // 0x1048 @0x14
0x1034…107e at0015 = ╱4c╱L╱ // 0x1049 @0x15
0x1034…107e at0016 = ╱41╱A╱ // 0x104a @0x16
0x1034…107e at0017 = ╱4e╱N╱ // 0x104b @0x17
0x1034…107e at0018 = ╱4b╱K╱ // 0x104c @0x18
0x1034…107e at0019 = ╱ef╱$╱ // 0x104d @0x19
0x1034…107e at001a = ╱eb╱;╱ // 0x104e @0x1a
0x1034…107e at001b = ╱4c╱L╱ // 0x104f @0x1b
0x1034…107e at001c = ╱49╱I╱ // 0x1050 @0x1c
0x1034…107e at001d = ╱4e╱N╱ // 0x1051 @0x1d
0x1034…107e at001e = ╱49╱I╱ // 0x1052 @0x1e
0x1034…107e at001f = ╱45╱E╱ // 0x1053 @0x1f
0x1034…107e at0020 = ╱dc╱=╱ // 0x1054 @0x20
0x1034…107e at0021 = ╱45╱E╱ // 0x1055 @0x21
0x1034…107e at0022 = ╱eb╱;╱ // 0x1056 @0x22
0x1034…107e at0023 = ╱53╱S╱ // 0x1057 @0x23
0x1034…107e at0024 = ╱41╱A╱ // 0x1058 @0x24
0x1034…107e at0025 = ╱4c╱L╱ // 0x1059 @0x25
0x1034…107e at0026 = ╱44╱D╱ // 0x105a @0x26
0x1034…107e at0027 = ╱4f╱O╱ // 0x105b @0x27
0x1034…107e at0028 = ╱31╱1╱ // 0x105c @0x28
0x1034…107e at0029 = ╱ef╱$╱ // 0x105d @0x29
0x1034…107e at002a = ╱dc╱=╱ // 0x105e @0x2a
0x1034…107e at002b = ╱22╱"╱ // 0x105f @0x2b
0x1034…107e at002c = ╱30╱0╱ // 0x1060 @0x2c
0x1034…107e at002d = ╱2b╱+╱ // 0x1061 @0x2d
0x1034…107e at002e = ╱22╱"╱ // 0x1062 @0x2e
0x1034…107e at002f = ╱eb╱;╱ // 0x1063 @0x2f
0x1034…107e at0030 = ╱53╱S╱ // 0x1064 @0x30
0x1034…107e at0031 = ╱41╱A╱ // 0x1065 @0x31
0x1034…107e at0032 = ╱4c╱L╱ // 0x1066 @0x32
0x1034…107e at0033 = ╱44╱D╱ // 0x1067 @0x33
0x1034…107e at0034 = ╱4f╱O╱ // 0x1068 @0x34
0x1034…107e at0035 = ╱32╱2╱ // 0x1069 @0x35
0x1034…107e at0036 = ╱ef╱$╱ // 0x106a @0x36
0x1034…107e at0037 = ╱dc╱=╱ // 0x106b @0x37
0x1034…107e at0038 = ╱22╱"╱ // 0x106c @0x38
0x1034…107e at0039 = ╱30╱0╱ // 0x106d @0x39
0x1034…107e at003a = ╱2b╱+╱ // 0x106e @0x3a
0x1034…107e at003b = ╱22╱"╱ // 0x106f @0x3b
0x1034…107e at003c = ╱eb╱;╱ // 0x1070 @0x3c
0x1034…107e at003d = ╱53╱S╱ // 0x1071 @0x3d
0x1034…107e at003e = ╱41╱A╱ // 0x1072 @0x3e
0x1034…107e at003f = ╱4c╱L╱ // 0x1073 @0x3f
0x1034…107e at0040 = ╱44╱D╱ // 0x1074 @0x40
0x1034…107e at0041 = ╱4f╱O╱ // 0x1075 @0x41
0x1034…107e at0042 = ╱33╱3╱ // 0x1076 @0x42
0x1034…107e at0043 = ╱ef╱$╱ // 0x1077 @0x43
0x1034…107e at0044 = ╱dc╱=╱ // 0x1078 @0x44
0x1034…107e at0045 = ╱22╱"╱ // 0x1079 @0x45
0x1034…107e at0046 = ╱30╱0╱ // 0x107a @0x46
0x1034…107e at0047 = ╱2b╱+╱ // 0x107b @0x47
0x1034…107e at0048 = ╱22╱"╱ // 0x107c @0x48
0x1034…107e at0049 = EOL // 0x107d @0x49
0x1034…107e }
0x107e…10cb 9e22 1800 SALDO3$="0+";SALDO11$="0+";SALDO12$="0+";SALDO13$="0+";TAL4$="0+";GFNR=B
0x107e…10cb LineComalBin {
0x107e…10cb ptr = 0x9e22 // 0x107e @0x0
0x107e…10cb lno = 0x0708 // 0x1080 @0x2
0x107e…10cb at0004 = ╱53╱S╱ // 0x1082 @0x4
0x107e…10cb at0005 = ╱41╱A╱ // 0x1083 @0x5
0x107e…10cb at0006 = ╱4c╱L╱ // 0x1084 @0x6
0x107e…10cb at0007 = ╱44╱D╱ // 0x1085 @0x7
0x107e…10cb at0008 = ╱4f╱O╱ // 0x1086 @0x8
0x107e…10cb at0009 = ╱33╱3╱ // 0x1087 @0x9
0x107e…10cb at000a = ╱ef╱$╱ // 0x1088 @0xa
0x107e…10cb at000b = ╱dc╱=╱ // 0x1089 @0xb
0x107e…10cb at000c = ╱22╱"╱ // 0x108a @0xc
0x107e…10cb at000d = ╱30╱0╱ // 0x108b @0xd
0x107e…10cb at000e = ╱2b╱+╱ // 0x108c @0xe
0x107e…10cb at000f = ╱22╱"╱ // 0x108d @0xf
0x107e…10cb at0010 = ╱eb╱;╱ // 0x108e @0x10
0x107e…10cb at0011 = ╱53╱S╱ // 0x108f @0x11
0x107e…10cb at0012 = ╱41╱A╱ // 0x1090 @0x12
0x107e…10cb at0013 = ╱4c╱L╱ // 0x1091 @0x13
0x107e…10cb at0014 = ╱44╱D╱ // 0x1092 @0x14
0x107e…10cb at0015 = ╱4f╱O╱ // 0x1093 @0x15
0x107e…10cb at0016 = ╱31╱1╱ // 0x1094 @0x16
0x107e…10cb at0017 = ╱31╱1╱ // 0x1095 @0x17
0x107e…10cb at0018 = ╱ef╱$╱ // 0x1096 @0x18
0x107e…10cb at0019 = ╱dc╱=╱ // 0x1097 @0x19
0x107e…10cb at001a = ╱22╱"╱ // 0x1098 @0x1a
0x107e…10cb at001b = ╱30╱0╱ // 0x1099 @0x1b
0x107e…10cb at001c = ╱2b╱+╱ // 0x109a @0x1c
0x107e…10cb at001d = ╱22╱"╱ // 0x109b @0x1d
0x107e…10cb at001e = ╱eb╱;╱ // 0x109c @0x1e
0x107e…10cb at001f = ╱53╱S╱ // 0x109d @0x1f
0x107e…10cb at0020 = ╱41╱A╱ // 0x109e @0x20
0x107e…10cb at0021 = ╱4c╱L╱ // 0x109f @0x21
0x107e…10cb at0022 = ╱44╱D╱ // 0x10a0 @0x22
0x107e…10cb at0023 = ╱4f╱O╱ // 0x10a1 @0x23
0x107e…10cb at0024 = ╱31╱1╱ // 0x10a2 @0x24
0x107e…10cb at0025 = ╱32╱2╱ // 0x10a3 @0x25
0x107e…10cb at0026 = ╱ef╱$╱ // 0x10a4 @0x26
0x107e…10cb at0027 = ╱dc╱=╱ // 0x10a5 @0x27
0x107e…10cb at0028 = ╱22╱"╱ // 0x10a6 @0x28
0x107e…10cb at0029 = ╱30╱0╱ // 0x10a7 @0x29
0x107e…10cb at002a = ╱2b╱+╱ // 0x10a8 @0x2a
0x107e…10cb at002b = ╱22╱"╱ // 0x10a9 @0x2b
0x107e…10cb at002c = ╱eb╱;╱ // 0x10aa @0x2c
0x107e…10cb at002d = ╱53╱S╱ // 0x10ab @0x2d
0x107e…10cb at002e = ╱41╱A╱ // 0x10ac @0x2e
0x107e…10cb at002f = ╱4c╱L╱ // 0x10ad @0x2f
0x107e…10cb at0030 = ╱44╱D╱ // 0x10ae @0x30
0x107e…10cb at0031 = ╱4f╱O╱ // 0x10af @0x31
0x107e…10cb at0032 = ╱31╱1╱ // 0x10b0 @0x32
0x107e…10cb at0033 = ╱33╱3╱ // 0x10b1 @0x33
0x107e…10cb at0034 = ╱ef╱$╱ // 0x10b2 @0x34
0x107e…10cb at0035 = ╱dc╱=╱ // 0x10b3 @0x35
0x107e…10cb at0036 = ╱22╱"╱ // 0x10b4 @0x36
0x107e…10cb at0037 = ╱30╱0╱ // 0x10b5 @0x37
0x107e…10cb at0038 = ╱2b╱+╱ // 0x10b6 @0x38
0x107e…10cb at0039 = ╱22╱"╱ // 0x10b7 @0x39
0x107e…10cb at003a = ╱eb╱;╱ // 0x10b8 @0x3a
0x107e…10cb at003b = ╱54╱T╱ // 0x10b9 @0x3b
0x107e…10cb at003c = ╱41╱A╱ // 0x10ba @0x3c
0x107e…10cb at003d = ╱4c╱L╱ // 0x10bb @0x3d
0x107e…10cb at003e = ╱34╱4╱ // 0x10bc @0x3e
0x107e…10cb at003f = ╱ef╱$╱ // 0x10bd @0x3f
0x107e…10cb at0040 = ╱dc╱=╱ // 0x10be @0x40
0x107e…10cb at0041 = ╱22╱"╱ // 0x10bf @0x41
0x107e…10cb at0042 = ╱30╱0╱ // 0x10c0 @0x42
0x107e…10cb at0043 = ╱2b╱+╱ // 0x10c1 @0x43
0x107e…10cb at0044 = ╱22╱"╱ // 0x10c2 @0x44
0x107e…10cb at0045 = ╱eb╱;╱ // 0x10c3 @0x45
0x107e…10cb at0046 = ╱47╱G╱ // 0x10c4 @0x46
0x107e…10cb at0047 = ╱46╱F╱ // 0x10c5 @0x47
0x107e…10cb at0048 = ╱4e╱N╱ // 0x10c6 @0x48
0x107e…10cb at0049 = ╱52╱R╱ // 0x10c7 @0x49
0x107e…10cb at004a = ╱dc╱=╱ // 0x10c8 @0x4a
0x107e…10cb at004b = ╱42╱B╱ // 0x10c9 @0x4b
0x107e…10cb at004c = EOL // 0x10ca @0x4c
0x107e…10cb }
0x10cb…1102 9e59 1810 SALDO4$="0+";SALDO14$="0+";GFNR1=B;GLNAVN1$=BLANK$
0x10cb…1102 LineComalBin {
0x10cb…1102 ptr = 0x9e59 // 0x10cb @0x0
0x10cb…1102 lno = 0x0712 // 0x10cd @0x2
0x10cb…1102 at0004 = ╱53╱S╱ // 0x10cf @0x4
0x10cb…1102 at0005 = ╱41╱A╱ // 0x10d0 @0x5
0x10cb…1102 at0006 = ╱4c╱L╱ // 0x10d1 @0x6
0x10cb…1102 at0007 = ╱44╱D╱ // 0x10d2 @0x7
0x10cb…1102 at0008 = ╱4f╱O╱ // 0x10d3 @0x8
0x10cb…1102 at0009 = ╱34╱4╱ // 0x10d4 @0x9
0x10cb…1102 at000a = ╱ef╱$╱ // 0x10d5 @0xa
0x10cb…1102 at000b = ╱dc╱=╱ // 0x10d6 @0xb
0x10cb…1102 at000c = ╱22╱"╱ // 0x10d7 @0xc
0x10cb…1102 at000d = ╱30╱0╱ // 0x10d8 @0xd
0x10cb…1102 at000e = ╱2b╱+╱ // 0x10d9 @0xe
0x10cb…1102 at000f = ╱22╱"╱ // 0x10da @0xf
0x10cb…1102 at0010 = ╱eb╱;╱ // 0x10db @0x10
0x10cb…1102 at0011 = ╱53╱S╱ // 0x10dc @0x11
0x10cb…1102 at0012 = ╱41╱A╱ // 0x10dd @0x12
0x10cb…1102 at0013 = ╱4c╱L╱ // 0x10de @0x13
0x10cb…1102 at0014 = ╱44╱D╱ // 0x10df @0x14
0x10cb…1102 at0015 = ╱4f╱O╱ // 0x10e0 @0x15
0x10cb…1102 at0016 = ╱31╱1╱ // 0x10e1 @0x16
0x10cb…1102 at0017 = ╱34╱4╱ // 0x10e2 @0x17
0x10cb…1102 at0018 = ╱ef╱$╱ // 0x10e3 @0x18
0x10cb…1102 at0019 = ╱dc╱=╱ // 0x10e4 @0x19
0x10cb…1102 at001a = ╱22╱"╱ // 0x10e5 @0x1a
0x10cb…1102 at001b = ╱30╱0╱ // 0x10e6 @0x1b
0x10cb…1102 at001c = ╱2b╱+╱ // 0x10e7 @0x1c
0x10cb…1102 at001d = ╱22╱"╱ // 0x10e8 @0x1d
0x10cb…1102 at001e = ╱eb╱;╱ // 0x10e9 @0x1e
0x10cb…1102 at001f = ╱47╱G╱ // 0x10ea @0x1f
0x10cb…1102 at0020 = ╱46╱F╱ // 0x10eb @0x20
0x10cb…1102 at0021 = ╱4e╱N╱ // 0x10ec @0x21
0x10cb…1102 at0022 = ╱52╱R╱ // 0x10ed @0x22
0x10cb…1102 at0023 = ╱31╱1╱ // 0x10ee @0x23
0x10cb…1102 at0024 = ╱dc╱=╱ // 0x10ef @0x24
0x10cb…1102 at0025 = ╱42╱B╱ // 0x10f0 @0x25
0x10cb…1102 at0026 = ╱eb╱;╱ // 0x10f1 @0x26
0x10cb…1102 at0027 = ╱47╱G╱ // 0x10f2 @0x27
0x10cb…1102 at0028 = ╱4c╱L╱ // 0x10f3 @0x28
0x10cb…1102 at0029 = ╱4e╱N╱ // 0x10f4 @0x29
0x10cb…1102 at002a = ╱41╱A╱ // 0x10f5 @0x2a
0x10cb…1102 at002b = ╱56╱V╱ // 0x10f6 @0x2b
0x10cb…1102 at002c = ╱4e╱N╱ // 0x10f7 @0x2c
0x10cb…1102 at002d = ╱31╱1╱ // 0x10f8 @0x2d
0x10cb…1102 at002e = ╱ef╱$╱ // 0x10f9 @0x2e
0x10cb…1102 at002f = ╱dc╱=╱ // 0x10fa @0x2f
0x10cb…1102 at0030 = ╱42╱B╱ // 0x10fb @0x30
0x10cb…1102 at0031 = ╱4c╱L╱ // 0x10fc @0x31
0x10cb…1102 at0032 = ╱41╱A╱ // 0x10fd @0x32
0x10cb…1102 at0033 = ╱4e╱N╱ // 0x10fe @0x33
0x10cb…1102 at0034 = ╱4b╱K╱ // 0x10ff @0x34
0x10cb…1102 at0035 = ╱ef╱$╱ // 0x1100 @0x35
0x10cb…1102 at0036 = EOL // 0x1101 @0x36
0x10cb…1102 }
0x1102…1109 9e60 1820 OUTPUT P
0x1102…1109 LineComalBin {
0x1102…1109 ptr = 0x9e60 // 0x1102 @0x0
0x1102…1109 lno = 0x071c // 0x1104 @0x2
0x1102…1109 at0004 = ╱a5╱ OUTPUT ╱ // 0x1106 @0x4
0x1102…1109 at0005 = ╱50╱P╱ // 0x1107 @0x5
0x1102…1109 at0006 = EOL // 0x1108 @0x6
0x1102…1109 }
0x1109…1128 9e7f 1830 EXEC HOVEDUD(T1(7),BSIDE)
0x1109…1128 LineComalBin {
0x1109…1128 ptr = 0x9e7f // 0x1109 @0x0
0x1109…1128 lno = 0x0726 // 0x110b @0x2
0x1109…1128 at0004 = ╱9d╱ EXEC ╱ // 0x110d @0x4
0x1109…1128 at0005 = ╱48╱H╱ // 0x110e @0x5
0x1109…1128 at0006 = ╱4f╱O╱ // 0x110f @0x6
0x1109…1128 at0007 = ╱56╱V╱ // 0x1110 @0x7
0x1109…1128 at0008 = ╱45╱E╱ // 0x1111 @0x8
0x1109…1128 at0009 = ╱44╱D╱ // 0x1112 @0x9
0x1109…1128 at000a = ╱55╱U╱ // 0x1113 @0xa
0x1109…1128 at000b = ╱44╱D╱ // 0x1114 @0xb
0x1109…1128 at000c = ╱ed╱(╱ // 0x1115 @0xc
0x1109…1128 at000d = ╱54╱T╱ // 0x1116 @0xd
0x1109…1128 at000e = ╱31╱1╱ // 0x1117 @0xe
0x1109…1128 at000f = ╱ed╱(╱ // 0x1118 @0xf
0x1109…1128 at0010 = ╱37╱7╱ // 0x1119 @0x10
0x1109…1128 at0011 = ╱fe0000e003╱ // 0x111a @0x11
0x1109…1128 at0016 = ╱ee╱)╱ // 0x111f @0x16
0x1109…1128 at0017 = ╱ec╱,╱ // 0x1120 @0x17
0x1109…1128 at0018 = ╱42╱B╱ // 0x1121 @0x18
0x1109…1128 at0019 = ╱53╱S╱ // 0x1122 @0x19
0x1109…1128 at001a = ╱49╱I╱ // 0x1123 @0x1a
0x1109…1128 at001b = ╱44╱D╱ // 0x1124 @0x1b
0x1109…1128 at001c = ╱45╱E╱ // 0x1125 @0x1c
0x1109…1128 at001d = ╱ee╱)╱ // 0x1126 @0x1d
0x1109…1128 at001e = EOL // 0x1127 @0x1e
0x1109…1128 }
0x1128…113a 9e91 1840 FOR FPIL3=E TO AFIN
0x1128…113a LineComalBin {
0x1128…113a ptr = 0x9e91 // 0x1128 @0x0
0x1128…113a lno = 0x0730 // 0x112a @0x2
0x1128…113a at0004 = ╱83╱ FOR ╱ // 0x112c @0x4
0x1128…113a at0005 = ╱46╱F╱ // 0x112d @0x5
0x1128…113a at0006 = ╱50╱P╱ // 0x112e @0x6
0x1128…113a at0007 = ╱49╱I╱ // 0x112f @0x7
0x1128…113a at0008 = ╱4c╱L╱ // 0x1130 @0x8
0x1128…113a at0009 = ╱33╱3╱ // 0x1131 @0x9
0x1128…113a at000a = ╱dc╱=╱ // 0x1132 @0xa
0x1128…113a at000b = ╱45╱E╱ // 0x1133 @0xb
0x1128…113a at000c = ╱b7╱ TO ╱ // 0x1134 @0xc
0x1128…113a at000d = ╱41╱A╱ // 0x1135 @0xd
0x1128…113a at000e = ╱46╱F╱ // 0x1136 @0xe
0x1128…113a at000f = ╱49╱I╱ // 0x1137 @0xf
0x1128…113a at0010 = ╱4e╱N╱ // 0x1138 @0x10
0x1128…113a at0011 = EOL // 0x1139 @0x11
0x1128…113a }
0x113a…115b 9eb2 1850 IF FTAB(FPIL3,E)=100000 THEN EXIT
0x113a…115b LineComalBin {
0x113a…115b ptr = 0x9eb2 // 0x113a @0x0
0x113a…115b lno = 0x073a // 0x113c @0x2
0x113a…115b at0004 = ╱82╱ IF ╱ // 0x113e @0x4
0x113a…115b at0005 = ╱46╱F╱ // 0x113f @0x5
0x113a…115b at0006 = ╱54╱T╱ // 0x1140 @0x6
0x113a…115b at0007 = ╱41╱A╱ // 0x1141 @0x7
0x113a…115b at0008 = ╱42╱B╱ // 0x1142 @0x8
0x113a…115b at0009 = ╱ed╱(╱ // 0x1143 @0x9
0x113a…115b at000a = ╱46╱F╱ // 0x1144 @0xa
0x113a…115b at000b = ╱50╱P╱ // 0x1145 @0xb
0x113a…115b at000c = ╱49╱I╱ // 0x1146 @0xc
0x113a…115b at000d = ╱4c╱L╱ // 0x1147 @0xd
0x113a…115b at000e = ╱33╱3╱ // 0x1148 @0xe
0x113a…115b at000f = ╱ec╱,╱ // 0x1149 @0xf
0x113a…115b at0010 = ╱45╱E╱ // 0x114a @0x10
0x113a…115b at0011 = ╱ee╱)╱ // 0x114b @0x11
0x113a…115b at0012 = ╱dc╱=╱ // 0x114c @0x12
0x113a…115b at0013 = ╱31╱1╱ // 0x114d @0x13
0x113a…115b at0014 = ╱30╱0╱ // 0x114e @0x14
0x113a…115b at0015 = ╱30╱0╱ // 0x114f @0x15
0x113a…115b at0016 = ╱30╱0╱ // 0x1150 @0x16
0x113a…115b at0017 = ╱30╱0╱ // 0x1151 @0x17
0x113a…115b at0018 = ╱30╱0╱ // 0x1152 @0x18
0x113a…115b at0019 = ╱fe0050c311╱ // 0x1153 @0x19
0x113a…115b at001e = ╱b6╱ THEN ╱ // 0x1158 @0x1e
0x113a…115b at001f = ╱99╱ EXIT ╱ // 0x1159 @0x1f
0x113a…115b at0020 = EOL // 0x115a @0x20
0x113a…115b }
0x115b…1169 9ec0 1860 EXEC HENTPOST
0x115b…1169 LineComalBin {
0x115b…1169 ptr = 0x9ec0 // 0x115b @0x0
0x115b…1169 lno = 0x0744 // 0x115d @0x2
0x115b…1169 at0004 = ╱9d╱ EXEC ╱ // 0x115f @0x4
0x115b…1169 at0005 = ╱48╱H╱ // 0x1160 @0x5
0x115b…1169 at0006 = ╱45╱E╱ // 0x1161 @0x6
0x115b…1169 at0007 = ╱4e╱N╱ // 0x1162 @0x7
0x115b…1169 at0008 = ╱54╱T╱ // 0x1163 @0x8
0x115b…1169 at0009 = ╱50╱P╱ // 0x1164 @0x9
0x115b…1169 at000a = ╱4f╱O╱ // 0x1165 @0xa
0x115b…1169 at000b = ╱53╱S╱ // 0x1166 @0xb
0x115b…1169 at000c = ╱54╱T╱ // 0x1167 @0xc
0x115b…1169 at000d = EOL // 0x1168 @0xd
0x115b…1169 }
0x1169…1189 9ee0 1870 FGRUP=INT(ORD(FUKODE$)-48)
0x1169…1189 LineComalBin {
0x1169…1189 ptr = 0x9ee0 // 0x1169 @0x0
0x1169…1189 lno = 0x074e // 0x116b @0x2
0x1169…1189 at0004 = ╱46╱F╱ // 0x116d @0x4
0x1169…1189 at0005 = ╱47╱G╱ // 0x116e @0x5
0x1169…1189 at0006 = ╱52╱R╱ // 0x116f @0x6
0x1169…1189 at0007 = ╱55╱U╱ // 0x1170 @0x7
0x1169…1189 at0008 = ╱50╱P╱ // 0x1171 @0x8
0x1169…1189 at0009 = ╱dc╱=╱ // 0x1172 @0x9
0x1169…1189 at000a = ╱c6╱INT╱ // 0x1173 @0xa
0x1169…1189 at000b = ╱ed╱(╱ // 0x1174 @0xb
0x1169…1189 at000c = ╱cd╱ORD╱ // 0x1175 @0xc
0x1169…1189 at000d = ╱ed╱(╱ // 0x1176 @0xd
0x1169…1189 at000e = ╱46╱F╱ // 0x1177 @0xe
0x1169…1189 at000f = ╱55╱U╱ // 0x1178 @0xf
0x1169…1189 at0010 = ╱4b╱K╱ // 0x1179 @0x10
0x1169…1189 at0011 = ╱4f╱O╱ // 0x117a @0x11
0x1169…1189 at0012 = ╱44╱D╱ // 0x117b @0x12
0x1169…1189 at0013 = ╱45╱E╱ // 0x117c @0x13
0x1169…1189 at0014 = ╱ef╱$╱ // 0x117d @0x14
0x1169…1189 at0015 = ╱ee╱)╱ // 0x117e @0x15
0x1169…1189 at0016 = ╱e3╱-╱ // 0x117f @0x16
0x1169…1189 at0017 = ╱34╱4╱ // 0x1180 @0x17
0x1169…1189 at0018 = ╱38╱8╱ // 0x1181 @0x18
0x1169…1189 at0019 = ╱fe0000c006╱ // 0x1182 @0x19
0x1169…1189 at001e = ╱ee╱)╱ // 0x1187 @0x1e
0x1169…1189 at001f = EOL // 0x1188 @0x1f
0x1169…1189 }
0x1189…11af 9f06 1880 EXEC CALC(B,FMDEBET$,FMKREDIT$,FMDK$)
0x1189…11af LineComalBin {
0x1189…11af ptr = 0x9f06 // 0x1189 @0x0
0x1189…11af lno = 0x0758 // 0x118b @0x2
0x1189…11af at0004 = ╱9d╱ EXEC ╱ // 0x118d @0x4
0x1189…11af at0005 = ╱43╱C╱ // 0x118e @0x5
0x1189…11af at0006 = ╱41╱A╱ // 0x118f @0x6
0x1189…11af at0007 = ╱4c╱L╱ // 0x1190 @0x7
0x1189…11af at0008 = ╱43╱C╱ // 0x1191 @0x8
0x1189…11af at0009 = ╱ed╱(╱ // 0x1192 @0x9
0x1189…11af at000a = ╱42╱B╱ // 0x1193 @0xa
0x1189…11af at000b = ╱ec╱,╱ // 0x1194 @0xb
0x1189…11af at000c = ╱46╱F╱ // 0x1195 @0xc
0x1189…11af at000d = ╱4d╱M╱ // 0x1196 @0xd
0x1189…11af at000e = ╱44╱D╱ // 0x1197 @0xe
0x1189…11af at000f = ╱45╱E╱ // 0x1198 @0xf
0x1189…11af at0010 = ╱42╱B╱ // 0x1199 @0x10
0x1189…11af at0011 = ╱45╱E╱ // 0x119a @0x11
0x1189…11af at0012 = ╱54╱T╱ // 0x119b @0x12
0x1189…11af at0013 = ╱ef╱$╱ // 0x119c @0x13
0x1189…11af at0014 = ╱ec╱,╱ // 0x119d @0x14
0x1189…11af at0015 = ╱46╱F╱ // 0x119e @0x15
0x1189…11af at0016 = ╱4d╱M╱ // 0x119f @0x16
0x1189…11af at0017 = ╱4b╱K╱ // 0x11a0 @0x17
0x1189…11af at0018 = ╱52╱R╱ // 0x11a1 @0x18
0x1189…11af at0019 = ╱45╱E╱ // 0x11a2 @0x19
0x1189…11af at001a = ╱44╱D╱ // 0x11a3 @0x1a
0x1189…11af at001b = ╱49╱I╱ // 0x11a4 @0x1b
0x1189…11af at001c = ╱54╱T╱ // 0x11a5 @0x1c
0x1189…11af at001d = ╱ef╱$╱ // 0x11a6 @0x1d
0x1189…11af at001e = ╱ec╱,╱ // 0x11a7 @0x1e
0x1189…11af at001f = ╱46╱F╱ // 0x11a8 @0x1f
0x1189…11af at0020 = ╱4d╱M╱ // 0x11a9 @0x20
0x1189…11af at0021 = ╱44╱D╱ // 0x11aa @0x21
0x1189…11af at0022 = ╱4b╱K╱ // 0x11ab @0x22
0x1189…11af at0023 = ╱ef╱$╱ // 0x11ac @0x23
0x1189…11af at0024 = ╱ee╱)╱ // 0x11ad @0x24
0x1189…11af at0025 = EOL // 0x11ae @0x25
0x1189…11af }
0x11af…11d5 9f2c 1890 EXEC CALC(B,FÅDEBET$,FÅKREDIT$,FÅDK$)
0x11af…11d5 LineComalBin {
0x11af…11d5 ptr = 0x9f2c // 0x11af @0x0
0x11af…11d5 lno = 0x0762 // 0x11b1 @0x2
0x11af…11d5 at0004 = ╱9d╱ EXEC ╱ // 0x11b3 @0x4
0x11af…11d5 at0005 = ╱43╱C╱ // 0x11b4 @0x5
0x11af…11d5 at0006 = ╱41╱A╱ // 0x11b5 @0x6
0x11af…11d5 at0007 = ╱4c╱L╱ // 0x11b6 @0x7
0x11af…11d5 at0008 = ╱43╱C╱ // 0x11b7 @0x8
0x11af…11d5 at0009 = ╱ed╱(╱ // 0x11b8 @0x9
0x11af…11d5 at000a = ╱42╱B╱ // 0x11b9 @0xa
0x11af…11d5 at000b = ╱ec╱,╱ // 0x11ba @0xb
0x11af…11d5 at000c = ╱46╱F╱ // 0x11bb @0xc
0x11af…11d5 at000d = ╱5d╱Å╱ // 0x11bc @0xd
0x11af…11d5 at000e = ╱44╱D╱ // 0x11bd @0xe
0x11af…11d5 at000f = ╱45╱E╱ // 0x11be @0xf
0x11af…11d5 at0010 = ╱42╱B╱ // 0x11bf @0x10
0x11af…11d5 at0011 = ╱45╱E╱ // 0x11c0 @0x11
0x11af…11d5 at0012 = ╱54╱T╱ // 0x11c1 @0x12
0x11af…11d5 at0013 = ╱ef╱$╱ // 0x11c2 @0x13
0x11af…11d5 at0014 = ╱ec╱,╱ // 0x11c3 @0x14
0x11af…11d5 at0015 = ╱46╱F╱ // 0x11c4 @0x15
0x11af…11d5 at0016 = ╱5d╱Å╱ // 0x11c5 @0x16
0x11af…11d5 at0017 = ╱4b╱K╱ // 0x11c6 @0x17
0x11af…11d5 at0018 = ╱52╱R╱ // 0x11c7 @0x18
0x11af…11d5 at0019 = ╱45╱E╱ // 0x11c8 @0x19
0x11af…11d5 at001a = ╱44╱D╱ // 0x11c9 @0x1a
0x11af…11d5 at001b = ╱49╱I╱ // 0x11ca @0x1b
0x11af…11d5 at001c = ╱54╱T╱ // 0x11cb @0x1c
0x11af…11d5 at001d = ╱ef╱$╱ // 0x11cc @0x1d
0x11af…11d5 at001e = ╱ec╱,╱ // 0x11cd @0x1e
0x11af…11d5 at001f = ╱46╱F╱ // 0x11ce @0x1f
0x11af…11d5 at0020 = ╱5d╱Å╱ // 0x11cf @0x20
0x11af…11d5 at0021 = ╱44╱D╱ // 0x11d0 @0x21
0x11af…11d5 at0022 = ╱4b╱K╱ // 0x11d1 @0x22
0x11af…11d5 at0023 = ╱ef╱$╱ // 0x11d2 @0x23
0x11af…11d5 at0024 = ╱ee╱)╱ // 0x11d3 @0x24
0x11af…11d5 at0025 = EOL // 0x11d4 @0x25
0x11af…11d5 }
0x11d5…11e2 9f39 1900 CASE FGRUP OF
0x11d5…11e2 LineComalBin {
0x11d5…11e2 ptr = 0x9f39 // 0x11d5 @0x0
0x11d5…11e2 lno = 0x076c // 0x11d7 @0x2
0x11d5…11e2 at0004 = ╱a201╱ CASE ╱ // 0x11d9 @0x4
0x11d5…11e2 at0006 = ╱46╱F╱ // 0x11db @0x6
0x11d5…11e2 at0007 = ╱47╱G╱ // 0x11dc @0x7
0x11d5…11e2 at0008 = ╱52╱R╱ // 0x11dd @0x8
0x11d5…11e2 at0009 = ╱55╱U╱ // 0x11de @0x9
0x11d5…11e2 at000a = ╱50╱P╱ // 0x11df @0xa
0x11d5…11e2 at000b = ╱ba╱ OF ╱ // 0x11e0 @0xb
0x11d5…11e2 at000c = EOL // 0x11e1 @0xc
0x11d5…11e2 }
0x11e2…11e8 9f3f 1910 STOP
0x11e2…11e8 LineComalBin {
0x11e2…11e8 ptr = 0x9f3f // 0x11e2 @0x0
0x11e2…11e8 lno = 0x0776 // 0x11e4 @0x2
0x11e2…11e8 at0004 = ╱8d╱ STOP ╱ // 0x11e6 @0x4
0x11e2…11e8 at0005 = EOL // 0x11e7 @0x5
0x11e2…11e8 }
0x11e8…11f0 9f47 1920 WHEN B
0x11e8…11f0 LineComalBin {
0x11e8…11f0 ptr = 0x9f47 // 0x11e8 @0x0
0x11e8…11f0 lno = 0x0780 // 0x11ea @0x2
0x11e8…11f0 at0004 = ╱a301╱ WHEN ╱ // 0x11ec @0x4
0x11e8…11f0 at0006 = ╱42╱B╱ // 0x11ee @0x6
0x11e8…11f0 at0007 = EOL // 0x11ef @0x7
0x11e8…11f0 }
0x11f0…11fe 9f55 1930 IF TOTAL=E THEN
0x11f0…11fe LineComalBin {
0x11f0…11fe ptr = 0x9f55 // 0x11f0 @0x0
0x11f0…11fe lno = 0x078a // 0x11f2 @0x2
0x11f0…11fe at0004 = ╱9c╱ IF ╱ // 0x11f4 @0x4
0x11f0…11fe at0005 = ╱54╱T╱ // 0x11f5 @0x5
0x11f0…11fe at0006 = ╱4f╱O╱ // 0x11f6 @0x6
0x11f0…11fe at0007 = ╱54╱T╱ // 0x11f7 @0x7
0x11f0…11fe at0008 = ╱41╱A╱ // 0x11f8 @0x8
0x11f0…11fe at0009 = ╱4c╱L╱ // 0x11f9 @0x9
0x11f0…11fe at000a = ╱dc╱=╱ // 0x11fa @0xa
0x11f0…11fe at000b = ╱45╱E╱ // 0x11fb @0xb
0x11f0…11fe at000c = ╱b6╱ THEN ╱ // 0x11fc @0xc
0x11f0…11fe at000d = EOL // 0x11fd @0xd
0x11f0…11fe }
0x11fe…1227 9f7e 1940 IF LINIE>39 THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x11fe…1227 LineComalBin {
0x11fe…1227 ptr = 0x9f7e // 0x11fe @0x0
0x11fe…1227 lno = 0x0794 // 0x1200 @0x2
0x11fe…1227 at0004 = ╱82╱ IF ╱ // 0x1202 @0x4
0x11fe…1227 at0005 = ╱4c╱L╱ // 0x1203 @0x5
0x11fe…1227 at0006 = ╱49╱I╱ // 0x1204 @0x6
0x11fe…1227 at0007 = ╱4e╱N╱ // 0x1205 @0x7
0x11fe…1227 at0008 = ╱49╱I╱ // 0x1206 @0x8
0x11fe…1227 at0009 = ╱45╱E╱ // 0x1207 @0x9
0x11fe…1227 at000a = ╱de╱>╱ // 0x1208 @0xa
0x11fe…1227 at000b = ╱33╱3╱ // 0x1209 @0xb
0x11fe…1227 at000c = ╱39╱9╱ // 0x120a @0xc
0x11fe…1227 at000d = ╱fe00009c06╱ // 0x120b @0xd
0x11fe…1227 at0012 = ╱b6╱ THEN ╱ // 0x1210 @0x12
0x11fe…1227 at0013 = ╱9d╱ EXEC ╱ // 0x1211 @0x13
0x11fe…1227 at0014 = ╱4e╱N╱ // 0x1212 @0x14
0x11fe…1227 at0015 = ╱59╱Y╱ // 0x1213 @0x15
0x11fe…1227 at0016 = ╱53╱S╱ // 0x1214 @0x16
0x11fe…1227 at0017 = ╱49╱I╱ // 0x1215 @0x17
0x11fe…1227 at0018 = ╱44╱D╱ // 0x1216 @0x18
0x11fe…1227 at0019 = ╱45╱E╱ // 0x1217 @0x19
0x11fe…1227 at001a = ╱ed╱(╱ // 0x1218 @0x1a
0x11fe…1227 at001b = ╱47╱G╱ // 0x1219 @0x1b
0x11fe…1227 at001c = ╱46╱F╱ // 0x121a @0x1c
0x11fe…1227 at001d = ╱4e╱N╱ // 0x121b @0x1d
0x11fe…1227 at001e = ╱52╱R╱ // 0x121c @0x1e
0x11fe…1227 at001f = ╱ec╱,╱ // 0x121d @0x1f
0x11fe…1227 at0020 = ╱47╱G╱ // 0x121e @0x20
0x11fe…1227 at0021 = ╱4c╱L╱ // 0x121f @0x21
0x11fe…1227 at0022 = ╱4e╱N╱ // 0x1220 @0x22
0x11fe…1227 at0023 = ╱41╱A╱ // 0x1221 @0x23
0x11fe…1227 at0024 = ╱56╱V╱ // 0x1222 @0x24
0x11fe…1227 at0025 = ╱4e╱N╱ // 0x1223 @0x25
0x11fe…1227 at0026 = ╱ef╱$╱ // 0x1224 @0x26
0x11fe…1227 at0027 = ╱ee╱)╱ // 0x1225 @0x27
0x11fe…1227 at0028 = EOL // 0x1226 @0x28
0x11fe…1227 }
0x1227…124c 9fa3 1950 EXEC LINIEUD(FNR,FNAVN$,FMDK$,FÅDK$)
0x1227…124c LineComalBin {
0x1227…124c ptr = 0x9fa3 // 0x1227 @0x0
0x1227…124c lno = 0x079e // 0x1229 @0x2
0x1227…124c at0004 = ╱9d╱ EXEC ╱ // 0x122b @0x4
0x1227…124c at0005 = ╱4c╱L╱ // 0x122c @0x5
0x1227…124c at0006 = ╱49╱I╱ // 0x122d @0x6
0x1227…124c at0007 = ╱4e╱N╱ // 0x122e @0x7
0x1227…124c at0008 = ╱49╱I╱ // 0x122f @0x8
0x1227…124c at0009 = ╱45╱E╱ // 0x1230 @0x9
0x1227…124c at000a = ╱55╱U╱ // 0x1231 @0xa
0x1227…124c at000b = ╱44╱D╱ // 0x1232 @0xb
0x1227…124c at000c = ╱ed╱(╱ // 0x1233 @0xc
0x1227…124c at000d = ╱46╱F╱ // 0x1234 @0xd
0x1227…124c at000e = ╱4e╱N╱ // 0x1235 @0xe
0x1227…124c at000f = ╱52╱R╱ // 0x1236 @0xf
0x1227…124c at0010 = ╱ec╱,╱ // 0x1237 @0x10
0x1227…124c at0011 = ╱46╱F╱ // 0x1238 @0x11
0x1227…124c at0012 = ╱4e╱N╱ // 0x1239 @0x12
0x1227…124c at0013 = ╱41╱A╱ // 0x123a @0x13
0x1227…124c at0014 = ╱56╱V╱ // 0x123b @0x14
0x1227…124c at0015 = ╱4e╱N╱ // 0x123c @0x15
0x1227…124c at0016 = ╱ef╱$╱ // 0x123d @0x16
0x1227…124c at0017 = ╱ec╱,╱ // 0x123e @0x17
0x1227…124c at0018 = ╱46╱F╱ // 0x123f @0x18
0x1227…124c at0019 = ╱4d╱M╱ // 0x1240 @0x19
0x1227…124c at001a = ╱44╱D╱ // 0x1241 @0x1a
0x1227…124c at001b = ╱4b╱K╱ // 0x1242 @0x1b
0x1227…124c at001c = ╱ef╱$╱ // 0x1243 @0x1c
0x1227…124c at001d = ╱ec╱,╱ // 0x1244 @0x1d
0x1227…124c at001e = ╱46╱F╱ // 0x1245 @0x1e
0x1227…124c at001f = ╱5d╱Å╱ // 0x1246 @0x1f
0x1227…124c at0020 = ╱44╱D╱ // 0x1247 @0x20
0x1227…124c at0021 = ╱4b╱K╱ // 0x1248 @0x21
0x1227…124c at0022 = ╱ef╱$╱ // 0x1249 @0x22
0x1227…124c at0023 = ╱ee╱)╱ // 0x124a @0x23
0x1227…124c at0024 = EOL // 0x124b @0x24
0x1227…124c }
0x124c…125e 9fb5 1960 LINIE=LINIE+E
0x124c…125e LineComalBin {
0x124c…125e ptr = 0x9fb5 // 0x124c @0x0
0x124c…125e lno = 0x07a8 // 0x124e @0x2
0x124c…125e at0004 = ╱4c╱L╱ // 0x1250 @0x4
0x124c…125e at0005 = ╱49╱I╱ // 0x1251 @0x5
0x124c…125e at0006 = ╱4e╱N╱ // 0x1252 @0x6
0x124c…125e at0007 = ╱49╱I╱ // 0x1253 @0x7
0x124c…125e at0008 = ╱45╱E╱ // 0x1254 @0x8
0x124c…125e at0009 = ╱dc╱=╱ // 0x1255 @0x9
0x124c…125e at000a = ╱4c╱L╱ // 0x1256 @0xa
0x124c…125e at000b = ╱49╱I╱ // 0x1257 @0xb
0x124c…125e at000c = ╱4e╱N╱ // 0x1258 @0xc
0x124c…125e at000d = ╱49╱I╱ // 0x1259 @0xd
0x124c…125e at000e = ╱45╱E╱ // 0x125a @0xe
0x124c…125e at000f = ╱e2╱+╱ // 0x125b @0xf
0x124c…125e at0010 = ╱45╱E╱ // 0x125c @0x10
0x124c…125e at0011 = EOL // 0x125d @0x11
0x124c…125e }
0x125e…1264 9fbb 1970 ENDIF
0x125e…1264 LineComalBin {
0x125e…1264 ptr = 0x9fbb // 0x125e @0x0
0x125e…1264 lno = 0x07b2 // 0x1260 @0x2
0x125e…1264 at0004 = ╱9b╱ ENDIF ╱ // 0x1262 @0x4
0x125e…1264 at0005 = EOL // 0x1263 @0x5
0x125e…1264 }
0x1264…1287 9fde 1980 EXEC CALC(B,SALDO1$,FMDK$,SALDO1$)
0x1264…1287 LineComalBin {
0x1264…1287 ptr = 0x9fde // 0x1264 @0x0
0x1264…1287 lno = 0x07bc // 0x1266 @0x2
0x1264…1287 at0004 = ╱9d╱ EXEC ╱ // 0x1268 @0x4
0x1264…1287 at0005 = ╱43╱C╱ // 0x1269 @0x5
0x1264…1287 at0006 = ╱41╱A╱ // 0x126a @0x6
0x1264…1287 at0007 = ╱4c╱L╱ // 0x126b @0x7
0x1264…1287 at0008 = ╱43╱C╱ // 0x126c @0x8
0x1264…1287 at0009 = ╱ed╱(╱ // 0x126d @0x9
0x1264…1287 at000a = ╱42╱B╱ // 0x126e @0xa
0x1264…1287 at000b = ╱ec╱,╱ // 0x126f @0xb
0x1264…1287 at000c = ╱53╱S╱ // 0x1270 @0xc
0x1264…1287 at000d = ╱41╱A╱ // 0x1271 @0xd
0x1264…1287 at000e = ╱4c╱L╱ // 0x1272 @0xe
0x1264…1287 at000f = ╱44╱D╱ // 0x1273 @0xf
0x1264…1287 at0010 = ╱4f╱O╱ // 0x1274 @0x10
0x1264…1287 at0011 = ╱31╱1╱ // 0x1275 @0x11
0x1264…1287 at0012 = ╱ef╱$╱ // 0x1276 @0x12
0x1264…1287 at0013 = ╱ec╱,╱ // 0x1277 @0x13
0x1264…1287 at0014 = ╱46╱F╱ // 0x1278 @0x14
0x1264…1287 at0015 = ╱4d╱M╱ // 0x1279 @0x15
0x1264…1287 at0016 = ╱44╱D╱ // 0x127a @0x16
0x1264…1287 at0017 = ╱4b╱K╱ // 0x127b @0x17
0x1264…1287 at0018 = ╱ef╱$╱ // 0x127c @0x18
0x1264…1287 at0019 = ╱ec╱,╱ // 0x127d @0x19
0x1264…1287 at001a = ╱53╱S╱ // 0x127e @0x1a
0x1264…1287 at001b = ╱41╱A╱ // 0x127f @0x1b
0x1264…1287 at001c = ╱4c╱L╱ // 0x1280 @0x1c
0x1264…1287 at001d = ╱44╱D╱ // 0x1281 @0x1d
0x1264…1287 at001e = ╱4f╱O╱ // 0x1282 @0x1e
0x1264…1287 at001f = ╱31╱1╱ // 0x1283 @0x1f
0x1264…1287 at0020 = ╱ef╱$╱ // 0x1284 @0x20
0x1264…1287 at0021 = ╱ee╱)╱ // 0x1285 @0x21
0x1264…1287 at0022 = EOL // 0x1286 @0x22
0x1264…1287 }
0x1287…12ac a003 1990 EXEC CALC(B,SALDO11$,FÅDK$,SALDO11$)
0x1287…12ac LineComalBin {
0x1287…12ac ptr = 0xa003 // 0x1287 @0x0
0x1287…12ac lno = 0x07c6 // 0x1289 @0x2
0x1287…12ac at0004 = ╱9d╱ EXEC ╱ // 0x128b @0x4
0x1287…12ac at0005 = ╱43╱C╱ // 0x128c @0x5
0x1287…12ac at0006 = ╱41╱A╱ // 0x128d @0x6
0x1287…12ac at0007 = ╱4c╱L╱ // 0x128e @0x7
0x1287…12ac at0008 = ╱43╱C╱ // 0x128f @0x8
0x1287…12ac at0009 = ╱ed╱(╱ // 0x1290 @0x9
0x1287…12ac at000a = ╱42╱B╱ // 0x1291 @0xa
0x1287…12ac at000b = ╱ec╱,╱ // 0x1292 @0xb
0x1287…12ac at000c = ╱53╱S╱ // 0x1293 @0xc
0x1287…12ac at000d = ╱41╱A╱ // 0x1294 @0xd
0x1287…12ac at000e = ╱4c╱L╱ // 0x1295 @0xe
0x1287…12ac at000f = ╱44╱D╱ // 0x1296 @0xf
0x1287…12ac at0010 = ╱4f╱O╱ // 0x1297 @0x10
0x1287…12ac at0011 = ╱31╱1╱ // 0x1298 @0x11
0x1287…12ac at0012 = ╱31╱1╱ // 0x1299 @0x12
0x1287…12ac at0013 = ╱ef╱$╱ // 0x129a @0x13
0x1287…12ac at0014 = ╱ec╱,╱ // 0x129b @0x14
0x1287…12ac at0015 = ╱46╱F╱ // 0x129c @0x15
0x1287…12ac at0016 = ╱5d╱Å╱ // 0x129d @0x16
0x1287…12ac at0017 = ╱44╱D╱ // 0x129e @0x17
0x1287…12ac at0018 = ╱4b╱K╱ // 0x129f @0x18
0x1287…12ac at0019 = ╱ef╱$╱ // 0x12a0 @0x19
0x1287…12ac at001a = ╱ec╱,╱ // 0x12a1 @0x1a
0x1287…12ac at001b = ╱53╱S╱ // 0x12a2 @0x1b
0x1287…12ac at001c = ╱41╱A╱ // 0x12a3 @0x1c
0x1287…12ac at001d = ╱4c╱L╱ // 0x12a4 @0x1d
0x1287…12ac at001e = ╱44╱D╱ // 0x12a5 @0x1e
0x1287…12ac at001f = ╱4f╱O╱ // 0x12a6 @0x1f
0x1287…12ac at0020 = ╱31╱1╱ // 0x12a7 @0x20
0x1287…12ac at0021 = ╱31╱1╱ // 0x12a8 @0x21
0x1287…12ac at0022 = ╱ef╱$╱ // 0x12a9 @0x22
0x1287…12ac at0023 = ╱ee╱)╱ // 0x12aa @0x23
0x1287…12ac at0024 = EOL // 0x12ab @0x24
0x1287…12ac }
0x12ac…12cf a026 2000 EXEC CALC(B,SALDO2$,FMDK$,SALDO2$)
0x12ac…12cf LineComalBin {
0x12ac…12cf ptr = 0xa026 // 0x12ac @0x0
0x12ac…12cf lno = 0x07d0 // 0x12ae @0x2
0x12ac…12cf at0004 = ╱9d╱ EXEC ╱ // 0x12b0 @0x4
0x12ac…12cf at0005 = ╱43╱C╱ // 0x12b1 @0x5
0x12ac…12cf at0006 = ╱41╱A╱ // 0x12b2 @0x6
0x12ac…12cf at0007 = ╱4c╱L╱ // 0x12b3 @0x7
0x12ac…12cf at0008 = ╱43╱C╱ // 0x12b4 @0x8
0x12ac…12cf at0009 = ╱ed╱(╱ // 0x12b5 @0x9
0x12ac…12cf at000a = ╱42╱B╱ // 0x12b6 @0xa
0x12ac…12cf at000b = ╱ec╱,╱ // 0x12b7 @0xb
0x12ac…12cf at000c = ╱53╱S╱ // 0x12b8 @0xc
0x12ac…12cf at000d = ╱41╱A╱ // 0x12b9 @0xd
0x12ac…12cf at000e = ╱4c╱L╱ // 0x12ba @0xe
0x12ac…12cf at000f = ╱44╱D╱ // 0x12bb @0xf
0x12ac…12cf at0010 = ╱4f╱O╱ // 0x12bc @0x10
0x12ac…12cf at0011 = ╱32╱2╱ // 0x12bd @0x11
0x12ac…12cf at0012 = ╱ef╱$╱ // 0x12be @0x12
0x12ac…12cf at0013 = ╱ec╱,╱ // 0x12bf @0x13
0x12ac…12cf at0014 = ╱46╱F╱ // 0x12c0 @0x14
0x12ac…12cf at0015 = ╱4d╱M╱ // 0x12c1 @0x15
0x12ac…12cf at0016 = ╱44╱D╱ // 0x12c2 @0x16
0x12ac…12cf at0017 = ╱4b╱K╱ // 0x12c3 @0x17
0x12ac…12cf at0018 = ╱ef╱$╱ // 0x12c4 @0x18
0x12ac…12cf at0019 = ╱ec╱,╱ // 0x12c5 @0x19
0x12ac…12cf at001a = ╱53╱S╱ // 0x12c6 @0x1a
0x12ac…12cf at001b = ╱41╱A╱ // 0x12c7 @0x1b
0x12ac…12cf at001c = ╱4c╱L╱ // 0x12c8 @0x1c
0x12ac…12cf at001d = ╱44╱D╱ // 0x12c9 @0x1d
0x12ac…12cf at001e = ╱4f╱O╱ // 0x12ca @0x1e
0x12ac…12cf at001f = ╱32╱2╱ // 0x12cb @0x1f
0x12ac…12cf at0020 = ╱ef╱$╱ // 0x12cc @0x20
0x12ac…12cf at0021 = ╱ee╱)╱ // 0x12cd @0x21
0x12ac…12cf at0022 = EOL // 0x12ce @0x22
0x12ac…12cf }
0x12cf…12f4 a04b 2010 EXEC CALC(B,SALDO12$,FÅDK$,SALDO12$)
0x12cf…12f4 LineComalBin {
0x12cf…12f4 ptr = 0xa04b // 0x12cf @0x0
0x12cf…12f4 lno = 0x07da // 0x12d1 @0x2
0x12cf…12f4 at0004 = ╱9d╱ EXEC ╱ // 0x12d3 @0x4
0x12cf…12f4 at0005 = ╱43╱C╱ // 0x12d4 @0x5
0x12cf…12f4 at0006 = ╱41╱A╱ // 0x12d5 @0x6
0x12cf…12f4 at0007 = ╱4c╱L╱ // 0x12d6 @0x7
0x12cf…12f4 at0008 = ╱43╱C╱ // 0x12d7 @0x8
0x12cf…12f4 at0009 = ╱ed╱(╱ // 0x12d8 @0x9
0x12cf…12f4 at000a = ╱42╱B╱ // 0x12d9 @0xa
0x12cf…12f4 at000b = ╱ec╱,╱ // 0x12da @0xb
0x12cf…12f4 at000c = ╱53╱S╱ // 0x12db @0xc
0x12cf…12f4 at000d = ╱41╱A╱ // 0x12dc @0xd
0x12cf…12f4 at000e = ╱4c╱L╱ // 0x12dd @0xe
0x12cf…12f4 at000f = ╱44╱D╱ // 0x12de @0xf
0x12cf…12f4 at0010 = ╱4f╱O╱ // 0x12df @0x10
0x12cf…12f4 at0011 = ╱31╱1╱ // 0x12e0 @0x11
0x12cf…12f4 at0012 = ╱32╱2╱ // 0x12e1 @0x12
0x12cf…12f4 at0013 = ╱ef╱$╱ // 0x12e2 @0x13
0x12cf…12f4 at0014 = ╱ec╱,╱ // 0x12e3 @0x14
0x12cf…12f4 at0015 = ╱46╱F╱ // 0x12e4 @0x15
0x12cf…12f4 at0016 = ╱5d╱Å╱ // 0x12e5 @0x16
0x12cf…12f4 at0017 = ╱44╱D╱ // 0x12e6 @0x17
0x12cf…12f4 at0018 = ╱4b╱K╱ // 0x12e7 @0x18
0x12cf…12f4 at0019 = ╱ef╱$╱ // 0x12e8 @0x19
0x12cf…12f4 at001a = ╱ec╱,╱ // 0x12e9 @0x1a
0x12cf…12f4 at001b = ╱53╱S╱ // 0x12ea @0x1b
0x12cf…12f4 at001c = ╱41╱A╱ // 0x12eb @0x1c
0x12cf…12f4 at001d = ╱4c╱L╱ // 0x12ec @0x1d
0x12cf…12f4 at001e = ╱44╱D╱ // 0x12ed @0x1e
0x12cf…12f4 at001f = ╱4f╱O╱ // 0x12ee @0x1f
0x12cf…12f4 at0020 = ╱31╱1╱ // 0x12ef @0x20
0x12cf…12f4 at0021 = ╱32╱2╱ // 0x12f0 @0x21
0x12cf…12f4 at0022 = ╱ef╱$╱ // 0x12f1 @0x22
0x12cf…12f4 at0023 = ╱ee╱)╱ // 0x12f2 @0x23
0x12cf…12f4 at0024 = EOL // 0x12f3 @0x24
0x12cf…12f4 }
0x12f4…1317 a06e 2020 EXEC CALC(B,SALDO3$,FMDK$,SALDO3$)
0x12f4…1317 LineComalBin {
0x12f4…1317 ptr = 0xa06e // 0x12f4 @0x0
0x12f4…1317 lno = 0x07e4 // 0x12f6 @0x2
0x12f4…1317 at0004 = ╱9d╱ EXEC ╱ // 0x12f8 @0x4
0x12f4…1317 at0005 = ╱43╱C╱ // 0x12f9 @0x5
0x12f4…1317 at0006 = ╱41╱A╱ // 0x12fa @0x6
0x12f4…1317 at0007 = ╱4c╱L╱ // 0x12fb @0x7
0x12f4…1317 at0008 = ╱43╱C╱ // 0x12fc @0x8
0x12f4…1317 at0009 = ╱ed╱(╱ // 0x12fd @0x9
0x12f4…1317 at000a = ╱42╱B╱ // 0x12fe @0xa
0x12f4…1317 at000b = ╱ec╱,╱ // 0x12ff @0xb
0x12f4…1317 at000c = ╱53╱S╱ // 0x1300 @0xc
0x12f4…1317 at000d = ╱41╱A╱ // 0x1301 @0xd
0x12f4…1317 at000e = ╱4c╱L╱ // 0x1302 @0xe
0x12f4…1317 at000f = ╱44╱D╱ // 0x1303 @0xf
0x12f4…1317 at0010 = ╱4f╱O╱ // 0x1304 @0x10
0x12f4…1317 at0011 = ╱33╱3╱ // 0x1305 @0x11
0x12f4…1317 at0012 = ╱ef╱$╱ // 0x1306 @0x12
0x12f4…1317 at0013 = ╱ec╱,╱ // 0x1307 @0x13
0x12f4…1317 at0014 = ╱46╱F╱ // 0x1308 @0x14
0x12f4…1317 at0015 = ╱4d╱M╱ // 0x1309 @0x15
0x12f4…1317 at0016 = ╱44╱D╱ // 0x130a @0x16
0x12f4…1317 at0017 = ╱4b╱K╱ // 0x130b @0x17
0x12f4…1317 at0018 = ╱ef╱$╱ // 0x130c @0x18
0x12f4…1317 at0019 = ╱ec╱,╱ // 0x130d @0x19
0x12f4…1317 at001a = ╱53╱S╱ // 0x130e @0x1a
0x12f4…1317 at001b = ╱41╱A╱ // 0x130f @0x1b
0x12f4…1317 at001c = ╱4c╱L╱ // 0x1310 @0x1c
0x12f4…1317 at001d = ╱44╱D╱ // 0x1311 @0x1d
0x12f4…1317 at001e = ╱4f╱O╱ // 0x1312 @0x1e
0x12f4…1317 at001f = ╱33╱3╱ // 0x1313 @0x1f
0x12f4…1317 at0020 = ╱ef╱$╱ // 0x1314 @0x20
0x12f4…1317 at0021 = ╱ee╱)╱ // 0x1315 @0x21
0x12f4…1317 at0022 = EOL // 0x1316 @0x22
0x12f4…1317 }
0x1317…133c a093 2030 EXEC CALC(B,SALDO13$,FÅDK$,SALDO13$)
0x1317…133c LineComalBin {
0x1317…133c ptr = 0xa093 // 0x1317 @0x0
0x1317…133c lno = 0x07ee // 0x1319 @0x2
0x1317…133c at0004 = ╱9d╱ EXEC ╱ // 0x131b @0x4
0x1317…133c at0005 = ╱43╱C╱ // 0x131c @0x5
0x1317…133c at0006 = ╱41╱A╱ // 0x131d @0x6
0x1317…133c at0007 = ╱4c╱L╱ // 0x131e @0x7
0x1317…133c at0008 = ╱43╱C╱ // 0x131f @0x8
0x1317…133c at0009 = ╱ed╱(╱ // 0x1320 @0x9
0x1317…133c at000a = ╱42╱B╱ // 0x1321 @0xa
0x1317…133c at000b = ╱ec╱,╱ // 0x1322 @0xb
0x1317…133c at000c = ╱53╱S╱ // 0x1323 @0xc
0x1317…133c at000d = ╱41╱A╱ // 0x1324 @0xd
0x1317…133c at000e = ╱4c╱L╱ // 0x1325 @0xe
0x1317…133c at000f = ╱44╱D╱ // 0x1326 @0xf
0x1317…133c at0010 = ╱4f╱O╱ // 0x1327 @0x10
0x1317…133c at0011 = ╱31╱1╱ // 0x1328 @0x11
0x1317…133c at0012 = ╱33╱3╱ // 0x1329 @0x12
0x1317…133c at0013 = ╱ef╱$╱ // 0x132a @0x13
0x1317…133c at0014 = ╱ec╱,╱ // 0x132b @0x14
0x1317…133c at0015 = ╱46╱F╱ // 0x132c @0x15
0x1317…133c at0016 = ╱5d╱Å╱ // 0x132d @0x16
0x1317…133c at0017 = ╱44╱D╱ // 0x132e @0x17
0x1317…133c at0018 = ╱4b╱K╱ // 0x132f @0x18
0x1317…133c at0019 = ╱ef╱$╱ // 0x1330 @0x19
0x1317…133c at001a = ╱ec╱,╱ // 0x1331 @0x1a
0x1317…133c at001b = ╱53╱S╱ // 0x1332 @0x1b
0x1317…133c at001c = ╱41╱A╱ // 0x1333 @0x1c
0x1317…133c at001d = ╱4c╱L╱ // 0x1334 @0x1d
0x1317…133c at001e = ╱44╱D╱ // 0x1335 @0x1e
0x1317…133c at001f = ╱4f╱O╱ // 0x1336 @0x1f
0x1317…133c at0020 = ╱31╱1╱ // 0x1337 @0x20
0x1317…133c at0021 = ╱33╱3╱ // 0x1338 @0x21
0x1317…133c at0022 = ╱ef╱$╱ // 0x1339 @0x22
0x1317…133c at0023 = ╱ee╱)╱ // 0x133a @0x23
0x1317…133c at0024 = EOL // 0x133b @0x24
0x1317…133c }
0x133c…135f a0b6 2040 EXEC CALC(B,SALDO4$,FMDK$,SALDO4$)
0x133c…135f LineComalBin {
0x133c…135f ptr = 0xa0b6 // 0x133c @0x0
0x133c…135f lno = 0x07f8 // 0x133e @0x2
0x133c…135f at0004 = ╱9d╱ EXEC ╱ // 0x1340 @0x4
0x133c…135f at0005 = ╱43╱C╱ // 0x1341 @0x5
0x133c…135f at0006 = ╱41╱A╱ // 0x1342 @0x6
0x133c…135f at0007 = ╱4c╱L╱ // 0x1343 @0x7
0x133c…135f at0008 = ╱43╱C╱ // 0x1344 @0x8
0x133c…135f at0009 = ╱ed╱(╱ // 0x1345 @0x9
0x133c…135f at000a = ╱42╱B╱ // 0x1346 @0xa
0x133c…135f at000b = ╱ec╱,╱ // 0x1347 @0xb
0x133c…135f at000c = ╱53╱S╱ // 0x1348 @0xc
0x133c…135f at000d = ╱41╱A╱ // 0x1349 @0xd
0x133c…135f at000e = ╱4c╱L╱ // 0x134a @0xe
0x133c…135f at000f = ╱44╱D╱ // 0x134b @0xf
0x133c…135f at0010 = ╱4f╱O╱ // 0x134c @0x10
0x133c…135f at0011 = ╱34╱4╱ // 0x134d @0x11
0x133c…135f at0012 = ╱ef╱$╱ // 0x134e @0x12
0x133c…135f at0013 = ╱ec╱,╱ // 0x134f @0x13
0x133c…135f at0014 = ╱46╱F╱ // 0x1350 @0x14
0x133c…135f at0015 = ╱4d╱M╱ // 0x1351 @0x15
0x133c…135f at0016 = ╱44╱D╱ // 0x1352 @0x16
0x133c…135f at0017 = ╱4b╱K╱ // 0x1353 @0x17
0x133c…135f at0018 = ╱ef╱$╱ // 0x1354 @0x18
0x133c…135f at0019 = ╱ec╱,╱ // 0x1355 @0x19
0x133c…135f at001a = ╱53╱S╱ // 0x1356 @0x1a
0x133c…135f at001b = ╱41╱A╱ // 0x1357 @0x1b
0x133c…135f at001c = ╱4c╱L╱ // 0x1358 @0x1c
0x133c…135f at001d = ╱44╱D╱ // 0x1359 @0x1d
0x133c…135f at001e = ╱4f╱O╱ // 0x135a @0x1e
0x133c…135f at001f = ╱34╱4╱ // 0x135b @0x1f
0x133c…135f at0020 = ╱ef╱$╱ // 0x135c @0x20
0x133c…135f at0021 = ╱ee╱)╱ // 0x135d @0x21
0x133c…135f at0022 = EOL // 0x135e @0x22
0x133c…135f }
0x135f…1384 a0db 2050 EXEC CALC(B,SALDO14$,FÅDK$,SALDO14$)
0x135f…1384 LineComalBin {
0x135f…1384 ptr = 0xa0db // 0x135f @0x0
0x135f…1384 lno = 0x0802 // 0x1361 @0x2
0x135f…1384 at0004 = ╱9d╱ EXEC ╱ // 0x1363 @0x4
0x135f…1384 at0005 = ╱43╱C╱ // 0x1364 @0x5
0x135f…1384 at0006 = ╱41╱A╱ // 0x1365 @0x6
0x135f…1384 at0007 = ╱4c╱L╱ // 0x1366 @0x7
0x135f…1384 at0008 = ╱43╱C╱ // 0x1367 @0x8
0x135f…1384 at0009 = ╱ed╱(╱ // 0x1368 @0x9
0x135f…1384 at000a = ╱42╱B╱ // 0x1369 @0xa
0x135f…1384 at000b = ╱ec╱,╱ // 0x136a @0xb
0x135f…1384 at000c = ╱53╱S╱ // 0x136b @0xc
0x135f…1384 at000d = ╱41╱A╱ // 0x136c @0xd
0x135f…1384 at000e = ╱4c╱L╱ // 0x136d @0xe
0x135f…1384 at000f = ╱44╱D╱ // 0x136e @0xf
0x135f…1384 at0010 = ╱4f╱O╱ // 0x136f @0x10
0x135f…1384 at0011 = ╱31╱1╱ // 0x1370 @0x11
0x135f…1384 at0012 = ╱34╱4╱ // 0x1371 @0x12
0x135f…1384 at0013 = ╱ef╱$╱ // 0x1372 @0x13
0x135f…1384 at0014 = ╱ec╱,╱ // 0x1373 @0x14
0x135f…1384 at0015 = ╱46╱F╱ // 0x1374 @0x15
0x135f…1384 at0016 = ╱5d╱Å╱ // 0x1375 @0x16
0x135f…1384 at0017 = ╱44╱D╱ // 0x1376 @0x17
0x135f…1384 at0018 = ╱4b╱K╱ // 0x1377 @0x18
0x135f…1384 at0019 = ╱ef╱$╱ // 0x1378 @0x19
0x135f…1384 at001a = ╱ec╱,╱ // 0x1379 @0x1a
0x135f…1384 at001b = ╱53╱S╱ // 0x137a @0x1b
0x135f…1384 at001c = ╱41╱A╱ // 0x137b @0x1c
0x135f…1384 at001d = ╱4c╱L╱ // 0x137c @0x1d
0x135f…1384 at001e = ╱44╱D╱ // 0x137d @0x1e
0x135f…1384 at001f = ╱4f╱O╱ // 0x137e @0x1f
0x135f…1384 at0020 = ╱31╱1╱ // 0x137f @0x20
0x135f…1384 at0021 = ╱34╱4╱ // 0x1380 @0x21
0x135f…1384 at0022 = ╱ef╱$╱ // 0x1381 @0x22
0x135f…1384 at0023 = ╱ee╱)╱ // 0x1382 @0x23
0x135f…1384 at0024 = EOL // 0x1383 @0x24
0x135f…1384 }
0x1384…138c a0e3 2060 WHEN E
0x1384…138c LineComalBin {
0x1384…138c ptr = 0xa0e3 // 0x1384 @0x0
0x1384…138c lno = 0x080c // 0x1386 @0x2
0x1384…138c at0004 = ╱a301╱ WHEN ╱ // 0x1388 @0x4
0x1384…138c at0006 = ╱45╱E╱ // 0x138a @0x6
0x1384…138c at0007 = EOL // 0x138b @0x7
0x1384…138c }
0x138c…13b5 a10c 2070 IF LINIE>39 THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x138c…13b5 LineComalBin {
0x138c…13b5 ptr = 0xa10c // 0x138c @0x0
0x138c…13b5 lno = 0x0816 // 0x138e @0x2
0x138c…13b5 at0004 = ╱82╱ IF ╱ // 0x1390 @0x4
0x138c…13b5 at0005 = ╱4c╱L╱ // 0x1391 @0x5
0x138c…13b5 at0006 = ╱49╱I╱ // 0x1392 @0x6
0x138c…13b5 at0007 = ╱4e╱N╱ // 0x1393 @0x7
0x138c…13b5 at0008 = ╱49╱I╱ // 0x1394 @0x8
0x138c…13b5 at0009 = ╱45╱E╱ // 0x1395 @0x9
0x138c…13b5 at000a = ╱de╱>╱ // 0x1396 @0xa
0x138c…13b5 at000b = ╱33╱3╱ // 0x1397 @0xb
0x138c…13b5 at000c = ╱39╱9╱ // 0x1398 @0xc
0x138c…13b5 at000d = ╱fe00009c06╱ // 0x1399 @0xd
0x138c…13b5 at0012 = ╱b6╱ THEN ╱ // 0x139e @0x12
0x138c…13b5 at0013 = ╱9d╱ EXEC ╱ // 0x139f @0x13
0x138c…13b5 at0014 = ╱4e╱N╱ // 0x13a0 @0x14
0x138c…13b5 at0015 = ╱59╱Y╱ // 0x13a1 @0x15
0x138c…13b5 at0016 = ╱53╱S╱ // 0x13a2 @0x16
0x138c…13b5 at0017 = ╱49╱I╱ // 0x13a3 @0x17
0x138c…13b5 at0018 = ╱44╱D╱ // 0x13a4 @0x18
0x138c…13b5 at0019 = ╱45╱E╱ // 0x13a5 @0x19
0x138c…13b5 at001a = ╱ed╱(╱ // 0x13a6 @0x1a
0x138c…13b5 at001b = ╱47╱G╱ // 0x13a7 @0x1b
0x138c…13b5 at001c = ╱46╱F╱ // 0x13a8 @0x1c
0x138c…13b5 at001d = ╱4e╱N╱ // 0x13a9 @0x1d
0x138c…13b5 at001e = ╱52╱R╱ // 0x13aa @0x1e
0x138c…13b5 at001f = ╱ec╱,╱ // 0x13ab @0x1f
0x138c…13b5 at0020 = ╱47╱G╱ // 0x13ac @0x20
0x138c…13b5 at0021 = ╱4c╱L╱ // 0x13ad @0x21
0x138c…13b5 at0022 = ╱4e╱N╱ // 0x13ae @0x22
0x138c…13b5 at0023 = ╱41╱A╱ // 0x13af @0x23
0x138c…13b5 at0024 = ╱56╱V╱ // 0x13b0 @0x24
0x138c…13b5 at0025 = ╱4e╱N╱ // 0x13b1 @0x25
0x138c…13b5 at0026 = ╱ef╱$╱ // 0x13b2 @0x26
0x138c…13b5 at0027 = ╱ee╱)╱ // 0x13b3 @0x27
0x138c…13b5 at0028 = EOL // 0x13b4 @0x28
0x138c…13b5 }
0x13b5…13cc a123 2080 FNR2=FNR DIV 1000
0x13b5…13cc LineComalBin {
0x13b5…13cc ptr = 0xa123 // 0x13b5 @0x0
0x13b5…13cc lno = 0x0820 // 0x13b7 @0x2
0x13b5…13cc at0004 = ╱46╱F╱ // 0x13b9 @0x4
0x13b5…13cc at0005 = ╱4e╱N╱ // 0x13ba @0x5
0x13b5…13cc at0006 = ╱52╱R╱ // 0x13bb @0x6
0x13b5…13cc at0007 = ╱32╱2╱ // 0x13bc @0x7
0x13b5…13cc at0008 = ╱dc╱=╱ // 0x13bd @0x8
0x13b5…13cc at0009 = ╱46╱F╱ // 0x13be @0x9
0x13b5…13cc at000a = ╱4e╱N╱ // 0x13bf @0xa
0x13b5…13cc at000b = ╱52╱R╱ // 0x13c0 @0xb
0x13b5…13cc at000c = ╱e7╱ DIV ╱ // 0x13c1 @0xc
0x13b5…13cc at000d = ╱31╱1╱ // 0x13c2 @0xd
0x13b5…13cc at000e = ╱30╱0╱ // 0x13c3 @0xe
0x13b5…13cc at000f = ╱30╱0╱ // 0x13c4 @0xf
0x13b5…13cc at0010 = ╱30╱0╱ // 0x13c5 @0x10
0x13b5…13cc at0011 = ╱fe0000fa0a╱ // 0x13c6 @0x11
0x13b5…13cc at0016 = EOL // 0x13cb @0x16
0x13b5…13cc }
0x13cc…141c a173 2090 FNR1=FNR DIV 10000;DTAL1=DTAL*10000+MKGR;KRTAL1=KRTAL*1000+MKRGR
0x13cc…141c LineComalBin {
0x13cc…141c ptr = 0xa173 // 0x13cc @0x0
0x13cc…141c lno = 0x082a // 0x13ce @0x2
0x13cc…141c at0004 = ╱46╱F╱ // 0x13d0 @0x4
0x13cc…141c at0005 = ╱4e╱N╱ // 0x13d1 @0x5
0x13cc…141c at0006 = ╱52╱R╱ // 0x13d2 @0x6
0x13cc…141c at0007 = ╱31╱1╱ // 0x13d3 @0x7
0x13cc…141c at0008 = ╱dc╱=╱ // 0x13d4 @0x8
0x13cc…141c at0009 = ╱46╱F╱ // 0x13d5 @0x9
0x13cc…141c at000a = ╱4e╱N╱ // 0x13d6 @0xa
0x13cc…141c at000b = ╱52╱R╱ // 0x13d7 @0xb
0x13cc…141c at000c = ╱e7╱ DIV ╱ // 0x13d8 @0xc
0x13cc…141c at000d = ╱31╱1╱ // 0x13d9 @0xd
0x13cc…141c at000e = ╱30╱0╱ // 0x13da @0xe
0x13cc…141c at000f = ╱30╱0╱ // 0x13db @0xf
0x13cc…141c at0010 = ╱30╱0╱ // 0x13dc @0x10
0x13cc…141c at0011 = ╱30╱0╱ // 0x13dd @0x11
0x13cc…141c at0012 = ╱fe00409c0e╱ // 0x13de @0x12
0x13cc…141c at0017 = ╱eb╱;╱ // 0x13e3 @0x17
0x13cc…141c at0018 = ╱44╱D╱ // 0x13e4 @0x18
0x13cc…141c at0019 = ╱54╱T╱ // 0x13e5 @0x19
0x13cc…141c at001a = ╱41╱A╱ // 0x13e6 @0x1a
0x13cc…141c at001b = ╱4c╱L╱ // 0x13e7 @0x1b
0x13cc…141c at001c = ╱31╱1╱ // 0x13e8 @0x1c
0x13cc…141c at001d = ╱dc╱=╱ // 0x13e9 @0x1d
0x13cc…141c at001e = ╱44╱D╱ // 0x13ea @0x1e
0x13cc…141c at001f = ╱54╱T╱ // 0x13eb @0x1f
0x13cc…141c at0020 = ╱41╱A╱ // 0x13ec @0x20
0x13cc…141c at0021 = ╱4c╱L╱ // 0x13ed @0x21
0x13cc…141c at0022 = ╱e4╱*╱ // 0x13ee @0x22
0x13cc…141c at0023 = ╱31╱1╱ // 0x13ef @0x23
0x13cc…141c at0024 = ╱30╱0╱ // 0x13f0 @0x24
0x13cc…141c at0025 = ╱30╱0╱ // 0x13f1 @0x25
0x13cc…141c at0026 = ╱30╱0╱ // 0x13f2 @0x26
0x13cc…141c at0027 = ╱30╱0╱ // 0x13f3 @0x27
0x13cc…141c at0028 = ╱fe00409c0e╱ // 0x13f4 @0x28
0x13cc…141c at002d = ╱e2╱+╱ // 0x13f9 @0x2d
0x13cc…141c at002e = ╱4d╱M╱ // 0x13fa @0x2e
0x13cc…141c at002f = ╱4b╱K╱ // 0x13fb @0x2f
0x13cc…141c at0030 = ╱47╱G╱ // 0x13fc @0x30
0x13cc…141c at0031 = ╱52╱R╱ // 0x13fd @0x31
0x13cc…141c at0032 = ╱eb╱;╱ // 0x13fe @0x32
0x13cc…141c at0033 = ╱4b╱K╱ // 0x13ff @0x33
0x13cc…141c at0034 = ╱52╱R╱ // 0x1400 @0x34
0x13cc…141c at0035 = ╱54╱T╱ // 0x1401 @0x35
0x13cc…141c at0036 = ╱41╱A╱ // 0x1402 @0x36
0x13cc…141c at0037 = ╱4c╱L╱ // 0x1403 @0x37
0x13cc…141c at0038 = ╱31╱1╱ // 0x1404 @0x38
0x13cc…141c at0039 = ╱dc╱=╱ // 0x1405 @0x39
0x13cc…141c at003a = ╱4b╱K╱ // 0x1406 @0x3a
0x13cc…141c at003b = ╱52╱R╱ // 0x1407 @0x3b
0x13cc…141c at003c = ╱54╱T╱ // 0x1408 @0x3c
0x13cc…141c at003d = ╱41╱A╱ // 0x1409 @0x3d
0x13cc…141c at003e = ╱4c╱L╱ // 0x140a @0x3e
0x13cc…141c at003f = ╱e4╱*╱ // 0x140b @0x3f
0x13cc…141c at0040 = ╱31╱1╱ // 0x140c @0x40
0x13cc…141c at0041 = ╱30╱0╱ // 0x140d @0x41
0x13cc…141c at0042 = ╱30╱0╱ // 0x140e @0x42
0x13cc…141c at0043 = ╱30╱0╱ // 0x140f @0x43
0x13cc…141c at0044 = ╱fe0000fa0a╱ // 0x1410 @0x44
0x13cc…141c at0049 = ╱e2╱+╱ // 0x1415 @0x49
0x13cc…141c at004a = ╱4d╱M╱ // 0x1416 @0x4a
0x13cc…141c at004b = ╱4b╱K╱ // 0x1417 @0x4b
0x13cc…141c at004c = ╱52╱R╱ // 0x1418 @0x4c
0x13cc…141c at004d = ╱47╱G╱ // 0x1419 @0x4d
0x13cc…141c at004e = ╱52╱R╱ // 0x141a @0x4e
0x13cc…141c at004f = EOL // 0x141b @0x4f
0x13cc…141c }
0x141c…144c a1a3 2100 IF FNR1=DTAL AND DTAL1=>FNR OR FNR2=KRTAL AND KRTAL1=>FNR THEN
0x141c…144c LineComalBin {
0x141c…144c ptr = 0xa1a3 // 0x141c @0x0
0x141c…144c lno = 0x0834 // 0x141e @0x2
0x141c…144c at0004 = ╱9c╱ IF ╱ // 0x1420 @0x4
0x141c…144c at0005 = ╱46╱F╱ // 0x1421 @0x5
0x141c…144c at0006 = ╱4e╱N╱ // 0x1422 @0x6
0x141c…144c at0007 = ╱52╱R╱ // 0x1423 @0x7
0x141c…144c at0008 = ╱31╱1╱ // 0x1424 @0x8
0x141c…144c at0009 = ╱dc╱=╱ // 0x1425 @0x9
0x141c…144c at000a = ╱44╱D╱ // 0x1426 @0xa
0x141c…144c at000b = ╱54╱T╱ // 0x1427 @0xb
0x141c…144c at000c = ╱41╱A╱ // 0x1428 @0xc
0x141c…144c at000d = ╱4c╱L╱ // 0x1429 @0xd
0x141c…144c at000e = ╱da╱ AND ╱ // 0x142a @0xe
0x141c…144c at000f = ╱44╱D╱ // 0x142b @0xf
0x141c…144c at0010 = ╱54╱T╱ // 0x142c @0x10
0x141c…144c at0011 = ╱41╱A╱ // 0x142d @0x11
0x141c…144c at0012 = ╱4c╱L╱ // 0x142e @0x12
0x141c…144c at0013 = ╱31╱1╱ // 0x142f @0x13
0x141c…144c at0014 = ╱e0╱=>╱ // 0x1430 @0x14
0x141c…144c at0015 = ╱46╱F╱ // 0x1431 @0x15
0x141c…144c at0016 = ╱4e╱N╱ // 0x1432 @0x16
0x141c…144c at0017 = ╱52╱R╱ // 0x1433 @0x17
0x141c…144c at0018 = ╱db╱ OR ╱ // 0x1434 @0x18
0x141c…144c at0019 = ╱46╱F╱ // 0x1435 @0x19
0x141c…144c at001a = ╱4e╱N╱ // 0x1436 @0x1a
0x141c…144c at001b = ╱52╱R╱ // 0x1437 @0x1b
0x141c…144c at001c = ╱32╱2╱ // 0x1438 @0x1c
0x141c…144c at001d = ╱dc╱=╱ // 0x1439 @0x1d
0x141c…144c at001e = ╱4b╱K╱ // 0x143a @0x1e
0x141c…144c at001f = ╱52╱R╱ // 0x143b @0x1f
0x141c…144c at0020 = ╱54╱T╱ // 0x143c @0x20
0x141c…144c at0021 = ╱41╱A╱ // 0x143d @0x21
0x141c…144c at0022 = ╱4c╱L╱ // 0x143e @0x22
0x141c…144c at0023 = ╱da╱ AND ╱ // 0x143f @0x23
0x141c…144c at0024 = ╱4b╱K╱ // 0x1440 @0x24
0x141c…144c at0025 = ╱52╱R╱ // 0x1441 @0x25
0x141c…144c at0026 = ╱54╱T╱ // 0x1442 @0x26
0x141c…144c at0027 = ╱41╱A╱ // 0x1443 @0x27
0x141c…144c at0028 = ╱4c╱L╱ // 0x1444 @0x28
0x141c…144c at0029 = ╱31╱1╱ // 0x1445 @0x29
0x141c…144c at002a = ╱e0╱=>╱ // 0x1446 @0x2a
0x141c…144c at002b = ╱46╱F╱ // 0x1447 @0x2b
0x141c…144c at002c = ╱4e╱N╱ // 0x1448 @0x2c
0x141c…144c at002d = ╱52╱R╱ // 0x1449 @0x2d
0x141c…144c at002e = ╱b6╱ THEN ╱ // 0x144a @0x2e
0x141c…144c at002f = EOL // 0x144b @0x2f
0x141c…144c }
0x144c…146f a1c6 2110 EXEC CALC(B,SALDO2$,FMDK$,SALDO2$)
0x144c…146f LineComalBin {
0x144c…146f ptr = 0xa1c6 // 0x144c @0x0
0x144c…146f lno = 0x083e // 0x144e @0x2
0x144c…146f at0004 = ╱9d╱ EXEC ╱ // 0x1450 @0x4
0x144c…146f at0005 = ╱43╱C╱ // 0x1451 @0x5
0x144c…146f at0006 = ╱41╱A╱ // 0x1452 @0x6
0x144c…146f at0007 = ╱4c╱L╱ // 0x1453 @0x7
0x144c…146f at0008 = ╱43╱C╱ // 0x1454 @0x8
0x144c…146f at0009 = ╱ed╱(╱ // 0x1455 @0x9
0x144c…146f at000a = ╱42╱B╱ // 0x1456 @0xa
0x144c…146f at000b = ╱ec╱,╱ // 0x1457 @0xb
0x144c…146f at000c = ╱53╱S╱ // 0x1458 @0xc
0x144c…146f at000d = ╱41╱A╱ // 0x1459 @0xd
0x144c…146f at000e = ╱4c╱L╱ // 0x145a @0xe
0x144c…146f at000f = ╱44╱D╱ // 0x145b @0xf
0x144c…146f at0010 = ╱4f╱O╱ // 0x145c @0x10
0x144c…146f at0011 = ╱32╱2╱ // 0x145d @0x11
0x144c…146f at0012 = ╱ef╱$╱ // 0x145e @0x12
0x144c…146f at0013 = ╱ec╱,╱ // 0x145f @0x13
0x144c…146f at0014 = ╱46╱F╱ // 0x1460 @0x14
0x144c…146f at0015 = ╱4d╱M╱ // 0x1461 @0x15
0x144c…146f at0016 = ╱44╱D╱ // 0x1462 @0x16
0x144c…146f at0017 = ╱4b╱K╱ // 0x1463 @0x17
0x144c…146f at0018 = ╱ef╱$╱ // 0x1464 @0x18
0x144c…146f at0019 = ╱ec╱,╱ // 0x1465 @0x19
0x144c…146f at001a = ╱53╱S╱ // 0x1466 @0x1a
0x144c…146f at001b = ╱41╱A╱ // 0x1467 @0x1b
0x144c…146f at001c = ╱4c╱L╱ // 0x1468 @0x1c
0x144c…146f at001d = ╱44╱D╱ // 0x1469 @0x1d
0x144c…146f at001e = ╱4f╱O╱ // 0x146a @0x1e
0x144c…146f at001f = ╱32╱2╱ // 0x146b @0x1f
0x144c…146f at0020 = ╱ef╱$╱ // 0x146c @0x20
0x144c…146f at0021 = ╱ee╱)╱ // 0x146d @0x21
0x144c…146f at0022 = EOL // 0x146e @0x22
0x144c…146f }
0x146f…1494 a1eb 2120 EXEC CALC(B,SALDO12$,FÅDK$,SALDO12$)
0x146f…1494 LineComalBin {
0x146f…1494 ptr = 0xa1eb // 0x146f @0x0
0x146f…1494 lno = 0x0848 // 0x1471 @0x2
0x146f…1494 at0004 = ╱9d╱ EXEC ╱ // 0x1473 @0x4
0x146f…1494 at0005 = ╱43╱C╱ // 0x1474 @0x5
0x146f…1494 at0006 = ╱41╱A╱ // 0x1475 @0x6
0x146f…1494 at0007 = ╱4c╱L╱ // 0x1476 @0x7
0x146f…1494 at0008 = ╱43╱C╱ // 0x1477 @0x8
0x146f…1494 at0009 = ╱ed╱(╱ // 0x1478 @0x9
0x146f…1494 at000a = ╱42╱B╱ // 0x1479 @0xa
0x146f…1494 at000b = ╱ec╱,╱ // 0x147a @0xb
0x146f…1494 at000c = ╱53╱S╱ // 0x147b @0xc
0x146f…1494 at000d = ╱41╱A╱ // 0x147c @0xd
0x146f…1494 at000e = ╱4c╱L╱ // 0x147d @0xe
0x146f…1494 at000f = ╱44╱D╱ // 0x147e @0xf
0x146f…1494 at0010 = ╱4f╱O╱ // 0x147f @0x10
0x146f…1494 at0011 = ╱31╱1╱ // 0x1480 @0x11
0x146f…1494 at0012 = ╱32╱2╱ // 0x1481 @0x12
0x146f…1494 at0013 = ╱ef╱$╱ // 0x1482 @0x13
0x146f…1494 at0014 = ╱ec╱,╱ // 0x1483 @0x14
0x146f…1494 at0015 = ╱46╱F╱ // 0x1484 @0x15
0x146f…1494 at0016 = ╱5d╱Å╱ // 0x1485 @0x16
0x146f…1494 at0017 = ╱44╱D╱ // 0x1486 @0x17
0x146f…1494 at0018 = ╱4b╱K╱ // 0x1487 @0x18
0x146f…1494 at0019 = ╱ef╱$╱ // 0x1488 @0x19
0x146f…1494 at001a = ╱ec╱,╱ // 0x1489 @0x1a
0x146f…1494 at001b = ╱53╱S╱ // 0x148a @0x1b
0x146f…1494 at001c = ╱41╱A╱ // 0x148b @0x1c
0x146f…1494 at001d = ╱4c╱L╱ // 0x148c @0x1d
0x146f…1494 at001e = ╱44╱D╱ // 0x148d @0x1e
0x146f…1494 at001f = ╱4f╱O╱ // 0x148e @0x1f
0x146f…1494 at0020 = ╱31╱1╱ // 0x148f @0x20
0x146f…1494 at0021 = ╱32╱2╱ // 0x1490 @0x21
0x146f…1494 at0022 = ╱ef╱$╱ // 0x1491 @0x22
0x146f…1494 at0023 = ╱ee╱)╱ // 0x1492 @0x23
0x146f…1494 at0024 = EOL // 0x1493 @0x24
0x146f…1494 }
0x1494…14b7 a20e 2130 EXEC CALC(B,SALDO3$,FMDK$,SALDO3$)
0x1494…14b7 LineComalBin {
0x1494…14b7 ptr = 0xa20e // 0x1494 @0x0
0x1494…14b7 lno = 0x0852 // 0x1496 @0x2
0x1494…14b7 at0004 = ╱9d╱ EXEC ╱ // 0x1498 @0x4
0x1494…14b7 at0005 = ╱43╱C╱ // 0x1499 @0x5
0x1494…14b7 at0006 = ╱41╱A╱ // 0x149a @0x6
0x1494…14b7 at0007 = ╱4c╱L╱ // 0x149b @0x7
0x1494…14b7 at0008 = ╱43╱C╱ // 0x149c @0x8
0x1494…14b7 at0009 = ╱ed╱(╱ // 0x149d @0x9
0x1494…14b7 at000a = ╱42╱B╱ // 0x149e @0xa
0x1494…14b7 at000b = ╱ec╱,╱ // 0x149f @0xb
0x1494…14b7 at000c = ╱53╱S╱ // 0x14a0 @0xc
0x1494…14b7 at000d = ╱41╱A╱ // 0x14a1 @0xd
0x1494…14b7 at000e = ╱4c╱L╱ // 0x14a2 @0xe
0x1494…14b7 at000f = ╱44╱D╱ // 0x14a3 @0xf
0x1494…14b7 at0010 = ╱4f╱O╱ // 0x14a4 @0x10
0x1494…14b7 at0011 = ╱33╱3╱ // 0x14a5 @0x11
0x1494…14b7 at0012 = ╱ef╱$╱ // 0x14a6 @0x12
0x1494…14b7 at0013 = ╱ec╱,╱ // 0x14a7 @0x13
0x1494…14b7 at0014 = ╱46╱F╱ // 0x14a8 @0x14
0x1494…14b7 at0015 = ╱4d╱M╱ // 0x14a9 @0x15
0x1494…14b7 at0016 = ╱44╱D╱ // 0x14aa @0x16
0x1494…14b7 at0017 = ╱4b╱K╱ // 0x14ab @0x17
0x1494…14b7 at0018 = ╱ef╱$╱ // 0x14ac @0x18
0x1494…14b7 at0019 = ╱ec╱,╱ // 0x14ad @0x19
0x1494…14b7 at001a = ╱53╱S╱ // 0x14ae @0x1a
0x1494…14b7 at001b = ╱41╱A╱ // 0x14af @0x1b
0x1494…14b7 at001c = ╱4c╱L╱ // 0x14b0 @0x1c
0x1494…14b7 at001d = ╱44╱D╱ // 0x14b1 @0x1d
0x1494…14b7 at001e = ╱4f╱O╱ // 0x14b2 @0x1e
0x1494…14b7 at001f = ╱33╱3╱ // 0x14b3 @0x1f
0x1494…14b7 at0020 = ╱ef╱$╱ // 0x14b4 @0x20
0x1494…14b7 at0021 = ╱ee╱)╱ // 0x14b5 @0x21
0x1494…14b7 at0022 = EOL // 0x14b6 @0x22
0x1494…14b7 }
0x14b7…14dc a233 2140 EXEC CALC(B,SALDO13$,FÅDK$,SALDO13$)
0x14b7…14dc LineComalBin {
0x14b7…14dc ptr = 0xa233 // 0x14b7 @0x0
0x14b7…14dc lno = 0x085c // 0x14b9 @0x2
0x14b7…14dc at0004 = ╱9d╱ EXEC ╱ // 0x14bb @0x4
0x14b7…14dc at0005 = ╱43╱C╱ // 0x14bc @0x5
0x14b7…14dc at0006 = ╱41╱A╱ // 0x14bd @0x6
0x14b7…14dc at0007 = ╱4c╱L╱ // 0x14be @0x7
0x14b7…14dc at0008 = ╱43╱C╱ // 0x14bf @0x8
0x14b7…14dc at0009 = ╱ed╱(╱ // 0x14c0 @0x9
0x14b7…14dc at000a = ╱42╱B╱ // 0x14c1 @0xa
0x14b7…14dc at000b = ╱ec╱,╱ // 0x14c2 @0xb
0x14b7…14dc at000c = ╱53╱S╱ // 0x14c3 @0xc
0x14b7…14dc at000d = ╱41╱A╱ // 0x14c4 @0xd
0x14b7…14dc at000e = ╱4c╱L╱ // 0x14c5 @0xe
0x14b7…14dc at000f = ╱44╱D╱ // 0x14c6 @0xf
0x14b7…14dc at0010 = ╱4f╱O╱ // 0x14c7 @0x10
0x14b7…14dc at0011 = ╱31╱1╱ // 0x14c8 @0x11
0x14b7…14dc at0012 = ╱33╱3╱ // 0x14c9 @0x12
0x14b7…14dc at0013 = ╱ef╱$╱ // 0x14ca @0x13
0x14b7…14dc at0014 = ╱ec╱,╱ // 0x14cb @0x14
0x14b7…14dc at0015 = ╱46╱F╱ // 0x14cc @0x15
0x14b7…14dc at0016 = ╱5d╱Å╱ // 0x14cd @0x16
0x14b7…14dc at0017 = ╱44╱D╱ // 0x14ce @0x17
0x14b7…14dc at0018 = ╱4b╱K╱ // 0x14cf @0x18
0x14b7…14dc at0019 = ╱ef╱$╱ // 0x14d0 @0x19
0x14b7…14dc at001a = ╱ec╱,╱ // 0x14d1 @0x1a
0x14b7…14dc at001b = ╱53╱S╱ // 0x14d2 @0x1b
0x14b7…14dc at001c = ╱41╱A╱ // 0x14d3 @0x1c
0x14b7…14dc at001d = ╱4c╱L╱ // 0x14d4 @0x1d
0x14b7…14dc at001e = ╱44╱D╱ // 0x14d5 @0x1e
0x14b7…14dc at001f = ╱4f╱O╱ // 0x14d6 @0x1f
0x14b7…14dc at0020 = ╱31╱1╱ // 0x14d7 @0x20
0x14b7…14dc at0021 = ╱33╱3╱ // 0x14d8 @0x21
0x14b7…14dc at0022 = ╱ef╱$╱ // 0x14d9 @0x22
0x14b7…14dc at0023 = ╱ee╱)╱ // 0x14da @0x23
0x14b7…14dc at0024 = EOL // 0x14db @0x24
0x14b7…14dc }
0x14dc…14ff a256 2150 EXEC CALC(B,SALDO4$,FMDK$,SALDO4$)
0x14dc…14ff LineComalBin {
0x14dc…14ff ptr = 0xa256 // 0x14dc @0x0
0x14dc…14ff lno = 0x0866 // 0x14de @0x2
0x14dc…14ff at0004 = ╱9d╱ EXEC ╱ // 0x14e0 @0x4
0x14dc…14ff at0005 = ╱43╱C╱ // 0x14e1 @0x5
0x14dc…14ff at0006 = ╱41╱A╱ // 0x14e2 @0x6
0x14dc…14ff at0007 = ╱4c╱L╱ // 0x14e3 @0x7
0x14dc…14ff at0008 = ╱43╱C╱ // 0x14e4 @0x8
0x14dc…14ff at0009 = ╱ed╱(╱ // 0x14e5 @0x9
0x14dc…14ff at000a = ╱42╱B╱ // 0x14e6 @0xa
0x14dc…14ff at000b = ╱ec╱,╱ // 0x14e7 @0xb
0x14dc…14ff at000c = ╱53╱S╱ // 0x14e8 @0xc
0x14dc…14ff at000d = ╱41╱A╱ // 0x14e9 @0xd
0x14dc…14ff at000e = ╱4c╱L╱ // 0x14ea @0xe
0x14dc…14ff at000f = ╱44╱D╱ // 0x14eb @0xf
0x14dc…14ff at0010 = ╱4f╱O╱ // 0x14ec @0x10
0x14dc…14ff at0011 = ╱34╱4╱ // 0x14ed @0x11
0x14dc…14ff at0012 = ╱ef╱$╱ // 0x14ee @0x12
0x14dc…14ff at0013 = ╱ec╱,╱ // 0x14ef @0x13
0x14dc…14ff at0014 = ╱46╱F╱ // 0x14f0 @0x14
0x14dc…14ff at0015 = ╱4d╱M╱ // 0x14f1 @0x15
0x14dc…14ff at0016 = ╱44╱D╱ // 0x14f2 @0x16
0x14dc…14ff at0017 = ╱4b╱K╱ // 0x14f3 @0x17
0x14dc…14ff at0018 = ╱ef╱$╱ // 0x14f4 @0x18
0x14dc…14ff at0019 = ╱ec╱,╱ // 0x14f5 @0x19
0x14dc…14ff at001a = ╱53╱S╱ // 0x14f6 @0x1a
0x14dc…14ff at001b = ╱41╱A╱ // 0x14f7 @0x1b
0x14dc…14ff at001c = ╱4c╱L╱ // 0x14f8 @0x1c
0x14dc…14ff at001d = ╱44╱D╱ // 0x14f9 @0x1d
0x14dc…14ff at001e = ╱4f╱O╱ // 0x14fa @0x1e
0x14dc…14ff at001f = ╱34╱4╱ // 0x14fb @0x1f
0x14dc…14ff at0020 = ╱ef╱$╱ // 0x14fc @0x20
0x14dc…14ff at0021 = ╱ee╱)╱ // 0x14fd @0x21
0x14dc…14ff at0022 = EOL // 0x14fe @0x22
0x14dc…14ff }
0x14ff…1524 a27b 2160 EXEC CALC(B,SALDO14$,FÅDK$,SALDO14$)
0x14ff…1524 LineComalBin {
0x14ff…1524 ptr = 0xa27b // 0x14ff @0x0
0x14ff…1524 lno = 0x0870 // 0x1501 @0x2
0x14ff…1524 at0004 = ╱9d╱ EXEC ╱ // 0x1503 @0x4
0x14ff…1524 at0005 = ╱43╱C╱ // 0x1504 @0x5
0x14ff…1524 at0006 = ╱41╱A╱ // 0x1505 @0x6
0x14ff…1524 at0007 = ╱4c╱L╱ // 0x1506 @0x7
0x14ff…1524 at0008 = ╱43╱C╱ // 0x1507 @0x8
0x14ff…1524 at0009 = ╱ed╱(╱ // 0x1508 @0x9
0x14ff…1524 at000a = ╱42╱B╱ // 0x1509 @0xa
0x14ff…1524 at000b = ╱ec╱,╱ // 0x150a @0xb
0x14ff…1524 at000c = ╱53╱S╱ // 0x150b @0xc
0x14ff…1524 at000d = ╱41╱A╱ // 0x150c @0xd
0x14ff…1524 at000e = ╱4c╱L╱ // 0x150d @0xe
0x14ff…1524 at000f = ╱44╱D╱ // 0x150e @0xf
0x14ff…1524 at0010 = ╱4f╱O╱ // 0x150f @0x10
0x14ff…1524 at0011 = ╱31╱1╱ // 0x1510 @0x11
0x14ff…1524 at0012 = ╱34╱4╱ // 0x1511 @0x12
0x14ff…1524 at0013 = ╱ef╱$╱ // 0x1512 @0x13
0x14ff…1524 at0014 = ╱ec╱,╱ // 0x1513 @0x14
0x14ff…1524 at0015 = ╱46╱F╱ // 0x1514 @0x15
0x14ff…1524 at0016 = ╱5d╱Å╱ // 0x1515 @0x16
0x14ff…1524 at0017 = ╱44╱D╱ // 0x1516 @0x17
0x14ff…1524 at0018 = ╱4b╱K╱ // 0x1517 @0x18
0x14ff…1524 at0019 = ╱ef╱$╱ // 0x1518 @0x19
0x14ff…1524 at001a = ╱ec╱,╱ // 0x1519 @0x1a
0x14ff…1524 at001b = ╱53╱S╱ // 0x151a @0x1b
0x14ff…1524 at001c = ╱41╱A╱ // 0x151b @0x1c
0x14ff…1524 at001d = ╱4c╱L╱ // 0x151c @0x1d
0x14ff…1524 at001e = ╱44╱D╱ // 0x151d @0x1e
0x14ff…1524 at001f = ╱4f╱O╱ // 0x151e @0x1f
0x14ff…1524 at0020 = ╱31╱1╱ // 0x151f @0x20
0x14ff…1524 at0021 = ╱34╱4╱ // 0x1520 @0x21
0x14ff…1524 at0022 = ╱ef╱$╱ // 0x1521 @0x22
0x14ff…1524 at0023 = ╱ee╱)╱ // 0x1522 @0x23
0x14ff…1524 at0024 = EOL // 0x1523 @0x24
0x14ff…1524 }
0x1524…1549 a2a0 2170 EXEC LINIEUD(FNR,FNAVN$,FMDK$,FÅDK$)
0x1524…1549 LineComalBin {
0x1524…1549 ptr = 0xa2a0 // 0x1524 @0x0
0x1524…1549 lno = 0x087a // 0x1526 @0x2
0x1524…1549 at0004 = ╱9d╱ EXEC ╱ // 0x1528 @0x4
0x1524…1549 at0005 = ╱4c╱L╱ // 0x1529 @0x5
0x1524…1549 at0006 = ╱49╱I╱ // 0x152a @0x6
0x1524…1549 at0007 = ╱4e╱N╱ // 0x152b @0x7
0x1524…1549 at0008 = ╱49╱I╱ // 0x152c @0x8
0x1524…1549 at0009 = ╱45╱E╱ // 0x152d @0x9
0x1524…1549 at000a = ╱55╱U╱ // 0x152e @0xa
0x1524…1549 at000b = ╱44╱D╱ // 0x152f @0xb
0x1524…1549 at000c = ╱ed╱(╱ // 0x1530 @0xc
0x1524…1549 at000d = ╱46╱F╱ // 0x1531 @0xd
0x1524…1549 at000e = ╱4e╱N╱ // 0x1532 @0xe
0x1524…1549 at000f = ╱52╱R╱ // 0x1533 @0xf
0x1524…1549 at0010 = ╱ec╱,╱ // 0x1534 @0x10
0x1524…1549 at0011 = ╱46╱F╱ // 0x1535 @0x11
0x1524…1549 at0012 = ╱4e╱N╱ // 0x1536 @0x12
0x1524…1549 at0013 = ╱41╱A╱ // 0x1537 @0x13
0x1524…1549 at0014 = ╱56╱V╱ // 0x1538 @0x14
0x1524…1549 at0015 = ╱4e╱N╱ // 0x1539 @0x15
0x1524…1549 at0016 = ╱ef╱$╱ // 0x153a @0x16
0x1524…1549 at0017 = ╱ec╱,╱ // 0x153b @0x17
0x1524…1549 at0018 = ╱46╱F╱ // 0x153c @0x18
0x1524…1549 at0019 = ╱4d╱M╱ // 0x153d @0x19
0x1524…1549 at001a = ╱44╱D╱ // 0x153e @0x1a
0x1524…1549 at001b = ╱4b╱K╱ // 0x153f @0x1b
0x1524…1549 at001c = ╱ef╱$╱ // 0x1540 @0x1c
0x1524…1549 at001d = ╱ec╱,╱ // 0x1541 @0x1d
0x1524…1549 at001e = ╱46╱F╱ // 0x1542 @0x1e
0x1524…1549 at001f = ╱5d╱Å╱ // 0x1543 @0x1f
0x1524…1549 at0020 = ╱44╱D╱ // 0x1544 @0x20
0x1524…1549 at0021 = ╱4b╱K╱ // 0x1545 @0x21
0x1524…1549 at0022 = ╱ef╱$╱ // 0x1546 @0x22
0x1524…1549 at0023 = ╱ee╱)╱ // 0x1547 @0x23
0x1524…1549 at0024 = EOL // 0x1548 @0x24
0x1524…1549 }
0x1549…154f a2a6 2180 ELSE
0x1549…154f LineComalBin {
0x1549…154f ptr = 0xa2a6 // 0x1549 @0x0
0x1549…154f lno = 0x0884 // 0x154b @0x2
0x1549…154f at0004 = ╱9a╱ ELSE ╱ // 0x154d @0x4
0x1549…154f at0005 = EOL // 0x154e @0x5
0x1549…154f }
0x154f…1579 a2d0 2190 EXEC LINIEUD(FNR,FNAVN$,SALDO1$,SALDO11$)
0x154f…1579 LineComalBin {
0x154f…1579 ptr = 0xa2d0 // 0x154f @0x0
0x154f…1579 lno = 0x088e // 0x1551 @0x2
0x154f…1579 at0004 = ╱9d╱ EXEC ╱ // 0x1553 @0x4
0x154f…1579 at0005 = ╱4c╱L╱ // 0x1554 @0x5
0x154f…1579 at0006 = ╱49╱I╱ // 0x1555 @0x6
0x154f…1579 at0007 = ╱4e╱N╱ // 0x1556 @0x7
0x154f…1579 at0008 = ╱49╱I╱ // 0x1557 @0x8
0x154f…1579 at0009 = ╱45╱E╱ // 0x1558 @0x9
0x154f…1579 at000a = ╱55╱U╱ // 0x1559 @0xa
0x154f…1579 at000b = ╱44╱D╱ // 0x155a @0xb
0x154f…1579 at000c = ╱ed╱(╱ // 0x155b @0xc
0x154f…1579 at000d = ╱46╱F╱ // 0x155c @0xd
0x154f…1579 at000e = ╱4e╱N╱ // 0x155d @0xe
0x154f…1579 at000f = ╱52╱R╱ // 0x155e @0xf
0x154f…1579 at0010 = ╱ec╱,╱ // 0x155f @0x10
0x154f…1579 at0011 = ╱46╱F╱ // 0x1560 @0x11
0x154f…1579 at0012 = ╱4e╱N╱ // 0x1561 @0x12
0x154f…1579 at0013 = ╱41╱A╱ // 0x1562 @0x13
0x154f…1579 at0014 = ╱56╱V╱ // 0x1563 @0x14
0x154f…1579 at0015 = ╱4e╱N╱ // 0x1564 @0x15
0x154f…1579 at0016 = ╱ef╱$╱ // 0x1565 @0x16
0x154f…1579 at0017 = ╱ec╱,╱ // 0x1566 @0x17
0x154f…1579 at0018 = ╱53╱S╱ // 0x1567 @0x18
0x154f…1579 at0019 = ╱41╱A╱ // 0x1568 @0x19
0x154f…1579 at001a = ╱4c╱L╱ // 0x1569 @0x1a
0x154f…1579 at001b = ╱44╱D╱ // 0x156a @0x1b
0x154f…1579 at001c = ╱4f╱O╱ // 0x156b @0x1c
0x154f…1579 at001d = ╱31╱1╱ // 0x156c @0x1d
0x154f…1579 at001e = ╱ef╱$╱ // 0x156d @0x1e
0x154f…1579 at001f = ╱ec╱,╱ // 0x156e @0x1f
0x154f…1579 at0020 = ╱53╱S╱ // 0x156f @0x20
0x154f…1579 at0021 = ╱41╱A╱ // 0x1570 @0x21
0x154f…1579 at0022 = ╱4c╱L╱ // 0x1571 @0x22
0x154f…1579 at0023 = ╱44╱D╱ // 0x1572 @0x23
0x154f…1579 at0024 = ╱4f╱O╱ // 0x1573 @0x24
0x154f…1579 at0025 = ╱31╱1╱ // 0x1574 @0x25
0x154f…1579 at0026 = ╱31╱1╱ // 0x1575 @0x26
0x154f…1579 at0027 = ╱ef╱$╱ // 0x1576 @0x27
0x154f…1579 at0028 = ╱ee╱)╱ // 0x1577 @0x28
0x154f…1579 at0029 = EOL // 0x1578 @0x29
0x154f…1579 }
0x1579…1598 a2ef 2200 SALDO1$="0+";SALDO11$="0+"
0x1579…1598 LineComalBin {
0x1579…1598 ptr = 0xa2ef // 0x1579 @0x0
0x1579…1598 lno = 0x0898 // 0x157b @0x2
0x1579…1598 at0004 = ╱53╱S╱ // 0x157d @0x4
0x1579…1598 at0005 = ╱41╱A╱ // 0x157e @0x5
0x1579…1598 at0006 = ╱4c╱L╱ // 0x157f @0x6
0x1579…1598 at0007 = ╱44╱D╱ // 0x1580 @0x7
0x1579…1598 at0008 = ╱4f╱O╱ // 0x1581 @0x8
0x1579…1598 at0009 = ╱31╱1╱ // 0x1582 @0x9
0x1579…1598 at000a = ╱ef╱$╱ // 0x1583 @0xa
0x1579…1598 at000b = ╱dc╱=╱ // 0x1584 @0xb
0x1579…1598 at000c = ╱22╱"╱ // 0x1585 @0xc
0x1579…1598 at000d = ╱30╱0╱ // 0x1586 @0xd
0x1579…1598 at000e = ╱2b╱+╱ // 0x1587 @0xe
0x1579…1598 at000f = ╱22╱"╱ // 0x1588 @0xf
0x1579…1598 at0010 = ╱eb╱;╱ // 0x1589 @0x10
0x1579…1598 at0011 = ╱53╱S╱ // 0x158a @0x11
0x1579…1598 at0012 = ╱41╱A╱ // 0x158b @0x12
0x1579…1598 at0013 = ╱4c╱L╱ // 0x158c @0x13
0x1579…1598 at0014 = ╱44╱D╱ // 0x158d @0x14
0x1579…1598 at0015 = ╱4f╱O╱ // 0x158e @0x15
0x1579…1598 at0016 = ╱31╱1╱ // 0x158f @0x16
0x1579…1598 at0017 = ╱31╱1╱ // 0x1590 @0x17
0x1579…1598 at0018 = ╱ef╱$╱ // 0x1591 @0x18
0x1579…1598 at0019 = ╱dc╱=╱ // 0x1592 @0x19
0x1579…1598 at001a = ╱22╱"╱ // 0x1593 @0x1a
0x1579…1598 at001b = ╱30╱0╱ // 0x1594 @0x1b
0x1579…1598 at001c = ╱2b╱+╱ // 0x1595 @0x1c
0x1579…1598 at001d = ╱22╱"╱ // 0x1596 @0x1d
0x1579…1598 at001e = EOL // 0x1597 @0x1e
0x1579…1598 }
0x1598…159e a2f5 2210 ENDIF
0x1598…159e LineComalBin {
0x1598…159e ptr = 0xa2f5 // 0x1598 @0x0
0x1598…159e lno = 0x08a2 // 0x159a @0x2
0x1598…159e at0004 = ╱9b╱ ENDIF ╱ // 0x159c @0x4
0x1598…159e at0005 = EOL // 0x159d @0x5
0x1598…159e }
0x159e…15a7 a2fe 2220 PRINT " "
0x159e…15a7 LineComalBin {
0x159e…15a7 ptr = 0xa2fe // 0x159e @0x0
0x159e…15a7 lno = 0x08ac // 0x15a0 @0x2
0x159e…15a7 at0004 = ╱92╱ PRINT ╱ // 0x15a2 @0x4
0x159e…15a7 at0005 = ╱22╱"╱ // 0x15a3 @0x5
0x159e…15a7 at0006 = ╱20╱…╱ // 0x15a4 @0x6
0x159e…15a7 at0007 = ╱22╱"╱ // 0x15a5 @0x7
0x159e…15a7 at0008 = EOL // 0x15a6 @0x8
0x159e…15a7 }
0x15a7…15b9 a310 2230 LINIE=LINIE+G
0x15a7…15b9 LineComalBin {
0x15a7…15b9 ptr = 0xa310 // 0x15a7 @0x0
0x15a7…15b9 lno = 0x08b6 // 0x15a9 @0x2
0x15a7…15b9 at0004 = ╱4c╱L╱ // 0x15ab @0x4
0x15a7…15b9 at0005 = ╱49╱I╱ // 0x15ac @0x5
0x15a7…15b9 at0006 = ╱4e╱N╱ // 0x15ad @0x6
0x15a7…15b9 at0007 = ╱49╱I╱ // 0x15ae @0x7
0x15a7…15b9 at0008 = ╱45╱E╱ // 0x15af @0x8
0x15a7…15b9 at0009 = ╱dc╱=╱ // 0x15b0 @0x9
0x15a7…15b9 at000a = ╱4c╱L╱ // 0x15b1 @0xa
0x15a7…15b9 at000b = ╱49╱I╱ // 0x15b2 @0xb
0x15a7…15b9 at000c = ╱4e╱N╱ // 0x15b3 @0xc
0x15a7…15b9 at000d = ╱49╱I╱ // 0x15b4 @0xd
0x15a7…15b9 at000e = ╱45╱E╱ // 0x15b5 @0xe
0x15a7…15b9 at000f = ╱e2╱+╱ // 0x15b6 @0xf
0x15a7…15b9 at0010 = ╱47╱G╱ // 0x15b7 @0x10
0x15a7…15b9 at0011 = EOL // 0x15b8 @0x11
0x15a7…15b9 }
0x15b9…15c1 a318 2240 WHEN G
0x15b9…15c1 LineComalBin {
0x15b9…15c1 ptr = 0xa318 // 0x15b9 @0x0
0x15b9…15c1 lno = 0x08c0 // 0x15bb @0x2
0x15b9…15c1 at0004 = ╱a301╱ WHEN ╱ // 0x15bd @0x4
0x15b9…15c1 at0006 = ╱47╱G╱ // 0x15bf @0x6
0x15b9…15c1 at0007 = EOL // 0x15c0 @0x7
0x15b9…15c1 }
0x15c1…15ce a325 2250 IF GFNR>B THEN
0x15c1…15ce LineComalBin {
0x15c1…15ce ptr = 0xa325 // 0x15c1 @0x0
0x15c1…15ce lno = 0x08ca // 0x15c3 @0x2
0x15c1…15ce at0004 = ╱9c╱ IF ╱ // 0x15c5 @0x4
0x15c1…15ce at0005 = ╱47╱G╱ // 0x15c6 @0x5
0x15c1…15ce at0006 = ╱46╱F╱ // 0x15c7 @0x6
0x15c1…15ce at0007 = ╱4e╱N╱ // 0x15c8 @0x7
0x15c1…15ce at0008 = ╱52╱R╱ // 0x15c9 @0x8
0x15c1…15ce at0009 = ╱de╱>╱ // 0x15ca @0x9
0x15c1…15ce at000a = ╱42╱B╱ // 0x15cb @0xa
0x15c1…15ce at000b = ╱b6╱ THEN ╱ // 0x15cc @0xb
0x15c1…15ce at000c = EOL // 0x15cd @0xc
0x15c1…15ce }
0x15ce…15f7 a34e 2260 IF LINIE>37 THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x15ce…15f7 LineComalBin {
0x15ce…15f7 ptr = 0xa34e // 0x15ce @0x0
0x15ce…15f7 lno = 0x08d4 // 0x15d0 @0x2
0x15ce…15f7 at0004 = ╱82╱ IF ╱ // 0x15d2 @0x4
0x15ce…15f7 at0005 = ╱4c╱L╱ // 0x15d3 @0x5
0x15ce…15f7 at0006 = ╱49╱I╱ // 0x15d4 @0x6
0x15ce…15f7 at0007 = ╱4e╱N╱ // 0x15d5 @0x7
0x15ce…15f7 at0008 = ╱49╱I╱ // 0x15d6 @0x8
0x15ce…15f7 at0009 = ╱45╱E╱ // 0x15d7 @0x9
0x15ce…15f7 at000a = ╱de╱>╱ // 0x15d8 @0xa
0x15ce…15f7 at000b = ╱33╱3╱ // 0x15d9 @0xb
0x15ce…15f7 at000c = ╱37╱7╱ // 0x15da @0xc
0x15ce…15f7 at000d = ╱fe00009406╱ // 0x15db @0xd
0x15ce…15f7 at0012 = ╱b6╱ THEN ╱ // 0x15e0 @0x12
0x15ce…15f7 at0013 = ╱9d╱ EXEC ╱ // 0x15e1 @0x13
0x15ce…15f7 at0014 = ╱4e╱N╱ // 0x15e2 @0x14
0x15ce…15f7 at0015 = ╱59╱Y╱ // 0x15e3 @0x15
0x15ce…15f7 at0016 = ╱53╱S╱ // 0x15e4 @0x16
0x15ce…15f7 at0017 = ╱49╱I╱ // 0x15e5 @0x17
0x15ce…15f7 at0018 = ╱44╱D╱ // 0x15e6 @0x18
0x15ce…15f7 at0019 = ╱45╱E╱ // 0x15e7 @0x19
0x15ce…15f7 at001a = ╱ed╱(╱ // 0x15e8 @0x1a
0x15ce…15f7 at001b = ╱47╱G╱ // 0x15e9 @0x1b
0x15ce…15f7 at001c = ╱46╱F╱ // 0x15ea @0x1c
0x15ce…15f7 at001d = ╱4e╱N╱ // 0x15eb @0x1d
0x15ce…15f7 at001e = ╱52╱R╱ // 0x15ec @0x1e
0x15ce…15f7 at001f = ╱ec╱,╱ // 0x15ed @0x1f
0x15ce…15f7 at0020 = ╱47╱G╱ // 0x15ee @0x20
0x15ce…15f7 at0021 = ╱4c╱L╱ // 0x15ef @0x21
0x15ce…15f7 at0022 = ╱4e╱N╱ // 0x15f0 @0x22
0x15ce…15f7 at0023 = ╱41╱A╱ // 0x15f1 @0x23
0x15ce…15f7 at0024 = ╱56╱V╱ // 0x15f2 @0x24
0x15ce…15f7 at0025 = ╱4e╱N╱ // 0x15f3 @0x25
0x15ce…15f7 at0026 = ╱ef╱$╱ // 0x15f4 @0x26
0x15ce…15f7 at0027 = ╱ee╱)╱ // 0x15f5 @0x27
0x15ce…15f7 at0028 = EOL // 0x15f6 @0x28
0x15ce…15f7 }
0x15f7…1600 a357 2270 PRINT " "
0x15f7…1600 LineComalBin {
0x15f7…1600 ptr = 0xa357 // 0x15f7 @0x0
0x15f7…1600 lno = 0x08de // 0x15f9 @0x2
0x15f7…1600 at0004 = ╱92╱ PRINT ╱ // 0x15fb @0x4
0x15f7…1600 at0005 = ╱22╱"╱ // 0x15fc @0x5
0x15f7…1600 at0006 = ╱20╱…╱ // 0x15fd @0x6
0x15f7…1600 at0007 = ╱22╱"╱ // 0x15fe @0x7
0x15f7…1600 at0008 = EOL // 0x15ff @0x8
0x15f7…1600 }
0x1600…1621 a378 2280 PRINT TAB(8);STREG$(E:71)
0x1600…1621 LineComalBin {
0x1600…1621 ptr = 0xa378 // 0x1600 @0x0
0x1600…1621 lno = 0x08e8 // 0x1602 @0x2
0x1600…1621 at0004 = ╱92╱ PRINT ╱ // 0x1604 @0x4
0x1600…1621 at0005 = ╱d2╱TAB╱ // 0x1605 @0x5
0x1600…1621 at0006 = ╱ed╱(╱ // 0x1606 @0x6
0x1600…1621 at0007 = ╱38╱8╱ // 0x1607 @0x7
0x1600…1621 at0008 = ╱fe00008004╱ // 0x1608 @0x8
0x1600…1621 at000d = ╱ee╱)╱ // 0x160d @0xd
0x1600…1621 at000e = ╱eb╱;╱ // 0x160e @0xe
0x1600…1621 at000f = ╱53╱S╱ // 0x160f @0xf
0x1600…1621 at0010 = ╱54╱T╱ // 0x1610 @0x10
0x1600…1621 at0011 = ╱52╱R╱ // 0x1611 @0x11
0x1600…1621 at0012 = ╱45╱E╱ // 0x1612 @0x12
0x1600…1621 at0013 = ╱47╱G╱ // 0x1613 @0x13
0x1600…1621 at0014 = ╱ef╱$╱ // 0x1614 @0x14
0x1600…1621 at0015 = ╱ed╱(╱ // 0x1615 @0x15
0x1600…1621 at0016 = ╱45╱E╱ // 0x1616 @0x16
0x1600…1621 at0017 = ╱f0╱:╱ // 0x1617 @0x17
0x1600…1621 at0018 = ╱37╱7╱ // 0x1618 @0x18
0x1600…1621 at0019 = ╱31╱1╱ // 0x1619 @0x19
0x1600…1621 at001a = ╱fe00008e07╱ // 0x161a @0x1a
0x1600…1621 at001f = ╱ee╱)╱ // 0x161f @0x1f
0x1600…1621 at0020 = EOL // 0x1620 @0x20
0x1600…1621 }
0x1621…164d a3a4 2290 EXEC LINIEUD(GFNR,GLNAVN$,SALDO2$,SALDO12$)
0x1621…164d LineComalBin {
0x1621…164d ptr = 0xa3a4 // 0x1621 @0x0
0x1621…164d lno = 0x08f2 // 0x1623 @0x2
0x1621…164d at0004 = ╱9d╱ EXEC ╱ // 0x1625 @0x4
0x1621…164d at0005 = ╱4c╱L╱ // 0x1626 @0x5
0x1621…164d at0006 = ╱49╱I╱ // 0x1627 @0x6
0x1621…164d at0007 = ╱4e╱N╱ // 0x1628 @0x7
0x1621…164d at0008 = ╱49╱I╱ // 0x1629 @0x8
0x1621…164d at0009 = ╱45╱E╱ // 0x162a @0x9
0x1621…164d at000a = ╱55╱U╱ // 0x162b @0xa
0x1621…164d at000b = ╱44╱D╱ // 0x162c @0xb
0x1621…164d at000c = ╱ed╱(╱ // 0x162d @0xc
0x1621…164d at000d = ╱47╱G╱ // 0x162e @0xd
0x1621…164d at000e = ╱46╱F╱ // 0x162f @0xe
0x1621…164d at000f = ╱4e╱N╱ // 0x1630 @0xf
0x1621…164d at0010 = ╱52╱R╱ // 0x1631 @0x10
0x1621…164d at0011 = ╱ec╱,╱ // 0x1632 @0x11
0x1621…164d at0012 = ╱47╱G╱ // 0x1633 @0x12
0x1621…164d at0013 = ╱4c╱L╱ // 0x1634 @0x13
0x1621…164d at0014 = ╱4e╱N╱ // 0x1635 @0x14
0x1621…164d at0015 = ╱41╱A╱ // 0x1636 @0x15
0x1621…164d at0016 = ╱56╱V╱ // 0x1637 @0x16
0x1621…164d at0017 = ╱4e╱N╱ // 0x1638 @0x17
0x1621…164d at0018 = ╱ef╱$╱ // 0x1639 @0x18
0x1621…164d at0019 = ╱ec╱,╱ // 0x163a @0x19
0x1621…164d at001a = ╱53╱S╱ // 0x163b @0x1a
0x1621…164d at001b = ╱41╱A╱ // 0x163c @0x1b
0x1621…164d at001c = ╱4c╱L╱ // 0x163d @0x1c
0x1621…164d at001d = ╱44╱D╱ // 0x163e @0x1d
0x1621…164d at001e = ╱4f╱O╱ // 0x163f @0x1e
0x1621…164d at001f = ╱32╱2╱ // 0x1640 @0x1f
0x1621…164d at0020 = ╱ef╱$╱ // 0x1641 @0x20
0x1621…164d at0021 = ╱ec╱,╱ // 0x1642 @0x21
0x1621…164d at0022 = ╱53╱S╱ // 0x1643 @0x22
0x1621…164d at0023 = ╱41╱A╱ // 0x1644 @0x23
0x1621…164d at0024 = ╱4c╱L╱ // 0x1645 @0x24
0x1621…164d at0025 = ╱44╱D╱ // 0x1646 @0x25
0x1621…164d at0026 = ╱4f╱O╱ // 0x1647 @0x26
0x1621…164d at0027 = ╱31╱1╱ // 0x1648 @0x27
0x1621…164d at0028 = ╱32╱2╱ // 0x1649 @0x28
0x1621…164d at0029 = ╱ef╱$╱ // 0x164a @0x29
0x1621…164d at002a = ╱ee╱)╱ // 0x164b @0x2a
0x1621…164d at002b = EOL // 0x164c @0x2b
0x1621…164d }
0x164d…165f a3b6 2300 LINIE=LINIE+V
0x164d…165f LineComalBin {
0x164d…165f ptr = 0xa3b6 // 0x164d @0x0
0x164d…165f lno = 0x08fc // 0x164f @0x2
0x164d…165f at0004 = ╱4c╱L╱ // 0x1651 @0x4
0x164d…165f at0005 = ╱49╱I╱ // 0x1652 @0x5
0x164d…165f at0006 = ╱4e╱N╱ // 0x1653 @0x6
0x164d…165f at0007 = ╱49╱I╱ // 0x1654 @0x7
0x164d…165f at0008 = ╱45╱E╱ // 0x1655 @0x8
0x164d…165f at0009 = ╱dc╱=╱ // 0x1656 @0x9
0x164d…165f at000a = ╱4c╱L╱ // 0x1657 @0xa
0x164d…165f at000b = ╱49╱I╱ // 0x1658 @0xb
0x164d…165f at000c = ╱4e╱N╱ // 0x1659 @0xc
0x164d…165f at000d = ╱49╱I╱ // 0x165a @0xd
0x164d…165f at000e = ╱45╱E╱ // 0x165b @0xe
0x164d…165f at000f = ╱e2╱+╱ // 0x165c @0xf
0x164d…165f at0010 = ╱56╱V╱ // 0x165d @0x10
0x164d…165f at0011 = EOL // 0x165e @0x11
0x164d…165f }
0x165f…1665 a3bc 2310 ENDIF
0x165f…1665 LineComalBin {
0x165f…1665 ptr = 0xa3bc // 0x165f @0x0
0x165f…1665 lno = 0x0906 // 0x1661 @0x2
0x165f…1665 at0004 = ╱9b╱ ENDIF ╱ // 0x1663 @0x4
0x165f…1665 at0005 = EOL // 0x1664 @0x5
0x165f…1665 }
0x1665…1684 a3db 2320 SALDO2$="0+";SALDO12$="0+"
0x1665…1684 LineComalBin {
0x1665…1684 ptr = 0xa3db // 0x1665 @0x0
0x1665…1684 lno = 0x0910 // 0x1667 @0x2
0x1665…1684 at0004 = ╱53╱S╱ // 0x1669 @0x4
0x1665…1684 at0005 = ╱41╱A╱ // 0x166a @0x5
0x1665…1684 at0006 = ╱4c╱L╱ // 0x166b @0x6
0x1665…1684 at0007 = ╱44╱D╱ // 0x166c @0x7
0x1665…1684 at0008 = ╱4f╱O╱ // 0x166d @0x8
0x1665…1684 at0009 = ╱32╱2╱ // 0x166e @0x9
0x1665…1684 at000a = ╱ef╱$╱ // 0x166f @0xa
0x1665…1684 at000b = ╱dc╱=╱ // 0x1670 @0xb
0x1665…1684 at000c = ╱22╱"╱ // 0x1671 @0xc
0x1665…1684 at000d = ╱30╱0╱ // 0x1672 @0xd
0x1665…1684 at000e = ╱2b╱+╱ // 0x1673 @0xe
0x1665…1684 at000f = ╱22╱"╱ // 0x1674 @0xf
0x1665…1684 at0010 = ╱eb╱;╱ // 0x1675 @0x10
0x1665…1684 at0011 = ╱53╱S╱ // 0x1676 @0x11
0x1665…1684 at0012 = ╱41╱A╱ // 0x1677 @0x12
0x1665…1684 at0013 = ╱4c╱L╱ // 0x1678 @0x13
0x1665…1684 at0014 = ╱44╱D╱ // 0x1679 @0x14
0x1665…1684 at0015 = ╱4f╱O╱ // 0x167a @0x15
0x1665…1684 at0016 = ╱31╱1╱ // 0x167b @0x16
0x1665…1684 at0017 = ╱32╱2╱ // 0x167c @0x17
0x1665…1684 at0018 = ╱ef╱$╱ // 0x167d @0x18
0x1665…1684 at0019 = ╱dc╱=╱ // 0x167e @0x19
0x1665…1684 at001a = ╱22╱"╱ // 0x167f @0x1a
0x1665…1684 at001b = ╱30╱0╱ // 0x1680 @0x1b
0x1665…1684 at001c = ╱2b╱+╱ // 0x1681 @0x1c
0x1665…1684 at001d = ╱22╱"╱ // 0x1682 @0x1d
0x1665…1684 at001e = EOL // 0x1683 @0x1e
0x1665…1684 }
0x1684…16a3 a3fa 2330 SALDO1$="0+";SALDO11$="0+"
0x1684…16a3 LineComalBin {
0x1684…16a3 ptr = 0xa3fa // 0x1684 @0x0
0x1684…16a3 lno = 0x091a // 0x1686 @0x2
0x1684…16a3 at0004 = ╱53╱S╱ // 0x1688 @0x4
0x1684…16a3 at0005 = ╱41╱A╱ // 0x1689 @0x5
0x1684…16a3 at0006 = ╱4c╱L╱ // 0x168a @0x6
0x1684…16a3 at0007 = ╱44╱D╱ // 0x168b @0x7
0x1684…16a3 at0008 = ╱4f╱O╱ // 0x168c @0x8
0x1684…16a3 at0009 = ╱31╱1╱ // 0x168d @0x9
0x1684…16a3 at000a = ╱ef╱$╱ // 0x168e @0xa
0x1684…16a3 at000b = ╱dc╱=╱ // 0x168f @0xb
0x1684…16a3 at000c = ╱22╱"╱ // 0x1690 @0xc
0x1684…16a3 at000d = ╱30╱0╱ // 0x1691 @0xd
0x1684…16a3 at000e = ╱2b╱+╱ // 0x1692 @0xe
0x1684…16a3 at000f = ╱22╱"╱ // 0x1693 @0xf
0x1684…16a3 at0010 = ╱eb╱;╱ // 0x1694 @0x10
0x1684…16a3 at0011 = ╱53╱S╱ // 0x1695 @0x11
0x1684…16a3 at0012 = ╱41╱A╱ // 0x1696 @0x12
0x1684…16a3 at0013 = ╱4c╱L╱ // 0x1697 @0x13
0x1684…16a3 at0014 = ╱44╱D╱ // 0x1698 @0x14
0x1684…16a3 at0015 = ╱4f╱O╱ // 0x1699 @0x15
0x1684…16a3 at0016 = ╱31╱1╱ // 0x169a @0x16
0x1684…16a3 at0017 = ╱31╱1╱ // 0x169b @0x17
0x1684…16a3 at0018 = ╱ef╱$╱ // 0x169c @0x18
0x1684…16a3 at0019 = ╱dc╱=╱ // 0x169d @0x19
0x1684…16a3 at001a = ╱22╱"╱ // 0x169e @0x1a
0x1684…16a3 at001b = ╱30╱0╱ // 0x169f @0x1b
0x1684…16a3 at001c = ╱2b╱+╱ // 0x16a0 @0x1c
0x1684…16a3 at001d = ╱22╱"╱ // 0x16a1 @0x1d
0x1684…16a3 at001e = EOL // 0x16a2 @0x1e
0x1684…16a3 }
0x16a3…16bf a416 2340 GLNAVN$=FNAVN$;GFNR=FNR
0x16a3…16bf LineComalBin {
0x16a3…16bf ptr = 0xa416 // 0x16a3 @0x0
0x16a3…16bf lno = 0x0924 // 0x16a5 @0x2
0x16a3…16bf at0004 = ╱47╱G╱ // 0x16a7 @0x4
0x16a3…16bf at0005 = ╱4c╱L╱ // 0x16a8 @0x5
0x16a3…16bf at0006 = ╱4e╱N╱ // 0x16a9 @0x6
0x16a3…16bf at0007 = ╱41╱A╱ // 0x16aa @0x7
0x16a3…16bf at0008 = ╱56╱V╱ // 0x16ab @0x8
0x16a3…16bf at0009 = ╱4e╱N╱ // 0x16ac @0x9
0x16a3…16bf at000a = ╱ef╱$╱ // 0x16ad @0xa
0x16a3…16bf at000b = ╱dc╱=╱ // 0x16ae @0xb
0x16a3…16bf at000c = ╱46╱F╱ // 0x16af @0xc
0x16a3…16bf at000d = ╱4e╱N╱ // 0x16b0 @0xd
0x16a3…16bf at000e = ╱41╱A╱ // 0x16b1 @0xe
0x16a3…16bf at000f = ╱56╱V╱ // 0x16b2 @0xf
0x16a3…16bf at0010 = ╱4e╱N╱ // 0x16b3 @0x10
0x16a3…16bf at0011 = ╱ef╱$╱ // 0x16b4 @0x11
0x16a3…16bf at0012 = ╱eb╱;╱ // 0x16b5 @0x12
0x16a3…16bf at0013 = ╱47╱G╱ // 0x16b6 @0x13
0x16a3…16bf at0014 = ╱46╱F╱ // 0x16b7 @0x14
0x16a3…16bf at0015 = ╱4e╱N╱ // 0x16b8 @0x15
0x16a3…16bf at0016 = ╱52╱R╱ // 0x16b9 @0x16
0x16a3…16bf at0017 = ╱dc╱=╱ // 0x16ba @0x17
0x16a3…16bf at0018 = ╱46╱F╱ // 0x16bb @0x18
0x16a3…16bf at0019 = ╱4e╱N╱ // 0x16bc @0x19
0x16a3…16bf at001a = ╱52╱R╱ // 0x16bd @0x1a
0x16a3…16bf at001b = EOL // 0x16be @0x1b
0x16a3…16bf }
0x16bf…16d3 a42a 2350 IF LINIE>34 THEN
0x16bf…16d3 LineComalBin {
0x16bf…16d3 ptr = 0xa42a // 0x16bf @0x0
0x16bf…16d3 lno = 0x092e // 0x16c1 @0x2
0x16bf…16d3 at0004 = ╱9c╱ IF ╱ // 0x16c3 @0x4
0x16bf…16d3 at0005 = ╱4c╱L╱ // 0x16c4 @0x5
0x16bf…16d3 at0006 = ╱49╱I╱ // 0x16c5 @0x6
0x16bf…16d3 at0007 = ╱4e╱N╱ // 0x16c6 @0x7
0x16bf…16d3 at0008 = ╱49╱I╱ // 0x16c7 @0x8
0x16bf…16d3 at0009 = ╱45╱E╱ // 0x16c8 @0x9
0x16bf…16d3 at000a = ╱de╱>╱ // 0x16c9 @0xa
0x16bf…16d3 at000b = ╱33╱3╱ // 0x16ca @0xb
0x16bf…16d3 at000c = ╱34╱4╱ // 0x16cb @0xc
0x16bf…16d3 at000d = ╱fe00008806╱ // 0x16cc @0xd
0x16bf…16d3 at0012 = ╱b6╱ THEN ╱ // 0x16d1 @0x12
0x16bf…16d3 at0013 = EOL // 0x16d2 @0x13
0x16bf…16d3 }
0x16d3…16ed a444 2360 EXEC NYSIDE(GFNR,GLNAVN$)
0x16d3…16ed LineComalBin {
0x16d3…16ed ptr = 0xa444 // 0x16d3 @0x0
0x16d3…16ed lno = 0x0938 // 0x16d5 @0x2
0x16d3…16ed at0004 = ╱9d╱ EXEC ╱ // 0x16d7 @0x4
0x16d3…16ed at0005 = ╱4e╱N╱ // 0x16d8 @0x5
0x16d3…16ed at0006 = ╱59╱Y╱ // 0x16d9 @0x6
0x16d3…16ed at0007 = ╱53╱S╱ // 0x16da @0x7
0x16d3…16ed at0008 = ╱49╱I╱ // 0x16db @0x8
0x16d3…16ed at0009 = ╱44╱D╱ // 0x16dc @0x9
0x16d3…16ed at000a = ╱45╱E╱ // 0x16dd @0xa
0x16d3…16ed at000b = ╱ed╱(╱ // 0x16de @0xb
0x16d3…16ed at000c = ╱47╱G╱ // 0x16df @0xc
0x16d3…16ed at000d = ╱46╱F╱ // 0x16e0 @0xd
0x16d3…16ed at000e = ╱4e╱N╱ // 0x16e1 @0xe
0x16d3…16ed at000f = ╱52╱R╱ // 0x16e2 @0xf
0x16d3…16ed at0010 = ╱ec╱,╱ // 0x16e3 @0x10
0x16d3…16ed at0011 = ╱47╱G╱ // 0x16e4 @0x11
0x16d3…16ed at0012 = ╱4c╱L╱ // 0x16e5 @0x12
0x16d3…16ed at0013 = ╱4e╱N╱ // 0x16e6 @0x13
0x16d3…16ed at0014 = ╱41╱A╱ // 0x16e7 @0x14
0x16d3…16ed at0015 = ╱56╱V╱ // 0x16e8 @0x15
0x16d3…16ed at0016 = ╱4e╱N╱ // 0x16e9 @0x16
0x16d3…16ed at0017 = ╱ef╱$╱ // 0x16ea @0x17
0x16d3…16ed at0018 = ╱ee╱)╱ // 0x16eb @0x18
0x16d3…16ed at0019 = EOL // 0x16ec @0x19
0x16d3…16ed }
0x16ed…16f3 a44a 2370 ELSE
0x16ed…16f3 LineComalBin {
0x16ed…16f3 ptr = 0xa44a // 0x16ed @0x0
0x16ed…16f3 lno = 0x0942 // 0x16ef @0x2
0x16ed…16f3 at0004 = ╱9a╱ ELSE ╱ // 0x16f1 @0x4
0x16ed…16f3 at0005 = EOL // 0x16f2 @0x5
0x16ed…16f3 }
0x16f3…16fc a453 2375 PRINT " "
0x16f3…16fc LineComalBin {
0x16f3…16fc ptr = 0xa453 // 0x16f3 @0x0
0x16f3…16fc lno = 0x0947 // 0x16f5 @0x2
0x16f3…16fc at0004 = ╱92╱ PRINT ╱ // 0x16f7 @0x4
0x16f3…16fc at0005 = ╱22╱"╱ // 0x16f8 @0x5
0x16f3…16fc at0006 = ╱20╱…╱ // 0x16f9 @0x6
0x16f3…16fc at0007 = ╱22╱"╱ // 0x16fa @0x7
0x16f3…16fc at0008 = EOL // 0x16fb @0x8
0x16f3…16fc }
0x16fc…1705 a45c 2380 PRINT " "
0x16fc…1705 LineComalBin {
0x16fc…1705 ptr = 0xa45c // 0x16fc @0x0
0x16fc…1705 lno = 0x094c // 0x16fe @0x2
0x16fc…1705 at0004 = ╱92╱ PRINT ╱ // 0x1700 @0x4
0x16fc…1705 at0005 = ╱22╱"╱ // 0x1701 @0x5
0x16fc…1705 at0006 = ╱20╱…╱ // 0x1702 @0x6
0x16fc…1705 at0007 = ╱22╱"╱ // 0x1703 @0x7
0x16fc…1705 at0008 = EOL // 0x1704 @0x8
0x16fc…1705 }
0x1705…171a a471 2390 PRINT USING "###### ":FNR;
0x1705…171a LineComalBin {
0x1705…171a ptr = 0xa471 // 0x1705 @0x0
0x1705…171a lno = 0x0956 // 0x1707 @0x2
0x1705…171a at0004 = ╱92╱ PRINT ╱ // 0x1709 @0x4
0x1705…171a at0005 = ╱b9╱ USING ╱ // 0x170a @0x5
0x1705…171a at0006 = ╱22╱"╱ // 0x170b @0x6
0x1705…171a at0007 = ╱23╱#╱ // 0x170c @0x7
0x1705…171a at0008 = ╱23╱#╱ // 0x170d @0x8
0x1705…171a at0009 = ╱23╱#╱ // 0x170e @0x9
0x1705…171a at000a = ╱23╱#╱ // 0x170f @0xa
0x1705…171a at000b = ╱23╱#╱ // 0x1710 @0xb
0x1705…171a at000c = ╱23╱#╱ // 0x1711 @0xc
0x1705…171a at000d = ╱20╱…╱ // 0x1712 @0xd
0x1705…171a at000e = ╱22╱"╱ // 0x1713 @0xe
0x1705…171a at000f = ╱f0╱:╱ // 0x1714 @0xf
0x1705…171a at0010 = ╱46╱F╱ // 0x1715 @0x10
0x1705…171a at0011 = ╱4e╱N╱ // 0x1716 @0x11
0x1705…171a at0012 = ╱52╱R╱ // 0x1717 @0x12
0x1705…171a at0013 = ╱eb╱;╱ // 0x1718 @0x13
0x1705…171a at0014 = EOL // 0x1719 @0x14
0x1705…171a }
0x171a…1727 a47e 2400 PRINT GLNAVN$
0x171a…1727 LineComalBin {
0x171a…1727 ptr = 0xa47e // 0x171a @0x0
0x171a…1727 lno = 0x0960 // 0x171c @0x2
0x171a…1727 at0004 = ╱92╱ PRINT ╱ // 0x171e @0x4
0x171a…1727 at0005 = ╱47╱G╱ // 0x171f @0x5
0x171a…1727 at0006 = ╱4c╱L╱ // 0x1720 @0x6
0x171a…1727 at0007 = ╱4e╱N╱ // 0x1721 @0x7
0x171a…1727 at0008 = ╱41╱A╱ // 0x1722 @0x8
0x171a…1727 at0009 = ╱56╱V╱ // 0x1723 @0x9
0x171a…1727 at000a = ╱4e╱N╱ // 0x1724 @0xa
0x171a…1727 at000b = ╱ef╱$╱ // 0x1725 @0xb
0x171a…1727 at000c = EOL // 0x1726 @0xc
0x171a…1727 }
0x1727…174b a4a2 2410 PRINT TAB(8);STREG$(E:LEN(GLNAVN$))
0x1727…174b LineComalBin {
0x1727…174b ptr = 0xa4a2 // 0x1727 @0x0
0x1727…174b lno = 0x096a // 0x1729 @0x2
0x1727…174b at0004 = ╱92╱ PRINT ╱ // 0x172b @0x4
0x1727…174b at0005 = ╱d2╱TAB╱ // 0x172c @0x5
0x1727…174b at0006 = ╱ed╱(╱ // 0x172d @0x6
0x1727…174b at0007 = ╱38╱8╱ // 0x172e @0x7
0x1727…174b at0008 = ╱fe00008004╱ // 0x172f @0x8
0x1727…174b at000d = ╱ee╱)╱ // 0x1734 @0xd
0x1727…174b at000e = ╱eb╱;╱ // 0x1735 @0xe
0x1727…174b at000f = ╱53╱S╱ // 0x1736 @0xf
0x1727…174b at0010 = ╱54╱T╱ // 0x1737 @0x10
0x1727…174b at0011 = ╱52╱R╱ // 0x1738 @0x11
0x1727…174b at0012 = ╱45╱E╱ // 0x1739 @0x12
0x1727…174b at0013 = ╱47╱G╱ // 0x173a @0x13
0x1727…174b at0014 = ╱ef╱$╱ // 0x173b @0x14
0x1727…174b at0015 = ╱ed╱(╱ // 0x173c @0x15
0x1727…174b at0016 = ╱45╱E╱ // 0x173d @0x16
0x1727…174b at0017 = ╱f0╱:╱ // 0x173e @0x17
0x1727…174b at0018 = ╱cc╱LEN╱ // 0x173f @0x18
0x1727…174b at0019 = ╱ed╱(╱ // 0x1740 @0x19
0x1727…174b at001a = ╱47╱G╱ // 0x1741 @0x1a
0x1727…174b at001b = ╱4c╱L╱ // 0x1742 @0x1b
0x1727…174b at001c = ╱4e╱N╱ // 0x1743 @0x1c
0x1727…174b at001d = ╱41╱A╱ // 0x1744 @0x1d
0x1727…174b at001e = ╱56╱V╱ // 0x1745 @0x1e
0x1727…174b at001f = ╱4e╱N╱ // 0x1746 @0x1f
0x1727…174b at0020 = ╱ef╱$╱ // 0x1747 @0x20
0x1727…174b at0021 = ╱ee╱)╱ // 0x1748 @0x21
0x1727…174b at0022 = ╱ee╱)╱ // 0x1749 @0x22
0x1727…174b at0023 = EOL // 0x174a @0x23
0x1727…174b }
0x174b…1754 a4ab 2420 PRINT " "
0x174b…1754 LineComalBin {
0x174b…1754 ptr = 0xa4ab // 0x174b @0x0
0x174b…1754 lno = 0x0974 // 0x174d @0x2
0x174b…1754 at0004 = ╱92╱ PRINT ╱ // 0x174f @0x4
0x174b…1754 at0005 = ╱22╱"╱ // 0x1750 @0x5
0x174b…1754 at0006 = ╱20╱…╱ // 0x1751 @0x6
0x174b…1754 at0007 = ╱22╱"╱ // 0x1752 @0x7
0x174b…1754 at0008 = EOL // 0x1753 @0x8
0x174b…1754 }
0x1754…176b a4c2 2430 LINIE=LINIE+5
0x1754…176b LineComalBin {
0x1754…176b ptr = 0xa4c2 // 0x1754 @0x0
0x1754…176b lno = 0x097e // 0x1756 @0x2
0x1754…176b at0004 = ╱4c╱L╱ // 0x1758 @0x4
0x1754…176b at0005 = ╱49╱I╱ // 0x1759 @0x5
0x1754…176b at0006 = ╱4e╱N╱ // 0x175a @0x6
0x1754…176b at0007 = ╱49╱I╱ // 0x175b @0x7
0x1754…176b at0008 = ╱45╱E╱ // 0x175c @0x8
0x1754…176b at0009 = ╱dc╱=╱ // 0x175d @0x9
0x1754…176b at000a = ╱4c╱L╱ // 0x175e @0xa
0x1754…176b at000b = ╱49╱I╱ // 0x175f @0xb
0x1754…176b at000c = ╱4e╱N╱ // 0x1760 @0xc
0x1754…176b at000d = ╱49╱I╱ // 0x1761 @0xd
0x1754…176b at000e = ╱45╱E╱ // 0x1762 @0xe
0x1754…176b at000f = ╱e2╱+╱ // 0x1763 @0xf
0x1754…176b at0010 = ╱35╱5╱ // 0x1764 @0x10
0x1754…176b at0011 = ╱fe0000a003╱ // 0x1765 @0x11
0x1754…176b at0016 = EOL // 0x176a @0x16
0x1754…176b }
0x176b…1771 a4c8 2440 ENDIF
0x176b…1771 LineComalBin {
0x176b…1771 ptr = 0xa4c8 // 0x176b @0x0
0x176b…1771 lno = 0x0988 // 0x176d @0x2
0x176b…1771 at0004 = ╱9b╱ ENDIF ╱ // 0x176f @0x4
0x176b…1771 at0005 = EOL // 0x1770 @0x5
0x176b…1771 }
0x1771…1779 a4d0 2450 WHEN V
0x1771…1779 LineComalBin {
0x1771…1779 ptr = 0xa4d0 // 0x1771 @0x0
0x1771…1779 lno = 0x0992 // 0x1773 @0x2
0x1771…1779 at0004 = ╱a301╱ WHEN ╱ // 0x1775 @0x4
0x1771…1779 at0006 = ╱56╱V╱ // 0x1777 @0x6
0x1771…1779 at0007 = EOL // 0x1778 @0x7
0x1771…1779 }
0x1779…17a9 a500 2460 IF LINIE>37 AND GFNR>B THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x1779…17a9 LineComalBin {
0x1779…17a9 ptr = 0xa500 // 0x1779 @0x0
0x1779…17a9 lno = 0x099c // 0x177b @0x2
0x1779…17a9 at0004 = ╱82╱ IF ╱ // 0x177d @0x4
0x1779…17a9 at0005 = ╱4c╱L╱ // 0x177e @0x5
0x1779…17a9 at0006 = ╱49╱I╱ // 0x177f @0x6
0x1779…17a9 at0007 = ╱4e╱N╱ // 0x1780 @0x7
0x1779…17a9 at0008 = ╱49╱I╱ // 0x1781 @0x8
0x1779…17a9 at0009 = ╱45╱E╱ // 0x1782 @0x9
0x1779…17a9 at000a = ╱de╱>╱ // 0x1783 @0xa
0x1779…17a9 at000b = ╱33╱3╱ // 0x1784 @0xb
0x1779…17a9 at000c = ╱37╱7╱ // 0x1785 @0xc
0x1779…17a9 at000d = ╱fe00009406╱ // 0x1786 @0xd
0x1779…17a9 at0012 = ╱da╱ AND ╱ // 0x178b @0x12
0x1779…17a9 at0013 = ╱47╱G╱ // 0x178c @0x13
0x1779…17a9 at0014 = ╱46╱F╱ // 0x178d @0x14
0x1779…17a9 at0015 = ╱4e╱N╱ // 0x178e @0x15
0x1779…17a9 at0016 = ╱52╱R╱ // 0x178f @0x16
0x1779…17a9 at0017 = ╱de╱>╱ // 0x1790 @0x17
0x1779…17a9 at0018 = ╱42╱B╱ // 0x1791 @0x18
0x1779…17a9 at0019 = ╱b6╱ THEN ╱ // 0x1792 @0x19
0x1779…17a9 at001a = ╱9d╱ EXEC ╱ // 0x1793 @0x1a
0x1779…17a9 at001b = ╱4e╱N╱ // 0x1794 @0x1b
0x1779…17a9 at001c = ╱59╱Y╱ // 0x1795 @0x1c
0x1779…17a9 at001d = ╱53╱S╱ // 0x1796 @0x1d
0x1779…17a9 at001e = ╱49╱I╱ // 0x1797 @0x1e
0x1779…17a9 at001f = ╱44╱D╱ // 0x1798 @0x1f
0x1779…17a9 at0020 = ╱45╱E╱ // 0x1799 @0x20
0x1779…17a9 at0021 = ╱ed╱(╱ // 0x179a @0x21
0x1779…17a9 at0022 = ╱47╱G╱ // 0x179b @0x22
0x1779…17a9 at0023 = ╱46╱F╱ // 0x179c @0x23
0x1779…17a9 at0024 = ╱4e╱N╱ // 0x179d @0x24
0x1779…17a9 at0025 = ╱52╱R╱ // 0x179e @0x25
0x1779…17a9 at0026 = ╱ec╱,╱ // 0x179f @0x26
0x1779…17a9 at0027 = ╱47╱G╱ // 0x17a0 @0x27
0x1779…17a9 at0028 = ╱4c╱L╱ // 0x17a1 @0x28
0x1779…17a9 at0029 = ╱4e╱N╱ // 0x17a2 @0x29
0x1779…17a9 at002a = ╱41╱A╱ // 0x17a3 @0x2a
0x1779…17a9 at002b = ╱56╱V╱ // 0x17a4 @0x2b
0x1779…17a9 at002c = ╱4e╱N╱ // 0x17a5 @0x2c
0x1779…17a9 at002d = ╱ef╱$╱ // 0x17a6 @0x2d
0x1779…17a9 at002e = ╱ee╱)╱ // 0x17a7 @0x2e
0x1779…17a9 at002f = EOL // 0x17a8 @0x2f
0x1779…17a9 }
0x17a9…17b6 a50d 2470 IF GFNR>B THEN
0x17a9…17b6 LineComalBin {
0x17a9…17b6 ptr = 0xa50d // 0x17a9 @0x0
0x17a9…17b6 lno = 0x09a6 // 0x17ab @0x2
0x17a9…17b6 at0004 = ╱9c╱ IF ╱ // 0x17ad @0x4
0x17a9…17b6 at0005 = ╱47╱G╱ // 0x17ae @0x5
0x17a9…17b6 at0006 = ╱46╱F╱ // 0x17af @0x6
0x17a9…17b6 at0007 = ╱4e╱N╱ // 0x17b0 @0x7
0x17a9…17b6 at0008 = ╱52╱R╱ // 0x17b1 @0x8
0x17a9…17b6 at0009 = ╱de╱>╱ // 0x17b2 @0x9
0x17a9…17b6 at000a = ╱42╱B╱ // 0x17b3 @0xa
0x17a9…17b6 at000b = ╱b6╱ THEN ╱ // 0x17b4 @0xb
0x17a9…17b6 at000c = EOL // 0x17b5 @0xc
0x17a9…17b6 }
0x17b6…17bf a516 2480 PRINT " "
0x17b6…17bf LineComalBin {
0x17b6…17bf ptr = 0xa516 // 0x17b6 @0x0
0x17b6…17bf lno = 0x09b0 // 0x17b8 @0x2
0x17b6…17bf at0004 = ╱92╱ PRINT ╱ // 0x17ba @0x4
0x17b6…17bf at0005 = ╱22╱"╱ // 0x17bb @0x5
0x17b6…17bf at0006 = ╱20╱…╱ // 0x17bc @0x6
0x17b6…17bf at0007 = ╱22╱"╱ // 0x17bd @0x7
0x17b6…17bf at0008 = EOL // 0x17be @0x8
0x17b6…17bf }
0x17bf…17e0 a537 2490 PRINT TAB(8);STREG$(E:71)
0x17bf…17e0 LineComalBin {
0x17bf…17e0 ptr = 0xa537 // 0x17bf @0x0
0x17bf…17e0 lno = 0x09ba // 0x17c1 @0x2
0x17bf…17e0 at0004 = ╱92╱ PRINT ╱ // 0x17c3 @0x4
0x17bf…17e0 at0005 = ╱d2╱TAB╱ // 0x17c4 @0x5
0x17bf…17e0 at0006 = ╱ed╱(╱ // 0x17c5 @0x6
0x17bf…17e0 at0007 = ╱38╱8╱ // 0x17c6 @0x7
0x17bf…17e0 at0008 = ╱fe00008004╱ // 0x17c7 @0x8
0x17bf…17e0 at000d = ╱ee╱)╱ // 0x17cc @0xd
0x17bf…17e0 at000e = ╱eb╱;╱ // 0x17cd @0xe
0x17bf…17e0 at000f = ╱53╱S╱ // 0x17ce @0xf
0x17bf…17e0 at0010 = ╱54╱T╱ // 0x17cf @0x10
0x17bf…17e0 at0011 = ╱52╱R╱ // 0x17d0 @0x11
0x17bf…17e0 at0012 = ╱45╱E╱ // 0x17d1 @0x12
0x17bf…17e0 at0013 = ╱47╱G╱ // 0x17d2 @0x13
0x17bf…17e0 at0014 = ╱ef╱$╱ // 0x17d3 @0x14
0x17bf…17e0 at0015 = ╱ed╱(╱ // 0x17d4 @0x15
0x17bf…17e0 at0016 = ╱45╱E╱ // 0x17d5 @0x16
0x17bf…17e0 at0017 = ╱f0╱:╱ // 0x17d6 @0x17
0x17bf…17e0 at0018 = ╱37╱7╱ // 0x17d7 @0x18
0x17bf…17e0 at0019 = ╱31╱1╱ // 0x17d8 @0x19
0x17bf…17e0 at001a = ╱fe00008e07╱ // 0x17d9 @0x1a
0x17bf…17e0 at001f = ╱ee╱)╱ // 0x17de @0x1f
0x17bf…17e0 at0020 = EOL // 0x17df @0x20
0x17bf…17e0 }
0x17e0…180c a563 2500 EXEC LINIEUD(GFNR,GLNAVN$,SALDO2$,SALDO12$)
0x17e0…180c LineComalBin {
0x17e0…180c ptr = 0xa563 // 0x17e0 @0x0
0x17e0…180c lno = 0x09c4 // 0x17e2 @0x2
0x17e0…180c at0004 = ╱9d╱ EXEC ╱ // 0x17e4 @0x4
0x17e0…180c at0005 = ╱4c╱L╱ // 0x17e5 @0x5
0x17e0…180c at0006 = ╱49╱I╱ // 0x17e6 @0x6
0x17e0…180c at0007 = ╱4e╱N╱ // 0x17e7 @0x7
0x17e0…180c at0008 = ╱49╱I╱ // 0x17e8 @0x8
0x17e0…180c at0009 = ╱45╱E╱ // 0x17e9 @0x9
0x17e0…180c at000a = ╱55╱U╱ // 0x17ea @0xa
0x17e0…180c at000b = ╱44╱D╱ // 0x17eb @0xb
0x17e0…180c at000c = ╱ed╱(╱ // 0x17ec @0xc
0x17e0…180c at000d = ╱47╱G╱ // 0x17ed @0xd
0x17e0…180c at000e = ╱46╱F╱ // 0x17ee @0xe
0x17e0…180c at000f = ╱4e╱N╱ // 0x17ef @0xf
0x17e0…180c at0010 = ╱52╱R╱ // 0x17f0 @0x10
0x17e0…180c at0011 = ╱ec╱,╱ // 0x17f1 @0x11
0x17e0…180c at0012 = ╱47╱G╱ // 0x17f2 @0x12
0x17e0…180c at0013 = ╱4c╱L╱ // 0x17f3 @0x13
0x17e0…180c at0014 = ╱4e╱N╱ // 0x17f4 @0x14
0x17e0…180c at0015 = ╱41╱A╱ // 0x17f5 @0x15
0x17e0…180c at0016 = ╱56╱V╱ // 0x17f6 @0x16
0x17e0…180c at0017 = ╱4e╱N╱ // 0x17f7 @0x17
0x17e0…180c at0018 = ╱ef╱$╱ // 0x17f8 @0x18
0x17e0…180c at0019 = ╱ec╱,╱ // 0x17f9 @0x19
0x17e0…180c at001a = ╱53╱S╱ // 0x17fa @0x1a
0x17e0…180c at001b = ╱41╱A╱ // 0x17fb @0x1b
0x17e0…180c at001c = ╱4c╱L╱ // 0x17fc @0x1c
0x17e0…180c at001d = ╱44╱D╱ // 0x17fd @0x1d
0x17e0…180c at001e = ╱4f╱O╱ // 0x17fe @0x1e
0x17e0…180c at001f = ╱32╱2╱ // 0x17ff @0x1f
0x17e0…180c at0020 = ╱ef╱$╱ // 0x1800 @0x20
0x17e0…180c at0021 = ╱ec╱,╱ // 0x1801 @0x21
0x17e0…180c at0022 = ╱53╱S╱ // 0x1802 @0x22
0x17e0…180c at0023 = ╱41╱A╱ // 0x1803 @0x23
0x17e0…180c at0024 = ╱4c╱L╱ // 0x1804 @0x24
0x17e0…180c at0025 = ╱44╱D╱ // 0x1805 @0x25
0x17e0…180c at0026 = ╱4f╱O╱ // 0x1806 @0x26
0x17e0…180c at0027 = ╱31╱1╱ // 0x1807 @0x27
0x17e0…180c at0028 = ╱32╱2╱ // 0x1808 @0x28
0x17e0…180c at0029 = ╱ef╱$╱ // 0x1809 @0x29
0x17e0…180c at002a = ╱ee╱)╱ // 0x180a @0x2a
0x17e0…180c at002b = EOL // 0x180b @0x2b
0x17e0…180c }
0x180c…1840 a597 2510 SALDO2$="0+";SALDO12$="0+";LINIE=LINIE+V;GFNR=B
0x180c…1840 LineComalBin {
0x180c…1840 ptr = 0xa597 // 0x180c @0x0
0x180c…1840 lno = 0x09ce // 0x180e @0x2
0x180c…1840 at0004 = ╱53╱S╱ // 0x1810 @0x4
0x180c…1840 at0005 = ╱41╱A╱ // 0x1811 @0x5
0x180c…1840 at0006 = ╱4c╱L╱ // 0x1812 @0x6
0x180c…1840 at0007 = ╱44╱D╱ // 0x1813 @0x7
0x180c…1840 at0008 = ╱4f╱O╱ // 0x1814 @0x8
0x180c…1840 at0009 = ╱32╱2╱ // 0x1815 @0x9
0x180c…1840 at000a = ╱ef╱$╱ // 0x1816 @0xa
0x180c…1840 at000b = ╱dc╱=╱ // 0x1817 @0xb
0x180c…1840 at000c = ╱22╱"╱ // 0x1818 @0xc
0x180c…1840 at000d = ╱30╱0╱ // 0x1819 @0xd
0x180c…1840 at000e = ╱2b╱+╱ // 0x181a @0xe
0x180c…1840 at000f = ╱22╱"╱ // 0x181b @0xf
0x180c…1840 at0010 = ╱eb╱;╱ // 0x181c @0x10
0x180c…1840 at0011 = ╱53╱S╱ // 0x181d @0x11
0x180c…1840 at0012 = ╱41╱A╱ // 0x181e @0x12
0x180c…1840 at0013 = ╱4c╱L╱ // 0x181f @0x13
0x180c…1840 at0014 = ╱44╱D╱ // 0x1820 @0x14
0x180c…1840 at0015 = ╱4f╱O╱ // 0x1821 @0x15
0x180c…1840 at0016 = ╱31╱1╱ // 0x1822 @0x16
0x180c…1840 at0017 = ╱32╱2╱ // 0x1823 @0x17
0x180c…1840 at0018 = ╱ef╱$╱ // 0x1824 @0x18
0x180c…1840 at0019 = ╱dc╱=╱ // 0x1825 @0x19
0x180c…1840 at001a = ╱22╱"╱ // 0x1826 @0x1a
0x180c…1840 at001b = ╱30╱0╱ // 0x1827 @0x1b
0x180c…1840 at001c = ╱2b╱+╱ // 0x1828 @0x1c
0x180c…1840 at001d = ╱22╱"╱ // 0x1829 @0x1d
0x180c…1840 at001e = ╱eb╱;╱ // 0x182a @0x1e
0x180c…1840 at001f = ╱4c╱L╱ // 0x182b @0x1f
0x180c…1840 at0020 = ╱49╱I╱ // 0x182c @0x20
0x180c…1840 at0021 = ╱4e╱N╱ // 0x182d @0x21
0x180c…1840 at0022 = ╱49╱I╱ // 0x182e @0x22
0x180c…1840 at0023 = ╱45╱E╱ // 0x182f @0x23
0x180c…1840 at0024 = ╱dc╱=╱ // 0x1830 @0x24
0x180c…1840 at0025 = ╱4c╱L╱ // 0x1831 @0x25
0x180c…1840 at0026 = ╱49╱I╱ // 0x1832 @0x26
0x180c…1840 at0027 = ╱4e╱N╱ // 0x1833 @0x27
0x180c…1840 at0028 = ╱49╱I╱ // 0x1834 @0x28
0x180c…1840 at0029 = ╱45╱E╱ // 0x1835 @0x29
0x180c…1840 at002a = ╱e2╱+╱ // 0x1836 @0x2a
0x180c…1840 at002b = ╱56╱V╱ // 0x1837 @0x2b
0x180c…1840 at002c = ╱eb╱;╱ // 0x1838 @0x2c
0x180c…1840 at002d = ╱47╱G╱ // 0x1839 @0x2d
0x180c…1840 at002e = ╱46╱F╱ // 0x183a @0x2e
0x180c…1840 at002f = ╱4e╱N╱ // 0x183b @0x2f
0x180c…1840 at0030 = ╱52╱R╱ // 0x183c @0x30
0x180c…1840 at0031 = ╱dc╱=╱ // 0x183d @0x31
0x180c…1840 at0032 = ╱42╱B╱ // 0x183e @0x32
0x180c…1840 at0033 = EOL // 0x183f @0x33
0x180c…1840 }
0x1840…1846 a59d 2520 ENDIF
0x1840…1846 LineComalBin {
0x1840…1846 ptr = 0xa59d // 0x1840 @0x0
0x1840…1846 lno = 0x09d8 // 0x1842 @0x2
0x1840…1846 at0004 = ╱9b╱ ENDIF ╱ // 0x1844 @0x4
0x1840…1846 at0005 = EOL // 0x1845 @0x5
0x1840…1846 }
0x1846…186f a5c6 2530 IF LINIE>36 THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x1846…186f LineComalBin {
0x1846…186f ptr = 0xa5c6 // 0x1846 @0x0
0x1846…186f lno = 0x09e2 // 0x1848 @0x2
0x1846…186f at0004 = ╱82╱ IF ╱ // 0x184a @0x4
0x1846…186f at0005 = ╱4c╱L╱ // 0x184b @0x5
0x1846…186f at0006 = ╱49╱I╱ // 0x184c @0x6
0x1846…186f at0007 = ╱4e╱N╱ // 0x184d @0x7
0x1846…186f at0008 = ╱49╱I╱ // 0x184e @0x8
0x1846…186f at0009 = ╱45╱E╱ // 0x184f @0x9
0x1846…186f at000a = ╱de╱>╱ // 0x1850 @0xa
0x1846…186f at000b = ╱33╱3╱ // 0x1851 @0xb
0x1846…186f at000c = ╱36╱6╱ // 0x1852 @0xc
0x1846…186f at000d = ╱fe00009006╱ // 0x1853 @0xd
0x1846…186f at0012 = ╱b6╱ THEN ╱ // 0x1858 @0x12
0x1846…186f at0013 = ╱9d╱ EXEC ╱ // 0x1859 @0x13
0x1846…186f at0014 = ╱4e╱N╱ // 0x185a @0x14
0x1846…186f at0015 = ╱59╱Y╱ // 0x185b @0x15
0x1846…186f at0016 = ╱53╱S╱ // 0x185c @0x16
0x1846…186f at0017 = ╱49╱I╱ // 0x185d @0x17
0x1846…186f at0018 = ╱44╱D╱ // 0x185e @0x18
0x1846…186f at0019 = ╱45╱E╱ // 0x185f @0x19
0x1846…186f at001a = ╱ed╱(╱ // 0x1860 @0x1a
0x1846…186f at001b = ╱47╱G╱ // 0x1861 @0x1b
0x1846…186f at001c = ╱46╱F╱ // 0x1862 @0x1c
0x1846…186f at001d = ╱4e╱N╱ // 0x1863 @0x1d
0x1846…186f at001e = ╱52╱R╱ // 0x1864 @0x1e
0x1846…186f at001f = ╱ec╱,╱ // 0x1865 @0x1f
0x1846…186f at0020 = ╱47╱G╱ // 0x1866 @0x20
0x1846…186f at0021 = ╱4c╱L╱ // 0x1867 @0x21
0x1846…186f at0022 = ╱4e╱N╱ // 0x1868 @0x22
0x1846…186f at0023 = ╱41╱A╱ // 0x1869 @0x23
0x1846…186f at0024 = ╱56╱V╱ // 0x186a @0x24
0x1846…186f at0025 = ╱4e╱N╱ // 0x186b @0x25
0x1846…186f at0026 = ╱ef╱$╱ // 0x186c @0x26
0x1846…186f at0027 = ╱ee╱)╱ // 0x186d @0x27
0x1846…186f at0028 = EOL // 0x186e @0x28
0x1846…186f }
0x186f…1878 a5cf 2540 PRINT " "
0x186f…1878 LineComalBin {
0x186f…1878 ptr = 0xa5cf // 0x186f @0x0
0x186f…1878 lno = 0x09ec // 0x1871 @0x2
0x186f…1878 at0004 = ╱92╱ PRINT ╱ // 0x1873 @0x4
0x186f…1878 at0005 = ╱22╱"╱ // 0x1874 @0x5
0x186f…1878 at0006 = ╱20╱…╱ // 0x1875 @0x6
0x186f…1878 at0007 = ╱22╱"╱ // 0x1876 @0x7
0x186f…1878 at0008 = EOL // 0x1877 @0x8
0x186f…1878 }
0x1878…1899 a5f0 2550 PRINT TAB(8);STREG$(E:71)
0x1878…1899 LineComalBin {
0x1878…1899 ptr = 0xa5f0 // 0x1878 @0x0
0x1878…1899 lno = 0x09f6 // 0x187a @0x2
0x1878…1899 at0004 = ╱92╱ PRINT ╱ // 0x187c @0x4
0x1878…1899 at0005 = ╱d2╱TAB╱ // 0x187d @0x5
0x1878…1899 at0006 = ╱ed╱(╱ // 0x187e @0x6
0x1878…1899 at0007 = ╱38╱8╱ // 0x187f @0x7
0x1878…1899 at0008 = ╱fe00008004╱ // 0x1880 @0x8
0x1878…1899 at000d = ╱ee╱)╱ // 0x1885 @0xd
0x1878…1899 at000e = ╱eb╱;╱ // 0x1886 @0xe
0x1878…1899 at000f = ╱53╱S╱ // 0x1887 @0xf
0x1878…1899 at0010 = ╱54╱T╱ // 0x1888 @0x10
0x1878…1899 at0011 = ╱52╱R╱ // 0x1889 @0x11
0x1878…1899 at0012 = ╱45╱E╱ // 0x188a @0x12
0x1878…1899 at0013 = ╱47╱G╱ // 0x188b @0x13
0x1878…1899 at0014 = ╱ef╱$╱ // 0x188c @0x14
0x1878…1899 at0015 = ╱ed╱(╱ // 0x188d @0x15
0x1878…1899 at0016 = ╱45╱E╱ // 0x188e @0x16
0x1878…1899 at0017 = ╱f0╱:╱ // 0x188f @0x17
0x1878…1899 at0018 = ╱37╱7╱ // 0x1890 @0x18
0x1878…1899 at0019 = ╱31╱1╱ // 0x1891 @0x19
0x1878…1899 at001a = ╱fe00008e07╱ // 0x1892 @0x1a
0x1878…1899 at001f = ╱ee╱)╱ // 0x1897 @0x1f
0x1878…1899 at0020 = EOL // 0x1898 @0x20
0x1878…1899 }
0x1899…18c3 a61a 2560 EXEC LINIEUD(FNR,FNAVN$,SALDO3$,SALDO13$)
0x1899…18c3 LineComalBin {
0x1899…18c3 ptr = 0xa61a // 0x1899 @0x0
0x1899…18c3 lno = 0x0a00 // 0x189b @0x2
0x1899…18c3 at0004 = ╱9d╱ EXEC ╱ // 0x189d @0x4
0x1899…18c3 at0005 = ╱4c╱L╱ // 0x189e @0x5
0x1899…18c3 at0006 = ╱49╱I╱ // 0x189f @0x6
0x1899…18c3 at0007 = ╱4e╱N╱ // 0x18a0 @0x7
0x1899…18c3 at0008 = ╱49╱I╱ // 0x18a1 @0x8
0x1899…18c3 at0009 = ╱45╱E╱ // 0x18a2 @0x9
0x1899…18c3 at000a = ╱55╱U╱ // 0x18a3 @0xa
0x1899…18c3 at000b = ╱44╱D╱ // 0x18a4 @0xb
0x1899…18c3 at000c = ╱ed╱(╱ // 0x18a5 @0xc
0x1899…18c3 at000d = ╱46╱F╱ // 0x18a6 @0xd
0x1899…18c3 at000e = ╱4e╱N╱ // 0x18a7 @0xe
0x1899…18c3 at000f = ╱52╱R╱ // 0x18a8 @0xf
0x1899…18c3 at0010 = ╱ec╱,╱ // 0x18a9 @0x10
0x1899…18c3 at0011 = ╱46╱F╱ // 0x18aa @0x11
0x1899…18c3 at0012 = ╱4e╱N╱ // 0x18ab @0x12
0x1899…18c3 at0013 = ╱41╱A╱ // 0x18ac @0x13
0x1899…18c3 at0014 = ╱56╱V╱ // 0x18ad @0x14
0x1899…18c3 at0015 = ╱4e╱N╱ // 0x18ae @0x15
0x1899…18c3 at0016 = ╱ef╱$╱ // 0x18af @0x16
0x1899…18c3 at0017 = ╱ec╱,╱ // 0x18b0 @0x17
0x1899…18c3 at0018 = ╱53╱S╱ // 0x18b1 @0x18
0x1899…18c3 at0019 = ╱41╱A╱ // 0x18b2 @0x19
0x1899…18c3 at001a = ╱4c╱L╱ // 0x18b3 @0x1a
0x1899…18c3 at001b = ╱44╱D╱ // 0x18b4 @0x1b
0x1899…18c3 at001c = ╱4f╱O╱ // 0x18b5 @0x1c
0x1899…18c3 at001d = ╱33╱3╱ // 0x18b6 @0x1d
0x1899…18c3 at001e = ╱ef╱$╱ // 0x18b7 @0x1e
0x1899…18c3 at001f = ╱ec╱,╱ // 0x18b8 @0x1f
0x1899…18c3 at0020 = ╱53╱S╱ // 0x18b9 @0x20
0x1899…18c3 at0021 = ╱41╱A╱ // 0x18ba @0x21
0x1899…18c3 at0022 = ╱4c╱L╱ // 0x18bb @0x22
0x1899…18c3 at0023 = ╱44╱D╱ // 0x18bc @0x23
0x1899…18c3 at0024 = ╱4f╱O╱ // 0x18bd @0x24
0x1899…18c3 at0025 = ╱31╱1╱ // 0x18be @0x25
0x1899…18c3 at0026 = ╱33╱3╱ // 0x18bf @0x26
0x1899…18c3 at0027 = ╱ef╱$╱ // 0x18c0 @0x27
0x1899…18c3 at0028 = ╱ee╱)╱ // 0x18c1 @0x28
0x1899…18c3 at0029 = EOL // 0x18c2 @0x29
0x1899…18c3 }
0x18c3…18e2 a639 2570 SALDO1$="0+";SALDO11$="0+"
0x18c3…18e2 LineComalBin {
0x18c3…18e2 ptr = 0xa639 // 0x18c3 @0x0
0x18c3…18e2 lno = 0x0a0a // 0x18c5 @0x2
0x18c3…18e2 at0004 = ╱53╱S╱ // 0x18c7 @0x4
0x18c3…18e2 at0005 = ╱41╱A╱ // 0x18c8 @0x5
0x18c3…18e2 at0006 = ╱4c╱L╱ // 0x18c9 @0x6
0x18c3…18e2 at0007 = ╱44╱D╱ // 0x18ca @0x7
0x18c3…18e2 at0008 = ╱4f╱O╱ // 0x18cb @0x8
0x18c3…18e2 at0009 = ╱31╱1╱ // 0x18cc @0x9
0x18c3…18e2 at000a = ╱ef╱$╱ // 0x18cd @0xa
0x18c3…18e2 at000b = ╱dc╱=╱ // 0x18ce @0xb
0x18c3…18e2 at000c = ╱22╱"╱ // 0x18cf @0xc
0x18c3…18e2 at000d = ╱30╱0╱ // 0x18d0 @0xd
0x18c3…18e2 at000e = ╱2b╱+╱ // 0x18d1 @0xe
0x18c3…18e2 at000f = ╱22╱"╱ // 0x18d2 @0xf
0x18c3…18e2 at0010 = ╱eb╱;╱ // 0x18d3 @0x10
0x18c3…18e2 at0011 = ╱53╱S╱ // 0x18d4 @0x11
0x18c3…18e2 at0012 = ╱41╱A╱ // 0x18d5 @0x12
0x18c3…18e2 at0013 = ╱4c╱L╱ // 0x18d6 @0x13
0x18c3…18e2 at0014 = ╱44╱D╱ // 0x18d7 @0x14
0x18c3…18e2 at0015 = ╱4f╱O╱ // 0x18d8 @0x15
0x18c3…18e2 at0016 = ╱31╱1╱ // 0x18d9 @0x16
0x18c3…18e2 at0017 = ╱31╱1╱ // 0x18da @0x17
0x18c3…18e2 at0018 = ╱ef╱$╱ // 0x18db @0x18
0x18c3…18e2 at0019 = ╱dc╱=╱ // 0x18dc @0x19
0x18c3…18e2 at001a = ╱22╱"╱ // 0x18dd @0x1a
0x18c3…18e2 at001b = ╱30╱0╱ // 0x18de @0x1b
0x18c3…18e2 at001c = ╱2b╱+╱ // 0x18df @0x1c
0x18c3…18e2 at001d = ╱22╱"╱ // 0x18e0 @0x1d
0x18c3…18e2 at001e = EOL // 0x18e1 @0x1e
0x18c3…18e2 }
0x18e2…1903 a65a 2580 PRINT TAB(8);STREG$(E:71)
0x18e2…1903 LineComalBin {
0x18e2…1903 ptr = 0xa65a // 0x18e2 @0x0
0x18e2…1903 lno = 0x0a14 // 0x18e4 @0x2
0x18e2…1903 at0004 = ╱92╱ PRINT ╱ // 0x18e6 @0x4
0x18e2…1903 at0005 = ╱d2╱TAB╱ // 0x18e7 @0x5
0x18e2…1903 at0006 = ╱ed╱(╱ // 0x18e8 @0x6
0x18e2…1903 at0007 = ╱38╱8╱ // 0x18e9 @0x7
0x18e2…1903 at0008 = ╱fe00008004╱ // 0x18ea @0x8
0x18e2…1903 at000d = ╱ee╱)╱ // 0x18ef @0xd
0x18e2…1903 at000e = ╱eb╱;╱ // 0x18f0 @0xe
0x18e2…1903 at000f = ╱53╱S╱ // 0x18f1 @0xf
0x18e2…1903 at0010 = ╱54╱T╱ // 0x18f2 @0x10
0x18e2…1903 at0011 = ╱52╱R╱ // 0x18f3 @0x11
0x18e2…1903 at0012 = ╱45╱E╱ // 0x18f4 @0x12
0x18e2…1903 at0013 = ╱47╱G╱ // 0x18f5 @0x13
0x18e2…1903 at0014 = ╱ef╱$╱ // 0x18f6 @0x14
0x18e2…1903 at0015 = ╱ed╱(╱ // 0x18f7 @0x15
0x18e2…1903 at0016 = ╱45╱E╱ // 0x18f8 @0x16
0x18e2…1903 at0017 = ╱f0╱:╱ // 0x18f9 @0x17
0x18e2…1903 at0018 = ╱37╱7╱ // 0x18fa @0x18
0x18e2…1903 at0019 = ╱31╱1╱ // 0x18fb @0x19
0x18e2…1903 at001a = ╱fe00008e07╱ // 0x18fc @0x1a
0x18e2…1903 at001f = ╱ee╱)╱ // 0x1901 @0x1f
0x18e2…1903 at0020 = EOL // 0x1902 @0x20
0x18e2…1903 }
0x1903…190c a663 2590 PRINT " "
0x1903…190c LineComalBin {
0x1903…190c ptr = 0xa663 // 0x1903 @0x0
0x1903…190c lno = 0x0a1e // 0x1905 @0x2
0x1903…190c at0004 = ╱92╱ PRINT ╱ // 0x1907 @0x4
0x1903…190c at0005 = ╱22╱"╱ // 0x1908 @0x5
0x1903…190c at0006 = ╱20╱…╱ // 0x1909 @0x6
0x1903…190c at0007 = ╱22╱"╱ // 0x190a @0x7
0x1903…190c at0008 = EOL // 0x190b @0x8
0x1903…190c }
0x190c…1923 a67a 2600 LINIE=LINIE+5
0x190c…1923 LineComalBin {
0x190c…1923 ptr = 0xa67a // 0x190c @0x0
0x190c…1923 lno = 0x0a28 // 0x190e @0x2
0x190c…1923 at0004 = ╱4c╱L╱ // 0x1910 @0x4
0x190c…1923 at0005 = ╱49╱I╱ // 0x1911 @0x5
0x190c…1923 at0006 = ╱4e╱N╱ // 0x1912 @0x6
0x190c…1923 at0007 = ╱49╱I╱ // 0x1913 @0x7
0x190c…1923 at0008 = ╱45╱E╱ // 0x1914 @0x8
0x190c…1923 at0009 = ╱dc╱=╱ // 0x1915 @0x9
0x190c…1923 at000a = ╱4c╱L╱ // 0x1916 @0xa
0x190c…1923 at000b = ╱49╱I╱ // 0x1917 @0xb
0x190c…1923 at000c = ╱4e╱N╱ // 0x1918 @0xc
0x190c…1923 at000d = ╱49╱I╱ // 0x1919 @0xd
0x190c…1923 at000e = ╱45╱E╱ // 0x191a @0xe
0x190c…1923 at000f = ╱e2╱+╱ // 0x191b @0xf
0x190c…1923 at0010 = ╱35╱5╱ // 0x191c @0x10
0x190c…1923 at0011 = ╱fe0000a003╱ // 0x191d @0x11
0x190c…1923 at0016 = EOL // 0x1922 @0x16
0x190c…1923 }
0x1923…1930 a687 2610 WHEN 4
0x1923…1930 LineComalBin {
0x1923…1930 ptr = 0xa687 // 0x1923 @0x0
0x1923…1930 lno = 0x0a32 // 0x1925 @0x2
0x1923…1930 at0004 = ╱a301╱ WHEN ╱ // 0x1927 @0x4
0x1923…1930 at0006 = ╱34╱4╱ // 0x1929 @0x6
0x1923…1930 at0007 = ╱fe00008003╱ // 0x192a @0x7
0x1923…1930 at000c = EOL // 0x192f @0xc
0x1923…1930 }
0x1930…193d a694 2620 IF GFNR>B THEN
0x1930…193d LineComalBin {
0x1930…193d ptr = 0xa694 // 0x1930 @0x0
0x1930…193d lno = 0x0a3c // 0x1932 @0x2
0x1930…193d at0004 = ╱9c╱ IF ╱ // 0x1934 @0x4
0x1930…193d at0005 = ╱47╱G╱ // 0x1935 @0x5
0x1930…193d at0006 = ╱46╱F╱ // 0x1936 @0x6
0x1930…193d at0007 = ╱4e╱N╱ // 0x1937 @0x7
0x1930…193d at0008 = ╱52╱R╱ // 0x1938 @0x8
0x1930…193d at0009 = ╱de╱>╱ // 0x1939 @0x9
0x1930…193d at000a = ╱42╱B╱ // 0x193a @0xa
0x1930…193d at000b = ╱b6╱ THEN ╱ // 0x193b @0xb
0x1930…193d at000c = EOL // 0x193c @0xc
0x1930…193d }
0x193d…1966 a6bd 2630 IF LINIE>37 THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x193d…1966 LineComalBin {
0x193d…1966 ptr = 0xa6bd // 0x193d @0x0
0x193d…1966 lno = 0x0a46 // 0x193f @0x2
0x193d…1966 at0004 = ╱82╱ IF ╱ // 0x1941 @0x4
0x193d…1966 at0005 = ╱4c╱L╱ // 0x1942 @0x5
0x193d…1966 at0006 = ╱49╱I╱ // 0x1943 @0x6
0x193d…1966 at0007 = ╱4e╱N╱ // 0x1944 @0x7
0x193d…1966 at0008 = ╱49╱I╱ // 0x1945 @0x8
0x193d…1966 at0009 = ╱45╱E╱ // 0x1946 @0x9
0x193d…1966 at000a = ╱de╱>╱ // 0x1947 @0xa
0x193d…1966 at000b = ╱33╱3╱ // 0x1948 @0xb
0x193d…1966 at000c = ╱37╱7╱ // 0x1949 @0xc
0x193d…1966 at000d = ╱fe00009406╱ // 0x194a @0xd
0x193d…1966 at0012 = ╱b6╱ THEN ╱ // 0x194f @0x12
0x193d…1966 at0013 = ╱9d╱ EXEC ╱ // 0x1950 @0x13
0x193d…1966 at0014 = ╱4e╱N╱ // 0x1951 @0x14
0x193d…1966 at0015 = ╱59╱Y╱ // 0x1952 @0x15
0x193d…1966 at0016 = ╱53╱S╱ // 0x1953 @0x16
0x193d…1966 at0017 = ╱49╱I╱ // 0x1954 @0x17
0x193d…1966 at0018 = ╱44╱D╱ // 0x1955 @0x18
0x193d…1966 at0019 = ╱45╱E╱ // 0x1956 @0x19
0x193d…1966 at001a = ╱ed╱(╱ // 0x1957 @0x1a
0x193d…1966 at001b = ╱47╱G╱ // 0x1958 @0x1b
0x193d…1966 at001c = ╱46╱F╱ // 0x1959 @0x1c
0x193d…1966 at001d = ╱4e╱N╱ // 0x195a @0x1d
0x193d…1966 at001e = ╱52╱R╱ // 0x195b @0x1e
0x193d…1966 at001f = ╱ec╱,╱ // 0x195c @0x1f
0x193d…1966 at0020 = ╱47╱G╱ // 0x195d @0x20
0x193d…1966 at0021 = ╱4c╱L╱ // 0x195e @0x21
0x193d…1966 at0022 = ╱4e╱N╱ // 0x195f @0x22
0x193d…1966 at0023 = ╱41╱A╱ // 0x1960 @0x23
0x193d…1966 at0024 = ╱56╱V╱ // 0x1961 @0x24
0x193d…1966 at0025 = ╱4e╱N╱ // 0x1962 @0x25
0x193d…1966 at0026 = ╱ef╱$╱ // 0x1963 @0x26
0x193d…1966 at0027 = ╱ee╱)╱ // 0x1964 @0x27
0x193d…1966 at0028 = EOL // 0x1965 @0x28
0x193d…1966 }
0x1966…196f a6c6 2640 PRINT " "
0x1966…196f LineComalBin {
0x1966…196f ptr = 0xa6c6 // 0x1966 @0x0
0x1966…196f lno = 0x0a50 // 0x1968 @0x2
0x1966…196f at0004 = ╱92╱ PRINT ╱ // 0x196a @0x4
0x1966…196f at0005 = ╱22╱"╱ // 0x196b @0x5
0x1966…196f at0006 = ╱20╱…╱ // 0x196c @0x6
0x1966…196f at0007 = ╱22╱"╱ // 0x196d @0x7
0x1966…196f at0008 = EOL // 0x196e @0x8
0x1966…196f }
0x196f…1990 a6e7 2650 PRINT TAB(8);STREG$(E:71)
0x196f…1990 LineComalBin {
0x196f…1990 ptr = 0xa6e7 // 0x196f @0x0
0x196f…1990 lno = 0x0a5a // 0x1971 @0x2
0x196f…1990 at0004 = ╱92╱ PRINT ╱ // 0x1973 @0x4
0x196f…1990 at0005 = ╱d2╱TAB╱ // 0x1974 @0x5
0x196f…1990 at0006 = ╱ed╱(╱ // 0x1975 @0x6
0x196f…1990 at0007 = ╱38╱8╱ // 0x1976 @0x7
0x196f…1990 at0008 = ╱fe00008004╱ // 0x1977 @0x8
0x196f…1990 at000d = ╱ee╱)╱ // 0x197c @0xd
0x196f…1990 at000e = ╱eb╱;╱ // 0x197d @0xe
0x196f…1990 at000f = ╱53╱S╱ // 0x197e @0xf
0x196f…1990 at0010 = ╱54╱T╱ // 0x197f @0x10
0x196f…1990 at0011 = ╱52╱R╱ // 0x1980 @0x11
0x196f…1990 at0012 = ╱45╱E╱ // 0x1981 @0x12
0x196f…1990 at0013 = ╱47╱G╱ // 0x1982 @0x13
0x196f…1990 at0014 = ╱ef╱$╱ // 0x1983 @0x14
0x196f…1990 at0015 = ╱ed╱(╱ // 0x1984 @0x15
0x196f…1990 at0016 = ╱45╱E╱ // 0x1985 @0x16
0x196f…1990 at0017 = ╱f0╱:╱ // 0x1986 @0x17
0x196f…1990 at0018 = ╱37╱7╱ // 0x1987 @0x18
0x196f…1990 at0019 = ╱31╱1╱ // 0x1988 @0x19
0x196f…1990 at001a = ╱fe00008e07╱ // 0x1989 @0x1a
0x196f…1990 at001f = ╱ee╱)╱ // 0x198e @0x1f
0x196f…1990 at0020 = EOL // 0x198f @0x20
0x196f…1990 }
0x1990…19bc a713 2660 EXEC LINIEUD(GFNR,GLNAVN$,SALDO2$,SALDO12$)
0x1990…19bc LineComalBin {
0x1990…19bc ptr = 0xa713 // 0x1990 @0x0
0x1990…19bc lno = 0x0a64 // 0x1992 @0x2
0x1990…19bc at0004 = ╱9d╱ EXEC ╱ // 0x1994 @0x4
0x1990…19bc at0005 = ╱4c╱L╱ // 0x1995 @0x5
0x1990…19bc at0006 = ╱49╱I╱ // 0x1996 @0x6
0x1990…19bc at0007 = ╱4e╱N╱ // 0x1997 @0x7
0x1990…19bc at0008 = ╱49╱I╱ // 0x1998 @0x8
0x1990…19bc at0009 = ╱45╱E╱ // 0x1999 @0x9
0x1990…19bc at000a = ╱55╱U╱ // 0x199a @0xa
0x1990…19bc at000b = ╱44╱D╱ // 0x199b @0xb
0x1990…19bc at000c = ╱ed╱(╱ // 0x199c @0xc
0x1990…19bc at000d = ╱47╱G╱ // 0x199d @0xd
0x1990…19bc at000e = ╱46╱F╱ // 0x199e @0xe
0x1990…19bc at000f = ╱4e╱N╱ // 0x199f @0xf
0x1990…19bc at0010 = ╱52╱R╱ // 0x19a0 @0x10
0x1990…19bc at0011 = ╱ec╱,╱ // 0x19a1 @0x11
0x1990…19bc at0012 = ╱47╱G╱ // 0x19a2 @0x12
0x1990…19bc at0013 = ╱4c╱L╱ // 0x19a3 @0x13
0x1990…19bc at0014 = ╱4e╱N╱ // 0x19a4 @0x14
0x1990…19bc at0015 = ╱41╱A╱ // 0x19a5 @0x15
0x1990…19bc at0016 = ╱56╱V╱ // 0x19a6 @0x16
0x1990…19bc at0017 = ╱4e╱N╱ // 0x19a7 @0x17
0x1990…19bc at0018 = ╱ef╱$╱ // 0x19a8 @0x18
0x1990…19bc at0019 = ╱ec╱,╱ // 0x19a9 @0x19
0x1990…19bc at001a = ╱53╱S╱ // 0x19aa @0x1a
0x1990…19bc at001b = ╱41╱A╱ // 0x19ab @0x1b
0x1990…19bc at001c = ╱4c╱L╱ // 0x19ac @0x1c
0x1990…19bc at001d = ╱44╱D╱ // 0x19ad @0x1d
0x1990…19bc at001e = ╱4f╱O╱ // 0x19ae @0x1e
0x1990…19bc at001f = ╱32╱2╱ // 0x19af @0x1f
0x1990…19bc at0020 = ╱ef╱$╱ // 0x19b0 @0x20
0x1990…19bc at0021 = ╱ec╱,╱ // 0x19b1 @0x21
0x1990…19bc at0022 = ╱53╱S╱ // 0x19b2 @0x22
0x1990…19bc at0023 = ╱41╱A╱ // 0x19b3 @0x23
0x1990…19bc at0024 = ╱4c╱L╱ // 0x19b4 @0x24
0x1990…19bc at0025 = ╱44╱D╱ // 0x19b5 @0x25
0x1990…19bc at0026 = ╱4f╱O╱ // 0x19b6 @0x26
0x1990…19bc at0027 = ╱31╱1╱ // 0x19b7 @0x27
0x1990…19bc at0028 = ╱32╱2╱ // 0x19b8 @0x28
0x1990…19bc at0029 = ╱ef╱$╱ // 0x19b9 @0x29
0x1990…19bc at002a = ╱ee╱)╱ // 0x19ba @0x2a
0x1990…19bc at002b = EOL // 0x19bb @0x2b
0x1990…19bc }
0x19bc…19e4 a73b 2670 LINIE=LINIE+V;GFNR=B;GLNAVN$=BLANK$
0x19bc…19e4 LineComalBin {
0x19bc…19e4 ptr = 0xa73b // 0x19bc @0x0
0x19bc…19e4 lno = 0x0a6e // 0x19be @0x2
0x19bc…19e4 at0004 = ╱4c╱L╱ // 0x19c0 @0x4
0x19bc…19e4 at0005 = ╱49╱I╱ // 0x19c1 @0x5
0x19bc…19e4 at0006 = ╱4e╱N╱ // 0x19c2 @0x6
0x19bc…19e4 at0007 = ╱49╱I╱ // 0x19c3 @0x7
0x19bc…19e4 at0008 = ╱45╱E╱ // 0x19c4 @0x8
0x19bc…19e4 at0009 = ╱dc╱=╱ // 0x19c5 @0x9
0x19bc…19e4 at000a = ╱4c╱L╱ // 0x19c6 @0xa
0x19bc…19e4 at000b = ╱49╱I╱ // 0x19c7 @0xb
0x19bc…19e4 at000c = ╱4e╱N╱ // 0x19c8 @0xc
0x19bc…19e4 at000d = ╱49╱I╱ // 0x19c9 @0xd
0x19bc…19e4 at000e = ╱45╱E╱ // 0x19ca @0xe
0x19bc…19e4 at000f = ╱e2╱+╱ // 0x19cb @0xf
0x19bc…19e4 at0010 = ╱56╱V╱ // 0x19cc @0x10
0x19bc…19e4 at0011 = ╱eb╱;╱ // 0x19cd @0x11
0x19bc…19e4 at0012 = ╱47╱G╱ // 0x19ce @0x12
0x19bc…19e4 at0013 = ╱46╱F╱ // 0x19cf @0x13
0x19bc…19e4 at0014 = ╱4e╱N╱ // 0x19d0 @0x14
0x19bc…19e4 at0015 = ╱52╱R╱ // 0x19d1 @0x15
0x19bc…19e4 at0016 = ╱dc╱=╱ // 0x19d2 @0x16
0x19bc…19e4 at0017 = ╱42╱B╱ // 0x19d3 @0x17
0x19bc…19e4 at0018 = ╱eb╱;╱ // 0x19d4 @0x18
0x19bc…19e4 at0019 = ╱47╱G╱ // 0x19d5 @0x19
0x19bc…19e4 at001a = ╱4c╱L╱ // 0x19d6 @0x1a
0x19bc…19e4 at001b = ╱4e╱N╱ // 0x19d7 @0x1b
0x19bc…19e4 at001c = ╱41╱A╱ // 0x19d8 @0x1c
0x19bc…19e4 at001d = ╱56╱V╱ // 0x19d9 @0x1d
0x19bc…19e4 at001e = ╱4e╱N╱ // 0x19da @0x1e
0x19bc…19e4 at001f = ╱ef╱$╱ // 0x19db @0x1f
0x19bc…19e4 at0020 = ╱dc╱=╱ // 0x19dc @0x20
0x19bc…19e4 at0021 = ╱42╱B╱ // 0x19dd @0x21
0x19bc…19e4 at0022 = ╱4c╱L╱ // 0x19de @0x22
0x19bc…19e4 at0023 = ╱41╱A╱ // 0x19df @0x23
0x19bc…19e4 at0024 = ╱4e╱N╱ // 0x19e0 @0x24
0x19bc…19e4 at0025 = ╱4b╱K╱ // 0x19e1 @0x25
0x19bc…19e4 at0026 = ╱ef╱$╱ // 0x19e2 @0x26
0x19bc…19e4 at0027 = EOL // 0x19e3 @0x27
0x19bc…19e4 }
0x19e4…19ea a741 2680 ENDIF
0x19e4…19ea LineComalBin {
0x19e4…19ea ptr = 0xa741 // 0x19e4 @0x0
0x19e4…19ea lno = 0x0a78 // 0x19e6 @0x2
0x19e4…19ea at0004 = ╱9b╱ ENDIF ╱ // 0x19e8 @0x4
0x19e4…19ea at0005 = EOL // 0x19e9 @0x5
0x19e4…19ea }
0x19ea…19f8 a74f 2690 IF GFNR1>B THEN
0x19ea…19f8 LineComalBin {
0x19ea…19f8 ptr = 0xa74f // 0x19ea @0x0
0x19ea…19f8 lno = 0x0a82 // 0x19ec @0x2
0x19ea…19f8 at0004 = ╱9c╱ IF ╱ // 0x19ee @0x4
0x19ea…19f8 at0005 = ╱47╱G╱ // 0x19ef @0x5
0x19ea…19f8 at0006 = ╱46╱F╱ // 0x19f0 @0x6
0x19ea…19f8 at0007 = ╱4e╱N╱ // 0x19f1 @0x7
0x19ea…19f8 at0008 = ╱52╱R╱ // 0x19f2 @0x8
0x19ea…19f8 at0009 = ╱31╱1╱ // 0x19f3 @0x9
0x19ea…19f8 at000a = ╱de╱>╱ // 0x19f4 @0xa
0x19ea…19f8 at000b = ╱42╱B╱ // 0x19f5 @0xb
0x19ea…19f8 at000c = ╱b6╱ THEN ╱ // 0x19f6 @0xc
0x19ea…19f8 at000d = EOL // 0x19f7 @0xd
0x19ea…19f8 }
0x19f8…1a23 a77a 2700 IF LINIE>37 THEN EXEC NYSIDE(GFNR1,GLNAVN1$)
0x19f8…1a23 LineComalBin {
0x19f8…1a23 ptr = 0xa77a // 0x19f8 @0x0
0x19f8…1a23 lno = 0x0a8c // 0x19fa @0x2
0x19f8…1a23 at0004 = ╱82╱ IF ╱ // 0x19fc @0x4
0x19f8…1a23 at0005 = ╱4c╱L╱ // 0x19fd @0x5
0x19f8…1a23 at0006 = ╱49╱I╱ // 0x19fe @0x6
0x19f8…1a23 at0007 = ╱4e╱N╱ // 0x19ff @0x7
0x19f8…1a23 at0008 = ╱49╱I╱ // 0x1a00 @0x8
0x19f8…1a23 at0009 = ╱45╱E╱ // 0x1a01 @0x9
0x19f8…1a23 at000a = ╱de╱>╱ // 0x1a02 @0xa
0x19f8…1a23 at000b = ╱33╱3╱ // 0x1a03 @0xb
0x19f8…1a23 at000c = ╱37╱7╱ // 0x1a04 @0xc
0x19f8…1a23 at000d = ╱fe00009406╱ // 0x1a05 @0xd
0x19f8…1a23 at0012 = ╱b6╱ THEN ╱ // 0x1a0a @0x12
0x19f8…1a23 at0013 = ╱9d╱ EXEC ╱ // 0x1a0b @0x13
0x19f8…1a23 at0014 = ╱4e╱N╱ // 0x1a0c @0x14
0x19f8…1a23 at0015 = ╱59╱Y╱ // 0x1a0d @0x15
0x19f8…1a23 at0016 = ╱53╱S╱ // 0x1a0e @0x16
0x19f8…1a23 at0017 = ╱49╱I╱ // 0x1a0f @0x17
0x19f8…1a23 at0018 = ╱44╱D╱ // 0x1a10 @0x18
0x19f8…1a23 at0019 = ╱45╱E╱ // 0x1a11 @0x19
0x19f8…1a23 at001a = ╱ed╱(╱ // 0x1a12 @0x1a
0x19f8…1a23 at001b = ╱47╱G╱ // 0x1a13 @0x1b
0x19f8…1a23 at001c = ╱46╱F╱ // 0x1a14 @0x1c
0x19f8…1a23 at001d = ╱4e╱N╱ // 0x1a15 @0x1d
0x19f8…1a23 at001e = ╱52╱R╱ // 0x1a16 @0x1e
0x19f8…1a23 at001f = ╱31╱1╱ // 0x1a17 @0x1f
0x19f8…1a23 at0020 = ╱ec╱,╱ // 0x1a18 @0x20
0x19f8…1a23 at0021 = ╱47╱G╱ // 0x1a19 @0x21
0x19f8…1a23 at0022 = ╱4c╱L╱ // 0x1a1a @0x22
0x19f8…1a23 at0023 = ╱4e╱N╱ // 0x1a1b @0x23
0x19f8…1a23 at0024 = ╱41╱A╱ // 0x1a1c @0x24
0x19f8…1a23 at0025 = ╱56╱V╱ // 0x1a1d @0x25
0x19f8…1a23 at0026 = ╱4e╱N╱ // 0x1a1e @0x26
0x19f8…1a23 at0027 = ╱31╱1╱ // 0x1a1f @0x27
0x19f8…1a23 at0028 = ╱ef╱$╱ // 0x1a20 @0x28
0x19f8…1a23 at0029 = ╱ee╱)╱ // 0x1a21 @0x29
0x19f8…1a23 at002a = EOL // 0x1a22 @0x2a
0x19f8…1a23 }
0x1a23…1a2c a783 2710 PRINT " "
0x1a23…1a2c LineComalBin {
0x1a23…1a2c ptr = 0xa783 // 0x1a23 @0x0
0x1a23…1a2c lno = 0x0a96 // 0x1a25 @0x2
0x1a23…1a2c at0004 = ╱92╱ PRINT ╱ // 0x1a27 @0x4
0x1a23…1a2c at0005 = ╱22╱"╱ // 0x1a28 @0x5
0x1a23…1a2c at0006 = ╱20╱…╱ // 0x1a29 @0x6
0x1a23…1a2c at0007 = ╱22╱"╱ // 0x1a2a @0x7
0x1a23…1a2c at0008 = EOL // 0x1a2b @0x8
0x1a23…1a2c }
0x1a2c…1a4d a7a4 2720 PRINT TAB(8);STREG$(E:71)
0x1a2c…1a4d LineComalBin {
0x1a2c…1a4d ptr = 0xa7a4 // 0x1a2c @0x0
0x1a2c…1a4d lno = 0x0aa0 // 0x1a2e @0x2
0x1a2c…1a4d at0004 = ╱92╱ PRINT ╱ // 0x1a30 @0x4
0x1a2c…1a4d at0005 = ╱d2╱TAB╱ // 0x1a31 @0x5
0x1a2c…1a4d at0006 = ╱ed╱(╱ // 0x1a32 @0x6
0x1a2c…1a4d at0007 = ╱38╱8╱ // 0x1a33 @0x7
0x1a2c…1a4d at0008 = ╱fe00008004╱ // 0x1a34 @0x8
0x1a2c…1a4d at000d = ╱ee╱)╱ // 0x1a39 @0xd
0x1a2c…1a4d at000e = ╱eb╱;╱ // 0x1a3a @0xe
0x1a2c…1a4d at000f = ╱53╱S╱ // 0x1a3b @0xf
0x1a2c…1a4d at0010 = ╱54╱T╱ // 0x1a3c @0x10
0x1a2c…1a4d at0011 = ╱52╱R╱ // 0x1a3d @0x11
0x1a2c…1a4d at0012 = ╱45╱E╱ // 0x1a3e @0x12
0x1a2c…1a4d at0013 = ╱47╱G╱ // 0x1a3f @0x13
0x1a2c…1a4d at0014 = ╱ef╱$╱ // 0x1a40 @0x14
0x1a2c…1a4d at0015 = ╱ed╱(╱ // 0x1a41 @0x15
0x1a2c…1a4d at0016 = ╱45╱E╱ // 0x1a42 @0x16
0x1a2c…1a4d at0017 = ╱f0╱:╱ // 0x1a43 @0x17
0x1a2c…1a4d at0018 = ╱37╱7╱ // 0x1a44 @0x18
0x1a2c…1a4d at0019 = ╱31╱1╱ // 0x1a45 @0x19
0x1a2c…1a4d at001a = ╱fe00008e07╱ // 0x1a46 @0x1a
0x1a2c…1a4d at001f = ╱ee╱)╱ // 0x1a4b @0x1f
0x1a2c…1a4d at0020 = EOL // 0x1a4c @0x20
0x1a2c…1a4d }
0x1a4d…1a7b a7d2 2730 EXEC LINIEUD(GFNR1,GLNAVN1$,SALDO4$,SALDO14$)
0x1a4d…1a7b LineComalBin {
0x1a4d…1a7b ptr = 0xa7d2 // 0x1a4d @0x0
0x1a4d…1a7b lno = 0x0aaa // 0x1a4f @0x2
0x1a4d…1a7b at0004 = ╱9d╱ EXEC ╱ // 0x1a51 @0x4
0x1a4d…1a7b at0005 = ╱4c╱L╱ // 0x1a52 @0x5
0x1a4d…1a7b at0006 = ╱49╱I╱ // 0x1a53 @0x6
0x1a4d…1a7b at0007 = ╱4e╱N╱ // 0x1a54 @0x7
0x1a4d…1a7b at0008 = ╱49╱I╱ // 0x1a55 @0x8
0x1a4d…1a7b at0009 = ╱45╱E╱ // 0x1a56 @0x9
0x1a4d…1a7b at000a = ╱55╱U╱ // 0x1a57 @0xa
0x1a4d…1a7b at000b = ╱44╱D╱ // 0x1a58 @0xb
0x1a4d…1a7b at000c = ╱ed╱(╱ // 0x1a59 @0xc
0x1a4d…1a7b at000d = ╱47╱G╱ // 0x1a5a @0xd
0x1a4d…1a7b at000e = ╱46╱F╱ // 0x1a5b @0xe
0x1a4d…1a7b at000f = ╱4e╱N╱ // 0x1a5c @0xf
0x1a4d…1a7b at0010 = ╱52╱R╱ // 0x1a5d @0x10
0x1a4d…1a7b at0011 = ╱31╱1╱ // 0x1a5e @0x11
0x1a4d…1a7b at0012 = ╱ec╱,╱ // 0x1a5f @0x12
0x1a4d…1a7b at0013 = ╱47╱G╱ // 0x1a60 @0x13
0x1a4d…1a7b at0014 = ╱4c╱L╱ // 0x1a61 @0x14
0x1a4d…1a7b at0015 = ╱4e╱N╱ // 0x1a62 @0x15
0x1a4d…1a7b at0016 = ╱41╱A╱ // 0x1a63 @0x16
0x1a4d…1a7b at0017 = ╱56╱V╱ // 0x1a64 @0x17
0x1a4d…1a7b at0018 = ╱4e╱N╱ // 0x1a65 @0x18
0x1a4d…1a7b at0019 = ╱31╱1╱ // 0x1a66 @0x19
0x1a4d…1a7b at001a = ╱ef╱$╱ // 0x1a67 @0x1a
0x1a4d…1a7b at001b = ╱ec╱,╱ // 0x1a68 @0x1b
0x1a4d…1a7b at001c = ╱53╱S╱ // 0x1a69 @0x1c
0x1a4d…1a7b at001d = ╱41╱A╱ // 0x1a6a @0x1d
0x1a4d…1a7b at001e = ╱4c╱L╱ // 0x1a6b @0x1e
0x1a4d…1a7b at001f = ╱44╱D╱ // 0x1a6c @0x1f
0x1a4d…1a7b at0020 = ╱4f╱O╱ // 0x1a6d @0x20
0x1a4d…1a7b at0021 = ╱34╱4╱ // 0x1a6e @0x21
0x1a4d…1a7b at0022 = ╱ef╱$╱ // 0x1a6f @0x22
0x1a4d…1a7b at0023 = ╱ec╱,╱ // 0x1a70 @0x23
0x1a4d…1a7b at0024 = ╱53╱S╱ // 0x1a71 @0x24
0x1a4d…1a7b at0025 = ╱41╱A╱ // 0x1a72 @0x25
0x1a4d…1a7b at0026 = ╱4c╱L╱ // 0x1a73 @0x26
0x1a4d…1a7b at0027 = ╱44╱D╱ // 0x1a74 @0x27
0x1a4d…1a7b at0028 = ╱4f╱O╱ // 0x1a75 @0x28
0x1a4d…1a7b at0029 = ╱31╱1╱ // 0x1a76 @0x29
0x1a4d…1a7b at002a = ╱34╱4╱ // 0x1a77 @0x2a
0x1a4d…1a7b at002b = ╱ef╱$╱ // 0x1a78 @0x2b
0x1a4d…1a7b at002c = ╱ee╱)╱ // 0x1a79 @0x2c
0x1a4d…1a7b at002d = EOL // 0x1a7a @0x2d
0x1a4d…1a7b }
0x1a7b…1aa5 a7fc 2740 LINIE=LINIE+V;GFNR1=B;GLNAVN1$=BLANK$
0x1a7b…1aa5 LineComalBin {
0x1a7b…1aa5 ptr = 0xa7fc // 0x1a7b @0x0
0x1a7b…1aa5 lno = 0x0ab4 // 0x1a7d @0x2
0x1a7b…1aa5 at0004 = ╱4c╱L╱ // 0x1a7f @0x4
0x1a7b…1aa5 at0005 = ╱49╱I╱ // 0x1a80 @0x5
0x1a7b…1aa5 at0006 = ╱4e╱N╱ // 0x1a81 @0x6
0x1a7b…1aa5 at0007 = ╱49╱I╱ // 0x1a82 @0x7
0x1a7b…1aa5 at0008 = ╱45╱E╱ // 0x1a83 @0x8
0x1a7b…1aa5 at0009 = ╱dc╱=╱ // 0x1a84 @0x9
0x1a7b…1aa5 at000a = ╱4c╱L╱ // 0x1a85 @0xa
0x1a7b…1aa5 at000b = ╱49╱I╱ // 0x1a86 @0xb
0x1a7b…1aa5 at000c = ╱4e╱N╱ // 0x1a87 @0xc
0x1a7b…1aa5 at000d = ╱49╱I╱ // 0x1a88 @0xd
0x1a7b…1aa5 at000e = ╱45╱E╱ // 0x1a89 @0xe
0x1a7b…1aa5 at000f = ╱e2╱+╱ // 0x1a8a @0xf
0x1a7b…1aa5 at0010 = ╱56╱V╱ // 0x1a8b @0x10
0x1a7b…1aa5 at0011 = ╱eb╱;╱ // 0x1a8c @0x11
0x1a7b…1aa5 at0012 = ╱47╱G╱ // 0x1a8d @0x12
0x1a7b…1aa5 at0013 = ╱46╱F╱ // 0x1a8e @0x13
0x1a7b…1aa5 at0014 = ╱4e╱N╱ // 0x1a8f @0x14
0x1a7b…1aa5 at0015 = ╱52╱R╱ // 0x1a90 @0x15
0x1a7b…1aa5 at0016 = ╱31╱1╱ // 0x1a91 @0x16
0x1a7b…1aa5 at0017 = ╱dc╱=╱ // 0x1a92 @0x17
0x1a7b…1aa5 at0018 = ╱42╱B╱ // 0x1a93 @0x18
0x1a7b…1aa5 at0019 = ╱eb╱;╱ // 0x1a94 @0x19
0x1a7b…1aa5 at001a = ╱47╱G╱ // 0x1a95 @0x1a
0x1a7b…1aa5 at001b = ╱4c╱L╱ // 0x1a96 @0x1b
0x1a7b…1aa5 at001c = ╱4e╱N╱ // 0x1a97 @0x1c
0x1a7b…1aa5 at001d = ╱41╱A╱ // 0x1a98 @0x1d
0x1a7b…1aa5 at001e = ╱56╱V╱ // 0x1a99 @0x1e
0x1a7b…1aa5 at001f = ╱4e╱N╱ // 0x1a9a @0x1f
0x1a7b…1aa5 at0020 = ╱31╱1╱ // 0x1a9b @0x20
0x1a7b…1aa5 at0021 = ╱ef╱$╱ // 0x1a9c @0x21
0x1a7b…1aa5 at0022 = ╱dc╱=╱ // 0x1a9d @0x22
0x1a7b…1aa5 at0023 = ╱42╱B╱ // 0x1a9e @0x23
0x1a7b…1aa5 at0024 = ╱4c╱L╱ // 0x1a9f @0x24
0x1a7b…1aa5 at0025 = ╱41╱A╱ // 0x1aa0 @0x25
0x1a7b…1aa5 at0026 = ╱4e╱N╱ // 0x1aa1 @0x26
0x1a7b…1aa5 at0027 = ╱4b╱K╱ // 0x1aa2 @0x27
0x1a7b…1aa5 at0028 = ╱ef╱$╱ // 0x1aa3 @0x28
0x1a7b…1aa5 at0029 = EOL // 0x1aa4 @0x29
0x1a7b…1aa5 }
0x1aa5…1aab a802 2750 ENDIF
0x1aa5…1aab LineComalBin {
0x1aa5…1aab ptr = 0xa802 // 0x1aa5 @0x0
0x1aa5…1aab lno = 0x0abe // 0x1aa7 @0x2
0x1aa5…1aab at0004 = ╱9b╱ ENDIF ╱ // 0x1aa9 @0x4
0x1aa5…1aab at0005 = EOL // 0x1aaa @0x5
0x1aa5…1aab }
0x1aab…1af2 a849 2760 SALDO1$="0+";SALDO11$="0+";SALDO2$="0+";SALDO12$="0+";SALDO4$="0+"
0x1aab…1af2 LineComalBin {
0x1aab…1af2 ptr = 0xa849 // 0x1aab @0x0
0x1aab…1af2 lno = 0x0ac8 // 0x1aad @0x2
0x1aab…1af2 at0004 = ╱53╱S╱ // 0x1aaf @0x4
0x1aab…1af2 at0005 = ╱41╱A╱ // 0x1ab0 @0x5
0x1aab…1af2 at0006 = ╱4c╱L╱ // 0x1ab1 @0x6
0x1aab…1af2 at0007 = ╱44╱D╱ // 0x1ab2 @0x7
0x1aab…1af2 at0008 = ╱4f╱O╱ // 0x1ab3 @0x8
0x1aab…1af2 at0009 = ╱31╱1╱ // 0x1ab4 @0x9
0x1aab…1af2 at000a = ╱ef╱$╱ // 0x1ab5 @0xa
0x1aab…1af2 at000b = ╱dc╱=╱ // 0x1ab6 @0xb
0x1aab…1af2 at000c = ╱22╱"╱ // 0x1ab7 @0xc
0x1aab…1af2 at000d = ╱30╱0╱ // 0x1ab8 @0xd
0x1aab…1af2 at000e = ╱2b╱+╱ // 0x1ab9 @0xe
0x1aab…1af2 at000f = ╱22╱"╱ // 0x1aba @0xf
0x1aab…1af2 at0010 = ╱eb╱;╱ // 0x1abb @0x10
0x1aab…1af2 at0011 = ╱53╱S╱ // 0x1abc @0x11
0x1aab…1af2 at0012 = ╱41╱A╱ // 0x1abd @0x12
0x1aab…1af2 at0013 = ╱4c╱L╱ // 0x1abe @0x13
0x1aab…1af2 at0014 = ╱44╱D╱ // 0x1abf @0x14
0x1aab…1af2 at0015 = ╱4f╱O╱ // 0x1ac0 @0x15
0x1aab…1af2 at0016 = ╱31╱1╱ // 0x1ac1 @0x16
0x1aab…1af2 at0017 = ╱31╱1╱ // 0x1ac2 @0x17
0x1aab…1af2 at0018 = ╱ef╱$╱ // 0x1ac3 @0x18
0x1aab…1af2 at0019 = ╱dc╱=╱ // 0x1ac4 @0x19
0x1aab…1af2 at001a = ╱22╱"╱ // 0x1ac5 @0x1a
0x1aab…1af2 at001b = ╱30╱0╱ // 0x1ac6 @0x1b
0x1aab…1af2 at001c = ╱2b╱+╱ // 0x1ac7 @0x1c
0x1aab…1af2 at001d = ╱22╱"╱ // 0x1ac8 @0x1d
0x1aab…1af2 at001e = ╱eb╱;╱ // 0x1ac9 @0x1e
0x1aab…1af2 at001f = ╱53╱S╱ // 0x1aca @0x1f
0x1aab…1af2 at0020 = ╱41╱A╱ // 0x1acb @0x20
0x1aab…1af2 at0021 = ╱4c╱L╱ // 0x1acc @0x21
0x1aab…1af2 at0022 = ╱44╱D╱ // 0x1acd @0x22
0x1aab…1af2 at0023 = ╱4f╱O╱ // 0x1ace @0x23
0x1aab…1af2 at0024 = ╱32╱2╱ // 0x1acf @0x24
0x1aab…1af2 at0025 = ╱ef╱$╱ // 0x1ad0 @0x25
0x1aab…1af2 at0026 = ╱dc╱=╱ // 0x1ad1 @0x26
0x1aab…1af2 at0027 = ╱22╱"╱ // 0x1ad2 @0x27
0x1aab…1af2 at0028 = ╱30╱0╱ // 0x1ad3 @0x28
0x1aab…1af2 at0029 = ╱2b╱+╱ // 0x1ad4 @0x29
0x1aab…1af2 at002a = ╱22╱"╱ // 0x1ad5 @0x2a
0x1aab…1af2 at002b = ╱eb╱;╱ // 0x1ad6 @0x2b
0x1aab…1af2 at002c = ╱53╱S╱ // 0x1ad7 @0x2c
0x1aab…1af2 at002d = ╱41╱A╱ // 0x1ad8 @0x2d
0x1aab…1af2 at002e = ╱4c╱L╱ // 0x1ad9 @0x2e
0x1aab…1af2 at002f = ╱44╱D╱ // 0x1ada @0x2f
0x1aab…1af2 at0030 = ╱4f╱O╱ // 0x1adb @0x30
0x1aab…1af2 at0031 = ╱31╱1╱ // 0x1adc @0x31
0x1aab…1af2 at0032 = ╱32╱2╱ // 0x1add @0x32
0x1aab…1af2 at0033 = ╱ef╱$╱ // 0x1ade @0x33
0x1aab…1af2 at0034 = ╱dc╱=╱ // 0x1adf @0x34
0x1aab…1af2 at0035 = ╱22╱"╱ // 0x1ae0 @0x35
0x1aab…1af2 at0036 = ╱30╱0╱ // 0x1ae1 @0x36
0x1aab…1af2 at0037 = ╱2b╱+╱ // 0x1ae2 @0x37
0x1aab…1af2 at0038 = ╱22╱"╱ // 0x1ae3 @0x38
0x1aab…1af2 at0039 = ╱eb╱;╱ // 0x1ae4 @0x39
0x1aab…1af2 at003a = ╱53╱S╱ // 0x1ae5 @0x3a
0x1aab…1af2 at003b = ╱41╱A╱ // 0x1ae6 @0x3b
0x1aab…1af2 at003c = ╱4c╱L╱ // 0x1ae7 @0x3c
0x1aab…1af2 at003d = ╱44╱D╱ // 0x1ae8 @0x3d
0x1aab…1af2 at003e = ╱4f╱O╱ // 0x1ae9 @0x3e
0x1aab…1af2 at003f = ╱34╱4╱ // 0x1aea @0x3f
0x1aab…1af2 at0040 = ╱ef╱$╱ // 0x1aeb @0x40
0x1aab…1af2 at0041 = ╱dc╱=╱ // 0x1aec @0x41
0x1aab…1af2 at0042 = ╱22╱"╱ // 0x1aed @0x42
0x1aab…1af2 at0043 = ╱30╱0╱ // 0x1aee @0x43
0x1aab…1af2 at0044 = ╱2b╱+╱ // 0x1aef @0x44
0x1aab…1af2 at0045 = ╱22╱"╱ // 0x1af0 @0x45
0x1aab…1af2 at0046 = EOL // 0x1af1 @0x46
0x1aab…1af2 }
0x1af2…1b04 a85b 2770 SALDO14$="0+"
0x1af2…1b04 LineComalBin {
0x1af2…1b04 ptr = 0xa85b // 0x1af2 @0x0
0x1af2…1b04 lno = 0x0ad2 // 0x1af4 @0x2
0x1af2…1b04 at0004 = ╱53╱S╱ // 0x1af6 @0x4
0x1af2…1b04 at0005 = ╱41╱A╱ // 0x1af7 @0x5
0x1af2…1b04 at0006 = ╱4c╱L╱ // 0x1af8 @0x6
0x1af2…1b04 at0007 = ╱44╱D╱ // 0x1af9 @0x7
0x1af2…1b04 at0008 = ╱4f╱O╱ // 0x1afa @0x8
0x1af2…1b04 at0009 = ╱31╱1╱ // 0x1afb @0x9
0x1af2…1b04 at000a = ╱34╱4╱ // 0x1afc @0xa
0x1af2…1b04 at000b = ╱ef╱$╱ // 0x1afd @0xb
0x1af2…1b04 at000c = ╱dc╱=╱ // 0x1afe @0xc
0x1af2…1b04 at000d = ╱22╱"╱ // 0x1aff @0xd
0x1af2…1b04 at000e = ╱30╱0╱ // 0x1b00 @0xe
0x1af2…1b04 at000f = ╱2b╱+╱ // 0x1b01 @0xf
0x1af2…1b04 at0010 = ╱22╱"╱ // 0x1b02 @0x10
0x1af2…1b04 at0011 = EOL // 0x1b03 @0x11
0x1af2…1b04 }
0x1b04…1b22 a879 2780 GLNAVN1$=FNAVN$;GFNR1=FNR
0x1b04…1b22 LineComalBin {
0x1b04…1b22 ptr = 0xa879 // 0x1b04 @0x0
0x1b04…1b22 lno = 0x0adc // 0x1b06 @0x2
0x1b04…1b22 at0004 = ╱47╱G╱ // 0x1b08 @0x4
0x1b04…1b22 at0005 = ╱4c╱L╱ // 0x1b09 @0x5
0x1b04…1b22 at0006 = ╱4e╱N╱ // 0x1b0a @0x6
0x1b04…1b22 at0007 = ╱41╱A╱ // 0x1b0b @0x7
0x1b04…1b22 at0008 = ╱56╱V╱ // 0x1b0c @0x8
0x1b04…1b22 at0009 = ╱4e╱N╱ // 0x1b0d @0x9
0x1b04…1b22 at000a = ╱31╱1╱ // 0x1b0e @0xa
0x1b04…1b22 at000b = ╱ef╱$╱ // 0x1b0f @0xb
0x1b04…1b22 at000c = ╱dc╱=╱ // 0x1b10 @0xc
0x1b04…1b22 at000d = ╱46╱F╱ // 0x1b11 @0xd
0x1b04…1b22 at000e = ╱4e╱N╱ // 0x1b12 @0xe
0x1b04…1b22 at000f = ╱41╱A╱ // 0x1b13 @0xf
0x1b04…1b22 at0010 = ╱56╱V╱ // 0x1b14 @0x10
0x1b04…1b22 at0011 = ╱4e╱N╱ // 0x1b15 @0x11
0x1b04…1b22 at0012 = ╱ef╱$╱ // 0x1b16 @0x12
0x1b04…1b22 at0013 = ╱eb╱;╱ // 0x1b17 @0x13
0x1b04…1b22 at0014 = ╱47╱G╱ // 0x1b18 @0x14
0x1b04…1b22 at0015 = ╱46╱F╱ // 0x1b19 @0x15
0x1b04…1b22 at0016 = ╱4e╱N╱ // 0x1b1a @0x16
0x1b04…1b22 at0017 = ╱52╱R╱ // 0x1b1b @0x17
0x1b04…1b22 at0018 = ╱31╱1╱ // 0x1b1c @0x18
0x1b04…1b22 at0019 = ╱dc╱=╱ // 0x1b1d @0x19
0x1b04…1b22 at001a = ╱46╱F╱ // 0x1b1e @0x1a
0x1b04…1b22 at001b = ╱4e╱N╱ // 0x1b1f @0x1b
0x1b04…1b22 at001c = ╱52╱R╱ // 0x1b20 @0x1c
0x1b04…1b22 at001d = EOL // 0x1b21 @0x1d
0x1b04…1b22 }
0x1b22…1b36 a88d 2790 IF LINIE>34 THEN
0x1b22…1b36 LineComalBin {
0x1b22…1b36 ptr = 0xa88d // 0x1b22 @0x0
0x1b22…1b36 lno = 0x0ae6 // 0x1b24 @0x2
0x1b22…1b36 at0004 = ╱9c╱ IF ╱ // 0x1b26 @0x4
0x1b22…1b36 at0005 = ╱4c╱L╱ // 0x1b27 @0x5
0x1b22…1b36 at0006 = ╱49╱I╱ // 0x1b28 @0x6
0x1b22…1b36 at0007 = ╱4e╱N╱ // 0x1b29 @0x7
0x1b22…1b36 at0008 = ╱49╱I╱ // 0x1b2a @0x8
0x1b22…1b36 at0009 = ╱45╱E╱ // 0x1b2b @0x9
0x1b22…1b36 at000a = ╱de╱>╱ // 0x1b2c @0xa
0x1b22…1b36 at000b = ╱33╱3╱ // 0x1b2d @0xb
0x1b22…1b36 at000c = ╱34╱4╱ // 0x1b2e @0xc
0x1b22…1b36 at000d = ╱fe00008806╱ // 0x1b2f @0xd
0x1b22…1b36 at0012 = ╱b6╱ THEN ╱ // 0x1b34 @0x12
0x1b22…1b36 at0013 = EOL // 0x1b35 @0x13
0x1b22…1b36 }
0x1b36…1b52 a8a9 2800 EXEC NYSIDE(GFNR1,GLNAVN1$)
0x1b36…1b52 LineComalBin {
0x1b36…1b52 ptr = 0xa8a9 // 0x1b36 @0x0
0x1b36…1b52 lno = 0x0af0 // 0x1b38 @0x2
0x1b36…1b52 at0004 = ╱9d╱ EXEC ╱ // 0x1b3a @0x4
0x1b36…1b52 at0005 = ╱4e╱N╱ // 0x1b3b @0x5
0x1b36…1b52 at0006 = ╱59╱Y╱ // 0x1b3c @0x6
0x1b36…1b52 at0007 = ╱53╱S╱ // 0x1b3d @0x7
0x1b36…1b52 at0008 = ╱49╱I╱ // 0x1b3e @0x8
0x1b36…1b52 at0009 = ╱44╱D╱ // 0x1b3f @0x9
0x1b36…1b52 at000a = ╱45╱E╱ // 0x1b40 @0xa
0x1b36…1b52 at000b = ╱ed╱(╱ // 0x1b41 @0xb
0x1b36…1b52 at000c = ╱47╱G╱ // 0x1b42 @0xc
0x1b36…1b52 at000d = ╱46╱F╱ // 0x1b43 @0xd
0x1b36…1b52 at000e = ╱4e╱N╱ // 0x1b44 @0xe
0x1b36…1b52 at000f = ╱52╱R╱ // 0x1b45 @0xf
0x1b36…1b52 at0010 = ╱31╱1╱ // 0x1b46 @0x10
0x1b36…1b52 at0011 = ╱ec╱,╱ // 0x1b47 @0x11
0x1b36…1b52 at0012 = ╱47╱G╱ // 0x1b48 @0x12
0x1b36…1b52 at0013 = ╱4c╱L╱ // 0x1b49 @0x13
0x1b36…1b52 at0014 = ╱4e╱N╱ // 0x1b4a @0x14
0x1b36…1b52 at0015 = ╱41╱A╱ // 0x1b4b @0x15
0x1b36…1b52 at0016 = ╱56╱V╱ // 0x1b4c @0x16
0x1b36…1b52 at0017 = ╱4e╱N╱ // 0x1b4d @0x17
0x1b36…1b52 at0018 = ╱31╱1╱ // 0x1b4e @0x18
0x1b36…1b52 at0019 = ╱ef╱$╱ // 0x1b4f @0x19
0x1b36…1b52 at001a = ╱ee╱)╱ // 0x1b50 @0x1a
0x1b36…1b52 at001b = EOL // 0x1b51 @0x1b
0x1b36…1b52 }
0x1b52…1b58 a8af 2810 ELSE
0x1b52…1b58 LineComalBin {
0x1b52…1b58 ptr = 0xa8af // 0x1b52 @0x0
0x1b52…1b58 lno = 0x0afa // 0x1b54 @0x2
0x1b52…1b58 at0004 = ╱9a╱ ELSE ╱ // 0x1b56 @0x4
0x1b52…1b58 at0005 = EOL // 0x1b57 @0x5
0x1b52…1b58 }
0x1b58…1b61 a8b8 2815 PRINT " "
0x1b58…1b61 LineComalBin {
0x1b58…1b61 ptr = 0xa8b8 // 0x1b58 @0x0
0x1b58…1b61 lno = 0x0aff // 0x1b5a @0x2
0x1b58…1b61 at0004 = ╱92╱ PRINT ╱ // 0x1b5c @0x4
0x1b58…1b61 at0005 = ╱22╱"╱ // 0x1b5d @0x5
0x1b58…1b61 at0006 = ╱20╱…╱ // 0x1b5e @0x6
0x1b58…1b61 at0007 = ╱22╱"╱ // 0x1b5f @0x7
0x1b58…1b61 at0008 = EOL // 0x1b60 @0x8
0x1b58…1b61 }
0x1b61…1b6a a8c1 2820 PRINT " "
0x1b61…1b6a LineComalBin {
0x1b61…1b6a ptr = 0xa8c1 // 0x1b61 @0x0
0x1b61…1b6a lno = 0x0b04 // 0x1b63 @0x2
0x1b61…1b6a at0004 = ╱92╱ PRINT ╱ // 0x1b65 @0x4
0x1b61…1b6a at0005 = ╱22╱"╱ // 0x1b66 @0x5
0x1b61…1b6a at0006 = ╱20╱…╱ // 0x1b67 @0x6
0x1b61…1b6a at0007 = ╱22╱"╱ // 0x1b68 @0x7
0x1b61…1b6a at0008 = EOL // 0x1b69 @0x8
0x1b61…1b6a }
0x1b6a…1b7f a8d6 2830 PRINT USING "###### ":FNR;
0x1b6a…1b7f LineComalBin {
0x1b6a…1b7f ptr = 0xa8d6 // 0x1b6a @0x0
0x1b6a…1b7f lno = 0x0b0e // 0x1b6c @0x2
0x1b6a…1b7f at0004 = ╱92╱ PRINT ╱ // 0x1b6e @0x4
0x1b6a…1b7f at0005 = ╱b9╱ USING ╱ // 0x1b6f @0x5
0x1b6a…1b7f at0006 = ╱22╱"╱ // 0x1b70 @0x6
0x1b6a…1b7f at0007 = ╱23╱#╱ // 0x1b71 @0x7
0x1b6a…1b7f at0008 = ╱23╱#╱ // 0x1b72 @0x8
0x1b6a…1b7f at0009 = ╱23╱#╱ // 0x1b73 @0x9
0x1b6a…1b7f at000a = ╱23╱#╱ // 0x1b74 @0xa
0x1b6a…1b7f at000b = ╱23╱#╱ // 0x1b75 @0xb
0x1b6a…1b7f at000c = ╱23╱#╱ // 0x1b76 @0xc
0x1b6a…1b7f at000d = ╱20╱…╱ // 0x1b77 @0xd
0x1b6a…1b7f at000e = ╱22╱"╱ // 0x1b78 @0xe
0x1b6a…1b7f at000f = ╱f0╱:╱ // 0x1b79 @0xf
0x1b6a…1b7f at0010 = ╱46╱F╱ // 0x1b7a @0x10
0x1b6a…1b7f at0011 = ╱4e╱N╱ // 0x1b7b @0x11
0x1b6a…1b7f at0012 = ╱52╱R╱ // 0x1b7c @0x12
0x1b6a…1b7f at0013 = ╱eb╱;╱ // 0x1b7d @0x13
0x1b6a…1b7f at0014 = EOL // 0x1b7e @0x14
0x1b6a…1b7f }
0x1b7f…1b8d a8e4 2840 PRINT GLNAVN1$
0x1b7f…1b8d LineComalBin {
0x1b7f…1b8d ptr = 0xa8e4 // 0x1b7f @0x0
0x1b7f…1b8d lno = 0x0b18 // 0x1b81 @0x2
0x1b7f…1b8d at0004 = ╱92╱ PRINT ╱ // 0x1b83 @0x4
0x1b7f…1b8d at0005 = ╱47╱G╱ // 0x1b84 @0x5
0x1b7f…1b8d at0006 = ╱4c╱L╱ // 0x1b85 @0x6
0x1b7f…1b8d at0007 = ╱4e╱N╱ // 0x1b86 @0x7
0x1b7f…1b8d at0008 = ╱41╱A╱ // 0x1b87 @0x8
0x1b7f…1b8d at0009 = ╱56╱V╱ // 0x1b88 @0x9
0x1b7f…1b8d at000a = ╱4e╱N╱ // 0x1b89 @0xa
0x1b7f…1b8d at000b = ╱31╱1╱ // 0x1b8a @0xb
0x1b7f…1b8d at000c = ╱ef╱$╱ // 0x1b8b @0xc
0x1b7f…1b8d at000d = EOL // 0x1b8c @0xd
0x1b7f…1b8d }
0x1b8d…1bb1 a908 2850 PRINT TAB(8);STREG$(E:LEN(GLNAVN$))
0x1b8d…1bb1 LineComalBin {
0x1b8d…1bb1 ptr = 0xa908 // 0x1b8d @0x0
0x1b8d…1bb1 lno = 0x0b22 // 0x1b8f @0x2
0x1b8d…1bb1 at0004 = ╱92╱ PRINT ╱ // 0x1b91 @0x4
0x1b8d…1bb1 at0005 = ╱d2╱TAB╱ // 0x1b92 @0x5
0x1b8d…1bb1 at0006 = ╱ed╱(╱ // 0x1b93 @0x6
0x1b8d…1bb1 at0007 = ╱38╱8╱ // 0x1b94 @0x7
0x1b8d…1bb1 at0008 = ╱fe00008004╱ // 0x1b95 @0x8
0x1b8d…1bb1 at000d = ╱ee╱)╱ // 0x1b9a @0xd
0x1b8d…1bb1 at000e = ╱eb╱;╱ // 0x1b9b @0xe
0x1b8d…1bb1 at000f = ╱53╱S╱ // 0x1b9c @0xf
0x1b8d…1bb1 at0010 = ╱54╱T╱ // 0x1b9d @0x10
0x1b8d…1bb1 at0011 = ╱52╱R╱ // 0x1b9e @0x11
0x1b8d…1bb1 at0012 = ╱45╱E╱ // 0x1b9f @0x12
0x1b8d…1bb1 at0013 = ╱47╱G╱ // 0x1ba0 @0x13
0x1b8d…1bb1 at0014 = ╱ef╱$╱ // 0x1ba1 @0x14
0x1b8d…1bb1 at0015 = ╱ed╱(╱ // 0x1ba2 @0x15
0x1b8d…1bb1 at0016 = ╱45╱E╱ // 0x1ba3 @0x16
0x1b8d…1bb1 at0017 = ╱f0╱:╱ // 0x1ba4 @0x17
0x1b8d…1bb1 at0018 = ╱cc╱LEN╱ // 0x1ba5 @0x18
0x1b8d…1bb1 at0019 = ╱ed╱(╱ // 0x1ba6 @0x19
0x1b8d…1bb1 at001a = ╱47╱G╱ // 0x1ba7 @0x1a
0x1b8d…1bb1 at001b = ╱4c╱L╱ // 0x1ba8 @0x1b
0x1b8d…1bb1 at001c = ╱4e╱N╱ // 0x1ba9 @0x1c
0x1b8d…1bb1 at001d = ╱41╱A╱ // 0x1baa @0x1d
0x1b8d…1bb1 at001e = ╱56╱V╱ // 0x1bab @0x1e
0x1b8d…1bb1 at001f = ╱4e╱N╱ // 0x1bac @0x1f
0x1b8d…1bb1 at0020 = ╱ef╱$╱ // 0x1bad @0x20
0x1b8d…1bb1 at0021 = ╱ee╱)╱ // 0x1bae @0x21
0x1b8d…1bb1 at0022 = ╱ee╱)╱ // 0x1baf @0x22
0x1b8d…1bb1 at0023 = EOL // 0x1bb0 @0x23
0x1b8d…1bb1 }
0x1bb1…1bba a911 2860 PRINT " "
0x1bb1…1bba LineComalBin {
0x1bb1…1bba ptr = 0xa911 // 0x1bb1 @0x0
0x1bb1…1bba lno = 0x0b2c // 0x1bb3 @0x2
0x1bb1…1bba at0004 = ╱92╱ PRINT ╱ // 0x1bb5 @0x4
0x1bb1…1bba at0005 = ╱22╱"╱ // 0x1bb6 @0x5
0x1bb1…1bba at0006 = ╱20╱…╱ // 0x1bb7 @0x6
0x1bb1…1bba at0007 = ╱22╱"╱ // 0x1bb8 @0x7
0x1bb1…1bba at0008 = EOL // 0x1bb9 @0x8
0x1bb1…1bba }
0x1bba…1bd1 a928 2870 LINIE=LINIE+5
0x1bba…1bd1 LineComalBin {
0x1bba…1bd1 ptr = 0xa928 // 0x1bba @0x0
0x1bba…1bd1 lno = 0x0b36 // 0x1bbc @0x2
0x1bba…1bd1 at0004 = ╱4c╱L╱ // 0x1bbe @0x4
0x1bba…1bd1 at0005 = ╱49╱I╱ // 0x1bbf @0x5
0x1bba…1bd1 at0006 = ╱4e╱N╱ // 0x1bc0 @0x6
0x1bba…1bd1 at0007 = ╱49╱I╱ // 0x1bc1 @0x7
0x1bba…1bd1 at0008 = ╱45╱E╱ // 0x1bc2 @0x8
0x1bba…1bd1 at0009 = ╱dc╱=╱ // 0x1bc3 @0x9
0x1bba…1bd1 at000a = ╱4c╱L╱ // 0x1bc4 @0xa
0x1bba…1bd1 at000b = ╱49╱I╱ // 0x1bc5 @0xb
0x1bba…1bd1 at000c = ╱4e╱N╱ // 0x1bc6 @0xc
0x1bba…1bd1 at000d = ╱49╱I╱ // 0x1bc7 @0xd
0x1bba…1bd1 at000e = ╱45╱E╱ // 0x1bc8 @0xe
0x1bba…1bd1 at000f = ╱e2╱+╱ // 0x1bc9 @0xf
0x1bba…1bd1 at0010 = ╱35╱5╱ // 0x1bca @0x10
0x1bba…1bd1 at0011 = ╱fe0000a003╱ // 0x1bcb @0x11
0x1bba…1bd1 at0016 = EOL // 0x1bd0 @0x16
0x1bba…1bd1 }
0x1bd1…1bd7 a92e 2880 ENDIF
0x1bd1…1bd7 LineComalBin {
0x1bd1…1bd7 ptr = 0xa92e // 0x1bd1 @0x0
0x1bd1…1bd7 lno = 0x0b40 // 0x1bd3 @0x2
0x1bd1…1bd7 at0004 = ╱9b╱ ENDIF ╱ // 0x1bd5 @0x4
0x1bd1…1bd7 at0005 = EOL // 0x1bd6 @0x5
0x1bd1…1bd7 }
0x1bd7…1bdd a934 2890 ENDCASE
0x1bd7…1bdd LineComalBin {
0x1bd7…1bdd ptr = 0xa934 // 0x1bd7 @0x0
0x1bd7…1bdd lno = 0x0b4a // 0x1bd9 @0x2
0x1bd7…1bdd at0004 = ╱a4╱ ENDCASE ╱ // 0x1bdb @0x4
0x1bd7…1bdd at0005 = EOL // 0x1bdc @0x5
0x1bd7…1bdd }
0x1bdd…1be8 a93f 2900 NEXT FPIL3
0x1bdd…1be8 LineComalBin {
0x1bdd…1be8 ptr = 0xa93f // 0x1bdd @0x0
0x1bdd…1be8 lno = 0x0b54 // 0x1bdf @0x2
0x1bdd…1be8 at0004 = ╱84╱ NEXT ╱ // 0x1be1 @0x4
0x1bdd…1be8 at0005 = ╱46╱F╱ // 0x1be2 @0x5
0x1bdd…1be8 at0006 = ╱50╱P╱ // 0x1be3 @0x6
0x1bdd…1be8 at0007 = ╱49╱I╱ // 0x1be4 @0x7
0x1bdd…1be8 at0008 = ╱4c╱L╱ // 0x1be5 @0x8
0x1bdd…1be8 at0009 = ╱33╱3╱ // 0x1be6 @0x9
0x1bdd…1be8 at000a = EOL // 0x1be7 @0xa
0x1bdd…1be8 }
0x1be8…1bf5 a94c 2910 IF GFNR>B THEN
0x1be8…1bf5 LineComalBin {
0x1be8…1bf5 ptr = 0xa94c // 0x1be8 @0x0
0x1be8…1bf5 lno = 0x0b5e // 0x1bea @0x2
0x1be8…1bf5 at0004 = ╱9c╱ IF ╱ // 0x1bec @0x4
0x1be8…1bf5 at0005 = ╱47╱G╱ // 0x1bed @0x5
0x1be8…1bf5 at0006 = ╱46╱F╱ // 0x1bee @0x6
0x1be8…1bf5 at0007 = ╱4e╱N╱ // 0x1bef @0x7
0x1be8…1bf5 at0008 = ╱52╱R╱ // 0x1bf0 @0x8
0x1be8…1bf5 at0009 = ╱de╱>╱ // 0x1bf1 @0x9
0x1be8…1bf5 at000a = ╱42╱B╱ // 0x1bf2 @0xa
0x1be8…1bf5 at000b = ╱b6╱ THEN ╱ // 0x1bf3 @0xb
0x1be8…1bf5 at000c = EOL // 0x1bf4 @0xc
0x1be8…1bf5 }
0x1bf5…1c1e a975 2920 IF LINIE>37 THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x1bf5…1c1e LineComalBin {
0x1bf5…1c1e ptr = 0xa975 // 0x1bf5 @0x0
0x1bf5…1c1e lno = 0x0b68 // 0x1bf7 @0x2
0x1bf5…1c1e at0004 = ╱82╱ IF ╱ // 0x1bf9 @0x4
0x1bf5…1c1e at0005 = ╱4c╱L╱ // 0x1bfa @0x5
0x1bf5…1c1e at0006 = ╱49╱I╱ // 0x1bfb @0x6
0x1bf5…1c1e at0007 = ╱4e╱N╱ // 0x1bfc @0x7
0x1bf5…1c1e at0008 = ╱49╱I╱ // 0x1bfd @0x8
0x1bf5…1c1e at0009 = ╱45╱E╱ // 0x1bfe @0x9
0x1bf5…1c1e at000a = ╱de╱>╱ // 0x1bff @0xa
0x1bf5…1c1e at000b = ╱33╱3╱ // 0x1c00 @0xb
0x1bf5…1c1e at000c = ╱37╱7╱ // 0x1c01 @0xc
0x1bf5…1c1e at000d = ╱fe00009406╱ // 0x1c02 @0xd
0x1bf5…1c1e at0012 = ╱b6╱ THEN ╱ // 0x1c07 @0x12
0x1bf5…1c1e at0013 = ╱9d╱ EXEC ╱ // 0x1c08 @0x13
0x1bf5…1c1e at0014 = ╱4e╱N╱ // 0x1c09 @0x14
0x1bf5…1c1e at0015 = ╱59╱Y╱ // 0x1c0a @0x15
0x1bf5…1c1e at0016 = ╱53╱S╱ // 0x1c0b @0x16
0x1bf5…1c1e at0017 = ╱49╱I╱ // 0x1c0c @0x17
0x1bf5…1c1e at0018 = ╱44╱D╱ // 0x1c0d @0x18
0x1bf5…1c1e at0019 = ╱45╱E╱ // 0x1c0e @0x19
0x1bf5…1c1e at001a = ╱ed╱(╱ // 0x1c0f @0x1a
0x1bf5…1c1e at001b = ╱47╱G╱ // 0x1c10 @0x1b
0x1bf5…1c1e at001c = ╱46╱F╱ // 0x1c11 @0x1c
0x1bf5…1c1e at001d = ╱4e╱N╱ // 0x1c12 @0x1d
0x1bf5…1c1e at001e = ╱52╱R╱ // 0x1c13 @0x1e
0x1bf5…1c1e at001f = ╱ec╱,╱ // 0x1c14 @0x1f
0x1bf5…1c1e at0020 = ╱47╱G╱ // 0x1c15 @0x20
0x1bf5…1c1e at0021 = ╱4c╱L╱ // 0x1c16 @0x21
0x1bf5…1c1e at0022 = ╱4e╱N╱ // 0x1c17 @0x22
0x1bf5…1c1e at0023 = ╱41╱A╱ // 0x1c18 @0x23
0x1bf5…1c1e at0024 = ╱56╱V╱ // 0x1c19 @0x24
0x1bf5…1c1e at0025 = ╱4e╱N╱ // 0x1c1a @0x25
0x1bf5…1c1e at0026 = ╱ef╱$╱ // 0x1c1b @0x26
0x1bf5…1c1e at0027 = ╱ee╱)╱ // 0x1c1c @0x27
0x1bf5…1c1e at0028 = EOL // 0x1c1d @0x28
0x1bf5…1c1e }
0x1c1e…1c27 a97e 2930 PRINT " "
0x1c1e…1c27 LineComalBin {
0x1c1e…1c27 ptr = 0xa97e // 0x1c1e @0x0
0x1c1e…1c27 lno = 0x0b72 // 0x1c20 @0x2
0x1c1e…1c27 at0004 = ╱92╱ PRINT ╱ // 0x1c22 @0x4
0x1c1e…1c27 at0005 = ╱22╱"╱ // 0x1c23 @0x5
0x1c1e…1c27 at0006 = ╱20╱…╱ // 0x1c24 @0x6
0x1c1e…1c27 at0007 = ╱22╱"╱ // 0x1c25 @0x7
0x1c1e…1c27 at0008 = EOL // 0x1c26 @0x8
0x1c1e…1c27 }
0x1c27…1c48 a99f 2940 PRINT TAB(8);STREG$(E:71)
0x1c27…1c48 LineComalBin {
0x1c27…1c48 ptr = 0xa99f // 0x1c27 @0x0
0x1c27…1c48 lno = 0x0b7c // 0x1c29 @0x2
0x1c27…1c48 at0004 = ╱92╱ PRINT ╱ // 0x1c2b @0x4
0x1c27…1c48 at0005 = ╱d2╱TAB╱ // 0x1c2c @0x5
0x1c27…1c48 at0006 = ╱ed╱(╱ // 0x1c2d @0x6
0x1c27…1c48 at0007 = ╱38╱8╱ // 0x1c2e @0x7
0x1c27…1c48 at0008 = ╱fe00008004╱ // 0x1c2f @0x8
0x1c27…1c48 at000d = ╱ee╱)╱ // 0x1c34 @0xd
0x1c27…1c48 at000e = ╱eb╱;╱ // 0x1c35 @0xe
0x1c27…1c48 at000f = ╱53╱S╱ // 0x1c36 @0xf
0x1c27…1c48 at0010 = ╱54╱T╱ // 0x1c37 @0x10
0x1c27…1c48 at0011 = ╱52╱R╱ // 0x1c38 @0x11
0x1c27…1c48 at0012 = ╱45╱E╱ // 0x1c39 @0x12
0x1c27…1c48 at0013 = ╱47╱G╱ // 0x1c3a @0x13
0x1c27…1c48 at0014 = ╱ef╱$╱ // 0x1c3b @0x14
0x1c27…1c48 at0015 = ╱ed╱(╱ // 0x1c3c @0x15
0x1c27…1c48 at0016 = ╱45╱E╱ // 0x1c3d @0x16
0x1c27…1c48 at0017 = ╱f0╱:╱ // 0x1c3e @0x17
0x1c27…1c48 at0018 = ╱37╱7╱ // 0x1c3f @0x18
0x1c27…1c48 at0019 = ╱31╱1╱ // 0x1c40 @0x19
0x1c27…1c48 at001a = ╱fe00008e07╱ // 0x1c41 @0x1a
0x1c27…1c48 at001f = ╱ee╱)╱ // 0x1c46 @0x1f
0x1c27…1c48 at0020 = EOL // 0x1c47 @0x20
0x1c27…1c48 }
0x1c48…1c74 a9cb 2950 EXEC LINIEUD(GFNR,GLNAVN$,SALDO2$,SALDO12$)
0x1c48…1c74 LineComalBin {
0x1c48…1c74 ptr = 0xa9cb // 0x1c48 @0x0
0x1c48…1c74 lno = 0x0b86 // 0x1c4a @0x2
0x1c48…1c74 at0004 = ╱9d╱ EXEC ╱ // 0x1c4c @0x4
0x1c48…1c74 at0005 = ╱4c╱L╱ // 0x1c4d @0x5
0x1c48…1c74 at0006 = ╱49╱I╱ // 0x1c4e @0x6
0x1c48…1c74 at0007 = ╱4e╱N╱ // 0x1c4f @0x7
0x1c48…1c74 at0008 = ╱49╱I╱ // 0x1c50 @0x8
0x1c48…1c74 at0009 = ╱45╱E╱ // 0x1c51 @0x9
0x1c48…1c74 at000a = ╱55╱U╱ // 0x1c52 @0xa
0x1c48…1c74 at000b = ╱44╱D╱ // 0x1c53 @0xb
0x1c48…1c74 at000c = ╱ed╱(╱ // 0x1c54 @0xc
0x1c48…1c74 at000d = ╱47╱G╱ // 0x1c55 @0xd
0x1c48…1c74 at000e = ╱46╱F╱ // 0x1c56 @0xe
0x1c48…1c74 at000f = ╱4e╱N╱ // 0x1c57 @0xf
0x1c48…1c74 at0010 = ╱52╱R╱ // 0x1c58 @0x10
0x1c48…1c74 at0011 = ╱ec╱,╱ // 0x1c59 @0x11
0x1c48…1c74 at0012 = ╱47╱G╱ // 0x1c5a @0x12
0x1c48…1c74 at0013 = ╱4c╱L╱ // 0x1c5b @0x13
0x1c48…1c74 at0014 = ╱4e╱N╱ // 0x1c5c @0x14
0x1c48…1c74 at0015 = ╱41╱A╱ // 0x1c5d @0x15
0x1c48…1c74 at0016 = ╱56╱V╱ // 0x1c5e @0x16
0x1c48…1c74 at0017 = ╱4e╱N╱ // 0x1c5f @0x17
0x1c48…1c74 at0018 = ╱ef╱$╱ // 0x1c60 @0x18
0x1c48…1c74 at0019 = ╱ec╱,╱ // 0x1c61 @0x19
0x1c48…1c74 at001a = ╱53╱S╱ // 0x1c62 @0x1a
0x1c48…1c74 at001b = ╱41╱A╱ // 0x1c63 @0x1b
0x1c48…1c74 at001c = ╱4c╱L╱ // 0x1c64 @0x1c
0x1c48…1c74 at001d = ╱44╱D╱ // 0x1c65 @0x1d
0x1c48…1c74 at001e = ╱4f╱O╱ // 0x1c66 @0x1e
0x1c48…1c74 at001f = ╱32╱2╱ // 0x1c67 @0x1f
0x1c48…1c74 at0020 = ╱ef╱$╱ // 0x1c68 @0x20
0x1c48…1c74 at0021 = ╱ec╱,╱ // 0x1c69 @0x21
0x1c48…1c74 at0022 = ╱53╱S╱ // 0x1c6a @0x22
0x1c48…1c74 at0023 = ╱41╱A╱ // 0x1c6b @0x23
0x1c48…1c74 at0024 = ╱4c╱L╱ // 0x1c6c @0x24
0x1c48…1c74 at0025 = ╱44╱D╱ // 0x1c6d @0x25
0x1c48…1c74 at0026 = ╱4f╱O╱ // 0x1c6e @0x26
0x1c48…1c74 at0027 = ╱31╱1╱ // 0x1c6f @0x27
0x1c48…1c74 at0028 = ╱32╱2╱ // 0x1c70 @0x28
0x1c48…1c74 at0029 = ╱ef╱$╱ // 0x1c71 @0x29
0x1c48…1c74 at002a = ╱ee╱)╱ // 0x1c72 @0x2a
0x1c48…1c74 at002b = EOL // 0x1c73 @0x2b
0x1c48…1c74 }
0x1c74…1ca8 a9ff 2960 SALDO2$="0+";SALDO12$="0+";LINIE=LINIE+V;GFNR=B
0x1c74…1ca8 LineComalBin {
0x1c74…1ca8 ptr = 0xa9ff // 0x1c74 @0x0
0x1c74…1ca8 lno = 0x0b90 // 0x1c76 @0x2
0x1c74…1ca8 at0004 = ╱53╱S╱ // 0x1c78 @0x4
0x1c74…1ca8 at0005 = ╱41╱A╱ // 0x1c79 @0x5
0x1c74…1ca8 at0006 = ╱4c╱L╱ // 0x1c7a @0x6
0x1c74…1ca8 at0007 = ╱44╱D╱ // 0x1c7b @0x7
0x1c74…1ca8 at0008 = ╱4f╱O╱ // 0x1c7c @0x8
0x1c74…1ca8 at0009 = ╱32╱2╱ // 0x1c7d @0x9
0x1c74…1ca8 at000a = ╱ef╱$╱ // 0x1c7e @0xa
0x1c74…1ca8 at000b = ╱dc╱=╱ // 0x1c7f @0xb
0x1c74…1ca8 at000c = ╱22╱"╱ // 0x1c80 @0xc
0x1c74…1ca8 at000d = ╱30╱0╱ // 0x1c81 @0xd
0x1c74…1ca8 at000e = ╱2b╱+╱ // 0x1c82 @0xe
0x1c74…1ca8 at000f = ╱22╱"╱ // 0x1c83 @0xf
0x1c74…1ca8 at0010 = ╱eb╱;╱ // 0x1c84 @0x10
0x1c74…1ca8 at0011 = ╱53╱S╱ // 0x1c85 @0x11
0x1c74…1ca8 at0012 = ╱41╱A╱ // 0x1c86 @0x12
0x1c74…1ca8 at0013 = ╱4c╱L╱ // 0x1c87 @0x13
0x1c74…1ca8 at0014 = ╱44╱D╱ // 0x1c88 @0x14
0x1c74…1ca8 at0015 = ╱4f╱O╱ // 0x1c89 @0x15
0x1c74…1ca8 at0016 = ╱31╱1╱ // 0x1c8a @0x16
0x1c74…1ca8 at0017 = ╱32╱2╱ // 0x1c8b @0x17
0x1c74…1ca8 at0018 = ╱ef╱$╱ // 0x1c8c @0x18
0x1c74…1ca8 at0019 = ╱dc╱=╱ // 0x1c8d @0x19
0x1c74…1ca8 at001a = ╱22╱"╱ // 0x1c8e @0x1a
0x1c74…1ca8 at001b = ╱30╱0╱ // 0x1c8f @0x1b
0x1c74…1ca8 at001c = ╱2b╱+╱ // 0x1c90 @0x1c
0x1c74…1ca8 at001d = ╱22╱"╱ // 0x1c91 @0x1d
0x1c74…1ca8 at001e = ╱eb╱;╱ // 0x1c92 @0x1e
0x1c74…1ca8 at001f = ╱4c╱L╱ // 0x1c93 @0x1f
0x1c74…1ca8 at0020 = ╱49╱I╱ // 0x1c94 @0x20
0x1c74…1ca8 at0021 = ╱4e╱N╱ // 0x1c95 @0x21
0x1c74…1ca8 at0022 = ╱49╱I╱ // 0x1c96 @0x22
0x1c74…1ca8 at0023 = ╱45╱E╱ // 0x1c97 @0x23
0x1c74…1ca8 at0024 = ╱dc╱=╱ // 0x1c98 @0x24
0x1c74…1ca8 at0025 = ╱4c╱L╱ // 0x1c99 @0x25
0x1c74…1ca8 at0026 = ╱49╱I╱ // 0x1c9a @0x26
0x1c74…1ca8 at0027 = ╱4e╱N╱ // 0x1c9b @0x27
0x1c74…1ca8 at0028 = ╱49╱I╱ // 0x1c9c @0x28
0x1c74…1ca8 at0029 = ╱45╱E╱ // 0x1c9d @0x29
0x1c74…1ca8 at002a = ╱e2╱+╱ // 0x1c9e @0x2a
0x1c74…1ca8 at002b = ╱56╱V╱ // 0x1c9f @0x2b
0x1c74…1ca8 at002c = ╱eb╱;╱ // 0x1ca0 @0x2c
0x1c74…1ca8 at002d = ╱47╱G╱ // 0x1ca1 @0x2d
0x1c74…1ca8 at002e = ╱46╱F╱ // 0x1ca2 @0x2e
0x1c74…1ca8 at002f = ╱4e╱N╱ // 0x1ca3 @0x2f
0x1c74…1ca8 at0030 = ╱52╱R╱ // 0x1ca4 @0x30
0x1c74…1ca8 at0031 = ╱dc╱=╱ // 0x1ca5 @0x31
0x1c74…1ca8 at0032 = ╱42╱B╱ // 0x1ca6 @0x32
0x1c74…1ca8 at0033 = EOL // 0x1ca7 @0x33
0x1c74…1ca8 }
0x1ca8…1cc7 aa1e 2970 SALDO1$="0+";SALDO11$="0+"
0x1ca8…1cc7 LineComalBin {
0x1ca8…1cc7 ptr = 0xaa1e // 0x1ca8 @0x0
0x1ca8…1cc7 lno = 0x0b9a // 0x1caa @0x2
0x1ca8…1cc7 at0004 = ╱53╱S╱ // 0x1cac @0x4
0x1ca8…1cc7 at0005 = ╱41╱A╱ // 0x1cad @0x5
0x1ca8…1cc7 at0006 = ╱4c╱L╱ // 0x1cae @0x6
0x1ca8…1cc7 at0007 = ╱44╱D╱ // 0x1caf @0x7
0x1ca8…1cc7 at0008 = ╱4f╱O╱ // 0x1cb0 @0x8
0x1ca8…1cc7 at0009 = ╱31╱1╱ // 0x1cb1 @0x9
0x1ca8…1cc7 at000a = ╱ef╱$╱ // 0x1cb2 @0xa
0x1ca8…1cc7 at000b = ╱dc╱=╱ // 0x1cb3 @0xb
0x1ca8…1cc7 at000c = ╱22╱"╱ // 0x1cb4 @0xc
0x1ca8…1cc7 at000d = ╱30╱0╱ // 0x1cb5 @0xd
0x1ca8…1cc7 at000e = ╱2b╱+╱ // 0x1cb6 @0xe
0x1ca8…1cc7 at000f = ╱22╱"╱ // 0x1cb7 @0xf
0x1ca8…1cc7 at0010 = ╱eb╱;╱ // 0x1cb8 @0x10
0x1ca8…1cc7 at0011 = ╱53╱S╱ // 0x1cb9 @0x11
0x1ca8…1cc7 at0012 = ╱41╱A╱ // 0x1cba @0x12
0x1ca8…1cc7 at0013 = ╱4c╱L╱ // 0x1cbb @0x13
0x1ca8…1cc7 at0014 = ╱44╱D╱ // 0x1cbc @0x14
0x1ca8…1cc7 at0015 = ╱4f╱O╱ // 0x1cbd @0x15
0x1ca8…1cc7 at0016 = ╱31╱1╱ // 0x1cbe @0x16
0x1ca8…1cc7 at0017 = ╱31╱1╱ // 0x1cbf @0x17
0x1ca8…1cc7 at0018 = ╱ef╱$╱ // 0x1cc0 @0x18
0x1ca8…1cc7 at0019 = ╱dc╱=╱ // 0x1cc1 @0x19
0x1ca8…1cc7 at001a = ╱22╱"╱ // 0x1cc2 @0x1a
0x1ca8…1cc7 at001b = ╱30╱0╱ // 0x1cc3 @0x1b
0x1ca8…1cc7 at001c = ╱2b╱+╱ // 0x1cc4 @0x1c
0x1ca8…1cc7 at001d = ╱22╱"╱ // 0x1cc5 @0x1d
0x1ca8…1cc7 at001e = EOL // 0x1cc6 @0x1e
0x1ca8…1cc7 }
0x1cc7…1ccd aa24 2980 ENDIF
0x1cc7…1ccd LineComalBin {
0x1cc7…1ccd ptr = 0xaa24 // 0x1cc7 @0x0
0x1cc7…1ccd lno = 0x0ba4 // 0x1cc9 @0x2
0x1cc7…1ccd at0004 = ╱9b╱ ENDIF ╱ // 0x1ccb @0x4
0x1cc7…1ccd at0005 = EOL // 0x1ccc @0x5
0x1cc7…1ccd }
0x1ccd…1cdb aa32 2990 IF GFNR1>B THEN
0x1ccd…1cdb LineComalBin {
0x1ccd…1cdb ptr = 0xaa32 // 0x1ccd @0x0
0x1ccd…1cdb lno = 0x0bae // 0x1ccf @0x2
0x1ccd…1cdb at0004 = ╱9c╱ IF ╱ // 0x1cd1 @0x4
0x1ccd…1cdb at0005 = ╱47╱G╱ // 0x1cd2 @0x5
0x1ccd…1cdb at0006 = ╱46╱F╱ // 0x1cd3 @0x6
0x1ccd…1cdb at0007 = ╱4e╱N╱ // 0x1cd4 @0x7
0x1ccd…1cdb at0008 = ╱52╱R╱ // 0x1cd5 @0x8
0x1ccd…1cdb at0009 = ╱31╱1╱ // 0x1cd6 @0x9
0x1ccd…1cdb at000a = ╱de╱>╱ // 0x1cd7 @0xa
0x1ccd…1cdb at000b = ╱42╱B╱ // 0x1cd8 @0xb
0x1ccd…1cdb at000c = ╱b6╱ THEN ╱ // 0x1cd9 @0xc
0x1ccd…1cdb at000d = EOL // 0x1cda @0xd
0x1ccd…1cdb }
0x1cdb…1d06 aa5d 3000 IF LINIE>37 THEN EXEC NYSIDE(GFNR1,GLNAVN1$)
0x1cdb…1d06 LineComalBin {
0x1cdb…1d06 ptr = 0xaa5d // 0x1cdb @0x0
0x1cdb…1d06 lno = 0x0bb8 // 0x1cdd @0x2
0x1cdb…1d06 at0004 = ╱82╱ IF ╱ // 0x1cdf @0x4
0x1cdb…1d06 at0005 = ╱4c╱L╱ // 0x1ce0 @0x5
0x1cdb…1d06 at0006 = ╱49╱I╱ // 0x1ce1 @0x6
0x1cdb…1d06 at0007 = ╱4e╱N╱ // 0x1ce2 @0x7
0x1cdb…1d06 at0008 = ╱49╱I╱ // 0x1ce3 @0x8
0x1cdb…1d06 at0009 = ╱45╱E╱ // 0x1ce4 @0x9
0x1cdb…1d06 at000a = ╱de╱>╱ // 0x1ce5 @0xa
0x1cdb…1d06 at000b = ╱33╱3╱ // 0x1ce6 @0xb
0x1cdb…1d06 at000c = ╱37╱7╱ // 0x1ce7 @0xc
0x1cdb…1d06 at000d = ╱fe00009406╱ // 0x1ce8 @0xd
0x1cdb…1d06 at0012 = ╱b6╱ THEN ╱ // 0x1ced @0x12
0x1cdb…1d06 at0013 = ╱9d╱ EXEC ╱ // 0x1cee @0x13
0x1cdb…1d06 at0014 = ╱4e╱N╱ // 0x1cef @0x14
0x1cdb…1d06 at0015 = ╱59╱Y╱ // 0x1cf0 @0x15
0x1cdb…1d06 at0016 = ╱53╱S╱ // 0x1cf1 @0x16
0x1cdb…1d06 at0017 = ╱49╱I╱ // 0x1cf2 @0x17
0x1cdb…1d06 at0018 = ╱44╱D╱ // 0x1cf3 @0x18
0x1cdb…1d06 at0019 = ╱45╱E╱ // 0x1cf4 @0x19
0x1cdb…1d06 at001a = ╱ed╱(╱ // 0x1cf5 @0x1a
0x1cdb…1d06 at001b = ╱47╱G╱ // 0x1cf6 @0x1b
0x1cdb…1d06 at001c = ╱46╱F╱ // 0x1cf7 @0x1c
0x1cdb…1d06 at001d = ╱4e╱N╱ // 0x1cf8 @0x1d
0x1cdb…1d06 at001e = ╱52╱R╱ // 0x1cf9 @0x1e
0x1cdb…1d06 at001f = ╱31╱1╱ // 0x1cfa @0x1f
0x1cdb…1d06 at0020 = ╱ec╱,╱ // 0x1cfb @0x20
0x1cdb…1d06 at0021 = ╱47╱G╱ // 0x1cfc @0x21
0x1cdb…1d06 at0022 = ╱4c╱L╱ // 0x1cfd @0x22
0x1cdb…1d06 at0023 = ╱4e╱N╱ // 0x1cfe @0x23
0x1cdb…1d06 at0024 = ╱41╱A╱ // 0x1cff @0x24
0x1cdb…1d06 at0025 = ╱56╱V╱ // 0x1d00 @0x25
0x1cdb…1d06 at0026 = ╱4e╱N╱ // 0x1d01 @0x26
0x1cdb…1d06 at0027 = ╱31╱1╱ // 0x1d02 @0x27
0x1cdb…1d06 at0028 = ╱ef╱$╱ // 0x1d03 @0x28
0x1cdb…1d06 at0029 = ╱ee╱)╱ // 0x1d04 @0x29
0x1cdb…1d06 at002a = EOL // 0x1d05 @0x2a
0x1cdb…1d06 }
0x1d06…1d0f aa66 3010 PRINT " "
0x1d06…1d0f LineComalBin {
0x1d06…1d0f ptr = 0xaa66 // 0x1d06 @0x0
0x1d06…1d0f lno = 0x0bc2 // 0x1d08 @0x2
0x1d06…1d0f at0004 = ╱92╱ PRINT ╱ // 0x1d0a @0x4
0x1d06…1d0f at0005 = ╱22╱"╱ // 0x1d0b @0x5
0x1d06…1d0f at0006 = ╱20╱…╱ // 0x1d0c @0x6
0x1d06…1d0f at0007 = ╱22╱"╱ // 0x1d0d @0x7
0x1d06…1d0f at0008 = EOL // 0x1d0e @0x8
0x1d06…1d0f }
0x1d0f…1d30 aa87 3020 PRINT TAB(8);STREG$(E:71)
0x1d0f…1d30 LineComalBin {
0x1d0f…1d30 ptr = 0xaa87 // 0x1d0f @0x0
0x1d0f…1d30 lno = 0x0bcc // 0x1d11 @0x2
0x1d0f…1d30 at0004 = ╱92╱ PRINT ╱ // 0x1d13 @0x4
0x1d0f…1d30 at0005 = ╱d2╱TAB╱ // 0x1d14 @0x5
0x1d0f…1d30 at0006 = ╱ed╱(╱ // 0x1d15 @0x6
0x1d0f…1d30 at0007 = ╱38╱8╱ // 0x1d16 @0x7
0x1d0f…1d30 at0008 = ╱fe00008004╱ // 0x1d17 @0x8
0x1d0f…1d30 at000d = ╱ee╱)╱ // 0x1d1c @0xd
0x1d0f…1d30 at000e = ╱eb╱;╱ // 0x1d1d @0xe
0x1d0f…1d30 at000f = ╱53╱S╱ // 0x1d1e @0xf
0x1d0f…1d30 at0010 = ╱54╱T╱ // 0x1d1f @0x10
0x1d0f…1d30 at0011 = ╱52╱R╱ // 0x1d20 @0x11
0x1d0f…1d30 at0012 = ╱45╱E╱ // 0x1d21 @0x12
0x1d0f…1d30 at0013 = ╱47╱G╱ // 0x1d22 @0x13
0x1d0f…1d30 at0014 = ╱ef╱$╱ // 0x1d23 @0x14
0x1d0f…1d30 at0015 = ╱ed╱(╱ // 0x1d24 @0x15
0x1d0f…1d30 at0016 = ╱45╱E╱ // 0x1d25 @0x16
0x1d0f…1d30 at0017 = ╱f0╱:╱ // 0x1d26 @0x17
0x1d0f…1d30 at0018 = ╱37╱7╱ // 0x1d27 @0x18
0x1d0f…1d30 at0019 = ╱31╱1╱ // 0x1d28 @0x19
0x1d0f…1d30 at001a = ╱fe00008e07╱ // 0x1d29 @0x1a
0x1d0f…1d30 at001f = ╱ee╱)╱ // 0x1d2e @0x1f
0x1d0f…1d30 at0020 = EOL // 0x1d2f @0x20
0x1d0f…1d30 }
0x1d30…1d5e aab5 3030 EXEC LINIEUD(GFNR1,GLNAVN1$,SALDO4$,SALDO14$)
0x1d30…1d5e LineComalBin {
0x1d30…1d5e ptr = 0xaab5 // 0x1d30 @0x0
0x1d30…1d5e lno = 0x0bd6 // 0x1d32 @0x2
0x1d30…1d5e at0004 = ╱9d╱ EXEC ╱ // 0x1d34 @0x4
0x1d30…1d5e at0005 = ╱4c╱L╱ // 0x1d35 @0x5
0x1d30…1d5e at0006 = ╱49╱I╱ // 0x1d36 @0x6
0x1d30…1d5e at0007 = ╱4e╱N╱ // 0x1d37 @0x7
0x1d30…1d5e at0008 = ╱49╱I╱ // 0x1d38 @0x8
0x1d30…1d5e at0009 = ╱45╱E╱ // 0x1d39 @0x9
0x1d30…1d5e at000a = ╱55╱U╱ // 0x1d3a @0xa
0x1d30…1d5e at000b = ╱44╱D╱ // 0x1d3b @0xb
0x1d30…1d5e at000c = ╱ed╱(╱ // 0x1d3c @0xc
0x1d30…1d5e at000d = ╱47╱G╱ // 0x1d3d @0xd
0x1d30…1d5e at000e = ╱46╱F╱ // 0x1d3e @0xe
0x1d30…1d5e at000f = ╱4e╱N╱ // 0x1d3f @0xf
0x1d30…1d5e at0010 = ╱52╱R╱ // 0x1d40 @0x10
0x1d30…1d5e at0011 = ╱31╱1╱ // 0x1d41 @0x11
0x1d30…1d5e at0012 = ╱ec╱,╱ // 0x1d42 @0x12
0x1d30…1d5e at0013 = ╱47╱G╱ // 0x1d43 @0x13
0x1d30…1d5e at0014 = ╱4c╱L╱ // 0x1d44 @0x14
0x1d30…1d5e at0015 = ╱4e╱N╱ // 0x1d45 @0x15
0x1d30…1d5e at0016 = ╱41╱A╱ // 0x1d46 @0x16
0x1d30…1d5e at0017 = ╱56╱V╱ // 0x1d47 @0x17
0x1d30…1d5e at0018 = ╱4e╱N╱ // 0x1d48 @0x18
0x1d30…1d5e at0019 = ╱31╱1╱ // 0x1d49 @0x19
0x1d30…1d5e at001a = ╱ef╱$╱ // 0x1d4a @0x1a
0x1d30…1d5e at001b = ╱ec╱,╱ // 0x1d4b @0x1b
0x1d30…1d5e at001c = ╱53╱S╱ // 0x1d4c @0x1c
0x1d30…1d5e at001d = ╱41╱A╱ // 0x1d4d @0x1d
0x1d30…1d5e at001e = ╱4c╱L╱ // 0x1d4e @0x1e
0x1d30…1d5e at001f = ╱44╱D╱ // 0x1d4f @0x1f
0x1d30…1d5e at0020 = ╱4f╱O╱ // 0x1d50 @0x20
0x1d30…1d5e at0021 = ╱34╱4╱ // 0x1d51 @0x21
0x1d30…1d5e at0022 = ╱ef╱$╱ // 0x1d52 @0x22
0x1d30…1d5e at0023 = ╱ec╱,╱ // 0x1d53 @0x23
0x1d30…1d5e at0024 = ╱53╱S╱ // 0x1d54 @0x24
0x1d30…1d5e at0025 = ╱41╱A╱ // 0x1d55 @0x25
0x1d30…1d5e at0026 = ╱4c╱L╱ // 0x1d56 @0x26
0x1d30…1d5e at0027 = ╱44╱D╱ // 0x1d57 @0x27
0x1d30…1d5e at0028 = ╱4f╱O╱ // 0x1d58 @0x28
0x1d30…1d5e at0029 = ╱31╱1╱ // 0x1d59 @0x29
0x1d30…1d5e at002a = ╱34╱4╱ // 0x1d5a @0x2a
0x1d30…1d5e at002b = ╱ef╱$╱ // 0x1d5b @0x2b
0x1d30…1d5e at002c = ╱ee╱)╱ // 0x1d5c @0x2c
0x1d30…1d5e at002d = EOL // 0x1d5d @0x2d
0x1d30…1d5e }
0x1d5e…1d70 aac7 3040 LINIE=LINIE+V
0x1d5e…1d70 LineComalBin {
0x1d5e…1d70 ptr = 0xaac7 // 0x1d5e @0x0
0x1d5e…1d70 lno = 0x0be0 // 0x1d60 @0x2
0x1d5e…1d70 at0004 = ╱4c╱L╱ // 0x1d62 @0x4
0x1d5e…1d70 at0005 = ╱49╱I╱ // 0x1d63 @0x5
0x1d5e…1d70 at0006 = ╱4e╱N╱ // 0x1d64 @0x6
0x1d5e…1d70 at0007 = ╱49╱I╱ // 0x1d65 @0x7
0x1d5e…1d70 at0008 = ╱45╱E╱ // 0x1d66 @0x8
0x1d5e…1d70 at0009 = ╱dc╱=╱ // 0x1d67 @0x9
0x1d5e…1d70 at000a = ╱4c╱L╱ // 0x1d68 @0xa
0x1d5e…1d70 at000b = ╱49╱I╱ // 0x1d69 @0xb
0x1d5e…1d70 at000c = ╱4e╱N╱ // 0x1d6a @0xc
0x1d5e…1d70 at000d = ╱49╱I╱ // 0x1d6b @0xd
0x1d5e…1d70 at000e = ╱45╱E╱ // 0x1d6c @0xe
0x1d5e…1d70 at000f = ╱e2╱+╱ // 0x1d6d @0xf
0x1d5e…1d70 at0010 = ╱56╱V╱ // 0x1d6e @0x10
0x1d5e…1d70 at0011 = EOL // 0x1d6f @0x11
0x1d5e…1d70 }
0x1d70…1d76 aacd 3050 ENDIF
0x1d70…1d76 LineComalBin {
0x1d70…1d76 ptr = 0xaacd // 0x1d70 @0x0
0x1d70…1d76 lno = 0x0bea // 0x1d72 @0x2
0x1d70…1d76 at0004 = ╱9b╱ ENDIF ╱ // 0x1d74 @0x4
0x1d70…1d76 at0005 = EOL // 0x1d75 @0x5
0x1d70…1d76 }
0x1d76…1da1 aaf8 3060 IF LINIE>36 THEN EXEC NYSIDE(GFNR1,GLNAVN1$)
0x1d76…1da1 LineComalBin {
0x1d76…1da1 ptr = 0xaaf8 // 0x1d76 @0x0
0x1d76…1da1 lno = 0x0bf4 // 0x1d78 @0x2
0x1d76…1da1 at0004 = ╱82╱ IF ╱ // 0x1d7a @0x4
0x1d76…1da1 at0005 = ╱4c╱L╱ // 0x1d7b @0x5
0x1d76…1da1 at0006 = ╱49╱I╱ // 0x1d7c @0x6
0x1d76…1da1 at0007 = ╱4e╱N╱ // 0x1d7d @0x7
0x1d76…1da1 at0008 = ╱49╱I╱ // 0x1d7e @0x8
0x1d76…1da1 at0009 = ╱45╱E╱ // 0x1d7f @0x9
0x1d76…1da1 at000a = ╱de╱>╱ // 0x1d80 @0xa
0x1d76…1da1 at000b = ╱33╱3╱ // 0x1d81 @0xb
0x1d76…1da1 at000c = ╱36╱6╱ // 0x1d82 @0xc
0x1d76…1da1 at000d = ╱fe00009006╱ // 0x1d83 @0xd
0x1d76…1da1 at0012 = ╱b6╱ THEN ╱ // 0x1d88 @0x12
0x1d76…1da1 at0013 = ╱9d╱ EXEC ╱ // 0x1d89 @0x13
0x1d76…1da1 at0014 = ╱4e╱N╱ // 0x1d8a @0x14
0x1d76…1da1 at0015 = ╱59╱Y╱ // 0x1d8b @0x15
0x1d76…1da1 at0016 = ╱53╱S╱ // 0x1d8c @0x16
0x1d76…1da1 at0017 = ╱49╱I╱ // 0x1d8d @0x17
0x1d76…1da1 at0018 = ╱44╱D╱ // 0x1d8e @0x18
0x1d76…1da1 at0019 = ╱45╱E╱ // 0x1d8f @0x19
0x1d76…1da1 at001a = ╱ed╱(╱ // 0x1d90 @0x1a
0x1d76…1da1 at001b = ╱47╱G╱ // 0x1d91 @0x1b
0x1d76…1da1 at001c = ╱46╱F╱ // 0x1d92 @0x1c
0x1d76…1da1 at001d = ╱4e╱N╱ // 0x1d93 @0x1d
0x1d76…1da1 at001e = ╱52╱R╱ // 0x1d94 @0x1e
0x1d76…1da1 at001f = ╱31╱1╱ // 0x1d95 @0x1f
0x1d76…1da1 at0020 = ╱ec╱,╱ // 0x1d96 @0x20
0x1d76…1da1 at0021 = ╱47╱G╱ // 0x1d97 @0x21
0x1d76…1da1 at0022 = ╱4c╱L╱ // 0x1d98 @0x22
0x1d76…1da1 at0023 = ╱4e╱N╱ // 0x1d99 @0x23
0x1d76…1da1 at0024 = ╱41╱A╱ // 0x1d9a @0x24
0x1d76…1da1 at0025 = ╱56╱V╱ // 0x1d9b @0x25
0x1d76…1da1 at0026 = ╱4e╱N╱ // 0x1d9c @0x26
0x1d76…1da1 at0027 = ╱31╱1╱ // 0x1d9d @0x27
0x1d76…1da1 at0028 = ╱ef╱$╱ // 0x1d9e @0x28
0x1d76…1da1 at0029 = ╱ee╱)╱ // 0x1d9f @0x29
0x1d76…1da1 at002a = EOL // 0x1da0 @0x2a
0x1d76…1da1 }
0x1da1…1dcb ab22 3070 GLNAVN$="Difference";GFNR=100000
0x1da1…1dcb LineComalBin {
0x1da1…1dcb ptr = 0xab22 // 0x1da1 @0x0
0x1da1…1dcb lno = 0x0bfe // 0x1da3 @0x2
0x1da1…1dcb at0004 = ╱47╱G╱ // 0x1da5 @0x4
0x1da1…1dcb at0005 = ╱4c╱L╱ // 0x1da6 @0x5
0x1da1…1dcb at0006 = ╱4e╱N╱ // 0x1da7 @0x6
0x1da1…1dcb at0007 = ╱41╱A╱ // 0x1da8 @0x7
0x1da1…1dcb at0008 = ╱56╱V╱ // 0x1da9 @0x8
0x1da1…1dcb at0009 = ╱4e╱N╱ // 0x1daa @0x9
0x1da1…1dcb at000a = ╱ef╱$╱ // 0x1dab @0xa
0x1da1…1dcb at000b = ╱dc╱=╱ // 0x1dac @0xb
0x1da1…1dcb at000c = ╱22╱"╱ // 0x1dad @0xc
0x1da1…1dcb at000d = ╱44╱D╱ // 0x1dae @0xd
0x1da1…1dcb at000e = ╱69╱i╱ // 0x1daf @0xe
0x1da1…1dcb at000f = ╱66╱f╱ // 0x1db0 @0xf
0x1da1…1dcb at0010 = ╱66╱f╱ // 0x1db1 @0x10
0x1da1…1dcb at0011 = ╱65╱e╱ // 0x1db2 @0x11
0x1da1…1dcb at0012 = ╱72╱r╱ // 0x1db3 @0x12
0x1da1…1dcb at0013 = ╱65╱e╱ // 0x1db4 @0x13
0x1da1…1dcb at0014 = ╱6e╱n╱ // 0x1db5 @0x14
0x1da1…1dcb at0015 = ╱63╱c╱ // 0x1db6 @0x15
0x1da1…1dcb at0016 = ╱65╱e╱ // 0x1db7 @0x16
0x1da1…1dcb at0017 = ╱22╱"╱ // 0x1db8 @0x17
0x1da1…1dcb at0018 = ╱eb╱;╱ // 0x1db9 @0x18
0x1da1…1dcb at0019 = ╱47╱G╱ // 0x1dba @0x19
0x1da1…1dcb at001a = ╱46╱F╱ // 0x1dbb @0x1a
0x1da1…1dcb at001b = ╱4e╱N╱ // 0x1dbc @0x1b
0x1da1…1dcb at001c = ╱52╱R╱ // 0x1dbd @0x1c
0x1da1…1dcb at001d = ╱dc╱=╱ // 0x1dbe @0x1d
0x1da1…1dcb at001e = ╱31╱1╱ // 0x1dbf @0x1e
0x1da1…1dcb at001f = ╱30╱0╱ // 0x1dc0 @0x1f
0x1da1…1dcb at0020 = ╱30╱0╱ // 0x1dc1 @0x20
0x1da1…1dcb at0021 = ╱30╱0╱ // 0x1dc2 @0x21
0x1da1…1dcb at0022 = ╱30╱0╱ // 0x1dc3 @0x22
0x1da1…1dcb at0023 = ╱30╱0╱ // 0x1dc4 @0x23
0x1da1…1dcb at0024 = ╱fe0050c311╱ // 0x1dc5 @0x24
0x1da1…1dcb at0029 = EOL // 0x1dca @0x29
0x1da1…1dcb }
0x1dcb…1dd4 ab2b 3080 PRINT " "
0x1dcb…1dd4 LineComalBin {
0x1dcb…1dd4 ptr = 0xab2b // 0x1dcb @0x0
0x1dcb…1dd4 lno = 0x0c08 // 0x1dcd @0x2
0x1dcb…1dd4 at0004 = ╱92╱ PRINT ╱ // 0x1dcf @0x4
0x1dcb…1dd4 at0005 = ╱22╱"╱ // 0x1dd0 @0x5
0x1dcb…1dd4 at0006 = ╱20╱…╱ // 0x1dd1 @0x6
0x1dcb…1dd4 at0007 = ╱22╱"╱ // 0x1dd2 @0x7
0x1dcb…1dd4 at0008 = EOL // 0x1dd3 @0x8
0x1dcb…1dd4 }
0x1dd4…1df5 ab4c 3090 PRINT TAB(8);STREG$(E:71)
0x1dd4…1df5 LineComalBin {
0x1dd4…1df5 ptr = 0xab4c // 0x1dd4 @0x0
0x1dd4…1df5 lno = 0x0c12 // 0x1dd6 @0x2
0x1dd4…1df5 at0004 = ╱92╱ PRINT ╱ // 0x1dd8 @0x4
0x1dd4…1df5 at0005 = ╱d2╱TAB╱ // 0x1dd9 @0x5
0x1dd4…1df5 at0006 = ╱ed╱(╱ // 0x1dda @0x6
0x1dd4…1df5 at0007 = ╱38╱8╱ // 0x1ddb @0x7
0x1dd4…1df5 at0008 = ╱fe00008004╱ // 0x1ddc @0x8
0x1dd4…1df5 at000d = ╱ee╱)╱ // 0x1de1 @0xd
0x1dd4…1df5 at000e = ╱eb╱;╱ // 0x1de2 @0xe
0x1dd4…1df5 at000f = ╱53╱S╱ // 0x1de3 @0xf
0x1dd4…1df5 at0010 = ╱54╱T╱ // 0x1de4 @0x10
0x1dd4…1df5 at0011 = ╱52╱R╱ // 0x1de5 @0x11
0x1dd4…1df5 at0012 = ╱45╱E╱ // 0x1de6 @0x12
0x1dd4…1df5 at0013 = ╱47╱G╱ // 0x1de7 @0x13
0x1dd4…1df5 at0014 = ╱ef╱$╱ // 0x1de8 @0x14
0x1dd4…1df5 at0015 = ╱ed╱(╱ // 0x1de9 @0x15
0x1dd4…1df5 at0016 = ╱45╱E╱ // 0x1dea @0x16
0x1dd4…1df5 at0017 = ╱f0╱:╱ // 0x1deb @0x17
0x1dd4…1df5 at0018 = ╱37╱7╱ // 0x1dec @0x18
0x1dd4…1df5 at0019 = ╱31╱1╱ // 0x1ded @0x19
0x1dd4…1df5 at001a = ╱fe00008e07╱ // 0x1dee @0x1a
0x1dd4…1df5 at001f = ╱ee╱)╱ // 0x1df3 @0x1f
0x1dd4…1df5 at0020 = EOL // 0x1df4 @0x20
0x1dd4…1df5 }
0x1df5…1e21 ab78 3100 EXEC LINIEUD(GFNR,GLNAVN$,SALDO3$,SALDO13$)
0x1df5…1e21 LineComalBin {
0x1df5…1e21 ptr = 0xab78 // 0x1df5 @0x0
0x1df5…1e21 lno = 0x0c1c // 0x1df7 @0x2
0x1df5…1e21 at0004 = ╱9d╱ EXEC ╱ // 0x1df9 @0x4
0x1df5…1e21 at0005 = ╱4c╱L╱ // 0x1dfa @0x5
0x1df5…1e21 at0006 = ╱49╱I╱ // 0x1dfb @0x6
0x1df5…1e21 at0007 = ╱4e╱N╱ // 0x1dfc @0x7
0x1df5…1e21 at0008 = ╱49╱I╱ // 0x1dfd @0x8
0x1df5…1e21 at0009 = ╱45╱E╱ // 0x1dfe @0x9
0x1df5…1e21 at000a = ╱55╱U╱ // 0x1dff @0xa
0x1df5…1e21 at000b = ╱44╱D╱ // 0x1e00 @0xb
0x1df5…1e21 at000c = ╱ed╱(╱ // 0x1e01 @0xc
0x1df5…1e21 at000d = ╱47╱G╱ // 0x1e02 @0xd
0x1df5…1e21 at000e = ╱46╱F╱ // 0x1e03 @0xe
0x1df5…1e21 at000f = ╱4e╱N╱ // 0x1e04 @0xf
0x1df5…1e21 at0010 = ╱52╱R╱ // 0x1e05 @0x10
0x1df5…1e21 at0011 = ╱ec╱,╱ // 0x1e06 @0x11
0x1df5…1e21 at0012 = ╱47╱G╱ // 0x1e07 @0x12
0x1df5…1e21 at0013 = ╱4c╱L╱ // 0x1e08 @0x13
0x1df5…1e21 at0014 = ╱4e╱N╱ // 0x1e09 @0x14
0x1df5…1e21 at0015 = ╱41╱A╱ // 0x1e0a @0x15
0x1df5…1e21 at0016 = ╱56╱V╱ // 0x1e0b @0x16
0x1df5…1e21 at0017 = ╱4e╱N╱ // 0x1e0c @0x17
0x1df5…1e21 at0018 = ╱ef╱$╱ // 0x1e0d @0x18
0x1df5…1e21 at0019 = ╱ec╱,╱ // 0x1e0e @0x19
0x1df5…1e21 at001a = ╱53╱S╱ // 0x1e0f @0x1a
0x1df5…1e21 at001b = ╱41╱A╱ // 0x1e10 @0x1b
0x1df5…1e21 at001c = ╱4c╱L╱ // 0x1e11 @0x1c
0x1df5…1e21 at001d = ╱44╱D╱ // 0x1e12 @0x1d
0x1df5…1e21 at001e = ╱4f╱O╱ // 0x1e13 @0x1e
0x1df5…1e21 at001f = ╱33╱3╱ // 0x1e14 @0x1f
0x1df5…1e21 at0020 = ╱ef╱$╱ // 0x1e15 @0x20
0x1df5…1e21 at0021 = ╱ec╱,╱ // 0x1e16 @0x21
0x1df5…1e21 at0022 = ╱53╱S╱ // 0x1e17 @0x22
0x1df5…1e21 at0023 = ╱41╱A╱ // 0x1e18 @0x23
0x1df5…1e21 at0024 = ╱4c╱L╱ // 0x1e19 @0x24
0x1df5…1e21 at0025 = ╱44╱D╱ // 0x1e1a @0x25
0x1df5…1e21 at0026 = ╱4f╱O╱ // 0x1e1b @0x26
0x1df5…1e21 at0027 = ╱31╱1╱ // 0x1e1c @0x27
0x1df5…1e21 at0028 = ╱33╱3╱ // 0x1e1d @0x28
0x1df5…1e21 at0029 = ╱ef╱$╱ // 0x1e1e @0x29
0x1df5…1e21 at002a = ╱ee╱)╱ // 0x1e1f @0x2a
0x1df5…1e21 at002b = EOL // 0x1e20 @0x2b
0x1df5…1e21 }
0x1e21…1e42 ab99 3110 PRINT TAB(8);STREG$(E:71)
0x1e21…1e42 LineComalBin {
0x1e21…1e42 ptr = 0xab99 // 0x1e21 @0x0
0x1e21…1e42 lno = 0x0c26 // 0x1e23 @0x2
0x1e21…1e42 at0004 = ╱92╱ PRINT ╱ // 0x1e25 @0x4
0x1e21…1e42 at0005 = ╱d2╱TAB╱ // 0x1e26 @0x5
0x1e21…1e42 at0006 = ╱ed╱(╱ // 0x1e27 @0x6
0x1e21…1e42 at0007 = ╱38╱8╱ // 0x1e28 @0x7
0x1e21…1e42 at0008 = ╱fe00008004╱ // 0x1e29 @0x8
0x1e21…1e42 at000d = ╱ee╱)╱ // 0x1e2e @0xd
0x1e21…1e42 at000e = ╱eb╱;╱ // 0x1e2f @0xe
0x1e21…1e42 at000f = ╱53╱S╱ // 0x1e30 @0xf
0x1e21…1e42 at0010 = ╱54╱T╱ // 0x1e31 @0x10
0x1e21…1e42 at0011 = ╱52╱R╱ // 0x1e32 @0x11
0x1e21…1e42 at0012 = ╱45╱E╱ // 0x1e33 @0x12
0x1e21…1e42 at0013 = ╱47╱G╱ // 0x1e34 @0x13
0x1e21…1e42 at0014 = ╱ef╱$╱ // 0x1e35 @0x14
0x1e21…1e42 at0015 = ╱ed╱(╱ // 0x1e36 @0x15
0x1e21…1e42 at0016 = ╱45╱E╱ // 0x1e37 @0x16
0x1e21…1e42 at0017 = ╱f0╱:╱ // 0x1e38 @0x17
0x1e21…1e42 at0018 = ╱37╱7╱ // 0x1e39 @0x18
0x1e21…1e42 at0019 = ╱31╱1╱ // 0x1e3a @0x19
0x1e21…1e42 at001a = ╱fe00008e07╱ // 0x1e3b @0x1a
0x1e21…1e42 at001f = ╱ee╱)╱ // 0x1e40 @0x1f
0x1e21…1e42 at0020 = EOL // 0x1e41 @0x20
0x1e21…1e42 }
0x1e42…1e5b abb2 3120 FOR LINIE=LINIE TO 37
0x1e42…1e5b LineComalBin {
0x1e42…1e5b ptr = 0xabb2 // 0x1e42 @0x0
0x1e42…1e5b lno = 0x0c30 // 0x1e44 @0x2
0x1e42…1e5b at0004 = ╱83╱ FOR ╱ // 0x1e46 @0x4
0x1e42…1e5b at0005 = ╱4c╱L╱ // 0x1e47 @0x5
0x1e42…1e5b at0006 = ╱49╱I╱ // 0x1e48 @0x6
0x1e42…1e5b at0007 = ╱4e╱N╱ // 0x1e49 @0x7
0x1e42…1e5b at0008 = ╱49╱I╱ // 0x1e4a @0x8
0x1e42…1e5b at0009 = ╱45╱E╱ // 0x1e4b @0x9
0x1e42…1e5b at000a = ╱dc╱=╱ // 0x1e4c @0xa
0x1e42…1e5b at000b = ╱4c╱L╱ // 0x1e4d @0xb
0x1e42…1e5b at000c = ╱49╱I╱ // 0x1e4e @0xc
0x1e42…1e5b at000d = ╱4e╱N╱ // 0x1e4f @0xd
0x1e42…1e5b at000e = ╱49╱I╱ // 0x1e50 @0xe
0x1e42…1e5b at000f = ╱45╱E╱ // 0x1e51 @0xf
0x1e42…1e5b at0010 = ╱b7╱ TO ╱ // 0x1e52 @0x10
0x1e42…1e5b at0011 = ╱33╱3╱ // 0x1e53 @0x11
0x1e42…1e5b at0012 = ╱37╱7╱ // 0x1e54 @0x12
0x1e42…1e5b at0013 = ╱fe00009406╱ // 0x1e55 @0x13
0x1e42…1e5b at0018 = EOL // 0x1e5a @0x18
0x1e42…1e5b }
0x1e5b…1e64 abbb 3130 PRINT " "
0x1e5b…1e64 LineComalBin {
0x1e5b…1e64 ptr = 0xabbb // 0x1e5b @0x0
0x1e5b…1e64 lno = 0x0c3a // 0x1e5d @0x2
0x1e5b…1e64 at0004 = ╱92╱ PRINT ╱ // 0x1e5f @0x4
0x1e5b…1e64 at0005 = ╱22╱"╱ // 0x1e60 @0x5
0x1e5b…1e64 at0006 = ╱20╱…╱ // 0x1e61 @0x6
0x1e5b…1e64 at0007 = ╱22╱"╱ // 0x1e62 @0x7
0x1e5b…1e64 at0008 = EOL // 0x1e63 @0x8
0x1e5b…1e64 }
0x1e64…1e6f abc6 3140 NEXT LINIE
0x1e64…1e6f LineComalBin {
0x1e64…1e6f ptr = 0xabc6 // 0x1e64 @0x0
0x1e64…1e6f lno = 0x0c44 // 0x1e66 @0x2
0x1e64…1e6f at0004 = ╱84╱ NEXT ╱ // 0x1e68 @0x4
0x1e64…1e6f at0005 = ╱4c╱L╱ // 0x1e69 @0x5
0x1e64…1e6f at0006 = ╱49╱I╱ // 0x1e6a @0x6
0x1e64…1e6f at0007 = ╱4e╱N╱ // 0x1e6b @0x7
0x1e64…1e6f at0008 = ╱49╱I╱ // 0x1e6c @0x8
0x1e64…1e6f at0009 = ╱45╱E╱ // 0x1e6d @0x9
0x1e64…1e6f at000a = EOL // 0x1e6e @0xa
0x1e64…1e6f }
0x1e6f…1e78 abcf 3150 PRINT " "
0x1e6f…1e78 LineComalBin {
0x1e6f…1e78 ptr = 0xabcf // 0x1e6f @0x0
0x1e6f…1e78 lno = 0x0c4e // 0x1e71 @0x2
0x1e6f…1e78 at0004 = ╱92╱ PRINT ╱ // 0x1e73 @0x4
0x1e6f…1e78 at0005 = ╱22╱"╱ // 0x1e74 @0x5
0x1e6f…1e78 at0006 = ╱20╱…╱ // 0x1e75 @0x6
0x1e6f…1e78 at0007 = ╱22╱"╱ // 0x1e76 @0x7
0x1e6f…1e78 at0008 = EOL // 0x1e77 @0x8
0x1e6f…1e78 }
0x1e78…1e85 abdc 3160 UNTIL TOTAL=B
0x1e78…1e85 LineComalBin {
0x1e78…1e85 ptr = 0xabdc // 0x1e78 @0x0
0x1e78…1e85 lno = 0x0c58 // 0x1e7a @0x2
0x1e78…1e85 at0004 = ╱98╱ UNTIL ╱ // 0x1e7c @0x4
0x1e78…1e85 at0005 = ╱54╱T╱ // 0x1e7d @0x5
0x1e78…1e85 at0006 = ╱4f╱O╱ // 0x1e7e @0x6
0x1e78…1e85 at0007 = ╱54╱T╱ // 0x1e7f @0x7
0x1e78…1e85 at0008 = ╱41╱A╱ // 0x1e80 @0x8
0x1e78…1e85 at0009 = ╱4c╱L╱ // 0x1e81 @0x9
0x1e78…1e85 at000a = ╱dc╱=╱ // 0x1e82 @0xa
0x1e78…1e85 at000b = ╱42╱B╱ // 0x1e83 @0xb
0x1e78…1e85 at000c = EOL // 0x1e84 @0xc
0x1e78…1e85 }
0x1e85…1e8c abe3 3170 OUTPUT T
0x1e85…1e8c LineComalBin {
0x1e85…1e8c ptr = 0xabe3 // 0x1e85 @0x0
0x1e85…1e8c lno = 0x0c62 // 0x1e87 @0x2
0x1e85…1e8c at0004 = ╱a5╱ OUTPUT ╱ // 0x1e89 @0x4
0x1e85…1e8c at0005 = ╱54╱T╱ // 0x1e8a @0x5
0x1e85…1e8c at0006 = EOL // 0x1e8b @0x6
0x1e85…1e8c }
0x1e8c…1ea3 0000 3180 CHAIN "P641210:OPSTART"
0x1e8c…1ea3 LineComalBin {
0x1e8c…1ea3 ptr = 0x0000 // 0x1e8c @0x0
0x1e8c…1ea3 lno = 0x0c6c // 0x1e8e @0x2
0x1e8c…1ea3 at0004 = ╱ac╱ CHAIN ╱ // 0x1e90 @0x4
0x1e8c…1ea3 at0005 = ╱22╱"╱ // 0x1e91 @0x5
0x1e8c…1ea3 at0006 = ╱50╱P╱ // 0x1e92 @0x6
0x1e8c…1ea3 at0007 = ╱36╱6╱ // 0x1e93 @0x7
0x1e8c…1ea3 at0008 = ╱34╱4╱ // 0x1e94 @0x8
0x1e8c…1ea3 at0009 = ╱31╱1╱ // 0x1e95 @0x9
0x1e8c…1ea3 at000a = ╱32╱2╱ // 0x1e96 @0xa
0x1e8c…1ea3 at000b = ╱31╱1╱ // 0x1e97 @0xb
0x1e8c…1ea3 at000c = ╱30╱0╱ // 0x1e98 @0xc
0x1e8c…1ea3 at000d = ╱3a╱:╱ // 0x1e99 @0xd
0x1e8c…1ea3 at000e = ╱4f╱O╱ // 0x1e9a @0xe
0x1e8c…1ea3 at000f = ╱50╱P╱ // 0x1e9b @0xf
0x1e8c…1ea3 at0010 = ╱53╱S╱ // 0x1e9c @0x10
0x1e8c…1ea3 at0011 = ╱54╱T╱ // 0x1e9d @0x11
0x1e8c…1ea3 at0012 = ╱41╱A╱ // 0x1e9e @0x12
0x1e8c…1ea3 at0013 = ╱52╱R╱ // 0x1e9f @0x13
0x1e8c…1ea3 at0014 = ╱54╱T╱ // 0x1ea0 @0x14
0x1e8c…1ea3 at0015 = ╱22╱"╱ // 0x1ea1 @0x15
0x1e8c…1ea3 at0016 = EOL // 0x1ea2 @0x16
0x1e8c…1ea3 }
0x1ea3…1eae 64 8d 5f 00 42 dc 30 fe 00 00 00 ┆d _ B 0 ┆
0x1eae…1ece (102,) 00 eb 45 dc 31 fe 00 00 80 01 eb 47 dc 32 fe 00 00 80 02 eb 56 dc 33 fe 00 00 c0 02 eb 57 dc 39 ┆ E 1 G 2 V 3 W 9┆
0x1ece…1ed4 fe 00 00 90 04 ff ┆ ┆
0x1ed4…1eda (103,) 57 8d 57 8d 10 00 ┆W W ┆