|
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: 9016 (0x2338)
Types: SPC/1-COMAL-BIN
Notes: Mikados_B
Names: »ENTBAL.B«
└─⟦385f097a1⟧ Bits:30008988 SPC/1 COMAL programmer til bogføring
└─⟦this⟧ »ENTBAL.B«
└─⟦ff7f7aeee⟧ Bits:30009007 NBT 15/3-84
└─⟦this⟧ »ENTBAL.B«
0100 REM BALANCE 0110 DIM RES$(15),OP1$(12),OP2$(12),N$(6),K1$(17),A$(6),TAL4$(12),BLANK$(25) 0120 DIM UBELØB1$(14),UBELØB2$(14),STREG$(71),FÅDK$(12),FMDK$(12),GLNAVN$(25) 0130 DIM DAT$(8),FNAVN$(25) 0140 DIM ENAVN$(29),SALDO13$(12),SALDO3$(12) 0150 DIM SALDO2$(12),SALDO11$(12),SALDO1$(12),SALDO12$(12),SALDO14$(12) 0160 DIM K2$(17),K3$(17),K4$(17),K5$(17),T1(W),LAND$(W,12),DV$(10) 0170 DIM GLNAVN1$(25),SALDO4$(12),EMREG$(12),EÅREG$(12) 0180 PROC CALC(ART,B1,B2,ES) 0190 OP1$=B1$;OP2$=B2$;RES$=ES$;SI=B;FLAG=B 0200 CALL "P641210:REGN" 0210 ES$=RES$ 0220 IF FLAG<>B THEN STOP 0230 ENDPROC 0240 PROC DATOUD(DA1,DA2) 0250 DA3=DA1 0260 DA2$=" " 0270 FOR J=8 TO E STEP -E 0280 IF J MOD V=B THEN 0290 DA2$(J)="." 0300 ELSE 0310 DA2$(J)=CHR(DA3 MOD 10+48) 0320 DA3=DA3 DIV 10 0330 ENDIF 0340 NEXT J 0350 ENDPROC 0360 PROC INDTAB(T,MANTAL,L10) 0370 J=MANTAL DIV 32+E 0380 FOR I=J TO MANTAL DIV 4+J-E 0390 H=(I-J)*4+E;H1=H+E;H2=H+G;H3=H+V 0400 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) 0410 EXEC FEJL(E,E,L10$) 0420 NEXT I 0430 ENDPROC 0440 PROC FINDPOST(TAB1,MANT1,NØGL1,PIL3) 0450 PIL1=MANT1 DIV G;PIL3=PIL1;CEKS=E 0460 REPEAT 0470 IF NØGL1=TAB1(PIL3,E) OR PIL1=E THEN EXIT 0480 PIL1=(PIL1+E) DIV G;PIL3=PIL3+PIL1*(E-G*(NØGL1<TAB1(PIL3,E))) 0490 IF PIL3<E THEN PIL3=E 0500 IF PIL3>MANT1 THEN PIL3=MANT1 0510 UNTIL PIL1=B 0520 IF NØGL1>TAB1(PIL3,E) THEN PIL3=PIL3+E*(PIL3<MANT1) 0530 IF NØGL1=TAB1(PIL3,E) THEN CEKS=B 0540 ENDPROC 0550 PROC NRTEST(NUM1) 0560 P,TEST2,KTAL=B;L=LEN(NUM1$) 0570 CASE L OF 0580 FOR I=E TO L 0590 P1=INT(ORD(NUM1$(I))-48) 0600 IF P1=>B AND P1<=W THEN 0610 P=P*10+P1 0620 ELSE 0630 TEST2=E 0640 ENDIF 0650 NEXT I 0660 KTAL=P DIV 10000;KTAL9=P DIV 1000 0670 IF KTAL9=KRTAL THEN KTAL=KRTAL 0680 WHEN B 0690 P=-E 0700 WHEN E 0710 CASE NUM1$ OF 0720 P=INT(ORD(NUM1$)-48) 0730 WHEN "j","J" 0740 P=-7 0750 WHEN "n","N" 0760 P=-8 0770 ENDCASE 0780 ENDCASE 0790 ENDPROC 0800 PROC FEJL(NR1,NR2,NR3) 0810 IF STATUS(NR3$)<>B THEN 0820 PRINT STATUS(NR3$),NR1,NR2,NR3$ 0830 STOP 0840 ENDIF 0850 ENDPROC 0860 PROC TUD(BLB1,UBLB1,TEGN,STØR) 0870 EXEC CALC(5,BLB1$,TAL4$,UBLB1$) 0880 IF TEGN=B THEN 0890 UBLB1$=UBLB1$(E:13) 0900 ELSE 0910 IF TEGN=E AND UBLB1$(LEN(UBLB1$))="+" THEN 0920 UBLB1$(LEN(UBLB1$))=" " 0930 ENDIF 0940 ENDIF 0950 IF STØR=E THEN 0960 UBLB1$=UBLB1$(4:LEN(UBLB1$)-V) 0970 ENDIF 0980 ENDPROC 0990 PROC HOVEDUD(UDATO,USIDE) 1000 EXEC DATOUD(UDATO,DAT$) 1010 PRINT TAB(67);DV$;" " 1020 PRINT TAB(10);CHR(14);"Entreprisebalance";CHR(15);TAB(34);"Dato: ";DAT$; 1030 PRINT USING " Side :###":USIDE 1040 PRINT " " 1050 PRINT USING " Entreprise: ####### ":ENR; 1060 PRINT ENAVN$ 1070 PRINT " " 1080 PRINT TAB(40);"Månedens";TAB(66);"Årets" 1090 PRINT TAB(V);"Nr Kontonavn";TAB(35);"Debet Kredit Debet"; 1100 PRINT " Kredit" 1110 PRINT TAB(8);STREG$ 1120 ENDPROC 1130 PROC LINIEUD(NR4,NAVN1,SAL1,SAL2) 1140 PRINT USING "###### ":NR4; 1150 EXEC TUD(SAL1$,UBELØB1$,B,B) 1160 EXEC TUD(SAL2$,UBELØB2$,B,B) 1170 PRINT NAVN1$;TAB(33+10*(SAL1$(LEN(SAL1$))="-"));UBELØB1$(G:12); 1180 PRINT TAB(56+11*(SAL2$(LEN(SAL2$))="-"));UBELØB2$(G:12) 1190 ENDPROC 1200 PROC NYSIDE(GFNR9,GLNAVN9) 1210 FOR LINIE=LINIE TO 41 1220 PRINT CHR(10); 1230 NEXT LINIE 1240 PRINT " " 1250 BSIDE=BSIDE+E 1260 EXEC HOVEDUD(T1(7),BSIDE) 1270 PRINT " " 1280 IF GFNR9>B THEN 1290 PRINT USING "###### ":GFNR9; 1300 EXEC CALC(4,SALDO12$,TAL4$,TAL4$) 1310 IF SI<>B THEN 1320 PRINT GLNAVN9$;" Fortsat" 1330 ELSE 1340 PRINT GLNAVN9$ 1350 ENDIF 1360 PRINT TAB(8);STREG$(E:25+7*(SI<>B)) 1370 LINIE=7 1380 ELSE 1390 LINIE=5 1400 ENDIF 1410 PRINT " " 1420 ENDPROC 1430 K1$="P641220:SYSTEM1" 1440 OPEN K1$,R 1450 EXEC FEJL(W,E,K1$) 1460 GET K1$,W:KRTAL,VTAL,MEANTAL,MUNKANT 1470 EXEC FEJL(W,6,K1$) 1480 GET K1$,10:N$ 1490 EXEC FEJL(W,7,K1$) 1500 GET K1$,38:K2$ 1510 EXEC FEJL(W,8,K1$) 1520 GET K1$,37:K3$ 1530 EXEC FEJL(W,W,K1$) 1540 GET K1$,36:K4$ 1550 EXEC FEJL(W,10,K1$) 1560 GET K1$,39:K5$ 1570 EXEC FEJL(99,8,K1$) 1580 GET K1$,43:METOT 1590 EXEC FEJL(99,W,K1$) 1600 CLOSE K1$ 1610 EXEC FEJL(W,11,K1$) 1620 K2$=N$+K2$;K3$=N$+K3$;K5$=N$+K5$ 1630 K4$=N$+K4$ 1640 DIM ETAB(MEANTAL,G),UNR(METOT+MUNKANT),EU$(METOT+MUNKANT) 1650 DIM MBEV$(MUNKANT,12),ÅBEV$(MUNKANT,12),UNAVN$(METOT+MUNKANT,25) 1660 OPEN K4$,R 1670 EXEC FEJL(W,12,K4$) 1680 GET K4$,G:T1(E),T1(G),T1(V),T1(4),T1(5),T1(6),T1(7),T1(8),T1(W) 1690 EXEC FEJL(W,13,K4$) 1700 GET K4$,20:DV$ 1710 EXEC FEJL(W,30,K4$) 1720 GET K4$,21:AENT,AUNK,ETOT 1730 EXEC FEJL(W,31,K4$) 1740 CLOSE K4$ 1750 EXEC FEJL(W,15,K4$) 1760 OPEN K2$,R 1770 EXEC FEJL(W,16,K2$) 1780 OPEN K3$,R 1790 EXEC FEJL(W,17,K3$) 1800 OPEN K5$,R 1810 EXEC FEJL(99,11,K5$) 1820 FOR X=E TO METOT+MUNKANT 1830 GET K5$,X:UNR(X),EU$(X),UNAVN$(X) 1840 EXEC FEJL(99,12,K5$) 1850 NEXT X 1860 CLOSE K5$ 1870 EXEC INDTAB(ETAB,MEANTAL,K2$) 1880 BLANK$=" " 1890 STREG$="------------------------------------";STREG$=STREG$+STREG$ 1900 REPEAT 1910 OUTPUT T 1920 CLEAR 1930 CURSOR 15,7 1940 PRINT "Entreprisebalancer" 1950 REPEAT 1960 REPEAT 1970 CURSOR 15,13 1980 PRINT "Fra entreprisenr (0:Alle)" 1990 CURSOR 32,13 2000 INPUT A$ 2010 EXEC NRTEST(A$) 2020 UNTIL ((P>99 AND P<1000) OR P=B) AND TEST2=B 2030 IF P=B THEN 2040 FRA=E;TIL=AENT 2050 ELSE 2060 KONT=P 2070 EXEC FINDPOST(ETAB,MEANTAL,P,EPIL3) 2080 IF ETAB(EPIL3,E)<KONT THEN EPIL3=EPIL3+E 2090 FRA=EPIL3 2100 ENDIF 2110 UNTIL FRA<=AENT 2120 IF P>B THEN 2130 REPEAT 2140 CURSOR 15,15 2150 PRINT "Til entreprisenr " 2160 CURSOR 32,15 2170 INPUT A$ 2180 EXEC NRTEST(A$) 2190 UNTIL P>99 AND P<1000 AND P=>KONT AND TEST2=B 2200 EXEC FINDPOST(ETAB,MEANTAL,P,EPIL3) 2210 IF ETAB(EPIL3,E)>P THEN EPIL3=EPIL3-E 2220 TIL=EPIL3 2230 ENDIF 2240 CLEAR 2250 REPEAT 2260 CURSOR 15,13 2270 INPUT "Monter papir til udskrift af balance og tast RETURN",A$ 2280 UNTIL ORD(A$)=255 2285 OUTPUT P 2290 FOR EPIL3=FRA TO TIL 2300 S1=ETAB(EPIL3,G) 2310 GET K3$,S1:ENR,EMREG$,EÅREG$ 2320 EXEC FEJL(99,E,K3$) 2330 GET K3$,S1+E:ENAVN$ 2340 EXEC FEJL(99,G,K3$) 2350 FOR X=E TO MUNKANT 2360 GET K3$,S1+X+E:NR9,MBEV$(X),ÅBEV$(X) 2370 EXEC FEJL(99,V,K3$) 2380 NEXT X 2390 BSIDE=E;GLNAVN$=BLANK$;LINIE=V;SALDO1$="0+";SALDO2$="0+";SALDO3$="0+" 2400 SALDO3$="0+";SALDO11$="0+";SALDO12$="0+";SALDO13$="0+";TAL4$="0+";GFNR=B 2410 SALDO4$="0+";SALDO14$="0+";GFNR1=B;GLNAVN1$=BLANK$;EPIL2=E 2430 EXEC HOVEDUD(T1(7),BSIDE) 2440 FOR EPIL1=E TO ETOT+AUNK+E 2450 IF EPIL1<ETOT+AUNK+E THEN 2460 FNR=UNR(EPIL1);FGRUP=INT(ORD(EU$(EPIL1)))-48;FNAVN$=UNAVN$(EPIL1) 2470 IF FGRUP=B THEN FMDK$=MBEV$(EPIL2);FÅDK$=ÅBEV$(EPIL2);EPIL2=EPIL2+E 2480 ELSE 2490 FNR=99;FGRUP=B;FMDK$=EMREG$;FÅDK$=EÅREG$;FNAVN$="Regulering" 2500 ENDIF 2510 CASE FGRUP OF 2520 STOP 2530 WHEN B 2540 IF LINIE>39 THEN EXEC NYSIDE(GFNR,GLNAVN$) 2550 EXEC LINIEUD(FNR,FNAVN$,FMDK$,FÅDK$) 2560 LINIE=LINIE+E 2570 EXEC CALC(B,SALDO1$,FMDK$,SALDO1$) 2580 EXEC CALC(B,SALDO11$,FÅDK$,SALDO11$) 2590 EXEC CALC(B,SALDO2$,FMDK$,SALDO2$) 2600 EXEC CALC(B,SALDO12$,FÅDK$,SALDO12$) 2610 EXEC CALC(B,SALDO3$,FMDK$,SALDO3$) 2620 EXEC CALC(B,SALDO13$,FÅDK$,SALDO13$) 2630 EXEC CALC(B,SALDO4$,FMDK$,SALDO4$) 2640 EXEC CALC(B,SALDO14$,FÅDK$,SALDO14$) 2650 WHEN E 2660 IF LINIE>39 THEN EXEC NYSIDE(GFNR,GLNAVN$) 2670 EXEC LINIEUD(FNR,FNAVN$,SALDO1$,SALDO11$) 2680 SALDO1$="0+";SALDO11$="0+" 2690 PRINT " " 2700 LINIE=LINIE+G 2710 WHEN G 2720 IF GFNR>B THEN 2730 IF LINIE>37 THEN EXEC NYSIDE(GFNR,GLNAVN$) 2740 PRINT " " 2750 PRINT TAB(8);STREG$(E:71) 2760 EXEC LINIEUD(GFNR,GLNAVN$,SALDO2$,SALDO12$) 2770 LINIE=LINIE+V 2780 ENDIF 2790 SALDO2$="0+";SALDO12$="0+" 2800 SALDO1$="0+";SALDO11$="0+" 2810 GLNAVN$=FNAVN$;GFNR=FNR 2820 IF LINIE>34 THEN 2830 EXEC NYSIDE(GFNR,GLNAVN$) 2840 ELSE 2850 PRINT CHR(10) 2860 PRINT CHR(10) 2870 PRINT USING "###### ":FNR; 2880 PRINT GLNAVN$ 2890 PRINT TAB(8);STREG$(E:LEN(GLNAVN$)) 2900 PRINT " " 2910 LINIE=LINIE+5 2920 ENDIF 2930 WHEN V 2940 IF LINIE>37 AND GFNR>B THEN EXEC NYSIDE(GFNR,GLNAVN$) 2950 IF GFNR>B THEN 2960 PRINT " " 2970 PRINT TAB(8);STREG$(E:71) 2980 EXEC LINIEUD(GFNR,GLNAVN$,SALDO2$,SALDO12$) 2990 SALDO2$="0+";SALDO12$="0+";LINIE=LINIE+V;GFNR=B 3000 ENDIF 3010 IF LINIE>36 THEN EXEC NYSIDE(GFNR,GLNAVN$) 3020 PRINT " " 3030 PRINT TAB(8);STREG$(E:71) 3040 EXEC LINIEUD(FNR,FNAVN$,SALDO3$,SALDO13$) 3050 SALDO1$="0+";SALDO11$="0+" 3060 PRINT TAB(8);STREG$(E:71) 3070 PRINT " " 3080 LINIE=LINIE+5 3090 WHEN 4 3100 IF GFNR>B THEN 3110 IF LINIE>37 THEN EXEC NYSIDE(GFNR,GLNAVN$) 3120 PRINT " " 3130 PRINT TAB(8);STREG$(E:71) 3140 EXEC LINIEUD(GFNR,GLNAVN$,SALDO2$,SALDO12$) 3150 LINIE=LINIE+V;GFNR=B;GLNAVN$=BLANK$ 3160 ENDIF 3170 IF GFNR1>B THEN 3180 IF LINIE>37 THEN EXEC NYSIDE(GFNR1,GLNAVN1$) 3190 PRINT " " 3200 PRINT TAB(8);STREG$(E:71) 3210 EXEC LINIEUD(GFNR1,GLNAVN1$,SALDO4$,SALDO14$) 3220 LINIE=LINIE+V;GFNR1=B;GLNAVN1$=BLANK$ 3230 ENDIF 3240 SALDO1$="0+";SALDO11$="0+";SALDO2$="0+";SALDO12$="0+";SALDO4$="0+" 3250 SALDO14$="0+" 3260 GLNAVN1$=FNAVN$;GFNR1=FNR 3270 IF LINIE>34 THEN 3280 EXEC NYSIDE(GFNR1,GLNAVN1$) 3290 ELSE 3300 PRINT CHR(10) 3310 PRINT CHR(10) 3320 PRINT USING "###### ":FNR; 3330 PRINT GLNAVN1$ 3340 PRINT TAB(8);STREG$(E:LEN(GLNAVN$)) 3350 PRINT " " 3360 LINIE=LINIE+5 3370 ENDIF 3380 ENDCASE 3390 NEXT EPIL1 3400 IF GFNR>B THEN 3410 IF LINIE>37 THEN EXEC NYSIDE(GFNR,GLNAVN$) 3420 PRINT " " 3430 PRINT TAB(8);STREG$(E:71) 3440 EXEC LINIEUD(GFNR,GLNAVN$,SALDO2$,SALDO12$) 3450 SALDO2$="0+";SALDO12$="0+";LINIE=LINIE+V;GFNR=B 3460 SALDO1$="0+";SALDO11$="0+" 3470 ENDIF 3480 IF GFNR1>B THEN 3490 IF LINIE>37 THEN EXEC NYSIDE(GFNR1,GLNAVN1$) 3500 PRINT " " 3510 PRINT TAB(8);STREG$(E:71) 3520 EXEC LINIEUD(GFNR1,GLNAVN1$,SALDO4$,SALDO14$) 3530 LINIE=LINIE+V 3540 ENDIF 3550 IF LINIE>36 THEN EXEC NYSIDE(GFNR1,GLNAVN1$) 3560 GLNAVN$="Difference";GFNR=100000 3570 PRINT " " 3580 PRINT TAB(8);STREG$(E:71) 3590 EXEC LINIEUD(GFNR,GLNAVN$,SALDO3$,SALDO13$) 3600 PRINT TAB(8);STREG$(E:71) 3610 FOR LINIE=LINIE TO 37 3620 PRINT " " 3630 NEXT LINIE 3640 PRINT " " 3650 NEXT EPIL3 3660 OUTPUT T 3670 CLEAR 3680 REPEAT 3690 CURSOR 15,13 3700 INPUT "Ønskes yderligere balancer (J/N) ",A$ 3710 EXEC NRTEST(A$) 3720 UNTIL P=-7 OR P=-8 3730 UNTIL P=-8 3740 OUTPUT T 3750 CHAIN "P641210:OPSTART"
0x0000…000d (0,) b058 0100 REM BALANCE
0x0000…000d LineComalBin {
0x0000…000d ptr = 0xb058 // 0x0 @0x0
0x0000…000d lno = 0x0064 // 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…007e 8dd5 0110 DIM RES$(15),OP1$(12),OP2$(12),N$(6),K1$(17),A$(6),TAL4$(12),BLANK$(25)
0x000d…007e LineComalBin {
0x000d…007e ptr = 0x8dd5 // 0xd @0x0
0x000d…007e lno = 0x006e // 0xf @0x2
0x000d…007e at0004 = ╱87╱ DIM ╱ // 0x11 @0x4
0x000d…007e at0005 = ╱52╱R╱ // 0x12 @0x5
0x000d…007e at0006 = ╱45╱E╱ // 0x13 @0x6
0x000d…007e at0007 = ╱53╱S╱ // 0x14 @0x7
0x000d…007e at0008 = ╱ef╱$╱ // 0x15 @0x8
0x000d…007e at0009 = ╱ed╱(╱ // 0x16 @0x9
0x000d…007e at000a = ╱31╱1╱ // 0x17 @0xa
0x000d…007e at000b = ╱35╱5╱ // 0x18 @0xb
0x000d…007e at000c = ╱fe0000f004╱ // 0x19 @0xc
0x000d…007e at0011 = ╱ee╱)╱ // 0x1e @0x11
0x000d…007e at0012 = ╱ec╱,╱ // 0x1f @0x12
0x000d…007e at0013 = ╱4f╱O╱ // 0x20 @0x13
0x000d…007e at0014 = ╱50╱P╱ // 0x21 @0x14
0x000d…007e at0015 = ╱31╱1╱ // 0x22 @0x15
0x000d…007e at0016 = ╱ef╱$╱ // 0x23 @0x16
0x000d…007e at0017 = ╱ed╱(╱ // 0x24 @0x17
0x000d…007e at0018 = ╱31╱1╱ // 0x25 @0x18
0x000d…007e at0019 = ╱32╱2╱ // 0x26 @0x19
0x000d…007e at001a = ╱fe0000c004╱ // 0x27 @0x1a
0x000d…007e at001f = ╱ee╱)╱ // 0x2c @0x1f
0x000d…007e at0020 = ╱ec╱,╱ // 0x2d @0x20
0x000d…007e at0021 = ╱4f╱O╱ // 0x2e @0x21
0x000d…007e at0022 = ╱50╱P╱ // 0x2f @0x22
0x000d…007e at0023 = ╱32╱2╱ // 0x30 @0x23
0x000d…007e at0024 = ╱ef╱$╱ // 0x31 @0x24
0x000d…007e at0025 = ╱ed╱(╱ // 0x32 @0x25
0x000d…007e at0026 = ╱31╱1╱ // 0x33 @0x26
0x000d…007e at0027 = ╱32╱2╱ // 0x34 @0x27
0x000d…007e at0028 = ╱fe0000c004╱ // 0x35 @0x28
0x000d…007e at002d = ╱ee╱)╱ // 0x3a @0x2d
0x000d…007e at002e = ╱ec╱,╱ // 0x3b @0x2e
0x000d…007e at002f = ╱4e╱N╱ // 0x3c @0x2f
0x000d…007e at0030 = ╱ef╱$╱ // 0x3d @0x30
0x000d…007e at0031 = ╱ed╱(╱ // 0x3e @0x31
0x000d…007e at0032 = ╱36╱6╱ // 0x3f @0x32
0x000d…007e at0033 = ╱fe0000c003╱ // 0x40 @0x33
0x000d…007e at0038 = ╱ee╱)╱ // 0x45 @0x38
0x000d…007e at0039 = ╱ec╱,╱ // 0x46 @0x39
0x000d…007e at003a = ╱4b╱K╱ // 0x47 @0x3a
0x000d…007e at003b = ╱31╱1╱ // 0x48 @0x3b
0x000d…007e at003c = ╱ef╱$╱ // 0x49 @0x3c
0x000d…007e at003d = ╱ed╱(╱ // 0x4a @0x3d
0x000d…007e at003e = ╱31╱1╱ // 0x4b @0x3e
0x000d…007e at003f = ╱37╱7╱ // 0x4c @0x3f
0x000d…007e at0040 = ╱fe00008805╱ // 0x4d @0x40
0x000d…007e at0045 = ╱ee╱)╱ // 0x52 @0x45
0x000d…007e at0046 = ╱ec╱,╱ // 0x53 @0x46
0x000d…007e at0047 = ╱41╱A╱ // 0x54 @0x47
0x000d…007e at0048 = ╱ef╱$╱ // 0x55 @0x48
0x000d…007e at0049 = ╱ed╱(╱ // 0x56 @0x49
0x000d…007e at004a = ╱36╱6╱ // 0x57 @0x4a
0x000d…007e at004b = ╱fe0000c003╱ // 0x58 @0x4b
0x000d…007e at0050 = ╱ee╱)╱ // 0x5d @0x50
0x000d…007e at0051 = ╱ec╱,╱ // 0x5e @0x51
0x000d…007e at0052 = ╱54╱T╱ // 0x5f @0x52
0x000d…007e at0053 = ╱41╱A╱ // 0x60 @0x53
0x000d…007e at0054 = ╱4c╱L╱ // 0x61 @0x54
0x000d…007e at0055 = ╱34╱4╱ // 0x62 @0x55
0x000d…007e at0056 = ╱ef╱$╱ // 0x63 @0x56
0x000d…007e at0057 = ╱ed╱(╱ // 0x64 @0x57
0x000d…007e at0058 = ╱31╱1╱ // 0x65 @0x58
0x000d…007e at0059 = ╱32╱2╱ // 0x66 @0x59
0x000d…007e at005a = ╱fe0000c004╱ // 0x67 @0x5a
0x000d…007e at005f = ╱ee╱)╱ // 0x6c @0x5f
0x000d…007e at0060 = ╱ec╱,╱ // 0x6d @0x60
0x000d…007e at0061 = ╱42╱B╱ // 0x6e @0x61
0x000d…007e at0062 = ╱4c╱L╱ // 0x6f @0x62
0x000d…007e at0063 = ╱41╱A╱ // 0x70 @0x63
0x000d…007e at0064 = ╱4e╱N╱ // 0x71 @0x64
0x000d…007e at0065 = ╱4b╱K╱ // 0x72 @0x65
0x000d…007e at0066 = ╱ef╱$╱ // 0x73 @0x66
0x000d…007e at0067 = ╱ed╱(╱ // 0x74 @0x67
0x000d…007e at0068 = ╱32╱2╱ // 0x75 @0x68
0x000d…007e at0069 = ╱35╱5╱ // 0x76 @0x69
0x000d…007e at006a = ╱fe0000c805╱ // 0x77 @0x6a
0x000d…007e at006f = ╱ee╱)╱ // 0x7c @0x6f
0x000d…007e at0070 = EOL // 0x7d @0x70
0x000d…007e }
0x007e…00e6 8e3d 0120 DIM UBELØB1$(14),UBELØB2$(14),STREG$(71),FÅDK$(12),FMDK$(12),GLNAVN$(25)
0x007e…00e6 LineComalBin {
0x007e…00e6 ptr = 0x8e3d // 0x7e @0x0
0x007e…00e6 lno = 0x0078 // 0x80 @0x2
0x007e…00e6 at0004 = ╱87╱ DIM ╱ // 0x82 @0x4
0x007e…00e6 at0005 = ╱55╱U╱ // 0x83 @0x5
0x007e…00e6 at0006 = ╱42╱B╱ // 0x84 @0x6
0x007e…00e6 at0007 = ╱45╱E╱ // 0x85 @0x7
0x007e…00e6 at0008 = ╱4c╱L╱ // 0x86 @0x8
0x007e…00e6 at0009 = ╱5c╱Ø╱ // 0x87 @0x9
0x007e…00e6 at000a = ╱42╱B╱ // 0x88 @0xa
0x007e…00e6 at000b = ╱31╱1╱ // 0x89 @0xb
0x007e…00e6 at000c = ╱ef╱$╱ // 0x8a @0xc
0x007e…00e6 at000d = ╱ed╱(╱ // 0x8b @0xd
0x007e…00e6 at000e = ╱31╱1╱ // 0x8c @0xe
0x007e…00e6 at000f = ╱34╱4╱ // 0x8d @0xf
0x007e…00e6 at0010 = ╱fe0000e004╱ // 0x8e @0x10
0x007e…00e6 at0015 = ╱ee╱)╱ // 0x93 @0x15
0x007e…00e6 at0016 = ╱ec╱,╱ // 0x94 @0x16
0x007e…00e6 at0017 = ╱55╱U╱ // 0x95 @0x17
0x007e…00e6 at0018 = ╱42╱B╱ // 0x96 @0x18
0x007e…00e6 at0019 = ╱45╱E╱ // 0x97 @0x19
0x007e…00e6 at001a = ╱4c╱L╱ // 0x98 @0x1a
0x007e…00e6 at001b = ╱5c╱Ø╱ // 0x99 @0x1b
0x007e…00e6 at001c = ╱42╱B╱ // 0x9a @0x1c
0x007e…00e6 at001d = ╱32╱2╱ // 0x9b @0x1d
0x007e…00e6 at001e = ╱ef╱$╱ // 0x9c @0x1e
0x007e…00e6 at001f = ╱ed╱(╱ // 0x9d @0x1f
0x007e…00e6 at0020 = ╱31╱1╱ // 0x9e @0x20
0x007e…00e6 at0021 = ╱34╱4╱ // 0x9f @0x21
0x007e…00e6 at0022 = ╱fe0000e004╱ // 0xa0 @0x22
0x007e…00e6 at0027 = ╱ee╱)╱ // 0xa5 @0x27
0x007e…00e6 at0028 = ╱ec╱,╱ // 0xa6 @0x28
0x007e…00e6 at0029 = ╱53╱S╱ // 0xa7 @0x29
0x007e…00e6 at002a = ╱54╱T╱ // 0xa8 @0x2a
0x007e…00e6 at002b = ╱52╱R╱ // 0xa9 @0x2b
0x007e…00e6 at002c = ╱45╱E╱ // 0xaa @0x2c
0x007e…00e6 at002d = ╱47╱G╱ // 0xab @0x2d
0x007e…00e6 at002e = ╱ef╱$╱ // 0xac @0x2e
0x007e…00e6 at002f = ╱ed╱(╱ // 0xad @0x2f
0x007e…00e6 at0030 = ╱37╱7╱ // 0xae @0x30
0x007e…00e6 at0031 = ╱31╱1╱ // 0xaf @0x31
0x007e…00e6 at0032 = ╱fe00008e07╱ // 0xb0 @0x32
0x007e…00e6 at0037 = ╱ee╱)╱ // 0xb5 @0x37
0x007e…00e6 at0038 = ╱ec╱,╱ // 0xb6 @0x38
0x007e…00e6 at0039 = ╱46╱F╱ // 0xb7 @0x39
0x007e…00e6 at003a = ╱5d╱Å╱ // 0xb8 @0x3a
0x007e…00e6 at003b = ╱44╱D╱ // 0xb9 @0x3b
0x007e…00e6 at003c = ╱4b╱K╱ // 0xba @0x3c
0x007e…00e6 at003d = ╱ef╱$╱ // 0xbb @0x3d
0x007e…00e6 at003e = ╱ed╱(╱ // 0xbc @0x3e
0x007e…00e6 at003f = ╱31╱1╱ // 0xbd @0x3f
0x007e…00e6 at0040 = ╱32╱2╱ // 0xbe @0x40
0x007e…00e6 at0041 = ╱fe0000c004╱ // 0xbf @0x41
0x007e…00e6 at0046 = ╱ee╱)╱ // 0xc4 @0x46
0x007e…00e6 at0047 = ╱ec╱,╱ // 0xc5 @0x47
0x007e…00e6 at0048 = ╱46╱F╱ // 0xc6 @0x48
0x007e…00e6 at0049 = ╱4d╱M╱ // 0xc7 @0x49
0x007e…00e6 at004a = ╱44╱D╱ // 0xc8 @0x4a
0x007e…00e6 at004b = ╱4b╱K╱ // 0xc9 @0x4b
0x007e…00e6 at004c = ╱ef╱$╱ // 0xca @0x4c
0x007e…00e6 at004d = ╱ed╱(╱ // 0xcb @0x4d
0x007e…00e6 at004e = ╱31╱1╱ // 0xcc @0x4e
0x007e…00e6 at004f = ╱32╱2╱ // 0xcd @0x4f
0x007e…00e6 at0050 = ╱fe0000c004╱ // 0xce @0x50
0x007e…00e6 at0055 = ╱ee╱)╱ // 0xd3 @0x55
0x007e…00e6 at0056 = ╱ec╱,╱ // 0xd4 @0x56
0x007e…00e6 at0057 = ╱47╱G╱ // 0xd5 @0x57
0x007e…00e6 at0058 = ╱4c╱L╱ // 0xd6 @0x58
0x007e…00e6 at0059 = ╱4e╱N╱ // 0xd7 @0x59
0x007e…00e6 at005a = ╱41╱A╱ // 0xd8 @0x5a
0x007e…00e6 at005b = ╱56╱V╱ // 0xd9 @0x5b
0x007e…00e6 at005c = ╱4e╱N╱ // 0xda @0x5c
0x007e…00e6 at005d = ╱ef╱$╱ // 0xdb @0x5d
0x007e…00e6 at005e = ╱ed╱(╱ // 0xdc @0x5e
0x007e…00e6 at005f = ╱32╱2╱ // 0xdd @0x5f
0x007e…00e6 at0060 = ╱35╱5╱ // 0xde @0x60
0x007e…00e6 at0061 = ╱fe0000c805╱ // 0xdf @0x61
0x007e…00e6 at0066 = ╱ee╱)╱ // 0xe4 @0x66
0x007e…00e6 at0067 = EOL // 0xe5 @0x67
0x007e…00e6 }
0x00e6…0108 8e5f 0130 DIM DAT$(8),FNAVN$(25)
0x00e6…0108 LineComalBin {
0x00e6…0108 ptr = 0x8e5f // 0xe6 @0x0
0x00e6…0108 lno = 0x0082 // 0xe8 @0x2
0x00e6…0108 at0004 = ╱87╱ DIM ╱ // 0xea @0x4
0x00e6…0108 at0005 = ╱44╱D╱ // 0xeb @0x5
0x00e6…0108 at0006 = ╱41╱A╱ // 0xec @0x6
0x00e6…0108 at0007 = ╱54╱T╱ // 0xed @0x7
0x00e6…0108 at0008 = ╱ef╱$╱ // 0xee @0x8
0x00e6…0108 at0009 = ╱ed╱(╱ // 0xef @0x9
0x00e6…0108 at000a = ╱38╱8╱ // 0xf0 @0xa
0x00e6…0108 at000b = ╱fe00008004╱ // 0xf1 @0xb
0x00e6…0108 at0010 = ╱ee╱)╱ // 0xf6 @0x10
0x00e6…0108 at0011 = ╱ec╱,╱ // 0xf7 @0x11
0x00e6…0108 at0012 = ╱46╱F╱ // 0xf8 @0x12
0x00e6…0108 at0013 = ╱4e╱N╱ // 0xf9 @0x13
0x00e6…0108 at0014 = ╱41╱A╱ // 0xfa @0x14
0x00e6…0108 at0015 = ╱56╱V╱ // 0xfb @0x15
0x00e6…0108 at0016 = ╱4e╱N╱ // 0xfc @0x16
0x00e6…0108 at0017 = ╱ef╱$╱ // 0xfd @0x17
0x00e6…0108 at0018 = ╱ed╱(╱ // 0xfe @0x18
0x00e6…0108 at0019 = ╱32╱2╱ // 0xff @0x19
0x00e6…0108 at001a = ╱35╱5╱ // 0x100 @0x1a
0x00e6…0108 at001b = ╱fe0000c805╱ // 0x101 @0x1b
0x00e6…0108 at0020 = ╱ee╱)╱ // 0x106 @0x20
0x00e6…0108 at0021 = EOL // 0x107 @0x21
0x00e6…0108 }
0x0108…0140 8e97 0140 DIM ENAVN$(29),SALDO13$(12),SALDO3$(12)
0x0108…0140 LineComalBin {
0x0108…0140 ptr = 0x8e97 // 0x108 @0x0
0x0108…0140 lno = 0x008c // 0x10a @0x2
0x0108…0140 at0004 = ╱87╱ DIM ╱ // 0x10c @0x4
0x0108…0140 at0005 = ╱45╱E╱ // 0x10d @0x5
0x0108…0140 at0006 = ╱4e╱N╱ // 0x10e @0x6
0x0108…0140 at0007 = ╱41╱A╱ // 0x10f @0x7
0x0108…0140 at0008 = ╱56╱V╱ // 0x110 @0x8
0x0108…0140 at0009 = ╱4e╱N╱ // 0x111 @0x9
0x0108…0140 at000a = ╱ef╱$╱ // 0x112 @0xa
0x0108…0140 at000b = ╱ed╱(╱ // 0x113 @0xb
0x0108…0140 at000c = ╱32╱2╱ // 0x114 @0xc
0x0108…0140 at000d = ╱39╱9╱ // 0x115 @0xd
0x0108…0140 at000e = ╱fe0000e805╱ // 0x116 @0xe
0x0108…0140 at0013 = ╱ee╱)╱ // 0x11b @0x13
0x0108…0140 at0014 = ╱ec╱,╱ // 0x11c @0x14
0x0108…0140 at0015 = ╱53╱S╱ // 0x11d @0x15
0x0108…0140 at0016 = ╱41╱A╱ // 0x11e @0x16
0x0108…0140 at0017 = ╱4c╱L╱ // 0x11f @0x17
0x0108…0140 at0018 = ╱44╱D╱ // 0x120 @0x18
0x0108…0140 at0019 = ╱4f╱O╱ // 0x121 @0x19
0x0108…0140 at001a = ╱31╱1╱ // 0x122 @0x1a
0x0108…0140 at001b = ╱33╱3╱ // 0x123 @0x1b
0x0108…0140 at001c = ╱ef╱$╱ // 0x124 @0x1c
0x0108…0140 at001d = ╱ed╱(╱ // 0x125 @0x1d
0x0108…0140 at001e = ╱31╱1╱ // 0x126 @0x1e
0x0108…0140 at001f = ╱32╱2╱ // 0x127 @0x1f
0x0108…0140 at0020 = ╱fe0000c004╱ // 0x128 @0x20
0x0108…0140 at0025 = ╱ee╱)╱ // 0x12d @0x25
0x0108…0140 at0026 = ╱ec╱,╱ // 0x12e @0x26
0x0108…0140 at0027 = ╱53╱S╱ // 0x12f @0x27
0x0108…0140 at0028 = ╱41╱A╱ // 0x130 @0x28
0x0108…0140 at0029 = ╱4c╱L╱ // 0x131 @0x29
0x0108…0140 at002a = ╱44╱D╱ // 0x132 @0x2a
0x0108…0140 at002b = ╱4f╱O╱ // 0x133 @0x2b
0x0108…0140 at002c = ╱33╱3╱ // 0x134 @0x2c
0x0108…0140 at002d = ╱ef╱$╱ // 0x135 @0x2d
0x0108…0140 at002e = ╱ed╱(╱ // 0x136 @0x2e
0x0108…0140 at002f = ╱31╱1╱ // 0x137 @0x2f
0x0108…0140 at0030 = ╱32╱2╱ // 0x138 @0x30
0x0108…0140 at0031 = ╱fe0000c004╱ // 0x139 @0x31
0x0108…0140 at0036 = ╱ee╱)╱ // 0x13e @0x36
0x0108…0140 at0037 = EOL // 0x13f @0x37
0x0108…0140 }
0x0140…019d 8ef4 0150 DIM SALDO2$(12),SALDO11$(12),SALDO1$(12),SALDO12$(12),SALDO14$(12)
0x0140…019d LineComalBin {
0x0140…019d ptr = 0x8ef4 // 0x140 @0x0
0x0140…019d lno = 0x0096 // 0x142 @0x2
0x0140…019d at0004 = ╱87╱ DIM ╱ // 0x144 @0x4
0x0140…019d at0005 = ╱53╱S╱ // 0x145 @0x5
0x0140…019d at0006 = ╱41╱A╱ // 0x146 @0x6
0x0140…019d at0007 = ╱4c╱L╱ // 0x147 @0x7
0x0140…019d at0008 = ╱44╱D╱ // 0x148 @0x8
0x0140…019d at0009 = ╱4f╱O╱ // 0x149 @0x9
0x0140…019d at000a = ╱32╱2╱ // 0x14a @0xa
0x0140…019d at000b = ╱ef╱$╱ // 0x14b @0xb
0x0140…019d at000c = ╱ed╱(╱ // 0x14c @0xc
0x0140…019d at000d = ╱31╱1╱ // 0x14d @0xd
0x0140…019d at000e = ╱32╱2╱ // 0x14e @0xe
0x0140…019d at000f = ╱fe0000c004╱ // 0x14f @0xf
0x0140…019d at0014 = ╱ee╱)╱ // 0x154 @0x14
0x0140…019d at0015 = ╱ec╱,╱ // 0x155 @0x15
0x0140…019d at0016 = ╱53╱S╱ // 0x156 @0x16
0x0140…019d at0017 = ╱41╱A╱ // 0x157 @0x17
0x0140…019d at0018 = ╱4c╱L╱ // 0x158 @0x18
0x0140…019d at0019 = ╱44╱D╱ // 0x159 @0x19
0x0140…019d at001a = ╱4f╱O╱ // 0x15a @0x1a
0x0140…019d at001b = ╱31╱1╱ // 0x15b @0x1b
0x0140…019d at001c = ╱31╱1╱ // 0x15c @0x1c
0x0140…019d at001d = ╱ef╱$╱ // 0x15d @0x1d
0x0140…019d at001e = ╱ed╱(╱ // 0x15e @0x1e
0x0140…019d at001f = ╱31╱1╱ // 0x15f @0x1f
0x0140…019d at0020 = ╱32╱2╱ // 0x160 @0x20
0x0140…019d at0021 = ╱fe0000c004╱ // 0x161 @0x21
0x0140…019d at0026 = ╱ee╱)╱ // 0x166 @0x26
0x0140…019d at0027 = ╱ec╱,╱ // 0x167 @0x27
0x0140…019d at0028 = ╱53╱S╱ // 0x168 @0x28
0x0140…019d at0029 = ╱41╱A╱ // 0x169 @0x29
0x0140…019d at002a = ╱4c╱L╱ // 0x16a @0x2a
0x0140…019d at002b = ╱44╱D╱ // 0x16b @0x2b
0x0140…019d at002c = ╱4f╱O╱ // 0x16c @0x2c
0x0140…019d at002d = ╱31╱1╱ // 0x16d @0x2d
0x0140…019d at002e = ╱ef╱$╱ // 0x16e @0x2e
0x0140…019d at002f = ╱ed╱(╱ // 0x16f @0x2f
0x0140…019d at0030 = ╱31╱1╱ // 0x170 @0x30
0x0140…019d at0031 = ╱32╱2╱ // 0x171 @0x31
0x0140…019d at0032 = ╱fe0000c004╱ // 0x172 @0x32
0x0140…019d at0037 = ╱ee╱)╱ // 0x177 @0x37
0x0140…019d at0038 = ╱ec╱,╱ // 0x178 @0x38
0x0140…019d at0039 = ╱53╱S╱ // 0x179 @0x39
0x0140…019d at003a = ╱41╱A╱ // 0x17a @0x3a
0x0140…019d at003b = ╱4c╱L╱ // 0x17b @0x3b
0x0140…019d at003c = ╱44╱D╱ // 0x17c @0x3c
0x0140…019d at003d = ╱4f╱O╱ // 0x17d @0x3d
0x0140…019d at003e = ╱31╱1╱ // 0x17e @0x3e
0x0140…019d at003f = ╱32╱2╱ // 0x17f @0x3f
0x0140…019d at0040 = ╱ef╱$╱ // 0x180 @0x40
0x0140…019d at0041 = ╱ed╱(╱ // 0x181 @0x41
0x0140…019d at0042 = ╱31╱1╱ // 0x182 @0x42
0x0140…019d at0043 = ╱32╱2╱ // 0x183 @0x43
0x0140…019d at0044 = ╱fe0000c004╱ // 0x184 @0x44
0x0140…019d at0049 = ╱ee╱)╱ // 0x189 @0x49
0x0140…019d at004a = ╱ec╱,╱ // 0x18a @0x4a
0x0140…019d at004b = ╱53╱S╱ // 0x18b @0x4b
0x0140…019d at004c = ╱41╱A╱ // 0x18c @0x4c
0x0140…019d at004d = ╱4c╱L╱ // 0x18d @0x4d
0x0140…019d at004e = ╱44╱D╱ // 0x18e @0x4e
0x0140…019d at004f = ╱4f╱O╱ // 0x18f @0x4f
0x0140…019d at0050 = ╱31╱1╱ // 0x190 @0x50
0x0140…019d at0051 = ╱34╱4╱ // 0x191 @0x51
0x0140…019d at0052 = ╱ef╱$╱ // 0x192 @0x52
0x0140…019d at0053 = ╱ed╱(╱ // 0x193 @0x53
0x0140…019d at0054 = ╱31╱1╱ // 0x194 @0x54
0x0140…019d at0055 = ╱32╱2╱ // 0x195 @0x55
0x0140…019d at0056 = ╱fe0000c004╱ // 0x196 @0x56
0x0140…019d at005b = ╱ee╱)╱ // 0x19b @0x5b
0x0140…019d at005c = EOL // 0x19c @0x5c
0x0140…019d }
0x019d…01fa 8f51 0160 DIM K2$(17),K3$(17),K4$(17),K5$(17),T1(W),LAND$(W,12),DV$(10)
0x019d…01fa LineComalBin {
0x019d…01fa ptr = 0x8f51 // 0x19d @0x0
0x019d…01fa lno = 0x00a0 // 0x19f @0x2
0x019d…01fa at0004 = ╱87╱ DIM ╱ // 0x1a1 @0x4
0x019d…01fa at0005 = ╱4b╱K╱ // 0x1a2 @0x5
0x019d…01fa at0006 = ╱32╱2╱ // 0x1a3 @0x6
0x019d…01fa at0007 = ╱ef╱$╱ // 0x1a4 @0x7
0x019d…01fa at0008 = ╱ed╱(╱ // 0x1a5 @0x8
0x019d…01fa at0009 = ╱31╱1╱ // 0x1a6 @0x9
0x019d…01fa at000a = ╱37╱7╱ // 0x1a7 @0xa
0x019d…01fa at000b = ╱fe00008805╱ // 0x1a8 @0xb
0x019d…01fa at0010 = ╱ee╱)╱ // 0x1ad @0x10
0x019d…01fa at0011 = ╱ec╱,╱ // 0x1ae @0x11
0x019d…01fa at0012 = ╱4b╱K╱ // 0x1af @0x12
0x019d…01fa at0013 = ╱33╱3╱ // 0x1b0 @0x13
0x019d…01fa at0014 = ╱ef╱$╱ // 0x1b1 @0x14
0x019d…01fa at0015 = ╱ed╱(╱ // 0x1b2 @0x15
0x019d…01fa at0016 = ╱31╱1╱ // 0x1b3 @0x16
0x019d…01fa at0017 = ╱37╱7╱ // 0x1b4 @0x17
0x019d…01fa at0018 = ╱fe00008805╱ // 0x1b5 @0x18
0x019d…01fa at001d = ╱ee╱)╱ // 0x1ba @0x1d
0x019d…01fa at001e = ╱ec╱,╱ // 0x1bb @0x1e
0x019d…01fa at001f = ╱4b╱K╱ // 0x1bc @0x1f
0x019d…01fa at0020 = ╱34╱4╱ // 0x1bd @0x20
0x019d…01fa at0021 = ╱ef╱$╱ // 0x1be @0x21
0x019d…01fa at0022 = ╱ed╱(╱ // 0x1bf @0x22
0x019d…01fa at0023 = ╱31╱1╱ // 0x1c0 @0x23
0x019d…01fa at0024 = ╱37╱7╱ // 0x1c1 @0x24
0x019d…01fa at0025 = ╱fe00008805╱ // 0x1c2 @0x25
0x019d…01fa at002a = ╱ee╱)╱ // 0x1c7 @0x2a
0x019d…01fa at002b = ╱ec╱,╱ // 0x1c8 @0x2b
0x019d…01fa at002c = ╱4b╱K╱ // 0x1c9 @0x2c
0x019d…01fa at002d = ╱35╱5╱ // 0x1ca @0x2d
0x019d…01fa at002e = ╱ef╱$╱ // 0x1cb @0x2e
0x019d…01fa at002f = ╱ed╱(╱ // 0x1cc @0x2f
0x019d…01fa at0030 = ╱31╱1╱ // 0x1cd @0x30
0x019d…01fa at0031 = ╱37╱7╱ // 0x1ce @0x31
0x019d…01fa at0032 = ╱fe00008805╱ // 0x1cf @0x32
0x019d…01fa at0037 = ╱ee╱)╱ // 0x1d4 @0x37
0x019d…01fa at0038 = ╱ec╱,╱ // 0x1d5 @0x38
0x019d…01fa at0039 = ╱54╱T╱ // 0x1d6 @0x39
0x019d…01fa at003a = ╱31╱1╱ // 0x1d7 @0x3a
0x019d…01fa at003b = ╱ed╱(╱ // 0x1d8 @0x3b
0x019d…01fa at003c = ╱57╱W╱ // 0x1d9 @0x3c
0x019d…01fa at003d = ╱ee╱)╱ // 0x1da @0x3d
0x019d…01fa at003e = ╱ec╱,╱ // 0x1db @0x3e
0x019d…01fa at003f = ╱4c╱L╱ // 0x1dc @0x3f
0x019d…01fa at0040 = ╱41╱A╱ // 0x1dd @0x40
0x019d…01fa at0041 = ╱4e╱N╱ // 0x1de @0x41
0x019d…01fa at0042 = ╱44╱D╱ // 0x1df @0x42
0x019d…01fa at0043 = ╱ef╱$╱ // 0x1e0 @0x43
0x019d…01fa at0044 = ╱ed╱(╱ // 0x1e1 @0x44
0x019d…01fa at0045 = ╱57╱W╱ // 0x1e2 @0x45
0x019d…01fa at0046 = ╱ec╱,╱ // 0x1e3 @0x46
0x019d…01fa at0047 = ╱31╱1╱ // 0x1e4 @0x47
0x019d…01fa at0048 = ╱32╱2╱ // 0x1e5 @0x48
0x019d…01fa at0049 = ╱fe0000c004╱ // 0x1e6 @0x49
0x019d…01fa at004e = ╱ee╱)╱ // 0x1eb @0x4e
0x019d…01fa at004f = ╱ec╱,╱ // 0x1ec @0x4f
0x019d…01fa at0050 = ╱44╱D╱ // 0x1ed @0x50
0x019d…01fa at0051 = ╱56╱V╱ // 0x1ee @0x51
0x019d…01fa at0052 = ╱ef╱$╱ // 0x1ef @0x52
0x019d…01fa at0053 = ╱ed╱(╱ // 0x1f0 @0x53
0x019d…01fa at0054 = ╱31╱1╱ // 0x1f1 @0x54
0x019d…01fa at0055 = ╱30╱0╱ // 0x1f2 @0x55
0x019d…01fa at0056 = ╱fe0000a004╱ // 0x1f3 @0x56
0x019d…01fa at005b = ╱ee╱)╱ // 0x1f8 @0x5b
0x019d…01fa at005c = EOL // 0x1f9 @0x5c
0x019d…01fa }
0x01fa…0242 8f99 0170 DIM GLNAVN1$(25),SALDO4$(12),EMREG$(12),EÅREG$(12)
0x01fa…0242 LineComalBin {
0x01fa…0242 ptr = 0x8f99 // 0x1fa @0x0
0x01fa…0242 lno = 0x00aa // 0x1fc @0x2
0x01fa…0242 at0004 = ╱87╱ DIM ╱ // 0x1fe @0x4
0x01fa…0242 at0005 = ╱47╱G╱ // 0x1ff @0x5
0x01fa…0242 at0006 = ╱4c╱L╱ // 0x200 @0x6
0x01fa…0242 at0007 = ╱4e╱N╱ // 0x201 @0x7
0x01fa…0242 at0008 = ╱41╱A╱ // 0x202 @0x8
0x01fa…0242 at0009 = ╱56╱V╱ // 0x203 @0x9
0x01fa…0242 at000a = ╱4e╱N╱ // 0x204 @0xa
0x01fa…0242 at000b = ╱31╱1╱ // 0x205 @0xb
0x01fa…0242 at000c = ╱ef╱$╱ // 0x206 @0xc
0x01fa…0242 at000d = ╱ed╱(╱ // 0x207 @0xd
0x01fa…0242 at000e = ╱32╱2╱ // 0x208 @0xe
0x01fa…0242 at000f = ╱35╱5╱ // 0x209 @0xf
0x01fa…0242 at0010 = ╱fe0000c805╱ // 0x20a @0x10
0x01fa…0242 at0015 = ╱ee╱)╱ // 0x20f @0x15
0x01fa…0242 at0016 = ╱ec╱,╱ // 0x210 @0x16
0x01fa…0242 at0017 = ╱53╱S╱ // 0x211 @0x17
0x01fa…0242 at0018 = ╱41╱A╱ // 0x212 @0x18
0x01fa…0242 at0019 = ╱4c╱L╱ // 0x213 @0x19
0x01fa…0242 at001a = ╱44╱D╱ // 0x214 @0x1a
0x01fa…0242 at001b = ╱4f╱O╱ // 0x215 @0x1b
0x01fa…0242 at001c = ╱34╱4╱ // 0x216 @0x1c
0x01fa…0242 at001d = ╱ef╱$╱ // 0x217 @0x1d
0x01fa…0242 at001e = ╱ed╱(╱ // 0x218 @0x1e
0x01fa…0242 at001f = ╱31╱1╱ // 0x219 @0x1f
0x01fa…0242 at0020 = ╱32╱2╱ // 0x21a @0x20
0x01fa…0242 at0021 = ╱fe0000c004╱ // 0x21b @0x21
0x01fa…0242 at0026 = ╱ee╱)╱ // 0x220 @0x26
0x01fa…0242 at0027 = ╱ec╱,╱ // 0x221 @0x27
0x01fa…0242 at0028 = ╱45╱E╱ // 0x222 @0x28
0x01fa…0242 at0029 = ╱4d╱M╱ // 0x223 @0x29
0x01fa…0242 at002a = ╱52╱R╱ // 0x224 @0x2a
0x01fa…0242 at002b = ╱45╱E╱ // 0x225 @0x2b
0x01fa…0242 at002c = ╱47╱G╱ // 0x226 @0x2c
0x01fa…0242 at002d = ╱ef╱$╱ // 0x227 @0x2d
0x01fa…0242 at002e = ╱ed╱(╱ // 0x228 @0x2e
0x01fa…0242 at002f = ╱31╱1╱ // 0x229 @0x2f
0x01fa…0242 at0030 = ╱32╱2╱ // 0x22a @0x30
0x01fa…0242 at0031 = ╱fe0000c004╱ // 0x22b @0x31
0x01fa…0242 at0036 = ╱ee╱)╱ // 0x230 @0x36
0x01fa…0242 at0037 = ╱ec╱,╱ // 0x231 @0x37
0x01fa…0242 at0038 = ╱45╱E╱ // 0x232 @0x38
0x01fa…0242 at0039 = ╱5d╱Å╱ // 0x233 @0x39
0x01fa…0242 at003a = ╱52╱R╱ // 0x234 @0x3a
0x01fa…0242 at003b = ╱45╱E╱ // 0x235 @0x3b
0x01fa…0242 at003c = ╱47╱G╱ // 0x236 @0x3c
0x01fa…0242 at003d = ╱ef╱$╱ // 0x237 @0x3d
0x01fa…0242 at003e = ╱ed╱(╱ // 0x238 @0x3e
0x01fa…0242 at003f = ╱31╱1╱ // 0x239 @0x3f
0x01fa…0242 at0040 = ╱32╱2╱ // 0x23a @0x40
0x01fa…0242 at0041 = ╱fe0000c004╱ // 0x23b @0x41
0x01fa…0242 at0046 = ╱ee╱)╱ // 0x240 @0x46
0x01fa…0242 at0047 = EOL // 0x241 @0x47
0x01fa…0242 }
0x0242…025a 8fb1 0180 PROC CALC(ART,B1,B2,ES)
0x0242…025a LineComalBin {
0x0242…025a ptr = 0x8fb1 // 0x242 @0x0
0x0242…025a lno = 0x00b4 // 0x244 @0x2
0x0242…025a at0004 = ╱9e╱ PROC ╱ // 0x246 @0x4
0x0242…025a at0005 = ╱43╱C╱ // 0x247 @0x5
0x0242…025a at0006 = ╱41╱A╱ // 0x248 @0x6
0x0242…025a at0007 = ╱4c╱L╱ // 0x249 @0x7
0x0242…025a at0008 = ╱43╱C╱ // 0x24a @0x8
0x0242…025a at0009 = ╱ed╱(╱ // 0x24b @0x9
0x0242…025a at000a = ╱41╱A╱ // 0x24c @0xa
0x0242…025a at000b = ╱52╱R╱ // 0x24d @0xb
0x0242…025a at000c = ╱54╱T╱ // 0x24e @0xc
0x0242…025a at000d = ╱ec╱,╱ // 0x24f @0xd
0x0242…025a at000e = ╱42╱B╱ // 0x250 @0xe
0x0242…025a at000f = ╱31╱1╱ // 0x251 @0xf
0x0242…025a at0010 = ╱ec╱,╱ // 0x252 @0x10
0x0242…025a at0011 = ╱42╱B╱ // 0x253 @0x11
0x0242…025a at0012 = ╱32╱2╱ // 0x254 @0x12
0x0242…025a at0013 = ╱ec╱,╱ // 0x255 @0x13
0x0242…025a at0014 = ╱45╱E╱ // 0x256 @0x14
0x0242…025a at0015 = ╱53╱S╱ // 0x257 @0x15
0x0242…025a at0016 = ╱ee╱)╱ // 0x258 @0x16
0x0242…025a at0017 = EOL // 0x259 @0x17
0x0242…025a }
0x025a…0285 8fdc 0190 OP1$=B1$;OP2$=B2$;RES$=ES$;SI=B;FLAG=B
0x025a…0285 LineComalBin {
0x025a…0285 ptr = 0x8fdc // 0x25a @0x0
0x025a…0285 lno = 0x00be // 0x25c @0x2
0x025a…0285 at0004 = ╱4f╱O╱ // 0x25e @0x4
0x025a…0285 at0005 = ╱50╱P╱ // 0x25f @0x5
0x025a…0285 at0006 = ╱31╱1╱ // 0x260 @0x6
0x025a…0285 at0007 = ╱ef╱$╱ // 0x261 @0x7
0x025a…0285 at0008 = ╱dc╱=╱ // 0x262 @0x8
0x025a…0285 at0009 = ╱42╱B╱ // 0x263 @0x9
0x025a…0285 at000a = ╱31╱1╱ // 0x264 @0xa
0x025a…0285 at000b = ╱ef╱$╱ // 0x265 @0xb
0x025a…0285 at000c = ╱eb╱;╱ // 0x266 @0xc
0x025a…0285 at000d = ╱4f╱O╱ // 0x267 @0xd
0x025a…0285 at000e = ╱50╱P╱ // 0x268 @0xe
0x025a…0285 at000f = ╱32╱2╱ // 0x269 @0xf
0x025a…0285 at0010 = ╱ef╱$╱ // 0x26a @0x10
0x025a…0285 at0011 = ╱dc╱=╱ // 0x26b @0x11
0x025a…0285 at0012 = ╱42╱B╱ // 0x26c @0x12
0x025a…0285 at0013 = ╱32╱2╱ // 0x26d @0x13
0x025a…0285 at0014 = ╱ef╱$╱ // 0x26e @0x14
0x025a…0285 at0015 = ╱eb╱;╱ // 0x26f @0x15
0x025a…0285 at0016 = ╱52╱R╱ // 0x270 @0x16
0x025a…0285 at0017 = ╱45╱E╱ // 0x271 @0x17
0x025a…0285 at0018 = ╱53╱S╱ // 0x272 @0x18
0x025a…0285 at0019 = ╱ef╱$╱ // 0x273 @0x19
0x025a…0285 at001a = ╱dc╱=╱ // 0x274 @0x1a
0x025a…0285 at001b = ╱45╱E╱ // 0x275 @0x1b
0x025a…0285 at001c = ╱53╱S╱ // 0x276 @0x1c
0x025a…0285 at001d = ╱ef╱$╱ // 0x277 @0x1d
0x025a…0285 at001e = ╱eb╱;╱ // 0x278 @0x1e
0x025a…0285 at001f = ╱53╱S╱ // 0x279 @0x1f
0x025a…0285 at0020 = ╱49╱I╱ // 0x27a @0x20
0x025a…0285 at0021 = ╱dc╱=╱ // 0x27b @0x21
0x025a…0285 at0022 = ╱42╱B╱ // 0x27c @0x22
0x025a…0285 at0023 = ╱eb╱;╱ // 0x27d @0x23
0x025a…0285 at0024 = ╱46╱F╱ // 0x27e @0x24
0x025a…0285 at0025 = ╱4c╱L╱ // 0x27f @0x25
0x025a…0285 at0026 = ╱41╱A╱ // 0x280 @0x26
0x025a…0285 at0027 = ╱47╱G╱ // 0x281 @0x27
0x025a…0285 at0028 = ╱dc╱=╱ // 0x282 @0x28
0x025a…0285 at0029 = ╱42╱B╱ // 0x283 @0x29
0x025a…0285 at002a = EOL // 0x284 @0x2a
0x025a…0285 }
0x0285…029b 8ff2 0200 CALL "P641210:REGN"
0x0285…029b LineComalBin {
0x0285…029b ptr = 0x8ff2 // 0x285 @0x0
0x0285…029b lno = 0x00c8 // 0x287 @0x2
0x0285…029b at0004 = ╱ad3130╱ CALL ╱ // 0x289 @0x4
0x0285…029b at0007 = ╱22╱"╱ // 0x28c @0x7
0x0285…029b at0008 = ╱50╱P╱ // 0x28d @0x8
0x0285…029b at0009 = ╱36╱6╱ // 0x28e @0x9
0x0285…029b at000a = ╱34╱4╱ // 0x28f @0xa
0x0285…029b at000b = ╱31╱1╱ // 0x290 @0xb
0x0285…029b at000c = ╱32╱2╱ // 0x291 @0xc
0x0285…029b at000d = ╱31╱1╱ // 0x292 @0xd
0x0285…029b at000e = ╱30╱0╱ // 0x293 @0xe
0x0285…029b at000f = ╱3a╱:╱ // 0x294 @0xf
0x0285…029b at0010 = ╱52╱R╱ // 0x295 @0x10
0x0285…029b at0011 = ╱45╱E╱ // 0x296 @0x11
0x0285…029b at0012 = ╱47╱G╱ // 0x297 @0x12
0x0285…029b at0013 = ╱4e╱N╱ // 0x298 @0x13
0x0285…029b at0014 = ╱22╱"╱ // 0x299 @0x14
0x0285…029b at0015 = EOL // 0x29a @0x15
0x0285…029b }
0x029b…02a8 8fff 0210 ES$=RES$
0x029b…02a8 LineComalBin {
0x029b…02a8 ptr = 0x8fff // 0x29b @0x0
0x029b…02a8 lno = 0x00d2 // 0x29d @0x2
0x029b…02a8 at0004 = ╱45╱E╱ // 0x29f @0x4
0x029b…02a8 at0005 = ╱53╱S╱ // 0x2a0 @0x5
0x029b…02a8 at0006 = ╱ef╱$╱ // 0x2a1 @0x6
0x029b…02a8 at0007 = ╱dc╱=╱ // 0x2a2 @0x7
0x029b…02a8 at0008 = ╱52╱R╱ // 0x2a3 @0x8
0x029b…02a8 at0009 = ╱45╱E╱ // 0x2a4 @0x9
0x029b…02a8 at000a = ╱53╱S╱ // 0x2a5 @0xa
0x029b…02a8 at000b = ╱ef╱$╱ // 0x2a6 @0xb
0x029b…02a8 at000c = EOL // 0x2a7 @0xc
0x029b…02a8 }
0x02a8…02b6 900d 0220 IF FLAG<>B THEN STOP
0x02a8…02b6 LineComalBin {
0x02a8…02b6 ptr = 0x900d // 0x2a8 @0x0
0x02a8…02b6 lno = 0x00dc // 0x2aa @0x2
0x02a8…02b6 at0004 = ╱82╱ IF ╱ // 0x2ac @0x4
0x02a8…02b6 at0005 = ╱46╱F╱ // 0x2ad @0x5
0x02a8…02b6 at0006 = ╱4c╱L╱ // 0x2ae @0x6
0x02a8…02b6 at0007 = ╱41╱A╱ // 0x2af @0x7
0x02a8…02b6 at0008 = ╱47╱G╱ // 0x2b0 @0x8
0x02a8…02b6 at0009 = ╱e1╱<>╱ // 0x2b1 @0x9
0x02a8…02b6 at000a = ╱42╱B╱ // 0x2b2 @0xa
0x02a8…02b6 at000b = ╱b6╱ THEN ╱ // 0x2b3 @0xb
0x02a8…02b6 at000c = ╱8d╱ STOP ╱ // 0x2b4 @0xc
0x02a8…02b6 at000d = EOL // 0x2b5 @0xd
0x02a8…02b6 }
0x02b6…02bc 9013 0230 ENDPROC
0x02b6…02bc LineComalBin {
0x02b6…02bc ptr = 0x9013 // 0x2b6 @0x0
0x02b6…02bc lno = 0x00e6 // 0x2b8 @0x2
0x02b6…02bc at0004 = ╱9f╱ ENDPROC ╱ // 0x2ba @0x4
0x02b6…02bc at0005 = EOL // 0x2bb @0x5
0x02b6…02bc }
0x02bc…02d1 9028 0240 PROC DATOUD(DA1,DA2)
0x02bc…02d1 LineComalBin {
0x02bc…02d1 ptr = 0x9028 // 0x2bc @0x0
0x02bc…02d1 lno = 0x00f0 // 0x2be @0x2
0x02bc…02d1 at0004 = ╱9e╱ PROC ╱ // 0x2c0 @0x4
0x02bc…02d1 at0005 = ╱44╱D╱ // 0x2c1 @0x5
0x02bc…02d1 at0006 = ╱41╱A╱ // 0x2c2 @0x6
0x02bc…02d1 at0007 = ╱54╱T╱ // 0x2c3 @0x7
0x02bc…02d1 at0008 = ╱4f╱O╱ // 0x2c4 @0x8
0x02bc…02d1 at0009 = ╱55╱U╱ // 0x2c5 @0x9
0x02bc…02d1 at000a = ╱44╱D╱ // 0x2c6 @0xa
0x02bc…02d1 at000b = ╱ed╱(╱ // 0x2c7 @0xb
0x02bc…02d1 at000c = ╱44╱D╱ // 0x2c8 @0xc
0x02bc…02d1 at000d = ╱41╱A╱ // 0x2c9 @0xd
0x02bc…02d1 at000e = ╱31╱1╱ // 0x2ca @0xe
0x02bc…02d1 at000f = ╱ec╱,╱ // 0x2cb @0xf
0x02bc…02d1 at0010 = ╱44╱D╱ // 0x2cc @0x10
0x02bc…02d1 at0011 = ╱41╱A╱ // 0x2cd @0x11
0x02bc…02d1 at0012 = ╱32╱2╱ // 0x2ce @0x12
0x02bc…02d1 at0013 = ╱ee╱)╱ // 0x2cf @0x13
0x02bc…02d1 at0014 = EOL // 0x2d0 @0x14
0x02bc…02d1 }
0x02d1…02dd 9034 0250 DA3=DA1
0x02d1…02dd LineComalBin {
0x02d1…02dd ptr = 0x9034 // 0x2d1 @0x0
0x02d1…02dd lno = 0x00fa // 0x2d3 @0x2
0x02d1…02dd at0004 = ╱44╱D╱ // 0x2d5 @0x4
0x02d1…02dd at0005 = ╱41╱A╱ // 0x2d6 @0x5
0x02d1…02dd at0006 = ╱33╱3╱ // 0x2d7 @0x6
0x02d1…02dd at0007 = ╱dc╱=╱ // 0x2d8 @0x7
0x02d1…02dd at0008 = ╱44╱D╱ // 0x2d9 @0x8
0x02d1…02dd at0009 = ╱41╱A╱ // 0x2da @0x9
0x02d1…02dd at000a = ╱31╱1╱ // 0x2db @0xa
0x02d1…02dd at000b = EOL // 0x2dc @0xb
0x02d1…02dd }
0x02dd…02f1 9048 0260 DA2$=" "
0x02dd…02f1 LineComalBin {
0x02dd…02f1 ptr = 0x9048 // 0x2dd @0x0
0x02dd…02f1 lno = 0x0104 // 0x2df @0x2
0x02dd…02f1 at0004 = ╱44╱D╱ // 0x2e1 @0x4
0x02dd…02f1 at0005 = ╱41╱A╱ // 0x2e2 @0x5
0x02dd…02f1 at0006 = ╱32╱2╱ // 0x2e3 @0x6
0x02dd…02f1 at0007 = ╱ef╱$╱ // 0x2e4 @0x7
0x02dd…02f1 at0008 = ╱dc╱=╱ // 0x2e5 @0x8
0x02dd…02f1 at0009 = ╱22╱"╱ // 0x2e6 @0x9
0x02dd…02f1 at000a = ╱20╱…╱ // 0x2e7 @0xa
0x02dd…02f1 at000b = ╱20╱…╱ // 0x2e8 @0xb
0x02dd…02f1 at000c = ╱20╱…╱ // 0x2e9 @0xc
0x02dd…02f1 at000d = ╱20╱…╱ // 0x2ea @0xd
0x02dd…02f1 at000e = ╱20╱…╱ // 0x2eb @0xe
0x02dd…02f1 at000f = ╱20╱…╱ // 0x2ec @0xf
0x02dd…02f1 at0010 = ╱20╱…╱ // 0x2ed @0x10
0x02dd…02f1 at0011 = ╱20╱…╱ // 0x2ee @0x11
0x02dd…02f1 at0012 = ╱22╱"╱ // 0x2ef @0x12
0x02dd…02f1 at0013 = EOL // 0x2f0 @0x13
0x02dd…02f1 }
0x02f1…0304 905b 0270 FOR J=8 TO E STEP -E
0x02f1…0304 LineComalBin {
0x02f1…0304 ptr = 0x905b // 0x2f1 @0x0
0x02f1…0304 lno = 0x010e // 0x2f3 @0x2
0x02f1…0304 at0004 = ╱83╱ FOR ╱ // 0x2f5 @0x4
0x02f1…0304 at0005 = ╱4a╱J╱ // 0x2f6 @0x5
0x02f1…0304 at0006 = ╱dc╱=╱ // 0x2f7 @0x6
0x02f1…0304 at0007 = ╱38╱8╱ // 0x2f8 @0x7
0x02f1…0304 at0008 = ╱fe00008004╱ // 0x2f9 @0x8
0x02f1…0304 at000d = ╱b7╱ TO ╱ // 0x2fe @0xd
0x02f1…0304 at000e = ╱45╱E╱ // 0x2ff @0xe
0x02f1…0304 at000f = ╱b8╱ STEP ╱ // 0x300 @0xf
0x02f1…0304 at0010 = ╱e9╱-╱ // 0x301 @0x10
0x02f1…0304 at0011 = ╱45╱E╱ // 0x302 @0x11
0x02f1…0304 at0012 = EOL // 0x303 @0x12
0x02f1…0304 }
0x0304…0310 9067 0280 IF J MOD V=B THEN
0x0304…0310 LineComalBin {
0x0304…0310 ptr = 0x9067 // 0x304 @0x0
0x0304…0310 lno = 0x0118 // 0x306 @0x2
0x0304…0310 at0004 = ╱9c╱ IF ╱ // 0x308 @0x4
0x0304…0310 at0005 = ╱4a╱J╱ // 0x309 @0x5
0x0304…0310 at0006 = ╱e8╱ MOD ╱ // 0x30a @0x6
0x0304…0310 at0007 = ╱56╱V╱ // 0x30b @0x7
0x0304…0310 at0008 = ╱dc╱=╱ // 0x30c @0x8
0x0304…0310 at0009 = ╱42╱B╱ // 0x30d @0x9
0x0304…0310 at000a = ╱b6╱ THEN ╱ // 0x30e @0xa
0x0304…0310 at000b = EOL // 0x30f @0xb
0x0304…0310 }
0x0310…0320 9077 0290 DA2$(J)="."
0x0310…0320 LineComalBin {
0x0310…0320 ptr = 0x9077 // 0x310 @0x0
0x0310…0320 lno = 0x0122 // 0x312 @0x2
0x0310…0320 at0004 = ╱44╱D╱ // 0x314 @0x4
0x0310…0320 at0005 = ╱41╱A╱ // 0x315 @0x5
0x0310…0320 at0006 = ╱32╱2╱ // 0x316 @0x6
0x0310…0320 at0007 = ╱ef╱$╱ // 0x317 @0x7
0x0310…0320 at0008 = ╱ed╱(╱ // 0x318 @0x8
0x0310…0320 at0009 = ╱4a╱J╱ // 0x319 @0x9
0x0310…0320 at000a = ╱ee╱)╱ // 0x31a @0xa
0x0310…0320 at000b = ╱dc╱=╱ // 0x31b @0xb
0x0310…0320 at000c = ╱22╱"╱ // 0x31c @0xc
0x0310…0320 at000d = ╱2e╱.╱ // 0x31d @0xd
0x0310…0320 at000e = ╱22╱"╱ // 0x31e @0xe
0x0310…0320 at000f = EOL // 0x31f @0xf
0x0310…0320 }
0x0320…0326 907d 0300 ELSE
0x0320…0326 LineComalBin {
0x0320…0326 ptr = 0x907d // 0x320 @0x0
0x0320…0326 lno = 0x012c // 0x322 @0x2
0x0320…0326 at0004 = ╱9a╱ ELSE ╱ // 0x324 @0x4
0x0320…0326 at0005 = EOL // 0x325 @0x5
0x0320…0326 }
0x0326…0349 90a0 0310 DA2$(J)=CHR(DA3 MOD 10+48)
0x0326…0349 LineComalBin {
0x0326…0349 ptr = 0x90a0 // 0x326 @0x0
0x0326…0349 lno = 0x0136 // 0x328 @0x2
0x0326…0349 at0004 = ╱44╱D╱ // 0x32a @0x4
0x0326…0349 at0005 = ╱41╱A╱ // 0x32b @0x5
0x0326…0349 at0006 = ╱32╱2╱ // 0x32c @0x6
0x0326…0349 at0007 = ╱ef╱$╱ // 0x32d @0x7
0x0326…0349 at0008 = ╱ed╱(╱ // 0x32e @0x8
0x0326…0349 at0009 = ╱4a╱J╱ // 0x32f @0x9
0x0326…0349 at000a = ╱ee╱)╱ // 0x330 @0xa
0x0326…0349 at000b = ╱dc╱=╱ // 0x331 @0xb
0x0326…0349 at000c = ╱cf╱CHR╱ // 0x332 @0xc
0x0326…0349 at000d = ╱ed╱(╱ // 0x333 @0xd
0x0326…0349 at000e = ╱44╱D╱ // 0x334 @0xe
0x0326…0349 at000f = ╱41╱A╱ // 0x335 @0xf
0x0326…0349 at0010 = ╱33╱3╱ // 0x336 @0x10
0x0326…0349 at0011 = ╱e8╱ MOD ╱ // 0x337 @0x11
0x0326…0349 at0012 = ╱31╱1╱ // 0x338 @0x12
0x0326…0349 at0013 = ╱30╱0╱ // 0x339 @0x13
0x0326…0349 at0014 = ╱fe0000a004╱ // 0x33a @0x14
0x0326…0349 at0019 = ╱e2╱+╱ // 0x33f @0x19
0x0326…0349 at001a = ╱34╱4╱ // 0x340 @0x1a
0x0326…0349 at001b = ╱38╱8╱ // 0x341 @0x1b
0x0326…0349 at001c = ╱fe0000c006╱ // 0x342 @0x1c
0x0326…0349 at0021 = ╱ee╱)╱ // 0x347 @0x21
0x0326…0349 at0022 = EOL // 0x348 @0x22
0x0326…0349 }
0x0349…035d 90b4 0320 DA3=DA3 DIV 10
0x0349…035d LineComalBin {
0x0349…035d ptr = 0x90b4 // 0x349 @0x0
0x0349…035d lno = 0x0140 // 0x34b @0x2
0x0349…035d at0004 = ╱44╱D╱ // 0x34d @0x4
0x0349…035d at0005 = ╱41╱A╱ // 0x34e @0x5
0x0349…035d at0006 = ╱33╱3╱ // 0x34f @0x6
0x0349…035d at0007 = ╱dc╱=╱ // 0x350 @0x7
0x0349…035d at0008 = ╱44╱D╱ // 0x351 @0x8
0x0349…035d at0009 = ╱41╱A╱ // 0x352 @0x9
0x0349…035d at000a = ╱33╱3╱ // 0x353 @0xa
0x0349…035d at000b = ╱e7╱ DIV ╱ // 0x354 @0xb
0x0349…035d at000c = ╱31╱1╱ // 0x355 @0xc
0x0349…035d at000d = ╱30╱0╱ // 0x356 @0xd
0x0349…035d at000e = ╱fe0000a004╱ // 0x357 @0xe
0x0349…035d at0013 = EOL // 0x35c @0x13
0x0349…035d }
0x035d…0363 90ba 0330 ENDIF
0x035d…0363 LineComalBin {
0x035d…0363 ptr = 0x90ba // 0x35d @0x0
0x035d…0363 lno = 0x014a // 0x35f @0x2
0x035d…0363 at0004 = ╱9b╱ ENDIF ╱ // 0x361 @0x4
0x035d…0363 at0005 = EOL // 0x362 @0x5
0x035d…0363 }
0x0363…036a 90c1 0340 NEXT J
0x0363…036a LineComalBin {
0x0363…036a ptr = 0x90c1 // 0x363 @0x0
0x0363…036a lno = 0x0154 // 0x365 @0x2
0x0363…036a at0004 = ╱84╱ NEXT ╱ // 0x367 @0x4
0x0363…036a at0005 = ╱4a╱J╱ // 0x368 @0x5
0x0363…036a at0006 = EOL // 0x369 @0x6
0x0363…036a }
0x036a…0370 90c7 0350 ENDPROC
0x036a…0370 LineComalBin {
0x036a…0370 ptr = 0x90c7 // 0x36a @0x0
0x036a…0370 lno = 0x015e // 0x36c @0x2
0x036a…0370 at0004 = ╱9f╱ ENDPROC ╱ // 0x36e @0x4
0x036a…0370 at0005 = EOL // 0x36f @0x5
0x036a…0370 }
0x0370…038a 90e1 0360 PROC INDTAB(T,MANTAL,L10)
0x0370…038a LineComalBin {
0x0370…038a ptr = 0x90e1 // 0x370 @0x0
0x0370…038a lno = 0x0168 // 0x372 @0x2
0x0370…038a at0004 = ╱9e╱ PROC ╱ // 0x374 @0x4
0x0370…038a at0005 = ╱49╱I╱ // 0x375 @0x5
0x0370…038a at0006 = ╱4e╱N╱ // 0x376 @0x6
0x0370…038a at0007 = ╱44╱D╱ // 0x377 @0x7
0x0370…038a at0008 = ╱54╱T╱ // 0x378 @0x8
0x0370…038a at0009 = ╱41╱A╱ // 0x379 @0x9
0x0370…038a at000a = ╱42╱B╱ // 0x37a @0xa
0x0370…038a at000b = ╱ed╱(╱ // 0x37b @0xb
0x0370…038a at000c = ╱54╱T╱ // 0x37c @0xc
0x0370…038a at000d = ╱ec╱,╱ // 0x37d @0xd
0x0370…038a at000e = ╱4d╱M╱ // 0x37e @0xe
0x0370…038a at000f = ╱41╱A╱ // 0x37f @0xf
0x0370…038a at0010 = ╱4e╱N╱ // 0x380 @0x10
0x0370…038a at0011 = ╱54╱T╱ // 0x381 @0x11
0x0370…038a at0012 = ╱41╱A╱ // 0x382 @0x12
0x0370…038a at0013 = ╱4c╱L╱ // 0x383 @0x13
0x0370…038a at0014 = ╱ec╱,╱ // 0x384 @0x14
0x0370…038a at0015 = ╱4c╱L╱ // 0x385 @0x15
0x0370…038a at0016 = ╱31╱1╱ // 0x386 @0x16
0x0370…038a at0017 = ╱30╱0╱ // 0x387 @0x17
0x0370…038a at0018 = ╱ee╱)╱ // 0x388 @0x18
0x0370…038a at0019 = EOL // 0x389 @0x19
0x0370…038a }
0x038a…03a1 90f8 0370 J=MANTAL DIV 32+E
0x038a…03a1 LineComalBin {
0x038a…03a1 ptr = 0x90f8 // 0x38a @0x0
0x038a…03a1 lno = 0x0172 // 0x38c @0x2
0x038a…03a1 at0004 = ╱4a╱J╱ // 0x38e @0x4
0x038a…03a1 at0005 = ╱dc╱=╱ // 0x38f @0x5
0x038a…03a1 at0006 = ╱4d╱M╱ // 0x390 @0x6
0x038a…03a1 at0007 = ╱41╱A╱ // 0x391 @0x7
0x038a…03a1 at0008 = ╱4e╱N╱ // 0x392 @0x8
0x038a…03a1 at0009 = ╱54╱T╱ // 0x393 @0x9
0x038a…03a1 at000a = ╱41╱A╱ // 0x394 @0xa
0x038a…03a1 at000b = ╱4c╱L╱ // 0x395 @0xb
0x038a…03a1 at000c = ╱e7╱ DIV ╱ // 0x396 @0xc
0x038a…03a1 at000d = ╱33╱3╱ // 0x397 @0xd
0x038a…03a1 at000e = ╱32╱2╱ // 0x398 @0xe
0x038a…03a1 at000f = ╱fe00008006╱ // 0x399 @0xf
0x038a…03a1 at0014 = ╱e2╱+╱ // 0x39e @0x14
0x038a…03a1 at0015 = ╱45╱E╱ // 0x39f @0x15
0x038a…03a1 at0016 = EOL // 0x3a0 @0x16
0x038a…03a1 }
0x03a1…03bc 9113 0380 FOR I=J TO MANTAL DIV 4+J-E
0x03a1…03bc LineComalBin {
0x03a1…03bc ptr = 0x9113 // 0x3a1 @0x0
0x03a1…03bc lno = 0x017c // 0x3a3 @0x2
0x03a1…03bc at0004 = ╱83╱ FOR ╱ // 0x3a5 @0x4
0x03a1…03bc at0005 = ╱49╱I╱ // 0x3a6 @0x5
0x03a1…03bc at0006 = ╱dc╱=╱ // 0x3a7 @0x6
0x03a1…03bc at0007 = ╱4a╱J╱ // 0x3a8 @0x7
0x03a1…03bc at0008 = ╱b7╱ TO ╱ // 0x3a9 @0x8
0x03a1…03bc at0009 = ╱4d╱M╱ // 0x3aa @0x9
0x03a1…03bc at000a = ╱41╱A╱ // 0x3ab @0xa
0x03a1…03bc at000b = ╱4e╱N╱ // 0x3ac @0xb
0x03a1…03bc at000c = ╱54╱T╱ // 0x3ad @0xc
0x03a1…03bc at000d = ╱41╱A╱ // 0x3ae @0xd
0x03a1…03bc at000e = ╱4c╱L╱ // 0x3af @0xe
0x03a1…03bc at000f = ╱e7╱ DIV ╱ // 0x3b0 @0xf
0x03a1…03bc at0010 = ╱34╱4╱ // 0x3b1 @0x10
0x03a1…03bc at0011 = ╱fe00008003╱ // 0x3b2 @0x11
0x03a1…03bc at0016 = ╱e2╱+╱ // 0x3b7 @0x16
0x03a1…03bc at0017 = ╱4a╱J╱ // 0x3b8 @0x17
0x03a1…03bc at0018 = ╱e3╱-╱ // 0x3b9 @0x18
0x03a1…03bc at0019 = ╱45╱E╱ // 0x3ba @0x19
0x03a1…03bc at001a = EOL // 0x3bb @0x1a
0x03a1…03bc }
0x03bc…03e6 913d 0390 H=(I-J)*4+E;H1=H+E;H2=H+G;H3=H+V
0x03bc…03e6 LineComalBin {
0x03bc…03e6 ptr = 0x913d // 0x3bc @0x0
0x03bc…03e6 lno = 0x0186 // 0x3be @0x2
0x03bc…03e6 at0004 = ╱48╱H╱ // 0x3c0 @0x4
0x03bc…03e6 at0005 = ╱dc╱=╱ // 0x3c1 @0x5
0x03bc…03e6 at0006 = ╱ed╱(╱ // 0x3c2 @0x6
0x03bc…03e6 at0007 = ╱49╱I╱ // 0x3c3 @0x7
0x03bc…03e6 at0008 = ╱e3╱-╱ // 0x3c4 @0x8
0x03bc…03e6 at0009 = ╱4a╱J╱ // 0x3c5 @0x9
0x03bc…03e6 at000a = ╱ee╱)╱ // 0x3c6 @0xa
0x03bc…03e6 at000b = ╱e4╱*╱ // 0x3c7 @0xb
0x03bc…03e6 at000c = ╱34╱4╱ // 0x3c8 @0xc
0x03bc…03e6 at000d = ╱fe00008003╱ // 0x3c9 @0xd
0x03bc…03e6 at0012 = ╱e2╱+╱ // 0x3ce @0x12
0x03bc…03e6 at0013 = ╱45╱E╱ // 0x3cf @0x13
0x03bc…03e6 at0014 = ╱eb╱;╱ // 0x3d0 @0x14
0x03bc…03e6 at0015 = ╱48╱H╱ // 0x3d1 @0x15
0x03bc…03e6 at0016 = ╱31╱1╱ // 0x3d2 @0x16
0x03bc…03e6 at0017 = ╱dc╱=╱ // 0x3d3 @0x17
0x03bc…03e6 at0018 = ╱48╱H╱ // 0x3d4 @0x18
0x03bc…03e6 at0019 = ╱e2╱+╱ // 0x3d5 @0x19
0x03bc…03e6 at001a = ╱45╱E╱ // 0x3d6 @0x1a
0x03bc…03e6 at001b = ╱eb╱;╱ // 0x3d7 @0x1b
0x03bc…03e6 at001c = ╱48╱H╱ // 0x3d8 @0x1c
0x03bc…03e6 at001d = ╱32╱2╱ // 0x3d9 @0x1d
0x03bc…03e6 at001e = ╱dc╱=╱ // 0x3da @0x1e
0x03bc…03e6 at001f = ╱48╱H╱ // 0x3db @0x1f
0x03bc…03e6 at0020 = ╱e2╱+╱ // 0x3dc @0x20
0x03bc…03e6 at0021 = ╱47╱G╱ // 0x3dd @0x21
0x03bc…03e6 at0022 = ╱eb╱;╱ // 0x3de @0x22
0x03bc…03e6 at0023 = ╱48╱H╱ // 0x3df @0x23
0x03bc…03e6 at0024 = ╱33╱3╱ // 0x3e0 @0x24
0x03bc…03e6 at0025 = ╱dc╱=╱ // 0x3e1 @0x25
0x03bc…03e6 at0026 = ╱48╱H╱ // 0x3e2 @0x26
0x03bc…03e6 at0027 = ╱e2╱+╱ // 0x3e3 @0x27
0x03bc…03e6 at0028 = ╱56╱V╱ // 0x3e4 @0x28
0x03bc…03e6 at0029 = EOL // 0x3e5 @0x29
0x03bc…03e6 }
0x03e6…0430 9187 0400 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)
0x03e6…0430 LineComalBin {
0x03e6…0430 ptr = 0x9187 // 0x3e6 @0x0
0x03e6…0430 lno = 0x0190 // 0x3e8 @0x2
0x03e6…0430 at0004 = ╱a9╱ GET ╱ // 0x3ea @0x4
0x03e6…0430 at0005 = ╱4c╱L╱ // 0x3eb @0x5
0x03e6…0430 at0006 = ╱31╱1╱ // 0x3ec @0x6
0x03e6…0430 at0007 = ╱30╱0╱ // 0x3ed @0x7
0x03e6…0430 at0008 = ╱ef╱$╱ // 0x3ee @0x8
0x03e6…0430 at0009 = ╱ec╱,╱ // 0x3ef @0x9
0x03e6…0430 at000a = ╱49╱I╱ // 0x3f0 @0xa
0x03e6…0430 at000b = ╱f0╱:╱ // 0x3f1 @0xb
0x03e6…0430 at000c = ╱54╱T╱ // 0x3f2 @0xc
0x03e6…0430 at000d = ╱ed╱(╱ // 0x3f3 @0xd
0x03e6…0430 at000e = ╱48╱H╱ // 0x3f4 @0xe
0x03e6…0430 at000f = ╱ec╱,╱ // 0x3f5 @0xf
0x03e6…0430 at0010 = ╱45╱E╱ // 0x3f6 @0x10
0x03e6…0430 at0011 = ╱ee╱)╱ // 0x3f7 @0x11
0x03e6…0430 at0012 = ╱ec╱,╱ // 0x3f8 @0x12
0x03e6…0430 at0013 = ╱54╱T╱ // 0x3f9 @0x13
0x03e6…0430 at0014 = ╱ed╱(╱ // 0x3fa @0x14
0x03e6…0430 at0015 = ╱48╱H╱ // 0x3fb @0x15
0x03e6…0430 at0016 = ╱ec╱,╱ // 0x3fc @0x16
0x03e6…0430 at0017 = ╱47╱G╱ // 0x3fd @0x17
0x03e6…0430 at0018 = ╱ee╱)╱ // 0x3fe @0x18
0x03e6…0430 at0019 = ╱ec╱,╱ // 0x3ff @0x19
0x03e6…0430 at001a = ╱54╱T╱ // 0x400 @0x1a
0x03e6…0430 at001b = ╱ed╱(╱ // 0x401 @0x1b
0x03e6…0430 at001c = ╱48╱H╱ // 0x402 @0x1c
0x03e6…0430 at001d = ╱31╱1╱ // 0x403 @0x1d
0x03e6…0430 at001e = ╱ec╱,╱ // 0x404 @0x1e
0x03e6…0430 at001f = ╱45╱E╱ // 0x405 @0x1f
0x03e6…0430 at0020 = ╱ee╱)╱ // 0x406 @0x20
0x03e6…0430 at0021 = ╱ec╱,╱ // 0x407 @0x21
0x03e6…0430 at0022 = ╱54╱T╱ // 0x408 @0x22
0x03e6…0430 at0023 = ╱ed╱(╱ // 0x409 @0x23
0x03e6…0430 at0024 = ╱48╱H╱ // 0x40a @0x24
0x03e6…0430 at0025 = ╱31╱1╱ // 0x40b @0x25
0x03e6…0430 at0026 = ╱ec╱,╱ // 0x40c @0x26
0x03e6…0430 at0027 = ╱47╱G╱ // 0x40d @0x27
0x03e6…0430 at0028 = ╱ee╱)╱ // 0x40e @0x28
0x03e6…0430 at0029 = ╱ec╱,╱ // 0x40f @0x29
0x03e6…0430 at002a = ╱54╱T╱ // 0x410 @0x2a
0x03e6…0430 at002b = ╱ed╱(╱ // 0x411 @0x2b
0x03e6…0430 at002c = ╱48╱H╱ // 0x412 @0x2c
0x03e6…0430 at002d = ╱32╱2╱ // 0x413 @0x2d
0x03e6…0430 at002e = ╱ec╱,╱ // 0x414 @0x2e
0x03e6…0430 at002f = ╱45╱E╱ // 0x415 @0x2f
0x03e6…0430 at0030 = ╱ee╱)╱ // 0x416 @0x30
0x03e6…0430 at0031 = ╱ec╱,╱ // 0x417 @0x31
0x03e6…0430 at0032 = ╱54╱T╱ // 0x418 @0x32
0x03e6…0430 at0033 = ╱ed╱(╱ // 0x419 @0x33
0x03e6…0430 at0034 = ╱48╱H╱ // 0x41a @0x34
0x03e6…0430 at0035 = ╱32╱2╱ // 0x41b @0x35
0x03e6…0430 at0036 = ╱ec╱,╱ // 0x41c @0x36
0x03e6…0430 at0037 = ╱47╱G╱ // 0x41d @0x37
0x03e6…0430 at0038 = ╱ee╱)╱ // 0x41e @0x38
0x03e6…0430 at0039 = ╱ec╱,╱ // 0x41f @0x39
0x03e6…0430 at003a = ╱54╱T╱ // 0x420 @0x3a
0x03e6…0430 at003b = ╱ed╱(╱ // 0x421 @0x3b
0x03e6…0430 at003c = ╱48╱H╱ // 0x422 @0x3c
0x03e6…0430 at003d = ╱33╱3╱ // 0x423 @0x3d
0x03e6…0430 at003e = ╱ec╱,╱ // 0x424 @0x3e
0x03e6…0430 at003f = ╱45╱E╱ // 0x425 @0x3f
0x03e6…0430 at0040 = ╱ee╱)╱ // 0x426 @0x40
0x03e6…0430 at0041 = ╱ec╱,╱ // 0x427 @0x41
0x03e6…0430 at0042 = ╱54╱T╱ // 0x428 @0x42
0x03e6…0430 at0043 = ╱ed╱(╱ // 0x429 @0x43
0x03e6…0430 at0044 = ╱48╱H╱ // 0x42a @0x44
0x03e6…0430 at0045 = ╱33╱3╱ // 0x42b @0x45
0x03e6…0430 at0046 = ╱ec╱,╱ // 0x42c @0x46
0x03e6…0430 at0047 = ╱47╱G╱ // 0x42d @0x47
0x03e6…0430 at0048 = ╱ee╱)╱ // 0x42e @0x48
0x03e6…0430 at0049 = EOL // 0x42f @0x49
0x03e6…0430 }
0x0430…0444 919b 0410 EXEC FEJL(E,E,L10$)
0x0430…0444 LineComalBin {
0x0430…0444 ptr = 0x919b // 0x430 @0x0
0x0430…0444 lno = 0x019a // 0x432 @0x2
0x0430…0444 at0004 = ╱9d╱ EXEC ╱ // 0x434 @0x4
0x0430…0444 at0005 = ╱46╱F╱ // 0x435 @0x5
0x0430…0444 at0006 = ╱45╱E╱ // 0x436 @0x6
0x0430…0444 at0007 = ╱4a╱J╱ // 0x437 @0x7
0x0430…0444 at0008 = ╱4c╱L╱ // 0x438 @0x8
0x0430…0444 at0009 = ╱ed╱(╱ // 0x439 @0x9
0x0430…0444 at000a = ╱45╱E╱ // 0x43a @0xa
0x0430…0444 at000b = ╱ec╱,╱ // 0x43b @0xb
0x0430…0444 at000c = ╱45╱E╱ // 0x43c @0xc
0x0430…0444 at000d = ╱ec╱,╱ // 0x43d @0xd
0x0430…0444 at000e = ╱4c╱L╱ // 0x43e @0xe
0x0430…0444 at000f = ╱31╱1╱ // 0x43f @0xf
0x0430…0444 at0010 = ╱30╱0╱ // 0x440 @0x10
0x0430…0444 at0011 = ╱ef╱$╱ // 0x441 @0x11
0x0430…0444 at0012 = ╱ee╱)╱ // 0x442 @0x12
0x0430…0444 at0013 = EOL // 0x443 @0x13
0x0430…0444 }
0x0444…044b 91a2 0420 NEXT I
0x0444…044b LineComalBin {
0x0444…044b ptr = 0x91a2 // 0x444 @0x0
0x0444…044b lno = 0x01a4 // 0x446 @0x2
0x0444…044b at0004 = ╱84╱ NEXT ╱ // 0x448 @0x4
0x0444…044b at0005 = ╱49╱I╱ // 0x449 @0x5
0x0444…044b at0006 = EOL // 0x44a @0x6
0x0444…044b }
0x044b…0451 91a8 0430 ENDPROC
0x044b…0451 LineComalBin {
0x044b…0451 ptr = 0x91a8 // 0x44b @0x0
0x044b…0451 lno = 0x01ae // 0x44d @0x2
0x044b…0451 at0004 = ╱9f╱ ENDPROC ╱ // 0x44f @0x4
0x044b…0451 at0005 = EOL // 0x450 @0x5
0x044b…0451 }
0x0451…0476 91cd 0440 PROC FINDPOST(TAB1,MANT1,NØGL1,PIL3)
0x0451…0476 LineComalBin {
0x0451…0476 ptr = 0x91cd // 0x451 @0x0
0x0451…0476 lno = 0x01b8 // 0x453 @0x2
0x0451…0476 at0004 = ╱9e╱ PROC ╱ // 0x455 @0x4
0x0451…0476 at0005 = ╱46╱F╱ // 0x456 @0x5
0x0451…0476 at0006 = ╱49╱I╱ // 0x457 @0x6
0x0451…0476 at0007 = ╱4e╱N╱ // 0x458 @0x7
0x0451…0476 at0008 = ╱44╱D╱ // 0x459 @0x8
0x0451…0476 at0009 = ╱50╱P╱ // 0x45a @0x9
0x0451…0476 at000a = ╱4f╱O╱ // 0x45b @0xa
0x0451…0476 at000b = ╱53╱S╱ // 0x45c @0xb
0x0451…0476 at000c = ╱54╱T╱ // 0x45d @0xc
0x0451…0476 at000d = ╱ed╱(╱ // 0x45e @0xd
0x0451…0476 at000e = ╱54╱T╱ // 0x45f @0xe
0x0451…0476 at000f = ╱41╱A╱ // 0x460 @0xf
0x0451…0476 at0010 = ╱42╱B╱ // 0x461 @0x10
0x0451…0476 at0011 = ╱31╱1╱ // 0x462 @0x11
0x0451…0476 at0012 = ╱ec╱,╱ // 0x463 @0x12
0x0451…0476 at0013 = ╱4d╱M╱ // 0x464 @0x13
0x0451…0476 at0014 = ╱41╱A╱ // 0x465 @0x14
0x0451…0476 at0015 = ╱4e╱N╱ // 0x466 @0x15
0x0451…0476 at0016 = ╱54╱T╱ // 0x467 @0x16
0x0451…0476 at0017 = ╱31╱1╱ // 0x468 @0x17
0x0451…0476 at0018 = ╱ec╱,╱ // 0x469 @0x18
0x0451…0476 at0019 = ╱4e╱N╱ // 0x46a @0x19
0x0451…0476 at001a = ╱5c╱Ø╱ // 0x46b @0x1a
0x0451…0476 at001b = ╱47╱G╱ // 0x46c @0x1b
0x0451…0476 at001c = ╱4c╱L╱ // 0x46d @0x1c
0x0451…0476 at001d = ╱31╱1╱ // 0x46e @0x1d
0x0451…0476 at001e = ╱ec╱,╱ // 0x46f @0x1e
0x0451…0476 at001f = ╱50╱P╱ // 0x470 @0x1f
0x0451…0476 at0020 = ╱49╱I╱ // 0x471 @0x20
0x0451…0476 at0021 = ╱4c╱L╱ // 0x472 @0x21
0x0451…0476 at0022 = ╱33╱3╱ // 0x473 @0x22
0x0451…0476 at0023 = ╱ee╱)╱ // 0x474 @0x23
0x0451…0476 at0024 = EOL // 0x475 @0x24
0x0451…0476 }
0x0476…0498 91ef 0450 PIL1=MANT1 DIV G;PIL3=PIL1;CEKS=E
0x0476…0498 LineComalBin {
0x0476…0498 ptr = 0x91ef // 0x476 @0x0
0x0476…0498 lno = 0x01c2 // 0x478 @0x2
0x0476…0498 at0004 = ╱50╱P╱ // 0x47a @0x4
0x0476…0498 at0005 = ╱49╱I╱ // 0x47b @0x5
0x0476…0498 at0006 = ╱4c╱L╱ // 0x47c @0x6
0x0476…0498 at0007 = ╱31╱1╱ // 0x47d @0x7
0x0476…0498 at0008 = ╱dc╱=╱ // 0x47e @0x8
0x0476…0498 at0009 = ╱4d╱M╱ // 0x47f @0x9
0x0476…0498 at000a = ╱41╱A╱ // 0x480 @0xa
0x0476…0498 at000b = ╱4e╱N╱ // 0x481 @0xb
0x0476…0498 at000c = ╱54╱T╱ // 0x482 @0xc
0x0476…0498 at000d = ╱31╱1╱ // 0x483 @0xd
0x0476…0498 at000e = ╱e7╱ DIV ╱ // 0x484 @0xe
0x0476…0498 at000f = ╱47╱G╱ // 0x485 @0xf
0x0476…0498 at0010 = ╱eb╱;╱ // 0x486 @0x10
0x0476…0498 at0011 = ╱50╱P╱ // 0x487 @0x11
0x0476…0498 at0012 = ╱49╱I╱ // 0x488 @0x12
0x0476…0498 at0013 = ╱4c╱L╱ // 0x489 @0x13
0x0476…0498 at0014 = ╱33╱3╱ // 0x48a @0x14
0x0476…0498 at0015 = ╱dc╱=╱ // 0x48b @0x15
0x0476…0498 at0016 = ╱50╱P╱ // 0x48c @0x16
0x0476…0498 at0017 = ╱49╱I╱ // 0x48d @0x17
0x0476…0498 at0018 = ╱4c╱L╱ // 0x48e @0x18
0x0476…0498 at0019 = ╱31╱1╱ // 0x48f @0x19
0x0476…0498 at001a = ╱eb╱;╱ // 0x490 @0x1a
0x0476…0498 at001b = ╱43╱C╱ // 0x491 @0x1b
0x0476…0498 at001c = ╱45╱E╱ // 0x492 @0x1c
0x0476…0498 at001d = ╱4b╱K╱ // 0x493 @0x1d
0x0476…0498 at001e = ╱53╱S╱ // 0x494 @0x1e
0x0476…0498 at001f = ╱dc╱=╱ // 0x495 @0x1f
0x0476…0498 at0020 = ╱45╱E╱ // 0x496 @0x20
0x0476…0498 at0021 = EOL // 0x497 @0x21
0x0476…0498 }
0x0498…049e 91f5 0460 REPEAT
0x0498…049e LineComalBin {
0x0498…049e ptr = 0x91f5 // 0x498 @0x0
0x0498…049e lno = 0x01cc // 0x49a @0x2
0x0498…049e at0004 = ╱97╱ REPEAT ╱ // 0x49c @0x4
0x0498…049e at0005 = EOL // 0x49d @0x5
0x0498…049e }
0x049e…04bf 9216 0470 IF NØGL1=TAB1(PIL3,E) OR PIL1=E THEN EXIT
0x049e…04bf LineComalBin {
0x049e…04bf ptr = 0x9216 // 0x49e @0x0
0x049e…04bf lno = 0x01d6 // 0x4a0 @0x2
0x049e…04bf at0004 = ╱82╱ IF ╱ // 0x4a2 @0x4
0x049e…04bf at0005 = ╱4e╱N╱ // 0x4a3 @0x5
0x049e…04bf at0006 = ╱5c╱Ø╱ // 0x4a4 @0x6
0x049e…04bf at0007 = ╱47╱G╱ // 0x4a5 @0x7
0x049e…04bf at0008 = ╱4c╱L╱ // 0x4a6 @0x8
0x049e…04bf at0009 = ╱31╱1╱ // 0x4a7 @0x9
0x049e…04bf at000a = ╱dc╱=╱ // 0x4a8 @0xa
0x049e…04bf at000b = ╱54╱T╱ // 0x4a9 @0xb
0x049e…04bf at000c = ╱41╱A╱ // 0x4aa @0xc
0x049e…04bf at000d = ╱42╱B╱ // 0x4ab @0xd
0x049e…04bf at000e = ╱31╱1╱ // 0x4ac @0xe
0x049e…04bf at000f = ╱ed╱(╱ // 0x4ad @0xf
0x049e…04bf at0010 = ╱50╱P╱ // 0x4ae @0x10
0x049e…04bf at0011 = ╱49╱I╱ // 0x4af @0x11
0x049e…04bf at0012 = ╱4c╱L╱ // 0x4b0 @0x12
0x049e…04bf at0013 = ╱33╱3╱ // 0x4b1 @0x13
0x049e…04bf at0014 = ╱ec╱,╱ // 0x4b2 @0x14
0x049e…04bf at0015 = ╱45╱E╱ // 0x4b3 @0x15
0x049e…04bf at0016 = ╱ee╱)╱ // 0x4b4 @0x16
0x049e…04bf at0017 = ╱db╱ OR ╱ // 0x4b5 @0x17
0x049e…04bf at0018 = ╱50╱P╱ // 0x4b6 @0x18
0x049e…04bf at0019 = ╱49╱I╱ // 0x4b7 @0x19
0x049e…04bf at001a = ╱4c╱L╱ // 0x4b8 @0x1a
0x049e…04bf at001b = ╱31╱1╱ // 0x4b9 @0x1b
0x049e…04bf at001c = ╱dc╱=╱ // 0x4ba @0x1c
0x049e…04bf at001d = ╱45╱E╱ // 0x4bb @0x1d
0x049e…04bf at001e = ╱b6╱ THEN ╱ // 0x4bc @0x1e
0x049e…04bf at001f = ╱99╱ EXIT ╱ // 0x4bd @0x1f
0x049e…04bf at0020 = EOL // 0x4be @0x20
0x049e…04bf }
0x04bf…04fd 9254 0480 PIL1=(PIL1+E) DIV G;PIL3=PIL3+PIL1*(E-G*(NØGL1<TAB1(PIL3,E)))
0x04bf…04fd LineComalBin {
0x04bf…04fd ptr = 0x9254 // 0x4bf @0x0
0x04bf…04fd lno = 0x01e0 // 0x4c1 @0x2
0x04bf…04fd at0004 = ╱50╱P╱ // 0x4c3 @0x4
0x04bf…04fd at0005 = ╱49╱I╱ // 0x4c4 @0x5
0x04bf…04fd at0006 = ╱4c╱L╱ // 0x4c5 @0x6
0x04bf…04fd at0007 = ╱31╱1╱ // 0x4c6 @0x7
0x04bf…04fd at0008 = ╱dc╱=╱ // 0x4c7 @0x8
0x04bf…04fd at0009 = ╱ed╱(╱ // 0x4c8 @0x9
0x04bf…04fd at000a = ╱50╱P╱ // 0x4c9 @0xa
0x04bf…04fd at000b = ╱49╱I╱ // 0x4ca @0xb
0x04bf…04fd at000c = ╱4c╱L╱ // 0x4cb @0xc
0x04bf…04fd at000d = ╱31╱1╱ // 0x4cc @0xd
0x04bf…04fd at000e = ╱e2╱+╱ // 0x4cd @0xe
0x04bf…04fd at000f = ╱45╱E╱ // 0x4ce @0xf
0x04bf…04fd at0010 = ╱ee╱)╱ // 0x4cf @0x10
0x04bf…04fd at0011 = ╱e7╱ DIV ╱ // 0x4d0 @0x11
0x04bf…04fd at0012 = ╱47╱G╱ // 0x4d1 @0x12
0x04bf…04fd at0013 = ╱eb╱;╱ // 0x4d2 @0x13
0x04bf…04fd at0014 = ╱50╱P╱ // 0x4d3 @0x14
0x04bf…04fd at0015 = ╱49╱I╱ // 0x4d4 @0x15
0x04bf…04fd at0016 = ╱4c╱L╱ // 0x4d5 @0x16
0x04bf…04fd at0017 = ╱33╱3╱ // 0x4d6 @0x17
0x04bf…04fd at0018 = ╱dc╱=╱ // 0x4d7 @0x18
0x04bf…04fd at0019 = ╱50╱P╱ // 0x4d8 @0x19
0x04bf…04fd at001a = ╱49╱I╱ // 0x4d9 @0x1a
0x04bf…04fd at001b = ╱4c╱L╱ // 0x4da @0x1b
0x04bf…04fd at001c = ╱33╱3╱ // 0x4db @0x1c
0x04bf…04fd at001d = ╱e2╱+╱ // 0x4dc @0x1d
0x04bf…04fd at001e = ╱50╱P╱ // 0x4dd @0x1e
0x04bf…04fd at001f = ╱49╱I╱ // 0x4de @0x1f
0x04bf…04fd at0020 = ╱4c╱L╱ // 0x4df @0x20
0x04bf…04fd at0021 = ╱31╱1╱ // 0x4e0 @0x21
0x04bf…04fd at0022 = ╱e4╱*╱ // 0x4e1 @0x22
0x04bf…04fd at0023 = ╱ed╱(╱ // 0x4e2 @0x23
0x04bf…04fd at0024 = ╱45╱E╱ // 0x4e3 @0x24
0x04bf…04fd at0025 = ╱e3╱-╱ // 0x4e4 @0x25
0x04bf…04fd at0026 = ╱47╱G╱ // 0x4e5 @0x26
0x04bf…04fd at0027 = ╱e4╱*╱ // 0x4e6 @0x27
0x04bf…04fd at0028 = ╱ed╱(╱ // 0x4e7 @0x28
0x04bf…04fd at0029 = ╱4e╱N╱ // 0x4e8 @0x29
0x04bf…04fd at002a = ╱5c╱Ø╱ // 0x4e9 @0x2a
0x04bf…04fd at002b = ╱47╱G╱ // 0x4ea @0x2b
0x04bf…04fd at002c = ╱4c╱L╱ // 0x4eb @0x2c
0x04bf…04fd at002d = ╱31╱1╱ // 0x4ec @0x2d
0x04bf…04fd at002e = ╱dd╱<╱ // 0x4ed @0x2e
0x04bf…04fd at002f = ╱54╱T╱ // 0x4ee @0x2f
0x04bf…04fd at0030 = ╱41╱A╱ // 0x4ef @0x30
0x04bf…04fd at0031 = ╱42╱B╱ // 0x4f0 @0x31
0x04bf…04fd at0032 = ╱31╱1╱ // 0x4f1 @0x32
0x04bf…04fd at0033 = ╱ed╱(╱ // 0x4f2 @0x33
0x04bf…04fd at0034 = ╱50╱P╱ // 0x4f3 @0x34
0x04bf…04fd at0035 = ╱49╱I╱ // 0x4f4 @0x35
0x04bf…04fd at0036 = ╱4c╱L╱ // 0x4f5 @0x36
0x04bf…04fd at0037 = ╱33╱3╱ // 0x4f6 @0x37
0x04bf…04fd at0038 = ╱ec╱,╱ // 0x4f7 @0x38
0x04bf…04fd at0039 = ╱45╱E╱ // 0x4f8 @0x39
0x04bf…04fd at003a = ╱ee╱)╱ // 0x4f9 @0x3a
0x04bf…04fd at003b = ╱ee╱)╱ // 0x4fa @0x3b
0x04bf…04fd at003c = ╱ee╱)╱ // 0x4fb @0x3c
0x04bf…04fd at003d = EOL // 0x4fc @0x3d
0x04bf…04fd }
0x04fd…0510 9267 0490 IF PIL3<E THEN PIL3=E
0x04fd…0510 LineComalBin {
0x04fd…0510 ptr = 0x9267 // 0x4fd @0x0
0x04fd…0510 lno = 0x01ea // 0x4ff @0x2
0x04fd…0510 at0004 = ╱82╱ IF ╱ // 0x501 @0x4
0x04fd…0510 at0005 = ╱50╱P╱ // 0x502 @0x5
0x04fd…0510 at0006 = ╱49╱I╱ // 0x503 @0x6
0x04fd…0510 at0007 = ╱4c╱L╱ // 0x504 @0x7
0x04fd…0510 at0008 = ╱33╱3╱ // 0x505 @0x8
0x04fd…0510 at0009 = ╱dd╱<╱ // 0x506 @0x9
0x04fd…0510 at000a = ╱45╱E╱ // 0x507 @0xa
0x04fd…0510 at000b = ╱b6╱ THEN ╱ // 0x508 @0xb
0x04fd…0510 at000c = ╱50╱P╱ // 0x509 @0xc
0x04fd…0510 at000d = ╱49╱I╱ // 0x50a @0xd
0x04fd…0510 at000e = ╱4c╱L╱ // 0x50b @0xe
0x04fd…0510 at000f = ╱33╱3╱ // 0x50c @0xf
0x04fd…0510 at0010 = ╱dc╱=╱ // 0x50d @0x10
0x04fd…0510 at0011 = ╱45╱E╱ // 0x50e @0x11
0x04fd…0510 at0012 = EOL // 0x50f @0x12
0x04fd…0510 }
0x0510…052b 9282 0500 IF PIL3>MANT1 THEN PIL3=MANT1
0x0510…052b LineComalBin {
0x0510…052b ptr = 0x9282 // 0x510 @0x0
0x0510…052b lno = 0x01f4 // 0x512 @0x2
0x0510…052b at0004 = ╱82╱ IF ╱ // 0x514 @0x4
0x0510…052b at0005 = ╱50╱P╱ // 0x515 @0x5
0x0510…052b at0006 = ╱49╱I╱ // 0x516 @0x6
0x0510…052b at0007 = ╱4c╱L╱ // 0x517 @0x7
0x0510…052b at0008 = ╱33╱3╱ // 0x518 @0x8
0x0510…052b at0009 = ╱de╱>╱ // 0x519 @0x9
0x0510…052b at000a = ╱4d╱M╱ // 0x51a @0xa
0x0510…052b at000b = ╱41╱A╱ // 0x51b @0xb
0x0510…052b at000c = ╱4e╱N╱ // 0x51c @0xc
0x0510…052b at000d = ╱54╱T╱ // 0x51d @0xd
0x0510…052b at000e = ╱31╱1╱ // 0x51e @0xe
0x0510…052b at000f = ╱b6╱ THEN ╱ // 0x51f @0xf
0x0510…052b at0010 = ╱50╱P╱ // 0x520 @0x10
0x0510…052b at0011 = ╱49╱I╱ // 0x521 @0x11
0x0510…052b at0012 = ╱4c╱L╱ // 0x522 @0x12
0x0510…052b at0013 = ╱33╱3╱ // 0x523 @0x13
0x0510…052b at0014 = ╱dc╱=╱ // 0x524 @0x14
0x0510…052b at0015 = ╱4d╱M╱ // 0x525 @0x15
0x0510…052b at0016 = ╱41╱A╱ // 0x526 @0x16
0x0510…052b at0017 = ╱4e╱N╱ // 0x527 @0x17
0x0510…052b at0018 = ╱54╱T╱ // 0x528 @0x18
0x0510…052b at0019 = ╱31╱1╱ // 0x529 @0x19
0x0510…052b at001a = EOL // 0x52a @0x1a
0x0510…052b }
0x052b…0537 928e 0510 UNTIL PIL1=B
0x052b…0537 LineComalBin {
0x052b…0537 ptr = 0x928e // 0x52b @0x0
0x052b…0537 lno = 0x01fe // 0x52d @0x2
0x052b…0537 at0004 = ╱98╱ UNTIL ╱ // 0x52f @0x4
0x052b…0537 at0005 = ╱50╱P╱ // 0x530 @0x5
0x052b…0537 at0006 = ╱49╱I╱ // 0x531 @0x6
0x052b…0537 at0007 = ╱4c╱L╱ // 0x532 @0x7
0x052b…0537 at0008 = ╱31╱1╱ // 0x533 @0x8
0x052b…0537 at0009 = ╱dc╱=╱ // 0x534 @0x9
0x052b…0537 at000a = ╱42╱B╱ // 0x535 @0xa
0x052b…0537 at000b = EOL // 0x536 @0xb
0x052b…0537 }
0x0537…0568 92bf 0520 IF NØGL1>TAB1(PIL3,E) THEN PIL3=PIL3+E*(PIL3<MANT1)
0x0537…0568 LineComalBin {
0x0537…0568 ptr = 0x92bf // 0x537 @0x0
0x0537…0568 lno = 0x0208 // 0x539 @0x2
0x0537…0568 at0004 = ╱82╱ IF ╱ // 0x53b @0x4
0x0537…0568 at0005 = ╱4e╱N╱ // 0x53c @0x5
0x0537…0568 at0006 = ╱5c╱Ø╱ // 0x53d @0x6
0x0537…0568 at0007 = ╱47╱G╱ // 0x53e @0x7
0x0537…0568 at0008 = ╱4c╱L╱ // 0x53f @0x8
0x0537…0568 at0009 = ╱31╱1╱ // 0x540 @0x9
0x0537…0568 at000a = ╱de╱>╱ // 0x541 @0xa
0x0537…0568 at000b = ╱54╱T╱ // 0x542 @0xb
0x0537…0568 at000c = ╱41╱A╱ // 0x543 @0xc
0x0537…0568 at000d = ╱42╱B╱ // 0x544 @0xd
0x0537…0568 at000e = ╱31╱1╱ // 0x545 @0xe
0x0537…0568 at000f = ╱ed╱(╱ // 0x546 @0xf
0x0537…0568 at0010 = ╱50╱P╱ // 0x547 @0x10
0x0537…0568 at0011 = ╱49╱I╱ // 0x548 @0x11
0x0537…0568 at0012 = ╱4c╱L╱ // 0x549 @0x12
0x0537…0568 at0013 = ╱33╱3╱ // 0x54a @0x13
0x0537…0568 at0014 = ╱ec╱,╱ // 0x54b @0x14
0x0537…0568 at0015 = ╱45╱E╱ // 0x54c @0x15
0x0537…0568 at0016 = ╱ee╱)╱ // 0x54d @0x16
0x0537…0568 at0017 = ╱b6╱ THEN ╱ // 0x54e @0x17
0x0537…0568 at0018 = ╱50╱P╱ // 0x54f @0x18
0x0537…0568 at0019 = ╱49╱I╱ // 0x550 @0x19
0x0537…0568 at001a = ╱4c╱L╱ // 0x551 @0x1a
0x0537…0568 at001b = ╱33╱3╱ // 0x552 @0x1b
0x0537…0568 at001c = ╱dc╱=╱ // 0x553 @0x1c
0x0537…0568 at001d = ╱50╱P╱ // 0x554 @0x1d
0x0537…0568 at001e = ╱49╱I╱ // 0x555 @0x1e
0x0537…0568 at001f = ╱4c╱L╱ // 0x556 @0x1f
0x0537…0568 at0020 = ╱33╱3╱ // 0x557 @0x20
0x0537…0568 at0021 = ╱e2╱+╱ // 0x558 @0x21
0x0537…0568 at0022 = ╱45╱E╱ // 0x559 @0x22
0x0537…0568 at0023 = ╱e4╱*╱ // 0x55a @0x23
0x0537…0568 at0024 = ╱ed╱(╱ // 0x55b @0x24
0x0537…0568 at0025 = ╱50╱P╱ // 0x55c @0x25
0x0537…0568 at0026 = ╱49╱I╱ // 0x55d @0x26
0x0537…0568 at0027 = ╱4c╱L╱ // 0x55e @0x27
0x0537…0568 at0028 = ╱33╱3╱ // 0x55f @0x28
0x0537…0568 at0029 = ╱dd╱<╱ // 0x560 @0x29
0x0537…0568 at002a = ╱4d╱M╱ // 0x561 @0x2a
0x0537…0568 at002b = ╱41╱A╱ // 0x562 @0x2b
0x0537…0568 at002c = ╱4e╱N╱ // 0x563 @0x2c
0x0537…0568 at002d = ╱54╱T╱ // 0x564 @0x2d
0x0537…0568 at002e = ╱31╱1╱ // 0x565 @0x2e
0x0537…0568 at002f = ╱ee╱)╱ // 0x566 @0x2f
0x0537…0568 at0030 = EOL // 0x567 @0x30
0x0537…0568 }
0x0568…0587 92de 0530 IF NØGL1=TAB1(PIL3,E) THEN CEKS=B
0x0568…0587 LineComalBin {
0x0568…0587 ptr = 0x92de // 0x568 @0x0
0x0568…0587 lno = 0x0212 // 0x56a @0x2
0x0568…0587 at0004 = ╱82╱ IF ╱ // 0x56c @0x4
0x0568…0587 at0005 = ╱4e╱N╱ // 0x56d @0x5
0x0568…0587 at0006 = ╱5c╱Ø╱ // 0x56e @0x6
0x0568…0587 at0007 = ╱47╱G╱ // 0x56f @0x7
0x0568…0587 at0008 = ╱4c╱L╱ // 0x570 @0x8
0x0568…0587 at0009 = ╱31╱1╱ // 0x571 @0x9
0x0568…0587 at000a = ╱dc╱=╱ // 0x572 @0xa
0x0568…0587 at000b = ╱54╱T╱ // 0x573 @0xb
0x0568…0587 at000c = ╱41╱A╱ // 0x574 @0xc
0x0568…0587 at000d = ╱42╱B╱ // 0x575 @0xd
0x0568…0587 at000e = ╱31╱1╱ // 0x576 @0xe
0x0568…0587 at000f = ╱ed╱(╱ // 0x577 @0xf
0x0568…0587 at0010 = ╱50╱P╱ // 0x578 @0x10
0x0568…0587 at0011 = ╱49╱I╱ // 0x579 @0x11
0x0568…0587 at0012 = ╱4c╱L╱ // 0x57a @0x12
0x0568…0587 at0013 = ╱33╱3╱ // 0x57b @0x13
0x0568…0587 at0014 = ╱ec╱,╱ // 0x57c @0x14
0x0568…0587 at0015 = ╱45╱E╱ // 0x57d @0x15
0x0568…0587 at0016 = ╱ee╱)╱ // 0x57e @0x16
0x0568…0587 at0017 = ╱b6╱ THEN ╱ // 0x57f @0x17
0x0568…0587 at0018 = ╱43╱C╱ // 0x580 @0x18
0x0568…0587 at0019 = ╱45╱E╱ // 0x581 @0x19
0x0568…0587 at001a = ╱4b╱K╱ // 0x582 @0x1a
0x0568…0587 at001b = ╱53╱S╱ // 0x583 @0x1b
0x0568…0587 at001c = ╱dc╱=╱ // 0x584 @0x1c
0x0568…0587 at001d = ╱42╱B╱ // 0x585 @0x1d
0x0568…0587 at001e = EOL // 0x586 @0x1e
0x0568…0587 }
0x0587…058d 92e4 0540 ENDPROC
0x0587…058d LineComalBin {
0x0587…058d ptr = 0x92e4 // 0x587 @0x0
0x0587…058d lno = 0x021c // 0x589 @0x2
0x0587…058d at0004 = ╱9f╱ ENDPROC ╱ // 0x58b @0x4
0x0587…058d at0005 = EOL // 0x58c @0x5
0x0587…058d }
0x058d…059f 92f6 0550 PROC NRTEST(NUM1)
0x058d…059f LineComalBin {
0x058d…059f ptr = 0x92f6 // 0x58d @0x0
0x058d…059f lno = 0x0226 // 0x58f @0x2
0x058d…059f at0004 = ╱9e╱ PROC ╱ // 0x591 @0x4
0x058d…059f at0005 = ╱4e╱N╱ // 0x592 @0x5
0x058d…059f at0006 = ╱52╱R╱ // 0x593 @0x6
0x058d…059f at0007 = ╱54╱T╱ // 0x594 @0x7
0x058d…059f at0008 = ╱45╱E╱ // 0x595 @0x8
0x058d…059f at0009 = ╱53╱S╱ // 0x596 @0x9
0x058d…059f at000a = ╱54╱T╱ // 0x597 @0xa
0x058d…059f at000b = ╱ed╱(╱ // 0x598 @0xb
0x058d…059f at000c = ╱4e╱N╱ // 0x599 @0xc
0x058d…059f at000d = ╱55╱U╱ // 0x59a @0xd
0x058d…059f at000e = ╱4d╱M╱ // 0x59b @0xe
0x058d…059f at000f = ╱31╱1╱ // 0x59c @0xf
0x058d…059f at0010 = ╱ee╱)╱ // 0x59d @0x10
0x058d…059f at0011 = EOL // 0x59e @0x11
0x058d…059f }
0x059f…05bd 9314 0560 P,TEST2,KTAL=B;L=LEN(NUM1$)
0x059f…05bd LineComalBin {
0x059f…05bd ptr = 0x9314 // 0x59f @0x0
0x059f…05bd lno = 0x0230 // 0x5a1 @0x2
0x059f…05bd at0004 = ╱50╱P╱ // 0x5a3 @0x4
0x059f…05bd at0005 = ╱ec╱,╱ // 0x5a4 @0x5
0x059f…05bd at0006 = ╱54╱T╱ // 0x5a5 @0x6
0x059f…05bd at0007 = ╱45╱E╱ // 0x5a6 @0x7
0x059f…05bd at0008 = ╱53╱S╱ // 0x5a7 @0x8
0x059f…05bd at0009 = ╱54╱T╱ // 0x5a8 @0x9
0x059f…05bd at000a = ╱32╱2╱ // 0x5a9 @0xa
0x059f…05bd at000b = ╱ec╱,╱ // 0x5aa @0xb
0x059f…05bd at000c = ╱4b╱K╱ // 0x5ab @0xc
0x059f…05bd at000d = ╱54╱T╱ // 0x5ac @0xd
0x059f…05bd at000e = ╱41╱A╱ // 0x5ad @0xe
0x059f…05bd at000f = ╱4c╱L╱ // 0x5ae @0xf
0x059f…05bd at0010 = ╱dc╱=╱ // 0x5af @0x10
0x059f…05bd at0011 = ╱42╱B╱ // 0x5b0 @0x11
0x059f…05bd at0012 = ╱eb╱;╱ // 0x5b1 @0x12
0x059f…05bd at0013 = ╱4c╱L╱ // 0x5b2 @0x13
0x059f…05bd at0014 = ╱dc╱=╱ // 0x5b3 @0x14
0x059f…05bd at0015 = ╱cc╱LEN╱ // 0x5b4 @0x15
0x059f…05bd at0016 = ╱ed╱(╱ // 0x5b5 @0x16
0x059f…05bd at0017 = ╱4e╱N╱ // 0x5b6 @0x17
0x059f…05bd at0018 = ╱55╱U╱ // 0x5b7 @0x18
0x059f…05bd at0019 = ╱4d╱M╱ // 0x5b8 @0x19
0x059f…05bd at001a = ╱31╱1╱ // 0x5b9 @0x1a
0x059f…05bd at001b = ╱ef╱$╱ // 0x5ba @0x1b
0x059f…05bd at001c = ╱ee╱)╱ // 0x5bb @0x1c
0x059f…05bd at001d = EOL // 0x5bc @0x1d
0x059f…05bd }
0x05bd…05c6 931d 0570 CASE L OF
0x05bd…05c6 LineComalBin {
0x05bd…05c6 ptr = 0x931d // 0x5bd @0x0
0x05bd…05c6 lno = 0x023a // 0x5bf @0x2
0x05bd…05c6 at0004 = ╱a201╱ CASE ╱ // 0x5c1 @0x4
0x05bd…05c6 at0006 = ╱4c╱L╱ // 0x5c3 @0x6
0x05bd…05c6 at0007 = ╱ba╱ OF ╱ // 0x5c4 @0x7
0x05bd…05c6 at0008 = EOL // 0x5c5 @0x8
0x05bd…05c6 }
0x05c6…05d1 9328 0580 FOR I=E TO L
0x05c6…05d1 LineComalBin {
0x05c6…05d1 ptr = 0x9328 // 0x5c6 @0x0
0x05c6…05d1 lno = 0x0244 // 0x5c8 @0x2
0x05c6…05d1 at0004 = ╱83╱ FOR ╱ // 0x5ca @0x4
0x05c6…05d1 at0005 = ╱49╱I╱ // 0x5cb @0x5
0x05c6…05d1 at0006 = ╱dc╱=╱ // 0x5cc @0x6
0x05c6…05d1 at0007 = ╱45╱E╱ // 0x5cd @0x7
0x05c6…05d1 at0008 = ╱b7╱ TO ╱ // 0x5ce @0x8
0x05c6…05d1 at0009 = ╱4c╱L╱ // 0x5cf @0x9
0x05c6…05d1 at000a = EOL // 0x5d0 @0xa
0x05c6…05d1 }
0x05d1…05ef 9346 0590 P1=INT(ORD(NUM1$(I))-48)
0x05d1…05ef LineComalBin {
0x05d1…05ef ptr = 0x9346 // 0x5d1 @0x0
0x05d1…05ef lno = 0x024e // 0x5d3 @0x2
0x05d1…05ef at0004 = ╱50╱P╱ // 0x5d5 @0x4
0x05d1…05ef at0005 = ╱31╱1╱ // 0x5d6 @0x5
0x05d1…05ef at0006 = ╱dc╱=╱ // 0x5d7 @0x6
0x05d1…05ef at0007 = ╱c6╱INT╱ // 0x5d8 @0x7
0x05d1…05ef at0008 = ╱ed╱(╱ // 0x5d9 @0x8
0x05d1…05ef at0009 = ╱cd╱ORD╱ // 0x5da @0x9
0x05d1…05ef at000a = ╱ed╱(╱ // 0x5db @0xa
0x05d1…05ef at000b = ╱4e╱N╱ // 0x5dc @0xb
0x05d1…05ef at000c = ╱55╱U╱ // 0x5dd @0xc
0x05d1…05ef at000d = ╱4d╱M╱ // 0x5de @0xd
0x05d1…05ef at000e = ╱31╱1╱ // 0x5df @0xe
0x05d1…05ef at000f = ╱ef╱$╱ // 0x5e0 @0xf
0x05d1…05ef at0010 = ╱ed╱(╱ // 0x5e1 @0x10
0x05d1…05ef at0011 = ╱49╱I╱ // 0x5e2 @0x11
0x05d1…05ef at0012 = ╱ee╱)╱ // 0x5e3 @0x12
0x05d1…05ef at0013 = ╱ee╱)╱ // 0x5e4 @0x13
0x05d1…05ef at0014 = ╱e3╱-╱ // 0x5e5 @0x14
0x05d1…05ef at0015 = ╱34╱4╱ // 0x5e6 @0x15
0x05d1…05ef at0016 = ╱38╱8╱ // 0x5e7 @0x16
0x05d1…05ef at0017 = ╱fe0000c006╱ // 0x5e8 @0x17
0x05d1…05ef at001c = ╱ee╱)╱ // 0x5ed @0x1c
0x05d1…05ef at001d = EOL // 0x5ee @0x1d
0x05d1…05ef }
0x05ef…05ff 9356 0600 IF P1=>B AND P1<=W THEN
0x05ef…05ff LineComalBin {
0x05ef…05ff ptr = 0x9356 // 0x5ef @0x0
0x05ef…05ff lno = 0x0258 // 0x5f1 @0x2
0x05ef…05ff at0004 = ╱9c╱ IF ╱ // 0x5f3 @0x4
0x05ef…05ff at0005 = ╱50╱P╱ // 0x5f4 @0x5
0x05ef…05ff at0006 = ╱31╱1╱ // 0x5f5 @0x6
0x05ef…05ff at0007 = ╱e0╱=>╱ // 0x5f6 @0x7
0x05ef…05ff at0008 = ╱42╱B╱ // 0x5f7 @0x8
0x05ef…05ff at0009 = ╱da╱ AND ╱ // 0x5f8 @0x9
0x05ef…05ff at000a = ╱50╱P╱ // 0x5f9 @0xa
0x05ef…05ff at000b = ╱31╱1╱ // 0x5fa @0xb
0x05ef…05ff at000c = ╱df╱<=╱ // 0x5fb @0xc
0x05ef…05ff at000d = ╱57╱W╱ // 0x5fc @0xd
0x05ef…05ff at000e = ╱b6╱ THEN ╱ // 0x5fd @0xe
0x05ef…05ff at000f = EOL // 0x5fe @0xf
0x05ef…05ff }
0x05ff…0612 9369 0610 P=P*10+P1
0x05ff…0612 LineComalBin {
0x05ff…0612 ptr = 0x9369 // 0x5ff @0x0
0x05ff…0612 lno = 0x0262 // 0x601 @0x2
0x05ff…0612 at0004 = ╱50╱P╱ // 0x603 @0x4
0x05ff…0612 at0005 = ╱dc╱=╱ // 0x604 @0x5
0x05ff…0612 at0006 = ╱50╱P╱ // 0x605 @0x6
0x05ff…0612 at0007 = ╱e4╱*╱ // 0x606 @0x7
0x05ff…0612 at0008 = ╱31╱1╱ // 0x607 @0x8
0x05ff…0612 at0009 = ╱30╱0╱ // 0x608 @0x9
0x05ff…0612 at000a = ╱fe0000a004╱ // 0x609 @0xa
0x05ff…0612 at000f = ╱e2╱+╱ // 0x60e @0xf
0x05ff…0612 at0010 = ╱50╱P╱ // 0x60f @0x10
0x05ff…0612 at0011 = ╱31╱1╱ // 0x610 @0x11
0x05ff…0612 at0012 = EOL // 0x611 @0x12
0x05ff…0612 }
0x0612…0618 936f 0620 ELSE
0x0612…0618 LineComalBin {
0x0612…0618 ptr = 0x936f // 0x612 @0x0
0x0612…0618 lno = 0x026c // 0x614 @0x2
0x0612…0618 at0004 = ╱9a╱ ELSE ╱ // 0x616 @0x4
0x0612…0618 at0005 = EOL // 0x617 @0x5
0x0612…0618 }
0x0618…0624 937b 0630 TEST2=E
0x0618…0624 LineComalBin {
0x0618…0624 ptr = 0x937b // 0x618 @0x0
0x0618…0624 lno = 0x0276 // 0x61a @0x2
0x0618…0624 at0004 = ╱54╱T╱ // 0x61c @0x4
0x0618…0624 at0005 = ╱45╱E╱ // 0x61d @0x5
0x0618…0624 at0006 = ╱53╱S╱ // 0x61e @0x6
0x0618…0624 at0007 = ╱54╱T╱ // 0x61f @0x7
0x0618…0624 at0008 = ╱32╱2╱ // 0x620 @0x8
0x0618…0624 at0009 = ╱dc╱=╱ // 0x621 @0x9
0x0618…0624 at000a = ╱45╱E╱ // 0x622 @0xa
0x0618…0624 at000b = EOL // 0x623 @0xb
0x0618…0624 }
0x0624…062a 9381 0640 ENDIF
0x0624…062a LineComalBin {
0x0624…062a ptr = 0x9381 // 0x624 @0x0
0x0624…062a lno = 0x0280 // 0x626 @0x2
0x0624…062a at0004 = ╱9b╱ ENDIF ╱ // 0x628 @0x4
0x0624…062a at0005 = EOL // 0x629 @0x5
0x0624…062a }
0x062a…0631 9388 0650 NEXT I
0x062a…0631 LineComalBin {
0x062a…0631 ptr = 0x9388 // 0x62a @0x0
0x062a…0631 lno = 0x028a // 0x62c @0x2
0x062a…0631 at0004 = ╱84╱ NEXT ╱ // 0x62e @0x4
0x062a…0631 at0005 = ╱49╱I╱ // 0x62f @0x5
0x062a…0631 at0006 = EOL // 0x630 @0x6
0x062a…0631 }
0x0631…0659 93b0 0660 KTAL=P DIV 10000;KTAL9=P DIV 1000
0x0631…0659 LineComalBin {
0x0631…0659 ptr = 0x93b0 // 0x631 @0x0
0x0631…0659 lno = 0x0294 // 0x633 @0x2
0x0631…0659 at0004 = ╱4b╱K╱ // 0x635 @0x4
0x0631…0659 at0005 = ╱54╱T╱ // 0x636 @0x5
0x0631…0659 at0006 = ╱41╱A╱ // 0x637 @0x6
0x0631…0659 at0007 = ╱4c╱L╱ // 0x638 @0x7
0x0631…0659 at0008 = ╱dc╱=╱ // 0x639 @0x8
0x0631…0659 at0009 = ╱50╱P╱ // 0x63a @0x9
0x0631…0659 at000a = ╱e7╱ DIV ╱ // 0x63b @0xa
0x0631…0659 at000b = ╱31╱1╱ // 0x63c @0xb
0x0631…0659 at000c = ╱30╱0╱ // 0x63d @0xc
0x0631…0659 at000d = ╱30╱0╱ // 0x63e @0xd
0x0631…0659 at000e = ╱30╱0╱ // 0x63f @0xe
0x0631…0659 at000f = ╱30╱0╱ // 0x640 @0xf
0x0631…0659 at0010 = ╱fe00409c0e╱ // 0x641 @0x10
0x0631…0659 at0015 = ╱eb╱;╱ // 0x646 @0x15
0x0631…0659 at0016 = ╱4b╱K╱ // 0x647 @0x16
0x0631…0659 at0017 = ╱54╱T╱ // 0x648 @0x17
0x0631…0659 at0018 = ╱41╱A╱ // 0x649 @0x18
0x0631…0659 at0019 = ╱4c╱L╱ // 0x64a @0x19
0x0631…0659 at001a = ╱39╱9╱ // 0x64b @0x1a
0x0631…0659 at001b = ╱dc╱=╱ // 0x64c @0x1b
0x0631…0659 at001c = ╱50╱P╱ // 0x64d @0x1c
0x0631…0659 at001d = ╱e7╱ DIV ╱ // 0x64e @0x1d
0x0631…0659 at001e = ╱31╱1╱ // 0x64f @0x1e
0x0631…0659 at001f = ╱30╱0╱ // 0x650 @0x1f
0x0631…0659 at0020 = ╱30╱0╱ // 0x651 @0x20
0x0631…0659 at0021 = ╱30╱0╱ // 0x652 @0x21
0x0631…0659 at0022 = ╱fe0000fa0a╱ // 0x653 @0x22
0x0631…0659 at0027 = EOL // 0x658 @0x27
0x0631…0659 }
0x0659…0675 93cc 0670 IF KTAL9=KRTAL THEN KTAL=KRTAL
0x0659…0675 LineComalBin {
0x0659…0675 ptr = 0x93cc // 0x659 @0x0
0x0659…0675 lno = 0x029e // 0x65b @0x2
0x0659…0675 at0004 = ╱82╱ IF ╱ // 0x65d @0x4
0x0659…0675 at0005 = ╱4b╱K╱ // 0x65e @0x5
0x0659…0675 at0006 = ╱54╱T╱ // 0x65f @0x6
0x0659…0675 at0007 = ╱41╱A╱ // 0x660 @0x7
0x0659…0675 at0008 = ╱4c╱L╱ // 0x661 @0x8
0x0659…0675 at0009 = ╱39╱9╱ // 0x662 @0x9
0x0659…0675 at000a = ╱dc╱=╱ // 0x663 @0xa
0x0659…0675 at000b = ╱4b╱K╱ // 0x664 @0xb
0x0659…0675 at000c = ╱52╱R╱ // 0x665 @0xc
0x0659…0675 at000d = ╱54╱T╱ // 0x666 @0xd
0x0659…0675 at000e = ╱41╱A╱ // 0x667 @0xe
0x0659…0675 at000f = ╱4c╱L╱ // 0x668 @0xf
0x0659…0675 at0010 = ╱b6╱ THEN ╱ // 0x669 @0x10
0x0659…0675 at0011 = ╱4b╱K╱ // 0x66a @0x11
0x0659…0675 at0012 = ╱54╱T╱ // 0x66b @0x12
0x0659…0675 at0013 = ╱41╱A╱ // 0x66c @0x13
0x0659…0675 at0014 = ╱4c╱L╱ // 0x66d @0x14
0x0659…0675 at0015 = ╱dc╱=╱ // 0x66e @0x15
0x0659…0675 at0016 = ╱4b╱K╱ // 0x66f @0x16
0x0659…0675 at0017 = ╱52╱R╱ // 0x670 @0x17
0x0659…0675 at0018 = ╱54╱T╱ // 0x671 @0x18
0x0659…0675 at0019 = ╱41╱A╱ // 0x672 @0x19
0x0659…0675 at001a = ╱4c╱L╱ // 0x673 @0x1a
0x0659…0675 at001b = EOL // 0x674 @0x1b
0x0659…0675 }
0x0675…067d 93d4 0680 WHEN B
0x0675…067d LineComalBin {
0x0675…067d ptr = 0x93d4 // 0x675 @0x0
0x0675…067d lno = 0x02a8 // 0x677 @0x2
0x0675…067d at0004 = ╱a301╱ WHEN ╱ // 0x679 @0x4
0x0675…067d at0006 = ╱42╱B╱ // 0x67b @0x6
0x0675…067d at0007 = EOL // 0x67c @0x7
0x0675…067d }
0x067d…0686 93dd 0690 P=-E
0x067d…0686 LineComalBin {
0x067d…0686 ptr = 0x93dd // 0x67d @0x0
0x067d…0686 lno = 0x02b2 // 0x67f @0x2
0x067d…0686 at0004 = ╱50╱P╱ // 0x681 @0x4
0x067d…0686 at0005 = ╱dc╱=╱ // 0x682 @0x5
0x067d…0686 at0006 = ╱e9╱-╱ // 0x683 @0x6
0x067d…0686 at0007 = ╱45╱E╱ // 0x684 @0x7
0x067d…0686 at0008 = EOL // 0x685 @0x8
0x067d…0686 }
0x0686…068e 93e5 0700 WHEN E
0x0686…068e LineComalBin {
0x0686…068e ptr = 0x93e5 // 0x686 @0x0
0x0686…068e lno = 0x02bc // 0x688 @0x2
0x0686…068e at0004 = ╱a301╱ WHEN ╱ // 0x68a @0x4
0x0686…068e at0006 = ╱45╱E╱ // 0x68c @0x6
0x0686…068e at0007 = EOL // 0x68d @0x7
0x0686…068e }
0x068e…069b 93f2 0710 CASE NUM1$ OF
0x068e…069b LineComalBin {
0x068e…069b ptr = 0x93f2 // 0x68e @0x0
0x068e…069b lno = 0x02c6 // 0x690 @0x2
0x068e…069b at0004 = ╱a200╱ CASE ╱ // 0x692 @0x4
0x068e…069b at0006 = ╱4e╱N╱ // 0x694 @0x6
0x068e…069b at0007 = ╱55╱U╱ // 0x695 @0x7
0x068e…069b at0008 = ╱4d╱M╱ // 0x696 @0x8
0x068e…069b at0009 = ╱31╱1╱ // 0x697 @0x9
0x068e…069b at000a = ╱ef╱$╱ // 0x698 @0xa
0x068e…069b at000b = ╱ba╱ OF ╱ // 0x699 @0xb
0x068e…069b at000c = EOL // 0x69a @0xc
0x068e…069b }
0x069b…06b5 940c 0720 P=INT(ORD(NUM1$)-48)
0x069b…06b5 LineComalBin {
0x069b…06b5 ptr = 0x940c // 0x69b @0x0
0x069b…06b5 lno = 0x02d0 // 0x69d @0x2
0x069b…06b5 at0004 = ╱50╱P╱ // 0x69f @0x4
0x069b…06b5 at0005 = ╱dc╱=╱ // 0x6a0 @0x5
0x069b…06b5 at0006 = ╱c6╱INT╱ // 0x6a1 @0x6
0x069b…06b5 at0007 = ╱ed╱(╱ // 0x6a2 @0x7
0x069b…06b5 at0008 = ╱cd╱ORD╱ // 0x6a3 @0x8
0x069b…06b5 at0009 = ╱ed╱(╱ // 0x6a4 @0x9
0x069b…06b5 at000a = ╱4e╱N╱ // 0x6a5 @0xa
0x069b…06b5 at000b = ╱55╱U╱ // 0x6a6 @0xb
0x069b…06b5 at000c = ╱4d╱M╱ // 0x6a7 @0xc
0x069b…06b5 at000d = ╱31╱1╱ // 0x6a8 @0xd
0x069b…06b5 at000e = ╱ef╱$╱ // 0x6a9 @0xe
0x069b…06b5 at000f = ╱ee╱)╱ // 0x6aa @0xf
0x069b…06b5 at0010 = ╱e3╱-╱ // 0x6ab @0x10
0x069b…06b5 at0011 = ╱34╱4╱ // 0x6ac @0x11
0x069b…06b5 at0012 = ╱38╱8╱ // 0x6ad @0x12
0x069b…06b5 at0013 = ╱fe0000c006╱ // 0x6ae @0x13
0x069b…06b5 at0018 = ╱ee╱)╱ // 0x6b3 @0x18
0x069b…06b5 at0019 = EOL // 0x6b4 @0x19
0x069b…06b5 }
0x06b5…06c3 941a 0730 WHEN "j","J"
0x06b5…06c3 LineComalBin {
0x06b5…06c3 ptr = 0x941a // 0x6b5 @0x0
0x06b5…06c3 lno = 0x02da // 0x6b7 @0x2
0x06b5…06c3 at0004 = ╱a300╱ WHEN ╱ // 0x6b9 @0x4
0x06b5…06c3 at0006 = ╱22╱"╱ // 0x6bb @0x6
0x06b5…06c3 at0007 = ╱6a╱j╱ // 0x6bc @0x7
0x06b5…06c3 at0008 = ╱22╱"╱ // 0x6bd @0x8
0x06b5…06c3 at0009 = ╱ec╱,╱ // 0x6be @0x9
0x06b5…06c3 at000a = ╱22╱"╱ // 0x6bf @0xa
0x06b5…06c3 at000b = ╱4a╱J╱ // 0x6c0 @0xb
0x06b5…06c3 at000c = ╱22╱"╱ // 0x6c1 @0xc
0x06b5…06c3 at000d = EOL // 0x6c2 @0xd
0x06b5…06c3 }
0x06c3…06d1 9428 0740 P=-7
0x06c3…06d1 LineComalBin {
0x06c3…06d1 ptr = 0x9428 // 0x6c3 @0x0
0x06c3…06d1 lno = 0x02e4 // 0x6c5 @0x2
0x06c3…06d1 at0004 = ╱50╱P╱ // 0x6c7 @0x4
0x06c3…06d1 at0005 = ╱dc╱=╱ // 0x6c8 @0x5
0x06c3…06d1 at0006 = ╱e9╱-╱ // 0x6c9 @0x6
0x06c3…06d1 at0007 = ╱37╱7╱ // 0x6ca @0x7
0x06c3…06d1 at0008 = ╱fe0000e003╱ // 0x6cb @0x8
0x06c3…06d1 at000d = EOL // 0x6d0 @0xd
0x06c3…06d1 }
0x06d1…06df 9436 0750 WHEN "n","N"
0x06d1…06df LineComalBin {
0x06d1…06df ptr = 0x9436 // 0x6d1 @0x0
0x06d1…06df lno = 0x02ee // 0x6d3 @0x2
0x06d1…06df at0004 = ╱a300╱ WHEN ╱ // 0x6d5 @0x4
0x06d1…06df at0006 = ╱22╱"╱ // 0x6d7 @0x6
0x06d1…06df at0007 = ╱6e╱n╱ // 0x6d8 @0x7
0x06d1…06df at0008 = ╱22╱"╱ // 0x6d9 @0x8
0x06d1…06df at0009 = ╱ec╱,╱ // 0x6da @0x9
0x06d1…06df at000a = ╱22╱"╱ // 0x6db @0xa
0x06d1…06df at000b = ╱4e╱N╱ // 0x6dc @0xb
0x06d1…06df at000c = ╱22╱"╱ // 0x6dd @0xc
0x06d1…06df at000d = EOL // 0x6de @0xd
0x06d1…06df }
0x06df…06ed 9444 0760 P=-8
0x06df…06ed LineComalBin {
0x06df…06ed ptr = 0x9444 // 0x6df @0x0
0x06df…06ed lno = 0x02f8 // 0x6e1 @0x2
0x06df…06ed at0004 = ╱50╱P╱ // 0x6e3 @0x4
0x06df…06ed at0005 = ╱dc╱=╱ // 0x6e4 @0x5
0x06df…06ed at0006 = ╱e9╱-╱ // 0x6e5 @0x6
0x06df…06ed at0007 = ╱38╱8╱ // 0x6e6 @0x7
0x06df…06ed at0008 = ╱fe00008004╱ // 0x6e7 @0x8
0x06df…06ed at000d = EOL // 0x6ec @0xd
0x06df…06ed }
0x06ed…06f3 944a 0770 ENDCASE
0x06ed…06f3 LineComalBin {
0x06ed…06f3 ptr = 0x944a // 0x6ed @0x0
0x06ed…06f3 lno = 0x0302 // 0x6ef @0x2
0x06ed…06f3 at0004 = ╱a4╱ ENDCASE ╱ // 0x6f1 @0x4
0x06ed…06f3 at0005 = EOL // 0x6f2 @0x5
0x06ed…06f3 }
0x06f3…06f9 9450 0780 ENDCASE
0x06f3…06f9 LineComalBin {
0x06f3…06f9 ptr = 0x9450 // 0x6f3 @0x0
0x06f3…06f9 lno = 0x030c // 0x6f5 @0x2
0x06f3…06f9 at0004 = ╱a4╱ ENDCASE ╱ // 0x6f7 @0x4
0x06f3…06f9 at0005 = EOL // 0x6f8 @0x5
0x06f3…06f9 }
0x06f9…06ff 9456 0790 ENDPROC
0x06f9…06ff LineComalBin {
0x06f9…06ff ptr = 0x9456 // 0x6f9 @0x0
0x06f9…06ff lno = 0x0316 // 0x6fb @0x2
0x06f9…06ff at0004 = ╱9f╱ ENDPROC ╱ // 0x6fd @0x4
0x06f9…06ff at0005 = EOL // 0x6fe @0x5
0x06f9…06ff }
0x06ff…0716 946d 0800 PROC FEJL(NR1,NR2,NR3)
0x06ff…0716 LineComalBin {
0x06ff…0716 ptr = 0x946d // 0x6ff @0x0
0x06ff…0716 lno = 0x0320 // 0x701 @0x2
0x06ff…0716 at0004 = ╱9e╱ PROC ╱ // 0x703 @0x4
0x06ff…0716 at0005 = ╱46╱F╱ // 0x704 @0x5
0x06ff…0716 at0006 = ╱45╱E╱ // 0x705 @0x6
0x06ff…0716 at0007 = ╱4a╱J╱ // 0x706 @0x7
0x06ff…0716 at0008 = ╱4c╱L╱ // 0x707 @0x8
0x06ff…0716 at0009 = ╱ed╱(╱ // 0x708 @0x9
0x06ff…0716 at000a = ╱4e╱N╱ // 0x709 @0xa
0x06ff…0716 at000b = ╱52╱R╱ // 0x70a @0xb
0x06ff…0716 at000c = ╱31╱1╱ // 0x70b @0xc
0x06ff…0716 at000d = ╱ec╱,╱ // 0x70c @0xd
0x06ff…0716 at000e = ╱4e╱N╱ // 0x70d @0xe
0x06ff…0716 at000f = ╱52╱R╱ // 0x70e @0xf
0x06ff…0716 at0010 = ╱32╱2╱ // 0x70f @0x10
0x06ff…0716 at0011 = ╱ec╱,╱ // 0x710 @0x11
0x06ff…0716 at0012 = ╱4e╱N╱ // 0x711 @0x12
0x06ff…0716 at0013 = ╱52╱R╱ // 0x712 @0x13
0x06ff…0716 at0014 = ╱33╱3╱ // 0x713 @0x14
0x06ff…0716 at0015 = ╱ee╱)╱ // 0x714 @0x15
0x06ff…0716 at0016 = EOL // 0x715 @0x16
0x06ff…0716 }
0x0716…0726 947d 0810 IF STATUS(NR3$)<>B THEN
0x0716…0726 LineComalBin {
0x0716…0726 ptr = 0x947d // 0x716 @0x0
0x0716…0726 lno = 0x032a // 0x718 @0x2
0x0716…0726 at0004 = ╱9c╱ IF ╱ // 0x71a @0x4
0x0716…0726 at0005 = ╱ce╱STATUS╱ // 0x71b @0x5
0x0716…0726 at0006 = ╱ed╱(╱ // 0x71c @0x6
0x0716…0726 at0007 = ╱4e╱N╱ // 0x71d @0x7
0x0716…0726 at0008 = ╱52╱R╱ // 0x71e @0x8
0x0716…0726 at0009 = ╱33╱3╱ // 0x71f @0x9
0x0716…0726 at000a = ╱ef╱$╱ // 0x720 @0xa
0x0716…0726 at000b = ╱ee╱)╱ // 0x721 @0xb
0x0716…0726 at000c = ╱e1╱<>╱ // 0x722 @0xc
0x0716…0726 at000d = ╱42╱B╱ // 0x723 @0xd
0x0716…0726 at000e = ╱b6╱ THEN ╱ // 0x724 @0xe
0x0716…0726 at000f = EOL // 0x725 @0xf
0x0716…0726 }
0x0726…0740 9497 0820 PRINT STATUS(NR3$),NR1,NR2,NR3$
0x0726…0740 LineComalBin {
0x0726…0740 ptr = 0x9497 // 0x726 @0x0
0x0726…0740 lno = 0x0334 // 0x728 @0x2
0x0726…0740 at0004 = ╱92╱ PRINT ╱ // 0x72a @0x4
0x0726…0740 at0005 = ╱ce╱STATUS╱ // 0x72b @0x5
0x0726…0740 at0006 = ╱ed╱(╱ // 0x72c @0x6
0x0726…0740 at0007 = ╱4e╱N╱ // 0x72d @0x7
0x0726…0740 at0008 = ╱52╱R╱ // 0x72e @0x8
0x0726…0740 at0009 = ╱33╱3╱ // 0x72f @0x9
0x0726…0740 at000a = ╱ef╱$╱ // 0x730 @0xa
0x0726…0740 at000b = ╱ee╱)╱ // 0x731 @0xb
0x0726…0740 at000c = ╱ec╱,╱ // 0x732 @0xc
0x0726…0740 at000d = ╱4e╱N╱ // 0x733 @0xd
0x0726…0740 at000e = ╱52╱R╱ // 0x734 @0xe
0x0726…0740 at000f = ╱31╱1╱ // 0x735 @0xf
0x0726…0740 at0010 = ╱ec╱,╱ // 0x736 @0x10
0x0726…0740 at0011 = ╱4e╱N╱ // 0x737 @0x11
0x0726…0740 at0012 = ╱52╱R╱ // 0x738 @0x12
0x0726…0740 at0013 = ╱32╱2╱ // 0x739 @0x13
0x0726…0740 at0014 = ╱ec╱,╱ // 0x73a @0x14
0x0726…0740 at0015 = ╱4e╱N╱ // 0x73b @0x15
0x0726…0740 at0016 = ╱52╱R╱ // 0x73c @0x16
0x0726…0740 at0017 = ╱33╱3╱ // 0x73d @0x17
0x0726…0740 at0018 = ╱ef╱$╱ // 0x73e @0x18
0x0726…0740 at0019 = EOL // 0x73f @0x19
0x0726…0740 }
0x0740…0746 949d 0830 STOP
0x0740…0746 LineComalBin {
0x0740…0746 ptr = 0x949d // 0x740 @0x0
0x0740…0746 lno = 0x033e // 0x742 @0x2
0x0740…0746 at0004 = ╱8d╱ STOP ╱ // 0x744 @0x4
0x0740…0746 at0005 = EOL // 0x745 @0x5
0x0740…0746 }
0x0746…074c 94a3 0840 ENDIF
0x0746…074c LineComalBin {
0x0746…074c ptr = 0x94a3 // 0x746 @0x0
0x0746…074c lno = 0x0348 // 0x748 @0x2
0x0746…074c at0004 = ╱9b╱ ENDIF ╱ // 0x74a @0x4
0x0746…074c at0005 = EOL // 0x74b @0x5
0x0746…074c }
0x074c…0752 94a9 0850 ENDPROC
0x074c…0752 LineComalBin {
0x074c…0752 ptr = 0x94a9 // 0x74c @0x0
0x074c…0752 lno = 0x0352 // 0x74e @0x2
0x074c…0752 at0004 = ╱9f╱ ENDPROC ╱ // 0x750 @0x4
0x074c…0752 at0005 = EOL // 0x751 @0x5
0x074c…0752 }
0x0752…0771 94c8 0860 PROC TUD(BLB1,UBLB1,TEGN,STØR)
0x0752…0771 LineComalBin {
0x0752…0771 ptr = 0x94c8 // 0x752 @0x0
0x0752…0771 lno = 0x035c // 0x754 @0x2
0x0752…0771 at0004 = ╱9e╱ PROC ╱ // 0x756 @0x4
0x0752…0771 at0005 = ╱54╱T╱ // 0x757 @0x5
0x0752…0771 at0006 = ╱55╱U╱ // 0x758 @0x6
0x0752…0771 at0007 = ╱44╱D╱ // 0x759 @0x7
0x0752…0771 at0008 = ╱ed╱(╱ // 0x75a @0x8
0x0752…0771 at0009 = ╱42╱B╱ // 0x75b @0x9
0x0752…0771 at000a = ╱4c╱L╱ // 0x75c @0xa
0x0752…0771 at000b = ╱42╱B╱ // 0x75d @0xb
0x0752…0771 at000c = ╱31╱1╱ // 0x75e @0xc
0x0752…0771 at000d = ╱ec╱,╱ // 0x75f @0xd
0x0752…0771 at000e = ╱55╱U╱ // 0x760 @0xe
0x0752…0771 at000f = ╱42╱B╱ // 0x761 @0xf
0x0752…0771 at0010 = ╱4c╱L╱ // 0x762 @0x10
0x0752…0771 at0011 = ╱42╱B╱ // 0x763 @0x11
0x0752…0771 at0012 = ╱31╱1╱ // 0x764 @0x12
0x0752…0771 at0013 = ╱ec╱,╱ // 0x765 @0x13
0x0752…0771 at0014 = ╱54╱T╱ // 0x766 @0x14
0x0752…0771 at0015 = ╱45╱E╱ // 0x767 @0x15
0x0752…0771 at0016 = ╱47╱G╱ // 0x768 @0x16
0x0752…0771 at0017 = ╱4e╱N╱ // 0x769 @0x17
0x0752…0771 at0018 = ╱ec╱,╱ // 0x76a @0x18
0x0752…0771 at0019 = ╱53╱S╱ // 0x76b @0x19
0x0752…0771 at001a = ╱54╱T╱ // 0x76c @0x1a
0x0752…0771 at001b = ╱5c╱Ø╱ // 0x76d @0x1b
0x0752…0771 at001c = ╱52╱R╱ // 0x76e @0x1c
0x0752…0771 at001d = ╱ee╱)╱ // 0x76f @0x1d
0x0752…0771 at001e = EOL // 0x770 @0x1e
0x0752…0771 }
0x0771…0796 94ed 0870 EXEC CALC(5,BLB1$,TAL4$,UBLB1$)
0x0771…0796 LineComalBin {
0x0771…0796 ptr = 0x94ed // 0x771 @0x0
0x0771…0796 lno = 0x0366 // 0x773 @0x2
0x0771…0796 at0004 = ╱9d╱ EXEC ╱ // 0x775 @0x4
0x0771…0796 at0005 = ╱43╱C╱ // 0x776 @0x5
0x0771…0796 at0006 = ╱41╱A╱ // 0x777 @0x6
0x0771…0796 at0007 = ╱4c╱L╱ // 0x778 @0x7
0x0771…0796 at0008 = ╱43╱C╱ // 0x779 @0x8
0x0771…0796 at0009 = ╱ed╱(╱ // 0x77a @0x9
0x0771…0796 at000a = ╱35╱5╱ // 0x77b @0xa
0x0771…0796 at000b = ╱fe0000a003╱ // 0x77c @0xb
0x0771…0796 at0010 = ╱ec╱,╱ // 0x781 @0x10
0x0771…0796 at0011 = ╱42╱B╱ // 0x782 @0x11
0x0771…0796 at0012 = ╱4c╱L╱ // 0x783 @0x12
0x0771…0796 at0013 = ╱42╱B╱ // 0x784 @0x13
0x0771…0796 at0014 = ╱31╱1╱ // 0x785 @0x14
0x0771…0796 at0015 = ╱ef╱$╱ // 0x786 @0x15
0x0771…0796 at0016 = ╱ec╱,╱ // 0x787 @0x16
0x0771…0796 at0017 = ╱54╱T╱ // 0x788 @0x17
0x0771…0796 at0018 = ╱41╱A╱ // 0x789 @0x18
0x0771…0796 at0019 = ╱4c╱L╱ // 0x78a @0x19
0x0771…0796 at001a = ╱34╱4╱ // 0x78b @0x1a
0x0771…0796 at001b = ╱ef╱$╱ // 0x78c @0x1b
0x0771…0796 at001c = ╱ec╱,╱ // 0x78d @0x1c
0x0771…0796 at001d = ╱55╱U╱ // 0x78e @0x1d
0x0771…0796 at001e = ╱42╱B╱ // 0x78f @0x1e
0x0771…0796 at001f = ╱4c╱L╱ // 0x790 @0x1f
0x0771…0796 at0020 = ╱42╱B╱ // 0x791 @0x20
0x0771…0796 at0021 = ╱31╱1╱ // 0x792 @0x21
0x0771…0796 at0022 = ╱ef╱$╱ // 0x793 @0x22
0x0771…0796 at0023 = ╱ee╱)╱ // 0x794 @0x23
0x0771…0796 at0024 = EOL // 0x795 @0x24
0x0771…0796 }
0x0796…07a3 94fa 0880 IF TEGN=B THEN
0x0796…07a3 LineComalBin {
0x0796…07a3 ptr = 0x94fa // 0x796 @0x0
0x0796…07a3 lno = 0x0370 // 0x798 @0x2
0x0796…07a3 at0004 = ╱9c╱ IF ╱ // 0x79a @0x4
0x0796…07a3 at0005 = ╱54╱T╱ // 0x79b @0x5
0x0796…07a3 at0006 = ╱45╱E╱ // 0x79c @0x6
0x0796…07a3 at0007 = ╱47╱G╱ // 0x79d @0x7
0x0796…07a3 at0008 = ╱4e╱N╱ // 0x79e @0x8
0x0796…07a3 at0009 = ╱dc╱=╱ // 0x79f @0x9
0x0796…07a3 at000a = ╱42╱B╱ // 0x7a0 @0xa
0x0796…07a3 at000b = ╱b6╱ THEN ╱ // 0x7a1 @0xb
0x0796…07a3 at000c = EOL // 0x7a2 @0xc
0x0796…07a3 }
0x07a3…07c0 9517 0890 UBLB1$=UBLB1$(E:13)
0x07a3…07c0 LineComalBin {
0x07a3…07c0 ptr = 0x9517 // 0x7a3 @0x0
0x07a3…07c0 lno = 0x037a // 0x7a5 @0x2
0x07a3…07c0 at0004 = ╱55╱U╱ // 0x7a7 @0x4
0x07a3…07c0 at0005 = ╱42╱B╱ // 0x7a8 @0x5
0x07a3…07c0 at0006 = ╱4c╱L╱ // 0x7a9 @0x6
0x07a3…07c0 at0007 = ╱42╱B╱ // 0x7aa @0x7
0x07a3…07c0 at0008 = ╱31╱1╱ // 0x7ab @0x8
0x07a3…07c0 at0009 = ╱ef╱$╱ // 0x7ac @0x9
0x07a3…07c0 at000a = ╱dc╱=╱ // 0x7ad @0xa
0x07a3…07c0 at000b = ╱55╱U╱ // 0x7ae @0xb
0x07a3…07c0 at000c = ╱42╱B╱ // 0x7af @0xc
0x07a3…07c0 at000d = ╱4c╱L╱ // 0x7b0 @0xd
0x07a3…07c0 at000e = ╱42╱B╱ // 0x7b1 @0xe
0x07a3…07c0 at000f = ╱31╱1╱ // 0x7b2 @0xf
0x07a3…07c0 at0010 = ╱ef╱$╱ // 0x7b3 @0x10
0x07a3…07c0 at0011 = ╱ed╱(╱ // 0x7b4 @0x11
0x07a3…07c0 at0012 = ╱45╱E╱ // 0x7b5 @0x12
0x07a3…07c0 at0013 = ╱f0╱:╱ // 0x7b6 @0x13
0x07a3…07c0 at0014 = ╱31╱1╱ // 0x7b7 @0x14
0x07a3…07c0 at0015 = ╱33╱3╱ // 0x7b8 @0x15
0x07a3…07c0 at0016 = ╱fe0000d004╱ // 0x7b9 @0x16
0x07a3…07c0 at001b = ╱ee╱)╱ // 0x7be @0x1b
0x07a3…07c0 at001c = EOL // 0x7bf @0x1c
0x07a3…07c0 }
0x07c0…07c6 951d 0900 ELSE
0x07c0…07c6 LineComalBin {
0x07c0…07c6 ptr = 0x951d // 0x7c0 @0x0
0x07c0…07c6 lno = 0x0384 // 0x7c2 @0x2
0x07c0…07c6 at0004 = ╱9a╱ ELSE ╱ // 0x7c4 @0x4
0x07c0…07c6 at0005 = EOL // 0x7c5 @0x5
0x07c0…07c6 }
0x07c6…07e9 9540 0910 IF TEGN=E AND UBLB1$(LEN(UBLB1$))="+" THEN
0x07c6…07e9 LineComalBin {
0x07c6…07e9 ptr = 0x9540 // 0x7c6 @0x0
0x07c6…07e9 lno = 0x038e // 0x7c8 @0x2
0x07c6…07e9 at0004 = ╱9c╱ IF ╱ // 0x7ca @0x4
0x07c6…07e9 at0005 = ╱54╱T╱ // 0x7cb @0x5
0x07c6…07e9 at0006 = ╱45╱E╱ // 0x7cc @0x6
0x07c6…07e9 at0007 = ╱47╱G╱ // 0x7cd @0x7
0x07c6…07e9 at0008 = ╱4e╱N╱ // 0x7ce @0x8
0x07c6…07e9 at0009 = ╱dc╱=╱ // 0x7cf @0x9
0x07c6…07e9 at000a = ╱45╱E╱ // 0x7d0 @0xa
0x07c6…07e9 at000b = ╱da╱ AND ╱ // 0x7d1 @0xb
0x07c6…07e9 at000c = ╱55╱U╱ // 0x7d2 @0xc
0x07c6…07e9 at000d = ╱42╱B╱ // 0x7d3 @0xd
0x07c6…07e9 at000e = ╱4c╱L╱ // 0x7d4 @0xe
0x07c6…07e9 at000f = ╱42╱B╱ // 0x7d5 @0xf
0x07c6…07e9 at0010 = ╱31╱1╱ // 0x7d6 @0x10
0x07c6…07e9 at0011 = ╱ef╱$╱ // 0x7d7 @0x11
0x07c6…07e9 at0012 = ╱ed╱(╱ // 0x7d8 @0x12
0x07c6…07e9 at0013 = ╱cc╱LEN╱ // 0x7d9 @0x13
0x07c6…07e9 at0014 = ╱ed╱(╱ // 0x7da @0x14
0x07c6…07e9 at0015 = ╱55╱U╱ // 0x7db @0x15
0x07c6…07e9 at0016 = ╱42╱B╱ // 0x7dc @0x16
0x07c6…07e9 at0017 = ╱4c╱L╱ // 0x7dd @0x17
0x07c6…07e9 at0018 = ╱42╱B╱ // 0x7de @0x18
0x07c6…07e9 at0019 = ╱31╱1╱ // 0x7df @0x19
0x07c6…07e9 at001a = ╱ef╱$╱ // 0x7e0 @0x1a
0x07c6…07e9 at001b = ╱ee╱)╱ // 0x7e1 @0x1b
0x07c6…07e9 at001c = ╱ee╱)╱ // 0x7e2 @0x1c
0x07c6…07e9 at001d = ╱dc╱=╱ // 0x7e3 @0x1d
0x07c6…07e9 at001e = ╱22╱"╱ // 0x7e4 @0x1e
0x07c6…07e9 at001f = ╱2b╱+╱ // 0x7e5 @0x1f
0x07c6…07e9 at0020 = ╱22╱"╱ // 0x7e6 @0x20
0x07c6…07e9 at0021 = ╱b6╱ THEN ╱ // 0x7e7 @0x21
0x07c6…07e9 at0022 = EOL // 0x7e8 @0x22
0x07c6…07e9 }
0x07e9…0803 955a 0920 UBLB1$(LEN(UBLB1$))=" "
0x07e9…0803 LineComalBin {
0x07e9…0803 ptr = 0x955a // 0x7e9 @0x0
0x07e9…0803 lno = 0x0398 // 0x7eb @0x2
0x07e9…0803 at0004 = ╱55╱U╱ // 0x7ed @0x4
0x07e9…0803 at0005 = ╱42╱B╱ // 0x7ee @0x5
0x07e9…0803 at0006 = ╱4c╱L╱ // 0x7ef @0x6
0x07e9…0803 at0007 = ╱42╱B╱ // 0x7f0 @0x7
0x07e9…0803 at0008 = ╱31╱1╱ // 0x7f1 @0x8
0x07e9…0803 at0009 = ╱ef╱$╱ // 0x7f2 @0x9
0x07e9…0803 at000a = ╱ed╱(╱ // 0x7f3 @0xa
0x07e9…0803 at000b = ╱cc╱LEN╱ // 0x7f4 @0xb
0x07e9…0803 at000c = ╱ed╱(╱ // 0x7f5 @0xc
0x07e9…0803 at000d = ╱55╱U╱ // 0x7f6 @0xd
0x07e9…0803 at000e = ╱42╱B╱ // 0x7f7 @0xe
0x07e9…0803 at000f = ╱4c╱L╱ // 0x7f8 @0xf
0x07e9…0803 at0010 = ╱42╱B╱ // 0x7f9 @0x10
0x07e9…0803 at0011 = ╱31╱1╱ // 0x7fa @0x11
0x07e9…0803 at0012 = ╱ef╱$╱ // 0x7fb @0x12
0x07e9…0803 at0013 = ╱ee╱)╱ // 0x7fc @0x13
0x07e9…0803 at0014 = ╱ee╱)╱ // 0x7fd @0x14
0x07e9…0803 at0015 = ╱dc╱=╱ // 0x7fe @0x15
0x07e9…0803 at0016 = ╱22╱"╱ // 0x7ff @0x16
0x07e9…0803 at0017 = ╱20╱…╱ // 0x800 @0x17
0x07e9…0803 at0018 = ╱22╱"╱ // 0x801 @0x18
0x07e9…0803 at0019 = EOL // 0x802 @0x19
0x07e9…0803 }
0x0803…0809 9560 0930 ENDIF
0x0803…0809 LineComalBin {
0x0803…0809 ptr = 0x9560 // 0x803 @0x0
0x0803…0809 lno = 0x03a2 // 0x805 @0x2
0x0803…0809 at0004 = ╱9b╱ ENDIF ╱ // 0x807 @0x4
0x0803…0809 at0005 = EOL // 0x808 @0x5
0x0803…0809 }
0x0809…080f 9566 0940 ENDIF
0x0809…080f LineComalBin {
0x0809…080f ptr = 0x9566 // 0x809 @0x0
0x0809…080f lno = 0x03ac // 0x80b @0x2
0x0809…080f at0004 = ╱9b╱ ENDIF ╱ // 0x80d @0x4
0x0809…080f at0005 = EOL // 0x80e @0x5
0x0809…080f }
0x080f…081c 9573 0950 IF STØR=E THEN
0x080f…081c LineComalBin {
0x080f…081c ptr = 0x9573 // 0x80f @0x0
0x080f…081c lno = 0x03b6 // 0x811 @0x2
0x080f…081c at0004 = ╱9c╱ IF ╱ // 0x813 @0x4
0x080f…081c at0005 = ╱53╱S╱ // 0x814 @0x5
0x080f…081c at0006 = ╱54╱T╱ // 0x815 @0x6
0x080f…081c at0007 = ╱5c╱Ø╱ // 0x816 @0x7
0x080f…081c at0008 = ╱52╱R╱ // 0x817 @0x8
0x080f…081c at0009 = ╱dc╱=╱ // 0x818 @0x9
0x080f…081c at000a = ╱45╱E╱ // 0x819 @0xa
0x080f…081c at000b = ╱b6╱ THEN ╱ // 0x81a @0xb
0x080f…081c at000c = EOL // 0x81b @0xc
0x080f…081c }
0x081c…0842 9599 0960 UBLB1$=UBLB1$(4:LEN(UBLB1$)-V)
0x081c…0842 LineComalBin {
0x081c…0842 ptr = 0x9599 // 0x81c @0x0
0x081c…0842 lno = 0x03c0 // 0x81e @0x2
0x081c…0842 at0004 = ╱55╱U╱ // 0x820 @0x4
0x081c…0842 at0005 = ╱42╱B╱ // 0x821 @0x5
0x081c…0842 at0006 = ╱4c╱L╱ // 0x822 @0x6
0x081c…0842 at0007 = ╱42╱B╱ // 0x823 @0x7
0x081c…0842 at0008 = ╱31╱1╱ // 0x824 @0x8
0x081c…0842 at0009 = ╱ef╱$╱ // 0x825 @0x9
0x081c…0842 at000a = ╱dc╱=╱ // 0x826 @0xa
0x081c…0842 at000b = ╱55╱U╱ // 0x827 @0xb
0x081c…0842 at000c = ╱42╱B╱ // 0x828 @0xc
0x081c…0842 at000d = ╱4c╱L╱ // 0x829 @0xd
0x081c…0842 at000e = ╱42╱B╱ // 0x82a @0xe
0x081c…0842 at000f = ╱31╱1╱ // 0x82b @0xf
0x081c…0842 at0010 = ╱ef╱$╱ // 0x82c @0x10
0x081c…0842 at0011 = ╱ed╱(╱ // 0x82d @0x11
0x081c…0842 at0012 = ╱34╱4╱ // 0x82e @0x12
0x081c…0842 at0013 = ╱fe00008003╱ // 0x82f @0x13
0x081c…0842 at0018 = ╱f0╱:╱ // 0x834 @0x18
0x081c…0842 at0019 = ╱cc╱LEN╱ // 0x835 @0x19
0x081c…0842 at001a = ╱ed╱(╱ // 0x836 @0x1a
0x081c…0842 at001b = ╱55╱U╱ // 0x837 @0x1b
0x081c…0842 at001c = ╱42╱B╱ // 0x838 @0x1c
0x081c…0842 at001d = ╱4c╱L╱ // 0x839 @0x1d
0x081c…0842 at001e = ╱42╱B╱ // 0x83a @0x1e
0x081c…0842 at001f = ╱31╱1╱ // 0x83b @0x1f
0x081c…0842 at0020 = ╱ef╱$╱ // 0x83c @0x20
0x081c…0842 at0021 = ╱ee╱)╱ // 0x83d @0x21
0x081c…0842 at0022 = ╱e3╱-╱ // 0x83e @0x22
0x081c…0842 at0023 = ╱56╱V╱ // 0x83f @0x23
0x081c…0842 at0024 = ╱ee╱)╱ // 0x840 @0x24
0x081c…0842 at0025 = EOL // 0x841 @0x25
0x081c…0842 }
0x0842…0848 959f 0970 ENDIF
0x0842…0848 LineComalBin {
0x0842…0848 ptr = 0x959f // 0x842 @0x0
0x0842…0848 lno = 0x03ca // 0x844 @0x2
0x0842…0848 at0004 = ╱9b╱ ENDIF ╱ // 0x846 @0x4
0x0842…0848 at0005 = EOL // 0x847 @0x5
0x0842…0848 }
0x0848…084e 95a5 0980 ENDPROC
0x0848…084e LineComalBin {
0x0848…084e ptr = 0x95a5 // 0x848 @0x0
0x0848…084e lno = 0x03d4 // 0x84a @0x2
0x0848…084e at0004 = ╱9f╱ ENDPROC ╱ // 0x84c @0x4
0x0848…084e at0005 = EOL // 0x84d @0x5
0x0848…084e }
0x084e…0868 95bf 0990 PROC HOVEDUD(UDATO,USIDE)
0x084e…0868 LineComalBin {
0x084e…0868 ptr = 0x95bf // 0x84e @0x0
0x084e…0868 lno = 0x03de // 0x850 @0x2
0x084e…0868 at0004 = ╱9e╱ PROC ╱ // 0x852 @0x4
0x084e…0868 at0005 = ╱48╱H╱ // 0x853 @0x5
0x084e…0868 at0006 = ╱4f╱O╱ // 0x854 @0x6
0x084e…0868 at0007 = ╱56╱V╱ // 0x855 @0x7
0x084e…0868 at0008 = ╱45╱E╱ // 0x856 @0x8
0x084e…0868 at0009 = ╱44╱D╱ // 0x857 @0x9
0x084e…0868 at000a = ╱55╱U╱ // 0x858 @0xa
0x084e…0868 at000b = ╱44╱D╱ // 0x859 @0xb
0x084e…0868 at000c = ╱ed╱(╱ // 0x85a @0xc
0x084e…0868 at000d = ╱55╱U╱ // 0x85b @0xd
0x084e…0868 at000e = ╱44╱D╱ // 0x85c @0xe
0x084e…0868 at000f = ╱41╱A╱ // 0x85d @0xf
0x084e…0868 at0010 = ╱54╱T╱ // 0x85e @0x10
0x084e…0868 at0011 = ╱4f╱O╱ // 0x85f @0x11
0x084e…0868 at0012 = ╱ec╱,╱ // 0x860 @0x12
0x084e…0868 at0013 = ╱55╱U╱ // 0x861 @0x13
0x084e…0868 at0014 = ╱53╱S╱ // 0x862 @0x14
0x084e…0868 at0015 = ╱49╱I╱ // 0x863 @0x15
0x084e…0868 at0016 = ╱44╱D╱ // 0x864 @0x16
0x084e…0868 at0017 = ╱45╱E╱ // 0x865 @0x17
0x084e…0868 at0018 = ╱ee╱)╱ // 0x866 @0x18
0x084e…0868 at0019 = EOL // 0x867 @0x19
0x084e…0868 }
0x0868…0880 95d7 1000 EXEC DATOUD(UDATO,DAT$)
0x0868…0880 LineComalBin {
0x0868…0880 ptr = 0x95d7 // 0x868 @0x0
0x0868…0880 lno = 0x03e8 // 0x86a @0x2
0x0868…0880 at0004 = ╱9d╱ EXEC ╱ // 0x86c @0x4
0x0868…0880 at0005 = ╱44╱D╱ // 0x86d @0x5
0x0868…0880 at0006 = ╱41╱A╱ // 0x86e @0x6
0x0868…0880 at0007 = ╱54╱T╱ // 0x86f @0x7
0x0868…0880 at0008 = ╱4f╱O╱ // 0x870 @0x8
0x0868…0880 at0009 = ╱55╱U╱ // 0x871 @0x9
0x0868…0880 at000a = ╱44╱D╱ // 0x872 @0xa
0x0868…0880 at000b = ╱ed╱(╱ // 0x873 @0xb
0x0868…0880 at000c = ╱55╱U╱ // 0x874 @0xc
0x0868…0880 at000d = ╱44╱D╱ // 0x875 @0xd
0x0868…0880 at000e = ╱41╱A╱ // 0x876 @0xe
0x0868…0880 at000f = ╱54╱T╱ // 0x877 @0xf
0x0868…0880 at0010 = ╱4f╱O╱ // 0x878 @0x10
0x0868…0880 at0011 = ╱ec╱,╱ // 0x879 @0x11
0x0868…0880 at0012 = ╱44╱D╱ // 0x87a @0x12
0x0868…0880 at0013 = ╱41╱A╱ // 0x87b @0x13
0x0868…0880 at0014 = ╱54╱T╱ // 0x87c @0x14
0x0868…0880 at0015 = ╱ef╱$╱ // 0x87d @0x15
0x0868…0880 at0016 = ╱ee╱)╱ // 0x87e @0x16
0x0868…0880 at0017 = EOL // 0x87f @0x17
0x0868…0880 }
0x0880…0898 95ef 1010 PRINT TAB(67);DV$;" "
0x0880…0898 LineComalBin {
0x0880…0898 ptr = 0x95ef // 0x880 @0x0
0x0880…0898 lno = 0x03f2 // 0x882 @0x2
0x0880…0898 at0004 = ╱92╱ PRINT ╱ // 0x884 @0x4
0x0880…0898 at0005 = ╱d2╱TAB╱ // 0x885 @0x5
0x0880…0898 at0006 = ╱ed╱(╱ // 0x886 @0x6
0x0880…0898 at0007 = ╱36╱6╱ // 0x887 @0x7
0x0880…0898 at0008 = ╱37╱7╱ // 0x888 @0x8
0x0880…0898 at0009 = ╱fe00008607╱ // 0x889 @0x9
0x0880…0898 at000e = ╱ee╱)╱ // 0x88e @0xe
0x0880…0898 at000f = ╱eb╱;╱ // 0x88f @0xf
0x0880…0898 at0010 = ╱44╱D╱ // 0x890 @0x10
0x0880…0898 at0011 = ╱56╱V╱ // 0x891 @0x11
0x0880…0898 at0012 = ╱ef╱$╱ // 0x892 @0x12
0x0880…0898 at0013 = ╱eb╱;╱ // 0x893 @0x13
0x0880…0898 at0014 = ╱22╱"╱ // 0x894 @0x14
0x0880…0898 at0015 = ╱20╱…╱ // 0x895 @0x15
0x0880…0898 at0016 = ╱22╱"╱ // 0x896 @0x16
0x0880…0898 at0017 = EOL // 0x897 @0x17
0x0880…0898 }
0x0898…08ec 9643 1020 PRINT TAB(10);CHR(14);"Entreprisebalance";CHR(15);TAB(34);"Dato: ";DAT$;
0x0898…08ec LineComalBin {
0x0898…08ec ptr = 0x9643 // 0x898 @0x0
0x0898…08ec lno = 0x03fc // 0x89a @0x2
0x0898…08ec at0004 = ╱92╱ PRINT ╱ // 0x89c @0x4
0x0898…08ec at0005 = ╱d2╱TAB╱ // 0x89d @0x5
0x0898…08ec at0006 = ╱ed╱(╱ // 0x89e @0x6
0x0898…08ec at0007 = ╱31╱1╱ // 0x89f @0x7
0x0898…08ec at0008 = ╱30╱0╱ // 0x8a0 @0x8
0x0898…08ec at0009 = ╱fe0000a004╱ // 0x8a1 @0x9
0x0898…08ec at000e = ╱ee╱)╱ // 0x8a6 @0xe
0x0898…08ec at000f = ╱eb╱;╱ // 0x8a7 @0xf
0x0898…08ec at0010 = ╱cf╱CHR╱ // 0x8a8 @0x10
0x0898…08ec at0011 = ╱ed╱(╱ // 0x8a9 @0x11
0x0898…08ec at0012 = ╱31╱1╱ // 0x8aa @0x12
0x0898…08ec at0013 = ╱34╱4╱ // 0x8ab @0x13
0x0898…08ec at0014 = ╱fe0000e004╱ // 0x8ac @0x14
0x0898…08ec at0019 = ╱ee╱)╱ // 0x8b1 @0x19
0x0898…08ec at001a = ╱eb╱;╱ // 0x8b2 @0x1a
0x0898…08ec at001b = ╱22╱"╱ // 0x8b3 @0x1b
0x0898…08ec at001c = ╱45╱E╱ // 0x8b4 @0x1c
0x0898…08ec at001d = ╱6e╱n╱ // 0x8b5 @0x1d
0x0898…08ec at001e = ╱74╱t╱ // 0x8b6 @0x1e
0x0898…08ec at001f = ╱72╱r╱ // 0x8b7 @0x1f
0x0898…08ec at0020 = ╱65╱e╱ // 0x8b8 @0x20
0x0898…08ec at0021 = ╱70╱p╱ // 0x8b9 @0x21
0x0898…08ec at0022 = ╱72╱r╱ // 0x8ba @0x22
0x0898…08ec at0023 = ╱69╱i╱ // 0x8bb @0x23
0x0898…08ec at0024 = ╱73╱s╱ // 0x8bc @0x24
0x0898…08ec at0025 = ╱65╱e╱ // 0x8bd @0x25
0x0898…08ec at0026 = ╱62╱b╱ // 0x8be @0x26
0x0898…08ec at0027 = ╱61╱a╱ // 0x8bf @0x27
0x0898…08ec at0028 = ╱6c╱l╱ // 0x8c0 @0x28
0x0898…08ec at0029 = ╱61╱a╱ // 0x8c1 @0x29
0x0898…08ec at002a = ╱6e╱n╱ // 0x8c2 @0x2a
0x0898…08ec at002b = ╱63╱c╱ // 0x8c3 @0x2b
0x0898…08ec at002c = ╱65╱e╱ // 0x8c4 @0x2c
0x0898…08ec at002d = ╱22╱"╱ // 0x8c5 @0x2d
0x0898…08ec at002e = ╱eb╱;╱ // 0x8c6 @0x2e
0x0898…08ec at002f = ╱cf╱CHR╱ // 0x8c7 @0x2f
0x0898…08ec at0030 = ╱ed╱(╱ // 0x8c8 @0x30
0x0898…08ec at0031 = ╱31╱1╱ // 0x8c9 @0x31
0x0898…08ec at0032 = ╱35╱5╱ // 0x8ca @0x32
0x0898…08ec at0033 = ╱fe0000f004╱ // 0x8cb @0x33
0x0898…08ec at0038 = ╱ee╱)╱ // 0x8d0 @0x38
0x0898…08ec at0039 = ╱eb╱;╱ // 0x8d1 @0x39
0x0898…08ec at003a = ╱d2╱TAB╱ // 0x8d2 @0x3a
0x0898…08ec at003b = ╱ed╱(╱ // 0x8d3 @0x3b
0x0898…08ec at003c = ╱33╱3╱ // 0x8d4 @0x3c
0x0898…08ec at003d = ╱34╱4╱ // 0x8d5 @0x3d
0x0898…08ec at003e = ╱fe00008806╱ // 0x8d6 @0x3e
0x0898…08ec at0043 = ╱ee╱)╱ // 0x8db @0x43
0x0898…08ec at0044 = ╱eb╱;╱ // 0x8dc @0x44
0x0898…08ec at0045 = ╱22╱"╱ // 0x8dd @0x45
0x0898…08ec at0046 = ╱44╱D╱ // 0x8de @0x46
0x0898…08ec at0047 = ╱61╱a╱ // 0x8df @0x47
0x0898…08ec at0048 = ╱74╱t╱ // 0x8e0 @0x48
0x0898…08ec at0049 = ╱6f╱o╱ // 0x8e1 @0x49
0x0898…08ec at004a = ╱3a╱:╱ // 0x8e2 @0x4a
0x0898…08ec at004b = ╱20╱…╱ // 0x8e3 @0x4b
0x0898…08ec at004c = ╱22╱"╱ // 0x8e4 @0x4c
0x0898…08ec at004d = ╱eb╱;╱ // 0x8e5 @0x4d
0x0898…08ec at004e = ╱44╱D╱ // 0x8e6 @0x4e
0x0898…08ec at004f = ╱41╱A╱ // 0x8e7 @0x4f
0x0898…08ec at0050 = ╱54╱T╱ // 0x8e8 @0x50
0x0898…08ec at0051 = ╱ef╱$╱ // 0x8e9 @0x51
0x0898…08ec at0052 = ╱eb╱;╱ // 0x8ea @0x52
0x0898…08ec at0053 = EOL // 0x8eb @0x53
0x0898…08ec }
0x08ec…0907 965e 1030 PRINT USING " Side :###":USIDE
0x08ec…0907 LineComalBin {
0x08ec…0907 ptr = 0x965e // 0x8ec @0x0
0x08ec…0907 lno = 0x0406 // 0x8ee @0x2
0x08ec…0907 at0004 = ╱92╱ PRINT ╱ // 0x8f0 @0x4
0x08ec…0907 at0005 = ╱b9╱ USING ╱ // 0x8f1 @0x5
0x08ec…0907 at0006 = ╱22╱"╱ // 0x8f2 @0x6
0x08ec…0907 at0007 = ╱20╱…╱ // 0x8f3 @0x7
0x08ec…0907 at0008 = ╱20╱…╱ // 0x8f4 @0x8
0x08ec…0907 at0009 = ╱20╱…╱ // 0x8f5 @0x9
0x08ec…0907 at000a = ╱53╱S╱ // 0x8f6 @0xa
0x08ec…0907 at000b = ╱69╱i╱ // 0x8f7 @0xb
0x08ec…0907 at000c = ╱64╱d╱ // 0x8f8 @0xc
0x08ec…0907 at000d = ╱65╱e╱ // 0x8f9 @0xd
0x08ec…0907 at000e = ╱20╱…╱ // 0x8fa @0xe
0x08ec…0907 at000f = ╱3a╱:╱ // 0x8fb @0xf
0x08ec…0907 at0010 = ╱23╱#╱ // 0x8fc @0x10
0x08ec…0907 at0011 = ╱23╱#╱ // 0x8fd @0x11
0x08ec…0907 at0012 = ╱23╱#╱ // 0x8fe @0x12
0x08ec…0907 at0013 = ╱22╱"╱ // 0x8ff @0x13
0x08ec…0907 at0014 = ╱f0╱:╱ // 0x900 @0x14
0x08ec…0907 at0015 = ╱55╱U╱ // 0x901 @0x15
0x08ec…0907 at0016 = ╱53╱S╱ // 0x902 @0x16
0x08ec…0907 at0017 = ╱49╱I╱ // 0x903 @0x17
0x08ec…0907 at0018 = ╱44╱D╱ // 0x904 @0x18
0x08ec…0907 at0019 = ╱45╱E╱ // 0x905 @0x19
0x08ec…0907 at001a = EOL // 0x906 @0x1a
0x08ec…0907 }
0x0907…0910 9667 1040 PRINT " "
0x0907…0910 LineComalBin {
0x0907…0910 ptr = 0x9667 // 0x907 @0x0
0x0907…0910 lno = 0x0410 // 0x909 @0x2
0x0907…0910 at0004 = ╱92╱ PRINT ╱ // 0x90b @0x4
0x0907…0910 at0005 = ╱22╱"╱ // 0x90c @0x5
0x0907…0910 at0006 = ╱20╱…╱ // 0x90d @0x6
0x0907…0910 at0007 = ╱22╱"╱ // 0x90e @0x7
0x0907…0910 at0008 = EOL // 0x90f @0x8
0x0907…0910 }
0x0910…0934 968b 1050 PRINT USING " Entreprise: ####### ":ENR;
0x0910…0934 LineComalBin {
0x0910…0934 ptr = 0x968b // 0x910 @0x0
0x0910…0934 lno = 0x041a // 0x912 @0x2
0x0910…0934 at0004 = ╱92╱ PRINT ╱ // 0x914 @0x4
0x0910…0934 at0005 = ╱b9╱ USING ╱ // 0x915 @0x5
0x0910…0934 at0006 = ╱22╱"╱ // 0x916 @0x6
0x0910…0934 at0007 = ╱20╱…╱ // 0x917 @0x7
0x0910…0934 at0008 = ╱20╱…╱ // 0x918 @0x8
0x0910…0934 at0009 = ╱45╱E╱ // 0x919 @0x9
0x0910…0934 at000a = ╱6e╱n╱ // 0x91a @0xa
0x0910…0934 at000b = ╱74╱t╱ // 0x91b @0xb
0x0910…0934 at000c = ╱72╱r╱ // 0x91c @0xc
0x0910…0934 at000d = ╱65╱e╱ // 0x91d @0xd
0x0910…0934 at000e = ╱70╱p╱ // 0x91e @0xe
0x0910…0934 at000f = ╱72╱r╱ // 0x91f @0xf
0x0910…0934 at0010 = ╱69╱i╱ // 0x920 @0x10
0x0910…0934 at0011 = ╱73╱s╱ // 0x921 @0x11
0x0910…0934 at0012 = ╱65╱e╱ // 0x922 @0x12
0x0910…0934 at0013 = ╱3a╱:╱ // 0x923 @0x13
0x0910…0934 at0014 = ╱20╱…╱ // 0x924 @0x14
0x0910…0934 at0015 = ╱23╱#╱ // 0x925 @0x15
0x0910…0934 at0016 = ╱23╱#╱ // 0x926 @0x16
0x0910…0934 at0017 = ╱23╱#╱ // 0x927 @0x17
0x0910…0934 at0018 = ╱23╱#╱ // 0x928 @0x18
0x0910…0934 at0019 = ╱23╱#╱ // 0x929 @0x19
0x0910…0934 at001a = ╱23╱#╱ // 0x92a @0x1a
0x0910…0934 at001b = ╱23╱#╱ // 0x92b @0x1b
0x0910…0934 at001c = ╱20╱…╱ // 0x92c @0x1c
0x0910…0934 at001d = ╱22╱"╱ // 0x92d @0x1d
0x0910…0934 at001e = ╱f0╱:╱ // 0x92e @0x1e
0x0910…0934 at001f = ╱45╱E╱ // 0x92f @0x1f
0x0910…0934 at0020 = ╱4e╱N╱ // 0x930 @0x20
0x0910…0934 at0021 = ╱52╱R╱ // 0x931 @0x21
0x0910…0934 at0022 = ╱eb╱;╱ // 0x932 @0x22
0x0910…0934 at0023 = EOL // 0x933 @0x23
0x0910…0934 }
0x0934…0940 9697 1060 PRINT ENAVN$
0x0934…0940 LineComalBin {
0x0934…0940 ptr = 0x9697 // 0x934 @0x0
0x0934…0940 lno = 0x0424 // 0x936 @0x2
0x0934…0940 at0004 = ╱92╱ PRINT ╱ // 0x938 @0x4
0x0934…0940 at0005 = ╱45╱E╱ // 0x939 @0x5
0x0934…0940 at0006 = ╱4e╱N╱ // 0x93a @0x6
0x0934…0940 at0007 = ╱41╱A╱ // 0x93b @0x7
0x0934…0940 at0008 = ╱56╱V╱ // 0x93c @0x8
0x0934…0940 at0009 = ╱4e╱N╱ // 0x93d @0x9
0x0934…0940 at000a = ╱ef╱$╱ // 0x93e @0xa
0x0934…0940 at000b = EOL // 0x93f @0xb
0x0934…0940 }
0x0940…0949 96a0 1070 PRINT " "
0x0940…0949 LineComalBin {
0x0940…0949 ptr = 0x96a0 // 0x940 @0x0
0x0940…0949 lno = 0x042e // 0x942 @0x2
0x0940…0949 at0004 = ╱92╱ PRINT ╱ // 0x944 @0x4
0x0940…0949 at0005 = ╱22╱"╱ // 0x945 @0x5
0x0940…0949 at0006 = ╱20╱…╱ // 0x946 @0x6
0x0940…0949 at0007 = ╱22╱"╱ // 0x947 @0x7
0x0940…0949 at0008 = EOL // 0x948 @0x8
0x0940…0949 }
0x0949…0977 96ce 1080 PRINT TAB(40);"Månedens";TAB(66);"Årets"
0x0949…0977 LineComalBin {
0x0949…0977 ptr = 0x96ce // 0x949 @0x0
0x0949…0977 lno = 0x0438 // 0x94b @0x2
0x0949…0977 at0004 = ╱92╱ PRINT ╱ // 0x94d @0x4
0x0949…0977 at0005 = ╱d2╱TAB╱ // 0x94e @0x5
0x0949…0977 at0006 = ╱ed╱(╱ // 0x94f @0x6
0x0949…0977 at0007 = ╱34╱4╱ // 0x950 @0x7
0x0949…0977 at0008 = ╱30╱0╱ // 0x951 @0x8
0x0949…0977 at0009 = ╱fe0000a006╱ // 0x952 @0x9
0x0949…0977 at000e = ╱ee╱)╱ // 0x957 @0xe
0x0949…0977 at000f = ╱eb╱;╱ // 0x958 @0xf
0x0949…0977 at0010 = ╱22╱"╱ // 0x959 @0x10
0x0949…0977 at0011 = ╱4d╱M╱ // 0x95a @0x11
0x0949…0977 at0012 = ╱7d╱å╱ // 0x95b @0x12
0x0949…0977 at0013 = ╱6e╱n╱ // 0x95c @0x13
0x0949…0977 at0014 = ╱65╱e╱ // 0x95d @0x14
0x0949…0977 at0015 = ╱64╱d╱ // 0x95e @0x15
0x0949…0977 at0016 = ╱65╱e╱ // 0x95f @0x16
0x0949…0977 at0017 = ╱6e╱n╱ // 0x960 @0x17
0x0949…0977 at0018 = ╱73╱s╱ // 0x961 @0x18
0x0949…0977 at0019 = ╱22╱"╱ // 0x962 @0x19
0x0949…0977 at001a = ╱eb╱;╱ // 0x963 @0x1a
0x0949…0977 at001b = ╱d2╱TAB╱ // 0x964 @0x1b
0x0949…0977 at001c = ╱ed╱(╱ // 0x965 @0x1c
0x0949…0977 at001d = ╱36╱6╱ // 0x966 @0x1d
0x0949…0977 at001e = ╱36╱6╱ // 0x967 @0x1e
0x0949…0977 at001f = ╱fe00008407╱ // 0x968 @0x1f
0x0949…0977 at0024 = ╱ee╱)╱ // 0x96d @0x24
0x0949…0977 at0025 = ╱eb╱;╱ // 0x96e @0x25
0x0949…0977 at0026 = ╱22╱"╱ // 0x96f @0x26
0x0949…0977 at0027 = ╱5d╱Å╱ // 0x970 @0x27
0x0949…0977 at0028 = ╱72╱r╱ // 0x971 @0x28
0x0949…0977 at0029 = ╱65╱e╱ // 0x972 @0x29
0x0949…0977 at002a = ╱74╱t╱ // 0x973 @0x2a
0x0949…0977 at002b = ╱73╱s╱ // 0x974 @0x2b
0x0949…0977 at002c = ╱22╱"╱ // 0x975 @0x2c
0x0949…0977 at002d = EOL // 0x976 @0x2d
0x0949…0977 }
0x0977…09bf 9716 1090 PRINT TAB(V);"Nr Kontonavn";TAB(35);"Debet Kredit Debet";
0x0977…09bf LineComalBin {
0x0977…09bf ptr = 0x9716 // 0x977 @0x0
0x0977…09bf lno = 0x0442 // 0x979 @0x2
0x0977…09bf at0004 = ╱92╱ PRINT ╱ // 0x97b @0x4
0x0977…09bf at0005 = ╱d2╱TAB╱ // 0x97c @0x5
0x0977…09bf at0006 = ╱ed╱(╱ // 0x97d @0x6
0x0977…09bf at0007 = ╱56╱V╱ // 0x97e @0x7
0x0977…09bf at0008 = ╱ee╱)╱ // 0x97f @0x8
0x0977…09bf at0009 = ╱eb╱;╱ // 0x980 @0x9
0x0977…09bf at000a = ╱22╱"╱ // 0x981 @0xa
0x0977…09bf at000b = ╱4e╱N╱ // 0x982 @0xb
0x0977…09bf at000c = ╱72╱r╱ // 0x983 @0xc
0x0977…09bf at000d = ╱20╱…╱ // 0x984 @0xd
0x0977…09bf at000e = ╱20╱…╱ // 0x985 @0xe
0x0977…09bf at000f = ╱20╱…╱ // 0x986 @0xf
0x0977…09bf at0010 = ╱20╱…╱ // 0x987 @0x10
0x0977…09bf at0011 = ╱4b╱K╱ // 0x988 @0x11
0x0977…09bf at0012 = ╱6f╱o╱ // 0x989 @0x12
0x0977…09bf at0013 = ╱6e╱n╱ // 0x98a @0x13
0x0977…09bf at0014 = ╱74╱t╱ // 0x98b @0x14
0x0977…09bf at0015 = ╱6f╱o╱ // 0x98c @0x15
0x0977…09bf at0016 = ╱6e╱n╱ // 0x98d @0x16
0x0977…09bf at0017 = ╱61╱a╱ // 0x98e @0x17
0x0977…09bf at0018 = ╱76╱v╱ // 0x98f @0x18
0x0977…09bf at0019 = ╱6e╱n╱ // 0x990 @0x19
0x0977…09bf at001a = ╱22╱"╱ // 0x991 @0x1a
0x0977…09bf at001b = ╱eb╱;╱ // 0x992 @0x1b
0x0977…09bf at001c = ╱d2╱TAB╱ // 0x993 @0x1c
0x0977…09bf at001d = ╱ed╱(╱ // 0x994 @0x1d
0x0977…09bf at001e = ╱33╱3╱ // 0x995 @0x1e
0x0977…09bf at001f = ╱35╱5╱ // 0x996 @0x1f
0x0977…09bf at0020 = ╱fe00008c06╱ // 0x997 @0x20
0x0977…09bf at0025 = ╱ee╱)╱ // 0x99c @0x25
0x0977…09bf at0026 = ╱eb╱;╱ // 0x99d @0x26
0x0977…09bf at0027 = ╱22╱"╱ // 0x99e @0x27
0x0977…09bf at0028 = ╱44╱D╱ // 0x99f @0x28
0x0977…09bf at0029 = ╱65╱e╱ // 0x9a0 @0x29
0x0977…09bf at002a = ╱62╱b╱ // 0x9a1 @0x2a
0x0977…09bf at002b = ╱65╱e╱ // 0x9a2 @0x2b
0x0977…09bf at002c = ╱74╱t╱ // 0x9a3 @0x2c
0x0977…09bf at002d = ╱20╱…╱ // 0x9a4 @0x2d
0x0977…09bf at002e = ╱20╱…╱ // 0x9a5 @0x2e
0x0977…09bf at002f = ╱20╱…╱ // 0x9a6 @0x2f
0x0977…09bf at0030 = ╱20╱…╱ // 0x9a7 @0x30
0x0977…09bf at0031 = ╱20╱…╱ // 0x9a8 @0x31
0x0977…09bf at0032 = ╱20╱…╱ // 0x9a9 @0x32
0x0977…09bf at0033 = ╱4b╱K╱ // 0x9aa @0x33
0x0977…09bf at0034 = ╱72╱r╱ // 0x9ab @0x34
0x0977…09bf at0035 = ╱65╱e╱ // 0x9ac @0x35
0x0977…09bf at0036 = ╱64╱d╱ // 0x9ad @0x36
0x0977…09bf at0037 = ╱69╱i╱ // 0x9ae @0x37
0x0977…09bf at0038 = ╱74╱t╱ // 0x9af @0x38
0x0977…09bf at0039 = ╱20╱…╱ // 0x9b0 @0x39
0x0977…09bf at003a = ╱20╱…╱ // 0x9b1 @0x3a
0x0977…09bf at003b = ╱20╱…╱ // 0x9b2 @0x3b
0x0977…09bf at003c = ╱20╱…╱ // 0x9b3 @0x3c
0x0977…09bf at003d = ╱20╱…╱ // 0x9b4 @0x3d
0x0977…09bf at003e = ╱20╱…╱ // 0x9b5 @0x3e
0x0977…09bf at003f = ╱20╱…╱ // 0x9b6 @0x3f
0x0977…09bf at0040 = ╱44╱D╱ // 0x9b7 @0x40
0x0977…09bf at0041 = ╱65╱e╱ // 0x9b8 @0x41
0x0977…09bf at0042 = ╱62╱b╱ // 0x9b9 @0x42
0x0977…09bf at0043 = ╱65╱e╱ // 0x9ba @0x43
0x0977…09bf at0044 = ╱74╱t╱ // 0x9bb @0x44
0x0977…09bf at0045 = ╱22╱"╱ // 0x9bc @0x45
0x0977…09bf at0046 = ╱eb╱;╱ // 0x9bd @0x46
0x0977…09bf at0047 = EOL // 0x9be @0x47
0x0977…09bf }
0x09bf…09d4 972b 1100 PRINT " Kredit"
0x09bf…09d4 LineComalBin {
0x09bf…09d4 ptr = 0x972b // 0x9bf @0x0
0x09bf…09d4 lno = 0x044c // 0x9c1 @0x2
0x09bf…09d4 at0004 = ╱92╱ PRINT ╱ // 0x9c3 @0x4
0x09bf…09d4 at0005 = ╱22╱"╱ // 0x9c4 @0x5
0x09bf…09d4 at0006 = ╱20╱…╱ // 0x9c5 @0x6
0x09bf…09d4 at0007 = ╱20╱…╱ // 0x9c6 @0x7
0x09bf…09d4 at0008 = ╱20╱…╱ // 0x9c7 @0x8
0x09bf…09d4 at0009 = ╱20╱…╱ // 0x9c8 @0x9
0x09bf…09d4 at000a = ╱20╱…╱ // 0x9c9 @0xa
0x09bf…09d4 at000b = ╱20╱…╱ // 0x9ca @0xb
0x09bf…09d4 at000c = ╱20╱…╱ // 0x9cb @0xc
0x09bf…09d4 at000d = ╱4b╱K╱ // 0x9cc @0xd
0x09bf…09d4 at000e = ╱72╱r╱ // 0x9cd @0xe
0x09bf…09d4 at000f = ╱65╱e╱ // 0x9ce @0xf
0x09bf…09d4 at0010 = ╱64╱d╱ // 0x9cf @0x10
0x09bf…09d4 at0011 = ╱69╱i╱ // 0x9d0 @0x11
0x09bf…09d4 at0012 = ╱74╱t╱ // 0x9d1 @0x12
0x09bf…09d4 at0013 = ╱22╱"╱ // 0x9d2 @0x13
0x09bf…09d4 at0014 = EOL // 0x9d3 @0x14
0x09bf…09d4 }
0x09d4…09ea 9741 1110 PRINT TAB(8);STREG$
0x09d4…09ea LineComalBin {
0x09d4…09ea ptr = 0x9741 // 0x9d4 @0x0
0x09d4…09ea lno = 0x0456 // 0x9d6 @0x2
0x09d4…09ea at0004 = ╱92╱ PRINT ╱ // 0x9d8 @0x4
0x09d4…09ea at0005 = ╱d2╱TAB╱ // 0x9d9 @0x5
0x09d4…09ea at0006 = ╱ed╱(╱ // 0x9da @0x6
0x09d4…09ea at0007 = ╱38╱8╱ // 0x9db @0x7
0x09d4…09ea at0008 = ╱fe00008004╱ // 0x9dc @0x8
0x09d4…09ea at000d = ╱ee╱)╱ // 0x9e1 @0xd
0x09d4…09ea at000e = ╱eb╱;╱ // 0x9e2 @0xe
0x09d4…09ea at000f = ╱53╱S╱ // 0x9e3 @0xf
0x09d4…09ea at0010 = ╱54╱T╱ // 0x9e4 @0x10
0x09d4…09ea at0011 = ╱52╱R╱ // 0x9e5 @0x11
0x09d4…09ea at0012 = ╱45╱E╱ // 0x9e6 @0x12
0x09d4…09ea at0013 = ╱47╱G╱ // 0x9e7 @0x13
0x09d4…09ea at0014 = ╱ef╱$╱ // 0x9e8 @0x14
0x09d4…09ea at0015 = EOL // 0x9e9 @0x15
0x09d4…09ea }
0x09ea…09f0 9747 1120 ENDPROC
0x09ea…09f0 LineComalBin {
0x09ea…09f0 ptr = 0x9747 // 0x9ea @0x0
0x09ea…09f0 lno = 0x0460 // 0x9ec @0x2
0x09ea…09f0 at0004 = ╱9f╱ ENDPROC ╱ // 0x9ee @0x4
0x09ea…09f0 at0005 = EOL // 0x9ef @0x5
0x09ea…09f0 }
0x09f0…0a12 9769 1130 PROC LINIEUD(NR4,NAVN1,SAL1,SAL2)
0x09f0…0a12 LineComalBin {
0x09f0…0a12 ptr = 0x9769 // 0x9f0 @0x0
0x09f0…0a12 lno = 0x046a // 0x9f2 @0x2
0x09f0…0a12 at0004 = ╱9e╱ PROC ╱ // 0x9f4 @0x4
0x09f0…0a12 at0005 = ╱4c╱L╱ // 0x9f5 @0x5
0x09f0…0a12 at0006 = ╱49╱I╱ // 0x9f6 @0x6
0x09f0…0a12 at0007 = ╱4e╱N╱ // 0x9f7 @0x7
0x09f0…0a12 at0008 = ╱49╱I╱ // 0x9f8 @0x8
0x09f0…0a12 at0009 = ╱45╱E╱ // 0x9f9 @0x9
0x09f0…0a12 at000a = ╱55╱U╱ // 0x9fa @0xa
0x09f0…0a12 at000b = ╱44╱D╱ // 0x9fb @0xb
0x09f0…0a12 at000c = ╱ed╱(╱ // 0x9fc @0xc
0x09f0…0a12 at000d = ╱4e╱N╱ // 0x9fd @0xd
0x09f0…0a12 at000e = ╱52╱R╱ // 0x9fe @0xe
0x09f0…0a12 at000f = ╱34╱4╱ // 0x9ff @0xf
0x09f0…0a12 at0010 = ╱ec╱,╱ // 0xa00 @0x10
0x09f0…0a12 at0011 = ╱4e╱N╱ // 0xa01 @0x11
0x09f0…0a12 at0012 = ╱41╱A╱ // 0xa02 @0x12
0x09f0…0a12 at0013 = ╱56╱V╱ // 0xa03 @0x13
0x09f0…0a12 at0014 = ╱4e╱N╱ // 0xa04 @0x14
0x09f0…0a12 at0015 = ╱31╱1╱ // 0xa05 @0x15
0x09f0…0a12 at0016 = ╱ec╱,╱ // 0xa06 @0x16
0x09f0…0a12 at0017 = ╱53╱S╱ // 0xa07 @0x17
0x09f0…0a12 at0018 = ╱41╱A╱ // 0xa08 @0x18
0x09f0…0a12 at0019 = ╱4c╱L╱ // 0xa09 @0x19
0x09f0…0a12 at001a = ╱31╱1╱ // 0xa0a @0x1a
0x09f0…0a12 at001b = ╱ec╱,╱ // 0xa0b @0x1b
0x09f0…0a12 at001c = ╱53╱S╱ // 0xa0c @0x1c
0x09f0…0a12 at001d = ╱41╱A╱ // 0xa0d @0x1d
0x09f0…0a12 at001e = ╱4c╱L╱ // 0xa0e @0x1e
0x09f0…0a12 at001f = ╱32╱2╱ // 0xa0f @0x1f
0x09f0…0a12 at0020 = ╱ee╱)╱ // 0xa10 @0x20
0x09f0…0a12 at0021 = EOL // 0xa11 @0x21
0x09f0…0a12 }
0x0a12…0a27 977e 1140 PRINT USING "###### ":NR4;
0x0a12…0a27 LineComalBin {
0x0a12…0a27 ptr = 0x977e // 0xa12 @0x0
0x0a12…0a27 lno = 0x0474 // 0xa14 @0x2
0x0a12…0a27 at0004 = ╱92╱ PRINT ╱ // 0xa16 @0x4
0x0a12…0a27 at0005 = ╱b9╱ USING ╱ // 0xa17 @0x5
0x0a12…0a27 at0006 = ╱22╱"╱ // 0xa18 @0x6
0x0a12…0a27 at0007 = ╱23╱#╱ // 0xa19 @0x7
0x0a12…0a27 at0008 = ╱23╱#╱ // 0xa1a @0x8
0x0a12…0a27 at0009 = ╱23╱#╱ // 0xa1b @0x9
0x0a12…0a27 at000a = ╱23╱#╱ // 0xa1c @0xa
0x0a12…0a27 at000b = ╱23╱#╱ // 0xa1d @0xb
0x0a12…0a27 at000c = ╱23╱#╱ // 0xa1e @0xc
0x0a12…0a27 at000d = ╱20╱…╱ // 0xa1f @0xd
0x0a12…0a27 at000e = ╱22╱"╱ // 0xa20 @0xe
0x0a12…0a27 at000f = ╱f0╱:╱ // 0xa21 @0xf
0x0a12…0a27 at0010 = ╱4e╱N╱ // 0xa22 @0x10
0x0a12…0a27 at0011 = ╱52╱R╱ // 0xa23 @0x11
0x0a12…0a27 at0012 = ╱34╱4╱ // 0xa24 @0x12
0x0a12…0a27 at0013 = ╱eb╱;╱ // 0xa25 @0x13
0x0a12…0a27 at0014 = EOL // 0xa26 @0x14
0x0a12…0a27 }
0x0a27…0a44 979b 1150 EXEC TUD(SAL1$,UBELØB1$,B,B)
0x0a27…0a44 LineComalBin {
0x0a27…0a44 ptr = 0x979b // 0xa27 @0x0
0x0a27…0a44 lno = 0x047e // 0xa29 @0x2
0x0a27…0a44 at0004 = ╱9d╱ EXEC ╱ // 0xa2b @0x4
0x0a27…0a44 at0005 = ╱54╱T╱ // 0xa2c @0x5
0x0a27…0a44 at0006 = ╱55╱U╱ // 0xa2d @0x6
0x0a27…0a44 at0007 = ╱44╱D╱ // 0xa2e @0x7
0x0a27…0a44 at0008 = ╱ed╱(╱ // 0xa2f @0x8
0x0a27…0a44 at0009 = ╱53╱S╱ // 0xa30 @0x9
0x0a27…0a44 at000a = ╱41╱A╱ // 0xa31 @0xa
0x0a27…0a44 at000b = ╱4c╱L╱ // 0xa32 @0xb
0x0a27…0a44 at000c = ╱31╱1╱ // 0xa33 @0xc
0x0a27…0a44 at000d = ╱ef╱$╱ // 0xa34 @0xd
0x0a27…0a44 at000e = ╱ec╱,╱ // 0xa35 @0xe
0x0a27…0a44 at000f = ╱55╱U╱ // 0xa36 @0xf
0x0a27…0a44 at0010 = ╱42╱B╱ // 0xa37 @0x10
0x0a27…0a44 at0011 = ╱45╱E╱ // 0xa38 @0x11
0x0a27…0a44 at0012 = ╱4c╱L╱ // 0xa39 @0x12
0x0a27…0a44 at0013 = ╱5c╱Ø╱ // 0xa3a @0x13
0x0a27…0a44 at0014 = ╱42╱B╱ // 0xa3b @0x14
0x0a27…0a44 at0015 = ╱31╱1╱ // 0xa3c @0x15
0x0a27…0a44 at0016 = ╱ef╱$╱ // 0xa3d @0x16
0x0a27…0a44 at0017 = ╱ec╱,╱ // 0xa3e @0x17
0x0a27…0a44 at0018 = ╱42╱B╱ // 0xa3f @0x18
0x0a27…0a44 at0019 = ╱ec╱,╱ // 0xa40 @0x19
0x0a27…0a44 at001a = ╱42╱B╱ // 0xa41 @0x1a
0x0a27…0a44 at001b = ╱ee╱)╱ // 0xa42 @0x1b
0x0a27…0a44 at001c = EOL // 0xa43 @0x1c
0x0a27…0a44 }
0x0a44…0a61 97b8 1160 EXEC TUD(SAL2$,UBELØB2$,B,B)
0x0a44…0a61 LineComalBin {
0x0a44…0a61 ptr = 0x97b8 // 0xa44 @0x0
0x0a44…0a61 lno = 0x0488 // 0xa46 @0x2
0x0a44…0a61 at0004 = ╱9d╱ EXEC ╱ // 0xa48 @0x4
0x0a44…0a61 at0005 = ╱54╱T╱ // 0xa49 @0x5
0x0a44…0a61 at0006 = ╱55╱U╱ // 0xa4a @0x6
0x0a44…0a61 at0007 = ╱44╱D╱ // 0xa4b @0x7
0x0a44…0a61 at0008 = ╱ed╱(╱ // 0xa4c @0x8
0x0a44…0a61 at0009 = ╱53╱S╱ // 0xa4d @0x9
0x0a44…0a61 at000a = ╱41╱A╱ // 0xa4e @0xa
0x0a44…0a61 at000b = ╱4c╱L╱ // 0xa4f @0xb
0x0a44…0a61 at000c = ╱32╱2╱ // 0xa50 @0xc
0x0a44…0a61 at000d = ╱ef╱$╱ // 0xa51 @0xd
0x0a44…0a61 at000e = ╱ec╱,╱ // 0xa52 @0xe
0x0a44…0a61 at000f = ╱55╱U╱ // 0xa53 @0xf
0x0a44…0a61 at0010 = ╱42╱B╱ // 0xa54 @0x10
0x0a44…0a61 at0011 = ╱45╱E╱ // 0xa55 @0x11
0x0a44…0a61 at0012 = ╱4c╱L╱ // 0xa56 @0x12
0x0a44…0a61 at0013 = ╱5c╱Ø╱ // 0xa57 @0x13
0x0a44…0a61 at0014 = ╱42╱B╱ // 0xa58 @0x14
0x0a44…0a61 at0015 = ╱32╱2╱ // 0xa59 @0x15
0x0a44…0a61 at0016 = ╱ef╱$╱ // 0xa5a @0x16
0x0a44…0a61 at0017 = ╱ec╱,╱ // 0xa5b @0x17
0x0a44…0a61 at0018 = ╱42╱B╱ // 0xa5c @0x18
0x0a44…0a61 at0019 = ╱ec╱,╱ // 0xa5d @0x19
0x0a44…0a61 at001a = ╱42╱B╱ // 0xa5e @0x1a
0x0a44…0a61 at001b = ╱ee╱)╱ // 0xa5f @0x1b
0x0a44…0a61 at001c = EOL // 0xa60 @0x1c
0x0a44…0a61 }
0x0a61…0aab 9802 1170 PRINT NAVN1$;TAB(33+10*(SAL1$(LEN(SAL1$))="-"));UBELØB1$(G:12);
0x0a61…0aab LineComalBin {
0x0a61…0aab ptr = 0x9802 // 0xa61 @0x0
0x0a61…0aab lno = 0x0492 // 0xa63 @0x2
0x0a61…0aab at0004 = ╱92╱ PRINT ╱ // 0xa65 @0x4
0x0a61…0aab at0005 = ╱4e╱N╱ // 0xa66 @0x5
0x0a61…0aab at0006 = ╱41╱A╱ // 0xa67 @0x6
0x0a61…0aab at0007 = ╱56╱V╱ // 0xa68 @0x7
0x0a61…0aab at0008 = ╱4e╱N╱ // 0xa69 @0x8
0x0a61…0aab at0009 = ╱31╱1╱ // 0xa6a @0x9
0x0a61…0aab at000a = ╱ef╱$╱ // 0xa6b @0xa
0x0a61…0aab at000b = ╱eb╱;╱ // 0xa6c @0xb
0x0a61…0aab at000c = ╱d2╱TAB╱ // 0xa6d @0xc
0x0a61…0aab at000d = ╱ed╱(╱ // 0xa6e @0xd
0x0a61…0aab at000e = ╱33╱3╱ // 0xa6f @0xe
0x0a61…0aab at000f = ╱33╱3╱ // 0xa70 @0xf
0x0a61…0aab at0010 = ╱fe00008406╱ // 0xa71 @0x10
0x0a61…0aab at0015 = ╱e2╱+╱ // 0xa76 @0x15
0x0a61…0aab at0016 = ╱31╱1╱ // 0xa77 @0x16
0x0a61…0aab at0017 = ╱30╱0╱ // 0xa78 @0x17
0x0a61…0aab at0018 = ╱fe0000a004╱ // 0xa79 @0x18
0x0a61…0aab at001d = ╱e4╱*╱ // 0xa7e @0x1d
0x0a61…0aab at001e = ╱ed╱(╱ // 0xa7f @0x1e
0x0a61…0aab at001f = ╱53╱S╱ // 0xa80 @0x1f
0x0a61…0aab at0020 = ╱41╱A╱ // 0xa81 @0x20
0x0a61…0aab at0021 = ╱4c╱L╱ // 0xa82 @0x21
0x0a61…0aab at0022 = ╱31╱1╱ // 0xa83 @0x22
0x0a61…0aab at0023 = ╱ef╱$╱ // 0xa84 @0x23
0x0a61…0aab at0024 = ╱ed╱(╱ // 0xa85 @0x24
0x0a61…0aab at0025 = ╱cc╱LEN╱ // 0xa86 @0x25
0x0a61…0aab at0026 = ╱ed╱(╱ // 0xa87 @0x26
0x0a61…0aab at0027 = ╱53╱S╱ // 0xa88 @0x27
0x0a61…0aab at0028 = ╱41╱A╱ // 0xa89 @0x28
0x0a61…0aab at0029 = ╱4c╱L╱ // 0xa8a @0x29
0x0a61…0aab at002a = ╱31╱1╱ // 0xa8b @0x2a
0x0a61…0aab at002b = ╱ef╱$╱ // 0xa8c @0x2b
0x0a61…0aab at002c = ╱ee╱)╱ // 0xa8d @0x2c
0x0a61…0aab at002d = ╱ee╱)╱ // 0xa8e @0x2d
0x0a61…0aab at002e = ╱dc╱=╱ // 0xa8f @0x2e
0x0a61…0aab at002f = ╱22╱"╱ // 0xa90 @0x2f
0x0a61…0aab at0030 = ╱2d╱-╱ // 0xa91 @0x30
0x0a61…0aab at0031 = ╱22╱"╱ // 0xa92 @0x31
0x0a61…0aab at0032 = ╱ee╱)╱ // 0xa93 @0x32
0x0a61…0aab at0033 = ╱ee╱)╱ // 0xa94 @0x33
0x0a61…0aab at0034 = ╱eb╱;╱ // 0xa95 @0x34
0x0a61…0aab at0035 = ╱55╱U╱ // 0xa96 @0x35
0x0a61…0aab at0036 = ╱42╱B╱ // 0xa97 @0x36
0x0a61…0aab at0037 = ╱45╱E╱ // 0xa98 @0x37
0x0a61…0aab at0038 = ╱4c╱L╱ // 0xa99 @0x38
0x0a61…0aab at0039 = ╱5c╱Ø╱ // 0xa9a @0x39
0x0a61…0aab at003a = ╱42╱B╱ // 0xa9b @0x3a
0x0a61…0aab at003b = ╱31╱1╱ // 0xa9c @0x3b
0x0a61…0aab at003c = ╱ef╱$╱ // 0xa9d @0x3c
0x0a61…0aab at003d = ╱ed╱(╱ // 0xa9e @0x3d
0x0a61…0aab at003e = ╱47╱G╱ // 0xa9f @0x3e
0x0a61…0aab at003f = ╱f0╱:╱ // 0xaa0 @0x3f
0x0a61…0aab at0040 = ╱31╱1╱ // 0xaa1 @0x40
0x0a61…0aab at0041 = ╱32╱2╱ // 0xaa2 @0x41
0x0a61…0aab at0042 = ╱fe0000c004╱ // 0xaa3 @0x42
0x0a61…0aab at0047 = ╱ee╱)╱ // 0xaa8 @0x47
0x0a61…0aab at0048 = ╱eb╱;╱ // 0xaa9 @0x48
0x0a61…0aab at0049 = EOL // 0xaaa @0x49
0x0a61…0aab }
0x0aab…0aed 9844 1180 PRINT TAB(56+11*(SAL2$(LEN(SAL2$))="-"));UBELØB2$(G:12)
0x0aab…0aed LineComalBin {
0x0aab…0aed ptr = 0x9844 // 0xaab @0x0
0x0aab…0aed lno = 0x049c // 0xaad @0x2
0x0aab…0aed at0004 = ╱92╱ PRINT ╱ // 0xaaf @0x4
0x0aab…0aed at0005 = ╱d2╱TAB╱ // 0xab0 @0x5
0x0aab…0aed at0006 = ╱ed╱(╱ // 0xab1 @0x6
0x0aab…0aed at0007 = ╱35╱5╱ // 0xab2 @0x7
0x0aab…0aed at0008 = ╱36╱6╱ // 0xab3 @0x8
0x0aab…0aed at0009 = ╱fe0000e006╱ // 0xab4 @0x9
0x0aab…0aed at000e = ╱e2╱+╱ // 0xab9 @0xe
0x0aab…0aed at000f = ╱31╱1╱ // 0xaba @0xf
0x0aab…0aed at0010 = ╱31╱1╱ // 0xabb @0x10
0x0aab…0aed at0011 = ╱fe0000b004╱ // 0xabc @0x11
0x0aab…0aed at0016 = ╱e4╱*╱ // 0xac1 @0x16
0x0aab…0aed at0017 = ╱ed╱(╱ // 0xac2 @0x17
0x0aab…0aed at0018 = ╱53╱S╱ // 0xac3 @0x18
0x0aab…0aed at0019 = ╱41╱A╱ // 0xac4 @0x19
0x0aab…0aed at001a = ╱4c╱L╱ // 0xac5 @0x1a
0x0aab…0aed at001b = ╱32╱2╱ // 0xac6 @0x1b
0x0aab…0aed at001c = ╱ef╱$╱ // 0xac7 @0x1c
0x0aab…0aed at001d = ╱ed╱(╱ // 0xac8 @0x1d
0x0aab…0aed at001e = ╱cc╱LEN╱ // 0xac9 @0x1e
0x0aab…0aed at001f = ╱ed╱(╱ // 0xaca @0x1f
0x0aab…0aed at0020 = ╱53╱S╱ // 0xacb @0x20
0x0aab…0aed at0021 = ╱41╱A╱ // 0xacc @0x21
0x0aab…0aed at0022 = ╱4c╱L╱ // 0xacd @0x22
0x0aab…0aed at0023 = ╱32╱2╱ // 0xace @0x23
0x0aab…0aed at0024 = ╱ef╱$╱ // 0xacf @0x24
0x0aab…0aed at0025 = ╱ee╱)╱ // 0xad0 @0x25
0x0aab…0aed at0026 = ╱ee╱)╱ // 0xad1 @0x26
0x0aab…0aed at0027 = ╱dc╱=╱ // 0xad2 @0x27
0x0aab…0aed at0028 = ╱22╱"╱ // 0xad3 @0x28
0x0aab…0aed at0029 = ╱2d╱-╱ // 0xad4 @0x29
0x0aab…0aed at002a = ╱22╱"╱ // 0xad5 @0x2a
0x0aab…0aed at002b = ╱ee╱)╱ // 0xad6 @0x2b
0x0aab…0aed at002c = ╱ee╱)╱ // 0xad7 @0x2c
0x0aab…0aed at002d = ╱eb╱;╱ // 0xad8 @0x2d
0x0aab…0aed at002e = ╱55╱U╱ // 0xad9 @0x2e
0x0aab…0aed at002f = ╱42╱B╱ // 0xada @0x2f
0x0aab…0aed at0030 = ╱45╱E╱ // 0xadb @0x30
0x0aab…0aed at0031 = ╱4c╱L╱ // 0xadc @0x31
0x0aab…0aed at0032 = ╱5c╱Ø╱ // 0xadd @0x32
0x0aab…0aed at0033 = ╱42╱B╱ // 0xade @0x33
0x0aab…0aed at0034 = ╱32╱2╱ // 0xadf @0x34
0x0aab…0aed at0035 = ╱ef╱$╱ // 0xae0 @0x35
0x0aab…0aed at0036 = ╱ed╱(╱ // 0xae1 @0x36
0x0aab…0aed at0037 = ╱47╱G╱ // 0xae2 @0x37
0x0aab…0aed at0038 = ╱f0╱:╱ // 0xae3 @0x38
0x0aab…0aed at0039 = ╱31╱1╱ // 0xae4 @0x39
0x0aab…0aed at003a = ╱32╱2╱ // 0xae5 @0x3a
0x0aab…0aed at003b = ╱fe0000c004╱ // 0xae6 @0x3b
0x0aab…0aed at0040 = ╱ee╱)╱ // 0xaeb @0x40
0x0aab…0aed at0041 = EOL // 0xaec @0x41
0x0aab…0aed }
0x0aed…0af3 984a 1190 ENDPROC
0x0aed…0af3 LineComalBin {
0x0aed…0af3 ptr = 0x984a // 0xaed @0x0
0x0aed…0af3 lno = 0x04a6 // 0xaef @0x2
0x0aed…0af3 at0004 = ╱9f╱ ENDPROC ╱ // 0xaf1 @0x4
0x0aed…0af3 at0005 = EOL // 0xaf2 @0x5
0x0aed…0af3 }
0x0af3…0b0e 9865 1200 PROC NYSIDE(GFNR9,GLNAVN9)
0x0af3…0b0e LineComalBin {
0x0af3…0b0e ptr = 0x9865 // 0xaf3 @0x0
0x0af3…0b0e lno = 0x04b0 // 0xaf5 @0x2
0x0af3…0b0e at0004 = ╱9e╱ PROC ╱ // 0xaf7 @0x4
0x0af3…0b0e at0005 = ╱4e╱N╱ // 0xaf8 @0x5
0x0af3…0b0e at0006 = ╱59╱Y╱ // 0xaf9 @0x6
0x0af3…0b0e at0007 = ╱53╱S╱ // 0xafa @0x7
0x0af3…0b0e at0008 = ╱49╱I╱ // 0xafb @0x8
0x0af3…0b0e at0009 = ╱44╱D╱ // 0xafc @0x9
0x0af3…0b0e at000a = ╱45╱E╱ // 0xafd @0xa
0x0af3…0b0e at000b = ╱ed╱(╱ // 0xafe @0xb
0x0af3…0b0e at000c = ╱47╱G╱ // 0xaff @0xc
0x0af3…0b0e at000d = ╱46╱F╱ // 0xb00 @0xd
0x0af3…0b0e at000e = ╱4e╱N╱ // 0xb01 @0xe
0x0af3…0b0e at000f = ╱52╱R╱ // 0xb02 @0xf
0x0af3…0b0e at0010 = ╱39╱9╱ // 0xb03 @0x10
0x0af3…0b0e at0011 = ╱ec╱,╱ // 0xb04 @0x11
0x0af3…0b0e at0012 = ╱47╱G╱ // 0xb05 @0x12
0x0af3…0b0e at0013 = ╱4c╱L╱ // 0xb06 @0x13
0x0af3…0b0e at0014 = ╱4e╱N╱ // 0xb07 @0x14
0x0af3…0b0e at0015 = ╱41╱A╱ // 0xb08 @0x15
0x0af3…0b0e at0016 = ╱56╱V╱ // 0xb09 @0x16
0x0af3…0b0e at0017 = ╱4e╱N╱ // 0xb0a @0x17
0x0af3…0b0e at0018 = ╱39╱9╱ // 0xb0b @0x18
0x0af3…0b0e at0019 = ╱ee╱)╱ // 0xb0c @0x19
0x0af3…0b0e at001a = EOL // 0xb0d @0x1a
0x0af3…0b0e }
0x0b0e…0b27 987e 1210 FOR LINIE=LINIE TO 41
0x0b0e…0b27 LineComalBin {
0x0b0e…0b27 ptr = 0x987e // 0xb0e @0x0
0x0b0e…0b27 lno = 0x04ba // 0xb10 @0x2
0x0b0e…0b27 at0004 = ╱83╱ FOR ╱ // 0xb12 @0x4
0x0b0e…0b27 at0005 = ╱4c╱L╱ // 0xb13 @0x5
0x0b0e…0b27 at0006 = ╱49╱I╱ // 0xb14 @0x6
0x0b0e…0b27 at0007 = ╱4e╱N╱ // 0xb15 @0x7
0x0b0e…0b27 at0008 = ╱49╱I╱ // 0xb16 @0x8
0x0b0e…0b27 at0009 = ╱45╱E╱ // 0xb17 @0x9
0x0b0e…0b27 at000a = ╱dc╱=╱ // 0xb18 @0xa
0x0b0e…0b27 at000b = ╱4c╱L╱ // 0xb19 @0xb
0x0b0e…0b27 at000c = ╱49╱I╱ // 0xb1a @0xc
0x0b0e…0b27 at000d = ╱4e╱N╱ // 0xb1b @0xd
0x0b0e…0b27 at000e = ╱49╱I╱ // 0xb1c @0xe
0x0b0e…0b27 at000f = ╱45╱E╱ // 0xb1d @0xf
0x0b0e…0b27 at0010 = ╱b7╱ TO ╱ // 0xb1e @0x10
0x0b0e…0b27 at0011 = ╱34╱4╱ // 0xb1f @0x11
0x0b0e…0b27 at0012 = ╱31╱1╱ // 0xb20 @0x12
0x0b0e…0b27 at0013 = ╱fe0000a406╱ // 0xb21 @0x13
0x0b0e…0b27 at0018 = EOL // 0xb26 @0x18
0x0b0e…0b27 }
0x0b27…0b38 988f 1220 PRINT CHR(10);
0x0b27…0b38 LineComalBin {
0x0b27…0b38 ptr = 0x988f // 0xb27 @0x0
0x0b27…0b38 lno = 0x04c4 // 0xb29 @0x2
0x0b27…0b38 at0004 = ╱92╱ PRINT ╱ // 0xb2b @0x4
0x0b27…0b38 at0005 = ╱cf╱CHR╱ // 0xb2c @0x5
0x0b27…0b38 at0006 = ╱ed╱(╱ // 0xb2d @0x6
0x0b27…0b38 at0007 = ╱31╱1╱ // 0xb2e @0x7
0x0b27…0b38 at0008 = ╱30╱0╱ // 0xb2f @0x8
0x0b27…0b38 at0009 = ╱fe0000a004╱ // 0xb30 @0x9
0x0b27…0b38 at000e = ╱ee╱)╱ // 0xb35 @0xe
0x0b27…0b38 at000f = ╱eb╱;╱ // 0xb36 @0xf
0x0b27…0b38 at0010 = EOL // 0xb37 @0x10
0x0b27…0b38 }
0x0b38…0b43 989a 1230 NEXT LINIE
0x0b38…0b43 LineComalBin {
0x0b38…0b43 ptr = 0x989a // 0xb38 @0x0
0x0b38…0b43 lno = 0x04ce // 0xb3a @0x2
0x0b38…0b43 at0004 = ╱84╱ NEXT ╱ // 0xb3c @0x4
0x0b38…0b43 at0005 = ╱4c╱L╱ // 0xb3d @0x5
0x0b38…0b43 at0006 = ╱49╱I╱ // 0xb3e @0x6
0x0b38…0b43 at0007 = ╱4e╱N╱ // 0xb3f @0x7
0x0b38…0b43 at0008 = ╱49╱I╱ // 0xb40 @0x8
0x0b38…0b43 at0009 = ╱45╱E╱ // 0xb41 @0x9
0x0b38…0b43 at000a = EOL // 0xb42 @0xa
0x0b38…0b43 }
0x0b43…0b4c 98a3 1240 PRINT " "
0x0b43…0b4c LineComalBin {
0x0b43…0b4c ptr = 0x98a3 // 0xb43 @0x0
0x0b43…0b4c lno = 0x04d8 // 0xb45 @0x2
0x0b43…0b4c at0004 = ╱92╱ PRINT ╱ // 0xb47 @0x4
0x0b43…0b4c at0005 = ╱22╱"╱ // 0xb48 @0x5
0x0b43…0b4c at0006 = ╱20╱…╱ // 0xb49 @0x6
0x0b43…0b4c at0007 = ╱22╱"╱ // 0xb4a @0x7
0x0b43…0b4c at0008 = EOL // 0xb4b @0x8
0x0b43…0b4c }
0x0b4c…0b5e 98b5 1250 BSIDE=BSIDE+E
0x0b4c…0b5e LineComalBin {
0x0b4c…0b5e ptr = 0x98b5 // 0xb4c @0x0
0x0b4c…0b5e lno = 0x04e2 // 0xb4e @0x2
0x0b4c…0b5e at0004 = ╱42╱B╱ // 0xb50 @0x4
0x0b4c…0b5e at0005 = ╱53╱S╱ // 0xb51 @0x5
0x0b4c…0b5e at0006 = ╱49╱I╱ // 0xb52 @0x6
0x0b4c…0b5e at0007 = ╱44╱D╱ // 0xb53 @0x7
0x0b4c…0b5e at0008 = ╱45╱E╱ // 0xb54 @0x8
0x0b4c…0b5e at0009 = ╱dc╱=╱ // 0xb55 @0x9
0x0b4c…0b5e at000a = ╱42╱B╱ // 0xb56 @0xa
0x0b4c…0b5e at000b = ╱53╱S╱ // 0xb57 @0xb
0x0b4c…0b5e at000c = ╱49╱I╱ // 0xb58 @0xc
0x0b4c…0b5e at000d = ╱44╱D╱ // 0xb59 @0xd
0x0b4c…0b5e at000e = ╱45╱E╱ // 0xb5a @0xe
0x0b4c…0b5e at000f = ╱e2╱+╱ // 0xb5b @0xf
0x0b4c…0b5e at0010 = ╱45╱E╱ // 0xb5c @0x10
0x0b4c…0b5e at0011 = EOL // 0xb5d @0x11
0x0b4c…0b5e }
0x0b5e…0b7d 98d4 1260 EXEC HOVEDUD(T1(7),BSIDE)
0x0b5e…0b7d LineComalBin {
0x0b5e…0b7d ptr = 0x98d4 // 0xb5e @0x0
0x0b5e…0b7d lno = 0x04ec // 0xb60 @0x2
0x0b5e…0b7d at0004 = ╱9d╱ EXEC ╱ // 0xb62 @0x4
0x0b5e…0b7d at0005 = ╱48╱H╱ // 0xb63 @0x5
0x0b5e…0b7d at0006 = ╱4f╱O╱ // 0xb64 @0x6
0x0b5e…0b7d at0007 = ╱56╱V╱ // 0xb65 @0x7
0x0b5e…0b7d at0008 = ╱45╱E╱ // 0xb66 @0x8
0x0b5e…0b7d at0009 = ╱44╱D╱ // 0xb67 @0x9
0x0b5e…0b7d at000a = ╱55╱U╱ // 0xb68 @0xa
0x0b5e…0b7d at000b = ╱44╱D╱ // 0xb69 @0xb
0x0b5e…0b7d at000c = ╱ed╱(╱ // 0xb6a @0xc
0x0b5e…0b7d at000d = ╱54╱T╱ // 0xb6b @0xd
0x0b5e…0b7d at000e = ╱31╱1╱ // 0xb6c @0xe
0x0b5e…0b7d at000f = ╱ed╱(╱ // 0xb6d @0xf
0x0b5e…0b7d at0010 = ╱37╱7╱ // 0xb6e @0x10
0x0b5e…0b7d at0011 = ╱fe0000e003╱ // 0xb6f @0x11
0x0b5e…0b7d at0016 = ╱ee╱)╱ // 0xb74 @0x16
0x0b5e…0b7d at0017 = ╱ec╱,╱ // 0xb75 @0x17
0x0b5e…0b7d at0018 = ╱42╱B╱ // 0xb76 @0x18
0x0b5e…0b7d at0019 = ╱53╱S╱ // 0xb77 @0x19
0x0b5e…0b7d at001a = ╱49╱I╱ // 0xb78 @0x1a
0x0b5e…0b7d at001b = ╱44╱D╱ // 0xb79 @0x1b
0x0b5e…0b7d at001c = ╱45╱E╱ // 0xb7a @0x1c
0x0b5e…0b7d at001d = ╱ee╱)╱ // 0xb7b @0x1d
0x0b5e…0b7d at001e = EOL // 0xb7c @0x1e
0x0b5e…0b7d }
0x0b7d…0b86 98dd 1270 PRINT " "
0x0b7d…0b86 LineComalBin {
0x0b7d…0b86 ptr = 0x98dd // 0xb7d @0x0
0x0b7d…0b86 lno = 0x04f6 // 0xb7f @0x2
0x0b7d…0b86 at0004 = ╱92╱ PRINT ╱ // 0xb81 @0x4
0x0b7d…0b86 at0005 = ╱22╱"╱ // 0xb82 @0x5
0x0b7d…0b86 at0006 = ╱20╱…╱ // 0xb83 @0x6
0x0b7d…0b86 at0007 = ╱22╱"╱ // 0xb84 @0x7
0x0b7d…0b86 at0008 = EOL // 0xb85 @0x8
0x0b7d…0b86 }
0x0b86…0b94 98eb 1280 IF GFNR9>B THEN
0x0b86…0b94 LineComalBin {
0x0b86…0b94 ptr = 0x98eb // 0xb86 @0x0
0x0b86…0b94 lno = 0x0500 // 0xb88 @0x2
0x0b86…0b94 at0004 = ╱9c╱ IF ╱ // 0xb8a @0x4
0x0b86…0b94 at0005 = ╱47╱G╱ // 0xb8b @0x5
0x0b86…0b94 at0006 = ╱46╱F╱ // 0xb8c @0x6
0x0b86…0b94 at0007 = ╱4e╱N╱ // 0xb8d @0x7
0x0b86…0b94 at0008 = ╱52╱R╱ // 0xb8e @0x8
0x0b86…0b94 at0009 = ╱39╱9╱ // 0xb8f @0x9
0x0b86…0b94 at000a = ╱de╱>╱ // 0xb90 @0xa
0x0b86…0b94 at000b = ╱42╱B╱ // 0xb91 @0xb
0x0b86…0b94 at000c = ╱b6╱ THEN ╱ // 0xb92 @0xc
0x0b86…0b94 at000d = EOL // 0xb93 @0xd
0x0b86…0b94 }
0x0b94…0bab 9902 1290 PRINT USING "###### ":GFNR9;
0x0b94…0bab LineComalBin {
0x0b94…0bab ptr = 0x9902 // 0xb94 @0x0
0x0b94…0bab lno = 0x050a // 0xb96 @0x2
0x0b94…0bab at0004 = ╱92╱ PRINT ╱ // 0xb98 @0x4
0x0b94…0bab at0005 = ╱b9╱ USING ╱ // 0xb99 @0x5
0x0b94…0bab at0006 = ╱22╱"╱ // 0xb9a @0x6
0x0b94…0bab at0007 = ╱23╱#╱ // 0xb9b @0x7
0x0b94…0bab at0008 = ╱23╱#╱ // 0xb9c @0x8
0x0b94…0bab at0009 = ╱23╱#╱ // 0xb9d @0x9
0x0b94…0bab at000a = ╱23╱#╱ // 0xb9e @0xa
0x0b94…0bab at000b = ╱23╱#╱ // 0xb9f @0xb
0x0b94…0bab at000c = ╱23╱#╱ // 0xba0 @0xc
0x0b94…0bab at000d = ╱20╱…╱ // 0xba1 @0xd
0x0b94…0bab at000e = ╱22╱"╱ // 0xba2 @0xe
0x0b94…0bab at000f = ╱f0╱:╱ // 0xba3 @0xf
0x0b94…0bab at0010 = ╱47╱G╱ // 0xba4 @0x10
0x0b94…0bab at0011 = ╱46╱F╱ // 0xba5 @0x11
0x0b94…0bab at0012 = ╱4e╱N╱ // 0xba6 @0x12
0x0b94…0bab at0013 = ╱52╱R╱ // 0xba7 @0x13
0x0b94…0bab at0014 = ╱39╱9╱ // 0xba8 @0x14
0x0b94…0bab at0015 = ╱eb╱;╱ // 0xba9 @0x15
0x0b94…0bab at0016 = EOL // 0xbaa @0x16
0x0b94…0bab }
0x0bab…0bd2 9929 1300 EXEC CALC(4,SALDO12$,TAL4$,TAL4$)
0x0bab…0bd2 LineComalBin {
0x0bab…0bd2 ptr = 0x9929 // 0xbab @0x0
0x0bab…0bd2 lno = 0x0514 // 0xbad @0x2
0x0bab…0bd2 at0004 = ╱9d╱ EXEC ╱ // 0xbaf @0x4
0x0bab…0bd2 at0005 = ╱43╱C╱ // 0xbb0 @0x5
0x0bab…0bd2 at0006 = ╱41╱A╱ // 0xbb1 @0x6
0x0bab…0bd2 at0007 = ╱4c╱L╱ // 0xbb2 @0x7
0x0bab…0bd2 at0008 = ╱43╱C╱ // 0xbb3 @0x8
0x0bab…0bd2 at0009 = ╱ed╱(╱ // 0xbb4 @0x9
0x0bab…0bd2 at000a = ╱34╱4╱ // 0xbb5 @0xa
0x0bab…0bd2 at000b = ╱fe00008003╱ // 0xbb6 @0xb
0x0bab…0bd2 at0010 = ╱ec╱,╱ // 0xbbb @0x10
0x0bab…0bd2 at0011 = ╱53╱S╱ // 0xbbc @0x11
0x0bab…0bd2 at0012 = ╱41╱A╱ // 0xbbd @0x12
0x0bab…0bd2 at0013 = ╱4c╱L╱ // 0xbbe @0x13
0x0bab…0bd2 at0014 = ╱44╱D╱ // 0xbbf @0x14
0x0bab…0bd2 at0015 = ╱4f╱O╱ // 0xbc0 @0x15
0x0bab…0bd2 at0016 = ╱31╱1╱ // 0xbc1 @0x16
0x0bab…0bd2 at0017 = ╱32╱2╱ // 0xbc2 @0x17
0x0bab…0bd2 at0018 = ╱ef╱$╱ // 0xbc3 @0x18
0x0bab…0bd2 at0019 = ╱ec╱,╱ // 0xbc4 @0x19
0x0bab…0bd2 at001a = ╱54╱T╱ // 0xbc5 @0x1a
0x0bab…0bd2 at001b = ╱41╱A╱ // 0xbc6 @0x1b
0x0bab…0bd2 at001c = ╱4c╱L╱ // 0xbc7 @0x1c
0x0bab…0bd2 at001d = ╱34╱4╱ // 0xbc8 @0x1d
0x0bab…0bd2 at001e = ╱ef╱$╱ // 0xbc9 @0x1e
0x0bab…0bd2 at001f = ╱ec╱,╱ // 0xbca @0x1f
0x0bab…0bd2 at0020 = ╱54╱T╱ // 0xbcb @0x20
0x0bab…0bd2 at0021 = ╱41╱A╱ // 0xbcc @0x21
0x0bab…0bd2 at0022 = ╱4c╱L╱ // 0xbcd @0x22
0x0bab…0bd2 at0023 = ╱34╱4╱ // 0xbce @0x23
0x0bab…0bd2 at0024 = ╱ef╱$╱ // 0xbcf @0x24
0x0bab…0bd2 at0025 = ╱ee╱)╱ // 0xbd0 @0x25
0x0bab…0bd2 at0026 = EOL // 0xbd1 @0x26
0x0bab…0bd2 }
0x0bd2…0bdd 9934 1310 IF SI<>B THEN
0x0bd2…0bdd LineComalBin {
0x0bd2…0bdd ptr = 0x9934 // 0xbd2 @0x0
0x0bd2…0bdd lno = 0x051e // 0xbd4 @0x2
0x0bd2…0bdd at0004 = ╱9c╱ IF ╱ // 0xbd6 @0x4
0x0bd2…0bdd at0005 = ╱53╱S╱ // 0xbd7 @0x5
0x0bd2…0bdd at0006 = ╱49╱I╱ // 0xbd8 @0x6
0x0bd2…0bdd at0007 = ╱e1╱<>╱ // 0xbd9 @0x7
0x0bd2…0bdd at0008 = ╱42╱B╱ // 0xbda @0x8
0x0bd2…0bdd at0009 = ╱b6╱ THEN ╱ // 0xbdb @0x9
0x0bd2…0bdd at000a = EOL // 0xbdc @0xa
0x0bd2…0bdd }
0x0bdd…0bf6 994d 1320 PRINT GLNAVN9$;" Fortsat"
0x0bdd…0bf6 LineComalBin {
0x0bdd…0bf6 ptr = 0x994d // 0xbdd @0x0
0x0bdd…0bf6 lno = 0x0528 // 0xbdf @0x2
0x0bdd…0bf6 at0004 = ╱92╱ PRINT ╱ // 0xbe1 @0x4
0x0bdd…0bf6 at0005 = ╱47╱G╱ // 0xbe2 @0x5
0x0bdd…0bf6 at0006 = ╱4c╱L╱ // 0xbe3 @0x6
0x0bdd…0bf6 at0007 = ╱4e╱N╱ // 0xbe4 @0x7
0x0bdd…0bf6 at0008 = ╱41╱A╱ // 0xbe5 @0x8
0x0bdd…0bf6 at0009 = ╱56╱V╱ // 0xbe6 @0x9
0x0bdd…0bf6 at000a = ╱4e╱N╱ // 0xbe7 @0xa
0x0bdd…0bf6 at000b = ╱39╱9╱ // 0xbe8 @0xb
0x0bdd…0bf6 at000c = ╱ef╱$╱ // 0xbe9 @0xc
0x0bdd…0bf6 at000d = ╱eb╱;╱ // 0xbea @0xd
0x0bdd…0bf6 at000e = ╱22╱"╱ // 0xbeb @0xe
0x0bdd…0bf6 at000f = ╱20╱…╱ // 0xbec @0xf
0x0bdd…0bf6 at0010 = ╱46╱F╱ // 0xbed @0x10
0x0bdd…0bf6 at0011 = ╱6f╱o╱ // 0xbee @0x11
0x0bdd…0bf6 at0012 = ╱72╱r╱ // 0xbef @0x12
0x0bdd…0bf6 at0013 = ╱74╱t╱ // 0xbf0 @0x13
0x0bdd…0bf6 at0014 = ╱73╱s╱ // 0xbf1 @0x14
0x0bdd…0bf6 at0015 = ╱61╱a╱ // 0xbf2 @0x15
0x0bdd…0bf6 at0016 = ╱74╱t╱ // 0xbf3 @0x16
0x0bdd…0bf6 at0017 = ╱22╱"╱ // 0xbf4 @0x17
0x0bdd…0bf6 at0018 = EOL // 0xbf5 @0x18
0x0bdd…0bf6 }
0x0bf6…0bfc 9953 1330 ELSE
0x0bf6…0bfc LineComalBin {
0x0bf6…0bfc ptr = 0x9953 // 0xbf6 @0x0
0x0bf6…0bfc lno = 0x0532 // 0xbf8 @0x2
0x0bf6…0bfc at0004 = ╱9a╱ ELSE ╱ // 0xbfa @0x4
0x0bf6…0bfc at0005 = EOL // 0xbfb @0x5
0x0bf6…0bfc }
0x0bfc…0c0a 9961 1340 PRINT GLNAVN9$
0x0bfc…0c0a LineComalBin {
0x0bfc…0c0a ptr = 0x9961 // 0xbfc @0x0
0x0bfc…0c0a lno = 0x053c // 0xbfe @0x2
0x0bfc…0c0a at0004 = ╱92╱ PRINT ╱ // 0xc00 @0x4
0x0bfc…0c0a at0005 = ╱47╱G╱ // 0xc01 @0x5
0x0bfc…0c0a at0006 = ╱4c╱L╱ // 0xc02 @0x6
0x0bfc…0c0a at0007 = ╱4e╱N╱ // 0xc03 @0x7
0x0bfc…0c0a at0008 = ╱41╱A╱ // 0xc04 @0x8
0x0bfc…0c0a at0009 = ╱56╱V╱ // 0xc05 @0x9
0x0bfc…0c0a at000a = ╱4e╱N╱ // 0xc06 @0xa
0x0bfc…0c0a at000b = ╱39╱9╱ // 0xc07 @0xb
0x0bfc…0c0a at000c = ╱ef╱$╱ // 0xc08 @0xc
0x0bfc…0c0a at000d = EOL // 0xc09 @0xd
0x0bfc…0c0a }
0x0c0a…0c10 9967 1350 ENDIF
0x0c0a…0c10 LineComalBin {
0x0c0a…0c10 ptr = 0x9967 // 0xc0a @0x0
0x0c0a…0c10 lno = 0x0546 // 0xc0c @0x2
0x0c0a…0c10 at0004 = ╱9b╱ ENDIF ╱ // 0xc0e @0x4
0x0c0a…0c10 at0005 = EOL // 0xc0f @0x5
0x0c0a…0c10 }
0x0c10…0c3f 9996 1360 PRINT TAB(8);STREG$(E:25+7*(SI<>B))
0x0c10…0c3f LineComalBin {
0x0c10…0c3f ptr = 0x9996 // 0xc10 @0x0
0x0c10…0c3f lno = 0x0550 // 0xc12 @0x2
0x0c10…0c3f at0004 = ╱92╱ PRINT ╱ // 0xc14 @0x4
0x0c10…0c3f at0005 = ╱d2╱TAB╱ // 0xc15 @0x5
0x0c10…0c3f at0006 = ╱ed╱(╱ // 0xc16 @0x6
0x0c10…0c3f at0007 = ╱38╱8╱ // 0xc17 @0x7
0x0c10…0c3f at0008 = ╱fe00008004╱ // 0xc18 @0x8
0x0c10…0c3f at000d = ╱ee╱)╱ // 0xc1d @0xd
0x0c10…0c3f at000e = ╱eb╱;╱ // 0xc1e @0xe
0x0c10…0c3f at000f = ╱53╱S╱ // 0xc1f @0xf
0x0c10…0c3f at0010 = ╱54╱T╱ // 0xc20 @0x10
0x0c10…0c3f at0011 = ╱52╱R╱ // 0xc21 @0x11
0x0c10…0c3f at0012 = ╱45╱E╱ // 0xc22 @0x12
0x0c10…0c3f at0013 = ╱47╱G╱ // 0xc23 @0x13
0x0c10…0c3f at0014 = ╱ef╱$╱ // 0xc24 @0x14
0x0c10…0c3f at0015 = ╱ed╱(╱ // 0xc25 @0x15
0x0c10…0c3f at0016 = ╱45╱E╱ // 0xc26 @0x16
0x0c10…0c3f at0017 = ╱f0╱:╱ // 0xc27 @0x17
0x0c10…0c3f at0018 = ╱32╱2╱ // 0xc28 @0x18
0x0c10…0c3f at0019 = ╱35╱5╱ // 0xc29 @0x19
0x0c10…0c3f at001a = ╱fe0000c805╱ // 0xc2a @0x1a
0x0c10…0c3f at001f = ╱e2╱+╱ // 0xc2f @0x1f
0x0c10…0c3f at0020 = ╱37╱7╱ // 0xc30 @0x20
0x0c10…0c3f at0021 = ╱fe0000e003╱ // 0xc31 @0x21
0x0c10…0c3f at0026 = ╱e4╱*╱ // 0xc36 @0x26
0x0c10…0c3f at0027 = ╱ed╱(╱ // 0xc37 @0x27
0x0c10…0c3f at0028 = ╱53╱S╱ // 0xc38 @0x28
0x0c10…0c3f at0029 = ╱49╱I╱ // 0xc39 @0x29
0x0c10…0c3f at002a = ╱e1╱<>╱ // 0xc3a @0x2a
0x0c10…0c3f at002b = ╱42╱B╱ // 0xc3b @0x2b
0x0c10…0c3f at002c = ╱ee╱)╱ // 0xc3c @0x2c
0x0c10…0c3f at002d = ╱ee╱)╱ // 0xc3d @0x2d
0x0c10…0c3f at002e = EOL // 0xc3e @0x2e
0x0c10…0c3f }
0x0c3f…0c50 99a7 1370 LINIE=7
0x0c3f…0c50 LineComalBin {
0x0c3f…0c50 ptr = 0x99a7 // 0xc3f @0x0
0x0c3f…0c50 lno = 0x055a // 0xc41 @0x2
0x0c3f…0c50 at0004 = ╱4c╱L╱ // 0xc43 @0x4
0x0c3f…0c50 at0005 = ╱49╱I╱ // 0xc44 @0x5
0x0c3f…0c50 at0006 = ╱4e╱N╱ // 0xc45 @0x6
0x0c3f…0c50 at0007 = ╱49╱I╱ // 0xc46 @0x7
0x0c3f…0c50 at0008 = ╱45╱E╱ // 0xc47 @0x8
0x0c3f…0c50 at0009 = ╱dc╱=╱ // 0xc48 @0x9
0x0c3f…0c50 at000a = ╱37╱7╱ // 0xc49 @0xa
0x0c3f…0c50 at000b = ╱fe0000e003╱ // 0xc4a @0xb
0x0c3f…0c50 at0010 = EOL // 0xc4f @0x10
0x0c3f…0c50 }
0x0c50…0c56 99ad 1380 ELSE
0x0c50…0c56 LineComalBin {
0x0c50…0c56 ptr = 0x99ad // 0xc50 @0x0
0x0c50…0c56 lno = 0x0564 // 0xc52 @0x2
0x0c50…0c56 at0004 = ╱9a╱ ELSE ╱ // 0xc54 @0x4
0x0c50…0c56 at0005 = EOL // 0xc55 @0x5
0x0c50…0c56 }
0x0c56…0c67 99be 1390 LINIE=5
0x0c56…0c67 LineComalBin {
0x0c56…0c67 ptr = 0x99be // 0xc56 @0x0
0x0c56…0c67 lno = 0x056e // 0xc58 @0x2
0x0c56…0c67 at0004 = ╱4c╱L╱ // 0xc5a @0x4
0x0c56…0c67 at0005 = ╱49╱I╱ // 0xc5b @0x5
0x0c56…0c67 at0006 = ╱4e╱N╱ // 0xc5c @0x6
0x0c56…0c67 at0007 = ╱49╱I╱ // 0xc5d @0x7
0x0c56…0c67 at0008 = ╱45╱E╱ // 0xc5e @0x8
0x0c56…0c67 at0009 = ╱dc╱=╱ // 0xc5f @0x9
0x0c56…0c67 at000a = ╱35╱5╱ // 0xc60 @0xa
0x0c56…0c67 at000b = ╱fe0000a003╱ // 0xc61 @0xb
0x0c56…0c67 at0010 = EOL // 0xc66 @0x10
0x0c56…0c67 }
0x0c67…0c6d 99c4 1400 ENDIF
0x0c67…0c6d LineComalBin {
0x0c67…0c6d ptr = 0x99c4 // 0xc67 @0x0
0x0c67…0c6d lno = 0x0578 // 0xc69 @0x2
0x0c67…0c6d at0004 = ╱9b╱ ENDIF ╱ // 0xc6b @0x4
0x0c67…0c6d at0005 = EOL // 0xc6c @0x5
0x0c67…0c6d }
0x0c6d…0c76 99cd 1410 PRINT " "
0x0c6d…0c76 LineComalBin {
0x0c6d…0c76 ptr = 0x99cd // 0xc6d @0x0
0x0c6d…0c76 lno = 0x0582 // 0xc6f @0x2
0x0c6d…0c76 at0004 = ╱92╱ PRINT ╱ // 0xc71 @0x4
0x0c6d…0c76 at0005 = ╱22╱"╱ // 0xc72 @0x5
0x0c6d…0c76 at0006 = ╱20╱…╱ // 0xc73 @0x6
0x0c6d…0c76 at0007 = ╱22╱"╱ // 0xc74 @0x7
0x0c6d…0c76 at0008 = EOL // 0xc75 @0x8
0x0c6d…0c76 }
0x0c76…0c7c 99d3 1420 ENDPROC
0x0c76…0c7c LineComalBin {
0x0c76…0c7c ptr = 0x99d3 // 0xc76 @0x0
0x0c76…0c7c lno = 0x058c // 0xc78 @0x2
0x0c76…0c7c at0004 = ╱9f╱ ENDPROC ╱ // 0xc7a @0x4
0x0c76…0c7c at0005 = EOL // 0xc7b @0x5
0x0c76…0c7c }
0x0c7c…0c96 99ed 1430 K1$="P641220:SYSTEM1"
0x0c7c…0c96 LineComalBin {
0x0c7c…0c96 ptr = 0x99ed // 0xc7c @0x0
0x0c7c…0c96 lno = 0x0596 // 0xc7e @0x2
0x0c7c…0c96 at0004 = ╱4b╱K╱ // 0xc80 @0x4
0x0c7c…0c96 at0005 = ╱31╱1╱ // 0xc81 @0x5
0x0c7c…0c96 at0006 = ╱ef╱$╱ // 0xc82 @0x6
0x0c7c…0c96 at0007 = ╱dc╱=╱ // 0xc83 @0x7
0x0c7c…0c96 at0008 = ╱22╱"╱ // 0xc84 @0x8
0x0c7c…0c96 at0009 = ╱50╱P╱ // 0xc85 @0x9
0x0c7c…0c96 at000a = ╱36╱6╱ // 0xc86 @0xa
0x0c7c…0c96 at000b = ╱34╱4╱ // 0xc87 @0xb
0x0c7c…0c96 at000c = ╱31╱1╱ // 0xc88 @0xc
0x0c7c…0c96 at000d = ╱32╱2╱ // 0xc89 @0xd
0x0c7c…0c96 at000e = ╱32╱2╱ // 0xc8a @0xe
0x0c7c…0c96 at000f = ╱30╱0╱ // 0xc8b @0xf
0x0c7c…0c96 at0010 = ╱3a╱:╱ // 0xc8c @0x10
0x0c7c…0c96 at0011 = ╱53╱S╱ // 0xc8d @0x11
0x0c7c…0c96 at0012 = ╱59╱Y╱ // 0xc8e @0x12
0x0c7c…0c96 at0013 = ╱53╱S╱ // 0xc8f @0x13
0x0c7c…0c96 at0014 = ╱54╱T╱ // 0xc90 @0x14
0x0c7c…0c96 at0015 = ╱45╱E╱ // 0xc91 @0x15
0x0c7c…0c96 at0016 = ╱4d╱M╱ // 0xc92 @0x16
0x0c7c…0c96 at0017 = ╱31╱1╱ // 0xc93 @0x17
0x0c7c…0c96 at0018 = ╱22╱"╱ // 0xc94 @0x18
0x0c7c…0c96 at0019 = EOL // 0xc95 @0x19
0x0c7c…0c96 }
0x0c96…0ca1 99f8 1440 OPEN K1$,R
0x0c96…0ca1 LineComalBin {
0x0c96…0ca1 ptr = 0x99f8 // 0xc96 @0x0
0x0c96…0ca1 lno = 0x05a0 // 0xc98 @0x2
0x0c96…0ca1 at0004 = ╱a7╱ OPEN ╱ // 0xc9a @0x4
0x0c96…0ca1 at0005 = ╱4b╱K╱ // 0xc9b @0x5
0x0c96…0ca1 at0006 = ╱31╱1╱ // 0xc9c @0x6
0x0c96…0ca1 at0007 = ╱ef╱$╱ // 0xc9d @0x7
0x0c96…0ca1 at0008 = ╱ec╱,╱ // 0xc9e @0x8
0x0c96…0ca1 at0009 = ╱52╱R╱ // 0xc9f @0x9
0x0c96…0ca1 at000a = EOL // 0xca0 @0xa
0x0c96…0ca1 }
0x0ca1…0cb4 9a0b 1450 EXEC FEJL(W,E,K1$)
0x0ca1…0cb4 LineComalBin {
0x0ca1…0cb4 ptr = 0x9a0b // 0xca1 @0x0
0x0ca1…0cb4 lno = 0x05aa // 0xca3 @0x2
0x0ca1…0cb4 at0004 = ╱9d╱ EXEC ╱ // 0xca5 @0x4
0x0ca1…0cb4 at0005 = ╱46╱F╱ // 0xca6 @0x5
0x0ca1…0cb4 at0006 = ╱45╱E╱ // 0xca7 @0x6
0x0ca1…0cb4 at0007 = ╱4a╱J╱ // 0xca8 @0x7
0x0ca1…0cb4 at0008 = ╱4c╱L╱ // 0xca9 @0x8
0x0ca1…0cb4 at0009 = ╱ed╱(╱ // 0xcaa @0x9
0x0ca1…0cb4 at000a = ╱57╱W╱ // 0xcab @0xa
0x0ca1…0cb4 at000b = ╱ec╱,╱ // 0xcac @0xb
0x0ca1…0cb4 at000c = ╱45╱E╱ // 0xcad @0xc
0x0ca1…0cb4 at000d = ╱ec╱,╱ // 0xcae @0xd
0x0ca1…0cb4 at000e = ╱4b╱K╱ // 0xcaf @0xe
0x0ca1…0cb4 at000f = ╱31╱1╱ // 0xcb0 @0xf
0x0ca1…0cb4 at0010 = ╱ef╱$╱ // 0xcb1 @0x10
0x0ca1…0cb4 at0011 = ╱ee╱)╱ // 0xcb2 @0x11
0x0ca1…0cb4 at0012 = EOL // 0xcb3 @0x12
0x0ca1…0cb4 }
0x0cb4…0cda 9a31 1460 GET K1$,W:KRTAL,VTAL,MEANTAL,MUNKANT
0x0cb4…0cda LineComalBin {
0x0cb4…0cda ptr = 0x9a31 // 0xcb4 @0x0
0x0cb4…0cda lno = 0x05b4 // 0xcb6 @0x2
0x0cb4…0cda at0004 = ╱a9╱ GET ╱ // 0xcb8 @0x4
0x0cb4…0cda at0005 = ╱4b╱K╱ // 0xcb9 @0x5
0x0cb4…0cda at0006 = ╱31╱1╱ // 0xcba @0x6
0x0cb4…0cda at0007 = ╱ef╱$╱ // 0xcbb @0x7
0x0cb4…0cda at0008 = ╱ec╱,╱ // 0xcbc @0x8
0x0cb4…0cda at0009 = ╱57╱W╱ // 0xcbd @0x9
0x0cb4…0cda at000a = ╱f0╱:╱ // 0xcbe @0xa
0x0cb4…0cda at000b = ╱4b╱K╱ // 0xcbf @0xb
0x0cb4…0cda at000c = ╱52╱R╱ // 0xcc0 @0xc
0x0cb4…0cda at000d = ╱54╱T╱ // 0xcc1 @0xd
0x0cb4…0cda at000e = ╱41╱A╱ // 0xcc2 @0xe
0x0cb4…0cda at000f = ╱4c╱L╱ // 0xcc3 @0xf
0x0cb4…0cda at0010 = ╱ec╱,╱ // 0xcc4 @0x10
0x0cb4…0cda at0011 = ╱56╱V╱ // 0xcc5 @0x11
0x0cb4…0cda at0012 = ╱54╱T╱ // 0xcc6 @0x12
0x0cb4…0cda at0013 = ╱41╱A╱ // 0xcc7 @0x13
0x0cb4…0cda at0014 = ╱4c╱L╱ // 0xcc8 @0x14
0x0cb4…0cda at0015 = ╱ec╱,╱ // 0xcc9 @0x15
0x0cb4…0cda at0016 = ╱4d╱M╱ // 0xcca @0x16
0x0cb4…0cda at0017 = ╱45╱E╱ // 0xccb @0x17
0x0cb4…0cda at0018 = ╱41╱A╱ // 0xccc @0x18
0x0cb4…0cda at0019 = ╱4e╱N╱ // 0xccd @0x19
0x0cb4…0cda at001a = ╱54╱T╱ // 0xcce @0x1a
0x0cb4…0cda at001b = ╱41╱A╱ // 0xccf @0x1b
0x0cb4…0cda at001c = ╱4c╱L╱ // 0xcd0 @0x1c
0x0cb4…0cda at001d = ╱ec╱,╱ // 0xcd1 @0x1d
0x0cb4…0cda at001e = ╱4d╱M╱ // 0xcd2 @0x1e
0x0cb4…0cda at001f = ╱55╱U╱ // 0xcd3 @0x1f
0x0cb4…0cda at0020 = ╱4e╱N╱ // 0xcd4 @0x20
0x0cb4…0cda at0021 = ╱4b╱K╱ // 0xcd5 @0x21
0x0cb4…0cda at0022 = ╱41╱A╱ // 0xcd6 @0x22
0x0cb4…0cda at0023 = ╱4e╱N╱ // 0xcd7 @0x23
0x0cb4…0cda at0024 = ╱54╱T╱ // 0xcd8 @0x24
0x0cb4…0cda at0025 = EOL // 0xcd9 @0x25
0x0cb4…0cda }
0x0cda…0cf2 9a49 1470 EXEC FEJL(W,6,K1$)
0x0cda…0cf2 LineComalBin {
0x0cda…0cf2 ptr = 0x9a49 // 0xcda @0x0
0x0cda…0cf2 lno = 0x05be // 0xcdc @0x2
0x0cda…0cf2 at0004 = ╱9d╱ EXEC ╱ // 0xcde @0x4
0x0cda…0cf2 at0005 = ╱46╱F╱ // 0xcdf @0x5
0x0cda…0cf2 at0006 = ╱45╱E╱ // 0xce0 @0x6
0x0cda…0cf2 at0007 = ╱4a╱J╱ // 0xce1 @0x7
0x0cda…0cf2 at0008 = ╱4c╱L╱ // 0xce2 @0x8
0x0cda…0cf2 at0009 = ╱ed╱(╱ // 0xce3 @0x9
0x0cda…0cf2 at000a = ╱57╱W╱ // 0xce4 @0xa
0x0cda…0cf2 at000b = ╱ec╱,╱ // 0xce5 @0xb
0x0cda…0cf2 at000c = ╱36╱6╱ // 0xce6 @0xc
0x0cda…0cf2 at000d = ╱fe0000c003╱ // 0xce7 @0xd
0x0cda…0cf2 at0012 = ╱ec╱,╱ // 0xcec @0x12
0x0cda…0cf2 at0013 = ╱4b╱K╱ // 0xced @0x13
0x0cda…0cf2 at0014 = ╱31╱1╱ // 0xcee @0x14
0x0cda…0cf2 at0015 = ╱ef╱$╱ // 0xcef @0x15
0x0cda…0cf2 at0016 = ╱ee╱)╱ // 0xcf0 @0x16
0x0cda…0cf2 at0017 = EOL // 0xcf1 @0x17
0x0cda…0cf2 }
0x0cf2…0d06 9a5d 1480 GET K1$,10:N$
0x0cf2…0d06 LineComalBin {
0x0cf2…0d06 ptr = 0x9a5d // 0xcf2 @0x0
0x0cf2…0d06 lno = 0x05c8 // 0xcf4 @0x2
0x0cf2…0d06 at0004 = ╱a9╱ GET ╱ // 0xcf6 @0x4
0x0cf2…0d06 at0005 = ╱4b╱K╱ // 0xcf7 @0x5
0x0cf2…0d06 at0006 = ╱31╱1╱ // 0xcf8 @0x6
0x0cf2…0d06 at0007 = ╱ef╱$╱ // 0xcf9 @0x7
0x0cf2…0d06 at0008 = ╱ec╱,╱ // 0xcfa @0x8
0x0cf2…0d06 at0009 = ╱31╱1╱ // 0xcfb @0x9
0x0cf2…0d06 at000a = ╱30╱0╱ // 0xcfc @0xa
0x0cf2…0d06 at000b = ╱fe0000a004╱ // 0xcfd @0xb
0x0cf2…0d06 at0010 = ╱f0╱:╱ // 0xd02 @0x10
0x0cf2…0d06 at0011 = ╱4e╱N╱ // 0xd03 @0x11
0x0cf2…0d06 at0012 = ╱ef╱$╱ // 0xd04 @0x12
0x0cf2…0d06 at0013 = EOL // 0xd05 @0x13
0x0cf2…0d06 }
0x0d06…0d1e 9a75 1490 EXEC FEJL(W,7,K1$)
0x0d06…0d1e LineComalBin {
0x0d06…0d1e ptr = 0x9a75 // 0xd06 @0x0
0x0d06…0d1e lno = 0x05d2 // 0xd08 @0x2
0x0d06…0d1e at0004 = ╱9d╱ EXEC ╱ // 0xd0a @0x4
0x0d06…0d1e at0005 = ╱46╱F╱ // 0xd0b @0x5
0x0d06…0d1e at0006 = ╱45╱E╱ // 0xd0c @0x6
0x0d06…0d1e at0007 = ╱4a╱J╱ // 0xd0d @0x7
0x0d06…0d1e at0008 = ╱4c╱L╱ // 0xd0e @0x8
0x0d06…0d1e at0009 = ╱ed╱(╱ // 0xd0f @0x9
0x0d06…0d1e at000a = ╱57╱W╱ // 0xd10 @0xa
0x0d06…0d1e at000b = ╱ec╱,╱ // 0xd11 @0xb
0x0d06…0d1e at000c = ╱37╱7╱ // 0xd12 @0xc
0x0d06…0d1e at000d = ╱fe0000e003╱ // 0xd13 @0xd
0x0d06…0d1e at0012 = ╱ec╱,╱ // 0xd18 @0x12
0x0d06…0d1e at0013 = ╱4b╱K╱ // 0xd19 @0x13
0x0d06…0d1e at0014 = ╱31╱1╱ // 0xd1a @0x14
0x0d06…0d1e at0015 = ╱ef╱$╱ // 0xd1b @0x15
0x0d06…0d1e at0016 = ╱ee╱)╱ // 0xd1c @0x16
0x0d06…0d1e at0017 = EOL // 0xd1d @0x17
0x0d06…0d1e }
0x0d1e…0d33 9a8a 1500 GET K1$,38:K2$
0x0d1e…0d33 LineComalBin {
0x0d1e…0d33 ptr = 0x9a8a // 0xd1e @0x0
0x0d1e…0d33 lno = 0x05dc // 0xd20 @0x2
0x0d1e…0d33 at0004 = ╱a9╱ GET ╱ // 0xd22 @0x4
0x0d1e…0d33 at0005 = ╱4b╱K╱ // 0xd23 @0x5
0x0d1e…0d33 at0006 = ╱31╱1╱ // 0xd24 @0x6
0x0d1e…0d33 at0007 = ╱ef╱$╱ // 0xd25 @0x7
0x0d1e…0d33 at0008 = ╱ec╱,╱ // 0xd26 @0x8
0x0d1e…0d33 at0009 = ╱33╱3╱ // 0xd27 @0x9
0x0d1e…0d33 at000a = ╱38╱8╱ // 0xd28 @0xa
0x0d1e…0d33 at000b = ╱fe00009806╱ // 0xd29 @0xb
0x0d1e…0d33 at0010 = ╱f0╱:╱ // 0xd2e @0x10
0x0d1e…0d33 at0011 = ╱4b╱K╱ // 0xd2f @0x11
0x0d1e…0d33 at0012 = ╱32╱2╱ // 0xd30 @0x12
0x0d1e…0d33 at0013 = ╱ef╱$╱ // 0xd31 @0x13
0x0d1e…0d33 at0014 = EOL // 0xd32 @0x14
0x0d1e…0d33 }
0x0d33…0d4b 9aa2 1510 EXEC FEJL(W,8,K1$)
0x0d33…0d4b LineComalBin {
0x0d33…0d4b ptr = 0x9aa2 // 0xd33 @0x0
0x0d33…0d4b lno = 0x05e6 // 0xd35 @0x2
0x0d33…0d4b at0004 = ╱9d╱ EXEC ╱ // 0xd37 @0x4
0x0d33…0d4b at0005 = ╱46╱F╱ // 0xd38 @0x5
0x0d33…0d4b at0006 = ╱45╱E╱ // 0xd39 @0x6
0x0d33…0d4b at0007 = ╱4a╱J╱ // 0xd3a @0x7
0x0d33…0d4b at0008 = ╱4c╱L╱ // 0xd3b @0x8
0x0d33…0d4b at0009 = ╱ed╱(╱ // 0xd3c @0x9
0x0d33…0d4b at000a = ╱57╱W╱ // 0xd3d @0xa
0x0d33…0d4b at000b = ╱ec╱,╱ // 0xd3e @0xb
0x0d33…0d4b at000c = ╱38╱8╱ // 0xd3f @0xc
0x0d33…0d4b at000d = ╱fe00008004╱ // 0xd40 @0xd
0x0d33…0d4b at0012 = ╱ec╱,╱ // 0xd45 @0x12
0x0d33…0d4b at0013 = ╱4b╱K╱ // 0xd46 @0x13
0x0d33…0d4b at0014 = ╱31╱1╱ // 0xd47 @0x14
0x0d33…0d4b at0015 = ╱ef╱$╱ // 0xd48 @0x15
0x0d33…0d4b at0016 = ╱ee╱)╱ // 0xd49 @0x16
0x0d33…0d4b at0017 = EOL // 0xd4a @0x17
0x0d33…0d4b }
0x0d4b…0d60 9ab7 1520 GET K1$,37:K3$
0x0d4b…0d60 LineComalBin {
0x0d4b…0d60 ptr = 0x9ab7 // 0xd4b @0x0
0x0d4b…0d60 lno = 0x05f0 // 0xd4d @0x2
0x0d4b…0d60 at0004 = ╱a9╱ GET ╱ // 0xd4f @0x4
0x0d4b…0d60 at0005 = ╱4b╱K╱ // 0xd50 @0x5
0x0d4b…0d60 at0006 = ╱31╱1╱ // 0xd51 @0x6
0x0d4b…0d60 at0007 = ╱ef╱$╱ // 0xd52 @0x7
0x0d4b…0d60 at0008 = ╱ec╱,╱ // 0xd53 @0x8
0x0d4b…0d60 at0009 = ╱33╱3╱ // 0xd54 @0x9
0x0d4b…0d60 at000a = ╱37╱7╱ // 0xd55 @0xa
0x0d4b…0d60 at000b = ╱fe00009406╱ // 0xd56 @0xb
0x0d4b…0d60 at0010 = ╱f0╱:╱ // 0xd5b @0x10
0x0d4b…0d60 at0011 = ╱4b╱K╱ // 0xd5c @0x11
0x0d4b…0d60 at0012 = ╱33╱3╱ // 0xd5d @0x12
0x0d4b…0d60 at0013 = ╱ef╱$╱ // 0xd5e @0x13
0x0d4b…0d60 at0014 = EOL // 0xd5f @0x14
0x0d4b…0d60 }
0x0d60…0d73 9aca 1530 EXEC FEJL(W,W,K1$)
0x0d60…0d73 LineComalBin {
0x0d60…0d73 ptr = 0x9aca // 0xd60 @0x0
0x0d60…0d73 lno = 0x05fa // 0xd62 @0x2
0x0d60…0d73 at0004 = ╱9d╱ EXEC ╱ // 0xd64 @0x4
0x0d60…0d73 at0005 = ╱46╱F╱ // 0xd65 @0x5
0x0d60…0d73 at0006 = ╱45╱E╱ // 0xd66 @0x6
0x0d60…0d73 at0007 = ╱4a╱J╱ // 0xd67 @0x7
0x0d60…0d73 at0008 = ╱4c╱L╱ // 0xd68 @0x8
0x0d60…0d73 at0009 = ╱ed╱(╱ // 0xd69 @0x9
0x0d60…0d73 at000a = ╱57╱W╱ // 0xd6a @0xa
0x0d60…0d73 at000b = ╱ec╱,╱ // 0xd6b @0xb
0x0d60…0d73 at000c = ╱57╱W╱ // 0xd6c @0xc
0x0d60…0d73 at000d = ╱ec╱,╱ // 0xd6d @0xd
0x0d60…0d73 at000e = ╱4b╱K╱ // 0xd6e @0xe
0x0d60…0d73 at000f = ╱31╱1╱ // 0xd6f @0xf
0x0d60…0d73 at0010 = ╱ef╱$╱ // 0xd70 @0x10
0x0d60…0d73 at0011 = ╱ee╱)╱ // 0xd71 @0x11
0x0d60…0d73 at0012 = EOL // 0xd72 @0x12
0x0d60…0d73 }
0x0d73…0d88 9adf 1540 GET K1$,36:K4$
0x0d73…0d88 LineComalBin {
0x0d73…0d88 ptr = 0x9adf // 0xd73 @0x0
0x0d73…0d88 lno = 0x0604 // 0xd75 @0x2
0x0d73…0d88 at0004 = ╱a9╱ GET ╱ // 0xd77 @0x4
0x0d73…0d88 at0005 = ╱4b╱K╱ // 0xd78 @0x5
0x0d73…0d88 at0006 = ╱31╱1╱ // 0xd79 @0x6
0x0d73…0d88 at0007 = ╱ef╱$╱ // 0xd7a @0x7
0x0d73…0d88 at0008 = ╱ec╱,╱ // 0xd7b @0x8
0x0d73…0d88 at0009 = ╱33╱3╱ // 0xd7c @0x9
0x0d73…0d88 at000a = ╱36╱6╱ // 0xd7d @0xa
0x0d73…0d88 at000b = ╱fe00009006╱ // 0xd7e @0xb
0x0d73…0d88 at0010 = ╱f0╱:╱ // 0xd83 @0x10
0x0d73…0d88 at0011 = ╱4b╱K╱ // 0xd84 @0x11
0x0d73…0d88 at0012 = ╱34╱4╱ // 0xd85 @0x12
0x0d73…0d88 at0013 = ╱ef╱$╱ // 0xd86 @0x13
0x0d73…0d88 at0014 = EOL // 0xd87 @0x14
0x0d73…0d88 }
0x0d88…0da1 9af8 1550 EXEC FEJL(W,10,K1$)
0x0d88…0da1 LineComalBin {
0x0d88…0da1 ptr = 0x9af8 // 0xd88 @0x0
0x0d88…0da1 lno = 0x060e // 0xd8a @0x2
0x0d88…0da1 at0004 = ╱9d╱ EXEC ╱ // 0xd8c @0x4
0x0d88…0da1 at0005 = ╱46╱F╱ // 0xd8d @0x5
0x0d88…0da1 at0006 = ╱45╱E╱ // 0xd8e @0x6
0x0d88…0da1 at0007 = ╱4a╱J╱ // 0xd8f @0x7
0x0d88…0da1 at0008 = ╱4c╱L╱ // 0xd90 @0x8
0x0d88…0da1 at0009 = ╱ed╱(╱ // 0xd91 @0x9
0x0d88…0da1 at000a = ╱57╱W╱ // 0xd92 @0xa
0x0d88…0da1 at000b = ╱ec╱,╱ // 0xd93 @0xb
0x0d88…0da1 at000c = ╱31╱1╱ // 0xd94 @0xc
0x0d88…0da1 at000d = ╱30╱0╱ // 0xd95 @0xd
0x0d88…0da1 at000e = ╱fe0000a004╱ // 0xd96 @0xe
0x0d88…0da1 at0013 = ╱ec╱,╱ // 0xd9b @0x13
0x0d88…0da1 at0014 = ╱4b╱K╱ // 0xd9c @0x14
0x0d88…0da1 at0015 = ╱31╱1╱ // 0xd9d @0x15
0x0d88…0da1 at0016 = ╱ef╱$╱ // 0xd9e @0x16
0x0d88…0da1 at0017 = ╱ee╱)╱ // 0xd9f @0x17
0x0d88…0da1 at0018 = EOL // 0xda0 @0x18
0x0d88…0da1 }
0x0da1…0db6 9b0d 1560 GET K1$,39:K5$
0x0da1…0db6 LineComalBin {
0x0da1…0db6 ptr = 0x9b0d // 0xda1 @0x0
0x0da1…0db6 lno = 0x0618 // 0xda3 @0x2
0x0da1…0db6 at0004 = ╱a9╱ GET ╱ // 0xda5 @0x4
0x0da1…0db6 at0005 = ╱4b╱K╱ // 0xda6 @0x5
0x0da1…0db6 at0006 = ╱31╱1╱ // 0xda7 @0x6
0x0da1…0db6 at0007 = ╱ef╱$╱ // 0xda8 @0x7
0x0da1…0db6 at0008 = ╱ec╱,╱ // 0xda9 @0x8
0x0da1…0db6 at0009 = ╱33╱3╱ // 0xdaa @0x9
0x0da1…0db6 at000a = ╱39╱9╱ // 0xdab @0xa
0x0da1…0db6 at000b = ╱fe00009c06╱ // 0xdac @0xb
0x0da1…0db6 at0010 = ╱f0╱:╱ // 0xdb1 @0x10
0x0da1…0db6 at0011 = ╱4b╱K╱ // 0xdb2 @0x11
0x0da1…0db6 at0012 = ╱35╱5╱ // 0xdb3 @0x12
0x0da1…0db6 at0013 = ╱ef╱$╱ // 0xdb4 @0x13
0x0da1…0db6 at0014 = EOL // 0xdb5 @0x14
0x0da1…0db6 }
0x0db6…0dd4 9b2b 1570 EXEC FEJL(99,8,K1$)
0x0db6…0dd4 LineComalBin {
0x0db6…0dd4 ptr = 0x9b2b // 0xdb6 @0x0
0x0db6…0dd4 lno = 0x0622 // 0xdb8 @0x2
0x0db6…0dd4 at0004 = ╱9d╱ EXEC ╱ // 0xdba @0x4
0x0db6…0dd4 at0005 = ╱46╱F╱ // 0xdbb @0x5
0x0db6…0dd4 at0006 = ╱45╱E╱ // 0xdbc @0x6
0x0db6…0dd4 at0007 = ╱4a╱J╱ // 0xdbd @0x7
0x0db6…0dd4 at0008 = ╱4c╱L╱ // 0xdbe @0x8
0x0db6…0dd4 at0009 = ╱ed╱(╱ // 0xdbf @0x9
0x0db6…0dd4 at000a = ╱39╱9╱ // 0xdc0 @0xa
0x0db6…0dd4 at000b = ╱39╱9╱ // 0xdc1 @0xb
0x0db6…0dd4 at000c = ╱fe0000c607╱ // 0xdc2 @0xc
0x0db6…0dd4 at0011 = ╱ec╱,╱ // 0xdc7 @0x11
0x0db6…0dd4 at0012 = ╱38╱8╱ // 0xdc8 @0x12
0x0db6…0dd4 at0013 = ╱fe00008004╱ // 0xdc9 @0x13
0x0db6…0dd4 at0018 = ╱ec╱,╱ // 0xdce @0x18
0x0db6…0dd4 at0019 = ╱4b╱K╱ // 0xdcf @0x19
0x0db6…0dd4 at001a = ╱31╱1╱ // 0xdd0 @0x1a
0x0db6…0dd4 at001b = ╱ef╱$╱ // 0xdd1 @0x1b
0x0db6…0dd4 at001c = ╱ee╱)╱ // 0xdd2 @0x1c
0x0db6…0dd4 at001d = EOL // 0xdd3 @0x1d
0x0db6…0dd4 }
0x0dd4…0deb 9b42 1580 GET K1$,43:METOT
0x0dd4…0deb LineComalBin {
0x0dd4…0deb ptr = 0x9b42 // 0xdd4 @0x0
0x0dd4…0deb lno = 0x062c // 0xdd6 @0x2
0x0dd4…0deb at0004 = ╱a9╱ GET ╱ // 0xdd8 @0x4
0x0dd4…0deb at0005 = ╱4b╱K╱ // 0xdd9 @0x5
0x0dd4…0deb at0006 = ╱31╱1╱ // 0xdda @0x6
0x0dd4…0deb at0007 = ╱ef╱$╱ // 0xddb @0x7
0x0dd4…0deb at0008 = ╱ec╱,╱ // 0xddc @0x8
0x0dd4…0deb at0009 = ╱34╱4╱ // 0xddd @0x9
0x0dd4…0deb at000a = ╱33╱3╱ // 0xdde @0xa
0x0dd4…0deb at000b = ╱fe0000ac06╱ // 0xddf @0xb
0x0dd4…0deb at0010 = ╱f0╱:╱ // 0xde4 @0x10
0x0dd4…0deb at0011 = ╱4d╱M╱ // 0xde5 @0x11
0x0dd4…0deb at0012 = ╱45╱E╱ // 0xde6 @0x12
0x0dd4…0deb at0013 = ╱54╱T╱ // 0xde7 @0x13
0x0dd4…0deb at0014 = ╱4f╱O╱ // 0xde8 @0x14
0x0dd4…0deb at0015 = ╱54╱T╱ // 0xde9 @0x15
0x0dd4…0deb at0016 = EOL // 0xdea @0x16
0x0dd4…0deb }
0x0deb…0e04 9b5b 1590 EXEC FEJL(99,W,K1$)
0x0deb…0e04 LineComalBin {
0x0deb…0e04 ptr = 0x9b5b // 0xdeb @0x0
0x0deb…0e04 lno = 0x0636 // 0xded @0x2
0x0deb…0e04 at0004 = ╱9d╱ EXEC ╱ // 0xdef @0x4
0x0deb…0e04 at0005 = ╱46╱F╱ // 0xdf0 @0x5
0x0deb…0e04 at0006 = ╱45╱E╱ // 0xdf1 @0x6
0x0deb…0e04 at0007 = ╱4a╱J╱ // 0xdf2 @0x7
0x0deb…0e04 at0008 = ╱4c╱L╱ // 0xdf3 @0x8
0x0deb…0e04 at0009 = ╱ed╱(╱ // 0xdf4 @0x9
0x0deb…0e04 at000a = ╱39╱9╱ // 0xdf5 @0xa
0x0deb…0e04 at000b = ╱39╱9╱ // 0xdf6 @0xb
0x0deb…0e04 at000c = ╱fe0000c607╱ // 0xdf7 @0xc
0x0deb…0e04 at0011 = ╱ec╱,╱ // 0xdfc @0x11
0x0deb…0e04 at0012 = ╱57╱W╱ // 0xdfd @0x12
0x0deb…0e04 at0013 = ╱ec╱,╱ // 0xdfe @0x13
0x0deb…0e04 at0014 = ╱4b╱K╱ // 0xdff @0x14
0x0deb…0e04 at0015 = ╱31╱1╱ // 0xe00 @0x15
0x0deb…0e04 at0016 = ╱ef╱$╱ // 0xe01 @0x16
0x0deb…0e04 at0017 = ╱ee╱)╱ // 0xe02 @0x17
0x0deb…0e04 at0018 = EOL // 0xe03 @0x18
0x0deb…0e04 }
0x0e04…0e0d 9b64 1600 CLOSE K1$
0x0e04…0e0d LineComalBin {
0x0e04…0e0d ptr = 0x9b64 // 0xe04 @0x0
0x0e04…0e0d lno = 0x0640 // 0xe06 @0x2
0x0e04…0e0d at0004 = ╱a8╱ CLOSE ╱ // 0xe08 @0x4
0x0e04…0e0d at0005 = ╱4b╱K╱ // 0xe09 @0x5
0x0e04…0e0d at0006 = ╱31╱1╱ // 0xe0a @0x6
0x0e04…0e0d at0007 = ╱ef╱$╱ // 0xe0b @0x7
0x0e04…0e0d at0008 = EOL // 0xe0c @0x8
0x0e04…0e0d }
0x0e0d…0e26 9b7d 1610 EXEC FEJL(W,11,K1$)
0x0e0d…0e26 LineComalBin {
0x0e0d…0e26 ptr = 0x9b7d // 0xe0d @0x0
0x0e0d…0e26 lno = 0x064a // 0xe0f @0x2
0x0e0d…0e26 at0004 = ╱9d╱ EXEC ╱ // 0xe11 @0x4
0x0e0d…0e26 at0005 = ╱46╱F╱ // 0xe12 @0x5
0x0e0d…0e26 at0006 = ╱45╱E╱ // 0xe13 @0x6
0x0e0d…0e26 at0007 = ╱4a╱J╱ // 0xe14 @0x7
0x0e0d…0e26 at0008 = ╱4c╱L╱ // 0xe15 @0x8
0x0e0d…0e26 at0009 = ╱ed╱(╱ // 0xe16 @0x9
0x0e0d…0e26 at000a = ╱57╱W╱ // 0xe17 @0xa
0x0e0d…0e26 at000b = ╱ec╱,╱ // 0xe18 @0xb
0x0e0d…0e26 at000c = ╱31╱1╱ // 0xe19 @0xc
0x0e0d…0e26 at000d = ╱31╱1╱ // 0xe1a @0xd
0x0e0d…0e26 at000e = ╱fe0000b004╱ // 0xe1b @0xe
0x0e0d…0e26 at0013 = ╱ec╱,╱ // 0xe20 @0x13
0x0e0d…0e26 at0014 = ╱4b╱K╱ // 0xe21 @0x14
0x0e0d…0e26 at0015 = ╱31╱1╱ // 0xe22 @0x15
0x0e0d…0e26 at0016 = ╱ef╱$╱ // 0xe23 @0x16
0x0e0d…0e26 at0017 = ╱ee╱)╱ // 0xe24 @0x17
0x0e0d…0e26 at0018 = EOL // 0xe25 @0x18
0x0e0d…0e26 }
0x0e26…0e4b 9ba2 1620 K2$=N$+K2$;K3$=N$+K3$;K5$=N$+K5$
0x0e26…0e4b LineComalBin {
0x0e26…0e4b ptr = 0x9ba2 // 0xe26 @0x0
0x0e26…0e4b lno = 0x0654 // 0xe28 @0x2
0x0e26…0e4b at0004 = ╱4b╱K╱ // 0xe2a @0x4
0x0e26…0e4b at0005 = ╱32╱2╱ // 0xe2b @0x5
0x0e26…0e4b at0006 = ╱ef╱$╱ // 0xe2c @0x6
0x0e26…0e4b at0007 = ╱dc╱=╱ // 0xe2d @0x7
0x0e26…0e4b at0008 = ╱4e╱N╱ // 0xe2e @0x8
0x0e26…0e4b at0009 = ╱ef╱$╱ // 0xe2f @0x9
0x0e26…0e4b at000a = ╱f1╱+╱ // 0xe30 @0xa
0x0e26…0e4b at000b = ╱4b╱K╱ // 0xe31 @0xb
0x0e26…0e4b at000c = ╱32╱2╱ // 0xe32 @0xc
0x0e26…0e4b at000d = ╱ef╱$╱ // 0xe33 @0xd
0x0e26…0e4b at000e = ╱eb╱;╱ // 0xe34 @0xe
0x0e26…0e4b at000f = ╱4b╱K╱ // 0xe35 @0xf
0x0e26…0e4b at0010 = ╱33╱3╱ // 0xe36 @0x10
0x0e26…0e4b at0011 = ╱ef╱$╱ // 0xe37 @0x11
0x0e26…0e4b at0012 = ╱dc╱=╱ // 0xe38 @0x12
0x0e26…0e4b at0013 = ╱4e╱N╱ // 0xe39 @0x13
0x0e26…0e4b at0014 = ╱ef╱$╱ // 0xe3a @0x14
0x0e26…0e4b at0015 = ╱f1╱+╱ // 0xe3b @0x15
0x0e26…0e4b at0016 = ╱4b╱K╱ // 0xe3c @0x16
0x0e26…0e4b at0017 = ╱33╱3╱ // 0xe3d @0x17
0x0e26…0e4b at0018 = ╱ef╱$╱ // 0xe3e @0x18
0x0e26…0e4b at0019 = ╱eb╱;╱ // 0xe3f @0x19
0x0e26…0e4b at001a = ╱4b╱K╱ // 0xe40 @0x1a
0x0e26…0e4b at001b = ╱35╱5╱ // 0xe41 @0x1b
0x0e26…0e4b at001c = ╱ef╱$╱ // 0xe42 @0x1c
0x0e26…0e4b at001d = ╱dc╱=╱ // 0xe43 @0x1d
0x0e26…0e4b at001e = ╱4e╱N╱ // 0xe44 @0x1e
0x0e26…0e4b at001f = ╱ef╱$╱ // 0xe45 @0x1f
0x0e26…0e4b at0020 = ╱f1╱+╱ // 0xe46 @0x20
0x0e26…0e4b at0021 = ╱4b╱K╱ // 0xe47 @0x21
0x0e26…0e4b at0022 = ╱35╱5╱ // 0xe48 @0x22
0x0e26…0e4b at0023 = ╱ef╱$╱ // 0xe49 @0x23
0x0e26…0e4b at0024 = EOL // 0xe4a @0x24
0x0e26…0e4b }
0x0e4b…0e5a 9bb1 1630 K4$=N$+K4$
0x0e4b…0e5a LineComalBin {
0x0e4b…0e5a ptr = 0x9bb1 // 0xe4b @0x0
0x0e4b…0e5a lno = 0x065e // 0xe4d @0x2
0x0e4b…0e5a at0004 = ╱4b╱K╱ // 0xe4f @0x4
0x0e4b…0e5a at0005 = ╱34╱4╱ // 0xe50 @0x5
0x0e4b…0e5a at0006 = ╱ef╱$╱ // 0xe51 @0x6
0x0e4b…0e5a at0007 = ╱dc╱=╱ // 0xe52 @0x7
0x0e4b…0e5a at0008 = ╱4e╱N╱ // 0xe53 @0x8
0x0e4b…0e5a at0009 = ╱ef╱$╱ // 0xe54 @0x9
0x0e4b…0e5a at000a = ╱f1╱+╱ // 0xe55 @0xa
0x0e4b…0e5a at000b = ╱4b╱K╱ // 0xe56 @0xb
0x0e4b…0e5a at000c = ╱34╱4╱ // 0xe57 @0xc
0x0e4b…0e5a at000d = ╱ef╱$╱ // 0xe58 @0xd
0x0e4b…0e5a at000e = EOL // 0xe59 @0xe
0x0e4b…0e5a }
0x0e5a…0e95 9bec 1640 DIM ETAB(MEANTAL,G),UNR(METOT+MUNKANT),EU$(METOT+MUNKANT)
0x0e5a…0e95 LineComalBin {
0x0e5a…0e95 ptr = 0x9bec // 0xe5a @0x0
0x0e5a…0e95 lno = 0x0668 // 0xe5c @0x2
0x0e5a…0e95 at0004 = ╱87╱ DIM ╱ // 0xe5e @0x4
0x0e5a…0e95 at0005 = ╱45╱E╱ // 0xe5f @0x5
0x0e5a…0e95 at0006 = ╱54╱T╱ // 0xe60 @0x6
0x0e5a…0e95 at0007 = ╱41╱A╱ // 0xe61 @0x7
0x0e5a…0e95 at0008 = ╱42╱B╱ // 0xe62 @0x8
0x0e5a…0e95 at0009 = ╱ed╱(╱ // 0xe63 @0x9
0x0e5a…0e95 at000a = ╱4d╱M╱ // 0xe64 @0xa
0x0e5a…0e95 at000b = ╱45╱E╱ // 0xe65 @0xb
0x0e5a…0e95 at000c = ╱41╱A╱ // 0xe66 @0xc
0x0e5a…0e95 at000d = ╱4e╱N╱ // 0xe67 @0xd
0x0e5a…0e95 at000e = ╱54╱T╱ // 0xe68 @0xe
0x0e5a…0e95 at000f = ╱41╱A╱ // 0xe69 @0xf
0x0e5a…0e95 at0010 = ╱4c╱L╱ // 0xe6a @0x10
0x0e5a…0e95 at0011 = ╱ec╱,╱ // 0xe6b @0x11
0x0e5a…0e95 at0012 = ╱47╱G╱ // 0xe6c @0x12
0x0e5a…0e95 at0013 = ╱ee╱)╱ // 0xe6d @0x13
0x0e5a…0e95 at0014 = ╱ec╱,╱ // 0xe6e @0x14
0x0e5a…0e95 at0015 = ╱55╱U╱ // 0xe6f @0x15
0x0e5a…0e95 at0016 = ╱4e╱N╱ // 0xe70 @0x16
0x0e5a…0e95 at0017 = ╱52╱R╱ // 0xe71 @0x17
0x0e5a…0e95 at0018 = ╱ed╱(╱ // 0xe72 @0x18
0x0e5a…0e95 at0019 = ╱4d╱M╱ // 0xe73 @0x19
0x0e5a…0e95 at001a = ╱45╱E╱ // 0xe74 @0x1a
0x0e5a…0e95 at001b = ╱54╱T╱ // 0xe75 @0x1b
0x0e5a…0e95 at001c = ╱4f╱O╱ // 0xe76 @0x1c
0x0e5a…0e95 at001d = ╱54╱T╱ // 0xe77 @0x1d
0x0e5a…0e95 at001e = ╱e2╱+╱ // 0xe78 @0x1e
0x0e5a…0e95 at001f = ╱4d╱M╱ // 0xe79 @0x1f
0x0e5a…0e95 at0020 = ╱55╱U╱ // 0xe7a @0x20
0x0e5a…0e95 at0021 = ╱4e╱N╱ // 0xe7b @0x21
0x0e5a…0e95 at0022 = ╱4b╱K╱ // 0xe7c @0x22
0x0e5a…0e95 at0023 = ╱41╱A╱ // 0xe7d @0x23
0x0e5a…0e95 at0024 = ╱4e╱N╱ // 0xe7e @0x24
0x0e5a…0e95 at0025 = ╱54╱T╱ // 0xe7f @0x25
0x0e5a…0e95 at0026 = ╱ee╱)╱ // 0xe80 @0x26
0x0e5a…0e95 at0027 = ╱ec╱,╱ // 0xe81 @0x27
0x0e5a…0e95 at0028 = ╱45╱E╱ // 0xe82 @0x28
0x0e5a…0e95 at0029 = ╱55╱U╱ // 0xe83 @0x29
0x0e5a…0e95 at002a = ╱ef╱$╱ // 0xe84 @0x2a
0x0e5a…0e95 at002b = ╱ed╱(╱ // 0xe85 @0x2b
0x0e5a…0e95 at002c = ╱4d╱M╱ // 0xe86 @0x2c
0x0e5a…0e95 at002d = ╱45╱E╱ // 0xe87 @0x2d
0x0e5a…0e95 at002e = ╱54╱T╱ // 0xe88 @0x2e
0x0e5a…0e95 at002f = ╱4f╱O╱ // 0xe89 @0x2f
0x0e5a…0e95 at0030 = ╱54╱T╱ // 0xe8a @0x30
0x0e5a…0e95 at0031 = ╱e2╱+╱ // 0xe8b @0x31
0x0e5a…0e95 at0032 = ╱4d╱M╱ // 0xe8c @0x32
0x0e5a…0e95 at0033 = ╱55╱U╱ // 0xe8d @0x33
0x0e5a…0e95 at0034 = ╱4e╱N╱ // 0xe8e @0x34
0x0e5a…0e95 at0035 = ╱4b╱K╱ // 0xe8f @0x35
0x0e5a…0e95 at0036 = ╱41╱A╱ // 0xe90 @0x36
0x0e5a…0e95 at0037 = ╱4e╱N╱ // 0xe91 @0x37
0x0e5a…0e95 at0038 = ╱54╱T╱ // 0xe92 @0x38
0x0e5a…0e95 at0039 = ╱ee╱)╱ // 0xe93 @0x39
0x0e5a…0e95 at003a = EOL // 0xe94 @0x3a
0x0e5a…0e95 }
0x0e95…0ee6 9c3d 1650 DIM MBEV$(MUNKANT,12),ÅBEV$(MUNKANT,12),UNAVN$(METOT+MUNKANT,25)
0x0e95…0ee6 LineComalBin {
0x0e95…0ee6 ptr = 0x9c3d // 0xe95 @0x0
0x0e95…0ee6 lno = 0x0672 // 0xe97 @0x2
0x0e95…0ee6 at0004 = ╱87╱ DIM ╱ // 0xe99 @0x4
0x0e95…0ee6 at0005 = ╱4d╱M╱ // 0xe9a @0x5
0x0e95…0ee6 at0006 = ╱42╱B╱ // 0xe9b @0x6
0x0e95…0ee6 at0007 = ╱45╱E╱ // 0xe9c @0x7
0x0e95…0ee6 at0008 = ╱56╱V╱ // 0xe9d @0x8
0x0e95…0ee6 at0009 = ╱ef╱$╱ // 0xe9e @0x9
0x0e95…0ee6 at000a = ╱ed╱(╱ // 0xe9f @0xa
0x0e95…0ee6 at000b = ╱4d╱M╱ // 0xea0 @0xb
0x0e95…0ee6 at000c = ╱55╱U╱ // 0xea1 @0xc
0x0e95…0ee6 at000d = ╱4e╱N╱ // 0xea2 @0xd
0x0e95…0ee6 at000e = ╱4b╱K╱ // 0xea3 @0xe
0x0e95…0ee6 at000f = ╱41╱A╱ // 0xea4 @0xf
0x0e95…0ee6 at0010 = ╱4e╱N╱ // 0xea5 @0x10
0x0e95…0ee6 at0011 = ╱54╱T╱ // 0xea6 @0x11
0x0e95…0ee6 at0012 = ╱ec╱,╱ // 0xea7 @0x12
0x0e95…0ee6 at0013 = ╱31╱1╱ // 0xea8 @0x13
0x0e95…0ee6 at0014 = ╱32╱2╱ // 0xea9 @0x14
0x0e95…0ee6 at0015 = ╱fe0000c004╱ // 0xeaa @0x15
0x0e95…0ee6 at001a = ╱ee╱)╱ // 0xeaf @0x1a
0x0e95…0ee6 at001b = ╱ec╱,╱ // 0xeb0 @0x1b
0x0e95…0ee6 at001c = ╱5d╱Å╱ // 0xeb1 @0x1c
0x0e95…0ee6 at001d = ╱42╱B╱ // 0xeb2 @0x1d
0x0e95…0ee6 at001e = ╱45╱E╱ // 0xeb3 @0x1e
0x0e95…0ee6 at001f = ╱56╱V╱ // 0xeb4 @0x1f
0x0e95…0ee6 at0020 = ╱ef╱$╱ // 0xeb5 @0x20
0x0e95…0ee6 at0021 = ╱ed╱(╱ // 0xeb6 @0x21
0x0e95…0ee6 at0022 = ╱4d╱M╱ // 0xeb7 @0x22
0x0e95…0ee6 at0023 = ╱55╱U╱ // 0xeb8 @0x23
0x0e95…0ee6 at0024 = ╱4e╱N╱ // 0xeb9 @0x24
0x0e95…0ee6 at0025 = ╱4b╱K╱ // 0xeba @0x25
0x0e95…0ee6 at0026 = ╱41╱A╱ // 0xebb @0x26
0x0e95…0ee6 at0027 = ╱4e╱N╱ // 0xebc @0x27
0x0e95…0ee6 at0028 = ╱54╱T╱ // 0xebd @0x28
0x0e95…0ee6 at0029 = ╱ec╱,╱ // 0xebe @0x29
0x0e95…0ee6 at002a = ╱31╱1╱ // 0xebf @0x2a
0x0e95…0ee6 at002b = ╱32╱2╱ // 0xec0 @0x2b
0x0e95…0ee6 at002c = ╱fe0000c004╱ // 0xec1 @0x2c
0x0e95…0ee6 at0031 = ╱ee╱)╱ // 0xec6 @0x31
0x0e95…0ee6 at0032 = ╱ec╱,╱ // 0xec7 @0x32
0x0e95…0ee6 at0033 = ╱55╱U╱ // 0xec8 @0x33
0x0e95…0ee6 at0034 = ╱4e╱N╱ // 0xec9 @0x34
0x0e95…0ee6 at0035 = ╱41╱A╱ // 0xeca @0x35
0x0e95…0ee6 at0036 = ╱56╱V╱ // 0xecb @0x36
0x0e95…0ee6 at0037 = ╱4e╱N╱ // 0xecc @0x37
0x0e95…0ee6 at0038 = ╱ef╱$╱ // 0xecd @0x38
0x0e95…0ee6 at0039 = ╱ed╱(╱ // 0xece @0x39
0x0e95…0ee6 at003a = ╱4d╱M╱ // 0xecf @0x3a
0x0e95…0ee6 at003b = ╱45╱E╱ // 0xed0 @0x3b
0x0e95…0ee6 at003c = ╱54╱T╱ // 0xed1 @0x3c
0x0e95…0ee6 at003d = ╱4f╱O╱ // 0xed2 @0x3d
0x0e95…0ee6 at003e = ╱54╱T╱ // 0xed3 @0x3e
0x0e95…0ee6 at003f = ╱e2╱+╱ // 0xed4 @0x3f
0x0e95…0ee6 at0040 = ╱4d╱M╱ // 0xed5 @0x40
0x0e95…0ee6 at0041 = ╱55╱U╱ // 0xed6 @0x41
0x0e95…0ee6 at0042 = ╱4e╱N╱ // 0xed7 @0x42
0x0e95…0ee6 at0043 = ╱4b╱K╱ // 0xed8 @0x43
0x0e95…0ee6 at0044 = ╱41╱A╱ // 0xed9 @0x44
0x0e95…0ee6 at0045 = ╱4e╱N╱ // 0xeda @0x45
0x0e95…0ee6 at0046 = ╱54╱T╱ // 0xedb @0x46
0x0e95…0ee6 at0047 = ╱ec╱,╱ // 0xedc @0x47
0x0e95…0ee6 at0048 = ╱32╱2╱ // 0xedd @0x48
0x0e95…0ee6 at0049 = ╱35╱5╱ // 0xede @0x49
0x0e95…0ee6 at004a = ╱fe0000c805╱ // 0xedf @0x4a
0x0e95…0ee6 at004f = ╱ee╱)╱ // 0xee4 @0x4f
0x0e95…0ee6 at0050 = EOL // 0xee5 @0x50
0x0e95…0ee6 }
0x0ee6…0ef1 9c48 1660 OPEN K4$,R
0x0ee6…0ef1 LineComalBin {
0x0ee6…0ef1 ptr = 0x9c48 // 0xee6 @0x0
0x0ee6…0ef1 lno = 0x067c // 0xee8 @0x2
0x0ee6…0ef1 at0004 = ╱a7╱ OPEN ╱ // 0xeea @0x4
0x0ee6…0ef1 at0005 = ╱4b╱K╱ // 0xeeb @0x5
0x0ee6…0ef1 at0006 = ╱34╱4╱ // 0xeec @0x6
0x0ee6…0ef1 at0007 = ╱ef╱$╱ // 0xeed @0x7
0x0ee6…0ef1 at0008 = ╱ec╱,╱ // 0xeee @0x8
0x0ee6…0ef1 at0009 = ╱52╱R╱ // 0xeef @0x9
0x0ee6…0ef1 at000a = EOL // 0xef0 @0xa
0x0ee6…0ef1 }
0x0ef1…0f0a 9c61 1670 EXEC FEJL(W,12,K4$)
0x0ef1…0f0a LineComalBin {
0x0ef1…0f0a ptr = 0x9c61 // 0xef1 @0x0
0x0ef1…0f0a lno = 0x0686 // 0xef3 @0x2
0x0ef1…0f0a at0004 = ╱9d╱ EXEC ╱ // 0xef5 @0x4
0x0ef1…0f0a at0005 = ╱46╱F╱ // 0xef6 @0x5
0x0ef1…0f0a at0006 = ╱45╱E╱ // 0xef7 @0x6
0x0ef1…0f0a at0007 = ╱4a╱J╱ // 0xef8 @0x7
0x0ef1…0f0a at0008 = ╱4c╱L╱ // 0xef9 @0x8
0x0ef1…0f0a at0009 = ╱ed╱(╱ // 0xefa @0x9
0x0ef1…0f0a at000a = ╱57╱W╱ // 0xefb @0xa
0x0ef1…0f0a at000b = ╱ec╱,╱ // 0xefc @0xb
0x0ef1…0f0a at000c = ╱31╱1╱ // 0xefd @0xc
0x0ef1…0f0a at000d = ╱32╱2╱ // 0xefe @0xd
0x0ef1…0f0a at000e = ╱fe0000c004╱ // 0xeff @0xe
0x0ef1…0f0a at0013 = ╱ec╱,╱ // 0xf04 @0x13
0x0ef1…0f0a at0014 = ╱4b╱K╱ // 0xf05 @0x14
0x0ef1…0f0a at0015 = ╱34╱4╱ // 0xf06 @0x15
0x0ef1…0f0a at0016 = ╱ef╱$╱ // 0xf07 @0x16
0x0ef1…0f0a at0017 = ╱ee╱)╱ // 0xf08 @0x17
0x0ef1…0f0a at0018 = EOL // 0xf09 @0x18
0x0ef1…0f0a }
0x0f0a…0f64 (50,) 9cbb 1680 GET K4$,G:T1(E),T1(G),T1(V),T1(4),T1(5),T1(6),T1(7),T1(8),T1(W)
0x0f0a…0f64 LineComalBin {
0x0f0a…0f64 ptr = 0x9cbb // 0xf0a @0x0
0x0f0a…0f64 lno = 0x0690 // 0xf0c @0x2
0x0f0a…0f64 at0004 = ╱a9╱ GET ╱ // 0xf0e @0x4
0x0f0a…0f64 at0005 = ╱4b╱K╱ // 0xf0f @0x5
0x0f0a…0f64 at0006 = ╱34╱4╱ // 0xf10 @0x6
0x0f0a…0f64 at0007 = ╱ef╱$╱ // 0xf11 @0x7
0x0f0a…0f64 at0008 = ╱ec╱,╱ // 0xf12 @0x8
0x0f0a…0f64 at0009 = ╱47╱G╱ // 0xf13 @0x9
0x0f0a…0f64 at000a = ╱f0╱:╱ // 0xf14 @0xa
0x0f0a…0f64 at000b = ╱54╱T╱ // 0xf15 @0xb
0x0f0a…0f64 at000c = ╱31╱1╱ // 0xf16 @0xc
0x0f0a…0f64 at000d = ╱ed╱(╱ // 0xf17 @0xd
0x0f0a…0f64 at000e = ╱45╱E╱ // 0xf18 @0xe
0x0f0a…0f64 at000f = ╱ee╱)╱ // 0xf19 @0xf
0x0f0a…0f64 at0010 = ╱ec╱,╱ // 0xf1a @0x10
0x0f0a…0f64 at0011 = ╱54╱T╱ // 0xf1b @0x11
0x0f0a…0f64 at0012 = ╱31╱1╱ // 0xf1c @0x12
0x0f0a…0f64 at0013 = ╱ed╱(╱ // 0xf1d @0x13
0x0f0a…0f64 at0014 = ╱47╱G╱ // 0xf1e @0x14
0x0f0a…0f64 at0015 = ╱ee╱)╱ // 0xf1f @0x15
0x0f0a…0f64 at0016 = ╱ec╱,╱ // 0xf20 @0x16
0x0f0a…0f64 at0017 = ╱54╱T╱ // 0xf21 @0x17
0x0f0a…0f64 at0018 = ╱31╱1╱ // 0xf22 @0x18
0x0f0a…0f64 at0019 = ╱ed╱(╱ // 0xf23 @0x19
0x0f0a…0f64 at001a = ╱56╱V╱ // 0xf24 @0x1a
0x0f0a…0f64 at001b = ╱ee╱)╱ // 0xf25 @0x1b
0x0f0a…0f64 at001c = ╱ec╱,╱ // 0xf26 @0x1c
0x0f0a…0f64 at001d = ╱54╱T╱ // 0xf27 @0x1d
0x0f0a…0f64 at001e = ╱31╱1╱ // 0xf28 @0x1e
0x0f0a…0f64 at001f = ╱ed╱(╱ // 0xf29 @0x1f
0x0f0a…0f64 at0020 = ╱34╱4╱ // 0xf2a @0x20
0x0f0a…0f64 at0021 = ╱fe00008003╱ // 0xf2b @0x21
0x0f0a…0f64 at0026 = ╱ee╱)╱ // 0xf30 @0x26
0x0f0a…0f64 at0027 = ╱ec╱,╱ // 0xf31 @0x27
0x0f0a…0f64 at0028 = ╱54╱T╱ // 0xf32 @0x28
0x0f0a…0f64 at0029 = ╱31╱1╱ // 0xf33 @0x29
0x0f0a…0f64 at002a = ╱ed╱(╱ // 0xf34 @0x2a
0x0f0a…0f64 at002b = ╱35╱5╱ // 0xf35 @0x2b
0x0f0a…0f64 at002c = ╱fe0000a003╱ // 0xf36 @0x2c
0x0f0a…0f64 at0031 = ╱ee╱)╱ // 0xf3b @0x31
0x0f0a…0f64 at0032 = ╱ec╱,╱ // 0xf3c @0x32
0x0f0a…0f64 at0033 = ╱54╱T╱ // 0xf3d @0x33
0x0f0a…0f64 at0034 = ╱31╱1╱ // 0xf3e @0x34
0x0f0a…0f64 at0035 = ╱ed╱(╱ // 0xf3f @0x35
0x0f0a…0f64 at0036 = ╱36╱6╱ // 0xf40 @0x36
0x0f0a…0f64 at0037 = ╱fe0000c003╱ // 0xf41 @0x37
0x0f0a…0f64 at003c = ╱ee╱)╱ // 0xf46 @0x3c
0x0f0a…0f64 at003d = ╱ec╱,╱ // 0xf47 @0x3d
0x0f0a…0f64 at003e = ╱54╱T╱ // 0xf48 @0x3e
0x0f0a…0f64 at003f = ╱31╱1╱ // 0xf49 @0x3f
0x0f0a…0f64 at0040 = ╱ed╱(╱ // 0xf4a @0x40
0x0f0a…0f64 at0041 = ╱37╱7╱ // 0xf4b @0x41
0x0f0a…0f64 at0042 = ╱fe0000e003╱ // 0xf4c @0x42
0x0f0a…0f64 at0047 = ╱ee╱)╱ // 0xf51 @0x47
0x0f0a…0f64 at0048 = ╱ec╱,╱ // 0xf52 @0x48
0x0f0a…0f64 at0049 = ╱54╱T╱ // 0xf53 @0x49
0x0f0a…0f64 at004a = ╱31╱1╱ // 0xf54 @0x4a
0x0f0a…0f64 at004b = ╱ed╱(╱ // 0xf55 @0x4b
0x0f0a…0f64 at004c = ╱38╱8╱ // 0xf56 @0x4c
0x0f0a…0f64 at004d = ╱fe00008004╱ // 0xf57 @0x4d
0x0f0a…0f64 at0052 = ╱ee╱)╱ // 0xf5c @0x52
0x0f0a…0f64 at0053 = ╱ec╱,╱ // 0xf5d @0x53
0x0f0a…0f64 at0054 = ╱54╱T╱ // 0xf5e @0x54
0x0f0a…0f64 at0055 = ╱31╱1╱ // 0xf5f @0x55
0x0f0a…0f64 at0056 = ╱ed╱(╱ // 0xf60 @0x56
0x0f0a…0f64 at0057 = ╱57╱W╱ // 0xf61 @0x57
0x0f0a…0f64 at0058 = ╱ee╱)╱ // 0xf62 @0x58
0x0f0a…0f64 at0059 = EOL // 0xf63 @0x59
0x0f0a…0f64 }
0x0f64…0f7d 9cd4 1690 EXEC FEJL(W,13,K4$)
0x0f64…0f7d LineComalBin {
0x0f64…0f7d ptr = 0x9cd4 // 0xf64 @0x0
0x0f64…0f7d lno = 0x069a // 0xf66 @0x2
0x0f64…0f7d at0004 = ╱9d╱ EXEC ╱ // 0xf68 @0x4
0x0f64…0f7d at0005 = ╱46╱F╱ // 0xf69 @0x5
0x0f64…0f7d at0006 = ╱45╱E╱ // 0xf6a @0x6
0x0f64…0f7d at0007 = ╱4a╱J╱ // 0xf6b @0x7
0x0f64…0f7d at0008 = ╱4c╱L╱ // 0xf6c @0x8
0x0f64…0f7d at0009 = ╱ed╱(╱ // 0xf6d @0x9
0x0f64…0f7d at000a = ╱57╱W╱ // 0xf6e @0xa
0x0f64…0f7d at000b = ╱ec╱,╱ // 0xf6f @0xb
0x0f64…0f7d at000c = ╱31╱1╱ // 0xf70 @0xc
0x0f64…0f7d at000d = ╱33╱3╱ // 0xf71 @0xd
0x0f64…0f7d at000e = ╱fe0000d004╱ // 0xf72 @0xe
0x0f64…0f7d at0013 = ╱ec╱,╱ // 0xf77 @0x13
0x0f64…0f7d at0014 = ╱4b╱K╱ // 0xf78 @0x14
0x0f64…0f7d at0015 = ╱34╱4╱ // 0xf79 @0x15
0x0f64…0f7d at0016 = ╱ef╱$╱ // 0xf7a @0x16
0x0f64…0f7d at0017 = ╱ee╱)╱ // 0xf7b @0x17
0x0f64…0f7d at0018 = EOL // 0xf7c @0x18
0x0f64…0f7d }
0x0f7d…0f92 9ce9 1700 GET K4$,20:DV$
0x0f7d…0f92 LineComalBin {
0x0f7d…0f92 ptr = 0x9ce9 // 0xf7d @0x0
0x0f7d…0f92 lno = 0x06a4 // 0xf7f @0x2
0x0f7d…0f92 at0004 = ╱a9╱ GET ╱ // 0xf81 @0x4
0x0f7d…0f92 at0005 = ╱4b╱K╱ // 0xf82 @0x5
0x0f7d…0f92 at0006 = ╱34╱4╱ // 0xf83 @0x6
0x0f7d…0f92 at0007 = ╱ef╱$╱ // 0xf84 @0x7
0x0f7d…0f92 at0008 = ╱ec╱,╱ // 0xf85 @0x8
0x0f7d…0f92 at0009 = ╱32╱2╱ // 0xf86 @0x9
0x0f7d…0f92 at000a = ╱30╱0╱ // 0xf87 @0xa
0x0f7d…0f92 at000b = ╱fe0000a005╱ // 0xf88 @0xb
0x0f7d…0f92 at0010 = ╱f0╱:╱ // 0xf8d @0x10
0x0f7d…0f92 at0011 = ╱44╱D╱ // 0xf8e @0x11
0x0f7d…0f92 at0012 = ╱56╱V╱ // 0xf8f @0x12
0x0f7d…0f92 at0013 = ╱ef╱$╱ // 0xf90 @0x13
0x0f7d…0f92 at0014 = EOL // 0xf91 @0x14
0x0f7d…0f92 }
0x0f92…0fab 9d02 1710 EXEC FEJL(W,30,K4$)
0x0f92…0fab LineComalBin {
0x0f92…0fab ptr = 0x9d02 // 0xf92 @0x0
0x0f92…0fab lno = 0x06ae // 0xf94 @0x2
0x0f92…0fab at0004 = ╱9d╱ EXEC ╱ // 0xf96 @0x4
0x0f92…0fab at0005 = ╱46╱F╱ // 0xf97 @0x5
0x0f92…0fab at0006 = ╱45╱E╱ // 0xf98 @0x6
0x0f92…0fab at0007 = ╱4a╱J╱ // 0xf99 @0x7
0x0f92…0fab at0008 = ╱4c╱L╱ // 0xf9a @0x8
0x0f92…0fab at0009 = ╱ed╱(╱ // 0xf9b @0x9
0x0f92…0fab at000a = ╱57╱W╱ // 0xf9c @0xa
0x0f92…0fab at000b = ╱ec╱,╱ // 0xf9d @0xb
0x0f92…0fab at000c = ╱33╱3╱ // 0xf9e @0xc
0x0f92…0fab at000d = ╱30╱0╱ // 0xf9f @0xd
0x0f92…0fab at000e = ╱fe0000f005╱ // 0xfa0 @0xe
0x0f92…0fab at0013 = ╱ec╱,╱ // 0xfa5 @0x13
0x0f92…0fab at0014 = ╱4b╱K╱ // 0xfa6 @0x14
0x0f92…0fab at0015 = ╱34╱4╱ // 0xfa7 @0x15
0x0f92…0fab at0016 = ╱ef╱$╱ // 0xfa8 @0x16
0x0f92…0fab at0017 = ╱ee╱)╱ // 0xfa9 @0x17
0x0f92…0fab at0018 = EOL // 0xfaa @0x18
0x0f92…0fab }
0x0fab…0fcb 9d22 1720 GET K4$,21:AENT,AUNK,ETOT
0x0fab…0fcb LineComalBin {
0x0fab…0fcb ptr = 0x9d22 // 0xfab @0x0
0x0fab…0fcb lno = 0x06b8 // 0xfad @0x2
0x0fab…0fcb at0004 = ╱a9╱ GET ╱ // 0xfaf @0x4
0x0fab…0fcb at0005 = ╱4b╱K╱ // 0xfb0 @0x5
0x0fab…0fcb at0006 = ╱34╱4╱ // 0xfb1 @0x6
0x0fab…0fcb at0007 = ╱ef╱$╱ // 0xfb2 @0x7
0x0fab…0fcb at0008 = ╱ec╱,╱ // 0xfb3 @0x8
0x0fab…0fcb at0009 = ╱32╱2╱ // 0xfb4 @0x9
0x0fab…0fcb at000a = ╱31╱1╱ // 0xfb5 @0xa
0x0fab…0fcb at000b = ╱fe0000a805╱ // 0xfb6 @0xb
0x0fab…0fcb at0010 = ╱f0╱:╱ // 0xfbb @0x10
0x0fab…0fcb at0011 = ╱41╱A╱ // 0xfbc @0x11
0x0fab…0fcb at0012 = ╱45╱E╱ // 0xfbd @0x12
0x0fab…0fcb at0013 = ╱4e╱N╱ // 0xfbe @0x13
0x0fab…0fcb at0014 = ╱54╱T╱ // 0xfbf @0x14
0x0fab…0fcb at0015 = ╱ec╱,╱ // 0xfc0 @0x15
0x0fab…0fcb at0016 = ╱41╱A╱ // 0xfc1 @0x16
0x0fab…0fcb at0017 = ╱55╱U╱ // 0xfc2 @0x17
0x0fab…0fcb at0018 = ╱4e╱N╱ // 0xfc3 @0x18
0x0fab…0fcb at0019 = ╱4b╱K╱ // 0xfc4 @0x19
0x0fab…0fcb at001a = ╱ec╱,╱ // 0xfc5 @0x1a
0x0fab…0fcb at001b = ╱45╱E╱ // 0xfc6 @0x1b
0x0fab…0fcb at001c = ╱54╱T╱ // 0xfc7 @0x1c
0x0fab…0fcb at001d = ╱4f╱O╱ // 0xfc8 @0x1d
0x0fab…0fcb at001e = ╱54╱T╱ // 0xfc9 @0x1e
0x0fab…0fcb at001f = EOL // 0xfca @0x1f
0x0fab…0fcb }
0x0fcb…0fe4 9d3b 1730 EXEC FEJL(W,31,K4$)
0x0fcb…0fe4 LineComalBin {
0x0fcb…0fe4 ptr = 0x9d3b // 0xfcb @0x0
0x0fcb…0fe4 lno = 0x06c2 // 0xfcd @0x2
0x0fcb…0fe4 at0004 = ╱9d╱ EXEC ╱ // 0xfcf @0x4
0x0fcb…0fe4 at0005 = ╱46╱F╱ // 0xfd0 @0x5
0x0fcb…0fe4 at0006 = ╱45╱E╱ // 0xfd1 @0x6
0x0fcb…0fe4 at0007 = ╱4a╱J╱ // 0xfd2 @0x7
0x0fcb…0fe4 at0008 = ╱4c╱L╱ // 0xfd3 @0x8
0x0fcb…0fe4 at0009 = ╱ed╱(╱ // 0xfd4 @0x9
0x0fcb…0fe4 at000a = ╱57╱W╱ // 0xfd5 @0xa
0x0fcb…0fe4 at000b = ╱ec╱,╱ // 0xfd6 @0xb
0x0fcb…0fe4 at000c = ╱33╱3╱ // 0xfd7 @0xc
0x0fcb…0fe4 at000d = ╱31╱1╱ // 0xfd8 @0xd
0x0fcb…0fe4 at000e = ╱fe0000f805╱ // 0xfd9 @0xe
0x0fcb…0fe4 at0013 = ╱ec╱,╱ // 0xfde @0x13
0x0fcb…0fe4 at0014 = ╱4b╱K╱ // 0xfdf @0x14
0x0fcb…0fe4 at0015 = ╱34╱4╱ // 0xfe0 @0x15
0x0fcb…0fe4 at0016 = ╱ef╱$╱ // 0xfe1 @0x16
0x0fcb…0fe4 at0017 = ╱ee╱)╱ // 0xfe2 @0x17
0x0fcb…0fe4 at0018 = EOL // 0xfe3 @0x18
0x0fcb…0fe4 }
0x0fe4…0fed 9d44 1740 CLOSE K4$
0x0fe4…0fed LineComalBin {
0x0fe4…0fed ptr = 0x9d44 // 0xfe4 @0x0
0x0fe4…0fed lno = 0x06cc // 0xfe6 @0x2
0x0fe4…0fed at0004 = ╱a8╱ CLOSE ╱ // 0xfe8 @0x4
0x0fe4…0fed at0005 = ╱4b╱K╱ // 0xfe9 @0x5
0x0fe4…0fed at0006 = ╱34╱4╱ // 0xfea @0x6
0x0fe4…0fed at0007 = ╱ef╱$╱ // 0xfeb @0x7
0x0fe4…0fed at0008 = EOL // 0xfec @0x8
0x0fe4…0fed }
0x0fed…1006 9d5d 1750 EXEC FEJL(W,15,K4$)
0x0fed…1006 LineComalBin {
0x0fed…1006 ptr = 0x9d5d // 0xfed @0x0
0x0fed…1006 lno = 0x06d6 // 0xfef @0x2
0x0fed…1006 at0004 = ╱9d╱ EXEC ╱ // 0xff1 @0x4
0x0fed…1006 at0005 = ╱46╱F╱ // 0xff2 @0x5
0x0fed…1006 at0006 = ╱45╱E╱ // 0xff3 @0x6
0x0fed…1006 at0007 = ╱4a╱J╱ // 0xff4 @0x7
0x0fed…1006 at0008 = ╱4c╱L╱ // 0xff5 @0x8
0x0fed…1006 at0009 = ╱ed╱(╱ // 0xff6 @0x9
0x0fed…1006 at000a = ╱57╱W╱ // 0xff7 @0xa
0x0fed…1006 at000b = ╱ec╱,╱ // 0xff8 @0xb
0x0fed…1006 at000c = ╱31╱1╱ // 0xff9 @0xc
0x0fed…1006 at000d = ╱35╱5╱ // 0xffa @0xd
0x0fed…1006 at000e = ╱fe0000f004╱ // 0xffb @0xe
0x0fed…1006 at0013 = ╱ec╱,╱ // 0x1000 @0x13
0x0fed…1006 at0014 = ╱4b╱K╱ // 0x1001 @0x14
0x0fed…1006 at0015 = ╱34╱4╱ // 0x1002 @0x15
0x0fed…1006 at0016 = ╱ef╱$╱ // 0x1003 @0x16
0x0fed…1006 at0017 = ╱ee╱)╱ // 0x1004 @0x17
0x0fed…1006 at0018 = EOL // 0x1005 @0x18
0x0fed…1006 }
0x1006…1011 9d68 1760 OPEN K2$,R
0x1006…1011 LineComalBin {
0x1006…1011 ptr = 0x9d68 // 0x1006 @0x0
0x1006…1011 lno = 0x06e0 // 0x1008 @0x2
0x1006…1011 at0004 = ╱a7╱ OPEN ╱ // 0x100a @0x4
0x1006…1011 at0005 = ╱4b╱K╱ // 0x100b @0x5
0x1006…1011 at0006 = ╱32╱2╱ // 0x100c @0x6
0x1006…1011 at0007 = ╱ef╱$╱ // 0x100d @0x7
0x1006…1011 at0008 = ╱ec╱,╱ // 0x100e @0x8
0x1006…1011 at0009 = ╱52╱R╱ // 0x100f @0x9
0x1006…1011 at000a = EOL // 0x1010 @0xa
0x1006…1011 }
0x1011…102a 9d81 1770 EXEC FEJL(W,16,K2$)
0x1011…102a LineComalBin {
0x1011…102a ptr = 0x9d81 // 0x1011 @0x0
0x1011…102a lno = 0x06ea // 0x1013 @0x2
0x1011…102a at0004 = ╱9d╱ EXEC ╱ // 0x1015 @0x4
0x1011…102a at0005 = ╱46╱F╱ // 0x1016 @0x5
0x1011…102a at0006 = ╱45╱E╱ // 0x1017 @0x6
0x1011…102a at0007 = ╱4a╱J╱ // 0x1018 @0x7
0x1011…102a at0008 = ╱4c╱L╱ // 0x1019 @0x8
0x1011…102a at0009 = ╱ed╱(╱ // 0x101a @0x9
0x1011…102a at000a = ╱57╱W╱ // 0x101b @0xa
0x1011…102a at000b = ╱ec╱,╱ // 0x101c @0xb
0x1011…102a at000c = ╱31╱1╱ // 0x101d @0xc
0x1011…102a at000d = ╱36╱6╱ // 0x101e @0xd
0x1011…102a at000e = ╱fe00008005╱ // 0x101f @0xe
0x1011…102a at0013 = ╱ec╱,╱ // 0x1024 @0x13
0x1011…102a at0014 = ╱4b╱K╱ // 0x1025 @0x14
0x1011…102a at0015 = ╱32╱2╱ // 0x1026 @0x15
0x1011…102a at0016 = ╱ef╱$╱ // 0x1027 @0x16
0x1011…102a at0017 = ╱ee╱)╱ // 0x1028 @0x17
0x1011…102a at0018 = EOL // 0x1029 @0x18
0x1011…102a }
0x102a…1035 9d8c 1780 OPEN K3$,R
0x102a…1035 LineComalBin {
0x102a…1035 ptr = 0x9d8c // 0x102a @0x0
0x102a…1035 lno = 0x06f4 // 0x102c @0x2
0x102a…1035 at0004 = ╱a7╱ OPEN ╱ // 0x102e @0x4
0x102a…1035 at0005 = ╱4b╱K╱ // 0x102f @0x5
0x102a…1035 at0006 = ╱33╱3╱ // 0x1030 @0x6
0x102a…1035 at0007 = ╱ef╱$╱ // 0x1031 @0x7
0x102a…1035 at0008 = ╱ec╱,╱ // 0x1032 @0x8
0x102a…1035 at0009 = ╱52╱R╱ // 0x1033 @0x9
0x102a…1035 at000a = EOL // 0x1034 @0xa
0x102a…1035 }
0x1035…104e 9da5 1790 EXEC FEJL(W,17,K3$)
0x1035…104e LineComalBin {
0x1035…104e ptr = 0x9da5 // 0x1035 @0x0
0x1035…104e lno = 0x06fe // 0x1037 @0x2
0x1035…104e at0004 = ╱9d╱ EXEC ╱ // 0x1039 @0x4
0x1035…104e at0005 = ╱46╱F╱ // 0x103a @0x5
0x1035…104e at0006 = ╱45╱E╱ // 0x103b @0x6
0x1035…104e at0007 = ╱4a╱J╱ // 0x103c @0x7
0x1035…104e at0008 = ╱4c╱L╱ // 0x103d @0x8
0x1035…104e at0009 = ╱ed╱(╱ // 0x103e @0x9
0x1035…104e at000a = ╱57╱W╱ // 0x103f @0xa
0x1035…104e at000b = ╱ec╱,╱ // 0x1040 @0xb
0x1035…104e at000c = ╱31╱1╱ // 0x1041 @0xc
0x1035…104e at000d = ╱37╱7╱ // 0x1042 @0xd
0x1035…104e at000e = ╱fe00008805╱ // 0x1043 @0xe
0x1035…104e at0013 = ╱ec╱,╱ // 0x1048 @0x13
0x1035…104e at0014 = ╱4b╱K╱ // 0x1049 @0x14
0x1035…104e at0015 = ╱33╱3╱ // 0x104a @0x15
0x1035…104e at0016 = ╱ef╱$╱ // 0x104b @0x16
0x1035…104e at0017 = ╱ee╱)╱ // 0x104c @0x17
0x1035…104e at0018 = EOL // 0x104d @0x18
0x1035…104e }
0x104e…1059 9db0 1800 OPEN K5$,R
0x104e…1059 LineComalBin {
0x104e…1059 ptr = 0x9db0 // 0x104e @0x0
0x104e…1059 lno = 0x0708 // 0x1050 @0x2
0x104e…1059 at0004 = ╱a7╱ OPEN ╱ // 0x1052 @0x4
0x104e…1059 at0005 = ╱4b╱K╱ // 0x1053 @0x5
0x104e…1059 at0006 = ╱35╱5╱ // 0x1054 @0x6
0x104e…1059 at0007 = ╱ef╱$╱ // 0x1055 @0x7
0x104e…1059 at0008 = ╱ec╱,╱ // 0x1056 @0x8
0x104e…1059 at0009 = ╱52╱R╱ // 0x1057 @0x9
0x104e…1059 at000a = EOL // 0x1058 @0xa
0x104e…1059 }
0x1059…1078 9dcf 1810 EXEC FEJL(99,11,K5$)
0x1059…1078 LineComalBin {
0x1059…1078 ptr = 0x9dcf // 0x1059 @0x0
0x1059…1078 lno = 0x0712 // 0x105b @0x2
0x1059…1078 at0004 = ╱9d╱ EXEC ╱ // 0x105d @0x4
0x1059…1078 at0005 = ╱46╱F╱ // 0x105e @0x5
0x1059…1078 at0006 = ╱45╱E╱ // 0x105f @0x6
0x1059…1078 at0007 = ╱4a╱J╱ // 0x1060 @0x7
0x1059…1078 at0008 = ╱4c╱L╱ // 0x1061 @0x8
0x1059…1078 at0009 = ╱ed╱(╱ // 0x1062 @0x9
0x1059…1078 at000a = ╱39╱9╱ // 0x1063 @0xa
0x1059…1078 at000b = ╱39╱9╱ // 0x1064 @0xb
0x1059…1078 at000c = ╱fe0000c607╱ // 0x1065 @0xc
0x1059…1078 at0011 = ╱ec╱,╱ // 0x106a @0x11
0x1059…1078 at0012 = ╱31╱1╱ // 0x106b @0x12
0x1059…1078 at0013 = ╱31╱1╱ // 0x106c @0x13
0x1059…1078 at0014 = ╱fe0000b004╱ // 0x106d @0x14
0x1059…1078 at0019 = ╱ec╱,╱ // 0x1072 @0x19
0x1059…1078 at001a = ╱4b╱K╱ // 0x1073 @0x1a
0x1059…1078 at001b = ╱35╱5╱ // 0x1074 @0x1b
0x1059…1078 at001c = ╱ef╱$╱ // 0x1075 @0x1c
0x1059…1078 at001d = ╱ee╱)╱ // 0x1076 @0x1d
0x1059…1078 at001e = EOL // 0x1077 @0x1e
0x1059…1078 }
0x1078…108f 9de6 1820 FOR X=E TO METOT+MUNKANT
0x1078…108f LineComalBin {
0x1078…108f ptr = 0x9de6 // 0x1078 @0x0
0x1078…108f lno = 0x071c // 0x107a @0x2
0x1078…108f at0004 = ╱83╱ FOR ╱ // 0x107c @0x4
0x1078…108f at0005 = ╱58╱X╱ // 0x107d @0x5
0x1078…108f at0006 = ╱dc╱=╱ // 0x107e @0x6
0x1078…108f at0007 = ╱45╱E╱ // 0x107f @0x7
0x1078…108f at0008 = ╱b7╱ TO ╱ // 0x1080 @0x8
0x1078…108f at0009 = ╱4d╱M╱ // 0x1081 @0x9
0x1078…108f at000a = ╱45╱E╱ // 0x1082 @0xa
0x1078…108f at000b = ╱54╱T╱ // 0x1083 @0xb
0x1078…108f at000c = ╱4f╱O╱ // 0x1084 @0xc
0x1078…108f at000d = ╱54╱T╱ // 0x1085 @0xd
0x1078…108f at000e = ╱e2╱+╱ // 0x1086 @0xe
0x1078…108f at000f = ╱4d╱M╱ // 0x1087 @0xf
0x1078…108f at0010 = ╱55╱U╱ // 0x1088 @0x10
0x1078…108f at0011 = ╱4e╱N╱ // 0x1089 @0x11
0x1078…108f at0012 = ╱4b╱K╱ // 0x108a @0x12
0x1078…108f at0013 = ╱41╱A╱ // 0x108b @0x13
0x1078…108f at0014 = ╱4e╱N╱ // 0x108c @0x14
0x1078…108f at0015 = ╱54╱T╱ // 0x108d @0x15
0x1078…108f at0016 = EOL // 0x108e @0x16
0x1078…108f }
0x108f…10b2 9e09 1830 GET K5$,X:UNR(X),EU$(X),UNAVN$(X)
0x108f…10b2 LineComalBin {
0x108f…10b2 ptr = 0x9e09 // 0x108f @0x0
0x108f…10b2 lno = 0x0726 // 0x1091 @0x2
0x108f…10b2 at0004 = ╱a9╱ GET ╱ // 0x1093 @0x4
0x108f…10b2 at0005 = ╱4b╱K╱ // 0x1094 @0x5
0x108f…10b2 at0006 = ╱35╱5╱ // 0x1095 @0x6
0x108f…10b2 at0007 = ╱ef╱$╱ // 0x1096 @0x7
0x108f…10b2 at0008 = ╱ec╱,╱ // 0x1097 @0x8
0x108f…10b2 at0009 = ╱58╱X╱ // 0x1098 @0x9
0x108f…10b2 at000a = ╱f0╱:╱ // 0x1099 @0xa
0x108f…10b2 at000b = ╱55╱U╱ // 0x109a @0xb
0x108f…10b2 at000c = ╱4e╱N╱ // 0x109b @0xc
0x108f…10b2 at000d = ╱52╱R╱ // 0x109c @0xd
0x108f…10b2 at000e = ╱ed╱(╱ // 0x109d @0xe
0x108f…10b2 at000f = ╱58╱X╱ // 0x109e @0xf
0x108f…10b2 at0010 = ╱ee╱)╱ // 0x109f @0x10
0x108f…10b2 at0011 = ╱ec╱,╱ // 0x10a0 @0x11
0x108f…10b2 at0012 = ╱45╱E╱ // 0x10a1 @0x12
0x108f…10b2 at0013 = ╱55╱U╱ // 0x10a2 @0x13
0x108f…10b2 at0014 = ╱ef╱$╱ // 0x10a3 @0x14
0x108f…10b2 at0015 = ╱ed╱(╱ // 0x10a4 @0x15
0x108f…10b2 at0016 = ╱58╱X╱ // 0x10a5 @0x16
0x108f…10b2 at0017 = ╱ee╱)╱ // 0x10a6 @0x17
0x108f…10b2 at0018 = ╱ec╱,╱ // 0x10a7 @0x18
0x108f…10b2 at0019 = ╱55╱U╱ // 0x10a8 @0x19
0x108f…10b2 at001a = ╱4e╱N╱ // 0x10a9 @0x1a
0x108f…10b2 at001b = ╱41╱A╱ // 0x10aa @0x1b
0x108f…10b2 at001c = ╱56╱V╱ // 0x10ab @0x1c
0x108f…10b2 at001d = ╱4e╱N╱ // 0x10ac @0x1d
0x108f…10b2 at001e = ╱ef╱$╱ // 0x10ad @0x1e
0x108f…10b2 at001f = ╱ed╱(╱ // 0x10ae @0x1f
0x108f…10b2 at0020 = ╱58╱X╱ // 0x10af @0x20
0x108f…10b2 at0021 = ╱ee╱)╱ // 0x10b0 @0x21
0x108f…10b2 at0022 = EOL // 0x10b1 @0x22
0x108f…10b2 }
0x10b2…10d1 9e28 1840 EXEC FEJL(99,12,K5$)
0x10b2…10d1 LineComalBin {
0x10b2…10d1 ptr = 0x9e28 // 0x10b2 @0x0
0x10b2…10d1 lno = 0x0730 // 0x10b4 @0x2
0x10b2…10d1 at0004 = ╱9d╱ EXEC ╱ // 0x10b6 @0x4
0x10b2…10d1 at0005 = ╱46╱F╱ // 0x10b7 @0x5
0x10b2…10d1 at0006 = ╱45╱E╱ // 0x10b8 @0x6
0x10b2…10d1 at0007 = ╱4a╱J╱ // 0x10b9 @0x7
0x10b2…10d1 at0008 = ╱4c╱L╱ // 0x10ba @0x8
0x10b2…10d1 at0009 = ╱ed╱(╱ // 0x10bb @0x9
0x10b2…10d1 at000a = ╱39╱9╱ // 0x10bc @0xa
0x10b2…10d1 at000b = ╱39╱9╱ // 0x10bd @0xb
0x10b2…10d1 at000c = ╱fe0000c607╱ // 0x10be @0xc
0x10b2…10d1 at0011 = ╱ec╱,╱ // 0x10c3 @0x11
0x10b2…10d1 at0012 = ╱31╱1╱ // 0x10c4 @0x12
0x10b2…10d1 at0013 = ╱32╱2╱ // 0x10c5 @0x13
0x10b2…10d1 at0014 = ╱fe0000c004╱ // 0x10c6 @0x14
0x10b2…10d1 at0019 = ╱ec╱,╱ // 0x10cb @0x19
0x10b2…10d1 at001a = ╱4b╱K╱ // 0x10cc @0x1a
0x10b2…10d1 at001b = ╱35╱5╱ // 0x10cd @0x1b
0x10b2…10d1 at001c = ╱ef╱$╱ // 0x10ce @0x1c
0x10b2…10d1 at001d = ╱ee╱)╱ // 0x10cf @0x1d
0x10b2…10d1 at001e = EOL // 0x10d0 @0x1e
0x10b2…10d1 }
0x10d1…10d8 9e2f 1850 NEXT X
0x10d1…10d8 LineComalBin {
0x10d1…10d8 ptr = 0x9e2f // 0x10d1 @0x0
0x10d1…10d8 lno = 0x073a // 0x10d3 @0x2
0x10d1…10d8 at0004 = ╱84╱ NEXT ╱ // 0x10d5 @0x4
0x10d1…10d8 at0005 = ╱58╱X╱ // 0x10d6 @0x5
0x10d1…10d8 at0006 = EOL // 0x10d7 @0x6
0x10d1…10d8 }
0x10d8…10e1 (56,) 9e38 1860 CLOSE K5$
0x10d8…10e1 LineComalBin {
0x10d8…10e1 ptr = 0x9e38 // 0x10d8 @0x0
0x10d8…10e1 lno = 0x0744 // 0x10da @0x2
0x10d8…10e1 at0004 = ╱a8╱ CLOSE ╱ // 0x10dc @0x4
0x10d8…10e1 at0005 = ╱4b╱K╱ // 0x10dd @0x5
0x10d8…10e1 at0006 = ╱35╱5╱ // 0x10de @0x6
0x10d8…10e1 at0007 = ╱ef╱$╱ // 0x10df @0x7
0x10d8…10e1 at0008 = EOL // 0x10e0 @0x8
0x10d8…10e1 }
0x10e1…10ff 9e56 1870 EXEC INDTAB(ETAB,MEANTAL,K2$)
0x10e1…10ff LineComalBin {
0x10e1…10ff ptr = 0x9e56 // 0x10e1 @0x0
0x10e1…10ff lno = 0x074e // 0x10e3 @0x2
0x10e1…10ff at0004 = ╱9d╱ EXEC ╱ // 0x10e5 @0x4
0x10e1…10ff at0005 = ╱49╱I╱ // 0x10e6 @0x5
0x10e1…10ff at0006 = ╱4e╱N╱ // 0x10e7 @0x6
0x10e1…10ff at0007 = ╱44╱D╱ // 0x10e8 @0x7
0x10e1…10ff at0008 = ╱54╱T╱ // 0x10e9 @0x8
0x10e1…10ff at0009 = ╱41╱A╱ // 0x10ea @0x9
0x10e1…10ff at000a = ╱42╱B╱ // 0x10eb @0xa
0x10e1…10ff at000b = ╱ed╱(╱ // 0x10ec @0xb
0x10e1…10ff at000c = ╱45╱E╱ // 0x10ed @0xc
0x10e1…10ff at000d = ╱54╱T╱ // 0x10ee @0xd
0x10e1…10ff at000e = ╱41╱A╱ // 0x10ef @0xe
0x10e1…10ff at000f = ╱42╱B╱ // 0x10f0 @0xf
0x10e1…10ff at0010 = ╱ec╱,╱ // 0x10f1 @0x10
0x10e1…10ff at0011 = ╱4d╱M╱ // 0x10f2 @0x11
0x10e1…10ff at0012 = ╱45╱E╱ // 0x10f3 @0x12
0x10e1…10ff at0013 = ╱41╱A╱ // 0x10f4 @0x13
0x10e1…10ff at0014 = ╱4e╱N╱ // 0x10f5 @0x14
0x10e1…10ff at0015 = ╱54╱T╱ // 0x10f6 @0x15
0x10e1…10ff at0016 = ╱41╱A╱ // 0x10f7 @0x16
0x10e1…10ff at0017 = ╱4c╱L╱ // 0x10f8 @0x17
0x10e1…10ff at0018 = ╱ec╱,╱ // 0x10f9 @0x18
0x10e1…10ff at0019 = ╱4b╱K╱ // 0x10fa @0x19
0x10e1…10ff at001a = ╱32╱2╱ // 0x10fb @0x1a
0x10e1…10ff at001b = ╱ef╱$╱ // 0x10fc @0x1b
0x10e1…10ff at001c = ╱ee╱)╱ // 0x10fd @0x1c
0x10e1…10ff at001d = EOL // 0x10fe @0x1d
0x10e1…10ff }
0x10ff…1125 9e7c 1880 BLANK$=" "
0x10ff…1125 LineComalBin {
0x10ff…1125 ptr = 0x9e7c // 0x10ff @0x0
0x10ff…1125 lno = 0x0758 // 0x1101 @0x2
0x10ff…1125 at0004 = ╱42╱B╱ // 0x1103 @0x4
0x10ff…1125 at0005 = ╱4c╱L╱ // 0x1104 @0x5
0x10ff…1125 at0006 = ╱41╱A╱ // 0x1105 @0x6
0x10ff…1125 at0007 = ╱4e╱N╱ // 0x1106 @0x7
0x10ff…1125 at0008 = ╱4b╱K╱ // 0x1107 @0x8
0x10ff…1125 at0009 = ╱ef╱$╱ // 0x1108 @0x9
0x10ff…1125 at000a = ╱dc╱=╱ // 0x1109 @0xa
0x10ff…1125 at000b = ╱22╱"╱ // 0x110a @0xb
0x10ff…1125 at000c = ╱20╱…╱ // 0x110b @0xc
0x10ff…1125 at000d = ╱20╱…╱ // 0x110c @0xd
0x10ff…1125 at000e = ╱20╱…╱ // 0x110d @0xe
0x10ff…1125 at000f = ╱20╱…╱ // 0x110e @0xf
0x10ff…1125 at0010 = ╱20╱…╱ // 0x110f @0x10
0x10ff…1125 at0011 = ╱20╱…╱ // 0x1110 @0x11
0x10ff…1125 at0012 = ╱20╱…╱ // 0x1111 @0x12
0x10ff…1125 at0013 = ╱20╱…╱ // 0x1112 @0x13
0x10ff…1125 at0014 = ╱20╱…╱ // 0x1113 @0x14
0x10ff…1125 at0015 = ╱20╱…╱ // 0x1114 @0x15
0x10ff…1125 at0016 = ╱20╱…╱ // 0x1115 @0x16
0x10ff…1125 at0017 = ╱20╱…╱ // 0x1116 @0x17
0x10ff…1125 at0018 = ╱20╱…╱ // 0x1117 @0x18
0x10ff…1125 at0019 = ╱20╱…╱ // 0x1118 @0x19
0x10ff…1125 at001a = ╱20╱…╱ // 0x1119 @0x1a
0x10ff…1125 at001b = ╱20╱…╱ // 0x111a @0x1b
0x10ff…1125 at001c = ╱20╱…╱ // 0x111b @0x1c
0x10ff…1125 at001d = ╱20╱…╱ // 0x111c @0x1d
0x10ff…1125 at001e = ╱20╱…╱ // 0x111d @0x1e
0x10ff…1125 at001f = ╱20╱…╱ // 0x111e @0x1f
0x10ff…1125 at0020 = ╱20╱…╱ // 0x111f @0x20
0x10ff…1125 at0021 = ╱20╱…╱ // 0x1120 @0x21
0x10ff…1125 at0022 = ╱20╱…╱ // 0x1121 @0x22
0x10ff…1125 at0023 = ╱20╱…╱ // 0x1122 @0x23
0x10ff…1125 at0024 = ╱22╱"╱ // 0x1123 @0x24
0x10ff…1125 at0025 = EOL // 0x1124 @0x25
0x10ff…1125 }
0x1125…116c (57,) 9ec3 1890 STREG$="------------------------------------";STREG$=STREG$+STREG$
0x1125…116c LineComalBin {
0x1125…116c ptr = 0x9ec3 // 0x1125 @0x0
0x1125…116c lno = 0x0762 // 0x1127 @0x2
0x1125…116c at0004 = ╱53╱S╱ // 0x1129 @0x4
0x1125…116c at0005 = ╱54╱T╱ // 0x112a @0x5
0x1125…116c at0006 = ╱52╱R╱ // 0x112b @0x6
0x1125…116c at0007 = ╱45╱E╱ // 0x112c @0x7
0x1125…116c at0008 = ╱47╱G╱ // 0x112d @0x8
0x1125…116c at0009 = ╱ef╱$╱ // 0x112e @0x9
0x1125…116c at000a = ╱dc╱=╱ // 0x112f @0xa
0x1125…116c at000b = ╱22╱"╱ // 0x1130 @0xb
0x1125…116c at000c = ╱2d╱-╱ // 0x1131 @0xc
0x1125…116c at000d = ╱2d╱-╱ // 0x1132 @0xd
0x1125…116c at000e = ╱2d╱-╱ // 0x1133 @0xe
0x1125…116c at000f = ╱2d╱-╱ // 0x1134 @0xf
0x1125…116c at0010 = ╱2d╱-╱ // 0x1135 @0x10
0x1125…116c at0011 = ╱2d╱-╱ // 0x1136 @0x11
0x1125…116c at0012 = ╱2d╱-╱ // 0x1137 @0x12
0x1125…116c at0013 = ╱2d╱-╱ // 0x1138 @0x13
0x1125…116c at0014 = ╱2d╱-╱ // 0x1139 @0x14
0x1125…116c at0015 = ╱2d╱-╱ // 0x113a @0x15
0x1125…116c at0016 = ╱2d╱-╱ // 0x113b @0x16
0x1125…116c at0017 = ╱2d╱-╱ // 0x113c @0x17
0x1125…116c at0018 = ╱2d╱-╱ // 0x113d @0x18
0x1125…116c at0019 = ╱2d╱-╱ // 0x113e @0x19
0x1125…116c at001a = ╱2d╱-╱ // 0x113f @0x1a
0x1125…116c at001b = ╱2d╱-╱ // 0x1140 @0x1b
0x1125…116c at001c = ╱2d╱-╱ // 0x1141 @0x1c
0x1125…116c at001d = ╱2d╱-╱ // 0x1142 @0x1d
0x1125…116c at001e = ╱2d╱-╱ // 0x1143 @0x1e
0x1125…116c at001f = ╱2d╱-╱ // 0x1144 @0x1f
0x1125…116c at0020 = ╱2d╱-╱ // 0x1145 @0x20
0x1125…116c at0021 = ╱2d╱-╱ // 0x1146 @0x21
0x1125…116c at0022 = ╱2d╱-╱ // 0x1147 @0x22
0x1125…116c at0023 = ╱2d╱-╱ // 0x1148 @0x23
0x1125…116c at0024 = ╱2d╱-╱ // 0x1149 @0x24
0x1125…116c at0025 = ╱2d╱-╱ // 0x114a @0x25
0x1125…116c at0026 = ╱2d╱-╱ // 0x114b @0x26
0x1125…116c at0027 = ╱2d╱-╱ // 0x114c @0x27
0x1125…116c at0028 = ╱2d╱-╱ // 0x114d @0x28
0x1125…116c at0029 = ╱2d╱-╱ // 0x114e @0x29
0x1125…116c at002a = ╱2d╱-╱ // 0x114f @0x2a
0x1125…116c at002b = ╱2d╱-╱ // 0x1150 @0x2b
0x1125…116c at002c = ╱2d╱-╱ // 0x1151 @0x2c
0x1125…116c at002d = ╱2d╱-╱ // 0x1152 @0x2d
0x1125…116c at002e = ╱2d╱-╱ // 0x1153 @0x2e
0x1125…116c at002f = ╱2d╱-╱ // 0x1154 @0x2f
0x1125…116c at0030 = ╱22╱"╱ // 0x1155 @0x30
0x1125…116c at0031 = ╱eb╱;╱ // 0x1156 @0x31
0x1125…116c at0032 = ╱53╱S╱ // 0x1157 @0x32
0x1125…116c at0033 = ╱54╱T╱ // 0x1158 @0x33
0x1125…116c at0034 = ╱52╱R╱ // 0x1159 @0x34
0x1125…116c at0035 = ╱45╱E╱ // 0x115a @0x35
0x1125…116c at0036 = ╱47╱G╱ // 0x115b @0x36
0x1125…116c at0037 = ╱ef╱$╱ // 0x115c @0x37
0x1125…116c at0038 = ╱dc╱=╱ // 0x115d @0x38
0x1125…116c at0039 = ╱53╱S╱ // 0x115e @0x39
0x1125…116c at003a = ╱54╱T╱ // 0x115f @0x3a
0x1125…116c at003b = ╱52╱R╱ // 0x1160 @0x3b
0x1125…116c at003c = ╱45╱E╱ // 0x1161 @0x3c
0x1125…116c at003d = ╱47╱G╱ // 0x1162 @0x3d
0x1125…116c at003e = ╱ef╱$╱ // 0x1163 @0x3e
0x1125…116c at003f = ╱f1╱+╱ // 0x1164 @0x3f
0x1125…116c at0040 = ╱53╱S╱ // 0x1165 @0x40
0x1125…116c at0041 = ╱54╱T╱ // 0x1166 @0x41
0x1125…116c at0042 = ╱52╱R╱ // 0x1167 @0x42
0x1125…116c at0043 = ╱45╱E╱ // 0x1168 @0x43
0x1125…116c at0044 = ╱47╱G╱ // 0x1169 @0x44
0x1125…116c at0045 = ╱ef╱$╱ // 0x116a @0x45
0x1125…116c at0046 = EOL // 0x116b @0x46
0x1125…116c }
0x116c…1172 9ec9 1900 REPEAT
0x116c…1172 LineComalBin {
0x116c…1172 ptr = 0x9ec9 // 0x116c @0x0
0x116c…1172 lno = 0x076c // 0x116e @0x2
0x116c…1172 at0004 = ╱97╱ REPEAT ╱ // 0x1170 @0x4
0x116c…1172 at0005 = EOL // 0x1171 @0x5
0x116c…1172 }
0x1172…1179 (58,) 9ed0 1910 OUTPUT T
0x1172…1179 LineComalBin {
0x1172…1179 ptr = 0x9ed0 // 0x1172 @0x0
0x1172…1179 lno = 0x0776 // 0x1174 @0x2
0x1172…1179 at0004 = ╱a5╱ OUTPUT ╱ // 0x1176 @0x4
0x1172…1179 at0005 = ╱54╱T╱ // 0x1177 @0x5
0x1172…1179 at0006 = EOL // 0x1178 @0x6
0x1172…1179 }
0x1179…117f 9ed6 1920 CLEAR
0x1179…117f LineComalBin {
0x1179…117f ptr = 0x9ed6 // 0x1179 @0x0
0x1179…117f lno = 0x0780 // 0x117b @0x2
0x1179…117f at0004 = ╱a0╱ CLEAR ╱ // 0x117d @0x4
0x1179…117f at0005 = EOL // 0x117e @0x5
0x1179…117f }
0x117f…1193 9eea 1930 CURSOR 15,7
0x117f…1193 LineComalBin {
0x117f…1193 ptr = 0x9eea // 0x117f @0x0
0x117f…1193 lno = 0x078a // 0x1181 @0x2
0x117f…1193 at0004 = ╱a1╱ CURSOR ╱ // 0x1183 @0x4
0x117f…1193 at0005 = ╱31╱1╱ // 0x1184 @0x5
0x117f…1193 at0006 = ╱35╱5╱ // 0x1185 @0x6
0x117f…1193 at0007 = ╱fe0000f004╱ // 0x1186 @0x7
0x117f…1193 at000c = ╱ec╱,╱ // 0x118b @0xc
0x117f…1193 at000d = ╱37╱7╱ // 0x118c @0xd
0x117f…1193 at000e = ╱fe0000e003╱ // 0x118d @0xe
0x117f…1193 at0013 = EOL // 0x1192 @0x13
0x117f…1193 }
0x1193…11ad 9f04 1940 PRINT "Entreprisebalancer"
0x1193…11ad LineComalBin {
0x1193…11ad ptr = 0x9f04 // 0x1193 @0x0
0x1193…11ad lno = 0x0794 // 0x1195 @0x2
0x1193…11ad at0004 = ╱92╱ PRINT ╱ // 0x1197 @0x4
0x1193…11ad at0005 = ╱22╱"╱ // 0x1198 @0x5
0x1193…11ad at0006 = ╱45╱E╱ // 0x1199 @0x6
0x1193…11ad at0007 = ╱6e╱n╱ // 0x119a @0x7
0x1193…11ad at0008 = ╱74╱t╱ // 0x119b @0x8
0x1193…11ad at0009 = ╱72╱r╱ // 0x119c @0x9
0x1193…11ad at000a = ╱65╱e╱ // 0x119d @0xa
0x1193…11ad at000b = ╱70╱p╱ // 0x119e @0xb
0x1193…11ad at000c = ╱72╱r╱ // 0x119f @0xc
0x1193…11ad at000d = ╱69╱i╱ // 0x11a0 @0xd
0x1193…11ad at000e = ╱73╱s╱ // 0x11a1 @0xe
0x1193…11ad at000f = ╱65╱e╱ // 0x11a2 @0xf
0x1193…11ad at0010 = ╱62╱b╱ // 0x11a3 @0x10
0x1193…11ad at0011 = ╱61╱a╱ // 0x11a4 @0x11
0x1193…11ad at0012 = ╱6c╱l╱ // 0x11a5 @0x12
0x1193…11ad at0013 = ╱61╱a╱ // 0x11a6 @0x13
0x1193…11ad at0014 = ╱6e╱n╱ // 0x11a7 @0x14
0x1193…11ad at0015 = ╱63╱c╱ // 0x11a8 @0x15
0x1193…11ad at0016 = ╱65╱e╱ // 0x11a9 @0x16
0x1193…11ad at0017 = ╱72╱r╱ // 0x11aa @0x17
0x1193…11ad at0018 = ╱22╱"╱ // 0x11ab @0x18
0x1193…11ad at0019 = EOL // 0x11ac @0x19
0x1193…11ad }
0x11ad…11b3 9f0a 1950 REPEAT
0x11ad…11b3 LineComalBin {
0x11ad…11b3 ptr = 0x9f0a // 0x11ad @0x0
0x11ad…11b3 lno = 0x079e // 0x11af @0x2
0x11ad…11b3 at0004 = ╱97╱ REPEAT ╱ // 0x11b1 @0x4
0x11ad…11b3 at0005 = EOL // 0x11b2 @0x5
0x11ad…11b3 }
0x11b3…11b9 9f10 1960 REPEAT
0x11b3…11b9 LineComalBin {
0x11b3…11b9 ptr = 0x9f10 // 0x11b3 @0x0
0x11b3…11b9 lno = 0x07a8 // 0x11b5 @0x2
0x11b3…11b9 at0004 = ╱97╱ REPEAT ╱ // 0x11b7 @0x4
0x11b3…11b9 at0005 = EOL // 0x11b8 @0x5
0x11b3…11b9 }
0x11b9…11ce 9f25 1970 CURSOR 15,13
0x11b9…11ce LineComalBin {
0x11b9…11ce ptr = 0x9f25 // 0x11b9 @0x0
0x11b9…11ce lno = 0x07b2 // 0x11bb @0x2
0x11b9…11ce at0004 = ╱a1╱ CURSOR ╱ // 0x11bd @0x4
0x11b9…11ce at0005 = ╱31╱1╱ // 0x11be @0x5
0x11b9…11ce at0006 = ╱35╱5╱ // 0x11bf @0x6
0x11b9…11ce at0007 = ╱fe0000f004╱ // 0x11c0 @0x7
0x11b9…11ce at000c = ╱ec╱,╱ // 0x11c5 @0xc
0x11b9…11ce at000d = ╱31╱1╱ // 0x11c6 @0xd
0x11b9…11ce at000e = ╱33╱3╱ // 0x11c7 @0xe
0x11b9…11ce at000f = ╱fe0000d004╱ // 0x11c8 @0xf
0x11b9…11ce at0014 = EOL // 0x11cd @0x14
0x11b9…11ce }
0x11ce…11f4 9f4b 1980 PRINT "Fra entreprisenr (0:Alle)"
0x11ce…11f4 LineComalBin {
0x11ce…11f4 ptr = 0x9f4b // 0x11ce @0x0
0x11ce…11f4 lno = 0x07bc // 0x11d0 @0x2
0x11ce…11f4 at0004 = ╱92╱ PRINT ╱ // 0x11d2 @0x4
0x11ce…11f4 at0005 = ╱22╱"╱ // 0x11d3 @0x5
0x11ce…11f4 at0006 = ╱46╱F╱ // 0x11d4 @0x6
0x11ce…11f4 at0007 = ╱72╱r╱ // 0x11d5 @0x7
0x11ce…11f4 at0008 = ╱61╱a╱ // 0x11d6 @0x8
0x11ce…11f4 at0009 = ╱20╱…╱ // 0x11d7 @0x9
0x11ce…11f4 at000a = ╱65╱e╱ // 0x11d8 @0xa
0x11ce…11f4 at000b = ╱6e╱n╱ // 0x11d9 @0xb
0x11ce…11f4 at000c = ╱74╱t╱ // 0x11da @0xc
0x11ce…11f4 at000d = ╱72╱r╱ // 0x11db @0xd
0x11ce…11f4 at000e = ╱65╱e╱ // 0x11dc @0xe
0x11ce…11f4 at000f = ╱70╱p╱ // 0x11dd @0xf
0x11ce…11f4 at0010 = ╱72╱r╱ // 0x11de @0x10
0x11ce…11f4 at0011 = ╱69╱i╱ // 0x11df @0x11
0x11ce…11f4 at0012 = ╱73╱s╱ // 0x11e0 @0x12
0x11ce…11f4 at0013 = ╱65╱e╱ // 0x11e1 @0x13
0x11ce…11f4 at0014 = ╱6e╱n╱ // 0x11e2 @0x14
0x11ce…11f4 at0015 = ╱72╱r╱ // 0x11e3 @0x15
0x11ce…11f4 at0016 = ╱20╱…╱ // 0x11e4 @0x16
0x11ce…11f4 at0017 = ╱20╱…╱ // 0x11e5 @0x17
0x11ce…11f4 at0018 = ╱20╱…╱ // 0x11e6 @0x18
0x11ce…11f4 at0019 = ╱20╱…╱ // 0x11e7 @0x19
0x11ce…11f4 at001a = ╱20╱…╱ // 0x11e8 @0x1a
0x11ce…11f4 at001b = ╱20╱…╱ // 0x11e9 @0x1b
0x11ce…11f4 at001c = ╱28╱(╱ // 0x11ea @0x1c
0x11ce…11f4 at001d = ╱30╱0╱ // 0x11eb @0x1d
0x11ce…11f4 at001e = ╱3a╱:╱ // 0x11ec @0x1e
0x11ce…11f4 at001f = ╱41╱A╱ // 0x11ed @0x1f
0x11ce…11f4 at0020 = ╱6c╱l╱ // 0x11ee @0x20
0x11ce…11f4 at0021 = ╱6c╱l╱ // 0x11ef @0x21
0x11ce…11f4 at0022 = ╱65╱e╱ // 0x11f0 @0x22
0x11ce…11f4 at0023 = ╱29╱)╱ // 0x11f1 @0x23
0x11ce…11f4 at0024 = ╱22╱"╱ // 0x11f2 @0x24
0x11ce…11f4 at0025 = EOL // 0x11f3 @0x25
0x11ce…11f4 }
0x11f4…1209 9f60 1990 CURSOR 32,13
0x11f4…1209 LineComalBin {
0x11f4…1209 ptr = 0x9f60 // 0x11f4 @0x0
0x11f4…1209 lno = 0x07c6 // 0x11f6 @0x2
0x11f4…1209 at0004 = ╱a1╱ CURSOR ╱ // 0x11f8 @0x4
0x11f4…1209 at0005 = ╱33╱3╱ // 0x11f9 @0x5
0x11f4…1209 at0006 = ╱32╱2╱ // 0x11fa @0x6
0x11f4…1209 at0007 = ╱fe00008006╱ // 0x11fb @0x7
0x11f4…1209 at000c = ╱ec╱,╱ // 0x1200 @0xc
0x11f4…1209 at000d = ╱31╱1╱ // 0x1201 @0xd
0x11f4…1209 at000e = ╱33╱3╱ // 0x1202 @0xe
0x11f4…1209 at000f = ╱fe0000d004╱ // 0x1203 @0xf
0x11f4…1209 at0014 = EOL // 0x1208 @0x14
0x11f4…1209 }
0x1209…1211 9f68 2000 INPUT A$
0x1209…1211 LineComalBin {
0x1209…1211 ptr = 0x9f68 // 0x1209 @0x0
0x1209…1211 lno = 0x07d0 // 0x120b @0x2
0x1209…1211 at0004 = ╱91╱ INPUT ╱ // 0x120d @0x4
0x1209…1211 at0005 = ╱41╱A╱ // 0x120e @0x5
0x1209…1211 at0006 = ╱ef╱$╱ // 0x120f @0x6
0x1209…1211 at0007 = EOL // 0x1210 @0x7
0x1209…1211 }
0x1211…1221 9f78 2010 EXEC NRTEST(A$)
0x1211…1221 LineComalBin {
0x1211…1221 ptr = 0x9f78 // 0x1211 @0x0
0x1211…1221 lno = 0x07da // 0x1213 @0x2
0x1211…1221 at0004 = ╱9d╱ EXEC ╱ // 0x1215 @0x4
0x1211…1221 at0005 = ╱4e╱N╱ // 0x1216 @0x5
0x1211…1221 at0006 = ╱52╱R╱ // 0x1217 @0x6
0x1211…1221 at0007 = ╱54╱T╱ // 0x1218 @0x7
0x1211…1221 at0008 = ╱45╱E╱ // 0x1219 @0x8
0x1211…1221 at0009 = ╱53╱S╱ // 0x121a @0x9
0x1211…1221 at000a = ╱54╱T╱ // 0x121b @0xa
0x1211…1221 at000b = ╱ed╱(╱ // 0x121c @0xb
0x1211…1221 at000c = ╱41╱A╱ // 0x121d @0xc
0x1211…1221 at000d = ╱ef╱$╱ // 0x121e @0xd
0x1211…1221 at000e = ╱ee╱)╱ // 0x121f @0xe
0x1211…1221 at000f = EOL // 0x1220 @0xf
0x1211…1221 }
0x1221…124c 9fa3 2020 UNTIL ((P>99 AND P<1000) OR P=B) AND TEST2=B
0x1221…124c LineComalBin {
0x1221…124c ptr = 0x9fa3 // 0x1221 @0x0
0x1221…124c lno = 0x07e4 // 0x1223 @0x2
0x1221…124c at0004 = ╱98╱ UNTIL ╱ // 0x1225 @0x4
0x1221…124c at0005 = ╱ed╱(╱ // 0x1226 @0x5
0x1221…124c at0006 = ╱ed╱(╱ // 0x1227 @0x6
0x1221…124c at0007 = ╱50╱P╱ // 0x1228 @0x7
0x1221…124c at0008 = ╱de╱>╱ // 0x1229 @0x8
0x1221…124c at0009 = ╱39╱9╱ // 0x122a @0x9
0x1221…124c at000a = ╱39╱9╱ // 0x122b @0xa
0x1221…124c at000b = ╱fe0000c607╱ // 0x122c @0xb
0x1221…124c at0010 = ╱da╱ AND ╱ // 0x1231 @0x10
0x1221…124c at0011 = ╱50╱P╱ // 0x1232 @0x11
0x1221…124c at0012 = ╱dd╱<╱ // 0x1233 @0x12
0x1221…124c at0013 = ╱31╱1╱ // 0x1234 @0x13
0x1221…124c at0014 = ╱30╱0╱ // 0x1235 @0x14
0x1221…124c at0015 = ╱30╱0╱ // 0x1236 @0x15
0x1221…124c at0016 = ╱30╱0╱ // 0x1237 @0x16
0x1221…124c at0017 = ╱fe0000fa0a╱ // 0x1238 @0x17
0x1221…124c at001c = ╱ee╱)╱ // 0x123d @0x1c
0x1221…124c at001d = ╱db╱ OR ╱ // 0x123e @0x1d
0x1221…124c at001e = ╱50╱P╱ // 0x123f @0x1e
0x1221…124c at001f = ╱dc╱=╱ // 0x1240 @0x1f
0x1221…124c at0020 = ╱42╱B╱ // 0x1241 @0x20
0x1221…124c at0021 = ╱ee╱)╱ // 0x1242 @0x21
0x1221…124c at0022 = ╱da╱ AND ╱ // 0x1243 @0x22
0x1221…124c at0023 = ╱54╱T╱ // 0x1244 @0x23
0x1221…124c at0024 = ╱45╱E╱ // 0x1245 @0x24
0x1221…124c at0025 = ╱53╱S╱ // 0x1246 @0x25
0x1221…124c at0026 = ╱54╱T╱ // 0x1247 @0x26
0x1221…124c at0027 = ╱32╱2╱ // 0x1248 @0x27
0x1221…124c at0028 = ╱dc╱=╱ // 0x1249 @0x28
0x1221…124c at0029 = ╱42╱B╱ // 0x124a @0x29
0x1221…124c at002a = EOL // 0x124b @0x2a
0x1221…124c }
0x124c…1256 9fad 2030 IF P=B THEN
0x124c…1256 LineComalBin {
0x124c…1256 ptr = 0x9fad // 0x124c @0x0
0x124c…1256 lno = 0x07ee // 0x124e @0x2
0x124c…1256 at0004 = ╱9c╱ IF ╱ // 0x1250 @0x4
0x124c…1256 at0005 = ╱50╱P╱ // 0x1251 @0x5
0x124c…1256 at0006 = ╱dc╱=╱ // 0x1252 @0x6
0x124c…1256 at0007 = ╱42╱B╱ // 0x1253 @0x7
0x124c…1256 at0008 = ╱b6╱ THEN ╱ // 0x1254 @0x8
0x124c…1256 at0009 = EOL // 0x1255 @0x9
0x124c…1256 }
0x1256…1269 9fc0 2040 FRA=E;TIL=AENT
0x1256…1269 LineComalBin {
0x1256…1269 ptr = 0x9fc0 // 0x1256 @0x0
0x1256…1269 lno = 0x07f8 // 0x1258 @0x2
0x1256…1269 at0004 = ╱46╱F╱ // 0x125a @0x4
0x1256…1269 at0005 = ╱52╱R╱ // 0x125b @0x5
0x1256…1269 at0006 = ╱41╱A╱ // 0x125c @0x6
0x1256…1269 at0007 = ╱dc╱=╱ // 0x125d @0x7
0x1256…1269 at0008 = ╱45╱E╱ // 0x125e @0x8
0x1256…1269 at0009 = ╱eb╱;╱ // 0x125f @0x9
0x1256…1269 at000a = ╱54╱T╱ // 0x1260 @0xa
0x1256…1269 at000b = ╱49╱I╱ // 0x1261 @0xb
0x1256…1269 at000c = ╱4c╱L╱ // 0x1262 @0xc
0x1256…1269 at000d = ╱dc╱=╱ // 0x1263 @0xd
0x1256…1269 at000e = ╱41╱A╱ // 0x1264 @0xe
0x1256…1269 at000f = ╱45╱E╱ // 0x1265 @0xf
0x1256…1269 at0010 = ╱4e╱N╱ // 0x1266 @0x10
0x1256…1269 at0011 = ╱54╱T╱ // 0x1267 @0x11
0x1256…1269 at0012 = EOL // 0x1268 @0x12
0x1256…1269 }
0x1269…126f 9fc6 2050 ELSE
0x1269…126f LineComalBin {
0x1269…126f ptr = 0x9fc6 // 0x1269 @0x0
0x1269…126f lno = 0x0802 // 0x126b @0x2
0x1269…126f at0004 = ╱9a╱ ELSE ╱ // 0x126d @0x4
0x1269…126f at0005 = EOL // 0x126e @0x5
0x1269…126f }
0x126f…127a 9fd1 2060 KONT=P
0x126f…127a LineComalBin {
0x126f…127a ptr = 0x9fd1 // 0x126f @0x0
0x126f…127a lno = 0x080c // 0x1271 @0x2
0x126f…127a at0004 = ╱4b╱K╱ // 0x1273 @0x4
0x126f…127a at0005 = ╱4f╱O╱ // 0x1274 @0x5
0x126f…127a at0006 = ╱4e╱N╱ // 0x1275 @0x6
0x126f…127a at0007 = ╱54╱T╱ // 0x1276 @0x7
0x126f…127a at0008 = ╱dc╱=╱ // 0x1277 @0x8
0x126f…127a at0009 = ╱50╱P╱ // 0x1278 @0x9
0x126f…127a at000a = EOL // 0x1279 @0xa
0x126f…127a }
0x127a…129e 9ff5 2070 EXEC FINDPOST(ETAB,MEANTAL,P,EPIL3)
0x127a…129e LineComalBin {
0x127a…129e ptr = 0x9ff5 // 0x127a @0x0
0x127a…129e lno = 0x0816 // 0x127c @0x2
0x127a…129e at0004 = ╱9d╱ EXEC ╱ // 0x127e @0x4
0x127a…129e at0005 = ╱46╱F╱ // 0x127f @0x5
0x127a…129e at0006 = ╱49╱I╱ // 0x1280 @0x6
0x127a…129e at0007 = ╱4e╱N╱ // 0x1281 @0x7
0x127a…129e at0008 = ╱44╱D╱ // 0x1282 @0x8
0x127a…129e at0009 = ╱50╱P╱ // 0x1283 @0x9
0x127a…129e at000a = ╱4f╱O╱ // 0x1284 @0xa
0x127a…129e at000b = ╱53╱S╱ // 0x1285 @0xb
0x127a…129e at000c = ╱54╱T╱ // 0x1286 @0xc
0x127a…129e at000d = ╱ed╱(╱ // 0x1287 @0xd
0x127a…129e at000e = ╱45╱E╱ // 0x1288 @0xe
0x127a…129e at000f = ╱54╱T╱ // 0x1289 @0xf
0x127a…129e at0010 = ╱41╱A╱ // 0x128a @0x10
0x127a…129e at0011 = ╱42╱B╱ // 0x128b @0x11
0x127a…129e at0012 = ╱ec╱,╱ // 0x128c @0x12
0x127a…129e at0013 = ╱4d╱M╱ // 0x128d @0x13
0x127a…129e at0014 = ╱45╱E╱ // 0x128e @0x14
0x127a…129e at0015 = ╱41╱A╱ // 0x128f @0x15
0x127a…129e at0016 = ╱4e╱N╱ // 0x1290 @0x16
0x127a…129e at0017 = ╱54╱T╱ // 0x1291 @0x17
0x127a…129e at0018 = ╱41╱A╱ // 0x1292 @0x18
0x127a…129e at0019 = ╱4c╱L╱ // 0x1293 @0x19
0x127a…129e at001a = ╱ec╱,╱ // 0x1294 @0x1a
0x127a…129e at001b = ╱50╱P╱ // 0x1295 @0x1b
0x127a…129e at001c = ╱ec╱,╱ // 0x1296 @0x1c
0x127a…129e at001d = ╱45╱E╱ // 0x1297 @0x1d
0x127a…129e at001e = ╱50╱P╱ // 0x1298 @0x1e
0x127a…129e at001f = ╱49╱I╱ // 0x1299 @0x1f
0x127a…129e at0020 = ╱4c╱L╱ // 0x129a @0x20
0x127a…129e at0021 = ╱33╱3╱ // 0x129b @0x21
0x127a…129e at0022 = ╱ee╱)╱ // 0x129c @0x22
0x127a…129e at0023 = EOL // 0x129d @0x23
0x127a…129e }
0x129e…12c4 a01b 2080 IF ETAB(EPIL3,E)<KONT THEN EPIL3=EPIL3+E
0x129e…12c4 LineComalBin {
0x129e…12c4 ptr = 0xa01b // 0x129e @0x0
0x129e…12c4 lno = 0x0820 // 0x12a0 @0x2
0x129e…12c4 at0004 = ╱82╱ IF ╱ // 0x12a2 @0x4
0x129e…12c4 at0005 = ╱45╱E╱ // 0x12a3 @0x5
0x129e…12c4 at0006 = ╱54╱T╱ // 0x12a4 @0x6
0x129e…12c4 at0007 = ╱41╱A╱ // 0x12a5 @0x7
0x129e…12c4 at0008 = ╱42╱B╱ // 0x12a6 @0x8
0x129e…12c4 at0009 = ╱ed╱(╱ // 0x12a7 @0x9
0x129e…12c4 at000a = ╱45╱E╱ // 0x12a8 @0xa
0x129e…12c4 at000b = ╱50╱P╱ // 0x12a9 @0xb
0x129e…12c4 at000c = ╱49╱I╱ // 0x12aa @0xc
0x129e…12c4 at000d = ╱4c╱L╱ // 0x12ab @0xd
0x129e…12c4 at000e = ╱33╱3╱ // 0x12ac @0xe
0x129e…12c4 at000f = ╱ec╱,╱ // 0x12ad @0xf
0x129e…12c4 at0010 = ╱45╱E╱ // 0x12ae @0x10
0x129e…12c4 at0011 = ╱ee╱)╱ // 0x12af @0x11
0x129e…12c4 at0012 = ╱dd╱<╱ // 0x12b0 @0x12
0x129e…12c4 at0013 = ╱4b╱K╱ // 0x12b1 @0x13
0x129e…12c4 at0014 = ╱4f╱O╱ // 0x12b2 @0x14
0x129e…12c4 at0015 = ╱4e╱N╱ // 0x12b3 @0x15
0x129e…12c4 at0016 = ╱54╱T╱ // 0x12b4 @0x16
0x129e…12c4 at0017 = ╱b6╱ THEN ╱ // 0x12b5 @0x17
0x129e…12c4 at0018 = ╱45╱E╱ // 0x12b6 @0x18
0x129e…12c4 at0019 = ╱50╱P╱ // 0x12b7 @0x19
0x129e…12c4 at001a = ╱49╱I╱ // 0x12b8 @0x1a
0x129e…12c4 at001b = ╱4c╱L╱ // 0x12b9 @0x1b
0x129e…12c4 at001c = ╱33╱3╱ // 0x12ba @0x1c
0x129e…12c4 at001d = ╱dc╱=╱ // 0x12bb @0x1d
0x129e…12c4 at001e = ╱45╱E╱ // 0x12bc @0x1e
0x129e…12c4 at001f = ╱50╱P╱ // 0x12bd @0x1f
0x129e…12c4 at0020 = ╱49╱I╱ // 0x12be @0x20
0x129e…12c4 at0021 = ╱4c╱L╱ // 0x12bf @0x21
0x129e…12c4 at0022 = ╱33╱3╱ // 0x12c0 @0x22
0x129e…12c4 at0023 = ╱e2╱+╱ // 0x12c1 @0x23
0x129e…12c4 at0024 = ╱45╱E╱ // 0x12c2 @0x24
0x129e…12c4 at0025 = EOL // 0x12c3 @0x25
0x129e…12c4 }
0x12c4…12d2 a029 2090 FRA=EPIL3
0x12c4…12d2 LineComalBin {
0x12c4…12d2 ptr = 0xa029 // 0x12c4 @0x0
0x12c4…12d2 lno = 0x082a // 0x12c6 @0x2
0x12c4…12d2 at0004 = ╱46╱F╱ // 0x12c8 @0x4
0x12c4…12d2 at0005 = ╱52╱R╱ // 0x12c9 @0x5
0x12c4…12d2 at0006 = ╱41╱A╱ // 0x12ca @0x6
0x12c4…12d2 at0007 = ╱dc╱=╱ // 0x12cb @0x7
0x12c4…12d2 at0008 = ╱45╱E╱ // 0x12cc @0x8
0x12c4…12d2 at0009 = ╱50╱P╱ // 0x12cd @0x9
0x12c4…12d2 at000a = ╱49╱I╱ // 0x12ce @0xa
0x12c4…12d2 at000b = ╱4c╱L╱ // 0x12cf @0xb
0x12c4…12d2 at000c = ╱33╱3╱ // 0x12d0 @0xc
0x12c4…12d2 at000d = EOL // 0x12d1 @0xd
0x12c4…12d2 }
0x12d2…12d8 a02f 2100 ENDIF
0x12d2…12d8 LineComalBin {
0x12d2…12d8 ptr = 0xa02f // 0x12d2 @0x0
0x12d2…12d8 lno = 0x0834 // 0x12d4 @0x2
0x12d2…12d8 at0004 = ╱9b╱ ENDIF ╱ // 0x12d6 @0x4
0x12d2…12d8 at0005 = EOL // 0x12d7 @0x5
0x12d2…12d8 }
0x12d8…12e6 a03d 2110 UNTIL FRA<=AENT
0x12d8…12e6 LineComalBin {
0x12d8…12e6 ptr = 0xa03d // 0x12d8 @0x0
0x12d8…12e6 lno = 0x083e // 0x12da @0x2
0x12d8…12e6 at0004 = ╱98╱ UNTIL ╱ // 0x12dc @0x4
0x12d8…12e6 at0005 = ╱46╱F╱ // 0x12dd @0x5
0x12d8…12e6 at0006 = ╱52╱R╱ // 0x12de @0x6
0x12d8…12e6 at0007 = ╱41╱A╱ // 0x12df @0x7
0x12d8…12e6 at0008 = ╱df╱<=╱ // 0x12e0 @0x8
0x12d8…12e6 at0009 = ╱41╱A╱ // 0x12e1 @0x9
0x12d8…12e6 at000a = ╱45╱E╱ // 0x12e2 @0xa
0x12d8…12e6 at000b = ╱4e╱N╱ // 0x12e3 @0xb
0x12d8…12e6 at000c = ╱54╱T╱ // 0x12e4 @0xc
0x12d8…12e6 at000d = EOL // 0x12e5 @0xd
0x12d8…12e6 }
0x12e6…12f0 a047 2120 IF P>B THEN
0x12e6…12f0 LineComalBin {
0x12e6…12f0 ptr = 0xa047 // 0x12e6 @0x0
0x12e6…12f0 lno = 0x0848 // 0x12e8 @0x2
0x12e6…12f0 at0004 = ╱9c╱ IF ╱ // 0x12ea @0x4
0x12e6…12f0 at0005 = ╱50╱P╱ // 0x12eb @0x5
0x12e6…12f0 at0006 = ╱de╱>╱ // 0x12ec @0x6
0x12e6…12f0 at0007 = ╱42╱B╱ // 0x12ed @0x7
0x12e6…12f0 at0008 = ╱b6╱ THEN ╱ // 0x12ee @0x8
0x12e6…12f0 at0009 = EOL // 0x12ef @0x9
0x12e6…12f0 }
0x12f0…12f6 a04d 2130 REPEAT
0x12f0…12f6 LineComalBin {
0x12f0…12f6 ptr = 0xa04d // 0x12f0 @0x0
0x12f0…12f6 lno = 0x0852 // 0x12f2 @0x2
0x12f0…12f6 at0004 = ╱97╱ REPEAT ╱ // 0x12f4 @0x4
0x12f0…12f6 at0005 = EOL // 0x12f5 @0x5
0x12f0…12f6 }
0x12f6…130b a062 2140 CURSOR 15,15
0x12f6…130b LineComalBin {
0x12f6…130b ptr = 0xa062 // 0x12f6 @0x0
0x12f6…130b lno = 0x085c // 0x12f8 @0x2
0x12f6…130b at0004 = ╱a1╱ CURSOR ╱ // 0x12fa @0x4
0x12f6…130b at0005 = ╱31╱1╱ // 0x12fb @0x5
0x12f6…130b at0006 = ╱35╱5╱ // 0x12fc @0x6
0x12f6…130b at0007 = ╱fe0000f004╱ // 0x12fd @0x7
0x12f6…130b at000c = ╱ec╱,╱ // 0x1302 @0xc
0x12f6…130b at000d = ╱31╱1╱ // 0x1303 @0xd
0x12f6…130b at000e = ╱35╱5╱ // 0x1304 @0xe
0x12f6…130b at000f = ╱fe0000f004╱ // 0x1305 @0xf
0x12f6…130b at0014 = EOL // 0x130a @0x14
0x12f6…130b }
0x130b…1331 a088 2150 PRINT "Til entreprisenr "
0x130b…1331 LineComalBin {
0x130b…1331 ptr = 0xa088 // 0x130b @0x0
0x130b…1331 lno = 0x0866 // 0x130d @0x2
0x130b…1331 at0004 = ╱92╱ PRINT ╱ // 0x130f @0x4
0x130b…1331 at0005 = ╱22╱"╱ // 0x1310 @0x5
0x130b…1331 at0006 = ╱54╱T╱ // 0x1311 @0x6
0x130b…1331 at0007 = ╱69╱i╱ // 0x1312 @0x7
0x130b…1331 at0008 = ╱6c╱l╱ // 0x1313 @0x8
0x130b…1331 at0009 = ╱20╱…╱ // 0x1314 @0x9
0x130b…1331 at000a = ╱65╱e╱ // 0x1315 @0xa
0x130b…1331 at000b = ╱6e╱n╱ // 0x1316 @0xb
0x130b…1331 at000c = ╱74╱t╱ // 0x1317 @0xc
0x130b…1331 at000d = ╱72╱r╱ // 0x1318 @0xd
0x130b…1331 at000e = ╱65╱e╱ // 0x1319 @0xe
0x130b…1331 at000f = ╱70╱p╱ // 0x131a @0xf
0x130b…1331 at0010 = ╱72╱r╱ // 0x131b @0x10
0x130b…1331 at0011 = ╱69╱i╱ // 0x131c @0x11
0x130b…1331 at0012 = ╱73╱s╱ // 0x131d @0x12
0x130b…1331 at0013 = ╱65╱e╱ // 0x131e @0x13
0x130b…1331 at0014 = ╱6e╱n╱ // 0x131f @0x14
0x130b…1331 at0015 = ╱72╱r╱ // 0x1320 @0x15
0x130b…1331 at0016 = ╱20╱…╱ // 0x1321 @0x16
0x130b…1331 at0017 = ╱20╱…╱ // 0x1322 @0x17
0x130b…1331 at0018 = ╱20╱…╱ // 0x1323 @0x18
0x130b…1331 at0019 = ╱20╱…╱ // 0x1324 @0x19
0x130b…1331 at001a = ╱20╱…╱ // 0x1325 @0x1a
0x130b…1331 at001b = ╱20╱…╱ // 0x1326 @0x1b
0x130b…1331 at001c = ╱20╱…╱ // 0x1327 @0x1c
0x130b…1331 at001d = ╱20╱…╱ // 0x1328 @0x1d
0x130b…1331 at001e = ╱20╱…╱ // 0x1329 @0x1e
0x130b…1331 at001f = ╱20╱…╱ // 0x132a @0x1f
0x130b…1331 at0020 = ╱20╱…╱ // 0x132b @0x20
0x130b…1331 at0021 = ╱20╱…╱ // 0x132c @0x21
0x130b…1331 at0022 = ╱20╱…╱ // 0x132d @0x22
0x130b…1331 at0023 = ╱20╱…╱ // 0x132e @0x23
0x130b…1331 at0024 = ╱22╱"╱ // 0x132f @0x24
0x130b…1331 at0025 = EOL // 0x1330 @0x25
0x130b…1331 }
0x1331…1346 a09d 2160 CURSOR 32,15
0x1331…1346 LineComalBin {
0x1331…1346 ptr = 0xa09d // 0x1331 @0x0
0x1331…1346 lno = 0x0870 // 0x1333 @0x2
0x1331…1346 at0004 = ╱a1╱ CURSOR ╱ // 0x1335 @0x4
0x1331…1346 at0005 = ╱33╱3╱ // 0x1336 @0x5
0x1331…1346 at0006 = ╱32╱2╱ // 0x1337 @0x6
0x1331…1346 at0007 = ╱fe00008006╱ // 0x1338 @0x7
0x1331…1346 at000c = ╱ec╱,╱ // 0x133d @0xc
0x1331…1346 at000d = ╱31╱1╱ // 0x133e @0xd
0x1331…1346 at000e = ╱35╱5╱ // 0x133f @0xe
0x1331…1346 at000f = ╱fe0000f004╱ // 0x1340 @0xf
0x1331…1346 at0014 = EOL // 0x1345 @0x14
0x1331…1346 }
0x1346…134e a0a5 2170 INPUT A$
0x1346…134e LineComalBin {
0x1346…134e ptr = 0xa0a5 // 0x1346 @0x0
0x1346…134e lno = 0x087a // 0x1348 @0x2
0x1346…134e at0004 = ╱91╱ INPUT ╱ // 0x134a @0x4
0x1346…134e at0005 = ╱41╱A╱ // 0x134b @0x5
0x1346…134e at0006 = ╱ef╱$╱ // 0x134c @0x6
0x1346…134e at0007 = EOL // 0x134d @0x7
0x1346…134e }
0x134e…135e a0b5 2180 EXEC NRTEST(A$)
0x134e…135e LineComalBin {
0x134e…135e ptr = 0xa0b5 // 0x134e @0x0
0x134e…135e lno = 0x0884 // 0x1350 @0x2
0x134e…135e at0004 = ╱9d╱ EXEC ╱ // 0x1352 @0x4
0x134e…135e at0005 = ╱4e╱N╱ // 0x1353 @0x5
0x134e…135e at0006 = ╱52╱R╱ // 0x1354 @0x6
0x134e…135e at0007 = ╱54╱T╱ // 0x1355 @0x7
0x134e…135e at0008 = ╱45╱E╱ // 0x1356 @0x8
0x134e…135e at0009 = ╱53╱S╱ // 0x1357 @0x9
0x134e…135e at000a = ╱54╱T╱ // 0x1358 @0xa
0x134e…135e at000b = ╱ed╱(╱ // 0x1359 @0xb
0x134e…135e at000c = ╱41╱A╱ // 0x135a @0xc
0x134e…135e at000d = ╱ef╱$╱ // 0x135b @0xd
0x134e…135e at000e = ╱ee╱)╱ // 0x135c @0xe
0x134e…135e at000f = EOL // 0x135d @0xf
0x134e…135e }
0x135e…1388 a0df 2190 UNTIL P>99 AND P<1000 AND P=>KONT AND TEST2=B
0x135e…1388 LineComalBin {
0x135e…1388 ptr = 0xa0df // 0x135e @0x0
0x135e…1388 lno = 0x088e // 0x1360 @0x2
0x135e…1388 at0004 = ╱98╱ UNTIL ╱ // 0x1362 @0x4
0x135e…1388 at0005 = ╱50╱P╱ // 0x1363 @0x5
0x135e…1388 at0006 = ╱de╱>╱ // 0x1364 @0x6
0x135e…1388 at0007 = ╱39╱9╱ // 0x1365 @0x7
0x135e…1388 at0008 = ╱39╱9╱ // 0x1366 @0x8
0x135e…1388 at0009 = ╱fe0000c607╱ // 0x1367 @0x9
0x135e…1388 at000e = ╱da╱ AND ╱ // 0x136c @0xe
0x135e…1388 at000f = ╱50╱P╱ // 0x136d @0xf
0x135e…1388 at0010 = ╱dd╱<╱ // 0x136e @0x10
0x135e…1388 at0011 = ╱31╱1╱ // 0x136f @0x11
0x135e…1388 at0012 = ╱30╱0╱ // 0x1370 @0x12
0x135e…1388 at0013 = ╱30╱0╱ // 0x1371 @0x13
0x135e…1388 at0014 = ╱30╱0╱ // 0x1372 @0x14
0x135e…1388 at0015 = ╱fe0000fa0a╱ // 0x1373 @0x15
0x135e…1388 at001a = ╱da╱ AND ╱ // 0x1378 @0x1a
0x135e…1388 at001b = ╱50╱P╱ // 0x1379 @0x1b
0x135e…1388 at001c = ╱e0╱=>╱ // 0x137a @0x1c
0x135e…1388 at001d = ╱4b╱K╱ // 0x137b @0x1d
0x135e…1388 at001e = ╱4f╱O╱ // 0x137c @0x1e
0x135e…1388 at001f = ╱4e╱N╱ // 0x137d @0x1f
0x135e…1388 at0020 = ╱54╱T╱ // 0x137e @0x20
0x135e…1388 at0021 = ╱da╱ AND ╱ // 0x137f @0x21
0x135e…1388 at0022 = ╱54╱T╱ // 0x1380 @0x22
0x135e…1388 at0023 = ╱45╱E╱ // 0x1381 @0x23
0x135e…1388 at0024 = ╱53╱S╱ // 0x1382 @0x24
0x135e…1388 at0025 = ╱54╱T╱ // 0x1383 @0x25
0x135e…1388 at0026 = ╱32╱2╱ // 0x1384 @0x26
0x135e…1388 at0027 = ╱dc╱=╱ // 0x1385 @0x27
0x135e…1388 at0028 = ╱42╱B╱ // 0x1386 @0x28
0x135e…1388 at0029 = EOL // 0x1387 @0x29
0x135e…1388 }
0x1388…13ac a103 2200 EXEC FINDPOST(ETAB,MEANTAL,P,EPIL3)
0x1388…13ac LineComalBin {
0x1388…13ac ptr = 0xa103 // 0x1388 @0x0
0x1388…13ac lno = 0x0898 // 0x138a @0x2
0x1388…13ac at0004 = ╱9d╱ EXEC ╱ // 0x138c @0x4
0x1388…13ac at0005 = ╱46╱F╱ // 0x138d @0x5
0x1388…13ac at0006 = ╱49╱I╱ // 0x138e @0x6
0x1388…13ac at0007 = ╱4e╱N╱ // 0x138f @0x7
0x1388…13ac at0008 = ╱44╱D╱ // 0x1390 @0x8
0x1388…13ac at0009 = ╱50╱P╱ // 0x1391 @0x9
0x1388…13ac at000a = ╱4f╱O╱ // 0x1392 @0xa
0x1388…13ac at000b = ╱53╱S╱ // 0x1393 @0xb
0x1388…13ac at000c = ╱54╱T╱ // 0x1394 @0xc
0x1388…13ac at000d = ╱ed╱(╱ // 0x1395 @0xd
0x1388…13ac at000e = ╱45╱E╱ // 0x1396 @0xe
0x1388…13ac at000f = ╱54╱T╱ // 0x1397 @0xf
0x1388…13ac at0010 = ╱41╱A╱ // 0x1398 @0x10
0x1388…13ac at0011 = ╱42╱B╱ // 0x1399 @0x11
0x1388…13ac at0012 = ╱ec╱,╱ // 0x139a @0x12
0x1388…13ac at0013 = ╱4d╱M╱ // 0x139b @0x13
0x1388…13ac at0014 = ╱45╱E╱ // 0x139c @0x14
0x1388…13ac at0015 = ╱41╱A╱ // 0x139d @0x15
0x1388…13ac at0016 = ╱4e╱N╱ // 0x139e @0x16
0x1388…13ac at0017 = ╱54╱T╱ // 0x139f @0x17
0x1388…13ac at0018 = ╱41╱A╱ // 0x13a0 @0x18
0x1388…13ac at0019 = ╱4c╱L╱ // 0x13a1 @0x19
0x1388…13ac at001a = ╱ec╱,╱ // 0x13a2 @0x1a
0x1388…13ac at001b = ╱50╱P╱ // 0x13a3 @0x1b
0x1388…13ac at001c = ╱ec╱,╱ // 0x13a4 @0x1c
0x1388…13ac at001d = ╱45╱E╱ // 0x13a5 @0x1d
0x1388…13ac at001e = ╱50╱P╱ // 0x13a6 @0x1e
0x1388…13ac at001f = ╱49╱I╱ // 0x13a7 @0x1f
0x1388…13ac at0020 = ╱4c╱L╱ // 0x13a8 @0x20
0x1388…13ac at0021 = ╱33╱3╱ // 0x13a9 @0x21
0x1388…13ac at0022 = ╱ee╱)╱ // 0x13aa @0x22
0x1388…13ac at0023 = EOL // 0x13ab @0x23
0x1388…13ac }
0x13ac…13cf a126 2210 IF ETAB(EPIL3,E)>P THEN EPIL3=EPIL3-E
0x13ac…13cf LineComalBin {
0x13ac…13cf ptr = 0xa126 // 0x13ac @0x0
0x13ac…13cf lno = 0x08a2 // 0x13ae @0x2
0x13ac…13cf at0004 = ╱82╱ IF ╱ // 0x13b0 @0x4
0x13ac…13cf at0005 = ╱45╱E╱ // 0x13b1 @0x5
0x13ac…13cf at0006 = ╱54╱T╱ // 0x13b2 @0x6
0x13ac…13cf at0007 = ╱41╱A╱ // 0x13b3 @0x7
0x13ac…13cf at0008 = ╱42╱B╱ // 0x13b4 @0x8
0x13ac…13cf at0009 = ╱ed╱(╱ // 0x13b5 @0x9
0x13ac…13cf at000a = ╱45╱E╱ // 0x13b6 @0xa
0x13ac…13cf at000b = ╱50╱P╱ // 0x13b7 @0xb
0x13ac…13cf at000c = ╱49╱I╱ // 0x13b8 @0xc
0x13ac…13cf at000d = ╱4c╱L╱ // 0x13b9 @0xd
0x13ac…13cf at000e = ╱33╱3╱ // 0x13ba @0xe
0x13ac…13cf at000f = ╱ec╱,╱ // 0x13bb @0xf
0x13ac…13cf at0010 = ╱45╱E╱ // 0x13bc @0x10
0x13ac…13cf at0011 = ╱ee╱)╱ // 0x13bd @0x11
0x13ac…13cf at0012 = ╱de╱>╱ // 0x13be @0x12
0x13ac…13cf at0013 = ╱50╱P╱ // 0x13bf @0x13
0x13ac…13cf at0014 = ╱b6╱ THEN ╱ // 0x13c0 @0x14
0x13ac…13cf at0015 = ╱45╱E╱ // 0x13c1 @0x15
0x13ac…13cf at0016 = ╱50╱P╱ // 0x13c2 @0x16
0x13ac…13cf at0017 = ╱49╱I╱ // 0x13c3 @0x17
0x13ac…13cf at0018 = ╱4c╱L╱ // 0x13c4 @0x18
0x13ac…13cf at0019 = ╱33╱3╱ // 0x13c5 @0x19
0x13ac…13cf at001a = ╱dc╱=╱ // 0x13c6 @0x1a
0x13ac…13cf at001b = ╱45╱E╱ // 0x13c7 @0x1b
0x13ac…13cf at001c = ╱50╱P╱ // 0x13c8 @0x1c
0x13ac…13cf at001d = ╱49╱I╱ // 0x13c9 @0x1d
0x13ac…13cf at001e = ╱4c╱L╱ // 0x13ca @0x1e
0x13ac…13cf at001f = ╱33╱3╱ // 0x13cb @0x1f
0x13ac…13cf at0020 = ╱e3╱-╱ // 0x13cc @0x20
0x13ac…13cf at0021 = ╱45╱E╱ // 0x13cd @0x21
0x13ac…13cf at0022 = EOL // 0x13ce @0x22
0x13ac…13cf }
0x13cf…13dd a134 2220 TIL=EPIL3
0x13cf…13dd LineComalBin {
0x13cf…13dd ptr = 0xa134 // 0x13cf @0x0
0x13cf…13dd lno = 0x08ac // 0x13d1 @0x2
0x13cf…13dd at0004 = ╱54╱T╱ // 0x13d3 @0x4
0x13cf…13dd at0005 = ╱49╱I╱ // 0x13d4 @0x5
0x13cf…13dd at0006 = ╱4c╱L╱ // 0x13d5 @0x6
0x13cf…13dd at0007 = ╱dc╱=╱ // 0x13d6 @0x7
0x13cf…13dd at0008 = ╱45╱E╱ // 0x13d7 @0x8
0x13cf…13dd at0009 = ╱50╱P╱ // 0x13d8 @0x9
0x13cf…13dd at000a = ╱49╱I╱ // 0x13d9 @0xa
0x13cf…13dd at000b = ╱4c╱L╱ // 0x13da @0xb
0x13cf…13dd at000c = ╱33╱3╱ // 0x13db @0xc
0x13cf…13dd at000d = EOL // 0x13dc @0xd
0x13cf…13dd }
0x13dd…13e3 a13a 2230 ENDIF
0x13dd…13e3 LineComalBin {
0x13dd…13e3 ptr = 0xa13a // 0x13dd @0x0
0x13dd…13e3 lno = 0x08b6 // 0x13df @0x2
0x13dd…13e3 at0004 = ╱9b╱ ENDIF ╱ // 0x13e1 @0x4
0x13dd…13e3 at0005 = EOL // 0x13e2 @0x5
0x13dd…13e3 }
0x13e3…13e9 a140 2240 CLEAR
0x13e3…13e9 LineComalBin {
0x13e3…13e9 ptr = 0xa140 // 0x13e3 @0x0
0x13e3…13e9 lno = 0x08c0 // 0x13e5 @0x2
0x13e3…13e9 at0004 = ╱a0╱ CLEAR ╱ // 0x13e7 @0x4
0x13e3…13e9 at0005 = EOL // 0x13e8 @0x5
0x13e3…13e9 }
0x13e9…13ef a146 2250 REPEAT
0x13e9…13ef LineComalBin {
0x13e9…13ef ptr = 0xa146 // 0x13e9 @0x0
0x13e9…13ef lno = 0x08ca // 0x13eb @0x2
0x13e9…13ef at0004 = ╱97╱ REPEAT ╱ // 0x13ed @0x4
0x13e9…13ef at0005 = EOL // 0x13ee @0x5
0x13e9…13ef }
0x13ef…1404 a15b 2260 CURSOR 15,13
0x13ef…1404 LineComalBin {
0x13ef…1404 ptr = 0xa15b // 0x13ef @0x0
0x13ef…1404 lno = 0x08d4 // 0x13f1 @0x2
0x13ef…1404 at0004 = ╱a1╱ CURSOR ╱ // 0x13f3 @0x4
0x13ef…1404 at0005 = ╱31╱1╱ // 0x13f4 @0x5
0x13ef…1404 at0006 = ╱35╱5╱ // 0x13f5 @0x6
0x13ef…1404 at0007 = ╱fe0000f004╱ // 0x13f6 @0x7
0x13ef…1404 at000c = ╱ec╱,╱ // 0x13fb @0xc
0x13ef…1404 at000d = ╱31╱1╱ // 0x13fc @0xd
0x13ef…1404 at000e = ╱33╱3╱ // 0x13fd @0xe
0x13ef…1404 at000f = ╱fe0000d004╱ // 0x13fe @0xf
0x13ef…1404 at0014 = EOL // 0x1403 @0x14
0x13ef…1404 }
0x1404…1442 a199 2270 INPUT "Monter papir til udskrift af balance og tast RETURN",A$
0x1404…1442 LineComalBin {
0x1404…1442 ptr = 0xa199 // 0x1404 @0x0
0x1404…1442 lno = 0x08de // 0x1406 @0x2
0x1404…1442 at0004 = ╱91╱ INPUT ╱ // 0x1408 @0x4
0x1404…1442 at0005 = ╱22╱"╱ // 0x1409 @0x5
0x1404…1442 at0006 = ╱4d╱M╱ // 0x140a @0x6
0x1404…1442 at0007 = ╱6f╱o╱ // 0x140b @0x7
0x1404…1442 at0008 = ╱6e╱n╱ // 0x140c @0x8
0x1404…1442 at0009 = ╱74╱t╱ // 0x140d @0x9
0x1404…1442 at000a = ╱65╱e╱ // 0x140e @0xa
0x1404…1442 at000b = ╱72╱r╱ // 0x140f @0xb
0x1404…1442 at000c = ╱20╱…╱ // 0x1410 @0xc
0x1404…1442 at000d = ╱70╱p╱ // 0x1411 @0xd
0x1404…1442 at000e = ╱61╱a╱ // 0x1412 @0xe
0x1404…1442 at000f = ╱70╱p╱ // 0x1413 @0xf
0x1404…1442 at0010 = ╱69╱i╱ // 0x1414 @0x10
0x1404…1442 at0011 = ╱72╱r╱ // 0x1415 @0x11
0x1404…1442 at0012 = ╱20╱…╱ // 0x1416 @0x12
0x1404…1442 at0013 = ╱74╱t╱ // 0x1417 @0x13
0x1404…1442 at0014 = ╱69╱i╱ // 0x1418 @0x14
0x1404…1442 at0015 = ╱6c╱l╱ // 0x1419 @0x15
0x1404…1442 at0016 = ╱20╱…╱ // 0x141a @0x16
0x1404…1442 at0017 = ╱75╱u╱ // 0x141b @0x17
0x1404…1442 at0018 = ╱64╱d╱ // 0x141c @0x18
0x1404…1442 at0019 = ╱73╱s╱ // 0x141d @0x19
0x1404…1442 at001a = ╱6b╱k╱ // 0x141e @0x1a
0x1404…1442 at001b = ╱72╱r╱ // 0x141f @0x1b
0x1404…1442 at001c = ╱69╱i╱ // 0x1420 @0x1c
0x1404…1442 at001d = ╱66╱f╱ // 0x1421 @0x1d
0x1404…1442 at001e = ╱74╱t╱ // 0x1422 @0x1e
0x1404…1442 at001f = ╱20╱…╱ // 0x1423 @0x1f
0x1404…1442 at0020 = ╱61╱a╱ // 0x1424 @0x20
0x1404…1442 at0021 = ╱66╱f╱ // 0x1425 @0x21
0x1404…1442 at0022 = ╱20╱…╱ // 0x1426 @0x22
0x1404…1442 at0023 = ╱62╱b╱ // 0x1427 @0x23
0x1404…1442 at0024 = ╱61╱a╱ // 0x1428 @0x24
0x1404…1442 at0025 = ╱6c╱l╱ // 0x1429 @0x25
0x1404…1442 at0026 = ╱61╱a╱ // 0x142a @0x26
0x1404…1442 at0027 = ╱6e╱n╱ // 0x142b @0x27
0x1404…1442 at0028 = ╱63╱c╱ // 0x142c @0x28
0x1404…1442 at0029 = ╱65╱e╱ // 0x142d @0x29
0x1404…1442 at002a = ╱20╱…╱ // 0x142e @0x2a
0x1404…1442 at002b = ╱6f╱o╱ // 0x142f @0x2b
0x1404…1442 at002c = ╱67╱g╱ // 0x1430 @0x2c
0x1404…1442 at002d = ╱20╱…╱ // 0x1431 @0x2d
0x1404…1442 at002e = ╱74╱t╱ // 0x1432 @0x2e
0x1404…1442 at002f = ╱61╱a╱ // 0x1433 @0x2f
0x1404…1442 at0030 = ╱73╱s╱ // 0x1434 @0x30
0x1404…1442 at0031 = ╱74╱t╱ // 0x1435 @0x31
0x1404…1442 at0032 = ╱20╱…╱ // 0x1436 @0x32
0x1404…1442 at0033 = ╱52╱R╱ // 0x1437 @0x33
0x1404…1442 at0034 = ╱45╱E╱ // 0x1438 @0x34
0x1404…1442 at0035 = ╱54╱T╱ // 0x1439 @0x35
0x1404…1442 at0036 = ╱55╱U╱ // 0x143a @0x36
0x1404…1442 at0037 = ╱52╱R╱ // 0x143b @0x37
0x1404…1442 at0038 = ╱4e╱N╱ // 0x143c @0x38
0x1404…1442 at0039 = ╱22╱"╱ // 0x143d @0x39
0x1404…1442 at003a = ╱ec╱,╱ // 0x143e @0x3a
0x1404…1442 at003b = ╱41╱A╱ // 0x143f @0x3b
0x1404…1442 at003c = ╱ef╱$╱ // 0x1440 @0x3c
0x1404…1442 at003d = EOL // 0x1441 @0x3d
0x1404…1442 }
0x1442…1456 a1ad 2280 UNTIL ORD(A$)=255
0x1442…1456 LineComalBin {
0x1442…1456 ptr = 0xa1ad // 0x1442 @0x0
0x1442…1456 lno = 0x08e8 // 0x1444 @0x2
0x1442…1456 at0004 = ╱98╱ UNTIL ╱ // 0x1446 @0x4
0x1442…1456 at0005 = ╱cd╱ORD╱ // 0x1447 @0x5
0x1442…1456 at0006 = ╱ed╱(╱ // 0x1448 @0x6
0x1442…1456 at0007 = ╱41╱A╱ // 0x1449 @0x7
0x1442…1456 at0008 = ╱ef╱$╱ // 0x144a @0x8
0x1442…1456 at0009 = ╱ee╱)╱ // 0x144b @0x9
0x1442…1456 at000a = ╱dc╱=╱ // 0x144c @0xa
0x1442…1456 at000b = ╱32╱2╱ // 0x144d @0xb
0x1442…1456 at000c = ╱35╱5╱ // 0x144e @0xc
0x1442…1456 at000d = ╱35╱5╱ // 0x144f @0xd
0x1442…1456 at000e = ╱fe0000ff08╱ // 0x1450 @0xe
0x1442…1456 at0013 = EOL // 0x1455 @0x13
0x1442…1456 }
0x1456…145d a1b4 2285 OUTPUT P
0x1456…145d LineComalBin {
0x1456…145d ptr = 0xa1b4 // 0x1456 @0x0
0x1456…145d lno = 0x08ed // 0x1458 @0x2
0x1456…145d at0004 = ╱a5╱ OUTPUT ╱ // 0x145a @0x4
0x1456…145d at0005 = ╱50╱P╱ // 0x145b @0x5
0x1456…145d at0006 = EOL // 0x145c @0x6
0x1456…145d }
0x145d…1470 a1c7 2290 FOR EPIL3=FRA TO TIL
0x145d…1470 LineComalBin {
0x145d…1470 ptr = 0xa1c7 // 0x145d @0x0
0x145d…1470 lno = 0x08f2 // 0x145f @0x2
0x145d…1470 at0004 = ╱83╱ FOR ╱ // 0x1461 @0x4
0x145d…1470 at0005 = ╱45╱E╱ // 0x1462 @0x5
0x145d…1470 at0006 = ╱50╱P╱ // 0x1463 @0x6
0x145d…1470 at0007 = ╱49╱I╱ // 0x1464 @0x7
0x145d…1470 at0008 = ╱4c╱L╱ // 0x1465 @0x8
0x145d…1470 at0009 = ╱33╱3╱ // 0x1466 @0x9
0x145d…1470 at000a = ╱dc╱=╱ // 0x1467 @0xa
0x145d…1470 at000b = ╱46╱F╱ // 0x1468 @0xb
0x145d…1470 at000c = ╱52╱R╱ // 0x1469 @0xc
0x145d…1470 at000d = ╱41╱A╱ // 0x146a @0xd
0x145d…1470 at000e = ╱b7╱ TO ╱ // 0x146b @0xe
0x145d…1470 at000f = ╱54╱T╱ // 0x146c @0xf
0x145d…1470 at0010 = ╱49╱I╱ // 0x146d @0x10
0x145d…1470 at0011 = ╱4c╱L╱ // 0x146e @0x11
0x145d…1470 at0012 = EOL // 0x146f @0x12
0x145d…1470 }
0x1470…1485 a1dc 2300 S1=ETAB(EPIL3,G)
0x1470…1485 LineComalBin {
0x1470…1485 ptr = 0xa1dc // 0x1470 @0x0
0x1470…1485 lno = 0x08fc // 0x1472 @0x2
0x1470…1485 at0004 = ╱53╱S╱ // 0x1474 @0x4
0x1470…1485 at0005 = ╱31╱1╱ // 0x1475 @0x5
0x1470…1485 at0006 = ╱dc╱=╱ // 0x1476 @0x6
0x1470…1485 at0007 = ╱45╱E╱ // 0x1477 @0x7
0x1470…1485 at0008 = ╱54╱T╱ // 0x1478 @0x8
0x1470…1485 at0009 = ╱41╱A╱ // 0x1479 @0x9
0x1470…1485 at000a = ╱42╱B╱ // 0x147a @0xa
0x1470…1485 at000b = ╱ed╱(╱ // 0x147b @0xb
0x1470…1485 at000c = ╱45╱E╱ // 0x147c @0xc
0x1470…1485 at000d = ╱50╱P╱ // 0x147d @0xd
0x1470…1485 at000e = ╱49╱I╱ // 0x147e @0xe
0x1470…1485 at000f = ╱4c╱L╱ // 0x147f @0xf
0x1470…1485 at0010 = ╱33╱3╱ // 0x1480 @0x10
0x1470…1485 at0011 = ╱ec╱,╱ // 0x1481 @0x11
0x1470…1485 at0012 = ╱47╱G╱ // 0x1482 @0x12
0x1470…1485 at0013 = ╱ee╱)╱ // 0x1483 @0x13
0x1470…1485 at0014 = EOL // 0x1484 @0x14
0x1470…1485 }
0x1485…14a3 a1fa 2310 GET K3$,S1:ENR,EMREG$,EÅREG$
0x1485…14a3 LineComalBin {
0x1485…14a3 ptr = 0xa1fa // 0x1485 @0x0
0x1485…14a3 lno = 0x0906 // 0x1487 @0x2
0x1485…14a3 at0004 = ╱a9╱ GET ╱ // 0x1489 @0x4
0x1485…14a3 at0005 = ╱4b╱K╱ // 0x148a @0x5
0x1485…14a3 at0006 = ╱33╱3╱ // 0x148b @0x6
0x1485…14a3 at0007 = ╱ef╱$╱ // 0x148c @0x7
0x1485…14a3 at0008 = ╱ec╱,╱ // 0x148d @0x8
0x1485…14a3 at0009 = ╱53╱S╱ // 0x148e @0x9
0x1485…14a3 at000a = ╱31╱1╱ // 0x148f @0xa
0x1485…14a3 at000b = ╱f0╱:╱ // 0x1490 @0xb
0x1485…14a3 at000c = ╱45╱E╱ // 0x1491 @0xc
0x1485…14a3 at000d = ╱4e╱N╱ // 0x1492 @0xd
0x1485…14a3 at000e = ╱52╱R╱ // 0x1493 @0xe
0x1485…14a3 at000f = ╱ec╱,╱ // 0x1494 @0xf
0x1485…14a3 at0010 = ╱45╱E╱ // 0x1495 @0x10
0x1485…14a3 at0011 = ╱4d╱M╱ // 0x1496 @0x11
0x1485…14a3 at0012 = ╱52╱R╱ // 0x1497 @0x12
0x1485…14a3 at0013 = ╱45╱E╱ // 0x1498 @0x13
0x1485…14a3 at0014 = ╱47╱G╱ // 0x1499 @0x14
0x1485…14a3 at0015 = ╱ef╱$╱ // 0x149a @0x15
0x1485…14a3 at0016 = ╱ec╱,╱ // 0x149b @0x16
0x1485…14a3 at0017 = ╱45╱E╱ // 0x149c @0x17
0x1485…14a3 at0018 = ╱5d╱Å╱ // 0x149d @0x18
0x1485…14a3 at0019 = ╱52╱R╱ // 0x149e @0x19
0x1485…14a3 at001a = ╱45╱E╱ // 0x149f @0x1a
0x1485…14a3 at001b = ╱47╱G╱ // 0x14a0 @0x1b
0x1485…14a3 at001c = ╱ef╱$╱ // 0x14a1 @0x1c
0x1485…14a3 at001d = EOL // 0x14a2 @0x1d
0x1485…14a3 }
0x14a3…14bc a213 2320 EXEC FEJL(99,E,K3$)
0x14a3…14bc LineComalBin {
0x14a3…14bc ptr = 0xa213 // 0x14a3 @0x0
0x14a3…14bc lno = 0x0910 // 0x14a5 @0x2
0x14a3…14bc at0004 = ╱9d╱ EXEC ╱ // 0x14a7 @0x4
0x14a3…14bc at0005 = ╱46╱F╱ // 0x14a8 @0x5
0x14a3…14bc at0006 = ╱45╱E╱ // 0x14a9 @0x6
0x14a3…14bc at0007 = ╱4a╱J╱ // 0x14aa @0x7
0x14a3…14bc at0008 = ╱4c╱L╱ // 0x14ab @0x8
0x14a3…14bc at0009 = ╱ed╱(╱ // 0x14ac @0x9
0x14a3…14bc at000a = ╱39╱9╱ // 0x14ad @0xa
0x14a3…14bc at000b = ╱39╱9╱ // 0x14ae @0xb
0x14a3…14bc at000c = ╱fe0000c607╱ // 0x14af @0xc
0x14a3…14bc at0011 = ╱ec╱,╱ // 0x14b4 @0x11
0x14a3…14bc at0012 = ╱45╱E╱ // 0x14b5 @0x12
0x14a3…14bc at0013 = ╱ec╱,╱ // 0x14b6 @0x13
0x14a3…14bc at0014 = ╱4b╱K╱ // 0x14b7 @0x14
0x14a3…14bc at0015 = ╱33╱3╱ // 0x14b8 @0x15
0x14a3…14bc at0016 = ╱ef╱$╱ // 0x14b9 @0x16
0x14a3…14bc at0017 = ╱ee╱)╱ // 0x14ba @0x17
0x14a3…14bc at0018 = EOL // 0x14bb @0x18
0x14a3…14bc }
0x14bc…14d1 a228 2330 GET K3$,S1+E:ENAVN$
0x14bc…14d1 LineComalBin {
0x14bc…14d1 ptr = 0xa228 // 0x14bc @0x0
0x14bc…14d1 lno = 0x091a // 0x14be @0x2
0x14bc…14d1 at0004 = ╱a9╱ GET ╱ // 0x14c0 @0x4
0x14bc…14d1 at0005 = ╱4b╱K╱ // 0x14c1 @0x5
0x14bc…14d1 at0006 = ╱33╱3╱ // 0x14c2 @0x6
0x14bc…14d1 at0007 = ╱ef╱$╱ // 0x14c3 @0x7
0x14bc…14d1 at0008 = ╱ec╱,╱ // 0x14c4 @0x8
0x14bc…14d1 at0009 = ╱53╱S╱ // 0x14c5 @0x9
0x14bc…14d1 at000a = ╱31╱1╱ // 0x14c6 @0xa
0x14bc…14d1 at000b = ╱e2╱+╱ // 0x14c7 @0xb
0x14bc…14d1 at000c = ╱45╱E╱ // 0x14c8 @0xc
0x14bc…14d1 at000d = ╱f0╱:╱ // 0x14c9 @0xd
0x14bc…14d1 at000e = ╱45╱E╱ // 0x14ca @0xe
0x14bc…14d1 at000f = ╱4e╱N╱ // 0x14cb @0xf
0x14bc…14d1 at0010 = ╱41╱A╱ // 0x14cc @0x10
0x14bc…14d1 at0011 = ╱56╱V╱ // 0x14cd @0x11
0x14bc…14d1 at0012 = ╱4e╱N╱ // 0x14ce @0x12
0x14bc…14d1 at0013 = ╱ef╱$╱ // 0x14cf @0x13
0x14bc…14d1 at0014 = EOL // 0x14d0 @0x14
0x14bc…14d1 }
0x14d1…14ea a241 2340 EXEC FEJL(99,G,K3$)
0x14d1…14ea LineComalBin {
0x14d1…14ea ptr = 0xa241 // 0x14d1 @0x0
0x14d1…14ea lno = 0x0924 // 0x14d3 @0x2
0x14d1…14ea at0004 = ╱9d╱ EXEC ╱ // 0x14d5 @0x4
0x14d1…14ea at0005 = ╱46╱F╱ // 0x14d6 @0x5
0x14d1…14ea at0006 = ╱45╱E╱ // 0x14d7 @0x6
0x14d1…14ea at0007 = ╱4a╱J╱ // 0x14d8 @0x7
0x14d1…14ea at0008 = ╱4c╱L╱ // 0x14d9 @0x8
0x14d1…14ea at0009 = ╱ed╱(╱ // 0x14da @0x9
0x14d1…14ea at000a = ╱39╱9╱ // 0x14db @0xa
0x14d1…14ea at000b = ╱39╱9╱ // 0x14dc @0xb
0x14d1…14ea at000c = ╱fe0000c607╱ // 0x14dd @0xc
0x14d1…14ea at0011 = ╱ec╱,╱ // 0x14e2 @0x11
0x14d1…14ea at0012 = ╱47╱G╱ // 0x14e3 @0x12
0x14d1…14ea at0013 = ╱ec╱,╱ // 0x14e4 @0x13
0x14d1…14ea at0014 = ╱4b╱K╱ // 0x14e5 @0x14
0x14d1…14ea at0015 = ╱33╱3╱ // 0x14e6 @0x15
0x14d1…14ea at0016 = ╱ef╱$╱ // 0x14e7 @0x16
0x14d1…14ea at0017 = ╱ee╱)╱ // 0x14e8 @0x17
0x14d1…14ea at0018 = EOL // 0x14e9 @0x18
0x14d1…14ea }
0x14ea…14fb a252 2350 FOR X=E TO MUNKANT
0x14ea…14fb LineComalBin {
0x14ea…14fb ptr = 0xa252 // 0x14ea @0x0
0x14ea…14fb lno = 0x092e // 0x14ec @0x2
0x14ea…14fb at0004 = ╱83╱ FOR ╱ // 0x14ee @0x4
0x14ea…14fb at0005 = ╱58╱X╱ // 0x14ef @0x5
0x14ea…14fb at0006 = ╱dc╱=╱ // 0x14f0 @0x6
0x14ea…14fb at0007 = ╱45╱E╱ // 0x14f1 @0x7
0x14ea…14fb at0008 = ╱b7╱ TO ╱ // 0x14f2 @0x8
0x14ea…14fb at0009 = ╱4d╱M╱ // 0x14f3 @0x9
0x14ea…14fb at000a = ╱55╱U╱ // 0x14f4 @0xa
0x14ea…14fb at000b = ╱4e╱N╱ // 0x14f5 @0xb
0x14ea…14fb at000c = ╱4b╱K╱ // 0x14f6 @0xc
0x14ea…14fb at000d = ╱41╱A╱ // 0x14f7 @0xd
0x14ea…14fb at000e = ╱4e╱N╱ // 0x14f8 @0xe
0x14ea…14fb at000f = ╱54╱T╱ // 0x14f9 @0xf
0x14ea…14fb at0010 = EOL // 0x14fa @0x10
0x14ea…14fb }
0x14fb…1521 a278 2360 GET K3$,S1+X+E:NR9,MBEV$(X),ÅBEV$(X)
0x14fb…1521 LineComalBin {
0x14fb…1521 ptr = 0xa278 // 0x14fb @0x0
0x14fb…1521 lno = 0x0938 // 0x14fd @0x2
0x14fb…1521 at0004 = ╱a9╱ GET ╱ // 0x14ff @0x4
0x14fb…1521 at0005 = ╱4b╱K╱ // 0x1500 @0x5
0x14fb…1521 at0006 = ╱33╱3╱ // 0x1501 @0x6
0x14fb…1521 at0007 = ╱ef╱$╱ // 0x1502 @0x7
0x14fb…1521 at0008 = ╱ec╱,╱ // 0x1503 @0x8
0x14fb…1521 at0009 = ╱53╱S╱ // 0x1504 @0x9
0x14fb…1521 at000a = ╱31╱1╱ // 0x1505 @0xa
0x14fb…1521 at000b = ╱e2╱+╱ // 0x1506 @0xb
0x14fb…1521 at000c = ╱58╱X╱ // 0x1507 @0xc
0x14fb…1521 at000d = ╱e2╱+╱ // 0x1508 @0xd
0x14fb…1521 at000e = ╱45╱E╱ // 0x1509 @0xe
0x14fb…1521 at000f = ╱f0╱:╱ // 0x150a @0xf
0x14fb…1521 at0010 = ╱4e╱N╱ // 0x150b @0x10
0x14fb…1521 at0011 = ╱52╱R╱ // 0x150c @0x11
0x14fb…1521 at0012 = ╱39╱9╱ // 0x150d @0x12
0x14fb…1521 at0013 = ╱ec╱,╱ // 0x150e @0x13
0x14fb…1521 at0014 = ╱4d╱M╱ // 0x150f @0x14
0x14fb…1521 at0015 = ╱42╱B╱ // 0x1510 @0x15
0x14fb…1521 at0016 = ╱45╱E╱ // 0x1511 @0x16
0x14fb…1521 at0017 = ╱56╱V╱ // 0x1512 @0x17
0x14fb…1521 at0018 = ╱ef╱$╱ // 0x1513 @0x18
0x14fb…1521 at0019 = ╱ed╱(╱ // 0x1514 @0x19
0x14fb…1521 at001a = ╱58╱X╱ // 0x1515 @0x1a
0x14fb…1521 at001b = ╱ee╱)╱ // 0x1516 @0x1b
0x14fb…1521 at001c = ╱ec╱,╱ // 0x1517 @0x1c
0x14fb…1521 at001d = ╱5d╱Å╱ // 0x1518 @0x1d
0x14fb…1521 at001e = ╱42╱B╱ // 0x1519 @0x1e
0x14fb…1521 at001f = ╱45╱E╱ // 0x151a @0x1f
0x14fb…1521 at0020 = ╱56╱V╱ // 0x151b @0x20
0x14fb…1521 at0021 = ╱ef╱$╱ // 0x151c @0x21
0x14fb…1521 at0022 = ╱ed╱(╱ // 0x151d @0x22
0x14fb…1521 at0023 = ╱58╱X╱ // 0x151e @0x23
0x14fb…1521 at0024 = ╱ee╱)╱ // 0x151f @0x24
0x14fb…1521 at0025 = EOL // 0x1520 @0x25
0x14fb…1521 }
0x1521…153a a291 2370 EXEC FEJL(99,V,K3$)
0x1521…153a LineComalBin {
0x1521…153a ptr = 0xa291 // 0x1521 @0x0
0x1521…153a lno = 0x0942 // 0x1523 @0x2
0x1521…153a at0004 = ╱9d╱ EXEC ╱ // 0x1525 @0x4
0x1521…153a at0005 = ╱46╱F╱ // 0x1526 @0x5
0x1521…153a at0006 = ╱45╱E╱ // 0x1527 @0x6
0x1521…153a at0007 = ╱4a╱J╱ // 0x1528 @0x7
0x1521…153a at0008 = ╱4c╱L╱ // 0x1529 @0x8
0x1521…153a at0009 = ╱ed╱(╱ // 0x152a @0x9
0x1521…153a at000a = ╱39╱9╱ // 0x152b @0xa
0x1521…153a at000b = ╱39╱9╱ // 0x152c @0xb
0x1521…153a at000c = ╱fe0000c607╱ // 0x152d @0xc
0x1521…153a at0011 = ╱ec╱,╱ // 0x1532 @0x11
0x1521…153a at0012 = ╱56╱V╱ // 0x1533 @0x12
0x1521…153a at0013 = ╱ec╱,╱ // 0x1534 @0x13
0x1521…153a at0014 = ╱4b╱K╱ // 0x1535 @0x14
0x1521…153a at0015 = ╱33╱3╱ // 0x1536 @0x15
0x1521…153a at0016 = ╱ef╱$╱ // 0x1537 @0x16
0x1521…153a at0017 = ╱ee╱)╱ // 0x1538 @0x17
0x1521…153a at0018 = EOL // 0x1539 @0x18
0x1521…153a }
0x153a…1541 a298 2380 NEXT X
0x153a…1541 LineComalBin {
0x153a…1541 ptr = 0xa298 // 0x153a @0x0
0x153a…1541 lno = 0x094c // 0x153c @0x2
0x153a…1541 at0004 = ╱84╱ NEXT ╱ // 0x153e @0x4
0x153a…1541 at0005 = ╱58╱X╱ // 0x153f @0x5
0x153a…1541 at0006 = EOL // 0x1540 @0x6
0x153a…1541 }
0x1541…158b a2e2 2390 BSIDE=E;GLNAVN$=BLANK$;LINIE=V;SALDO1$="0+";SALDO2$="0+";SALDO3$="0+"
0x1541…158b LineComalBin {
0x1541…158b ptr = 0xa2e2 // 0x1541 @0x0
0x1541…158b lno = 0x0956 // 0x1543 @0x2
0x1541…158b at0004 = ╱42╱B╱ // 0x1545 @0x4
0x1541…158b at0005 = ╱53╱S╱ // 0x1546 @0x5
0x1541…158b at0006 = ╱49╱I╱ // 0x1547 @0x6
0x1541…158b at0007 = ╱44╱D╱ // 0x1548 @0x7
0x1541…158b at0008 = ╱45╱E╱ // 0x1549 @0x8
0x1541…158b at0009 = ╱dc╱=╱ // 0x154a @0x9
0x1541…158b at000a = ╱45╱E╱ // 0x154b @0xa
0x1541…158b at000b = ╱eb╱;╱ // 0x154c @0xb
0x1541…158b at000c = ╱47╱G╱ // 0x154d @0xc
0x1541…158b at000d = ╱4c╱L╱ // 0x154e @0xd
0x1541…158b at000e = ╱4e╱N╱ // 0x154f @0xe
0x1541…158b at000f = ╱41╱A╱ // 0x1550 @0xf
0x1541…158b at0010 = ╱56╱V╱ // 0x1551 @0x10
0x1541…158b at0011 = ╱4e╱N╱ // 0x1552 @0x11
0x1541…158b at0012 = ╱ef╱$╱ // 0x1553 @0x12
0x1541…158b at0013 = ╱dc╱=╱ // 0x1554 @0x13
0x1541…158b at0014 = ╱42╱B╱ // 0x1555 @0x14
0x1541…158b at0015 = ╱4c╱L╱ // 0x1556 @0x15
0x1541…158b at0016 = ╱41╱A╱ // 0x1557 @0x16
0x1541…158b at0017 = ╱4e╱N╱ // 0x1558 @0x17
0x1541…158b at0018 = ╱4b╱K╱ // 0x1559 @0x18
0x1541…158b at0019 = ╱ef╱$╱ // 0x155a @0x19
0x1541…158b at001a = ╱eb╱;╱ // 0x155b @0x1a
0x1541…158b at001b = ╱4c╱L╱ // 0x155c @0x1b
0x1541…158b at001c = ╱49╱I╱ // 0x155d @0x1c
0x1541…158b at001d = ╱4e╱N╱ // 0x155e @0x1d
0x1541…158b at001e = ╱49╱I╱ // 0x155f @0x1e
0x1541…158b at001f = ╱45╱E╱ // 0x1560 @0x1f
0x1541…158b at0020 = ╱dc╱=╱ // 0x1561 @0x20
0x1541…158b at0021 = ╱56╱V╱ // 0x1562 @0x21
0x1541…158b at0022 = ╱eb╱;╱ // 0x1563 @0x22
0x1541…158b at0023 = ╱53╱S╱ // 0x1564 @0x23
0x1541…158b at0024 = ╱41╱A╱ // 0x1565 @0x24
0x1541…158b at0025 = ╱4c╱L╱ // 0x1566 @0x25
0x1541…158b at0026 = ╱44╱D╱ // 0x1567 @0x26
0x1541…158b at0027 = ╱4f╱O╱ // 0x1568 @0x27
0x1541…158b at0028 = ╱31╱1╱ // 0x1569 @0x28
0x1541…158b at0029 = ╱ef╱$╱ // 0x156a @0x29
0x1541…158b at002a = ╱dc╱=╱ // 0x156b @0x2a
0x1541…158b at002b = ╱22╱"╱ // 0x156c @0x2b
0x1541…158b at002c = ╱30╱0╱ // 0x156d @0x2c
0x1541…158b at002d = ╱2b╱+╱ // 0x156e @0x2d
0x1541…158b at002e = ╱22╱"╱ // 0x156f @0x2e
0x1541…158b at002f = ╱eb╱;╱ // 0x1570 @0x2f
0x1541…158b at0030 = ╱53╱S╱ // 0x1571 @0x30
0x1541…158b at0031 = ╱41╱A╱ // 0x1572 @0x31
0x1541…158b at0032 = ╱4c╱L╱ // 0x1573 @0x32
0x1541…158b at0033 = ╱44╱D╱ // 0x1574 @0x33
0x1541…158b at0034 = ╱4f╱O╱ // 0x1575 @0x34
0x1541…158b at0035 = ╱32╱2╱ // 0x1576 @0x35
0x1541…158b at0036 = ╱ef╱$╱ // 0x1577 @0x36
0x1541…158b at0037 = ╱dc╱=╱ // 0x1578 @0x37
0x1541…158b at0038 = ╱22╱"╱ // 0x1579 @0x38
0x1541…158b at0039 = ╱30╱0╱ // 0x157a @0x39
0x1541…158b at003a = ╱2b╱+╱ // 0x157b @0x3a
0x1541…158b at003b = ╱22╱"╱ // 0x157c @0x3b
0x1541…158b at003c = ╱eb╱;╱ // 0x157d @0x3c
0x1541…158b at003d = ╱53╱S╱ // 0x157e @0x3d
0x1541…158b at003e = ╱41╱A╱ // 0x157f @0x3e
0x1541…158b at003f = ╱4c╱L╱ // 0x1580 @0x3f
0x1541…158b at0040 = ╱44╱D╱ // 0x1581 @0x40
0x1541…158b at0041 = ╱4f╱O╱ // 0x1582 @0x41
0x1541…158b at0042 = ╱33╱3╱ // 0x1583 @0x42
0x1541…158b at0043 = ╱ef╱$╱ // 0x1584 @0x43
0x1541…158b at0044 = ╱dc╱=╱ // 0x1585 @0x44
0x1541…158b at0045 = ╱22╱"╱ // 0x1586 @0x45
0x1541…158b at0046 = ╱30╱0╱ // 0x1587 @0x46
0x1541…158b at0047 = ╱2b╱+╱ // 0x1588 @0x47
0x1541…158b at0048 = ╱22╱"╱ // 0x1589 @0x48
0x1541…158b at0049 = EOL // 0x158a @0x49
0x1541…158b }
0x158b…15d8 a32f 2400 SALDO3$="0+";SALDO11$="0+";SALDO12$="0+";SALDO13$="0+";TAL4$="0+";GFNR=B
0x158b…15d8 LineComalBin {
0x158b…15d8 ptr = 0xa32f // 0x158b @0x0
0x158b…15d8 lno = 0x0960 // 0x158d @0x2
0x158b…15d8 at0004 = ╱53╱S╱ // 0x158f @0x4
0x158b…15d8 at0005 = ╱41╱A╱ // 0x1590 @0x5
0x158b…15d8 at0006 = ╱4c╱L╱ // 0x1591 @0x6
0x158b…15d8 at0007 = ╱44╱D╱ // 0x1592 @0x7
0x158b…15d8 at0008 = ╱4f╱O╱ // 0x1593 @0x8
0x158b…15d8 at0009 = ╱33╱3╱ // 0x1594 @0x9
0x158b…15d8 at000a = ╱ef╱$╱ // 0x1595 @0xa
0x158b…15d8 at000b = ╱dc╱=╱ // 0x1596 @0xb
0x158b…15d8 at000c = ╱22╱"╱ // 0x1597 @0xc
0x158b…15d8 at000d = ╱30╱0╱ // 0x1598 @0xd
0x158b…15d8 at000e = ╱2b╱+╱ // 0x1599 @0xe
0x158b…15d8 at000f = ╱22╱"╱ // 0x159a @0xf
0x158b…15d8 at0010 = ╱eb╱;╱ // 0x159b @0x10
0x158b…15d8 at0011 = ╱53╱S╱ // 0x159c @0x11
0x158b…15d8 at0012 = ╱41╱A╱ // 0x159d @0x12
0x158b…15d8 at0013 = ╱4c╱L╱ // 0x159e @0x13
0x158b…15d8 at0014 = ╱44╱D╱ // 0x159f @0x14
0x158b…15d8 at0015 = ╱4f╱O╱ // 0x15a0 @0x15
0x158b…15d8 at0016 = ╱31╱1╱ // 0x15a1 @0x16
0x158b…15d8 at0017 = ╱31╱1╱ // 0x15a2 @0x17
0x158b…15d8 at0018 = ╱ef╱$╱ // 0x15a3 @0x18
0x158b…15d8 at0019 = ╱dc╱=╱ // 0x15a4 @0x19
0x158b…15d8 at001a = ╱22╱"╱ // 0x15a5 @0x1a
0x158b…15d8 at001b = ╱30╱0╱ // 0x15a6 @0x1b
0x158b…15d8 at001c = ╱2b╱+╱ // 0x15a7 @0x1c
0x158b…15d8 at001d = ╱22╱"╱ // 0x15a8 @0x1d
0x158b…15d8 at001e = ╱eb╱;╱ // 0x15a9 @0x1e
0x158b…15d8 at001f = ╱53╱S╱ // 0x15aa @0x1f
0x158b…15d8 at0020 = ╱41╱A╱ // 0x15ab @0x20
0x158b…15d8 at0021 = ╱4c╱L╱ // 0x15ac @0x21
0x158b…15d8 at0022 = ╱44╱D╱ // 0x15ad @0x22
0x158b…15d8 at0023 = ╱4f╱O╱ // 0x15ae @0x23
0x158b…15d8 at0024 = ╱31╱1╱ // 0x15af @0x24
0x158b…15d8 at0025 = ╱32╱2╱ // 0x15b0 @0x25
0x158b…15d8 at0026 = ╱ef╱$╱ // 0x15b1 @0x26
0x158b…15d8 at0027 = ╱dc╱=╱ // 0x15b2 @0x27
0x158b…15d8 at0028 = ╱22╱"╱ // 0x15b3 @0x28
0x158b…15d8 at0029 = ╱30╱0╱ // 0x15b4 @0x29
0x158b…15d8 at002a = ╱2b╱+╱ // 0x15b5 @0x2a
0x158b…15d8 at002b = ╱22╱"╱ // 0x15b6 @0x2b
0x158b…15d8 at002c = ╱eb╱;╱ // 0x15b7 @0x2c
0x158b…15d8 at002d = ╱53╱S╱ // 0x15b8 @0x2d
0x158b…15d8 at002e = ╱41╱A╱ // 0x15b9 @0x2e
0x158b…15d8 at002f = ╱4c╱L╱ // 0x15ba @0x2f
0x158b…15d8 at0030 = ╱44╱D╱ // 0x15bb @0x30
0x158b…15d8 at0031 = ╱4f╱O╱ // 0x15bc @0x31
0x158b…15d8 at0032 = ╱31╱1╱ // 0x15bd @0x32
0x158b…15d8 at0033 = ╱33╱3╱ // 0x15be @0x33
0x158b…15d8 at0034 = ╱ef╱$╱ // 0x15bf @0x34
0x158b…15d8 at0035 = ╱dc╱=╱ // 0x15c0 @0x35
0x158b…15d8 at0036 = ╱22╱"╱ // 0x15c1 @0x36
0x158b…15d8 at0037 = ╱30╱0╱ // 0x15c2 @0x37
0x158b…15d8 at0038 = ╱2b╱+╱ // 0x15c3 @0x38
0x158b…15d8 at0039 = ╱22╱"╱ // 0x15c4 @0x39
0x158b…15d8 at003a = ╱eb╱;╱ // 0x15c5 @0x3a
0x158b…15d8 at003b = ╱54╱T╱ // 0x15c6 @0x3b
0x158b…15d8 at003c = ╱41╱A╱ // 0x15c7 @0x3c
0x158b…15d8 at003d = ╱4c╱L╱ // 0x15c8 @0x3d
0x158b…15d8 at003e = ╱34╱4╱ // 0x15c9 @0x3e
0x158b…15d8 at003f = ╱ef╱$╱ // 0x15ca @0x3f
0x158b…15d8 at0040 = ╱dc╱=╱ // 0x15cb @0x40
0x158b…15d8 at0041 = ╱22╱"╱ // 0x15cc @0x41
0x158b…15d8 at0042 = ╱30╱0╱ // 0x15cd @0x42
0x158b…15d8 at0043 = ╱2b╱+╱ // 0x15ce @0x43
0x158b…15d8 at0044 = ╱22╱"╱ // 0x15cf @0x44
0x158b…15d8 at0045 = ╱eb╱;╱ // 0x15d0 @0x45
0x158b…15d8 at0046 = ╱47╱G╱ // 0x15d1 @0x46
0x158b…15d8 at0047 = ╱46╱F╱ // 0x15d2 @0x47
0x158b…15d8 at0048 = ╱4e╱N╱ // 0x15d3 @0x48
0x158b…15d8 at0049 = ╱52╱R╱ // 0x15d4 @0x49
0x158b…15d8 at004a = ╱dc╱=╱ // 0x15d5 @0x4a
0x158b…15d8 at004b = ╱42╱B╱ // 0x15d6 @0x4b
0x158b…15d8 at004c = EOL // 0x15d7 @0x4c
0x158b…15d8 }
0x15d8…1617 a36e 2410 SALDO4$="0+";SALDO14$="0+";GFNR1=B;GLNAVN1$=BLANK$;EPIL2=E
0x15d8…1617 LineComalBin {
0x15d8…1617 ptr = 0xa36e // 0x15d8 @0x0
0x15d8…1617 lno = 0x096a // 0x15da @0x2
0x15d8…1617 at0004 = ╱53╱S╱ // 0x15dc @0x4
0x15d8…1617 at0005 = ╱41╱A╱ // 0x15dd @0x5
0x15d8…1617 at0006 = ╱4c╱L╱ // 0x15de @0x6
0x15d8…1617 at0007 = ╱44╱D╱ // 0x15df @0x7
0x15d8…1617 at0008 = ╱4f╱O╱ // 0x15e0 @0x8
0x15d8…1617 at0009 = ╱34╱4╱ // 0x15e1 @0x9
0x15d8…1617 at000a = ╱ef╱$╱ // 0x15e2 @0xa
0x15d8…1617 at000b = ╱dc╱=╱ // 0x15e3 @0xb
0x15d8…1617 at000c = ╱22╱"╱ // 0x15e4 @0xc
0x15d8…1617 at000d = ╱30╱0╱ // 0x15e5 @0xd
0x15d8…1617 at000e = ╱2b╱+╱ // 0x15e6 @0xe
0x15d8…1617 at000f = ╱22╱"╱ // 0x15e7 @0xf
0x15d8…1617 at0010 = ╱eb╱;╱ // 0x15e8 @0x10
0x15d8…1617 at0011 = ╱53╱S╱ // 0x15e9 @0x11
0x15d8…1617 at0012 = ╱41╱A╱ // 0x15ea @0x12
0x15d8…1617 at0013 = ╱4c╱L╱ // 0x15eb @0x13
0x15d8…1617 at0014 = ╱44╱D╱ // 0x15ec @0x14
0x15d8…1617 at0015 = ╱4f╱O╱ // 0x15ed @0x15
0x15d8…1617 at0016 = ╱31╱1╱ // 0x15ee @0x16
0x15d8…1617 at0017 = ╱34╱4╱ // 0x15ef @0x17
0x15d8…1617 at0018 = ╱ef╱$╱ // 0x15f0 @0x18
0x15d8…1617 at0019 = ╱dc╱=╱ // 0x15f1 @0x19
0x15d8…1617 at001a = ╱22╱"╱ // 0x15f2 @0x1a
0x15d8…1617 at001b = ╱30╱0╱ // 0x15f3 @0x1b
0x15d8…1617 at001c = ╱2b╱+╱ // 0x15f4 @0x1c
0x15d8…1617 at001d = ╱22╱"╱ // 0x15f5 @0x1d
0x15d8…1617 at001e = ╱eb╱;╱ // 0x15f6 @0x1e
0x15d8…1617 at001f = ╱47╱G╱ // 0x15f7 @0x1f
0x15d8…1617 at0020 = ╱46╱F╱ // 0x15f8 @0x20
0x15d8…1617 at0021 = ╱4e╱N╱ // 0x15f9 @0x21
0x15d8…1617 at0022 = ╱52╱R╱ // 0x15fa @0x22
0x15d8…1617 at0023 = ╱31╱1╱ // 0x15fb @0x23
0x15d8…1617 at0024 = ╱dc╱=╱ // 0x15fc @0x24
0x15d8…1617 at0025 = ╱42╱B╱ // 0x15fd @0x25
0x15d8…1617 at0026 = ╱eb╱;╱ // 0x15fe @0x26
0x15d8…1617 at0027 = ╱47╱G╱ // 0x15ff @0x27
0x15d8…1617 at0028 = ╱4c╱L╱ // 0x1600 @0x28
0x15d8…1617 at0029 = ╱4e╱N╱ // 0x1601 @0x29
0x15d8…1617 at002a = ╱41╱A╱ // 0x1602 @0x2a
0x15d8…1617 at002b = ╱56╱V╱ // 0x1603 @0x2b
0x15d8…1617 at002c = ╱4e╱N╱ // 0x1604 @0x2c
0x15d8…1617 at002d = ╱31╱1╱ // 0x1605 @0x2d
0x15d8…1617 at002e = ╱ef╱$╱ // 0x1606 @0x2e
0x15d8…1617 at002f = ╱dc╱=╱ // 0x1607 @0x2f
0x15d8…1617 at0030 = ╱42╱B╱ // 0x1608 @0x30
0x15d8…1617 at0031 = ╱4c╱L╱ // 0x1609 @0x31
0x15d8…1617 at0032 = ╱41╱A╱ // 0x160a @0x32
0x15d8…1617 at0033 = ╱4e╱N╱ // 0x160b @0x33
0x15d8…1617 at0034 = ╱4b╱K╱ // 0x160c @0x34
0x15d8…1617 at0035 = ╱ef╱$╱ // 0x160d @0x35
0x15d8…1617 at0036 = ╱eb╱;╱ // 0x160e @0x36
0x15d8…1617 at0037 = ╱45╱E╱ // 0x160f @0x37
0x15d8…1617 at0038 = ╱50╱P╱ // 0x1610 @0x38
0x15d8…1617 at0039 = ╱49╱I╱ // 0x1611 @0x39
0x15d8…1617 at003a = ╱4c╱L╱ // 0x1612 @0x3a
0x15d8…1617 at003b = ╱32╱2╱ // 0x1613 @0x3b
0x15d8…1617 at003c = ╱dc╱=╱ // 0x1614 @0x3c
0x15d8…1617 at003d = ╱45╱E╱ // 0x1615 @0x3d
0x15d8…1617 at003e = EOL // 0x1616 @0x3e
0x15d8…1617 }
0x1617…1636 a38d 2430 EXEC HOVEDUD(T1(7),BSIDE)
0x1617…1636 LineComalBin {
0x1617…1636 ptr = 0xa38d // 0x1617 @0x0
0x1617…1636 lno = 0x097e // 0x1619 @0x2
0x1617…1636 at0004 = ╱9d╱ EXEC ╱ // 0x161b @0x4
0x1617…1636 at0005 = ╱48╱H╱ // 0x161c @0x5
0x1617…1636 at0006 = ╱4f╱O╱ // 0x161d @0x6
0x1617…1636 at0007 = ╱56╱V╱ // 0x161e @0x7
0x1617…1636 at0008 = ╱45╱E╱ // 0x161f @0x8
0x1617…1636 at0009 = ╱44╱D╱ // 0x1620 @0x9
0x1617…1636 at000a = ╱55╱U╱ // 0x1621 @0xa
0x1617…1636 at000b = ╱44╱D╱ // 0x1622 @0xb
0x1617…1636 at000c = ╱ed╱(╱ // 0x1623 @0xc
0x1617…1636 at000d = ╱54╱T╱ // 0x1624 @0xd
0x1617…1636 at000e = ╱31╱1╱ // 0x1625 @0xe
0x1617…1636 at000f = ╱ed╱(╱ // 0x1626 @0xf
0x1617…1636 at0010 = ╱37╱7╱ // 0x1627 @0x10
0x1617…1636 at0011 = ╱fe0000e003╱ // 0x1628 @0x11
0x1617…1636 at0016 = ╱ee╱)╱ // 0x162d @0x16
0x1617…1636 at0017 = ╱ec╱,╱ // 0x162e @0x17
0x1617…1636 at0018 = ╱42╱B╱ // 0x162f @0x18
0x1617…1636 at0019 = ╱53╱S╱ // 0x1630 @0x19
0x1617…1636 at001a = ╱49╱I╱ // 0x1631 @0x1a
0x1617…1636 at001b = ╱44╱D╱ // 0x1632 @0x1b
0x1617…1636 at001c = ╱45╱E╱ // 0x1633 @0x1c
0x1617…1636 at001d = ╱ee╱)╱ // 0x1634 @0x1d
0x1617…1636 at001e = EOL // 0x1635 @0x1e
0x1617…1636 }
0x1636…164f a3a6 2440 FOR EPIL1=E TO ETOT+AUNK+E
0x1636…164f LineComalBin {
0x1636…164f ptr = 0xa3a6 // 0x1636 @0x0
0x1636…164f lno = 0x0988 // 0x1638 @0x2
0x1636…164f at0004 = ╱83╱ FOR ╱ // 0x163a @0x4
0x1636…164f at0005 = ╱45╱E╱ // 0x163b @0x5
0x1636…164f at0006 = ╱50╱P╱ // 0x163c @0x6
0x1636…164f at0007 = ╱49╱I╱ // 0x163d @0x7
0x1636…164f at0008 = ╱4c╱L╱ // 0x163e @0x8
0x1636…164f at0009 = ╱31╱1╱ // 0x163f @0x9
0x1636…164f at000a = ╱dc╱=╱ // 0x1640 @0xa
0x1636…164f at000b = ╱45╱E╱ // 0x1641 @0xb
0x1636…164f at000c = ╱b7╱ TO ╱ // 0x1642 @0xc
0x1636…164f at000d = ╱45╱E╱ // 0x1643 @0xd
0x1636…164f at000e = ╱54╱T╱ // 0x1644 @0xe
0x1636…164f at000f = ╱4f╱O╱ // 0x1645 @0xf
0x1636…164f at0010 = ╱54╱T╱ // 0x1646 @0x10
0x1636…164f at0011 = ╱e2╱+╱ // 0x1647 @0x11
0x1636…164f at0012 = ╱41╱A╱ // 0x1648 @0x12
0x1636…164f at0013 = ╱55╱U╱ // 0x1649 @0x13
0x1636…164f at0014 = ╱4e╱N╱ // 0x164a @0x14
0x1636…164f at0015 = ╱4b╱K╱ // 0x164b @0x15
0x1636…164f at0016 = ╱e2╱+╱ // 0x164c @0x16
0x1636…164f at0017 = ╱45╱E╱ // 0x164d @0x17
0x1636…164f at0018 = EOL // 0x164e @0x18
0x1636…164f }
0x164f…1667 a3be 2450 IF EPIL1<ETOT+AUNK+E THEN
0x164f…1667 LineComalBin {
0x164f…1667 ptr = 0xa3be // 0x164f @0x0
0x164f…1667 lno = 0x0992 // 0x1651 @0x2
0x164f…1667 at0004 = ╱9c╱ IF ╱ // 0x1653 @0x4
0x164f…1667 at0005 = ╱45╱E╱ // 0x1654 @0x5
0x164f…1667 at0006 = ╱50╱P╱ // 0x1655 @0x6
0x164f…1667 at0007 = ╱49╱I╱ // 0x1656 @0x7
0x164f…1667 at0008 = ╱4c╱L╱ // 0x1657 @0x8
0x164f…1667 at0009 = ╱31╱1╱ // 0x1658 @0x9
0x164f…1667 at000a = ╱dd╱<╱ // 0x1659 @0xa
0x164f…1667 at000b = ╱45╱E╱ // 0x165a @0xb
0x164f…1667 at000c = ╱54╱T╱ // 0x165b @0xc
0x164f…1667 at000d = ╱4f╱O╱ // 0x165c @0xd
0x164f…1667 at000e = ╱54╱T╱ // 0x165d @0xe
0x164f…1667 at000f = ╱e2╱+╱ // 0x165e @0xf
0x164f…1667 at0010 = ╱41╱A╱ // 0x165f @0x10
0x164f…1667 at0011 = ╱55╱U╱ // 0x1660 @0x11
0x164f…1667 at0012 = ╱4e╱N╱ // 0x1661 @0x12
0x164f…1667 at0013 = ╱4b╱K╱ // 0x1662 @0x13
0x164f…1667 at0014 = ╱e2╱+╱ // 0x1663 @0x14
0x164f…1667 at0015 = ╱45╱E╱ // 0x1664 @0x15
0x164f…1667 at0016 = ╱b6╱ THEN ╱ // 0x1665 @0x16
0x164f…1667 at0017 = EOL // 0x1666 @0x17
0x164f…1667 }
0x1667…16ae a405 2460 FNR=UNR(EPIL1);FGRUP=INT(ORD(EU$(EPIL1)))-48;FNAVN$=UNAVN$(EPIL1)
0x1667…16ae LineComalBin {
0x1667…16ae ptr = 0xa405 // 0x1667 @0x0
0x1667…16ae lno = 0x099c // 0x1669 @0x2
0x1667…16ae at0004 = ╱46╱F╱ // 0x166b @0x4
0x1667…16ae at0005 = ╱4e╱N╱ // 0x166c @0x5
0x1667…16ae at0006 = ╱52╱R╱ // 0x166d @0x6
0x1667…16ae at0007 = ╱dc╱=╱ // 0x166e @0x7
0x1667…16ae at0008 = ╱55╱U╱ // 0x166f @0x8
0x1667…16ae at0009 = ╱4e╱N╱ // 0x1670 @0x9
0x1667…16ae at000a = ╱52╱R╱ // 0x1671 @0xa
0x1667…16ae at000b = ╱ed╱(╱ // 0x1672 @0xb
0x1667…16ae at000c = ╱45╱E╱ // 0x1673 @0xc
0x1667…16ae at000d = ╱50╱P╱ // 0x1674 @0xd
0x1667…16ae at000e = ╱49╱I╱ // 0x1675 @0xe
0x1667…16ae at000f = ╱4c╱L╱ // 0x1676 @0xf
0x1667…16ae at0010 = ╱31╱1╱ // 0x1677 @0x10
0x1667…16ae at0011 = ╱ee╱)╱ // 0x1678 @0x11
0x1667…16ae at0012 = ╱eb╱;╱ // 0x1679 @0x12
0x1667…16ae at0013 = ╱46╱F╱ // 0x167a @0x13
0x1667…16ae at0014 = ╱47╱G╱ // 0x167b @0x14
0x1667…16ae at0015 = ╱52╱R╱ // 0x167c @0x15
0x1667…16ae at0016 = ╱55╱U╱ // 0x167d @0x16
0x1667…16ae at0017 = ╱50╱P╱ // 0x167e @0x17
0x1667…16ae at0018 = ╱dc╱=╱ // 0x167f @0x18
0x1667…16ae at0019 = ╱c6╱INT╱ // 0x1680 @0x19
0x1667…16ae at001a = ╱ed╱(╱ // 0x1681 @0x1a
0x1667…16ae at001b = ╱cd╱ORD╱ // 0x1682 @0x1b
0x1667…16ae at001c = ╱ed╱(╱ // 0x1683 @0x1c
0x1667…16ae at001d = ╱45╱E╱ // 0x1684 @0x1d
0x1667…16ae at001e = ╱55╱U╱ // 0x1685 @0x1e
0x1667…16ae at001f = ╱ef╱$╱ // 0x1686 @0x1f
0x1667…16ae at0020 = ╱ed╱(╱ // 0x1687 @0x20
0x1667…16ae at0021 = ╱45╱E╱ // 0x1688 @0x21
0x1667…16ae at0022 = ╱50╱P╱ // 0x1689 @0x22
0x1667…16ae at0023 = ╱49╱I╱ // 0x168a @0x23
0x1667…16ae at0024 = ╱4c╱L╱ // 0x168b @0x24
0x1667…16ae at0025 = ╱31╱1╱ // 0x168c @0x25
0x1667…16ae at0026 = ╱ee╱)╱ // 0x168d @0x26
0x1667…16ae at0027 = ╱ee╱)╱ // 0x168e @0x27
0x1667…16ae at0028 = ╱ee╱)╱ // 0x168f @0x28
0x1667…16ae at0029 = ╱e3╱-╱ // 0x1690 @0x29
0x1667…16ae at002a = ╱34╱4╱ // 0x1691 @0x2a
0x1667…16ae at002b = ╱38╱8╱ // 0x1692 @0x2b
0x1667…16ae at002c = ╱fe0000c006╱ // 0x1693 @0x2c
0x1667…16ae at0031 = ╱eb╱;╱ // 0x1698 @0x31
0x1667…16ae at0032 = ╱46╱F╱ // 0x1699 @0x32
0x1667…16ae at0033 = ╱4e╱N╱ // 0x169a @0x33
0x1667…16ae at0034 = ╱41╱A╱ // 0x169b @0x34
0x1667…16ae at0035 = ╱56╱V╱ // 0x169c @0x35
0x1667…16ae at0036 = ╱4e╱N╱ // 0x169d @0x36
0x1667…16ae at0037 = ╱ef╱$╱ // 0x169e @0x37
0x1667…16ae at0038 = ╱dc╱=╱ // 0x169f @0x38
0x1667…16ae at0039 = ╱55╱U╱ // 0x16a0 @0x39
0x1667…16ae at003a = ╱4e╱N╱ // 0x16a1 @0x3a
0x1667…16ae at003b = ╱41╱A╱ // 0x16a2 @0x3b
0x1667…16ae at003c = ╱56╱V╱ // 0x16a3 @0x3c
0x1667…16ae at003d = ╱4e╱N╱ // 0x16a4 @0x3d
0x1667…16ae at003e = ╱ef╱$╱ // 0x16a5 @0x3e
0x1667…16ae at003f = ╱ed╱(╱ // 0x16a6 @0x3f
0x1667…16ae at0040 = ╱45╱E╱ // 0x16a7 @0x40
0x1667…16ae at0041 = ╱50╱P╱ // 0x16a8 @0x41
0x1667…16ae at0042 = ╱49╱I╱ // 0x16a9 @0x42
0x1667…16ae at0043 = ╱4c╱L╱ // 0x16aa @0x43
0x1667…16ae at0044 = ╱31╱1╱ // 0x16ab @0x44
0x1667…16ae at0045 = ╱ee╱)╱ // 0x16ac @0x45
0x1667…16ae at0046 = EOL // 0x16ad @0x46
0x1667…16ae }
0x16ae…16ef a446 2470 IF FGRUP=B THEN FMDK$=MBEV$(EPIL2);FÅDK$=ÅBEV$(EPIL2);EPIL2=EPIL2+E
0x16ae…16ef LineComalBin {
0x16ae…16ef ptr = 0xa446 // 0x16ae @0x0
0x16ae…16ef lno = 0x09a6 // 0x16b0 @0x2
0x16ae…16ef at0004 = ╱82╱ IF ╱ // 0x16b2 @0x4
0x16ae…16ef at0005 = ╱46╱F╱ // 0x16b3 @0x5
0x16ae…16ef at0006 = ╱47╱G╱ // 0x16b4 @0x6
0x16ae…16ef at0007 = ╱52╱R╱ // 0x16b5 @0x7
0x16ae…16ef at0008 = ╱55╱U╱ // 0x16b6 @0x8
0x16ae…16ef at0009 = ╱50╱P╱ // 0x16b7 @0x9
0x16ae…16ef at000a = ╱dc╱=╱ // 0x16b8 @0xa
0x16ae…16ef at000b = ╱42╱B╱ // 0x16b9 @0xb
0x16ae…16ef at000c = ╱b6╱ THEN ╱ // 0x16ba @0xc
0x16ae…16ef at000d = ╱46╱F╱ // 0x16bb @0xd
0x16ae…16ef at000e = ╱4d╱M╱ // 0x16bc @0xe
0x16ae…16ef at000f = ╱44╱D╱ // 0x16bd @0xf
0x16ae…16ef at0010 = ╱4b╱K╱ // 0x16be @0x10
0x16ae…16ef at0011 = ╱ef╱$╱ // 0x16bf @0x11
0x16ae…16ef at0012 = ╱dc╱=╱ // 0x16c0 @0x12
0x16ae…16ef at0013 = ╱4d╱M╱ // 0x16c1 @0x13
0x16ae…16ef at0014 = ╱42╱B╱ // 0x16c2 @0x14
0x16ae…16ef at0015 = ╱45╱E╱ // 0x16c3 @0x15
0x16ae…16ef at0016 = ╱56╱V╱ // 0x16c4 @0x16
0x16ae…16ef at0017 = ╱ef╱$╱ // 0x16c5 @0x17
0x16ae…16ef at0018 = ╱ed╱(╱ // 0x16c6 @0x18
0x16ae…16ef at0019 = ╱45╱E╱ // 0x16c7 @0x19
0x16ae…16ef at001a = ╱50╱P╱ // 0x16c8 @0x1a
0x16ae…16ef at001b = ╱49╱I╱ // 0x16c9 @0x1b
0x16ae…16ef at001c = ╱4c╱L╱ // 0x16ca @0x1c
0x16ae…16ef at001d = ╱32╱2╱ // 0x16cb @0x1d
0x16ae…16ef at001e = ╱ee╱)╱ // 0x16cc @0x1e
0x16ae…16ef at001f = ╱eb╱;╱ // 0x16cd @0x1f
0x16ae…16ef at0020 = ╱46╱F╱ // 0x16ce @0x20
0x16ae…16ef at0021 = ╱5d╱Å╱ // 0x16cf @0x21
0x16ae…16ef at0022 = ╱44╱D╱ // 0x16d0 @0x22
0x16ae…16ef at0023 = ╱4b╱K╱ // 0x16d1 @0x23
0x16ae…16ef at0024 = ╱ef╱$╱ // 0x16d2 @0x24
0x16ae…16ef at0025 = ╱dc╱=╱ // 0x16d3 @0x25
0x16ae…16ef at0026 = ╱5d╱Å╱ // 0x16d4 @0x26
0x16ae…16ef at0027 = ╱42╱B╱ // 0x16d5 @0x27
0x16ae…16ef at0028 = ╱45╱E╱ // 0x16d6 @0x28
0x16ae…16ef at0029 = ╱56╱V╱ // 0x16d7 @0x29
0x16ae…16ef at002a = ╱ef╱$╱ // 0x16d8 @0x2a
0x16ae…16ef at002b = ╱ed╱(╱ // 0x16d9 @0x2b
0x16ae…16ef at002c = ╱45╱E╱ // 0x16da @0x2c
0x16ae…16ef at002d = ╱50╱P╱ // 0x16db @0x2d
0x16ae…16ef at002e = ╱49╱I╱ // 0x16dc @0x2e
0x16ae…16ef at002f = ╱4c╱L╱ // 0x16dd @0x2f
0x16ae…16ef at0030 = ╱32╱2╱ // 0x16de @0x30
0x16ae…16ef at0031 = ╱ee╱)╱ // 0x16df @0x31
0x16ae…16ef at0032 = ╱eb╱;╱ // 0x16e0 @0x32
0x16ae…16ef at0033 = ╱45╱E╱ // 0x16e1 @0x33
0x16ae…16ef at0034 = ╱50╱P╱ // 0x16e2 @0x34
0x16ae…16ef at0035 = ╱49╱I╱ // 0x16e3 @0x35
0x16ae…16ef at0036 = ╱4c╱L╱ // 0x16e4 @0x36
0x16ae…16ef at0037 = ╱32╱2╱ // 0x16e5 @0x37
0x16ae…16ef at0038 = ╱dc╱=╱ // 0x16e6 @0x38
0x16ae…16ef at0039 = ╱45╱E╱ // 0x16e7 @0x39
0x16ae…16ef at003a = ╱50╱P╱ // 0x16e8 @0x3a
0x16ae…16ef at003b = ╱49╱I╱ // 0x16e9 @0x3b
0x16ae…16ef at003c = ╱4c╱L╱ // 0x16ea @0x3c
0x16ae…16ef at003d = ╱32╱2╱ // 0x16eb @0x3d
0x16ae…16ef at003e = ╱e2╱+╱ // 0x16ec @0x3e
0x16ae…16ef at003f = ╱45╱E╱ // 0x16ed @0x3f
0x16ae…16ef at0040 = EOL // 0x16ee @0x40
0x16ae…16ef }
0x16ef…16f5 a44c 2480 ELSE
0x16ef…16f5 LineComalBin {
0x16ef…16f5 ptr = 0xa44c // 0x16ef @0x0
0x16ef…16f5 lno = 0x09b0 // 0x16f1 @0x2
0x16ef…16f5 at0004 = ╱9a╱ ELSE ╱ // 0x16f3 @0x4
0x16ef…16f5 at0005 = EOL // 0x16f4 @0x5
0x16ef…16f5 }
0x16f5…173b a492 2490 FNR=99;FGRUP=B;FMDK$=EMREG$;FÅDK$=EÅREG$;FNAVN$="Regulering"
0x16f5…173b LineComalBin {
0x16f5…173b ptr = 0xa492 // 0x16f5 @0x0
0x16f5…173b lno = 0x09ba // 0x16f7 @0x2
0x16f5…173b at0004 = ╱46╱F╱ // 0x16f9 @0x4
0x16f5…173b at0005 = ╱4e╱N╱ // 0x16fa @0x5
0x16f5…173b at0006 = ╱52╱R╱ // 0x16fb @0x6
0x16f5…173b at0007 = ╱dc╱=╱ // 0x16fc @0x7
0x16f5…173b at0008 = ╱39╱9╱ // 0x16fd @0x8
0x16f5…173b at0009 = ╱39╱9╱ // 0x16fe @0x9
0x16f5…173b at000a = ╱fe0000c607╱ // 0x16ff @0xa
0x16f5…173b at000f = ╱eb╱;╱ // 0x1704 @0xf
0x16f5…173b at0010 = ╱46╱F╱ // 0x1705 @0x10
0x16f5…173b at0011 = ╱47╱G╱ // 0x1706 @0x11
0x16f5…173b at0012 = ╱52╱R╱ // 0x1707 @0x12
0x16f5…173b at0013 = ╱55╱U╱ // 0x1708 @0x13
0x16f5…173b at0014 = ╱50╱P╱ // 0x1709 @0x14
0x16f5…173b at0015 = ╱dc╱=╱ // 0x170a @0x15
0x16f5…173b at0016 = ╱42╱B╱ // 0x170b @0x16
0x16f5…173b at0017 = ╱eb╱;╱ // 0x170c @0x17
0x16f5…173b at0018 = ╱46╱F╱ // 0x170d @0x18
0x16f5…173b at0019 = ╱4d╱M╱ // 0x170e @0x19
0x16f5…173b at001a = ╱44╱D╱ // 0x170f @0x1a
0x16f5…173b at001b = ╱4b╱K╱ // 0x1710 @0x1b
0x16f5…173b at001c = ╱ef╱$╱ // 0x1711 @0x1c
0x16f5…173b at001d = ╱dc╱=╱ // 0x1712 @0x1d
0x16f5…173b at001e = ╱45╱E╱ // 0x1713 @0x1e
0x16f5…173b at001f = ╱4d╱M╱ // 0x1714 @0x1f
0x16f5…173b at0020 = ╱52╱R╱ // 0x1715 @0x20
0x16f5…173b at0021 = ╱45╱E╱ // 0x1716 @0x21
0x16f5…173b at0022 = ╱47╱G╱ // 0x1717 @0x22
0x16f5…173b at0023 = ╱ef╱$╱ // 0x1718 @0x23
0x16f5…173b at0024 = ╱eb╱;╱ // 0x1719 @0x24
0x16f5…173b at0025 = ╱46╱F╱ // 0x171a @0x25
0x16f5…173b at0026 = ╱5d╱Å╱ // 0x171b @0x26
0x16f5…173b at0027 = ╱44╱D╱ // 0x171c @0x27
0x16f5…173b at0028 = ╱4b╱K╱ // 0x171d @0x28
0x16f5…173b at0029 = ╱ef╱$╱ // 0x171e @0x29
0x16f5…173b at002a = ╱dc╱=╱ // 0x171f @0x2a
0x16f5…173b at002b = ╱45╱E╱ // 0x1720 @0x2b
0x16f5…173b at002c = ╱5d╱Å╱ // 0x1721 @0x2c
0x16f5…173b at002d = ╱52╱R╱ // 0x1722 @0x2d
0x16f5…173b at002e = ╱45╱E╱ // 0x1723 @0x2e
0x16f5…173b at002f = ╱47╱G╱ // 0x1724 @0x2f
0x16f5…173b at0030 = ╱ef╱$╱ // 0x1725 @0x30
0x16f5…173b at0031 = ╱eb╱;╱ // 0x1726 @0x31
0x16f5…173b at0032 = ╱46╱F╱ // 0x1727 @0x32
0x16f5…173b at0033 = ╱4e╱N╱ // 0x1728 @0x33
0x16f5…173b at0034 = ╱41╱A╱ // 0x1729 @0x34
0x16f5…173b at0035 = ╱56╱V╱ // 0x172a @0x35
0x16f5…173b at0036 = ╱4e╱N╱ // 0x172b @0x36
0x16f5…173b at0037 = ╱ef╱$╱ // 0x172c @0x37
0x16f5…173b at0038 = ╱dc╱=╱ // 0x172d @0x38
0x16f5…173b at0039 = ╱22╱"╱ // 0x172e @0x39
0x16f5…173b at003a = ╱52╱R╱ // 0x172f @0x3a
0x16f5…173b at003b = ╱65╱e╱ // 0x1730 @0x3b
0x16f5…173b at003c = ╱67╱g╱ // 0x1731 @0x3c
0x16f5…173b at003d = ╱75╱u╱ // 0x1732 @0x3d
0x16f5…173b at003e = ╱6c╱l╱ // 0x1733 @0x3e
0x16f5…173b at003f = ╱65╱e╱ // 0x1734 @0x3f
0x16f5…173b at0040 = ╱72╱r╱ // 0x1735 @0x40
0x16f5…173b at0041 = ╱69╱i╱ // 0x1736 @0x41
0x16f5…173b at0042 = ╱6e╱n╱ // 0x1737 @0x42
0x16f5…173b at0043 = ╱67╱g╱ // 0x1738 @0x43
0x16f5…173b at0044 = ╱22╱"╱ // 0x1739 @0x44
0x16f5…173b at0045 = EOL // 0x173a @0x45
0x16f5…173b }
0x173b…1741 a498 2500 ENDIF
0x173b…1741 LineComalBin {
0x173b…1741 ptr = 0xa498 // 0x173b @0x0
0x173b…1741 lno = 0x09c4 // 0x173d @0x2
0x173b…1741 at0004 = ╱9b╱ ENDIF ╱ // 0x173f @0x4
0x173b…1741 at0005 = EOL // 0x1740 @0x5
0x173b…1741 }
0x1741…174e a4a5 2510 CASE FGRUP OF
0x1741…174e LineComalBin {
0x1741…174e ptr = 0xa4a5 // 0x1741 @0x0
0x1741…174e lno = 0x09ce // 0x1743 @0x2
0x1741…174e at0004 = ╱a201╱ CASE ╱ // 0x1745 @0x4
0x1741…174e at0006 = ╱46╱F╱ // 0x1747 @0x6
0x1741…174e at0007 = ╱47╱G╱ // 0x1748 @0x7
0x1741…174e at0008 = ╱52╱R╱ // 0x1749 @0x8
0x1741…174e at0009 = ╱55╱U╱ // 0x174a @0x9
0x1741…174e at000a = ╱50╱P╱ // 0x174b @0xa
0x1741…174e at000b = ╱ba╱ OF ╱ // 0x174c @0xb
0x1741…174e at000c = EOL // 0x174d @0xc
0x1741…174e }
0x174e…1754 a4ab 2520 STOP
0x174e…1754 LineComalBin {
0x174e…1754 ptr = 0xa4ab // 0x174e @0x0
0x174e…1754 lno = 0x09d8 // 0x1750 @0x2
0x174e…1754 at0004 = ╱8d╱ STOP ╱ // 0x1752 @0x4
0x174e…1754 at0005 = EOL // 0x1753 @0x5
0x174e…1754 }
0x1754…175c a4b3 2530 WHEN B
0x1754…175c LineComalBin {
0x1754…175c ptr = 0xa4b3 // 0x1754 @0x0
0x1754…175c lno = 0x09e2 // 0x1756 @0x2
0x1754…175c at0004 = ╱a301╱ WHEN ╱ // 0x1758 @0x4
0x1754…175c at0006 = ╱42╱B╱ // 0x175a @0x6
0x1754…175c at0007 = EOL // 0x175b @0x7
0x1754…175c }
0x175c…1785 a4dc 2540 IF LINIE>39 THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x175c…1785 LineComalBin {
0x175c…1785 ptr = 0xa4dc // 0x175c @0x0
0x175c…1785 lno = 0x09ec // 0x175e @0x2
0x175c…1785 at0004 = ╱82╱ IF ╱ // 0x1760 @0x4
0x175c…1785 at0005 = ╱4c╱L╱ // 0x1761 @0x5
0x175c…1785 at0006 = ╱49╱I╱ // 0x1762 @0x6
0x175c…1785 at0007 = ╱4e╱N╱ // 0x1763 @0x7
0x175c…1785 at0008 = ╱49╱I╱ // 0x1764 @0x8
0x175c…1785 at0009 = ╱45╱E╱ // 0x1765 @0x9
0x175c…1785 at000a = ╱de╱>╱ // 0x1766 @0xa
0x175c…1785 at000b = ╱33╱3╱ // 0x1767 @0xb
0x175c…1785 at000c = ╱39╱9╱ // 0x1768 @0xc
0x175c…1785 at000d = ╱fe00009c06╱ // 0x1769 @0xd
0x175c…1785 at0012 = ╱b6╱ THEN ╱ // 0x176e @0x12
0x175c…1785 at0013 = ╱9d╱ EXEC ╱ // 0x176f @0x13
0x175c…1785 at0014 = ╱4e╱N╱ // 0x1770 @0x14
0x175c…1785 at0015 = ╱59╱Y╱ // 0x1771 @0x15
0x175c…1785 at0016 = ╱53╱S╱ // 0x1772 @0x16
0x175c…1785 at0017 = ╱49╱I╱ // 0x1773 @0x17
0x175c…1785 at0018 = ╱44╱D╱ // 0x1774 @0x18
0x175c…1785 at0019 = ╱45╱E╱ // 0x1775 @0x19
0x175c…1785 at001a = ╱ed╱(╱ // 0x1776 @0x1a
0x175c…1785 at001b = ╱47╱G╱ // 0x1777 @0x1b
0x175c…1785 at001c = ╱46╱F╱ // 0x1778 @0x1c
0x175c…1785 at001d = ╱4e╱N╱ // 0x1779 @0x1d
0x175c…1785 at001e = ╱52╱R╱ // 0x177a @0x1e
0x175c…1785 at001f = ╱ec╱,╱ // 0x177b @0x1f
0x175c…1785 at0020 = ╱47╱G╱ // 0x177c @0x20
0x175c…1785 at0021 = ╱4c╱L╱ // 0x177d @0x21
0x175c…1785 at0022 = ╱4e╱N╱ // 0x177e @0x22
0x175c…1785 at0023 = ╱41╱A╱ // 0x177f @0x23
0x175c…1785 at0024 = ╱56╱V╱ // 0x1780 @0x24
0x175c…1785 at0025 = ╱4e╱N╱ // 0x1781 @0x25
0x175c…1785 at0026 = ╱ef╱$╱ // 0x1782 @0x26
0x175c…1785 at0027 = ╱ee╱)╱ // 0x1783 @0x27
0x175c…1785 at0028 = EOL // 0x1784 @0x28
0x175c…1785 }
0x1785…17aa a501 2550 EXEC LINIEUD(FNR,FNAVN$,FMDK$,FÅDK$)
0x1785…17aa LineComalBin {
0x1785…17aa ptr = 0xa501 // 0x1785 @0x0
0x1785…17aa lno = 0x09f6 // 0x1787 @0x2
0x1785…17aa at0004 = ╱9d╱ EXEC ╱ // 0x1789 @0x4
0x1785…17aa at0005 = ╱4c╱L╱ // 0x178a @0x5
0x1785…17aa at0006 = ╱49╱I╱ // 0x178b @0x6
0x1785…17aa at0007 = ╱4e╱N╱ // 0x178c @0x7
0x1785…17aa at0008 = ╱49╱I╱ // 0x178d @0x8
0x1785…17aa at0009 = ╱45╱E╱ // 0x178e @0x9
0x1785…17aa at000a = ╱55╱U╱ // 0x178f @0xa
0x1785…17aa at000b = ╱44╱D╱ // 0x1790 @0xb
0x1785…17aa at000c = ╱ed╱(╱ // 0x1791 @0xc
0x1785…17aa at000d = ╱46╱F╱ // 0x1792 @0xd
0x1785…17aa at000e = ╱4e╱N╱ // 0x1793 @0xe
0x1785…17aa at000f = ╱52╱R╱ // 0x1794 @0xf
0x1785…17aa at0010 = ╱ec╱,╱ // 0x1795 @0x10
0x1785…17aa at0011 = ╱46╱F╱ // 0x1796 @0x11
0x1785…17aa at0012 = ╱4e╱N╱ // 0x1797 @0x12
0x1785…17aa at0013 = ╱41╱A╱ // 0x1798 @0x13
0x1785…17aa at0014 = ╱56╱V╱ // 0x1799 @0x14
0x1785…17aa at0015 = ╱4e╱N╱ // 0x179a @0x15
0x1785…17aa at0016 = ╱ef╱$╱ // 0x179b @0x16
0x1785…17aa at0017 = ╱ec╱,╱ // 0x179c @0x17
0x1785…17aa at0018 = ╱46╱F╱ // 0x179d @0x18
0x1785…17aa at0019 = ╱4d╱M╱ // 0x179e @0x19
0x1785…17aa at001a = ╱44╱D╱ // 0x179f @0x1a
0x1785…17aa at001b = ╱4b╱K╱ // 0x17a0 @0x1b
0x1785…17aa at001c = ╱ef╱$╱ // 0x17a1 @0x1c
0x1785…17aa at001d = ╱ec╱,╱ // 0x17a2 @0x1d
0x1785…17aa at001e = ╱46╱F╱ // 0x17a3 @0x1e
0x1785…17aa at001f = ╱5d╱Å╱ // 0x17a4 @0x1f
0x1785…17aa at0020 = ╱44╱D╱ // 0x17a5 @0x20
0x1785…17aa at0021 = ╱4b╱K╱ // 0x17a6 @0x21
0x1785…17aa at0022 = ╱ef╱$╱ // 0x17a7 @0x22
0x1785…17aa at0023 = ╱ee╱)╱ // 0x17a8 @0x23
0x1785…17aa at0024 = EOL // 0x17a9 @0x24
0x1785…17aa }
0x17aa…17bc a513 2560 LINIE=LINIE+E
0x17aa…17bc LineComalBin {
0x17aa…17bc ptr = 0xa513 // 0x17aa @0x0
0x17aa…17bc lno = 0x0a00 // 0x17ac @0x2
0x17aa…17bc at0004 = ╱4c╱L╱ // 0x17ae @0x4
0x17aa…17bc at0005 = ╱49╱I╱ // 0x17af @0x5
0x17aa…17bc at0006 = ╱4e╱N╱ // 0x17b0 @0x6
0x17aa…17bc at0007 = ╱49╱I╱ // 0x17b1 @0x7
0x17aa…17bc at0008 = ╱45╱E╱ // 0x17b2 @0x8
0x17aa…17bc at0009 = ╱dc╱=╱ // 0x17b3 @0x9
0x17aa…17bc at000a = ╱4c╱L╱ // 0x17b4 @0xa
0x17aa…17bc at000b = ╱49╱I╱ // 0x17b5 @0xb
0x17aa…17bc at000c = ╱4e╱N╱ // 0x17b6 @0xc
0x17aa…17bc at000d = ╱49╱I╱ // 0x17b7 @0xd
0x17aa…17bc at000e = ╱45╱E╱ // 0x17b8 @0xe
0x17aa…17bc at000f = ╱e2╱+╱ // 0x17b9 @0xf
0x17aa…17bc at0010 = ╱45╱E╱ // 0x17ba @0x10
0x17aa…17bc at0011 = EOL // 0x17bb @0x11
0x17aa…17bc }
0x17bc…17df a536 2570 EXEC CALC(B,SALDO1$,FMDK$,SALDO1$)
0x17bc…17df LineComalBin {
0x17bc…17df ptr = 0xa536 // 0x17bc @0x0
0x17bc…17df lno = 0x0a0a // 0x17be @0x2
0x17bc…17df at0004 = ╱9d╱ EXEC ╱ // 0x17c0 @0x4
0x17bc…17df at0005 = ╱43╱C╱ // 0x17c1 @0x5
0x17bc…17df at0006 = ╱41╱A╱ // 0x17c2 @0x6
0x17bc…17df at0007 = ╱4c╱L╱ // 0x17c3 @0x7
0x17bc…17df at0008 = ╱43╱C╱ // 0x17c4 @0x8
0x17bc…17df at0009 = ╱ed╱(╱ // 0x17c5 @0x9
0x17bc…17df at000a = ╱42╱B╱ // 0x17c6 @0xa
0x17bc…17df at000b = ╱ec╱,╱ // 0x17c7 @0xb
0x17bc…17df at000c = ╱53╱S╱ // 0x17c8 @0xc
0x17bc…17df at000d = ╱41╱A╱ // 0x17c9 @0xd
0x17bc…17df at000e = ╱4c╱L╱ // 0x17ca @0xe
0x17bc…17df at000f = ╱44╱D╱ // 0x17cb @0xf
0x17bc…17df at0010 = ╱4f╱O╱ // 0x17cc @0x10
0x17bc…17df at0011 = ╱31╱1╱ // 0x17cd @0x11
0x17bc…17df at0012 = ╱ef╱$╱ // 0x17ce @0x12
0x17bc…17df at0013 = ╱ec╱,╱ // 0x17cf @0x13
0x17bc…17df at0014 = ╱46╱F╱ // 0x17d0 @0x14
0x17bc…17df at0015 = ╱4d╱M╱ // 0x17d1 @0x15
0x17bc…17df at0016 = ╱44╱D╱ // 0x17d2 @0x16
0x17bc…17df at0017 = ╱4b╱K╱ // 0x17d3 @0x17
0x17bc…17df at0018 = ╱ef╱$╱ // 0x17d4 @0x18
0x17bc…17df at0019 = ╱ec╱,╱ // 0x17d5 @0x19
0x17bc…17df at001a = ╱53╱S╱ // 0x17d6 @0x1a
0x17bc…17df at001b = ╱41╱A╱ // 0x17d7 @0x1b
0x17bc…17df at001c = ╱4c╱L╱ // 0x17d8 @0x1c
0x17bc…17df at001d = ╱44╱D╱ // 0x17d9 @0x1d
0x17bc…17df at001e = ╱4f╱O╱ // 0x17da @0x1e
0x17bc…17df at001f = ╱31╱1╱ // 0x17db @0x1f
0x17bc…17df at0020 = ╱ef╱$╱ // 0x17dc @0x20
0x17bc…17df at0021 = ╱ee╱)╱ // 0x17dd @0x21
0x17bc…17df at0022 = EOL // 0x17de @0x22
0x17bc…17df }
0x17df…1804 a55b 2580 EXEC CALC(B,SALDO11$,FÅDK$,SALDO11$)
0x17df…1804 LineComalBin {
0x17df…1804 ptr = 0xa55b // 0x17df @0x0
0x17df…1804 lno = 0x0a14 // 0x17e1 @0x2
0x17df…1804 at0004 = ╱9d╱ EXEC ╱ // 0x17e3 @0x4
0x17df…1804 at0005 = ╱43╱C╱ // 0x17e4 @0x5
0x17df…1804 at0006 = ╱41╱A╱ // 0x17e5 @0x6
0x17df…1804 at0007 = ╱4c╱L╱ // 0x17e6 @0x7
0x17df…1804 at0008 = ╱43╱C╱ // 0x17e7 @0x8
0x17df…1804 at0009 = ╱ed╱(╱ // 0x17e8 @0x9
0x17df…1804 at000a = ╱42╱B╱ // 0x17e9 @0xa
0x17df…1804 at000b = ╱ec╱,╱ // 0x17ea @0xb
0x17df…1804 at000c = ╱53╱S╱ // 0x17eb @0xc
0x17df…1804 at000d = ╱41╱A╱ // 0x17ec @0xd
0x17df…1804 at000e = ╱4c╱L╱ // 0x17ed @0xe
0x17df…1804 at000f = ╱44╱D╱ // 0x17ee @0xf
0x17df…1804 at0010 = ╱4f╱O╱ // 0x17ef @0x10
0x17df…1804 at0011 = ╱31╱1╱ // 0x17f0 @0x11
0x17df…1804 at0012 = ╱31╱1╱ // 0x17f1 @0x12
0x17df…1804 at0013 = ╱ef╱$╱ // 0x17f2 @0x13
0x17df…1804 at0014 = ╱ec╱,╱ // 0x17f3 @0x14
0x17df…1804 at0015 = ╱46╱F╱ // 0x17f4 @0x15
0x17df…1804 at0016 = ╱5d╱Å╱ // 0x17f5 @0x16
0x17df…1804 at0017 = ╱44╱D╱ // 0x17f6 @0x17
0x17df…1804 at0018 = ╱4b╱K╱ // 0x17f7 @0x18
0x17df…1804 at0019 = ╱ef╱$╱ // 0x17f8 @0x19
0x17df…1804 at001a = ╱ec╱,╱ // 0x17f9 @0x1a
0x17df…1804 at001b = ╱53╱S╱ // 0x17fa @0x1b
0x17df…1804 at001c = ╱41╱A╱ // 0x17fb @0x1c
0x17df…1804 at001d = ╱4c╱L╱ // 0x17fc @0x1d
0x17df…1804 at001e = ╱44╱D╱ // 0x17fd @0x1e
0x17df…1804 at001f = ╱4f╱O╱ // 0x17fe @0x1f
0x17df…1804 at0020 = ╱31╱1╱ // 0x17ff @0x20
0x17df…1804 at0021 = ╱31╱1╱ // 0x1800 @0x21
0x17df…1804 at0022 = ╱ef╱$╱ // 0x1801 @0x22
0x17df…1804 at0023 = ╱ee╱)╱ // 0x1802 @0x23
0x17df…1804 at0024 = EOL // 0x1803 @0x24
0x17df…1804 }
0x1804…1827 a57e 2590 EXEC CALC(B,SALDO2$,FMDK$,SALDO2$)
0x1804…1827 LineComalBin {
0x1804…1827 ptr = 0xa57e // 0x1804 @0x0
0x1804…1827 lno = 0x0a1e // 0x1806 @0x2
0x1804…1827 at0004 = ╱9d╱ EXEC ╱ // 0x1808 @0x4
0x1804…1827 at0005 = ╱43╱C╱ // 0x1809 @0x5
0x1804…1827 at0006 = ╱41╱A╱ // 0x180a @0x6
0x1804…1827 at0007 = ╱4c╱L╱ // 0x180b @0x7
0x1804…1827 at0008 = ╱43╱C╱ // 0x180c @0x8
0x1804…1827 at0009 = ╱ed╱(╱ // 0x180d @0x9
0x1804…1827 at000a = ╱42╱B╱ // 0x180e @0xa
0x1804…1827 at000b = ╱ec╱,╱ // 0x180f @0xb
0x1804…1827 at000c = ╱53╱S╱ // 0x1810 @0xc
0x1804…1827 at000d = ╱41╱A╱ // 0x1811 @0xd
0x1804…1827 at000e = ╱4c╱L╱ // 0x1812 @0xe
0x1804…1827 at000f = ╱44╱D╱ // 0x1813 @0xf
0x1804…1827 at0010 = ╱4f╱O╱ // 0x1814 @0x10
0x1804…1827 at0011 = ╱32╱2╱ // 0x1815 @0x11
0x1804…1827 at0012 = ╱ef╱$╱ // 0x1816 @0x12
0x1804…1827 at0013 = ╱ec╱,╱ // 0x1817 @0x13
0x1804…1827 at0014 = ╱46╱F╱ // 0x1818 @0x14
0x1804…1827 at0015 = ╱4d╱M╱ // 0x1819 @0x15
0x1804…1827 at0016 = ╱44╱D╱ // 0x181a @0x16
0x1804…1827 at0017 = ╱4b╱K╱ // 0x181b @0x17
0x1804…1827 at0018 = ╱ef╱$╱ // 0x181c @0x18
0x1804…1827 at0019 = ╱ec╱,╱ // 0x181d @0x19
0x1804…1827 at001a = ╱53╱S╱ // 0x181e @0x1a
0x1804…1827 at001b = ╱41╱A╱ // 0x181f @0x1b
0x1804…1827 at001c = ╱4c╱L╱ // 0x1820 @0x1c
0x1804…1827 at001d = ╱44╱D╱ // 0x1821 @0x1d
0x1804…1827 at001e = ╱4f╱O╱ // 0x1822 @0x1e
0x1804…1827 at001f = ╱32╱2╱ // 0x1823 @0x1f
0x1804…1827 at0020 = ╱ef╱$╱ // 0x1824 @0x20
0x1804…1827 at0021 = ╱ee╱)╱ // 0x1825 @0x21
0x1804…1827 at0022 = EOL // 0x1826 @0x22
0x1804…1827 }
0x1827…184c a5a3 2600 EXEC CALC(B,SALDO12$,FÅDK$,SALDO12$)
0x1827…184c LineComalBin {
0x1827…184c ptr = 0xa5a3 // 0x1827 @0x0
0x1827…184c lno = 0x0a28 // 0x1829 @0x2
0x1827…184c at0004 = ╱9d╱ EXEC ╱ // 0x182b @0x4
0x1827…184c at0005 = ╱43╱C╱ // 0x182c @0x5
0x1827…184c at0006 = ╱41╱A╱ // 0x182d @0x6
0x1827…184c at0007 = ╱4c╱L╱ // 0x182e @0x7
0x1827…184c at0008 = ╱43╱C╱ // 0x182f @0x8
0x1827…184c at0009 = ╱ed╱(╱ // 0x1830 @0x9
0x1827…184c at000a = ╱42╱B╱ // 0x1831 @0xa
0x1827…184c at000b = ╱ec╱,╱ // 0x1832 @0xb
0x1827…184c at000c = ╱53╱S╱ // 0x1833 @0xc
0x1827…184c at000d = ╱41╱A╱ // 0x1834 @0xd
0x1827…184c at000e = ╱4c╱L╱ // 0x1835 @0xe
0x1827…184c at000f = ╱44╱D╱ // 0x1836 @0xf
0x1827…184c at0010 = ╱4f╱O╱ // 0x1837 @0x10
0x1827…184c at0011 = ╱31╱1╱ // 0x1838 @0x11
0x1827…184c at0012 = ╱32╱2╱ // 0x1839 @0x12
0x1827…184c at0013 = ╱ef╱$╱ // 0x183a @0x13
0x1827…184c at0014 = ╱ec╱,╱ // 0x183b @0x14
0x1827…184c at0015 = ╱46╱F╱ // 0x183c @0x15
0x1827…184c at0016 = ╱5d╱Å╱ // 0x183d @0x16
0x1827…184c at0017 = ╱44╱D╱ // 0x183e @0x17
0x1827…184c at0018 = ╱4b╱K╱ // 0x183f @0x18
0x1827…184c at0019 = ╱ef╱$╱ // 0x1840 @0x19
0x1827…184c at001a = ╱ec╱,╱ // 0x1841 @0x1a
0x1827…184c at001b = ╱53╱S╱ // 0x1842 @0x1b
0x1827…184c at001c = ╱41╱A╱ // 0x1843 @0x1c
0x1827…184c at001d = ╱4c╱L╱ // 0x1844 @0x1d
0x1827…184c at001e = ╱44╱D╱ // 0x1845 @0x1e
0x1827…184c at001f = ╱4f╱O╱ // 0x1846 @0x1f
0x1827…184c at0020 = ╱31╱1╱ // 0x1847 @0x20
0x1827…184c at0021 = ╱32╱2╱ // 0x1848 @0x21
0x1827…184c at0022 = ╱ef╱$╱ // 0x1849 @0x22
0x1827…184c at0023 = ╱ee╱)╱ // 0x184a @0x23
0x1827…184c at0024 = EOL // 0x184b @0x24
0x1827…184c }
0x184c…186f a5c6 2610 EXEC CALC(B,SALDO3$,FMDK$,SALDO3$)
0x184c…186f LineComalBin {
0x184c…186f ptr = 0xa5c6 // 0x184c @0x0
0x184c…186f lno = 0x0a32 // 0x184e @0x2
0x184c…186f at0004 = ╱9d╱ EXEC ╱ // 0x1850 @0x4
0x184c…186f at0005 = ╱43╱C╱ // 0x1851 @0x5
0x184c…186f at0006 = ╱41╱A╱ // 0x1852 @0x6
0x184c…186f at0007 = ╱4c╱L╱ // 0x1853 @0x7
0x184c…186f at0008 = ╱43╱C╱ // 0x1854 @0x8
0x184c…186f at0009 = ╱ed╱(╱ // 0x1855 @0x9
0x184c…186f at000a = ╱42╱B╱ // 0x1856 @0xa
0x184c…186f at000b = ╱ec╱,╱ // 0x1857 @0xb
0x184c…186f at000c = ╱53╱S╱ // 0x1858 @0xc
0x184c…186f at000d = ╱41╱A╱ // 0x1859 @0xd
0x184c…186f at000e = ╱4c╱L╱ // 0x185a @0xe
0x184c…186f at000f = ╱44╱D╱ // 0x185b @0xf
0x184c…186f at0010 = ╱4f╱O╱ // 0x185c @0x10
0x184c…186f at0011 = ╱33╱3╱ // 0x185d @0x11
0x184c…186f at0012 = ╱ef╱$╱ // 0x185e @0x12
0x184c…186f at0013 = ╱ec╱,╱ // 0x185f @0x13
0x184c…186f at0014 = ╱46╱F╱ // 0x1860 @0x14
0x184c…186f at0015 = ╱4d╱M╱ // 0x1861 @0x15
0x184c…186f at0016 = ╱44╱D╱ // 0x1862 @0x16
0x184c…186f at0017 = ╱4b╱K╱ // 0x1863 @0x17
0x184c…186f at0018 = ╱ef╱$╱ // 0x1864 @0x18
0x184c…186f at0019 = ╱ec╱,╱ // 0x1865 @0x19
0x184c…186f at001a = ╱53╱S╱ // 0x1866 @0x1a
0x184c…186f at001b = ╱41╱A╱ // 0x1867 @0x1b
0x184c…186f at001c = ╱4c╱L╱ // 0x1868 @0x1c
0x184c…186f at001d = ╱44╱D╱ // 0x1869 @0x1d
0x184c…186f at001e = ╱4f╱O╱ // 0x186a @0x1e
0x184c…186f at001f = ╱33╱3╱ // 0x186b @0x1f
0x184c…186f at0020 = ╱ef╱$╱ // 0x186c @0x20
0x184c…186f at0021 = ╱ee╱)╱ // 0x186d @0x21
0x184c…186f at0022 = EOL // 0x186e @0x22
0x184c…186f }
0x186f…1894 a5eb 2620 EXEC CALC(B,SALDO13$,FÅDK$,SALDO13$)
0x186f…1894 LineComalBin {
0x186f…1894 ptr = 0xa5eb // 0x186f @0x0
0x186f…1894 lno = 0x0a3c // 0x1871 @0x2
0x186f…1894 at0004 = ╱9d╱ EXEC ╱ // 0x1873 @0x4
0x186f…1894 at0005 = ╱43╱C╱ // 0x1874 @0x5
0x186f…1894 at0006 = ╱41╱A╱ // 0x1875 @0x6
0x186f…1894 at0007 = ╱4c╱L╱ // 0x1876 @0x7
0x186f…1894 at0008 = ╱43╱C╱ // 0x1877 @0x8
0x186f…1894 at0009 = ╱ed╱(╱ // 0x1878 @0x9
0x186f…1894 at000a = ╱42╱B╱ // 0x1879 @0xa
0x186f…1894 at000b = ╱ec╱,╱ // 0x187a @0xb
0x186f…1894 at000c = ╱53╱S╱ // 0x187b @0xc
0x186f…1894 at000d = ╱41╱A╱ // 0x187c @0xd
0x186f…1894 at000e = ╱4c╱L╱ // 0x187d @0xe
0x186f…1894 at000f = ╱44╱D╱ // 0x187e @0xf
0x186f…1894 at0010 = ╱4f╱O╱ // 0x187f @0x10
0x186f…1894 at0011 = ╱31╱1╱ // 0x1880 @0x11
0x186f…1894 at0012 = ╱33╱3╱ // 0x1881 @0x12
0x186f…1894 at0013 = ╱ef╱$╱ // 0x1882 @0x13
0x186f…1894 at0014 = ╱ec╱,╱ // 0x1883 @0x14
0x186f…1894 at0015 = ╱46╱F╱ // 0x1884 @0x15
0x186f…1894 at0016 = ╱5d╱Å╱ // 0x1885 @0x16
0x186f…1894 at0017 = ╱44╱D╱ // 0x1886 @0x17
0x186f…1894 at0018 = ╱4b╱K╱ // 0x1887 @0x18
0x186f…1894 at0019 = ╱ef╱$╱ // 0x1888 @0x19
0x186f…1894 at001a = ╱ec╱,╱ // 0x1889 @0x1a
0x186f…1894 at001b = ╱53╱S╱ // 0x188a @0x1b
0x186f…1894 at001c = ╱41╱A╱ // 0x188b @0x1c
0x186f…1894 at001d = ╱4c╱L╱ // 0x188c @0x1d
0x186f…1894 at001e = ╱44╱D╱ // 0x188d @0x1e
0x186f…1894 at001f = ╱4f╱O╱ // 0x188e @0x1f
0x186f…1894 at0020 = ╱31╱1╱ // 0x188f @0x20
0x186f…1894 at0021 = ╱33╱3╱ // 0x1890 @0x21
0x186f…1894 at0022 = ╱ef╱$╱ // 0x1891 @0x22
0x186f…1894 at0023 = ╱ee╱)╱ // 0x1892 @0x23
0x186f…1894 at0024 = EOL // 0x1893 @0x24
0x186f…1894 }
0x1894…18b7 a60e 2630 EXEC CALC(B,SALDO4$,FMDK$,SALDO4$)
0x1894…18b7 LineComalBin {
0x1894…18b7 ptr = 0xa60e // 0x1894 @0x0
0x1894…18b7 lno = 0x0a46 // 0x1896 @0x2
0x1894…18b7 at0004 = ╱9d╱ EXEC ╱ // 0x1898 @0x4
0x1894…18b7 at0005 = ╱43╱C╱ // 0x1899 @0x5
0x1894…18b7 at0006 = ╱41╱A╱ // 0x189a @0x6
0x1894…18b7 at0007 = ╱4c╱L╱ // 0x189b @0x7
0x1894…18b7 at0008 = ╱43╱C╱ // 0x189c @0x8
0x1894…18b7 at0009 = ╱ed╱(╱ // 0x189d @0x9
0x1894…18b7 at000a = ╱42╱B╱ // 0x189e @0xa
0x1894…18b7 at000b = ╱ec╱,╱ // 0x189f @0xb
0x1894…18b7 at000c = ╱53╱S╱ // 0x18a0 @0xc
0x1894…18b7 at000d = ╱41╱A╱ // 0x18a1 @0xd
0x1894…18b7 at000e = ╱4c╱L╱ // 0x18a2 @0xe
0x1894…18b7 at000f = ╱44╱D╱ // 0x18a3 @0xf
0x1894…18b7 at0010 = ╱4f╱O╱ // 0x18a4 @0x10
0x1894…18b7 at0011 = ╱34╱4╱ // 0x18a5 @0x11
0x1894…18b7 at0012 = ╱ef╱$╱ // 0x18a6 @0x12
0x1894…18b7 at0013 = ╱ec╱,╱ // 0x18a7 @0x13
0x1894…18b7 at0014 = ╱46╱F╱ // 0x18a8 @0x14
0x1894…18b7 at0015 = ╱4d╱M╱ // 0x18a9 @0x15
0x1894…18b7 at0016 = ╱44╱D╱ // 0x18aa @0x16
0x1894…18b7 at0017 = ╱4b╱K╱ // 0x18ab @0x17
0x1894…18b7 at0018 = ╱ef╱$╱ // 0x18ac @0x18
0x1894…18b7 at0019 = ╱ec╱,╱ // 0x18ad @0x19
0x1894…18b7 at001a = ╱53╱S╱ // 0x18ae @0x1a
0x1894…18b7 at001b = ╱41╱A╱ // 0x18af @0x1b
0x1894…18b7 at001c = ╱4c╱L╱ // 0x18b0 @0x1c
0x1894…18b7 at001d = ╱44╱D╱ // 0x18b1 @0x1d
0x1894…18b7 at001e = ╱4f╱O╱ // 0x18b2 @0x1e
0x1894…18b7 at001f = ╱34╱4╱ // 0x18b3 @0x1f
0x1894…18b7 at0020 = ╱ef╱$╱ // 0x18b4 @0x20
0x1894…18b7 at0021 = ╱ee╱)╱ // 0x18b5 @0x21
0x1894…18b7 at0022 = EOL // 0x18b6 @0x22
0x1894…18b7 }
0x18b7…18dc a633 2640 EXEC CALC(B,SALDO14$,FÅDK$,SALDO14$)
0x18b7…18dc LineComalBin {
0x18b7…18dc ptr = 0xa633 // 0x18b7 @0x0
0x18b7…18dc lno = 0x0a50 // 0x18b9 @0x2
0x18b7…18dc at0004 = ╱9d╱ EXEC ╱ // 0x18bb @0x4
0x18b7…18dc at0005 = ╱43╱C╱ // 0x18bc @0x5
0x18b7…18dc at0006 = ╱41╱A╱ // 0x18bd @0x6
0x18b7…18dc at0007 = ╱4c╱L╱ // 0x18be @0x7
0x18b7…18dc at0008 = ╱43╱C╱ // 0x18bf @0x8
0x18b7…18dc at0009 = ╱ed╱(╱ // 0x18c0 @0x9
0x18b7…18dc at000a = ╱42╱B╱ // 0x18c1 @0xa
0x18b7…18dc at000b = ╱ec╱,╱ // 0x18c2 @0xb
0x18b7…18dc at000c = ╱53╱S╱ // 0x18c3 @0xc
0x18b7…18dc at000d = ╱41╱A╱ // 0x18c4 @0xd
0x18b7…18dc at000e = ╱4c╱L╱ // 0x18c5 @0xe
0x18b7…18dc at000f = ╱44╱D╱ // 0x18c6 @0xf
0x18b7…18dc at0010 = ╱4f╱O╱ // 0x18c7 @0x10
0x18b7…18dc at0011 = ╱31╱1╱ // 0x18c8 @0x11
0x18b7…18dc at0012 = ╱34╱4╱ // 0x18c9 @0x12
0x18b7…18dc at0013 = ╱ef╱$╱ // 0x18ca @0x13
0x18b7…18dc at0014 = ╱ec╱,╱ // 0x18cb @0x14
0x18b7…18dc at0015 = ╱46╱F╱ // 0x18cc @0x15
0x18b7…18dc at0016 = ╱5d╱Å╱ // 0x18cd @0x16
0x18b7…18dc at0017 = ╱44╱D╱ // 0x18ce @0x17
0x18b7…18dc at0018 = ╱4b╱K╱ // 0x18cf @0x18
0x18b7…18dc at0019 = ╱ef╱$╱ // 0x18d0 @0x19
0x18b7…18dc at001a = ╱ec╱,╱ // 0x18d1 @0x1a
0x18b7…18dc at001b = ╱53╱S╱ // 0x18d2 @0x1b
0x18b7…18dc at001c = ╱41╱A╱ // 0x18d3 @0x1c
0x18b7…18dc at001d = ╱4c╱L╱ // 0x18d4 @0x1d
0x18b7…18dc at001e = ╱44╱D╱ // 0x18d5 @0x1e
0x18b7…18dc at001f = ╱4f╱O╱ // 0x18d6 @0x1f
0x18b7…18dc at0020 = ╱31╱1╱ // 0x18d7 @0x20
0x18b7…18dc at0021 = ╱34╱4╱ // 0x18d8 @0x21
0x18b7…18dc at0022 = ╱ef╱$╱ // 0x18d9 @0x22
0x18b7…18dc at0023 = ╱ee╱)╱ // 0x18da @0x23
0x18b7…18dc at0024 = EOL // 0x18db @0x24
0x18b7…18dc }
0x18dc…18e4 a63b 2650 WHEN E
0x18dc…18e4 LineComalBin {
0x18dc…18e4 ptr = 0xa63b // 0x18dc @0x0
0x18dc…18e4 lno = 0x0a5a // 0x18de @0x2
0x18dc…18e4 at0004 = ╱a301╱ WHEN ╱ // 0x18e0 @0x4
0x18dc…18e4 at0006 = ╱45╱E╱ // 0x18e2 @0x6
0x18dc…18e4 at0007 = EOL // 0x18e3 @0x7
0x18dc…18e4 }
0x18e4…190d a664 2660 IF LINIE>39 THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x18e4…190d LineComalBin {
0x18e4…190d ptr = 0xa664 // 0x18e4 @0x0
0x18e4…190d lno = 0x0a64 // 0x18e6 @0x2
0x18e4…190d at0004 = ╱82╱ IF ╱ // 0x18e8 @0x4
0x18e4…190d at0005 = ╱4c╱L╱ // 0x18e9 @0x5
0x18e4…190d at0006 = ╱49╱I╱ // 0x18ea @0x6
0x18e4…190d at0007 = ╱4e╱N╱ // 0x18eb @0x7
0x18e4…190d at0008 = ╱49╱I╱ // 0x18ec @0x8
0x18e4…190d at0009 = ╱45╱E╱ // 0x18ed @0x9
0x18e4…190d at000a = ╱de╱>╱ // 0x18ee @0xa
0x18e4…190d at000b = ╱33╱3╱ // 0x18ef @0xb
0x18e4…190d at000c = ╱39╱9╱ // 0x18f0 @0xc
0x18e4…190d at000d = ╱fe00009c06╱ // 0x18f1 @0xd
0x18e4…190d at0012 = ╱b6╱ THEN ╱ // 0x18f6 @0x12
0x18e4…190d at0013 = ╱9d╱ EXEC ╱ // 0x18f7 @0x13
0x18e4…190d at0014 = ╱4e╱N╱ // 0x18f8 @0x14
0x18e4…190d at0015 = ╱59╱Y╱ // 0x18f9 @0x15
0x18e4…190d at0016 = ╱53╱S╱ // 0x18fa @0x16
0x18e4…190d at0017 = ╱49╱I╱ // 0x18fb @0x17
0x18e4…190d at0018 = ╱44╱D╱ // 0x18fc @0x18
0x18e4…190d at0019 = ╱45╱E╱ // 0x18fd @0x19
0x18e4…190d at001a = ╱ed╱(╱ // 0x18fe @0x1a
0x18e4…190d at001b = ╱47╱G╱ // 0x18ff @0x1b
0x18e4…190d at001c = ╱46╱F╱ // 0x1900 @0x1c
0x18e4…190d at001d = ╱4e╱N╱ // 0x1901 @0x1d
0x18e4…190d at001e = ╱52╱R╱ // 0x1902 @0x1e
0x18e4…190d at001f = ╱ec╱,╱ // 0x1903 @0x1f
0x18e4…190d at0020 = ╱47╱G╱ // 0x1904 @0x20
0x18e4…190d at0021 = ╱4c╱L╱ // 0x1905 @0x21
0x18e4…190d at0022 = ╱4e╱N╱ // 0x1906 @0x22
0x18e4…190d at0023 = ╱41╱A╱ // 0x1907 @0x23
0x18e4…190d at0024 = ╱56╱V╱ // 0x1908 @0x24
0x18e4…190d at0025 = ╱4e╱N╱ // 0x1909 @0x25
0x18e4…190d at0026 = ╱ef╱$╱ // 0x190a @0x26
0x18e4…190d at0027 = ╱ee╱)╱ // 0x190b @0x27
0x18e4…190d at0028 = EOL // 0x190c @0x28
0x18e4…190d }
0x190d…1937 a68e 2670 EXEC LINIEUD(FNR,FNAVN$,SALDO1$,SALDO11$)
0x190d…1937 LineComalBin {
0x190d…1937 ptr = 0xa68e // 0x190d @0x0
0x190d…1937 lno = 0x0a6e // 0x190f @0x2
0x190d…1937 at0004 = ╱9d╱ EXEC ╱ // 0x1911 @0x4
0x190d…1937 at0005 = ╱4c╱L╱ // 0x1912 @0x5
0x190d…1937 at0006 = ╱49╱I╱ // 0x1913 @0x6
0x190d…1937 at0007 = ╱4e╱N╱ // 0x1914 @0x7
0x190d…1937 at0008 = ╱49╱I╱ // 0x1915 @0x8
0x190d…1937 at0009 = ╱45╱E╱ // 0x1916 @0x9
0x190d…1937 at000a = ╱55╱U╱ // 0x1917 @0xa
0x190d…1937 at000b = ╱44╱D╱ // 0x1918 @0xb
0x190d…1937 at000c = ╱ed╱(╱ // 0x1919 @0xc
0x190d…1937 at000d = ╱46╱F╱ // 0x191a @0xd
0x190d…1937 at000e = ╱4e╱N╱ // 0x191b @0xe
0x190d…1937 at000f = ╱52╱R╱ // 0x191c @0xf
0x190d…1937 at0010 = ╱ec╱,╱ // 0x191d @0x10
0x190d…1937 at0011 = ╱46╱F╱ // 0x191e @0x11
0x190d…1937 at0012 = ╱4e╱N╱ // 0x191f @0x12
0x190d…1937 at0013 = ╱41╱A╱ // 0x1920 @0x13
0x190d…1937 at0014 = ╱56╱V╱ // 0x1921 @0x14
0x190d…1937 at0015 = ╱4e╱N╱ // 0x1922 @0x15
0x190d…1937 at0016 = ╱ef╱$╱ // 0x1923 @0x16
0x190d…1937 at0017 = ╱ec╱,╱ // 0x1924 @0x17
0x190d…1937 at0018 = ╱53╱S╱ // 0x1925 @0x18
0x190d…1937 at0019 = ╱41╱A╱ // 0x1926 @0x19
0x190d…1937 at001a = ╱4c╱L╱ // 0x1927 @0x1a
0x190d…1937 at001b = ╱44╱D╱ // 0x1928 @0x1b
0x190d…1937 at001c = ╱4f╱O╱ // 0x1929 @0x1c
0x190d…1937 at001d = ╱31╱1╱ // 0x192a @0x1d
0x190d…1937 at001e = ╱ef╱$╱ // 0x192b @0x1e
0x190d…1937 at001f = ╱ec╱,╱ // 0x192c @0x1f
0x190d…1937 at0020 = ╱53╱S╱ // 0x192d @0x20
0x190d…1937 at0021 = ╱41╱A╱ // 0x192e @0x21
0x190d…1937 at0022 = ╱4c╱L╱ // 0x192f @0x22
0x190d…1937 at0023 = ╱44╱D╱ // 0x1930 @0x23
0x190d…1937 at0024 = ╱4f╱O╱ // 0x1931 @0x24
0x190d…1937 at0025 = ╱31╱1╱ // 0x1932 @0x25
0x190d…1937 at0026 = ╱31╱1╱ // 0x1933 @0x26
0x190d…1937 at0027 = ╱ef╱$╱ // 0x1934 @0x27
0x190d…1937 at0028 = ╱ee╱)╱ // 0x1935 @0x28
0x190d…1937 at0029 = EOL // 0x1936 @0x29
0x190d…1937 }
0x1937…1956 a6ad 2680 SALDO1$="0+";SALDO11$="0+"
0x1937…1956 LineComalBin {
0x1937…1956 ptr = 0xa6ad // 0x1937 @0x0
0x1937…1956 lno = 0x0a78 // 0x1939 @0x2
0x1937…1956 at0004 = ╱53╱S╱ // 0x193b @0x4
0x1937…1956 at0005 = ╱41╱A╱ // 0x193c @0x5
0x1937…1956 at0006 = ╱4c╱L╱ // 0x193d @0x6
0x1937…1956 at0007 = ╱44╱D╱ // 0x193e @0x7
0x1937…1956 at0008 = ╱4f╱O╱ // 0x193f @0x8
0x1937…1956 at0009 = ╱31╱1╱ // 0x1940 @0x9
0x1937…1956 at000a = ╱ef╱$╱ // 0x1941 @0xa
0x1937…1956 at000b = ╱dc╱=╱ // 0x1942 @0xb
0x1937…1956 at000c = ╱22╱"╱ // 0x1943 @0xc
0x1937…1956 at000d = ╱30╱0╱ // 0x1944 @0xd
0x1937…1956 at000e = ╱2b╱+╱ // 0x1945 @0xe
0x1937…1956 at000f = ╱22╱"╱ // 0x1946 @0xf
0x1937…1956 at0010 = ╱eb╱;╱ // 0x1947 @0x10
0x1937…1956 at0011 = ╱53╱S╱ // 0x1948 @0x11
0x1937…1956 at0012 = ╱41╱A╱ // 0x1949 @0x12
0x1937…1956 at0013 = ╱4c╱L╱ // 0x194a @0x13
0x1937…1956 at0014 = ╱44╱D╱ // 0x194b @0x14
0x1937…1956 at0015 = ╱4f╱O╱ // 0x194c @0x15
0x1937…1956 at0016 = ╱31╱1╱ // 0x194d @0x16
0x1937…1956 at0017 = ╱31╱1╱ // 0x194e @0x17
0x1937…1956 at0018 = ╱ef╱$╱ // 0x194f @0x18
0x1937…1956 at0019 = ╱dc╱=╱ // 0x1950 @0x19
0x1937…1956 at001a = ╱22╱"╱ // 0x1951 @0x1a
0x1937…1956 at001b = ╱30╱0╱ // 0x1952 @0x1b
0x1937…1956 at001c = ╱2b╱+╱ // 0x1953 @0x1c
0x1937…1956 at001d = ╱22╱"╱ // 0x1954 @0x1d
0x1937…1956 at001e = EOL // 0x1955 @0x1e
0x1937…1956 }
0x1956…195f a6b6 2690 PRINT " "
0x1956…195f LineComalBin {
0x1956…195f ptr = 0xa6b6 // 0x1956 @0x0
0x1956…195f lno = 0x0a82 // 0x1958 @0x2
0x1956…195f at0004 = ╱92╱ PRINT ╱ // 0x195a @0x4
0x1956…195f at0005 = ╱22╱"╱ // 0x195b @0x5
0x1956…195f at0006 = ╱20╱…╱ // 0x195c @0x6
0x1956…195f at0007 = ╱22╱"╱ // 0x195d @0x7
0x1956…195f at0008 = EOL // 0x195e @0x8
0x1956…195f }
0x195f…1971 a6c8 2700 LINIE=LINIE+G
0x195f…1971 LineComalBin {
0x195f…1971 ptr = 0xa6c8 // 0x195f @0x0
0x195f…1971 lno = 0x0a8c // 0x1961 @0x2
0x195f…1971 at0004 = ╱4c╱L╱ // 0x1963 @0x4
0x195f…1971 at0005 = ╱49╱I╱ // 0x1964 @0x5
0x195f…1971 at0006 = ╱4e╱N╱ // 0x1965 @0x6
0x195f…1971 at0007 = ╱49╱I╱ // 0x1966 @0x7
0x195f…1971 at0008 = ╱45╱E╱ // 0x1967 @0x8
0x195f…1971 at0009 = ╱dc╱=╱ // 0x1968 @0x9
0x195f…1971 at000a = ╱4c╱L╱ // 0x1969 @0xa
0x195f…1971 at000b = ╱49╱I╱ // 0x196a @0xb
0x195f…1971 at000c = ╱4e╱N╱ // 0x196b @0xc
0x195f…1971 at000d = ╱49╱I╱ // 0x196c @0xd
0x195f…1971 at000e = ╱45╱E╱ // 0x196d @0xe
0x195f…1971 at000f = ╱e2╱+╱ // 0x196e @0xf
0x195f…1971 at0010 = ╱47╱G╱ // 0x196f @0x10
0x195f…1971 at0011 = EOL // 0x1970 @0x11
0x195f…1971 }
0x1971…1979 a6d0 2710 WHEN G
0x1971…1979 LineComalBin {
0x1971…1979 ptr = 0xa6d0 // 0x1971 @0x0
0x1971…1979 lno = 0x0a96 // 0x1973 @0x2
0x1971…1979 at0004 = ╱a301╱ WHEN ╱ // 0x1975 @0x4
0x1971…1979 at0006 = ╱47╱G╱ // 0x1977 @0x6
0x1971…1979 at0007 = EOL // 0x1978 @0x7
0x1971…1979 }
0x1979…1986 a6dd 2720 IF GFNR>B THEN
0x1979…1986 LineComalBin {
0x1979…1986 ptr = 0xa6dd // 0x1979 @0x0
0x1979…1986 lno = 0x0aa0 // 0x197b @0x2
0x1979…1986 at0004 = ╱9c╱ IF ╱ // 0x197d @0x4
0x1979…1986 at0005 = ╱47╱G╱ // 0x197e @0x5
0x1979…1986 at0006 = ╱46╱F╱ // 0x197f @0x6
0x1979…1986 at0007 = ╱4e╱N╱ // 0x1980 @0x7
0x1979…1986 at0008 = ╱52╱R╱ // 0x1981 @0x8
0x1979…1986 at0009 = ╱de╱>╱ // 0x1982 @0x9
0x1979…1986 at000a = ╱42╱B╱ // 0x1983 @0xa
0x1979…1986 at000b = ╱b6╱ THEN ╱ // 0x1984 @0xb
0x1979…1986 at000c = EOL // 0x1985 @0xc
0x1979…1986 }
0x1986…19af a706 2730 IF LINIE>37 THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x1986…19af LineComalBin {
0x1986…19af ptr = 0xa706 // 0x1986 @0x0
0x1986…19af lno = 0x0aaa // 0x1988 @0x2
0x1986…19af at0004 = ╱82╱ IF ╱ // 0x198a @0x4
0x1986…19af at0005 = ╱4c╱L╱ // 0x198b @0x5
0x1986…19af at0006 = ╱49╱I╱ // 0x198c @0x6
0x1986…19af at0007 = ╱4e╱N╱ // 0x198d @0x7
0x1986…19af at0008 = ╱49╱I╱ // 0x198e @0x8
0x1986…19af at0009 = ╱45╱E╱ // 0x198f @0x9
0x1986…19af at000a = ╱de╱>╱ // 0x1990 @0xa
0x1986…19af at000b = ╱33╱3╱ // 0x1991 @0xb
0x1986…19af at000c = ╱37╱7╱ // 0x1992 @0xc
0x1986…19af at000d = ╱fe00009406╱ // 0x1993 @0xd
0x1986…19af at0012 = ╱b6╱ THEN ╱ // 0x1998 @0x12
0x1986…19af at0013 = ╱9d╱ EXEC ╱ // 0x1999 @0x13
0x1986…19af at0014 = ╱4e╱N╱ // 0x199a @0x14
0x1986…19af at0015 = ╱59╱Y╱ // 0x199b @0x15
0x1986…19af at0016 = ╱53╱S╱ // 0x199c @0x16
0x1986…19af at0017 = ╱49╱I╱ // 0x199d @0x17
0x1986…19af at0018 = ╱44╱D╱ // 0x199e @0x18
0x1986…19af at0019 = ╱45╱E╱ // 0x199f @0x19
0x1986…19af at001a = ╱ed╱(╱ // 0x19a0 @0x1a
0x1986…19af at001b = ╱47╱G╱ // 0x19a1 @0x1b
0x1986…19af at001c = ╱46╱F╱ // 0x19a2 @0x1c
0x1986…19af at001d = ╱4e╱N╱ // 0x19a3 @0x1d
0x1986…19af at001e = ╱52╱R╱ // 0x19a4 @0x1e
0x1986…19af at001f = ╱ec╱,╱ // 0x19a5 @0x1f
0x1986…19af at0020 = ╱47╱G╱ // 0x19a6 @0x20
0x1986…19af at0021 = ╱4c╱L╱ // 0x19a7 @0x21
0x1986…19af at0022 = ╱4e╱N╱ // 0x19a8 @0x22
0x1986…19af at0023 = ╱41╱A╱ // 0x19a9 @0x23
0x1986…19af at0024 = ╱56╱V╱ // 0x19aa @0x24
0x1986…19af at0025 = ╱4e╱N╱ // 0x19ab @0x25
0x1986…19af at0026 = ╱ef╱$╱ // 0x19ac @0x26
0x1986…19af at0027 = ╱ee╱)╱ // 0x19ad @0x27
0x1986…19af at0028 = EOL // 0x19ae @0x28
0x1986…19af }
0x19af…19b8 a70f 2740 PRINT " "
0x19af…19b8 LineComalBin {
0x19af…19b8 ptr = 0xa70f // 0x19af @0x0
0x19af…19b8 lno = 0x0ab4 // 0x19b1 @0x2
0x19af…19b8 at0004 = ╱92╱ PRINT ╱ // 0x19b3 @0x4
0x19af…19b8 at0005 = ╱22╱"╱ // 0x19b4 @0x5
0x19af…19b8 at0006 = ╱20╱…╱ // 0x19b5 @0x6
0x19af…19b8 at0007 = ╱22╱"╱ // 0x19b6 @0x7
0x19af…19b8 at0008 = EOL // 0x19b7 @0x8
0x19af…19b8 }
0x19b8…19d9 a730 2750 PRINT TAB(8);STREG$(E:71)
0x19b8…19d9 LineComalBin {
0x19b8…19d9 ptr = 0xa730 // 0x19b8 @0x0
0x19b8…19d9 lno = 0x0abe // 0x19ba @0x2
0x19b8…19d9 at0004 = ╱92╱ PRINT ╱ // 0x19bc @0x4
0x19b8…19d9 at0005 = ╱d2╱TAB╱ // 0x19bd @0x5
0x19b8…19d9 at0006 = ╱ed╱(╱ // 0x19be @0x6
0x19b8…19d9 at0007 = ╱38╱8╱ // 0x19bf @0x7
0x19b8…19d9 at0008 = ╱fe00008004╱ // 0x19c0 @0x8
0x19b8…19d9 at000d = ╱ee╱)╱ // 0x19c5 @0xd
0x19b8…19d9 at000e = ╱eb╱;╱ // 0x19c6 @0xe
0x19b8…19d9 at000f = ╱53╱S╱ // 0x19c7 @0xf
0x19b8…19d9 at0010 = ╱54╱T╱ // 0x19c8 @0x10
0x19b8…19d9 at0011 = ╱52╱R╱ // 0x19c9 @0x11
0x19b8…19d9 at0012 = ╱45╱E╱ // 0x19ca @0x12
0x19b8…19d9 at0013 = ╱47╱G╱ // 0x19cb @0x13
0x19b8…19d9 at0014 = ╱ef╱$╱ // 0x19cc @0x14
0x19b8…19d9 at0015 = ╱ed╱(╱ // 0x19cd @0x15
0x19b8…19d9 at0016 = ╱45╱E╱ // 0x19ce @0x16
0x19b8…19d9 at0017 = ╱f0╱:╱ // 0x19cf @0x17
0x19b8…19d9 at0018 = ╱37╱7╱ // 0x19d0 @0x18
0x19b8…19d9 at0019 = ╱31╱1╱ // 0x19d1 @0x19
0x19b8…19d9 at001a = ╱fe00008e07╱ // 0x19d2 @0x1a
0x19b8…19d9 at001f = ╱ee╱)╱ // 0x19d7 @0x1f
0x19b8…19d9 at0020 = EOL // 0x19d8 @0x20
0x19b8…19d9 }
0x19d9…1a05 a75c 2760 EXEC LINIEUD(GFNR,GLNAVN$,SALDO2$,SALDO12$)
0x19d9…1a05 LineComalBin {
0x19d9…1a05 ptr = 0xa75c // 0x19d9 @0x0
0x19d9…1a05 lno = 0x0ac8 // 0x19db @0x2
0x19d9…1a05 at0004 = ╱9d╱ EXEC ╱ // 0x19dd @0x4
0x19d9…1a05 at0005 = ╱4c╱L╱ // 0x19de @0x5
0x19d9…1a05 at0006 = ╱49╱I╱ // 0x19df @0x6
0x19d9…1a05 at0007 = ╱4e╱N╱ // 0x19e0 @0x7
0x19d9…1a05 at0008 = ╱49╱I╱ // 0x19e1 @0x8
0x19d9…1a05 at0009 = ╱45╱E╱ // 0x19e2 @0x9
0x19d9…1a05 at000a = ╱55╱U╱ // 0x19e3 @0xa
0x19d9…1a05 at000b = ╱44╱D╱ // 0x19e4 @0xb
0x19d9…1a05 at000c = ╱ed╱(╱ // 0x19e5 @0xc
0x19d9…1a05 at000d = ╱47╱G╱ // 0x19e6 @0xd
0x19d9…1a05 at000e = ╱46╱F╱ // 0x19e7 @0xe
0x19d9…1a05 at000f = ╱4e╱N╱ // 0x19e8 @0xf
0x19d9…1a05 at0010 = ╱52╱R╱ // 0x19e9 @0x10
0x19d9…1a05 at0011 = ╱ec╱,╱ // 0x19ea @0x11
0x19d9…1a05 at0012 = ╱47╱G╱ // 0x19eb @0x12
0x19d9…1a05 at0013 = ╱4c╱L╱ // 0x19ec @0x13
0x19d9…1a05 at0014 = ╱4e╱N╱ // 0x19ed @0x14
0x19d9…1a05 at0015 = ╱41╱A╱ // 0x19ee @0x15
0x19d9…1a05 at0016 = ╱56╱V╱ // 0x19ef @0x16
0x19d9…1a05 at0017 = ╱4e╱N╱ // 0x19f0 @0x17
0x19d9…1a05 at0018 = ╱ef╱$╱ // 0x19f1 @0x18
0x19d9…1a05 at0019 = ╱ec╱,╱ // 0x19f2 @0x19
0x19d9…1a05 at001a = ╱53╱S╱ // 0x19f3 @0x1a
0x19d9…1a05 at001b = ╱41╱A╱ // 0x19f4 @0x1b
0x19d9…1a05 at001c = ╱4c╱L╱ // 0x19f5 @0x1c
0x19d9…1a05 at001d = ╱44╱D╱ // 0x19f6 @0x1d
0x19d9…1a05 at001e = ╱4f╱O╱ // 0x19f7 @0x1e
0x19d9…1a05 at001f = ╱32╱2╱ // 0x19f8 @0x1f
0x19d9…1a05 at0020 = ╱ef╱$╱ // 0x19f9 @0x20
0x19d9…1a05 at0021 = ╱ec╱,╱ // 0x19fa @0x21
0x19d9…1a05 at0022 = ╱53╱S╱ // 0x19fb @0x22
0x19d9…1a05 at0023 = ╱41╱A╱ // 0x19fc @0x23
0x19d9…1a05 at0024 = ╱4c╱L╱ // 0x19fd @0x24
0x19d9…1a05 at0025 = ╱44╱D╱ // 0x19fe @0x25
0x19d9…1a05 at0026 = ╱4f╱O╱ // 0x19ff @0x26
0x19d9…1a05 at0027 = ╱31╱1╱ // 0x1a00 @0x27
0x19d9…1a05 at0028 = ╱32╱2╱ // 0x1a01 @0x28
0x19d9…1a05 at0029 = ╱ef╱$╱ // 0x1a02 @0x29
0x19d9…1a05 at002a = ╱ee╱)╱ // 0x1a03 @0x2a
0x19d9…1a05 at002b = EOL // 0x1a04 @0x2b
0x19d9…1a05 }
0x1a05…1a17 a76e 2770 LINIE=LINIE+V
0x1a05…1a17 LineComalBin {
0x1a05…1a17 ptr = 0xa76e // 0x1a05 @0x0
0x1a05…1a17 lno = 0x0ad2 // 0x1a07 @0x2
0x1a05…1a17 at0004 = ╱4c╱L╱ // 0x1a09 @0x4
0x1a05…1a17 at0005 = ╱49╱I╱ // 0x1a0a @0x5
0x1a05…1a17 at0006 = ╱4e╱N╱ // 0x1a0b @0x6
0x1a05…1a17 at0007 = ╱49╱I╱ // 0x1a0c @0x7
0x1a05…1a17 at0008 = ╱45╱E╱ // 0x1a0d @0x8
0x1a05…1a17 at0009 = ╱dc╱=╱ // 0x1a0e @0x9
0x1a05…1a17 at000a = ╱4c╱L╱ // 0x1a0f @0xa
0x1a05…1a17 at000b = ╱49╱I╱ // 0x1a10 @0xb
0x1a05…1a17 at000c = ╱4e╱N╱ // 0x1a11 @0xc
0x1a05…1a17 at000d = ╱49╱I╱ // 0x1a12 @0xd
0x1a05…1a17 at000e = ╱45╱E╱ // 0x1a13 @0xe
0x1a05…1a17 at000f = ╱e2╱+╱ // 0x1a14 @0xf
0x1a05…1a17 at0010 = ╱56╱V╱ // 0x1a15 @0x10
0x1a05…1a17 at0011 = EOL // 0x1a16 @0x11
0x1a05…1a17 }
0x1a17…1a1d a774 2780 ENDIF
0x1a17…1a1d LineComalBin {
0x1a17…1a1d ptr = 0xa774 // 0x1a17 @0x0
0x1a17…1a1d lno = 0x0adc // 0x1a19 @0x2
0x1a17…1a1d at0004 = ╱9b╱ ENDIF ╱ // 0x1a1b @0x4
0x1a17…1a1d at0005 = EOL // 0x1a1c @0x5
0x1a17…1a1d }
0x1a1d…1a3c a793 2790 SALDO2$="0+";SALDO12$="0+"
0x1a1d…1a3c LineComalBin {
0x1a1d…1a3c ptr = 0xa793 // 0x1a1d @0x0
0x1a1d…1a3c lno = 0x0ae6 // 0x1a1f @0x2
0x1a1d…1a3c at0004 = ╱53╱S╱ // 0x1a21 @0x4
0x1a1d…1a3c at0005 = ╱41╱A╱ // 0x1a22 @0x5
0x1a1d…1a3c at0006 = ╱4c╱L╱ // 0x1a23 @0x6
0x1a1d…1a3c at0007 = ╱44╱D╱ // 0x1a24 @0x7
0x1a1d…1a3c at0008 = ╱4f╱O╱ // 0x1a25 @0x8
0x1a1d…1a3c at0009 = ╱32╱2╱ // 0x1a26 @0x9
0x1a1d…1a3c at000a = ╱ef╱$╱ // 0x1a27 @0xa
0x1a1d…1a3c at000b = ╱dc╱=╱ // 0x1a28 @0xb
0x1a1d…1a3c at000c = ╱22╱"╱ // 0x1a29 @0xc
0x1a1d…1a3c at000d = ╱30╱0╱ // 0x1a2a @0xd
0x1a1d…1a3c at000e = ╱2b╱+╱ // 0x1a2b @0xe
0x1a1d…1a3c at000f = ╱22╱"╱ // 0x1a2c @0xf
0x1a1d…1a3c at0010 = ╱eb╱;╱ // 0x1a2d @0x10
0x1a1d…1a3c at0011 = ╱53╱S╱ // 0x1a2e @0x11
0x1a1d…1a3c at0012 = ╱41╱A╱ // 0x1a2f @0x12
0x1a1d…1a3c at0013 = ╱4c╱L╱ // 0x1a30 @0x13
0x1a1d…1a3c at0014 = ╱44╱D╱ // 0x1a31 @0x14
0x1a1d…1a3c at0015 = ╱4f╱O╱ // 0x1a32 @0x15
0x1a1d…1a3c at0016 = ╱31╱1╱ // 0x1a33 @0x16
0x1a1d…1a3c at0017 = ╱32╱2╱ // 0x1a34 @0x17
0x1a1d…1a3c at0018 = ╱ef╱$╱ // 0x1a35 @0x18
0x1a1d…1a3c at0019 = ╱dc╱=╱ // 0x1a36 @0x19
0x1a1d…1a3c at001a = ╱22╱"╱ // 0x1a37 @0x1a
0x1a1d…1a3c at001b = ╱30╱0╱ // 0x1a38 @0x1b
0x1a1d…1a3c at001c = ╱2b╱+╱ // 0x1a39 @0x1c
0x1a1d…1a3c at001d = ╱22╱"╱ // 0x1a3a @0x1d
0x1a1d…1a3c at001e = EOL // 0x1a3b @0x1e
0x1a1d…1a3c }
0x1a3c…1a5b a7b2 2800 SALDO1$="0+";SALDO11$="0+"
0x1a3c…1a5b LineComalBin {
0x1a3c…1a5b ptr = 0xa7b2 // 0x1a3c @0x0
0x1a3c…1a5b lno = 0x0af0 // 0x1a3e @0x2
0x1a3c…1a5b at0004 = ╱53╱S╱ // 0x1a40 @0x4
0x1a3c…1a5b at0005 = ╱41╱A╱ // 0x1a41 @0x5
0x1a3c…1a5b at0006 = ╱4c╱L╱ // 0x1a42 @0x6
0x1a3c…1a5b at0007 = ╱44╱D╱ // 0x1a43 @0x7
0x1a3c…1a5b at0008 = ╱4f╱O╱ // 0x1a44 @0x8
0x1a3c…1a5b at0009 = ╱31╱1╱ // 0x1a45 @0x9
0x1a3c…1a5b at000a = ╱ef╱$╱ // 0x1a46 @0xa
0x1a3c…1a5b at000b = ╱dc╱=╱ // 0x1a47 @0xb
0x1a3c…1a5b at000c = ╱22╱"╱ // 0x1a48 @0xc
0x1a3c…1a5b at000d = ╱30╱0╱ // 0x1a49 @0xd
0x1a3c…1a5b at000e = ╱2b╱+╱ // 0x1a4a @0xe
0x1a3c…1a5b at000f = ╱22╱"╱ // 0x1a4b @0xf
0x1a3c…1a5b at0010 = ╱eb╱;╱ // 0x1a4c @0x10
0x1a3c…1a5b at0011 = ╱53╱S╱ // 0x1a4d @0x11
0x1a3c…1a5b at0012 = ╱41╱A╱ // 0x1a4e @0x12
0x1a3c…1a5b at0013 = ╱4c╱L╱ // 0x1a4f @0x13
0x1a3c…1a5b at0014 = ╱44╱D╱ // 0x1a50 @0x14
0x1a3c…1a5b at0015 = ╱4f╱O╱ // 0x1a51 @0x15
0x1a3c…1a5b at0016 = ╱31╱1╱ // 0x1a52 @0x16
0x1a3c…1a5b at0017 = ╱31╱1╱ // 0x1a53 @0x17
0x1a3c…1a5b at0018 = ╱ef╱$╱ // 0x1a54 @0x18
0x1a3c…1a5b at0019 = ╱dc╱=╱ // 0x1a55 @0x19
0x1a3c…1a5b at001a = ╱22╱"╱ // 0x1a56 @0x1a
0x1a3c…1a5b at001b = ╱30╱0╱ // 0x1a57 @0x1b
0x1a3c…1a5b at001c = ╱2b╱+╱ // 0x1a58 @0x1c
0x1a3c…1a5b at001d = ╱22╱"╱ // 0x1a59 @0x1d
0x1a3c…1a5b at001e = EOL // 0x1a5a @0x1e
0x1a3c…1a5b }
0x1a5b…1a77 a7ce 2810 GLNAVN$=FNAVN$;GFNR=FNR
0x1a5b…1a77 LineComalBin {
0x1a5b…1a77 ptr = 0xa7ce // 0x1a5b @0x0
0x1a5b…1a77 lno = 0x0afa // 0x1a5d @0x2
0x1a5b…1a77 at0004 = ╱47╱G╱ // 0x1a5f @0x4
0x1a5b…1a77 at0005 = ╱4c╱L╱ // 0x1a60 @0x5
0x1a5b…1a77 at0006 = ╱4e╱N╱ // 0x1a61 @0x6
0x1a5b…1a77 at0007 = ╱41╱A╱ // 0x1a62 @0x7
0x1a5b…1a77 at0008 = ╱56╱V╱ // 0x1a63 @0x8
0x1a5b…1a77 at0009 = ╱4e╱N╱ // 0x1a64 @0x9
0x1a5b…1a77 at000a = ╱ef╱$╱ // 0x1a65 @0xa
0x1a5b…1a77 at000b = ╱dc╱=╱ // 0x1a66 @0xb
0x1a5b…1a77 at000c = ╱46╱F╱ // 0x1a67 @0xc
0x1a5b…1a77 at000d = ╱4e╱N╱ // 0x1a68 @0xd
0x1a5b…1a77 at000e = ╱41╱A╱ // 0x1a69 @0xe
0x1a5b…1a77 at000f = ╱56╱V╱ // 0x1a6a @0xf
0x1a5b…1a77 at0010 = ╱4e╱N╱ // 0x1a6b @0x10
0x1a5b…1a77 at0011 = ╱ef╱$╱ // 0x1a6c @0x11
0x1a5b…1a77 at0012 = ╱eb╱;╱ // 0x1a6d @0x12
0x1a5b…1a77 at0013 = ╱47╱G╱ // 0x1a6e @0x13
0x1a5b…1a77 at0014 = ╱46╱F╱ // 0x1a6f @0x14
0x1a5b…1a77 at0015 = ╱4e╱N╱ // 0x1a70 @0x15
0x1a5b…1a77 at0016 = ╱52╱R╱ // 0x1a71 @0x16
0x1a5b…1a77 at0017 = ╱dc╱=╱ // 0x1a72 @0x17
0x1a5b…1a77 at0018 = ╱46╱F╱ // 0x1a73 @0x18
0x1a5b…1a77 at0019 = ╱4e╱N╱ // 0x1a74 @0x19
0x1a5b…1a77 at001a = ╱52╱R╱ // 0x1a75 @0x1a
0x1a5b…1a77 at001b = EOL // 0x1a76 @0x1b
0x1a5b…1a77 }
0x1a77…1a8b a7e2 2820 IF LINIE>34 THEN
0x1a77…1a8b LineComalBin {
0x1a77…1a8b ptr = 0xa7e2 // 0x1a77 @0x0
0x1a77…1a8b lno = 0x0b04 // 0x1a79 @0x2
0x1a77…1a8b at0004 = ╱9c╱ IF ╱ // 0x1a7b @0x4
0x1a77…1a8b at0005 = ╱4c╱L╱ // 0x1a7c @0x5
0x1a77…1a8b at0006 = ╱49╱I╱ // 0x1a7d @0x6
0x1a77…1a8b at0007 = ╱4e╱N╱ // 0x1a7e @0x7
0x1a77…1a8b at0008 = ╱49╱I╱ // 0x1a7f @0x8
0x1a77…1a8b at0009 = ╱45╱E╱ // 0x1a80 @0x9
0x1a77…1a8b at000a = ╱de╱>╱ // 0x1a81 @0xa
0x1a77…1a8b at000b = ╱33╱3╱ // 0x1a82 @0xb
0x1a77…1a8b at000c = ╱34╱4╱ // 0x1a83 @0xc
0x1a77…1a8b at000d = ╱fe00008806╱ // 0x1a84 @0xd
0x1a77…1a8b at0012 = ╱b6╱ THEN ╱ // 0x1a89 @0x12
0x1a77…1a8b at0013 = EOL // 0x1a8a @0x13
0x1a77…1a8b }
0x1a8b…1aa5 a7fc 2830 EXEC NYSIDE(GFNR,GLNAVN$)
0x1a8b…1aa5 LineComalBin {
0x1a8b…1aa5 ptr = 0xa7fc // 0x1a8b @0x0
0x1a8b…1aa5 lno = 0x0b0e // 0x1a8d @0x2
0x1a8b…1aa5 at0004 = ╱9d╱ EXEC ╱ // 0x1a8f @0x4
0x1a8b…1aa5 at0005 = ╱4e╱N╱ // 0x1a90 @0x5
0x1a8b…1aa5 at0006 = ╱59╱Y╱ // 0x1a91 @0x6
0x1a8b…1aa5 at0007 = ╱53╱S╱ // 0x1a92 @0x7
0x1a8b…1aa5 at0008 = ╱49╱I╱ // 0x1a93 @0x8
0x1a8b…1aa5 at0009 = ╱44╱D╱ // 0x1a94 @0x9
0x1a8b…1aa5 at000a = ╱45╱E╱ // 0x1a95 @0xa
0x1a8b…1aa5 at000b = ╱ed╱(╱ // 0x1a96 @0xb
0x1a8b…1aa5 at000c = ╱47╱G╱ // 0x1a97 @0xc
0x1a8b…1aa5 at000d = ╱46╱F╱ // 0x1a98 @0xd
0x1a8b…1aa5 at000e = ╱4e╱N╱ // 0x1a99 @0xe
0x1a8b…1aa5 at000f = ╱52╱R╱ // 0x1a9a @0xf
0x1a8b…1aa5 at0010 = ╱ec╱,╱ // 0x1a9b @0x10
0x1a8b…1aa5 at0011 = ╱47╱G╱ // 0x1a9c @0x11
0x1a8b…1aa5 at0012 = ╱4c╱L╱ // 0x1a9d @0x12
0x1a8b…1aa5 at0013 = ╱4e╱N╱ // 0x1a9e @0x13
0x1a8b…1aa5 at0014 = ╱41╱A╱ // 0x1a9f @0x14
0x1a8b…1aa5 at0015 = ╱56╱V╱ // 0x1aa0 @0x15
0x1a8b…1aa5 at0016 = ╱4e╱N╱ // 0x1aa1 @0x16
0x1a8b…1aa5 at0017 = ╱ef╱$╱ // 0x1aa2 @0x17
0x1a8b…1aa5 at0018 = ╱ee╱)╱ // 0x1aa3 @0x18
0x1a8b…1aa5 at0019 = EOL // 0x1aa4 @0x19
0x1a8b…1aa5 }
0x1aa5…1aab a802 2840 ELSE
0x1aa5…1aab LineComalBin {
0x1aa5…1aab ptr = 0xa802 // 0x1aa5 @0x0
0x1aa5…1aab lno = 0x0b18 // 0x1aa7 @0x2
0x1aa5…1aab at0004 = ╱9a╱ ELSE ╱ // 0x1aa9 @0x4
0x1aa5…1aab at0005 = EOL // 0x1aaa @0x5
0x1aa5…1aab }
0x1aab…1abb a812 2850 PRINT CHR(10)
0x1aab…1abb LineComalBin {
0x1aab…1abb ptr = 0xa812 // 0x1aab @0x0
0x1aab…1abb lno = 0x0b22 // 0x1aad @0x2
0x1aab…1abb at0004 = ╱92╱ PRINT ╱ // 0x1aaf @0x4
0x1aab…1abb at0005 = ╱cf╱CHR╱ // 0x1ab0 @0x5
0x1aab…1abb at0006 = ╱ed╱(╱ // 0x1ab1 @0x6
0x1aab…1abb at0007 = ╱31╱1╱ // 0x1ab2 @0x7
0x1aab…1abb at0008 = ╱30╱0╱ // 0x1ab3 @0x8
0x1aab…1abb at0009 = ╱fe0000a004╱ // 0x1ab4 @0x9
0x1aab…1abb at000e = ╱ee╱)╱ // 0x1ab9 @0xe
0x1aab…1abb at000f = EOL // 0x1aba @0xf
0x1aab…1abb }
0x1abb…1acb a822 2860 PRINT CHR(10)
0x1abb…1acb LineComalBin {
0x1abb…1acb ptr = 0xa822 // 0x1abb @0x0
0x1abb…1acb lno = 0x0b2c // 0x1abd @0x2
0x1abb…1acb at0004 = ╱92╱ PRINT ╱ // 0x1abf @0x4
0x1abb…1acb at0005 = ╱cf╱CHR╱ // 0x1ac0 @0x5
0x1abb…1acb at0006 = ╱ed╱(╱ // 0x1ac1 @0x6
0x1abb…1acb at0007 = ╱31╱1╱ // 0x1ac2 @0x7
0x1abb…1acb at0008 = ╱30╱0╱ // 0x1ac3 @0x8
0x1abb…1acb at0009 = ╱fe0000a004╱ // 0x1ac4 @0x9
0x1abb…1acb at000e = ╱ee╱)╱ // 0x1ac9 @0xe
0x1abb…1acb at000f = EOL // 0x1aca @0xf
0x1abb…1acb }
0x1acb…1ae0 a837 2870 PRINT USING "###### ":FNR;
0x1acb…1ae0 LineComalBin {
0x1acb…1ae0 ptr = 0xa837 // 0x1acb @0x0
0x1acb…1ae0 lno = 0x0b36 // 0x1acd @0x2
0x1acb…1ae0 at0004 = ╱92╱ PRINT ╱ // 0x1acf @0x4
0x1acb…1ae0 at0005 = ╱b9╱ USING ╱ // 0x1ad0 @0x5
0x1acb…1ae0 at0006 = ╱22╱"╱ // 0x1ad1 @0x6
0x1acb…1ae0 at0007 = ╱23╱#╱ // 0x1ad2 @0x7
0x1acb…1ae0 at0008 = ╱23╱#╱ // 0x1ad3 @0x8
0x1acb…1ae0 at0009 = ╱23╱#╱ // 0x1ad4 @0x9
0x1acb…1ae0 at000a = ╱23╱#╱ // 0x1ad5 @0xa
0x1acb…1ae0 at000b = ╱23╱#╱ // 0x1ad6 @0xb
0x1acb…1ae0 at000c = ╱23╱#╱ // 0x1ad7 @0xc
0x1acb…1ae0 at000d = ╱20╱…╱ // 0x1ad8 @0xd
0x1acb…1ae0 at000e = ╱22╱"╱ // 0x1ad9 @0xe
0x1acb…1ae0 at000f = ╱f0╱:╱ // 0x1ada @0xf
0x1acb…1ae0 at0010 = ╱46╱F╱ // 0x1adb @0x10
0x1acb…1ae0 at0011 = ╱4e╱N╱ // 0x1adc @0x11
0x1acb…1ae0 at0012 = ╱52╱R╱ // 0x1add @0x12
0x1acb…1ae0 at0013 = ╱eb╱;╱ // 0x1ade @0x13
0x1acb…1ae0 at0014 = EOL // 0x1adf @0x14
0x1acb…1ae0 }
0x1ae0…1aed a844 2880 PRINT GLNAVN$
0x1ae0…1aed LineComalBin {
0x1ae0…1aed ptr = 0xa844 // 0x1ae0 @0x0
0x1ae0…1aed lno = 0x0b40 // 0x1ae2 @0x2
0x1ae0…1aed at0004 = ╱92╱ PRINT ╱ // 0x1ae4 @0x4
0x1ae0…1aed at0005 = ╱47╱G╱ // 0x1ae5 @0x5
0x1ae0…1aed at0006 = ╱4c╱L╱ // 0x1ae6 @0x6
0x1ae0…1aed at0007 = ╱4e╱N╱ // 0x1ae7 @0x7
0x1ae0…1aed at0008 = ╱41╱A╱ // 0x1ae8 @0x8
0x1ae0…1aed at0009 = ╱56╱V╱ // 0x1ae9 @0x9
0x1ae0…1aed at000a = ╱4e╱N╱ // 0x1aea @0xa
0x1ae0…1aed at000b = ╱ef╱$╱ // 0x1aeb @0xb
0x1ae0…1aed at000c = EOL // 0x1aec @0xc
0x1ae0…1aed }
0x1aed…1b11 a868 2890 PRINT TAB(8);STREG$(E:LEN(GLNAVN$))
0x1aed…1b11 LineComalBin {
0x1aed…1b11 ptr = 0xa868 // 0x1aed @0x0
0x1aed…1b11 lno = 0x0b4a // 0x1aef @0x2
0x1aed…1b11 at0004 = ╱92╱ PRINT ╱ // 0x1af1 @0x4
0x1aed…1b11 at0005 = ╱d2╱TAB╱ // 0x1af2 @0x5
0x1aed…1b11 at0006 = ╱ed╱(╱ // 0x1af3 @0x6
0x1aed…1b11 at0007 = ╱38╱8╱ // 0x1af4 @0x7
0x1aed…1b11 at0008 = ╱fe00008004╱ // 0x1af5 @0x8
0x1aed…1b11 at000d = ╱ee╱)╱ // 0x1afa @0xd
0x1aed…1b11 at000e = ╱eb╱;╱ // 0x1afb @0xe
0x1aed…1b11 at000f = ╱53╱S╱ // 0x1afc @0xf
0x1aed…1b11 at0010 = ╱54╱T╱ // 0x1afd @0x10
0x1aed…1b11 at0011 = ╱52╱R╱ // 0x1afe @0x11
0x1aed…1b11 at0012 = ╱45╱E╱ // 0x1aff @0x12
0x1aed…1b11 at0013 = ╱47╱G╱ // 0x1b00 @0x13
0x1aed…1b11 at0014 = ╱ef╱$╱ // 0x1b01 @0x14
0x1aed…1b11 at0015 = ╱ed╱(╱ // 0x1b02 @0x15
0x1aed…1b11 at0016 = ╱45╱E╱ // 0x1b03 @0x16
0x1aed…1b11 at0017 = ╱f0╱:╱ // 0x1b04 @0x17
0x1aed…1b11 at0018 = ╱cc╱LEN╱ // 0x1b05 @0x18
0x1aed…1b11 at0019 = ╱ed╱(╱ // 0x1b06 @0x19
0x1aed…1b11 at001a = ╱47╱G╱ // 0x1b07 @0x1a
0x1aed…1b11 at001b = ╱4c╱L╱ // 0x1b08 @0x1b
0x1aed…1b11 at001c = ╱4e╱N╱ // 0x1b09 @0x1c
0x1aed…1b11 at001d = ╱41╱A╱ // 0x1b0a @0x1d
0x1aed…1b11 at001e = ╱56╱V╱ // 0x1b0b @0x1e
0x1aed…1b11 at001f = ╱4e╱N╱ // 0x1b0c @0x1f
0x1aed…1b11 at0020 = ╱ef╱$╱ // 0x1b0d @0x20
0x1aed…1b11 at0021 = ╱ee╱)╱ // 0x1b0e @0x21
0x1aed…1b11 at0022 = ╱ee╱)╱ // 0x1b0f @0x22
0x1aed…1b11 at0023 = EOL // 0x1b10 @0x23
0x1aed…1b11 }
0x1b11…1b1a a871 2900 PRINT " "
0x1b11…1b1a LineComalBin {
0x1b11…1b1a ptr = 0xa871 // 0x1b11 @0x0
0x1b11…1b1a lno = 0x0b54 // 0x1b13 @0x2
0x1b11…1b1a at0004 = ╱92╱ PRINT ╱ // 0x1b15 @0x4
0x1b11…1b1a at0005 = ╱22╱"╱ // 0x1b16 @0x5
0x1b11…1b1a at0006 = ╱20╱…╱ // 0x1b17 @0x6
0x1b11…1b1a at0007 = ╱22╱"╱ // 0x1b18 @0x7
0x1b11…1b1a at0008 = EOL // 0x1b19 @0x8
0x1b11…1b1a }
0x1b1a…1b31 a888 2910 LINIE=LINIE+5
0x1b1a…1b31 LineComalBin {
0x1b1a…1b31 ptr = 0xa888 // 0x1b1a @0x0
0x1b1a…1b31 lno = 0x0b5e // 0x1b1c @0x2
0x1b1a…1b31 at0004 = ╱4c╱L╱ // 0x1b1e @0x4
0x1b1a…1b31 at0005 = ╱49╱I╱ // 0x1b1f @0x5
0x1b1a…1b31 at0006 = ╱4e╱N╱ // 0x1b20 @0x6
0x1b1a…1b31 at0007 = ╱49╱I╱ // 0x1b21 @0x7
0x1b1a…1b31 at0008 = ╱45╱E╱ // 0x1b22 @0x8
0x1b1a…1b31 at0009 = ╱dc╱=╱ // 0x1b23 @0x9
0x1b1a…1b31 at000a = ╱4c╱L╱ // 0x1b24 @0xa
0x1b1a…1b31 at000b = ╱49╱I╱ // 0x1b25 @0xb
0x1b1a…1b31 at000c = ╱4e╱N╱ // 0x1b26 @0xc
0x1b1a…1b31 at000d = ╱49╱I╱ // 0x1b27 @0xd
0x1b1a…1b31 at000e = ╱45╱E╱ // 0x1b28 @0xe
0x1b1a…1b31 at000f = ╱e2╱+╱ // 0x1b29 @0xf
0x1b1a…1b31 at0010 = ╱35╱5╱ // 0x1b2a @0x10
0x1b1a…1b31 at0011 = ╱fe0000a003╱ // 0x1b2b @0x11
0x1b1a…1b31 at0016 = EOL // 0x1b30 @0x16
0x1b1a…1b31 }
0x1b31…1b37 a88e 2920 ENDIF
0x1b31…1b37 LineComalBin {
0x1b31…1b37 ptr = 0xa88e // 0x1b31 @0x0
0x1b31…1b37 lno = 0x0b68 // 0x1b33 @0x2
0x1b31…1b37 at0004 = ╱9b╱ ENDIF ╱ // 0x1b35 @0x4
0x1b31…1b37 at0005 = EOL // 0x1b36 @0x5
0x1b31…1b37 }
0x1b37…1b3f a896 2930 WHEN V
0x1b37…1b3f LineComalBin {
0x1b37…1b3f ptr = 0xa896 // 0x1b37 @0x0
0x1b37…1b3f lno = 0x0b72 // 0x1b39 @0x2
0x1b37…1b3f at0004 = ╱a301╱ WHEN ╱ // 0x1b3b @0x4
0x1b37…1b3f at0006 = ╱56╱V╱ // 0x1b3d @0x6
0x1b37…1b3f at0007 = EOL // 0x1b3e @0x7
0x1b37…1b3f }
0x1b3f…1b6f a8c6 2940 IF LINIE>37 AND GFNR>B THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x1b3f…1b6f LineComalBin {
0x1b3f…1b6f ptr = 0xa8c6 // 0x1b3f @0x0
0x1b3f…1b6f lno = 0x0b7c // 0x1b41 @0x2
0x1b3f…1b6f at0004 = ╱82╱ IF ╱ // 0x1b43 @0x4
0x1b3f…1b6f at0005 = ╱4c╱L╱ // 0x1b44 @0x5
0x1b3f…1b6f at0006 = ╱49╱I╱ // 0x1b45 @0x6
0x1b3f…1b6f at0007 = ╱4e╱N╱ // 0x1b46 @0x7
0x1b3f…1b6f at0008 = ╱49╱I╱ // 0x1b47 @0x8
0x1b3f…1b6f at0009 = ╱45╱E╱ // 0x1b48 @0x9
0x1b3f…1b6f at000a = ╱de╱>╱ // 0x1b49 @0xa
0x1b3f…1b6f at000b = ╱33╱3╱ // 0x1b4a @0xb
0x1b3f…1b6f at000c = ╱37╱7╱ // 0x1b4b @0xc
0x1b3f…1b6f at000d = ╱fe00009406╱ // 0x1b4c @0xd
0x1b3f…1b6f at0012 = ╱da╱ AND ╱ // 0x1b51 @0x12
0x1b3f…1b6f at0013 = ╱47╱G╱ // 0x1b52 @0x13
0x1b3f…1b6f at0014 = ╱46╱F╱ // 0x1b53 @0x14
0x1b3f…1b6f at0015 = ╱4e╱N╱ // 0x1b54 @0x15
0x1b3f…1b6f at0016 = ╱52╱R╱ // 0x1b55 @0x16
0x1b3f…1b6f at0017 = ╱de╱>╱ // 0x1b56 @0x17
0x1b3f…1b6f at0018 = ╱42╱B╱ // 0x1b57 @0x18
0x1b3f…1b6f at0019 = ╱b6╱ THEN ╱ // 0x1b58 @0x19
0x1b3f…1b6f at001a = ╱9d╱ EXEC ╱ // 0x1b59 @0x1a
0x1b3f…1b6f at001b = ╱4e╱N╱ // 0x1b5a @0x1b
0x1b3f…1b6f at001c = ╱59╱Y╱ // 0x1b5b @0x1c
0x1b3f…1b6f at001d = ╱53╱S╱ // 0x1b5c @0x1d
0x1b3f…1b6f at001e = ╱49╱I╱ // 0x1b5d @0x1e
0x1b3f…1b6f at001f = ╱44╱D╱ // 0x1b5e @0x1f
0x1b3f…1b6f at0020 = ╱45╱E╱ // 0x1b5f @0x20
0x1b3f…1b6f at0021 = ╱ed╱(╱ // 0x1b60 @0x21
0x1b3f…1b6f at0022 = ╱47╱G╱ // 0x1b61 @0x22
0x1b3f…1b6f at0023 = ╱46╱F╱ // 0x1b62 @0x23
0x1b3f…1b6f at0024 = ╱4e╱N╱ // 0x1b63 @0x24
0x1b3f…1b6f at0025 = ╱52╱R╱ // 0x1b64 @0x25
0x1b3f…1b6f at0026 = ╱ec╱,╱ // 0x1b65 @0x26
0x1b3f…1b6f at0027 = ╱47╱G╱ // 0x1b66 @0x27
0x1b3f…1b6f at0028 = ╱4c╱L╱ // 0x1b67 @0x28
0x1b3f…1b6f at0029 = ╱4e╱N╱ // 0x1b68 @0x29
0x1b3f…1b6f at002a = ╱41╱A╱ // 0x1b69 @0x2a
0x1b3f…1b6f at002b = ╱56╱V╱ // 0x1b6a @0x2b
0x1b3f…1b6f at002c = ╱4e╱N╱ // 0x1b6b @0x2c
0x1b3f…1b6f at002d = ╱ef╱$╱ // 0x1b6c @0x2d
0x1b3f…1b6f at002e = ╱ee╱)╱ // 0x1b6d @0x2e
0x1b3f…1b6f at002f = EOL // 0x1b6e @0x2f
0x1b3f…1b6f }
0x1b6f…1b7c a8d3 2950 IF GFNR>B THEN
0x1b6f…1b7c LineComalBin {
0x1b6f…1b7c ptr = 0xa8d3 // 0x1b6f @0x0
0x1b6f…1b7c lno = 0x0b86 // 0x1b71 @0x2
0x1b6f…1b7c at0004 = ╱9c╱ IF ╱ // 0x1b73 @0x4
0x1b6f…1b7c at0005 = ╱47╱G╱ // 0x1b74 @0x5
0x1b6f…1b7c at0006 = ╱46╱F╱ // 0x1b75 @0x6
0x1b6f…1b7c at0007 = ╱4e╱N╱ // 0x1b76 @0x7
0x1b6f…1b7c at0008 = ╱52╱R╱ // 0x1b77 @0x8
0x1b6f…1b7c at0009 = ╱de╱>╱ // 0x1b78 @0x9
0x1b6f…1b7c at000a = ╱42╱B╱ // 0x1b79 @0xa
0x1b6f…1b7c at000b = ╱b6╱ THEN ╱ // 0x1b7a @0xb
0x1b6f…1b7c at000c = EOL // 0x1b7b @0xc
0x1b6f…1b7c }
0x1b7c…1b85 a8dc 2960 PRINT " "
0x1b7c…1b85 LineComalBin {
0x1b7c…1b85 ptr = 0xa8dc // 0x1b7c @0x0
0x1b7c…1b85 lno = 0x0b90 // 0x1b7e @0x2
0x1b7c…1b85 at0004 = ╱92╱ PRINT ╱ // 0x1b80 @0x4
0x1b7c…1b85 at0005 = ╱22╱"╱ // 0x1b81 @0x5
0x1b7c…1b85 at0006 = ╱20╱…╱ // 0x1b82 @0x6
0x1b7c…1b85 at0007 = ╱22╱"╱ // 0x1b83 @0x7
0x1b7c…1b85 at0008 = EOL // 0x1b84 @0x8
0x1b7c…1b85 }
0x1b85…1ba6 a8fd 2970 PRINT TAB(8);STREG$(E:71)
0x1b85…1ba6 LineComalBin {
0x1b85…1ba6 ptr = 0xa8fd // 0x1b85 @0x0
0x1b85…1ba6 lno = 0x0b9a // 0x1b87 @0x2
0x1b85…1ba6 at0004 = ╱92╱ PRINT ╱ // 0x1b89 @0x4
0x1b85…1ba6 at0005 = ╱d2╱TAB╱ // 0x1b8a @0x5
0x1b85…1ba6 at0006 = ╱ed╱(╱ // 0x1b8b @0x6
0x1b85…1ba6 at0007 = ╱38╱8╱ // 0x1b8c @0x7
0x1b85…1ba6 at0008 = ╱fe00008004╱ // 0x1b8d @0x8
0x1b85…1ba6 at000d = ╱ee╱)╱ // 0x1b92 @0xd
0x1b85…1ba6 at000e = ╱eb╱;╱ // 0x1b93 @0xe
0x1b85…1ba6 at000f = ╱53╱S╱ // 0x1b94 @0xf
0x1b85…1ba6 at0010 = ╱54╱T╱ // 0x1b95 @0x10
0x1b85…1ba6 at0011 = ╱52╱R╱ // 0x1b96 @0x11
0x1b85…1ba6 at0012 = ╱45╱E╱ // 0x1b97 @0x12
0x1b85…1ba6 at0013 = ╱47╱G╱ // 0x1b98 @0x13
0x1b85…1ba6 at0014 = ╱ef╱$╱ // 0x1b99 @0x14
0x1b85…1ba6 at0015 = ╱ed╱(╱ // 0x1b9a @0x15
0x1b85…1ba6 at0016 = ╱45╱E╱ // 0x1b9b @0x16
0x1b85…1ba6 at0017 = ╱f0╱:╱ // 0x1b9c @0x17
0x1b85…1ba6 at0018 = ╱37╱7╱ // 0x1b9d @0x18
0x1b85…1ba6 at0019 = ╱31╱1╱ // 0x1b9e @0x19
0x1b85…1ba6 at001a = ╱fe00008e07╱ // 0x1b9f @0x1a
0x1b85…1ba6 at001f = ╱ee╱)╱ // 0x1ba4 @0x1f
0x1b85…1ba6 at0020 = EOL // 0x1ba5 @0x20
0x1b85…1ba6 }
0x1ba6…1bd2 a929 2980 EXEC LINIEUD(GFNR,GLNAVN$,SALDO2$,SALDO12$)
0x1ba6…1bd2 LineComalBin {
0x1ba6…1bd2 ptr = 0xa929 // 0x1ba6 @0x0
0x1ba6…1bd2 lno = 0x0ba4 // 0x1ba8 @0x2
0x1ba6…1bd2 at0004 = ╱9d╱ EXEC ╱ // 0x1baa @0x4
0x1ba6…1bd2 at0005 = ╱4c╱L╱ // 0x1bab @0x5
0x1ba6…1bd2 at0006 = ╱49╱I╱ // 0x1bac @0x6
0x1ba6…1bd2 at0007 = ╱4e╱N╱ // 0x1bad @0x7
0x1ba6…1bd2 at0008 = ╱49╱I╱ // 0x1bae @0x8
0x1ba6…1bd2 at0009 = ╱45╱E╱ // 0x1baf @0x9
0x1ba6…1bd2 at000a = ╱55╱U╱ // 0x1bb0 @0xa
0x1ba6…1bd2 at000b = ╱44╱D╱ // 0x1bb1 @0xb
0x1ba6…1bd2 at000c = ╱ed╱(╱ // 0x1bb2 @0xc
0x1ba6…1bd2 at000d = ╱47╱G╱ // 0x1bb3 @0xd
0x1ba6…1bd2 at000e = ╱46╱F╱ // 0x1bb4 @0xe
0x1ba6…1bd2 at000f = ╱4e╱N╱ // 0x1bb5 @0xf
0x1ba6…1bd2 at0010 = ╱52╱R╱ // 0x1bb6 @0x10
0x1ba6…1bd2 at0011 = ╱ec╱,╱ // 0x1bb7 @0x11
0x1ba6…1bd2 at0012 = ╱47╱G╱ // 0x1bb8 @0x12
0x1ba6…1bd2 at0013 = ╱4c╱L╱ // 0x1bb9 @0x13
0x1ba6…1bd2 at0014 = ╱4e╱N╱ // 0x1bba @0x14
0x1ba6…1bd2 at0015 = ╱41╱A╱ // 0x1bbb @0x15
0x1ba6…1bd2 at0016 = ╱56╱V╱ // 0x1bbc @0x16
0x1ba6…1bd2 at0017 = ╱4e╱N╱ // 0x1bbd @0x17
0x1ba6…1bd2 at0018 = ╱ef╱$╱ // 0x1bbe @0x18
0x1ba6…1bd2 at0019 = ╱ec╱,╱ // 0x1bbf @0x19
0x1ba6…1bd2 at001a = ╱53╱S╱ // 0x1bc0 @0x1a
0x1ba6…1bd2 at001b = ╱41╱A╱ // 0x1bc1 @0x1b
0x1ba6…1bd2 at001c = ╱4c╱L╱ // 0x1bc2 @0x1c
0x1ba6…1bd2 at001d = ╱44╱D╱ // 0x1bc3 @0x1d
0x1ba6…1bd2 at001e = ╱4f╱O╱ // 0x1bc4 @0x1e
0x1ba6…1bd2 at001f = ╱32╱2╱ // 0x1bc5 @0x1f
0x1ba6…1bd2 at0020 = ╱ef╱$╱ // 0x1bc6 @0x20
0x1ba6…1bd2 at0021 = ╱ec╱,╱ // 0x1bc7 @0x21
0x1ba6…1bd2 at0022 = ╱53╱S╱ // 0x1bc8 @0x22
0x1ba6…1bd2 at0023 = ╱41╱A╱ // 0x1bc9 @0x23
0x1ba6…1bd2 at0024 = ╱4c╱L╱ // 0x1bca @0x24
0x1ba6…1bd2 at0025 = ╱44╱D╱ // 0x1bcb @0x25
0x1ba6…1bd2 at0026 = ╱4f╱O╱ // 0x1bcc @0x26
0x1ba6…1bd2 at0027 = ╱31╱1╱ // 0x1bcd @0x27
0x1ba6…1bd2 at0028 = ╱32╱2╱ // 0x1bce @0x28
0x1ba6…1bd2 at0029 = ╱ef╱$╱ // 0x1bcf @0x29
0x1ba6…1bd2 at002a = ╱ee╱)╱ // 0x1bd0 @0x2a
0x1ba6…1bd2 at002b = EOL // 0x1bd1 @0x2b
0x1ba6…1bd2 }
0x1bd2…1c06 a95d 2990 SALDO2$="0+";SALDO12$="0+";LINIE=LINIE+V;GFNR=B
0x1bd2…1c06 LineComalBin {
0x1bd2…1c06 ptr = 0xa95d // 0x1bd2 @0x0
0x1bd2…1c06 lno = 0x0bae // 0x1bd4 @0x2
0x1bd2…1c06 at0004 = ╱53╱S╱ // 0x1bd6 @0x4
0x1bd2…1c06 at0005 = ╱41╱A╱ // 0x1bd7 @0x5
0x1bd2…1c06 at0006 = ╱4c╱L╱ // 0x1bd8 @0x6
0x1bd2…1c06 at0007 = ╱44╱D╱ // 0x1bd9 @0x7
0x1bd2…1c06 at0008 = ╱4f╱O╱ // 0x1bda @0x8
0x1bd2…1c06 at0009 = ╱32╱2╱ // 0x1bdb @0x9
0x1bd2…1c06 at000a = ╱ef╱$╱ // 0x1bdc @0xa
0x1bd2…1c06 at000b = ╱dc╱=╱ // 0x1bdd @0xb
0x1bd2…1c06 at000c = ╱22╱"╱ // 0x1bde @0xc
0x1bd2…1c06 at000d = ╱30╱0╱ // 0x1bdf @0xd
0x1bd2…1c06 at000e = ╱2b╱+╱ // 0x1be0 @0xe
0x1bd2…1c06 at000f = ╱22╱"╱ // 0x1be1 @0xf
0x1bd2…1c06 at0010 = ╱eb╱;╱ // 0x1be2 @0x10
0x1bd2…1c06 at0011 = ╱53╱S╱ // 0x1be3 @0x11
0x1bd2…1c06 at0012 = ╱41╱A╱ // 0x1be4 @0x12
0x1bd2…1c06 at0013 = ╱4c╱L╱ // 0x1be5 @0x13
0x1bd2…1c06 at0014 = ╱44╱D╱ // 0x1be6 @0x14
0x1bd2…1c06 at0015 = ╱4f╱O╱ // 0x1be7 @0x15
0x1bd2…1c06 at0016 = ╱31╱1╱ // 0x1be8 @0x16
0x1bd2…1c06 at0017 = ╱32╱2╱ // 0x1be9 @0x17
0x1bd2…1c06 at0018 = ╱ef╱$╱ // 0x1bea @0x18
0x1bd2…1c06 at0019 = ╱dc╱=╱ // 0x1beb @0x19
0x1bd2…1c06 at001a = ╱22╱"╱ // 0x1bec @0x1a
0x1bd2…1c06 at001b = ╱30╱0╱ // 0x1bed @0x1b
0x1bd2…1c06 at001c = ╱2b╱+╱ // 0x1bee @0x1c
0x1bd2…1c06 at001d = ╱22╱"╱ // 0x1bef @0x1d
0x1bd2…1c06 at001e = ╱eb╱;╱ // 0x1bf0 @0x1e
0x1bd2…1c06 at001f = ╱4c╱L╱ // 0x1bf1 @0x1f
0x1bd2…1c06 at0020 = ╱49╱I╱ // 0x1bf2 @0x20
0x1bd2…1c06 at0021 = ╱4e╱N╱ // 0x1bf3 @0x21
0x1bd2…1c06 at0022 = ╱49╱I╱ // 0x1bf4 @0x22
0x1bd2…1c06 at0023 = ╱45╱E╱ // 0x1bf5 @0x23
0x1bd2…1c06 at0024 = ╱dc╱=╱ // 0x1bf6 @0x24
0x1bd2…1c06 at0025 = ╱4c╱L╱ // 0x1bf7 @0x25
0x1bd2…1c06 at0026 = ╱49╱I╱ // 0x1bf8 @0x26
0x1bd2…1c06 at0027 = ╱4e╱N╱ // 0x1bf9 @0x27
0x1bd2…1c06 at0028 = ╱49╱I╱ // 0x1bfa @0x28
0x1bd2…1c06 at0029 = ╱45╱E╱ // 0x1bfb @0x29
0x1bd2…1c06 at002a = ╱e2╱+╱ // 0x1bfc @0x2a
0x1bd2…1c06 at002b = ╱56╱V╱ // 0x1bfd @0x2b
0x1bd2…1c06 at002c = ╱eb╱;╱ // 0x1bfe @0x2c
0x1bd2…1c06 at002d = ╱47╱G╱ // 0x1bff @0x2d
0x1bd2…1c06 at002e = ╱46╱F╱ // 0x1c00 @0x2e
0x1bd2…1c06 at002f = ╱4e╱N╱ // 0x1c01 @0x2f
0x1bd2…1c06 at0030 = ╱52╱R╱ // 0x1c02 @0x30
0x1bd2…1c06 at0031 = ╱dc╱=╱ // 0x1c03 @0x31
0x1bd2…1c06 at0032 = ╱42╱B╱ // 0x1c04 @0x32
0x1bd2…1c06 at0033 = EOL // 0x1c05 @0x33
0x1bd2…1c06 }
0x1c06…1c0c a963 3000 ENDIF
0x1c06…1c0c LineComalBin {
0x1c06…1c0c ptr = 0xa963 // 0x1c06 @0x0
0x1c06…1c0c lno = 0x0bb8 // 0x1c08 @0x2
0x1c06…1c0c at0004 = ╱9b╱ ENDIF ╱ // 0x1c0a @0x4
0x1c06…1c0c at0005 = EOL // 0x1c0b @0x5
0x1c06…1c0c }
0x1c0c…1c35 a98c 3010 IF LINIE>36 THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x1c0c…1c35 LineComalBin {
0x1c0c…1c35 ptr = 0xa98c // 0x1c0c @0x0
0x1c0c…1c35 lno = 0x0bc2 // 0x1c0e @0x2
0x1c0c…1c35 at0004 = ╱82╱ IF ╱ // 0x1c10 @0x4
0x1c0c…1c35 at0005 = ╱4c╱L╱ // 0x1c11 @0x5
0x1c0c…1c35 at0006 = ╱49╱I╱ // 0x1c12 @0x6
0x1c0c…1c35 at0007 = ╱4e╱N╱ // 0x1c13 @0x7
0x1c0c…1c35 at0008 = ╱49╱I╱ // 0x1c14 @0x8
0x1c0c…1c35 at0009 = ╱45╱E╱ // 0x1c15 @0x9
0x1c0c…1c35 at000a = ╱de╱>╱ // 0x1c16 @0xa
0x1c0c…1c35 at000b = ╱33╱3╱ // 0x1c17 @0xb
0x1c0c…1c35 at000c = ╱36╱6╱ // 0x1c18 @0xc
0x1c0c…1c35 at000d = ╱fe00009006╱ // 0x1c19 @0xd
0x1c0c…1c35 at0012 = ╱b6╱ THEN ╱ // 0x1c1e @0x12
0x1c0c…1c35 at0013 = ╱9d╱ EXEC ╱ // 0x1c1f @0x13
0x1c0c…1c35 at0014 = ╱4e╱N╱ // 0x1c20 @0x14
0x1c0c…1c35 at0015 = ╱59╱Y╱ // 0x1c21 @0x15
0x1c0c…1c35 at0016 = ╱53╱S╱ // 0x1c22 @0x16
0x1c0c…1c35 at0017 = ╱49╱I╱ // 0x1c23 @0x17
0x1c0c…1c35 at0018 = ╱44╱D╱ // 0x1c24 @0x18
0x1c0c…1c35 at0019 = ╱45╱E╱ // 0x1c25 @0x19
0x1c0c…1c35 at001a = ╱ed╱(╱ // 0x1c26 @0x1a
0x1c0c…1c35 at001b = ╱47╱G╱ // 0x1c27 @0x1b
0x1c0c…1c35 at001c = ╱46╱F╱ // 0x1c28 @0x1c
0x1c0c…1c35 at001d = ╱4e╱N╱ // 0x1c29 @0x1d
0x1c0c…1c35 at001e = ╱52╱R╱ // 0x1c2a @0x1e
0x1c0c…1c35 at001f = ╱ec╱,╱ // 0x1c2b @0x1f
0x1c0c…1c35 at0020 = ╱47╱G╱ // 0x1c2c @0x20
0x1c0c…1c35 at0021 = ╱4c╱L╱ // 0x1c2d @0x21
0x1c0c…1c35 at0022 = ╱4e╱N╱ // 0x1c2e @0x22
0x1c0c…1c35 at0023 = ╱41╱A╱ // 0x1c2f @0x23
0x1c0c…1c35 at0024 = ╱56╱V╱ // 0x1c30 @0x24
0x1c0c…1c35 at0025 = ╱4e╱N╱ // 0x1c31 @0x25
0x1c0c…1c35 at0026 = ╱ef╱$╱ // 0x1c32 @0x26
0x1c0c…1c35 at0027 = ╱ee╱)╱ // 0x1c33 @0x27
0x1c0c…1c35 at0028 = EOL // 0x1c34 @0x28
0x1c0c…1c35 }
0x1c35…1c3e a995 3020 PRINT " "
0x1c35…1c3e LineComalBin {
0x1c35…1c3e ptr = 0xa995 // 0x1c35 @0x0
0x1c35…1c3e lno = 0x0bcc // 0x1c37 @0x2
0x1c35…1c3e at0004 = ╱92╱ PRINT ╱ // 0x1c39 @0x4
0x1c35…1c3e at0005 = ╱22╱"╱ // 0x1c3a @0x5
0x1c35…1c3e at0006 = ╱20╱…╱ // 0x1c3b @0x6
0x1c35…1c3e at0007 = ╱22╱"╱ // 0x1c3c @0x7
0x1c35…1c3e at0008 = EOL // 0x1c3d @0x8
0x1c35…1c3e }
0x1c3e…1c5f a9b6 3030 PRINT TAB(8);STREG$(E:71)
0x1c3e…1c5f LineComalBin {
0x1c3e…1c5f ptr = 0xa9b6 // 0x1c3e @0x0
0x1c3e…1c5f lno = 0x0bd6 // 0x1c40 @0x2
0x1c3e…1c5f at0004 = ╱92╱ PRINT ╱ // 0x1c42 @0x4
0x1c3e…1c5f at0005 = ╱d2╱TAB╱ // 0x1c43 @0x5
0x1c3e…1c5f at0006 = ╱ed╱(╱ // 0x1c44 @0x6
0x1c3e…1c5f at0007 = ╱38╱8╱ // 0x1c45 @0x7
0x1c3e…1c5f at0008 = ╱fe00008004╱ // 0x1c46 @0x8
0x1c3e…1c5f at000d = ╱ee╱)╱ // 0x1c4b @0xd
0x1c3e…1c5f at000e = ╱eb╱;╱ // 0x1c4c @0xe
0x1c3e…1c5f at000f = ╱53╱S╱ // 0x1c4d @0xf
0x1c3e…1c5f at0010 = ╱54╱T╱ // 0x1c4e @0x10
0x1c3e…1c5f at0011 = ╱52╱R╱ // 0x1c4f @0x11
0x1c3e…1c5f at0012 = ╱45╱E╱ // 0x1c50 @0x12
0x1c3e…1c5f at0013 = ╱47╱G╱ // 0x1c51 @0x13
0x1c3e…1c5f at0014 = ╱ef╱$╱ // 0x1c52 @0x14
0x1c3e…1c5f at0015 = ╱ed╱(╱ // 0x1c53 @0x15
0x1c3e…1c5f at0016 = ╱45╱E╱ // 0x1c54 @0x16
0x1c3e…1c5f at0017 = ╱f0╱:╱ // 0x1c55 @0x17
0x1c3e…1c5f at0018 = ╱37╱7╱ // 0x1c56 @0x18
0x1c3e…1c5f at0019 = ╱31╱1╱ // 0x1c57 @0x19
0x1c3e…1c5f at001a = ╱fe00008e07╱ // 0x1c58 @0x1a
0x1c3e…1c5f at001f = ╱ee╱)╱ // 0x1c5d @0x1f
0x1c3e…1c5f at0020 = EOL // 0x1c5e @0x20
0x1c3e…1c5f }
0x1c5f…1c89 a9e0 3040 EXEC LINIEUD(FNR,FNAVN$,SALDO3$,SALDO13$)
0x1c5f…1c89 LineComalBin {
0x1c5f…1c89 ptr = 0xa9e0 // 0x1c5f @0x0
0x1c5f…1c89 lno = 0x0be0 // 0x1c61 @0x2
0x1c5f…1c89 at0004 = ╱9d╱ EXEC ╱ // 0x1c63 @0x4
0x1c5f…1c89 at0005 = ╱4c╱L╱ // 0x1c64 @0x5
0x1c5f…1c89 at0006 = ╱49╱I╱ // 0x1c65 @0x6
0x1c5f…1c89 at0007 = ╱4e╱N╱ // 0x1c66 @0x7
0x1c5f…1c89 at0008 = ╱49╱I╱ // 0x1c67 @0x8
0x1c5f…1c89 at0009 = ╱45╱E╱ // 0x1c68 @0x9
0x1c5f…1c89 at000a = ╱55╱U╱ // 0x1c69 @0xa
0x1c5f…1c89 at000b = ╱44╱D╱ // 0x1c6a @0xb
0x1c5f…1c89 at000c = ╱ed╱(╱ // 0x1c6b @0xc
0x1c5f…1c89 at000d = ╱46╱F╱ // 0x1c6c @0xd
0x1c5f…1c89 at000e = ╱4e╱N╱ // 0x1c6d @0xe
0x1c5f…1c89 at000f = ╱52╱R╱ // 0x1c6e @0xf
0x1c5f…1c89 at0010 = ╱ec╱,╱ // 0x1c6f @0x10
0x1c5f…1c89 at0011 = ╱46╱F╱ // 0x1c70 @0x11
0x1c5f…1c89 at0012 = ╱4e╱N╱ // 0x1c71 @0x12
0x1c5f…1c89 at0013 = ╱41╱A╱ // 0x1c72 @0x13
0x1c5f…1c89 at0014 = ╱56╱V╱ // 0x1c73 @0x14
0x1c5f…1c89 at0015 = ╱4e╱N╱ // 0x1c74 @0x15
0x1c5f…1c89 at0016 = ╱ef╱$╱ // 0x1c75 @0x16
0x1c5f…1c89 at0017 = ╱ec╱,╱ // 0x1c76 @0x17
0x1c5f…1c89 at0018 = ╱53╱S╱ // 0x1c77 @0x18
0x1c5f…1c89 at0019 = ╱41╱A╱ // 0x1c78 @0x19
0x1c5f…1c89 at001a = ╱4c╱L╱ // 0x1c79 @0x1a
0x1c5f…1c89 at001b = ╱44╱D╱ // 0x1c7a @0x1b
0x1c5f…1c89 at001c = ╱4f╱O╱ // 0x1c7b @0x1c
0x1c5f…1c89 at001d = ╱33╱3╱ // 0x1c7c @0x1d
0x1c5f…1c89 at001e = ╱ef╱$╱ // 0x1c7d @0x1e
0x1c5f…1c89 at001f = ╱ec╱,╱ // 0x1c7e @0x1f
0x1c5f…1c89 at0020 = ╱53╱S╱ // 0x1c7f @0x20
0x1c5f…1c89 at0021 = ╱41╱A╱ // 0x1c80 @0x21
0x1c5f…1c89 at0022 = ╱4c╱L╱ // 0x1c81 @0x22
0x1c5f…1c89 at0023 = ╱44╱D╱ // 0x1c82 @0x23
0x1c5f…1c89 at0024 = ╱4f╱O╱ // 0x1c83 @0x24
0x1c5f…1c89 at0025 = ╱31╱1╱ // 0x1c84 @0x25
0x1c5f…1c89 at0026 = ╱33╱3╱ // 0x1c85 @0x26
0x1c5f…1c89 at0027 = ╱ef╱$╱ // 0x1c86 @0x27
0x1c5f…1c89 at0028 = ╱ee╱)╱ // 0x1c87 @0x28
0x1c5f…1c89 at0029 = EOL // 0x1c88 @0x29
0x1c5f…1c89 }
0x1c89…1ca8 a9ff 3050 SALDO1$="0+";SALDO11$="0+"
0x1c89…1ca8 LineComalBin {
0x1c89…1ca8 ptr = 0xa9ff // 0x1c89 @0x0
0x1c89…1ca8 lno = 0x0bea // 0x1c8b @0x2
0x1c89…1ca8 at0004 = ╱53╱S╱ // 0x1c8d @0x4
0x1c89…1ca8 at0005 = ╱41╱A╱ // 0x1c8e @0x5
0x1c89…1ca8 at0006 = ╱4c╱L╱ // 0x1c8f @0x6
0x1c89…1ca8 at0007 = ╱44╱D╱ // 0x1c90 @0x7
0x1c89…1ca8 at0008 = ╱4f╱O╱ // 0x1c91 @0x8
0x1c89…1ca8 at0009 = ╱31╱1╱ // 0x1c92 @0x9
0x1c89…1ca8 at000a = ╱ef╱$╱ // 0x1c93 @0xa
0x1c89…1ca8 at000b = ╱dc╱=╱ // 0x1c94 @0xb
0x1c89…1ca8 at000c = ╱22╱"╱ // 0x1c95 @0xc
0x1c89…1ca8 at000d = ╱30╱0╱ // 0x1c96 @0xd
0x1c89…1ca8 at000e = ╱2b╱+╱ // 0x1c97 @0xe
0x1c89…1ca8 at000f = ╱22╱"╱ // 0x1c98 @0xf
0x1c89…1ca8 at0010 = ╱eb╱;╱ // 0x1c99 @0x10
0x1c89…1ca8 at0011 = ╱53╱S╱ // 0x1c9a @0x11
0x1c89…1ca8 at0012 = ╱41╱A╱ // 0x1c9b @0x12
0x1c89…1ca8 at0013 = ╱4c╱L╱ // 0x1c9c @0x13
0x1c89…1ca8 at0014 = ╱44╱D╱ // 0x1c9d @0x14
0x1c89…1ca8 at0015 = ╱4f╱O╱ // 0x1c9e @0x15
0x1c89…1ca8 at0016 = ╱31╱1╱ // 0x1c9f @0x16
0x1c89…1ca8 at0017 = ╱31╱1╱ // 0x1ca0 @0x17
0x1c89…1ca8 at0018 = ╱ef╱$╱ // 0x1ca1 @0x18
0x1c89…1ca8 at0019 = ╱dc╱=╱ // 0x1ca2 @0x19
0x1c89…1ca8 at001a = ╱22╱"╱ // 0x1ca3 @0x1a
0x1c89…1ca8 at001b = ╱30╱0╱ // 0x1ca4 @0x1b
0x1c89…1ca8 at001c = ╱2b╱+╱ // 0x1ca5 @0x1c
0x1c89…1ca8 at001d = ╱22╱"╱ // 0x1ca6 @0x1d
0x1c89…1ca8 at001e = EOL // 0x1ca7 @0x1e
0x1c89…1ca8 }
0x1ca8…1cc9 aa20 3060 PRINT TAB(8);STREG$(E:71)
0x1ca8…1cc9 LineComalBin {
0x1ca8…1cc9 ptr = 0xaa20 // 0x1ca8 @0x0
0x1ca8…1cc9 lno = 0x0bf4 // 0x1caa @0x2
0x1ca8…1cc9 at0004 = ╱92╱ PRINT ╱ // 0x1cac @0x4
0x1ca8…1cc9 at0005 = ╱d2╱TAB╱ // 0x1cad @0x5
0x1ca8…1cc9 at0006 = ╱ed╱(╱ // 0x1cae @0x6
0x1ca8…1cc9 at0007 = ╱38╱8╱ // 0x1caf @0x7
0x1ca8…1cc9 at0008 = ╱fe00008004╱ // 0x1cb0 @0x8
0x1ca8…1cc9 at000d = ╱ee╱)╱ // 0x1cb5 @0xd
0x1ca8…1cc9 at000e = ╱eb╱;╱ // 0x1cb6 @0xe
0x1ca8…1cc9 at000f = ╱53╱S╱ // 0x1cb7 @0xf
0x1ca8…1cc9 at0010 = ╱54╱T╱ // 0x1cb8 @0x10
0x1ca8…1cc9 at0011 = ╱52╱R╱ // 0x1cb9 @0x11
0x1ca8…1cc9 at0012 = ╱45╱E╱ // 0x1cba @0x12
0x1ca8…1cc9 at0013 = ╱47╱G╱ // 0x1cbb @0x13
0x1ca8…1cc9 at0014 = ╱ef╱$╱ // 0x1cbc @0x14
0x1ca8…1cc9 at0015 = ╱ed╱(╱ // 0x1cbd @0x15
0x1ca8…1cc9 at0016 = ╱45╱E╱ // 0x1cbe @0x16
0x1ca8…1cc9 at0017 = ╱f0╱:╱ // 0x1cbf @0x17
0x1ca8…1cc9 at0018 = ╱37╱7╱ // 0x1cc0 @0x18
0x1ca8…1cc9 at0019 = ╱31╱1╱ // 0x1cc1 @0x19
0x1ca8…1cc9 at001a = ╱fe00008e07╱ // 0x1cc2 @0x1a
0x1ca8…1cc9 at001f = ╱ee╱)╱ // 0x1cc7 @0x1f
0x1ca8…1cc9 at0020 = EOL // 0x1cc8 @0x20
0x1ca8…1cc9 }
0x1cc9…1cd2 aa29 3070 PRINT " "
0x1cc9…1cd2 LineComalBin {
0x1cc9…1cd2 ptr = 0xaa29 // 0x1cc9 @0x0
0x1cc9…1cd2 lno = 0x0bfe // 0x1ccb @0x2
0x1cc9…1cd2 at0004 = ╱92╱ PRINT ╱ // 0x1ccd @0x4
0x1cc9…1cd2 at0005 = ╱22╱"╱ // 0x1cce @0x5
0x1cc9…1cd2 at0006 = ╱20╱…╱ // 0x1ccf @0x6
0x1cc9…1cd2 at0007 = ╱22╱"╱ // 0x1cd0 @0x7
0x1cc9…1cd2 at0008 = EOL // 0x1cd1 @0x8
0x1cc9…1cd2 }
0x1cd2…1ce9 aa40 3080 LINIE=LINIE+5
0x1cd2…1ce9 LineComalBin {
0x1cd2…1ce9 ptr = 0xaa40 // 0x1cd2 @0x0
0x1cd2…1ce9 lno = 0x0c08 // 0x1cd4 @0x2
0x1cd2…1ce9 at0004 = ╱4c╱L╱ // 0x1cd6 @0x4
0x1cd2…1ce9 at0005 = ╱49╱I╱ // 0x1cd7 @0x5
0x1cd2…1ce9 at0006 = ╱4e╱N╱ // 0x1cd8 @0x6
0x1cd2…1ce9 at0007 = ╱49╱I╱ // 0x1cd9 @0x7
0x1cd2…1ce9 at0008 = ╱45╱E╱ // 0x1cda @0x8
0x1cd2…1ce9 at0009 = ╱dc╱=╱ // 0x1cdb @0x9
0x1cd2…1ce9 at000a = ╱4c╱L╱ // 0x1cdc @0xa
0x1cd2…1ce9 at000b = ╱49╱I╱ // 0x1cdd @0xb
0x1cd2…1ce9 at000c = ╱4e╱N╱ // 0x1cde @0xc
0x1cd2…1ce9 at000d = ╱49╱I╱ // 0x1cdf @0xd
0x1cd2…1ce9 at000e = ╱45╱E╱ // 0x1ce0 @0xe
0x1cd2…1ce9 at000f = ╱e2╱+╱ // 0x1ce1 @0xf
0x1cd2…1ce9 at0010 = ╱35╱5╱ // 0x1ce2 @0x10
0x1cd2…1ce9 at0011 = ╱fe0000a003╱ // 0x1ce3 @0x11
0x1cd2…1ce9 at0016 = EOL // 0x1ce8 @0x16
0x1cd2…1ce9 }
0x1ce9…1cf6 aa4d 3090 WHEN 4
0x1ce9…1cf6 LineComalBin {
0x1ce9…1cf6 ptr = 0xaa4d // 0x1ce9 @0x0
0x1ce9…1cf6 lno = 0x0c12 // 0x1ceb @0x2
0x1ce9…1cf6 at0004 = ╱a301╱ WHEN ╱ // 0x1ced @0x4
0x1ce9…1cf6 at0006 = ╱34╱4╱ // 0x1cef @0x6
0x1ce9…1cf6 at0007 = ╱fe00008003╱ // 0x1cf0 @0x7
0x1ce9…1cf6 at000c = EOL // 0x1cf5 @0xc
0x1ce9…1cf6 }
0x1cf6…1d03 aa5a 3100 IF GFNR>B THEN
0x1cf6…1d03 LineComalBin {
0x1cf6…1d03 ptr = 0xaa5a // 0x1cf6 @0x0
0x1cf6…1d03 lno = 0x0c1c // 0x1cf8 @0x2
0x1cf6…1d03 at0004 = ╱9c╱ IF ╱ // 0x1cfa @0x4
0x1cf6…1d03 at0005 = ╱47╱G╱ // 0x1cfb @0x5
0x1cf6…1d03 at0006 = ╱46╱F╱ // 0x1cfc @0x6
0x1cf6…1d03 at0007 = ╱4e╱N╱ // 0x1cfd @0x7
0x1cf6…1d03 at0008 = ╱52╱R╱ // 0x1cfe @0x8
0x1cf6…1d03 at0009 = ╱de╱>╱ // 0x1cff @0x9
0x1cf6…1d03 at000a = ╱42╱B╱ // 0x1d00 @0xa
0x1cf6…1d03 at000b = ╱b6╱ THEN ╱ // 0x1d01 @0xb
0x1cf6…1d03 at000c = EOL // 0x1d02 @0xc
0x1cf6…1d03 }
0x1d03…1d2c aa83 3110 IF LINIE>37 THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x1d03…1d2c LineComalBin {
0x1d03…1d2c ptr = 0xaa83 // 0x1d03 @0x0
0x1d03…1d2c lno = 0x0c26 // 0x1d05 @0x2
0x1d03…1d2c at0004 = ╱82╱ IF ╱ // 0x1d07 @0x4
0x1d03…1d2c at0005 = ╱4c╱L╱ // 0x1d08 @0x5
0x1d03…1d2c at0006 = ╱49╱I╱ // 0x1d09 @0x6
0x1d03…1d2c at0007 = ╱4e╱N╱ // 0x1d0a @0x7
0x1d03…1d2c at0008 = ╱49╱I╱ // 0x1d0b @0x8
0x1d03…1d2c at0009 = ╱45╱E╱ // 0x1d0c @0x9
0x1d03…1d2c at000a = ╱de╱>╱ // 0x1d0d @0xa
0x1d03…1d2c at000b = ╱33╱3╱ // 0x1d0e @0xb
0x1d03…1d2c at000c = ╱37╱7╱ // 0x1d0f @0xc
0x1d03…1d2c at000d = ╱fe00009406╱ // 0x1d10 @0xd
0x1d03…1d2c at0012 = ╱b6╱ THEN ╱ // 0x1d15 @0x12
0x1d03…1d2c at0013 = ╱9d╱ EXEC ╱ // 0x1d16 @0x13
0x1d03…1d2c at0014 = ╱4e╱N╱ // 0x1d17 @0x14
0x1d03…1d2c at0015 = ╱59╱Y╱ // 0x1d18 @0x15
0x1d03…1d2c at0016 = ╱53╱S╱ // 0x1d19 @0x16
0x1d03…1d2c at0017 = ╱49╱I╱ // 0x1d1a @0x17
0x1d03…1d2c at0018 = ╱44╱D╱ // 0x1d1b @0x18
0x1d03…1d2c at0019 = ╱45╱E╱ // 0x1d1c @0x19
0x1d03…1d2c at001a = ╱ed╱(╱ // 0x1d1d @0x1a
0x1d03…1d2c at001b = ╱47╱G╱ // 0x1d1e @0x1b
0x1d03…1d2c at001c = ╱46╱F╱ // 0x1d1f @0x1c
0x1d03…1d2c at001d = ╱4e╱N╱ // 0x1d20 @0x1d
0x1d03…1d2c at001e = ╱52╱R╱ // 0x1d21 @0x1e
0x1d03…1d2c at001f = ╱ec╱,╱ // 0x1d22 @0x1f
0x1d03…1d2c at0020 = ╱47╱G╱ // 0x1d23 @0x20
0x1d03…1d2c at0021 = ╱4c╱L╱ // 0x1d24 @0x21
0x1d03…1d2c at0022 = ╱4e╱N╱ // 0x1d25 @0x22
0x1d03…1d2c at0023 = ╱41╱A╱ // 0x1d26 @0x23
0x1d03…1d2c at0024 = ╱56╱V╱ // 0x1d27 @0x24
0x1d03…1d2c at0025 = ╱4e╱N╱ // 0x1d28 @0x25
0x1d03…1d2c at0026 = ╱ef╱$╱ // 0x1d29 @0x26
0x1d03…1d2c at0027 = ╱ee╱)╱ // 0x1d2a @0x27
0x1d03…1d2c at0028 = EOL // 0x1d2b @0x28
0x1d03…1d2c }
0x1d2c…1d35 aa8c 3120 PRINT " "
0x1d2c…1d35 LineComalBin {
0x1d2c…1d35 ptr = 0xaa8c // 0x1d2c @0x0
0x1d2c…1d35 lno = 0x0c30 // 0x1d2e @0x2
0x1d2c…1d35 at0004 = ╱92╱ PRINT ╱ // 0x1d30 @0x4
0x1d2c…1d35 at0005 = ╱22╱"╱ // 0x1d31 @0x5
0x1d2c…1d35 at0006 = ╱20╱…╱ // 0x1d32 @0x6
0x1d2c…1d35 at0007 = ╱22╱"╱ // 0x1d33 @0x7
0x1d2c…1d35 at0008 = EOL // 0x1d34 @0x8
0x1d2c…1d35 }
0x1d35…1d56 aaad 3130 PRINT TAB(8);STREG$(E:71)
0x1d35…1d56 LineComalBin {
0x1d35…1d56 ptr = 0xaaad // 0x1d35 @0x0
0x1d35…1d56 lno = 0x0c3a // 0x1d37 @0x2
0x1d35…1d56 at0004 = ╱92╱ PRINT ╱ // 0x1d39 @0x4
0x1d35…1d56 at0005 = ╱d2╱TAB╱ // 0x1d3a @0x5
0x1d35…1d56 at0006 = ╱ed╱(╱ // 0x1d3b @0x6
0x1d35…1d56 at0007 = ╱38╱8╱ // 0x1d3c @0x7
0x1d35…1d56 at0008 = ╱fe00008004╱ // 0x1d3d @0x8
0x1d35…1d56 at000d = ╱ee╱)╱ // 0x1d42 @0xd
0x1d35…1d56 at000e = ╱eb╱;╱ // 0x1d43 @0xe
0x1d35…1d56 at000f = ╱53╱S╱ // 0x1d44 @0xf
0x1d35…1d56 at0010 = ╱54╱T╱ // 0x1d45 @0x10
0x1d35…1d56 at0011 = ╱52╱R╱ // 0x1d46 @0x11
0x1d35…1d56 at0012 = ╱45╱E╱ // 0x1d47 @0x12
0x1d35…1d56 at0013 = ╱47╱G╱ // 0x1d48 @0x13
0x1d35…1d56 at0014 = ╱ef╱$╱ // 0x1d49 @0x14
0x1d35…1d56 at0015 = ╱ed╱(╱ // 0x1d4a @0x15
0x1d35…1d56 at0016 = ╱45╱E╱ // 0x1d4b @0x16
0x1d35…1d56 at0017 = ╱f0╱:╱ // 0x1d4c @0x17
0x1d35…1d56 at0018 = ╱37╱7╱ // 0x1d4d @0x18
0x1d35…1d56 at0019 = ╱31╱1╱ // 0x1d4e @0x19
0x1d35…1d56 at001a = ╱fe00008e07╱ // 0x1d4f @0x1a
0x1d35…1d56 at001f = ╱ee╱)╱ // 0x1d54 @0x1f
0x1d35…1d56 at0020 = EOL // 0x1d55 @0x20
0x1d35…1d56 }
0x1d56…1d82 aad9 3140 EXEC LINIEUD(GFNR,GLNAVN$,SALDO2$,SALDO12$)
0x1d56…1d82 LineComalBin {
0x1d56…1d82 ptr = 0xaad9 // 0x1d56 @0x0
0x1d56…1d82 lno = 0x0c44 // 0x1d58 @0x2
0x1d56…1d82 at0004 = ╱9d╱ EXEC ╱ // 0x1d5a @0x4
0x1d56…1d82 at0005 = ╱4c╱L╱ // 0x1d5b @0x5
0x1d56…1d82 at0006 = ╱49╱I╱ // 0x1d5c @0x6
0x1d56…1d82 at0007 = ╱4e╱N╱ // 0x1d5d @0x7
0x1d56…1d82 at0008 = ╱49╱I╱ // 0x1d5e @0x8
0x1d56…1d82 at0009 = ╱45╱E╱ // 0x1d5f @0x9
0x1d56…1d82 at000a = ╱55╱U╱ // 0x1d60 @0xa
0x1d56…1d82 at000b = ╱44╱D╱ // 0x1d61 @0xb
0x1d56…1d82 at000c = ╱ed╱(╱ // 0x1d62 @0xc
0x1d56…1d82 at000d = ╱47╱G╱ // 0x1d63 @0xd
0x1d56…1d82 at000e = ╱46╱F╱ // 0x1d64 @0xe
0x1d56…1d82 at000f = ╱4e╱N╱ // 0x1d65 @0xf
0x1d56…1d82 at0010 = ╱52╱R╱ // 0x1d66 @0x10
0x1d56…1d82 at0011 = ╱ec╱,╱ // 0x1d67 @0x11
0x1d56…1d82 at0012 = ╱47╱G╱ // 0x1d68 @0x12
0x1d56…1d82 at0013 = ╱4c╱L╱ // 0x1d69 @0x13
0x1d56…1d82 at0014 = ╱4e╱N╱ // 0x1d6a @0x14
0x1d56…1d82 at0015 = ╱41╱A╱ // 0x1d6b @0x15
0x1d56…1d82 at0016 = ╱56╱V╱ // 0x1d6c @0x16
0x1d56…1d82 at0017 = ╱4e╱N╱ // 0x1d6d @0x17
0x1d56…1d82 at0018 = ╱ef╱$╱ // 0x1d6e @0x18
0x1d56…1d82 at0019 = ╱ec╱,╱ // 0x1d6f @0x19
0x1d56…1d82 at001a = ╱53╱S╱ // 0x1d70 @0x1a
0x1d56…1d82 at001b = ╱41╱A╱ // 0x1d71 @0x1b
0x1d56…1d82 at001c = ╱4c╱L╱ // 0x1d72 @0x1c
0x1d56…1d82 at001d = ╱44╱D╱ // 0x1d73 @0x1d
0x1d56…1d82 at001e = ╱4f╱O╱ // 0x1d74 @0x1e
0x1d56…1d82 at001f = ╱32╱2╱ // 0x1d75 @0x1f
0x1d56…1d82 at0020 = ╱ef╱$╱ // 0x1d76 @0x20
0x1d56…1d82 at0021 = ╱ec╱,╱ // 0x1d77 @0x21
0x1d56…1d82 at0022 = ╱53╱S╱ // 0x1d78 @0x22
0x1d56…1d82 at0023 = ╱41╱A╱ // 0x1d79 @0x23
0x1d56…1d82 at0024 = ╱4c╱L╱ // 0x1d7a @0x24
0x1d56…1d82 at0025 = ╱44╱D╱ // 0x1d7b @0x25
0x1d56…1d82 at0026 = ╱4f╱O╱ // 0x1d7c @0x26
0x1d56…1d82 at0027 = ╱31╱1╱ // 0x1d7d @0x27
0x1d56…1d82 at0028 = ╱32╱2╱ // 0x1d7e @0x28
0x1d56…1d82 at0029 = ╱ef╱$╱ // 0x1d7f @0x29
0x1d56…1d82 at002a = ╱ee╱)╱ // 0x1d80 @0x2a
0x1d56…1d82 at002b = EOL // 0x1d81 @0x2b
0x1d56…1d82 }
0x1d82…1daa ab01 3150 LINIE=LINIE+V;GFNR=B;GLNAVN$=BLANK$
0x1d82…1daa LineComalBin {
0x1d82…1daa ptr = 0xab01 // 0x1d82 @0x0
0x1d82…1daa lno = 0x0c4e // 0x1d84 @0x2
0x1d82…1daa at0004 = ╱4c╱L╱ // 0x1d86 @0x4
0x1d82…1daa at0005 = ╱49╱I╱ // 0x1d87 @0x5
0x1d82…1daa at0006 = ╱4e╱N╱ // 0x1d88 @0x6
0x1d82…1daa at0007 = ╱49╱I╱ // 0x1d89 @0x7
0x1d82…1daa at0008 = ╱45╱E╱ // 0x1d8a @0x8
0x1d82…1daa at0009 = ╱dc╱=╱ // 0x1d8b @0x9
0x1d82…1daa at000a = ╱4c╱L╱ // 0x1d8c @0xa
0x1d82…1daa at000b = ╱49╱I╱ // 0x1d8d @0xb
0x1d82…1daa at000c = ╱4e╱N╱ // 0x1d8e @0xc
0x1d82…1daa at000d = ╱49╱I╱ // 0x1d8f @0xd
0x1d82…1daa at000e = ╱45╱E╱ // 0x1d90 @0xe
0x1d82…1daa at000f = ╱e2╱+╱ // 0x1d91 @0xf
0x1d82…1daa at0010 = ╱56╱V╱ // 0x1d92 @0x10
0x1d82…1daa at0011 = ╱eb╱;╱ // 0x1d93 @0x11
0x1d82…1daa at0012 = ╱47╱G╱ // 0x1d94 @0x12
0x1d82…1daa at0013 = ╱46╱F╱ // 0x1d95 @0x13
0x1d82…1daa at0014 = ╱4e╱N╱ // 0x1d96 @0x14
0x1d82…1daa at0015 = ╱52╱R╱ // 0x1d97 @0x15
0x1d82…1daa at0016 = ╱dc╱=╱ // 0x1d98 @0x16
0x1d82…1daa at0017 = ╱42╱B╱ // 0x1d99 @0x17
0x1d82…1daa at0018 = ╱eb╱;╱ // 0x1d9a @0x18
0x1d82…1daa at0019 = ╱47╱G╱ // 0x1d9b @0x19
0x1d82…1daa at001a = ╱4c╱L╱ // 0x1d9c @0x1a
0x1d82…1daa at001b = ╱4e╱N╱ // 0x1d9d @0x1b
0x1d82…1daa at001c = ╱41╱A╱ // 0x1d9e @0x1c
0x1d82…1daa at001d = ╱56╱V╱ // 0x1d9f @0x1d
0x1d82…1daa at001e = ╱4e╱N╱ // 0x1da0 @0x1e
0x1d82…1daa at001f = ╱ef╱$╱ // 0x1da1 @0x1f
0x1d82…1daa at0020 = ╱dc╱=╱ // 0x1da2 @0x20
0x1d82…1daa at0021 = ╱42╱B╱ // 0x1da3 @0x21
0x1d82…1daa at0022 = ╱4c╱L╱ // 0x1da4 @0x22
0x1d82…1daa at0023 = ╱41╱A╱ // 0x1da5 @0x23
0x1d82…1daa at0024 = ╱4e╱N╱ // 0x1da6 @0x24
0x1d82…1daa at0025 = ╱4b╱K╱ // 0x1da7 @0x25
0x1d82…1daa at0026 = ╱ef╱$╱ // 0x1da8 @0x26
0x1d82…1daa at0027 = EOL // 0x1da9 @0x27
0x1d82…1daa }
0x1daa…1db0 ab07 3160 ENDIF
0x1daa…1db0 LineComalBin {
0x1daa…1db0 ptr = 0xab07 // 0x1daa @0x0
0x1daa…1db0 lno = 0x0c58 // 0x1dac @0x2
0x1daa…1db0 at0004 = ╱9b╱ ENDIF ╱ // 0x1dae @0x4
0x1daa…1db0 at0005 = EOL // 0x1daf @0x5
0x1daa…1db0 }
0x1db0…1dbe ab15 3170 IF GFNR1>B THEN
0x1db0…1dbe LineComalBin {
0x1db0…1dbe ptr = 0xab15 // 0x1db0 @0x0
0x1db0…1dbe lno = 0x0c62 // 0x1db2 @0x2
0x1db0…1dbe at0004 = ╱9c╱ IF ╱ // 0x1db4 @0x4
0x1db0…1dbe at0005 = ╱47╱G╱ // 0x1db5 @0x5
0x1db0…1dbe at0006 = ╱46╱F╱ // 0x1db6 @0x6
0x1db0…1dbe at0007 = ╱4e╱N╱ // 0x1db7 @0x7
0x1db0…1dbe at0008 = ╱52╱R╱ // 0x1db8 @0x8
0x1db0…1dbe at0009 = ╱31╱1╱ // 0x1db9 @0x9
0x1db0…1dbe at000a = ╱de╱>╱ // 0x1dba @0xa
0x1db0…1dbe at000b = ╱42╱B╱ // 0x1dbb @0xb
0x1db0…1dbe at000c = ╱b6╱ THEN ╱ // 0x1dbc @0xc
0x1db0…1dbe at000d = EOL // 0x1dbd @0xd
0x1db0…1dbe }
0x1dbe…1de9 ab40 3180 IF LINIE>37 THEN EXEC NYSIDE(GFNR1,GLNAVN1$)
0x1dbe…1de9 LineComalBin {
0x1dbe…1de9 ptr = 0xab40 // 0x1dbe @0x0
0x1dbe…1de9 lno = 0x0c6c // 0x1dc0 @0x2
0x1dbe…1de9 at0004 = ╱82╱ IF ╱ // 0x1dc2 @0x4
0x1dbe…1de9 at0005 = ╱4c╱L╱ // 0x1dc3 @0x5
0x1dbe…1de9 at0006 = ╱49╱I╱ // 0x1dc4 @0x6
0x1dbe…1de9 at0007 = ╱4e╱N╱ // 0x1dc5 @0x7
0x1dbe…1de9 at0008 = ╱49╱I╱ // 0x1dc6 @0x8
0x1dbe…1de9 at0009 = ╱45╱E╱ // 0x1dc7 @0x9
0x1dbe…1de9 at000a = ╱de╱>╱ // 0x1dc8 @0xa
0x1dbe…1de9 at000b = ╱33╱3╱ // 0x1dc9 @0xb
0x1dbe…1de9 at000c = ╱37╱7╱ // 0x1dca @0xc
0x1dbe…1de9 at000d = ╱fe00009406╱ // 0x1dcb @0xd
0x1dbe…1de9 at0012 = ╱b6╱ THEN ╱ // 0x1dd0 @0x12
0x1dbe…1de9 at0013 = ╱9d╱ EXEC ╱ // 0x1dd1 @0x13
0x1dbe…1de9 at0014 = ╱4e╱N╱ // 0x1dd2 @0x14
0x1dbe…1de9 at0015 = ╱59╱Y╱ // 0x1dd3 @0x15
0x1dbe…1de9 at0016 = ╱53╱S╱ // 0x1dd4 @0x16
0x1dbe…1de9 at0017 = ╱49╱I╱ // 0x1dd5 @0x17
0x1dbe…1de9 at0018 = ╱44╱D╱ // 0x1dd6 @0x18
0x1dbe…1de9 at0019 = ╱45╱E╱ // 0x1dd7 @0x19
0x1dbe…1de9 at001a = ╱ed╱(╱ // 0x1dd8 @0x1a
0x1dbe…1de9 at001b = ╱47╱G╱ // 0x1dd9 @0x1b
0x1dbe…1de9 at001c = ╱46╱F╱ // 0x1dda @0x1c
0x1dbe…1de9 at001d = ╱4e╱N╱ // 0x1ddb @0x1d
0x1dbe…1de9 at001e = ╱52╱R╱ // 0x1ddc @0x1e
0x1dbe…1de9 at001f = ╱31╱1╱ // 0x1ddd @0x1f
0x1dbe…1de9 at0020 = ╱ec╱,╱ // 0x1dde @0x20
0x1dbe…1de9 at0021 = ╱47╱G╱ // 0x1ddf @0x21
0x1dbe…1de9 at0022 = ╱4c╱L╱ // 0x1de0 @0x22
0x1dbe…1de9 at0023 = ╱4e╱N╱ // 0x1de1 @0x23
0x1dbe…1de9 at0024 = ╱41╱A╱ // 0x1de2 @0x24
0x1dbe…1de9 at0025 = ╱56╱V╱ // 0x1de3 @0x25
0x1dbe…1de9 at0026 = ╱4e╱N╱ // 0x1de4 @0x26
0x1dbe…1de9 at0027 = ╱31╱1╱ // 0x1de5 @0x27
0x1dbe…1de9 at0028 = ╱ef╱$╱ // 0x1de6 @0x28
0x1dbe…1de9 at0029 = ╱ee╱)╱ // 0x1de7 @0x29
0x1dbe…1de9 at002a = EOL // 0x1de8 @0x2a
0x1dbe…1de9 }
0x1de9…1df2 ab49 3190 PRINT " "
0x1de9…1df2 LineComalBin {
0x1de9…1df2 ptr = 0xab49 // 0x1de9 @0x0
0x1de9…1df2 lno = 0x0c76 // 0x1deb @0x2
0x1de9…1df2 at0004 = ╱92╱ PRINT ╱ // 0x1ded @0x4
0x1de9…1df2 at0005 = ╱22╱"╱ // 0x1dee @0x5
0x1de9…1df2 at0006 = ╱20╱…╱ // 0x1def @0x6
0x1de9…1df2 at0007 = ╱22╱"╱ // 0x1df0 @0x7
0x1de9…1df2 at0008 = EOL // 0x1df1 @0x8
0x1de9…1df2 }
0x1df2…1e13 ab6a 3200 PRINT TAB(8);STREG$(E:71)
0x1df2…1e13 LineComalBin {
0x1df2…1e13 ptr = 0xab6a // 0x1df2 @0x0
0x1df2…1e13 lno = 0x0c80 // 0x1df4 @0x2
0x1df2…1e13 at0004 = ╱92╱ PRINT ╱ // 0x1df6 @0x4
0x1df2…1e13 at0005 = ╱d2╱TAB╱ // 0x1df7 @0x5
0x1df2…1e13 at0006 = ╱ed╱(╱ // 0x1df8 @0x6
0x1df2…1e13 at0007 = ╱38╱8╱ // 0x1df9 @0x7
0x1df2…1e13 at0008 = ╱fe00008004╱ // 0x1dfa @0x8
0x1df2…1e13 at000d = ╱ee╱)╱ // 0x1dff @0xd
0x1df2…1e13 at000e = ╱eb╱;╱ // 0x1e00 @0xe
0x1df2…1e13 at000f = ╱53╱S╱ // 0x1e01 @0xf
0x1df2…1e13 at0010 = ╱54╱T╱ // 0x1e02 @0x10
0x1df2…1e13 at0011 = ╱52╱R╱ // 0x1e03 @0x11
0x1df2…1e13 at0012 = ╱45╱E╱ // 0x1e04 @0x12
0x1df2…1e13 at0013 = ╱47╱G╱ // 0x1e05 @0x13
0x1df2…1e13 at0014 = ╱ef╱$╱ // 0x1e06 @0x14
0x1df2…1e13 at0015 = ╱ed╱(╱ // 0x1e07 @0x15
0x1df2…1e13 at0016 = ╱45╱E╱ // 0x1e08 @0x16
0x1df2…1e13 at0017 = ╱f0╱:╱ // 0x1e09 @0x17
0x1df2…1e13 at0018 = ╱37╱7╱ // 0x1e0a @0x18
0x1df2…1e13 at0019 = ╱31╱1╱ // 0x1e0b @0x19
0x1df2…1e13 at001a = ╱fe00008e07╱ // 0x1e0c @0x1a
0x1df2…1e13 at001f = ╱ee╱)╱ // 0x1e11 @0x1f
0x1df2…1e13 at0020 = EOL // 0x1e12 @0x20
0x1df2…1e13 }
0x1e13…1e41 ab98 3210 EXEC LINIEUD(GFNR1,GLNAVN1$,SALDO4$,SALDO14$)
0x1e13…1e41 LineComalBin {
0x1e13…1e41 ptr = 0xab98 // 0x1e13 @0x0
0x1e13…1e41 lno = 0x0c8a // 0x1e15 @0x2
0x1e13…1e41 at0004 = ╱9d╱ EXEC ╱ // 0x1e17 @0x4
0x1e13…1e41 at0005 = ╱4c╱L╱ // 0x1e18 @0x5
0x1e13…1e41 at0006 = ╱49╱I╱ // 0x1e19 @0x6
0x1e13…1e41 at0007 = ╱4e╱N╱ // 0x1e1a @0x7
0x1e13…1e41 at0008 = ╱49╱I╱ // 0x1e1b @0x8
0x1e13…1e41 at0009 = ╱45╱E╱ // 0x1e1c @0x9
0x1e13…1e41 at000a = ╱55╱U╱ // 0x1e1d @0xa
0x1e13…1e41 at000b = ╱44╱D╱ // 0x1e1e @0xb
0x1e13…1e41 at000c = ╱ed╱(╱ // 0x1e1f @0xc
0x1e13…1e41 at000d = ╱47╱G╱ // 0x1e20 @0xd
0x1e13…1e41 at000e = ╱46╱F╱ // 0x1e21 @0xe
0x1e13…1e41 at000f = ╱4e╱N╱ // 0x1e22 @0xf
0x1e13…1e41 at0010 = ╱52╱R╱ // 0x1e23 @0x10
0x1e13…1e41 at0011 = ╱31╱1╱ // 0x1e24 @0x11
0x1e13…1e41 at0012 = ╱ec╱,╱ // 0x1e25 @0x12
0x1e13…1e41 at0013 = ╱47╱G╱ // 0x1e26 @0x13
0x1e13…1e41 at0014 = ╱4c╱L╱ // 0x1e27 @0x14
0x1e13…1e41 at0015 = ╱4e╱N╱ // 0x1e28 @0x15
0x1e13…1e41 at0016 = ╱41╱A╱ // 0x1e29 @0x16
0x1e13…1e41 at0017 = ╱56╱V╱ // 0x1e2a @0x17
0x1e13…1e41 at0018 = ╱4e╱N╱ // 0x1e2b @0x18
0x1e13…1e41 at0019 = ╱31╱1╱ // 0x1e2c @0x19
0x1e13…1e41 at001a = ╱ef╱$╱ // 0x1e2d @0x1a
0x1e13…1e41 at001b = ╱ec╱,╱ // 0x1e2e @0x1b
0x1e13…1e41 at001c = ╱53╱S╱ // 0x1e2f @0x1c
0x1e13…1e41 at001d = ╱41╱A╱ // 0x1e30 @0x1d
0x1e13…1e41 at001e = ╱4c╱L╱ // 0x1e31 @0x1e
0x1e13…1e41 at001f = ╱44╱D╱ // 0x1e32 @0x1f
0x1e13…1e41 at0020 = ╱4f╱O╱ // 0x1e33 @0x20
0x1e13…1e41 at0021 = ╱34╱4╱ // 0x1e34 @0x21
0x1e13…1e41 at0022 = ╱ef╱$╱ // 0x1e35 @0x22
0x1e13…1e41 at0023 = ╱ec╱,╱ // 0x1e36 @0x23
0x1e13…1e41 at0024 = ╱53╱S╱ // 0x1e37 @0x24
0x1e13…1e41 at0025 = ╱41╱A╱ // 0x1e38 @0x25
0x1e13…1e41 at0026 = ╱4c╱L╱ // 0x1e39 @0x26
0x1e13…1e41 at0027 = ╱44╱D╱ // 0x1e3a @0x27
0x1e13…1e41 at0028 = ╱4f╱O╱ // 0x1e3b @0x28
0x1e13…1e41 at0029 = ╱31╱1╱ // 0x1e3c @0x29
0x1e13…1e41 at002a = ╱34╱4╱ // 0x1e3d @0x2a
0x1e13…1e41 at002b = ╱ef╱$╱ // 0x1e3e @0x2b
0x1e13…1e41 at002c = ╱ee╱)╱ // 0x1e3f @0x2c
0x1e13…1e41 at002d = EOL // 0x1e40 @0x2d
0x1e13…1e41 }
0x1e41…1e6b abc2 3220 LINIE=LINIE+V;GFNR1=B;GLNAVN1$=BLANK$
0x1e41…1e6b LineComalBin {
0x1e41…1e6b ptr = 0xabc2 // 0x1e41 @0x0
0x1e41…1e6b lno = 0x0c94 // 0x1e43 @0x2
0x1e41…1e6b at0004 = ╱4c╱L╱ // 0x1e45 @0x4
0x1e41…1e6b at0005 = ╱49╱I╱ // 0x1e46 @0x5
0x1e41…1e6b at0006 = ╱4e╱N╱ // 0x1e47 @0x6
0x1e41…1e6b at0007 = ╱49╱I╱ // 0x1e48 @0x7
0x1e41…1e6b at0008 = ╱45╱E╱ // 0x1e49 @0x8
0x1e41…1e6b at0009 = ╱dc╱=╱ // 0x1e4a @0x9
0x1e41…1e6b at000a = ╱4c╱L╱ // 0x1e4b @0xa
0x1e41…1e6b at000b = ╱49╱I╱ // 0x1e4c @0xb
0x1e41…1e6b at000c = ╱4e╱N╱ // 0x1e4d @0xc
0x1e41…1e6b at000d = ╱49╱I╱ // 0x1e4e @0xd
0x1e41…1e6b at000e = ╱45╱E╱ // 0x1e4f @0xe
0x1e41…1e6b at000f = ╱e2╱+╱ // 0x1e50 @0xf
0x1e41…1e6b at0010 = ╱56╱V╱ // 0x1e51 @0x10
0x1e41…1e6b at0011 = ╱eb╱;╱ // 0x1e52 @0x11
0x1e41…1e6b at0012 = ╱47╱G╱ // 0x1e53 @0x12
0x1e41…1e6b at0013 = ╱46╱F╱ // 0x1e54 @0x13
0x1e41…1e6b at0014 = ╱4e╱N╱ // 0x1e55 @0x14
0x1e41…1e6b at0015 = ╱52╱R╱ // 0x1e56 @0x15
0x1e41…1e6b at0016 = ╱31╱1╱ // 0x1e57 @0x16
0x1e41…1e6b at0017 = ╱dc╱=╱ // 0x1e58 @0x17
0x1e41…1e6b at0018 = ╱42╱B╱ // 0x1e59 @0x18
0x1e41…1e6b at0019 = ╱eb╱;╱ // 0x1e5a @0x19
0x1e41…1e6b at001a = ╱47╱G╱ // 0x1e5b @0x1a
0x1e41…1e6b at001b = ╱4c╱L╱ // 0x1e5c @0x1b
0x1e41…1e6b at001c = ╱4e╱N╱ // 0x1e5d @0x1c
0x1e41…1e6b at001d = ╱41╱A╱ // 0x1e5e @0x1d
0x1e41…1e6b at001e = ╱56╱V╱ // 0x1e5f @0x1e
0x1e41…1e6b at001f = ╱4e╱N╱ // 0x1e60 @0x1f
0x1e41…1e6b at0020 = ╱31╱1╱ // 0x1e61 @0x20
0x1e41…1e6b at0021 = ╱ef╱$╱ // 0x1e62 @0x21
0x1e41…1e6b at0022 = ╱dc╱=╱ // 0x1e63 @0x22
0x1e41…1e6b at0023 = ╱42╱B╱ // 0x1e64 @0x23
0x1e41…1e6b at0024 = ╱4c╱L╱ // 0x1e65 @0x24
0x1e41…1e6b at0025 = ╱41╱A╱ // 0x1e66 @0x25
0x1e41…1e6b at0026 = ╱4e╱N╱ // 0x1e67 @0x26
0x1e41…1e6b at0027 = ╱4b╱K╱ // 0x1e68 @0x27
0x1e41…1e6b at0028 = ╱ef╱$╱ // 0x1e69 @0x28
0x1e41…1e6b at0029 = EOL // 0x1e6a @0x29
0x1e41…1e6b }
0x1e6b…1e71 abc8 3230 ENDIF
0x1e6b…1e71 LineComalBin {
0x1e6b…1e71 ptr = 0xabc8 // 0x1e6b @0x0
0x1e6b…1e71 lno = 0x0c9e // 0x1e6d @0x2
0x1e6b…1e71 at0004 = ╱9b╱ ENDIF ╱ // 0x1e6f @0x4
0x1e6b…1e71 at0005 = EOL // 0x1e70 @0x5
0x1e6b…1e71 }
0x1e71…1eb8 ac0f 3240 SALDO1$="0+";SALDO11$="0+";SALDO2$="0+";SALDO12$="0+";SALDO4$="0+"
0x1e71…1eb8 LineComalBin {
0x1e71…1eb8 ptr = 0xac0f // 0x1e71 @0x0
0x1e71…1eb8 lno = 0x0ca8 // 0x1e73 @0x2
0x1e71…1eb8 at0004 = ╱53╱S╱ // 0x1e75 @0x4
0x1e71…1eb8 at0005 = ╱41╱A╱ // 0x1e76 @0x5
0x1e71…1eb8 at0006 = ╱4c╱L╱ // 0x1e77 @0x6
0x1e71…1eb8 at0007 = ╱44╱D╱ // 0x1e78 @0x7
0x1e71…1eb8 at0008 = ╱4f╱O╱ // 0x1e79 @0x8
0x1e71…1eb8 at0009 = ╱31╱1╱ // 0x1e7a @0x9
0x1e71…1eb8 at000a = ╱ef╱$╱ // 0x1e7b @0xa
0x1e71…1eb8 at000b = ╱dc╱=╱ // 0x1e7c @0xb
0x1e71…1eb8 at000c = ╱22╱"╱ // 0x1e7d @0xc
0x1e71…1eb8 at000d = ╱30╱0╱ // 0x1e7e @0xd
0x1e71…1eb8 at000e = ╱2b╱+╱ // 0x1e7f @0xe
0x1e71…1eb8 at000f = ╱22╱"╱ // 0x1e80 @0xf
0x1e71…1eb8 at0010 = ╱eb╱;╱ // 0x1e81 @0x10
0x1e71…1eb8 at0011 = ╱53╱S╱ // 0x1e82 @0x11
0x1e71…1eb8 at0012 = ╱41╱A╱ // 0x1e83 @0x12
0x1e71…1eb8 at0013 = ╱4c╱L╱ // 0x1e84 @0x13
0x1e71…1eb8 at0014 = ╱44╱D╱ // 0x1e85 @0x14
0x1e71…1eb8 at0015 = ╱4f╱O╱ // 0x1e86 @0x15
0x1e71…1eb8 at0016 = ╱31╱1╱ // 0x1e87 @0x16
0x1e71…1eb8 at0017 = ╱31╱1╱ // 0x1e88 @0x17
0x1e71…1eb8 at0018 = ╱ef╱$╱ // 0x1e89 @0x18
0x1e71…1eb8 at0019 = ╱dc╱=╱ // 0x1e8a @0x19
0x1e71…1eb8 at001a = ╱22╱"╱ // 0x1e8b @0x1a
0x1e71…1eb8 at001b = ╱30╱0╱ // 0x1e8c @0x1b
0x1e71…1eb8 at001c = ╱2b╱+╱ // 0x1e8d @0x1c
0x1e71…1eb8 at001d = ╱22╱"╱ // 0x1e8e @0x1d
0x1e71…1eb8 at001e = ╱eb╱;╱ // 0x1e8f @0x1e
0x1e71…1eb8 at001f = ╱53╱S╱ // 0x1e90 @0x1f
0x1e71…1eb8 at0020 = ╱41╱A╱ // 0x1e91 @0x20
0x1e71…1eb8 at0021 = ╱4c╱L╱ // 0x1e92 @0x21
0x1e71…1eb8 at0022 = ╱44╱D╱ // 0x1e93 @0x22
0x1e71…1eb8 at0023 = ╱4f╱O╱ // 0x1e94 @0x23
0x1e71…1eb8 at0024 = ╱32╱2╱ // 0x1e95 @0x24
0x1e71…1eb8 at0025 = ╱ef╱$╱ // 0x1e96 @0x25
0x1e71…1eb8 at0026 = ╱dc╱=╱ // 0x1e97 @0x26
0x1e71…1eb8 at0027 = ╱22╱"╱ // 0x1e98 @0x27
0x1e71…1eb8 at0028 = ╱30╱0╱ // 0x1e99 @0x28
0x1e71…1eb8 at0029 = ╱2b╱+╱ // 0x1e9a @0x29
0x1e71…1eb8 at002a = ╱22╱"╱ // 0x1e9b @0x2a
0x1e71…1eb8 at002b = ╱eb╱;╱ // 0x1e9c @0x2b
0x1e71…1eb8 at002c = ╱53╱S╱ // 0x1e9d @0x2c
0x1e71…1eb8 at002d = ╱41╱A╱ // 0x1e9e @0x2d
0x1e71…1eb8 at002e = ╱4c╱L╱ // 0x1e9f @0x2e
0x1e71…1eb8 at002f = ╱44╱D╱ // 0x1ea0 @0x2f
0x1e71…1eb8 at0030 = ╱4f╱O╱ // 0x1ea1 @0x30
0x1e71…1eb8 at0031 = ╱31╱1╱ // 0x1ea2 @0x31
0x1e71…1eb8 at0032 = ╱32╱2╱ // 0x1ea3 @0x32
0x1e71…1eb8 at0033 = ╱ef╱$╱ // 0x1ea4 @0x33
0x1e71…1eb8 at0034 = ╱dc╱=╱ // 0x1ea5 @0x34
0x1e71…1eb8 at0035 = ╱22╱"╱ // 0x1ea6 @0x35
0x1e71…1eb8 at0036 = ╱30╱0╱ // 0x1ea7 @0x36
0x1e71…1eb8 at0037 = ╱2b╱+╱ // 0x1ea8 @0x37
0x1e71…1eb8 at0038 = ╱22╱"╱ // 0x1ea9 @0x38
0x1e71…1eb8 at0039 = ╱eb╱;╱ // 0x1eaa @0x39
0x1e71…1eb8 at003a = ╱53╱S╱ // 0x1eab @0x3a
0x1e71…1eb8 at003b = ╱41╱A╱ // 0x1eac @0x3b
0x1e71…1eb8 at003c = ╱4c╱L╱ // 0x1ead @0x3c
0x1e71…1eb8 at003d = ╱44╱D╱ // 0x1eae @0x3d
0x1e71…1eb8 at003e = ╱4f╱O╱ // 0x1eaf @0x3e
0x1e71…1eb8 at003f = ╱34╱4╱ // 0x1eb0 @0x3f
0x1e71…1eb8 at0040 = ╱ef╱$╱ // 0x1eb1 @0x40
0x1e71…1eb8 at0041 = ╱dc╱=╱ // 0x1eb2 @0x41
0x1e71…1eb8 at0042 = ╱22╱"╱ // 0x1eb3 @0x42
0x1e71…1eb8 at0043 = ╱30╱0╱ // 0x1eb4 @0x43
0x1e71…1eb8 at0044 = ╱2b╱+╱ // 0x1eb5 @0x44
0x1e71…1eb8 at0045 = ╱22╱"╱ // 0x1eb6 @0x45
0x1e71…1eb8 at0046 = EOL // 0x1eb7 @0x46
0x1e71…1eb8 }
0x1eb8…1eca ac21 3250 SALDO14$="0+"
0x1eb8…1eca LineComalBin {
0x1eb8…1eca ptr = 0xac21 // 0x1eb8 @0x0
0x1eb8…1eca lno = 0x0cb2 // 0x1eba @0x2
0x1eb8…1eca at0004 = ╱53╱S╱ // 0x1ebc @0x4
0x1eb8…1eca at0005 = ╱41╱A╱ // 0x1ebd @0x5
0x1eb8…1eca at0006 = ╱4c╱L╱ // 0x1ebe @0x6
0x1eb8…1eca at0007 = ╱44╱D╱ // 0x1ebf @0x7
0x1eb8…1eca at0008 = ╱4f╱O╱ // 0x1ec0 @0x8
0x1eb8…1eca at0009 = ╱31╱1╱ // 0x1ec1 @0x9
0x1eb8…1eca at000a = ╱34╱4╱ // 0x1ec2 @0xa
0x1eb8…1eca at000b = ╱ef╱$╱ // 0x1ec3 @0xb
0x1eb8…1eca at000c = ╱dc╱=╱ // 0x1ec4 @0xc
0x1eb8…1eca at000d = ╱22╱"╱ // 0x1ec5 @0xd
0x1eb8…1eca at000e = ╱30╱0╱ // 0x1ec6 @0xe
0x1eb8…1eca at000f = ╱2b╱+╱ // 0x1ec7 @0xf
0x1eb8…1eca at0010 = ╱22╱"╱ // 0x1ec8 @0x10
0x1eb8…1eca at0011 = EOL // 0x1ec9 @0x11
0x1eb8…1eca }
0x1eca…1ee8 ac3f 3260 GLNAVN1$=FNAVN$;GFNR1=FNR
0x1eca…1ee8 LineComalBin {
0x1eca…1ee8 ptr = 0xac3f // 0x1eca @0x0
0x1eca…1ee8 lno = 0x0cbc // 0x1ecc @0x2
0x1eca…1ee8 at0004 = ╱47╱G╱ // 0x1ece @0x4
0x1eca…1ee8 at0005 = ╱4c╱L╱ // 0x1ecf @0x5
0x1eca…1ee8 at0006 = ╱4e╱N╱ // 0x1ed0 @0x6
0x1eca…1ee8 at0007 = ╱41╱A╱ // 0x1ed1 @0x7
0x1eca…1ee8 at0008 = ╱56╱V╱ // 0x1ed2 @0x8
0x1eca…1ee8 at0009 = ╱4e╱N╱ // 0x1ed3 @0x9
0x1eca…1ee8 at000a = ╱31╱1╱ // 0x1ed4 @0xa
0x1eca…1ee8 at000b = ╱ef╱$╱ // 0x1ed5 @0xb
0x1eca…1ee8 at000c = ╱dc╱=╱ // 0x1ed6 @0xc
0x1eca…1ee8 at000d = ╱46╱F╱ // 0x1ed7 @0xd
0x1eca…1ee8 at000e = ╱4e╱N╱ // 0x1ed8 @0xe
0x1eca…1ee8 at000f = ╱41╱A╱ // 0x1ed9 @0xf
0x1eca…1ee8 at0010 = ╱56╱V╱ // 0x1eda @0x10
0x1eca…1ee8 at0011 = ╱4e╱N╱ // 0x1edb @0x11
0x1eca…1ee8 at0012 = ╱ef╱$╱ // 0x1edc @0x12
0x1eca…1ee8 at0013 = ╱eb╱;╱ // 0x1edd @0x13
0x1eca…1ee8 at0014 = ╱47╱G╱ // 0x1ede @0x14
0x1eca…1ee8 at0015 = ╱46╱F╱ // 0x1edf @0x15
0x1eca…1ee8 at0016 = ╱4e╱N╱ // 0x1ee0 @0x16
0x1eca…1ee8 at0017 = ╱52╱R╱ // 0x1ee1 @0x17
0x1eca…1ee8 at0018 = ╱31╱1╱ // 0x1ee2 @0x18
0x1eca…1ee8 at0019 = ╱dc╱=╱ // 0x1ee3 @0x19
0x1eca…1ee8 at001a = ╱46╱F╱ // 0x1ee4 @0x1a
0x1eca…1ee8 at001b = ╱4e╱N╱ // 0x1ee5 @0x1b
0x1eca…1ee8 at001c = ╱52╱R╱ // 0x1ee6 @0x1c
0x1eca…1ee8 at001d = EOL // 0x1ee7 @0x1d
0x1eca…1ee8 }
0x1ee8…1efc ac53 3270 IF LINIE>34 THEN
0x1ee8…1efc LineComalBin {
0x1ee8…1efc ptr = 0xac53 // 0x1ee8 @0x0
0x1ee8…1efc lno = 0x0cc6 // 0x1eea @0x2
0x1ee8…1efc at0004 = ╱9c╱ IF ╱ // 0x1eec @0x4
0x1ee8…1efc at0005 = ╱4c╱L╱ // 0x1eed @0x5
0x1ee8…1efc at0006 = ╱49╱I╱ // 0x1eee @0x6
0x1ee8…1efc at0007 = ╱4e╱N╱ // 0x1eef @0x7
0x1ee8…1efc at0008 = ╱49╱I╱ // 0x1ef0 @0x8
0x1ee8…1efc at0009 = ╱45╱E╱ // 0x1ef1 @0x9
0x1ee8…1efc at000a = ╱de╱>╱ // 0x1ef2 @0xa
0x1ee8…1efc at000b = ╱33╱3╱ // 0x1ef3 @0xb
0x1ee8…1efc at000c = ╱34╱4╱ // 0x1ef4 @0xc
0x1ee8…1efc at000d = ╱fe00008806╱ // 0x1ef5 @0xd
0x1ee8…1efc at0012 = ╱b6╱ THEN ╱ // 0x1efa @0x12
0x1ee8…1efc at0013 = EOL // 0x1efb @0x13
0x1ee8…1efc }
0x1efc…1f18 ac6f 3280 EXEC NYSIDE(GFNR1,GLNAVN1$)
0x1efc…1f18 LineComalBin {
0x1efc…1f18 ptr = 0xac6f // 0x1efc @0x0
0x1efc…1f18 lno = 0x0cd0 // 0x1efe @0x2
0x1efc…1f18 at0004 = ╱9d╱ EXEC ╱ // 0x1f00 @0x4
0x1efc…1f18 at0005 = ╱4e╱N╱ // 0x1f01 @0x5
0x1efc…1f18 at0006 = ╱59╱Y╱ // 0x1f02 @0x6
0x1efc…1f18 at0007 = ╱53╱S╱ // 0x1f03 @0x7
0x1efc…1f18 at0008 = ╱49╱I╱ // 0x1f04 @0x8
0x1efc…1f18 at0009 = ╱44╱D╱ // 0x1f05 @0x9
0x1efc…1f18 at000a = ╱45╱E╱ // 0x1f06 @0xa
0x1efc…1f18 at000b = ╱ed╱(╱ // 0x1f07 @0xb
0x1efc…1f18 at000c = ╱47╱G╱ // 0x1f08 @0xc
0x1efc…1f18 at000d = ╱46╱F╱ // 0x1f09 @0xd
0x1efc…1f18 at000e = ╱4e╱N╱ // 0x1f0a @0xe
0x1efc…1f18 at000f = ╱52╱R╱ // 0x1f0b @0xf
0x1efc…1f18 at0010 = ╱31╱1╱ // 0x1f0c @0x10
0x1efc…1f18 at0011 = ╱ec╱,╱ // 0x1f0d @0x11
0x1efc…1f18 at0012 = ╱47╱G╱ // 0x1f0e @0x12
0x1efc…1f18 at0013 = ╱4c╱L╱ // 0x1f0f @0x13
0x1efc…1f18 at0014 = ╱4e╱N╱ // 0x1f10 @0x14
0x1efc…1f18 at0015 = ╱41╱A╱ // 0x1f11 @0x15
0x1efc…1f18 at0016 = ╱56╱V╱ // 0x1f12 @0x16
0x1efc…1f18 at0017 = ╱4e╱N╱ // 0x1f13 @0x17
0x1efc…1f18 at0018 = ╱31╱1╱ // 0x1f14 @0x18
0x1efc…1f18 at0019 = ╱ef╱$╱ // 0x1f15 @0x19
0x1efc…1f18 at001a = ╱ee╱)╱ // 0x1f16 @0x1a
0x1efc…1f18 at001b = EOL // 0x1f17 @0x1b
0x1efc…1f18 }
0x1f18…1f1e ac75 3290 ELSE
0x1f18…1f1e LineComalBin {
0x1f18…1f1e ptr = 0xac75 // 0x1f18 @0x0
0x1f18…1f1e lno = 0x0cda // 0x1f1a @0x2
0x1f18…1f1e at0004 = ╱9a╱ ELSE ╱ // 0x1f1c @0x4
0x1f18…1f1e at0005 = EOL // 0x1f1d @0x5
0x1f18…1f1e }
0x1f1e…1f2e ac85 3300 PRINT CHR(10)
0x1f1e…1f2e LineComalBin {
0x1f1e…1f2e ptr = 0xac85 // 0x1f1e @0x0
0x1f1e…1f2e lno = 0x0ce4 // 0x1f20 @0x2
0x1f1e…1f2e at0004 = ╱92╱ PRINT ╱ // 0x1f22 @0x4
0x1f1e…1f2e at0005 = ╱cf╱CHR╱ // 0x1f23 @0x5
0x1f1e…1f2e at0006 = ╱ed╱(╱ // 0x1f24 @0x6
0x1f1e…1f2e at0007 = ╱31╱1╱ // 0x1f25 @0x7
0x1f1e…1f2e at0008 = ╱30╱0╱ // 0x1f26 @0x8
0x1f1e…1f2e at0009 = ╱fe0000a004╱ // 0x1f27 @0x9
0x1f1e…1f2e at000e = ╱ee╱)╱ // 0x1f2c @0xe
0x1f1e…1f2e at000f = EOL // 0x1f2d @0xf
0x1f1e…1f2e }
0x1f2e…1f3e ac95 3310 PRINT CHR(10)
0x1f2e…1f3e LineComalBin {
0x1f2e…1f3e ptr = 0xac95 // 0x1f2e @0x0
0x1f2e…1f3e lno = 0x0cee // 0x1f30 @0x2
0x1f2e…1f3e at0004 = ╱92╱ PRINT ╱ // 0x1f32 @0x4
0x1f2e…1f3e at0005 = ╱cf╱CHR╱ // 0x1f33 @0x5
0x1f2e…1f3e at0006 = ╱ed╱(╱ // 0x1f34 @0x6
0x1f2e…1f3e at0007 = ╱31╱1╱ // 0x1f35 @0x7
0x1f2e…1f3e at0008 = ╱30╱0╱ // 0x1f36 @0x8
0x1f2e…1f3e at0009 = ╱fe0000a004╱ // 0x1f37 @0x9
0x1f2e…1f3e at000e = ╱ee╱)╱ // 0x1f3c @0xe
0x1f2e…1f3e at000f = EOL // 0x1f3d @0xf
0x1f2e…1f3e }
0x1f3e…1f53 acaa 3320 PRINT USING "###### ":FNR;
0x1f3e…1f53 LineComalBin {
0x1f3e…1f53 ptr = 0xacaa // 0x1f3e @0x0
0x1f3e…1f53 lno = 0x0cf8 // 0x1f40 @0x2
0x1f3e…1f53 at0004 = ╱92╱ PRINT ╱ // 0x1f42 @0x4
0x1f3e…1f53 at0005 = ╱b9╱ USING ╱ // 0x1f43 @0x5
0x1f3e…1f53 at0006 = ╱22╱"╱ // 0x1f44 @0x6
0x1f3e…1f53 at0007 = ╱23╱#╱ // 0x1f45 @0x7
0x1f3e…1f53 at0008 = ╱23╱#╱ // 0x1f46 @0x8
0x1f3e…1f53 at0009 = ╱23╱#╱ // 0x1f47 @0x9
0x1f3e…1f53 at000a = ╱23╱#╱ // 0x1f48 @0xa
0x1f3e…1f53 at000b = ╱23╱#╱ // 0x1f49 @0xb
0x1f3e…1f53 at000c = ╱23╱#╱ // 0x1f4a @0xc
0x1f3e…1f53 at000d = ╱20╱…╱ // 0x1f4b @0xd
0x1f3e…1f53 at000e = ╱22╱"╱ // 0x1f4c @0xe
0x1f3e…1f53 at000f = ╱f0╱:╱ // 0x1f4d @0xf
0x1f3e…1f53 at0010 = ╱46╱F╱ // 0x1f4e @0x10
0x1f3e…1f53 at0011 = ╱4e╱N╱ // 0x1f4f @0x11
0x1f3e…1f53 at0012 = ╱52╱R╱ // 0x1f50 @0x12
0x1f3e…1f53 at0013 = ╱eb╱;╱ // 0x1f51 @0x13
0x1f3e…1f53 at0014 = EOL // 0x1f52 @0x14
0x1f3e…1f53 }
0x1f53…1f61 acb8 3330 PRINT GLNAVN1$
0x1f53…1f61 LineComalBin {
0x1f53…1f61 ptr = 0xacb8 // 0x1f53 @0x0
0x1f53…1f61 lno = 0x0d02 // 0x1f55 @0x2
0x1f53…1f61 at0004 = ╱92╱ PRINT ╱ // 0x1f57 @0x4
0x1f53…1f61 at0005 = ╱47╱G╱ // 0x1f58 @0x5
0x1f53…1f61 at0006 = ╱4c╱L╱ // 0x1f59 @0x6
0x1f53…1f61 at0007 = ╱4e╱N╱ // 0x1f5a @0x7
0x1f53…1f61 at0008 = ╱41╱A╱ // 0x1f5b @0x8
0x1f53…1f61 at0009 = ╱56╱V╱ // 0x1f5c @0x9
0x1f53…1f61 at000a = ╱4e╱N╱ // 0x1f5d @0xa
0x1f53…1f61 at000b = ╱31╱1╱ // 0x1f5e @0xb
0x1f53…1f61 at000c = ╱ef╱$╱ // 0x1f5f @0xc
0x1f53…1f61 at000d = EOL // 0x1f60 @0xd
0x1f53…1f61 }
0x1f61…1f85 acdc 3340 PRINT TAB(8);STREG$(E:LEN(GLNAVN$))
0x1f61…1f85 LineComalBin {
0x1f61…1f85 ptr = 0xacdc // 0x1f61 @0x0
0x1f61…1f85 lno = 0x0d0c // 0x1f63 @0x2
0x1f61…1f85 at0004 = ╱92╱ PRINT ╱ // 0x1f65 @0x4
0x1f61…1f85 at0005 = ╱d2╱TAB╱ // 0x1f66 @0x5
0x1f61…1f85 at0006 = ╱ed╱(╱ // 0x1f67 @0x6
0x1f61…1f85 at0007 = ╱38╱8╱ // 0x1f68 @0x7
0x1f61…1f85 at0008 = ╱fe00008004╱ // 0x1f69 @0x8
0x1f61…1f85 at000d = ╱ee╱)╱ // 0x1f6e @0xd
0x1f61…1f85 at000e = ╱eb╱;╱ // 0x1f6f @0xe
0x1f61…1f85 at000f = ╱53╱S╱ // 0x1f70 @0xf
0x1f61…1f85 at0010 = ╱54╱T╱ // 0x1f71 @0x10
0x1f61…1f85 at0011 = ╱52╱R╱ // 0x1f72 @0x11
0x1f61…1f85 at0012 = ╱45╱E╱ // 0x1f73 @0x12
0x1f61…1f85 at0013 = ╱47╱G╱ // 0x1f74 @0x13
0x1f61…1f85 at0014 = ╱ef╱$╱ // 0x1f75 @0x14
0x1f61…1f85 at0015 = ╱ed╱(╱ // 0x1f76 @0x15
0x1f61…1f85 at0016 = ╱45╱E╱ // 0x1f77 @0x16
0x1f61…1f85 at0017 = ╱f0╱:╱ // 0x1f78 @0x17
0x1f61…1f85 at0018 = ╱cc╱LEN╱ // 0x1f79 @0x18
0x1f61…1f85 at0019 = ╱ed╱(╱ // 0x1f7a @0x19
0x1f61…1f85 at001a = ╱47╱G╱ // 0x1f7b @0x1a
0x1f61…1f85 at001b = ╱4c╱L╱ // 0x1f7c @0x1b
0x1f61…1f85 at001c = ╱4e╱N╱ // 0x1f7d @0x1c
0x1f61…1f85 at001d = ╱41╱A╱ // 0x1f7e @0x1d
0x1f61…1f85 at001e = ╱56╱V╱ // 0x1f7f @0x1e
0x1f61…1f85 at001f = ╱4e╱N╱ // 0x1f80 @0x1f
0x1f61…1f85 at0020 = ╱ef╱$╱ // 0x1f81 @0x20
0x1f61…1f85 at0021 = ╱ee╱)╱ // 0x1f82 @0x21
0x1f61…1f85 at0022 = ╱ee╱)╱ // 0x1f83 @0x22
0x1f61…1f85 at0023 = EOL // 0x1f84 @0x23
0x1f61…1f85 }
0x1f85…1f8e ace5 3350 PRINT " "
0x1f85…1f8e LineComalBin {
0x1f85…1f8e ptr = 0xace5 // 0x1f85 @0x0
0x1f85…1f8e lno = 0x0d16 // 0x1f87 @0x2
0x1f85…1f8e at0004 = ╱92╱ PRINT ╱ // 0x1f89 @0x4
0x1f85…1f8e at0005 = ╱22╱"╱ // 0x1f8a @0x5
0x1f85…1f8e at0006 = ╱20╱…╱ // 0x1f8b @0x6
0x1f85…1f8e at0007 = ╱22╱"╱ // 0x1f8c @0x7
0x1f85…1f8e at0008 = EOL // 0x1f8d @0x8
0x1f85…1f8e }
0x1f8e…1fa5 acfc 3360 LINIE=LINIE+5
0x1f8e…1fa5 LineComalBin {
0x1f8e…1fa5 ptr = 0xacfc // 0x1f8e @0x0
0x1f8e…1fa5 lno = 0x0d20 // 0x1f90 @0x2
0x1f8e…1fa5 at0004 = ╱4c╱L╱ // 0x1f92 @0x4
0x1f8e…1fa5 at0005 = ╱49╱I╱ // 0x1f93 @0x5
0x1f8e…1fa5 at0006 = ╱4e╱N╱ // 0x1f94 @0x6
0x1f8e…1fa5 at0007 = ╱49╱I╱ // 0x1f95 @0x7
0x1f8e…1fa5 at0008 = ╱45╱E╱ // 0x1f96 @0x8
0x1f8e…1fa5 at0009 = ╱dc╱=╱ // 0x1f97 @0x9
0x1f8e…1fa5 at000a = ╱4c╱L╱ // 0x1f98 @0xa
0x1f8e…1fa5 at000b = ╱49╱I╱ // 0x1f99 @0xb
0x1f8e…1fa5 at000c = ╱4e╱N╱ // 0x1f9a @0xc
0x1f8e…1fa5 at000d = ╱49╱I╱ // 0x1f9b @0xd
0x1f8e…1fa5 at000e = ╱45╱E╱ // 0x1f9c @0xe
0x1f8e…1fa5 at000f = ╱e2╱+╱ // 0x1f9d @0xf
0x1f8e…1fa5 at0010 = ╱35╱5╱ // 0x1f9e @0x10
0x1f8e…1fa5 at0011 = ╱fe0000a003╱ // 0x1f9f @0x11
0x1f8e…1fa5 at0016 = EOL // 0x1fa4 @0x16
0x1f8e…1fa5 }
0x1fa5…1fab ad02 3370 ENDIF
0x1fa5…1fab LineComalBin {
0x1fa5…1fab ptr = 0xad02 // 0x1fa5 @0x0
0x1fa5…1fab lno = 0x0d2a // 0x1fa7 @0x2
0x1fa5…1fab at0004 = ╱9b╱ ENDIF ╱ // 0x1fa9 @0x4
0x1fa5…1fab at0005 = EOL // 0x1faa @0x5
0x1fa5…1fab }
0x1fab…1fb1 ad08 3380 ENDCASE
0x1fab…1fb1 LineComalBin {
0x1fab…1fb1 ptr = 0xad08 // 0x1fab @0x0
0x1fab…1fb1 lno = 0x0d34 // 0x1fad @0x2
0x1fab…1fb1 at0004 = ╱a4╱ ENDCASE ╱ // 0x1faf @0x4
0x1fab…1fb1 at0005 = EOL // 0x1fb0 @0x5
0x1fab…1fb1 }
0x1fb1…1fbc ad13 3390 NEXT EPIL1
0x1fb1…1fbc LineComalBin {
0x1fb1…1fbc ptr = 0xad13 // 0x1fb1 @0x0
0x1fb1…1fbc lno = 0x0d3e // 0x1fb3 @0x2
0x1fb1…1fbc at0004 = ╱84╱ NEXT ╱ // 0x1fb5 @0x4
0x1fb1…1fbc at0005 = ╱45╱E╱ // 0x1fb6 @0x5
0x1fb1…1fbc at0006 = ╱50╱P╱ // 0x1fb7 @0x6
0x1fb1…1fbc at0007 = ╱49╱I╱ // 0x1fb8 @0x7
0x1fb1…1fbc at0008 = ╱4c╱L╱ // 0x1fb9 @0x8
0x1fb1…1fbc at0009 = ╱31╱1╱ // 0x1fba @0x9
0x1fb1…1fbc at000a = EOL // 0x1fbb @0xa
0x1fb1…1fbc }
0x1fbc…1fc9 ad20 3400 IF GFNR>B THEN
0x1fbc…1fc9 LineComalBin {
0x1fbc…1fc9 ptr = 0xad20 // 0x1fbc @0x0
0x1fbc…1fc9 lno = 0x0d48 // 0x1fbe @0x2
0x1fbc…1fc9 at0004 = ╱9c╱ IF ╱ // 0x1fc0 @0x4
0x1fbc…1fc9 at0005 = ╱47╱G╱ // 0x1fc1 @0x5
0x1fbc…1fc9 at0006 = ╱46╱F╱ // 0x1fc2 @0x6
0x1fbc…1fc9 at0007 = ╱4e╱N╱ // 0x1fc3 @0x7
0x1fbc…1fc9 at0008 = ╱52╱R╱ // 0x1fc4 @0x8
0x1fbc…1fc9 at0009 = ╱de╱>╱ // 0x1fc5 @0x9
0x1fbc…1fc9 at000a = ╱42╱B╱ // 0x1fc6 @0xa
0x1fbc…1fc9 at000b = ╱b6╱ THEN ╱ // 0x1fc7 @0xb
0x1fbc…1fc9 at000c = EOL // 0x1fc8 @0xc
0x1fbc…1fc9 }
0x1fc9…1ff2 ad49 3410 IF LINIE>37 THEN EXEC NYSIDE(GFNR,GLNAVN$)
0x1fc9…1ff2 LineComalBin {
0x1fc9…1ff2 ptr = 0xad49 // 0x1fc9 @0x0
0x1fc9…1ff2 lno = 0x0d52 // 0x1fcb @0x2
0x1fc9…1ff2 at0004 = ╱82╱ IF ╱ // 0x1fcd @0x4
0x1fc9…1ff2 at0005 = ╱4c╱L╱ // 0x1fce @0x5
0x1fc9…1ff2 at0006 = ╱49╱I╱ // 0x1fcf @0x6
0x1fc9…1ff2 at0007 = ╱4e╱N╱ // 0x1fd0 @0x7
0x1fc9…1ff2 at0008 = ╱49╱I╱ // 0x1fd1 @0x8
0x1fc9…1ff2 at0009 = ╱45╱E╱ // 0x1fd2 @0x9
0x1fc9…1ff2 at000a = ╱de╱>╱ // 0x1fd3 @0xa
0x1fc9…1ff2 at000b = ╱33╱3╱ // 0x1fd4 @0xb
0x1fc9…1ff2 at000c = ╱37╱7╱ // 0x1fd5 @0xc
0x1fc9…1ff2 at000d = ╱fe00009406╱ // 0x1fd6 @0xd
0x1fc9…1ff2 at0012 = ╱b6╱ THEN ╱ // 0x1fdb @0x12
0x1fc9…1ff2 at0013 = ╱9d╱ EXEC ╱ // 0x1fdc @0x13
0x1fc9…1ff2 at0014 = ╱4e╱N╱ // 0x1fdd @0x14
0x1fc9…1ff2 at0015 = ╱59╱Y╱ // 0x1fde @0x15
0x1fc9…1ff2 at0016 = ╱53╱S╱ // 0x1fdf @0x16
0x1fc9…1ff2 at0017 = ╱49╱I╱ // 0x1fe0 @0x17
0x1fc9…1ff2 at0018 = ╱44╱D╱ // 0x1fe1 @0x18
0x1fc9…1ff2 at0019 = ╱45╱E╱ // 0x1fe2 @0x19
0x1fc9…1ff2 at001a = ╱ed╱(╱ // 0x1fe3 @0x1a
0x1fc9…1ff2 at001b = ╱47╱G╱ // 0x1fe4 @0x1b
0x1fc9…1ff2 at001c = ╱46╱F╱ // 0x1fe5 @0x1c
0x1fc9…1ff2 at001d = ╱4e╱N╱ // 0x1fe6 @0x1d
0x1fc9…1ff2 at001e = ╱52╱R╱ // 0x1fe7 @0x1e
0x1fc9…1ff2 at001f = ╱ec╱,╱ // 0x1fe8 @0x1f
0x1fc9…1ff2 at0020 = ╱47╱G╱ // 0x1fe9 @0x20
0x1fc9…1ff2 at0021 = ╱4c╱L╱ // 0x1fea @0x21
0x1fc9…1ff2 at0022 = ╱4e╱N╱ // 0x1feb @0x22
0x1fc9…1ff2 at0023 = ╱41╱A╱ // 0x1fec @0x23
0x1fc9…1ff2 at0024 = ╱56╱V╱ // 0x1fed @0x24
0x1fc9…1ff2 at0025 = ╱4e╱N╱ // 0x1fee @0x25
0x1fc9…1ff2 at0026 = ╱ef╱$╱ // 0x1fef @0x26
0x1fc9…1ff2 at0027 = ╱ee╱)╱ // 0x1ff0 @0x27
0x1fc9…1ff2 at0028 = EOL // 0x1ff1 @0x28
0x1fc9…1ff2 }
0x1ff2…1ffb ad52 3420 PRINT " "
0x1ff2…1ffb LineComalBin {
0x1ff2…1ffb ptr = 0xad52 // 0x1ff2 @0x0
0x1ff2…1ffb lno = 0x0d5c // 0x1ff4 @0x2
0x1ff2…1ffb at0004 = ╱92╱ PRINT ╱ // 0x1ff6 @0x4
0x1ff2…1ffb at0005 = ╱22╱"╱ // 0x1ff7 @0x5
0x1ff2…1ffb at0006 = ╱20╱…╱ // 0x1ff8 @0x6
0x1ff2…1ffb at0007 = ╱22╱"╱ // 0x1ff9 @0x7
0x1ff2…1ffb at0008 = EOL // 0x1ffa @0x8
0x1ff2…1ffb }
0x1ffb…201c ad73 3430 PRINT TAB(8);STREG$(E:71)
0x1ffb…201c LineComalBin {
0x1ffb…201c ptr = 0xad73 // 0x1ffb @0x0
0x1ffb…201c lno = 0x0d66 // 0x1ffd @0x2
0x1ffb…201c at0004 = ╱92╱ PRINT ╱ // 0x1fff @0x4
0x1ffb…201c at0005 = ╱d2╱TAB╱ // 0x2000 @0x5
0x1ffb…201c at0006 = ╱ed╱(╱ // 0x2001 @0x6
0x1ffb…201c at0007 = ╱38╱8╱ // 0x2002 @0x7
0x1ffb…201c at0008 = ╱fe00008004╱ // 0x2003 @0x8
0x1ffb…201c at000d = ╱ee╱)╱ // 0x2008 @0xd
0x1ffb…201c at000e = ╱eb╱;╱ // 0x2009 @0xe
0x1ffb…201c at000f = ╱53╱S╱ // 0x200a @0xf
0x1ffb…201c at0010 = ╱54╱T╱ // 0x200b @0x10
0x1ffb…201c at0011 = ╱52╱R╱ // 0x200c @0x11
0x1ffb…201c at0012 = ╱45╱E╱ // 0x200d @0x12
0x1ffb…201c at0013 = ╱47╱G╱ // 0x200e @0x13
0x1ffb…201c at0014 = ╱ef╱$╱ // 0x200f @0x14
0x1ffb…201c at0015 = ╱ed╱(╱ // 0x2010 @0x15
0x1ffb…201c at0016 = ╱45╱E╱ // 0x2011 @0x16
0x1ffb…201c at0017 = ╱f0╱:╱ // 0x2012 @0x17
0x1ffb…201c at0018 = ╱37╱7╱ // 0x2013 @0x18
0x1ffb…201c at0019 = ╱31╱1╱ // 0x2014 @0x19
0x1ffb…201c at001a = ╱fe00008e07╱ // 0x2015 @0x1a
0x1ffb…201c at001f = ╱ee╱)╱ // 0x201a @0x1f
0x1ffb…201c at0020 = EOL // 0x201b @0x20
0x1ffb…201c }
0x201c…2048 ad9f 3440 EXEC LINIEUD(GFNR,GLNAVN$,SALDO2$,SALDO12$)
0x201c…2048 LineComalBin {
0x201c…2048 ptr = 0xad9f // 0x201c @0x0
0x201c…2048 lno = 0x0d70 // 0x201e @0x2
0x201c…2048 at0004 = ╱9d╱ EXEC ╱ // 0x2020 @0x4
0x201c…2048 at0005 = ╱4c╱L╱ // 0x2021 @0x5
0x201c…2048 at0006 = ╱49╱I╱ // 0x2022 @0x6
0x201c…2048 at0007 = ╱4e╱N╱ // 0x2023 @0x7
0x201c…2048 at0008 = ╱49╱I╱ // 0x2024 @0x8
0x201c…2048 at0009 = ╱45╱E╱ // 0x2025 @0x9
0x201c…2048 at000a = ╱55╱U╱ // 0x2026 @0xa
0x201c…2048 at000b = ╱44╱D╱ // 0x2027 @0xb
0x201c…2048 at000c = ╱ed╱(╱ // 0x2028 @0xc
0x201c…2048 at000d = ╱47╱G╱ // 0x2029 @0xd
0x201c…2048 at000e = ╱46╱F╱ // 0x202a @0xe
0x201c…2048 at000f = ╱4e╱N╱ // 0x202b @0xf
0x201c…2048 at0010 = ╱52╱R╱ // 0x202c @0x10
0x201c…2048 at0011 = ╱ec╱,╱ // 0x202d @0x11
0x201c…2048 at0012 = ╱47╱G╱ // 0x202e @0x12
0x201c…2048 at0013 = ╱4c╱L╱ // 0x202f @0x13
0x201c…2048 at0014 = ╱4e╱N╱ // 0x2030 @0x14
0x201c…2048 at0015 = ╱41╱A╱ // 0x2031 @0x15
0x201c…2048 at0016 = ╱56╱V╱ // 0x2032 @0x16
0x201c…2048 at0017 = ╱4e╱N╱ // 0x2033 @0x17
0x201c…2048 at0018 = ╱ef╱$╱ // 0x2034 @0x18
0x201c…2048 at0019 = ╱ec╱,╱ // 0x2035 @0x19
0x201c…2048 at001a = ╱53╱S╱ // 0x2036 @0x1a
0x201c…2048 at001b = ╱41╱A╱ // 0x2037 @0x1b
0x201c…2048 at001c = ╱4c╱L╱ // 0x2038 @0x1c
0x201c…2048 at001d = ╱44╱D╱ // 0x2039 @0x1d
0x201c…2048 at001e = ╱4f╱O╱ // 0x203a @0x1e
0x201c…2048 at001f = ╱32╱2╱ // 0x203b @0x1f
0x201c…2048 at0020 = ╱ef╱$╱ // 0x203c @0x20
0x201c…2048 at0021 = ╱ec╱,╱ // 0x203d @0x21
0x201c…2048 at0022 = ╱53╱S╱ // 0x203e @0x22
0x201c…2048 at0023 = ╱41╱A╱ // 0x203f @0x23
0x201c…2048 at0024 = ╱4c╱L╱ // 0x2040 @0x24
0x201c…2048 at0025 = ╱44╱D╱ // 0x2041 @0x25
0x201c…2048 at0026 = ╱4f╱O╱ // 0x2042 @0x26
0x201c…2048 at0027 = ╱31╱1╱ // 0x2043 @0x27
0x201c…2048 at0028 = ╱32╱2╱ // 0x2044 @0x28
0x201c…2048 at0029 = ╱ef╱$╱ // 0x2045 @0x29
0x201c…2048 at002a = ╱ee╱)╱ // 0x2046 @0x2a
0x201c…2048 at002b = EOL // 0x2047 @0x2b
0x201c…2048 }
0x2048…207c add3 3450 SALDO2$="0+";SALDO12$="0+";LINIE=LINIE+V;GFNR=B
0x2048…207c LineComalBin {
0x2048…207c ptr = 0xadd3 // 0x2048 @0x0
0x2048…207c lno = 0x0d7a // 0x204a @0x2
0x2048…207c at0004 = ╱53╱S╱ // 0x204c @0x4
0x2048…207c at0005 = ╱41╱A╱ // 0x204d @0x5
0x2048…207c at0006 = ╱4c╱L╱ // 0x204e @0x6
0x2048…207c at0007 = ╱44╱D╱ // 0x204f @0x7
0x2048…207c at0008 = ╱4f╱O╱ // 0x2050 @0x8
0x2048…207c at0009 = ╱32╱2╱ // 0x2051 @0x9
0x2048…207c at000a = ╱ef╱$╱ // 0x2052 @0xa
0x2048…207c at000b = ╱dc╱=╱ // 0x2053 @0xb
0x2048…207c at000c = ╱22╱"╱ // 0x2054 @0xc
0x2048…207c at000d = ╱30╱0╱ // 0x2055 @0xd
0x2048…207c at000e = ╱2b╱+╱ // 0x2056 @0xe
0x2048…207c at000f = ╱22╱"╱ // 0x2057 @0xf
0x2048…207c at0010 = ╱eb╱;╱ // 0x2058 @0x10
0x2048…207c at0011 = ╱53╱S╱ // 0x2059 @0x11
0x2048…207c at0012 = ╱41╱A╱ // 0x205a @0x12
0x2048…207c at0013 = ╱4c╱L╱ // 0x205b @0x13
0x2048…207c at0014 = ╱44╱D╱ // 0x205c @0x14
0x2048…207c at0015 = ╱4f╱O╱ // 0x205d @0x15
0x2048…207c at0016 = ╱31╱1╱ // 0x205e @0x16
0x2048…207c at0017 = ╱32╱2╱ // 0x205f @0x17
0x2048…207c at0018 = ╱ef╱$╱ // 0x2060 @0x18
0x2048…207c at0019 = ╱dc╱=╱ // 0x2061 @0x19
0x2048…207c at001a = ╱22╱"╱ // 0x2062 @0x1a
0x2048…207c at001b = ╱30╱0╱ // 0x2063 @0x1b
0x2048…207c at001c = ╱2b╱+╱ // 0x2064 @0x1c
0x2048…207c at001d = ╱22╱"╱ // 0x2065 @0x1d
0x2048…207c at001e = ╱eb╱;╱ // 0x2066 @0x1e
0x2048…207c at001f = ╱4c╱L╱ // 0x2067 @0x1f
0x2048…207c at0020 = ╱49╱I╱ // 0x2068 @0x20
0x2048…207c at0021 = ╱4e╱N╱ // 0x2069 @0x21
0x2048…207c at0022 = ╱49╱I╱ // 0x206a @0x22
0x2048…207c at0023 = ╱45╱E╱ // 0x206b @0x23
0x2048…207c at0024 = ╱dc╱=╱ // 0x206c @0x24
0x2048…207c at0025 = ╱4c╱L╱ // 0x206d @0x25
0x2048…207c at0026 = ╱49╱I╱ // 0x206e @0x26
0x2048…207c at0027 = ╱4e╱N╱ // 0x206f @0x27
0x2048…207c at0028 = ╱49╱I╱ // 0x2070 @0x28
0x2048…207c at0029 = ╱45╱E╱ // 0x2071 @0x29
0x2048…207c at002a = ╱e2╱+╱ // 0x2072 @0x2a
0x2048…207c at002b = ╱56╱V╱ // 0x2073 @0x2b
0x2048…207c at002c = ╱eb╱;╱ // 0x2074 @0x2c
0x2048…207c at002d = ╱47╱G╱ // 0x2075 @0x2d
0x2048…207c at002e = ╱46╱F╱ // 0x2076 @0x2e
0x2048…207c at002f = ╱4e╱N╱ // 0x2077 @0x2f
0x2048…207c at0030 = ╱52╱R╱ // 0x2078 @0x30
0x2048…207c at0031 = ╱dc╱=╱ // 0x2079 @0x31
0x2048…207c at0032 = ╱42╱B╱ // 0x207a @0x32
0x2048…207c at0033 = EOL // 0x207b @0x33
0x2048…207c }
0x207c…209b (108,) adf2 3460 SALDO1$="0+";SALDO11$="0+"
0x207c…209b LineComalBin {
0x207c…209b ptr = 0xadf2 // 0x207c @0x0
0x207c…209b lno = 0x0d84 // 0x207e @0x2
0x207c…209b at0004 = ╱53╱S╱ // 0x2080 @0x4
0x207c…209b at0005 = ╱41╱A╱ // 0x2081 @0x5
0x207c…209b at0006 = ╱4c╱L╱ // 0x2082 @0x6
0x207c…209b at0007 = ╱44╱D╱ // 0x2083 @0x7
0x207c…209b at0008 = ╱4f╱O╱ // 0x2084 @0x8
0x207c…209b at0009 = ╱31╱1╱ // 0x2085 @0x9
0x207c…209b at000a = ╱ef╱$╱ // 0x2086 @0xa
0x207c…209b at000b = ╱dc╱=╱ // 0x2087 @0xb
0x207c…209b at000c = ╱22╱"╱ // 0x2088 @0xc
0x207c…209b at000d = ╱30╱0╱ // 0x2089 @0xd
0x207c…209b at000e = ╱2b╱+╱ // 0x208a @0xe
0x207c…209b at000f = ╱22╱"╱ // 0x208b @0xf
0x207c…209b at0010 = ╱eb╱;╱ // 0x208c @0x10
0x207c…209b at0011 = ╱53╱S╱ // 0x208d @0x11
0x207c…209b at0012 = ╱41╱A╱ // 0x208e @0x12
0x207c…209b at0013 = ╱4c╱L╱ // 0x208f @0x13
0x207c…209b at0014 = ╱44╱D╱ // 0x2090 @0x14
0x207c…209b at0015 = ╱4f╱O╱ // 0x2091 @0x15
0x207c…209b at0016 = ╱31╱1╱ // 0x2092 @0x16
0x207c…209b at0017 = ╱31╱1╱ // 0x2093 @0x17
0x207c…209b at0018 = ╱ef╱$╱ // 0x2094 @0x18
0x207c…209b at0019 = ╱dc╱=╱ // 0x2095 @0x19
0x207c…209b at001a = ╱22╱"╱ // 0x2096 @0x1a
0x207c…209b at001b = ╱30╱0╱ // 0x2097 @0x1b
0x207c…209b at001c = ╱2b╱+╱ // 0x2098 @0x1c
0x207c…209b at001d = ╱22╱"╱ // 0x2099 @0x1d
0x207c…209b at001e = EOL // 0x209a @0x1e
0x207c…209b }
0x209b…20a1 adf8 3470 ENDIF
0x209b…20a1 LineComalBin {
0x209b…20a1 ptr = 0xadf8 // 0x209b @0x0
0x209b…20a1 lno = 0x0d8e // 0x209d @0x2
0x209b…20a1 at0004 = ╱9b╱ ENDIF ╱ // 0x209f @0x4
0x209b…20a1 at0005 = EOL // 0x20a0 @0x5
0x209b…20a1 }
0x20a1…20af ae06 3480 IF GFNR1>B THEN
0x20a1…20af LineComalBin {
0x20a1…20af ptr = 0xae06 // 0x20a1 @0x0
0x20a1…20af lno = 0x0d98 // 0x20a3 @0x2
0x20a1…20af at0004 = ╱9c╱ IF ╱ // 0x20a5 @0x4
0x20a1…20af at0005 = ╱47╱G╱ // 0x20a6 @0x5
0x20a1…20af at0006 = ╱46╱F╱ // 0x20a7 @0x6
0x20a1…20af at0007 = ╱4e╱N╱ // 0x20a8 @0x7
0x20a1…20af at0008 = ╱52╱R╱ // 0x20a9 @0x8
0x20a1…20af at0009 = ╱31╱1╱ // 0x20aa @0x9
0x20a1…20af at000a = ╱de╱>╱ // 0x20ab @0xa
0x20a1…20af at000b = ╱42╱B╱ // 0x20ac @0xb
0x20a1…20af at000c = ╱b6╱ THEN ╱ // 0x20ad @0xc
0x20a1…20af at000d = EOL // 0x20ae @0xd
0x20a1…20af }
0x20af…20da ae31 3490 IF LINIE>37 THEN EXEC NYSIDE(GFNR1,GLNAVN1$)
0x20af…20da LineComalBin {
0x20af…20da ptr = 0xae31 // 0x20af @0x0
0x20af…20da lno = 0x0da2 // 0x20b1 @0x2
0x20af…20da at0004 = ╱82╱ IF ╱ // 0x20b3 @0x4
0x20af…20da at0005 = ╱4c╱L╱ // 0x20b4 @0x5
0x20af…20da at0006 = ╱49╱I╱ // 0x20b5 @0x6
0x20af…20da at0007 = ╱4e╱N╱ // 0x20b6 @0x7
0x20af…20da at0008 = ╱49╱I╱ // 0x20b7 @0x8
0x20af…20da at0009 = ╱45╱E╱ // 0x20b8 @0x9
0x20af…20da at000a = ╱de╱>╱ // 0x20b9 @0xa
0x20af…20da at000b = ╱33╱3╱ // 0x20ba @0xb
0x20af…20da at000c = ╱37╱7╱ // 0x20bb @0xc
0x20af…20da at000d = ╱fe00009406╱ // 0x20bc @0xd
0x20af…20da at0012 = ╱b6╱ THEN ╱ // 0x20c1 @0x12
0x20af…20da at0013 = ╱9d╱ EXEC ╱ // 0x20c2 @0x13
0x20af…20da at0014 = ╱4e╱N╱ // 0x20c3 @0x14
0x20af…20da at0015 = ╱59╱Y╱ // 0x20c4 @0x15
0x20af…20da at0016 = ╱53╱S╱ // 0x20c5 @0x16
0x20af…20da at0017 = ╱49╱I╱ // 0x20c6 @0x17
0x20af…20da at0018 = ╱44╱D╱ // 0x20c7 @0x18
0x20af…20da at0019 = ╱45╱E╱ // 0x20c8 @0x19
0x20af…20da at001a = ╱ed╱(╱ // 0x20c9 @0x1a
0x20af…20da at001b = ╱47╱G╱ // 0x20ca @0x1b
0x20af…20da at001c = ╱46╱F╱ // 0x20cb @0x1c
0x20af…20da at001d = ╱4e╱N╱ // 0x20cc @0x1d
0x20af…20da at001e = ╱52╱R╱ // 0x20cd @0x1e
0x20af…20da at001f = ╱31╱1╱ // 0x20ce @0x1f
0x20af…20da at0020 = ╱ec╱,╱ // 0x20cf @0x20
0x20af…20da at0021 = ╱47╱G╱ // 0x20d0 @0x21
0x20af…20da at0022 = ╱4c╱L╱ // 0x20d1 @0x22
0x20af…20da at0023 = ╱4e╱N╱ // 0x20d2 @0x23
0x20af…20da at0024 = ╱41╱A╱ // 0x20d3 @0x24
0x20af…20da at0025 = ╱56╱V╱ // 0x20d4 @0x25
0x20af…20da at0026 = ╱4e╱N╱ // 0x20d5 @0x26
0x20af…20da at0027 = ╱31╱1╱ // 0x20d6 @0x27
0x20af…20da at0028 = ╱ef╱$╱ // 0x20d7 @0x28
0x20af…20da at0029 = ╱ee╱)╱ // 0x20d8 @0x29
0x20af…20da at002a = EOL // 0x20d9 @0x2a
0x20af…20da }
0x20da…20e3 ae3a 3500 PRINT " "
0x20da…20e3 LineComalBin {
0x20da…20e3 ptr = 0xae3a // 0x20da @0x0
0x20da…20e3 lno = 0x0dac // 0x20dc @0x2
0x20da…20e3 at0004 = ╱92╱ PRINT ╱ // 0x20de @0x4
0x20da…20e3 at0005 = ╱22╱"╱ // 0x20df @0x5
0x20da…20e3 at0006 = ╱20╱…╱ // 0x20e0 @0x6
0x20da…20e3 at0007 = ╱22╱"╱ // 0x20e1 @0x7
0x20da…20e3 at0008 = EOL // 0x20e2 @0x8
0x20da…20e3 }
0x20e3…2104 ae5b 3510 PRINT TAB(8);STREG$(E:71)
0x20e3…2104 LineComalBin {
0x20e3…2104 ptr = 0xae5b // 0x20e3 @0x0
0x20e3…2104 lno = 0x0db6 // 0x20e5 @0x2
0x20e3…2104 at0004 = ╱92╱ PRINT ╱ // 0x20e7 @0x4
0x20e3…2104 at0005 = ╱d2╱TAB╱ // 0x20e8 @0x5
0x20e3…2104 at0006 = ╱ed╱(╱ // 0x20e9 @0x6
0x20e3…2104 at0007 = ╱38╱8╱ // 0x20ea @0x7
0x20e3…2104 at0008 = ╱fe00008004╱ // 0x20eb @0x8
0x20e3…2104 at000d = ╱ee╱)╱ // 0x20f0 @0xd
0x20e3…2104 at000e = ╱eb╱;╱ // 0x20f1 @0xe
0x20e3…2104 at000f = ╱53╱S╱ // 0x20f2 @0xf
0x20e3…2104 at0010 = ╱54╱T╱ // 0x20f3 @0x10
0x20e3…2104 at0011 = ╱52╱R╱ // 0x20f4 @0x11
0x20e3…2104 at0012 = ╱45╱E╱ // 0x20f5 @0x12
0x20e3…2104 at0013 = ╱47╱G╱ // 0x20f6 @0x13
0x20e3…2104 at0014 = ╱ef╱$╱ // 0x20f7 @0x14
0x20e3…2104 at0015 = ╱ed╱(╱ // 0x20f8 @0x15
0x20e3…2104 at0016 = ╱45╱E╱ // 0x20f9 @0x16
0x20e3…2104 at0017 = ╱f0╱:╱ // 0x20fa @0x17
0x20e3…2104 at0018 = ╱37╱7╱ // 0x20fb @0x18
0x20e3…2104 at0019 = ╱31╱1╱ // 0x20fc @0x19
0x20e3…2104 at001a = ╱fe00008e07╱ // 0x20fd @0x1a
0x20e3…2104 at001f = ╱ee╱)╱ // 0x2102 @0x1f
0x20e3…2104 at0020 = EOL // 0x2103 @0x20
0x20e3…2104 }
0x2104…2132 ae89 3520 EXEC LINIEUD(GFNR1,GLNAVN1$,SALDO4$,SALDO14$)
0x2104…2132 LineComalBin {
0x2104…2132 ptr = 0xae89 // 0x2104 @0x0
0x2104…2132 lno = 0x0dc0 // 0x2106 @0x2
0x2104…2132 at0004 = ╱9d╱ EXEC ╱ // 0x2108 @0x4
0x2104…2132 at0005 = ╱4c╱L╱ // 0x2109 @0x5
0x2104…2132 at0006 = ╱49╱I╱ // 0x210a @0x6
0x2104…2132 at0007 = ╱4e╱N╱ // 0x210b @0x7
0x2104…2132 at0008 = ╱49╱I╱ // 0x210c @0x8
0x2104…2132 at0009 = ╱45╱E╱ // 0x210d @0x9
0x2104…2132 at000a = ╱55╱U╱ // 0x210e @0xa
0x2104…2132 at000b = ╱44╱D╱ // 0x210f @0xb
0x2104…2132 at000c = ╱ed╱(╱ // 0x2110 @0xc
0x2104…2132 at000d = ╱47╱G╱ // 0x2111 @0xd
0x2104…2132 at000e = ╱46╱F╱ // 0x2112 @0xe
0x2104…2132 at000f = ╱4e╱N╱ // 0x2113 @0xf
0x2104…2132 at0010 = ╱52╱R╱ // 0x2114 @0x10
0x2104…2132 at0011 = ╱31╱1╱ // 0x2115 @0x11
0x2104…2132 at0012 = ╱ec╱,╱ // 0x2116 @0x12
0x2104…2132 at0013 = ╱47╱G╱ // 0x2117 @0x13
0x2104…2132 at0014 = ╱4c╱L╱ // 0x2118 @0x14
0x2104…2132 at0015 = ╱4e╱N╱ // 0x2119 @0x15
0x2104…2132 at0016 = ╱41╱A╱ // 0x211a @0x16
0x2104…2132 at0017 = ╱56╱V╱ // 0x211b @0x17
0x2104…2132 at0018 = ╱4e╱N╱ // 0x211c @0x18
0x2104…2132 at0019 = ╱31╱1╱ // 0x211d @0x19
0x2104…2132 at001a = ╱ef╱$╱ // 0x211e @0x1a
0x2104…2132 at001b = ╱ec╱,╱ // 0x211f @0x1b
0x2104…2132 at001c = ╱53╱S╱ // 0x2120 @0x1c
0x2104…2132 at001d = ╱41╱A╱ // 0x2121 @0x1d
0x2104…2132 at001e = ╱4c╱L╱ // 0x2122 @0x1e
0x2104…2132 at001f = ╱44╱D╱ // 0x2123 @0x1f
0x2104…2132 at0020 = ╱4f╱O╱ // 0x2124 @0x20
0x2104…2132 at0021 = ╱34╱4╱ // 0x2125 @0x21
0x2104…2132 at0022 = ╱ef╱$╱ // 0x2126 @0x22
0x2104…2132 at0023 = ╱ec╱,╱ // 0x2127 @0x23
0x2104…2132 at0024 = ╱53╱S╱ // 0x2128 @0x24
0x2104…2132 at0025 = ╱41╱A╱ // 0x2129 @0x25
0x2104…2132 at0026 = ╱4c╱L╱ // 0x212a @0x26
0x2104…2132 at0027 = ╱44╱D╱ // 0x212b @0x27
0x2104…2132 at0028 = ╱4f╱O╱ // 0x212c @0x28
0x2104…2132 at0029 = ╱31╱1╱ // 0x212d @0x29
0x2104…2132 at002a = ╱34╱4╱ // 0x212e @0x2a
0x2104…2132 at002b = ╱ef╱$╱ // 0x212f @0x2b
0x2104…2132 at002c = ╱ee╱)╱ // 0x2130 @0x2c
0x2104…2132 at002d = EOL // 0x2131 @0x2d
0x2104…2132 }
0x2132…2144 ae9b 3530 LINIE=LINIE+V
0x2132…2144 LineComalBin {
0x2132…2144 ptr = 0xae9b // 0x2132 @0x0
0x2132…2144 lno = 0x0dca // 0x2134 @0x2
0x2132…2144 at0004 = ╱4c╱L╱ // 0x2136 @0x4
0x2132…2144 at0005 = ╱49╱I╱ // 0x2137 @0x5
0x2132…2144 at0006 = ╱4e╱N╱ // 0x2138 @0x6
0x2132…2144 at0007 = ╱49╱I╱ // 0x2139 @0x7
0x2132…2144 at0008 = ╱45╱E╱ // 0x213a @0x8
0x2132…2144 at0009 = ╱dc╱=╱ // 0x213b @0x9
0x2132…2144 at000a = ╱4c╱L╱ // 0x213c @0xa
0x2132…2144 at000b = ╱49╱I╱ // 0x213d @0xb
0x2132…2144 at000c = ╱4e╱N╱ // 0x213e @0xc
0x2132…2144 at000d = ╱49╱I╱ // 0x213f @0xd
0x2132…2144 at000e = ╱45╱E╱ // 0x2140 @0xe
0x2132…2144 at000f = ╱e2╱+╱ // 0x2141 @0xf
0x2132…2144 at0010 = ╱56╱V╱ // 0x2142 @0x10
0x2132…2144 at0011 = EOL // 0x2143 @0x11
0x2132…2144 }
0x2144…214a aea1 3540 ENDIF
0x2144…214a LineComalBin {
0x2144…214a ptr = 0xaea1 // 0x2144 @0x0
0x2144…214a lno = 0x0dd4 // 0x2146 @0x2
0x2144…214a at0004 = ╱9b╱ ENDIF ╱ // 0x2148 @0x4
0x2144…214a at0005 = EOL // 0x2149 @0x5
0x2144…214a }
0x214a…2175 aecc 3550 IF LINIE>36 THEN EXEC NYSIDE(GFNR1,GLNAVN1$)
0x214a…2175 LineComalBin {
0x214a…2175 ptr = 0xaecc // 0x214a @0x0
0x214a…2175 lno = 0x0dde // 0x214c @0x2
0x214a…2175 at0004 = ╱82╱ IF ╱ // 0x214e @0x4
0x214a…2175 at0005 = ╱4c╱L╱ // 0x214f @0x5
0x214a…2175 at0006 = ╱49╱I╱ // 0x2150 @0x6
0x214a…2175 at0007 = ╱4e╱N╱ // 0x2151 @0x7
0x214a…2175 at0008 = ╱49╱I╱ // 0x2152 @0x8
0x214a…2175 at0009 = ╱45╱E╱ // 0x2153 @0x9
0x214a…2175 at000a = ╱de╱>╱ // 0x2154 @0xa
0x214a…2175 at000b = ╱33╱3╱ // 0x2155 @0xb
0x214a…2175 at000c = ╱36╱6╱ // 0x2156 @0xc
0x214a…2175 at000d = ╱fe00009006╱ // 0x2157 @0xd
0x214a…2175 at0012 = ╱b6╱ THEN ╱ // 0x215c @0x12
0x214a…2175 at0013 = ╱9d╱ EXEC ╱ // 0x215d @0x13
0x214a…2175 at0014 = ╱4e╱N╱ // 0x215e @0x14
0x214a…2175 at0015 = ╱59╱Y╱ // 0x215f @0x15
0x214a…2175 at0016 = ╱53╱S╱ // 0x2160 @0x16
0x214a…2175 at0017 = ╱49╱I╱ // 0x2161 @0x17
0x214a…2175 at0018 = ╱44╱D╱ // 0x2162 @0x18
0x214a…2175 at0019 = ╱45╱E╱ // 0x2163 @0x19
0x214a…2175 at001a = ╱ed╱(╱ // 0x2164 @0x1a
0x214a…2175 at001b = ╱47╱G╱ // 0x2165 @0x1b
0x214a…2175 at001c = ╱46╱F╱ // 0x2166 @0x1c
0x214a…2175 at001d = ╱4e╱N╱ // 0x2167 @0x1d
0x214a…2175 at001e = ╱52╱R╱ // 0x2168 @0x1e
0x214a…2175 at001f = ╱31╱1╱ // 0x2169 @0x1f
0x214a…2175 at0020 = ╱ec╱,╱ // 0x216a @0x20
0x214a…2175 at0021 = ╱47╱G╱ // 0x216b @0x21
0x214a…2175 at0022 = ╱4c╱L╱ // 0x216c @0x22
0x214a…2175 at0023 = ╱4e╱N╱ // 0x216d @0x23
0x214a…2175 at0024 = ╱41╱A╱ // 0x216e @0x24
0x214a…2175 at0025 = ╱56╱V╱ // 0x216f @0x25
0x214a…2175 at0026 = ╱4e╱N╱ // 0x2170 @0x26
0x214a…2175 at0027 = ╱31╱1╱ // 0x2171 @0x27
0x214a…2175 at0028 = ╱ef╱$╱ // 0x2172 @0x28
0x214a…2175 at0029 = ╱ee╱)╱ // 0x2173 @0x29
0x214a…2175 at002a = EOL // 0x2174 @0x2a
0x214a…2175 }
0x2175…219f aef6 3560 GLNAVN$="Difference";GFNR=100000
0x2175…219f LineComalBin {
0x2175…219f ptr = 0xaef6 // 0x2175 @0x0
0x2175…219f lno = 0x0de8 // 0x2177 @0x2
0x2175…219f at0004 = ╱47╱G╱ // 0x2179 @0x4
0x2175…219f at0005 = ╱4c╱L╱ // 0x217a @0x5
0x2175…219f at0006 = ╱4e╱N╱ // 0x217b @0x6
0x2175…219f at0007 = ╱41╱A╱ // 0x217c @0x7
0x2175…219f at0008 = ╱56╱V╱ // 0x217d @0x8
0x2175…219f at0009 = ╱4e╱N╱ // 0x217e @0x9
0x2175…219f at000a = ╱ef╱$╱ // 0x217f @0xa
0x2175…219f at000b = ╱dc╱=╱ // 0x2180 @0xb
0x2175…219f at000c = ╱22╱"╱ // 0x2181 @0xc
0x2175…219f at000d = ╱44╱D╱ // 0x2182 @0xd
0x2175…219f at000e = ╱69╱i╱ // 0x2183 @0xe
0x2175…219f at000f = ╱66╱f╱ // 0x2184 @0xf
0x2175…219f at0010 = ╱66╱f╱ // 0x2185 @0x10
0x2175…219f at0011 = ╱65╱e╱ // 0x2186 @0x11
0x2175…219f at0012 = ╱72╱r╱ // 0x2187 @0x12
0x2175…219f at0013 = ╱65╱e╱ // 0x2188 @0x13
0x2175…219f at0014 = ╱6e╱n╱ // 0x2189 @0x14
0x2175…219f at0015 = ╱63╱c╱ // 0x218a @0x15
0x2175…219f at0016 = ╱65╱e╱ // 0x218b @0x16
0x2175…219f at0017 = ╱22╱"╱ // 0x218c @0x17
0x2175…219f at0018 = ╱eb╱;╱ // 0x218d @0x18
0x2175…219f at0019 = ╱47╱G╱ // 0x218e @0x19
0x2175…219f at001a = ╱46╱F╱ // 0x218f @0x1a
0x2175…219f at001b = ╱4e╱N╱ // 0x2190 @0x1b
0x2175…219f at001c = ╱52╱R╱ // 0x2191 @0x1c
0x2175…219f at001d = ╱dc╱=╱ // 0x2192 @0x1d
0x2175…219f at001e = ╱31╱1╱ // 0x2193 @0x1e
0x2175…219f at001f = ╱30╱0╱ // 0x2194 @0x1f
0x2175…219f at0020 = ╱30╱0╱ // 0x2195 @0x20
0x2175…219f at0021 = ╱30╱0╱ // 0x2196 @0x21
0x2175…219f at0022 = ╱30╱0╱ // 0x2197 @0x22
0x2175…219f at0023 = ╱30╱0╱ // 0x2198 @0x23
0x2175…219f at0024 = ╱fe0050c311╱ // 0x2199 @0x24
0x2175…219f at0029 = EOL // 0x219e @0x29
0x2175…219f }
0x219f…21a8 aeff 3570 PRINT " "
0x219f…21a8 LineComalBin {
0x219f…21a8 ptr = 0xaeff // 0x219f @0x0
0x219f…21a8 lno = 0x0df2 // 0x21a1 @0x2
0x219f…21a8 at0004 = ╱92╱ PRINT ╱ // 0x21a3 @0x4
0x219f…21a8 at0005 = ╱22╱"╱ // 0x21a4 @0x5
0x219f…21a8 at0006 = ╱20╱…╱ // 0x21a5 @0x6
0x219f…21a8 at0007 = ╱22╱"╱ // 0x21a6 @0x7
0x219f…21a8 at0008 = EOL // 0x21a7 @0x8
0x219f…21a8 }
0x21a8…21c9 af20 3580 PRINT TAB(8);STREG$(E:71)
0x21a8…21c9 LineComalBin {
0x21a8…21c9 ptr = 0xaf20 // 0x21a8 @0x0
0x21a8…21c9 lno = 0x0dfc // 0x21aa @0x2
0x21a8…21c9 at0004 = ╱92╱ PRINT ╱ // 0x21ac @0x4
0x21a8…21c9 at0005 = ╱d2╱TAB╱ // 0x21ad @0x5
0x21a8…21c9 at0006 = ╱ed╱(╱ // 0x21ae @0x6
0x21a8…21c9 at0007 = ╱38╱8╱ // 0x21af @0x7
0x21a8…21c9 at0008 = ╱fe00008004╱ // 0x21b0 @0x8
0x21a8…21c9 at000d = ╱ee╱)╱ // 0x21b5 @0xd
0x21a8…21c9 at000e = ╱eb╱;╱ // 0x21b6 @0xe
0x21a8…21c9 at000f = ╱53╱S╱ // 0x21b7 @0xf
0x21a8…21c9 at0010 = ╱54╱T╱ // 0x21b8 @0x10
0x21a8…21c9 at0011 = ╱52╱R╱ // 0x21b9 @0x11
0x21a8…21c9 at0012 = ╱45╱E╱ // 0x21ba @0x12
0x21a8…21c9 at0013 = ╱47╱G╱ // 0x21bb @0x13
0x21a8…21c9 at0014 = ╱ef╱$╱ // 0x21bc @0x14
0x21a8…21c9 at0015 = ╱ed╱(╱ // 0x21bd @0x15
0x21a8…21c9 at0016 = ╱45╱E╱ // 0x21be @0x16
0x21a8…21c9 at0017 = ╱f0╱:╱ // 0x21bf @0x17
0x21a8…21c9 at0018 = ╱37╱7╱ // 0x21c0 @0x18
0x21a8…21c9 at0019 = ╱31╱1╱ // 0x21c1 @0x19
0x21a8…21c9 at001a = ╱fe00008e07╱ // 0x21c2 @0x1a
0x21a8…21c9 at001f = ╱ee╱)╱ // 0x21c7 @0x1f
0x21a8…21c9 at0020 = EOL // 0x21c8 @0x20
0x21a8…21c9 }
0x21c9…21f5 af4c 3590 EXEC LINIEUD(GFNR,GLNAVN$,SALDO3$,SALDO13$)
0x21c9…21f5 LineComalBin {
0x21c9…21f5 ptr = 0xaf4c // 0x21c9 @0x0
0x21c9…21f5 lno = 0x0e06 // 0x21cb @0x2
0x21c9…21f5 at0004 = ╱9d╱ EXEC ╱ // 0x21cd @0x4
0x21c9…21f5 at0005 = ╱4c╱L╱ // 0x21ce @0x5
0x21c9…21f5 at0006 = ╱49╱I╱ // 0x21cf @0x6
0x21c9…21f5 at0007 = ╱4e╱N╱ // 0x21d0 @0x7
0x21c9…21f5 at0008 = ╱49╱I╱ // 0x21d1 @0x8
0x21c9…21f5 at0009 = ╱45╱E╱ // 0x21d2 @0x9
0x21c9…21f5 at000a = ╱55╱U╱ // 0x21d3 @0xa
0x21c9…21f5 at000b = ╱44╱D╱ // 0x21d4 @0xb
0x21c9…21f5 at000c = ╱ed╱(╱ // 0x21d5 @0xc
0x21c9…21f5 at000d = ╱47╱G╱ // 0x21d6 @0xd
0x21c9…21f5 at000e = ╱46╱F╱ // 0x21d7 @0xe
0x21c9…21f5 at000f = ╱4e╱N╱ // 0x21d8 @0xf
0x21c9…21f5 at0010 = ╱52╱R╱ // 0x21d9 @0x10
0x21c9…21f5 at0011 = ╱ec╱,╱ // 0x21da @0x11
0x21c9…21f5 at0012 = ╱47╱G╱ // 0x21db @0x12
0x21c9…21f5 at0013 = ╱4c╱L╱ // 0x21dc @0x13
0x21c9…21f5 at0014 = ╱4e╱N╱ // 0x21dd @0x14
0x21c9…21f5 at0015 = ╱41╱A╱ // 0x21de @0x15
0x21c9…21f5 at0016 = ╱56╱V╱ // 0x21df @0x16
0x21c9…21f5 at0017 = ╱4e╱N╱ // 0x21e0 @0x17
0x21c9…21f5 at0018 = ╱ef╱$╱ // 0x21e1 @0x18
0x21c9…21f5 at0019 = ╱ec╱,╱ // 0x21e2 @0x19
0x21c9…21f5 at001a = ╱53╱S╱ // 0x21e3 @0x1a
0x21c9…21f5 at001b = ╱41╱A╱ // 0x21e4 @0x1b
0x21c9…21f5 at001c = ╱4c╱L╱ // 0x21e5 @0x1c
0x21c9…21f5 at001d = ╱44╱D╱ // 0x21e6 @0x1d
0x21c9…21f5 at001e = ╱4f╱O╱ // 0x21e7 @0x1e
0x21c9…21f5 at001f = ╱33╱3╱ // 0x21e8 @0x1f
0x21c9…21f5 at0020 = ╱ef╱$╱ // 0x21e9 @0x20
0x21c9…21f5 at0021 = ╱ec╱,╱ // 0x21ea @0x21
0x21c9…21f5 at0022 = ╱53╱S╱ // 0x21eb @0x22
0x21c9…21f5 at0023 = ╱41╱A╱ // 0x21ec @0x23
0x21c9…21f5 at0024 = ╱4c╱L╱ // 0x21ed @0x24
0x21c9…21f5 at0025 = ╱44╱D╱ // 0x21ee @0x25
0x21c9…21f5 at0026 = ╱4f╱O╱ // 0x21ef @0x26
0x21c9…21f5 at0027 = ╱31╱1╱ // 0x21f0 @0x27
0x21c9…21f5 at0028 = ╱33╱3╱ // 0x21f1 @0x28
0x21c9…21f5 at0029 = ╱ef╱$╱ // 0x21f2 @0x29
0x21c9…21f5 at002a = ╱ee╱)╱ // 0x21f3 @0x2a
0x21c9…21f5 at002b = EOL // 0x21f4 @0x2b
0x21c9…21f5 }
0x21f5…2216 af6d 3600 PRINT TAB(8);STREG$(E:71)
0x21f5…2216 LineComalBin {
0x21f5…2216 ptr = 0xaf6d // 0x21f5 @0x0
0x21f5…2216 lno = 0x0e10 // 0x21f7 @0x2
0x21f5…2216 at0004 = ╱92╱ PRINT ╱ // 0x21f9 @0x4
0x21f5…2216 at0005 = ╱d2╱TAB╱ // 0x21fa @0x5
0x21f5…2216 at0006 = ╱ed╱(╱ // 0x21fb @0x6
0x21f5…2216 at0007 = ╱38╱8╱ // 0x21fc @0x7
0x21f5…2216 at0008 = ╱fe00008004╱ // 0x21fd @0x8
0x21f5…2216 at000d = ╱ee╱)╱ // 0x2202 @0xd
0x21f5…2216 at000e = ╱eb╱;╱ // 0x2203 @0xe
0x21f5…2216 at000f = ╱53╱S╱ // 0x2204 @0xf
0x21f5…2216 at0010 = ╱54╱T╱ // 0x2205 @0x10
0x21f5…2216 at0011 = ╱52╱R╱ // 0x2206 @0x11
0x21f5…2216 at0012 = ╱45╱E╱ // 0x2207 @0x12
0x21f5…2216 at0013 = ╱47╱G╱ // 0x2208 @0x13
0x21f5…2216 at0014 = ╱ef╱$╱ // 0x2209 @0x14
0x21f5…2216 at0015 = ╱ed╱(╱ // 0x220a @0x15
0x21f5…2216 at0016 = ╱45╱E╱ // 0x220b @0x16
0x21f5…2216 at0017 = ╱f0╱:╱ // 0x220c @0x17
0x21f5…2216 at0018 = ╱37╱7╱ // 0x220d @0x18
0x21f5…2216 at0019 = ╱31╱1╱ // 0x220e @0x19
0x21f5…2216 at001a = ╱fe00008e07╱ // 0x220f @0x1a
0x21f5…2216 at001f = ╱ee╱)╱ // 0x2214 @0x1f
0x21f5…2216 at0020 = EOL // 0x2215 @0x20
0x21f5…2216 }
0x2216…222f af86 3610 FOR LINIE=LINIE TO 37
0x2216…222f LineComalBin {
0x2216…222f ptr = 0xaf86 // 0x2216 @0x0
0x2216…222f lno = 0x0e1a // 0x2218 @0x2
0x2216…222f at0004 = ╱83╱ FOR ╱ // 0x221a @0x4
0x2216…222f at0005 = ╱4c╱L╱ // 0x221b @0x5
0x2216…222f at0006 = ╱49╱I╱ // 0x221c @0x6
0x2216…222f at0007 = ╱4e╱N╱ // 0x221d @0x7
0x2216…222f at0008 = ╱49╱I╱ // 0x221e @0x8
0x2216…222f at0009 = ╱45╱E╱ // 0x221f @0x9
0x2216…222f at000a = ╱dc╱=╱ // 0x2220 @0xa
0x2216…222f at000b = ╱4c╱L╱ // 0x2221 @0xb
0x2216…222f at000c = ╱49╱I╱ // 0x2222 @0xc
0x2216…222f at000d = ╱4e╱N╱ // 0x2223 @0xd
0x2216…222f at000e = ╱49╱I╱ // 0x2224 @0xe
0x2216…222f at000f = ╱45╱E╱ // 0x2225 @0xf
0x2216…222f at0010 = ╱b7╱ TO ╱ // 0x2226 @0x10
0x2216…222f at0011 = ╱33╱3╱ // 0x2227 @0x11
0x2216…222f at0012 = ╱37╱7╱ // 0x2228 @0x12
0x2216…222f at0013 = ╱fe00009406╱ // 0x2229 @0x13
0x2216…222f at0018 = EOL // 0x222e @0x18
0x2216…222f }
0x222f…2238 af8f 3620 PRINT " "
0x222f…2238 LineComalBin {
0x222f…2238 ptr = 0xaf8f // 0x222f @0x0
0x222f…2238 lno = 0x0e24 // 0x2231 @0x2
0x222f…2238 at0004 = ╱92╱ PRINT ╱ // 0x2233 @0x4
0x222f…2238 at0005 = ╱22╱"╱ // 0x2234 @0x5
0x222f…2238 at0006 = ╱20╱…╱ // 0x2235 @0x6
0x222f…2238 at0007 = ╱22╱"╱ // 0x2236 @0x7
0x222f…2238 at0008 = EOL // 0x2237 @0x8
0x222f…2238 }
0x2238…2243 af9a 3630 NEXT LINIE
0x2238…2243 LineComalBin {
0x2238…2243 ptr = 0xaf9a // 0x2238 @0x0
0x2238…2243 lno = 0x0e2e // 0x223a @0x2
0x2238…2243 at0004 = ╱84╱ NEXT ╱ // 0x223c @0x4
0x2238…2243 at0005 = ╱4c╱L╱ // 0x223d @0x5
0x2238…2243 at0006 = ╱49╱I╱ // 0x223e @0x6
0x2238…2243 at0007 = ╱4e╱N╱ // 0x223f @0x7
0x2238…2243 at0008 = ╱49╱I╱ // 0x2240 @0x8
0x2238…2243 at0009 = ╱45╱E╱ // 0x2241 @0x9
0x2238…2243 at000a = EOL // 0x2242 @0xa
0x2238…2243 }
0x2243…224c afa3 3640 PRINT " "
0x2243…224c LineComalBin {
0x2243…224c ptr = 0xafa3 // 0x2243 @0x0
0x2243…224c lno = 0x0e38 // 0x2245 @0x2
0x2243…224c at0004 = ╱92╱ PRINT ╱ // 0x2247 @0x4
0x2243…224c at0005 = ╱22╱"╱ // 0x2248 @0x5
0x2243…224c at0006 = ╱20╱…╱ // 0x2249 @0x6
0x2243…224c at0007 = ╱22╱"╱ // 0x224a @0x7
0x2243…224c at0008 = EOL // 0x224b @0x8
0x2243…224c }
0x224c…2257 afae 3650 NEXT EPIL3
0x224c…2257 LineComalBin {
0x224c…2257 ptr = 0xafae // 0x224c @0x0
0x224c…2257 lno = 0x0e42 // 0x224e @0x2
0x224c…2257 at0004 = ╱84╱ NEXT ╱ // 0x2250 @0x4
0x224c…2257 at0005 = ╱45╱E╱ // 0x2251 @0x5
0x224c…2257 at0006 = ╱50╱P╱ // 0x2252 @0x6
0x224c…2257 at0007 = ╱49╱I╱ // 0x2253 @0x7
0x224c…2257 at0008 = ╱4c╱L╱ // 0x2254 @0x8
0x224c…2257 at0009 = ╱33╱3╱ // 0x2255 @0x9
0x224c…2257 at000a = EOL // 0x2256 @0xa
0x224c…2257 }
0x2257…225e afb5 3660 OUTPUT T
0x2257…225e LineComalBin {
0x2257…225e ptr = 0xafb5 // 0x2257 @0x0
0x2257…225e lno = 0x0e4c // 0x2259 @0x2
0x2257…225e at0004 = ╱a5╱ OUTPUT ╱ // 0x225b @0x4
0x2257…225e at0005 = ╱54╱T╱ // 0x225c @0x5
0x2257…225e at0006 = EOL // 0x225d @0x6
0x2257…225e }
0x225e…2264 afbb 3670 CLEAR
0x225e…2264 LineComalBin {
0x225e…2264 ptr = 0xafbb // 0x225e @0x0
0x225e…2264 lno = 0x0e56 // 0x2260 @0x2
0x225e…2264 at0004 = ╱a0╱ CLEAR ╱ // 0x2262 @0x4
0x225e…2264 at0005 = EOL // 0x2263 @0x5
0x225e…2264 }
0x2264…226a afc1 3680 REPEAT
0x2264…226a LineComalBin {
0x2264…226a ptr = 0xafc1 // 0x2264 @0x0
0x2264…226a lno = 0x0e60 // 0x2266 @0x2
0x2264…226a at0004 = ╱97╱ REPEAT ╱ // 0x2268 @0x4
0x2264…226a at0005 = EOL // 0x2269 @0x5
0x2264…226a }
0x226a…227f afd6 3690 CURSOR 15,13
0x226a…227f LineComalBin {
0x226a…227f ptr = 0xafd6 // 0x226a @0x0
0x226a…227f lno = 0x0e6a // 0x226c @0x2
0x226a…227f at0004 = ╱a1╱ CURSOR ╱ // 0x226e @0x4
0x226a…227f at0005 = ╱31╱1╱ // 0x226f @0x5
0x226a…227f at0006 = ╱35╱5╱ // 0x2270 @0x6
0x226a…227f at0007 = ╱fe0000f004╱ // 0x2271 @0x7
0x226a…227f at000c = ╱ec╱,╱ // 0x2276 @0xc
0x226a…227f at000d = ╱31╱1╱ // 0x2277 @0xd
0x226a…227f at000e = ╱33╱3╱ // 0x2278 @0xe
0x226a…227f at000f = ╱fe0000d004╱ // 0x2279 @0xf
0x226a…227f at0014 = EOL // 0x227e @0x14
0x226a…227f }
0x227f…22ab b002 3700 INPUT "Ønskes yderligere balancer (J/N) ",A$
0x227f…22ab LineComalBin {
0x227f…22ab ptr = 0xb002 // 0x227f @0x0
0x227f…22ab lno = 0x0e74 // 0x2281 @0x2
0x227f…22ab at0004 = ╱91╱ INPUT ╱ // 0x2283 @0x4
0x227f…22ab at0005 = ╱22╱"╱ // 0x2284 @0x5
0x227f…22ab at0006 = ╱5c╱Ø╱ // 0x2285 @0x6
0x227f…22ab at0007 = ╱6e╱n╱ // 0x2286 @0x7
0x227f…22ab at0008 = ╱73╱s╱ // 0x2287 @0x8
0x227f…22ab at0009 = ╱6b╱k╱ // 0x2288 @0x9
0x227f…22ab at000a = ╱65╱e╱ // 0x2289 @0xa
0x227f…22ab at000b = ╱73╱s╱ // 0x228a @0xb
0x227f…22ab at000c = ╱20╱…╱ // 0x228b @0xc
0x227f…22ab at000d = ╱79╱y╱ // 0x228c @0xd
0x227f…22ab at000e = ╱64╱d╱ // 0x228d @0xe
0x227f…22ab at000f = ╱65╱e╱ // 0x228e @0xf
0x227f…22ab at0010 = ╱72╱r╱ // 0x228f @0x10
0x227f…22ab at0011 = ╱6c╱l╱ // 0x2290 @0x11
0x227f…22ab at0012 = ╱69╱i╱ // 0x2291 @0x12
0x227f…22ab at0013 = ╱67╱g╱ // 0x2292 @0x13
0x227f…22ab at0014 = ╱65╱e╱ // 0x2293 @0x14
0x227f…22ab at0015 = ╱72╱r╱ // 0x2294 @0x15
0x227f…22ab at0016 = ╱65╱e╱ // 0x2295 @0x16
0x227f…22ab at0017 = ╱20╱…╱ // 0x2296 @0x17
0x227f…22ab at0018 = ╱62╱b╱ // 0x2297 @0x18
0x227f…22ab at0019 = ╱61╱a╱ // 0x2298 @0x19
0x227f…22ab at001a = ╱6c╱l╱ // 0x2299 @0x1a
0x227f…22ab at001b = ╱61╱a╱ // 0x229a @0x1b
0x227f…22ab at001c = ╱6e╱n╱ // 0x229b @0x1c
0x227f…22ab at001d = ╱63╱c╱ // 0x229c @0x1d
0x227f…22ab at001e = ╱65╱e╱ // 0x229d @0x1e
0x227f…22ab at001f = ╱72╱r╱ // 0x229e @0x1f
0x227f…22ab at0020 = ╱20╱…╱ // 0x229f @0x20
0x227f…22ab at0021 = ╱28╱(╱ // 0x22a0 @0x21
0x227f…22ab at0022 = ╱4a╱J╱ // 0x22a1 @0x22
0x227f…22ab at0023 = ╱2f╱/╱ // 0x22a2 @0x23
0x227f…22ab at0024 = ╱4e╱N╱ // 0x22a3 @0x24
0x227f…22ab at0025 = ╱29╱)╱ // 0x22a4 @0x25
0x227f…22ab at0026 = ╱20╱…╱ // 0x22a5 @0x26
0x227f…22ab at0027 = ╱22╱"╱ // 0x22a6 @0x27
0x227f…22ab at0028 = ╱ec╱,╱ // 0x22a7 @0x28
0x227f…22ab at0029 = ╱41╱A╱ // 0x22a8 @0x29
0x227f…22ab at002a = ╱ef╱$╱ // 0x22a9 @0x2a
0x227f…22ab at002b = EOL // 0x22aa @0x2b
0x227f…22ab }
0x22ab…22bb b012 3710 EXEC NRTEST(A$)
0x22ab…22bb LineComalBin {
0x22ab…22bb ptr = 0xb012 // 0x22ab @0x0
0x22ab…22bb lno = 0x0e7e // 0x22ad @0x2
0x22ab…22bb at0004 = ╱9d╱ EXEC ╱ // 0x22af @0x4
0x22ab…22bb at0005 = ╱4e╱N╱ // 0x22b0 @0x5
0x22ab…22bb at0006 = ╱52╱R╱ // 0x22b1 @0x6
0x22ab…22bb at0007 = ╱54╱T╱ // 0x22b2 @0x7
0x22ab…22bb at0008 = ╱45╱E╱ // 0x22b3 @0x8
0x22ab…22bb at0009 = ╱53╱S╱ // 0x22b4 @0x9
0x22ab…22bb at000a = ╱54╱T╱ // 0x22b5 @0xa
0x22ab…22bb at000b = ╱ed╱(╱ // 0x22b6 @0xb
0x22ab…22bb at000c = ╱41╱A╱ // 0x22b7 @0xc
0x22ab…22bb at000d = ╱ef╱$╱ // 0x22b8 @0xd
0x22ab…22bb at000e = ╱ee╱)╱ // 0x22b9 @0xe
0x22ab…22bb at000f = EOL // 0x22ba @0xf
0x22ab…22bb }
0x22bb…22d4 b02b 3720 UNTIL P=-7 OR P=-8
0x22bb…22d4 LineComalBin {
0x22bb…22d4 ptr = 0xb02b // 0x22bb @0x0
0x22bb…22d4 lno = 0x0e88 // 0x22bd @0x2
0x22bb…22d4 at0004 = ╱98╱ UNTIL ╱ // 0x22bf @0x4
0x22bb…22d4 at0005 = ╱50╱P╱ // 0x22c0 @0x5
0x22bb…22d4 at0006 = ╱dc╱=╱ // 0x22c1 @0x6
0x22bb…22d4 at0007 = ╱e9╱-╱ // 0x22c2 @0x7
0x22bb…22d4 at0008 = ╱37╱7╱ // 0x22c3 @0x8
0x22bb…22d4 at0009 = ╱fe0000e003╱ // 0x22c4 @0x9
0x22bb…22d4 at000e = ╱db╱ OR ╱ // 0x22c9 @0xe
0x22bb…22d4 at000f = ╱50╱P╱ // 0x22ca @0xf
0x22bb…22d4 at0010 = ╱dc╱=╱ // 0x22cb @0x10
0x22bb…22d4 at0011 = ╱e9╱-╱ // 0x22cc @0x11
0x22bb…22d4 at0012 = ╱38╱8╱ // 0x22cd @0x12
0x22bb…22d4 at0013 = ╱fe00008004╱ // 0x22ce @0x13
0x22bb…22d4 at0018 = EOL // 0x22d3 @0x18
0x22bb…22d4 }
0x22d4…22e3 b03a 3730 UNTIL P=-8
0x22d4…22e3 LineComalBin {
0x22d4…22e3 ptr = 0xb03a // 0x22d4 @0x0
0x22d4…22e3 lno = 0x0e92 // 0x22d6 @0x2
0x22d4…22e3 at0004 = ╱98╱ UNTIL ╱ // 0x22d8 @0x4
0x22d4…22e3 at0005 = ╱50╱P╱ // 0x22d9 @0x5
0x22d4…22e3 at0006 = ╱dc╱=╱ // 0x22da @0x6
0x22d4…22e3 at0007 = ╱e9╱-╱ // 0x22db @0x7
0x22d4…22e3 at0008 = ╱38╱8╱ // 0x22dc @0x8
0x22d4…22e3 at0009 = ╱fe00008004╱ // 0x22dd @0x9
0x22d4…22e3 at000e = EOL // 0x22e2 @0xe
0x22d4…22e3 }
0x22e3…22ea b041 3740 OUTPUT T
0x22e3…22ea LineComalBin {
0x22e3…22ea ptr = 0xb041 // 0x22e3 @0x0
0x22e3…22ea lno = 0x0e9c // 0x22e5 @0x2
0x22e3…22ea at0004 = ╱a5╱ OUTPUT ╱ // 0x22e7 @0x4
0x22e3…22ea at0005 = ╱54╱T╱ // 0x22e8 @0x5
0x22e3…22ea at0006 = EOL // 0x22e9 @0x6
0x22e3…22ea }
0x22ea…2301 0000 3750 CHAIN "P641210:OPSTART"
0x22ea…2301 LineComalBin {
0x22ea…2301 ptr = 0x0000 // 0x22ea @0x0
0x22ea…2301 lno = 0x0ea6 // 0x22ec @0x2
0x22ea…2301 at0004 = ╱ac╱ CHAIN ╱ // 0x22ee @0x4
0x22ea…2301 at0005 = ╱22╱"╱ // 0x22ef @0x5
0x22ea…2301 at0006 = ╱50╱P╱ // 0x22f0 @0x6
0x22ea…2301 at0007 = ╱36╱6╱ // 0x22f1 @0x7
0x22ea…2301 at0008 = ╱34╱4╱ // 0x22f2 @0x8
0x22ea…2301 at0009 = ╱31╱1╱ // 0x22f3 @0x9
0x22ea…2301 at000a = ╱32╱2╱ // 0x22f4 @0xa
0x22ea…2301 at000b = ╱31╱1╱ // 0x22f5 @0xb
0x22ea…2301 at000c = ╱30╱0╱ // 0x22f6 @0xc
0x22ea…2301 at000d = ╱3a╱:╱ // 0x22f7 @0xd
0x22ea…2301 at000e = ╱4f╱O╱ // 0x22f8 @0xe
0x22ea…2301 at000f = ╱50╱P╱ // 0x22f9 @0xf
0x22ea…2301 at0010 = ╱53╱S╱ // 0x22fa @0x10
0x22ea…2301 at0011 = ╱54╱T╱ // 0x22fb @0x11
0x22ea…2301 at0012 = ╱41╱A╱ // 0x22fc @0x12
0x22ea…2301 at0013 = ╱52╱R╱ // 0x22fd @0x13
0x22ea…2301 at0014 = ╱54╱T╱ // 0x22fe @0x14
0x22ea…2301 at0015 = ╱22╱"╱ // 0x22ff @0x15
0x22ea…2301 at0016 = EOL // 0x2300 @0x16
0x22ea…2301 }
0x2301…2320 64 8d 69 00 42 dc 30 fe 00 00 00 00 eb 45 dc 31 fe 00 00 80 01 eb 47 dc 32 fe 00 00 80 02 eb ┆d i B 0 E 1 G 2 ┆
0x2320…2331 56 dc 33 fe 00 00 c0 02 eb 57 dc 39 fe 00 00 90 04 ┆V 3 W 9 ┆
0x2331…2332 (117,) 0xff[0x1]
0x2332…2338 (118,) 57 8d 57 8d 10 00 ┆W W ┆