|
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: 16593 (0x40d1)
Types: SPC/1-COMAL-BIN
Notes: Mikados_B
Names: »BJ.B«
└─⟦385f097a1⟧ Bits:30008988 SPC/1 COMAL programmer til bogføring
└─⟦this⟧ »BJ.B«
0100 REM BJ 0110 DIM K1$(17),K2$(17),K3$(17),K4$(17),B9$(12),UDAGE$(9),T1(9),T2(9),T3(9) 0120 DIM TKODE$(1),BELØB$(12),TEKST$(25),BLANK$(77),BMOMS$(12),INDMOMS$(12) 0130 DIM TFIL$(18,10),N$(6),UDMOMS$(12),TAL4$(14),OP1$(12),OP2$(12),RES$(15) 0140 DIM DEBNAVN$(25),DEBBY$(20),DEBGADE$(25),DEBTLF$(9),DEBKGR$(2),DEBLK$(2) 0150 DIM DSALDO1$(12),DSALDO2$(12),DSALDO3$(12),DSALDO4$(12),ÅRKØB$(12) 0160 DIM MDNKØB$(12),TAL3$(12),MOMS$(12),DMOMS$(12),K5$(17),K6$(17),K7$(17) 0170 DIM FNAVN$(25),FUKODE$(1),FMKODE$(1),FMDEBET$(12),FMKREDIT$(12),K8$(17) 0180 DIM KRENAVN$(25),FÅDEBET$(12),FÅKREDIT$(12),B8$(12),TK$(1),STREG$(77) 0190 DIM K9$(17),K10$(17),K11$(17),K12$(17),K13$(17),KREGADE$(25),KREBY$(20) 0200 DIM KRELK$(1),KRGR$(1),KSALDO1$(12),KSALDO2$(12),TAH$(12),SUM$(12),A$(1) 0210 DIM DV$(10),K14$(17),K15$(17),K16$(17),K17$(17),T4(9),EÅREG$(12) 0211 DIM EMREG$(12),MBEV$(12),YBEV$(12) 0220 PROC CALC(ART,B1,B2,ES) 0230 OP1$=B1$;OP2$=B2$;RES$=ES$;SI=0;FLAG=0 0240 CALL "P641210:REGN" 0250 ES$=RES$ 0260 IF FLAG THEN STOP 0270 ENDPROC 0280 PROC FEJL(NR1,NR2,NR3) 0290 IF STATUS(NR3$)<>0 THEN 0300 PRINT STATUS(NR3$),NR1,NR2,NR3$ 0310 STOP 0320 ENDIF 0330 ENDPROC 0340 PROC BOGFØRING(KONTNR,EDATO,BLGNR,TEK1,BE2,ENT1) 0350 KTAL=KONTNR DIV 10000;KTAL9=KONTNR DIV 1000 0360 KODE2=0 0370 IF KTAL=DTAL THEN 0380 EXEC FINDPOST1(DTAB1,DTAB,MDANTAL,KONTNR,DPIL3,K3$) 0390 DEBNR=KONTNR 0400 IF CEKS=1 THEN STOP 0410 EXEC HENTDPOST 0420 INDEX=INT(ORD(DEBKGR$)-48)*2 0430 B8$=BE2$ 0440 IF B8$(LEN(B8$))="-" THEN 0450 EXEC CALC(0,KGR$(INDEX),B8$,KGR$(INDEX)) 0460 EXEC NEDSKRIV(B8$,DSALDO4$) 0470 EXEC NEDSKRIV(B8$,DSALDO3$) 0480 EXEC NEDSKRIV(B8$,DSALDO2$) 0490 EXEC NEDSKRIV(B8$,DSALDO1$) 0500 ELSE 0510 EXEC CALC(0,KGR$(INDEX-1),B8$,KGR$(INDEX-1)) 0520 ENDIF 0530 EXEC CALC(0,DSALDO1$,B8$,DSALDO1$) 0540 EXEC GEMDPOST 0550 EXEC GEMMID(DMIDNR,K10$,KONTNR,ENT1) 0560 ELSE 0570 IF KTAL9=KRTAL THEN 0580 EXEC FINDPOST1(KTAB1,KTAB,MKANTAL,KONTNR,KPIL3,K4$) 0590 KRENR=KONTNR 0600 IF CEKS=1 THEN STOP 0610 EXEC HENTKRPOST 0620 INDEX=INT(ORD(KRGR$)-48)*2 0630 B8$=BE2$ 0640 IF B8$(LEN(B8$))="+" THEN 0650 EXEC CALC(0,KREGR$(INDEX-1),B8$,KREGR$(INDEX-1)) 0660 EXEC NEDSKRIV1(B8$,KSALDO2$) 0670 EXEC NEDSKRIV1(B8$,KSALDO1$) 0680 ELSE 0690 EXEC CALC(0,KREGR$(INDEX),B8$,KREGR$(INDEX)) 0700 ENDIF 0710 EXEC CALC(0,KSALDO1$,B8$,KSALDO1$) 0720 EXEC GEMKRPOST 0730 EXEC GEMMID(KRMIDNR,K11$,KONTNR,ENT1) 0740 ELSE 0750 EXEC FINDPOST1(FTAB1,FTAB,MFANTAL,KONTNR,FPIL3,K2$) 0760 FNR=KONTNR 0770 IF CEKS=1 THEN STOP 0780 EXEC HENTPOST 0790 KODE2=ORD(FMKODE$)-48 0800 IF FMKODE$<>"0" THEN 0810 B9$="0+" 0820 BMOMS$="0+" 0830 EXEC CALC(3,DMOMS$,TAL3$,B9$) 0840 EXEC CALC(3,BE2$,B9$,B9$) 0850 EXEC CALC(1,BE2$,B9$,BMOMS$) 0860 IF FMKODE$="1" THEN 0870 EXEC CALC(0,INDMOMS$,BMOMS$,INDMOMS$) 0880 ELSE 0890 EXEC CALC(0,UDMOMS$,BMOMS$,UDMOMS$) 0900 ENDIF 0910 BE2$=B9$ 0920 ENDIF 0930 IF BE2$(LEN(BE2$))="-" THEN 0940 EXEC CALC(0,FMKREDIT$,BE2$,FMKREDIT$) 0950 EXEC CALC(0,FÅKREDIT$,BE2$,FÅKREDIT$) 0960 ELSE 0970 EXEC CALC(0,FMDEBET$,BE2$,FMDEBET$) 0980 EXEC CALC(0,FÅDEBET$,BE2$,FÅDEBET$) 0990 ENDIF 1000 EXEC GEMFPOST 1010 EXEC GEMMID(FMIDNR,K9$,KONTNR,ENT1) 1020 ENDIF 1030 ENDIF 1040 IF ENT1<>1000000 THEN 1050 EPIL2=1 1060 EXEC FINDPOST1(ETAB1,ETAB,MEANTAL,(ENT1 DIV 100),EPIL3,K15$) 1070 IF CEKS=0 THEN 1080 FOR EPIL1=1 TO METOT+MUNKANT 1090 CEKS=0 1100 IF (ENT1 MOD 100)=ENR(EPIL2) AND EU$(EPIL1)="0" THEN EXIT 1110 CEKS=1;EPIL2=EPIL2+1*(EU$(EPIL1)="0") 1120 NEXT EPIL1 1130 IF CEKS=0 THEN 1140 GET K14$,ETAB(EPIL3,2):NR9,EMREG$,EÅREG$ 1150 EXEC FEJL(20,20,K14$) 1160 GET K14$,ETAB(EPIL3,2)+EPIL2+1:NR8,MBEV$,YBEV$ 1170 EXEC FEJL(20,21,K14$) 1180 EXEC CALC(0,MBEV$,BE2$,MBEV$) 1190 EXEC CALC(0,YBEV$,BE2$,YBEV$) 1200 EXEC CALC(1,EMREG$,BE2$,EMREG$) 1210 EXEC CALC(1,EÅREG$,BE2$,EÅREG$) 1220 PUT K14$,ETAB(EPIL3,2):NR9,EMREG$,EÅREG$ 1221 EXEC FEJL(20,25,K14$) 1222 PUT K14$,ETAB(EPIL3,2)+EPIL2+1:NR8,MBEV$,YBEV$ 1223 EXEC FEJL(20,26,K14$) 1224 EXEC GEMMID(EMIDNR,K17$,ENT1,KONTNR) 1225 ELSE 1226 ENT1=1000000 1227 ENDIF 1228 ENDIF 1229 ENDIF 1230 ENDPROC 1240 PROC BJUDSKRIV(BJSNR,BJLNR,TK1) 1250 IF BJLNR=36 OR BJLNR=0 THEN 1260 BJSNR=BJSNR+1 1270 EXEC BJHOVEDUD(DATO,BJSNR) 1280 BJLNR=0 1290 ENDIF 1300 BJLNR=BJLNR+1;KODE1=INT(ORD(TK1$)-48) 1310 EXEC BJLINIEUD(BILAG,TEKSTKODE,KONTO,BELØB$,KODE1,BMOMS$,KODE2,ENTKO) 1320 ENDPROC 1330 PROC BJHOVEDUD(UDAG,BJOSNR) 1340 EXEC UDATO(UDAG,UDAGE$) 1345 OUTPUT T 1350 OUTPUT P 1360 IF BJLNR=36 THEN 1370 FOR BJLNR=BJLNR TO 41 1380 PRINT " " 1390 NEXT BJLNR 1400 ENDIF 1410 PRINT TAB(67);DV$;" " 1420 PRINT TAB(6);CHR(14);"Bogholderijournal";CHR(15);TAB(40);"Dato:";UDAGE$; 1430 PRINT TAB(56); 1440 PRINT USING "Side:#####":BJOSNR 1450 PRINT CHR(10);TAB(73);"Moms" 1460 PRINT TAB(2);"Bilag";TAB(9);"Tekst";TAB(35);"Konto";TAB(42);"Entre"; 1470 PRINT TAB(53);"Beløb";TAB(61);"Kode";TAB(69);"Beløb";TAB(75);"Kode" 1480 PRINT TAB(2);STREG$ 1490 ENDPROC 1500 PROC BJLINIEUD(BLG,TEKKODE,KONT,BELB,KO1,MO,KO2,ENT3) 1510 IF BLG<>-1 THEN 1520 PRINT USING "#######":BLG; 1530 ENDIF 1540 IF TEKKODE<10 AND TEKKODE>0 OR TEKKODE>20 THEN 1550 TEKST$=TFIL$(TEKKODE-10*(TEKKODE>20))+BLANK$(1:15) 1560 ENDIF 1570 IF TEKKODE<>0 THEN 1580 PRINT TAB(9);TEKST$; 1590 ENDIF 1600 PRINT TAB(34); 1610 PRINT USING "###### ######":KONT;ENT3; 1620 PRINT TAB(47); 1630 EXEC CALC(0,BELB$,SUM$,SUM$) 1640 EXEC CALC(5,BELB$,TAL3$,TAL4$) 1650 PRINT TAL4$;TAB(62); 1660 IF KO2<>0 THEN 1670 PRINT USING "##":KO1; 1680 PRINT TAB(64); 1690 EXEC CALC(5,MO$,TAL3$,TAL4$) 1700 PRINT TAL4$(2:13);TAB(78); 1710 PRINT USING "##":KO2 1720 ELSE 1730 PRINT USING "##":KO1 1740 ENDIF 1750 ENDPROC 1760 PROC NEDSKRIV1(PSAL1,KSAL) 1770 IF KSAL$(LEN(KSAL$))="-" THEN 1780 EXEC CALC(0,KSAL$,PSAL1$,KSAL$) 1790 IF KSAL$(LEN(KSAL$))="+" THEN 1800 PSAL1$=KSAL$ 1810 KSAL$="0+" 1820 ELSE 1830 PSAL1$="0+" 1840 ENDIF 1850 ENDIF 1860 ENDPROC 1870 PROC NEDSKRIV(PSAL,DSAL) 1880 IF DSAL$(LEN(DSAL$))="+" THEN 1890 EXEC CALC(0,DSAL$,PSAL$,DSAL$) 1900 IF DSAL$(LEN(DSAL$))="-" THEN 1910 PSAL$=DSAL$ 1920 DSAL$="0+" 1930 ELSE 1940 PSAL$="0+" 1950 ENDIF 1960 ENDIF 1970 ENDPROC 1980 PROC UDATO(DA1,DA2) 1990 DA3=DA1 2000 DA2$=" " 2010 FOR J=8 TO 1 STEP -1 2020 IF J MOD 3=0 THEN 2030 DA2$(J)="." 2040 ELSE 2050 DA2$(J)=CHR(DA3 MOD 10+48) 2060 DA3=DA3 DIV 10 2070 ENDIF 2080 NEXT J 2090 ENDPROC 2100 PROC GEMMID(MIDANTAL,L2,KONTNR1,ENT2) 2110 MIDANTAL=MIDANTAL+1 2120 PUT L2$,MIDANTAL:KONTNR1,DDATO,BILAG,TKODE$,BELØB$,ENT2 2130 EXEC FEJL(1,1,L2$) 2140 IF TEKSTKODE>9 AND TEKSTKODE<20 THEN 2150 MIDANTAL=MIDANTAL+1 2160 PUT L2$,MIDANTAL:KONTNR1,TEKST$ 2170 EXEC FEJL(1,2,L2$) 2180 ENDIF 2190 ENDPROC 2200 PROC FINDPOST1(TAB4,Q,MANT2,NØGL5,PIL6,L8) 2210 PIL1=MANT2 DIV 8;PIL6=PIL1;CEKS=1;MANT3=MANT2 DIV 4;MANT4=MANT2 DIV 32 2220 REPEAT 2230 IF NØGL5=TAB4(PIL6) OR PIL1=1 THEN EXIT 2240 PIL1=(PIL1+1) DIV 2 2250 PIL6=PIL6+PIL1*(1-2*(NØGL5<TAB4(PIL6))) 2260 IF PIL6<1 THEN PIL6=1 2270 IF PIL6>MANT3 THEN PIL6=MANT3 2280 UNTIL PIL1=0 2290 IF TAB4(PIL6)>NØGL5 THEN PIL6=PIL6-1*(PIL6>1) 2300 PIL6=MANT4+PIL6 2310 GET L8$,PIL6:Q(1,1),Q(1,2),Q(2,1),Q(2,2),Q(3,1),Q(3,2),Q(4,1),Q(4,2) 2320 EXEC FEJL(2,1,L8$) 2330 FOR PIL6=1 TO 4 2340 IF NØGL5=Q(PIL6,1) THEN EXIT 2350 NEXT PIL6 2360 IF PIL6<>5 THEN CEKS=0 2370 ENDPROC 2380 PROC INDTAB1(Z,MANT5,L7) 2390 PIL1=MANT5 DIV 32 2400 FOR I=1 TO PIL1 2410 H=(I-1)*8+1 2420 GET L7$,I:Z(H),Z(H+1),Z(H+2),Z(H+3),Z(H+4),Z(H+5),Z(H+6),Z(H+7) 2430 EXEC FEJL(3,1,L7$) 2440 NEXT I 2450 ENDPROC 2460 PROC HENTDPOST 2470 S=DTAB(DPIL3,2) 2480 GET K6$,S:DEBNR,DEBNAVN$,DSALDO1$,DEBKGR$ 2490 EXEC FEJL(8,2,K6$) 2500 IF DEBNR<>DTAB(DPIL3,1) THEN STOP 2510 GET K6$,S+1:DSALDO2$,DSALDO3$,DSALDO4$,DEBPOSTNR,DEBLK$ 2520 EXEC FEJL(8,3,K6$) 2530 GET K6$,S+2:DEBGADE$,DEBTLF$,HPOST,HKUNDE 2540 EXEC FEJL(8,4,K6$) 2550 GET K6$,S+3:DEBBY$,ÅRKØB$,MDNKØB$ 2560 EXEC FEJL(8,5,K6$) 2570 ENDPROC 2580 PROC HENTPOST 2590 S=FTAB(FPIL3,2) 2600 GET K5$,S:FNR,FNAVN$ 2610 EXEC FEJL(3,2,K5$) 2620 IF FNR<>FTAB(FPIL3,1) THEN STOP 2630 GET K5$,S+1:FMKODE$,FMDEBET$,FMKREDIT$ 2640 EXEC FEJL(3,3,K5$) 2650 GET K5$,S+2:FUKODE$,FÅDEBET$,FÅKREDIT$ 2660 EXEC FEJL(3,4,K5$) 2670 ENDPROC 2680 PROC HENTKRPOST 2690 S=KTAB(KPIL3,2) 2700 GET K7$,S:KRENR,KRENAVN$,KREGADE$ 2710 EXEC FEJL(4,1,K7$) 2720 GET K7$,S+1:KREBY$,KRELK$,KRGR$,KREPOSTNR,KSALDO1$,KSALDO2$ 2730 EXEC FEJL(4,2,K7$) 2740 ENDPROC 2750 PROC GEMKRPOST 2760 S=KTAB(KPIL3,2) 2770 PUT K7$,S:KRENR,KRENAVN$,KREGADE$ 2780 EXEC FEJL(5,1,K7$) 2790 PUT K7$,S+1:KREBY$,KRELK$,KRGR$,KREPOSTNR,KSALDO1$,KSALDO2$ 2800 EXEC FEJL(5,2,K7$) 2810 ENDPROC 2820 PROC GEMDPOST 2830 S=DTAB(DPIL3,2) 2840 PUT K6$,S:DEBNR,DEBNAVN$,DSALDO1$,DEBKGR$ 2850 EXEC FEJL(9,3,K6$) 2860 PUT K6$,S+1:DSALDO2$,DSALDO3$,DSALDO4$,DEBPOSTNR,DEBLK$ 2870 EXEC FEJL(9,4,K6$) 2880 ENDPROC 2890 PROC GEMFPOST 2900 S=FTAB(FPIL3,2) 2910 PUT K5$,S:FNR,FNAVN$ 2920 EXEC FEJL(4,3,K5$) 2930 PUT K5$,S+1:FMKODE$,FMDEBET$,FMKREDIT$ 2940 EXEC FEJL(4,4,K5$) 2950 PUT K5$,S+2:FUKODE$,FÅDEBET$,FÅKREDIT$ 2960 EXEC FEJL(4,5,K5$) 2970 ENDPROC 2980 K1$="P641220:SYSTEM1" 2990 OPEN K1$,R 3000 EXEC FEJL(9,1,K1$) 3010 GET K1$,1:MFANTAL,MDANTAL,MKANTAL 3020 EXEC FEJL(9,2,K1$) 3030 GET K1$,2:MKASPOST,MPPOST,MBHPOST,MFPMID 3040 EXEC FEJL(9,3,K1$) 3050 GET K1$,3:MDPMID,MKPMID 3060 EXEC FEJL(9,4,K1$) 3070 GET K1$,4:MKPOST,MFAK,MVGR,MKGR 3080 EXEC FEJL(9,5,K1$) 3090 GET K1$,5:MKRGR 3100 EXEC FEJL(9,6,K1$) 3110 GET K1$,6:KASSENR,GIRONR,BANKNR,UDMOMSNR 3120 EXEC FEJL(9,7,K1$) 3130 GET K1$,7:INDMOMSNR 3140 EXEC FEJL(9,8,K1$) 3150 GET K1$,8:DIVNR,DIVDNR,DIFNR,DTAL 3160 EXEC FEJL(9,9,K1$) 3170 GET K1$,9:KRTAL,VTAL,MEANTAL,MUNKANT 3180 EXEC FEJL(9,10,K1$) 3190 GET K1$,10:N$ 3200 EXEC FEJL(9,11,K1$) 3210 GET K1$,11:K2$ 3220 EXEC FEJL(9,12,K1$) 3230 GET K1$,12:K3$ 3240 EXEC FEJL(9,13,K1$) 3250 GET K1$,13:K4$ 3260 EXEC FEJL(9,14,K1$) 3270 GET K1$,15:K5$ 3280 EXEC FEJL(9,15,K1$) 3290 GET K1$,16:K6$ 3300 EXEC FEJL(9,16,K1$) 3310 GET K1$,17:K7$ 3320 EXEC FEJL(9,17,K1$) 3330 GET K1$,21:K8$ 3340 EXEC FEJL(9,18,K1$) 3350 GET K1$,22:K9$ 3360 EXEC FEJL(9,19,K1$) 3370 GET K1$,23:K10$ 3380 EXEC FEJL(9,20,K1$) 3390 GET K1$,24:K11$ 3400 EXEC FEJL(9,21,K1$) 3410 GET K1$,28:K12$ 3420 EXEC FEJL(9,22,K1$) 3430 GET K1$,36:K13$ 3440 EXEC FEJL(9,23,K1$) 3450 GET K1$,37:K14$ 3460 EXEC FEJL(20,1,K1$) 3470 GET K1$,38:K15$ 3480 EXEC FEJL(20,2,K1$) 3490 GET K1$,39:K16$ 3500 EXEC FEJL(20,3,K1$) 3510 GET K1$,40:K17$ 3520 EXEC FEJL(20,4,K1$) 3530 GET K1$,43:METOT,MEMID 3540 EXEC FEJL(20,5,K1$) 3550 CLOSE K1$ 3560 EXEC FEJL(9,24,K1$) 3570 DIM FTAB1(MFANTAL DIV 4),DTAB1(MDANTAL DIV 4),KTAB1(MKANTAL DIV 4) 3580 DIM FTAB(4,2),DTAB(4,2),KTAB(4,2),KGR$(MKGR*2,12),KREGR$(MKRGR*2,12) 3590 DIM ETAB1(MEANTAL DIV 4),ETAB(4,2),ENR(MUNKANT+METOT) 3600 DIM EU$(MUNKANT+METOT) 3610 FOR I=1 TO MKGR*2 3620 KGR$(I)="0+" 3630 NEXT I 3640 FOR I=1 TO MKRGR*2 3650 KREGR$(I)="0+" 3660 NEXT I 3670 K2$=N$+K2$;K3$=N$+K3$;K4$=N$+K4$;K5$=N$+K5$;K6$=N$+K6$;K13$=N$+K13$ 3680 K8$=N$+K8$;K9$=N$+K9$;K10$=N$+K10$;K11$=N$+K11$;K12$=N$+K12$;K7$=N$+K7$ 3690 K14$=N$+K14$;K15$=N$+K15$;K16$=N$+K16$;K17$=N$+K17$ 3700 OPEN K13$,R 3710 EXEC FEJL(9,25,K13$) 3720 GET K13$,1:MOMS$ 3730 EXEC FEJL(9,26,K13$) 3740 GET K13$,2:T1(1),T1(2),T1(3),T1(4),T1(5),T1(6),T1(7),T1(8),T1(9) 3750 EXEC FEJL(9,27,K13$) 3760 FOR I=1 TO 6 3770 H=(I-1)*3+1 3780 GET K13$,I+5:TFIL$(H),TFIL$(H+1),TFIL$(H+2) 3790 EXEC FEJL(9,28,K13$) 3800 NEXT I 3810 GET K13$,12:T2(1),T2(2),T2(3),T2(4),T2(5),T2(6),T2(7),T2(8),T2(9) 3820 EXEC FEJL(9,29,K13$) 3830 GET K13$,13:T3(1),T3(2),T3(3),T3(4),T3(5),T3(6),T3(7),T3(8),T3(9) 3840 EXEC FEJL(9,30,K13$) 3850 GET K13$,20:DV$ 3860 EXEC FEJL(10,50,K13$) 3870 GET K13$,21:T4(1),T4(2),T4(3),T4(4),T4(5),T4(6),T4(7),T4(8),T4(9) 3880 EXEC FEJL(20,6,K13$) 3890 CLOSE K13$ 3900 EXEC FEJL(9,31,K13$) 3910 TAL3$="100+" 3920 EXEC CALC(0,TAL3$,MOMS$,DMOMS$) 3930 BLANK$=" " 3940 TAL4$="0+";SUM$="0+";STREG$="--------------------------------------" 3950 STREG$=STREG$+STREG$+"-";TAH$="0+";BJSIDENR=T1(6);DATO=T1(7) 3960 BHPOSTNR=T3(1);FAKPOSTNR=T2(3);FMIDNR=T3(2);DMIDNR=T3(3);KRMIDNR=T3(4) 3970 EMIDNR=T4(4) 3980 OPEN K2$,R 3990 EXEC FEJL(9,32,K2$) 4000 OPEN K3$,R 4010 EXEC FEJL(9,33,K3$) 4020 OPEN K4$,R 4030 EXEC FEJL(9,34,K4$) 4040 OPEN K5$,W 4050 EXEC FEJL(9,35,K5$) 4060 OPEN K6$,W 4070 EXEC FEJL(9,36,K6$) 4080 OPEN K7$,W 4090 EXEC FEJL(9,37,K7$) 4100 OPEN K8$,R 4110 EXEC FEJL(9,38,K8$) 4120 OPEN K9$,W 4130 EXEC FEJL(9,39,K9$) 4140 OPEN K10$,W 4150 EXEC FEJL(9,40,K10$) 4160 OPEN K11$,W 4170 EXEC FEJL(9,41,K11$) 4175 IF K12$(6)<"9" THEN 4180 OPEN K12$,R 4190 EXEC FEJL(9,42,K12$) 4195 ENDIF 4200 OPEN K14$,W 4210 EXEC FEJL(20,10,K14$) 4220 OPEN K15$,R 4230 EXEC FEJL(20,11,K15$) 4240 OPEN K16$,R 4250 EXEC FEJL(20,12,K16$) 4251 FOR X=1 TO MUNKANT+METOT 4252 GET K16$,X:ENR(X),EU$(X) 4253 EXEC FEJL(20,15,K16$) 4254 NEXT X 4255 CLOSE K16$ 4256 EXEC FEJL(20,16,K16$) 4260 OPEN K17$,W 4270 EXEC FEJL(20,13,K17$) 4280 EXEC INDTAB1(KTAB1,MKANTAL,K4$) 4290 EXEC INDTAB1(FTAB1,MFANTAL,K2$) 4300 EXEC INDTAB1(DTAB1,MDANTAL,K3$) 4310 EXEC INDTAB1(ETAB1,MEANTAL,K15$) 4320 BJLINIENR=0;UDMOMS$="0+";INDMOMS$="0+" 4370 PROC BFØR(PNR,G) 4380 FOR I=1 TO PNR 4390 GET G$,I:KONTO,DDATO,BILAG,TKODE$,BELØB$,TK$,ENTKO 4400 EXEC FEJL(1,4,G$) 4410 TEKSTKODE=ORD(TKODE$)-48 4420 IF TEKSTKODE>9 AND TEKSTKODE<20 THEN 4430 I=I+1 4440 GET G$,I:KONTO,TEKST$ 4450 EXEC FEJL(1,5,G$) 4460 ENDIF 4470 EXEC BOGFØRING(KONTO,DDATO,BILAG,TEKSTKODE,BELØB$,ENTKO) 4480 EXEC BJUDSKRIV(BJSIDENR,BJLINIENR,TK$) 4490 NEXT I 4500 ENDPROC 4510 CLEAR 4520 REPEAT 4530 CURSOR 8,13 4540 INPUT "Monter papir til udskrift af bogholderijournal og tast RETURN",A$ 4550 UNTIL ORD(A$)=255 4560 EXEC BFØR(BHPOSTNR,K8$) 4570 EXEC BFØR(FAKPOSTNR,K12$) 4580 TEKSTKODE=28;TK$="0";ENTKO=1000000 4590 TKODE$=CHR(76) 4600 DDATO=DATO 4610 BILAG=BJSIDENR 4620 KONTO=INDMOMSNR 4630 BELØB$=INDMOMS$ 4640 EXEC BOGFØRING(KONTO,DDATO,BILAG,TEKSTKODE,BELØB$,ENTKO) 4650 TEKSTKODE=10 4660 TEKST$="Samlet indgående afgift" 4670 EXEC BJUDSKRIV(BJSIDENR,BJLINIENR,TK$) 4680 TEKSTKODE=28 4690 KONTO=UDMOMSNR 4700 BELØB$=UDMOMS$ 4710 EXEC BOGFØRING(KONTO,DDATO,BILAG,TEKSTKODE,BELØB$,ENTKO) 4720 TEKSTKODE=10 4730 TEKST$="Samlet udgående afgift" 4740 EXEC BJUDSKRIV(BJSIDENR,BJLINIENR,TK$) 4750 EXEC CALC(4,SUM$,TAH$,TAH$) 4760 IF SI<>0 THEN 4770 TEKSTKODE=10;KONTO=DIFNR;TEKST$="Difference bogholderi" 4780 IF SUM$(LEN(SUM$))="+" THEN 4790 BELØB$=SUM$(1:LEN(SUM$)-1)+"-" 4800 ELSE 4810 BELØB$=SUM$(1:LEN(SUM$)-1)+"+" 4820 ENDIF 4830 EXEC BOGFØRING(KONTO,DDATO,BILAG,TEKSTKODE,BELØB$,ENTKO) 4840 EXEC BJUDSKRIV(BJSIDENR,BJLINIENR,TK$) 4850 ENDIF 4860 FOR I=BJLINIENR TO 35 4870 PRINT " " 4880 NEXT I 4890 PRINT " " 4900 PRINT STREG$ 4910 EXEC CALC(5,SUM$,TAL3$,TAL4$) 4920 IF TAL4$(LEN(TAL4$))="+" THEN TAL4$(LEN(TAL4$))=" " 4930 PRINT TAB(10);CHR(14);"Difference";CHR(15);TAB(36);TAL4$ 4940 PRINT STREG$ 4950 PRINT " " 4960 PRINT " " 4970 PROC GRUPPE(GR,KG1) 4980 FOR I=1 TO 2*GR STEP 2 4990 FNR=FNR+1 5000 EXEC FINDPOST1(FTAB1,FTAB,MFANTAL,FNR,FPIL3,K2$) 5010 IF CEKS=1 THEN STOP 5020 EXEC HENTPOST 5030 EXEC CALC(0,FMDEBET$,KG1$(I),FMDEBET$) 5040 EXEC CALC(0,FÅDEBET$,KG1$(I),FÅDEBET$) 5050 EXEC CALC(0,FMKREDIT$,KG1$(I+1),FMKREDIT$) 5060 EXEC CALC(0,FÅKREDIT$,KG1$(I+1),FÅKREDIT$) 5070 EXEC GEMFPOST 5080 NEXT I 5090 ENDPROC 5100 FNR=DTAL*10000 5110 EXEC GRUPPE(MKGR,KGR$) 5120 FNR=KRTAL*1000 5130 EXEC GRUPPE(MKRGR,KREGR$) 5140 CLOSE K5$ 5150 EXEC FEJL(9,45,K5$) 5160 CLOSE K6$ 5170 EXEC FEJL(9,46,K6$) 5180 CLOSE K7$ 5190 EXEC FEJL(9,47,K7$) 5200 CLOSE K9$ 5210 EXEC FEJL(9,48,K9$) 5220 CLOSE K10$ 5230 EXEC FEJL(9,49,K10$) 5240 CLOSE K11$ 5250 EXEC FEJL(9,50,K11$) 5260 CLOSE K14$ 5270 EXEC FEJL(20,16,K14$) 5280 CLOSE K17$ 5290 EXEC FEJL(20,17,K17$) 5300 CLOSE 5310 T1(6)=BJSIDENR;T3(1)=0;T2(3)=0;T3(2)=FMIDNR;T3(3)=DMIDNR;T3(4)=KRMIDNR 5320 T4(4)=EMIDNR 5330 OPEN K13$,W 5340 EXEC FEJL(9,51,K13$) 5350 PUT K13$,2:T1(1),T1(2),T1(3),T1(4),T1(5),T1(6),T1(7),T1(8),T1(9) 5360 EXEC FEJL(9,52,K13$) 5370 PUT K13$,12:T2(1),T2(2),T2(3),T2(4),T2(5),T2(6),T2(7),T2(8),T2(9) 5380 EXEC FEJL(9,53,K13$) 5390 PUT K13$,13:T3(1),T3(2),T3(3),T3(4),T3(5),T3(6),T3(7),T3(8),T3(9) 5400 EXEC FEJL(9,54,K13$) 5410 PUT K13$,21:T4(1),T4(2),T4(3),T4(4),T4(5),T4(6),T4(7),T4(8),T4(9) 5420 EXEC FEJL(20,18,K13$) 5430 CLOSE K13$ 5440 EXEC FEJL(9,55,K13$) 5450 OUTPUT T 5460 CHAIN "P641210:FSORT"
0x0000…0008 (0,) 8d5f 0100 REM BJ
0x0000…0008 LineComalBin {
0x0000…0008 ptr = 0x8d5f // 0x0 @0x0
0x0000…0008 lno = 0x0064 // 0x2 @0x2
0x0000…0008 at0004 = ╱89╱ REM ╱ // 0x4 @0x4
0x0000…0008 at0005 = ╱42╱B╱ // 0x5 @0x5
0x0000…0008 at0006 = ╱4a╱J╱ // 0x6 @0x6
0x0000…0008 at0007 = EOL // 0x7 @0x7
0x0000…0008 }
0x0008…007e 8dd5 0110 DIM K1$(17),K2$(17),K3$(17),K4$(17),B9$(12),UDAGE$(9),T1(9),T2(9),T3(9)
0x0008…007e LineComalBin {
0x0008…007e ptr = 0x8dd5 // 0x8 @0x0
0x0008…007e lno = 0x006e // 0xa @0x2
0x0008…007e at0004 = ╱87╱ DIM ╱ // 0xc @0x4
0x0008…007e at0005 = ╱4b╱K╱ // 0xd @0x5
0x0008…007e at0006 = ╱31╱1╱ // 0xe @0x6
0x0008…007e at0007 = ╱ef╱$╱ // 0xf @0x7
0x0008…007e at0008 = ╱ed╱(╱ // 0x10 @0x8
0x0008…007e at0009 = ╱31╱1╱ // 0x11 @0x9
0x0008…007e at000a = ╱37╱7╱ // 0x12 @0xa
0x0008…007e at000b = ╱fe00008805╱ // 0x13 @0xb
0x0008…007e at0010 = ╱ee╱)╱ // 0x18 @0x10
0x0008…007e at0011 = ╱ec╱,╱ // 0x19 @0x11
0x0008…007e at0012 = ╱4b╱K╱ // 0x1a @0x12
0x0008…007e at0013 = ╱32╱2╱ // 0x1b @0x13
0x0008…007e at0014 = ╱ef╱$╱ // 0x1c @0x14
0x0008…007e at0015 = ╱ed╱(╱ // 0x1d @0x15
0x0008…007e at0016 = ╱31╱1╱ // 0x1e @0x16
0x0008…007e at0017 = ╱37╱7╱ // 0x1f @0x17
0x0008…007e at0018 = ╱fe00008805╱ // 0x20 @0x18
0x0008…007e at001d = ╱ee╱)╱ // 0x25 @0x1d
0x0008…007e at001e = ╱ec╱,╱ // 0x26 @0x1e
0x0008…007e at001f = ╱4b╱K╱ // 0x27 @0x1f
0x0008…007e at0020 = ╱33╱3╱ // 0x28 @0x20
0x0008…007e at0021 = ╱ef╱$╱ // 0x29 @0x21
0x0008…007e at0022 = ╱ed╱(╱ // 0x2a @0x22
0x0008…007e at0023 = ╱31╱1╱ // 0x2b @0x23
0x0008…007e at0024 = ╱37╱7╱ // 0x2c @0x24
0x0008…007e at0025 = ╱fe00008805╱ // 0x2d @0x25
0x0008…007e at002a = ╱ee╱)╱ // 0x32 @0x2a
0x0008…007e at002b = ╱ec╱,╱ // 0x33 @0x2b
0x0008…007e at002c = ╱4b╱K╱ // 0x34 @0x2c
0x0008…007e at002d = ╱34╱4╱ // 0x35 @0x2d
0x0008…007e at002e = ╱ef╱$╱ // 0x36 @0x2e
0x0008…007e at002f = ╱ed╱(╱ // 0x37 @0x2f
0x0008…007e at0030 = ╱31╱1╱ // 0x38 @0x30
0x0008…007e at0031 = ╱37╱7╱ // 0x39 @0x31
0x0008…007e at0032 = ╱fe00008805╱ // 0x3a @0x32
0x0008…007e at0037 = ╱ee╱)╱ // 0x3f @0x37
0x0008…007e at0038 = ╱ec╱,╱ // 0x40 @0x38
0x0008…007e at0039 = ╱42╱B╱ // 0x41 @0x39
0x0008…007e at003a = ╱39╱9╱ // 0x42 @0x3a
0x0008…007e at003b = ╱ef╱$╱ // 0x43 @0x3b
0x0008…007e at003c = ╱ed╱(╱ // 0x44 @0x3c
0x0008…007e at003d = ╱31╱1╱ // 0x45 @0x3d
0x0008…007e at003e = ╱32╱2╱ // 0x46 @0x3e
0x0008…007e at003f = ╱fe0000c004╱ // 0x47 @0x3f
0x0008…007e at0044 = ╱ee╱)╱ // 0x4c @0x44
0x0008…007e at0045 = ╱ec╱,╱ // 0x4d @0x45
0x0008…007e at0046 = ╱55╱U╱ // 0x4e @0x46
0x0008…007e at0047 = ╱44╱D╱ // 0x4f @0x47
0x0008…007e at0048 = ╱41╱A╱ // 0x50 @0x48
0x0008…007e at0049 = ╱47╱G╱ // 0x51 @0x49
0x0008…007e at004a = ╱45╱E╱ // 0x52 @0x4a
0x0008…007e at004b = ╱ef╱$╱ // 0x53 @0x4b
0x0008…007e at004c = ╱ed╱(╱ // 0x54 @0x4c
0x0008…007e at004d = ╱39╱9╱ // 0x55 @0x4d
0x0008…007e at004e = ╱fe00009004╱ // 0x56 @0x4e
0x0008…007e at0053 = ╱ee╱)╱ // 0x5b @0x53
0x0008…007e at0054 = ╱ec╱,╱ // 0x5c @0x54
0x0008…007e at0055 = ╱54╱T╱ // 0x5d @0x55
0x0008…007e at0056 = ╱31╱1╱ // 0x5e @0x56
0x0008…007e at0057 = ╱ed╱(╱ // 0x5f @0x57
0x0008…007e at0058 = ╱39╱9╱ // 0x60 @0x58
0x0008…007e at0059 = ╱fe00009004╱ // 0x61 @0x59
0x0008…007e at005e = ╱ee╱)╱ // 0x66 @0x5e
0x0008…007e at005f = ╱ec╱,╱ // 0x67 @0x5f
0x0008…007e at0060 = ╱54╱T╱ // 0x68 @0x60
0x0008…007e at0061 = ╱32╱2╱ // 0x69 @0x61
0x0008…007e at0062 = ╱ed╱(╱ // 0x6a @0x62
0x0008…007e at0063 = ╱39╱9╱ // 0x6b @0x63
0x0008…007e at0064 = ╱fe00009004╱ // 0x6c @0x64
0x0008…007e at0069 = ╱ee╱)╱ // 0x71 @0x69
0x0008…007e at006a = ╱ec╱,╱ // 0x72 @0x6a
0x0008…007e at006b = ╱54╱T╱ // 0x73 @0x6b
0x0008…007e at006c = ╱33╱3╱ // 0x74 @0x6c
0x0008…007e at006d = ╱ed╱(╱ // 0x75 @0x6d
0x0008…007e at006e = ╱39╱9╱ // 0x76 @0x6e
0x0008…007e at006f = ╱fe00009004╱ // 0x77 @0x6f
0x0008…007e at0074 = ╱ee╱)╱ // 0x7c @0x74
0x0008…007e at0075 = EOL // 0x7d @0x75
0x0008…007e }
0x007e…00e4 8e3b 0120 DIM TKODE$(1),BELØB$(12),TEKST$(25),BLANK$(77),BMOMS$(12),INDMOMS$(12)
0x007e…00e4 LineComalBin {
0x007e…00e4 ptr = 0x8e3b // 0x7e @0x0
0x007e…00e4 lno = 0x0078 // 0x80 @0x2
0x007e…00e4 at0004 = ╱87╱ DIM ╱ // 0x82 @0x4
0x007e…00e4 at0005 = ╱54╱T╱ // 0x83 @0x5
0x007e…00e4 at0006 = ╱4b╱K╱ // 0x84 @0x6
0x007e…00e4 at0007 = ╱4f╱O╱ // 0x85 @0x7
0x007e…00e4 at0008 = ╱44╱D╱ // 0x86 @0x8
0x007e…00e4 at0009 = ╱45╱E╱ // 0x87 @0x9
0x007e…00e4 at000a = ╱ef╱$╱ // 0x88 @0xa
0x007e…00e4 at000b = ╱ed╱(╱ // 0x89 @0xb
0x007e…00e4 at000c = ╱31╱1╱ // 0x8a @0xc
0x007e…00e4 at000d = ╱fe00008001╱ // 0x8b @0xd
0x007e…00e4 at0012 = ╱ee╱)╱ // 0x90 @0x12
0x007e…00e4 at0013 = ╱ec╱,╱ // 0x91 @0x13
0x007e…00e4 at0014 = ╱42╱B╱ // 0x92 @0x14
0x007e…00e4 at0015 = ╱45╱E╱ // 0x93 @0x15
0x007e…00e4 at0016 = ╱4c╱L╱ // 0x94 @0x16
0x007e…00e4 at0017 = ╱5c╱Ø╱ // 0x95 @0x17
0x007e…00e4 at0018 = ╱42╱B╱ // 0x96 @0x18
0x007e…00e4 at0019 = ╱ef╱$╱ // 0x97 @0x19
0x007e…00e4 at001a = ╱ed╱(╱ // 0x98 @0x1a
0x007e…00e4 at001b = ╱31╱1╱ // 0x99 @0x1b
0x007e…00e4 at001c = ╱32╱2╱ // 0x9a @0x1c
0x007e…00e4 at001d = ╱fe0000c004╱ // 0x9b @0x1d
0x007e…00e4 at0022 = ╱ee╱)╱ // 0xa0 @0x22
0x007e…00e4 at0023 = ╱ec╱,╱ // 0xa1 @0x23
0x007e…00e4 at0024 = ╱54╱T╱ // 0xa2 @0x24
0x007e…00e4 at0025 = ╱45╱E╱ // 0xa3 @0x25
0x007e…00e4 at0026 = ╱4b╱K╱ // 0xa4 @0x26
0x007e…00e4 at0027 = ╱53╱S╱ // 0xa5 @0x27
0x007e…00e4 at0028 = ╱54╱T╱ // 0xa6 @0x28
0x007e…00e4 at0029 = ╱ef╱$╱ // 0xa7 @0x29
0x007e…00e4 at002a = ╱ed╱(╱ // 0xa8 @0x2a
0x007e…00e4 at002b = ╱32╱2╱ // 0xa9 @0x2b
0x007e…00e4 at002c = ╱35╱5╱ // 0xaa @0x2c
0x007e…00e4 at002d = ╱fe0000c805╱ // 0xab @0x2d
0x007e…00e4 at0032 = ╱ee╱)╱ // 0xb0 @0x32
0x007e…00e4 at0033 = ╱ec╱,╱ // 0xb1 @0x33
0x007e…00e4 at0034 = ╱42╱B╱ // 0xb2 @0x34
0x007e…00e4 at0035 = ╱4c╱L╱ // 0xb3 @0x35
0x007e…00e4 at0036 = ╱41╱A╱ // 0xb4 @0x36
0x007e…00e4 at0037 = ╱4e╱N╱ // 0xb5 @0x37
0x007e…00e4 at0038 = ╱4b╱K╱ // 0xb6 @0x38
0x007e…00e4 at0039 = ╱ef╱$╱ // 0xb7 @0x39
0x007e…00e4 at003a = ╱ed╱(╱ // 0xb8 @0x3a
0x007e…00e4 at003b = ╱37╱7╱ // 0xb9 @0x3b
0x007e…00e4 at003c = ╱37╱7╱ // 0xba @0x3c
0x007e…00e4 at003d = ╱fe00009a07╱ // 0xbb @0x3d
0x007e…00e4 at0042 = ╱ee╱)╱ // 0xc0 @0x42
0x007e…00e4 at0043 = ╱ec╱,╱ // 0xc1 @0x43
0x007e…00e4 at0044 = ╱42╱B╱ // 0xc2 @0x44
0x007e…00e4 at0045 = ╱4d╱M╱ // 0xc3 @0x45
0x007e…00e4 at0046 = ╱4f╱O╱ // 0xc4 @0x46
0x007e…00e4 at0047 = ╱4d╱M╱ // 0xc5 @0x47
0x007e…00e4 at0048 = ╱53╱S╱ // 0xc6 @0x48
0x007e…00e4 at0049 = ╱ef╱$╱ // 0xc7 @0x49
0x007e…00e4 at004a = ╱ed╱(╱ // 0xc8 @0x4a
0x007e…00e4 at004b = ╱31╱1╱ // 0xc9 @0x4b
0x007e…00e4 at004c = ╱32╱2╱ // 0xca @0x4c
0x007e…00e4 at004d = ╱fe0000c004╱ // 0xcb @0x4d
0x007e…00e4 at0052 = ╱ee╱)╱ // 0xd0 @0x52
0x007e…00e4 at0053 = ╱ec╱,╱ // 0xd1 @0x53
0x007e…00e4 at0054 = ╱49╱I╱ // 0xd2 @0x54
0x007e…00e4 at0055 = ╱4e╱N╱ // 0xd3 @0x55
0x007e…00e4 at0056 = ╱44╱D╱ // 0xd4 @0x56
0x007e…00e4 at0057 = ╱4d╱M╱ // 0xd5 @0x57
0x007e…00e4 at0058 = ╱4f╱O╱ // 0xd6 @0x58
0x007e…00e4 at0059 = ╱4d╱M╱ // 0xd7 @0x59
0x007e…00e4 at005a = ╱53╱S╱ // 0xd8 @0x5a
0x007e…00e4 at005b = ╱ef╱$╱ // 0xd9 @0x5b
0x007e…00e4 at005c = ╱ed╱(╱ // 0xda @0x5c
0x007e…00e4 at005d = ╱31╱1╱ // 0xdb @0x5d
0x007e…00e4 at005e = ╱32╱2╱ // 0xdc @0x5e
0x007e…00e4 at005f = ╱fe0000c004╱ // 0xdd @0x5f
0x007e…00e4 at0064 = ╱ee╱)╱ // 0xe2 @0x64
0x007e…00e4 at0065 = EOL // 0xe3 @0x65
0x007e…00e4 }
0x00e4…0155 8eac 0130 DIM TFIL$(18,10),N$(6),UDMOMS$(12),TAL4$(14),OP1$(12),OP2$(12),RES$(15)
0x00e4…0155 LineComalBin {
0x00e4…0155 ptr = 0x8eac // 0xe4 @0x0
0x00e4…0155 lno = 0x0082 // 0xe6 @0x2
0x00e4…0155 at0004 = ╱87╱ DIM ╱ // 0xe8 @0x4
0x00e4…0155 at0005 = ╱54╱T╱ // 0xe9 @0x5
0x00e4…0155 at0006 = ╱46╱F╱ // 0xea @0x6
0x00e4…0155 at0007 = ╱49╱I╱ // 0xeb @0x7
0x00e4…0155 at0008 = ╱4c╱L╱ // 0xec @0x8
0x00e4…0155 at0009 = ╱ef╱$╱ // 0xed @0x9
0x00e4…0155 at000a = ╱ed╱(╱ // 0xee @0xa
0x00e4…0155 at000b = ╱31╱1╱ // 0xef @0xb
0x00e4…0155 at000c = ╱38╱8╱ // 0xf0 @0xc
0x00e4…0155 at000d = ╱fe00009005╱ // 0xf1 @0xd
0x00e4…0155 at0012 = ╱ec╱,╱ // 0xf6 @0x12
0x00e4…0155 at0013 = ╱31╱1╱ // 0xf7 @0x13
0x00e4…0155 at0014 = ╱30╱0╱ // 0xf8 @0x14
0x00e4…0155 at0015 = ╱fe0000a004╱ // 0xf9 @0x15
0x00e4…0155 at001a = ╱ee╱)╱ // 0xfe @0x1a
0x00e4…0155 at001b = ╱ec╱,╱ // 0xff @0x1b
0x00e4…0155 at001c = ╱4e╱N╱ // 0x100 @0x1c
0x00e4…0155 at001d = ╱ef╱$╱ // 0x101 @0x1d
0x00e4…0155 at001e = ╱ed╱(╱ // 0x102 @0x1e
0x00e4…0155 at001f = ╱36╱6╱ // 0x103 @0x1f
0x00e4…0155 at0020 = ╱fe0000c003╱ // 0x104 @0x20
0x00e4…0155 at0025 = ╱ee╱)╱ // 0x109 @0x25
0x00e4…0155 at0026 = ╱ec╱,╱ // 0x10a @0x26
0x00e4…0155 at0027 = ╱55╱U╱ // 0x10b @0x27
0x00e4…0155 at0028 = ╱44╱D╱ // 0x10c @0x28
0x00e4…0155 at0029 = ╱4d╱M╱ // 0x10d @0x29
0x00e4…0155 at002a = ╱4f╱O╱ // 0x10e @0x2a
0x00e4…0155 at002b = ╱4d╱M╱ // 0x10f @0x2b
0x00e4…0155 at002c = ╱53╱S╱ // 0x110 @0x2c
0x00e4…0155 at002d = ╱ef╱$╱ // 0x111 @0x2d
0x00e4…0155 at002e = ╱ed╱(╱ // 0x112 @0x2e
0x00e4…0155 at002f = ╱31╱1╱ // 0x113 @0x2f
0x00e4…0155 at0030 = ╱32╱2╱ // 0x114 @0x30
0x00e4…0155 at0031 = ╱fe0000c004╱ // 0x115 @0x31
0x00e4…0155 at0036 = ╱ee╱)╱ // 0x11a @0x36
0x00e4…0155 at0037 = ╱ec╱,╱ // 0x11b @0x37
0x00e4…0155 at0038 = ╱54╱T╱ // 0x11c @0x38
0x00e4…0155 at0039 = ╱41╱A╱ // 0x11d @0x39
0x00e4…0155 at003a = ╱4c╱L╱ // 0x11e @0x3a
0x00e4…0155 at003b = ╱34╱4╱ // 0x11f @0x3b
0x00e4…0155 at003c = ╱ef╱$╱ // 0x120 @0x3c
0x00e4…0155 at003d = ╱ed╱(╱ // 0x121 @0x3d
0x00e4…0155 at003e = ╱31╱1╱ // 0x122 @0x3e
0x00e4…0155 at003f = ╱34╱4╱ // 0x123 @0x3f
0x00e4…0155 at0040 = ╱fe0000e004╱ // 0x124 @0x40
0x00e4…0155 at0045 = ╱ee╱)╱ // 0x129 @0x45
0x00e4…0155 at0046 = ╱ec╱,╱ // 0x12a @0x46
0x00e4…0155 at0047 = ╱4f╱O╱ // 0x12b @0x47
0x00e4…0155 at0048 = ╱50╱P╱ // 0x12c @0x48
0x00e4…0155 at0049 = ╱31╱1╱ // 0x12d @0x49
0x00e4…0155 at004a = ╱ef╱$╱ // 0x12e @0x4a
0x00e4…0155 at004b = ╱ed╱(╱ // 0x12f @0x4b
0x00e4…0155 at004c = ╱31╱1╱ // 0x130 @0x4c
0x00e4…0155 at004d = ╱32╱2╱ // 0x131 @0x4d
0x00e4…0155 at004e = ╱fe0000c004╱ // 0x132 @0x4e
0x00e4…0155 at0053 = ╱ee╱)╱ // 0x137 @0x53
0x00e4…0155 at0054 = ╱ec╱,╱ // 0x138 @0x54
0x00e4…0155 at0055 = ╱4f╱O╱ // 0x139 @0x55
0x00e4…0155 at0056 = ╱50╱P╱ // 0x13a @0x56
0x00e4…0155 at0057 = ╱32╱2╱ // 0x13b @0x57
0x00e4…0155 at0058 = ╱ef╱$╱ // 0x13c @0x58
0x00e4…0155 at0059 = ╱ed╱(╱ // 0x13d @0x59
0x00e4…0155 at005a = ╱31╱1╱ // 0x13e @0x5a
0x00e4…0155 at005b = ╱32╱2╱ // 0x13f @0x5b
0x00e4…0155 at005c = ╱fe0000c004╱ // 0x140 @0x5c
0x00e4…0155 at0061 = ╱ee╱)╱ // 0x145 @0x61
0x00e4…0155 at0062 = ╱ec╱,╱ // 0x146 @0x62
0x00e4…0155 at0063 = ╱52╱R╱ // 0x147 @0x63
0x00e4…0155 at0064 = ╱45╱E╱ // 0x148 @0x64
0x00e4…0155 at0065 = ╱53╱S╱ // 0x149 @0x65
0x00e4…0155 at0066 = ╱ef╱$╱ // 0x14a @0x66
0x00e4…0155 at0067 = ╱ed╱(╱ // 0x14b @0x67
0x00e4…0155 at0068 = ╱31╱1╱ // 0x14c @0x68
0x00e4…0155 at0069 = ╱35╱5╱ // 0x14d @0x69
0x00e4…0155 at006a = ╱fe0000f004╱ // 0x14e @0x6a
0x00e4…0155 at006f = ╱ee╱)╱ // 0x153 @0x6f
0x00e4…0155 at0070 = EOL // 0x154 @0x70
0x00e4…0155 }
0x0155…01bd 8f14 0140 DIM DEBNAVN$(25),DEBBY$(20),DEBGADE$(25),DEBTLF$(9),DEBKGR$(2),DEBLK$(2)
0x0155…01bd LineComalBin {
0x0155…01bd ptr = 0x8f14 // 0x155 @0x0
0x0155…01bd lno = 0x008c // 0x157 @0x2
0x0155…01bd at0004 = ╱87╱ DIM ╱ // 0x159 @0x4
0x0155…01bd at0005 = ╱44╱D╱ // 0x15a @0x5
0x0155…01bd at0006 = ╱45╱E╱ // 0x15b @0x6
0x0155…01bd at0007 = ╱42╱B╱ // 0x15c @0x7
0x0155…01bd at0008 = ╱4e╱N╱ // 0x15d @0x8
0x0155…01bd at0009 = ╱41╱A╱ // 0x15e @0x9
0x0155…01bd at000a = ╱56╱V╱ // 0x15f @0xa
0x0155…01bd at000b = ╱4e╱N╱ // 0x160 @0xb
0x0155…01bd at000c = ╱ef╱$╱ // 0x161 @0xc
0x0155…01bd at000d = ╱ed╱(╱ // 0x162 @0xd
0x0155…01bd at000e = ╱32╱2╱ // 0x163 @0xe
0x0155…01bd at000f = ╱35╱5╱ // 0x164 @0xf
0x0155…01bd at0010 = ╱fe0000c805╱ // 0x165 @0x10
0x0155…01bd at0015 = ╱ee╱)╱ // 0x16a @0x15
0x0155…01bd at0016 = ╱ec╱,╱ // 0x16b @0x16
0x0155…01bd at0017 = ╱44╱D╱ // 0x16c @0x17
0x0155…01bd at0018 = ╱45╱E╱ // 0x16d @0x18
0x0155…01bd at0019 = ╱42╱B╱ // 0x16e @0x19
0x0155…01bd at001a = ╱42╱B╱ // 0x16f @0x1a
0x0155…01bd at001b = ╱59╱Y╱ // 0x170 @0x1b
0x0155…01bd at001c = ╱ef╱$╱ // 0x171 @0x1c
0x0155…01bd at001d = ╱ed╱(╱ // 0x172 @0x1d
0x0155…01bd at001e = ╱32╱2╱ // 0x173 @0x1e
0x0155…01bd at001f = ╱30╱0╱ // 0x174 @0x1f
0x0155…01bd at0020 = ╱fe0000a005╱ // 0x175 @0x20
0x0155…01bd at0025 = ╱ee╱)╱ // 0x17a @0x25
0x0155…01bd at0026 = ╱ec╱,╱ // 0x17b @0x26
0x0155…01bd at0027 = ╱44╱D╱ // 0x17c @0x27
0x0155…01bd at0028 = ╱45╱E╱ // 0x17d @0x28
0x0155…01bd at0029 = ╱42╱B╱ // 0x17e @0x29
0x0155…01bd at002a = ╱47╱G╱ // 0x17f @0x2a
0x0155…01bd at002b = ╱41╱A╱ // 0x180 @0x2b
0x0155…01bd at002c = ╱44╱D╱ // 0x181 @0x2c
0x0155…01bd at002d = ╱45╱E╱ // 0x182 @0x2d
0x0155…01bd at002e = ╱ef╱$╱ // 0x183 @0x2e
0x0155…01bd at002f = ╱ed╱(╱ // 0x184 @0x2f
0x0155…01bd at0030 = ╱32╱2╱ // 0x185 @0x30
0x0155…01bd at0031 = ╱35╱5╱ // 0x186 @0x31
0x0155…01bd at0032 = ╱fe0000c805╱ // 0x187 @0x32
0x0155…01bd at0037 = ╱ee╱)╱ // 0x18c @0x37
0x0155…01bd at0038 = ╱ec╱,╱ // 0x18d @0x38
0x0155…01bd at0039 = ╱44╱D╱ // 0x18e @0x39
0x0155…01bd at003a = ╱45╱E╱ // 0x18f @0x3a
0x0155…01bd at003b = ╱42╱B╱ // 0x190 @0x3b
0x0155…01bd at003c = ╱54╱T╱ // 0x191 @0x3c
0x0155…01bd at003d = ╱4c╱L╱ // 0x192 @0x3d
0x0155…01bd at003e = ╱46╱F╱ // 0x193 @0x3e
0x0155…01bd at003f = ╱ef╱$╱ // 0x194 @0x3f
0x0155…01bd at0040 = ╱ed╱(╱ // 0x195 @0x40
0x0155…01bd at0041 = ╱39╱9╱ // 0x196 @0x41
0x0155…01bd at0042 = ╱fe00009004╱ // 0x197 @0x42
0x0155…01bd at0047 = ╱ee╱)╱ // 0x19c @0x47
0x0155…01bd at0048 = ╱ec╱,╱ // 0x19d @0x48
0x0155…01bd at0049 = ╱44╱D╱ // 0x19e @0x49
0x0155…01bd at004a = ╱45╱E╱ // 0x19f @0x4a
0x0155…01bd at004b = ╱42╱B╱ // 0x1a0 @0x4b
0x0155…01bd at004c = ╱4b╱K╱ // 0x1a1 @0x4c
0x0155…01bd at004d = ╱47╱G╱ // 0x1a2 @0x4d
0x0155…01bd at004e = ╱52╱R╱ // 0x1a3 @0x4e
0x0155…01bd at004f = ╱ef╱$╱ // 0x1a4 @0x4f
0x0155…01bd at0050 = ╱ed╱(╱ // 0x1a5 @0x50
0x0155…01bd at0051 = ╱32╱2╱ // 0x1a6 @0x51
0x0155…01bd at0052 = ╱fe00008002╱ // 0x1a7 @0x52
0x0155…01bd at0057 = ╱ee╱)╱ // 0x1ac @0x57
0x0155…01bd at0058 = ╱ec╱,╱ // 0x1ad @0x58
0x0155…01bd at0059 = ╱44╱D╱ // 0x1ae @0x59
0x0155…01bd at005a = ╱45╱E╱ // 0x1af @0x5a
0x0155…01bd at005b = ╱42╱B╱ // 0x1b0 @0x5b
0x0155…01bd at005c = ╱4c╱L╱ // 0x1b1 @0x5c
0x0155…01bd at005d = ╱4b╱K╱ // 0x1b2 @0x5d
0x0155…01bd at005e = ╱ef╱$╱ // 0x1b3 @0x5e
0x0155…01bd at005f = ╱ed╱(╱ // 0x1b4 @0x5f
0x0155…01bd at0060 = ╱32╱2╱ // 0x1b5 @0x60
0x0155…01bd at0061 = ╱fe00008002╱ // 0x1b6 @0x61
0x0155…01bd at0066 = ╱ee╱)╱ // 0x1bb @0x66
0x0155…01bd at0067 = EOL // 0x1bc @0x67
0x0155…01bd }
0x01bd…021a 8f71 0150 DIM DSALDO1$(12),DSALDO2$(12),DSALDO3$(12),DSALDO4$(12),ÅRKØB$(12)
0x01bd…021a LineComalBin {
0x01bd…021a ptr = 0x8f71 // 0x1bd @0x0
0x01bd…021a lno = 0x0096 // 0x1bf @0x2
0x01bd…021a at0004 = ╱87╱ DIM ╱ // 0x1c1 @0x4
0x01bd…021a at0005 = ╱44╱D╱ // 0x1c2 @0x5
0x01bd…021a at0006 = ╱53╱S╱ // 0x1c3 @0x6
0x01bd…021a at0007 = ╱41╱A╱ // 0x1c4 @0x7
0x01bd…021a at0008 = ╱4c╱L╱ // 0x1c5 @0x8
0x01bd…021a at0009 = ╱44╱D╱ // 0x1c6 @0x9
0x01bd…021a at000a = ╱4f╱O╱ // 0x1c7 @0xa
0x01bd…021a at000b = ╱31╱1╱ // 0x1c8 @0xb
0x01bd…021a at000c = ╱ef╱$╱ // 0x1c9 @0xc
0x01bd…021a at000d = ╱ed╱(╱ // 0x1ca @0xd
0x01bd…021a at000e = ╱31╱1╱ // 0x1cb @0xe
0x01bd…021a at000f = ╱32╱2╱ // 0x1cc @0xf
0x01bd…021a at0010 = ╱fe0000c004╱ // 0x1cd @0x10
0x01bd…021a at0015 = ╱ee╱)╱ // 0x1d2 @0x15
0x01bd…021a at0016 = ╱ec╱,╱ // 0x1d3 @0x16
0x01bd…021a at0017 = ╱44╱D╱ // 0x1d4 @0x17
0x01bd…021a at0018 = ╱53╱S╱ // 0x1d5 @0x18
0x01bd…021a at0019 = ╱41╱A╱ // 0x1d6 @0x19
0x01bd…021a at001a = ╱4c╱L╱ // 0x1d7 @0x1a
0x01bd…021a at001b = ╱44╱D╱ // 0x1d8 @0x1b
0x01bd…021a at001c = ╱4f╱O╱ // 0x1d9 @0x1c
0x01bd…021a at001d = ╱32╱2╱ // 0x1da @0x1d
0x01bd…021a at001e = ╱ef╱$╱ // 0x1db @0x1e
0x01bd…021a at001f = ╱ed╱(╱ // 0x1dc @0x1f
0x01bd…021a at0020 = ╱31╱1╱ // 0x1dd @0x20
0x01bd…021a at0021 = ╱32╱2╱ // 0x1de @0x21
0x01bd…021a at0022 = ╱fe0000c004╱ // 0x1df @0x22
0x01bd…021a at0027 = ╱ee╱)╱ // 0x1e4 @0x27
0x01bd…021a at0028 = ╱ec╱,╱ // 0x1e5 @0x28
0x01bd…021a at0029 = ╱44╱D╱ // 0x1e6 @0x29
0x01bd…021a at002a = ╱53╱S╱ // 0x1e7 @0x2a
0x01bd…021a at002b = ╱41╱A╱ // 0x1e8 @0x2b
0x01bd…021a at002c = ╱4c╱L╱ // 0x1e9 @0x2c
0x01bd…021a at002d = ╱44╱D╱ // 0x1ea @0x2d
0x01bd…021a at002e = ╱4f╱O╱ // 0x1eb @0x2e
0x01bd…021a at002f = ╱33╱3╱ // 0x1ec @0x2f
0x01bd…021a at0030 = ╱ef╱$╱ // 0x1ed @0x30
0x01bd…021a at0031 = ╱ed╱(╱ // 0x1ee @0x31
0x01bd…021a at0032 = ╱31╱1╱ // 0x1ef @0x32
0x01bd…021a at0033 = ╱32╱2╱ // 0x1f0 @0x33
0x01bd…021a at0034 = ╱fe0000c004╱ // 0x1f1 @0x34
0x01bd…021a at0039 = ╱ee╱)╱ // 0x1f6 @0x39
0x01bd…021a at003a = ╱ec╱,╱ // 0x1f7 @0x3a
0x01bd…021a at003b = ╱44╱D╱ // 0x1f8 @0x3b
0x01bd…021a at003c = ╱53╱S╱ // 0x1f9 @0x3c
0x01bd…021a at003d = ╱41╱A╱ // 0x1fa @0x3d
0x01bd…021a at003e = ╱4c╱L╱ // 0x1fb @0x3e
0x01bd…021a at003f = ╱44╱D╱ // 0x1fc @0x3f
0x01bd…021a at0040 = ╱4f╱O╱ // 0x1fd @0x40
0x01bd…021a at0041 = ╱34╱4╱ // 0x1fe @0x41
0x01bd…021a at0042 = ╱ef╱$╱ // 0x1ff @0x42
0x01bd…021a at0043 = ╱ed╱(╱ // 0x200 @0x43
0x01bd…021a at0044 = ╱31╱1╱ // 0x201 @0x44
0x01bd…021a at0045 = ╱32╱2╱ // 0x202 @0x45
0x01bd…021a at0046 = ╱fe0000c004╱ // 0x203 @0x46
0x01bd…021a at004b = ╱ee╱)╱ // 0x208 @0x4b
0x01bd…021a at004c = ╱ec╱,╱ // 0x209 @0x4c
0x01bd…021a at004d = ╱5d╱Å╱ // 0x20a @0x4d
0x01bd…021a at004e = ╱52╱R╱ // 0x20b @0x4e
0x01bd…021a at004f = ╱4b╱K╱ // 0x20c @0x4f
0x01bd…021a at0050 = ╱5c╱Ø╱ // 0x20d @0x50
0x01bd…021a at0051 = ╱42╱B╱ // 0x20e @0x51
0x01bd…021a at0052 = ╱ef╱$╱ // 0x20f @0x52
0x01bd…021a at0053 = ╱ed╱(╱ // 0x210 @0x53
0x01bd…021a at0054 = ╱31╱1╱ // 0x211 @0x54
0x01bd…021a at0055 = ╱32╱2╱ // 0x212 @0x55
0x01bd…021a at0056 = ╱fe0000c004╱ // 0x213 @0x56
0x01bd…021a at005b = ╱ee╱)╱ // 0x218 @0x5b
0x01bd…021a at005c = EOL // 0x219 @0x5c
0x01bd…021a }
0x021a…0285 8fdc 0160 DIM MDNKØB$(12),TAL3$(12),MOMS$(12),DMOMS$(12),K5$(17),K6$(17),K7$(17)
0x021a…0285 LineComalBin {
0x021a…0285 ptr = 0x8fdc // 0x21a @0x0
0x021a…0285 lno = 0x00a0 // 0x21c @0x2
0x021a…0285 at0004 = ╱87╱ DIM ╱ // 0x21e @0x4
0x021a…0285 at0005 = ╱4d╱M╱ // 0x21f @0x5
0x021a…0285 at0006 = ╱44╱D╱ // 0x220 @0x6
0x021a…0285 at0007 = ╱4e╱N╱ // 0x221 @0x7
0x021a…0285 at0008 = ╱4b╱K╱ // 0x222 @0x8
0x021a…0285 at0009 = ╱5c╱Ø╱ // 0x223 @0x9
0x021a…0285 at000a = ╱42╱B╱ // 0x224 @0xa
0x021a…0285 at000b = ╱ef╱$╱ // 0x225 @0xb
0x021a…0285 at000c = ╱ed╱(╱ // 0x226 @0xc
0x021a…0285 at000d = ╱31╱1╱ // 0x227 @0xd
0x021a…0285 at000e = ╱32╱2╱ // 0x228 @0xe
0x021a…0285 at000f = ╱fe0000c004╱ // 0x229 @0xf
0x021a…0285 at0014 = ╱ee╱)╱ // 0x22e @0x14
0x021a…0285 at0015 = ╱ec╱,╱ // 0x22f @0x15
0x021a…0285 at0016 = ╱54╱T╱ // 0x230 @0x16
0x021a…0285 at0017 = ╱41╱A╱ // 0x231 @0x17
0x021a…0285 at0018 = ╱4c╱L╱ // 0x232 @0x18
0x021a…0285 at0019 = ╱33╱3╱ // 0x233 @0x19
0x021a…0285 at001a = ╱ef╱$╱ // 0x234 @0x1a
0x021a…0285 at001b = ╱ed╱(╱ // 0x235 @0x1b
0x021a…0285 at001c = ╱31╱1╱ // 0x236 @0x1c
0x021a…0285 at001d = ╱32╱2╱ // 0x237 @0x1d
0x021a…0285 at001e = ╱fe0000c004╱ // 0x238 @0x1e
0x021a…0285 at0023 = ╱ee╱)╱ // 0x23d @0x23
0x021a…0285 at0024 = ╱ec╱,╱ // 0x23e @0x24
0x021a…0285 at0025 = ╱4d╱M╱ // 0x23f @0x25
0x021a…0285 at0026 = ╱4f╱O╱ // 0x240 @0x26
0x021a…0285 at0027 = ╱4d╱M╱ // 0x241 @0x27
0x021a…0285 at0028 = ╱53╱S╱ // 0x242 @0x28
0x021a…0285 at0029 = ╱ef╱$╱ // 0x243 @0x29
0x021a…0285 at002a = ╱ed╱(╱ // 0x244 @0x2a
0x021a…0285 at002b = ╱31╱1╱ // 0x245 @0x2b
0x021a…0285 at002c = ╱32╱2╱ // 0x246 @0x2c
0x021a…0285 at002d = ╱fe0000c004╱ // 0x247 @0x2d
0x021a…0285 at0032 = ╱ee╱)╱ // 0x24c @0x32
0x021a…0285 at0033 = ╱ec╱,╱ // 0x24d @0x33
0x021a…0285 at0034 = ╱44╱D╱ // 0x24e @0x34
0x021a…0285 at0035 = ╱4d╱M╱ // 0x24f @0x35
0x021a…0285 at0036 = ╱4f╱O╱ // 0x250 @0x36
0x021a…0285 at0037 = ╱4d╱M╱ // 0x251 @0x37
0x021a…0285 at0038 = ╱53╱S╱ // 0x252 @0x38
0x021a…0285 at0039 = ╱ef╱$╱ // 0x253 @0x39
0x021a…0285 at003a = ╱ed╱(╱ // 0x254 @0x3a
0x021a…0285 at003b = ╱31╱1╱ // 0x255 @0x3b
0x021a…0285 at003c = ╱32╱2╱ // 0x256 @0x3c
0x021a…0285 at003d = ╱fe0000c004╱ // 0x257 @0x3d
0x021a…0285 at0042 = ╱ee╱)╱ // 0x25c @0x42
0x021a…0285 at0043 = ╱ec╱,╱ // 0x25d @0x43
0x021a…0285 at0044 = ╱4b╱K╱ // 0x25e @0x44
0x021a…0285 at0045 = ╱35╱5╱ // 0x25f @0x45
0x021a…0285 at0046 = ╱ef╱$╱ // 0x260 @0x46
0x021a…0285 at0047 = ╱ed╱(╱ // 0x261 @0x47
0x021a…0285 at0048 = ╱31╱1╱ // 0x262 @0x48
0x021a…0285 at0049 = ╱37╱7╱ // 0x263 @0x49
0x021a…0285 at004a = ╱fe00008805╱ // 0x264 @0x4a
0x021a…0285 at004f = ╱ee╱)╱ // 0x269 @0x4f
0x021a…0285 at0050 = ╱ec╱,╱ // 0x26a @0x50
0x021a…0285 at0051 = ╱4b╱K╱ // 0x26b @0x51
0x021a…0285 at0052 = ╱36╱6╱ // 0x26c @0x52
0x021a…0285 at0053 = ╱ef╱$╱ // 0x26d @0x53
0x021a…0285 at0054 = ╱ed╱(╱ // 0x26e @0x54
0x021a…0285 at0055 = ╱31╱1╱ // 0x26f @0x55
0x021a…0285 at0056 = ╱37╱7╱ // 0x270 @0x56
0x021a…0285 at0057 = ╱fe00008805╱ // 0x271 @0x57
0x021a…0285 at005c = ╱ee╱)╱ // 0x276 @0x5c
0x021a…0285 at005d = ╱ec╱,╱ // 0x277 @0x5d
0x021a…0285 at005e = ╱4b╱K╱ // 0x278 @0x5e
0x021a…0285 at005f = ╱37╱7╱ // 0x279 @0x5f
0x021a…0285 at0060 = ╱ef╱$╱ // 0x27a @0x60
0x021a…0285 at0061 = ╱ed╱(╱ // 0x27b @0x61
0x021a…0285 at0062 = ╱31╱1╱ // 0x27c @0x62
0x021a…0285 at0063 = ╱37╱7╱ // 0x27d @0x63
0x021a…0285 at0064 = ╱fe00008805╱ // 0x27e @0x64
0x021a…0285 at0069 = ╱ee╱)╱ // 0x283 @0x69
0x021a…0285 at006a = EOL // 0x284 @0x6a
0x021a…0285 }
0x0285…02ec 9043 0170 DIM FNAVN$(25),FUKODE$(1),FMKODE$(1),FMDEBET$(12),FMKREDIT$(12),K8$(17)
0x0285…02ec LineComalBin {
0x0285…02ec ptr = 0x9043 // 0x285 @0x0
0x0285…02ec lno = 0x00aa // 0x287 @0x2
0x0285…02ec at0004 = ╱87╱ DIM ╱ // 0x289 @0x4
0x0285…02ec at0005 = ╱46╱F╱ // 0x28a @0x5
0x0285…02ec at0006 = ╱4e╱N╱ // 0x28b @0x6
0x0285…02ec at0007 = ╱41╱A╱ // 0x28c @0x7
0x0285…02ec at0008 = ╱56╱V╱ // 0x28d @0x8
0x0285…02ec at0009 = ╱4e╱N╱ // 0x28e @0x9
0x0285…02ec at000a = ╱ef╱$╱ // 0x28f @0xa
0x0285…02ec at000b = ╱ed╱(╱ // 0x290 @0xb
0x0285…02ec at000c = ╱32╱2╱ // 0x291 @0xc
0x0285…02ec at000d = ╱35╱5╱ // 0x292 @0xd
0x0285…02ec at000e = ╱fe0000c805╱ // 0x293 @0xe
0x0285…02ec at0013 = ╱ee╱)╱ // 0x298 @0x13
0x0285…02ec at0014 = ╱ec╱,╱ // 0x299 @0x14
0x0285…02ec at0015 = ╱46╱F╱ // 0x29a @0x15
0x0285…02ec at0016 = ╱55╱U╱ // 0x29b @0x16
0x0285…02ec at0017 = ╱4b╱K╱ // 0x29c @0x17
0x0285…02ec at0018 = ╱4f╱O╱ // 0x29d @0x18
0x0285…02ec at0019 = ╱44╱D╱ // 0x29e @0x19
0x0285…02ec at001a = ╱45╱E╱ // 0x29f @0x1a
0x0285…02ec at001b = ╱ef╱$╱ // 0x2a0 @0x1b
0x0285…02ec at001c = ╱ed╱(╱ // 0x2a1 @0x1c
0x0285…02ec at001d = ╱31╱1╱ // 0x2a2 @0x1d
0x0285…02ec at001e = ╱fe00008001╱ // 0x2a3 @0x1e
0x0285…02ec at0023 = ╱ee╱)╱ // 0x2a8 @0x23
0x0285…02ec at0024 = ╱ec╱,╱ // 0x2a9 @0x24
0x0285…02ec at0025 = ╱46╱F╱ // 0x2aa @0x25
0x0285…02ec at0026 = ╱4d╱M╱ // 0x2ab @0x26
0x0285…02ec at0027 = ╱4b╱K╱ // 0x2ac @0x27
0x0285…02ec at0028 = ╱4f╱O╱ // 0x2ad @0x28
0x0285…02ec at0029 = ╱44╱D╱ // 0x2ae @0x29
0x0285…02ec at002a = ╱45╱E╱ // 0x2af @0x2a
0x0285…02ec at002b = ╱ef╱$╱ // 0x2b0 @0x2b
0x0285…02ec at002c = ╱ed╱(╱ // 0x2b1 @0x2c
0x0285…02ec at002d = ╱31╱1╱ // 0x2b2 @0x2d
0x0285…02ec at002e = ╱fe00008001╱ // 0x2b3 @0x2e
0x0285…02ec at0033 = ╱ee╱)╱ // 0x2b8 @0x33
0x0285…02ec at0034 = ╱ec╱,╱ // 0x2b9 @0x34
0x0285…02ec at0035 = ╱46╱F╱ // 0x2ba @0x35
0x0285…02ec at0036 = ╱4d╱M╱ // 0x2bb @0x36
0x0285…02ec at0037 = ╱44╱D╱ // 0x2bc @0x37
0x0285…02ec at0038 = ╱45╱E╱ // 0x2bd @0x38
0x0285…02ec at0039 = ╱42╱B╱ // 0x2be @0x39
0x0285…02ec at003a = ╱45╱E╱ // 0x2bf @0x3a
0x0285…02ec at003b = ╱54╱T╱ // 0x2c0 @0x3b
0x0285…02ec at003c = ╱ef╱$╱ // 0x2c1 @0x3c
0x0285…02ec at003d = ╱ed╱(╱ // 0x2c2 @0x3d
0x0285…02ec at003e = ╱31╱1╱ // 0x2c3 @0x3e
0x0285…02ec at003f = ╱32╱2╱ // 0x2c4 @0x3f
0x0285…02ec at0040 = ╱fe0000c004╱ // 0x2c5 @0x40
0x0285…02ec at0045 = ╱ee╱)╱ // 0x2ca @0x45
0x0285…02ec at0046 = ╱ec╱,╱ // 0x2cb @0x46
0x0285…02ec at0047 = ╱46╱F╱ // 0x2cc @0x47
0x0285…02ec at0048 = ╱4d╱M╱ // 0x2cd @0x48
0x0285…02ec at0049 = ╱4b╱K╱ // 0x2ce @0x49
0x0285…02ec at004a = ╱52╱R╱ // 0x2cf @0x4a
0x0285…02ec at004b = ╱45╱E╱ // 0x2d0 @0x4b
0x0285…02ec at004c = ╱44╱D╱ // 0x2d1 @0x4c
0x0285…02ec at004d = ╱49╱I╱ // 0x2d2 @0x4d
0x0285…02ec at004e = ╱54╱T╱ // 0x2d3 @0x4e
0x0285…02ec at004f = ╱ef╱$╱ // 0x2d4 @0x4f
0x0285…02ec at0050 = ╱ed╱(╱ // 0x2d5 @0x50
0x0285…02ec at0051 = ╱31╱1╱ // 0x2d6 @0x51
0x0285…02ec at0052 = ╱32╱2╱ // 0x2d7 @0x52
0x0285…02ec at0053 = ╱fe0000c004╱ // 0x2d8 @0x53
0x0285…02ec at0058 = ╱ee╱)╱ // 0x2dd @0x58
0x0285…02ec at0059 = ╱ec╱,╱ // 0x2de @0x59
0x0285…02ec at005a = ╱4b╱K╱ // 0x2df @0x5a
0x0285…02ec at005b = ╱38╱8╱ // 0x2e0 @0x5b
0x0285…02ec at005c = ╱ef╱$╱ // 0x2e1 @0x5c
0x0285…02ec at005d = ╱ed╱(╱ // 0x2e2 @0x5d
0x0285…02ec at005e = ╱31╱1╱ // 0x2e3 @0x5e
0x0285…02ec at005f = ╱37╱7╱ // 0x2e4 @0x5f
0x0285…02ec at0060 = ╱fe00008805╱ // 0x2e5 @0x60
0x0285…02ec at0065 = ╱ee╱)╱ // 0x2ea @0x65
0x0285…02ec at0066 = EOL // 0x2eb @0x66
0x0285…02ec }
0x02ec…0351 90a8 0180 DIM KRENAVN$(25),FÅDEBET$(12),FÅKREDIT$(12),B8$(12),TK$(1),STREG$(77)
0x02ec…0351 LineComalBin {
0x02ec…0351 ptr = 0x90a8 // 0x2ec @0x0
0x02ec…0351 lno = 0x00b4 // 0x2ee @0x2
0x02ec…0351 at0004 = ╱87╱ DIM ╱ // 0x2f0 @0x4
0x02ec…0351 at0005 = ╱4b╱K╱ // 0x2f1 @0x5
0x02ec…0351 at0006 = ╱52╱R╱ // 0x2f2 @0x6
0x02ec…0351 at0007 = ╱45╱E╱ // 0x2f3 @0x7
0x02ec…0351 at0008 = ╱4e╱N╱ // 0x2f4 @0x8
0x02ec…0351 at0009 = ╱41╱A╱ // 0x2f5 @0x9
0x02ec…0351 at000a = ╱56╱V╱ // 0x2f6 @0xa
0x02ec…0351 at000b = ╱4e╱N╱ // 0x2f7 @0xb
0x02ec…0351 at000c = ╱ef╱$╱ // 0x2f8 @0xc
0x02ec…0351 at000d = ╱ed╱(╱ // 0x2f9 @0xd
0x02ec…0351 at000e = ╱32╱2╱ // 0x2fa @0xe
0x02ec…0351 at000f = ╱35╱5╱ // 0x2fb @0xf
0x02ec…0351 at0010 = ╱fe0000c805╱ // 0x2fc @0x10
0x02ec…0351 at0015 = ╱ee╱)╱ // 0x301 @0x15
0x02ec…0351 at0016 = ╱ec╱,╱ // 0x302 @0x16
0x02ec…0351 at0017 = ╱46╱F╱ // 0x303 @0x17
0x02ec…0351 at0018 = ╱5d╱Å╱ // 0x304 @0x18
0x02ec…0351 at0019 = ╱44╱D╱ // 0x305 @0x19
0x02ec…0351 at001a = ╱45╱E╱ // 0x306 @0x1a
0x02ec…0351 at001b = ╱42╱B╱ // 0x307 @0x1b
0x02ec…0351 at001c = ╱45╱E╱ // 0x308 @0x1c
0x02ec…0351 at001d = ╱54╱T╱ // 0x309 @0x1d
0x02ec…0351 at001e = ╱ef╱$╱ // 0x30a @0x1e
0x02ec…0351 at001f = ╱ed╱(╱ // 0x30b @0x1f
0x02ec…0351 at0020 = ╱31╱1╱ // 0x30c @0x20
0x02ec…0351 at0021 = ╱32╱2╱ // 0x30d @0x21
0x02ec…0351 at0022 = ╱fe0000c004╱ // 0x30e @0x22
0x02ec…0351 at0027 = ╱ee╱)╱ // 0x313 @0x27
0x02ec…0351 at0028 = ╱ec╱,╱ // 0x314 @0x28
0x02ec…0351 at0029 = ╱46╱F╱ // 0x315 @0x29
0x02ec…0351 at002a = ╱5d╱Å╱ // 0x316 @0x2a
0x02ec…0351 at002b = ╱4b╱K╱ // 0x317 @0x2b
0x02ec…0351 at002c = ╱52╱R╱ // 0x318 @0x2c
0x02ec…0351 at002d = ╱45╱E╱ // 0x319 @0x2d
0x02ec…0351 at002e = ╱44╱D╱ // 0x31a @0x2e
0x02ec…0351 at002f = ╱49╱I╱ // 0x31b @0x2f
0x02ec…0351 at0030 = ╱54╱T╱ // 0x31c @0x30
0x02ec…0351 at0031 = ╱ef╱$╱ // 0x31d @0x31
0x02ec…0351 at0032 = ╱ed╱(╱ // 0x31e @0x32
0x02ec…0351 at0033 = ╱31╱1╱ // 0x31f @0x33
0x02ec…0351 at0034 = ╱32╱2╱ // 0x320 @0x34
0x02ec…0351 at0035 = ╱fe0000c004╱ // 0x321 @0x35
0x02ec…0351 at003a = ╱ee╱)╱ // 0x326 @0x3a
0x02ec…0351 at003b = ╱ec╱,╱ // 0x327 @0x3b
0x02ec…0351 at003c = ╱42╱B╱ // 0x328 @0x3c
0x02ec…0351 at003d = ╱38╱8╱ // 0x329 @0x3d
0x02ec…0351 at003e = ╱ef╱$╱ // 0x32a @0x3e
0x02ec…0351 at003f = ╱ed╱(╱ // 0x32b @0x3f
0x02ec…0351 at0040 = ╱31╱1╱ // 0x32c @0x40
0x02ec…0351 at0041 = ╱32╱2╱ // 0x32d @0x41
0x02ec…0351 at0042 = ╱fe0000c004╱ // 0x32e @0x42
0x02ec…0351 at0047 = ╱ee╱)╱ // 0x333 @0x47
0x02ec…0351 at0048 = ╱ec╱,╱ // 0x334 @0x48
0x02ec…0351 at0049 = ╱54╱T╱ // 0x335 @0x49
0x02ec…0351 at004a = ╱4b╱K╱ // 0x336 @0x4a
0x02ec…0351 at004b = ╱ef╱$╱ // 0x337 @0x4b
0x02ec…0351 at004c = ╱ed╱(╱ // 0x338 @0x4c
0x02ec…0351 at004d = ╱31╱1╱ // 0x339 @0x4d
0x02ec…0351 at004e = ╱fe00008001╱ // 0x33a @0x4e
0x02ec…0351 at0053 = ╱ee╱)╱ // 0x33f @0x53
0x02ec…0351 at0054 = ╱ec╱,╱ // 0x340 @0x54
0x02ec…0351 at0055 = ╱53╱S╱ // 0x341 @0x55
0x02ec…0351 at0056 = ╱54╱T╱ // 0x342 @0x56
0x02ec…0351 at0057 = ╱52╱R╱ // 0x343 @0x57
0x02ec…0351 at0058 = ╱45╱E╱ // 0x344 @0x58
0x02ec…0351 at0059 = ╱47╱G╱ // 0x345 @0x59
0x02ec…0351 at005a = ╱ef╱$╱ // 0x346 @0x5a
0x02ec…0351 at005b = ╱ed╱(╱ // 0x347 @0x5b
0x02ec…0351 at005c = ╱37╱7╱ // 0x348 @0x5c
0x02ec…0351 at005d = ╱37╱7╱ // 0x349 @0x5d
0x02ec…0351 at005e = ╱fe00009a07╱ // 0x34a @0x5e
0x02ec…0351 at0063 = ╱ee╱)╱ // 0x34f @0x63
0x02ec…0351 at0064 = EOL // 0x350 @0x64
0x02ec…0351 }
0x0351…03bd 9114 0190 DIM K9$(17),K10$(17),K11$(17),K12$(17),K13$(17),KREGADE$(25),KREBY$(20)
0x0351…03bd LineComalBin {
0x0351…03bd ptr = 0x9114 // 0x351 @0x0
0x0351…03bd lno = 0x00be // 0x353 @0x2
0x0351…03bd at0004 = ╱87╱ DIM ╱ // 0x355 @0x4
0x0351…03bd at0005 = ╱4b╱K╱ // 0x356 @0x5
0x0351…03bd at0006 = ╱39╱9╱ // 0x357 @0x6
0x0351…03bd at0007 = ╱ef╱$╱ // 0x358 @0x7
0x0351…03bd at0008 = ╱ed╱(╱ // 0x359 @0x8
0x0351…03bd at0009 = ╱31╱1╱ // 0x35a @0x9
0x0351…03bd at000a = ╱37╱7╱ // 0x35b @0xa
0x0351…03bd at000b = ╱fe00008805╱ // 0x35c @0xb
0x0351…03bd at0010 = ╱ee╱)╱ // 0x361 @0x10
0x0351…03bd at0011 = ╱ec╱,╱ // 0x362 @0x11
0x0351…03bd at0012 = ╱4b╱K╱ // 0x363 @0x12
0x0351…03bd at0013 = ╱31╱1╱ // 0x364 @0x13
0x0351…03bd at0014 = ╱30╱0╱ // 0x365 @0x14
0x0351…03bd at0015 = ╱ef╱$╱ // 0x366 @0x15
0x0351…03bd at0016 = ╱ed╱(╱ // 0x367 @0x16
0x0351…03bd at0017 = ╱31╱1╱ // 0x368 @0x17
0x0351…03bd at0018 = ╱37╱7╱ // 0x369 @0x18
0x0351…03bd at0019 = ╱fe00008805╱ // 0x36a @0x19
0x0351…03bd at001e = ╱ee╱)╱ // 0x36f @0x1e
0x0351…03bd at001f = ╱ec╱,╱ // 0x370 @0x1f
0x0351…03bd at0020 = ╱4b╱K╱ // 0x371 @0x20
0x0351…03bd at0021 = ╱31╱1╱ // 0x372 @0x21
0x0351…03bd at0022 = ╱31╱1╱ // 0x373 @0x22
0x0351…03bd at0023 = ╱ef╱$╱ // 0x374 @0x23
0x0351…03bd at0024 = ╱ed╱(╱ // 0x375 @0x24
0x0351…03bd at0025 = ╱31╱1╱ // 0x376 @0x25
0x0351…03bd at0026 = ╱37╱7╱ // 0x377 @0x26
0x0351…03bd at0027 = ╱fe00008805╱ // 0x378 @0x27
0x0351…03bd at002c = ╱ee╱)╱ // 0x37d @0x2c
0x0351…03bd at002d = ╱ec╱,╱ // 0x37e @0x2d
0x0351…03bd at002e = ╱4b╱K╱ // 0x37f @0x2e
0x0351…03bd at002f = ╱31╱1╱ // 0x380 @0x2f
0x0351…03bd at0030 = ╱32╱2╱ // 0x381 @0x30
0x0351…03bd at0031 = ╱ef╱$╱ // 0x382 @0x31
0x0351…03bd at0032 = ╱ed╱(╱ // 0x383 @0x32
0x0351…03bd at0033 = ╱31╱1╱ // 0x384 @0x33
0x0351…03bd at0034 = ╱37╱7╱ // 0x385 @0x34
0x0351…03bd at0035 = ╱fe00008805╱ // 0x386 @0x35
0x0351…03bd at003a = ╱ee╱)╱ // 0x38b @0x3a
0x0351…03bd at003b = ╱ec╱,╱ // 0x38c @0x3b
0x0351…03bd at003c = ╱4b╱K╱ // 0x38d @0x3c
0x0351…03bd at003d = ╱31╱1╱ // 0x38e @0x3d
0x0351…03bd at003e = ╱33╱3╱ // 0x38f @0x3e
0x0351…03bd at003f = ╱ef╱$╱ // 0x390 @0x3f
0x0351…03bd at0040 = ╱ed╱(╱ // 0x391 @0x40
0x0351…03bd at0041 = ╱31╱1╱ // 0x392 @0x41
0x0351…03bd at0042 = ╱37╱7╱ // 0x393 @0x42
0x0351…03bd at0043 = ╱fe00008805╱ // 0x394 @0x43
0x0351…03bd at0048 = ╱ee╱)╱ // 0x399 @0x48
0x0351…03bd at0049 = ╱ec╱,╱ // 0x39a @0x49
0x0351…03bd at004a = ╱4b╱K╱ // 0x39b @0x4a
0x0351…03bd at004b = ╱52╱R╱ // 0x39c @0x4b
0x0351…03bd at004c = ╱45╱E╱ // 0x39d @0x4c
0x0351…03bd at004d = ╱47╱G╱ // 0x39e @0x4d
0x0351…03bd at004e = ╱41╱A╱ // 0x39f @0x4e
0x0351…03bd at004f = ╱44╱D╱ // 0x3a0 @0x4f
0x0351…03bd at0050 = ╱45╱E╱ // 0x3a1 @0x50
0x0351…03bd at0051 = ╱ef╱$╱ // 0x3a2 @0x51
0x0351…03bd at0052 = ╱ed╱(╱ // 0x3a3 @0x52
0x0351…03bd at0053 = ╱32╱2╱ // 0x3a4 @0x53
0x0351…03bd at0054 = ╱35╱5╱ // 0x3a5 @0x54
0x0351…03bd at0055 = ╱fe0000c805╱ // 0x3a6 @0x55
0x0351…03bd at005a = ╱ee╱)╱ // 0x3ab @0x5a
0x0351…03bd at005b = ╱ec╱,╱ // 0x3ac @0x5b
0x0351…03bd at005c = ╱4b╱K╱ // 0x3ad @0x5c
0x0351…03bd at005d = ╱52╱R╱ // 0x3ae @0x5d
0x0351…03bd at005e = ╱45╱E╱ // 0x3af @0x5e
0x0351…03bd at005f = ╱42╱B╱ // 0x3b0 @0x5f
0x0351…03bd at0060 = ╱59╱Y╱ // 0x3b1 @0x60
0x0351…03bd at0061 = ╱ef╱$╱ // 0x3b2 @0x61
0x0351…03bd at0062 = ╱ed╱(╱ // 0x3b3 @0x62
0x0351…03bd at0063 = ╱32╱2╱ // 0x3b4 @0x63
0x0351…03bd at0064 = ╱30╱0╱ // 0x3b5 @0x64
0x0351…03bd at0065 = ╱fe0000a005╱ // 0x3b6 @0x65
0x0351…03bd at006a = ╱ee╱)╱ // 0x3bb @0x6a
0x0351…03bd at006b = EOL // 0x3bc @0x6b
0x0351…03bd }
0x03bd…042a 9181 0200 DIM KRELK$(1),KRGR$(1),KSALDO1$(12),KSALDO2$(12),TAH$(12),SUM$(12),A$(1)
0x03bd…042a LineComalBin {
0x03bd…042a ptr = 0x9181 // 0x3bd @0x0
0x03bd…042a lno = 0x00c8 // 0x3bf @0x2
0x03bd…042a at0004 = ╱87╱ DIM ╱ // 0x3c1 @0x4
0x03bd…042a at0005 = ╱4b╱K╱ // 0x3c2 @0x5
0x03bd…042a at0006 = ╱52╱R╱ // 0x3c3 @0x6
0x03bd…042a at0007 = ╱45╱E╱ // 0x3c4 @0x7
0x03bd…042a at0008 = ╱4c╱L╱ // 0x3c5 @0x8
0x03bd…042a at0009 = ╱4b╱K╱ // 0x3c6 @0x9
0x03bd…042a at000a = ╱ef╱$╱ // 0x3c7 @0xa
0x03bd…042a at000b = ╱ed╱(╱ // 0x3c8 @0xb
0x03bd…042a at000c = ╱31╱1╱ // 0x3c9 @0xc
0x03bd…042a at000d = ╱fe00008001╱ // 0x3ca @0xd
0x03bd…042a at0012 = ╱ee╱)╱ // 0x3cf @0x12
0x03bd…042a at0013 = ╱ec╱,╱ // 0x3d0 @0x13
0x03bd…042a at0014 = ╱4b╱K╱ // 0x3d1 @0x14
0x03bd…042a at0015 = ╱52╱R╱ // 0x3d2 @0x15
0x03bd…042a at0016 = ╱47╱G╱ // 0x3d3 @0x16
0x03bd…042a at0017 = ╱52╱R╱ // 0x3d4 @0x17
0x03bd…042a at0018 = ╱ef╱$╱ // 0x3d5 @0x18
0x03bd…042a at0019 = ╱ed╱(╱ // 0x3d6 @0x19
0x03bd…042a at001a = ╱31╱1╱ // 0x3d7 @0x1a
0x03bd…042a at001b = ╱fe00008001╱ // 0x3d8 @0x1b
0x03bd…042a at0020 = ╱ee╱)╱ // 0x3dd @0x20
0x03bd…042a at0021 = ╱ec╱,╱ // 0x3de @0x21
0x03bd…042a at0022 = ╱4b╱K╱ // 0x3df @0x22
0x03bd…042a at0023 = ╱53╱S╱ // 0x3e0 @0x23
0x03bd…042a at0024 = ╱41╱A╱ // 0x3e1 @0x24
0x03bd…042a at0025 = ╱4c╱L╱ // 0x3e2 @0x25
0x03bd…042a at0026 = ╱44╱D╱ // 0x3e3 @0x26
0x03bd…042a at0027 = ╱4f╱O╱ // 0x3e4 @0x27
0x03bd…042a at0028 = ╱31╱1╱ // 0x3e5 @0x28
0x03bd…042a at0029 = ╱ef╱$╱ // 0x3e6 @0x29
0x03bd…042a at002a = ╱ed╱(╱ // 0x3e7 @0x2a
0x03bd…042a at002b = ╱31╱1╱ // 0x3e8 @0x2b
0x03bd…042a at002c = ╱32╱2╱ // 0x3e9 @0x2c
0x03bd…042a at002d = ╱fe0000c004╱ // 0x3ea @0x2d
0x03bd…042a at0032 = ╱ee╱)╱ // 0x3ef @0x32
0x03bd…042a at0033 = ╱ec╱,╱ // 0x3f0 @0x33
0x03bd…042a at0034 = ╱4b╱K╱ // 0x3f1 @0x34
0x03bd…042a at0035 = ╱53╱S╱ // 0x3f2 @0x35
0x03bd…042a at0036 = ╱41╱A╱ // 0x3f3 @0x36
0x03bd…042a at0037 = ╱4c╱L╱ // 0x3f4 @0x37
0x03bd…042a at0038 = ╱44╱D╱ // 0x3f5 @0x38
0x03bd…042a at0039 = ╱4f╱O╱ // 0x3f6 @0x39
0x03bd…042a at003a = ╱32╱2╱ // 0x3f7 @0x3a
0x03bd…042a at003b = ╱ef╱$╱ // 0x3f8 @0x3b
0x03bd…042a at003c = ╱ed╱(╱ // 0x3f9 @0x3c
0x03bd…042a at003d = ╱31╱1╱ // 0x3fa @0x3d
0x03bd…042a at003e = ╱32╱2╱ // 0x3fb @0x3e
0x03bd…042a at003f = ╱fe0000c004╱ // 0x3fc @0x3f
0x03bd…042a at0044 = ╱ee╱)╱ // 0x401 @0x44
0x03bd…042a at0045 = ╱ec╱,╱ // 0x402 @0x45
0x03bd…042a at0046 = ╱54╱T╱ // 0x403 @0x46
0x03bd…042a at0047 = ╱41╱A╱ // 0x404 @0x47
0x03bd…042a at0048 = ╱48╱H╱ // 0x405 @0x48
0x03bd…042a at0049 = ╱ef╱$╱ // 0x406 @0x49
0x03bd…042a at004a = ╱ed╱(╱ // 0x407 @0x4a
0x03bd…042a at004b = ╱31╱1╱ // 0x408 @0x4b
0x03bd…042a at004c = ╱32╱2╱ // 0x409 @0x4c
0x03bd…042a at004d = ╱fe0000c004╱ // 0x40a @0x4d
0x03bd…042a at0052 = ╱ee╱)╱ // 0x40f @0x52
0x03bd…042a at0053 = ╱ec╱,╱ // 0x410 @0x53
0x03bd…042a at0054 = ╱53╱S╱ // 0x411 @0x54
0x03bd…042a at0055 = ╱55╱U╱ // 0x412 @0x55
0x03bd…042a at0056 = ╱4d╱M╱ // 0x413 @0x56
0x03bd…042a at0057 = ╱ef╱$╱ // 0x414 @0x57
0x03bd…042a at0058 = ╱ed╱(╱ // 0x415 @0x58
0x03bd…042a at0059 = ╱31╱1╱ // 0x416 @0x59
0x03bd…042a at005a = ╱32╱2╱ // 0x417 @0x5a
0x03bd…042a at005b = ╱fe0000c004╱ // 0x418 @0x5b
0x03bd…042a at0060 = ╱ee╱)╱ // 0x41d @0x60
0x03bd…042a at0061 = ╱ec╱,╱ // 0x41e @0x61
0x03bd…042a at0062 = ╱41╱A╱ // 0x41f @0x62
0x03bd…042a at0063 = ╱ef╱$╱ // 0x420 @0x63
0x03bd…042a at0064 = ╱ed╱(╱ // 0x421 @0x64
0x03bd…042a at0065 = ╱31╱1╱ // 0x422 @0x65
0x03bd…042a at0066 = ╱fe00008001╱ // 0x423 @0x66
0x03bd…042a at006b = ╱ee╱)╱ // 0x428 @0x6b
0x03bd…042a at006c = EOL // 0x429 @0x6c
0x03bd…042a }
0x042a…048f 91e6 0210 DIM DV$(10),K14$(17),K15$(17),K16$(17),K17$(17),T4(9),EÅREG$(12)
0x042a…048f LineComalBin {
0x042a…048f ptr = 0x91e6 // 0x42a @0x0
0x042a…048f lno = 0x00d2 // 0x42c @0x2
0x042a…048f at0004 = ╱87╱ DIM ╱ // 0x42e @0x4
0x042a…048f at0005 = ╱44╱D╱ // 0x42f @0x5
0x042a…048f at0006 = ╱56╱V╱ // 0x430 @0x6
0x042a…048f at0007 = ╱ef╱$╱ // 0x431 @0x7
0x042a…048f at0008 = ╱ed╱(╱ // 0x432 @0x8
0x042a…048f at0009 = ╱31╱1╱ // 0x433 @0x9
0x042a…048f at000a = ╱30╱0╱ // 0x434 @0xa
0x042a…048f at000b = ╱fe0000a004╱ // 0x435 @0xb
0x042a…048f at0010 = ╱ee╱)╱ // 0x43a @0x10
0x042a…048f at0011 = ╱ec╱,╱ // 0x43b @0x11
0x042a…048f at0012 = ╱4b╱K╱ // 0x43c @0x12
0x042a…048f at0013 = ╱31╱1╱ // 0x43d @0x13
0x042a…048f at0014 = ╱34╱4╱ // 0x43e @0x14
0x042a…048f at0015 = ╱ef╱$╱ // 0x43f @0x15
0x042a…048f at0016 = ╱ed╱(╱ // 0x440 @0x16
0x042a…048f at0017 = ╱31╱1╱ // 0x441 @0x17
0x042a…048f at0018 = ╱37╱7╱ // 0x442 @0x18
0x042a…048f at0019 = ╱fe00008805╱ // 0x443 @0x19
0x042a…048f at001e = ╱ee╱)╱ // 0x448 @0x1e
0x042a…048f at001f = ╱ec╱,╱ // 0x449 @0x1f
0x042a…048f at0020 = ╱4b╱K╱ // 0x44a @0x20
0x042a…048f at0021 = ╱31╱1╱ // 0x44b @0x21
0x042a…048f at0022 = ╱35╱5╱ // 0x44c @0x22
0x042a…048f at0023 = ╱ef╱$╱ // 0x44d @0x23
0x042a…048f at0024 = ╱ed╱(╱ // 0x44e @0x24
0x042a…048f at0025 = ╱31╱1╱ // 0x44f @0x25
0x042a…048f at0026 = ╱37╱7╱ // 0x450 @0x26
0x042a…048f at0027 = ╱fe00008805╱ // 0x451 @0x27
0x042a…048f at002c = ╱ee╱)╱ // 0x456 @0x2c
0x042a…048f at002d = ╱ec╱,╱ // 0x457 @0x2d
0x042a…048f at002e = ╱4b╱K╱ // 0x458 @0x2e
0x042a…048f at002f = ╱31╱1╱ // 0x459 @0x2f
0x042a…048f at0030 = ╱36╱6╱ // 0x45a @0x30
0x042a…048f at0031 = ╱ef╱$╱ // 0x45b @0x31
0x042a…048f at0032 = ╱ed╱(╱ // 0x45c @0x32
0x042a…048f at0033 = ╱31╱1╱ // 0x45d @0x33
0x042a…048f at0034 = ╱37╱7╱ // 0x45e @0x34
0x042a…048f at0035 = ╱fe00008805╱ // 0x45f @0x35
0x042a…048f at003a = ╱ee╱)╱ // 0x464 @0x3a
0x042a…048f at003b = ╱ec╱,╱ // 0x465 @0x3b
0x042a…048f at003c = ╱4b╱K╱ // 0x466 @0x3c
0x042a…048f at003d = ╱31╱1╱ // 0x467 @0x3d
0x042a…048f at003e = ╱37╱7╱ // 0x468 @0x3e
0x042a…048f at003f = ╱ef╱$╱ // 0x469 @0x3f
0x042a…048f at0040 = ╱ed╱(╱ // 0x46a @0x40
0x042a…048f at0041 = ╱31╱1╱ // 0x46b @0x41
0x042a…048f at0042 = ╱37╱7╱ // 0x46c @0x42
0x042a…048f at0043 = ╱fe00008805╱ // 0x46d @0x43
0x042a…048f at0048 = ╱ee╱)╱ // 0x472 @0x48
0x042a…048f at0049 = ╱ec╱,╱ // 0x473 @0x49
0x042a…048f at004a = ╱54╱T╱ // 0x474 @0x4a
0x042a…048f at004b = ╱34╱4╱ // 0x475 @0x4b
0x042a…048f at004c = ╱ed╱(╱ // 0x476 @0x4c
0x042a…048f at004d = ╱39╱9╱ // 0x477 @0x4d
0x042a…048f at004e = ╱fe00009004╱ // 0x478 @0x4e
0x042a…048f at0053 = ╱ee╱)╱ // 0x47d @0x53
0x042a…048f at0054 = ╱ec╱,╱ // 0x47e @0x54
0x042a…048f at0055 = ╱45╱E╱ // 0x47f @0x55
0x042a…048f at0056 = ╱5d╱Å╱ // 0x480 @0x56
0x042a…048f at0057 = ╱52╱R╱ // 0x481 @0x57
0x042a…048f at0058 = ╱45╱E╱ // 0x482 @0x58
0x042a…048f at0059 = ╱47╱G╱ // 0x483 @0x59
0x042a…048f at005a = ╱ef╱$╱ // 0x484 @0x5a
0x042a…048f at005b = ╱ed╱(╱ // 0x485 @0x5b
0x042a…048f at005c = ╱31╱1╱ // 0x486 @0x5c
0x042a…048f at005d = ╱32╱2╱ // 0x487 @0x5d
0x042a…048f at005e = ╱fe0000c004╱ // 0x488 @0x5e
0x042a…048f at0063 = ╱ee╱)╱ // 0x48d @0x63
0x042a…048f at0064 = EOL // 0x48e @0x64
0x042a…048f }
0x048f…04c2 9219 0211 DIM EMREG$(12),MBEV$(12),YBEV$(12)
0x048f…04c2 LineComalBin {
0x048f…04c2 ptr = 0x9219 // 0x48f @0x0
0x048f…04c2 lno = 0x00d3 // 0x491 @0x2
0x048f…04c2 at0004 = ╱87╱ DIM ╱ // 0x493 @0x4
0x048f…04c2 at0005 = ╱45╱E╱ // 0x494 @0x5
0x048f…04c2 at0006 = ╱4d╱M╱ // 0x495 @0x6
0x048f…04c2 at0007 = ╱52╱R╱ // 0x496 @0x7
0x048f…04c2 at0008 = ╱45╱E╱ // 0x497 @0x8
0x048f…04c2 at0009 = ╱47╱G╱ // 0x498 @0x9
0x048f…04c2 at000a = ╱ef╱$╱ // 0x499 @0xa
0x048f…04c2 at000b = ╱ed╱(╱ // 0x49a @0xb
0x048f…04c2 at000c = ╱31╱1╱ // 0x49b @0xc
0x048f…04c2 at000d = ╱32╱2╱ // 0x49c @0xd
0x048f…04c2 at000e = ╱fe0000c004╱ // 0x49d @0xe
0x048f…04c2 at0013 = ╱ee╱)╱ // 0x4a2 @0x13
0x048f…04c2 at0014 = ╱ec╱,╱ // 0x4a3 @0x14
0x048f…04c2 at0015 = ╱4d╱M╱ // 0x4a4 @0x15
0x048f…04c2 at0016 = ╱42╱B╱ // 0x4a5 @0x16
0x048f…04c2 at0017 = ╱45╱E╱ // 0x4a6 @0x17
0x048f…04c2 at0018 = ╱56╱V╱ // 0x4a7 @0x18
0x048f…04c2 at0019 = ╱ef╱$╱ // 0x4a8 @0x19
0x048f…04c2 at001a = ╱ed╱(╱ // 0x4a9 @0x1a
0x048f…04c2 at001b = ╱31╱1╱ // 0x4aa @0x1b
0x048f…04c2 at001c = ╱32╱2╱ // 0x4ab @0x1c
0x048f…04c2 at001d = ╱fe0000c004╱ // 0x4ac @0x1d
0x048f…04c2 at0022 = ╱ee╱)╱ // 0x4b1 @0x22
0x048f…04c2 at0023 = ╱ec╱,╱ // 0x4b2 @0x23
0x048f…04c2 at0024 = ╱59╱Y╱ // 0x4b3 @0x24
0x048f…04c2 at0025 = ╱42╱B╱ // 0x4b4 @0x25
0x048f…04c2 at0026 = ╱45╱E╱ // 0x4b5 @0x26
0x048f…04c2 at0027 = ╱56╱V╱ // 0x4b6 @0x27
0x048f…04c2 at0028 = ╱ef╱$╱ // 0x4b7 @0x28
0x048f…04c2 at0029 = ╱ed╱(╱ // 0x4b8 @0x29
0x048f…04c2 at002a = ╱31╱1╱ // 0x4b9 @0x2a
0x048f…04c2 at002b = ╱32╱2╱ // 0x4ba @0x2b
0x048f…04c2 at002c = ╱fe0000c004╱ // 0x4bb @0x2c
0x048f…04c2 at0031 = ╱ee╱)╱ // 0x4c0 @0x31
0x048f…04c2 at0032 = EOL // 0x4c1 @0x32
0x048f…04c2 }
0x04c2…04da 9231 0220 PROC CALC(ART,B1,B2,ES)
0x04c2…04da LineComalBin {
0x04c2…04da ptr = 0x9231 // 0x4c2 @0x0
0x04c2…04da lno = 0x00dc // 0x4c4 @0x2
0x04c2…04da at0004 = ╱9e╱ PROC ╱ // 0x4c6 @0x4
0x04c2…04da at0005 = ╱43╱C╱ // 0x4c7 @0x5
0x04c2…04da at0006 = ╱41╱A╱ // 0x4c8 @0x6
0x04c2…04da at0007 = ╱4c╱L╱ // 0x4c9 @0x7
0x04c2…04da at0008 = ╱43╱C╱ // 0x4ca @0x8
0x04c2…04da at0009 = ╱ed╱(╱ // 0x4cb @0x9
0x04c2…04da at000a = ╱41╱A╱ // 0x4cc @0xa
0x04c2…04da at000b = ╱52╱R╱ // 0x4cd @0xb
0x04c2…04da at000c = ╱54╱T╱ // 0x4ce @0xc
0x04c2…04da at000d = ╱ec╱,╱ // 0x4cf @0xd
0x04c2…04da at000e = ╱42╱B╱ // 0x4d0 @0xe
0x04c2…04da at000f = ╱31╱1╱ // 0x4d1 @0xf
0x04c2…04da at0010 = ╱ec╱,╱ // 0x4d2 @0x10
0x04c2…04da at0011 = ╱42╱B╱ // 0x4d3 @0x11
0x04c2…04da at0012 = ╱32╱2╱ // 0x4d4 @0x12
0x04c2…04da at0013 = ╱ec╱,╱ // 0x4d5 @0x13
0x04c2…04da at0014 = ╱45╱E╱ // 0x4d6 @0x14
0x04c2…04da at0015 = ╱53╱S╱ // 0x4d7 @0x15
0x04c2…04da at0016 = ╱ee╱)╱ // 0x4d8 @0x16
0x04c2…04da at0017 = EOL // 0x4d9 @0x17
0x04c2…04da }
0x04da…050f 9266 0230 OP1$=B1$;OP2$=B2$;RES$=ES$;SI=0;FLAG=0
0x04da…050f LineComalBin {
0x04da…050f ptr = 0x9266 // 0x4da @0x0
0x04da…050f lno = 0x00e6 // 0x4dc @0x2
0x04da…050f at0004 = ╱4f╱O╱ // 0x4de @0x4
0x04da…050f at0005 = ╱50╱P╱ // 0x4df @0x5
0x04da…050f at0006 = ╱31╱1╱ // 0x4e0 @0x6
0x04da…050f at0007 = ╱ef╱$╱ // 0x4e1 @0x7
0x04da…050f at0008 = ╱dc╱=╱ // 0x4e2 @0x8
0x04da…050f at0009 = ╱42╱B╱ // 0x4e3 @0x9
0x04da…050f at000a = ╱31╱1╱ // 0x4e4 @0xa
0x04da…050f at000b = ╱ef╱$╱ // 0x4e5 @0xb
0x04da…050f at000c = ╱eb╱;╱ // 0x4e6 @0xc
0x04da…050f at000d = ╱4f╱O╱ // 0x4e7 @0xd
0x04da…050f at000e = ╱50╱P╱ // 0x4e8 @0xe
0x04da…050f at000f = ╱32╱2╱ // 0x4e9 @0xf
0x04da…050f at0010 = ╱ef╱$╱ // 0x4ea @0x10
0x04da…050f at0011 = ╱dc╱=╱ // 0x4eb @0x11
0x04da…050f at0012 = ╱42╱B╱ // 0x4ec @0x12
0x04da…050f at0013 = ╱32╱2╱ // 0x4ed @0x13
0x04da…050f at0014 = ╱ef╱$╱ // 0x4ee @0x14
0x04da…050f at0015 = ╱eb╱;╱ // 0x4ef @0x15
0x04da…050f at0016 = ╱52╱R╱ // 0x4f0 @0x16
0x04da…050f at0017 = ╱45╱E╱ // 0x4f1 @0x17
0x04da…050f at0018 = ╱53╱S╱ // 0x4f2 @0x18
0x04da…050f at0019 = ╱ef╱$╱ // 0x4f3 @0x19
0x04da…050f at001a = ╱dc╱=╱ // 0x4f4 @0x1a
0x04da…050f at001b = ╱45╱E╱ // 0x4f5 @0x1b
0x04da…050f at001c = ╱53╱S╱ // 0x4f6 @0x1c
0x04da…050f at001d = ╱ef╱$╱ // 0x4f7 @0x1d
0x04da…050f at001e = ╱eb╱;╱ // 0x4f8 @0x1e
0x04da…050f at001f = ╱53╱S╱ // 0x4f9 @0x1f
0x04da…050f at0020 = ╱49╱I╱ // 0x4fa @0x20
0x04da…050f at0021 = ╱dc╱=╱ // 0x4fb @0x21
0x04da…050f at0022 = ╱30╱0╱ // 0x4fc @0x22
0x04da…050f at0023 = ╱fe00000000╱ // 0x4fd @0x23
0x04da…050f at0028 = ╱eb╱;╱ // 0x502 @0x28
0x04da…050f at0029 = ╱46╱F╱ // 0x503 @0x29
0x04da…050f at002a = ╱4c╱L╱ // 0x504 @0x2a
0x04da…050f at002b = ╱41╱A╱ // 0x505 @0x2b
0x04da…050f at002c = ╱47╱G╱ // 0x506 @0x2c
0x04da…050f at002d = ╱dc╱=╱ // 0x507 @0x2d
0x04da…050f at002e = ╱30╱0╱ // 0x508 @0x2e
0x04da…050f at002f = ╱fe00000000╱ // 0x509 @0x2f
0x04da…050f at0034 = EOL // 0x50e @0x34
0x04da…050f }
0x050f…0525 927c 0240 CALL "P641210:REGN"
0x050f…0525 LineComalBin {
0x050f…0525 ptr = 0x927c // 0x50f @0x0
0x050f…0525 lno = 0x00f0 // 0x511 @0x2
0x050f…0525 at0004 = ╱ad02a8╱ CALL ╱ // 0x513 @0x4
0x050f…0525 at0007 = ╱22╱"╱ // 0x516 @0x7
0x050f…0525 at0008 = ╱50╱P╱ // 0x517 @0x8
0x050f…0525 at0009 = ╱36╱6╱ // 0x518 @0x9
0x050f…0525 at000a = ╱34╱4╱ // 0x519 @0xa
0x050f…0525 at000b = ╱31╱1╱ // 0x51a @0xb
0x050f…0525 at000c = ╱32╱2╱ // 0x51b @0xc
0x050f…0525 at000d = ╱31╱1╱ // 0x51c @0xd
0x050f…0525 at000e = ╱30╱0╱ // 0x51d @0xe
0x050f…0525 at000f = ╱3a╱:╱ // 0x51e @0xf
0x050f…0525 at0010 = ╱52╱R╱ // 0x51f @0x10
0x050f…0525 at0011 = ╱45╱E╱ // 0x520 @0x11
0x050f…0525 at0012 = ╱47╱G╱ // 0x521 @0x12
0x050f…0525 at0013 = ╱4e╱N╱ // 0x522 @0x13
0x050f…0525 at0014 = ╱22╱"╱ // 0x523 @0x14
0x050f…0525 at0015 = EOL // 0x524 @0x15
0x050f…0525 }
0x0525…0532 9289 0250 ES$=RES$
0x0525…0532 LineComalBin {
0x0525…0532 ptr = 0x9289 // 0x525 @0x0
0x0525…0532 lno = 0x00fa // 0x527 @0x2
0x0525…0532 at0004 = ╱45╱E╱ // 0x529 @0x4
0x0525…0532 at0005 = ╱53╱S╱ // 0x52a @0x5
0x0525…0532 at0006 = ╱ef╱$╱ // 0x52b @0x6
0x0525…0532 at0007 = ╱dc╱=╱ // 0x52c @0x7
0x0525…0532 at0008 = ╱52╱R╱ // 0x52d @0x8
0x0525…0532 at0009 = ╱45╱E╱ // 0x52e @0x9
0x0525…0532 at000a = ╱53╱S╱ // 0x52f @0xa
0x0525…0532 at000b = ╱ef╱$╱ // 0x530 @0xb
0x0525…0532 at000c = EOL // 0x531 @0xc
0x0525…0532 }
0x0532…053e 9295 0260 IF FLAG THEN STOP
0x0532…053e LineComalBin {
0x0532…053e ptr = 0x9295 // 0x532 @0x0
0x0532…053e lno = 0x0104 // 0x534 @0x2
0x0532…053e at0004 = ╱82╱ IF ╱ // 0x536 @0x4
0x0532…053e at0005 = ╱46╱F╱ // 0x537 @0x5
0x0532…053e at0006 = ╱4c╱L╱ // 0x538 @0x6
0x0532…053e at0007 = ╱41╱A╱ // 0x539 @0x7
0x0532…053e at0008 = ╱47╱G╱ // 0x53a @0x8
0x0532…053e at0009 = ╱b6╱ THEN ╱ // 0x53b @0x9
0x0532…053e at000a = ╱8d╱ STOP ╱ // 0x53c @0xa
0x0532…053e at000b = EOL // 0x53d @0xb
0x0532…053e }
0x053e…0544 929b 0270 ENDPROC
0x053e…0544 LineComalBin {
0x053e…0544 ptr = 0x929b // 0x53e @0x0
0x053e…0544 lno = 0x010e // 0x540 @0x2
0x053e…0544 at0004 = ╱9f╱ ENDPROC ╱ // 0x542 @0x4
0x053e…0544 at0005 = EOL // 0x543 @0x5
0x053e…0544 }
0x0544…055b 92b2 0280 PROC FEJL(NR1,NR2,NR3)
0x0544…055b LineComalBin {
0x0544…055b ptr = 0x92b2 // 0x544 @0x0
0x0544…055b lno = 0x0118 // 0x546 @0x2
0x0544…055b at0004 = ╱9e╱ PROC ╱ // 0x548 @0x4
0x0544…055b at0005 = ╱46╱F╱ // 0x549 @0x5
0x0544…055b at0006 = ╱45╱E╱ // 0x54a @0x6
0x0544…055b at0007 = ╱4a╱J╱ // 0x54b @0x7
0x0544…055b at0008 = ╱4c╱L╱ // 0x54c @0x8
0x0544…055b at0009 = ╱ed╱(╱ // 0x54d @0x9
0x0544…055b at000a = ╱4e╱N╱ // 0x54e @0xa
0x0544…055b at000b = ╱52╱R╱ // 0x54f @0xb
0x0544…055b at000c = ╱31╱1╱ // 0x550 @0xc
0x0544…055b at000d = ╱ec╱,╱ // 0x551 @0xd
0x0544…055b at000e = ╱4e╱N╱ // 0x552 @0xe
0x0544…055b at000f = ╱52╱R╱ // 0x553 @0xf
0x0544…055b at0010 = ╱32╱2╱ // 0x554 @0x10
0x0544…055b at0011 = ╱ec╱,╱ // 0x555 @0x11
0x0544…055b at0012 = ╱4e╱N╱ // 0x556 @0x12
0x0544…055b at0013 = ╱52╱R╱ // 0x557 @0x13
0x0544…055b at0014 = ╱33╱3╱ // 0x558 @0x14
0x0544…055b at0015 = ╱ee╱)╱ // 0x559 @0x15
0x0544…055b at0016 = EOL // 0x55a @0x16
0x0544…055b }
0x055b…0570 92c7 0290 IF STATUS(NR3$)<>0 THEN
0x055b…0570 LineComalBin {
0x055b…0570 ptr = 0x92c7 // 0x55b @0x0
0x055b…0570 lno = 0x0122 // 0x55d @0x2
0x055b…0570 at0004 = ╱9c╱ IF ╱ // 0x55f @0x4
0x055b…0570 at0005 = ╱ce╱STATUS╱ // 0x560 @0x5
0x055b…0570 at0006 = ╱ed╱(╱ // 0x561 @0x6
0x055b…0570 at0007 = ╱4e╱N╱ // 0x562 @0x7
0x055b…0570 at0008 = ╱52╱R╱ // 0x563 @0x8
0x055b…0570 at0009 = ╱33╱3╱ // 0x564 @0x9
0x055b…0570 at000a = ╱ef╱$╱ // 0x565 @0xa
0x055b…0570 at000b = ╱ee╱)╱ // 0x566 @0xb
0x055b…0570 at000c = ╱e1╱<>╱ // 0x567 @0xc
0x055b…0570 at000d = ╱30╱0╱ // 0x568 @0xd
0x055b…0570 at000e = ╱fe00000000╱ // 0x569 @0xe
0x055b…0570 at0013 = ╱b6╱ THEN ╱ // 0x56e @0x13
0x055b…0570 at0014 = EOL // 0x56f @0x14
0x055b…0570 }
0x0570…058a 92e1 0300 PRINT STATUS(NR3$),NR1,NR2,NR3$
0x0570…058a LineComalBin {
0x0570…058a ptr = 0x92e1 // 0x570 @0x0
0x0570…058a lno = 0x012c // 0x572 @0x2
0x0570…058a at0004 = ╱92╱ PRINT ╱ // 0x574 @0x4
0x0570…058a at0005 = ╱ce╱STATUS╱ // 0x575 @0x5
0x0570…058a at0006 = ╱ed╱(╱ // 0x576 @0x6
0x0570…058a at0007 = ╱4e╱N╱ // 0x577 @0x7
0x0570…058a at0008 = ╱52╱R╱ // 0x578 @0x8
0x0570…058a at0009 = ╱33╱3╱ // 0x579 @0x9
0x0570…058a at000a = ╱ef╱$╱ // 0x57a @0xa
0x0570…058a at000b = ╱ee╱)╱ // 0x57b @0xb
0x0570…058a at000c = ╱ec╱,╱ // 0x57c @0xc
0x0570…058a at000d = ╱4e╱N╱ // 0x57d @0xd
0x0570…058a at000e = ╱52╱R╱ // 0x57e @0xe
0x0570…058a at000f = ╱31╱1╱ // 0x57f @0xf
0x0570…058a at0010 = ╱ec╱,╱ // 0x580 @0x10
0x0570…058a at0011 = ╱4e╱N╱ // 0x581 @0x11
0x0570…058a at0012 = ╱52╱R╱ // 0x582 @0x12
0x0570…058a at0013 = ╱32╱2╱ // 0x583 @0x13
0x0570…058a at0014 = ╱ec╱,╱ // 0x584 @0x14
0x0570…058a at0015 = ╱4e╱N╱ // 0x585 @0x15
0x0570…058a at0016 = ╱52╱R╱ // 0x586 @0x16
0x0570…058a at0017 = ╱33╱3╱ // 0x587 @0x17
0x0570…058a at0018 = ╱ef╱$╱ // 0x588 @0x18
0x0570…058a at0019 = EOL // 0x589 @0x19
0x0570…058a }
0x058a…0590 92e7 0310 STOP
0x058a…0590 LineComalBin {
0x058a…0590 ptr = 0x92e7 // 0x58a @0x0
0x058a…0590 lno = 0x0136 // 0x58c @0x2
0x058a…0590 at0004 = ╱8d╱ STOP ╱ // 0x58e @0x4
0x058a…0590 at0005 = EOL // 0x58f @0x5
0x058a…0590 }
0x0590…0596 92ed 0320 ENDIF
0x0590…0596 LineComalBin {
0x0590…0596 ptr = 0x92ed // 0x590 @0x0
0x0590…0596 lno = 0x0140 // 0x592 @0x2
0x0590…0596 at0004 = ╱9b╱ ENDIF ╱ // 0x594 @0x4
0x0590…0596 at0005 = EOL // 0x595 @0x5
0x0590…0596 }
0x0596…059c 92f3 0330 ENDPROC
0x0596…059c LineComalBin {
0x0596…059c ptr = 0x92f3 // 0x596 @0x0
0x0596…059c lno = 0x014a // 0x598 @0x2
0x0596…059c at0004 = ╱9f╱ ENDPROC ╱ // 0x59a @0x4
0x0596…059c at0005 = EOL // 0x59b @0x5
0x0596…059c }
0x059c…05cd 9324 0340 PROC BOGFØRING(KONTNR,EDATO,BLGNR,TEK1,BE2,ENT1)
0x059c…05cd LineComalBin {
0x059c…05cd ptr = 0x9324 // 0x59c @0x0
0x059c…05cd lno = 0x0154 // 0x59e @0x2
0x059c…05cd at0004 = ╱9e╱ PROC ╱ // 0x5a0 @0x4
0x059c…05cd at0005 = ╱42╱B╱ // 0x5a1 @0x5
0x059c…05cd at0006 = ╱4f╱O╱ // 0x5a2 @0x6
0x059c…05cd at0007 = ╱47╱G╱ // 0x5a3 @0x7
0x059c…05cd at0008 = ╱46╱F╱ // 0x5a4 @0x8
0x059c…05cd at0009 = ╱5c╱Ø╱ // 0x5a5 @0x9
0x059c…05cd at000a = ╱52╱R╱ // 0x5a6 @0xa
0x059c…05cd at000b = ╱49╱I╱ // 0x5a7 @0xb
0x059c…05cd at000c = ╱4e╱N╱ // 0x5a8 @0xc
0x059c…05cd at000d = ╱47╱G╱ // 0x5a9 @0xd
0x059c…05cd at000e = ╱ed╱(╱ // 0x5aa @0xe
0x059c…05cd at000f = ╱4b╱K╱ // 0x5ab @0xf
0x059c…05cd at0010 = ╱4f╱O╱ // 0x5ac @0x10
0x059c…05cd at0011 = ╱4e╱N╱ // 0x5ad @0x11
0x059c…05cd at0012 = ╱54╱T╱ // 0x5ae @0x12
0x059c…05cd at0013 = ╱4e╱N╱ // 0x5af @0x13
0x059c…05cd at0014 = ╱52╱R╱ // 0x5b0 @0x14
0x059c…05cd at0015 = ╱ec╱,╱ // 0x5b1 @0x15
0x059c…05cd at0016 = ╱45╱E╱ // 0x5b2 @0x16
0x059c…05cd at0017 = ╱44╱D╱ // 0x5b3 @0x17
0x059c…05cd at0018 = ╱41╱A╱ // 0x5b4 @0x18
0x059c…05cd at0019 = ╱54╱T╱ // 0x5b5 @0x19
0x059c…05cd at001a = ╱4f╱O╱ // 0x5b6 @0x1a
0x059c…05cd at001b = ╱ec╱,╱ // 0x5b7 @0x1b
0x059c…05cd at001c = ╱42╱B╱ // 0x5b8 @0x1c
0x059c…05cd at001d = ╱4c╱L╱ // 0x5b9 @0x1d
0x059c…05cd at001e = ╱47╱G╱ // 0x5ba @0x1e
0x059c…05cd at001f = ╱4e╱N╱ // 0x5bb @0x1f
0x059c…05cd at0020 = ╱52╱R╱ // 0x5bc @0x20
0x059c…05cd at0021 = ╱ec╱,╱ // 0x5bd @0x21
0x059c…05cd at0022 = ╱54╱T╱ // 0x5be @0x22
0x059c…05cd at0023 = ╱45╱E╱ // 0x5bf @0x23
0x059c…05cd at0024 = ╱4b╱K╱ // 0x5c0 @0x24
0x059c…05cd at0025 = ╱31╱1╱ // 0x5c1 @0x25
0x059c…05cd at0026 = ╱ec╱,╱ // 0x5c2 @0x26
0x059c…05cd at0027 = ╱42╱B╱ // 0x5c3 @0x27
0x059c…05cd at0028 = ╱45╱E╱ // 0x5c4 @0x28
0x059c…05cd at0029 = ╱32╱2╱ // 0x5c5 @0x29
0x059c…05cd at002a = ╱ec╱,╱ // 0x5c6 @0x2a
0x059c…05cd at002b = ╱45╱E╱ // 0x5c7 @0x2b
0x059c…05cd at002c = ╱4e╱N╱ // 0x5c8 @0x2c
0x059c…05cd at002d = ╱54╱T╱ // 0x5c9 @0x2d
0x059c…05cd at002e = ╱31╱1╱ // 0x5ca @0x2e
0x059c…05cd at002f = ╱ee╱)╱ // 0x5cb @0x2f
0x059c…05cd at0030 = EOL // 0x5cc @0x30
0x059c…05cd }
0x05cd…05ff 9356 0350 KTAL=KONTNR DIV 10000;KTAL9=KONTNR DIV 1000
0x05cd…05ff LineComalBin {
0x05cd…05ff ptr = 0x9356 // 0x5cd @0x0
0x05cd…05ff lno = 0x015e // 0x5cf @0x2
0x05cd…05ff at0004 = ╱4b╱K╱ // 0x5d1 @0x4
0x05cd…05ff at0005 = ╱54╱T╱ // 0x5d2 @0x5
0x05cd…05ff at0006 = ╱41╱A╱ // 0x5d3 @0x6
0x05cd…05ff at0007 = ╱4c╱L╱ // 0x5d4 @0x7
0x05cd…05ff at0008 = ╱dc╱=╱ // 0x5d5 @0x8
0x05cd…05ff at0009 = ╱4b╱K╱ // 0x5d6 @0x9
0x05cd…05ff at000a = ╱4f╱O╱ // 0x5d7 @0xa
0x05cd…05ff at000b = ╱4e╱N╱ // 0x5d8 @0xb
0x05cd…05ff at000c = ╱54╱T╱ // 0x5d9 @0xc
0x05cd…05ff at000d = ╱4e╱N╱ // 0x5da @0xd
0x05cd…05ff at000e = ╱52╱R╱ // 0x5db @0xe
0x05cd…05ff at000f = ╱e7╱ DIV ╱ // 0x5dc @0xf
0x05cd…05ff at0010 = ╱31╱1╱ // 0x5dd @0x10
0x05cd…05ff at0011 = ╱30╱0╱ // 0x5de @0x11
0x05cd…05ff at0012 = ╱30╱0╱ // 0x5df @0x12
0x05cd…05ff at0013 = ╱30╱0╱ // 0x5e0 @0x13
0x05cd…05ff at0014 = ╱30╱0╱ // 0x5e1 @0x14
0x05cd…05ff at0015 = ╱fe00409c0e╱ // 0x5e2 @0x15
0x05cd…05ff at001a = ╱eb╱;╱ // 0x5e7 @0x1a
0x05cd…05ff at001b = ╱4b╱K╱ // 0x5e8 @0x1b
0x05cd…05ff at001c = ╱54╱T╱ // 0x5e9 @0x1c
0x05cd…05ff at001d = ╱41╱A╱ // 0x5ea @0x1d
0x05cd…05ff at001e = ╱4c╱L╱ // 0x5eb @0x1e
0x05cd…05ff at001f = ╱39╱9╱ // 0x5ec @0x1f
0x05cd…05ff at0020 = ╱dc╱=╱ // 0x5ed @0x20
0x05cd…05ff at0021 = ╱4b╱K╱ // 0x5ee @0x21
0x05cd…05ff at0022 = ╱4f╱O╱ // 0x5ef @0x22
0x05cd…05ff at0023 = ╱4e╱N╱ // 0x5f0 @0x23
0x05cd…05ff at0024 = ╱54╱T╱ // 0x5f1 @0x24
0x05cd…05ff at0025 = ╱4e╱N╱ // 0x5f2 @0x25
0x05cd…05ff at0026 = ╱52╱R╱ // 0x5f3 @0x26
0x05cd…05ff at0027 = ╱e7╱ DIV ╱ // 0x5f4 @0x27
0x05cd…05ff at0028 = ╱31╱1╱ // 0x5f5 @0x28
0x05cd…05ff at0029 = ╱30╱0╱ // 0x5f6 @0x29
0x05cd…05ff at002a = ╱30╱0╱ // 0x5f7 @0x2a
0x05cd…05ff at002b = ╱30╱0╱ // 0x5f8 @0x2b
0x05cd…05ff at002c = ╱fe0000fa0a╱ // 0x5f9 @0x2c
0x05cd…05ff at0031 = EOL // 0x5fe @0x31
0x05cd…05ff }
0x05ff…0610 9367 0360 KODE2=0
0x05ff…0610 LineComalBin {
0x05ff…0610 ptr = 0x9367 // 0x5ff @0x0
0x05ff…0610 lno = 0x0168 // 0x601 @0x2
0x05ff…0610 at0004 = ╱4b╱K╱ // 0x603 @0x4
0x05ff…0610 at0005 = ╱4f╱O╱ // 0x604 @0x5
0x05ff…0610 at0006 = ╱44╱D╱ // 0x605 @0x6
0x05ff…0610 at0007 = ╱45╱E╱ // 0x606 @0x7
0x05ff…0610 at0008 = ╱32╱2╱ // 0x607 @0x8
0x05ff…0610 at0009 = ╱dc╱=╱ // 0x608 @0x9
0x05ff…0610 at000a = ╱30╱0╱ // 0x609 @0xa
0x05ff…0610 at000b = ╱fe00000000╱ // 0x60a @0xb
0x05ff…0610 at0010 = EOL // 0x60f @0x10
0x05ff…0610 }
0x0610…0620 9377 0370 IF KTAL=DTAL THEN
0x0610…0620 LineComalBin {
0x0610…0620 ptr = 0x9377 // 0x610 @0x0
0x0610…0620 lno = 0x0172 // 0x612 @0x2
0x0610…0620 at0004 = ╱9c╱ IF ╱ // 0x614 @0x4
0x0610…0620 at0005 = ╱4b╱K╱ // 0x615 @0x5
0x0610…0620 at0006 = ╱54╱T╱ // 0x616 @0x6
0x0610…0620 at0007 = ╱41╱A╱ // 0x617 @0x7
0x0610…0620 at0008 = ╱4c╱L╱ // 0x618 @0x8
0x0610…0620 at0009 = ╱dc╱=╱ // 0x619 @0x9
0x0610…0620 at000a = ╱44╱D╱ // 0x61a @0xa
0x0610…0620 at000b = ╱54╱T╱ // 0x61b @0xb
0x0610…0620 at000c = ╱41╱A╱ // 0x61c @0xc
0x0610…0620 at000d = ╱4c╱L╱ // 0x61d @0xd
0x0610…0620 at000e = ╱b6╱ THEN ╱ // 0x61e @0xe
0x0610…0620 at000f = EOL // 0x61f @0xf
0x0610…0620 }
0x0620…0654 93ab 0380 EXEC FINDPOST1(DTAB1,DTAB,MDANTAL,KONTNR,DPIL3,K3$)
0x0620…0654 LineComalBin {
0x0620…0654 ptr = 0x93ab // 0x620 @0x0
0x0620…0654 lno = 0x017c // 0x622 @0x2
0x0620…0654 at0004 = ╱9d╱ EXEC ╱ // 0x624 @0x4
0x0620…0654 at0005 = ╱46╱F╱ // 0x625 @0x5
0x0620…0654 at0006 = ╱49╱I╱ // 0x626 @0x6
0x0620…0654 at0007 = ╱4e╱N╱ // 0x627 @0x7
0x0620…0654 at0008 = ╱44╱D╱ // 0x628 @0x8
0x0620…0654 at0009 = ╱50╱P╱ // 0x629 @0x9
0x0620…0654 at000a = ╱4f╱O╱ // 0x62a @0xa
0x0620…0654 at000b = ╱53╱S╱ // 0x62b @0xb
0x0620…0654 at000c = ╱54╱T╱ // 0x62c @0xc
0x0620…0654 at000d = ╱31╱1╱ // 0x62d @0xd
0x0620…0654 at000e = ╱ed╱(╱ // 0x62e @0xe
0x0620…0654 at000f = ╱44╱D╱ // 0x62f @0xf
0x0620…0654 at0010 = ╱54╱T╱ // 0x630 @0x10
0x0620…0654 at0011 = ╱41╱A╱ // 0x631 @0x11
0x0620…0654 at0012 = ╱42╱B╱ // 0x632 @0x12
0x0620…0654 at0013 = ╱31╱1╱ // 0x633 @0x13
0x0620…0654 at0014 = ╱ec╱,╱ // 0x634 @0x14
0x0620…0654 at0015 = ╱44╱D╱ // 0x635 @0x15
0x0620…0654 at0016 = ╱54╱T╱ // 0x636 @0x16
0x0620…0654 at0017 = ╱41╱A╱ // 0x637 @0x17
0x0620…0654 at0018 = ╱42╱B╱ // 0x638 @0x18
0x0620…0654 at0019 = ╱ec╱,╱ // 0x639 @0x19
0x0620…0654 at001a = ╱4d╱M╱ // 0x63a @0x1a
0x0620…0654 at001b = ╱44╱D╱ // 0x63b @0x1b
0x0620…0654 at001c = ╱41╱A╱ // 0x63c @0x1c
0x0620…0654 at001d = ╱4e╱N╱ // 0x63d @0x1d
0x0620…0654 at001e = ╱54╱T╱ // 0x63e @0x1e
0x0620…0654 at001f = ╱41╱A╱ // 0x63f @0x1f
0x0620…0654 at0020 = ╱4c╱L╱ // 0x640 @0x20
0x0620…0654 at0021 = ╱ec╱,╱ // 0x641 @0x21
0x0620…0654 at0022 = ╱4b╱K╱ // 0x642 @0x22
0x0620…0654 at0023 = ╱4f╱O╱ // 0x643 @0x23
0x0620…0654 at0024 = ╱4e╱N╱ // 0x644 @0x24
0x0620…0654 at0025 = ╱54╱T╱ // 0x645 @0x25
0x0620…0654 at0026 = ╱4e╱N╱ // 0x646 @0x26
0x0620…0654 at0027 = ╱52╱R╱ // 0x647 @0x27
0x0620…0654 at0028 = ╱ec╱,╱ // 0x648 @0x28
0x0620…0654 at0029 = ╱44╱D╱ // 0x649 @0x29
0x0620…0654 at002a = ╱50╱P╱ // 0x64a @0x2a
0x0620…0654 at002b = ╱49╱I╱ // 0x64b @0x2b
0x0620…0654 at002c = ╱4c╱L╱ // 0x64c @0x2c
0x0620…0654 at002d = ╱33╱3╱ // 0x64d @0x2d
0x0620…0654 at002e = ╱ec╱,╱ // 0x64e @0x2e
0x0620…0654 at002f = ╱4b╱K╱ // 0x64f @0x2f
0x0620…0654 at0030 = ╱33╱3╱ // 0x650 @0x30
0x0620…0654 at0031 = ╱ef╱$╱ // 0x651 @0x31
0x0620…0654 at0032 = ╱ee╱)╱ // 0x652 @0x32
0x0620…0654 at0033 = EOL // 0x653 @0x33
0x0620…0654 }
0x0654…0665 93bc 0390 DEBNR=KONTNR
0x0654…0665 LineComalBin {
0x0654…0665 ptr = 0x93bc // 0x654 @0x0
0x0654…0665 lno = 0x0186 // 0x656 @0x2
0x0654…0665 at0004 = ╱44╱D╱ // 0x658 @0x4
0x0654…0665 at0005 = ╱45╱E╱ // 0x659 @0x5
0x0654…0665 at0006 = ╱42╱B╱ // 0x65a @0x6
0x0654…0665 at0007 = ╱4e╱N╱ // 0x65b @0x7
0x0654…0665 at0008 = ╱52╱R╱ // 0x65c @0x8
0x0654…0665 at0009 = ╱dc╱=╱ // 0x65d @0x9
0x0654…0665 at000a = ╱4b╱K╱ // 0x65e @0xa
0x0654…0665 at000b = ╱4f╱O╱ // 0x65f @0xb
0x0654…0665 at000c = ╱4e╱N╱ // 0x660 @0xc
0x0654…0665 at000d = ╱54╱T╱ // 0x661 @0xd
0x0654…0665 at000e = ╱4e╱N╱ // 0x662 @0xe
0x0654…0665 at000f = ╱52╱R╱ // 0x663 @0xf
0x0654…0665 at0010 = EOL // 0x664 @0x10
0x0654…0665 }
0x0665…0678 93cf 0400 IF CEKS=1 THEN STOP
0x0665…0678 LineComalBin {
0x0665…0678 ptr = 0x93cf // 0x665 @0x0
0x0665…0678 lno = 0x0190 // 0x667 @0x2
0x0665…0678 at0004 = ╱82╱ IF ╱ // 0x669 @0x4
0x0665…0678 at0005 = ╱43╱C╱ // 0x66a @0x5
0x0665…0678 at0006 = ╱45╱E╱ // 0x66b @0x6
0x0665…0678 at0007 = ╱4b╱K╱ // 0x66c @0x7
0x0665…0678 at0008 = ╱53╱S╱ // 0x66d @0x8
0x0665…0678 at0009 = ╱dc╱=╱ // 0x66e @0x9
0x0665…0678 at000a = ╱31╱1╱ // 0x66f @0xa
0x0665…0678 at000b = ╱fe00008001╱ // 0x670 @0xb
0x0665…0678 at0010 = ╱b6╱ THEN ╱ // 0x675 @0x10
0x0665…0678 at0011 = ╱8d╱ STOP ╱ // 0x676 @0x11
0x0665…0678 at0012 = EOL // 0x677 @0x12
0x0665…0678 }
0x0678…0687 93de 0410 EXEC HENTDPOST
0x0678…0687 LineComalBin {
0x0678…0687 ptr = 0x93de // 0x678 @0x0
0x0678…0687 lno = 0x019a // 0x67a @0x2
0x0678…0687 at0004 = ╱9d╱ EXEC ╱ // 0x67c @0x4
0x0678…0687 at0005 = ╱48╱H╱ // 0x67d @0x5
0x0678…0687 at0006 = ╱45╱E╱ // 0x67e @0x6
0x0678…0687 at0007 = ╱4e╱N╱ // 0x67f @0x7
0x0678…0687 at0008 = ╱54╱T╱ // 0x680 @0x8
0x0678…0687 at0009 = ╱44╱D╱ // 0x681 @0x9
0x0678…0687 at000a = ╱50╱P╱ // 0x682 @0xa
0x0678…0687 at000b = ╱4f╱O╱ // 0x683 @0xb
0x0678…0687 at000c = ╱53╱S╱ // 0x684 @0xc
0x0678…0687 at000d = ╱54╱T╱ // 0x685 @0xd
0x0678…0687 at000e = EOL // 0x686 @0xe
0x0678…0687 }
0x0687…06ae 9405 0420 INDEX=INT(ORD(DEBKGR$)-48)*2
0x0687…06ae LineComalBin {
0x0687…06ae ptr = 0x9405 // 0x687 @0x0
0x0687…06ae lno = 0x01a4 // 0x689 @0x2
0x0687…06ae at0004 = ╱49╱I╱ // 0x68b @0x4
0x0687…06ae at0005 = ╱4e╱N╱ // 0x68c @0x5
0x0687…06ae at0006 = ╱44╱D╱ // 0x68d @0x6
0x0687…06ae at0007 = ╱45╱E╱ // 0x68e @0x7
0x0687…06ae at0008 = ╱58╱X╱ // 0x68f @0x8
0x0687…06ae at0009 = ╱dc╱=╱ // 0x690 @0x9
0x0687…06ae at000a = ╱c6╱INT╱ // 0x691 @0xa
0x0687…06ae at000b = ╱ed╱(╱ // 0x692 @0xb
0x0687…06ae at000c = ╱cd╱ORD╱ // 0x693 @0xc
0x0687…06ae at000d = ╱ed╱(╱ // 0x694 @0xd
0x0687…06ae at000e = ╱44╱D╱ // 0x695 @0xe
0x0687…06ae at000f = ╱45╱E╱ // 0x696 @0xf
0x0687…06ae at0010 = ╱42╱B╱ // 0x697 @0x10
0x0687…06ae at0011 = ╱4b╱K╱ // 0x698 @0x11
0x0687…06ae at0012 = ╱47╱G╱ // 0x699 @0x12
0x0687…06ae at0013 = ╱52╱R╱ // 0x69a @0x13
0x0687…06ae at0014 = ╱ef╱$╱ // 0x69b @0x14
0x0687…06ae at0015 = ╱ee╱)╱ // 0x69c @0x15
0x0687…06ae at0016 = ╱e3╱-╱ // 0x69d @0x16
0x0687…06ae at0017 = ╱34╱4╱ // 0x69e @0x17
0x0687…06ae at0018 = ╱38╱8╱ // 0x69f @0x18
0x0687…06ae at0019 = ╱fe0000c006╱ // 0x6a0 @0x19
0x0687…06ae at001e = ╱ee╱)╱ // 0x6a5 @0x1e
0x0687…06ae at001f = ╱e4╱*╱ // 0x6a6 @0x1f
0x0687…06ae at0020 = ╱32╱2╱ // 0x6a7 @0x20
0x0687…06ae at0021 = ╱fe00008002╱ // 0x6a8 @0x21
0x0687…06ae at0026 = EOL // 0x6ad @0x26
0x0687…06ae }
0x06ae…06bb 9412 0430 B8$=BE2$
0x06ae…06bb LineComalBin {
0x06ae…06bb ptr = 0x9412 // 0x6ae @0x0
0x06ae…06bb lno = 0x01ae // 0x6b0 @0x2
0x06ae…06bb at0004 = ╱42╱B╱ // 0x6b2 @0x4
0x06ae…06bb at0005 = ╱38╱8╱ // 0x6b3 @0x5
0x06ae…06bb at0006 = ╱ef╱$╱ // 0x6b4 @0x6
0x06ae…06bb at0007 = ╱dc╱=╱ // 0x6b5 @0x7
0x06ae…06bb at0008 = ╱42╱B╱ // 0x6b6 @0x8
0x06ae…06bb at0009 = ╱45╱E╱ // 0x6b7 @0x9
0x06ae…06bb at000a = ╱32╱2╱ // 0x6b8 @0xa
0x06ae…06bb at000b = ╱ef╱$╱ // 0x6b9 @0xb
0x06ae…06bb at000c = EOL // 0x6ba @0xc
0x06ae…06bb }
0x06bb…06d1 9428 0440 IF B8$(LEN(B8$))="-" THEN
0x06bb…06d1 LineComalBin {
0x06bb…06d1 ptr = 0x9428 // 0x6bb @0x0
0x06bb…06d1 lno = 0x01b8 // 0x6bd @0x2
0x06bb…06d1 at0004 = ╱9c╱ IF ╱ // 0x6bf @0x4
0x06bb…06d1 at0005 = ╱42╱B╱ // 0x6c0 @0x5
0x06bb…06d1 at0006 = ╱38╱8╱ // 0x6c1 @0x6
0x06bb…06d1 at0007 = ╱ef╱$╱ // 0x6c2 @0x7
0x06bb…06d1 at0008 = ╱ed╱(╱ // 0x6c3 @0x8
0x06bb…06d1 at0009 = ╱cc╱LEN╱ // 0x6c4 @0x9
0x06bb…06d1 at000a = ╱ed╱(╱ // 0x6c5 @0xa
0x06bb…06d1 at000b = ╱42╱B╱ // 0x6c6 @0xb
0x06bb…06d1 at000c = ╱38╱8╱ // 0x6c7 @0xc
0x06bb…06d1 at000d = ╱ef╱$╱ // 0x6c8 @0xd
0x06bb…06d1 at000e = ╱ee╱)╱ // 0x6c9 @0xe
0x06bb…06d1 at000f = ╱ee╱)╱ // 0x6ca @0xf
0x06bb…06d1 at0010 = ╱dc╱=╱ // 0x6cb @0x10
0x06bb…06d1 at0011 = ╱22╱"╱ // 0x6cc @0x11
0x06bb…06d1 at0012 = ╱2d╱-╱ // 0x6cd @0x12
0x06bb…06d1 at0013 = ╱22╱"╱ // 0x6ce @0x13
0x06bb…06d1 at0014 = ╱b6╱ THEN ╱ // 0x6cf @0x14
0x06bb…06d1 at0015 = EOL // 0x6d0 @0x15
0x06bb…06d1 }
0x06d1…06ff 9456 0450 EXEC CALC(0,KGR$(INDEX),B8$,KGR$(INDEX))
0x06d1…06ff LineComalBin {
0x06d1…06ff ptr = 0x9456 // 0x6d1 @0x0
0x06d1…06ff lno = 0x01c2 // 0x6d3 @0x2
0x06d1…06ff at0004 = ╱9d╱ EXEC ╱ // 0x6d5 @0x4
0x06d1…06ff at0005 = ╱43╱C╱ // 0x6d6 @0x5
0x06d1…06ff at0006 = ╱41╱A╱ // 0x6d7 @0x6
0x06d1…06ff at0007 = ╱4c╱L╱ // 0x6d8 @0x7
0x06d1…06ff at0008 = ╱43╱C╱ // 0x6d9 @0x8
0x06d1…06ff at0009 = ╱ed╱(╱ // 0x6da @0x9
0x06d1…06ff at000a = ╱30╱0╱ // 0x6db @0xa
0x06d1…06ff at000b = ╱fe00000000╱ // 0x6dc @0xb
0x06d1…06ff at0010 = ╱ec╱,╱ // 0x6e1 @0x10
0x06d1…06ff at0011 = ╱4b╱K╱ // 0x6e2 @0x11
0x06d1…06ff at0012 = ╱47╱G╱ // 0x6e3 @0x12
0x06d1…06ff at0013 = ╱52╱R╱ // 0x6e4 @0x13
0x06d1…06ff at0014 = ╱ef╱$╱ // 0x6e5 @0x14
0x06d1…06ff at0015 = ╱ed╱(╱ // 0x6e6 @0x15
0x06d1…06ff at0016 = ╱49╱I╱ // 0x6e7 @0x16
0x06d1…06ff at0017 = ╱4e╱N╱ // 0x6e8 @0x17
0x06d1…06ff at0018 = ╱44╱D╱ // 0x6e9 @0x18
0x06d1…06ff at0019 = ╱45╱E╱ // 0x6ea @0x19
0x06d1…06ff at001a = ╱58╱X╱ // 0x6eb @0x1a
0x06d1…06ff at001b = ╱ee╱)╱ // 0x6ec @0x1b
0x06d1…06ff at001c = ╱ec╱,╱ // 0x6ed @0x1c
0x06d1…06ff at001d = ╱42╱B╱ // 0x6ee @0x1d
0x06d1…06ff at001e = ╱38╱8╱ // 0x6ef @0x1e
0x06d1…06ff at001f = ╱ef╱$╱ // 0x6f0 @0x1f
0x06d1…06ff at0020 = ╱ec╱,╱ // 0x6f1 @0x20
0x06d1…06ff at0021 = ╱4b╱K╱ // 0x6f2 @0x21
0x06d1…06ff at0022 = ╱47╱G╱ // 0x6f3 @0x22
0x06d1…06ff at0023 = ╱52╱R╱ // 0x6f4 @0x23
0x06d1…06ff at0024 = ╱ef╱$╱ // 0x6f5 @0x24
0x06d1…06ff at0025 = ╱ed╱(╱ // 0x6f6 @0x25
0x06d1…06ff at0026 = ╱49╱I╱ // 0x6f7 @0x26
0x06d1…06ff at0027 = ╱4e╱N╱ // 0x6f8 @0x27
0x06d1…06ff at0028 = ╱44╱D╱ // 0x6f9 @0x28
0x06d1…06ff at0029 = ╱45╱E╱ // 0x6fa @0x29
0x06d1…06ff at002a = ╱58╱X╱ // 0x6fb @0x2a
0x06d1…06ff at002b = ╱ee╱)╱ // 0x6fc @0x2b
0x06d1…06ff at002c = ╱ee╱)╱ // 0x6fd @0x2c
0x06d1…06ff at002d = EOL // 0x6fe @0x2d
0x06d1…06ff }
0x06ff…071b 9472 0460 EXEC NEDSKRIV(B8$,DSALDO4$)
0x06ff…071b LineComalBin {
0x06ff…071b ptr = 0x9472 // 0x6ff @0x0
0x06ff…071b lno = 0x01cc // 0x701 @0x2
0x06ff…071b at0004 = ╱9d╱ EXEC ╱ // 0x703 @0x4
0x06ff…071b at0005 = ╱4e╱N╱ // 0x704 @0x5
0x06ff…071b at0006 = ╱45╱E╱ // 0x705 @0x6
0x06ff…071b at0007 = ╱44╱D╱ // 0x706 @0x7
0x06ff…071b at0008 = ╱53╱S╱ // 0x707 @0x8
0x06ff…071b at0009 = ╱4b╱K╱ // 0x708 @0x9
0x06ff…071b at000a = ╱52╱R╱ // 0x709 @0xa
0x06ff…071b at000b = ╱49╱I╱ // 0x70a @0xb
0x06ff…071b at000c = ╱56╱V╱ // 0x70b @0xc
0x06ff…071b at000d = ╱ed╱(╱ // 0x70c @0xd
0x06ff…071b at000e = ╱42╱B╱ // 0x70d @0xe
0x06ff…071b at000f = ╱38╱8╱ // 0x70e @0xf
0x06ff…071b at0010 = ╱ef╱$╱ // 0x70f @0x10
0x06ff…071b at0011 = ╱ec╱,╱ // 0x710 @0x11
0x06ff…071b at0012 = ╱44╱D╱ // 0x711 @0x12
0x06ff…071b at0013 = ╱53╱S╱ // 0x712 @0x13
0x06ff…071b at0014 = ╱41╱A╱ // 0x713 @0x14
0x06ff…071b at0015 = ╱4c╱L╱ // 0x714 @0x15
0x06ff…071b at0016 = ╱44╱D╱ // 0x715 @0x16
0x06ff…071b at0017 = ╱4f╱O╱ // 0x716 @0x17
0x06ff…071b at0018 = ╱34╱4╱ // 0x717 @0x18
0x06ff…071b at0019 = ╱ef╱$╱ // 0x718 @0x19
0x06ff…071b at001a = ╱ee╱)╱ // 0x719 @0x1a
0x06ff…071b at001b = EOL // 0x71a @0x1b
0x06ff…071b }
0x071b…0737 948e 0470 EXEC NEDSKRIV(B8$,DSALDO3$)
0x071b…0737 LineComalBin {
0x071b…0737 ptr = 0x948e // 0x71b @0x0
0x071b…0737 lno = 0x01d6 // 0x71d @0x2
0x071b…0737 at0004 = ╱9d╱ EXEC ╱ // 0x71f @0x4
0x071b…0737 at0005 = ╱4e╱N╱ // 0x720 @0x5
0x071b…0737 at0006 = ╱45╱E╱ // 0x721 @0x6
0x071b…0737 at0007 = ╱44╱D╱ // 0x722 @0x7
0x071b…0737 at0008 = ╱53╱S╱ // 0x723 @0x8
0x071b…0737 at0009 = ╱4b╱K╱ // 0x724 @0x9
0x071b…0737 at000a = ╱52╱R╱ // 0x725 @0xa
0x071b…0737 at000b = ╱49╱I╱ // 0x726 @0xb
0x071b…0737 at000c = ╱56╱V╱ // 0x727 @0xc
0x071b…0737 at000d = ╱ed╱(╱ // 0x728 @0xd
0x071b…0737 at000e = ╱42╱B╱ // 0x729 @0xe
0x071b…0737 at000f = ╱38╱8╱ // 0x72a @0xf
0x071b…0737 at0010 = ╱ef╱$╱ // 0x72b @0x10
0x071b…0737 at0011 = ╱ec╱,╱ // 0x72c @0x11
0x071b…0737 at0012 = ╱44╱D╱ // 0x72d @0x12
0x071b…0737 at0013 = ╱53╱S╱ // 0x72e @0x13
0x071b…0737 at0014 = ╱41╱A╱ // 0x72f @0x14
0x071b…0737 at0015 = ╱4c╱L╱ // 0x730 @0x15
0x071b…0737 at0016 = ╱44╱D╱ // 0x731 @0x16
0x071b…0737 at0017 = ╱4f╱O╱ // 0x732 @0x17
0x071b…0737 at0018 = ╱33╱3╱ // 0x733 @0x18
0x071b…0737 at0019 = ╱ef╱$╱ // 0x734 @0x19
0x071b…0737 at001a = ╱ee╱)╱ // 0x735 @0x1a
0x071b…0737 at001b = EOL // 0x736 @0x1b
0x071b…0737 }
0x0737…0753 94aa 0480 EXEC NEDSKRIV(B8$,DSALDO2$)
0x0737…0753 LineComalBin {
0x0737…0753 ptr = 0x94aa // 0x737 @0x0
0x0737…0753 lno = 0x01e0 // 0x739 @0x2
0x0737…0753 at0004 = ╱9d╱ EXEC ╱ // 0x73b @0x4
0x0737…0753 at0005 = ╱4e╱N╱ // 0x73c @0x5
0x0737…0753 at0006 = ╱45╱E╱ // 0x73d @0x6
0x0737…0753 at0007 = ╱44╱D╱ // 0x73e @0x7
0x0737…0753 at0008 = ╱53╱S╱ // 0x73f @0x8
0x0737…0753 at0009 = ╱4b╱K╱ // 0x740 @0x9
0x0737…0753 at000a = ╱52╱R╱ // 0x741 @0xa
0x0737…0753 at000b = ╱49╱I╱ // 0x742 @0xb
0x0737…0753 at000c = ╱56╱V╱ // 0x743 @0xc
0x0737…0753 at000d = ╱ed╱(╱ // 0x744 @0xd
0x0737…0753 at000e = ╱42╱B╱ // 0x745 @0xe
0x0737…0753 at000f = ╱38╱8╱ // 0x746 @0xf
0x0737…0753 at0010 = ╱ef╱$╱ // 0x747 @0x10
0x0737…0753 at0011 = ╱ec╱,╱ // 0x748 @0x11
0x0737…0753 at0012 = ╱44╱D╱ // 0x749 @0x12
0x0737…0753 at0013 = ╱53╱S╱ // 0x74a @0x13
0x0737…0753 at0014 = ╱41╱A╱ // 0x74b @0x14
0x0737…0753 at0015 = ╱4c╱L╱ // 0x74c @0x15
0x0737…0753 at0016 = ╱44╱D╱ // 0x74d @0x16
0x0737…0753 at0017 = ╱4f╱O╱ // 0x74e @0x17
0x0737…0753 at0018 = ╱32╱2╱ // 0x74f @0x18
0x0737…0753 at0019 = ╱ef╱$╱ // 0x750 @0x19
0x0737…0753 at001a = ╱ee╱)╱ // 0x751 @0x1a
0x0737…0753 at001b = EOL // 0x752 @0x1b
0x0737…0753 }
0x0753…076f 94c6 0490 EXEC NEDSKRIV(B8$,DSALDO1$)
0x0753…076f LineComalBin {
0x0753…076f ptr = 0x94c6 // 0x753 @0x0
0x0753…076f lno = 0x01ea // 0x755 @0x2
0x0753…076f at0004 = ╱9d╱ EXEC ╱ // 0x757 @0x4
0x0753…076f at0005 = ╱4e╱N╱ // 0x758 @0x5
0x0753…076f at0006 = ╱45╱E╱ // 0x759 @0x6
0x0753…076f at0007 = ╱44╱D╱ // 0x75a @0x7
0x0753…076f at0008 = ╱53╱S╱ // 0x75b @0x8
0x0753…076f at0009 = ╱4b╱K╱ // 0x75c @0x9
0x0753…076f at000a = ╱52╱R╱ // 0x75d @0xa
0x0753…076f at000b = ╱49╱I╱ // 0x75e @0xb
0x0753…076f at000c = ╱56╱V╱ // 0x75f @0xc
0x0753…076f at000d = ╱ed╱(╱ // 0x760 @0xd
0x0753…076f at000e = ╱42╱B╱ // 0x761 @0xe
0x0753…076f at000f = ╱38╱8╱ // 0x762 @0xf
0x0753…076f at0010 = ╱ef╱$╱ // 0x763 @0x10
0x0753…076f at0011 = ╱ec╱,╱ // 0x764 @0x11
0x0753…076f at0012 = ╱44╱D╱ // 0x765 @0x12
0x0753…076f at0013 = ╱53╱S╱ // 0x766 @0x13
0x0753…076f at0014 = ╱41╱A╱ // 0x767 @0x14
0x0753…076f at0015 = ╱4c╱L╱ // 0x768 @0x15
0x0753…076f at0016 = ╱44╱D╱ // 0x769 @0x16
0x0753…076f at0017 = ╱4f╱O╱ // 0x76a @0x17
0x0753…076f at0018 = ╱31╱1╱ // 0x76b @0x18
0x0753…076f at0019 = ╱ef╱$╱ // 0x76c @0x19
0x0753…076f at001a = ╱ee╱)╱ // 0x76d @0x1a
0x0753…076f at001b = EOL // 0x76e @0x1b
0x0753…076f }
0x076f…0775 94cc 0500 ELSE
0x076f…0775 LineComalBin {
0x076f…0775 ptr = 0x94cc // 0x76f @0x0
0x076f…0775 lno = 0x01f4 // 0x771 @0x2
0x076f…0775 at0004 = ╱9a╱ ELSE ╱ // 0x773 @0x4
0x076f…0775 at0005 = EOL // 0x774 @0x5
0x076f…0775 }
0x0775…07b1 9508 0510 EXEC CALC(0,KGR$(INDEX-1),B8$,KGR$(INDEX-1))
0x0775…07b1 LineComalBin {
0x0775…07b1 ptr = 0x9508 // 0x775 @0x0
0x0775…07b1 lno = 0x01fe // 0x777 @0x2
0x0775…07b1 at0004 = ╱9d╱ EXEC ╱ // 0x779 @0x4
0x0775…07b1 at0005 = ╱43╱C╱ // 0x77a @0x5
0x0775…07b1 at0006 = ╱41╱A╱ // 0x77b @0x6
0x0775…07b1 at0007 = ╱4c╱L╱ // 0x77c @0x7
0x0775…07b1 at0008 = ╱43╱C╱ // 0x77d @0x8
0x0775…07b1 at0009 = ╱ed╱(╱ // 0x77e @0x9
0x0775…07b1 at000a = ╱30╱0╱ // 0x77f @0xa
0x0775…07b1 at000b = ╱fe00000000╱ // 0x780 @0xb
0x0775…07b1 at0010 = ╱ec╱,╱ // 0x785 @0x10
0x0775…07b1 at0011 = ╱4b╱K╱ // 0x786 @0x11
0x0775…07b1 at0012 = ╱47╱G╱ // 0x787 @0x12
0x0775…07b1 at0013 = ╱52╱R╱ // 0x788 @0x13
0x0775…07b1 at0014 = ╱ef╱$╱ // 0x789 @0x14
0x0775…07b1 at0015 = ╱ed╱(╱ // 0x78a @0x15
0x0775…07b1 at0016 = ╱49╱I╱ // 0x78b @0x16
0x0775…07b1 at0017 = ╱4e╱N╱ // 0x78c @0x17
0x0775…07b1 at0018 = ╱44╱D╱ // 0x78d @0x18
0x0775…07b1 at0019 = ╱45╱E╱ // 0x78e @0x19
0x0775…07b1 at001a = ╱58╱X╱ // 0x78f @0x1a
0x0775…07b1 at001b = ╱e3╱-╱ // 0x790 @0x1b
0x0775…07b1 at001c = ╱31╱1╱ // 0x791 @0x1c
0x0775…07b1 at001d = ╱fe00008001╱ // 0x792 @0x1d
0x0775…07b1 at0022 = ╱ee╱)╱ // 0x797 @0x22
0x0775…07b1 at0023 = ╱ec╱,╱ // 0x798 @0x23
0x0775…07b1 at0024 = ╱42╱B╱ // 0x799 @0x24
0x0775…07b1 at0025 = ╱38╱8╱ // 0x79a @0x25
0x0775…07b1 at0026 = ╱ef╱$╱ // 0x79b @0x26
0x0775…07b1 at0027 = ╱ec╱,╱ // 0x79c @0x27
0x0775…07b1 at0028 = ╱4b╱K╱ // 0x79d @0x28
0x0775…07b1 at0029 = ╱47╱G╱ // 0x79e @0x29
0x0775…07b1 at002a = ╱52╱R╱ // 0x79f @0x2a
0x0775…07b1 at002b = ╱ef╱$╱ // 0x7a0 @0x2b
0x0775…07b1 at002c = ╱ed╱(╱ // 0x7a1 @0x2c
0x0775…07b1 at002d = ╱49╱I╱ // 0x7a2 @0x2d
0x0775…07b1 at002e = ╱4e╱N╱ // 0x7a3 @0x2e
0x0775…07b1 at002f = ╱44╱D╱ // 0x7a4 @0x2f
0x0775…07b1 at0030 = ╱45╱E╱ // 0x7a5 @0x30
0x0775…07b1 at0031 = ╱58╱X╱ // 0x7a6 @0x31
0x0775…07b1 at0032 = ╱e3╱-╱ // 0x7a7 @0x32
0x0775…07b1 at0033 = ╱31╱1╱ // 0x7a8 @0x33
0x0775…07b1 at0034 = ╱fe00008001╱ // 0x7a9 @0x34
0x0775…07b1 at0039 = ╱ee╱)╱ // 0x7ae @0x39
0x0775…07b1 at003a = ╱ee╱)╱ // 0x7af @0x3a
0x0775…07b1 at003b = EOL // 0x7b0 @0x3b
0x0775…07b1 }
0x07b1…07b7 950e 0520 ENDIF
0x07b1…07b7 LineComalBin {
0x07b1…07b7 ptr = 0x950e // 0x7b1 @0x0
0x07b1…07b7 lno = 0x0208 // 0x7b3 @0x2
0x07b1…07b7 at0004 = ╱9b╱ ENDIF ╱ // 0x7b5 @0x4
0x07b1…07b7 at0005 = EOL // 0x7b6 @0x5
0x07b1…07b7 }
0x07b7…07df 9536 0530 EXEC CALC(0,DSALDO1$,B8$,DSALDO1$)
0x07b7…07df LineComalBin {
0x07b7…07df ptr = 0x9536 // 0x7b7 @0x0
0x07b7…07df lno = 0x0212 // 0x7b9 @0x2
0x07b7…07df at0004 = ╱9d╱ EXEC ╱ // 0x7bb @0x4
0x07b7…07df at0005 = ╱43╱C╱ // 0x7bc @0x5
0x07b7…07df at0006 = ╱41╱A╱ // 0x7bd @0x6
0x07b7…07df at0007 = ╱4c╱L╱ // 0x7be @0x7
0x07b7…07df at0008 = ╱43╱C╱ // 0x7bf @0x8
0x07b7…07df at0009 = ╱ed╱(╱ // 0x7c0 @0x9
0x07b7…07df at000a = ╱30╱0╱ // 0x7c1 @0xa
0x07b7…07df at000b = ╱fe00000000╱ // 0x7c2 @0xb
0x07b7…07df at0010 = ╱ec╱,╱ // 0x7c7 @0x10
0x07b7…07df at0011 = ╱44╱D╱ // 0x7c8 @0x11
0x07b7…07df at0012 = ╱53╱S╱ // 0x7c9 @0x12
0x07b7…07df at0013 = ╱41╱A╱ // 0x7ca @0x13
0x07b7…07df at0014 = ╱4c╱L╱ // 0x7cb @0x14
0x07b7…07df at0015 = ╱44╱D╱ // 0x7cc @0x15
0x07b7…07df at0016 = ╱4f╱O╱ // 0x7cd @0x16
0x07b7…07df at0017 = ╱31╱1╱ // 0x7ce @0x17
0x07b7…07df at0018 = ╱ef╱$╱ // 0x7cf @0x18
0x07b7…07df at0019 = ╱ec╱,╱ // 0x7d0 @0x19
0x07b7…07df at001a = ╱42╱B╱ // 0x7d1 @0x1a
0x07b7…07df at001b = ╱38╱8╱ // 0x7d2 @0x1b
0x07b7…07df at001c = ╱ef╱$╱ // 0x7d3 @0x1c
0x07b7…07df at001d = ╱ec╱,╱ // 0x7d4 @0x1d
0x07b7…07df at001e = ╱44╱D╱ // 0x7d5 @0x1e
0x07b7…07df at001f = ╱53╱S╱ // 0x7d6 @0x1f
0x07b7…07df at0020 = ╱41╱A╱ // 0x7d7 @0x20
0x07b7…07df at0021 = ╱4c╱L╱ // 0x7d8 @0x21
0x07b7…07df at0022 = ╱44╱D╱ // 0x7d9 @0x22
0x07b7…07df at0023 = ╱4f╱O╱ // 0x7da @0x23
0x07b7…07df at0024 = ╱31╱1╱ // 0x7db @0x24
0x07b7…07df at0025 = ╱ef╱$╱ // 0x7dc @0x25
0x07b7…07df at0026 = ╱ee╱)╱ // 0x7dd @0x26
0x07b7…07df at0027 = EOL // 0x7de @0x27
0x07b7…07df }
0x07df…07ed 9544 0540 EXEC GEMDPOST
0x07df…07ed LineComalBin {
0x07df…07ed ptr = 0x9544 // 0x7df @0x0
0x07df…07ed lno = 0x021c // 0x7e1 @0x2
0x07df…07ed at0004 = ╱9d╱ EXEC ╱ // 0x7e3 @0x4
0x07df…07ed at0005 = ╱47╱G╱ // 0x7e4 @0x5
0x07df…07ed at0006 = ╱45╱E╱ // 0x7e5 @0x6
0x07df…07ed at0007 = ╱4d╱M╱ // 0x7e6 @0x7
0x07df…07ed at0008 = ╱44╱D╱ // 0x7e7 @0x8
0x07df…07ed at0009 = ╱50╱P╱ // 0x7e8 @0x9
0x07df…07ed at000a = ╱4f╱O╱ // 0x7e9 @0xa
0x07df…07ed at000b = ╱53╱S╱ // 0x7ea @0xb
0x07df…07ed at000c = ╱54╱T╱ // 0x7eb @0xc
0x07df…07ed at000d = EOL // 0x7ec @0xd
0x07df…07ed }
0x07ed…0812 9569 0550 EXEC GEMMID(DMIDNR,K10$,KONTNR,ENT1)
0x07ed…0812 LineComalBin {
0x07ed…0812 ptr = 0x9569 // 0x7ed @0x0
0x07ed…0812 lno = 0x0226 // 0x7ef @0x2
0x07ed…0812 at0004 = ╱9d╱ EXEC ╱ // 0x7f1 @0x4
0x07ed…0812 at0005 = ╱47╱G╱ // 0x7f2 @0x5
0x07ed…0812 at0006 = ╱45╱E╱ // 0x7f3 @0x6
0x07ed…0812 at0007 = ╱4d╱M╱ // 0x7f4 @0x7
0x07ed…0812 at0008 = ╱4d╱M╱ // 0x7f5 @0x8
0x07ed…0812 at0009 = ╱49╱I╱ // 0x7f6 @0x9
0x07ed…0812 at000a = ╱44╱D╱ // 0x7f7 @0xa
0x07ed…0812 at000b = ╱ed╱(╱ // 0x7f8 @0xb
0x07ed…0812 at000c = ╱44╱D╱ // 0x7f9 @0xc
0x07ed…0812 at000d = ╱4d╱M╱ // 0x7fa @0xd
0x07ed…0812 at000e = ╱49╱I╱ // 0x7fb @0xe
0x07ed…0812 at000f = ╱44╱D╱ // 0x7fc @0xf
0x07ed…0812 at0010 = ╱4e╱N╱ // 0x7fd @0x10
0x07ed…0812 at0011 = ╱52╱R╱ // 0x7fe @0x11
0x07ed…0812 at0012 = ╱ec╱,╱ // 0x7ff @0x12
0x07ed…0812 at0013 = ╱4b╱K╱ // 0x800 @0x13
0x07ed…0812 at0014 = ╱31╱1╱ // 0x801 @0x14
0x07ed…0812 at0015 = ╱30╱0╱ // 0x802 @0x15
0x07ed…0812 at0016 = ╱ef╱$╱ // 0x803 @0x16
0x07ed…0812 at0017 = ╱ec╱,╱ // 0x804 @0x17
0x07ed…0812 at0018 = ╱4b╱K╱ // 0x805 @0x18
0x07ed…0812 at0019 = ╱4f╱O╱ // 0x806 @0x19
0x07ed…0812 at001a = ╱4e╱N╱ // 0x807 @0x1a
0x07ed…0812 at001b = ╱54╱T╱ // 0x808 @0x1b
0x07ed…0812 at001c = ╱4e╱N╱ // 0x809 @0x1c
0x07ed…0812 at001d = ╱52╱R╱ // 0x80a @0x1d
0x07ed…0812 at001e = ╱ec╱,╱ // 0x80b @0x1e
0x07ed…0812 at001f = ╱45╱E╱ // 0x80c @0x1f
0x07ed…0812 at0020 = ╱4e╱N╱ // 0x80d @0x20
0x07ed…0812 at0021 = ╱54╱T╱ // 0x80e @0x21
0x07ed…0812 at0022 = ╱31╱1╱ // 0x80f @0x22
0x07ed…0812 at0023 = ╱ee╱)╱ // 0x810 @0x23
0x07ed…0812 at0024 = EOL // 0x811 @0x24
0x07ed…0812 }
0x0812…0818 956f 0560 ELSE
0x0812…0818 LineComalBin {
0x0812…0818 ptr = 0x956f // 0x812 @0x0
0x0812…0818 lno = 0x0230 // 0x814 @0x2
0x0812…0818 at0004 = ╱9a╱ ELSE ╱ // 0x816 @0x4
0x0812…0818 at0005 = EOL // 0x817 @0x5
0x0812…0818 }
0x0818…082a 9581 0570 IF KTAL9=KRTAL THEN
0x0818…082a LineComalBin {
0x0818…082a ptr = 0x9581 // 0x818 @0x0
0x0818…082a lno = 0x023a // 0x81a @0x2
0x0818…082a at0004 = ╱9c╱ IF ╱ // 0x81c @0x4
0x0818…082a at0005 = ╱4b╱K╱ // 0x81d @0x5
0x0818…082a at0006 = ╱54╱T╱ // 0x81e @0x6
0x0818…082a at0007 = ╱41╱A╱ // 0x81f @0x7
0x0818…082a at0008 = ╱4c╱L╱ // 0x820 @0x8
0x0818…082a at0009 = ╱39╱9╱ // 0x821 @0x9
0x0818…082a at000a = ╱dc╱=╱ // 0x822 @0xa
0x0818…082a at000b = ╱4b╱K╱ // 0x823 @0xb
0x0818…082a at000c = ╱52╱R╱ // 0x824 @0xc
0x0818…082a at000d = ╱54╱T╱ // 0x825 @0xd
0x0818…082a at000e = ╱41╱A╱ // 0x826 @0xe
0x0818…082a at000f = ╱4c╱L╱ // 0x827 @0xf
0x0818…082a at0010 = ╱b6╱ THEN ╱ // 0x828 @0x10
0x0818…082a at0011 = EOL // 0x829 @0x11
0x0818…082a }
0x082a…085e 95b5 0580 EXEC FINDPOST1(KTAB1,KTAB,MKANTAL,KONTNR,KPIL3,K4$)
0x082a…085e LineComalBin {
0x082a…085e ptr = 0x95b5 // 0x82a @0x0
0x082a…085e lno = 0x0244 // 0x82c @0x2
0x082a…085e at0004 = ╱9d╱ EXEC ╱ // 0x82e @0x4
0x082a…085e at0005 = ╱46╱F╱ // 0x82f @0x5
0x082a…085e at0006 = ╱49╱I╱ // 0x830 @0x6
0x082a…085e at0007 = ╱4e╱N╱ // 0x831 @0x7
0x082a…085e at0008 = ╱44╱D╱ // 0x832 @0x8
0x082a…085e at0009 = ╱50╱P╱ // 0x833 @0x9
0x082a…085e at000a = ╱4f╱O╱ // 0x834 @0xa
0x082a…085e at000b = ╱53╱S╱ // 0x835 @0xb
0x082a…085e at000c = ╱54╱T╱ // 0x836 @0xc
0x082a…085e at000d = ╱31╱1╱ // 0x837 @0xd
0x082a…085e at000e = ╱ed╱(╱ // 0x838 @0xe
0x082a…085e at000f = ╱4b╱K╱ // 0x839 @0xf
0x082a…085e at0010 = ╱54╱T╱ // 0x83a @0x10
0x082a…085e at0011 = ╱41╱A╱ // 0x83b @0x11
0x082a…085e at0012 = ╱42╱B╱ // 0x83c @0x12
0x082a…085e at0013 = ╱31╱1╱ // 0x83d @0x13
0x082a…085e at0014 = ╱ec╱,╱ // 0x83e @0x14
0x082a…085e at0015 = ╱4b╱K╱ // 0x83f @0x15
0x082a…085e at0016 = ╱54╱T╱ // 0x840 @0x16
0x082a…085e at0017 = ╱41╱A╱ // 0x841 @0x17
0x082a…085e at0018 = ╱42╱B╱ // 0x842 @0x18
0x082a…085e at0019 = ╱ec╱,╱ // 0x843 @0x19
0x082a…085e at001a = ╱4d╱M╱ // 0x844 @0x1a
0x082a…085e at001b = ╱4b╱K╱ // 0x845 @0x1b
0x082a…085e at001c = ╱41╱A╱ // 0x846 @0x1c
0x082a…085e at001d = ╱4e╱N╱ // 0x847 @0x1d
0x082a…085e at001e = ╱54╱T╱ // 0x848 @0x1e
0x082a…085e at001f = ╱41╱A╱ // 0x849 @0x1f
0x082a…085e at0020 = ╱4c╱L╱ // 0x84a @0x20
0x082a…085e at0021 = ╱ec╱,╱ // 0x84b @0x21
0x082a…085e at0022 = ╱4b╱K╱ // 0x84c @0x22
0x082a…085e at0023 = ╱4f╱O╱ // 0x84d @0x23
0x082a…085e at0024 = ╱4e╱N╱ // 0x84e @0x24
0x082a…085e at0025 = ╱54╱T╱ // 0x84f @0x25
0x082a…085e at0026 = ╱4e╱N╱ // 0x850 @0x26
0x082a…085e at0027 = ╱52╱R╱ // 0x851 @0x27
0x082a…085e at0028 = ╱ec╱,╱ // 0x852 @0x28
0x082a…085e at0029 = ╱4b╱K╱ // 0x853 @0x29
0x082a…085e at002a = ╱50╱P╱ // 0x854 @0x2a
0x082a…085e at002b = ╱49╱I╱ // 0x855 @0x2b
0x082a…085e at002c = ╱4c╱L╱ // 0x856 @0x2c
0x082a…085e at002d = ╱33╱3╱ // 0x857 @0x2d
0x082a…085e at002e = ╱ec╱,╱ // 0x858 @0x2e
0x082a…085e at002f = ╱4b╱K╱ // 0x859 @0x2f
0x082a…085e at0030 = ╱34╱4╱ // 0x85a @0x30
0x082a…085e at0031 = ╱ef╱$╱ // 0x85b @0x31
0x082a…085e at0032 = ╱ee╱)╱ // 0x85c @0x32
0x082a…085e at0033 = EOL // 0x85d @0x33
0x082a…085e }
0x085e…086f 95c6 0590 KRENR=KONTNR
0x085e…086f LineComalBin {
0x085e…086f ptr = 0x95c6 // 0x85e @0x0
0x085e…086f lno = 0x024e // 0x860 @0x2
0x085e…086f at0004 = ╱4b╱K╱ // 0x862 @0x4
0x085e…086f at0005 = ╱52╱R╱ // 0x863 @0x5
0x085e…086f at0006 = ╱45╱E╱ // 0x864 @0x6
0x085e…086f at0007 = ╱4e╱N╱ // 0x865 @0x7
0x085e…086f at0008 = ╱52╱R╱ // 0x866 @0x8
0x085e…086f at0009 = ╱dc╱=╱ // 0x867 @0x9
0x085e…086f at000a = ╱4b╱K╱ // 0x868 @0xa
0x085e…086f at000b = ╱4f╱O╱ // 0x869 @0xb
0x085e…086f at000c = ╱4e╱N╱ // 0x86a @0xc
0x085e…086f at000d = ╱54╱T╱ // 0x86b @0xd
0x085e…086f at000e = ╱4e╱N╱ // 0x86c @0xe
0x085e…086f at000f = ╱52╱R╱ // 0x86d @0xf
0x085e…086f at0010 = EOL // 0x86e @0x10
0x085e…086f }
0x086f…0882 95d9 0600 IF CEKS=1 THEN STOP
0x086f…0882 LineComalBin {
0x086f…0882 ptr = 0x95d9 // 0x86f @0x0
0x086f…0882 lno = 0x0258 // 0x871 @0x2
0x086f…0882 at0004 = ╱82╱ IF ╱ // 0x873 @0x4
0x086f…0882 at0005 = ╱43╱C╱ // 0x874 @0x5
0x086f…0882 at0006 = ╱45╱E╱ // 0x875 @0x6
0x086f…0882 at0007 = ╱4b╱K╱ // 0x876 @0x7
0x086f…0882 at0008 = ╱53╱S╱ // 0x877 @0x8
0x086f…0882 at0009 = ╱dc╱=╱ // 0x878 @0x9
0x086f…0882 at000a = ╱31╱1╱ // 0x879 @0xa
0x086f…0882 at000b = ╱fe00008001╱ // 0x87a @0xb
0x086f…0882 at0010 = ╱b6╱ THEN ╱ // 0x87f @0x10
0x086f…0882 at0011 = ╱8d╱ STOP ╱ // 0x880 @0x11
0x086f…0882 at0012 = EOL // 0x881 @0x12
0x086f…0882 }
0x0882…0892 95e9 0610 EXEC HENTKRPOST
0x0882…0892 LineComalBin {
0x0882…0892 ptr = 0x95e9 // 0x882 @0x0
0x0882…0892 lno = 0x0262 // 0x884 @0x2
0x0882…0892 at0004 = ╱9d╱ EXEC ╱ // 0x886 @0x4
0x0882…0892 at0005 = ╱48╱H╱ // 0x887 @0x5
0x0882…0892 at0006 = ╱45╱E╱ // 0x888 @0x6
0x0882…0892 at0007 = ╱4e╱N╱ // 0x889 @0x7
0x0882…0892 at0008 = ╱54╱T╱ // 0x88a @0x8
0x0882…0892 at0009 = ╱4b╱K╱ // 0x88b @0x9
0x0882…0892 at000a = ╱52╱R╱ // 0x88c @0xa
0x0882…0892 at000b = ╱50╱P╱ // 0x88d @0xb
0x0882…0892 at000c = ╱4f╱O╱ // 0x88e @0xc
0x0882…0892 at000d = ╱53╱S╱ // 0x88f @0xd
0x0882…0892 at000e = ╱54╱T╱ // 0x890 @0xe
0x0882…0892 at000f = EOL // 0x891 @0xf
0x0882…0892 }
0x0892…08b7 960e 0620 INDEX=INT(ORD(KRGR$)-48)*2
0x0892…08b7 LineComalBin {
0x0892…08b7 ptr = 0x960e // 0x892 @0x0
0x0892…08b7 lno = 0x026c // 0x894 @0x2
0x0892…08b7 at0004 = ╱49╱I╱ // 0x896 @0x4
0x0892…08b7 at0005 = ╱4e╱N╱ // 0x897 @0x5
0x0892…08b7 at0006 = ╱44╱D╱ // 0x898 @0x6
0x0892…08b7 at0007 = ╱45╱E╱ // 0x899 @0x7
0x0892…08b7 at0008 = ╱58╱X╱ // 0x89a @0x8
0x0892…08b7 at0009 = ╱dc╱=╱ // 0x89b @0x9
0x0892…08b7 at000a = ╱c6╱INT╱ // 0x89c @0xa
0x0892…08b7 at000b = ╱ed╱(╱ // 0x89d @0xb
0x0892…08b7 at000c = ╱cd╱ORD╱ // 0x89e @0xc
0x0892…08b7 at000d = ╱ed╱(╱ // 0x89f @0xd
0x0892…08b7 at000e = ╱4b╱K╱ // 0x8a0 @0xe
0x0892…08b7 at000f = ╱52╱R╱ // 0x8a1 @0xf
0x0892…08b7 at0010 = ╱47╱G╱ // 0x8a2 @0x10
0x0892…08b7 at0011 = ╱52╱R╱ // 0x8a3 @0x11
0x0892…08b7 at0012 = ╱ef╱$╱ // 0x8a4 @0x12
0x0892…08b7 at0013 = ╱ee╱)╱ // 0x8a5 @0x13
0x0892…08b7 at0014 = ╱e3╱-╱ // 0x8a6 @0x14
0x0892…08b7 at0015 = ╱34╱4╱ // 0x8a7 @0x15
0x0892…08b7 at0016 = ╱38╱8╱ // 0x8a8 @0x16
0x0892…08b7 at0017 = ╱fe0000c006╱ // 0x8a9 @0x17
0x0892…08b7 at001c = ╱ee╱)╱ // 0x8ae @0x1c
0x0892…08b7 at001d = ╱e4╱*╱ // 0x8af @0x1d
0x0892…08b7 at001e = ╱32╱2╱ // 0x8b0 @0x1e
0x0892…08b7 at001f = ╱fe00008002╱ // 0x8b1 @0x1f
0x0892…08b7 at0024 = EOL // 0x8b6 @0x24
0x0892…08b7 }
0x08b7…08c4 961b 0630 B8$=BE2$
0x08b7…08c4 LineComalBin {
0x08b7…08c4 ptr = 0x961b // 0x8b7 @0x0
0x08b7…08c4 lno = 0x0276 // 0x8b9 @0x2
0x08b7…08c4 at0004 = ╱42╱B╱ // 0x8bb @0x4
0x08b7…08c4 at0005 = ╱38╱8╱ // 0x8bc @0x5
0x08b7…08c4 at0006 = ╱ef╱$╱ // 0x8bd @0x6
0x08b7…08c4 at0007 = ╱dc╱=╱ // 0x8be @0x7
0x08b7…08c4 at0008 = ╱42╱B╱ // 0x8bf @0x8
0x08b7…08c4 at0009 = ╱45╱E╱ // 0x8c0 @0x9
0x08b7…08c4 at000a = ╱32╱2╱ // 0x8c1 @0xa
0x08b7…08c4 at000b = ╱ef╱$╱ // 0x8c2 @0xb
0x08b7…08c4 at000c = EOL // 0x8c3 @0xc
0x08b7…08c4 }
0x08c4…08da 9631 0640 IF B8$(LEN(B8$))="+" THEN
0x08c4…08da LineComalBin {
0x08c4…08da ptr = 0x9631 // 0x8c4 @0x0
0x08c4…08da lno = 0x0280 // 0x8c6 @0x2
0x08c4…08da at0004 = ╱9c╱ IF ╱ // 0x8c8 @0x4
0x08c4…08da at0005 = ╱42╱B╱ // 0x8c9 @0x5
0x08c4…08da at0006 = ╱38╱8╱ // 0x8ca @0x6
0x08c4…08da at0007 = ╱ef╱$╱ // 0x8cb @0x7
0x08c4…08da at0008 = ╱ed╱(╱ // 0x8cc @0x8
0x08c4…08da at0009 = ╱cc╱LEN╱ // 0x8cd @0x9
0x08c4…08da at000a = ╱ed╱(╱ // 0x8ce @0xa
0x08c4…08da at000b = ╱42╱B╱ // 0x8cf @0xb
0x08c4…08da at000c = ╱38╱8╱ // 0x8d0 @0xc
0x08c4…08da at000d = ╱ef╱$╱ // 0x8d1 @0xd
0x08c4…08da at000e = ╱ee╱)╱ // 0x8d2 @0xe
0x08c4…08da at000f = ╱ee╱)╱ // 0x8d3 @0xf
0x08c4…08da at0010 = ╱dc╱=╱ // 0x8d4 @0x10
0x08c4…08da at0011 = ╱22╱"╱ // 0x8d5 @0x11
0x08c4…08da at0012 = ╱2b╱+╱ // 0x8d6 @0x12
0x08c4…08da at0013 = ╱22╱"╱ // 0x8d7 @0x13
0x08c4…08da at0014 = ╱b6╱ THEN ╱ // 0x8d8 @0x14
0x08c4…08da at0015 = EOL // 0x8d9 @0x15
0x08c4…08da }
0x08da…091a 9671 0650 EXEC CALC(0,KREGR$(INDEX-1),B8$,KREGR$(INDEX-1))
0x08da…091a LineComalBin {
0x08da…091a ptr = 0x9671 // 0x8da @0x0
0x08da…091a lno = 0x028a // 0x8dc @0x2
0x08da…091a at0004 = ╱9d╱ EXEC ╱ // 0x8de @0x4
0x08da…091a at0005 = ╱43╱C╱ // 0x8df @0x5
0x08da…091a at0006 = ╱41╱A╱ // 0x8e0 @0x6
0x08da…091a at0007 = ╱4c╱L╱ // 0x8e1 @0x7
0x08da…091a at0008 = ╱43╱C╱ // 0x8e2 @0x8
0x08da…091a at0009 = ╱ed╱(╱ // 0x8e3 @0x9
0x08da…091a at000a = ╱30╱0╱ // 0x8e4 @0xa
0x08da…091a at000b = ╱fe00000000╱ // 0x8e5 @0xb
0x08da…091a at0010 = ╱ec╱,╱ // 0x8ea @0x10
0x08da…091a at0011 = ╱4b╱K╱ // 0x8eb @0x11
0x08da…091a at0012 = ╱52╱R╱ // 0x8ec @0x12
0x08da…091a at0013 = ╱45╱E╱ // 0x8ed @0x13
0x08da…091a at0014 = ╱47╱G╱ // 0x8ee @0x14
0x08da…091a at0015 = ╱52╱R╱ // 0x8ef @0x15
0x08da…091a at0016 = ╱ef╱$╱ // 0x8f0 @0x16
0x08da…091a at0017 = ╱ed╱(╱ // 0x8f1 @0x17
0x08da…091a at0018 = ╱49╱I╱ // 0x8f2 @0x18
0x08da…091a at0019 = ╱4e╱N╱ // 0x8f3 @0x19
0x08da…091a at001a = ╱44╱D╱ // 0x8f4 @0x1a
0x08da…091a at001b = ╱45╱E╱ // 0x8f5 @0x1b
0x08da…091a at001c = ╱58╱X╱ // 0x8f6 @0x1c
0x08da…091a at001d = ╱e3╱-╱ // 0x8f7 @0x1d
0x08da…091a at001e = ╱31╱1╱ // 0x8f8 @0x1e
0x08da…091a at001f = ╱fe00008001╱ // 0x8f9 @0x1f
0x08da…091a at0024 = ╱ee╱)╱ // 0x8fe @0x24
0x08da…091a at0025 = ╱ec╱,╱ // 0x8ff @0x25
0x08da…091a at0026 = ╱42╱B╱ // 0x900 @0x26
0x08da…091a at0027 = ╱38╱8╱ // 0x901 @0x27
0x08da…091a at0028 = ╱ef╱$╱ // 0x902 @0x28
0x08da…091a at0029 = ╱ec╱,╱ // 0x903 @0x29
0x08da…091a at002a = ╱4b╱K╱ // 0x904 @0x2a
0x08da…091a at002b = ╱52╱R╱ // 0x905 @0x2b
0x08da…091a at002c = ╱45╱E╱ // 0x906 @0x2c
0x08da…091a at002d = ╱47╱G╱ // 0x907 @0x2d
0x08da…091a at002e = ╱52╱R╱ // 0x908 @0x2e
0x08da…091a at002f = ╱ef╱$╱ // 0x909 @0x2f
0x08da…091a at0030 = ╱ed╱(╱ // 0x90a @0x30
0x08da…091a at0031 = ╱49╱I╱ // 0x90b @0x31
0x08da…091a at0032 = ╱4e╱N╱ // 0x90c @0x32
0x08da…091a at0033 = ╱44╱D╱ // 0x90d @0x33
0x08da…091a at0034 = ╱45╱E╱ // 0x90e @0x34
0x08da…091a at0035 = ╱58╱X╱ // 0x90f @0x35
0x08da…091a at0036 = ╱e3╱-╱ // 0x910 @0x36
0x08da…091a at0037 = ╱31╱1╱ // 0x911 @0x37
0x08da…091a at0038 = ╱fe00008001╱ // 0x912 @0x38
0x08da…091a at003d = ╱ee╱)╱ // 0x917 @0x3d
0x08da…091a at003e = ╱ee╱)╱ // 0x918 @0x3e
0x08da…091a at003f = EOL // 0x919 @0x3f
0x08da…091a }
0x091a…0937 968e 0660 EXEC NEDSKRIV1(B8$,KSALDO2$)
0x091a…0937 LineComalBin {
0x091a…0937 ptr = 0x968e // 0x91a @0x0
0x091a…0937 lno = 0x0294 // 0x91c @0x2
0x091a…0937 at0004 = ╱9d╱ EXEC ╱ // 0x91e @0x4
0x091a…0937 at0005 = ╱4e╱N╱ // 0x91f @0x5
0x091a…0937 at0006 = ╱45╱E╱ // 0x920 @0x6
0x091a…0937 at0007 = ╱44╱D╱ // 0x921 @0x7
0x091a…0937 at0008 = ╱53╱S╱ // 0x922 @0x8
0x091a…0937 at0009 = ╱4b╱K╱ // 0x923 @0x9
0x091a…0937 at000a = ╱52╱R╱ // 0x924 @0xa
0x091a…0937 at000b = ╱49╱I╱ // 0x925 @0xb
0x091a…0937 at000c = ╱56╱V╱ // 0x926 @0xc
0x091a…0937 at000d = ╱31╱1╱ // 0x927 @0xd
0x091a…0937 at000e = ╱ed╱(╱ // 0x928 @0xe
0x091a…0937 at000f = ╱42╱B╱ // 0x929 @0xf
0x091a…0937 at0010 = ╱38╱8╱ // 0x92a @0x10
0x091a…0937 at0011 = ╱ef╱$╱ // 0x92b @0x11
0x091a…0937 at0012 = ╱ec╱,╱ // 0x92c @0x12
0x091a…0937 at0013 = ╱4b╱K╱ // 0x92d @0x13
0x091a…0937 at0014 = ╱53╱S╱ // 0x92e @0x14
0x091a…0937 at0015 = ╱41╱A╱ // 0x92f @0x15
0x091a…0937 at0016 = ╱4c╱L╱ // 0x930 @0x16
0x091a…0937 at0017 = ╱44╱D╱ // 0x931 @0x17
0x091a…0937 at0018 = ╱4f╱O╱ // 0x932 @0x18
0x091a…0937 at0019 = ╱32╱2╱ // 0x933 @0x19
0x091a…0937 at001a = ╱ef╱$╱ // 0x934 @0x1a
0x091a…0937 at001b = ╱ee╱)╱ // 0x935 @0x1b
0x091a…0937 at001c = EOL // 0x936 @0x1c
0x091a…0937 }
0x0937…0954 96ab 0670 EXEC NEDSKRIV1(B8$,KSALDO1$)
0x0937…0954 LineComalBin {
0x0937…0954 ptr = 0x96ab // 0x937 @0x0
0x0937…0954 lno = 0x029e // 0x939 @0x2
0x0937…0954 at0004 = ╱9d╱ EXEC ╱ // 0x93b @0x4
0x0937…0954 at0005 = ╱4e╱N╱ // 0x93c @0x5
0x0937…0954 at0006 = ╱45╱E╱ // 0x93d @0x6
0x0937…0954 at0007 = ╱44╱D╱ // 0x93e @0x7
0x0937…0954 at0008 = ╱53╱S╱ // 0x93f @0x8
0x0937…0954 at0009 = ╱4b╱K╱ // 0x940 @0x9
0x0937…0954 at000a = ╱52╱R╱ // 0x941 @0xa
0x0937…0954 at000b = ╱49╱I╱ // 0x942 @0xb
0x0937…0954 at000c = ╱56╱V╱ // 0x943 @0xc
0x0937…0954 at000d = ╱31╱1╱ // 0x944 @0xd
0x0937…0954 at000e = ╱ed╱(╱ // 0x945 @0xe
0x0937…0954 at000f = ╱42╱B╱ // 0x946 @0xf
0x0937…0954 at0010 = ╱38╱8╱ // 0x947 @0x10
0x0937…0954 at0011 = ╱ef╱$╱ // 0x948 @0x11
0x0937…0954 at0012 = ╱ec╱,╱ // 0x949 @0x12
0x0937…0954 at0013 = ╱4b╱K╱ // 0x94a @0x13
0x0937…0954 at0014 = ╱53╱S╱ // 0x94b @0x14
0x0937…0954 at0015 = ╱41╱A╱ // 0x94c @0x15
0x0937…0954 at0016 = ╱4c╱L╱ // 0x94d @0x16
0x0937…0954 at0017 = ╱44╱D╱ // 0x94e @0x17
0x0937…0954 at0018 = ╱4f╱O╱ // 0x94f @0x18
0x0937…0954 at0019 = ╱31╱1╱ // 0x950 @0x19
0x0937…0954 at001a = ╱ef╱$╱ // 0x951 @0x1a
0x0937…0954 at001b = ╱ee╱)╱ // 0x952 @0x1b
0x0937…0954 at001c = EOL // 0x953 @0x1c
0x0937…0954 }
0x0954…095a 96b1 0680 ELSE
0x0954…095a LineComalBin {
0x0954…095a ptr = 0x96b1 // 0x954 @0x0
0x0954…095a lno = 0x02a8 // 0x956 @0x2
0x0954…095a at0004 = ╱9a╱ ELSE ╱ // 0x958 @0x4
0x0954…095a at0005 = EOL // 0x959 @0x5
0x0954…095a }
0x095a…098c 96e3 0690 EXEC CALC(0,KREGR$(INDEX),B8$,KREGR$(INDEX))
0x095a…098c LineComalBin {
0x095a…098c ptr = 0x96e3 // 0x95a @0x0
0x095a…098c lno = 0x02b2 // 0x95c @0x2
0x095a…098c at0004 = ╱9d╱ EXEC ╱ // 0x95e @0x4
0x095a…098c at0005 = ╱43╱C╱ // 0x95f @0x5
0x095a…098c at0006 = ╱41╱A╱ // 0x960 @0x6
0x095a…098c at0007 = ╱4c╱L╱ // 0x961 @0x7
0x095a…098c at0008 = ╱43╱C╱ // 0x962 @0x8
0x095a…098c at0009 = ╱ed╱(╱ // 0x963 @0x9
0x095a…098c at000a = ╱30╱0╱ // 0x964 @0xa
0x095a…098c at000b = ╱fe00000000╱ // 0x965 @0xb
0x095a…098c at0010 = ╱ec╱,╱ // 0x96a @0x10
0x095a…098c at0011 = ╱4b╱K╱ // 0x96b @0x11
0x095a…098c at0012 = ╱52╱R╱ // 0x96c @0x12
0x095a…098c at0013 = ╱45╱E╱ // 0x96d @0x13
0x095a…098c at0014 = ╱47╱G╱ // 0x96e @0x14
0x095a…098c at0015 = ╱52╱R╱ // 0x96f @0x15
0x095a…098c at0016 = ╱ef╱$╱ // 0x970 @0x16
0x095a…098c at0017 = ╱ed╱(╱ // 0x971 @0x17
0x095a…098c at0018 = ╱49╱I╱ // 0x972 @0x18
0x095a…098c at0019 = ╱4e╱N╱ // 0x973 @0x19
0x095a…098c at001a = ╱44╱D╱ // 0x974 @0x1a
0x095a…098c at001b = ╱45╱E╱ // 0x975 @0x1b
0x095a…098c at001c = ╱58╱X╱ // 0x976 @0x1c
0x095a…098c at001d = ╱ee╱)╱ // 0x977 @0x1d
0x095a…098c at001e = ╱ec╱,╱ // 0x978 @0x1e
0x095a…098c at001f = ╱42╱B╱ // 0x979 @0x1f
0x095a…098c at0020 = ╱38╱8╱ // 0x97a @0x20
0x095a…098c at0021 = ╱ef╱$╱ // 0x97b @0x21
0x095a…098c at0022 = ╱ec╱,╱ // 0x97c @0x22
0x095a…098c at0023 = ╱4b╱K╱ // 0x97d @0x23
0x095a…098c at0024 = ╱52╱R╱ // 0x97e @0x24
0x095a…098c at0025 = ╱45╱E╱ // 0x97f @0x25
0x095a…098c at0026 = ╱47╱G╱ // 0x980 @0x26
0x095a…098c at0027 = ╱52╱R╱ // 0x981 @0x27
0x095a…098c at0028 = ╱ef╱$╱ // 0x982 @0x28
0x095a…098c at0029 = ╱ed╱(╱ // 0x983 @0x29
0x095a…098c at002a = ╱49╱I╱ // 0x984 @0x2a
0x095a…098c at002b = ╱4e╱N╱ // 0x985 @0x2b
0x095a…098c at002c = ╱44╱D╱ // 0x986 @0x2c
0x095a…098c at002d = ╱45╱E╱ // 0x987 @0x2d
0x095a…098c at002e = ╱58╱X╱ // 0x988 @0x2e
0x095a…098c at002f = ╱ee╱)╱ // 0x989 @0x2f
0x095a…098c at0030 = ╱ee╱)╱ // 0x98a @0x30
0x095a…098c at0031 = EOL // 0x98b @0x31
0x095a…098c }
0x098c…0992 96e9 0700 ENDIF
0x098c…0992 LineComalBin {
0x098c…0992 ptr = 0x96e9 // 0x98c @0x0
0x098c…0992 lno = 0x02bc // 0x98e @0x2
0x098c…0992 at0004 = ╱9b╱ ENDIF ╱ // 0x990 @0x4
0x098c…0992 at0005 = EOL // 0x991 @0x5
0x098c…0992 }
0x0992…09ba 9711 0710 EXEC CALC(0,KSALDO1$,B8$,KSALDO1$)
0x0992…09ba LineComalBin {
0x0992…09ba ptr = 0x9711 // 0x992 @0x0
0x0992…09ba lno = 0x02c6 // 0x994 @0x2
0x0992…09ba at0004 = ╱9d╱ EXEC ╱ // 0x996 @0x4
0x0992…09ba at0005 = ╱43╱C╱ // 0x997 @0x5
0x0992…09ba at0006 = ╱41╱A╱ // 0x998 @0x6
0x0992…09ba at0007 = ╱4c╱L╱ // 0x999 @0x7
0x0992…09ba at0008 = ╱43╱C╱ // 0x99a @0x8
0x0992…09ba at0009 = ╱ed╱(╱ // 0x99b @0x9
0x0992…09ba at000a = ╱30╱0╱ // 0x99c @0xa
0x0992…09ba at000b = ╱fe00000000╱ // 0x99d @0xb
0x0992…09ba at0010 = ╱ec╱,╱ // 0x9a2 @0x10
0x0992…09ba at0011 = ╱4b╱K╱ // 0x9a3 @0x11
0x0992…09ba at0012 = ╱53╱S╱ // 0x9a4 @0x12
0x0992…09ba at0013 = ╱41╱A╱ // 0x9a5 @0x13
0x0992…09ba at0014 = ╱4c╱L╱ // 0x9a6 @0x14
0x0992…09ba at0015 = ╱44╱D╱ // 0x9a7 @0x15
0x0992…09ba at0016 = ╱4f╱O╱ // 0x9a8 @0x16
0x0992…09ba at0017 = ╱31╱1╱ // 0x9a9 @0x17
0x0992…09ba at0018 = ╱ef╱$╱ // 0x9aa @0x18
0x0992…09ba at0019 = ╱ec╱,╱ // 0x9ab @0x19
0x0992…09ba at001a = ╱42╱B╱ // 0x9ac @0x1a
0x0992…09ba at001b = ╱38╱8╱ // 0x9ad @0x1b
0x0992…09ba at001c = ╱ef╱$╱ // 0x9ae @0x1c
0x0992…09ba at001d = ╱ec╱,╱ // 0x9af @0x1d
0x0992…09ba at001e = ╱4b╱K╱ // 0x9b0 @0x1e
0x0992…09ba at001f = ╱53╱S╱ // 0x9b1 @0x1f
0x0992…09ba at0020 = ╱41╱A╱ // 0x9b2 @0x20
0x0992…09ba at0021 = ╱4c╱L╱ // 0x9b3 @0x21
0x0992…09ba at0022 = ╱44╱D╱ // 0x9b4 @0x22
0x0992…09ba at0023 = ╱4f╱O╱ // 0x9b5 @0x23
0x0992…09ba at0024 = ╱31╱1╱ // 0x9b6 @0x24
0x0992…09ba at0025 = ╱ef╱$╱ // 0x9b7 @0x25
0x0992…09ba at0026 = ╱ee╱)╱ // 0x9b8 @0x26
0x0992…09ba at0027 = EOL // 0x9b9 @0x27
0x0992…09ba }
0x09ba…09c9 9720 0720 EXEC GEMKRPOST
0x09ba…09c9 LineComalBin {
0x09ba…09c9 ptr = 0x9720 // 0x9ba @0x0
0x09ba…09c9 lno = 0x02d0 // 0x9bc @0x2
0x09ba…09c9 at0004 = ╱9d╱ EXEC ╱ // 0x9be @0x4
0x09ba…09c9 at0005 = ╱47╱G╱ // 0x9bf @0x5
0x09ba…09c9 at0006 = ╱45╱E╱ // 0x9c0 @0x6
0x09ba…09c9 at0007 = ╱4d╱M╱ // 0x9c1 @0x7
0x09ba…09c9 at0008 = ╱4b╱K╱ // 0x9c2 @0x8
0x09ba…09c9 at0009 = ╱52╱R╱ // 0x9c3 @0x9
0x09ba…09c9 at000a = ╱50╱P╱ // 0x9c4 @0xa
0x09ba…09c9 at000b = ╱4f╱O╱ // 0x9c5 @0xb
0x09ba…09c9 at000c = ╱53╱S╱ // 0x9c6 @0xc
0x09ba…09c9 at000d = ╱54╱T╱ // 0x9c7 @0xd
0x09ba…09c9 at000e = EOL // 0x9c8 @0xe
0x09ba…09c9 }
0x09c9…09ef 9746 0730 EXEC GEMMID(KRMIDNR,K11$,KONTNR,ENT1)
0x09c9…09ef LineComalBin {
0x09c9…09ef ptr = 0x9746 // 0x9c9 @0x0
0x09c9…09ef lno = 0x02da // 0x9cb @0x2
0x09c9…09ef at0004 = ╱9d╱ EXEC ╱ // 0x9cd @0x4
0x09c9…09ef at0005 = ╱47╱G╱ // 0x9ce @0x5
0x09c9…09ef at0006 = ╱45╱E╱ // 0x9cf @0x6
0x09c9…09ef at0007 = ╱4d╱M╱ // 0x9d0 @0x7
0x09c9…09ef at0008 = ╱4d╱M╱ // 0x9d1 @0x8
0x09c9…09ef at0009 = ╱49╱I╱ // 0x9d2 @0x9
0x09c9…09ef at000a = ╱44╱D╱ // 0x9d3 @0xa
0x09c9…09ef at000b = ╱ed╱(╱ // 0x9d4 @0xb
0x09c9…09ef at000c = ╱4b╱K╱ // 0x9d5 @0xc
0x09c9…09ef at000d = ╱52╱R╱ // 0x9d6 @0xd
0x09c9…09ef at000e = ╱4d╱M╱ // 0x9d7 @0xe
0x09c9…09ef at000f = ╱49╱I╱ // 0x9d8 @0xf
0x09c9…09ef at0010 = ╱44╱D╱ // 0x9d9 @0x10
0x09c9…09ef at0011 = ╱4e╱N╱ // 0x9da @0x11
0x09c9…09ef at0012 = ╱52╱R╱ // 0x9db @0x12
0x09c9…09ef at0013 = ╱ec╱,╱ // 0x9dc @0x13
0x09c9…09ef at0014 = ╱4b╱K╱ // 0x9dd @0x14
0x09c9…09ef at0015 = ╱31╱1╱ // 0x9de @0x15
0x09c9…09ef at0016 = ╱31╱1╱ // 0x9df @0x16
0x09c9…09ef at0017 = ╱ef╱$╱ // 0x9e0 @0x17
0x09c9…09ef at0018 = ╱ec╱,╱ // 0x9e1 @0x18
0x09c9…09ef at0019 = ╱4b╱K╱ // 0x9e2 @0x19
0x09c9…09ef at001a = ╱4f╱O╱ // 0x9e3 @0x1a
0x09c9…09ef at001b = ╱4e╱N╱ // 0x9e4 @0x1b
0x09c9…09ef at001c = ╱54╱T╱ // 0x9e5 @0x1c
0x09c9…09ef at001d = ╱4e╱N╱ // 0x9e6 @0x1d
0x09c9…09ef at001e = ╱52╱R╱ // 0x9e7 @0x1e
0x09c9…09ef at001f = ╱ec╱,╱ // 0x9e8 @0x1f
0x09c9…09ef at0020 = ╱45╱E╱ // 0x9e9 @0x20
0x09c9…09ef at0021 = ╱4e╱N╱ // 0x9ea @0x21
0x09c9…09ef at0022 = ╱54╱T╱ // 0x9eb @0x22
0x09c9…09ef at0023 = ╱31╱1╱ // 0x9ec @0x23
0x09c9…09ef at0024 = ╱ee╱)╱ // 0x9ed @0x24
0x09c9…09ef at0025 = EOL // 0x9ee @0x25
0x09c9…09ef }
0x09ef…09f5 974c 0740 ELSE
0x09ef…09f5 LineComalBin {
0x09ef…09f5 ptr = 0x974c // 0x9ef @0x0
0x09ef…09f5 lno = 0x02e4 // 0x9f1 @0x2
0x09ef…09f5 at0004 = ╱9a╱ ELSE ╱ // 0x9f3 @0x4
0x09ef…09f5 at0005 = EOL // 0x9f4 @0x5
0x09ef…09f5 }
0x09f5…0a29 9780 0750 EXEC FINDPOST1(FTAB1,FTAB,MFANTAL,KONTNR,FPIL3,K2$)
0x09f5…0a29 LineComalBin {
0x09f5…0a29 ptr = 0x9780 // 0x9f5 @0x0
0x09f5…0a29 lno = 0x02ee // 0x9f7 @0x2
0x09f5…0a29 at0004 = ╱9d╱ EXEC ╱ // 0x9f9 @0x4
0x09f5…0a29 at0005 = ╱46╱F╱ // 0x9fa @0x5
0x09f5…0a29 at0006 = ╱49╱I╱ // 0x9fb @0x6
0x09f5…0a29 at0007 = ╱4e╱N╱ // 0x9fc @0x7
0x09f5…0a29 at0008 = ╱44╱D╱ // 0x9fd @0x8
0x09f5…0a29 at0009 = ╱50╱P╱ // 0x9fe @0x9
0x09f5…0a29 at000a = ╱4f╱O╱ // 0x9ff @0xa
0x09f5…0a29 at000b = ╱53╱S╱ // 0xa00 @0xb
0x09f5…0a29 at000c = ╱54╱T╱ // 0xa01 @0xc
0x09f5…0a29 at000d = ╱31╱1╱ // 0xa02 @0xd
0x09f5…0a29 at000e = ╱ed╱(╱ // 0xa03 @0xe
0x09f5…0a29 at000f = ╱46╱F╱ // 0xa04 @0xf
0x09f5…0a29 at0010 = ╱54╱T╱ // 0xa05 @0x10
0x09f5…0a29 at0011 = ╱41╱A╱ // 0xa06 @0x11
0x09f5…0a29 at0012 = ╱42╱B╱ // 0xa07 @0x12
0x09f5…0a29 at0013 = ╱31╱1╱ // 0xa08 @0x13
0x09f5…0a29 at0014 = ╱ec╱,╱ // 0xa09 @0x14
0x09f5…0a29 at0015 = ╱46╱F╱ // 0xa0a @0x15
0x09f5…0a29 at0016 = ╱54╱T╱ // 0xa0b @0x16
0x09f5…0a29 at0017 = ╱41╱A╱ // 0xa0c @0x17
0x09f5…0a29 at0018 = ╱42╱B╱ // 0xa0d @0x18
0x09f5…0a29 at0019 = ╱ec╱,╱ // 0xa0e @0x19
0x09f5…0a29 at001a = ╱4d╱M╱ // 0xa0f @0x1a
0x09f5…0a29 at001b = ╱46╱F╱ // 0xa10 @0x1b
0x09f5…0a29 at001c = ╱41╱A╱ // 0xa11 @0x1c
0x09f5…0a29 at001d = ╱4e╱N╱ // 0xa12 @0x1d
0x09f5…0a29 at001e = ╱54╱T╱ // 0xa13 @0x1e
0x09f5…0a29 at001f = ╱41╱A╱ // 0xa14 @0x1f
0x09f5…0a29 at0020 = ╱4c╱L╱ // 0xa15 @0x20
0x09f5…0a29 at0021 = ╱ec╱,╱ // 0xa16 @0x21
0x09f5…0a29 at0022 = ╱4b╱K╱ // 0xa17 @0x22
0x09f5…0a29 at0023 = ╱4f╱O╱ // 0xa18 @0x23
0x09f5…0a29 at0024 = ╱4e╱N╱ // 0xa19 @0x24
0x09f5…0a29 at0025 = ╱54╱T╱ // 0xa1a @0x25
0x09f5…0a29 at0026 = ╱4e╱N╱ // 0xa1b @0x26
0x09f5…0a29 at0027 = ╱52╱R╱ // 0xa1c @0x27
0x09f5…0a29 at0028 = ╱ec╱,╱ // 0xa1d @0x28
0x09f5…0a29 at0029 = ╱46╱F╱ // 0xa1e @0x29
0x09f5…0a29 at002a = ╱50╱P╱ // 0xa1f @0x2a
0x09f5…0a29 at002b = ╱49╱I╱ // 0xa20 @0x2b
0x09f5…0a29 at002c = ╱4c╱L╱ // 0xa21 @0x2c
0x09f5…0a29 at002d = ╱33╱3╱ // 0xa22 @0x2d
0x09f5…0a29 at002e = ╱ec╱,╱ // 0xa23 @0x2e
0x09f5…0a29 at002f = ╱4b╱K╱ // 0xa24 @0x2f
0x09f5…0a29 at0030 = ╱32╱2╱ // 0xa25 @0x30
0x09f5…0a29 at0031 = ╱ef╱$╱ // 0xa26 @0x31
0x09f5…0a29 at0032 = ╱ee╱)╱ // 0xa27 @0x32
0x09f5…0a29 at0033 = EOL // 0xa28 @0x33
0x09f5…0a29 }
0x0a29…0a38 978f 0760 FNR=KONTNR
0x0a29…0a38 LineComalBin {
0x0a29…0a38 ptr = 0x978f // 0xa29 @0x0
0x0a29…0a38 lno = 0x02f8 // 0xa2b @0x2
0x0a29…0a38 at0004 = ╱46╱F╱ // 0xa2d @0x4
0x0a29…0a38 at0005 = ╱4e╱N╱ // 0xa2e @0x5
0x0a29…0a38 at0006 = ╱52╱R╱ // 0xa2f @0x6
0x0a29…0a38 at0007 = ╱dc╱=╱ // 0xa30 @0x7
0x0a29…0a38 at0008 = ╱4b╱K╱ // 0xa31 @0x8
0x0a29…0a38 at0009 = ╱4f╱O╱ // 0xa32 @0x9
0x0a29…0a38 at000a = ╱4e╱N╱ // 0xa33 @0xa
0x0a29…0a38 at000b = ╱54╱T╱ // 0xa34 @0xb
0x0a29…0a38 at000c = ╱4e╱N╱ // 0xa35 @0xc
0x0a29…0a38 at000d = ╱52╱R╱ // 0xa36 @0xd
0x0a29…0a38 at000e = EOL // 0xa37 @0xe
0x0a29…0a38 }
0x0a38…0a4b 97a2 0770 IF CEKS=1 THEN STOP
0x0a38…0a4b LineComalBin {
0x0a38…0a4b ptr = 0x97a2 // 0xa38 @0x0
0x0a38…0a4b lno = 0x0302 // 0xa3a @0x2
0x0a38…0a4b at0004 = ╱82╱ IF ╱ // 0xa3c @0x4
0x0a38…0a4b at0005 = ╱43╱C╱ // 0xa3d @0x5
0x0a38…0a4b at0006 = ╱45╱E╱ // 0xa3e @0x6
0x0a38…0a4b at0007 = ╱4b╱K╱ // 0xa3f @0x7
0x0a38…0a4b at0008 = ╱53╱S╱ // 0xa40 @0x8
0x0a38…0a4b at0009 = ╱dc╱=╱ // 0xa41 @0x9
0x0a38…0a4b at000a = ╱31╱1╱ // 0xa42 @0xa
0x0a38…0a4b at000b = ╱fe00008001╱ // 0xa43 @0xb
0x0a38…0a4b at0010 = ╱b6╱ THEN ╱ // 0xa48 @0x10
0x0a38…0a4b at0011 = ╱8d╱ STOP ╱ // 0xa49 @0x11
0x0a38…0a4b at0012 = EOL // 0xa4a @0x12
0x0a38…0a4b }
0x0a4b…0a59 97b0 0780 EXEC HENTPOST
0x0a4b…0a59 LineComalBin {
0x0a4b…0a59 ptr = 0x97b0 // 0xa4b @0x0
0x0a4b…0a59 lno = 0x030c // 0xa4d @0x2
0x0a4b…0a59 at0004 = ╱9d╱ EXEC ╱ // 0xa4f @0x4
0x0a4b…0a59 at0005 = ╱48╱H╱ // 0xa50 @0x5
0x0a4b…0a59 at0006 = ╱45╱E╱ // 0xa51 @0x6
0x0a4b…0a59 at0007 = ╱4e╱N╱ // 0xa52 @0x7
0x0a4b…0a59 at0008 = ╱54╱T╱ // 0xa53 @0x8
0x0a4b…0a59 at0009 = ╱50╱P╱ // 0xa54 @0x9
0x0a4b…0a59 at000a = ╱4f╱O╱ // 0xa55 @0xa
0x0a4b…0a59 at000b = ╱53╱S╱ // 0xa56 @0xb
0x0a4b…0a59 at000c = ╱54╱T╱ // 0xa57 @0xc
0x0a4b…0a59 at000d = EOL // 0xa58 @0xd
0x0a4b…0a59 }
0x0a59…0a76 97cd 0790 KODE2=ORD(FMKODE$)-48
0x0a59…0a76 LineComalBin {
0x0a59…0a76 ptr = 0x97cd // 0xa59 @0x0
0x0a59…0a76 lno = 0x0316 // 0xa5b @0x2
0x0a59…0a76 at0004 = ╱4b╱K╱ // 0xa5d @0x4
0x0a59…0a76 at0005 = ╱4f╱O╱ // 0xa5e @0x5
0x0a59…0a76 at0006 = ╱44╱D╱ // 0xa5f @0x6
0x0a59…0a76 at0007 = ╱45╱E╱ // 0xa60 @0x7
0x0a59…0a76 at0008 = ╱32╱2╱ // 0xa61 @0x8
0x0a59…0a76 at0009 = ╱dc╱=╱ // 0xa62 @0x9
0x0a59…0a76 at000a = ╱cd╱ORD╱ // 0xa63 @0xa
0x0a59…0a76 at000b = ╱ed╱(╱ // 0xa64 @0xb
0x0a59…0a76 at000c = ╱46╱F╱ // 0xa65 @0xc
0x0a59…0a76 at000d = ╱4d╱M╱ // 0xa66 @0xd
0x0a59…0a76 at000e = ╱4b╱K╱ // 0xa67 @0xe
0x0a59…0a76 at000f = ╱4f╱O╱ // 0xa68 @0xf
0x0a59…0a76 at0010 = ╱44╱D╱ // 0xa69 @0x10
0x0a59…0a76 at0011 = ╱45╱E╱ // 0xa6a @0x11
0x0a59…0a76 at0012 = ╱ef╱$╱ // 0xa6b @0x12
0x0a59…0a76 at0013 = ╱ee╱)╱ // 0xa6c @0x13
0x0a59…0a76 at0014 = ╱e3╱-╱ // 0xa6d @0x14
0x0a59…0a76 at0015 = ╱34╱4╱ // 0xa6e @0x15
0x0a59…0a76 at0016 = ╱38╱8╱ // 0xa6f @0x16
0x0a59…0a76 at0017 = ╱fe0000c006╱ // 0xa70 @0x17
0x0a59…0a76 at001c = EOL // 0xa75 @0x1c
0x0a59…0a76 }
0x0a76…0a88 97df 0800 IF FMKODE$<>"0" THEN
0x0a76…0a88 LineComalBin {
0x0a76…0a88 ptr = 0x97df // 0xa76 @0x0
0x0a76…0a88 lno = 0x0320 // 0xa78 @0x2
0x0a76…0a88 at0004 = ╱9c╱ IF ╱ // 0xa7a @0x4
0x0a76…0a88 at0005 = ╱46╱F╱ // 0xa7b @0x5
0x0a76…0a88 at0006 = ╱4d╱M╱ // 0xa7c @0x6
0x0a76…0a88 at0007 = ╱4b╱K╱ // 0xa7d @0x7
0x0a76…0a88 at0008 = ╱4f╱O╱ // 0xa7e @0x8
0x0a76…0a88 at0009 = ╱44╱D╱ // 0xa7f @0x9
0x0a76…0a88 at000a = ╱45╱E╱ // 0xa80 @0xa
0x0a76…0a88 at000b = ╱ef╱$╱ // 0xa81 @0xb
0x0a76…0a88 at000c = ╱e1╱<>╱ // 0xa82 @0xc
0x0a76…0a88 at000d = ╱22╱"╱ // 0xa83 @0xd
0x0a76…0a88 at000e = ╱30╱0╱ // 0xa84 @0xe
0x0a76…0a88 at000f = ╱22╱"╱ // 0xa85 @0xf
0x0a76…0a88 at0010 = ╱b6╱ THEN ╱ // 0xa86 @0x10
0x0a76…0a88 at0011 = EOL // 0xa87 @0x11
0x0a76…0a88 }
0x0a88…0a95 97ec 0810 B9$="0+"
0x0a88…0a95 LineComalBin {
0x0a88…0a95 ptr = 0x97ec // 0xa88 @0x0
0x0a88…0a95 lno = 0x032a // 0xa8a @0x2
0x0a88…0a95 at0004 = ╱42╱B╱ // 0xa8c @0x4
0x0a88…0a95 at0005 = ╱39╱9╱ // 0xa8d @0x5
0x0a88…0a95 at0006 = ╱ef╱$╱ // 0xa8e @0x6
0x0a88…0a95 at0007 = ╱dc╱=╱ // 0xa8f @0x7
0x0a88…0a95 at0008 = ╱22╱"╱ // 0xa90 @0x8
0x0a88…0a95 at0009 = ╱30╱0╱ // 0xa91 @0x9
0x0a88…0a95 at000a = ╱2b╱+╱ // 0xa92 @0xa
0x0a88…0a95 at000b = ╱22╱"╱ // 0xa93 @0xb
0x0a88…0a95 at000c = EOL // 0xa94 @0xc
0x0a88…0a95 }
0x0a95…0aa5 97fc 0820 BMOMS$="0+"
0x0a95…0aa5 LineComalBin {
0x0a95…0aa5 ptr = 0x97fc // 0xa95 @0x0
0x0a95…0aa5 lno = 0x0334 // 0xa97 @0x2
0x0a95…0aa5 at0004 = ╱42╱B╱ // 0xa99 @0x4
0x0a95…0aa5 at0005 = ╱4d╱M╱ // 0xa9a @0x5
0x0a95…0aa5 at0006 = ╱4f╱O╱ // 0xa9b @0x6
0x0a95…0aa5 at0007 = ╱4d╱M╱ // 0xa9c @0x7
0x0a95…0aa5 at0008 = ╱53╱S╱ // 0xa9d @0x8
0x0a95…0aa5 at0009 = ╱ef╱$╱ // 0xa9e @0x9
0x0a95…0aa5 at000a = ╱dc╱=╱ // 0xa9f @0xa
0x0a95…0aa5 at000b = ╱22╱"╱ // 0xaa0 @0xb
0x0a95…0aa5 at000c = ╱30╱0╱ // 0xaa1 @0xc
0x0a95…0aa5 at000d = ╱2b╱+╱ // 0xaa2 @0xd
0x0a95…0aa5 at000e = ╱22╱"╱ // 0xaa3 @0xe
0x0a95…0aa5 at000f = EOL // 0xaa4 @0xf
0x0a95…0aa5 }
0x0aa5…0ac8 981f 0830 EXEC CALC(3,DMOMS$,TAL3$,B9$)
0x0aa5…0ac8 LineComalBin {
0x0aa5…0ac8 ptr = 0x981f // 0xaa5 @0x0
0x0aa5…0ac8 lno = 0x033e // 0xaa7 @0x2
0x0aa5…0ac8 at0004 = ╱9d╱ EXEC ╱ // 0xaa9 @0x4
0x0aa5…0ac8 at0005 = ╱43╱C╱ // 0xaaa @0x5
0x0aa5…0ac8 at0006 = ╱41╱A╱ // 0xaab @0x6
0x0aa5…0ac8 at0007 = ╱4c╱L╱ // 0xaac @0x7
0x0aa5…0ac8 at0008 = ╱43╱C╱ // 0xaad @0x8
0x0aa5…0ac8 at0009 = ╱ed╱(╱ // 0xaae @0x9
0x0aa5…0ac8 at000a = ╱33╱3╱ // 0xaaf @0xa
0x0aa5…0ac8 at000b = ╱fe0000c002╱ // 0xab0 @0xb
0x0aa5…0ac8 at0010 = ╱ec╱,╱ // 0xab5 @0x10
0x0aa5…0ac8 at0011 = ╱44╱D╱ // 0xab6 @0x11
0x0aa5…0ac8 at0012 = ╱4d╱M╱ // 0xab7 @0x12
0x0aa5…0ac8 at0013 = ╱4f╱O╱ // 0xab8 @0x13
0x0aa5…0ac8 at0014 = ╱4d╱M╱ // 0xab9 @0x14
0x0aa5…0ac8 at0015 = ╱53╱S╱ // 0xaba @0x15
0x0aa5…0ac8 at0016 = ╱ef╱$╱ // 0xabb @0x16
0x0aa5…0ac8 at0017 = ╱ec╱,╱ // 0xabc @0x17
0x0aa5…0ac8 at0018 = ╱54╱T╱ // 0xabd @0x18
0x0aa5…0ac8 at0019 = ╱41╱A╱ // 0xabe @0x19
0x0aa5…0ac8 at001a = ╱4c╱L╱ // 0xabf @0x1a
0x0aa5…0ac8 at001b = ╱33╱3╱ // 0xac0 @0x1b
0x0aa5…0ac8 at001c = ╱ef╱$╱ // 0xac1 @0x1c
0x0aa5…0ac8 at001d = ╱ec╱,╱ // 0xac2 @0x1d
0x0aa5…0ac8 at001e = ╱42╱B╱ // 0xac3 @0x1e
0x0aa5…0ac8 at001f = ╱39╱9╱ // 0xac4 @0x1f
0x0aa5…0ac8 at0020 = ╱ef╱$╱ // 0xac5 @0x20
0x0aa5…0ac8 at0021 = ╱ee╱)╱ // 0xac6 @0x21
0x0aa5…0ac8 at0022 = EOL // 0xac7 @0x22
0x0aa5…0ac8 }
0x0ac8…0ae7 983e 0840 EXEC CALC(3,BE2$,B9$,B9$)
0x0ac8…0ae7 LineComalBin {
0x0ac8…0ae7 ptr = 0x983e // 0xac8 @0x0
0x0ac8…0ae7 lno = 0x0348 // 0xaca @0x2
0x0ac8…0ae7 at0004 = ╱9d╱ EXEC ╱ // 0xacc @0x4
0x0ac8…0ae7 at0005 = ╱43╱C╱ // 0xacd @0x5
0x0ac8…0ae7 at0006 = ╱41╱A╱ // 0xace @0x6
0x0ac8…0ae7 at0007 = ╱4c╱L╱ // 0xacf @0x7
0x0ac8…0ae7 at0008 = ╱43╱C╱ // 0xad0 @0x8
0x0ac8…0ae7 at0009 = ╱ed╱(╱ // 0xad1 @0x9
0x0ac8…0ae7 at000a = ╱33╱3╱ // 0xad2 @0xa
0x0ac8…0ae7 at000b = ╱fe0000c002╱ // 0xad3 @0xb
0x0ac8…0ae7 at0010 = ╱ec╱,╱ // 0xad8 @0x10
0x0ac8…0ae7 at0011 = ╱42╱B╱ // 0xad9 @0x11
0x0ac8…0ae7 at0012 = ╱45╱E╱ // 0xada @0x12
0x0ac8…0ae7 at0013 = ╱32╱2╱ // 0xadb @0x13
0x0ac8…0ae7 at0014 = ╱ef╱$╱ // 0xadc @0x14
0x0ac8…0ae7 at0015 = ╱ec╱,╱ // 0xadd @0x15
0x0ac8…0ae7 at0016 = ╱42╱B╱ // 0xade @0x16
0x0ac8…0ae7 at0017 = ╱39╱9╱ // 0xadf @0x17
0x0ac8…0ae7 at0018 = ╱ef╱$╱ // 0xae0 @0x18
0x0ac8…0ae7 at0019 = ╱ec╱,╱ // 0xae1 @0x19
0x0ac8…0ae7 at001a = ╱42╱B╱ // 0xae2 @0x1a
0x0ac8…0ae7 at001b = ╱39╱9╱ // 0xae3 @0x1b
0x0ac8…0ae7 at001c = ╱ef╱$╱ // 0xae4 @0x1c
0x0ac8…0ae7 at001d = ╱ee╱)╱ // 0xae5 @0x1d
0x0ac8…0ae7 at001e = EOL // 0xae6 @0x1e
0x0ac8…0ae7 }
0x0ae7…0b09 9860 0850 EXEC CALC(1,BE2$,B9$,BMOMS$)
0x0ae7…0b09 LineComalBin {
0x0ae7…0b09 ptr = 0x9860 // 0xae7 @0x0
0x0ae7…0b09 lno = 0x0352 // 0xae9 @0x2
0x0ae7…0b09 at0004 = ╱9d╱ EXEC ╱ // 0xaeb @0x4
0x0ae7…0b09 at0005 = ╱43╱C╱ // 0xaec @0x5
0x0ae7…0b09 at0006 = ╱41╱A╱ // 0xaed @0x6
0x0ae7…0b09 at0007 = ╱4c╱L╱ // 0xaee @0x7
0x0ae7…0b09 at0008 = ╱43╱C╱ // 0xaef @0x8
0x0ae7…0b09 at0009 = ╱ed╱(╱ // 0xaf0 @0x9
0x0ae7…0b09 at000a = ╱31╱1╱ // 0xaf1 @0xa
0x0ae7…0b09 at000b = ╱fe00008001╱ // 0xaf2 @0xb
0x0ae7…0b09 at0010 = ╱ec╱,╱ // 0xaf7 @0x10
0x0ae7…0b09 at0011 = ╱42╱B╱ // 0xaf8 @0x11
0x0ae7…0b09 at0012 = ╱45╱E╱ // 0xaf9 @0x12
0x0ae7…0b09 at0013 = ╱32╱2╱ // 0xafa @0x13
0x0ae7…0b09 at0014 = ╱ef╱$╱ // 0xafb @0x14
0x0ae7…0b09 at0015 = ╱ec╱,╱ // 0xafc @0x15
0x0ae7…0b09 at0016 = ╱42╱B╱ // 0xafd @0x16
0x0ae7…0b09 at0017 = ╱39╱9╱ // 0xafe @0x17
0x0ae7…0b09 at0018 = ╱ef╱$╱ // 0xaff @0x18
0x0ae7…0b09 at0019 = ╱ec╱,╱ // 0xb00 @0x19
0x0ae7…0b09 at001a = ╱42╱B╱ // 0xb01 @0x1a
0x0ae7…0b09 at001b = ╱4d╱M╱ // 0xb02 @0x1b
0x0ae7…0b09 at001c = ╱4f╱O╱ // 0xb03 @0x1c
0x0ae7…0b09 at001d = ╱4d╱M╱ // 0xb04 @0x1d
0x0ae7…0b09 at001e = ╱53╱S╱ // 0xb05 @0x1e
0x0ae7…0b09 at001f = ╱ef╱$╱ // 0xb06 @0x1f
0x0ae7…0b09 at0020 = ╱ee╱)╱ // 0xb07 @0x20
0x0ae7…0b09 at0021 = EOL // 0xb08 @0x21
0x0ae7…0b09 }
0x0b09…0b1b 9872 0860 IF FMKODE$="1" THEN
0x0b09…0b1b LineComalBin {
0x0b09…0b1b ptr = 0x9872 // 0xb09 @0x0
0x0b09…0b1b lno = 0x035c // 0xb0b @0x2
0x0b09…0b1b at0004 = ╱9c╱ IF ╱ // 0xb0d @0x4
0x0b09…0b1b at0005 = ╱46╱F╱ // 0xb0e @0x5
0x0b09…0b1b at0006 = ╱4d╱M╱ // 0xb0f @0x6
0x0b09…0b1b at0007 = ╱4b╱K╱ // 0xb10 @0x7
0x0b09…0b1b at0008 = ╱4f╱O╱ // 0xb11 @0x8
0x0b09…0b1b at0009 = ╱44╱D╱ // 0xb12 @0x9
0x0b09…0b1b at000a = ╱45╱E╱ // 0xb13 @0xa
0x0b09…0b1b at000b = ╱ef╱$╱ // 0xb14 @0xb
0x0b09…0b1b at000c = ╱dc╱=╱ // 0xb15 @0xc
0x0b09…0b1b at000d = ╱22╱"╱ // 0xb16 @0xd
0x0b09…0b1b at000e = ╱31╱1╱ // 0xb17 @0xe
0x0b09…0b1b at000f = ╱22╱"╱ // 0xb18 @0xf
0x0b09…0b1b at0010 = ╱b6╱ THEN ╱ // 0xb19 @0x10
0x0b09…0b1b at0011 = EOL // 0xb1a @0x11
0x0b09…0b1b }
0x0b1b…0b46 989d 0870 EXEC CALC(0,INDMOMS$,BMOMS$,INDMOMS$)
0x0b1b…0b46 LineComalBin {
0x0b1b…0b46 ptr = 0x989d // 0xb1b @0x0
0x0b1b…0b46 lno = 0x0366 // 0xb1d @0x2
0x0b1b…0b46 at0004 = ╱9d╱ EXEC ╱ // 0xb1f @0x4
0x0b1b…0b46 at0005 = ╱43╱C╱ // 0xb20 @0x5
0x0b1b…0b46 at0006 = ╱41╱A╱ // 0xb21 @0x6
0x0b1b…0b46 at0007 = ╱4c╱L╱ // 0xb22 @0x7
0x0b1b…0b46 at0008 = ╱43╱C╱ // 0xb23 @0x8
0x0b1b…0b46 at0009 = ╱ed╱(╱ // 0xb24 @0x9
0x0b1b…0b46 at000a = ╱30╱0╱ // 0xb25 @0xa
0x0b1b…0b46 at000b = ╱fe00000000╱ // 0xb26 @0xb
0x0b1b…0b46 at0010 = ╱ec╱,╱ // 0xb2b @0x10
0x0b1b…0b46 at0011 = ╱49╱I╱ // 0xb2c @0x11
0x0b1b…0b46 at0012 = ╱4e╱N╱ // 0xb2d @0x12
0x0b1b…0b46 at0013 = ╱44╱D╱ // 0xb2e @0x13
0x0b1b…0b46 at0014 = ╱4d╱M╱ // 0xb2f @0x14
0x0b1b…0b46 at0015 = ╱4f╱O╱ // 0xb30 @0x15
0x0b1b…0b46 at0016 = ╱4d╱M╱ // 0xb31 @0x16
0x0b1b…0b46 at0017 = ╱53╱S╱ // 0xb32 @0x17
0x0b1b…0b46 at0018 = ╱ef╱$╱ // 0xb33 @0x18
0x0b1b…0b46 at0019 = ╱ec╱,╱ // 0xb34 @0x19
0x0b1b…0b46 at001a = ╱42╱B╱ // 0xb35 @0x1a
0x0b1b…0b46 at001b = ╱4d╱M╱ // 0xb36 @0x1b
0x0b1b…0b46 at001c = ╱4f╱O╱ // 0xb37 @0x1c
0x0b1b…0b46 at001d = ╱4d╱M╱ // 0xb38 @0x1d
0x0b1b…0b46 at001e = ╱53╱S╱ // 0xb39 @0x1e
0x0b1b…0b46 at001f = ╱ef╱$╱ // 0xb3a @0x1f
0x0b1b…0b46 at0020 = ╱ec╱,╱ // 0xb3b @0x20
0x0b1b…0b46 at0021 = ╱49╱I╱ // 0xb3c @0x21
0x0b1b…0b46 at0022 = ╱4e╱N╱ // 0xb3d @0x22
0x0b1b…0b46 at0023 = ╱44╱D╱ // 0xb3e @0x23
0x0b1b…0b46 at0024 = ╱4d╱M╱ // 0xb3f @0x24
0x0b1b…0b46 at0025 = ╱4f╱O╱ // 0xb40 @0x25
0x0b1b…0b46 at0026 = ╱4d╱M╱ // 0xb41 @0x26
0x0b1b…0b46 at0027 = ╱53╱S╱ // 0xb42 @0x27
0x0b1b…0b46 at0028 = ╱ef╱$╱ // 0xb43 @0x28
0x0b1b…0b46 at0029 = ╱ee╱)╱ // 0xb44 @0x29
0x0b1b…0b46 at002a = EOL // 0xb45 @0x2a
0x0b1b…0b46 }
0x0b46…0b4c 98a3 0880 ELSE
0x0b46…0b4c LineComalBin {
0x0b46…0b4c ptr = 0x98a3 // 0xb46 @0x0
0x0b46…0b4c lno = 0x0370 // 0xb48 @0x2
0x0b46…0b4c at0004 = ╱9a╱ ELSE ╱ // 0xb4a @0x4
0x0b46…0b4c at0005 = EOL // 0xb4b @0x5
0x0b46…0b4c }
0x0b4c…0b75 98cc 0890 EXEC CALC(0,UDMOMS$,BMOMS$,UDMOMS$)
0x0b4c…0b75 LineComalBin {
0x0b4c…0b75 ptr = 0x98cc // 0xb4c @0x0
0x0b4c…0b75 lno = 0x037a // 0xb4e @0x2
0x0b4c…0b75 at0004 = ╱9d╱ EXEC ╱ // 0xb50 @0x4
0x0b4c…0b75 at0005 = ╱43╱C╱ // 0xb51 @0x5
0x0b4c…0b75 at0006 = ╱41╱A╱ // 0xb52 @0x6
0x0b4c…0b75 at0007 = ╱4c╱L╱ // 0xb53 @0x7
0x0b4c…0b75 at0008 = ╱43╱C╱ // 0xb54 @0x8
0x0b4c…0b75 at0009 = ╱ed╱(╱ // 0xb55 @0x9
0x0b4c…0b75 at000a = ╱30╱0╱ // 0xb56 @0xa
0x0b4c…0b75 at000b = ╱fe00000000╱ // 0xb57 @0xb
0x0b4c…0b75 at0010 = ╱ec╱,╱ // 0xb5c @0x10
0x0b4c…0b75 at0011 = ╱55╱U╱ // 0xb5d @0x11
0x0b4c…0b75 at0012 = ╱44╱D╱ // 0xb5e @0x12
0x0b4c…0b75 at0013 = ╱4d╱M╱ // 0xb5f @0x13
0x0b4c…0b75 at0014 = ╱4f╱O╱ // 0xb60 @0x14
0x0b4c…0b75 at0015 = ╱4d╱M╱ // 0xb61 @0x15
0x0b4c…0b75 at0016 = ╱53╱S╱ // 0xb62 @0x16
0x0b4c…0b75 at0017 = ╱ef╱$╱ // 0xb63 @0x17
0x0b4c…0b75 at0018 = ╱ec╱,╱ // 0xb64 @0x18
0x0b4c…0b75 at0019 = ╱42╱B╱ // 0xb65 @0x19
0x0b4c…0b75 at001a = ╱4d╱M╱ // 0xb66 @0x1a
0x0b4c…0b75 at001b = ╱4f╱O╱ // 0xb67 @0x1b
0x0b4c…0b75 at001c = ╱4d╱M╱ // 0xb68 @0x1c
0x0b4c…0b75 at001d = ╱53╱S╱ // 0xb69 @0x1d
0x0b4c…0b75 at001e = ╱ef╱$╱ // 0xb6a @0x1e
0x0b4c…0b75 at001f = ╱ec╱,╱ // 0xb6b @0x1f
0x0b4c…0b75 at0020 = ╱55╱U╱ // 0xb6c @0x20
0x0b4c…0b75 at0021 = ╱44╱D╱ // 0xb6d @0x21
0x0b4c…0b75 at0022 = ╱4d╱M╱ // 0xb6e @0x22
0x0b4c…0b75 at0023 = ╱4f╱O╱ // 0xb6f @0x23
0x0b4c…0b75 at0024 = ╱4d╱M╱ // 0xb70 @0x24
0x0b4c…0b75 at0025 = ╱53╱S╱ // 0xb71 @0x25
0x0b4c…0b75 at0026 = ╱ef╱$╱ // 0xb72 @0x26
0x0b4c…0b75 at0027 = ╱ee╱)╱ // 0xb73 @0x27
0x0b4c…0b75 at0028 = EOL // 0xb74 @0x28
0x0b4c…0b75 }
0x0b75…0b7b 98d2 0900 ENDIF
0x0b75…0b7b LineComalBin {
0x0b75…0b7b ptr = 0x98d2 // 0xb75 @0x0
0x0b75…0b7b lno = 0x0384 // 0xb77 @0x2
0x0b75…0b7b at0004 = ╱9b╱ ENDIF ╱ // 0xb79 @0x4
0x0b75…0b7b at0005 = EOL // 0xb7a @0x5
0x0b75…0b7b }
0x0b7b…0b88 98df 0910 BE2$=B9$
0x0b7b…0b88 LineComalBin {
0x0b7b…0b88 ptr = 0x98df // 0xb7b @0x0
0x0b7b…0b88 lno = 0x038e // 0xb7d @0x2
0x0b7b…0b88 at0004 = ╱42╱B╱ // 0xb7f @0x4
0x0b7b…0b88 at0005 = ╱45╱E╱ // 0xb80 @0x5
0x0b7b…0b88 at0006 = ╱32╱2╱ // 0xb81 @0x6
0x0b7b…0b88 at0007 = ╱ef╱$╱ // 0xb82 @0x7
0x0b7b…0b88 at0008 = ╱dc╱=╱ // 0xb83 @0x8
0x0b7b…0b88 at0009 = ╱42╱B╱ // 0xb84 @0x9
0x0b7b…0b88 at000a = ╱39╱9╱ // 0xb85 @0xa
0x0b7b…0b88 at000b = ╱ef╱$╱ // 0xb86 @0xb
0x0b7b…0b88 at000c = EOL // 0xb87 @0xc
0x0b7b…0b88 }
0x0b88…0b8e 98e5 0920 ENDIF
0x0b88…0b8e LineComalBin {
0x0b88…0b8e ptr = 0x98e5 // 0xb88 @0x0
0x0b88…0b8e lno = 0x0398 // 0xb8a @0x2
0x0b88…0b8e at0004 = ╱9b╱ ENDIF ╱ // 0xb8c @0x4
0x0b88…0b8e at0005 = EOL // 0xb8d @0x5
0x0b88…0b8e }
0x0b8e…0ba6 98fd 0930 IF BE2$(LEN(BE2$))="-" THEN
0x0b8e…0ba6 LineComalBin {
0x0b8e…0ba6 ptr = 0x98fd // 0xb8e @0x0
0x0b8e…0ba6 lno = 0x03a2 // 0xb90 @0x2
0x0b8e…0ba6 at0004 = ╱9c╱ IF ╱ // 0xb92 @0x4
0x0b8e…0ba6 at0005 = ╱42╱B╱ // 0xb93 @0x5
0x0b8e…0ba6 at0006 = ╱45╱E╱ // 0xb94 @0x6
0x0b8e…0ba6 at0007 = ╱32╱2╱ // 0xb95 @0x7
0x0b8e…0ba6 at0008 = ╱ef╱$╱ // 0xb96 @0x8
0x0b8e…0ba6 at0009 = ╱ed╱(╱ // 0xb97 @0x9
0x0b8e…0ba6 at000a = ╱cc╱LEN╱ // 0xb98 @0xa
0x0b8e…0ba6 at000b = ╱ed╱(╱ // 0xb99 @0xb
0x0b8e…0ba6 at000c = ╱42╱B╱ // 0xb9a @0xc
0x0b8e…0ba6 at000d = ╱45╱E╱ // 0xb9b @0xd
0x0b8e…0ba6 at000e = ╱32╱2╱ // 0xb9c @0xe
0x0b8e…0ba6 at000f = ╱ef╱$╱ // 0xb9d @0xf
0x0b8e…0ba6 at0010 = ╱ee╱)╱ // 0xb9e @0x10
0x0b8e…0ba6 at0011 = ╱ee╱)╱ // 0xb9f @0x11
0x0b8e…0ba6 at0012 = ╱dc╱=╱ // 0xba0 @0x12
0x0b8e…0ba6 at0013 = ╱22╱"╱ // 0xba1 @0x13
0x0b8e…0ba6 at0014 = ╱2d╱-╱ // 0xba2 @0x14
0x0b8e…0ba6 at0015 = ╱22╱"╱ // 0xba3 @0x15
0x0b8e…0ba6 at0016 = ╱b6╱ THEN ╱ // 0xba4 @0x16
0x0b8e…0ba6 at0017 = EOL // 0xba5 @0x17
0x0b8e…0ba6 }
0x0ba6…0bd1 9928 0940 EXEC CALC(0,FMKREDIT$,BE2$,FMKREDIT$)
0x0ba6…0bd1 LineComalBin {
0x0ba6…0bd1 ptr = 0x9928 // 0xba6 @0x0
0x0ba6…0bd1 lno = 0x03ac // 0xba8 @0x2
0x0ba6…0bd1 at0004 = ╱9d╱ EXEC ╱ // 0xbaa @0x4
0x0ba6…0bd1 at0005 = ╱43╱C╱ // 0xbab @0x5
0x0ba6…0bd1 at0006 = ╱41╱A╱ // 0xbac @0x6
0x0ba6…0bd1 at0007 = ╱4c╱L╱ // 0xbad @0x7
0x0ba6…0bd1 at0008 = ╱43╱C╱ // 0xbae @0x8
0x0ba6…0bd1 at0009 = ╱ed╱(╱ // 0xbaf @0x9
0x0ba6…0bd1 at000a = ╱30╱0╱ // 0xbb0 @0xa
0x0ba6…0bd1 at000b = ╱fe00000000╱ // 0xbb1 @0xb
0x0ba6…0bd1 at0010 = ╱ec╱,╱ // 0xbb6 @0x10
0x0ba6…0bd1 at0011 = ╱46╱F╱ // 0xbb7 @0x11
0x0ba6…0bd1 at0012 = ╱4d╱M╱ // 0xbb8 @0x12
0x0ba6…0bd1 at0013 = ╱4b╱K╱ // 0xbb9 @0x13
0x0ba6…0bd1 at0014 = ╱52╱R╱ // 0xbba @0x14
0x0ba6…0bd1 at0015 = ╱45╱E╱ // 0xbbb @0x15
0x0ba6…0bd1 at0016 = ╱44╱D╱ // 0xbbc @0x16
0x0ba6…0bd1 at0017 = ╱49╱I╱ // 0xbbd @0x17
0x0ba6…0bd1 at0018 = ╱54╱T╱ // 0xbbe @0x18
0x0ba6…0bd1 at0019 = ╱ef╱$╱ // 0xbbf @0x19
0x0ba6…0bd1 at001a = ╱ec╱,╱ // 0xbc0 @0x1a
0x0ba6…0bd1 at001b = ╱42╱B╱ // 0xbc1 @0x1b
0x0ba6…0bd1 at001c = ╱45╱E╱ // 0xbc2 @0x1c
0x0ba6…0bd1 at001d = ╱32╱2╱ // 0xbc3 @0x1d
0x0ba6…0bd1 at001e = ╱ef╱$╱ // 0xbc4 @0x1e
0x0ba6…0bd1 at001f = ╱ec╱,╱ // 0xbc5 @0x1f
0x0ba6…0bd1 at0020 = ╱46╱F╱ // 0xbc6 @0x20
0x0ba6…0bd1 at0021 = ╱4d╱M╱ // 0xbc7 @0x21
0x0ba6…0bd1 at0022 = ╱4b╱K╱ // 0xbc8 @0x22
0x0ba6…0bd1 at0023 = ╱52╱R╱ // 0xbc9 @0x23
0x0ba6…0bd1 at0024 = ╱45╱E╱ // 0xbca @0x24
0x0ba6…0bd1 at0025 = ╱44╱D╱ // 0xbcb @0x25
0x0ba6…0bd1 at0026 = ╱49╱I╱ // 0xbcc @0x26
0x0ba6…0bd1 at0027 = ╱54╱T╱ // 0xbcd @0x27
0x0ba6…0bd1 at0028 = ╱ef╱$╱ // 0xbce @0x28
0x0ba6…0bd1 at0029 = ╱ee╱)╱ // 0xbcf @0x29
0x0ba6…0bd1 at002a = EOL // 0xbd0 @0x2a
0x0ba6…0bd1 }
0x0bd1…0bfc 9953 0950 EXEC CALC(0,FÅKREDIT$,BE2$,FÅKREDIT$)
0x0bd1…0bfc LineComalBin {
0x0bd1…0bfc ptr = 0x9953 // 0xbd1 @0x0
0x0bd1…0bfc lno = 0x03b6 // 0xbd3 @0x2
0x0bd1…0bfc at0004 = ╱9d╱ EXEC ╱ // 0xbd5 @0x4
0x0bd1…0bfc at0005 = ╱43╱C╱ // 0xbd6 @0x5
0x0bd1…0bfc at0006 = ╱41╱A╱ // 0xbd7 @0x6
0x0bd1…0bfc at0007 = ╱4c╱L╱ // 0xbd8 @0x7
0x0bd1…0bfc at0008 = ╱43╱C╱ // 0xbd9 @0x8
0x0bd1…0bfc at0009 = ╱ed╱(╱ // 0xbda @0x9
0x0bd1…0bfc at000a = ╱30╱0╱ // 0xbdb @0xa
0x0bd1…0bfc at000b = ╱fe00000000╱ // 0xbdc @0xb
0x0bd1…0bfc at0010 = ╱ec╱,╱ // 0xbe1 @0x10
0x0bd1…0bfc at0011 = ╱46╱F╱ // 0xbe2 @0x11
0x0bd1…0bfc at0012 = ╱5d╱Å╱ // 0xbe3 @0x12
0x0bd1…0bfc at0013 = ╱4b╱K╱ // 0xbe4 @0x13
0x0bd1…0bfc at0014 = ╱52╱R╱ // 0xbe5 @0x14
0x0bd1…0bfc at0015 = ╱45╱E╱ // 0xbe6 @0x15
0x0bd1…0bfc at0016 = ╱44╱D╱ // 0xbe7 @0x16
0x0bd1…0bfc at0017 = ╱49╱I╱ // 0xbe8 @0x17
0x0bd1…0bfc at0018 = ╱54╱T╱ // 0xbe9 @0x18
0x0bd1…0bfc at0019 = ╱ef╱$╱ // 0xbea @0x19
0x0bd1…0bfc at001a = ╱ec╱,╱ // 0xbeb @0x1a
0x0bd1…0bfc at001b = ╱42╱B╱ // 0xbec @0x1b
0x0bd1…0bfc at001c = ╱45╱E╱ // 0xbed @0x1c
0x0bd1…0bfc at001d = ╱32╱2╱ // 0xbee @0x1d
0x0bd1…0bfc at001e = ╱ef╱$╱ // 0xbef @0x1e
0x0bd1…0bfc at001f = ╱ec╱,╱ // 0xbf0 @0x1f
0x0bd1…0bfc at0020 = ╱46╱F╱ // 0xbf1 @0x20
0x0bd1…0bfc at0021 = ╱5d╱Å╱ // 0xbf2 @0x21
0x0bd1…0bfc at0022 = ╱4b╱K╱ // 0xbf3 @0x22
0x0bd1…0bfc at0023 = ╱52╱R╱ // 0xbf4 @0x23
0x0bd1…0bfc at0024 = ╱45╱E╱ // 0xbf5 @0x24
0x0bd1…0bfc at0025 = ╱44╱D╱ // 0xbf6 @0x25
0x0bd1…0bfc at0026 = ╱49╱I╱ // 0xbf7 @0x26
0x0bd1…0bfc at0027 = ╱54╱T╱ // 0xbf8 @0x27
0x0bd1…0bfc at0028 = ╱ef╱$╱ // 0xbf9 @0x28
0x0bd1…0bfc at0029 = ╱ee╱)╱ // 0xbfa @0x29
0x0bd1…0bfc at002a = EOL // 0xbfb @0x2a
0x0bd1…0bfc }
0x0bfc…0c02 9959 0960 ELSE
0x0bfc…0c02 LineComalBin {
0x0bfc…0c02 ptr = 0x9959 // 0xbfc @0x0
0x0bfc…0c02 lno = 0x03c0 // 0xbfe @0x2
0x0bfc…0c02 at0004 = ╱9a╱ ELSE ╱ // 0xc00 @0x4
0x0bfc…0c02 at0005 = EOL // 0xc01 @0x5
0x0bfc…0c02 }
0x0c02…0c2b 9982 0970 EXEC CALC(0,FMDEBET$,BE2$,FMDEBET$)
0x0c02…0c2b LineComalBin {
0x0c02…0c2b ptr = 0x9982 // 0xc02 @0x0
0x0c02…0c2b lno = 0x03ca // 0xc04 @0x2
0x0c02…0c2b at0004 = ╱9d╱ EXEC ╱ // 0xc06 @0x4
0x0c02…0c2b at0005 = ╱43╱C╱ // 0xc07 @0x5
0x0c02…0c2b at0006 = ╱41╱A╱ // 0xc08 @0x6
0x0c02…0c2b at0007 = ╱4c╱L╱ // 0xc09 @0x7
0x0c02…0c2b at0008 = ╱43╱C╱ // 0xc0a @0x8
0x0c02…0c2b at0009 = ╱ed╱(╱ // 0xc0b @0x9
0x0c02…0c2b at000a = ╱30╱0╱ // 0xc0c @0xa
0x0c02…0c2b at000b = ╱fe00000000╱ // 0xc0d @0xb
0x0c02…0c2b at0010 = ╱ec╱,╱ // 0xc12 @0x10
0x0c02…0c2b at0011 = ╱46╱F╱ // 0xc13 @0x11
0x0c02…0c2b at0012 = ╱4d╱M╱ // 0xc14 @0x12
0x0c02…0c2b at0013 = ╱44╱D╱ // 0xc15 @0x13
0x0c02…0c2b at0014 = ╱45╱E╱ // 0xc16 @0x14
0x0c02…0c2b at0015 = ╱42╱B╱ // 0xc17 @0x15
0x0c02…0c2b at0016 = ╱45╱E╱ // 0xc18 @0x16
0x0c02…0c2b at0017 = ╱54╱T╱ // 0xc19 @0x17
0x0c02…0c2b at0018 = ╱ef╱$╱ // 0xc1a @0x18
0x0c02…0c2b at0019 = ╱ec╱,╱ // 0xc1b @0x19
0x0c02…0c2b at001a = ╱42╱B╱ // 0xc1c @0x1a
0x0c02…0c2b at001b = ╱45╱E╱ // 0xc1d @0x1b
0x0c02…0c2b at001c = ╱32╱2╱ // 0xc1e @0x1c
0x0c02…0c2b at001d = ╱ef╱$╱ // 0xc1f @0x1d
0x0c02…0c2b at001e = ╱ec╱,╱ // 0xc20 @0x1e
0x0c02…0c2b at001f = ╱46╱F╱ // 0xc21 @0x1f
0x0c02…0c2b at0020 = ╱4d╱M╱ // 0xc22 @0x20
0x0c02…0c2b at0021 = ╱44╱D╱ // 0xc23 @0x21
0x0c02…0c2b at0022 = ╱45╱E╱ // 0xc24 @0x22
0x0c02…0c2b at0023 = ╱42╱B╱ // 0xc25 @0x23
0x0c02…0c2b at0024 = ╱45╱E╱ // 0xc26 @0x24
0x0c02…0c2b at0025 = ╱54╱T╱ // 0xc27 @0x25
0x0c02…0c2b at0026 = ╱ef╱$╱ // 0xc28 @0x26
0x0c02…0c2b at0027 = ╱ee╱)╱ // 0xc29 @0x27
0x0c02…0c2b at0028 = EOL // 0xc2a @0x28
0x0c02…0c2b }
0x0c2b…0c54 99ab 0980 EXEC CALC(0,FÅDEBET$,BE2$,FÅDEBET$)
0x0c2b…0c54 LineComalBin {
0x0c2b…0c54 ptr = 0x99ab // 0xc2b @0x0
0x0c2b…0c54 lno = 0x03d4 // 0xc2d @0x2
0x0c2b…0c54 at0004 = ╱9d╱ EXEC ╱ // 0xc2f @0x4
0x0c2b…0c54 at0005 = ╱43╱C╱ // 0xc30 @0x5
0x0c2b…0c54 at0006 = ╱41╱A╱ // 0xc31 @0x6
0x0c2b…0c54 at0007 = ╱4c╱L╱ // 0xc32 @0x7
0x0c2b…0c54 at0008 = ╱43╱C╱ // 0xc33 @0x8
0x0c2b…0c54 at0009 = ╱ed╱(╱ // 0xc34 @0x9
0x0c2b…0c54 at000a = ╱30╱0╱ // 0xc35 @0xa
0x0c2b…0c54 at000b = ╱fe00000000╱ // 0xc36 @0xb
0x0c2b…0c54 at0010 = ╱ec╱,╱ // 0xc3b @0x10
0x0c2b…0c54 at0011 = ╱46╱F╱ // 0xc3c @0x11
0x0c2b…0c54 at0012 = ╱5d╱Å╱ // 0xc3d @0x12
0x0c2b…0c54 at0013 = ╱44╱D╱ // 0xc3e @0x13
0x0c2b…0c54 at0014 = ╱45╱E╱ // 0xc3f @0x14
0x0c2b…0c54 at0015 = ╱42╱B╱ // 0xc40 @0x15
0x0c2b…0c54 at0016 = ╱45╱E╱ // 0xc41 @0x16
0x0c2b…0c54 at0017 = ╱54╱T╱ // 0xc42 @0x17
0x0c2b…0c54 at0018 = ╱ef╱$╱ // 0xc43 @0x18
0x0c2b…0c54 at0019 = ╱ec╱,╱ // 0xc44 @0x19
0x0c2b…0c54 at001a = ╱42╱B╱ // 0xc45 @0x1a
0x0c2b…0c54 at001b = ╱45╱E╱ // 0xc46 @0x1b
0x0c2b…0c54 at001c = ╱32╱2╱ // 0xc47 @0x1c
0x0c2b…0c54 at001d = ╱ef╱$╱ // 0xc48 @0x1d
0x0c2b…0c54 at001e = ╱ec╱,╱ // 0xc49 @0x1e
0x0c2b…0c54 at001f = ╱46╱F╱ // 0xc4a @0x1f
0x0c2b…0c54 at0020 = ╱5d╱Å╱ // 0xc4b @0x20
0x0c2b…0c54 at0021 = ╱44╱D╱ // 0xc4c @0x21
0x0c2b…0c54 at0022 = ╱45╱E╱ // 0xc4d @0x22
0x0c2b…0c54 at0023 = ╱42╱B╱ // 0xc4e @0x23
0x0c2b…0c54 at0024 = ╱45╱E╱ // 0xc4f @0x24
0x0c2b…0c54 at0025 = ╱54╱T╱ // 0xc50 @0x25
0x0c2b…0c54 at0026 = ╱ef╱$╱ // 0xc51 @0x26
0x0c2b…0c54 at0027 = ╱ee╱)╱ // 0xc52 @0x27
0x0c2b…0c54 at0028 = EOL // 0xc53 @0x28
0x0c2b…0c54 }
0x0c54…0c5a 99b1 0990 ENDIF
0x0c54…0c5a LineComalBin {
0x0c54…0c5a ptr = 0x99b1 // 0xc54 @0x0
0x0c54…0c5a lno = 0x03de // 0xc56 @0x2
0x0c54…0c5a at0004 = ╱9b╱ ENDIF ╱ // 0xc58 @0x4
0x0c54…0c5a at0005 = EOL // 0xc59 @0x5
0x0c54…0c5a }
0x0c5a…0c68 99bf 1000 EXEC GEMFPOST
0x0c5a…0c68 LineComalBin {
0x0c5a…0c68 ptr = 0x99bf // 0xc5a @0x0
0x0c5a…0c68 lno = 0x03e8 // 0xc5c @0x2
0x0c5a…0c68 at0004 = ╱9d╱ EXEC ╱ // 0xc5e @0x4
0x0c5a…0c68 at0005 = ╱47╱G╱ // 0xc5f @0x5
0x0c5a…0c68 at0006 = ╱45╱E╱ // 0xc60 @0x6
0x0c5a…0c68 at0007 = ╱4d╱M╱ // 0xc61 @0x7
0x0c5a…0c68 at0008 = ╱46╱F╱ // 0xc62 @0x8
0x0c5a…0c68 at0009 = ╱50╱P╱ // 0xc63 @0x9
0x0c5a…0c68 at000a = ╱4f╱O╱ // 0xc64 @0xa
0x0c5a…0c68 at000b = ╱53╱S╱ // 0xc65 @0xb
0x0c5a…0c68 at000c = ╱54╱T╱ // 0xc66 @0xc
0x0c5a…0c68 at000d = EOL // 0xc67 @0xd
0x0c5a…0c68 }
0x0c68…0c8c 99e3 1010 EXEC GEMMID(FMIDNR,K9$,KONTNR,ENT1)
0x0c68…0c8c LineComalBin {
0x0c68…0c8c ptr = 0x99e3 // 0xc68 @0x0
0x0c68…0c8c lno = 0x03f2 // 0xc6a @0x2
0x0c68…0c8c at0004 = ╱9d╱ EXEC ╱ // 0xc6c @0x4
0x0c68…0c8c at0005 = ╱47╱G╱ // 0xc6d @0x5
0x0c68…0c8c at0006 = ╱45╱E╱ // 0xc6e @0x6
0x0c68…0c8c at0007 = ╱4d╱M╱ // 0xc6f @0x7
0x0c68…0c8c at0008 = ╱4d╱M╱ // 0xc70 @0x8
0x0c68…0c8c at0009 = ╱49╱I╱ // 0xc71 @0x9
0x0c68…0c8c at000a = ╱44╱D╱ // 0xc72 @0xa
0x0c68…0c8c at000b = ╱ed╱(╱ // 0xc73 @0xb
0x0c68…0c8c at000c = ╱46╱F╱ // 0xc74 @0xc
0x0c68…0c8c at000d = ╱4d╱M╱ // 0xc75 @0xd
0x0c68…0c8c at000e = ╱49╱I╱ // 0xc76 @0xe
0x0c68…0c8c at000f = ╱44╱D╱ // 0xc77 @0xf
0x0c68…0c8c at0010 = ╱4e╱N╱ // 0xc78 @0x10
0x0c68…0c8c at0011 = ╱52╱R╱ // 0xc79 @0x11
0x0c68…0c8c at0012 = ╱ec╱,╱ // 0xc7a @0x12
0x0c68…0c8c at0013 = ╱4b╱K╱ // 0xc7b @0x13
0x0c68…0c8c at0014 = ╱39╱9╱ // 0xc7c @0x14
0x0c68…0c8c at0015 = ╱ef╱$╱ // 0xc7d @0x15
0x0c68…0c8c at0016 = ╱ec╱,╱ // 0xc7e @0x16
0x0c68…0c8c at0017 = ╱4b╱K╱ // 0xc7f @0x17
0x0c68…0c8c at0018 = ╱4f╱O╱ // 0xc80 @0x18
0x0c68…0c8c at0019 = ╱4e╱N╱ // 0xc81 @0x19
0x0c68…0c8c at001a = ╱54╱T╱ // 0xc82 @0x1a
0x0c68…0c8c at001b = ╱4e╱N╱ // 0xc83 @0x1b
0x0c68…0c8c at001c = ╱52╱R╱ // 0xc84 @0x1c
0x0c68…0c8c at001d = ╱ec╱,╱ // 0xc85 @0x1d
0x0c68…0c8c at001e = ╱45╱E╱ // 0xc86 @0x1e
0x0c68…0c8c at001f = ╱4e╱N╱ // 0xc87 @0x1f
0x0c68…0c8c at0020 = ╱54╱T╱ // 0xc88 @0x20
0x0c68…0c8c at0021 = ╱31╱1╱ // 0xc89 @0x21
0x0c68…0c8c at0022 = ╱ee╱)╱ // 0xc8a @0x22
0x0c68…0c8c at0023 = EOL // 0xc8b @0x23
0x0c68…0c8c }
0x0c8c…0c92 99e9 1020 ENDIF
0x0c8c…0c92 LineComalBin {
0x0c8c…0c92 ptr = 0x99e9 // 0xc8c @0x0
0x0c8c…0c92 lno = 0x03fc // 0xc8e @0x2
0x0c8c…0c92 at0004 = ╱9b╱ ENDIF ╱ // 0xc90 @0x4
0x0c8c…0c92 at0005 = EOL // 0xc91 @0x5
0x0c8c…0c92 }
0x0c92…0c98 99ef 1030 ENDIF
0x0c92…0c98 LineComalBin {
0x0c92…0c98 ptr = 0x99ef // 0xc92 @0x0
0x0c92…0c98 lno = 0x0406 // 0xc94 @0x2
0x0c92…0c98 at0004 = ╱9b╱ ENDIF ╱ // 0xc96 @0x4
0x0c92…0c98 at0005 = EOL // 0xc97 @0x5
0x0c92…0c98 }
0x0c98…0cb0 9a07 1040 IF ENT1<>1000000 THEN
0x0c98…0cb0 LineComalBin {
0x0c98…0cb0 ptr = 0x9a07 // 0xc98 @0x0
0x0c98…0cb0 lno = 0x0410 // 0xc9a @0x2
0x0c98…0cb0 at0004 = ╱9c╱ IF ╱ // 0xc9c @0x4
0x0c98…0cb0 at0005 = ╱45╱E╱ // 0xc9d @0x5
0x0c98…0cb0 at0006 = ╱4e╱N╱ // 0xc9e @0x6
0x0c98…0cb0 at0007 = ╱54╱T╱ // 0xc9f @0x7
0x0c98…0cb0 at0008 = ╱31╱1╱ // 0xca0 @0x8
0x0c98…0cb0 at0009 = ╱e1╱<>╱ // 0xca1 @0x9
0x0c98…0cb0 at000a = ╱31╱1╱ // 0xca2 @0xa
0x0c98…0cb0 at000b = ╱30╱0╱ // 0xca3 @0xb
0x0c98…0cb0 at000c = ╱30╱0╱ // 0xca4 @0xc
0x0c98…0cb0 at000d = ╱30╱0╱ // 0xca5 @0xd
0x0c98…0cb0 at000e = ╱30╱0╱ // 0xca6 @0xe
0x0c98…0cb0 at000f = ╱30╱0╱ // 0xca7 @0xf
0x0c98…0cb0 at0010 = ╱30╱0╱ // 0xca8 @0x10
0x0c98…0cb0 at0011 = ╱fe0024f414╱ // 0xca9 @0x11
0x0c98…0cb0 at0016 = ╱b6╱ THEN ╱ // 0xcae @0x16
0x0c98…0cb0 at0017 = EOL // 0xcaf @0x17
0x0c98…0cb0 }
0x0cb0…0cc1 9a18 1050 EPIL2=1
0x0cb0…0cc1 LineComalBin {
0x0cb0…0cc1 ptr = 0x9a18 // 0xcb0 @0x0
0x0cb0…0cc1 lno = 0x041a // 0xcb2 @0x2
0x0cb0…0cc1 at0004 = ╱45╱E╱ // 0xcb4 @0x4
0x0cb0…0cc1 at0005 = ╱50╱P╱ // 0xcb5 @0x5
0x0cb0…0cc1 at0006 = ╱49╱I╱ // 0xcb6 @0x6
0x0cb0…0cc1 at0007 = ╱4c╱L╱ // 0xcb7 @0x7
0x0cb0…0cc1 at0008 = ╱32╱2╱ // 0xcb8 @0x8
0x0cb0…0cc1 at0009 = ╱dc╱=╱ // 0xcb9 @0x9
0x0cb0…0cc1 at000a = ╱31╱1╱ // 0xcba @0xa
0x0cb0…0cc1 at000b = ╱fe00008001╱ // 0xcbb @0xb
0x0cb0…0cc1 at0010 = EOL // 0xcc0 @0x10
0x0cb0…0cc1 }
0x0cc1…0cff 9a56 1060 EXEC FINDPOST1(ETAB1,ETAB,MEANTAL,(ENT1 DIV 100),EPIL3,K15$)
0x0cc1…0cff LineComalBin {
0x0cc1…0cff ptr = 0x9a56 // 0xcc1 @0x0
0x0cc1…0cff lno = 0x0424 // 0xcc3 @0x2
0x0cc1…0cff at0004 = ╱9d╱ EXEC ╱ // 0xcc5 @0x4
0x0cc1…0cff at0005 = ╱46╱F╱ // 0xcc6 @0x5
0x0cc1…0cff at0006 = ╱49╱I╱ // 0xcc7 @0x6
0x0cc1…0cff at0007 = ╱4e╱N╱ // 0xcc8 @0x7
0x0cc1…0cff at0008 = ╱44╱D╱ // 0xcc9 @0x8
0x0cc1…0cff at0009 = ╱50╱P╱ // 0xcca @0x9
0x0cc1…0cff at000a = ╱4f╱O╱ // 0xccb @0xa
0x0cc1…0cff at000b = ╱53╱S╱ // 0xccc @0xb
0x0cc1…0cff at000c = ╱54╱T╱ // 0xccd @0xc
0x0cc1…0cff at000d = ╱31╱1╱ // 0xcce @0xd
0x0cc1…0cff at000e = ╱ed╱(╱ // 0xccf @0xe
0x0cc1…0cff at000f = ╱45╱E╱ // 0xcd0 @0xf
0x0cc1…0cff at0010 = ╱54╱T╱ // 0xcd1 @0x10
0x0cc1…0cff at0011 = ╱41╱A╱ // 0xcd2 @0x11
0x0cc1…0cff at0012 = ╱42╱B╱ // 0xcd3 @0x12
0x0cc1…0cff at0013 = ╱31╱1╱ // 0xcd4 @0x13
0x0cc1…0cff at0014 = ╱ec╱,╱ // 0xcd5 @0x14
0x0cc1…0cff at0015 = ╱45╱E╱ // 0xcd6 @0x15
0x0cc1…0cff at0016 = ╱54╱T╱ // 0xcd7 @0x16
0x0cc1…0cff at0017 = ╱41╱A╱ // 0xcd8 @0x17
0x0cc1…0cff at0018 = ╱42╱B╱ // 0xcd9 @0x18
0x0cc1…0cff at0019 = ╱ec╱,╱ // 0xcda @0x19
0x0cc1…0cff at001a = ╱4d╱M╱ // 0xcdb @0x1a
0x0cc1…0cff at001b = ╱45╱E╱ // 0xcdc @0x1b
0x0cc1…0cff at001c = ╱41╱A╱ // 0xcdd @0x1c
0x0cc1…0cff at001d = ╱4e╱N╱ // 0xcde @0x1d
0x0cc1…0cff at001e = ╱54╱T╱ // 0xcdf @0x1e
0x0cc1…0cff at001f = ╱41╱A╱ // 0xce0 @0x1f
0x0cc1…0cff at0020 = ╱4c╱L╱ // 0xce1 @0x20
0x0cc1…0cff at0021 = ╱ec╱,╱ // 0xce2 @0x21
0x0cc1…0cff at0022 = ╱ed╱(╱ // 0xce3 @0x22
0x0cc1…0cff at0023 = ╱45╱E╱ // 0xce4 @0x23
0x0cc1…0cff at0024 = ╱4e╱N╱ // 0xce5 @0x24
0x0cc1…0cff at0025 = ╱54╱T╱ // 0xce6 @0x25
0x0cc1…0cff at0026 = ╱31╱1╱ // 0xce7 @0x26
0x0cc1…0cff at0027 = ╱e7╱ DIV ╱ // 0xce8 @0x27
0x0cc1…0cff at0028 = ╱31╱1╱ // 0xce9 @0x28
0x0cc1…0cff at0029 = ╱30╱0╱ // 0xcea @0x29
0x0cc1…0cff at002a = ╱30╱0╱ // 0xceb @0x2a
0x0cc1…0cff at002b = ╱fe0000c807╱ // 0xcec @0x2b
0x0cc1…0cff at0030 = ╱ee╱)╱ // 0xcf1 @0x30
0x0cc1…0cff at0031 = ╱ec╱,╱ // 0xcf2 @0x31
0x0cc1…0cff at0032 = ╱45╱E╱ // 0xcf3 @0x32
0x0cc1…0cff at0033 = ╱50╱P╱ // 0xcf4 @0x33
0x0cc1…0cff at0034 = ╱49╱I╱ // 0xcf5 @0x34
0x0cc1…0cff at0035 = ╱4c╱L╱ // 0xcf6 @0x35
0x0cc1…0cff at0036 = ╱33╱3╱ // 0xcf7 @0x36
0x0cc1…0cff at0037 = ╱ec╱,╱ // 0xcf8 @0x37
0x0cc1…0cff at0038 = ╱4b╱K╱ // 0xcf9 @0x38
0x0cc1…0cff at0039 = ╱31╱1╱ // 0xcfa @0x39
0x0cc1…0cff at003a = ╱35╱5╱ // 0xcfb @0x3a
0x0cc1…0cff at003b = ╱ef╱$╱ // 0xcfc @0x3b
0x0cc1…0cff at003c = ╱ee╱)╱ // 0xcfd @0x3c
0x0cc1…0cff at003d = EOL // 0xcfe @0x3d
0x0cc1…0cff }
0x0cff…0d11 9a68 1070 IF CEKS=0 THEN
0x0cff…0d11 LineComalBin {
0x0cff…0d11 ptr = 0x9a68 // 0xcff @0x0
0x0cff…0d11 lno = 0x042e // 0xd01 @0x2
0x0cff…0d11 at0004 = ╱9c╱ IF ╱ // 0xd03 @0x4
0x0cff…0d11 at0005 = ╱43╱C╱ // 0xd04 @0x5
0x0cff…0d11 at0006 = ╱45╱E╱ // 0xd05 @0x6
0x0cff…0d11 at0007 = ╱4b╱K╱ // 0xd06 @0x7
0x0cff…0d11 at0008 = ╱53╱S╱ // 0xd07 @0x8
0x0cff…0d11 at0009 = ╱dc╱=╱ // 0xd08 @0x9
0x0cff…0d11 at000a = ╱30╱0╱ // 0xd09 @0xa
0x0cff…0d11 at000b = ╱fe00000000╱ // 0xd0a @0xb
0x0cff…0d11 at0010 = ╱b6╱ THEN ╱ // 0xd0f @0x10
0x0cff…0d11 at0011 = EOL // 0xd10 @0x11
0x0cff…0d11 }
0x0d11…0d31 9a88 1080 FOR EPIL1=1 TO METOT+MUNKANT
0x0d11…0d31 LineComalBin {
0x0d11…0d31 ptr = 0x9a88 // 0xd11 @0x0
0x0d11…0d31 lno = 0x0438 // 0xd13 @0x2
0x0d11…0d31 at0004 = ╱83╱ FOR ╱ // 0xd15 @0x4
0x0d11…0d31 at0005 = ╱45╱E╱ // 0xd16 @0x5
0x0d11…0d31 at0006 = ╱50╱P╱ // 0xd17 @0x6
0x0d11…0d31 at0007 = ╱49╱I╱ // 0xd18 @0x7
0x0d11…0d31 at0008 = ╱4c╱L╱ // 0xd19 @0x8
0x0d11…0d31 at0009 = ╱31╱1╱ // 0xd1a @0x9
0x0d11…0d31 at000a = ╱dc╱=╱ // 0xd1b @0xa
0x0d11…0d31 at000b = ╱31╱1╱ // 0xd1c @0xb
0x0d11…0d31 at000c = ╱fe00008001╱ // 0xd1d @0xc
0x0d11…0d31 at0011 = ╱b7╱ TO ╱ // 0xd22 @0x11
0x0d11…0d31 at0012 = ╱4d╱M╱ // 0xd23 @0x12
0x0d11…0d31 at0013 = ╱45╱E╱ // 0xd24 @0x13
0x0d11…0d31 at0014 = ╱54╱T╱ // 0xd25 @0x14
0x0d11…0d31 at0015 = ╱4f╱O╱ // 0xd26 @0x15
0x0d11…0d31 at0016 = ╱54╱T╱ // 0xd27 @0x16
0x0d11…0d31 at0017 = ╱e2╱+╱ // 0xd28 @0x17
0x0d11…0d31 at0018 = ╱4d╱M╱ // 0xd29 @0x18
0x0d11…0d31 at0019 = ╱55╱U╱ // 0xd2a @0x19
0x0d11…0d31 at001a = ╱4e╱N╱ // 0xd2b @0x1a
0x0d11…0d31 at001b = ╱4b╱K╱ // 0xd2c @0x1b
0x0d11…0d31 at001c = ╱41╱A╱ // 0xd2d @0x1c
0x0d11…0d31 at001d = ╱4e╱N╱ // 0xd2e @0x1d
0x0d11…0d31 at001e = ╱54╱T╱ // 0xd2f @0x1e
0x0d11…0d31 at001f = EOL // 0xd30 @0x1f
0x0d11…0d31 }
0x0d31…0d41 9a98 1090 CEKS=0
0x0d31…0d41 LineComalBin {
0x0d31…0d41 ptr = 0x9a98 // 0xd31 @0x0
0x0d31…0d41 lno = 0x0442 // 0xd33 @0x2
0x0d31…0d41 at0004 = ╱43╱C╱ // 0xd35 @0x4
0x0d31…0d41 at0005 = ╱45╱E╱ // 0xd36 @0x5
0x0d31…0d41 at0006 = ╱4b╱K╱ // 0xd37 @0x6
0x0d31…0d41 at0007 = ╱53╱S╱ // 0xd38 @0x7
0x0d31…0d41 at0008 = ╱dc╱=╱ // 0xd39 @0x8
0x0d31…0d41 at0009 = ╱30╱0╱ // 0xd3a @0x9
0x0d31…0d41 at000a = ╱fe00000000╱ // 0xd3b @0xa
0x0d31…0d41 at000f = EOL // 0xd40 @0xf
0x0d31…0d41 }
0x0d41…0d72 9ac9 1100 IF (ENT1 MOD 100)=ENR(EPIL2) AND EU$(EPIL1)="0" THEN EXIT
0x0d41…0d72 LineComalBin {
0x0d41…0d72 ptr = 0x9ac9 // 0xd41 @0x0
0x0d41…0d72 lno = 0x044c // 0xd43 @0x2
0x0d41…0d72 at0004 = ╱82╱ IF ╱ // 0xd45 @0x4
0x0d41…0d72 at0005 = ╱ed╱(╱ // 0xd46 @0x5
0x0d41…0d72 at0006 = ╱45╱E╱ // 0xd47 @0x6
0x0d41…0d72 at0007 = ╱4e╱N╱ // 0xd48 @0x7
0x0d41…0d72 at0008 = ╱54╱T╱ // 0xd49 @0x8
0x0d41…0d72 at0009 = ╱31╱1╱ // 0xd4a @0x9
0x0d41…0d72 at000a = ╱e8╱ MOD ╱ // 0xd4b @0xa
0x0d41…0d72 at000b = ╱31╱1╱ // 0xd4c @0xb
0x0d41…0d72 at000c = ╱30╱0╱ // 0xd4d @0xc
0x0d41…0d72 at000d = ╱30╱0╱ // 0xd4e @0xd
0x0d41…0d72 at000e = ╱fe0000c807╱ // 0xd4f @0xe
0x0d41…0d72 at0013 = ╱ee╱)╱ // 0xd54 @0x13
0x0d41…0d72 at0014 = ╱dc╱=╱ // 0xd55 @0x14
0x0d41…0d72 at0015 = ╱45╱E╱ // 0xd56 @0x15
0x0d41…0d72 at0016 = ╱4e╱N╱ // 0xd57 @0x16
0x0d41…0d72 at0017 = ╱52╱R╱ // 0xd58 @0x17
0x0d41…0d72 at0018 = ╱ed╱(╱ // 0xd59 @0x18
0x0d41…0d72 at0019 = ╱45╱E╱ // 0xd5a @0x19
0x0d41…0d72 at001a = ╱50╱P╱ // 0xd5b @0x1a
0x0d41…0d72 at001b = ╱49╱I╱ // 0xd5c @0x1b
0x0d41…0d72 at001c = ╱4c╱L╱ // 0xd5d @0x1c
0x0d41…0d72 at001d = ╱32╱2╱ // 0xd5e @0x1d
0x0d41…0d72 at001e = ╱ee╱)╱ // 0xd5f @0x1e
0x0d41…0d72 at001f = ╱da╱ AND ╱ // 0xd60 @0x1f
0x0d41…0d72 at0020 = ╱45╱E╱ // 0xd61 @0x20
0x0d41…0d72 at0021 = ╱55╱U╱ // 0xd62 @0x21
0x0d41…0d72 at0022 = ╱ef╱$╱ // 0xd63 @0x22
0x0d41…0d72 at0023 = ╱ed╱(╱ // 0xd64 @0x23
0x0d41…0d72 at0024 = ╱45╱E╱ // 0xd65 @0x24
0x0d41…0d72 at0025 = ╱50╱P╱ // 0xd66 @0x25
0x0d41…0d72 at0026 = ╱49╱I╱ // 0xd67 @0x26
0x0d41…0d72 at0027 = ╱4c╱L╱ // 0xd68 @0x27
0x0d41…0d72 at0028 = ╱31╱1╱ // 0xd69 @0x28
0x0d41…0d72 at0029 = ╱ee╱)╱ // 0xd6a @0x29
0x0d41…0d72 at002a = ╱dc╱=╱ // 0xd6b @0x2a
0x0d41…0d72 at002b = ╱22╱"╱ // 0xd6c @0x2b
0x0d41…0d72 at002c = ╱30╱0╱ // 0xd6d @0x2c
0x0d41…0d72 at002d = ╱22╱"╱ // 0xd6e @0x2d
0x0d41…0d72 at002e = ╱b6╱ THEN ╱ // 0xd6f @0x2e
0x0d41…0d72 at002f = ╱99╱ EXIT ╱ // 0xd70 @0x2f
0x0d41…0d72 at0030 = EOL // 0xd71 @0x30
0x0d41…0d72 }
0x0d72…0da6 9afd 1110 CEKS=1;EPIL2=EPIL2+1*(EU$(EPIL1)="0")
0x0d72…0da6 LineComalBin {
0x0d72…0da6 ptr = 0x9afd // 0xd72 @0x0
0x0d72…0da6 lno = 0x0456 // 0xd74 @0x2
0x0d72…0da6 at0004 = ╱43╱C╱ // 0xd76 @0x4
0x0d72…0da6 at0005 = ╱45╱E╱ // 0xd77 @0x5
0x0d72…0da6 at0006 = ╱4b╱K╱ // 0xd78 @0x6
0x0d72…0da6 at0007 = ╱53╱S╱ // 0xd79 @0x7
0x0d72…0da6 at0008 = ╱dc╱=╱ // 0xd7a @0x8
0x0d72…0da6 at0009 = ╱31╱1╱ // 0xd7b @0x9
0x0d72…0da6 at000a = ╱fe00008001╱ // 0xd7c @0xa
0x0d72…0da6 at000f = ╱eb╱;╱ // 0xd81 @0xf
0x0d72…0da6 at0010 = ╱45╱E╱ // 0xd82 @0x10
0x0d72…0da6 at0011 = ╱50╱P╱ // 0xd83 @0x11
0x0d72…0da6 at0012 = ╱49╱I╱ // 0xd84 @0x12
0x0d72…0da6 at0013 = ╱4c╱L╱ // 0xd85 @0x13
0x0d72…0da6 at0014 = ╱32╱2╱ // 0xd86 @0x14
0x0d72…0da6 at0015 = ╱dc╱=╱ // 0xd87 @0x15
0x0d72…0da6 at0016 = ╱45╱E╱ // 0xd88 @0x16
0x0d72…0da6 at0017 = ╱50╱P╱ // 0xd89 @0x17
0x0d72…0da6 at0018 = ╱49╱I╱ // 0xd8a @0x18
0x0d72…0da6 at0019 = ╱4c╱L╱ // 0xd8b @0x19
0x0d72…0da6 at001a = ╱32╱2╱ // 0xd8c @0x1a
0x0d72…0da6 at001b = ╱e2╱+╱ // 0xd8d @0x1b
0x0d72…0da6 at001c = ╱31╱1╱ // 0xd8e @0x1c
0x0d72…0da6 at001d = ╱fe00008001╱ // 0xd8f @0x1d
0x0d72…0da6 at0022 = ╱e4╱*╱ // 0xd94 @0x22
0x0d72…0da6 at0023 = ╱ed╱(╱ // 0xd95 @0x23
0x0d72…0da6 at0024 = ╱45╱E╱ // 0xd96 @0x24
0x0d72…0da6 at0025 = ╱55╱U╱ // 0xd97 @0x25
0x0d72…0da6 at0026 = ╱ef╱$╱ // 0xd98 @0x26
0x0d72…0da6 at0027 = ╱ed╱(╱ // 0xd99 @0x27
0x0d72…0da6 at0028 = ╱45╱E╱ // 0xd9a @0x28
0x0d72…0da6 at0029 = ╱50╱P╱ // 0xd9b @0x29
0x0d72…0da6 at002a = ╱49╱I╱ // 0xd9c @0x2a
0x0d72…0da6 at002b = ╱4c╱L╱ // 0xd9d @0x2b
0x0d72…0da6 at002c = ╱31╱1╱ // 0xd9e @0x2c
0x0d72…0da6 at002d = ╱ee╱)╱ // 0xd9f @0x2d
0x0d72…0da6 at002e = ╱dc╱=╱ // 0xda0 @0x2e
0x0d72…0da6 at002f = ╱22╱"╱ // 0xda1 @0x2f
0x0d72…0da6 at0030 = ╱30╱0╱ // 0xda2 @0x30
0x0d72…0da6 at0031 = ╱22╱"╱ // 0xda3 @0x31
0x0d72…0da6 at0032 = ╱ee╱)╱ // 0xda4 @0x32
0x0d72…0da6 at0033 = EOL // 0xda5 @0x33
0x0d72…0da6 }
0x0da6…0db1 9b08 1120 NEXT EPIL1
0x0da6…0db1 LineComalBin {
0x0da6…0db1 ptr = 0x9b08 // 0xda6 @0x0
0x0da6…0db1 lno = 0x0460 // 0xda8 @0x2
0x0da6…0db1 at0004 = ╱84╱ NEXT ╱ // 0xdaa @0x4
0x0da6…0db1 at0005 = ╱45╱E╱ // 0xdab @0x5
0x0da6…0db1 at0006 = ╱50╱P╱ // 0xdac @0x6
0x0da6…0db1 at0007 = ╱49╱I╱ // 0xdad @0x7
0x0da6…0db1 at0008 = ╱4c╱L╱ // 0xdae @0x8
0x0da6…0db1 at0009 = ╱31╱1╱ // 0xdaf @0x9
0x0da6…0db1 at000a = EOL // 0xdb0 @0xa
0x0da6…0db1 }
0x0db1…0dc3 9b1a 1130 IF CEKS=0 THEN
0x0db1…0dc3 LineComalBin {
0x0db1…0dc3 ptr = 0x9b1a // 0xdb1 @0x0
0x0db1…0dc3 lno = 0x046a // 0xdb3 @0x2
0x0db1…0dc3 at0004 = ╱9c╱ IF ╱ // 0xdb5 @0x4
0x0db1…0dc3 at0005 = ╱43╱C╱ // 0xdb6 @0x5
0x0db1…0dc3 at0006 = ╱45╱E╱ // 0xdb7 @0x6
0x0db1…0dc3 at0007 = ╱4b╱K╱ // 0xdb8 @0x7
0x0db1…0dc3 at0008 = ╱53╱S╱ // 0xdb9 @0x8
0x0db1…0dc3 at0009 = ╱dc╱=╱ // 0xdba @0x9
0x0db1…0dc3 at000a = ╱30╱0╱ // 0xdbb @0xa
0x0db1…0dc3 at000b = ╱fe00000000╱ // 0xdbc @0xb
0x0db1…0dc3 at0010 = ╱b6╱ THEN ╱ // 0xdc1 @0x10
0x0db1…0dc3 at0011 = EOL // 0xdc2 @0x11
0x0db1…0dc3 }
0x0dc3…0df2 9b49 1140 GET K14$,ETAB(EPIL3,2):NR9,EMREG$,EÅREG$
0x0dc3…0df2 LineComalBin {
0x0dc3…0df2 ptr = 0x9b49 // 0xdc3 @0x0
0x0dc3…0df2 lno = 0x0474 // 0xdc5 @0x2
0x0dc3…0df2 at0004 = ╱a9╱ GET ╱ // 0xdc7 @0x4
0x0dc3…0df2 at0005 = ╱4b╱K╱ // 0xdc8 @0x5
0x0dc3…0df2 at0006 = ╱31╱1╱ // 0xdc9 @0x6
0x0dc3…0df2 at0007 = ╱34╱4╱ // 0xdca @0x7
0x0dc3…0df2 at0008 = ╱ef╱$╱ // 0xdcb @0x8
0x0dc3…0df2 at0009 = ╱ec╱,╱ // 0xdcc @0x9
0x0dc3…0df2 at000a = ╱45╱E╱ // 0xdcd @0xa
0x0dc3…0df2 at000b = ╱54╱T╱ // 0xdce @0xb
0x0dc3…0df2 at000c = ╱41╱A╱ // 0xdcf @0xc
0x0dc3…0df2 at000d = ╱42╱B╱ // 0xdd0 @0xd
0x0dc3…0df2 at000e = ╱ed╱(╱ // 0xdd1 @0xe
0x0dc3…0df2 at000f = ╱45╱E╱ // 0xdd2 @0xf
0x0dc3…0df2 at0010 = ╱50╱P╱ // 0xdd3 @0x10
0x0dc3…0df2 at0011 = ╱49╱I╱ // 0xdd4 @0x11
0x0dc3…0df2 at0012 = ╱4c╱L╱ // 0xdd5 @0x12
0x0dc3…0df2 at0013 = ╱33╱3╱ // 0xdd6 @0x13
0x0dc3…0df2 at0014 = ╱ec╱,╱ // 0xdd7 @0x14
0x0dc3…0df2 at0015 = ╱32╱2╱ // 0xdd8 @0x15
0x0dc3…0df2 at0016 = ╱fe00008002╱ // 0xdd9 @0x16
0x0dc3…0df2 at001b = ╱ee╱)╱ // 0xdde @0x1b
0x0dc3…0df2 at001c = ╱f0╱:╱ // 0xddf @0x1c
0x0dc3…0df2 at001d = ╱4e╱N╱ // 0xde0 @0x1d
0x0dc3…0df2 at001e = ╱52╱R╱ // 0xde1 @0x1e
0x0dc3…0df2 at001f = ╱39╱9╱ // 0xde2 @0x1f
0x0dc3…0df2 at0020 = ╱ec╱,╱ // 0xde3 @0x20
0x0dc3…0df2 at0021 = ╱45╱E╱ // 0xde4 @0x21
0x0dc3…0df2 at0022 = ╱4d╱M╱ // 0xde5 @0x22
0x0dc3…0df2 at0023 = ╱52╱R╱ // 0xde6 @0x23
0x0dc3…0df2 at0024 = ╱45╱E╱ // 0xde7 @0x24
0x0dc3…0df2 at0025 = ╱47╱G╱ // 0xde8 @0x25
0x0dc3…0df2 at0026 = ╱ef╱$╱ // 0xde9 @0x26
0x0dc3…0df2 at0027 = ╱ec╱,╱ // 0xdea @0x27
0x0dc3…0df2 at0028 = ╱45╱E╱ // 0xdeb @0x28
0x0dc3…0df2 at0029 = ╱5d╱Å╱ // 0xdec @0x29
0x0dc3…0df2 at002a = ╱52╱R╱ // 0xded @0x2a
0x0dc3…0df2 at002b = ╱45╱E╱ // 0xdee @0x2b
0x0dc3…0df2 at002c = ╱47╱G╱ // 0xdef @0x2c
0x0dc3…0df2 at002d = ╱ef╱$╱ // 0xdf0 @0x2d
0x0dc3…0df2 at002e = EOL // 0xdf1 @0x2e
0x0dc3…0df2 }
0x0df2…0e12 9b69 1150 EXEC FEJL(20,20,K14$)
0x0df2…0e12 LineComalBin {
0x0df2…0e12 ptr = 0x9b69 // 0xdf2 @0x0
0x0df2…0e12 lno = 0x047e // 0xdf4 @0x2
0x0df2…0e12 at0004 = ╱9d╱ EXEC ╱ // 0xdf6 @0x4
0x0df2…0e12 at0005 = ╱46╱F╱ // 0xdf7 @0x5
0x0df2…0e12 at0006 = ╱45╱E╱ // 0xdf8 @0x6
0x0df2…0e12 at0007 = ╱4a╱J╱ // 0xdf9 @0x7
0x0df2…0e12 at0008 = ╱4c╱L╱ // 0xdfa @0x8
0x0df2…0e12 at0009 = ╱ed╱(╱ // 0xdfb @0x9
0x0df2…0e12 at000a = ╱32╱2╱ // 0xdfc @0xa
0x0df2…0e12 at000b = ╱30╱0╱ // 0xdfd @0xb
0x0df2…0e12 at000c = ╱fe0000a005╱ // 0xdfe @0xc
0x0df2…0e12 at0011 = ╱ec╱,╱ // 0xe03 @0x11
0x0df2…0e12 at0012 = ╱32╱2╱ // 0xe04 @0x12
0x0df2…0e12 at0013 = ╱30╱0╱ // 0xe05 @0x13
0x0df2…0e12 at0014 = ╱fe0000a005╱ // 0xe06 @0x14
0x0df2…0e12 at0019 = ╱ec╱,╱ // 0xe0b @0x19
0x0df2…0e12 at001a = ╱4b╱K╱ // 0xe0c @0x1a
0x0df2…0e12 at001b = ╱31╱1╱ // 0xe0d @0x1b
0x0df2…0e12 at001c = ╱34╱4╱ // 0xe0e @0x1c
0x0df2…0e12 at001d = ╱ef╱$╱ // 0xe0f @0x1d
0x0df2…0e12 at001e = ╱ee╱)╱ // 0xe10 @0x1e
0x0df2…0e12 at001f = EOL // 0xe11 @0x1f
0x0df2…0e12 }
0x0e12…0e4c 9ba3 1160 GET K14$,ETAB(EPIL3,2)+EPIL2+1:NR8,MBEV$,YBEV$
0x0e12…0e4c LineComalBin {
0x0e12…0e4c ptr = 0x9ba3 // 0xe12 @0x0
0x0e12…0e4c lno = 0x0488 // 0xe14 @0x2
0x0e12…0e4c at0004 = ╱a9╱ GET ╱ // 0xe16 @0x4
0x0e12…0e4c at0005 = ╱4b╱K╱ // 0xe17 @0x5
0x0e12…0e4c at0006 = ╱31╱1╱ // 0xe18 @0x6
0x0e12…0e4c at0007 = ╱34╱4╱ // 0xe19 @0x7
0x0e12…0e4c at0008 = ╱ef╱$╱ // 0xe1a @0x8
0x0e12…0e4c at0009 = ╱ec╱,╱ // 0xe1b @0x9
0x0e12…0e4c at000a = ╱45╱E╱ // 0xe1c @0xa
0x0e12…0e4c at000b = ╱54╱T╱ // 0xe1d @0xb
0x0e12…0e4c at000c = ╱41╱A╱ // 0xe1e @0xc
0x0e12…0e4c at000d = ╱42╱B╱ // 0xe1f @0xd
0x0e12…0e4c at000e = ╱ed╱(╱ // 0xe20 @0xe
0x0e12…0e4c at000f = ╱45╱E╱ // 0xe21 @0xf
0x0e12…0e4c at0010 = ╱50╱P╱ // 0xe22 @0x10
0x0e12…0e4c at0011 = ╱49╱I╱ // 0xe23 @0x11
0x0e12…0e4c at0012 = ╱4c╱L╱ // 0xe24 @0x12
0x0e12…0e4c at0013 = ╱33╱3╱ // 0xe25 @0x13
0x0e12…0e4c at0014 = ╱ec╱,╱ // 0xe26 @0x14
0x0e12…0e4c at0015 = ╱32╱2╱ // 0xe27 @0x15
0x0e12…0e4c at0016 = ╱fe00008002╱ // 0xe28 @0x16
0x0e12…0e4c at001b = ╱ee╱)╱ // 0xe2d @0x1b
0x0e12…0e4c at001c = ╱e2╱+╱ // 0xe2e @0x1c
0x0e12…0e4c at001d = ╱45╱E╱ // 0xe2f @0x1d
0x0e12…0e4c at001e = ╱50╱P╱ // 0xe30 @0x1e
0x0e12…0e4c at001f = ╱49╱I╱ // 0xe31 @0x1f
0x0e12…0e4c at0020 = ╱4c╱L╱ // 0xe32 @0x20
0x0e12…0e4c at0021 = ╱32╱2╱ // 0xe33 @0x21
0x0e12…0e4c at0022 = ╱e2╱+╱ // 0xe34 @0x22
0x0e12…0e4c at0023 = ╱31╱1╱ // 0xe35 @0x23
0x0e12…0e4c at0024 = ╱fe00008001╱ // 0xe36 @0x24
0x0e12…0e4c at0029 = ╱f0╱:╱ // 0xe3b @0x29
0x0e12…0e4c at002a = ╱4e╱N╱ // 0xe3c @0x2a
0x0e12…0e4c at002b = ╱52╱R╱ // 0xe3d @0x2b
0x0e12…0e4c at002c = ╱38╱8╱ // 0xe3e @0x2c
0x0e12…0e4c at002d = ╱ec╱,╱ // 0xe3f @0x2d
0x0e12…0e4c at002e = ╱4d╱M╱ // 0xe40 @0x2e
0x0e12…0e4c at002f = ╱42╱B╱ // 0xe41 @0x2f
0x0e12…0e4c at0030 = ╱45╱E╱ // 0xe42 @0x30
0x0e12…0e4c at0031 = ╱56╱V╱ // 0xe43 @0x31
0x0e12…0e4c at0032 = ╱ef╱$╱ // 0xe44 @0x32
0x0e12…0e4c at0033 = ╱ec╱,╱ // 0xe45 @0x33
0x0e12…0e4c at0034 = ╱59╱Y╱ // 0xe46 @0x34
0x0e12…0e4c at0035 = ╱42╱B╱ // 0xe47 @0x35
0x0e12…0e4c at0036 = ╱45╱E╱ // 0xe48 @0x36
0x0e12…0e4c at0037 = ╱56╱V╱ // 0xe49 @0x37
0x0e12…0e4c at0038 = ╱ef╱$╱ // 0xe4a @0x38
0x0e12…0e4c at0039 = EOL // 0xe4b @0x39
0x0e12…0e4c }
0x0e4c…0e6c 9bc3 1170 EXEC FEJL(20,21,K14$)
0x0e4c…0e6c LineComalBin {
0x0e4c…0e6c ptr = 0x9bc3 // 0xe4c @0x0
0x0e4c…0e6c lno = 0x0492 // 0xe4e @0x2
0x0e4c…0e6c at0004 = ╱9d╱ EXEC ╱ // 0xe50 @0x4
0x0e4c…0e6c at0005 = ╱46╱F╱ // 0xe51 @0x5
0x0e4c…0e6c at0006 = ╱45╱E╱ // 0xe52 @0x6
0x0e4c…0e6c at0007 = ╱4a╱J╱ // 0xe53 @0x7
0x0e4c…0e6c at0008 = ╱4c╱L╱ // 0xe54 @0x8
0x0e4c…0e6c at0009 = ╱ed╱(╱ // 0xe55 @0x9
0x0e4c…0e6c at000a = ╱32╱2╱ // 0xe56 @0xa
0x0e4c…0e6c at000b = ╱30╱0╱ // 0xe57 @0xb
0x0e4c…0e6c at000c = ╱fe0000a005╱ // 0xe58 @0xc
0x0e4c…0e6c at0011 = ╱ec╱,╱ // 0xe5d @0x11
0x0e4c…0e6c at0012 = ╱32╱2╱ // 0xe5e @0x12
0x0e4c…0e6c at0013 = ╱31╱1╱ // 0xe5f @0x13
0x0e4c…0e6c at0014 = ╱fe0000a805╱ // 0xe60 @0x14
0x0e4c…0e6c at0019 = ╱ec╱,╱ // 0xe65 @0x19
0x0e4c…0e6c at001a = ╱4b╱K╱ // 0xe66 @0x1a
0x0e4c…0e6c at001b = ╱31╱1╱ // 0xe67 @0x1b
0x0e4c…0e6c at001c = ╱34╱4╱ // 0xe68 @0x1c
0x0e4c…0e6c at001d = ╱ef╱$╱ // 0xe69 @0x1d
0x0e4c…0e6c at001e = ╱ee╱)╱ // 0xe6a @0x1e
0x0e4c…0e6c at001f = EOL // 0xe6b @0x1f
0x0e4c…0e6c }
0x0e6c…0e8f 9be6 1180 EXEC CALC(0,MBEV$,BE2$,MBEV$)
0x0e6c…0e8f LineComalBin {
0x0e6c…0e8f ptr = 0x9be6 // 0xe6c @0x0
0x0e6c…0e8f lno = 0x049c // 0xe6e @0x2
0x0e6c…0e8f at0004 = ╱9d╱ EXEC ╱ // 0xe70 @0x4
0x0e6c…0e8f at0005 = ╱43╱C╱ // 0xe71 @0x5
0x0e6c…0e8f at0006 = ╱41╱A╱ // 0xe72 @0x6
0x0e6c…0e8f at0007 = ╱4c╱L╱ // 0xe73 @0x7
0x0e6c…0e8f at0008 = ╱43╱C╱ // 0xe74 @0x8
0x0e6c…0e8f at0009 = ╱ed╱(╱ // 0xe75 @0x9
0x0e6c…0e8f at000a = ╱30╱0╱ // 0xe76 @0xa
0x0e6c…0e8f at000b = ╱fe00000000╱ // 0xe77 @0xb
0x0e6c…0e8f at0010 = ╱ec╱,╱ // 0xe7c @0x10
0x0e6c…0e8f at0011 = ╱4d╱M╱ // 0xe7d @0x11
0x0e6c…0e8f at0012 = ╱42╱B╱ // 0xe7e @0x12
0x0e6c…0e8f at0013 = ╱45╱E╱ // 0xe7f @0x13
0x0e6c…0e8f at0014 = ╱56╱V╱ // 0xe80 @0x14
0x0e6c…0e8f at0015 = ╱ef╱$╱ // 0xe81 @0x15
0x0e6c…0e8f at0016 = ╱ec╱,╱ // 0xe82 @0x16
0x0e6c…0e8f at0017 = ╱42╱B╱ // 0xe83 @0x17
0x0e6c…0e8f at0018 = ╱45╱E╱ // 0xe84 @0x18
0x0e6c…0e8f at0019 = ╱32╱2╱ // 0xe85 @0x19
0x0e6c…0e8f at001a = ╱ef╱$╱ // 0xe86 @0x1a
0x0e6c…0e8f at001b = ╱ec╱,╱ // 0xe87 @0x1b
0x0e6c…0e8f at001c = ╱4d╱M╱ // 0xe88 @0x1c
0x0e6c…0e8f at001d = ╱42╱B╱ // 0xe89 @0x1d
0x0e6c…0e8f at001e = ╱45╱E╱ // 0xe8a @0x1e
0x0e6c…0e8f at001f = ╱56╱V╱ // 0xe8b @0x1f
0x0e6c…0e8f at0020 = ╱ef╱$╱ // 0xe8c @0x20
0x0e6c…0e8f at0021 = ╱ee╱)╱ // 0xe8d @0x21
0x0e6c…0e8f at0022 = EOL // 0xe8e @0x22
0x0e6c…0e8f }
0x0e8f…0eb2 9c09 1190 EXEC CALC(0,YBEV$,BE2$,YBEV$)
0x0e8f…0eb2 LineComalBin {
0x0e8f…0eb2 ptr = 0x9c09 // 0xe8f @0x0
0x0e8f…0eb2 lno = 0x04a6 // 0xe91 @0x2
0x0e8f…0eb2 at0004 = ╱9d╱ EXEC ╱ // 0xe93 @0x4
0x0e8f…0eb2 at0005 = ╱43╱C╱ // 0xe94 @0x5
0x0e8f…0eb2 at0006 = ╱41╱A╱ // 0xe95 @0x6
0x0e8f…0eb2 at0007 = ╱4c╱L╱ // 0xe96 @0x7
0x0e8f…0eb2 at0008 = ╱43╱C╱ // 0xe97 @0x8
0x0e8f…0eb2 at0009 = ╱ed╱(╱ // 0xe98 @0x9
0x0e8f…0eb2 at000a = ╱30╱0╱ // 0xe99 @0xa
0x0e8f…0eb2 at000b = ╱fe00000000╱ // 0xe9a @0xb
0x0e8f…0eb2 at0010 = ╱ec╱,╱ // 0xe9f @0x10
0x0e8f…0eb2 at0011 = ╱59╱Y╱ // 0xea0 @0x11
0x0e8f…0eb2 at0012 = ╱42╱B╱ // 0xea1 @0x12
0x0e8f…0eb2 at0013 = ╱45╱E╱ // 0xea2 @0x13
0x0e8f…0eb2 at0014 = ╱56╱V╱ // 0xea3 @0x14
0x0e8f…0eb2 at0015 = ╱ef╱$╱ // 0xea4 @0x15
0x0e8f…0eb2 at0016 = ╱ec╱,╱ // 0xea5 @0x16
0x0e8f…0eb2 at0017 = ╱42╱B╱ // 0xea6 @0x17
0x0e8f…0eb2 at0018 = ╱45╱E╱ // 0xea7 @0x18
0x0e8f…0eb2 at0019 = ╱32╱2╱ // 0xea8 @0x19
0x0e8f…0eb2 at001a = ╱ef╱$╱ // 0xea9 @0x1a
0x0e8f…0eb2 at001b = ╱ec╱,╱ // 0xeaa @0x1b
0x0e8f…0eb2 at001c = ╱59╱Y╱ // 0xeab @0x1c
0x0e8f…0eb2 at001d = ╱42╱B╱ // 0xeac @0x1d
0x0e8f…0eb2 at001e = ╱45╱E╱ // 0xead @0x1e
0x0e8f…0eb2 at001f = ╱56╱V╱ // 0xeae @0x1f
0x0e8f…0eb2 at0020 = ╱ef╱$╱ // 0xeaf @0x20
0x0e8f…0eb2 at0021 = ╱ee╱)╱ // 0xeb0 @0x21
0x0e8f…0eb2 at0022 = EOL // 0xeb1 @0x22
0x0e8f…0eb2 }
0x0eb2…0ed7 9c2e 1200 EXEC CALC(1,EMREG$,BE2$,EMREG$)
0x0eb2…0ed7 LineComalBin {
0x0eb2…0ed7 ptr = 0x9c2e // 0xeb2 @0x0
0x0eb2…0ed7 lno = 0x04b0 // 0xeb4 @0x2
0x0eb2…0ed7 at0004 = ╱9d╱ EXEC ╱ // 0xeb6 @0x4
0x0eb2…0ed7 at0005 = ╱43╱C╱ // 0xeb7 @0x5
0x0eb2…0ed7 at0006 = ╱41╱A╱ // 0xeb8 @0x6
0x0eb2…0ed7 at0007 = ╱4c╱L╱ // 0xeb9 @0x7
0x0eb2…0ed7 at0008 = ╱43╱C╱ // 0xeba @0x8
0x0eb2…0ed7 at0009 = ╱ed╱(╱ // 0xebb @0x9
0x0eb2…0ed7 at000a = ╱31╱1╱ // 0xebc @0xa
0x0eb2…0ed7 at000b = ╱fe00008001╱ // 0xebd @0xb
0x0eb2…0ed7 at0010 = ╱ec╱,╱ // 0xec2 @0x10
0x0eb2…0ed7 at0011 = ╱45╱E╱ // 0xec3 @0x11
0x0eb2…0ed7 at0012 = ╱4d╱M╱ // 0xec4 @0x12
0x0eb2…0ed7 at0013 = ╱52╱R╱ // 0xec5 @0x13
0x0eb2…0ed7 at0014 = ╱45╱E╱ // 0xec6 @0x14
0x0eb2…0ed7 at0015 = ╱47╱G╱ // 0xec7 @0x15
0x0eb2…0ed7 at0016 = ╱ef╱$╱ // 0xec8 @0x16
0x0eb2…0ed7 at0017 = ╱ec╱,╱ // 0xec9 @0x17
0x0eb2…0ed7 at0018 = ╱42╱B╱ // 0xeca @0x18
0x0eb2…0ed7 at0019 = ╱45╱E╱ // 0xecb @0x19
0x0eb2…0ed7 at001a = ╱32╱2╱ // 0xecc @0x1a
0x0eb2…0ed7 at001b = ╱ef╱$╱ // 0xecd @0x1b
0x0eb2…0ed7 at001c = ╱ec╱,╱ // 0xece @0x1c
0x0eb2…0ed7 at001d = ╱45╱E╱ // 0xecf @0x1d
0x0eb2…0ed7 at001e = ╱4d╱M╱ // 0xed0 @0x1e
0x0eb2…0ed7 at001f = ╱52╱R╱ // 0xed1 @0x1f
0x0eb2…0ed7 at0020 = ╱45╱E╱ // 0xed2 @0x20
0x0eb2…0ed7 at0021 = ╱47╱G╱ // 0xed3 @0x21
0x0eb2…0ed7 at0022 = ╱ef╱$╱ // 0xed4 @0x22
0x0eb2…0ed7 at0023 = ╱ee╱)╱ // 0xed5 @0x23
0x0eb2…0ed7 at0024 = EOL // 0xed6 @0x24
0x0eb2…0ed7 }
0x0ed7…0efc 9c53 1210 EXEC CALC(1,EÅREG$,BE2$,EÅREG$)
0x0ed7…0efc LineComalBin {
0x0ed7…0efc ptr = 0x9c53 // 0xed7 @0x0
0x0ed7…0efc lno = 0x04ba // 0xed9 @0x2
0x0ed7…0efc at0004 = ╱9d╱ EXEC ╱ // 0xedb @0x4
0x0ed7…0efc at0005 = ╱43╱C╱ // 0xedc @0x5
0x0ed7…0efc at0006 = ╱41╱A╱ // 0xedd @0x6
0x0ed7…0efc at0007 = ╱4c╱L╱ // 0xede @0x7
0x0ed7…0efc at0008 = ╱43╱C╱ // 0xedf @0x8
0x0ed7…0efc at0009 = ╱ed╱(╱ // 0xee0 @0x9
0x0ed7…0efc at000a = ╱31╱1╱ // 0xee1 @0xa
0x0ed7…0efc at000b = ╱fe00008001╱ // 0xee2 @0xb
0x0ed7…0efc at0010 = ╱ec╱,╱ // 0xee7 @0x10
0x0ed7…0efc at0011 = ╱45╱E╱ // 0xee8 @0x11
0x0ed7…0efc at0012 = ╱5d╱Å╱ // 0xee9 @0x12
0x0ed7…0efc at0013 = ╱52╱R╱ // 0xeea @0x13
0x0ed7…0efc at0014 = ╱45╱E╱ // 0xeeb @0x14
0x0ed7…0efc at0015 = ╱47╱G╱ // 0xeec @0x15
0x0ed7…0efc at0016 = ╱ef╱$╱ // 0xeed @0x16
0x0ed7…0efc at0017 = ╱ec╱,╱ // 0xeee @0x17
0x0ed7…0efc at0018 = ╱42╱B╱ // 0xeef @0x18
0x0ed7…0efc at0019 = ╱45╱E╱ // 0xef0 @0x19
0x0ed7…0efc at001a = ╱32╱2╱ // 0xef1 @0x1a
0x0ed7…0efc at001b = ╱ef╱$╱ // 0xef2 @0x1b
0x0ed7…0efc at001c = ╱ec╱,╱ // 0xef3 @0x1c
0x0ed7…0efc at001d = ╱45╱E╱ // 0xef4 @0x1d
0x0ed7…0efc at001e = ╱5d╱Å╱ // 0xef5 @0x1e
0x0ed7…0efc at001f = ╱52╱R╱ // 0xef6 @0x1f
0x0ed7…0efc at0020 = ╱45╱E╱ // 0xef7 @0x20
0x0ed7…0efc at0021 = ╱47╱G╱ // 0xef8 @0x21
0x0ed7…0efc at0022 = ╱ef╱$╱ // 0xef9 @0x22
0x0ed7…0efc at0023 = ╱ee╱)╱ // 0xefa @0x23
0x0ed7…0efc at0024 = EOL // 0xefb @0x24
0x0ed7…0efc }
0x0efc…0f2b 9c82 1220 PUT K14$,ETAB(EPIL3,2):NR9,EMREG$,EÅREG$
0x0efc…0f2b LineComalBin {
0x0efc…0f2b ptr = 0x9c82 // 0xefc @0x0
0x0efc…0f2b lno = 0x04c4 // 0xefe @0x2
0x0efc…0f2b at0004 = ╱aa╱ PUT ╱ // 0xf00 @0x4
0x0efc…0f2b at0005 = ╱4b╱K╱ // 0xf01 @0x5
0x0efc…0f2b at0006 = ╱31╱1╱ // 0xf02 @0x6
0x0efc…0f2b at0007 = ╱34╱4╱ // 0xf03 @0x7
0x0efc…0f2b at0008 = ╱ef╱$╱ // 0xf04 @0x8
0x0efc…0f2b at0009 = ╱ec╱,╱ // 0xf05 @0x9
0x0efc…0f2b at000a = ╱45╱E╱ // 0xf06 @0xa
0x0efc…0f2b at000b = ╱54╱T╱ // 0xf07 @0xb
0x0efc…0f2b at000c = ╱41╱A╱ // 0xf08 @0xc
0x0efc…0f2b at000d = ╱42╱B╱ // 0xf09 @0xd
0x0efc…0f2b at000e = ╱ed╱(╱ // 0xf0a @0xe
0x0efc…0f2b at000f = ╱45╱E╱ // 0xf0b @0xf
0x0efc…0f2b at0010 = ╱50╱P╱ // 0xf0c @0x10
0x0efc…0f2b at0011 = ╱49╱I╱ // 0xf0d @0x11
0x0efc…0f2b at0012 = ╱4c╱L╱ // 0xf0e @0x12
0x0efc…0f2b at0013 = ╱33╱3╱ // 0xf0f @0x13
0x0efc…0f2b at0014 = ╱ec╱,╱ // 0xf10 @0x14
0x0efc…0f2b at0015 = ╱32╱2╱ // 0xf11 @0x15
0x0efc…0f2b at0016 = ╱fe00008002╱ // 0xf12 @0x16
0x0efc…0f2b at001b = ╱ee╱)╱ // 0xf17 @0x1b
0x0efc…0f2b at001c = ╱f0╱:╱ // 0xf18 @0x1c
0x0efc…0f2b at001d = ╱4e╱N╱ // 0xf19 @0x1d
0x0efc…0f2b at001e = ╱52╱R╱ // 0xf1a @0x1e
0x0efc…0f2b at001f = ╱39╱9╱ // 0xf1b @0x1f
0x0efc…0f2b at0020 = ╱ec╱,╱ // 0xf1c @0x20
0x0efc…0f2b at0021 = ╱45╱E╱ // 0xf1d @0x21
0x0efc…0f2b at0022 = ╱4d╱M╱ // 0xf1e @0x22
0x0efc…0f2b at0023 = ╱52╱R╱ // 0xf1f @0x23
0x0efc…0f2b at0024 = ╱45╱E╱ // 0xf20 @0x24
0x0efc…0f2b at0025 = ╱47╱G╱ // 0xf21 @0x25
0x0efc…0f2b at0026 = ╱ef╱$╱ // 0xf22 @0x26
0x0efc…0f2b at0027 = ╱ec╱,╱ // 0xf23 @0x27
0x0efc…0f2b at0028 = ╱45╱E╱ // 0xf24 @0x28
0x0efc…0f2b at0029 = ╱5d╱Å╱ // 0xf25 @0x29
0x0efc…0f2b at002a = ╱52╱R╱ // 0xf26 @0x2a
0x0efc…0f2b at002b = ╱45╱E╱ // 0xf27 @0x2b
0x0efc…0f2b at002c = ╱47╱G╱ // 0xf28 @0x2c
0x0efc…0f2b at002d = ╱ef╱$╱ // 0xf29 @0x2d
0x0efc…0f2b at002e = EOL // 0xf2a @0x2e
0x0efc…0f2b }
0x0f2b…0f4b 9ca2 1221 EXEC FEJL(20,25,K14$)
0x0f2b…0f4b LineComalBin {
0x0f2b…0f4b ptr = 0x9ca2 // 0xf2b @0x0
0x0f2b…0f4b lno = 0x04c5 // 0xf2d @0x2
0x0f2b…0f4b at0004 = ╱9d╱ EXEC ╱ // 0xf2f @0x4
0x0f2b…0f4b at0005 = ╱46╱F╱ // 0xf30 @0x5
0x0f2b…0f4b at0006 = ╱45╱E╱ // 0xf31 @0x6
0x0f2b…0f4b at0007 = ╱4a╱J╱ // 0xf32 @0x7
0x0f2b…0f4b at0008 = ╱4c╱L╱ // 0xf33 @0x8
0x0f2b…0f4b at0009 = ╱ed╱(╱ // 0xf34 @0x9
0x0f2b…0f4b at000a = ╱32╱2╱ // 0xf35 @0xa
0x0f2b…0f4b at000b = ╱30╱0╱ // 0xf36 @0xb
0x0f2b…0f4b at000c = ╱fe0000a005╱ // 0xf37 @0xc
0x0f2b…0f4b at0011 = ╱ec╱,╱ // 0xf3c @0x11
0x0f2b…0f4b at0012 = ╱32╱2╱ // 0xf3d @0x12
0x0f2b…0f4b at0013 = ╱35╱5╱ // 0xf3e @0x13
0x0f2b…0f4b at0014 = ╱fe0000c805╱ // 0xf3f @0x14
0x0f2b…0f4b at0019 = ╱ec╱,╱ // 0xf44 @0x19
0x0f2b…0f4b at001a = ╱4b╱K╱ // 0xf45 @0x1a
0x0f2b…0f4b at001b = ╱31╱1╱ // 0xf46 @0x1b
0x0f2b…0f4b at001c = ╱34╱4╱ // 0xf47 @0x1c
0x0f2b…0f4b at001d = ╱ef╱$╱ // 0xf48 @0x1d
0x0f2b…0f4b at001e = ╱ee╱)╱ // 0xf49 @0x1e
0x0f2b…0f4b at001f = EOL // 0xf4a @0x1f
0x0f2b…0f4b }
0x0f4b…0f85 9cdc 1222 PUT K14$,ETAB(EPIL3,2)+EPIL2+1:NR8,MBEV$,YBEV$
0x0f4b…0f85 LineComalBin {
0x0f4b…0f85 ptr = 0x9cdc // 0xf4b @0x0
0x0f4b…0f85 lno = 0x04c6 // 0xf4d @0x2
0x0f4b…0f85 at0004 = ╱aa╱ PUT ╱ // 0xf4f @0x4
0x0f4b…0f85 at0005 = ╱4b╱K╱ // 0xf50 @0x5
0x0f4b…0f85 at0006 = ╱31╱1╱ // 0xf51 @0x6
0x0f4b…0f85 at0007 = ╱34╱4╱ // 0xf52 @0x7
0x0f4b…0f85 at0008 = ╱ef╱$╱ // 0xf53 @0x8
0x0f4b…0f85 at0009 = ╱ec╱,╱ // 0xf54 @0x9
0x0f4b…0f85 at000a = ╱45╱E╱ // 0xf55 @0xa
0x0f4b…0f85 at000b = ╱54╱T╱ // 0xf56 @0xb
0x0f4b…0f85 at000c = ╱41╱A╱ // 0xf57 @0xc
0x0f4b…0f85 at000d = ╱42╱B╱ // 0xf58 @0xd
0x0f4b…0f85 at000e = ╱ed╱(╱ // 0xf59 @0xe
0x0f4b…0f85 at000f = ╱45╱E╱ // 0xf5a @0xf
0x0f4b…0f85 at0010 = ╱50╱P╱ // 0xf5b @0x10
0x0f4b…0f85 at0011 = ╱49╱I╱ // 0xf5c @0x11
0x0f4b…0f85 at0012 = ╱4c╱L╱ // 0xf5d @0x12
0x0f4b…0f85 at0013 = ╱33╱3╱ // 0xf5e @0x13
0x0f4b…0f85 at0014 = ╱ec╱,╱ // 0xf5f @0x14
0x0f4b…0f85 at0015 = ╱32╱2╱ // 0xf60 @0x15
0x0f4b…0f85 at0016 = ╱fe00008002╱ // 0xf61 @0x16
0x0f4b…0f85 at001b = ╱ee╱)╱ // 0xf66 @0x1b
0x0f4b…0f85 at001c = ╱e2╱+╱ // 0xf67 @0x1c
0x0f4b…0f85 at001d = ╱45╱E╱ // 0xf68 @0x1d
0x0f4b…0f85 at001e = ╱50╱P╱ // 0xf69 @0x1e
0x0f4b…0f85 at001f = ╱49╱I╱ // 0xf6a @0x1f
0x0f4b…0f85 at0020 = ╱4c╱L╱ // 0xf6b @0x20
0x0f4b…0f85 at0021 = ╱32╱2╱ // 0xf6c @0x21
0x0f4b…0f85 at0022 = ╱e2╱+╱ // 0xf6d @0x22
0x0f4b…0f85 at0023 = ╱31╱1╱ // 0xf6e @0x23
0x0f4b…0f85 at0024 = ╱fe00008001╱ // 0xf6f @0x24
0x0f4b…0f85 at0029 = ╱f0╱:╱ // 0xf74 @0x29
0x0f4b…0f85 at002a = ╱4e╱N╱ // 0xf75 @0x2a
0x0f4b…0f85 at002b = ╱52╱R╱ // 0xf76 @0x2b
0x0f4b…0f85 at002c = ╱38╱8╱ // 0xf77 @0x2c
0x0f4b…0f85 at002d = ╱ec╱,╱ // 0xf78 @0x2d
0x0f4b…0f85 at002e = ╱4d╱M╱ // 0xf79 @0x2e
0x0f4b…0f85 at002f = ╱42╱B╱ // 0xf7a @0x2f
0x0f4b…0f85 at0030 = ╱45╱E╱ // 0xf7b @0x30
0x0f4b…0f85 at0031 = ╱56╱V╱ // 0xf7c @0x31
0x0f4b…0f85 at0032 = ╱ef╱$╱ // 0xf7d @0x32
0x0f4b…0f85 at0033 = ╱ec╱,╱ // 0xf7e @0x33
0x0f4b…0f85 at0034 = ╱59╱Y╱ // 0xf7f @0x34
0x0f4b…0f85 at0035 = ╱42╱B╱ // 0xf80 @0x35
0x0f4b…0f85 at0036 = ╱45╱E╱ // 0xf81 @0x36
0x0f4b…0f85 at0037 = ╱56╱V╱ // 0xf82 @0x37
0x0f4b…0f85 at0038 = ╱ef╱$╱ // 0xf83 @0x38
0x0f4b…0f85 at0039 = EOL // 0xf84 @0x39
0x0f4b…0f85 }
0x0f85…0fa5 9cfc 1223 EXEC FEJL(20,26,K14$)
0x0f85…0fa5 LineComalBin {
0x0f85…0fa5 ptr = 0x9cfc // 0xf85 @0x0
0x0f85…0fa5 lno = 0x04c7 // 0xf87 @0x2
0x0f85…0fa5 at0004 = ╱9d╱ EXEC ╱ // 0xf89 @0x4
0x0f85…0fa5 at0005 = ╱46╱F╱ // 0xf8a @0x5
0x0f85…0fa5 at0006 = ╱45╱E╱ // 0xf8b @0x6
0x0f85…0fa5 at0007 = ╱4a╱J╱ // 0xf8c @0x7
0x0f85…0fa5 at0008 = ╱4c╱L╱ // 0xf8d @0x8
0x0f85…0fa5 at0009 = ╱ed╱(╱ // 0xf8e @0x9
0x0f85…0fa5 at000a = ╱32╱2╱ // 0xf8f @0xa
0x0f85…0fa5 at000b = ╱30╱0╱ // 0xf90 @0xb
0x0f85…0fa5 at000c = ╱fe0000a005╱ // 0xf91 @0xc
0x0f85…0fa5 at0011 = ╱ec╱,╱ // 0xf96 @0x11
0x0f85…0fa5 at0012 = ╱32╱2╱ // 0xf97 @0x12
0x0f85…0fa5 at0013 = ╱36╱6╱ // 0xf98 @0x13
0x0f85…0fa5 at0014 = ╱fe0000d005╱ // 0xf99 @0x14
0x0f85…0fa5 at0019 = ╱ec╱,╱ // 0xf9e @0x19
0x0f85…0fa5 at001a = ╱4b╱K╱ // 0xf9f @0x1a
0x0f85…0fa5 at001b = ╱31╱1╱ // 0xfa0 @0x1b
0x0f85…0fa5 at001c = ╱34╱4╱ // 0xfa1 @0x1c
0x0f85…0fa5 at001d = ╱ef╱$╱ // 0xfa2 @0x1d
0x0f85…0fa5 at001e = ╱ee╱)╱ // 0xfa3 @0x1e
0x0f85…0fa5 at001f = EOL // 0xfa4 @0x1f
0x0f85…0fa5 }
0x0fa5…0fca 9d21 1224 EXEC GEMMID(EMIDNR,K17$,ENT1,KONTNR)
0x0fa5…0fca LineComalBin {
0x0fa5…0fca ptr = 0x9d21 // 0xfa5 @0x0
0x0fa5…0fca lno = 0x04c8 // 0xfa7 @0x2
0x0fa5…0fca at0004 = ╱9d╱ EXEC ╱ // 0xfa9 @0x4
0x0fa5…0fca at0005 = ╱47╱G╱ // 0xfaa @0x5
0x0fa5…0fca at0006 = ╱45╱E╱ // 0xfab @0x6
0x0fa5…0fca at0007 = ╱4d╱M╱ // 0xfac @0x7
0x0fa5…0fca at0008 = ╱4d╱M╱ // 0xfad @0x8
0x0fa5…0fca at0009 = ╱49╱I╱ // 0xfae @0x9
0x0fa5…0fca at000a = ╱44╱D╱ // 0xfaf @0xa
0x0fa5…0fca at000b = ╱ed╱(╱ // 0xfb0 @0xb
0x0fa5…0fca at000c = ╱45╱E╱ // 0xfb1 @0xc
0x0fa5…0fca at000d = ╱4d╱M╱ // 0xfb2 @0xd
0x0fa5…0fca at000e = ╱49╱I╱ // 0xfb3 @0xe
0x0fa5…0fca at000f = ╱44╱D╱ // 0xfb4 @0xf
0x0fa5…0fca at0010 = ╱4e╱N╱ // 0xfb5 @0x10
0x0fa5…0fca at0011 = ╱52╱R╱ // 0xfb6 @0x11
0x0fa5…0fca at0012 = ╱ec╱,╱ // 0xfb7 @0x12
0x0fa5…0fca at0013 = ╱4b╱K╱ // 0xfb8 @0x13
0x0fa5…0fca at0014 = ╱31╱1╱ // 0xfb9 @0x14
0x0fa5…0fca at0015 = ╱37╱7╱ // 0xfba @0x15
0x0fa5…0fca at0016 = ╱ef╱$╱ // 0xfbb @0x16
0x0fa5…0fca at0017 = ╱ec╱,╱ // 0xfbc @0x17
0x0fa5…0fca at0018 = ╱45╱E╱ // 0xfbd @0x18
0x0fa5…0fca at0019 = ╱4e╱N╱ // 0xfbe @0x19
0x0fa5…0fca at001a = ╱54╱T╱ // 0xfbf @0x1a
0x0fa5…0fca at001b = ╱31╱1╱ // 0xfc0 @0x1b
0x0fa5…0fca at001c = ╱ec╱,╱ // 0xfc1 @0x1c
0x0fa5…0fca at001d = ╱4b╱K╱ // 0xfc2 @0x1d
0x0fa5…0fca at001e = ╱4f╱O╱ // 0xfc3 @0x1e
0x0fa5…0fca at001f = ╱4e╱N╱ // 0xfc4 @0x1f
0x0fa5…0fca at0020 = ╱54╱T╱ // 0xfc5 @0x20
0x0fa5…0fca at0021 = ╱4e╱N╱ // 0xfc6 @0x21
0x0fa5…0fca at0022 = ╱52╱R╱ // 0xfc7 @0x22
0x0fa5…0fca at0023 = ╱ee╱)╱ // 0xfc8 @0x23
0x0fa5…0fca at0024 = EOL // 0xfc9 @0x24
0x0fa5…0fca }
0x0fca…0fd0 9d27 1225 ELSE
0x0fca…0fd0 LineComalBin {
0x0fca…0fd0 ptr = 0x9d27 // 0xfca @0x0
0x0fca…0fd0 lno = 0x04c9 // 0xfcc @0x2
0x0fca…0fd0 at0004 = ╱9a╱ ELSE ╱ // 0xfce @0x4
0x0fca…0fd0 at0005 = EOL // 0xfcf @0x5
0x0fca…0fd0 }
0x0fd0…0fe6 9d3d 1226 ENT1=1000000
0x0fd0…0fe6 LineComalBin {
0x0fd0…0fe6 ptr = 0x9d3d // 0xfd0 @0x0
0x0fd0…0fe6 lno = 0x04ca // 0xfd2 @0x2
0x0fd0…0fe6 at0004 = ╱45╱E╱ // 0xfd4 @0x4
0x0fd0…0fe6 at0005 = ╱4e╱N╱ // 0xfd5 @0x5
0x0fd0…0fe6 at0006 = ╱54╱T╱ // 0xfd6 @0x6
0x0fd0…0fe6 at0007 = ╱31╱1╱ // 0xfd7 @0x7
0x0fd0…0fe6 at0008 = ╱dc╱=╱ // 0xfd8 @0x8
0x0fd0…0fe6 at0009 = ╱31╱1╱ // 0xfd9 @0x9
0x0fd0…0fe6 at000a = ╱30╱0╱ // 0xfda @0xa
0x0fd0…0fe6 at000b = ╱30╱0╱ // 0xfdb @0xb
0x0fd0…0fe6 at000c = ╱30╱0╱ // 0xfdc @0xc
0x0fd0…0fe6 at000d = ╱30╱0╱ // 0xfdd @0xd
0x0fd0…0fe6 at000e = ╱30╱0╱ // 0xfde @0xe
0x0fd0…0fe6 at000f = ╱30╱0╱ // 0xfdf @0xf
0x0fd0…0fe6 at0010 = ╱fe0024f414╱ // 0xfe0 @0x10
0x0fd0…0fe6 at0015 = EOL // 0xfe5 @0x15
0x0fd0…0fe6 }
0x0fe6…0fec 9d43 1227 ENDIF
0x0fe6…0fec LineComalBin {
0x0fe6…0fec ptr = 0x9d43 // 0xfe6 @0x0
0x0fe6…0fec lno = 0x04cb // 0xfe8 @0x2
0x0fe6…0fec at0004 = ╱9b╱ ENDIF ╱ // 0xfea @0x4
0x0fe6…0fec at0005 = EOL // 0xfeb @0x5
0x0fe6…0fec }
0x0fec…0ff2 9d49 1228 ENDIF
0x0fec…0ff2 LineComalBin {
0x0fec…0ff2 ptr = 0x9d49 // 0xfec @0x0
0x0fec…0ff2 lno = 0x04cc // 0xfee @0x2
0x0fec…0ff2 at0004 = ╱9b╱ ENDIF ╱ // 0xff0 @0x4
0x0fec…0ff2 at0005 = EOL // 0xff1 @0x5
0x0fec…0ff2 }
0x0ff2…0ff8 9d4f 1229 ENDIF
0x0ff2…0ff8 LineComalBin {
0x0ff2…0ff8 ptr = 0x9d4f // 0xff2 @0x0
0x0ff2…0ff8 lno = 0x04cd // 0xff4 @0x2
0x0ff2…0ff8 at0004 = ╱9b╱ ENDIF ╱ // 0xff6 @0x4
0x0ff2…0ff8 at0005 = EOL // 0xff7 @0x5
0x0ff2…0ff8 }
0x0ff8…0ffe 9d55 1230 ENDPROC
0x0ff8…0ffe LineComalBin {
0x0ff8…0ffe ptr = 0x9d55 // 0xff8 @0x0
0x0ff8…0ffe lno = 0x04ce // 0xffa @0x2
0x0ff8…0ffe at0004 = ╱9f╱ ENDPROC ╱ // 0xffc @0x4
0x0ff8…0ffe at0005 = EOL // 0xffd @0x5
0x0ff8…0ffe }
0x0ffe…101e 9d75 1240 PROC BJUDSKRIV(BJSNR,BJLNR,TK1)
0x0ffe…101e LineComalBin {
0x0ffe…101e ptr = 0x9d75 // 0xffe @0x0
0x0ffe…101e lno = 0x04d8 // 0x1000 @0x2
0x0ffe…101e at0004 = ╱9e╱ PROC ╱ // 0x1002 @0x4
0x0ffe…101e at0005 = ╱42╱B╱ // 0x1003 @0x5
0x0ffe…101e at0006 = ╱4a╱J╱ // 0x1004 @0x6
0x0ffe…101e at0007 = ╱55╱U╱ // 0x1005 @0x7
0x0ffe…101e at0008 = ╱44╱D╱ // 0x1006 @0x8
0x0ffe…101e at0009 = ╱53╱S╱ // 0x1007 @0x9
0x0ffe…101e at000a = ╱4b╱K╱ // 0x1008 @0xa
0x0ffe…101e at000b = ╱52╱R╱ // 0x1009 @0xb
0x0ffe…101e at000c = ╱49╱I╱ // 0x100a @0xc
0x0ffe…101e at000d = ╱56╱V╱ // 0x100b @0xd
0x0ffe…101e at000e = ╱ed╱(╱ // 0x100c @0xe
0x0ffe…101e at000f = ╱42╱B╱ // 0x100d @0xf
0x0ffe…101e at0010 = ╱4a╱J╱ // 0x100e @0x10
0x0ffe…101e at0011 = ╱53╱S╱ // 0x100f @0x11
0x0ffe…101e at0012 = ╱4e╱N╱ // 0x1010 @0x12
0x0ffe…101e at0013 = ╱52╱R╱ // 0x1011 @0x13
0x0ffe…101e at0014 = ╱ec╱,╱ // 0x1012 @0x14
0x0ffe…101e at0015 = ╱42╱B╱ // 0x1013 @0x15
0x0ffe…101e at0016 = ╱4a╱J╱ // 0x1014 @0x16
0x0ffe…101e at0017 = ╱4c╱L╱ // 0x1015 @0x17
0x0ffe…101e at0018 = ╱4e╱N╱ // 0x1016 @0x18
0x0ffe…101e at0019 = ╱52╱R╱ // 0x1017 @0x19
0x0ffe…101e at001a = ╱ec╱,╱ // 0x1018 @0x1a
0x0ffe…101e at001b = ╱54╱T╱ // 0x1019 @0x1b
0x0ffe…101e at001c = ╱4b╱K╱ // 0x101a @0x1c
0x0ffe…101e at001d = ╱31╱1╱ // 0x101b @0x1d
0x0ffe…101e at001e = ╱ee╱)╱ // 0x101c @0x1e
0x0ffe…101e at001f = EOL // 0x101d @0x1f
0x0ffe…101e }
0x101e…103f 9d96 1250 IF BJLNR=36 OR BJLNR=0 THEN
0x101e…103f LineComalBin {
0x101e…103f ptr = 0x9d96 // 0x101e @0x0
0x101e…103f lno = 0x04e2 // 0x1020 @0x2
0x101e…103f at0004 = ╱9c╱ IF ╱ // 0x1022 @0x4
0x101e…103f at0005 = ╱42╱B╱ // 0x1023 @0x5
0x101e…103f at0006 = ╱4a╱J╱ // 0x1024 @0x6
0x101e…103f at0007 = ╱4c╱L╱ // 0x1025 @0x7
0x101e…103f at0008 = ╱4e╱N╱ // 0x1026 @0x8
0x101e…103f at0009 = ╱52╱R╱ // 0x1027 @0x9
0x101e…103f at000a = ╱dc╱=╱ // 0x1028 @0xa
0x101e…103f at000b = ╱33╱3╱ // 0x1029 @0xb
0x101e…103f at000c = ╱36╱6╱ // 0x102a @0xc
0x101e…103f at000d = ╱fe00009006╱ // 0x102b @0xd
0x101e…103f at0012 = ╱db╱ OR ╱ // 0x1030 @0x12
0x101e…103f at0013 = ╱42╱B╱ // 0x1031 @0x13
0x101e…103f at0014 = ╱4a╱J╱ // 0x1032 @0x14
0x101e…103f at0015 = ╱4c╱L╱ // 0x1033 @0x15
0x101e…103f at0016 = ╱4e╱N╱ // 0x1034 @0x16
0x101e…103f at0017 = ╱52╱R╱ // 0x1035 @0x17
0x101e…103f at0018 = ╱dc╱=╱ // 0x1036 @0x18
0x101e…103f at0019 = ╱30╱0╱ // 0x1037 @0x19
0x101e…103f at001a = ╱fe00000000╱ // 0x1038 @0x1a
0x101e…103f at001f = ╱b6╱ THEN ╱ // 0x103d @0x1f
0x101e…103f at0020 = EOL // 0x103e @0x20
0x101e…103f }
0x103f…1056 9dad 1260 BJSNR=BJSNR+1
0x103f…1056 LineComalBin {
0x103f…1056 ptr = 0x9dad // 0x103f @0x0
0x103f…1056 lno = 0x04ec // 0x1041 @0x2
0x103f…1056 at0004 = ╱42╱B╱ // 0x1043 @0x4
0x103f…1056 at0005 = ╱4a╱J╱ // 0x1044 @0x5
0x103f…1056 at0006 = ╱53╱S╱ // 0x1045 @0x6
0x103f…1056 at0007 = ╱4e╱N╱ // 0x1046 @0x7
0x103f…1056 at0008 = ╱52╱R╱ // 0x1047 @0x8
0x103f…1056 at0009 = ╱dc╱=╱ // 0x1048 @0x9
0x103f…1056 at000a = ╱42╱B╱ // 0x1049 @0xa
0x103f…1056 at000b = ╱4a╱J╱ // 0x104a @0xb
0x103f…1056 at000c = ╱53╱S╱ // 0x104b @0xc
0x103f…1056 at000d = ╱4e╱N╱ // 0x104c @0xd
0x103f…1056 at000e = ╱52╱R╱ // 0x104d @0xe
0x103f…1056 at000f = ╱e2╱+╱ // 0x104e @0xf
0x103f…1056 at0010 = ╱31╱1╱ // 0x104f @0x10
0x103f…1056 at0011 = ╱fe00008001╱ // 0x1050 @0x11
0x103f…1056 at0016 = EOL // 0x1055 @0x16
0x103f…1056 }
0x1056…1071 9dc8 1270 EXEC BJHOVEDUD(DATO,BJSNR)
0x1056…1071 LineComalBin {
0x1056…1071 ptr = 0x9dc8 // 0x1056 @0x0
0x1056…1071 lno = 0x04f6 // 0x1058 @0x2
0x1056…1071 at0004 = ╱9d╱ EXEC ╱ // 0x105a @0x4
0x1056…1071 at0005 = ╱42╱B╱ // 0x105b @0x5
0x1056…1071 at0006 = ╱4a╱J╱ // 0x105c @0x6
0x1056…1071 at0007 = ╱48╱H╱ // 0x105d @0x7
0x1056…1071 at0008 = ╱4f╱O╱ // 0x105e @0x8
0x1056…1071 at0009 = ╱56╱V╱ // 0x105f @0x9
0x1056…1071 at000a = ╱45╱E╱ // 0x1060 @0xa
0x1056…1071 at000b = ╱44╱D╱ // 0x1061 @0xb
0x1056…1071 at000c = ╱55╱U╱ // 0x1062 @0xc
0x1056…1071 at000d = ╱44╱D╱ // 0x1063 @0xd
0x1056…1071 at000e = ╱ed╱(╱ // 0x1064 @0xe
0x1056…1071 at000f = ╱44╱D╱ // 0x1065 @0xf
0x1056…1071 at0010 = ╱41╱A╱ // 0x1066 @0x10
0x1056…1071 at0011 = ╱54╱T╱ // 0x1067 @0x11
0x1056…1071 at0012 = ╱4f╱O╱ // 0x1068 @0x12
0x1056…1071 at0013 = ╱ec╱,╱ // 0x1069 @0x13
0x1056…1071 at0014 = ╱42╱B╱ // 0x106a @0x14
0x1056…1071 at0015 = ╱4a╱J╱ // 0x106b @0x15
0x1056…1071 at0016 = ╱53╱S╱ // 0x106c @0x16
0x1056…1071 at0017 = ╱4e╱N╱ // 0x106d @0x17
0x1056…1071 at0018 = ╱52╱R╱ // 0x106e @0x18
0x1056…1071 at0019 = ╱ee╱)╱ // 0x106f @0x19
0x1056…1071 at001a = EOL // 0x1070 @0x1a
0x1056…1071 }
0x1071…1082 9dd9 1280 BJLNR=0
0x1071…1082 LineComalBin {
0x1071…1082 ptr = 0x9dd9 // 0x1071 @0x0
0x1071…1082 lno = 0x0500 // 0x1073 @0x2
0x1071…1082 at0004 = ╱42╱B╱ // 0x1075 @0x4
0x1071…1082 at0005 = ╱4a╱J╱ // 0x1076 @0x5
0x1071…1082 at0006 = ╱4c╱L╱ // 0x1077 @0x6
0x1071…1082 at0007 = ╱4e╱N╱ // 0x1078 @0x7
0x1071…1082 at0008 = ╱52╱R╱ // 0x1079 @0x8
0x1071…1082 at0009 = ╱dc╱=╱ // 0x107a @0x9
0x1071…1082 at000a = ╱30╱0╱ // 0x107b @0xa
0x1071…1082 at000b = ╱fe00000000╱ // 0x107c @0xb
0x1071…1082 at0010 = EOL // 0x1081 @0x10
0x1071…1082 }
0x1082…1088 9ddf 1290 ENDIF
0x1082…1088 LineComalBin {
0x1082…1088 ptr = 0x9ddf // 0x1082 @0x0
0x1082…1088 lno = 0x050a // 0x1084 @0x2
0x1082…1088 at0004 = ╱9b╱ ENDIF ╱ // 0x1086 @0x4
0x1082…1088 at0005 = EOL // 0x1087 @0x5
0x1082…1088 }
0x1088…10b8 9e0f 1300 BJLNR=BJLNR+1;KODE1=INT(ORD(TK1$)-48)
0x1088…10b8 LineComalBin {
0x1088…10b8 ptr = 0x9e0f // 0x1088 @0x0
0x1088…10b8 lno = 0x0514 // 0x108a @0x2
0x1088…10b8 at0004 = ╱42╱B╱ // 0x108c @0x4
0x1088…10b8 at0005 = ╱4a╱J╱ // 0x108d @0x5
0x1088…10b8 at0006 = ╱4c╱L╱ // 0x108e @0x6
0x1088…10b8 at0007 = ╱4e╱N╱ // 0x108f @0x7
0x1088…10b8 at0008 = ╱52╱R╱ // 0x1090 @0x8
0x1088…10b8 at0009 = ╱dc╱=╱ // 0x1091 @0x9
0x1088…10b8 at000a = ╱42╱B╱ // 0x1092 @0xa
0x1088…10b8 at000b = ╱4a╱J╱ // 0x1093 @0xb
0x1088…10b8 at000c = ╱4c╱L╱ // 0x1094 @0xc
0x1088…10b8 at000d = ╱4e╱N╱ // 0x1095 @0xd
0x1088…10b8 at000e = ╱52╱R╱ // 0x1096 @0xe
0x1088…10b8 at000f = ╱e2╱+╱ // 0x1097 @0xf
0x1088…10b8 at0010 = ╱31╱1╱ // 0x1098 @0x10
0x1088…10b8 at0011 = ╱fe00008001╱ // 0x1099 @0x11
0x1088…10b8 at0016 = ╱eb╱;╱ // 0x109e @0x16
0x1088…10b8 at0017 = ╱4b╱K╱ // 0x109f @0x17
0x1088…10b8 at0018 = ╱4f╱O╱ // 0x10a0 @0x18
0x1088…10b8 at0019 = ╱44╱D╱ // 0x10a1 @0x19
0x1088…10b8 at001a = ╱45╱E╱ // 0x10a2 @0x1a
0x1088…10b8 at001b = ╱31╱1╱ // 0x10a3 @0x1b
0x1088…10b8 at001c = ╱dc╱=╱ // 0x10a4 @0x1c
0x1088…10b8 at001d = ╱c6╱INT╱ // 0x10a5 @0x1d
0x1088…10b8 at001e = ╱ed╱(╱ // 0x10a6 @0x1e
0x1088…10b8 at001f = ╱cd╱ORD╱ // 0x10a7 @0x1f
0x1088…10b8 at0020 = ╱ed╱(╱ // 0x10a8 @0x20
0x1088…10b8 at0021 = ╱54╱T╱ // 0x10a9 @0x21
0x1088…10b8 at0022 = ╱4b╱K╱ // 0x10aa @0x22
0x1088…10b8 at0023 = ╱31╱1╱ // 0x10ab @0x23
0x1088…10b8 at0024 = ╱ef╱$╱ // 0x10ac @0x24
0x1088…10b8 at0025 = ╱ee╱)╱ // 0x10ad @0x25
0x1088…10b8 at0026 = ╱e3╱-╱ // 0x10ae @0x26
0x1088…10b8 at0027 = ╱34╱4╱ // 0x10af @0x27
0x1088…10b8 at0028 = ╱38╱8╱ // 0x10b0 @0x28
0x1088…10b8 at0029 = ╱fe0000c006╱ // 0x10b1 @0x29
0x1088…10b8 at002e = ╱ee╱)╱ // 0x10b6 @0x2e
0x1088…10b8 at002f = EOL // 0x10b7 @0x2f
0x1088…10b8 }
0x10b8…10fe 9e55 1310 EXEC BJLINIEUD(BILAG,TEKSTKODE,KONTO,BELØB$,KODE1,BMOMS$,KODE2,ENTKO)
0x10b8…10fe LineComalBin {
0x10b8…10fe ptr = 0x9e55 // 0x10b8 @0x0
0x10b8…10fe lno = 0x051e // 0x10ba @0x2
0x10b8…10fe at0004 = ╱9d╱ EXEC ╱ // 0x10bc @0x4
0x10b8…10fe at0005 = ╱42╱B╱ // 0x10bd @0x5
0x10b8…10fe at0006 = ╱4a╱J╱ // 0x10be @0x6
0x10b8…10fe at0007 = ╱4c╱L╱ // 0x10bf @0x7
0x10b8…10fe at0008 = ╱49╱I╱ // 0x10c0 @0x8
0x10b8…10fe at0009 = ╱4e╱N╱ // 0x10c1 @0x9
0x10b8…10fe at000a = ╱49╱I╱ // 0x10c2 @0xa
0x10b8…10fe at000b = ╱45╱E╱ // 0x10c3 @0xb
0x10b8…10fe at000c = ╱55╱U╱ // 0x10c4 @0xc
0x10b8…10fe at000d = ╱44╱D╱ // 0x10c5 @0xd
0x10b8…10fe at000e = ╱ed╱(╱ // 0x10c6 @0xe
0x10b8…10fe at000f = ╱42╱B╱ // 0x10c7 @0xf
0x10b8…10fe at0010 = ╱49╱I╱ // 0x10c8 @0x10
0x10b8…10fe at0011 = ╱4c╱L╱ // 0x10c9 @0x11
0x10b8…10fe at0012 = ╱41╱A╱ // 0x10ca @0x12
0x10b8…10fe at0013 = ╱47╱G╱ // 0x10cb @0x13
0x10b8…10fe at0014 = ╱ec╱,╱ // 0x10cc @0x14
0x10b8…10fe at0015 = ╱54╱T╱ // 0x10cd @0x15
0x10b8…10fe at0016 = ╱45╱E╱ // 0x10ce @0x16
0x10b8…10fe at0017 = ╱4b╱K╱ // 0x10cf @0x17
0x10b8…10fe at0018 = ╱53╱S╱ // 0x10d0 @0x18
0x10b8…10fe at0019 = ╱54╱T╱ // 0x10d1 @0x19
0x10b8…10fe at001a = ╱4b╱K╱ // 0x10d2 @0x1a
0x10b8…10fe at001b = ╱4f╱O╱ // 0x10d3 @0x1b
0x10b8…10fe at001c = ╱44╱D╱ // 0x10d4 @0x1c
0x10b8…10fe at001d = ╱45╱E╱ // 0x10d5 @0x1d
0x10b8…10fe at001e = ╱ec╱,╱ // 0x10d6 @0x1e
0x10b8…10fe at001f = ╱4b╱K╱ // 0x10d7 @0x1f
0x10b8…10fe at0020 = ╱4f╱O╱ // 0x10d8 @0x20
0x10b8…10fe at0021 = ╱4e╱N╱ // 0x10d9 @0x21
0x10b8…10fe at0022 = ╱54╱T╱ // 0x10da @0x22
0x10b8…10fe at0023 = ╱4f╱O╱ // 0x10db @0x23
0x10b8…10fe at0024 = ╱ec╱,╱ // 0x10dc @0x24
0x10b8…10fe at0025 = ╱42╱B╱ // 0x10dd @0x25
0x10b8…10fe at0026 = ╱45╱E╱ // 0x10de @0x26
0x10b8…10fe at0027 = ╱4c╱L╱ // 0x10df @0x27
0x10b8…10fe at0028 = ╱5c╱Ø╱ // 0x10e0 @0x28
0x10b8…10fe at0029 = ╱42╱B╱ // 0x10e1 @0x29
0x10b8…10fe at002a = ╱ef╱$╱ // 0x10e2 @0x2a
0x10b8…10fe at002b = ╱ec╱,╱ // 0x10e3 @0x2b
0x10b8…10fe at002c = ╱4b╱K╱ // 0x10e4 @0x2c
0x10b8…10fe at002d = ╱4f╱O╱ // 0x10e5 @0x2d
0x10b8…10fe at002e = ╱44╱D╱ // 0x10e6 @0x2e
0x10b8…10fe at002f = ╱45╱E╱ // 0x10e7 @0x2f
0x10b8…10fe at0030 = ╱31╱1╱ // 0x10e8 @0x30
0x10b8…10fe at0031 = ╱ec╱,╱ // 0x10e9 @0x31
0x10b8…10fe at0032 = ╱42╱B╱ // 0x10ea @0x32
0x10b8…10fe at0033 = ╱4d╱M╱ // 0x10eb @0x33
0x10b8…10fe at0034 = ╱4f╱O╱ // 0x10ec @0x34
0x10b8…10fe at0035 = ╱4d╱M╱ // 0x10ed @0x35
0x10b8…10fe at0036 = ╱53╱S╱ // 0x10ee @0x36
0x10b8…10fe at0037 = ╱ef╱$╱ // 0x10ef @0x37
0x10b8…10fe at0038 = ╱ec╱,╱ // 0x10f0 @0x38
0x10b8…10fe at0039 = ╱4b╱K╱ // 0x10f1 @0x39
0x10b8…10fe at003a = ╱4f╱O╱ // 0x10f2 @0x3a
0x10b8…10fe at003b = ╱44╱D╱ // 0x10f3 @0x3b
0x10b8…10fe at003c = ╱45╱E╱ // 0x10f4 @0x3c
0x10b8…10fe at003d = ╱32╱2╱ // 0x10f5 @0x3d
0x10b8…10fe at003e = ╱ec╱,╱ // 0x10f6 @0x3e
0x10b8…10fe at003f = ╱45╱E╱ // 0x10f7 @0x3f
0x10b8…10fe at0040 = ╱4e╱N╱ // 0x10f8 @0x40
0x10b8…10fe at0041 = ╱54╱T╱ // 0x10f9 @0x41
0x10b8…10fe at0042 = ╱4b╱K╱ // 0x10fa @0x42
0x10b8…10fe at0043 = ╱4f╱O╱ // 0x10fb @0x43
0x10b8…10fe at0044 = ╱ee╱)╱ // 0x10fc @0x44
0x10b8…10fe at0045 = EOL // 0x10fd @0x45
0x10b8…10fe }
0x10fe…1104 9e5b 1320 ENDPROC
0x10fe…1104 LineComalBin {
0x10fe…1104 ptr = 0x9e5b // 0x10fe @0x0
0x10fe…1104 lno = 0x0528 // 0x1100 @0x2
0x10fe…1104 at0004 = ╱9f╱ ENDPROC ╱ // 0x1102 @0x4
0x10fe…1104 at0005 = EOL // 0x1103 @0x5
0x10fe…1104 }
0x1104…1120 9e77 1330 PROC BJHOVEDUD(UDAG,BJOSNR)
0x1104…1120 LineComalBin {
0x1104…1120 ptr = 0x9e77 // 0x1104 @0x0
0x1104…1120 lno = 0x0532 // 0x1106 @0x2
0x1104…1120 at0004 = ╱9e╱ PROC ╱ // 0x1108 @0x4
0x1104…1120 at0005 = ╱42╱B╱ // 0x1109 @0x5
0x1104…1120 at0006 = ╱4a╱J╱ // 0x110a @0x6
0x1104…1120 at0007 = ╱48╱H╱ // 0x110b @0x7
0x1104…1120 at0008 = ╱4f╱O╱ // 0x110c @0x8
0x1104…1120 at0009 = ╱56╱V╱ // 0x110d @0x9
0x1104…1120 at000a = ╱45╱E╱ // 0x110e @0xa
0x1104…1120 at000b = ╱44╱D╱ // 0x110f @0xb
0x1104…1120 at000c = ╱55╱U╱ // 0x1110 @0xc
0x1104…1120 at000d = ╱44╱D╱ // 0x1111 @0xd
0x1104…1120 at000e = ╱ed╱(╱ // 0x1112 @0xe
0x1104…1120 at000f = ╱55╱U╱ // 0x1113 @0xf
0x1104…1120 at0010 = ╱44╱D╱ // 0x1114 @0x10
0x1104…1120 at0011 = ╱41╱A╱ // 0x1115 @0x11
0x1104…1120 at0012 = ╱47╱G╱ // 0x1116 @0x12
0x1104…1120 at0013 = ╱ec╱,╱ // 0x1117 @0x13
0x1104…1120 at0014 = ╱42╱B╱ // 0x1118 @0x14
0x1104…1120 at0015 = ╱4a╱J╱ // 0x1119 @0x15
0x1104…1120 at0016 = ╱4f╱O╱ // 0x111a @0x16
0x1104…1120 at0017 = ╱53╱S╱ // 0x111b @0x17
0x1104…1120 at0018 = ╱4e╱N╱ // 0x111c @0x18
0x1104…1120 at0019 = ╱52╱R╱ // 0x111d @0x19
0x1104…1120 at001a = ╱ee╱)╱ // 0x111e @0x1a
0x1104…1120 at001b = EOL // 0x111f @0x1b
0x1104…1120 }
0x1120…1138 9e8f 1340 EXEC UDATO(UDAG,UDAGE$)
0x1120…1138 LineComalBin {
0x1120…1138 ptr = 0x9e8f // 0x1120 @0x0
0x1120…1138 lno = 0x053c // 0x1122 @0x2
0x1120…1138 at0004 = ╱9d╱ EXEC ╱ // 0x1124 @0x4
0x1120…1138 at0005 = ╱55╱U╱ // 0x1125 @0x5
0x1120…1138 at0006 = ╱44╱D╱ // 0x1126 @0x6
0x1120…1138 at0007 = ╱41╱A╱ // 0x1127 @0x7
0x1120…1138 at0008 = ╱54╱T╱ // 0x1128 @0x8
0x1120…1138 at0009 = ╱4f╱O╱ // 0x1129 @0x9
0x1120…1138 at000a = ╱ed╱(╱ // 0x112a @0xa
0x1120…1138 at000b = ╱55╱U╱ // 0x112b @0xb
0x1120…1138 at000c = ╱44╱D╱ // 0x112c @0xc
0x1120…1138 at000d = ╱41╱A╱ // 0x112d @0xd
0x1120…1138 at000e = ╱47╱G╱ // 0x112e @0xe
0x1120…1138 at000f = ╱ec╱,╱ // 0x112f @0xf
0x1120…1138 at0010 = ╱55╱U╱ // 0x1130 @0x10
0x1120…1138 at0011 = ╱44╱D╱ // 0x1131 @0x11
0x1120…1138 at0012 = ╱41╱A╱ // 0x1132 @0x12
0x1120…1138 at0013 = ╱47╱G╱ // 0x1133 @0x13
0x1120…1138 at0014 = ╱45╱E╱ // 0x1134 @0x14
0x1120…1138 at0015 = ╱ef╱$╱ // 0x1135 @0x15
0x1120…1138 at0016 = ╱ee╱)╱ // 0x1136 @0x16
0x1120…1138 at0017 = EOL // 0x1137 @0x17
0x1120…1138 }
0x1138…113f 9e96 1345 OUTPUT T
0x1138…113f LineComalBin {
0x1138…113f ptr = 0x9e96 // 0x1138 @0x0
0x1138…113f lno = 0x0541 // 0x113a @0x2
0x1138…113f at0004 = ╱a5╱ OUTPUT ╱ // 0x113c @0x4
0x1138…113f at0005 = ╱54╱T╱ // 0x113d @0x5
0x1138…113f at0006 = EOL // 0x113e @0x6
0x1138…113f }
0x113f…1146 9e9d 1350 OUTPUT P
0x113f…1146 LineComalBin {
0x113f…1146 ptr = 0x9e9d // 0x113f @0x0
0x113f…1146 lno = 0x0546 // 0x1141 @0x2
0x113f…1146 at0004 = ╱a5╱ OUTPUT ╱ // 0x1143 @0x4
0x113f…1146 at0005 = ╱50╱P╱ // 0x1144 @0x5
0x113f…1146 at0006 = EOL // 0x1145 @0x6
0x113f…1146 }
0x1146…115a 9eb1 1360 IF BJLNR=36 THEN
0x1146…115a LineComalBin {
0x1146…115a ptr = 0x9eb1 // 0x1146 @0x0
0x1146…115a lno = 0x0550 // 0x1148 @0x2
0x1146…115a at0004 = ╱9c╱ IF ╱ // 0x114a @0x4
0x1146…115a at0005 = ╱42╱B╱ // 0x114b @0x5
0x1146…115a at0006 = ╱4a╱J╱ // 0x114c @0x6
0x1146…115a at0007 = ╱4c╱L╱ // 0x114d @0x7
0x1146…115a at0008 = ╱4e╱N╱ // 0x114e @0x8
0x1146…115a at0009 = ╱52╱R╱ // 0x114f @0x9
0x1146…115a at000a = ╱dc╱=╱ // 0x1150 @0xa
0x1146…115a at000b = ╱33╱3╱ // 0x1151 @0xb
0x1146…115a at000c = ╱36╱6╱ // 0x1152 @0xc
0x1146…115a at000d = ╱fe00009006╱ // 0x1153 @0xd
0x1146…115a at0012 = ╱b6╱ THEN ╱ // 0x1158 @0x12
0x1146…115a at0013 = EOL // 0x1159 @0x13
0x1146…115a }
0x115a…1173 9eca 1370 FOR BJLNR=BJLNR TO 41
0x115a…1173 LineComalBin {
0x115a…1173 ptr = 0x9eca // 0x115a @0x0
0x115a…1173 lno = 0x055a // 0x115c @0x2
0x115a…1173 at0004 = ╱83╱ FOR ╱ // 0x115e @0x4
0x115a…1173 at0005 = ╱42╱B╱ // 0x115f @0x5
0x115a…1173 at0006 = ╱4a╱J╱ // 0x1160 @0x6
0x115a…1173 at0007 = ╱4c╱L╱ // 0x1161 @0x7
0x115a…1173 at0008 = ╱4e╱N╱ // 0x1162 @0x8
0x115a…1173 at0009 = ╱52╱R╱ // 0x1163 @0x9
0x115a…1173 at000a = ╱dc╱=╱ // 0x1164 @0xa
0x115a…1173 at000b = ╱42╱B╱ // 0x1165 @0xb
0x115a…1173 at000c = ╱4a╱J╱ // 0x1166 @0xc
0x115a…1173 at000d = ╱4c╱L╱ // 0x1167 @0xd
0x115a…1173 at000e = ╱4e╱N╱ // 0x1168 @0xe
0x115a…1173 at000f = ╱52╱R╱ // 0x1169 @0xf
0x115a…1173 at0010 = ╱b7╱ TO ╱ // 0x116a @0x10
0x115a…1173 at0011 = ╱34╱4╱ // 0x116b @0x11
0x115a…1173 at0012 = ╱31╱1╱ // 0x116c @0x12
0x115a…1173 at0013 = ╱fe0000a406╱ // 0x116d @0x13
0x115a…1173 at0018 = EOL // 0x1172 @0x18
0x115a…1173 }
0x1173…117c 9ed3 1380 PRINT " "
0x1173…117c LineComalBin {
0x1173…117c ptr = 0x9ed3 // 0x1173 @0x0
0x1173…117c lno = 0x0564 // 0x1175 @0x2
0x1173…117c at0004 = ╱92╱ PRINT ╱ // 0x1177 @0x4
0x1173…117c at0005 = ╱22╱"╱ // 0x1178 @0x5
0x1173…117c at0006 = ╱20╱…╱ // 0x1179 @0x6
0x1173…117c at0007 = ╱22╱"╱ // 0x117a @0x7
0x1173…117c at0008 = EOL // 0x117b @0x8
0x1173…117c }
0x117c…1187 9ede 1390 NEXT BJLNR
0x117c…1187 LineComalBin {
0x117c…1187 ptr = 0x9ede // 0x117c @0x0
0x117c…1187 lno = 0x056e // 0x117e @0x2
0x117c…1187 at0004 = ╱84╱ NEXT ╱ // 0x1180 @0x4
0x117c…1187 at0005 = ╱42╱B╱ // 0x1181 @0x5
0x117c…1187 at0006 = ╱4a╱J╱ // 0x1182 @0x6
0x117c…1187 at0007 = ╱4c╱L╱ // 0x1183 @0x7
0x117c…1187 at0008 = ╱4e╱N╱ // 0x1184 @0x8
0x117c…1187 at0009 = ╱52╱R╱ // 0x1185 @0x9
0x117c…1187 at000a = EOL // 0x1186 @0xa
0x117c…1187 }
0x1187…118d 9ee4 1400 ENDIF
0x1187…118d LineComalBin {
0x1187…118d ptr = 0x9ee4 // 0x1187 @0x0
0x1187…118d lno = 0x0578 // 0x1189 @0x2
0x1187…118d at0004 = ╱9b╱ ENDIF ╱ // 0x118b @0x4
0x1187…118d at0005 = EOL // 0x118c @0x5
0x1187…118d }
0x118d…11a5 9efc 1410 PRINT TAB(67);DV$;" "
0x118d…11a5 LineComalBin {
0x118d…11a5 ptr = 0x9efc // 0x118d @0x0
0x118d…11a5 lno = 0x0582 // 0x118f @0x2
0x118d…11a5 at0004 = ╱92╱ PRINT ╱ // 0x1191 @0x4
0x118d…11a5 at0005 = ╱d2╱TAB╱ // 0x1192 @0x5
0x118d…11a5 at0006 = ╱ed╱(╱ // 0x1193 @0x6
0x118d…11a5 at0007 = ╱36╱6╱ // 0x1194 @0x7
0x118d…11a5 at0008 = ╱37╱7╱ // 0x1195 @0x8
0x118d…11a5 at0009 = ╱fe00008607╱ // 0x1196 @0x9
0x118d…11a5 at000e = ╱ee╱)╱ // 0x119b @0xe
0x118d…11a5 at000f = ╱eb╱;╱ // 0x119c @0xf
0x118d…11a5 at0010 = ╱44╱D╱ // 0x119d @0x10
0x118d…11a5 at0011 = ╱56╱V╱ // 0x119e @0x11
0x118d…11a5 at0012 = ╱ef╱$╱ // 0x119f @0x12
0x118d…11a5 at0013 = ╱eb╱;╱ // 0x11a0 @0x13
0x118d…11a5 at0014 = ╱22╱"╱ // 0x11a1 @0x14
0x118d…11a5 at0015 = ╱20╱…╱ // 0x11a2 @0x15
0x118d…11a5 at0016 = ╱22╱"╱ // 0x11a3 @0x16
0x118d…11a5 at0017 = EOL // 0x11a4 @0x17
0x118d…11a5 }
0x11a5…11f9 9f50 1420 PRINT TAB(6);CHR(14);"Bogholderijournal";CHR(15);TAB(40);"Dato:";UDAGE$;
0x11a5…11f9 LineComalBin {
0x11a5…11f9 ptr = 0x9f50 // 0x11a5 @0x0
0x11a5…11f9 lno = 0x058c // 0x11a7 @0x2
0x11a5…11f9 at0004 = ╱92╱ PRINT ╱ // 0x11a9 @0x4
0x11a5…11f9 at0005 = ╱d2╱TAB╱ // 0x11aa @0x5
0x11a5…11f9 at0006 = ╱ed╱(╱ // 0x11ab @0x6
0x11a5…11f9 at0007 = ╱36╱6╱ // 0x11ac @0x7
0x11a5…11f9 at0008 = ╱fe0000c003╱ // 0x11ad @0x8
0x11a5…11f9 at000d = ╱ee╱)╱ // 0x11b2 @0xd
0x11a5…11f9 at000e = ╱eb╱;╱ // 0x11b3 @0xe
0x11a5…11f9 at000f = ╱cf╱CHR╱ // 0x11b4 @0xf
0x11a5…11f9 at0010 = ╱ed╱(╱ // 0x11b5 @0x10
0x11a5…11f9 at0011 = ╱31╱1╱ // 0x11b6 @0x11
0x11a5…11f9 at0012 = ╱34╱4╱ // 0x11b7 @0x12
0x11a5…11f9 at0013 = ╱fe0000e004╱ // 0x11b8 @0x13
0x11a5…11f9 at0018 = ╱ee╱)╱ // 0x11bd @0x18
0x11a5…11f9 at0019 = ╱eb╱;╱ // 0x11be @0x19
0x11a5…11f9 at001a = ╱22╱"╱ // 0x11bf @0x1a
0x11a5…11f9 at001b = ╱42╱B╱ // 0x11c0 @0x1b
0x11a5…11f9 at001c = ╱6f╱o╱ // 0x11c1 @0x1c
0x11a5…11f9 at001d = ╱67╱g╱ // 0x11c2 @0x1d
0x11a5…11f9 at001e = ╱68╱h╱ // 0x11c3 @0x1e
0x11a5…11f9 at001f = ╱6f╱o╱ // 0x11c4 @0x1f
0x11a5…11f9 at0020 = ╱6c╱l╱ // 0x11c5 @0x20
0x11a5…11f9 at0021 = ╱64╱d╱ // 0x11c6 @0x21
0x11a5…11f9 at0022 = ╱65╱e╱ // 0x11c7 @0x22
0x11a5…11f9 at0023 = ╱72╱r╱ // 0x11c8 @0x23
0x11a5…11f9 at0024 = ╱69╱i╱ // 0x11c9 @0x24
0x11a5…11f9 at0025 = ╱6a╱j╱ // 0x11ca @0x25
0x11a5…11f9 at0026 = ╱6f╱o╱ // 0x11cb @0x26
0x11a5…11f9 at0027 = ╱75╱u╱ // 0x11cc @0x27
0x11a5…11f9 at0028 = ╱72╱r╱ // 0x11cd @0x28
0x11a5…11f9 at0029 = ╱6e╱n╱ // 0x11ce @0x29
0x11a5…11f9 at002a = ╱61╱a╱ // 0x11cf @0x2a
0x11a5…11f9 at002b = ╱6c╱l╱ // 0x11d0 @0x2b
0x11a5…11f9 at002c = ╱22╱"╱ // 0x11d1 @0x2c
0x11a5…11f9 at002d = ╱eb╱;╱ // 0x11d2 @0x2d
0x11a5…11f9 at002e = ╱cf╱CHR╱ // 0x11d3 @0x2e
0x11a5…11f9 at002f = ╱ed╱(╱ // 0x11d4 @0x2f
0x11a5…11f9 at0030 = ╱31╱1╱ // 0x11d5 @0x30
0x11a5…11f9 at0031 = ╱35╱5╱ // 0x11d6 @0x31
0x11a5…11f9 at0032 = ╱fe0000f004╱ // 0x11d7 @0x32
0x11a5…11f9 at0037 = ╱ee╱)╱ // 0x11dc @0x37
0x11a5…11f9 at0038 = ╱eb╱;╱ // 0x11dd @0x38
0x11a5…11f9 at0039 = ╱d2╱TAB╱ // 0x11de @0x39
0x11a5…11f9 at003a = ╱ed╱(╱ // 0x11df @0x3a
0x11a5…11f9 at003b = ╱34╱4╱ // 0x11e0 @0x3b
0x11a5…11f9 at003c = ╱30╱0╱ // 0x11e1 @0x3c
0x11a5…11f9 at003d = ╱fe0000a006╱ // 0x11e2 @0x3d
0x11a5…11f9 at0042 = ╱ee╱)╱ // 0x11e7 @0x42
0x11a5…11f9 at0043 = ╱eb╱;╱ // 0x11e8 @0x43
0x11a5…11f9 at0044 = ╱22╱"╱ // 0x11e9 @0x44
0x11a5…11f9 at0045 = ╱44╱D╱ // 0x11ea @0x45
0x11a5…11f9 at0046 = ╱61╱a╱ // 0x11eb @0x46
0x11a5…11f9 at0047 = ╱74╱t╱ // 0x11ec @0x47
0x11a5…11f9 at0048 = ╱6f╱o╱ // 0x11ed @0x48
0x11a5…11f9 at0049 = ╱3a╱:╱ // 0x11ee @0x49
0x11a5…11f9 at004a = ╱22╱"╱ // 0x11ef @0x4a
0x11a5…11f9 at004b = ╱eb╱;╱ // 0x11f0 @0x4b
0x11a5…11f9 at004c = ╱55╱U╱ // 0x11f1 @0x4c
0x11a5…11f9 at004d = ╱44╱D╱ // 0x11f2 @0x4d
0x11a5…11f9 at004e = ╱41╱A╱ // 0x11f3 @0x4e
0x11a5…11f9 at004f = ╱47╱G╱ // 0x11f4 @0x4f
0x11a5…11f9 at0050 = ╱45╱E╱ // 0x11f5 @0x50
0x11a5…11f9 at0051 = ╱ef╱$╱ // 0x11f6 @0x51
0x11a5…11f9 at0052 = ╱eb╱;╱ // 0x11f7 @0x52
0x11a5…11f9 at0053 = EOL // 0x11f8 @0x53
0x11a5…11f9 }
0x11f9…120a 9f61 1430 PRINT TAB(56);
0x11f9…120a LineComalBin {
0x11f9…120a ptr = 0x9f61 // 0x11f9 @0x0
0x11f9…120a lno = 0x0596 // 0x11fb @0x2
0x11f9…120a at0004 = ╱92╱ PRINT ╱ // 0x11fd @0x4
0x11f9…120a at0005 = ╱d2╱TAB╱ // 0x11fe @0x5
0x11f9…120a at0006 = ╱ed╱(╱ // 0x11ff @0x6
0x11f9…120a at0007 = ╱35╱5╱ // 0x1200 @0x7
0x11f9…120a at0008 = ╱36╱6╱ // 0x1201 @0x8
0x11f9…120a at0009 = ╱fe0000e006╱ // 0x1202 @0x9
0x11f9…120a at000e = ╱ee╱)╱ // 0x1207 @0xe
0x11f9…120a at000f = ╱eb╱;╱ // 0x1208 @0xf
0x11f9…120a at0010 = EOL // 0x1209 @0x10
0x11f9…120a }
0x120a…1224 9f7b 1440 PRINT USING "Side:#####":BJOSNR
0x120a…1224 LineComalBin {
0x120a…1224 ptr = 0x9f7b // 0x120a @0x0
0x120a…1224 lno = 0x05a0 // 0x120c @0x2
0x120a…1224 at0004 = ╱92╱ PRINT ╱ // 0x120e @0x4
0x120a…1224 at0005 = ╱b9╱ USING ╱ // 0x120f @0x5
0x120a…1224 at0006 = ╱22╱"╱ // 0x1210 @0x6
0x120a…1224 at0007 = ╱53╱S╱ // 0x1211 @0x7
0x120a…1224 at0008 = ╱69╱i╱ // 0x1212 @0x8
0x120a…1224 at0009 = ╱64╱d╱ // 0x1213 @0x9
0x120a…1224 at000a = ╱65╱e╱ // 0x1214 @0xa
0x120a…1224 at000b = ╱3a╱:╱ // 0x1215 @0xb
0x120a…1224 at000c = ╱23╱#╱ // 0x1216 @0xc
0x120a…1224 at000d = ╱23╱#╱ // 0x1217 @0xd
0x120a…1224 at000e = ╱23╱#╱ // 0x1218 @0xe
0x120a…1224 at000f = ╱23╱#╱ // 0x1219 @0xf
0x120a…1224 at0010 = ╱23╱#╱ // 0x121a @0x10
0x120a…1224 at0011 = ╱22╱"╱ // 0x121b @0x11
0x120a…1224 at0012 = ╱f0╱:╱ // 0x121c @0x12
0x120a…1224 at0013 = ╱42╱B╱ // 0x121d @0x13
0x120a…1224 at0014 = ╱4a╱J╱ // 0x121e @0x14
0x120a…1224 at0015 = ╱4f╱O╱ // 0x121f @0x15
0x120a…1224 at0016 = ╱53╱S╱ // 0x1220 @0x16
0x120a…1224 at0017 = ╱4e╱N╱ // 0x1221 @0x17
0x120a…1224 at0018 = ╱52╱R╱ // 0x1222 @0x18
0x120a…1224 at0019 = EOL // 0x1223 @0x19
0x120a…1224 }
0x1224…1246 9f9d 1450 PRINT CHR(10);TAB(73);"Moms"
0x1224…1246 LineComalBin {
0x1224…1246 ptr = 0x9f9d // 0x1224 @0x0
0x1224…1246 lno = 0x05aa // 0x1226 @0x2
0x1224…1246 at0004 = ╱92╱ PRINT ╱ // 0x1228 @0x4
0x1224…1246 at0005 = ╱cf╱CHR╱ // 0x1229 @0x5
0x1224…1246 at0006 = ╱ed╱(╱ // 0x122a @0x6
0x1224…1246 at0007 = ╱31╱1╱ // 0x122b @0x7
0x1224…1246 at0008 = ╱30╱0╱ // 0x122c @0x8
0x1224…1246 at0009 = ╱fe0000a004╱ // 0x122d @0x9
0x1224…1246 at000e = ╱ee╱)╱ // 0x1232 @0xe
0x1224…1246 at000f = ╱eb╱;╱ // 0x1233 @0xf
0x1224…1246 at0010 = ╱d2╱TAB╱ // 0x1234 @0x10
0x1224…1246 at0011 = ╱ed╱(╱ // 0x1235 @0x11
0x1224…1246 at0012 = ╱37╱7╱ // 0x1236 @0x12
0x1224…1246 at0013 = ╱33╱3╱ // 0x1237 @0x13
0x1224…1246 at0014 = ╱fe00009207╱ // 0x1238 @0x14
0x1224…1246 at0019 = ╱ee╱)╱ // 0x123d @0x19
0x1224…1246 at001a = ╱eb╱;╱ // 0x123e @0x1a
0x1224…1246 at001b = ╱22╱"╱ // 0x123f @0x1b
0x1224…1246 at001c = ╱4d╱M╱ // 0x1240 @0x1c
0x1224…1246 at001d = ╱6f╱o╱ // 0x1241 @0x1d
0x1224…1246 at001e = ╱6d╱m╱ // 0x1242 @0x1e
0x1224…1246 at001f = ╱73╱s╱ // 0x1243 @0x1f
0x1224…1246 at0020 = ╱22╱"╱ // 0x1244 @0x20
0x1224…1246 at0021 = EOL // 0x1245 @0x21
0x1224…1246 }
0x1246…1296 9fed 1460 PRINT TAB(2);"Bilag";TAB(9);"Tekst";TAB(35);"Konto";TAB(42);"Entre";
0x1246…1296 LineComalBin {
0x1246…1296 ptr = 0x9fed // 0x1246 @0x0
0x1246…1296 lno = 0x05b4 // 0x1248 @0x2
0x1246…1296 at0004 = ╱92╱ PRINT ╱ // 0x124a @0x4
0x1246…1296 at0005 = ╱d2╱TAB╱ // 0x124b @0x5
0x1246…1296 at0006 = ╱ed╱(╱ // 0x124c @0x6
0x1246…1296 at0007 = ╱32╱2╱ // 0x124d @0x7
0x1246…1296 at0008 = ╱fe00008002╱ // 0x124e @0x8
0x1246…1296 at000d = ╱ee╱)╱ // 0x1253 @0xd
0x1246…1296 at000e = ╱eb╱;╱ // 0x1254 @0xe
0x1246…1296 at000f = ╱22╱"╱ // 0x1255 @0xf
0x1246…1296 at0010 = ╱42╱B╱ // 0x1256 @0x10
0x1246…1296 at0011 = ╱69╱i╱ // 0x1257 @0x11
0x1246…1296 at0012 = ╱6c╱l╱ // 0x1258 @0x12
0x1246…1296 at0013 = ╱61╱a╱ // 0x1259 @0x13
0x1246…1296 at0014 = ╱67╱g╱ // 0x125a @0x14
0x1246…1296 at0015 = ╱22╱"╱ // 0x125b @0x15
0x1246…1296 at0016 = ╱eb╱;╱ // 0x125c @0x16
0x1246…1296 at0017 = ╱d2╱TAB╱ // 0x125d @0x17
0x1246…1296 at0018 = ╱ed╱(╱ // 0x125e @0x18
0x1246…1296 at0019 = ╱39╱9╱ // 0x125f @0x19
0x1246…1296 at001a = ╱fe00009004╱ // 0x1260 @0x1a
0x1246…1296 at001f = ╱ee╱)╱ // 0x1265 @0x1f
0x1246…1296 at0020 = ╱eb╱;╱ // 0x1266 @0x20
0x1246…1296 at0021 = ╱22╱"╱ // 0x1267 @0x21
0x1246…1296 at0022 = ╱54╱T╱ // 0x1268 @0x22
0x1246…1296 at0023 = ╱65╱e╱ // 0x1269 @0x23
0x1246…1296 at0024 = ╱6b╱k╱ // 0x126a @0x24
0x1246…1296 at0025 = ╱73╱s╱ // 0x126b @0x25
0x1246…1296 at0026 = ╱74╱t╱ // 0x126c @0x26
0x1246…1296 at0027 = ╱22╱"╱ // 0x126d @0x27
0x1246…1296 at0028 = ╱eb╱;╱ // 0x126e @0x28
0x1246…1296 at0029 = ╱d2╱TAB╱ // 0x126f @0x29
0x1246…1296 at002a = ╱ed╱(╱ // 0x1270 @0x2a
0x1246…1296 at002b = ╱33╱3╱ // 0x1271 @0x2b
0x1246…1296 at002c = ╱35╱5╱ // 0x1272 @0x2c
0x1246…1296 at002d = ╱fe00008c06╱ // 0x1273 @0x2d
0x1246…1296 at0032 = ╱ee╱)╱ // 0x1278 @0x32
0x1246…1296 at0033 = ╱eb╱;╱ // 0x1279 @0x33
0x1246…1296 at0034 = ╱22╱"╱ // 0x127a @0x34
0x1246…1296 at0035 = ╱4b╱K╱ // 0x127b @0x35
0x1246…1296 at0036 = ╱6f╱o╱ // 0x127c @0x36
0x1246…1296 at0037 = ╱6e╱n╱ // 0x127d @0x37
0x1246…1296 at0038 = ╱74╱t╱ // 0x127e @0x38
0x1246…1296 at0039 = ╱6f╱o╱ // 0x127f @0x39
0x1246…1296 at003a = ╱22╱"╱ // 0x1280 @0x3a
0x1246…1296 at003b = ╱eb╱;╱ // 0x1281 @0x3b
0x1246…1296 at003c = ╱d2╱TAB╱ // 0x1282 @0x3c
0x1246…1296 at003d = ╱ed╱(╱ // 0x1283 @0x3d
0x1246…1296 at003e = ╱34╱4╱ // 0x1284 @0x3e
0x1246…1296 at003f = ╱32╱2╱ // 0x1285 @0x3f
0x1246…1296 at0040 = ╱fe0000a806╱ // 0x1286 @0x40
0x1246…1296 at0045 = ╱ee╱)╱ // 0x128b @0x45
0x1246…1296 at0046 = ╱eb╱;╱ // 0x128c @0x46
0x1246…1296 at0047 = ╱22╱"╱ // 0x128d @0x47
0x1246…1296 at0048 = ╱45╱E╱ // 0x128e @0x48
0x1246…1296 at0049 = ╱6e╱n╱ // 0x128f @0x49
0x1246…1296 at004a = ╱74╱t╱ // 0x1290 @0x4a
0x1246…1296 at004b = ╱72╱r╱ // 0x1291 @0x4b
0x1246…1296 at004c = ╱65╱e╱ // 0x1292 @0x4c
0x1246…1296 at004d = ╱22╱"╱ // 0x1293 @0x4d
0x1246…1296 at004e = ╱eb╱;╱ // 0x1294 @0x4e
0x1246…1296 at004f = EOL // 0x1295 @0x4f
0x1246…1296 }
0x1296…12e5 a03c 1470 PRINT TAB(53);"Beløb";TAB(61);"Kode";TAB(69);"Beløb";TAB(75);"Kode"
0x1296…12e5 LineComalBin {
0x1296…12e5 ptr = 0xa03c // 0x1296 @0x0
0x1296…12e5 lno = 0x05be // 0x1298 @0x2
0x1296…12e5 at0004 = ╱92╱ PRINT ╱ // 0x129a @0x4
0x1296…12e5 at0005 = ╱d2╱TAB╱ // 0x129b @0x5
0x1296…12e5 at0006 = ╱ed╱(╱ // 0x129c @0x6
0x1296…12e5 at0007 = ╱35╱5╱ // 0x129d @0x7
0x1296…12e5 at0008 = ╱33╱3╱ // 0x129e @0x8
0x1296…12e5 at0009 = ╱fe0000d406╱ // 0x129f @0x9
0x1296…12e5 at000e = ╱ee╱)╱ // 0x12a4 @0xe
0x1296…12e5 at000f = ╱eb╱;╱ // 0x12a5 @0xf
0x1296…12e5 at0010 = ╱22╱"╱ // 0x12a6 @0x10
0x1296…12e5 at0011 = ╱42╱B╱ // 0x12a7 @0x11
0x1296…12e5 at0012 = ╱65╱e╱ // 0x12a8 @0x12
0x1296…12e5 at0013 = ╱6c╱l╱ // 0x12a9 @0x13
0x1296…12e5 at0014 = ╱7c╱ø╱ // 0x12aa @0x14
0x1296…12e5 at0015 = ╱62╱b╱ // 0x12ab @0x15
0x1296…12e5 at0016 = ╱22╱"╱ // 0x12ac @0x16
0x1296…12e5 at0017 = ╱eb╱;╱ // 0x12ad @0x17
0x1296…12e5 at0018 = ╱d2╱TAB╱ // 0x12ae @0x18
0x1296…12e5 at0019 = ╱ed╱(╱ // 0x12af @0x19
0x1296…12e5 at001a = ╱36╱6╱ // 0x12b0 @0x1a
0x1296…12e5 at001b = ╱31╱1╱ // 0x12b1 @0x1b
0x1296…12e5 at001c = ╱fe0000f406╱ // 0x12b2 @0x1c
0x1296…12e5 at0021 = ╱ee╱)╱ // 0x12b7 @0x21
0x1296…12e5 at0022 = ╱eb╱;╱ // 0x12b8 @0x22
0x1296…12e5 at0023 = ╱22╱"╱ // 0x12b9 @0x23
0x1296…12e5 at0024 = ╱4b╱K╱ // 0x12ba @0x24
0x1296…12e5 at0025 = ╱6f╱o╱ // 0x12bb @0x25
0x1296…12e5 at0026 = ╱64╱d╱ // 0x12bc @0x26
0x1296…12e5 at0027 = ╱65╱e╱ // 0x12bd @0x27
0x1296…12e5 at0028 = ╱22╱"╱ // 0x12be @0x28
0x1296…12e5 at0029 = ╱eb╱;╱ // 0x12bf @0x29
0x1296…12e5 at002a = ╱d2╱TAB╱ // 0x12c0 @0x2a
0x1296…12e5 at002b = ╱ed╱(╱ // 0x12c1 @0x2b
0x1296…12e5 at002c = ╱36╱6╱ // 0x12c2 @0x2c
0x1296…12e5 at002d = ╱39╱9╱ // 0x12c3 @0x2d
0x1296…12e5 at002e = ╱fe00008a07╱ // 0x12c4 @0x2e
0x1296…12e5 at0033 = ╱ee╱)╱ // 0x12c9 @0x33
0x1296…12e5 at0034 = ╱eb╱;╱ // 0x12ca @0x34
0x1296…12e5 at0035 = ╱22╱"╱ // 0x12cb @0x35
0x1296…12e5 at0036 = ╱42╱B╱ // 0x12cc @0x36
0x1296…12e5 at0037 = ╱65╱e╱ // 0x12cd @0x37
0x1296…12e5 at0038 = ╱6c╱l╱ // 0x12ce @0x38
0x1296…12e5 at0039 = ╱7c╱ø╱ // 0x12cf @0x39
0x1296…12e5 at003a = ╱62╱b╱ // 0x12d0 @0x3a
0x1296…12e5 at003b = ╱22╱"╱ // 0x12d1 @0x3b
0x1296…12e5 at003c = ╱eb╱;╱ // 0x12d2 @0x3c
0x1296…12e5 at003d = ╱d2╱TAB╱ // 0x12d3 @0x3d
0x1296…12e5 at003e = ╱ed╱(╱ // 0x12d4 @0x3e
0x1296…12e5 at003f = ╱37╱7╱ // 0x12d5 @0x3f
0x1296…12e5 at0040 = ╱35╱5╱ // 0x12d6 @0x40
0x1296…12e5 at0041 = ╱fe00009607╱ // 0x12d7 @0x41
0x1296…12e5 at0046 = ╱ee╱)╱ // 0x12dc @0x46
0x1296…12e5 at0047 = ╱eb╱;╱ // 0x12dd @0x47
0x1296…12e5 at0048 = ╱22╱"╱ // 0x12de @0x48
0x1296…12e5 at0049 = ╱4b╱K╱ // 0x12df @0x49
0x1296…12e5 at004a = ╱6f╱o╱ // 0x12e0 @0x4a
0x1296…12e5 at004b = ╱64╱d╱ // 0x12e1 @0x4b
0x1296…12e5 at004c = ╱65╱e╱ // 0x12e2 @0x4c
0x1296…12e5 at004d = ╱22╱"╱ // 0x12e3 @0x4d
0x1296…12e5 at004e = EOL // 0x12e4 @0x4e
0x1296…12e5 }
0x12e5…12fb a052 1480 PRINT TAB(2);STREG$
0x12e5…12fb LineComalBin {
0x12e5…12fb ptr = 0xa052 // 0x12e5 @0x0
0x12e5…12fb lno = 0x05c8 // 0x12e7 @0x2
0x12e5…12fb at0004 = ╱92╱ PRINT ╱ // 0x12e9 @0x4
0x12e5…12fb at0005 = ╱d2╱TAB╱ // 0x12ea @0x5
0x12e5…12fb at0006 = ╱ed╱(╱ // 0x12eb @0x6
0x12e5…12fb at0007 = ╱32╱2╱ // 0x12ec @0x7
0x12e5…12fb at0008 = ╱fe00008002╱ // 0x12ed @0x8
0x12e5…12fb at000d = ╱ee╱)╱ // 0x12f2 @0xd
0x12e5…12fb at000e = ╱eb╱;╱ // 0x12f3 @0xe
0x12e5…12fb at000f = ╱53╱S╱ // 0x12f4 @0xf
0x12e5…12fb at0010 = ╱54╱T╱ // 0x12f5 @0x10
0x12e5…12fb at0011 = ╱52╱R╱ // 0x12f6 @0x11
0x12e5…12fb at0012 = ╱45╱E╱ // 0x12f7 @0x12
0x12e5…12fb at0013 = ╱47╱G╱ // 0x12f8 @0x13
0x12e5…12fb at0014 = ╱ef╱$╱ // 0x12f9 @0x14
0x12e5…12fb at0015 = EOL // 0x12fa @0x15
0x12e5…12fb }
0x12fb…1301 a058 1490 ENDPROC
0x12fb…1301 LineComalBin {
0x12fb…1301 ptr = 0xa058 // 0x12fb @0x0
0x12fb…1301 lno = 0x05d2 // 0x12fd @0x2
0x12fb…1301 at0004 = ╱9f╱ ENDPROC ╱ // 0x12ff @0x4
0x12fb…1301 at0005 = EOL // 0x1300 @0x5
0x12fb…1301 }
0x1301…1337 a08e 1500 PROC BJLINIEUD(BLG,TEKKODE,KONT,BELB,KO1,MO,KO2,ENT3)
0x1301…1337 LineComalBin {
0x1301…1337 ptr = 0xa08e // 0x1301 @0x0
0x1301…1337 lno = 0x05dc // 0x1303 @0x2
0x1301…1337 at0004 = ╱9e╱ PROC ╱ // 0x1305 @0x4
0x1301…1337 at0005 = ╱42╱B╱ // 0x1306 @0x5
0x1301…1337 at0006 = ╱4a╱J╱ // 0x1307 @0x6
0x1301…1337 at0007 = ╱4c╱L╱ // 0x1308 @0x7
0x1301…1337 at0008 = ╱49╱I╱ // 0x1309 @0x8
0x1301…1337 at0009 = ╱4e╱N╱ // 0x130a @0x9
0x1301…1337 at000a = ╱49╱I╱ // 0x130b @0xa
0x1301…1337 at000b = ╱45╱E╱ // 0x130c @0xb
0x1301…1337 at000c = ╱55╱U╱ // 0x130d @0xc
0x1301…1337 at000d = ╱44╱D╱ // 0x130e @0xd
0x1301…1337 at000e = ╱ed╱(╱ // 0x130f @0xe
0x1301…1337 at000f = ╱42╱B╱ // 0x1310 @0xf
0x1301…1337 at0010 = ╱4c╱L╱ // 0x1311 @0x10
0x1301…1337 at0011 = ╱47╱G╱ // 0x1312 @0x11
0x1301…1337 at0012 = ╱ec╱,╱ // 0x1313 @0x12
0x1301…1337 at0013 = ╱54╱T╱ // 0x1314 @0x13
0x1301…1337 at0014 = ╱45╱E╱ // 0x1315 @0x14
0x1301…1337 at0015 = ╱4b╱K╱ // 0x1316 @0x15
0x1301…1337 at0016 = ╱4b╱K╱ // 0x1317 @0x16
0x1301…1337 at0017 = ╱4f╱O╱ // 0x1318 @0x17
0x1301…1337 at0018 = ╱44╱D╱ // 0x1319 @0x18
0x1301…1337 at0019 = ╱45╱E╱ // 0x131a @0x19
0x1301…1337 at001a = ╱ec╱,╱ // 0x131b @0x1a
0x1301…1337 at001b = ╱4b╱K╱ // 0x131c @0x1b
0x1301…1337 at001c = ╱4f╱O╱ // 0x131d @0x1c
0x1301…1337 at001d = ╱4e╱N╱ // 0x131e @0x1d
0x1301…1337 at001e = ╱54╱T╱ // 0x131f @0x1e
0x1301…1337 at001f = ╱ec╱,╱ // 0x1320 @0x1f
0x1301…1337 at0020 = ╱42╱B╱ // 0x1321 @0x20
0x1301…1337 at0021 = ╱45╱E╱ // 0x1322 @0x21
0x1301…1337 at0022 = ╱4c╱L╱ // 0x1323 @0x22
0x1301…1337 at0023 = ╱42╱B╱ // 0x1324 @0x23
0x1301…1337 at0024 = ╱ec╱,╱ // 0x1325 @0x24
0x1301…1337 at0025 = ╱4b╱K╱ // 0x1326 @0x25
0x1301…1337 at0026 = ╱4f╱O╱ // 0x1327 @0x26
0x1301…1337 at0027 = ╱31╱1╱ // 0x1328 @0x27
0x1301…1337 at0028 = ╱ec╱,╱ // 0x1329 @0x28
0x1301…1337 at0029 = ╱4d╱M╱ // 0x132a @0x29
0x1301…1337 at002a = ╱4f╱O╱ // 0x132b @0x2a
0x1301…1337 at002b = ╱ec╱,╱ // 0x132c @0x2b
0x1301…1337 at002c = ╱4b╱K╱ // 0x132d @0x2c
0x1301…1337 at002d = ╱4f╱O╱ // 0x132e @0x2d
0x1301…1337 at002e = ╱32╱2╱ // 0x132f @0x2e
0x1301…1337 at002f = ╱ec╱,╱ // 0x1330 @0x2f
0x1301…1337 at0030 = ╱45╱E╱ // 0x1331 @0x30
0x1301…1337 at0031 = ╱4e╱N╱ // 0x1332 @0x31
0x1301…1337 at0032 = ╱54╱T╱ // 0x1333 @0x32
0x1301…1337 at0033 = ╱33╱3╱ // 0x1334 @0x33
0x1301…1337 at0034 = ╱ee╱)╱ // 0x1335 @0x34
0x1301…1337 at0035 = EOL // 0x1336 @0x35
0x1301…1337 }
0x1337…1349 a0a0 1510 IF BLG<>-1 THEN
0x1337…1349 LineComalBin {
0x1337…1349 ptr = 0xa0a0 // 0x1337 @0x0
0x1337…1349 lno = 0x05e6 // 0x1339 @0x2
0x1337…1349 at0004 = ╱9c╱ IF ╱ // 0x133b @0x4
0x1337…1349 at0005 = ╱42╱B╱ // 0x133c @0x5
0x1337…1349 at0006 = ╱4c╱L╱ // 0x133d @0x6
0x1337…1349 at0007 = ╱47╱G╱ // 0x133e @0x7
0x1337…1349 at0008 = ╱e1╱<>╱ // 0x133f @0x8
0x1337…1349 at0009 = ╱e9╱-╱ // 0x1340 @0x9
0x1337…1349 at000a = ╱31╱1╱ // 0x1341 @0xa
0x1337…1349 at000b = ╱fe00008001╱ // 0x1342 @0xb
0x1337…1349 at0010 = ╱b6╱ THEN ╱ // 0x1347 @0x10
0x1337…1349 at0011 = EOL // 0x1348 @0x11
0x1337…1349 }
0x1349…135e a0b5 1520 PRINT USING "#######":BLG;
0x1349…135e LineComalBin {
0x1349…135e ptr = 0xa0b5 // 0x1349 @0x0
0x1349…135e lno = 0x05f0 // 0x134b @0x2
0x1349…135e at0004 = ╱92╱ PRINT ╱ // 0x134d @0x4
0x1349…135e at0005 = ╱b9╱ USING ╱ // 0x134e @0x5
0x1349…135e at0006 = ╱22╱"╱ // 0x134f @0x6
0x1349…135e at0007 = ╱23╱#╱ // 0x1350 @0x7
0x1349…135e at0008 = ╱23╱#╱ // 0x1351 @0x8
0x1349…135e at0009 = ╱23╱#╱ // 0x1352 @0x9
0x1349…135e at000a = ╱23╱#╱ // 0x1353 @0xa
0x1349…135e at000b = ╱23╱#╱ // 0x1354 @0xb
0x1349…135e at000c = ╱23╱#╱ // 0x1355 @0xc
0x1349…135e at000d = ╱23╱#╱ // 0x1356 @0xd
0x1349…135e at000e = ╱22╱"╱ // 0x1357 @0xe
0x1349…135e at000f = ╱f0╱:╱ // 0x1358 @0xf
0x1349…135e at0010 = ╱42╱B╱ // 0x1359 @0x10
0x1349…135e at0011 = ╱4c╱L╱ // 0x135a @0x11
0x1349…135e at0012 = ╱47╱G╱ // 0x135b @0x12
0x1349…135e at0013 = ╱eb╱;╱ // 0x135c @0x13
0x1349…135e at0014 = EOL // 0x135d @0x14
0x1349…135e }
0x135e…1364 a0bb 1530 ENDIF
0x135e…1364 LineComalBin {
0x135e…1364 ptr = 0xa0bb // 0x135e @0x0
0x135e…1364 lno = 0x05fa // 0x1360 @0x2
0x135e…1364 at0004 = ╱9b╱ ENDIF ╱ // 0x1362 @0x4
0x135e…1364 at0005 = EOL // 0x1363 @0x5
0x135e…1364 }
0x1364…1399 a0f0 1540 IF TEKKODE<10 AND TEKKODE>0 OR TEKKODE>20 THEN
0x1364…1399 LineComalBin {
0x1364…1399 ptr = 0xa0f0 // 0x1364 @0x0
0x1364…1399 lno = 0x0604 // 0x1366 @0x2
0x1364…1399 at0004 = ╱9c╱ IF ╱ // 0x1368 @0x4
0x1364…1399 at0005 = ╱54╱T╱ // 0x1369 @0x5
0x1364…1399 at0006 = ╱45╱E╱ // 0x136a @0x6
0x1364…1399 at0007 = ╱4b╱K╱ // 0x136b @0x7
0x1364…1399 at0008 = ╱4b╱K╱ // 0x136c @0x8
0x1364…1399 at0009 = ╱4f╱O╱ // 0x136d @0x9
0x1364…1399 at000a = ╱44╱D╱ // 0x136e @0xa
0x1364…1399 at000b = ╱45╱E╱ // 0x136f @0xb
0x1364…1399 at000c = ╱dd╱<╱ // 0x1370 @0xc
0x1364…1399 at000d = ╱31╱1╱ // 0x1371 @0xd
0x1364…1399 at000e = ╱30╱0╱ // 0x1372 @0xe
0x1364…1399 at000f = ╱fe0000a004╱ // 0x1373 @0xf
0x1364…1399 at0014 = ╱da╱ AND ╱ // 0x1378 @0x14
0x1364…1399 at0015 = ╱54╱T╱ // 0x1379 @0x15
0x1364…1399 at0016 = ╱45╱E╱ // 0x137a @0x16
0x1364…1399 at0017 = ╱4b╱K╱ // 0x137b @0x17
0x1364…1399 at0018 = ╱4b╱K╱ // 0x137c @0x18
0x1364…1399 at0019 = ╱4f╱O╱ // 0x137d @0x19
0x1364…1399 at001a = ╱44╱D╱ // 0x137e @0x1a
0x1364…1399 at001b = ╱45╱E╱ // 0x137f @0x1b
0x1364…1399 at001c = ╱de╱>╱ // 0x1380 @0x1c
0x1364…1399 at001d = ╱30╱0╱ // 0x1381 @0x1d
0x1364…1399 at001e = ╱fe00000000╱ // 0x1382 @0x1e
0x1364…1399 at0023 = ╱db╱ OR ╱ // 0x1387 @0x23
0x1364…1399 at0024 = ╱54╱T╱ // 0x1388 @0x24
0x1364…1399 at0025 = ╱45╱E╱ // 0x1389 @0x25
0x1364…1399 at0026 = ╱4b╱K╱ // 0x138a @0x26
0x1364…1399 at0027 = ╱4b╱K╱ // 0x138b @0x27
0x1364…1399 at0028 = ╱4f╱O╱ // 0x138c @0x28
0x1364…1399 at0029 = ╱44╱D╱ // 0x138d @0x29
0x1364…1399 at002a = ╱45╱E╱ // 0x138e @0x2a
0x1364…1399 at002b = ╱de╱>╱ // 0x138f @0x2b
0x1364…1399 at002c = ╱32╱2╱ // 0x1390 @0x2c
0x1364…1399 at002d = ╱30╱0╱ // 0x1391 @0x2d
0x1364…1399 at002e = ╱fe0000a005╱ // 0x1392 @0x2e
0x1364…1399 at0033 = ╱b6╱ THEN ╱ // 0x1397 @0x33
0x1364…1399 at0034 = EOL // 0x1398 @0x34
0x1364…1399 }
0x1399…13e4 a13b 1550 TEKST$=TFIL$(TEKKODE-10*(TEKKODE>20))+BLANK$(1:15)
0x1399…13e4 LineComalBin {
0x1399…13e4 ptr = 0xa13b // 0x1399 @0x0
0x1399…13e4 lno = 0x060e // 0x139b @0x2
0x1399…13e4 at0004 = ╱54╱T╱ // 0x139d @0x4
0x1399…13e4 at0005 = ╱45╱E╱ // 0x139e @0x5
0x1399…13e4 at0006 = ╱4b╱K╱ // 0x139f @0x6
0x1399…13e4 at0007 = ╱53╱S╱ // 0x13a0 @0x7
0x1399…13e4 at0008 = ╱54╱T╱ // 0x13a1 @0x8
0x1399…13e4 at0009 = ╱ef╱$╱ // 0x13a2 @0x9
0x1399…13e4 at000a = ╱dc╱=╱ // 0x13a3 @0xa
0x1399…13e4 at000b = ╱54╱T╱ // 0x13a4 @0xb
0x1399…13e4 at000c = ╱46╱F╱ // 0x13a5 @0xc
0x1399…13e4 at000d = ╱49╱I╱ // 0x13a6 @0xd
0x1399…13e4 at000e = ╱4c╱L╱ // 0x13a7 @0xe
0x1399…13e4 at000f = ╱ef╱$╱ // 0x13a8 @0xf
0x1399…13e4 at0010 = ╱ed╱(╱ // 0x13a9 @0x10
0x1399…13e4 at0011 = ╱54╱T╱ // 0x13aa @0x11
0x1399…13e4 at0012 = ╱45╱E╱ // 0x13ab @0x12
0x1399…13e4 at0013 = ╱4b╱K╱ // 0x13ac @0x13
0x1399…13e4 at0014 = ╱4b╱K╱ // 0x13ad @0x14
0x1399…13e4 at0015 = ╱4f╱O╱ // 0x13ae @0x15
0x1399…13e4 at0016 = ╱44╱D╱ // 0x13af @0x16
0x1399…13e4 at0017 = ╱45╱E╱ // 0x13b0 @0x17
0x1399…13e4 at0018 = ╱e3╱-╱ // 0x13b1 @0x18
0x1399…13e4 at0019 = ╱31╱1╱ // 0x13b2 @0x19
0x1399…13e4 at001a = ╱30╱0╱ // 0x13b3 @0x1a
0x1399…13e4 at001b = ╱fe0000a004╱ // 0x13b4 @0x1b
0x1399…13e4 at0020 = ╱e4╱*╱ // 0x13b9 @0x20
0x1399…13e4 at0021 = ╱ed╱(╱ // 0x13ba @0x21
0x1399…13e4 at0022 = ╱54╱T╱ // 0x13bb @0x22
0x1399…13e4 at0023 = ╱45╱E╱ // 0x13bc @0x23
0x1399…13e4 at0024 = ╱4b╱K╱ // 0x13bd @0x24
0x1399…13e4 at0025 = ╱4b╱K╱ // 0x13be @0x25
0x1399…13e4 at0026 = ╱4f╱O╱ // 0x13bf @0x26
0x1399…13e4 at0027 = ╱44╱D╱ // 0x13c0 @0x27
0x1399…13e4 at0028 = ╱45╱E╱ // 0x13c1 @0x28
0x1399…13e4 at0029 = ╱de╱>╱ // 0x13c2 @0x29
0x1399…13e4 at002a = ╱32╱2╱ // 0x13c3 @0x2a
0x1399…13e4 at002b = ╱30╱0╱ // 0x13c4 @0x2b
0x1399…13e4 at002c = ╱fe0000a005╱ // 0x13c5 @0x2c
0x1399…13e4 at0031 = ╱ee╱)╱ // 0x13ca @0x31
0x1399…13e4 at0032 = ╱ee╱)╱ // 0x13cb @0x32
0x1399…13e4 at0033 = ╱f1╱+╱ // 0x13cc @0x33
0x1399…13e4 at0034 = ╱42╱B╱ // 0x13cd @0x34
0x1399…13e4 at0035 = ╱4c╱L╱ // 0x13ce @0x35
0x1399…13e4 at0036 = ╱41╱A╱ // 0x13cf @0x36
0x1399…13e4 at0037 = ╱4e╱N╱ // 0x13d0 @0x37
0x1399…13e4 at0038 = ╱4b╱K╱ // 0x13d1 @0x38
0x1399…13e4 at0039 = ╱ef╱$╱ // 0x13d2 @0x39
0x1399…13e4 at003a = ╱ed╱(╱ // 0x13d3 @0x3a
0x1399…13e4 at003b = ╱31╱1╱ // 0x13d4 @0x3b
0x1399…13e4 at003c = ╱fe00008001╱ // 0x13d5 @0x3c
0x1399…13e4 at0041 = ╱f0╱:╱ // 0x13da @0x41
0x1399…13e4 at0042 = ╱31╱1╱ // 0x13db @0x42
0x1399…13e4 at0043 = ╱35╱5╱ // 0x13dc @0x43
0x1399…13e4 at0044 = ╱fe0000f004╱ // 0x13dd @0x44
0x1399…13e4 at0049 = ╱ee╱)╱ // 0x13e2 @0x49
0x1399…13e4 at004a = EOL // 0x13e3 @0x4a
0x1399…13e4 }
0x13e4…13ea a141 1560 ENDIF
0x13e4…13ea LineComalBin {
0x13e4…13ea ptr = 0xa141 // 0x13e4 @0x0
0x13e4…13ea lno = 0x0618 // 0x13e6 @0x2
0x13e4…13ea at0004 = ╱9b╱ ENDIF ╱ // 0x13e8 @0x4
0x13e4…13ea at0005 = EOL // 0x13e9 @0x5
0x13e4…13ea }
0x13ea…13ff a156 1570 IF TEKKODE<>0 THEN
0x13ea…13ff LineComalBin {
0x13ea…13ff ptr = 0xa156 // 0x13ea @0x0
0x13ea…13ff lno = 0x0622 // 0x13ec @0x2
0x13ea…13ff at0004 = ╱9c╱ IF ╱ // 0x13ee @0x4
0x13ea…13ff at0005 = ╱54╱T╱ // 0x13ef @0x5
0x13ea…13ff at0006 = ╱45╱E╱ // 0x13f0 @0x6
0x13ea…13ff at0007 = ╱4b╱K╱ // 0x13f1 @0x7
0x13ea…13ff at0008 = ╱4b╱K╱ // 0x13f2 @0x8
0x13ea…13ff at0009 = ╱4f╱O╱ // 0x13f3 @0x9
0x13ea…13ff at000a = ╱44╱D╱ // 0x13f4 @0xa
0x13ea…13ff at000b = ╱45╱E╱ // 0x13f5 @0xb
0x13ea…13ff at000c = ╱e1╱<>╱ // 0x13f6 @0xc
0x13ea…13ff at000d = ╱30╱0╱ // 0x13f7 @0xd
0x13ea…13ff at000e = ╱fe00000000╱ // 0x13f8 @0xe
0x13ea…13ff at0013 = ╱b6╱ THEN ╱ // 0x13fd @0x13
0x13ea…13ff at0014 = EOL // 0x13fe @0x14
0x13ea…13ff }
0x13ff…1416 a16d 1580 PRINT TAB(9);TEKST$;
0x13ff…1416 LineComalBin {
0x13ff…1416 ptr = 0xa16d // 0x13ff @0x0
0x13ff…1416 lno = 0x062c // 0x1401 @0x2
0x13ff…1416 at0004 = ╱92╱ PRINT ╱ // 0x1403 @0x4
0x13ff…1416 at0005 = ╱d2╱TAB╱ // 0x1404 @0x5
0x13ff…1416 at0006 = ╱ed╱(╱ // 0x1405 @0x6
0x13ff…1416 at0007 = ╱39╱9╱ // 0x1406 @0x7
0x13ff…1416 at0008 = ╱fe00009004╱ // 0x1407 @0x8
0x13ff…1416 at000d = ╱ee╱)╱ // 0x140c @0xd
0x13ff…1416 at000e = ╱eb╱;╱ // 0x140d @0xe
0x13ff…1416 at000f = ╱54╱T╱ // 0x140e @0xf
0x13ff…1416 at0010 = ╱45╱E╱ // 0x140f @0x10
0x13ff…1416 at0011 = ╱4b╱K╱ // 0x1410 @0x11
0x13ff…1416 at0012 = ╱53╱S╱ // 0x1411 @0x12
0x13ff…1416 at0013 = ╱54╱T╱ // 0x1412 @0x13
0x13ff…1416 at0014 = ╱ef╱$╱ // 0x1413 @0x14
0x13ff…1416 at0015 = ╱eb╱;╱ // 0x1414 @0x15
0x13ff…1416 at0016 = EOL // 0x1415 @0x16
0x13ff…1416 }
0x1416…141c a173 1590 ENDIF
0x1416…141c LineComalBin {
0x1416…141c ptr = 0xa173 // 0x1416 @0x0
0x1416…141c lno = 0x0636 // 0x1418 @0x2
0x1416…141c at0004 = ╱9b╱ ENDIF ╱ // 0x141a @0x4
0x1416…141c at0005 = EOL // 0x141b @0x5
0x1416…141c }
0x141c…142d a184 1600 PRINT TAB(34);
0x141c…142d LineComalBin {
0x141c…142d ptr = 0xa184 // 0x141c @0x0
0x141c…142d lno = 0x0640 // 0x141e @0x2
0x141c…142d at0004 = ╱92╱ PRINT ╱ // 0x1420 @0x4
0x141c…142d at0005 = ╱d2╱TAB╱ // 0x1421 @0x5
0x141c…142d at0006 = ╱ed╱(╱ // 0x1422 @0x6
0x141c…142d at0007 = ╱33╱3╱ // 0x1423 @0x7
0x141c…142d at0008 = ╱34╱4╱ // 0x1424 @0x8
0x141c…142d at0009 = ╱fe00008806╱ // 0x1425 @0x9
0x141c…142d at000e = ╱ee╱)╱ // 0x142a @0xe
0x141c…142d at000f = ╱eb╱;╱ // 0x142b @0xf
0x141c…142d at0010 = EOL // 0x142c @0x10
0x141c…142d }
0x142d…144e a1a5 1610 PRINT USING "###### ######":KONT;ENT3;
0x142d…144e LineComalBin {
0x142d…144e ptr = 0xa1a5 // 0x142d @0x0
0x142d…144e lno = 0x064a // 0x142f @0x2
0x142d…144e at0004 = ╱92╱ PRINT ╱ // 0x1431 @0x4
0x142d…144e at0005 = ╱b9╱ USING ╱ // 0x1432 @0x5
0x142d…144e at0006 = ╱22╱"╱ // 0x1433 @0x6
0x142d…144e at0007 = ╱23╱#╱ // 0x1434 @0x7
0x142d…144e at0008 = ╱23╱#╱ // 0x1435 @0x8
0x142d…144e at0009 = ╱23╱#╱ // 0x1436 @0x9
0x142d…144e at000a = ╱23╱#╱ // 0x1437 @0xa
0x142d…144e at000b = ╱23╱#╱ // 0x1438 @0xb
0x142d…144e at000c = ╱23╱#╱ // 0x1439 @0xc
0x142d…144e at000d = ╱20╱…╱ // 0x143a @0xd
0x142d…144e at000e = ╱23╱#╱ // 0x143b @0xe
0x142d…144e at000f = ╱23╱#╱ // 0x143c @0xf
0x142d…144e at0010 = ╱23╱#╱ // 0x143d @0x10
0x142d…144e at0011 = ╱23╱#╱ // 0x143e @0x11
0x142d…144e at0012 = ╱23╱#╱ // 0x143f @0x12
0x142d…144e at0013 = ╱23╱#╱ // 0x1440 @0x13
0x142d…144e at0014 = ╱22╱"╱ // 0x1441 @0x14
0x142d…144e at0015 = ╱f0╱:╱ // 0x1442 @0x15
0x142d…144e at0016 = ╱4b╱K╱ // 0x1443 @0x16
0x142d…144e at0017 = ╱4f╱O╱ // 0x1444 @0x17
0x142d…144e at0018 = ╱4e╱N╱ // 0x1445 @0x18
0x142d…144e at0019 = ╱54╱T╱ // 0x1446 @0x19
0x142d…144e at001a = ╱eb╱;╱ // 0x1447 @0x1a
0x142d…144e at001b = ╱45╱E╱ // 0x1448 @0x1b
0x142d…144e at001c = ╱4e╱N╱ // 0x1449 @0x1c
0x142d…144e at001d = ╱54╱T╱ // 0x144a @0x1d
0x142d…144e at001e = ╱33╱3╱ // 0x144b @0x1e
0x142d…144e at001f = ╱eb╱;╱ // 0x144c @0x1f
0x142d…144e at0020 = EOL // 0x144d @0x20
0x142d…144e }
0x144e…145f a1b6 1620 PRINT TAB(47);
0x144e…145f LineComalBin {
0x144e…145f ptr = 0xa1b6 // 0x144e @0x0
0x144e…145f lno = 0x0654 // 0x1450 @0x2
0x144e…145f at0004 = ╱92╱ PRINT ╱ // 0x1452 @0x4
0x144e…145f at0005 = ╱d2╱TAB╱ // 0x1453 @0x5
0x144e…145f at0006 = ╱ed╱(╱ // 0x1454 @0x6
0x144e…145f at0007 = ╱34╱4╱ // 0x1455 @0x7
0x144e…145f at0008 = ╱37╱7╱ // 0x1456 @0x8
0x144e…145f at0009 = ╱fe0000bc06╱ // 0x1457 @0x9
0x144e…145f at000e = ╱ee╱)╱ // 0x145c @0xe
0x144e…145f at000f = ╱eb╱;╱ // 0x145d @0xf
0x144e…145f at0010 = EOL // 0x145e @0x10
0x144e…145f }
0x145f…1481 a1d8 1630 EXEC CALC(0,BELB$,SUM$,SUM$)
0x145f…1481 LineComalBin {
0x145f…1481 ptr = 0xa1d8 // 0x145f @0x0
0x145f…1481 lno = 0x065e // 0x1461 @0x2
0x145f…1481 at0004 = ╱9d╱ EXEC ╱ // 0x1463 @0x4
0x145f…1481 at0005 = ╱43╱C╱ // 0x1464 @0x5
0x145f…1481 at0006 = ╱41╱A╱ // 0x1465 @0x6
0x145f…1481 at0007 = ╱4c╱L╱ // 0x1466 @0x7
0x145f…1481 at0008 = ╱43╱C╱ // 0x1467 @0x8
0x145f…1481 at0009 = ╱ed╱(╱ // 0x1468 @0x9
0x145f…1481 at000a = ╱30╱0╱ // 0x1469 @0xa
0x145f…1481 at000b = ╱fe00000000╱ // 0x146a @0xb
0x145f…1481 at0010 = ╱ec╱,╱ // 0x146f @0x10
0x145f…1481 at0011 = ╱42╱B╱ // 0x1470 @0x11
0x145f…1481 at0012 = ╱45╱E╱ // 0x1471 @0x12
0x145f…1481 at0013 = ╱4c╱L╱ // 0x1472 @0x13
0x145f…1481 at0014 = ╱42╱B╱ // 0x1473 @0x14
0x145f…1481 at0015 = ╱ef╱$╱ // 0x1474 @0x15
0x145f…1481 at0016 = ╱ec╱,╱ // 0x1475 @0x16
0x145f…1481 at0017 = ╱53╱S╱ // 0x1476 @0x17
0x145f…1481 at0018 = ╱55╱U╱ // 0x1477 @0x18
0x145f…1481 at0019 = ╱4d╱M╱ // 0x1478 @0x19
0x145f…1481 at001a = ╱ef╱$╱ // 0x1479 @0x1a
0x145f…1481 at001b = ╱ec╱,╱ // 0x147a @0x1b
0x145f…1481 at001c = ╱53╱S╱ // 0x147b @0x1c
0x145f…1481 at001d = ╱55╱U╱ // 0x147c @0x1d
0x145f…1481 at001e = ╱4d╱M╱ // 0x147d @0x1e
0x145f…1481 at001f = ╱ef╱$╱ // 0x147e @0x1f
0x145f…1481 at0020 = ╱ee╱)╱ // 0x147f @0x20
0x145f…1481 at0021 = EOL // 0x1480 @0x21
0x145f…1481 }
0x1481…14a5 a1fc 1640 EXEC CALC(5,BELB$,TAL3$,TAL4$)
0x1481…14a5 LineComalBin {
0x1481…14a5 ptr = 0xa1fc // 0x1481 @0x0
0x1481…14a5 lno = 0x0668 // 0x1483 @0x2
0x1481…14a5 at0004 = ╱9d╱ EXEC ╱ // 0x1485 @0x4
0x1481…14a5 at0005 = ╱43╱C╱ // 0x1486 @0x5
0x1481…14a5 at0006 = ╱41╱A╱ // 0x1487 @0x6
0x1481…14a5 at0007 = ╱4c╱L╱ // 0x1488 @0x7
0x1481…14a5 at0008 = ╱43╱C╱ // 0x1489 @0x8
0x1481…14a5 at0009 = ╱ed╱(╱ // 0x148a @0x9
0x1481…14a5 at000a = ╱35╱5╱ // 0x148b @0xa
0x1481…14a5 at000b = ╱fe0000a003╱ // 0x148c @0xb
0x1481…14a5 at0010 = ╱ec╱,╱ // 0x1491 @0x10
0x1481…14a5 at0011 = ╱42╱B╱ // 0x1492 @0x11
0x1481…14a5 at0012 = ╱45╱E╱ // 0x1493 @0x12
0x1481…14a5 at0013 = ╱4c╱L╱ // 0x1494 @0x13
0x1481…14a5 at0014 = ╱42╱B╱ // 0x1495 @0x14
0x1481…14a5 at0015 = ╱ef╱$╱ // 0x1496 @0x15
0x1481…14a5 at0016 = ╱ec╱,╱ // 0x1497 @0x16
0x1481…14a5 at0017 = ╱54╱T╱ // 0x1498 @0x17
0x1481…14a5 at0018 = ╱41╱A╱ // 0x1499 @0x18
0x1481…14a5 at0019 = ╱4c╱L╱ // 0x149a @0x19
0x1481…14a5 at001a = ╱33╱3╱ // 0x149b @0x1a
0x1481…14a5 at001b = ╱ef╱$╱ // 0x149c @0x1b
0x1481…14a5 at001c = ╱ec╱,╱ // 0x149d @0x1c
0x1481…14a5 at001d = ╱54╱T╱ // 0x149e @0x1d
0x1481…14a5 at001e = ╱41╱A╱ // 0x149f @0x1e
0x1481…14a5 at001f = ╱4c╱L╱ // 0x14a0 @0x1f
0x1481…14a5 at0020 = ╱34╱4╱ // 0x14a1 @0x20
0x1481…14a5 at0021 = ╱ef╱$╱ // 0x14a2 @0x21
0x1481…14a5 at0022 = ╱ee╱)╱ // 0x14a3 @0x22
0x1481…14a5 at0023 = EOL // 0x14a4 @0x23
0x1481…14a5 }
0x14a5…14bc a213 1650 PRINT TAL4$;TAB(62);
0x14a5…14bc LineComalBin {
0x14a5…14bc ptr = 0xa213 // 0x14a5 @0x0
0x14a5…14bc lno = 0x0672 // 0x14a7 @0x2
0x14a5…14bc at0004 = ╱92╱ PRINT ╱ // 0x14a9 @0x4
0x14a5…14bc at0005 = ╱54╱T╱ // 0x14aa @0x5
0x14a5…14bc at0006 = ╱41╱A╱ // 0x14ab @0x6
0x14a5…14bc at0007 = ╱4c╱L╱ // 0x14ac @0x7
0x14a5…14bc at0008 = ╱34╱4╱ // 0x14ad @0x8
0x14a5…14bc at0009 = ╱ef╱$╱ // 0x14ae @0x9
0x14a5…14bc at000a = ╱eb╱;╱ // 0x14af @0xa
0x14a5…14bc at000b = ╱d2╱TAB╱ // 0x14b0 @0xb
0x14a5…14bc at000c = ╱ed╱(╱ // 0x14b1 @0xc
0x14a5…14bc at000d = ╱36╱6╱ // 0x14b2 @0xd
0x14a5…14bc at000e = ╱32╱2╱ // 0x14b3 @0xe
0x14a5…14bc at000f = ╱fe0000f806╱ // 0x14b4 @0xf
0x14a5…14bc at0014 = ╱ee╱)╱ // 0x14b9 @0x14
0x14a5…14bc at0015 = ╱eb╱;╱ // 0x14ba @0x15
0x14a5…14bc at0016 = EOL // 0x14bb @0x16
0x14a5…14bc }
0x14bc…14cd a224 1660 IF KO2<>0 THEN
0x14bc…14cd LineComalBin {
0x14bc…14cd ptr = 0xa224 // 0x14bc @0x0
0x14bc…14cd lno = 0x067c // 0x14be @0x2
0x14bc…14cd at0004 = ╱9c╱ IF ╱ // 0x14c0 @0x4
0x14bc…14cd at0005 = ╱4b╱K╱ // 0x14c1 @0x5
0x14bc…14cd at0006 = ╱4f╱O╱ // 0x14c2 @0x6
0x14bc…14cd at0007 = ╱32╱2╱ // 0x14c3 @0x7
0x14bc…14cd at0008 = ╱e1╱<>╱ // 0x14c4 @0x8
0x14bc…14cd at0009 = ╱30╱0╱ // 0x14c5 @0x9
0x14bc…14cd at000a = ╱fe00000000╱ // 0x14c6 @0xa
0x14bc…14cd at000f = ╱b6╱ THEN ╱ // 0x14cb @0xf
0x14bc…14cd at0010 = EOL // 0x14cc @0x10
0x14bc…14cd }
0x14cd…14dd a234 1670 PRINT USING "##":KO1;
0x14cd…14dd LineComalBin {
0x14cd…14dd ptr = 0xa234 // 0x14cd @0x0
0x14cd…14dd lno = 0x0686 // 0x14cf @0x2
0x14cd…14dd at0004 = ╱92╱ PRINT ╱ // 0x14d1 @0x4
0x14cd…14dd at0005 = ╱b9╱ USING ╱ // 0x14d2 @0x5
0x14cd…14dd at0006 = ╱22╱"╱ // 0x14d3 @0x6
0x14cd…14dd at0007 = ╱23╱#╱ // 0x14d4 @0x7
0x14cd…14dd at0008 = ╱23╱#╱ // 0x14d5 @0x8
0x14cd…14dd at0009 = ╱22╱"╱ // 0x14d6 @0x9
0x14cd…14dd at000a = ╱f0╱:╱ // 0x14d7 @0xa
0x14cd…14dd at000b = ╱4b╱K╱ // 0x14d8 @0xb
0x14cd…14dd at000c = ╱4f╱O╱ // 0x14d9 @0xc
0x14cd…14dd at000d = ╱31╱1╱ // 0x14da @0xd
0x14cd…14dd at000e = ╱eb╱;╱ // 0x14db @0xe
0x14cd…14dd at000f = EOL // 0x14dc @0xf
0x14cd…14dd }
0x14dd…14ee a245 1680 PRINT TAB(64);
0x14dd…14ee LineComalBin {
0x14dd…14ee ptr = 0xa245 // 0x14dd @0x0
0x14dd…14ee lno = 0x0690 // 0x14df @0x2
0x14dd…14ee at0004 = ╱92╱ PRINT ╱ // 0x14e1 @0x4
0x14dd…14ee at0005 = ╱d2╱TAB╱ // 0x14e2 @0x5
0x14dd…14ee at0006 = ╱ed╱(╱ // 0x14e3 @0x6
0x14dd…14ee at0007 = ╱36╱6╱ // 0x14e4 @0x7
0x14dd…14ee at0008 = ╱34╱4╱ // 0x14e5 @0x8
0x14dd…14ee at0009 = ╱fe00008007╱ // 0x14e6 @0x9
0x14dd…14ee at000e = ╱ee╱)╱ // 0x14eb @0xe
0x14dd…14ee at000f = ╱eb╱;╱ // 0x14ec @0xf
0x14dd…14ee at0010 = EOL // 0x14ed @0x10
0x14dd…14ee }
0x14ee…1510 a267 1690 EXEC CALC(5,MO$,TAL3$,TAL4$)
0x14ee…1510 LineComalBin {
0x14ee…1510 ptr = 0xa267 // 0x14ee @0x0
0x14ee…1510 lno = 0x069a // 0x14f0 @0x2
0x14ee…1510 at0004 = ╱9d╱ EXEC ╱ // 0x14f2 @0x4
0x14ee…1510 at0005 = ╱43╱C╱ // 0x14f3 @0x5
0x14ee…1510 at0006 = ╱41╱A╱ // 0x14f4 @0x6
0x14ee…1510 at0007 = ╱4c╱L╱ // 0x14f5 @0x7
0x14ee…1510 at0008 = ╱43╱C╱ // 0x14f6 @0x8
0x14ee…1510 at0009 = ╱ed╱(╱ // 0x14f7 @0x9
0x14ee…1510 at000a = ╱35╱5╱ // 0x14f8 @0xa
0x14ee…1510 at000b = ╱fe0000a003╱ // 0x14f9 @0xb
0x14ee…1510 at0010 = ╱ec╱,╱ // 0x14fe @0x10
0x14ee…1510 at0011 = ╱4d╱M╱ // 0x14ff @0x11
0x14ee…1510 at0012 = ╱4f╱O╱ // 0x1500 @0x12
0x14ee…1510 at0013 = ╱ef╱$╱ // 0x1501 @0x13
0x14ee…1510 at0014 = ╱ec╱,╱ // 0x1502 @0x14
0x14ee…1510 at0015 = ╱54╱T╱ // 0x1503 @0x15
0x14ee…1510 at0016 = ╱41╱A╱ // 0x1504 @0x16
0x14ee…1510 at0017 = ╱4c╱L╱ // 0x1505 @0x17
0x14ee…1510 at0018 = ╱33╱3╱ // 0x1506 @0x18
0x14ee…1510 at0019 = ╱ef╱$╱ // 0x1507 @0x19
0x14ee…1510 at001a = ╱ec╱,╱ // 0x1508 @0x1a
0x14ee…1510 at001b = ╱54╱T╱ // 0x1509 @0x1b
0x14ee…1510 at001c = ╱41╱A╱ // 0x150a @0x1c
0x14ee…1510 at001d = ╱4c╱L╱ // 0x150b @0x1d
0x14ee…1510 at001e = ╱34╱4╱ // 0x150c @0x1e
0x14ee…1510 at001f = ╱ef╱$╱ // 0x150d @0x1f
0x14ee…1510 at0020 = ╱ee╱)╱ // 0x150e @0x20
0x14ee…1510 at0021 = EOL // 0x150f @0x21
0x14ee…1510 }
0x1510…1537 a28e 1700 PRINT TAL4$(2:13);TAB(78);
0x1510…1537 LineComalBin {
0x1510…1537 ptr = 0xa28e // 0x1510 @0x0
0x1510…1537 lno = 0x06a4 // 0x1512 @0x2
0x1510…1537 at0004 = ╱92╱ PRINT ╱ // 0x1514 @0x4
0x1510…1537 at0005 = ╱54╱T╱ // 0x1515 @0x5
0x1510…1537 at0006 = ╱41╱A╱ // 0x1516 @0x6
0x1510…1537 at0007 = ╱4c╱L╱ // 0x1517 @0x7
0x1510…1537 at0008 = ╱34╱4╱ // 0x1518 @0x8
0x1510…1537 at0009 = ╱ef╱$╱ // 0x1519 @0x9
0x1510…1537 at000a = ╱ed╱(╱ // 0x151a @0xa
0x1510…1537 at000b = ╱32╱2╱ // 0x151b @0xb
0x1510…1537 at000c = ╱fe00008002╱ // 0x151c @0xc
0x1510…1537 at0011 = ╱f0╱:╱ // 0x1521 @0x11
0x1510…1537 at0012 = ╱31╱1╱ // 0x1522 @0x12
0x1510…1537 at0013 = ╱33╱3╱ // 0x1523 @0x13
0x1510…1537 at0014 = ╱fe0000d004╱ // 0x1524 @0x14
0x1510…1537 at0019 = ╱ee╱)╱ // 0x1529 @0x19
0x1510…1537 at001a = ╱eb╱;╱ // 0x152a @0x1a
0x1510…1537 at001b = ╱d2╱TAB╱ // 0x152b @0x1b
0x1510…1537 at001c = ╱ed╱(╱ // 0x152c @0x1c
0x1510…1537 at001d = ╱37╱7╱ // 0x152d @0x1d
0x1510…1537 at001e = ╱38╱8╱ // 0x152e @0x1e
0x1510…1537 at001f = ╱fe00009c07╱ // 0x152f @0x1f
0x1510…1537 at0024 = ╱ee╱)╱ // 0x1534 @0x24
0x1510…1537 at0025 = ╱eb╱;╱ // 0x1535 @0x25
0x1510…1537 at0026 = EOL // 0x1536 @0x26
0x1510…1537 }
0x1537…1546 a29d 1710 PRINT USING "##":KO2
0x1537…1546 LineComalBin {
0x1537…1546 ptr = 0xa29d // 0x1537 @0x0
0x1537…1546 lno = 0x06ae // 0x1539 @0x2
0x1537…1546 at0004 = ╱92╱ PRINT ╱ // 0x153b @0x4
0x1537…1546 at0005 = ╱b9╱ USING ╱ // 0x153c @0x5
0x1537…1546 at0006 = ╱22╱"╱ // 0x153d @0x6
0x1537…1546 at0007 = ╱23╱#╱ // 0x153e @0x7
0x1537…1546 at0008 = ╱23╱#╱ // 0x153f @0x8
0x1537…1546 at0009 = ╱22╱"╱ // 0x1540 @0x9
0x1537…1546 at000a = ╱f0╱:╱ // 0x1541 @0xa
0x1537…1546 at000b = ╱4b╱K╱ // 0x1542 @0xb
0x1537…1546 at000c = ╱4f╱O╱ // 0x1543 @0xc
0x1537…1546 at000d = ╱32╱2╱ // 0x1544 @0xd
0x1537…1546 at000e = EOL // 0x1545 @0xe
0x1537…1546 }
0x1546…154c a2a3 1720 ELSE
0x1546…154c LineComalBin {
0x1546…154c ptr = 0xa2a3 // 0x1546 @0x0
0x1546…154c lno = 0x06b8 // 0x1548 @0x2
0x1546…154c at0004 = ╱9a╱ ELSE ╱ // 0x154a @0x4
0x1546…154c at0005 = EOL // 0x154b @0x5
0x1546…154c }
0x154c…155b a2b2 1730 PRINT USING "##":KO1
0x154c…155b LineComalBin {
0x154c…155b ptr = 0xa2b2 // 0x154c @0x0
0x154c…155b lno = 0x06c2 // 0x154e @0x2
0x154c…155b at0004 = ╱92╱ PRINT ╱ // 0x1550 @0x4
0x154c…155b at0005 = ╱b9╱ USING ╱ // 0x1551 @0x5
0x154c…155b at0006 = ╱22╱"╱ // 0x1552 @0x6
0x154c…155b at0007 = ╱23╱#╱ // 0x1553 @0x7
0x154c…155b at0008 = ╱23╱#╱ // 0x1554 @0x8
0x154c…155b at0009 = ╱22╱"╱ // 0x1555 @0x9
0x154c…155b at000a = ╱f0╱:╱ // 0x1556 @0xa
0x154c…155b at000b = ╱4b╱K╱ // 0x1557 @0xb
0x154c…155b at000c = ╱4f╱O╱ // 0x1558 @0xc
0x154c…155b at000d = ╱31╱1╱ // 0x1559 @0xd
0x154c…155b at000e = EOL // 0x155a @0xe
0x154c…155b }
0x155b…1561 (71,) a2b8 1740 ENDIF
0x155b…1561 LineComalBin {
0x155b…1561 ptr = 0xa2b8 // 0x155b @0x0
0x155b…1561 lno = 0x06cc // 0x155d @0x2
0x155b…1561 at0004 = ╱9b╱ ENDIF ╱ // 0x155f @0x4
0x155b…1561 at0005 = EOL // 0x1560 @0x5
0x155b…1561 }
0x1561…1567 a2be 1750 ENDPROC
0x1561…1567 LineComalBin {
0x1561…1567 ptr = 0xa2be // 0x1561 @0x0
0x1561…1567 lno = 0x06d6 // 0x1563 @0x2
0x1561…1567 at0004 = ╱9f╱ ENDPROC ╱ // 0x1565 @0x4
0x1561…1567 at0005 = EOL // 0x1566 @0x5
0x1561…1567 }
0x1567…1582 a2d9 1760 PROC NEDSKRIV1(PSAL1,KSAL)
0x1567…1582 LineComalBin {
0x1567…1582 ptr = 0xa2d9 // 0x1567 @0x0
0x1567…1582 lno = 0x06e0 // 0x1569 @0x2
0x1567…1582 at0004 = ╱9e╱ PROC ╱ // 0x156b @0x4
0x1567…1582 at0005 = ╱4e╱N╱ // 0x156c @0x5
0x1567…1582 at0006 = ╱45╱E╱ // 0x156d @0x6
0x1567…1582 at0007 = ╱44╱D╱ // 0x156e @0x7
0x1567…1582 at0008 = ╱53╱S╱ // 0x156f @0x8
0x1567…1582 at0009 = ╱4b╱K╱ // 0x1570 @0x9
0x1567…1582 at000a = ╱52╱R╱ // 0x1571 @0xa
0x1567…1582 at000b = ╱49╱I╱ // 0x1572 @0xb
0x1567…1582 at000c = ╱56╱V╱ // 0x1573 @0xc
0x1567…1582 at000d = ╱31╱1╱ // 0x1574 @0xd
0x1567…1582 at000e = ╱ed╱(╱ // 0x1575 @0xe
0x1567…1582 at000f = ╱50╱P╱ // 0x1576 @0xf
0x1567…1582 at0010 = ╱53╱S╱ // 0x1577 @0x10
0x1567…1582 at0011 = ╱41╱A╱ // 0x1578 @0x11
0x1567…1582 at0012 = ╱4c╱L╱ // 0x1579 @0x12
0x1567…1582 at0013 = ╱31╱1╱ // 0x157a @0x13
0x1567…1582 at0014 = ╱ec╱,╱ // 0x157b @0x14
0x1567…1582 at0015 = ╱4b╱K╱ // 0x157c @0x15
0x1567…1582 at0016 = ╱53╱S╱ // 0x157d @0x16
0x1567…1582 at0017 = ╱41╱A╱ // 0x157e @0x17
0x1567…1582 at0018 = ╱4c╱L╱ // 0x157f @0x18
0x1567…1582 at0019 = ╱ee╱)╱ // 0x1580 @0x19
0x1567…1582 at001a = EOL // 0x1581 @0x1a
0x1567…1582 }
0x1582…159c a2f3 1770 IF KSAL$(LEN(KSAL$))="-" THEN
0x1582…159c LineComalBin {
0x1582…159c ptr = 0xa2f3 // 0x1582 @0x0
0x1582…159c lno = 0x06ea // 0x1584 @0x2
0x1582…159c at0004 = ╱9c╱ IF ╱ // 0x1586 @0x4
0x1582…159c at0005 = ╱4b╱K╱ // 0x1587 @0x5
0x1582…159c at0006 = ╱53╱S╱ // 0x1588 @0x6
0x1582…159c at0007 = ╱41╱A╱ // 0x1589 @0x7
0x1582…159c at0008 = ╱4c╱L╱ // 0x158a @0x8
0x1582…159c at0009 = ╱ef╱$╱ // 0x158b @0x9
0x1582…159c at000a = ╱ed╱(╱ // 0x158c @0xa
0x1582…159c at000b = ╱cc╱LEN╱ // 0x158d @0xb
0x1582…159c at000c = ╱ed╱(╱ // 0x158e @0xc
0x1582…159c at000d = ╱4b╱K╱ // 0x158f @0xd
0x1582…159c at000e = ╱53╱S╱ // 0x1590 @0xe
0x1582…159c at000f = ╱41╱A╱ // 0x1591 @0xf
0x1582…159c at0010 = ╱4c╱L╱ // 0x1592 @0x10
0x1582…159c at0011 = ╱ef╱$╱ // 0x1593 @0x11
0x1582…159c at0012 = ╱ee╱)╱ // 0x1594 @0x12
0x1582…159c at0013 = ╱ee╱)╱ // 0x1595 @0x13
0x1582…159c at0014 = ╱dc╱=╱ // 0x1596 @0x14
0x1582…159c at0015 = ╱22╱"╱ // 0x1597 @0x15
0x1582…159c at0016 = ╱2d╱-╱ // 0x1598 @0x16
0x1582…159c at0017 = ╱22╱"╱ // 0x1599 @0x17
0x1582…159c at0018 = ╱b6╱ THEN ╱ // 0x159a @0x18
0x1582…159c at0019 = EOL // 0x159b @0x19
0x1582…159c }
0x159c…15c1 a318 1780 EXEC CALC(0,KSAL$,PSAL1$,KSAL$)
0x159c…15c1 LineComalBin {
0x159c…15c1 ptr = 0xa318 // 0x159c @0x0
0x159c…15c1 lno = 0x06f4 // 0x159e @0x2
0x159c…15c1 at0004 = ╱9d╱ EXEC ╱ // 0x15a0 @0x4
0x159c…15c1 at0005 = ╱43╱C╱ // 0x15a1 @0x5
0x159c…15c1 at0006 = ╱41╱A╱ // 0x15a2 @0x6
0x159c…15c1 at0007 = ╱4c╱L╱ // 0x15a3 @0x7
0x159c…15c1 at0008 = ╱43╱C╱ // 0x15a4 @0x8
0x159c…15c1 at0009 = ╱ed╱(╱ // 0x15a5 @0x9
0x159c…15c1 at000a = ╱30╱0╱ // 0x15a6 @0xa
0x159c…15c1 at000b = ╱fe00000000╱ // 0x15a7 @0xb
0x159c…15c1 at0010 = ╱ec╱,╱ // 0x15ac @0x10
0x159c…15c1 at0011 = ╱4b╱K╱ // 0x15ad @0x11
0x159c…15c1 at0012 = ╱53╱S╱ // 0x15ae @0x12
0x159c…15c1 at0013 = ╱41╱A╱ // 0x15af @0x13
0x159c…15c1 at0014 = ╱4c╱L╱ // 0x15b0 @0x14
0x159c…15c1 at0015 = ╱ef╱$╱ // 0x15b1 @0x15
0x159c…15c1 at0016 = ╱ec╱,╱ // 0x15b2 @0x16
0x159c…15c1 at0017 = ╱50╱P╱ // 0x15b3 @0x17
0x159c…15c1 at0018 = ╱53╱S╱ // 0x15b4 @0x18
0x159c…15c1 at0019 = ╱41╱A╱ // 0x15b5 @0x19
0x159c…15c1 at001a = ╱4c╱L╱ // 0x15b6 @0x1a
0x159c…15c1 at001b = ╱31╱1╱ // 0x15b7 @0x1b
0x159c…15c1 at001c = ╱ef╱$╱ // 0x15b8 @0x1c
0x159c…15c1 at001d = ╱ec╱,╱ // 0x15b9 @0x1d
0x159c…15c1 at001e = ╱4b╱K╱ // 0x15ba @0x1e
0x159c…15c1 at001f = ╱53╱S╱ // 0x15bb @0x1f
0x159c…15c1 at0020 = ╱41╱A╱ // 0x15bc @0x20
0x159c…15c1 at0021 = ╱4c╱L╱ // 0x15bd @0x21
0x159c…15c1 at0022 = ╱ef╱$╱ // 0x15be @0x22
0x159c…15c1 at0023 = ╱ee╱)╱ // 0x15bf @0x23
0x159c…15c1 at0024 = EOL // 0x15c0 @0x24
0x159c…15c1 }
0x15c1…15db a332 1790 IF KSAL$(LEN(KSAL$))="+" THEN
0x15c1…15db LineComalBin {
0x15c1…15db ptr = 0xa332 // 0x15c1 @0x0
0x15c1…15db lno = 0x06fe // 0x15c3 @0x2
0x15c1…15db at0004 = ╱9c╱ IF ╱ // 0x15c5 @0x4
0x15c1…15db at0005 = ╱4b╱K╱ // 0x15c6 @0x5
0x15c1…15db at0006 = ╱53╱S╱ // 0x15c7 @0x6
0x15c1…15db at0007 = ╱41╱A╱ // 0x15c8 @0x7
0x15c1…15db at0008 = ╱4c╱L╱ // 0x15c9 @0x8
0x15c1…15db at0009 = ╱ef╱$╱ // 0x15ca @0x9
0x15c1…15db at000a = ╱ed╱(╱ // 0x15cb @0xa
0x15c1…15db at000b = ╱cc╱LEN╱ // 0x15cc @0xb
0x15c1…15db at000c = ╱ed╱(╱ // 0x15cd @0xc
0x15c1…15db at000d = ╱4b╱K╱ // 0x15ce @0xd
0x15c1…15db at000e = ╱53╱S╱ // 0x15cf @0xe
0x15c1…15db at000f = ╱41╱A╱ // 0x15d0 @0xf
0x15c1…15db at0010 = ╱4c╱L╱ // 0x15d1 @0x10
0x15c1…15db at0011 = ╱ef╱$╱ // 0x15d2 @0x11
0x15c1…15db at0012 = ╱ee╱)╱ // 0x15d3 @0x12
0x15c1…15db at0013 = ╱ee╱)╱ // 0x15d4 @0x13
0x15c1…15db at0014 = ╱dc╱=╱ // 0x15d5 @0x14
0x15c1…15db at0015 = ╱22╱"╱ // 0x15d6 @0x15
0x15c1…15db at0016 = ╱2b╱+╱ // 0x15d7 @0x16
0x15c1…15db at0017 = ╱22╱"╱ // 0x15d8 @0x17
0x15c1…15db at0018 = ╱b6╱ THEN ╱ // 0x15d9 @0x18
0x15c1…15db at0019 = EOL // 0x15da @0x19
0x15c1…15db }
0x15db…15ec a343 1800 PSAL1$=KSAL$
0x15db…15ec LineComalBin {
0x15db…15ec ptr = 0xa343 // 0x15db @0x0
0x15db…15ec lno = 0x0708 // 0x15dd @0x2
0x15db…15ec at0004 = ╱50╱P╱ // 0x15df @0x4
0x15db…15ec at0005 = ╱53╱S╱ // 0x15e0 @0x5
0x15db…15ec at0006 = ╱41╱A╱ // 0x15e1 @0x6
0x15db…15ec at0007 = ╱4c╱L╱ // 0x15e2 @0x7
0x15db…15ec at0008 = ╱31╱1╱ // 0x15e3 @0x8
0x15db…15ec at0009 = ╱ef╱$╱ // 0x15e4 @0x9
0x15db…15ec at000a = ╱dc╱=╱ // 0x15e5 @0xa
0x15db…15ec at000b = ╱4b╱K╱ // 0x15e6 @0xb
0x15db…15ec at000c = ╱53╱S╱ // 0x15e7 @0xc
0x15db…15ec at000d = ╱41╱A╱ // 0x15e8 @0xd
0x15db…15ec at000e = ╱4c╱L╱ // 0x15e9 @0xe
0x15db…15ec at000f = ╱ef╱$╱ // 0x15ea @0xf
0x15db…15ec at0010 = EOL // 0x15eb @0x10
0x15db…15ec }
0x15ec…15fb a352 1810 KSAL$="0+"
0x15ec…15fb LineComalBin {
0x15ec…15fb ptr = 0xa352 // 0x15ec @0x0
0x15ec…15fb lno = 0x0712 // 0x15ee @0x2
0x15ec…15fb at0004 = ╱4b╱K╱ // 0x15f0 @0x4
0x15ec…15fb at0005 = ╱53╱S╱ // 0x15f1 @0x5
0x15ec…15fb at0006 = ╱41╱A╱ // 0x15f2 @0x6
0x15ec…15fb at0007 = ╱4c╱L╱ // 0x15f3 @0x7
0x15ec…15fb at0008 = ╱ef╱$╱ // 0x15f4 @0x8
0x15ec…15fb at0009 = ╱dc╱=╱ // 0x15f5 @0x9
0x15ec…15fb at000a = ╱22╱"╱ // 0x15f6 @0xa
0x15ec…15fb at000b = ╱30╱0╱ // 0x15f7 @0xb
0x15ec…15fb at000c = ╱2b╱+╱ // 0x15f8 @0xc
0x15ec…15fb at000d = ╱22╱"╱ // 0x15f9 @0xd
0x15ec…15fb at000e = EOL // 0x15fa @0xe
0x15ec…15fb }
0x15fb…1601 a358 1820 ELSE
0x15fb…1601 LineComalBin {
0x15fb…1601 ptr = 0xa358 // 0x15fb @0x0
0x15fb…1601 lno = 0x071c // 0x15fd @0x2
0x15fb…1601 at0004 = ╱9a╱ ELSE ╱ // 0x15ff @0x4
0x15fb…1601 at0005 = EOL // 0x1600 @0x5
0x15fb…1601 }
0x1601…1611 a368 1830 PSAL1$="0+"
0x1601…1611 LineComalBin {
0x1601…1611 ptr = 0xa368 // 0x1601 @0x0
0x1601…1611 lno = 0x0726 // 0x1603 @0x2
0x1601…1611 at0004 = ╱50╱P╱ // 0x1605 @0x4
0x1601…1611 at0005 = ╱53╱S╱ // 0x1606 @0x5
0x1601…1611 at0006 = ╱41╱A╱ // 0x1607 @0x6
0x1601…1611 at0007 = ╱4c╱L╱ // 0x1608 @0x7
0x1601…1611 at0008 = ╱31╱1╱ // 0x1609 @0x8
0x1601…1611 at0009 = ╱ef╱$╱ // 0x160a @0x9
0x1601…1611 at000a = ╱dc╱=╱ // 0x160b @0xa
0x1601…1611 at000b = ╱22╱"╱ // 0x160c @0xb
0x1601…1611 at000c = ╱30╱0╱ // 0x160d @0xc
0x1601…1611 at000d = ╱2b╱+╱ // 0x160e @0xd
0x1601…1611 at000e = ╱22╱"╱ // 0x160f @0xe
0x1601…1611 at000f = EOL // 0x1610 @0xf
0x1601…1611 }
0x1611…1617 a36e 1840 ENDIF
0x1611…1617 LineComalBin {
0x1611…1617 ptr = 0xa36e // 0x1611 @0x0
0x1611…1617 lno = 0x0730 // 0x1613 @0x2
0x1611…1617 at0004 = ╱9b╱ ENDIF ╱ // 0x1615 @0x4
0x1611…1617 at0005 = EOL // 0x1616 @0x5
0x1611…1617 }
0x1617…161d a374 1850 ENDIF
0x1617…161d LineComalBin {
0x1617…161d ptr = 0xa374 // 0x1617 @0x0
0x1617…161d lno = 0x073a // 0x1619 @0x2
0x1617…161d at0004 = ╱9b╱ ENDIF ╱ // 0x161b @0x4
0x1617…161d at0005 = EOL // 0x161c @0x5
0x1617…161d }
0x161d…1623 a37a 1860 ENDPROC
0x161d…1623 LineComalBin {
0x161d…1623 ptr = 0xa37a // 0x161d @0x0
0x161d…1623 lno = 0x0744 // 0x161f @0x2
0x161d…1623 at0004 = ╱9f╱ ENDPROC ╱ // 0x1621 @0x4
0x161d…1623 at0005 = EOL // 0x1622 @0x5
0x161d…1623 }
0x1623…163c a393 1870 PROC NEDSKRIV(PSAL,DSAL)
0x1623…163c LineComalBin {
0x1623…163c ptr = 0xa393 // 0x1623 @0x0
0x1623…163c lno = 0x074e // 0x1625 @0x2
0x1623…163c at0004 = ╱9e╱ PROC ╱ // 0x1627 @0x4
0x1623…163c at0005 = ╱4e╱N╱ // 0x1628 @0x5
0x1623…163c at0006 = ╱45╱E╱ // 0x1629 @0x6
0x1623…163c at0007 = ╱44╱D╱ // 0x162a @0x7
0x1623…163c at0008 = ╱53╱S╱ // 0x162b @0x8
0x1623…163c at0009 = ╱4b╱K╱ // 0x162c @0x9
0x1623…163c at000a = ╱52╱R╱ // 0x162d @0xa
0x1623…163c at000b = ╱49╱I╱ // 0x162e @0xb
0x1623…163c at000c = ╱56╱V╱ // 0x162f @0xc
0x1623…163c at000d = ╱ed╱(╱ // 0x1630 @0xd
0x1623…163c at000e = ╱50╱P╱ // 0x1631 @0xe
0x1623…163c at000f = ╱53╱S╱ // 0x1632 @0xf
0x1623…163c at0010 = ╱41╱A╱ // 0x1633 @0x10
0x1623…163c at0011 = ╱4c╱L╱ // 0x1634 @0x11
0x1623…163c at0012 = ╱ec╱,╱ // 0x1635 @0x12
0x1623…163c at0013 = ╱44╱D╱ // 0x1636 @0x13
0x1623…163c at0014 = ╱53╱S╱ // 0x1637 @0x14
0x1623…163c at0015 = ╱41╱A╱ // 0x1638 @0x15
0x1623…163c at0016 = ╱4c╱L╱ // 0x1639 @0x16
0x1623…163c at0017 = ╱ee╱)╱ // 0x163a @0x17
0x1623…163c at0018 = EOL // 0x163b @0x18
0x1623…163c }
0x163c…1656 a3ad 1880 IF DSAL$(LEN(DSAL$))="+" THEN
0x163c…1656 LineComalBin {
0x163c…1656 ptr = 0xa3ad // 0x163c @0x0
0x163c…1656 lno = 0x0758 // 0x163e @0x2
0x163c…1656 at0004 = ╱9c╱ IF ╱ // 0x1640 @0x4
0x163c…1656 at0005 = ╱44╱D╱ // 0x1641 @0x5
0x163c…1656 at0006 = ╱53╱S╱ // 0x1642 @0x6
0x163c…1656 at0007 = ╱41╱A╱ // 0x1643 @0x7
0x163c…1656 at0008 = ╱4c╱L╱ // 0x1644 @0x8
0x163c…1656 at0009 = ╱ef╱$╱ // 0x1645 @0x9
0x163c…1656 at000a = ╱ed╱(╱ // 0x1646 @0xa
0x163c…1656 at000b = ╱cc╱LEN╱ // 0x1647 @0xb
0x163c…1656 at000c = ╱ed╱(╱ // 0x1648 @0xc
0x163c…1656 at000d = ╱44╱D╱ // 0x1649 @0xd
0x163c…1656 at000e = ╱53╱S╱ // 0x164a @0xe
0x163c…1656 at000f = ╱41╱A╱ // 0x164b @0xf
0x163c…1656 at0010 = ╱4c╱L╱ // 0x164c @0x10
0x163c…1656 at0011 = ╱ef╱$╱ // 0x164d @0x11
0x163c…1656 at0012 = ╱ee╱)╱ // 0x164e @0x12
0x163c…1656 at0013 = ╱ee╱)╱ // 0x164f @0x13
0x163c…1656 at0014 = ╱dc╱=╱ // 0x1650 @0x14
0x163c…1656 at0015 = ╱22╱"╱ // 0x1651 @0x15
0x163c…1656 at0016 = ╱2b╱+╱ // 0x1652 @0x16
0x163c…1656 at0017 = ╱22╱"╱ // 0x1653 @0x17
0x163c…1656 at0018 = ╱b6╱ THEN ╱ // 0x1654 @0x18
0x163c…1656 at0019 = EOL // 0x1655 @0x19
0x163c…1656 }
0x1656…167a a3d1 1890 EXEC CALC(0,DSAL$,PSAL$,DSAL$)
0x1656…167a LineComalBin {
0x1656…167a ptr = 0xa3d1 // 0x1656 @0x0
0x1656…167a lno = 0x0762 // 0x1658 @0x2
0x1656…167a at0004 = ╱9d╱ EXEC ╱ // 0x165a @0x4
0x1656…167a at0005 = ╱43╱C╱ // 0x165b @0x5
0x1656…167a at0006 = ╱41╱A╱ // 0x165c @0x6
0x1656…167a at0007 = ╱4c╱L╱ // 0x165d @0x7
0x1656…167a at0008 = ╱43╱C╱ // 0x165e @0x8
0x1656…167a at0009 = ╱ed╱(╱ // 0x165f @0x9
0x1656…167a at000a = ╱30╱0╱ // 0x1660 @0xa
0x1656…167a at000b = ╱fe00000000╱ // 0x1661 @0xb
0x1656…167a at0010 = ╱ec╱,╱ // 0x1666 @0x10
0x1656…167a at0011 = ╱44╱D╱ // 0x1667 @0x11
0x1656…167a at0012 = ╱53╱S╱ // 0x1668 @0x12
0x1656…167a at0013 = ╱41╱A╱ // 0x1669 @0x13
0x1656…167a at0014 = ╱4c╱L╱ // 0x166a @0x14
0x1656…167a at0015 = ╱ef╱$╱ // 0x166b @0x15
0x1656…167a at0016 = ╱ec╱,╱ // 0x166c @0x16
0x1656…167a at0017 = ╱50╱P╱ // 0x166d @0x17
0x1656…167a at0018 = ╱53╱S╱ // 0x166e @0x18
0x1656…167a at0019 = ╱41╱A╱ // 0x166f @0x19
0x1656…167a at001a = ╱4c╱L╱ // 0x1670 @0x1a
0x1656…167a at001b = ╱ef╱$╱ // 0x1671 @0x1b
0x1656…167a at001c = ╱ec╱,╱ // 0x1672 @0x1c
0x1656…167a at001d = ╱44╱D╱ // 0x1673 @0x1d
0x1656…167a at001e = ╱53╱S╱ // 0x1674 @0x1e
0x1656…167a at001f = ╱41╱A╱ // 0x1675 @0x1f
0x1656…167a at0020 = ╱4c╱L╱ // 0x1676 @0x20
0x1656…167a at0021 = ╱ef╱$╱ // 0x1677 @0x21
0x1656…167a at0022 = ╱ee╱)╱ // 0x1678 @0x22
0x1656…167a at0023 = EOL // 0x1679 @0x23
0x1656…167a }
0x167a…1694 a3eb 1900 IF DSAL$(LEN(DSAL$))="-" THEN
0x167a…1694 LineComalBin {
0x167a…1694 ptr = 0xa3eb // 0x167a @0x0
0x167a…1694 lno = 0x076c // 0x167c @0x2
0x167a…1694 at0004 = ╱9c╱ IF ╱ // 0x167e @0x4
0x167a…1694 at0005 = ╱44╱D╱ // 0x167f @0x5
0x167a…1694 at0006 = ╱53╱S╱ // 0x1680 @0x6
0x167a…1694 at0007 = ╱41╱A╱ // 0x1681 @0x7
0x167a…1694 at0008 = ╱4c╱L╱ // 0x1682 @0x8
0x167a…1694 at0009 = ╱ef╱$╱ // 0x1683 @0x9
0x167a…1694 at000a = ╱ed╱(╱ // 0x1684 @0xa
0x167a…1694 at000b = ╱cc╱LEN╱ // 0x1685 @0xb
0x167a…1694 at000c = ╱ed╱(╱ // 0x1686 @0xc
0x167a…1694 at000d = ╱44╱D╱ // 0x1687 @0xd
0x167a…1694 at000e = ╱53╱S╱ // 0x1688 @0xe
0x167a…1694 at000f = ╱41╱A╱ // 0x1689 @0xf
0x167a…1694 at0010 = ╱4c╱L╱ // 0x168a @0x10
0x167a…1694 at0011 = ╱ef╱$╱ // 0x168b @0x11
0x167a…1694 at0012 = ╱ee╱)╱ // 0x168c @0x12
0x167a…1694 at0013 = ╱ee╱)╱ // 0x168d @0x13
0x167a…1694 at0014 = ╱dc╱=╱ // 0x168e @0x14
0x167a…1694 at0015 = ╱22╱"╱ // 0x168f @0x15
0x167a…1694 at0016 = ╱2d╱-╱ // 0x1690 @0x16
0x167a…1694 at0017 = ╱22╱"╱ // 0x1691 @0x17
0x167a…1694 at0018 = ╱b6╱ THEN ╱ // 0x1692 @0x18
0x167a…1694 at0019 = EOL // 0x1693 @0x19
0x167a…1694 }
0x1694…16a4 a3fb 1910 PSAL$=DSAL$
0x1694…16a4 LineComalBin {
0x1694…16a4 ptr = 0xa3fb // 0x1694 @0x0
0x1694…16a4 lno = 0x0776 // 0x1696 @0x2
0x1694…16a4 at0004 = ╱50╱P╱ // 0x1698 @0x4
0x1694…16a4 at0005 = ╱53╱S╱ // 0x1699 @0x5
0x1694…16a4 at0006 = ╱41╱A╱ // 0x169a @0x6
0x1694…16a4 at0007 = ╱4c╱L╱ // 0x169b @0x7
0x1694…16a4 at0008 = ╱ef╱$╱ // 0x169c @0x8
0x1694…16a4 at0009 = ╱dc╱=╱ // 0x169d @0x9
0x1694…16a4 at000a = ╱44╱D╱ // 0x169e @0xa
0x1694…16a4 at000b = ╱53╱S╱ // 0x169f @0xb
0x1694…16a4 at000c = ╱41╱A╱ // 0x16a0 @0xc
0x1694…16a4 at000d = ╱4c╱L╱ // 0x16a1 @0xd
0x1694…16a4 at000e = ╱ef╱$╱ // 0x16a2 @0xe
0x1694…16a4 at000f = EOL // 0x16a3 @0xf
0x1694…16a4 }
0x16a4…16b3 a40a 1920 DSAL$="0+"
0x16a4…16b3 LineComalBin {
0x16a4…16b3 ptr = 0xa40a // 0x16a4 @0x0
0x16a4…16b3 lno = 0x0780 // 0x16a6 @0x2
0x16a4…16b3 at0004 = ╱44╱D╱ // 0x16a8 @0x4
0x16a4…16b3 at0005 = ╱53╱S╱ // 0x16a9 @0x5
0x16a4…16b3 at0006 = ╱41╱A╱ // 0x16aa @0x6
0x16a4…16b3 at0007 = ╱4c╱L╱ // 0x16ab @0x7
0x16a4…16b3 at0008 = ╱ef╱$╱ // 0x16ac @0x8
0x16a4…16b3 at0009 = ╱dc╱=╱ // 0x16ad @0x9
0x16a4…16b3 at000a = ╱22╱"╱ // 0x16ae @0xa
0x16a4…16b3 at000b = ╱30╱0╱ // 0x16af @0xb
0x16a4…16b3 at000c = ╱2b╱+╱ // 0x16b0 @0xc
0x16a4…16b3 at000d = ╱22╱"╱ // 0x16b1 @0xd
0x16a4…16b3 at000e = EOL // 0x16b2 @0xe
0x16a4…16b3 }
0x16b3…16b9 a410 1930 ELSE
0x16b3…16b9 LineComalBin {
0x16b3…16b9 ptr = 0xa410 // 0x16b3 @0x0
0x16b3…16b9 lno = 0x078a // 0x16b5 @0x2
0x16b3…16b9 at0004 = ╱9a╱ ELSE ╱ // 0x16b7 @0x4
0x16b3…16b9 at0005 = EOL // 0x16b8 @0x5
0x16b3…16b9 }
0x16b9…16c8 a41f 1940 PSAL$="0+"
0x16b9…16c8 LineComalBin {
0x16b9…16c8 ptr = 0xa41f // 0x16b9 @0x0
0x16b9…16c8 lno = 0x0794 // 0x16bb @0x2
0x16b9…16c8 at0004 = ╱50╱P╱ // 0x16bd @0x4
0x16b9…16c8 at0005 = ╱53╱S╱ // 0x16be @0x5
0x16b9…16c8 at0006 = ╱41╱A╱ // 0x16bf @0x6
0x16b9…16c8 at0007 = ╱4c╱L╱ // 0x16c0 @0x7
0x16b9…16c8 at0008 = ╱ef╱$╱ // 0x16c1 @0x8
0x16b9…16c8 at0009 = ╱dc╱=╱ // 0x16c2 @0x9
0x16b9…16c8 at000a = ╱22╱"╱ // 0x16c3 @0xa
0x16b9…16c8 at000b = ╱30╱0╱ // 0x16c4 @0xb
0x16b9…16c8 at000c = ╱2b╱+╱ // 0x16c5 @0xc
0x16b9…16c8 at000d = ╱22╱"╱ // 0x16c6 @0xd
0x16b9…16c8 at000e = EOL // 0x16c7 @0xe
0x16b9…16c8 }
0x16c8…16ce a425 1950 ENDIF
0x16c8…16ce LineComalBin {
0x16c8…16ce ptr = 0xa425 // 0x16c8 @0x0
0x16c8…16ce lno = 0x079e // 0x16ca @0x2
0x16c8…16ce at0004 = ╱9b╱ ENDIF ╱ // 0x16cc @0x4
0x16c8…16ce at0005 = EOL // 0x16cd @0x5
0x16c8…16ce }
0x16ce…16d4 a42b 1960 ENDIF
0x16ce…16d4 LineComalBin {
0x16ce…16d4 ptr = 0xa42b // 0x16ce @0x0
0x16ce…16d4 lno = 0x07a8 // 0x16d0 @0x2
0x16ce…16d4 at0004 = ╱9b╱ ENDIF ╱ // 0x16d2 @0x4
0x16ce…16d4 at0005 = EOL // 0x16d3 @0x5
0x16ce…16d4 }
0x16d4…16da a431 1970 ENDPROC
0x16d4…16da LineComalBin {
0x16d4…16da ptr = 0xa431 // 0x16d4 @0x0
0x16d4…16da lno = 0x07b2 // 0x16d6 @0x2
0x16d4…16da at0004 = ╱9f╱ ENDPROC ╱ // 0x16d8 @0x4
0x16d4…16da at0005 = EOL // 0x16d9 @0x5
0x16d4…16da }
0x16da…16ee a445 1980 PROC UDATO(DA1,DA2)
0x16da…16ee LineComalBin {
0x16da…16ee ptr = 0xa445 // 0x16da @0x0
0x16da…16ee lno = 0x07bc // 0x16dc @0x2
0x16da…16ee at0004 = ╱9e╱ PROC ╱ // 0x16de @0x4
0x16da…16ee at0005 = ╱55╱U╱ // 0x16df @0x5
0x16da…16ee at0006 = ╱44╱D╱ // 0x16e0 @0x6
0x16da…16ee at0007 = ╱41╱A╱ // 0x16e1 @0x7
0x16da…16ee at0008 = ╱54╱T╱ // 0x16e2 @0x8
0x16da…16ee at0009 = ╱4f╱O╱ // 0x16e3 @0x9
0x16da…16ee at000a = ╱ed╱(╱ // 0x16e4 @0xa
0x16da…16ee at000b = ╱44╱D╱ // 0x16e5 @0xb
0x16da…16ee at000c = ╱41╱A╱ // 0x16e6 @0xc
0x16da…16ee at000d = ╱31╱1╱ // 0x16e7 @0xd
0x16da…16ee at000e = ╱ec╱,╱ // 0x16e8 @0xe
0x16da…16ee at000f = ╱44╱D╱ // 0x16e9 @0xf
0x16da…16ee at0010 = ╱41╱A╱ // 0x16ea @0x10
0x16da…16ee at0011 = ╱32╱2╱ // 0x16eb @0x11
0x16da…16ee at0012 = ╱ee╱)╱ // 0x16ec @0x12
0x16da…16ee at0013 = EOL // 0x16ed @0x13
0x16da…16ee }
0x16ee…16fa a451 1990 DA3=DA1
0x16ee…16fa LineComalBin {
0x16ee…16fa ptr = 0xa451 // 0x16ee @0x0
0x16ee…16fa lno = 0x07c6 // 0x16f0 @0x2
0x16ee…16fa at0004 = ╱44╱D╱ // 0x16f2 @0x4
0x16ee…16fa at0005 = ╱41╱A╱ // 0x16f3 @0x5
0x16ee…16fa at0006 = ╱33╱3╱ // 0x16f4 @0x6
0x16ee…16fa at0007 = ╱dc╱=╱ // 0x16f5 @0x7
0x16ee…16fa at0008 = ╱44╱D╱ // 0x16f6 @0x8
0x16ee…16fa at0009 = ╱41╱A╱ // 0x16f7 @0x9
0x16ee…16fa at000a = ╱31╱1╱ // 0x16f8 @0xa
0x16ee…16fa at000b = EOL // 0x16f9 @0xb
0x16ee…16fa }
0x16fa…170e a465 2000 DA2$=" "
0x16fa…170e LineComalBin {
0x16fa…170e ptr = 0xa465 // 0x16fa @0x0
0x16fa…170e lno = 0x07d0 // 0x16fc @0x2
0x16fa…170e at0004 = ╱44╱D╱ // 0x16fe @0x4
0x16fa…170e at0005 = ╱41╱A╱ // 0x16ff @0x5
0x16fa…170e at0006 = ╱32╱2╱ // 0x1700 @0x6
0x16fa…170e at0007 = ╱ef╱$╱ // 0x1701 @0x7
0x16fa…170e at0008 = ╱dc╱=╱ // 0x1702 @0x8
0x16fa…170e at0009 = ╱22╱"╱ // 0x1703 @0x9
0x16fa…170e at000a = ╱20╱…╱ // 0x1704 @0xa
0x16fa…170e at000b = ╱20╱…╱ // 0x1705 @0xb
0x16fa…170e at000c = ╱20╱…╱ // 0x1706 @0xc
0x16fa…170e at000d = ╱20╱…╱ // 0x1707 @0xd
0x16fa…170e at000e = ╱20╱…╱ // 0x1708 @0xe
0x16fa…170e at000f = ╱20╱…╱ // 0x1709 @0xf
0x16fa…170e at0010 = ╱20╱…╱ // 0x170a @0x10
0x16fa…170e at0011 = ╱20╱…╱ // 0x170b @0x11
0x16fa…170e at0012 = ╱22╱"╱ // 0x170c @0x12
0x16fa…170e at0013 = EOL // 0x170d @0x13
0x16fa…170e }
0x170e…172b a482 2010 FOR J=8 TO 1 STEP -1
0x170e…172b LineComalBin {
0x170e…172b ptr = 0xa482 // 0x170e @0x0
0x170e…172b lno = 0x07da // 0x1710 @0x2
0x170e…172b at0004 = ╱83╱ FOR ╱ // 0x1712 @0x4
0x170e…172b at0005 = ╱4a╱J╱ // 0x1713 @0x5
0x170e…172b at0006 = ╱dc╱=╱ // 0x1714 @0x6
0x170e…172b at0007 = ╱38╱8╱ // 0x1715 @0x7
0x170e…172b at0008 = ╱fe00008004╱ // 0x1716 @0x8
0x170e…172b at000d = ╱b7╱ TO ╱ // 0x171b @0xd
0x170e…172b at000e = ╱31╱1╱ // 0x171c @0xe
0x170e…172b at000f = ╱fe00008001╱ // 0x171d @0xf
0x170e…172b at0014 = ╱b8╱ STEP ╱ // 0x1722 @0x14
0x170e…172b at0015 = ╱e9╱-╱ // 0x1723 @0x15
0x170e…172b at0016 = ╱31╱1╱ // 0x1724 @0x16
0x170e…172b at0017 = ╱fe00008001╱ // 0x1725 @0x17
0x170e…172b at001c = EOL // 0x172a @0x1c
0x170e…172b }
0x172b…1741 a498 2020 IF J MOD 3=0 THEN
0x172b…1741 LineComalBin {
0x172b…1741 ptr = 0xa498 // 0x172b @0x0
0x172b…1741 lno = 0x07e4 // 0x172d @0x2
0x172b…1741 at0004 = ╱9c╱ IF ╱ // 0x172f @0x4
0x172b…1741 at0005 = ╱4a╱J╱ // 0x1730 @0x5
0x172b…1741 at0006 = ╱e8╱ MOD ╱ // 0x1731 @0x6
0x172b…1741 at0007 = ╱33╱3╱ // 0x1732 @0x7
0x172b…1741 at0008 = ╱fe0000c002╱ // 0x1733 @0x8
0x172b…1741 at000d = ╱dc╱=╱ // 0x1738 @0xd
0x172b…1741 at000e = ╱30╱0╱ // 0x1739 @0xe
0x172b…1741 at000f = ╱fe00000000╱ // 0x173a @0xf
0x172b…1741 at0014 = ╱b6╱ THEN ╱ // 0x173f @0x14
0x172b…1741 at0015 = EOL // 0x1740 @0x15
0x172b…1741 }
0x1741…1751 a4a8 2030 DA2$(J)="."
0x1741…1751 LineComalBin {
0x1741…1751 ptr = 0xa4a8 // 0x1741 @0x0
0x1741…1751 lno = 0x07ee // 0x1743 @0x2
0x1741…1751 at0004 = ╱44╱D╱ // 0x1745 @0x4
0x1741…1751 at0005 = ╱41╱A╱ // 0x1746 @0x5
0x1741…1751 at0006 = ╱32╱2╱ // 0x1747 @0x6
0x1741…1751 at0007 = ╱ef╱$╱ // 0x1748 @0x7
0x1741…1751 at0008 = ╱ed╱(╱ // 0x1749 @0x8
0x1741…1751 at0009 = ╱4a╱J╱ // 0x174a @0x9
0x1741…1751 at000a = ╱ee╱)╱ // 0x174b @0xa
0x1741…1751 at000b = ╱dc╱=╱ // 0x174c @0xb
0x1741…1751 at000c = ╱22╱"╱ // 0x174d @0xc
0x1741…1751 at000d = ╱2e╱.╱ // 0x174e @0xd
0x1741…1751 at000e = ╱22╱"╱ // 0x174f @0xe
0x1741…1751 at000f = EOL // 0x1750 @0xf
0x1741…1751 }
0x1751…1757 a4ae 2040 ELSE
0x1751…1757 LineComalBin {
0x1751…1757 ptr = 0xa4ae // 0x1751 @0x0
0x1751…1757 lno = 0x07f8 // 0x1753 @0x2
0x1751…1757 at0004 = ╱9a╱ ELSE ╱ // 0x1755 @0x4
0x1751…1757 at0005 = EOL // 0x1756 @0x5
0x1751…1757 }
0x1757…177a a4d1 2050 DA2$(J)=CHR(DA3 MOD 10+48)
0x1757…177a LineComalBin {
0x1757…177a ptr = 0xa4d1 // 0x1757 @0x0
0x1757…177a lno = 0x0802 // 0x1759 @0x2
0x1757…177a at0004 = ╱44╱D╱ // 0x175b @0x4
0x1757…177a at0005 = ╱41╱A╱ // 0x175c @0x5
0x1757…177a at0006 = ╱32╱2╱ // 0x175d @0x6
0x1757…177a at0007 = ╱ef╱$╱ // 0x175e @0x7
0x1757…177a at0008 = ╱ed╱(╱ // 0x175f @0x8
0x1757…177a at0009 = ╱4a╱J╱ // 0x1760 @0x9
0x1757…177a at000a = ╱ee╱)╱ // 0x1761 @0xa
0x1757…177a at000b = ╱dc╱=╱ // 0x1762 @0xb
0x1757…177a at000c = ╱cf╱CHR╱ // 0x1763 @0xc
0x1757…177a at000d = ╱ed╱(╱ // 0x1764 @0xd
0x1757…177a at000e = ╱44╱D╱ // 0x1765 @0xe
0x1757…177a at000f = ╱41╱A╱ // 0x1766 @0xf
0x1757…177a at0010 = ╱33╱3╱ // 0x1767 @0x10
0x1757…177a at0011 = ╱e8╱ MOD ╱ // 0x1768 @0x11
0x1757…177a at0012 = ╱31╱1╱ // 0x1769 @0x12
0x1757…177a at0013 = ╱30╱0╱ // 0x176a @0x13
0x1757…177a at0014 = ╱fe0000a004╱ // 0x176b @0x14
0x1757…177a at0019 = ╱e2╱+╱ // 0x1770 @0x19
0x1757…177a at001a = ╱34╱4╱ // 0x1771 @0x1a
0x1757…177a at001b = ╱38╱8╱ // 0x1772 @0x1b
0x1757…177a at001c = ╱fe0000c006╱ // 0x1773 @0x1c
0x1757…177a at0021 = ╱ee╱)╱ // 0x1778 @0x21
0x1757…177a at0022 = EOL // 0x1779 @0x22
0x1757…177a }
0x177a…178e a4e5 2060 DA3=DA3 DIV 10
0x177a…178e LineComalBin {
0x177a…178e ptr = 0xa4e5 // 0x177a @0x0
0x177a…178e lno = 0x080c // 0x177c @0x2
0x177a…178e at0004 = ╱44╱D╱ // 0x177e @0x4
0x177a…178e at0005 = ╱41╱A╱ // 0x177f @0x5
0x177a…178e at0006 = ╱33╱3╱ // 0x1780 @0x6
0x177a…178e at0007 = ╱dc╱=╱ // 0x1781 @0x7
0x177a…178e at0008 = ╱44╱D╱ // 0x1782 @0x8
0x177a…178e at0009 = ╱41╱A╱ // 0x1783 @0x9
0x177a…178e at000a = ╱33╱3╱ // 0x1784 @0xa
0x177a…178e at000b = ╱e7╱ DIV ╱ // 0x1785 @0xb
0x177a…178e at000c = ╱31╱1╱ // 0x1786 @0xc
0x177a…178e at000d = ╱30╱0╱ // 0x1787 @0xd
0x177a…178e at000e = ╱fe0000a004╱ // 0x1788 @0xe
0x177a…178e at0013 = EOL // 0x178d @0x13
0x177a…178e }
0x178e…1794 a4eb 2070 ENDIF
0x178e…1794 LineComalBin {
0x178e…1794 ptr = 0xa4eb // 0x178e @0x0
0x178e…1794 lno = 0x0816 // 0x1790 @0x2
0x178e…1794 at0004 = ╱9b╱ ENDIF ╱ // 0x1792 @0x4
0x178e…1794 at0005 = EOL // 0x1793 @0x5
0x178e…1794 }
0x1794…179b a4f2 2080 NEXT J
0x1794…179b LineComalBin {
0x1794…179b ptr = 0xa4f2 // 0x1794 @0x0
0x1794…179b lno = 0x0820 // 0x1796 @0x2
0x1794…179b at0004 = ╱84╱ NEXT ╱ // 0x1798 @0x4
0x1794…179b at0005 = ╱4a╱J╱ // 0x1799 @0x5
0x1794…179b at0006 = EOL // 0x179a @0x6
0x1794…179b }
0x179b…17a1 a4f8 2090 ENDPROC
0x179b…17a1 LineComalBin {
0x179b…17a1 ptr = 0xa4f8 // 0x179b @0x0
0x179b…17a1 lno = 0x082a // 0x179d @0x2
0x179b…17a1 at0004 = ╱9f╱ ENDPROC ╱ // 0x179f @0x4
0x179b…17a1 at0005 = EOL // 0x17a0 @0x5
0x179b…17a1 }
0x17a1…17c7 a51e 2100 PROC GEMMID(MIDANTAL,L2,KONTNR1,ENT2)
0x17a1…17c7 LineComalBin {
0x17a1…17c7 ptr = 0xa51e // 0x17a1 @0x0
0x17a1…17c7 lno = 0x0834 // 0x17a3 @0x2
0x17a1…17c7 at0004 = ╱9e╱ PROC ╱ // 0x17a5 @0x4
0x17a1…17c7 at0005 = ╱47╱G╱ // 0x17a6 @0x5
0x17a1…17c7 at0006 = ╱45╱E╱ // 0x17a7 @0x6
0x17a1…17c7 at0007 = ╱4d╱M╱ // 0x17a8 @0x7
0x17a1…17c7 at0008 = ╱4d╱M╱ // 0x17a9 @0x8
0x17a1…17c7 at0009 = ╱49╱I╱ // 0x17aa @0x9
0x17a1…17c7 at000a = ╱44╱D╱ // 0x17ab @0xa
0x17a1…17c7 at000b = ╱ed╱(╱ // 0x17ac @0xb
0x17a1…17c7 at000c = ╱4d╱M╱ // 0x17ad @0xc
0x17a1…17c7 at000d = ╱49╱I╱ // 0x17ae @0xd
0x17a1…17c7 at000e = ╱44╱D╱ // 0x17af @0xe
0x17a1…17c7 at000f = ╱41╱A╱ // 0x17b0 @0xf
0x17a1…17c7 at0010 = ╱4e╱N╱ // 0x17b1 @0x10
0x17a1…17c7 at0011 = ╱54╱T╱ // 0x17b2 @0x11
0x17a1…17c7 at0012 = ╱41╱A╱ // 0x17b3 @0x12
0x17a1…17c7 at0013 = ╱4c╱L╱ // 0x17b4 @0x13
0x17a1…17c7 at0014 = ╱ec╱,╱ // 0x17b5 @0x14
0x17a1…17c7 at0015 = ╱4c╱L╱ // 0x17b6 @0x15
0x17a1…17c7 at0016 = ╱32╱2╱ // 0x17b7 @0x16
0x17a1…17c7 at0017 = ╱ec╱,╱ // 0x17b8 @0x17
0x17a1…17c7 at0018 = ╱4b╱K╱ // 0x17b9 @0x18
0x17a1…17c7 at0019 = ╱4f╱O╱ // 0x17ba @0x19
0x17a1…17c7 at001a = ╱4e╱N╱ // 0x17bb @0x1a
0x17a1…17c7 at001b = ╱54╱T╱ // 0x17bc @0x1b
0x17a1…17c7 at001c = ╱4e╱N╱ // 0x17bd @0x1c
0x17a1…17c7 at001d = ╱52╱R╱ // 0x17be @0x1d
0x17a1…17c7 at001e = ╱31╱1╱ // 0x17bf @0x1e
0x17a1…17c7 at001f = ╱ec╱,╱ // 0x17c0 @0x1f
0x17a1…17c7 at0020 = ╱45╱E╱ // 0x17c1 @0x20
0x17a1…17c7 at0021 = ╱4e╱N╱ // 0x17c2 @0x21
0x17a1…17c7 at0022 = ╱54╱T╱ // 0x17c3 @0x22
0x17a1…17c7 at0023 = ╱32╱2╱ // 0x17c4 @0x23
0x17a1…17c7 at0024 = ╱ee╱)╱ // 0x17c5 @0x24
0x17a1…17c7 at0025 = EOL // 0x17c6 @0x25
0x17a1…17c7 }
0x17c7…17e4 a53b 2110 MIDANTAL=MIDANTAL+1
0x17c7…17e4 LineComalBin {
0x17c7…17e4 ptr = 0xa53b // 0x17c7 @0x0
0x17c7…17e4 lno = 0x083e // 0x17c9 @0x2
0x17c7…17e4 at0004 = ╱4d╱M╱ // 0x17cb @0x4
0x17c7…17e4 at0005 = ╱49╱I╱ // 0x17cc @0x5
0x17c7…17e4 at0006 = ╱44╱D╱ // 0x17cd @0x6
0x17c7…17e4 at0007 = ╱41╱A╱ // 0x17ce @0x7
0x17c7…17e4 at0008 = ╱4e╱N╱ // 0x17cf @0x8
0x17c7…17e4 at0009 = ╱54╱T╱ // 0x17d0 @0x9
0x17c7…17e4 at000a = ╱41╱A╱ // 0x17d1 @0xa
0x17c7…17e4 at000b = ╱4c╱L╱ // 0x17d2 @0xb
0x17c7…17e4 at000c = ╱dc╱=╱ // 0x17d3 @0xc
0x17c7…17e4 at000d = ╱4d╱M╱ // 0x17d4 @0xd
0x17c7…17e4 at000e = ╱49╱I╱ // 0x17d5 @0xe
0x17c7…17e4 at000f = ╱44╱D╱ // 0x17d6 @0xf
0x17c7…17e4 at0010 = ╱41╱A╱ // 0x17d7 @0x10
0x17c7…17e4 at0011 = ╱4e╱N╱ // 0x17d8 @0x11
0x17c7…17e4 at0012 = ╱54╱T╱ // 0x17d9 @0x12
0x17c7…17e4 at0013 = ╱41╱A╱ // 0x17da @0x13
0x17c7…17e4 at0014 = ╱4c╱L╱ // 0x17db @0x14
0x17c7…17e4 at0015 = ╱e2╱+╱ // 0x17dc @0x15
0x17c7…17e4 at0016 = ╱31╱1╱ // 0x17dd @0x16
0x17c7…17e4 at0017 = ╱fe00008001╱ // 0x17de @0x17
0x17c7…17e4 at001c = EOL // 0x17e3 @0x1c
0x17c7…17e4 }
0x17e4…181d a574 2120 PUT L2$,MIDANTAL:KONTNR1,DDATO,BILAG,TKODE$,BELØB$,ENT2
0x17e4…181d LineComalBin {
0x17e4…181d ptr = 0xa574 // 0x17e4 @0x0
0x17e4…181d lno = 0x0848 // 0x17e6 @0x2
0x17e4…181d at0004 = ╱aa╱ PUT ╱ // 0x17e8 @0x4
0x17e4…181d at0005 = ╱4c╱L╱ // 0x17e9 @0x5
0x17e4…181d at0006 = ╱32╱2╱ // 0x17ea @0x6
0x17e4…181d at0007 = ╱ef╱$╱ // 0x17eb @0x7
0x17e4…181d at0008 = ╱ec╱,╱ // 0x17ec @0x8
0x17e4…181d at0009 = ╱4d╱M╱ // 0x17ed @0x9
0x17e4…181d at000a = ╱49╱I╱ // 0x17ee @0xa
0x17e4…181d at000b = ╱44╱D╱ // 0x17ef @0xb
0x17e4…181d at000c = ╱41╱A╱ // 0x17f0 @0xc
0x17e4…181d at000d = ╱4e╱N╱ // 0x17f1 @0xd
0x17e4…181d at000e = ╱54╱T╱ // 0x17f2 @0xe
0x17e4…181d at000f = ╱41╱A╱ // 0x17f3 @0xf
0x17e4…181d at0010 = ╱4c╱L╱ // 0x17f4 @0x10
0x17e4…181d at0011 = ╱f0╱:╱ // 0x17f5 @0x11
0x17e4…181d at0012 = ╱4b╱K╱ // 0x17f6 @0x12
0x17e4…181d at0013 = ╱4f╱O╱ // 0x17f7 @0x13
0x17e4…181d at0014 = ╱4e╱N╱ // 0x17f8 @0x14
0x17e4…181d at0015 = ╱54╱T╱ // 0x17f9 @0x15
0x17e4…181d at0016 = ╱4e╱N╱ // 0x17fa @0x16
0x17e4…181d at0017 = ╱52╱R╱ // 0x17fb @0x17
0x17e4…181d at0018 = ╱31╱1╱ // 0x17fc @0x18
0x17e4…181d at0019 = ╱ec╱,╱ // 0x17fd @0x19
0x17e4…181d at001a = ╱44╱D╱ // 0x17fe @0x1a
0x17e4…181d at001b = ╱44╱D╱ // 0x17ff @0x1b
0x17e4…181d at001c = ╱41╱A╱ // 0x1800 @0x1c
0x17e4…181d at001d = ╱54╱T╱ // 0x1801 @0x1d
0x17e4…181d at001e = ╱4f╱O╱ // 0x1802 @0x1e
0x17e4…181d at001f = ╱ec╱,╱ // 0x1803 @0x1f
0x17e4…181d at0020 = ╱42╱B╱ // 0x1804 @0x20
0x17e4…181d at0021 = ╱49╱I╱ // 0x1805 @0x21
0x17e4…181d at0022 = ╱4c╱L╱ // 0x1806 @0x22
0x17e4…181d at0023 = ╱41╱A╱ // 0x1807 @0x23
0x17e4…181d at0024 = ╱47╱G╱ // 0x1808 @0x24
0x17e4…181d at0025 = ╱ec╱,╱ // 0x1809 @0x25
0x17e4…181d at0026 = ╱54╱T╱ // 0x180a @0x26
0x17e4…181d at0027 = ╱4b╱K╱ // 0x180b @0x27
0x17e4…181d at0028 = ╱4f╱O╱ // 0x180c @0x28
0x17e4…181d at0029 = ╱44╱D╱ // 0x180d @0x29
0x17e4…181d at002a = ╱45╱E╱ // 0x180e @0x2a
0x17e4…181d at002b = ╱ef╱$╱ // 0x180f @0x2b
0x17e4…181d at002c = ╱ec╱,╱ // 0x1810 @0x2c
0x17e4…181d at002d = ╱42╱B╱ // 0x1811 @0x2d
0x17e4…181d at002e = ╱45╱E╱ // 0x1812 @0x2e
0x17e4…181d at002f = ╱4c╱L╱ // 0x1813 @0x2f
0x17e4…181d at0030 = ╱5c╱Ø╱ // 0x1814 @0x30
0x17e4…181d at0031 = ╱42╱B╱ // 0x1815 @0x31
0x17e4…181d at0032 = ╱ef╱$╱ // 0x1816 @0x32
0x17e4…181d at0033 = ╱ec╱,╱ // 0x1817 @0x33
0x17e4…181d at0034 = ╱45╱E╱ // 0x1818 @0x34
0x17e4…181d at0035 = ╱4e╱N╱ // 0x1819 @0x35
0x17e4…181d at0036 = ╱54╱T╱ // 0x181a @0x36
0x17e4…181d at0037 = ╱32╱2╱ // 0x181b @0x37
0x17e4…181d at0038 = EOL // 0x181c @0x38
0x17e4…181d }
0x181d…183a a591 2130 EXEC FEJL(1,1,L2$)
0x181d…183a LineComalBin {
0x181d…183a ptr = 0xa591 // 0x181d @0x0
0x181d…183a lno = 0x0852 // 0x181f @0x2
0x181d…183a at0004 = ╱9d╱ EXEC ╱ // 0x1821 @0x4
0x181d…183a at0005 = ╱46╱F╱ // 0x1822 @0x5
0x181d…183a at0006 = ╱45╱E╱ // 0x1823 @0x6
0x181d…183a at0007 = ╱4a╱J╱ // 0x1824 @0x7
0x181d…183a at0008 = ╱4c╱L╱ // 0x1825 @0x8
0x181d…183a at0009 = ╱ed╱(╱ // 0x1826 @0x9
0x181d…183a at000a = ╱31╱1╱ // 0x1827 @0xa
0x181d…183a at000b = ╱fe00008001╱ // 0x1828 @0xb
0x181d…183a at0010 = ╱ec╱,╱ // 0x182d @0x10
0x181d…183a at0011 = ╱31╱1╱ // 0x182e @0x11
0x181d…183a at0012 = ╱fe00008001╱ // 0x182f @0x12
0x181d…183a at0017 = ╱ec╱,╱ // 0x1834 @0x17
0x181d…183a at0018 = ╱4c╱L╱ // 0x1835 @0x18
0x181d…183a at0019 = ╱32╱2╱ // 0x1836 @0x19
0x181d…183a at001a = ╱ef╱$╱ // 0x1837 @0x1a
0x181d…183a at001b = ╱ee╱)╱ // 0x1838 @0x1b
0x181d…183a at001c = EOL // 0x1839 @0x1c
0x181d…183a }
0x183a…1863 a5ba 2140 IF TEKSTKODE>9 AND TEKSTKODE<20 THEN
0x183a…1863 LineComalBin {
0x183a…1863 ptr = 0xa5ba // 0x183a @0x0
0x183a…1863 lno = 0x085c // 0x183c @0x2
0x183a…1863 at0004 = ╱9c╱ IF ╱ // 0x183e @0x4
0x183a…1863 at0005 = ╱54╱T╱ // 0x183f @0x5
0x183a…1863 at0006 = ╱45╱E╱ // 0x1840 @0x6
0x183a…1863 at0007 = ╱4b╱K╱ // 0x1841 @0x7
0x183a…1863 at0008 = ╱53╱S╱ // 0x1842 @0x8
0x183a…1863 at0009 = ╱54╱T╱ // 0x1843 @0x9
0x183a…1863 at000a = ╱4b╱K╱ // 0x1844 @0xa
0x183a…1863 at000b = ╱4f╱O╱ // 0x1845 @0xb
0x183a…1863 at000c = ╱44╱D╱ // 0x1846 @0xc
0x183a…1863 at000d = ╱45╱E╱ // 0x1847 @0xd
0x183a…1863 at000e = ╱de╱>╱ // 0x1848 @0xe
0x183a…1863 at000f = ╱39╱9╱ // 0x1849 @0xf
0x183a…1863 at0010 = ╱fe00009004╱ // 0x184a @0x10
0x183a…1863 at0015 = ╱da╱ AND ╱ // 0x184f @0x15
0x183a…1863 at0016 = ╱54╱T╱ // 0x1850 @0x16
0x183a…1863 at0017 = ╱45╱E╱ // 0x1851 @0x17
0x183a…1863 at0018 = ╱4b╱K╱ // 0x1852 @0x18
0x183a…1863 at0019 = ╱53╱S╱ // 0x1853 @0x19
0x183a…1863 at001a = ╱54╱T╱ // 0x1854 @0x1a
0x183a…1863 at001b = ╱4b╱K╱ // 0x1855 @0x1b
0x183a…1863 at001c = ╱4f╱O╱ // 0x1856 @0x1c
0x183a…1863 at001d = ╱44╱D╱ // 0x1857 @0x1d
0x183a…1863 at001e = ╱45╱E╱ // 0x1858 @0x1e
0x183a…1863 at001f = ╱dd╱<╱ // 0x1859 @0x1f
0x183a…1863 at0020 = ╱32╱2╱ // 0x185a @0x20
0x183a…1863 at0021 = ╱30╱0╱ // 0x185b @0x21
0x183a…1863 at0022 = ╱fe0000a005╱ // 0x185c @0x22
0x183a…1863 at0027 = ╱b6╱ THEN ╱ // 0x1861 @0x27
0x183a…1863 at0028 = EOL // 0x1862 @0x28
0x183a…1863 }
0x1863…1880 a5d7 2150 MIDANTAL=MIDANTAL+1
0x1863…1880 LineComalBin {
0x1863…1880 ptr = 0xa5d7 // 0x1863 @0x0
0x1863…1880 lno = 0x0866 // 0x1865 @0x2
0x1863…1880 at0004 = ╱4d╱M╱ // 0x1867 @0x4
0x1863…1880 at0005 = ╱49╱I╱ // 0x1868 @0x5
0x1863…1880 at0006 = ╱44╱D╱ // 0x1869 @0x6
0x1863…1880 at0007 = ╱41╱A╱ // 0x186a @0x7
0x1863…1880 at0008 = ╱4e╱N╱ // 0x186b @0x8
0x1863…1880 at0009 = ╱54╱T╱ // 0x186c @0x9
0x1863…1880 at000a = ╱41╱A╱ // 0x186d @0xa
0x1863…1880 at000b = ╱4c╱L╱ // 0x186e @0xb
0x1863…1880 at000c = ╱dc╱=╱ // 0x186f @0xc
0x1863…1880 at000d = ╱4d╱M╱ // 0x1870 @0xd
0x1863…1880 at000e = ╱49╱I╱ // 0x1871 @0xe
0x1863…1880 at000f = ╱44╱D╱ // 0x1872 @0xf
0x1863…1880 at0010 = ╱41╱A╱ // 0x1873 @0x10
0x1863…1880 at0011 = ╱4e╱N╱ // 0x1874 @0x11
0x1863…1880 at0012 = ╱54╱T╱ // 0x1875 @0x12
0x1863…1880 at0013 = ╱41╱A╱ // 0x1876 @0x13
0x1863…1880 at0014 = ╱4c╱L╱ // 0x1877 @0x14
0x1863…1880 at0015 = ╱e2╱+╱ // 0x1878 @0x15
0x1863…1880 at0016 = ╱31╱1╱ // 0x1879 @0x16
0x1863…1880 at0017 = ╱fe00008001╱ // 0x187a @0x17
0x1863…1880 at001c = EOL // 0x187f @0x1c
0x1863…1880 }
0x1880…18a1 a5f8 2160 PUT L2$,MIDANTAL:KONTNR1,TEKST$
0x1880…18a1 LineComalBin {
0x1880…18a1 ptr = 0xa5f8 // 0x1880 @0x0
0x1880…18a1 lno = 0x0870 // 0x1882 @0x2
0x1880…18a1 at0004 = ╱aa╱ PUT ╱ // 0x1884 @0x4
0x1880…18a1 at0005 = ╱4c╱L╱ // 0x1885 @0x5
0x1880…18a1 at0006 = ╱32╱2╱ // 0x1886 @0x6
0x1880…18a1 at0007 = ╱ef╱$╱ // 0x1887 @0x7
0x1880…18a1 at0008 = ╱ec╱,╱ // 0x1888 @0x8
0x1880…18a1 at0009 = ╱4d╱M╱ // 0x1889 @0x9
0x1880…18a1 at000a = ╱49╱I╱ // 0x188a @0xa
0x1880…18a1 at000b = ╱44╱D╱ // 0x188b @0xb
0x1880…18a1 at000c = ╱41╱A╱ // 0x188c @0xc
0x1880…18a1 at000d = ╱4e╱N╱ // 0x188d @0xd
0x1880…18a1 at000e = ╱54╱T╱ // 0x188e @0xe
0x1880…18a1 at000f = ╱41╱A╱ // 0x188f @0xf
0x1880…18a1 at0010 = ╱4c╱L╱ // 0x1890 @0x10
0x1880…18a1 at0011 = ╱f0╱:╱ // 0x1891 @0x11
0x1880…18a1 at0012 = ╱4b╱K╱ // 0x1892 @0x12
0x1880…18a1 at0013 = ╱4f╱O╱ // 0x1893 @0x13
0x1880…18a1 at0014 = ╱4e╱N╱ // 0x1894 @0x14
0x1880…18a1 at0015 = ╱54╱T╱ // 0x1895 @0x15
0x1880…18a1 at0016 = ╱4e╱N╱ // 0x1896 @0x16
0x1880…18a1 at0017 = ╱52╱R╱ // 0x1897 @0x17
0x1880…18a1 at0018 = ╱31╱1╱ // 0x1898 @0x18
0x1880…18a1 at0019 = ╱ec╱,╱ // 0x1899 @0x19
0x1880…18a1 at001a = ╱54╱T╱ // 0x189a @0x1a
0x1880…18a1 at001b = ╱45╱E╱ // 0x189b @0x1b
0x1880…18a1 at001c = ╱4b╱K╱ // 0x189c @0x1c
0x1880…18a1 at001d = ╱53╱S╱ // 0x189d @0x1d
0x1880…18a1 at001e = ╱54╱T╱ // 0x189e @0x1e
0x1880…18a1 at001f = ╱ef╱$╱ // 0x189f @0x1f
0x1880…18a1 at0020 = EOL // 0x18a0 @0x20
0x1880…18a1 }
0x18a1…18be a615 2170 EXEC FEJL(1,2,L2$)
0x18a1…18be LineComalBin {
0x18a1…18be ptr = 0xa615 // 0x18a1 @0x0
0x18a1…18be lno = 0x087a // 0x18a3 @0x2
0x18a1…18be at0004 = ╱9d╱ EXEC ╱ // 0x18a5 @0x4
0x18a1…18be at0005 = ╱46╱F╱ // 0x18a6 @0x5
0x18a1…18be at0006 = ╱45╱E╱ // 0x18a7 @0x6
0x18a1…18be at0007 = ╱4a╱J╱ // 0x18a8 @0x7
0x18a1…18be at0008 = ╱4c╱L╱ // 0x18a9 @0x8
0x18a1…18be at0009 = ╱ed╱(╱ // 0x18aa @0x9
0x18a1…18be at000a = ╱31╱1╱ // 0x18ab @0xa
0x18a1…18be at000b = ╱fe00008001╱ // 0x18ac @0xb
0x18a1…18be at0010 = ╱ec╱,╱ // 0x18b1 @0x10
0x18a1…18be at0011 = ╱32╱2╱ // 0x18b2 @0x11
0x18a1…18be at0012 = ╱fe00008002╱ // 0x18b3 @0x12
0x18a1…18be at0017 = ╱ec╱,╱ // 0x18b8 @0x17
0x18a1…18be at0018 = ╱4c╱L╱ // 0x18b9 @0x18
0x18a1…18be at0019 = ╱32╱2╱ // 0x18ba @0x19
0x18a1…18be at001a = ╱ef╱$╱ // 0x18bb @0x1a
0x18a1…18be at001b = ╱ee╱)╱ // 0x18bc @0x1b
0x18a1…18be at001c = EOL // 0x18bd @0x1c
0x18a1…18be }
0x18be…18c4 a61b 2180 ENDIF
0x18be…18c4 LineComalBin {
0x18be…18c4 ptr = 0xa61b // 0x18be @0x0
0x18be…18c4 lno = 0x0884 // 0x18c0 @0x2
0x18be…18c4 at0004 = ╱9b╱ ENDIF ╱ // 0x18c2 @0x4
0x18be…18c4 at0005 = EOL // 0x18c3 @0x5
0x18be…18c4 }
0x18c4…18ca a621 2190 ENDPROC
0x18c4…18ca LineComalBin {
0x18c4…18ca ptr = 0xa621 // 0x18c4 @0x0
0x18c4…18ca lno = 0x088e // 0x18c6 @0x2
0x18c4…18ca at0004 = ╱9f╱ ENDPROC ╱ // 0x18c8 @0x4
0x18c4…18ca at0005 = EOL // 0x18c9 @0x5
0x18c4…18ca }
0x18ca…18f5 a64c 2200 PROC FINDPOST1(TAB4,Q,MANT2,NØGL5,PIL6,L8)
0x18ca…18f5 LineComalBin {
0x18ca…18f5 ptr = 0xa64c // 0x18ca @0x0
0x18ca…18f5 lno = 0x0898 // 0x18cc @0x2
0x18ca…18f5 at0004 = ╱9e╱ PROC ╱ // 0x18ce @0x4
0x18ca…18f5 at0005 = ╱46╱F╱ // 0x18cf @0x5
0x18ca…18f5 at0006 = ╱49╱I╱ // 0x18d0 @0x6
0x18ca…18f5 at0007 = ╱4e╱N╱ // 0x18d1 @0x7
0x18ca…18f5 at0008 = ╱44╱D╱ // 0x18d2 @0x8
0x18ca…18f5 at0009 = ╱50╱P╱ // 0x18d3 @0x9
0x18ca…18f5 at000a = ╱4f╱O╱ // 0x18d4 @0xa
0x18ca…18f5 at000b = ╱53╱S╱ // 0x18d5 @0xb
0x18ca…18f5 at000c = ╱54╱T╱ // 0x18d6 @0xc
0x18ca…18f5 at000d = ╱31╱1╱ // 0x18d7 @0xd
0x18ca…18f5 at000e = ╱ed╱(╱ // 0x18d8 @0xe
0x18ca…18f5 at000f = ╱54╱T╱ // 0x18d9 @0xf
0x18ca…18f5 at0010 = ╱41╱A╱ // 0x18da @0x10
0x18ca…18f5 at0011 = ╱42╱B╱ // 0x18db @0x11
0x18ca…18f5 at0012 = ╱34╱4╱ // 0x18dc @0x12
0x18ca…18f5 at0013 = ╱ec╱,╱ // 0x18dd @0x13
0x18ca…18f5 at0014 = ╱51╱Q╱ // 0x18de @0x14
0x18ca…18f5 at0015 = ╱ec╱,╱ // 0x18df @0x15
0x18ca…18f5 at0016 = ╱4d╱M╱ // 0x18e0 @0x16
0x18ca…18f5 at0017 = ╱41╱A╱ // 0x18e1 @0x17
0x18ca…18f5 at0018 = ╱4e╱N╱ // 0x18e2 @0x18
0x18ca…18f5 at0019 = ╱54╱T╱ // 0x18e3 @0x19
0x18ca…18f5 at001a = ╱32╱2╱ // 0x18e4 @0x1a
0x18ca…18f5 at001b = ╱ec╱,╱ // 0x18e5 @0x1b
0x18ca…18f5 at001c = ╱4e╱N╱ // 0x18e6 @0x1c
0x18ca…18f5 at001d = ╱5c╱Ø╱ // 0x18e7 @0x1d
0x18ca…18f5 at001e = ╱47╱G╱ // 0x18e8 @0x1e
0x18ca…18f5 at001f = ╱4c╱L╱ // 0x18e9 @0x1f
0x18ca…18f5 at0020 = ╱35╱5╱ // 0x18ea @0x20
0x18ca…18f5 at0021 = ╱ec╱,╱ // 0x18eb @0x21
0x18ca…18f5 at0022 = ╱50╱P╱ // 0x18ec @0x22
0x18ca…18f5 at0023 = ╱49╱I╱ // 0x18ed @0x23
0x18ca…18f5 at0024 = ╱4c╱L╱ // 0x18ee @0x24
0x18ca…18f5 at0025 = ╱36╱6╱ // 0x18ef @0x25
0x18ca…18f5 at0026 = ╱ec╱,╱ // 0x18f0 @0x26
0x18ca…18f5 at0027 = ╱4c╱L╱ // 0x18f1 @0x27
0x18ca…18f5 at0028 = ╱38╱8╱ // 0x18f2 @0x28
0x18ca…18f5 at0029 = ╱ee╱)╱ // 0x18f3 @0x29
0x18ca…18f5 at002a = EOL // 0x18f4 @0x2a
0x18ca…18f5 }
0x18f5…1948 a69f 2210 PIL1=MANT2 DIV 8;PIL6=PIL1;CEKS=1;MANT3=MANT2 DIV 4;MANT4=MANT2 DIV 32
0x18f5…1948 LineComalBin {
0x18f5…1948 ptr = 0xa69f // 0x18f5 @0x0
0x18f5…1948 lno = 0x08a2 // 0x18f7 @0x2
0x18f5…1948 at0004 = ╱50╱P╱ // 0x18f9 @0x4
0x18f5…1948 at0005 = ╱49╱I╱ // 0x18fa @0x5
0x18f5…1948 at0006 = ╱4c╱L╱ // 0x18fb @0x6
0x18f5…1948 at0007 = ╱31╱1╱ // 0x18fc @0x7
0x18f5…1948 at0008 = ╱dc╱=╱ // 0x18fd @0x8
0x18f5…1948 at0009 = ╱4d╱M╱ // 0x18fe @0x9
0x18f5…1948 at000a = ╱41╱A╱ // 0x18ff @0xa
0x18f5…1948 at000b = ╱4e╱N╱ // 0x1900 @0xb
0x18f5…1948 at000c = ╱54╱T╱ // 0x1901 @0xc
0x18f5…1948 at000d = ╱32╱2╱ // 0x1902 @0xd
0x18f5…1948 at000e = ╱e7╱ DIV ╱ // 0x1903 @0xe
0x18f5…1948 at000f = ╱38╱8╱ // 0x1904 @0xf
0x18f5…1948 at0010 = ╱fe00008004╱ // 0x1905 @0x10
0x18f5…1948 at0015 = ╱eb╱;╱ // 0x190a @0x15
0x18f5…1948 at0016 = ╱50╱P╱ // 0x190b @0x16
0x18f5…1948 at0017 = ╱49╱I╱ // 0x190c @0x17
0x18f5…1948 at0018 = ╱4c╱L╱ // 0x190d @0x18
0x18f5…1948 at0019 = ╱36╱6╱ // 0x190e @0x19
0x18f5…1948 at001a = ╱dc╱=╱ // 0x190f @0x1a
0x18f5…1948 at001b = ╱50╱P╱ // 0x1910 @0x1b
0x18f5…1948 at001c = ╱49╱I╱ // 0x1911 @0x1c
0x18f5…1948 at001d = ╱4c╱L╱ // 0x1912 @0x1d
0x18f5…1948 at001e = ╱31╱1╱ // 0x1913 @0x1e
0x18f5…1948 at001f = ╱eb╱;╱ // 0x1914 @0x1f
0x18f5…1948 at0020 = ╱43╱C╱ // 0x1915 @0x20
0x18f5…1948 at0021 = ╱45╱E╱ // 0x1916 @0x21
0x18f5…1948 at0022 = ╱4b╱K╱ // 0x1917 @0x22
0x18f5…1948 at0023 = ╱53╱S╱ // 0x1918 @0x23
0x18f5…1948 at0024 = ╱dc╱=╱ // 0x1919 @0x24
0x18f5…1948 at0025 = ╱31╱1╱ // 0x191a @0x25
0x18f5…1948 at0026 = ╱fe00008001╱ // 0x191b @0x26
0x18f5…1948 at002b = ╱eb╱;╱ // 0x1920 @0x2b
0x18f5…1948 at002c = ╱4d╱M╱ // 0x1921 @0x2c
0x18f5…1948 at002d = ╱41╱A╱ // 0x1922 @0x2d
0x18f5…1948 at002e = ╱4e╱N╱ // 0x1923 @0x2e
0x18f5…1948 at002f = ╱54╱T╱ // 0x1924 @0x2f
0x18f5…1948 at0030 = ╱33╱3╱ // 0x1925 @0x30
0x18f5…1948 at0031 = ╱dc╱=╱ // 0x1926 @0x31
0x18f5…1948 at0032 = ╱4d╱M╱ // 0x1927 @0x32
0x18f5…1948 at0033 = ╱41╱A╱ // 0x1928 @0x33
0x18f5…1948 at0034 = ╱4e╱N╱ // 0x1929 @0x34
0x18f5…1948 at0035 = ╱54╱T╱ // 0x192a @0x35
0x18f5…1948 at0036 = ╱32╱2╱ // 0x192b @0x36
0x18f5…1948 at0037 = ╱e7╱ DIV ╱ // 0x192c @0x37
0x18f5…1948 at0038 = ╱34╱4╱ // 0x192d @0x38
0x18f5…1948 at0039 = ╱fe00008003╱ // 0x192e @0x39
0x18f5…1948 at003e = ╱eb╱;╱ // 0x1933 @0x3e
0x18f5…1948 at003f = ╱4d╱M╱ // 0x1934 @0x3f
0x18f5…1948 at0040 = ╱41╱A╱ // 0x1935 @0x40
0x18f5…1948 at0041 = ╱4e╱N╱ // 0x1936 @0x41
0x18f5…1948 at0042 = ╱54╱T╱ // 0x1937 @0x42
0x18f5…1948 at0043 = ╱34╱4╱ // 0x1938 @0x43
0x18f5…1948 at0044 = ╱dc╱=╱ // 0x1939 @0x44
0x18f5…1948 at0045 = ╱4d╱M╱ // 0x193a @0x45
0x18f5…1948 at0046 = ╱41╱A╱ // 0x193b @0x46
0x18f5…1948 at0047 = ╱4e╱N╱ // 0x193c @0x47
0x18f5…1948 at0048 = ╱54╱T╱ // 0x193d @0x48
0x18f5…1948 at0049 = ╱32╱2╱ // 0x193e @0x49
0x18f5…1948 at004a = ╱e7╱ DIV ╱ // 0x193f @0x4a
0x18f5…1948 at004b = ╱33╱3╱ // 0x1940 @0x4b
0x18f5…1948 at004c = ╱32╱2╱ // 0x1941 @0x4c
0x18f5…1948 at004d = ╱fe00008006╱ // 0x1942 @0x4d
0x18f5…1948 at0052 = EOL // 0x1947 @0x52
0x18f5…1948 }
0x1948…194e a6a5 2220 REPEAT
0x1948…194e LineComalBin {
0x1948…194e ptr = 0xa6a5 // 0x1948 @0x0
0x1948…194e lno = 0x08ac // 0x194a @0x2
0x1948…194e at0004 = ╱97╱ REPEAT ╱ // 0x194c @0x4
0x1948…194e at0005 = EOL // 0x194d @0x5
0x1948…194e }
0x194e…1972 a6c9 2230 IF NØGL5=TAB4(PIL6) OR PIL1=1 THEN EXIT
0x194e…1972 LineComalBin {
0x194e…1972 ptr = 0xa6c9 // 0x194e @0x0
0x194e…1972 lno = 0x08b6 // 0x1950 @0x2
0x194e…1972 at0004 = ╱82╱ IF ╱ // 0x1952 @0x4
0x194e…1972 at0005 = ╱4e╱N╱ // 0x1953 @0x5
0x194e…1972 at0006 = ╱5c╱Ø╱ // 0x1954 @0x6
0x194e…1972 at0007 = ╱47╱G╱ // 0x1955 @0x7
0x194e…1972 at0008 = ╱4c╱L╱ // 0x1956 @0x8
0x194e…1972 at0009 = ╱35╱5╱ // 0x1957 @0x9
0x194e…1972 at000a = ╱dc╱=╱ // 0x1958 @0xa
0x194e…1972 at000b = ╱54╱T╱ // 0x1959 @0xb
0x194e…1972 at000c = ╱41╱A╱ // 0x195a @0xc
0x194e…1972 at000d = ╱42╱B╱ // 0x195b @0xd
0x194e…1972 at000e = ╱34╱4╱ // 0x195c @0xe
0x194e…1972 at000f = ╱ed╱(╱ // 0x195d @0xf
0x194e…1972 at0010 = ╱50╱P╱ // 0x195e @0x10
0x194e…1972 at0011 = ╱49╱I╱ // 0x195f @0x11
0x194e…1972 at0012 = ╱4c╱L╱ // 0x1960 @0x12
0x194e…1972 at0013 = ╱36╱6╱ // 0x1961 @0x13
0x194e…1972 at0014 = ╱ee╱)╱ // 0x1962 @0x14
0x194e…1972 at0015 = ╱db╱ OR ╱ // 0x1963 @0x15
0x194e…1972 at0016 = ╱50╱P╱ // 0x1964 @0x16
0x194e…1972 at0017 = ╱49╱I╱ // 0x1965 @0x17
0x194e…1972 at0018 = ╱4c╱L╱ // 0x1966 @0x18
0x194e…1972 at0019 = ╱31╱1╱ // 0x1967 @0x19
0x194e…1972 at001a = ╱dc╱=╱ // 0x1968 @0x1a
0x194e…1972 at001b = ╱31╱1╱ // 0x1969 @0x1b
0x194e…1972 at001c = ╱fe00008001╱ // 0x196a @0x1c
0x194e…1972 at0021 = ╱b6╱ THEN ╱ // 0x196f @0x21
0x194e…1972 at0022 = ╱99╱ EXIT ╱ // 0x1970 @0x22
0x194e…1972 at0023 = EOL // 0x1971 @0x23
0x194e…1972 }
0x1972…1990 a6e7 2240 PIL1=(PIL1+1) DIV 2
0x1972…1990 LineComalBin {
0x1972…1990 ptr = 0xa6e7 // 0x1972 @0x0
0x1972…1990 lno = 0x08c0 // 0x1974 @0x2
0x1972…1990 at0004 = ╱50╱P╱ // 0x1976 @0x4
0x1972…1990 at0005 = ╱49╱I╱ // 0x1977 @0x5
0x1972…1990 at0006 = ╱4c╱L╱ // 0x1978 @0x6
0x1972…1990 at0007 = ╱31╱1╱ // 0x1979 @0x7
0x1972…1990 at0008 = ╱dc╱=╱ // 0x197a @0x8
0x1972…1990 at0009 = ╱ed╱(╱ // 0x197b @0x9
0x1972…1990 at000a = ╱50╱P╱ // 0x197c @0xa
0x1972…1990 at000b = ╱49╱I╱ // 0x197d @0xb
0x1972…1990 at000c = ╱4c╱L╱ // 0x197e @0xc
0x1972…1990 at000d = ╱31╱1╱ // 0x197f @0xd
0x1972…1990 at000e = ╱e2╱+╱ // 0x1980 @0xe
0x1972…1990 at000f = ╱31╱1╱ // 0x1981 @0xf
0x1972…1990 at0010 = ╱fe00008001╱ // 0x1982 @0x10
0x1972…1990 at0015 = ╱ee╱)╱ // 0x1987 @0x15
0x1972…1990 at0016 = ╱e7╱ DIV ╱ // 0x1988 @0x16
0x1972…1990 at0017 = ╱32╱2╱ // 0x1989 @0x17
0x1972…1990 at0018 = ╱fe00008002╱ // 0x198a @0x18
0x1972…1990 at001d = EOL // 0x198f @0x1d
0x1972…1990 }
0x1990…19c6 a71d 2250 PIL6=PIL6+PIL1*(1-2*(NØGL5<TAB4(PIL6)))
0x1990…19c6 LineComalBin {
0x1990…19c6 ptr = 0xa71d // 0x1990 @0x0
0x1990…19c6 lno = 0x08ca // 0x1992 @0x2
0x1990…19c6 at0004 = ╱50╱P╱ // 0x1994 @0x4
0x1990…19c6 at0005 = ╱49╱I╱ // 0x1995 @0x5
0x1990…19c6 at0006 = ╱4c╱L╱ // 0x1996 @0x6
0x1990…19c6 at0007 = ╱36╱6╱ // 0x1997 @0x7
0x1990…19c6 at0008 = ╱dc╱=╱ // 0x1998 @0x8
0x1990…19c6 at0009 = ╱50╱P╱ // 0x1999 @0x9
0x1990…19c6 at000a = ╱49╱I╱ // 0x199a @0xa
0x1990…19c6 at000b = ╱4c╱L╱ // 0x199b @0xb
0x1990…19c6 at000c = ╱36╱6╱ // 0x199c @0xc
0x1990…19c6 at000d = ╱e2╱+╱ // 0x199d @0xd
0x1990…19c6 at000e = ╱50╱P╱ // 0x199e @0xe
0x1990…19c6 at000f = ╱49╱I╱ // 0x199f @0xf
0x1990…19c6 at0010 = ╱4c╱L╱ // 0x19a0 @0x10
0x1990…19c6 at0011 = ╱31╱1╱ // 0x19a1 @0x11
0x1990…19c6 at0012 = ╱e4╱*╱ // 0x19a2 @0x12
0x1990…19c6 at0013 = ╱ed╱(╱ // 0x19a3 @0x13
0x1990…19c6 at0014 = ╱31╱1╱ // 0x19a4 @0x14
0x1990…19c6 at0015 = ╱fe00008001╱ // 0x19a5 @0x15
0x1990…19c6 at001a = ╱e3╱-╱ // 0x19aa @0x1a
0x1990…19c6 at001b = ╱32╱2╱ // 0x19ab @0x1b
0x1990…19c6 at001c = ╱fe00008002╱ // 0x19ac @0x1c
0x1990…19c6 at0021 = ╱e4╱*╱ // 0x19b1 @0x21
0x1990…19c6 at0022 = ╱ed╱(╱ // 0x19b2 @0x22
0x1990…19c6 at0023 = ╱4e╱N╱ // 0x19b3 @0x23
0x1990…19c6 at0024 = ╱5c╱Ø╱ // 0x19b4 @0x24
0x1990…19c6 at0025 = ╱47╱G╱ // 0x19b5 @0x25
0x1990…19c6 at0026 = ╱4c╱L╱ // 0x19b6 @0x26
0x1990…19c6 at0027 = ╱35╱5╱ // 0x19b7 @0x27
0x1990…19c6 at0028 = ╱dd╱<╱ // 0x19b8 @0x28
0x1990…19c6 at0029 = ╱54╱T╱ // 0x19b9 @0x29
0x1990…19c6 at002a = ╱41╱A╱ // 0x19ba @0x2a
0x1990…19c6 at002b = ╱42╱B╱ // 0x19bb @0x2b
0x1990…19c6 at002c = ╱34╱4╱ // 0x19bc @0x2c
0x1990…19c6 at002d = ╱ed╱(╱ // 0x19bd @0x2d
0x1990…19c6 at002e = ╱50╱P╱ // 0x19be @0x2e
0x1990…19c6 at002f = ╱49╱I╱ // 0x19bf @0x2f
0x1990…19c6 at0030 = ╱4c╱L╱ // 0x19c0 @0x30
0x1990…19c6 at0031 = ╱36╱6╱ // 0x19c1 @0x31
0x1990…19c6 at0032 = ╱ee╱)╱ // 0x19c2 @0x32
0x1990…19c6 at0033 = ╱ee╱)╱ // 0x19c3 @0x33
0x1990…19c6 at0034 = ╱ee╱)╱ // 0x19c4 @0x34
0x1990…19c6 at0035 = EOL // 0x19c5 @0x35
0x1990…19c6 }
0x19c6…19e3 a73a 2260 IF PIL6<1 THEN PIL6=1
0x19c6…19e3 LineComalBin {
0x19c6…19e3 ptr = 0xa73a // 0x19c6 @0x0
0x19c6…19e3 lno = 0x08d4 // 0x19c8 @0x2
0x19c6…19e3 at0004 = ╱82╱ IF ╱ // 0x19ca @0x4
0x19c6…19e3 at0005 = ╱50╱P╱ // 0x19cb @0x5
0x19c6…19e3 at0006 = ╱49╱I╱ // 0x19cc @0x6
0x19c6…19e3 at0007 = ╱4c╱L╱ // 0x19cd @0x7
0x19c6…19e3 at0008 = ╱36╱6╱ // 0x19ce @0x8
0x19c6…19e3 at0009 = ╱dd╱<╱ // 0x19cf @0x9
0x19c6…19e3 at000a = ╱31╱1╱ // 0x19d0 @0xa
0x19c6…19e3 at000b = ╱fe00008001╱ // 0x19d1 @0xb
0x19c6…19e3 at0010 = ╱b6╱ THEN ╱ // 0x19d6 @0x10
0x19c6…19e3 at0011 = ╱50╱P╱ // 0x19d7 @0x11
0x19c6…19e3 at0012 = ╱49╱I╱ // 0x19d8 @0x12
0x19c6…19e3 at0013 = ╱4c╱L╱ // 0x19d9 @0x13
0x19c6…19e3 at0014 = ╱36╱6╱ // 0x19da @0x14
0x19c6…19e3 at0015 = ╱dc╱=╱ // 0x19db @0x15
0x19c6…19e3 at0016 = ╱31╱1╱ // 0x19dc @0x16
0x19c6…19e3 at0017 = ╱fe00008001╱ // 0x19dd @0x17
0x19c6…19e3 at001c = EOL // 0x19e2 @0x1c
0x19c6…19e3 }
0x19e3…19fe a755 2270 IF PIL6>MANT3 THEN PIL6=MANT3
0x19e3…19fe LineComalBin {
0x19e3…19fe ptr = 0xa755 // 0x19e3 @0x0
0x19e3…19fe lno = 0x08de // 0x19e5 @0x2
0x19e3…19fe at0004 = ╱82╱ IF ╱ // 0x19e7 @0x4
0x19e3…19fe at0005 = ╱50╱P╱ // 0x19e8 @0x5
0x19e3…19fe at0006 = ╱49╱I╱ // 0x19e9 @0x6
0x19e3…19fe at0007 = ╱4c╱L╱ // 0x19ea @0x7
0x19e3…19fe at0008 = ╱36╱6╱ // 0x19eb @0x8
0x19e3…19fe at0009 = ╱de╱>╱ // 0x19ec @0x9
0x19e3…19fe at000a = ╱4d╱M╱ // 0x19ed @0xa
0x19e3…19fe at000b = ╱41╱A╱ // 0x19ee @0xb
0x19e3…19fe at000c = ╱4e╱N╱ // 0x19ef @0xc
0x19e3…19fe at000d = ╱54╱T╱ // 0x19f0 @0xd
0x19e3…19fe at000e = ╱33╱3╱ // 0x19f1 @0xe
0x19e3…19fe at000f = ╱b6╱ THEN ╱ // 0x19f2 @0xf
0x19e3…19fe at0010 = ╱50╱P╱ // 0x19f3 @0x10
0x19e3…19fe at0011 = ╱49╱I╱ // 0x19f4 @0x11
0x19e3…19fe at0012 = ╱4c╱L╱ // 0x19f5 @0x12
0x19e3…19fe at0013 = ╱36╱6╱ // 0x19f6 @0x13
0x19e3…19fe at0014 = ╱dc╱=╱ // 0x19f7 @0x14
0x19e3…19fe at0015 = ╱4d╱M╱ // 0x19f8 @0x15
0x19e3…19fe at0016 = ╱41╱A╱ // 0x19f9 @0x16
0x19e3…19fe at0017 = ╱4e╱N╱ // 0x19fa @0x17
0x19e3…19fe at0018 = ╱54╱T╱ // 0x19fb @0x18
0x19e3…19fe at0019 = ╱33╱3╱ // 0x19fc @0x19
0x19e3…19fe at001a = EOL // 0x19fd @0x1a
0x19e3…19fe }
0x19fe…1a0f a766 2280 UNTIL PIL1=0
0x19fe…1a0f LineComalBin {
0x19fe…1a0f ptr = 0xa766 // 0x19fe @0x0
0x19fe…1a0f lno = 0x08e8 // 0x1a00 @0x2
0x19fe…1a0f at0004 = ╱98╱ UNTIL ╱ // 0x1a02 @0x4
0x19fe…1a0f at0005 = ╱50╱P╱ // 0x1a03 @0x5
0x19fe…1a0f at0006 = ╱49╱I╱ // 0x1a04 @0x6
0x19fe…1a0f at0007 = ╱4c╱L╱ // 0x1a05 @0x7
0x19fe…1a0f at0008 = ╱31╱1╱ // 0x1a06 @0x8
0x19fe…1a0f at0009 = ╱dc╱=╱ // 0x1a07 @0x9
0x19fe…1a0f at000a = ╱30╱0╱ // 0x1a08 @0xa
0x19fe…1a0f at000b = ╱fe00000000╱ // 0x1a09 @0xb
0x19fe…1a0f at0010 = EOL // 0x1a0e @0x10
0x19fe…1a0f }
0x1a0f…1a44 a79b 2290 IF TAB4(PIL6)>NØGL5 THEN PIL6=PIL6-1*(PIL6>1)
0x1a0f…1a44 LineComalBin {
0x1a0f…1a44 ptr = 0xa79b // 0x1a0f @0x0
0x1a0f…1a44 lno = 0x08f2 // 0x1a11 @0x2
0x1a0f…1a44 at0004 = ╱82╱ IF ╱ // 0x1a13 @0x4
0x1a0f…1a44 at0005 = ╱54╱T╱ // 0x1a14 @0x5
0x1a0f…1a44 at0006 = ╱41╱A╱ // 0x1a15 @0x6
0x1a0f…1a44 at0007 = ╱42╱B╱ // 0x1a16 @0x7
0x1a0f…1a44 at0008 = ╱34╱4╱ // 0x1a17 @0x8
0x1a0f…1a44 at0009 = ╱ed╱(╱ // 0x1a18 @0x9
0x1a0f…1a44 at000a = ╱50╱P╱ // 0x1a19 @0xa
0x1a0f…1a44 at000b = ╱49╱I╱ // 0x1a1a @0xb
0x1a0f…1a44 at000c = ╱4c╱L╱ // 0x1a1b @0xc
0x1a0f…1a44 at000d = ╱36╱6╱ // 0x1a1c @0xd
0x1a0f…1a44 at000e = ╱ee╱)╱ // 0x1a1d @0xe
0x1a0f…1a44 at000f = ╱de╱>╱ // 0x1a1e @0xf
0x1a0f…1a44 at0010 = ╱4e╱N╱ // 0x1a1f @0x10
0x1a0f…1a44 at0011 = ╱5c╱Ø╱ // 0x1a20 @0x11
0x1a0f…1a44 at0012 = ╱47╱G╱ // 0x1a21 @0x12
0x1a0f…1a44 at0013 = ╱4c╱L╱ // 0x1a22 @0x13
0x1a0f…1a44 at0014 = ╱35╱5╱ // 0x1a23 @0x14
0x1a0f…1a44 at0015 = ╱b6╱ THEN ╱ // 0x1a24 @0x15
0x1a0f…1a44 at0016 = ╱50╱P╱ // 0x1a25 @0x16
0x1a0f…1a44 at0017 = ╱49╱I╱ // 0x1a26 @0x17
0x1a0f…1a44 at0018 = ╱4c╱L╱ // 0x1a27 @0x18
0x1a0f…1a44 at0019 = ╱36╱6╱ // 0x1a28 @0x19
0x1a0f…1a44 at001a = ╱dc╱=╱ // 0x1a29 @0x1a
0x1a0f…1a44 at001b = ╱50╱P╱ // 0x1a2a @0x1b
0x1a0f…1a44 at001c = ╱49╱I╱ // 0x1a2b @0x1c
0x1a0f…1a44 at001d = ╱4c╱L╱ // 0x1a2c @0x1d
0x1a0f…1a44 at001e = ╱36╱6╱ // 0x1a2d @0x1e
0x1a0f…1a44 at001f = ╱e3╱-╱ // 0x1a2e @0x1f
0x1a0f…1a44 at0020 = ╱31╱1╱ // 0x1a2f @0x20
0x1a0f…1a44 at0021 = ╱fe00008001╱ // 0x1a30 @0x21
0x1a0f…1a44 at0026 = ╱e4╱*╱ // 0x1a35 @0x26
0x1a0f…1a44 at0027 = ╱ed╱(╱ // 0x1a36 @0x27
0x1a0f…1a44 at0028 = ╱50╱P╱ // 0x1a37 @0x28
0x1a0f…1a44 at0029 = ╱49╱I╱ // 0x1a38 @0x29
0x1a0f…1a44 at002a = ╱4c╱L╱ // 0x1a39 @0x2a
0x1a0f…1a44 at002b = ╱36╱6╱ // 0x1a3a @0x2b
0x1a0f…1a44 at002c = ╱de╱>╱ // 0x1a3b @0x2c
0x1a0f…1a44 at002d = ╱31╱1╱ // 0x1a3c @0x2d
0x1a0f…1a44 at002e = ╱fe00008001╱ // 0x1a3d @0x2e
0x1a0f…1a44 at0033 = ╱ee╱)╱ // 0x1a42 @0x33
0x1a0f…1a44 at0034 = EOL // 0x1a43 @0x34
0x1a0f…1a44 }
0x1a44…1a58 a7af 2300 PIL6=MANT4+PIL6
0x1a44…1a58 LineComalBin {
0x1a44…1a58 ptr = 0xa7af // 0x1a44 @0x0
0x1a44…1a58 lno = 0x08fc // 0x1a46 @0x2
0x1a44…1a58 at0004 = ╱50╱P╱ // 0x1a48 @0x4
0x1a44…1a58 at0005 = ╱49╱I╱ // 0x1a49 @0x5
0x1a44…1a58 at0006 = ╱4c╱L╱ // 0x1a4a @0x6
0x1a44…1a58 at0007 = ╱36╱6╱ // 0x1a4b @0x7
0x1a44…1a58 at0008 = ╱dc╱=╱ // 0x1a4c @0x8
0x1a44…1a58 at0009 = ╱4d╱M╱ // 0x1a4d @0x9
0x1a44…1a58 at000a = ╱41╱A╱ // 0x1a4e @0xa
0x1a44…1a58 at000b = ╱4e╱N╱ // 0x1a4f @0xb
0x1a44…1a58 at000c = ╱54╱T╱ // 0x1a50 @0xc
0x1a44…1a58 at000d = ╱34╱4╱ // 0x1a51 @0xd
0x1a44…1a58 at000e = ╱e2╱+╱ // 0x1a52 @0xe
0x1a44…1a58 at000f = ╱50╱P╱ // 0x1a53 @0xf
0x1a44…1a58 at0010 = ╱49╱I╱ // 0x1a54 @0x10
0x1a44…1a58 at0011 = ╱4c╱L╱ // 0x1a55 @0x11
0x1a44…1a58 at0012 = ╱36╱6╱ // 0x1a56 @0x12
0x1a44…1a58 at0013 = EOL // 0x1a57 @0x13
0x1a44…1a58 }
0x1a58…1aee a845 2310 GET L8$,PIL6:Q(1,1),Q(1,2),Q(2,1),Q(2,2),Q(3,1),Q(3,2),Q(4,1),Q(4,2)
0x1a58…1aee LineComalBin {
0x1a58…1aee ptr = 0xa845 // 0x1a58 @0x0
0x1a58…1aee lno = 0x0906 // 0x1a5a @0x2
0x1a58…1aee at0004 = ╱a9╱ GET ╱ // 0x1a5c @0x4
0x1a58…1aee at0005 = ╱4c╱L╱ // 0x1a5d @0x5
0x1a58…1aee at0006 = ╱38╱8╱ // 0x1a5e @0x6
0x1a58…1aee at0007 = ╱ef╱$╱ // 0x1a5f @0x7
0x1a58…1aee at0008 = ╱ec╱,╱ // 0x1a60 @0x8
0x1a58…1aee at0009 = ╱50╱P╱ // 0x1a61 @0x9
0x1a58…1aee at000a = ╱49╱I╱ // 0x1a62 @0xa
0x1a58…1aee at000b = ╱4c╱L╱ // 0x1a63 @0xb
0x1a58…1aee at000c = ╱36╱6╱ // 0x1a64 @0xc
0x1a58…1aee at000d = ╱f0╱:╱ // 0x1a65 @0xd
0x1a58…1aee at000e = ╱51╱Q╱ // 0x1a66 @0xe
0x1a58…1aee at000f = ╱ed╱(╱ // 0x1a67 @0xf
0x1a58…1aee at0010 = ╱31╱1╱ // 0x1a68 @0x10
0x1a58…1aee at0011 = ╱fe00008001╱ // 0x1a69 @0x11
0x1a58…1aee at0016 = ╱ec╱,╱ // 0x1a6e @0x16
0x1a58…1aee at0017 = ╱31╱1╱ // 0x1a6f @0x17
0x1a58…1aee at0018 = ╱fe00008001╱ // 0x1a70 @0x18
0x1a58…1aee at001d = ╱ee╱)╱ // 0x1a75 @0x1d
0x1a58…1aee at001e = ╱ec╱,╱ // 0x1a76 @0x1e
0x1a58…1aee at001f = ╱51╱Q╱ // 0x1a77 @0x1f
0x1a58…1aee at0020 = ╱ed╱(╱ // 0x1a78 @0x20
0x1a58…1aee at0021 = ╱31╱1╱ // 0x1a79 @0x21
0x1a58…1aee at0022 = ╱fe00008001╱ // 0x1a7a @0x22
0x1a58…1aee at0027 = ╱ec╱,╱ // 0x1a7f @0x27
0x1a58…1aee at0028 = ╱32╱2╱ // 0x1a80 @0x28
0x1a58…1aee at0029 = ╱fe00008002╱ // 0x1a81 @0x29
0x1a58…1aee at002e = ╱ee╱)╱ // 0x1a86 @0x2e
0x1a58…1aee at002f = ╱ec╱,╱ // 0x1a87 @0x2f
0x1a58…1aee at0030 = ╱51╱Q╱ // 0x1a88 @0x30
0x1a58…1aee at0031 = ╱ed╱(╱ // 0x1a89 @0x31
0x1a58…1aee at0032 = ╱32╱2╱ // 0x1a8a @0x32
0x1a58…1aee at0033 = ╱fe00008002╱ // 0x1a8b @0x33
0x1a58…1aee at0038 = ╱ec╱,╱ // 0x1a90 @0x38
0x1a58…1aee at0039 = ╱31╱1╱ // 0x1a91 @0x39
0x1a58…1aee at003a = ╱fe00008001╱ // 0x1a92 @0x3a
0x1a58…1aee at003f = ╱ee╱)╱ // 0x1a97 @0x3f
0x1a58…1aee at0040 = ╱ec╱,╱ // 0x1a98 @0x40
0x1a58…1aee at0041 = ╱51╱Q╱ // 0x1a99 @0x41
0x1a58…1aee at0042 = ╱ed╱(╱ // 0x1a9a @0x42
0x1a58…1aee at0043 = ╱32╱2╱ // 0x1a9b @0x43
0x1a58…1aee at0044 = ╱fe00008002╱ // 0x1a9c @0x44
0x1a58…1aee at0049 = ╱ec╱,╱ // 0x1aa1 @0x49
0x1a58…1aee at004a = ╱32╱2╱ // 0x1aa2 @0x4a
0x1a58…1aee at004b = ╱fe00008002╱ // 0x1aa3 @0x4b
0x1a58…1aee at0050 = ╱ee╱)╱ // 0x1aa8 @0x50
0x1a58…1aee at0051 = ╱ec╱,╱ // 0x1aa9 @0x51
0x1a58…1aee at0052 = ╱51╱Q╱ // 0x1aaa @0x52
0x1a58…1aee at0053 = ╱ed╱(╱ // 0x1aab @0x53
0x1a58…1aee at0054 = ╱33╱3╱ // 0x1aac @0x54
0x1a58…1aee at0055 = ╱fe0000c002╱ // 0x1aad @0x55
0x1a58…1aee at005a = ╱ec╱,╱ // 0x1ab2 @0x5a
0x1a58…1aee at005b = ╱31╱1╱ // 0x1ab3 @0x5b
0x1a58…1aee at005c = ╱fe00008001╱ // 0x1ab4 @0x5c
0x1a58…1aee at0061 = ╱ee╱)╱ // 0x1ab9 @0x61
0x1a58…1aee at0062 = ╱ec╱,╱ // 0x1aba @0x62
0x1a58…1aee at0063 = ╱51╱Q╱ // 0x1abb @0x63
0x1a58…1aee at0064 = ╱ed╱(╱ // 0x1abc @0x64
0x1a58…1aee at0065 = ╱33╱3╱ // 0x1abd @0x65
0x1a58…1aee at0066 = ╱fe0000c002╱ // 0x1abe @0x66
0x1a58…1aee at006b = ╱ec╱,╱ // 0x1ac3 @0x6b
0x1a58…1aee at006c = ╱32╱2╱ // 0x1ac4 @0x6c
0x1a58…1aee at006d = ╱fe00008002╱ // 0x1ac5 @0x6d
0x1a58…1aee at0072 = ╱ee╱)╱ // 0x1aca @0x72
0x1a58…1aee at0073 = ╱ec╱,╱ // 0x1acb @0x73
0x1a58…1aee at0074 = ╱51╱Q╱ // 0x1acc @0x74
0x1a58…1aee at0075 = ╱ed╱(╱ // 0x1acd @0x75
0x1a58…1aee at0076 = ╱34╱4╱ // 0x1ace @0x76
0x1a58…1aee at0077 = ╱fe00008003╱ // 0x1acf @0x77
0x1a58…1aee at007c = ╱ec╱,╱ // 0x1ad4 @0x7c
0x1a58…1aee at007d = ╱31╱1╱ // 0x1ad5 @0x7d
0x1a58…1aee at007e = ╱fe00008001╱ // 0x1ad6 @0x7e
0x1a58…1aee at0083 = ╱ee╱)╱ // 0x1adb @0x83
0x1a58…1aee at0084 = ╱ec╱,╱ // 0x1adc @0x84
0x1a58…1aee at0085 = ╱51╱Q╱ // 0x1add @0x85
0x1a58…1aee at0086 = ╱ed╱(╱ // 0x1ade @0x86
0x1a58…1aee at0087 = ╱34╱4╱ // 0x1adf @0x87
0x1a58…1aee at0088 = ╱fe00008003╱ // 0x1ae0 @0x88
0x1a58…1aee at008d = ╱ec╱,╱ // 0x1ae5 @0x8d
0x1a58…1aee at008e = ╱32╱2╱ // 0x1ae6 @0x8e
0x1a58…1aee at008f = ╱fe00008002╱ // 0x1ae7 @0x8f
0x1a58…1aee at0094 = ╱ee╱)╱ // 0x1aec @0x94
0x1a58…1aee at0095 = EOL // 0x1aed @0x95
0x1a58…1aee }
0x1aee…1b0b a862 2320 EXEC FEJL(2,1,L8$)
0x1aee…1b0b LineComalBin {
0x1aee…1b0b ptr = 0xa862 // 0x1aee @0x0
0x1aee…1b0b lno = 0x0910 // 0x1af0 @0x2
0x1aee…1b0b at0004 = ╱9d╱ EXEC ╱ // 0x1af2 @0x4
0x1aee…1b0b at0005 = ╱46╱F╱ // 0x1af3 @0x5
0x1aee…1b0b at0006 = ╱45╱E╱ // 0x1af4 @0x6
0x1aee…1b0b at0007 = ╱4a╱J╱ // 0x1af5 @0x7
0x1aee…1b0b at0008 = ╱4c╱L╱ // 0x1af6 @0x8
0x1aee…1b0b at0009 = ╱ed╱(╱ // 0x1af7 @0x9
0x1aee…1b0b at000a = ╱32╱2╱ // 0x1af8 @0xa
0x1aee…1b0b at000b = ╱fe00008002╱ // 0x1af9 @0xb
0x1aee…1b0b at0010 = ╱ec╱,╱ // 0x1afe @0x10
0x1aee…1b0b at0011 = ╱31╱1╱ // 0x1aff @0x11
0x1aee…1b0b at0012 = ╱fe00008001╱ // 0x1b00 @0x12
0x1aee…1b0b at0017 = ╱ec╱,╱ // 0x1b05 @0x17
0x1aee…1b0b at0018 = ╱4c╱L╱ // 0x1b06 @0x18
0x1aee…1b0b at0019 = ╱38╱8╱ // 0x1b07 @0x19
0x1aee…1b0b at001a = ╱ef╱$╱ // 0x1b08 @0x1a
0x1aee…1b0b at001b = ╱ee╱)╱ // 0x1b09 @0x1b
0x1aee…1b0b at001c = EOL // 0x1b0a @0x1c
0x1aee…1b0b }
0x1b0b…1b23 a87a 2330 FOR PIL6=1 TO 4
0x1b0b…1b23 LineComalBin {
0x1b0b…1b23 ptr = 0xa87a // 0x1b0b @0x0
0x1b0b…1b23 lno = 0x091a // 0x1b0d @0x2
0x1b0b…1b23 at0004 = ╱83╱ FOR ╱ // 0x1b0f @0x4
0x1b0b…1b23 at0005 = ╱50╱P╱ // 0x1b10 @0x5
0x1b0b…1b23 at0006 = ╱49╱I╱ // 0x1b11 @0x6
0x1b0b…1b23 at0007 = ╱4c╱L╱ // 0x1b12 @0x7
0x1b0b…1b23 at0008 = ╱36╱6╱ // 0x1b13 @0x8
0x1b0b…1b23 at0009 = ╱dc╱=╱ // 0x1b14 @0x9
0x1b0b…1b23 at000a = ╱31╱1╱ // 0x1b15 @0xa
0x1b0b…1b23 at000b = ╱fe00008001╱ // 0x1b16 @0xb
0x1b0b…1b23 at0010 = ╱b7╱ TO ╱ // 0x1b1b @0x10
0x1b0b…1b23 at0011 = ╱34╱4╱ // 0x1b1c @0x11
0x1b0b…1b23 at0012 = ╱fe00008003╱ // 0x1b1d @0x12
0x1b0b…1b23 at0017 = EOL // 0x1b22 @0x17
0x1b0b…1b23 }
0x1b23…1b3f a896 2340 IF NØGL5=Q(PIL6,1) THEN EXIT
0x1b23…1b3f LineComalBin {
0x1b23…1b3f ptr = 0xa896 // 0x1b23 @0x0
0x1b23…1b3f lno = 0x0924 // 0x1b25 @0x2
0x1b23…1b3f at0004 = ╱82╱ IF ╱ // 0x1b27 @0x4
0x1b23…1b3f at0005 = ╱4e╱N╱ // 0x1b28 @0x5
0x1b23…1b3f at0006 = ╱5c╱Ø╱ // 0x1b29 @0x6
0x1b23…1b3f at0007 = ╱47╱G╱ // 0x1b2a @0x7
0x1b23…1b3f at0008 = ╱4c╱L╱ // 0x1b2b @0x8
0x1b23…1b3f at0009 = ╱35╱5╱ // 0x1b2c @0x9
0x1b23…1b3f at000a = ╱dc╱=╱ // 0x1b2d @0xa
0x1b23…1b3f at000b = ╱51╱Q╱ // 0x1b2e @0xb
0x1b23…1b3f at000c = ╱ed╱(╱ // 0x1b2f @0xc
0x1b23…1b3f at000d = ╱50╱P╱ // 0x1b30 @0xd
0x1b23…1b3f at000e = ╱49╱I╱ // 0x1b31 @0xe
0x1b23…1b3f at000f = ╱4c╱L╱ // 0x1b32 @0xf
0x1b23…1b3f at0010 = ╱36╱6╱ // 0x1b33 @0x10
0x1b23…1b3f at0011 = ╱ec╱,╱ // 0x1b34 @0x11
0x1b23…1b3f at0012 = ╱31╱1╱ // 0x1b35 @0x12
0x1b23…1b3f at0013 = ╱fe00008001╱ // 0x1b36 @0x13
0x1b23…1b3f at0018 = ╱ee╱)╱ // 0x1b3b @0x18
0x1b23…1b3f at0019 = ╱b6╱ THEN ╱ // 0x1b3c @0x19
0x1b23…1b3f at001a = ╱99╱ EXIT ╱ // 0x1b3d @0x1a
0x1b23…1b3f at001b = EOL // 0x1b3e @0x1b
0x1b23…1b3f }
0x1b3f…1b49 a8a0 2350 NEXT PIL6
0x1b3f…1b49 LineComalBin {
0x1b3f…1b49 ptr = 0xa8a0 // 0x1b3f @0x0
0x1b3f…1b49 lno = 0x092e // 0x1b41 @0x2
0x1b3f…1b49 at0004 = ╱84╱ NEXT ╱ // 0x1b43 @0x4
0x1b3f…1b49 at0005 = ╱50╱P╱ // 0x1b44 @0x5
0x1b3f…1b49 at0006 = ╱49╱I╱ // 0x1b45 @0x6
0x1b3f…1b49 at0007 = ╱4c╱L╱ // 0x1b46 @0x7
0x1b3f…1b49 at0008 = ╱36╱6╱ // 0x1b47 @0x8
0x1b3f…1b49 at0009 = EOL // 0x1b48 @0x9
0x1b3f…1b49 }
0x1b49…1b66 a8bd 2360 IF PIL6<>5 THEN CEKS=0
0x1b49…1b66 LineComalBin {
0x1b49…1b66 ptr = 0xa8bd // 0x1b49 @0x0
0x1b49…1b66 lno = 0x0938 // 0x1b4b @0x2
0x1b49…1b66 at0004 = ╱82╱ IF ╱ // 0x1b4d @0x4
0x1b49…1b66 at0005 = ╱50╱P╱ // 0x1b4e @0x5
0x1b49…1b66 at0006 = ╱49╱I╱ // 0x1b4f @0x6
0x1b49…1b66 at0007 = ╱4c╱L╱ // 0x1b50 @0x7
0x1b49…1b66 at0008 = ╱36╱6╱ // 0x1b51 @0x8
0x1b49…1b66 at0009 = ╱e1╱<>╱ // 0x1b52 @0x9
0x1b49…1b66 at000a = ╱35╱5╱ // 0x1b53 @0xa
0x1b49…1b66 at000b = ╱fe0000a003╱ // 0x1b54 @0xb
0x1b49…1b66 at0010 = ╱b6╱ THEN ╱ // 0x1b59 @0x10
0x1b49…1b66 at0011 = ╱43╱C╱ // 0x1b5a @0x11
0x1b49…1b66 at0012 = ╱45╱E╱ // 0x1b5b @0x12
0x1b49…1b66 at0013 = ╱4b╱K╱ // 0x1b5c @0x13
0x1b49…1b66 at0014 = ╱53╱S╱ // 0x1b5d @0x14
0x1b49…1b66 at0015 = ╱dc╱=╱ // 0x1b5e @0x15
0x1b49…1b66 at0016 = ╱30╱0╱ // 0x1b5f @0x16
0x1b49…1b66 at0017 = ╱fe00000000╱ // 0x1b60 @0x17
0x1b49…1b66 at001c = EOL // 0x1b65 @0x1c
0x1b49…1b66 }
0x1b66…1b6c a8c3 2370 ENDPROC
0x1b66…1b6c LineComalBin {
0x1b66…1b6c ptr = 0xa8c3 // 0x1b66 @0x0
0x1b66…1b6c lno = 0x0942 // 0x1b68 @0x2
0x1b66…1b6c at0004 = ╱9f╱ ENDPROC ╱ // 0x1b6a @0x4
0x1b66…1b6c at0005 = EOL // 0x1b6b @0x5
0x1b66…1b6c }
0x1b6c…1b85 a8dc 2380 PROC INDTAB1(Z,MANT5,L7)
0x1b6c…1b85 LineComalBin {
0x1b6c…1b85 ptr = 0xa8dc // 0x1b6c @0x0
0x1b6c…1b85 lno = 0x094c // 0x1b6e @0x2
0x1b6c…1b85 at0004 = ╱9e╱ PROC ╱ // 0x1b70 @0x4
0x1b6c…1b85 at0005 = ╱49╱I╱ // 0x1b71 @0x5
0x1b6c…1b85 at0006 = ╱4e╱N╱ // 0x1b72 @0x6
0x1b6c…1b85 at0007 = ╱44╱D╱ // 0x1b73 @0x7
0x1b6c…1b85 at0008 = ╱54╱T╱ // 0x1b74 @0x8
0x1b6c…1b85 at0009 = ╱41╱A╱ // 0x1b75 @0x9
0x1b6c…1b85 at000a = ╱42╱B╱ // 0x1b76 @0xa
0x1b6c…1b85 at000b = ╱31╱1╱ // 0x1b77 @0xb
0x1b6c…1b85 at000c = ╱ed╱(╱ // 0x1b78 @0xc
0x1b6c…1b85 at000d = ╱5a╱Z╱ // 0x1b79 @0xd
0x1b6c…1b85 at000e = ╱ec╱,╱ // 0x1b7a @0xe
0x1b6c…1b85 at000f = ╱4d╱M╱ // 0x1b7b @0xf
0x1b6c…1b85 at0010 = ╱41╱A╱ // 0x1b7c @0x10
0x1b6c…1b85 at0011 = ╱4e╱N╱ // 0x1b7d @0x11
0x1b6c…1b85 at0012 = ╱54╱T╱ // 0x1b7e @0x12
0x1b6c…1b85 at0013 = ╱35╱5╱ // 0x1b7f @0x13
0x1b6c…1b85 at0014 = ╱ec╱,╱ // 0x1b80 @0x14
0x1b6c…1b85 at0015 = ╱4c╱L╱ // 0x1b81 @0x15
0x1b6c…1b85 at0016 = ╱37╱7╱ // 0x1b82 @0x16
0x1b6c…1b85 at0017 = ╱ee╱)╱ // 0x1b83 @0x17
0x1b6c…1b85 at0018 = EOL // 0x1b84 @0x18
0x1b6c…1b85 }
0x1b85…1b9c a8f3 2390 PIL1=MANT5 DIV 32
0x1b85…1b9c LineComalBin {
0x1b85…1b9c ptr = 0xa8f3 // 0x1b85 @0x0
0x1b85…1b9c lno = 0x0956 // 0x1b87 @0x2
0x1b85…1b9c at0004 = ╱50╱P╱ // 0x1b89 @0x4
0x1b85…1b9c at0005 = ╱49╱I╱ // 0x1b8a @0x5
0x1b85…1b9c at0006 = ╱4c╱L╱ // 0x1b8b @0x6
0x1b85…1b9c at0007 = ╱31╱1╱ // 0x1b8c @0x7
0x1b85…1b9c at0008 = ╱dc╱=╱ // 0x1b8d @0x8
0x1b85…1b9c at0009 = ╱4d╱M╱ // 0x1b8e @0x9
0x1b85…1b9c at000a = ╱41╱A╱ // 0x1b8f @0xa
0x1b85…1b9c at000b = ╱4e╱N╱ // 0x1b90 @0xb
0x1b85…1b9c at000c = ╱54╱T╱ // 0x1b91 @0xc
0x1b85…1b9c at000d = ╱35╱5╱ // 0x1b92 @0xd
0x1b85…1b9c at000e = ╱e7╱ DIV ╱ // 0x1b93 @0xe
0x1b85…1b9c at000f = ╱33╱3╱ // 0x1b94 @0xf
0x1b85…1b9c at0010 = ╱32╱2╱ // 0x1b95 @0x10
0x1b85…1b9c at0011 = ╱fe00008006╱ // 0x1b96 @0x11
0x1b85…1b9c at0016 = EOL // 0x1b9b @0x16
0x1b85…1b9c }
0x1b9c…1baf a906 2400 FOR I=1 TO PIL1
0x1b9c…1baf LineComalBin {
0x1b9c…1baf ptr = 0xa906 // 0x1b9c @0x0
0x1b9c…1baf lno = 0x0960 // 0x1b9e @0x2
0x1b9c…1baf at0004 = ╱83╱ FOR ╱ // 0x1ba0 @0x4
0x1b9c…1baf at0005 = ╱49╱I╱ // 0x1ba1 @0x5
0x1b9c…1baf at0006 = ╱dc╱=╱ // 0x1ba2 @0x6
0x1b9c…1baf at0007 = ╱31╱1╱ // 0x1ba3 @0x7
0x1b9c…1baf at0008 = ╱fe00008001╱ // 0x1ba4 @0x8
0x1b9c…1baf at000d = ╱b7╱ TO ╱ // 0x1ba9 @0xd
0x1b9c…1baf at000e = ╱50╱P╱ // 0x1baa @0xe
0x1b9c…1baf at000f = ╱49╱I╱ // 0x1bab @0xf
0x1b9c…1baf at0010 = ╱4c╱L╱ // 0x1bac @0x10
0x1b9c…1baf at0011 = ╱31╱1╱ // 0x1bad @0x11
0x1b9c…1baf at0012 = EOL // 0x1bae @0x12
0x1b9c…1baf }
0x1baf…1bce a925 2410 H=(I-1)*8+1
0x1baf…1bce LineComalBin {
0x1baf…1bce ptr = 0xa925 // 0x1baf @0x0
0x1baf…1bce lno = 0x096a // 0x1bb1 @0x2
0x1baf…1bce at0004 = ╱48╱H╱ // 0x1bb3 @0x4
0x1baf…1bce at0005 = ╱dc╱=╱ // 0x1bb4 @0x5
0x1baf…1bce at0006 = ╱ed╱(╱ // 0x1bb5 @0x6
0x1baf…1bce at0007 = ╱49╱I╱ // 0x1bb6 @0x7
0x1baf…1bce at0008 = ╱e3╱-╱ // 0x1bb7 @0x8
0x1baf…1bce at0009 = ╱31╱1╱ // 0x1bb8 @0x9
0x1baf…1bce at000a = ╱fe00008001╱ // 0x1bb9 @0xa
0x1baf…1bce at000f = ╱ee╱)╱ // 0x1bbe @0xf
0x1baf…1bce at0010 = ╱e4╱*╱ // 0x1bbf @0x10
0x1baf…1bce at0011 = ╱38╱8╱ // 0x1bc0 @0x11
0x1baf…1bce at0012 = ╱fe00008004╱ // 0x1bc1 @0x12
0x1baf…1bce at0017 = ╱e2╱+╱ // 0x1bc6 @0x17
0x1baf…1bce at0018 = ╱31╱1╱ // 0x1bc7 @0x18
0x1baf…1bce at0019 = ╱fe00008001╱ // 0x1bc8 @0x19
0x1baf…1bce at001e = EOL // 0x1bcd @0x1e
0x1baf…1bce }
0x1bce…1c32 a989 2420 GET L7$,I:Z(H),Z(H+1),Z(H+2),Z(H+3),Z(H+4),Z(H+5),Z(H+6),Z(H+7)
0x1bce…1c32 LineComalBin {
0x1bce…1c32 ptr = 0xa989 // 0x1bce @0x0
0x1bce…1c32 lno = 0x0974 // 0x1bd0 @0x2
0x1bce…1c32 at0004 = ╱a9╱ GET ╱ // 0x1bd2 @0x4
0x1bce…1c32 at0005 = ╱4c╱L╱ // 0x1bd3 @0x5
0x1bce…1c32 at0006 = ╱37╱7╱ // 0x1bd4 @0x6
0x1bce…1c32 at0007 = ╱ef╱$╱ // 0x1bd5 @0x7
0x1bce…1c32 at0008 = ╱ec╱,╱ // 0x1bd6 @0x8
0x1bce…1c32 at0009 = ╱49╱I╱ // 0x1bd7 @0x9
0x1bce…1c32 at000a = ╱f0╱:╱ // 0x1bd8 @0xa
0x1bce…1c32 at000b = ╱5a╱Z╱ // 0x1bd9 @0xb
0x1bce…1c32 at000c = ╱ed╱(╱ // 0x1bda @0xc
0x1bce…1c32 at000d = ╱48╱H╱ // 0x1bdb @0xd
0x1bce…1c32 at000e = ╱ee╱)╱ // 0x1bdc @0xe
0x1bce…1c32 at000f = ╱ec╱,╱ // 0x1bdd @0xf
0x1bce…1c32 at0010 = ╱5a╱Z╱ // 0x1bde @0x10
0x1bce…1c32 at0011 = ╱ed╱(╱ // 0x1bdf @0x11
0x1bce…1c32 at0012 = ╱48╱H╱ // 0x1be0 @0x12
0x1bce…1c32 at0013 = ╱e2╱+╱ // 0x1be1 @0x13
0x1bce…1c32 at0014 = ╱31╱1╱ // 0x1be2 @0x14
0x1bce…1c32 at0015 = ╱fe00008001╱ // 0x1be3 @0x15
0x1bce…1c32 at001a = ╱ee╱)╱ // 0x1be8 @0x1a
0x1bce…1c32 at001b = ╱ec╱,╱ // 0x1be9 @0x1b
0x1bce…1c32 at001c = ╱5a╱Z╱ // 0x1bea @0x1c
0x1bce…1c32 at001d = ╱ed╱(╱ // 0x1beb @0x1d
0x1bce…1c32 at001e = ╱48╱H╱ // 0x1bec @0x1e
0x1bce…1c32 at001f = ╱e2╱+╱ // 0x1bed @0x1f
0x1bce…1c32 at0020 = ╱32╱2╱ // 0x1bee @0x20
0x1bce…1c32 at0021 = ╱fe00008002╱ // 0x1bef @0x21
0x1bce…1c32 at0026 = ╱ee╱)╱ // 0x1bf4 @0x26
0x1bce…1c32 at0027 = ╱ec╱,╱ // 0x1bf5 @0x27
0x1bce…1c32 at0028 = ╱5a╱Z╱ // 0x1bf6 @0x28
0x1bce…1c32 at0029 = ╱ed╱(╱ // 0x1bf7 @0x29
0x1bce…1c32 at002a = ╱48╱H╱ // 0x1bf8 @0x2a
0x1bce…1c32 at002b = ╱e2╱+╱ // 0x1bf9 @0x2b
0x1bce…1c32 at002c = ╱33╱3╱ // 0x1bfa @0x2c
0x1bce…1c32 at002d = ╱fe0000c002╱ // 0x1bfb @0x2d
0x1bce…1c32 at0032 = ╱ee╱)╱ // 0x1c00 @0x32
0x1bce…1c32 at0033 = ╱ec╱,╱ // 0x1c01 @0x33
0x1bce…1c32 at0034 = ╱5a╱Z╱ // 0x1c02 @0x34
0x1bce…1c32 at0035 = ╱ed╱(╱ // 0x1c03 @0x35
0x1bce…1c32 at0036 = ╱48╱H╱ // 0x1c04 @0x36
0x1bce…1c32 at0037 = ╱e2╱+╱ // 0x1c05 @0x37
0x1bce…1c32 at0038 = ╱34╱4╱ // 0x1c06 @0x38
0x1bce…1c32 at0039 = ╱fe00008003╱ // 0x1c07 @0x39
0x1bce…1c32 at003e = ╱ee╱)╱ // 0x1c0c @0x3e
0x1bce…1c32 at003f = ╱ec╱,╱ // 0x1c0d @0x3f
0x1bce…1c32 at0040 = ╱5a╱Z╱ // 0x1c0e @0x40
0x1bce…1c32 at0041 = ╱ed╱(╱ // 0x1c0f @0x41
0x1bce…1c32 at0042 = ╱48╱H╱ // 0x1c10 @0x42
0x1bce…1c32 at0043 = ╱e2╱+╱ // 0x1c11 @0x43
0x1bce…1c32 at0044 = ╱35╱5╱ // 0x1c12 @0x44
0x1bce…1c32 at0045 = ╱fe0000a003╱ // 0x1c13 @0x45
0x1bce…1c32 at004a = ╱ee╱)╱ // 0x1c18 @0x4a
0x1bce…1c32 at004b = ╱ec╱,╱ // 0x1c19 @0x4b
0x1bce…1c32 at004c = ╱5a╱Z╱ // 0x1c1a @0x4c
0x1bce…1c32 at004d = ╱ed╱(╱ // 0x1c1b @0x4d
0x1bce…1c32 at004e = ╱48╱H╱ // 0x1c1c @0x4e
0x1bce…1c32 at004f = ╱e2╱+╱ // 0x1c1d @0x4f
0x1bce…1c32 at0050 = ╱36╱6╱ // 0x1c1e @0x50
0x1bce…1c32 at0051 = ╱fe0000c003╱ // 0x1c1f @0x51
0x1bce…1c32 at0056 = ╱ee╱)╱ // 0x1c24 @0x56
0x1bce…1c32 at0057 = ╱ec╱,╱ // 0x1c25 @0x57
0x1bce…1c32 at0058 = ╱5a╱Z╱ // 0x1c26 @0x58
0x1bce…1c32 at0059 = ╱ed╱(╱ // 0x1c27 @0x59
0x1bce…1c32 at005a = ╱48╱H╱ // 0x1c28 @0x5a
0x1bce…1c32 at005b = ╱e2╱+╱ // 0x1c29 @0x5b
0x1bce…1c32 at005c = ╱37╱7╱ // 0x1c2a @0x5c
0x1bce…1c32 at005d = ╱fe0000e003╱ // 0x1c2b @0x5d
0x1bce…1c32 at0062 = ╱ee╱)╱ // 0x1c30 @0x62
0x1bce…1c32 at0063 = EOL // 0x1c31 @0x63
0x1bce…1c32 }
0x1c32…1c4f a9a6 2430 EXEC FEJL(3,1,L7$)
0x1c32…1c4f LineComalBin {
0x1c32…1c4f ptr = 0xa9a6 // 0x1c32 @0x0
0x1c32…1c4f lno = 0x097e // 0x1c34 @0x2
0x1c32…1c4f at0004 = ╱9d╱ EXEC ╱ // 0x1c36 @0x4
0x1c32…1c4f at0005 = ╱46╱F╱ // 0x1c37 @0x5
0x1c32…1c4f at0006 = ╱45╱E╱ // 0x1c38 @0x6
0x1c32…1c4f at0007 = ╱4a╱J╱ // 0x1c39 @0x7
0x1c32…1c4f at0008 = ╱4c╱L╱ // 0x1c3a @0x8
0x1c32…1c4f at0009 = ╱ed╱(╱ // 0x1c3b @0x9
0x1c32…1c4f at000a = ╱33╱3╱ // 0x1c3c @0xa
0x1c32…1c4f at000b = ╱fe0000c002╱ // 0x1c3d @0xb
0x1c32…1c4f at0010 = ╱ec╱,╱ // 0x1c42 @0x10
0x1c32…1c4f at0011 = ╱31╱1╱ // 0x1c43 @0x11
0x1c32…1c4f at0012 = ╱fe00008001╱ // 0x1c44 @0x12
0x1c32…1c4f at0017 = ╱ec╱,╱ // 0x1c49 @0x17
0x1c32…1c4f at0018 = ╱4c╱L╱ // 0x1c4a @0x18
0x1c32…1c4f at0019 = ╱37╱7╱ // 0x1c4b @0x19
0x1c32…1c4f at001a = ╱ef╱$╱ // 0x1c4c @0x1a
0x1c32…1c4f at001b = ╱ee╱)╱ // 0x1c4d @0x1b
0x1c32…1c4f at001c = EOL // 0x1c4e @0x1c
0x1c32…1c4f }
0x1c4f…1c56 a9ad 2440 NEXT I
0x1c4f…1c56 LineComalBin {
0x1c4f…1c56 ptr = 0xa9ad // 0x1c4f @0x0
0x1c4f…1c56 lno = 0x0988 // 0x1c51 @0x2
0x1c4f…1c56 at0004 = ╱84╱ NEXT ╱ // 0x1c53 @0x4
0x1c4f…1c56 at0005 = ╱49╱I╱ // 0x1c54 @0x5
0x1c4f…1c56 at0006 = EOL // 0x1c55 @0x6
0x1c4f…1c56 }
0x1c56…1c5c a9b3 2450 ENDPROC
0x1c56…1c5c LineComalBin {
0x1c56…1c5c ptr = 0xa9b3 // 0x1c56 @0x0
0x1c56…1c5c lno = 0x0992 // 0x1c58 @0x2
0x1c56…1c5c at0004 = ╱9f╱ ENDPROC ╱ // 0x1c5a @0x4
0x1c56…1c5c at0005 = EOL // 0x1c5b @0x5
0x1c56…1c5c }
0x1c5c…1c6b a9c2 2460 PROC HENTDPOST
0x1c5c…1c6b LineComalBin {
0x1c5c…1c6b ptr = 0xa9c2 // 0x1c5c @0x0
0x1c5c…1c6b lno = 0x099c // 0x1c5e @0x2
0x1c5c…1c6b at0004 = ╱9e╱ PROC ╱ // 0x1c60 @0x4
0x1c5c…1c6b at0005 = ╱48╱H╱ // 0x1c61 @0x5
0x1c5c…1c6b at0006 = ╱45╱E╱ // 0x1c62 @0x6
0x1c5c…1c6b at0007 = ╱4e╱N╱ // 0x1c63 @0x7
0x1c5c…1c6b at0008 = ╱54╱T╱ // 0x1c64 @0x8
0x1c5c…1c6b at0009 = ╱44╱D╱ // 0x1c65 @0x9
0x1c5c…1c6b at000a = ╱50╱P╱ // 0x1c66 @0xa
0x1c5c…1c6b at000b = ╱4f╱O╱ // 0x1c67 @0xb
0x1c5c…1c6b at000c = ╱53╱S╱ // 0x1c68 @0xc
0x1c5c…1c6b at000d = ╱54╱T╱ // 0x1c69 @0xd
0x1c5c…1c6b at000e = EOL // 0x1c6a @0xe
0x1c5c…1c6b }
0x1c6b…1c84 a9db 2470 S=DTAB(DPIL3,2)
0x1c6b…1c84 LineComalBin {
0x1c6b…1c84 ptr = 0xa9db // 0x1c6b @0x0
0x1c6b…1c84 lno = 0x09a6 // 0x1c6d @0x2
0x1c6b…1c84 at0004 = ╱53╱S╱ // 0x1c6f @0x4
0x1c6b…1c84 at0005 = ╱dc╱=╱ // 0x1c70 @0x5
0x1c6b…1c84 at0006 = ╱44╱D╱ // 0x1c71 @0x6
0x1c6b…1c84 at0007 = ╱54╱T╱ // 0x1c72 @0x7
0x1c6b…1c84 at0008 = ╱41╱A╱ // 0x1c73 @0x8
0x1c6b…1c84 at0009 = ╱42╱B╱ // 0x1c74 @0x9
0x1c6b…1c84 at000a = ╱ed╱(╱ // 0x1c75 @0xa
0x1c6b…1c84 at000b = ╱44╱D╱ // 0x1c76 @0xb
0x1c6b…1c84 at000c = ╱50╱P╱ // 0x1c77 @0xc
0x1c6b…1c84 at000d = ╱49╱I╱ // 0x1c78 @0xd
0x1c6b…1c84 at000e = ╱4c╱L╱ // 0x1c79 @0xe
0x1c6b…1c84 at000f = ╱33╱3╱ // 0x1c7a @0xf
0x1c6b…1c84 at0010 = ╱ec╱,╱ // 0x1c7b @0x10
0x1c6b…1c84 at0011 = ╱32╱2╱ // 0x1c7c @0x11
0x1c6b…1c84 at0012 = ╱fe00008002╱ // 0x1c7d @0x12
0x1c6b…1c84 at0017 = ╱ee╱)╱ // 0x1c82 @0x17
0x1c6b…1c84 at0018 = EOL // 0x1c83 @0x18
0x1c6b…1c84 }
0x1c84…1caf aa06 2480 GET K6$,S:DEBNR,DEBNAVN$,DSALDO1$,DEBKGR$
0x1c84…1caf LineComalBin {
0x1c84…1caf ptr = 0xaa06 // 0x1c84 @0x0
0x1c84…1caf lno = 0x09b0 // 0x1c86 @0x2
0x1c84…1caf at0004 = ╱a9╱ GET ╱ // 0x1c88 @0x4
0x1c84…1caf at0005 = ╱4b╱K╱ // 0x1c89 @0x5
0x1c84…1caf at0006 = ╱36╱6╱ // 0x1c8a @0x6
0x1c84…1caf at0007 = ╱ef╱$╱ // 0x1c8b @0x7
0x1c84…1caf at0008 = ╱ec╱,╱ // 0x1c8c @0x8
0x1c84…1caf at0009 = ╱53╱S╱ // 0x1c8d @0x9
0x1c84…1caf at000a = ╱f0╱:╱ // 0x1c8e @0xa
0x1c84…1caf at000b = ╱44╱D╱ // 0x1c8f @0xb
0x1c84…1caf at000c = ╱45╱E╱ // 0x1c90 @0xc
0x1c84…1caf at000d = ╱42╱B╱ // 0x1c91 @0xd
0x1c84…1caf at000e = ╱4e╱N╱ // 0x1c92 @0xe
0x1c84…1caf at000f = ╱52╱R╱ // 0x1c93 @0xf
0x1c84…1caf at0010 = ╱ec╱,╱ // 0x1c94 @0x10
0x1c84…1caf at0011 = ╱44╱D╱ // 0x1c95 @0x11
0x1c84…1caf at0012 = ╱45╱E╱ // 0x1c96 @0x12
0x1c84…1caf at0013 = ╱42╱B╱ // 0x1c97 @0x13
0x1c84…1caf at0014 = ╱4e╱N╱ // 0x1c98 @0x14
0x1c84…1caf at0015 = ╱41╱A╱ // 0x1c99 @0x15
0x1c84…1caf at0016 = ╱56╱V╱ // 0x1c9a @0x16
0x1c84…1caf at0017 = ╱4e╱N╱ // 0x1c9b @0x17
0x1c84…1caf at0018 = ╱ef╱$╱ // 0x1c9c @0x18
0x1c84…1caf at0019 = ╱ec╱,╱ // 0x1c9d @0x19
0x1c84…1caf at001a = ╱44╱D╱ // 0x1c9e @0x1a
0x1c84…1caf at001b = ╱53╱S╱ // 0x1c9f @0x1b
0x1c84…1caf at001c = ╱41╱A╱ // 0x1ca0 @0x1c
0x1c84…1caf at001d = ╱4c╱L╱ // 0x1ca1 @0x1d
0x1c84…1caf at001e = ╱44╱D╱ // 0x1ca2 @0x1e
0x1c84…1caf at001f = ╱4f╱O╱ // 0x1ca3 @0x1f
0x1c84…1caf at0020 = ╱31╱1╱ // 0x1ca4 @0x20
0x1c84…1caf at0021 = ╱ef╱$╱ // 0x1ca5 @0x21
0x1c84…1caf at0022 = ╱ec╱,╱ // 0x1ca6 @0x22
0x1c84…1caf at0023 = ╱44╱D╱ // 0x1ca7 @0x23
0x1c84…1caf at0024 = ╱45╱E╱ // 0x1ca8 @0x24
0x1c84…1caf at0025 = ╱42╱B╱ // 0x1ca9 @0x25
0x1c84…1caf at0026 = ╱4b╱K╱ // 0x1caa @0x26
0x1c84…1caf at0027 = ╱47╱G╱ // 0x1cab @0x27
0x1c84…1caf at0028 = ╱52╱R╱ // 0x1cac @0x28
0x1c84…1caf at0029 = ╱ef╱$╱ // 0x1cad @0x29
0x1c84…1caf at002a = EOL // 0x1cae @0x2a
0x1c84…1caf }
0x1caf…1ccc aa23 2490 EXEC FEJL(8,2,K6$)
0x1caf…1ccc LineComalBin {
0x1caf…1ccc ptr = 0xaa23 // 0x1caf @0x0
0x1caf…1ccc lno = 0x09ba // 0x1cb1 @0x2
0x1caf…1ccc at0004 = ╱9d╱ EXEC ╱ // 0x1cb3 @0x4
0x1caf…1ccc at0005 = ╱46╱F╱ // 0x1cb4 @0x5
0x1caf…1ccc at0006 = ╱45╱E╱ // 0x1cb5 @0x6
0x1caf…1ccc at0007 = ╱4a╱J╱ // 0x1cb6 @0x7
0x1caf…1ccc at0008 = ╱4c╱L╱ // 0x1cb7 @0x8
0x1caf…1ccc at0009 = ╱ed╱(╱ // 0x1cb8 @0x9
0x1caf…1ccc at000a = ╱38╱8╱ // 0x1cb9 @0xa
0x1caf…1ccc at000b = ╱fe00008004╱ // 0x1cba @0xb
0x1caf…1ccc at0010 = ╱ec╱,╱ // 0x1cbf @0x10
0x1caf…1ccc at0011 = ╱32╱2╱ // 0x1cc0 @0x11
0x1caf…1ccc at0012 = ╱fe00008002╱ // 0x1cc1 @0x12
0x1caf…1ccc at0017 = ╱ec╱,╱ // 0x1cc6 @0x17
0x1caf…1ccc at0018 = ╱4b╱K╱ // 0x1cc7 @0x18
0x1caf…1ccc at0019 = ╱36╱6╱ // 0x1cc8 @0x19
0x1caf…1ccc at001a = ╱ef╱$╱ // 0x1cc9 @0x1a
0x1caf…1ccc at001b = ╱ee╱)╱ // 0x1cca @0x1b
0x1caf…1ccc at001c = EOL // 0x1ccb @0x1c
0x1caf…1ccc }
0x1ccc…1cec aa43 2500 IF DEBNR<>DTAB(DPIL3,1) THEN STOP
0x1ccc…1cec LineComalBin {
0x1ccc…1cec ptr = 0xaa43 // 0x1ccc @0x0
0x1ccc…1cec lno = 0x09c4 // 0x1cce @0x2
0x1ccc…1cec at0004 = ╱82╱ IF ╱ // 0x1cd0 @0x4
0x1ccc…1cec at0005 = ╱44╱D╱ // 0x1cd1 @0x5
0x1ccc…1cec at0006 = ╱45╱E╱ // 0x1cd2 @0x6
0x1ccc…1cec at0007 = ╱42╱B╱ // 0x1cd3 @0x7
0x1ccc…1cec at0008 = ╱4e╱N╱ // 0x1cd4 @0x8
0x1ccc…1cec at0009 = ╱52╱R╱ // 0x1cd5 @0x9
0x1ccc…1cec at000a = ╱e1╱<>╱ // 0x1cd6 @0xa
0x1ccc…1cec at000b = ╱44╱D╱ // 0x1cd7 @0xb
0x1ccc…1cec at000c = ╱54╱T╱ // 0x1cd8 @0xc
0x1ccc…1cec at000d = ╱41╱A╱ // 0x1cd9 @0xd
0x1ccc…1cec at000e = ╱42╱B╱ // 0x1cda @0xe
0x1ccc…1cec at000f = ╱ed╱(╱ // 0x1cdb @0xf
0x1ccc…1cec at0010 = ╱44╱D╱ // 0x1cdc @0x10
0x1ccc…1cec at0011 = ╱50╱P╱ // 0x1cdd @0x11
0x1ccc…1cec at0012 = ╱49╱I╱ // 0x1cde @0x12
0x1ccc…1cec at0013 = ╱4c╱L╱ // 0x1cdf @0x13
0x1ccc…1cec at0014 = ╱33╱3╱ // 0x1ce0 @0x14
0x1ccc…1cec at0015 = ╱ec╱,╱ // 0x1ce1 @0x15
0x1ccc…1cec at0016 = ╱31╱1╱ // 0x1ce2 @0x16
0x1ccc…1cec at0017 = ╱fe00008001╱ // 0x1ce3 @0x17
0x1ccc…1cec at001c = ╱ee╱)╱ // 0x1ce8 @0x1c
0x1ccc…1cec at001d = ╱b6╱ THEN ╱ // 0x1ce9 @0x1d
0x1ccc…1cec at001e = ╱8d╱ STOP ╱ // 0x1cea @0x1e
0x1ccc…1cec at001f = EOL // 0x1ceb @0x1f
0x1ccc…1cec }
0x1cec…1d2a aa81 2510 GET K6$,S+1:DSALDO2$,DSALDO3$,DSALDO4$,DEBPOSTNR,DEBLK$
0x1cec…1d2a LineComalBin {
0x1cec…1d2a ptr = 0xaa81 // 0x1cec @0x0
0x1cec…1d2a lno = 0x09ce // 0x1cee @0x2
0x1cec…1d2a at0004 = ╱a9╱ GET ╱ // 0x1cf0 @0x4
0x1cec…1d2a at0005 = ╱4b╱K╱ // 0x1cf1 @0x5
0x1cec…1d2a at0006 = ╱36╱6╱ // 0x1cf2 @0x6
0x1cec…1d2a at0007 = ╱ef╱$╱ // 0x1cf3 @0x7
0x1cec…1d2a at0008 = ╱ec╱,╱ // 0x1cf4 @0x8
0x1cec…1d2a at0009 = ╱53╱S╱ // 0x1cf5 @0x9
0x1cec…1d2a at000a = ╱e2╱+╱ // 0x1cf6 @0xa
0x1cec…1d2a at000b = ╱31╱1╱ // 0x1cf7 @0xb
0x1cec…1d2a at000c = ╱fe00008001╱ // 0x1cf8 @0xc
0x1cec…1d2a at0011 = ╱f0╱:╱ // 0x1cfd @0x11
0x1cec…1d2a at0012 = ╱44╱D╱ // 0x1cfe @0x12
0x1cec…1d2a at0013 = ╱53╱S╱ // 0x1cff @0x13
0x1cec…1d2a at0014 = ╱41╱A╱ // 0x1d00 @0x14
0x1cec…1d2a at0015 = ╱4c╱L╱ // 0x1d01 @0x15
0x1cec…1d2a at0016 = ╱44╱D╱ // 0x1d02 @0x16
0x1cec…1d2a at0017 = ╱4f╱O╱ // 0x1d03 @0x17
0x1cec…1d2a at0018 = ╱32╱2╱ // 0x1d04 @0x18
0x1cec…1d2a at0019 = ╱ef╱$╱ // 0x1d05 @0x19
0x1cec…1d2a at001a = ╱ec╱,╱ // 0x1d06 @0x1a
0x1cec…1d2a at001b = ╱44╱D╱ // 0x1d07 @0x1b
0x1cec…1d2a at001c = ╱53╱S╱ // 0x1d08 @0x1c
0x1cec…1d2a at001d = ╱41╱A╱ // 0x1d09 @0x1d
0x1cec…1d2a at001e = ╱4c╱L╱ // 0x1d0a @0x1e
0x1cec…1d2a at001f = ╱44╱D╱ // 0x1d0b @0x1f
0x1cec…1d2a at0020 = ╱4f╱O╱ // 0x1d0c @0x20
0x1cec…1d2a at0021 = ╱33╱3╱ // 0x1d0d @0x21
0x1cec…1d2a at0022 = ╱ef╱$╱ // 0x1d0e @0x22
0x1cec…1d2a at0023 = ╱ec╱,╱ // 0x1d0f @0x23
0x1cec…1d2a at0024 = ╱44╱D╱ // 0x1d10 @0x24
0x1cec…1d2a at0025 = ╱53╱S╱ // 0x1d11 @0x25
0x1cec…1d2a at0026 = ╱41╱A╱ // 0x1d12 @0x26
0x1cec…1d2a at0027 = ╱4c╱L╱ // 0x1d13 @0x27
0x1cec…1d2a at0028 = ╱44╱D╱ // 0x1d14 @0x28
0x1cec…1d2a at0029 = ╱4f╱O╱ // 0x1d15 @0x29
0x1cec…1d2a at002a = ╱34╱4╱ // 0x1d16 @0x2a
0x1cec…1d2a at002b = ╱ef╱$╱ // 0x1d17 @0x2b
0x1cec…1d2a at002c = ╱ec╱,╱ // 0x1d18 @0x2c
0x1cec…1d2a at002d = ╱44╱D╱ // 0x1d19 @0x2d
0x1cec…1d2a at002e = ╱45╱E╱ // 0x1d1a @0x2e
0x1cec…1d2a at002f = ╱42╱B╱ // 0x1d1b @0x2f
0x1cec…1d2a at0030 = ╱50╱P╱ // 0x1d1c @0x30
0x1cec…1d2a at0031 = ╱4f╱O╱ // 0x1d1d @0x31
0x1cec…1d2a at0032 = ╱53╱S╱ // 0x1d1e @0x32
0x1cec…1d2a at0033 = ╱54╱T╱ // 0x1d1f @0x33
0x1cec…1d2a at0034 = ╱4e╱N╱ // 0x1d20 @0x34
0x1cec…1d2a at0035 = ╱52╱R╱ // 0x1d21 @0x35
0x1cec…1d2a at0036 = ╱ec╱,╱ // 0x1d22 @0x36
0x1cec…1d2a at0037 = ╱44╱D╱ // 0x1d23 @0x37
0x1cec…1d2a at0038 = ╱45╱E╱ // 0x1d24 @0x38
0x1cec…1d2a at0039 = ╱42╱B╱ // 0x1d25 @0x39
0x1cec…1d2a at003a = ╱4c╱L╱ // 0x1d26 @0x3a
0x1cec…1d2a at003b = ╱4b╱K╱ // 0x1d27 @0x3b
0x1cec…1d2a at003c = ╱ef╱$╱ // 0x1d28 @0x3c
0x1cec…1d2a at003d = EOL // 0x1d29 @0x3d
0x1cec…1d2a }
0x1d2a…1d47 aa9e 2520 EXEC FEJL(8,3,K6$)
0x1d2a…1d47 LineComalBin {
0x1d2a…1d47 ptr = 0xaa9e // 0x1d2a @0x0
0x1d2a…1d47 lno = 0x09d8 // 0x1d2c @0x2
0x1d2a…1d47 at0004 = ╱9d╱ EXEC ╱ // 0x1d2e @0x4
0x1d2a…1d47 at0005 = ╱46╱F╱ // 0x1d2f @0x5
0x1d2a…1d47 at0006 = ╱45╱E╱ // 0x1d30 @0x6
0x1d2a…1d47 at0007 = ╱4a╱J╱ // 0x1d31 @0x7
0x1d2a…1d47 at0008 = ╱4c╱L╱ // 0x1d32 @0x8
0x1d2a…1d47 at0009 = ╱ed╱(╱ // 0x1d33 @0x9
0x1d2a…1d47 at000a = ╱38╱8╱ // 0x1d34 @0xa
0x1d2a…1d47 at000b = ╱fe00008004╱ // 0x1d35 @0xb
0x1d2a…1d47 at0010 = ╱ec╱,╱ // 0x1d3a @0x10
0x1d2a…1d47 at0011 = ╱33╱3╱ // 0x1d3b @0x11
0x1d2a…1d47 at0012 = ╱fe0000c002╱ // 0x1d3c @0x12
0x1d2a…1d47 at0017 = ╱ec╱,╱ // 0x1d41 @0x17
0x1d2a…1d47 at0018 = ╱4b╱K╱ // 0x1d42 @0x18
0x1d2a…1d47 at0019 = ╱36╱6╱ // 0x1d43 @0x19
0x1d2a…1d47 at001a = ╱ef╱$╱ // 0x1d44 @0x1a
0x1d2a…1d47 at001b = ╱ee╱)╱ // 0x1d45 @0x1b
0x1d2a…1d47 at001c = EOL // 0x1d46 @0x1c
0x1d2a…1d47 }
0x1d47…1d77 aace 2530 GET K6$,S+2:DEBGADE$,DEBTLF$,HPOST,HKUNDE
0x1d47…1d77 LineComalBin {
0x1d47…1d77 ptr = 0xaace // 0x1d47 @0x0
0x1d47…1d77 lno = 0x09e2 // 0x1d49 @0x2
0x1d47…1d77 at0004 = ╱a9╱ GET ╱ // 0x1d4b @0x4
0x1d47…1d77 at0005 = ╱4b╱K╱ // 0x1d4c @0x5
0x1d47…1d77 at0006 = ╱36╱6╱ // 0x1d4d @0x6
0x1d47…1d77 at0007 = ╱ef╱$╱ // 0x1d4e @0x7
0x1d47…1d77 at0008 = ╱ec╱,╱ // 0x1d4f @0x8
0x1d47…1d77 at0009 = ╱53╱S╱ // 0x1d50 @0x9
0x1d47…1d77 at000a = ╱e2╱+╱ // 0x1d51 @0xa
0x1d47…1d77 at000b = ╱32╱2╱ // 0x1d52 @0xb
0x1d47…1d77 at000c = ╱fe00008002╱ // 0x1d53 @0xc
0x1d47…1d77 at0011 = ╱f0╱:╱ // 0x1d58 @0x11
0x1d47…1d77 at0012 = ╱44╱D╱ // 0x1d59 @0x12
0x1d47…1d77 at0013 = ╱45╱E╱ // 0x1d5a @0x13
0x1d47…1d77 at0014 = ╱42╱B╱ // 0x1d5b @0x14
0x1d47…1d77 at0015 = ╱47╱G╱ // 0x1d5c @0x15
0x1d47…1d77 at0016 = ╱41╱A╱ // 0x1d5d @0x16
0x1d47…1d77 at0017 = ╱44╱D╱ // 0x1d5e @0x17
0x1d47…1d77 at0018 = ╱45╱E╱ // 0x1d5f @0x18
0x1d47…1d77 at0019 = ╱ef╱$╱ // 0x1d60 @0x19
0x1d47…1d77 at001a = ╱ec╱,╱ // 0x1d61 @0x1a
0x1d47…1d77 at001b = ╱44╱D╱ // 0x1d62 @0x1b
0x1d47…1d77 at001c = ╱45╱E╱ // 0x1d63 @0x1c
0x1d47…1d77 at001d = ╱42╱B╱ // 0x1d64 @0x1d
0x1d47…1d77 at001e = ╱54╱T╱ // 0x1d65 @0x1e
0x1d47…1d77 at001f = ╱4c╱L╱ // 0x1d66 @0x1f
0x1d47…1d77 at0020 = ╱46╱F╱ // 0x1d67 @0x20
0x1d47…1d77 at0021 = ╱ef╱$╱ // 0x1d68 @0x21
0x1d47…1d77 at0022 = ╱ec╱,╱ // 0x1d69 @0x22
0x1d47…1d77 at0023 = ╱48╱H╱ // 0x1d6a @0x23
0x1d47…1d77 at0024 = ╱50╱P╱ // 0x1d6b @0x24
0x1d47…1d77 at0025 = ╱4f╱O╱ // 0x1d6c @0x25
0x1d47…1d77 at0026 = ╱53╱S╱ // 0x1d6d @0x26
0x1d47…1d77 at0027 = ╱54╱T╱ // 0x1d6e @0x27
0x1d47…1d77 at0028 = ╱ec╱,╱ // 0x1d6f @0x28
0x1d47…1d77 at0029 = ╱48╱H╱ // 0x1d70 @0x29
0x1d47…1d77 at002a = ╱4b╱K╱ // 0x1d71 @0x2a
0x1d47…1d77 at002b = ╱55╱U╱ // 0x1d72 @0x2b
0x1d47…1d77 at002c = ╱4e╱N╱ // 0x1d73 @0x2c
0x1d47…1d77 at002d = ╱44╱D╱ // 0x1d74 @0x2d
0x1d47…1d77 at002e = ╱45╱E╱ // 0x1d75 @0x2e
0x1d47…1d77 at002f = EOL // 0x1d76 @0x2f
0x1d47…1d77 }
0x1d77…1d94 aaeb 2540 EXEC FEJL(8,4,K6$)
0x1d77…1d94 LineComalBin {
0x1d77…1d94 ptr = 0xaaeb // 0x1d77 @0x0
0x1d77…1d94 lno = 0x09ec // 0x1d79 @0x2
0x1d77…1d94 at0004 = ╱9d╱ EXEC ╱ // 0x1d7b @0x4
0x1d77…1d94 at0005 = ╱46╱F╱ // 0x1d7c @0x5
0x1d77…1d94 at0006 = ╱45╱E╱ // 0x1d7d @0x6
0x1d77…1d94 at0007 = ╱4a╱J╱ // 0x1d7e @0x7
0x1d77…1d94 at0008 = ╱4c╱L╱ // 0x1d7f @0x8
0x1d77…1d94 at0009 = ╱ed╱(╱ // 0x1d80 @0x9
0x1d77…1d94 at000a = ╱38╱8╱ // 0x1d81 @0xa
0x1d77…1d94 at000b = ╱fe00008004╱ // 0x1d82 @0xb
0x1d77…1d94 at0010 = ╱ec╱,╱ // 0x1d87 @0x10
0x1d77…1d94 at0011 = ╱34╱4╱ // 0x1d88 @0x11
0x1d77…1d94 at0012 = ╱fe00008003╱ // 0x1d89 @0x12
0x1d77…1d94 at0017 = ╱ec╱,╱ // 0x1d8e @0x17
0x1d77…1d94 at0018 = ╱4b╱K╱ // 0x1d8f @0x18
0x1d77…1d94 at0019 = ╱36╱6╱ // 0x1d90 @0x19
0x1d77…1d94 at001a = ╱ef╱$╱ // 0x1d91 @0x1a
0x1d77…1d94 at001b = ╱ee╱)╱ // 0x1d92 @0x1b
0x1d77…1d94 at001c = EOL // 0x1d93 @0x1c
0x1d77…1d94 }
0x1d94…1dbc ab13 2550 GET K6$,S+3:DEBBY$,ÅRKØB$,MDNKØB$
0x1d94…1dbc LineComalBin {
0x1d94…1dbc ptr = 0xab13 // 0x1d94 @0x0
0x1d94…1dbc lno = 0x09f6 // 0x1d96 @0x2
0x1d94…1dbc at0004 = ╱a9╱ GET ╱ // 0x1d98 @0x4
0x1d94…1dbc at0005 = ╱4b╱K╱ // 0x1d99 @0x5
0x1d94…1dbc at0006 = ╱36╱6╱ // 0x1d9a @0x6
0x1d94…1dbc at0007 = ╱ef╱$╱ // 0x1d9b @0x7
0x1d94…1dbc at0008 = ╱ec╱,╱ // 0x1d9c @0x8
0x1d94…1dbc at0009 = ╱53╱S╱ // 0x1d9d @0x9
0x1d94…1dbc at000a = ╱e2╱+╱ // 0x1d9e @0xa
0x1d94…1dbc at000b = ╱33╱3╱ // 0x1d9f @0xb
0x1d94…1dbc at000c = ╱fe0000c002╱ // 0x1da0 @0xc
0x1d94…1dbc at0011 = ╱f0╱:╱ // 0x1da5 @0x11
0x1d94…1dbc at0012 = ╱44╱D╱ // 0x1da6 @0x12
0x1d94…1dbc at0013 = ╱45╱E╱ // 0x1da7 @0x13
0x1d94…1dbc at0014 = ╱42╱B╱ // 0x1da8 @0x14
0x1d94…1dbc at0015 = ╱42╱B╱ // 0x1da9 @0x15
0x1d94…1dbc at0016 = ╱59╱Y╱ // 0x1daa @0x16
0x1d94…1dbc at0017 = ╱ef╱$╱ // 0x1dab @0x17
0x1d94…1dbc at0018 = ╱ec╱,╱ // 0x1dac @0x18
0x1d94…1dbc at0019 = ╱5d╱Å╱ // 0x1dad @0x19
0x1d94…1dbc at001a = ╱52╱R╱ // 0x1dae @0x1a
0x1d94…1dbc at001b = ╱4b╱K╱ // 0x1daf @0x1b
0x1d94…1dbc at001c = ╱5c╱Ø╱ // 0x1db0 @0x1c
0x1d94…1dbc at001d = ╱42╱B╱ // 0x1db1 @0x1d
0x1d94…1dbc at001e = ╱ef╱$╱ // 0x1db2 @0x1e
0x1d94…1dbc at001f = ╱ec╱,╱ // 0x1db3 @0x1f
0x1d94…1dbc at0020 = ╱4d╱M╱ // 0x1db4 @0x20
0x1d94…1dbc at0021 = ╱44╱D╱ // 0x1db5 @0x21
0x1d94…1dbc at0022 = ╱4e╱N╱ // 0x1db6 @0x22
0x1d94…1dbc at0023 = ╱4b╱K╱ // 0x1db7 @0x23
0x1d94…1dbc at0024 = ╱5c╱Ø╱ // 0x1db8 @0x24
0x1d94…1dbc at0025 = ╱42╱B╱ // 0x1db9 @0x25
0x1d94…1dbc at0026 = ╱ef╱$╱ // 0x1dba @0x26
0x1d94…1dbc at0027 = EOL // 0x1dbb @0x27
0x1d94…1dbc }
0x1dbc…1dd9 ab30 2560 EXEC FEJL(8,5,K6$)
0x1dbc…1dd9 LineComalBin {
0x1dbc…1dd9 ptr = 0xab30 // 0x1dbc @0x0
0x1dbc…1dd9 lno = 0x0a00 // 0x1dbe @0x2
0x1dbc…1dd9 at0004 = ╱9d╱ EXEC ╱ // 0x1dc0 @0x4
0x1dbc…1dd9 at0005 = ╱46╱F╱ // 0x1dc1 @0x5
0x1dbc…1dd9 at0006 = ╱45╱E╱ // 0x1dc2 @0x6
0x1dbc…1dd9 at0007 = ╱4a╱J╱ // 0x1dc3 @0x7
0x1dbc…1dd9 at0008 = ╱4c╱L╱ // 0x1dc4 @0x8
0x1dbc…1dd9 at0009 = ╱ed╱(╱ // 0x1dc5 @0x9
0x1dbc…1dd9 at000a = ╱38╱8╱ // 0x1dc6 @0xa
0x1dbc…1dd9 at000b = ╱fe00008004╱ // 0x1dc7 @0xb
0x1dbc…1dd9 at0010 = ╱ec╱,╱ // 0x1dcc @0x10
0x1dbc…1dd9 at0011 = ╱35╱5╱ // 0x1dcd @0x11
0x1dbc…1dd9 at0012 = ╱fe0000a003╱ // 0x1dce @0x12
0x1dbc…1dd9 at0017 = ╱ec╱,╱ // 0x1dd3 @0x17
0x1dbc…1dd9 at0018 = ╱4b╱K╱ // 0x1dd4 @0x18
0x1dbc…1dd9 at0019 = ╱36╱6╱ // 0x1dd5 @0x19
0x1dbc…1dd9 at001a = ╱ef╱$╱ // 0x1dd6 @0x1a
0x1dbc…1dd9 at001b = ╱ee╱)╱ // 0x1dd7 @0x1b
0x1dbc…1dd9 at001c = EOL // 0x1dd8 @0x1c
0x1dbc…1dd9 }
0x1dd9…1ddf ab36 2570 ENDPROC
0x1dd9…1ddf LineComalBin {
0x1dd9…1ddf ptr = 0xab36 // 0x1dd9 @0x0
0x1dd9…1ddf lno = 0x0a0a // 0x1ddb @0x2
0x1dd9…1ddf at0004 = ╱9f╱ ENDPROC ╱ // 0x1ddd @0x4
0x1dd9…1ddf at0005 = EOL // 0x1dde @0x5
0x1dd9…1ddf }
0x1ddf…1ded ab44 2580 PROC HENTPOST
0x1ddf…1ded LineComalBin {
0x1ddf…1ded ptr = 0xab44 // 0x1ddf @0x0
0x1ddf…1ded lno = 0x0a14 // 0x1de1 @0x2
0x1ddf…1ded at0004 = ╱9e╱ PROC ╱ // 0x1de3 @0x4
0x1ddf…1ded at0005 = ╱48╱H╱ // 0x1de4 @0x5
0x1ddf…1ded at0006 = ╱45╱E╱ // 0x1de5 @0x6
0x1ddf…1ded at0007 = ╱4e╱N╱ // 0x1de6 @0x7
0x1ddf…1ded at0008 = ╱54╱T╱ // 0x1de7 @0x8
0x1ddf…1ded at0009 = ╱50╱P╱ // 0x1de8 @0x9
0x1ddf…1ded at000a = ╱4f╱O╱ // 0x1de9 @0xa
0x1ddf…1ded at000b = ╱53╱S╱ // 0x1dea @0xb
0x1ddf…1ded at000c = ╱54╱T╱ // 0x1deb @0xc
0x1ddf…1ded at000d = EOL // 0x1dec @0xd
0x1ddf…1ded }
0x1ded…1e06 ab5d 2590 S=FTAB(FPIL3,2)
0x1ded…1e06 LineComalBin {
0x1ded…1e06 ptr = 0xab5d // 0x1ded @0x0
0x1ded…1e06 lno = 0x0a1e // 0x1def @0x2
0x1ded…1e06 at0004 = ╱53╱S╱ // 0x1df1 @0x4
0x1ded…1e06 at0005 = ╱dc╱=╱ // 0x1df2 @0x5
0x1ded…1e06 at0006 = ╱46╱F╱ // 0x1df3 @0x6
0x1ded…1e06 at0007 = ╱54╱T╱ // 0x1df4 @0x7
0x1ded…1e06 at0008 = ╱41╱A╱ // 0x1df5 @0x8
0x1ded…1e06 at0009 = ╱42╱B╱ // 0x1df6 @0x9
0x1ded…1e06 at000a = ╱ed╱(╱ // 0x1df7 @0xa
0x1ded…1e06 at000b = ╱46╱F╱ // 0x1df8 @0xb
0x1ded…1e06 at000c = ╱50╱P╱ // 0x1df9 @0xc
0x1ded…1e06 at000d = ╱49╱I╱ // 0x1dfa @0xd
0x1ded…1e06 at000e = ╱4c╱L╱ // 0x1dfb @0xe
0x1ded…1e06 at000f = ╱33╱3╱ // 0x1dfc @0xf
0x1ded…1e06 at0010 = ╱ec╱,╱ // 0x1dfd @0x10
0x1ded…1e06 at0011 = ╱32╱2╱ // 0x1dfe @0x11
0x1ded…1e06 at0012 = ╱fe00008002╱ // 0x1dff @0x12
0x1ded…1e06 at0017 = ╱ee╱)╱ // 0x1e04 @0x17
0x1ded…1e06 at0018 = EOL // 0x1e05 @0x18
0x1ded…1e06 }
0x1e06…1e1c ab73 2600 GET K5$,S:FNR,FNAVN$
0x1e06…1e1c LineComalBin {
0x1e06…1e1c ptr = 0xab73 // 0x1e06 @0x0
0x1e06…1e1c lno = 0x0a28 // 0x1e08 @0x2
0x1e06…1e1c at0004 = ╱a9╱ GET ╱ // 0x1e0a @0x4
0x1e06…1e1c at0005 = ╱4b╱K╱ // 0x1e0b @0x5
0x1e06…1e1c at0006 = ╱35╱5╱ // 0x1e0c @0x6
0x1e06…1e1c at0007 = ╱ef╱$╱ // 0x1e0d @0x7
0x1e06…1e1c at0008 = ╱ec╱,╱ // 0x1e0e @0x8
0x1e06…1e1c at0009 = ╱53╱S╱ // 0x1e0f @0x9
0x1e06…1e1c at000a = ╱f0╱:╱ // 0x1e10 @0xa
0x1e06…1e1c at000b = ╱46╱F╱ // 0x1e11 @0xb
0x1e06…1e1c at000c = ╱4e╱N╱ // 0x1e12 @0xc
0x1e06…1e1c at000d = ╱52╱R╱ // 0x1e13 @0xd
0x1e06…1e1c at000e = ╱ec╱,╱ // 0x1e14 @0xe
0x1e06…1e1c at000f = ╱46╱F╱ // 0x1e15 @0xf
0x1e06…1e1c at0010 = ╱4e╱N╱ // 0x1e16 @0x10
0x1e06…1e1c at0011 = ╱41╱A╱ // 0x1e17 @0x11
0x1e06…1e1c at0012 = ╱56╱V╱ // 0x1e18 @0x12
0x1e06…1e1c at0013 = ╱4e╱N╱ // 0x1e19 @0x13
0x1e06…1e1c at0014 = ╱ef╱$╱ // 0x1e1a @0x14
0x1e06…1e1c at0015 = EOL // 0x1e1b @0x15
0x1e06…1e1c }
0x1e1c…1e39 ab90 2610 EXEC FEJL(3,2,K5$)
0x1e1c…1e39 LineComalBin {
0x1e1c…1e39 ptr = 0xab90 // 0x1e1c @0x0
0x1e1c…1e39 lno = 0x0a32 // 0x1e1e @0x2
0x1e1c…1e39 at0004 = ╱9d╱ EXEC ╱ // 0x1e20 @0x4
0x1e1c…1e39 at0005 = ╱46╱F╱ // 0x1e21 @0x5
0x1e1c…1e39 at0006 = ╱45╱E╱ // 0x1e22 @0x6
0x1e1c…1e39 at0007 = ╱4a╱J╱ // 0x1e23 @0x7
0x1e1c…1e39 at0008 = ╱4c╱L╱ // 0x1e24 @0x8
0x1e1c…1e39 at0009 = ╱ed╱(╱ // 0x1e25 @0x9
0x1e1c…1e39 at000a = ╱33╱3╱ // 0x1e26 @0xa
0x1e1c…1e39 at000b = ╱fe0000c002╱ // 0x1e27 @0xb
0x1e1c…1e39 at0010 = ╱ec╱,╱ // 0x1e2c @0x10
0x1e1c…1e39 at0011 = ╱32╱2╱ // 0x1e2d @0x11
0x1e1c…1e39 at0012 = ╱fe00008002╱ // 0x1e2e @0x12
0x1e1c…1e39 at0017 = ╱ec╱,╱ // 0x1e33 @0x17
0x1e1c…1e39 at0018 = ╱4b╱K╱ // 0x1e34 @0x18
0x1e1c…1e39 at0019 = ╱35╱5╱ // 0x1e35 @0x19
0x1e1c…1e39 at001a = ╱ef╱$╱ // 0x1e36 @0x1a
0x1e1c…1e39 at001b = ╱ee╱)╱ // 0x1e37 @0x1b
0x1e1c…1e39 at001c = EOL // 0x1e38 @0x1c
0x1e1c…1e39 }
0x1e39…1e57 abae 2620 IF FNR<>FTAB(FPIL3,1) THEN STOP
0x1e39…1e57 LineComalBin {
0x1e39…1e57 ptr = 0xabae // 0x1e39 @0x0
0x1e39…1e57 lno = 0x0a3c // 0x1e3b @0x2
0x1e39…1e57 at0004 = ╱82╱ IF ╱ // 0x1e3d @0x4
0x1e39…1e57 at0005 = ╱46╱F╱ // 0x1e3e @0x5
0x1e39…1e57 at0006 = ╱4e╱N╱ // 0x1e3f @0x6
0x1e39…1e57 at0007 = ╱52╱R╱ // 0x1e40 @0x7
0x1e39…1e57 at0008 = ╱e1╱<>╱ // 0x1e41 @0x8
0x1e39…1e57 at0009 = ╱46╱F╱ // 0x1e42 @0x9
0x1e39…1e57 at000a = ╱54╱T╱ // 0x1e43 @0xa
0x1e39…1e57 at000b = ╱41╱A╱ // 0x1e44 @0xb
0x1e39…1e57 at000c = ╱42╱B╱ // 0x1e45 @0xc
0x1e39…1e57 at000d = ╱ed╱(╱ // 0x1e46 @0xd
0x1e39…1e57 at000e = ╱46╱F╱ // 0x1e47 @0xe
0x1e39…1e57 at000f = ╱50╱P╱ // 0x1e48 @0xf
0x1e39…1e57 at0010 = ╱49╱I╱ // 0x1e49 @0x10
0x1e39…1e57 at0011 = ╱4c╱L╱ // 0x1e4a @0x11
0x1e39…1e57 at0012 = ╱33╱3╱ // 0x1e4b @0x12
0x1e39…1e57 at0013 = ╱ec╱,╱ // 0x1e4c @0x13
0x1e39…1e57 at0014 = ╱31╱1╱ // 0x1e4d @0x14
0x1e39…1e57 at0015 = ╱fe00008001╱ // 0x1e4e @0x15
0x1e39…1e57 at001a = ╱ee╱)╱ // 0x1e53 @0x1a
0x1e39…1e57 at001b = ╱b6╱ THEN ╱ // 0x1e54 @0x1b
0x1e39…1e57 at001c = ╱8d╱ STOP ╱ // 0x1e55 @0x1c
0x1e39…1e57 at001d = EOL // 0x1e56 @0x1d
0x1e39…1e57 }
0x1e57…1e84 abdb 2630 GET K5$,S+1:FMKODE$,FMDEBET$,FMKREDIT$
0x1e57…1e84 LineComalBin {
0x1e57…1e84 ptr = 0xabdb // 0x1e57 @0x0
0x1e57…1e84 lno = 0x0a46 // 0x1e59 @0x2
0x1e57…1e84 at0004 = ╱a9╱ GET ╱ // 0x1e5b @0x4
0x1e57…1e84 at0005 = ╱4b╱K╱ // 0x1e5c @0x5
0x1e57…1e84 at0006 = ╱35╱5╱ // 0x1e5d @0x6
0x1e57…1e84 at0007 = ╱ef╱$╱ // 0x1e5e @0x7
0x1e57…1e84 at0008 = ╱ec╱,╱ // 0x1e5f @0x8
0x1e57…1e84 at0009 = ╱53╱S╱ // 0x1e60 @0x9
0x1e57…1e84 at000a = ╱e2╱+╱ // 0x1e61 @0xa
0x1e57…1e84 at000b = ╱31╱1╱ // 0x1e62 @0xb
0x1e57…1e84 at000c = ╱fe00008001╱ // 0x1e63 @0xc
0x1e57…1e84 at0011 = ╱f0╱:╱ // 0x1e68 @0x11
0x1e57…1e84 at0012 = ╱46╱F╱ // 0x1e69 @0x12
0x1e57…1e84 at0013 = ╱4d╱M╱ // 0x1e6a @0x13
0x1e57…1e84 at0014 = ╱4b╱K╱ // 0x1e6b @0x14
0x1e57…1e84 at0015 = ╱4f╱O╱ // 0x1e6c @0x15
0x1e57…1e84 at0016 = ╱44╱D╱ // 0x1e6d @0x16
0x1e57…1e84 at0017 = ╱45╱E╱ // 0x1e6e @0x17
0x1e57…1e84 at0018 = ╱ef╱$╱ // 0x1e6f @0x18
0x1e57…1e84 at0019 = ╱ec╱,╱ // 0x1e70 @0x19
0x1e57…1e84 at001a = ╱46╱F╱ // 0x1e71 @0x1a
0x1e57…1e84 at001b = ╱4d╱M╱ // 0x1e72 @0x1b
0x1e57…1e84 at001c = ╱44╱D╱ // 0x1e73 @0x1c
0x1e57…1e84 at001d = ╱45╱E╱ // 0x1e74 @0x1d
0x1e57…1e84 at001e = ╱42╱B╱ // 0x1e75 @0x1e
0x1e57…1e84 at001f = ╱45╱E╱ // 0x1e76 @0x1f
0x1e57…1e84 at0020 = ╱54╱T╱ // 0x1e77 @0x20
0x1e57…1e84 at0021 = ╱ef╱$╱ // 0x1e78 @0x21
0x1e57…1e84 at0022 = ╱ec╱,╱ // 0x1e79 @0x22
0x1e57…1e84 at0023 = ╱46╱F╱ // 0x1e7a @0x23
0x1e57…1e84 at0024 = ╱4d╱M╱ // 0x1e7b @0x24
0x1e57…1e84 at0025 = ╱4b╱K╱ // 0x1e7c @0x25
0x1e57…1e84 at0026 = ╱52╱R╱ // 0x1e7d @0x26
0x1e57…1e84 at0027 = ╱45╱E╱ // 0x1e7e @0x27
0x1e57…1e84 at0028 = ╱44╱D╱ // 0x1e7f @0x28
0x1e57…1e84 at0029 = ╱49╱I╱ // 0x1e80 @0x29
0x1e57…1e84 at002a = ╱54╱T╱ // 0x1e81 @0x2a
0x1e57…1e84 at002b = ╱ef╱$╱ // 0x1e82 @0x2b
0x1e57…1e84 at002c = EOL // 0x1e83 @0x2c
0x1e57…1e84 }
0x1e84…1ea1 abf8 2640 EXEC FEJL(3,3,K5$)
0x1e84…1ea1 LineComalBin {
0x1e84…1ea1 ptr = 0xabf8 // 0x1e84 @0x0
0x1e84…1ea1 lno = 0x0a50 // 0x1e86 @0x2
0x1e84…1ea1 at0004 = ╱9d╱ EXEC ╱ // 0x1e88 @0x4
0x1e84…1ea1 at0005 = ╱46╱F╱ // 0x1e89 @0x5
0x1e84…1ea1 at0006 = ╱45╱E╱ // 0x1e8a @0x6
0x1e84…1ea1 at0007 = ╱4a╱J╱ // 0x1e8b @0x7
0x1e84…1ea1 at0008 = ╱4c╱L╱ // 0x1e8c @0x8
0x1e84…1ea1 at0009 = ╱ed╱(╱ // 0x1e8d @0x9
0x1e84…1ea1 at000a = ╱33╱3╱ // 0x1e8e @0xa
0x1e84…1ea1 at000b = ╱fe0000c002╱ // 0x1e8f @0xb
0x1e84…1ea1 at0010 = ╱ec╱,╱ // 0x1e94 @0x10
0x1e84…1ea1 at0011 = ╱33╱3╱ // 0x1e95 @0x11
0x1e84…1ea1 at0012 = ╱fe0000c002╱ // 0x1e96 @0x12
0x1e84…1ea1 at0017 = ╱ec╱,╱ // 0x1e9b @0x17
0x1e84…1ea1 at0018 = ╱4b╱K╱ // 0x1e9c @0x18
0x1e84…1ea1 at0019 = ╱35╱5╱ // 0x1e9d @0x19
0x1e84…1ea1 at001a = ╱ef╱$╱ // 0x1e9e @0x1a
0x1e84…1ea1 at001b = ╱ee╱)╱ // 0x1e9f @0x1b
0x1e84…1ea1 at001c = EOL // 0x1ea0 @0x1c
0x1e84…1ea1 }
0x1ea1…1ece ac25 2650 GET K5$,S+2:FUKODE$,FÅDEBET$,FÅKREDIT$
0x1ea1…1ece LineComalBin {
0x1ea1…1ece ptr = 0xac25 // 0x1ea1 @0x0
0x1ea1…1ece lno = 0x0a5a // 0x1ea3 @0x2
0x1ea1…1ece at0004 = ╱a9╱ GET ╱ // 0x1ea5 @0x4
0x1ea1…1ece at0005 = ╱4b╱K╱ // 0x1ea6 @0x5
0x1ea1…1ece at0006 = ╱35╱5╱ // 0x1ea7 @0x6
0x1ea1…1ece at0007 = ╱ef╱$╱ // 0x1ea8 @0x7
0x1ea1…1ece at0008 = ╱ec╱,╱ // 0x1ea9 @0x8
0x1ea1…1ece at0009 = ╱53╱S╱ // 0x1eaa @0x9
0x1ea1…1ece at000a = ╱e2╱+╱ // 0x1eab @0xa
0x1ea1…1ece at000b = ╱32╱2╱ // 0x1eac @0xb
0x1ea1…1ece at000c = ╱fe00008002╱ // 0x1ead @0xc
0x1ea1…1ece at0011 = ╱f0╱:╱ // 0x1eb2 @0x11
0x1ea1…1ece at0012 = ╱46╱F╱ // 0x1eb3 @0x12
0x1ea1…1ece at0013 = ╱55╱U╱ // 0x1eb4 @0x13
0x1ea1…1ece at0014 = ╱4b╱K╱ // 0x1eb5 @0x14
0x1ea1…1ece at0015 = ╱4f╱O╱ // 0x1eb6 @0x15
0x1ea1…1ece at0016 = ╱44╱D╱ // 0x1eb7 @0x16
0x1ea1…1ece at0017 = ╱45╱E╱ // 0x1eb8 @0x17
0x1ea1…1ece at0018 = ╱ef╱$╱ // 0x1eb9 @0x18
0x1ea1…1ece at0019 = ╱ec╱,╱ // 0x1eba @0x19
0x1ea1…1ece at001a = ╱46╱F╱ // 0x1ebb @0x1a
0x1ea1…1ece at001b = ╱5d╱Å╱ // 0x1ebc @0x1b
0x1ea1…1ece at001c = ╱44╱D╱ // 0x1ebd @0x1c
0x1ea1…1ece at001d = ╱45╱E╱ // 0x1ebe @0x1d
0x1ea1…1ece at001e = ╱42╱B╱ // 0x1ebf @0x1e
0x1ea1…1ece at001f = ╱45╱E╱ // 0x1ec0 @0x1f
0x1ea1…1ece at0020 = ╱54╱T╱ // 0x1ec1 @0x20
0x1ea1…1ece at0021 = ╱ef╱$╱ // 0x1ec2 @0x21
0x1ea1…1ece at0022 = ╱ec╱,╱ // 0x1ec3 @0x22
0x1ea1…1ece at0023 = ╱46╱F╱ // 0x1ec4 @0x23
0x1ea1…1ece at0024 = ╱5d╱Å╱ // 0x1ec5 @0x24
0x1ea1…1ece at0025 = ╱4b╱K╱ // 0x1ec6 @0x25
0x1ea1…1ece at0026 = ╱52╱R╱ // 0x1ec7 @0x26
0x1ea1…1ece at0027 = ╱45╱E╱ // 0x1ec8 @0x27
0x1ea1…1ece at0028 = ╱44╱D╱ // 0x1ec9 @0x28
0x1ea1…1ece at0029 = ╱49╱I╱ // 0x1eca @0x29
0x1ea1…1ece at002a = ╱54╱T╱ // 0x1ecb @0x2a
0x1ea1…1ece at002b = ╱ef╱$╱ // 0x1ecc @0x2b
0x1ea1…1ece at002c = EOL // 0x1ecd @0x2c
0x1ea1…1ece }
0x1ece…1eeb ac42 2660 EXEC FEJL(3,4,K5$)
0x1ece…1eeb LineComalBin {
0x1ece…1eeb ptr = 0xac42 // 0x1ece @0x0
0x1ece…1eeb lno = 0x0a64 // 0x1ed0 @0x2
0x1ece…1eeb at0004 = ╱9d╱ EXEC ╱ // 0x1ed2 @0x4
0x1ece…1eeb at0005 = ╱46╱F╱ // 0x1ed3 @0x5
0x1ece…1eeb at0006 = ╱45╱E╱ // 0x1ed4 @0x6
0x1ece…1eeb at0007 = ╱4a╱J╱ // 0x1ed5 @0x7
0x1ece…1eeb at0008 = ╱4c╱L╱ // 0x1ed6 @0x8
0x1ece…1eeb at0009 = ╱ed╱(╱ // 0x1ed7 @0x9
0x1ece…1eeb at000a = ╱33╱3╱ // 0x1ed8 @0xa
0x1ece…1eeb at000b = ╱fe0000c002╱ // 0x1ed9 @0xb
0x1ece…1eeb at0010 = ╱ec╱,╱ // 0x1ede @0x10
0x1ece…1eeb at0011 = ╱34╱4╱ // 0x1edf @0x11
0x1ece…1eeb at0012 = ╱fe00008003╱ // 0x1ee0 @0x12
0x1ece…1eeb at0017 = ╱ec╱,╱ // 0x1ee5 @0x17
0x1ece…1eeb at0018 = ╱4b╱K╱ // 0x1ee6 @0x18
0x1ece…1eeb at0019 = ╱35╱5╱ // 0x1ee7 @0x19
0x1ece…1eeb at001a = ╱ef╱$╱ // 0x1ee8 @0x1a
0x1ece…1eeb at001b = ╱ee╱)╱ // 0x1ee9 @0x1b
0x1ece…1eeb at001c = EOL // 0x1eea @0x1c
0x1ece…1eeb }
0x1eeb…1ef1 ac48 2670 ENDPROC
0x1eeb…1ef1 LineComalBin {
0x1eeb…1ef1 ptr = 0xac48 // 0x1eeb @0x0
0x1eeb…1ef1 lno = 0x0a6e // 0x1eed @0x2
0x1eeb…1ef1 at0004 = ╱9f╱ ENDPROC ╱ // 0x1eef @0x4
0x1eeb…1ef1 at0005 = EOL // 0x1ef0 @0x5
0x1eeb…1ef1 }
0x1ef1…1f01 ac58 2680 PROC HENTKRPOST
0x1ef1…1f01 LineComalBin {
0x1ef1…1f01 ptr = 0xac58 // 0x1ef1 @0x0
0x1ef1…1f01 lno = 0x0a78 // 0x1ef3 @0x2
0x1ef1…1f01 at0004 = ╱9e╱ PROC ╱ // 0x1ef5 @0x4
0x1ef1…1f01 at0005 = ╱48╱H╱ // 0x1ef6 @0x5
0x1ef1…1f01 at0006 = ╱45╱E╱ // 0x1ef7 @0x6
0x1ef1…1f01 at0007 = ╱4e╱N╱ // 0x1ef8 @0x7
0x1ef1…1f01 at0008 = ╱54╱T╱ // 0x1ef9 @0x8
0x1ef1…1f01 at0009 = ╱4b╱K╱ // 0x1efa @0x9
0x1ef1…1f01 at000a = ╱52╱R╱ // 0x1efb @0xa
0x1ef1…1f01 at000b = ╱50╱P╱ // 0x1efc @0xb
0x1ef1…1f01 at000c = ╱4f╱O╱ // 0x1efd @0xc
0x1ef1…1f01 at000d = ╱53╱S╱ // 0x1efe @0xd
0x1ef1…1f01 at000e = ╱54╱T╱ // 0x1eff @0xe
0x1ef1…1f01 at000f = EOL // 0x1f00 @0xf
0x1ef1…1f01 }
0x1f01…1f1a ac71 2690 S=KTAB(KPIL3,2)
0x1f01…1f1a LineComalBin {
0x1f01…1f1a ptr = 0xac71 // 0x1f01 @0x0
0x1f01…1f1a lno = 0x0a82 // 0x1f03 @0x2
0x1f01…1f1a at0004 = ╱53╱S╱ // 0x1f05 @0x4
0x1f01…1f1a at0005 = ╱dc╱=╱ // 0x1f06 @0x5
0x1f01…1f1a at0006 = ╱4b╱K╱ // 0x1f07 @0x6
0x1f01…1f1a at0007 = ╱54╱T╱ // 0x1f08 @0x7
0x1f01…1f1a at0008 = ╱41╱A╱ // 0x1f09 @0x8
0x1f01…1f1a at0009 = ╱42╱B╱ // 0x1f0a @0x9
0x1f01…1f1a at000a = ╱ed╱(╱ // 0x1f0b @0xa
0x1f01…1f1a at000b = ╱4b╱K╱ // 0x1f0c @0xb
0x1f01…1f1a at000c = ╱50╱P╱ // 0x1f0d @0xc
0x1f01…1f1a at000d = ╱49╱I╱ // 0x1f0e @0xd
0x1f01…1f1a at000e = ╱4c╱L╱ // 0x1f0f @0xe
0x1f01…1f1a at000f = ╱33╱3╱ // 0x1f10 @0xf
0x1f01…1f1a at0010 = ╱ec╱,╱ // 0x1f11 @0x10
0x1f01…1f1a at0011 = ╱32╱2╱ // 0x1f12 @0x11
0x1f01…1f1a at0012 = ╱fe00008002╱ // 0x1f13 @0x12
0x1f01…1f1a at0017 = ╱ee╱)╱ // 0x1f18 @0x17
0x1f01…1f1a at0018 = EOL // 0x1f19 @0x18
0x1f01…1f1a }
0x1f1a…1f3d ac94 2700 GET K7$,S:KRENR,KRENAVN$,KREGADE$
0x1f1a…1f3d LineComalBin {
0x1f1a…1f3d ptr = 0xac94 // 0x1f1a @0x0
0x1f1a…1f3d lno = 0x0a8c // 0x1f1c @0x2
0x1f1a…1f3d at0004 = ╱a9╱ GET ╱ // 0x1f1e @0x4
0x1f1a…1f3d at0005 = ╱4b╱K╱ // 0x1f1f @0x5
0x1f1a…1f3d at0006 = ╱37╱7╱ // 0x1f20 @0x6
0x1f1a…1f3d at0007 = ╱ef╱$╱ // 0x1f21 @0x7
0x1f1a…1f3d at0008 = ╱ec╱,╱ // 0x1f22 @0x8
0x1f1a…1f3d at0009 = ╱53╱S╱ // 0x1f23 @0x9
0x1f1a…1f3d at000a = ╱f0╱:╱ // 0x1f24 @0xa
0x1f1a…1f3d at000b = ╱4b╱K╱ // 0x1f25 @0xb
0x1f1a…1f3d at000c = ╱52╱R╱ // 0x1f26 @0xc
0x1f1a…1f3d at000d = ╱45╱E╱ // 0x1f27 @0xd
0x1f1a…1f3d at000e = ╱4e╱N╱ // 0x1f28 @0xe
0x1f1a…1f3d at000f = ╱52╱R╱ // 0x1f29 @0xf
0x1f1a…1f3d at0010 = ╱ec╱,╱ // 0x1f2a @0x10
0x1f1a…1f3d at0011 = ╱4b╱K╱ // 0x1f2b @0x11
0x1f1a…1f3d at0012 = ╱52╱R╱ // 0x1f2c @0x12
0x1f1a…1f3d at0013 = ╱45╱E╱ // 0x1f2d @0x13
0x1f1a…1f3d at0014 = ╱4e╱N╱ // 0x1f2e @0x14
0x1f1a…1f3d at0015 = ╱41╱A╱ // 0x1f2f @0x15
0x1f1a…1f3d at0016 = ╱56╱V╱ // 0x1f30 @0x16
0x1f1a…1f3d at0017 = ╱4e╱N╱ // 0x1f31 @0x17
0x1f1a…1f3d at0018 = ╱ef╱$╱ // 0x1f32 @0x18
0x1f1a…1f3d at0019 = ╱ec╱,╱ // 0x1f33 @0x19
0x1f1a…1f3d at001a = ╱4b╱K╱ // 0x1f34 @0x1a
0x1f1a…1f3d at001b = ╱52╱R╱ // 0x1f35 @0x1b
0x1f1a…1f3d at001c = ╱45╱E╱ // 0x1f36 @0x1c
0x1f1a…1f3d at001d = ╱47╱G╱ // 0x1f37 @0x1d
0x1f1a…1f3d at001e = ╱41╱A╱ // 0x1f38 @0x1e
0x1f1a…1f3d at001f = ╱44╱D╱ // 0x1f39 @0x1f
0x1f1a…1f3d at0020 = ╱45╱E╱ // 0x1f3a @0x20
0x1f1a…1f3d at0021 = ╱ef╱$╱ // 0x1f3b @0x21
0x1f1a…1f3d at0022 = EOL // 0x1f3c @0x22
0x1f1a…1f3d }
0x1f3d…1f5a acb1 2710 EXEC FEJL(4,1,K7$)
0x1f3d…1f5a LineComalBin {
0x1f3d…1f5a ptr = 0xacb1 // 0x1f3d @0x0
0x1f3d…1f5a lno = 0x0a96 // 0x1f3f @0x2
0x1f3d…1f5a at0004 = ╱9d╱ EXEC ╱ // 0x1f41 @0x4
0x1f3d…1f5a at0005 = ╱46╱F╱ // 0x1f42 @0x5
0x1f3d…1f5a at0006 = ╱45╱E╱ // 0x1f43 @0x6
0x1f3d…1f5a at0007 = ╱4a╱J╱ // 0x1f44 @0x7
0x1f3d…1f5a at0008 = ╱4c╱L╱ // 0x1f45 @0x8
0x1f3d…1f5a at0009 = ╱ed╱(╱ // 0x1f46 @0x9
0x1f3d…1f5a at000a = ╱34╱4╱ // 0x1f47 @0xa
0x1f3d…1f5a at000b = ╱fe00008003╱ // 0x1f48 @0xb
0x1f3d…1f5a at0010 = ╱ec╱,╱ // 0x1f4d @0x10
0x1f3d…1f5a at0011 = ╱31╱1╱ // 0x1f4e @0x11
0x1f3d…1f5a at0012 = ╱fe00008001╱ // 0x1f4f @0x12
0x1f3d…1f5a at0017 = ╱ec╱,╱ // 0x1f54 @0x17
0x1f3d…1f5a at0018 = ╱4b╱K╱ // 0x1f55 @0x18
0x1f3d…1f5a at0019 = ╱37╱7╱ // 0x1f56 @0x19
0x1f3d…1f5a at001a = ╱ef╱$╱ // 0x1f57 @0x1a
0x1f3d…1f5a at001b = ╱ee╱)╱ // 0x1f58 @0x1b
0x1f3d…1f5a at001c = EOL // 0x1f59 @0x1c
0x1f3d…1f5a }
0x1f5a…1f9c acf3 2720 GET K7$,S+1:KREBY$,KRELK$,KRGR$,KREPOSTNR,KSALDO1$,KSALDO2$
0x1f5a…1f9c LineComalBin {
0x1f5a…1f9c ptr = 0xacf3 // 0x1f5a @0x0
0x1f5a…1f9c lno = 0x0aa0 // 0x1f5c @0x2
0x1f5a…1f9c at0004 = ╱a9╱ GET ╱ // 0x1f5e @0x4
0x1f5a…1f9c at0005 = ╱4b╱K╱ // 0x1f5f @0x5
0x1f5a…1f9c at0006 = ╱37╱7╱ // 0x1f60 @0x6
0x1f5a…1f9c at0007 = ╱ef╱$╱ // 0x1f61 @0x7
0x1f5a…1f9c at0008 = ╱ec╱,╱ // 0x1f62 @0x8
0x1f5a…1f9c at0009 = ╱53╱S╱ // 0x1f63 @0x9
0x1f5a…1f9c at000a = ╱e2╱+╱ // 0x1f64 @0xa
0x1f5a…1f9c at000b = ╱31╱1╱ // 0x1f65 @0xb
0x1f5a…1f9c at000c = ╱fe00008001╱ // 0x1f66 @0xc
0x1f5a…1f9c at0011 = ╱f0╱:╱ // 0x1f6b @0x11
0x1f5a…1f9c at0012 = ╱4b╱K╱ // 0x1f6c @0x12
0x1f5a…1f9c at0013 = ╱52╱R╱ // 0x1f6d @0x13
0x1f5a…1f9c at0014 = ╱45╱E╱ // 0x1f6e @0x14
0x1f5a…1f9c at0015 = ╱42╱B╱ // 0x1f6f @0x15
0x1f5a…1f9c at0016 = ╱59╱Y╱ // 0x1f70 @0x16
0x1f5a…1f9c at0017 = ╱ef╱$╱ // 0x1f71 @0x17
0x1f5a…1f9c at0018 = ╱ec╱,╱ // 0x1f72 @0x18
0x1f5a…1f9c at0019 = ╱4b╱K╱ // 0x1f73 @0x19
0x1f5a…1f9c at001a = ╱52╱R╱ // 0x1f74 @0x1a
0x1f5a…1f9c at001b = ╱45╱E╱ // 0x1f75 @0x1b
0x1f5a…1f9c at001c = ╱4c╱L╱ // 0x1f76 @0x1c
0x1f5a…1f9c at001d = ╱4b╱K╱ // 0x1f77 @0x1d
0x1f5a…1f9c at001e = ╱ef╱$╱ // 0x1f78 @0x1e
0x1f5a…1f9c at001f = ╱ec╱,╱ // 0x1f79 @0x1f
0x1f5a…1f9c at0020 = ╱4b╱K╱ // 0x1f7a @0x20
0x1f5a…1f9c at0021 = ╱52╱R╱ // 0x1f7b @0x21
0x1f5a…1f9c at0022 = ╱47╱G╱ // 0x1f7c @0x22
0x1f5a…1f9c at0023 = ╱52╱R╱ // 0x1f7d @0x23
0x1f5a…1f9c at0024 = ╱ef╱$╱ // 0x1f7e @0x24
0x1f5a…1f9c at0025 = ╱ec╱,╱ // 0x1f7f @0x25
0x1f5a…1f9c at0026 = ╱4b╱K╱ // 0x1f80 @0x26
0x1f5a…1f9c at0027 = ╱52╱R╱ // 0x1f81 @0x27
0x1f5a…1f9c at0028 = ╱45╱E╱ // 0x1f82 @0x28
0x1f5a…1f9c at0029 = ╱50╱P╱ // 0x1f83 @0x29
0x1f5a…1f9c at002a = ╱4f╱O╱ // 0x1f84 @0x2a
0x1f5a…1f9c at002b = ╱53╱S╱ // 0x1f85 @0x2b
0x1f5a…1f9c at002c = ╱54╱T╱ // 0x1f86 @0x2c
0x1f5a…1f9c at002d = ╱4e╱N╱ // 0x1f87 @0x2d
0x1f5a…1f9c at002e = ╱52╱R╱ // 0x1f88 @0x2e
0x1f5a…1f9c at002f = ╱ec╱,╱ // 0x1f89 @0x2f
0x1f5a…1f9c at0030 = ╱4b╱K╱ // 0x1f8a @0x30
0x1f5a…1f9c at0031 = ╱53╱S╱ // 0x1f8b @0x31
0x1f5a…1f9c at0032 = ╱41╱A╱ // 0x1f8c @0x32
0x1f5a…1f9c at0033 = ╱4c╱L╱ // 0x1f8d @0x33
0x1f5a…1f9c at0034 = ╱44╱D╱ // 0x1f8e @0x34
0x1f5a…1f9c at0035 = ╱4f╱O╱ // 0x1f8f @0x35
0x1f5a…1f9c at0036 = ╱31╱1╱ // 0x1f90 @0x36
0x1f5a…1f9c at0037 = ╱ef╱$╱ // 0x1f91 @0x37
0x1f5a…1f9c at0038 = ╱ec╱,╱ // 0x1f92 @0x38
0x1f5a…1f9c at0039 = ╱4b╱K╱ // 0x1f93 @0x39
0x1f5a…1f9c at003a = ╱53╱S╱ // 0x1f94 @0x3a
0x1f5a…1f9c at003b = ╱41╱A╱ // 0x1f95 @0x3b
0x1f5a…1f9c at003c = ╱4c╱L╱ // 0x1f96 @0x3c
0x1f5a…1f9c at003d = ╱44╱D╱ // 0x1f97 @0x3d
0x1f5a…1f9c at003e = ╱4f╱O╱ // 0x1f98 @0x3e
0x1f5a…1f9c at003f = ╱32╱2╱ // 0x1f99 @0x3f
0x1f5a…1f9c at0040 = ╱ef╱$╱ // 0x1f9a @0x40
0x1f5a…1f9c at0041 = EOL // 0x1f9b @0x41
0x1f5a…1f9c }
0x1f9c…1fb9 ad10 2730 EXEC FEJL(4,2,K7$)
0x1f9c…1fb9 LineComalBin {
0x1f9c…1fb9 ptr = 0xad10 // 0x1f9c @0x0
0x1f9c…1fb9 lno = 0x0aaa // 0x1f9e @0x2
0x1f9c…1fb9 at0004 = ╱9d╱ EXEC ╱ // 0x1fa0 @0x4
0x1f9c…1fb9 at0005 = ╱46╱F╱ // 0x1fa1 @0x5
0x1f9c…1fb9 at0006 = ╱45╱E╱ // 0x1fa2 @0x6
0x1f9c…1fb9 at0007 = ╱4a╱J╱ // 0x1fa3 @0x7
0x1f9c…1fb9 at0008 = ╱4c╱L╱ // 0x1fa4 @0x8
0x1f9c…1fb9 at0009 = ╱ed╱(╱ // 0x1fa5 @0x9
0x1f9c…1fb9 at000a = ╱34╱4╱ // 0x1fa6 @0xa
0x1f9c…1fb9 at000b = ╱fe00008003╱ // 0x1fa7 @0xb
0x1f9c…1fb9 at0010 = ╱ec╱,╱ // 0x1fac @0x10
0x1f9c…1fb9 at0011 = ╱32╱2╱ // 0x1fad @0x11
0x1f9c…1fb9 at0012 = ╱fe00008002╱ // 0x1fae @0x12
0x1f9c…1fb9 at0017 = ╱ec╱,╱ // 0x1fb3 @0x17
0x1f9c…1fb9 at0018 = ╱4b╱K╱ // 0x1fb4 @0x18
0x1f9c…1fb9 at0019 = ╱37╱7╱ // 0x1fb5 @0x19
0x1f9c…1fb9 at001a = ╱ef╱$╱ // 0x1fb6 @0x1a
0x1f9c…1fb9 at001b = ╱ee╱)╱ // 0x1fb7 @0x1b
0x1f9c…1fb9 at001c = EOL // 0x1fb8 @0x1c
0x1f9c…1fb9 }
0x1fb9…1fbf ad16 2740 ENDPROC
0x1fb9…1fbf LineComalBin {
0x1fb9…1fbf ptr = 0xad16 // 0x1fb9 @0x0
0x1fb9…1fbf lno = 0x0ab4 // 0x1fbb @0x2
0x1fb9…1fbf at0004 = ╱9f╱ ENDPROC ╱ // 0x1fbd @0x4
0x1fb9…1fbf at0005 = EOL // 0x1fbe @0x5
0x1fb9…1fbf }
0x1fbf…1fce ad25 2750 PROC GEMKRPOST
0x1fbf…1fce LineComalBin {
0x1fbf…1fce ptr = 0xad25 // 0x1fbf @0x0
0x1fbf…1fce lno = 0x0abe // 0x1fc1 @0x2
0x1fbf…1fce at0004 = ╱9e╱ PROC ╱ // 0x1fc3 @0x4
0x1fbf…1fce at0005 = ╱47╱G╱ // 0x1fc4 @0x5
0x1fbf…1fce at0006 = ╱45╱E╱ // 0x1fc5 @0x6
0x1fbf…1fce at0007 = ╱4d╱M╱ // 0x1fc6 @0x7
0x1fbf…1fce at0008 = ╱4b╱K╱ // 0x1fc7 @0x8
0x1fbf…1fce at0009 = ╱52╱R╱ // 0x1fc8 @0x9
0x1fbf…1fce at000a = ╱50╱P╱ // 0x1fc9 @0xa
0x1fbf…1fce at000b = ╱4f╱O╱ // 0x1fca @0xb
0x1fbf…1fce at000c = ╱53╱S╱ // 0x1fcb @0xc
0x1fbf…1fce at000d = ╱54╱T╱ // 0x1fcc @0xd
0x1fbf…1fce at000e = EOL // 0x1fcd @0xe
0x1fbf…1fce }
0x1fce…1fe7 ad3e 2760 S=KTAB(KPIL3,2)
0x1fce…1fe7 LineComalBin {
0x1fce…1fe7 ptr = 0xad3e // 0x1fce @0x0
0x1fce…1fe7 lno = 0x0ac8 // 0x1fd0 @0x2
0x1fce…1fe7 at0004 = ╱53╱S╱ // 0x1fd2 @0x4
0x1fce…1fe7 at0005 = ╱dc╱=╱ // 0x1fd3 @0x5
0x1fce…1fe7 at0006 = ╱4b╱K╱ // 0x1fd4 @0x6
0x1fce…1fe7 at0007 = ╱54╱T╱ // 0x1fd5 @0x7
0x1fce…1fe7 at0008 = ╱41╱A╱ // 0x1fd6 @0x8
0x1fce…1fe7 at0009 = ╱42╱B╱ // 0x1fd7 @0x9
0x1fce…1fe7 at000a = ╱ed╱(╱ // 0x1fd8 @0xa
0x1fce…1fe7 at000b = ╱4b╱K╱ // 0x1fd9 @0xb
0x1fce…1fe7 at000c = ╱50╱P╱ // 0x1fda @0xc
0x1fce…1fe7 at000d = ╱49╱I╱ // 0x1fdb @0xd
0x1fce…1fe7 at000e = ╱4c╱L╱ // 0x1fdc @0xe
0x1fce…1fe7 at000f = ╱33╱3╱ // 0x1fdd @0xf
0x1fce…1fe7 at0010 = ╱ec╱,╱ // 0x1fde @0x10
0x1fce…1fe7 at0011 = ╱32╱2╱ // 0x1fdf @0x11
0x1fce…1fe7 at0012 = ╱fe00008002╱ // 0x1fe0 @0x12
0x1fce…1fe7 at0017 = ╱ee╱)╱ // 0x1fe5 @0x17
0x1fce…1fe7 at0018 = EOL // 0x1fe6 @0x18
0x1fce…1fe7 }
0x1fe7…200a ad61 2770 PUT K7$,S:KRENR,KRENAVN$,KREGADE$
0x1fe7…200a LineComalBin {
0x1fe7…200a ptr = 0xad61 // 0x1fe7 @0x0
0x1fe7…200a lno = 0x0ad2 // 0x1fe9 @0x2
0x1fe7…200a at0004 = ╱aa╱ PUT ╱ // 0x1feb @0x4
0x1fe7…200a at0005 = ╱4b╱K╱ // 0x1fec @0x5
0x1fe7…200a at0006 = ╱37╱7╱ // 0x1fed @0x6
0x1fe7…200a at0007 = ╱ef╱$╱ // 0x1fee @0x7
0x1fe7…200a at0008 = ╱ec╱,╱ // 0x1fef @0x8
0x1fe7…200a at0009 = ╱53╱S╱ // 0x1ff0 @0x9
0x1fe7…200a at000a = ╱f0╱:╱ // 0x1ff1 @0xa
0x1fe7…200a at000b = ╱4b╱K╱ // 0x1ff2 @0xb
0x1fe7…200a at000c = ╱52╱R╱ // 0x1ff3 @0xc
0x1fe7…200a at000d = ╱45╱E╱ // 0x1ff4 @0xd
0x1fe7…200a at000e = ╱4e╱N╱ // 0x1ff5 @0xe
0x1fe7…200a at000f = ╱52╱R╱ // 0x1ff6 @0xf
0x1fe7…200a at0010 = ╱ec╱,╱ // 0x1ff7 @0x10
0x1fe7…200a at0011 = ╱4b╱K╱ // 0x1ff8 @0x11
0x1fe7…200a at0012 = ╱52╱R╱ // 0x1ff9 @0x12
0x1fe7…200a at0013 = ╱45╱E╱ // 0x1ffa @0x13
0x1fe7…200a at0014 = ╱4e╱N╱ // 0x1ffb @0x14
0x1fe7…200a at0015 = ╱41╱A╱ // 0x1ffc @0x15
0x1fe7…200a at0016 = ╱56╱V╱ // 0x1ffd @0x16
0x1fe7…200a at0017 = ╱4e╱N╱ // 0x1ffe @0x17
0x1fe7…200a at0018 = ╱ef╱$╱ // 0x1fff @0x18
0x1fe7…200a at0019 = ╱ec╱,╱ // 0x2000 @0x19
0x1fe7…200a at001a = ╱4b╱K╱ // 0x2001 @0x1a
0x1fe7…200a at001b = ╱52╱R╱ // 0x2002 @0x1b
0x1fe7…200a at001c = ╱45╱E╱ // 0x2003 @0x1c
0x1fe7…200a at001d = ╱47╱G╱ // 0x2004 @0x1d
0x1fe7…200a at001e = ╱41╱A╱ // 0x2005 @0x1e
0x1fe7…200a at001f = ╱44╱D╱ // 0x2006 @0x1f
0x1fe7…200a at0020 = ╱45╱E╱ // 0x2007 @0x20
0x1fe7…200a at0021 = ╱ef╱$╱ // 0x2008 @0x21
0x1fe7…200a at0022 = EOL // 0x2009 @0x22
0x1fe7…200a }
0x200a…2027 ad7e 2780 EXEC FEJL(5,1,K7$)
0x200a…2027 LineComalBin {
0x200a…2027 ptr = 0xad7e // 0x200a @0x0
0x200a…2027 lno = 0x0adc // 0x200c @0x2
0x200a…2027 at0004 = ╱9d╱ EXEC ╱ // 0x200e @0x4
0x200a…2027 at0005 = ╱46╱F╱ // 0x200f @0x5
0x200a…2027 at0006 = ╱45╱E╱ // 0x2010 @0x6
0x200a…2027 at0007 = ╱4a╱J╱ // 0x2011 @0x7
0x200a…2027 at0008 = ╱4c╱L╱ // 0x2012 @0x8
0x200a…2027 at0009 = ╱ed╱(╱ // 0x2013 @0x9
0x200a…2027 at000a = ╱35╱5╱ // 0x2014 @0xa
0x200a…2027 at000b = ╱fe0000a003╱ // 0x2015 @0xb
0x200a…2027 at0010 = ╱ec╱,╱ // 0x201a @0x10
0x200a…2027 at0011 = ╱31╱1╱ // 0x201b @0x11
0x200a…2027 at0012 = ╱fe00008001╱ // 0x201c @0x12
0x200a…2027 at0017 = ╱ec╱,╱ // 0x2021 @0x17
0x200a…2027 at0018 = ╱4b╱K╱ // 0x2022 @0x18
0x200a…2027 at0019 = ╱37╱7╱ // 0x2023 @0x19
0x200a…2027 at001a = ╱ef╱$╱ // 0x2024 @0x1a
0x200a…2027 at001b = ╱ee╱)╱ // 0x2025 @0x1b
0x200a…2027 at001c = EOL // 0x2026 @0x1c
0x200a…2027 }
0x2027…2069 adc0 2790 PUT K7$,S+1:KREBY$,KRELK$,KRGR$,KREPOSTNR,KSALDO1$,KSALDO2$
0x2027…2069 LineComalBin {
0x2027…2069 ptr = 0xadc0 // 0x2027 @0x0
0x2027…2069 lno = 0x0ae6 // 0x2029 @0x2
0x2027…2069 at0004 = ╱aa╱ PUT ╱ // 0x202b @0x4
0x2027…2069 at0005 = ╱4b╱K╱ // 0x202c @0x5
0x2027…2069 at0006 = ╱37╱7╱ // 0x202d @0x6
0x2027…2069 at0007 = ╱ef╱$╱ // 0x202e @0x7
0x2027…2069 at0008 = ╱ec╱,╱ // 0x202f @0x8
0x2027…2069 at0009 = ╱53╱S╱ // 0x2030 @0x9
0x2027…2069 at000a = ╱e2╱+╱ // 0x2031 @0xa
0x2027…2069 at000b = ╱31╱1╱ // 0x2032 @0xb
0x2027…2069 at000c = ╱fe00008001╱ // 0x2033 @0xc
0x2027…2069 at0011 = ╱f0╱:╱ // 0x2038 @0x11
0x2027…2069 at0012 = ╱4b╱K╱ // 0x2039 @0x12
0x2027…2069 at0013 = ╱52╱R╱ // 0x203a @0x13
0x2027…2069 at0014 = ╱45╱E╱ // 0x203b @0x14
0x2027…2069 at0015 = ╱42╱B╱ // 0x203c @0x15
0x2027…2069 at0016 = ╱59╱Y╱ // 0x203d @0x16
0x2027…2069 at0017 = ╱ef╱$╱ // 0x203e @0x17
0x2027…2069 at0018 = ╱ec╱,╱ // 0x203f @0x18
0x2027…2069 at0019 = ╱4b╱K╱ // 0x2040 @0x19
0x2027…2069 at001a = ╱52╱R╱ // 0x2041 @0x1a
0x2027…2069 at001b = ╱45╱E╱ // 0x2042 @0x1b
0x2027…2069 at001c = ╱4c╱L╱ // 0x2043 @0x1c
0x2027…2069 at001d = ╱4b╱K╱ // 0x2044 @0x1d
0x2027…2069 at001e = ╱ef╱$╱ // 0x2045 @0x1e
0x2027…2069 at001f = ╱ec╱,╱ // 0x2046 @0x1f
0x2027…2069 at0020 = ╱4b╱K╱ // 0x2047 @0x20
0x2027…2069 at0021 = ╱52╱R╱ // 0x2048 @0x21
0x2027…2069 at0022 = ╱47╱G╱ // 0x2049 @0x22
0x2027…2069 at0023 = ╱52╱R╱ // 0x204a @0x23
0x2027…2069 at0024 = ╱ef╱$╱ // 0x204b @0x24
0x2027…2069 at0025 = ╱ec╱,╱ // 0x204c @0x25
0x2027…2069 at0026 = ╱4b╱K╱ // 0x204d @0x26
0x2027…2069 at0027 = ╱52╱R╱ // 0x204e @0x27
0x2027…2069 at0028 = ╱45╱E╱ // 0x204f @0x28
0x2027…2069 at0029 = ╱50╱P╱ // 0x2050 @0x29
0x2027…2069 at002a = ╱4f╱O╱ // 0x2051 @0x2a
0x2027…2069 at002b = ╱53╱S╱ // 0x2052 @0x2b
0x2027…2069 at002c = ╱54╱T╱ // 0x2053 @0x2c
0x2027…2069 at002d = ╱4e╱N╱ // 0x2054 @0x2d
0x2027…2069 at002e = ╱52╱R╱ // 0x2055 @0x2e
0x2027…2069 at002f = ╱ec╱,╱ // 0x2056 @0x2f
0x2027…2069 at0030 = ╱4b╱K╱ // 0x2057 @0x30
0x2027…2069 at0031 = ╱53╱S╱ // 0x2058 @0x31
0x2027…2069 at0032 = ╱41╱A╱ // 0x2059 @0x32
0x2027…2069 at0033 = ╱4c╱L╱ // 0x205a @0x33
0x2027…2069 at0034 = ╱44╱D╱ // 0x205b @0x34
0x2027…2069 at0035 = ╱4f╱O╱ // 0x205c @0x35
0x2027…2069 at0036 = ╱31╱1╱ // 0x205d @0x36
0x2027…2069 at0037 = ╱ef╱$╱ // 0x205e @0x37
0x2027…2069 at0038 = ╱ec╱,╱ // 0x205f @0x38
0x2027…2069 at0039 = ╱4b╱K╱ // 0x2060 @0x39
0x2027…2069 at003a = ╱53╱S╱ // 0x2061 @0x3a
0x2027…2069 at003b = ╱41╱A╱ // 0x2062 @0x3b
0x2027…2069 at003c = ╱4c╱L╱ // 0x2063 @0x3c
0x2027…2069 at003d = ╱44╱D╱ // 0x2064 @0x3d
0x2027…2069 at003e = ╱4f╱O╱ // 0x2065 @0x3e
0x2027…2069 at003f = ╱32╱2╱ // 0x2066 @0x3f
0x2027…2069 at0040 = ╱ef╱$╱ // 0x2067 @0x40
0x2027…2069 at0041 = EOL // 0x2068 @0x41
0x2027…2069 }
0x2069…2086 addd 2800 EXEC FEJL(5,2,K7$)
0x2069…2086 LineComalBin {
0x2069…2086 ptr = 0xaddd // 0x2069 @0x0
0x2069…2086 lno = 0x0af0 // 0x206b @0x2
0x2069…2086 at0004 = ╱9d╱ EXEC ╱ // 0x206d @0x4
0x2069…2086 at0005 = ╱46╱F╱ // 0x206e @0x5
0x2069…2086 at0006 = ╱45╱E╱ // 0x206f @0x6
0x2069…2086 at0007 = ╱4a╱J╱ // 0x2070 @0x7
0x2069…2086 at0008 = ╱4c╱L╱ // 0x2071 @0x8
0x2069…2086 at0009 = ╱ed╱(╱ // 0x2072 @0x9
0x2069…2086 at000a = ╱35╱5╱ // 0x2073 @0xa
0x2069…2086 at000b = ╱fe0000a003╱ // 0x2074 @0xb
0x2069…2086 at0010 = ╱ec╱,╱ // 0x2079 @0x10
0x2069…2086 at0011 = ╱32╱2╱ // 0x207a @0x11
0x2069…2086 at0012 = ╱fe00008002╱ // 0x207b @0x12
0x2069…2086 at0017 = ╱ec╱,╱ // 0x2080 @0x17
0x2069…2086 at0018 = ╱4b╱K╱ // 0x2081 @0x18
0x2069…2086 at0019 = ╱37╱7╱ // 0x2082 @0x19
0x2069…2086 at001a = ╱ef╱$╱ // 0x2083 @0x1a
0x2069…2086 at001b = ╱ee╱)╱ // 0x2084 @0x1b
0x2069…2086 at001c = EOL // 0x2085 @0x1c
0x2069…2086 }
0x2086…208c ade3 2810 ENDPROC
0x2086…208c LineComalBin {
0x2086…208c ptr = 0xade3 // 0x2086 @0x0
0x2086…208c lno = 0x0afa // 0x2088 @0x2
0x2086…208c at0004 = ╱9f╱ ENDPROC ╱ // 0x208a @0x4
0x2086…208c at0005 = EOL // 0x208b @0x5
0x2086…208c }
0x208c…209a adf1 2820 PROC GEMDPOST
0x208c…209a LineComalBin {
0x208c…209a ptr = 0xadf1 // 0x208c @0x0
0x208c…209a lno = 0x0b04 // 0x208e @0x2
0x208c…209a at0004 = ╱9e╱ PROC ╱ // 0x2090 @0x4
0x208c…209a at0005 = ╱47╱G╱ // 0x2091 @0x5
0x208c…209a at0006 = ╱45╱E╱ // 0x2092 @0x6
0x208c…209a at0007 = ╱4d╱M╱ // 0x2093 @0x7
0x208c…209a at0008 = ╱44╱D╱ // 0x2094 @0x8
0x208c…209a at0009 = ╱50╱P╱ // 0x2095 @0x9
0x208c…209a at000a = ╱4f╱O╱ // 0x2096 @0xa
0x208c…209a at000b = ╱53╱S╱ // 0x2097 @0xb
0x208c…209a at000c = ╱54╱T╱ // 0x2098 @0xc
0x208c…209a at000d = EOL // 0x2099 @0xd
0x208c…209a }
0x209a…20b3 ae0a 2830 S=DTAB(DPIL3,2)
0x209a…20b3 LineComalBin {
0x209a…20b3 ptr = 0xae0a // 0x209a @0x0
0x209a…20b3 lno = 0x0b0e // 0x209c @0x2
0x209a…20b3 at0004 = ╱53╱S╱ // 0x209e @0x4
0x209a…20b3 at0005 = ╱dc╱=╱ // 0x209f @0x5
0x209a…20b3 at0006 = ╱44╱D╱ // 0x20a0 @0x6
0x209a…20b3 at0007 = ╱54╱T╱ // 0x20a1 @0x7
0x209a…20b3 at0008 = ╱41╱A╱ // 0x20a2 @0x8
0x209a…20b3 at0009 = ╱42╱B╱ // 0x20a3 @0x9
0x209a…20b3 at000a = ╱ed╱(╱ // 0x20a4 @0xa
0x209a…20b3 at000b = ╱44╱D╱ // 0x20a5 @0xb
0x209a…20b3 at000c = ╱50╱P╱ // 0x20a6 @0xc
0x209a…20b3 at000d = ╱49╱I╱ // 0x20a7 @0xd
0x209a…20b3 at000e = ╱4c╱L╱ // 0x20a8 @0xe
0x209a…20b3 at000f = ╱33╱3╱ // 0x20a9 @0xf
0x209a…20b3 at0010 = ╱ec╱,╱ // 0x20aa @0x10
0x209a…20b3 at0011 = ╱32╱2╱ // 0x20ab @0x11
0x209a…20b3 at0012 = ╱fe00008002╱ // 0x20ac @0x12
0x209a…20b3 at0017 = ╱ee╱)╱ // 0x20b1 @0x17
0x209a…20b3 at0018 = EOL // 0x20b2 @0x18
0x209a…20b3 }
0x20b3…20de ae35 2840 PUT K6$,S:DEBNR,DEBNAVN$,DSALDO1$,DEBKGR$
0x20b3…20de LineComalBin {
0x20b3…20de ptr = 0xae35 // 0x20b3 @0x0
0x20b3…20de lno = 0x0b18 // 0x20b5 @0x2
0x20b3…20de at0004 = ╱aa╱ PUT ╱ // 0x20b7 @0x4
0x20b3…20de at0005 = ╱4b╱K╱ // 0x20b8 @0x5
0x20b3…20de at0006 = ╱36╱6╱ // 0x20b9 @0x6
0x20b3…20de at0007 = ╱ef╱$╱ // 0x20ba @0x7
0x20b3…20de at0008 = ╱ec╱,╱ // 0x20bb @0x8
0x20b3…20de at0009 = ╱53╱S╱ // 0x20bc @0x9
0x20b3…20de at000a = ╱f0╱:╱ // 0x20bd @0xa
0x20b3…20de at000b = ╱44╱D╱ // 0x20be @0xb
0x20b3…20de at000c = ╱45╱E╱ // 0x20bf @0xc
0x20b3…20de at000d = ╱42╱B╱ // 0x20c0 @0xd
0x20b3…20de at000e = ╱4e╱N╱ // 0x20c1 @0xe
0x20b3…20de at000f = ╱52╱R╱ // 0x20c2 @0xf
0x20b3…20de at0010 = ╱ec╱,╱ // 0x20c3 @0x10
0x20b3…20de at0011 = ╱44╱D╱ // 0x20c4 @0x11
0x20b3…20de at0012 = ╱45╱E╱ // 0x20c5 @0x12
0x20b3…20de at0013 = ╱42╱B╱ // 0x20c6 @0x13
0x20b3…20de at0014 = ╱4e╱N╱ // 0x20c7 @0x14
0x20b3…20de at0015 = ╱41╱A╱ // 0x20c8 @0x15
0x20b3…20de at0016 = ╱56╱V╱ // 0x20c9 @0x16
0x20b3…20de at0017 = ╱4e╱N╱ // 0x20ca @0x17
0x20b3…20de at0018 = ╱ef╱$╱ // 0x20cb @0x18
0x20b3…20de at0019 = ╱ec╱,╱ // 0x20cc @0x19
0x20b3…20de at001a = ╱44╱D╱ // 0x20cd @0x1a
0x20b3…20de at001b = ╱53╱S╱ // 0x20ce @0x1b
0x20b3…20de at001c = ╱41╱A╱ // 0x20cf @0x1c
0x20b3…20de at001d = ╱4c╱L╱ // 0x20d0 @0x1d
0x20b3…20de at001e = ╱44╱D╱ // 0x20d1 @0x1e
0x20b3…20de at001f = ╱4f╱O╱ // 0x20d2 @0x1f
0x20b3…20de at0020 = ╱31╱1╱ // 0x20d3 @0x20
0x20b3…20de at0021 = ╱ef╱$╱ // 0x20d4 @0x21
0x20b3…20de at0022 = ╱ec╱,╱ // 0x20d5 @0x22
0x20b3…20de at0023 = ╱44╱D╱ // 0x20d6 @0x23
0x20b3…20de at0024 = ╱45╱E╱ // 0x20d7 @0x24
0x20b3…20de at0025 = ╱42╱B╱ // 0x20d8 @0x25
0x20b3…20de at0026 = ╱4b╱K╱ // 0x20d9 @0x26
0x20b3…20de at0027 = ╱47╱G╱ // 0x20da @0x27
0x20b3…20de at0028 = ╱52╱R╱ // 0x20db @0x28
0x20b3…20de at0029 = ╱ef╱$╱ // 0x20dc @0x29
0x20b3…20de at002a = EOL // 0x20dd @0x2a
0x20b3…20de }
0x20de…20fb ae52 2850 EXEC FEJL(9,3,K6$)
0x20de…20fb LineComalBin {
0x20de…20fb ptr = 0xae52 // 0x20de @0x0
0x20de…20fb lno = 0x0b22 // 0x20e0 @0x2
0x20de…20fb at0004 = ╱9d╱ EXEC ╱ // 0x20e2 @0x4
0x20de…20fb at0005 = ╱46╱F╱ // 0x20e3 @0x5
0x20de…20fb at0006 = ╱45╱E╱ // 0x20e4 @0x6
0x20de…20fb at0007 = ╱4a╱J╱ // 0x20e5 @0x7
0x20de…20fb at0008 = ╱4c╱L╱ // 0x20e6 @0x8
0x20de…20fb at0009 = ╱ed╱(╱ // 0x20e7 @0x9
0x20de…20fb at000a = ╱39╱9╱ // 0x20e8 @0xa
0x20de…20fb at000b = ╱fe00009004╱ // 0x20e9 @0xb
0x20de…20fb at0010 = ╱ec╱,╱ // 0x20ee @0x10
0x20de…20fb at0011 = ╱33╱3╱ // 0x20ef @0x11
0x20de…20fb at0012 = ╱fe0000c002╱ // 0x20f0 @0x12
0x20de…20fb at0017 = ╱ec╱,╱ // 0x20f5 @0x17
0x20de…20fb at0018 = ╱4b╱K╱ // 0x20f6 @0x18
0x20de…20fb at0019 = ╱36╱6╱ // 0x20f7 @0x19
0x20de…20fb at001a = ╱ef╱$╱ // 0x20f8 @0x1a
0x20de…20fb at001b = ╱ee╱)╱ // 0x20f9 @0x1b
0x20de…20fb at001c = EOL // 0x20fa @0x1c
0x20de…20fb }
0x20fb…2139 ae90 2860 PUT K6$,S+1:DSALDO2$,DSALDO3$,DSALDO4$,DEBPOSTNR,DEBLK$
0x20fb…2139 LineComalBin {
0x20fb…2139 ptr = 0xae90 // 0x20fb @0x0
0x20fb…2139 lno = 0x0b2c // 0x20fd @0x2
0x20fb…2139 at0004 = ╱aa╱ PUT ╱ // 0x20ff @0x4
0x20fb…2139 at0005 = ╱4b╱K╱ // 0x2100 @0x5
0x20fb…2139 at0006 = ╱36╱6╱ // 0x2101 @0x6
0x20fb…2139 at0007 = ╱ef╱$╱ // 0x2102 @0x7
0x20fb…2139 at0008 = ╱ec╱,╱ // 0x2103 @0x8
0x20fb…2139 at0009 = ╱53╱S╱ // 0x2104 @0x9
0x20fb…2139 at000a = ╱e2╱+╱ // 0x2105 @0xa
0x20fb…2139 at000b = ╱31╱1╱ // 0x2106 @0xb
0x20fb…2139 at000c = ╱fe00008001╱ // 0x2107 @0xc
0x20fb…2139 at0011 = ╱f0╱:╱ // 0x210c @0x11
0x20fb…2139 at0012 = ╱44╱D╱ // 0x210d @0x12
0x20fb…2139 at0013 = ╱53╱S╱ // 0x210e @0x13
0x20fb…2139 at0014 = ╱41╱A╱ // 0x210f @0x14
0x20fb…2139 at0015 = ╱4c╱L╱ // 0x2110 @0x15
0x20fb…2139 at0016 = ╱44╱D╱ // 0x2111 @0x16
0x20fb…2139 at0017 = ╱4f╱O╱ // 0x2112 @0x17
0x20fb…2139 at0018 = ╱32╱2╱ // 0x2113 @0x18
0x20fb…2139 at0019 = ╱ef╱$╱ // 0x2114 @0x19
0x20fb…2139 at001a = ╱ec╱,╱ // 0x2115 @0x1a
0x20fb…2139 at001b = ╱44╱D╱ // 0x2116 @0x1b
0x20fb…2139 at001c = ╱53╱S╱ // 0x2117 @0x1c
0x20fb…2139 at001d = ╱41╱A╱ // 0x2118 @0x1d
0x20fb…2139 at001e = ╱4c╱L╱ // 0x2119 @0x1e
0x20fb…2139 at001f = ╱44╱D╱ // 0x211a @0x1f
0x20fb…2139 at0020 = ╱4f╱O╱ // 0x211b @0x20
0x20fb…2139 at0021 = ╱33╱3╱ // 0x211c @0x21
0x20fb…2139 at0022 = ╱ef╱$╱ // 0x211d @0x22
0x20fb…2139 at0023 = ╱ec╱,╱ // 0x211e @0x23
0x20fb…2139 at0024 = ╱44╱D╱ // 0x211f @0x24
0x20fb…2139 at0025 = ╱53╱S╱ // 0x2120 @0x25
0x20fb…2139 at0026 = ╱41╱A╱ // 0x2121 @0x26
0x20fb…2139 at0027 = ╱4c╱L╱ // 0x2122 @0x27
0x20fb…2139 at0028 = ╱44╱D╱ // 0x2123 @0x28
0x20fb…2139 at0029 = ╱4f╱O╱ // 0x2124 @0x29
0x20fb…2139 at002a = ╱34╱4╱ // 0x2125 @0x2a
0x20fb…2139 at002b = ╱ef╱$╱ // 0x2126 @0x2b
0x20fb…2139 at002c = ╱ec╱,╱ // 0x2127 @0x2c
0x20fb…2139 at002d = ╱44╱D╱ // 0x2128 @0x2d
0x20fb…2139 at002e = ╱45╱E╱ // 0x2129 @0x2e
0x20fb…2139 at002f = ╱42╱B╱ // 0x212a @0x2f
0x20fb…2139 at0030 = ╱50╱P╱ // 0x212b @0x30
0x20fb…2139 at0031 = ╱4f╱O╱ // 0x212c @0x31
0x20fb…2139 at0032 = ╱53╱S╱ // 0x212d @0x32
0x20fb…2139 at0033 = ╱54╱T╱ // 0x212e @0x33
0x20fb…2139 at0034 = ╱4e╱N╱ // 0x212f @0x34
0x20fb…2139 at0035 = ╱52╱R╱ // 0x2130 @0x35
0x20fb…2139 at0036 = ╱ec╱,╱ // 0x2131 @0x36
0x20fb…2139 at0037 = ╱44╱D╱ // 0x2132 @0x37
0x20fb…2139 at0038 = ╱45╱E╱ // 0x2133 @0x38
0x20fb…2139 at0039 = ╱42╱B╱ // 0x2134 @0x39
0x20fb…2139 at003a = ╱4c╱L╱ // 0x2135 @0x3a
0x20fb…2139 at003b = ╱4b╱K╱ // 0x2136 @0x3b
0x20fb…2139 at003c = ╱ef╱$╱ // 0x2137 @0x3c
0x20fb…2139 at003d = EOL // 0x2138 @0x3d
0x20fb…2139 }
0x2139…2156 aead 2870 EXEC FEJL(9,4,K6$)
0x2139…2156 LineComalBin {
0x2139…2156 ptr = 0xaead // 0x2139 @0x0
0x2139…2156 lno = 0x0b36 // 0x213b @0x2
0x2139…2156 at0004 = ╱9d╱ EXEC ╱ // 0x213d @0x4
0x2139…2156 at0005 = ╱46╱F╱ // 0x213e @0x5
0x2139…2156 at0006 = ╱45╱E╱ // 0x213f @0x6
0x2139…2156 at0007 = ╱4a╱J╱ // 0x2140 @0x7
0x2139…2156 at0008 = ╱4c╱L╱ // 0x2141 @0x8
0x2139…2156 at0009 = ╱ed╱(╱ // 0x2142 @0x9
0x2139…2156 at000a = ╱39╱9╱ // 0x2143 @0xa
0x2139…2156 at000b = ╱fe00009004╱ // 0x2144 @0xb
0x2139…2156 at0010 = ╱ec╱,╱ // 0x2149 @0x10
0x2139…2156 at0011 = ╱34╱4╱ // 0x214a @0x11
0x2139…2156 at0012 = ╱fe00008003╱ // 0x214b @0x12
0x2139…2156 at0017 = ╱ec╱,╱ // 0x2150 @0x17
0x2139…2156 at0018 = ╱4b╱K╱ // 0x2151 @0x18
0x2139…2156 at0019 = ╱36╱6╱ // 0x2152 @0x19
0x2139…2156 at001a = ╱ef╱$╱ // 0x2153 @0x1a
0x2139…2156 at001b = ╱ee╱)╱ // 0x2154 @0x1b
0x2139…2156 at001c = EOL // 0x2155 @0x1c
0x2139…2156 }
0x2156…215c aeb3 2880 ENDPROC
0x2156…215c LineComalBin {
0x2156…215c ptr = 0xaeb3 // 0x2156 @0x0
0x2156…215c lno = 0x0b40 // 0x2158 @0x2
0x2156…215c at0004 = ╱9f╱ ENDPROC ╱ // 0x215a @0x4
0x2156…215c at0005 = EOL // 0x215b @0x5
0x2156…215c }
0x215c…216a aec1 2890 PROC GEMFPOST
0x215c…216a LineComalBin {
0x215c…216a ptr = 0xaec1 // 0x215c @0x0
0x215c…216a lno = 0x0b4a // 0x215e @0x2
0x215c…216a at0004 = ╱9e╱ PROC ╱ // 0x2160 @0x4
0x215c…216a at0005 = ╱47╱G╱ // 0x2161 @0x5
0x215c…216a at0006 = ╱45╱E╱ // 0x2162 @0x6
0x215c…216a at0007 = ╱4d╱M╱ // 0x2163 @0x7
0x215c…216a at0008 = ╱46╱F╱ // 0x2164 @0x8
0x215c…216a at0009 = ╱50╱P╱ // 0x2165 @0x9
0x215c…216a at000a = ╱4f╱O╱ // 0x2166 @0xa
0x215c…216a at000b = ╱53╱S╱ // 0x2167 @0xb
0x215c…216a at000c = ╱54╱T╱ // 0x2168 @0xc
0x215c…216a at000d = EOL // 0x2169 @0xd
0x215c…216a }
0x216a…2183 aeda 2900 S=FTAB(FPIL3,2)
0x216a…2183 LineComalBin {
0x216a…2183 ptr = 0xaeda // 0x216a @0x0
0x216a…2183 lno = 0x0b54 // 0x216c @0x2
0x216a…2183 at0004 = ╱53╱S╱ // 0x216e @0x4
0x216a…2183 at0005 = ╱dc╱=╱ // 0x216f @0x5
0x216a…2183 at0006 = ╱46╱F╱ // 0x2170 @0x6
0x216a…2183 at0007 = ╱54╱T╱ // 0x2171 @0x7
0x216a…2183 at0008 = ╱41╱A╱ // 0x2172 @0x8
0x216a…2183 at0009 = ╱42╱B╱ // 0x2173 @0x9
0x216a…2183 at000a = ╱ed╱(╱ // 0x2174 @0xa
0x216a…2183 at000b = ╱46╱F╱ // 0x2175 @0xb
0x216a…2183 at000c = ╱50╱P╱ // 0x2176 @0xc
0x216a…2183 at000d = ╱49╱I╱ // 0x2177 @0xd
0x216a…2183 at000e = ╱4c╱L╱ // 0x2178 @0xe
0x216a…2183 at000f = ╱33╱3╱ // 0x2179 @0xf
0x216a…2183 at0010 = ╱ec╱,╱ // 0x217a @0x10
0x216a…2183 at0011 = ╱32╱2╱ // 0x217b @0x11
0x216a…2183 at0012 = ╱fe00008002╱ // 0x217c @0x12
0x216a…2183 at0017 = ╱ee╱)╱ // 0x2181 @0x17
0x216a…2183 at0018 = EOL // 0x2182 @0x18
0x216a…2183 }
0x2183…2199 aef0 2910 PUT K5$,S:FNR,FNAVN$
0x2183…2199 LineComalBin {
0x2183…2199 ptr = 0xaef0 // 0x2183 @0x0
0x2183…2199 lno = 0x0b5e // 0x2185 @0x2
0x2183…2199 at0004 = ╱aa╱ PUT ╱ // 0x2187 @0x4
0x2183…2199 at0005 = ╱4b╱K╱ // 0x2188 @0x5
0x2183…2199 at0006 = ╱35╱5╱ // 0x2189 @0x6
0x2183…2199 at0007 = ╱ef╱$╱ // 0x218a @0x7
0x2183…2199 at0008 = ╱ec╱,╱ // 0x218b @0x8
0x2183…2199 at0009 = ╱53╱S╱ // 0x218c @0x9
0x2183…2199 at000a = ╱f0╱:╱ // 0x218d @0xa
0x2183…2199 at000b = ╱46╱F╱ // 0x218e @0xb
0x2183…2199 at000c = ╱4e╱N╱ // 0x218f @0xc
0x2183…2199 at000d = ╱52╱R╱ // 0x2190 @0xd
0x2183…2199 at000e = ╱ec╱,╱ // 0x2191 @0xe
0x2183…2199 at000f = ╱46╱F╱ // 0x2192 @0xf
0x2183…2199 at0010 = ╱4e╱N╱ // 0x2193 @0x10
0x2183…2199 at0011 = ╱41╱A╱ // 0x2194 @0x11
0x2183…2199 at0012 = ╱56╱V╱ // 0x2195 @0x12
0x2183…2199 at0013 = ╱4e╱N╱ // 0x2196 @0x13
0x2183…2199 at0014 = ╱ef╱$╱ // 0x2197 @0x14
0x2183…2199 at0015 = EOL // 0x2198 @0x15
0x2183…2199 }
0x2199…21b6 af0d 2920 EXEC FEJL(4,3,K5$)
0x2199…21b6 LineComalBin {
0x2199…21b6 ptr = 0xaf0d // 0x2199 @0x0
0x2199…21b6 lno = 0x0b68 // 0x219b @0x2
0x2199…21b6 at0004 = ╱9d╱ EXEC ╱ // 0x219d @0x4
0x2199…21b6 at0005 = ╱46╱F╱ // 0x219e @0x5
0x2199…21b6 at0006 = ╱45╱E╱ // 0x219f @0x6
0x2199…21b6 at0007 = ╱4a╱J╱ // 0x21a0 @0x7
0x2199…21b6 at0008 = ╱4c╱L╱ // 0x21a1 @0x8
0x2199…21b6 at0009 = ╱ed╱(╱ // 0x21a2 @0x9
0x2199…21b6 at000a = ╱34╱4╱ // 0x21a3 @0xa
0x2199…21b6 at000b = ╱fe00008003╱ // 0x21a4 @0xb
0x2199…21b6 at0010 = ╱ec╱,╱ // 0x21a9 @0x10
0x2199…21b6 at0011 = ╱33╱3╱ // 0x21aa @0x11
0x2199…21b6 at0012 = ╱fe0000c002╱ // 0x21ab @0x12
0x2199…21b6 at0017 = ╱ec╱,╱ // 0x21b0 @0x17
0x2199…21b6 at0018 = ╱4b╱K╱ // 0x21b1 @0x18
0x2199…21b6 at0019 = ╱35╱5╱ // 0x21b2 @0x19
0x2199…21b6 at001a = ╱ef╱$╱ // 0x21b3 @0x1a
0x2199…21b6 at001b = ╱ee╱)╱ // 0x21b4 @0x1b
0x2199…21b6 at001c = EOL // 0x21b5 @0x1c
0x2199…21b6 }
0x21b6…21e3 af3a 2930 PUT K5$,S+1:FMKODE$,FMDEBET$,FMKREDIT$
0x21b6…21e3 LineComalBin {
0x21b6…21e3 ptr = 0xaf3a // 0x21b6 @0x0
0x21b6…21e3 lno = 0x0b72 // 0x21b8 @0x2
0x21b6…21e3 at0004 = ╱aa╱ PUT ╱ // 0x21ba @0x4
0x21b6…21e3 at0005 = ╱4b╱K╱ // 0x21bb @0x5
0x21b6…21e3 at0006 = ╱35╱5╱ // 0x21bc @0x6
0x21b6…21e3 at0007 = ╱ef╱$╱ // 0x21bd @0x7
0x21b6…21e3 at0008 = ╱ec╱,╱ // 0x21be @0x8
0x21b6…21e3 at0009 = ╱53╱S╱ // 0x21bf @0x9
0x21b6…21e3 at000a = ╱e2╱+╱ // 0x21c0 @0xa
0x21b6…21e3 at000b = ╱31╱1╱ // 0x21c1 @0xb
0x21b6…21e3 at000c = ╱fe00008001╱ // 0x21c2 @0xc
0x21b6…21e3 at0011 = ╱f0╱:╱ // 0x21c7 @0x11
0x21b6…21e3 at0012 = ╱46╱F╱ // 0x21c8 @0x12
0x21b6…21e3 at0013 = ╱4d╱M╱ // 0x21c9 @0x13
0x21b6…21e3 at0014 = ╱4b╱K╱ // 0x21ca @0x14
0x21b6…21e3 at0015 = ╱4f╱O╱ // 0x21cb @0x15
0x21b6…21e3 at0016 = ╱44╱D╱ // 0x21cc @0x16
0x21b6…21e3 at0017 = ╱45╱E╱ // 0x21cd @0x17
0x21b6…21e3 at0018 = ╱ef╱$╱ // 0x21ce @0x18
0x21b6…21e3 at0019 = ╱ec╱,╱ // 0x21cf @0x19
0x21b6…21e3 at001a = ╱46╱F╱ // 0x21d0 @0x1a
0x21b6…21e3 at001b = ╱4d╱M╱ // 0x21d1 @0x1b
0x21b6…21e3 at001c = ╱44╱D╱ // 0x21d2 @0x1c
0x21b6…21e3 at001d = ╱45╱E╱ // 0x21d3 @0x1d
0x21b6…21e3 at001e = ╱42╱B╱ // 0x21d4 @0x1e
0x21b6…21e3 at001f = ╱45╱E╱ // 0x21d5 @0x1f
0x21b6…21e3 at0020 = ╱54╱T╱ // 0x21d6 @0x20
0x21b6…21e3 at0021 = ╱ef╱$╱ // 0x21d7 @0x21
0x21b6…21e3 at0022 = ╱ec╱,╱ // 0x21d8 @0x22
0x21b6…21e3 at0023 = ╱46╱F╱ // 0x21d9 @0x23
0x21b6…21e3 at0024 = ╱4d╱M╱ // 0x21da @0x24
0x21b6…21e3 at0025 = ╱4b╱K╱ // 0x21db @0x25
0x21b6…21e3 at0026 = ╱52╱R╱ // 0x21dc @0x26
0x21b6…21e3 at0027 = ╱45╱E╱ // 0x21dd @0x27
0x21b6…21e3 at0028 = ╱44╱D╱ // 0x21de @0x28
0x21b6…21e3 at0029 = ╱49╱I╱ // 0x21df @0x29
0x21b6…21e3 at002a = ╱54╱T╱ // 0x21e0 @0x2a
0x21b6…21e3 at002b = ╱ef╱$╱ // 0x21e1 @0x2b
0x21b6…21e3 at002c = EOL // 0x21e2 @0x2c
0x21b6…21e3 }
0x21e3…2200 af57 2940 EXEC FEJL(4,4,K5$)
0x21e3…2200 LineComalBin {
0x21e3…2200 ptr = 0xaf57 // 0x21e3 @0x0
0x21e3…2200 lno = 0x0b7c // 0x21e5 @0x2
0x21e3…2200 at0004 = ╱9d╱ EXEC ╱ // 0x21e7 @0x4
0x21e3…2200 at0005 = ╱46╱F╱ // 0x21e8 @0x5
0x21e3…2200 at0006 = ╱45╱E╱ // 0x21e9 @0x6
0x21e3…2200 at0007 = ╱4a╱J╱ // 0x21ea @0x7
0x21e3…2200 at0008 = ╱4c╱L╱ // 0x21eb @0x8
0x21e3…2200 at0009 = ╱ed╱(╱ // 0x21ec @0x9
0x21e3…2200 at000a = ╱34╱4╱ // 0x21ed @0xa
0x21e3…2200 at000b = ╱fe00008003╱ // 0x21ee @0xb
0x21e3…2200 at0010 = ╱ec╱,╱ // 0x21f3 @0x10
0x21e3…2200 at0011 = ╱34╱4╱ // 0x21f4 @0x11
0x21e3…2200 at0012 = ╱fe00008003╱ // 0x21f5 @0x12
0x21e3…2200 at0017 = ╱ec╱,╱ // 0x21fa @0x17
0x21e3…2200 at0018 = ╱4b╱K╱ // 0x21fb @0x18
0x21e3…2200 at0019 = ╱35╱5╱ // 0x21fc @0x19
0x21e3…2200 at001a = ╱ef╱$╱ // 0x21fd @0x1a
0x21e3…2200 at001b = ╱ee╱)╱ // 0x21fe @0x1b
0x21e3…2200 at001c = EOL // 0x21ff @0x1c
0x21e3…2200 }
0x2200…222d af84 2950 PUT K5$,S+2:FUKODE$,FÅDEBET$,FÅKREDIT$
0x2200…222d LineComalBin {
0x2200…222d ptr = 0xaf84 // 0x2200 @0x0
0x2200…222d lno = 0x0b86 // 0x2202 @0x2
0x2200…222d at0004 = ╱aa╱ PUT ╱ // 0x2204 @0x4
0x2200…222d at0005 = ╱4b╱K╱ // 0x2205 @0x5
0x2200…222d at0006 = ╱35╱5╱ // 0x2206 @0x6
0x2200…222d at0007 = ╱ef╱$╱ // 0x2207 @0x7
0x2200…222d at0008 = ╱ec╱,╱ // 0x2208 @0x8
0x2200…222d at0009 = ╱53╱S╱ // 0x2209 @0x9
0x2200…222d at000a = ╱e2╱+╱ // 0x220a @0xa
0x2200…222d at000b = ╱32╱2╱ // 0x220b @0xb
0x2200…222d at000c = ╱fe00008002╱ // 0x220c @0xc
0x2200…222d at0011 = ╱f0╱:╱ // 0x2211 @0x11
0x2200…222d at0012 = ╱46╱F╱ // 0x2212 @0x12
0x2200…222d at0013 = ╱55╱U╱ // 0x2213 @0x13
0x2200…222d at0014 = ╱4b╱K╱ // 0x2214 @0x14
0x2200…222d at0015 = ╱4f╱O╱ // 0x2215 @0x15
0x2200…222d at0016 = ╱44╱D╱ // 0x2216 @0x16
0x2200…222d at0017 = ╱45╱E╱ // 0x2217 @0x17
0x2200…222d at0018 = ╱ef╱$╱ // 0x2218 @0x18
0x2200…222d at0019 = ╱ec╱,╱ // 0x2219 @0x19
0x2200…222d at001a = ╱46╱F╱ // 0x221a @0x1a
0x2200…222d at001b = ╱5d╱Å╱ // 0x221b @0x1b
0x2200…222d at001c = ╱44╱D╱ // 0x221c @0x1c
0x2200…222d at001d = ╱45╱E╱ // 0x221d @0x1d
0x2200…222d at001e = ╱42╱B╱ // 0x221e @0x1e
0x2200…222d at001f = ╱45╱E╱ // 0x221f @0x1f
0x2200…222d at0020 = ╱54╱T╱ // 0x2220 @0x20
0x2200…222d at0021 = ╱ef╱$╱ // 0x2221 @0x21
0x2200…222d at0022 = ╱ec╱,╱ // 0x2222 @0x22
0x2200…222d at0023 = ╱46╱F╱ // 0x2223 @0x23
0x2200…222d at0024 = ╱5d╱Å╱ // 0x2224 @0x24
0x2200…222d at0025 = ╱4b╱K╱ // 0x2225 @0x25
0x2200…222d at0026 = ╱52╱R╱ // 0x2226 @0x26
0x2200…222d at0027 = ╱45╱E╱ // 0x2227 @0x27
0x2200…222d at0028 = ╱44╱D╱ // 0x2228 @0x28
0x2200…222d at0029 = ╱49╱I╱ // 0x2229 @0x29
0x2200…222d at002a = ╱54╱T╱ // 0x222a @0x2a
0x2200…222d at002b = ╱ef╱$╱ // 0x222b @0x2b
0x2200…222d at002c = EOL // 0x222c @0x2c
0x2200…222d }
0x222d…224a afa1 2960 EXEC FEJL(4,5,K5$)
0x222d…224a LineComalBin {
0x222d…224a ptr = 0xafa1 // 0x222d @0x0
0x222d…224a lno = 0x0b90 // 0x222f @0x2
0x222d…224a at0004 = ╱9d╱ EXEC ╱ // 0x2231 @0x4
0x222d…224a at0005 = ╱46╱F╱ // 0x2232 @0x5
0x222d…224a at0006 = ╱45╱E╱ // 0x2233 @0x6
0x222d…224a at0007 = ╱4a╱J╱ // 0x2234 @0x7
0x222d…224a at0008 = ╱4c╱L╱ // 0x2235 @0x8
0x222d…224a at0009 = ╱ed╱(╱ // 0x2236 @0x9
0x222d…224a at000a = ╱34╱4╱ // 0x2237 @0xa
0x222d…224a at000b = ╱fe00008003╱ // 0x2238 @0xb
0x222d…224a at0010 = ╱ec╱,╱ // 0x223d @0x10
0x222d…224a at0011 = ╱35╱5╱ // 0x223e @0x11
0x222d…224a at0012 = ╱fe0000a003╱ // 0x223f @0x12
0x222d…224a at0017 = ╱ec╱,╱ // 0x2244 @0x17
0x222d…224a at0018 = ╱4b╱K╱ // 0x2245 @0x18
0x222d…224a at0019 = ╱35╱5╱ // 0x2246 @0x19
0x222d…224a at001a = ╱ef╱$╱ // 0x2247 @0x1a
0x222d…224a at001b = ╱ee╱)╱ // 0x2248 @0x1b
0x222d…224a at001c = EOL // 0x2249 @0x1c
0x222d…224a }
0x224a…2250 (114,) afa7 2970 ENDPROC
0x224a…2250 LineComalBin {
0x224a…2250 ptr = 0xafa7 // 0x224a @0x0
0x224a…2250 lno = 0x0b9a // 0x224c @0x2
0x224a…2250 at0004 = ╱9f╱ ENDPROC ╱ // 0x224e @0x4
0x224a…2250 at0005 = EOL // 0x224f @0x5
0x224a…2250 }
0x2250…226a afc1 2980 K1$="P641220:SYSTEM1"
0x2250…226a LineComalBin {
0x2250…226a ptr = 0xafc1 // 0x2250 @0x0
0x2250…226a lno = 0x0ba4 // 0x2252 @0x2
0x2250…226a at0004 = ╱4b╱K╱ // 0x2254 @0x4
0x2250…226a at0005 = ╱31╱1╱ // 0x2255 @0x5
0x2250…226a at0006 = ╱ef╱$╱ // 0x2256 @0x6
0x2250…226a at0007 = ╱dc╱=╱ // 0x2257 @0x7
0x2250…226a at0008 = ╱22╱"╱ // 0x2258 @0x8
0x2250…226a at0009 = ╱50╱P╱ // 0x2259 @0x9
0x2250…226a at000a = ╱36╱6╱ // 0x225a @0xa
0x2250…226a at000b = ╱34╱4╱ // 0x225b @0xb
0x2250…226a at000c = ╱31╱1╱ // 0x225c @0xc
0x2250…226a at000d = ╱32╱2╱ // 0x225d @0xd
0x2250…226a at000e = ╱32╱2╱ // 0x225e @0xe
0x2250…226a at000f = ╱30╱0╱ // 0x225f @0xf
0x2250…226a at0010 = ╱3a╱:╱ // 0x2260 @0x10
0x2250…226a at0011 = ╱53╱S╱ // 0x2261 @0x11
0x2250…226a at0012 = ╱59╱Y╱ // 0x2262 @0x12
0x2250…226a at0013 = ╱53╱S╱ // 0x2263 @0x13
0x2250…226a at0014 = ╱54╱T╱ // 0x2264 @0x14
0x2250…226a at0015 = ╱45╱E╱ // 0x2265 @0x15
0x2250…226a at0016 = ╱4d╱M╱ // 0x2266 @0x16
0x2250…226a at0017 = ╱31╱1╱ // 0x2267 @0x17
0x2250…226a at0018 = ╱22╱"╱ // 0x2268 @0x18
0x2250…226a at0019 = EOL // 0x2269 @0x19
0x2250…226a }
0x226a…2275 afcc 2990 OPEN K1$,R
0x226a…2275 LineComalBin {
0x226a…2275 ptr = 0xafcc // 0x226a @0x0
0x226a…2275 lno = 0x0bae // 0x226c @0x2
0x226a…2275 at0004 = ╱a7╱ OPEN ╱ // 0x226e @0x4
0x226a…2275 at0005 = ╱4b╱K╱ // 0x226f @0x5
0x226a…2275 at0006 = ╱31╱1╱ // 0x2270 @0x6
0x226a…2275 at0007 = ╱ef╱$╱ // 0x2271 @0x7
0x226a…2275 at0008 = ╱ec╱,╱ // 0x2272 @0x8
0x226a…2275 at0009 = ╱52╱R╱ // 0x2273 @0x9
0x226a…2275 at000a = EOL // 0x2274 @0xa
0x226a…2275 }
0x2275…2292 afe9 3000 EXEC FEJL(9,1,K1$)
0x2275…2292 LineComalBin {
0x2275…2292 ptr = 0xafe9 // 0x2275 @0x0
0x2275…2292 lno = 0x0bb8 // 0x2277 @0x2
0x2275…2292 at0004 = ╱9d╱ EXEC ╱ // 0x2279 @0x4
0x2275…2292 at0005 = ╱46╱F╱ // 0x227a @0x5
0x2275…2292 at0006 = ╱45╱E╱ // 0x227b @0x6
0x2275…2292 at0007 = ╱4a╱J╱ // 0x227c @0x7
0x2275…2292 at0008 = ╱4c╱L╱ // 0x227d @0x8
0x2275…2292 at0009 = ╱ed╱(╱ // 0x227e @0x9
0x2275…2292 at000a = ╱39╱9╱ // 0x227f @0xa
0x2275…2292 at000b = ╱fe00009004╱ // 0x2280 @0xb
0x2275…2292 at0010 = ╱ec╱,╱ // 0x2285 @0x10
0x2275…2292 at0011 = ╱31╱1╱ // 0x2286 @0x11
0x2275…2292 at0012 = ╱fe00008001╱ // 0x2287 @0x12
0x2275…2292 at0017 = ╱ec╱,╱ // 0x228c @0x17
0x2275…2292 at0018 = ╱4b╱K╱ // 0x228d @0x18
0x2275…2292 at0019 = ╱31╱1╱ // 0x228e @0x19
0x2275…2292 at001a = ╱ef╱$╱ // 0x228f @0x1a
0x2275…2292 at001b = ╱ee╱)╱ // 0x2290 @0x1b
0x2275…2292 at001c = EOL // 0x2291 @0x1c
0x2275…2292 }
0x2292…22ba b011 3010 GET K1$,1:MFANTAL,MDANTAL,MKANTAL
0x2292…22ba LineComalBin {
0x2292…22ba ptr = 0xb011 // 0x2292 @0x0
0x2292…22ba lno = 0x0bc2 // 0x2294 @0x2
0x2292…22ba at0004 = ╱a9╱ GET ╱ // 0x2296 @0x4
0x2292…22ba at0005 = ╱4b╱K╱ // 0x2297 @0x5
0x2292…22ba at0006 = ╱31╱1╱ // 0x2298 @0x6
0x2292…22ba at0007 = ╱ef╱$╱ // 0x2299 @0x7
0x2292…22ba at0008 = ╱ec╱,╱ // 0x229a @0x8
0x2292…22ba at0009 = ╱31╱1╱ // 0x229b @0x9
0x2292…22ba at000a = ╱fe00008001╱ // 0x229c @0xa
0x2292…22ba at000f = ╱f0╱:╱ // 0x22a1 @0xf
0x2292…22ba at0010 = ╱4d╱M╱ // 0x22a2 @0x10
0x2292…22ba at0011 = ╱46╱F╱ // 0x22a3 @0x11
0x2292…22ba at0012 = ╱41╱A╱ // 0x22a4 @0x12
0x2292…22ba at0013 = ╱4e╱N╱ // 0x22a5 @0x13
0x2292…22ba at0014 = ╱54╱T╱ // 0x22a6 @0x14
0x2292…22ba at0015 = ╱41╱A╱ // 0x22a7 @0x15
0x2292…22ba at0016 = ╱4c╱L╱ // 0x22a8 @0x16
0x2292…22ba at0017 = ╱ec╱,╱ // 0x22a9 @0x17
0x2292…22ba at0018 = ╱4d╱M╱ // 0x22aa @0x18
0x2292…22ba at0019 = ╱44╱D╱ // 0x22ab @0x19
0x2292…22ba at001a = ╱41╱A╱ // 0x22ac @0x1a
0x2292…22ba at001b = ╱4e╱N╱ // 0x22ad @0x1b
0x2292…22ba at001c = ╱54╱T╱ // 0x22ae @0x1c
0x2292…22ba at001d = ╱41╱A╱ // 0x22af @0x1d
0x2292…22ba at001e = ╱4c╱L╱ // 0x22b0 @0x1e
0x2292…22ba at001f = ╱ec╱,╱ // 0x22b1 @0x1f
0x2292…22ba at0020 = ╱4d╱M╱ // 0x22b2 @0x20
0x2292…22ba at0021 = ╱4b╱K╱ // 0x22b3 @0x21
0x2292…22ba at0022 = ╱41╱A╱ // 0x22b4 @0x22
0x2292…22ba at0023 = ╱4e╱N╱ // 0x22b5 @0x23
0x2292…22ba at0024 = ╱54╱T╱ // 0x22b6 @0x24
0x2292…22ba at0025 = ╱41╱A╱ // 0x22b7 @0x25
0x2292…22ba at0026 = ╱4c╱L╱ // 0x22b8 @0x26
0x2292…22ba at0027 = EOL // 0x22b9 @0x27
0x2292…22ba }
0x22ba…22d7 b02e 3020 EXEC FEJL(9,2,K1$)
0x22ba…22d7 LineComalBin {
0x22ba…22d7 ptr = 0xb02e // 0x22ba @0x0
0x22ba…22d7 lno = 0x0bcc // 0x22bc @0x2
0x22ba…22d7 at0004 = ╱9d╱ EXEC ╱ // 0x22be @0x4
0x22ba…22d7 at0005 = ╱46╱F╱ // 0x22bf @0x5
0x22ba…22d7 at0006 = ╱45╱E╱ // 0x22c0 @0x6
0x22ba…22d7 at0007 = ╱4a╱J╱ // 0x22c1 @0x7
0x22ba…22d7 at0008 = ╱4c╱L╱ // 0x22c2 @0x8
0x22ba…22d7 at0009 = ╱ed╱(╱ // 0x22c3 @0x9
0x22ba…22d7 at000a = ╱39╱9╱ // 0x22c4 @0xa
0x22ba…22d7 at000b = ╱fe00009004╱ // 0x22c5 @0xb
0x22ba…22d7 at0010 = ╱ec╱,╱ // 0x22ca @0x10
0x22ba…22d7 at0011 = ╱32╱2╱ // 0x22cb @0x11
0x22ba…22d7 at0012 = ╱fe00008002╱ // 0x22cc @0x12
0x22ba…22d7 at0017 = ╱ec╱,╱ // 0x22d1 @0x17
0x22ba…22d7 at0018 = ╱4b╱K╱ // 0x22d2 @0x18
0x22ba…22d7 at0019 = ╱31╱1╱ // 0x22d3 @0x19
0x22ba…22d7 at001a = ╱ef╱$╱ // 0x22d4 @0x1a
0x22ba…22d7 at001b = ╱ee╱)╱ // 0x22d5 @0x1b
0x22ba…22d7 at001c = EOL // 0x22d6 @0x1c
0x22ba…22d7 }
0x22d7…2306 b05d 3030 GET K1$,2:MKASPOST,MPPOST,MBHPOST,MFPMID
0x22d7…2306 LineComalBin {
0x22d7…2306 ptr = 0xb05d // 0x22d7 @0x0
0x22d7…2306 lno = 0x0bd6 // 0x22d9 @0x2
0x22d7…2306 at0004 = ╱a9╱ GET ╱ // 0x22db @0x4
0x22d7…2306 at0005 = ╱4b╱K╱ // 0x22dc @0x5
0x22d7…2306 at0006 = ╱31╱1╱ // 0x22dd @0x6
0x22d7…2306 at0007 = ╱ef╱$╱ // 0x22de @0x7
0x22d7…2306 at0008 = ╱ec╱,╱ // 0x22df @0x8
0x22d7…2306 at0009 = ╱32╱2╱ // 0x22e0 @0x9
0x22d7…2306 at000a = ╱fe00008002╱ // 0x22e1 @0xa
0x22d7…2306 at000f = ╱f0╱:╱ // 0x22e6 @0xf
0x22d7…2306 at0010 = ╱4d╱M╱ // 0x22e7 @0x10
0x22d7…2306 at0011 = ╱4b╱K╱ // 0x22e8 @0x11
0x22d7…2306 at0012 = ╱41╱A╱ // 0x22e9 @0x12
0x22d7…2306 at0013 = ╱53╱S╱ // 0x22ea @0x13
0x22d7…2306 at0014 = ╱50╱P╱ // 0x22eb @0x14
0x22d7…2306 at0015 = ╱4f╱O╱ // 0x22ec @0x15
0x22d7…2306 at0016 = ╱53╱S╱ // 0x22ed @0x16
0x22d7…2306 at0017 = ╱54╱T╱ // 0x22ee @0x17
0x22d7…2306 at0018 = ╱ec╱,╱ // 0x22ef @0x18
0x22d7…2306 at0019 = ╱4d╱M╱ // 0x22f0 @0x19
0x22d7…2306 at001a = ╱50╱P╱ // 0x22f1 @0x1a
0x22d7…2306 at001b = ╱50╱P╱ // 0x22f2 @0x1b
0x22d7…2306 at001c = ╱4f╱O╱ // 0x22f3 @0x1c
0x22d7…2306 at001d = ╱53╱S╱ // 0x22f4 @0x1d
0x22d7…2306 at001e = ╱54╱T╱ // 0x22f5 @0x1e
0x22d7…2306 at001f = ╱ec╱,╱ // 0x22f6 @0x1f
0x22d7…2306 at0020 = ╱4d╱M╱ // 0x22f7 @0x20
0x22d7…2306 at0021 = ╱42╱B╱ // 0x22f8 @0x21
0x22d7…2306 at0022 = ╱48╱H╱ // 0x22f9 @0x22
0x22d7…2306 at0023 = ╱50╱P╱ // 0x22fa @0x23
0x22d7…2306 at0024 = ╱4f╱O╱ // 0x22fb @0x24
0x22d7…2306 at0025 = ╱53╱S╱ // 0x22fc @0x25
0x22d7…2306 at0026 = ╱54╱T╱ // 0x22fd @0x26
0x22d7…2306 at0027 = ╱ec╱,╱ // 0x22fe @0x27
0x22d7…2306 at0028 = ╱4d╱M╱ // 0x22ff @0x28
0x22d7…2306 at0029 = ╱46╱F╱ // 0x2300 @0x29
0x22d7…2306 at002a = ╱50╱P╱ // 0x2301 @0x2a
0x22d7…2306 at002b = ╱4d╱M╱ // 0x2302 @0x2b
0x22d7…2306 at002c = ╱49╱I╱ // 0x2303 @0x2c
0x22d7…2306 at002d = ╱44╱D╱ // 0x2304 @0x2d
0x22d7…2306 at002e = EOL // 0x2305 @0x2e
0x22d7…2306 }
0x2306…2323 b07a 3040 EXEC FEJL(9,3,K1$)
0x2306…2323 LineComalBin {
0x2306…2323 ptr = 0xb07a // 0x2306 @0x0
0x2306…2323 lno = 0x0be0 // 0x2308 @0x2
0x2306…2323 at0004 = ╱9d╱ EXEC ╱ // 0x230a @0x4
0x2306…2323 at0005 = ╱46╱F╱ // 0x230b @0x5
0x2306…2323 at0006 = ╱45╱E╱ // 0x230c @0x6
0x2306…2323 at0007 = ╱4a╱J╱ // 0x230d @0x7
0x2306…2323 at0008 = ╱4c╱L╱ // 0x230e @0x8
0x2306…2323 at0009 = ╱ed╱(╱ // 0x230f @0x9
0x2306…2323 at000a = ╱39╱9╱ // 0x2310 @0xa
0x2306…2323 at000b = ╱fe00009004╱ // 0x2311 @0xb
0x2306…2323 at0010 = ╱ec╱,╱ // 0x2316 @0x10
0x2306…2323 at0011 = ╱33╱3╱ // 0x2317 @0x11
0x2306…2323 at0012 = ╱fe0000c002╱ // 0x2318 @0x12
0x2306…2323 at0017 = ╱ec╱,╱ // 0x231d @0x17
0x2306…2323 at0018 = ╱4b╱K╱ // 0x231e @0x18
0x2306…2323 at0019 = ╱31╱1╱ // 0x231f @0x19
0x2306…2323 at001a = ╱ef╱$╱ // 0x2320 @0x1a
0x2306…2323 at001b = ╱ee╱)╱ // 0x2321 @0x1b
0x2306…2323 at001c = EOL // 0x2322 @0x1c
0x2306…2323 }
0x2323…2341 b098 3050 GET K1$,3:MDPMID,MKPMID
0x2323…2341 LineComalBin {
0x2323…2341 ptr = 0xb098 // 0x2323 @0x0
0x2323…2341 lno = 0x0bea // 0x2325 @0x2
0x2323…2341 at0004 = ╱a9╱ GET ╱ // 0x2327 @0x4
0x2323…2341 at0005 = ╱4b╱K╱ // 0x2328 @0x5
0x2323…2341 at0006 = ╱31╱1╱ // 0x2329 @0x6
0x2323…2341 at0007 = ╱ef╱$╱ // 0x232a @0x7
0x2323…2341 at0008 = ╱ec╱,╱ // 0x232b @0x8
0x2323…2341 at0009 = ╱33╱3╱ // 0x232c @0x9
0x2323…2341 at000a = ╱fe0000c002╱ // 0x232d @0xa
0x2323…2341 at000f = ╱f0╱:╱ // 0x2332 @0xf
0x2323…2341 at0010 = ╱4d╱M╱ // 0x2333 @0x10
0x2323…2341 at0011 = ╱44╱D╱ // 0x2334 @0x11
0x2323…2341 at0012 = ╱50╱P╱ // 0x2335 @0x12
0x2323…2341 at0013 = ╱4d╱M╱ // 0x2336 @0x13
0x2323…2341 at0014 = ╱49╱I╱ // 0x2337 @0x14
0x2323…2341 at0015 = ╱44╱D╱ // 0x2338 @0x15
0x2323…2341 at0016 = ╱ec╱,╱ // 0x2339 @0x16
0x2323…2341 at0017 = ╱4d╱M╱ // 0x233a @0x17
0x2323…2341 at0018 = ╱4b╱K╱ // 0x233b @0x18
0x2323…2341 at0019 = ╱50╱P╱ // 0x233c @0x19
0x2323…2341 at001a = ╱4d╱M╱ // 0x233d @0x1a
0x2323…2341 at001b = ╱49╱I╱ // 0x233e @0x1b
0x2323…2341 at001c = ╱44╱D╱ // 0x233f @0x1c
0x2323…2341 at001d = EOL // 0x2340 @0x1d
0x2323…2341 }
0x2341…235e b0b5 3060 EXEC FEJL(9,4,K1$)
0x2341…235e LineComalBin {
0x2341…235e ptr = 0xb0b5 // 0x2341 @0x0
0x2341…235e lno = 0x0bf4 // 0x2343 @0x2
0x2341…235e at0004 = ╱9d╱ EXEC ╱ // 0x2345 @0x4
0x2341…235e at0005 = ╱46╱F╱ // 0x2346 @0x5
0x2341…235e at0006 = ╱45╱E╱ // 0x2347 @0x6
0x2341…235e at0007 = ╱4a╱J╱ // 0x2348 @0x7
0x2341…235e at0008 = ╱4c╱L╱ // 0x2349 @0x8
0x2341…235e at0009 = ╱ed╱(╱ // 0x234a @0x9
0x2341…235e at000a = ╱39╱9╱ // 0x234b @0xa
0x2341…235e at000b = ╱fe00009004╱ // 0x234c @0xb
0x2341…235e at0010 = ╱ec╱,╱ // 0x2351 @0x10
0x2341…235e at0011 = ╱34╱4╱ // 0x2352 @0x11
0x2341…235e at0012 = ╱fe00008003╱ // 0x2353 @0x12
0x2341…235e at0017 = ╱ec╱,╱ // 0x2358 @0x17
0x2341…235e at0018 = ╱4b╱K╱ // 0x2359 @0x18
0x2341…235e at0019 = ╱31╱1╱ // 0x235a @0x19
0x2341…235e at001a = ╱ef╱$╱ // 0x235b @0x1a
0x2341…235e at001b = ╱ee╱)╱ // 0x235c @0x1b
0x2341…235e at001c = EOL // 0x235d @0x1c
0x2341…235e }
0x235e…2384 b0db 3070 GET K1$,4:MKPOST,MFAK,MVGR,MKGR
0x235e…2384 LineComalBin {
0x235e…2384 ptr = 0xb0db // 0x235e @0x0
0x235e…2384 lno = 0x0bfe // 0x2360 @0x2
0x235e…2384 at0004 = ╱a9╱ GET ╱ // 0x2362 @0x4
0x235e…2384 at0005 = ╱4b╱K╱ // 0x2363 @0x5
0x235e…2384 at0006 = ╱31╱1╱ // 0x2364 @0x6
0x235e…2384 at0007 = ╱ef╱$╱ // 0x2365 @0x7
0x235e…2384 at0008 = ╱ec╱,╱ // 0x2366 @0x8
0x235e…2384 at0009 = ╱34╱4╱ // 0x2367 @0x9
0x235e…2384 at000a = ╱fe00008003╱ // 0x2368 @0xa
0x235e…2384 at000f = ╱f0╱:╱ // 0x236d @0xf
0x235e…2384 at0010 = ╱4d╱M╱ // 0x236e @0x10
0x235e…2384 at0011 = ╱4b╱K╱ // 0x236f @0x11
0x235e…2384 at0012 = ╱50╱P╱ // 0x2370 @0x12
0x235e…2384 at0013 = ╱4f╱O╱ // 0x2371 @0x13
0x235e…2384 at0014 = ╱53╱S╱ // 0x2372 @0x14
0x235e…2384 at0015 = ╱54╱T╱ // 0x2373 @0x15
0x235e…2384 at0016 = ╱ec╱,╱ // 0x2374 @0x16
0x235e…2384 at0017 = ╱4d╱M╱ // 0x2375 @0x17
0x235e…2384 at0018 = ╱46╱F╱ // 0x2376 @0x18
0x235e…2384 at0019 = ╱41╱A╱ // 0x2377 @0x19
0x235e…2384 at001a = ╱4b╱K╱ // 0x2378 @0x1a
0x235e…2384 at001b = ╱ec╱,╱ // 0x2379 @0x1b
0x235e…2384 at001c = ╱4d╱M╱ // 0x237a @0x1c
0x235e…2384 at001d = ╱56╱V╱ // 0x237b @0x1d
0x235e…2384 at001e = ╱47╱G╱ // 0x237c @0x1e
0x235e…2384 at001f = ╱52╱R╱ // 0x237d @0x1f
0x235e…2384 at0020 = ╱ec╱,╱ // 0x237e @0x20
0x235e…2384 at0021 = ╱4d╱M╱ // 0x237f @0x21
0x235e…2384 at0022 = ╱4b╱K╱ // 0x2380 @0x22
0x235e…2384 at0023 = ╱47╱G╱ // 0x2381 @0x23
0x235e…2384 at0024 = ╱52╱R╱ // 0x2382 @0x24
0x235e…2384 at0025 = EOL // 0x2383 @0x25
0x235e…2384 }
0x2384…23a1 b0f8 3080 EXEC FEJL(9,5,K1$)
0x2384…23a1 LineComalBin {
0x2384…23a1 ptr = 0xb0f8 // 0x2384 @0x0
0x2384…23a1 lno = 0x0c08 // 0x2386 @0x2
0x2384…23a1 at0004 = ╱9d╱ EXEC ╱ // 0x2388 @0x4
0x2384…23a1 at0005 = ╱46╱F╱ // 0x2389 @0x5
0x2384…23a1 at0006 = ╱45╱E╱ // 0x238a @0x6
0x2384…23a1 at0007 = ╱4a╱J╱ // 0x238b @0x7
0x2384…23a1 at0008 = ╱4c╱L╱ // 0x238c @0x8
0x2384…23a1 at0009 = ╱ed╱(╱ // 0x238d @0x9
0x2384…23a1 at000a = ╱39╱9╱ // 0x238e @0xa
0x2384…23a1 at000b = ╱fe00009004╱ // 0x238f @0xb
0x2384…23a1 at0010 = ╱ec╱,╱ // 0x2394 @0x10
0x2384…23a1 at0011 = ╱35╱5╱ // 0x2395 @0x11
0x2384…23a1 at0012 = ╱fe0000a003╱ // 0x2396 @0x12
0x2384…23a1 at0017 = ╱ec╱,╱ // 0x239b @0x17
0x2384…23a1 at0018 = ╱4b╱K╱ // 0x239c @0x18
0x2384…23a1 at0019 = ╱31╱1╱ // 0x239d @0x19
0x2384…23a1 at001a = ╱ef╱$╱ // 0x239e @0x1a
0x2384…23a1 at001b = ╱ee╱)╱ // 0x239f @0x1b
0x2384…23a1 at001c = EOL // 0x23a0 @0x1c
0x2384…23a1 }
0x23a1…23b7 b10e 3090 GET K1$,5:MKRGR
0x23a1…23b7 LineComalBin {
0x23a1…23b7 ptr = 0xb10e // 0x23a1 @0x0
0x23a1…23b7 lno = 0x0c12 // 0x23a3 @0x2
0x23a1…23b7 at0004 = ╱a9╱ GET ╱ // 0x23a5 @0x4
0x23a1…23b7 at0005 = ╱4b╱K╱ // 0x23a6 @0x5
0x23a1…23b7 at0006 = ╱31╱1╱ // 0x23a7 @0x6
0x23a1…23b7 at0007 = ╱ef╱$╱ // 0x23a8 @0x7
0x23a1…23b7 at0008 = ╱ec╱,╱ // 0x23a9 @0x8
0x23a1…23b7 at0009 = ╱35╱5╱ // 0x23aa @0x9
0x23a1…23b7 at000a = ╱fe0000a003╱ // 0x23ab @0xa
0x23a1…23b7 at000f = ╱f0╱:╱ // 0x23b0 @0xf
0x23a1…23b7 at0010 = ╱4d╱M╱ // 0x23b1 @0x10
0x23a1…23b7 at0011 = ╱4b╱K╱ // 0x23b2 @0x11
0x23a1…23b7 at0012 = ╱52╱R╱ // 0x23b3 @0x12
0x23a1…23b7 at0013 = ╱47╱G╱ // 0x23b4 @0x13
0x23a1…23b7 at0014 = ╱52╱R╱ // 0x23b5 @0x14
0x23a1…23b7 at0015 = EOL // 0x23b6 @0x15
0x23a1…23b7 }
0x23b7…23d4 b12b 3100 EXEC FEJL(9,6,K1$)
0x23b7…23d4 LineComalBin {
0x23b7…23d4 ptr = 0xb12b // 0x23b7 @0x0
0x23b7…23d4 lno = 0x0c1c // 0x23b9 @0x2
0x23b7…23d4 at0004 = ╱9d╱ EXEC ╱ // 0x23bb @0x4
0x23b7…23d4 at0005 = ╱46╱F╱ // 0x23bc @0x5
0x23b7…23d4 at0006 = ╱45╱E╱ // 0x23bd @0x6
0x23b7…23d4 at0007 = ╱4a╱J╱ // 0x23be @0x7
0x23b7…23d4 at0008 = ╱4c╱L╱ // 0x23bf @0x8
0x23b7…23d4 at0009 = ╱ed╱(╱ // 0x23c0 @0x9
0x23b7…23d4 at000a = ╱39╱9╱ // 0x23c1 @0xa
0x23b7…23d4 at000b = ╱fe00009004╱ // 0x23c2 @0xb
0x23b7…23d4 at0010 = ╱ec╱,╱ // 0x23c7 @0x10
0x23b7…23d4 at0011 = ╱36╱6╱ // 0x23c8 @0x11
0x23b7…23d4 at0012 = ╱fe0000c003╱ // 0x23c9 @0x12
0x23b7…23d4 at0017 = ╱ec╱,╱ // 0x23ce @0x17
0x23b7…23d4 at0018 = ╱4b╱K╱ // 0x23cf @0x18
0x23b7…23d4 at0019 = ╱31╱1╱ // 0x23d0 @0x19
0x23b7…23d4 at001a = ╱ef╱$╱ // 0x23d1 @0x1a
0x23b7…23d4 at001b = ╱ee╱)╱ // 0x23d2 @0x1b
0x23b7…23d4 at001c = EOL // 0x23d3 @0x1c
0x23b7…23d4 }
0x23d4…2403 b15a 3110 GET K1$,6:KASSENR,GIRONR,BANKNR,UDMOMSNR
0x23d4…2403 LineComalBin {
0x23d4…2403 ptr = 0xb15a // 0x23d4 @0x0
0x23d4…2403 lno = 0x0c26 // 0x23d6 @0x2
0x23d4…2403 at0004 = ╱a9╱ GET ╱ // 0x23d8 @0x4
0x23d4…2403 at0005 = ╱4b╱K╱ // 0x23d9 @0x5
0x23d4…2403 at0006 = ╱31╱1╱ // 0x23da @0x6
0x23d4…2403 at0007 = ╱ef╱$╱ // 0x23db @0x7
0x23d4…2403 at0008 = ╱ec╱,╱ // 0x23dc @0x8
0x23d4…2403 at0009 = ╱36╱6╱ // 0x23dd @0x9
0x23d4…2403 at000a = ╱fe0000c003╱ // 0x23de @0xa
0x23d4…2403 at000f = ╱f0╱:╱ // 0x23e3 @0xf
0x23d4…2403 at0010 = ╱4b╱K╱ // 0x23e4 @0x10
0x23d4…2403 at0011 = ╱41╱A╱ // 0x23e5 @0x11
0x23d4…2403 at0012 = ╱53╱S╱ // 0x23e6 @0x12
0x23d4…2403 at0013 = ╱53╱S╱ // 0x23e7 @0x13
0x23d4…2403 at0014 = ╱45╱E╱ // 0x23e8 @0x14
0x23d4…2403 at0015 = ╱4e╱N╱ // 0x23e9 @0x15
0x23d4…2403 at0016 = ╱52╱R╱ // 0x23ea @0x16
0x23d4…2403 at0017 = ╱ec╱,╱ // 0x23eb @0x17
0x23d4…2403 at0018 = ╱47╱G╱ // 0x23ec @0x18
0x23d4…2403 at0019 = ╱49╱I╱ // 0x23ed @0x19
0x23d4…2403 at001a = ╱52╱R╱ // 0x23ee @0x1a
0x23d4…2403 at001b = ╱4f╱O╱ // 0x23ef @0x1b
0x23d4…2403 at001c = ╱4e╱N╱ // 0x23f0 @0x1c
0x23d4…2403 at001d = ╱52╱R╱ // 0x23f1 @0x1d
0x23d4…2403 at001e = ╱ec╱,╱ // 0x23f2 @0x1e
0x23d4…2403 at001f = ╱42╱B╱ // 0x23f3 @0x1f
0x23d4…2403 at0020 = ╱41╱A╱ // 0x23f4 @0x20
0x23d4…2403 at0021 = ╱4e╱N╱ // 0x23f5 @0x21
0x23d4…2403 at0022 = ╱4b╱K╱ // 0x23f6 @0x22
0x23d4…2403 at0023 = ╱4e╱N╱ // 0x23f7 @0x23
0x23d4…2403 at0024 = ╱52╱R╱ // 0x23f8 @0x24
0x23d4…2403 at0025 = ╱ec╱,╱ // 0x23f9 @0x25
0x23d4…2403 at0026 = ╱55╱U╱ // 0x23fa @0x26
0x23d4…2403 at0027 = ╱44╱D╱ // 0x23fb @0x27
0x23d4…2403 at0028 = ╱4d╱M╱ // 0x23fc @0x28
0x23d4…2403 at0029 = ╱4f╱O╱ // 0x23fd @0x29
0x23d4…2403 at002a = ╱4d╱M╱ // 0x23fe @0x2a
0x23d4…2403 at002b = ╱53╱S╱ // 0x23ff @0x2b
0x23d4…2403 at002c = ╱4e╱N╱ // 0x2400 @0x2c
0x23d4…2403 at002d = ╱52╱R╱ // 0x2401 @0x2d
0x23d4…2403 at002e = EOL // 0x2402 @0x2e
0x23d4…2403 }
0x2403…2420 b177 3120 EXEC FEJL(9,7,K1$)
0x2403…2420 LineComalBin {
0x2403…2420 ptr = 0xb177 // 0x2403 @0x0
0x2403…2420 lno = 0x0c30 // 0x2405 @0x2
0x2403…2420 at0004 = ╱9d╱ EXEC ╱ // 0x2407 @0x4
0x2403…2420 at0005 = ╱46╱F╱ // 0x2408 @0x5
0x2403…2420 at0006 = ╱45╱E╱ // 0x2409 @0x6
0x2403…2420 at0007 = ╱4a╱J╱ // 0x240a @0x7
0x2403…2420 at0008 = ╱4c╱L╱ // 0x240b @0x8
0x2403…2420 at0009 = ╱ed╱(╱ // 0x240c @0x9
0x2403…2420 at000a = ╱39╱9╱ // 0x240d @0xa
0x2403…2420 at000b = ╱fe00009004╱ // 0x240e @0xb
0x2403…2420 at0010 = ╱ec╱,╱ // 0x2413 @0x10
0x2403…2420 at0011 = ╱37╱7╱ // 0x2414 @0x11
0x2403…2420 at0012 = ╱fe0000e003╱ // 0x2415 @0x12
0x2403…2420 at0017 = ╱ec╱,╱ // 0x241a @0x17
0x2403…2420 at0018 = ╱4b╱K╱ // 0x241b @0x18
0x2403…2420 at0019 = ╱31╱1╱ // 0x241c @0x19
0x2403…2420 at001a = ╱ef╱$╱ // 0x241d @0x1a
0x2403…2420 at001b = ╱ee╱)╱ // 0x241e @0x1b
0x2403…2420 at001c = EOL // 0x241f @0x1c
0x2403…2420 }
0x2420…243a b191 3130 GET K1$,7:INDMOMSNR
0x2420…243a LineComalBin {
0x2420…243a ptr = 0xb191 // 0x2420 @0x0
0x2420…243a lno = 0x0c3a // 0x2422 @0x2
0x2420…243a at0004 = ╱a9╱ GET ╱ // 0x2424 @0x4
0x2420…243a at0005 = ╱4b╱K╱ // 0x2425 @0x5
0x2420…243a at0006 = ╱31╱1╱ // 0x2426 @0x6
0x2420…243a at0007 = ╱ef╱$╱ // 0x2427 @0x7
0x2420…243a at0008 = ╱ec╱,╱ // 0x2428 @0x8
0x2420…243a at0009 = ╱37╱7╱ // 0x2429 @0x9
0x2420…243a at000a = ╱fe0000e003╱ // 0x242a @0xa
0x2420…243a at000f = ╱f0╱:╱ // 0x242f @0xf
0x2420…243a at0010 = ╱49╱I╱ // 0x2430 @0x10
0x2420…243a at0011 = ╱4e╱N╱ // 0x2431 @0x11
0x2420…243a at0012 = ╱44╱D╱ // 0x2432 @0x12
0x2420…243a at0013 = ╱4d╱M╱ // 0x2433 @0x13
0x2420…243a at0014 = ╱4f╱O╱ // 0x2434 @0x14
0x2420…243a at0015 = ╱4d╱M╱ // 0x2435 @0x15
0x2420…243a at0016 = ╱53╱S╱ // 0x2436 @0x16
0x2420…243a at0017 = ╱4e╱N╱ // 0x2437 @0x17
0x2420…243a at0018 = ╱52╱R╱ // 0x2438 @0x18
0x2420…243a at0019 = EOL // 0x2439 @0x19
0x2420…243a }
0x243a…2457 b1ae 3140 EXEC FEJL(9,8,K1$)
0x243a…2457 LineComalBin {
0x243a…2457 ptr = 0xb1ae // 0x243a @0x0
0x243a…2457 lno = 0x0c44 // 0x243c @0x2
0x243a…2457 at0004 = ╱9d╱ EXEC ╱ // 0x243e @0x4
0x243a…2457 at0005 = ╱46╱F╱ // 0x243f @0x5
0x243a…2457 at0006 = ╱45╱E╱ // 0x2440 @0x6
0x243a…2457 at0007 = ╱4a╱J╱ // 0x2441 @0x7
0x243a…2457 at0008 = ╱4c╱L╱ // 0x2442 @0x8
0x243a…2457 at0009 = ╱ed╱(╱ // 0x2443 @0x9
0x243a…2457 at000a = ╱39╱9╱ // 0x2444 @0xa
0x243a…2457 at000b = ╱fe00009004╱ // 0x2445 @0xb
0x243a…2457 at0010 = ╱ec╱,╱ // 0x244a @0x10
0x243a…2457 at0011 = ╱38╱8╱ // 0x244b @0x11
0x243a…2457 at0012 = ╱fe00008004╱ // 0x244c @0x12
0x243a…2457 at0017 = ╱ec╱,╱ // 0x2451 @0x17
0x243a…2457 at0018 = ╱4b╱K╱ // 0x2452 @0x18
0x243a…2457 at0019 = ╱31╱1╱ // 0x2453 @0x19
0x243a…2457 at001a = ╱ef╱$╱ // 0x2454 @0x1a
0x243a…2457 at001b = ╱ee╱)╱ // 0x2455 @0x1b
0x243a…2457 at001c = EOL // 0x2456 @0x1c
0x243a…2457 }
0x2457…247f b1d6 3150 GET K1$,8:DIVNR,DIVDNR,DIFNR,DTAL
0x2457…247f LineComalBin {
0x2457…247f ptr = 0xb1d6 // 0x2457 @0x0
0x2457…247f lno = 0x0c4e // 0x2459 @0x2
0x2457…247f at0004 = ╱a9╱ GET ╱ // 0x245b @0x4
0x2457…247f at0005 = ╱4b╱K╱ // 0x245c @0x5
0x2457…247f at0006 = ╱31╱1╱ // 0x245d @0x6
0x2457…247f at0007 = ╱ef╱$╱ // 0x245e @0x7
0x2457…247f at0008 = ╱ec╱,╱ // 0x245f @0x8
0x2457…247f at0009 = ╱38╱8╱ // 0x2460 @0x9
0x2457…247f at000a = ╱fe00008004╱ // 0x2461 @0xa
0x2457…247f at000f = ╱f0╱:╱ // 0x2466 @0xf
0x2457…247f at0010 = ╱44╱D╱ // 0x2467 @0x10
0x2457…247f at0011 = ╱49╱I╱ // 0x2468 @0x11
0x2457…247f at0012 = ╱56╱V╱ // 0x2469 @0x12
0x2457…247f at0013 = ╱4e╱N╱ // 0x246a @0x13
0x2457…247f at0014 = ╱52╱R╱ // 0x246b @0x14
0x2457…247f at0015 = ╱ec╱,╱ // 0x246c @0x15
0x2457…247f at0016 = ╱44╱D╱ // 0x246d @0x16
0x2457…247f at0017 = ╱49╱I╱ // 0x246e @0x17
0x2457…247f at0018 = ╱56╱V╱ // 0x246f @0x18
0x2457…247f at0019 = ╱44╱D╱ // 0x2470 @0x19
0x2457…247f at001a = ╱4e╱N╱ // 0x2471 @0x1a
0x2457…247f at001b = ╱52╱R╱ // 0x2472 @0x1b
0x2457…247f at001c = ╱ec╱,╱ // 0x2473 @0x1c
0x2457…247f at001d = ╱44╱D╱ // 0x2474 @0x1d
0x2457…247f at001e = ╱49╱I╱ // 0x2475 @0x1e
0x2457…247f at001f = ╱46╱F╱ // 0x2476 @0x1f
0x2457…247f at0020 = ╱4e╱N╱ // 0x2477 @0x20
0x2457…247f at0021 = ╱52╱R╱ // 0x2478 @0x21
0x2457…247f at0022 = ╱ec╱,╱ // 0x2479 @0x22
0x2457…247f at0023 = ╱44╱D╱ // 0x247a @0x23
0x2457…247f at0024 = ╱54╱T╱ // 0x247b @0x24
0x2457…247f at0025 = ╱41╱A╱ // 0x247c @0x25
0x2457…247f at0026 = ╱4c╱L╱ // 0x247d @0x26
0x2457…247f at0027 = EOL // 0x247e @0x27
0x2457…247f }
0x247f…249c b1f3 3160 EXEC FEJL(9,9,K1$)
0x247f…249c LineComalBin {
0x247f…249c ptr = 0xb1f3 // 0x247f @0x0
0x247f…249c lno = 0x0c58 // 0x2481 @0x2
0x247f…249c at0004 = ╱9d╱ EXEC ╱ // 0x2483 @0x4
0x247f…249c at0005 = ╱46╱F╱ // 0x2484 @0x5
0x247f…249c at0006 = ╱45╱E╱ // 0x2485 @0x6
0x247f…249c at0007 = ╱4a╱J╱ // 0x2486 @0x7
0x247f…249c at0008 = ╱4c╱L╱ // 0x2487 @0x8
0x247f…249c at0009 = ╱ed╱(╱ // 0x2488 @0x9
0x247f…249c at000a = ╱39╱9╱ // 0x2489 @0xa
0x247f…249c at000b = ╱fe00009004╱ // 0x248a @0xb
0x247f…249c at0010 = ╱ec╱,╱ // 0x248f @0x10
0x247f…249c at0011 = ╱39╱9╱ // 0x2490 @0x11
0x247f…249c at0012 = ╱fe00009004╱ // 0x2491 @0x12
0x247f…249c at0017 = ╱ec╱,╱ // 0x2496 @0x17
0x247f…249c at0018 = ╱4b╱K╱ // 0x2497 @0x18
0x247f…249c at0019 = ╱31╱1╱ // 0x2498 @0x19
0x247f…249c at001a = ╱ef╱$╱ // 0x2499 @0x1a
0x247f…249c at001b = ╱ee╱)╱ // 0x249a @0x1b
0x247f…249c at001c = EOL // 0x249b @0x1c
0x247f…249c }
0x249c…24c7 b21e 3170 GET K1$,9:KRTAL,VTAL,MEANTAL,MUNKANT
0x249c…24c7 LineComalBin {
0x249c…24c7 ptr = 0xb21e // 0x249c @0x0
0x249c…24c7 lno = 0x0c62 // 0x249e @0x2
0x249c…24c7 at0004 = ╱a9╱ GET ╱ // 0x24a0 @0x4
0x249c…24c7 at0005 = ╱4b╱K╱ // 0x24a1 @0x5
0x249c…24c7 at0006 = ╱31╱1╱ // 0x24a2 @0x6
0x249c…24c7 at0007 = ╱ef╱$╱ // 0x24a3 @0x7
0x249c…24c7 at0008 = ╱ec╱,╱ // 0x24a4 @0x8
0x249c…24c7 at0009 = ╱39╱9╱ // 0x24a5 @0x9
0x249c…24c7 at000a = ╱fe00009004╱ // 0x24a6 @0xa
0x249c…24c7 at000f = ╱f0╱:╱ // 0x24ab @0xf
0x249c…24c7 at0010 = ╱4b╱K╱ // 0x24ac @0x10
0x249c…24c7 at0011 = ╱52╱R╱ // 0x24ad @0x11
0x249c…24c7 at0012 = ╱54╱T╱ // 0x24ae @0x12
0x249c…24c7 at0013 = ╱41╱A╱ // 0x24af @0x13
0x249c…24c7 at0014 = ╱4c╱L╱ // 0x24b0 @0x14
0x249c…24c7 at0015 = ╱ec╱,╱ // 0x24b1 @0x15
0x249c…24c7 at0016 = ╱56╱V╱ // 0x24b2 @0x16
0x249c…24c7 at0017 = ╱54╱T╱ // 0x24b3 @0x17
0x249c…24c7 at0018 = ╱41╱A╱ // 0x24b4 @0x18
0x249c…24c7 at0019 = ╱4c╱L╱ // 0x24b5 @0x19
0x249c…24c7 at001a = ╱ec╱,╱ // 0x24b6 @0x1a
0x249c…24c7 at001b = ╱4d╱M╱ // 0x24b7 @0x1b
0x249c…24c7 at001c = ╱45╱E╱ // 0x24b8 @0x1c
0x249c…24c7 at001d = ╱41╱A╱ // 0x24b9 @0x1d
0x249c…24c7 at001e = ╱4e╱N╱ // 0x24ba @0x1e
0x249c…24c7 at001f = ╱54╱T╱ // 0x24bb @0x1f
0x249c…24c7 at0020 = ╱41╱A╱ // 0x24bc @0x20
0x249c…24c7 at0021 = ╱4c╱L╱ // 0x24bd @0x21
0x249c…24c7 at0022 = ╱ec╱,╱ // 0x24be @0x22
0x249c…24c7 at0023 = ╱4d╱M╱ // 0x24bf @0x23
0x249c…24c7 at0024 = ╱55╱U╱ // 0x24c0 @0x24
0x249c…24c7 at0025 = ╱4e╱N╱ // 0x24c1 @0x25
0x249c…24c7 at0026 = ╱4b╱K╱ // 0x24c2 @0x26
0x249c…24c7 at0027 = ╱41╱A╱ // 0x24c3 @0x27
0x249c…24c7 at0028 = ╱4e╱N╱ // 0x24c4 @0x28
0x249c…24c7 at0029 = ╱54╱T╱ // 0x24c5 @0x29
0x249c…24c7 at002a = EOL // 0x24c6 @0x2a
0x249c…24c7 }
0x24c7…24e5 b23c 3180 EXEC FEJL(9,10,K1$)
0x24c7…24e5 LineComalBin {
0x24c7…24e5 ptr = 0xb23c // 0x24c7 @0x0
0x24c7…24e5 lno = 0x0c6c // 0x24c9 @0x2
0x24c7…24e5 at0004 = ╱9d╱ EXEC ╱ // 0x24cb @0x4
0x24c7…24e5 at0005 = ╱46╱F╱ // 0x24cc @0x5
0x24c7…24e5 at0006 = ╱45╱E╱ // 0x24cd @0x6
0x24c7…24e5 at0007 = ╱4a╱J╱ // 0x24ce @0x7
0x24c7…24e5 at0008 = ╱4c╱L╱ // 0x24cf @0x8
0x24c7…24e5 at0009 = ╱ed╱(╱ // 0x24d0 @0x9
0x24c7…24e5 at000a = ╱39╱9╱ // 0x24d1 @0xa
0x24c7…24e5 at000b = ╱fe00009004╱ // 0x24d2 @0xb
0x24c7…24e5 at0010 = ╱ec╱,╱ // 0x24d7 @0x10
0x24c7…24e5 at0011 = ╱31╱1╱ // 0x24d8 @0x11
0x24c7…24e5 at0012 = ╱30╱0╱ // 0x24d9 @0x12
0x24c7…24e5 at0013 = ╱fe0000a004╱ // 0x24da @0x13
0x24c7…24e5 at0018 = ╱ec╱,╱ // 0x24df @0x18
0x24c7…24e5 at0019 = ╱4b╱K╱ // 0x24e0 @0x19
0x24c7…24e5 at001a = ╱31╱1╱ // 0x24e1 @0x1a
0x24c7…24e5 at001b = ╱ef╱$╱ // 0x24e2 @0x1b
0x24c7…24e5 at001c = ╱ee╱)╱ // 0x24e3 @0x1c
0x24c7…24e5 at001d = EOL // 0x24e4 @0x1d
0x24c7…24e5 }
0x24e5…24f9 b250 3190 GET K1$,10:N$
0x24e5…24f9 LineComalBin {
0x24e5…24f9 ptr = 0xb250 // 0x24e5 @0x0
0x24e5…24f9 lno = 0x0c76 // 0x24e7 @0x2
0x24e5…24f9 at0004 = ╱a9╱ GET ╱ // 0x24e9 @0x4
0x24e5…24f9 at0005 = ╱4b╱K╱ // 0x24ea @0x5
0x24e5…24f9 at0006 = ╱31╱1╱ // 0x24eb @0x6
0x24e5…24f9 at0007 = ╱ef╱$╱ // 0x24ec @0x7
0x24e5…24f9 at0008 = ╱ec╱,╱ // 0x24ed @0x8
0x24e5…24f9 at0009 = ╱31╱1╱ // 0x24ee @0x9
0x24e5…24f9 at000a = ╱30╱0╱ // 0x24ef @0xa
0x24e5…24f9 at000b = ╱fe0000a004╱ // 0x24f0 @0xb
0x24e5…24f9 at0010 = ╱f0╱:╱ // 0x24f5 @0x10
0x24e5…24f9 at0011 = ╱4e╱N╱ // 0x24f6 @0x11
0x24e5…24f9 at0012 = ╱ef╱$╱ // 0x24f7 @0x12
0x24e5…24f9 at0013 = EOL // 0x24f8 @0x13
0x24e5…24f9 }
0x24f9…2517 b26e 3200 EXEC FEJL(9,11,K1$)
0x24f9…2517 LineComalBin {
0x24f9…2517 ptr = 0xb26e // 0x24f9 @0x0
0x24f9…2517 lno = 0x0c80 // 0x24fb @0x2
0x24f9…2517 at0004 = ╱9d╱ EXEC ╱ // 0x24fd @0x4
0x24f9…2517 at0005 = ╱46╱F╱ // 0x24fe @0x5
0x24f9…2517 at0006 = ╱45╱E╱ // 0x24ff @0x6
0x24f9…2517 at0007 = ╱4a╱J╱ // 0x2500 @0x7
0x24f9…2517 at0008 = ╱4c╱L╱ // 0x2501 @0x8
0x24f9…2517 at0009 = ╱ed╱(╱ // 0x2502 @0x9
0x24f9…2517 at000a = ╱39╱9╱ // 0x2503 @0xa
0x24f9…2517 at000b = ╱fe00009004╱ // 0x2504 @0xb
0x24f9…2517 at0010 = ╱ec╱,╱ // 0x2509 @0x10
0x24f9…2517 at0011 = ╱31╱1╱ // 0x250a @0x11
0x24f9…2517 at0012 = ╱31╱1╱ // 0x250b @0x12
0x24f9…2517 at0013 = ╱fe0000b004╱ // 0x250c @0x13
0x24f9…2517 at0018 = ╱ec╱,╱ // 0x2511 @0x18
0x24f9…2517 at0019 = ╱4b╱K╱ // 0x2512 @0x19
0x24f9…2517 at001a = ╱31╱1╱ // 0x2513 @0x1a
0x24f9…2517 at001b = ╱ef╱$╱ // 0x2514 @0x1b
0x24f9…2517 at001c = ╱ee╱)╱ // 0x2515 @0x1c
0x24f9…2517 at001d = EOL // 0x2516 @0x1d
0x24f9…2517 }
0x2517…252c b283 3210 GET K1$,11:K2$
0x2517…252c LineComalBin {
0x2517…252c ptr = 0xb283 // 0x2517 @0x0
0x2517…252c lno = 0x0c8a // 0x2519 @0x2
0x2517…252c at0004 = ╱a9╱ GET ╱ // 0x251b @0x4
0x2517…252c at0005 = ╱4b╱K╱ // 0x251c @0x5
0x2517…252c at0006 = ╱31╱1╱ // 0x251d @0x6
0x2517…252c at0007 = ╱ef╱$╱ // 0x251e @0x7
0x2517…252c at0008 = ╱ec╱,╱ // 0x251f @0x8
0x2517…252c at0009 = ╱31╱1╱ // 0x2520 @0x9
0x2517…252c at000a = ╱31╱1╱ // 0x2521 @0xa
0x2517…252c at000b = ╱fe0000b004╱ // 0x2522 @0xb
0x2517…252c at0010 = ╱f0╱:╱ // 0x2527 @0x10
0x2517…252c at0011 = ╱4b╱K╱ // 0x2528 @0x11
0x2517…252c at0012 = ╱32╱2╱ // 0x2529 @0x12
0x2517…252c at0013 = ╱ef╱$╱ // 0x252a @0x13
0x2517…252c at0014 = EOL // 0x252b @0x14
0x2517…252c }
0x252c…254a b2a1 3220 EXEC FEJL(9,12,K1$)
0x252c…254a LineComalBin {
0x252c…254a ptr = 0xb2a1 // 0x252c @0x0
0x252c…254a lno = 0x0c94 // 0x252e @0x2
0x252c…254a at0004 = ╱9d╱ EXEC ╱ // 0x2530 @0x4
0x252c…254a at0005 = ╱46╱F╱ // 0x2531 @0x5
0x252c…254a at0006 = ╱45╱E╱ // 0x2532 @0x6
0x252c…254a at0007 = ╱4a╱J╱ // 0x2533 @0x7
0x252c…254a at0008 = ╱4c╱L╱ // 0x2534 @0x8
0x252c…254a at0009 = ╱ed╱(╱ // 0x2535 @0x9
0x252c…254a at000a = ╱39╱9╱ // 0x2536 @0xa
0x252c…254a at000b = ╱fe00009004╱ // 0x2537 @0xb
0x252c…254a at0010 = ╱ec╱,╱ // 0x253c @0x10
0x252c…254a at0011 = ╱31╱1╱ // 0x253d @0x11
0x252c…254a at0012 = ╱32╱2╱ // 0x253e @0x12
0x252c…254a at0013 = ╱fe0000c004╱ // 0x253f @0x13
0x252c…254a at0018 = ╱ec╱,╱ // 0x2544 @0x18
0x252c…254a at0019 = ╱4b╱K╱ // 0x2545 @0x19
0x252c…254a at001a = ╱31╱1╱ // 0x2546 @0x1a
0x252c…254a at001b = ╱ef╱$╱ // 0x2547 @0x1b
0x252c…254a at001c = ╱ee╱)╱ // 0x2548 @0x1c
0x252c…254a at001d = EOL // 0x2549 @0x1d
0x252c…254a }
0x254a…255f b2b6 3230 GET K1$,12:K3$
0x254a…255f LineComalBin {
0x254a…255f ptr = 0xb2b6 // 0x254a @0x0
0x254a…255f lno = 0x0c9e // 0x254c @0x2
0x254a…255f at0004 = ╱a9╱ GET ╱ // 0x254e @0x4
0x254a…255f at0005 = ╱4b╱K╱ // 0x254f @0x5
0x254a…255f at0006 = ╱31╱1╱ // 0x2550 @0x6
0x254a…255f at0007 = ╱ef╱$╱ // 0x2551 @0x7
0x254a…255f at0008 = ╱ec╱,╱ // 0x2552 @0x8
0x254a…255f at0009 = ╱31╱1╱ // 0x2553 @0x9
0x254a…255f at000a = ╱32╱2╱ // 0x2554 @0xa
0x254a…255f at000b = ╱fe0000c004╱ // 0x2555 @0xb
0x254a…255f at0010 = ╱f0╱:╱ // 0x255a @0x10
0x254a…255f at0011 = ╱4b╱K╱ // 0x255b @0x11
0x254a…255f at0012 = ╱33╱3╱ // 0x255c @0x12
0x254a…255f at0013 = ╱ef╱$╱ // 0x255d @0x13
0x254a…255f at0014 = EOL // 0x255e @0x14
0x254a…255f }
0x255f…257d b2d4 3240 EXEC FEJL(9,13,K1$)
0x255f…257d LineComalBin {
0x255f…257d ptr = 0xb2d4 // 0x255f @0x0
0x255f…257d lno = 0x0ca8 // 0x2561 @0x2
0x255f…257d at0004 = ╱9d╱ EXEC ╱ // 0x2563 @0x4
0x255f…257d at0005 = ╱46╱F╱ // 0x2564 @0x5
0x255f…257d at0006 = ╱45╱E╱ // 0x2565 @0x6
0x255f…257d at0007 = ╱4a╱J╱ // 0x2566 @0x7
0x255f…257d at0008 = ╱4c╱L╱ // 0x2567 @0x8
0x255f…257d at0009 = ╱ed╱(╱ // 0x2568 @0x9
0x255f…257d at000a = ╱39╱9╱ // 0x2569 @0xa
0x255f…257d at000b = ╱fe00009004╱ // 0x256a @0xb
0x255f…257d at0010 = ╱ec╱,╱ // 0x256f @0x10
0x255f…257d at0011 = ╱31╱1╱ // 0x2570 @0x11
0x255f…257d at0012 = ╱33╱3╱ // 0x2571 @0x12
0x255f…257d at0013 = ╱fe0000d004╱ // 0x2572 @0x13
0x255f…257d at0018 = ╱ec╱,╱ // 0x2577 @0x18
0x255f…257d at0019 = ╱4b╱K╱ // 0x2578 @0x19
0x255f…257d at001a = ╱31╱1╱ // 0x2579 @0x1a
0x255f…257d at001b = ╱ef╱$╱ // 0x257a @0x1b
0x255f…257d at001c = ╱ee╱)╱ // 0x257b @0x1c
0x255f…257d at001d = EOL // 0x257c @0x1d
0x255f…257d }
0x257d…2592 b2e9 3250 GET K1$,13:K4$
0x257d…2592 LineComalBin {
0x257d…2592 ptr = 0xb2e9 // 0x257d @0x0
0x257d…2592 lno = 0x0cb2 // 0x257f @0x2
0x257d…2592 at0004 = ╱a9╱ GET ╱ // 0x2581 @0x4
0x257d…2592 at0005 = ╱4b╱K╱ // 0x2582 @0x5
0x257d…2592 at0006 = ╱31╱1╱ // 0x2583 @0x6
0x257d…2592 at0007 = ╱ef╱$╱ // 0x2584 @0x7
0x257d…2592 at0008 = ╱ec╱,╱ // 0x2585 @0x8
0x257d…2592 at0009 = ╱31╱1╱ // 0x2586 @0x9
0x257d…2592 at000a = ╱33╱3╱ // 0x2587 @0xa
0x257d…2592 at000b = ╱fe0000d004╱ // 0x2588 @0xb
0x257d…2592 at0010 = ╱f0╱:╱ // 0x258d @0x10
0x257d…2592 at0011 = ╱4b╱K╱ // 0x258e @0x11
0x257d…2592 at0012 = ╱34╱4╱ // 0x258f @0x12
0x257d…2592 at0013 = ╱ef╱$╱ // 0x2590 @0x13
0x257d…2592 at0014 = EOL // 0x2591 @0x14
0x257d…2592 }
0x2592…25b0 b307 3260 EXEC FEJL(9,14,K1$)
0x2592…25b0 LineComalBin {
0x2592…25b0 ptr = 0xb307 // 0x2592 @0x0
0x2592…25b0 lno = 0x0cbc // 0x2594 @0x2
0x2592…25b0 at0004 = ╱9d╱ EXEC ╱ // 0x2596 @0x4
0x2592…25b0 at0005 = ╱46╱F╱ // 0x2597 @0x5
0x2592…25b0 at0006 = ╱45╱E╱ // 0x2598 @0x6
0x2592…25b0 at0007 = ╱4a╱J╱ // 0x2599 @0x7
0x2592…25b0 at0008 = ╱4c╱L╱ // 0x259a @0x8
0x2592…25b0 at0009 = ╱ed╱(╱ // 0x259b @0x9
0x2592…25b0 at000a = ╱39╱9╱ // 0x259c @0xa
0x2592…25b0 at000b = ╱fe00009004╱ // 0x259d @0xb
0x2592…25b0 at0010 = ╱ec╱,╱ // 0x25a2 @0x10
0x2592…25b0 at0011 = ╱31╱1╱ // 0x25a3 @0x11
0x2592…25b0 at0012 = ╱34╱4╱ // 0x25a4 @0x12
0x2592…25b0 at0013 = ╱fe0000e004╱ // 0x25a5 @0x13
0x2592…25b0 at0018 = ╱ec╱,╱ // 0x25aa @0x18
0x2592…25b0 at0019 = ╱4b╱K╱ // 0x25ab @0x19
0x2592…25b0 at001a = ╱31╱1╱ // 0x25ac @0x1a
0x2592…25b0 at001b = ╱ef╱$╱ // 0x25ad @0x1b
0x2592…25b0 at001c = ╱ee╱)╱ // 0x25ae @0x1c
0x2592…25b0 at001d = EOL // 0x25af @0x1d
0x2592…25b0 }
0x25b0…25c5 b31c 3270 GET K1$,15:K5$
0x25b0…25c5 LineComalBin {
0x25b0…25c5 ptr = 0xb31c // 0x25b0 @0x0
0x25b0…25c5 lno = 0x0cc6 // 0x25b2 @0x2
0x25b0…25c5 at0004 = ╱a9╱ GET ╱ // 0x25b4 @0x4
0x25b0…25c5 at0005 = ╱4b╱K╱ // 0x25b5 @0x5
0x25b0…25c5 at0006 = ╱31╱1╱ // 0x25b6 @0x6
0x25b0…25c5 at0007 = ╱ef╱$╱ // 0x25b7 @0x7
0x25b0…25c5 at0008 = ╱ec╱,╱ // 0x25b8 @0x8
0x25b0…25c5 at0009 = ╱31╱1╱ // 0x25b9 @0x9
0x25b0…25c5 at000a = ╱35╱5╱ // 0x25ba @0xa
0x25b0…25c5 at000b = ╱fe0000f004╱ // 0x25bb @0xb
0x25b0…25c5 at0010 = ╱f0╱:╱ // 0x25c0 @0x10
0x25b0…25c5 at0011 = ╱4b╱K╱ // 0x25c1 @0x11
0x25b0…25c5 at0012 = ╱35╱5╱ // 0x25c2 @0x12
0x25b0…25c5 at0013 = ╱ef╱$╱ // 0x25c3 @0x13
0x25b0…25c5 at0014 = EOL // 0x25c4 @0x14
0x25b0…25c5 }
0x25c5…25e3 b33a 3280 EXEC FEJL(9,15,K1$)
0x25c5…25e3 LineComalBin {
0x25c5…25e3 ptr = 0xb33a // 0x25c5 @0x0
0x25c5…25e3 lno = 0x0cd0 // 0x25c7 @0x2
0x25c5…25e3 at0004 = ╱9d╱ EXEC ╱ // 0x25c9 @0x4
0x25c5…25e3 at0005 = ╱46╱F╱ // 0x25ca @0x5
0x25c5…25e3 at0006 = ╱45╱E╱ // 0x25cb @0x6
0x25c5…25e3 at0007 = ╱4a╱J╱ // 0x25cc @0x7
0x25c5…25e3 at0008 = ╱4c╱L╱ // 0x25cd @0x8
0x25c5…25e3 at0009 = ╱ed╱(╱ // 0x25ce @0x9
0x25c5…25e3 at000a = ╱39╱9╱ // 0x25cf @0xa
0x25c5…25e3 at000b = ╱fe00009004╱ // 0x25d0 @0xb
0x25c5…25e3 at0010 = ╱ec╱,╱ // 0x25d5 @0x10
0x25c5…25e3 at0011 = ╱31╱1╱ // 0x25d6 @0x11
0x25c5…25e3 at0012 = ╱35╱5╱ // 0x25d7 @0x12
0x25c5…25e3 at0013 = ╱fe0000f004╱ // 0x25d8 @0x13
0x25c5…25e3 at0018 = ╱ec╱,╱ // 0x25dd @0x18
0x25c5…25e3 at0019 = ╱4b╱K╱ // 0x25de @0x19
0x25c5…25e3 at001a = ╱31╱1╱ // 0x25df @0x1a
0x25c5…25e3 at001b = ╱ef╱$╱ // 0x25e0 @0x1b
0x25c5…25e3 at001c = ╱ee╱)╱ // 0x25e1 @0x1c
0x25c5…25e3 at001d = EOL // 0x25e2 @0x1d
0x25c5…25e3 }
0x25e3…25f8 b34f 3290 GET K1$,16:K6$
0x25e3…25f8 LineComalBin {
0x25e3…25f8 ptr = 0xb34f // 0x25e3 @0x0
0x25e3…25f8 lno = 0x0cda // 0x25e5 @0x2
0x25e3…25f8 at0004 = ╱a9╱ GET ╱ // 0x25e7 @0x4
0x25e3…25f8 at0005 = ╱4b╱K╱ // 0x25e8 @0x5
0x25e3…25f8 at0006 = ╱31╱1╱ // 0x25e9 @0x6
0x25e3…25f8 at0007 = ╱ef╱$╱ // 0x25ea @0x7
0x25e3…25f8 at0008 = ╱ec╱,╱ // 0x25eb @0x8
0x25e3…25f8 at0009 = ╱31╱1╱ // 0x25ec @0x9
0x25e3…25f8 at000a = ╱36╱6╱ // 0x25ed @0xa
0x25e3…25f8 at000b = ╱fe00008005╱ // 0x25ee @0xb
0x25e3…25f8 at0010 = ╱f0╱:╱ // 0x25f3 @0x10
0x25e3…25f8 at0011 = ╱4b╱K╱ // 0x25f4 @0x11
0x25e3…25f8 at0012 = ╱36╱6╱ // 0x25f5 @0x12
0x25e3…25f8 at0013 = ╱ef╱$╱ // 0x25f6 @0x13
0x25e3…25f8 at0014 = EOL // 0x25f7 @0x14
0x25e3…25f8 }
0x25f8…2616 b36d 3300 EXEC FEJL(9,16,K1$)
0x25f8…2616 LineComalBin {
0x25f8…2616 ptr = 0xb36d // 0x25f8 @0x0
0x25f8…2616 lno = 0x0ce4 // 0x25fa @0x2
0x25f8…2616 at0004 = ╱9d╱ EXEC ╱ // 0x25fc @0x4
0x25f8…2616 at0005 = ╱46╱F╱ // 0x25fd @0x5
0x25f8…2616 at0006 = ╱45╱E╱ // 0x25fe @0x6
0x25f8…2616 at0007 = ╱4a╱J╱ // 0x25ff @0x7
0x25f8…2616 at0008 = ╱4c╱L╱ // 0x2600 @0x8
0x25f8…2616 at0009 = ╱ed╱(╱ // 0x2601 @0x9
0x25f8…2616 at000a = ╱39╱9╱ // 0x2602 @0xa
0x25f8…2616 at000b = ╱fe00009004╱ // 0x2603 @0xb
0x25f8…2616 at0010 = ╱ec╱,╱ // 0x2608 @0x10
0x25f8…2616 at0011 = ╱31╱1╱ // 0x2609 @0x11
0x25f8…2616 at0012 = ╱36╱6╱ // 0x260a @0x12
0x25f8…2616 at0013 = ╱fe00008005╱ // 0x260b @0x13
0x25f8…2616 at0018 = ╱ec╱,╱ // 0x2610 @0x18
0x25f8…2616 at0019 = ╱4b╱K╱ // 0x2611 @0x19
0x25f8…2616 at001a = ╱31╱1╱ // 0x2612 @0x1a
0x25f8…2616 at001b = ╱ef╱$╱ // 0x2613 @0x1b
0x25f8…2616 at001c = ╱ee╱)╱ // 0x2614 @0x1c
0x25f8…2616 at001d = EOL // 0x2615 @0x1d
0x25f8…2616 }
0x2616…262b b382 3310 GET K1$,17:K7$
0x2616…262b LineComalBin {
0x2616…262b ptr = 0xb382 // 0x2616 @0x0
0x2616…262b lno = 0x0cee // 0x2618 @0x2
0x2616…262b at0004 = ╱a9╱ GET ╱ // 0x261a @0x4
0x2616…262b at0005 = ╱4b╱K╱ // 0x261b @0x5
0x2616…262b at0006 = ╱31╱1╱ // 0x261c @0x6
0x2616…262b at0007 = ╱ef╱$╱ // 0x261d @0x7
0x2616…262b at0008 = ╱ec╱,╱ // 0x261e @0x8
0x2616…262b at0009 = ╱31╱1╱ // 0x261f @0x9
0x2616…262b at000a = ╱37╱7╱ // 0x2620 @0xa
0x2616…262b at000b = ╱fe00008805╱ // 0x2621 @0xb
0x2616…262b at0010 = ╱f0╱:╱ // 0x2626 @0x10
0x2616…262b at0011 = ╱4b╱K╱ // 0x2627 @0x11
0x2616…262b at0012 = ╱37╱7╱ // 0x2628 @0x12
0x2616…262b at0013 = ╱ef╱$╱ // 0x2629 @0x13
0x2616…262b at0014 = EOL // 0x262a @0x14
0x2616…262b }
0x262b…2649 b3a0 3320 EXEC FEJL(9,17,K1$)
0x262b…2649 LineComalBin {
0x262b…2649 ptr = 0xb3a0 // 0x262b @0x0
0x262b…2649 lno = 0x0cf8 // 0x262d @0x2
0x262b…2649 at0004 = ╱9d╱ EXEC ╱ // 0x262f @0x4
0x262b…2649 at0005 = ╱46╱F╱ // 0x2630 @0x5
0x262b…2649 at0006 = ╱45╱E╱ // 0x2631 @0x6
0x262b…2649 at0007 = ╱4a╱J╱ // 0x2632 @0x7
0x262b…2649 at0008 = ╱4c╱L╱ // 0x2633 @0x8
0x262b…2649 at0009 = ╱ed╱(╱ // 0x2634 @0x9
0x262b…2649 at000a = ╱39╱9╱ // 0x2635 @0xa
0x262b…2649 at000b = ╱fe00009004╱ // 0x2636 @0xb
0x262b…2649 at0010 = ╱ec╱,╱ // 0x263b @0x10
0x262b…2649 at0011 = ╱31╱1╱ // 0x263c @0x11
0x262b…2649 at0012 = ╱37╱7╱ // 0x263d @0x12
0x262b…2649 at0013 = ╱fe00008805╱ // 0x263e @0x13
0x262b…2649 at0018 = ╱ec╱,╱ // 0x2643 @0x18
0x262b…2649 at0019 = ╱4b╱K╱ // 0x2644 @0x19
0x262b…2649 at001a = ╱31╱1╱ // 0x2645 @0x1a
0x262b…2649 at001b = ╱ef╱$╱ // 0x2646 @0x1b
0x262b…2649 at001c = ╱ee╱)╱ // 0x2647 @0x1c
0x262b…2649 at001d = EOL // 0x2648 @0x1d
0x262b…2649 }
0x2649…265e b3b5 3330 GET K1$,21:K8$
0x2649…265e LineComalBin {
0x2649…265e ptr = 0xb3b5 // 0x2649 @0x0
0x2649…265e lno = 0x0d02 // 0x264b @0x2
0x2649…265e at0004 = ╱a9╱ GET ╱ // 0x264d @0x4
0x2649…265e at0005 = ╱4b╱K╱ // 0x264e @0x5
0x2649…265e at0006 = ╱31╱1╱ // 0x264f @0x6
0x2649…265e at0007 = ╱ef╱$╱ // 0x2650 @0x7
0x2649…265e at0008 = ╱ec╱,╱ // 0x2651 @0x8
0x2649…265e at0009 = ╱32╱2╱ // 0x2652 @0x9
0x2649…265e at000a = ╱31╱1╱ // 0x2653 @0xa
0x2649…265e at000b = ╱fe0000a805╱ // 0x2654 @0xb
0x2649…265e at0010 = ╱f0╱:╱ // 0x2659 @0x10
0x2649…265e at0011 = ╱4b╱K╱ // 0x265a @0x11
0x2649…265e at0012 = ╱38╱8╱ // 0x265b @0x12
0x2649…265e at0013 = ╱ef╱$╱ // 0x265c @0x13
0x2649…265e at0014 = EOL // 0x265d @0x14
0x2649…265e }
0x265e…267c b3d3 3340 EXEC FEJL(9,18,K1$)
0x265e…267c LineComalBin {
0x265e…267c ptr = 0xb3d3 // 0x265e @0x0
0x265e…267c lno = 0x0d0c // 0x2660 @0x2
0x265e…267c at0004 = ╱9d╱ EXEC ╱ // 0x2662 @0x4
0x265e…267c at0005 = ╱46╱F╱ // 0x2663 @0x5
0x265e…267c at0006 = ╱45╱E╱ // 0x2664 @0x6
0x265e…267c at0007 = ╱4a╱J╱ // 0x2665 @0x7
0x265e…267c at0008 = ╱4c╱L╱ // 0x2666 @0x8
0x265e…267c at0009 = ╱ed╱(╱ // 0x2667 @0x9
0x265e…267c at000a = ╱39╱9╱ // 0x2668 @0xa
0x265e…267c at000b = ╱fe00009004╱ // 0x2669 @0xb
0x265e…267c at0010 = ╱ec╱,╱ // 0x266e @0x10
0x265e…267c at0011 = ╱31╱1╱ // 0x266f @0x11
0x265e…267c at0012 = ╱38╱8╱ // 0x2670 @0x12
0x265e…267c at0013 = ╱fe00009005╱ // 0x2671 @0x13
0x265e…267c at0018 = ╱ec╱,╱ // 0x2676 @0x18
0x265e…267c at0019 = ╱4b╱K╱ // 0x2677 @0x19
0x265e…267c at001a = ╱31╱1╱ // 0x2678 @0x1a
0x265e…267c at001b = ╱ef╱$╱ // 0x2679 @0x1b
0x265e…267c at001c = ╱ee╱)╱ // 0x267a @0x1c
0x265e…267c at001d = EOL // 0x267b @0x1d
0x265e…267c }
0x267c…2691 b3e8 3350 GET K1$,22:K9$
0x267c…2691 LineComalBin {
0x267c…2691 ptr = 0xb3e8 // 0x267c @0x0
0x267c…2691 lno = 0x0d16 // 0x267e @0x2
0x267c…2691 at0004 = ╱a9╱ GET ╱ // 0x2680 @0x4
0x267c…2691 at0005 = ╱4b╱K╱ // 0x2681 @0x5
0x267c…2691 at0006 = ╱31╱1╱ // 0x2682 @0x6
0x267c…2691 at0007 = ╱ef╱$╱ // 0x2683 @0x7
0x267c…2691 at0008 = ╱ec╱,╱ // 0x2684 @0x8
0x267c…2691 at0009 = ╱32╱2╱ // 0x2685 @0x9
0x267c…2691 at000a = ╱32╱2╱ // 0x2686 @0xa
0x267c…2691 at000b = ╱fe0000b005╱ // 0x2687 @0xb
0x267c…2691 at0010 = ╱f0╱:╱ // 0x268c @0x10
0x267c…2691 at0011 = ╱4b╱K╱ // 0x268d @0x11
0x267c…2691 at0012 = ╱39╱9╱ // 0x268e @0x12
0x267c…2691 at0013 = ╱ef╱$╱ // 0x268f @0x13
0x267c…2691 at0014 = EOL // 0x2690 @0x14
0x267c…2691 }
0x2691…26af b406 3360 EXEC FEJL(9,19,K1$)
0x2691…26af LineComalBin {
0x2691…26af ptr = 0xb406 // 0x2691 @0x0
0x2691…26af lno = 0x0d20 // 0x2693 @0x2
0x2691…26af at0004 = ╱9d╱ EXEC ╱ // 0x2695 @0x4
0x2691…26af at0005 = ╱46╱F╱ // 0x2696 @0x5
0x2691…26af at0006 = ╱45╱E╱ // 0x2697 @0x6
0x2691…26af at0007 = ╱4a╱J╱ // 0x2698 @0x7
0x2691…26af at0008 = ╱4c╱L╱ // 0x2699 @0x8
0x2691…26af at0009 = ╱ed╱(╱ // 0x269a @0x9
0x2691…26af at000a = ╱39╱9╱ // 0x269b @0xa
0x2691…26af at000b = ╱fe00009004╱ // 0x269c @0xb
0x2691…26af at0010 = ╱ec╱,╱ // 0x26a1 @0x10
0x2691…26af at0011 = ╱31╱1╱ // 0x26a2 @0x11
0x2691…26af at0012 = ╱39╱9╱ // 0x26a3 @0x12
0x2691…26af at0013 = ╱fe00009805╱ // 0x26a4 @0x13
0x2691…26af at0018 = ╱ec╱,╱ // 0x26a9 @0x18
0x2691…26af at0019 = ╱4b╱K╱ // 0x26aa @0x19
0x2691…26af at001a = ╱31╱1╱ // 0x26ab @0x1a
0x2691…26af at001b = ╱ef╱$╱ // 0x26ac @0x1b
0x2691…26af at001c = ╱ee╱)╱ // 0x26ad @0x1c
0x2691…26af at001d = EOL // 0x26ae @0x1d
0x2691…26af }
0x26af…26c5 b41c 3370 GET K1$,23:K10$
0x26af…26c5 LineComalBin {
0x26af…26c5 ptr = 0xb41c // 0x26af @0x0
0x26af…26c5 lno = 0x0d2a // 0x26b1 @0x2
0x26af…26c5 at0004 = ╱a9╱ GET ╱ // 0x26b3 @0x4
0x26af…26c5 at0005 = ╱4b╱K╱ // 0x26b4 @0x5
0x26af…26c5 at0006 = ╱31╱1╱ // 0x26b5 @0x6
0x26af…26c5 at0007 = ╱ef╱$╱ // 0x26b6 @0x7
0x26af…26c5 at0008 = ╱ec╱,╱ // 0x26b7 @0x8
0x26af…26c5 at0009 = ╱32╱2╱ // 0x26b8 @0x9
0x26af…26c5 at000a = ╱33╱3╱ // 0x26b9 @0xa
0x26af…26c5 at000b = ╱fe0000b805╱ // 0x26ba @0xb
0x26af…26c5 at0010 = ╱f0╱:╱ // 0x26bf @0x10
0x26af…26c5 at0011 = ╱4b╱K╱ // 0x26c0 @0x11
0x26af…26c5 at0012 = ╱31╱1╱ // 0x26c1 @0x12
0x26af…26c5 at0013 = ╱30╱0╱ // 0x26c2 @0x13
0x26af…26c5 at0014 = ╱ef╱$╱ // 0x26c3 @0x14
0x26af…26c5 at0015 = EOL // 0x26c4 @0x15
0x26af…26c5 }
0x26c5…26e3 b43a 3380 EXEC FEJL(9,20,K1$)
0x26c5…26e3 LineComalBin {
0x26c5…26e3 ptr = 0xb43a // 0x26c5 @0x0
0x26c5…26e3 lno = 0x0d34 // 0x26c7 @0x2
0x26c5…26e3 at0004 = ╱9d╱ EXEC ╱ // 0x26c9 @0x4
0x26c5…26e3 at0005 = ╱46╱F╱ // 0x26ca @0x5
0x26c5…26e3 at0006 = ╱45╱E╱ // 0x26cb @0x6
0x26c5…26e3 at0007 = ╱4a╱J╱ // 0x26cc @0x7
0x26c5…26e3 at0008 = ╱4c╱L╱ // 0x26cd @0x8
0x26c5…26e3 at0009 = ╱ed╱(╱ // 0x26ce @0x9
0x26c5…26e3 at000a = ╱39╱9╱ // 0x26cf @0xa
0x26c5…26e3 at000b = ╱fe00009004╱ // 0x26d0 @0xb
0x26c5…26e3 at0010 = ╱ec╱,╱ // 0x26d5 @0x10
0x26c5…26e3 at0011 = ╱32╱2╱ // 0x26d6 @0x11
0x26c5…26e3 at0012 = ╱30╱0╱ // 0x26d7 @0x12
0x26c5…26e3 at0013 = ╱fe0000a005╱ // 0x26d8 @0x13
0x26c5…26e3 at0018 = ╱ec╱,╱ // 0x26dd @0x18
0x26c5…26e3 at0019 = ╱4b╱K╱ // 0x26de @0x19
0x26c5…26e3 at001a = ╱31╱1╱ // 0x26df @0x1a
0x26c5…26e3 at001b = ╱ef╱$╱ // 0x26e0 @0x1b
0x26c5…26e3 at001c = ╱ee╱)╱ // 0x26e1 @0x1c
0x26c5…26e3 at001d = EOL // 0x26e2 @0x1d
0x26c5…26e3 }
0x26e3…26f9 b450 3390 GET K1$,24:K11$
0x26e3…26f9 LineComalBin {
0x26e3…26f9 ptr = 0xb450 // 0x26e3 @0x0
0x26e3…26f9 lno = 0x0d3e // 0x26e5 @0x2
0x26e3…26f9 at0004 = ╱a9╱ GET ╱ // 0x26e7 @0x4
0x26e3…26f9 at0005 = ╱4b╱K╱ // 0x26e8 @0x5
0x26e3…26f9 at0006 = ╱31╱1╱ // 0x26e9 @0x6
0x26e3…26f9 at0007 = ╱ef╱$╱ // 0x26ea @0x7
0x26e3…26f9 at0008 = ╱ec╱,╱ // 0x26eb @0x8
0x26e3…26f9 at0009 = ╱32╱2╱ // 0x26ec @0x9
0x26e3…26f9 at000a = ╱34╱4╱ // 0x26ed @0xa
0x26e3…26f9 at000b = ╱fe0000c005╱ // 0x26ee @0xb
0x26e3…26f9 at0010 = ╱f0╱:╱ // 0x26f3 @0x10
0x26e3…26f9 at0011 = ╱4b╱K╱ // 0x26f4 @0x11
0x26e3…26f9 at0012 = ╱31╱1╱ // 0x26f5 @0x12
0x26e3…26f9 at0013 = ╱31╱1╱ // 0x26f6 @0x13
0x26e3…26f9 at0014 = ╱ef╱$╱ // 0x26f7 @0x14
0x26e3…26f9 at0015 = EOL // 0x26f8 @0x15
0x26e3…26f9 }
0x26f9…2717 b46e 3400 EXEC FEJL(9,21,K1$)
0x26f9…2717 LineComalBin {
0x26f9…2717 ptr = 0xb46e // 0x26f9 @0x0
0x26f9…2717 lno = 0x0d48 // 0x26fb @0x2
0x26f9…2717 at0004 = ╱9d╱ EXEC ╱ // 0x26fd @0x4
0x26f9…2717 at0005 = ╱46╱F╱ // 0x26fe @0x5
0x26f9…2717 at0006 = ╱45╱E╱ // 0x26ff @0x6
0x26f9…2717 at0007 = ╱4a╱J╱ // 0x2700 @0x7
0x26f9…2717 at0008 = ╱4c╱L╱ // 0x2701 @0x8
0x26f9…2717 at0009 = ╱ed╱(╱ // 0x2702 @0x9
0x26f9…2717 at000a = ╱39╱9╱ // 0x2703 @0xa
0x26f9…2717 at000b = ╱fe00009004╱ // 0x2704 @0xb
0x26f9…2717 at0010 = ╱ec╱,╱ // 0x2709 @0x10
0x26f9…2717 at0011 = ╱32╱2╱ // 0x270a @0x11
0x26f9…2717 at0012 = ╱31╱1╱ // 0x270b @0x12
0x26f9…2717 at0013 = ╱fe0000a805╱ // 0x270c @0x13
0x26f9…2717 at0018 = ╱ec╱,╱ // 0x2711 @0x18
0x26f9…2717 at0019 = ╱4b╱K╱ // 0x2712 @0x19
0x26f9…2717 at001a = ╱31╱1╱ // 0x2713 @0x1a
0x26f9…2717 at001b = ╱ef╱$╱ // 0x2714 @0x1b
0x26f9…2717 at001c = ╱ee╱)╱ // 0x2715 @0x1c
0x26f9…2717 at001d = EOL // 0x2716 @0x1d
0x26f9…2717 }
0x2717…272d b484 3410 GET K1$,28:K12$
0x2717…272d LineComalBin {
0x2717…272d ptr = 0xb484 // 0x2717 @0x0
0x2717…272d lno = 0x0d52 // 0x2719 @0x2
0x2717…272d at0004 = ╱a9╱ GET ╱ // 0x271b @0x4
0x2717…272d at0005 = ╱4b╱K╱ // 0x271c @0x5
0x2717…272d at0006 = ╱31╱1╱ // 0x271d @0x6
0x2717…272d at0007 = ╱ef╱$╱ // 0x271e @0x7
0x2717…272d at0008 = ╱ec╱,╱ // 0x271f @0x8
0x2717…272d at0009 = ╱32╱2╱ // 0x2720 @0x9
0x2717…272d at000a = ╱38╱8╱ // 0x2721 @0xa
0x2717…272d at000b = ╱fe0000e005╱ // 0x2722 @0xb
0x2717…272d at0010 = ╱f0╱:╱ // 0x2727 @0x10
0x2717…272d at0011 = ╱4b╱K╱ // 0x2728 @0x11
0x2717…272d at0012 = ╱31╱1╱ // 0x2729 @0x12
0x2717…272d at0013 = ╱32╱2╱ // 0x272a @0x13
0x2717…272d at0014 = ╱ef╱$╱ // 0x272b @0x14
0x2717…272d at0015 = EOL // 0x272c @0x15
0x2717…272d }
0x272d…274b b4a2 3420 EXEC FEJL(9,22,K1$)
0x272d…274b LineComalBin {
0x272d…274b ptr = 0xb4a2 // 0x272d @0x0
0x272d…274b lno = 0x0d5c // 0x272f @0x2
0x272d…274b at0004 = ╱9d╱ EXEC ╱ // 0x2731 @0x4
0x272d…274b at0005 = ╱46╱F╱ // 0x2732 @0x5
0x272d…274b at0006 = ╱45╱E╱ // 0x2733 @0x6
0x272d…274b at0007 = ╱4a╱J╱ // 0x2734 @0x7
0x272d…274b at0008 = ╱4c╱L╱ // 0x2735 @0x8
0x272d…274b at0009 = ╱ed╱(╱ // 0x2736 @0x9
0x272d…274b at000a = ╱39╱9╱ // 0x2737 @0xa
0x272d…274b at000b = ╱fe00009004╱ // 0x2738 @0xb
0x272d…274b at0010 = ╱ec╱,╱ // 0x273d @0x10
0x272d…274b at0011 = ╱32╱2╱ // 0x273e @0x11
0x272d…274b at0012 = ╱32╱2╱ // 0x273f @0x12
0x272d…274b at0013 = ╱fe0000b005╱ // 0x2740 @0x13
0x272d…274b at0018 = ╱ec╱,╱ // 0x2745 @0x18
0x272d…274b at0019 = ╱4b╱K╱ // 0x2746 @0x19
0x272d…274b at001a = ╱31╱1╱ // 0x2747 @0x1a
0x272d…274b at001b = ╱ef╱$╱ // 0x2748 @0x1b
0x272d…274b at001c = ╱ee╱)╱ // 0x2749 @0x1c
0x272d…274b at001d = EOL // 0x274a @0x1d
0x272d…274b }
0x274b…2761 b4b8 3430 GET K1$,36:K13$
0x274b…2761 LineComalBin {
0x274b…2761 ptr = 0xb4b8 // 0x274b @0x0
0x274b…2761 lno = 0x0d66 // 0x274d @0x2
0x274b…2761 at0004 = ╱a9╱ GET ╱ // 0x274f @0x4
0x274b…2761 at0005 = ╱4b╱K╱ // 0x2750 @0x5
0x274b…2761 at0006 = ╱31╱1╱ // 0x2751 @0x6
0x274b…2761 at0007 = ╱ef╱$╱ // 0x2752 @0x7
0x274b…2761 at0008 = ╱ec╱,╱ // 0x2753 @0x8
0x274b…2761 at0009 = ╱33╱3╱ // 0x2754 @0x9
0x274b…2761 at000a = ╱36╱6╱ // 0x2755 @0xa
0x274b…2761 at000b = ╱fe00009006╱ // 0x2756 @0xb
0x274b…2761 at0010 = ╱f0╱:╱ // 0x275b @0x10
0x274b…2761 at0011 = ╱4b╱K╱ // 0x275c @0x11
0x274b…2761 at0012 = ╱31╱1╱ // 0x275d @0x12
0x274b…2761 at0013 = ╱33╱3╱ // 0x275e @0x13
0x274b…2761 at0014 = ╱ef╱$╱ // 0x275f @0x14
0x274b…2761 at0015 = EOL // 0x2760 @0x15
0x274b…2761 }
0x2761…277f b4d6 3440 EXEC FEJL(9,23,K1$)
0x2761…277f LineComalBin {
0x2761…277f ptr = 0xb4d6 // 0x2761 @0x0
0x2761…277f lno = 0x0d70 // 0x2763 @0x2
0x2761…277f at0004 = ╱9d╱ EXEC ╱ // 0x2765 @0x4
0x2761…277f at0005 = ╱46╱F╱ // 0x2766 @0x5
0x2761…277f at0006 = ╱45╱E╱ // 0x2767 @0x6
0x2761…277f at0007 = ╱4a╱J╱ // 0x2768 @0x7
0x2761…277f at0008 = ╱4c╱L╱ // 0x2769 @0x8
0x2761…277f at0009 = ╱ed╱(╱ // 0x276a @0x9
0x2761…277f at000a = ╱39╱9╱ // 0x276b @0xa
0x2761…277f at000b = ╱fe00009004╱ // 0x276c @0xb
0x2761…277f at0010 = ╱ec╱,╱ // 0x2771 @0x10
0x2761…277f at0011 = ╱32╱2╱ // 0x2772 @0x11
0x2761…277f at0012 = ╱33╱3╱ // 0x2773 @0x12
0x2761…277f at0013 = ╱fe0000b805╱ // 0x2774 @0x13
0x2761…277f at0018 = ╱ec╱,╱ // 0x2779 @0x18
0x2761…277f at0019 = ╱4b╱K╱ // 0x277a @0x19
0x2761…277f at001a = ╱31╱1╱ // 0x277b @0x1a
0x2761…277f at001b = ╱ef╱$╱ // 0x277c @0x1b
0x2761…277f at001c = ╱ee╱)╱ // 0x277d @0x1c
0x2761…277f at001d = EOL // 0x277e @0x1d
0x2761…277f }
0x277f…2795 b4ec 3450 GET K1$,37:K14$
0x277f…2795 LineComalBin {
0x277f…2795 ptr = 0xb4ec // 0x277f @0x0
0x277f…2795 lno = 0x0d7a // 0x2781 @0x2
0x277f…2795 at0004 = ╱a9╱ GET ╱ // 0x2783 @0x4
0x277f…2795 at0005 = ╱4b╱K╱ // 0x2784 @0x5
0x277f…2795 at0006 = ╱31╱1╱ // 0x2785 @0x6
0x277f…2795 at0007 = ╱ef╱$╱ // 0x2786 @0x7
0x277f…2795 at0008 = ╱ec╱,╱ // 0x2787 @0x8
0x277f…2795 at0009 = ╱33╱3╱ // 0x2788 @0x9
0x277f…2795 at000a = ╱37╱7╱ // 0x2789 @0xa
0x277f…2795 at000b = ╱fe00009406╱ // 0x278a @0xb
0x277f…2795 at0010 = ╱f0╱:╱ // 0x278f @0x10
0x277f…2795 at0011 = ╱4b╱K╱ // 0x2790 @0x11
0x277f…2795 at0012 = ╱31╱1╱ // 0x2791 @0x12
0x277f…2795 at0013 = ╱34╱4╱ // 0x2792 @0x13
0x277f…2795 at0014 = ╱ef╱$╱ // 0x2793 @0x14
0x277f…2795 at0015 = EOL // 0x2794 @0x15
0x277f…2795 }
0x2795…27b3 b50a 3460 EXEC FEJL(20,1,K1$)
0x2795…27b3 LineComalBin {
0x2795…27b3 ptr = 0xb50a // 0x2795 @0x0
0x2795…27b3 lno = 0x0d84 // 0x2797 @0x2
0x2795…27b3 at0004 = ╱9d╱ EXEC ╱ // 0x2799 @0x4
0x2795…27b3 at0005 = ╱46╱F╱ // 0x279a @0x5
0x2795…27b3 at0006 = ╱45╱E╱ // 0x279b @0x6
0x2795…27b3 at0007 = ╱4a╱J╱ // 0x279c @0x7
0x2795…27b3 at0008 = ╱4c╱L╱ // 0x279d @0x8
0x2795…27b3 at0009 = ╱ed╱(╱ // 0x279e @0x9
0x2795…27b3 at000a = ╱32╱2╱ // 0x279f @0xa
0x2795…27b3 at000b = ╱30╱0╱ // 0x27a0 @0xb
0x2795…27b3 at000c = ╱fe0000a005╱ // 0x27a1 @0xc
0x2795…27b3 at0011 = ╱ec╱,╱ // 0x27a6 @0x11
0x2795…27b3 at0012 = ╱31╱1╱ // 0x27a7 @0x12
0x2795…27b3 at0013 = ╱fe00008001╱ // 0x27a8 @0x13
0x2795…27b3 at0018 = ╱ec╱,╱ // 0x27ad @0x18
0x2795…27b3 at0019 = ╱4b╱K╱ // 0x27ae @0x19
0x2795…27b3 at001a = ╱31╱1╱ // 0x27af @0x1a
0x2795…27b3 at001b = ╱ef╱$╱ // 0x27b0 @0x1b
0x2795…27b3 at001c = ╱ee╱)╱ // 0x27b1 @0x1c
0x2795…27b3 at001d = EOL // 0x27b2 @0x1d
0x2795…27b3 }
0x27b3…27c9 b520 3470 GET K1$,38:K15$
0x27b3…27c9 LineComalBin {
0x27b3…27c9 ptr = 0xb520 // 0x27b3 @0x0
0x27b3…27c9 lno = 0x0d8e // 0x27b5 @0x2
0x27b3…27c9 at0004 = ╱a9╱ GET ╱ // 0x27b7 @0x4
0x27b3…27c9 at0005 = ╱4b╱K╱ // 0x27b8 @0x5
0x27b3…27c9 at0006 = ╱31╱1╱ // 0x27b9 @0x6
0x27b3…27c9 at0007 = ╱ef╱$╱ // 0x27ba @0x7
0x27b3…27c9 at0008 = ╱ec╱,╱ // 0x27bb @0x8
0x27b3…27c9 at0009 = ╱33╱3╱ // 0x27bc @0x9
0x27b3…27c9 at000a = ╱38╱8╱ // 0x27bd @0xa
0x27b3…27c9 at000b = ╱fe00009806╱ // 0x27be @0xb
0x27b3…27c9 at0010 = ╱f0╱:╱ // 0x27c3 @0x10
0x27b3…27c9 at0011 = ╱4b╱K╱ // 0x27c4 @0x11
0x27b3…27c9 at0012 = ╱31╱1╱ // 0x27c5 @0x12
0x27b3…27c9 at0013 = ╱35╱5╱ // 0x27c6 @0x13
0x27b3…27c9 at0014 = ╱ef╱$╱ // 0x27c7 @0x14
0x27b3…27c9 at0015 = EOL // 0x27c8 @0x15
0x27b3…27c9 }
0x27c9…27e7 b53e 3480 EXEC FEJL(20,2,K1$)
0x27c9…27e7 LineComalBin {
0x27c9…27e7 ptr = 0xb53e // 0x27c9 @0x0
0x27c9…27e7 lno = 0x0d98 // 0x27cb @0x2
0x27c9…27e7 at0004 = ╱9d╱ EXEC ╱ // 0x27cd @0x4
0x27c9…27e7 at0005 = ╱46╱F╱ // 0x27ce @0x5
0x27c9…27e7 at0006 = ╱45╱E╱ // 0x27cf @0x6
0x27c9…27e7 at0007 = ╱4a╱J╱ // 0x27d0 @0x7
0x27c9…27e7 at0008 = ╱4c╱L╱ // 0x27d1 @0x8
0x27c9…27e7 at0009 = ╱ed╱(╱ // 0x27d2 @0x9
0x27c9…27e7 at000a = ╱32╱2╱ // 0x27d3 @0xa
0x27c9…27e7 at000b = ╱30╱0╱ // 0x27d4 @0xb
0x27c9…27e7 at000c = ╱fe0000a005╱ // 0x27d5 @0xc
0x27c9…27e7 at0011 = ╱ec╱,╱ // 0x27da @0x11
0x27c9…27e7 at0012 = ╱32╱2╱ // 0x27db @0x12
0x27c9…27e7 at0013 = ╱fe00008002╱ // 0x27dc @0x13
0x27c9…27e7 at0018 = ╱ec╱,╱ // 0x27e1 @0x18
0x27c9…27e7 at0019 = ╱4b╱K╱ // 0x27e2 @0x19
0x27c9…27e7 at001a = ╱31╱1╱ // 0x27e3 @0x1a
0x27c9…27e7 at001b = ╱ef╱$╱ // 0x27e4 @0x1b
0x27c9…27e7 at001c = ╱ee╱)╱ // 0x27e5 @0x1c
0x27c9…27e7 at001d = EOL // 0x27e6 @0x1d
0x27c9…27e7 }
0x27e7…27fd b554 3490 GET K1$,39:K16$
0x27e7…27fd LineComalBin {
0x27e7…27fd ptr = 0xb554 // 0x27e7 @0x0
0x27e7…27fd lno = 0x0da2 // 0x27e9 @0x2
0x27e7…27fd at0004 = ╱a9╱ GET ╱ // 0x27eb @0x4
0x27e7…27fd at0005 = ╱4b╱K╱ // 0x27ec @0x5
0x27e7…27fd at0006 = ╱31╱1╱ // 0x27ed @0x6
0x27e7…27fd at0007 = ╱ef╱$╱ // 0x27ee @0x7
0x27e7…27fd at0008 = ╱ec╱,╱ // 0x27ef @0x8
0x27e7…27fd at0009 = ╱33╱3╱ // 0x27f0 @0x9
0x27e7…27fd at000a = ╱39╱9╱ // 0x27f1 @0xa
0x27e7…27fd at000b = ╱fe00009c06╱ // 0x27f2 @0xb
0x27e7…27fd at0010 = ╱f0╱:╱ // 0x27f7 @0x10
0x27e7…27fd at0011 = ╱4b╱K╱ // 0x27f8 @0x11
0x27e7…27fd at0012 = ╱31╱1╱ // 0x27f9 @0x12
0x27e7…27fd at0013 = ╱36╱6╱ // 0x27fa @0x13
0x27e7…27fd at0014 = ╱ef╱$╱ // 0x27fb @0x14
0x27e7…27fd at0015 = EOL // 0x27fc @0x15
0x27e7…27fd }
0x27fd…281b b572 3500 EXEC FEJL(20,3,K1$)
0x27fd…281b LineComalBin {
0x27fd…281b ptr = 0xb572 // 0x27fd @0x0
0x27fd…281b lno = 0x0dac // 0x27ff @0x2
0x27fd…281b at0004 = ╱9d╱ EXEC ╱ // 0x2801 @0x4
0x27fd…281b at0005 = ╱46╱F╱ // 0x2802 @0x5
0x27fd…281b at0006 = ╱45╱E╱ // 0x2803 @0x6
0x27fd…281b at0007 = ╱4a╱J╱ // 0x2804 @0x7
0x27fd…281b at0008 = ╱4c╱L╱ // 0x2805 @0x8
0x27fd…281b at0009 = ╱ed╱(╱ // 0x2806 @0x9
0x27fd…281b at000a = ╱32╱2╱ // 0x2807 @0xa
0x27fd…281b at000b = ╱30╱0╱ // 0x2808 @0xb
0x27fd…281b at000c = ╱fe0000a005╱ // 0x2809 @0xc
0x27fd…281b at0011 = ╱ec╱,╱ // 0x280e @0x11
0x27fd…281b at0012 = ╱33╱3╱ // 0x280f @0x12
0x27fd…281b at0013 = ╱fe0000c002╱ // 0x2810 @0x13
0x27fd…281b at0018 = ╱ec╱,╱ // 0x2815 @0x18
0x27fd…281b at0019 = ╱4b╱K╱ // 0x2816 @0x19
0x27fd…281b at001a = ╱31╱1╱ // 0x2817 @0x1a
0x27fd…281b at001b = ╱ef╱$╱ // 0x2818 @0x1b
0x27fd…281b at001c = ╱ee╱)╱ // 0x2819 @0x1c
0x27fd…281b at001d = EOL // 0x281a @0x1d
0x27fd…281b }
0x281b…2831 b588 3510 GET K1$,40:K17$
0x281b…2831 LineComalBin {
0x281b…2831 ptr = 0xb588 // 0x281b @0x0
0x281b…2831 lno = 0x0db6 // 0x281d @0x2
0x281b…2831 at0004 = ╱a9╱ GET ╱ // 0x281f @0x4
0x281b…2831 at0005 = ╱4b╱K╱ // 0x2820 @0x5
0x281b…2831 at0006 = ╱31╱1╱ // 0x2821 @0x6
0x281b…2831 at0007 = ╱ef╱$╱ // 0x2822 @0x7
0x281b…2831 at0008 = ╱ec╱,╱ // 0x2823 @0x8
0x281b…2831 at0009 = ╱34╱4╱ // 0x2824 @0x9
0x281b…2831 at000a = ╱30╱0╱ // 0x2825 @0xa
0x281b…2831 at000b = ╱fe0000a006╱ // 0x2826 @0xb
0x281b…2831 at0010 = ╱f0╱:╱ // 0x282b @0x10
0x281b…2831 at0011 = ╱4b╱K╱ // 0x282c @0x11
0x281b…2831 at0012 = ╱31╱1╱ // 0x282d @0x12
0x281b…2831 at0013 = ╱37╱7╱ // 0x282e @0x13
0x281b…2831 at0014 = ╱ef╱$╱ // 0x282f @0x14
0x281b…2831 at0015 = EOL // 0x2830 @0x15
0x281b…2831 }
0x2831…284f b5a6 3520 EXEC FEJL(20,4,K1$)
0x2831…284f LineComalBin {
0x2831…284f ptr = 0xb5a6 // 0x2831 @0x0
0x2831…284f lno = 0x0dc0 // 0x2833 @0x2
0x2831…284f at0004 = ╱9d╱ EXEC ╱ // 0x2835 @0x4
0x2831…284f at0005 = ╱46╱F╱ // 0x2836 @0x5
0x2831…284f at0006 = ╱45╱E╱ // 0x2837 @0x6
0x2831…284f at0007 = ╱4a╱J╱ // 0x2838 @0x7
0x2831…284f at0008 = ╱4c╱L╱ // 0x2839 @0x8
0x2831…284f at0009 = ╱ed╱(╱ // 0x283a @0x9
0x2831…284f at000a = ╱32╱2╱ // 0x283b @0xa
0x2831…284f at000b = ╱30╱0╱ // 0x283c @0xb
0x2831…284f at000c = ╱fe0000a005╱ // 0x283d @0xc
0x2831…284f at0011 = ╱ec╱,╱ // 0x2842 @0x11
0x2831…284f at0012 = ╱34╱4╱ // 0x2843 @0x12
0x2831…284f at0013 = ╱fe00008003╱ // 0x2844 @0x13
0x2831…284f at0018 = ╱ec╱,╱ // 0x2849 @0x18
0x2831…284f at0019 = ╱4b╱K╱ // 0x284a @0x19
0x2831…284f at001a = ╱31╱1╱ // 0x284b @0x1a
0x2831…284f at001b = ╱ef╱$╱ // 0x284c @0x1b
0x2831…284f at001c = ╱ee╱)╱ // 0x284d @0x1c
0x2831…284f at001d = EOL // 0x284e @0x1d
0x2831…284f }
0x284f…286c b5c3 3530 GET K1$,43:METOT,MEMID
0x284f…286c LineComalBin {
0x284f…286c ptr = 0xb5c3 // 0x284f @0x0
0x284f…286c lno = 0x0dca // 0x2851 @0x2
0x284f…286c at0004 = ╱a9╱ GET ╱ // 0x2853 @0x4
0x284f…286c at0005 = ╱4b╱K╱ // 0x2854 @0x5
0x284f…286c at0006 = ╱31╱1╱ // 0x2855 @0x6
0x284f…286c at0007 = ╱ef╱$╱ // 0x2856 @0x7
0x284f…286c at0008 = ╱ec╱,╱ // 0x2857 @0x8
0x284f…286c at0009 = ╱34╱4╱ // 0x2858 @0x9
0x284f…286c at000a = ╱33╱3╱ // 0x2859 @0xa
0x284f…286c at000b = ╱fe0000ac06╱ // 0x285a @0xb
0x284f…286c at0010 = ╱f0╱:╱ // 0x285f @0x10
0x284f…286c at0011 = ╱4d╱M╱ // 0x2860 @0x11
0x284f…286c at0012 = ╱45╱E╱ // 0x2861 @0x12
0x284f…286c at0013 = ╱54╱T╱ // 0x2862 @0x13
0x284f…286c at0014 = ╱4f╱O╱ // 0x2863 @0x14
0x284f…286c at0015 = ╱54╱T╱ // 0x2864 @0x15
0x284f…286c at0016 = ╱ec╱,╱ // 0x2865 @0x16
0x284f…286c at0017 = ╱4d╱M╱ // 0x2866 @0x17
0x284f…286c at0018 = ╱45╱E╱ // 0x2867 @0x18
0x284f…286c at0019 = ╱4d╱M╱ // 0x2868 @0x19
0x284f…286c at001a = ╱49╱I╱ // 0x2869 @0x1a
0x284f…286c at001b = ╱44╱D╱ // 0x286a @0x1b
0x284f…286c at001c = EOL // 0x286b @0x1c
0x284f…286c }
0x286c…288a b5e1 3540 EXEC FEJL(20,5,K1$)
0x286c…288a LineComalBin {
0x286c…288a ptr = 0xb5e1 // 0x286c @0x0
0x286c…288a lno = 0x0dd4 // 0x286e @0x2
0x286c…288a at0004 = ╱9d╱ EXEC ╱ // 0x2870 @0x4
0x286c…288a at0005 = ╱46╱F╱ // 0x2871 @0x5
0x286c…288a at0006 = ╱45╱E╱ // 0x2872 @0x6
0x286c…288a at0007 = ╱4a╱J╱ // 0x2873 @0x7
0x286c…288a at0008 = ╱4c╱L╱ // 0x2874 @0x8
0x286c…288a at0009 = ╱ed╱(╱ // 0x2875 @0x9
0x286c…288a at000a = ╱32╱2╱ // 0x2876 @0xa
0x286c…288a at000b = ╱30╱0╱ // 0x2877 @0xb
0x286c…288a at000c = ╱fe0000a005╱ // 0x2878 @0xc
0x286c…288a at0011 = ╱ec╱,╱ // 0x287d @0x11
0x286c…288a at0012 = ╱35╱5╱ // 0x287e @0x12
0x286c…288a at0013 = ╱fe0000a003╱ // 0x287f @0x13
0x286c…288a at0018 = ╱ec╱,╱ // 0x2884 @0x18
0x286c…288a at0019 = ╱4b╱K╱ // 0x2885 @0x19
0x286c…288a at001a = ╱31╱1╱ // 0x2886 @0x1a
0x286c…288a at001b = ╱ef╱$╱ // 0x2887 @0x1b
0x286c…288a at001c = ╱ee╱)╱ // 0x2888 @0x1c
0x286c…288a at001d = EOL // 0x2889 @0x1d
0x286c…288a }
0x288a…2893 b5ea 3550 CLOSE K1$
0x288a…2893 LineComalBin {
0x288a…2893 ptr = 0xb5ea // 0x288a @0x0
0x288a…2893 lno = 0x0dde // 0x288c @0x2
0x288a…2893 at0004 = ╱a8╱ CLOSE ╱ // 0x288e @0x4
0x288a…2893 at0005 = ╱4b╱K╱ // 0x288f @0x5
0x288a…2893 at0006 = ╱31╱1╱ // 0x2890 @0x6
0x288a…2893 at0007 = ╱ef╱$╱ // 0x2891 @0x7
0x288a…2893 at0008 = EOL // 0x2892 @0x8
0x288a…2893 }
0x2893…28b1 b608 3560 EXEC FEJL(9,24,K1$)
0x2893…28b1 LineComalBin {
0x2893…28b1 ptr = 0xb608 // 0x2893 @0x0
0x2893…28b1 lno = 0x0de8 // 0x2895 @0x2
0x2893…28b1 at0004 = ╱9d╱ EXEC ╱ // 0x2897 @0x4
0x2893…28b1 at0005 = ╱46╱F╱ // 0x2898 @0x5
0x2893…28b1 at0006 = ╱45╱E╱ // 0x2899 @0x6
0x2893…28b1 at0007 = ╱4a╱J╱ // 0x289a @0x7
0x2893…28b1 at0008 = ╱4c╱L╱ // 0x289b @0x8
0x2893…28b1 at0009 = ╱ed╱(╱ // 0x289c @0x9
0x2893…28b1 at000a = ╱39╱9╱ // 0x289d @0xa
0x2893…28b1 at000b = ╱fe00009004╱ // 0x289e @0xb
0x2893…28b1 at0010 = ╱ec╱,╱ // 0x28a3 @0x10
0x2893…28b1 at0011 = ╱32╱2╱ // 0x28a4 @0x11
0x2893…28b1 at0012 = ╱34╱4╱ // 0x28a5 @0x12
0x2893…28b1 at0013 = ╱fe0000c005╱ // 0x28a6 @0x13
0x2893…28b1 at0018 = ╱ec╱,╱ // 0x28ab @0x18
0x2893…28b1 at0019 = ╱4b╱K╱ // 0x28ac @0x19
0x2893…28b1 at001a = ╱31╱1╱ // 0x28ad @0x1a
0x2893…28b1 at001b = ╱ef╱$╱ // 0x28ae @0x1b
0x2893…28b1 at001c = ╱ee╱)╱ // 0x28af @0x1c
0x2893…28b1 at001d = EOL // 0x28b0 @0x1d
0x2893…28b1 }
0x28b1…28f8 b64f 3570 DIM FTAB1(MFANTAL DIV 4),DTAB1(MDANTAL DIV 4),KTAB1(MKANTAL DIV 4)
0x28b1…28f8 LineComalBin {
0x28b1…28f8 ptr = 0xb64f // 0x28b1 @0x0
0x28b1…28f8 lno = 0x0df2 // 0x28b3 @0x2
0x28b1…28f8 at0004 = ╱87╱ DIM ╱ // 0x28b5 @0x4
0x28b1…28f8 at0005 = ╱46╱F╱ // 0x28b6 @0x5
0x28b1…28f8 at0006 = ╱54╱T╱ // 0x28b7 @0x6
0x28b1…28f8 at0007 = ╱41╱A╱ // 0x28b8 @0x7
0x28b1…28f8 at0008 = ╱42╱B╱ // 0x28b9 @0x8
0x28b1…28f8 at0009 = ╱31╱1╱ // 0x28ba @0x9
0x28b1…28f8 at000a = ╱ed╱(╱ // 0x28bb @0xa
0x28b1…28f8 at000b = ╱4d╱M╱ // 0x28bc @0xb
0x28b1…28f8 at000c = ╱46╱F╱ // 0x28bd @0xc
0x28b1…28f8 at000d = ╱41╱A╱ // 0x28be @0xd
0x28b1…28f8 at000e = ╱4e╱N╱ // 0x28bf @0xe
0x28b1…28f8 at000f = ╱54╱T╱ // 0x28c0 @0xf
0x28b1…28f8 at0010 = ╱41╱A╱ // 0x28c1 @0x10
0x28b1…28f8 at0011 = ╱4c╱L╱ // 0x28c2 @0x11
0x28b1…28f8 at0012 = ╱e7╱ DIV ╱ // 0x28c3 @0x12
0x28b1…28f8 at0013 = ╱34╱4╱ // 0x28c4 @0x13
0x28b1…28f8 at0014 = ╱fe00008003╱ // 0x28c5 @0x14
0x28b1…28f8 at0019 = ╱ee╱)╱ // 0x28ca @0x19
0x28b1…28f8 at001a = ╱ec╱,╱ // 0x28cb @0x1a
0x28b1…28f8 at001b = ╱44╱D╱ // 0x28cc @0x1b
0x28b1…28f8 at001c = ╱54╱T╱ // 0x28cd @0x1c
0x28b1…28f8 at001d = ╱41╱A╱ // 0x28ce @0x1d
0x28b1…28f8 at001e = ╱42╱B╱ // 0x28cf @0x1e
0x28b1…28f8 at001f = ╱31╱1╱ // 0x28d0 @0x1f
0x28b1…28f8 at0020 = ╱ed╱(╱ // 0x28d1 @0x20
0x28b1…28f8 at0021 = ╱4d╱M╱ // 0x28d2 @0x21
0x28b1…28f8 at0022 = ╱44╱D╱ // 0x28d3 @0x22
0x28b1…28f8 at0023 = ╱41╱A╱ // 0x28d4 @0x23
0x28b1…28f8 at0024 = ╱4e╱N╱ // 0x28d5 @0x24
0x28b1…28f8 at0025 = ╱54╱T╱ // 0x28d6 @0x25
0x28b1…28f8 at0026 = ╱41╱A╱ // 0x28d7 @0x26
0x28b1…28f8 at0027 = ╱4c╱L╱ // 0x28d8 @0x27
0x28b1…28f8 at0028 = ╱e7╱ DIV ╱ // 0x28d9 @0x28
0x28b1…28f8 at0029 = ╱34╱4╱ // 0x28da @0x29
0x28b1…28f8 at002a = ╱fe00008003╱ // 0x28db @0x2a
0x28b1…28f8 at002f = ╱ee╱)╱ // 0x28e0 @0x2f
0x28b1…28f8 at0030 = ╱ec╱,╱ // 0x28e1 @0x30
0x28b1…28f8 at0031 = ╱4b╱K╱ // 0x28e2 @0x31
0x28b1…28f8 at0032 = ╱54╱T╱ // 0x28e3 @0x32
0x28b1…28f8 at0033 = ╱41╱A╱ // 0x28e4 @0x33
0x28b1…28f8 at0034 = ╱42╱B╱ // 0x28e5 @0x34
0x28b1…28f8 at0035 = ╱31╱1╱ // 0x28e6 @0x35
0x28b1…28f8 at0036 = ╱ed╱(╱ // 0x28e7 @0x36
0x28b1…28f8 at0037 = ╱4d╱M╱ // 0x28e8 @0x37
0x28b1…28f8 at0038 = ╱4b╱K╱ // 0x28e9 @0x38
0x28b1…28f8 at0039 = ╱41╱A╱ // 0x28ea @0x39
0x28b1…28f8 at003a = ╱4e╱N╱ // 0x28eb @0x3a
0x28b1…28f8 at003b = ╱54╱T╱ // 0x28ec @0x3b
0x28b1…28f8 at003c = ╱41╱A╱ // 0x28ed @0x3c
0x28b1…28f8 at003d = ╱4c╱L╱ // 0x28ee @0x3d
0x28b1…28f8 at003e = ╱e7╱ DIV ╱ // 0x28ef @0x3e
0x28b1…28f8 at003f = ╱34╱4╱ // 0x28f0 @0x3f
0x28b1…28f8 at0040 = ╱fe00008003╱ // 0x28f1 @0x40
0x28b1…28f8 at0045 = ╱ee╱)╱ // 0x28f6 @0x45
0x28b1…28f8 at0046 = EOL // 0x28f7 @0x46
0x28b1…28f8 }
0x28f8…2970 b6c7 3580 DIM FTAB(4,2),DTAB(4,2),KTAB(4,2),KGR$(MKGR*2,12),KREGR$(MKRGR*2,12)
0x28f8…2970 LineComalBin {
0x28f8…2970 ptr = 0xb6c7 // 0x28f8 @0x0
0x28f8…2970 lno = 0x0dfc // 0x28fa @0x2
0x28f8…2970 at0004 = ╱87╱ DIM ╱ // 0x28fc @0x4
0x28f8…2970 at0005 = ╱46╱F╱ // 0x28fd @0x5
0x28f8…2970 at0006 = ╱54╱T╱ // 0x28fe @0x6
0x28f8…2970 at0007 = ╱41╱A╱ // 0x28ff @0x7
0x28f8…2970 at0008 = ╱42╱B╱ // 0x2900 @0x8
0x28f8…2970 at0009 = ╱ed╱(╱ // 0x2901 @0x9
0x28f8…2970 at000a = ╱34╱4╱ // 0x2902 @0xa
0x28f8…2970 at000b = ╱fe00008003╱ // 0x2903 @0xb
0x28f8…2970 at0010 = ╱ec╱,╱ // 0x2908 @0x10
0x28f8…2970 at0011 = ╱32╱2╱ // 0x2909 @0x11
0x28f8…2970 at0012 = ╱fe00008002╱ // 0x290a @0x12
0x28f8…2970 at0017 = ╱ee╱)╱ // 0x290f @0x17
0x28f8…2970 at0018 = ╱ec╱,╱ // 0x2910 @0x18
0x28f8…2970 at0019 = ╱44╱D╱ // 0x2911 @0x19
0x28f8…2970 at001a = ╱54╱T╱ // 0x2912 @0x1a
0x28f8…2970 at001b = ╱41╱A╱ // 0x2913 @0x1b
0x28f8…2970 at001c = ╱42╱B╱ // 0x2914 @0x1c
0x28f8…2970 at001d = ╱ed╱(╱ // 0x2915 @0x1d
0x28f8…2970 at001e = ╱34╱4╱ // 0x2916 @0x1e
0x28f8…2970 at001f = ╱fe00008003╱ // 0x2917 @0x1f
0x28f8…2970 at0024 = ╱ec╱,╱ // 0x291c @0x24
0x28f8…2970 at0025 = ╱32╱2╱ // 0x291d @0x25
0x28f8…2970 at0026 = ╱fe00008002╱ // 0x291e @0x26
0x28f8…2970 at002b = ╱ee╱)╱ // 0x2923 @0x2b
0x28f8…2970 at002c = ╱ec╱,╱ // 0x2924 @0x2c
0x28f8…2970 at002d = ╱4b╱K╱ // 0x2925 @0x2d
0x28f8…2970 at002e = ╱54╱T╱ // 0x2926 @0x2e
0x28f8…2970 at002f = ╱41╱A╱ // 0x2927 @0x2f
0x28f8…2970 at0030 = ╱42╱B╱ // 0x2928 @0x30
0x28f8…2970 at0031 = ╱ed╱(╱ // 0x2929 @0x31
0x28f8…2970 at0032 = ╱34╱4╱ // 0x292a @0x32
0x28f8…2970 at0033 = ╱fe00008003╱ // 0x292b @0x33
0x28f8…2970 at0038 = ╱ec╱,╱ // 0x2930 @0x38
0x28f8…2970 at0039 = ╱32╱2╱ // 0x2931 @0x39
0x28f8…2970 at003a = ╱fe00008002╱ // 0x2932 @0x3a
0x28f8…2970 at003f = ╱ee╱)╱ // 0x2937 @0x3f
0x28f8…2970 at0040 = ╱ec╱,╱ // 0x2938 @0x40
0x28f8…2970 at0041 = ╱4b╱K╱ // 0x2939 @0x41
0x28f8…2970 at0042 = ╱47╱G╱ // 0x293a @0x42
0x28f8…2970 at0043 = ╱52╱R╱ // 0x293b @0x43
0x28f8…2970 at0044 = ╱ef╱$╱ // 0x293c @0x44
0x28f8…2970 at0045 = ╱ed╱(╱ // 0x293d @0x45
0x28f8…2970 at0046 = ╱4d╱M╱ // 0x293e @0x46
0x28f8…2970 at0047 = ╱4b╱K╱ // 0x293f @0x47
0x28f8…2970 at0048 = ╱47╱G╱ // 0x2940 @0x48
0x28f8…2970 at0049 = ╱52╱R╱ // 0x2941 @0x49
0x28f8…2970 at004a = ╱e4╱*╱ // 0x2942 @0x4a
0x28f8…2970 at004b = ╱32╱2╱ // 0x2943 @0x4b
0x28f8…2970 at004c = ╱fe00008002╱ // 0x2944 @0x4c
0x28f8…2970 at0051 = ╱ec╱,╱ // 0x2949 @0x51
0x28f8…2970 at0052 = ╱31╱1╱ // 0x294a @0x52
0x28f8…2970 at0053 = ╱32╱2╱ // 0x294b @0x53
0x28f8…2970 at0054 = ╱fe0000c004╱ // 0x294c @0x54
0x28f8…2970 at0059 = ╱ee╱)╱ // 0x2951 @0x59
0x28f8…2970 at005a = ╱ec╱,╱ // 0x2952 @0x5a
0x28f8…2970 at005b = ╱4b╱K╱ // 0x2953 @0x5b
0x28f8…2970 at005c = ╱52╱R╱ // 0x2954 @0x5c
0x28f8…2970 at005d = ╱45╱E╱ // 0x2955 @0x5d
0x28f8…2970 at005e = ╱47╱G╱ // 0x2956 @0x5e
0x28f8…2970 at005f = ╱52╱R╱ // 0x2957 @0x5f
0x28f8…2970 at0060 = ╱ef╱$╱ // 0x2958 @0x60
0x28f8…2970 at0061 = ╱ed╱(╱ // 0x2959 @0x61
0x28f8…2970 at0062 = ╱4d╱M╱ // 0x295a @0x62
0x28f8…2970 at0063 = ╱4b╱K╱ // 0x295b @0x63
0x28f8…2970 at0064 = ╱52╱R╱ // 0x295c @0x64
0x28f8…2970 at0065 = ╱47╱G╱ // 0x295d @0x65
0x28f8…2970 at0066 = ╱52╱R╱ // 0x295e @0x66
0x28f8…2970 at0067 = ╱e4╱*╱ // 0x295f @0x67
0x28f8…2970 at0068 = ╱32╱2╱ // 0x2960 @0x68
0x28f8…2970 at0069 = ╱fe00008002╱ // 0x2961 @0x69
0x28f8…2970 at006e = ╱ec╱,╱ // 0x2966 @0x6e
0x28f8…2970 at006f = ╱31╱1╱ // 0x2967 @0x6f
0x28f8…2970 at0070 = ╱32╱2╱ // 0x2968 @0x70
0x28f8…2970 at0071 = ╱fe0000c004╱ // 0x2969 @0x71
0x28f8…2970 at0076 = ╱ee╱)╱ // 0x296e @0x76
0x28f8…2970 at0077 = EOL // 0x296f @0x77
0x28f8…2970 }
0x2970…29b2 b709 3590 DIM ETAB1(MEANTAL DIV 4),ETAB(4,2),ENR(MUNKANT+METOT)
0x2970…29b2 LineComalBin {
0x2970…29b2 ptr = 0xb709 // 0x2970 @0x0
0x2970…29b2 lno = 0x0e06 // 0x2972 @0x2
0x2970…29b2 at0004 = ╱87╱ DIM ╱ // 0x2974 @0x4
0x2970…29b2 at0005 = ╱45╱E╱ // 0x2975 @0x5
0x2970…29b2 at0006 = ╱54╱T╱ // 0x2976 @0x6
0x2970…29b2 at0007 = ╱41╱A╱ // 0x2977 @0x7
0x2970…29b2 at0008 = ╱42╱B╱ // 0x2978 @0x8
0x2970…29b2 at0009 = ╱31╱1╱ // 0x2979 @0x9
0x2970…29b2 at000a = ╱ed╱(╱ // 0x297a @0xa
0x2970…29b2 at000b = ╱4d╱M╱ // 0x297b @0xb
0x2970…29b2 at000c = ╱45╱E╱ // 0x297c @0xc
0x2970…29b2 at000d = ╱41╱A╱ // 0x297d @0xd
0x2970…29b2 at000e = ╱4e╱N╱ // 0x297e @0xe
0x2970…29b2 at000f = ╱54╱T╱ // 0x297f @0xf
0x2970…29b2 at0010 = ╱41╱A╱ // 0x2980 @0x10
0x2970…29b2 at0011 = ╱4c╱L╱ // 0x2981 @0x11
0x2970…29b2 at0012 = ╱e7╱ DIV ╱ // 0x2982 @0x12
0x2970…29b2 at0013 = ╱34╱4╱ // 0x2983 @0x13
0x2970…29b2 at0014 = ╱fe00008003╱ // 0x2984 @0x14
0x2970…29b2 at0019 = ╱ee╱)╱ // 0x2989 @0x19
0x2970…29b2 at001a = ╱ec╱,╱ // 0x298a @0x1a
0x2970…29b2 at001b = ╱45╱E╱ // 0x298b @0x1b
0x2970…29b2 at001c = ╱54╱T╱ // 0x298c @0x1c
0x2970…29b2 at001d = ╱41╱A╱ // 0x298d @0x1d
0x2970…29b2 at001e = ╱42╱B╱ // 0x298e @0x1e
0x2970…29b2 at001f = ╱ed╱(╱ // 0x298f @0x1f
0x2970…29b2 at0020 = ╱34╱4╱ // 0x2990 @0x20
0x2970…29b2 at0021 = ╱fe00008003╱ // 0x2991 @0x21
0x2970…29b2 at0026 = ╱ec╱,╱ // 0x2996 @0x26
0x2970…29b2 at0027 = ╱32╱2╱ // 0x2997 @0x27
0x2970…29b2 at0028 = ╱fe00008002╱ // 0x2998 @0x28
0x2970…29b2 at002d = ╱ee╱)╱ // 0x299d @0x2d
0x2970…29b2 at002e = ╱ec╱,╱ // 0x299e @0x2e
0x2970…29b2 at002f = ╱45╱E╱ // 0x299f @0x2f
0x2970…29b2 at0030 = ╱4e╱N╱ // 0x29a0 @0x30
0x2970…29b2 at0031 = ╱52╱R╱ // 0x29a1 @0x31
0x2970…29b2 at0032 = ╱ed╱(╱ // 0x29a2 @0x32
0x2970…29b2 at0033 = ╱4d╱M╱ // 0x29a3 @0x33
0x2970…29b2 at0034 = ╱55╱U╱ // 0x29a4 @0x34
0x2970…29b2 at0035 = ╱4e╱N╱ // 0x29a5 @0x35
0x2970…29b2 at0036 = ╱4b╱K╱ // 0x29a6 @0x36
0x2970…29b2 at0037 = ╱41╱A╱ // 0x29a7 @0x37
0x2970…29b2 at0038 = ╱4e╱N╱ // 0x29a8 @0x38
0x2970…29b2 at0039 = ╱54╱T╱ // 0x29a9 @0x39
0x2970…29b2 at003a = ╱e2╱+╱ // 0x29aa @0x3a
0x2970…29b2 at003b = ╱4d╱M╱ // 0x29ab @0x3b
0x2970…29b2 at003c = ╱45╱E╱ // 0x29ac @0x3c
0x2970…29b2 at003d = ╱54╱T╱ // 0x29ad @0x3d
0x2970…29b2 at003e = ╱4f╱O╱ // 0x29ae @0x3e
0x2970…29b2 at003f = ╱54╱T╱ // 0x29af @0x3f
0x2970…29b2 at0040 = ╱ee╱)╱ // 0x29b0 @0x40
0x2970…29b2 at0041 = EOL // 0x29b1 @0x41
0x2970…29b2 }
0x29b2…29ca b721 3600 DIM EU$(MUNKANT+METOT)
0x29b2…29ca LineComalBin {
0x29b2…29ca ptr = 0xb721 // 0x29b2 @0x0
0x29b2…29ca lno = 0x0e10 // 0x29b4 @0x2
0x29b2…29ca at0004 = ╱87╱ DIM ╱ // 0x29b6 @0x4
0x29b2…29ca at0005 = ╱45╱E╱ // 0x29b7 @0x5
0x29b2…29ca at0006 = ╱55╱U╱ // 0x29b8 @0x6
0x29b2…29ca at0007 = ╱ef╱$╱ // 0x29b9 @0x7
0x29b2…29ca at0008 = ╱ed╱(╱ // 0x29ba @0x8
0x29b2…29ca at0009 = ╱4d╱M╱ // 0x29bb @0x9
0x29b2…29ca at000a = ╱55╱U╱ // 0x29bc @0xa
0x29b2…29ca at000b = ╱4e╱N╱ // 0x29bd @0xb
0x29b2…29ca at000c = ╱4b╱K╱ // 0x29be @0xc
0x29b2…29ca at000d = ╱41╱A╱ // 0x29bf @0xd
0x29b2…29ca at000e = ╱4e╱N╱ // 0x29c0 @0xe
0x29b2…29ca at000f = ╱54╱T╱ // 0x29c1 @0xf
0x29b2…29ca at0010 = ╱e2╱+╱ // 0x29c2 @0x10
0x29b2…29ca at0011 = ╱4d╱M╱ // 0x29c3 @0x11
0x29b2…29ca at0012 = ╱45╱E╱ // 0x29c4 @0x12
0x29b2…29ca at0013 = ╱54╱T╱ // 0x29c5 @0x13
0x29b2…29ca at0014 = ╱4f╱O╱ // 0x29c6 @0x14
0x29b2…29ca at0015 = ╱54╱T╱ // 0x29c7 @0x15
0x29b2…29ca at0016 = ╱ee╱)╱ // 0x29c8 @0x16
0x29b2…29ca at0017 = EOL // 0x29c9 @0x17
0x29b2…29ca }
0x29ca…29e4 b73b 3610 FOR I=1 TO MKGR*2
0x29ca…29e4 LineComalBin {
0x29ca…29e4 ptr = 0xb73b // 0x29ca @0x0
0x29ca…29e4 lno = 0x0e1a // 0x29cc @0x2
0x29ca…29e4 at0004 = ╱83╱ FOR ╱ // 0x29ce @0x4
0x29ca…29e4 at0005 = ╱49╱I╱ // 0x29cf @0x5
0x29ca…29e4 at0006 = ╱dc╱=╱ // 0x29d0 @0x6
0x29ca…29e4 at0007 = ╱31╱1╱ // 0x29d1 @0x7
0x29ca…29e4 at0008 = ╱fe00008001╱ // 0x29d2 @0x8
0x29ca…29e4 at000d = ╱b7╱ TO ╱ // 0x29d7 @0xd
0x29ca…29e4 at000e = ╱4d╱M╱ // 0x29d8 @0xe
0x29ca…29e4 at000f = ╱4b╱K╱ // 0x29d9 @0xf
0x29ca…29e4 at0010 = ╱47╱G╱ // 0x29da @0x10
0x29ca…29e4 at0011 = ╱52╱R╱ // 0x29db @0x11
0x29ca…29e4 at0012 = ╱e4╱*╱ // 0x29dc @0x12
0x29ca…29e4 at0013 = ╱32╱2╱ // 0x29dd @0x13
0x29ca…29e4 at0014 = ╱fe00008002╱ // 0x29de @0x14
0x29ca…29e4 at0019 = EOL // 0x29e3 @0x19
0x29ca…29e4 }
0x29e4…29f5 b74c 3620 KGR$(I)="0+"
0x29e4…29f5 LineComalBin {
0x29e4…29f5 ptr = 0xb74c // 0x29e4 @0x0
0x29e4…29f5 lno = 0x0e24 // 0x29e6 @0x2
0x29e4…29f5 at0004 = ╱4b╱K╱ // 0x29e8 @0x4
0x29e4…29f5 at0005 = ╱47╱G╱ // 0x29e9 @0x5
0x29e4…29f5 at0006 = ╱52╱R╱ // 0x29ea @0x6
0x29e4…29f5 at0007 = ╱ef╱$╱ // 0x29eb @0x7
0x29e4…29f5 at0008 = ╱ed╱(╱ // 0x29ec @0x8
0x29e4…29f5 at0009 = ╱49╱I╱ // 0x29ed @0x9
0x29e4…29f5 at000a = ╱ee╱)╱ // 0x29ee @0xa
0x29e4…29f5 at000b = ╱dc╱=╱ // 0x29ef @0xb
0x29e4…29f5 at000c = ╱22╱"╱ // 0x29f0 @0xc
0x29e4…29f5 at000d = ╱30╱0╱ // 0x29f1 @0xd
0x29e4…29f5 at000e = ╱2b╱+╱ // 0x29f2 @0xe
0x29e4…29f5 at000f = ╱22╱"╱ // 0x29f3 @0xf
0x29e4…29f5 at0010 = EOL // 0x29f4 @0x10
0x29e4…29f5 }
0x29f5…29fc b753 3630 NEXT I
0x29f5…29fc LineComalBin {
0x29f5…29fc ptr = 0xb753 // 0x29f5 @0x0
0x29f5…29fc lno = 0x0e2e // 0x29f7 @0x2
0x29f5…29fc at0004 = ╱84╱ NEXT ╱ // 0x29f9 @0x4
0x29f5…29fc at0005 = ╱49╱I╱ // 0x29fa @0x5
0x29f5…29fc at0006 = EOL // 0x29fb @0x6
0x29f5…29fc }
0x29fc…2a17 b76e 3640 FOR I=1 TO MKRGR*2
0x29fc…2a17 LineComalBin {
0x29fc…2a17 ptr = 0xb76e // 0x29fc @0x0
0x29fc…2a17 lno = 0x0e38 // 0x29fe @0x2
0x29fc…2a17 at0004 = ╱83╱ FOR ╱ // 0x2a00 @0x4
0x29fc…2a17 at0005 = ╱49╱I╱ // 0x2a01 @0x5
0x29fc…2a17 at0006 = ╱dc╱=╱ // 0x2a02 @0x6
0x29fc…2a17 at0007 = ╱31╱1╱ // 0x2a03 @0x7
0x29fc…2a17 at0008 = ╱fe00008001╱ // 0x2a04 @0x8
0x29fc…2a17 at000d = ╱b7╱ TO ╱ // 0x2a09 @0xd
0x29fc…2a17 at000e = ╱4d╱M╱ // 0x2a0a @0xe
0x29fc…2a17 at000f = ╱4b╱K╱ // 0x2a0b @0xf
0x29fc…2a17 at0010 = ╱52╱R╱ // 0x2a0c @0x10
0x29fc…2a17 at0011 = ╱47╱G╱ // 0x2a0d @0x11
0x29fc…2a17 at0012 = ╱52╱R╱ // 0x2a0e @0x12
0x29fc…2a17 at0013 = ╱e4╱*╱ // 0x2a0f @0x13
0x29fc…2a17 at0014 = ╱32╱2╱ // 0x2a10 @0x14
0x29fc…2a17 at0015 = ╱fe00008002╱ // 0x2a11 @0x15
0x29fc…2a17 at001a = EOL // 0x2a16 @0x1a
0x29fc…2a17 }
0x2a17…2a2a b781 3650 KREGR$(I)="0+"
0x2a17…2a2a LineComalBin {
0x2a17…2a2a ptr = 0xb781 // 0x2a17 @0x0
0x2a17…2a2a lno = 0x0e42 // 0x2a19 @0x2
0x2a17…2a2a at0004 = ╱4b╱K╱ // 0x2a1b @0x4
0x2a17…2a2a at0005 = ╱52╱R╱ // 0x2a1c @0x5
0x2a17…2a2a at0006 = ╱45╱E╱ // 0x2a1d @0x6
0x2a17…2a2a at0007 = ╱47╱G╱ // 0x2a1e @0x7
0x2a17…2a2a at0008 = ╱52╱R╱ // 0x2a1f @0x8
0x2a17…2a2a at0009 = ╱ef╱$╱ // 0x2a20 @0x9
0x2a17…2a2a at000a = ╱ed╱(╱ // 0x2a21 @0xa
0x2a17…2a2a at000b = ╱49╱I╱ // 0x2a22 @0xb
0x2a17…2a2a at000c = ╱ee╱)╱ // 0x2a23 @0xc
0x2a17…2a2a at000d = ╱dc╱=╱ // 0x2a24 @0xd
0x2a17…2a2a at000e = ╱22╱"╱ // 0x2a25 @0xe
0x2a17…2a2a at000f = ╱30╱0╱ // 0x2a26 @0xf
0x2a17…2a2a at0010 = ╱2b╱+╱ // 0x2a27 @0x10
0x2a17…2a2a at0011 = ╱22╱"╱ // 0x2a28 @0x11
0x2a17…2a2a at0012 = EOL // 0x2a29 @0x12
0x2a17…2a2a }
0x2a2a…2a31 b788 3660 NEXT I
0x2a2a…2a31 LineComalBin {
0x2a2a…2a31 ptr = 0xb788 // 0x2a2a @0x0
0x2a2a…2a31 lno = 0x0e4c // 0x2a2c @0x2
0x2a2a…2a31 at0004 = ╱84╱ NEXT ╱ // 0x2a2e @0x4
0x2a2a…2a31 at0005 = ╱49╱I╱ // 0x2a2f @0x5
0x2a2a…2a31 at0006 = EOL // 0x2a30 @0x6
0x2a2a…2a31 }
0x2a31…2a79 b7d0 3670 K2$=N$+K2$;K3$=N$+K3$;K4$=N$+K4$;K5$=N$+K5$;K6$=N$+K6$;K13$=N$+K13$
0x2a31…2a79 LineComalBin {
0x2a31…2a79 ptr = 0xb7d0 // 0x2a31 @0x0
0x2a31…2a79 lno = 0x0e56 // 0x2a33 @0x2
0x2a31…2a79 at0004 = ╱4b╱K╱ // 0x2a35 @0x4
0x2a31…2a79 at0005 = ╱32╱2╱ // 0x2a36 @0x5
0x2a31…2a79 at0006 = ╱ef╱$╱ // 0x2a37 @0x6
0x2a31…2a79 at0007 = ╱dc╱=╱ // 0x2a38 @0x7
0x2a31…2a79 at0008 = ╱4e╱N╱ // 0x2a39 @0x8
0x2a31…2a79 at0009 = ╱ef╱$╱ // 0x2a3a @0x9
0x2a31…2a79 at000a = ╱f1╱+╱ // 0x2a3b @0xa
0x2a31…2a79 at000b = ╱4b╱K╱ // 0x2a3c @0xb
0x2a31…2a79 at000c = ╱32╱2╱ // 0x2a3d @0xc
0x2a31…2a79 at000d = ╱ef╱$╱ // 0x2a3e @0xd
0x2a31…2a79 at000e = ╱eb╱;╱ // 0x2a3f @0xe
0x2a31…2a79 at000f = ╱4b╱K╱ // 0x2a40 @0xf
0x2a31…2a79 at0010 = ╱33╱3╱ // 0x2a41 @0x10
0x2a31…2a79 at0011 = ╱ef╱$╱ // 0x2a42 @0x11
0x2a31…2a79 at0012 = ╱dc╱=╱ // 0x2a43 @0x12
0x2a31…2a79 at0013 = ╱4e╱N╱ // 0x2a44 @0x13
0x2a31…2a79 at0014 = ╱ef╱$╱ // 0x2a45 @0x14
0x2a31…2a79 at0015 = ╱f1╱+╱ // 0x2a46 @0x15
0x2a31…2a79 at0016 = ╱4b╱K╱ // 0x2a47 @0x16
0x2a31…2a79 at0017 = ╱33╱3╱ // 0x2a48 @0x17
0x2a31…2a79 at0018 = ╱ef╱$╱ // 0x2a49 @0x18
0x2a31…2a79 at0019 = ╱eb╱;╱ // 0x2a4a @0x19
0x2a31…2a79 at001a = ╱4b╱K╱ // 0x2a4b @0x1a
0x2a31…2a79 at001b = ╱34╱4╱ // 0x2a4c @0x1b
0x2a31…2a79 at001c = ╱ef╱$╱ // 0x2a4d @0x1c
0x2a31…2a79 at001d = ╱dc╱=╱ // 0x2a4e @0x1d
0x2a31…2a79 at001e = ╱4e╱N╱ // 0x2a4f @0x1e
0x2a31…2a79 at001f = ╱ef╱$╱ // 0x2a50 @0x1f
0x2a31…2a79 at0020 = ╱f1╱+╱ // 0x2a51 @0x20
0x2a31…2a79 at0021 = ╱4b╱K╱ // 0x2a52 @0x21
0x2a31…2a79 at0022 = ╱34╱4╱ // 0x2a53 @0x22
0x2a31…2a79 at0023 = ╱ef╱$╱ // 0x2a54 @0x23
0x2a31…2a79 at0024 = ╱eb╱;╱ // 0x2a55 @0x24
0x2a31…2a79 at0025 = ╱4b╱K╱ // 0x2a56 @0x25
0x2a31…2a79 at0026 = ╱35╱5╱ // 0x2a57 @0x26
0x2a31…2a79 at0027 = ╱ef╱$╱ // 0x2a58 @0x27
0x2a31…2a79 at0028 = ╱dc╱=╱ // 0x2a59 @0x28
0x2a31…2a79 at0029 = ╱4e╱N╱ // 0x2a5a @0x29
0x2a31…2a79 at002a = ╱ef╱$╱ // 0x2a5b @0x2a
0x2a31…2a79 at002b = ╱f1╱+╱ // 0x2a5c @0x2b
0x2a31…2a79 at002c = ╱4b╱K╱ // 0x2a5d @0x2c
0x2a31…2a79 at002d = ╱35╱5╱ // 0x2a5e @0x2d
0x2a31…2a79 at002e = ╱ef╱$╱ // 0x2a5f @0x2e
0x2a31…2a79 at002f = ╱eb╱;╱ // 0x2a60 @0x2f
0x2a31…2a79 at0030 = ╱4b╱K╱ // 0x2a61 @0x30
0x2a31…2a79 at0031 = ╱36╱6╱ // 0x2a62 @0x31
0x2a31…2a79 at0032 = ╱ef╱$╱ // 0x2a63 @0x32
0x2a31…2a79 at0033 = ╱dc╱=╱ // 0x2a64 @0x33
0x2a31…2a79 at0034 = ╱4e╱N╱ // 0x2a65 @0x34
0x2a31…2a79 at0035 = ╱ef╱$╱ // 0x2a66 @0x35
0x2a31…2a79 at0036 = ╱f1╱+╱ // 0x2a67 @0x36
0x2a31…2a79 at0037 = ╱4b╱K╱ // 0x2a68 @0x37
0x2a31…2a79 at0038 = ╱36╱6╱ // 0x2a69 @0x38
0x2a31…2a79 at0039 = ╱ef╱$╱ // 0x2a6a @0x39
0x2a31…2a79 at003a = ╱eb╱;╱ // 0x2a6b @0x3a
0x2a31…2a79 at003b = ╱4b╱K╱ // 0x2a6c @0x3b
0x2a31…2a79 at003c = ╱31╱1╱ // 0x2a6d @0x3c
0x2a31…2a79 at003d = ╱33╱3╱ // 0x2a6e @0x3d
0x2a31…2a79 at003e = ╱ef╱$╱ // 0x2a6f @0x3e
0x2a31…2a79 at003f = ╱dc╱=╱ // 0x2a70 @0x3f
0x2a31…2a79 at0040 = ╱4e╱N╱ // 0x2a71 @0x40
0x2a31…2a79 at0041 = ╱ef╱$╱ // 0x2a72 @0x41
0x2a31…2a79 at0042 = ╱f1╱+╱ // 0x2a73 @0x42
0x2a31…2a79 at0043 = ╱4b╱K╱ // 0x2a74 @0x43
0x2a31…2a79 at0044 = ╱31╱1╱ // 0x2a75 @0x44
0x2a31…2a79 at0045 = ╱33╱3╱ // 0x2a76 @0x45
0x2a31…2a79 at0046 = ╱ef╱$╱ // 0x2a77 @0x46
0x2a31…2a79 at0047 = EOL // 0x2a78 @0x47
0x2a31…2a79 }
0x2a79…2ac5 b81c 3680 K8$=N$+K8$;K9$=N$+K9$;K10$=N$+K10$;K11$=N$+K11$;K12$=N$+K12$;K7$=N$+K7$
0x2a79…2ac5 LineComalBin {
0x2a79…2ac5 ptr = 0xb81c // 0x2a79 @0x0
0x2a79…2ac5 lno = 0x0e60 // 0x2a7b @0x2
0x2a79…2ac5 at0004 = ╱4b╱K╱ // 0x2a7d @0x4
0x2a79…2ac5 at0005 = ╱38╱8╱ // 0x2a7e @0x5
0x2a79…2ac5 at0006 = ╱ef╱$╱ // 0x2a7f @0x6
0x2a79…2ac5 at0007 = ╱dc╱=╱ // 0x2a80 @0x7
0x2a79…2ac5 at0008 = ╱4e╱N╱ // 0x2a81 @0x8
0x2a79…2ac5 at0009 = ╱ef╱$╱ // 0x2a82 @0x9
0x2a79…2ac5 at000a = ╱f1╱+╱ // 0x2a83 @0xa
0x2a79…2ac5 at000b = ╱4b╱K╱ // 0x2a84 @0xb
0x2a79…2ac5 at000c = ╱38╱8╱ // 0x2a85 @0xc
0x2a79…2ac5 at000d = ╱ef╱$╱ // 0x2a86 @0xd
0x2a79…2ac5 at000e = ╱eb╱;╱ // 0x2a87 @0xe
0x2a79…2ac5 at000f = ╱4b╱K╱ // 0x2a88 @0xf
0x2a79…2ac5 at0010 = ╱39╱9╱ // 0x2a89 @0x10
0x2a79…2ac5 at0011 = ╱ef╱$╱ // 0x2a8a @0x11
0x2a79…2ac5 at0012 = ╱dc╱=╱ // 0x2a8b @0x12
0x2a79…2ac5 at0013 = ╱4e╱N╱ // 0x2a8c @0x13
0x2a79…2ac5 at0014 = ╱ef╱$╱ // 0x2a8d @0x14
0x2a79…2ac5 at0015 = ╱f1╱+╱ // 0x2a8e @0x15
0x2a79…2ac5 at0016 = ╱4b╱K╱ // 0x2a8f @0x16
0x2a79…2ac5 at0017 = ╱39╱9╱ // 0x2a90 @0x17
0x2a79…2ac5 at0018 = ╱ef╱$╱ // 0x2a91 @0x18
0x2a79…2ac5 at0019 = ╱eb╱;╱ // 0x2a92 @0x19
0x2a79…2ac5 at001a = ╱4b╱K╱ // 0x2a93 @0x1a
0x2a79…2ac5 at001b = ╱31╱1╱ // 0x2a94 @0x1b
0x2a79…2ac5 at001c = ╱30╱0╱ // 0x2a95 @0x1c
0x2a79…2ac5 at001d = ╱ef╱$╱ // 0x2a96 @0x1d
0x2a79…2ac5 at001e = ╱dc╱=╱ // 0x2a97 @0x1e
0x2a79…2ac5 at001f = ╱4e╱N╱ // 0x2a98 @0x1f
0x2a79…2ac5 at0020 = ╱ef╱$╱ // 0x2a99 @0x20
0x2a79…2ac5 at0021 = ╱f1╱+╱ // 0x2a9a @0x21
0x2a79…2ac5 at0022 = ╱4b╱K╱ // 0x2a9b @0x22
0x2a79…2ac5 at0023 = ╱31╱1╱ // 0x2a9c @0x23
0x2a79…2ac5 at0024 = ╱30╱0╱ // 0x2a9d @0x24
0x2a79…2ac5 at0025 = ╱ef╱$╱ // 0x2a9e @0x25
0x2a79…2ac5 at0026 = ╱eb╱;╱ // 0x2a9f @0x26
0x2a79…2ac5 at0027 = ╱4b╱K╱ // 0x2aa0 @0x27
0x2a79…2ac5 at0028 = ╱31╱1╱ // 0x2aa1 @0x28
0x2a79…2ac5 at0029 = ╱31╱1╱ // 0x2aa2 @0x29
0x2a79…2ac5 at002a = ╱ef╱$╱ // 0x2aa3 @0x2a
0x2a79…2ac5 at002b = ╱dc╱=╱ // 0x2aa4 @0x2b
0x2a79…2ac5 at002c = ╱4e╱N╱ // 0x2aa5 @0x2c
0x2a79…2ac5 at002d = ╱ef╱$╱ // 0x2aa6 @0x2d
0x2a79…2ac5 at002e = ╱f1╱+╱ // 0x2aa7 @0x2e
0x2a79…2ac5 at002f = ╱4b╱K╱ // 0x2aa8 @0x2f
0x2a79…2ac5 at0030 = ╱31╱1╱ // 0x2aa9 @0x30
0x2a79…2ac5 at0031 = ╱31╱1╱ // 0x2aaa @0x31
0x2a79…2ac5 at0032 = ╱ef╱$╱ // 0x2aab @0x32
0x2a79…2ac5 at0033 = ╱eb╱;╱ // 0x2aac @0x33
0x2a79…2ac5 at0034 = ╱4b╱K╱ // 0x2aad @0x34
0x2a79…2ac5 at0035 = ╱31╱1╱ // 0x2aae @0x35
0x2a79…2ac5 at0036 = ╱32╱2╱ // 0x2aaf @0x36
0x2a79…2ac5 at0037 = ╱ef╱$╱ // 0x2ab0 @0x37
0x2a79…2ac5 at0038 = ╱dc╱=╱ // 0x2ab1 @0x38
0x2a79…2ac5 at0039 = ╱4e╱N╱ // 0x2ab2 @0x39
0x2a79…2ac5 at003a = ╱ef╱$╱ // 0x2ab3 @0x3a
0x2a79…2ac5 at003b = ╱f1╱+╱ // 0x2ab4 @0x3b
0x2a79…2ac5 at003c = ╱4b╱K╱ // 0x2ab5 @0x3c
0x2a79…2ac5 at003d = ╱31╱1╱ // 0x2ab6 @0x3d
0x2a79…2ac5 at003e = ╱32╱2╱ // 0x2ab7 @0x3e
0x2a79…2ac5 at003f = ╱ef╱$╱ // 0x2ab8 @0x3f
0x2a79…2ac5 at0040 = ╱eb╱;╱ // 0x2ab9 @0x40
0x2a79…2ac5 at0041 = ╱4b╱K╱ // 0x2aba @0x41
0x2a79…2ac5 at0042 = ╱37╱7╱ // 0x2abb @0x42
0x2a79…2ac5 at0043 = ╱ef╱$╱ // 0x2abc @0x43
0x2a79…2ac5 at0044 = ╱dc╱=╱ // 0x2abd @0x44
0x2a79…2ac5 at0045 = ╱4e╱N╱ // 0x2abe @0x45
0x2a79…2ac5 at0046 = ╱ef╱$╱ // 0x2abf @0x46
0x2a79…2ac5 at0047 = ╱f1╱+╱ // 0x2ac0 @0x47
0x2a79…2ac5 at0048 = ╱4b╱K╱ // 0x2ac1 @0x48
0x2a79…2ac5 at0049 = ╱37╱7╱ // 0x2ac2 @0x49
0x2a79…2ac5 at004a = ╱ef╱$╱ // 0x2ac3 @0x4a
0x2a79…2ac5 at004b = EOL // 0x2ac4 @0x4b
0x2a79…2ac5 }
0x2ac5…2afd b854 3690 K14$=N$+K14$;K15$=N$+K15$;K16$=N$+K16$;K17$=N$+K17$
0x2ac5…2afd LineComalBin {
0x2ac5…2afd ptr = 0xb854 // 0x2ac5 @0x0
0x2ac5…2afd lno = 0x0e6a // 0x2ac7 @0x2
0x2ac5…2afd at0004 = ╱4b╱K╱ // 0x2ac9 @0x4
0x2ac5…2afd at0005 = ╱31╱1╱ // 0x2aca @0x5
0x2ac5…2afd at0006 = ╱34╱4╱ // 0x2acb @0x6
0x2ac5…2afd at0007 = ╱ef╱$╱ // 0x2acc @0x7
0x2ac5…2afd at0008 = ╱dc╱=╱ // 0x2acd @0x8
0x2ac5…2afd at0009 = ╱4e╱N╱ // 0x2ace @0x9
0x2ac5…2afd at000a = ╱ef╱$╱ // 0x2acf @0xa
0x2ac5…2afd at000b = ╱f1╱+╱ // 0x2ad0 @0xb
0x2ac5…2afd at000c = ╱4b╱K╱ // 0x2ad1 @0xc
0x2ac5…2afd at000d = ╱31╱1╱ // 0x2ad2 @0xd
0x2ac5…2afd at000e = ╱34╱4╱ // 0x2ad3 @0xe
0x2ac5…2afd at000f = ╱ef╱$╱ // 0x2ad4 @0xf
0x2ac5…2afd at0010 = ╱eb╱;╱ // 0x2ad5 @0x10
0x2ac5…2afd at0011 = ╱4b╱K╱ // 0x2ad6 @0x11
0x2ac5…2afd at0012 = ╱31╱1╱ // 0x2ad7 @0x12
0x2ac5…2afd at0013 = ╱35╱5╱ // 0x2ad8 @0x13
0x2ac5…2afd at0014 = ╱ef╱$╱ // 0x2ad9 @0x14
0x2ac5…2afd at0015 = ╱dc╱=╱ // 0x2ada @0x15
0x2ac5…2afd at0016 = ╱4e╱N╱ // 0x2adb @0x16
0x2ac5…2afd at0017 = ╱ef╱$╱ // 0x2adc @0x17
0x2ac5…2afd at0018 = ╱f1╱+╱ // 0x2add @0x18
0x2ac5…2afd at0019 = ╱4b╱K╱ // 0x2ade @0x19
0x2ac5…2afd at001a = ╱31╱1╱ // 0x2adf @0x1a
0x2ac5…2afd at001b = ╱35╱5╱ // 0x2ae0 @0x1b
0x2ac5…2afd at001c = ╱ef╱$╱ // 0x2ae1 @0x1c
0x2ac5…2afd at001d = ╱eb╱;╱ // 0x2ae2 @0x1d
0x2ac5…2afd at001e = ╱4b╱K╱ // 0x2ae3 @0x1e
0x2ac5…2afd at001f = ╱31╱1╱ // 0x2ae4 @0x1f
0x2ac5…2afd at0020 = ╱36╱6╱ // 0x2ae5 @0x20
0x2ac5…2afd at0021 = ╱ef╱$╱ // 0x2ae6 @0x21
0x2ac5…2afd at0022 = ╱dc╱=╱ // 0x2ae7 @0x22
0x2ac5…2afd at0023 = ╱4e╱N╱ // 0x2ae8 @0x23
0x2ac5…2afd at0024 = ╱ef╱$╱ // 0x2ae9 @0x24
0x2ac5…2afd at0025 = ╱f1╱+╱ // 0x2aea @0x25
0x2ac5…2afd at0026 = ╱4b╱K╱ // 0x2aeb @0x26
0x2ac5…2afd at0027 = ╱31╱1╱ // 0x2aec @0x27
0x2ac5…2afd at0028 = ╱36╱6╱ // 0x2aed @0x28
0x2ac5…2afd at0029 = ╱ef╱$╱ // 0x2aee @0x29
0x2ac5…2afd at002a = ╱eb╱;╱ // 0x2aef @0x2a
0x2ac5…2afd at002b = ╱4b╱K╱ // 0x2af0 @0x2b
0x2ac5…2afd at002c = ╱31╱1╱ // 0x2af1 @0x2c
0x2ac5…2afd at002d = ╱37╱7╱ // 0x2af2 @0x2d
0x2ac5…2afd at002e = ╱ef╱$╱ // 0x2af3 @0x2e
0x2ac5…2afd at002f = ╱dc╱=╱ // 0x2af4 @0x2f
0x2ac5…2afd at0030 = ╱4e╱N╱ // 0x2af5 @0x30
0x2ac5…2afd at0031 = ╱ef╱$╱ // 0x2af6 @0x31
0x2ac5…2afd at0032 = ╱f1╱+╱ // 0x2af7 @0x32
0x2ac5…2afd at0033 = ╱4b╱K╱ // 0x2af8 @0x33
0x2ac5…2afd at0034 = ╱31╱1╱ // 0x2af9 @0x34
0x2ac5…2afd at0035 = ╱37╱7╱ // 0x2afa @0x35
0x2ac5…2afd at0036 = ╱ef╱$╱ // 0x2afb @0x36
0x2ac5…2afd at0037 = EOL // 0x2afc @0x37
0x2ac5…2afd }
0x2afd…2b09 b860 3700 OPEN K13$,R
0x2afd…2b09 LineComalBin {
0x2afd…2b09 ptr = 0xb860 // 0x2afd @0x0
0x2afd…2b09 lno = 0x0e74 // 0x2aff @0x2
0x2afd…2b09 at0004 = ╱a7╱ OPEN ╱ // 0x2b01 @0x4
0x2afd…2b09 at0005 = ╱4b╱K╱ // 0x2b02 @0x5
0x2afd…2b09 at0006 = ╱31╱1╱ // 0x2b03 @0x6
0x2afd…2b09 at0007 = ╱33╱3╱ // 0x2b04 @0x7
0x2afd…2b09 at0008 = ╱ef╱$╱ // 0x2b05 @0x8
0x2afd…2b09 at0009 = ╱ec╱,╱ // 0x2b06 @0x9
0x2afd…2b09 at000a = ╱52╱R╱ // 0x2b07 @0xa
0x2afd…2b09 at000b = EOL // 0x2b08 @0xb
0x2afd…2b09 }
0x2b09…2b28 b87f 3710 EXEC FEJL(9,25,K13$)
0x2b09…2b28 LineComalBin {
0x2b09…2b28 ptr = 0xb87f // 0x2b09 @0x0
0x2b09…2b28 lno = 0x0e7e // 0x2b0b @0x2
0x2b09…2b28 at0004 = ╱9d╱ EXEC ╱ // 0x2b0d @0x4
0x2b09…2b28 at0005 = ╱46╱F╱ // 0x2b0e @0x5
0x2b09…2b28 at0006 = ╱45╱E╱ // 0x2b0f @0x6
0x2b09…2b28 at0007 = ╱4a╱J╱ // 0x2b10 @0x7
0x2b09…2b28 at0008 = ╱4c╱L╱ // 0x2b11 @0x8
0x2b09…2b28 at0009 = ╱ed╱(╱ // 0x2b12 @0x9
0x2b09…2b28 at000a = ╱39╱9╱ // 0x2b13 @0xa
0x2b09…2b28 at000b = ╱fe00009004╱ // 0x2b14 @0xb
0x2b09…2b28 at0010 = ╱ec╱,╱ // 0x2b19 @0x10
0x2b09…2b28 at0011 = ╱32╱2╱ // 0x2b1a @0x11
0x2b09…2b28 at0012 = ╱35╱5╱ // 0x2b1b @0x12
0x2b09…2b28 at0013 = ╱fe0000c805╱ // 0x2b1c @0x13
0x2b09…2b28 at0018 = ╱ec╱,╱ // 0x2b21 @0x18
0x2b09…2b28 at0019 = ╱4b╱K╱ // 0x2b22 @0x19
0x2b09…2b28 at001a = ╱31╱1╱ // 0x2b23 @0x1a
0x2b09…2b28 at001b = ╱33╱3╱ // 0x2b24 @0x1b
0x2b09…2b28 at001c = ╱ef╱$╱ // 0x2b25 @0x1c
0x2b09…2b28 at001d = ╱ee╱)╱ // 0x2b26 @0x1d
0x2b09…2b28 at001e = EOL // 0x2b27 @0x1e
0x2b09…2b28 }
0x2b28…2b3f b896 3720 GET K13$,1:MOMS$
0x2b28…2b3f LineComalBin {
0x2b28…2b3f ptr = 0xb896 // 0x2b28 @0x0
0x2b28…2b3f lno = 0x0e88 // 0x2b2a @0x2
0x2b28…2b3f at0004 = ╱a9╱ GET ╱ // 0x2b2c @0x4
0x2b28…2b3f at0005 = ╱4b╱K╱ // 0x2b2d @0x5
0x2b28…2b3f at0006 = ╱31╱1╱ // 0x2b2e @0x6
0x2b28…2b3f at0007 = ╱33╱3╱ // 0x2b2f @0x7
0x2b28…2b3f at0008 = ╱ef╱$╱ // 0x2b30 @0x8
0x2b28…2b3f at0009 = ╱ec╱,╱ // 0x2b31 @0x9
0x2b28…2b3f at000a = ╱31╱1╱ // 0x2b32 @0xa
0x2b28…2b3f at000b = ╱fe00008001╱ // 0x2b33 @0xb
0x2b28…2b3f at0010 = ╱f0╱:╱ // 0x2b38 @0x10
0x2b28…2b3f at0011 = ╱4d╱M╱ // 0x2b39 @0x11
0x2b28…2b3f at0012 = ╱4f╱O╱ // 0x2b3a @0x12
0x2b28…2b3f at0013 = ╱4d╱M╱ // 0x2b3b @0x13
0x2b28…2b3f at0014 = ╱53╱S╱ // 0x2b3c @0x14
0x2b28…2b3f at0015 = ╱ef╱$╱ // 0x2b3d @0x15
0x2b28…2b3f at0016 = EOL // 0x2b3e @0x16
0x2b28…2b3f }
0x2b3f…2b5e b8b5 3730 EXEC FEJL(9,26,K13$)
0x2b3f…2b5e LineComalBin {
0x2b3f…2b5e ptr = 0xb8b5 // 0x2b3f @0x0
0x2b3f…2b5e lno = 0x0e92 // 0x2b41 @0x2
0x2b3f…2b5e at0004 = ╱9d╱ EXEC ╱ // 0x2b43 @0x4
0x2b3f…2b5e at0005 = ╱46╱F╱ // 0x2b44 @0x5
0x2b3f…2b5e at0006 = ╱45╱E╱ // 0x2b45 @0x6
0x2b3f…2b5e at0007 = ╱4a╱J╱ // 0x2b46 @0x7
0x2b3f…2b5e at0008 = ╱4c╱L╱ // 0x2b47 @0x8
0x2b3f…2b5e at0009 = ╱ed╱(╱ // 0x2b48 @0x9
0x2b3f…2b5e at000a = ╱39╱9╱ // 0x2b49 @0xa
0x2b3f…2b5e at000b = ╱fe00009004╱ // 0x2b4a @0xb
0x2b3f…2b5e at0010 = ╱ec╱,╱ // 0x2b4f @0x10
0x2b3f…2b5e at0011 = ╱32╱2╱ // 0x2b50 @0x11
0x2b3f…2b5e at0012 = ╱36╱6╱ // 0x2b51 @0x12
0x2b3f…2b5e at0013 = ╱fe0000d005╱ // 0x2b52 @0x13
0x2b3f…2b5e at0018 = ╱ec╱,╱ // 0x2b57 @0x18
0x2b3f…2b5e at0019 = ╱4b╱K╱ // 0x2b58 @0x19
0x2b3f…2b5e at001a = ╱31╱1╱ // 0x2b59 @0x1a
0x2b3f…2b5e at001b = ╱33╱3╱ // 0x2b5a @0x1b
0x2b3f…2b5e at001c = ╱ef╱$╱ // 0x2b5b @0x1c
0x2b3f…2b5e at001d = ╱ee╱)╱ // 0x2b5c @0x1d
0x2b3f…2b5e at001e = EOL // 0x2b5d @0x1e
0x2b3f…2b5e }
0x2b5e…2bd2 b929 3740 GET K13$,2:T1(1),T1(2),T1(3),T1(4),T1(5),T1(6),T1(7),T1(8),T1(9)
0x2b5e…2bd2 LineComalBin {
0x2b5e…2bd2 ptr = 0xb929 // 0x2b5e @0x0
0x2b5e…2bd2 lno = 0x0e9c // 0x2b60 @0x2
0x2b5e…2bd2 at0004 = ╱a9╱ GET ╱ // 0x2b62 @0x4
0x2b5e…2bd2 at0005 = ╱4b╱K╱ // 0x2b63 @0x5
0x2b5e…2bd2 at0006 = ╱31╱1╱ // 0x2b64 @0x6
0x2b5e…2bd2 at0007 = ╱33╱3╱ // 0x2b65 @0x7
0x2b5e…2bd2 at0008 = ╱ef╱$╱ // 0x2b66 @0x8
0x2b5e…2bd2 at0009 = ╱ec╱,╱ // 0x2b67 @0x9
0x2b5e…2bd2 at000a = ╱32╱2╱ // 0x2b68 @0xa
0x2b5e…2bd2 at000b = ╱fe00008002╱ // 0x2b69 @0xb
0x2b5e…2bd2 at0010 = ╱f0╱:╱ // 0x2b6e @0x10
0x2b5e…2bd2 at0011 = ╱54╱T╱ // 0x2b6f @0x11
0x2b5e…2bd2 at0012 = ╱31╱1╱ // 0x2b70 @0x12
0x2b5e…2bd2 at0013 = ╱ed╱(╱ // 0x2b71 @0x13
0x2b5e…2bd2 at0014 = ╱31╱1╱ // 0x2b72 @0x14
0x2b5e…2bd2 at0015 = ╱fe00008001╱ // 0x2b73 @0x15
0x2b5e…2bd2 at001a = ╱ee╱)╱ // 0x2b78 @0x1a
0x2b5e…2bd2 at001b = ╱ec╱,╱ // 0x2b79 @0x1b
0x2b5e…2bd2 at001c = ╱54╱T╱ // 0x2b7a @0x1c
0x2b5e…2bd2 at001d = ╱31╱1╱ // 0x2b7b @0x1d
0x2b5e…2bd2 at001e = ╱ed╱(╱ // 0x2b7c @0x1e
0x2b5e…2bd2 at001f = ╱32╱2╱ // 0x2b7d @0x1f
0x2b5e…2bd2 at0020 = ╱fe00008002╱ // 0x2b7e @0x20
0x2b5e…2bd2 at0025 = ╱ee╱)╱ // 0x2b83 @0x25
0x2b5e…2bd2 at0026 = ╱ec╱,╱ // 0x2b84 @0x26
0x2b5e…2bd2 at0027 = ╱54╱T╱ // 0x2b85 @0x27
0x2b5e…2bd2 at0028 = ╱31╱1╱ // 0x2b86 @0x28
0x2b5e…2bd2 at0029 = ╱ed╱(╱ // 0x2b87 @0x29
0x2b5e…2bd2 at002a = ╱33╱3╱ // 0x2b88 @0x2a
0x2b5e…2bd2 at002b = ╱fe0000c002╱ // 0x2b89 @0x2b
0x2b5e…2bd2 at0030 = ╱ee╱)╱ // 0x2b8e @0x30
0x2b5e…2bd2 at0031 = ╱ec╱,╱ // 0x2b8f @0x31
0x2b5e…2bd2 at0032 = ╱54╱T╱ // 0x2b90 @0x32
0x2b5e…2bd2 at0033 = ╱31╱1╱ // 0x2b91 @0x33
0x2b5e…2bd2 at0034 = ╱ed╱(╱ // 0x2b92 @0x34
0x2b5e…2bd2 at0035 = ╱34╱4╱ // 0x2b93 @0x35
0x2b5e…2bd2 at0036 = ╱fe00008003╱ // 0x2b94 @0x36
0x2b5e…2bd2 at003b = ╱ee╱)╱ // 0x2b99 @0x3b
0x2b5e…2bd2 at003c = ╱ec╱,╱ // 0x2b9a @0x3c
0x2b5e…2bd2 at003d = ╱54╱T╱ // 0x2b9b @0x3d
0x2b5e…2bd2 at003e = ╱31╱1╱ // 0x2b9c @0x3e
0x2b5e…2bd2 at003f = ╱ed╱(╱ // 0x2b9d @0x3f
0x2b5e…2bd2 at0040 = ╱35╱5╱ // 0x2b9e @0x40
0x2b5e…2bd2 at0041 = ╱fe0000a003╱ // 0x2b9f @0x41
0x2b5e…2bd2 at0046 = ╱ee╱)╱ // 0x2ba4 @0x46
0x2b5e…2bd2 at0047 = ╱ec╱,╱ // 0x2ba5 @0x47
0x2b5e…2bd2 at0048 = ╱54╱T╱ // 0x2ba6 @0x48
0x2b5e…2bd2 at0049 = ╱31╱1╱ // 0x2ba7 @0x49
0x2b5e…2bd2 at004a = ╱ed╱(╱ // 0x2ba8 @0x4a
0x2b5e…2bd2 at004b = ╱36╱6╱ // 0x2ba9 @0x4b
0x2b5e…2bd2 at004c = ╱fe0000c003╱ // 0x2baa @0x4c
0x2b5e…2bd2 at0051 = ╱ee╱)╱ // 0x2baf @0x51
0x2b5e…2bd2 at0052 = ╱ec╱,╱ // 0x2bb0 @0x52
0x2b5e…2bd2 at0053 = ╱54╱T╱ // 0x2bb1 @0x53
0x2b5e…2bd2 at0054 = ╱31╱1╱ // 0x2bb2 @0x54
0x2b5e…2bd2 at0055 = ╱ed╱(╱ // 0x2bb3 @0x55
0x2b5e…2bd2 at0056 = ╱37╱7╱ // 0x2bb4 @0x56
0x2b5e…2bd2 at0057 = ╱fe0000e003╱ // 0x2bb5 @0x57
0x2b5e…2bd2 at005c = ╱ee╱)╱ // 0x2bba @0x5c
0x2b5e…2bd2 at005d = ╱ec╱,╱ // 0x2bbb @0x5d
0x2b5e…2bd2 at005e = ╱54╱T╱ // 0x2bbc @0x5e
0x2b5e…2bd2 at005f = ╱31╱1╱ // 0x2bbd @0x5f
0x2b5e…2bd2 at0060 = ╱ed╱(╱ // 0x2bbe @0x60
0x2b5e…2bd2 at0061 = ╱38╱8╱ // 0x2bbf @0x61
0x2b5e…2bd2 at0062 = ╱fe00008004╱ // 0x2bc0 @0x62
0x2b5e…2bd2 at0067 = ╱ee╱)╱ // 0x2bc5 @0x67
0x2b5e…2bd2 at0068 = ╱ec╱,╱ // 0x2bc6 @0x68
0x2b5e…2bd2 at0069 = ╱54╱T╱ // 0x2bc7 @0x69
0x2b5e…2bd2 at006a = ╱31╱1╱ // 0x2bc8 @0x6a
0x2b5e…2bd2 at006b = ╱ed╱(╱ // 0x2bc9 @0x6b
0x2b5e…2bd2 at006c = ╱39╱9╱ // 0x2bca @0x6c
0x2b5e…2bd2 at006d = ╱fe00009004╱ // 0x2bcb @0x6d
0x2b5e…2bd2 at0072 = ╱ee╱)╱ // 0x2bd0 @0x72
0x2b5e…2bd2 at0073 = EOL // 0x2bd1 @0x73
0x2b5e…2bd2 }
0x2bd2…2bf1 b948 3750 EXEC FEJL(9,27,K13$)
0x2bd2…2bf1 LineComalBin {
0x2bd2…2bf1 ptr = 0xb948 // 0x2bd2 @0x0
0x2bd2…2bf1 lno = 0x0ea6 // 0x2bd4 @0x2
0x2bd2…2bf1 at0004 = ╱9d╱ EXEC ╱ // 0x2bd6 @0x4
0x2bd2…2bf1 at0005 = ╱46╱F╱ // 0x2bd7 @0x5
0x2bd2…2bf1 at0006 = ╱45╱E╱ // 0x2bd8 @0x6
0x2bd2…2bf1 at0007 = ╱4a╱J╱ // 0x2bd9 @0x7
0x2bd2…2bf1 at0008 = ╱4c╱L╱ // 0x2bda @0x8
0x2bd2…2bf1 at0009 = ╱ed╱(╱ // 0x2bdb @0x9
0x2bd2…2bf1 at000a = ╱39╱9╱ // 0x2bdc @0xa
0x2bd2…2bf1 at000b = ╱fe00009004╱ // 0x2bdd @0xb
0x2bd2…2bf1 at0010 = ╱ec╱,╱ // 0x2be2 @0x10
0x2bd2…2bf1 at0011 = ╱32╱2╱ // 0x2be3 @0x11
0x2bd2…2bf1 at0012 = ╱37╱7╱ // 0x2be4 @0x12
0x2bd2…2bf1 at0013 = ╱fe0000d805╱ // 0x2be5 @0x13
0x2bd2…2bf1 at0018 = ╱ec╱,╱ // 0x2bea @0x18
0x2bd2…2bf1 at0019 = ╱4b╱K╱ // 0x2beb @0x19
0x2bd2…2bf1 at001a = ╱31╱1╱ // 0x2bec @0x1a
0x2bd2…2bf1 at001b = ╱33╱3╱ // 0x2bed @0x1b
0x2bd2…2bf1 at001c = ╱ef╱$╱ // 0x2bee @0x1c
0x2bd2…2bf1 at001d = ╱ee╱)╱ // 0x2bef @0x1d
0x2bd2…2bf1 at001e = EOL // 0x2bf0 @0x1e
0x2bd2…2bf1 }
0x2bf1…2c06 b95d 3760 FOR I=1 TO 6
0x2bf1…2c06 LineComalBin {
0x2bf1…2c06 ptr = 0xb95d // 0x2bf1 @0x0
0x2bf1…2c06 lno = 0x0eb0 // 0x2bf3 @0x2
0x2bf1…2c06 at0004 = ╱83╱ FOR ╱ // 0x2bf5 @0x4
0x2bf1…2c06 at0005 = ╱49╱I╱ // 0x2bf6 @0x5
0x2bf1…2c06 at0006 = ╱dc╱=╱ // 0x2bf7 @0x6
0x2bf1…2c06 at0007 = ╱31╱1╱ // 0x2bf8 @0x7
0x2bf1…2c06 at0008 = ╱fe00008001╱ // 0x2bf9 @0x8
0x2bf1…2c06 at000d = ╱b7╱ TO ╱ // 0x2bfe @0xd
0x2bf1…2c06 at000e = ╱36╱6╱ // 0x2bff @0xe
0x2bf1…2c06 at000f = ╱fe0000c003╱ // 0x2c00 @0xf
0x2bf1…2c06 at0014 = EOL // 0x2c05 @0x14
0x2bf1…2c06 }
0x2c06…2c25 b97c 3770 H=(I-1)*3+1
0x2c06…2c25 LineComalBin {
0x2c06…2c25 ptr = 0xb97c // 0x2c06 @0x0
0x2c06…2c25 lno = 0x0eba // 0x2c08 @0x2
0x2c06…2c25 at0004 = ╱48╱H╱ // 0x2c0a @0x4
0x2c06…2c25 at0005 = ╱dc╱=╱ // 0x2c0b @0x5
0x2c06…2c25 at0006 = ╱ed╱(╱ // 0x2c0c @0x6
0x2c06…2c25 at0007 = ╱49╱I╱ // 0x2c0d @0x7
0x2c06…2c25 at0008 = ╱e3╱-╱ // 0x2c0e @0x8
0x2c06…2c25 at0009 = ╱31╱1╱ // 0x2c0f @0x9
0x2c06…2c25 at000a = ╱fe00008001╱ // 0x2c10 @0xa
0x2c06…2c25 at000f = ╱ee╱)╱ // 0x2c15 @0xf
0x2c06…2c25 at0010 = ╱e4╱*╱ // 0x2c16 @0x10
0x2c06…2c25 at0011 = ╱33╱3╱ // 0x2c17 @0x11
0x2c06…2c25 at0012 = ╱fe0000c002╱ // 0x2c18 @0x12
0x2c06…2c25 at0017 = ╱e2╱+╱ // 0x2c1d @0x17
0x2c06…2c25 at0018 = ╱31╱1╱ // 0x2c1e @0x18
0x2c06…2c25 at0019 = ╱fe00008001╱ // 0x2c1f @0x19
0x2c06…2c25 at001e = EOL // 0x2c24 @0x1e
0x2c06…2c25 }
0x2c25…2c61 b9b8 3780 GET K13$,I+5:TFIL$(H),TFIL$(H+1),TFIL$(H+2)
0x2c25…2c61 LineComalBin {
0x2c25…2c61 ptr = 0xb9b8 // 0x2c25 @0x0
0x2c25…2c61 lno = 0x0ec4 // 0x2c27 @0x2
0x2c25…2c61 at0004 = ╱a9╱ GET ╱ // 0x2c29 @0x4
0x2c25…2c61 at0005 = ╱4b╱K╱ // 0x2c2a @0x5
0x2c25…2c61 at0006 = ╱31╱1╱ // 0x2c2b @0x6
0x2c25…2c61 at0007 = ╱33╱3╱ // 0x2c2c @0x7
0x2c25…2c61 at0008 = ╱ef╱$╱ // 0x2c2d @0x8
0x2c25…2c61 at0009 = ╱ec╱,╱ // 0x2c2e @0x9
0x2c25…2c61 at000a = ╱49╱I╱ // 0x2c2f @0xa
0x2c25…2c61 at000b = ╱e2╱+╱ // 0x2c30 @0xb
0x2c25…2c61 at000c = ╱35╱5╱ // 0x2c31 @0xc
0x2c25…2c61 at000d = ╱fe0000a003╱ // 0x2c32 @0xd
0x2c25…2c61 at0012 = ╱f0╱:╱ // 0x2c37 @0x12
0x2c25…2c61 at0013 = ╱54╱T╱ // 0x2c38 @0x13
0x2c25…2c61 at0014 = ╱46╱F╱ // 0x2c39 @0x14
0x2c25…2c61 at0015 = ╱49╱I╱ // 0x2c3a @0x15
0x2c25…2c61 at0016 = ╱4c╱L╱ // 0x2c3b @0x16
0x2c25…2c61 at0017 = ╱ef╱$╱ // 0x2c3c @0x17
0x2c25…2c61 at0018 = ╱ed╱(╱ // 0x2c3d @0x18
0x2c25…2c61 at0019 = ╱48╱H╱ // 0x2c3e @0x19
0x2c25…2c61 at001a = ╱ee╱)╱ // 0x2c3f @0x1a
0x2c25…2c61 at001b = ╱ec╱,╱ // 0x2c40 @0x1b
0x2c25…2c61 at001c = ╱54╱T╱ // 0x2c41 @0x1c
0x2c25…2c61 at001d = ╱46╱F╱ // 0x2c42 @0x1d
0x2c25…2c61 at001e = ╱49╱I╱ // 0x2c43 @0x1e
0x2c25…2c61 at001f = ╱4c╱L╱ // 0x2c44 @0x1f
0x2c25…2c61 at0020 = ╱ef╱$╱ // 0x2c45 @0x20
0x2c25…2c61 at0021 = ╱ed╱(╱ // 0x2c46 @0x21
0x2c25…2c61 at0022 = ╱48╱H╱ // 0x2c47 @0x22
0x2c25…2c61 at0023 = ╱e2╱+╱ // 0x2c48 @0x23
0x2c25…2c61 at0024 = ╱31╱1╱ // 0x2c49 @0x24
0x2c25…2c61 at0025 = ╱fe00008001╱ // 0x2c4a @0x25
0x2c25…2c61 at002a = ╱ee╱)╱ // 0x2c4f @0x2a
0x2c25…2c61 at002b = ╱ec╱,╱ // 0x2c50 @0x2b
0x2c25…2c61 at002c = ╱54╱T╱ // 0x2c51 @0x2c
0x2c25…2c61 at002d = ╱46╱F╱ // 0x2c52 @0x2d
0x2c25…2c61 at002e = ╱49╱I╱ // 0x2c53 @0x2e
0x2c25…2c61 at002f = ╱4c╱L╱ // 0x2c54 @0x2f
0x2c25…2c61 at0030 = ╱ef╱$╱ // 0x2c55 @0x30
0x2c25…2c61 at0031 = ╱ed╱(╱ // 0x2c56 @0x31
0x2c25…2c61 at0032 = ╱48╱H╱ // 0x2c57 @0x32
0x2c25…2c61 at0033 = ╱e2╱+╱ // 0x2c58 @0x33
0x2c25…2c61 at0034 = ╱32╱2╱ // 0x2c59 @0x34
0x2c25…2c61 at0035 = ╱fe00008002╱ // 0x2c5a @0x35
0x2c25…2c61 at003a = ╱ee╱)╱ // 0x2c5f @0x3a
0x2c25…2c61 at003b = EOL // 0x2c60 @0x3b
0x2c25…2c61 }
0x2c61…2c80 b9d7 3790 EXEC FEJL(9,28,K13$)
0x2c61…2c80 LineComalBin {
0x2c61…2c80 ptr = 0xb9d7 // 0x2c61 @0x0
0x2c61…2c80 lno = 0x0ece // 0x2c63 @0x2
0x2c61…2c80 at0004 = ╱9d╱ EXEC ╱ // 0x2c65 @0x4
0x2c61…2c80 at0005 = ╱46╱F╱ // 0x2c66 @0x5
0x2c61…2c80 at0006 = ╱45╱E╱ // 0x2c67 @0x6
0x2c61…2c80 at0007 = ╱4a╱J╱ // 0x2c68 @0x7
0x2c61…2c80 at0008 = ╱4c╱L╱ // 0x2c69 @0x8
0x2c61…2c80 at0009 = ╱ed╱(╱ // 0x2c6a @0x9
0x2c61…2c80 at000a = ╱39╱9╱ // 0x2c6b @0xa
0x2c61…2c80 at000b = ╱fe00009004╱ // 0x2c6c @0xb
0x2c61…2c80 at0010 = ╱ec╱,╱ // 0x2c71 @0x10
0x2c61…2c80 at0011 = ╱32╱2╱ // 0x2c72 @0x11
0x2c61…2c80 at0012 = ╱38╱8╱ // 0x2c73 @0x12
0x2c61…2c80 at0013 = ╱fe0000e005╱ // 0x2c74 @0x13
0x2c61…2c80 at0018 = ╱ec╱,╱ // 0x2c79 @0x18
0x2c61…2c80 at0019 = ╱4b╱K╱ // 0x2c7a @0x19
0x2c61…2c80 at001a = ╱31╱1╱ // 0x2c7b @0x1a
0x2c61…2c80 at001b = ╱33╱3╱ // 0x2c7c @0x1b
0x2c61…2c80 at001c = ╱ef╱$╱ // 0x2c7d @0x1c
0x2c61…2c80 at001d = ╱ee╱)╱ // 0x2c7e @0x1d
0x2c61…2c80 at001e = EOL // 0x2c7f @0x1e
0x2c61…2c80 }
0x2c80…2c87 b9de 3800 NEXT I
0x2c80…2c87 LineComalBin {
0x2c80…2c87 ptr = 0xb9de // 0x2c80 @0x0
0x2c80…2c87 lno = 0x0ed8 // 0x2c82 @0x2
0x2c80…2c87 at0004 = ╱84╱ NEXT ╱ // 0x2c84 @0x4
0x2c80…2c87 at0005 = ╱49╱I╱ // 0x2c85 @0x5
0x2c80…2c87 at0006 = EOL // 0x2c86 @0x6
0x2c80…2c87 }
0x2c87…2cfc ba53 3810 GET K13$,12:T2(1),T2(2),T2(3),T2(4),T2(5),T2(6),T2(7),T2(8),T2(9)
0x2c87…2cfc LineComalBin {
0x2c87…2cfc ptr = 0xba53 // 0x2c87 @0x0
0x2c87…2cfc lno = 0x0ee2 // 0x2c89 @0x2
0x2c87…2cfc at0004 = ╱a9╱ GET ╱ // 0x2c8b @0x4
0x2c87…2cfc at0005 = ╱4b╱K╱ // 0x2c8c @0x5
0x2c87…2cfc at0006 = ╱31╱1╱ // 0x2c8d @0x6
0x2c87…2cfc at0007 = ╱33╱3╱ // 0x2c8e @0x7
0x2c87…2cfc at0008 = ╱ef╱$╱ // 0x2c8f @0x8
0x2c87…2cfc at0009 = ╱ec╱,╱ // 0x2c90 @0x9
0x2c87…2cfc at000a = ╱31╱1╱ // 0x2c91 @0xa
0x2c87…2cfc at000b = ╱32╱2╱ // 0x2c92 @0xb
0x2c87…2cfc at000c = ╱fe0000c004╱ // 0x2c93 @0xc
0x2c87…2cfc at0011 = ╱f0╱:╱ // 0x2c98 @0x11
0x2c87…2cfc at0012 = ╱54╱T╱ // 0x2c99 @0x12
0x2c87…2cfc at0013 = ╱32╱2╱ // 0x2c9a @0x13
0x2c87…2cfc at0014 = ╱ed╱(╱ // 0x2c9b @0x14
0x2c87…2cfc at0015 = ╱31╱1╱ // 0x2c9c @0x15
0x2c87…2cfc at0016 = ╱fe00008001╱ // 0x2c9d @0x16
0x2c87…2cfc at001b = ╱ee╱)╱ // 0x2ca2 @0x1b
0x2c87…2cfc at001c = ╱ec╱,╱ // 0x2ca3 @0x1c
0x2c87…2cfc at001d = ╱54╱T╱ // 0x2ca4 @0x1d
0x2c87…2cfc at001e = ╱32╱2╱ // 0x2ca5 @0x1e
0x2c87…2cfc at001f = ╱ed╱(╱ // 0x2ca6 @0x1f
0x2c87…2cfc at0020 = ╱32╱2╱ // 0x2ca7 @0x20
0x2c87…2cfc at0021 = ╱fe00008002╱ // 0x2ca8 @0x21
0x2c87…2cfc at0026 = ╱ee╱)╱ // 0x2cad @0x26
0x2c87…2cfc at0027 = ╱ec╱,╱ // 0x2cae @0x27
0x2c87…2cfc at0028 = ╱54╱T╱ // 0x2caf @0x28
0x2c87…2cfc at0029 = ╱32╱2╱ // 0x2cb0 @0x29
0x2c87…2cfc at002a = ╱ed╱(╱ // 0x2cb1 @0x2a
0x2c87…2cfc at002b = ╱33╱3╱ // 0x2cb2 @0x2b
0x2c87…2cfc at002c = ╱fe0000c002╱ // 0x2cb3 @0x2c
0x2c87…2cfc at0031 = ╱ee╱)╱ // 0x2cb8 @0x31
0x2c87…2cfc at0032 = ╱ec╱,╱ // 0x2cb9 @0x32
0x2c87…2cfc at0033 = ╱54╱T╱ // 0x2cba @0x33
0x2c87…2cfc at0034 = ╱32╱2╱ // 0x2cbb @0x34
0x2c87…2cfc at0035 = ╱ed╱(╱ // 0x2cbc @0x35
0x2c87…2cfc at0036 = ╱34╱4╱ // 0x2cbd @0x36
0x2c87…2cfc at0037 = ╱fe00008003╱ // 0x2cbe @0x37
0x2c87…2cfc at003c = ╱ee╱)╱ // 0x2cc3 @0x3c
0x2c87…2cfc at003d = ╱ec╱,╱ // 0x2cc4 @0x3d
0x2c87…2cfc at003e = ╱54╱T╱ // 0x2cc5 @0x3e
0x2c87…2cfc at003f = ╱32╱2╱ // 0x2cc6 @0x3f
0x2c87…2cfc at0040 = ╱ed╱(╱ // 0x2cc7 @0x40
0x2c87…2cfc at0041 = ╱35╱5╱ // 0x2cc8 @0x41
0x2c87…2cfc at0042 = ╱fe0000a003╱ // 0x2cc9 @0x42
0x2c87…2cfc at0047 = ╱ee╱)╱ // 0x2cce @0x47
0x2c87…2cfc at0048 = ╱ec╱,╱ // 0x2ccf @0x48
0x2c87…2cfc at0049 = ╱54╱T╱ // 0x2cd0 @0x49
0x2c87…2cfc at004a = ╱32╱2╱ // 0x2cd1 @0x4a
0x2c87…2cfc at004b = ╱ed╱(╱ // 0x2cd2 @0x4b
0x2c87…2cfc at004c = ╱36╱6╱ // 0x2cd3 @0x4c
0x2c87…2cfc at004d = ╱fe0000c003╱ // 0x2cd4 @0x4d
0x2c87…2cfc at0052 = ╱ee╱)╱ // 0x2cd9 @0x52
0x2c87…2cfc at0053 = ╱ec╱,╱ // 0x2cda @0x53
0x2c87…2cfc at0054 = ╱54╱T╱ // 0x2cdb @0x54
0x2c87…2cfc at0055 = ╱32╱2╱ // 0x2cdc @0x55
0x2c87…2cfc at0056 = ╱ed╱(╱ // 0x2cdd @0x56
0x2c87…2cfc at0057 = ╱37╱7╱ // 0x2cde @0x57
0x2c87…2cfc at0058 = ╱fe0000e003╱ // 0x2cdf @0x58
0x2c87…2cfc at005d = ╱ee╱)╱ // 0x2ce4 @0x5d
0x2c87…2cfc at005e = ╱ec╱,╱ // 0x2ce5 @0x5e
0x2c87…2cfc at005f = ╱54╱T╱ // 0x2ce6 @0x5f
0x2c87…2cfc at0060 = ╱32╱2╱ // 0x2ce7 @0x60
0x2c87…2cfc at0061 = ╱ed╱(╱ // 0x2ce8 @0x61
0x2c87…2cfc at0062 = ╱38╱8╱ // 0x2ce9 @0x62
0x2c87…2cfc at0063 = ╱fe00008004╱ // 0x2cea @0x63
0x2c87…2cfc at0068 = ╱ee╱)╱ // 0x2cef @0x68
0x2c87…2cfc at0069 = ╱ec╱,╱ // 0x2cf0 @0x69
0x2c87…2cfc at006a = ╱54╱T╱ // 0x2cf1 @0x6a
0x2c87…2cfc at006b = ╱32╱2╱ // 0x2cf2 @0x6b
0x2c87…2cfc at006c = ╱ed╱(╱ // 0x2cf3 @0x6c
0x2c87…2cfc at006d = ╱39╱9╱ // 0x2cf4 @0x6d
0x2c87…2cfc at006e = ╱fe00009004╱ // 0x2cf5 @0x6e
0x2c87…2cfc at0073 = ╱ee╱)╱ // 0x2cfa @0x73
0x2c87…2cfc at0074 = EOL // 0x2cfb @0x74
0x2c87…2cfc }
0x2cfc…2d1b ba72 3820 EXEC FEJL(9,29,K13$)
0x2cfc…2d1b LineComalBin {
0x2cfc…2d1b ptr = 0xba72 // 0x2cfc @0x0
0x2cfc…2d1b lno = 0x0eec // 0x2cfe @0x2
0x2cfc…2d1b at0004 = ╱9d╱ EXEC ╱ // 0x2d00 @0x4
0x2cfc…2d1b at0005 = ╱46╱F╱ // 0x2d01 @0x5
0x2cfc…2d1b at0006 = ╱45╱E╱ // 0x2d02 @0x6
0x2cfc…2d1b at0007 = ╱4a╱J╱ // 0x2d03 @0x7
0x2cfc…2d1b at0008 = ╱4c╱L╱ // 0x2d04 @0x8
0x2cfc…2d1b at0009 = ╱ed╱(╱ // 0x2d05 @0x9
0x2cfc…2d1b at000a = ╱39╱9╱ // 0x2d06 @0xa
0x2cfc…2d1b at000b = ╱fe00009004╱ // 0x2d07 @0xb
0x2cfc…2d1b at0010 = ╱ec╱,╱ // 0x2d0c @0x10
0x2cfc…2d1b at0011 = ╱32╱2╱ // 0x2d0d @0x11
0x2cfc…2d1b at0012 = ╱39╱9╱ // 0x2d0e @0x12
0x2cfc…2d1b at0013 = ╱fe0000e805╱ // 0x2d0f @0x13
0x2cfc…2d1b at0018 = ╱ec╱,╱ // 0x2d14 @0x18
0x2cfc…2d1b at0019 = ╱4b╱K╱ // 0x2d15 @0x19
0x2cfc…2d1b at001a = ╱31╱1╱ // 0x2d16 @0x1a
0x2cfc…2d1b at001b = ╱33╱3╱ // 0x2d17 @0x1b
0x2cfc…2d1b at001c = ╱ef╱$╱ // 0x2d18 @0x1c
0x2cfc…2d1b at001d = ╱ee╱)╱ // 0x2d19 @0x1d
0x2cfc…2d1b at001e = EOL // 0x2d1a @0x1e
0x2cfc…2d1b }
0x2d1b…2d90 bae7 3830 GET K13$,13:T3(1),T3(2),T3(3),T3(4),T3(5),T3(6),T3(7),T3(8),T3(9)
0x2d1b…2d90 LineComalBin {
0x2d1b…2d90 ptr = 0xbae7 // 0x2d1b @0x0
0x2d1b…2d90 lno = 0x0ef6 // 0x2d1d @0x2
0x2d1b…2d90 at0004 = ╱a9╱ GET ╱ // 0x2d1f @0x4
0x2d1b…2d90 at0005 = ╱4b╱K╱ // 0x2d20 @0x5
0x2d1b…2d90 at0006 = ╱31╱1╱ // 0x2d21 @0x6
0x2d1b…2d90 at0007 = ╱33╱3╱ // 0x2d22 @0x7
0x2d1b…2d90 at0008 = ╱ef╱$╱ // 0x2d23 @0x8
0x2d1b…2d90 at0009 = ╱ec╱,╱ // 0x2d24 @0x9
0x2d1b…2d90 at000a = ╱31╱1╱ // 0x2d25 @0xa
0x2d1b…2d90 at000b = ╱33╱3╱ // 0x2d26 @0xb
0x2d1b…2d90 at000c = ╱fe0000d004╱ // 0x2d27 @0xc
0x2d1b…2d90 at0011 = ╱f0╱:╱ // 0x2d2c @0x11
0x2d1b…2d90 at0012 = ╱54╱T╱ // 0x2d2d @0x12
0x2d1b…2d90 at0013 = ╱33╱3╱ // 0x2d2e @0x13
0x2d1b…2d90 at0014 = ╱ed╱(╱ // 0x2d2f @0x14
0x2d1b…2d90 at0015 = ╱31╱1╱ // 0x2d30 @0x15
0x2d1b…2d90 at0016 = ╱fe00008001╱ // 0x2d31 @0x16
0x2d1b…2d90 at001b = ╱ee╱)╱ // 0x2d36 @0x1b
0x2d1b…2d90 at001c = ╱ec╱,╱ // 0x2d37 @0x1c
0x2d1b…2d90 at001d = ╱54╱T╱ // 0x2d38 @0x1d
0x2d1b…2d90 at001e = ╱33╱3╱ // 0x2d39 @0x1e
0x2d1b…2d90 at001f = ╱ed╱(╱ // 0x2d3a @0x1f
0x2d1b…2d90 at0020 = ╱32╱2╱ // 0x2d3b @0x20
0x2d1b…2d90 at0021 = ╱fe00008002╱ // 0x2d3c @0x21
0x2d1b…2d90 at0026 = ╱ee╱)╱ // 0x2d41 @0x26
0x2d1b…2d90 at0027 = ╱ec╱,╱ // 0x2d42 @0x27
0x2d1b…2d90 at0028 = ╱54╱T╱ // 0x2d43 @0x28
0x2d1b…2d90 at0029 = ╱33╱3╱ // 0x2d44 @0x29
0x2d1b…2d90 at002a = ╱ed╱(╱ // 0x2d45 @0x2a
0x2d1b…2d90 at002b = ╱33╱3╱ // 0x2d46 @0x2b
0x2d1b…2d90 at002c = ╱fe0000c002╱ // 0x2d47 @0x2c
0x2d1b…2d90 at0031 = ╱ee╱)╱ // 0x2d4c @0x31
0x2d1b…2d90 at0032 = ╱ec╱,╱ // 0x2d4d @0x32
0x2d1b…2d90 at0033 = ╱54╱T╱ // 0x2d4e @0x33
0x2d1b…2d90 at0034 = ╱33╱3╱ // 0x2d4f @0x34
0x2d1b…2d90 at0035 = ╱ed╱(╱ // 0x2d50 @0x35
0x2d1b…2d90 at0036 = ╱34╱4╱ // 0x2d51 @0x36
0x2d1b…2d90 at0037 = ╱fe00008003╱ // 0x2d52 @0x37
0x2d1b…2d90 at003c = ╱ee╱)╱ // 0x2d57 @0x3c
0x2d1b…2d90 at003d = ╱ec╱,╱ // 0x2d58 @0x3d
0x2d1b…2d90 at003e = ╱54╱T╱ // 0x2d59 @0x3e
0x2d1b…2d90 at003f = ╱33╱3╱ // 0x2d5a @0x3f
0x2d1b…2d90 at0040 = ╱ed╱(╱ // 0x2d5b @0x40
0x2d1b…2d90 at0041 = ╱35╱5╱ // 0x2d5c @0x41
0x2d1b…2d90 at0042 = ╱fe0000a003╱ // 0x2d5d @0x42
0x2d1b…2d90 at0047 = ╱ee╱)╱ // 0x2d62 @0x47
0x2d1b…2d90 at0048 = ╱ec╱,╱ // 0x2d63 @0x48
0x2d1b…2d90 at0049 = ╱54╱T╱ // 0x2d64 @0x49
0x2d1b…2d90 at004a = ╱33╱3╱ // 0x2d65 @0x4a
0x2d1b…2d90 at004b = ╱ed╱(╱ // 0x2d66 @0x4b
0x2d1b…2d90 at004c = ╱36╱6╱ // 0x2d67 @0x4c
0x2d1b…2d90 at004d = ╱fe0000c003╱ // 0x2d68 @0x4d
0x2d1b…2d90 at0052 = ╱ee╱)╱ // 0x2d6d @0x52
0x2d1b…2d90 at0053 = ╱ec╱,╱ // 0x2d6e @0x53
0x2d1b…2d90 at0054 = ╱54╱T╱ // 0x2d6f @0x54
0x2d1b…2d90 at0055 = ╱33╱3╱ // 0x2d70 @0x55
0x2d1b…2d90 at0056 = ╱ed╱(╱ // 0x2d71 @0x56
0x2d1b…2d90 at0057 = ╱37╱7╱ // 0x2d72 @0x57
0x2d1b…2d90 at0058 = ╱fe0000e003╱ // 0x2d73 @0x58
0x2d1b…2d90 at005d = ╱ee╱)╱ // 0x2d78 @0x5d
0x2d1b…2d90 at005e = ╱ec╱,╱ // 0x2d79 @0x5e
0x2d1b…2d90 at005f = ╱54╱T╱ // 0x2d7a @0x5f
0x2d1b…2d90 at0060 = ╱33╱3╱ // 0x2d7b @0x60
0x2d1b…2d90 at0061 = ╱ed╱(╱ // 0x2d7c @0x61
0x2d1b…2d90 at0062 = ╱38╱8╱ // 0x2d7d @0x62
0x2d1b…2d90 at0063 = ╱fe00008004╱ // 0x2d7e @0x63
0x2d1b…2d90 at0068 = ╱ee╱)╱ // 0x2d83 @0x68
0x2d1b…2d90 at0069 = ╱ec╱,╱ // 0x2d84 @0x69
0x2d1b…2d90 at006a = ╱54╱T╱ // 0x2d85 @0x6a
0x2d1b…2d90 at006b = ╱33╱3╱ // 0x2d86 @0x6b
0x2d1b…2d90 at006c = ╱ed╱(╱ // 0x2d87 @0x6c
0x2d1b…2d90 at006d = ╱39╱9╱ // 0x2d88 @0x6d
0x2d1b…2d90 at006e = ╱fe00009004╱ // 0x2d89 @0x6e
0x2d1b…2d90 at0073 = ╱ee╱)╱ // 0x2d8e @0x73
0x2d1b…2d90 at0074 = EOL // 0x2d8f @0x74
0x2d1b…2d90 }
0x2d90…2daf bb06 3840 EXEC FEJL(9,30,K13$)
0x2d90…2daf LineComalBin {
0x2d90…2daf ptr = 0xbb06 // 0x2d90 @0x0
0x2d90…2daf lno = 0x0f00 // 0x2d92 @0x2
0x2d90…2daf at0004 = ╱9d╱ EXEC ╱ // 0x2d94 @0x4
0x2d90…2daf at0005 = ╱46╱F╱ // 0x2d95 @0x5
0x2d90…2daf at0006 = ╱45╱E╱ // 0x2d96 @0x6
0x2d90…2daf at0007 = ╱4a╱J╱ // 0x2d97 @0x7
0x2d90…2daf at0008 = ╱4c╱L╱ // 0x2d98 @0x8
0x2d90…2daf at0009 = ╱ed╱(╱ // 0x2d99 @0x9
0x2d90…2daf at000a = ╱39╱9╱ // 0x2d9a @0xa
0x2d90…2daf at000b = ╱fe00009004╱ // 0x2d9b @0xb
0x2d90…2daf at0010 = ╱ec╱,╱ // 0x2da0 @0x10
0x2d90…2daf at0011 = ╱33╱3╱ // 0x2da1 @0x11
0x2d90…2daf at0012 = ╱30╱0╱ // 0x2da2 @0x12
0x2d90…2daf at0013 = ╱fe0000f005╱ // 0x2da3 @0x13
0x2d90…2daf at0018 = ╱ec╱,╱ // 0x2da8 @0x18
0x2d90…2daf at0019 = ╱4b╱K╱ // 0x2da9 @0x19
0x2d90…2daf at001a = ╱31╱1╱ // 0x2daa @0x1a
0x2d90…2daf at001b = ╱33╱3╱ // 0x2dab @0x1b
0x2d90…2daf at001c = ╱ef╱$╱ // 0x2dac @0x1c
0x2d90…2daf at001d = ╱ee╱)╱ // 0x2dad @0x1d
0x2d90…2daf at001e = EOL // 0x2dae @0x1e
0x2d90…2daf }
0x2daf…2dc5 bb1c 3850 GET K13$,20:DV$
0x2daf…2dc5 LineComalBin {
0x2daf…2dc5 ptr = 0xbb1c // 0x2daf @0x0
0x2daf…2dc5 lno = 0x0f0a // 0x2db1 @0x2
0x2daf…2dc5 at0004 = ╱a9╱ GET ╱ // 0x2db3 @0x4
0x2daf…2dc5 at0005 = ╱4b╱K╱ // 0x2db4 @0x5
0x2daf…2dc5 at0006 = ╱31╱1╱ // 0x2db5 @0x6
0x2daf…2dc5 at0007 = ╱33╱3╱ // 0x2db6 @0x7
0x2daf…2dc5 at0008 = ╱ef╱$╱ // 0x2db7 @0x8
0x2daf…2dc5 at0009 = ╱ec╱,╱ // 0x2db8 @0x9
0x2daf…2dc5 at000a = ╱32╱2╱ // 0x2db9 @0xa
0x2daf…2dc5 at000b = ╱30╱0╱ // 0x2dba @0xb
0x2daf…2dc5 at000c = ╱fe0000a005╱ // 0x2dbb @0xc
0x2daf…2dc5 at0011 = ╱f0╱:╱ // 0x2dc0 @0x11
0x2daf…2dc5 at0012 = ╱44╱D╱ // 0x2dc1 @0x12
0x2daf…2dc5 at0013 = ╱56╱V╱ // 0x2dc2 @0x13
0x2daf…2dc5 at0014 = ╱ef╱$╱ // 0x2dc3 @0x14
0x2daf…2dc5 at0015 = EOL // 0x2dc4 @0x15
0x2daf…2dc5 }
0x2dc5…2de5 bb3c 3860 EXEC FEJL(10,50,K13$)
0x2dc5…2de5 LineComalBin {
0x2dc5…2de5 ptr = 0xbb3c // 0x2dc5 @0x0
0x2dc5…2de5 lno = 0x0f14 // 0x2dc7 @0x2
0x2dc5…2de5 at0004 = ╱9d╱ EXEC ╱ // 0x2dc9 @0x4
0x2dc5…2de5 at0005 = ╱46╱F╱ // 0x2dca @0x5
0x2dc5…2de5 at0006 = ╱45╱E╱ // 0x2dcb @0x6
0x2dc5…2de5 at0007 = ╱4a╱J╱ // 0x2dcc @0x7
0x2dc5…2de5 at0008 = ╱4c╱L╱ // 0x2dcd @0x8
0x2dc5…2de5 at0009 = ╱ed╱(╱ // 0x2dce @0x9
0x2dc5…2de5 at000a = ╱31╱1╱ // 0x2dcf @0xa
0x2dc5…2de5 at000b = ╱30╱0╱ // 0x2dd0 @0xb
0x2dc5…2de5 at000c = ╱fe0000a004╱ // 0x2dd1 @0xc
0x2dc5…2de5 at0011 = ╱ec╱,╱ // 0x2dd6 @0x11
0x2dc5…2de5 at0012 = ╱35╱5╱ // 0x2dd7 @0x12
0x2dc5…2de5 at0013 = ╱30╱0╱ // 0x2dd8 @0x13
0x2dc5…2de5 at0014 = ╱fe0000c806╱ // 0x2dd9 @0x14
0x2dc5…2de5 at0019 = ╱ec╱,╱ // 0x2dde @0x19
0x2dc5…2de5 at001a = ╱4b╱K╱ // 0x2ddf @0x1a
0x2dc5…2de5 at001b = ╱31╱1╱ // 0x2de0 @0x1b
0x2dc5…2de5 at001c = ╱33╱3╱ // 0x2de1 @0x1c
0x2dc5…2de5 at001d = ╱ef╱$╱ // 0x2de2 @0x1d
0x2dc5…2de5 at001e = ╱ee╱)╱ // 0x2de3 @0x1e
0x2dc5…2de5 at001f = EOL // 0x2de4 @0x1f
0x2dc5…2de5 }
0x2de5…2e5a bbb1 3870 GET K13$,21:T4(1),T4(2),T4(3),T4(4),T4(5),T4(6),T4(7),T4(8),T4(9)
0x2de5…2e5a LineComalBin {
0x2de5…2e5a ptr = 0xbbb1 // 0x2de5 @0x0
0x2de5…2e5a lno = 0x0f1e // 0x2de7 @0x2
0x2de5…2e5a at0004 = ╱a9╱ GET ╱ // 0x2de9 @0x4
0x2de5…2e5a at0005 = ╱4b╱K╱ // 0x2dea @0x5
0x2de5…2e5a at0006 = ╱31╱1╱ // 0x2deb @0x6
0x2de5…2e5a at0007 = ╱33╱3╱ // 0x2dec @0x7
0x2de5…2e5a at0008 = ╱ef╱$╱ // 0x2ded @0x8
0x2de5…2e5a at0009 = ╱ec╱,╱ // 0x2dee @0x9
0x2de5…2e5a at000a = ╱32╱2╱ // 0x2def @0xa
0x2de5…2e5a at000b = ╱31╱1╱ // 0x2df0 @0xb
0x2de5…2e5a at000c = ╱fe0000a805╱ // 0x2df1 @0xc
0x2de5…2e5a at0011 = ╱f0╱:╱ // 0x2df6 @0x11
0x2de5…2e5a at0012 = ╱54╱T╱ // 0x2df7 @0x12
0x2de5…2e5a at0013 = ╱34╱4╱ // 0x2df8 @0x13
0x2de5…2e5a at0014 = ╱ed╱(╱ // 0x2df9 @0x14
0x2de5…2e5a at0015 = ╱31╱1╱ // 0x2dfa @0x15
0x2de5…2e5a at0016 = ╱fe00008001╱ // 0x2dfb @0x16
0x2de5…2e5a at001b = ╱ee╱)╱ // 0x2e00 @0x1b
0x2de5…2e5a at001c = ╱ec╱,╱ // 0x2e01 @0x1c
0x2de5…2e5a at001d = ╱54╱T╱ // 0x2e02 @0x1d
0x2de5…2e5a at001e = ╱34╱4╱ // 0x2e03 @0x1e
0x2de5…2e5a at001f = ╱ed╱(╱ // 0x2e04 @0x1f
0x2de5…2e5a at0020 = ╱32╱2╱ // 0x2e05 @0x20
0x2de5…2e5a at0021 = ╱fe00008002╱ // 0x2e06 @0x21
0x2de5…2e5a at0026 = ╱ee╱)╱ // 0x2e0b @0x26
0x2de5…2e5a at0027 = ╱ec╱,╱ // 0x2e0c @0x27
0x2de5…2e5a at0028 = ╱54╱T╱ // 0x2e0d @0x28
0x2de5…2e5a at0029 = ╱34╱4╱ // 0x2e0e @0x29
0x2de5…2e5a at002a = ╱ed╱(╱ // 0x2e0f @0x2a
0x2de5…2e5a at002b = ╱33╱3╱ // 0x2e10 @0x2b
0x2de5…2e5a at002c = ╱fe0000c002╱ // 0x2e11 @0x2c
0x2de5…2e5a at0031 = ╱ee╱)╱ // 0x2e16 @0x31
0x2de5…2e5a at0032 = ╱ec╱,╱ // 0x2e17 @0x32
0x2de5…2e5a at0033 = ╱54╱T╱ // 0x2e18 @0x33
0x2de5…2e5a at0034 = ╱34╱4╱ // 0x2e19 @0x34
0x2de5…2e5a at0035 = ╱ed╱(╱ // 0x2e1a @0x35
0x2de5…2e5a at0036 = ╱34╱4╱ // 0x2e1b @0x36
0x2de5…2e5a at0037 = ╱fe00008003╱ // 0x2e1c @0x37
0x2de5…2e5a at003c = ╱ee╱)╱ // 0x2e21 @0x3c
0x2de5…2e5a at003d = ╱ec╱,╱ // 0x2e22 @0x3d
0x2de5…2e5a at003e = ╱54╱T╱ // 0x2e23 @0x3e
0x2de5…2e5a at003f = ╱34╱4╱ // 0x2e24 @0x3f
0x2de5…2e5a at0040 = ╱ed╱(╱ // 0x2e25 @0x40
0x2de5…2e5a at0041 = ╱35╱5╱ // 0x2e26 @0x41
0x2de5…2e5a at0042 = ╱fe0000a003╱ // 0x2e27 @0x42
0x2de5…2e5a at0047 = ╱ee╱)╱ // 0x2e2c @0x47
0x2de5…2e5a at0048 = ╱ec╱,╱ // 0x2e2d @0x48
0x2de5…2e5a at0049 = ╱54╱T╱ // 0x2e2e @0x49
0x2de5…2e5a at004a = ╱34╱4╱ // 0x2e2f @0x4a
0x2de5…2e5a at004b = ╱ed╱(╱ // 0x2e30 @0x4b
0x2de5…2e5a at004c = ╱36╱6╱ // 0x2e31 @0x4c
0x2de5…2e5a at004d = ╱fe0000c003╱ // 0x2e32 @0x4d
0x2de5…2e5a at0052 = ╱ee╱)╱ // 0x2e37 @0x52
0x2de5…2e5a at0053 = ╱ec╱,╱ // 0x2e38 @0x53
0x2de5…2e5a at0054 = ╱54╱T╱ // 0x2e39 @0x54
0x2de5…2e5a at0055 = ╱34╱4╱ // 0x2e3a @0x55
0x2de5…2e5a at0056 = ╱ed╱(╱ // 0x2e3b @0x56
0x2de5…2e5a at0057 = ╱37╱7╱ // 0x2e3c @0x57
0x2de5…2e5a at0058 = ╱fe0000e003╱ // 0x2e3d @0x58
0x2de5…2e5a at005d = ╱ee╱)╱ // 0x2e42 @0x5d
0x2de5…2e5a at005e = ╱ec╱,╱ // 0x2e43 @0x5e
0x2de5…2e5a at005f = ╱54╱T╱ // 0x2e44 @0x5f
0x2de5…2e5a at0060 = ╱34╱4╱ // 0x2e45 @0x60
0x2de5…2e5a at0061 = ╱ed╱(╱ // 0x2e46 @0x61
0x2de5…2e5a at0062 = ╱38╱8╱ // 0x2e47 @0x62
0x2de5…2e5a at0063 = ╱fe00008004╱ // 0x2e48 @0x63
0x2de5…2e5a at0068 = ╱ee╱)╱ // 0x2e4d @0x68
0x2de5…2e5a at0069 = ╱ec╱,╱ // 0x2e4e @0x69
0x2de5…2e5a at006a = ╱54╱T╱ // 0x2e4f @0x6a
0x2de5…2e5a at006b = ╱34╱4╱ // 0x2e50 @0x6b
0x2de5…2e5a at006c = ╱ed╱(╱ // 0x2e51 @0x6c
0x2de5…2e5a at006d = ╱39╱9╱ // 0x2e52 @0x6d
0x2de5…2e5a at006e = ╱fe00009004╱ // 0x2e53 @0x6e
0x2de5…2e5a at0073 = ╱ee╱)╱ // 0x2e58 @0x73
0x2de5…2e5a at0074 = EOL // 0x2e59 @0x74
0x2de5…2e5a }
0x2e5a…2e79 bbd0 3880 EXEC FEJL(20,6,K13$)
0x2e5a…2e79 LineComalBin {
0x2e5a…2e79 ptr = 0xbbd0 // 0x2e5a @0x0
0x2e5a…2e79 lno = 0x0f28 // 0x2e5c @0x2
0x2e5a…2e79 at0004 = ╱9d╱ EXEC ╱ // 0x2e5e @0x4
0x2e5a…2e79 at0005 = ╱46╱F╱ // 0x2e5f @0x5
0x2e5a…2e79 at0006 = ╱45╱E╱ // 0x2e60 @0x6
0x2e5a…2e79 at0007 = ╱4a╱J╱ // 0x2e61 @0x7
0x2e5a…2e79 at0008 = ╱4c╱L╱ // 0x2e62 @0x8
0x2e5a…2e79 at0009 = ╱ed╱(╱ // 0x2e63 @0x9
0x2e5a…2e79 at000a = ╱32╱2╱ // 0x2e64 @0xa
0x2e5a…2e79 at000b = ╱30╱0╱ // 0x2e65 @0xb
0x2e5a…2e79 at000c = ╱fe0000a005╱ // 0x2e66 @0xc
0x2e5a…2e79 at0011 = ╱ec╱,╱ // 0x2e6b @0x11
0x2e5a…2e79 at0012 = ╱36╱6╱ // 0x2e6c @0x12
0x2e5a…2e79 at0013 = ╱fe0000c003╱ // 0x2e6d @0x13
0x2e5a…2e79 at0018 = ╱ec╱,╱ // 0x2e72 @0x18
0x2e5a…2e79 at0019 = ╱4b╱K╱ // 0x2e73 @0x19
0x2e5a…2e79 at001a = ╱31╱1╱ // 0x2e74 @0x1a
0x2e5a…2e79 at001b = ╱33╱3╱ // 0x2e75 @0x1b
0x2e5a…2e79 at001c = ╱ef╱$╱ // 0x2e76 @0x1c
0x2e5a…2e79 at001d = ╱ee╱)╱ // 0x2e77 @0x1d
0x2e5a…2e79 at001e = EOL // 0x2e78 @0x1e
0x2e5a…2e79 }
0x2e79…2e83 bbda 3890 CLOSE K13$
0x2e79…2e83 LineComalBin {
0x2e79…2e83 ptr = 0xbbda // 0x2e79 @0x0
0x2e79…2e83 lno = 0x0f32 // 0x2e7b @0x2
0x2e79…2e83 at0004 = ╱a8╱ CLOSE ╱ // 0x2e7d @0x4
0x2e79…2e83 at0005 = ╱4b╱K╱ // 0x2e7e @0x5
0x2e79…2e83 at0006 = ╱31╱1╱ // 0x2e7f @0x6
0x2e79…2e83 at0007 = ╱33╱3╱ // 0x2e80 @0x7
0x2e79…2e83 at0008 = ╱ef╱$╱ // 0x2e81 @0x8
0x2e79…2e83 at0009 = EOL // 0x2e82 @0x9
0x2e79…2e83 }
0x2e83…2ea2 bbf9 3900 EXEC FEJL(9,31,K13$)
0x2e83…2ea2 LineComalBin {
0x2e83…2ea2 ptr = 0xbbf9 // 0x2e83 @0x0
0x2e83…2ea2 lno = 0x0f3c // 0x2e85 @0x2
0x2e83…2ea2 at0004 = ╱9d╱ EXEC ╱ // 0x2e87 @0x4
0x2e83…2ea2 at0005 = ╱46╱F╱ // 0x2e88 @0x5
0x2e83…2ea2 at0006 = ╱45╱E╱ // 0x2e89 @0x6
0x2e83…2ea2 at0007 = ╱4a╱J╱ // 0x2e8a @0x7
0x2e83…2ea2 at0008 = ╱4c╱L╱ // 0x2e8b @0x8
0x2e83…2ea2 at0009 = ╱ed╱(╱ // 0x2e8c @0x9
0x2e83…2ea2 at000a = ╱39╱9╱ // 0x2e8d @0xa
0x2e83…2ea2 at000b = ╱fe00009004╱ // 0x2e8e @0xb
0x2e83…2ea2 at0010 = ╱ec╱,╱ // 0x2e93 @0x10
0x2e83…2ea2 at0011 = ╱33╱3╱ // 0x2e94 @0x11
0x2e83…2ea2 at0012 = ╱31╱1╱ // 0x2e95 @0x12
0x2e83…2ea2 at0013 = ╱fe0000f805╱ // 0x2e96 @0x13
0x2e83…2ea2 at0018 = ╱ec╱,╱ // 0x2e9b @0x18
0x2e83…2ea2 at0019 = ╱4b╱K╱ // 0x2e9c @0x19
0x2e83…2ea2 at001a = ╱31╱1╱ // 0x2e9d @0x1a
0x2e83…2ea2 at001b = ╱33╱3╱ // 0x2e9e @0x1b
0x2e83…2ea2 at001c = ╱ef╱$╱ // 0x2e9f @0x1c
0x2e83…2ea2 at001d = ╱ee╱)╱ // 0x2ea0 @0x1d
0x2e83…2ea2 at001e = EOL // 0x2ea1 @0x1e
0x2e83…2ea2 }
0x2ea2…2eb3 bc0a 3910 TAL3$="100+"
0x2ea2…2eb3 LineComalBin {
0x2ea2…2eb3 ptr = 0xbc0a // 0x2ea2 @0x0
0x2ea2…2eb3 lno = 0x0f46 // 0x2ea4 @0x2
0x2ea2…2eb3 at0004 = ╱54╱T╱ // 0x2ea6 @0x4
0x2ea2…2eb3 at0005 = ╱41╱A╱ // 0x2ea7 @0x5
0x2ea2…2eb3 at0006 = ╱4c╱L╱ // 0x2ea8 @0x6
0x2ea2…2eb3 at0007 = ╱33╱3╱ // 0x2ea9 @0x7
0x2ea2…2eb3 at0008 = ╱ef╱$╱ // 0x2eaa @0x8
0x2ea2…2eb3 at0009 = ╱dc╱=╱ // 0x2eab @0x9
0x2ea2…2eb3 at000a = ╱22╱"╱ // 0x2eac @0xa
0x2ea2…2eb3 at000b = ╱31╱1╱ // 0x2ead @0xb
0x2ea2…2eb3 at000c = ╱30╱0╱ // 0x2eae @0xc
0x2ea2…2eb3 at000d = ╱30╱0╱ // 0x2eaf @0xd
0x2ea2…2eb3 at000e = ╱2b╱+╱ // 0x2eb0 @0xe
0x2ea2…2eb3 at000f = ╱22╱"╱ // 0x2eb1 @0xf
0x2ea2…2eb3 at0010 = EOL // 0x2eb2 @0x10
0x2ea2…2eb3 }
0x2eb3…2ed8 bc2f 3920 EXEC CALC(0,TAL3$,MOMS$,DMOMS$)
0x2eb3…2ed8 LineComalBin {
0x2eb3…2ed8 ptr = 0xbc2f // 0x2eb3 @0x0
0x2eb3…2ed8 lno = 0x0f50 // 0x2eb5 @0x2
0x2eb3…2ed8 at0004 = ╱9d╱ EXEC ╱ // 0x2eb7 @0x4
0x2eb3…2ed8 at0005 = ╱43╱C╱ // 0x2eb8 @0x5
0x2eb3…2ed8 at0006 = ╱41╱A╱ // 0x2eb9 @0x6
0x2eb3…2ed8 at0007 = ╱4c╱L╱ // 0x2eba @0x7
0x2eb3…2ed8 at0008 = ╱43╱C╱ // 0x2ebb @0x8
0x2eb3…2ed8 at0009 = ╱ed╱(╱ // 0x2ebc @0x9
0x2eb3…2ed8 at000a = ╱30╱0╱ // 0x2ebd @0xa
0x2eb3…2ed8 at000b = ╱fe00000000╱ // 0x2ebe @0xb
0x2eb3…2ed8 at0010 = ╱ec╱,╱ // 0x2ec3 @0x10
0x2eb3…2ed8 at0011 = ╱54╱T╱ // 0x2ec4 @0x11
0x2eb3…2ed8 at0012 = ╱41╱A╱ // 0x2ec5 @0x12
0x2eb3…2ed8 at0013 = ╱4c╱L╱ // 0x2ec6 @0x13
0x2eb3…2ed8 at0014 = ╱33╱3╱ // 0x2ec7 @0x14
0x2eb3…2ed8 at0015 = ╱ef╱$╱ // 0x2ec8 @0x15
0x2eb3…2ed8 at0016 = ╱ec╱,╱ // 0x2ec9 @0x16
0x2eb3…2ed8 at0017 = ╱4d╱M╱ // 0x2eca @0x17
0x2eb3…2ed8 at0018 = ╱4f╱O╱ // 0x2ecb @0x18
0x2eb3…2ed8 at0019 = ╱4d╱M╱ // 0x2ecc @0x19
0x2eb3…2ed8 at001a = ╱53╱S╱ // 0x2ecd @0x1a
0x2eb3…2ed8 at001b = ╱ef╱$╱ // 0x2ece @0x1b
0x2eb3…2ed8 at001c = ╱ec╱,╱ // 0x2ecf @0x1c
0x2eb3…2ed8 at001d = ╱44╱D╱ // 0x2ed0 @0x1d
0x2eb3…2ed8 at001e = ╱4d╱M╱ // 0x2ed1 @0x1e
0x2eb3…2ed8 at001f = ╱4f╱O╱ // 0x2ed2 @0x1f
0x2eb3…2ed8 at0020 = ╱4d╱M╱ // 0x2ed3 @0x20
0x2eb3…2ed8 at0021 = ╱53╱S╱ // 0x2ed4 @0x21
0x2eb3…2ed8 at0022 = ╱ef╱$╱ // 0x2ed5 @0x22
0x2eb3…2ed8 at0023 = ╱ee╱)╱ // 0x2ed6 @0x23
0x2eb3…2ed8 at0024 = EOL // 0x2ed7 @0x24
0x2eb3…2ed8 }
0x2ed8…2f25 bc7c 3930 BLANK$=" "
0x2ed8…2f25 LineComalBin {
0x2ed8…2f25 ptr = 0xbc7c // 0x2ed8 @0x0
0x2ed8…2f25 lno = 0x0f5a // 0x2eda @0x2
0x2ed8…2f25 at0004 = ╱42╱B╱ // 0x2edc @0x4
0x2ed8…2f25 at0005 = ╱4c╱L╱ // 0x2edd @0x5
0x2ed8…2f25 at0006 = ╱41╱A╱ // 0x2ede @0x6
0x2ed8…2f25 at0007 = ╱4e╱N╱ // 0x2edf @0x7
0x2ed8…2f25 at0008 = ╱4b╱K╱ // 0x2ee0 @0x8
0x2ed8…2f25 at0009 = ╱ef╱$╱ // 0x2ee1 @0x9
0x2ed8…2f25 at000a = ╱dc╱=╱ // 0x2ee2 @0xa
0x2ed8…2f25 at000b = ╱22╱"╱ // 0x2ee3 @0xb
0x2ed8…2f25 at000c = ╱20╱…╱ // 0x2ee4 @0xc
0x2ed8…2f25 at000d = ╱20╱…╱ // 0x2ee5 @0xd
0x2ed8…2f25 at000e = ╱20╱…╱ // 0x2ee6 @0xe
0x2ed8…2f25 at000f = ╱20╱…╱ // 0x2ee7 @0xf
0x2ed8…2f25 at0010 = ╱20╱…╱ // 0x2ee8 @0x10
0x2ed8…2f25 at0011 = ╱20╱…╱ // 0x2ee9 @0x11
0x2ed8…2f25 at0012 = ╱20╱…╱ // 0x2eea @0x12
0x2ed8…2f25 at0013 = ╱20╱…╱ // 0x2eeb @0x13
0x2ed8…2f25 at0014 = ╱20╱…╱ // 0x2eec @0x14
0x2ed8…2f25 at0015 = ╱20╱…╱ // 0x2eed @0x15
0x2ed8…2f25 at0016 = ╱20╱…╱ // 0x2eee @0x16
0x2ed8…2f25 at0017 = ╱20╱…╱ // 0x2eef @0x17
0x2ed8…2f25 at0018 = ╱20╱…╱ // 0x2ef0 @0x18
0x2ed8…2f25 at0019 = ╱20╱…╱ // 0x2ef1 @0x19
0x2ed8…2f25 at001a = ╱20╱…╱ // 0x2ef2 @0x1a
0x2ed8…2f25 at001b = ╱20╱…╱ // 0x2ef3 @0x1b
0x2ed8…2f25 at001c = ╱20╱…╱ // 0x2ef4 @0x1c
0x2ed8…2f25 at001d = ╱20╱…╱ // 0x2ef5 @0x1d
0x2ed8…2f25 at001e = ╱20╱…╱ // 0x2ef6 @0x1e
0x2ed8…2f25 at001f = ╱20╱…╱ // 0x2ef7 @0x1f
0x2ed8…2f25 at0020 = ╱20╱…╱ // 0x2ef8 @0x20
0x2ed8…2f25 at0021 = ╱20╱…╱ // 0x2ef9 @0x21
0x2ed8…2f25 at0022 = ╱20╱…╱ // 0x2efa @0x22
0x2ed8…2f25 at0023 = ╱20╱…╱ // 0x2efb @0x23
0x2ed8…2f25 at0024 = ╱20╱…╱ // 0x2efc @0x24
0x2ed8…2f25 at0025 = ╱20╱…╱ // 0x2efd @0x25
0x2ed8…2f25 at0026 = ╱20╱…╱ // 0x2efe @0x26
0x2ed8…2f25 at0027 = ╱20╱…╱ // 0x2eff @0x27
0x2ed8…2f25 at0028 = ╱20╱…╱ // 0x2f00 @0x28
0x2ed8…2f25 at0029 = ╱20╱…╱ // 0x2f01 @0x29
0x2ed8…2f25 at002a = ╱20╱…╱ // 0x2f02 @0x2a
0x2ed8…2f25 at002b = ╱20╱…╱ // 0x2f03 @0x2b
0x2ed8…2f25 at002c = ╱20╱…╱ // 0x2f04 @0x2c
0x2ed8…2f25 at002d = ╱20╱…╱ // 0x2f05 @0x2d
0x2ed8…2f25 at002e = ╱20╱…╱ // 0x2f06 @0x2e
0x2ed8…2f25 at002f = ╱20╱…╱ // 0x2f07 @0x2f
0x2ed8…2f25 at0030 = ╱20╱…╱ // 0x2f08 @0x30
0x2ed8…2f25 at0031 = ╱20╱…╱ // 0x2f09 @0x31
0x2ed8…2f25 at0032 = ╱20╱…╱ // 0x2f0a @0x32
0x2ed8…2f25 at0033 = ╱20╱…╱ // 0x2f0b @0x33
0x2ed8…2f25 at0034 = ╱20╱…╱ // 0x2f0c @0x34
0x2ed8…2f25 at0035 = ╱20╱…╱ // 0x2f0d @0x35
0x2ed8…2f25 at0036 = ╱20╱…╱ // 0x2f0e @0x36
0x2ed8…2f25 at0037 = ╱20╱…╱ // 0x2f0f @0x37
0x2ed8…2f25 at0038 = ╱20╱…╱ // 0x2f10 @0x38
0x2ed8…2f25 at0039 = ╱20╱…╱ // 0x2f11 @0x39
0x2ed8…2f25 at003a = ╱20╱…╱ // 0x2f12 @0x3a
0x2ed8…2f25 at003b = ╱20╱…╱ // 0x2f13 @0x3b
0x2ed8…2f25 at003c = ╱20╱…╱ // 0x2f14 @0x3c
0x2ed8…2f25 at003d = ╱20╱…╱ // 0x2f15 @0x3d
0x2ed8…2f25 at003e = ╱20╱…╱ // 0x2f16 @0x3e
0x2ed8…2f25 at003f = ╱20╱…╱ // 0x2f17 @0x3f
0x2ed8…2f25 at0040 = ╱20╱…╱ // 0x2f18 @0x40
0x2ed8…2f25 at0041 = ╱20╱…╱ // 0x2f19 @0x41
0x2ed8…2f25 at0042 = ╱20╱…╱ // 0x2f1a @0x42
0x2ed8…2f25 at0043 = ╱20╱…╱ // 0x2f1b @0x43
0x2ed8…2f25 at0044 = ╱20╱…╱ // 0x2f1c @0x44
0x2ed8…2f25 at0045 = ╱20╱…╱ // 0x2f1d @0x45
0x2ed8…2f25 at0046 = ╱20╱…╱ // 0x2f1e @0x46
0x2ed8…2f25 at0047 = ╱20╱…╱ // 0x2f1f @0x47
0x2ed8…2f25 at0048 = ╱20╱…╱ // 0x2f20 @0x48
0x2ed8…2f25 at0049 = ╱20╱…╱ // 0x2f21 @0x49
0x2ed8…2f25 at004a = ╱20╱…╱ // 0x2f22 @0x4a
0x2ed8…2f25 at004b = ╱22╱"╱ // 0x2f23 @0x4b
0x2ed8…2f25 at004c = EOL // 0x2f24 @0x4c
0x2ed8…2f25 }
0x2f25…2f6e bcc5 3940 TAL4$="0+";SUM$="0+";STREG$="--------------------------------------"
0x2f25…2f6e LineComalBin {
0x2f25…2f6e ptr = 0xbcc5 // 0x2f25 @0x0
0x2f25…2f6e lno = 0x0f64 // 0x2f27 @0x2
0x2f25…2f6e at0004 = ╱54╱T╱ // 0x2f29 @0x4
0x2f25…2f6e at0005 = ╱41╱A╱ // 0x2f2a @0x5
0x2f25…2f6e at0006 = ╱4c╱L╱ // 0x2f2b @0x6
0x2f25…2f6e at0007 = ╱34╱4╱ // 0x2f2c @0x7
0x2f25…2f6e at0008 = ╱ef╱$╱ // 0x2f2d @0x8
0x2f25…2f6e at0009 = ╱dc╱=╱ // 0x2f2e @0x9
0x2f25…2f6e at000a = ╱22╱"╱ // 0x2f2f @0xa
0x2f25…2f6e at000b = ╱30╱0╱ // 0x2f30 @0xb
0x2f25…2f6e at000c = ╱2b╱+╱ // 0x2f31 @0xc
0x2f25…2f6e at000d = ╱22╱"╱ // 0x2f32 @0xd
0x2f25…2f6e at000e = ╱eb╱;╱ // 0x2f33 @0xe
0x2f25…2f6e at000f = ╱53╱S╱ // 0x2f34 @0xf
0x2f25…2f6e at0010 = ╱55╱U╱ // 0x2f35 @0x10
0x2f25…2f6e at0011 = ╱4d╱M╱ // 0x2f36 @0x11
0x2f25…2f6e at0012 = ╱ef╱$╱ // 0x2f37 @0x12
0x2f25…2f6e at0013 = ╱dc╱=╱ // 0x2f38 @0x13
0x2f25…2f6e at0014 = ╱22╱"╱ // 0x2f39 @0x14
0x2f25…2f6e at0015 = ╱30╱0╱ // 0x2f3a @0x15
0x2f25…2f6e at0016 = ╱2b╱+╱ // 0x2f3b @0x16
0x2f25…2f6e at0017 = ╱22╱"╱ // 0x2f3c @0x17
0x2f25…2f6e at0018 = ╱eb╱;╱ // 0x2f3d @0x18
0x2f25…2f6e at0019 = ╱53╱S╱ // 0x2f3e @0x19
0x2f25…2f6e at001a = ╱54╱T╱ // 0x2f3f @0x1a
0x2f25…2f6e at001b = ╱52╱R╱ // 0x2f40 @0x1b
0x2f25…2f6e at001c = ╱45╱E╱ // 0x2f41 @0x1c
0x2f25…2f6e at001d = ╱47╱G╱ // 0x2f42 @0x1d
0x2f25…2f6e at001e = ╱ef╱$╱ // 0x2f43 @0x1e
0x2f25…2f6e at001f = ╱dc╱=╱ // 0x2f44 @0x1f
0x2f25…2f6e at0020 = ╱22╱"╱ // 0x2f45 @0x20
0x2f25…2f6e at0021 = ╱2d╱-╱ // 0x2f46 @0x21
0x2f25…2f6e at0022 = ╱2d╱-╱ // 0x2f47 @0x22
0x2f25…2f6e at0023 = ╱2d╱-╱ // 0x2f48 @0x23
0x2f25…2f6e at0024 = ╱2d╱-╱ // 0x2f49 @0x24
0x2f25…2f6e at0025 = ╱2d╱-╱ // 0x2f4a @0x25
0x2f25…2f6e at0026 = ╱2d╱-╱ // 0x2f4b @0x26
0x2f25…2f6e at0027 = ╱2d╱-╱ // 0x2f4c @0x27
0x2f25…2f6e at0028 = ╱2d╱-╱ // 0x2f4d @0x28
0x2f25…2f6e at0029 = ╱2d╱-╱ // 0x2f4e @0x29
0x2f25…2f6e at002a = ╱2d╱-╱ // 0x2f4f @0x2a
0x2f25…2f6e at002b = ╱2d╱-╱ // 0x2f50 @0x2b
0x2f25…2f6e at002c = ╱2d╱-╱ // 0x2f51 @0x2c
0x2f25…2f6e at002d = ╱2d╱-╱ // 0x2f52 @0x2d
0x2f25…2f6e at002e = ╱2d╱-╱ // 0x2f53 @0x2e
0x2f25…2f6e at002f = ╱2d╱-╱ // 0x2f54 @0x2f
0x2f25…2f6e at0030 = ╱2d╱-╱ // 0x2f55 @0x30
0x2f25…2f6e at0031 = ╱2d╱-╱ // 0x2f56 @0x31
0x2f25…2f6e at0032 = ╱2d╱-╱ // 0x2f57 @0x32
0x2f25…2f6e at0033 = ╱2d╱-╱ // 0x2f58 @0x33
0x2f25…2f6e at0034 = ╱2d╱-╱ // 0x2f59 @0x34
0x2f25…2f6e at0035 = ╱2d╱-╱ // 0x2f5a @0x35
0x2f25…2f6e at0036 = ╱2d╱-╱ // 0x2f5b @0x36
0x2f25…2f6e at0037 = ╱2d╱-╱ // 0x2f5c @0x37
0x2f25…2f6e at0038 = ╱2d╱-╱ // 0x2f5d @0x38
0x2f25…2f6e at0039 = ╱2d╱-╱ // 0x2f5e @0x39
0x2f25…2f6e at003a = ╱2d╱-╱ // 0x2f5f @0x3a
0x2f25…2f6e at003b = ╱2d╱-╱ // 0x2f60 @0x3b
0x2f25…2f6e at003c = ╱2d╱-╱ // 0x2f61 @0x3c
0x2f25…2f6e at003d = ╱2d╱-╱ // 0x2f62 @0x3d
0x2f25…2f6e at003e = ╱2d╱-╱ // 0x2f63 @0x3e
0x2f25…2f6e at003f = ╱2d╱-╱ // 0x2f64 @0x3f
0x2f25…2f6e at0040 = ╱2d╱-╱ // 0x2f65 @0x40
0x2f25…2f6e at0041 = ╱2d╱-╱ // 0x2f66 @0x41
0x2f25…2f6e at0042 = ╱2d╱-╱ // 0x2f67 @0x42
0x2f25…2f6e at0043 = ╱2d╱-╱ // 0x2f68 @0x43
0x2f25…2f6e at0044 = ╱2d╱-╱ // 0x2f69 @0x44
0x2f25…2f6e at0045 = ╱2d╱-╱ // 0x2f6a @0x45
0x2f25…2f6e at0046 = ╱2d╱-╱ // 0x2f6b @0x46
0x2f25…2f6e at0047 = ╱22╱"╱ // 0x2f6c @0x47
0x2f25…2f6e at0048 = EOL // 0x2f6d @0x48
0x2f25…2f6e }
0x2f6e…2fb9 bd10 3950 STREG$=STREG$+STREG$+"-";TAH$="0+";BJSIDENR=T1(6);DATO=T1(7)
0x2f6e…2fb9 LineComalBin {
0x2f6e…2fb9 ptr = 0xbd10 // 0x2f6e @0x0
0x2f6e…2fb9 lno = 0x0f6e // 0x2f70 @0x2
0x2f6e…2fb9 at0004 = ╱53╱S╱ // 0x2f72 @0x4
0x2f6e…2fb9 at0005 = ╱54╱T╱ // 0x2f73 @0x5
0x2f6e…2fb9 at0006 = ╱52╱R╱ // 0x2f74 @0x6
0x2f6e…2fb9 at0007 = ╱45╱E╱ // 0x2f75 @0x7
0x2f6e…2fb9 at0008 = ╱47╱G╱ // 0x2f76 @0x8
0x2f6e…2fb9 at0009 = ╱ef╱$╱ // 0x2f77 @0x9
0x2f6e…2fb9 at000a = ╱dc╱=╱ // 0x2f78 @0xa
0x2f6e…2fb9 at000b = ╱53╱S╱ // 0x2f79 @0xb
0x2f6e…2fb9 at000c = ╱54╱T╱ // 0x2f7a @0xc
0x2f6e…2fb9 at000d = ╱52╱R╱ // 0x2f7b @0xd
0x2f6e…2fb9 at000e = ╱45╱E╱ // 0x2f7c @0xe
0x2f6e…2fb9 at000f = ╱47╱G╱ // 0x2f7d @0xf
0x2f6e…2fb9 at0010 = ╱ef╱$╱ // 0x2f7e @0x10
0x2f6e…2fb9 at0011 = ╱f1╱+╱ // 0x2f7f @0x11
0x2f6e…2fb9 at0012 = ╱53╱S╱ // 0x2f80 @0x12
0x2f6e…2fb9 at0013 = ╱54╱T╱ // 0x2f81 @0x13
0x2f6e…2fb9 at0014 = ╱52╱R╱ // 0x2f82 @0x14
0x2f6e…2fb9 at0015 = ╱45╱E╱ // 0x2f83 @0x15
0x2f6e…2fb9 at0016 = ╱47╱G╱ // 0x2f84 @0x16
0x2f6e…2fb9 at0017 = ╱ef╱$╱ // 0x2f85 @0x17
0x2f6e…2fb9 at0018 = ╱f1╱+╱ // 0x2f86 @0x18
0x2f6e…2fb9 at0019 = ╱22╱"╱ // 0x2f87 @0x19
0x2f6e…2fb9 at001a = ╱2d╱-╱ // 0x2f88 @0x1a
0x2f6e…2fb9 at001b = ╱22╱"╱ // 0x2f89 @0x1b
0x2f6e…2fb9 at001c = ╱eb╱;╱ // 0x2f8a @0x1c
0x2f6e…2fb9 at001d = ╱54╱T╱ // 0x2f8b @0x1d
0x2f6e…2fb9 at001e = ╱41╱A╱ // 0x2f8c @0x1e
0x2f6e…2fb9 at001f = ╱48╱H╱ // 0x2f8d @0x1f
0x2f6e…2fb9 at0020 = ╱ef╱$╱ // 0x2f8e @0x20
0x2f6e…2fb9 at0021 = ╱dc╱=╱ // 0x2f8f @0x21
0x2f6e…2fb9 at0022 = ╱22╱"╱ // 0x2f90 @0x22
0x2f6e…2fb9 at0023 = ╱30╱0╱ // 0x2f91 @0x23
0x2f6e…2fb9 at0024 = ╱2b╱+╱ // 0x2f92 @0x24
0x2f6e…2fb9 at0025 = ╱22╱"╱ // 0x2f93 @0x25
0x2f6e…2fb9 at0026 = ╱eb╱;╱ // 0x2f94 @0x26
0x2f6e…2fb9 at0027 = ╱42╱B╱ // 0x2f95 @0x27
0x2f6e…2fb9 at0028 = ╱4a╱J╱ // 0x2f96 @0x28
0x2f6e…2fb9 at0029 = ╱53╱S╱ // 0x2f97 @0x29
0x2f6e…2fb9 at002a = ╱49╱I╱ // 0x2f98 @0x2a
0x2f6e…2fb9 at002b = ╱44╱D╱ // 0x2f99 @0x2b
0x2f6e…2fb9 at002c = ╱45╱E╱ // 0x2f9a @0x2c
0x2f6e…2fb9 at002d = ╱4e╱N╱ // 0x2f9b @0x2d
0x2f6e…2fb9 at002e = ╱52╱R╱ // 0x2f9c @0x2e
0x2f6e…2fb9 at002f = ╱dc╱=╱ // 0x2f9d @0x2f
0x2f6e…2fb9 at0030 = ╱54╱T╱ // 0x2f9e @0x30
0x2f6e…2fb9 at0031 = ╱31╱1╱ // 0x2f9f @0x31
0x2f6e…2fb9 at0032 = ╱ed╱(╱ // 0x2fa0 @0x32
0x2f6e…2fb9 at0033 = ╱36╱6╱ // 0x2fa1 @0x33
0x2f6e…2fb9 at0034 = ╱fe0000c003╱ // 0x2fa2 @0x34
0x2f6e…2fb9 at0039 = ╱ee╱)╱ // 0x2fa7 @0x39
0x2f6e…2fb9 at003a = ╱eb╱;╱ // 0x2fa8 @0x3a
0x2f6e…2fb9 at003b = ╱44╱D╱ // 0x2fa9 @0x3b
0x2f6e…2fb9 at003c = ╱41╱A╱ // 0x2faa @0x3c
0x2f6e…2fb9 at003d = ╱54╱T╱ // 0x2fab @0x3d
0x2f6e…2fb9 at003e = ╱4f╱O╱ // 0x2fac @0x3e
0x2f6e…2fb9 at003f = ╱dc╱=╱ // 0x2fad @0x3f
0x2f6e…2fb9 at0040 = ╱54╱T╱ // 0x2fae @0x40
0x2f6e…2fb9 at0041 = ╱31╱1╱ // 0x2faf @0x41
0x2f6e…2fb9 at0042 = ╱ed╱(╱ // 0x2fb0 @0x42
0x2f6e…2fb9 at0043 = ╱37╱7╱ // 0x2fb1 @0x43
0x2f6e…2fb9 at0044 = ╱fe0000e003╱ // 0x2fb2 @0x44
0x2f6e…2fb9 at0049 = ╱ee╱)╱ // 0x2fb7 @0x49
0x2f6e…2fb9 at004a = EOL // 0x2fb8 @0x4a
0x2f6e…2fb9 }
0x2fb9…301d bd74 3960 BHPOSTNR=T3(1);FAKPOSTNR=T2(3);FMIDNR=T3(2);DMIDNR=T3(3);KRMIDNR=T3(4)
0x2fb9…301d LineComalBin {
0x2fb9…301d ptr = 0xbd74 // 0x2fb9 @0x0
0x2fb9…301d lno = 0x0f78 // 0x2fbb @0x2
0x2fb9…301d at0004 = ╱42╱B╱ // 0x2fbd @0x4
0x2fb9…301d at0005 = ╱48╱H╱ // 0x2fbe @0x5
0x2fb9…301d at0006 = ╱50╱P╱ // 0x2fbf @0x6
0x2fb9…301d at0007 = ╱4f╱O╱ // 0x2fc0 @0x7
0x2fb9…301d at0008 = ╱53╱S╱ // 0x2fc1 @0x8
0x2fb9…301d at0009 = ╱54╱T╱ // 0x2fc2 @0x9
0x2fb9…301d at000a = ╱4e╱N╱ // 0x2fc3 @0xa
0x2fb9…301d at000b = ╱52╱R╱ // 0x2fc4 @0xb
0x2fb9…301d at000c = ╱dc╱=╱ // 0x2fc5 @0xc
0x2fb9…301d at000d = ╱54╱T╱ // 0x2fc6 @0xd
0x2fb9…301d at000e = ╱33╱3╱ // 0x2fc7 @0xe
0x2fb9…301d at000f = ╱ed╱(╱ // 0x2fc8 @0xf
0x2fb9…301d at0010 = ╱31╱1╱ // 0x2fc9 @0x10
0x2fb9…301d at0011 = ╱fe00008001╱ // 0x2fca @0x11
0x2fb9…301d at0016 = ╱ee╱)╱ // 0x2fcf @0x16
0x2fb9…301d at0017 = ╱eb╱;╱ // 0x2fd0 @0x17
0x2fb9…301d at0018 = ╱46╱F╱ // 0x2fd1 @0x18
0x2fb9…301d at0019 = ╱41╱A╱ // 0x2fd2 @0x19
0x2fb9…301d at001a = ╱4b╱K╱ // 0x2fd3 @0x1a
0x2fb9…301d at001b = ╱50╱P╱ // 0x2fd4 @0x1b
0x2fb9…301d at001c = ╱4f╱O╱ // 0x2fd5 @0x1c
0x2fb9…301d at001d = ╱53╱S╱ // 0x2fd6 @0x1d
0x2fb9…301d at001e = ╱54╱T╱ // 0x2fd7 @0x1e
0x2fb9…301d at001f = ╱4e╱N╱ // 0x2fd8 @0x1f
0x2fb9…301d at0020 = ╱52╱R╱ // 0x2fd9 @0x20
0x2fb9…301d at0021 = ╱dc╱=╱ // 0x2fda @0x21
0x2fb9…301d at0022 = ╱54╱T╱ // 0x2fdb @0x22
0x2fb9…301d at0023 = ╱32╱2╱ // 0x2fdc @0x23
0x2fb9…301d at0024 = ╱ed╱(╱ // 0x2fdd @0x24
0x2fb9…301d at0025 = ╱33╱3╱ // 0x2fde @0x25
0x2fb9…301d at0026 = ╱fe0000c002╱ // 0x2fdf @0x26
0x2fb9…301d at002b = ╱ee╱)╱ // 0x2fe4 @0x2b
0x2fb9…301d at002c = ╱eb╱;╱ // 0x2fe5 @0x2c
0x2fb9…301d at002d = ╱46╱F╱ // 0x2fe6 @0x2d
0x2fb9…301d at002e = ╱4d╱M╱ // 0x2fe7 @0x2e
0x2fb9…301d at002f = ╱49╱I╱ // 0x2fe8 @0x2f
0x2fb9…301d at0030 = ╱44╱D╱ // 0x2fe9 @0x30
0x2fb9…301d at0031 = ╱4e╱N╱ // 0x2fea @0x31
0x2fb9…301d at0032 = ╱52╱R╱ // 0x2feb @0x32
0x2fb9…301d at0033 = ╱dc╱=╱ // 0x2fec @0x33
0x2fb9…301d at0034 = ╱54╱T╱ // 0x2fed @0x34
0x2fb9…301d at0035 = ╱33╱3╱ // 0x2fee @0x35
0x2fb9…301d at0036 = ╱ed╱(╱ // 0x2fef @0x36
0x2fb9…301d at0037 = ╱32╱2╱ // 0x2ff0 @0x37
0x2fb9…301d at0038 = ╱fe00008002╱ // 0x2ff1 @0x38
0x2fb9…301d at003d = ╱ee╱)╱ // 0x2ff6 @0x3d
0x2fb9…301d at003e = ╱eb╱;╱ // 0x2ff7 @0x3e
0x2fb9…301d at003f = ╱44╱D╱ // 0x2ff8 @0x3f
0x2fb9…301d at0040 = ╱4d╱M╱ // 0x2ff9 @0x40
0x2fb9…301d at0041 = ╱49╱I╱ // 0x2ffa @0x41
0x2fb9…301d at0042 = ╱44╱D╱ // 0x2ffb @0x42
0x2fb9…301d at0043 = ╱4e╱N╱ // 0x2ffc @0x43
0x2fb9…301d at0044 = ╱52╱R╱ // 0x2ffd @0x44
0x2fb9…301d at0045 = ╱dc╱=╱ // 0x2ffe @0x45
0x2fb9…301d at0046 = ╱54╱T╱ // 0x2fff @0x46
0x2fb9…301d at0047 = ╱33╱3╱ // 0x3000 @0x47
0x2fb9…301d at0048 = ╱ed╱(╱ // 0x3001 @0x48
0x2fb9…301d at0049 = ╱33╱3╱ // 0x3002 @0x49
0x2fb9…301d at004a = ╱fe0000c002╱ // 0x3003 @0x4a
0x2fb9…301d at004f = ╱ee╱)╱ // 0x3008 @0x4f
0x2fb9…301d at0050 = ╱eb╱;╱ // 0x3009 @0x50
0x2fb9…301d at0051 = ╱4b╱K╱ // 0x300a @0x51
0x2fb9…301d at0052 = ╱52╱R╱ // 0x300b @0x52
0x2fb9…301d at0053 = ╱4d╱M╱ // 0x300c @0x53
0x2fb9…301d at0054 = ╱49╱I╱ // 0x300d @0x54
0x2fb9…301d at0055 = ╱44╱D╱ // 0x300e @0x55
0x2fb9…301d at0056 = ╱4e╱N╱ // 0x300f @0x56
0x2fb9…301d at0057 = ╱52╱R╱ // 0x3010 @0x57
0x2fb9…301d at0058 = ╱dc╱=╱ // 0x3011 @0x58
0x2fb9…301d at0059 = ╱54╱T╱ // 0x3012 @0x59
0x2fb9…301d at005a = ╱33╱3╱ // 0x3013 @0x5a
0x2fb9…301d at005b = ╱ed╱(╱ // 0x3014 @0x5b
0x2fb9…301d at005c = ╱34╱4╱ // 0x3015 @0x5c
0x2fb9…301d at005d = ╱fe00008003╱ // 0x3016 @0x5d
0x2fb9…301d at0062 = ╱ee╱)╱ // 0x301b @0x62
0x2fb9…301d at0063 = EOL // 0x301c @0x63
0x2fb9…301d }
0x301d…3033 bd8a 3970 EMIDNR=T4(4)
0x301d…3033 LineComalBin {
0x301d…3033 ptr = 0xbd8a // 0x301d @0x0
0x301d…3033 lno = 0x0f82 // 0x301f @0x2
0x301d…3033 at0004 = ╱45╱E╱ // 0x3021 @0x4
0x301d…3033 at0005 = ╱4d╱M╱ // 0x3022 @0x5
0x301d…3033 at0006 = ╱49╱I╱ // 0x3023 @0x6
0x301d…3033 at0007 = ╱44╱D╱ // 0x3024 @0x7
0x301d…3033 at0008 = ╱4e╱N╱ // 0x3025 @0x8
0x301d…3033 at0009 = ╱52╱R╱ // 0x3026 @0x9
0x301d…3033 at000a = ╱dc╱=╱ // 0x3027 @0xa
0x301d…3033 at000b = ╱54╱T╱ // 0x3028 @0xb
0x301d…3033 at000c = ╱34╱4╱ // 0x3029 @0xc
0x301d…3033 at000d = ╱ed╱(╱ // 0x302a @0xd
0x301d…3033 at000e = ╱34╱4╱ // 0x302b @0xe
0x301d…3033 at000f = ╱fe00008003╱ // 0x302c @0xf
0x301d…3033 at0014 = ╱ee╱)╱ // 0x3031 @0x14
0x301d…3033 at0015 = EOL // 0x3032 @0x15
0x301d…3033 }
0x3033…303e bd95 3980 OPEN K2$,R
0x3033…303e LineComalBin {
0x3033…303e ptr = 0xbd95 // 0x3033 @0x0
0x3033…303e lno = 0x0f8c // 0x3035 @0x2
0x3033…303e at0004 = ╱a7╱ OPEN ╱ // 0x3037 @0x4
0x3033…303e at0005 = ╱4b╱K╱ // 0x3038 @0x5
0x3033…303e at0006 = ╱32╱2╱ // 0x3039 @0x6
0x3033…303e at0007 = ╱ef╱$╱ // 0x303a @0x7
0x3033…303e at0008 = ╱ec╱,╱ // 0x303b @0x8
0x3033…303e at0009 = ╱52╱R╱ // 0x303c @0x9
0x3033…303e at000a = EOL // 0x303d @0xa
0x3033…303e }
0x303e…305c bdb3 3990 EXEC FEJL(9,32,K2$)
0x303e…305c LineComalBin {
0x303e…305c ptr = 0xbdb3 // 0x303e @0x0
0x303e…305c lno = 0x0f96 // 0x3040 @0x2
0x303e…305c at0004 = ╱9d╱ EXEC ╱ // 0x3042 @0x4
0x303e…305c at0005 = ╱46╱F╱ // 0x3043 @0x5
0x303e…305c at0006 = ╱45╱E╱ // 0x3044 @0x6
0x303e…305c at0007 = ╱4a╱J╱ // 0x3045 @0x7
0x303e…305c at0008 = ╱4c╱L╱ // 0x3046 @0x8
0x303e…305c at0009 = ╱ed╱(╱ // 0x3047 @0x9
0x303e…305c at000a = ╱39╱9╱ // 0x3048 @0xa
0x303e…305c at000b = ╱fe00009004╱ // 0x3049 @0xb
0x303e…305c at0010 = ╱ec╱,╱ // 0x304e @0x10
0x303e…305c at0011 = ╱33╱3╱ // 0x304f @0x11
0x303e…305c at0012 = ╱32╱2╱ // 0x3050 @0x12
0x303e…305c at0013 = ╱fe00008006╱ // 0x3051 @0x13
0x303e…305c at0018 = ╱ec╱,╱ // 0x3056 @0x18
0x303e…305c at0019 = ╱4b╱K╱ // 0x3057 @0x19
0x303e…305c at001a = ╱32╱2╱ // 0x3058 @0x1a
0x303e…305c at001b = ╱ef╱$╱ // 0x3059 @0x1b
0x303e…305c at001c = ╱ee╱)╱ // 0x305a @0x1c
0x303e…305c at001d = EOL // 0x305b @0x1d
0x303e…305c }
0x305c…3067 bdbe 4000 OPEN K3$,R
0x305c…3067 LineComalBin {
0x305c…3067 ptr = 0xbdbe // 0x305c @0x0
0x305c…3067 lno = 0x0fa0 // 0x305e @0x2
0x305c…3067 at0004 = ╱a7╱ OPEN ╱ // 0x3060 @0x4
0x305c…3067 at0005 = ╱4b╱K╱ // 0x3061 @0x5
0x305c…3067 at0006 = ╱33╱3╱ // 0x3062 @0x6
0x305c…3067 at0007 = ╱ef╱$╱ // 0x3063 @0x7
0x305c…3067 at0008 = ╱ec╱,╱ // 0x3064 @0x8
0x305c…3067 at0009 = ╱52╱R╱ // 0x3065 @0x9
0x305c…3067 at000a = EOL // 0x3066 @0xa
0x305c…3067 }
0x3067…3085 bddc 4010 EXEC FEJL(9,33,K3$)
0x3067…3085 LineComalBin {
0x3067…3085 ptr = 0xbddc // 0x3067 @0x0
0x3067…3085 lno = 0x0faa // 0x3069 @0x2
0x3067…3085 at0004 = ╱9d╱ EXEC ╱ // 0x306b @0x4
0x3067…3085 at0005 = ╱46╱F╱ // 0x306c @0x5
0x3067…3085 at0006 = ╱45╱E╱ // 0x306d @0x6
0x3067…3085 at0007 = ╱4a╱J╱ // 0x306e @0x7
0x3067…3085 at0008 = ╱4c╱L╱ // 0x306f @0x8
0x3067…3085 at0009 = ╱ed╱(╱ // 0x3070 @0x9
0x3067…3085 at000a = ╱39╱9╱ // 0x3071 @0xa
0x3067…3085 at000b = ╱fe00009004╱ // 0x3072 @0xb
0x3067…3085 at0010 = ╱ec╱,╱ // 0x3077 @0x10
0x3067…3085 at0011 = ╱33╱3╱ // 0x3078 @0x11
0x3067…3085 at0012 = ╱33╱3╱ // 0x3079 @0x12
0x3067…3085 at0013 = ╱fe00008406╱ // 0x307a @0x13
0x3067…3085 at0018 = ╱ec╱,╱ // 0x307f @0x18
0x3067…3085 at0019 = ╱4b╱K╱ // 0x3080 @0x19
0x3067…3085 at001a = ╱33╱3╱ // 0x3081 @0x1a
0x3067…3085 at001b = ╱ef╱$╱ // 0x3082 @0x1b
0x3067…3085 at001c = ╱ee╱)╱ // 0x3083 @0x1c
0x3067…3085 at001d = EOL // 0x3084 @0x1d
0x3067…3085 }
0x3085…3090 bde7 4020 OPEN K4$,R
0x3085…3090 LineComalBin {
0x3085…3090 ptr = 0xbde7 // 0x3085 @0x0
0x3085…3090 lno = 0x0fb4 // 0x3087 @0x2
0x3085…3090 at0004 = ╱a7╱ OPEN ╱ // 0x3089 @0x4
0x3085…3090 at0005 = ╱4b╱K╱ // 0x308a @0x5
0x3085…3090 at0006 = ╱34╱4╱ // 0x308b @0x6
0x3085…3090 at0007 = ╱ef╱$╱ // 0x308c @0x7
0x3085…3090 at0008 = ╱ec╱,╱ // 0x308d @0x8
0x3085…3090 at0009 = ╱52╱R╱ // 0x308e @0x9
0x3085…3090 at000a = EOL // 0x308f @0xa
0x3085…3090 }
0x3090…30ae be05 4030 EXEC FEJL(9,34,K4$)
0x3090…30ae LineComalBin {
0x3090…30ae ptr = 0xbe05 // 0x3090 @0x0
0x3090…30ae lno = 0x0fbe // 0x3092 @0x2
0x3090…30ae at0004 = ╱9d╱ EXEC ╱ // 0x3094 @0x4
0x3090…30ae at0005 = ╱46╱F╱ // 0x3095 @0x5
0x3090…30ae at0006 = ╱45╱E╱ // 0x3096 @0x6
0x3090…30ae at0007 = ╱4a╱J╱ // 0x3097 @0x7
0x3090…30ae at0008 = ╱4c╱L╱ // 0x3098 @0x8
0x3090…30ae at0009 = ╱ed╱(╱ // 0x3099 @0x9
0x3090…30ae at000a = ╱39╱9╱ // 0x309a @0xa
0x3090…30ae at000b = ╱fe00009004╱ // 0x309b @0xb
0x3090…30ae at0010 = ╱ec╱,╱ // 0x30a0 @0x10
0x3090…30ae at0011 = ╱33╱3╱ // 0x30a1 @0x11
0x3090…30ae at0012 = ╱34╱4╱ // 0x30a2 @0x12
0x3090…30ae at0013 = ╱fe00008806╱ // 0x30a3 @0x13
0x3090…30ae at0018 = ╱ec╱,╱ // 0x30a8 @0x18
0x3090…30ae at0019 = ╱4b╱K╱ // 0x30a9 @0x19
0x3090…30ae at001a = ╱34╱4╱ // 0x30aa @0x1a
0x3090…30ae at001b = ╱ef╱$╱ // 0x30ab @0x1b
0x3090…30ae at001c = ╱ee╱)╱ // 0x30ac @0x1c
0x3090…30ae at001d = EOL // 0x30ad @0x1d
0x3090…30ae }
0x30ae…30b9 be10 4040 OPEN K5$,W
0x30ae…30b9 LineComalBin {
0x30ae…30b9 ptr = 0xbe10 // 0x30ae @0x0
0x30ae…30b9 lno = 0x0fc8 // 0x30b0 @0x2
0x30ae…30b9 at0004 = ╱a7╱ OPEN ╱ // 0x30b2 @0x4
0x30ae…30b9 at0005 = ╱4b╱K╱ // 0x30b3 @0x5
0x30ae…30b9 at0006 = ╱35╱5╱ // 0x30b4 @0x6
0x30ae…30b9 at0007 = ╱ef╱$╱ // 0x30b5 @0x7
0x30ae…30b9 at0008 = ╱ec╱,╱ // 0x30b6 @0x8
0x30ae…30b9 at0009 = ╱57╱W╱ // 0x30b7 @0x9
0x30ae…30b9 at000a = EOL // 0x30b8 @0xa
0x30ae…30b9 }
0x30b9…30d7 be2e 4050 EXEC FEJL(9,35,K5$)
0x30b9…30d7 LineComalBin {
0x30b9…30d7 ptr = 0xbe2e // 0x30b9 @0x0
0x30b9…30d7 lno = 0x0fd2 // 0x30bb @0x2
0x30b9…30d7 at0004 = ╱9d╱ EXEC ╱ // 0x30bd @0x4
0x30b9…30d7 at0005 = ╱46╱F╱ // 0x30be @0x5
0x30b9…30d7 at0006 = ╱45╱E╱ // 0x30bf @0x6
0x30b9…30d7 at0007 = ╱4a╱J╱ // 0x30c0 @0x7
0x30b9…30d7 at0008 = ╱4c╱L╱ // 0x30c1 @0x8
0x30b9…30d7 at0009 = ╱ed╱(╱ // 0x30c2 @0x9
0x30b9…30d7 at000a = ╱39╱9╱ // 0x30c3 @0xa
0x30b9…30d7 at000b = ╱fe00009004╱ // 0x30c4 @0xb
0x30b9…30d7 at0010 = ╱ec╱,╱ // 0x30c9 @0x10
0x30b9…30d7 at0011 = ╱33╱3╱ // 0x30ca @0x11
0x30b9…30d7 at0012 = ╱35╱5╱ // 0x30cb @0x12
0x30b9…30d7 at0013 = ╱fe00008c06╱ // 0x30cc @0x13
0x30b9…30d7 at0018 = ╱ec╱,╱ // 0x30d1 @0x18
0x30b9…30d7 at0019 = ╱4b╱K╱ // 0x30d2 @0x19
0x30b9…30d7 at001a = ╱35╱5╱ // 0x30d3 @0x1a
0x30b9…30d7 at001b = ╱ef╱$╱ // 0x30d4 @0x1b
0x30b9…30d7 at001c = ╱ee╱)╱ // 0x30d5 @0x1c
0x30b9…30d7 at001d = EOL // 0x30d6 @0x1d
0x30b9…30d7 }
0x30d7…30e2 be39 4060 OPEN K6$,W
0x30d7…30e2 LineComalBin {
0x30d7…30e2 ptr = 0xbe39 // 0x30d7 @0x0
0x30d7…30e2 lno = 0x0fdc // 0x30d9 @0x2
0x30d7…30e2 at0004 = ╱a7╱ OPEN ╱ // 0x30db @0x4
0x30d7…30e2 at0005 = ╱4b╱K╱ // 0x30dc @0x5
0x30d7…30e2 at0006 = ╱36╱6╱ // 0x30dd @0x6
0x30d7…30e2 at0007 = ╱ef╱$╱ // 0x30de @0x7
0x30d7…30e2 at0008 = ╱ec╱,╱ // 0x30df @0x8
0x30d7…30e2 at0009 = ╱57╱W╱ // 0x30e0 @0x9
0x30d7…30e2 at000a = EOL // 0x30e1 @0xa
0x30d7…30e2 }
0x30e2…3100 be57 4070 EXEC FEJL(9,36,K6$)
0x30e2…3100 LineComalBin {
0x30e2…3100 ptr = 0xbe57 // 0x30e2 @0x0
0x30e2…3100 lno = 0x0fe6 // 0x30e4 @0x2
0x30e2…3100 at0004 = ╱9d╱ EXEC ╱ // 0x30e6 @0x4
0x30e2…3100 at0005 = ╱46╱F╱ // 0x30e7 @0x5
0x30e2…3100 at0006 = ╱45╱E╱ // 0x30e8 @0x6
0x30e2…3100 at0007 = ╱4a╱J╱ // 0x30e9 @0x7
0x30e2…3100 at0008 = ╱4c╱L╱ // 0x30ea @0x8
0x30e2…3100 at0009 = ╱ed╱(╱ // 0x30eb @0x9
0x30e2…3100 at000a = ╱39╱9╱ // 0x30ec @0xa
0x30e2…3100 at000b = ╱fe00009004╱ // 0x30ed @0xb
0x30e2…3100 at0010 = ╱ec╱,╱ // 0x30f2 @0x10
0x30e2…3100 at0011 = ╱33╱3╱ // 0x30f3 @0x11
0x30e2…3100 at0012 = ╱36╱6╱ // 0x30f4 @0x12
0x30e2…3100 at0013 = ╱fe00009006╱ // 0x30f5 @0x13
0x30e2…3100 at0018 = ╱ec╱,╱ // 0x30fa @0x18
0x30e2…3100 at0019 = ╱4b╱K╱ // 0x30fb @0x19
0x30e2…3100 at001a = ╱36╱6╱ // 0x30fc @0x1a
0x30e2…3100 at001b = ╱ef╱$╱ // 0x30fd @0x1b
0x30e2…3100 at001c = ╱ee╱)╱ // 0x30fe @0x1c
0x30e2…3100 at001d = EOL // 0x30ff @0x1d
0x30e2…3100 }
0x3100…310b be62 4080 OPEN K7$,W
0x3100…310b LineComalBin {
0x3100…310b ptr = 0xbe62 // 0x3100 @0x0
0x3100…310b lno = 0x0ff0 // 0x3102 @0x2
0x3100…310b at0004 = ╱a7╱ OPEN ╱ // 0x3104 @0x4
0x3100…310b at0005 = ╱4b╱K╱ // 0x3105 @0x5
0x3100…310b at0006 = ╱37╱7╱ // 0x3106 @0x6
0x3100…310b at0007 = ╱ef╱$╱ // 0x3107 @0x7
0x3100…310b at0008 = ╱ec╱,╱ // 0x3108 @0x8
0x3100…310b at0009 = ╱57╱W╱ // 0x3109 @0x9
0x3100…310b at000a = EOL // 0x310a @0xa
0x3100…310b }
0x310b…3129 be80 4090 EXEC FEJL(9,37,K7$)
0x310b…3129 LineComalBin {
0x310b…3129 ptr = 0xbe80 // 0x310b @0x0
0x310b…3129 lno = 0x0ffa // 0x310d @0x2
0x310b…3129 at0004 = ╱9d╱ EXEC ╱ // 0x310f @0x4
0x310b…3129 at0005 = ╱46╱F╱ // 0x3110 @0x5
0x310b…3129 at0006 = ╱45╱E╱ // 0x3111 @0x6
0x310b…3129 at0007 = ╱4a╱J╱ // 0x3112 @0x7
0x310b…3129 at0008 = ╱4c╱L╱ // 0x3113 @0x8
0x310b…3129 at0009 = ╱ed╱(╱ // 0x3114 @0x9
0x310b…3129 at000a = ╱39╱9╱ // 0x3115 @0xa
0x310b…3129 at000b = ╱fe00009004╱ // 0x3116 @0xb
0x310b…3129 at0010 = ╱ec╱,╱ // 0x311b @0x10
0x310b…3129 at0011 = ╱33╱3╱ // 0x311c @0x11
0x310b…3129 at0012 = ╱37╱7╱ // 0x311d @0x12
0x310b…3129 at0013 = ╱fe00009406╱ // 0x311e @0x13
0x310b…3129 at0018 = ╱ec╱,╱ // 0x3123 @0x18
0x310b…3129 at0019 = ╱4b╱K╱ // 0x3124 @0x19
0x310b…3129 at001a = ╱37╱7╱ // 0x3125 @0x1a
0x310b…3129 at001b = ╱ef╱$╱ // 0x3126 @0x1b
0x310b…3129 at001c = ╱ee╱)╱ // 0x3127 @0x1c
0x310b…3129 at001d = EOL // 0x3128 @0x1d
0x310b…3129 }
0x3129…3134 be8b 4100 OPEN K8$,R
0x3129…3134 LineComalBin {
0x3129…3134 ptr = 0xbe8b // 0x3129 @0x0
0x3129…3134 lno = 0x1004 // 0x312b @0x2
0x3129…3134 at0004 = ╱a7╱ OPEN ╱ // 0x312d @0x4
0x3129…3134 at0005 = ╱4b╱K╱ // 0x312e @0x5
0x3129…3134 at0006 = ╱38╱8╱ // 0x312f @0x6
0x3129…3134 at0007 = ╱ef╱$╱ // 0x3130 @0x7
0x3129…3134 at0008 = ╱ec╱,╱ // 0x3131 @0x8
0x3129…3134 at0009 = ╱52╱R╱ // 0x3132 @0x9
0x3129…3134 at000a = EOL // 0x3133 @0xa
0x3129…3134 }
0x3134…3152 bea9 4110 EXEC FEJL(9,38,K8$)
0x3134…3152 LineComalBin {
0x3134…3152 ptr = 0xbea9 // 0x3134 @0x0
0x3134…3152 lno = 0x100e // 0x3136 @0x2
0x3134…3152 at0004 = ╱9d╱ EXEC ╱ // 0x3138 @0x4
0x3134…3152 at0005 = ╱46╱F╱ // 0x3139 @0x5
0x3134…3152 at0006 = ╱45╱E╱ // 0x313a @0x6
0x3134…3152 at0007 = ╱4a╱J╱ // 0x313b @0x7
0x3134…3152 at0008 = ╱4c╱L╱ // 0x313c @0x8
0x3134…3152 at0009 = ╱ed╱(╱ // 0x313d @0x9
0x3134…3152 at000a = ╱39╱9╱ // 0x313e @0xa
0x3134…3152 at000b = ╱fe00009004╱ // 0x313f @0xb
0x3134…3152 at0010 = ╱ec╱,╱ // 0x3144 @0x10
0x3134…3152 at0011 = ╱33╱3╱ // 0x3145 @0x11
0x3134…3152 at0012 = ╱38╱8╱ // 0x3146 @0x12
0x3134…3152 at0013 = ╱fe00009806╱ // 0x3147 @0x13
0x3134…3152 at0018 = ╱ec╱,╱ // 0x314c @0x18
0x3134…3152 at0019 = ╱4b╱K╱ // 0x314d @0x19
0x3134…3152 at001a = ╱38╱8╱ // 0x314e @0x1a
0x3134…3152 at001b = ╱ef╱$╱ // 0x314f @0x1b
0x3134…3152 at001c = ╱ee╱)╱ // 0x3150 @0x1c
0x3134…3152 at001d = EOL // 0x3151 @0x1d
0x3134…3152 }
0x3152…315d beb4 4120 OPEN K9$,W
0x3152…315d LineComalBin {
0x3152…315d ptr = 0xbeb4 // 0x3152 @0x0
0x3152…315d lno = 0x1018 // 0x3154 @0x2
0x3152…315d at0004 = ╱a7╱ OPEN ╱ // 0x3156 @0x4
0x3152…315d at0005 = ╱4b╱K╱ // 0x3157 @0x5
0x3152…315d at0006 = ╱39╱9╱ // 0x3158 @0x6
0x3152…315d at0007 = ╱ef╱$╱ // 0x3159 @0x7
0x3152…315d at0008 = ╱ec╱,╱ // 0x315a @0x8
0x3152…315d at0009 = ╱57╱W╱ // 0x315b @0x9
0x3152…315d at000a = EOL // 0x315c @0xa
0x3152…315d }
0x315d…317b bed2 4130 EXEC FEJL(9,39,K9$)
0x315d…317b LineComalBin {
0x315d…317b ptr = 0xbed2 // 0x315d @0x0
0x315d…317b lno = 0x1022 // 0x315f @0x2
0x315d…317b at0004 = ╱9d╱ EXEC ╱ // 0x3161 @0x4
0x315d…317b at0005 = ╱46╱F╱ // 0x3162 @0x5
0x315d…317b at0006 = ╱45╱E╱ // 0x3163 @0x6
0x315d…317b at0007 = ╱4a╱J╱ // 0x3164 @0x7
0x315d…317b at0008 = ╱4c╱L╱ // 0x3165 @0x8
0x315d…317b at0009 = ╱ed╱(╱ // 0x3166 @0x9
0x315d…317b at000a = ╱39╱9╱ // 0x3167 @0xa
0x315d…317b at000b = ╱fe00009004╱ // 0x3168 @0xb
0x315d…317b at0010 = ╱ec╱,╱ // 0x316d @0x10
0x315d…317b at0011 = ╱33╱3╱ // 0x316e @0x11
0x315d…317b at0012 = ╱39╱9╱ // 0x316f @0x12
0x315d…317b at0013 = ╱fe00009c06╱ // 0x3170 @0x13
0x315d…317b at0018 = ╱ec╱,╱ // 0x3175 @0x18
0x315d…317b at0019 = ╱4b╱K╱ // 0x3176 @0x19
0x315d…317b at001a = ╱39╱9╱ // 0x3177 @0x1a
0x315d…317b at001b = ╱ef╱$╱ // 0x3178 @0x1b
0x315d…317b at001c = ╱ee╱)╱ // 0x3179 @0x1c
0x315d…317b at001d = EOL // 0x317a @0x1d
0x315d…317b }
0x317b…3187 bede 4140 OPEN K10$,W
0x317b…3187 LineComalBin {
0x317b…3187 ptr = 0xbede // 0x317b @0x0
0x317b…3187 lno = 0x102c // 0x317d @0x2
0x317b…3187 at0004 = ╱a7╱ OPEN ╱ // 0x317f @0x4
0x317b…3187 at0005 = ╱4b╱K╱ // 0x3180 @0x5
0x317b…3187 at0006 = ╱31╱1╱ // 0x3181 @0x6
0x317b…3187 at0007 = ╱30╱0╱ // 0x3182 @0x7
0x317b…3187 at0008 = ╱ef╱$╱ // 0x3183 @0x8
0x317b…3187 at0009 = ╱ec╱,╱ // 0x3184 @0x9
0x317b…3187 at000a = ╱57╱W╱ // 0x3185 @0xa
0x317b…3187 at000b = EOL // 0x3186 @0xb
0x317b…3187 }
0x3187…31a6 befd 4150 EXEC FEJL(9,40,K10$)
0x3187…31a6 LineComalBin {
0x3187…31a6 ptr = 0xbefd // 0x3187 @0x0
0x3187…31a6 lno = 0x1036 // 0x3189 @0x2
0x3187…31a6 at0004 = ╱9d╱ EXEC ╱ // 0x318b @0x4
0x3187…31a6 at0005 = ╱46╱F╱ // 0x318c @0x5
0x3187…31a6 at0006 = ╱45╱E╱ // 0x318d @0x6
0x3187…31a6 at0007 = ╱4a╱J╱ // 0x318e @0x7
0x3187…31a6 at0008 = ╱4c╱L╱ // 0x318f @0x8
0x3187…31a6 at0009 = ╱ed╱(╱ // 0x3190 @0x9
0x3187…31a6 at000a = ╱39╱9╱ // 0x3191 @0xa
0x3187…31a6 at000b = ╱fe00009004╱ // 0x3192 @0xb
0x3187…31a6 at0010 = ╱ec╱,╱ // 0x3197 @0x10
0x3187…31a6 at0011 = ╱34╱4╱ // 0x3198 @0x11
0x3187…31a6 at0012 = ╱30╱0╱ // 0x3199 @0x12
0x3187…31a6 at0013 = ╱fe0000a006╱ // 0x319a @0x13
0x3187…31a6 at0018 = ╱ec╱,╱ // 0x319f @0x18
0x3187…31a6 at0019 = ╱4b╱K╱ // 0x31a0 @0x19
0x3187…31a6 at001a = ╱31╱1╱ // 0x31a1 @0x1a
0x3187…31a6 at001b = ╱30╱0╱ // 0x31a2 @0x1b
0x3187…31a6 at001c = ╱ef╱$╱ // 0x31a3 @0x1c
0x3187…31a6 at001d = ╱ee╱)╱ // 0x31a4 @0x1d
0x3187…31a6 at001e = EOL // 0x31a5 @0x1e
0x3187…31a6 }
0x31a6…31b2 bf09 4160 OPEN K11$,W
0x31a6…31b2 LineComalBin {
0x31a6…31b2 ptr = 0xbf09 // 0x31a6 @0x0
0x31a6…31b2 lno = 0x1040 // 0x31a8 @0x2
0x31a6…31b2 at0004 = ╱a7╱ OPEN ╱ // 0x31aa @0x4
0x31a6…31b2 at0005 = ╱4b╱K╱ // 0x31ab @0x5
0x31a6…31b2 at0006 = ╱31╱1╱ // 0x31ac @0x6
0x31a6…31b2 at0007 = ╱31╱1╱ // 0x31ad @0x7
0x31a6…31b2 at0008 = ╱ef╱$╱ // 0x31ae @0x8
0x31a6…31b2 at0009 = ╱ec╱,╱ // 0x31af @0x9
0x31a6…31b2 at000a = ╱57╱W╱ // 0x31b0 @0xa
0x31a6…31b2 at000b = EOL // 0x31b1 @0xb
0x31a6…31b2 }
0x31b2…31d1 bf28 4170 EXEC FEJL(9,41,K11$)
0x31b2…31d1 LineComalBin {
0x31b2…31d1 ptr = 0xbf28 // 0x31b2 @0x0
0x31b2…31d1 lno = 0x104a // 0x31b4 @0x2
0x31b2…31d1 at0004 = ╱9d╱ EXEC ╱ // 0x31b6 @0x4
0x31b2…31d1 at0005 = ╱46╱F╱ // 0x31b7 @0x5
0x31b2…31d1 at0006 = ╱45╱E╱ // 0x31b8 @0x6
0x31b2…31d1 at0007 = ╱4a╱J╱ // 0x31b9 @0x7
0x31b2…31d1 at0008 = ╱4c╱L╱ // 0x31ba @0x8
0x31b2…31d1 at0009 = ╱ed╱(╱ // 0x31bb @0x9
0x31b2…31d1 at000a = ╱39╱9╱ // 0x31bc @0xa
0x31b2…31d1 at000b = ╱fe00009004╱ // 0x31bd @0xb
0x31b2…31d1 at0010 = ╱ec╱,╱ // 0x31c2 @0x10
0x31b2…31d1 at0011 = ╱34╱4╱ // 0x31c3 @0x11
0x31b2…31d1 at0012 = ╱31╱1╱ // 0x31c4 @0x12
0x31b2…31d1 at0013 = ╱fe0000a406╱ // 0x31c5 @0x13
0x31b2…31d1 at0018 = ╱ec╱,╱ // 0x31ca @0x18
0x31b2…31d1 at0019 = ╱4b╱K╱ // 0x31cb @0x19
0x31b2…31d1 at001a = ╱31╱1╱ // 0x31cc @0x1a
0x31b2…31d1 at001b = ╱31╱1╱ // 0x31cd @0x1b
0x31b2…31d1 at001c = ╱ef╱$╱ // 0x31ce @0x1c
0x31b2…31d1 at001d = ╱ee╱)╱ // 0x31cf @0x1d
0x31b2…31d1 at001e = EOL // 0x31d0 @0x1e
0x31b2…31d1 }
0x31d1…31e8 bf3f 4175 IF K12$(6)<"9" THEN
0x31d1…31e8 LineComalBin {
0x31d1…31e8 ptr = 0xbf3f // 0x31d1 @0x0
0x31d1…31e8 lno = 0x104f // 0x31d3 @0x2
0x31d1…31e8 at0004 = ╱9c╱ IF ╱ // 0x31d5 @0x4
0x31d1…31e8 at0005 = ╱4b╱K╱ // 0x31d6 @0x5
0x31d1…31e8 at0006 = ╱31╱1╱ // 0x31d7 @0x6
0x31d1…31e8 at0007 = ╱32╱2╱ // 0x31d8 @0x7
0x31d1…31e8 at0008 = ╱ef╱$╱ // 0x31d9 @0x8
0x31d1…31e8 at0009 = ╱ed╱(╱ // 0x31da @0x9
0x31d1…31e8 at000a = ╱36╱6╱ // 0x31db @0xa
0x31d1…31e8 at000b = ╱fe0000c003╱ // 0x31dc @0xb
0x31d1…31e8 at0010 = ╱ee╱)╱ // 0x31e1 @0x10
0x31d1…31e8 at0011 = ╱dd╱<╱ // 0x31e2 @0x11
0x31d1…31e8 at0012 = ╱22╱"╱ // 0x31e3 @0x12
0x31d1…31e8 at0013 = ╱39╱9╱ // 0x31e4 @0x13
0x31d1…31e8 at0014 = ╱22╱"╱ // 0x31e5 @0x14
0x31d1…31e8 at0015 = ╱b6╱ THEN ╱ // 0x31e6 @0x15
0x31d1…31e8 at0016 = EOL // 0x31e7 @0x16
0x31d1…31e8 }
0x31e8…31f4 bf4b 4180 OPEN K12$,R
0x31e8…31f4 LineComalBin {
0x31e8…31f4 ptr = 0xbf4b // 0x31e8 @0x0
0x31e8…31f4 lno = 0x1054 // 0x31ea @0x2
0x31e8…31f4 at0004 = ╱a7╱ OPEN ╱ // 0x31ec @0x4
0x31e8…31f4 at0005 = ╱4b╱K╱ // 0x31ed @0x5
0x31e8…31f4 at0006 = ╱31╱1╱ // 0x31ee @0x6
0x31e8…31f4 at0007 = ╱32╱2╱ // 0x31ef @0x7
0x31e8…31f4 at0008 = ╱ef╱$╱ // 0x31f0 @0x8
0x31e8…31f4 at0009 = ╱ec╱,╱ // 0x31f1 @0x9
0x31e8…31f4 at000a = ╱52╱R╱ // 0x31f2 @0xa
0x31e8…31f4 at000b = EOL // 0x31f3 @0xb
0x31e8…31f4 }
0x31f4…3213 bf6a 4190 EXEC FEJL(9,42,K12$)
0x31f4…3213 LineComalBin {
0x31f4…3213 ptr = 0xbf6a // 0x31f4 @0x0
0x31f4…3213 lno = 0x105e // 0x31f6 @0x2
0x31f4…3213 at0004 = ╱9d╱ EXEC ╱ // 0x31f8 @0x4
0x31f4…3213 at0005 = ╱46╱F╱ // 0x31f9 @0x5
0x31f4…3213 at0006 = ╱45╱E╱ // 0x31fa @0x6
0x31f4…3213 at0007 = ╱4a╱J╱ // 0x31fb @0x7
0x31f4…3213 at0008 = ╱4c╱L╱ // 0x31fc @0x8
0x31f4…3213 at0009 = ╱ed╱(╱ // 0x31fd @0x9
0x31f4…3213 at000a = ╱39╱9╱ // 0x31fe @0xa
0x31f4…3213 at000b = ╱fe00009004╱ // 0x31ff @0xb
0x31f4…3213 at0010 = ╱ec╱,╱ // 0x3204 @0x10
0x31f4…3213 at0011 = ╱34╱4╱ // 0x3205 @0x11
0x31f4…3213 at0012 = ╱32╱2╱ // 0x3206 @0x12
0x31f4…3213 at0013 = ╱fe0000a806╱ // 0x3207 @0x13
0x31f4…3213 at0018 = ╱ec╱,╱ // 0x320c @0x18
0x31f4…3213 at0019 = ╱4b╱K╱ // 0x320d @0x19
0x31f4…3213 at001a = ╱31╱1╱ // 0x320e @0x1a
0x31f4…3213 at001b = ╱32╱2╱ // 0x320f @0x1b
0x31f4…3213 at001c = ╱ef╱$╱ // 0x3210 @0x1c
0x31f4…3213 at001d = ╱ee╱)╱ // 0x3211 @0x1d
0x31f4…3213 at001e = EOL // 0x3212 @0x1e
0x31f4…3213 }
0x3213…3219 bf70 4195 ENDIF
0x3213…3219 LineComalBin {
0x3213…3219 ptr = 0xbf70 // 0x3213 @0x0
0x3213…3219 lno = 0x1063 // 0x3215 @0x2
0x3213…3219 at0004 = ╱9b╱ ENDIF ╱ // 0x3217 @0x4
0x3213…3219 at0005 = EOL // 0x3218 @0x5
0x3213…3219 }
0x3219…3225 bf7c 4200 OPEN K14$,W
0x3219…3225 LineComalBin {
0x3219…3225 ptr = 0xbf7c // 0x3219 @0x0
0x3219…3225 lno = 0x1068 // 0x321b @0x2
0x3219…3225 at0004 = ╱a7╱ OPEN ╱ // 0x321d @0x4
0x3219…3225 at0005 = ╱4b╱K╱ // 0x321e @0x5
0x3219…3225 at0006 = ╱31╱1╱ // 0x321f @0x6
0x3219…3225 at0007 = ╱34╱4╱ // 0x3220 @0x7
0x3219…3225 at0008 = ╱ef╱$╱ // 0x3221 @0x8
0x3219…3225 at0009 = ╱ec╱,╱ // 0x3222 @0x9
0x3219…3225 at000a = ╱57╱W╱ // 0x3223 @0xa
0x3219…3225 at000b = EOL // 0x3224 @0xb
0x3219…3225 }
0x3225…3245 bf9c 4210 EXEC FEJL(20,10,K14$)
0x3225…3245 LineComalBin {
0x3225…3245 ptr = 0xbf9c // 0x3225 @0x0
0x3225…3245 lno = 0x1072 // 0x3227 @0x2
0x3225…3245 at0004 = ╱9d╱ EXEC ╱ // 0x3229 @0x4
0x3225…3245 at0005 = ╱46╱F╱ // 0x322a @0x5
0x3225…3245 at0006 = ╱45╱E╱ // 0x322b @0x6
0x3225…3245 at0007 = ╱4a╱J╱ // 0x322c @0x7
0x3225…3245 at0008 = ╱4c╱L╱ // 0x322d @0x8
0x3225…3245 at0009 = ╱ed╱(╱ // 0x322e @0x9
0x3225…3245 at000a = ╱32╱2╱ // 0x322f @0xa
0x3225…3245 at000b = ╱30╱0╱ // 0x3230 @0xb
0x3225…3245 at000c = ╱fe0000a005╱ // 0x3231 @0xc
0x3225…3245 at0011 = ╱ec╱,╱ // 0x3236 @0x11
0x3225…3245 at0012 = ╱31╱1╱ // 0x3237 @0x12
0x3225…3245 at0013 = ╱30╱0╱ // 0x3238 @0x13
0x3225…3245 at0014 = ╱fe0000a004╱ // 0x3239 @0x14
0x3225…3245 at0019 = ╱ec╱,╱ // 0x323e @0x19
0x3225…3245 at001a = ╱4b╱K╱ // 0x323f @0x1a
0x3225…3245 at001b = ╱31╱1╱ // 0x3240 @0x1b
0x3225…3245 at001c = ╱34╱4╱ // 0x3241 @0x1c
0x3225…3245 at001d = ╱ef╱$╱ // 0x3242 @0x1d
0x3225…3245 at001e = ╱ee╱)╱ // 0x3243 @0x1e
0x3225…3245 at001f = EOL // 0x3244 @0x1f
0x3225…3245 }
0x3245…3251 bfa8 4220 OPEN K15$,R
0x3245…3251 LineComalBin {
0x3245…3251 ptr = 0xbfa8 // 0x3245 @0x0
0x3245…3251 lno = 0x107c // 0x3247 @0x2
0x3245…3251 at0004 = ╱a7╱ OPEN ╱ // 0x3249 @0x4
0x3245…3251 at0005 = ╱4b╱K╱ // 0x324a @0x5
0x3245…3251 at0006 = ╱31╱1╱ // 0x324b @0x6
0x3245…3251 at0007 = ╱35╱5╱ // 0x324c @0x7
0x3245…3251 at0008 = ╱ef╱$╱ // 0x324d @0x8
0x3245…3251 at0009 = ╱ec╱,╱ // 0x324e @0x9
0x3245…3251 at000a = ╱52╱R╱ // 0x324f @0xa
0x3245…3251 at000b = EOL // 0x3250 @0xb
0x3245…3251 }
0x3251…3271 bfc8 4230 EXEC FEJL(20,11,K15$)
0x3251…3271 LineComalBin {
0x3251…3271 ptr = 0xbfc8 // 0x3251 @0x0
0x3251…3271 lno = 0x1086 // 0x3253 @0x2
0x3251…3271 at0004 = ╱9d╱ EXEC ╱ // 0x3255 @0x4
0x3251…3271 at0005 = ╱46╱F╱ // 0x3256 @0x5
0x3251…3271 at0006 = ╱45╱E╱ // 0x3257 @0x6
0x3251…3271 at0007 = ╱4a╱J╱ // 0x3258 @0x7
0x3251…3271 at0008 = ╱4c╱L╱ // 0x3259 @0x8
0x3251…3271 at0009 = ╱ed╱(╱ // 0x325a @0x9
0x3251…3271 at000a = ╱32╱2╱ // 0x325b @0xa
0x3251…3271 at000b = ╱30╱0╱ // 0x325c @0xb
0x3251…3271 at000c = ╱fe0000a005╱ // 0x325d @0xc
0x3251…3271 at0011 = ╱ec╱,╱ // 0x3262 @0x11
0x3251…3271 at0012 = ╱31╱1╱ // 0x3263 @0x12
0x3251…3271 at0013 = ╱31╱1╱ // 0x3264 @0x13
0x3251…3271 at0014 = ╱fe0000b004╱ // 0x3265 @0x14
0x3251…3271 at0019 = ╱ec╱,╱ // 0x326a @0x19
0x3251…3271 at001a = ╱4b╱K╱ // 0x326b @0x1a
0x3251…3271 at001b = ╱31╱1╱ // 0x326c @0x1b
0x3251…3271 at001c = ╱35╱5╱ // 0x326d @0x1c
0x3251…3271 at001d = ╱ef╱$╱ // 0x326e @0x1d
0x3251…3271 at001e = ╱ee╱)╱ // 0x326f @0x1e
0x3251…3271 at001f = EOL // 0x3270 @0x1f
0x3251…3271 }
0x3271…327d bfd4 4240 OPEN K16$,R
0x3271…327d LineComalBin {
0x3271…327d ptr = 0xbfd4 // 0x3271 @0x0
0x3271…327d lno = 0x1090 // 0x3273 @0x2
0x3271…327d at0004 = ╱a7╱ OPEN ╱ // 0x3275 @0x4
0x3271…327d at0005 = ╱4b╱K╱ // 0x3276 @0x5
0x3271…327d at0006 = ╱31╱1╱ // 0x3277 @0x6
0x3271…327d at0007 = ╱36╱6╱ // 0x3278 @0x7
0x3271…327d at0008 = ╱ef╱$╱ // 0x3279 @0x8
0x3271…327d at0009 = ╱ec╱,╱ // 0x327a @0x9
0x3271…327d at000a = ╱52╱R╱ // 0x327b @0xa
0x3271…327d at000b = EOL // 0x327c @0xb
0x3271…327d }
0x327d…329d bff4 4250 EXEC FEJL(20,12,K16$)
0x327d…329d LineComalBin {
0x327d…329d ptr = 0xbff4 // 0x327d @0x0
0x327d…329d lno = 0x109a // 0x327f @0x2
0x327d…329d at0004 = ╱9d╱ EXEC ╱ // 0x3281 @0x4
0x327d…329d at0005 = ╱46╱F╱ // 0x3282 @0x5
0x327d…329d at0006 = ╱45╱E╱ // 0x3283 @0x6
0x327d…329d at0007 = ╱4a╱J╱ // 0x3284 @0x7
0x327d…329d at0008 = ╱4c╱L╱ // 0x3285 @0x8
0x327d…329d at0009 = ╱ed╱(╱ // 0x3286 @0x9
0x327d…329d at000a = ╱32╱2╱ // 0x3287 @0xa
0x327d…329d at000b = ╱30╱0╱ // 0x3288 @0xb
0x327d…329d at000c = ╱fe0000a005╱ // 0x3289 @0xc
0x327d…329d at0011 = ╱ec╱,╱ // 0x328e @0x11
0x327d…329d at0012 = ╱31╱1╱ // 0x328f @0x12
0x327d…329d at0013 = ╱32╱2╱ // 0x3290 @0x13
0x327d…329d at0014 = ╱fe0000c004╱ // 0x3291 @0x14
0x327d…329d at0019 = ╱ec╱,╱ // 0x3296 @0x19
0x327d…329d at001a = ╱4b╱K╱ // 0x3297 @0x1a
0x327d…329d at001b = ╱31╱1╱ // 0x3298 @0x1b
0x327d…329d at001c = ╱36╱6╱ // 0x3299 @0x1c
0x327d…329d at001d = ╱ef╱$╱ // 0x329a @0x1d
0x327d…329d at001e = ╱ee╱)╱ // 0x329b @0x1e
0x327d…329d at001f = EOL // 0x329c @0x1f
0x327d…329d }
0x329d…32b9 c010 4251 FOR X=1 TO MUNKANT+METOT
0x329d…32b9 LineComalBin {
0x329d…32b9 ptr = 0xc010 // 0x329d @0x0
0x329d…32b9 lno = 0x109b // 0x329f @0x2
0x329d…32b9 at0004 = ╱83╱ FOR ╱ // 0x32a1 @0x4
0x329d…32b9 at0005 = ╱58╱X╱ // 0x32a2 @0x5
0x329d…32b9 at0006 = ╱dc╱=╱ // 0x32a3 @0x6
0x329d…32b9 at0007 = ╱31╱1╱ // 0x32a4 @0x7
0x329d…32b9 at0008 = ╱fe00008001╱ // 0x32a5 @0x8
0x329d…32b9 at000d = ╱b7╱ TO ╱ // 0x32aa @0xd
0x329d…32b9 at000e = ╱4d╱M╱ // 0x32ab @0xe
0x329d…32b9 at000f = ╱55╱U╱ // 0x32ac @0xf
0x329d…32b9 at0010 = ╱4e╱N╱ // 0x32ad @0x10
0x329d…32b9 at0011 = ╱4b╱K╱ // 0x32ae @0x11
0x329d…32b9 at0012 = ╱41╱A╱ // 0x32af @0x12
0x329d…32b9 at0013 = ╱4e╱N╱ // 0x32b0 @0x13
0x329d…32b9 at0014 = ╱54╱T╱ // 0x32b1 @0x14
0x329d…32b9 at0015 = ╱e2╱+╱ // 0x32b2 @0x15
0x329d…32b9 at0016 = ╱4d╱M╱ // 0x32b3 @0x16
0x329d…32b9 at0017 = ╱45╱E╱ // 0x32b4 @0x17
0x329d…32b9 at0018 = ╱54╱T╱ // 0x32b5 @0x18
0x329d…32b9 at0019 = ╱4f╱O╱ // 0x32b6 @0x19
0x329d…32b9 at001a = ╱54╱T╱ // 0x32b7 @0x1a
0x329d…32b9 at001b = EOL // 0x32b8 @0x1b
0x329d…32b9 }
0x32b9…32d3 c02a 4252 GET K16$,X:ENR(X),EU$(X)
0x32b9…32d3 LineComalBin {
0x32b9…32d3 ptr = 0xc02a // 0x32b9 @0x0
0x32b9…32d3 lno = 0x109c // 0x32bb @0x2
0x32b9…32d3 at0004 = ╱a9╱ GET ╱ // 0x32bd @0x4
0x32b9…32d3 at0005 = ╱4b╱K╱ // 0x32be @0x5
0x32b9…32d3 at0006 = ╱31╱1╱ // 0x32bf @0x6
0x32b9…32d3 at0007 = ╱36╱6╱ // 0x32c0 @0x7
0x32b9…32d3 at0008 = ╱ef╱$╱ // 0x32c1 @0x8
0x32b9…32d3 at0009 = ╱ec╱,╱ // 0x32c2 @0x9
0x32b9…32d3 at000a = ╱58╱X╱ // 0x32c3 @0xa
0x32b9…32d3 at000b = ╱f0╱:╱ // 0x32c4 @0xb
0x32b9…32d3 at000c = ╱45╱E╱ // 0x32c5 @0xc
0x32b9…32d3 at000d = ╱4e╱N╱ // 0x32c6 @0xd
0x32b9…32d3 at000e = ╱52╱R╱ // 0x32c7 @0xe
0x32b9…32d3 at000f = ╱ed╱(╱ // 0x32c8 @0xf
0x32b9…32d3 at0010 = ╱58╱X╱ // 0x32c9 @0x10
0x32b9…32d3 at0011 = ╱ee╱)╱ // 0x32ca @0x11
0x32b9…32d3 at0012 = ╱ec╱,╱ // 0x32cb @0x12
0x32b9…32d3 at0013 = ╱45╱E╱ // 0x32cc @0x13
0x32b9…32d3 at0014 = ╱55╱U╱ // 0x32cd @0x14
0x32b9…32d3 at0015 = ╱ef╱$╱ // 0x32ce @0x15
0x32b9…32d3 at0016 = ╱ed╱(╱ // 0x32cf @0x16
0x32b9…32d3 at0017 = ╱58╱X╱ // 0x32d0 @0x17
0x32b9…32d3 at0018 = ╱ee╱)╱ // 0x32d1 @0x18
0x32b9…32d3 at0019 = EOL // 0x32d2 @0x19
0x32b9…32d3 }
0x32d3…32f3 c04a 4253 EXEC FEJL(20,15,K16$)
0x32d3…32f3 LineComalBin {
0x32d3…32f3 ptr = 0xc04a // 0x32d3 @0x0
0x32d3…32f3 lno = 0x109d // 0x32d5 @0x2
0x32d3…32f3 at0004 = ╱9d╱ EXEC ╱ // 0x32d7 @0x4
0x32d3…32f3 at0005 = ╱46╱F╱ // 0x32d8 @0x5
0x32d3…32f3 at0006 = ╱45╱E╱ // 0x32d9 @0x6
0x32d3…32f3 at0007 = ╱4a╱J╱ // 0x32da @0x7
0x32d3…32f3 at0008 = ╱4c╱L╱ // 0x32db @0x8
0x32d3…32f3 at0009 = ╱ed╱(╱ // 0x32dc @0x9
0x32d3…32f3 at000a = ╱32╱2╱ // 0x32dd @0xa
0x32d3…32f3 at000b = ╱30╱0╱ // 0x32de @0xb
0x32d3…32f3 at000c = ╱fe0000a005╱ // 0x32df @0xc
0x32d3…32f3 at0011 = ╱ec╱,╱ // 0x32e4 @0x11
0x32d3…32f3 at0012 = ╱31╱1╱ // 0x32e5 @0x12
0x32d3…32f3 at0013 = ╱35╱5╱ // 0x32e6 @0x13
0x32d3…32f3 at0014 = ╱fe0000f004╱ // 0x32e7 @0x14
0x32d3…32f3 at0019 = ╱ec╱,╱ // 0x32ec @0x19
0x32d3…32f3 at001a = ╱4b╱K╱ // 0x32ed @0x1a
0x32d3…32f3 at001b = ╱31╱1╱ // 0x32ee @0x1b
0x32d3…32f3 at001c = ╱36╱6╱ // 0x32ef @0x1c
0x32d3…32f3 at001d = ╱ef╱$╱ // 0x32f0 @0x1d
0x32d3…32f3 at001e = ╱ee╱)╱ // 0x32f1 @0x1e
0x32d3…32f3 at001f = EOL // 0x32f2 @0x1f
0x32d3…32f3 }
0x32f3…32fa c051 4254 NEXT X
0x32f3…32fa LineComalBin {
0x32f3…32fa ptr = 0xc051 // 0x32f3 @0x0
0x32f3…32fa lno = 0x109e // 0x32f5 @0x2
0x32f3…32fa at0004 = ╱84╱ NEXT ╱ // 0x32f7 @0x4
0x32f3…32fa at0005 = ╱58╱X╱ // 0x32f8 @0x5
0x32f3…32fa at0006 = EOL // 0x32f9 @0x6
0x32f3…32fa }
0x32fa…3304 c05b 4255 CLOSE K16$
0x32fa…3304 LineComalBin {
0x32fa…3304 ptr = 0xc05b // 0x32fa @0x0
0x32fa…3304 lno = 0x109f // 0x32fc @0x2
0x32fa…3304 at0004 = ╱a8╱ CLOSE ╱ // 0x32fe @0x4
0x32fa…3304 at0005 = ╱4b╱K╱ // 0x32ff @0x5
0x32fa…3304 at0006 = ╱31╱1╱ // 0x3300 @0x6
0x32fa…3304 at0007 = ╱36╱6╱ // 0x3301 @0x7
0x32fa…3304 at0008 = ╱ef╱$╱ // 0x3302 @0x8
0x32fa…3304 at0009 = EOL // 0x3303 @0x9
0x32fa…3304 }
0x3304…3324 c07b 4256 EXEC FEJL(20,16,K16$)
0x3304…3324 LineComalBin {
0x3304…3324 ptr = 0xc07b // 0x3304 @0x0
0x3304…3324 lno = 0x10a0 // 0x3306 @0x2
0x3304…3324 at0004 = ╱9d╱ EXEC ╱ // 0x3308 @0x4
0x3304…3324 at0005 = ╱46╱F╱ // 0x3309 @0x5
0x3304…3324 at0006 = ╱45╱E╱ // 0x330a @0x6
0x3304…3324 at0007 = ╱4a╱J╱ // 0x330b @0x7
0x3304…3324 at0008 = ╱4c╱L╱ // 0x330c @0x8
0x3304…3324 at0009 = ╱ed╱(╱ // 0x330d @0x9
0x3304…3324 at000a = ╱32╱2╱ // 0x330e @0xa
0x3304…3324 at000b = ╱30╱0╱ // 0x330f @0xb
0x3304…3324 at000c = ╱fe0000a005╱ // 0x3310 @0xc
0x3304…3324 at0011 = ╱ec╱,╱ // 0x3315 @0x11
0x3304…3324 at0012 = ╱31╱1╱ // 0x3316 @0x12
0x3304…3324 at0013 = ╱36╱6╱ // 0x3317 @0x13
0x3304…3324 at0014 = ╱fe00008005╱ // 0x3318 @0x14
0x3304…3324 at0019 = ╱ec╱,╱ // 0x331d @0x19
0x3304…3324 at001a = ╱4b╱K╱ // 0x331e @0x1a
0x3304…3324 at001b = ╱31╱1╱ // 0x331f @0x1b
0x3304…3324 at001c = ╱36╱6╱ // 0x3320 @0x1c
0x3304…3324 at001d = ╱ef╱$╱ // 0x3321 @0x1d
0x3304…3324 at001e = ╱ee╱)╱ // 0x3322 @0x1e
0x3304…3324 at001f = EOL // 0x3323 @0x1f
0x3304…3324 }
0x3324…3330 c087 4260 OPEN K17$,W
0x3324…3330 LineComalBin {
0x3324…3330 ptr = 0xc087 // 0x3324 @0x0
0x3324…3330 lno = 0x10a4 // 0x3326 @0x2
0x3324…3330 at0004 = ╱a7╱ OPEN ╱ // 0x3328 @0x4
0x3324…3330 at0005 = ╱4b╱K╱ // 0x3329 @0x5
0x3324…3330 at0006 = ╱31╱1╱ // 0x332a @0x6
0x3324…3330 at0007 = ╱37╱7╱ // 0x332b @0x7
0x3324…3330 at0008 = ╱ef╱$╱ // 0x332c @0x8
0x3324…3330 at0009 = ╱ec╱,╱ // 0x332d @0x9
0x3324…3330 at000a = ╱57╱W╱ // 0x332e @0xa
0x3324…3330 at000b = EOL // 0x332f @0xb
0x3324…3330 }
0x3330…3350 c0a7 4270 EXEC FEJL(20,13,K17$)
0x3330…3350 LineComalBin {
0x3330…3350 ptr = 0xc0a7 // 0x3330 @0x0
0x3330…3350 lno = 0x10ae // 0x3332 @0x2
0x3330…3350 at0004 = ╱9d╱ EXEC ╱ // 0x3334 @0x4
0x3330…3350 at0005 = ╱46╱F╱ // 0x3335 @0x5
0x3330…3350 at0006 = ╱45╱E╱ // 0x3336 @0x6
0x3330…3350 at0007 = ╱4a╱J╱ // 0x3337 @0x7
0x3330…3350 at0008 = ╱4c╱L╱ // 0x3338 @0x8
0x3330…3350 at0009 = ╱ed╱(╱ // 0x3339 @0x9
0x3330…3350 at000a = ╱32╱2╱ // 0x333a @0xa
0x3330…3350 at000b = ╱30╱0╱ // 0x333b @0xb
0x3330…3350 at000c = ╱fe0000a005╱ // 0x333c @0xc
0x3330…3350 at0011 = ╱ec╱,╱ // 0x3341 @0x11
0x3330…3350 at0012 = ╱31╱1╱ // 0x3342 @0x12
0x3330…3350 at0013 = ╱33╱3╱ // 0x3343 @0x13
0x3330…3350 at0014 = ╱fe0000d004╱ // 0x3344 @0x14
0x3330…3350 at0019 = ╱ec╱,╱ // 0x3349 @0x19
0x3330…3350 at001a = ╱4b╱K╱ // 0x334a @0x1a
0x3330…3350 at001b = ╱31╱1╱ // 0x334b @0x1b
0x3330…3350 at001c = ╱37╱7╱ // 0x334c @0x1c
0x3330…3350 at001d = ╱ef╱$╱ // 0x334d @0x1d
0x3330…3350 at001e = ╱ee╱)╱ // 0x334e @0x1e
0x3330…3350 at001f = EOL // 0x334f @0x1f
0x3330…3350 }
0x3350…3370 c0c7 4280 EXEC INDTAB1(KTAB1,MKANTAL,K4$)
0x3350…3370 LineComalBin {
0x3350…3370 ptr = 0xc0c7 // 0x3350 @0x0
0x3350…3370 lno = 0x10b8 // 0x3352 @0x2
0x3350…3370 at0004 = ╱9d╱ EXEC ╱ // 0x3354 @0x4
0x3350…3370 at0005 = ╱49╱I╱ // 0x3355 @0x5
0x3350…3370 at0006 = ╱4e╱N╱ // 0x3356 @0x6
0x3350…3370 at0007 = ╱44╱D╱ // 0x3357 @0x7
0x3350…3370 at0008 = ╱54╱T╱ // 0x3358 @0x8
0x3350…3370 at0009 = ╱41╱A╱ // 0x3359 @0x9
0x3350…3370 at000a = ╱42╱B╱ // 0x335a @0xa
0x3350…3370 at000b = ╱31╱1╱ // 0x335b @0xb
0x3350…3370 at000c = ╱ed╱(╱ // 0x335c @0xc
0x3350…3370 at000d = ╱4b╱K╱ // 0x335d @0xd
0x3350…3370 at000e = ╱54╱T╱ // 0x335e @0xe
0x3350…3370 at000f = ╱41╱A╱ // 0x335f @0xf
0x3350…3370 at0010 = ╱42╱B╱ // 0x3360 @0x10
0x3350…3370 at0011 = ╱31╱1╱ // 0x3361 @0x11
0x3350…3370 at0012 = ╱ec╱,╱ // 0x3362 @0x12
0x3350…3370 at0013 = ╱4d╱M╱ // 0x3363 @0x13
0x3350…3370 at0014 = ╱4b╱K╱ // 0x3364 @0x14
0x3350…3370 at0015 = ╱41╱A╱ // 0x3365 @0x15
0x3350…3370 at0016 = ╱4e╱N╱ // 0x3366 @0x16
0x3350…3370 at0017 = ╱54╱T╱ // 0x3367 @0x17
0x3350…3370 at0018 = ╱41╱A╱ // 0x3368 @0x18
0x3350…3370 at0019 = ╱4c╱L╱ // 0x3369 @0x19
0x3350…3370 at001a = ╱ec╱,╱ // 0x336a @0x1a
0x3350…3370 at001b = ╱4b╱K╱ // 0x336b @0x1b
0x3350…3370 at001c = ╱34╱4╱ // 0x336c @0x1c
0x3350…3370 at001d = ╱ef╱$╱ // 0x336d @0x1d
0x3350…3370 at001e = ╱ee╱)╱ // 0x336e @0x1e
0x3350…3370 at001f = EOL // 0x336f @0x1f
0x3350…3370 }
0x3370…3390 c0e7 4290 EXEC INDTAB1(FTAB1,MFANTAL,K2$)
0x3370…3390 LineComalBin {
0x3370…3390 ptr = 0xc0e7 // 0x3370 @0x0
0x3370…3390 lno = 0x10c2 // 0x3372 @0x2
0x3370…3390 at0004 = ╱9d╱ EXEC ╱ // 0x3374 @0x4
0x3370…3390 at0005 = ╱49╱I╱ // 0x3375 @0x5
0x3370…3390 at0006 = ╱4e╱N╱ // 0x3376 @0x6
0x3370…3390 at0007 = ╱44╱D╱ // 0x3377 @0x7
0x3370…3390 at0008 = ╱54╱T╱ // 0x3378 @0x8
0x3370…3390 at0009 = ╱41╱A╱ // 0x3379 @0x9
0x3370…3390 at000a = ╱42╱B╱ // 0x337a @0xa
0x3370…3390 at000b = ╱31╱1╱ // 0x337b @0xb
0x3370…3390 at000c = ╱ed╱(╱ // 0x337c @0xc
0x3370…3390 at000d = ╱46╱F╱ // 0x337d @0xd
0x3370…3390 at000e = ╱54╱T╱ // 0x337e @0xe
0x3370…3390 at000f = ╱41╱A╱ // 0x337f @0xf
0x3370…3390 at0010 = ╱42╱B╱ // 0x3380 @0x10
0x3370…3390 at0011 = ╱31╱1╱ // 0x3381 @0x11
0x3370…3390 at0012 = ╱ec╱,╱ // 0x3382 @0x12
0x3370…3390 at0013 = ╱4d╱M╱ // 0x3383 @0x13
0x3370…3390 at0014 = ╱46╱F╱ // 0x3384 @0x14
0x3370…3390 at0015 = ╱41╱A╱ // 0x3385 @0x15
0x3370…3390 at0016 = ╱4e╱N╱ // 0x3386 @0x16
0x3370…3390 at0017 = ╱54╱T╱ // 0x3387 @0x17
0x3370…3390 at0018 = ╱41╱A╱ // 0x3388 @0x18
0x3370…3390 at0019 = ╱4c╱L╱ // 0x3389 @0x19
0x3370…3390 at001a = ╱ec╱,╱ // 0x338a @0x1a
0x3370…3390 at001b = ╱4b╱K╱ // 0x338b @0x1b
0x3370…3390 at001c = ╱32╱2╱ // 0x338c @0x1c
0x3370…3390 at001d = ╱ef╱$╱ // 0x338d @0x1d
0x3370…3390 at001e = ╱ee╱)╱ // 0x338e @0x1e
0x3370…3390 at001f = EOL // 0x338f @0x1f
0x3370…3390 }
0x3390…33b0 c107 4300 EXEC INDTAB1(DTAB1,MDANTAL,K3$)
0x3390…33b0 LineComalBin {
0x3390…33b0 ptr = 0xc107 // 0x3390 @0x0
0x3390…33b0 lno = 0x10cc // 0x3392 @0x2
0x3390…33b0 at0004 = ╱9d╱ EXEC ╱ // 0x3394 @0x4
0x3390…33b0 at0005 = ╱49╱I╱ // 0x3395 @0x5
0x3390…33b0 at0006 = ╱4e╱N╱ // 0x3396 @0x6
0x3390…33b0 at0007 = ╱44╱D╱ // 0x3397 @0x7
0x3390…33b0 at0008 = ╱54╱T╱ // 0x3398 @0x8
0x3390…33b0 at0009 = ╱41╱A╱ // 0x3399 @0x9
0x3390…33b0 at000a = ╱42╱B╱ // 0x339a @0xa
0x3390…33b0 at000b = ╱31╱1╱ // 0x339b @0xb
0x3390…33b0 at000c = ╱ed╱(╱ // 0x339c @0xc
0x3390…33b0 at000d = ╱44╱D╱ // 0x339d @0xd
0x3390…33b0 at000e = ╱54╱T╱ // 0x339e @0xe
0x3390…33b0 at000f = ╱41╱A╱ // 0x339f @0xf
0x3390…33b0 at0010 = ╱42╱B╱ // 0x33a0 @0x10
0x3390…33b0 at0011 = ╱31╱1╱ // 0x33a1 @0x11
0x3390…33b0 at0012 = ╱ec╱,╱ // 0x33a2 @0x12
0x3390…33b0 at0013 = ╱4d╱M╱ // 0x33a3 @0x13
0x3390…33b0 at0014 = ╱44╱D╱ // 0x33a4 @0x14
0x3390…33b0 at0015 = ╱41╱A╱ // 0x33a5 @0x15
0x3390…33b0 at0016 = ╱4e╱N╱ // 0x33a6 @0x16
0x3390…33b0 at0017 = ╱54╱T╱ // 0x33a7 @0x17
0x3390…33b0 at0018 = ╱41╱A╱ // 0x33a8 @0x18
0x3390…33b0 at0019 = ╱4c╱L╱ // 0x33a9 @0x19
0x3390…33b0 at001a = ╱ec╱,╱ // 0x33aa @0x1a
0x3390…33b0 at001b = ╱4b╱K╱ // 0x33ab @0x1b
0x3390…33b0 at001c = ╱33╱3╱ // 0x33ac @0x1c
0x3390…33b0 at001d = ╱ef╱$╱ // 0x33ad @0x1d
0x3390…33b0 at001e = ╱ee╱)╱ // 0x33ae @0x1e
0x3390…33b0 at001f = EOL // 0x33af @0x1f
0x3390…33b0 }
0x33b0…33d1 c128 4310 EXEC INDTAB1(ETAB1,MEANTAL,K15$)
0x33b0…33d1 LineComalBin {
0x33b0…33d1 ptr = 0xc128 // 0x33b0 @0x0
0x33b0…33d1 lno = 0x10d6 // 0x33b2 @0x2
0x33b0…33d1 at0004 = ╱9d╱ EXEC ╱ // 0x33b4 @0x4
0x33b0…33d1 at0005 = ╱49╱I╱ // 0x33b5 @0x5
0x33b0…33d1 at0006 = ╱4e╱N╱ // 0x33b6 @0x6
0x33b0…33d1 at0007 = ╱44╱D╱ // 0x33b7 @0x7
0x33b0…33d1 at0008 = ╱54╱T╱ // 0x33b8 @0x8
0x33b0…33d1 at0009 = ╱41╱A╱ // 0x33b9 @0x9
0x33b0…33d1 at000a = ╱42╱B╱ // 0x33ba @0xa
0x33b0…33d1 at000b = ╱31╱1╱ // 0x33bb @0xb
0x33b0…33d1 at000c = ╱ed╱(╱ // 0x33bc @0xc
0x33b0…33d1 at000d = ╱45╱E╱ // 0x33bd @0xd
0x33b0…33d1 at000e = ╱54╱T╱ // 0x33be @0xe
0x33b0…33d1 at000f = ╱41╱A╱ // 0x33bf @0xf
0x33b0…33d1 at0010 = ╱42╱B╱ // 0x33c0 @0x10
0x33b0…33d1 at0011 = ╱31╱1╱ // 0x33c1 @0x11
0x33b0…33d1 at0012 = ╱ec╱,╱ // 0x33c2 @0x12
0x33b0…33d1 at0013 = ╱4d╱M╱ // 0x33c3 @0x13
0x33b0…33d1 at0014 = ╱45╱E╱ // 0x33c4 @0x14
0x33b0…33d1 at0015 = ╱41╱A╱ // 0x33c5 @0x15
0x33b0…33d1 at0016 = ╱4e╱N╱ // 0x33c6 @0x16
0x33b0…33d1 at0017 = ╱54╱T╱ // 0x33c7 @0x17
0x33b0…33d1 at0018 = ╱41╱A╱ // 0x33c8 @0x18
0x33b0…33d1 at0019 = ╱4c╱L╱ // 0x33c9 @0x19
0x33b0…33d1 at001a = ╱ec╱,╱ // 0x33ca @0x1a
0x33b0…33d1 at001b = ╱4b╱K╱ // 0x33cb @0x1b
0x33b0…33d1 at001c = ╱31╱1╱ // 0x33cc @0x1c
0x33b0…33d1 at001d = ╱35╱5╱ // 0x33cd @0x1d
0x33b0…33d1 at001e = ╱ef╱$╱ // 0x33ce @0x1e
0x33b0…33d1 at001f = ╱ee╱)╱ // 0x33cf @0x1f
0x33b0…33d1 at0020 = EOL // 0x33d0 @0x20
0x33b0…33d1 }
0x33d1…3401 c158 4320 BJLINIENR=0;UDMOMS$="0+";INDMOMS$="0+"
0x33d1…3401 LineComalBin {
0x33d1…3401 ptr = 0xc158 // 0x33d1 @0x0
0x33d1…3401 lno = 0x10e0 // 0x33d3 @0x2
0x33d1…3401 at0004 = ╱42╱B╱ // 0x33d5 @0x4
0x33d1…3401 at0005 = ╱4a╱J╱ // 0x33d6 @0x5
0x33d1…3401 at0006 = ╱4c╱L╱ // 0x33d7 @0x6
0x33d1…3401 at0007 = ╱49╱I╱ // 0x33d8 @0x7
0x33d1…3401 at0008 = ╱4e╱N╱ // 0x33d9 @0x8
0x33d1…3401 at0009 = ╱49╱I╱ // 0x33da @0x9
0x33d1…3401 at000a = ╱45╱E╱ // 0x33db @0xa
0x33d1…3401 at000b = ╱4e╱N╱ // 0x33dc @0xb
0x33d1…3401 at000c = ╱52╱R╱ // 0x33dd @0xc
0x33d1…3401 at000d = ╱dc╱=╱ // 0x33de @0xd
0x33d1…3401 at000e = ╱30╱0╱ // 0x33df @0xe
0x33d1…3401 at000f = ╱fe00000000╱ // 0x33e0 @0xf
0x33d1…3401 at0014 = ╱eb╱;╱ // 0x33e5 @0x14
0x33d1…3401 at0015 = ╱55╱U╱ // 0x33e6 @0x15
0x33d1…3401 at0016 = ╱44╱D╱ // 0x33e7 @0x16
0x33d1…3401 at0017 = ╱4d╱M╱ // 0x33e8 @0x17
0x33d1…3401 at0018 = ╱4f╱O╱ // 0x33e9 @0x18
0x33d1…3401 at0019 = ╱4d╱M╱ // 0x33ea @0x19
0x33d1…3401 at001a = ╱53╱S╱ // 0x33eb @0x1a
0x33d1…3401 at001b = ╱ef╱$╱ // 0x33ec @0x1b
0x33d1…3401 at001c = ╱dc╱=╱ // 0x33ed @0x1c
0x33d1…3401 at001d = ╱22╱"╱ // 0x33ee @0x1d
0x33d1…3401 at001e = ╱30╱0╱ // 0x33ef @0x1e
0x33d1…3401 at001f = ╱2b╱+╱ // 0x33f0 @0x1f
0x33d1…3401 at0020 = ╱22╱"╱ // 0x33f1 @0x20
0x33d1…3401 at0021 = ╱eb╱;╱ // 0x33f2 @0x21
0x33d1…3401 at0022 = ╱49╱I╱ // 0x33f3 @0x22
0x33d1…3401 at0023 = ╱4e╱N╱ // 0x33f4 @0x23
0x33d1…3401 at0024 = ╱44╱D╱ // 0x33f5 @0x24
0x33d1…3401 at0025 = ╱4d╱M╱ // 0x33f6 @0x25
0x33d1…3401 at0026 = ╱4f╱O╱ // 0x33f7 @0x26
0x33d1…3401 at0027 = ╱4d╱M╱ // 0x33f8 @0x27
0x33d1…3401 at0028 = ╱53╱S╱ // 0x33f9 @0x28
0x33d1…3401 at0029 = ╱ef╱$╱ // 0x33fa @0x29
0x33d1…3401 at002a = ╱dc╱=╱ // 0x33fb @0x2a
0x33d1…3401 at002b = ╱22╱"╱ // 0x33fc @0x2b
0x33d1…3401 at002c = ╱30╱0╱ // 0x33fd @0x2c
0x33d1…3401 at002d = ╱2b╱+╱ // 0x33fe @0x2d
0x33d1…3401 at002e = ╱22╱"╱ // 0x33ff @0x2e
0x33d1…3401 at002f = EOL // 0x3400 @0x2f
0x33d1…3401 }
0x3401…3412 c169 4370 PROC BFØR(PNR,G)
0x3401…3412 LineComalBin {
0x3401…3412 ptr = 0xc169 // 0x3401 @0x0
0x3401…3412 lno = 0x1112 // 0x3403 @0x2
0x3401…3412 at0004 = ╱9e╱ PROC ╱ // 0x3405 @0x4
0x3401…3412 at0005 = ╱42╱B╱ // 0x3406 @0x5
0x3401…3412 at0006 = ╱46╱F╱ // 0x3407 @0x6
0x3401…3412 at0007 = ╱5c╱Ø╱ // 0x3408 @0x7
0x3401…3412 at0008 = ╱52╱R╱ // 0x3409 @0x8
0x3401…3412 at0009 = ╱ed╱(╱ // 0x340a @0x9
0x3401…3412 at000a = ╱50╱P╱ // 0x340b @0xa
0x3401…3412 at000b = ╱4e╱N╱ // 0x340c @0xb
0x3401…3412 at000c = ╱52╱R╱ // 0x340d @0xc
0x3401…3412 at000d = ╱ec╱,╱ // 0x340e @0xd
0x3401…3412 at000e = ╱47╱G╱ // 0x340f @0xe
0x3401…3412 at000f = ╱ee╱)╱ // 0x3410 @0xf
0x3401…3412 at0010 = EOL // 0x3411 @0x10
0x3401…3412 }
0x3412…3424 c17b 4380 FOR I=1 TO PNR
0x3412…3424 LineComalBin {
0x3412…3424 ptr = 0xc17b // 0x3412 @0x0
0x3412…3424 lno = 0x111c // 0x3414 @0x2
0x3412…3424 at0004 = ╱83╱ FOR ╱ // 0x3416 @0x4
0x3412…3424 at0005 = ╱49╱I╱ // 0x3417 @0x5
0x3412…3424 at0006 = ╱dc╱=╱ // 0x3418 @0x6
0x3412…3424 at0007 = ╱31╱1╱ // 0x3419 @0x7
0x3412…3424 at0008 = ╱fe00008001╱ // 0x341a @0x8
0x3412…3424 at000d = ╱b7╱ TO ╱ // 0x341f @0xd
0x3412…3424 at000e = ╱50╱P╱ // 0x3420 @0xe
0x3412…3424 at000f = ╱4e╱N╱ // 0x3421 @0xf
0x3412…3424 at0010 = ╱52╱R╱ // 0x3422 @0x10
0x3412…3424 at0011 = EOL // 0x3423 @0x11
0x3412…3424 }
0x3424…3458 c1af 4390 GET G$,I:KONTO,DDATO,BILAG,TKODE$,BELØB$,TK$,ENTKO
0x3424…3458 LineComalBin {
0x3424…3458 ptr = 0xc1af // 0x3424 @0x0
0x3424…3458 lno = 0x1126 // 0x3426 @0x2
0x3424…3458 at0004 = ╱a9╱ GET ╱ // 0x3428 @0x4
0x3424…3458 at0005 = ╱47╱G╱ // 0x3429 @0x5
0x3424…3458 at0006 = ╱ef╱$╱ // 0x342a @0x6
0x3424…3458 at0007 = ╱ec╱,╱ // 0x342b @0x7
0x3424…3458 at0008 = ╱49╱I╱ // 0x342c @0x8
0x3424…3458 at0009 = ╱f0╱:╱ // 0x342d @0x9
0x3424…3458 at000a = ╱4b╱K╱ // 0x342e @0xa
0x3424…3458 at000b = ╱4f╱O╱ // 0x342f @0xb
0x3424…3458 at000c = ╱4e╱N╱ // 0x3430 @0xc
0x3424…3458 at000d = ╱54╱T╱ // 0x3431 @0xd
0x3424…3458 at000e = ╱4f╱O╱ // 0x3432 @0xe
0x3424…3458 at000f = ╱ec╱,╱ // 0x3433 @0xf
0x3424…3458 at0010 = ╱44╱D╱ // 0x3434 @0x10
0x3424…3458 at0011 = ╱44╱D╱ // 0x3435 @0x11
0x3424…3458 at0012 = ╱41╱A╱ // 0x3436 @0x12
0x3424…3458 at0013 = ╱54╱T╱ // 0x3437 @0x13
0x3424…3458 at0014 = ╱4f╱O╱ // 0x3438 @0x14
0x3424…3458 at0015 = ╱ec╱,╱ // 0x3439 @0x15
0x3424…3458 at0016 = ╱42╱B╱ // 0x343a @0x16
0x3424…3458 at0017 = ╱49╱I╱ // 0x343b @0x17
0x3424…3458 at0018 = ╱4c╱L╱ // 0x343c @0x18
0x3424…3458 at0019 = ╱41╱A╱ // 0x343d @0x19
0x3424…3458 at001a = ╱47╱G╱ // 0x343e @0x1a
0x3424…3458 at001b = ╱ec╱,╱ // 0x343f @0x1b
0x3424…3458 at001c = ╱54╱T╱ // 0x3440 @0x1c
0x3424…3458 at001d = ╱4b╱K╱ // 0x3441 @0x1d
0x3424…3458 at001e = ╱4f╱O╱ // 0x3442 @0x1e
0x3424…3458 at001f = ╱44╱D╱ // 0x3443 @0x1f
0x3424…3458 at0020 = ╱45╱E╱ // 0x3444 @0x20
0x3424…3458 at0021 = ╱ef╱$╱ // 0x3445 @0x21
0x3424…3458 at0022 = ╱ec╱,╱ // 0x3446 @0x22
0x3424…3458 at0023 = ╱42╱B╱ // 0x3447 @0x23
0x3424…3458 at0024 = ╱45╱E╱ // 0x3448 @0x24
0x3424…3458 at0025 = ╱4c╱L╱ // 0x3449 @0x25
0x3424…3458 at0026 = ╱5c╱Ø╱ // 0x344a @0x26
0x3424…3458 at0027 = ╱42╱B╱ // 0x344b @0x27
0x3424…3458 at0028 = ╱ef╱$╱ // 0x344c @0x28
0x3424…3458 at0029 = ╱ec╱,╱ // 0x344d @0x29
0x3424…3458 at002a = ╱54╱T╱ // 0x344e @0x2a
0x3424…3458 at002b = ╱4b╱K╱ // 0x344f @0x2b
0x3424…3458 at002c = ╱ef╱$╱ // 0x3450 @0x2c
0x3424…3458 at002d = ╱ec╱,╱ // 0x3451 @0x2d
0x3424…3458 at002e = ╱45╱E╱ // 0x3452 @0x2e
0x3424…3458 at002f = ╱4e╱N╱ // 0x3453 @0x2f
0x3424…3458 at0030 = ╱54╱T╱ // 0x3454 @0x30
0x3424…3458 at0031 = ╱4b╱K╱ // 0x3455 @0x31
0x3424…3458 at0032 = ╱4f╱O╱ // 0x3456 @0x32
0x3424…3458 at0033 = EOL // 0x3457 @0x33
0x3424…3458 }
0x3458…3474 c1cb 4400 EXEC FEJL(1,4,G$)
0x3458…3474 LineComalBin {
0x3458…3474 ptr = 0xc1cb // 0x3458 @0x0
0x3458…3474 lno = 0x1130 // 0x345a @0x2
0x3458…3474 at0004 = ╱9d╱ EXEC ╱ // 0x345c @0x4
0x3458…3474 at0005 = ╱46╱F╱ // 0x345d @0x5
0x3458…3474 at0006 = ╱45╱E╱ // 0x345e @0x6
0x3458…3474 at0007 = ╱4a╱J╱ // 0x345f @0x7
0x3458…3474 at0008 = ╱4c╱L╱ // 0x3460 @0x8
0x3458…3474 at0009 = ╱ed╱(╱ // 0x3461 @0x9
0x3458…3474 at000a = ╱31╱1╱ // 0x3462 @0xa
0x3458…3474 at000b = ╱fe00008001╱ // 0x3463 @0xb
0x3458…3474 at0010 = ╱ec╱,╱ // 0x3468 @0x10
0x3458…3474 at0011 = ╱34╱4╱ // 0x3469 @0x11
0x3458…3474 at0012 = ╱fe00008003╱ // 0x346a @0x12
0x3458…3474 at0017 = ╱ec╱,╱ // 0x346f @0x17
0x3458…3474 at0018 = ╱47╱G╱ // 0x3470 @0x18
0x3458…3474 at0019 = ╱ef╱$╱ // 0x3471 @0x19
0x3458…3474 at001a = ╱ee╱)╱ // 0x3472 @0x1a
0x3458…3474 at001b = EOL // 0x3473 @0x1b
0x3458…3474 }
0x3474…3494 c1eb 4410 TEKSTKODE=ORD(TKODE$)-48
0x3474…3494 LineComalBin {
0x3474…3494 ptr = 0xc1eb // 0x3474 @0x0
0x3474…3494 lno = 0x113a // 0x3476 @0x2
0x3474…3494 at0004 = ╱54╱T╱ // 0x3478 @0x4
0x3474…3494 at0005 = ╱45╱E╱ // 0x3479 @0x5
0x3474…3494 at0006 = ╱4b╱K╱ // 0x347a @0x6
0x3474…3494 at0007 = ╱53╱S╱ // 0x347b @0x7
0x3474…3494 at0008 = ╱54╱T╱ // 0x347c @0x8
0x3474…3494 at0009 = ╱4b╱K╱ // 0x347d @0x9
0x3474…3494 at000a = ╱4f╱O╱ // 0x347e @0xa
0x3474…3494 at000b = ╱44╱D╱ // 0x347f @0xb
0x3474…3494 at000c = ╱45╱E╱ // 0x3480 @0xc
0x3474…3494 at000d = ╱dc╱=╱ // 0x3481 @0xd
0x3474…3494 at000e = ╱cd╱ORD╱ // 0x3482 @0xe
0x3474…3494 at000f = ╱ed╱(╱ // 0x3483 @0xf
0x3474…3494 at0010 = ╱54╱T╱ // 0x3484 @0x10
0x3474…3494 at0011 = ╱4b╱K╱ // 0x3485 @0x11
0x3474…3494 at0012 = ╱4f╱O╱ // 0x3486 @0x12
0x3474…3494 at0013 = ╱44╱D╱ // 0x3487 @0x13
0x3474…3494 at0014 = ╱45╱E╱ // 0x3488 @0x14
0x3474…3494 at0015 = ╱ef╱$╱ // 0x3489 @0x15
0x3474…3494 at0016 = ╱ee╱)╱ // 0x348a @0x16
0x3474…3494 at0017 = ╱e3╱-╱ // 0x348b @0x17
0x3474…3494 at0018 = ╱34╱4╱ // 0x348c @0x18
0x3474…3494 at0019 = ╱38╱8╱ // 0x348d @0x19
0x3474…3494 at001a = ╱fe0000c006╱ // 0x348e @0x1a
0x3474…3494 at001f = EOL // 0x3493 @0x1f
0x3474…3494 }
0x3494…34bd c214 4420 IF TEKSTKODE>9 AND TEKSTKODE<20 THEN
0x3494…34bd LineComalBin {
0x3494…34bd ptr = 0xc214 // 0x3494 @0x0
0x3494…34bd lno = 0x1144 // 0x3496 @0x2
0x3494…34bd at0004 = ╱9c╱ IF ╱ // 0x3498 @0x4
0x3494…34bd at0005 = ╱54╱T╱ // 0x3499 @0x5
0x3494…34bd at0006 = ╱45╱E╱ // 0x349a @0x6
0x3494…34bd at0007 = ╱4b╱K╱ // 0x349b @0x7
0x3494…34bd at0008 = ╱53╱S╱ // 0x349c @0x8
0x3494…34bd at0009 = ╱54╱T╱ // 0x349d @0x9
0x3494…34bd at000a = ╱4b╱K╱ // 0x349e @0xa
0x3494…34bd at000b = ╱4f╱O╱ // 0x349f @0xb
0x3494…34bd at000c = ╱44╱D╱ // 0x34a0 @0xc
0x3494…34bd at000d = ╱45╱E╱ // 0x34a1 @0xd
0x3494…34bd at000e = ╱de╱>╱ // 0x34a2 @0xe
0x3494…34bd at000f = ╱39╱9╱ // 0x34a3 @0xf
0x3494…34bd at0010 = ╱fe00009004╱ // 0x34a4 @0x10
0x3494…34bd at0015 = ╱da╱ AND ╱ // 0x34a9 @0x15
0x3494…34bd at0016 = ╱54╱T╱ // 0x34aa @0x16
0x3494…34bd at0017 = ╱45╱E╱ // 0x34ab @0x17
0x3494…34bd at0018 = ╱4b╱K╱ // 0x34ac @0x18
0x3494…34bd at0019 = ╱53╱S╱ // 0x34ad @0x19
0x3494…34bd at001a = ╱54╱T╱ // 0x34ae @0x1a
0x3494…34bd at001b = ╱4b╱K╱ // 0x34af @0x1b
0x3494…34bd at001c = ╱4f╱O╱ // 0x34b0 @0x1c
0x3494…34bd at001d = ╱44╱D╱ // 0x34b1 @0x1d
0x3494…34bd at001e = ╱45╱E╱ // 0x34b2 @0x1e
0x3494…34bd at001f = ╱dd╱<╱ // 0x34b3 @0x1f
0x3494…34bd at0020 = ╱32╱2╱ // 0x34b4 @0x20
0x3494…34bd at0021 = ╱30╱0╱ // 0x34b5 @0x21
0x3494…34bd at0022 = ╱fe0000a005╱ // 0x34b6 @0x22
0x3494…34bd at0027 = ╱b6╱ THEN ╱ // 0x34bb @0x27
0x3494…34bd at0028 = EOL // 0x34bc @0x28
0x3494…34bd }
0x34bd…34cc c223 4430 I=I+1
0x34bd…34cc LineComalBin {
0x34bd…34cc ptr = 0xc223 // 0x34bd @0x0
0x34bd…34cc lno = 0x114e // 0x34bf @0x2
0x34bd…34cc at0004 = ╱49╱I╱ // 0x34c1 @0x4
0x34bd…34cc at0005 = ╱dc╱=╱ // 0x34c2 @0x5
0x34bd…34cc at0006 = ╱49╱I╱ // 0x34c3 @0x6
0x34bd…34cc at0007 = ╱e2╱+╱ // 0x34c4 @0x7
0x34bd…34cc at0008 = ╱31╱1╱ // 0x34c5 @0x8
0x34bd…34cc at0009 = ╱fe00008001╱ // 0x34c6 @0x9
0x34bd…34cc at000e = EOL // 0x34cb @0xe
0x34bd…34cc }
0x34cc…34e3 c23a 4440 GET G$,I:KONTO,TEKST$
0x34cc…34e3 LineComalBin {
0x34cc…34e3 ptr = 0xc23a // 0x34cc @0x0
0x34cc…34e3 lno = 0x1158 // 0x34ce @0x2
0x34cc…34e3 at0004 = ╱a9╱ GET ╱ // 0x34d0 @0x4
0x34cc…34e3 at0005 = ╱47╱G╱ // 0x34d1 @0x5
0x34cc…34e3 at0006 = ╱ef╱$╱ // 0x34d2 @0x6
0x34cc…34e3 at0007 = ╱ec╱,╱ // 0x34d3 @0x7
0x34cc…34e3 at0008 = ╱49╱I╱ // 0x34d4 @0x8
0x34cc…34e3 at0009 = ╱f0╱:╱ // 0x34d5 @0x9
0x34cc…34e3 at000a = ╱4b╱K╱ // 0x34d6 @0xa
0x34cc…34e3 at000b = ╱4f╱O╱ // 0x34d7 @0xb
0x34cc…34e3 at000c = ╱4e╱N╱ // 0x34d8 @0xc
0x34cc…34e3 at000d = ╱54╱T╱ // 0x34d9 @0xd
0x34cc…34e3 at000e = ╱4f╱O╱ // 0x34da @0xe
0x34cc…34e3 at000f = ╱ec╱,╱ // 0x34db @0xf
0x34cc…34e3 at0010 = ╱54╱T╱ // 0x34dc @0x10
0x34cc…34e3 at0011 = ╱45╱E╱ // 0x34dd @0x11
0x34cc…34e3 at0012 = ╱4b╱K╱ // 0x34de @0x12
0x34cc…34e3 at0013 = ╱53╱S╱ // 0x34df @0x13
0x34cc…34e3 at0014 = ╱54╱T╱ // 0x34e0 @0x14
0x34cc…34e3 at0015 = ╱ef╱$╱ // 0x34e1 @0x15
0x34cc…34e3 at0016 = EOL // 0x34e2 @0x16
0x34cc…34e3 }
0x34e3…34ff c256 4450 EXEC FEJL(1,5,G$)
0x34e3…34ff LineComalBin {
0x34e3…34ff ptr = 0xc256 // 0x34e3 @0x0
0x34e3…34ff lno = 0x1162 // 0x34e5 @0x2
0x34e3…34ff at0004 = ╱9d╱ EXEC ╱ // 0x34e7 @0x4
0x34e3…34ff at0005 = ╱46╱F╱ // 0x34e8 @0x5
0x34e3…34ff at0006 = ╱45╱E╱ // 0x34e9 @0x6
0x34e3…34ff at0007 = ╱4a╱J╱ // 0x34ea @0x7
0x34e3…34ff at0008 = ╱4c╱L╱ // 0x34eb @0x8
0x34e3…34ff at0009 = ╱ed╱(╱ // 0x34ec @0x9
0x34e3…34ff at000a = ╱31╱1╱ // 0x34ed @0xa
0x34e3…34ff at000b = ╱fe00008001╱ // 0x34ee @0xb
0x34e3…34ff at0010 = ╱ec╱,╱ // 0x34f3 @0x10
0x34e3…34ff at0011 = ╱35╱5╱ // 0x34f4 @0x11
0x34e3…34ff at0012 = ╱fe0000a003╱ // 0x34f5 @0x12
0x34e3…34ff at0017 = ╱ec╱,╱ // 0x34fa @0x17
0x34e3…34ff at0018 = ╱47╱G╱ // 0x34fb @0x18
0x34e3…34ff at0019 = ╱ef╱$╱ // 0x34fc @0x19
0x34e3…34ff at001a = ╱ee╱)╱ // 0x34fd @0x1a
0x34e3…34ff at001b = EOL // 0x34fe @0x1b
0x34e3…34ff }
0x34ff…3505 c25c 4460 ENDIF
0x34ff…3505 LineComalBin {
0x34ff…3505 ptr = 0xc25c // 0x34ff @0x0
0x34ff…3505 lno = 0x116c // 0x3501 @0x2
0x34ff…3505 at0004 = ╱9b╱ ENDIF ╱ // 0x3503 @0x4
0x34ff…3505 at0005 = EOL // 0x3504 @0x5
0x34ff…3505 }
0x3505…353e c295 4470 EXEC BOGFØRING(KONTO,DDATO,BILAG,TEKSTKODE,BELØB$,ENTKO)
0x3505…353e LineComalBin {
0x3505…353e ptr = 0xc295 // 0x3505 @0x0
0x3505…353e lno = 0x1176 // 0x3507 @0x2
0x3505…353e at0004 = ╱9d╱ EXEC ╱ // 0x3509 @0x4
0x3505…353e at0005 = ╱42╱B╱ // 0x350a @0x5
0x3505…353e at0006 = ╱4f╱O╱ // 0x350b @0x6
0x3505…353e at0007 = ╱47╱G╱ // 0x350c @0x7
0x3505…353e at0008 = ╱46╱F╱ // 0x350d @0x8
0x3505…353e at0009 = ╱5c╱Ø╱ // 0x350e @0x9
0x3505…353e at000a = ╱52╱R╱ // 0x350f @0xa
0x3505…353e at000b = ╱49╱I╱ // 0x3510 @0xb
0x3505…353e at000c = ╱4e╱N╱ // 0x3511 @0xc
0x3505…353e at000d = ╱47╱G╱ // 0x3512 @0xd
0x3505…353e at000e = ╱ed╱(╱ // 0x3513 @0xe
0x3505…353e at000f = ╱4b╱K╱ // 0x3514 @0xf
0x3505…353e at0010 = ╱4f╱O╱ // 0x3515 @0x10
0x3505…353e at0011 = ╱4e╱N╱ // 0x3516 @0x11
0x3505…353e at0012 = ╱54╱T╱ // 0x3517 @0x12
0x3505…353e at0013 = ╱4f╱O╱ // 0x3518 @0x13
0x3505…353e at0014 = ╱ec╱,╱ // 0x3519 @0x14
0x3505…353e at0015 = ╱44╱D╱ // 0x351a @0x15
0x3505…353e at0016 = ╱44╱D╱ // 0x351b @0x16
0x3505…353e at0017 = ╱41╱A╱ // 0x351c @0x17
0x3505…353e at0018 = ╱54╱T╱ // 0x351d @0x18
0x3505…353e at0019 = ╱4f╱O╱ // 0x351e @0x19
0x3505…353e at001a = ╱ec╱,╱ // 0x351f @0x1a
0x3505…353e at001b = ╱42╱B╱ // 0x3520 @0x1b
0x3505…353e at001c = ╱49╱I╱ // 0x3521 @0x1c
0x3505…353e at001d = ╱4c╱L╱ // 0x3522 @0x1d
0x3505…353e at001e = ╱41╱A╱ // 0x3523 @0x1e
0x3505…353e at001f = ╱47╱G╱ // 0x3524 @0x1f
0x3505…353e at0020 = ╱ec╱,╱ // 0x3525 @0x20
0x3505…353e at0021 = ╱54╱T╱ // 0x3526 @0x21
0x3505…353e at0022 = ╱45╱E╱ // 0x3527 @0x22
0x3505…353e at0023 = ╱4b╱K╱ // 0x3528 @0x23
0x3505…353e at0024 = ╱53╱S╱ // 0x3529 @0x24
0x3505…353e at0025 = ╱54╱T╱ // 0x352a @0x25
0x3505…353e at0026 = ╱4b╱K╱ // 0x352b @0x26
0x3505…353e at0027 = ╱4f╱O╱ // 0x352c @0x27
0x3505…353e at0028 = ╱44╱D╱ // 0x352d @0x28
0x3505…353e at0029 = ╱45╱E╱ // 0x352e @0x29
0x3505…353e at002a = ╱ec╱,╱ // 0x352f @0x2a
0x3505…353e at002b = ╱42╱B╱ // 0x3530 @0x2b
0x3505…353e at002c = ╱45╱E╱ // 0x3531 @0x2c
0x3505…353e at002d = ╱4c╱L╱ // 0x3532 @0x2d
0x3505…353e at002e = ╱5c╱Ø╱ // 0x3533 @0x2e
0x3505…353e at002f = ╱42╱B╱ // 0x3534 @0x2f
0x3505…353e at0030 = ╱ef╱$╱ // 0x3535 @0x30
0x3505…353e at0031 = ╱ec╱,╱ // 0x3536 @0x31
0x3505…353e at0032 = ╱45╱E╱ // 0x3537 @0x32
0x3505…353e at0033 = ╱4e╱N╱ // 0x3538 @0x33
0x3505…353e at0034 = ╱54╱T╱ // 0x3539 @0x34
0x3505…353e at0035 = ╱4b╱K╱ // 0x353a @0x35
0x3505…353e at0036 = ╱4f╱O╱ // 0x353b @0x36
0x3505…353e at0037 = ╱ee╱)╱ // 0x353c @0x37
0x3505…353e at0038 = EOL // 0x353d @0x38
0x3505…353e }
0x353e…3565 c2bc 4480 EXEC BJUDSKRIV(BJSIDENR,BJLINIENR,TK$)
0x353e…3565 LineComalBin {
0x353e…3565 ptr = 0xc2bc // 0x353e @0x0
0x353e…3565 lno = 0x1180 // 0x3540 @0x2
0x353e…3565 at0004 = ╱9d╱ EXEC ╱ // 0x3542 @0x4
0x353e…3565 at0005 = ╱42╱B╱ // 0x3543 @0x5
0x353e…3565 at0006 = ╱4a╱J╱ // 0x3544 @0x6
0x353e…3565 at0007 = ╱55╱U╱ // 0x3545 @0x7
0x353e…3565 at0008 = ╱44╱D╱ // 0x3546 @0x8
0x353e…3565 at0009 = ╱53╱S╱ // 0x3547 @0x9
0x353e…3565 at000a = ╱4b╱K╱ // 0x3548 @0xa
0x353e…3565 at000b = ╱52╱R╱ // 0x3549 @0xb
0x353e…3565 at000c = ╱49╱I╱ // 0x354a @0xc
0x353e…3565 at000d = ╱56╱V╱ // 0x354b @0xd
0x353e…3565 at000e = ╱ed╱(╱ // 0x354c @0xe
0x353e…3565 at000f = ╱42╱B╱ // 0x354d @0xf
0x353e…3565 at0010 = ╱4a╱J╱ // 0x354e @0x10
0x353e…3565 at0011 = ╱53╱S╱ // 0x354f @0x11
0x353e…3565 at0012 = ╱49╱I╱ // 0x3550 @0x12
0x353e…3565 at0013 = ╱44╱D╱ // 0x3551 @0x13
0x353e…3565 at0014 = ╱45╱E╱ // 0x3552 @0x14
0x353e…3565 at0015 = ╱4e╱N╱ // 0x3553 @0x15
0x353e…3565 at0016 = ╱52╱R╱ // 0x3554 @0x16
0x353e…3565 at0017 = ╱ec╱,╱ // 0x3555 @0x17
0x353e…3565 at0018 = ╱42╱B╱ // 0x3556 @0x18
0x353e…3565 at0019 = ╱4a╱J╱ // 0x3557 @0x19
0x353e…3565 at001a = ╱4c╱L╱ // 0x3558 @0x1a
0x353e…3565 at001b = ╱49╱I╱ // 0x3559 @0x1b
0x353e…3565 at001c = ╱4e╱N╱ // 0x355a @0x1c
0x353e…3565 at001d = ╱49╱I╱ // 0x355b @0x1d
0x353e…3565 at001e = ╱45╱E╱ // 0x355c @0x1e
0x353e…3565 at001f = ╱4e╱N╱ // 0x355d @0x1f
0x353e…3565 at0020 = ╱52╱R╱ // 0x355e @0x20
0x353e…3565 at0021 = ╱ec╱,╱ // 0x355f @0x21
0x353e…3565 at0022 = ╱54╱T╱ // 0x3560 @0x22
0x353e…3565 at0023 = ╱4b╱K╱ // 0x3561 @0x23
0x353e…3565 at0024 = ╱ef╱$╱ // 0x3562 @0x24
0x353e…3565 at0025 = ╱ee╱)╱ // 0x3563 @0x25
0x353e…3565 at0026 = EOL // 0x3564 @0x26
0x353e…3565 }
0x3565…356c c2c3 4490 NEXT I
0x3565…356c LineComalBin {
0x3565…356c ptr = 0xc2c3 // 0x3565 @0x0
0x3565…356c lno = 0x118a // 0x3567 @0x2
0x3565…356c at0004 = ╱84╱ NEXT ╱ // 0x3569 @0x4
0x3565…356c at0005 = ╱49╱I╱ // 0x356a @0x5
0x3565…356c at0006 = EOL // 0x356b @0x6
0x3565…356c }
0x356c…3572 c2c9 4500 ENDPROC
0x356c…3572 LineComalBin {
0x356c…3572 ptr = 0xc2c9 // 0x356c @0x0
0x356c…3572 lno = 0x1194 // 0x356e @0x2
0x356c…3572 at0004 = ╱9f╱ ENDPROC ╱ // 0x3570 @0x4
0x356c…3572 at0005 = EOL // 0x3571 @0x5
0x356c…3572 }
0x3572…3578 c2cf 4510 CLEAR
0x3572…3578 LineComalBin {
0x3572…3578 ptr = 0xc2cf // 0x3572 @0x0
0x3572…3578 lno = 0x119e // 0x3574 @0x2
0x3572…3578 at0004 = ╱a0╱ CLEAR ╱ // 0x3576 @0x4
0x3572…3578 at0005 = EOL // 0x3577 @0x5
0x3572…3578 }
0x3578…357e c2d5 4520 REPEAT
0x3578…357e LineComalBin {
0x3578…357e ptr = 0xc2d5 // 0x3578 @0x0
0x3578…357e lno = 0x11a8 // 0x357a @0x2
0x3578…357e at0004 = ╱97╱ REPEAT ╱ // 0x357c @0x4
0x3578…357e at0005 = EOL // 0x357d @0x5
0x3578…357e }
0x357e…3592 c2e9 4530 CURSOR 8,13
0x357e…3592 LineComalBin {
0x357e…3592 ptr = 0xc2e9 // 0x357e @0x0
0x357e…3592 lno = 0x11b2 // 0x3580 @0x2
0x357e…3592 at0004 = ╱a1╱ CURSOR ╱ // 0x3582 @0x4
0x357e…3592 at0005 = ╱38╱8╱ // 0x3583 @0x5
0x357e…3592 at0006 = ╱fe00008004╱ // 0x3584 @0x6
0x357e…3592 at000b = ╱ec╱,╱ // 0x3589 @0xb
0x357e…3592 at000c = ╱31╱1╱ // 0x358a @0xc
0x357e…3592 at000d = ╱33╱3╱ // 0x358b @0xd
0x357e…3592 at000e = ╱fe0000d004╱ // 0x358c @0xe
0x357e…3592 at0013 = EOL // 0x3591 @0x13
0x357e…3592 }
0x3592…35da c331 4540 INPUT "Monter papir til udskrift af bogholderijournal og tast RETURN",A$
0x3592…35da LineComalBin {
0x3592…35da ptr = 0xc331 // 0x3592 @0x0
0x3592…35da lno = 0x11bc // 0x3594 @0x2
0x3592…35da at0004 = ╱91╱ INPUT ╱ // 0x3596 @0x4
0x3592…35da at0005 = ╱22╱"╱ // 0x3597 @0x5
0x3592…35da at0006 = ╱4d╱M╱ // 0x3598 @0x6
0x3592…35da at0007 = ╱6f╱o╱ // 0x3599 @0x7
0x3592…35da at0008 = ╱6e╱n╱ // 0x359a @0x8
0x3592…35da at0009 = ╱74╱t╱ // 0x359b @0x9
0x3592…35da at000a = ╱65╱e╱ // 0x359c @0xa
0x3592…35da at000b = ╱72╱r╱ // 0x359d @0xb
0x3592…35da at000c = ╱20╱…╱ // 0x359e @0xc
0x3592…35da at000d = ╱70╱p╱ // 0x359f @0xd
0x3592…35da at000e = ╱61╱a╱ // 0x35a0 @0xe
0x3592…35da at000f = ╱70╱p╱ // 0x35a1 @0xf
0x3592…35da at0010 = ╱69╱i╱ // 0x35a2 @0x10
0x3592…35da at0011 = ╱72╱r╱ // 0x35a3 @0x11
0x3592…35da at0012 = ╱20╱…╱ // 0x35a4 @0x12
0x3592…35da at0013 = ╱74╱t╱ // 0x35a5 @0x13
0x3592…35da at0014 = ╱69╱i╱ // 0x35a6 @0x14
0x3592…35da at0015 = ╱6c╱l╱ // 0x35a7 @0x15
0x3592…35da at0016 = ╱20╱…╱ // 0x35a8 @0x16
0x3592…35da at0017 = ╱75╱u╱ // 0x35a9 @0x17
0x3592…35da at0018 = ╱64╱d╱ // 0x35aa @0x18
0x3592…35da at0019 = ╱73╱s╱ // 0x35ab @0x19
0x3592…35da at001a = ╱6b╱k╱ // 0x35ac @0x1a
0x3592…35da at001b = ╱72╱r╱ // 0x35ad @0x1b
0x3592…35da at001c = ╱69╱i╱ // 0x35ae @0x1c
0x3592…35da at001d = ╱66╱f╱ // 0x35af @0x1d
0x3592…35da at001e = ╱74╱t╱ // 0x35b0 @0x1e
0x3592…35da at001f = ╱20╱…╱ // 0x35b1 @0x1f
0x3592…35da at0020 = ╱61╱a╱ // 0x35b2 @0x20
0x3592…35da at0021 = ╱66╱f╱ // 0x35b3 @0x21
0x3592…35da at0022 = ╱20╱…╱ // 0x35b4 @0x22
0x3592…35da at0023 = ╱62╱b╱ // 0x35b5 @0x23
0x3592…35da at0024 = ╱6f╱o╱ // 0x35b6 @0x24
0x3592…35da at0025 = ╱67╱g╱ // 0x35b7 @0x25
0x3592…35da at0026 = ╱68╱h╱ // 0x35b8 @0x26
0x3592…35da at0027 = ╱6f╱o╱ // 0x35b9 @0x27
0x3592…35da at0028 = ╱6c╱l╱ // 0x35ba @0x28
0x3592…35da at0029 = ╱64╱d╱ // 0x35bb @0x29
0x3592…35da at002a = ╱65╱e╱ // 0x35bc @0x2a
0x3592…35da at002b = ╱72╱r╱ // 0x35bd @0x2b
0x3592…35da at002c = ╱69╱i╱ // 0x35be @0x2c
0x3592…35da at002d = ╱6a╱j╱ // 0x35bf @0x2d
0x3592…35da at002e = ╱6f╱o╱ // 0x35c0 @0x2e
0x3592…35da at002f = ╱75╱u╱ // 0x35c1 @0x2f
0x3592…35da at0030 = ╱72╱r╱ // 0x35c2 @0x30
0x3592…35da at0031 = ╱6e╱n╱ // 0x35c3 @0x31
0x3592…35da at0032 = ╱61╱a╱ // 0x35c4 @0x32
0x3592…35da at0033 = ╱6c╱l╱ // 0x35c5 @0x33
0x3592…35da at0034 = ╱20╱…╱ // 0x35c6 @0x34
0x3592…35da at0035 = ╱6f╱o╱ // 0x35c7 @0x35
0x3592…35da at0036 = ╱67╱g╱ // 0x35c8 @0x36
0x3592…35da at0037 = ╱20╱…╱ // 0x35c9 @0x37
0x3592…35da at0038 = ╱74╱t╱ // 0x35ca @0x38
0x3592…35da at0039 = ╱61╱a╱ // 0x35cb @0x39
0x3592…35da at003a = ╱73╱s╱ // 0x35cc @0x3a
0x3592…35da at003b = ╱74╱t╱ // 0x35cd @0x3b
0x3592…35da at003c = ╱20╱…╱ // 0x35ce @0x3c
0x3592…35da at003d = ╱52╱R╱ // 0x35cf @0x3d
0x3592…35da at003e = ╱45╱E╱ // 0x35d0 @0x3e
0x3592…35da at003f = ╱54╱T╱ // 0x35d1 @0x3f
0x3592…35da at0040 = ╱55╱U╱ // 0x35d2 @0x40
0x3592…35da at0041 = ╱52╱R╱ // 0x35d3 @0x41
0x3592…35da at0042 = ╱4e╱N╱ // 0x35d4 @0x42
0x3592…35da at0043 = ╱22╱"╱ // 0x35d5 @0x43
0x3592…35da at0044 = ╱ec╱,╱ // 0x35d6 @0x44
0x3592…35da at0045 = ╱41╱A╱ // 0x35d7 @0x45
0x3592…35da at0046 = ╱ef╱$╱ // 0x35d8 @0x46
0x3592…35da at0047 = EOL // 0x35d9 @0x47
0x3592…35da }
0x35da…35ee c345 4550 UNTIL ORD(A$)=255
0x35da…35ee LineComalBin {
0x35da…35ee ptr = 0xc345 // 0x35da @0x0
0x35da…35ee lno = 0x11c6 // 0x35dc @0x2
0x35da…35ee at0004 = ╱98╱ UNTIL ╱ // 0x35de @0x4
0x35da…35ee at0005 = ╱cd╱ORD╱ // 0x35df @0x5
0x35da…35ee at0006 = ╱ed╱(╱ // 0x35e0 @0x6
0x35da…35ee at0007 = ╱41╱A╱ // 0x35e1 @0x7
0x35da…35ee at0008 = ╱ef╱$╱ // 0x35e2 @0x8
0x35da…35ee at0009 = ╱ee╱)╱ // 0x35e3 @0x9
0x35da…35ee at000a = ╱dc╱=╱ // 0x35e4 @0xa
0x35da…35ee at000b = ╱32╱2╱ // 0x35e5 @0xb
0x35da…35ee at000c = ╱35╱5╱ // 0x35e6 @0xc
0x35da…35ee at000d = ╱35╱5╱ // 0x35e7 @0xd
0x35da…35ee at000e = ╱fe0000ff08╱ // 0x35e8 @0xe
0x35da…35ee at0013 = EOL // 0x35ed @0x13
0x35da…35ee }
0x35ee…3606 c35d 4560 EXEC BFØR(BHPOSTNR,K8$)
0x35ee…3606 LineComalBin {
0x35ee…3606 ptr = 0xc35d // 0x35ee @0x0
0x35ee…3606 lno = 0x11d0 // 0x35f0 @0x2
0x35ee…3606 at0004 = ╱9d╱ EXEC ╱ // 0x35f2 @0x4
0x35ee…3606 at0005 = ╱42╱B╱ // 0x35f3 @0x5
0x35ee…3606 at0006 = ╱46╱F╱ // 0x35f4 @0x6
0x35ee…3606 at0007 = ╱5c╱Ø╱ // 0x35f5 @0x7
0x35ee…3606 at0008 = ╱52╱R╱ // 0x35f6 @0x8
0x35ee…3606 at0009 = ╱ed╱(╱ // 0x35f7 @0x9
0x35ee…3606 at000a = ╱42╱B╱ // 0x35f8 @0xa
0x35ee…3606 at000b = ╱48╱H╱ // 0x35f9 @0xb
0x35ee…3606 at000c = ╱50╱P╱ // 0x35fa @0xc
0x35ee…3606 at000d = ╱4f╱O╱ // 0x35fb @0xd
0x35ee…3606 at000e = ╱53╱S╱ // 0x35fc @0xe
0x35ee…3606 at000f = ╱54╱T╱ // 0x35fd @0xf
0x35ee…3606 at0010 = ╱4e╱N╱ // 0x35fe @0x10
0x35ee…3606 at0011 = ╱52╱R╱ // 0x35ff @0x11
0x35ee…3606 at0012 = ╱ec╱,╱ // 0x3600 @0x12
0x35ee…3606 at0013 = ╱4b╱K╱ // 0x3601 @0x13
0x35ee…3606 at0014 = ╱38╱8╱ // 0x3602 @0x14
0x35ee…3606 at0015 = ╱ef╱$╱ // 0x3603 @0x15
0x35ee…3606 at0016 = ╱ee╱)╱ // 0x3604 @0x16
0x35ee…3606 at0017 = EOL // 0x3605 @0x17
0x35ee…3606 }
0x3606…3620 c377 4570 EXEC BFØR(FAKPOSTNR,K12$)
0x3606…3620 LineComalBin {
0x3606…3620 ptr = 0xc377 // 0x3606 @0x0
0x3606…3620 lno = 0x11da // 0x3608 @0x2
0x3606…3620 at0004 = ╱9d╱ EXEC ╱ // 0x360a @0x4
0x3606…3620 at0005 = ╱42╱B╱ // 0x360b @0x5
0x3606…3620 at0006 = ╱46╱F╱ // 0x360c @0x6
0x3606…3620 at0007 = ╱5c╱Ø╱ // 0x360d @0x7
0x3606…3620 at0008 = ╱52╱R╱ // 0x360e @0x8
0x3606…3620 at0009 = ╱ed╱(╱ // 0x360f @0x9
0x3606…3620 at000a = ╱46╱F╱ // 0x3610 @0xa
0x3606…3620 at000b = ╱41╱A╱ // 0x3611 @0xb
0x3606…3620 at000c = ╱4b╱K╱ // 0x3612 @0xc
0x3606…3620 at000d = ╱50╱P╱ // 0x3613 @0xd
0x3606…3620 at000e = ╱4f╱O╱ // 0x3614 @0xe
0x3606…3620 at000f = ╱53╱S╱ // 0x3615 @0xf
0x3606…3620 at0010 = ╱54╱T╱ // 0x3616 @0x10
0x3606…3620 at0011 = ╱4e╱N╱ // 0x3617 @0x11
0x3606…3620 at0012 = ╱52╱R╱ // 0x3618 @0x12
0x3606…3620 at0013 = ╱ec╱,╱ // 0x3619 @0x13
0x3606…3620 at0014 = ╱4b╱K╱ // 0x361a @0x14
0x3606…3620 at0015 = ╱31╱1╱ // 0x361b @0x15
0x3606…3620 at0016 = ╱32╱2╱ // 0x361c @0x16
0x3606…3620 at0017 = ╱ef╱$╱ // 0x361d @0x17
0x3606…3620 at0018 = ╱ee╱)╱ // 0x361e @0x18
0x3606…3620 at0019 = EOL // 0x361f @0x19
0x3606…3620 }
0x3620…3651 c3a8 4580 TEKSTKODE=28;TK$="0";ENTKO=1000000
0x3620…3651 LineComalBin {
0x3620…3651 ptr = 0xc3a8 // 0x3620 @0x0
0x3620…3651 lno = 0x11e4 // 0x3622 @0x2
0x3620…3651 at0004 = ╱54╱T╱ // 0x3624 @0x4
0x3620…3651 at0005 = ╱45╱E╱ // 0x3625 @0x5
0x3620…3651 at0006 = ╱4b╱K╱ // 0x3626 @0x6
0x3620…3651 at0007 = ╱53╱S╱ // 0x3627 @0x7
0x3620…3651 at0008 = ╱54╱T╱ // 0x3628 @0x8
0x3620…3651 at0009 = ╱4b╱K╱ // 0x3629 @0x9
0x3620…3651 at000a = ╱4f╱O╱ // 0x362a @0xa
0x3620…3651 at000b = ╱44╱D╱ // 0x362b @0xb
0x3620…3651 at000c = ╱45╱E╱ // 0x362c @0xc
0x3620…3651 at000d = ╱dc╱=╱ // 0x362d @0xd
0x3620…3651 at000e = ╱32╱2╱ // 0x362e @0xe
0x3620…3651 at000f = ╱38╱8╱ // 0x362f @0xf
0x3620…3651 at0010 = ╱fe0000e005╱ // 0x3630 @0x10
0x3620…3651 at0015 = ╱eb╱;╱ // 0x3635 @0x15
0x3620…3651 at0016 = ╱54╱T╱ // 0x3636 @0x16
0x3620…3651 at0017 = ╱4b╱K╱ // 0x3637 @0x17
0x3620…3651 at0018 = ╱ef╱$╱ // 0x3638 @0x18
0x3620…3651 at0019 = ╱dc╱=╱ // 0x3639 @0x19
0x3620…3651 at001a = ╱22╱"╱ // 0x363a @0x1a
0x3620…3651 at001b = ╱30╱0╱ // 0x363b @0x1b
0x3620…3651 at001c = ╱22╱"╱ // 0x363c @0x1c
0x3620…3651 at001d = ╱eb╱;╱ // 0x363d @0x1d
0x3620…3651 at001e = ╱45╱E╱ // 0x363e @0x1e
0x3620…3651 at001f = ╱4e╱N╱ // 0x363f @0x1f
0x3620…3651 at0020 = ╱54╱T╱ // 0x3640 @0x20
0x3620…3651 at0021 = ╱4b╱K╱ // 0x3641 @0x21
0x3620…3651 at0022 = ╱4f╱O╱ // 0x3642 @0x22
0x3620…3651 at0023 = ╱dc╱=╱ // 0x3643 @0x23
0x3620…3651 at0024 = ╱31╱1╱ // 0x3644 @0x24
0x3620…3651 at0025 = ╱30╱0╱ // 0x3645 @0x25
0x3620…3651 at0026 = ╱30╱0╱ // 0x3646 @0x26
0x3620…3651 at0027 = ╱30╱0╱ // 0x3647 @0x27
0x3620…3651 at0028 = ╱30╱0╱ // 0x3648 @0x28
0x3620…3651 at0029 = ╱30╱0╱ // 0x3649 @0x29
0x3620…3651 at002a = ╱30╱0╱ // 0x364a @0x2a
0x3620…3651 at002b = ╱fe0024f414╱ // 0x364b @0x2b
0x3620…3651 at0030 = EOL // 0x3650 @0x30
0x3620…3651 }
0x3651…3667 c3be 4590 TKODE$=CHR(76)
0x3651…3667 LineComalBin {
0x3651…3667 ptr = 0xc3be // 0x3651 @0x0
0x3651…3667 lno = 0x11ee // 0x3653 @0x2
0x3651…3667 at0004 = ╱54╱T╱ // 0x3655 @0x4
0x3651…3667 at0005 = ╱4b╱K╱ // 0x3656 @0x5
0x3651…3667 at0006 = ╱4f╱O╱ // 0x3657 @0x6
0x3651…3667 at0007 = ╱44╱D╱ // 0x3658 @0x7
0x3651…3667 at0008 = ╱45╱E╱ // 0x3659 @0x8
0x3651…3667 at0009 = ╱ef╱$╱ // 0x365a @0x9
0x3651…3667 at000a = ╱dc╱=╱ // 0x365b @0xa
0x3651…3667 at000b = ╱cf╱CHR╱ // 0x365c @0xb
0x3651…3667 at000c = ╱ed╱(╱ // 0x365d @0xc
0x3651…3667 at000d = ╱37╱7╱ // 0x365e @0xd
0x3651…3667 at000e = ╱36╱6╱ // 0x365f @0xe
0x3651…3667 at000f = ╱fe00009807╱ // 0x3660 @0xf
0x3651…3667 at0014 = ╱ee╱)╱ // 0x3665 @0x14
0x3651…3667 at0015 = EOL // 0x3666 @0x15
0x3651…3667 }
0x3667…3676 c3cd 4600 DDATO=DATO
0x3667…3676 LineComalBin {
0x3667…3676 ptr = 0xc3cd // 0x3667 @0x0
0x3667…3676 lno = 0x11f8 // 0x3669 @0x2
0x3667…3676 at0004 = ╱44╱D╱ // 0x366b @0x4
0x3667…3676 at0005 = ╱44╱D╱ // 0x366c @0x5
0x3667…3676 at0006 = ╱41╱A╱ // 0x366d @0x6
0x3667…3676 at0007 = ╱54╱T╱ // 0x366e @0x7
0x3667…3676 at0008 = ╱4f╱O╱ // 0x366f @0x8
0x3667…3676 at0009 = ╱dc╱=╱ // 0x3670 @0x9
0x3667…3676 at000a = ╱44╱D╱ // 0x3671 @0xa
0x3667…3676 at000b = ╱41╱A╱ // 0x3672 @0xb
0x3667…3676 at000c = ╱54╱T╱ // 0x3673 @0xc
0x3667…3676 at000d = ╱4f╱O╱ // 0x3674 @0xd
0x3667…3676 at000e = EOL // 0x3675 @0xe
0x3667…3676 }
0x3676…3689 c3e0 4610 BILAG=BJSIDENR
0x3676…3689 LineComalBin {
0x3676…3689 ptr = 0xc3e0 // 0x3676 @0x0
0x3676…3689 lno = 0x1202 // 0x3678 @0x2
0x3676…3689 at0004 = ╱42╱B╱ // 0x367a @0x4
0x3676…3689 at0005 = ╱49╱I╱ // 0x367b @0x5
0x3676…3689 at0006 = ╱4c╱L╱ // 0x367c @0x6
0x3676…3689 at0007 = ╱41╱A╱ // 0x367d @0x7
0x3676…3689 at0008 = ╱47╱G╱ // 0x367e @0x8
0x3676…3689 at0009 = ╱dc╱=╱ // 0x367f @0x9
0x3676…3689 at000a = ╱42╱B╱ // 0x3680 @0xa
0x3676…3689 at000b = ╱4a╱J╱ // 0x3681 @0xb
0x3676…3689 at000c = ╱53╱S╱ // 0x3682 @0xc
0x3676…3689 at000d = ╱49╱I╱ // 0x3683 @0xd
0x3676…3689 at000e = ╱44╱D╱ // 0x3684 @0xe
0x3676…3689 at000f = ╱45╱E╱ // 0x3685 @0xf
0x3676…3689 at0010 = ╱4e╱N╱ // 0x3686 @0x10
0x3676…3689 at0011 = ╱52╱R╱ // 0x3687 @0x11
0x3676…3689 at0012 = EOL // 0x3688 @0x12
0x3676…3689 }
0x3689…369d c3f4 4620 KONTO=INDMOMSNR
0x3689…369d LineComalBin {
0x3689…369d ptr = 0xc3f4 // 0x3689 @0x0
0x3689…369d lno = 0x120c // 0x368b @0x2
0x3689…369d at0004 = ╱4b╱K╱ // 0x368d @0x4
0x3689…369d at0005 = ╱4f╱O╱ // 0x368e @0x5
0x3689…369d at0006 = ╱4e╱N╱ // 0x368f @0x6
0x3689…369d at0007 = ╱54╱T╱ // 0x3690 @0x7
0x3689…369d at0008 = ╱4f╱O╱ // 0x3691 @0x8
0x3689…369d at0009 = ╱dc╱=╱ // 0x3692 @0x9
0x3689…369d at000a = ╱49╱I╱ // 0x3693 @0xa
0x3689…369d at000b = ╱4e╱N╱ // 0x3694 @0xb
0x3689…369d at000c = ╱44╱D╱ // 0x3695 @0xc
0x3689…369d at000d = ╱4d╱M╱ // 0x3696 @0xd
0x3689…369d at000e = ╱4f╱O╱ // 0x3697 @0xe
0x3689…369d at000f = ╱4d╱M╱ // 0x3698 @0xf
0x3689…369d at0010 = ╱53╱S╱ // 0x3699 @0x10
0x3689…369d at0011 = ╱4e╱N╱ // 0x369a @0x11
0x3689…369d at0012 = ╱52╱R╱ // 0x369b @0x12
0x3689…369d at0013 = EOL // 0x369c @0x13
0x3689…369d }
0x369d…36b1 c408 4630 BELØB$=INDMOMS$
0x369d…36b1 LineComalBin {
0x369d…36b1 ptr = 0xc408 // 0x369d @0x0
0x369d…36b1 lno = 0x1216 // 0x369f @0x2
0x369d…36b1 at0004 = ╱42╱B╱ // 0x36a1 @0x4
0x369d…36b1 at0005 = ╱45╱E╱ // 0x36a2 @0x5
0x369d…36b1 at0006 = ╱4c╱L╱ // 0x36a3 @0x6
0x369d…36b1 at0007 = ╱5c╱Ø╱ // 0x36a4 @0x7
0x369d…36b1 at0008 = ╱42╱B╱ // 0x36a5 @0x8
0x369d…36b1 at0009 = ╱ef╱$╱ // 0x36a6 @0x9
0x369d…36b1 at000a = ╱dc╱=╱ // 0x36a7 @0xa
0x369d…36b1 at000b = ╱49╱I╱ // 0x36a8 @0xb
0x369d…36b1 at000c = ╱4e╱N╱ // 0x36a9 @0xc
0x369d…36b1 at000d = ╱44╱D╱ // 0x36aa @0xd
0x369d…36b1 at000e = ╱4d╱M╱ // 0x36ab @0xe
0x369d…36b1 at000f = ╱4f╱O╱ // 0x36ac @0xf
0x369d…36b1 at0010 = ╱4d╱M╱ // 0x36ad @0x10
0x369d…36b1 at0011 = ╱53╱S╱ // 0x36ae @0x11
0x369d…36b1 at0012 = ╱ef╱$╱ // 0x36af @0x12
0x369d…36b1 at0013 = EOL // 0x36b0 @0x13
0x369d…36b1 }
0x36b1…36ea c441 4640 EXEC BOGFØRING(KONTO,DDATO,BILAG,TEKSTKODE,BELØB$,ENTKO)
0x36b1…36ea LineComalBin {
0x36b1…36ea ptr = 0xc441 // 0x36b1 @0x0
0x36b1…36ea lno = 0x1220 // 0x36b3 @0x2
0x36b1…36ea at0004 = ╱9d╱ EXEC ╱ // 0x36b5 @0x4
0x36b1…36ea at0005 = ╱42╱B╱ // 0x36b6 @0x5
0x36b1…36ea at0006 = ╱4f╱O╱ // 0x36b7 @0x6
0x36b1…36ea at0007 = ╱47╱G╱ // 0x36b8 @0x7
0x36b1…36ea at0008 = ╱46╱F╱ // 0x36b9 @0x8
0x36b1…36ea at0009 = ╱5c╱Ø╱ // 0x36ba @0x9
0x36b1…36ea at000a = ╱52╱R╱ // 0x36bb @0xa
0x36b1…36ea at000b = ╱49╱I╱ // 0x36bc @0xb
0x36b1…36ea at000c = ╱4e╱N╱ // 0x36bd @0xc
0x36b1…36ea at000d = ╱47╱G╱ // 0x36be @0xd
0x36b1…36ea at000e = ╱ed╱(╱ // 0x36bf @0xe
0x36b1…36ea at000f = ╱4b╱K╱ // 0x36c0 @0xf
0x36b1…36ea at0010 = ╱4f╱O╱ // 0x36c1 @0x10
0x36b1…36ea at0011 = ╱4e╱N╱ // 0x36c2 @0x11
0x36b1…36ea at0012 = ╱54╱T╱ // 0x36c3 @0x12
0x36b1…36ea at0013 = ╱4f╱O╱ // 0x36c4 @0x13
0x36b1…36ea at0014 = ╱ec╱,╱ // 0x36c5 @0x14
0x36b1…36ea at0015 = ╱44╱D╱ // 0x36c6 @0x15
0x36b1…36ea at0016 = ╱44╱D╱ // 0x36c7 @0x16
0x36b1…36ea at0017 = ╱41╱A╱ // 0x36c8 @0x17
0x36b1…36ea at0018 = ╱54╱T╱ // 0x36c9 @0x18
0x36b1…36ea at0019 = ╱4f╱O╱ // 0x36ca @0x19
0x36b1…36ea at001a = ╱ec╱,╱ // 0x36cb @0x1a
0x36b1…36ea at001b = ╱42╱B╱ // 0x36cc @0x1b
0x36b1…36ea at001c = ╱49╱I╱ // 0x36cd @0x1c
0x36b1…36ea at001d = ╱4c╱L╱ // 0x36ce @0x1d
0x36b1…36ea at001e = ╱41╱A╱ // 0x36cf @0x1e
0x36b1…36ea at001f = ╱47╱G╱ // 0x36d0 @0x1f
0x36b1…36ea at0020 = ╱ec╱,╱ // 0x36d1 @0x20
0x36b1…36ea at0021 = ╱54╱T╱ // 0x36d2 @0x21
0x36b1…36ea at0022 = ╱45╱E╱ // 0x36d3 @0x22
0x36b1…36ea at0023 = ╱4b╱K╱ // 0x36d4 @0x23
0x36b1…36ea at0024 = ╱53╱S╱ // 0x36d5 @0x24
0x36b1…36ea at0025 = ╱54╱T╱ // 0x36d6 @0x25
0x36b1…36ea at0026 = ╱4b╱K╱ // 0x36d7 @0x26
0x36b1…36ea at0027 = ╱4f╱O╱ // 0x36d8 @0x27
0x36b1…36ea at0028 = ╱44╱D╱ // 0x36d9 @0x28
0x36b1…36ea at0029 = ╱45╱E╱ // 0x36da @0x29
0x36b1…36ea at002a = ╱ec╱,╱ // 0x36db @0x2a
0x36b1…36ea at002b = ╱42╱B╱ // 0x36dc @0x2b
0x36b1…36ea at002c = ╱45╱E╱ // 0x36dd @0x2c
0x36b1…36ea at002d = ╱4c╱L╱ // 0x36de @0x2d
0x36b1…36ea at002e = ╱5c╱Ø╱ // 0x36df @0x2e
0x36b1…36ea at002f = ╱42╱B╱ // 0x36e0 @0x2f
0x36b1…36ea at0030 = ╱ef╱$╱ // 0x36e1 @0x30
0x36b1…36ea at0031 = ╱ec╱,╱ // 0x36e2 @0x31
0x36b1…36ea at0032 = ╱45╱E╱ // 0x36e3 @0x32
0x36b1…36ea at0033 = ╱4e╱N╱ // 0x36e4 @0x33
0x36b1…36ea at0034 = ╱54╱T╱ // 0x36e5 @0x34
0x36b1…36ea at0035 = ╱4b╱K╱ // 0x36e6 @0x35
0x36b1…36ea at0036 = ╱4f╱O╱ // 0x36e7 @0x36
0x36b1…36ea at0037 = ╱ee╱)╱ // 0x36e8 @0x37
0x36b1…36ea at0038 = EOL // 0x36e9 @0x38
0x36b1…36ea }
0x36ea…3700 c457 4650 TEKSTKODE=10
0x36ea…3700 LineComalBin {
0x36ea…3700 ptr = 0xc457 // 0x36ea @0x0
0x36ea…3700 lno = 0x122a // 0x36ec @0x2
0x36ea…3700 at0004 = ╱54╱T╱ // 0x36ee @0x4
0x36ea…3700 at0005 = ╱45╱E╱ // 0x36ef @0x5
0x36ea…3700 at0006 = ╱4b╱K╱ // 0x36f0 @0x6
0x36ea…3700 at0007 = ╱53╱S╱ // 0x36f1 @0x7
0x36ea…3700 at0008 = ╱54╱T╱ // 0x36f2 @0x8
0x36ea…3700 at0009 = ╱4b╱K╱ // 0x36f3 @0x9
0x36ea…3700 at000a = ╱4f╱O╱ // 0x36f4 @0xa
0x36ea…3700 at000b = ╱44╱D╱ // 0x36f5 @0xb
0x36ea…3700 at000c = ╱45╱E╱ // 0x36f6 @0xc
0x36ea…3700 at000d = ╱dc╱=╱ // 0x36f7 @0xd
0x36ea…3700 at000e = ╱31╱1╱ // 0x36f8 @0xe
0x36ea…3700 at000f = ╱30╱0╱ // 0x36f9 @0xf
0x36ea…3700 at0010 = ╱fe0000a004╱ // 0x36fa @0x10
0x36ea…3700 at0015 = EOL // 0x36ff @0x15
0x36ea…3700 }
0x3700…3725 c47c 4660 TEKST$="Samlet indgående afgift"
0x3700…3725 LineComalBin {
0x3700…3725 ptr = 0xc47c // 0x3700 @0x0
0x3700…3725 lno = 0x1234 // 0x3702 @0x2
0x3700…3725 at0004 = ╱54╱T╱ // 0x3704 @0x4
0x3700…3725 at0005 = ╱45╱E╱ // 0x3705 @0x5
0x3700…3725 at0006 = ╱4b╱K╱ // 0x3706 @0x6
0x3700…3725 at0007 = ╱53╱S╱ // 0x3707 @0x7
0x3700…3725 at0008 = ╱54╱T╱ // 0x3708 @0x8
0x3700…3725 at0009 = ╱ef╱$╱ // 0x3709 @0x9
0x3700…3725 at000a = ╱dc╱=╱ // 0x370a @0xa
0x3700…3725 at000b = ╱22╱"╱ // 0x370b @0xb
0x3700…3725 at000c = ╱53╱S╱ // 0x370c @0xc
0x3700…3725 at000d = ╱61╱a╱ // 0x370d @0xd
0x3700…3725 at000e = ╱6d╱m╱ // 0x370e @0xe
0x3700…3725 at000f = ╱6c╱l╱ // 0x370f @0xf
0x3700…3725 at0010 = ╱65╱e╱ // 0x3710 @0x10
0x3700…3725 at0011 = ╱74╱t╱ // 0x3711 @0x11
0x3700…3725 at0012 = ╱20╱…╱ // 0x3712 @0x12
0x3700…3725 at0013 = ╱69╱i╱ // 0x3713 @0x13
0x3700…3725 at0014 = ╱6e╱n╱ // 0x3714 @0x14
0x3700…3725 at0015 = ╱64╱d╱ // 0x3715 @0x15
0x3700…3725 at0016 = ╱67╱g╱ // 0x3716 @0x16
0x3700…3725 at0017 = ╱7d╱å╱ // 0x3717 @0x17
0x3700…3725 at0018 = ╱65╱e╱ // 0x3718 @0x18
0x3700…3725 at0019 = ╱6e╱n╱ // 0x3719 @0x19
0x3700…3725 at001a = ╱64╱d╱ // 0x371a @0x1a
0x3700…3725 at001b = ╱65╱e╱ // 0x371b @0x1b
0x3700…3725 at001c = ╱20╱…╱ // 0x371c @0x1c
0x3700…3725 at001d = ╱61╱a╱ // 0x371d @0x1d
0x3700…3725 at001e = ╱66╱f╱ // 0x371e @0x1e
0x3700…3725 at001f = ╱67╱g╱ // 0x371f @0x1f
0x3700…3725 at0020 = ╱69╱i╱ // 0x3720 @0x20
0x3700…3725 at0021 = ╱66╱f╱ // 0x3721 @0x21
0x3700…3725 at0022 = ╱74╱t╱ // 0x3722 @0x22
0x3700…3725 at0023 = ╱22╱"╱ // 0x3723 @0x23
0x3700…3725 at0024 = EOL // 0x3724 @0x24
0x3700…3725 }
0x3725…374c c4a3 4670 EXEC BJUDSKRIV(BJSIDENR,BJLINIENR,TK$)
0x3725…374c LineComalBin {
0x3725…374c ptr = 0xc4a3 // 0x3725 @0x0
0x3725…374c lno = 0x123e // 0x3727 @0x2
0x3725…374c at0004 = ╱9d╱ EXEC ╱ // 0x3729 @0x4
0x3725…374c at0005 = ╱42╱B╱ // 0x372a @0x5
0x3725…374c at0006 = ╱4a╱J╱ // 0x372b @0x6
0x3725…374c at0007 = ╱55╱U╱ // 0x372c @0x7
0x3725…374c at0008 = ╱44╱D╱ // 0x372d @0x8
0x3725…374c at0009 = ╱53╱S╱ // 0x372e @0x9
0x3725…374c at000a = ╱4b╱K╱ // 0x372f @0xa
0x3725…374c at000b = ╱52╱R╱ // 0x3730 @0xb
0x3725…374c at000c = ╱49╱I╱ // 0x3731 @0xc
0x3725…374c at000d = ╱56╱V╱ // 0x3732 @0xd
0x3725…374c at000e = ╱ed╱(╱ // 0x3733 @0xe
0x3725…374c at000f = ╱42╱B╱ // 0x3734 @0xf
0x3725…374c at0010 = ╱4a╱J╱ // 0x3735 @0x10
0x3725…374c at0011 = ╱53╱S╱ // 0x3736 @0x11
0x3725…374c at0012 = ╱49╱I╱ // 0x3737 @0x12
0x3725…374c at0013 = ╱44╱D╱ // 0x3738 @0x13
0x3725…374c at0014 = ╱45╱E╱ // 0x3739 @0x14
0x3725…374c at0015 = ╱4e╱N╱ // 0x373a @0x15
0x3725…374c at0016 = ╱52╱R╱ // 0x373b @0x16
0x3725…374c at0017 = ╱ec╱,╱ // 0x373c @0x17
0x3725…374c at0018 = ╱42╱B╱ // 0x373d @0x18
0x3725…374c at0019 = ╱4a╱J╱ // 0x373e @0x19
0x3725…374c at001a = ╱4c╱L╱ // 0x373f @0x1a
0x3725…374c at001b = ╱49╱I╱ // 0x3740 @0x1b
0x3725…374c at001c = ╱4e╱N╱ // 0x3741 @0x1c
0x3725…374c at001d = ╱49╱I╱ // 0x3742 @0x1d
0x3725…374c at001e = ╱45╱E╱ // 0x3743 @0x1e
0x3725…374c at001f = ╱4e╱N╱ // 0x3744 @0x1f
0x3725…374c at0020 = ╱52╱R╱ // 0x3745 @0x20
0x3725…374c at0021 = ╱ec╱,╱ // 0x3746 @0x21
0x3725…374c at0022 = ╱54╱T╱ // 0x3747 @0x22
0x3725…374c at0023 = ╱4b╱K╱ // 0x3748 @0x23
0x3725…374c at0024 = ╱ef╱$╱ // 0x3749 @0x24
0x3725…374c at0025 = ╱ee╱)╱ // 0x374a @0x25
0x3725…374c at0026 = EOL // 0x374b @0x26
0x3725…374c }
0x374c…3762 c4b9 4680 TEKSTKODE=28
0x374c…3762 LineComalBin {
0x374c…3762 ptr = 0xc4b9 // 0x374c @0x0
0x374c…3762 lno = 0x1248 // 0x374e @0x2
0x374c…3762 at0004 = ╱54╱T╱ // 0x3750 @0x4
0x374c…3762 at0005 = ╱45╱E╱ // 0x3751 @0x5
0x374c…3762 at0006 = ╱4b╱K╱ // 0x3752 @0x6
0x374c…3762 at0007 = ╱53╱S╱ // 0x3753 @0x7
0x374c…3762 at0008 = ╱54╱T╱ // 0x3754 @0x8
0x374c…3762 at0009 = ╱4b╱K╱ // 0x3755 @0x9
0x374c…3762 at000a = ╱4f╱O╱ // 0x3756 @0xa
0x374c…3762 at000b = ╱44╱D╱ // 0x3757 @0xb
0x374c…3762 at000c = ╱45╱E╱ // 0x3758 @0xc
0x374c…3762 at000d = ╱dc╱=╱ // 0x3759 @0xd
0x374c…3762 at000e = ╱32╱2╱ // 0x375a @0xe
0x374c…3762 at000f = ╱38╱8╱ // 0x375b @0xf
0x374c…3762 at0010 = ╱fe0000e005╱ // 0x375c @0x10
0x374c…3762 at0015 = EOL // 0x3761 @0x15
0x374c…3762 }
0x3762…3775 c4cc 4690 KONTO=UDMOMSNR
0x3762…3775 LineComalBin {
0x3762…3775 ptr = 0xc4cc // 0x3762 @0x0
0x3762…3775 lno = 0x1252 // 0x3764 @0x2
0x3762…3775 at0004 = ╱4b╱K╱ // 0x3766 @0x4
0x3762…3775 at0005 = ╱4f╱O╱ // 0x3767 @0x5
0x3762…3775 at0006 = ╱4e╱N╱ // 0x3768 @0x6
0x3762…3775 at0007 = ╱54╱T╱ // 0x3769 @0x7
0x3762…3775 at0008 = ╱4f╱O╱ // 0x376a @0x8
0x3762…3775 at0009 = ╱dc╱=╱ // 0x376b @0x9
0x3762…3775 at000a = ╱55╱U╱ // 0x376c @0xa
0x3762…3775 at000b = ╱44╱D╱ // 0x376d @0xb
0x3762…3775 at000c = ╱4d╱M╱ // 0x376e @0xc
0x3762…3775 at000d = ╱4f╱O╱ // 0x376f @0xd
0x3762…3775 at000e = ╱4d╱M╱ // 0x3770 @0xe
0x3762…3775 at000f = ╱53╱S╱ // 0x3771 @0xf
0x3762…3775 at0010 = ╱4e╱N╱ // 0x3772 @0x10
0x3762…3775 at0011 = ╱52╱R╱ // 0x3773 @0x11
0x3762…3775 at0012 = EOL // 0x3774 @0x12
0x3762…3775 }
0x3775…3788 c4df 4700 BELØB$=UDMOMS$
0x3775…3788 LineComalBin {
0x3775…3788 ptr = 0xc4df // 0x3775 @0x0
0x3775…3788 lno = 0x125c // 0x3777 @0x2
0x3775…3788 at0004 = ╱42╱B╱ // 0x3779 @0x4
0x3775…3788 at0005 = ╱45╱E╱ // 0x377a @0x5
0x3775…3788 at0006 = ╱4c╱L╱ // 0x377b @0x6
0x3775…3788 at0007 = ╱5c╱Ø╱ // 0x377c @0x7
0x3775…3788 at0008 = ╱42╱B╱ // 0x377d @0x8
0x3775…3788 at0009 = ╱ef╱$╱ // 0x377e @0x9
0x3775…3788 at000a = ╱dc╱=╱ // 0x377f @0xa
0x3775…3788 at000b = ╱55╱U╱ // 0x3780 @0xb
0x3775…3788 at000c = ╱44╱D╱ // 0x3781 @0xc
0x3775…3788 at000d = ╱4d╱M╱ // 0x3782 @0xd
0x3775…3788 at000e = ╱4f╱O╱ // 0x3783 @0xe
0x3775…3788 at000f = ╱4d╱M╱ // 0x3784 @0xf
0x3775…3788 at0010 = ╱53╱S╱ // 0x3785 @0x10
0x3775…3788 at0011 = ╱ef╱$╱ // 0x3786 @0x11
0x3775…3788 at0012 = EOL // 0x3787 @0x12
0x3775…3788 }
0x3788…37c1 c518 4710 EXEC BOGFØRING(KONTO,DDATO,BILAG,TEKSTKODE,BELØB$,ENTKO)
0x3788…37c1 LineComalBin {
0x3788…37c1 ptr = 0xc518 // 0x3788 @0x0
0x3788…37c1 lno = 0x1266 // 0x378a @0x2
0x3788…37c1 at0004 = ╱9d╱ EXEC ╱ // 0x378c @0x4
0x3788…37c1 at0005 = ╱42╱B╱ // 0x378d @0x5
0x3788…37c1 at0006 = ╱4f╱O╱ // 0x378e @0x6
0x3788…37c1 at0007 = ╱47╱G╱ // 0x378f @0x7
0x3788…37c1 at0008 = ╱46╱F╱ // 0x3790 @0x8
0x3788…37c1 at0009 = ╱5c╱Ø╱ // 0x3791 @0x9
0x3788…37c1 at000a = ╱52╱R╱ // 0x3792 @0xa
0x3788…37c1 at000b = ╱49╱I╱ // 0x3793 @0xb
0x3788…37c1 at000c = ╱4e╱N╱ // 0x3794 @0xc
0x3788…37c1 at000d = ╱47╱G╱ // 0x3795 @0xd
0x3788…37c1 at000e = ╱ed╱(╱ // 0x3796 @0xe
0x3788…37c1 at000f = ╱4b╱K╱ // 0x3797 @0xf
0x3788…37c1 at0010 = ╱4f╱O╱ // 0x3798 @0x10
0x3788…37c1 at0011 = ╱4e╱N╱ // 0x3799 @0x11
0x3788…37c1 at0012 = ╱54╱T╱ // 0x379a @0x12
0x3788…37c1 at0013 = ╱4f╱O╱ // 0x379b @0x13
0x3788…37c1 at0014 = ╱ec╱,╱ // 0x379c @0x14
0x3788…37c1 at0015 = ╱44╱D╱ // 0x379d @0x15
0x3788…37c1 at0016 = ╱44╱D╱ // 0x379e @0x16
0x3788…37c1 at0017 = ╱41╱A╱ // 0x379f @0x17
0x3788…37c1 at0018 = ╱54╱T╱ // 0x37a0 @0x18
0x3788…37c1 at0019 = ╱4f╱O╱ // 0x37a1 @0x19
0x3788…37c1 at001a = ╱ec╱,╱ // 0x37a2 @0x1a
0x3788…37c1 at001b = ╱42╱B╱ // 0x37a3 @0x1b
0x3788…37c1 at001c = ╱49╱I╱ // 0x37a4 @0x1c
0x3788…37c1 at001d = ╱4c╱L╱ // 0x37a5 @0x1d
0x3788…37c1 at001e = ╱41╱A╱ // 0x37a6 @0x1e
0x3788…37c1 at001f = ╱47╱G╱ // 0x37a7 @0x1f
0x3788…37c1 at0020 = ╱ec╱,╱ // 0x37a8 @0x20
0x3788…37c1 at0021 = ╱54╱T╱ // 0x37a9 @0x21
0x3788…37c1 at0022 = ╱45╱E╱ // 0x37aa @0x22
0x3788…37c1 at0023 = ╱4b╱K╱ // 0x37ab @0x23
0x3788…37c1 at0024 = ╱53╱S╱ // 0x37ac @0x24
0x3788…37c1 at0025 = ╱54╱T╱ // 0x37ad @0x25
0x3788…37c1 at0026 = ╱4b╱K╱ // 0x37ae @0x26
0x3788…37c1 at0027 = ╱4f╱O╱ // 0x37af @0x27
0x3788…37c1 at0028 = ╱44╱D╱ // 0x37b0 @0x28
0x3788…37c1 at0029 = ╱45╱E╱ // 0x37b1 @0x29
0x3788…37c1 at002a = ╱ec╱,╱ // 0x37b2 @0x2a
0x3788…37c1 at002b = ╱42╱B╱ // 0x37b3 @0x2b
0x3788…37c1 at002c = ╱45╱E╱ // 0x37b4 @0x2c
0x3788…37c1 at002d = ╱4c╱L╱ // 0x37b5 @0x2d
0x3788…37c1 at002e = ╱5c╱Ø╱ // 0x37b6 @0x2e
0x3788…37c1 at002f = ╱42╱B╱ // 0x37b7 @0x2f
0x3788…37c1 at0030 = ╱ef╱$╱ // 0x37b8 @0x30
0x3788…37c1 at0031 = ╱ec╱,╱ // 0x37b9 @0x31
0x3788…37c1 at0032 = ╱45╱E╱ // 0x37ba @0x32
0x3788…37c1 at0033 = ╱4e╱N╱ // 0x37bb @0x33
0x3788…37c1 at0034 = ╱54╱T╱ // 0x37bc @0x34
0x3788…37c1 at0035 = ╱4b╱K╱ // 0x37bd @0x35
0x3788…37c1 at0036 = ╱4f╱O╱ // 0x37be @0x36
0x3788…37c1 at0037 = ╱ee╱)╱ // 0x37bf @0x37
0x3788…37c1 at0038 = EOL // 0x37c0 @0x38
0x3788…37c1 }
0x37c1…37d7 c52e 4720 TEKSTKODE=10
0x37c1…37d7 LineComalBin {
0x37c1…37d7 ptr = 0xc52e // 0x37c1 @0x0
0x37c1…37d7 lno = 0x1270 // 0x37c3 @0x2
0x37c1…37d7 at0004 = ╱54╱T╱ // 0x37c5 @0x4
0x37c1…37d7 at0005 = ╱45╱E╱ // 0x37c6 @0x5
0x37c1…37d7 at0006 = ╱4b╱K╱ // 0x37c7 @0x6
0x37c1…37d7 at0007 = ╱53╱S╱ // 0x37c8 @0x7
0x37c1…37d7 at0008 = ╱54╱T╱ // 0x37c9 @0x8
0x37c1…37d7 at0009 = ╱4b╱K╱ // 0x37ca @0x9
0x37c1…37d7 at000a = ╱4f╱O╱ // 0x37cb @0xa
0x37c1…37d7 at000b = ╱44╱D╱ // 0x37cc @0xb
0x37c1…37d7 at000c = ╱45╱E╱ // 0x37cd @0xc
0x37c1…37d7 at000d = ╱dc╱=╱ // 0x37ce @0xd
0x37c1…37d7 at000e = ╱31╱1╱ // 0x37cf @0xe
0x37c1…37d7 at000f = ╱30╱0╱ // 0x37d0 @0xf
0x37c1…37d7 at0010 = ╱fe0000a004╱ // 0x37d1 @0x10
0x37c1…37d7 at0015 = EOL // 0x37d6 @0x15
0x37c1…37d7 }
0x37d7…37fb c552 4730 TEKST$="Samlet udgående afgift"
0x37d7…37fb LineComalBin {
0x37d7…37fb ptr = 0xc552 // 0x37d7 @0x0
0x37d7…37fb lno = 0x127a // 0x37d9 @0x2
0x37d7…37fb at0004 = ╱54╱T╱ // 0x37db @0x4
0x37d7…37fb at0005 = ╱45╱E╱ // 0x37dc @0x5
0x37d7…37fb at0006 = ╱4b╱K╱ // 0x37dd @0x6
0x37d7…37fb at0007 = ╱53╱S╱ // 0x37de @0x7
0x37d7…37fb at0008 = ╱54╱T╱ // 0x37df @0x8
0x37d7…37fb at0009 = ╱ef╱$╱ // 0x37e0 @0x9
0x37d7…37fb at000a = ╱dc╱=╱ // 0x37e1 @0xa
0x37d7…37fb at000b = ╱22╱"╱ // 0x37e2 @0xb
0x37d7…37fb at000c = ╱53╱S╱ // 0x37e3 @0xc
0x37d7…37fb at000d = ╱61╱a╱ // 0x37e4 @0xd
0x37d7…37fb at000e = ╱6d╱m╱ // 0x37e5 @0xe
0x37d7…37fb at000f = ╱6c╱l╱ // 0x37e6 @0xf
0x37d7…37fb at0010 = ╱65╱e╱ // 0x37e7 @0x10
0x37d7…37fb at0011 = ╱74╱t╱ // 0x37e8 @0x11
0x37d7…37fb at0012 = ╱20╱…╱ // 0x37e9 @0x12
0x37d7…37fb at0013 = ╱75╱u╱ // 0x37ea @0x13
0x37d7…37fb at0014 = ╱64╱d╱ // 0x37eb @0x14
0x37d7…37fb at0015 = ╱67╱g╱ // 0x37ec @0x15
0x37d7…37fb at0016 = ╱7d╱å╱ // 0x37ed @0x16
0x37d7…37fb at0017 = ╱65╱e╱ // 0x37ee @0x17
0x37d7…37fb at0018 = ╱6e╱n╱ // 0x37ef @0x18
0x37d7…37fb at0019 = ╱64╱d╱ // 0x37f0 @0x19
0x37d7…37fb at001a = ╱65╱e╱ // 0x37f1 @0x1a
0x37d7…37fb at001b = ╱20╱…╱ // 0x37f2 @0x1b
0x37d7…37fb at001c = ╱61╱a╱ // 0x37f3 @0x1c
0x37d7…37fb at001d = ╱66╱f╱ // 0x37f4 @0x1d
0x37d7…37fb at001e = ╱67╱g╱ // 0x37f5 @0x1e
0x37d7…37fb at001f = ╱69╱i╱ // 0x37f6 @0x1f
0x37d7…37fb at0020 = ╱66╱f╱ // 0x37f7 @0x20
0x37d7…37fb at0021 = ╱74╱t╱ // 0x37f8 @0x21
0x37d7…37fb at0022 = ╱22╱"╱ // 0x37f9 @0x22
0x37d7…37fb at0023 = EOL // 0x37fa @0x23
0x37d7…37fb }
0x37fb…3822 c579 4740 EXEC BJUDSKRIV(BJSIDENR,BJLINIENR,TK$)
0x37fb…3822 LineComalBin {
0x37fb…3822 ptr = 0xc579 // 0x37fb @0x0
0x37fb…3822 lno = 0x1284 // 0x37fd @0x2
0x37fb…3822 at0004 = ╱9d╱ EXEC ╱ // 0x37ff @0x4
0x37fb…3822 at0005 = ╱42╱B╱ // 0x3800 @0x5
0x37fb…3822 at0006 = ╱4a╱J╱ // 0x3801 @0x6
0x37fb…3822 at0007 = ╱55╱U╱ // 0x3802 @0x7
0x37fb…3822 at0008 = ╱44╱D╱ // 0x3803 @0x8
0x37fb…3822 at0009 = ╱53╱S╱ // 0x3804 @0x9
0x37fb…3822 at000a = ╱4b╱K╱ // 0x3805 @0xa
0x37fb…3822 at000b = ╱52╱R╱ // 0x3806 @0xb
0x37fb…3822 at000c = ╱49╱I╱ // 0x3807 @0xc
0x37fb…3822 at000d = ╱56╱V╱ // 0x3808 @0xd
0x37fb…3822 at000e = ╱ed╱(╱ // 0x3809 @0xe
0x37fb…3822 at000f = ╱42╱B╱ // 0x380a @0xf
0x37fb…3822 at0010 = ╱4a╱J╱ // 0x380b @0x10
0x37fb…3822 at0011 = ╱53╱S╱ // 0x380c @0x11
0x37fb…3822 at0012 = ╱49╱I╱ // 0x380d @0x12
0x37fb…3822 at0013 = ╱44╱D╱ // 0x380e @0x13
0x37fb…3822 at0014 = ╱45╱E╱ // 0x380f @0x14
0x37fb…3822 at0015 = ╱4e╱N╱ // 0x3810 @0x15
0x37fb…3822 at0016 = ╱52╱R╱ // 0x3811 @0x16
0x37fb…3822 at0017 = ╱ec╱,╱ // 0x3812 @0x17
0x37fb…3822 at0018 = ╱42╱B╱ // 0x3813 @0x18
0x37fb…3822 at0019 = ╱4a╱J╱ // 0x3814 @0x19
0x37fb…3822 at001a = ╱4c╱L╱ // 0x3815 @0x1a
0x37fb…3822 at001b = ╱49╱I╱ // 0x3816 @0x1b
0x37fb…3822 at001c = ╱4e╱N╱ // 0x3817 @0x1c
0x37fb…3822 at001d = ╱49╱I╱ // 0x3818 @0x1d
0x37fb…3822 at001e = ╱45╱E╱ // 0x3819 @0x1e
0x37fb…3822 at001f = ╱4e╱N╱ // 0x381a @0x1f
0x37fb…3822 at0020 = ╱52╱R╱ // 0x381b @0x20
0x37fb…3822 at0021 = ╱ec╱,╱ // 0x381c @0x21
0x37fb…3822 at0022 = ╱54╱T╱ // 0x381d @0x22
0x37fb…3822 at0023 = ╱4b╱K╱ // 0x381e @0x23
0x37fb…3822 at0024 = ╱ef╱$╱ // 0x381f @0x24
0x37fb…3822 at0025 = ╱ee╱)╱ // 0x3820 @0x25
0x37fb…3822 at0026 = EOL // 0x3821 @0x26
0x37fb…3822 }
0x3822…3843 c59a 4750 EXEC CALC(4,SUM$,TAH$,TAH$)
0x3822…3843 LineComalBin {
0x3822…3843 ptr = 0xc59a // 0x3822 @0x0
0x3822…3843 lno = 0x128e // 0x3824 @0x2
0x3822…3843 at0004 = ╱9d╱ EXEC ╱ // 0x3826 @0x4
0x3822…3843 at0005 = ╱43╱C╱ // 0x3827 @0x5
0x3822…3843 at0006 = ╱41╱A╱ // 0x3828 @0x6
0x3822…3843 at0007 = ╱4c╱L╱ // 0x3829 @0x7
0x3822…3843 at0008 = ╱43╱C╱ // 0x382a @0x8
0x3822…3843 at0009 = ╱ed╱(╱ // 0x382b @0x9
0x3822…3843 at000a = ╱34╱4╱ // 0x382c @0xa
0x3822…3843 at000b = ╱fe00008003╱ // 0x382d @0xb
0x3822…3843 at0010 = ╱ec╱,╱ // 0x3832 @0x10
0x3822…3843 at0011 = ╱53╱S╱ // 0x3833 @0x11
0x3822…3843 at0012 = ╱55╱U╱ // 0x3834 @0x12
0x3822…3843 at0013 = ╱4d╱M╱ // 0x3835 @0x13
0x3822…3843 at0014 = ╱ef╱$╱ // 0x3836 @0x14
0x3822…3843 at0015 = ╱ec╱,╱ // 0x3837 @0x15
0x3822…3843 at0016 = ╱54╱T╱ // 0x3838 @0x16
0x3822…3843 at0017 = ╱41╱A╱ // 0x3839 @0x17
0x3822…3843 at0018 = ╱48╱H╱ // 0x383a @0x18
0x3822…3843 at0019 = ╱ef╱$╱ // 0x383b @0x19
0x3822…3843 at001a = ╱ec╱,╱ // 0x383c @0x1a
0x3822…3843 at001b = ╱54╱T╱ // 0x383d @0x1b
0x3822…3843 at001c = ╱41╱A╱ // 0x383e @0x1c
0x3822…3843 at001d = ╱48╱H╱ // 0x383f @0x1d
0x3822…3843 at001e = ╱ef╱$╱ // 0x3840 @0x1e
0x3822…3843 at001f = ╱ee╱)╱ // 0x3841 @0x1f
0x3822…3843 at0020 = EOL // 0x3842 @0x20
0x3822…3843 }
0x3843…3853 c5aa 4760 IF SI<>0 THEN
0x3843…3853 LineComalBin {
0x3843…3853 ptr = 0xc5aa // 0x3843 @0x0
0x3843…3853 lno = 0x1298 // 0x3845 @0x2
0x3843…3853 at0004 = ╱9c╱ IF ╱ // 0x3847 @0x4
0x3843…3853 at0005 = ╱53╱S╱ // 0x3848 @0x5
0x3843…3853 at0006 = ╱49╱I╱ // 0x3849 @0x6
0x3843…3853 at0007 = ╱e1╱<>╱ // 0x384a @0x7
0x3843…3853 at0008 = ╱30╱0╱ // 0x384b @0x8
0x3843…3853 at0009 = ╱fe00000000╱ // 0x384c @0x9
0x3843…3853 at000e = ╱b6╱ THEN ╱ // 0x3851 @0xe
0x3843…3853 at000f = EOL // 0x3852 @0xf
0x3843…3853 }
0x3853…3894 c5eb 4770 TEKSTKODE=10;KONTO=DIFNR;TEKST$="Difference bogholderi"
0x3853…3894 LineComalBin {
0x3853…3894 ptr = 0xc5eb // 0x3853 @0x0
0x3853…3894 lno = 0x12a2 // 0x3855 @0x2
0x3853…3894 at0004 = ╱54╱T╱ // 0x3857 @0x4
0x3853…3894 at0005 = ╱45╱E╱ // 0x3858 @0x5
0x3853…3894 at0006 = ╱4b╱K╱ // 0x3859 @0x6
0x3853…3894 at0007 = ╱53╱S╱ // 0x385a @0x7
0x3853…3894 at0008 = ╱54╱T╱ // 0x385b @0x8
0x3853…3894 at0009 = ╱4b╱K╱ // 0x385c @0x9
0x3853…3894 at000a = ╱4f╱O╱ // 0x385d @0xa
0x3853…3894 at000b = ╱44╱D╱ // 0x385e @0xb
0x3853…3894 at000c = ╱45╱E╱ // 0x385f @0xc
0x3853…3894 at000d = ╱dc╱=╱ // 0x3860 @0xd
0x3853…3894 at000e = ╱31╱1╱ // 0x3861 @0xe
0x3853…3894 at000f = ╱30╱0╱ // 0x3862 @0xf
0x3853…3894 at0010 = ╱fe0000a004╱ // 0x3863 @0x10
0x3853…3894 at0015 = ╱eb╱;╱ // 0x3868 @0x15
0x3853…3894 at0016 = ╱4b╱K╱ // 0x3869 @0x16
0x3853…3894 at0017 = ╱4f╱O╱ // 0x386a @0x17
0x3853…3894 at0018 = ╱4e╱N╱ // 0x386b @0x18
0x3853…3894 at0019 = ╱54╱T╱ // 0x386c @0x19
0x3853…3894 at001a = ╱4f╱O╱ // 0x386d @0x1a
0x3853…3894 at001b = ╱dc╱=╱ // 0x386e @0x1b
0x3853…3894 at001c = ╱44╱D╱ // 0x386f @0x1c
0x3853…3894 at001d = ╱49╱I╱ // 0x3870 @0x1d
0x3853…3894 at001e = ╱46╱F╱ // 0x3871 @0x1e
0x3853…3894 at001f = ╱4e╱N╱ // 0x3872 @0x1f
0x3853…3894 at0020 = ╱52╱R╱ // 0x3873 @0x20
0x3853…3894 at0021 = ╱eb╱;╱ // 0x3874 @0x21
0x3853…3894 at0022 = ╱54╱T╱ // 0x3875 @0x22
0x3853…3894 at0023 = ╱45╱E╱ // 0x3876 @0x23
0x3853…3894 at0024 = ╱4b╱K╱ // 0x3877 @0x24
0x3853…3894 at0025 = ╱53╱S╱ // 0x3878 @0x25
0x3853…3894 at0026 = ╱54╱T╱ // 0x3879 @0x26
0x3853…3894 at0027 = ╱ef╱$╱ // 0x387a @0x27
0x3853…3894 at0028 = ╱dc╱=╱ // 0x387b @0x28
0x3853…3894 at0029 = ╱22╱"╱ // 0x387c @0x29
0x3853…3894 at002a = ╱44╱D╱ // 0x387d @0x2a
0x3853…3894 at002b = ╱69╱i╱ // 0x387e @0x2b
0x3853…3894 at002c = ╱66╱f╱ // 0x387f @0x2c
0x3853…3894 at002d = ╱66╱f╱ // 0x3880 @0x2d
0x3853…3894 at002e = ╱65╱e╱ // 0x3881 @0x2e
0x3853…3894 at002f = ╱72╱r╱ // 0x3882 @0x2f
0x3853…3894 at0030 = ╱65╱e╱ // 0x3883 @0x30
0x3853…3894 at0031 = ╱6e╱n╱ // 0x3884 @0x31
0x3853…3894 at0032 = ╱63╱c╱ // 0x3885 @0x32
0x3853…3894 at0033 = ╱65╱e╱ // 0x3886 @0x33
0x3853…3894 at0034 = ╱20╱…╱ // 0x3887 @0x34
0x3853…3894 at0035 = ╱62╱b╱ // 0x3888 @0x35
0x3853…3894 at0036 = ╱6f╱o╱ // 0x3889 @0x36
0x3853…3894 at0037 = ╱67╱g╱ // 0x388a @0x37
0x3853…3894 at0038 = ╱68╱h╱ // 0x388b @0x38
0x3853…3894 at0039 = ╱6f╱o╱ // 0x388c @0x39
0x3853…3894 at003a = ╱6c╱l╱ // 0x388d @0x3a
0x3853…3894 at003b = ╱64╱d╱ // 0x388e @0x3b
0x3853…3894 at003c = ╱65╱e╱ // 0x388f @0x3c
0x3853…3894 at003d = ╱72╱r╱ // 0x3890 @0x3d
0x3853…3894 at003e = ╱69╱i╱ // 0x3891 @0x3e
0x3853…3894 at003f = ╱22╱"╱ // 0x3892 @0x3f
0x3853…3894 at0040 = EOL // 0x3893 @0x40
0x3853…3894 }
0x3894…38ac c603 4780 IF SUM$(LEN(SUM$))="+" THEN
0x3894…38ac LineComalBin {
0x3894…38ac ptr = 0xc603 // 0x3894 @0x0
0x3894…38ac lno = 0x12ac // 0x3896 @0x2
0x3894…38ac at0004 = ╱9c╱ IF ╱ // 0x3898 @0x4
0x3894…38ac at0005 = ╱53╱S╱ // 0x3899 @0x5
0x3894…38ac at0006 = ╱55╱U╱ // 0x389a @0x6
0x3894…38ac at0007 = ╱4d╱M╱ // 0x389b @0x7
0x3894…38ac at0008 = ╱ef╱$╱ // 0x389c @0x8
0x3894…38ac at0009 = ╱ed╱(╱ // 0x389d @0x9
0x3894…38ac at000a = ╱cc╱LEN╱ // 0x389e @0xa
0x3894…38ac at000b = ╱ed╱(╱ // 0x389f @0xb
0x3894…38ac at000c = ╱53╱S╱ // 0x38a0 @0xc
0x3894…38ac at000d = ╱55╱U╱ // 0x38a1 @0xd
0x3894…38ac at000e = ╱4d╱M╱ // 0x38a2 @0xe
0x3894…38ac at000f = ╱ef╱$╱ // 0x38a3 @0xf
0x3894…38ac at0010 = ╱ee╱)╱ // 0x38a4 @0x10
0x3894…38ac at0011 = ╱ee╱)╱ // 0x38a5 @0x11
0x3894…38ac at0012 = ╱dc╱=╱ // 0x38a6 @0x12
0x3894…38ac at0013 = ╱22╱"╱ // 0x38a7 @0x13
0x3894…38ac at0014 = ╱2b╱+╱ // 0x38a8 @0x14
0x3894…38ac at0015 = ╱22╱"╱ // 0x38a9 @0x15
0x3894…38ac at0016 = ╱b6╱ THEN ╱ // 0x38aa @0x16
0x3894…38ac at0017 = EOL // 0x38ab @0x17
0x3894…38ac }
0x38ac…38d7 c62e 4790 BELØB$=SUM$(1:LEN(SUM$)-1)+"-"
0x38ac…38d7 LineComalBin {
0x38ac…38d7 ptr = 0xc62e // 0x38ac @0x0
0x38ac…38d7 lno = 0x12b6 // 0x38ae @0x2
0x38ac…38d7 at0004 = ╱42╱B╱ // 0x38b0 @0x4
0x38ac…38d7 at0005 = ╱45╱E╱ // 0x38b1 @0x5
0x38ac…38d7 at0006 = ╱4c╱L╱ // 0x38b2 @0x6
0x38ac…38d7 at0007 = ╱5c╱Ø╱ // 0x38b3 @0x7
0x38ac…38d7 at0008 = ╱42╱B╱ // 0x38b4 @0x8
0x38ac…38d7 at0009 = ╱ef╱$╱ // 0x38b5 @0x9
0x38ac…38d7 at000a = ╱dc╱=╱ // 0x38b6 @0xa
0x38ac…38d7 at000b = ╱53╱S╱ // 0x38b7 @0xb
0x38ac…38d7 at000c = ╱55╱U╱ // 0x38b8 @0xc
0x38ac…38d7 at000d = ╱4d╱M╱ // 0x38b9 @0xd
0x38ac…38d7 at000e = ╱ef╱$╱ // 0x38ba @0xe
0x38ac…38d7 at000f = ╱ed╱(╱ // 0x38bb @0xf
0x38ac…38d7 at0010 = ╱31╱1╱ // 0x38bc @0x10
0x38ac…38d7 at0011 = ╱fe00008001╱ // 0x38bd @0x11
0x38ac…38d7 at0016 = ╱f0╱:╱ // 0x38c2 @0x16
0x38ac…38d7 at0017 = ╱cc╱LEN╱ // 0x38c3 @0x17
0x38ac…38d7 at0018 = ╱ed╱(╱ // 0x38c4 @0x18
0x38ac…38d7 at0019 = ╱53╱S╱ // 0x38c5 @0x19
0x38ac…38d7 at001a = ╱55╱U╱ // 0x38c6 @0x1a
0x38ac…38d7 at001b = ╱4d╱M╱ // 0x38c7 @0x1b
0x38ac…38d7 at001c = ╱ef╱$╱ // 0x38c8 @0x1c
0x38ac…38d7 at001d = ╱ee╱)╱ // 0x38c9 @0x1d
0x38ac…38d7 at001e = ╱e3╱-╱ // 0x38ca @0x1e
0x38ac…38d7 at001f = ╱31╱1╱ // 0x38cb @0x1f
0x38ac…38d7 at0020 = ╱fe00008001╱ // 0x38cc @0x20
0x38ac…38d7 at0025 = ╱ee╱)╱ // 0x38d1 @0x25
0x38ac…38d7 at0026 = ╱f1╱+╱ // 0x38d2 @0x26
0x38ac…38d7 at0027 = ╱22╱"╱ // 0x38d3 @0x27
0x38ac…38d7 at0028 = ╱2d╱-╱ // 0x38d4 @0x28
0x38ac…38d7 at0029 = ╱22╱"╱ // 0x38d5 @0x29
0x38ac…38d7 at002a = EOL // 0x38d6 @0x2a
0x38ac…38d7 }
0x38d7…38dd c634 4800 ELSE
0x38d7…38dd LineComalBin {
0x38d7…38dd ptr = 0xc634 // 0x38d7 @0x0
0x38d7…38dd lno = 0x12c0 // 0x38d9 @0x2
0x38d7…38dd at0004 = ╱9a╱ ELSE ╱ // 0x38db @0x4
0x38d7…38dd at0005 = EOL // 0x38dc @0x5
0x38d7…38dd }
0x38dd…3908 c65f 4810 BELØB$=SUM$(1:LEN(SUM$)-1)+"+"
0x38dd…3908 LineComalBin {
0x38dd…3908 ptr = 0xc65f // 0x38dd @0x0
0x38dd…3908 lno = 0x12ca // 0x38df @0x2
0x38dd…3908 at0004 = ╱42╱B╱ // 0x38e1 @0x4
0x38dd…3908 at0005 = ╱45╱E╱ // 0x38e2 @0x5
0x38dd…3908 at0006 = ╱4c╱L╱ // 0x38e3 @0x6
0x38dd…3908 at0007 = ╱5c╱Ø╱ // 0x38e4 @0x7
0x38dd…3908 at0008 = ╱42╱B╱ // 0x38e5 @0x8
0x38dd…3908 at0009 = ╱ef╱$╱ // 0x38e6 @0x9
0x38dd…3908 at000a = ╱dc╱=╱ // 0x38e7 @0xa
0x38dd…3908 at000b = ╱53╱S╱ // 0x38e8 @0xb
0x38dd…3908 at000c = ╱55╱U╱ // 0x38e9 @0xc
0x38dd…3908 at000d = ╱4d╱M╱ // 0x38ea @0xd
0x38dd…3908 at000e = ╱ef╱$╱ // 0x38eb @0xe
0x38dd…3908 at000f = ╱ed╱(╱ // 0x38ec @0xf
0x38dd…3908 at0010 = ╱31╱1╱ // 0x38ed @0x10
0x38dd…3908 at0011 = ╱fe00008001╱ // 0x38ee @0x11
0x38dd…3908 at0016 = ╱f0╱:╱ // 0x38f3 @0x16
0x38dd…3908 at0017 = ╱cc╱LEN╱ // 0x38f4 @0x17
0x38dd…3908 at0018 = ╱ed╱(╱ // 0x38f5 @0x18
0x38dd…3908 at0019 = ╱53╱S╱ // 0x38f6 @0x19
0x38dd…3908 at001a = ╱55╱U╱ // 0x38f7 @0x1a
0x38dd…3908 at001b = ╱4d╱M╱ // 0x38f8 @0x1b
0x38dd…3908 at001c = ╱ef╱$╱ // 0x38f9 @0x1c
0x38dd…3908 at001d = ╱ee╱)╱ // 0x38fa @0x1d
0x38dd…3908 at001e = ╱e3╱-╱ // 0x38fb @0x1e
0x38dd…3908 at001f = ╱31╱1╱ // 0x38fc @0x1f
0x38dd…3908 at0020 = ╱fe00008001╱ // 0x38fd @0x20
0x38dd…3908 at0025 = ╱ee╱)╱ // 0x3902 @0x25
0x38dd…3908 at0026 = ╱f1╱+╱ // 0x3903 @0x26
0x38dd…3908 at0027 = ╱22╱"╱ // 0x3904 @0x27
0x38dd…3908 at0028 = ╱2b╱+╱ // 0x3905 @0x28
0x38dd…3908 at0029 = ╱22╱"╱ // 0x3906 @0x29
0x38dd…3908 at002a = EOL // 0x3907 @0x2a
0x38dd…3908 }
0x3908…390e c665 4820 ENDIF
0x3908…390e LineComalBin {
0x3908…390e ptr = 0xc665 // 0x3908 @0x0
0x3908…390e lno = 0x12d4 // 0x390a @0x2
0x3908…390e at0004 = ╱9b╱ ENDIF ╱ // 0x390c @0x4
0x3908…390e at0005 = EOL // 0x390d @0x5
0x3908…390e }
0x390e…3947 c69e 4830 EXEC BOGFØRING(KONTO,DDATO,BILAG,TEKSTKODE,BELØB$,ENTKO)
0x390e…3947 LineComalBin {
0x390e…3947 ptr = 0xc69e // 0x390e @0x0
0x390e…3947 lno = 0x12de // 0x3910 @0x2
0x390e…3947 at0004 = ╱9d╱ EXEC ╱ // 0x3912 @0x4
0x390e…3947 at0005 = ╱42╱B╱ // 0x3913 @0x5
0x390e…3947 at0006 = ╱4f╱O╱ // 0x3914 @0x6
0x390e…3947 at0007 = ╱47╱G╱ // 0x3915 @0x7
0x390e…3947 at0008 = ╱46╱F╱ // 0x3916 @0x8
0x390e…3947 at0009 = ╱5c╱Ø╱ // 0x3917 @0x9
0x390e…3947 at000a = ╱52╱R╱ // 0x3918 @0xa
0x390e…3947 at000b = ╱49╱I╱ // 0x3919 @0xb
0x390e…3947 at000c = ╱4e╱N╱ // 0x391a @0xc
0x390e…3947 at000d = ╱47╱G╱ // 0x391b @0xd
0x390e…3947 at000e = ╱ed╱(╱ // 0x391c @0xe
0x390e…3947 at000f = ╱4b╱K╱ // 0x391d @0xf
0x390e…3947 at0010 = ╱4f╱O╱ // 0x391e @0x10
0x390e…3947 at0011 = ╱4e╱N╱ // 0x391f @0x11
0x390e…3947 at0012 = ╱54╱T╱ // 0x3920 @0x12
0x390e…3947 at0013 = ╱4f╱O╱ // 0x3921 @0x13
0x390e…3947 at0014 = ╱ec╱,╱ // 0x3922 @0x14
0x390e…3947 at0015 = ╱44╱D╱ // 0x3923 @0x15
0x390e…3947 at0016 = ╱44╱D╱ // 0x3924 @0x16
0x390e…3947 at0017 = ╱41╱A╱ // 0x3925 @0x17
0x390e…3947 at0018 = ╱54╱T╱ // 0x3926 @0x18
0x390e…3947 at0019 = ╱4f╱O╱ // 0x3927 @0x19
0x390e…3947 at001a = ╱ec╱,╱ // 0x3928 @0x1a
0x390e…3947 at001b = ╱42╱B╱ // 0x3929 @0x1b
0x390e…3947 at001c = ╱49╱I╱ // 0x392a @0x1c
0x390e…3947 at001d = ╱4c╱L╱ // 0x392b @0x1d
0x390e…3947 at001e = ╱41╱A╱ // 0x392c @0x1e
0x390e…3947 at001f = ╱47╱G╱ // 0x392d @0x1f
0x390e…3947 at0020 = ╱ec╱,╱ // 0x392e @0x20
0x390e…3947 at0021 = ╱54╱T╱ // 0x392f @0x21
0x390e…3947 at0022 = ╱45╱E╱ // 0x3930 @0x22
0x390e…3947 at0023 = ╱4b╱K╱ // 0x3931 @0x23
0x390e…3947 at0024 = ╱53╱S╱ // 0x3932 @0x24
0x390e…3947 at0025 = ╱54╱T╱ // 0x3933 @0x25
0x390e…3947 at0026 = ╱4b╱K╱ // 0x3934 @0x26
0x390e…3947 at0027 = ╱4f╱O╱ // 0x3935 @0x27
0x390e…3947 at0028 = ╱44╱D╱ // 0x3936 @0x28
0x390e…3947 at0029 = ╱45╱E╱ // 0x3937 @0x29
0x390e…3947 at002a = ╱ec╱,╱ // 0x3938 @0x2a
0x390e…3947 at002b = ╱42╱B╱ // 0x3939 @0x2b
0x390e…3947 at002c = ╱45╱E╱ // 0x393a @0x2c
0x390e…3947 at002d = ╱4c╱L╱ // 0x393b @0x2d
0x390e…3947 at002e = ╱5c╱Ø╱ // 0x393c @0x2e
0x390e…3947 at002f = ╱42╱B╱ // 0x393d @0x2f
0x390e…3947 at0030 = ╱ef╱$╱ // 0x393e @0x30
0x390e…3947 at0031 = ╱ec╱,╱ // 0x393f @0x31
0x390e…3947 at0032 = ╱45╱E╱ // 0x3940 @0x32
0x390e…3947 at0033 = ╱4e╱N╱ // 0x3941 @0x33
0x390e…3947 at0034 = ╱54╱T╱ // 0x3942 @0x34
0x390e…3947 at0035 = ╱4b╱K╱ // 0x3943 @0x35
0x390e…3947 at0036 = ╱4f╱O╱ // 0x3944 @0x36
0x390e…3947 at0037 = ╱ee╱)╱ // 0x3945 @0x37
0x390e…3947 at0038 = EOL // 0x3946 @0x38
0x390e…3947 }
0x3947…396e c6c5 4840 EXEC BJUDSKRIV(BJSIDENR,BJLINIENR,TK$)
0x3947…396e LineComalBin {
0x3947…396e ptr = 0xc6c5 // 0x3947 @0x0
0x3947…396e lno = 0x12e8 // 0x3949 @0x2
0x3947…396e at0004 = ╱9d╱ EXEC ╱ // 0x394b @0x4
0x3947…396e at0005 = ╱42╱B╱ // 0x394c @0x5
0x3947…396e at0006 = ╱4a╱J╱ // 0x394d @0x6
0x3947…396e at0007 = ╱55╱U╱ // 0x394e @0x7
0x3947…396e at0008 = ╱44╱D╱ // 0x394f @0x8
0x3947…396e at0009 = ╱53╱S╱ // 0x3950 @0x9
0x3947…396e at000a = ╱4b╱K╱ // 0x3951 @0xa
0x3947…396e at000b = ╱52╱R╱ // 0x3952 @0xb
0x3947…396e at000c = ╱49╱I╱ // 0x3953 @0xc
0x3947…396e at000d = ╱56╱V╱ // 0x3954 @0xd
0x3947…396e at000e = ╱ed╱(╱ // 0x3955 @0xe
0x3947…396e at000f = ╱42╱B╱ // 0x3956 @0xf
0x3947…396e at0010 = ╱4a╱J╱ // 0x3957 @0x10
0x3947…396e at0011 = ╱53╱S╱ // 0x3958 @0x11
0x3947…396e at0012 = ╱49╱I╱ // 0x3959 @0x12
0x3947…396e at0013 = ╱44╱D╱ // 0x395a @0x13
0x3947…396e at0014 = ╱45╱E╱ // 0x395b @0x14
0x3947…396e at0015 = ╱4e╱N╱ // 0x395c @0x15
0x3947…396e at0016 = ╱52╱R╱ // 0x395d @0x16
0x3947…396e at0017 = ╱ec╱,╱ // 0x395e @0x17
0x3947…396e at0018 = ╱42╱B╱ // 0x395f @0x18
0x3947…396e at0019 = ╱4a╱J╱ // 0x3960 @0x19
0x3947…396e at001a = ╱4c╱L╱ // 0x3961 @0x1a
0x3947…396e at001b = ╱49╱I╱ // 0x3962 @0x1b
0x3947…396e at001c = ╱4e╱N╱ // 0x3963 @0x1c
0x3947…396e at001d = ╱49╱I╱ // 0x3964 @0x1d
0x3947…396e at001e = ╱45╱E╱ // 0x3965 @0x1e
0x3947…396e at001f = ╱4e╱N╱ // 0x3966 @0x1f
0x3947…396e at0020 = ╱52╱R╱ // 0x3967 @0x20
0x3947…396e at0021 = ╱ec╱,╱ // 0x3968 @0x21
0x3947…396e at0022 = ╱54╱T╱ // 0x3969 @0x22
0x3947…396e at0023 = ╱4b╱K╱ // 0x396a @0x23
0x3947…396e at0024 = ╱ef╱$╱ // 0x396b @0x24
0x3947…396e at0025 = ╱ee╱)╱ // 0x396c @0x25
0x3947…396e at0026 = EOL // 0x396d @0x26
0x3947…396e }
0x396e…3974 c6cb 4850 ENDIF
0x396e…3974 LineComalBin {
0x396e…3974 ptr = 0xc6cb // 0x396e @0x0
0x396e…3974 lno = 0x12f2 // 0x3970 @0x2
0x396e…3974 at0004 = ╱9b╱ ENDIF ╱ // 0x3972 @0x4
0x396e…3974 at0005 = EOL // 0x3973 @0x5
0x396e…3974 }
0x3974…398d c6e4 4860 FOR I=BJLINIENR TO 35
0x3974…398d LineComalBin {
0x3974…398d ptr = 0xc6e4 // 0x3974 @0x0
0x3974…398d lno = 0x12fc // 0x3976 @0x2
0x3974…398d at0004 = ╱83╱ FOR ╱ // 0x3978 @0x4
0x3974…398d at0005 = ╱49╱I╱ // 0x3979 @0x5
0x3974…398d at0006 = ╱dc╱=╱ // 0x397a @0x6
0x3974…398d at0007 = ╱42╱B╱ // 0x397b @0x7
0x3974…398d at0008 = ╱4a╱J╱ // 0x397c @0x8
0x3974…398d at0009 = ╱4c╱L╱ // 0x397d @0x9
0x3974…398d at000a = ╱49╱I╱ // 0x397e @0xa
0x3974…398d at000b = ╱4e╱N╱ // 0x397f @0xb
0x3974…398d at000c = ╱49╱I╱ // 0x3980 @0xc
0x3974…398d at000d = ╱45╱E╱ // 0x3981 @0xd
0x3974…398d at000e = ╱4e╱N╱ // 0x3982 @0xe
0x3974…398d at000f = ╱52╱R╱ // 0x3983 @0xf
0x3974…398d at0010 = ╱b7╱ TO ╱ // 0x3984 @0x10
0x3974…398d at0011 = ╱33╱3╱ // 0x3985 @0x11
0x3974…398d at0012 = ╱35╱5╱ // 0x3986 @0x12
0x3974…398d at0013 = ╱fe00008c06╱ // 0x3987 @0x13
0x3974…398d at0018 = EOL // 0x398c @0x18
0x3974…398d }
0x398d…3996 c6ed 4870 PRINT " "
0x398d…3996 LineComalBin {
0x398d…3996 ptr = 0xc6ed // 0x398d @0x0
0x398d…3996 lno = 0x1306 // 0x398f @0x2
0x398d…3996 at0004 = ╱92╱ PRINT ╱ // 0x3991 @0x4
0x398d…3996 at0005 = ╱22╱"╱ // 0x3992 @0x5
0x398d…3996 at0006 = ╱20╱…╱ // 0x3993 @0x6
0x398d…3996 at0007 = ╱22╱"╱ // 0x3994 @0x7
0x398d…3996 at0008 = EOL // 0x3995 @0x8
0x398d…3996 }
0x3996…399d c6f4 4880 NEXT I
0x3996…399d LineComalBin {
0x3996…399d ptr = 0xc6f4 // 0x3996 @0x0
0x3996…399d lno = 0x1310 // 0x3998 @0x2
0x3996…399d at0004 = ╱84╱ NEXT ╱ // 0x399a @0x4
0x3996…399d at0005 = ╱49╱I╱ // 0x399b @0x5
0x3996…399d at0006 = EOL // 0x399c @0x6
0x3996…399d }
0x399d…39a6 c6fd 4890 PRINT " "
0x399d…39a6 LineComalBin {
0x399d…39a6 ptr = 0xc6fd // 0x399d @0x0
0x399d…39a6 lno = 0x131a // 0x399f @0x2
0x399d…39a6 at0004 = ╱92╱ PRINT ╱ // 0x39a1 @0x4
0x399d…39a6 at0005 = ╱22╱"╱ // 0x39a2 @0x5
0x399d…39a6 at0006 = ╱20╱…╱ // 0x39a3 @0x6
0x399d…39a6 at0007 = ╱22╱"╱ // 0x39a4 @0x7
0x399d…39a6 at0008 = EOL // 0x39a5 @0x8
0x399d…39a6 }
0x39a6…39b2 c709 4900 PRINT STREG$
0x39a6…39b2 LineComalBin {
0x39a6…39b2 ptr = 0xc709 // 0x39a6 @0x0
0x39a6…39b2 lno = 0x1324 // 0x39a8 @0x2
0x39a6…39b2 at0004 = ╱92╱ PRINT ╱ // 0x39aa @0x4
0x39a6…39b2 at0005 = ╱53╱S╱ // 0x39ab @0x5
0x39a6…39b2 at0006 = ╱54╱T╱ // 0x39ac @0x6
0x39a6…39b2 at0007 = ╱52╱R╱ // 0x39ad @0x7
0x39a6…39b2 at0008 = ╱45╱E╱ // 0x39ae @0x8
0x39a6…39b2 at0009 = ╱47╱G╱ // 0x39af @0x9
0x39a6…39b2 at000a = ╱ef╱$╱ // 0x39b0 @0xa
0x39a6…39b2 at000b = EOL // 0x39b1 @0xb
0x39a6…39b2 }
0x39b2…39d5 c72c 4910 EXEC CALC(5,SUM$,TAL3$,TAL4$)
0x39b2…39d5 LineComalBin {
0x39b2…39d5 ptr = 0xc72c // 0x39b2 @0x0
0x39b2…39d5 lno = 0x132e // 0x39b4 @0x2
0x39b2…39d5 at0004 = ╱9d╱ EXEC ╱ // 0x39b6 @0x4
0x39b2…39d5 at0005 = ╱43╱C╱ // 0x39b7 @0x5
0x39b2…39d5 at0006 = ╱41╱A╱ // 0x39b8 @0x6
0x39b2…39d5 at0007 = ╱4c╱L╱ // 0x39b9 @0x7
0x39b2…39d5 at0008 = ╱43╱C╱ // 0x39ba @0x8
0x39b2…39d5 at0009 = ╱ed╱(╱ // 0x39bb @0x9
0x39b2…39d5 at000a = ╱35╱5╱ // 0x39bc @0xa
0x39b2…39d5 at000b = ╱fe0000a003╱ // 0x39bd @0xb
0x39b2…39d5 at0010 = ╱ec╱,╱ // 0x39c2 @0x10
0x39b2…39d5 at0011 = ╱53╱S╱ // 0x39c3 @0x11
0x39b2…39d5 at0012 = ╱55╱U╱ // 0x39c4 @0x12
0x39b2…39d5 at0013 = ╱4d╱M╱ // 0x39c5 @0x13
0x39b2…39d5 at0014 = ╱ef╱$╱ // 0x39c6 @0x14
0x39b2…39d5 at0015 = ╱ec╱,╱ // 0x39c7 @0x15
0x39b2…39d5 at0016 = ╱54╱T╱ // 0x39c8 @0x16
0x39b2…39d5 at0017 = ╱41╱A╱ // 0x39c9 @0x17
0x39b2…39d5 at0018 = ╱4c╱L╱ // 0x39ca @0x18
0x39b2…39d5 at0019 = ╱33╱3╱ // 0x39cb @0x19
0x39b2…39d5 at001a = ╱ef╱$╱ // 0x39cc @0x1a
0x39b2…39d5 at001b = ╱ec╱,╱ // 0x39cd @0x1b
0x39b2…39d5 at001c = ╱54╱T╱ // 0x39ce @0x1c
0x39b2…39d5 at001d = ╱41╱A╱ // 0x39cf @0x1d
0x39b2…39d5 at001e = ╱4c╱L╱ // 0x39d0 @0x1e
0x39b2…39d5 at001f = ╱34╱4╱ // 0x39d1 @0x1f
0x39b2…39d5 at0020 = ╱ef╱$╱ // 0x39d2 @0x20
0x39b2…39d5 at0021 = ╱ee╱)╱ // 0x39d3 @0x21
0x39b2…39d5 at0022 = EOL // 0x39d4 @0x22
0x39b2…39d5 }
0x39d5…3a02 c759 4920 IF TAL4$(LEN(TAL4$))="+" THEN TAL4$(LEN(TAL4$))=" "
0x39d5…3a02 LineComalBin {
0x39d5…3a02 ptr = 0xc759 // 0x39d5 @0x0
0x39d5…3a02 lno = 0x1338 // 0x39d7 @0x2
0x39d5…3a02 at0004 = ╱82╱ IF ╱ // 0x39d9 @0x4
0x39d5…3a02 at0005 = ╱54╱T╱ // 0x39da @0x5
0x39d5…3a02 at0006 = ╱41╱A╱ // 0x39db @0x6
0x39d5…3a02 at0007 = ╱4c╱L╱ // 0x39dc @0x7
0x39d5…3a02 at0008 = ╱34╱4╱ // 0x39dd @0x8
0x39d5…3a02 at0009 = ╱ef╱$╱ // 0x39de @0x9
0x39d5…3a02 at000a = ╱ed╱(╱ // 0x39df @0xa
0x39d5…3a02 at000b = ╱cc╱LEN╱ // 0x39e0 @0xb
0x39d5…3a02 at000c = ╱ed╱(╱ // 0x39e1 @0xc
0x39d5…3a02 at000d = ╱54╱T╱ // 0x39e2 @0xd
0x39d5…3a02 at000e = ╱41╱A╱ // 0x39e3 @0xe
0x39d5…3a02 at000f = ╱4c╱L╱ // 0x39e4 @0xf
0x39d5…3a02 at0010 = ╱34╱4╱ // 0x39e5 @0x10
0x39d5…3a02 at0011 = ╱ef╱$╱ // 0x39e6 @0x11
0x39d5…3a02 at0012 = ╱ee╱)╱ // 0x39e7 @0x12
0x39d5…3a02 at0013 = ╱ee╱)╱ // 0x39e8 @0x13
0x39d5…3a02 at0014 = ╱dc╱=╱ // 0x39e9 @0x14
0x39d5…3a02 at0015 = ╱22╱"╱ // 0x39ea @0x15
0x39d5…3a02 at0016 = ╱2b╱+╱ // 0x39eb @0x16
0x39d5…3a02 at0017 = ╱22╱"╱ // 0x39ec @0x17
0x39d5…3a02 at0018 = ╱b6╱ THEN ╱ // 0x39ed @0x18
0x39d5…3a02 at0019 = ╱54╱T╱ // 0x39ee @0x19
0x39d5…3a02 at001a = ╱41╱A╱ // 0x39ef @0x1a
0x39d5…3a02 at001b = ╱4c╱L╱ // 0x39f0 @0x1b
0x39d5…3a02 at001c = ╱34╱4╱ // 0x39f1 @0x1c
0x39d5…3a02 at001d = ╱ef╱$╱ // 0x39f2 @0x1d
0x39d5…3a02 at001e = ╱ed╱(╱ // 0x39f3 @0x1e
0x39d5…3a02 at001f = ╱cc╱LEN╱ // 0x39f4 @0x1f
0x39d5…3a02 at0020 = ╱ed╱(╱ // 0x39f5 @0x20
0x39d5…3a02 at0021 = ╱54╱T╱ // 0x39f6 @0x21
0x39d5…3a02 at0022 = ╱41╱A╱ // 0x39f7 @0x22
0x39d5…3a02 at0023 = ╱4c╱L╱ // 0x39f8 @0x23
0x39d5…3a02 at0024 = ╱34╱4╱ // 0x39f9 @0x24
0x39d5…3a02 at0025 = ╱ef╱$╱ // 0x39fa @0x25
0x39d5…3a02 at0026 = ╱ee╱)╱ // 0x39fb @0x26
0x39d5…3a02 at0027 = ╱ee╱)╱ // 0x39fc @0x27
0x39d5…3a02 at0028 = ╱dc╱=╱ // 0x39fd @0x28
0x39d5…3a02 at0029 = ╱22╱"╱ // 0x39fe @0x29
0x39d5…3a02 at002a = ╱20╱…╱ // 0x39ff @0x2a
0x39d5…3a02 at002b = ╱22╱"╱ // 0x3a00 @0x2b
0x39d5…3a02 at002c = EOL // 0x3a01 @0x2c
0x39d5…3a02 }
0x3a02…3a46 c79d 4930 PRINT TAB(10);CHR(14);"Difference";CHR(15);TAB(36);TAL4$
0x3a02…3a46 LineComalBin {
0x3a02…3a46 ptr = 0xc79d // 0x3a02 @0x0
0x3a02…3a46 lno = 0x1342 // 0x3a04 @0x2
0x3a02…3a46 at0004 = ╱92╱ PRINT ╱ // 0x3a06 @0x4
0x3a02…3a46 at0005 = ╱d2╱TAB╱ // 0x3a07 @0x5
0x3a02…3a46 at0006 = ╱ed╱(╱ // 0x3a08 @0x6
0x3a02…3a46 at0007 = ╱31╱1╱ // 0x3a09 @0x7
0x3a02…3a46 at0008 = ╱30╱0╱ // 0x3a0a @0x8
0x3a02…3a46 at0009 = ╱fe0000a004╱ // 0x3a0b @0x9
0x3a02…3a46 at000e = ╱ee╱)╱ // 0x3a10 @0xe
0x3a02…3a46 at000f = ╱eb╱;╱ // 0x3a11 @0xf
0x3a02…3a46 at0010 = ╱cf╱CHR╱ // 0x3a12 @0x10
0x3a02…3a46 at0011 = ╱ed╱(╱ // 0x3a13 @0x11
0x3a02…3a46 at0012 = ╱31╱1╱ // 0x3a14 @0x12
0x3a02…3a46 at0013 = ╱34╱4╱ // 0x3a15 @0x13
0x3a02…3a46 at0014 = ╱fe0000e004╱ // 0x3a16 @0x14
0x3a02…3a46 at0019 = ╱ee╱)╱ // 0x3a1b @0x19
0x3a02…3a46 at001a = ╱eb╱;╱ // 0x3a1c @0x1a
0x3a02…3a46 at001b = ╱22╱"╱ // 0x3a1d @0x1b
0x3a02…3a46 at001c = ╱44╱D╱ // 0x3a1e @0x1c
0x3a02…3a46 at001d = ╱69╱i╱ // 0x3a1f @0x1d
0x3a02…3a46 at001e = ╱66╱f╱ // 0x3a20 @0x1e
0x3a02…3a46 at001f = ╱66╱f╱ // 0x3a21 @0x1f
0x3a02…3a46 at0020 = ╱65╱e╱ // 0x3a22 @0x20
0x3a02…3a46 at0021 = ╱72╱r╱ // 0x3a23 @0x21
0x3a02…3a46 at0022 = ╱65╱e╱ // 0x3a24 @0x22
0x3a02…3a46 at0023 = ╱6e╱n╱ // 0x3a25 @0x23
0x3a02…3a46 at0024 = ╱63╱c╱ // 0x3a26 @0x24
0x3a02…3a46 at0025 = ╱65╱e╱ // 0x3a27 @0x25
0x3a02…3a46 at0026 = ╱22╱"╱ // 0x3a28 @0x26
0x3a02…3a46 at0027 = ╱eb╱;╱ // 0x3a29 @0x27
0x3a02…3a46 at0028 = ╱cf╱CHR╱ // 0x3a2a @0x28
0x3a02…3a46 at0029 = ╱ed╱(╱ // 0x3a2b @0x29
0x3a02…3a46 at002a = ╱31╱1╱ // 0x3a2c @0x2a
0x3a02…3a46 at002b = ╱35╱5╱ // 0x3a2d @0x2b
0x3a02…3a46 at002c = ╱fe0000f004╱ // 0x3a2e @0x2c
0x3a02…3a46 at0031 = ╱ee╱)╱ // 0x3a33 @0x31
0x3a02…3a46 at0032 = ╱eb╱;╱ // 0x3a34 @0x32
0x3a02…3a46 at0033 = ╱d2╱TAB╱ // 0x3a35 @0x33
0x3a02…3a46 at0034 = ╱ed╱(╱ // 0x3a36 @0x34
0x3a02…3a46 at0035 = ╱33╱3╱ // 0x3a37 @0x35
0x3a02…3a46 at0036 = ╱36╱6╱ // 0x3a38 @0x36
0x3a02…3a46 at0037 = ╱fe00009006╱ // 0x3a39 @0x37
0x3a02…3a46 at003c = ╱ee╱)╱ // 0x3a3e @0x3c
0x3a02…3a46 at003d = ╱eb╱;╱ // 0x3a3f @0x3d
0x3a02…3a46 at003e = ╱54╱T╱ // 0x3a40 @0x3e
0x3a02…3a46 at003f = ╱41╱A╱ // 0x3a41 @0x3f
0x3a02…3a46 at0040 = ╱4c╱L╱ // 0x3a42 @0x40
0x3a02…3a46 at0041 = ╱34╱4╱ // 0x3a43 @0x41
0x3a02…3a46 at0042 = ╱ef╱$╱ // 0x3a44 @0x42
0x3a02…3a46 at0043 = EOL // 0x3a45 @0x43
0x3a02…3a46 }
0x3a46…3a52 c7a9 4940 PRINT STREG$
0x3a46…3a52 LineComalBin {
0x3a46…3a52 ptr = 0xc7a9 // 0x3a46 @0x0
0x3a46…3a52 lno = 0x134c // 0x3a48 @0x2
0x3a46…3a52 at0004 = ╱92╱ PRINT ╱ // 0x3a4a @0x4
0x3a46…3a52 at0005 = ╱53╱S╱ // 0x3a4b @0x5
0x3a46…3a52 at0006 = ╱54╱T╱ // 0x3a4c @0x6
0x3a46…3a52 at0007 = ╱52╱R╱ // 0x3a4d @0x7
0x3a46…3a52 at0008 = ╱45╱E╱ // 0x3a4e @0x8
0x3a46…3a52 at0009 = ╱47╱G╱ // 0x3a4f @0x9
0x3a46…3a52 at000a = ╱ef╱$╱ // 0x3a50 @0xa
0x3a46…3a52 at000b = EOL // 0x3a51 @0xb
0x3a46…3a52 }
0x3a52…3a5b c7b2 4950 PRINT " "
0x3a52…3a5b LineComalBin {
0x3a52…3a5b ptr = 0xc7b2 // 0x3a52 @0x0
0x3a52…3a5b lno = 0x1356 // 0x3a54 @0x2
0x3a52…3a5b at0004 = ╱92╱ PRINT ╱ // 0x3a56 @0x4
0x3a52…3a5b at0005 = ╱22╱"╱ // 0x3a57 @0x5
0x3a52…3a5b at0006 = ╱20╱…╱ // 0x3a58 @0x6
0x3a52…3a5b at0007 = ╱22╱"╱ // 0x3a59 @0x7
0x3a52…3a5b at0008 = EOL // 0x3a5a @0x8
0x3a52…3a5b }
0x3a5b…3a64 c7bb 4960 PRINT " "
0x3a5b…3a64 LineComalBin {
0x3a5b…3a64 ptr = 0xc7bb // 0x3a5b @0x0
0x3a5b…3a64 lno = 0x1360 // 0x3a5d @0x2
0x3a5b…3a64 at0004 = ╱92╱ PRINT ╱ // 0x3a5f @0x4
0x3a5b…3a64 at0005 = ╱22╱"╱ // 0x3a60 @0x5
0x3a5b…3a64 at0006 = ╱20╱…╱ // 0x3a61 @0x6
0x3a5b…3a64 at0007 = ╱22╱"╱ // 0x3a62 @0x7
0x3a5b…3a64 at0008 = EOL // 0x3a63 @0x8
0x3a5b…3a64 }
0x3a64…3a78 c7cf 4970 PROC GRUPPE(GR,KG1)
0x3a64…3a78 LineComalBin {
0x3a64…3a78 ptr = 0xc7cf // 0x3a64 @0x0
0x3a64…3a78 lno = 0x136a // 0x3a66 @0x2
0x3a64…3a78 at0004 = ╱9e╱ PROC ╱ // 0x3a68 @0x4
0x3a64…3a78 at0005 = ╱47╱G╱ // 0x3a69 @0x5
0x3a64…3a78 at0006 = ╱52╱R╱ // 0x3a6a @0x6
0x3a64…3a78 at0007 = ╱55╱U╱ // 0x3a6b @0x7
0x3a64…3a78 at0008 = ╱50╱P╱ // 0x3a6c @0x8
0x3a64…3a78 at0009 = ╱50╱P╱ // 0x3a6d @0x9
0x3a64…3a78 at000a = ╱45╱E╱ // 0x3a6e @0xa
0x3a64…3a78 at000b = ╱ed╱(╱ // 0x3a6f @0xb
0x3a64…3a78 at000c = ╱47╱G╱ // 0x3a70 @0xc
0x3a64…3a78 at000d = ╱52╱R╱ // 0x3a71 @0xd
0x3a64…3a78 at000e = ╱ec╱,╱ // 0x3a72 @0xe
0x3a64…3a78 at000f = ╱4b╱K╱ // 0x3a73 @0xf
0x3a64…3a78 at0010 = ╱47╱G╱ // 0x3a74 @0x10
0x3a64…3a78 at0011 = ╱31╱1╱ // 0x3a75 @0x11
0x3a64…3a78 at0012 = ╱ee╱)╱ // 0x3a76 @0x12
0x3a64…3a78 at0013 = EOL // 0x3a77 @0x13
0x3a64…3a78 }
0x3a78…3a97 c7ee 4980 FOR I=1 TO 2*GR STEP 2
0x3a78…3a97 LineComalBin {
0x3a78…3a97 ptr = 0xc7ee // 0x3a78 @0x0
0x3a78…3a97 lno = 0x1374 // 0x3a7a @0x2
0x3a78…3a97 at0004 = ╱83╱ FOR ╱ // 0x3a7c @0x4
0x3a78…3a97 at0005 = ╱49╱I╱ // 0x3a7d @0x5
0x3a78…3a97 at0006 = ╱dc╱=╱ // 0x3a7e @0x6
0x3a78…3a97 at0007 = ╱31╱1╱ // 0x3a7f @0x7
0x3a78…3a97 at0008 = ╱fe00008001╱ // 0x3a80 @0x8
0x3a78…3a97 at000d = ╱b7╱ TO ╱ // 0x3a85 @0xd
0x3a78…3a97 at000e = ╱32╱2╱ // 0x3a86 @0xe
0x3a78…3a97 at000f = ╱fe00008002╱ // 0x3a87 @0xf
0x3a78…3a97 at0014 = ╱e4╱*╱ // 0x3a8c @0x14
0x3a78…3a97 at0015 = ╱47╱G╱ // 0x3a8d @0x15
0x3a78…3a97 at0016 = ╱52╱R╱ // 0x3a8e @0x16
0x3a78…3a97 at0017 = ╱b8╱ STEP ╱ // 0x3a8f @0x17
0x3a78…3a97 at0018 = ╱32╱2╱ // 0x3a90 @0x18
0x3a78…3a97 at0019 = ╱fe00008002╱ // 0x3a91 @0x19
0x3a78…3a97 at001e = EOL // 0x3a96 @0x1e
0x3a78…3a97 }
0x3a97…3aaa c801 4990 FNR=FNR+1
0x3a97…3aaa LineComalBin {
0x3a97…3aaa ptr = 0xc801 // 0x3a97 @0x0
0x3a97…3aaa lno = 0x137e // 0x3a99 @0x2
0x3a97…3aaa at0004 = ╱46╱F╱ // 0x3a9b @0x4
0x3a97…3aaa at0005 = ╱4e╱N╱ // 0x3a9c @0x5
0x3a97…3aaa at0006 = ╱52╱R╱ // 0x3a9d @0x6
0x3a97…3aaa at0007 = ╱dc╱=╱ // 0x3a9e @0x7
0x3a97…3aaa at0008 = ╱46╱F╱ // 0x3a9f @0x8
0x3a97…3aaa at0009 = ╱4e╱N╱ // 0x3aa0 @0x9
0x3a97…3aaa at000a = ╱52╱R╱ // 0x3aa1 @0xa
0x3a97…3aaa at000b = ╱e2╱+╱ // 0x3aa2 @0xb
0x3a97…3aaa at000c = ╱31╱1╱ // 0x3aa3 @0xc
0x3a97…3aaa at000d = ╱fe00008001╱ // 0x3aa4 @0xd
0x3a97…3aaa at0012 = EOL // 0x3aa9 @0x12
0x3a97…3aaa }
0x3aaa…3adb c832 5000 EXEC FINDPOST1(FTAB1,FTAB,MFANTAL,FNR,FPIL3,K2$)
0x3aaa…3adb LineComalBin {
0x3aaa…3adb ptr = 0xc832 // 0x3aaa @0x0
0x3aaa…3adb lno = 0x1388 // 0x3aac @0x2
0x3aaa…3adb at0004 = ╱9d╱ EXEC ╱ // 0x3aae @0x4
0x3aaa…3adb at0005 = ╱46╱F╱ // 0x3aaf @0x5
0x3aaa…3adb at0006 = ╱49╱I╱ // 0x3ab0 @0x6
0x3aaa…3adb at0007 = ╱4e╱N╱ // 0x3ab1 @0x7
0x3aaa…3adb at0008 = ╱44╱D╱ // 0x3ab2 @0x8
0x3aaa…3adb at0009 = ╱50╱P╱ // 0x3ab3 @0x9
0x3aaa…3adb at000a = ╱4f╱O╱ // 0x3ab4 @0xa
0x3aaa…3adb at000b = ╱53╱S╱ // 0x3ab5 @0xb
0x3aaa…3adb at000c = ╱54╱T╱ // 0x3ab6 @0xc
0x3aaa…3adb at000d = ╱31╱1╱ // 0x3ab7 @0xd
0x3aaa…3adb at000e = ╱ed╱(╱ // 0x3ab8 @0xe
0x3aaa…3adb at000f = ╱46╱F╱ // 0x3ab9 @0xf
0x3aaa…3adb at0010 = ╱54╱T╱ // 0x3aba @0x10
0x3aaa…3adb at0011 = ╱41╱A╱ // 0x3abb @0x11
0x3aaa…3adb at0012 = ╱42╱B╱ // 0x3abc @0x12
0x3aaa…3adb at0013 = ╱31╱1╱ // 0x3abd @0x13
0x3aaa…3adb at0014 = ╱ec╱,╱ // 0x3abe @0x14
0x3aaa…3adb at0015 = ╱46╱F╱ // 0x3abf @0x15
0x3aaa…3adb at0016 = ╱54╱T╱ // 0x3ac0 @0x16
0x3aaa…3adb at0017 = ╱41╱A╱ // 0x3ac1 @0x17
0x3aaa…3adb at0018 = ╱42╱B╱ // 0x3ac2 @0x18
0x3aaa…3adb at0019 = ╱ec╱,╱ // 0x3ac3 @0x19
0x3aaa…3adb at001a = ╱4d╱M╱ // 0x3ac4 @0x1a
0x3aaa…3adb at001b = ╱46╱F╱ // 0x3ac5 @0x1b
0x3aaa…3adb at001c = ╱41╱A╱ // 0x3ac6 @0x1c
0x3aaa…3adb at001d = ╱4e╱N╱ // 0x3ac7 @0x1d
0x3aaa…3adb at001e = ╱54╱T╱ // 0x3ac8 @0x1e
0x3aaa…3adb at001f = ╱41╱A╱ // 0x3ac9 @0x1f
0x3aaa…3adb at0020 = ╱4c╱L╱ // 0x3aca @0x20
0x3aaa…3adb at0021 = ╱ec╱,╱ // 0x3acb @0x21
0x3aaa…3adb at0022 = ╱46╱F╱ // 0x3acc @0x22
0x3aaa…3adb at0023 = ╱4e╱N╱ // 0x3acd @0x23
0x3aaa…3adb at0024 = ╱52╱R╱ // 0x3ace @0x24
0x3aaa…3adb at0025 = ╱ec╱,╱ // 0x3acf @0x25
0x3aaa…3adb at0026 = ╱46╱F╱ // 0x3ad0 @0x26
0x3aaa…3adb at0027 = ╱50╱P╱ // 0x3ad1 @0x27
0x3aaa…3adb at0028 = ╱49╱I╱ // 0x3ad2 @0x28
0x3aaa…3adb at0029 = ╱4c╱L╱ // 0x3ad3 @0x29
0x3aaa…3adb at002a = ╱33╱3╱ // 0x3ad4 @0x2a
0x3aaa…3adb at002b = ╱ec╱,╱ // 0x3ad5 @0x2b
0x3aaa…3adb at002c = ╱4b╱K╱ // 0x3ad6 @0x2c
0x3aaa…3adb at002d = ╱32╱2╱ // 0x3ad7 @0x2d
0x3aaa…3adb at002e = ╱ef╱$╱ // 0x3ad8 @0x2e
0x3aaa…3adb at002f = ╱ee╱)╱ // 0x3ad9 @0x2f
0x3aaa…3adb at0030 = EOL // 0x3ada @0x30
0x3aaa…3adb }
0x3adb…3aee c845 5010 IF CEKS=1 THEN STOP
0x3adb…3aee LineComalBin {
0x3adb…3aee ptr = 0xc845 // 0x3adb @0x0
0x3adb…3aee lno = 0x1392 // 0x3add @0x2
0x3adb…3aee at0004 = ╱82╱ IF ╱ // 0x3adf @0x4
0x3adb…3aee at0005 = ╱43╱C╱ // 0x3ae0 @0x5
0x3adb…3aee at0006 = ╱45╱E╱ // 0x3ae1 @0x6
0x3adb…3aee at0007 = ╱4b╱K╱ // 0x3ae2 @0x7
0x3adb…3aee at0008 = ╱53╱S╱ // 0x3ae3 @0x8
0x3adb…3aee at0009 = ╱dc╱=╱ // 0x3ae4 @0x9
0x3adb…3aee at000a = ╱31╱1╱ // 0x3ae5 @0xa
0x3adb…3aee at000b = ╱fe00008001╱ // 0x3ae6 @0xb
0x3adb…3aee at0010 = ╱b6╱ THEN ╱ // 0x3aeb @0x10
0x3adb…3aee at0011 = ╱8d╱ STOP ╱ // 0x3aec @0x11
0x3adb…3aee at0012 = EOL // 0x3aed @0x12
0x3adb…3aee }
0x3aee…3afc c853 5020 EXEC HENTPOST
0x3aee…3afc LineComalBin {
0x3aee…3afc ptr = 0xc853 // 0x3aee @0x0
0x3aee…3afc lno = 0x139c // 0x3af0 @0x2
0x3aee…3afc at0004 = ╱9d╱ EXEC ╱ // 0x3af2 @0x4
0x3aee…3afc at0005 = ╱48╱H╱ // 0x3af3 @0x5
0x3aee…3afc at0006 = ╱45╱E╱ // 0x3af4 @0x6
0x3aee…3afc at0007 = ╱4e╱N╱ // 0x3af5 @0x7
0x3aee…3afc at0008 = ╱54╱T╱ // 0x3af6 @0x8
0x3aee…3afc at0009 = ╱50╱P╱ // 0x3af7 @0x9
0x3aee…3afc at000a = ╱4f╱O╱ // 0x3af8 @0xa
0x3aee…3afc at000b = ╱53╱S╱ // 0x3af9 @0xb
0x3aee…3afc at000c = ╱54╱T╱ // 0x3afa @0xc
0x3aee…3afc at000d = EOL // 0x3afb @0xd
0x3aee…3afc }
0x3afc…3b28 c87f 5030 EXEC CALC(0,FMDEBET$,KG1$(I),FMDEBET$)
0x3afc…3b28 LineComalBin {
0x3afc…3b28 ptr = 0xc87f // 0x3afc @0x0
0x3afc…3b28 lno = 0x13a6 // 0x3afe @0x2
0x3afc…3b28 at0004 = ╱9d╱ EXEC ╱ // 0x3b00 @0x4
0x3afc…3b28 at0005 = ╱43╱C╱ // 0x3b01 @0x5
0x3afc…3b28 at0006 = ╱41╱A╱ // 0x3b02 @0x6
0x3afc…3b28 at0007 = ╱4c╱L╱ // 0x3b03 @0x7
0x3afc…3b28 at0008 = ╱43╱C╱ // 0x3b04 @0x8
0x3afc…3b28 at0009 = ╱ed╱(╱ // 0x3b05 @0x9
0x3afc…3b28 at000a = ╱30╱0╱ // 0x3b06 @0xa
0x3afc…3b28 at000b = ╱fe00000000╱ // 0x3b07 @0xb
0x3afc…3b28 at0010 = ╱ec╱,╱ // 0x3b0c @0x10
0x3afc…3b28 at0011 = ╱46╱F╱ // 0x3b0d @0x11
0x3afc…3b28 at0012 = ╱4d╱M╱ // 0x3b0e @0x12
0x3afc…3b28 at0013 = ╱44╱D╱ // 0x3b0f @0x13
0x3afc…3b28 at0014 = ╱45╱E╱ // 0x3b10 @0x14
0x3afc…3b28 at0015 = ╱42╱B╱ // 0x3b11 @0x15
0x3afc…3b28 at0016 = ╱45╱E╱ // 0x3b12 @0x16
0x3afc…3b28 at0017 = ╱54╱T╱ // 0x3b13 @0x17
0x3afc…3b28 at0018 = ╱ef╱$╱ // 0x3b14 @0x18
0x3afc…3b28 at0019 = ╱ec╱,╱ // 0x3b15 @0x19
0x3afc…3b28 at001a = ╱4b╱K╱ // 0x3b16 @0x1a
0x3afc…3b28 at001b = ╱47╱G╱ // 0x3b17 @0x1b
0x3afc…3b28 at001c = ╱31╱1╱ // 0x3b18 @0x1c
0x3afc…3b28 at001d = ╱ef╱$╱ // 0x3b19 @0x1d
0x3afc…3b28 at001e = ╱ed╱(╱ // 0x3b1a @0x1e
0x3afc…3b28 at001f = ╱49╱I╱ // 0x3b1b @0x1f
0x3afc…3b28 at0020 = ╱ee╱)╱ // 0x3b1c @0x20
0x3afc…3b28 at0021 = ╱ec╱,╱ // 0x3b1d @0x21
0x3afc…3b28 at0022 = ╱46╱F╱ // 0x3b1e @0x22
0x3afc…3b28 at0023 = ╱4d╱M╱ // 0x3b1f @0x23
0x3afc…3b28 at0024 = ╱44╱D╱ // 0x3b20 @0x24
0x3afc…3b28 at0025 = ╱45╱E╱ // 0x3b21 @0x25
0x3afc…3b28 at0026 = ╱42╱B╱ // 0x3b22 @0x26
0x3afc…3b28 at0027 = ╱45╱E╱ // 0x3b23 @0x27
0x3afc…3b28 at0028 = ╱54╱T╱ // 0x3b24 @0x28
0x3afc…3b28 at0029 = ╱ef╱$╱ // 0x3b25 @0x29
0x3afc…3b28 at002a = ╱ee╱)╱ // 0x3b26 @0x2a
0x3afc…3b28 at002b = EOL // 0x3b27 @0x2b
0x3afc…3b28 }
0x3b28…3b54 c8ab 5040 EXEC CALC(0,FÅDEBET$,KG1$(I),FÅDEBET$)
0x3b28…3b54 LineComalBin {
0x3b28…3b54 ptr = 0xc8ab // 0x3b28 @0x0
0x3b28…3b54 lno = 0x13b0 // 0x3b2a @0x2
0x3b28…3b54 at0004 = ╱9d╱ EXEC ╱ // 0x3b2c @0x4
0x3b28…3b54 at0005 = ╱43╱C╱ // 0x3b2d @0x5
0x3b28…3b54 at0006 = ╱41╱A╱ // 0x3b2e @0x6
0x3b28…3b54 at0007 = ╱4c╱L╱ // 0x3b2f @0x7
0x3b28…3b54 at0008 = ╱43╱C╱ // 0x3b30 @0x8
0x3b28…3b54 at0009 = ╱ed╱(╱ // 0x3b31 @0x9
0x3b28…3b54 at000a = ╱30╱0╱ // 0x3b32 @0xa
0x3b28…3b54 at000b = ╱fe00000000╱ // 0x3b33 @0xb
0x3b28…3b54 at0010 = ╱ec╱,╱ // 0x3b38 @0x10
0x3b28…3b54 at0011 = ╱46╱F╱ // 0x3b39 @0x11
0x3b28…3b54 at0012 = ╱5d╱Å╱ // 0x3b3a @0x12
0x3b28…3b54 at0013 = ╱44╱D╱ // 0x3b3b @0x13
0x3b28…3b54 at0014 = ╱45╱E╱ // 0x3b3c @0x14
0x3b28…3b54 at0015 = ╱42╱B╱ // 0x3b3d @0x15
0x3b28…3b54 at0016 = ╱45╱E╱ // 0x3b3e @0x16
0x3b28…3b54 at0017 = ╱54╱T╱ // 0x3b3f @0x17
0x3b28…3b54 at0018 = ╱ef╱$╱ // 0x3b40 @0x18
0x3b28…3b54 at0019 = ╱ec╱,╱ // 0x3b41 @0x19
0x3b28…3b54 at001a = ╱4b╱K╱ // 0x3b42 @0x1a
0x3b28…3b54 at001b = ╱47╱G╱ // 0x3b43 @0x1b
0x3b28…3b54 at001c = ╱31╱1╱ // 0x3b44 @0x1c
0x3b28…3b54 at001d = ╱ef╱$╱ // 0x3b45 @0x1d
0x3b28…3b54 at001e = ╱ed╱(╱ // 0x3b46 @0x1e
0x3b28…3b54 at001f = ╱49╱I╱ // 0x3b47 @0x1f
0x3b28…3b54 at0020 = ╱ee╱)╱ // 0x3b48 @0x20
0x3b28…3b54 at0021 = ╱ec╱,╱ // 0x3b49 @0x21
0x3b28…3b54 at0022 = ╱46╱F╱ // 0x3b4a @0x22
0x3b28…3b54 at0023 = ╱5d╱Å╱ // 0x3b4b @0x23
0x3b28…3b54 at0024 = ╱44╱D╱ // 0x3b4c @0x24
0x3b28…3b54 at0025 = ╱45╱E╱ // 0x3b4d @0x25
0x3b28…3b54 at0026 = ╱42╱B╱ // 0x3b4e @0x26
0x3b28…3b54 at0027 = ╱45╱E╱ // 0x3b4f @0x27
0x3b28…3b54 at0028 = ╱54╱T╱ // 0x3b50 @0x28
0x3b28…3b54 at0029 = ╱ef╱$╱ // 0x3b51 @0x29
0x3b28…3b54 at002a = ╱ee╱)╱ // 0x3b52 @0x2a
0x3b28…3b54 at002b = EOL // 0x3b53 @0x2b
0x3b28…3b54 }
0x3b54…3b89 c8e0 5050 EXEC CALC(0,FMKREDIT$,KG1$(I+1),FMKREDIT$)
0x3b54…3b89 LineComalBin {
0x3b54…3b89 ptr = 0xc8e0 // 0x3b54 @0x0
0x3b54…3b89 lno = 0x13ba // 0x3b56 @0x2
0x3b54…3b89 at0004 = ╱9d╱ EXEC ╱ // 0x3b58 @0x4
0x3b54…3b89 at0005 = ╱43╱C╱ // 0x3b59 @0x5
0x3b54…3b89 at0006 = ╱41╱A╱ // 0x3b5a @0x6
0x3b54…3b89 at0007 = ╱4c╱L╱ // 0x3b5b @0x7
0x3b54…3b89 at0008 = ╱43╱C╱ // 0x3b5c @0x8
0x3b54…3b89 at0009 = ╱ed╱(╱ // 0x3b5d @0x9
0x3b54…3b89 at000a = ╱30╱0╱ // 0x3b5e @0xa
0x3b54…3b89 at000b = ╱fe00000000╱ // 0x3b5f @0xb
0x3b54…3b89 at0010 = ╱ec╱,╱ // 0x3b64 @0x10
0x3b54…3b89 at0011 = ╱46╱F╱ // 0x3b65 @0x11
0x3b54…3b89 at0012 = ╱4d╱M╱ // 0x3b66 @0x12
0x3b54…3b89 at0013 = ╱4b╱K╱ // 0x3b67 @0x13
0x3b54…3b89 at0014 = ╱52╱R╱ // 0x3b68 @0x14
0x3b54…3b89 at0015 = ╱45╱E╱ // 0x3b69 @0x15
0x3b54…3b89 at0016 = ╱44╱D╱ // 0x3b6a @0x16
0x3b54…3b89 at0017 = ╱49╱I╱ // 0x3b6b @0x17
0x3b54…3b89 at0018 = ╱54╱T╱ // 0x3b6c @0x18
0x3b54…3b89 at0019 = ╱ef╱$╱ // 0x3b6d @0x19
0x3b54…3b89 at001a = ╱ec╱,╱ // 0x3b6e @0x1a
0x3b54…3b89 at001b = ╱4b╱K╱ // 0x3b6f @0x1b
0x3b54…3b89 at001c = ╱47╱G╱ // 0x3b70 @0x1c
0x3b54…3b89 at001d = ╱31╱1╱ // 0x3b71 @0x1d
0x3b54…3b89 at001e = ╱ef╱$╱ // 0x3b72 @0x1e
0x3b54…3b89 at001f = ╱ed╱(╱ // 0x3b73 @0x1f
0x3b54…3b89 at0020 = ╱49╱I╱ // 0x3b74 @0x20
0x3b54…3b89 at0021 = ╱e2╱+╱ // 0x3b75 @0x21
0x3b54…3b89 at0022 = ╱31╱1╱ // 0x3b76 @0x22
0x3b54…3b89 at0023 = ╱fe00008001╱ // 0x3b77 @0x23
0x3b54…3b89 at0028 = ╱ee╱)╱ // 0x3b7c @0x28
0x3b54…3b89 at0029 = ╱ec╱,╱ // 0x3b7d @0x29
0x3b54…3b89 at002a = ╱46╱F╱ // 0x3b7e @0x2a
0x3b54…3b89 at002b = ╱4d╱M╱ // 0x3b7f @0x2b
0x3b54…3b89 at002c = ╱4b╱K╱ // 0x3b80 @0x2c
0x3b54…3b89 at002d = ╱52╱R╱ // 0x3b81 @0x2d
0x3b54…3b89 at002e = ╱45╱E╱ // 0x3b82 @0x2e
0x3b54…3b89 at002f = ╱44╱D╱ // 0x3b83 @0x2f
0x3b54…3b89 at0030 = ╱49╱I╱ // 0x3b84 @0x30
0x3b54…3b89 at0031 = ╱54╱T╱ // 0x3b85 @0x31
0x3b54…3b89 at0032 = ╱ef╱$╱ // 0x3b86 @0x32
0x3b54…3b89 at0033 = ╱ee╱)╱ // 0x3b87 @0x33
0x3b54…3b89 at0034 = EOL // 0x3b88 @0x34
0x3b54…3b89 }
0x3b89…3bbe c915 5060 EXEC CALC(0,FÅKREDIT$,KG1$(I+1),FÅKREDIT$)
0x3b89…3bbe LineComalBin {
0x3b89…3bbe ptr = 0xc915 // 0x3b89 @0x0
0x3b89…3bbe lno = 0x13c4 // 0x3b8b @0x2
0x3b89…3bbe at0004 = ╱9d╱ EXEC ╱ // 0x3b8d @0x4
0x3b89…3bbe at0005 = ╱43╱C╱ // 0x3b8e @0x5
0x3b89…3bbe at0006 = ╱41╱A╱ // 0x3b8f @0x6
0x3b89…3bbe at0007 = ╱4c╱L╱ // 0x3b90 @0x7
0x3b89…3bbe at0008 = ╱43╱C╱ // 0x3b91 @0x8
0x3b89…3bbe at0009 = ╱ed╱(╱ // 0x3b92 @0x9
0x3b89…3bbe at000a = ╱30╱0╱ // 0x3b93 @0xa
0x3b89…3bbe at000b = ╱fe00000000╱ // 0x3b94 @0xb
0x3b89…3bbe at0010 = ╱ec╱,╱ // 0x3b99 @0x10
0x3b89…3bbe at0011 = ╱46╱F╱ // 0x3b9a @0x11
0x3b89…3bbe at0012 = ╱5d╱Å╱ // 0x3b9b @0x12
0x3b89…3bbe at0013 = ╱4b╱K╱ // 0x3b9c @0x13
0x3b89…3bbe at0014 = ╱52╱R╱ // 0x3b9d @0x14
0x3b89…3bbe at0015 = ╱45╱E╱ // 0x3b9e @0x15
0x3b89…3bbe at0016 = ╱44╱D╱ // 0x3b9f @0x16
0x3b89…3bbe at0017 = ╱49╱I╱ // 0x3ba0 @0x17
0x3b89…3bbe at0018 = ╱54╱T╱ // 0x3ba1 @0x18
0x3b89…3bbe at0019 = ╱ef╱$╱ // 0x3ba2 @0x19
0x3b89…3bbe at001a = ╱ec╱,╱ // 0x3ba3 @0x1a
0x3b89…3bbe at001b = ╱4b╱K╱ // 0x3ba4 @0x1b
0x3b89…3bbe at001c = ╱47╱G╱ // 0x3ba5 @0x1c
0x3b89…3bbe at001d = ╱31╱1╱ // 0x3ba6 @0x1d
0x3b89…3bbe at001e = ╱ef╱$╱ // 0x3ba7 @0x1e
0x3b89…3bbe at001f = ╱ed╱(╱ // 0x3ba8 @0x1f
0x3b89…3bbe at0020 = ╱49╱I╱ // 0x3ba9 @0x20
0x3b89…3bbe at0021 = ╱e2╱+╱ // 0x3baa @0x21
0x3b89…3bbe at0022 = ╱31╱1╱ // 0x3bab @0x22
0x3b89…3bbe at0023 = ╱fe00008001╱ // 0x3bac @0x23
0x3b89…3bbe at0028 = ╱ee╱)╱ // 0x3bb1 @0x28
0x3b89…3bbe at0029 = ╱ec╱,╱ // 0x3bb2 @0x29
0x3b89…3bbe at002a = ╱46╱F╱ // 0x3bb3 @0x2a
0x3b89…3bbe at002b = ╱5d╱Å╱ // 0x3bb4 @0x2b
0x3b89…3bbe at002c = ╱4b╱K╱ // 0x3bb5 @0x2c
0x3b89…3bbe at002d = ╱52╱R╱ // 0x3bb6 @0x2d
0x3b89…3bbe at002e = ╱45╱E╱ // 0x3bb7 @0x2e
0x3b89…3bbe at002f = ╱44╱D╱ // 0x3bb8 @0x2f
0x3b89…3bbe at0030 = ╱49╱I╱ // 0x3bb9 @0x30
0x3b89…3bbe at0031 = ╱54╱T╱ // 0x3bba @0x31
0x3b89…3bbe at0032 = ╱ef╱$╱ // 0x3bbb @0x32
0x3b89…3bbe at0033 = ╱ee╱)╱ // 0x3bbc @0x33
0x3b89…3bbe at0034 = EOL // 0x3bbd @0x34
0x3b89…3bbe }
0x3bbe…3bcc c923 5070 EXEC GEMFPOST
0x3bbe…3bcc LineComalBin {
0x3bbe…3bcc ptr = 0xc923 // 0x3bbe @0x0
0x3bbe…3bcc lno = 0x13ce // 0x3bc0 @0x2
0x3bbe…3bcc at0004 = ╱9d╱ EXEC ╱ // 0x3bc2 @0x4
0x3bbe…3bcc at0005 = ╱47╱G╱ // 0x3bc3 @0x5
0x3bbe…3bcc at0006 = ╱45╱E╱ // 0x3bc4 @0x6
0x3bbe…3bcc at0007 = ╱4d╱M╱ // 0x3bc5 @0x7
0x3bbe…3bcc at0008 = ╱46╱F╱ // 0x3bc6 @0x8
0x3bbe…3bcc at0009 = ╱50╱P╱ // 0x3bc7 @0x9
0x3bbe…3bcc at000a = ╱4f╱O╱ // 0x3bc8 @0xa
0x3bbe…3bcc at000b = ╱53╱S╱ // 0x3bc9 @0xb
0x3bbe…3bcc at000c = ╱54╱T╱ // 0x3bca @0xc
0x3bbe…3bcc at000d = EOL // 0x3bcb @0xd
0x3bbe…3bcc }
0x3bcc…3bd3 c92a 5080 NEXT I
0x3bcc…3bd3 LineComalBin {
0x3bcc…3bd3 ptr = 0xc92a // 0x3bcc @0x0
0x3bcc…3bd3 lno = 0x13d8 // 0x3bce @0x2
0x3bcc…3bd3 at0004 = ╱84╱ NEXT ╱ // 0x3bd0 @0x4
0x3bcc…3bd3 at0005 = ╱49╱I╱ // 0x3bd1 @0x5
0x3bcc…3bd3 at0006 = EOL // 0x3bd2 @0x6
0x3bcc…3bd3 }
0x3bd3…3bd9 c930 5090 ENDPROC
0x3bd3…3bd9 LineComalBin {
0x3bd3…3bd9 ptr = 0xc930 // 0x3bd3 @0x0
0x3bd3…3bd9 lno = 0x13e2 // 0x3bd5 @0x2
0x3bd3…3bd9 at0004 = ╱9f╱ ENDPROC ╱ // 0x3bd7 @0x4
0x3bd3…3bd9 at0005 = EOL // 0x3bd8 @0x5
0x3bd3…3bd9 }
0x3bd9…3bf1 c948 5100 FNR=DTAL*10000
0x3bd9…3bf1 LineComalBin {
0x3bd9…3bf1 ptr = 0xc948 // 0x3bd9 @0x0
0x3bd9…3bf1 lno = 0x13ec // 0x3bdb @0x2
0x3bd9…3bf1 at0004 = ╱46╱F╱ // 0x3bdd @0x4
0x3bd9…3bf1 at0005 = ╱4e╱N╱ // 0x3bde @0x5
0x3bd9…3bf1 at0006 = ╱52╱R╱ // 0x3bdf @0x6
0x3bd9…3bf1 at0007 = ╱dc╱=╱ // 0x3be0 @0x7
0x3bd9…3bf1 at0008 = ╱44╱D╱ // 0x3be1 @0x8
0x3bd9…3bf1 at0009 = ╱54╱T╱ // 0x3be2 @0x9
0x3bd9…3bf1 at000a = ╱41╱A╱ // 0x3be3 @0xa
0x3bd9…3bf1 at000b = ╱4c╱L╱ // 0x3be4 @0xb
0x3bd9…3bf1 at000c = ╱e4╱*╱ // 0x3be5 @0xc
0x3bd9…3bf1 at000d = ╱31╱1╱ // 0x3be6 @0xd
0x3bd9…3bf1 at000e = ╱30╱0╱ // 0x3be7 @0xe
0x3bd9…3bf1 at000f = ╱30╱0╱ // 0x3be8 @0xf
0x3bd9…3bf1 at0010 = ╱30╱0╱ // 0x3be9 @0x10
0x3bd9…3bf1 at0011 = ╱30╱0╱ // 0x3bea @0x11
0x3bd9…3bf1 at0012 = ╱fe00409c0e╱ // 0x3beb @0x12
0x3bd9…3bf1 at0017 = EOL // 0x3bf0 @0x17
0x3bd9…3bf1 }
0x3bf1…3c08 c95f 5110 EXEC GRUPPE(MKGR,KGR$)
0x3bf1…3c08 LineComalBin {
0x3bf1…3c08 ptr = 0xc95f // 0x3bf1 @0x0
0x3bf1…3c08 lno = 0x13f6 // 0x3bf3 @0x2
0x3bf1…3c08 at0004 = ╱9d╱ EXEC ╱ // 0x3bf5 @0x4
0x3bf1…3c08 at0005 = ╱47╱G╱ // 0x3bf6 @0x5
0x3bf1…3c08 at0006 = ╱52╱R╱ // 0x3bf7 @0x6
0x3bf1…3c08 at0007 = ╱55╱U╱ // 0x3bf8 @0x7
0x3bf1…3c08 at0008 = ╱50╱P╱ // 0x3bf9 @0x8
0x3bf1…3c08 at0009 = ╱50╱P╱ // 0x3bfa @0x9
0x3bf1…3c08 at000a = ╱45╱E╱ // 0x3bfb @0xa
0x3bf1…3c08 at000b = ╱ed╱(╱ // 0x3bfc @0xb
0x3bf1…3c08 at000c = ╱4d╱M╱ // 0x3bfd @0xc
0x3bf1…3c08 at000d = ╱4b╱K╱ // 0x3bfe @0xd
0x3bf1…3c08 at000e = ╱47╱G╱ // 0x3bff @0xe
0x3bf1…3c08 at000f = ╱52╱R╱ // 0x3c00 @0xf
0x3bf1…3c08 at0010 = ╱ec╱,╱ // 0x3c01 @0x10
0x3bf1…3c08 at0011 = ╱4b╱K╱ // 0x3c02 @0x11
0x3bf1…3c08 at0012 = ╱47╱G╱ // 0x3c03 @0x12
0x3bf1…3c08 at0013 = ╱52╱R╱ // 0x3c04 @0x13
0x3bf1…3c08 at0014 = ╱ef╱$╱ // 0x3c05 @0x14
0x3bf1…3c08 at0015 = ╱ee╱)╱ // 0x3c06 @0x15
0x3bf1…3c08 at0016 = EOL // 0x3c07 @0x16
0x3bf1…3c08 }
0x3c08…3c20 c977 5120 FNR=KRTAL*1000
0x3c08…3c20 LineComalBin {
0x3c08…3c20 ptr = 0xc977 // 0x3c08 @0x0
0x3c08…3c20 lno = 0x1400 // 0x3c0a @0x2
0x3c08…3c20 at0004 = ╱46╱F╱ // 0x3c0c @0x4
0x3c08…3c20 at0005 = ╱4e╱N╱ // 0x3c0d @0x5
0x3c08…3c20 at0006 = ╱52╱R╱ // 0x3c0e @0x6
0x3c08…3c20 at0007 = ╱dc╱=╱ // 0x3c0f @0x7
0x3c08…3c20 at0008 = ╱4b╱K╱ // 0x3c10 @0x8
0x3c08…3c20 at0009 = ╱52╱R╱ // 0x3c11 @0x9
0x3c08…3c20 at000a = ╱54╱T╱ // 0x3c12 @0xa
0x3c08…3c20 at000b = ╱41╱A╱ // 0x3c13 @0xb
0x3c08…3c20 at000c = ╱4c╱L╱ // 0x3c14 @0xc
0x3c08…3c20 at000d = ╱e4╱*╱ // 0x3c15 @0xd
0x3c08…3c20 at000e = ╱31╱1╱ // 0x3c16 @0xe
0x3c08…3c20 at000f = ╱30╱0╱ // 0x3c17 @0xf
0x3c08…3c20 at0010 = ╱30╱0╱ // 0x3c18 @0x10
0x3c08…3c20 at0011 = ╱30╱0╱ // 0x3c19 @0x11
0x3c08…3c20 at0012 = ╱fe0000fa0a╱ // 0x3c1a @0x12
0x3c08…3c20 at0017 = EOL // 0x3c1f @0x17
0x3c08…3c20 }
0x3c20…3c3a c991 5130 EXEC GRUPPE(MKRGR,KREGR$)
0x3c20…3c3a LineComalBin {
0x3c20…3c3a ptr = 0xc991 // 0x3c20 @0x0
0x3c20…3c3a lno = 0x140a // 0x3c22 @0x2
0x3c20…3c3a at0004 = ╱9d╱ EXEC ╱ // 0x3c24 @0x4
0x3c20…3c3a at0005 = ╱47╱G╱ // 0x3c25 @0x5
0x3c20…3c3a at0006 = ╱52╱R╱ // 0x3c26 @0x6
0x3c20…3c3a at0007 = ╱55╱U╱ // 0x3c27 @0x7
0x3c20…3c3a at0008 = ╱50╱P╱ // 0x3c28 @0x8
0x3c20…3c3a at0009 = ╱50╱P╱ // 0x3c29 @0x9
0x3c20…3c3a at000a = ╱45╱E╱ // 0x3c2a @0xa
0x3c20…3c3a at000b = ╱ed╱(╱ // 0x3c2b @0xb
0x3c20…3c3a at000c = ╱4d╱M╱ // 0x3c2c @0xc
0x3c20…3c3a at000d = ╱4b╱K╱ // 0x3c2d @0xd
0x3c20…3c3a at000e = ╱52╱R╱ // 0x3c2e @0xe
0x3c20…3c3a at000f = ╱47╱G╱ // 0x3c2f @0xf
0x3c20…3c3a at0010 = ╱52╱R╱ // 0x3c30 @0x10
0x3c20…3c3a at0011 = ╱ec╱,╱ // 0x3c31 @0x11
0x3c20…3c3a at0012 = ╱4b╱K╱ // 0x3c32 @0x12
0x3c20…3c3a at0013 = ╱52╱R╱ // 0x3c33 @0x13
0x3c20…3c3a at0014 = ╱45╱E╱ // 0x3c34 @0x14
0x3c20…3c3a at0015 = ╱47╱G╱ // 0x3c35 @0x15
0x3c20…3c3a at0016 = ╱52╱R╱ // 0x3c36 @0x16
0x3c20…3c3a at0017 = ╱ef╱$╱ // 0x3c37 @0x17
0x3c20…3c3a at0018 = ╱ee╱)╱ // 0x3c38 @0x18
0x3c20…3c3a at0019 = EOL // 0x3c39 @0x19
0x3c20…3c3a }
0x3c3a…3c43 c99a 5140 CLOSE K5$
0x3c3a…3c43 LineComalBin {
0x3c3a…3c43 ptr = 0xc99a // 0x3c3a @0x0
0x3c3a…3c43 lno = 0x1414 // 0x3c3c @0x2
0x3c3a…3c43 at0004 = ╱a8╱ CLOSE ╱ // 0x3c3e @0x4
0x3c3a…3c43 at0005 = ╱4b╱K╱ // 0x3c3f @0x5
0x3c3a…3c43 at0006 = ╱35╱5╱ // 0x3c40 @0x6
0x3c3a…3c43 at0007 = ╱ef╱$╱ // 0x3c41 @0x7
0x3c3a…3c43 at0008 = EOL // 0x3c42 @0x8
0x3c3a…3c43 }
0x3c43…3c61 c9b8 5150 EXEC FEJL(9,45,K5$)
0x3c43…3c61 LineComalBin {
0x3c43…3c61 ptr = 0xc9b8 // 0x3c43 @0x0
0x3c43…3c61 lno = 0x141e // 0x3c45 @0x2
0x3c43…3c61 at0004 = ╱9d╱ EXEC ╱ // 0x3c47 @0x4
0x3c43…3c61 at0005 = ╱46╱F╱ // 0x3c48 @0x5
0x3c43…3c61 at0006 = ╱45╱E╱ // 0x3c49 @0x6
0x3c43…3c61 at0007 = ╱4a╱J╱ // 0x3c4a @0x7
0x3c43…3c61 at0008 = ╱4c╱L╱ // 0x3c4b @0x8
0x3c43…3c61 at0009 = ╱ed╱(╱ // 0x3c4c @0x9
0x3c43…3c61 at000a = ╱39╱9╱ // 0x3c4d @0xa
0x3c43…3c61 at000b = ╱fe00009004╱ // 0x3c4e @0xb
0x3c43…3c61 at0010 = ╱ec╱,╱ // 0x3c53 @0x10
0x3c43…3c61 at0011 = ╱34╱4╱ // 0x3c54 @0x11
0x3c43…3c61 at0012 = ╱35╱5╱ // 0x3c55 @0x12
0x3c43…3c61 at0013 = ╱fe0000b406╱ // 0x3c56 @0x13
0x3c43…3c61 at0018 = ╱ec╱,╱ // 0x3c5b @0x18
0x3c43…3c61 at0019 = ╱4b╱K╱ // 0x3c5c @0x19
0x3c43…3c61 at001a = ╱35╱5╱ // 0x3c5d @0x1a
0x3c43…3c61 at001b = ╱ef╱$╱ // 0x3c5e @0x1b
0x3c43…3c61 at001c = ╱ee╱)╱ // 0x3c5f @0x1c
0x3c43…3c61 at001d = EOL // 0x3c60 @0x1d
0x3c43…3c61 }
0x3c61…3c6a c9c1 5160 CLOSE K6$
0x3c61…3c6a LineComalBin {
0x3c61…3c6a ptr = 0xc9c1 // 0x3c61 @0x0
0x3c61…3c6a lno = 0x1428 // 0x3c63 @0x2
0x3c61…3c6a at0004 = ╱a8╱ CLOSE ╱ // 0x3c65 @0x4
0x3c61…3c6a at0005 = ╱4b╱K╱ // 0x3c66 @0x5
0x3c61…3c6a at0006 = ╱36╱6╱ // 0x3c67 @0x6
0x3c61…3c6a at0007 = ╱ef╱$╱ // 0x3c68 @0x7
0x3c61…3c6a at0008 = EOL // 0x3c69 @0x8
0x3c61…3c6a }
0x3c6a…3c88 c9df 5170 EXEC FEJL(9,46,K6$)
0x3c6a…3c88 LineComalBin {
0x3c6a…3c88 ptr = 0xc9df // 0x3c6a @0x0
0x3c6a…3c88 lno = 0x1432 // 0x3c6c @0x2
0x3c6a…3c88 at0004 = ╱9d╱ EXEC ╱ // 0x3c6e @0x4
0x3c6a…3c88 at0005 = ╱46╱F╱ // 0x3c6f @0x5
0x3c6a…3c88 at0006 = ╱45╱E╱ // 0x3c70 @0x6
0x3c6a…3c88 at0007 = ╱4a╱J╱ // 0x3c71 @0x7
0x3c6a…3c88 at0008 = ╱4c╱L╱ // 0x3c72 @0x8
0x3c6a…3c88 at0009 = ╱ed╱(╱ // 0x3c73 @0x9
0x3c6a…3c88 at000a = ╱39╱9╱ // 0x3c74 @0xa
0x3c6a…3c88 at000b = ╱fe00009004╱ // 0x3c75 @0xb
0x3c6a…3c88 at0010 = ╱ec╱,╱ // 0x3c7a @0x10
0x3c6a…3c88 at0011 = ╱34╱4╱ // 0x3c7b @0x11
0x3c6a…3c88 at0012 = ╱36╱6╱ // 0x3c7c @0x12
0x3c6a…3c88 at0013 = ╱fe0000b806╱ // 0x3c7d @0x13
0x3c6a…3c88 at0018 = ╱ec╱,╱ // 0x3c82 @0x18
0x3c6a…3c88 at0019 = ╱4b╱K╱ // 0x3c83 @0x19
0x3c6a…3c88 at001a = ╱36╱6╱ // 0x3c84 @0x1a
0x3c6a…3c88 at001b = ╱ef╱$╱ // 0x3c85 @0x1b
0x3c6a…3c88 at001c = ╱ee╱)╱ // 0x3c86 @0x1c
0x3c6a…3c88 at001d = EOL // 0x3c87 @0x1d
0x3c6a…3c88 }
0x3c88…3c91 c9e8 5180 CLOSE K7$
0x3c88…3c91 LineComalBin {
0x3c88…3c91 ptr = 0xc9e8 // 0x3c88 @0x0
0x3c88…3c91 lno = 0x143c // 0x3c8a @0x2
0x3c88…3c91 at0004 = ╱a8╱ CLOSE ╱ // 0x3c8c @0x4
0x3c88…3c91 at0005 = ╱4b╱K╱ // 0x3c8d @0x5
0x3c88…3c91 at0006 = ╱37╱7╱ // 0x3c8e @0x6
0x3c88…3c91 at0007 = ╱ef╱$╱ // 0x3c8f @0x7
0x3c88…3c91 at0008 = EOL // 0x3c90 @0x8
0x3c88…3c91 }
0x3c91…3caf ca06 5190 EXEC FEJL(9,47,K7$)
0x3c91…3caf LineComalBin {
0x3c91…3caf ptr = 0xca06 // 0x3c91 @0x0
0x3c91…3caf lno = 0x1446 // 0x3c93 @0x2
0x3c91…3caf at0004 = ╱9d╱ EXEC ╱ // 0x3c95 @0x4
0x3c91…3caf at0005 = ╱46╱F╱ // 0x3c96 @0x5
0x3c91…3caf at0006 = ╱45╱E╱ // 0x3c97 @0x6
0x3c91…3caf at0007 = ╱4a╱J╱ // 0x3c98 @0x7
0x3c91…3caf at0008 = ╱4c╱L╱ // 0x3c99 @0x8
0x3c91…3caf at0009 = ╱ed╱(╱ // 0x3c9a @0x9
0x3c91…3caf at000a = ╱39╱9╱ // 0x3c9b @0xa
0x3c91…3caf at000b = ╱fe00009004╱ // 0x3c9c @0xb
0x3c91…3caf at0010 = ╱ec╱,╱ // 0x3ca1 @0x10
0x3c91…3caf at0011 = ╱34╱4╱ // 0x3ca2 @0x11
0x3c91…3caf at0012 = ╱37╱7╱ // 0x3ca3 @0x12
0x3c91…3caf at0013 = ╱fe0000bc06╱ // 0x3ca4 @0x13
0x3c91…3caf at0018 = ╱ec╱,╱ // 0x3ca9 @0x18
0x3c91…3caf at0019 = ╱4b╱K╱ // 0x3caa @0x19
0x3c91…3caf at001a = ╱37╱7╱ // 0x3cab @0x1a
0x3c91…3caf at001b = ╱ef╱$╱ // 0x3cac @0x1b
0x3c91…3caf at001c = ╱ee╱)╱ // 0x3cad @0x1c
0x3c91…3caf at001d = EOL // 0x3cae @0x1d
0x3c91…3caf }
0x3caf…3cb8 ca0f 5200 CLOSE K9$
0x3caf…3cb8 LineComalBin {
0x3caf…3cb8 ptr = 0xca0f // 0x3caf @0x0
0x3caf…3cb8 lno = 0x1450 // 0x3cb1 @0x2
0x3caf…3cb8 at0004 = ╱a8╱ CLOSE ╱ // 0x3cb3 @0x4
0x3caf…3cb8 at0005 = ╱4b╱K╱ // 0x3cb4 @0x5
0x3caf…3cb8 at0006 = ╱39╱9╱ // 0x3cb5 @0x6
0x3caf…3cb8 at0007 = ╱ef╱$╱ // 0x3cb6 @0x7
0x3caf…3cb8 at0008 = EOL // 0x3cb7 @0x8
0x3caf…3cb8 }
0x3cb8…3cd6 ca2d 5210 EXEC FEJL(9,48,K9$)
0x3cb8…3cd6 LineComalBin {
0x3cb8…3cd6 ptr = 0xca2d // 0x3cb8 @0x0
0x3cb8…3cd6 lno = 0x145a // 0x3cba @0x2
0x3cb8…3cd6 at0004 = ╱9d╱ EXEC ╱ // 0x3cbc @0x4
0x3cb8…3cd6 at0005 = ╱46╱F╱ // 0x3cbd @0x5
0x3cb8…3cd6 at0006 = ╱45╱E╱ // 0x3cbe @0x6
0x3cb8…3cd6 at0007 = ╱4a╱J╱ // 0x3cbf @0x7
0x3cb8…3cd6 at0008 = ╱4c╱L╱ // 0x3cc0 @0x8
0x3cb8…3cd6 at0009 = ╱ed╱(╱ // 0x3cc1 @0x9
0x3cb8…3cd6 at000a = ╱39╱9╱ // 0x3cc2 @0xa
0x3cb8…3cd6 at000b = ╱fe00009004╱ // 0x3cc3 @0xb
0x3cb8…3cd6 at0010 = ╱ec╱,╱ // 0x3cc8 @0x10
0x3cb8…3cd6 at0011 = ╱34╱4╱ // 0x3cc9 @0x11
0x3cb8…3cd6 at0012 = ╱38╱8╱ // 0x3cca @0x12
0x3cb8…3cd6 at0013 = ╱fe0000c006╱ // 0x3ccb @0x13
0x3cb8…3cd6 at0018 = ╱ec╱,╱ // 0x3cd0 @0x18
0x3cb8…3cd6 at0019 = ╱4b╱K╱ // 0x3cd1 @0x19
0x3cb8…3cd6 at001a = ╱39╱9╱ // 0x3cd2 @0x1a
0x3cb8…3cd6 at001b = ╱ef╱$╱ // 0x3cd3 @0x1b
0x3cb8…3cd6 at001c = ╱ee╱)╱ // 0x3cd4 @0x1c
0x3cb8…3cd6 at001d = EOL // 0x3cd5 @0x1d
0x3cb8…3cd6 }
0x3cd6…3ce0 ca37 5220 CLOSE K10$
0x3cd6…3ce0 LineComalBin {
0x3cd6…3ce0 ptr = 0xca37 // 0x3cd6 @0x0
0x3cd6…3ce0 lno = 0x1464 // 0x3cd8 @0x2
0x3cd6…3ce0 at0004 = ╱a8╱ CLOSE ╱ // 0x3cda @0x4
0x3cd6…3ce0 at0005 = ╱4b╱K╱ // 0x3cdb @0x5
0x3cd6…3ce0 at0006 = ╱31╱1╱ // 0x3cdc @0x6
0x3cd6…3ce0 at0007 = ╱30╱0╱ // 0x3cdd @0x7
0x3cd6…3ce0 at0008 = ╱ef╱$╱ // 0x3cde @0x8
0x3cd6…3ce0 at0009 = EOL // 0x3cdf @0x9
0x3cd6…3ce0 }
0x3ce0…3cff ca56 5230 EXEC FEJL(9,49,K10$)
0x3ce0…3cff LineComalBin {
0x3ce0…3cff ptr = 0xca56 // 0x3ce0 @0x0
0x3ce0…3cff lno = 0x146e // 0x3ce2 @0x2
0x3ce0…3cff at0004 = ╱9d╱ EXEC ╱ // 0x3ce4 @0x4
0x3ce0…3cff at0005 = ╱46╱F╱ // 0x3ce5 @0x5
0x3ce0…3cff at0006 = ╱45╱E╱ // 0x3ce6 @0x6
0x3ce0…3cff at0007 = ╱4a╱J╱ // 0x3ce7 @0x7
0x3ce0…3cff at0008 = ╱4c╱L╱ // 0x3ce8 @0x8
0x3ce0…3cff at0009 = ╱ed╱(╱ // 0x3ce9 @0x9
0x3ce0…3cff at000a = ╱39╱9╱ // 0x3cea @0xa
0x3ce0…3cff at000b = ╱fe00009004╱ // 0x3ceb @0xb
0x3ce0…3cff at0010 = ╱ec╱,╱ // 0x3cf0 @0x10
0x3ce0…3cff at0011 = ╱34╱4╱ // 0x3cf1 @0x11
0x3ce0…3cff at0012 = ╱39╱9╱ // 0x3cf2 @0x12
0x3ce0…3cff at0013 = ╱fe0000c406╱ // 0x3cf3 @0x13
0x3ce0…3cff at0018 = ╱ec╱,╱ // 0x3cf8 @0x18
0x3ce0…3cff at0019 = ╱4b╱K╱ // 0x3cf9 @0x19
0x3ce0…3cff at001a = ╱31╱1╱ // 0x3cfa @0x1a
0x3ce0…3cff at001b = ╱30╱0╱ // 0x3cfb @0x1b
0x3ce0…3cff at001c = ╱ef╱$╱ // 0x3cfc @0x1c
0x3ce0…3cff at001d = ╱ee╱)╱ // 0x3cfd @0x1d
0x3ce0…3cff at001e = EOL // 0x3cfe @0x1e
0x3ce0…3cff }
0x3cff…3d09 ca60 5240 CLOSE K11$
0x3cff…3d09 LineComalBin {
0x3cff…3d09 ptr = 0xca60 // 0x3cff @0x0
0x3cff…3d09 lno = 0x1478 // 0x3d01 @0x2
0x3cff…3d09 at0004 = ╱a8╱ CLOSE ╱ // 0x3d03 @0x4
0x3cff…3d09 at0005 = ╱4b╱K╱ // 0x3d04 @0x5
0x3cff…3d09 at0006 = ╱31╱1╱ // 0x3d05 @0x6
0x3cff…3d09 at0007 = ╱31╱1╱ // 0x3d06 @0x7
0x3cff…3d09 at0008 = ╱ef╱$╱ // 0x3d07 @0x8
0x3cff…3d09 at0009 = EOL // 0x3d08 @0x9
0x3cff…3d09 }
0x3d09…3d28 ca7f 5250 EXEC FEJL(9,50,K11$)
0x3d09…3d28 LineComalBin {
0x3d09…3d28 ptr = 0xca7f // 0x3d09 @0x0
0x3d09…3d28 lno = 0x1482 // 0x3d0b @0x2
0x3d09…3d28 at0004 = ╱9d╱ EXEC ╱ // 0x3d0d @0x4
0x3d09…3d28 at0005 = ╱46╱F╱ // 0x3d0e @0x5
0x3d09…3d28 at0006 = ╱45╱E╱ // 0x3d0f @0x6
0x3d09…3d28 at0007 = ╱4a╱J╱ // 0x3d10 @0x7
0x3d09…3d28 at0008 = ╱4c╱L╱ // 0x3d11 @0x8
0x3d09…3d28 at0009 = ╱ed╱(╱ // 0x3d12 @0x9
0x3d09…3d28 at000a = ╱39╱9╱ // 0x3d13 @0xa
0x3d09…3d28 at000b = ╱fe00009004╱ // 0x3d14 @0xb
0x3d09…3d28 at0010 = ╱ec╱,╱ // 0x3d19 @0x10
0x3d09…3d28 at0011 = ╱35╱5╱ // 0x3d1a @0x11
0x3d09…3d28 at0012 = ╱30╱0╱ // 0x3d1b @0x12
0x3d09…3d28 at0013 = ╱fe0000c806╱ // 0x3d1c @0x13
0x3d09…3d28 at0018 = ╱ec╱,╱ // 0x3d21 @0x18
0x3d09…3d28 at0019 = ╱4b╱K╱ // 0x3d22 @0x19
0x3d09…3d28 at001a = ╱31╱1╱ // 0x3d23 @0x1a
0x3d09…3d28 at001b = ╱31╱1╱ // 0x3d24 @0x1b
0x3d09…3d28 at001c = ╱ef╱$╱ // 0x3d25 @0x1c
0x3d09…3d28 at001d = ╱ee╱)╱ // 0x3d26 @0x1d
0x3d09…3d28 at001e = EOL // 0x3d27 @0x1e
0x3d09…3d28 }
0x3d28…3d32 ca89 5260 CLOSE K14$
0x3d28…3d32 LineComalBin {
0x3d28…3d32 ptr = 0xca89 // 0x3d28 @0x0
0x3d28…3d32 lno = 0x148c // 0x3d2a @0x2
0x3d28…3d32 at0004 = ╱a8╱ CLOSE ╱ // 0x3d2c @0x4
0x3d28…3d32 at0005 = ╱4b╱K╱ // 0x3d2d @0x5
0x3d28…3d32 at0006 = ╱31╱1╱ // 0x3d2e @0x6
0x3d28…3d32 at0007 = ╱34╱4╱ // 0x3d2f @0x7
0x3d28…3d32 at0008 = ╱ef╱$╱ // 0x3d30 @0x8
0x3d28…3d32 at0009 = EOL // 0x3d31 @0x9
0x3d28…3d32 }
0x3d32…3d52 caa9 5270 EXEC FEJL(20,16,K14$)
0x3d32…3d52 LineComalBin {
0x3d32…3d52 ptr = 0xcaa9 // 0x3d32 @0x0
0x3d32…3d52 lno = 0x1496 // 0x3d34 @0x2
0x3d32…3d52 at0004 = ╱9d╱ EXEC ╱ // 0x3d36 @0x4
0x3d32…3d52 at0005 = ╱46╱F╱ // 0x3d37 @0x5
0x3d32…3d52 at0006 = ╱45╱E╱ // 0x3d38 @0x6
0x3d32…3d52 at0007 = ╱4a╱J╱ // 0x3d39 @0x7
0x3d32…3d52 at0008 = ╱4c╱L╱ // 0x3d3a @0x8
0x3d32…3d52 at0009 = ╱ed╱(╱ // 0x3d3b @0x9
0x3d32…3d52 at000a = ╱32╱2╱ // 0x3d3c @0xa
0x3d32…3d52 at000b = ╱30╱0╱ // 0x3d3d @0xb
0x3d32…3d52 at000c = ╱fe0000a005╱ // 0x3d3e @0xc
0x3d32…3d52 at0011 = ╱ec╱,╱ // 0x3d43 @0x11
0x3d32…3d52 at0012 = ╱31╱1╱ // 0x3d44 @0x12
0x3d32…3d52 at0013 = ╱36╱6╱ // 0x3d45 @0x13
0x3d32…3d52 at0014 = ╱fe00008005╱ // 0x3d46 @0x14
0x3d32…3d52 at0019 = ╱ec╱,╱ // 0x3d4b @0x19
0x3d32…3d52 at001a = ╱4b╱K╱ // 0x3d4c @0x1a
0x3d32…3d52 at001b = ╱31╱1╱ // 0x3d4d @0x1b
0x3d32…3d52 at001c = ╱34╱4╱ // 0x3d4e @0x1c
0x3d32…3d52 at001d = ╱ef╱$╱ // 0x3d4f @0x1d
0x3d32…3d52 at001e = ╱ee╱)╱ // 0x3d50 @0x1e
0x3d32…3d52 at001f = EOL // 0x3d51 @0x1f
0x3d32…3d52 }
0x3d52…3d5c cab3 5280 CLOSE K17$
0x3d52…3d5c LineComalBin {
0x3d52…3d5c ptr = 0xcab3 // 0x3d52 @0x0
0x3d52…3d5c lno = 0x14a0 // 0x3d54 @0x2
0x3d52…3d5c at0004 = ╱a8╱ CLOSE ╱ // 0x3d56 @0x4
0x3d52…3d5c at0005 = ╱4b╱K╱ // 0x3d57 @0x5
0x3d52…3d5c at0006 = ╱31╱1╱ // 0x3d58 @0x6
0x3d52…3d5c at0007 = ╱37╱7╱ // 0x3d59 @0x7
0x3d52…3d5c at0008 = ╱ef╱$╱ // 0x3d5a @0x8
0x3d52…3d5c at0009 = EOL // 0x3d5b @0x9
0x3d52…3d5c }
0x3d5c…3d7c (204,) cad3 5290 EXEC FEJL(20,17,K17$)
0x3d5c…3d7c LineComalBin {
0x3d5c…3d7c ptr = 0xcad3 // 0x3d5c @0x0
0x3d5c…3d7c lno = 0x14aa // 0x3d5e @0x2
0x3d5c…3d7c at0004 = ╱9d╱ EXEC ╱ // 0x3d60 @0x4
0x3d5c…3d7c at0005 = ╱46╱F╱ // 0x3d61 @0x5
0x3d5c…3d7c at0006 = ╱45╱E╱ // 0x3d62 @0x6
0x3d5c…3d7c at0007 = ╱4a╱J╱ // 0x3d63 @0x7
0x3d5c…3d7c at0008 = ╱4c╱L╱ // 0x3d64 @0x8
0x3d5c…3d7c at0009 = ╱ed╱(╱ // 0x3d65 @0x9
0x3d5c…3d7c at000a = ╱32╱2╱ // 0x3d66 @0xa
0x3d5c…3d7c at000b = ╱30╱0╱ // 0x3d67 @0xb
0x3d5c…3d7c at000c = ╱fe0000a005╱ // 0x3d68 @0xc
0x3d5c…3d7c at0011 = ╱ec╱,╱ // 0x3d6d @0x11
0x3d5c…3d7c at0012 = ╱31╱1╱ // 0x3d6e @0x12
0x3d5c…3d7c at0013 = ╱37╱7╱ // 0x3d6f @0x13
0x3d5c…3d7c at0014 = ╱fe00008805╱ // 0x3d70 @0x14
0x3d5c…3d7c at0019 = ╱ec╱,╱ // 0x3d75 @0x19
0x3d5c…3d7c at001a = ╱4b╱K╱ // 0x3d76 @0x1a
0x3d5c…3d7c at001b = ╱31╱1╱ // 0x3d77 @0x1b
0x3d5c…3d7c at001c = ╱37╱7╱ // 0x3d78 @0x1c
0x3d5c…3d7c at001d = ╱ef╱$╱ // 0x3d79 @0x1d
0x3d5c…3d7c at001e = ╱ee╱)╱ // 0x3d7a @0x1e
0x3d5c…3d7c at001f = EOL // 0x3d7b @0x1f
0x3d5c…3d7c }
0x3d7c…3d82 cad9 5300 CLOSE
0x3d7c…3d82 LineComalBin {
0x3d7c…3d82 ptr = 0xcad9 // 0x3d7c @0x0
0x3d7c…3d82 lno = 0x14b4 // 0x3d7e @0x2
0x3d7c…3d82 at0004 = ╱a8╱ CLOSE ╱ // 0x3d80 @0x4
0x3d7c…3d82 at0005 = EOL // 0x3d81 @0x5
0x3d7c…3d82 }
0x3d82…3df5 cb4c 5310 T1(6)=BJSIDENR;T3(1)=0;T2(3)=0;T3(2)=FMIDNR;T3(3)=DMIDNR;T3(4)=KRMIDNR
0x3d82…3df5 LineComalBin {
0x3d82…3df5 ptr = 0xcb4c // 0x3d82 @0x0
0x3d82…3df5 lno = 0x14be // 0x3d84 @0x2
0x3d82…3df5 at0004 = ╱54╱T╱ // 0x3d86 @0x4
0x3d82…3df5 at0005 = ╱31╱1╱ // 0x3d87 @0x5
0x3d82…3df5 at0006 = ╱ed╱(╱ // 0x3d88 @0x6
0x3d82…3df5 at0007 = ╱36╱6╱ // 0x3d89 @0x7
0x3d82…3df5 at0008 = ╱fe0000c003╱ // 0x3d8a @0x8
0x3d82…3df5 at000d = ╱ee╱)╱ // 0x3d8f @0xd
0x3d82…3df5 at000e = ╱dc╱=╱ // 0x3d90 @0xe
0x3d82…3df5 at000f = ╱42╱B╱ // 0x3d91 @0xf
0x3d82…3df5 at0010 = ╱4a╱J╱ // 0x3d92 @0x10
0x3d82…3df5 at0011 = ╱53╱S╱ // 0x3d93 @0x11
0x3d82…3df5 at0012 = ╱49╱I╱ // 0x3d94 @0x12
0x3d82…3df5 at0013 = ╱44╱D╱ // 0x3d95 @0x13
0x3d82…3df5 at0014 = ╱45╱E╱ // 0x3d96 @0x14
0x3d82…3df5 at0015 = ╱4e╱N╱ // 0x3d97 @0x15
0x3d82…3df5 at0016 = ╱52╱R╱ // 0x3d98 @0x16
0x3d82…3df5 at0017 = ╱eb╱;╱ // 0x3d99 @0x17
0x3d82…3df5 at0018 = ╱54╱T╱ // 0x3d9a @0x18
0x3d82…3df5 at0019 = ╱33╱3╱ // 0x3d9b @0x19
0x3d82…3df5 at001a = ╱ed╱(╱ // 0x3d9c @0x1a
0x3d82…3df5 at001b = ╱31╱1╱ // 0x3d9d @0x1b
0x3d82…3df5 at001c = ╱fe00008001╱ // 0x3d9e @0x1c
0x3d82…3df5 at0021 = ╱ee╱)╱ // 0x3da3 @0x21
0x3d82…3df5 at0022 = ╱dc╱=╱ // 0x3da4 @0x22
0x3d82…3df5 at0023 = ╱30╱0╱ // 0x3da5 @0x23
0x3d82…3df5 at0024 = ╱fe00000000╱ // 0x3da6 @0x24
0x3d82…3df5 at0029 = ╱eb╱;╱ // 0x3dab @0x29
0x3d82…3df5 at002a = ╱54╱T╱ // 0x3dac @0x2a
0x3d82…3df5 at002b = ╱32╱2╱ // 0x3dad @0x2b
0x3d82…3df5 at002c = ╱ed╱(╱ // 0x3dae @0x2c
0x3d82…3df5 at002d = ╱33╱3╱ // 0x3daf @0x2d
0x3d82…3df5 at002e = ╱fe0000c002╱ // 0x3db0 @0x2e
0x3d82…3df5 at0033 = ╱ee╱)╱ // 0x3db5 @0x33
0x3d82…3df5 at0034 = ╱dc╱=╱ // 0x3db6 @0x34
0x3d82…3df5 at0035 = ╱30╱0╱ // 0x3db7 @0x35
0x3d82…3df5 at0036 = ╱fe00000000╱ // 0x3db8 @0x36
0x3d82…3df5 at003b = ╱eb╱;╱ // 0x3dbd @0x3b
0x3d82…3df5 at003c = ╱54╱T╱ // 0x3dbe @0x3c
0x3d82…3df5 at003d = ╱33╱3╱ // 0x3dbf @0x3d
0x3d82…3df5 at003e = ╱ed╱(╱ // 0x3dc0 @0x3e
0x3d82…3df5 at003f = ╱32╱2╱ // 0x3dc1 @0x3f
0x3d82…3df5 at0040 = ╱fe00008002╱ // 0x3dc2 @0x40
0x3d82…3df5 at0045 = ╱ee╱)╱ // 0x3dc7 @0x45
0x3d82…3df5 at0046 = ╱dc╱=╱ // 0x3dc8 @0x46
0x3d82…3df5 at0047 = ╱46╱F╱ // 0x3dc9 @0x47
0x3d82…3df5 at0048 = ╱4d╱M╱ // 0x3dca @0x48
0x3d82…3df5 at0049 = ╱49╱I╱ // 0x3dcb @0x49
0x3d82…3df5 at004a = ╱44╱D╱ // 0x3dcc @0x4a
0x3d82…3df5 at004b = ╱4e╱N╱ // 0x3dcd @0x4b
0x3d82…3df5 at004c = ╱52╱R╱ // 0x3dce @0x4c
0x3d82…3df5 at004d = ╱eb╱;╱ // 0x3dcf @0x4d
0x3d82…3df5 at004e = ╱54╱T╱ // 0x3dd0 @0x4e
0x3d82…3df5 at004f = ╱33╱3╱ // 0x3dd1 @0x4f
0x3d82…3df5 at0050 = ╱ed╱(╱ // 0x3dd2 @0x50
0x3d82…3df5 at0051 = ╱33╱3╱ // 0x3dd3 @0x51
0x3d82…3df5 at0052 = ╱fe0000c002╱ // 0x3dd4 @0x52
0x3d82…3df5 at0057 = ╱ee╱)╱ // 0x3dd9 @0x57
0x3d82…3df5 at0058 = ╱dc╱=╱ // 0x3dda @0x58
0x3d82…3df5 at0059 = ╱44╱D╱ // 0x3ddb @0x59
0x3d82…3df5 at005a = ╱4d╱M╱ // 0x3ddc @0x5a
0x3d82…3df5 at005b = ╱49╱I╱ // 0x3ddd @0x5b
0x3d82…3df5 at005c = ╱44╱D╱ // 0x3dde @0x5c
0x3d82…3df5 at005d = ╱4e╱N╱ // 0x3ddf @0x5d
0x3d82…3df5 at005e = ╱52╱R╱ // 0x3de0 @0x5e
0x3d82…3df5 at005f = ╱eb╱;╱ // 0x3de1 @0x5f
0x3d82…3df5 at0060 = ╱54╱T╱ // 0x3de2 @0x60
0x3d82…3df5 at0061 = ╱33╱3╱ // 0x3de3 @0x61
0x3d82…3df5 at0062 = ╱ed╱(╱ // 0x3de4 @0x62
0x3d82…3df5 at0063 = ╱34╱4╱ // 0x3de5 @0x63
0x3d82…3df5 at0064 = ╱fe00008003╱ // 0x3de6 @0x64
0x3d82…3df5 at0069 = ╱ee╱)╱ // 0x3deb @0x69
0x3d82…3df5 at006a = ╱dc╱=╱ // 0x3dec @0x6a
0x3d82…3df5 at006b = ╱4b╱K╱ // 0x3ded @0x6b
0x3d82…3df5 at006c = ╱52╱R╱ // 0x3dee @0x6c
0x3d82…3df5 at006d = ╱4d╱M╱ // 0x3def @0x6d
0x3d82…3df5 at006e = ╱49╱I╱ // 0x3df0 @0x6e
0x3d82…3df5 at006f = ╱44╱D╱ // 0x3df1 @0x6f
0x3d82…3df5 at0070 = ╱4e╱N╱ // 0x3df2 @0x70
0x3d82…3df5 at0071 = ╱52╱R╱ // 0x3df3 @0x71
0x3d82…3df5 at0072 = EOL // 0x3df4 @0x72
0x3d82…3df5 }
0x3df5…3e0b cb62 5320 T4(4)=EMIDNR
0x3df5…3e0b LineComalBin {
0x3df5…3e0b ptr = 0xcb62 // 0x3df5 @0x0
0x3df5…3e0b lno = 0x14c8 // 0x3df7 @0x2
0x3df5…3e0b at0004 = ╱54╱T╱ // 0x3df9 @0x4
0x3df5…3e0b at0005 = ╱34╱4╱ // 0x3dfa @0x5
0x3df5…3e0b at0006 = ╱ed╱(╱ // 0x3dfb @0x6
0x3df5…3e0b at0007 = ╱34╱4╱ // 0x3dfc @0x7
0x3df5…3e0b at0008 = ╱fe00008003╱ // 0x3dfd @0x8
0x3df5…3e0b at000d = ╱ee╱)╱ // 0x3e02 @0xd
0x3df5…3e0b at000e = ╱dc╱=╱ // 0x3e03 @0xe
0x3df5…3e0b at000f = ╱45╱E╱ // 0x3e04 @0xf
0x3df5…3e0b at0010 = ╱4d╱M╱ // 0x3e05 @0x10
0x3df5…3e0b at0011 = ╱49╱I╱ // 0x3e06 @0x11
0x3df5…3e0b at0012 = ╱44╱D╱ // 0x3e07 @0x12
0x3df5…3e0b at0013 = ╱4e╱N╱ // 0x3e08 @0x13
0x3df5…3e0b at0014 = ╱52╱R╱ // 0x3e09 @0x14
0x3df5…3e0b at0015 = EOL // 0x3e0a @0x15
0x3df5…3e0b }
0x3e0b…3e17 cb6e 5330 OPEN K13$,W
0x3e0b…3e17 LineComalBin {
0x3e0b…3e17 ptr = 0xcb6e // 0x3e0b @0x0
0x3e0b…3e17 lno = 0x14d2 // 0x3e0d @0x2
0x3e0b…3e17 at0004 = ╱a7╱ OPEN ╱ // 0x3e0f @0x4
0x3e0b…3e17 at0005 = ╱4b╱K╱ // 0x3e10 @0x5
0x3e0b…3e17 at0006 = ╱31╱1╱ // 0x3e11 @0x6
0x3e0b…3e17 at0007 = ╱33╱3╱ // 0x3e12 @0x7
0x3e0b…3e17 at0008 = ╱ef╱$╱ // 0x3e13 @0x8
0x3e0b…3e17 at0009 = ╱ec╱,╱ // 0x3e14 @0x9
0x3e0b…3e17 at000a = ╱57╱W╱ // 0x3e15 @0xa
0x3e0b…3e17 at000b = EOL // 0x3e16 @0xb
0x3e0b…3e17 }
0x3e17…3e36 cb8d 5340 EXEC FEJL(9,51,K13$)
0x3e17…3e36 LineComalBin {
0x3e17…3e36 ptr = 0xcb8d // 0x3e17 @0x0
0x3e17…3e36 lno = 0x14dc // 0x3e19 @0x2
0x3e17…3e36 at0004 = ╱9d╱ EXEC ╱ // 0x3e1b @0x4
0x3e17…3e36 at0005 = ╱46╱F╱ // 0x3e1c @0x5
0x3e17…3e36 at0006 = ╱45╱E╱ // 0x3e1d @0x6
0x3e17…3e36 at0007 = ╱4a╱J╱ // 0x3e1e @0x7
0x3e17…3e36 at0008 = ╱4c╱L╱ // 0x3e1f @0x8
0x3e17…3e36 at0009 = ╱ed╱(╱ // 0x3e20 @0x9
0x3e17…3e36 at000a = ╱39╱9╱ // 0x3e21 @0xa
0x3e17…3e36 at000b = ╱fe00009004╱ // 0x3e22 @0xb
0x3e17…3e36 at0010 = ╱ec╱,╱ // 0x3e27 @0x10
0x3e17…3e36 at0011 = ╱35╱5╱ // 0x3e28 @0x11
0x3e17…3e36 at0012 = ╱31╱1╱ // 0x3e29 @0x12
0x3e17…3e36 at0013 = ╱fe0000cc06╱ // 0x3e2a @0x13
0x3e17…3e36 at0018 = ╱ec╱,╱ // 0x3e2f @0x18
0x3e17…3e36 at0019 = ╱4b╱K╱ // 0x3e30 @0x19
0x3e17…3e36 at001a = ╱31╱1╱ // 0x3e31 @0x1a
0x3e17…3e36 at001b = ╱33╱3╱ // 0x3e32 @0x1b
0x3e17…3e36 at001c = ╱ef╱$╱ // 0x3e33 @0x1c
0x3e17…3e36 at001d = ╱ee╱)╱ // 0x3e34 @0x1d
0x3e17…3e36 at001e = EOL // 0x3e35 @0x1e
0x3e17…3e36 }
0x3e36…3eaa cc01 5350 PUT K13$,2:T1(1),T1(2),T1(3),T1(4),T1(5),T1(6),T1(7),T1(8),T1(9)
0x3e36…3eaa LineComalBin {
0x3e36…3eaa ptr = 0xcc01 // 0x3e36 @0x0
0x3e36…3eaa lno = 0x14e6 // 0x3e38 @0x2
0x3e36…3eaa at0004 = ╱aa╱ PUT ╱ // 0x3e3a @0x4
0x3e36…3eaa at0005 = ╱4b╱K╱ // 0x3e3b @0x5
0x3e36…3eaa at0006 = ╱31╱1╱ // 0x3e3c @0x6
0x3e36…3eaa at0007 = ╱33╱3╱ // 0x3e3d @0x7
0x3e36…3eaa at0008 = ╱ef╱$╱ // 0x3e3e @0x8
0x3e36…3eaa at0009 = ╱ec╱,╱ // 0x3e3f @0x9
0x3e36…3eaa at000a = ╱32╱2╱ // 0x3e40 @0xa
0x3e36…3eaa at000b = ╱fe00008002╱ // 0x3e41 @0xb
0x3e36…3eaa at0010 = ╱f0╱:╱ // 0x3e46 @0x10
0x3e36…3eaa at0011 = ╱54╱T╱ // 0x3e47 @0x11
0x3e36…3eaa at0012 = ╱31╱1╱ // 0x3e48 @0x12
0x3e36…3eaa at0013 = ╱ed╱(╱ // 0x3e49 @0x13
0x3e36…3eaa at0014 = ╱31╱1╱ // 0x3e4a @0x14
0x3e36…3eaa at0015 = ╱fe00008001╱ // 0x3e4b @0x15
0x3e36…3eaa at001a = ╱ee╱)╱ // 0x3e50 @0x1a
0x3e36…3eaa at001b = ╱ec╱,╱ // 0x3e51 @0x1b
0x3e36…3eaa at001c = ╱54╱T╱ // 0x3e52 @0x1c
0x3e36…3eaa at001d = ╱31╱1╱ // 0x3e53 @0x1d
0x3e36…3eaa at001e = ╱ed╱(╱ // 0x3e54 @0x1e
0x3e36…3eaa at001f = ╱32╱2╱ // 0x3e55 @0x1f
0x3e36…3eaa at0020 = ╱fe00008002╱ // 0x3e56 @0x20
0x3e36…3eaa at0025 = ╱ee╱)╱ // 0x3e5b @0x25
0x3e36…3eaa at0026 = ╱ec╱,╱ // 0x3e5c @0x26
0x3e36…3eaa at0027 = ╱54╱T╱ // 0x3e5d @0x27
0x3e36…3eaa at0028 = ╱31╱1╱ // 0x3e5e @0x28
0x3e36…3eaa at0029 = ╱ed╱(╱ // 0x3e5f @0x29
0x3e36…3eaa at002a = ╱33╱3╱ // 0x3e60 @0x2a
0x3e36…3eaa at002b = ╱fe0000c002╱ // 0x3e61 @0x2b
0x3e36…3eaa at0030 = ╱ee╱)╱ // 0x3e66 @0x30
0x3e36…3eaa at0031 = ╱ec╱,╱ // 0x3e67 @0x31
0x3e36…3eaa at0032 = ╱54╱T╱ // 0x3e68 @0x32
0x3e36…3eaa at0033 = ╱31╱1╱ // 0x3e69 @0x33
0x3e36…3eaa at0034 = ╱ed╱(╱ // 0x3e6a @0x34
0x3e36…3eaa at0035 = ╱34╱4╱ // 0x3e6b @0x35
0x3e36…3eaa at0036 = ╱fe00008003╱ // 0x3e6c @0x36
0x3e36…3eaa at003b = ╱ee╱)╱ // 0x3e71 @0x3b
0x3e36…3eaa at003c = ╱ec╱,╱ // 0x3e72 @0x3c
0x3e36…3eaa at003d = ╱54╱T╱ // 0x3e73 @0x3d
0x3e36…3eaa at003e = ╱31╱1╱ // 0x3e74 @0x3e
0x3e36…3eaa at003f = ╱ed╱(╱ // 0x3e75 @0x3f
0x3e36…3eaa at0040 = ╱35╱5╱ // 0x3e76 @0x40
0x3e36…3eaa at0041 = ╱fe0000a003╱ // 0x3e77 @0x41
0x3e36…3eaa at0046 = ╱ee╱)╱ // 0x3e7c @0x46
0x3e36…3eaa at0047 = ╱ec╱,╱ // 0x3e7d @0x47
0x3e36…3eaa at0048 = ╱54╱T╱ // 0x3e7e @0x48
0x3e36…3eaa at0049 = ╱31╱1╱ // 0x3e7f @0x49
0x3e36…3eaa at004a = ╱ed╱(╱ // 0x3e80 @0x4a
0x3e36…3eaa at004b = ╱36╱6╱ // 0x3e81 @0x4b
0x3e36…3eaa at004c = ╱fe0000c003╱ // 0x3e82 @0x4c
0x3e36…3eaa at0051 = ╱ee╱)╱ // 0x3e87 @0x51
0x3e36…3eaa at0052 = ╱ec╱,╱ // 0x3e88 @0x52
0x3e36…3eaa at0053 = ╱54╱T╱ // 0x3e89 @0x53
0x3e36…3eaa at0054 = ╱31╱1╱ // 0x3e8a @0x54
0x3e36…3eaa at0055 = ╱ed╱(╱ // 0x3e8b @0x55
0x3e36…3eaa at0056 = ╱37╱7╱ // 0x3e8c @0x56
0x3e36…3eaa at0057 = ╱fe0000e003╱ // 0x3e8d @0x57
0x3e36…3eaa at005c = ╱ee╱)╱ // 0x3e92 @0x5c
0x3e36…3eaa at005d = ╱ec╱,╱ // 0x3e93 @0x5d
0x3e36…3eaa at005e = ╱54╱T╱ // 0x3e94 @0x5e
0x3e36…3eaa at005f = ╱31╱1╱ // 0x3e95 @0x5f
0x3e36…3eaa at0060 = ╱ed╱(╱ // 0x3e96 @0x60
0x3e36…3eaa at0061 = ╱38╱8╱ // 0x3e97 @0x61
0x3e36…3eaa at0062 = ╱fe00008004╱ // 0x3e98 @0x62
0x3e36…3eaa at0067 = ╱ee╱)╱ // 0x3e9d @0x67
0x3e36…3eaa at0068 = ╱ec╱,╱ // 0x3e9e @0x68
0x3e36…3eaa at0069 = ╱54╱T╱ // 0x3e9f @0x69
0x3e36…3eaa at006a = ╱31╱1╱ // 0x3ea0 @0x6a
0x3e36…3eaa at006b = ╱ed╱(╱ // 0x3ea1 @0x6b
0x3e36…3eaa at006c = ╱39╱9╱ // 0x3ea2 @0x6c
0x3e36…3eaa at006d = ╱fe00009004╱ // 0x3ea3 @0x6d
0x3e36…3eaa at0072 = ╱ee╱)╱ // 0x3ea8 @0x72
0x3e36…3eaa at0073 = EOL // 0x3ea9 @0x73
0x3e36…3eaa }
0x3eaa…3ec9 cc20 5360 EXEC FEJL(9,52,K13$)
0x3eaa…3ec9 LineComalBin {
0x3eaa…3ec9 ptr = 0xcc20 // 0x3eaa @0x0
0x3eaa…3ec9 lno = 0x14f0 // 0x3eac @0x2
0x3eaa…3ec9 at0004 = ╱9d╱ EXEC ╱ // 0x3eae @0x4
0x3eaa…3ec9 at0005 = ╱46╱F╱ // 0x3eaf @0x5
0x3eaa…3ec9 at0006 = ╱45╱E╱ // 0x3eb0 @0x6
0x3eaa…3ec9 at0007 = ╱4a╱J╱ // 0x3eb1 @0x7
0x3eaa…3ec9 at0008 = ╱4c╱L╱ // 0x3eb2 @0x8
0x3eaa…3ec9 at0009 = ╱ed╱(╱ // 0x3eb3 @0x9
0x3eaa…3ec9 at000a = ╱39╱9╱ // 0x3eb4 @0xa
0x3eaa…3ec9 at000b = ╱fe00009004╱ // 0x3eb5 @0xb
0x3eaa…3ec9 at0010 = ╱ec╱,╱ // 0x3eba @0x10
0x3eaa…3ec9 at0011 = ╱35╱5╱ // 0x3ebb @0x11
0x3eaa…3ec9 at0012 = ╱32╱2╱ // 0x3ebc @0x12
0x3eaa…3ec9 at0013 = ╱fe0000d006╱ // 0x3ebd @0x13
0x3eaa…3ec9 at0018 = ╱ec╱,╱ // 0x3ec2 @0x18
0x3eaa…3ec9 at0019 = ╱4b╱K╱ // 0x3ec3 @0x19
0x3eaa…3ec9 at001a = ╱31╱1╱ // 0x3ec4 @0x1a
0x3eaa…3ec9 at001b = ╱33╱3╱ // 0x3ec5 @0x1b
0x3eaa…3ec9 at001c = ╱ef╱$╱ // 0x3ec6 @0x1c
0x3eaa…3ec9 at001d = ╱ee╱)╱ // 0x3ec7 @0x1d
0x3eaa…3ec9 at001e = EOL // 0x3ec8 @0x1e
0x3eaa…3ec9 }
0x3ec9…3f3e cc95 5370 PUT K13$,12:T2(1),T2(2),T2(3),T2(4),T2(5),T2(6),T2(7),T2(8),T2(9)
0x3ec9…3f3e LineComalBin {
0x3ec9…3f3e ptr = 0xcc95 // 0x3ec9 @0x0
0x3ec9…3f3e lno = 0x14fa // 0x3ecb @0x2
0x3ec9…3f3e at0004 = ╱aa╱ PUT ╱ // 0x3ecd @0x4
0x3ec9…3f3e at0005 = ╱4b╱K╱ // 0x3ece @0x5
0x3ec9…3f3e at0006 = ╱31╱1╱ // 0x3ecf @0x6
0x3ec9…3f3e at0007 = ╱33╱3╱ // 0x3ed0 @0x7
0x3ec9…3f3e at0008 = ╱ef╱$╱ // 0x3ed1 @0x8
0x3ec9…3f3e at0009 = ╱ec╱,╱ // 0x3ed2 @0x9
0x3ec9…3f3e at000a = ╱31╱1╱ // 0x3ed3 @0xa
0x3ec9…3f3e at000b = ╱32╱2╱ // 0x3ed4 @0xb
0x3ec9…3f3e at000c = ╱fe0000c004╱ // 0x3ed5 @0xc
0x3ec9…3f3e at0011 = ╱f0╱:╱ // 0x3eda @0x11
0x3ec9…3f3e at0012 = ╱54╱T╱ // 0x3edb @0x12
0x3ec9…3f3e at0013 = ╱32╱2╱ // 0x3edc @0x13
0x3ec9…3f3e at0014 = ╱ed╱(╱ // 0x3edd @0x14
0x3ec9…3f3e at0015 = ╱31╱1╱ // 0x3ede @0x15
0x3ec9…3f3e at0016 = ╱fe00008001╱ // 0x3edf @0x16
0x3ec9…3f3e at001b = ╱ee╱)╱ // 0x3ee4 @0x1b
0x3ec9…3f3e at001c = ╱ec╱,╱ // 0x3ee5 @0x1c
0x3ec9…3f3e at001d = ╱54╱T╱ // 0x3ee6 @0x1d
0x3ec9…3f3e at001e = ╱32╱2╱ // 0x3ee7 @0x1e
0x3ec9…3f3e at001f = ╱ed╱(╱ // 0x3ee8 @0x1f
0x3ec9…3f3e at0020 = ╱32╱2╱ // 0x3ee9 @0x20
0x3ec9…3f3e at0021 = ╱fe00008002╱ // 0x3eea @0x21
0x3ec9…3f3e at0026 = ╱ee╱)╱ // 0x3eef @0x26
0x3ec9…3f3e at0027 = ╱ec╱,╱ // 0x3ef0 @0x27
0x3ec9…3f3e at0028 = ╱54╱T╱ // 0x3ef1 @0x28
0x3ec9…3f3e at0029 = ╱32╱2╱ // 0x3ef2 @0x29
0x3ec9…3f3e at002a = ╱ed╱(╱ // 0x3ef3 @0x2a
0x3ec9…3f3e at002b = ╱33╱3╱ // 0x3ef4 @0x2b
0x3ec9…3f3e at002c = ╱fe0000c002╱ // 0x3ef5 @0x2c
0x3ec9…3f3e at0031 = ╱ee╱)╱ // 0x3efa @0x31
0x3ec9…3f3e at0032 = ╱ec╱,╱ // 0x3efb @0x32
0x3ec9…3f3e at0033 = ╱54╱T╱ // 0x3efc @0x33
0x3ec9…3f3e at0034 = ╱32╱2╱ // 0x3efd @0x34
0x3ec9…3f3e at0035 = ╱ed╱(╱ // 0x3efe @0x35
0x3ec9…3f3e at0036 = ╱34╱4╱ // 0x3eff @0x36
0x3ec9…3f3e at0037 = ╱fe00008003╱ // 0x3f00 @0x37
0x3ec9…3f3e at003c = ╱ee╱)╱ // 0x3f05 @0x3c
0x3ec9…3f3e at003d = ╱ec╱,╱ // 0x3f06 @0x3d
0x3ec9…3f3e at003e = ╱54╱T╱ // 0x3f07 @0x3e
0x3ec9…3f3e at003f = ╱32╱2╱ // 0x3f08 @0x3f
0x3ec9…3f3e at0040 = ╱ed╱(╱ // 0x3f09 @0x40
0x3ec9…3f3e at0041 = ╱35╱5╱ // 0x3f0a @0x41
0x3ec9…3f3e at0042 = ╱fe0000a003╱ // 0x3f0b @0x42
0x3ec9…3f3e at0047 = ╱ee╱)╱ // 0x3f10 @0x47
0x3ec9…3f3e at0048 = ╱ec╱,╱ // 0x3f11 @0x48
0x3ec9…3f3e at0049 = ╱54╱T╱ // 0x3f12 @0x49
0x3ec9…3f3e at004a = ╱32╱2╱ // 0x3f13 @0x4a
0x3ec9…3f3e at004b = ╱ed╱(╱ // 0x3f14 @0x4b
0x3ec9…3f3e at004c = ╱36╱6╱ // 0x3f15 @0x4c
0x3ec9…3f3e at004d = ╱fe0000c003╱ // 0x3f16 @0x4d
0x3ec9…3f3e at0052 = ╱ee╱)╱ // 0x3f1b @0x52
0x3ec9…3f3e at0053 = ╱ec╱,╱ // 0x3f1c @0x53
0x3ec9…3f3e at0054 = ╱54╱T╱ // 0x3f1d @0x54
0x3ec9…3f3e at0055 = ╱32╱2╱ // 0x3f1e @0x55
0x3ec9…3f3e at0056 = ╱ed╱(╱ // 0x3f1f @0x56
0x3ec9…3f3e at0057 = ╱37╱7╱ // 0x3f20 @0x57
0x3ec9…3f3e at0058 = ╱fe0000e003╱ // 0x3f21 @0x58
0x3ec9…3f3e at005d = ╱ee╱)╱ // 0x3f26 @0x5d
0x3ec9…3f3e at005e = ╱ec╱,╱ // 0x3f27 @0x5e
0x3ec9…3f3e at005f = ╱54╱T╱ // 0x3f28 @0x5f
0x3ec9…3f3e at0060 = ╱32╱2╱ // 0x3f29 @0x60
0x3ec9…3f3e at0061 = ╱ed╱(╱ // 0x3f2a @0x61
0x3ec9…3f3e at0062 = ╱38╱8╱ // 0x3f2b @0x62
0x3ec9…3f3e at0063 = ╱fe00008004╱ // 0x3f2c @0x63
0x3ec9…3f3e at0068 = ╱ee╱)╱ // 0x3f31 @0x68
0x3ec9…3f3e at0069 = ╱ec╱,╱ // 0x3f32 @0x69
0x3ec9…3f3e at006a = ╱54╱T╱ // 0x3f33 @0x6a
0x3ec9…3f3e at006b = ╱32╱2╱ // 0x3f34 @0x6b
0x3ec9…3f3e at006c = ╱ed╱(╱ // 0x3f35 @0x6c
0x3ec9…3f3e at006d = ╱39╱9╱ // 0x3f36 @0x6d
0x3ec9…3f3e at006e = ╱fe00009004╱ // 0x3f37 @0x6e
0x3ec9…3f3e at0073 = ╱ee╱)╱ // 0x3f3c @0x73
0x3ec9…3f3e at0074 = EOL // 0x3f3d @0x74
0x3ec9…3f3e }
0x3f3e…3f5d ccb4 5380 EXEC FEJL(9,53,K13$)
0x3f3e…3f5d LineComalBin {
0x3f3e…3f5d ptr = 0xccb4 // 0x3f3e @0x0
0x3f3e…3f5d lno = 0x1504 // 0x3f40 @0x2
0x3f3e…3f5d at0004 = ╱9d╱ EXEC ╱ // 0x3f42 @0x4
0x3f3e…3f5d at0005 = ╱46╱F╱ // 0x3f43 @0x5
0x3f3e…3f5d at0006 = ╱45╱E╱ // 0x3f44 @0x6
0x3f3e…3f5d at0007 = ╱4a╱J╱ // 0x3f45 @0x7
0x3f3e…3f5d at0008 = ╱4c╱L╱ // 0x3f46 @0x8
0x3f3e…3f5d at0009 = ╱ed╱(╱ // 0x3f47 @0x9
0x3f3e…3f5d at000a = ╱39╱9╱ // 0x3f48 @0xa
0x3f3e…3f5d at000b = ╱fe00009004╱ // 0x3f49 @0xb
0x3f3e…3f5d at0010 = ╱ec╱,╱ // 0x3f4e @0x10
0x3f3e…3f5d at0011 = ╱35╱5╱ // 0x3f4f @0x11
0x3f3e…3f5d at0012 = ╱33╱3╱ // 0x3f50 @0x12
0x3f3e…3f5d at0013 = ╱fe0000d406╱ // 0x3f51 @0x13
0x3f3e…3f5d at0018 = ╱ec╱,╱ // 0x3f56 @0x18
0x3f3e…3f5d at0019 = ╱4b╱K╱ // 0x3f57 @0x19
0x3f3e…3f5d at001a = ╱31╱1╱ // 0x3f58 @0x1a
0x3f3e…3f5d at001b = ╱33╱3╱ // 0x3f59 @0x1b
0x3f3e…3f5d at001c = ╱ef╱$╱ // 0x3f5a @0x1c
0x3f3e…3f5d at001d = ╱ee╱)╱ // 0x3f5b @0x1d
0x3f3e…3f5d at001e = EOL // 0x3f5c @0x1e
0x3f3e…3f5d }
0x3f5d…3fd2 cd29 5390 PUT K13$,13:T3(1),T3(2),T3(3),T3(4),T3(5),T3(6),T3(7),T3(8),T3(9)
0x3f5d…3fd2 LineComalBin {
0x3f5d…3fd2 ptr = 0xcd29 // 0x3f5d @0x0
0x3f5d…3fd2 lno = 0x150e // 0x3f5f @0x2
0x3f5d…3fd2 at0004 = ╱aa╱ PUT ╱ // 0x3f61 @0x4
0x3f5d…3fd2 at0005 = ╱4b╱K╱ // 0x3f62 @0x5
0x3f5d…3fd2 at0006 = ╱31╱1╱ // 0x3f63 @0x6
0x3f5d…3fd2 at0007 = ╱33╱3╱ // 0x3f64 @0x7
0x3f5d…3fd2 at0008 = ╱ef╱$╱ // 0x3f65 @0x8
0x3f5d…3fd2 at0009 = ╱ec╱,╱ // 0x3f66 @0x9
0x3f5d…3fd2 at000a = ╱31╱1╱ // 0x3f67 @0xa
0x3f5d…3fd2 at000b = ╱33╱3╱ // 0x3f68 @0xb
0x3f5d…3fd2 at000c = ╱fe0000d004╱ // 0x3f69 @0xc
0x3f5d…3fd2 at0011 = ╱f0╱:╱ // 0x3f6e @0x11
0x3f5d…3fd2 at0012 = ╱54╱T╱ // 0x3f6f @0x12
0x3f5d…3fd2 at0013 = ╱33╱3╱ // 0x3f70 @0x13
0x3f5d…3fd2 at0014 = ╱ed╱(╱ // 0x3f71 @0x14
0x3f5d…3fd2 at0015 = ╱31╱1╱ // 0x3f72 @0x15
0x3f5d…3fd2 at0016 = ╱fe00008001╱ // 0x3f73 @0x16
0x3f5d…3fd2 at001b = ╱ee╱)╱ // 0x3f78 @0x1b
0x3f5d…3fd2 at001c = ╱ec╱,╱ // 0x3f79 @0x1c
0x3f5d…3fd2 at001d = ╱54╱T╱ // 0x3f7a @0x1d
0x3f5d…3fd2 at001e = ╱33╱3╱ // 0x3f7b @0x1e
0x3f5d…3fd2 at001f = ╱ed╱(╱ // 0x3f7c @0x1f
0x3f5d…3fd2 at0020 = ╱32╱2╱ // 0x3f7d @0x20
0x3f5d…3fd2 at0021 = ╱fe00008002╱ // 0x3f7e @0x21
0x3f5d…3fd2 at0026 = ╱ee╱)╱ // 0x3f83 @0x26
0x3f5d…3fd2 at0027 = ╱ec╱,╱ // 0x3f84 @0x27
0x3f5d…3fd2 at0028 = ╱54╱T╱ // 0x3f85 @0x28
0x3f5d…3fd2 at0029 = ╱33╱3╱ // 0x3f86 @0x29
0x3f5d…3fd2 at002a = ╱ed╱(╱ // 0x3f87 @0x2a
0x3f5d…3fd2 at002b = ╱33╱3╱ // 0x3f88 @0x2b
0x3f5d…3fd2 at002c = ╱fe0000c002╱ // 0x3f89 @0x2c
0x3f5d…3fd2 at0031 = ╱ee╱)╱ // 0x3f8e @0x31
0x3f5d…3fd2 at0032 = ╱ec╱,╱ // 0x3f8f @0x32
0x3f5d…3fd2 at0033 = ╱54╱T╱ // 0x3f90 @0x33
0x3f5d…3fd2 at0034 = ╱33╱3╱ // 0x3f91 @0x34
0x3f5d…3fd2 at0035 = ╱ed╱(╱ // 0x3f92 @0x35
0x3f5d…3fd2 at0036 = ╱34╱4╱ // 0x3f93 @0x36
0x3f5d…3fd2 at0037 = ╱fe00008003╱ // 0x3f94 @0x37
0x3f5d…3fd2 at003c = ╱ee╱)╱ // 0x3f99 @0x3c
0x3f5d…3fd2 at003d = ╱ec╱,╱ // 0x3f9a @0x3d
0x3f5d…3fd2 at003e = ╱54╱T╱ // 0x3f9b @0x3e
0x3f5d…3fd2 at003f = ╱33╱3╱ // 0x3f9c @0x3f
0x3f5d…3fd2 at0040 = ╱ed╱(╱ // 0x3f9d @0x40
0x3f5d…3fd2 at0041 = ╱35╱5╱ // 0x3f9e @0x41
0x3f5d…3fd2 at0042 = ╱fe0000a003╱ // 0x3f9f @0x42
0x3f5d…3fd2 at0047 = ╱ee╱)╱ // 0x3fa4 @0x47
0x3f5d…3fd2 at0048 = ╱ec╱,╱ // 0x3fa5 @0x48
0x3f5d…3fd2 at0049 = ╱54╱T╱ // 0x3fa6 @0x49
0x3f5d…3fd2 at004a = ╱33╱3╱ // 0x3fa7 @0x4a
0x3f5d…3fd2 at004b = ╱ed╱(╱ // 0x3fa8 @0x4b
0x3f5d…3fd2 at004c = ╱36╱6╱ // 0x3fa9 @0x4c
0x3f5d…3fd2 at004d = ╱fe0000c003╱ // 0x3faa @0x4d
0x3f5d…3fd2 at0052 = ╱ee╱)╱ // 0x3faf @0x52
0x3f5d…3fd2 at0053 = ╱ec╱,╱ // 0x3fb0 @0x53
0x3f5d…3fd2 at0054 = ╱54╱T╱ // 0x3fb1 @0x54
0x3f5d…3fd2 at0055 = ╱33╱3╱ // 0x3fb2 @0x55
0x3f5d…3fd2 at0056 = ╱ed╱(╱ // 0x3fb3 @0x56
0x3f5d…3fd2 at0057 = ╱37╱7╱ // 0x3fb4 @0x57
0x3f5d…3fd2 at0058 = ╱fe0000e003╱ // 0x3fb5 @0x58
0x3f5d…3fd2 at005d = ╱ee╱)╱ // 0x3fba @0x5d
0x3f5d…3fd2 at005e = ╱ec╱,╱ // 0x3fbb @0x5e
0x3f5d…3fd2 at005f = ╱54╱T╱ // 0x3fbc @0x5f
0x3f5d…3fd2 at0060 = ╱33╱3╱ // 0x3fbd @0x60
0x3f5d…3fd2 at0061 = ╱ed╱(╱ // 0x3fbe @0x61
0x3f5d…3fd2 at0062 = ╱38╱8╱ // 0x3fbf @0x62
0x3f5d…3fd2 at0063 = ╱fe00008004╱ // 0x3fc0 @0x63
0x3f5d…3fd2 at0068 = ╱ee╱)╱ // 0x3fc5 @0x68
0x3f5d…3fd2 at0069 = ╱ec╱,╱ // 0x3fc6 @0x69
0x3f5d…3fd2 at006a = ╱54╱T╱ // 0x3fc7 @0x6a
0x3f5d…3fd2 at006b = ╱33╱3╱ // 0x3fc8 @0x6b
0x3f5d…3fd2 at006c = ╱ed╱(╱ // 0x3fc9 @0x6c
0x3f5d…3fd2 at006d = ╱39╱9╱ // 0x3fca @0x6d
0x3f5d…3fd2 at006e = ╱fe00009004╱ // 0x3fcb @0x6e
0x3f5d…3fd2 at0073 = ╱ee╱)╱ // 0x3fd0 @0x73
0x3f5d…3fd2 at0074 = EOL // 0x3fd1 @0x74
0x3f5d…3fd2 }
0x3fd2…3ff1 cd48 5400 EXEC FEJL(9,54,K13$)
0x3fd2…3ff1 LineComalBin {
0x3fd2…3ff1 ptr = 0xcd48 // 0x3fd2 @0x0
0x3fd2…3ff1 lno = 0x1518 // 0x3fd4 @0x2
0x3fd2…3ff1 at0004 = ╱9d╱ EXEC ╱ // 0x3fd6 @0x4
0x3fd2…3ff1 at0005 = ╱46╱F╱ // 0x3fd7 @0x5
0x3fd2…3ff1 at0006 = ╱45╱E╱ // 0x3fd8 @0x6
0x3fd2…3ff1 at0007 = ╱4a╱J╱ // 0x3fd9 @0x7
0x3fd2…3ff1 at0008 = ╱4c╱L╱ // 0x3fda @0x8
0x3fd2…3ff1 at0009 = ╱ed╱(╱ // 0x3fdb @0x9
0x3fd2…3ff1 at000a = ╱39╱9╱ // 0x3fdc @0xa
0x3fd2…3ff1 at000b = ╱fe00009004╱ // 0x3fdd @0xb
0x3fd2…3ff1 at0010 = ╱ec╱,╱ // 0x3fe2 @0x10
0x3fd2…3ff1 at0011 = ╱35╱5╱ // 0x3fe3 @0x11
0x3fd2…3ff1 at0012 = ╱34╱4╱ // 0x3fe4 @0x12
0x3fd2…3ff1 at0013 = ╱fe0000d806╱ // 0x3fe5 @0x13
0x3fd2…3ff1 at0018 = ╱ec╱,╱ // 0x3fea @0x18
0x3fd2…3ff1 at0019 = ╱4b╱K╱ // 0x3feb @0x19
0x3fd2…3ff1 at001a = ╱31╱1╱ // 0x3fec @0x1a
0x3fd2…3ff1 at001b = ╱33╱3╱ // 0x3fed @0x1b
0x3fd2…3ff1 at001c = ╱ef╱$╱ // 0x3fee @0x1c
0x3fd2…3ff1 at001d = ╱ee╱)╱ // 0x3fef @0x1d
0x3fd2…3ff1 at001e = EOL // 0x3ff0 @0x1e
0x3fd2…3ff1 }
0x3ff1…4066 cdbd 5410 PUT K13$,21:T4(1),T4(2),T4(3),T4(4),T4(5),T4(6),T4(7),T4(8),T4(9)
0x3ff1…4066 LineComalBin {
0x3ff1…4066 ptr = 0xcdbd // 0x3ff1 @0x0
0x3ff1…4066 lno = 0x1522 // 0x3ff3 @0x2
0x3ff1…4066 at0004 = ╱aa╱ PUT ╱ // 0x3ff5 @0x4
0x3ff1…4066 at0005 = ╱4b╱K╱ // 0x3ff6 @0x5
0x3ff1…4066 at0006 = ╱31╱1╱ // 0x3ff7 @0x6
0x3ff1…4066 at0007 = ╱33╱3╱ // 0x3ff8 @0x7
0x3ff1…4066 at0008 = ╱ef╱$╱ // 0x3ff9 @0x8
0x3ff1…4066 at0009 = ╱ec╱,╱ // 0x3ffa @0x9
0x3ff1…4066 at000a = ╱32╱2╱ // 0x3ffb @0xa
0x3ff1…4066 at000b = ╱31╱1╱ // 0x3ffc @0xb
0x3ff1…4066 at000c = ╱fe0000a805╱ // 0x3ffd @0xc
0x3ff1…4066 at0011 = ╱f0╱:╱ // 0x4002 @0x11
0x3ff1…4066 at0012 = ╱54╱T╱ // 0x4003 @0x12
0x3ff1…4066 at0013 = ╱34╱4╱ // 0x4004 @0x13
0x3ff1…4066 at0014 = ╱ed╱(╱ // 0x4005 @0x14
0x3ff1…4066 at0015 = ╱31╱1╱ // 0x4006 @0x15
0x3ff1…4066 at0016 = ╱fe00008001╱ // 0x4007 @0x16
0x3ff1…4066 at001b = ╱ee╱)╱ // 0x400c @0x1b
0x3ff1…4066 at001c = ╱ec╱,╱ // 0x400d @0x1c
0x3ff1…4066 at001d = ╱54╱T╱ // 0x400e @0x1d
0x3ff1…4066 at001e = ╱34╱4╱ // 0x400f @0x1e
0x3ff1…4066 at001f = ╱ed╱(╱ // 0x4010 @0x1f
0x3ff1…4066 at0020 = ╱32╱2╱ // 0x4011 @0x20
0x3ff1…4066 at0021 = ╱fe00008002╱ // 0x4012 @0x21
0x3ff1…4066 at0026 = ╱ee╱)╱ // 0x4017 @0x26
0x3ff1…4066 at0027 = ╱ec╱,╱ // 0x4018 @0x27
0x3ff1…4066 at0028 = ╱54╱T╱ // 0x4019 @0x28
0x3ff1…4066 at0029 = ╱34╱4╱ // 0x401a @0x29
0x3ff1…4066 at002a = ╱ed╱(╱ // 0x401b @0x2a
0x3ff1…4066 at002b = ╱33╱3╱ // 0x401c @0x2b
0x3ff1…4066 at002c = ╱fe0000c002╱ // 0x401d @0x2c
0x3ff1…4066 at0031 = ╱ee╱)╱ // 0x4022 @0x31
0x3ff1…4066 at0032 = ╱ec╱,╱ // 0x4023 @0x32
0x3ff1…4066 at0033 = ╱54╱T╱ // 0x4024 @0x33
0x3ff1…4066 at0034 = ╱34╱4╱ // 0x4025 @0x34
0x3ff1…4066 at0035 = ╱ed╱(╱ // 0x4026 @0x35
0x3ff1…4066 at0036 = ╱34╱4╱ // 0x4027 @0x36
0x3ff1…4066 at0037 = ╱fe00008003╱ // 0x4028 @0x37
0x3ff1…4066 at003c = ╱ee╱)╱ // 0x402d @0x3c
0x3ff1…4066 at003d = ╱ec╱,╱ // 0x402e @0x3d
0x3ff1…4066 at003e = ╱54╱T╱ // 0x402f @0x3e
0x3ff1…4066 at003f = ╱34╱4╱ // 0x4030 @0x3f
0x3ff1…4066 at0040 = ╱ed╱(╱ // 0x4031 @0x40
0x3ff1…4066 at0041 = ╱35╱5╱ // 0x4032 @0x41
0x3ff1…4066 at0042 = ╱fe0000a003╱ // 0x4033 @0x42
0x3ff1…4066 at0047 = ╱ee╱)╱ // 0x4038 @0x47
0x3ff1…4066 at0048 = ╱ec╱,╱ // 0x4039 @0x48
0x3ff1…4066 at0049 = ╱54╱T╱ // 0x403a @0x49
0x3ff1…4066 at004a = ╱34╱4╱ // 0x403b @0x4a
0x3ff1…4066 at004b = ╱ed╱(╱ // 0x403c @0x4b
0x3ff1…4066 at004c = ╱36╱6╱ // 0x403d @0x4c
0x3ff1…4066 at004d = ╱fe0000c003╱ // 0x403e @0x4d
0x3ff1…4066 at0052 = ╱ee╱)╱ // 0x4043 @0x52
0x3ff1…4066 at0053 = ╱ec╱,╱ // 0x4044 @0x53
0x3ff1…4066 at0054 = ╱54╱T╱ // 0x4045 @0x54
0x3ff1…4066 at0055 = ╱34╱4╱ // 0x4046 @0x55
0x3ff1…4066 at0056 = ╱ed╱(╱ // 0x4047 @0x56
0x3ff1…4066 at0057 = ╱37╱7╱ // 0x4048 @0x57
0x3ff1…4066 at0058 = ╱fe0000e003╱ // 0x4049 @0x58
0x3ff1…4066 at005d = ╱ee╱)╱ // 0x404e @0x5d
0x3ff1…4066 at005e = ╱ec╱,╱ // 0x404f @0x5e
0x3ff1…4066 at005f = ╱54╱T╱ // 0x4050 @0x5f
0x3ff1…4066 at0060 = ╱34╱4╱ // 0x4051 @0x60
0x3ff1…4066 at0061 = ╱ed╱(╱ // 0x4052 @0x61
0x3ff1…4066 at0062 = ╱38╱8╱ // 0x4053 @0x62
0x3ff1…4066 at0063 = ╱fe00008004╱ // 0x4054 @0x63
0x3ff1…4066 at0068 = ╱ee╱)╱ // 0x4059 @0x68
0x3ff1…4066 at0069 = ╱ec╱,╱ // 0x405a @0x69
0x3ff1…4066 at006a = ╱54╱T╱ // 0x405b @0x6a
0x3ff1…4066 at006b = ╱34╱4╱ // 0x405c @0x6b
0x3ff1…4066 at006c = ╱ed╱(╱ // 0x405d @0x6c
0x3ff1…4066 at006d = ╱39╱9╱ // 0x405e @0x6d
0x3ff1…4066 at006e = ╱fe00009004╱ // 0x405f @0x6e
0x3ff1…4066 at0073 = ╱ee╱)╱ // 0x4064 @0x73
0x3ff1…4066 at0074 = EOL // 0x4065 @0x74
0x3ff1…4066 }
0x4066…4086 cddd 5420 EXEC FEJL(20,18,K13$)
0x4066…4086 LineComalBin {
0x4066…4086 ptr = 0xcddd // 0x4066 @0x0
0x4066…4086 lno = 0x152c // 0x4068 @0x2
0x4066…4086 at0004 = ╱9d╱ EXEC ╱ // 0x406a @0x4
0x4066…4086 at0005 = ╱46╱F╱ // 0x406b @0x5
0x4066…4086 at0006 = ╱45╱E╱ // 0x406c @0x6
0x4066…4086 at0007 = ╱4a╱J╱ // 0x406d @0x7
0x4066…4086 at0008 = ╱4c╱L╱ // 0x406e @0x8
0x4066…4086 at0009 = ╱ed╱(╱ // 0x406f @0x9
0x4066…4086 at000a = ╱32╱2╱ // 0x4070 @0xa
0x4066…4086 at000b = ╱30╱0╱ // 0x4071 @0xb
0x4066…4086 at000c = ╱fe0000a005╱ // 0x4072 @0xc
0x4066…4086 at0011 = ╱ec╱,╱ // 0x4077 @0x11
0x4066…4086 at0012 = ╱31╱1╱ // 0x4078 @0x12
0x4066…4086 at0013 = ╱38╱8╱ // 0x4079 @0x13
0x4066…4086 at0014 = ╱fe00009005╱ // 0x407a @0x14
0x4066…4086 at0019 = ╱ec╱,╱ // 0x407f @0x19
0x4066…4086 at001a = ╱4b╱K╱ // 0x4080 @0x1a
0x4066…4086 at001b = ╱31╱1╱ // 0x4081 @0x1b
0x4066…4086 at001c = ╱33╱3╱ // 0x4082 @0x1c
0x4066…4086 at001d = ╱ef╱$╱ // 0x4083 @0x1d
0x4066…4086 at001e = ╱ee╱)╱ // 0x4084 @0x1e
0x4066…4086 at001f = EOL // 0x4085 @0x1f
0x4066…4086 }
0x4086…4090 cde7 5430 CLOSE K13$
0x4086…4090 LineComalBin {
0x4086…4090 ptr = 0xcde7 // 0x4086 @0x0
0x4086…4090 lno = 0x1536 // 0x4088 @0x2
0x4086…4090 at0004 = ╱a8╱ CLOSE ╱ // 0x408a @0x4
0x4086…4090 at0005 = ╱4b╱K╱ // 0x408b @0x5
0x4086…4090 at0006 = ╱31╱1╱ // 0x408c @0x6
0x4086…4090 at0007 = ╱33╱3╱ // 0x408d @0x7
0x4086…4090 at0008 = ╱ef╱$╱ // 0x408e @0x8
0x4086…4090 at0009 = EOL // 0x408f @0x9
0x4086…4090 }
0x4090…40af ce06 5440 EXEC FEJL(9,55,K13$)
0x4090…40af LineComalBin {
0x4090…40af ptr = 0xce06 // 0x4090 @0x0
0x4090…40af lno = 0x1540 // 0x4092 @0x2
0x4090…40af at0004 = ╱9d╱ EXEC ╱ // 0x4094 @0x4
0x4090…40af at0005 = ╱46╱F╱ // 0x4095 @0x5
0x4090…40af at0006 = ╱45╱E╱ // 0x4096 @0x6
0x4090…40af at0007 = ╱4a╱J╱ // 0x4097 @0x7
0x4090…40af at0008 = ╱4c╱L╱ // 0x4098 @0x8
0x4090…40af at0009 = ╱ed╱(╱ // 0x4099 @0x9
0x4090…40af at000a = ╱39╱9╱ // 0x409a @0xa
0x4090…40af at000b = ╱fe00009004╱ // 0x409b @0xb
0x4090…40af at0010 = ╱ec╱,╱ // 0x40a0 @0x10
0x4090…40af at0011 = ╱35╱5╱ // 0x40a1 @0x11
0x4090…40af at0012 = ╱35╱5╱ // 0x40a2 @0x12
0x4090…40af at0013 = ╱fe0000dc06╱ // 0x40a3 @0x13
0x4090…40af at0018 = ╱ec╱,╱ // 0x40a8 @0x18
0x4090…40af at0019 = ╱4b╱K╱ // 0x40a9 @0x19
0x4090…40af at001a = ╱31╱1╱ // 0x40aa @0x1a
0x4090…40af at001b = ╱33╱3╱ // 0x40ab @0x1b
0x4090…40af at001c = ╱ef╱$╱ // 0x40ac @0x1c
0x4090…40af at001d = ╱ee╱)╱ // 0x40ad @0x1d
0x4090…40af at001e = EOL // 0x40ae @0x1e
0x4090…40af }
0x40af…40b6 ce0d 5450 OUTPUT T
0x40af…40b6 LineComalBin {
0x40af…40b6 ptr = 0xce0d // 0x40af @0x0
0x40af…40b6 lno = 0x154a // 0x40b1 @0x2
0x40af…40b6 at0004 = ╱a5╱ OUTPUT ╱ // 0x40b3 @0x4
0x40af…40b6 at0005 = ╱54╱T╱ // 0x40b4 @0x5
0x40af…40b6 at0006 = EOL // 0x40b5 @0x6
0x40af…40b6 }
0x40b6…40cb 0000 5460 CHAIN "P641210:FSORT"
0x40b6…40cb LineComalBin {
0x40b6…40cb ptr = 0x0000 // 0x40b6 @0x0
0x40b6…40cb lno = 0x1554 // 0x40b8 @0x2
0x40b6…40cb at0004 = ╱ac╱ CHAIN ╱ // 0x40ba @0x4
0x40b6…40cb at0005 = ╱22╱"╱ // 0x40bb @0x5
0x40b6…40cb at0006 = ╱50╱P╱ // 0x40bc @0x6
0x40b6…40cb at0007 = ╱36╱6╱ // 0x40bd @0x7
0x40b6…40cb at0008 = ╱34╱4╱ // 0x40be @0x8
0x40b6…40cb at0009 = ╱31╱1╱ // 0x40bf @0x9
0x40b6…40cb at000a = ╱32╱2╱ // 0x40c0 @0xa
0x40b6…40cb at000b = ╱31╱1╱ // 0x40c1 @0xb
0x40b6…40cb at000c = ╱30╱0╱ // 0x40c2 @0xc
0x40b6…40cb at000d = ╱3a╱:╱ // 0x40c3 @0xd
0x40b6…40cb at000e = ╱46╱F╱ // 0x40c4 @0xe
0x40b6…40cb at000f = ╱53╱S╱ // 0x40c5 @0xf
0x40b6…40cb at0010 = ╱4f╱O╱ // 0x40c6 @0x10
0x40b6…40cb at0011 = ╱52╱R╱ // 0x40c7 @0x11
0x40b6…40cb at0012 = ╱54╱T╱ // 0x40c8 @0x12
0x40b6…40cb at0013 = ╱22╱"╱ // 0x40c9 @0x13
0x40b6…40cb at0014 = EOL // 0x40ca @0x14
0x40b6…40cb }
0x40cb…40d1 (216,) 57 8d 57 8d 10 00 ┆W W ┆