|
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: 17209 (0x4339)
Types: SPC/1-COMAL-BIN
Notes: Mikados_B
Names: »KSP1.B«
└─⟦ff7f7aeee⟧ Bits:30009007 NBT 15/3-84
└─⟦this⟧ »KSP1.B«
0090 B=0;E=1;G=2;V=3;W=9;C=4;D=12;F=17;M=14;U=25 0100 DIM K1$(F),K2$(F),DEBNAVN$(U),DSALDO1$(D),DEBKGR$(G),FNAVN$(U) 0110 DIM DSALDO2$(D),DSALDO3$(D),DSALDO4$(D),DEBLK$(G),DEBGADE$(U),A$(6) 0120 DIM BLANK$(77),TAL4$(M),TAH$(D),DEBTLF$(W),DEBBY$(20),K3$(F),K4$(F) 0130 DIM RES$(M),ÅRKØB$(D),MDNKØB$(D),OP2$(D),BELØB$(D),KTNR$(6),K5$(F) 0140 DIM FMDEBET$(D),FMKREDIT$(D),FÅDEBET$(D),FÅKREDIT$(D),FSALDO$(D) 0150 DIM OP1$(D),TK$(V),TEKST$(U),TFIL$(20,10),FUKODE$(E),N$(6),FMKODE$(E) 0160 DIM K6$(F),K7$(F),UBELØB$(M),SUM$(D),DAT$(8),SALDO$(D),DA5$(8) 0170 DIM EGNAVN$(30),EGGADE$(30),EGBY$(20),STREG$(77),TKODE$(E),EGPOSTNR$(C) 0180 DIM K8$(F),K9$(F),K10$(F),K11$(F),K12$(F),K13$(F),K14$(F),DV$(10) 0190 DIM T1(W),T2(W),T3(W),KRENAVN$(U),KREGADE$(U),KREBY$(20),KRELK$(E) 0200 DIM KSALDO1$(D),KSALDO2$(D),LTX$(11,52),LAND$(W,D),KREGR$(E) 0210 DIM UBEL1$(M),UBEL2$(M),UBEL3$(M),UBEL4$(M) 0220 PROC CALC(AR3,B1,B2,ES) 0230 OP1$=B1$;OP2$=B2$;RES$=ES$;SI=B;FLAG=B;ART=AR3-6*(AR3>5) 0240 CALL "P641210:REGN" 0250 ES$=RES$ 0260 IF AR3<6 THEN IF FLAG THEN STOP 0290 ENDPROC 0300 PROC TUD(BLB,UBLB,TEGN,STØR) 0310 EXEC CALC(5,BLB$,TAH$,UBLB$) 0320 IF TEGN=B THEN UBLB$=UBLB$(E:13) 0350 IF TEGN=E AND UBLB$(LEN(UBLB$))="+" THEN UBLB$(LEN(UBLB$))=" " 0390 IF STØR=E THEN UBLB$=UBLB$(C:LEN(UBLB$)-V) 0420 ENDPROC 0430 PROC FEJL(NR1,NR2,NR3) 0440 IF STATUS(NR3$)<>B THEN 0450 PRINT NR1,NR2,NR3$,STATUS(NR3$) 0460 STOP 0470 ENDIF 0480 ENDPROC 0490 PROC SØG(MPOSTANTAL6,HTAB3,NØGLE3,UTAB3,K34) 0510 PPIL2=MPOSTANTAL6 DIV 40+E;PPIL1=B 0520 REPEAT 0530 PPIL3=(PPIL1+PPIL2) DIV G 0540 IF HTAB3(PPIL3,E)=NØGLE3 THEN EXIT 0550 IF HTAB3(PPIL3,E)>NØGLE3 THEN 0560 PPIL2=PPIL3 0570 ELSE 0580 PPIL1=PPIL3 0590 ENDIF 0600 UNTIL PPIL2<=PPIL1+E 0610 IF PPIL3>E THEN 0620 REPEAT 0630 PPIL3=PPIL3-E 0640 UNTIL HTAB3(PPIL3,E)<NØGLE3 OR PPIL3=E 0650 ENDIF 0655 T=PPIL3 0660 IF HTAB3(PPIL3,G)<NØGLE3 OR NØGLE3<HTAB3(PPIL3,E) THEN 0665 T=PPIL3+E 0670 IF HTAB3(PPIL3+E,E)>NØGLE3 THEN T=B 0740 ENDIF 0750 IF T<E THEN EXIT 0760 K=T+MPOSTANTAL6 DIV 160 0770 EXEC UNDIND(K34$,K,UTAB3) 0780 FOR I=C TO E STEP -E 0790 IF UTAB3(I,E)<NØGLE3 THEN EXIT 0800 NEXT I 0810 IF I=B THEN I=E 0820 IF UTAB3(I,G)<NØGLE3 THEN 0825 T=(T-E)*40+I*10+E 0830 IF UTAB3(I+E,E)>NØGLE3 THEN T=B 0880 ELSE 0890 T=(T-E)*40+(I-E)*10+E 0900 ENDIF 0920 ENDPROC 0930 PROC POSTER(K35,NØGLE4,T5,MPOSTANTAL7,PKODE,SU3) 0940 LINIE=B 0950 OPEN K35$,R 0960 EXEC FEJL(E,E,K35$) 0970 FOR I=E TO 10 0980 GET K35$,T5:KTNUM 0990 EXEC FEJL(E,G,K35$) 1000 IF KTNUM=NØGLE4 OR MAFSLUT=E THEN EXIT 1020 T5=T5+E 1030 NEXT I 1040 IF KTNUM=NØGLE4 THEN 1050 FOR K=T5 TO MPOSTANTAL7 1060 GET K35$,K:KONTO,DDATO,BILAG,TKODE$,BELØB$,ENTKO 1070 EXEC FEJL(E,V,K35$) 1080 IF KONTO<>NØGLE4 THEN EXIT 1090 TKS=ORD(TKODE$)-48;TKS9=TKS-10*(TKS>20) 1100 IF TKS>W AND TKS<20 THEN 1110 K=K+E 1120 GET K35$,K:KONTO,TEKST$ 1130 EXEC FEJL(E,C,K35$) 1150 ELSE 1160 IF TKS>B AND TKS<30 THEN TEKST$=TFIL$(TKS9) 1210 ENDIF 1215 TEKST$=TEKST$+BLANK$ 1220 IF TKS<30 THEN EXEC UDSKRIV(PKODE,SU3$,LINIE) 1230 NEXT K 1240 IF MAFSLUT=E THEN T6=K;NØGLE4=KONTO 1270 ELSE 1280 T6=T5;NØGLE4=KTNUM;T5=B 1300 ENDIF 1310 CLOSE K35$ 1320 EXEC FEJL(E,5,K35$) 1330 ENDPROC 1340 PROC LINIEUD(DA2,BI2,TE2,BE2,SU1,ENT1) 1350 SK=SKRIV1 1360 EXEC CALC(B,SU1$,BE2$,SU1$) 1370 EXEC DATOUD(DA2,DA5$) 1380 PRINT TAB(E+10*(SK));DA5$;TAB(11+8*(SK)); 1390 IF BI2<>-E THEN PRINT USING "#######":BI2; 1420 PRINT TAB(18+W*(SK));TE2$;TAB(44); 1425 IF NOT SK THEN PRINT USING "######":ENT1; 1430 EXEC TUD(BE2$,UBELØB$,B,B) 1450 PRINT TAB(51-G*(SK)+(15-C*(SK))*(BE2$(LEN(BE2$))="-"));UBELØB$ 1460 ENDPROC 1470 PROC INDPUT1(XPOS1,YPOS1,LN4,LN5,LTK) 1480 REPEAT 1490 CURSOR XPOS1,YPOS1 1500 PRINT LTK$;BLANK$(E:77-XPOS1-LEN(LTK$)) 1510 CURSOR XPOS1+LEN(LTK$),YPOS1 1520 INPUT " ",A$ 1530 EXEC NRTEST(A$) 1540 UNTIL P>LN4 AND P<LN5 1550 ENDPROC 1560 PROC LINIER(FRA1,TIL1,TÆL1) 1570 FOR TÆL1=FRA1 TO TIL1 1580 PRINT " " 1590 NEXT TÆL1 1600 ENDPROC 1610 PROC NAVN2(NAVN3,GADE1,POSTNR1,BY1,LANDK1) 1620 PRINT NAVN3$ 1630 CURSOR W,6 1640 PRINT GADE1$ 1650 CURSOR W,7 1660 PRINT USING "######":POSTNR1 1670 CURSOR F,7 1680 PRINT BY1$ 1690 CURSOR W,8 1700 EXEC NRTEST(LANDK1$) 1710 IF P>B AND P<10 THEN PRINT LAND$(P) 1720 ENDPROC 1730 PROC NAVN1(NAVN,GADE,POSTNR,BY,LANDK) 1740 PRINT TAB(D);NAVN$;" " 1750 PRINT TAB(D);GADE$;" " 1760 PRINT TAB(D);POSTNR;TAB(19);BY$;" " 1770 P1=ORD(LANDK$)-48 1780 IF P1>B AND P1<10 THEN PRINT TAB(D);LAND$(P1);" " 1790 EXEC LINIER(1,1*(P1<1 OR P1>9),I) 1800 ENDPROC 1810 PROC FINDPOST1(TAB4,Q,MANT2,NØGL5,PIL6,L8) 1820 PIL1=MANT2 DIV 8;PIL6=PIL1;CEKS=E;MANT3=MANT2 DIV C;MANT4=MANT2 DIV 32 1830 REPEAT 1840 IF NØGL5=TAB4(PIL6) OR PIL1=E THEN EXIT 1850 PIL1=(PIL1+E) DIV G;PIL6=PIL6+PIL1*(E-G*(NØGL5<TAB4(PIL6))) 1860 IF PIL6<E THEN PIL6=E 1870 IF PIL6>MANT3 THEN PIL6=MANT3 1880 UNTIL PIL1=B 1890 IF TAB4(PIL6)>NØGL5 THEN PIL6=PIL6-E*(PIL6>E) 1900 PIL6=MANT4+PIL6 1910 GET L8$,PIL6:Q(E,E),Q(E,G),Q(G,E),Q(G,G),Q(V,E),Q(V,G),Q(C,E),Q(C,G) 1920 EXEC FEJL(E,E,L8$) 1930 FOR PIL6=E TO C 1940 IF NØGL5=Q(PIL6,E) THEN EXIT 1950 NEXT PIL6 1960 IF PIL6<>5 THEN CEKS=B 1970 ENDPROC 1980 PROC INDTAB1(Z,MANT5,L7) 1990 PIL1=MANT5 DIV 32 2000 FOR I=E TO PIL1 2010 H=(I-E)*8+E 2020 GET L7$,I:Z(H),Z(H+E),Z(H+G),Z(H+V),Z(H+C),Z(H+5),Z(H+6),Z(H+7) 2030 EXEC FEJL(G,E,L7$) 2040 NEXT I 2050 ENDPROC 2060 PROC LUDSKRIV(KT1,DA4,KSNR) 2070 EXEC DATOUD(DA4,DA5$) 2080 KSNR=KSNR+E 2090 PRINT TAB(48);KT1;TAB(56);DA5$;TAB(69); 2100 PRINT USING "##":KSNR 2110 ENDPROC 2120 PROC BUDSKRIV(MKØB,MK,SU2,DS1,DS2,DS3,DS4,LNR) 2130 IF MK<>G THEN EXEC LINIER(LNR,24-3*(SKRIV1),LNR) 2140 IF SKRIV1=B OR KTAL1<>DTAL OR (SKRIV1=E AND (MK=E OR MK=G)) THEN 2150 IF MK<>G AND SKRIV1=B THEN PRINT STREG$ 2160 CASE MK OF 2170 STOP 2180 WHEN E,G 2190 PRINT TAB(32);"Transport"; 2200 WHEN V,C 2210 PRINT TAB(57);CHR(M);"Ny saldo";CHR(15) 2220 PRINT STREG$ 2230 WHEN B 2240 PRINT TAB(11),CHR(M);"Månedens køb";TAB(36);"Ny saldo";CHR(15) 2250 PRINT STREG$ 2260 ENDCASE 2270 ENDIF 2280 IF MK=B THEN 2290 EXEC TUD(MKØB$,UBELØB$,E,B) 2300 PRINT TAB(11);UBELØB$; 2310 ENDIF 2320 EXEC TUD(SU2$,UBELØB$,B,B) 2340 PRINT TAB(51-G*(SKRIV1)+(15-C*(SKRIV1))*(SU2$(LEN(SU2$))="-"));UBELØB$ 2350 IF SKRIV1=B THEN 2360 IF MK<>G THEN PRINT STREG$ 2370 ELSE 2380 IF MK<>G THEN 2381 PRINT " " 2382 PRINT " " 2383 ENDIF 2390 ENDIF 2400 IF MK<E OR MK>G THEN 2410 IF SKRIV1=B THEN 2420 CASE MK OF 2430 PRINT TAB(15);CHR(M);"Månedens bev.";TAB(34);"Årets bev.";CHR(15) 2440 WHEN B,C 2450 PRINT TAB(F);CHR(M);"0-30"; 2460 IF MK=B THEN PRINT TAB(U);"30-60";TAB(33);"60-90"; 2470 PRINT TAB(41);"Ældre";CHR(15) 2480 ENDCASE 2490 PRINT STREG$ 2500 ENDIF 2510 EXEC TUD(DS1$,UBEL1$,E,B) 2520 EXEC TUD(DS2$,UBEL2$,E,B) 2530 EXEC TUD(DS3$,UBEL3$,E,B) 2540 EXEC TUD(DS4$,UBEL4$,E,B) 2550 PRINT TAB(11);UBEL1$; 2560 IF MK<>C THEN PRINT TAB(27);UBEL2$;TAB(44);UBEL3$; 2570 PRINT TAB(60);UBEL4$ 2580 ENDIF 2590 IF SKRIV1=B AND MK<>E AND MK<>G THEN 2600 PRINT STREG$ 2610 PRINT " " 2620 PRINT " " 2630 ENDIF 2640 IF MK=E AND SKRIV1=E THEN PRINT " " 2650 IF MK=E OR (SKRIV1=E AND MK<>G) THEN EXEC LINIER(LNR,29-2*(SKRIV1),LNR) 2660 ENDPROC 2670 PROC STARTBIL 2680 REPEAT 2690 OUTPUT T 2700 CLEAR 2710 EXEC OVERSKRIFT(0) 2720 REPEAT 2730 EXEC INDPUT1(4,3,-1,100000,LTX$(1)) 2740 UNTIL P=B OR (P>9999 AND P<100000) 2750 SUM$="0+";KONT=P;KTAL1=B 2760 IF KONT=B THEN EXIT 2770 IF KTAL=DTAL AND DTAL*10000+MKGR<KONT THEN KTAL1=DTAL 2780 IF KTAL=KRTAL AND KRTAL*1000+MKRGR<KONT THEN KTAL1=KRTAL 2790 CURSOR W,5 2800 CASE KTAL1 OF 2810 EXEC FINDPOST1(FTAB1,FTAB,MFANTAL,KONT,FPIL3,K2$) 2820 IF CEKS=B THEN 2830 EXEC HENTPOST 2840 IF ORD(FUKODE$)-48=B THEN 2850 PRINT FNAVN$;" " 2860 ELSE 2870 CEKS=E 2880 ENDIF 2890 ENDIF 2900 WHEN DTAL 2910 EXEC FINDPOST1(DTAB1,DTAB,MDANTAL,KONT,DPIL3,K3$) 2920 IF CEKS=B THEN 2930 EXEC HENTDPOST 2940 EXEC NAVN2(DEBNAVN$,DEBGADE$,DEBPOSTNR,DEBBY$,DEBLK$) 2950 ENDIF 2960 WHEN KRTAL 2970 EXEC FINDPOST1(KTAB1,KTAB,MKANTAL,KONT,KPIL3,K4$) 2980 IF CEKS=B THEN 2990 EXEC HENTKPOST 3000 EXEC NAVN2(KRENAVN$,KREGADE$,KREPOSTNR,KREBY$,KRELK$) 3010 ENDIF 3020 ENDCASE 3030 IF CEKS=B THEN EXEC INDPUT1(4,12,-9,-6,LTX$(2)) 3040 IF CEKS=E THEN EXEC INDPUT1(9,5,-2,0,LTX$(3)) 3050 UNTIL P=-7 OR KONT=B 3060 ENDPROC 3070 PROC HUDSKRIV 3080 PRINT " " 3090 IF SKRIV1=B THEN PRINT TAB(65);DV$;" " 3100 CASE KTAL1 OF 3110 PRINT TAB(D);CHR(M);FNAVN$;" ";CHR(15) 3120 EXEC LINIER(1,3,I) 3130 WHEN DTAL 3140 IF SKRIV1=E THEN 3150 PRINT " " 3155 PRINT " " 3160 PRINT TAB(D);EGNAVN$;" " 3170 PRINT TAB(D);EGGADE$;" " 3180 PRINT TAB(D);EGPOSTNR$;" ";EGBY$;" " 3190 EXEC LINIER(1,5,I) 3200 ENDIF 3210 EXEC NAVN1(DEBNAVN$,DEBGADE$,DEBPOSTNR,DEBBY$,DEBLK$) 3220 WHEN KRTAL 3230 EXEC NAVN1(KRENAVN$,KREGADE$,KREPOSTNR,KREBY$,KRELK$) 3240 ENDCASE 3250 ENDPROC 3260 PROC HSUDSKRIV 3270 IF SKRIV THEN 3280 PRINT TAB(49);"Konto";TAB(56);"Dato";TAB(68);"Side" 3290 PRINT TAB(49);STREG$(E:29) 3300 EXEC LUDSKRIV(KONT,DATO,KSIDENR) 3310 PRINT STREG$ 3320 ELSE 3330 CLEAR 3340 EXEC OVERSKRIFT(1) 3350 CURSOR E,V 3360 ENDIF 3370 PRINT TAB(V);"Dato";TAB(D);"Bilag Tekst";TAB(44);"Entre";TAB(57); 3375 PRINT "Debet";TAB(72);"Kredit" 3390 PRINT STREG$ 3400 ENDPROC 3410 PROC OVERSKRIFT(ART1) 3420 IF ART1=B THEN 3430 PRINT TAB(21);"Kontospørgeprogram";TAB(61);"Dato:";DAT$ 3440 ELSE 3450 CURSOR E,E 3460 PRINT "Kontospørgeprogram Nr:"; 3470 PRINT USING "###### Navn :":KONT; 3480 CASE KTAL1 OF 3490 PRINT FNAVN$;" "; 3500 WHEN DTAL 3510 PRINT DEBNAVN$;" "; 3520 WHEN KRTAL 3530 PRINT KRENAVN$;" "; 3540 ENDCASE 3550 PRINT TAB(63);" Dato:";DAT$ 3560 ENDIF 3570 ENDPROC 3580 PROC UDSKRIV(PKODE1,SU4,LNR1) 3590 EXEC LINIEUD(DDATO,BILAG,TEKST$,BELØB$,SU4$,ENTKO) 3600 LNR1=LNR1+E 3610 IF LNR1=F+6*(SKRIV)-6*(SKRIV1) THEN 3620 IF PKODE1=E THEN 3630 IF SKRIV1=B THEN PRINT CHR(10);CHR(10) 3640 EXEC BUDSKRIV(TAL4$,1,SU4$,TAL4$,TAL4$,TAL4$,TAL4$,LNR1) 3650 EXEC HUDSKRIV 3660 IF SKRIV1=E THEN 3665 PRINT " " 3670 EXEC LUDSKRIV(KONTO,DATO,KSIDENR) 3680 PRINT "" 3685 PRINT " " 3690 ELSE 3700 EXEC HSUDSKRIV 3710 ENDIF 3720 EXEC BUDSKRIV(TAL4$,2,SU4$,TAL4$,TAL4$,TAL4$,TAL4$,LNR1) 3730 LNR1=E 3740 ELSE 3750 EXEC INDPUT1(4,23,-2,0,LTX$(4)) 3760 CLEAR 3770 EXEC HSUDSKRIV 3780 LNR1=B 3790 ENDIF 3800 ENDIF 3810 ENDPROC 3820 PROC HENTPOST 3830 S=FTAB(FPIL3,G) 3840 GET K5$,S:FNR,FNAVN$ 3850 EXEC FEJL(W,G,K5$) 3860 GET K5$,S+E:FMKODE$,FMDEBET$,FMKREDIT$ 3870 EXEC FEJL(W,V,K5$) 3880 GET K5$,S+G:FUKODE$,FÅDEBET$,FÅKREDIT$ 3890 EXEC FEJL(W,C,K5$) 3900 ENDPROC 3910 PROC HENTDPOST 3920 S=DTAB(DPIL3,G) 3930 GET K6$,S:DEBNR,DEBNAVN$,DSALDO1$,DEBKGR$ 3940 EXEC FEJL(8,G,K6$) 3950 GET K6$,S+E:DSALDO2$,DSALDO3$,DSALDO4$,DEBPOSTNR,DEBLK$ 3960 EXEC FEJL(8,V,K6$) 3970 GET K6$,S+G:DEBGADE$,DEBTLF$,HPOST,HKUNDE 3980 EXEC FEJL(8,C,K6$) 3990 GET K6$,S+V:DEBBY$,ÅRKØB$,MDNKØB$ 4000 EXEC FEJL(8,5,K6$) 4010 ENDPROC 4020 PROC HENTKPOST 4030 S=KTAB(KPIL3,G) 4040 GET K7$,S:KRENR,KRENAVN$,KREGADE$ 4050 EXEC FEJL(C,E,K7$) 4060 GET K7$,S+E:KREBY$,KRELK$,KREGR$,KREPOSTNR,KSALDO1$,KSALDO2$ 4070 EXEC FEJL(C,G,K7$) 4080 ENDPROC 4090 PROC NRTEST(KTN1) 4100 P=B;TEST2=B;KTAL=B;L=LEN(KTN1$) 4110 CASE L OF 4120 FOR I=E TO L 4130 P1=INT(ORD(KTN1$(I))-48) 4140 IF P1=>B AND P1<=W THEN 4150 P=P*10+P1 4160 ELSE 4170 TEST2=E 4180 ENDIF 4190 NEXT I 4200 KTAL=P DIV 10000;KTAL9=P DIV 1000 4210 IF KTAL9=KRTAL THEN KTAL=KTAL9 4220 WHEN B 4230 P=-E 4240 WHEN E 4250 CASE KTN1$ OF 4260 P=INT(ORD(KTN1$)-48) 4270 WHEN "j","J" 4280 P=-7 4290 WHEN "n","N" 4300 P=-8 4310 ENDCASE 4320 ENDCASE 4330 ENDPROC 4340 PROC HOVIND(V1,MPOSTANTAL1,R) 4350 OPEN V1$,R 4360 EXEC FEJL(13,E,V1$) 4370 FOR I=E TO MPOSTANTAL1 DIV 160 4380 J=(I-E)*C+E;J1=J+E;J2=J+G;J3=J+V 4390 GET V1$,I:R(J,E),R(J,G),R(J1,E),R(J1,G),R(J2,E),R(J2,G),R(J3,E),R(J3,G) 4400 EXEC FEJL(13,G,V1$) 4410 NEXT I 4420 CLOSE V1$ 4430 EXEC FEJL(13,V,V1$) 4440 ENDPROC 4450 PROC UNDIND(V2,U1,Z) 4460 OPEN V2$,R 4470 EXEC FEJL(M,E,V2$) 4480 GET V2$,U1:Z(E,E),Z(E,G),Z(G,E),Z(G,G),Z(V,E),Z(V,G),Z(C,E),Z(C,G) 4490 EXEC FEJL(M,G,V2$) 4500 CLOSE V2$ 4510 EXEC FEJL(M,V,V2$) 4520 ENDPROC 4530 PROC DATOUD(DA1,DA2) 4550 DA3=DA1;DA2$=" " 4560 FOR J=8 TO E STEP -E 4570 IF J MOD V=B THEN 4580 DA2$(J)="." 4590 ELSE 4600 DA2$(J)=CHR(DA3 MOD 10+48);DA3=DA3 DIV 10 4620 ENDIF 4630 NEXT J 4640 ENDPROC 4650 PROC MKONTUD(K61,MPOSTANTAL8) 4660 OUTPUT P 4670 P=E;T=E 4680 EXEC POSTER(K61$,P,T,MPOSTANTAL8,SKRIV,SUM$) 4690 T=E 4700 IF P<100000 THEN 4710 REPEAT 4720 KSIDENR=B;SUM$="0+" 4730 CASE KTAL1 OF 4740 EXEC FINDPOST1(FTAB1,FTAB,MFANTAL,P,FPIL3,K2$) 4750 IF CEKS=B THEN EXEC HENTPOST 4760 WHEN DTAL 4770 EXEC FINDPOST1(DTAB1,DTAB,MDANTAL,P,DPIL3,K3$) 4780 IF CEKS=B THEN EXEC HENTDPOST 4790 WHEN KRTAL 4800 EXEC FINDPOST1(KTAB1,KTAB,MKANTAL,P,KPIL3,K4$) 4810 IF CEKS=B THEN EXEC HENTKPOST 4820 ENDCASE 4830 IF CEKS<>B THEN STOP 4840 EXEC HUDSKRIV 4850 IF DTAL=KTAL1 AND SKRIV1=E THEN 4855 PRINT " " 4860 EXEC LUDSKRIV(P,DATO,KSIDENR) 4870 PRINT " " 4875 PRINT " " 4880 ELSE 4890 KONT=P 4900 EXEC HSUDSKRIV 4910 ENDIF 4920 EXEC POSTER(K61$,P,T,MPOSTANTAL8,SKRIV,SUM$) 4930 CASE KTAL1 OF 4940 EXEC BUDSKRIV(TAL4$,3,SUM$,FMDEBET$,FMKREDIT$,FÅDEBET$,FÅKREDIT$,LINIE) 4950 WHEN DTAL 4960 EXEC BUDSKRIV(MDNKØB$,0,SUM$,DSALDO1$,DSALDO2$,DSALDO3$,DSALDO4$,LINIE) 4970 WHEN KRTAL 4980 EXEC BUDSKRIV(TAL4$,4,SUM$,KSALDO1$,TAL4$,TAL4$,KSALDO2$,LINIE) 4990 ENDCASE 5000 T=T6 5010 UNTIL P=100000 OR T=>MPOSTANTAL8 5020 ENDIF 5030 P=B 5040 ENDPROC 5050 K1$="P641220:SYSTEM1" 5060 REPEAT 5070 OPEN K1$,R 5080 IF STATUS(K1$)=B THEN EXIT 5090 CLEAR 5100 CURSOR U,13 5110 INPUT "ISÆT PLADE NR.20,TAST RETURN",A$ 5120 UNTIL STATUS(K1$)=B 5130 GET K1$,E:MFANTAL,MDANTAL,MKANTAL 5140 EXEC FEJL(W,E,K1$) 5150 GET K1$,V:DPOST,KPOST,MFPOST,MDPOST 5160 EXEC FEJL(W,G,K1$) 5170 GET K1$,C:MKPOST,MFAK,MVGR,MKGR 5180 EXEC FEJL(W,V,K1$) 5190 GET K1$,5:MKRGR 5200 EXEC FEJL(W,C,K1$) 5210 GET K1$,8:DIVNR,DIVDNR,DIFNR,DTAL 5220 EXEC FEJL(W,5,K1$) 5230 GET K1$,W:KRTAL 5240 EXEC FEJL(W,6,K1$) 5250 GET K1$,10:N$ 5260 EXEC FEJL(W,7,K1$) 5270 GET K1$,11:K2$ 5280 EXEC FEJL(W,8,K1$) 5290 GET K1$,D:K3$ 5300 EXEC FEJL(W,W,K1$) 5310 GET K1$,13:K4$ 5320 EXEC FEJL(W,10,K1$) 5330 GET K1$,15:K5$ 5340 EXEC FEJL(W,11,K1$) 5350 GET K1$,16:K6$ 5360 EXEC FEJL(W,D,K1$) 5370 GET K1$,F:K7$ 5380 EXEC FEJL(W,13,K1$) 5390 GET K1$,U:K8$ 5400 EXEC FEJL(W,M,K1$) 5410 GET K1$,26:K9$ 5420 EXEC FEJL(W,15,K1$) 5430 GET K1$,27:K10$ 5440 EXEC FEJL(W,16,K1$) 5450 GET K1$,32:K11$ 5460 EXEC FEJL(W,F,K1$) 5470 GET K1$,33:K12$ 5480 EXEC FEJL(W,18,K1$) 5490 GET K1$,34:K13$ 5500 EXEC FEJL(W,19,K1$) 5510 GET K1$,36:K14$ 5520 EXEC FEJL(W,20,K1$) 5530 CLOSE K1$ 5540 EXEC FEJL(W,21,K1$) 5550 K2$=N$+K2$;K3$=N$+K3$;K4$=N$+K4$;K5$=N$+K5$;K6$=N$+K6$;K7$=N$+K7$ 5560 K8$=N$+K8$;K9$=N$+K9$;K10$=N$+K10$;K11$=N$+K11$;K12$=N$+K12$ 5570 K13$=N$+K13$;K14$=N$+K14$ 5580 OPEN K14$,R 5590 EXEC FEJL(W,22,K14$) 5600 GET K14$,G:T1(E),T1(G),T1(V),T1(C),T1(5),T1(6),T1(7),T1(8),T1(W) 5610 EXEC FEJL(W,23,K14$) 5620 FOR I=E TO V 5630 H=(I-E)*V+E 5640 GET K14$,I+G:LAND$(H),LAND$(H+E),LAND$(H+G) 5650 EXEC FEJL(W,24,K14$) 5660 NEXT I 5670 FOR I=E TO 6 5680 H=(I-E)*V+E 5690 GET K14$,I+5:TFIL$(H),TFIL$(H+E),TFIL$(H+G) 5700 EXEC FEJL(W,U,K14$) 5710 NEXT I 5720 GET K14$,13:T2(E),T2(G),T2(V),T2(C),T2(5),T2(6),T2(7),T2(8),T2(W) 5730 EXEC FEJL(W,26,K14$) 5740 GET K14$,F:T3(E),T3(G),T3(V),T3(C),T3(5),T3(6),T3(7),T3(8),T3(W) 5750 EXEC FEJL(W,27,K14$) 5760 GET K14$,18:EGNAVN$ 5770 EXEC FEJL(W,50,K14$) 5780 GET K14$,19:EGGADE$ 5790 EXEC FEJL(W,51,K14$) 5800 GET K14$,20:DV$,EGBY$,EGPOSTNR$ 5810 EXEC FEJL(W,52,K14$) 5820 CLOSE K14$ 5830 EXEC FEJL(W,31,K14$) 5840 OPEN K2$,R 5850 EXEC FEJL(W,32,K2$) 5860 OPEN K3$,R 5870 EXEC FEJL(W,33,K3$) 5880 OPEN K4$,R 5890 EXEC FEJL(W,34,K4$) 5900 OPEN K5$,R 5910 EXEC FEJL(W,35,K5$) 5920 OPEN K6$,R 5930 EXEC FEJL(W,36,K6$) 5940 OPEN K7$,R 5950 EXEC FEJL(W,37,K7$) 5960 DIM DTAB1(MDANTAL DIV C),FTAB1(MFANTAL DIV C),KTAB1(MKANTAL DIV C) 5970 DIM HFTAB(MFPOST DIV 40,G),FTAB(C,G),KTAB(C,G),HDTAB(MDPOST DIV 40,G) 5990 DIM HKRTAB(MKPOST DIV 40,G),UFTAB(C,G),UDTAB(C,G),UKRTAB(C,G),DTAB(C,G) 6000 EXEC INDTAB1(FTAB1,MFANTAL,K2$) 6010 EXEC INDTAB1(DTAB1,MDANTAL,K3$) 6020 EXEC INDTAB1(KTAB1,MKANTAL,K4$) 6030 EXEC HOVIND(K11$,MFPOST,HFTAB) 6040 EXEC HOVIND(K12$,MDPOST,HDTAB) 6050 EXEC HOVIND(K13$,MKPOST,HKRTAB) 6060 LTX$(E)="Indtast kontonr. (0:færdig):" 6070 LTX$(G)="Rigtig konto (J/N)" 6080 LTX$(V)="Konto eksisterer ikke, tast RETURN" 6090 LTX$(C)="Tast RETURN når sideskift ønskes" 6100 LTX$(5)="Ønskes kontoudtog skrevet på formular (J/N):" 6110 LTX$(6)="Monter kontoudtogsformularer og tast RETURN" 6120 LTX$(7)="Ønskes yderligere testprint (J/N):" 6130 LTX$(8)="Monter papir til kontoudtog og tast RETURN" 6140 LTX$(W)="Ønskes udskrift på printer (J/N):" 6150 LTX$(10)="Ønskes flere udskrifter (J/N):" 6160 LTX$(11)="Monter papir til udskrift af finanskonti,tast RETURN" 6170 DATO=T1(7);MAFSLUT=T3(G) 6180 EXEC DATOUD(DATO,DAT$) 6190 STREG$="--------------------------------------";STREG$=STREG$+STREG$+"-" 6200 BLANK$=" " 6210 IF MAFSLUT=E THEN 6220 REPEAT 6230 CLEAR 6240 CURSOR E,E 6250 PRINT TAB(15);"Månedsafslutning Kontoudtog";TAB(63);" Dato:";DAT$ 6260 EXEC INDPUT1(4,8,-9,-6,LTX$(5)) 6270 KTAL1=DTAL 6280 IF P=-7 THEN 6290 EXEC INDPUT1(4,10,-2,0,LTX$(6)) 6300 SKRIV1=E 6310 REPEAT 6320 DEBNAVN$="XXXXXXXXXXXXXXXXXXXXXXXXX";DEBGADE$=DEBNAVN$;DEBPOSTNR=9999 6330 OUTPUT P 6340 DEBBY$=DEBNAVN$(E:15);DEBLK$="0" 6350 EXEC HUDSKRIV 6360 EXEC LUDSKRIV(99999,999999,9) 6370 PRINT CHR(10);CHR(10) 6380 PRINT TAB(11);"XX.XX.XX XXXXXX ";DEBNAVN$;" XXX.XXX,XX XXX.XXX,XX" 6400 FOR I=E TO 18 6410 PRINT " " 6420 NEXT I 6440 PRINT TAB(11);"XX.XX.XX XXXXXX ";DEBNAVN$;" XXX.XXX,XX XXX.XXX,XX" 6460 PRINT " " 6465 PRINT " " 6470 PRINT TAB(11);"XX.XXX.XXX,XX";TAB(52);"XXX.XXX,XX XXX.XXX,XX" 6480 PRINT " " 6485 PRINT " " 6490 PRINT TAB(11);"XX.XXX.XXX,XX XX.XXX.XXX,XX XX.XXX.XXX,XX "; 6500 PRINT "XX.XXX.XXX,XX" 6510 PRINT CHR(10);CHR(10);CHR(10);CHR(10);CHR(10) 6520 OUTPUT T 6530 EXEC INDPUT1(4,12,-9,-6,LTX$(7)) 6540 UNTIL P=-8 6550 ELSE 6560 EXEC INDPUT1(4,10,-2,0,LTX$(8)) 6570 SKRIV1=B 6580 ENDIF 6590 SKRIV=E;LINIE=B;T=E 6610 EXEC MKONTUD(K9$,MDPOST) 6620 KTAL1=DTAL-E 6630 IF SKRIV1=E THEN 6640 SKRIV1=B 6650 OUTPUT T 6660 CLEAR 6670 EXEC INDPUT1(20,13,-2,0,LTX$(11)) 6680 ENDIF 6690 EXEC MKONTUD(K8$,MFPOST) 6700 KTAL1=KRTAL 6705 OUTPUT T 6710 EXEC MKONTUD(K10$,MKPOST) 6720 CLEAR 6730 OUTPUT T 6740 EXEC INDPUT1(20,13,-9,-6,LTX$(10)) 6750 UNTIL P=-8 6760 ELSE 6770 EXEC STARTBIL 6780 REPEAT 6790 IF KONT=B THEN EXIT 6800 EXEC INDPUT1(4,14,-9,-6,LTX$(9)) 6810 KSIDENR=B;SKRIV1=B 6820 IF P=-7 THEN 6830 SKRIV=E 6840 OUTPUT P 6850 EXEC HUDSKRIV 6870 ELSE 6880 SKRIV=B 6890 OUTPUT T 6895 ENDIF 6900 EXEC HSUDSKRIV 6920 CASE KTAL1 OF 6930 EXEC SØG(MFPOST,HFTAB,KONT,UFTAB,K11$) 6940 WHEN DTAL 6950 EXEC SØG(MDPOST,HDTAB,KONT,UDTAB,K12$) 6960 WHEN KRTAL 6970 EXEC SØG(MKPOST,HKRTAB,KONT,UKRTAB,K13$) 6980 ENDCASE 6990 IF T>B THEN 7000 CASE KTAL1 OF 7010 EXEC POSTER(K8$,KONT,T,MFPOST,SKRIV,SUM$) 7020 WHEN DTAL 7030 EXEC POSTER(K9$,KONT,T,MDPOST,SKRIV,SUM$) 7040 WHEN KRTAL 7050 EXEC POSTER(K10$,KONT,T,MKPOST,SKRIV,SUM$) 7060 ENDCASE 7070 ELSE 7080 LINIE=B 7090 ENDIF 7100 IF T=B THEN SUM$="0+" 7110 IF SKRIV=B THEN 7120 EXEC TUD(SUM$,UBELØB$,B,B) 7130 PRINT TAB(35);STREG$(E:43) 7140 PRINT TAB(35);"Ny saldo";TAB(51+15*(SUM$(LEN(SUM$))="-"));UBELØB$ 7150 ELSE 7160 CASE KTAL1 OF 7170 EXEC BUDSKRIV(TAL4$,3,SUM$,FMDEBET$,FMKREDIT$,FÅDEBET$,FÅKREDIT$,LINIE) 7180 WHEN DTAL 7190 EXEC BUDSKRIV(MDNKØB$,0,SUM$,DSALDO1$,DSALDO2$,DSALDO3$,DSALDO4$,LINIE) 7200 WHEN KRTAL 7210 EXEC BUDSKRIV(TAL4$,4,SUM$,KSALDO1$,TAL4$,TAL4$,KSALDO2$,LINIE) 7220 ENDCASE 7230 ENDIF 7240 OUTPUT T 7250 EXEC INDPUT1(4,23,-9,-6,LTX$(10)) 7260 IF P=-7 THEN 7270 EXEC STARTBIL 7280 ELSE 7290 KONT=B 7300 ENDIF 7310 UNTIL KONT=B 7320 ENDIF 7330 OUTPUT T 7340 CLEAR 7350 IF MAFSLUT=E THEN CHAIN "P641210:ENTKSP1" 7360 CHAIN "P641210:OPSTART"
0x0000…0062 (0,) 8db9 0090 B=0;E=1;G=2;V=3;W=9;C=4;D=12;F=17;M=14;U=25
0x0000…0062 LineComalBin {
0x0000…0062 ptr = 0x8db9 // 0x0 @0x0
0x0000…0062 lno = 0x005a // 0x2 @0x2
0x0000…0062 at0004 = ╱42╱B╱ // 0x4 @0x4
0x0000…0062 at0005 = ╱dc╱=╱ // 0x5 @0x5
0x0000…0062 at0006 = ╱30╱0╱ // 0x6 @0x6
0x0000…0062 at0007 = ╱fe00000000╱ // 0x7 @0x7
0x0000…0062 at000c = ╱eb╱;╱ // 0xc @0xc
0x0000…0062 at000d = ╱45╱E╱ // 0xd @0xd
0x0000…0062 at000e = ╱dc╱=╱ // 0xe @0xe
0x0000…0062 at000f = ╱31╱1╱ // 0xf @0xf
0x0000…0062 at0010 = ╱fe00008001╱ // 0x10 @0x10
0x0000…0062 at0015 = ╱eb╱;╱ // 0x15 @0x15
0x0000…0062 at0016 = ╱47╱G╱ // 0x16 @0x16
0x0000…0062 at0017 = ╱dc╱=╱ // 0x17 @0x17
0x0000…0062 at0018 = ╱32╱2╱ // 0x18 @0x18
0x0000…0062 at0019 = ╱fe00008002╱ // 0x19 @0x19
0x0000…0062 at001e = ╱eb╱;╱ // 0x1e @0x1e
0x0000…0062 at001f = ╱56╱V╱ // 0x1f @0x1f
0x0000…0062 at0020 = ╱dc╱=╱ // 0x20 @0x20
0x0000…0062 at0021 = ╱33╱3╱ // 0x21 @0x21
0x0000…0062 at0022 = ╱fe0000c002╱ // 0x22 @0x22
0x0000…0062 at0027 = ╱eb╱;╱ // 0x27 @0x27
0x0000…0062 at0028 = ╱57╱W╱ // 0x28 @0x28
0x0000…0062 at0029 = ╱dc╱=╱ // 0x29 @0x29
0x0000…0062 at002a = ╱39╱9╱ // 0x2a @0x2a
0x0000…0062 at002b = ╱fe00009004╱ // 0x2b @0x2b
0x0000…0062 at0030 = ╱eb╱;╱ // 0x30 @0x30
0x0000…0062 at0031 = ╱43╱C╱ // 0x31 @0x31
0x0000…0062 at0032 = ╱dc╱=╱ // 0x32 @0x32
0x0000…0062 at0033 = ╱34╱4╱ // 0x33 @0x33
0x0000…0062 at0034 = ╱fe00008003╱ // 0x34 @0x34
0x0000…0062 at0039 = ╱eb╱;╱ // 0x39 @0x39
0x0000…0062 at003a = ╱44╱D╱ // 0x3a @0x3a
0x0000…0062 at003b = ╱dc╱=╱ // 0x3b @0x3b
0x0000…0062 at003c = ╱31╱1╱ // 0x3c @0x3c
0x0000…0062 at003d = ╱32╱2╱ // 0x3d @0x3d
0x0000…0062 at003e = ╱fe0000c004╱ // 0x3e @0x3e
0x0000…0062 at0043 = ╱eb╱;╱ // 0x43 @0x43
0x0000…0062 at0044 = ╱46╱F╱ // 0x44 @0x44
0x0000…0062 at0045 = ╱dc╱=╱ // 0x45 @0x45
0x0000…0062 at0046 = ╱31╱1╱ // 0x46 @0x46
0x0000…0062 at0047 = ╱37╱7╱ // 0x47 @0x47
0x0000…0062 at0048 = ╱fe00008805╱ // 0x48 @0x48
0x0000…0062 at004d = ╱eb╱;╱ // 0x4d @0x4d
0x0000…0062 at004e = ╱4d╱M╱ // 0x4e @0x4e
0x0000…0062 at004f = ╱dc╱=╱ // 0x4f @0x4f
0x0000…0062 at0050 = ╱31╱1╱ // 0x50 @0x50
0x0000…0062 at0051 = ╱34╱4╱ // 0x51 @0x51
0x0000…0062 at0052 = ╱fe0000e004╱ // 0x52 @0x52
0x0000…0062 at0057 = ╱eb╱;╱ // 0x57 @0x57
0x0000…0062 at0058 = ╱55╱U╱ // 0x58 @0x58
0x0000…0062 at0059 = ╱dc╱=╱ // 0x59 @0x59
0x0000…0062 at005a = ╱32╱2╱ // 0x5a @0x5a
0x0000…0062 at005b = ╱35╱5╱ // 0x5b @0x5b
0x0000…0062 at005c = ╱fe0000c805╱ // 0x5c @0x5c
0x0000…0062 at0061 = EOL // 0x61 @0x61
0x0000…0062 }
0x0062…00a2 8df9 0100 DIM K1$(F),K2$(F),DEBNAVN$(U),DSALDO1$(D),DEBKGR$(G),FNAVN$(U)
0x0062…00a2 LineComalBin {
0x0062…00a2 ptr = 0x8df9 // 0x62 @0x0
0x0062…00a2 lno = 0x0064 // 0x64 @0x2
0x0062…00a2 at0004 = ╱87╱ DIM ╱ // 0x66 @0x4
0x0062…00a2 at0005 = ╱4b╱K╱ // 0x67 @0x5
0x0062…00a2 at0006 = ╱31╱1╱ // 0x68 @0x6
0x0062…00a2 at0007 = ╱ef╱$╱ // 0x69 @0x7
0x0062…00a2 at0008 = ╱ed╱(╱ // 0x6a @0x8
0x0062…00a2 at0009 = ╱46╱F╱ // 0x6b @0x9
0x0062…00a2 at000a = ╱ee╱)╱ // 0x6c @0xa
0x0062…00a2 at000b = ╱ec╱,╱ // 0x6d @0xb
0x0062…00a2 at000c = ╱4b╱K╱ // 0x6e @0xc
0x0062…00a2 at000d = ╱32╱2╱ // 0x6f @0xd
0x0062…00a2 at000e = ╱ef╱$╱ // 0x70 @0xe
0x0062…00a2 at000f = ╱ed╱(╱ // 0x71 @0xf
0x0062…00a2 at0010 = ╱46╱F╱ // 0x72 @0x10
0x0062…00a2 at0011 = ╱ee╱)╱ // 0x73 @0x11
0x0062…00a2 at0012 = ╱ec╱,╱ // 0x74 @0x12
0x0062…00a2 at0013 = ╱44╱D╱ // 0x75 @0x13
0x0062…00a2 at0014 = ╱45╱E╱ // 0x76 @0x14
0x0062…00a2 at0015 = ╱42╱B╱ // 0x77 @0x15
0x0062…00a2 at0016 = ╱4e╱N╱ // 0x78 @0x16
0x0062…00a2 at0017 = ╱41╱A╱ // 0x79 @0x17
0x0062…00a2 at0018 = ╱56╱V╱ // 0x7a @0x18
0x0062…00a2 at0019 = ╱4e╱N╱ // 0x7b @0x19
0x0062…00a2 at001a = ╱ef╱$╱ // 0x7c @0x1a
0x0062…00a2 at001b = ╱ed╱(╱ // 0x7d @0x1b
0x0062…00a2 at001c = ╱55╱U╱ // 0x7e @0x1c
0x0062…00a2 at001d = ╱ee╱)╱ // 0x7f @0x1d
0x0062…00a2 at001e = ╱ec╱,╱ // 0x80 @0x1e
0x0062…00a2 at001f = ╱44╱D╱ // 0x81 @0x1f
0x0062…00a2 at0020 = ╱53╱S╱ // 0x82 @0x20
0x0062…00a2 at0021 = ╱41╱A╱ // 0x83 @0x21
0x0062…00a2 at0022 = ╱4c╱L╱ // 0x84 @0x22
0x0062…00a2 at0023 = ╱44╱D╱ // 0x85 @0x23
0x0062…00a2 at0024 = ╱4f╱O╱ // 0x86 @0x24
0x0062…00a2 at0025 = ╱31╱1╱ // 0x87 @0x25
0x0062…00a2 at0026 = ╱ef╱$╱ // 0x88 @0x26
0x0062…00a2 at0027 = ╱ed╱(╱ // 0x89 @0x27
0x0062…00a2 at0028 = ╱44╱D╱ // 0x8a @0x28
0x0062…00a2 at0029 = ╱ee╱)╱ // 0x8b @0x29
0x0062…00a2 at002a = ╱ec╱,╱ // 0x8c @0x2a
0x0062…00a2 at002b = ╱44╱D╱ // 0x8d @0x2b
0x0062…00a2 at002c = ╱45╱E╱ // 0x8e @0x2c
0x0062…00a2 at002d = ╱42╱B╱ // 0x8f @0x2d
0x0062…00a2 at002e = ╱4b╱K╱ // 0x90 @0x2e
0x0062…00a2 at002f = ╱47╱G╱ // 0x91 @0x2f
0x0062…00a2 at0030 = ╱52╱R╱ // 0x92 @0x30
0x0062…00a2 at0031 = ╱ef╱$╱ // 0x93 @0x31
0x0062…00a2 at0032 = ╱ed╱(╱ // 0x94 @0x32
0x0062…00a2 at0033 = ╱47╱G╱ // 0x95 @0x33
0x0062…00a2 at0034 = ╱ee╱)╱ // 0x96 @0x34
0x0062…00a2 at0035 = ╱ec╱,╱ // 0x97 @0x35
0x0062…00a2 at0036 = ╱46╱F╱ // 0x98 @0x36
0x0062…00a2 at0037 = ╱4e╱N╱ // 0x99 @0x37
0x0062…00a2 at0038 = ╱41╱A╱ // 0x9a @0x38
0x0062…00a2 at0039 = ╱56╱V╱ // 0x9b @0x39
0x0062…00a2 at003a = ╱4e╱N╱ // 0x9c @0x3a
0x0062…00a2 at003b = ╱ef╱$╱ // 0x9d @0x3b
0x0062…00a2 at003c = ╱ed╱(╱ // 0x9e @0x3c
0x0062…00a2 at003d = ╱55╱U╱ // 0x9f @0x3d
0x0062…00a2 at003e = ╱ee╱)╱ // 0xa0 @0x3e
0x0062…00a2 at003f = EOL // 0xa1 @0x3f
0x0062…00a2 }
0x00a2…00ec 8e43 0110 DIM DSALDO2$(D),DSALDO3$(D),DSALDO4$(D),DEBLK$(G),DEBGADE$(U),A$(6)
0x00a2…00ec LineComalBin {
0x00a2…00ec ptr = 0x8e43 // 0xa2 @0x0
0x00a2…00ec lno = 0x006e // 0xa4 @0x2
0x00a2…00ec at0004 = ╱87╱ DIM ╱ // 0xa6 @0x4
0x00a2…00ec at0005 = ╱44╱D╱ // 0xa7 @0x5
0x00a2…00ec at0006 = ╱53╱S╱ // 0xa8 @0x6
0x00a2…00ec at0007 = ╱41╱A╱ // 0xa9 @0x7
0x00a2…00ec at0008 = ╱4c╱L╱ // 0xaa @0x8
0x00a2…00ec at0009 = ╱44╱D╱ // 0xab @0x9
0x00a2…00ec at000a = ╱4f╱O╱ // 0xac @0xa
0x00a2…00ec at000b = ╱32╱2╱ // 0xad @0xb
0x00a2…00ec at000c = ╱ef╱$╱ // 0xae @0xc
0x00a2…00ec at000d = ╱ed╱(╱ // 0xaf @0xd
0x00a2…00ec at000e = ╱44╱D╱ // 0xb0 @0xe
0x00a2…00ec at000f = ╱ee╱)╱ // 0xb1 @0xf
0x00a2…00ec at0010 = ╱ec╱,╱ // 0xb2 @0x10
0x00a2…00ec at0011 = ╱44╱D╱ // 0xb3 @0x11
0x00a2…00ec at0012 = ╱53╱S╱ // 0xb4 @0x12
0x00a2…00ec at0013 = ╱41╱A╱ // 0xb5 @0x13
0x00a2…00ec at0014 = ╱4c╱L╱ // 0xb6 @0x14
0x00a2…00ec at0015 = ╱44╱D╱ // 0xb7 @0x15
0x00a2…00ec at0016 = ╱4f╱O╱ // 0xb8 @0x16
0x00a2…00ec at0017 = ╱33╱3╱ // 0xb9 @0x17
0x00a2…00ec at0018 = ╱ef╱$╱ // 0xba @0x18
0x00a2…00ec at0019 = ╱ed╱(╱ // 0xbb @0x19
0x00a2…00ec at001a = ╱44╱D╱ // 0xbc @0x1a
0x00a2…00ec at001b = ╱ee╱)╱ // 0xbd @0x1b
0x00a2…00ec at001c = ╱ec╱,╱ // 0xbe @0x1c
0x00a2…00ec at001d = ╱44╱D╱ // 0xbf @0x1d
0x00a2…00ec at001e = ╱53╱S╱ // 0xc0 @0x1e
0x00a2…00ec at001f = ╱41╱A╱ // 0xc1 @0x1f
0x00a2…00ec at0020 = ╱4c╱L╱ // 0xc2 @0x20
0x00a2…00ec at0021 = ╱44╱D╱ // 0xc3 @0x21
0x00a2…00ec at0022 = ╱4f╱O╱ // 0xc4 @0x22
0x00a2…00ec at0023 = ╱34╱4╱ // 0xc5 @0x23
0x00a2…00ec at0024 = ╱ef╱$╱ // 0xc6 @0x24
0x00a2…00ec at0025 = ╱ed╱(╱ // 0xc7 @0x25
0x00a2…00ec at0026 = ╱44╱D╱ // 0xc8 @0x26
0x00a2…00ec at0027 = ╱ee╱)╱ // 0xc9 @0x27
0x00a2…00ec at0028 = ╱ec╱,╱ // 0xca @0x28
0x00a2…00ec at0029 = ╱44╱D╱ // 0xcb @0x29
0x00a2…00ec at002a = ╱45╱E╱ // 0xcc @0x2a
0x00a2…00ec at002b = ╱42╱B╱ // 0xcd @0x2b
0x00a2…00ec at002c = ╱4c╱L╱ // 0xce @0x2c
0x00a2…00ec at002d = ╱4b╱K╱ // 0xcf @0x2d
0x00a2…00ec at002e = ╱ef╱$╱ // 0xd0 @0x2e
0x00a2…00ec at002f = ╱ed╱(╱ // 0xd1 @0x2f
0x00a2…00ec at0030 = ╱47╱G╱ // 0xd2 @0x30
0x00a2…00ec at0031 = ╱ee╱)╱ // 0xd3 @0x31
0x00a2…00ec at0032 = ╱ec╱,╱ // 0xd4 @0x32
0x00a2…00ec at0033 = ╱44╱D╱ // 0xd5 @0x33
0x00a2…00ec at0034 = ╱45╱E╱ // 0xd6 @0x34
0x00a2…00ec at0035 = ╱42╱B╱ // 0xd7 @0x35
0x00a2…00ec at0036 = ╱47╱G╱ // 0xd8 @0x36
0x00a2…00ec at0037 = ╱41╱A╱ // 0xd9 @0x37
0x00a2…00ec at0038 = ╱44╱D╱ // 0xda @0x38
0x00a2…00ec at0039 = ╱45╱E╱ // 0xdb @0x39
0x00a2…00ec at003a = ╱ef╱$╱ // 0xdc @0x3a
0x00a2…00ec at003b = ╱ed╱(╱ // 0xdd @0x3b
0x00a2…00ec at003c = ╱55╱U╱ // 0xde @0x3c
0x00a2…00ec at003d = ╱ee╱)╱ // 0xdf @0x3d
0x00a2…00ec at003e = ╱ec╱,╱ // 0xe0 @0x3e
0x00a2…00ec at003f = ╱41╱A╱ // 0xe1 @0x3f
0x00a2…00ec at0040 = ╱ef╱$╱ // 0xe2 @0x40
0x00a2…00ec at0041 = ╱ed╱(╱ // 0xe3 @0x41
0x00a2…00ec at0042 = ╱36╱6╱ // 0xe4 @0x42
0x00a2…00ec at0043 = ╱fe0000c003╱ // 0xe5 @0x43
0x00a2…00ec at0048 = ╱ee╱)╱ // 0xea @0x48
0x00a2…00ec at0049 = EOL // 0xeb @0x49
0x00a2…00ec }
0x00ec…013b 8e92 0120 DIM BLANK$(77),TAL4$(M),TAH$(D),DEBTLF$(W),DEBBY$(20),K3$(F),K4$(F)
0x00ec…013b LineComalBin {
0x00ec…013b ptr = 0x8e92 // 0xec @0x0
0x00ec…013b lno = 0x0078 // 0xee @0x2
0x00ec…013b at0004 = ╱87╱ DIM ╱ // 0xf0 @0x4
0x00ec…013b at0005 = ╱42╱B╱ // 0xf1 @0x5
0x00ec…013b at0006 = ╱4c╱L╱ // 0xf2 @0x6
0x00ec…013b at0007 = ╱41╱A╱ // 0xf3 @0x7
0x00ec…013b at0008 = ╱4e╱N╱ // 0xf4 @0x8
0x00ec…013b at0009 = ╱4b╱K╱ // 0xf5 @0x9
0x00ec…013b at000a = ╱ef╱$╱ // 0xf6 @0xa
0x00ec…013b at000b = ╱ed╱(╱ // 0xf7 @0xb
0x00ec…013b at000c = ╱37╱7╱ // 0xf8 @0xc
0x00ec…013b at000d = ╱37╱7╱ // 0xf9 @0xd
0x00ec…013b at000e = ╱fe00009a07╱ // 0xfa @0xe
0x00ec…013b at0013 = ╱ee╱)╱ // 0xff @0x13
0x00ec…013b at0014 = ╱ec╱,╱ // 0x100 @0x14
0x00ec…013b at0015 = ╱54╱T╱ // 0x101 @0x15
0x00ec…013b at0016 = ╱41╱A╱ // 0x102 @0x16
0x00ec…013b at0017 = ╱4c╱L╱ // 0x103 @0x17
0x00ec…013b at0018 = ╱34╱4╱ // 0x104 @0x18
0x00ec…013b at0019 = ╱ef╱$╱ // 0x105 @0x19
0x00ec…013b at001a = ╱ed╱(╱ // 0x106 @0x1a
0x00ec…013b at001b = ╱4d╱M╱ // 0x107 @0x1b
0x00ec…013b at001c = ╱ee╱)╱ // 0x108 @0x1c
0x00ec…013b at001d = ╱ec╱,╱ // 0x109 @0x1d
0x00ec…013b at001e = ╱54╱T╱ // 0x10a @0x1e
0x00ec…013b at001f = ╱41╱A╱ // 0x10b @0x1f
0x00ec…013b at0020 = ╱48╱H╱ // 0x10c @0x20
0x00ec…013b at0021 = ╱ef╱$╱ // 0x10d @0x21
0x00ec…013b at0022 = ╱ed╱(╱ // 0x10e @0x22
0x00ec…013b at0023 = ╱44╱D╱ // 0x10f @0x23
0x00ec…013b at0024 = ╱ee╱)╱ // 0x110 @0x24
0x00ec…013b at0025 = ╱ec╱,╱ // 0x111 @0x25
0x00ec…013b at0026 = ╱44╱D╱ // 0x112 @0x26
0x00ec…013b at0027 = ╱45╱E╱ // 0x113 @0x27
0x00ec…013b at0028 = ╱42╱B╱ // 0x114 @0x28
0x00ec…013b at0029 = ╱54╱T╱ // 0x115 @0x29
0x00ec…013b at002a = ╱4c╱L╱ // 0x116 @0x2a
0x00ec…013b at002b = ╱46╱F╱ // 0x117 @0x2b
0x00ec…013b at002c = ╱ef╱$╱ // 0x118 @0x2c
0x00ec…013b at002d = ╱ed╱(╱ // 0x119 @0x2d
0x00ec…013b at002e = ╱57╱W╱ // 0x11a @0x2e
0x00ec…013b at002f = ╱ee╱)╱ // 0x11b @0x2f
0x00ec…013b at0030 = ╱ec╱,╱ // 0x11c @0x30
0x00ec…013b at0031 = ╱44╱D╱ // 0x11d @0x31
0x00ec…013b at0032 = ╱45╱E╱ // 0x11e @0x32
0x00ec…013b at0033 = ╱42╱B╱ // 0x11f @0x33
0x00ec…013b at0034 = ╱42╱B╱ // 0x120 @0x34
0x00ec…013b at0035 = ╱59╱Y╱ // 0x121 @0x35
0x00ec…013b at0036 = ╱ef╱$╱ // 0x122 @0x36
0x00ec…013b at0037 = ╱ed╱(╱ // 0x123 @0x37
0x00ec…013b at0038 = ╱32╱2╱ // 0x124 @0x38
0x00ec…013b at0039 = ╱30╱0╱ // 0x125 @0x39
0x00ec…013b at003a = ╱fe0000a005╱ // 0x126 @0x3a
0x00ec…013b at003f = ╱ee╱)╱ // 0x12b @0x3f
0x00ec…013b at0040 = ╱ec╱,╱ // 0x12c @0x40
0x00ec…013b at0041 = ╱4b╱K╱ // 0x12d @0x41
0x00ec…013b at0042 = ╱33╱3╱ // 0x12e @0x42
0x00ec…013b at0043 = ╱ef╱$╱ // 0x12f @0x43
0x00ec…013b at0044 = ╱ed╱(╱ // 0x130 @0x44
0x00ec…013b at0045 = ╱46╱F╱ // 0x131 @0x45
0x00ec…013b at0046 = ╱ee╱)╱ // 0x132 @0x46
0x00ec…013b at0047 = ╱ec╱,╱ // 0x133 @0x47
0x00ec…013b at0048 = ╱4b╱K╱ // 0x134 @0x48
0x00ec…013b at0049 = ╱34╱4╱ // 0x135 @0x49
0x00ec…013b at004a = ╱ef╱$╱ // 0x136 @0x4a
0x00ec…013b at004b = ╱ed╱(╱ // 0x137 @0x4b
0x00ec…013b at004c = ╱46╱F╱ // 0x138 @0x4c
0x00ec…013b at004d = ╱ee╱)╱ // 0x139 @0x4d
0x00ec…013b at004e = EOL // 0x13a @0x4e
0x00ec…013b }
0x013b…0184 8edb 0130 DIM RES$(M),ÅRKØB$(D),MDNKØB$(D),OP2$(D),BELØB$(D),KTNR$(6),K5$(F)
0x013b…0184 LineComalBin {
0x013b…0184 ptr = 0x8edb // 0x13b @0x0
0x013b…0184 lno = 0x0082 // 0x13d @0x2
0x013b…0184 at0004 = ╱87╱ DIM ╱ // 0x13f @0x4
0x013b…0184 at0005 = ╱52╱R╱ // 0x140 @0x5
0x013b…0184 at0006 = ╱45╱E╱ // 0x141 @0x6
0x013b…0184 at0007 = ╱53╱S╱ // 0x142 @0x7
0x013b…0184 at0008 = ╱ef╱$╱ // 0x143 @0x8
0x013b…0184 at0009 = ╱ed╱(╱ // 0x144 @0x9
0x013b…0184 at000a = ╱4d╱M╱ // 0x145 @0xa
0x013b…0184 at000b = ╱ee╱)╱ // 0x146 @0xb
0x013b…0184 at000c = ╱ec╱,╱ // 0x147 @0xc
0x013b…0184 at000d = ╱5d╱Å╱ // 0x148 @0xd
0x013b…0184 at000e = ╱52╱R╱ // 0x149 @0xe
0x013b…0184 at000f = ╱4b╱K╱ // 0x14a @0xf
0x013b…0184 at0010 = ╱5c╱Ø╱ // 0x14b @0x10
0x013b…0184 at0011 = ╱42╱B╱ // 0x14c @0x11
0x013b…0184 at0012 = ╱ef╱$╱ // 0x14d @0x12
0x013b…0184 at0013 = ╱ed╱(╱ // 0x14e @0x13
0x013b…0184 at0014 = ╱44╱D╱ // 0x14f @0x14
0x013b…0184 at0015 = ╱ee╱)╱ // 0x150 @0x15
0x013b…0184 at0016 = ╱ec╱,╱ // 0x151 @0x16
0x013b…0184 at0017 = ╱4d╱M╱ // 0x152 @0x17
0x013b…0184 at0018 = ╱44╱D╱ // 0x153 @0x18
0x013b…0184 at0019 = ╱4e╱N╱ // 0x154 @0x19
0x013b…0184 at001a = ╱4b╱K╱ // 0x155 @0x1a
0x013b…0184 at001b = ╱5c╱Ø╱ // 0x156 @0x1b
0x013b…0184 at001c = ╱42╱B╱ // 0x157 @0x1c
0x013b…0184 at001d = ╱ef╱$╱ // 0x158 @0x1d
0x013b…0184 at001e = ╱ed╱(╱ // 0x159 @0x1e
0x013b…0184 at001f = ╱44╱D╱ // 0x15a @0x1f
0x013b…0184 at0020 = ╱ee╱)╱ // 0x15b @0x20
0x013b…0184 at0021 = ╱ec╱,╱ // 0x15c @0x21
0x013b…0184 at0022 = ╱4f╱O╱ // 0x15d @0x22
0x013b…0184 at0023 = ╱50╱P╱ // 0x15e @0x23
0x013b…0184 at0024 = ╱32╱2╱ // 0x15f @0x24
0x013b…0184 at0025 = ╱ef╱$╱ // 0x160 @0x25
0x013b…0184 at0026 = ╱ed╱(╱ // 0x161 @0x26
0x013b…0184 at0027 = ╱44╱D╱ // 0x162 @0x27
0x013b…0184 at0028 = ╱ee╱)╱ // 0x163 @0x28
0x013b…0184 at0029 = ╱ec╱,╱ // 0x164 @0x29
0x013b…0184 at002a = ╱42╱B╱ // 0x165 @0x2a
0x013b…0184 at002b = ╱45╱E╱ // 0x166 @0x2b
0x013b…0184 at002c = ╱4c╱L╱ // 0x167 @0x2c
0x013b…0184 at002d = ╱5c╱Ø╱ // 0x168 @0x2d
0x013b…0184 at002e = ╱42╱B╱ // 0x169 @0x2e
0x013b…0184 at002f = ╱ef╱$╱ // 0x16a @0x2f
0x013b…0184 at0030 = ╱ed╱(╱ // 0x16b @0x30
0x013b…0184 at0031 = ╱44╱D╱ // 0x16c @0x31
0x013b…0184 at0032 = ╱ee╱)╱ // 0x16d @0x32
0x013b…0184 at0033 = ╱ec╱,╱ // 0x16e @0x33
0x013b…0184 at0034 = ╱4b╱K╱ // 0x16f @0x34
0x013b…0184 at0035 = ╱54╱T╱ // 0x170 @0x35
0x013b…0184 at0036 = ╱4e╱N╱ // 0x171 @0x36
0x013b…0184 at0037 = ╱52╱R╱ // 0x172 @0x37
0x013b…0184 at0038 = ╱ef╱$╱ // 0x173 @0x38
0x013b…0184 at0039 = ╱ed╱(╱ // 0x174 @0x39
0x013b…0184 at003a = ╱36╱6╱ // 0x175 @0x3a
0x013b…0184 at003b = ╱fe0000c003╱ // 0x176 @0x3b
0x013b…0184 at0040 = ╱ee╱)╱ // 0x17b @0x40
0x013b…0184 at0041 = ╱ec╱,╱ // 0x17c @0x41
0x013b…0184 at0042 = ╱4b╱K╱ // 0x17d @0x42
0x013b…0184 at0043 = ╱35╱5╱ // 0x17e @0x43
0x013b…0184 at0044 = ╱ef╱$╱ // 0x17f @0x44
0x013b…0184 at0045 = ╱ed╱(╱ // 0x180 @0x45
0x013b…0184 at0046 = ╱46╱F╱ // 0x181 @0x46
0x013b…0184 at0047 = ╱ee╱)╱ // 0x182 @0x47
0x013b…0184 at0048 = EOL // 0x183 @0x48
0x013b…0184 }
0x0184…01c6 8f1d 0140 DIM FMDEBET$(D),FMKREDIT$(D),FÅDEBET$(D),FÅKREDIT$(D),FSALDO$(D)
0x0184…01c6 LineComalBin {
0x0184…01c6 ptr = 0x8f1d // 0x184 @0x0
0x0184…01c6 lno = 0x008c // 0x186 @0x2
0x0184…01c6 at0004 = ╱87╱ DIM ╱ // 0x188 @0x4
0x0184…01c6 at0005 = ╱46╱F╱ // 0x189 @0x5
0x0184…01c6 at0006 = ╱4d╱M╱ // 0x18a @0x6
0x0184…01c6 at0007 = ╱44╱D╱ // 0x18b @0x7
0x0184…01c6 at0008 = ╱45╱E╱ // 0x18c @0x8
0x0184…01c6 at0009 = ╱42╱B╱ // 0x18d @0x9
0x0184…01c6 at000a = ╱45╱E╱ // 0x18e @0xa
0x0184…01c6 at000b = ╱54╱T╱ // 0x18f @0xb
0x0184…01c6 at000c = ╱ef╱$╱ // 0x190 @0xc
0x0184…01c6 at000d = ╱ed╱(╱ // 0x191 @0xd
0x0184…01c6 at000e = ╱44╱D╱ // 0x192 @0xe
0x0184…01c6 at000f = ╱ee╱)╱ // 0x193 @0xf
0x0184…01c6 at0010 = ╱ec╱,╱ // 0x194 @0x10
0x0184…01c6 at0011 = ╱46╱F╱ // 0x195 @0x11
0x0184…01c6 at0012 = ╱4d╱M╱ // 0x196 @0x12
0x0184…01c6 at0013 = ╱4b╱K╱ // 0x197 @0x13
0x0184…01c6 at0014 = ╱52╱R╱ // 0x198 @0x14
0x0184…01c6 at0015 = ╱45╱E╱ // 0x199 @0x15
0x0184…01c6 at0016 = ╱44╱D╱ // 0x19a @0x16
0x0184…01c6 at0017 = ╱49╱I╱ // 0x19b @0x17
0x0184…01c6 at0018 = ╱54╱T╱ // 0x19c @0x18
0x0184…01c6 at0019 = ╱ef╱$╱ // 0x19d @0x19
0x0184…01c6 at001a = ╱ed╱(╱ // 0x19e @0x1a
0x0184…01c6 at001b = ╱44╱D╱ // 0x19f @0x1b
0x0184…01c6 at001c = ╱ee╱)╱ // 0x1a0 @0x1c
0x0184…01c6 at001d = ╱ec╱,╱ // 0x1a1 @0x1d
0x0184…01c6 at001e = ╱46╱F╱ // 0x1a2 @0x1e
0x0184…01c6 at001f = ╱5d╱Å╱ // 0x1a3 @0x1f
0x0184…01c6 at0020 = ╱44╱D╱ // 0x1a4 @0x20
0x0184…01c6 at0021 = ╱45╱E╱ // 0x1a5 @0x21
0x0184…01c6 at0022 = ╱42╱B╱ // 0x1a6 @0x22
0x0184…01c6 at0023 = ╱45╱E╱ // 0x1a7 @0x23
0x0184…01c6 at0024 = ╱54╱T╱ // 0x1a8 @0x24
0x0184…01c6 at0025 = ╱ef╱$╱ // 0x1a9 @0x25
0x0184…01c6 at0026 = ╱ed╱(╱ // 0x1aa @0x26
0x0184…01c6 at0027 = ╱44╱D╱ // 0x1ab @0x27
0x0184…01c6 at0028 = ╱ee╱)╱ // 0x1ac @0x28
0x0184…01c6 at0029 = ╱ec╱,╱ // 0x1ad @0x29
0x0184…01c6 at002a = ╱46╱F╱ // 0x1ae @0x2a
0x0184…01c6 at002b = ╱5d╱Å╱ // 0x1af @0x2b
0x0184…01c6 at002c = ╱4b╱K╱ // 0x1b0 @0x2c
0x0184…01c6 at002d = ╱52╱R╱ // 0x1b1 @0x2d
0x0184…01c6 at002e = ╱45╱E╱ // 0x1b2 @0x2e
0x0184…01c6 at002f = ╱44╱D╱ // 0x1b3 @0x2f
0x0184…01c6 at0030 = ╱49╱I╱ // 0x1b4 @0x30
0x0184…01c6 at0031 = ╱54╱T╱ // 0x1b5 @0x31
0x0184…01c6 at0032 = ╱ef╱$╱ // 0x1b6 @0x32
0x0184…01c6 at0033 = ╱ed╱(╱ // 0x1b7 @0x33
0x0184…01c6 at0034 = ╱44╱D╱ // 0x1b8 @0x34
0x0184…01c6 at0035 = ╱ee╱)╱ // 0x1b9 @0x35
0x0184…01c6 at0036 = ╱ec╱,╱ // 0x1ba @0x36
0x0184…01c6 at0037 = ╱46╱F╱ // 0x1bb @0x37
0x0184…01c6 at0038 = ╱53╱S╱ // 0x1bc @0x38
0x0184…01c6 at0039 = ╱41╱A╱ // 0x1bd @0x39
0x0184…01c6 at003a = ╱4c╱L╱ // 0x1be @0x3a
0x0184…01c6 at003b = ╱44╱D╱ // 0x1bf @0x3b
0x0184…01c6 at003c = ╱4f╱O╱ // 0x1c0 @0x3c
0x0184…01c6 at003d = ╱ef╱$╱ // 0x1c1 @0x3d
0x0184…01c6 at003e = ╱ed╱(╱ // 0x1c2 @0x3e
0x0184…01c6 at003f = ╱44╱D╱ // 0x1c3 @0x3f
0x0184…01c6 at0040 = ╱ee╱)╱ // 0x1c4 @0x40
0x0184…01c6 at0041 = EOL // 0x1c5 @0x41
0x0184…01c6 }
0x01c6…021c 8f73 0150 DIM OP1$(D),TK$(V),TEKST$(U),TFIL$(20,10),FUKODE$(E),N$(6),FMKODE$(E)
0x01c6…021c LineComalBin {
0x01c6…021c ptr = 0x8f73 // 0x1c6 @0x0
0x01c6…021c lno = 0x0096 // 0x1c8 @0x2
0x01c6…021c at0004 = ╱87╱ DIM ╱ // 0x1ca @0x4
0x01c6…021c at0005 = ╱4f╱O╱ // 0x1cb @0x5
0x01c6…021c at0006 = ╱50╱P╱ // 0x1cc @0x6
0x01c6…021c at0007 = ╱31╱1╱ // 0x1cd @0x7
0x01c6…021c at0008 = ╱ef╱$╱ // 0x1ce @0x8
0x01c6…021c at0009 = ╱ed╱(╱ // 0x1cf @0x9
0x01c6…021c at000a = ╱44╱D╱ // 0x1d0 @0xa
0x01c6…021c at000b = ╱ee╱)╱ // 0x1d1 @0xb
0x01c6…021c at000c = ╱ec╱,╱ // 0x1d2 @0xc
0x01c6…021c at000d = ╱54╱T╱ // 0x1d3 @0xd
0x01c6…021c at000e = ╱4b╱K╱ // 0x1d4 @0xe
0x01c6…021c at000f = ╱ef╱$╱ // 0x1d5 @0xf
0x01c6…021c at0010 = ╱ed╱(╱ // 0x1d6 @0x10
0x01c6…021c at0011 = ╱56╱V╱ // 0x1d7 @0x11
0x01c6…021c at0012 = ╱ee╱)╱ // 0x1d8 @0x12
0x01c6…021c at0013 = ╱ec╱,╱ // 0x1d9 @0x13
0x01c6…021c at0014 = ╱54╱T╱ // 0x1da @0x14
0x01c6…021c at0015 = ╱45╱E╱ // 0x1db @0x15
0x01c6…021c at0016 = ╱4b╱K╱ // 0x1dc @0x16
0x01c6…021c at0017 = ╱53╱S╱ // 0x1dd @0x17
0x01c6…021c at0018 = ╱54╱T╱ // 0x1de @0x18
0x01c6…021c at0019 = ╱ef╱$╱ // 0x1df @0x19
0x01c6…021c at001a = ╱ed╱(╱ // 0x1e0 @0x1a
0x01c6…021c at001b = ╱55╱U╱ // 0x1e1 @0x1b
0x01c6…021c at001c = ╱ee╱)╱ // 0x1e2 @0x1c
0x01c6…021c at001d = ╱ec╱,╱ // 0x1e3 @0x1d
0x01c6…021c at001e = ╱54╱T╱ // 0x1e4 @0x1e
0x01c6…021c at001f = ╱46╱F╱ // 0x1e5 @0x1f
0x01c6…021c at0020 = ╱49╱I╱ // 0x1e6 @0x20
0x01c6…021c at0021 = ╱4c╱L╱ // 0x1e7 @0x21
0x01c6…021c at0022 = ╱ef╱$╱ // 0x1e8 @0x22
0x01c6…021c at0023 = ╱ed╱(╱ // 0x1e9 @0x23
0x01c6…021c at0024 = ╱32╱2╱ // 0x1ea @0x24
0x01c6…021c at0025 = ╱30╱0╱ // 0x1eb @0x25
0x01c6…021c at0026 = ╱fe0000a005╱ // 0x1ec @0x26
0x01c6…021c at002b = ╱ec╱,╱ // 0x1f1 @0x2b
0x01c6…021c at002c = ╱31╱1╱ // 0x1f2 @0x2c
0x01c6…021c at002d = ╱30╱0╱ // 0x1f3 @0x2d
0x01c6…021c at002e = ╱fe0000a004╱ // 0x1f4 @0x2e
0x01c6…021c at0033 = ╱ee╱)╱ // 0x1f9 @0x33
0x01c6…021c at0034 = ╱ec╱,╱ // 0x1fa @0x34
0x01c6…021c at0035 = ╱46╱F╱ // 0x1fb @0x35
0x01c6…021c at0036 = ╱55╱U╱ // 0x1fc @0x36
0x01c6…021c at0037 = ╱4b╱K╱ // 0x1fd @0x37
0x01c6…021c at0038 = ╱4f╱O╱ // 0x1fe @0x38
0x01c6…021c at0039 = ╱44╱D╱ // 0x1ff @0x39
0x01c6…021c at003a = ╱45╱E╱ // 0x200 @0x3a
0x01c6…021c at003b = ╱ef╱$╱ // 0x201 @0x3b
0x01c6…021c at003c = ╱ed╱(╱ // 0x202 @0x3c
0x01c6…021c at003d = ╱45╱E╱ // 0x203 @0x3d
0x01c6…021c at003e = ╱ee╱)╱ // 0x204 @0x3e
0x01c6…021c at003f = ╱ec╱,╱ // 0x205 @0x3f
0x01c6…021c at0040 = ╱4e╱N╱ // 0x206 @0x40
0x01c6…021c at0041 = ╱ef╱$╱ // 0x207 @0x41
0x01c6…021c at0042 = ╱ed╱(╱ // 0x208 @0x42
0x01c6…021c at0043 = ╱36╱6╱ // 0x209 @0x43
0x01c6…021c at0044 = ╱fe0000c003╱ // 0x20a @0x44
0x01c6…021c at0049 = ╱ee╱)╱ // 0x20f @0x49
0x01c6…021c at004a = ╱ec╱,╱ // 0x210 @0x4a
0x01c6…021c at004b = ╱46╱F╱ // 0x211 @0x4b
0x01c6…021c at004c = ╱4d╱M╱ // 0x212 @0x4c
0x01c6…021c at004d = ╱4b╱K╱ // 0x213 @0x4d
0x01c6…021c at004e = ╱4f╱O╱ // 0x214 @0x4e
0x01c6…021c at004f = ╱44╱D╱ // 0x215 @0x4f
0x01c6…021c at0050 = ╱45╱E╱ // 0x216 @0x50
0x01c6…021c at0051 = ╱ef╱$╱ // 0x217 @0x51
0x01c6…021c at0052 = ╱ed╱(╱ // 0x218 @0x52
0x01c6…021c at0053 = ╱45╱E╱ // 0x219 @0x53
0x01c6…021c at0054 = ╱ee╱)╱ // 0x21a @0x54
0x01c6…021c at0055 = EOL // 0x21b @0x55
0x01c6…021c }
0x021c…0266 8fbd 0160 DIM K6$(F),K7$(F),UBELØB$(M),SUM$(D),DAT$(8),SALDO$(D),DA5$(8)
0x021c…0266 LineComalBin {
0x021c…0266 ptr = 0x8fbd // 0x21c @0x0
0x021c…0266 lno = 0x00a0 // 0x21e @0x2
0x021c…0266 at0004 = ╱87╱ DIM ╱ // 0x220 @0x4
0x021c…0266 at0005 = ╱4b╱K╱ // 0x221 @0x5
0x021c…0266 at0006 = ╱36╱6╱ // 0x222 @0x6
0x021c…0266 at0007 = ╱ef╱$╱ // 0x223 @0x7
0x021c…0266 at0008 = ╱ed╱(╱ // 0x224 @0x8
0x021c…0266 at0009 = ╱46╱F╱ // 0x225 @0x9
0x021c…0266 at000a = ╱ee╱)╱ // 0x226 @0xa
0x021c…0266 at000b = ╱ec╱,╱ // 0x227 @0xb
0x021c…0266 at000c = ╱4b╱K╱ // 0x228 @0xc
0x021c…0266 at000d = ╱37╱7╱ // 0x229 @0xd
0x021c…0266 at000e = ╱ef╱$╱ // 0x22a @0xe
0x021c…0266 at000f = ╱ed╱(╱ // 0x22b @0xf
0x021c…0266 at0010 = ╱46╱F╱ // 0x22c @0x10
0x021c…0266 at0011 = ╱ee╱)╱ // 0x22d @0x11
0x021c…0266 at0012 = ╱ec╱,╱ // 0x22e @0x12
0x021c…0266 at0013 = ╱55╱U╱ // 0x22f @0x13
0x021c…0266 at0014 = ╱42╱B╱ // 0x230 @0x14
0x021c…0266 at0015 = ╱45╱E╱ // 0x231 @0x15
0x021c…0266 at0016 = ╱4c╱L╱ // 0x232 @0x16
0x021c…0266 at0017 = ╱5c╱Ø╱ // 0x233 @0x17
0x021c…0266 at0018 = ╱42╱B╱ // 0x234 @0x18
0x021c…0266 at0019 = ╱ef╱$╱ // 0x235 @0x19
0x021c…0266 at001a = ╱ed╱(╱ // 0x236 @0x1a
0x021c…0266 at001b = ╱4d╱M╱ // 0x237 @0x1b
0x021c…0266 at001c = ╱ee╱)╱ // 0x238 @0x1c
0x021c…0266 at001d = ╱ec╱,╱ // 0x239 @0x1d
0x021c…0266 at001e = ╱53╱S╱ // 0x23a @0x1e
0x021c…0266 at001f = ╱55╱U╱ // 0x23b @0x1f
0x021c…0266 at0020 = ╱4d╱M╱ // 0x23c @0x20
0x021c…0266 at0021 = ╱ef╱$╱ // 0x23d @0x21
0x021c…0266 at0022 = ╱ed╱(╱ // 0x23e @0x22
0x021c…0266 at0023 = ╱44╱D╱ // 0x23f @0x23
0x021c…0266 at0024 = ╱ee╱)╱ // 0x240 @0x24
0x021c…0266 at0025 = ╱ec╱,╱ // 0x241 @0x25
0x021c…0266 at0026 = ╱44╱D╱ // 0x242 @0x26
0x021c…0266 at0027 = ╱41╱A╱ // 0x243 @0x27
0x021c…0266 at0028 = ╱54╱T╱ // 0x244 @0x28
0x021c…0266 at0029 = ╱ef╱$╱ // 0x245 @0x29
0x021c…0266 at002a = ╱ed╱(╱ // 0x246 @0x2a
0x021c…0266 at002b = ╱38╱8╱ // 0x247 @0x2b
0x021c…0266 at002c = ╱fe00008004╱ // 0x248 @0x2c
0x021c…0266 at0031 = ╱ee╱)╱ // 0x24d @0x31
0x021c…0266 at0032 = ╱ec╱,╱ // 0x24e @0x32
0x021c…0266 at0033 = ╱53╱S╱ // 0x24f @0x33
0x021c…0266 at0034 = ╱41╱A╱ // 0x250 @0x34
0x021c…0266 at0035 = ╱4c╱L╱ // 0x251 @0x35
0x021c…0266 at0036 = ╱44╱D╱ // 0x252 @0x36
0x021c…0266 at0037 = ╱4f╱O╱ // 0x253 @0x37
0x021c…0266 at0038 = ╱ef╱$╱ // 0x254 @0x38
0x021c…0266 at0039 = ╱ed╱(╱ // 0x255 @0x39
0x021c…0266 at003a = ╱44╱D╱ // 0x256 @0x3a
0x021c…0266 at003b = ╱ee╱)╱ // 0x257 @0x3b
0x021c…0266 at003c = ╱ec╱,╱ // 0x258 @0x3c
0x021c…0266 at003d = ╱44╱D╱ // 0x259 @0x3d
0x021c…0266 at003e = ╱41╱A╱ // 0x25a @0x3e
0x021c…0266 at003f = ╱35╱5╱ // 0x25b @0x3f
0x021c…0266 at0040 = ╱ef╱$╱ // 0x25c @0x40
0x021c…0266 at0041 = ╱ed╱(╱ // 0x25d @0x41
0x021c…0266 at0042 = ╱38╱8╱ // 0x25e @0x42
0x021c…0266 at0043 = ╱fe00008004╱ // 0x25f @0x43
0x021c…0266 at0048 = ╱ee╱)╱ // 0x264 @0x48
0x021c…0266 at0049 = EOL // 0x265 @0x49
0x021c…0266 }
0x0266…02c3 901a 0170 DIM EGNAVN$(30),EGGADE$(30),EGBY$(20),STREG$(77),TKODE$(E),EGPOSTNR$(C)
0x0266…02c3 LineComalBin {
0x0266…02c3 ptr = 0x901a // 0x266 @0x0
0x0266…02c3 lno = 0x00aa // 0x268 @0x2
0x0266…02c3 at0004 = ╱87╱ DIM ╱ // 0x26a @0x4
0x0266…02c3 at0005 = ╱45╱E╱ // 0x26b @0x5
0x0266…02c3 at0006 = ╱47╱G╱ // 0x26c @0x6
0x0266…02c3 at0007 = ╱4e╱N╱ // 0x26d @0x7
0x0266…02c3 at0008 = ╱41╱A╱ // 0x26e @0x8
0x0266…02c3 at0009 = ╱56╱V╱ // 0x26f @0x9
0x0266…02c3 at000a = ╱4e╱N╱ // 0x270 @0xa
0x0266…02c3 at000b = ╱ef╱$╱ // 0x271 @0xb
0x0266…02c3 at000c = ╱ed╱(╱ // 0x272 @0xc
0x0266…02c3 at000d = ╱33╱3╱ // 0x273 @0xd
0x0266…02c3 at000e = ╱30╱0╱ // 0x274 @0xe
0x0266…02c3 at000f = ╱fe0000f005╱ // 0x275 @0xf
0x0266…02c3 at0014 = ╱ee╱)╱ // 0x27a @0x14
0x0266…02c3 at0015 = ╱ec╱,╱ // 0x27b @0x15
0x0266…02c3 at0016 = ╱45╱E╱ // 0x27c @0x16
0x0266…02c3 at0017 = ╱47╱G╱ // 0x27d @0x17
0x0266…02c3 at0018 = ╱47╱G╱ // 0x27e @0x18
0x0266…02c3 at0019 = ╱41╱A╱ // 0x27f @0x19
0x0266…02c3 at001a = ╱44╱D╱ // 0x280 @0x1a
0x0266…02c3 at001b = ╱45╱E╱ // 0x281 @0x1b
0x0266…02c3 at001c = ╱ef╱$╱ // 0x282 @0x1c
0x0266…02c3 at001d = ╱ed╱(╱ // 0x283 @0x1d
0x0266…02c3 at001e = ╱33╱3╱ // 0x284 @0x1e
0x0266…02c3 at001f = ╱30╱0╱ // 0x285 @0x1f
0x0266…02c3 at0020 = ╱fe0000f005╱ // 0x286 @0x20
0x0266…02c3 at0025 = ╱ee╱)╱ // 0x28b @0x25
0x0266…02c3 at0026 = ╱ec╱,╱ // 0x28c @0x26
0x0266…02c3 at0027 = ╱45╱E╱ // 0x28d @0x27
0x0266…02c3 at0028 = ╱47╱G╱ // 0x28e @0x28
0x0266…02c3 at0029 = ╱42╱B╱ // 0x28f @0x29
0x0266…02c3 at002a = ╱59╱Y╱ // 0x290 @0x2a
0x0266…02c3 at002b = ╱ef╱$╱ // 0x291 @0x2b
0x0266…02c3 at002c = ╱ed╱(╱ // 0x292 @0x2c
0x0266…02c3 at002d = ╱32╱2╱ // 0x293 @0x2d
0x0266…02c3 at002e = ╱30╱0╱ // 0x294 @0x2e
0x0266…02c3 at002f = ╱fe0000a005╱ // 0x295 @0x2f
0x0266…02c3 at0034 = ╱ee╱)╱ // 0x29a @0x34
0x0266…02c3 at0035 = ╱ec╱,╱ // 0x29b @0x35
0x0266…02c3 at0036 = ╱53╱S╱ // 0x29c @0x36
0x0266…02c3 at0037 = ╱54╱T╱ // 0x29d @0x37
0x0266…02c3 at0038 = ╱52╱R╱ // 0x29e @0x38
0x0266…02c3 at0039 = ╱45╱E╱ // 0x29f @0x39
0x0266…02c3 at003a = ╱47╱G╱ // 0x2a0 @0x3a
0x0266…02c3 at003b = ╱ef╱$╱ // 0x2a1 @0x3b
0x0266…02c3 at003c = ╱ed╱(╱ // 0x2a2 @0x3c
0x0266…02c3 at003d = ╱37╱7╱ // 0x2a3 @0x3d
0x0266…02c3 at003e = ╱37╱7╱ // 0x2a4 @0x3e
0x0266…02c3 at003f = ╱fe00009a07╱ // 0x2a5 @0x3f
0x0266…02c3 at0044 = ╱ee╱)╱ // 0x2aa @0x44
0x0266…02c3 at0045 = ╱ec╱,╱ // 0x2ab @0x45
0x0266…02c3 at0046 = ╱54╱T╱ // 0x2ac @0x46
0x0266…02c3 at0047 = ╱4b╱K╱ // 0x2ad @0x47
0x0266…02c3 at0048 = ╱4f╱O╱ // 0x2ae @0x48
0x0266…02c3 at0049 = ╱44╱D╱ // 0x2af @0x49
0x0266…02c3 at004a = ╱45╱E╱ // 0x2b0 @0x4a
0x0266…02c3 at004b = ╱ef╱$╱ // 0x2b1 @0x4b
0x0266…02c3 at004c = ╱ed╱(╱ // 0x2b2 @0x4c
0x0266…02c3 at004d = ╱45╱E╱ // 0x2b3 @0x4d
0x0266…02c3 at004e = ╱ee╱)╱ // 0x2b4 @0x4e
0x0266…02c3 at004f = ╱ec╱,╱ // 0x2b5 @0x4f
0x0266…02c3 at0050 = ╱45╱E╱ // 0x2b6 @0x50
0x0266…02c3 at0051 = ╱47╱G╱ // 0x2b7 @0x51
0x0266…02c3 at0052 = ╱50╱P╱ // 0x2b8 @0x52
0x0266…02c3 at0053 = ╱4f╱O╱ // 0x2b9 @0x53
0x0266…02c3 at0054 = ╱53╱S╱ // 0x2ba @0x54
0x0266…02c3 at0055 = ╱54╱T╱ // 0x2bb @0x55
0x0266…02c3 at0056 = ╱4e╱N╱ // 0x2bc @0x56
0x0266…02c3 at0057 = ╱52╱R╱ // 0x2bd @0x57
0x0266…02c3 at0058 = ╱ef╱$╱ // 0x2be @0x58
0x0266…02c3 at0059 = ╱ed╱(╱ // 0x2bf @0x59
0x0266…02c3 at005a = ╱43╱C╱ // 0x2c0 @0x5a
0x0266…02c3 at005b = ╱ee╱)╱ // 0x2c1 @0x5b
0x0266…02c3 at005c = EOL // 0x2c2 @0x5c
0x0266…02c3 }
0x02c3…030b 9062 0180 DIM K8$(F),K9$(F),K10$(F),K11$(F),K12$(F),K13$(F),K14$(F),DV$(10)
0x02c3…030b LineComalBin {
0x02c3…030b ptr = 0x9062 // 0x2c3 @0x0
0x02c3…030b lno = 0x00b4 // 0x2c5 @0x2
0x02c3…030b at0004 = ╱87╱ DIM ╱ // 0x2c7 @0x4
0x02c3…030b at0005 = ╱4b╱K╱ // 0x2c8 @0x5
0x02c3…030b at0006 = ╱38╱8╱ // 0x2c9 @0x6
0x02c3…030b at0007 = ╱ef╱$╱ // 0x2ca @0x7
0x02c3…030b at0008 = ╱ed╱(╱ // 0x2cb @0x8
0x02c3…030b at0009 = ╱46╱F╱ // 0x2cc @0x9
0x02c3…030b at000a = ╱ee╱)╱ // 0x2cd @0xa
0x02c3…030b at000b = ╱ec╱,╱ // 0x2ce @0xb
0x02c3…030b at000c = ╱4b╱K╱ // 0x2cf @0xc
0x02c3…030b at000d = ╱39╱9╱ // 0x2d0 @0xd
0x02c3…030b at000e = ╱ef╱$╱ // 0x2d1 @0xe
0x02c3…030b at000f = ╱ed╱(╱ // 0x2d2 @0xf
0x02c3…030b at0010 = ╱46╱F╱ // 0x2d3 @0x10
0x02c3…030b at0011 = ╱ee╱)╱ // 0x2d4 @0x11
0x02c3…030b at0012 = ╱ec╱,╱ // 0x2d5 @0x12
0x02c3…030b at0013 = ╱4b╱K╱ // 0x2d6 @0x13
0x02c3…030b at0014 = ╱31╱1╱ // 0x2d7 @0x14
0x02c3…030b at0015 = ╱30╱0╱ // 0x2d8 @0x15
0x02c3…030b at0016 = ╱ef╱$╱ // 0x2d9 @0x16
0x02c3…030b at0017 = ╱ed╱(╱ // 0x2da @0x17
0x02c3…030b at0018 = ╱46╱F╱ // 0x2db @0x18
0x02c3…030b at0019 = ╱ee╱)╱ // 0x2dc @0x19
0x02c3…030b at001a = ╱ec╱,╱ // 0x2dd @0x1a
0x02c3…030b at001b = ╱4b╱K╱ // 0x2de @0x1b
0x02c3…030b at001c = ╱31╱1╱ // 0x2df @0x1c
0x02c3…030b at001d = ╱31╱1╱ // 0x2e0 @0x1d
0x02c3…030b at001e = ╱ef╱$╱ // 0x2e1 @0x1e
0x02c3…030b at001f = ╱ed╱(╱ // 0x2e2 @0x1f
0x02c3…030b at0020 = ╱46╱F╱ // 0x2e3 @0x20
0x02c3…030b at0021 = ╱ee╱)╱ // 0x2e4 @0x21
0x02c3…030b at0022 = ╱ec╱,╱ // 0x2e5 @0x22
0x02c3…030b at0023 = ╱4b╱K╱ // 0x2e6 @0x23
0x02c3…030b at0024 = ╱31╱1╱ // 0x2e7 @0x24
0x02c3…030b at0025 = ╱32╱2╱ // 0x2e8 @0x25
0x02c3…030b at0026 = ╱ef╱$╱ // 0x2e9 @0x26
0x02c3…030b at0027 = ╱ed╱(╱ // 0x2ea @0x27
0x02c3…030b at0028 = ╱46╱F╱ // 0x2eb @0x28
0x02c3…030b at0029 = ╱ee╱)╱ // 0x2ec @0x29
0x02c3…030b at002a = ╱ec╱,╱ // 0x2ed @0x2a
0x02c3…030b at002b = ╱4b╱K╱ // 0x2ee @0x2b
0x02c3…030b at002c = ╱31╱1╱ // 0x2ef @0x2c
0x02c3…030b at002d = ╱33╱3╱ // 0x2f0 @0x2d
0x02c3…030b at002e = ╱ef╱$╱ // 0x2f1 @0x2e
0x02c3…030b at002f = ╱ed╱(╱ // 0x2f2 @0x2f
0x02c3…030b at0030 = ╱46╱F╱ // 0x2f3 @0x30
0x02c3…030b at0031 = ╱ee╱)╱ // 0x2f4 @0x31
0x02c3…030b at0032 = ╱ec╱,╱ // 0x2f5 @0x32
0x02c3…030b at0033 = ╱4b╱K╱ // 0x2f6 @0x33
0x02c3…030b at0034 = ╱31╱1╱ // 0x2f7 @0x34
0x02c3…030b at0035 = ╱34╱4╱ // 0x2f8 @0x35
0x02c3…030b at0036 = ╱ef╱$╱ // 0x2f9 @0x36
0x02c3…030b at0037 = ╱ed╱(╱ // 0x2fa @0x37
0x02c3…030b at0038 = ╱46╱F╱ // 0x2fb @0x38
0x02c3…030b at0039 = ╱ee╱)╱ // 0x2fc @0x39
0x02c3…030b at003a = ╱ec╱,╱ // 0x2fd @0x3a
0x02c3…030b at003b = ╱44╱D╱ // 0x2fe @0x3b
0x02c3…030b at003c = ╱56╱V╱ // 0x2ff @0x3c
0x02c3…030b at003d = ╱ef╱$╱ // 0x300 @0x3d
0x02c3…030b at003e = ╱ed╱(╱ // 0x301 @0x3e
0x02c3…030b at003f = ╱31╱1╱ // 0x302 @0x3f
0x02c3…030b at0040 = ╱30╱0╱ // 0x303 @0x40
0x02c3…030b at0041 = ╱fe0000a004╱ // 0x304 @0x41
0x02c3…030b at0046 = ╱ee╱)╱ // 0x309 @0x46
0x02c3…030b at0047 = EOL // 0x30a @0x47
0x02c3…030b }
0x030b…0354 90ab 0190 DIM T1(W),T2(W),T3(W),KRENAVN$(U),KREGADE$(U),KREBY$(20),KRELK$(E)
0x030b…0354 LineComalBin {
0x030b…0354 ptr = 0x90ab // 0x30b @0x0
0x030b…0354 lno = 0x00be // 0x30d @0x2
0x030b…0354 at0004 = ╱87╱ DIM ╱ // 0x30f @0x4
0x030b…0354 at0005 = ╱54╱T╱ // 0x310 @0x5
0x030b…0354 at0006 = ╱31╱1╱ // 0x311 @0x6
0x030b…0354 at0007 = ╱ed╱(╱ // 0x312 @0x7
0x030b…0354 at0008 = ╱57╱W╱ // 0x313 @0x8
0x030b…0354 at0009 = ╱ee╱)╱ // 0x314 @0x9
0x030b…0354 at000a = ╱ec╱,╱ // 0x315 @0xa
0x030b…0354 at000b = ╱54╱T╱ // 0x316 @0xb
0x030b…0354 at000c = ╱32╱2╱ // 0x317 @0xc
0x030b…0354 at000d = ╱ed╱(╱ // 0x318 @0xd
0x030b…0354 at000e = ╱57╱W╱ // 0x319 @0xe
0x030b…0354 at000f = ╱ee╱)╱ // 0x31a @0xf
0x030b…0354 at0010 = ╱ec╱,╱ // 0x31b @0x10
0x030b…0354 at0011 = ╱54╱T╱ // 0x31c @0x11
0x030b…0354 at0012 = ╱33╱3╱ // 0x31d @0x12
0x030b…0354 at0013 = ╱ed╱(╱ // 0x31e @0x13
0x030b…0354 at0014 = ╱57╱W╱ // 0x31f @0x14
0x030b…0354 at0015 = ╱ee╱)╱ // 0x320 @0x15
0x030b…0354 at0016 = ╱ec╱,╱ // 0x321 @0x16
0x030b…0354 at0017 = ╱4b╱K╱ // 0x322 @0x17
0x030b…0354 at0018 = ╱52╱R╱ // 0x323 @0x18
0x030b…0354 at0019 = ╱45╱E╱ // 0x324 @0x19
0x030b…0354 at001a = ╱4e╱N╱ // 0x325 @0x1a
0x030b…0354 at001b = ╱41╱A╱ // 0x326 @0x1b
0x030b…0354 at001c = ╱56╱V╱ // 0x327 @0x1c
0x030b…0354 at001d = ╱4e╱N╱ // 0x328 @0x1d
0x030b…0354 at001e = ╱ef╱$╱ // 0x329 @0x1e
0x030b…0354 at001f = ╱ed╱(╱ // 0x32a @0x1f
0x030b…0354 at0020 = ╱55╱U╱ // 0x32b @0x20
0x030b…0354 at0021 = ╱ee╱)╱ // 0x32c @0x21
0x030b…0354 at0022 = ╱ec╱,╱ // 0x32d @0x22
0x030b…0354 at0023 = ╱4b╱K╱ // 0x32e @0x23
0x030b…0354 at0024 = ╱52╱R╱ // 0x32f @0x24
0x030b…0354 at0025 = ╱45╱E╱ // 0x330 @0x25
0x030b…0354 at0026 = ╱47╱G╱ // 0x331 @0x26
0x030b…0354 at0027 = ╱41╱A╱ // 0x332 @0x27
0x030b…0354 at0028 = ╱44╱D╱ // 0x333 @0x28
0x030b…0354 at0029 = ╱45╱E╱ // 0x334 @0x29
0x030b…0354 at002a = ╱ef╱$╱ // 0x335 @0x2a
0x030b…0354 at002b = ╱ed╱(╱ // 0x336 @0x2b
0x030b…0354 at002c = ╱55╱U╱ // 0x337 @0x2c
0x030b…0354 at002d = ╱ee╱)╱ // 0x338 @0x2d
0x030b…0354 at002e = ╱ec╱,╱ // 0x339 @0x2e
0x030b…0354 at002f = ╱4b╱K╱ // 0x33a @0x2f
0x030b…0354 at0030 = ╱52╱R╱ // 0x33b @0x30
0x030b…0354 at0031 = ╱45╱E╱ // 0x33c @0x31
0x030b…0354 at0032 = ╱42╱B╱ // 0x33d @0x32
0x030b…0354 at0033 = ╱59╱Y╱ // 0x33e @0x33
0x030b…0354 at0034 = ╱ef╱$╱ // 0x33f @0x34
0x030b…0354 at0035 = ╱ed╱(╱ // 0x340 @0x35
0x030b…0354 at0036 = ╱32╱2╱ // 0x341 @0x36
0x030b…0354 at0037 = ╱30╱0╱ // 0x342 @0x37
0x030b…0354 at0038 = ╱fe0000a005╱ // 0x343 @0x38
0x030b…0354 at003d = ╱ee╱)╱ // 0x348 @0x3d
0x030b…0354 at003e = ╱ec╱,╱ // 0x349 @0x3e
0x030b…0354 at003f = ╱4b╱K╱ // 0x34a @0x3f
0x030b…0354 at0040 = ╱52╱R╱ // 0x34b @0x40
0x030b…0354 at0041 = ╱45╱E╱ // 0x34c @0x41
0x030b…0354 at0042 = ╱4c╱L╱ // 0x34d @0x42
0x030b…0354 at0043 = ╱4b╱K╱ // 0x34e @0x43
0x030b…0354 at0044 = ╱ef╱$╱ // 0x34f @0x44
0x030b…0354 at0045 = ╱ed╱(╱ // 0x350 @0x45
0x030b…0354 at0046 = ╱45╱E╱ // 0x351 @0x46
0x030b…0354 at0047 = ╱ee╱)╱ // 0x352 @0x47
0x030b…0354 at0048 = EOL // 0x353 @0x48
0x030b…0354 }
0x0354…039c 90f3 0200 DIM KSALDO1$(D),KSALDO2$(D),LTX$(11,52),LAND$(W,D),KREGR$(E)
0x0354…039c LineComalBin {
0x0354…039c ptr = 0x90f3 // 0x354 @0x0
0x0354…039c lno = 0x00c8 // 0x356 @0x2
0x0354…039c at0004 = ╱87╱ DIM ╱ // 0x358 @0x4
0x0354…039c at0005 = ╱4b╱K╱ // 0x359 @0x5
0x0354…039c at0006 = ╱53╱S╱ // 0x35a @0x6
0x0354…039c at0007 = ╱41╱A╱ // 0x35b @0x7
0x0354…039c at0008 = ╱4c╱L╱ // 0x35c @0x8
0x0354…039c at0009 = ╱44╱D╱ // 0x35d @0x9
0x0354…039c at000a = ╱4f╱O╱ // 0x35e @0xa
0x0354…039c at000b = ╱31╱1╱ // 0x35f @0xb
0x0354…039c at000c = ╱ef╱$╱ // 0x360 @0xc
0x0354…039c at000d = ╱ed╱(╱ // 0x361 @0xd
0x0354…039c at000e = ╱44╱D╱ // 0x362 @0xe
0x0354…039c at000f = ╱ee╱)╱ // 0x363 @0xf
0x0354…039c at0010 = ╱ec╱,╱ // 0x364 @0x10
0x0354…039c at0011 = ╱4b╱K╱ // 0x365 @0x11
0x0354…039c at0012 = ╱53╱S╱ // 0x366 @0x12
0x0354…039c at0013 = ╱41╱A╱ // 0x367 @0x13
0x0354…039c at0014 = ╱4c╱L╱ // 0x368 @0x14
0x0354…039c at0015 = ╱44╱D╱ // 0x369 @0x15
0x0354…039c at0016 = ╱4f╱O╱ // 0x36a @0x16
0x0354…039c at0017 = ╱32╱2╱ // 0x36b @0x17
0x0354…039c at0018 = ╱ef╱$╱ // 0x36c @0x18
0x0354…039c at0019 = ╱ed╱(╱ // 0x36d @0x19
0x0354…039c at001a = ╱44╱D╱ // 0x36e @0x1a
0x0354…039c at001b = ╱ee╱)╱ // 0x36f @0x1b
0x0354…039c at001c = ╱ec╱,╱ // 0x370 @0x1c
0x0354…039c at001d = ╱4c╱L╱ // 0x371 @0x1d
0x0354…039c at001e = ╱54╱T╱ // 0x372 @0x1e
0x0354…039c at001f = ╱58╱X╱ // 0x373 @0x1f
0x0354…039c at0020 = ╱ef╱$╱ // 0x374 @0x20
0x0354…039c at0021 = ╱ed╱(╱ // 0x375 @0x21
0x0354…039c at0022 = ╱31╱1╱ // 0x376 @0x22
0x0354…039c at0023 = ╱31╱1╱ // 0x377 @0x23
0x0354…039c at0024 = ╱fe0000b004╱ // 0x378 @0x24
0x0354…039c at0029 = ╱ec╱,╱ // 0x37d @0x29
0x0354…039c at002a = ╱35╱5╱ // 0x37e @0x2a
0x0354…039c at002b = ╱32╱2╱ // 0x37f @0x2b
0x0354…039c at002c = ╱fe0000d006╱ // 0x380 @0x2c
0x0354…039c at0031 = ╱ee╱)╱ // 0x385 @0x31
0x0354…039c at0032 = ╱ec╱,╱ // 0x386 @0x32
0x0354…039c at0033 = ╱4c╱L╱ // 0x387 @0x33
0x0354…039c at0034 = ╱41╱A╱ // 0x388 @0x34
0x0354…039c at0035 = ╱4e╱N╱ // 0x389 @0x35
0x0354…039c at0036 = ╱44╱D╱ // 0x38a @0x36
0x0354…039c at0037 = ╱ef╱$╱ // 0x38b @0x37
0x0354…039c at0038 = ╱ed╱(╱ // 0x38c @0x38
0x0354…039c at0039 = ╱57╱W╱ // 0x38d @0x39
0x0354…039c at003a = ╱ec╱,╱ // 0x38e @0x3a
0x0354…039c at003b = ╱44╱D╱ // 0x38f @0x3b
0x0354…039c at003c = ╱ee╱)╱ // 0x390 @0x3c
0x0354…039c at003d = ╱ec╱,╱ // 0x391 @0x3d
0x0354…039c at003e = ╱4b╱K╱ // 0x392 @0x3e
0x0354…039c at003f = ╱52╱R╱ // 0x393 @0x3f
0x0354…039c at0040 = ╱45╱E╱ // 0x394 @0x40
0x0354…039c at0041 = ╱47╱G╱ // 0x395 @0x41
0x0354…039c at0042 = ╱52╱R╱ // 0x396 @0x42
0x0354…039c at0043 = ╱ef╱$╱ // 0x397 @0x43
0x0354…039c at0044 = ╱ed╱(╱ // 0x398 @0x44
0x0354…039c at0045 = ╱45╱E╱ // 0x399 @0x45
0x0354…039c at0046 = ╱ee╱)╱ // 0x39a @0x46
0x0354…039c at0047 = EOL // 0x39b @0x47
0x0354…039c }
0x039c…03c9 (12,) 9120 0210 DIM UBEL1$(M),UBEL2$(M),UBEL3$(M),UBEL4$(M)
0x039c…03c9 LineComalBin {
0x039c…03c9 ptr = 0x9120 // 0x39c @0x0
0x039c…03c9 lno = 0x00d2 // 0x39e @0x2
0x039c…03c9 at0004 = ╱87╱ DIM ╱ // 0x3a0 @0x4
0x039c…03c9 at0005 = ╱55╱U╱ // 0x3a1 @0x5
0x039c…03c9 at0006 = ╱42╱B╱ // 0x3a2 @0x6
0x039c…03c9 at0007 = ╱45╱E╱ // 0x3a3 @0x7
0x039c…03c9 at0008 = ╱4c╱L╱ // 0x3a4 @0x8
0x039c…03c9 at0009 = ╱31╱1╱ // 0x3a5 @0x9
0x039c…03c9 at000a = ╱ef╱$╱ // 0x3a6 @0xa
0x039c…03c9 at000b = ╱ed╱(╱ // 0x3a7 @0xb
0x039c…03c9 at000c = ╱4d╱M╱ // 0x3a8 @0xc
0x039c…03c9 at000d = ╱ee╱)╱ // 0x3a9 @0xd
0x039c…03c9 at000e = ╱ec╱,╱ // 0x3aa @0xe
0x039c…03c9 at000f = ╱55╱U╱ // 0x3ab @0xf
0x039c…03c9 at0010 = ╱42╱B╱ // 0x3ac @0x10
0x039c…03c9 at0011 = ╱45╱E╱ // 0x3ad @0x11
0x039c…03c9 at0012 = ╱4c╱L╱ // 0x3ae @0x12
0x039c…03c9 at0013 = ╱32╱2╱ // 0x3af @0x13
0x039c…03c9 at0014 = ╱ef╱$╱ // 0x3b0 @0x14
0x039c…03c9 at0015 = ╱ed╱(╱ // 0x3b1 @0x15
0x039c…03c9 at0016 = ╱4d╱M╱ // 0x3b2 @0x16
0x039c…03c9 at0017 = ╱ee╱)╱ // 0x3b3 @0x17
0x039c…03c9 at0018 = ╱ec╱,╱ // 0x3b4 @0x18
0x039c…03c9 at0019 = ╱55╱U╱ // 0x3b5 @0x19
0x039c…03c9 at001a = ╱42╱B╱ // 0x3b6 @0x1a
0x039c…03c9 at001b = ╱45╱E╱ // 0x3b7 @0x1b
0x039c…03c9 at001c = ╱4c╱L╱ // 0x3b8 @0x1c
0x039c…03c9 at001d = ╱33╱3╱ // 0x3b9 @0x1d
0x039c…03c9 at001e = ╱ef╱$╱ // 0x3ba @0x1e
0x039c…03c9 at001f = ╱ed╱(╱ // 0x3bb @0x1f
0x039c…03c9 at0020 = ╱4d╱M╱ // 0x3bc @0x20
0x039c…03c9 at0021 = ╱ee╱)╱ // 0x3bd @0x21
0x039c…03c9 at0022 = ╱ec╱,╱ // 0x3be @0x22
0x039c…03c9 at0023 = ╱55╱U╱ // 0x3bf @0x23
0x039c…03c9 at0024 = ╱42╱B╱ // 0x3c0 @0x24
0x039c…03c9 at0025 = ╱45╱E╱ // 0x3c1 @0x25
0x039c…03c9 at0026 = ╱4c╱L╱ // 0x3c2 @0x26
0x039c…03c9 at0027 = ╱34╱4╱ // 0x3c3 @0x27
0x039c…03c9 at0028 = ╱ef╱$╱ // 0x3c4 @0x28
0x039c…03c9 at0029 = ╱ed╱(╱ // 0x3c5 @0x29
0x039c…03c9 at002a = ╱4d╱M╱ // 0x3c6 @0x2a
0x039c…03c9 at002b = ╱ee╱)╱ // 0x3c7 @0x2b
0x039c…03c9 at002c = EOL // 0x3c8 @0x2c
0x039c…03c9 }
0x03c9…03e1 9138 0220 PROC CALC(AR3,B1,B2,ES)
0x03c9…03e1 LineComalBin {
0x03c9…03e1 ptr = 0x9138 // 0x3c9 @0x0
0x03c9…03e1 lno = 0x00dc // 0x3cb @0x2
0x03c9…03e1 at0004 = ╱9e╱ PROC ╱ // 0x3cd @0x4
0x03c9…03e1 at0005 = ╱43╱C╱ // 0x3ce @0x5
0x03c9…03e1 at0006 = ╱41╱A╱ // 0x3cf @0x6
0x03c9…03e1 at0007 = ╱4c╱L╱ // 0x3d0 @0x7
0x03c9…03e1 at0008 = ╱43╱C╱ // 0x3d1 @0x8
0x03c9…03e1 at0009 = ╱ed╱(╱ // 0x3d2 @0x9
0x03c9…03e1 at000a = ╱41╱A╱ // 0x3d3 @0xa
0x03c9…03e1 at000b = ╱52╱R╱ // 0x3d4 @0xb
0x03c9…03e1 at000c = ╱33╱3╱ // 0x3d5 @0xc
0x03c9…03e1 at000d = ╱ec╱,╱ // 0x3d6 @0xd
0x03c9…03e1 at000e = ╱42╱B╱ // 0x3d7 @0xe
0x03c9…03e1 at000f = ╱31╱1╱ // 0x3d8 @0xf
0x03c9…03e1 at0010 = ╱ec╱,╱ // 0x3d9 @0x10
0x03c9…03e1 at0011 = ╱42╱B╱ // 0x3da @0x11
0x03c9…03e1 at0012 = ╱32╱2╱ // 0x3db @0x12
0x03c9…03e1 at0013 = ╱ec╱,╱ // 0x3dc @0x13
0x03c9…03e1 at0014 = ╱45╱E╱ // 0x3dd @0x14
0x03c9…03e1 at0015 = ╱53╱S╱ // 0x3de @0x15
0x03c9…03e1 at0016 = ╱ee╱)╱ // 0x3df @0x16
0x03c9…03e1 at0017 = EOL // 0x3e0 @0x17
0x03c9…03e1 }
0x03e1…0428 917f 0230 OP1$=B1$;OP2$=B2$;RES$=ES$;SI=B;FLAG=B;ART=AR3-6*(AR3>5)
0x03e1…0428 LineComalBin {
0x03e1…0428 ptr = 0x917f // 0x3e1 @0x0
0x03e1…0428 lno = 0x00e6 // 0x3e3 @0x2
0x03e1…0428 at0004 = ╱4f╱O╱ // 0x3e5 @0x4
0x03e1…0428 at0005 = ╱50╱P╱ // 0x3e6 @0x5
0x03e1…0428 at0006 = ╱31╱1╱ // 0x3e7 @0x6
0x03e1…0428 at0007 = ╱ef╱$╱ // 0x3e8 @0x7
0x03e1…0428 at0008 = ╱dc╱=╱ // 0x3e9 @0x8
0x03e1…0428 at0009 = ╱42╱B╱ // 0x3ea @0x9
0x03e1…0428 at000a = ╱31╱1╱ // 0x3eb @0xa
0x03e1…0428 at000b = ╱ef╱$╱ // 0x3ec @0xb
0x03e1…0428 at000c = ╱eb╱;╱ // 0x3ed @0xc
0x03e1…0428 at000d = ╱4f╱O╱ // 0x3ee @0xd
0x03e1…0428 at000e = ╱50╱P╱ // 0x3ef @0xe
0x03e1…0428 at000f = ╱32╱2╱ // 0x3f0 @0xf
0x03e1…0428 at0010 = ╱ef╱$╱ // 0x3f1 @0x10
0x03e1…0428 at0011 = ╱dc╱=╱ // 0x3f2 @0x11
0x03e1…0428 at0012 = ╱42╱B╱ // 0x3f3 @0x12
0x03e1…0428 at0013 = ╱32╱2╱ // 0x3f4 @0x13
0x03e1…0428 at0014 = ╱ef╱$╱ // 0x3f5 @0x14
0x03e1…0428 at0015 = ╱eb╱;╱ // 0x3f6 @0x15
0x03e1…0428 at0016 = ╱52╱R╱ // 0x3f7 @0x16
0x03e1…0428 at0017 = ╱45╱E╱ // 0x3f8 @0x17
0x03e1…0428 at0018 = ╱53╱S╱ // 0x3f9 @0x18
0x03e1…0428 at0019 = ╱ef╱$╱ // 0x3fa @0x19
0x03e1…0428 at001a = ╱dc╱=╱ // 0x3fb @0x1a
0x03e1…0428 at001b = ╱45╱E╱ // 0x3fc @0x1b
0x03e1…0428 at001c = ╱53╱S╱ // 0x3fd @0x1c
0x03e1…0428 at001d = ╱ef╱$╱ // 0x3fe @0x1d
0x03e1…0428 at001e = ╱eb╱;╱ // 0x3ff @0x1e
0x03e1…0428 at001f = ╱53╱S╱ // 0x400 @0x1f
0x03e1…0428 at0020 = ╱49╱I╱ // 0x401 @0x20
0x03e1…0428 at0021 = ╱dc╱=╱ // 0x402 @0x21
0x03e1…0428 at0022 = ╱42╱B╱ // 0x403 @0x22
0x03e1…0428 at0023 = ╱eb╱;╱ // 0x404 @0x23
0x03e1…0428 at0024 = ╱46╱F╱ // 0x405 @0x24
0x03e1…0428 at0025 = ╱4c╱L╱ // 0x406 @0x25
0x03e1…0428 at0026 = ╱41╱A╱ // 0x407 @0x26
0x03e1…0428 at0027 = ╱47╱G╱ // 0x408 @0x27
0x03e1…0428 at0028 = ╱dc╱=╱ // 0x409 @0x28
0x03e1…0428 at0029 = ╱42╱B╱ // 0x40a @0x29
0x03e1…0428 at002a = ╱eb╱;╱ // 0x40b @0x2a
0x03e1…0428 at002b = ╱41╱A╱ // 0x40c @0x2b
0x03e1…0428 at002c = ╱52╱R╱ // 0x40d @0x2c
0x03e1…0428 at002d = ╱54╱T╱ // 0x40e @0x2d
0x03e1…0428 at002e = ╱dc╱=╱ // 0x40f @0x2e
0x03e1…0428 at002f = ╱41╱A╱ // 0x410 @0x2f
0x03e1…0428 at0030 = ╱52╱R╱ // 0x411 @0x30
0x03e1…0428 at0031 = ╱33╱3╱ // 0x412 @0x31
0x03e1…0428 at0032 = ╱e3╱-╱ // 0x413 @0x32
0x03e1…0428 at0033 = ╱36╱6╱ // 0x414 @0x33
0x03e1…0428 at0034 = ╱fe0000c003╱ // 0x415 @0x34
0x03e1…0428 at0039 = ╱e4╱*╱ // 0x41a @0x39
0x03e1…0428 at003a = ╱ed╱(╱ // 0x41b @0x3a
0x03e1…0428 at003b = ╱41╱A╱ // 0x41c @0x3b
0x03e1…0428 at003c = ╱52╱R╱ // 0x41d @0x3c
0x03e1…0428 at003d = ╱33╱3╱ // 0x41e @0x3d
0x03e1…0428 at003e = ╱de╱>╱ // 0x41f @0x3e
0x03e1…0428 at003f = ╱35╱5╱ // 0x420 @0x3f
0x03e1…0428 at0040 = ╱fe0000a003╱ // 0x421 @0x40
0x03e1…0428 at0045 = ╱ee╱)╱ // 0x426 @0x45
0x03e1…0428 at0046 = EOL // 0x427 @0x46
0x03e1…0428 }
0x0428…043e 9195 0240 CALL "P641210:REGN"
0x0428…043e LineComalBin {
0x0428…043e ptr = 0x9195 // 0x428 @0x0
0x0428…043e lno = 0x00f0 // 0x42a @0x2
0x0428…043e at0004 = ╱ad4147╱ CALL ╱ // 0x42c @0x4
0x0428…043e at0007 = ╱22╱"╱ // 0x42f @0x7
0x0428…043e at0008 = ╱50╱P╱ // 0x430 @0x8
0x0428…043e at0009 = ╱36╱6╱ // 0x431 @0x9
0x0428…043e at000a = ╱34╱4╱ // 0x432 @0xa
0x0428…043e at000b = ╱31╱1╱ // 0x433 @0xb
0x0428…043e at000c = ╱32╱2╱ // 0x434 @0xc
0x0428…043e at000d = ╱31╱1╱ // 0x435 @0xd
0x0428…043e at000e = ╱30╱0╱ // 0x436 @0xe
0x0428…043e at000f = ╱3a╱:╱ // 0x437 @0xf
0x0428…043e at0010 = ╱52╱R╱ // 0x438 @0x10
0x0428…043e at0011 = ╱45╱E╱ // 0x439 @0x11
0x0428…043e at0012 = ╱47╱G╱ // 0x43a @0x12
0x0428…043e at0013 = ╱4e╱N╱ // 0x43b @0x13
0x0428…043e at0014 = ╱22╱"╱ // 0x43c @0x14
0x0428…043e at0015 = EOL // 0x43d @0x15
0x0428…043e }
0x043e…044b 91a2 0250 ES$=RES$
0x043e…044b LineComalBin {
0x043e…044b ptr = 0x91a2 // 0x43e @0x0
0x043e…044b lno = 0x00fa // 0x440 @0x2
0x043e…044b at0004 = ╱45╱E╱ // 0x442 @0x4
0x043e…044b at0005 = ╱53╱S╱ // 0x443 @0x5
0x043e…044b at0006 = ╱ef╱$╱ // 0x444 @0x6
0x043e…044b at0007 = ╱dc╱=╱ // 0x445 @0x7
0x043e…044b at0008 = ╱52╱R╱ // 0x446 @0x8
0x043e…044b at0009 = ╱45╱E╱ // 0x447 @0x9
0x043e…044b at000a = ╱53╱S╱ // 0x448 @0xa
0x043e…044b at000b = ╱ef╱$╱ // 0x449 @0xb
0x043e…044b at000c = EOL // 0x44a @0xc
0x043e…044b }
0x044b…0463 91ba 0260 IF AR3<6 THEN IF FLAG THEN STOP
0x044b…0463 LineComalBin {
0x044b…0463 ptr = 0x91ba // 0x44b @0x0
0x044b…0463 lno = 0x0104 // 0x44d @0x2
0x044b…0463 at0004 = ╱82╱ IF ╱ // 0x44f @0x4
0x044b…0463 at0005 = ╱41╱A╱ // 0x450 @0x5
0x044b…0463 at0006 = ╱52╱R╱ // 0x451 @0x6
0x044b…0463 at0007 = ╱33╱3╱ // 0x452 @0x7
0x044b…0463 at0008 = ╱dd╱<╱ // 0x453 @0x8
0x044b…0463 at0009 = ╱36╱6╱ // 0x454 @0x9
0x044b…0463 at000a = ╱fe0000c003╱ // 0x455 @0xa
0x044b…0463 at000f = ╱b6╱ THEN ╱ // 0x45a @0xf
0x044b…0463 at0010 = ╱82╱ IF ╱ // 0x45b @0x10
0x044b…0463 at0011 = ╱46╱F╱ // 0x45c @0x11
0x044b…0463 at0012 = ╱4c╱L╱ // 0x45d @0x12
0x044b…0463 at0013 = ╱41╱A╱ // 0x45e @0x13
0x044b…0463 at0014 = ╱47╱G╱ // 0x45f @0x14
0x044b…0463 at0015 = ╱b6╱ THEN ╱ // 0x460 @0x15
0x044b…0463 at0016 = ╱8d╱ STOP ╱ // 0x461 @0x16
0x044b…0463 at0017 = EOL // 0x462 @0x17
0x044b…0463 }
0x0463…0469 91c0 0290 ENDPROC
0x0463…0469 LineComalBin {
0x0463…0469 ptr = 0x91c0 // 0x463 @0x0
0x0463…0469 lno = 0x0122 // 0x465 @0x2
0x0463…0469 at0004 = ╱9f╱ ENDPROC ╱ // 0x467 @0x4
0x0463…0469 at0005 = EOL // 0x468 @0x5
0x0463…0469 }
0x0469…0486 91dd 0300 PROC TUD(BLB,UBLB,TEGN,STØR)
0x0469…0486 LineComalBin {
0x0469…0486 ptr = 0x91dd // 0x469 @0x0
0x0469…0486 lno = 0x012c // 0x46b @0x2
0x0469…0486 at0004 = ╱9e╱ PROC ╱ // 0x46d @0x4
0x0469…0486 at0005 = ╱54╱T╱ // 0x46e @0x5
0x0469…0486 at0006 = ╱55╱U╱ // 0x46f @0x6
0x0469…0486 at0007 = ╱44╱D╱ // 0x470 @0x7
0x0469…0486 at0008 = ╱ed╱(╱ // 0x471 @0x8
0x0469…0486 at0009 = ╱42╱B╱ // 0x472 @0x9
0x0469…0486 at000a = ╱4c╱L╱ // 0x473 @0xa
0x0469…0486 at000b = ╱42╱B╱ // 0x474 @0xb
0x0469…0486 at000c = ╱ec╱,╱ // 0x475 @0xc
0x0469…0486 at000d = ╱55╱U╱ // 0x476 @0xd
0x0469…0486 at000e = ╱42╱B╱ // 0x477 @0xe
0x0469…0486 at000f = ╱4c╱L╱ // 0x478 @0xf
0x0469…0486 at0010 = ╱42╱B╱ // 0x479 @0x10
0x0469…0486 at0011 = ╱ec╱,╱ // 0x47a @0x11
0x0469…0486 at0012 = ╱54╱T╱ // 0x47b @0x12
0x0469…0486 at0013 = ╱45╱E╱ // 0x47c @0x13
0x0469…0486 at0014 = ╱47╱G╱ // 0x47d @0x14
0x0469…0486 at0015 = ╱4e╱N╱ // 0x47e @0x15
0x0469…0486 at0016 = ╱ec╱,╱ // 0x47f @0x16
0x0469…0486 at0017 = ╱53╱S╱ // 0x480 @0x17
0x0469…0486 at0018 = ╱54╱T╱ // 0x481 @0x18
0x0469…0486 at0019 = ╱5c╱Ø╱ // 0x482 @0x19
0x0469…0486 at001a = ╱52╱R╱ // 0x483 @0x1a
0x0469…0486 at001b = ╱ee╱)╱ // 0x484 @0x1b
0x0469…0486 at001c = EOL // 0x485 @0x1c
0x0469…0486 }
0x0486…04a8 91ff 0310 EXEC CALC(5,BLB$,TAH$,UBLB$)
0x0486…04a8 LineComalBin {
0x0486…04a8 ptr = 0x91ff // 0x486 @0x0
0x0486…04a8 lno = 0x0136 // 0x488 @0x2
0x0486…04a8 at0004 = ╱9d╱ EXEC ╱ // 0x48a @0x4
0x0486…04a8 at0005 = ╱43╱C╱ // 0x48b @0x5
0x0486…04a8 at0006 = ╱41╱A╱ // 0x48c @0x6
0x0486…04a8 at0007 = ╱4c╱L╱ // 0x48d @0x7
0x0486…04a8 at0008 = ╱43╱C╱ // 0x48e @0x8
0x0486…04a8 at0009 = ╱ed╱(╱ // 0x48f @0x9
0x0486…04a8 at000a = ╱35╱5╱ // 0x490 @0xa
0x0486…04a8 at000b = ╱fe0000a003╱ // 0x491 @0xb
0x0486…04a8 at0010 = ╱ec╱,╱ // 0x496 @0x10
0x0486…04a8 at0011 = ╱42╱B╱ // 0x497 @0x11
0x0486…04a8 at0012 = ╱4c╱L╱ // 0x498 @0x12
0x0486…04a8 at0013 = ╱42╱B╱ // 0x499 @0x13
0x0486…04a8 at0014 = ╱ef╱$╱ // 0x49a @0x14
0x0486…04a8 at0015 = ╱ec╱,╱ // 0x49b @0x15
0x0486…04a8 at0016 = ╱54╱T╱ // 0x49c @0x16
0x0486…04a8 at0017 = ╱41╱A╱ // 0x49d @0x17
0x0486…04a8 at0018 = ╱48╱H╱ // 0x49e @0x18
0x0486…04a8 at0019 = ╱ef╱$╱ // 0x49f @0x19
0x0486…04a8 at001a = ╱ec╱,╱ // 0x4a0 @0x1a
0x0486…04a8 at001b = ╱55╱U╱ // 0x4a1 @0x1b
0x0486…04a8 at001c = ╱42╱B╱ // 0x4a2 @0x1c
0x0486…04a8 at001d = ╱4c╱L╱ // 0x4a3 @0x1d
0x0486…04a8 at001e = ╱42╱B╱ // 0x4a4 @0x1e
0x0486…04a8 at001f = ╱ef╱$╱ // 0x4a5 @0x1f
0x0486…04a8 at0020 = ╱ee╱)╱ // 0x4a6 @0x20
0x0486…04a8 at0021 = EOL // 0x4a7 @0x21
0x0486…04a8 }
0x04a8…04cb 9222 0320 IF TEGN=B THEN UBLB$=UBLB$(E:13)
0x04a8…04cb LineComalBin {
0x04a8…04cb ptr = 0x9222 // 0x4a8 @0x0
0x04a8…04cb lno = 0x0140 // 0x4aa @0x2
0x04a8…04cb at0004 = ╱82╱ IF ╱ // 0x4ac @0x4
0x04a8…04cb at0005 = ╱54╱T╱ // 0x4ad @0x5
0x04a8…04cb at0006 = ╱45╱E╱ // 0x4ae @0x6
0x04a8…04cb at0007 = ╱47╱G╱ // 0x4af @0x7
0x04a8…04cb at0008 = ╱4e╱N╱ // 0x4b0 @0x8
0x04a8…04cb at0009 = ╱dc╱=╱ // 0x4b1 @0x9
0x04a8…04cb at000a = ╱42╱B╱ // 0x4b2 @0xa
0x04a8…04cb at000b = ╱b6╱ THEN ╱ // 0x4b3 @0xb
0x04a8…04cb at000c = ╱55╱U╱ // 0x4b4 @0xc
0x04a8…04cb at000d = ╱42╱B╱ // 0x4b5 @0xd
0x04a8…04cb at000e = ╱4c╱L╱ // 0x4b6 @0xe
0x04a8…04cb at000f = ╱42╱B╱ // 0x4b7 @0xf
0x04a8…04cb at0010 = ╱ef╱$╱ // 0x4b8 @0x10
0x04a8…04cb at0011 = ╱dc╱=╱ // 0x4b9 @0x11
0x04a8…04cb at0012 = ╱55╱U╱ // 0x4ba @0x12
0x04a8…04cb at0013 = ╱42╱B╱ // 0x4bb @0x13
0x04a8…04cb at0014 = ╱4c╱L╱ // 0x4bc @0x14
0x04a8…04cb at0015 = ╱42╱B╱ // 0x4bd @0x15
0x04a8…04cb at0016 = ╱ef╱$╱ // 0x4be @0x16
0x04a8…04cb at0017 = ╱ed╱(╱ // 0x4bf @0x17
0x04a8…04cb at0018 = ╱45╱E╱ // 0x4c0 @0x18
0x04a8…04cb at0019 = ╱f0╱:╱ // 0x4c1 @0x19
0x04a8…04cb at001a = ╱31╱1╱ // 0x4c2 @0x1a
0x04a8…04cb at001b = ╱33╱3╱ // 0x4c3 @0x1b
0x04a8…04cb at001c = ╱fe0000d004╱ // 0x4c4 @0x1c
0x04a8…04cb at0021 = ╱ee╱)╱ // 0x4c9 @0x21
0x04a8…04cb at0022 = EOL // 0x4ca @0x22
0x04a8…04cb }
0x04cb…04ff 9256 0350 IF TEGN=E AND UBLB$(LEN(UBLB$))="+" THEN UBLB$(LEN(UBLB$))=" "
0x04cb…04ff LineComalBin {
0x04cb…04ff ptr = 0x9256 // 0x4cb @0x0
0x04cb…04ff lno = 0x015e // 0x4cd @0x2
0x04cb…04ff at0004 = ╱82╱ IF ╱ // 0x4cf @0x4
0x04cb…04ff at0005 = ╱54╱T╱ // 0x4d0 @0x5
0x04cb…04ff at0006 = ╱45╱E╱ // 0x4d1 @0x6
0x04cb…04ff at0007 = ╱47╱G╱ // 0x4d2 @0x7
0x04cb…04ff at0008 = ╱4e╱N╱ // 0x4d3 @0x8
0x04cb…04ff at0009 = ╱dc╱=╱ // 0x4d4 @0x9
0x04cb…04ff at000a = ╱45╱E╱ // 0x4d5 @0xa
0x04cb…04ff at000b = ╱da╱ AND ╱ // 0x4d6 @0xb
0x04cb…04ff at000c = ╱55╱U╱ // 0x4d7 @0xc
0x04cb…04ff at000d = ╱42╱B╱ // 0x4d8 @0xd
0x04cb…04ff at000e = ╱4c╱L╱ // 0x4d9 @0xe
0x04cb…04ff at000f = ╱42╱B╱ // 0x4da @0xf
0x04cb…04ff at0010 = ╱ef╱$╱ // 0x4db @0x10
0x04cb…04ff at0011 = ╱ed╱(╱ // 0x4dc @0x11
0x04cb…04ff at0012 = ╱cc╱LEN╱ // 0x4dd @0x12
0x04cb…04ff at0013 = ╱ed╱(╱ // 0x4de @0x13
0x04cb…04ff at0014 = ╱55╱U╱ // 0x4df @0x14
0x04cb…04ff at0015 = ╱42╱B╱ // 0x4e0 @0x15
0x04cb…04ff at0016 = ╱4c╱L╱ // 0x4e1 @0x16
0x04cb…04ff at0017 = ╱42╱B╱ // 0x4e2 @0x17
0x04cb…04ff at0018 = ╱ef╱$╱ // 0x4e3 @0x18
0x04cb…04ff at0019 = ╱ee╱)╱ // 0x4e4 @0x19
0x04cb…04ff at001a = ╱ee╱)╱ // 0x4e5 @0x1a
0x04cb…04ff at001b = ╱dc╱=╱ // 0x4e6 @0x1b
0x04cb…04ff at001c = ╱22╱"╱ // 0x4e7 @0x1c
0x04cb…04ff at001d = ╱2b╱+╱ // 0x4e8 @0x1d
0x04cb…04ff at001e = ╱22╱"╱ // 0x4e9 @0x1e
0x04cb…04ff at001f = ╱b6╱ THEN ╱ // 0x4ea @0x1f
0x04cb…04ff at0020 = ╱55╱U╱ // 0x4eb @0x20
0x04cb…04ff at0021 = ╱42╱B╱ // 0x4ec @0x21
0x04cb…04ff at0022 = ╱4c╱L╱ // 0x4ed @0x22
0x04cb…04ff at0023 = ╱42╱B╱ // 0x4ee @0x23
0x04cb…04ff at0024 = ╱ef╱$╱ // 0x4ef @0x24
0x04cb…04ff at0025 = ╱ed╱(╱ // 0x4f0 @0x25
0x04cb…04ff at0026 = ╱cc╱LEN╱ // 0x4f1 @0x26
0x04cb…04ff at0027 = ╱ed╱(╱ // 0x4f2 @0x27
0x04cb…04ff at0028 = ╱55╱U╱ // 0x4f3 @0x28
0x04cb…04ff at0029 = ╱42╱B╱ // 0x4f4 @0x29
0x04cb…04ff at002a = ╱4c╱L╱ // 0x4f5 @0x2a
0x04cb…04ff at002b = ╱42╱B╱ // 0x4f6 @0x2b
0x04cb…04ff at002c = ╱ef╱$╱ // 0x4f7 @0x2c
0x04cb…04ff at002d = ╱ee╱)╱ // 0x4f8 @0x2d
0x04cb…04ff at002e = ╱ee╱)╱ // 0x4f9 @0x2e
0x04cb…04ff at002f = ╱dc╱=╱ // 0x4fa @0x2f
0x04cb…04ff at0030 = ╱22╱"╱ // 0x4fb @0x30
0x04cb…04ff at0031 = ╱20╱…╱ // 0x4fc @0x31
0x04cb…04ff at0032 = ╱22╱"╱ // 0x4fd @0x32
0x04cb…04ff at0033 = EOL // 0x4fe @0x33
0x04cb…04ff }
0x04ff…0525 927c 0390 IF STØR=E THEN UBLB$=UBLB$(C:LEN(UBLB$)-V)
0x04ff…0525 LineComalBin {
0x04ff…0525 ptr = 0x927c // 0x4ff @0x0
0x04ff…0525 lno = 0x0186 // 0x501 @0x2
0x04ff…0525 at0004 = ╱82╱ IF ╱ // 0x503 @0x4
0x04ff…0525 at0005 = ╱53╱S╱ // 0x504 @0x5
0x04ff…0525 at0006 = ╱54╱T╱ // 0x505 @0x6
0x04ff…0525 at0007 = ╱5c╱Ø╱ // 0x506 @0x7
0x04ff…0525 at0008 = ╱52╱R╱ // 0x507 @0x8
0x04ff…0525 at0009 = ╱dc╱=╱ // 0x508 @0x9
0x04ff…0525 at000a = ╱45╱E╱ // 0x509 @0xa
0x04ff…0525 at000b = ╱b6╱ THEN ╱ // 0x50a @0xb
0x04ff…0525 at000c = ╱55╱U╱ // 0x50b @0xc
0x04ff…0525 at000d = ╱42╱B╱ // 0x50c @0xd
0x04ff…0525 at000e = ╱4c╱L╱ // 0x50d @0xe
0x04ff…0525 at000f = ╱42╱B╱ // 0x50e @0xf
0x04ff…0525 at0010 = ╱ef╱$╱ // 0x50f @0x10
0x04ff…0525 at0011 = ╱dc╱=╱ // 0x510 @0x11
0x04ff…0525 at0012 = ╱55╱U╱ // 0x511 @0x12
0x04ff…0525 at0013 = ╱42╱B╱ // 0x512 @0x13
0x04ff…0525 at0014 = ╱4c╱L╱ // 0x513 @0x14
0x04ff…0525 at0015 = ╱42╱B╱ // 0x514 @0x15
0x04ff…0525 at0016 = ╱ef╱$╱ // 0x515 @0x16
0x04ff…0525 at0017 = ╱ed╱(╱ // 0x516 @0x17
0x04ff…0525 at0018 = ╱43╱C╱ // 0x517 @0x18
0x04ff…0525 at0019 = ╱f0╱:╱ // 0x518 @0x19
0x04ff…0525 at001a = ╱cc╱LEN╱ // 0x519 @0x1a
0x04ff…0525 at001b = ╱ed╱(╱ // 0x51a @0x1b
0x04ff…0525 at001c = ╱55╱U╱ // 0x51b @0x1c
0x04ff…0525 at001d = ╱42╱B╱ // 0x51c @0x1d
0x04ff…0525 at001e = ╱4c╱L╱ // 0x51d @0x1e
0x04ff…0525 at001f = ╱42╱B╱ // 0x51e @0x1f
0x04ff…0525 at0020 = ╱ef╱$╱ // 0x51f @0x20
0x04ff…0525 at0021 = ╱ee╱)╱ // 0x520 @0x21
0x04ff…0525 at0022 = ╱e3╱-╱ // 0x521 @0x22
0x04ff…0525 at0023 = ╱56╱V╱ // 0x522 @0x23
0x04ff…0525 at0024 = ╱ee╱)╱ // 0x523 @0x24
0x04ff…0525 at0025 = EOL // 0x524 @0x25
0x04ff…0525 }
0x0525…052b 9282 0420 ENDPROC
0x0525…052b LineComalBin {
0x0525…052b ptr = 0x9282 // 0x525 @0x0
0x0525…052b lno = 0x01a4 // 0x527 @0x2
0x0525…052b at0004 = ╱9f╱ ENDPROC ╱ // 0x529 @0x4
0x0525…052b at0005 = EOL // 0x52a @0x5
0x0525…052b }
0x052b…0542 9299 0430 PROC FEJL(NR1,NR2,NR3)
0x052b…0542 LineComalBin {
0x052b…0542 ptr = 0x9299 // 0x52b @0x0
0x052b…0542 lno = 0x01ae // 0x52d @0x2
0x052b…0542 at0004 = ╱9e╱ PROC ╱ // 0x52f @0x4
0x052b…0542 at0005 = ╱46╱F╱ // 0x530 @0x5
0x052b…0542 at0006 = ╱45╱E╱ // 0x531 @0x6
0x052b…0542 at0007 = ╱4a╱J╱ // 0x532 @0x7
0x052b…0542 at0008 = ╱4c╱L╱ // 0x533 @0x8
0x052b…0542 at0009 = ╱ed╱(╱ // 0x534 @0x9
0x052b…0542 at000a = ╱4e╱N╱ // 0x535 @0xa
0x052b…0542 at000b = ╱52╱R╱ // 0x536 @0xb
0x052b…0542 at000c = ╱31╱1╱ // 0x537 @0xc
0x052b…0542 at000d = ╱ec╱,╱ // 0x538 @0xd
0x052b…0542 at000e = ╱4e╱N╱ // 0x539 @0xe
0x052b…0542 at000f = ╱52╱R╱ // 0x53a @0xf
0x052b…0542 at0010 = ╱32╱2╱ // 0x53b @0x10
0x052b…0542 at0011 = ╱ec╱,╱ // 0x53c @0x11
0x052b…0542 at0012 = ╱4e╱N╱ // 0x53d @0x12
0x052b…0542 at0013 = ╱52╱R╱ // 0x53e @0x13
0x052b…0542 at0014 = ╱33╱3╱ // 0x53f @0x14
0x052b…0542 at0015 = ╱ee╱)╱ // 0x540 @0x15
0x052b…0542 at0016 = EOL // 0x541 @0x16
0x052b…0542 }
0x0542…0552 92a9 0440 IF STATUS(NR3$)<>B THEN
0x0542…0552 LineComalBin {
0x0542…0552 ptr = 0x92a9 // 0x542 @0x0
0x0542…0552 lno = 0x01b8 // 0x544 @0x2
0x0542…0552 at0004 = ╱9c╱ IF ╱ // 0x546 @0x4
0x0542…0552 at0005 = ╱ce╱STATUS╱ // 0x547 @0x5
0x0542…0552 at0006 = ╱ed╱(╱ // 0x548 @0x6
0x0542…0552 at0007 = ╱4e╱N╱ // 0x549 @0x7
0x0542…0552 at0008 = ╱52╱R╱ // 0x54a @0x8
0x0542…0552 at0009 = ╱33╱3╱ // 0x54b @0x9
0x0542…0552 at000a = ╱ef╱$╱ // 0x54c @0xa
0x0542…0552 at000b = ╱ee╱)╱ // 0x54d @0xb
0x0542…0552 at000c = ╱e1╱<>╱ // 0x54e @0xc
0x0542…0552 at000d = ╱42╱B╱ // 0x54f @0xd
0x0542…0552 at000e = ╱b6╱ THEN ╱ // 0x550 @0xe
0x0542…0552 at000f = EOL // 0x551 @0xf
0x0542…0552 }
0x0552…056c 92c3 0450 PRINT NR1,NR2,NR3$,STATUS(NR3$)
0x0552…056c LineComalBin {
0x0552…056c ptr = 0x92c3 // 0x552 @0x0
0x0552…056c lno = 0x01c2 // 0x554 @0x2
0x0552…056c at0004 = ╱92╱ PRINT ╱ // 0x556 @0x4
0x0552…056c at0005 = ╱4e╱N╱ // 0x557 @0x5
0x0552…056c at0006 = ╱52╱R╱ // 0x558 @0x6
0x0552…056c at0007 = ╱31╱1╱ // 0x559 @0x7
0x0552…056c at0008 = ╱ec╱,╱ // 0x55a @0x8
0x0552…056c at0009 = ╱4e╱N╱ // 0x55b @0x9
0x0552…056c at000a = ╱52╱R╱ // 0x55c @0xa
0x0552…056c at000b = ╱32╱2╱ // 0x55d @0xb
0x0552…056c at000c = ╱ec╱,╱ // 0x55e @0xc
0x0552…056c at000d = ╱4e╱N╱ // 0x55f @0xd
0x0552…056c at000e = ╱52╱R╱ // 0x560 @0xe
0x0552…056c at000f = ╱33╱3╱ // 0x561 @0xf
0x0552…056c at0010 = ╱ef╱$╱ // 0x562 @0x10
0x0552…056c at0011 = ╱ec╱,╱ // 0x563 @0x11
0x0552…056c at0012 = ╱ce╱STATUS╱ // 0x564 @0x12
0x0552…056c at0013 = ╱ed╱(╱ // 0x565 @0x13
0x0552…056c at0014 = ╱4e╱N╱ // 0x566 @0x14
0x0552…056c at0015 = ╱52╱R╱ // 0x567 @0x15
0x0552…056c at0016 = ╱33╱3╱ // 0x568 @0x16
0x0552…056c at0017 = ╱ef╱$╱ // 0x569 @0x17
0x0552…056c at0018 = ╱ee╱)╱ // 0x56a @0x18
0x0552…056c at0019 = EOL // 0x56b @0x19
0x0552…056c }
0x056c…0572 92c9 0460 STOP
0x056c…0572 LineComalBin {
0x056c…0572 ptr = 0x92c9 // 0x56c @0x0
0x056c…0572 lno = 0x01cc // 0x56e @0x2
0x056c…0572 at0004 = ╱8d╱ STOP ╱ // 0x570 @0x4
0x056c…0572 at0005 = EOL // 0x571 @0x5
0x056c…0572 }
0x0572…0578 92cf 0470 ENDIF
0x0572…0578 LineComalBin {
0x0572…0578 ptr = 0x92cf // 0x572 @0x0
0x0572…0578 lno = 0x01d6 // 0x574 @0x2
0x0572…0578 at0004 = ╱9b╱ ENDIF ╱ // 0x576 @0x4
0x0572…0578 at0005 = EOL // 0x577 @0x5
0x0572…0578 }
0x0578…057e 92d5 0480 ENDPROC
0x0578…057e LineComalBin {
0x0578…057e ptr = 0x92d5 // 0x578 @0x0
0x0578…057e lno = 0x01e0 // 0x57a @0x2
0x0578…057e at0004 = ╱9f╱ ENDPROC ╱ // 0x57c @0x4
0x0578…057e at0005 = EOL // 0x57d @0x5
0x0578…057e }
0x057e…05ab 9302 0490 PROC SØG(MPOSTANTAL6,HTAB3,NØGLE3,UTAB3,K34)
0x057e…05ab LineComalBin {
0x057e…05ab ptr = 0x9302 // 0x57e @0x0
0x057e…05ab lno = 0x01ea // 0x580 @0x2
0x057e…05ab at0004 = ╱9e╱ PROC ╱ // 0x582 @0x4
0x057e…05ab at0005 = ╱53╱S╱ // 0x583 @0x5
0x057e…05ab at0006 = ╱5c╱Ø╱ // 0x584 @0x6
0x057e…05ab at0007 = ╱47╱G╱ // 0x585 @0x7
0x057e…05ab at0008 = ╱ed╱(╱ // 0x586 @0x8
0x057e…05ab at0009 = ╱4d╱M╱ // 0x587 @0x9
0x057e…05ab at000a = ╱50╱P╱ // 0x588 @0xa
0x057e…05ab at000b = ╱4f╱O╱ // 0x589 @0xb
0x057e…05ab at000c = ╱53╱S╱ // 0x58a @0xc
0x057e…05ab at000d = ╱54╱T╱ // 0x58b @0xd
0x057e…05ab at000e = ╱41╱A╱ // 0x58c @0xe
0x057e…05ab at000f = ╱4e╱N╱ // 0x58d @0xf
0x057e…05ab at0010 = ╱54╱T╱ // 0x58e @0x10
0x057e…05ab at0011 = ╱41╱A╱ // 0x58f @0x11
0x057e…05ab at0012 = ╱4c╱L╱ // 0x590 @0x12
0x057e…05ab at0013 = ╱36╱6╱ // 0x591 @0x13
0x057e…05ab at0014 = ╱ec╱,╱ // 0x592 @0x14
0x057e…05ab at0015 = ╱48╱H╱ // 0x593 @0x15
0x057e…05ab at0016 = ╱54╱T╱ // 0x594 @0x16
0x057e…05ab at0017 = ╱41╱A╱ // 0x595 @0x17
0x057e…05ab at0018 = ╱42╱B╱ // 0x596 @0x18
0x057e…05ab at0019 = ╱33╱3╱ // 0x597 @0x19
0x057e…05ab at001a = ╱ec╱,╱ // 0x598 @0x1a
0x057e…05ab at001b = ╱4e╱N╱ // 0x599 @0x1b
0x057e…05ab at001c = ╱5c╱Ø╱ // 0x59a @0x1c
0x057e…05ab at001d = ╱47╱G╱ // 0x59b @0x1d
0x057e…05ab at001e = ╱4c╱L╱ // 0x59c @0x1e
0x057e…05ab at001f = ╱45╱E╱ // 0x59d @0x1f
0x057e…05ab at0020 = ╱33╱3╱ // 0x59e @0x20
0x057e…05ab at0021 = ╱ec╱,╱ // 0x59f @0x21
0x057e…05ab at0022 = ╱55╱U╱ // 0x5a0 @0x22
0x057e…05ab at0023 = ╱54╱T╱ // 0x5a1 @0x23
0x057e…05ab at0024 = ╱41╱A╱ // 0x5a2 @0x24
0x057e…05ab at0025 = ╱42╱B╱ // 0x5a3 @0x25
0x057e…05ab at0026 = ╱33╱3╱ // 0x5a4 @0x26
0x057e…05ab at0027 = ╱ec╱,╱ // 0x5a5 @0x27
0x057e…05ab at0028 = ╱4b╱K╱ // 0x5a6 @0x28
0x057e…05ab at0029 = ╱33╱3╱ // 0x5a7 @0x29
0x057e…05ab at002a = ╱34╱4╱ // 0x5a8 @0x2a
0x057e…05ab at002b = ╱ee╱)╱ // 0x5a9 @0x2b
0x057e…05ab at002c = EOL // 0x5aa @0x2c
0x057e…05ab }
0x05ab…05d3 932a 0510 PPIL2=MPOSTANTAL6 DIV 40+E;PPIL1=B
0x05ab…05d3 LineComalBin {
0x05ab…05d3 ptr = 0x932a // 0x5ab @0x0
0x05ab…05d3 lno = 0x01fe // 0x5ad @0x2
0x05ab…05d3 at0004 = ╱50╱P╱ // 0x5af @0x4
0x05ab…05d3 at0005 = ╱50╱P╱ // 0x5b0 @0x5
0x05ab…05d3 at0006 = ╱49╱I╱ // 0x5b1 @0x6
0x05ab…05d3 at0007 = ╱4c╱L╱ // 0x5b2 @0x7
0x05ab…05d3 at0008 = ╱32╱2╱ // 0x5b3 @0x8
0x05ab…05d3 at0009 = ╱dc╱=╱ // 0x5b4 @0x9
0x05ab…05d3 at000a = ╱4d╱M╱ // 0x5b5 @0xa
0x05ab…05d3 at000b = ╱50╱P╱ // 0x5b6 @0xb
0x05ab…05d3 at000c = ╱4f╱O╱ // 0x5b7 @0xc
0x05ab…05d3 at000d = ╱53╱S╱ // 0x5b8 @0xd
0x05ab…05d3 at000e = ╱54╱T╱ // 0x5b9 @0xe
0x05ab…05d3 at000f = ╱41╱A╱ // 0x5ba @0xf
0x05ab…05d3 at0010 = ╱4e╱N╱ // 0x5bb @0x10
0x05ab…05d3 at0011 = ╱54╱T╱ // 0x5bc @0x11
0x05ab…05d3 at0012 = ╱41╱A╱ // 0x5bd @0x12
0x05ab…05d3 at0013 = ╱4c╱L╱ // 0x5be @0x13
0x05ab…05d3 at0014 = ╱36╱6╱ // 0x5bf @0x14
0x05ab…05d3 at0015 = ╱e7╱ DIV ╱ // 0x5c0 @0x15
0x05ab…05d3 at0016 = ╱34╱4╱ // 0x5c1 @0x16
0x05ab…05d3 at0017 = ╱30╱0╱ // 0x5c2 @0x17
0x05ab…05d3 at0018 = ╱fe0000a006╱ // 0x5c3 @0x18
0x05ab…05d3 at001d = ╱e2╱+╱ // 0x5c8 @0x1d
0x05ab…05d3 at001e = ╱45╱E╱ // 0x5c9 @0x1e
0x05ab…05d3 at001f = ╱eb╱;╱ // 0x5ca @0x1f
0x05ab…05d3 at0020 = ╱50╱P╱ // 0x5cb @0x20
0x05ab…05d3 at0021 = ╱50╱P╱ // 0x5cc @0x21
0x05ab…05d3 at0022 = ╱49╱I╱ // 0x5cd @0x22
0x05ab…05d3 at0023 = ╱4c╱L╱ // 0x5ce @0x23
0x05ab…05d3 at0024 = ╱31╱1╱ // 0x5cf @0x24
0x05ab…05d3 at0025 = ╱dc╱=╱ // 0x5d0 @0x25
0x05ab…05d3 at0026 = ╱42╱B╱ // 0x5d1 @0x26
0x05ab…05d3 at0027 = EOL // 0x5d2 @0x27
0x05ab…05d3 }
0x05d3…05d9 9330 0520 REPEAT
0x05d3…05d9 LineComalBin {
0x05d3…05d9 ptr = 0x9330 // 0x5d3 @0x0
0x05d3…05d9 lno = 0x0208 // 0x5d5 @0x2
0x05d3…05d9 at0004 = ╱97╱ REPEAT ╱ // 0x5d7 @0x4
0x05d3…05d9 at0005 = EOL // 0x5d8 @0x5
0x05d3…05d9 }
0x05d9…05f3 934a 0530 PPIL3=(PPIL1+PPIL2) DIV G
0x05d9…05f3 LineComalBin {
0x05d9…05f3 ptr = 0x934a // 0x5d9 @0x0
0x05d9…05f3 lno = 0x0212 // 0x5db @0x2
0x05d9…05f3 at0004 = ╱50╱P╱ // 0x5dd @0x4
0x05d9…05f3 at0005 = ╱50╱P╱ // 0x5de @0x5
0x05d9…05f3 at0006 = ╱49╱I╱ // 0x5df @0x6
0x05d9…05f3 at0007 = ╱4c╱L╱ // 0x5e0 @0x7
0x05d9…05f3 at0008 = ╱33╱3╱ // 0x5e1 @0x8
0x05d9…05f3 at0009 = ╱dc╱=╱ // 0x5e2 @0x9
0x05d9…05f3 at000a = ╱ed╱(╱ // 0x5e3 @0xa
0x05d9…05f3 at000b = ╱50╱P╱ // 0x5e4 @0xb
0x05d9…05f3 at000c = ╱50╱P╱ // 0x5e5 @0xc
0x05d9…05f3 at000d = ╱49╱I╱ // 0x5e6 @0xd
0x05d9…05f3 at000e = ╱4c╱L╱ // 0x5e7 @0xe
0x05d9…05f3 at000f = ╱31╱1╱ // 0x5e8 @0xf
0x05d9…05f3 at0010 = ╱e2╱+╱ // 0x5e9 @0x10
0x05d9…05f3 at0011 = ╱50╱P╱ // 0x5ea @0x11
0x05d9…05f3 at0012 = ╱50╱P╱ // 0x5eb @0x12
0x05d9…05f3 at0013 = ╱49╱I╱ // 0x5ec @0x13
0x05d9…05f3 at0014 = ╱4c╱L╱ // 0x5ed @0x14
0x05d9…05f3 at0015 = ╱32╱2╱ // 0x5ee @0x15
0x05d9…05f3 at0016 = ╱ee╱)╱ // 0x5ef @0x16
0x05d9…05f3 at0017 = ╱e7╱ DIV ╱ // 0x5f0 @0x17
0x05d9…05f3 at0018 = ╱47╱G╱ // 0x5f1 @0x18
0x05d9…05f3 at0019 = EOL // 0x5f2 @0x19
0x05d9…05f3 }
0x05f3…0610 9367 0540 IF HTAB3(PPIL3,E)=NØGLE3 THEN EXIT
0x05f3…0610 LineComalBin {
0x05f3…0610 ptr = 0x9367 // 0x5f3 @0x0
0x05f3…0610 lno = 0x021c // 0x5f5 @0x2
0x05f3…0610 at0004 = ╱82╱ IF ╱ // 0x5f7 @0x4
0x05f3…0610 at0005 = ╱48╱H╱ // 0x5f8 @0x5
0x05f3…0610 at0006 = ╱54╱T╱ // 0x5f9 @0x6
0x05f3…0610 at0007 = ╱41╱A╱ // 0x5fa @0x7
0x05f3…0610 at0008 = ╱42╱B╱ // 0x5fb @0x8
0x05f3…0610 at0009 = ╱33╱3╱ // 0x5fc @0x9
0x05f3…0610 at000a = ╱ed╱(╱ // 0x5fd @0xa
0x05f3…0610 at000b = ╱50╱P╱ // 0x5fe @0xb
0x05f3…0610 at000c = ╱50╱P╱ // 0x5ff @0xc
0x05f3…0610 at000d = ╱49╱I╱ // 0x600 @0xd
0x05f3…0610 at000e = ╱4c╱L╱ // 0x601 @0xe
0x05f3…0610 at000f = ╱33╱3╱ // 0x602 @0xf
0x05f3…0610 at0010 = ╱ec╱,╱ // 0x603 @0x10
0x05f3…0610 at0011 = ╱45╱E╱ // 0x604 @0x11
0x05f3…0610 at0012 = ╱ee╱)╱ // 0x605 @0x12
0x05f3…0610 at0013 = ╱dc╱=╱ // 0x606 @0x13
0x05f3…0610 at0014 = ╱4e╱N╱ // 0x607 @0x14
0x05f3…0610 at0015 = ╱5c╱Ø╱ // 0x608 @0x15
0x05f3…0610 at0016 = ╱47╱G╱ // 0x609 @0x16
0x05f3…0610 at0017 = ╱4c╱L╱ // 0x60a @0x17
0x05f3…0610 at0018 = ╱45╱E╱ // 0x60b @0x18
0x05f3…0610 at0019 = ╱33╱3╱ // 0x60c @0x19
0x05f3…0610 at001a = ╱b6╱ THEN ╱ // 0x60d @0x1a
0x05f3…0610 at001b = ╱99╱ EXIT ╱ // 0x60e @0x1b
0x05f3…0610 at001c = EOL // 0x60f @0x1c
0x05f3…0610 }
0x0610…062c 9383 0550 IF HTAB3(PPIL3,E)>NØGLE3 THEN
0x0610…062c LineComalBin {
0x0610…062c ptr = 0x9383 // 0x610 @0x0
0x0610…062c lno = 0x0226 // 0x612 @0x2
0x0610…062c at0004 = ╱9c╱ IF ╱ // 0x614 @0x4
0x0610…062c at0005 = ╱48╱H╱ // 0x615 @0x5
0x0610…062c at0006 = ╱54╱T╱ // 0x616 @0x6
0x0610…062c at0007 = ╱41╱A╱ // 0x617 @0x7
0x0610…062c at0008 = ╱42╱B╱ // 0x618 @0x8
0x0610…062c at0009 = ╱33╱3╱ // 0x619 @0x9
0x0610…062c at000a = ╱ed╱(╱ // 0x61a @0xa
0x0610…062c at000b = ╱50╱P╱ // 0x61b @0xb
0x0610…062c at000c = ╱50╱P╱ // 0x61c @0xc
0x0610…062c at000d = ╱49╱I╱ // 0x61d @0xd
0x0610…062c at000e = ╱4c╱L╱ // 0x61e @0xe
0x0610…062c at000f = ╱33╱3╱ // 0x61f @0xf
0x0610…062c at0010 = ╱ec╱,╱ // 0x620 @0x10
0x0610…062c at0011 = ╱45╱E╱ // 0x621 @0x11
0x0610…062c at0012 = ╱ee╱)╱ // 0x622 @0x12
0x0610…062c at0013 = ╱de╱>╱ // 0x623 @0x13
0x0610…062c at0014 = ╱4e╱N╱ // 0x624 @0x14
0x0610…062c at0015 = ╱5c╱Ø╱ // 0x625 @0x15
0x0610…062c at0016 = ╱47╱G╱ // 0x626 @0x16
0x0610…062c at0017 = ╱4c╱L╱ // 0x627 @0x17
0x0610…062c at0018 = ╱45╱E╱ // 0x628 @0x18
0x0610…062c at0019 = ╱33╱3╱ // 0x629 @0x19
0x0610…062c at001a = ╱b6╱ THEN ╱ // 0x62a @0x1a
0x0610…062c at001b = EOL // 0x62b @0x1b
0x0610…062c }
0x062c…063c 9393 0560 PPIL2=PPIL3
0x062c…063c LineComalBin {
0x062c…063c ptr = 0x9393 // 0x62c @0x0
0x062c…063c lno = 0x0230 // 0x62e @0x2
0x062c…063c at0004 = ╱50╱P╱ // 0x630 @0x4
0x062c…063c at0005 = ╱50╱P╱ // 0x631 @0x5
0x062c…063c at0006 = ╱49╱I╱ // 0x632 @0x6
0x062c…063c at0007 = ╱4c╱L╱ // 0x633 @0x7
0x062c…063c at0008 = ╱32╱2╱ // 0x634 @0x8
0x062c…063c at0009 = ╱dc╱=╱ // 0x635 @0x9
0x062c…063c at000a = ╱50╱P╱ // 0x636 @0xa
0x062c…063c at000b = ╱50╱P╱ // 0x637 @0xb
0x062c…063c at000c = ╱49╱I╱ // 0x638 @0xc
0x062c…063c at000d = ╱4c╱L╱ // 0x639 @0xd
0x062c…063c at000e = ╱33╱3╱ // 0x63a @0xe
0x062c…063c at000f = EOL // 0x63b @0xf
0x062c…063c }
0x063c…0642 9399 0570 ELSE
0x063c…0642 LineComalBin {
0x063c…0642 ptr = 0x9399 // 0x63c @0x0
0x063c…0642 lno = 0x023a // 0x63e @0x2
0x063c…0642 at0004 = ╱9a╱ ELSE ╱ // 0x640 @0x4
0x063c…0642 at0005 = EOL // 0x641 @0x5
0x063c…0642 }
0x0642…0652 93a9 0580 PPIL1=PPIL3
0x0642…0652 LineComalBin {
0x0642…0652 ptr = 0x93a9 // 0x642 @0x0
0x0642…0652 lno = 0x0244 // 0x644 @0x2
0x0642…0652 at0004 = ╱50╱P╱ // 0x646 @0x4
0x0642…0652 at0005 = ╱50╱P╱ // 0x647 @0x5
0x0642…0652 at0006 = ╱49╱I╱ // 0x648 @0x6
0x0642…0652 at0007 = ╱4c╱L╱ // 0x649 @0x7
0x0642…0652 at0008 = ╱31╱1╱ // 0x64a @0x8
0x0642…0652 at0009 = ╱dc╱=╱ // 0x64b @0x9
0x0642…0652 at000a = ╱50╱P╱ // 0x64c @0xa
0x0642…0652 at000b = ╱50╱P╱ // 0x64d @0xb
0x0642…0652 at000c = ╱49╱I╱ // 0x64e @0xc
0x0642…0652 at000d = ╱4c╱L╱ // 0x64f @0xd
0x0642…0652 at000e = ╱33╱3╱ // 0x650 @0xe
0x0642…0652 at000f = EOL // 0x651 @0xf
0x0642…0652 }
0x0652…0658 93af 0590 ENDIF
0x0652…0658 LineComalBin {
0x0652…0658 ptr = 0x93af // 0x652 @0x0
0x0652…0658 lno = 0x024e // 0x654 @0x2
0x0652…0658 at0004 = ╱9b╱ ENDIF ╱ // 0x656 @0x4
0x0652…0658 at0005 = EOL // 0x657 @0x5
0x0652…0658 }
0x0658…066b 93c2 0600 UNTIL PPIL2<=PPIL1+E
0x0658…066b LineComalBin {
0x0658…066b ptr = 0x93c2 // 0x658 @0x0
0x0658…066b lno = 0x0258 // 0x65a @0x2
0x0658…066b at0004 = ╱98╱ UNTIL ╱ // 0x65c @0x4
0x0658…066b at0005 = ╱50╱P╱ // 0x65d @0x5
0x0658…066b at0006 = ╱50╱P╱ // 0x65e @0x6
0x0658…066b at0007 = ╱49╱I╱ // 0x65f @0x7
0x0658…066b at0008 = ╱4c╱L╱ // 0x660 @0x8
0x0658…066b at0009 = ╱32╱2╱ // 0x661 @0x9
0x0658…066b at000a = ╱df╱<=╱ // 0x662 @0xa
0x0658…066b at000b = ╱50╱P╱ // 0x663 @0xb
0x0658…066b at000c = ╱50╱P╱ // 0x664 @0xc
0x0658…066b at000d = ╱49╱I╱ // 0x665 @0xd
0x0658…066b at000e = ╱4c╱L╱ // 0x666 @0xe
0x0658…066b at000f = ╱31╱1╱ // 0x667 @0xf
0x0658…066b at0010 = ╱e2╱+╱ // 0x668 @0x10
0x0658…066b at0011 = ╱45╱E╱ // 0x669 @0x11
0x0658…066b at0012 = EOL // 0x66a @0x12
0x0658…066b }
0x066b…0679 93d0 0610 IF PPIL3>E THEN
0x066b…0679 LineComalBin {
0x066b…0679 ptr = 0x93d0 // 0x66b @0x0
0x066b…0679 lno = 0x0262 // 0x66d @0x2
0x066b…0679 at0004 = ╱9c╱ IF ╱ // 0x66f @0x4
0x066b…0679 at0005 = ╱50╱P╱ // 0x670 @0x5
0x066b…0679 at0006 = ╱50╱P╱ // 0x671 @0x6
0x066b…0679 at0007 = ╱49╱I╱ // 0x672 @0x7
0x066b…0679 at0008 = ╱4c╱L╱ // 0x673 @0x8
0x066b…0679 at0009 = ╱33╱3╱ // 0x674 @0x9
0x066b…0679 at000a = ╱de╱>╱ // 0x675 @0xa
0x066b…0679 at000b = ╱45╱E╱ // 0x676 @0xb
0x066b…0679 at000c = ╱b6╱ THEN ╱ // 0x677 @0xc
0x066b…0679 at000d = EOL // 0x678 @0xd
0x066b…0679 }
0x0679…067f 93d6 0620 REPEAT
0x0679…067f LineComalBin {
0x0679…067f ptr = 0x93d6 // 0x679 @0x0
0x0679…067f lno = 0x026c // 0x67b @0x2
0x0679…067f at0004 = ╱97╱ REPEAT ╱ // 0x67d @0x4
0x0679…067f at0005 = EOL // 0x67e @0x5
0x0679…067f }
0x067f…0691 93e8 0630 PPIL3=PPIL3-E
0x067f…0691 LineComalBin {
0x067f…0691 ptr = 0x93e8 // 0x67f @0x0
0x067f…0691 lno = 0x0276 // 0x681 @0x2
0x067f…0691 at0004 = ╱50╱P╱ // 0x683 @0x4
0x067f…0691 at0005 = ╱50╱P╱ // 0x684 @0x5
0x067f…0691 at0006 = ╱49╱I╱ // 0x685 @0x6
0x067f…0691 at0007 = ╱4c╱L╱ // 0x686 @0x7
0x067f…0691 at0008 = ╱33╱3╱ // 0x687 @0x8
0x067f…0691 at0009 = ╱dc╱=╱ // 0x688 @0x9
0x067f…0691 at000a = ╱50╱P╱ // 0x689 @0xa
0x067f…0691 at000b = ╱50╱P╱ // 0x68a @0xb
0x067f…0691 at000c = ╱49╱I╱ // 0x68b @0xc
0x067f…0691 at000d = ╱4c╱L╱ // 0x68c @0xd
0x067f…0691 at000e = ╱33╱3╱ // 0x68d @0xe
0x067f…0691 at000f = ╱e3╱-╱ // 0x68e @0xf
0x067f…0691 at0010 = ╱45╱E╱ // 0x68f @0x10
0x067f…0691 at0011 = EOL // 0x690 @0x11
0x067f…0691 }
0x0691…06b4 940b 0640 UNTIL HTAB3(PPIL3,E)<NØGLE3 OR PPIL3=E
0x0691…06b4 LineComalBin {
0x0691…06b4 ptr = 0x940b // 0x691 @0x0
0x0691…06b4 lno = 0x0280 // 0x693 @0x2
0x0691…06b4 at0004 = ╱98╱ UNTIL ╱ // 0x695 @0x4
0x0691…06b4 at0005 = ╱48╱H╱ // 0x696 @0x5
0x0691…06b4 at0006 = ╱54╱T╱ // 0x697 @0x6
0x0691…06b4 at0007 = ╱41╱A╱ // 0x698 @0x7
0x0691…06b4 at0008 = ╱42╱B╱ // 0x699 @0x8
0x0691…06b4 at0009 = ╱33╱3╱ // 0x69a @0x9
0x0691…06b4 at000a = ╱ed╱(╱ // 0x69b @0xa
0x0691…06b4 at000b = ╱50╱P╱ // 0x69c @0xb
0x0691…06b4 at000c = ╱50╱P╱ // 0x69d @0xc
0x0691…06b4 at000d = ╱49╱I╱ // 0x69e @0xd
0x0691…06b4 at000e = ╱4c╱L╱ // 0x69f @0xe
0x0691…06b4 at000f = ╱33╱3╱ // 0x6a0 @0xf
0x0691…06b4 at0010 = ╱ec╱,╱ // 0x6a1 @0x10
0x0691…06b4 at0011 = ╱45╱E╱ // 0x6a2 @0x11
0x0691…06b4 at0012 = ╱ee╱)╱ // 0x6a3 @0x12
0x0691…06b4 at0013 = ╱dd╱<╱ // 0x6a4 @0x13
0x0691…06b4 at0014 = ╱4e╱N╱ // 0x6a5 @0x14
0x0691…06b4 at0015 = ╱5c╱Ø╱ // 0x6a6 @0x15
0x0691…06b4 at0016 = ╱47╱G╱ // 0x6a7 @0x16
0x0691…06b4 at0017 = ╱4c╱L╱ // 0x6a8 @0x17
0x0691…06b4 at0018 = ╱45╱E╱ // 0x6a9 @0x18
0x0691…06b4 at0019 = ╱33╱3╱ // 0x6aa @0x19
0x0691…06b4 at001a = ╱db╱ OR ╱ // 0x6ab @0x1a
0x0691…06b4 at001b = ╱50╱P╱ // 0x6ac @0x1b
0x0691…06b4 at001c = ╱50╱P╱ // 0x6ad @0x1c
0x0691…06b4 at001d = ╱49╱I╱ // 0x6ae @0x1d
0x0691…06b4 at001e = ╱4c╱L╱ // 0x6af @0x1e
0x0691…06b4 at001f = ╱33╱3╱ // 0x6b0 @0x1f
0x0691…06b4 at0020 = ╱dc╱=╱ // 0x6b1 @0x20
0x0691…06b4 at0021 = ╱45╱E╱ // 0x6b2 @0x21
0x0691…06b4 at0022 = EOL // 0x6b3 @0x22
0x0691…06b4 }
0x06b4…06ba 9411 0650 ENDIF
0x06b4…06ba LineComalBin {
0x06b4…06ba ptr = 0x9411 // 0x6b4 @0x0
0x06b4…06ba lno = 0x028a // 0x6b6 @0x2
0x06b4…06ba at0004 = ╱9b╱ ENDIF ╱ // 0x6b8 @0x4
0x06b4…06ba at0005 = EOL // 0x6b9 @0x5
0x06b4…06ba }
0x06ba…06c6 941d 0655 T=PPIL3
0x06ba…06c6 LineComalBin {
0x06ba…06c6 ptr = 0x941d // 0x6ba @0x0
0x06ba…06c6 lno = 0x028f // 0x6bc @0x2
0x06ba…06c6 at0004 = ╱54╱T╱ // 0x6be @0x4
0x06ba…06c6 at0005 = ╱dc╱=╱ // 0x6bf @0x5
0x06ba…06c6 at0006 = ╱50╱P╱ // 0x6c0 @0x6
0x06ba…06c6 at0007 = ╱50╱P╱ // 0x6c1 @0x7
0x06ba…06c6 at0008 = ╱49╱I╱ // 0x6c2 @0x8
0x06ba…06c6 at0009 = ╱4c╱L╱ // 0x6c3 @0x9
0x06ba…06c6 at000a = ╱33╱3╱ // 0x6c4 @0xa
0x06ba…06c6 at000b = EOL // 0x6c5 @0xb
0x06ba…06c6 }
0x06c6…06f8 944f 0660 IF HTAB3(PPIL3,G)<NØGLE3 OR NØGLE3<HTAB3(PPIL3,E) THEN
0x06c6…06f8 LineComalBin {
0x06c6…06f8 ptr = 0x944f // 0x6c6 @0x0
0x06c6…06f8 lno = 0x0294 // 0x6c8 @0x2
0x06c6…06f8 at0004 = ╱9c╱ IF ╱ // 0x6ca @0x4
0x06c6…06f8 at0005 = ╱48╱H╱ // 0x6cb @0x5
0x06c6…06f8 at0006 = ╱54╱T╱ // 0x6cc @0x6
0x06c6…06f8 at0007 = ╱41╱A╱ // 0x6cd @0x7
0x06c6…06f8 at0008 = ╱42╱B╱ // 0x6ce @0x8
0x06c6…06f8 at0009 = ╱33╱3╱ // 0x6cf @0x9
0x06c6…06f8 at000a = ╱ed╱(╱ // 0x6d0 @0xa
0x06c6…06f8 at000b = ╱50╱P╱ // 0x6d1 @0xb
0x06c6…06f8 at000c = ╱50╱P╱ // 0x6d2 @0xc
0x06c6…06f8 at000d = ╱49╱I╱ // 0x6d3 @0xd
0x06c6…06f8 at000e = ╱4c╱L╱ // 0x6d4 @0xe
0x06c6…06f8 at000f = ╱33╱3╱ // 0x6d5 @0xf
0x06c6…06f8 at0010 = ╱ec╱,╱ // 0x6d6 @0x10
0x06c6…06f8 at0011 = ╱47╱G╱ // 0x6d7 @0x11
0x06c6…06f8 at0012 = ╱ee╱)╱ // 0x6d8 @0x12
0x06c6…06f8 at0013 = ╱dd╱<╱ // 0x6d9 @0x13
0x06c6…06f8 at0014 = ╱4e╱N╱ // 0x6da @0x14
0x06c6…06f8 at0015 = ╱5c╱Ø╱ // 0x6db @0x15
0x06c6…06f8 at0016 = ╱47╱G╱ // 0x6dc @0x16
0x06c6…06f8 at0017 = ╱4c╱L╱ // 0x6dd @0x17
0x06c6…06f8 at0018 = ╱45╱E╱ // 0x6de @0x18
0x06c6…06f8 at0019 = ╱33╱3╱ // 0x6df @0x19
0x06c6…06f8 at001a = ╱db╱ OR ╱ // 0x6e0 @0x1a
0x06c6…06f8 at001b = ╱4e╱N╱ // 0x6e1 @0x1b
0x06c6…06f8 at001c = ╱5c╱Ø╱ // 0x6e2 @0x1c
0x06c6…06f8 at001d = ╱47╱G╱ // 0x6e3 @0x1d
0x06c6…06f8 at001e = ╱4c╱L╱ // 0x6e4 @0x1e
0x06c6…06f8 at001f = ╱45╱E╱ // 0x6e5 @0x1f
0x06c6…06f8 at0020 = ╱33╱3╱ // 0x6e6 @0x20
0x06c6…06f8 at0021 = ╱dd╱<╱ // 0x6e7 @0x21
0x06c6…06f8 at0022 = ╱48╱H╱ // 0x6e8 @0x22
0x06c6…06f8 at0023 = ╱54╱T╱ // 0x6e9 @0x23
0x06c6…06f8 at0024 = ╱41╱A╱ // 0x6ea @0x24
0x06c6…06f8 at0025 = ╱42╱B╱ // 0x6eb @0x25
0x06c6…06f8 at0026 = ╱33╱3╱ // 0x6ec @0x26
0x06c6…06f8 at0027 = ╱ed╱(╱ // 0x6ed @0x27
0x06c6…06f8 at0028 = ╱50╱P╱ // 0x6ee @0x28
0x06c6…06f8 at0029 = ╱50╱P╱ // 0x6ef @0x29
0x06c6…06f8 at002a = ╱49╱I╱ // 0x6f0 @0x2a
0x06c6…06f8 at002b = ╱4c╱L╱ // 0x6f1 @0x2b
0x06c6…06f8 at002c = ╱33╱3╱ // 0x6f2 @0x2c
0x06c6…06f8 at002d = ╱ec╱,╱ // 0x6f3 @0x2d
0x06c6…06f8 at002e = ╱45╱E╱ // 0x6f4 @0x2e
0x06c6…06f8 at002f = ╱ee╱)╱ // 0x6f5 @0x2f
0x06c6…06f8 at0030 = ╱b6╱ THEN ╱ // 0x6f6 @0x30
0x06c6…06f8 at0031 = EOL // 0x6f7 @0x31
0x06c6…06f8 }
0x06f8…0706 945d 0665 T=PPIL3+E
0x06f8…0706 LineComalBin {
0x06f8…0706 ptr = 0x945d // 0x6f8 @0x0
0x06f8…0706 lno = 0x0299 // 0x6fa @0x2
0x06f8…0706 at0004 = ╱54╱T╱ // 0x6fc @0x4
0x06f8…0706 at0005 = ╱dc╱=╱ // 0x6fd @0x5
0x06f8…0706 at0006 = ╱50╱P╱ // 0x6fe @0x6
0x06f8…0706 at0007 = ╱50╱P╱ // 0x6ff @0x7
0x06f8…0706 at0008 = ╱49╱I╱ // 0x700 @0x8
0x06f8…0706 at0009 = ╱4c╱L╱ // 0x701 @0x9
0x06f8…0706 at000a = ╱33╱3╱ // 0x702 @0xa
0x06f8…0706 at000b = ╱e2╱+╱ // 0x703 @0xb
0x06f8…0706 at000c = ╱45╱E╱ // 0x704 @0xc
0x06f8…0706 at000d = EOL // 0x705 @0xd
0x06f8…0706 }
0x0706…0727 947e 0670 IF HTAB3(PPIL3+E,E)>NØGLE3 THEN T=B
0x0706…0727 LineComalBin {
0x0706…0727 ptr = 0x947e // 0x706 @0x0
0x0706…0727 lno = 0x029e // 0x708 @0x2
0x0706…0727 at0004 = ╱82╱ IF ╱ // 0x70a @0x4
0x0706…0727 at0005 = ╱48╱H╱ // 0x70b @0x5
0x0706…0727 at0006 = ╱54╱T╱ // 0x70c @0x6
0x0706…0727 at0007 = ╱41╱A╱ // 0x70d @0x7
0x0706…0727 at0008 = ╱42╱B╱ // 0x70e @0x8
0x0706…0727 at0009 = ╱33╱3╱ // 0x70f @0x9
0x0706…0727 at000a = ╱ed╱(╱ // 0x710 @0xa
0x0706…0727 at000b = ╱50╱P╱ // 0x711 @0xb
0x0706…0727 at000c = ╱50╱P╱ // 0x712 @0xc
0x0706…0727 at000d = ╱49╱I╱ // 0x713 @0xd
0x0706…0727 at000e = ╱4c╱L╱ // 0x714 @0xe
0x0706…0727 at000f = ╱33╱3╱ // 0x715 @0xf
0x0706…0727 at0010 = ╱e2╱+╱ // 0x716 @0x10
0x0706…0727 at0011 = ╱45╱E╱ // 0x717 @0x11
0x0706…0727 at0012 = ╱ec╱,╱ // 0x718 @0x12
0x0706…0727 at0013 = ╱45╱E╱ // 0x719 @0x13
0x0706…0727 at0014 = ╱ee╱)╱ // 0x71a @0x14
0x0706…0727 at0015 = ╱de╱>╱ // 0x71b @0x15
0x0706…0727 at0016 = ╱4e╱N╱ // 0x71c @0x16
0x0706…0727 at0017 = ╱5c╱Ø╱ // 0x71d @0x17
0x0706…0727 at0018 = ╱47╱G╱ // 0x71e @0x18
0x0706…0727 at0019 = ╱4c╱L╱ // 0x71f @0x19
0x0706…0727 at001a = ╱45╱E╱ // 0x720 @0x1a
0x0706…0727 at001b = ╱33╱3╱ // 0x721 @0x1b
0x0706…0727 at001c = ╱b6╱ THEN ╱ // 0x722 @0x1c
0x0706…0727 at001d = ╱54╱T╱ // 0x723 @0x1d
0x0706…0727 at001e = ╱dc╱=╱ // 0x724 @0x1e
0x0706…0727 at001f = ╱42╱B╱ // 0x725 @0x1f
0x0706…0727 at0020 = EOL // 0x726 @0x20
0x0706…0727 }
0x0727…072d 9484 0740 ENDIF
0x0727…072d LineComalBin {
0x0727…072d ptr = 0x9484 // 0x727 @0x0
0x0727…072d lno = 0x02e4 // 0x729 @0x2
0x0727…072d at0004 = ╱9b╱ ENDIF ╱ // 0x72b @0x4
0x0727…072d at0005 = EOL // 0x72c @0x5
0x0727…072d }
0x072d…0738 948f 0750 IF T<E THEN EXIT
0x072d…0738 LineComalBin {
0x072d…0738 ptr = 0x948f // 0x72d @0x0
0x072d…0738 lno = 0x02ee // 0x72f @0x2
0x072d…0738 at0004 = ╱82╱ IF ╱ // 0x731 @0x4
0x072d…0738 at0005 = ╱54╱T╱ // 0x732 @0x5
0x072d…0738 at0006 = ╱dd╱<╱ // 0x733 @0x6
0x072d…0738 at0007 = ╱45╱E╱ // 0x734 @0x7
0x072d…0738 at0008 = ╱b6╱ THEN ╱ // 0x735 @0x8
0x072d…0738 at0009 = ╱99╱ EXIT ╱ // 0x736 @0x9
0x072d…0738 at000a = EOL // 0x737 @0xa
0x072d…0738 }
0x0738…0755 (24,) 94ac 0760 K=T+MPOSTANTAL6 DIV 160
0x0738…0755 LineComalBin {
0x0738…0755 ptr = 0x94ac // 0x738 @0x0
0x0738…0755 lno = 0x02f8 // 0x73a @0x2
0x0738…0755 at0004 = ╱4b╱K╱ // 0x73c @0x4
0x0738…0755 at0005 = ╱dc╱=╱ // 0x73d @0x5
0x0738…0755 at0006 = ╱54╱T╱ // 0x73e @0x6
0x0738…0755 at0007 = ╱e2╱+╱ // 0x73f @0x7
0x0738…0755 at0008 = ╱4d╱M╱ // 0x740 @0x8
0x0738…0755 at0009 = ╱50╱P╱ // 0x741 @0x9
0x0738…0755 at000a = ╱4f╱O╱ // 0x742 @0xa
0x0738…0755 at000b = ╱53╱S╱ // 0x743 @0xb
0x0738…0755 at000c = ╱54╱T╱ // 0x744 @0xc
0x0738…0755 at000d = ╱41╱A╱ // 0x745 @0xd
0x0738…0755 at000e = ╱4e╱N╱ // 0x746 @0xe
0x0738…0755 at000f = ╱54╱T╱ // 0x747 @0xf
0x0738…0755 at0010 = ╱41╱A╱ // 0x748 @0x10
0x0738…0755 at0011 = ╱4c╱L╱ // 0x749 @0x11
0x0738…0755 at0012 = ╱36╱6╱ // 0x74a @0x12
0x0738…0755 at0013 = ╱e7╱ DIV ╱ // 0x74b @0x13
0x0738…0755 at0014 = ╱31╱1╱ // 0x74c @0x14
0x0738…0755 at0015 = ╱36╱6╱ // 0x74d @0x15
0x0738…0755 at0016 = ╱30╱0╱ // 0x74e @0x16
0x0738…0755 at0017 = ╱fe0000a008╱ // 0x74f @0x17
0x0738…0755 at001c = EOL // 0x754 @0x1c
0x0738…0755 }
0x0755…076f 94c6 0770 EXEC UNDIND(K34$,K,UTAB3)
0x0755…076f LineComalBin {
0x0755…076f ptr = 0x94c6 // 0x755 @0x0
0x0755…076f lno = 0x0302 // 0x757 @0x2
0x0755…076f at0004 = ╱9d╱ EXEC ╱ // 0x759 @0x4
0x0755…076f at0005 = ╱55╱U╱ // 0x75a @0x5
0x0755…076f at0006 = ╱4e╱N╱ // 0x75b @0x6
0x0755…076f at0007 = ╱44╱D╱ // 0x75c @0x7
0x0755…076f at0008 = ╱49╱I╱ // 0x75d @0x8
0x0755…076f at0009 = ╱4e╱N╱ // 0x75e @0x9
0x0755…076f at000a = ╱44╱D╱ // 0x75f @0xa
0x0755…076f at000b = ╱ed╱(╱ // 0x760 @0xb
0x0755…076f at000c = ╱4b╱K╱ // 0x761 @0xc
0x0755…076f at000d = ╱33╱3╱ // 0x762 @0xd
0x0755…076f at000e = ╱34╱4╱ // 0x763 @0xe
0x0755…076f at000f = ╱ef╱$╱ // 0x764 @0xf
0x0755…076f at0010 = ╱ec╱,╱ // 0x765 @0x10
0x0755…076f at0011 = ╱4b╱K╱ // 0x766 @0x11
0x0755…076f at0012 = ╱ec╱,╱ // 0x767 @0x12
0x0755…076f at0013 = ╱55╱U╱ // 0x768 @0x13
0x0755…076f at0014 = ╱54╱T╱ // 0x769 @0x14
0x0755…076f at0015 = ╱41╱A╱ // 0x76a @0x15
0x0755…076f at0016 = ╱42╱B╱ // 0x76b @0x16
0x0755…076f at0017 = ╱33╱3╱ // 0x76c @0x17
0x0755…076f at0018 = ╱ee╱)╱ // 0x76d @0x18
0x0755…076f at0019 = EOL // 0x76e @0x19
0x0755…076f }
0x076f…077d 94d4 0780 FOR I=C TO E STEP -E
0x076f…077d LineComalBin {
0x076f…077d ptr = 0x94d4 // 0x76f @0x0
0x076f…077d lno = 0x030c // 0x771 @0x2
0x076f…077d at0004 = ╱83╱ FOR ╱ // 0x773 @0x4
0x076f…077d at0005 = ╱49╱I╱ // 0x774 @0x5
0x076f…077d at0006 = ╱dc╱=╱ // 0x775 @0x6
0x076f…077d at0007 = ╱43╱C╱ // 0x776 @0x7
0x076f…077d at0008 = ╱b7╱ TO ╱ // 0x777 @0x8
0x076f…077d at0009 = ╱45╱E╱ // 0x778 @0x9
0x076f…077d at000a = ╱b8╱ STEP ╱ // 0x779 @0xa
0x076f…077d at000b = ╱e9╱-╱ // 0x77a @0xb
0x076f…077d at000c = ╱45╱E╱ // 0x77b @0xc
0x076f…077d at000d = EOL // 0x77c @0xd
0x076f…077d }
0x077d…0796 94ed 0790 IF UTAB3(I,E)<NØGLE3 THEN EXIT
0x077d…0796 LineComalBin {
0x077d…0796 ptr = 0x94ed // 0x77d @0x0
0x077d…0796 lno = 0x0316 // 0x77f @0x2
0x077d…0796 at0004 = ╱82╱ IF ╱ // 0x781 @0x4
0x077d…0796 at0005 = ╱55╱U╱ // 0x782 @0x5
0x077d…0796 at0006 = ╱54╱T╱ // 0x783 @0x6
0x077d…0796 at0007 = ╱41╱A╱ // 0x784 @0x7
0x077d…0796 at0008 = ╱42╱B╱ // 0x785 @0x8
0x077d…0796 at0009 = ╱33╱3╱ // 0x786 @0x9
0x077d…0796 at000a = ╱ed╱(╱ // 0x787 @0xa
0x077d…0796 at000b = ╱49╱I╱ // 0x788 @0xb
0x077d…0796 at000c = ╱ec╱,╱ // 0x789 @0xc
0x077d…0796 at000d = ╱45╱E╱ // 0x78a @0xd
0x077d…0796 at000e = ╱ee╱)╱ // 0x78b @0xe
0x077d…0796 at000f = ╱dd╱<╱ // 0x78c @0xf
0x077d…0796 at0010 = ╱4e╱N╱ // 0x78d @0x10
0x077d…0796 at0011 = ╱5c╱Ø╱ // 0x78e @0x11
0x077d…0796 at0012 = ╱47╱G╱ // 0x78f @0x12
0x077d…0796 at0013 = ╱4c╱L╱ // 0x790 @0x13
0x077d…0796 at0014 = ╱45╱E╱ // 0x791 @0x14
0x077d…0796 at0015 = ╱33╱3╱ // 0x792 @0x15
0x077d…0796 at0016 = ╱b6╱ THEN ╱ // 0x793 @0x16
0x077d…0796 at0017 = ╱99╱ EXIT ╱ // 0x794 @0x17
0x077d…0796 at0018 = EOL // 0x795 @0x18
0x077d…0796 }
0x0796…079d 94f4 0800 NEXT I
0x0796…079d LineComalBin {
0x0796…079d ptr = 0x94f4 // 0x796 @0x0
0x0796…079d lno = 0x0320 // 0x798 @0x2
0x0796…079d at0004 = ╱84╱ NEXT ╱ // 0x79a @0x4
0x0796…079d at0005 = ╱49╱I╱ // 0x79b @0x5
0x0796…079d at0006 = EOL // 0x79c @0x6
0x0796…079d }
0x079d…07aa 9501 0810 IF I=B THEN I=E
0x079d…07aa LineComalBin {
0x079d…07aa ptr = 0x9501 // 0x79d @0x0
0x079d…07aa lno = 0x032a // 0x79f @0x2
0x079d…07aa at0004 = ╱82╱ IF ╱ // 0x7a1 @0x4
0x079d…07aa at0005 = ╱49╱I╱ // 0x7a2 @0x5
0x079d…07aa at0006 = ╱dc╱=╱ // 0x7a3 @0x6
0x079d…07aa at0007 = ╱42╱B╱ // 0x7a4 @0x7
0x079d…07aa at0008 = ╱b6╱ THEN ╱ // 0x7a5 @0x8
0x079d…07aa at0009 = ╱49╱I╱ // 0x7a6 @0x9
0x079d…07aa at000a = ╱dc╱=╱ // 0x7a7 @0xa
0x079d…07aa at000b = ╱45╱E╱ // 0x7a8 @0xb
0x079d…07aa at000c = EOL // 0x7a9 @0xc
0x079d…07aa }
0x07aa…07c2 9519 0820 IF UTAB3(I,G)<NØGLE3 THEN
0x07aa…07c2 LineComalBin {
0x07aa…07c2 ptr = 0x9519 // 0x7aa @0x0
0x07aa…07c2 lno = 0x0334 // 0x7ac @0x2
0x07aa…07c2 at0004 = ╱9c╱ IF ╱ // 0x7ae @0x4
0x07aa…07c2 at0005 = ╱55╱U╱ // 0x7af @0x5
0x07aa…07c2 at0006 = ╱54╱T╱ // 0x7b0 @0x6
0x07aa…07c2 at0007 = ╱41╱A╱ // 0x7b1 @0x7
0x07aa…07c2 at0008 = ╱42╱B╱ // 0x7b2 @0x8
0x07aa…07c2 at0009 = ╱33╱3╱ // 0x7b3 @0x9
0x07aa…07c2 at000a = ╱ed╱(╱ // 0x7b4 @0xa
0x07aa…07c2 at000b = ╱49╱I╱ // 0x7b5 @0xb
0x07aa…07c2 at000c = ╱ec╱,╱ // 0x7b6 @0xc
0x07aa…07c2 at000d = ╱47╱G╱ // 0x7b7 @0xd
0x07aa…07c2 at000e = ╱ee╱)╱ // 0x7b8 @0xe
0x07aa…07c2 at000f = ╱dd╱<╱ // 0x7b9 @0xf
0x07aa…07c2 at0010 = ╱4e╱N╱ // 0x7ba @0x10
0x07aa…07c2 at0011 = ╱5c╱Ø╱ // 0x7bb @0x11
0x07aa…07c2 at0012 = ╱47╱G╱ // 0x7bc @0x12
0x07aa…07c2 at0013 = ╱4c╱L╱ // 0x7bd @0x13
0x07aa…07c2 at0014 = ╱45╱E╱ // 0x7be @0x14
0x07aa…07c2 at0015 = ╱33╱3╱ // 0x7bf @0x15
0x07aa…07c2 at0016 = ╱b6╱ THEN ╱ // 0x7c0 @0x16
0x07aa…07c2 at0017 = EOL // 0x7c1 @0x17
0x07aa…07c2 }
0x07c2…07e2 9539 0825 T=(T-E)*40+I*10+E
0x07c2…07e2 LineComalBin {
0x07c2…07e2 ptr = 0x9539 // 0x7c2 @0x0
0x07c2…07e2 lno = 0x0339 // 0x7c4 @0x2
0x07c2…07e2 at0004 = ╱54╱T╱ // 0x7c6 @0x4
0x07c2…07e2 at0005 = ╱dc╱=╱ // 0x7c7 @0x5
0x07c2…07e2 at0006 = ╱ed╱(╱ // 0x7c8 @0x6
0x07c2…07e2 at0007 = ╱54╱T╱ // 0x7c9 @0x7
0x07c2…07e2 at0008 = ╱e3╱-╱ // 0x7ca @0x8
0x07c2…07e2 at0009 = ╱45╱E╱ // 0x7cb @0x9
0x07c2…07e2 at000a = ╱ee╱)╱ // 0x7cc @0xa
0x07c2…07e2 at000b = ╱e4╱*╱ // 0x7cd @0xb
0x07c2…07e2 at000c = ╱34╱4╱ // 0x7ce @0xc
0x07c2…07e2 at000d = ╱30╱0╱ // 0x7cf @0xd
0x07c2…07e2 at000e = ╱fe0000a006╱ // 0x7d0 @0xe
0x07c2…07e2 at0013 = ╱e2╱+╱ // 0x7d5 @0x13
0x07c2…07e2 at0014 = ╱49╱I╱ // 0x7d6 @0x14
0x07c2…07e2 at0015 = ╱e4╱*╱ // 0x7d7 @0x15
0x07c2…07e2 at0016 = ╱31╱1╱ // 0x7d8 @0x16
0x07c2…07e2 at0017 = ╱30╱0╱ // 0x7d9 @0x17
0x07c2…07e2 at0018 = ╱fe0000a004╱ // 0x7da @0x18
0x07c2…07e2 at001d = ╱e2╱+╱ // 0x7df @0x1d
0x07c2…07e2 at001e = ╱45╱E╱ // 0x7e0 @0x1e
0x07c2…07e2 at001f = EOL // 0x7e1 @0x1f
0x07c2…07e2 }
0x07e2…07ff 9556 0830 IF UTAB3(I+E,E)>NØGLE3 THEN T=B
0x07e2…07ff LineComalBin {
0x07e2…07ff ptr = 0x9556 // 0x7e2 @0x0
0x07e2…07ff lno = 0x033e // 0x7e4 @0x2
0x07e2…07ff at0004 = ╱82╱ IF ╱ // 0x7e6 @0x4
0x07e2…07ff at0005 = ╱55╱U╱ // 0x7e7 @0x5
0x07e2…07ff at0006 = ╱54╱T╱ // 0x7e8 @0x6
0x07e2…07ff at0007 = ╱41╱A╱ // 0x7e9 @0x7
0x07e2…07ff at0008 = ╱42╱B╱ // 0x7ea @0x8
0x07e2…07ff at0009 = ╱33╱3╱ // 0x7eb @0x9
0x07e2…07ff at000a = ╱ed╱(╱ // 0x7ec @0xa
0x07e2…07ff at000b = ╱49╱I╱ // 0x7ed @0xb
0x07e2…07ff at000c = ╱e2╱+╱ // 0x7ee @0xc
0x07e2…07ff at000d = ╱45╱E╱ // 0x7ef @0xd
0x07e2…07ff at000e = ╱ec╱,╱ // 0x7f0 @0xe
0x07e2…07ff at000f = ╱45╱E╱ // 0x7f1 @0xf
0x07e2…07ff at0010 = ╱ee╱)╱ // 0x7f2 @0x10
0x07e2…07ff at0011 = ╱de╱>╱ // 0x7f3 @0x11
0x07e2…07ff at0012 = ╱4e╱N╱ // 0x7f4 @0x12
0x07e2…07ff at0013 = ╱5c╱Ø╱ // 0x7f5 @0x13
0x07e2…07ff at0014 = ╱47╱G╱ // 0x7f6 @0x14
0x07e2…07ff at0015 = ╱4c╱L╱ // 0x7f7 @0x15
0x07e2…07ff at0016 = ╱45╱E╱ // 0x7f8 @0x16
0x07e2…07ff at0017 = ╱33╱3╱ // 0x7f9 @0x17
0x07e2…07ff at0018 = ╱b6╱ THEN ╱ // 0x7fa @0x18
0x07e2…07ff at0019 = ╱54╱T╱ // 0x7fb @0x19
0x07e2…07ff at001a = ╱dc╱=╱ // 0x7fc @0x1a
0x07e2…07ff at001b = ╱42╱B╱ // 0x7fd @0x1b
0x07e2…07ff at001c = EOL // 0x7fe @0x1c
0x07e2…07ff }
0x07ff…0805 955c 0880 ELSE
0x07ff…0805 LineComalBin {
0x07ff…0805 ptr = 0x955c // 0x7ff @0x0
0x07ff…0805 lno = 0x0370 // 0x801 @0x2
0x07ff…0805 at0004 = ╱9a╱ ELSE ╱ // 0x803 @0x4
0x07ff…0805 at0005 = EOL // 0x804 @0x5
0x07ff…0805 }
0x0805…0829 9580 0890 T=(T-E)*40+(I-E)*10+E
0x0805…0829 LineComalBin {
0x0805…0829 ptr = 0x9580 // 0x805 @0x0
0x0805…0829 lno = 0x037a // 0x807 @0x2
0x0805…0829 at0004 = ╱54╱T╱ // 0x809 @0x4
0x0805…0829 at0005 = ╱dc╱=╱ // 0x80a @0x5
0x0805…0829 at0006 = ╱ed╱(╱ // 0x80b @0x6
0x0805…0829 at0007 = ╱54╱T╱ // 0x80c @0x7
0x0805…0829 at0008 = ╱e3╱-╱ // 0x80d @0x8
0x0805…0829 at0009 = ╱45╱E╱ // 0x80e @0x9
0x0805…0829 at000a = ╱ee╱)╱ // 0x80f @0xa
0x0805…0829 at000b = ╱e4╱*╱ // 0x810 @0xb
0x0805…0829 at000c = ╱34╱4╱ // 0x811 @0xc
0x0805…0829 at000d = ╱30╱0╱ // 0x812 @0xd
0x0805…0829 at000e = ╱fe0000a006╱ // 0x813 @0xe
0x0805…0829 at0013 = ╱e2╱+╱ // 0x818 @0x13
0x0805…0829 at0014 = ╱ed╱(╱ // 0x819 @0x14
0x0805…0829 at0015 = ╱49╱I╱ // 0x81a @0x15
0x0805…0829 at0016 = ╱e3╱-╱ // 0x81b @0x16
0x0805…0829 at0017 = ╱45╱E╱ // 0x81c @0x17
0x0805…0829 at0018 = ╱ee╱)╱ // 0x81d @0x18
0x0805…0829 at0019 = ╱e4╱*╱ // 0x81e @0x19
0x0805…0829 at001a = ╱31╱1╱ // 0x81f @0x1a
0x0805…0829 at001b = ╱30╱0╱ // 0x820 @0x1b
0x0805…0829 at001c = ╱fe0000a004╱ // 0x821 @0x1c
0x0805…0829 at0021 = ╱e2╱+╱ // 0x826 @0x21
0x0805…0829 at0022 = ╱45╱E╱ // 0x827 @0x22
0x0805…0829 at0023 = EOL // 0x828 @0x23
0x0805…0829 }
0x0829…082f 9586 0900 ENDIF
0x0829…082f LineComalBin {
0x0829…082f ptr = 0x9586 // 0x829 @0x0
0x0829…082f lno = 0x0384 // 0x82b @0x2
0x0829…082f at0004 = ╱9b╱ ENDIF ╱ // 0x82d @0x4
0x0829…082f at0005 = EOL // 0x82e @0x5
0x0829…082f }
0x082f…0835 958c 0920 ENDPROC
0x082f…0835 LineComalBin {
0x082f…0835 ptr = 0x958c // 0x82f @0x0
0x082f…0835 lno = 0x0398 // 0x831 @0x2
0x082f…0835 at0004 = ╱9f╱ ENDPROC ╱ // 0x833 @0x4
0x082f…0835 at0005 = EOL // 0x834 @0x5
0x082f…0835 }
0x0835…0866 95bd 0930 PROC POSTER(K35,NØGLE4,T5,MPOSTANTAL7,PKODE,SU3)
0x0835…0866 LineComalBin {
0x0835…0866 ptr = 0x95bd // 0x835 @0x0
0x0835…0866 lno = 0x03a2 // 0x837 @0x2
0x0835…0866 at0004 = ╱9e╱ PROC ╱ // 0x839 @0x4
0x0835…0866 at0005 = ╱50╱P╱ // 0x83a @0x5
0x0835…0866 at0006 = ╱4f╱O╱ // 0x83b @0x6
0x0835…0866 at0007 = ╱53╱S╱ // 0x83c @0x7
0x0835…0866 at0008 = ╱54╱T╱ // 0x83d @0x8
0x0835…0866 at0009 = ╱45╱E╱ // 0x83e @0x9
0x0835…0866 at000a = ╱52╱R╱ // 0x83f @0xa
0x0835…0866 at000b = ╱ed╱(╱ // 0x840 @0xb
0x0835…0866 at000c = ╱4b╱K╱ // 0x841 @0xc
0x0835…0866 at000d = ╱33╱3╱ // 0x842 @0xd
0x0835…0866 at000e = ╱35╱5╱ // 0x843 @0xe
0x0835…0866 at000f = ╱ec╱,╱ // 0x844 @0xf
0x0835…0866 at0010 = ╱4e╱N╱ // 0x845 @0x10
0x0835…0866 at0011 = ╱5c╱Ø╱ // 0x846 @0x11
0x0835…0866 at0012 = ╱47╱G╱ // 0x847 @0x12
0x0835…0866 at0013 = ╱4c╱L╱ // 0x848 @0x13
0x0835…0866 at0014 = ╱45╱E╱ // 0x849 @0x14
0x0835…0866 at0015 = ╱34╱4╱ // 0x84a @0x15
0x0835…0866 at0016 = ╱ec╱,╱ // 0x84b @0x16
0x0835…0866 at0017 = ╱54╱T╱ // 0x84c @0x17
0x0835…0866 at0018 = ╱35╱5╱ // 0x84d @0x18
0x0835…0866 at0019 = ╱ec╱,╱ // 0x84e @0x19
0x0835…0866 at001a = ╱4d╱M╱ // 0x84f @0x1a
0x0835…0866 at001b = ╱50╱P╱ // 0x850 @0x1b
0x0835…0866 at001c = ╱4f╱O╱ // 0x851 @0x1c
0x0835…0866 at001d = ╱53╱S╱ // 0x852 @0x1d
0x0835…0866 at001e = ╱54╱T╱ // 0x853 @0x1e
0x0835…0866 at001f = ╱41╱A╱ // 0x854 @0x1f
0x0835…0866 at0020 = ╱4e╱N╱ // 0x855 @0x20
0x0835…0866 at0021 = ╱54╱T╱ // 0x856 @0x21
0x0835…0866 at0022 = ╱41╱A╱ // 0x857 @0x22
0x0835…0866 at0023 = ╱4c╱L╱ // 0x858 @0x23
0x0835…0866 at0024 = ╱37╱7╱ // 0x859 @0x24
0x0835…0866 at0025 = ╱ec╱,╱ // 0x85a @0x25
0x0835…0866 at0026 = ╱50╱P╱ // 0x85b @0x26
0x0835…0866 at0027 = ╱4b╱K╱ // 0x85c @0x27
0x0835…0866 at0028 = ╱4f╱O╱ // 0x85d @0x28
0x0835…0866 at0029 = ╱44╱D╱ // 0x85e @0x29
0x0835…0866 at002a = ╱45╱E╱ // 0x85f @0x2a
0x0835…0866 at002b = ╱ec╱,╱ // 0x860 @0x2b
0x0835…0866 at002c = ╱53╱S╱ // 0x861 @0x2c
0x0835…0866 at002d = ╱55╱U╱ // 0x862 @0x2d
0x0835…0866 at002e = ╱33╱3╱ // 0x863 @0x2e
0x0835…0866 at002f = ╱ee╱)╱ // 0x864 @0x2f
0x0835…0866 at0030 = EOL // 0x865 @0x30
0x0835…0866 }
0x0866…0872 95c9 0940 LINIE=B
0x0866…0872 LineComalBin {
0x0866…0872 ptr = 0x95c9 // 0x866 @0x0
0x0866…0872 lno = 0x03ac // 0x868 @0x2
0x0866…0872 at0004 = ╱4c╱L╱ // 0x86a @0x4
0x0866…0872 at0005 = ╱49╱I╱ // 0x86b @0x5
0x0866…0872 at0006 = ╱4e╱N╱ // 0x86c @0x6
0x0866…0872 at0007 = ╱49╱I╱ // 0x86d @0x7
0x0866…0872 at0008 = ╱45╱E╱ // 0x86e @0x8
0x0866…0872 at0009 = ╱dc╱=╱ // 0x86f @0x9
0x0866…0872 at000a = ╱42╱B╱ // 0x870 @0xa
0x0866…0872 at000b = EOL // 0x871 @0xb
0x0866…0872 }
0x0872…087e 95d5 0950 OPEN K35$,R
0x0872…087e LineComalBin {
0x0872…087e ptr = 0x95d5 // 0x872 @0x0
0x0872…087e lno = 0x03b6 // 0x874 @0x2
0x0872…087e at0004 = ╱a7╱ OPEN ╱ // 0x876 @0x4
0x0872…087e at0005 = ╱4b╱K╱ // 0x877 @0x5
0x0872…087e at0006 = ╱33╱3╱ // 0x878 @0x6
0x0872…087e at0007 = ╱35╱5╱ // 0x879 @0x7
0x0872…087e at0008 = ╱ef╱$╱ // 0x87a @0x8
0x0872…087e at0009 = ╱ec╱,╱ // 0x87b @0x9
0x0872…087e at000a = ╱52╱R╱ // 0x87c @0xa
0x0872…087e at000b = EOL // 0x87d @0xb
0x0872…087e }
0x087e…0892 95e9 0960 EXEC FEJL(E,E,K35$)
0x087e…0892 LineComalBin {
0x087e…0892 ptr = 0x95e9 // 0x87e @0x0
0x087e…0892 lno = 0x03c0 // 0x880 @0x2
0x087e…0892 at0004 = ╱9d╱ EXEC ╱ // 0x882 @0x4
0x087e…0892 at0005 = ╱46╱F╱ // 0x883 @0x5
0x087e…0892 at0006 = ╱45╱E╱ // 0x884 @0x6
0x087e…0892 at0007 = ╱4a╱J╱ // 0x885 @0x7
0x087e…0892 at0008 = ╱4c╱L╱ // 0x886 @0x8
0x087e…0892 at0009 = ╱ed╱(╱ // 0x887 @0x9
0x087e…0892 at000a = ╱45╱E╱ // 0x888 @0xa
0x087e…0892 at000b = ╱ec╱,╱ // 0x889 @0xb
0x087e…0892 at000c = ╱45╱E╱ // 0x88a @0xc
0x087e…0892 at000d = ╱ec╱,╱ // 0x88b @0xd
0x087e…0892 at000e = ╱4b╱K╱ // 0x88c @0xe
0x087e…0892 at000f = ╱33╱3╱ // 0x88d @0xf
0x087e…0892 at0010 = ╱35╱5╱ // 0x88e @0x10
0x087e…0892 at0011 = ╱ef╱$╱ // 0x88f @0x11
0x087e…0892 at0012 = ╱ee╱)╱ // 0x890 @0x12
0x087e…0892 at0013 = EOL // 0x891 @0x13
0x087e…0892 }
0x0892…08a3 95fa 0970 FOR I=E TO 10
0x0892…08a3 LineComalBin {
0x0892…08a3 ptr = 0x95fa // 0x892 @0x0
0x0892…08a3 lno = 0x03ca // 0x894 @0x2
0x0892…08a3 at0004 = ╱83╱ FOR ╱ // 0x896 @0x4
0x0892…08a3 at0005 = ╱49╱I╱ // 0x897 @0x5
0x0892…08a3 at0006 = ╱dc╱=╱ // 0x898 @0x6
0x0892…08a3 at0007 = ╱45╱E╱ // 0x899 @0x7
0x0892…08a3 at0008 = ╱b7╱ TO ╱ // 0x89a @0x8
0x0892…08a3 at0009 = ╱31╱1╱ // 0x89b @0x9
0x0892…08a3 at000a = ╱30╱0╱ // 0x89c @0xa
0x0892…08a3 at000b = ╱fe0000a004╱ // 0x89d @0xb
0x0892…08a3 at0010 = EOL // 0x8a2 @0x10
0x0892…08a3 }
0x08a3…08b6 960d 0980 GET K35$,T5:KTNUM
0x08a3…08b6 LineComalBin {
0x08a3…08b6 ptr = 0x960d // 0x8a3 @0x0
0x08a3…08b6 lno = 0x03d4 // 0x8a5 @0x2
0x08a3…08b6 at0004 = ╱a9╱ GET ╱ // 0x8a7 @0x4
0x08a3…08b6 at0005 = ╱4b╱K╱ // 0x8a8 @0x5
0x08a3…08b6 at0006 = ╱33╱3╱ // 0x8a9 @0x6
0x08a3…08b6 at0007 = ╱35╱5╱ // 0x8aa @0x7
0x08a3…08b6 at0008 = ╱ef╱$╱ // 0x8ab @0x8
0x08a3…08b6 at0009 = ╱ec╱,╱ // 0x8ac @0x9
0x08a3…08b6 at000a = ╱54╱T╱ // 0x8ad @0xa
0x08a3…08b6 at000b = ╱35╱5╱ // 0x8ae @0xb
0x08a3…08b6 at000c = ╱f0╱:╱ // 0x8af @0xc
0x08a3…08b6 at000d = ╱4b╱K╱ // 0x8b0 @0xd
0x08a3…08b6 at000e = ╱54╱T╱ // 0x8b1 @0xe
0x08a3…08b6 at000f = ╱4e╱N╱ // 0x8b2 @0xf
0x08a3…08b6 at0010 = ╱55╱U╱ // 0x8b3 @0x10
0x08a3…08b6 at0011 = ╱4d╱M╱ // 0x8b4 @0x11
0x08a3…08b6 at0012 = EOL // 0x8b5 @0x12
0x08a3…08b6 }
0x08b6…08ca 9621 0990 EXEC FEJL(E,G,K35$)
0x08b6…08ca LineComalBin {
0x08b6…08ca ptr = 0x9621 // 0x8b6 @0x0
0x08b6…08ca lno = 0x03de // 0x8b8 @0x2
0x08b6…08ca at0004 = ╱9d╱ EXEC ╱ // 0x8ba @0x4
0x08b6…08ca at0005 = ╱46╱F╱ // 0x8bb @0x5
0x08b6…08ca at0006 = ╱45╱E╱ // 0x8bc @0x6
0x08b6…08ca at0007 = ╱4a╱J╱ // 0x8bd @0x7
0x08b6…08ca at0008 = ╱4c╱L╱ // 0x8be @0x8
0x08b6…08ca at0009 = ╱ed╱(╱ // 0x8bf @0x9
0x08b6…08ca at000a = ╱45╱E╱ // 0x8c0 @0xa
0x08b6…08ca at000b = ╱ec╱,╱ // 0x8c1 @0xb
0x08b6…08ca at000c = ╱47╱G╱ // 0x8c2 @0xc
0x08b6…08ca at000d = ╱ec╱,╱ // 0x8c3 @0xd
0x08b6…08ca at000e = ╱4b╱K╱ // 0x8c4 @0xe
0x08b6…08ca at000f = ╱33╱3╱ // 0x8c5 @0xf
0x08b6…08ca at0010 = ╱35╱5╱ // 0x8c6 @0x10
0x08b6…08ca at0011 = ╱ef╱$╱ // 0x8c7 @0x11
0x08b6…08ca at0012 = ╱ee╱)╱ // 0x8c8 @0x12
0x08b6…08ca at0013 = EOL // 0x8c9 @0x13
0x08b6…08ca }
0x08ca…08e8 963f 1000 IF KTNUM=NØGLE4 OR MAFSLUT=E THEN EXIT
0x08ca…08e8 LineComalBin {
0x08ca…08e8 ptr = 0x963f // 0x8ca @0x0
0x08ca…08e8 lno = 0x03e8 // 0x8cc @0x2
0x08ca…08e8 at0004 = ╱82╱ IF ╱ // 0x8ce @0x4
0x08ca…08e8 at0005 = ╱4b╱K╱ // 0x8cf @0x5
0x08ca…08e8 at0006 = ╱54╱T╱ // 0x8d0 @0x6
0x08ca…08e8 at0007 = ╱4e╱N╱ // 0x8d1 @0x7
0x08ca…08e8 at0008 = ╱55╱U╱ // 0x8d2 @0x8
0x08ca…08e8 at0009 = ╱4d╱M╱ // 0x8d3 @0x9
0x08ca…08e8 at000a = ╱dc╱=╱ // 0x8d4 @0xa
0x08ca…08e8 at000b = ╱4e╱N╱ // 0x8d5 @0xb
0x08ca…08e8 at000c = ╱5c╱Ø╱ // 0x8d6 @0xc
0x08ca…08e8 at000d = ╱47╱G╱ // 0x8d7 @0xd
0x08ca…08e8 at000e = ╱4c╱L╱ // 0x8d8 @0xe
0x08ca…08e8 at000f = ╱45╱E╱ // 0x8d9 @0xf
0x08ca…08e8 at0010 = ╱34╱4╱ // 0x8da @0x10
0x08ca…08e8 at0011 = ╱db╱ OR ╱ // 0x8db @0x11
0x08ca…08e8 at0012 = ╱4d╱M╱ // 0x8dc @0x12
0x08ca…08e8 at0013 = ╱41╱A╱ // 0x8dd @0x13
0x08ca…08e8 at0014 = ╱46╱F╱ // 0x8de @0x14
0x08ca…08e8 at0015 = ╱53╱S╱ // 0x8df @0x15
0x08ca…08e8 at0016 = ╱4c╱L╱ // 0x8e0 @0x16
0x08ca…08e8 at0017 = ╱55╱U╱ // 0x8e1 @0x17
0x08ca…08e8 at0018 = ╱54╱T╱ // 0x8e2 @0x18
0x08ca…08e8 at0019 = ╱dc╱=╱ // 0x8e3 @0x19
0x08ca…08e8 at001a = ╱45╱E╱ // 0x8e4 @0x1a
0x08ca…08e8 at001b = ╱b6╱ THEN ╱ // 0x8e5 @0x1b
0x08ca…08e8 at001c = ╱99╱ EXIT ╱ // 0x8e6 @0x1c
0x08ca…08e8 at001d = EOL // 0x8e7 @0x1d
0x08ca…08e8 }
0x08e8…08f4 964b 1020 T5=T5+E
0x08e8…08f4 LineComalBin {
0x08e8…08f4 ptr = 0x964b // 0x8e8 @0x0
0x08e8…08f4 lno = 0x03fc // 0x8ea @0x2
0x08e8…08f4 at0004 = ╱54╱T╱ // 0x8ec @0x4
0x08e8…08f4 at0005 = ╱35╱5╱ // 0x8ed @0x5
0x08e8…08f4 at0006 = ╱dc╱=╱ // 0x8ee @0x6
0x08e8…08f4 at0007 = ╱54╱T╱ // 0x8ef @0x7
0x08e8…08f4 at0008 = ╱35╱5╱ // 0x8f0 @0x8
0x08e8…08f4 at0009 = ╱e2╱+╱ // 0x8f1 @0x9
0x08e8…08f4 at000a = ╱45╱E╱ // 0x8f2 @0xa
0x08e8…08f4 at000b = EOL // 0x8f3 @0xb
0x08e8…08f4 }
0x08f4…08fb 9652 1030 NEXT I
0x08f4…08fb LineComalBin {
0x08f4…08fb ptr = 0x9652 // 0x8f4 @0x0
0x08f4…08fb lno = 0x0406 // 0x8f6 @0x2
0x08f4…08fb at0004 = ╱84╱ NEXT ╱ // 0x8f8 @0x4
0x08f4…08fb at0005 = ╱49╱I╱ // 0x8f9 @0x5
0x08f4…08fb at0006 = EOL // 0x8fa @0x6
0x08f4…08fb }
0x08fb…090e 9665 1040 IF KTNUM=NØGLE4 THEN
0x08fb…090e LineComalBin {
0x08fb…090e ptr = 0x9665 // 0x8fb @0x0
0x08fb…090e lno = 0x0410 // 0x8fd @0x2
0x08fb…090e at0004 = ╱9c╱ IF ╱ // 0x8ff @0x4
0x08fb…090e at0005 = ╱4b╱K╱ // 0x900 @0x5
0x08fb…090e at0006 = ╱54╱T╱ // 0x901 @0x6
0x08fb…090e at0007 = ╱4e╱N╱ // 0x902 @0x7
0x08fb…090e at0008 = ╱55╱U╱ // 0x903 @0x8
0x08fb…090e at0009 = ╱4d╱M╱ // 0x904 @0x9
0x08fb…090e at000a = ╱dc╱=╱ // 0x905 @0xa
0x08fb…090e at000b = ╱4e╱N╱ // 0x906 @0xb
0x08fb…090e at000c = ╱5c╱Ø╱ // 0x907 @0xc
0x08fb…090e at000d = ╱47╱G╱ // 0x908 @0xd
0x08fb…090e at000e = ╱4c╱L╱ // 0x909 @0xe
0x08fb…090e at000f = ╱45╱E╱ // 0x90a @0xf
0x08fb…090e at0010 = ╱34╱4╱ // 0x90b @0x10
0x08fb…090e at0011 = ╱b6╱ THEN ╱ // 0x90c @0x11
0x08fb…090e at0012 = EOL // 0x90d @0x12
0x08fb…090e }
0x090e…0924 967b 1050 FOR K=T5 TO MPOSTANTAL7
0x090e…0924 LineComalBin {
0x090e…0924 ptr = 0x967b // 0x90e @0x0
0x090e…0924 lno = 0x041a // 0x910 @0x2
0x090e…0924 at0004 = ╱83╱ FOR ╱ // 0x912 @0x4
0x090e…0924 at0005 = ╱4b╱K╱ // 0x913 @0x5
0x090e…0924 at0006 = ╱dc╱=╱ // 0x914 @0x6
0x090e…0924 at0007 = ╱54╱T╱ // 0x915 @0x7
0x090e…0924 at0008 = ╱35╱5╱ // 0x916 @0x8
0x090e…0924 at0009 = ╱b7╱ TO ╱ // 0x917 @0x9
0x090e…0924 at000a = ╱4d╱M╱ // 0x918 @0xa
0x090e…0924 at000b = ╱50╱P╱ // 0x919 @0xb
0x090e…0924 at000c = ╱4f╱O╱ // 0x91a @0xc
0x090e…0924 at000d = ╱53╱S╱ // 0x91b @0xd
0x090e…0924 at000e = ╱54╱T╱ // 0x91c @0xe
0x090e…0924 at000f = ╱41╱A╱ // 0x91d @0xf
0x090e…0924 at0010 = ╱4e╱N╱ // 0x91e @0x10
0x090e…0924 at0011 = ╱54╱T╱ // 0x91f @0x11
0x090e…0924 at0012 = ╱41╱A╱ // 0x920 @0x12
0x090e…0924 at0013 = ╱4c╱L╱ // 0x921 @0x13
0x090e…0924 at0014 = ╱37╱7╱ // 0x922 @0x14
0x090e…0924 at0015 = EOL // 0x923 @0x15
0x090e…0924 }
0x0924…0956 96ad 1060 GET K35$,K:KONTO,DDATO,BILAG,TKODE$,BELØB$,ENTKO
0x0924…0956 LineComalBin {
0x0924…0956 ptr = 0x96ad // 0x924 @0x0
0x0924…0956 lno = 0x0424 // 0x926 @0x2
0x0924…0956 at0004 = ╱a9╱ GET ╱ // 0x928 @0x4
0x0924…0956 at0005 = ╱4b╱K╱ // 0x929 @0x5
0x0924…0956 at0006 = ╱33╱3╱ // 0x92a @0x6
0x0924…0956 at0007 = ╱35╱5╱ // 0x92b @0x7
0x0924…0956 at0008 = ╱ef╱$╱ // 0x92c @0x8
0x0924…0956 at0009 = ╱ec╱,╱ // 0x92d @0x9
0x0924…0956 at000a = ╱4b╱K╱ // 0x92e @0xa
0x0924…0956 at000b = ╱f0╱:╱ // 0x92f @0xb
0x0924…0956 at000c = ╱4b╱K╱ // 0x930 @0xc
0x0924…0956 at000d = ╱4f╱O╱ // 0x931 @0xd
0x0924…0956 at000e = ╱4e╱N╱ // 0x932 @0xe
0x0924…0956 at000f = ╱54╱T╱ // 0x933 @0xf
0x0924…0956 at0010 = ╱4f╱O╱ // 0x934 @0x10
0x0924…0956 at0011 = ╱ec╱,╱ // 0x935 @0x11
0x0924…0956 at0012 = ╱44╱D╱ // 0x936 @0x12
0x0924…0956 at0013 = ╱44╱D╱ // 0x937 @0x13
0x0924…0956 at0014 = ╱41╱A╱ // 0x938 @0x14
0x0924…0956 at0015 = ╱54╱T╱ // 0x939 @0x15
0x0924…0956 at0016 = ╱4f╱O╱ // 0x93a @0x16
0x0924…0956 at0017 = ╱ec╱,╱ // 0x93b @0x17
0x0924…0956 at0018 = ╱42╱B╱ // 0x93c @0x18
0x0924…0956 at0019 = ╱49╱I╱ // 0x93d @0x19
0x0924…0956 at001a = ╱4c╱L╱ // 0x93e @0x1a
0x0924…0956 at001b = ╱41╱A╱ // 0x93f @0x1b
0x0924…0956 at001c = ╱47╱G╱ // 0x940 @0x1c
0x0924…0956 at001d = ╱ec╱,╱ // 0x941 @0x1d
0x0924…0956 at001e = ╱54╱T╱ // 0x942 @0x1e
0x0924…0956 at001f = ╱4b╱K╱ // 0x943 @0x1f
0x0924…0956 at0020 = ╱4f╱O╱ // 0x944 @0x20
0x0924…0956 at0021 = ╱44╱D╱ // 0x945 @0x21
0x0924…0956 at0022 = ╱45╱E╱ // 0x946 @0x22
0x0924…0956 at0023 = ╱ef╱$╱ // 0x947 @0x23
0x0924…0956 at0024 = ╱ec╱,╱ // 0x948 @0x24
0x0924…0956 at0025 = ╱42╱B╱ // 0x949 @0x25
0x0924…0956 at0026 = ╱45╱E╱ // 0x94a @0x26
0x0924…0956 at0027 = ╱4c╱L╱ // 0x94b @0x27
0x0924…0956 at0028 = ╱5c╱Ø╱ // 0x94c @0x28
0x0924…0956 at0029 = ╱42╱B╱ // 0x94d @0x29
0x0924…0956 at002a = ╱ef╱$╱ // 0x94e @0x2a
0x0924…0956 at002b = ╱ec╱,╱ // 0x94f @0x2b
0x0924…0956 at002c = ╱45╱E╱ // 0x950 @0x2c
0x0924…0956 at002d = ╱4e╱N╱ // 0x951 @0x2d
0x0924…0956 at002e = ╱54╱T╱ // 0x952 @0x2e
0x0924…0956 at002f = ╱4b╱K╱ // 0x953 @0x2f
0x0924…0956 at0030 = ╱4f╱O╱ // 0x954 @0x30
0x0924…0956 at0031 = EOL // 0x955 @0x31
0x0924…0956 }
0x0956…096a 96c1 1070 EXEC FEJL(E,V,K35$)
0x0956…096a LineComalBin {
0x0956…096a ptr = 0x96c1 // 0x956 @0x0
0x0956…096a lno = 0x042e // 0x958 @0x2
0x0956…096a at0004 = ╱9d╱ EXEC ╱ // 0x95a @0x4
0x0956…096a at0005 = ╱46╱F╱ // 0x95b @0x5
0x0956…096a at0006 = ╱45╱E╱ // 0x95c @0x6
0x0956…096a at0007 = ╱4a╱J╱ // 0x95d @0x7
0x0956…096a at0008 = ╱4c╱L╱ // 0x95e @0x8
0x0956…096a at0009 = ╱ed╱(╱ // 0x95f @0x9
0x0956…096a at000a = ╱45╱E╱ // 0x960 @0xa
0x0956…096a at000b = ╱ec╱,╱ // 0x961 @0xb
0x0956…096a at000c = ╱56╱V╱ // 0x962 @0xc
0x0956…096a at000d = ╱ec╱,╱ // 0x963 @0xd
0x0956…096a at000e = ╱4b╱K╱ // 0x964 @0xe
0x0956…096a at000f = ╱33╱3╱ // 0x965 @0xf
0x0956…096a at0010 = ╱35╱5╱ // 0x966 @0x10
0x0956…096a at0011 = ╱ef╱$╱ // 0x967 @0x11
0x0956…096a at0012 = ╱ee╱)╱ // 0x968 @0x12
0x0956…096a at0013 = EOL // 0x969 @0x13
0x0956…096a }
0x096a…097e 96d5 1080 IF KONTO<>NØGLE4 THEN EXIT
0x096a…097e LineComalBin {
0x096a…097e ptr = 0x96d5 // 0x96a @0x0
0x096a…097e lno = 0x0438 // 0x96c @0x2
0x096a…097e at0004 = ╱82╱ IF ╱ // 0x96e @0x4
0x096a…097e at0005 = ╱4b╱K╱ // 0x96f @0x5
0x096a…097e at0006 = ╱4f╱O╱ // 0x970 @0x6
0x096a…097e at0007 = ╱4e╱N╱ // 0x971 @0x7
0x096a…097e at0008 = ╱54╱T╱ // 0x972 @0x8
0x096a…097e at0009 = ╱4f╱O╱ // 0x973 @0x9
0x096a…097e at000a = ╱e1╱<>╱ // 0x974 @0xa
0x096a…097e at000b = ╱4e╱N╱ // 0x975 @0xb
0x096a…097e at000c = ╱5c╱Ø╱ // 0x976 @0xc
0x096a…097e at000d = ╱47╱G╱ // 0x977 @0xd
0x096a…097e at000e = ╱4c╱L╱ // 0x978 @0xe
0x096a…097e at000f = ╱45╱E╱ // 0x979 @0xf
0x096a…097e at0010 = ╱34╱4╱ // 0x97a @0x10
0x096a…097e at0011 = ╱b6╱ THEN ╱ // 0x97b @0x11
0x096a…097e at0012 = ╱99╱ EXIT ╱ // 0x97c @0x12
0x096a…097e at0013 = EOL // 0x97d @0x13
0x096a…097e }
0x097e…09b7 970e 1090 TKS=ORD(TKODE$)-48;TKS9=TKS-10*(TKS>20)
0x097e…09b7 LineComalBin {
0x097e…09b7 ptr = 0x970e // 0x97e @0x0
0x097e…09b7 lno = 0x0442 // 0x980 @0x2
0x097e…09b7 at0004 = ╱54╱T╱ // 0x982 @0x4
0x097e…09b7 at0005 = ╱4b╱K╱ // 0x983 @0x5
0x097e…09b7 at0006 = ╱53╱S╱ // 0x984 @0x6
0x097e…09b7 at0007 = ╱dc╱=╱ // 0x985 @0x7
0x097e…09b7 at0008 = ╱cd╱ORD╱ // 0x986 @0x8
0x097e…09b7 at0009 = ╱ed╱(╱ // 0x987 @0x9
0x097e…09b7 at000a = ╱54╱T╱ // 0x988 @0xa
0x097e…09b7 at000b = ╱4b╱K╱ // 0x989 @0xb
0x097e…09b7 at000c = ╱4f╱O╱ // 0x98a @0xc
0x097e…09b7 at000d = ╱44╱D╱ // 0x98b @0xd
0x097e…09b7 at000e = ╱45╱E╱ // 0x98c @0xe
0x097e…09b7 at000f = ╱ef╱$╱ // 0x98d @0xf
0x097e…09b7 at0010 = ╱ee╱)╱ // 0x98e @0x10
0x097e…09b7 at0011 = ╱e3╱-╱ // 0x98f @0x11
0x097e…09b7 at0012 = ╱34╱4╱ // 0x990 @0x12
0x097e…09b7 at0013 = ╱38╱8╱ // 0x991 @0x13
0x097e…09b7 at0014 = ╱fe0000c006╱ // 0x992 @0x14
0x097e…09b7 at0019 = ╱eb╱;╱ // 0x997 @0x19
0x097e…09b7 at001a = ╱54╱T╱ // 0x998 @0x1a
0x097e…09b7 at001b = ╱4b╱K╱ // 0x999 @0x1b
0x097e…09b7 at001c = ╱53╱S╱ // 0x99a @0x1c
0x097e…09b7 at001d = ╱39╱9╱ // 0x99b @0x1d
0x097e…09b7 at001e = ╱dc╱=╱ // 0x99c @0x1e
0x097e…09b7 at001f = ╱54╱T╱ // 0x99d @0x1f
0x097e…09b7 at0020 = ╱4b╱K╱ // 0x99e @0x20
0x097e…09b7 at0021 = ╱53╱S╱ // 0x99f @0x21
0x097e…09b7 at0022 = ╱e3╱-╱ // 0x9a0 @0x22
0x097e…09b7 at0023 = ╱31╱1╱ // 0x9a1 @0x23
0x097e…09b7 at0024 = ╱30╱0╱ // 0x9a2 @0x24
0x097e…09b7 at0025 = ╱fe0000a004╱ // 0x9a3 @0x25
0x097e…09b7 at002a = ╱e4╱*╱ // 0x9a8 @0x2a
0x097e…09b7 at002b = ╱ed╱(╱ // 0x9a9 @0x2b
0x097e…09b7 at002c = ╱54╱T╱ // 0x9aa @0x2c
0x097e…09b7 at002d = ╱4b╱K╱ // 0x9ab @0x2d
0x097e…09b7 at002e = ╱53╱S╱ // 0x9ac @0x2e
0x097e…09b7 at002f = ╱de╱>╱ // 0x9ad @0x2f
0x097e…09b7 at0030 = ╱32╱2╱ // 0x9ae @0x30
0x097e…09b7 at0031 = ╱30╱0╱ // 0x9af @0x31
0x097e…09b7 at0032 = ╱fe0000a005╱ // 0x9b0 @0x32
0x097e…09b7 at0037 = ╱ee╱)╱ // 0x9b5 @0x37
0x097e…09b7 at0038 = EOL // 0x9b6 @0x38
0x097e…09b7 }
0x09b7…09cf 9726 1100 IF TKS>W AND TKS<20 THEN
0x09b7…09cf LineComalBin {
0x09b7…09cf ptr = 0x9726 // 0x9b7 @0x0
0x09b7…09cf lno = 0x044c // 0x9b9 @0x2
0x09b7…09cf at0004 = ╱9c╱ IF ╱ // 0x9bb @0x4
0x09b7…09cf at0005 = ╱54╱T╱ // 0x9bc @0x5
0x09b7…09cf at0006 = ╱4b╱K╱ // 0x9bd @0x6
0x09b7…09cf at0007 = ╱53╱S╱ // 0x9be @0x7
0x09b7…09cf at0008 = ╱de╱>╱ // 0x9bf @0x8
0x09b7…09cf at0009 = ╱57╱W╱ // 0x9c0 @0x9
0x09b7…09cf at000a = ╱da╱ AND ╱ // 0x9c1 @0xa
0x09b7…09cf at000b = ╱54╱T╱ // 0x9c2 @0xb
0x09b7…09cf at000c = ╱4b╱K╱ // 0x9c3 @0xc
0x09b7…09cf at000d = ╱53╱S╱ // 0x9c4 @0xd
0x09b7…09cf at000e = ╱dd╱<╱ // 0x9c5 @0xe
0x09b7…09cf at000f = ╱32╱2╱ // 0x9c6 @0xf
0x09b7…09cf at0010 = ╱30╱0╱ // 0x9c7 @0x10
0x09b7…09cf at0011 = ╱fe0000a005╱ // 0x9c8 @0x11
0x09b7…09cf at0016 = ╱b6╱ THEN ╱ // 0x9cd @0x16
0x09b7…09cf at0017 = EOL // 0x9ce @0x17
0x09b7…09cf }
0x09cf…09d9 9730 1110 K=K+E
0x09cf…09d9 LineComalBin {
0x09cf…09d9 ptr = 0x9730 // 0x9cf @0x0
0x09cf…09d9 lno = 0x0456 // 0x9d1 @0x2
0x09cf…09d9 at0004 = ╱4b╱K╱ // 0x9d3 @0x4
0x09cf…09d9 at0005 = ╱dc╱=╱ // 0x9d4 @0x5
0x09cf…09d9 at0006 = ╱4b╱K╱ // 0x9d5 @0x6
0x09cf…09d9 at0007 = ╱e2╱+╱ // 0x9d6 @0x7
0x09cf…09d9 at0008 = ╱45╱E╱ // 0x9d7 @0x8
0x09cf…09d9 at0009 = EOL // 0x9d8 @0x9
0x09cf…09d9 }
0x09d9…09f2 9749 1120 GET K35$,K:KONTO,TEKST$
0x09d9…09f2 LineComalBin {
0x09d9…09f2 ptr = 0x9749 // 0x9d9 @0x0
0x09d9…09f2 lno = 0x0460 // 0x9db @0x2
0x09d9…09f2 at0004 = ╱a9╱ GET ╱ // 0x9dd @0x4
0x09d9…09f2 at0005 = ╱4b╱K╱ // 0x9de @0x5
0x09d9…09f2 at0006 = ╱33╱3╱ // 0x9df @0x6
0x09d9…09f2 at0007 = ╱35╱5╱ // 0x9e0 @0x7
0x09d9…09f2 at0008 = ╱ef╱$╱ // 0x9e1 @0x8
0x09d9…09f2 at0009 = ╱ec╱,╱ // 0x9e2 @0x9
0x09d9…09f2 at000a = ╱4b╱K╱ // 0x9e3 @0xa
0x09d9…09f2 at000b = ╱f0╱:╱ // 0x9e4 @0xb
0x09d9…09f2 at000c = ╱4b╱K╱ // 0x9e5 @0xc
0x09d9…09f2 at000d = ╱4f╱O╱ // 0x9e6 @0xd
0x09d9…09f2 at000e = ╱4e╱N╱ // 0x9e7 @0xe
0x09d9…09f2 at000f = ╱54╱T╱ // 0x9e8 @0xf
0x09d9…09f2 at0010 = ╱4f╱O╱ // 0x9e9 @0x10
0x09d9…09f2 at0011 = ╱ec╱,╱ // 0x9ea @0x11
0x09d9…09f2 at0012 = ╱54╱T╱ // 0x9eb @0x12
0x09d9…09f2 at0013 = ╱45╱E╱ // 0x9ec @0x13
0x09d9…09f2 at0014 = ╱4b╱K╱ // 0x9ed @0x14
0x09d9…09f2 at0015 = ╱53╱S╱ // 0x9ee @0x15
0x09d9…09f2 at0016 = ╱54╱T╱ // 0x9ef @0x16
0x09d9…09f2 at0017 = ╱ef╱$╱ // 0x9f0 @0x17
0x09d9…09f2 at0018 = EOL // 0x9f1 @0x18
0x09d9…09f2 }
0x09f2…0a06 975d 1130 EXEC FEJL(E,C,K35$)
0x09f2…0a06 LineComalBin {
0x09f2…0a06 ptr = 0x975d // 0x9f2 @0x0
0x09f2…0a06 lno = 0x046a // 0x9f4 @0x2
0x09f2…0a06 at0004 = ╱9d╱ EXEC ╱ // 0x9f6 @0x4
0x09f2…0a06 at0005 = ╱46╱F╱ // 0x9f7 @0x5
0x09f2…0a06 at0006 = ╱45╱E╱ // 0x9f8 @0x6
0x09f2…0a06 at0007 = ╱4a╱J╱ // 0x9f9 @0x7
0x09f2…0a06 at0008 = ╱4c╱L╱ // 0x9fa @0x8
0x09f2…0a06 at0009 = ╱ed╱(╱ // 0x9fb @0x9
0x09f2…0a06 at000a = ╱45╱E╱ // 0x9fc @0xa
0x09f2…0a06 at000b = ╱ec╱,╱ // 0x9fd @0xb
0x09f2…0a06 at000c = ╱43╱C╱ // 0x9fe @0xc
0x09f2…0a06 at000d = ╱ec╱,╱ // 0x9ff @0xd
0x09f2…0a06 at000e = ╱4b╱K╱ // 0xa00 @0xe
0x09f2…0a06 at000f = ╱33╱3╱ // 0xa01 @0xf
0x09f2…0a06 at0010 = ╱35╱5╱ // 0xa02 @0x10
0x09f2…0a06 at0011 = ╱ef╱$╱ // 0xa03 @0x11
0x09f2…0a06 at0012 = ╱ee╱)╱ // 0xa04 @0x12
0x09f2…0a06 at0013 = EOL // 0xa05 @0x13
0x09f2…0a06 }
0x0a06…0a0c 9763 1150 ELSE
0x0a06…0a0c LineComalBin {
0x0a06…0a0c ptr = 0x9763 // 0xa06 @0x0
0x0a06…0a0c lno = 0x047e // 0xa08 @0x2
0x0a06…0a0c at0004 = ╱9a╱ ELSE ╱ // 0xa0a @0x4
0x0a06…0a0c at0005 = EOL // 0xa0b @0x5
0x0a06…0a0c }
0x0a0c…0a36 978d 1160 IF TKS>B AND TKS<30 THEN TEKST$=TFIL$(TKS9)
0x0a0c…0a36 LineComalBin {
0x0a0c…0a36 ptr = 0x978d // 0xa0c @0x0
0x0a0c…0a36 lno = 0x0488 // 0xa0e @0x2
0x0a0c…0a36 at0004 = ╱82╱ IF ╱ // 0xa10 @0x4
0x0a0c…0a36 at0005 = ╱54╱T╱ // 0xa11 @0x5
0x0a0c…0a36 at0006 = ╱4b╱K╱ // 0xa12 @0x6
0x0a0c…0a36 at0007 = ╱53╱S╱ // 0xa13 @0x7
0x0a0c…0a36 at0008 = ╱de╱>╱ // 0xa14 @0x8
0x0a0c…0a36 at0009 = ╱42╱B╱ // 0xa15 @0x9
0x0a0c…0a36 at000a = ╱da╱ AND ╱ // 0xa16 @0xa
0x0a0c…0a36 at000b = ╱54╱T╱ // 0xa17 @0xb
0x0a0c…0a36 at000c = ╱4b╱K╱ // 0xa18 @0xc
0x0a0c…0a36 at000d = ╱53╱S╱ // 0xa19 @0xd
0x0a0c…0a36 at000e = ╱dd╱<╱ // 0xa1a @0xe
0x0a0c…0a36 at000f = ╱33╱3╱ // 0xa1b @0xf
0x0a0c…0a36 at0010 = ╱30╱0╱ // 0xa1c @0x10
0x0a0c…0a36 at0011 = ╱fe0000f005╱ // 0xa1d @0x11
0x0a0c…0a36 at0016 = ╱b6╱ THEN ╱ // 0xa22 @0x16
0x0a0c…0a36 at0017 = ╱54╱T╱ // 0xa23 @0x17
0x0a0c…0a36 at0018 = ╱45╱E╱ // 0xa24 @0x18
0x0a0c…0a36 at0019 = ╱4b╱K╱ // 0xa25 @0x19
0x0a0c…0a36 at001a = ╱53╱S╱ // 0xa26 @0x1a
0x0a0c…0a36 at001b = ╱54╱T╱ // 0xa27 @0x1b
0x0a0c…0a36 at001c = ╱ef╱$╱ // 0xa28 @0x1c
0x0a0c…0a36 at001d = ╱dc╱=╱ // 0xa29 @0x1d
0x0a0c…0a36 at001e = ╱54╱T╱ // 0xa2a @0x1e
0x0a0c…0a36 at001f = ╱46╱F╱ // 0xa2b @0x1f
0x0a0c…0a36 at0020 = ╱49╱I╱ // 0xa2c @0x20
0x0a0c…0a36 at0021 = ╱4c╱L╱ // 0xa2d @0x21
0x0a0c…0a36 at0022 = ╱ef╱$╱ // 0xa2e @0x22
0x0a0c…0a36 at0023 = ╱ed╱(╱ // 0xa2f @0x23
0x0a0c…0a36 at0024 = ╱54╱T╱ // 0xa30 @0x24
0x0a0c…0a36 at0025 = ╱4b╱K╱ // 0xa31 @0x25
0x0a0c…0a36 at0026 = ╱53╱S╱ // 0xa32 @0x26
0x0a0c…0a36 at0027 = ╱39╱9╱ // 0xa33 @0x27
0x0a0c…0a36 at0028 = ╱ee╱)╱ // 0xa34 @0x28
0x0a0c…0a36 at0029 = EOL // 0xa35 @0x29
0x0a0c…0a36 }
0x0a36…0a3c 9793 1210 ENDIF
0x0a36…0a3c LineComalBin {
0x0a36…0a3c ptr = 0x9793 // 0xa36 @0x0
0x0a36…0a3c lno = 0x04ba // 0xa38 @0x2
0x0a36…0a3c at0004 = ╱9b╱ ENDIF ╱ // 0xa3a @0x4
0x0a36…0a3c at0005 = EOL // 0xa3b @0x5
0x0a36…0a3c }
0x0a3c…0a55 97ac 1215 TEKST$=TEKST$+BLANK$
0x0a3c…0a55 LineComalBin {
0x0a3c…0a55 ptr = 0x97ac // 0xa3c @0x0
0x0a3c…0a55 lno = 0x04bf // 0xa3e @0x2
0x0a3c…0a55 at0004 = ╱54╱T╱ // 0xa40 @0x4
0x0a3c…0a55 at0005 = ╱45╱E╱ // 0xa41 @0x5
0x0a3c…0a55 at0006 = ╱4b╱K╱ // 0xa42 @0x6
0x0a3c…0a55 at0007 = ╱53╱S╱ // 0xa43 @0x7
0x0a3c…0a55 at0008 = ╱54╱T╱ // 0xa44 @0x8
0x0a3c…0a55 at0009 = ╱ef╱$╱ // 0xa45 @0x9
0x0a3c…0a55 at000a = ╱dc╱=╱ // 0xa46 @0xa
0x0a3c…0a55 at000b = ╱54╱T╱ // 0xa47 @0xb
0x0a3c…0a55 at000c = ╱45╱E╱ // 0xa48 @0xc
0x0a3c…0a55 at000d = ╱4b╱K╱ // 0xa49 @0xd
0x0a3c…0a55 at000e = ╱53╱S╱ // 0xa4a @0xe
0x0a3c…0a55 at000f = ╱54╱T╱ // 0xa4b @0xf
0x0a3c…0a55 at0010 = ╱ef╱$╱ // 0xa4c @0x10
0x0a3c…0a55 at0011 = ╱f1╱+╱ // 0xa4d @0x11
0x0a3c…0a55 at0012 = ╱42╱B╱ // 0xa4e @0x12
0x0a3c…0a55 at0013 = ╱4c╱L╱ // 0xa4f @0x13
0x0a3c…0a55 at0014 = ╱41╱A╱ // 0xa50 @0x14
0x0a3c…0a55 at0015 = ╱4e╱N╱ // 0xa51 @0x15
0x0a3c…0a55 at0016 = ╱4b╱K╱ // 0xa52 @0x16
0x0a3c…0a55 at0017 = ╱ef╱$╱ // 0xa53 @0x17
0x0a3c…0a55 at0018 = EOL // 0xa54 @0x18
0x0a3c…0a55 }
0x0a55…0a81 97d8 1220 IF TKS<30 THEN EXEC UDSKRIV(PKODE,SU3$,LINIE)
0x0a55…0a81 LineComalBin {
0x0a55…0a81 ptr = 0x97d8 // 0xa55 @0x0
0x0a55…0a81 lno = 0x04c4 // 0xa57 @0x2
0x0a55…0a81 at0004 = ╱82╱ IF ╱ // 0xa59 @0x4
0x0a55…0a81 at0005 = ╱54╱T╱ // 0xa5a @0x5
0x0a55…0a81 at0006 = ╱4b╱K╱ // 0xa5b @0x6
0x0a55…0a81 at0007 = ╱53╱S╱ // 0xa5c @0x7
0x0a55…0a81 at0008 = ╱dd╱<╱ // 0xa5d @0x8
0x0a55…0a81 at0009 = ╱33╱3╱ // 0xa5e @0x9
0x0a55…0a81 at000a = ╱30╱0╱ // 0xa5f @0xa
0x0a55…0a81 at000b = ╱fe0000f005╱ // 0xa60 @0xb
0x0a55…0a81 at0010 = ╱b6╱ THEN ╱ // 0xa65 @0x10
0x0a55…0a81 at0011 = ╱9d╱ EXEC ╱ // 0xa66 @0x11
0x0a55…0a81 at0012 = ╱55╱U╱ // 0xa67 @0x12
0x0a55…0a81 at0013 = ╱44╱D╱ // 0xa68 @0x13
0x0a55…0a81 at0014 = ╱53╱S╱ // 0xa69 @0x14
0x0a55…0a81 at0015 = ╱4b╱K╱ // 0xa6a @0x15
0x0a55…0a81 at0016 = ╱52╱R╱ // 0xa6b @0x16
0x0a55…0a81 at0017 = ╱49╱I╱ // 0xa6c @0x17
0x0a55…0a81 at0018 = ╱56╱V╱ // 0xa6d @0x18
0x0a55…0a81 at0019 = ╱ed╱(╱ // 0xa6e @0x19
0x0a55…0a81 at001a = ╱50╱P╱ // 0xa6f @0x1a
0x0a55…0a81 at001b = ╱4b╱K╱ // 0xa70 @0x1b
0x0a55…0a81 at001c = ╱4f╱O╱ // 0xa71 @0x1c
0x0a55…0a81 at001d = ╱44╱D╱ // 0xa72 @0x1d
0x0a55…0a81 at001e = ╱45╱E╱ // 0xa73 @0x1e
0x0a55…0a81 at001f = ╱ec╱,╱ // 0xa74 @0x1f
0x0a55…0a81 at0020 = ╱53╱S╱ // 0xa75 @0x20
0x0a55…0a81 at0021 = ╱55╱U╱ // 0xa76 @0x21
0x0a55…0a81 at0022 = ╱33╱3╱ // 0xa77 @0x22
0x0a55…0a81 at0023 = ╱ef╱$╱ // 0xa78 @0x23
0x0a55…0a81 at0024 = ╱ec╱,╱ // 0xa79 @0x24
0x0a55…0a81 at0025 = ╱4c╱L╱ // 0xa7a @0x25
0x0a55…0a81 at0026 = ╱49╱I╱ // 0xa7b @0x26
0x0a55…0a81 at0027 = ╱4e╱N╱ // 0xa7c @0x27
0x0a55…0a81 at0028 = ╱49╱I╱ // 0xa7d @0x28
0x0a55…0a81 at0029 = ╱45╱E╱ // 0xa7e @0x29
0x0a55…0a81 at002a = ╱ee╱)╱ // 0xa7f @0x2a
0x0a55…0a81 at002b = EOL // 0xa80 @0x2b
0x0a55…0a81 }
0x0a81…0a88 97df 1230 NEXT K
0x0a81…0a88 LineComalBin {
0x0a81…0a88 ptr = 0x97df // 0xa81 @0x0
0x0a81…0a88 lno = 0x04ce // 0xa83 @0x2
0x0a81…0a88 at0004 = ╱84╱ NEXT ╱ // 0xa85 @0x4
0x0a81…0a88 at0005 = ╱4b╱K╱ // 0xa86 @0x5
0x0a81…0a88 at0006 = EOL // 0xa87 @0x6
0x0a81…0a88 }
0x0a88…0aa9 9800 1240 IF MAFSLUT=E THEN T6=K;NØGLE4=KONTO
0x0a88…0aa9 LineComalBin {
0x0a88…0aa9 ptr = 0x9800 // 0xa88 @0x0
0x0a88…0aa9 lno = 0x04d8 // 0xa8a @0x2
0x0a88…0aa9 at0004 = ╱82╱ IF ╱ // 0xa8c @0x4
0x0a88…0aa9 at0005 = ╱4d╱M╱ // 0xa8d @0x5
0x0a88…0aa9 at0006 = ╱41╱A╱ // 0xa8e @0x6
0x0a88…0aa9 at0007 = ╱46╱F╱ // 0xa8f @0x7
0x0a88…0aa9 at0008 = ╱53╱S╱ // 0xa90 @0x8
0x0a88…0aa9 at0009 = ╱4c╱L╱ // 0xa91 @0x9
0x0a88…0aa9 at000a = ╱55╱U╱ // 0xa92 @0xa
0x0a88…0aa9 at000b = ╱54╱T╱ // 0xa93 @0xb
0x0a88…0aa9 at000c = ╱dc╱=╱ // 0xa94 @0xc
0x0a88…0aa9 at000d = ╱45╱E╱ // 0xa95 @0xd
0x0a88…0aa9 at000e = ╱b6╱ THEN ╱ // 0xa96 @0xe
0x0a88…0aa9 at000f = ╱54╱T╱ // 0xa97 @0xf
0x0a88…0aa9 at0010 = ╱36╱6╱ // 0xa98 @0x10
0x0a88…0aa9 at0011 = ╱dc╱=╱ // 0xa99 @0x11
0x0a88…0aa9 at0012 = ╱4b╱K╱ // 0xa9a @0x12
0x0a88…0aa9 at0013 = ╱eb╱;╱ // 0xa9b @0x13
0x0a88…0aa9 at0014 = ╱4e╱N╱ // 0xa9c @0x14
0x0a88…0aa9 at0015 = ╱5c╱Ø╱ // 0xa9d @0x15
0x0a88…0aa9 at0016 = ╱47╱G╱ // 0xa9e @0x16
0x0a88…0aa9 at0017 = ╱4c╱L╱ // 0xa9f @0x17
0x0a88…0aa9 at0018 = ╱45╱E╱ // 0xaa0 @0x18
0x0a88…0aa9 at0019 = ╱34╱4╱ // 0xaa1 @0x19
0x0a88…0aa9 at001a = ╱dc╱=╱ // 0xaa2 @0x1a
0x0a88…0aa9 at001b = ╱4b╱K╱ // 0xaa3 @0x1b
0x0a88…0aa9 at001c = ╱4f╱O╱ // 0xaa4 @0x1c
0x0a88…0aa9 at001d = ╱4e╱N╱ // 0xaa5 @0x1d
0x0a88…0aa9 at001e = ╱54╱T╱ // 0xaa6 @0x1e
0x0a88…0aa9 at001f = ╱4f╱O╱ // 0xaa7 @0x1f
0x0a88…0aa9 at0020 = EOL // 0xaa8 @0x20
0x0a88…0aa9 }
0x0aa9…0aaf 9806 1270 ELSE
0x0aa9…0aaf LineComalBin {
0x0aa9…0aaf ptr = 0x9806 // 0xaa9 @0x0
0x0aa9…0aaf lno = 0x04f6 // 0xaab @0x2
0x0aa9…0aaf at0004 = ╱9a╱ ELSE ╱ // 0xaad @0x4
0x0aa9…0aaf at0005 = EOL // 0xaae @0x5
0x0aa9…0aaf }
0x0aaf…0acb 9822 1280 T6=T5;NØGLE4=KTNUM;T5=B
0x0aaf…0acb LineComalBin {
0x0aaf…0acb ptr = 0x9822 // 0xaaf @0x0
0x0aaf…0acb lno = 0x0500 // 0xab1 @0x2
0x0aaf…0acb at0004 = ╱54╱T╱ // 0xab3 @0x4
0x0aaf…0acb at0005 = ╱36╱6╱ // 0xab4 @0x5
0x0aaf…0acb at0006 = ╱dc╱=╱ // 0xab5 @0x6
0x0aaf…0acb at0007 = ╱54╱T╱ // 0xab6 @0x7
0x0aaf…0acb at0008 = ╱35╱5╱ // 0xab7 @0x8
0x0aaf…0acb at0009 = ╱eb╱;╱ // 0xab8 @0x9
0x0aaf…0acb at000a = ╱4e╱N╱ // 0xab9 @0xa
0x0aaf…0acb at000b = ╱5c╱Ø╱ // 0xaba @0xb
0x0aaf…0acb at000c = ╱47╱G╱ // 0xabb @0xc
0x0aaf…0acb at000d = ╱4c╱L╱ // 0xabc @0xd
0x0aaf…0acb at000e = ╱45╱E╱ // 0xabd @0xe
0x0aaf…0acb at000f = ╱34╱4╱ // 0xabe @0xf
0x0aaf…0acb at0010 = ╱dc╱=╱ // 0xabf @0x10
0x0aaf…0acb at0011 = ╱4b╱K╱ // 0xac0 @0x11
0x0aaf…0acb at0012 = ╱54╱T╱ // 0xac1 @0x12
0x0aaf…0acb at0013 = ╱4e╱N╱ // 0xac2 @0x13
0x0aaf…0acb at0014 = ╱55╱U╱ // 0xac3 @0x14
0x0aaf…0acb at0015 = ╱4d╱M╱ // 0xac4 @0x15
0x0aaf…0acb at0016 = ╱eb╱;╱ // 0xac5 @0x16
0x0aaf…0acb at0017 = ╱54╱T╱ // 0xac6 @0x17
0x0aaf…0acb at0018 = ╱35╱5╱ // 0xac7 @0x18
0x0aaf…0acb at0019 = ╱dc╱=╱ // 0xac8 @0x19
0x0aaf…0acb at001a = ╱42╱B╱ // 0xac9 @0x1a
0x0aaf…0acb at001b = EOL // 0xaca @0x1b
0x0aaf…0acb }
0x0acb…0ad1 9828 1300 ENDIF
0x0acb…0ad1 LineComalBin {
0x0acb…0ad1 ptr = 0x9828 // 0xacb @0x0
0x0acb…0ad1 lno = 0x0514 // 0xacd @0x2
0x0acb…0ad1 at0004 = ╱9b╱ ENDIF ╱ // 0xacf @0x4
0x0acb…0ad1 at0005 = EOL // 0xad0 @0x5
0x0acb…0ad1 }
0x0ad1…0adb 9832 1310 CLOSE K35$
0x0ad1…0adb LineComalBin {
0x0ad1…0adb ptr = 0x9832 // 0xad1 @0x0
0x0ad1…0adb lno = 0x051e // 0xad3 @0x2
0x0ad1…0adb at0004 = ╱a8╱ CLOSE ╱ // 0xad5 @0x4
0x0ad1…0adb at0005 = ╱4b╱K╱ // 0xad6 @0x5
0x0ad1…0adb at0006 = ╱33╱3╱ // 0xad7 @0x6
0x0ad1…0adb at0007 = ╱35╱5╱ // 0xad8 @0x7
0x0ad1…0adb at0008 = ╱ef╱$╱ // 0xad9 @0x8
0x0ad1…0adb at0009 = EOL // 0xada @0x9
0x0ad1…0adb }
0x0adb…0af4 984b 1320 EXEC FEJL(E,5,K35$)
0x0adb…0af4 LineComalBin {
0x0adb…0af4 ptr = 0x984b // 0xadb @0x0
0x0adb…0af4 lno = 0x0528 // 0xadd @0x2
0x0adb…0af4 at0004 = ╱9d╱ EXEC ╱ // 0xadf @0x4
0x0adb…0af4 at0005 = ╱46╱F╱ // 0xae0 @0x5
0x0adb…0af4 at0006 = ╱45╱E╱ // 0xae1 @0x6
0x0adb…0af4 at0007 = ╱4a╱J╱ // 0xae2 @0x7
0x0adb…0af4 at0008 = ╱4c╱L╱ // 0xae3 @0x8
0x0adb…0af4 at0009 = ╱ed╱(╱ // 0xae4 @0x9
0x0adb…0af4 at000a = ╱45╱E╱ // 0xae5 @0xa
0x0adb…0af4 at000b = ╱ec╱,╱ // 0xae6 @0xb
0x0adb…0af4 at000c = ╱35╱5╱ // 0xae7 @0xc
0x0adb…0af4 at000d = ╱fe0000a003╱ // 0xae8 @0xd
0x0adb…0af4 at0012 = ╱ec╱,╱ // 0xaed @0x12
0x0adb…0af4 at0013 = ╱4b╱K╱ // 0xaee @0x13
0x0adb…0af4 at0014 = ╱33╱3╱ // 0xaef @0x14
0x0adb…0af4 at0015 = ╱35╱5╱ // 0xaf0 @0x15
0x0adb…0af4 at0016 = ╱ef╱$╱ // 0xaf1 @0x16
0x0adb…0af4 at0017 = ╱ee╱)╱ // 0xaf2 @0x17
0x0adb…0af4 at0018 = EOL // 0xaf3 @0x18
0x0adb…0af4 }
0x0af4…0afa 9851 1330 ENDPROC
0x0af4…0afa LineComalBin {
0x0af4…0afa ptr = 0x9851 // 0xaf4 @0x0
0x0af4…0afa lno = 0x0532 // 0xaf6 @0x2
0x0af4…0afa at0004 = ╱9f╱ ENDPROC ╱ // 0xaf8 @0x4
0x0af4…0afa at0005 = EOL // 0xaf9 @0x5
0x0af4…0afa }
0x0afa…0b21 9878 1340 PROC LINIEUD(DA2,BI2,TE2,BE2,SU1,ENT1)
0x0afa…0b21 LineComalBin {
0x0afa…0b21 ptr = 0x9878 // 0xafa @0x0
0x0afa…0b21 lno = 0x053c // 0xafc @0x2
0x0afa…0b21 at0004 = ╱9e╱ PROC ╱ // 0xafe @0x4
0x0afa…0b21 at0005 = ╱4c╱L╱ // 0xaff @0x5
0x0afa…0b21 at0006 = ╱49╱I╱ // 0xb00 @0x6
0x0afa…0b21 at0007 = ╱4e╱N╱ // 0xb01 @0x7
0x0afa…0b21 at0008 = ╱49╱I╱ // 0xb02 @0x8
0x0afa…0b21 at0009 = ╱45╱E╱ // 0xb03 @0x9
0x0afa…0b21 at000a = ╱55╱U╱ // 0xb04 @0xa
0x0afa…0b21 at000b = ╱44╱D╱ // 0xb05 @0xb
0x0afa…0b21 at000c = ╱ed╱(╱ // 0xb06 @0xc
0x0afa…0b21 at000d = ╱44╱D╱ // 0xb07 @0xd
0x0afa…0b21 at000e = ╱41╱A╱ // 0xb08 @0xe
0x0afa…0b21 at000f = ╱32╱2╱ // 0xb09 @0xf
0x0afa…0b21 at0010 = ╱ec╱,╱ // 0xb0a @0x10
0x0afa…0b21 at0011 = ╱42╱B╱ // 0xb0b @0x11
0x0afa…0b21 at0012 = ╱49╱I╱ // 0xb0c @0x12
0x0afa…0b21 at0013 = ╱32╱2╱ // 0xb0d @0x13
0x0afa…0b21 at0014 = ╱ec╱,╱ // 0xb0e @0x14
0x0afa…0b21 at0015 = ╱54╱T╱ // 0xb0f @0x15
0x0afa…0b21 at0016 = ╱45╱E╱ // 0xb10 @0x16
0x0afa…0b21 at0017 = ╱32╱2╱ // 0xb11 @0x17
0x0afa…0b21 at0018 = ╱ec╱,╱ // 0xb12 @0x18
0x0afa…0b21 at0019 = ╱42╱B╱ // 0xb13 @0x19
0x0afa…0b21 at001a = ╱45╱E╱ // 0xb14 @0x1a
0x0afa…0b21 at001b = ╱32╱2╱ // 0xb15 @0x1b
0x0afa…0b21 at001c = ╱ec╱,╱ // 0xb16 @0x1c
0x0afa…0b21 at001d = ╱53╱S╱ // 0xb17 @0x1d
0x0afa…0b21 at001e = ╱55╱U╱ // 0xb18 @0x1e
0x0afa…0b21 at001f = ╱31╱1╱ // 0xb19 @0x1f
0x0afa…0b21 at0020 = ╱ec╱,╱ // 0xb1a @0x20
0x0afa…0b21 at0021 = ╱45╱E╱ // 0xb1b @0x21
0x0afa…0b21 at0022 = ╱4e╱N╱ // 0xb1c @0x22
0x0afa…0b21 at0023 = ╱54╱T╱ // 0xb1d @0x23
0x0afa…0b21 at0024 = ╱31╱1╱ // 0xb1e @0x24
0x0afa…0b21 at0025 = ╱ee╱)╱ // 0xb1f @0x25
0x0afa…0b21 at0026 = EOL // 0xb20 @0x26
0x0afa…0b21 }
0x0b21…0b2f (37,) 9886 1350 SK=SKRIV1
0x0b21…0b2f LineComalBin {
0x0b21…0b2f ptr = 0x9886 // 0xb21 @0x0
0x0b21…0b2f lno = 0x0546 // 0xb23 @0x2
0x0b21…0b2f at0004 = ╱53╱S╱ // 0xb25 @0x4
0x0b21…0b2f at0005 = ╱4b╱K╱ // 0xb26 @0x5
0x0b21…0b2f at0006 = ╱dc╱=╱ // 0xb27 @0x6
0x0b21…0b2f at0007 = ╱53╱S╱ // 0xb28 @0x7
0x0b21…0b2f at0008 = ╱4b╱K╱ // 0xb29 @0x8
0x0b21…0b2f at0009 = ╱52╱R╱ // 0xb2a @0x9
0x0b21…0b2f at000a = ╱49╱I╱ // 0xb2b @0xa
0x0b21…0b2f at000b = ╱56╱V╱ // 0xb2c @0xb
0x0b21…0b2f at000c = ╱31╱1╱ // 0xb2d @0xc
0x0b21…0b2f at000d = EOL // 0xb2e @0xd
0x0b21…0b2f }
0x0b2f…0b4b 98a2 1360 EXEC CALC(B,SU1$,BE2$,SU1$)
0x0b2f…0b4b LineComalBin {
0x0b2f…0b4b ptr = 0x98a2 // 0xb2f @0x0
0x0b2f…0b4b lno = 0x0550 // 0xb31 @0x2
0x0b2f…0b4b at0004 = ╱9d╱ EXEC ╱ // 0xb33 @0x4
0x0b2f…0b4b at0005 = ╱43╱C╱ // 0xb34 @0x5
0x0b2f…0b4b at0006 = ╱41╱A╱ // 0xb35 @0x6
0x0b2f…0b4b at0007 = ╱4c╱L╱ // 0xb36 @0x7
0x0b2f…0b4b at0008 = ╱43╱C╱ // 0xb37 @0x8
0x0b2f…0b4b at0009 = ╱ed╱(╱ // 0xb38 @0x9
0x0b2f…0b4b at000a = ╱42╱B╱ // 0xb39 @0xa
0x0b2f…0b4b at000b = ╱ec╱,╱ // 0xb3a @0xb
0x0b2f…0b4b at000c = ╱53╱S╱ // 0xb3b @0xc
0x0b2f…0b4b at000d = ╱55╱U╱ // 0xb3c @0xd
0x0b2f…0b4b at000e = ╱31╱1╱ // 0xb3d @0xe
0x0b2f…0b4b at000f = ╱ef╱$╱ // 0xb3e @0xf
0x0b2f…0b4b at0010 = ╱ec╱,╱ // 0xb3f @0x10
0x0b2f…0b4b at0011 = ╱42╱B╱ // 0xb40 @0x11
0x0b2f…0b4b at0012 = ╱45╱E╱ // 0xb41 @0x12
0x0b2f…0b4b at0013 = ╱32╱2╱ // 0xb42 @0x13
0x0b2f…0b4b at0014 = ╱ef╱$╱ // 0xb43 @0x14
0x0b2f…0b4b at0015 = ╱ec╱,╱ // 0xb44 @0x15
0x0b2f…0b4b at0016 = ╱53╱S╱ // 0xb45 @0x16
0x0b2f…0b4b at0017 = ╱55╱U╱ // 0xb46 @0x17
0x0b2f…0b4b at0018 = ╱31╱1╱ // 0xb47 @0x18
0x0b2f…0b4b at0019 = ╱ef╱$╱ // 0xb48 @0x19
0x0b2f…0b4b at001a = ╱ee╱)╱ // 0xb49 @0x1a
0x0b2f…0b4b at001b = EOL // 0xb4a @0x1b
0x0b2f…0b4b }
0x0b4b…0b61 98b8 1370 EXEC DATOUD(DA2,DA5$)
0x0b4b…0b61 LineComalBin {
0x0b4b…0b61 ptr = 0x98b8 // 0xb4b @0x0
0x0b4b…0b61 lno = 0x055a // 0xb4d @0x2
0x0b4b…0b61 at0004 = ╱9d╱ EXEC ╱ // 0xb4f @0x4
0x0b4b…0b61 at0005 = ╱44╱D╱ // 0xb50 @0x5
0x0b4b…0b61 at0006 = ╱41╱A╱ // 0xb51 @0x6
0x0b4b…0b61 at0007 = ╱54╱T╱ // 0xb52 @0x7
0x0b4b…0b61 at0008 = ╱4f╱O╱ // 0xb53 @0x8
0x0b4b…0b61 at0009 = ╱55╱U╱ // 0xb54 @0x9
0x0b4b…0b61 at000a = ╱44╱D╱ // 0xb55 @0xa
0x0b4b…0b61 at000b = ╱ed╱(╱ // 0xb56 @0xb
0x0b4b…0b61 at000c = ╱44╱D╱ // 0xb57 @0xc
0x0b4b…0b61 at000d = ╱41╱A╱ // 0xb58 @0xd
0x0b4b…0b61 at000e = ╱32╱2╱ // 0xb59 @0xe
0x0b4b…0b61 at000f = ╱ec╱,╱ // 0xb5a @0xf
0x0b4b…0b61 at0010 = ╱44╱D╱ // 0xb5b @0x10
0x0b4b…0b61 at0011 = ╱41╱A╱ // 0xb5c @0x11
0x0b4b…0b61 at0012 = ╱35╱5╱ // 0xb5d @0x12
0x0b4b…0b61 at0013 = ╱ef╱$╱ // 0xb5e @0x13
0x0b4b…0b61 at0014 = ╱ee╱)╱ // 0xb5f @0x14
0x0b4b…0b61 at0015 = EOL // 0xb60 @0x15
0x0b4b…0b61 }
0x0b61…0b95 98ec 1380 PRINT TAB(E+10*(SK));DA5$;TAB(11+8*(SK));
0x0b61…0b95 LineComalBin {
0x0b61…0b95 ptr = 0x98ec // 0xb61 @0x0
0x0b61…0b95 lno = 0x0564 // 0xb63 @0x2
0x0b61…0b95 at0004 = ╱92╱ PRINT ╱ // 0xb65 @0x4
0x0b61…0b95 at0005 = ╱d2╱TAB╱ // 0xb66 @0x5
0x0b61…0b95 at0006 = ╱ed╱(╱ // 0xb67 @0x6
0x0b61…0b95 at0007 = ╱45╱E╱ // 0xb68 @0x7
0x0b61…0b95 at0008 = ╱e2╱+╱ // 0xb69 @0x8
0x0b61…0b95 at0009 = ╱31╱1╱ // 0xb6a @0x9
0x0b61…0b95 at000a = ╱30╱0╱ // 0xb6b @0xa
0x0b61…0b95 at000b = ╱fe0000a004╱ // 0xb6c @0xb
0x0b61…0b95 at0010 = ╱e4╱*╱ // 0xb71 @0x10
0x0b61…0b95 at0011 = ╱ed╱(╱ // 0xb72 @0x11
0x0b61…0b95 at0012 = ╱53╱S╱ // 0xb73 @0x12
0x0b61…0b95 at0013 = ╱4b╱K╱ // 0xb74 @0x13
0x0b61…0b95 at0014 = ╱ee╱)╱ // 0xb75 @0x14
0x0b61…0b95 at0015 = ╱ee╱)╱ // 0xb76 @0x15
0x0b61…0b95 at0016 = ╱eb╱;╱ // 0xb77 @0x16
0x0b61…0b95 at0017 = ╱44╱D╱ // 0xb78 @0x17
0x0b61…0b95 at0018 = ╱41╱A╱ // 0xb79 @0x18
0x0b61…0b95 at0019 = ╱35╱5╱ // 0xb7a @0x19
0x0b61…0b95 at001a = ╱ef╱$╱ // 0xb7b @0x1a
0x0b61…0b95 at001b = ╱eb╱;╱ // 0xb7c @0x1b
0x0b61…0b95 at001c = ╱d2╱TAB╱ // 0xb7d @0x1c
0x0b61…0b95 at001d = ╱ed╱(╱ // 0xb7e @0x1d
0x0b61…0b95 at001e = ╱31╱1╱ // 0xb7f @0x1e
0x0b61…0b95 at001f = ╱31╱1╱ // 0xb80 @0x1f
0x0b61…0b95 at0020 = ╱fe0000b004╱ // 0xb81 @0x20
0x0b61…0b95 at0025 = ╱e2╱+╱ // 0xb86 @0x25
0x0b61…0b95 at0026 = ╱38╱8╱ // 0xb87 @0x26
0x0b61…0b95 at0027 = ╱fe00008004╱ // 0xb88 @0x27
0x0b61…0b95 at002c = ╱e4╱*╱ // 0xb8d @0x2c
0x0b61…0b95 at002d = ╱ed╱(╱ // 0xb8e @0x2d
0x0b61…0b95 at002e = ╱53╱S╱ // 0xb8f @0x2e
0x0b61…0b95 at002f = ╱4b╱K╱ // 0xb90 @0x2f
0x0b61…0b95 at0030 = ╱ee╱)╱ // 0xb91 @0x30
0x0b61…0b95 at0031 = ╱ee╱)╱ // 0xb92 @0x31
0x0b61…0b95 at0032 = ╱eb╱;╱ // 0xb93 @0x32
0x0b61…0b95 at0033 = EOL // 0xb94 @0x33
0x0b61…0b95 }
0x0b95…0bb2 9909 1390 IF BI2<>-E THEN PRINT USING "#######":BI2;
0x0b95…0bb2 LineComalBin {
0x0b95…0bb2 ptr = 0x9909 // 0xb95 @0x0
0x0b95…0bb2 lno = 0x056e // 0xb97 @0x2
0x0b95…0bb2 at0004 = ╱82╱ IF ╱ // 0xb99 @0x4
0x0b95…0bb2 at0005 = ╱42╱B╱ // 0xb9a @0x5
0x0b95…0bb2 at0006 = ╱49╱I╱ // 0xb9b @0x6
0x0b95…0bb2 at0007 = ╱32╱2╱ // 0xb9c @0x7
0x0b95…0bb2 at0008 = ╱e1╱<>╱ // 0xb9d @0x8
0x0b95…0bb2 at0009 = ╱e9╱-╱ // 0xb9e @0x9
0x0b95…0bb2 at000a = ╱45╱E╱ // 0xb9f @0xa
0x0b95…0bb2 at000b = ╱b6╱ THEN ╱ // 0xba0 @0xb
0x0b95…0bb2 at000c = ╱92╱ PRINT ╱ // 0xba1 @0xc
0x0b95…0bb2 at000d = ╱b9╱ USING ╱ // 0xba2 @0xd
0x0b95…0bb2 at000e = ╱22╱"╱ // 0xba3 @0xe
0x0b95…0bb2 at000f = ╱23╱#╱ // 0xba4 @0xf
0x0b95…0bb2 at0010 = ╱23╱#╱ // 0xba5 @0x10
0x0b95…0bb2 at0011 = ╱23╱#╱ // 0xba6 @0x11
0x0b95…0bb2 at0012 = ╱23╱#╱ // 0xba7 @0x12
0x0b95…0bb2 at0013 = ╱23╱#╱ // 0xba8 @0x13
0x0b95…0bb2 at0014 = ╱23╱#╱ // 0xba9 @0x14
0x0b95…0bb2 at0015 = ╱23╱#╱ // 0xbaa @0x15
0x0b95…0bb2 at0016 = ╱22╱"╱ // 0xbab @0x16
0x0b95…0bb2 at0017 = ╱f0╱:╱ // 0xbac @0x17
0x0b95…0bb2 at0018 = ╱42╱B╱ // 0xbad @0x18
0x0b95…0bb2 at0019 = ╱49╱I╱ // 0xbae @0x19
0x0b95…0bb2 at001a = ╱32╱2╱ // 0xbaf @0x1a
0x0b95…0bb2 at001b = ╱eb╱;╱ // 0xbb0 @0x1b
0x0b95…0bb2 at001c = EOL // 0xbb1 @0x1c
0x0b95…0bb2 }
0x0bb2…0bda 9931 1420 PRINT TAB(18+W*(SK));TE2$;TAB(44);
0x0bb2…0bda LineComalBin {
0x0bb2…0bda ptr = 0x9931 // 0xbb2 @0x0
0x0bb2…0bda lno = 0x058c // 0xbb4 @0x2
0x0bb2…0bda at0004 = ╱92╱ PRINT ╱ // 0xbb6 @0x4
0x0bb2…0bda at0005 = ╱d2╱TAB╱ // 0xbb7 @0x5
0x0bb2…0bda at0006 = ╱ed╱(╱ // 0xbb8 @0x6
0x0bb2…0bda at0007 = ╱31╱1╱ // 0xbb9 @0x7
0x0bb2…0bda at0008 = ╱38╱8╱ // 0xbba @0x8
0x0bb2…0bda at0009 = ╱fe00009005╱ // 0xbbb @0x9
0x0bb2…0bda at000e = ╱e2╱+╱ // 0xbc0 @0xe
0x0bb2…0bda at000f = ╱57╱W╱ // 0xbc1 @0xf
0x0bb2…0bda at0010 = ╱e4╱*╱ // 0xbc2 @0x10
0x0bb2…0bda at0011 = ╱ed╱(╱ // 0xbc3 @0x11
0x0bb2…0bda at0012 = ╱53╱S╱ // 0xbc4 @0x12
0x0bb2…0bda at0013 = ╱4b╱K╱ // 0xbc5 @0x13
0x0bb2…0bda at0014 = ╱ee╱)╱ // 0xbc6 @0x14
0x0bb2…0bda at0015 = ╱ee╱)╱ // 0xbc7 @0x15
0x0bb2…0bda at0016 = ╱eb╱;╱ // 0xbc8 @0x16
0x0bb2…0bda at0017 = ╱54╱T╱ // 0xbc9 @0x17
0x0bb2…0bda at0018 = ╱45╱E╱ // 0xbca @0x18
0x0bb2…0bda at0019 = ╱32╱2╱ // 0xbcb @0x19
0x0bb2…0bda at001a = ╱ef╱$╱ // 0xbcc @0x1a
0x0bb2…0bda at001b = ╱eb╱;╱ // 0xbcd @0x1b
0x0bb2…0bda at001c = ╱d2╱TAB╱ // 0xbce @0x1c
0x0bb2…0bda at001d = ╱ed╱(╱ // 0xbcf @0x1d
0x0bb2…0bda at001e = ╱34╱4╱ // 0xbd0 @0x1e
0x0bb2…0bda at001f = ╱34╱4╱ // 0xbd1 @0x1f
0x0bb2…0bda at0020 = ╱fe0000b006╱ // 0xbd2 @0x20
0x0bb2…0bda at0025 = ╱ee╱)╱ // 0xbd7 @0x25
0x0bb2…0bda at0026 = ╱eb╱;╱ // 0xbd8 @0x26
0x0bb2…0bda at0027 = EOL // 0xbd9 @0x27
0x0bb2…0bda }
0x0bda…0bf4 994b 1425 IF NOT SK THEN PRINT USING "######":ENT1;
0x0bda…0bf4 LineComalBin {
0x0bda…0bf4 ptr = 0x994b // 0xbda @0x0
0x0bda…0bf4 lno = 0x0591 // 0xbdc @0x2
0x0bda…0bf4 at0004 = ╱82╱ IF ╱ // 0xbde @0x4
0x0bda…0bf4 at0005 = ╱d9╱ NOT ╱ // 0xbdf @0x5
0x0bda…0bf4 at0006 = ╱53╱S╱ // 0xbe0 @0x6
0x0bda…0bf4 at0007 = ╱4b╱K╱ // 0xbe1 @0x7
0x0bda…0bf4 at0008 = ╱b6╱ THEN ╱ // 0xbe2 @0x8
0x0bda…0bf4 at0009 = ╱92╱ PRINT ╱ // 0xbe3 @0x9
0x0bda…0bf4 at000a = ╱b9╱ USING ╱ // 0xbe4 @0xa
0x0bda…0bf4 at000b = ╱22╱"╱ // 0xbe5 @0xb
0x0bda…0bf4 at000c = ╱23╱#╱ // 0xbe6 @0xc
0x0bda…0bf4 at000d = ╱23╱#╱ // 0xbe7 @0xd
0x0bda…0bf4 at000e = ╱23╱#╱ // 0xbe8 @0xe
0x0bda…0bf4 at000f = ╱23╱#╱ // 0xbe9 @0xf
0x0bda…0bf4 at0010 = ╱23╱#╱ // 0xbea @0x10
0x0bda…0bf4 at0011 = ╱23╱#╱ // 0xbeb @0x11
0x0bda…0bf4 at0012 = ╱22╱"╱ // 0xbec @0x12
0x0bda…0bf4 at0013 = ╱f0╱:╱ // 0xbed @0x13
0x0bda…0bf4 at0014 = ╱45╱E╱ // 0xbee @0x14
0x0bda…0bf4 at0015 = ╱4e╱N╱ // 0xbef @0x15
0x0bda…0bf4 at0016 = ╱54╱T╱ // 0xbf0 @0x16
0x0bda…0bf4 at0017 = ╱31╱1╱ // 0xbf1 @0x17
0x0bda…0bf4 at0018 = ╱eb╱;╱ // 0xbf2 @0x18
0x0bda…0bf4 at0019 = EOL // 0xbf3 @0x19
0x0bda…0bf4 }
0x0bf4…0c0f 9966 1430 EXEC TUD(BE2$,UBELØB$,B,B)
0x0bf4…0c0f LineComalBin {
0x0bf4…0c0f ptr = 0x9966 // 0xbf4 @0x0
0x0bf4…0c0f lno = 0x0596 // 0xbf6 @0x2
0x0bf4…0c0f at0004 = ╱9d╱ EXEC ╱ // 0xbf8 @0x4
0x0bf4…0c0f at0005 = ╱54╱T╱ // 0xbf9 @0x5
0x0bf4…0c0f at0006 = ╱55╱U╱ // 0xbfa @0x6
0x0bf4…0c0f at0007 = ╱44╱D╱ // 0xbfb @0x7
0x0bf4…0c0f at0008 = ╱ed╱(╱ // 0xbfc @0x8
0x0bf4…0c0f at0009 = ╱42╱B╱ // 0xbfd @0x9
0x0bf4…0c0f at000a = ╱45╱E╱ // 0xbfe @0xa
0x0bf4…0c0f at000b = ╱32╱2╱ // 0xbff @0xb
0x0bf4…0c0f at000c = ╱ef╱$╱ // 0xc00 @0xc
0x0bf4…0c0f at000d = ╱ec╱,╱ // 0xc01 @0xd
0x0bf4…0c0f at000e = ╱55╱U╱ // 0xc02 @0xe
0x0bf4…0c0f at000f = ╱42╱B╱ // 0xc03 @0xf
0x0bf4…0c0f at0010 = ╱45╱E╱ // 0xc04 @0x10
0x0bf4…0c0f at0011 = ╱4c╱L╱ // 0xc05 @0x11
0x0bf4…0c0f at0012 = ╱5c╱Ø╱ // 0xc06 @0x12
0x0bf4…0c0f at0013 = ╱42╱B╱ // 0xc07 @0x13
0x0bf4…0c0f at0014 = ╱ef╱$╱ // 0xc08 @0x14
0x0bf4…0c0f at0015 = ╱ec╱,╱ // 0xc09 @0x15
0x0bf4…0c0f at0016 = ╱42╱B╱ // 0xc0a @0x16
0x0bf4…0c0f at0017 = ╱ec╱,╱ // 0xc0b @0x17
0x0bf4…0c0f at0018 = ╱42╱B╱ // 0xc0c @0x18
0x0bf4…0c0f at0019 = ╱ee╱)╱ // 0xc0d @0x19
0x0bf4…0c0f at001a = EOL // 0xc0e @0x1a
0x0bf4…0c0f }
0x0c0f…0c53 99aa 1450 PRINT TAB(51-G*(SK)+(15-C*(SK))*(BE2$(LEN(BE2$))="-"));UBELØB$
0x0c0f…0c53 LineComalBin {
0x0c0f…0c53 ptr = 0x99aa // 0xc0f @0x0
0x0c0f…0c53 lno = 0x05aa // 0xc11 @0x2
0x0c0f…0c53 at0004 = ╱92╱ PRINT ╱ // 0xc13 @0x4
0x0c0f…0c53 at0005 = ╱d2╱TAB╱ // 0xc14 @0x5
0x0c0f…0c53 at0006 = ╱ed╱(╱ // 0xc15 @0x6
0x0c0f…0c53 at0007 = ╱35╱5╱ // 0xc16 @0x7
0x0c0f…0c53 at0008 = ╱31╱1╱ // 0xc17 @0x8
0x0c0f…0c53 at0009 = ╱fe0000cc06╱ // 0xc18 @0x9
0x0c0f…0c53 at000e = ╱e3╱-╱ // 0xc1d @0xe
0x0c0f…0c53 at000f = ╱47╱G╱ // 0xc1e @0xf
0x0c0f…0c53 at0010 = ╱e4╱*╱ // 0xc1f @0x10
0x0c0f…0c53 at0011 = ╱ed╱(╱ // 0xc20 @0x11
0x0c0f…0c53 at0012 = ╱53╱S╱ // 0xc21 @0x12
0x0c0f…0c53 at0013 = ╱4b╱K╱ // 0xc22 @0x13
0x0c0f…0c53 at0014 = ╱ee╱)╱ // 0xc23 @0x14
0x0c0f…0c53 at0015 = ╱e2╱+╱ // 0xc24 @0x15
0x0c0f…0c53 at0016 = ╱ed╱(╱ // 0xc25 @0x16
0x0c0f…0c53 at0017 = ╱31╱1╱ // 0xc26 @0x17
0x0c0f…0c53 at0018 = ╱35╱5╱ // 0xc27 @0x18
0x0c0f…0c53 at0019 = ╱fe0000f004╱ // 0xc28 @0x19
0x0c0f…0c53 at001e = ╱e3╱-╱ // 0xc2d @0x1e
0x0c0f…0c53 at001f = ╱43╱C╱ // 0xc2e @0x1f
0x0c0f…0c53 at0020 = ╱e4╱*╱ // 0xc2f @0x20
0x0c0f…0c53 at0021 = ╱ed╱(╱ // 0xc30 @0x21
0x0c0f…0c53 at0022 = ╱53╱S╱ // 0xc31 @0x22
0x0c0f…0c53 at0023 = ╱4b╱K╱ // 0xc32 @0x23
0x0c0f…0c53 at0024 = ╱ee╱)╱ // 0xc33 @0x24
0x0c0f…0c53 at0025 = ╱ee╱)╱ // 0xc34 @0x25
0x0c0f…0c53 at0026 = ╱e4╱*╱ // 0xc35 @0x26
0x0c0f…0c53 at0027 = ╱ed╱(╱ // 0xc36 @0x27
0x0c0f…0c53 at0028 = ╱42╱B╱ // 0xc37 @0x28
0x0c0f…0c53 at0029 = ╱45╱E╱ // 0xc38 @0x29
0x0c0f…0c53 at002a = ╱32╱2╱ // 0xc39 @0x2a
0x0c0f…0c53 at002b = ╱ef╱$╱ // 0xc3a @0x2b
0x0c0f…0c53 at002c = ╱ed╱(╱ // 0xc3b @0x2c
0x0c0f…0c53 at002d = ╱cc╱LEN╱ // 0xc3c @0x2d
0x0c0f…0c53 at002e = ╱ed╱(╱ // 0xc3d @0x2e
0x0c0f…0c53 at002f = ╱42╱B╱ // 0xc3e @0x2f
0x0c0f…0c53 at0030 = ╱45╱E╱ // 0xc3f @0x30
0x0c0f…0c53 at0031 = ╱32╱2╱ // 0xc40 @0x31
0x0c0f…0c53 at0032 = ╱ef╱$╱ // 0xc41 @0x32
0x0c0f…0c53 at0033 = ╱ee╱)╱ // 0xc42 @0x33
0x0c0f…0c53 at0034 = ╱ee╱)╱ // 0xc43 @0x34
0x0c0f…0c53 at0035 = ╱dc╱=╱ // 0xc44 @0x35
0x0c0f…0c53 at0036 = ╱22╱"╱ // 0xc45 @0x36
0x0c0f…0c53 at0037 = ╱2d╱-╱ // 0xc46 @0x37
0x0c0f…0c53 at0038 = ╱22╱"╱ // 0xc47 @0x38
0x0c0f…0c53 at0039 = ╱ee╱)╱ // 0xc48 @0x39
0x0c0f…0c53 at003a = ╱ee╱)╱ // 0xc49 @0x3a
0x0c0f…0c53 at003b = ╱eb╱;╱ // 0xc4a @0x3b
0x0c0f…0c53 at003c = ╱55╱U╱ // 0xc4b @0x3c
0x0c0f…0c53 at003d = ╱42╱B╱ // 0xc4c @0x3d
0x0c0f…0c53 at003e = ╱45╱E╱ // 0xc4d @0x3e
0x0c0f…0c53 at003f = ╱4c╱L╱ // 0xc4e @0x3f
0x0c0f…0c53 at0040 = ╱5c╱Ø╱ // 0xc4f @0x40
0x0c0f…0c53 at0041 = ╱42╱B╱ // 0xc50 @0x41
0x0c0f…0c53 at0042 = ╱ef╱$╱ // 0xc51 @0x42
0x0c0f…0c53 at0043 = EOL // 0xc52 @0x43
0x0c0f…0c53 }
0x0c53…0c59 99b0 1460 ENDPROC
0x0c53…0c59 LineComalBin {
0x0c53…0c59 ptr = 0x99b0 // 0xc53 @0x0
0x0c53…0c59 lno = 0x05b4 // 0xc55 @0x2
0x0c53…0c59 at0004 = ╱9f╱ ENDPROC ╱ // 0xc57 @0x4
0x0c53…0c59 at0005 = EOL // 0xc58 @0x5
0x0c53…0c59 }
0x0c59…0c7f 99d6 1470 PROC INDPUT1(XPOS1,YPOS1,LN4,LN5,LTK)
0x0c59…0c7f LineComalBin {
0x0c59…0c7f ptr = 0x99d6 // 0xc59 @0x0
0x0c59…0c7f lno = 0x05be // 0xc5b @0x2
0x0c59…0c7f at0004 = ╱9e╱ PROC ╱ // 0xc5d @0x4
0x0c59…0c7f at0005 = ╱49╱I╱ // 0xc5e @0x5
0x0c59…0c7f at0006 = ╱4e╱N╱ // 0xc5f @0x6
0x0c59…0c7f at0007 = ╱44╱D╱ // 0xc60 @0x7
0x0c59…0c7f at0008 = ╱50╱P╱ // 0xc61 @0x8
0x0c59…0c7f at0009 = ╱55╱U╱ // 0xc62 @0x9
0x0c59…0c7f at000a = ╱54╱T╱ // 0xc63 @0xa
0x0c59…0c7f at000b = ╱31╱1╱ // 0xc64 @0xb
0x0c59…0c7f at000c = ╱ed╱(╱ // 0xc65 @0xc
0x0c59…0c7f at000d = ╱58╱X╱ // 0xc66 @0xd
0x0c59…0c7f at000e = ╱50╱P╱ // 0xc67 @0xe
0x0c59…0c7f at000f = ╱4f╱O╱ // 0xc68 @0xf
0x0c59…0c7f at0010 = ╱53╱S╱ // 0xc69 @0x10
0x0c59…0c7f at0011 = ╱31╱1╱ // 0xc6a @0x11
0x0c59…0c7f at0012 = ╱ec╱,╱ // 0xc6b @0x12
0x0c59…0c7f at0013 = ╱59╱Y╱ // 0xc6c @0x13
0x0c59…0c7f at0014 = ╱50╱P╱ // 0xc6d @0x14
0x0c59…0c7f at0015 = ╱4f╱O╱ // 0xc6e @0x15
0x0c59…0c7f at0016 = ╱53╱S╱ // 0xc6f @0x16
0x0c59…0c7f at0017 = ╱31╱1╱ // 0xc70 @0x17
0x0c59…0c7f at0018 = ╱ec╱,╱ // 0xc71 @0x18
0x0c59…0c7f at0019 = ╱4c╱L╱ // 0xc72 @0x19
0x0c59…0c7f at001a = ╱4e╱N╱ // 0xc73 @0x1a
0x0c59…0c7f at001b = ╱34╱4╱ // 0xc74 @0x1b
0x0c59…0c7f at001c = ╱ec╱,╱ // 0xc75 @0x1c
0x0c59…0c7f at001d = ╱4c╱L╱ // 0xc76 @0x1d
0x0c59…0c7f at001e = ╱4e╱N╱ // 0xc77 @0x1e
0x0c59…0c7f at001f = ╱35╱5╱ // 0xc78 @0x1f
0x0c59…0c7f at0020 = ╱ec╱,╱ // 0xc79 @0x20
0x0c59…0c7f at0021 = ╱4c╱L╱ // 0xc7a @0x21
0x0c59…0c7f at0022 = ╱54╱T╱ // 0xc7b @0x22
0x0c59…0c7f at0023 = ╱4b╱K╱ // 0xc7c @0x23
0x0c59…0c7f at0024 = ╱ee╱)╱ // 0xc7d @0x24
0x0c59…0c7f at0025 = EOL // 0xc7e @0x25
0x0c59…0c7f }
0x0c7f…0c85 99dc 1480 REPEAT
0x0c7f…0c85 LineComalBin {
0x0c7f…0c85 ptr = 0x99dc // 0xc7f @0x0
0x0c7f…0c85 lno = 0x05c8 // 0xc81 @0x2
0x0c7f…0c85 at0004 = ╱97╱ REPEAT ╱ // 0xc83 @0x4
0x0c7f…0c85 at0005 = EOL // 0xc84 @0x5
0x0c7f…0c85 }
0x0c85…0c96 99ed 1490 CURSOR XPOS1,YPOS1
0x0c85…0c96 LineComalBin {
0x0c85…0c96 ptr = 0x99ed // 0xc85 @0x0
0x0c85…0c96 lno = 0x05d2 // 0xc87 @0x2
0x0c85…0c96 at0004 = ╱a1╱ CURSOR ╱ // 0xc89 @0x4
0x0c85…0c96 at0005 = ╱58╱X╱ // 0xc8a @0x5
0x0c85…0c96 at0006 = ╱50╱P╱ // 0xc8b @0x6
0x0c85…0c96 at0007 = ╱4f╱O╱ // 0xc8c @0x7
0x0c85…0c96 at0008 = ╱53╱S╱ // 0xc8d @0x8
0x0c85…0c96 at0009 = ╱31╱1╱ // 0xc8e @0x9
0x0c85…0c96 at000a = ╱ec╱,╱ // 0xc8f @0xa
0x0c85…0c96 at000b = ╱59╱Y╱ // 0xc90 @0xb
0x0c85…0c96 at000c = ╱50╱P╱ // 0xc91 @0xc
0x0c85…0c96 at000d = ╱4f╱O╱ // 0xc92 @0xd
0x0c85…0c96 at000e = ╱53╱S╱ // 0xc93 @0xe
0x0c85…0c96 at000f = ╱31╱1╱ // 0xc94 @0xf
0x0c85…0c96 at0010 = EOL // 0xc95 @0x10
0x0c85…0c96 }
0x0c96…0cc0 9a17 1500 PRINT LTK$;BLANK$(E:77-XPOS1-LEN(LTK$))
0x0c96…0cc0 LineComalBin {
0x0c96…0cc0 ptr = 0x9a17 // 0xc96 @0x0
0x0c96…0cc0 lno = 0x05dc // 0xc98 @0x2
0x0c96…0cc0 at0004 = ╱92╱ PRINT ╱ // 0xc9a @0x4
0x0c96…0cc0 at0005 = ╱4c╱L╱ // 0xc9b @0x5
0x0c96…0cc0 at0006 = ╱54╱T╱ // 0xc9c @0x6
0x0c96…0cc0 at0007 = ╱4b╱K╱ // 0xc9d @0x7
0x0c96…0cc0 at0008 = ╱ef╱$╱ // 0xc9e @0x8
0x0c96…0cc0 at0009 = ╱eb╱;╱ // 0xc9f @0x9
0x0c96…0cc0 at000a = ╱42╱B╱ // 0xca0 @0xa
0x0c96…0cc0 at000b = ╱4c╱L╱ // 0xca1 @0xb
0x0c96…0cc0 at000c = ╱41╱A╱ // 0xca2 @0xc
0x0c96…0cc0 at000d = ╱4e╱N╱ // 0xca3 @0xd
0x0c96…0cc0 at000e = ╱4b╱K╱ // 0xca4 @0xe
0x0c96…0cc0 at000f = ╱ef╱$╱ // 0xca5 @0xf
0x0c96…0cc0 at0010 = ╱ed╱(╱ // 0xca6 @0x10
0x0c96…0cc0 at0011 = ╱45╱E╱ // 0xca7 @0x11
0x0c96…0cc0 at0012 = ╱f0╱:╱ // 0xca8 @0x12
0x0c96…0cc0 at0013 = ╱37╱7╱ // 0xca9 @0x13
0x0c96…0cc0 at0014 = ╱37╱7╱ // 0xcaa @0x14
0x0c96…0cc0 at0015 = ╱fe00009a07╱ // 0xcab @0x15
0x0c96…0cc0 at001a = ╱e3╱-╱ // 0xcb0 @0x1a
0x0c96…0cc0 at001b = ╱58╱X╱ // 0xcb1 @0x1b
0x0c96…0cc0 at001c = ╱50╱P╱ // 0xcb2 @0x1c
0x0c96…0cc0 at001d = ╱4f╱O╱ // 0xcb3 @0x1d
0x0c96…0cc0 at001e = ╱53╱S╱ // 0xcb4 @0x1e
0x0c96…0cc0 at001f = ╱31╱1╱ // 0xcb5 @0x1f
0x0c96…0cc0 at0020 = ╱e3╱-╱ // 0xcb6 @0x20
0x0c96…0cc0 at0021 = ╱cc╱LEN╱ // 0xcb7 @0x21
0x0c96…0cc0 at0022 = ╱ed╱(╱ // 0xcb8 @0x22
0x0c96…0cc0 at0023 = ╱4c╱L╱ // 0xcb9 @0x23
0x0c96…0cc0 at0024 = ╱54╱T╱ // 0xcba @0x24
0x0c96…0cc0 at0025 = ╱4b╱K╱ // 0xcbb @0x25
0x0c96…0cc0 at0026 = ╱ef╱$╱ // 0xcbc @0x26
0x0c96…0cc0 at0027 = ╱ee╱)╱ // 0xcbd @0x27
0x0c96…0cc0 at0028 = ╱ee╱)╱ // 0xcbe @0x28
0x0c96…0cc0 at0029 = EOL // 0xcbf @0x29
0x0c96…0cc0 }
0x0cc0…0cd9 9a30 1510 CURSOR XPOS1+LEN(LTK$),YPOS1
0x0cc0…0cd9 LineComalBin {
0x0cc0…0cd9 ptr = 0x9a30 // 0xcc0 @0x0
0x0cc0…0cd9 lno = 0x05e6 // 0xcc2 @0x2
0x0cc0…0cd9 at0004 = ╱a1╱ CURSOR ╱ // 0xcc4 @0x4
0x0cc0…0cd9 at0005 = ╱58╱X╱ // 0xcc5 @0x5
0x0cc0…0cd9 at0006 = ╱50╱P╱ // 0xcc6 @0x6
0x0cc0…0cd9 at0007 = ╱4f╱O╱ // 0xcc7 @0x7
0x0cc0…0cd9 at0008 = ╱53╱S╱ // 0xcc8 @0x8
0x0cc0…0cd9 at0009 = ╱31╱1╱ // 0xcc9 @0x9
0x0cc0…0cd9 at000a = ╱e2╱+╱ // 0xcca @0xa
0x0cc0…0cd9 at000b = ╱cc╱LEN╱ // 0xccb @0xb
0x0cc0…0cd9 at000c = ╱ed╱(╱ // 0xccc @0xc
0x0cc0…0cd9 at000d = ╱4c╱L╱ // 0xccd @0xd
0x0cc0…0cd9 at000e = ╱54╱T╱ // 0xcce @0xe
0x0cc0…0cd9 at000f = ╱4b╱K╱ // 0xccf @0xf
0x0cc0…0cd9 at0010 = ╱ef╱$╱ // 0xcd0 @0x10
0x0cc0…0cd9 at0011 = ╱ee╱)╱ // 0xcd1 @0x11
0x0cc0…0cd9 at0012 = ╱ec╱,╱ // 0xcd2 @0x12
0x0cc0…0cd9 at0013 = ╱59╱Y╱ // 0xcd3 @0x13
0x0cc0…0cd9 at0014 = ╱50╱P╱ // 0xcd4 @0x14
0x0cc0…0cd9 at0015 = ╱4f╱O╱ // 0xcd5 @0x15
0x0cc0…0cd9 at0016 = ╱53╱S╱ // 0xcd6 @0x16
0x0cc0…0cd9 at0017 = ╱31╱1╱ // 0xcd7 @0x17
0x0cc0…0cd9 at0018 = EOL // 0xcd8 @0x18
0x0cc0…0cd9 }
0x0cd9…0ce5 9a3c 1520 INPUT " ",A$
0x0cd9…0ce5 LineComalBin {
0x0cd9…0ce5 ptr = 0x9a3c // 0xcd9 @0x0
0x0cd9…0ce5 lno = 0x05f0 // 0xcdb @0x2
0x0cd9…0ce5 at0004 = ╱91╱ INPUT ╱ // 0xcdd @0x4
0x0cd9…0ce5 at0005 = ╱22╱"╱ // 0xcde @0x5
0x0cd9…0ce5 at0006 = ╱20╱…╱ // 0xcdf @0x6
0x0cd9…0ce5 at0007 = ╱22╱"╱ // 0xce0 @0x7
0x0cd9…0ce5 at0008 = ╱ec╱,╱ // 0xce1 @0x8
0x0cd9…0ce5 at0009 = ╱41╱A╱ // 0xce2 @0x9
0x0cd9…0ce5 at000a = ╱ef╱$╱ // 0xce3 @0xa
0x0cd9…0ce5 at000b = EOL // 0xce4 @0xb
0x0cd9…0ce5 }
0x0ce5…0cf5 9a4c 1530 EXEC NRTEST(A$)
0x0ce5…0cf5 LineComalBin {
0x0ce5…0cf5 ptr = 0x9a4c // 0xce5 @0x0
0x0ce5…0cf5 lno = 0x05fa // 0xce7 @0x2
0x0ce5…0cf5 at0004 = ╱9d╱ EXEC ╱ // 0xce9 @0x4
0x0ce5…0cf5 at0005 = ╱4e╱N╱ // 0xcea @0x5
0x0ce5…0cf5 at0006 = ╱52╱R╱ // 0xceb @0x6
0x0ce5…0cf5 at0007 = ╱54╱T╱ // 0xcec @0x7
0x0ce5…0cf5 at0008 = ╱45╱E╱ // 0xced @0x8
0x0ce5…0cf5 at0009 = ╱53╱S╱ // 0xcee @0x9
0x0ce5…0cf5 at000a = ╱54╱T╱ // 0xcef @0xa
0x0ce5…0cf5 at000b = ╱ed╱(╱ // 0xcf0 @0xb
0x0ce5…0cf5 at000c = ╱41╱A╱ // 0xcf1 @0xc
0x0ce5…0cf5 at000d = ╱ef╱$╱ // 0xcf2 @0xd
0x0ce5…0cf5 at000e = ╱ee╱)╱ // 0xcf3 @0xe
0x0ce5…0cf5 at000f = EOL // 0xcf4 @0xf
0x0ce5…0cf5 }
0x0cf5…0d06 9a5d 1540 UNTIL P>LN4 AND P<LN5
0x0cf5…0d06 LineComalBin {
0x0cf5…0d06 ptr = 0x9a5d // 0xcf5 @0x0
0x0cf5…0d06 lno = 0x0604 // 0xcf7 @0x2
0x0cf5…0d06 at0004 = ╱98╱ UNTIL ╱ // 0xcf9 @0x4
0x0cf5…0d06 at0005 = ╱50╱P╱ // 0xcfa @0x5
0x0cf5…0d06 at0006 = ╱de╱>╱ // 0xcfb @0x6
0x0cf5…0d06 at0007 = ╱4c╱L╱ // 0xcfc @0x7
0x0cf5…0d06 at0008 = ╱4e╱N╱ // 0xcfd @0x8
0x0cf5…0d06 at0009 = ╱34╱4╱ // 0xcfe @0x9
0x0cf5…0d06 at000a = ╱da╱ AND ╱ // 0xcff @0xa
0x0cf5…0d06 at000b = ╱50╱P╱ // 0xd00 @0xb
0x0cf5…0d06 at000c = ╱dd╱<╱ // 0xd01 @0xc
0x0cf5…0d06 at000d = ╱4c╱L╱ // 0xd02 @0xd
0x0cf5…0d06 at000e = ╱4e╱N╱ // 0xd03 @0xe
0x0cf5…0d06 at000f = ╱35╱5╱ // 0xd04 @0xf
0x0cf5…0d06 at0010 = EOL // 0xd05 @0x10
0x0cf5…0d06 }
0x0d06…0d0c 9a63 1550 ENDPROC
0x0d06…0d0c LineComalBin {
0x0d06…0d0c ptr = 0x9a63 // 0xd06 @0x0
0x0d06…0d0c lno = 0x060e // 0xd08 @0x2
0x0d06…0d0c at0004 = ╱9f╱ ENDPROC ╱ // 0xd0a @0x4
0x0d06…0d0c at0005 = EOL // 0xd0b @0x5
0x0d06…0d0c }
0x0d0c…0d28 9a7f 1560 PROC LINIER(FRA1,TIL1,TÆL1)
0x0d0c…0d28 LineComalBin {
0x0d0c…0d28 ptr = 0x9a7f // 0xd0c @0x0
0x0d0c…0d28 lno = 0x0618 // 0xd0e @0x2
0x0d0c…0d28 at0004 = ╱9e╱ PROC ╱ // 0xd10 @0x4
0x0d0c…0d28 at0005 = ╱4c╱L╱ // 0xd11 @0x5
0x0d0c…0d28 at0006 = ╱49╱I╱ // 0xd12 @0x6
0x0d0c…0d28 at0007 = ╱4e╱N╱ // 0xd13 @0x7
0x0d0c…0d28 at0008 = ╱49╱I╱ // 0xd14 @0x8
0x0d0c…0d28 at0009 = ╱45╱E╱ // 0xd15 @0x9
0x0d0c…0d28 at000a = ╱52╱R╱ // 0xd16 @0xa
0x0d0c…0d28 at000b = ╱ed╱(╱ // 0xd17 @0xb
0x0d0c…0d28 at000c = ╱46╱F╱ // 0xd18 @0xc
0x0d0c…0d28 at000d = ╱52╱R╱ // 0xd19 @0xd
0x0d0c…0d28 at000e = ╱41╱A╱ // 0xd1a @0xe
0x0d0c…0d28 at000f = ╱31╱1╱ // 0xd1b @0xf
0x0d0c…0d28 at0010 = ╱ec╱,╱ // 0xd1c @0x10
0x0d0c…0d28 at0011 = ╱54╱T╱ // 0xd1d @0x11
0x0d0c…0d28 at0012 = ╱49╱I╱ // 0xd1e @0x12
0x0d0c…0d28 at0013 = ╱4c╱L╱ // 0xd1f @0x13
0x0d0c…0d28 at0014 = ╱31╱1╱ // 0xd20 @0x14
0x0d0c…0d28 at0015 = ╱ec╱,╱ // 0xd21 @0x15
0x0d0c…0d28 at0016 = ╱54╱T╱ // 0xd22 @0x16
0x0d0c…0d28 at0017 = ╱5b╱Æ╱ // 0xd23 @0x17
0x0d0c…0d28 at0018 = ╱4c╱L╱ // 0xd24 @0x18
0x0d0c…0d28 at0019 = ╱31╱1╱ // 0xd25 @0x19
0x0d0c…0d28 at001a = ╱ee╱)╱ // 0xd26 @0x1a
0x0d0c…0d28 at001b = EOL // 0xd27 @0x1b
0x0d0c…0d28 }
0x0d28…0d3c 9a93 1570 FOR TÆL1=FRA1 TO TIL1
0x0d28…0d3c LineComalBin {
0x0d28…0d3c ptr = 0x9a93 // 0xd28 @0x0
0x0d28…0d3c lno = 0x0622 // 0xd2a @0x2
0x0d28…0d3c at0004 = ╱83╱ FOR ╱ // 0xd2c @0x4
0x0d28…0d3c at0005 = ╱54╱T╱ // 0xd2d @0x5
0x0d28…0d3c at0006 = ╱5b╱Æ╱ // 0xd2e @0x6
0x0d28…0d3c at0007 = ╱4c╱L╱ // 0xd2f @0x7
0x0d28…0d3c at0008 = ╱31╱1╱ // 0xd30 @0x8
0x0d28…0d3c at0009 = ╱dc╱=╱ // 0xd31 @0x9
0x0d28…0d3c at000a = ╱46╱F╱ // 0xd32 @0xa
0x0d28…0d3c at000b = ╱52╱R╱ // 0xd33 @0xb
0x0d28…0d3c at000c = ╱41╱A╱ // 0xd34 @0xc
0x0d28…0d3c at000d = ╱31╱1╱ // 0xd35 @0xd
0x0d28…0d3c at000e = ╱b7╱ TO ╱ // 0xd36 @0xe
0x0d28…0d3c at000f = ╱54╱T╱ // 0xd37 @0xf
0x0d28…0d3c at0010 = ╱49╱I╱ // 0xd38 @0x10
0x0d28…0d3c at0011 = ╱4c╱L╱ // 0xd39 @0x11
0x0d28…0d3c at0012 = ╱31╱1╱ // 0xd3a @0x12
0x0d28…0d3c at0013 = EOL // 0xd3b @0x13
0x0d28…0d3c }
0x0d3c…0d45 (44,) 9a9c 1580 PRINT " "
0x0d3c…0d45 LineComalBin {
0x0d3c…0d45 ptr = 0x9a9c // 0xd3c @0x0
0x0d3c…0d45 lno = 0x062c // 0xd3e @0x2
0x0d3c…0d45 at0004 = ╱92╱ PRINT ╱ // 0xd40 @0x4
0x0d3c…0d45 at0005 = ╱22╱"╱ // 0xd41 @0x5
0x0d3c…0d45 at0006 = ╱20╱…╱ // 0xd42 @0x6
0x0d3c…0d45 at0007 = ╱22╱"╱ // 0xd43 @0x7
0x0d3c…0d45 at0008 = EOL // 0xd44 @0x8
0x0d3c…0d45 }
0x0d45…0d4f 9aa6 1590 NEXT TÆL1
0x0d45…0d4f LineComalBin {
0x0d45…0d4f ptr = 0x9aa6 // 0xd45 @0x0
0x0d45…0d4f lno = 0x0636 // 0xd47 @0x2
0x0d45…0d4f at0004 = ╱84╱ NEXT ╱ // 0xd49 @0x4
0x0d45…0d4f at0005 = ╱54╱T╱ // 0xd4a @0x5
0x0d45…0d4f at0006 = ╱5b╱Æ╱ // 0xd4b @0x6
0x0d45…0d4f at0007 = ╱4c╱L╱ // 0xd4c @0x7
0x0d45…0d4f at0008 = ╱31╱1╱ // 0xd4d @0x8
0x0d45…0d4f at0009 = EOL // 0xd4e @0x9
0x0d45…0d4f }
0x0d4f…0d55 9aac 1600 ENDPROC
0x0d4f…0d55 LineComalBin {
0x0d4f…0d55 ptr = 0x9aac // 0xd4f @0x0
0x0d4f…0d55 lno = 0x0640 // 0xd51 @0x2
0x0d4f…0d55 at0004 = ╱9f╱ ENDPROC ╱ // 0xd53 @0x4
0x0d4f…0d55 at0005 = EOL // 0xd54 @0x5
0x0d4f…0d55 }
0x0d55…0d80 9ad7 1610 PROC NAVN2(NAVN3,GADE1,POSTNR1,BY1,LANDK1)
0x0d55…0d80 LineComalBin {
0x0d55…0d80 ptr = 0x9ad7 // 0xd55 @0x0
0x0d55…0d80 lno = 0x064a // 0xd57 @0x2
0x0d55…0d80 at0004 = ╱9e╱ PROC ╱ // 0xd59 @0x4
0x0d55…0d80 at0005 = ╱4e╱N╱ // 0xd5a @0x5
0x0d55…0d80 at0006 = ╱41╱A╱ // 0xd5b @0x6
0x0d55…0d80 at0007 = ╱56╱V╱ // 0xd5c @0x7
0x0d55…0d80 at0008 = ╱4e╱N╱ // 0xd5d @0x8
0x0d55…0d80 at0009 = ╱32╱2╱ // 0xd5e @0x9
0x0d55…0d80 at000a = ╱ed╱(╱ // 0xd5f @0xa
0x0d55…0d80 at000b = ╱4e╱N╱ // 0xd60 @0xb
0x0d55…0d80 at000c = ╱41╱A╱ // 0xd61 @0xc
0x0d55…0d80 at000d = ╱56╱V╱ // 0xd62 @0xd
0x0d55…0d80 at000e = ╱4e╱N╱ // 0xd63 @0xe
0x0d55…0d80 at000f = ╱33╱3╱ // 0xd64 @0xf
0x0d55…0d80 at0010 = ╱ec╱,╱ // 0xd65 @0x10
0x0d55…0d80 at0011 = ╱47╱G╱ // 0xd66 @0x11
0x0d55…0d80 at0012 = ╱41╱A╱ // 0xd67 @0x12
0x0d55…0d80 at0013 = ╱44╱D╱ // 0xd68 @0x13
0x0d55…0d80 at0014 = ╱45╱E╱ // 0xd69 @0x14
0x0d55…0d80 at0015 = ╱31╱1╱ // 0xd6a @0x15
0x0d55…0d80 at0016 = ╱ec╱,╱ // 0xd6b @0x16
0x0d55…0d80 at0017 = ╱50╱P╱ // 0xd6c @0x17
0x0d55…0d80 at0018 = ╱4f╱O╱ // 0xd6d @0x18
0x0d55…0d80 at0019 = ╱53╱S╱ // 0xd6e @0x19
0x0d55…0d80 at001a = ╱54╱T╱ // 0xd6f @0x1a
0x0d55…0d80 at001b = ╱4e╱N╱ // 0xd70 @0x1b
0x0d55…0d80 at001c = ╱52╱R╱ // 0xd71 @0x1c
0x0d55…0d80 at001d = ╱31╱1╱ // 0xd72 @0x1d
0x0d55…0d80 at001e = ╱ec╱,╱ // 0xd73 @0x1e
0x0d55…0d80 at001f = ╱42╱B╱ // 0xd74 @0x1f
0x0d55…0d80 at0020 = ╱59╱Y╱ // 0xd75 @0x20
0x0d55…0d80 at0021 = ╱31╱1╱ // 0xd76 @0x21
0x0d55…0d80 at0022 = ╱ec╱,╱ // 0xd77 @0x22
0x0d55…0d80 at0023 = ╱4c╱L╱ // 0xd78 @0x23
0x0d55…0d80 at0024 = ╱41╱A╱ // 0xd79 @0x24
0x0d55…0d80 at0025 = ╱4e╱N╱ // 0xd7a @0x25
0x0d55…0d80 at0026 = ╱44╱D╱ // 0xd7b @0x26
0x0d55…0d80 at0027 = ╱4b╱K╱ // 0xd7c @0x27
0x0d55…0d80 at0028 = ╱31╱1╱ // 0xd7d @0x28
0x0d55…0d80 at0029 = ╱ee╱)╱ // 0xd7e @0x29
0x0d55…0d80 at002a = EOL // 0xd7f @0x2a
0x0d55…0d80 }
0x0d80…0d8c 9ae3 1620 PRINT NAVN3$
0x0d80…0d8c LineComalBin {
0x0d80…0d8c ptr = 0x9ae3 // 0xd80 @0x0
0x0d80…0d8c lno = 0x0654 // 0xd82 @0x2
0x0d80…0d8c at0004 = ╱92╱ PRINT ╱ // 0xd84 @0x4
0x0d80…0d8c at0005 = ╱4e╱N╱ // 0xd85 @0x5
0x0d80…0d8c at0006 = ╱41╱A╱ // 0xd86 @0x6
0x0d80…0d8c at0007 = ╱56╱V╱ // 0xd87 @0x7
0x0d80…0d8c at0008 = ╱4e╱N╱ // 0xd88 @0x8
0x0d80…0d8c at0009 = ╱33╱3╱ // 0xd89 @0x9
0x0d80…0d8c at000a = ╱ef╱$╱ // 0xd8a @0xa
0x0d80…0d8c at000b = EOL // 0xd8b @0xb
0x0d80…0d8c }
0x0d8c…0d9a 9af1 1630 CURSOR W,6
0x0d8c…0d9a LineComalBin {
0x0d8c…0d9a ptr = 0x9af1 // 0xd8c @0x0
0x0d8c…0d9a lno = 0x065e // 0xd8e @0x2
0x0d8c…0d9a at0004 = ╱a1╱ CURSOR ╱ // 0xd90 @0x4
0x0d8c…0d9a at0005 = ╱57╱W╱ // 0xd91 @0x5
0x0d8c…0d9a at0006 = ╱ec╱,╱ // 0xd92 @0x6
0x0d8c…0d9a at0007 = ╱36╱6╱ // 0xd93 @0x7
0x0d8c…0d9a at0008 = ╱fe0000c003╱ // 0xd94 @0x8
0x0d8c…0d9a at000d = EOL // 0xd99 @0xd
0x0d8c…0d9a }
0x0d9a…0da6 9afd 1640 PRINT GADE1$
0x0d9a…0da6 LineComalBin {
0x0d9a…0da6 ptr = 0x9afd // 0xd9a @0x0
0x0d9a…0da6 lno = 0x0668 // 0xd9c @0x2
0x0d9a…0da6 at0004 = ╱92╱ PRINT ╱ // 0xd9e @0x4
0x0d9a…0da6 at0005 = ╱47╱G╱ // 0xd9f @0x5
0x0d9a…0da6 at0006 = ╱41╱A╱ // 0xda0 @0x6
0x0d9a…0da6 at0007 = ╱44╱D╱ // 0xda1 @0x7
0x0d9a…0da6 at0008 = ╱45╱E╱ // 0xda2 @0x8
0x0d9a…0da6 at0009 = ╱31╱1╱ // 0xda3 @0x9
0x0d9a…0da6 at000a = ╱ef╱$╱ // 0xda4 @0xa
0x0d9a…0da6 at000b = EOL // 0xda5 @0xb
0x0d9a…0da6 }
0x0da6…0db4 9b0b 1650 CURSOR W,7
0x0da6…0db4 LineComalBin {
0x0da6…0db4 ptr = 0x9b0b // 0xda6 @0x0
0x0da6…0db4 lno = 0x0672 // 0xda8 @0x2
0x0da6…0db4 at0004 = ╱a1╱ CURSOR ╱ // 0xdaa @0x4
0x0da6…0db4 at0005 = ╱57╱W╱ // 0xdab @0x5
0x0da6…0db4 at0006 = ╱ec╱,╱ // 0xdac @0x6
0x0da6…0db4 at0007 = ╱37╱7╱ // 0xdad @0x7
0x0da6…0db4 at0008 = ╱fe0000e003╱ // 0xdae @0x8
0x0da6…0db4 at000d = EOL // 0xdb3 @0xd
0x0da6…0db4 }
0x0db4…0dcb 9b22 1660 PRINT USING "######":POSTNR1
0x0db4…0dcb LineComalBin {
0x0db4…0dcb ptr = 0x9b22 // 0xdb4 @0x0
0x0db4…0dcb lno = 0x067c // 0xdb6 @0x2
0x0db4…0dcb at0004 = ╱92╱ PRINT ╱ // 0xdb8 @0x4
0x0db4…0dcb at0005 = ╱b9╱ USING ╱ // 0xdb9 @0x5
0x0db4…0dcb at0006 = ╱22╱"╱ // 0xdba @0x6
0x0db4…0dcb at0007 = ╱23╱#╱ // 0xdbb @0x7
0x0db4…0dcb at0008 = ╱23╱#╱ // 0xdbc @0x8
0x0db4…0dcb at0009 = ╱23╱#╱ // 0xdbd @0x9
0x0db4…0dcb at000a = ╱23╱#╱ // 0xdbe @0xa
0x0db4…0dcb at000b = ╱23╱#╱ // 0xdbf @0xb
0x0db4…0dcb at000c = ╱23╱#╱ // 0xdc0 @0xc
0x0db4…0dcb at000d = ╱22╱"╱ // 0xdc1 @0xd
0x0db4…0dcb at000e = ╱f0╱:╱ // 0xdc2 @0xe
0x0db4…0dcb at000f = ╱50╱P╱ // 0xdc3 @0xf
0x0db4…0dcb at0010 = ╱4f╱O╱ // 0xdc4 @0x10
0x0db4…0dcb at0011 = ╱53╱S╱ // 0xdc5 @0x11
0x0db4…0dcb at0012 = ╱54╱T╱ // 0xdc6 @0x12
0x0db4…0dcb at0013 = ╱4e╱N╱ // 0xdc7 @0x13
0x0db4…0dcb at0014 = ╱52╱R╱ // 0xdc8 @0x14
0x0db4…0dcb at0015 = ╱31╱1╱ // 0xdc9 @0x15
0x0db4…0dcb at0016 = EOL // 0xdca @0x16
0x0db4…0dcb }
0x0dcb…0dd9 9b30 1670 CURSOR F,7
0x0dcb…0dd9 LineComalBin {
0x0dcb…0dd9 ptr = 0x9b30 // 0xdcb @0x0
0x0dcb…0dd9 lno = 0x0686 // 0xdcd @0x2
0x0dcb…0dd9 at0004 = ╱a1╱ CURSOR ╱ // 0xdcf @0x4
0x0dcb…0dd9 at0005 = ╱46╱F╱ // 0xdd0 @0x5
0x0dcb…0dd9 at0006 = ╱ec╱,╱ // 0xdd1 @0x6
0x0dcb…0dd9 at0007 = ╱37╱7╱ // 0xdd2 @0x7
0x0dcb…0dd9 at0008 = ╱fe0000e003╱ // 0xdd3 @0x8
0x0dcb…0dd9 at000d = EOL // 0xdd8 @0xd
0x0dcb…0dd9 }
0x0dd9…0de3 9b3a 1680 PRINT BY1$
0x0dd9…0de3 LineComalBin {
0x0dd9…0de3 ptr = 0x9b3a // 0xdd9 @0x0
0x0dd9…0de3 lno = 0x0690 // 0xddb @0x2
0x0dd9…0de3 at0004 = ╱92╱ PRINT ╱ // 0xddd @0x4
0x0dd9…0de3 at0005 = ╱42╱B╱ // 0xdde @0x5
0x0dd9…0de3 at0006 = ╱59╱Y╱ // 0xddf @0x6
0x0dd9…0de3 at0007 = ╱31╱1╱ // 0xde0 @0x7
0x0dd9…0de3 at0008 = ╱ef╱$╱ // 0xde1 @0x8
0x0dd9…0de3 at0009 = EOL // 0xde2 @0x9
0x0dd9…0de3 }
0x0de3…0df1 9b48 1690 CURSOR W,8
0x0de3…0df1 LineComalBin {
0x0de3…0df1 ptr = 0x9b48 // 0xde3 @0x0
0x0de3…0df1 lno = 0x069a // 0xde5 @0x2
0x0de3…0df1 at0004 = ╱a1╱ CURSOR ╱ // 0xde7 @0x4
0x0de3…0df1 at0005 = ╱57╱W╱ // 0xde8 @0x5
0x0de3…0df1 at0006 = ╱ec╱,╱ // 0xde9 @0x6
0x0de3…0df1 at0007 = ╱38╱8╱ // 0xdea @0x7
0x0de3…0df1 at0008 = ╱fe00008004╱ // 0xdeb @0x8
0x0de3…0df1 at000d = EOL // 0xdf0 @0xd
0x0de3…0df1 }
0x0df1…0e06 9b5d 1700 EXEC NRTEST(LANDK1$)
0x0df1…0e06 LineComalBin {
0x0df1…0e06 ptr = 0x9b5d // 0xdf1 @0x0
0x0df1…0e06 lno = 0x06a4 // 0xdf3 @0x2
0x0df1…0e06 at0004 = ╱9d╱ EXEC ╱ // 0xdf5 @0x4
0x0df1…0e06 at0005 = ╱4e╱N╱ // 0xdf6 @0x5
0x0df1…0e06 at0006 = ╱52╱R╱ // 0xdf7 @0x6
0x0df1…0e06 at0007 = ╱54╱T╱ // 0xdf8 @0x7
0x0df1…0e06 at0008 = ╱45╱E╱ // 0xdf9 @0x8
0x0df1…0e06 at0009 = ╱53╱S╱ // 0xdfa @0x9
0x0df1…0e06 at000a = ╱54╱T╱ // 0xdfb @0xa
0x0df1…0e06 at000b = ╱ed╱(╱ // 0xdfc @0xb
0x0df1…0e06 at000c = ╱4c╱L╱ // 0xdfd @0xc
0x0df1…0e06 at000d = ╱41╱A╱ // 0xdfe @0xd
0x0df1…0e06 at000e = ╱4e╱N╱ // 0xdff @0xe
0x0df1…0e06 at000f = ╱44╱D╱ // 0xe00 @0xf
0x0df1…0e06 at0010 = ╱4b╱K╱ // 0xe01 @0x10
0x0df1…0e06 at0011 = ╱31╱1╱ // 0xe02 @0x11
0x0df1…0e06 at0012 = ╱ef╱$╱ // 0xe03 @0x12
0x0df1…0e06 at0013 = ╱ee╱)╱ // 0xe04 @0x13
0x0df1…0e06 at0014 = EOL // 0xe05 @0x14
0x0df1…0e06 }
0x0e06…0e23 9b7a 1710 IF P>B AND P<10 THEN PRINT LAND$(P)
0x0e06…0e23 LineComalBin {
0x0e06…0e23 ptr = 0x9b7a // 0xe06 @0x0
0x0e06…0e23 lno = 0x06ae // 0xe08 @0x2
0x0e06…0e23 at0004 = ╱82╱ IF ╱ // 0xe0a @0x4
0x0e06…0e23 at0005 = ╱50╱P╱ // 0xe0b @0x5
0x0e06…0e23 at0006 = ╱de╱>╱ // 0xe0c @0x6
0x0e06…0e23 at0007 = ╱42╱B╱ // 0xe0d @0x7
0x0e06…0e23 at0008 = ╱da╱ AND ╱ // 0xe0e @0x8
0x0e06…0e23 at0009 = ╱50╱P╱ // 0xe0f @0x9
0x0e06…0e23 at000a = ╱dd╱<╱ // 0xe10 @0xa
0x0e06…0e23 at000b = ╱31╱1╱ // 0xe11 @0xb
0x0e06…0e23 at000c = ╱30╱0╱ // 0xe12 @0xc
0x0e06…0e23 at000d = ╱fe0000a004╱ // 0xe13 @0xd
0x0e06…0e23 at0012 = ╱b6╱ THEN ╱ // 0xe18 @0x12
0x0e06…0e23 at0013 = ╱92╱ PRINT ╱ // 0xe19 @0x13
0x0e06…0e23 at0014 = ╱4c╱L╱ // 0xe1a @0x14
0x0e06…0e23 at0015 = ╱41╱A╱ // 0xe1b @0x15
0x0e06…0e23 at0016 = ╱4e╱N╱ // 0xe1c @0x16
0x0e06…0e23 at0017 = ╱44╱D╱ // 0xe1d @0x17
0x0e06…0e23 at0018 = ╱ef╱$╱ // 0xe1e @0x18
0x0e06…0e23 at0019 = ╱ed╱(╱ // 0xe1f @0x19
0x0e06…0e23 at001a = ╱50╱P╱ // 0xe20 @0x1a
0x0e06…0e23 at001b = ╱ee╱)╱ // 0xe21 @0x1b
0x0e06…0e23 at001c = EOL // 0xe22 @0x1c
0x0e06…0e23 }
0x0e23…0e29 (47,) 9b80 1720 ENDPROC
0x0e23…0e29 LineComalBin {
0x0e23…0e29 ptr = 0x9b80 // 0xe23 @0x0
0x0e23…0e29 lno = 0x06b8 // 0xe25 @0x2
0x0e23…0e29 at0004 = ╱9f╱ ENDPROC ╱ // 0xe27 @0x4
0x0e23…0e29 at0005 = EOL // 0xe28 @0x5
0x0e23…0e29 }
0x0e29…0e4f 9ba6 1730 PROC NAVN1(NAVN,GADE,POSTNR,BY,LANDK)
0x0e29…0e4f LineComalBin {
0x0e29…0e4f ptr = 0x9ba6 // 0xe29 @0x0
0x0e29…0e4f lno = 0x06c2 // 0xe2b @0x2
0x0e29…0e4f at0004 = ╱9e╱ PROC ╱ // 0xe2d @0x4
0x0e29…0e4f at0005 = ╱4e╱N╱ // 0xe2e @0x5
0x0e29…0e4f at0006 = ╱41╱A╱ // 0xe2f @0x6
0x0e29…0e4f at0007 = ╱56╱V╱ // 0xe30 @0x7
0x0e29…0e4f at0008 = ╱4e╱N╱ // 0xe31 @0x8
0x0e29…0e4f at0009 = ╱31╱1╱ // 0xe32 @0x9
0x0e29…0e4f at000a = ╱ed╱(╱ // 0xe33 @0xa
0x0e29…0e4f at000b = ╱4e╱N╱ // 0xe34 @0xb
0x0e29…0e4f at000c = ╱41╱A╱ // 0xe35 @0xc
0x0e29…0e4f at000d = ╱56╱V╱ // 0xe36 @0xd
0x0e29…0e4f at000e = ╱4e╱N╱ // 0xe37 @0xe
0x0e29…0e4f at000f = ╱ec╱,╱ // 0xe38 @0xf
0x0e29…0e4f at0010 = ╱47╱G╱ // 0xe39 @0x10
0x0e29…0e4f at0011 = ╱41╱A╱ // 0xe3a @0x11
0x0e29…0e4f at0012 = ╱44╱D╱ // 0xe3b @0x12
0x0e29…0e4f at0013 = ╱45╱E╱ // 0xe3c @0x13
0x0e29…0e4f at0014 = ╱ec╱,╱ // 0xe3d @0x14
0x0e29…0e4f at0015 = ╱50╱P╱ // 0xe3e @0x15
0x0e29…0e4f at0016 = ╱4f╱O╱ // 0xe3f @0x16
0x0e29…0e4f at0017 = ╱53╱S╱ // 0xe40 @0x17
0x0e29…0e4f at0018 = ╱54╱T╱ // 0xe41 @0x18
0x0e29…0e4f at0019 = ╱4e╱N╱ // 0xe42 @0x19
0x0e29…0e4f at001a = ╱52╱R╱ // 0xe43 @0x1a
0x0e29…0e4f at001b = ╱ec╱,╱ // 0xe44 @0x1b
0x0e29…0e4f at001c = ╱42╱B╱ // 0xe45 @0x1c
0x0e29…0e4f at001d = ╱59╱Y╱ // 0xe46 @0x1d
0x0e29…0e4f at001e = ╱ec╱,╱ // 0xe47 @0x1e
0x0e29…0e4f at001f = ╱4c╱L╱ // 0xe48 @0x1f
0x0e29…0e4f at0020 = ╱41╱A╱ // 0xe49 @0x20
0x0e29…0e4f at0021 = ╱4e╱N╱ // 0xe4a @0x21
0x0e29…0e4f at0022 = ╱44╱D╱ // 0xe4b @0x22
0x0e29…0e4f at0023 = ╱4b╱K╱ // 0xe4c @0x23
0x0e29…0e4f at0024 = ╱ee╱)╱ // 0xe4d @0x24
0x0e29…0e4f at0025 = EOL // 0xe4e @0x25
0x0e29…0e4f }
0x0e4f…0e63 9bba 1740 PRINT TAB(D);NAVN$;" "
0x0e4f…0e63 LineComalBin {
0x0e4f…0e63 ptr = 0x9bba // 0xe4f @0x0
0x0e4f…0e63 lno = 0x06cc // 0xe51 @0x2
0x0e4f…0e63 at0004 = ╱92╱ PRINT ╱ // 0xe53 @0x4
0x0e4f…0e63 at0005 = ╱d2╱TAB╱ // 0xe54 @0x5
0x0e4f…0e63 at0006 = ╱ed╱(╱ // 0xe55 @0x6
0x0e4f…0e63 at0007 = ╱44╱D╱ // 0xe56 @0x7
0x0e4f…0e63 at0008 = ╱ee╱)╱ // 0xe57 @0x8
0x0e4f…0e63 at0009 = ╱eb╱;╱ // 0xe58 @0x9
0x0e4f…0e63 at000a = ╱4e╱N╱ // 0xe59 @0xa
0x0e4f…0e63 at000b = ╱41╱A╱ // 0xe5a @0xb
0x0e4f…0e63 at000c = ╱56╱V╱ // 0xe5b @0xc
0x0e4f…0e63 at000d = ╱4e╱N╱ // 0xe5c @0xd
0x0e4f…0e63 at000e = ╱ef╱$╱ // 0xe5d @0xe
0x0e4f…0e63 at000f = ╱eb╱;╱ // 0xe5e @0xf
0x0e4f…0e63 at0010 = ╱22╱"╱ // 0xe5f @0x10
0x0e4f…0e63 at0011 = ╱20╱…╱ // 0xe60 @0x11
0x0e4f…0e63 at0012 = ╱22╱"╱ // 0xe61 @0x12
0x0e4f…0e63 at0013 = EOL // 0xe62 @0x13
0x0e4f…0e63 }
0x0e63…0e77 9bce 1750 PRINT TAB(D);GADE$;" "
0x0e63…0e77 LineComalBin {
0x0e63…0e77 ptr = 0x9bce // 0xe63 @0x0
0x0e63…0e77 lno = 0x06d6 // 0xe65 @0x2
0x0e63…0e77 at0004 = ╱92╱ PRINT ╱ // 0xe67 @0x4
0x0e63…0e77 at0005 = ╱d2╱TAB╱ // 0xe68 @0x5
0x0e63…0e77 at0006 = ╱ed╱(╱ // 0xe69 @0x6
0x0e63…0e77 at0007 = ╱44╱D╱ // 0xe6a @0x7
0x0e63…0e77 at0008 = ╱ee╱)╱ // 0xe6b @0x8
0x0e63…0e77 at0009 = ╱eb╱;╱ // 0xe6c @0x9
0x0e63…0e77 at000a = ╱47╱G╱ // 0xe6d @0xa
0x0e63…0e77 at000b = ╱41╱A╱ // 0xe6e @0xb
0x0e63…0e77 at000c = ╱44╱D╱ // 0xe6f @0xc
0x0e63…0e77 at000d = ╱45╱E╱ // 0xe70 @0xd
0x0e63…0e77 at000e = ╱ef╱$╱ // 0xe71 @0xe
0x0e63…0e77 at000f = ╱eb╱;╱ // 0xe72 @0xf
0x0e63…0e77 at0010 = ╱22╱"╱ // 0xe73 @0x10
0x0e63…0e77 at0011 = ╱20╱…╱ // 0xe74 @0x11
0x0e63…0e77 at0012 = ╱22╱"╱ // 0xe75 @0x12
0x0e63…0e77 at0013 = EOL // 0xe76 @0x13
0x0e63…0e77 }
0x0e77…0e9b 9bf2 1760 PRINT TAB(D);POSTNR;TAB(19);BY$;" "
0x0e77…0e9b LineComalBin {
0x0e77…0e9b ptr = 0x9bf2 // 0xe77 @0x0
0x0e77…0e9b lno = 0x06e0 // 0xe79 @0x2
0x0e77…0e9b at0004 = ╱92╱ PRINT ╱ // 0xe7b @0x4
0x0e77…0e9b at0005 = ╱d2╱TAB╱ // 0xe7c @0x5
0x0e77…0e9b at0006 = ╱ed╱(╱ // 0xe7d @0x6
0x0e77…0e9b at0007 = ╱44╱D╱ // 0xe7e @0x7
0x0e77…0e9b at0008 = ╱ee╱)╱ // 0xe7f @0x8
0x0e77…0e9b at0009 = ╱eb╱;╱ // 0xe80 @0x9
0x0e77…0e9b at000a = ╱50╱P╱ // 0xe81 @0xa
0x0e77…0e9b at000b = ╱4f╱O╱ // 0xe82 @0xb
0x0e77…0e9b at000c = ╱53╱S╱ // 0xe83 @0xc
0x0e77…0e9b at000d = ╱54╱T╱ // 0xe84 @0xd
0x0e77…0e9b at000e = ╱4e╱N╱ // 0xe85 @0xe
0x0e77…0e9b at000f = ╱52╱R╱ // 0xe86 @0xf
0x0e77…0e9b at0010 = ╱eb╱;╱ // 0xe87 @0x10
0x0e77…0e9b at0011 = ╱d2╱TAB╱ // 0xe88 @0x11
0x0e77…0e9b at0012 = ╱ed╱(╱ // 0xe89 @0x12
0x0e77…0e9b at0013 = ╱31╱1╱ // 0xe8a @0x13
0x0e77…0e9b at0014 = ╱39╱9╱ // 0xe8b @0x14
0x0e77…0e9b at0015 = ╱fe00009805╱ // 0xe8c @0x15
0x0e77…0e9b at001a = ╱ee╱)╱ // 0xe91 @0x1a
0x0e77…0e9b at001b = ╱eb╱;╱ // 0xe92 @0x1b
0x0e77…0e9b at001c = ╱42╱B╱ // 0xe93 @0x1c
0x0e77…0e9b at001d = ╱59╱Y╱ // 0xe94 @0x1d
0x0e77…0e9b at001e = ╱ef╱$╱ // 0xe95 @0x1e
0x0e77…0e9b at001f = ╱eb╱;╱ // 0xe96 @0x1f
0x0e77…0e9b at0020 = ╱22╱"╱ // 0xe97 @0x20
0x0e77…0e9b at0021 = ╱20╱…╱ // 0xe98 @0x21
0x0e77…0e9b at0022 = ╱22╱"╱ // 0xe99 @0x22
0x0e77…0e9b at0023 = EOL // 0xe9a @0x23
0x0e77…0e9b }
0x0e9b…0eb4 9c0b 1770 P1=ORD(LANDK$)-48
0x0e9b…0eb4 LineComalBin {
0x0e9b…0eb4 ptr = 0x9c0b // 0xe9b @0x0
0x0e9b…0eb4 lno = 0x06ea // 0xe9d @0x2
0x0e9b…0eb4 at0004 = ╱50╱P╱ // 0xe9f @0x4
0x0e9b…0eb4 at0005 = ╱31╱1╱ // 0xea0 @0x5
0x0e9b…0eb4 at0006 = ╱dc╱=╱ // 0xea1 @0x6
0x0e9b…0eb4 at0007 = ╱cd╱ORD╱ // 0xea2 @0x7
0x0e9b…0eb4 at0008 = ╱ed╱(╱ // 0xea3 @0x8
0x0e9b…0eb4 at0009 = ╱4c╱L╱ // 0xea4 @0x9
0x0e9b…0eb4 at000a = ╱41╱A╱ // 0xea5 @0xa
0x0e9b…0eb4 at000b = ╱4e╱N╱ // 0xea6 @0xb
0x0e9b…0eb4 at000c = ╱44╱D╱ // 0xea7 @0xc
0x0e9b…0eb4 at000d = ╱4b╱K╱ // 0xea8 @0xd
0x0e9b…0eb4 at000e = ╱ef╱$╱ // 0xea9 @0xe
0x0e9b…0eb4 at000f = ╱ee╱)╱ // 0xeaa @0xf
0x0e9b…0eb4 at0010 = ╱e3╱-╱ // 0xeab @0x10
0x0e9b…0eb4 at0011 = ╱34╱4╱ // 0xeac @0x11
0x0e9b…0eb4 at0012 = ╱38╱8╱ // 0xead @0x12
0x0e9b…0eb4 at0013 = ╱fe0000c006╱ // 0xeae @0x13
0x0e9b…0eb4 at0018 = EOL // 0xeb3 @0x18
0x0e9b…0eb4 }
0x0eb4…0edd 9c34 1780 IF P1>B AND P1<10 THEN PRINT TAB(D);LAND$(P1);" "
0x0eb4…0edd LineComalBin {
0x0eb4…0edd ptr = 0x9c34 // 0xeb4 @0x0
0x0eb4…0edd lno = 0x06f4 // 0xeb6 @0x2
0x0eb4…0edd at0004 = ╱82╱ IF ╱ // 0xeb8 @0x4
0x0eb4…0edd at0005 = ╱50╱P╱ // 0xeb9 @0x5
0x0eb4…0edd at0006 = ╱31╱1╱ // 0xeba @0x6
0x0eb4…0edd at0007 = ╱de╱>╱ // 0xebb @0x7
0x0eb4…0edd at0008 = ╱42╱B╱ // 0xebc @0x8
0x0eb4…0edd at0009 = ╱da╱ AND ╱ // 0xebd @0x9
0x0eb4…0edd at000a = ╱50╱P╱ // 0xebe @0xa
0x0eb4…0edd at000b = ╱31╱1╱ // 0xebf @0xb
0x0eb4…0edd at000c = ╱dd╱<╱ // 0xec0 @0xc
0x0eb4…0edd at000d = ╱31╱1╱ // 0xec1 @0xd
0x0eb4…0edd at000e = ╱30╱0╱ // 0xec2 @0xe
0x0eb4…0edd at000f = ╱fe0000a004╱ // 0xec3 @0xf
0x0eb4…0edd at0014 = ╱b6╱ THEN ╱ // 0xec8 @0x14
0x0eb4…0edd at0015 = ╱92╱ PRINT ╱ // 0xec9 @0x15
0x0eb4…0edd at0016 = ╱d2╱TAB╱ // 0xeca @0x16
0x0eb4…0edd at0017 = ╱ed╱(╱ // 0xecb @0x17
0x0eb4…0edd at0018 = ╱44╱D╱ // 0xecc @0x18
0x0eb4…0edd at0019 = ╱ee╱)╱ // 0xecd @0x19
0x0eb4…0edd at001a = ╱eb╱;╱ // 0xece @0x1a
0x0eb4…0edd at001b = ╱4c╱L╱ // 0xecf @0x1b
0x0eb4…0edd at001c = ╱41╱A╱ // 0xed0 @0x1c
0x0eb4…0edd at001d = ╱4e╱N╱ // 0xed1 @0x1d
0x0eb4…0edd at001e = ╱44╱D╱ // 0xed2 @0x1e
0x0eb4…0edd at001f = ╱ef╱$╱ // 0xed3 @0x1f
0x0eb4…0edd at0020 = ╱ed╱(╱ // 0xed4 @0x20
0x0eb4…0edd at0021 = ╱50╱P╱ // 0xed5 @0x21
0x0eb4…0edd at0022 = ╱31╱1╱ // 0xed6 @0x22
0x0eb4…0edd at0023 = ╱ee╱)╱ // 0xed7 @0x23
0x0eb4…0edd at0024 = ╱eb╱;╱ // 0xed8 @0x24
0x0eb4…0edd at0025 = ╱22╱"╱ // 0xed9 @0x25
0x0eb4…0edd at0026 = ╱20╱…╱ // 0xeda @0x26
0x0eb4…0edd at0027 = ╱22╱"╱ // 0xedb @0x27
0x0eb4…0edd at0028 = EOL // 0xedc @0x28
0x0eb4…0edd }
0x0edd…0f10 9c67 1790 EXEC LINIER(1,1*(P1<1 OR P1>9),I)
0x0edd…0f10 LineComalBin {
0x0edd…0f10 ptr = 0x9c67 // 0xedd @0x0
0x0edd…0f10 lno = 0x06fe // 0xedf @0x2
0x0edd…0f10 at0004 = ╱9d╱ EXEC ╱ // 0xee1 @0x4
0x0edd…0f10 at0005 = ╱4c╱L╱ // 0xee2 @0x5
0x0edd…0f10 at0006 = ╱49╱I╱ // 0xee3 @0x6
0x0edd…0f10 at0007 = ╱4e╱N╱ // 0xee4 @0x7
0x0edd…0f10 at0008 = ╱49╱I╱ // 0xee5 @0x8
0x0edd…0f10 at0009 = ╱45╱E╱ // 0xee6 @0x9
0x0edd…0f10 at000a = ╱52╱R╱ // 0xee7 @0xa
0x0edd…0f10 at000b = ╱ed╱(╱ // 0xee8 @0xb
0x0edd…0f10 at000c = ╱31╱1╱ // 0xee9 @0xc
0x0edd…0f10 at000d = ╱fe00008001╱ // 0xeea @0xd
0x0edd…0f10 at0012 = ╱ec╱,╱ // 0xeef @0x12
0x0edd…0f10 at0013 = ╱31╱1╱ // 0xef0 @0x13
0x0edd…0f10 at0014 = ╱fe00008001╱ // 0xef1 @0x14
0x0edd…0f10 at0019 = ╱e4╱*╱ // 0xef6 @0x19
0x0edd…0f10 at001a = ╱ed╱(╱ // 0xef7 @0x1a
0x0edd…0f10 at001b = ╱50╱P╱ // 0xef8 @0x1b
0x0edd…0f10 at001c = ╱31╱1╱ // 0xef9 @0x1c
0x0edd…0f10 at001d = ╱dd╱<╱ // 0xefa @0x1d
0x0edd…0f10 at001e = ╱31╱1╱ // 0xefb @0x1e
0x0edd…0f10 at001f = ╱fe00008001╱ // 0xefc @0x1f
0x0edd…0f10 at0024 = ╱db╱ OR ╱ // 0xf01 @0x24
0x0edd…0f10 at0025 = ╱50╱P╱ // 0xf02 @0x25
0x0edd…0f10 at0026 = ╱31╱1╱ // 0xf03 @0x26
0x0edd…0f10 at0027 = ╱de╱>╱ // 0xf04 @0x27
0x0edd…0f10 at0028 = ╱39╱9╱ // 0xf05 @0x28
0x0edd…0f10 at0029 = ╱fe00009004╱ // 0xf06 @0x29
0x0edd…0f10 at002e = ╱ee╱)╱ // 0xf0b @0x2e
0x0edd…0f10 at002f = ╱ec╱,╱ // 0xf0c @0x2f
0x0edd…0f10 at0030 = ╱49╱I╱ // 0xf0d @0x30
0x0edd…0f10 at0031 = ╱ee╱)╱ // 0xf0e @0x31
0x0edd…0f10 at0032 = EOL // 0xf0f @0x32
0x0edd…0f10 }
0x0f10…0f16 9c6d 1800 ENDPROC
0x0f10…0f16 LineComalBin {
0x0f10…0f16 ptr = 0x9c6d // 0xf10 @0x0
0x0f10…0f16 lno = 0x0708 // 0xf12 @0x2
0x0f10…0f16 at0004 = ╱9f╱ ENDPROC ╱ // 0xf14 @0x4
0x0f10…0f16 at0005 = EOL // 0xf15 @0x5
0x0f10…0f16 }
0x0f16…0f41 9c98 1810 PROC FINDPOST1(TAB4,Q,MANT2,NØGL5,PIL6,L8)
0x0f16…0f41 LineComalBin {
0x0f16…0f41 ptr = 0x9c98 // 0xf16 @0x0
0x0f16…0f41 lno = 0x0712 // 0xf18 @0x2
0x0f16…0f41 at0004 = ╱9e╱ PROC ╱ // 0xf1a @0x4
0x0f16…0f41 at0005 = ╱46╱F╱ // 0xf1b @0x5
0x0f16…0f41 at0006 = ╱49╱I╱ // 0xf1c @0x6
0x0f16…0f41 at0007 = ╱4e╱N╱ // 0xf1d @0x7
0x0f16…0f41 at0008 = ╱44╱D╱ // 0xf1e @0x8
0x0f16…0f41 at0009 = ╱50╱P╱ // 0xf1f @0x9
0x0f16…0f41 at000a = ╱4f╱O╱ // 0xf20 @0xa
0x0f16…0f41 at000b = ╱53╱S╱ // 0xf21 @0xb
0x0f16…0f41 at000c = ╱54╱T╱ // 0xf22 @0xc
0x0f16…0f41 at000d = ╱31╱1╱ // 0xf23 @0xd
0x0f16…0f41 at000e = ╱ed╱(╱ // 0xf24 @0xe
0x0f16…0f41 at000f = ╱54╱T╱ // 0xf25 @0xf
0x0f16…0f41 at0010 = ╱41╱A╱ // 0xf26 @0x10
0x0f16…0f41 at0011 = ╱42╱B╱ // 0xf27 @0x11
0x0f16…0f41 at0012 = ╱34╱4╱ // 0xf28 @0x12
0x0f16…0f41 at0013 = ╱ec╱,╱ // 0xf29 @0x13
0x0f16…0f41 at0014 = ╱51╱Q╱ // 0xf2a @0x14
0x0f16…0f41 at0015 = ╱ec╱,╱ // 0xf2b @0x15
0x0f16…0f41 at0016 = ╱4d╱M╱ // 0xf2c @0x16
0x0f16…0f41 at0017 = ╱41╱A╱ // 0xf2d @0x17
0x0f16…0f41 at0018 = ╱4e╱N╱ // 0xf2e @0x18
0x0f16…0f41 at0019 = ╱54╱T╱ // 0xf2f @0x19
0x0f16…0f41 at001a = ╱32╱2╱ // 0xf30 @0x1a
0x0f16…0f41 at001b = ╱ec╱,╱ // 0xf31 @0x1b
0x0f16…0f41 at001c = ╱4e╱N╱ // 0xf32 @0x1c
0x0f16…0f41 at001d = ╱5c╱Ø╱ // 0xf33 @0x1d
0x0f16…0f41 at001e = ╱47╱G╱ // 0xf34 @0x1e
0x0f16…0f41 at001f = ╱4c╱L╱ // 0xf35 @0x1f
0x0f16…0f41 at0020 = ╱35╱5╱ // 0xf36 @0x20
0x0f16…0f41 at0021 = ╱ec╱,╱ // 0xf37 @0x21
0x0f16…0f41 at0022 = ╱50╱P╱ // 0xf38 @0x22
0x0f16…0f41 at0023 = ╱49╱I╱ // 0xf39 @0x23
0x0f16…0f41 at0024 = ╱4c╱L╱ // 0xf3a @0x24
0x0f16…0f41 at0025 = ╱36╱6╱ // 0xf3b @0x25
0x0f16…0f41 at0026 = ╱ec╱,╱ // 0xf3c @0x26
0x0f16…0f41 at0027 = ╱4c╱L╱ // 0xf3d @0x27
0x0f16…0f41 at0028 = ╱38╱8╱ // 0xf3e @0x28
0x0f16…0f41 at0029 = ╱ee╱)╱ // 0xf3f @0x29
0x0f16…0f41 at002a = EOL // 0xf40 @0x2a
0x0f16…0f41 }
0x0f41…0f8a 9ce1 1820 PIL1=MANT2 DIV 8;PIL6=PIL1;CEKS=E;MANT3=MANT2 DIV C;MANT4=MANT2 DIV 32
0x0f41…0f8a LineComalBin {
0x0f41…0f8a ptr = 0x9ce1 // 0xf41 @0x0
0x0f41…0f8a lno = 0x071c // 0xf43 @0x2
0x0f41…0f8a at0004 = ╱50╱P╱ // 0xf45 @0x4
0x0f41…0f8a at0005 = ╱49╱I╱ // 0xf46 @0x5
0x0f41…0f8a at0006 = ╱4c╱L╱ // 0xf47 @0x6
0x0f41…0f8a at0007 = ╱31╱1╱ // 0xf48 @0x7
0x0f41…0f8a at0008 = ╱dc╱=╱ // 0xf49 @0x8
0x0f41…0f8a at0009 = ╱4d╱M╱ // 0xf4a @0x9
0x0f41…0f8a at000a = ╱41╱A╱ // 0xf4b @0xa
0x0f41…0f8a at000b = ╱4e╱N╱ // 0xf4c @0xb
0x0f41…0f8a at000c = ╱54╱T╱ // 0xf4d @0xc
0x0f41…0f8a at000d = ╱32╱2╱ // 0xf4e @0xd
0x0f41…0f8a at000e = ╱e7╱ DIV ╱ // 0xf4f @0xe
0x0f41…0f8a at000f = ╱38╱8╱ // 0xf50 @0xf
0x0f41…0f8a at0010 = ╱fe00008004╱ // 0xf51 @0x10
0x0f41…0f8a at0015 = ╱eb╱;╱ // 0xf56 @0x15
0x0f41…0f8a at0016 = ╱50╱P╱ // 0xf57 @0x16
0x0f41…0f8a at0017 = ╱49╱I╱ // 0xf58 @0x17
0x0f41…0f8a at0018 = ╱4c╱L╱ // 0xf59 @0x18
0x0f41…0f8a at0019 = ╱36╱6╱ // 0xf5a @0x19
0x0f41…0f8a at001a = ╱dc╱=╱ // 0xf5b @0x1a
0x0f41…0f8a at001b = ╱50╱P╱ // 0xf5c @0x1b
0x0f41…0f8a at001c = ╱49╱I╱ // 0xf5d @0x1c
0x0f41…0f8a at001d = ╱4c╱L╱ // 0xf5e @0x1d
0x0f41…0f8a at001e = ╱31╱1╱ // 0xf5f @0x1e
0x0f41…0f8a at001f = ╱eb╱;╱ // 0xf60 @0x1f
0x0f41…0f8a at0020 = ╱43╱C╱ // 0xf61 @0x20
0x0f41…0f8a at0021 = ╱45╱E╱ // 0xf62 @0x21
0x0f41…0f8a at0022 = ╱4b╱K╱ // 0xf63 @0x22
0x0f41…0f8a at0023 = ╱53╱S╱ // 0xf64 @0x23
0x0f41…0f8a at0024 = ╱dc╱=╱ // 0xf65 @0x24
0x0f41…0f8a at0025 = ╱45╱E╱ // 0xf66 @0x25
0x0f41…0f8a at0026 = ╱eb╱;╱ // 0xf67 @0x26
0x0f41…0f8a at0027 = ╱4d╱M╱ // 0xf68 @0x27
0x0f41…0f8a at0028 = ╱41╱A╱ // 0xf69 @0x28
0x0f41…0f8a at0029 = ╱4e╱N╱ // 0xf6a @0x29
0x0f41…0f8a at002a = ╱54╱T╱ // 0xf6b @0x2a
0x0f41…0f8a at002b = ╱33╱3╱ // 0xf6c @0x2b
0x0f41…0f8a at002c = ╱dc╱=╱ // 0xf6d @0x2c
0x0f41…0f8a at002d = ╱4d╱M╱ // 0xf6e @0x2d
0x0f41…0f8a at002e = ╱41╱A╱ // 0xf6f @0x2e
0x0f41…0f8a at002f = ╱4e╱N╱ // 0xf70 @0x2f
0x0f41…0f8a at0030 = ╱54╱T╱ // 0xf71 @0x30
0x0f41…0f8a at0031 = ╱32╱2╱ // 0xf72 @0x31
0x0f41…0f8a at0032 = ╱e7╱ DIV ╱ // 0xf73 @0x32
0x0f41…0f8a at0033 = ╱43╱C╱ // 0xf74 @0x33
0x0f41…0f8a at0034 = ╱eb╱;╱ // 0xf75 @0x34
0x0f41…0f8a at0035 = ╱4d╱M╱ // 0xf76 @0x35
0x0f41…0f8a at0036 = ╱41╱A╱ // 0xf77 @0x36
0x0f41…0f8a at0037 = ╱4e╱N╱ // 0xf78 @0x37
0x0f41…0f8a at0038 = ╱54╱T╱ // 0xf79 @0x38
0x0f41…0f8a at0039 = ╱34╱4╱ // 0xf7a @0x39
0x0f41…0f8a at003a = ╱dc╱=╱ // 0xf7b @0x3a
0x0f41…0f8a at003b = ╱4d╱M╱ // 0xf7c @0x3b
0x0f41…0f8a at003c = ╱41╱A╱ // 0xf7d @0x3c
0x0f41…0f8a at003d = ╱4e╱N╱ // 0xf7e @0x3d
0x0f41…0f8a at003e = ╱54╱T╱ // 0xf7f @0x3e
0x0f41…0f8a at003f = ╱32╱2╱ // 0xf80 @0x3f
0x0f41…0f8a at0040 = ╱e7╱ DIV ╱ // 0xf81 @0x40
0x0f41…0f8a at0041 = ╱33╱3╱ // 0xf82 @0x41
0x0f41…0f8a at0042 = ╱32╱2╱ // 0xf83 @0x42
0x0f41…0f8a at0043 = ╱fe00008006╱ // 0xf84 @0x43
0x0f41…0f8a at0048 = EOL // 0xf89 @0x48
0x0f41…0f8a }
0x0f8a…0f90 9ce7 1830 REPEAT
0x0f8a…0f90 LineComalBin {
0x0f8a…0f90 ptr = 0x9ce7 // 0xf8a @0x0
0x0f8a…0f90 lno = 0x0726 // 0xf8c @0x2
0x0f8a…0f90 at0004 = ╱97╱ REPEAT ╱ // 0xf8e @0x4
0x0f8a…0f90 at0005 = EOL // 0xf8f @0x5
0x0f8a…0f90 }
0x0f90…0faf 9d06 1840 IF NØGL5=TAB4(PIL6) OR PIL1=E THEN EXIT
0x0f90…0faf LineComalBin {
0x0f90…0faf ptr = 0x9d06 // 0xf90 @0x0
0x0f90…0faf lno = 0x0730 // 0xf92 @0x2
0x0f90…0faf at0004 = ╱82╱ IF ╱ // 0xf94 @0x4
0x0f90…0faf at0005 = ╱4e╱N╱ // 0xf95 @0x5
0x0f90…0faf at0006 = ╱5c╱Ø╱ // 0xf96 @0x6
0x0f90…0faf at0007 = ╱47╱G╱ // 0xf97 @0x7
0x0f90…0faf at0008 = ╱4c╱L╱ // 0xf98 @0x8
0x0f90…0faf at0009 = ╱35╱5╱ // 0xf99 @0x9
0x0f90…0faf at000a = ╱dc╱=╱ // 0xf9a @0xa
0x0f90…0faf at000b = ╱54╱T╱ // 0xf9b @0xb
0x0f90…0faf at000c = ╱41╱A╱ // 0xf9c @0xc
0x0f90…0faf at000d = ╱42╱B╱ // 0xf9d @0xd
0x0f90…0faf at000e = ╱34╱4╱ // 0xf9e @0xe
0x0f90…0faf at000f = ╱ed╱(╱ // 0xf9f @0xf
0x0f90…0faf at0010 = ╱50╱P╱ // 0xfa0 @0x10
0x0f90…0faf at0011 = ╱49╱I╱ // 0xfa1 @0x11
0x0f90…0faf at0012 = ╱4c╱L╱ // 0xfa2 @0x12
0x0f90…0faf at0013 = ╱36╱6╱ // 0xfa3 @0x13
0x0f90…0faf at0014 = ╱ee╱)╱ // 0xfa4 @0x14
0x0f90…0faf at0015 = ╱db╱ OR ╱ // 0xfa5 @0x15
0x0f90…0faf at0016 = ╱50╱P╱ // 0xfa6 @0x16
0x0f90…0faf at0017 = ╱49╱I╱ // 0xfa7 @0x17
0x0f90…0faf at0018 = ╱4c╱L╱ // 0xfa8 @0x18
0x0f90…0faf at0019 = ╱31╱1╱ // 0xfa9 @0x19
0x0f90…0faf at001a = ╱dc╱=╱ // 0xfaa @0x1a
0x0f90…0faf at001b = ╱45╱E╱ // 0xfab @0x1b
0x0f90…0faf at001c = ╱b6╱ THEN ╱ // 0xfac @0x1c
0x0f90…0faf at001d = ╱99╱ EXIT ╱ // 0xfad @0x1d
0x0f90…0faf at001e = EOL // 0xfae @0x1e
0x0f90…0faf }
0x0faf…0feb 9d42 1850 PIL1=(PIL1+E) DIV G;PIL6=PIL6+PIL1*(E-G*(NØGL5<TAB4(PIL6)))
0x0faf…0feb LineComalBin {
0x0faf…0feb ptr = 0x9d42 // 0xfaf @0x0
0x0faf…0feb lno = 0x073a // 0xfb1 @0x2
0x0faf…0feb at0004 = ╱50╱P╱ // 0xfb3 @0x4
0x0faf…0feb at0005 = ╱49╱I╱ // 0xfb4 @0x5
0x0faf…0feb at0006 = ╱4c╱L╱ // 0xfb5 @0x6
0x0faf…0feb at0007 = ╱31╱1╱ // 0xfb6 @0x7
0x0faf…0feb at0008 = ╱dc╱=╱ // 0xfb7 @0x8
0x0faf…0feb at0009 = ╱ed╱(╱ // 0xfb8 @0x9
0x0faf…0feb at000a = ╱50╱P╱ // 0xfb9 @0xa
0x0faf…0feb at000b = ╱49╱I╱ // 0xfba @0xb
0x0faf…0feb at000c = ╱4c╱L╱ // 0xfbb @0xc
0x0faf…0feb at000d = ╱31╱1╱ // 0xfbc @0xd
0x0faf…0feb at000e = ╱e2╱+╱ // 0xfbd @0xe
0x0faf…0feb at000f = ╱45╱E╱ // 0xfbe @0xf
0x0faf…0feb at0010 = ╱ee╱)╱ // 0xfbf @0x10
0x0faf…0feb at0011 = ╱e7╱ DIV ╱ // 0xfc0 @0x11
0x0faf…0feb at0012 = ╱47╱G╱ // 0xfc1 @0x12
0x0faf…0feb at0013 = ╱eb╱;╱ // 0xfc2 @0x13
0x0faf…0feb at0014 = ╱50╱P╱ // 0xfc3 @0x14
0x0faf…0feb at0015 = ╱49╱I╱ // 0xfc4 @0x15
0x0faf…0feb at0016 = ╱4c╱L╱ // 0xfc5 @0x16
0x0faf…0feb at0017 = ╱36╱6╱ // 0xfc6 @0x17
0x0faf…0feb at0018 = ╱dc╱=╱ // 0xfc7 @0x18
0x0faf…0feb at0019 = ╱50╱P╱ // 0xfc8 @0x19
0x0faf…0feb at001a = ╱49╱I╱ // 0xfc9 @0x1a
0x0faf…0feb at001b = ╱4c╱L╱ // 0xfca @0x1b
0x0faf…0feb at001c = ╱36╱6╱ // 0xfcb @0x1c
0x0faf…0feb at001d = ╱e2╱+╱ // 0xfcc @0x1d
0x0faf…0feb at001e = ╱50╱P╱ // 0xfcd @0x1e
0x0faf…0feb at001f = ╱49╱I╱ // 0xfce @0x1f
0x0faf…0feb at0020 = ╱4c╱L╱ // 0xfcf @0x20
0x0faf…0feb at0021 = ╱31╱1╱ // 0xfd0 @0x21
0x0faf…0feb at0022 = ╱e4╱*╱ // 0xfd1 @0x22
0x0faf…0feb at0023 = ╱ed╱(╱ // 0xfd2 @0x23
0x0faf…0feb at0024 = ╱45╱E╱ // 0xfd3 @0x24
0x0faf…0feb at0025 = ╱e3╱-╱ // 0xfd4 @0x25
0x0faf…0feb at0026 = ╱47╱G╱ // 0xfd5 @0x26
0x0faf…0feb at0027 = ╱e4╱*╱ // 0xfd6 @0x27
0x0faf…0feb at0028 = ╱ed╱(╱ // 0xfd7 @0x28
0x0faf…0feb at0029 = ╱4e╱N╱ // 0xfd8 @0x29
0x0faf…0feb at002a = ╱5c╱Ø╱ // 0xfd9 @0x2a
0x0faf…0feb at002b = ╱47╱G╱ // 0xfda @0x2b
0x0faf…0feb at002c = ╱4c╱L╱ // 0xfdb @0x2c
0x0faf…0feb at002d = ╱35╱5╱ // 0xfdc @0x2d
0x0faf…0feb at002e = ╱dd╱<╱ // 0xfdd @0x2e
0x0faf…0feb at002f = ╱54╱T╱ // 0xfde @0x2f
0x0faf…0feb at0030 = ╱41╱A╱ // 0xfdf @0x30
0x0faf…0feb at0031 = ╱42╱B╱ // 0xfe0 @0x31
0x0faf…0feb at0032 = ╱34╱4╱ // 0xfe1 @0x32
0x0faf…0feb at0033 = ╱ed╱(╱ // 0xfe2 @0x33
0x0faf…0feb at0034 = ╱50╱P╱ // 0xfe3 @0x34
0x0faf…0feb at0035 = ╱49╱I╱ // 0xfe4 @0x35
0x0faf…0feb at0036 = ╱4c╱L╱ // 0xfe5 @0x36
0x0faf…0feb at0037 = ╱36╱6╱ // 0xfe6 @0x37
0x0faf…0feb at0038 = ╱ee╱)╱ // 0xfe7 @0x38
0x0faf…0feb at0039 = ╱ee╱)╱ // 0xfe8 @0x39
0x0faf…0feb at003a = ╱ee╱)╱ // 0xfe9 @0x3a
0x0faf…0feb at003b = EOL // 0xfea @0x3b
0x0faf…0feb }
0x0feb…0ffe 9d55 1860 IF PIL6<E THEN PIL6=E
0x0feb…0ffe LineComalBin {
0x0feb…0ffe ptr = 0x9d55 // 0xfeb @0x0
0x0feb…0ffe lno = 0x0744 // 0xfed @0x2
0x0feb…0ffe at0004 = ╱82╱ IF ╱ // 0xfef @0x4
0x0feb…0ffe at0005 = ╱50╱P╱ // 0xff0 @0x5
0x0feb…0ffe at0006 = ╱49╱I╱ // 0xff1 @0x6
0x0feb…0ffe at0007 = ╱4c╱L╱ // 0xff2 @0x7
0x0feb…0ffe at0008 = ╱36╱6╱ // 0xff3 @0x8
0x0feb…0ffe at0009 = ╱dd╱<╱ // 0xff4 @0x9
0x0feb…0ffe at000a = ╱45╱E╱ // 0xff5 @0xa
0x0feb…0ffe at000b = ╱b6╱ THEN ╱ // 0xff6 @0xb
0x0feb…0ffe at000c = ╱50╱P╱ // 0xff7 @0xc
0x0feb…0ffe at000d = ╱49╱I╱ // 0xff8 @0xd
0x0feb…0ffe at000e = ╱4c╱L╱ // 0xff9 @0xe
0x0feb…0ffe at000f = ╱36╱6╱ // 0xffa @0xf
0x0feb…0ffe at0010 = ╱dc╱=╱ // 0xffb @0x10
0x0feb…0ffe at0011 = ╱45╱E╱ // 0xffc @0x11
0x0feb…0ffe at0012 = EOL // 0xffd @0x12
0x0feb…0ffe }
0x0ffe…1019 9d70 1870 IF PIL6>MANT3 THEN PIL6=MANT3
0x0ffe…1019 LineComalBin {
0x0ffe…1019 ptr = 0x9d70 // 0xffe @0x0
0x0ffe…1019 lno = 0x074e // 0x1000 @0x2
0x0ffe…1019 at0004 = ╱82╱ IF ╱ // 0x1002 @0x4
0x0ffe…1019 at0005 = ╱50╱P╱ // 0x1003 @0x5
0x0ffe…1019 at0006 = ╱49╱I╱ // 0x1004 @0x6
0x0ffe…1019 at0007 = ╱4c╱L╱ // 0x1005 @0x7
0x0ffe…1019 at0008 = ╱36╱6╱ // 0x1006 @0x8
0x0ffe…1019 at0009 = ╱de╱>╱ // 0x1007 @0x9
0x0ffe…1019 at000a = ╱4d╱M╱ // 0x1008 @0xa
0x0ffe…1019 at000b = ╱41╱A╱ // 0x1009 @0xb
0x0ffe…1019 at000c = ╱4e╱N╱ // 0x100a @0xc
0x0ffe…1019 at000d = ╱54╱T╱ // 0x100b @0xd
0x0ffe…1019 at000e = ╱33╱3╱ // 0x100c @0xe
0x0ffe…1019 at000f = ╱b6╱ THEN ╱ // 0x100d @0xf
0x0ffe…1019 at0010 = ╱50╱P╱ // 0x100e @0x10
0x0ffe…1019 at0011 = ╱49╱I╱ // 0x100f @0x11
0x0ffe…1019 at0012 = ╱4c╱L╱ // 0x1010 @0x12
0x0ffe…1019 at0013 = ╱36╱6╱ // 0x1011 @0x13
0x0ffe…1019 at0014 = ╱dc╱=╱ // 0x1012 @0x14
0x0ffe…1019 at0015 = ╱4d╱M╱ // 0x1013 @0x15
0x0ffe…1019 at0016 = ╱41╱A╱ // 0x1014 @0x16
0x0ffe…1019 at0017 = ╱4e╱N╱ // 0x1015 @0x17
0x0ffe…1019 at0018 = ╱54╱T╱ // 0x1016 @0x18
0x0ffe…1019 at0019 = ╱33╱3╱ // 0x1017 @0x19
0x0ffe…1019 at001a = EOL // 0x1018 @0x1a
0x0ffe…1019 }
0x1019…1025 9d7c 1880 UNTIL PIL1=B
0x1019…1025 LineComalBin {
0x1019…1025 ptr = 0x9d7c // 0x1019 @0x0
0x1019…1025 lno = 0x0758 // 0x101b @0x2
0x1019…1025 at0004 = ╱98╱ UNTIL ╱ // 0x101d @0x4
0x1019…1025 at0005 = ╱50╱P╱ // 0x101e @0x5
0x1019…1025 at0006 = ╱49╱I╱ // 0x101f @0x6
0x1019…1025 at0007 = ╱4c╱L╱ // 0x1020 @0x7
0x1019…1025 at0008 = ╱31╱1╱ // 0x1021 @0x8
0x1019…1025 at0009 = ╱dc╱=╱ // 0x1022 @0x9
0x1019…1025 at000a = ╱42╱B╱ // 0x1023 @0xa
0x1019…1025 at000b = EOL // 0x1024 @0xb
0x1019…1025 }
0x1025…1050 9da7 1890 IF TAB4(PIL6)>NØGL5 THEN PIL6=PIL6-E*(PIL6>E)
0x1025…1050 LineComalBin {
0x1025…1050 ptr = 0x9da7 // 0x1025 @0x0
0x1025…1050 lno = 0x0762 // 0x1027 @0x2
0x1025…1050 at0004 = ╱82╱ IF ╱ // 0x1029 @0x4
0x1025…1050 at0005 = ╱54╱T╱ // 0x102a @0x5
0x1025…1050 at0006 = ╱41╱A╱ // 0x102b @0x6
0x1025…1050 at0007 = ╱42╱B╱ // 0x102c @0x7
0x1025…1050 at0008 = ╱34╱4╱ // 0x102d @0x8
0x1025…1050 at0009 = ╱ed╱(╱ // 0x102e @0x9
0x1025…1050 at000a = ╱50╱P╱ // 0x102f @0xa
0x1025…1050 at000b = ╱49╱I╱ // 0x1030 @0xb
0x1025…1050 at000c = ╱4c╱L╱ // 0x1031 @0xc
0x1025…1050 at000d = ╱36╱6╱ // 0x1032 @0xd
0x1025…1050 at000e = ╱ee╱)╱ // 0x1033 @0xe
0x1025…1050 at000f = ╱de╱>╱ // 0x1034 @0xf
0x1025…1050 at0010 = ╱4e╱N╱ // 0x1035 @0x10
0x1025…1050 at0011 = ╱5c╱Ø╱ // 0x1036 @0x11
0x1025…1050 at0012 = ╱47╱G╱ // 0x1037 @0x12
0x1025…1050 at0013 = ╱4c╱L╱ // 0x1038 @0x13
0x1025…1050 at0014 = ╱35╱5╱ // 0x1039 @0x14
0x1025…1050 at0015 = ╱b6╱ THEN ╱ // 0x103a @0x15
0x1025…1050 at0016 = ╱50╱P╱ // 0x103b @0x16
0x1025…1050 at0017 = ╱49╱I╱ // 0x103c @0x17
0x1025…1050 at0018 = ╱4c╱L╱ // 0x103d @0x18
0x1025…1050 at0019 = ╱36╱6╱ // 0x103e @0x19
0x1025…1050 at001a = ╱dc╱=╱ // 0x103f @0x1a
0x1025…1050 at001b = ╱50╱P╱ // 0x1040 @0x1b
0x1025…1050 at001c = ╱49╱I╱ // 0x1041 @0x1c
0x1025…1050 at001d = ╱4c╱L╱ // 0x1042 @0x1d
0x1025…1050 at001e = ╱36╱6╱ // 0x1043 @0x1e
0x1025…1050 at001f = ╱e3╱-╱ // 0x1044 @0x1f
0x1025…1050 at0020 = ╱45╱E╱ // 0x1045 @0x20
0x1025…1050 at0021 = ╱e4╱*╱ // 0x1046 @0x21
0x1025…1050 at0022 = ╱ed╱(╱ // 0x1047 @0x22
0x1025…1050 at0023 = ╱50╱P╱ // 0x1048 @0x23
0x1025…1050 at0024 = ╱49╱I╱ // 0x1049 @0x24
0x1025…1050 at0025 = ╱4c╱L╱ // 0x104a @0x25
0x1025…1050 at0026 = ╱36╱6╱ // 0x104b @0x26
0x1025…1050 at0027 = ╱de╱>╱ // 0x104c @0x27
0x1025…1050 at0028 = ╱45╱E╱ // 0x104d @0x28
0x1025…1050 at0029 = ╱ee╱)╱ // 0x104e @0x29
0x1025…1050 at002a = EOL // 0x104f @0x2a
0x1025…1050 }
0x1050…1064 9dbb 1900 PIL6=MANT4+PIL6
0x1050…1064 LineComalBin {
0x1050…1064 ptr = 0x9dbb // 0x1050 @0x0
0x1050…1064 lno = 0x076c // 0x1052 @0x2
0x1050…1064 at0004 = ╱50╱P╱ // 0x1054 @0x4
0x1050…1064 at0005 = ╱49╱I╱ // 0x1055 @0x5
0x1050…1064 at0006 = ╱4c╱L╱ // 0x1056 @0x6
0x1050…1064 at0007 = ╱36╱6╱ // 0x1057 @0x7
0x1050…1064 at0008 = ╱dc╱=╱ // 0x1058 @0x8
0x1050…1064 at0009 = ╱4d╱M╱ // 0x1059 @0x9
0x1050…1064 at000a = ╱41╱A╱ // 0x105a @0xa
0x1050…1064 at000b = ╱4e╱N╱ // 0x105b @0xb
0x1050…1064 at000c = ╱54╱T╱ // 0x105c @0xc
0x1050…1064 at000d = ╱34╱4╱ // 0x105d @0xd
0x1050…1064 at000e = ╱e2╱+╱ // 0x105e @0xe
0x1050…1064 at000f = ╱50╱P╱ // 0x105f @0xf
0x1050…1064 at0010 = ╱49╱I╱ // 0x1060 @0x10
0x1050…1064 at0011 = ╱4c╱L╱ // 0x1061 @0x11
0x1050…1064 at0012 = ╱36╱6╱ // 0x1062 @0x12
0x1050…1064 at0013 = EOL // 0x1063 @0x13
0x1050…1064 }
0x1064…10aa 9e01 1910 GET L8$,PIL6:Q(E,E),Q(E,G),Q(G,E),Q(G,G),Q(V,E),Q(V,G),Q(C,E),Q(C,G)
0x1064…10aa LineComalBin {
0x1064…10aa ptr = 0x9e01 // 0x1064 @0x0
0x1064…10aa lno = 0x0776 // 0x1066 @0x2
0x1064…10aa at0004 = ╱a9╱ GET ╱ // 0x1068 @0x4
0x1064…10aa at0005 = ╱4c╱L╱ // 0x1069 @0x5
0x1064…10aa at0006 = ╱38╱8╱ // 0x106a @0x6
0x1064…10aa at0007 = ╱ef╱$╱ // 0x106b @0x7
0x1064…10aa at0008 = ╱ec╱,╱ // 0x106c @0x8
0x1064…10aa at0009 = ╱50╱P╱ // 0x106d @0x9
0x1064…10aa at000a = ╱49╱I╱ // 0x106e @0xa
0x1064…10aa at000b = ╱4c╱L╱ // 0x106f @0xb
0x1064…10aa at000c = ╱36╱6╱ // 0x1070 @0xc
0x1064…10aa at000d = ╱f0╱:╱ // 0x1071 @0xd
0x1064…10aa at000e = ╱51╱Q╱ // 0x1072 @0xe
0x1064…10aa at000f = ╱ed╱(╱ // 0x1073 @0xf
0x1064…10aa at0010 = ╱45╱E╱ // 0x1074 @0x10
0x1064…10aa at0011 = ╱ec╱,╱ // 0x1075 @0x11
0x1064…10aa at0012 = ╱45╱E╱ // 0x1076 @0x12
0x1064…10aa at0013 = ╱ee╱)╱ // 0x1077 @0x13
0x1064…10aa at0014 = ╱ec╱,╱ // 0x1078 @0x14
0x1064…10aa at0015 = ╱51╱Q╱ // 0x1079 @0x15
0x1064…10aa at0016 = ╱ed╱(╱ // 0x107a @0x16
0x1064…10aa at0017 = ╱45╱E╱ // 0x107b @0x17
0x1064…10aa at0018 = ╱ec╱,╱ // 0x107c @0x18
0x1064…10aa at0019 = ╱47╱G╱ // 0x107d @0x19
0x1064…10aa at001a = ╱ee╱)╱ // 0x107e @0x1a
0x1064…10aa at001b = ╱ec╱,╱ // 0x107f @0x1b
0x1064…10aa at001c = ╱51╱Q╱ // 0x1080 @0x1c
0x1064…10aa at001d = ╱ed╱(╱ // 0x1081 @0x1d
0x1064…10aa at001e = ╱47╱G╱ // 0x1082 @0x1e
0x1064…10aa at001f = ╱ec╱,╱ // 0x1083 @0x1f
0x1064…10aa at0020 = ╱45╱E╱ // 0x1084 @0x20
0x1064…10aa at0021 = ╱ee╱)╱ // 0x1085 @0x21
0x1064…10aa at0022 = ╱ec╱,╱ // 0x1086 @0x22
0x1064…10aa at0023 = ╱51╱Q╱ // 0x1087 @0x23
0x1064…10aa at0024 = ╱ed╱(╱ // 0x1088 @0x24
0x1064…10aa at0025 = ╱47╱G╱ // 0x1089 @0x25
0x1064…10aa at0026 = ╱ec╱,╱ // 0x108a @0x26
0x1064…10aa at0027 = ╱47╱G╱ // 0x108b @0x27
0x1064…10aa at0028 = ╱ee╱)╱ // 0x108c @0x28
0x1064…10aa at0029 = ╱ec╱,╱ // 0x108d @0x29
0x1064…10aa at002a = ╱51╱Q╱ // 0x108e @0x2a
0x1064…10aa at002b = ╱ed╱(╱ // 0x108f @0x2b
0x1064…10aa at002c = ╱56╱V╱ // 0x1090 @0x2c
0x1064…10aa at002d = ╱ec╱,╱ // 0x1091 @0x2d
0x1064…10aa at002e = ╱45╱E╱ // 0x1092 @0x2e
0x1064…10aa at002f = ╱ee╱)╱ // 0x1093 @0x2f
0x1064…10aa at0030 = ╱ec╱,╱ // 0x1094 @0x30
0x1064…10aa at0031 = ╱51╱Q╱ // 0x1095 @0x31
0x1064…10aa at0032 = ╱ed╱(╱ // 0x1096 @0x32
0x1064…10aa at0033 = ╱56╱V╱ // 0x1097 @0x33
0x1064…10aa at0034 = ╱ec╱,╱ // 0x1098 @0x34
0x1064…10aa at0035 = ╱47╱G╱ // 0x1099 @0x35
0x1064…10aa at0036 = ╱ee╱)╱ // 0x109a @0x36
0x1064…10aa at0037 = ╱ec╱,╱ // 0x109b @0x37
0x1064…10aa at0038 = ╱51╱Q╱ // 0x109c @0x38
0x1064…10aa at0039 = ╱ed╱(╱ // 0x109d @0x39
0x1064…10aa at003a = ╱43╱C╱ // 0x109e @0x3a
0x1064…10aa at003b = ╱ec╱,╱ // 0x109f @0x3b
0x1064…10aa at003c = ╱45╱E╱ // 0x10a0 @0x3c
0x1064…10aa at003d = ╱ee╱)╱ // 0x10a1 @0x3d
0x1064…10aa at003e = ╱ec╱,╱ // 0x10a2 @0x3e
0x1064…10aa at003f = ╱51╱Q╱ // 0x10a3 @0x3f
0x1064…10aa at0040 = ╱ed╱(╱ // 0x10a4 @0x40
0x1064…10aa at0041 = ╱43╱C╱ // 0x10a5 @0x41
0x1064…10aa at0042 = ╱ec╱,╱ // 0x10a6 @0x42
0x1064…10aa at0043 = ╱47╱G╱ // 0x10a7 @0x43
0x1064…10aa at0044 = ╱ee╱)╱ // 0x10a8 @0x44
0x1064…10aa at0045 = EOL // 0x10a9 @0x45
0x1064…10aa }
0x10aa…10bd 9e14 1920 EXEC FEJL(E,E,L8$)
0x10aa…10bd LineComalBin {
0x10aa…10bd ptr = 0x9e14 // 0x10aa @0x0
0x10aa…10bd lno = 0x0780 // 0x10ac @0x2
0x10aa…10bd at0004 = ╱9d╱ EXEC ╱ // 0x10ae @0x4
0x10aa…10bd at0005 = ╱46╱F╱ // 0x10af @0x5
0x10aa…10bd at0006 = ╱45╱E╱ // 0x10b0 @0x6
0x10aa…10bd at0007 = ╱4a╱J╱ // 0x10b1 @0x7
0x10aa…10bd at0008 = ╱4c╱L╱ // 0x10b2 @0x8
0x10aa…10bd at0009 = ╱ed╱(╱ // 0x10b3 @0x9
0x10aa…10bd at000a = ╱45╱E╱ // 0x10b4 @0xa
0x10aa…10bd at000b = ╱ec╱,╱ // 0x10b5 @0xb
0x10aa…10bd at000c = ╱45╱E╱ // 0x10b6 @0xc
0x10aa…10bd at000d = ╱ec╱,╱ // 0x10b7 @0xd
0x10aa…10bd at000e = ╱4c╱L╱ // 0x10b8 @0xe
0x10aa…10bd at000f = ╱38╱8╱ // 0x10b9 @0xf
0x10aa…10bd at0010 = ╱ef╱$╱ // 0x10ba @0x10
0x10aa…10bd at0011 = ╱ee╱)╱ // 0x10bb @0x11
0x10aa…10bd at0012 = EOL // 0x10bc @0x12
0x10aa…10bd }
0x10bd…10cb 9e22 1930 FOR PIL6=E TO C
0x10bd…10cb LineComalBin {
0x10bd…10cb ptr = 0x9e22 // 0x10bd @0x0
0x10bd…10cb lno = 0x078a // 0x10bf @0x2
0x10bd…10cb at0004 = ╱83╱ FOR ╱ // 0x10c1 @0x4
0x10bd…10cb at0005 = ╱50╱P╱ // 0x10c2 @0x5
0x10bd…10cb at0006 = ╱49╱I╱ // 0x10c3 @0x6
0x10bd…10cb at0007 = ╱4c╱L╱ // 0x10c4 @0x7
0x10bd…10cb at0008 = ╱36╱6╱ // 0x10c5 @0x8
0x10bd…10cb at0009 = ╱dc╱=╱ // 0x10c6 @0x9
0x10bd…10cb at000a = ╱45╱E╱ // 0x10c7 @0xa
0x10bd…10cb at000b = ╱b7╱ TO ╱ // 0x10c8 @0xb
0x10bd…10cb at000c = ╱43╱C╱ // 0x10c9 @0xc
0x10bd…10cb at000d = EOL // 0x10ca @0xd
0x10bd…10cb }
0x10cb…10e2 9e39 1940 IF NØGL5=Q(PIL6,E) THEN EXIT
0x10cb…10e2 LineComalBin {
0x10cb…10e2 ptr = 0x9e39 // 0x10cb @0x0
0x10cb…10e2 lno = 0x0794 // 0x10cd @0x2
0x10cb…10e2 at0004 = ╱82╱ IF ╱ // 0x10cf @0x4
0x10cb…10e2 at0005 = ╱4e╱N╱ // 0x10d0 @0x5
0x10cb…10e2 at0006 = ╱5c╱Ø╱ // 0x10d1 @0x6
0x10cb…10e2 at0007 = ╱47╱G╱ // 0x10d2 @0x7
0x10cb…10e2 at0008 = ╱4c╱L╱ // 0x10d3 @0x8
0x10cb…10e2 at0009 = ╱35╱5╱ // 0x10d4 @0x9
0x10cb…10e2 at000a = ╱dc╱=╱ // 0x10d5 @0xa
0x10cb…10e2 at000b = ╱51╱Q╱ // 0x10d6 @0xb
0x10cb…10e2 at000c = ╱ed╱(╱ // 0x10d7 @0xc
0x10cb…10e2 at000d = ╱50╱P╱ // 0x10d8 @0xd
0x10cb…10e2 at000e = ╱49╱I╱ // 0x10d9 @0xe
0x10cb…10e2 at000f = ╱4c╱L╱ // 0x10da @0xf
0x10cb…10e2 at0010 = ╱36╱6╱ // 0x10db @0x10
0x10cb…10e2 at0011 = ╱ec╱,╱ // 0x10dc @0x11
0x10cb…10e2 at0012 = ╱45╱E╱ // 0x10dd @0x12
0x10cb…10e2 at0013 = ╱ee╱)╱ // 0x10de @0x13
0x10cb…10e2 at0014 = ╱b6╱ THEN ╱ // 0x10df @0x14
0x10cb…10e2 at0015 = ╱99╱ EXIT ╱ // 0x10e0 @0x15
0x10cb…10e2 at0016 = EOL // 0x10e1 @0x16
0x10cb…10e2 }
0x10e2…10ec 9e43 1950 NEXT PIL6
0x10e2…10ec LineComalBin {
0x10e2…10ec ptr = 0x9e43 // 0x10e2 @0x0
0x10e2…10ec lno = 0x079e // 0x10e4 @0x2
0x10e2…10ec at0004 = ╱84╱ NEXT ╱ // 0x10e6 @0x4
0x10e2…10ec at0005 = ╱50╱P╱ // 0x10e7 @0x5
0x10e2…10ec at0006 = ╱49╱I╱ // 0x10e8 @0x6
0x10e2…10ec at0007 = ╱4c╱L╱ // 0x10e9 @0x7
0x10e2…10ec at0008 = ╱36╱6╱ // 0x10ea @0x8
0x10e2…10ec at0009 = EOL // 0x10eb @0x9
0x10e2…10ec }
0x10ec…1104 9e5b 1960 IF PIL6<>5 THEN CEKS=B
0x10ec…1104 LineComalBin {
0x10ec…1104 ptr = 0x9e5b // 0x10ec @0x0
0x10ec…1104 lno = 0x07a8 // 0x10ee @0x2
0x10ec…1104 at0004 = ╱82╱ IF ╱ // 0x10f0 @0x4
0x10ec…1104 at0005 = ╱50╱P╱ // 0x10f1 @0x5
0x10ec…1104 at0006 = ╱49╱I╱ // 0x10f2 @0x6
0x10ec…1104 at0007 = ╱4c╱L╱ // 0x10f3 @0x7
0x10ec…1104 at0008 = ╱36╱6╱ // 0x10f4 @0x8
0x10ec…1104 at0009 = ╱e1╱<>╱ // 0x10f5 @0x9
0x10ec…1104 at000a = ╱35╱5╱ // 0x10f6 @0xa
0x10ec…1104 at000b = ╱fe0000a003╱ // 0x10f7 @0xb
0x10ec…1104 at0010 = ╱b6╱ THEN ╱ // 0x10fc @0x10
0x10ec…1104 at0011 = ╱43╱C╱ // 0x10fd @0x11
0x10ec…1104 at0012 = ╱45╱E╱ // 0x10fe @0x12
0x10ec…1104 at0013 = ╱4b╱K╱ // 0x10ff @0x13
0x10ec…1104 at0014 = ╱53╱S╱ // 0x1100 @0x14
0x10ec…1104 at0015 = ╱dc╱=╱ // 0x1101 @0x15
0x10ec…1104 at0016 = ╱42╱B╱ // 0x1102 @0x16
0x10ec…1104 at0017 = EOL // 0x1103 @0x17
0x10ec…1104 }
0x1104…110a 9e61 1970 ENDPROC
0x1104…110a LineComalBin {
0x1104…110a ptr = 0x9e61 // 0x1104 @0x0
0x1104…110a lno = 0x07b2 // 0x1106 @0x2
0x1104…110a at0004 = ╱9f╱ ENDPROC ╱ // 0x1108 @0x4
0x1104…110a at0005 = EOL // 0x1109 @0x5
0x1104…110a }
0x110a…1123 9e7a 1980 PROC INDTAB1(Z,MANT5,L7)
0x110a…1123 LineComalBin {
0x110a…1123 ptr = 0x9e7a // 0x110a @0x0
0x110a…1123 lno = 0x07bc // 0x110c @0x2
0x110a…1123 at0004 = ╱9e╱ PROC ╱ // 0x110e @0x4
0x110a…1123 at0005 = ╱49╱I╱ // 0x110f @0x5
0x110a…1123 at0006 = ╱4e╱N╱ // 0x1110 @0x6
0x110a…1123 at0007 = ╱44╱D╱ // 0x1111 @0x7
0x110a…1123 at0008 = ╱54╱T╱ // 0x1112 @0x8
0x110a…1123 at0009 = ╱41╱A╱ // 0x1113 @0x9
0x110a…1123 at000a = ╱42╱B╱ // 0x1114 @0xa
0x110a…1123 at000b = ╱31╱1╱ // 0x1115 @0xb
0x110a…1123 at000c = ╱ed╱(╱ // 0x1116 @0xc
0x110a…1123 at000d = ╱5a╱Z╱ // 0x1117 @0xd
0x110a…1123 at000e = ╱ec╱,╱ // 0x1118 @0xe
0x110a…1123 at000f = ╱4d╱M╱ // 0x1119 @0xf
0x110a…1123 at0010 = ╱41╱A╱ // 0x111a @0x10
0x110a…1123 at0011 = ╱4e╱N╱ // 0x111b @0x11
0x110a…1123 at0012 = ╱54╱T╱ // 0x111c @0x12
0x110a…1123 at0013 = ╱35╱5╱ // 0x111d @0x13
0x110a…1123 at0014 = ╱ec╱,╱ // 0x111e @0x14
0x110a…1123 at0015 = ╱4c╱L╱ // 0x111f @0x15
0x110a…1123 at0016 = ╱37╱7╱ // 0x1120 @0x16
0x110a…1123 at0017 = ╱ee╱)╱ // 0x1121 @0x17
0x110a…1123 at0018 = EOL // 0x1122 @0x18
0x110a…1123 }
0x1123…113a 9e91 1990 PIL1=MANT5 DIV 32
0x1123…113a LineComalBin {
0x1123…113a ptr = 0x9e91 // 0x1123 @0x0
0x1123…113a lno = 0x07c6 // 0x1125 @0x2
0x1123…113a at0004 = ╱50╱P╱ // 0x1127 @0x4
0x1123…113a at0005 = ╱49╱I╱ // 0x1128 @0x5
0x1123…113a at0006 = ╱4c╱L╱ // 0x1129 @0x6
0x1123…113a at0007 = ╱31╱1╱ // 0x112a @0x7
0x1123…113a at0008 = ╱dc╱=╱ // 0x112b @0x8
0x1123…113a at0009 = ╱4d╱M╱ // 0x112c @0x9
0x1123…113a at000a = ╱41╱A╱ // 0x112d @0xa
0x1123…113a at000b = ╱4e╱N╱ // 0x112e @0xb
0x1123…113a at000c = ╱54╱T╱ // 0x112f @0xc
0x1123…113a at000d = ╱35╱5╱ // 0x1130 @0xd
0x1123…113a at000e = ╱e7╱ DIV ╱ // 0x1131 @0xe
0x1123…113a at000f = ╱33╱3╱ // 0x1132 @0xf
0x1123…113a at0010 = ╱32╱2╱ // 0x1133 @0x10
0x1123…113a at0011 = ╱fe00008006╱ // 0x1134 @0x11
0x1123…113a at0016 = EOL // 0x1139 @0x16
0x1123…113a }
0x113a…1148 9e9f 2000 FOR I=E TO PIL1
0x113a…1148 LineComalBin {
0x113a…1148 ptr = 0x9e9f // 0x113a @0x0
0x113a…1148 lno = 0x07d0 // 0x113c @0x2
0x113a…1148 at0004 = ╱83╱ FOR ╱ // 0x113e @0x4
0x113a…1148 at0005 = ╱49╱I╱ // 0x113f @0x5
0x113a…1148 at0006 = ╱dc╱=╱ // 0x1140 @0x6
0x113a…1148 at0007 = ╱45╱E╱ // 0x1141 @0x7
0x113a…1148 at0008 = ╱b7╱ TO ╱ // 0x1142 @0x8
0x113a…1148 at0009 = ╱50╱P╱ // 0x1143 @0x9
0x113a…1148 at000a = ╱49╱I╱ // 0x1144 @0xa
0x113a…1148 at000b = ╱4c╱L╱ // 0x1145 @0xb
0x113a…1148 at000c = ╱31╱1╱ // 0x1146 @0xc
0x113a…1148 at000d = EOL // 0x1147 @0xd
0x113a…1148 }
0x1148…115d 9eb4 2010 H=(I-E)*8+E
0x1148…115d LineComalBin {
0x1148…115d ptr = 0x9eb4 // 0x1148 @0x0
0x1148…115d lno = 0x07da // 0x114a @0x2
0x1148…115d at0004 = ╱48╱H╱ // 0x114c @0x4
0x1148…115d at0005 = ╱dc╱=╱ // 0x114d @0x5
0x1148…115d at0006 = ╱ed╱(╱ // 0x114e @0x6
0x1148…115d at0007 = ╱49╱I╱ // 0x114f @0x7
0x1148…115d at0008 = ╱e3╱-╱ // 0x1150 @0x8
0x1148…115d at0009 = ╱45╱E╱ // 0x1151 @0x9
0x1148…115d at000a = ╱ee╱)╱ // 0x1152 @0xa
0x1148…115d at000b = ╱e4╱*╱ // 0x1153 @0xb
0x1148…115d at000c = ╱38╱8╱ // 0x1154 @0xc
0x1148…115d at000d = ╱fe00008004╱ // 0x1155 @0xd
0x1148…115d at0012 = ╱e2╱+╱ // 0x115a @0x12
0x1148…115d at0013 = ╱45╱E╱ // 0x115b @0x13
0x1148…115d at0014 = EOL // 0x115c @0x14
0x1148…115d }
0x115d…11ad 9f04 2020 GET L7$,I:Z(H),Z(H+E),Z(H+G),Z(H+V),Z(H+C),Z(H+5),Z(H+6),Z(H+7)
0x115d…11ad LineComalBin {
0x115d…11ad ptr = 0x9f04 // 0x115d @0x0
0x115d…11ad lno = 0x07e4 // 0x115f @0x2
0x115d…11ad at0004 = ╱a9╱ GET ╱ // 0x1161 @0x4
0x115d…11ad at0005 = ╱4c╱L╱ // 0x1162 @0x5
0x115d…11ad at0006 = ╱37╱7╱ // 0x1163 @0x6
0x115d…11ad at0007 = ╱ef╱$╱ // 0x1164 @0x7
0x115d…11ad at0008 = ╱ec╱,╱ // 0x1165 @0x8
0x115d…11ad at0009 = ╱49╱I╱ // 0x1166 @0x9
0x115d…11ad at000a = ╱f0╱:╱ // 0x1167 @0xa
0x115d…11ad at000b = ╱5a╱Z╱ // 0x1168 @0xb
0x115d…11ad at000c = ╱ed╱(╱ // 0x1169 @0xc
0x115d…11ad at000d = ╱48╱H╱ // 0x116a @0xd
0x115d…11ad at000e = ╱ee╱)╱ // 0x116b @0xe
0x115d…11ad at000f = ╱ec╱,╱ // 0x116c @0xf
0x115d…11ad at0010 = ╱5a╱Z╱ // 0x116d @0x10
0x115d…11ad at0011 = ╱ed╱(╱ // 0x116e @0x11
0x115d…11ad at0012 = ╱48╱H╱ // 0x116f @0x12
0x115d…11ad at0013 = ╱e2╱+╱ // 0x1170 @0x13
0x115d…11ad at0014 = ╱45╱E╱ // 0x1171 @0x14
0x115d…11ad at0015 = ╱ee╱)╱ // 0x1172 @0x15
0x115d…11ad at0016 = ╱ec╱,╱ // 0x1173 @0x16
0x115d…11ad at0017 = ╱5a╱Z╱ // 0x1174 @0x17
0x115d…11ad at0018 = ╱ed╱(╱ // 0x1175 @0x18
0x115d…11ad at0019 = ╱48╱H╱ // 0x1176 @0x19
0x115d…11ad at001a = ╱e2╱+╱ // 0x1177 @0x1a
0x115d…11ad at001b = ╱47╱G╱ // 0x1178 @0x1b
0x115d…11ad at001c = ╱ee╱)╱ // 0x1179 @0x1c
0x115d…11ad at001d = ╱ec╱,╱ // 0x117a @0x1d
0x115d…11ad at001e = ╱5a╱Z╱ // 0x117b @0x1e
0x115d…11ad at001f = ╱ed╱(╱ // 0x117c @0x1f
0x115d…11ad at0020 = ╱48╱H╱ // 0x117d @0x20
0x115d…11ad at0021 = ╱e2╱+╱ // 0x117e @0x21
0x115d…11ad at0022 = ╱56╱V╱ // 0x117f @0x22
0x115d…11ad at0023 = ╱ee╱)╱ // 0x1180 @0x23
0x115d…11ad at0024 = ╱ec╱,╱ // 0x1181 @0x24
0x115d…11ad at0025 = ╱5a╱Z╱ // 0x1182 @0x25
0x115d…11ad at0026 = ╱ed╱(╱ // 0x1183 @0x26
0x115d…11ad at0027 = ╱48╱H╱ // 0x1184 @0x27
0x115d…11ad at0028 = ╱e2╱+╱ // 0x1185 @0x28
0x115d…11ad at0029 = ╱43╱C╱ // 0x1186 @0x29
0x115d…11ad at002a = ╱ee╱)╱ // 0x1187 @0x2a
0x115d…11ad at002b = ╱ec╱,╱ // 0x1188 @0x2b
0x115d…11ad at002c = ╱5a╱Z╱ // 0x1189 @0x2c
0x115d…11ad at002d = ╱ed╱(╱ // 0x118a @0x2d
0x115d…11ad at002e = ╱48╱H╱ // 0x118b @0x2e
0x115d…11ad at002f = ╱e2╱+╱ // 0x118c @0x2f
0x115d…11ad at0030 = ╱35╱5╱ // 0x118d @0x30
0x115d…11ad at0031 = ╱fe0000a003╱ // 0x118e @0x31
0x115d…11ad at0036 = ╱ee╱)╱ // 0x1193 @0x36
0x115d…11ad at0037 = ╱ec╱,╱ // 0x1194 @0x37
0x115d…11ad at0038 = ╱5a╱Z╱ // 0x1195 @0x38
0x115d…11ad at0039 = ╱ed╱(╱ // 0x1196 @0x39
0x115d…11ad at003a = ╱48╱H╱ // 0x1197 @0x3a
0x115d…11ad at003b = ╱e2╱+╱ // 0x1198 @0x3b
0x115d…11ad at003c = ╱36╱6╱ // 0x1199 @0x3c
0x115d…11ad at003d = ╱fe0000c003╱ // 0x119a @0x3d
0x115d…11ad at0042 = ╱ee╱)╱ // 0x119f @0x42
0x115d…11ad at0043 = ╱ec╱,╱ // 0x11a0 @0x43
0x115d…11ad at0044 = ╱5a╱Z╱ // 0x11a1 @0x44
0x115d…11ad at0045 = ╱ed╱(╱ // 0x11a2 @0x45
0x115d…11ad at0046 = ╱48╱H╱ // 0x11a3 @0x46
0x115d…11ad at0047 = ╱e2╱+╱ // 0x11a4 @0x47
0x115d…11ad at0048 = ╱37╱7╱ // 0x11a5 @0x48
0x115d…11ad at0049 = ╱fe0000e003╱ // 0x11a6 @0x49
0x115d…11ad at004e = ╱ee╱)╱ // 0x11ab @0x4e
0x115d…11ad at004f = EOL // 0x11ac @0x4f
0x115d…11ad }
0x11ad…11c0 9f17 2030 EXEC FEJL(G,E,L7$)
0x11ad…11c0 LineComalBin {
0x11ad…11c0 ptr = 0x9f17 // 0x11ad @0x0
0x11ad…11c0 lno = 0x07ee // 0x11af @0x2
0x11ad…11c0 at0004 = ╱9d╱ EXEC ╱ // 0x11b1 @0x4
0x11ad…11c0 at0005 = ╱46╱F╱ // 0x11b2 @0x5
0x11ad…11c0 at0006 = ╱45╱E╱ // 0x11b3 @0x6
0x11ad…11c0 at0007 = ╱4a╱J╱ // 0x11b4 @0x7
0x11ad…11c0 at0008 = ╱4c╱L╱ // 0x11b5 @0x8
0x11ad…11c0 at0009 = ╱ed╱(╱ // 0x11b6 @0x9
0x11ad…11c0 at000a = ╱47╱G╱ // 0x11b7 @0xa
0x11ad…11c0 at000b = ╱ec╱,╱ // 0x11b8 @0xb
0x11ad…11c0 at000c = ╱45╱E╱ // 0x11b9 @0xc
0x11ad…11c0 at000d = ╱ec╱,╱ // 0x11ba @0xd
0x11ad…11c0 at000e = ╱4c╱L╱ // 0x11bb @0xe
0x11ad…11c0 at000f = ╱37╱7╱ // 0x11bc @0xf
0x11ad…11c0 at0010 = ╱ef╱$╱ // 0x11bd @0x10
0x11ad…11c0 at0011 = ╱ee╱)╱ // 0x11be @0x11
0x11ad…11c0 at0012 = EOL // 0x11bf @0x12
0x11ad…11c0 }
0x11c0…11c7 9f1e 2040 NEXT I
0x11c0…11c7 LineComalBin {
0x11c0…11c7 ptr = 0x9f1e // 0x11c0 @0x0
0x11c0…11c7 lno = 0x07f8 // 0x11c2 @0x2
0x11c0…11c7 at0004 = ╱84╱ NEXT ╱ // 0x11c4 @0x4
0x11c0…11c7 at0005 = ╱49╱I╱ // 0x11c5 @0x5
0x11c0…11c7 at0006 = EOL // 0x11c6 @0x6
0x11c0…11c7 }
0x11c7…11cd 9f24 2050 ENDPROC
0x11c7…11cd LineComalBin {
0x11c7…11cd ptr = 0x9f24 // 0x11c7 @0x0
0x11c7…11cd lno = 0x0802 // 0x11c9 @0x2
0x11c7…11cd at0004 = ╱9f╱ ENDPROC ╱ // 0x11cb @0x4
0x11c7…11cd at0005 = EOL // 0x11cc @0x5
0x11c7…11cd }
0x11cd…11e9 9f40 2060 PROC LUDSKRIV(KT1,DA4,KSNR)
0x11cd…11e9 LineComalBin {
0x11cd…11e9 ptr = 0x9f40 // 0x11cd @0x0
0x11cd…11e9 lno = 0x080c // 0x11cf @0x2
0x11cd…11e9 at0004 = ╱9e╱ PROC ╱ // 0x11d1 @0x4
0x11cd…11e9 at0005 = ╱4c╱L╱ // 0x11d2 @0x5
0x11cd…11e9 at0006 = ╱55╱U╱ // 0x11d3 @0x6
0x11cd…11e9 at0007 = ╱44╱D╱ // 0x11d4 @0x7
0x11cd…11e9 at0008 = ╱53╱S╱ // 0x11d5 @0x8
0x11cd…11e9 at0009 = ╱4b╱K╱ // 0x11d6 @0x9
0x11cd…11e9 at000a = ╱52╱R╱ // 0x11d7 @0xa
0x11cd…11e9 at000b = ╱49╱I╱ // 0x11d8 @0xb
0x11cd…11e9 at000c = ╱56╱V╱ // 0x11d9 @0xc
0x11cd…11e9 at000d = ╱ed╱(╱ // 0x11da @0xd
0x11cd…11e9 at000e = ╱4b╱K╱ // 0x11db @0xe
0x11cd…11e9 at000f = ╱54╱T╱ // 0x11dc @0xf
0x11cd…11e9 at0010 = ╱31╱1╱ // 0x11dd @0x10
0x11cd…11e9 at0011 = ╱ec╱,╱ // 0x11de @0x11
0x11cd…11e9 at0012 = ╱44╱D╱ // 0x11df @0x12
0x11cd…11e9 at0013 = ╱41╱A╱ // 0x11e0 @0x13
0x11cd…11e9 at0014 = ╱34╱4╱ // 0x11e1 @0x14
0x11cd…11e9 at0015 = ╱ec╱,╱ // 0x11e2 @0x15
0x11cd…11e9 at0016 = ╱4b╱K╱ // 0x11e3 @0x16
0x11cd…11e9 at0017 = ╱53╱S╱ // 0x11e4 @0x17
0x11cd…11e9 at0018 = ╱4e╱N╱ // 0x11e5 @0x18
0x11cd…11e9 at0019 = ╱52╱R╱ // 0x11e6 @0x19
0x11cd…11e9 at001a = ╱ee╱)╱ // 0x11e7 @0x1a
0x11cd…11e9 at001b = EOL // 0x11e8 @0x1b
0x11cd…11e9 }
0x11e9…11ff 9f56 2070 EXEC DATOUD(DA4,DA5$)
0x11e9…11ff LineComalBin {
0x11e9…11ff ptr = 0x9f56 // 0x11e9 @0x0
0x11e9…11ff lno = 0x0816 // 0x11eb @0x2
0x11e9…11ff at0004 = ╱9d╱ EXEC ╱ // 0x11ed @0x4
0x11e9…11ff at0005 = ╱44╱D╱ // 0x11ee @0x5
0x11e9…11ff at0006 = ╱41╱A╱ // 0x11ef @0x6
0x11e9…11ff at0007 = ╱54╱T╱ // 0x11f0 @0x7
0x11e9…11ff at0008 = ╱4f╱O╱ // 0x11f1 @0x8
0x11e9…11ff at0009 = ╱55╱U╱ // 0x11f2 @0x9
0x11e9…11ff at000a = ╱44╱D╱ // 0x11f3 @0xa
0x11e9…11ff at000b = ╱ed╱(╱ // 0x11f4 @0xb
0x11e9…11ff at000c = ╱44╱D╱ // 0x11f5 @0xc
0x11e9…11ff at000d = ╱41╱A╱ // 0x11f6 @0xd
0x11e9…11ff at000e = ╱34╱4╱ // 0x11f7 @0xe
0x11e9…11ff at000f = ╱ec╱,╱ // 0x11f8 @0xf
0x11e9…11ff at0010 = ╱44╱D╱ // 0x11f9 @0x10
0x11e9…11ff at0011 = ╱41╱A╱ // 0x11fa @0x11
0x11e9…11ff at0012 = ╱35╱5╱ // 0x11fb @0x12
0x11e9…11ff at0013 = ╱ef╱$╱ // 0x11fc @0x13
0x11e9…11ff at0014 = ╱ee╱)╱ // 0x11fd @0x14
0x11e9…11ff at0015 = EOL // 0x11fe @0x15
0x11e9…11ff }
0x11ff…120f 9f66 2080 KSNR=KSNR+E
0x11ff…120f LineComalBin {
0x11ff…120f ptr = 0x9f66 // 0x11ff @0x0
0x11ff…120f lno = 0x0820 // 0x1201 @0x2
0x11ff…120f at0004 = ╱4b╱K╱ // 0x1203 @0x4
0x11ff…120f at0005 = ╱53╱S╱ // 0x1204 @0x5
0x11ff…120f at0006 = ╱4e╱N╱ // 0x1205 @0x6
0x11ff…120f at0007 = ╱52╱R╱ // 0x1206 @0x7
0x11ff…120f at0008 = ╱dc╱=╱ // 0x1207 @0x8
0x11ff…120f at0009 = ╱4b╱K╱ // 0x1208 @0x9
0x11ff…120f at000a = ╱53╱S╱ // 0x1209 @0xa
0x11ff…120f at000b = ╱4e╱N╱ // 0x120a @0xb
0x11ff…120f at000c = ╱52╱R╱ // 0x120b @0xc
0x11ff…120f at000d = ╱e2╱+╱ // 0x120c @0xd
0x11ff…120f at000e = ╱45╱E╱ // 0x120d @0xe
0x11ff…120f at000f = EOL // 0x120e @0xf
0x11ff…120f }
0x120f…123f 9f96 2090 PRINT TAB(48);KT1;TAB(56);DA5$;TAB(69);
0x120f…123f LineComalBin {
0x120f…123f ptr = 0x9f96 // 0x120f @0x0
0x120f…123f lno = 0x082a // 0x1211 @0x2
0x120f…123f at0004 = ╱92╱ PRINT ╱ // 0x1213 @0x4
0x120f…123f at0005 = ╱d2╱TAB╱ // 0x1214 @0x5
0x120f…123f at0006 = ╱ed╱(╱ // 0x1215 @0x6
0x120f…123f at0007 = ╱34╱4╱ // 0x1216 @0x7
0x120f…123f at0008 = ╱38╱8╱ // 0x1217 @0x8
0x120f…123f at0009 = ╱fe0000c006╱ // 0x1218 @0x9
0x120f…123f at000e = ╱ee╱)╱ // 0x121d @0xe
0x120f…123f at000f = ╱eb╱;╱ // 0x121e @0xf
0x120f…123f at0010 = ╱4b╱K╱ // 0x121f @0x10
0x120f…123f at0011 = ╱54╱T╱ // 0x1220 @0x11
0x120f…123f at0012 = ╱31╱1╱ // 0x1221 @0x12
0x120f…123f at0013 = ╱eb╱;╱ // 0x1222 @0x13
0x120f…123f at0014 = ╱d2╱TAB╱ // 0x1223 @0x14
0x120f…123f at0015 = ╱ed╱(╱ // 0x1224 @0x15
0x120f…123f at0016 = ╱35╱5╱ // 0x1225 @0x16
0x120f…123f at0017 = ╱36╱6╱ // 0x1226 @0x17
0x120f…123f at0018 = ╱fe0000e006╱ // 0x1227 @0x18
0x120f…123f at001d = ╱ee╱)╱ // 0x122c @0x1d
0x120f…123f at001e = ╱eb╱;╱ // 0x122d @0x1e
0x120f…123f at001f = ╱44╱D╱ // 0x122e @0x1f
0x120f…123f at0020 = ╱41╱A╱ // 0x122f @0x20
0x120f…123f at0021 = ╱35╱5╱ // 0x1230 @0x21
0x120f…123f at0022 = ╱ef╱$╱ // 0x1231 @0x22
0x120f…123f at0023 = ╱eb╱;╱ // 0x1232 @0x23
0x120f…123f at0024 = ╱d2╱TAB╱ // 0x1233 @0x24
0x120f…123f at0025 = ╱ed╱(╱ // 0x1234 @0x25
0x120f…123f at0026 = ╱36╱6╱ // 0x1235 @0x26
0x120f…123f at0027 = ╱39╱9╱ // 0x1236 @0x27
0x120f…123f at0028 = ╱fe00008a07╱ // 0x1237 @0x28
0x120f…123f at002d = ╱ee╱)╱ // 0x123c @0x2d
0x120f…123f at002e = ╱eb╱;╱ // 0x123d @0x2e
0x120f…123f at002f = EOL // 0x123e @0x2f
0x120f…123f }
0x123f…124f 9fa6 2100 PRINT USING "##":KSNR
0x123f…124f LineComalBin {
0x123f…124f ptr = 0x9fa6 // 0x123f @0x0
0x123f…124f lno = 0x0834 // 0x1241 @0x2
0x123f…124f at0004 = ╱92╱ PRINT ╱ // 0x1243 @0x4
0x123f…124f at0005 = ╱b9╱ USING ╱ // 0x1244 @0x5
0x123f…124f at0006 = ╱22╱"╱ // 0x1245 @0x6
0x123f…124f at0007 = ╱23╱#╱ // 0x1246 @0x7
0x123f…124f at0008 = ╱23╱#╱ // 0x1247 @0x8
0x123f…124f at0009 = ╱22╱"╱ // 0x1248 @0x9
0x123f…124f at000a = ╱f0╱:╱ // 0x1249 @0xa
0x123f…124f at000b = ╱4b╱K╱ // 0x124a @0xb
0x123f…124f at000c = ╱53╱S╱ // 0x124b @0xc
0x123f…124f at000d = ╱4e╱N╱ // 0x124c @0xd
0x123f…124f at000e = ╱52╱R╱ // 0x124d @0xe
0x123f…124f at000f = EOL // 0x124e @0xf
0x123f…124f }
0x124f…1255 9fac 2110 ENDPROC
0x124f…1255 LineComalBin {
0x124f…1255 ptr = 0x9fac // 0x124f @0x0
0x124f…1255 lno = 0x083e // 0x1251 @0x2
0x124f…1255 at0004 = ╱9f╱ ENDPROC ╱ // 0x1253 @0x4
0x124f…1255 at0005 = EOL // 0x1254 @0x5
0x124f…1255 }
0x1255…1284 9fdb 2120 PROC BUDSKRIV(MKØB,MK,SU2,DS1,DS2,DS3,DS4,LNR)
0x1255…1284 LineComalBin {
0x1255…1284 ptr = 0x9fdb // 0x1255 @0x0
0x1255…1284 lno = 0x0848 // 0x1257 @0x2
0x1255…1284 at0004 = ╱9e╱ PROC ╱ // 0x1259 @0x4
0x1255…1284 at0005 = ╱42╱B╱ // 0x125a @0x5
0x1255…1284 at0006 = ╱55╱U╱ // 0x125b @0x6
0x1255…1284 at0007 = ╱44╱D╱ // 0x125c @0x7
0x1255…1284 at0008 = ╱53╱S╱ // 0x125d @0x8
0x1255…1284 at0009 = ╱4b╱K╱ // 0x125e @0x9
0x1255…1284 at000a = ╱52╱R╱ // 0x125f @0xa
0x1255…1284 at000b = ╱49╱I╱ // 0x1260 @0xb
0x1255…1284 at000c = ╱56╱V╱ // 0x1261 @0xc
0x1255…1284 at000d = ╱ed╱(╱ // 0x1262 @0xd
0x1255…1284 at000e = ╱4d╱M╱ // 0x1263 @0xe
0x1255…1284 at000f = ╱4b╱K╱ // 0x1264 @0xf
0x1255…1284 at0010 = ╱5c╱Ø╱ // 0x1265 @0x10
0x1255…1284 at0011 = ╱42╱B╱ // 0x1266 @0x11
0x1255…1284 at0012 = ╱ec╱,╱ // 0x1267 @0x12
0x1255…1284 at0013 = ╱4d╱M╱ // 0x1268 @0x13
0x1255…1284 at0014 = ╱4b╱K╱ // 0x1269 @0x14
0x1255…1284 at0015 = ╱ec╱,╱ // 0x126a @0x15
0x1255…1284 at0016 = ╱53╱S╱ // 0x126b @0x16
0x1255…1284 at0017 = ╱55╱U╱ // 0x126c @0x17
0x1255…1284 at0018 = ╱32╱2╱ // 0x126d @0x18
0x1255…1284 at0019 = ╱ec╱,╱ // 0x126e @0x19
0x1255…1284 at001a = ╱44╱D╱ // 0x126f @0x1a
0x1255…1284 at001b = ╱53╱S╱ // 0x1270 @0x1b
0x1255…1284 at001c = ╱31╱1╱ // 0x1271 @0x1c
0x1255…1284 at001d = ╱ec╱,╱ // 0x1272 @0x1d
0x1255…1284 at001e = ╱44╱D╱ // 0x1273 @0x1e
0x1255…1284 at001f = ╱53╱S╱ // 0x1274 @0x1f
0x1255…1284 at0020 = ╱32╱2╱ // 0x1275 @0x20
0x1255…1284 at0021 = ╱ec╱,╱ // 0x1276 @0x21
0x1255…1284 at0022 = ╱44╱D╱ // 0x1277 @0x22
0x1255…1284 at0023 = ╱53╱S╱ // 0x1278 @0x23
0x1255…1284 at0024 = ╱33╱3╱ // 0x1279 @0x24
0x1255…1284 at0025 = ╱ec╱,╱ // 0x127a @0x25
0x1255…1284 at0026 = ╱44╱D╱ // 0x127b @0x26
0x1255…1284 at0027 = ╱53╱S╱ // 0x127c @0x27
0x1255…1284 at0028 = ╱34╱4╱ // 0x127d @0x28
0x1255…1284 at0029 = ╱ec╱,╱ // 0x127e @0x29
0x1255…1284 at002a = ╱4c╱L╱ // 0x127f @0x2a
0x1255…1284 at002b = ╱4e╱N╱ // 0x1280 @0x2b
0x1255…1284 at002c = ╱52╱R╱ // 0x1281 @0x2c
0x1255…1284 at002d = ╱ee╱)╱ // 0x1282 @0x2d
0x1255…1284 at002e = EOL // 0x1283 @0x2e
0x1255…1284 }
0x1284…12b7 a00e 2130 IF MK<>G THEN EXEC LINIER(LNR,24-3*(SKRIV1),LNR)
0x1284…12b7 LineComalBin {
0x1284…12b7 ptr = 0xa00e // 0x1284 @0x0
0x1284…12b7 lno = 0x0852 // 0x1286 @0x2
0x1284…12b7 at0004 = ╱82╱ IF ╱ // 0x1288 @0x4
0x1284…12b7 at0005 = ╱4d╱M╱ // 0x1289 @0x5
0x1284…12b7 at0006 = ╱4b╱K╱ // 0x128a @0x6
0x1284…12b7 at0007 = ╱e1╱<>╱ // 0x128b @0x7
0x1284…12b7 at0008 = ╱47╱G╱ // 0x128c @0x8
0x1284…12b7 at0009 = ╱b6╱ THEN ╱ // 0x128d @0x9
0x1284…12b7 at000a = ╱9d╱ EXEC ╱ // 0x128e @0xa
0x1284…12b7 at000b = ╱4c╱L╱ // 0x128f @0xb
0x1284…12b7 at000c = ╱49╱I╱ // 0x1290 @0xc
0x1284…12b7 at000d = ╱4e╱N╱ // 0x1291 @0xd
0x1284…12b7 at000e = ╱49╱I╱ // 0x1292 @0xe
0x1284…12b7 at000f = ╱45╱E╱ // 0x1293 @0xf
0x1284…12b7 at0010 = ╱52╱R╱ // 0x1294 @0x10
0x1284…12b7 at0011 = ╱ed╱(╱ // 0x1295 @0x11
0x1284…12b7 at0012 = ╱4c╱L╱ // 0x1296 @0x12
0x1284…12b7 at0013 = ╱4e╱N╱ // 0x1297 @0x13
0x1284…12b7 at0014 = ╱52╱R╱ // 0x1298 @0x14
0x1284…12b7 at0015 = ╱ec╱,╱ // 0x1299 @0x15
0x1284…12b7 at0016 = ╱32╱2╱ // 0x129a @0x16
0x1284…12b7 at0017 = ╱34╱4╱ // 0x129b @0x17
0x1284…12b7 at0018 = ╱fe0000c005╱ // 0x129c @0x18
0x1284…12b7 at001d = ╱e3╱-╱ // 0x12a1 @0x1d
0x1284…12b7 at001e = ╱33╱3╱ // 0x12a2 @0x1e
0x1284…12b7 at001f = ╱fe0000c002╱ // 0x12a3 @0x1f
0x1284…12b7 at0024 = ╱e4╱*╱ // 0x12a8 @0x24
0x1284…12b7 at0025 = ╱ed╱(╱ // 0x12a9 @0x25
0x1284…12b7 at0026 = ╱53╱S╱ // 0x12aa @0x26
0x1284…12b7 at0027 = ╱4b╱K╱ // 0x12ab @0x27
0x1284…12b7 at0028 = ╱52╱R╱ // 0x12ac @0x28
0x1284…12b7 at0029 = ╱49╱I╱ // 0x12ad @0x29
0x1284…12b7 at002a = ╱56╱V╱ // 0x12ae @0x2a
0x1284…12b7 at002b = ╱31╱1╱ // 0x12af @0x2b
0x1284…12b7 at002c = ╱ee╱)╱ // 0x12b0 @0x2c
0x1284…12b7 at002d = ╱ec╱,╱ // 0x12b1 @0x2d
0x1284…12b7 at002e = ╱4c╱L╱ // 0x12b2 @0x2e
0x1284…12b7 at002f = ╱4e╱N╱ // 0x12b3 @0x2f
0x1284…12b7 at0030 = ╱52╱R╱ // 0x12b4 @0x30
0x1284…12b7 at0031 = ╱ee╱)╱ // 0x12b5 @0x31
0x1284…12b7 at0032 = EOL // 0x12b6 @0x32
0x1284…12b7 }
0x12b7…12e8 a03f 2140 IF SKRIV1=B OR KTAL1<>DTAL OR (SKRIV1=E AND (MK=E OR MK=G)) THEN
0x12b7…12e8 LineComalBin {
0x12b7…12e8 ptr = 0xa03f // 0x12b7 @0x0
0x12b7…12e8 lno = 0x085c // 0x12b9 @0x2
0x12b7…12e8 at0004 = ╱9c╱ IF ╱ // 0x12bb @0x4
0x12b7…12e8 at0005 = ╱53╱S╱ // 0x12bc @0x5
0x12b7…12e8 at0006 = ╱4b╱K╱ // 0x12bd @0x6
0x12b7…12e8 at0007 = ╱52╱R╱ // 0x12be @0x7
0x12b7…12e8 at0008 = ╱49╱I╱ // 0x12bf @0x8
0x12b7…12e8 at0009 = ╱56╱V╱ // 0x12c0 @0x9
0x12b7…12e8 at000a = ╱31╱1╱ // 0x12c1 @0xa
0x12b7…12e8 at000b = ╱dc╱=╱ // 0x12c2 @0xb
0x12b7…12e8 at000c = ╱42╱B╱ // 0x12c3 @0xc
0x12b7…12e8 at000d = ╱db╱ OR ╱ // 0x12c4 @0xd
0x12b7…12e8 at000e = ╱4b╱K╱ // 0x12c5 @0xe
0x12b7…12e8 at000f = ╱54╱T╱ // 0x12c6 @0xf
0x12b7…12e8 at0010 = ╱41╱A╱ // 0x12c7 @0x10
0x12b7…12e8 at0011 = ╱4c╱L╱ // 0x12c8 @0x11
0x12b7…12e8 at0012 = ╱31╱1╱ // 0x12c9 @0x12
0x12b7…12e8 at0013 = ╱e1╱<>╱ // 0x12ca @0x13
0x12b7…12e8 at0014 = ╱44╱D╱ // 0x12cb @0x14
0x12b7…12e8 at0015 = ╱54╱T╱ // 0x12cc @0x15
0x12b7…12e8 at0016 = ╱41╱A╱ // 0x12cd @0x16
0x12b7…12e8 at0017 = ╱4c╱L╱ // 0x12ce @0x17
0x12b7…12e8 at0018 = ╱db╱ OR ╱ // 0x12cf @0x18
0x12b7…12e8 at0019 = ╱ed╱(╱ // 0x12d0 @0x19
0x12b7…12e8 at001a = ╱53╱S╱ // 0x12d1 @0x1a
0x12b7…12e8 at001b = ╱4b╱K╱ // 0x12d2 @0x1b
0x12b7…12e8 at001c = ╱52╱R╱ // 0x12d3 @0x1c
0x12b7…12e8 at001d = ╱49╱I╱ // 0x12d4 @0x1d
0x12b7…12e8 at001e = ╱56╱V╱ // 0x12d5 @0x1e
0x12b7…12e8 at001f = ╱31╱1╱ // 0x12d6 @0x1f
0x12b7…12e8 at0020 = ╱dc╱=╱ // 0x12d7 @0x20
0x12b7…12e8 at0021 = ╱45╱E╱ // 0x12d8 @0x21
0x12b7…12e8 at0022 = ╱da╱ AND ╱ // 0x12d9 @0x22
0x12b7…12e8 at0023 = ╱ed╱(╱ // 0x12da @0x23
0x12b7…12e8 at0024 = ╱4d╱M╱ // 0x12db @0x24
0x12b7…12e8 at0025 = ╱4b╱K╱ // 0x12dc @0x25
0x12b7…12e8 at0026 = ╱dc╱=╱ // 0x12dd @0x26
0x12b7…12e8 at0027 = ╱45╱E╱ // 0x12de @0x27
0x12b7…12e8 at0028 = ╱db╱ OR ╱ // 0x12df @0x28
0x12b7…12e8 at0029 = ╱4d╱M╱ // 0x12e0 @0x29
0x12b7…12e8 at002a = ╱4b╱K╱ // 0x12e1 @0x2a
0x12b7…12e8 at002b = ╱dc╱=╱ // 0x12e2 @0x2b
0x12b7…12e8 at002c = ╱47╱G╱ // 0x12e3 @0x2c
0x12b7…12e8 at002d = ╱ee╱)╱ // 0x12e4 @0x2d
0x12b7…12e8 at002e = ╱ee╱)╱ // 0x12e5 @0x2e
0x12b7…12e8 at002f = ╱b6╱ THEN ╱ // 0x12e6 @0x2f
0x12b7…12e8 at0030 = EOL // 0x12e7 @0x30
0x12b7…12e8 }
0x12e8…1303 a05a 2150 IF MK<>G AND SKRIV1=B THEN PRINT STREG$
0x12e8…1303 LineComalBin {
0x12e8…1303 ptr = 0xa05a // 0x12e8 @0x0
0x12e8…1303 lno = 0x0866 // 0x12ea @0x2
0x12e8…1303 at0004 = ╱82╱ IF ╱ // 0x12ec @0x4
0x12e8…1303 at0005 = ╱4d╱M╱ // 0x12ed @0x5
0x12e8…1303 at0006 = ╱4b╱K╱ // 0x12ee @0x6
0x12e8…1303 at0007 = ╱e1╱<>╱ // 0x12ef @0x7
0x12e8…1303 at0008 = ╱47╱G╱ // 0x12f0 @0x8
0x12e8…1303 at0009 = ╱da╱ AND ╱ // 0x12f1 @0x9
0x12e8…1303 at000a = ╱53╱S╱ // 0x12f2 @0xa
0x12e8…1303 at000b = ╱4b╱K╱ // 0x12f3 @0xb
0x12e8…1303 at000c = ╱52╱R╱ // 0x12f4 @0xc
0x12e8…1303 at000d = ╱49╱I╱ // 0x12f5 @0xd
0x12e8…1303 at000e = ╱56╱V╱ // 0x12f6 @0xe
0x12e8…1303 at000f = ╱31╱1╱ // 0x12f7 @0xf
0x12e8…1303 at0010 = ╱dc╱=╱ // 0x12f8 @0x10
0x12e8…1303 at0011 = ╱42╱B╱ // 0x12f9 @0x11
0x12e8…1303 at0012 = ╱b6╱ THEN ╱ // 0x12fa @0x12
0x12e8…1303 at0013 = ╱92╱ PRINT ╱ // 0x12fb @0x13
0x12e8…1303 at0014 = ╱53╱S╱ // 0x12fc @0x14
0x12e8…1303 at0015 = ╱54╱T╱ // 0x12fd @0x15
0x12e8…1303 at0016 = ╱52╱R╱ // 0x12fe @0x16
0x12e8…1303 at0017 = ╱45╱E╱ // 0x12ff @0x17
0x12e8…1303 at0018 = ╱47╱G╱ // 0x1300 @0x18
0x12e8…1303 at0019 = ╱ef╱$╱ // 0x1301 @0x19
0x12e8…1303 at001a = EOL // 0x1302 @0x1a
0x12e8…1303 }
0x1303…130d a064 2160 CASE MK OF
0x1303…130d LineComalBin {
0x1303…130d ptr = 0xa064 // 0x1303 @0x0
0x1303…130d lno = 0x0870 // 0x1305 @0x2
0x1303…130d at0004 = ╱a201╱ CASE ╱ // 0x1307 @0x4
0x1303…130d at0006 = ╱4d╱M╱ // 0x1309 @0x6
0x1303…130d at0007 = ╱4b╱K╱ // 0x130a @0x7
0x1303…130d at0008 = ╱ba╱ OF ╱ // 0x130b @0x8
0x1303…130d at0009 = EOL // 0x130c @0x9
0x1303…130d }
0x130d…1313 a06a 2170 STOP
0x130d…1313 LineComalBin {
0x130d…1313 ptr = 0xa06a // 0x130d @0x0
0x130d…1313 lno = 0x087a // 0x130f @0x2
0x130d…1313 at0004 = ╱8d╱ STOP ╱ // 0x1311 @0x4
0x130d…1313 at0005 = EOL // 0x1312 @0x5
0x130d…1313 }
0x1313…131d a074 2180 WHEN E,G
0x1313…131d LineComalBin {
0x1313…131d ptr = 0xa074 // 0x1313 @0x0
0x1313…131d lno = 0x0884 // 0x1315 @0x2
0x1313…131d at0004 = ╱a301╱ WHEN ╱ // 0x1317 @0x4
0x1313…131d at0006 = ╱45╱E╱ // 0x1319 @0x6
0x1313…131d at0007 = ╱ec╱,╱ // 0x131a @0x7
0x1313…131d at0008 = ╱47╱G╱ // 0x131b @0x8
0x1313…131d at0009 = EOL // 0x131c @0x9
0x1313…131d }
0x131d…133a a091 2190 PRINT TAB(32);"Transport";
0x131d…133a LineComalBin {
0x131d…133a ptr = 0xa091 // 0x131d @0x0
0x131d…133a lno = 0x088e // 0x131f @0x2
0x131d…133a at0004 = ╱92╱ PRINT ╱ // 0x1321 @0x4
0x131d…133a at0005 = ╱d2╱TAB╱ // 0x1322 @0x5
0x131d…133a at0006 = ╱ed╱(╱ // 0x1323 @0x6
0x131d…133a at0007 = ╱33╱3╱ // 0x1324 @0x7
0x131d…133a at0008 = ╱32╱2╱ // 0x1325 @0x8
0x131d…133a at0009 = ╱fe00008006╱ // 0x1326 @0x9
0x131d…133a at000e = ╱ee╱)╱ // 0x132b @0xe
0x131d…133a at000f = ╱eb╱;╱ // 0x132c @0xf
0x131d…133a at0010 = ╱22╱"╱ // 0x132d @0x10
0x131d…133a at0011 = ╱54╱T╱ // 0x132e @0x11
0x131d…133a at0012 = ╱72╱r╱ // 0x132f @0x12
0x131d…133a at0013 = ╱61╱a╱ // 0x1330 @0x13
0x131d…133a at0014 = ╱6e╱n╱ // 0x1331 @0x14
0x131d…133a at0015 = ╱73╱s╱ // 0x1332 @0x15
0x131d…133a at0016 = ╱70╱p╱ // 0x1333 @0x16
0x131d…133a at0017 = ╱6f╱o╱ // 0x1334 @0x17
0x131d…133a at0018 = ╱72╱r╱ // 0x1335 @0x18
0x131d…133a at0019 = ╱74╱t╱ // 0x1336 @0x19
0x131d…133a at001a = ╱22╱"╱ // 0x1337 @0x1a
0x131d…133a at001b = ╱eb╱;╱ // 0x1338 @0x1b
0x131d…133a at001c = EOL // 0x1339 @0x1c
0x131d…133a }
0x133a…1344 a09b 2200 WHEN V,C
0x133a…1344 LineComalBin {
0x133a…1344 ptr = 0xa09b // 0x133a @0x0
0x133a…1344 lno = 0x0898 // 0x133c @0x2
0x133a…1344 at0004 = ╱a301╱ WHEN ╱ // 0x133e @0x4
0x133a…1344 at0006 = ╱56╱V╱ // 0x1340 @0x6
0x133a…1344 at0007 = ╱ec╱,╱ // 0x1341 @0x7
0x133a…1344 at0008 = ╱43╱C╱ // 0x1342 @0x8
0x133a…1344 at0009 = EOL // 0x1343 @0x9
0x133a…1344 }
0x1344…136f a0c6 2210 PRINT TAB(57);CHR(M);"Ny saldo";CHR(15)
0x1344…136f LineComalBin {
0x1344…136f ptr = 0xa0c6 // 0x1344 @0x0
0x1344…136f lno = 0x08a2 // 0x1346 @0x2
0x1344…136f at0004 = ╱92╱ PRINT ╱ // 0x1348 @0x4
0x1344…136f at0005 = ╱d2╱TAB╱ // 0x1349 @0x5
0x1344…136f at0006 = ╱ed╱(╱ // 0x134a @0x6
0x1344…136f at0007 = ╱35╱5╱ // 0x134b @0x7
0x1344…136f at0008 = ╱37╱7╱ // 0x134c @0x8
0x1344…136f at0009 = ╱fe0000e406╱ // 0x134d @0x9
0x1344…136f at000e = ╱ee╱)╱ // 0x1352 @0xe
0x1344…136f at000f = ╱eb╱;╱ // 0x1353 @0xf
0x1344…136f at0010 = ╱cf╱CHR╱ // 0x1354 @0x10
0x1344…136f at0011 = ╱ed╱(╱ // 0x1355 @0x11
0x1344…136f at0012 = ╱4d╱M╱ // 0x1356 @0x12
0x1344…136f at0013 = ╱ee╱)╱ // 0x1357 @0x13
0x1344…136f at0014 = ╱eb╱;╱ // 0x1358 @0x14
0x1344…136f at0015 = ╱22╱"╱ // 0x1359 @0x15
0x1344…136f at0016 = ╱4e╱N╱ // 0x135a @0x16
0x1344…136f at0017 = ╱79╱y╱ // 0x135b @0x17
0x1344…136f at0018 = ╱20╱…╱ // 0x135c @0x18
0x1344…136f at0019 = ╱73╱s╱ // 0x135d @0x19
0x1344…136f at001a = ╱61╱a╱ // 0x135e @0x1a
0x1344…136f at001b = ╱6c╱l╱ // 0x135f @0x1b
0x1344…136f at001c = ╱64╱d╱ // 0x1360 @0x1c
0x1344…136f at001d = ╱6f╱o╱ // 0x1361 @0x1d
0x1344…136f at001e = ╱22╱"╱ // 0x1362 @0x1e
0x1344…136f at001f = ╱eb╱;╱ // 0x1363 @0x1f
0x1344…136f at0020 = ╱cf╱CHR╱ // 0x1364 @0x20
0x1344…136f at0021 = ╱ed╱(╱ // 0x1365 @0x21
0x1344…136f at0022 = ╱31╱1╱ // 0x1366 @0x22
0x1344…136f at0023 = ╱35╱5╱ // 0x1367 @0x23
0x1344…136f at0024 = ╱fe0000f004╱ // 0x1368 @0x24
0x1344…136f at0029 = ╱ee╱)╱ // 0x136d @0x29
0x1344…136f at002a = EOL // 0x136e @0x2a
0x1344…136f }
0x136f…137b a0d2 2220 PRINT STREG$
0x136f…137b LineComalBin {
0x136f…137b ptr = 0xa0d2 // 0x136f @0x0
0x136f…137b lno = 0x08ac // 0x1371 @0x2
0x136f…137b at0004 = ╱92╱ PRINT ╱ // 0x1373 @0x4
0x136f…137b at0005 = ╱53╱S╱ // 0x1374 @0x5
0x136f…137b at0006 = ╱54╱T╱ // 0x1375 @0x6
0x136f…137b at0007 = ╱52╱R╱ // 0x1376 @0x7
0x136f…137b at0008 = ╱45╱E╱ // 0x1377 @0x8
0x136f…137b at0009 = ╱47╱G╱ // 0x1378 @0x9
0x136f…137b at000a = ╱ef╱$╱ // 0x1379 @0xa
0x136f…137b at000b = EOL // 0x137a @0xb
0x136f…137b }
0x137b…1383 a0da 2230 WHEN B
0x137b…1383 LineComalBin {
0x137b…1383 ptr = 0xa0da // 0x137b @0x0
0x137b…1383 lno = 0x08b6 // 0x137d @0x2
0x137b…1383 at0004 = ╱a301╱ WHEN ╱ // 0x137f @0x4
0x137b…1383 at0006 = ╱42╱B╱ // 0x1381 @0x6
0x137b…1383 at0007 = EOL // 0x1382 @0x7
0x137b…1383 }
0x1383…13c8 a11f 2240 PRINT TAB(11),CHR(M);"Månedens køb";TAB(36);"Ny saldo";CHR(15)
0x1383…13c8 LineComalBin {
0x1383…13c8 ptr = 0xa11f // 0x1383 @0x0
0x1383…13c8 lno = 0x08c0 // 0x1385 @0x2
0x1383…13c8 at0004 = ╱92╱ PRINT ╱ // 0x1387 @0x4
0x1383…13c8 at0005 = ╱d2╱TAB╱ // 0x1388 @0x5
0x1383…13c8 at0006 = ╱ed╱(╱ // 0x1389 @0x6
0x1383…13c8 at0007 = ╱31╱1╱ // 0x138a @0x7
0x1383…13c8 at0008 = ╱31╱1╱ // 0x138b @0x8
0x1383…13c8 at0009 = ╱fe0000b004╱ // 0x138c @0x9
0x1383…13c8 at000e = ╱ee╱)╱ // 0x1391 @0xe
0x1383…13c8 at000f = ╱ec╱,╱ // 0x1392 @0xf
0x1383…13c8 at0010 = ╱cf╱CHR╱ // 0x1393 @0x10
0x1383…13c8 at0011 = ╱ed╱(╱ // 0x1394 @0x11
0x1383…13c8 at0012 = ╱4d╱M╱ // 0x1395 @0x12
0x1383…13c8 at0013 = ╱ee╱)╱ // 0x1396 @0x13
0x1383…13c8 at0014 = ╱eb╱;╱ // 0x1397 @0x14
0x1383…13c8 at0015 = ╱22╱"╱ // 0x1398 @0x15
0x1383…13c8 at0016 = ╱4d╱M╱ // 0x1399 @0x16
0x1383…13c8 at0017 = ╱7d╱å╱ // 0x139a @0x17
0x1383…13c8 at0018 = ╱6e╱n╱ // 0x139b @0x18
0x1383…13c8 at0019 = ╱65╱e╱ // 0x139c @0x19
0x1383…13c8 at001a = ╱64╱d╱ // 0x139d @0x1a
0x1383…13c8 at001b = ╱65╱e╱ // 0x139e @0x1b
0x1383…13c8 at001c = ╱6e╱n╱ // 0x139f @0x1c
0x1383…13c8 at001d = ╱73╱s╱ // 0x13a0 @0x1d
0x1383…13c8 at001e = ╱20╱…╱ // 0x13a1 @0x1e
0x1383…13c8 at001f = ╱6b╱k╱ // 0x13a2 @0x1f
0x1383…13c8 at0020 = ╱7c╱ø╱ // 0x13a3 @0x20
0x1383…13c8 at0021 = ╱62╱b╱ // 0x13a4 @0x21
0x1383…13c8 at0022 = ╱22╱"╱ // 0x13a5 @0x22
0x1383…13c8 at0023 = ╱eb╱;╱ // 0x13a6 @0x23
0x1383…13c8 at0024 = ╱d2╱TAB╱ // 0x13a7 @0x24
0x1383…13c8 at0025 = ╱ed╱(╱ // 0x13a8 @0x25
0x1383…13c8 at0026 = ╱33╱3╱ // 0x13a9 @0x26
0x1383…13c8 at0027 = ╱36╱6╱ // 0x13aa @0x27
0x1383…13c8 at0028 = ╱fe00009006╱ // 0x13ab @0x28
0x1383…13c8 at002d = ╱ee╱)╱ // 0x13b0 @0x2d
0x1383…13c8 at002e = ╱eb╱;╱ // 0x13b1 @0x2e
0x1383…13c8 at002f = ╱22╱"╱ // 0x13b2 @0x2f
0x1383…13c8 at0030 = ╱4e╱N╱ // 0x13b3 @0x30
0x1383…13c8 at0031 = ╱79╱y╱ // 0x13b4 @0x31
0x1383…13c8 at0032 = ╱20╱…╱ // 0x13b5 @0x32
0x1383…13c8 at0033 = ╱73╱s╱ // 0x13b6 @0x33
0x1383…13c8 at0034 = ╱61╱a╱ // 0x13b7 @0x34
0x1383…13c8 at0035 = ╱6c╱l╱ // 0x13b8 @0x35
0x1383…13c8 at0036 = ╱64╱d╱ // 0x13b9 @0x36
0x1383…13c8 at0037 = ╱6f╱o╱ // 0x13ba @0x37
0x1383…13c8 at0038 = ╱22╱"╱ // 0x13bb @0x38
0x1383…13c8 at0039 = ╱eb╱;╱ // 0x13bc @0x39
0x1383…13c8 at003a = ╱cf╱CHR╱ // 0x13bd @0x3a
0x1383…13c8 at003b = ╱ed╱(╱ // 0x13be @0x3b
0x1383…13c8 at003c = ╱31╱1╱ // 0x13bf @0x3c
0x1383…13c8 at003d = ╱35╱5╱ // 0x13c0 @0x3d
0x1383…13c8 at003e = ╱fe0000f004╱ // 0x13c1 @0x3e
0x1383…13c8 at0043 = ╱ee╱)╱ // 0x13c6 @0x43
0x1383…13c8 at0044 = EOL // 0x13c7 @0x44
0x1383…13c8 }
0x13c8…13d4 a12b 2250 PRINT STREG$
0x13c8…13d4 LineComalBin {
0x13c8…13d4 ptr = 0xa12b // 0x13c8 @0x0
0x13c8…13d4 lno = 0x08ca // 0x13ca @0x2
0x13c8…13d4 at0004 = ╱92╱ PRINT ╱ // 0x13cc @0x4
0x13c8…13d4 at0005 = ╱53╱S╱ // 0x13cd @0x5
0x13c8…13d4 at0006 = ╱54╱T╱ // 0x13ce @0x6
0x13c8…13d4 at0007 = ╱52╱R╱ // 0x13cf @0x7
0x13c8…13d4 at0008 = ╱45╱E╱ // 0x13d0 @0x8
0x13c8…13d4 at0009 = ╱47╱G╱ // 0x13d1 @0x9
0x13c8…13d4 at000a = ╱ef╱$╱ // 0x13d2 @0xa
0x13c8…13d4 at000b = EOL // 0x13d3 @0xb
0x13c8…13d4 }
0x13d4…13da a131 2260 ENDCASE
0x13d4…13da LineComalBin {
0x13d4…13da ptr = 0xa131 // 0x13d4 @0x0
0x13d4…13da lno = 0x08d4 // 0x13d6 @0x2
0x13d4…13da at0004 = ╱a4╱ ENDCASE ╱ // 0x13d8 @0x4
0x13d4…13da at0005 = EOL // 0x13d9 @0x5
0x13d4…13da }
0x13da…13e0 (66,) a137 2270 ENDIF
0x13da…13e0 LineComalBin {
0x13da…13e0 ptr = 0xa137 // 0x13da @0x0
0x13da…13e0 lno = 0x08de // 0x13dc @0x2
0x13da…13e0 at0004 = ╱9b╱ ENDIF ╱ // 0x13de @0x4
0x13da…13e0 at0005 = EOL // 0x13df @0x5
0x13da…13e0 }
0x13e0…13eb a142 2280 IF MK=B THEN
0x13e0…13eb LineComalBin {
0x13e0…13eb ptr = 0xa142 // 0x13e0 @0x0
0x13e0…13eb lno = 0x08e8 // 0x13e2 @0x2
0x13e0…13eb at0004 = ╱9c╱ IF ╱ // 0x13e4 @0x4
0x13e0…13eb at0005 = ╱4d╱M╱ // 0x13e5 @0x5
0x13e0…13eb at0006 = ╱4b╱K╱ // 0x13e6 @0x6
0x13e0…13eb at0007 = ╱dc╱=╱ // 0x13e7 @0x7
0x13e0…13eb at0008 = ╱42╱B╱ // 0x13e8 @0x8
0x13e0…13eb at0009 = ╱b6╱ THEN ╱ // 0x13e9 @0x9
0x13e0…13eb at000a = EOL // 0x13ea @0xa
0x13e0…13eb }
0x13eb…1407 a15e 2290 EXEC TUD(MKØB$,UBELØB$,E,B)
0x13eb…1407 LineComalBin {
0x13eb…1407 ptr = 0xa15e // 0x13eb @0x0
0x13eb…1407 lno = 0x08f2 // 0x13ed @0x2
0x13eb…1407 at0004 = ╱9d╱ EXEC ╱ // 0x13ef @0x4
0x13eb…1407 at0005 = ╱54╱T╱ // 0x13f0 @0x5
0x13eb…1407 at0006 = ╱55╱U╱ // 0x13f1 @0x6
0x13eb…1407 at0007 = ╱44╱D╱ // 0x13f2 @0x7
0x13eb…1407 at0008 = ╱ed╱(╱ // 0x13f3 @0x8
0x13eb…1407 at0009 = ╱4d╱M╱ // 0x13f4 @0x9
0x13eb…1407 at000a = ╱4b╱K╱ // 0x13f5 @0xa
0x13eb…1407 at000b = ╱5c╱Ø╱ // 0x13f6 @0xb
0x13eb…1407 at000c = ╱42╱B╱ // 0x13f7 @0xc
0x13eb…1407 at000d = ╱ef╱$╱ // 0x13f8 @0xd
0x13eb…1407 at000e = ╱ec╱,╱ // 0x13f9 @0xe
0x13eb…1407 at000f = ╱55╱U╱ // 0x13fa @0xf
0x13eb…1407 at0010 = ╱42╱B╱ // 0x13fb @0x10
0x13eb…1407 at0011 = ╱45╱E╱ // 0x13fc @0x11
0x13eb…1407 at0012 = ╱4c╱L╱ // 0x13fd @0x12
0x13eb…1407 at0013 = ╱5c╱Ø╱ // 0x13fe @0x13
0x13eb…1407 at0014 = ╱42╱B╱ // 0x13ff @0x14
0x13eb…1407 at0015 = ╱ef╱$╱ // 0x1400 @0x15
0x13eb…1407 at0016 = ╱ec╱,╱ // 0x1401 @0x16
0x13eb…1407 at0017 = ╱45╱E╱ // 0x1402 @0x17
0x13eb…1407 at0018 = ╱ec╱,╱ // 0x1403 @0x18
0x13eb…1407 at0019 = ╱42╱B╱ // 0x1404 @0x19
0x13eb…1407 at001a = ╱ee╱)╱ // 0x1405 @0x1a
0x13eb…1407 at001b = EOL // 0x1406 @0x1b
0x13eb…1407 }
0x1407…1420 a177 2300 PRINT TAB(11);UBELØB$;
0x1407…1420 LineComalBin {
0x1407…1420 ptr = 0xa177 // 0x1407 @0x0
0x1407…1420 lno = 0x08fc // 0x1409 @0x2
0x1407…1420 at0004 = ╱92╱ PRINT ╱ // 0x140b @0x4
0x1407…1420 at0005 = ╱d2╱TAB╱ // 0x140c @0x5
0x1407…1420 at0006 = ╱ed╱(╱ // 0x140d @0x6
0x1407…1420 at0007 = ╱31╱1╱ // 0x140e @0x7
0x1407…1420 at0008 = ╱31╱1╱ // 0x140f @0x8
0x1407…1420 at0009 = ╱fe0000b004╱ // 0x1410 @0x9
0x1407…1420 at000e = ╱ee╱)╱ // 0x1415 @0xe
0x1407…1420 at000f = ╱eb╱;╱ // 0x1416 @0xf
0x1407…1420 at0010 = ╱55╱U╱ // 0x1417 @0x10
0x1407…1420 at0011 = ╱42╱B╱ // 0x1418 @0x11
0x1407…1420 at0012 = ╱45╱E╱ // 0x1419 @0x12
0x1407…1420 at0013 = ╱4c╱L╱ // 0x141a @0x13
0x1407…1420 at0014 = ╱5c╱Ø╱ // 0x141b @0x14
0x1407…1420 at0015 = ╱42╱B╱ // 0x141c @0x15
0x1407…1420 at0016 = ╱ef╱$╱ // 0x141d @0x16
0x1407…1420 at0017 = ╱eb╱;╱ // 0x141e @0x17
0x1407…1420 at0018 = EOL // 0x141f @0x18
0x1407…1420 }
0x1420…1426 a17d 2310 ENDIF
0x1420…1426 LineComalBin {
0x1420…1426 ptr = 0xa17d // 0x1420 @0x0
0x1420…1426 lno = 0x0906 // 0x1422 @0x2
0x1420…1426 at0004 = ╱9b╱ ENDIF ╱ // 0x1424 @0x4
0x1420…1426 at0005 = EOL // 0x1425 @0x5
0x1420…1426 }
0x1426…1441 a198 2320 EXEC TUD(SU2$,UBELØB$,B,B)
0x1426…1441 LineComalBin {
0x1426…1441 ptr = 0xa198 // 0x1426 @0x0
0x1426…1441 lno = 0x0910 // 0x1428 @0x2
0x1426…1441 at0004 = ╱9d╱ EXEC ╱ // 0x142a @0x4
0x1426…1441 at0005 = ╱54╱T╱ // 0x142b @0x5
0x1426…1441 at0006 = ╱55╱U╱ // 0x142c @0x6
0x1426…1441 at0007 = ╱44╱D╱ // 0x142d @0x7
0x1426…1441 at0008 = ╱ed╱(╱ // 0x142e @0x8
0x1426…1441 at0009 = ╱53╱S╱ // 0x142f @0x9
0x1426…1441 at000a = ╱55╱U╱ // 0x1430 @0xa
0x1426…1441 at000b = ╱32╱2╱ // 0x1431 @0xb
0x1426…1441 at000c = ╱ef╱$╱ // 0x1432 @0xc
0x1426…1441 at000d = ╱ec╱,╱ // 0x1433 @0xd
0x1426…1441 at000e = ╱55╱U╱ // 0x1434 @0xe
0x1426…1441 at000f = ╱42╱B╱ // 0x1435 @0xf
0x1426…1441 at0010 = ╱45╱E╱ // 0x1436 @0x10
0x1426…1441 at0011 = ╱4c╱L╱ // 0x1437 @0x11
0x1426…1441 at0012 = ╱5c╱Ø╱ // 0x1438 @0x12
0x1426…1441 at0013 = ╱42╱B╱ // 0x1439 @0x13
0x1426…1441 at0014 = ╱ef╱$╱ // 0x143a @0x14
0x1426…1441 at0015 = ╱ec╱,╱ // 0x143b @0x15
0x1426…1441 at0016 = ╱42╱B╱ // 0x143c @0x16
0x1426…1441 at0017 = ╱ec╱,╱ // 0x143d @0x17
0x1426…1441 at0018 = ╱42╱B╱ // 0x143e @0x18
0x1426…1441 at0019 = ╱ee╱)╱ // 0x143f @0x19
0x1426…1441 at001a = EOL // 0x1440 @0x1a
0x1426…1441 }
0x1441…148d a1e4 2340 PRINT TAB(51-G*(SKRIV1)+(15-C*(SKRIV1))*(SU2$(LEN(SU2$))="-"));UBELØB$
0x1441…148d LineComalBin {
0x1441…148d ptr = 0xa1e4 // 0x1441 @0x0
0x1441…148d lno = 0x0924 // 0x1443 @0x2
0x1441…148d at0004 = ╱92╱ PRINT ╱ // 0x1445 @0x4
0x1441…148d at0005 = ╱d2╱TAB╱ // 0x1446 @0x5
0x1441…148d at0006 = ╱ed╱(╱ // 0x1447 @0x6
0x1441…148d at0007 = ╱35╱5╱ // 0x1448 @0x7
0x1441…148d at0008 = ╱31╱1╱ // 0x1449 @0x8
0x1441…148d at0009 = ╱fe0000cc06╱ // 0x144a @0x9
0x1441…148d at000e = ╱e3╱-╱ // 0x144f @0xe
0x1441…148d at000f = ╱47╱G╱ // 0x1450 @0xf
0x1441…148d at0010 = ╱e4╱*╱ // 0x1451 @0x10
0x1441…148d at0011 = ╱ed╱(╱ // 0x1452 @0x11
0x1441…148d at0012 = ╱53╱S╱ // 0x1453 @0x12
0x1441…148d at0013 = ╱4b╱K╱ // 0x1454 @0x13
0x1441…148d at0014 = ╱52╱R╱ // 0x1455 @0x14
0x1441…148d at0015 = ╱49╱I╱ // 0x1456 @0x15
0x1441…148d at0016 = ╱56╱V╱ // 0x1457 @0x16
0x1441…148d at0017 = ╱31╱1╱ // 0x1458 @0x17
0x1441…148d at0018 = ╱ee╱)╱ // 0x1459 @0x18
0x1441…148d at0019 = ╱e2╱+╱ // 0x145a @0x19
0x1441…148d at001a = ╱ed╱(╱ // 0x145b @0x1a
0x1441…148d at001b = ╱31╱1╱ // 0x145c @0x1b
0x1441…148d at001c = ╱35╱5╱ // 0x145d @0x1c
0x1441…148d at001d = ╱fe0000f004╱ // 0x145e @0x1d
0x1441…148d at0022 = ╱e3╱-╱ // 0x1463 @0x22
0x1441…148d at0023 = ╱43╱C╱ // 0x1464 @0x23
0x1441…148d at0024 = ╱e4╱*╱ // 0x1465 @0x24
0x1441…148d at0025 = ╱ed╱(╱ // 0x1466 @0x25
0x1441…148d at0026 = ╱53╱S╱ // 0x1467 @0x26
0x1441…148d at0027 = ╱4b╱K╱ // 0x1468 @0x27
0x1441…148d at0028 = ╱52╱R╱ // 0x1469 @0x28
0x1441…148d at0029 = ╱49╱I╱ // 0x146a @0x29
0x1441…148d at002a = ╱56╱V╱ // 0x146b @0x2a
0x1441…148d at002b = ╱31╱1╱ // 0x146c @0x2b
0x1441…148d at002c = ╱ee╱)╱ // 0x146d @0x2c
0x1441…148d at002d = ╱ee╱)╱ // 0x146e @0x2d
0x1441…148d at002e = ╱e4╱*╱ // 0x146f @0x2e
0x1441…148d at002f = ╱ed╱(╱ // 0x1470 @0x2f
0x1441…148d at0030 = ╱53╱S╱ // 0x1471 @0x30
0x1441…148d at0031 = ╱55╱U╱ // 0x1472 @0x31
0x1441…148d at0032 = ╱32╱2╱ // 0x1473 @0x32
0x1441…148d at0033 = ╱ef╱$╱ // 0x1474 @0x33
0x1441…148d at0034 = ╱ed╱(╱ // 0x1475 @0x34
0x1441…148d at0035 = ╱cc╱LEN╱ // 0x1476 @0x35
0x1441…148d at0036 = ╱ed╱(╱ // 0x1477 @0x36
0x1441…148d at0037 = ╱53╱S╱ // 0x1478 @0x37
0x1441…148d at0038 = ╱55╱U╱ // 0x1479 @0x38
0x1441…148d at0039 = ╱32╱2╱ // 0x147a @0x39
0x1441…148d at003a = ╱ef╱$╱ // 0x147b @0x3a
0x1441…148d at003b = ╱ee╱)╱ // 0x147c @0x3b
0x1441…148d at003c = ╱ee╱)╱ // 0x147d @0x3c
0x1441…148d at003d = ╱dc╱=╱ // 0x147e @0x3d
0x1441…148d at003e = ╱22╱"╱ // 0x147f @0x3e
0x1441…148d at003f = ╱2d╱-╱ // 0x1480 @0x3f
0x1441…148d at0040 = ╱22╱"╱ // 0x1481 @0x40
0x1441…148d at0041 = ╱ee╱)╱ // 0x1482 @0x41
0x1441…148d at0042 = ╱ee╱)╱ // 0x1483 @0x42
0x1441…148d at0043 = ╱eb╱;╱ // 0x1484 @0x43
0x1441…148d at0044 = ╱55╱U╱ // 0x1485 @0x44
0x1441…148d at0045 = ╱42╱B╱ // 0x1486 @0x45
0x1441…148d at0046 = ╱45╱E╱ // 0x1487 @0x46
0x1441…148d at0047 = ╱4c╱L╱ // 0x1488 @0x47
0x1441…148d at0048 = ╱5c╱Ø╱ // 0x1489 @0x48
0x1441…148d at0049 = ╱42╱B╱ // 0x148a @0x49
0x1441…148d at004a = ╱ef╱$╱ // 0x148b @0x4a
0x1441…148d at004b = EOL // 0x148c @0x4b
0x1441…148d }
0x148d…149c a1f3 2350 IF SKRIV1=B THEN
0x148d…149c LineComalBin {
0x148d…149c ptr = 0xa1f3 // 0x148d @0x0
0x148d…149c lno = 0x092e // 0x148f @0x2
0x148d…149c at0004 = ╱9c╱ IF ╱ // 0x1491 @0x4
0x148d…149c at0005 = ╱53╱S╱ // 0x1492 @0x5
0x148d…149c at0006 = ╱4b╱K╱ // 0x1493 @0x6
0x148d…149c at0007 = ╱52╱R╱ // 0x1494 @0x7
0x148d…149c at0008 = ╱49╱I╱ // 0x1495 @0x8
0x148d…149c at0009 = ╱56╱V╱ // 0x1496 @0x9
0x148d…149c at000a = ╱31╱1╱ // 0x1497 @0xa
0x148d…149c at000b = ╱dc╱=╱ // 0x1498 @0xb
0x148d…149c at000c = ╱42╱B╱ // 0x1499 @0xc
0x148d…149c at000d = ╱b6╱ THEN ╱ // 0x149a @0xd
0x148d…149c at000e = EOL // 0x149b @0xe
0x148d…149c }
0x149c…14ae a205 2360 IF MK<>G THEN PRINT STREG$
0x149c…14ae LineComalBin {
0x149c…14ae ptr = 0xa205 // 0x149c @0x0
0x149c…14ae lno = 0x0938 // 0x149e @0x2
0x149c…14ae at0004 = ╱82╱ IF ╱ // 0x14a0 @0x4
0x149c…14ae at0005 = ╱4d╱M╱ // 0x14a1 @0x5
0x149c…14ae at0006 = ╱4b╱K╱ // 0x14a2 @0x6
0x149c…14ae at0007 = ╱e1╱<>╱ // 0x14a3 @0x7
0x149c…14ae at0008 = ╱47╱G╱ // 0x14a4 @0x8
0x149c…14ae at0009 = ╱b6╱ THEN ╱ // 0x14a5 @0x9
0x149c…14ae at000a = ╱92╱ PRINT ╱ // 0x14a6 @0xa
0x149c…14ae at000b = ╱53╱S╱ // 0x14a7 @0xb
0x149c…14ae at000c = ╱54╱T╱ // 0x14a8 @0xc
0x149c…14ae at000d = ╱52╱R╱ // 0x14a9 @0xd
0x149c…14ae at000e = ╱45╱E╱ // 0x14aa @0xe
0x149c…14ae at000f = ╱47╱G╱ // 0x14ab @0xf
0x149c…14ae at0010 = ╱ef╱$╱ // 0x14ac @0x10
0x149c…14ae at0011 = EOL // 0x14ad @0x11
0x149c…14ae }
0x14ae…14b4 a20b 2370 ELSE
0x14ae…14b4 LineComalBin {
0x14ae…14b4 ptr = 0xa20b // 0x14ae @0x0
0x14ae…14b4 lno = 0x0942 // 0x14b0 @0x2
0x14ae…14b4 at0004 = ╱9a╱ ELSE ╱ // 0x14b2 @0x4
0x14ae…14b4 at0005 = EOL // 0x14b3 @0x5
0x14ae…14b4 }
0x14b4…14bf a216 2380 IF MK<>G THEN
0x14b4…14bf LineComalBin {
0x14b4…14bf ptr = 0xa216 // 0x14b4 @0x0
0x14b4…14bf lno = 0x094c // 0x14b6 @0x2
0x14b4…14bf at0004 = ╱9c╱ IF ╱ // 0x14b8 @0x4
0x14b4…14bf at0005 = ╱4d╱M╱ // 0x14b9 @0x5
0x14b4…14bf at0006 = ╱4b╱K╱ // 0x14ba @0x6
0x14b4…14bf at0007 = ╱e1╱<>╱ // 0x14bb @0x7
0x14b4…14bf at0008 = ╱47╱G╱ // 0x14bc @0x8
0x14b4…14bf at0009 = ╱b6╱ THEN ╱ // 0x14bd @0x9
0x14b4…14bf at000a = EOL // 0x14be @0xa
0x14b4…14bf }
0x14bf…14c8 a21f 2381 PRINT " "
0x14bf…14c8 LineComalBin {
0x14bf…14c8 ptr = 0xa21f // 0x14bf @0x0
0x14bf…14c8 lno = 0x094d // 0x14c1 @0x2
0x14bf…14c8 at0004 = ╱92╱ PRINT ╱ // 0x14c3 @0x4
0x14bf…14c8 at0005 = ╱22╱"╱ // 0x14c4 @0x5
0x14bf…14c8 at0006 = ╱20╱…╱ // 0x14c5 @0x6
0x14bf…14c8 at0007 = ╱22╱"╱ // 0x14c6 @0x7
0x14bf…14c8 at0008 = EOL // 0x14c7 @0x8
0x14bf…14c8 }
0x14c8…14d1 a228 2382 PRINT " "
0x14c8…14d1 LineComalBin {
0x14c8…14d1 ptr = 0xa228 // 0x14c8 @0x0
0x14c8…14d1 lno = 0x094e // 0x14ca @0x2
0x14c8…14d1 at0004 = ╱92╱ PRINT ╱ // 0x14cc @0x4
0x14c8…14d1 at0005 = ╱22╱"╱ // 0x14cd @0x5
0x14c8…14d1 at0006 = ╱20╱…╱ // 0x14ce @0x6
0x14c8…14d1 at0007 = ╱22╱"╱ // 0x14cf @0x7
0x14c8…14d1 at0008 = EOL // 0x14d0 @0x8
0x14c8…14d1 }
0x14d1…14d7 a22e 2383 ENDIF
0x14d1…14d7 LineComalBin {
0x14d1…14d7 ptr = 0xa22e // 0x14d1 @0x0
0x14d1…14d7 lno = 0x094f // 0x14d3 @0x2
0x14d1…14d7 at0004 = ╱9b╱ ENDIF ╱ // 0x14d5 @0x4
0x14d1…14d7 at0005 = EOL // 0x14d6 @0x5
0x14d1…14d7 }
0x14d7…14dd a234 2390 ENDIF
0x14d7…14dd LineComalBin {
0x14d7…14dd ptr = 0xa234 // 0x14d7 @0x0
0x14d7…14dd lno = 0x0956 // 0x14d9 @0x2
0x14d7…14dd at0004 = ╱9b╱ ENDIF ╱ // 0x14db @0x4
0x14d7…14dd at0005 = EOL // 0x14dc @0x5
0x14d7…14dd }
0x14dd…14ed a244 2400 IF MK<E OR MK>G THEN
0x14dd…14ed LineComalBin {
0x14dd…14ed ptr = 0xa244 // 0x14dd @0x0
0x14dd…14ed lno = 0x0960 // 0x14df @0x2
0x14dd…14ed at0004 = ╱9c╱ IF ╱ // 0x14e1 @0x4
0x14dd…14ed at0005 = ╱4d╱M╱ // 0x14e2 @0x5
0x14dd…14ed at0006 = ╱4b╱K╱ // 0x14e3 @0x6
0x14dd…14ed at0007 = ╱dd╱<╱ // 0x14e4 @0x7
0x14dd…14ed at0008 = ╱45╱E╱ // 0x14e5 @0x8
0x14dd…14ed at0009 = ╱db╱ OR ╱ // 0x14e6 @0x9
0x14dd…14ed at000a = ╱4d╱M╱ // 0x14e7 @0xa
0x14dd…14ed at000b = ╱4b╱K╱ // 0x14e8 @0xb
0x14dd…14ed at000c = ╱de╱>╱ // 0x14e9 @0xc
0x14dd…14ed at000d = ╱47╱G╱ // 0x14ea @0xd
0x14dd…14ed at000e = ╱b6╱ THEN ╱ // 0x14eb @0xe
0x14dd…14ed at000f = EOL // 0x14ec @0xf
0x14dd…14ed }
0x14ed…14fc a253 2410 IF SKRIV1=B THEN
0x14ed…14fc LineComalBin {
0x14ed…14fc ptr = 0xa253 // 0x14ed @0x0
0x14ed…14fc lno = 0x096a // 0x14ef @0x2
0x14ed…14fc at0004 = ╱9c╱ IF ╱ // 0x14f1 @0x4
0x14ed…14fc at0005 = ╱53╱S╱ // 0x14f2 @0x5
0x14ed…14fc at0006 = ╱4b╱K╱ // 0x14f3 @0x6
0x14ed…14fc at0007 = ╱52╱R╱ // 0x14f4 @0x7
0x14ed…14fc at0008 = ╱49╱I╱ // 0x14f5 @0x8
0x14ed…14fc at0009 = ╱56╱V╱ // 0x14f6 @0x9
0x14ed…14fc at000a = ╱31╱1╱ // 0x14f7 @0xa
0x14ed…14fc at000b = ╱dc╱=╱ // 0x14f8 @0xb
0x14ed…14fc at000c = ╱42╱B╱ // 0x14f9 @0xc
0x14ed…14fc at000d = ╱b6╱ THEN ╱ // 0x14fa @0xd
0x14ed…14fc at000e = EOL // 0x14fb @0xe
0x14ed…14fc }
0x14fc…1506 a25d 2420 CASE MK OF
0x14fc…1506 LineComalBin {
0x14fc…1506 ptr = 0xa25d // 0x14fc @0x0
0x14fc…1506 lno = 0x0974 // 0x14fe @0x2
0x14fc…1506 at0004 = ╱a201╱ CASE ╱ // 0x1500 @0x4
0x14fc…1506 at0006 = ╱4d╱M╱ // 0x1502 @0x6
0x14fc…1506 at0007 = ╱4b╱K╱ // 0x1503 @0x7
0x14fc…1506 at0008 = ╱ba╱ OF ╱ // 0x1504 @0x8
0x14fc…1506 at0009 = EOL // 0x1505 @0x9
0x14fc…1506 }
0x1506…154e a2a5 2430 PRINT TAB(15);CHR(M);"Månedens bev.";TAB(34);"Årets bev.";CHR(15)
0x1506…154e LineComalBin {
0x1506…154e ptr = 0xa2a5 // 0x1506 @0x0
0x1506…154e lno = 0x097e // 0x1508 @0x2
0x1506…154e at0004 = ╱92╱ PRINT ╱ // 0x150a @0x4
0x1506…154e at0005 = ╱d2╱TAB╱ // 0x150b @0x5
0x1506…154e at0006 = ╱ed╱(╱ // 0x150c @0x6
0x1506…154e at0007 = ╱31╱1╱ // 0x150d @0x7
0x1506…154e at0008 = ╱35╱5╱ // 0x150e @0x8
0x1506…154e at0009 = ╱fe0000f004╱ // 0x150f @0x9
0x1506…154e at000e = ╱ee╱)╱ // 0x1514 @0xe
0x1506…154e at000f = ╱eb╱;╱ // 0x1515 @0xf
0x1506…154e at0010 = ╱cf╱CHR╱ // 0x1516 @0x10
0x1506…154e at0011 = ╱ed╱(╱ // 0x1517 @0x11
0x1506…154e at0012 = ╱4d╱M╱ // 0x1518 @0x12
0x1506…154e at0013 = ╱ee╱)╱ // 0x1519 @0x13
0x1506…154e at0014 = ╱eb╱;╱ // 0x151a @0x14
0x1506…154e at0015 = ╱22╱"╱ // 0x151b @0x15
0x1506…154e at0016 = ╱4d╱M╱ // 0x151c @0x16
0x1506…154e at0017 = ╱7d╱å╱ // 0x151d @0x17
0x1506…154e at0018 = ╱6e╱n╱ // 0x151e @0x18
0x1506…154e at0019 = ╱65╱e╱ // 0x151f @0x19
0x1506…154e at001a = ╱64╱d╱ // 0x1520 @0x1a
0x1506…154e at001b = ╱65╱e╱ // 0x1521 @0x1b
0x1506…154e at001c = ╱6e╱n╱ // 0x1522 @0x1c
0x1506…154e at001d = ╱73╱s╱ // 0x1523 @0x1d
0x1506…154e at001e = ╱20╱…╱ // 0x1524 @0x1e
0x1506…154e at001f = ╱62╱b╱ // 0x1525 @0x1f
0x1506…154e at0020 = ╱65╱e╱ // 0x1526 @0x20
0x1506…154e at0021 = ╱76╱v╱ // 0x1527 @0x21
0x1506…154e at0022 = ╱2e╱.╱ // 0x1528 @0x22
0x1506…154e at0023 = ╱22╱"╱ // 0x1529 @0x23
0x1506…154e at0024 = ╱eb╱;╱ // 0x152a @0x24
0x1506…154e at0025 = ╱d2╱TAB╱ // 0x152b @0x25
0x1506…154e at0026 = ╱ed╱(╱ // 0x152c @0x26
0x1506…154e at0027 = ╱33╱3╱ // 0x152d @0x27
0x1506…154e at0028 = ╱34╱4╱ // 0x152e @0x28
0x1506…154e at0029 = ╱fe00008806╱ // 0x152f @0x29
0x1506…154e at002e = ╱ee╱)╱ // 0x1534 @0x2e
0x1506…154e at002f = ╱eb╱;╱ // 0x1535 @0x2f
0x1506…154e at0030 = ╱22╱"╱ // 0x1536 @0x30
0x1506…154e at0031 = ╱5d╱Å╱ // 0x1537 @0x31
0x1506…154e at0032 = ╱72╱r╱ // 0x1538 @0x32
0x1506…154e at0033 = ╱65╱e╱ // 0x1539 @0x33
0x1506…154e at0034 = ╱74╱t╱ // 0x153a @0x34
0x1506…154e at0035 = ╱73╱s╱ // 0x153b @0x35
0x1506…154e at0036 = ╱20╱…╱ // 0x153c @0x36
0x1506…154e at0037 = ╱62╱b╱ // 0x153d @0x37
0x1506…154e at0038 = ╱65╱e╱ // 0x153e @0x38
0x1506…154e at0039 = ╱76╱v╱ // 0x153f @0x39
0x1506…154e at003a = ╱2e╱.╱ // 0x1540 @0x3a
0x1506…154e at003b = ╱22╱"╱ // 0x1541 @0x3b
0x1506…154e at003c = ╱eb╱;╱ // 0x1542 @0x3c
0x1506…154e at003d = ╱cf╱CHR╱ // 0x1543 @0x3d
0x1506…154e at003e = ╱ed╱(╱ // 0x1544 @0x3e
0x1506…154e at003f = ╱31╱1╱ // 0x1545 @0x3f
0x1506…154e at0040 = ╱35╱5╱ // 0x1546 @0x40
0x1506…154e at0041 = ╱fe0000f004╱ // 0x1547 @0x41
0x1506…154e at0046 = ╱ee╱)╱ // 0x154c @0x46
0x1506…154e at0047 = EOL // 0x154d @0x47
0x1506…154e }
0x154e…1558 a2af 2440 WHEN B,C
0x154e…1558 LineComalBin {
0x154e…1558 ptr = 0xa2af // 0x154e @0x0
0x154e…1558 lno = 0x0988 // 0x1550 @0x2
0x154e…1558 at0004 = ╱a301╱ WHEN ╱ // 0x1552 @0x4
0x154e…1558 at0006 = ╱42╱B╱ // 0x1554 @0x6
0x154e…1558 at0007 = ╱ec╱,╱ // 0x1555 @0x7
0x154e…1558 at0008 = ╱43╱C╱ // 0x1556 @0x8
0x154e…1558 at0009 = EOL // 0x1557 @0x9
0x154e…1558 }
0x1558…156f a2c6 2450 PRINT TAB(F);CHR(M);"0-30";
0x1558…156f LineComalBin {
0x1558…156f ptr = 0xa2c6 // 0x1558 @0x0
0x1558…156f lno = 0x0992 // 0x155a @0x2
0x1558…156f at0004 = ╱92╱ PRINT ╱ // 0x155c @0x4
0x1558…156f at0005 = ╱d2╱TAB╱ // 0x155d @0x5
0x1558…156f at0006 = ╱ed╱(╱ // 0x155e @0x6
0x1558…156f at0007 = ╱46╱F╱ // 0x155f @0x7
0x1558…156f at0008 = ╱ee╱)╱ // 0x1560 @0x8
0x1558…156f at0009 = ╱eb╱;╱ // 0x1561 @0x9
0x1558…156f at000a = ╱cf╱CHR╱ // 0x1562 @0xa
0x1558…156f at000b = ╱ed╱(╱ // 0x1563 @0xb
0x1558…156f at000c = ╱4d╱M╱ // 0x1564 @0xc
0x1558…156f at000d = ╱ee╱)╱ // 0x1565 @0xd
0x1558…156f at000e = ╱eb╱;╱ // 0x1566 @0xe
0x1558…156f at000f = ╱22╱"╱ // 0x1567 @0xf
0x1558…156f at0010 = ╱30╱0╱ // 0x1568 @0x10
0x1558…156f at0011 = ╱2d╱-╱ // 0x1569 @0x11
0x1558…156f at0012 = ╱33╱3╱ // 0x156a @0x12
0x1558…156f at0013 = ╱30╱0╱ // 0x156b @0x13
0x1558…156f at0014 = ╱22╱"╱ // 0x156c @0x14
0x1558…156f at0015 = ╱eb╱;╱ // 0x156d @0x15
0x1558…156f at0016 = EOL // 0x156e @0x16
0x1558…156f }
0x156f…159b a2f2 2460 IF MK=B THEN PRINT TAB(U);"30-60";TAB(33);"60-90";
0x156f…159b LineComalBin {
0x156f…159b ptr = 0xa2f2 // 0x156f @0x0
0x156f…159b lno = 0x099c // 0x1571 @0x2
0x156f…159b at0004 = ╱82╱ IF ╱ // 0x1573 @0x4
0x156f…159b at0005 = ╱4d╱M╱ // 0x1574 @0x5
0x156f…159b at0006 = ╱4b╱K╱ // 0x1575 @0x6
0x156f…159b at0007 = ╱dc╱=╱ // 0x1576 @0x7
0x156f…159b at0008 = ╱42╱B╱ // 0x1577 @0x8
0x156f…159b at0009 = ╱b6╱ THEN ╱ // 0x1578 @0x9
0x156f…159b at000a = ╱92╱ PRINT ╱ // 0x1579 @0xa
0x156f…159b at000b = ╱d2╱TAB╱ // 0x157a @0xb
0x156f…159b at000c = ╱ed╱(╱ // 0x157b @0xc
0x156f…159b at000d = ╱55╱U╱ // 0x157c @0xd
0x156f…159b at000e = ╱ee╱)╱ // 0x157d @0xe
0x156f…159b at000f = ╱eb╱;╱ // 0x157e @0xf
0x156f…159b at0010 = ╱22╱"╱ // 0x157f @0x10
0x156f…159b at0011 = ╱33╱3╱ // 0x1580 @0x11
0x156f…159b at0012 = ╱30╱0╱ // 0x1581 @0x12
0x156f…159b at0013 = ╱2d╱-╱ // 0x1582 @0x13
0x156f…159b at0014 = ╱36╱6╱ // 0x1583 @0x14
0x156f…159b at0015 = ╱30╱0╱ // 0x1584 @0x15
0x156f…159b at0016 = ╱22╱"╱ // 0x1585 @0x16
0x156f…159b at0017 = ╱eb╱;╱ // 0x1586 @0x17
0x156f…159b at0018 = ╱d2╱TAB╱ // 0x1587 @0x18
0x156f…159b at0019 = ╱ed╱(╱ // 0x1588 @0x19
0x156f…159b at001a = ╱33╱3╱ // 0x1589 @0x1a
0x156f…159b at001b = ╱33╱3╱ // 0x158a @0x1b
0x156f…159b at001c = ╱fe00008406╱ // 0x158b @0x1c
0x156f…159b at0021 = ╱ee╱)╱ // 0x1590 @0x21
0x156f…159b at0022 = ╱eb╱;╱ // 0x1591 @0x22
0x156f…159b at0023 = ╱22╱"╱ // 0x1592 @0x23
0x156f…159b at0024 = ╱36╱6╱ // 0x1593 @0x24
0x156f…159b at0025 = ╱30╱0╱ // 0x1594 @0x25
0x156f…159b at0026 = ╱2d╱-╱ // 0x1595 @0x26
0x156f…159b at0027 = ╱39╱9╱ // 0x1596 @0x27
0x156f…159b at0028 = ╱30╱0╱ // 0x1597 @0x28
0x156f…159b at0029 = ╱22╱"╱ // 0x1598 @0x29
0x156f…159b at002a = ╱eb╱;╱ // 0x1599 @0x2a
0x156f…159b at002b = EOL // 0x159a @0x2b
0x156f…159b }
0x159b…15be a315 2470 PRINT TAB(41);"Ældre";CHR(15)
0x159b…15be LineComalBin {
0x159b…15be ptr = 0xa315 // 0x159b @0x0
0x159b…15be lno = 0x09a6 // 0x159d @0x2
0x159b…15be at0004 = ╱92╱ PRINT ╱ // 0x159f @0x4
0x159b…15be at0005 = ╱d2╱TAB╱ // 0x15a0 @0x5
0x159b…15be at0006 = ╱ed╱(╱ // 0x15a1 @0x6
0x159b…15be at0007 = ╱34╱4╱ // 0x15a2 @0x7
0x159b…15be at0008 = ╱31╱1╱ // 0x15a3 @0x8
0x159b…15be at0009 = ╱fe0000a406╱ // 0x15a4 @0x9
0x159b…15be at000e = ╱ee╱)╱ // 0x15a9 @0xe
0x159b…15be at000f = ╱eb╱;╱ // 0x15aa @0xf
0x159b…15be at0010 = ╱22╱"╱ // 0x15ab @0x10
0x159b…15be at0011 = ╱5b╱Æ╱ // 0x15ac @0x11
0x159b…15be at0012 = ╱6c╱l╱ // 0x15ad @0x12
0x159b…15be at0013 = ╱64╱d╱ // 0x15ae @0x13
0x159b…15be at0014 = ╱72╱r╱ // 0x15af @0x14
0x159b…15be at0015 = ╱65╱e╱ // 0x15b0 @0x15
0x159b…15be at0016 = ╱22╱"╱ // 0x15b1 @0x16
0x159b…15be at0017 = ╱eb╱;╱ // 0x15b2 @0x17
0x159b…15be at0018 = ╱cf╱CHR╱ // 0x15b3 @0x18
0x159b…15be at0019 = ╱ed╱(╱ // 0x15b4 @0x19
0x159b…15be at001a = ╱31╱1╱ // 0x15b5 @0x1a
0x159b…15be at001b = ╱35╱5╱ // 0x15b6 @0x1b
0x159b…15be at001c = ╱fe0000f004╱ // 0x15b7 @0x1c
0x159b…15be at0021 = ╱ee╱)╱ // 0x15bc @0x21
0x159b…15be at0022 = EOL // 0x15bd @0x22
0x159b…15be }
0x15be…15c4 a31b 2480 ENDCASE
0x15be…15c4 LineComalBin {
0x15be…15c4 ptr = 0xa31b // 0x15be @0x0
0x15be…15c4 lno = 0x09b0 // 0x15c0 @0x2
0x15be…15c4 at0004 = ╱a4╱ ENDCASE ╱ // 0x15c2 @0x4
0x15be…15c4 at0005 = EOL // 0x15c3 @0x5
0x15be…15c4 }
0x15c4…15d0 a327 2490 PRINT STREG$
0x15c4…15d0 LineComalBin {
0x15c4…15d0 ptr = 0xa327 // 0x15c4 @0x0
0x15c4…15d0 lno = 0x09ba // 0x15c6 @0x2
0x15c4…15d0 at0004 = ╱92╱ PRINT ╱ // 0x15c8 @0x4
0x15c4…15d0 at0005 = ╱53╱S╱ // 0x15c9 @0x5
0x15c4…15d0 at0006 = ╱54╱T╱ // 0x15ca @0x6
0x15c4…15d0 at0007 = ╱52╱R╱ // 0x15cb @0x7
0x15c4…15d0 at0008 = ╱45╱E╱ // 0x15cc @0x8
0x15c4…15d0 at0009 = ╱47╱G╱ // 0x15cd @0x9
0x15c4…15d0 at000a = ╱ef╱$╱ // 0x15ce @0xa
0x15c4…15d0 at000b = EOL // 0x15cf @0xb
0x15c4…15d0 }
0x15d0…15d6 a32d 2500 ENDIF
0x15d0…15d6 LineComalBin {
0x15d0…15d6 ptr = 0xa32d // 0x15d0 @0x0
0x15d0…15d6 lno = 0x09c4 // 0x15d2 @0x2
0x15d0…15d6 at0004 = ╱9b╱ ENDIF ╱ // 0x15d4 @0x4
0x15d0…15d6 at0005 = EOL // 0x15d5 @0x5
0x15d0…15d6 }
0x15d6…15f0 a347 2510 EXEC TUD(DS1$,UBEL1$,E,B)
0x15d6…15f0 LineComalBin {
0x15d6…15f0 ptr = 0xa347 // 0x15d6 @0x0
0x15d6…15f0 lno = 0x09ce // 0x15d8 @0x2
0x15d6…15f0 at0004 = ╱9d╱ EXEC ╱ // 0x15da @0x4
0x15d6…15f0 at0005 = ╱54╱T╱ // 0x15db @0x5
0x15d6…15f0 at0006 = ╱55╱U╱ // 0x15dc @0x6
0x15d6…15f0 at0007 = ╱44╱D╱ // 0x15dd @0x7
0x15d6…15f0 at0008 = ╱ed╱(╱ // 0x15de @0x8
0x15d6…15f0 at0009 = ╱44╱D╱ // 0x15df @0x9
0x15d6…15f0 at000a = ╱53╱S╱ // 0x15e0 @0xa
0x15d6…15f0 at000b = ╱31╱1╱ // 0x15e1 @0xb
0x15d6…15f0 at000c = ╱ef╱$╱ // 0x15e2 @0xc
0x15d6…15f0 at000d = ╱ec╱,╱ // 0x15e3 @0xd
0x15d6…15f0 at000e = ╱55╱U╱ // 0x15e4 @0xe
0x15d6…15f0 at000f = ╱42╱B╱ // 0x15e5 @0xf
0x15d6…15f0 at0010 = ╱45╱E╱ // 0x15e6 @0x10
0x15d6…15f0 at0011 = ╱4c╱L╱ // 0x15e7 @0x11
0x15d6…15f0 at0012 = ╱31╱1╱ // 0x15e8 @0x12
0x15d6…15f0 at0013 = ╱ef╱$╱ // 0x15e9 @0x13
0x15d6…15f0 at0014 = ╱ec╱,╱ // 0x15ea @0x14
0x15d6…15f0 at0015 = ╱45╱E╱ // 0x15eb @0x15
0x15d6…15f0 at0016 = ╱ec╱,╱ // 0x15ec @0x16
0x15d6…15f0 at0017 = ╱42╱B╱ // 0x15ed @0x17
0x15d6…15f0 at0018 = ╱ee╱)╱ // 0x15ee @0x18
0x15d6…15f0 at0019 = EOL // 0x15ef @0x19
0x15d6…15f0 }
0x15f0…160a a361 2520 EXEC TUD(DS2$,UBEL2$,E,B)
0x15f0…160a LineComalBin {
0x15f0…160a ptr = 0xa361 // 0x15f0 @0x0
0x15f0…160a lno = 0x09d8 // 0x15f2 @0x2
0x15f0…160a at0004 = ╱9d╱ EXEC ╱ // 0x15f4 @0x4
0x15f0…160a at0005 = ╱54╱T╱ // 0x15f5 @0x5
0x15f0…160a at0006 = ╱55╱U╱ // 0x15f6 @0x6
0x15f0…160a at0007 = ╱44╱D╱ // 0x15f7 @0x7
0x15f0…160a at0008 = ╱ed╱(╱ // 0x15f8 @0x8
0x15f0…160a at0009 = ╱44╱D╱ // 0x15f9 @0x9
0x15f0…160a at000a = ╱53╱S╱ // 0x15fa @0xa
0x15f0…160a at000b = ╱32╱2╱ // 0x15fb @0xb
0x15f0…160a at000c = ╱ef╱$╱ // 0x15fc @0xc
0x15f0…160a at000d = ╱ec╱,╱ // 0x15fd @0xd
0x15f0…160a at000e = ╱55╱U╱ // 0x15fe @0xe
0x15f0…160a at000f = ╱42╱B╱ // 0x15ff @0xf
0x15f0…160a at0010 = ╱45╱E╱ // 0x1600 @0x10
0x15f0…160a at0011 = ╱4c╱L╱ // 0x1601 @0x11
0x15f0…160a at0012 = ╱32╱2╱ // 0x1602 @0x12
0x15f0…160a at0013 = ╱ef╱$╱ // 0x1603 @0x13
0x15f0…160a at0014 = ╱ec╱,╱ // 0x1604 @0x14
0x15f0…160a at0015 = ╱45╱E╱ // 0x1605 @0x15
0x15f0…160a at0016 = ╱ec╱,╱ // 0x1606 @0x16
0x15f0…160a at0017 = ╱42╱B╱ // 0x1607 @0x17
0x15f0…160a at0018 = ╱ee╱)╱ // 0x1608 @0x18
0x15f0…160a at0019 = EOL // 0x1609 @0x19
0x15f0…160a }
0x160a…1624 a37b 2530 EXEC TUD(DS3$,UBEL3$,E,B)
0x160a…1624 LineComalBin {
0x160a…1624 ptr = 0xa37b // 0x160a @0x0
0x160a…1624 lno = 0x09e2 // 0x160c @0x2
0x160a…1624 at0004 = ╱9d╱ EXEC ╱ // 0x160e @0x4
0x160a…1624 at0005 = ╱54╱T╱ // 0x160f @0x5
0x160a…1624 at0006 = ╱55╱U╱ // 0x1610 @0x6
0x160a…1624 at0007 = ╱44╱D╱ // 0x1611 @0x7
0x160a…1624 at0008 = ╱ed╱(╱ // 0x1612 @0x8
0x160a…1624 at0009 = ╱44╱D╱ // 0x1613 @0x9
0x160a…1624 at000a = ╱53╱S╱ // 0x1614 @0xa
0x160a…1624 at000b = ╱33╱3╱ // 0x1615 @0xb
0x160a…1624 at000c = ╱ef╱$╱ // 0x1616 @0xc
0x160a…1624 at000d = ╱ec╱,╱ // 0x1617 @0xd
0x160a…1624 at000e = ╱55╱U╱ // 0x1618 @0xe
0x160a…1624 at000f = ╱42╱B╱ // 0x1619 @0xf
0x160a…1624 at0010 = ╱45╱E╱ // 0x161a @0x10
0x160a…1624 at0011 = ╱4c╱L╱ // 0x161b @0x11
0x160a…1624 at0012 = ╱33╱3╱ // 0x161c @0x12
0x160a…1624 at0013 = ╱ef╱$╱ // 0x161d @0x13
0x160a…1624 at0014 = ╱ec╱,╱ // 0x161e @0x14
0x160a…1624 at0015 = ╱45╱E╱ // 0x161f @0x15
0x160a…1624 at0016 = ╱ec╱,╱ // 0x1620 @0x16
0x160a…1624 at0017 = ╱42╱B╱ // 0x1621 @0x17
0x160a…1624 at0018 = ╱ee╱)╱ // 0x1622 @0x18
0x160a…1624 at0019 = EOL // 0x1623 @0x19
0x160a…1624 }
0x1624…163e a395 2540 EXEC TUD(DS4$,UBEL4$,E,B)
0x1624…163e LineComalBin {
0x1624…163e ptr = 0xa395 // 0x1624 @0x0
0x1624…163e lno = 0x09ec // 0x1626 @0x2
0x1624…163e at0004 = ╱9d╱ EXEC ╱ // 0x1628 @0x4
0x1624…163e at0005 = ╱54╱T╱ // 0x1629 @0x5
0x1624…163e at0006 = ╱55╱U╱ // 0x162a @0x6
0x1624…163e at0007 = ╱44╱D╱ // 0x162b @0x7
0x1624…163e at0008 = ╱ed╱(╱ // 0x162c @0x8
0x1624…163e at0009 = ╱44╱D╱ // 0x162d @0x9
0x1624…163e at000a = ╱53╱S╱ // 0x162e @0xa
0x1624…163e at000b = ╱34╱4╱ // 0x162f @0xb
0x1624…163e at000c = ╱ef╱$╱ // 0x1630 @0xc
0x1624…163e at000d = ╱ec╱,╱ // 0x1631 @0xd
0x1624…163e at000e = ╱55╱U╱ // 0x1632 @0xe
0x1624…163e at000f = ╱42╱B╱ // 0x1633 @0xf
0x1624…163e at0010 = ╱45╱E╱ // 0x1634 @0x10
0x1624…163e at0011 = ╱4c╱L╱ // 0x1635 @0x11
0x1624…163e at0012 = ╱34╱4╱ // 0x1636 @0x12
0x1624…163e at0013 = ╱ef╱$╱ // 0x1637 @0x13
0x1624…163e at0014 = ╱ec╱,╱ // 0x1638 @0x14
0x1624…163e at0015 = ╱45╱E╱ // 0x1639 @0x15
0x1624…163e at0016 = ╱ec╱,╱ // 0x163a @0x16
0x1624…163e at0017 = ╱42╱B╱ // 0x163b @0x17
0x1624…163e at0018 = ╱ee╱)╱ // 0x163c @0x18
0x1624…163e at0019 = EOL // 0x163d @0x19
0x1624…163e }
0x163e…1656 a3ad 2550 PRINT TAB(11);UBEL1$;
0x163e…1656 LineComalBin {
0x163e…1656 ptr = 0xa3ad // 0x163e @0x0
0x163e…1656 lno = 0x09f6 // 0x1640 @0x2
0x163e…1656 at0004 = ╱92╱ PRINT ╱ // 0x1642 @0x4
0x163e…1656 at0005 = ╱d2╱TAB╱ // 0x1643 @0x5
0x163e…1656 at0006 = ╱ed╱(╱ // 0x1644 @0x6
0x163e…1656 at0007 = ╱31╱1╱ // 0x1645 @0x7
0x163e…1656 at0008 = ╱31╱1╱ // 0x1646 @0x8
0x163e…1656 at0009 = ╱fe0000b004╱ // 0x1647 @0x9
0x163e…1656 at000e = ╱ee╱)╱ // 0x164c @0xe
0x163e…1656 at000f = ╱eb╱;╱ // 0x164d @0xf
0x163e…1656 at0010 = ╱55╱U╱ // 0x164e @0x10
0x163e…1656 at0011 = ╱42╱B╱ // 0x164f @0x11
0x163e…1656 at0012 = ╱45╱E╱ // 0x1650 @0x12
0x163e…1656 at0013 = ╱4c╱L╱ // 0x1651 @0x13
0x163e…1656 at0014 = ╱31╱1╱ // 0x1652 @0x14
0x163e…1656 at0015 = ╱ef╱$╱ // 0x1653 @0x15
0x163e…1656 at0016 = ╱eb╱;╱ // 0x1654 @0x16
0x163e…1656 at0017 = EOL // 0x1655 @0x17
0x163e…1656 }
0x1656…1686 a3dd 2560 IF MK<>C THEN PRINT TAB(27);UBEL2$;TAB(44);UBEL3$;
0x1656…1686 LineComalBin {
0x1656…1686 ptr = 0xa3dd // 0x1656 @0x0
0x1656…1686 lno = 0x0a00 // 0x1658 @0x2
0x1656…1686 at0004 = ╱82╱ IF ╱ // 0x165a @0x4
0x1656…1686 at0005 = ╱4d╱M╱ // 0x165b @0x5
0x1656…1686 at0006 = ╱4b╱K╱ // 0x165c @0x6
0x1656…1686 at0007 = ╱e1╱<>╱ // 0x165d @0x7
0x1656…1686 at0008 = ╱43╱C╱ // 0x165e @0x8
0x1656…1686 at0009 = ╱b6╱ THEN ╱ // 0x165f @0x9
0x1656…1686 at000a = ╱92╱ PRINT ╱ // 0x1660 @0xa
0x1656…1686 at000b = ╱d2╱TAB╱ // 0x1661 @0xb
0x1656…1686 at000c = ╱ed╱(╱ // 0x1662 @0xc
0x1656…1686 at000d = ╱32╱2╱ // 0x1663 @0xd
0x1656…1686 at000e = ╱37╱7╱ // 0x1664 @0xe
0x1656…1686 at000f = ╱fe0000d805╱ // 0x1665 @0xf
0x1656…1686 at0014 = ╱ee╱)╱ // 0x166a @0x14
0x1656…1686 at0015 = ╱eb╱;╱ // 0x166b @0x15
0x1656…1686 at0016 = ╱55╱U╱ // 0x166c @0x16
0x1656…1686 at0017 = ╱42╱B╱ // 0x166d @0x17
0x1656…1686 at0018 = ╱45╱E╱ // 0x166e @0x18
0x1656…1686 at0019 = ╱4c╱L╱ // 0x166f @0x19
0x1656…1686 at001a = ╱32╱2╱ // 0x1670 @0x1a
0x1656…1686 at001b = ╱ef╱$╱ // 0x1671 @0x1b
0x1656…1686 at001c = ╱eb╱;╱ // 0x1672 @0x1c
0x1656…1686 at001d = ╱d2╱TAB╱ // 0x1673 @0x1d
0x1656…1686 at001e = ╱ed╱(╱ // 0x1674 @0x1e
0x1656…1686 at001f = ╱34╱4╱ // 0x1675 @0x1f
0x1656…1686 at0020 = ╱34╱4╱ // 0x1676 @0x20
0x1656…1686 at0021 = ╱fe0000b006╱ // 0x1677 @0x21
0x1656…1686 at0026 = ╱ee╱)╱ // 0x167c @0x26
0x1656…1686 at0027 = ╱eb╱;╱ // 0x167d @0x27
0x1656…1686 at0028 = ╱55╱U╱ // 0x167e @0x28
0x1656…1686 at0029 = ╱42╱B╱ // 0x167f @0x29
0x1656…1686 at002a = ╱45╱E╱ // 0x1680 @0x2a
0x1656…1686 at002b = ╱4c╱L╱ // 0x1681 @0x2b
0x1656…1686 at002c = ╱33╱3╱ // 0x1682 @0x2c
0x1656…1686 at002d = ╱ef╱$╱ // 0x1683 @0x2d
0x1656…1686 at002e = ╱eb╱;╱ // 0x1684 @0x2e
0x1656…1686 at002f = EOL // 0x1685 @0x2f
0x1656…1686 }
0x1686…169d a3f4 2570 PRINT TAB(60);UBEL4$
0x1686…169d LineComalBin {
0x1686…169d ptr = 0xa3f4 // 0x1686 @0x0
0x1686…169d lno = 0x0a0a // 0x1688 @0x2
0x1686…169d at0004 = ╱92╱ PRINT ╱ // 0x168a @0x4
0x1686…169d at0005 = ╱d2╱TAB╱ // 0x168b @0x5
0x1686…169d at0006 = ╱ed╱(╱ // 0x168c @0x6
0x1686…169d at0007 = ╱36╱6╱ // 0x168d @0x7
0x1686…169d at0008 = ╱30╱0╱ // 0x168e @0x8
0x1686…169d at0009 = ╱fe0000f006╱ // 0x168f @0x9
0x1686…169d at000e = ╱ee╱)╱ // 0x1694 @0xe
0x1686…169d at000f = ╱eb╱;╱ // 0x1695 @0xf
0x1686…169d at0010 = ╱55╱U╱ // 0x1696 @0x10
0x1686…169d at0011 = ╱42╱B╱ // 0x1697 @0x11
0x1686…169d at0012 = ╱45╱E╱ // 0x1698 @0x12
0x1686…169d at0013 = ╱4c╱L╱ // 0x1699 @0x13
0x1686…169d at0014 = ╱34╱4╱ // 0x169a @0x14
0x1686…169d at0015 = ╱ef╱$╱ // 0x169b @0x15
0x1686…169d at0016 = EOL // 0x169c @0x16
0x1686…169d }
0x169d…16a3 a3fa 2580 ENDIF
0x169d…16a3 LineComalBin {
0x169d…16a3 ptr = 0xa3fa // 0x169d @0x0
0x169d…16a3 lno = 0x0a14 // 0x169f @0x2
0x169d…16a3 at0004 = ╱9b╱ ENDIF ╱ // 0x16a1 @0x4
0x169d…16a3 at0005 = EOL // 0x16a2 @0x5
0x169d…16a3 }
0x16a3…16bc a413 2590 IF SKRIV1=B AND MK<>E AND MK<>G THEN
0x16a3…16bc LineComalBin {
0x16a3…16bc ptr = 0xa413 // 0x16a3 @0x0
0x16a3…16bc lno = 0x0a1e // 0x16a5 @0x2
0x16a3…16bc at0004 = ╱9c╱ IF ╱ // 0x16a7 @0x4
0x16a3…16bc at0005 = ╱53╱S╱ // 0x16a8 @0x5
0x16a3…16bc at0006 = ╱4b╱K╱ // 0x16a9 @0x6
0x16a3…16bc at0007 = ╱52╱R╱ // 0x16aa @0x7
0x16a3…16bc at0008 = ╱49╱I╱ // 0x16ab @0x8
0x16a3…16bc at0009 = ╱56╱V╱ // 0x16ac @0x9
0x16a3…16bc at000a = ╱31╱1╱ // 0x16ad @0xa
0x16a3…16bc at000b = ╱dc╱=╱ // 0x16ae @0xb
0x16a3…16bc at000c = ╱42╱B╱ // 0x16af @0xc
0x16a3…16bc at000d = ╱da╱ AND ╱ // 0x16b0 @0xd
0x16a3…16bc at000e = ╱4d╱M╱ // 0x16b1 @0xe
0x16a3…16bc at000f = ╱4b╱K╱ // 0x16b2 @0xf
0x16a3…16bc at0010 = ╱e1╱<>╱ // 0x16b3 @0x10
0x16a3…16bc at0011 = ╱45╱E╱ // 0x16b4 @0x11
0x16a3…16bc at0012 = ╱da╱ AND ╱ // 0x16b5 @0x12
0x16a3…16bc at0013 = ╱4d╱M╱ // 0x16b6 @0x13
0x16a3…16bc at0014 = ╱4b╱K╱ // 0x16b7 @0x14
0x16a3…16bc at0015 = ╱e1╱<>╱ // 0x16b8 @0x15
0x16a3…16bc at0016 = ╱47╱G╱ // 0x16b9 @0x16
0x16a3…16bc at0017 = ╱b6╱ THEN ╱ // 0x16ba @0x17
0x16a3…16bc at0018 = EOL // 0x16bb @0x18
0x16a3…16bc }
0x16bc…16c8 a41f 2600 PRINT STREG$
0x16bc…16c8 LineComalBin {
0x16bc…16c8 ptr = 0xa41f // 0x16bc @0x0
0x16bc…16c8 lno = 0x0a28 // 0x16be @0x2
0x16bc…16c8 at0004 = ╱92╱ PRINT ╱ // 0x16c0 @0x4
0x16bc…16c8 at0005 = ╱53╱S╱ // 0x16c1 @0x5
0x16bc…16c8 at0006 = ╱54╱T╱ // 0x16c2 @0x6
0x16bc…16c8 at0007 = ╱52╱R╱ // 0x16c3 @0x7
0x16bc…16c8 at0008 = ╱45╱E╱ // 0x16c4 @0x8
0x16bc…16c8 at0009 = ╱47╱G╱ // 0x16c5 @0x9
0x16bc…16c8 at000a = ╱ef╱$╱ // 0x16c6 @0xa
0x16bc…16c8 at000b = EOL // 0x16c7 @0xb
0x16bc…16c8 }
0x16c8…16d1 a428 2610 PRINT " "
0x16c8…16d1 LineComalBin {
0x16c8…16d1 ptr = 0xa428 // 0x16c8 @0x0
0x16c8…16d1 lno = 0x0a32 // 0x16ca @0x2
0x16c8…16d1 at0004 = ╱92╱ PRINT ╱ // 0x16cc @0x4
0x16c8…16d1 at0005 = ╱22╱"╱ // 0x16cd @0x5
0x16c8…16d1 at0006 = ╱20╱…╱ // 0x16ce @0x6
0x16c8…16d1 at0007 = ╱22╱"╱ // 0x16cf @0x7
0x16c8…16d1 at0008 = EOL // 0x16d0 @0x8
0x16c8…16d1 }
0x16d1…16da a431 2620 PRINT " "
0x16d1…16da LineComalBin {
0x16d1…16da ptr = 0xa431 // 0x16d1 @0x0
0x16d1…16da lno = 0x0a3c // 0x16d3 @0x2
0x16d1…16da at0004 = ╱92╱ PRINT ╱ // 0x16d5 @0x4
0x16d1…16da at0005 = ╱22╱"╱ // 0x16d6 @0x5
0x16d1…16da at0006 = ╱20╱…╱ // 0x16d7 @0x6
0x16d1…16da at0007 = ╱22╱"╱ // 0x16d8 @0x7
0x16d1…16da at0008 = EOL // 0x16d9 @0x8
0x16d1…16da }
0x16da…16e0 a437 2630 ENDIF
0x16da…16e0 LineComalBin {
0x16da…16e0 ptr = 0xa437 // 0x16da @0x0
0x16da…16e0 lno = 0x0a46 // 0x16dc @0x2
0x16da…16e0 at0004 = ╱9b╱ ENDIF ╱ // 0x16de @0x4
0x16da…16e0 at0005 = EOL // 0x16df @0x5
0x16da…16e0 }
0x16e0…16f8 a44f 2640 IF MK=E AND SKRIV1=E THEN PRINT " "
0x16e0…16f8 LineComalBin {
0x16e0…16f8 ptr = 0xa44f // 0x16e0 @0x0
0x16e0…16f8 lno = 0x0a50 // 0x16e2 @0x2
0x16e0…16f8 at0004 = ╱82╱ IF ╱ // 0x16e4 @0x4
0x16e0…16f8 at0005 = ╱4d╱M╱ // 0x16e5 @0x5
0x16e0…16f8 at0006 = ╱4b╱K╱ // 0x16e6 @0x6
0x16e0…16f8 at0007 = ╱dc╱=╱ // 0x16e7 @0x7
0x16e0…16f8 at0008 = ╱45╱E╱ // 0x16e8 @0x8
0x16e0…16f8 at0009 = ╱da╱ AND ╱ // 0x16e9 @0x9
0x16e0…16f8 at000a = ╱53╱S╱ // 0x16ea @0xa
0x16e0…16f8 at000b = ╱4b╱K╱ // 0x16eb @0xb
0x16e0…16f8 at000c = ╱52╱R╱ // 0x16ec @0xc
0x16e0…16f8 at000d = ╱49╱I╱ // 0x16ed @0xd
0x16e0…16f8 at000e = ╱56╱V╱ // 0x16ee @0xe
0x16e0…16f8 at000f = ╱31╱1╱ // 0x16ef @0xf
0x16e0…16f8 at0010 = ╱dc╱=╱ // 0x16f0 @0x10
0x16e0…16f8 at0011 = ╱45╱E╱ // 0x16f1 @0x11
0x16e0…16f8 at0012 = ╱b6╱ THEN ╱ // 0x16f2 @0x12
0x16e0…16f8 at0013 = ╱92╱ PRINT ╱ // 0x16f3 @0x13
0x16e0…16f8 at0014 = ╱22╱"╱ // 0x16f4 @0x14
0x16e0…16f8 at0015 = ╱20╱…╱ // 0x16f5 @0x15
0x16e0…16f8 at0016 = ╱22╱"╱ // 0x16f6 @0x16
0x16e0…16f8 at0017 = EOL // 0x16f7 @0x17
0x16e0…16f8 }
0x16f8…173b a492 2650 IF MK=E OR (SKRIV1=E AND MK<>G) THEN EXEC LINIER(LNR,29-2*(SKRIV1),LNR)
0x16f8…173b LineComalBin {
0x16f8…173b ptr = 0xa492 // 0x16f8 @0x0
0x16f8…173b lno = 0x0a5a // 0x16fa @0x2
0x16f8…173b at0004 = ╱82╱ IF ╱ // 0x16fc @0x4
0x16f8…173b at0005 = ╱4d╱M╱ // 0x16fd @0x5
0x16f8…173b at0006 = ╱4b╱K╱ // 0x16fe @0x6
0x16f8…173b at0007 = ╱dc╱=╱ // 0x16ff @0x7
0x16f8…173b at0008 = ╱45╱E╱ // 0x1700 @0x8
0x16f8…173b at0009 = ╱db╱ OR ╱ // 0x1701 @0x9
0x16f8…173b at000a = ╱ed╱(╱ // 0x1702 @0xa
0x16f8…173b at000b = ╱53╱S╱ // 0x1703 @0xb
0x16f8…173b at000c = ╱4b╱K╱ // 0x1704 @0xc
0x16f8…173b at000d = ╱52╱R╱ // 0x1705 @0xd
0x16f8…173b at000e = ╱49╱I╱ // 0x1706 @0xe
0x16f8…173b at000f = ╱56╱V╱ // 0x1707 @0xf
0x16f8…173b at0010 = ╱31╱1╱ // 0x1708 @0x10
0x16f8…173b at0011 = ╱dc╱=╱ // 0x1709 @0x11
0x16f8…173b at0012 = ╱45╱E╱ // 0x170a @0x12
0x16f8…173b at0013 = ╱da╱ AND ╱ // 0x170b @0x13
0x16f8…173b at0014 = ╱4d╱M╱ // 0x170c @0x14
0x16f8…173b at0015 = ╱4b╱K╱ // 0x170d @0x15
0x16f8…173b at0016 = ╱e1╱<>╱ // 0x170e @0x16
0x16f8…173b at0017 = ╱47╱G╱ // 0x170f @0x17
0x16f8…173b at0018 = ╱ee╱)╱ // 0x1710 @0x18
0x16f8…173b at0019 = ╱b6╱ THEN ╱ // 0x1711 @0x19
0x16f8…173b at001a = ╱9d╱ EXEC ╱ // 0x1712 @0x1a
0x16f8…173b at001b = ╱4c╱L╱ // 0x1713 @0x1b
0x16f8…173b at001c = ╱49╱I╱ // 0x1714 @0x1c
0x16f8…173b at001d = ╱4e╱N╱ // 0x1715 @0x1d
0x16f8…173b at001e = ╱49╱I╱ // 0x1716 @0x1e
0x16f8…173b at001f = ╱45╱E╱ // 0x1717 @0x1f
0x16f8…173b at0020 = ╱52╱R╱ // 0x1718 @0x20
0x16f8…173b at0021 = ╱ed╱(╱ // 0x1719 @0x21
0x16f8…173b at0022 = ╱4c╱L╱ // 0x171a @0x22
0x16f8…173b at0023 = ╱4e╱N╱ // 0x171b @0x23
0x16f8…173b at0024 = ╱52╱R╱ // 0x171c @0x24
0x16f8…173b at0025 = ╱ec╱,╱ // 0x171d @0x25
0x16f8…173b at0026 = ╱32╱2╱ // 0x171e @0x26
0x16f8…173b at0027 = ╱39╱9╱ // 0x171f @0x27
0x16f8…173b at0028 = ╱fe0000e805╱ // 0x1720 @0x28
0x16f8…173b at002d = ╱e3╱-╱ // 0x1725 @0x2d
0x16f8…173b at002e = ╱32╱2╱ // 0x1726 @0x2e
0x16f8…173b at002f = ╱fe00008002╱ // 0x1727 @0x2f
0x16f8…173b at0034 = ╱e4╱*╱ // 0x172c @0x34
0x16f8…173b at0035 = ╱ed╱(╱ // 0x172d @0x35
0x16f8…173b at0036 = ╱53╱S╱ // 0x172e @0x36
0x16f8…173b at0037 = ╱4b╱K╱ // 0x172f @0x37
0x16f8…173b at0038 = ╱52╱R╱ // 0x1730 @0x38
0x16f8…173b at0039 = ╱49╱I╱ // 0x1731 @0x39
0x16f8…173b at003a = ╱56╱V╱ // 0x1732 @0x3a
0x16f8…173b at003b = ╱31╱1╱ // 0x1733 @0x3b
0x16f8…173b at003c = ╱ee╱)╱ // 0x1734 @0x3c
0x16f8…173b at003d = ╱ec╱,╱ // 0x1735 @0x3d
0x16f8…173b at003e = ╱4c╱L╱ // 0x1736 @0x3e
0x16f8…173b at003f = ╱4e╱N╱ // 0x1737 @0x3f
0x16f8…173b at0040 = ╱52╱R╱ // 0x1738 @0x40
0x16f8…173b at0041 = ╱ee╱)╱ // 0x1739 @0x41
0x16f8…173b at0042 = EOL // 0x173a @0x42
0x16f8…173b }
0x173b…1741 a498 2660 ENDPROC
0x173b…1741 LineComalBin {
0x173b…1741 ptr = 0xa498 // 0x173b @0x0
0x173b…1741 lno = 0x0a64 // 0x173d @0x2
0x173b…1741 at0004 = ╱9f╱ ENDPROC ╱ // 0x173f @0x4
0x173b…1741 at0005 = EOL // 0x1740 @0x5
0x173b…1741 }
0x1741…174f a4a6 2670 PROC STARTBIL
0x1741…174f LineComalBin {
0x1741…174f ptr = 0xa4a6 // 0x1741 @0x0
0x1741…174f lno = 0x0a6e // 0x1743 @0x2
0x1741…174f at0004 = ╱9e╱ PROC ╱ // 0x1745 @0x4
0x1741…174f at0005 = ╱53╱S╱ // 0x1746 @0x5
0x1741…174f at0006 = ╱54╱T╱ // 0x1747 @0x6
0x1741…174f at0007 = ╱41╱A╱ // 0x1748 @0x7
0x1741…174f at0008 = ╱52╱R╱ // 0x1749 @0x8
0x1741…174f at0009 = ╱54╱T╱ // 0x174a @0x9
0x1741…174f at000a = ╱42╱B╱ // 0x174b @0xa
0x1741…174f at000b = ╱49╱I╱ // 0x174c @0xb
0x1741…174f at000c = ╱4c╱L╱ // 0x174d @0xc
0x1741…174f at000d = EOL // 0x174e @0xd
0x1741…174f }
0x174f…1755 a4ac 2680 REPEAT
0x174f…1755 LineComalBin {
0x174f…1755 ptr = 0xa4ac // 0x174f @0x0
0x174f…1755 lno = 0x0a78 // 0x1751 @0x2
0x174f…1755 at0004 = ╱97╱ REPEAT ╱ // 0x1753 @0x4
0x174f…1755 at0005 = EOL // 0x1754 @0x5
0x174f…1755 }
0x1755…175c a4b3 2690 OUTPUT T
0x1755…175c LineComalBin {
0x1755…175c ptr = 0xa4b3 // 0x1755 @0x0
0x1755…175c lno = 0x0a82 // 0x1757 @0x2
0x1755…175c at0004 = ╱a5╱ OUTPUT ╱ // 0x1759 @0x4
0x1755…175c at0005 = ╱54╱T╱ // 0x175a @0x5
0x1755…175c at0006 = EOL // 0x175b @0x6
0x1755…175c }
0x175c…1762 a4b9 2700 CLEAR
0x175c…1762 LineComalBin {
0x175c…1762 ptr = 0xa4b9 // 0x175c @0x0
0x175c…1762 lno = 0x0a8c // 0x175e @0x2
0x175c…1762 at0004 = ╱a0╱ CLEAR ╱ // 0x1760 @0x4
0x175c…1762 at0005 = EOL // 0x1761 @0x5
0x175c…1762 }
0x1762…177a a4d1 2710 EXEC OVERSKRIFT(0)
0x1762…177a LineComalBin {
0x1762…177a ptr = 0xa4d1 // 0x1762 @0x0
0x1762…177a lno = 0x0a96 // 0x1764 @0x2
0x1762…177a at0004 = ╱9d╱ EXEC ╱ // 0x1766 @0x4
0x1762…177a at0005 = ╱4f╱O╱ // 0x1767 @0x5
0x1762…177a at0006 = ╱56╱V╱ // 0x1768 @0x6
0x1762…177a at0007 = ╱45╱E╱ // 0x1769 @0x7
0x1762…177a at0008 = ╱52╱R╱ // 0x176a @0x8
0x1762…177a at0009 = ╱53╱S╱ // 0x176b @0x9
0x1762…177a at000a = ╱4b╱K╱ // 0x176c @0xa
0x1762…177a at000b = ╱52╱R╱ // 0x176d @0xb
0x1762…177a at000c = ╱49╱I╱ // 0x176e @0xc
0x1762…177a at000d = ╱46╱F╱ // 0x176f @0xd
0x1762…177a at000e = ╱54╱T╱ // 0x1770 @0xe
0x1762…177a at000f = ╱ed╱(╱ // 0x1771 @0xf
0x1762…177a at0010 = ╱30╱0╱ // 0x1772 @0x10
0x1762…177a at0011 = ╱fe00000000╱ // 0x1773 @0x11
0x1762…177a at0016 = ╱ee╱)╱ // 0x1778 @0x16
0x1762…177a at0017 = EOL // 0x1779 @0x17
0x1762…177a }
0x177a…1780 a4d7 2720 REPEAT
0x177a…1780 LineComalBin {
0x177a…1780 ptr = 0xa4d7 // 0x177a @0x0
0x177a…1780 lno = 0x0aa0 // 0x177c @0x2
0x177a…1780 at0004 = ╱97╱ REPEAT ╱ // 0x177e @0x4
0x177a…1780 at0005 = EOL // 0x177f @0x5
0x177a…1780 }
0x1780…17bd a514 2730 EXEC INDPUT1(4,3,-1,100000,LTX$(1))
0x1780…17bd LineComalBin {
0x1780…17bd ptr = 0xa514 // 0x1780 @0x0
0x1780…17bd lno = 0x0aaa // 0x1782 @0x2
0x1780…17bd at0004 = ╱9d╱ EXEC ╱ // 0x1784 @0x4
0x1780…17bd at0005 = ╱49╱I╱ // 0x1785 @0x5
0x1780…17bd at0006 = ╱4e╱N╱ // 0x1786 @0x6
0x1780…17bd at0007 = ╱44╱D╱ // 0x1787 @0x7
0x1780…17bd at0008 = ╱50╱P╱ // 0x1788 @0x8
0x1780…17bd at0009 = ╱55╱U╱ // 0x1789 @0x9
0x1780…17bd at000a = ╱54╱T╱ // 0x178a @0xa
0x1780…17bd at000b = ╱31╱1╱ // 0x178b @0xb
0x1780…17bd at000c = ╱ed╱(╱ // 0x178c @0xc
0x1780…17bd at000d = ╱34╱4╱ // 0x178d @0xd
0x1780…17bd at000e = ╱fe00008003╱ // 0x178e @0xe
0x1780…17bd at0013 = ╱ec╱,╱ // 0x1793 @0x13
0x1780…17bd at0014 = ╱33╱3╱ // 0x1794 @0x14
0x1780…17bd at0015 = ╱fe0000c002╱ // 0x1795 @0x15
0x1780…17bd at001a = ╱ec╱,╱ // 0x179a @0x1a
0x1780…17bd at001b = ╱e9╱-╱ // 0x179b @0x1b
0x1780…17bd at001c = ╱31╱1╱ // 0x179c @0x1c
0x1780…17bd at001d = ╱fe00008001╱ // 0x179d @0x1d
0x1780…17bd at0022 = ╱ec╱,╱ // 0x17a2 @0x22
0x1780…17bd at0023 = ╱31╱1╱ // 0x17a3 @0x23
0x1780…17bd at0024 = ╱30╱0╱ // 0x17a4 @0x24
0x1780…17bd at0025 = ╱30╱0╱ // 0x17a5 @0x25
0x1780…17bd at0026 = ╱30╱0╱ // 0x17a6 @0x26
0x1780…17bd at0027 = ╱30╱0╱ // 0x17a7 @0x27
0x1780…17bd at0028 = ╱30╱0╱ // 0x17a8 @0x28
0x1780…17bd at0029 = ╱fe0050c311╱ // 0x17a9 @0x29
0x1780…17bd at002e = ╱ec╱,╱ // 0x17ae @0x2e
0x1780…17bd at002f = ╱4c╱L╱ // 0x17af @0x2f
0x1780…17bd at0030 = ╱54╱T╱ // 0x17b0 @0x30
0x1780…17bd at0031 = ╱58╱X╱ // 0x17b1 @0x31
0x1780…17bd at0032 = ╱ef╱$╱ // 0x17b2 @0x32
0x1780…17bd at0033 = ╱ed╱(╱ // 0x17b3 @0x33
0x1780…17bd at0034 = ╱31╱1╱ // 0x17b4 @0x34
0x1780…17bd at0035 = ╱fe00008001╱ // 0x17b5 @0x35
0x1780…17bd at003a = ╱ee╱)╱ // 0x17ba @0x3a
0x1780…17bd at003b = ╱ee╱)╱ // 0x17bb @0x3b
0x1780…17bd at003c = EOL // 0x17bc @0x3c
0x1780…17bd }
0x17bd…17e2 a539 2740 UNTIL P=B OR (P>9999 AND P<100000)
0x17bd…17e2 LineComalBin {
0x17bd…17e2 ptr = 0xa539 // 0x17bd @0x0
0x17bd…17e2 lno = 0x0ab4 // 0x17bf @0x2
0x17bd…17e2 at0004 = ╱98╱ UNTIL ╱ // 0x17c1 @0x4
0x17bd…17e2 at0005 = ╱50╱P╱ // 0x17c2 @0x5
0x17bd…17e2 at0006 = ╱dc╱=╱ // 0x17c3 @0x6
0x17bd…17e2 at0007 = ╱42╱B╱ // 0x17c4 @0x7
0x17bd…17e2 at0008 = ╱db╱ OR ╱ // 0x17c5 @0x8
0x17bd…17e2 at0009 = ╱ed╱(╱ // 0x17c6 @0x9
0x17bd…17e2 at000a = ╱50╱P╱ // 0x17c7 @0xa
0x17bd…17e2 at000b = ╱de╱>╱ // 0x17c8 @0xb
0x17bd…17e2 at000c = ╱39╱9╱ // 0x17c9 @0xc
0x17bd…17e2 at000d = ╱39╱9╱ // 0x17ca @0xd
0x17bd…17e2 at000e = ╱39╱9╱ // 0x17cb @0xe
0x17bd…17e2 at000f = ╱39╱9╱ // 0x17cc @0xf
0x17bd…17e2 at0010 = ╱fe003c9c0e╱ // 0x17cd @0x10
0x17bd…17e2 at0015 = ╱da╱ AND ╱ // 0x17d2 @0x15
0x17bd…17e2 at0016 = ╱50╱P╱ // 0x17d3 @0x16
0x17bd…17e2 at0017 = ╱dd╱<╱ // 0x17d4 @0x17
0x17bd…17e2 at0018 = ╱31╱1╱ // 0x17d5 @0x18
0x17bd…17e2 at0019 = ╱30╱0╱ // 0x17d6 @0x19
0x17bd…17e2 at001a = ╱30╱0╱ // 0x17d7 @0x1a
0x17bd…17e2 at001b = ╱30╱0╱ // 0x17d8 @0x1b
0x17bd…17e2 at001c = ╱30╱0╱ // 0x17d9 @0x1c
0x17bd…17e2 at001d = ╱30╱0╱ // 0x17da @0x1d
0x17bd…17e2 at001e = ╱fe0050c311╱ // 0x17db @0x1e
0x17bd…17e2 at0023 = ╱ee╱)╱ // 0x17e0 @0x23
0x17bd…17e2 at0024 = EOL // 0x17e1 @0x24
0x17bd…17e2 }
0x17e2…17ff a556 2750 SUM$="0+";KONT=P;KTAL1=B
0x17e2…17ff LineComalBin {
0x17e2…17ff ptr = 0xa556 // 0x17e2 @0x0
0x17e2…17ff lno = 0x0abe // 0x17e4 @0x2
0x17e2…17ff at0004 = ╱53╱S╱ // 0x17e6 @0x4
0x17e2…17ff at0005 = ╱55╱U╱ // 0x17e7 @0x5
0x17e2…17ff at0006 = ╱4d╱M╱ // 0x17e8 @0x6
0x17e2…17ff at0007 = ╱ef╱$╱ // 0x17e9 @0x7
0x17e2…17ff at0008 = ╱dc╱=╱ // 0x17ea @0x8
0x17e2…17ff at0009 = ╱22╱"╱ // 0x17eb @0x9
0x17e2…17ff at000a = ╱30╱0╱ // 0x17ec @0xa
0x17e2…17ff at000b = ╱2b╱+╱ // 0x17ed @0xb
0x17e2…17ff at000c = ╱22╱"╱ // 0x17ee @0xc
0x17e2…17ff at000d = ╱eb╱;╱ // 0x17ef @0xd
0x17e2…17ff at000e = ╱4b╱K╱ // 0x17f0 @0xe
0x17e2…17ff at000f = ╱4f╱O╱ // 0x17f1 @0xf
0x17e2…17ff at0010 = ╱4e╱N╱ // 0x17f2 @0x10
0x17e2…17ff at0011 = ╱54╱T╱ // 0x17f3 @0x11
0x17e2…17ff at0012 = ╱dc╱=╱ // 0x17f4 @0x12
0x17e2…17ff at0013 = ╱50╱P╱ // 0x17f5 @0x13
0x17e2…17ff at0014 = ╱eb╱;╱ // 0x17f6 @0x14
0x17e2…17ff at0015 = ╱4b╱K╱ // 0x17f7 @0x15
0x17e2…17ff at0016 = ╱54╱T╱ // 0x17f8 @0x16
0x17e2…17ff at0017 = ╱41╱A╱ // 0x17f9 @0x17
0x17e2…17ff at0018 = ╱4c╱L╱ // 0x17fa @0x18
0x17e2…17ff at0019 = ╱31╱1╱ // 0x17fb @0x19
0x17e2…17ff at001a = ╱dc╱=╱ // 0x17fc @0x1a
0x17e2…17ff at001b = ╱42╱B╱ // 0x17fd @0x1b
0x17e2…17ff at001c = EOL // 0x17fe @0x1c
0x17e2…17ff }
0x17ff…180d a564 2760 IF KONT=B THEN EXIT
0x17ff…180d LineComalBin {
0x17ff…180d ptr = 0xa564 // 0x17ff @0x0
0x17ff…180d lno = 0x0ac8 // 0x1801 @0x2
0x17ff…180d at0004 = ╱82╱ IF ╱ // 0x1803 @0x4
0x17ff…180d at0005 = ╱4b╱K╱ // 0x1804 @0x5
0x17ff…180d at0006 = ╱4f╱O╱ // 0x1805 @0x6
0x17ff…180d at0007 = ╱4e╱N╱ // 0x1806 @0x7
0x17ff…180d at0008 = ╱54╱T╱ // 0x1807 @0x8
0x17ff…180d at0009 = ╱dc╱=╱ // 0x1808 @0x9
0x17ff…180d at000a = ╱42╱B╱ // 0x1809 @0xa
0x17ff…180d at000b = ╱b6╱ THEN ╱ // 0x180a @0xb
0x17ff…180d at000c = ╱99╱ EXIT ╱ // 0x180b @0xc
0x17ff…180d at000d = EOL // 0x180c @0xd
0x17ff…180d }
0x180d…1841 a598 2770 IF KTAL=DTAL AND DTAL*10000+MKGR<KONT THEN KTAL1=DTAL
0x180d…1841 LineComalBin {
0x180d…1841 ptr = 0xa598 // 0x180d @0x0
0x180d…1841 lno = 0x0ad2 // 0x180f @0x2
0x180d…1841 at0004 = ╱82╱ IF ╱ // 0x1811 @0x4
0x180d…1841 at0005 = ╱4b╱K╱ // 0x1812 @0x5
0x180d…1841 at0006 = ╱54╱T╱ // 0x1813 @0x6
0x180d…1841 at0007 = ╱41╱A╱ // 0x1814 @0x7
0x180d…1841 at0008 = ╱4c╱L╱ // 0x1815 @0x8
0x180d…1841 at0009 = ╱dc╱=╱ // 0x1816 @0x9
0x180d…1841 at000a = ╱44╱D╱ // 0x1817 @0xa
0x180d…1841 at000b = ╱54╱T╱ // 0x1818 @0xb
0x180d…1841 at000c = ╱41╱A╱ // 0x1819 @0xc
0x180d…1841 at000d = ╱4c╱L╱ // 0x181a @0xd
0x180d…1841 at000e = ╱da╱ AND ╱ // 0x181b @0xe
0x180d…1841 at000f = ╱44╱D╱ // 0x181c @0xf
0x180d…1841 at0010 = ╱54╱T╱ // 0x181d @0x10
0x180d…1841 at0011 = ╱41╱A╱ // 0x181e @0x11
0x180d…1841 at0012 = ╱4c╱L╱ // 0x181f @0x12
0x180d…1841 at0013 = ╱e4╱*╱ // 0x1820 @0x13
0x180d…1841 at0014 = ╱31╱1╱ // 0x1821 @0x14
0x180d…1841 at0015 = ╱30╱0╱ // 0x1822 @0x15
0x180d…1841 at0016 = ╱30╱0╱ // 0x1823 @0x16
0x180d…1841 at0017 = ╱30╱0╱ // 0x1824 @0x17
0x180d…1841 at0018 = ╱30╱0╱ // 0x1825 @0x18
0x180d…1841 at0019 = ╱fe00409c0e╱ // 0x1826 @0x19
0x180d…1841 at001e = ╱e2╱+╱ // 0x182b @0x1e
0x180d…1841 at001f = ╱4d╱M╱ // 0x182c @0x1f
0x180d…1841 at0020 = ╱4b╱K╱ // 0x182d @0x20
0x180d…1841 at0021 = ╱47╱G╱ // 0x182e @0x21
0x180d…1841 at0022 = ╱52╱R╱ // 0x182f @0x22
0x180d…1841 at0023 = ╱dd╱<╱ // 0x1830 @0x23
0x180d…1841 at0024 = ╱4b╱K╱ // 0x1831 @0x24
0x180d…1841 at0025 = ╱4f╱O╱ // 0x1832 @0x25
0x180d…1841 at0026 = ╱4e╱N╱ // 0x1833 @0x26
0x180d…1841 at0027 = ╱54╱T╱ // 0x1834 @0x27
0x180d…1841 at0028 = ╱b6╱ THEN ╱ // 0x1835 @0x28
0x180d…1841 at0029 = ╱4b╱K╱ // 0x1836 @0x29
0x180d…1841 at002a = ╱54╱T╱ // 0x1837 @0x2a
0x180d…1841 at002b = ╱41╱A╱ // 0x1838 @0x2b
0x180d…1841 at002c = ╱4c╱L╱ // 0x1839 @0x2c
0x180d…1841 at002d = ╱31╱1╱ // 0x183a @0x2d
0x180d…1841 at002e = ╱dc╱=╱ // 0x183b @0x2e
0x180d…1841 at002f = ╱44╱D╱ // 0x183c @0x2f
0x180d…1841 at0030 = ╱54╱T╱ // 0x183d @0x30
0x180d…1841 at0031 = ╱41╱A╱ // 0x183e @0x31
0x180d…1841 at0032 = ╱4c╱L╱ // 0x183f @0x32
0x180d…1841 at0033 = EOL // 0x1840 @0x33
0x180d…1841 }
0x1841…1878 a5cf 2780 IF KTAL=KRTAL AND KRTAL*1000+MKRGR<KONT THEN KTAL1=KRTAL
0x1841…1878 LineComalBin {
0x1841…1878 ptr = 0xa5cf // 0x1841 @0x0
0x1841…1878 lno = 0x0adc // 0x1843 @0x2
0x1841…1878 at0004 = ╱82╱ IF ╱ // 0x1845 @0x4
0x1841…1878 at0005 = ╱4b╱K╱ // 0x1846 @0x5
0x1841…1878 at0006 = ╱54╱T╱ // 0x1847 @0x6
0x1841…1878 at0007 = ╱41╱A╱ // 0x1848 @0x7
0x1841…1878 at0008 = ╱4c╱L╱ // 0x1849 @0x8
0x1841…1878 at0009 = ╱dc╱=╱ // 0x184a @0x9
0x1841…1878 at000a = ╱4b╱K╱ // 0x184b @0xa
0x1841…1878 at000b = ╱52╱R╱ // 0x184c @0xb
0x1841…1878 at000c = ╱54╱T╱ // 0x184d @0xc
0x1841…1878 at000d = ╱41╱A╱ // 0x184e @0xd
0x1841…1878 at000e = ╱4c╱L╱ // 0x184f @0xe
0x1841…1878 at000f = ╱da╱ AND ╱ // 0x1850 @0xf
0x1841…1878 at0010 = ╱4b╱K╱ // 0x1851 @0x10
0x1841…1878 at0011 = ╱52╱R╱ // 0x1852 @0x11
0x1841…1878 at0012 = ╱54╱T╱ // 0x1853 @0x12
0x1841…1878 at0013 = ╱41╱A╱ // 0x1854 @0x13
0x1841…1878 at0014 = ╱4c╱L╱ // 0x1855 @0x14
0x1841…1878 at0015 = ╱e4╱*╱ // 0x1856 @0x15
0x1841…1878 at0016 = ╱31╱1╱ // 0x1857 @0x16
0x1841…1878 at0017 = ╱30╱0╱ // 0x1858 @0x17
0x1841…1878 at0018 = ╱30╱0╱ // 0x1859 @0x18
0x1841…1878 at0019 = ╱30╱0╱ // 0x185a @0x19
0x1841…1878 at001a = ╱fe0000fa0a╱ // 0x185b @0x1a
0x1841…1878 at001f = ╱e2╱+╱ // 0x1860 @0x1f
0x1841…1878 at0020 = ╱4d╱M╱ // 0x1861 @0x20
0x1841…1878 at0021 = ╱4b╱K╱ // 0x1862 @0x21
0x1841…1878 at0022 = ╱52╱R╱ // 0x1863 @0x22
0x1841…1878 at0023 = ╱47╱G╱ // 0x1864 @0x23
0x1841…1878 at0024 = ╱52╱R╱ // 0x1865 @0x24
0x1841…1878 at0025 = ╱dd╱<╱ // 0x1866 @0x25
0x1841…1878 at0026 = ╱4b╱K╱ // 0x1867 @0x26
0x1841…1878 at0027 = ╱4f╱O╱ // 0x1868 @0x27
0x1841…1878 at0028 = ╱4e╱N╱ // 0x1869 @0x28
0x1841…1878 at0029 = ╱54╱T╱ // 0x186a @0x29
0x1841…1878 at002a = ╱b6╱ THEN ╱ // 0x186b @0x2a
0x1841…1878 at002b = ╱4b╱K╱ // 0x186c @0x2b
0x1841…1878 at002c = ╱54╱T╱ // 0x186d @0x2c
0x1841…1878 at002d = ╱41╱A╱ // 0x186e @0x2d
0x1841…1878 at002e = ╱4c╱L╱ // 0x186f @0x2e
0x1841…1878 at002f = ╱31╱1╱ // 0x1870 @0x2f
0x1841…1878 at0030 = ╱dc╱=╱ // 0x1871 @0x30
0x1841…1878 at0031 = ╱4b╱K╱ // 0x1872 @0x31
0x1841…1878 at0032 = ╱52╱R╱ // 0x1873 @0x32
0x1841…1878 at0033 = ╱54╱T╱ // 0x1874 @0x33
0x1841…1878 at0034 = ╱41╱A╱ // 0x1875 @0x34
0x1841…1878 at0035 = ╱4c╱L╱ // 0x1876 @0x35
0x1841…1878 at0036 = EOL // 0x1877 @0x36
0x1841…1878 }
0x1878…1886 a5dd 2790 CURSOR W,5
0x1878…1886 LineComalBin {
0x1878…1886 ptr = 0xa5dd // 0x1878 @0x0
0x1878…1886 lno = 0x0ae6 // 0x187a @0x2
0x1878…1886 at0004 = ╱a1╱ CURSOR ╱ // 0x187c @0x4
0x1878…1886 at0005 = ╱57╱W╱ // 0x187d @0x5
0x1878…1886 at0006 = ╱ec╱,╱ // 0x187e @0x6
0x1878…1886 at0007 = ╱35╱5╱ // 0x187f @0x7
0x1878…1886 at0008 = ╱fe0000a003╱ // 0x1880 @0x8
0x1878…1886 at000d = EOL // 0x1885 @0xd
0x1878…1886 }
0x1886…1893 a5ea 2800 CASE KTAL1 OF
0x1886…1893 LineComalBin {
0x1886…1893 ptr = 0xa5ea // 0x1886 @0x0
0x1886…1893 lno = 0x0af0 // 0x1888 @0x2
0x1886…1893 at0004 = ╱a201╱ CASE ╱ // 0x188a @0x4
0x1886…1893 at0006 = ╱4b╱K╱ // 0x188c @0x6
0x1886…1893 at0007 = ╱54╱T╱ // 0x188d @0x7
0x1886…1893 at0008 = ╱41╱A╱ // 0x188e @0x8
0x1886…1893 at0009 = ╱4c╱L╱ // 0x188f @0x9
0x1886…1893 at000a = ╱31╱1╱ // 0x1890 @0xa
0x1886…1893 at000b = ╱ba╱ OF ╱ // 0x1891 @0xb
0x1886…1893 at000c = EOL // 0x1892 @0xc
0x1886…1893 }
0x1893…18c5 a61c 2810 EXEC FINDPOST1(FTAB1,FTAB,MFANTAL,KONT,FPIL3,K2$)
0x1893…18c5 LineComalBin {
0x1893…18c5 ptr = 0xa61c // 0x1893 @0x0
0x1893…18c5 lno = 0x0afa // 0x1895 @0x2
0x1893…18c5 at0004 = ╱9d╱ EXEC ╱ // 0x1897 @0x4
0x1893…18c5 at0005 = ╱46╱F╱ // 0x1898 @0x5
0x1893…18c5 at0006 = ╱49╱I╱ // 0x1899 @0x6
0x1893…18c5 at0007 = ╱4e╱N╱ // 0x189a @0x7
0x1893…18c5 at0008 = ╱44╱D╱ // 0x189b @0x8
0x1893…18c5 at0009 = ╱50╱P╱ // 0x189c @0x9
0x1893…18c5 at000a = ╱4f╱O╱ // 0x189d @0xa
0x1893…18c5 at000b = ╱53╱S╱ // 0x189e @0xb
0x1893…18c5 at000c = ╱54╱T╱ // 0x189f @0xc
0x1893…18c5 at000d = ╱31╱1╱ // 0x18a0 @0xd
0x1893…18c5 at000e = ╱ed╱(╱ // 0x18a1 @0xe
0x1893…18c5 at000f = ╱46╱F╱ // 0x18a2 @0xf
0x1893…18c5 at0010 = ╱54╱T╱ // 0x18a3 @0x10
0x1893…18c5 at0011 = ╱41╱A╱ // 0x18a4 @0x11
0x1893…18c5 at0012 = ╱42╱B╱ // 0x18a5 @0x12
0x1893…18c5 at0013 = ╱31╱1╱ // 0x18a6 @0x13
0x1893…18c5 at0014 = ╱ec╱,╱ // 0x18a7 @0x14
0x1893…18c5 at0015 = ╱46╱F╱ // 0x18a8 @0x15
0x1893…18c5 at0016 = ╱54╱T╱ // 0x18a9 @0x16
0x1893…18c5 at0017 = ╱41╱A╱ // 0x18aa @0x17
0x1893…18c5 at0018 = ╱42╱B╱ // 0x18ab @0x18
0x1893…18c5 at0019 = ╱ec╱,╱ // 0x18ac @0x19
0x1893…18c5 at001a = ╱4d╱M╱ // 0x18ad @0x1a
0x1893…18c5 at001b = ╱46╱F╱ // 0x18ae @0x1b
0x1893…18c5 at001c = ╱41╱A╱ // 0x18af @0x1c
0x1893…18c5 at001d = ╱4e╱N╱ // 0x18b0 @0x1d
0x1893…18c5 at001e = ╱54╱T╱ // 0x18b1 @0x1e
0x1893…18c5 at001f = ╱41╱A╱ // 0x18b2 @0x1f
0x1893…18c5 at0020 = ╱4c╱L╱ // 0x18b3 @0x20
0x1893…18c5 at0021 = ╱ec╱,╱ // 0x18b4 @0x21
0x1893…18c5 at0022 = ╱4b╱K╱ // 0x18b5 @0x22
0x1893…18c5 at0023 = ╱4f╱O╱ // 0x18b6 @0x23
0x1893…18c5 at0024 = ╱4e╱N╱ // 0x18b7 @0x24
0x1893…18c5 at0025 = ╱54╱T╱ // 0x18b8 @0x25
0x1893…18c5 at0026 = ╱ec╱,╱ // 0x18b9 @0x26
0x1893…18c5 at0027 = ╱46╱F╱ // 0x18ba @0x27
0x1893…18c5 at0028 = ╱50╱P╱ // 0x18bb @0x28
0x1893…18c5 at0029 = ╱49╱I╱ // 0x18bc @0x29
0x1893…18c5 at002a = ╱4c╱L╱ // 0x18bd @0x2a
0x1893…18c5 at002b = ╱33╱3╱ // 0x18be @0x2b
0x1893…18c5 at002c = ╱ec╱,╱ // 0x18bf @0x2c
0x1893…18c5 at002d = ╱4b╱K╱ // 0x18c0 @0x2d
0x1893…18c5 at002e = ╱32╱2╱ // 0x18c1 @0x2e
0x1893…18c5 at002f = ╱ef╱$╱ // 0x18c2 @0x2f
0x1893…18c5 at0030 = ╱ee╱)╱ // 0x18c3 @0x30
0x1893…18c5 at0031 = EOL // 0x18c4 @0x31
0x1893…18c5 }
0x18c5…18d2 a629 2820 IF CEKS=B THEN
0x18c5…18d2 LineComalBin {
0x18c5…18d2 ptr = 0xa629 // 0x18c5 @0x0
0x18c5…18d2 lno = 0x0b04 // 0x18c7 @0x2
0x18c5…18d2 at0004 = ╱9c╱ IF ╱ // 0x18c9 @0x4
0x18c5…18d2 at0005 = ╱43╱C╱ // 0x18ca @0x5
0x18c5…18d2 at0006 = ╱45╱E╱ // 0x18cb @0x6
0x18c5…18d2 at0007 = ╱4b╱K╱ // 0x18cc @0x7
0x18c5…18d2 at0008 = ╱53╱S╱ // 0x18cd @0x8
0x18c5…18d2 at0009 = ╱dc╱=╱ // 0x18ce @0x9
0x18c5…18d2 at000a = ╱42╱B╱ // 0x18cf @0xa
0x18c5…18d2 at000b = ╱b6╱ THEN ╱ // 0x18d0 @0xb
0x18c5…18d2 at000c = EOL // 0x18d1 @0xc
0x18c5…18d2 }
0x18d2…18e0 a637 2830 EXEC HENTPOST
0x18d2…18e0 LineComalBin {
0x18d2…18e0 ptr = 0xa637 // 0x18d2 @0x0
0x18d2…18e0 lno = 0x0b0e // 0x18d4 @0x2
0x18d2…18e0 at0004 = ╱9d╱ EXEC ╱ // 0x18d6 @0x4
0x18d2…18e0 at0005 = ╱48╱H╱ // 0x18d7 @0x5
0x18d2…18e0 at0006 = ╱45╱E╱ // 0x18d8 @0x6
0x18d2…18e0 at0007 = ╱4e╱N╱ // 0x18d9 @0x7
0x18d2…18e0 at0008 = ╱54╱T╱ // 0x18da @0x8
0x18d2…18e0 at0009 = ╱50╱P╱ // 0x18db @0x9
0x18d2…18e0 at000a = ╱4f╱O╱ // 0x18dc @0xa
0x18d2…18e0 at000b = ╱53╱S╱ // 0x18dd @0xb
0x18d2…18e0 at000c = ╱54╱T╱ // 0x18de @0xc
0x18d2…18e0 at000d = EOL // 0x18df @0xd
0x18d2…18e0 }
0x18e0…18fb a652 2840 IF ORD(FUKODE$)-48=B THEN
0x18e0…18fb LineComalBin {
0x18e0…18fb ptr = 0xa652 // 0x18e0 @0x0
0x18e0…18fb lno = 0x0b18 // 0x18e2 @0x2
0x18e0…18fb at0004 = ╱9c╱ IF ╱ // 0x18e4 @0x4
0x18e0…18fb at0005 = ╱cd╱ORD╱ // 0x18e5 @0x5
0x18e0…18fb at0006 = ╱ed╱(╱ // 0x18e6 @0x6
0x18e0…18fb at0007 = ╱46╱F╱ // 0x18e7 @0x7
0x18e0…18fb at0008 = ╱55╱U╱ // 0x18e8 @0x8
0x18e0…18fb at0009 = ╱4b╱K╱ // 0x18e9 @0x9
0x18e0…18fb at000a = ╱4f╱O╱ // 0x18ea @0xa
0x18e0…18fb at000b = ╱44╱D╱ // 0x18eb @0xb
0x18e0…18fb at000c = ╱45╱E╱ // 0x18ec @0xc
0x18e0…18fb at000d = ╱ef╱$╱ // 0x18ed @0xd
0x18e0…18fb at000e = ╱ee╱)╱ // 0x18ee @0xe
0x18e0…18fb at000f = ╱e3╱-╱ // 0x18ef @0xf
0x18e0…18fb at0010 = ╱34╱4╱ // 0x18f0 @0x10
0x18e0…18fb at0011 = ╱38╱8╱ // 0x18f1 @0x11
0x18e0…18fb at0012 = ╱fe0000c006╱ // 0x18f2 @0x12
0x18e0…18fb at0017 = ╱dc╱=╱ // 0x18f7 @0x17
0x18e0…18fb at0018 = ╱42╱B╱ // 0x18f8 @0x18
0x18e0…18fb at0019 = ╱b6╱ THEN ╱ // 0x18f9 @0x19
0x18e0…18fb at001a = EOL // 0x18fa @0x1a
0x18e0…18fb }
0x18fb…190b a662 2850 PRINT FNAVN$;" "
0x18fb…190b LineComalBin {
0x18fb…190b ptr = 0xa662 // 0x18fb @0x0
0x18fb…190b lno = 0x0b22 // 0x18fd @0x2
0x18fb…190b at0004 = ╱92╱ PRINT ╱ // 0x18ff @0x4
0x18fb…190b at0005 = ╱46╱F╱ // 0x1900 @0x5
0x18fb…190b at0006 = ╱4e╱N╱ // 0x1901 @0x6
0x18fb…190b at0007 = ╱41╱A╱ // 0x1902 @0x7
0x18fb…190b at0008 = ╱56╱V╱ // 0x1903 @0x8
0x18fb…190b at0009 = ╱4e╱N╱ // 0x1904 @0x9
0x18fb…190b at000a = ╱ef╱$╱ // 0x1905 @0xa
0x18fb…190b at000b = ╱eb╱;╱ // 0x1906 @0xb
0x18fb…190b at000c = ╱22╱"╱ // 0x1907 @0xc
0x18fb…190b at000d = ╱20╱…╱ // 0x1908 @0xd
0x18fb…190b at000e = ╱22╱"╱ // 0x1909 @0xe
0x18fb…190b at000f = EOL // 0x190a @0xf
0x18fb…190b }
0x190b…1911 a668 2860 ELSE
0x190b…1911 LineComalBin {
0x190b…1911 ptr = 0xa668 // 0x190b @0x0
0x190b…1911 lno = 0x0b2c // 0x190d @0x2
0x190b…1911 at0004 = ╱9a╱ ELSE ╱ // 0x190f @0x4
0x190b…1911 at0005 = EOL // 0x1910 @0x5
0x190b…1911 }
0x1911…191c a673 2870 CEKS=E
0x1911…191c LineComalBin {
0x1911…191c ptr = 0xa673 // 0x1911 @0x0
0x1911…191c lno = 0x0b36 // 0x1913 @0x2
0x1911…191c at0004 = ╱43╱C╱ // 0x1915 @0x4
0x1911…191c at0005 = ╱45╱E╱ // 0x1916 @0x5
0x1911…191c at0006 = ╱4b╱K╱ // 0x1917 @0x6
0x1911…191c at0007 = ╱53╱S╱ // 0x1918 @0x7
0x1911…191c at0008 = ╱dc╱=╱ // 0x1919 @0x8
0x1911…191c at0009 = ╱45╱E╱ // 0x191a @0x9
0x1911…191c at000a = EOL // 0x191b @0xa
0x1911…191c }
0x191c…1922 a679 2880 ENDIF
0x191c…1922 LineComalBin {
0x191c…1922 ptr = 0xa679 // 0x191c @0x0
0x191c…1922 lno = 0x0b40 // 0x191e @0x2
0x191c…1922 at0004 = ╱9b╱ ENDIF ╱ // 0x1920 @0x4
0x191c…1922 at0005 = EOL // 0x1921 @0x5
0x191c…1922 }
0x1922…1928 a67f 2890 ENDIF
0x1922…1928 LineComalBin {
0x1922…1928 ptr = 0xa67f // 0x1922 @0x0
0x1922…1928 lno = 0x0b4a // 0x1924 @0x2
0x1922…1928 at0004 = ╱9b╱ ENDIF ╱ // 0x1926 @0x4
0x1922…1928 at0005 = EOL // 0x1927 @0x5
0x1922…1928 }
0x1928…1933 a68a 2900 WHEN DTAL
0x1928…1933 LineComalBin {
0x1928…1933 ptr = 0xa68a // 0x1928 @0x0
0x1928…1933 lno = 0x0b54 // 0x192a @0x2
0x1928…1933 at0004 = ╱a301╱ WHEN ╱ // 0x192c @0x4
0x1928…1933 at0006 = ╱44╱D╱ // 0x192e @0x6
0x1928…1933 at0007 = ╱54╱T╱ // 0x192f @0x7
0x1928…1933 at0008 = ╱41╱A╱ // 0x1930 @0x8
0x1928…1933 at0009 = ╱4c╱L╱ // 0x1931 @0x9
0x1928…1933 at000a = EOL // 0x1932 @0xa
0x1928…1933 }
0x1933…1965 a6bc 2910 EXEC FINDPOST1(DTAB1,DTAB,MDANTAL,KONT,DPIL3,K3$)
0x1933…1965 LineComalBin {
0x1933…1965 ptr = 0xa6bc // 0x1933 @0x0
0x1933…1965 lno = 0x0b5e // 0x1935 @0x2
0x1933…1965 at0004 = ╱9d╱ EXEC ╱ // 0x1937 @0x4
0x1933…1965 at0005 = ╱46╱F╱ // 0x1938 @0x5
0x1933…1965 at0006 = ╱49╱I╱ // 0x1939 @0x6
0x1933…1965 at0007 = ╱4e╱N╱ // 0x193a @0x7
0x1933…1965 at0008 = ╱44╱D╱ // 0x193b @0x8
0x1933…1965 at0009 = ╱50╱P╱ // 0x193c @0x9
0x1933…1965 at000a = ╱4f╱O╱ // 0x193d @0xa
0x1933…1965 at000b = ╱53╱S╱ // 0x193e @0xb
0x1933…1965 at000c = ╱54╱T╱ // 0x193f @0xc
0x1933…1965 at000d = ╱31╱1╱ // 0x1940 @0xd
0x1933…1965 at000e = ╱ed╱(╱ // 0x1941 @0xe
0x1933…1965 at000f = ╱44╱D╱ // 0x1942 @0xf
0x1933…1965 at0010 = ╱54╱T╱ // 0x1943 @0x10
0x1933…1965 at0011 = ╱41╱A╱ // 0x1944 @0x11
0x1933…1965 at0012 = ╱42╱B╱ // 0x1945 @0x12
0x1933…1965 at0013 = ╱31╱1╱ // 0x1946 @0x13
0x1933…1965 at0014 = ╱ec╱,╱ // 0x1947 @0x14
0x1933…1965 at0015 = ╱44╱D╱ // 0x1948 @0x15
0x1933…1965 at0016 = ╱54╱T╱ // 0x1949 @0x16
0x1933…1965 at0017 = ╱41╱A╱ // 0x194a @0x17
0x1933…1965 at0018 = ╱42╱B╱ // 0x194b @0x18
0x1933…1965 at0019 = ╱ec╱,╱ // 0x194c @0x19
0x1933…1965 at001a = ╱4d╱M╱ // 0x194d @0x1a
0x1933…1965 at001b = ╱44╱D╱ // 0x194e @0x1b
0x1933…1965 at001c = ╱41╱A╱ // 0x194f @0x1c
0x1933…1965 at001d = ╱4e╱N╱ // 0x1950 @0x1d
0x1933…1965 at001e = ╱54╱T╱ // 0x1951 @0x1e
0x1933…1965 at001f = ╱41╱A╱ // 0x1952 @0x1f
0x1933…1965 at0020 = ╱4c╱L╱ // 0x1953 @0x20
0x1933…1965 at0021 = ╱ec╱,╱ // 0x1954 @0x21
0x1933…1965 at0022 = ╱4b╱K╱ // 0x1955 @0x22
0x1933…1965 at0023 = ╱4f╱O╱ // 0x1956 @0x23
0x1933…1965 at0024 = ╱4e╱N╱ // 0x1957 @0x24
0x1933…1965 at0025 = ╱54╱T╱ // 0x1958 @0x25
0x1933…1965 at0026 = ╱ec╱,╱ // 0x1959 @0x26
0x1933…1965 at0027 = ╱44╱D╱ // 0x195a @0x27
0x1933…1965 at0028 = ╱50╱P╱ // 0x195b @0x28
0x1933…1965 at0029 = ╱49╱I╱ // 0x195c @0x29
0x1933…1965 at002a = ╱4c╱L╱ // 0x195d @0x2a
0x1933…1965 at002b = ╱33╱3╱ // 0x195e @0x2b
0x1933…1965 at002c = ╱ec╱,╱ // 0x195f @0x2c
0x1933…1965 at002d = ╱4b╱K╱ // 0x1960 @0x2d
0x1933…1965 at002e = ╱33╱3╱ // 0x1961 @0x2e
0x1933…1965 at002f = ╱ef╱$╱ // 0x1962 @0x2f
0x1933…1965 at0030 = ╱ee╱)╱ // 0x1963 @0x30
0x1933…1965 at0031 = EOL // 0x1964 @0x31
0x1933…1965 }
0x1965…1972 a6c9 2920 IF CEKS=B THEN
0x1965…1972 LineComalBin {
0x1965…1972 ptr = 0xa6c9 // 0x1965 @0x0
0x1965…1972 lno = 0x0b68 // 0x1967 @0x2
0x1965…1972 at0004 = ╱9c╱ IF ╱ // 0x1969 @0x4
0x1965…1972 at0005 = ╱43╱C╱ // 0x196a @0x5
0x1965…1972 at0006 = ╱45╱E╱ // 0x196b @0x6
0x1965…1972 at0007 = ╱4b╱K╱ // 0x196c @0x7
0x1965…1972 at0008 = ╱53╱S╱ // 0x196d @0x8
0x1965…1972 at0009 = ╱dc╱=╱ // 0x196e @0x9
0x1965…1972 at000a = ╱42╱B╱ // 0x196f @0xa
0x1965…1972 at000b = ╱b6╱ THEN ╱ // 0x1970 @0xb
0x1965…1972 at000c = EOL // 0x1971 @0xc
0x1965…1972 }
0x1972…1981 a6d8 2930 EXEC HENTDPOST
0x1972…1981 LineComalBin {
0x1972…1981 ptr = 0xa6d8 // 0x1972 @0x0
0x1972…1981 lno = 0x0b72 // 0x1974 @0x2
0x1972…1981 at0004 = ╱9d╱ EXEC ╱ // 0x1976 @0x4
0x1972…1981 at0005 = ╱48╱H╱ // 0x1977 @0x5
0x1972…1981 at0006 = ╱45╱E╱ // 0x1978 @0x6
0x1972…1981 at0007 = ╱4e╱N╱ // 0x1979 @0x7
0x1972…1981 at0008 = ╱54╱T╱ // 0x197a @0x8
0x1972…1981 at0009 = ╱44╱D╱ // 0x197b @0x9
0x1972…1981 at000a = ╱50╱P╱ // 0x197c @0xa
0x1972…1981 at000b = ╱4f╱O╱ // 0x197d @0xb
0x1972…1981 at000c = ╱53╱S╱ // 0x197e @0xc
0x1972…1981 at000d = ╱54╱T╱ // 0x197f @0xd
0x1972…1981 at000e = EOL // 0x1980 @0xe
0x1972…1981 }
0x1981…19b7 a70e 2940 EXEC NAVN2(DEBNAVN$,DEBGADE$,DEBPOSTNR,DEBBY$,DEBLK$)
0x1981…19b7 LineComalBin {
0x1981…19b7 ptr = 0xa70e // 0x1981 @0x0
0x1981…19b7 lno = 0x0b7c // 0x1983 @0x2
0x1981…19b7 at0004 = ╱9d╱ EXEC ╱ // 0x1985 @0x4
0x1981…19b7 at0005 = ╱4e╱N╱ // 0x1986 @0x5
0x1981…19b7 at0006 = ╱41╱A╱ // 0x1987 @0x6
0x1981…19b7 at0007 = ╱56╱V╱ // 0x1988 @0x7
0x1981…19b7 at0008 = ╱4e╱N╱ // 0x1989 @0x8
0x1981…19b7 at0009 = ╱32╱2╱ // 0x198a @0x9
0x1981…19b7 at000a = ╱ed╱(╱ // 0x198b @0xa
0x1981…19b7 at000b = ╱44╱D╱ // 0x198c @0xb
0x1981…19b7 at000c = ╱45╱E╱ // 0x198d @0xc
0x1981…19b7 at000d = ╱42╱B╱ // 0x198e @0xd
0x1981…19b7 at000e = ╱4e╱N╱ // 0x198f @0xe
0x1981…19b7 at000f = ╱41╱A╱ // 0x1990 @0xf
0x1981…19b7 at0010 = ╱56╱V╱ // 0x1991 @0x10
0x1981…19b7 at0011 = ╱4e╱N╱ // 0x1992 @0x11
0x1981…19b7 at0012 = ╱ef╱$╱ // 0x1993 @0x12
0x1981…19b7 at0013 = ╱ec╱,╱ // 0x1994 @0x13
0x1981…19b7 at0014 = ╱44╱D╱ // 0x1995 @0x14
0x1981…19b7 at0015 = ╱45╱E╱ // 0x1996 @0x15
0x1981…19b7 at0016 = ╱42╱B╱ // 0x1997 @0x16
0x1981…19b7 at0017 = ╱47╱G╱ // 0x1998 @0x17
0x1981…19b7 at0018 = ╱41╱A╱ // 0x1999 @0x18
0x1981…19b7 at0019 = ╱44╱D╱ // 0x199a @0x19
0x1981…19b7 at001a = ╱45╱E╱ // 0x199b @0x1a
0x1981…19b7 at001b = ╱ef╱$╱ // 0x199c @0x1b
0x1981…19b7 at001c = ╱ec╱,╱ // 0x199d @0x1c
0x1981…19b7 at001d = ╱44╱D╱ // 0x199e @0x1d
0x1981…19b7 at001e = ╱45╱E╱ // 0x199f @0x1e
0x1981…19b7 at001f = ╱42╱B╱ // 0x19a0 @0x1f
0x1981…19b7 at0020 = ╱50╱P╱ // 0x19a1 @0x20
0x1981…19b7 at0021 = ╱4f╱O╱ // 0x19a2 @0x21
0x1981…19b7 at0022 = ╱53╱S╱ // 0x19a3 @0x22
0x1981…19b7 at0023 = ╱54╱T╱ // 0x19a4 @0x23
0x1981…19b7 at0024 = ╱4e╱N╱ // 0x19a5 @0x24
0x1981…19b7 at0025 = ╱52╱R╱ // 0x19a6 @0x25
0x1981…19b7 at0026 = ╱ec╱,╱ // 0x19a7 @0x26
0x1981…19b7 at0027 = ╱44╱D╱ // 0x19a8 @0x27
0x1981…19b7 at0028 = ╱45╱E╱ // 0x19a9 @0x28
0x1981…19b7 at0029 = ╱42╱B╱ // 0x19aa @0x29
0x1981…19b7 at002a = ╱42╱B╱ // 0x19ab @0x2a
0x1981…19b7 at002b = ╱59╱Y╱ // 0x19ac @0x2b
0x1981…19b7 at002c = ╱ef╱$╱ // 0x19ad @0x2c
0x1981…19b7 at002d = ╱ec╱,╱ // 0x19ae @0x2d
0x1981…19b7 at002e = ╱44╱D╱ // 0x19af @0x2e
0x1981…19b7 at002f = ╱45╱E╱ // 0x19b0 @0x2f
0x1981…19b7 at0030 = ╱42╱B╱ // 0x19b1 @0x30
0x1981…19b7 at0031 = ╱4c╱L╱ // 0x19b2 @0x31
0x1981…19b7 at0032 = ╱4b╱K╱ // 0x19b3 @0x32
0x1981…19b7 at0033 = ╱ef╱$╱ // 0x19b4 @0x33
0x1981…19b7 at0034 = ╱ee╱)╱ // 0x19b5 @0x34
0x1981…19b7 at0035 = EOL // 0x19b6 @0x35
0x1981…19b7 }
0x19b7…19bd a714 2950 ENDIF
0x19b7…19bd LineComalBin {
0x19b7…19bd ptr = 0xa714 // 0x19b7 @0x0
0x19b7…19bd lno = 0x0b86 // 0x19b9 @0x2
0x19b7…19bd at0004 = ╱9b╱ ENDIF ╱ // 0x19bb @0x4
0x19b7…19bd at0005 = EOL // 0x19bc @0x5
0x19b7…19bd }
0x19bd…19c9 a720 2960 WHEN KRTAL
0x19bd…19c9 LineComalBin {
0x19bd…19c9 ptr = 0xa720 // 0x19bd @0x0
0x19bd…19c9 lno = 0x0b90 // 0x19bf @0x2
0x19bd…19c9 at0004 = ╱a301╱ WHEN ╱ // 0x19c1 @0x4
0x19bd…19c9 at0006 = ╱4b╱K╱ // 0x19c3 @0x6
0x19bd…19c9 at0007 = ╱52╱R╱ // 0x19c4 @0x7
0x19bd…19c9 at0008 = ╱54╱T╱ // 0x19c5 @0x8
0x19bd…19c9 at0009 = ╱41╱A╱ // 0x19c6 @0x9
0x19bd…19c9 at000a = ╱4c╱L╱ // 0x19c7 @0xa
0x19bd…19c9 at000b = EOL // 0x19c8 @0xb
0x19bd…19c9 }
0x19c9…19fb a752 2970 EXEC FINDPOST1(KTAB1,KTAB,MKANTAL,KONT,KPIL3,K4$)
0x19c9…19fb LineComalBin {
0x19c9…19fb ptr = 0xa752 // 0x19c9 @0x0
0x19c9…19fb lno = 0x0b9a // 0x19cb @0x2
0x19c9…19fb at0004 = ╱9d╱ EXEC ╱ // 0x19cd @0x4
0x19c9…19fb at0005 = ╱46╱F╱ // 0x19ce @0x5
0x19c9…19fb at0006 = ╱49╱I╱ // 0x19cf @0x6
0x19c9…19fb at0007 = ╱4e╱N╱ // 0x19d0 @0x7
0x19c9…19fb at0008 = ╱44╱D╱ // 0x19d1 @0x8
0x19c9…19fb at0009 = ╱50╱P╱ // 0x19d2 @0x9
0x19c9…19fb at000a = ╱4f╱O╱ // 0x19d3 @0xa
0x19c9…19fb at000b = ╱53╱S╱ // 0x19d4 @0xb
0x19c9…19fb at000c = ╱54╱T╱ // 0x19d5 @0xc
0x19c9…19fb at000d = ╱31╱1╱ // 0x19d6 @0xd
0x19c9…19fb at000e = ╱ed╱(╱ // 0x19d7 @0xe
0x19c9…19fb at000f = ╱4b╱K╱ // 0x19d8 @0xf
0x19c9…19fb at0010 = ╱54╱T╱ // 0x19d9 @0x10
0x19c9…19fb at0011 = ╱41╱A╱ // 0x19da @0x11
0x19c9…19fb at0012 = ╱42╱B╱ // 0x19db @0x12
0x19c9…19fb at0013 = ╱31╱1╱ // 0x19dc @0x13
0x19c9…19fb at0014 = ╱ec╱,╱ // 0x19dd @0x14
0x19c9…19fb at0015 = ╱4b╱K╱ // 0x19de @0x15
0x19c9…19fb at0016 = ╱54╱T╱ // 0x19df @0x16
0x19c9…19fb at0017 = ╱41╱A╱ // 0x19e0 @0x17
0x19c9…19fb at0018 = ╱42╱B╱ // 0x19e1 @0x18
0x19c9…19fb at0019 = ╱ec╱,╱ // 0x19e2 @0x19
0x19c9…19fb at001a = ╱4d╱M╱ // 0x19e3 @0x1a
0x19c9…19fb at001b = ╱4b╱K╱ // 0x19e4 @0x1b
0x19c9…19fb at001c = ╱41╱A╱ // 0x19e5 @0x1c
0x19c9…19fb at001d = ╱4e╱N╱ // 0x19e6 @0x1d
0x19c9…19fb at001e = ╱54╱T╱ // 0x19e7 @0x1e
0x19c9…19fb at001f = ╱41╱A╱ // 0x19e8 @0x1f
0x19c9…19fb at0020 = ╱4c╱L╱ // 0x19e9 @0x20
0x19c9…19fb at0021 = ╱ec╱,╱ // 0x19ea @0x21
0x19c9…19fb at0022 = ╱4b╱K╱ // 0x19eb @0x22
0x19c9…19fb at0023 = ╱4f╱O╱ // 0x19ec @0x23
0x19c9…19fb at0024 = ╱4e╱N╱ // 0x19ed @0x24
0x19c9…19fb at0025 = ╱54╱T╱ // 0x19ee @0x25
0x19c9…19fb at0026 = ╱ec╱,╱ // 0x19ef @0x26
0x19c9…19fb at0027 = ╱4b╱K╱ // 0x19f0 @0x27
0x19c9…19fb at0028 = ╱50╱P╱ // 0x19f1 @0x28
0x19c9…19fb at0029 = ╱49╱I╱ // 0x19f2 @0x29
0x19c9…19fb at002a = ╱4c╱L╱ // 0x19f3 @0x2a
0x19c9…19fb at002b = ╱33╱3╱ // 0x19f4 @0x2b
0x19c9…19fb at002c = ╱ec╱,╱ // 0x19f5 @0x2c
0x19c9…19fb at002d = ╱4b╱K╱ // 0x19f6 @0x2d
0x19c9…19fb at002e = ╱34╱4╱ // 0x19f7 @0x2e
0x19c9…19fb at002f = ╱ef╱$╱ // 0x19f8 @0x2f
0x19c9…19fb at0030 = ╱ee╱)╱ // 0x19f9 @0x30
0x19c9…19fb at0031 = EOL // 0x19fa @0x31
0x19c9…19fb }
0x19fb…1a08 a75f 2980 IF CEKS=B THEN
0x19fb…1a08 LineComalBin {
0x19fb…1a08 ptr = 0xa75f // 0x19fb @0x0
0x19fb…1a08 lno = 0x0ba4 // 0x19fd @0x2
0x19fb…1a08 at0004 = ╱9c╱ IF ╱ // 0x19ff @0x4
0x19fb…1a08 at0005 = ╱43╱C╱ // 0x1a00 @0x5
0x19fb…1a08 at0006 = ╱45╱E╱ // 0x1a01 @0x6
0x19fb…1a08 at0007 = ╱4b╱K╱ // 0x1a02 @0x7
0x19fb…1a08 at0008 = ╱53╱S╱ // 0x1a03 @0x8
0x19fb…1a08 at0009 = ╱dc╱=╱ // 0x1a04 @0x9
0x19fb…1a08 at000a = ╱42╱B╱ // 0x1a05 @0xa
0x19fb…1a08 at000b = ╱b6╱ THEN ╱ // 0x1a06 @0xb
0x19fb…1a08 at000c = EOL // 0x1a07 @0xc
0x19fb…1a08 }
0x1a08…1a17 a76e 2990 EXEC HENTKPOST
0x1a08…1a17 LineComalBin {
0x1a08…1a17 ptr = 0xa76e // 0x1a08 @0x0
0x1a08…1a17 lno = 0x0bae // 0x1a0a @0x2
0x1a08…1a17 at0004 = ╱9d╱ EXEC ╱ // 0x1a0c @0x4
0x1a08…1a17 at0005 = ╱48╱H╱ // 0x1a0d @0x5
0x1a08…1a17 at0006 = ╱45╱E╱ // 0x1a0e @0x6
0x1a08…1a17 at0007 = ╱4e╱N╱ // 0x1a0f @0x7
0x1a08…1a17 at0008 = ╱54╱T╱ // 0x1a10 @0x8
0x1a08…1a17 at0009 = ╱4b╱K╱ // 0x1a11 @0x9
0x1a08…1a17 at000a = ╱50╱P╱ // 0x1a12 @0xa
0x1a08…1a17 at000b = ╱4f╱O╱ // 0x1a13 @0xb
0x1a08…1a17 at000c = ╱53╱S╱ // 0x1a14 @0xc
0x1a08…1a17 at000d = ╱54╱T╱ // 0x1a15 @0xd
0x1a08…1a17 at000e = EOL // 0x1a16 @0xe
0x1a08…1a17 }
0x1a17…1a4d a7a4 3000 EXEC NAVN2(KRENAVN$,KREGADE$,KREPOSTNR,KREBY$,KRELK$)
0x1a17…1a4d LineComalBin {
0x1a17…1a4d ptr = 0xa7a4 // 0x1a17 @0x0
0x1a17…1a4d lno = 0x0bb8 // 0x1a19 @0x2
0x1a17…1a4d at0004 = ╱9d╱ EXEC ╱ // 0x1a1b @0x4
0x1a17…1a4d at0005 = ╱4e╱N╱ // 0x1a1c @0x5
0x1a17…1a4d at0006 = ╱41╱A╱ // 0x1a1d @0x6
0x1a17…1a4d at0007 = ╱56╱V╱ // 0x1a1e @0x7
0x1a17…1a4d at0008 = ╱4e╱N╱ // 0x1a1f @0x8
0x1a17…1a4d at0009 = ╱32╱2╱ // 0x1a20 @0x9
0x1a17…1a4d at000a = ╱ed╱(╱ // 0x1a21 @0xa
0x1a17…1a4d at000b = ╱4b╱K╱ // 0x1a22 @0xb
0x1a17…1a4d at000c = ╱52╱R╱ // 0x1a23 @0xc
0x1a17…1a4d at000d = ╱45╱E╱ // 0x1a24 @0xd
0x1a17…1a4d at000e = ╱4e╱N╱ // 0x1a25 @0xe
0x1a17…1a4d at000f = ╱41╱A╱ // 0x1a26 @0xf
0x1a17…1a4d at0010 = ╱56╱V╱ // 0x1a27 @0x10
0x1a17…1a4d at0011 = ╱4e╱N╱ // 0x1a28 @0x11
0x1a17…1a4d at0012 = ╱ef╱$╱ // 0x1a29 @0x12
0x1a17…1a4d at0013 = ╱ec╱,╱ // 0x1a2a @0x13
0x1a17…1a4d at0014 = ╱4b╱K╱ // 0x1a2b @0x14
0x1a17…1a4d at0015 = ╱52╱R╱ // 0x1a2c @0x15
0x1a17…1a4d at0016 = ╱45╱E╱ // 0x1a2d @0x16
0x1a17…1a4d at0017 = ╱47╱G╱ // 0x1a2e @0x17
0x1a17…1a4d at0018 = ╱41╱A╱ // 0x1a2f @0x18
0x1a17…1a4d at0019 = ╱44╱D╱ // 0x1a30 @0x19
0x1a17…1a4d at001a = ╱45╱E╱ // 0x1a31 @0x1a
0x1a17…1a4d at001b = ╱ef╱$╱ // 0x1a32 @0x1b
0x1a17…1a4d at001c = ╱ec╱,╱ // 0x1a33 @0x1c
0x1a17…1a4d at001d = ╱4b╱K╱ // 0x1a34 @0x1d
0x1a17…1a4d at001e = ╱52╱R╱ // 0x1a35 @0x1e
0x1a17…1a4d at001f = ╱45╱E╱ // 0x1a36 @0x1f
0x1a17…1a4d at0020 = ╱50╱P╱ // 0x1a37 @0x20
0x1a17…1a4d at0021 = ╱4f╱O╱ // 0x1a38 @0x21
0x1a17…1a4d at0022 = ╱53╱S╱ // 0x1a39 @0x22
0x1a17…1a4d at0023 = ╱54╱T╱ // 0x1a3a @0x23
0x1a17…1a4d at0024 = ╱4e╱N╱ // 0x1a3b @0x24
0x1a17…1a4d at0025 = ╱52╱R╱ // 0x1a3c @0x25
0x1a17…1a4d at0026 = ╱ec╱,╱ // 0x1a3d @0x26
0x1a17…1a4d at0027 = ╱4b╱K╱ // 0x1a3e @0x27
0x1a17…1a4d at0028 = ╱52╱R╱ // 0x1a3f @0x28
0x1a17…1a4d at0029 = ╱45╱E╱ // 0x1a40 @0x29
0x1a17…1a4d at002a = ╱42╱B╱ // 0x1a41 @0x2a
0x1a17…1a4d at002b = ╱59╱Y╱ // 0x1a42 @0x2b
0x1a17…1a4d at002c = ╱ef╱$╱ // 0x1a43 @0x2c
0x1a17…1a4d at002d = ╱ec╱,╱ // 0x1a44 @0x2d
0x1a17…1a4d at002e = ╱4b╱K╱ // 0x1a45 @0x2e
0x1a17…1a4d at002f = ╱52╱R╱ // 0x1a46 @0x2f
0x1a17…1a4d at0030 = ╱45╱E╱ // 0x1a47 @0x30
0x1a17…1a4d at0031 = ╱4c╱L╱ // 0x1a48 @0x31
0x1a17…1a4d at0032 = ╱4b╱K╱ // 0x1a49 @0x32
0x1a17…1a4d at0033 = ╱ef╱$╱ // 0x1a4a @0x33
0x1a17…1a4d at0034 = ╱ee╱)╱ // 0x1a4b @0x34
0x1a17…1a4d at0035 = EOL // 0x1a4c @0x35
0x1a17…1a4d }
0x1a4d…1a53 a7aa 3010 ENDIF
0x1a4d…1a53 LineComalBin {
0x1a4d…1a53 ptr = 0xa7aa // 0x1a4d @0x0
0x1a4d…1a53 lno = 0x0bc2 // 0x1a4f @0x2
0x1a4d…1a53 at0004 = ╱9b╱ ENDIF ╱ // 0x1a51 @0x4
0x1a4d…1a53 at0005 = EOL // 0x1a52 @0x5
0x1a4d…1a53 }
0x1a53…1a59 a7b0 3020 ENDCASE
0x1a53…1a59 LineComalBin {
0x1a53…1a59 ptr = 0xa7b0 // 0x1a53 @0x0
0x1a53…1a59 lno = 0x0bcc // 0x1a55 @0x2
0x1a53…1a59 at0004 = ╱a4╱ ENDCASE ╱ // 0x1a57 @0x4
0x1a53…1a59 at0005 = EOL // 0x1a58 @0x5
0x1a53…1a59 }
0x1a59…1a9b a7f2 3030 IF CEKS=B THEN EXEC INDPUT1(4,12,-9,-6,LTX$(2))
0x1a59…1a9b LineComalBin {
0x1a59…1a9b ptr = 0xa7f2 // 0x1a59 @0x0
0x1a59…1a9b lno = 0x0bd6 // 0x1a5b @0x2
0x1a59…1a9b at0004 = ╱82╱ IF ╱ // 0x1a5d @0x4
0x1a59…1a9b at0005 = ╱43╱C╱ // 0x1a5e @0x5
0x1a59…1a9b at0006 = ╱45╱E╱ // 0x1a5f @0x6
0x1a59…1a9b at0007 = ╱4b╱K╱ // 0x1a60 @0x7
0x1a59…1a9b at0008 = ╱53╱S╱ // 0x1a61 @0x8
0x1a59…1a9b at0009 = ╱dc╱=╱ // 0x1a62 @0x9
0x1a59…1a9b at000a = ╱42╱B╱ // 0x1a63 @0xa
0x1a59…1a9b at000b = ╱b6╱ THEN ╱ // 0x1a64 @0xb
0x1a59…1a9b at000c = ╱9d╱ EXEC ╱ // 0x1a65 @0xc
0x1a59…1a9b at000d = ╱49╱I╱ // 0x1a66 @0xd
0x1a59…1a9b at000e = ╱4e╱N╱ // 0x1a67 @0xe
0x1a59…1a9b at000f = ╱44╱D╱ // 0x1a68 @0xf
0x1a59…1a9b at0010 = ╱50╱P╱ // 0x1a69 @0x10
0x1a59…1a9b at0011 = ╱55╱U╱ // 0x1a6a @0x11
0x1a59…1a9b at0012 = ╱54╱T╱ // 0x1a6b @0x12
0x1a59…1a9b at0013 = ╱31╱1╱ // 0x1a6c @0x13
0x1a59…1a9b at0014 = ╱ed╱(╱ // 0x1a6d @0x14
0x1a59…1a9b at0015 = ╱34╱4╱ // 0x1a6e @0x15
0x1a59…1a9b at0016 = ╱fe00008003╱ // 0x1a6f @0x16
0x1a59…1a9b at001b = ╱ec╱,╱ // 0x1a74 @0x1b
0x1a59…1a9b at001c = ╱31╱1╱ // 0x1a75 @0x1c
0x1a59…1a9b at001d = ╱32╱2╱ // 0x1a76 @0x1d
0x1a59…1a9b at001e = ╱fe0000c004╱ // 0x1a77 @0x1e
0x1a59…1a9b at0023 = ╱ec╱,╱ // 0x1a7c @0x23
0x1a59…1a9b at0024 = ╱e9╱-╱ // 0x1a7d @0x24
0x1a59…1a9b at0025 = ╱39╱9╱ // 0x1a7e @0x25
0x1a59…1a9b at0026 = ╱fe00009004╱ // 0x1a7f @0x26
0x1a59…1a9b at002b = ╱ec╱,╱ // 0x1a84 @0x2b
0x1a59…1a9b at002c = ╱e9╱-╱ // 0x1a85 @0x2c
0x1a59…1a9b at002d = ╱36╱6╱ // 0x1a86 @0x2d
0x1a59…1a9b at002e = ╱fe0000c003╱ // 0x1a87 @0x2e
0x1a59…1a9b at0033 = ╱ec╱,╱ // 0x1a8c @0x33
0x1a59…1a9b at0034 = ╱4c╱L╱ // 0x1a8d @0x34
0x1a59…1a9b at0035 = ╱54╱T╱ // 0x1a8e @0x35
0x1a59…1a9b at0036 = ╱58╱X╱ // 0x1a8f @0x36
0x1a59…1a9b at0037 = ╱ef╱$╱ // 0x1a90 @0x37
0x1a59…1a9b at0038 = ╱ed╱(╱ // 0x1a91 @0x38
0x1a59…1a9b at0039 = ╱32╱2╱ // 0x1a92 @0x39
0x1a59…1a9b at003a = ╱fe00008002╱ // 0x1a93 @0x3a
0x1a59…1a9b at003f = ╱ee╱)╱ // 0x1a98 @0x3f
0x1a59…1a9b at0040 = ╱ee╱)╱ // 0x1a99 @0x40
0x1a59…1a9b at0041 = EOL // 0x1a9a @0x41
0x1a59…1a9b }
0x1a9b…1adb a832 3040 IF CEKS=E THEN EXEC INDPUT1(9,5,-2,0,LTX$(3))
0x1a9b…1adb LineComalBin {
0x1a9b…1adb ptr = 0xa832 // 0x1a9b @0x0
0x1a9b…1adb lno = 0x0be0 // 0x1a9d @0x2
0x1a9b…1adb at0004 = ╱82╱ IF ╱ // 0x1a9f @0x4
0x1a9b…1adb at0005 = ╱43╱C╱ // 0x1aa0 @0x5
0x1a9b…1adb at0006 = ╱45╱E╱ // 0x1aa1 @0x6
0x1a9b…1adb at0007 = ╱4b╱K╱ // 0x1aa2 @0x7
0x1a9b…1adb at0008 = ╱53╱S╱ // 0x1aa3 @0x8
0x1a9b…1adb at0009 = ╱dc╱=╱ // 0x1aa4 @0x9
0x1a9b…1adb at000a = ╱45╱E╱ // 0x1aa5 @0xa
0x1a9b…1adb at000b = ╱b6╱ THEN ╱ // 0x1aa6 @0xb
0x1a9b…1adb at000c = ╱9d╱ EXEC ╱ // 0x1aa7 @0xc
0x1a9b…1adb at000d = ╱49╱I╱ // 0x1aa8 @0xd
0x1a9b…1adb at000e = ╱4e╱N╱ // 0x1aa9 @0xe
0x1a9b…1adb at000f = ╱44╱D╱ // 0x1aaa @0xf
0x1a9b…1adb at0010 = ╱50╱P╱ // 0x1aab @0x10
0x1a9b…1adb at0011 = ╱55╱U╱ // 0x1aac @0x11
0x1a9b…1adb at0012 = ╱54╱T╱ // 0x1aad @0x12
0x1a9b…1adb at0013 = ╱31╱1╱ // 0x1aae @0x13
0x1a9b…1adb at0014 = ╱ed╱(╱ // 0x1aaf @0x14
0x1a9b…1adb at0015 = ╱39╱9╱ // 0x1ab0 @0x15
0x1a9b…1adb at0016 = ╱fe00009004╱ // 0x1ab1 @0x16
0x1a9b…1adb at001b = ╱ec╱,╱ // 0x1ab6 @0x1b
0x1a9b…1adb at001c = ╱35╱5╱ // 0x1ab7 @0x1c
0x1a9b…1adb at001d = ╱fe0000a003╱ // 0x1ab8 @0x1d
0x1a9b…1adb at0022 = ╱ec╱,╱ // 0x1abd @0x22
0x1a9b…1adb at0023 = ╱e9╱-╱ // 0x1abe @0x23
0x1a9b…1adb at0024 = ╱32╱2╱ // 0x1abf @0x24
0x1a9b…1adb at0025 = ╱fe00008002╱ // 0x1ac0 @0x25
0x1a9b…1adb at002a = ╱ec╱,╱ // 0x1ac5 @0x2a
0x1a9b…1adb at002b = ╱30╱0╱ // 0x1ac6 @0x2b
0x1a9b…1adb at002c = ╱fe00000000╱ // 0x1ac7 @0x2c
0x1a9b…1adb at0031 = ╱ec╱,╱ // 0x1acc @0x31
0x1a9b…1adb at0032 = ╱4c╱L╱ // 0x1acd @0x32
0x1a9b…1adb at0033 = ╱54╱T╱ // 0x1ace @0x33
0x1a9b…1adb at0034 = ╱58╱X╱ // 0x1acf @0x34
0x1a9b…1adb at0035 = ╱ef╱$╱ // 0x1ad0 @0x35
0x1a9b…1adb at0036 = ╱ed╱(╱ // 0x1ad1 @0x36
0x1a9b…1adb at0037 = ╱33╱3╱ // 0x1ad2 @0x37
0x1a9b…1adb at0038 = ╱fe0000c002╱ // 0x1ad3 @0x38
0x1a9b…1adb at003d = ╱ee╱)╱ // 0x1ad8 @0x3d
0x1a9b…1adb at003e = ╱ee╱)╱ // 0x1ad9 @0x3e
0x1a9b…1adb at003f = EOL // 0x1ada @0x3f
0x1a9b…1adb }
0x1adb…1af1 a848 3050 UNTIL P=-7 OR KONT=B
0x1adb…1af1 LineComalBin {
0x1adb…1af1 ptr = 0xa848 // 0x1adb @0x0
0x1adb…1af1 lno = 0x0bea // 0x1add @0x2
0x1adb…1af1 at0004 = ╱98╱ UNTIL ╱ // 0x1adf @0x4
0x1adb…1af1 at0005 = ╱50╱P╱ // 0x1ae0 @0x5
0x1adb…1af1 at0006 = ╱dc╱=╱ // 0x1ae1 @0x6
0x1adb…1af1 at0007 = ╱e9╱-╱ // 0x1ae2 @0x7
0x1adb…1af1 at0008 = ╱37╱7╱ // 0x1ae3 @0x8
0x1adb…1af1 at0009 = ╱fe0000e003╱ // 0x1ae4 @0x9
0x1adb…1af1 at000e = ╱db╱ OR ╱ // 0x1ae9 @0xe
0x1adb…1af1 at000f = ╱4b╱K╱ // 0x1aea @0xf
0x1adb…1af1 at0010 = ╱4f╱O╱ // 0x1aeb @0x10
0x1adb…1af1 at0011 = ╱4e╱N╱ // 0x1aec @0x11
0x1adb…1af1 at0012 = ╱54╱T╱ // 0x1aed @0x12
0x1adb…1af1 at0013 = ╱dc╱=╱ // 0x1aee @0x13
0x1adb…1af1 at0014 = ╱42╱B╱ // 0x1aef @0x14
0x1adb…1af1 at0015 = EOL // 0x1af0 @0x15
0x1adb…1af1 }
0x1af1…1af7 a84e 3060 ENDPROC
0x1af1…1af7 LineComalBin {
0x1af1…1af7 ptr = 0xa84e // 0x1af1 @0x0
0x1af1…1af7 lno = 0x0bf4 // 0x1af3 @0x2
0x1af1…1af7 at0004 = ╱9f╱ ENDPROC ╱ // 0x1af5 @0x4
0x1af1…1af7 at0005 = EOL // 0x1af6 @0x5
0x1af1…1af7 }
0x1af7…1b05 a85c 3070 PROC HUDSKRIV
0x1af7…1b05 LineComalBin {
0x1af7…1b05 ptr = 0xa85c // 0x1af7 @0x0
0x1af7…1b05 lno = 0x0bfe // 0x1af9 @0x2
0x1af7…1b05 at0004 = ╱9e╱ PROC ╱ // 0x1afb @0x4
0x1af7…1b05 at0005 = ╱48╱H╱ // 0x1afc @0x5
0x1af7…1b05 at0006 = ╱55╱U╱ // 0x1afd @0x6
0x1af7…1b05 at0007 = ╱44╱D╱ // 0x1afe @0x7
0x1af7…1b05 at0008 = ╱53╱S╱ // 0x1aff @0x8
0x1af7…1b05 at0009 = ╱4b╱K╱ // 0x1b00 @0x9
0x1af7…1b05 at000a = ╱52╱R╱ // 0x1b01 @0xa
0x1af7…1b05 at000b = ╱49╱I╱ // 0x1b02 @0xb
0x1af7…1b05 at000c = ╱56╱V╱ // 0x1b03 @0xc
0x1af7…1b05 at000d = EOL // 0x1b04 @0xd
0x1af7…1b05 }
0x1b05…1b0e a865 3080 PRINT " "
0x1b05…1b0e LineComalBin {
0x1b05…1b0e ptr = 0xa865 // 0x1b05 @0x0
0x1b05…1b0e lno = 0x0c08 // 0x1b07 @0x2
0x1b05…1b0e at0004 = ╱92╱ PRINT ╱ // 0x1b09 @0x4
0x1b05…1b0e at0005 = ╱22╱"╱ // 0x1b0a @0x5
0x1b05…1b0e at0006 = ╱20╱…╱ // 0x1b0b @0x6
0x1b05…1b0e at0007 = ╱22╱"╱ // 0x1b0c @0x7
0x1b05…1b0e at0008 = EOL // 0x1b0d @0x8
0x1b05…1b0e }
0x1b0e…1b30 a887 3090 IF SKRIV1=B THEN PRINT TAB(65);DV$;" "
0x1b0e…1b30 LineComalBin {
0x1b0e…1b30 ptr = 0xa887 // 0x1b0e @0x0
0x1b0e…1b30 lno = 0x0c12 // 0x1b10 @0x2
0x1b0e…1b30 at0004 = ╱82╱ IF ╱ // 0x1b12 @0x4
0x1b0e…1b30 at0005 = ╱53╱S╱ // 0x1b13 @0x5
0x1b0e…1b30 at0006 = ╱4b╱K╱ // 0x1b14 @0x6
0x1b0e…1b30 at0007 = ╱52╱R╱ // 0x1b15 @0x7
0x1b0e…1b30 at0008 = ╱49╱I╱ // 0x1b16 @0x8
0x1b0e…1b30 at0009 = ╱56╱V╱ // 0x1b17 @0x9
0x1b0e…1b30 at000a = ╱31╱1╱ // 0x1b18 @0xa
0x1b0e…1b30 at000b = ╱dc╱=╱ // 0x1b19 @0xb
0x1b0e…1b30 at000c = ╱42╱B╱ // 0x1b1a @0xc
0x1b0e…1b30 at000d = ╱b6╱ THEN ╱ // 0x1b1b @0xd
0x1b0e…1b30 at000e = ╱92╱ PRINT ╱ // 0x1b1c @0xe
0x1b0e…1b30 at000f = ╱d2╱TAB╱ // 0x1b1d @0xf
0x1b0e…1b30 at0010 = ╱ed╱(╱ // 0x1b1e @0x10
0x1b0e…1b30 at0011 = ╱36╱6╱ // 0x1b1f @0x11
0x1b0e…1b30 at0012 = ╱35╱5╱ // 0x1b20 @0x12
0x1b0e…1b30 at0013 = ╱fe00008207╱ // 0x1b21 @0x13
0x1b0e…1b30 at0018 = ╱ee╱)╱ // 0x1b26 @0x18
0x1b0e…1b30 at0019 = ╱eb╱;╱ // 0x1b27 @0x19
0x1b0e…1b30 at001a = ╱44╱D╱ // 0x1b28 @0x1a
0x1b0e…1b30 at001b = ╱56╱V╱ // 0x1b29 @0x1b
0x1b0e…1b30 at001c = ╱ef╱$╱ // 0x1b2a @0x1c
0x1b0e…1b30 at001d = ╱eb╱;╱ // 0x1b2b @0x1d
0x1b0e…1b30 at001e = ╱22╱"╱ // 0x1b2c @0x1e
0x1b0e…1b30 at001f = ╱20╱…╱ // 0x1b2d @0x1f
0x1b0e…1b30 at0020 = ╱22╱"╱ // 0x1b2e @0x20
0x1b0e…1b30 at0021 = EOL // 0x1b2f @0x21
0x1b0e…1b30 }
0x1b30…1b3d a894 3100 CASE KTAL1 OF
0x1b30…1b3d LineComalBin {
0x1b30…1b3d ptr = 0xa894 // 0x1b30 @0x0
0x1b30…1b3d lno = 0x0c1c // 0x1b32 @0x2
0x1b30…1b3d at0004 = ╱a201╱ CASE ╱ // 0x1b34 @0x4
0x1b30…1b3d at0006 = ╱4b╱K╱ // 0x1b36 @0x6
0x1b30…1b3d at0007 = ╱54╱T╱ // 0x1b37 @0x7
0x1b30…1b3d at0008 = ╱41╱A╱ // 0x1b38 @0x8
0x1b30…1b3d at0009 = ╱4c╱L╱ // 0x1b39 @0x9
0x1b30…1b3d at000a = ╱31╱1╱ // 0x1b3a @0xa
0x1b30…1b3d at000b = ╱ba╱ OF ╱ // 0x1b3b @0xb
0x1b30…1b3d at000c = EOL // 0x1b3c @0xc
0x1b30…1b3d }
0x1b3d…1b62 a8b9 3110 PRINT TAB(D);CHR(M);FNAVN$;" ";CHR(15)
0x1b3d…1b62 LineComalBin {
0x1b3d…1b62 ptr = 0xa8b9 // 0x1b3d @0x0
0x1b3d…1b62 lno = 0x0c26 // 0x1b3f @0x2
0x1b3d…1b62 at0004 = ╱92╱ PRINT ╱ // 0x1b41 @0x4
0x1b3d…1b62 at0005 = ╱d2╱TAB╱ // 0x1b42 @0x5
0x1b3d…1b62 at0006 = ╱ed╱(╱ // 0x1b43 @0x6
0x1b3d…1b62 at0007 = ╱44╱D╱ // 0x1b44 @0x7
0x1b3d…1b62 at0008 = ╱ee╱)╱ // 0x1b45 @0x8
0x1b3d…1b62 at0009 = ╱eb╱;╱ // 0x1b46 @0x9
0x1b3d…1b62 at000a = ╱cf╱CHR╱ // 0x1b47 @0xa
0x1b3d…1b62 at000b = ╱ed╱(╱ // 0x1b48 @0xb
0x1b3d…1b62 at000c = ╱4d╱M╱ // 0x1b49 @0xc
0x1b3d…1b62 at000d = ╱ee╱)╱ // 0x1b4a @0xd
0x1b3d…1b62 at000e = ╱eb╱;╱ // 0x1b4b @0xe
0x1b3d…1b62 at000f = ╱46╱F╱ // 0x1b4c @0xf
0x1b3d…1b62 at0010 = ╱4e╱N╱ // 0x1b4d @0x10
0x1b3d…1b62 at0011 = ╱41╱A╱ // 0x1b4e @0x11
0x1b3d…1b62 at0012 = ╱56╱V╱ // 0x1b4f @0x12
0x1b3d…1b62 at0013 = ╱4e╱N╱ // 0x1b50 @0x13
0x1b3d…1b62 at0014 = ╱ef╱$╱ // 0x1b51 @0x14
0x1b3d…1b62 at0015 = ╱eb╱;╱ // 0x1b52 @0x15
0x1b3d…1b62 at0016 = ╱22╱"╱ // 0x1b53 @0x16
0x1b3d…1b62 at0017 = ╱20╱…╱ // 0x1b54 @0x17
0x1b3d…1b62 at0018 = ╱22╱"╱ // 0x1b55 @0x18
0x1b3d…1b62 at0019 = ╱eb╱;╱ // 0x1b56 @0x19
0x1b3d…1b62 at001a = ╱cf╱CHR╱ // 0x1b57 @0x1a
0x1b3d…1b62 at001b = ╱ed╱(╱ // 0x1b58 @0x1b
0x1b3d…1b62 at001c = ╱31╱1╱ // 0x1b59 @0x1c
0x1b3d…1b62 at001d = ╱35╱5╱ // 0x1b5a @0x1d
0x1b3d…1b62 at001e = ╱fe0000f004╱ // 0x1b5b @0x1e
0x1b3d…1b62 at0023 = ╱ee╱)╱ // 0x1b60 @0x23
0x1b3d…1b62 at0024 = EOL // 0x1b61 @0x24
0x1b3d…1b62 }
0x1b62…1b7f a8d6 3120 EXEC LINIER(1,3,I)
0x1b62…1b7f LineComalBin {
0x1b62…1b7f ptr = 0xa8d6 // 0x1b62 @0x0
0x1b62…1b7f lno = 0x0c30 // 0x1b64 @0x2
0x1b62…1b7f at0004 = ╱9d╱ EXEC ╱ // 0x1b66 @0x4
0x1b62…1b7f at0005 = ╱4c╱L╱ // 0x1b67 @0x5
0x1b62…1b7f at0006 = ╱49╱I╱ // 0x1b68 @0x6
0x1b62…1b7f at0007 = ╱4e╱N╱ // 0x1b69 @0x7
0x1b62…1b7f at0008 = ╱49╱I╱ // 0x1b6a @0x8
0x1b62…1b7f at0009 = ╱45╱E╱ // 0x1b6b @0x9
0x1b62…1b7f at000a = ╱52╱R╱ // 0x1b6c @0xa
0x1b62…1b7f at000b = ╱ed╱(╱ // 0x1b6d @0xb
0x1b62…1b7f at000c = ╱31╱1╱ // 0x1b6e @0xc
0x1b62…1b7f at000d = ╱fe00008001╱ // 0x1b6f @0xd
0x1b62…1b7f at0012 = ╱ec╱,╱ // 0x1b74 @0x12
0x1b62…1b7f at0013 = ╱33╱3╱ // 0x1b75 @0x13
0x1b62…1b7f at0014 = ╱fe0000c002╱ // 0x1b76 @0x14
0x1b62…1b7f at0019 = ╱ec╱,╱ // 0x1b7b @0x19
0x1b62…1b7f at001a = ╱49╱I╱ // 0x1b7c @0x1a
0x1b62…1b7f at001b = ╱ee╱)╱ // 0x1b7d @0x1b
0x1b62…1b7f at001c = EOL // 0x1b7e @0x1c
0x1b62…1b7f }
0x1b7f…1b8a a8e1 3130 WHEN DTAL
0x1b7f…1b8a LineComalBin {
0x1b7f…1b8a ptr = 0xa8e1 // 0x1b7f @0x0
0x1b7f…1b8a lno = 0x0c3a // 0x1b81 @0x2
0x1b7f…1b8a at0004 = ╱a301╱ WHEN ╱ // 0x1b83 @0x4
0x1b7f…1b8a at0006 = ╱44╱D╱ // 0x1b85 @0x6
0x1b7f…1b8a at0007 = ╱54╱T╱ // 0x1b86 @0x7
0x1b7f…1b8a at0008 = ╱41╱A╱ // 0x1b87 @0x8
0x1b7f…1b8a at0009 = ╱4c╱L╱ // 0x1b88 @0x9
0x1b7f…1b8a at000a = EOL // 0x1b89 @0xa
0x1b7f…1b8a }
0x1b8a…1b99 a8f0 3140 IF SKRIV1=E THEN
0x1b8a…1b99 LineComalBin {
0x1b8a…1b99 ptr = 0xa8f0 // 0x1b8a @0x0
0x1b8a…1b99 lno = 0x0c44 // 0x1b8c @0x2
0x1b8a…1b99 at0004 = ╱9c╱ IF ╱ // 0x1b8e @0x4
0x1b8a…1b99 at0005 = ╱53╱S╱ // 0x1b8f @0x5
0x1b8a…1b99 at0006 = ╱4b╱K╱ // 0x1b90 @0x6
0x1b8a…1b99 at0007 = ╱52╱R╱ // 0x1b91 @0x7
0x1b8a…1b99 at0008 = ╱49╱I╱ // 0x1b92 @0x8
0x1b8a…1b99 at0009 = ╱56╱V╱ // 0x1b93 @0x9
0x1b8a…1b99 at000a = ╱31╱1╱ // 0x1b94 @0xa
0x1b8a…1b99 at000b = ╱dc╱=╱ // 0x1b95 @0xb
0x1b8a…1b99 at000c = ╱45╱E╱ // 0x1b96 @0xc
0x1b8a…1b99 at000d = ╱b6╱ THEN ╱ // 0x1b97 @0xd
0x1b8a…1b99 at000e = EOL // 0x1b98 @0xe
0x1b8a…1b99 }
0x1b99…1ba2 a8f9 3150 PRINT " "
0x1b99…1ba2 LineComalBin {
0x1b99…1ba2 ptr = 0xa8f9 // 0x1b99 @0x0
0x1b99…1ba2 lno = 0x0c4e // 0x1b9b @0x2
0x1b99…1ba2 at0004 = ╱92╱ PRINT ╱ // 0x1b9d @0x4
0x1b99…1ba2 at0005 = ╱22╱"╱ // 0x1b9e @0x5
0x1b99…1ba2 at0006 = ╱20╱…╱ // 0x1b9f @0x6
0x1b99…1ba2 at0007 = ╱22╱"╱ // 0x1ba0 @0x7
0x1b99…1ba2 at0008 = EOL // 0x1ba1 @0x8
0x1b99…1ba2 }
0x1ba2…1bab a902 3155 PRINT " "
0x1ba2…1bab LineComalBin {
0x1ba2…1bab ptr = 0xa902 // 0x1ba2 @0x0
0x1ba2…1bab lno = 0x0c53 // 0x1ba4 @0x2
0x1ba2…1bab at0004 = ╱92╱ PRINT ╱ // 0x1ba6 @0x4
0x1ba2…1bab at0005 = ╱22╱"╱ // 0x1ba7 @0x5
0x1ba2…1bab at0006 = ╱20╱…╱ // 0x1ba8 @0x6
0x1ba2…1bab at0007 = ╱22╱"╱ // 0x1ba9 @0x7
0x1ba2…1bab at0008 = EOL // 0x1baa @0x8
0x1ba2…1bab }
0x1bab…1bc1 a918 3160 PRINT TAB(D);EGNAVN$;" "
0x1bab…1bc1 LineComalBin {
0x1bab…1bc1 ptr = 0xa918 // 0x1bab @0x0
0x1bab…1bc1 lno = 0x0c58 // 0x1bad @0x2
0x1bab…1bc1 at0004 = ╱92╱ PRINT ╱ // 0x1baf @0x4
0x1bab…1bc1 at0005 = ╱d2╱TAB╱ // 0x1bb0 @0x5
0x1bab…1bc1 at0006 = ╱ed╱(╱ // 0x1bb1 @0x6
0x1bab…1bc1 at0007 = ╱44╱D╱ // 0x1bb2 @0x7
0x1bab…1bc1 at0008 = ╱ee╱)╱ // 0x1bb3 @0x8
0x1bab…1bc1 at0009 = ╱eb╱;╱ // 0x1bb4 @0x9
0x1bab…1bc1 at000a = ╱45╱E╱ // 0x1bb5 @0xa
0x1bab…1bc1 at000b = ╱47╱G╱ // 0x1bb6 @0xb
0x1bab…1bc1 at000c = ╱4e╱N╱ // 0x1bb7 @0xc
0x1bab…1bc1 at000d = ╱41╱A╱ // 0x1bb8 @0xd
0x1bab…1bc1 at000e = ╱56╱V╱ // 0x1bb9 @0xe
0x1bab…1bc1 at000f = ╱4e╱N╱ // 0x1bba @0xf
0x1bab…1bc1 at0010 = ╱ef╱$╱ // 0x1bbb @0x10
0x1bab…1bc1 at0011 = ╱eb╱;╱ // 0x1bbc @0x11
0x1bab…1bc1 at0012 = ╱22╱"╱ // 0x1bbd @0x12
0x1bab…1bc1 at0013 = ╱20╱…╱ // 0x1bbe @0x13
0x1bab…1bc1 at0014 = ╱22╱"╱ // 0x1bbf @0x14
0x1bab…1bc1 at0015 = EOL // 0x1bc0 @0x15
0x1bab…1bc1 }
0x1bc1…1bd7 a92e 3170 PRINT TAB(D);EGGADE$;" "
0x1bc1…1bd7 LineComalBin {
0x1bc1…1bd7 ptr = 0xa92e // 0x1bc1 @0x0
0x1bc1…1bd7 lno = 0x0c62 // 0x1bc3 @0x2
0x1bc1…1bd7 at0004 = ╱92╱ PRINT ╱ // 0x1bc5 @0x4
0x1bc1…1bd7 at0005 = ╱d2╱TAB╱ // 0x1bc6 @0x5
0x1bc1…1bd7 at0006 = ╱ed╱(╱ // 0x1bc7 @0x6
0x1bc1…1bd7 at0007 = ╱44╱D╱ // 0x1bc8 @0x7
0x1bc1…1bd7 at0008 = ╱ee╱)╱ // 0x1bc9 @0x8
0x1bc1…1bd7 at0009 = ╱eb╱;╱ // 0x1bca @0x9
0x1bc1…1bd7 at000a = ╱45╱E╱ // 0x1bcb @0xa
0x1bc1…1bd7 at000b = ╱47╱G╱ // 0x1bcc @0xb
0x1bc1…1bd7 at000c = ╱47╱G╱ // 0x1bcd @0xc
0x1bc1…1bd7 at000d = ╱41╱A╱ // 0x1bce @0xd
0x1bc1…1bd7 at000e = ╱44╱D╱ // 0x1bcf @0xe
0x1bc1…1bd7 at000f = ╱45╱E╱ // 0x1bd0 @0xf
0x1bc1…1bd7 at0010 = ╱ef╱$╱ // 0x1bd1 @0x10
0x1bc1…1bd7 at0011 = ╱eb╱;╱ // 0x1bd2 @0x11
0x1bc1…1bd7 at0012 = ╱22╱"╱ // 0x1bd3 @0x12
0x1bc1…1bd7 at0013 = ╱20╱…╱ // 0x1bd4 @0x13
0x1bc1…1bd7 at0014 = ╱22╱"╱ // 0x1bd5 @0x14
0x1bc1…1bd7 at0015 = EOL // 0x1bd6 @0x15
0x1bc1…1bd7 }
0x1bd7…1bfa a951 3180 PRINT TAB(D);EGPOSTNR$;" ";EGBY$;" "
0x1bd7…1bfa LineComalBin {
0x1bd7…1bfa ptr = 0xa951 // 0x1bd7 @0x0
0x1bd7…1bfa lno = 0x0c6c // 0x1bd9 @0x2
0x1bd7…1bfa at0004 = ╱92╱ PRINT ╱ // 0x1bdb @0x4
0x1bd7…1bfa at0005 = ╱d2╱TAB╱ // 0x1bdc @0x5
0x1bd7…1bfa at0006 = ╱ed╱(╱ // 0x1bdd @0x6
0x1bd7…1bfa at0007 = ╱44╱D╱ // 0x1bde @0x7
0x1bd7…1bfa at0008 = ╱ee╱)╱ // 0x1bdf @0x8
0x1bd7…1bfa at0009 = ╱eb╱;╱ // 0x1be0 @0x9
0x1bd7…1bfa at000a = ╱45╱E╱ // 0x1be1 @0xa
0x1bd7…1bfa at000b = ╱47╱G╱ // 0x1be2 @0xb
0x1bd7…1bfa at000c = ╱50╱P╱ // 0x1be3 @0xc
0x1bd7…1bfa at000d = ╱4f╱O╱ // 0x1be4 @0xd
0x1bd7…1bfa at000e = ╱53╱S╱ // 0x1be5 @0xe
0x1bd7…1bfa at000f = ╱54╱T╱ // 0x1be6 @0xf
0x1bd7…1bfa at0010 = ╱4e╱N╱ // 0x1be7 @0x10
0x1bd7…1bfa at0011 = ╱52╱R╱ // 0x1be8 @0x11
0x1bd7…1bfa at0012 = ╱ef╱$╱ // 0x1be9 @0x12
0x1bd7…1bfa at0013 = ╱eb╱;╱ // 0x1bea @0x13
0x1bd7…1bfa at0014 = ╱22╱"╱ // 0x1beb @0x14
0x1bd7…1bfa at0015 = ╱20╱…╱ // 0x1bec @0x15
0x1bd7…1bfa at0016 = ╱20╱…╱ // 0x1bed @0x16
0x1bd7…1bfa at0017 = ╱22╱"╱ // 0x1bee @0x17
0x1bd7…1bfa at0018 = ╱eb╱;╱ // 0x1bef @0x18
0x1bd7…1bfa at0019 = ╱45╱E╱ // 0x1bf0 @0x19
0x1bd7…1bfa at001a = ╱47╱G╱ // 0x1bf1 @0x1a
0x1bd7…1bfa at001b = ╱42╱B╱ // 0x1bf2 @0x1b
0x1bd7…1bfa at001c = ╱59╱Y╱ // 0x1bf3 @0x1c
0x1bd7…1bfa at001d = ╱ef╱$╱ // 0x1bf4 @0x1d
0x1bd7…1bfa at001e = ╱eb╱;╱ // 0x1bf5 @0x1e
0x1bd7…1bfa at001f = ╱22╱"╱ // 0x1bf6 @0x1f
0x1bd7…1bfa at0020 = ╱20╱…╱ // 0x1bf7 @0x20
0x1bd7…1bfa at0021 = ╱22╱"╱ // 0x1bf8 @0x21
0x1bd7…1bfa at0022 = EOL // 0x1bf9 @0x22
0x1bd7…1bfa }
0x1bfa…1c17 a96e 3190 EXEC LINIER(1,5,I)
0x1bfa…1c17 LineComalBin {
0x1bfa…1c17 ptr = 0xa96e // 0x1bfa @0x0
0x1bfa…1c17 lno = 0x0c76 // 0x1bfc @0x2
0x1bfa…1c17 at0004 = ╱9d╱ EXEC ╱ // 0x1bfe @0x4
0x1bfa…1c17 at0005 = ╱4c╱L╱ // 0x1bff @0x5
0x1bfa…1c17 at0006 = ╱49╱I╱ // 0x1c00 @0x6
0x1bfa…1c17 at0007 = ╱4e╱N╱ // 0x1c01 @0x7
0x1bfa…1c17 at0008 = ╱49╱I╱ // 0x1c02 @0x8
0x1bfa…1c17 at0009 = ╱45╱E╱ // 0x1c03 @0x9
0x1bfa…1c17 at000a = ╱52╱R╱ // 0x1c04 @0xa
0x1bfa…1c17 at000b = ╱ed╱(╱ // 0x1c05 @0xb
0x1bfa…1c17 at000c = ╱31╱1╱ // 0x1c06 @0xc
0x1bfa…1c17 at000d = ╱fe00008001╱ // 0x1c07 @0xd
0x1bfa…1c17 at0012 = ╱ec╱,╱ // 0x1c0c @0x12
0x1bfa…1c17 at0013 = ╱35╱5╱ // 0x1c0d @0x13
0x1bfa…1c17 at0014 = ╱fe0000a003╱ // 0x1c0e @0x14
0x1bfa…1c17 at0019 = ╱ec╱,╱ // 0x1c13 @0x19
0x1bfa…1c17 at001a = ╱49╱I╱ // 0x1c14 @0x1a
0x1bfa…1c17 at001b = ╱ee╱)╱ // 0x1c15 @0x1b
0x1bfa…1c17 at001c = EOL // 0x1c16 @0x1c
0x1bfa…1c17 }
0x1c17…1c1d a974 3200 ENDIF
0x1c17…1c1d LineComalBin {
0x1c17…1c1d ptr = 0xa974 // 0x1c17 @0x0
0x1c17…1c1d lno = 0x0c80 // 0x1c19 @0x2
0x1c17…1c1d at0004 = ╱9b╱ ENDIF ╱ // 0x1c1b @0x4
0x1c17…1c1d at0005 = EOL // 0x1c1c @0x5
0x1c17…1c1d }
0x1c1d…1c53 a9aa 3210 EXEC NAVN1(DEBNAVN$,DEBGADE$,DEBPOSTNR,DEBBY$,DEBLK$)
0x1c1d…1c53 LineComalBin {
0x1c1d…1c53 ptr = 0xa9aa // 0x1c1d @0x0
0x1c1d…1c53 lno = 0x0c8a // 0x1c1f @0x2
0x1c1d…1c53 at0004 = ╱9d╱ EXEC ╱ // 0x1c21 @0x4
0x1c1d…1c53 at0005 = ╱4e╱N╱ // 0x1c22 @0x5
0x1c1d…1c53 at0006 = ╱41╱A╱ // 0x1c23 @0x6
0x1c1d…1c53 at0007 = ╱56╱V╱ // 0x1c24 @0x7
0x1c1d…1c53 at0008 = ╱4e╱N╱ // 0x1c25 @0x8
0x1c1d…1c53 at0009 = ╱31╱1╱ // 0x1c26 @0x9
0x1c1d…1c53 at000a = ╱ed╱(╱ // 0x1c27 @0xa
0x1c1d…1c53 at000b = ╱44╱D╱ // 0x1c28 @0xb
0x1c1d…1c53 at000c = ╱45╱E╱ // 0x1c29 @0xc
0x1c1d…1c53 at000d = ╱42╱B╱ // 0x1c2a @0xd
0x1c1d…1c53 at000e = ╱4e╱N╱ // 0x1c2b @0xe
0x1c1d…1c53 at000f = ╱41╱A╱ // 0x1c2c @0xf
0x1c1d…1c53 at0010 = ╱56╱V╱ // 0x1c2d @0x10
0x1c1d…1c53 at0011 = ╱4e╱N╱ // 0x1c2e @0x11
0x1c1d…1c53 at0012 = ╱ef╱$╱ // 0x1c2f @0x12
0x1c1d…1c53 at0013 = ╱ec╱,╱ // 0x1c30 @0x13
0x1c1d…1c53 at0014 = ╱44╱D╱ // 0x1c31 @0x14
0x1c1d…1c53 at0015 = ╱45╱E╱ // 0x1c32 @0x15
0x1c1d…1c53 at0016 = ╱42╱B╱ // 0x1c33 @0x16
0x1c1d…1c53 at0017 = ╱47╱G╱ // 0x1c34 @0x17
0x1c1d…1c53 at0018 = ╱41╱A╱ // 0x1c35 @0x18
0x1c1d…1c53 at0019 = ╱44╱D╱ // 0x1c36 @0x19
0x1c1d…1c53 at001a = ╱45╱E╱ // 0x1c37 @0x1a
0x1c1d…1c53 at001b = ╱ef╱$╱ // 0x1c38 @0x1b
0x1c1d…1c53 at001c = ╱ec╱,╱ // 0x1c39 @0x1c
0x1c1d…1c53 at001d = ╱44╱D╱ // 0x1c3a @0x1d
0x1c1d…1c53 at001e = ╱45╱E╱ // 0x1c3b @0x1e
0x1c1d…1c53 at001f = ╱42╱B╱ // 0x1c3c @0x1f
0x1c1d…1c53 at0020 = ╱50╱P╱ // 0x1c3d @0x20
0x1c1d…1c53 at0021 = ╱4f╱O╱ // 0x1c3e @0x21
0x1c1d…1c53 at0022 = ╱53╱S╱ // 0x1c3f @0x22
0x1c1d…1c53 at0023 = ╱54╱T╱ // 0x1c40 @0x23
0x1c1d…1c53 at0024 = ╱4e╱N╱ // 0x1c41 @0x24
0x1c1d…1c53 at0025 = ╱52╱R╱ // 0x1c42 @0x25
0x1c1d…1c53 at0026 = ╱ec╱,╱ // 0x1c43 @0x26
0x1c1d…1c53 at0027 = ╱44╱D╱ // 0x1c44 @0x27
0x1c1d…1c53 at0028 = ╱45╱E╱ // 0x1c45 @0x28
0x1c1d…1c53 at0029 = ╱42╱B╱ // 0x1c46 @0x29
0x1c1d…1c53 at002a = ╱42╱B╱ // 0x1c47 @0x2a
0x1c1d…1c53 at002b = ╱59╱Y╱ // 0x1c48 @0x2b
0x1c1d…1c53 at002c = ╱ef╱$╱ // 0x1c49 @0x2c
0x1c1d…1c53 at002d = ╱ec╱,╱ // 0x1c4a @0x2d
0x1c1d…1c53 at002e = ╱44╱D╱ // 0x1c4b @0x2e
0x1c1d…1c53 at002f = ╱45╱E╱ // 0x1c4c @0x2f
0x1c1d…1c53 at0030 = ╱42╱B╱ // 0x1c4d @0x30
0x1c1d…1c53 at0031 = ╱4c╱L╱ // 0x1c4e @0x31
0x1c1d…1c53 at0032 = ╱4b╱K╱ // 0x1c4f @0x32
0x1c1d…1c53 at0033 = ╱ef╱$╱ // 0x1c50 @0x33
0x1c1d…1c53 at0034 = ╱ee╱)╱ // 0x1c51 @0x34
0x1c1d…1c53 at0035 = EOL // 0x1c52 @0x35
0x1c1d…1c53 }
0x1c53…1c5f a9b6 3220 WHEN KRTAL
0x1c53…1c5f LineComalBin {
0x1c53…1c5f ptr = 0xa9b6 // 0x1c53 @0x0
0x1c53…1c5f lno = 0x0c94 // 0x1c55 @0x2
0x1c53…1c5f at0004 = ╱a301╱ WHEN ╱ // 0x1c57 @0x4
0x1c53…1c5f at0006 = ╱4b╱K╱ // 0x1c59 @0x6
0x1c53…1c5f at0007 = ╱52╱R╱ // 0x1c5a @0x7
0x1c53…1c5f at0008 = ╱54╱T╱ // 0x1c5b @0x8
0x1c53…1c5f at0009 = ╱41╱A╱ // 0x1c5c @0x9
0x1c53…1c5f at000a = ╱4c╱L╱ // 0x1c5d @0xa
0x1c53…1c5f at000b = EOL // 0x1c5e @0xb
0x1c53…1c5f }
0x1c5f…1c95 a9ec 3230 EXEC NAVN1(KRENAVN$,KREGADE$,KREPOSTNR,KREBY$,KRELK$)
0x1c5f…1c95 LineComalBin {
0x1c5f…1c95 ptr = 0xa9ec // 0x1c5f @0x0
0x1c5f…1c95 lno = 0x0c9e // 0x1c61 @0x2
0x1c5f…1c95 at0004 = ╱9d╱ EXEC ╱ // 0x1c63 @0x4
0x1c5f…1c95 at0005 = ╱4e╱N╱ // 0x1c64 @0x5
0x1c5f…1c95 at0006 = ╱41╱A╱ // 0x1c65 @0x6
0x1c5f…1c95 at0007 = ╱56╱V╱ // 0x1c66 @0x7
0x1c5f…1c95 at0008 = ╱4e╱N╱ // 0x1c67 @0x8
0x1c5f…1c95 at0009 = ╱31╱1╱ // 0x1c68 @0x9
0x1c5f…1c95 at000a = ╱ed╱(╱ // 0x1c69 @0xa
0x1c5f…1c95 at000b = ╱4b╱K╱ // 0x1c6a @0xb
0x1c5f…1c95 at000c = ╱52╱R╱ // 0x1c6b @0xc
0x1c5f…1c95 at000d = ╱45╱E╱ // 0x1c6c @0xd
0x1c5f…1c95 at000e = ╱4e╱N╱ // 0x1c6d @0xe
0x1c5f…1c95 at000f = ╱41╱A╱ // 0x1c6e @0xf
0x1c5f…1c95 at0010 = ╱56╱V╱ // 0x1c6f @0x10
0x1c5f…1c95 at0011 = ╱4e╱N╱ // 0x1c70 @0x11
0x1c5f…1c95 at0012 = ╱ef╱$╱ // 0x1c71 @0x12
0x1c5f…1c95 at0013 = ╱ec╱,╱ // 0x1c72 @0x13
0x1c5f…1c95 at0014 = ╱4b╱K╱ // 0x1c73 @0x14
0x1c5f…1c95 at0015 = ╱52╱R╱ // 0x1c74 @0x15
0x1c5f…1c95 at0016 = ╱45╱E╱ // 0x1c75 @0x16
0x1c5f…1c95 at0017 = ╱47╱G╱ // 0x1c76 @0x17
0x1c5f…1c95 at0018 = ╱41╱A╱ // 0x1c77 @0x18
0x1c5f…1c95 at0019 = ╱44╱D╱ // 0x1c78 @0x19
0x1c5f…1c95 at001a = ╱45╱E╱ // 0x1c79 @0x1a
0x1c5f…1c95 at001b = ╱ef╱$╱ // 0x1c7a @0x1b
0x1c5f…1c95 at001c = ╱ec╱,╱ // 0x1c7b @0x1c
0x1c5f…1c95 at001d = ╱4b╱K╱ // 0x1c7c @0x1d
0x1c5f…1c95 at001e = ╱52╱R╱ // 0x1c7d @0x1e
0x1c5f…1c95 at001f = ╱45╱E╱ // 0x1c7e @0x1f
0x1c5f…1c95 at0020 = ╱50╱P╱ // 0x1c7f @0x20
0x1c5f…1c95 at0021 = ╱4f╱O╱ // 0x1c80 @0x21
0x1c5f…1c95 at0022 = ╱53╱S╱ // 0x1c81 @0x22
0x1c5f…1c95 at0023 = ╱54╱T╱ // 0x1c82 @0x23
0x1c5f…1c95 at0024 = ╱4e╱N╱ // 0x1c83 @0x24
0x1c5f…1c95 at0025 = ╱52╱R╱ // 0x1c84 @0x25
0x1c5f…1c95 at0026 = ╱ec╱,╱ // 0x1c85 @0x26
0x1c5f…1c95 at0027 = ╱4b╱K╱ // 0x1c86 @0x27
0x1c5f…1c95 at0028 = ╱52╱R╱ // 0x1c87 @0x28
0x1c5f…1c95 at0029 = ╱45╱E╱ // 0x1c88 @0x29
0x1c5f…1c95 at002a = ╱42╱B╱ // 0x1c89 @0x2a
0x1c5f…1c95 at002b = ╱59╱Y╱ // 0x1c8a @0x2b
0x1c5f…1c95 at002c = ╱ef╱$╱ // 0x1c8b @0x2c
0x1c5f…1c95 at002d = ╱ec╱,╱ // 0x1c8c @0x2d
0x1c5f…1c95 at002e = ╱4b╱K╱ // 0x1c8d @0x2e
0x1c5f…1c95 at002f = ╱52╱R╱ // 0x1c8e @0x2f
0x1c5f…1c95 at0030 = ╱45╱E╱ // 0x1c8f @0x30
0x1c5f…1c95 at0031 = ╱4c╱L╱ // 0x1c90 @0x31
0x1c5f…1c95 at0032 = ╱4b╱K╱ // 0x1c91 @0x32
0x1c5f…1c95 at0033 = ╱ef╱$╱ // 0x1c92 @0x33
0x1c5f…1c95 at0034 = ╱ee╱)╱ // 0x1c93 @0x34
0x1c5f…1c95 at0035 = EOL // 0x1c94 @0x35
0x1c5f…1c95 }
0x1c95…1c9b a9f2 3240 ENDCASE
0x1c95…1c9b LineComalBin {
0x1c95…1c9b ptr = 0xa9f2 // 0x1c95 @0x0
0x1c95…1c9b lno = 0x0ca8 // 0x1c97 @0x2
0x1c95…1c9b at0004 = ╱a4╱ ENDCASE ╱ // 0x1c99 @0x4
0x1c95…1c9b at0005 = EOL // 0x1c9a @0x5
0x1c95…1c9b }
0x1c9b…1ca1 a9f8 3250 ENDPROC
0x1c9b…1ca1 LineComalBin {
0x1c9b…1ca1 ptr = 0xa9f8 // 0x1c9b @0x0
0x1c9b…1ca1 lno = 0x0cb2 // 0x1c9d @0x2
0x1c9b…1ca1 at0004 = ╱9f╱ ENDPROC ╱ // 0x1c9f @0x4
0x1c9b…1ca1 at0005 = EOL // 0x1ca0 @0x5
0x1c9b…1ca1 }
0x1ca1…1cb0 aa07 3260 PROC HSUDSKRIV
0x1ca1…1cb0 LineComalBin {
0x1ca1…1cb0 ptr = 0xaa07 // 0x1ca1 @0x0
0x1ca1…1cb0 lno = 0x0cbc // 0x1ca3 @0x2
0x1ca1…1cb0 at0004 = ╱9e╱ PROC ╱ // 0x1ca5 @0x4
0x1ca1…1cb0 at0005 = ╱48╱H╱ // 0x1ca6 @0x5
0x1ca1…1cb0 at0006 = ╱53╱S╱ // 0x1ca7 @0x6
0x1ca1…1cb0 at0007 = ╱55╱U╱ // 0x1ca8 @0x7
0x1ca1…1cb0 at0008 = ╱44╱D╱ // 0x1ca9 @0x8
0x1ca1…1cb0 at0009 = ╱53╱S╱ // 0x1caa @0x9
0x1ca1…1cb0 at000a = ╱4b╱K╱ // 0x1cab @0xa
0x1ca1…1cb0 at000b = ╱52╱R╱ // 0x1cac @0xb
0x1ca1…1cb0 at000c = ╱49╱I╱ // 0x1cad @0xc
0x1ca1…1cb0 at000d = ╱56╱V╱ // 0x1cae @0xd
0x1ca1…1cb0 at000e = EOL // 0x1caf @0xe
0x1ca1…1cb0 }
0x1cb0…1cbc aa13 3270 IF SKRIV THEN
0x1cb0…1cbc LineComalBin {
0x1cb0…1cbc ptr = 0xaa13 // 0x1cb0 @0x0
0x1cb0…1cbc lno = 0x0cc6 // 0x1cb2 @0x2
0x1cb0…1cbc at0004 = ╱9c╱ IF ╱ // 0x1cb4 @0x4
0x1cb0…1cbc at0005 = ╱53╱S╱ // 0x1cb5 @0x5
0x1cb0…1cbc at0006 = ╱4b╱K╱ // 0x1cb6 @0x6
0x1cb0…1cbc at0007 = ╱52╱R╱ // 0x1cb7 @0x7
0x1cb0…1cbc at0008 = ╱49╱I╱ // 0x1cb8 @0x8
0x1cb0…1cbc at0009 = ╱56╱V╱ // 0x1cb9 @0x9
0x1cb0…1cbc at000a = ╱b6╱ THEN ╱ // 0x1cba @0xa
0x1cb0…1cbc at000b = EOL // 0x1cbb @0xb
0x1cb0…1cbc }
0x1cbc…1cf8 aa4f 3280 PRINT TAB(49);"Konto";TAB(56);"Dato";TAB(68);"Side"
0x1cbc…1cf8 LineComalBin {
0x1cbc…1cf8 ptr = 0xaa4f // 0x1cbc @0x0
0x1cbc…1cf8 lno = 0x0cd0 // 0x1cbe @0x2
0x1cbc…1cf8 at0004 = ╱92╱ PRINT ╱ // 0x1cc0 @0x4
0x1cbc…1cf8 at0005 = ╱d2╱TAB╱ // 0x1cc1 @0x5
0x1cbc…1cf8 at0006 = ╱ed╱(╱ // 0x1cc2 @0x6
0x1cbc…1cf8 at0007 = ╱34╱4╱ // 0x1cc3 @0x7
0x1cbc…1cf8 at0008 = ╱39╱9╱ // 0x1cc4 @0x8
0x1cbc…1cf8 at0009 = ╱fe0000c406╱ // 0x1cc5 @0x9
0x1cbc…1cf8 at000e = ╱ee╱)╱ // 0x1cca @0xe
0x1cbc…1cf8 at000f = ╱eb╱;╱ // 0x1ccb @0xf
0x1cbc…1cf8 at0010 = ╱22╱"╱ // 0x1ccc @0x10
0x1cbc…1cf8 at0011 = ╱4b╱K╱ // 0x1ccd @0x11
0x1cbc…1cf8 at0012 = ╱6f╱o╱ // 0x1cce @0x12
0x1cbc…1cf8 at0013 = ╱6e╱n╱ // 0x1ccf @0x13
0x1cbc…1cf8 at0014 = ╱74╱t╱ // 0x1cd0 @0x14
0x1cbc…1cf8 at0015 = ╱6f╱o╱ // 0x1cd1 @0x15
0x1cbc…1cf8 at0016 = ╱22╱"╱ // 0x1cd2 @0x16
0x1cbc…1cf8 at0017 = ╱eb╱;╱ // 0x1cd3 @0x17
0x1cbc…1cf8 at0018 = ╱d2╱TAB╱ // 0x1cd4 @0x18
0x1cbc…1cf8 at0019 = ╱ed╱(╱ // 0x1cd5 @0x19
0x1cbc…1cf8 at001a = ╱35╱5╱ // 0x1cd6 @0x1a
0x1cbc…1cf8 at001b = ╱36╱6╱ // 0x1cd7 @0x1b
0x1cbc…1cf8 at001c = ╱fe0000e006╱ // 0x1cd8 @0x1c
0x1cbc…1cf8 at0021 = ╱ee╱)╱ // 0x1cdd @0x21
0x1cbc…1cf8 at0022 = ╱eb╱;╱ // 0x1cde @0x22
0x1cbc…1cf8 at0023 = ╱22╱"╱ // 0x1cdf @0x23
0x1cbc…1cf8 at0024 = ╱44╱D╱ // 0x1ce0 @0x24
0x1cbc…1cf8 at0025 = ╱61╱a╱ // 0x1ce1 @0x25
0x1cbc…1cf8 at0026 = ╱74╱t╱ // 0x1ce2 @0x26
0x1cbc…1cf8 at0027 = ╱6f╱o╱ // 0x1ce3 @0x27
0x1cbc…1cf8 at0028 = ╱22╱"╱ // 0x1ce4 @0x28
0x1cbc…1cf8 at0029 = ╱eb╱;╱ // 0x1ce5 @0x29
0x1cbc…1cf8 at002a = ╱d2╱TAB╱ // 0x1ce6 @0x2a
0x1cbc…1cf8 at002b = ╱ed╱(╱ // 0x1ce7 @0x2b
0x1cbc…1cf8 at002c = ╱36╱6╱ // 0x1ce8 @0x2c
0x1cbc…1cf8 at002d = ╱38╱8╱ // 0x1ce9 @0x2d
0x1cbc…1cf8 at002e = ╱fe00008807╱ // 0x1cea @0x2e
0x1cbc…1cf8 at0033 = ╱ee╱)╱ // 0x1cef @0x33
0x1cbc…1cf8 at0034 = ╱eb╱;╱ // 0x1cf0 @0x34
0x1cbc…1cf8 at0035 = ╱22╱"╱ // 0x1cf1 @0x35
0x1cbc…1cf8 at0036 = ╱53╱S╱ // 0x1cf2 @0x36
0x1cbc…1cf8 at0037 = ╱69╱i╱ // 0x1cf3 @0x37
0x1cbc…1cf8 at0038 = ╱64╱d╱ // 0x1cf4 @0x38
0x1cbc…1cf8 at0039 = ╱65╱e╱ // 0x1cf5 @0x39
0x1cbc…1cf8 at003a = ╱22╱"╱ // 0x1cf6 @0x3a
0x1cbc…1cf8 at003b = EOL // 0x1cf7 @0x3b
0x1cbc…1cf8 }
0x1cf8…1d1a aa71 3290 PRINT TAB(49);STREG$(E:29)
0x1cf8…1d1a LineComalBin {
0x1cf8…1d1a ptr = 0xaa71 // 0x1cf8 @0x0
0x1cf8…1d1a lno = 0x0cda // 0x1cfa @0x2
0x1cf8…1d1a at0004 = ╱92╱ PRINT ╱ // 0x1cfc @0x4
0x1cf8…1d1a at0005 = ╱d2╱TAB╱ // 0x1cfd @0x5
0x1cf8…1d1a at0006 = ╱ed╱(╱ // 0x1cfe @0x6
0x1cf8…1d1a at0007 = ╱34╱4╱ // 0x1cff @0x7
0x1cf8…1d1a at0008 = ╱39╱9╱ // 0x1d00 @0x8
0x1cf8…1d1a at0009 = ╱fe0000c406╱ // 0x1d01 @0x9
0x1cf8…1d1a at000e = ╱ee╱)╱ // 0x1d06 @0xe
0x1cf8…1d1a at000f = ╱eb╱;╱ // 0x1d07 @0xf
0x1cf8…1d1a at0010 = ╱53╱S╱ // 0x1d08 @0x10
0x1cf8…1d1a at0011 = ╱54╱T╱ // 0x1d09 @0x11
0x1cf8…1d1a at0012 = ╱52╱R╱ // 0x1d0a @0x12
0x1cf8…1d1a at0013 = ╱45╱E╱ // 0x1d0b @0x13
0x1cf8…1d1a at0014 = ╱47╱G╱ // 0x1d0c @0x14
0x1cf8…1d1a at0015 = ╱ef╱$╱ // 0x1d0d @0x15
0x1cf8…1d1a at0016 = ╱ed╱(╱ // 0x1d0e @0x16
0x1cf8…1d1a at0017 = ╱45╱E╱ // 0x1d0f @0x17
0x1cf8…1d1a at0018 = ╱f0╱:╱ // 0x1d10 @0x18
0x1cf8…1d1a at0019 = ╱32╱2╱ // 0x1d11 @0x19
0x1cf8…1d1a at001a = ╱39╱9╱ // 0x1d12 @0x1a
0x1cf8…1d1a at001b = ╱fe0000e805╱ // 0x1d13 @0x1b
0x1cf8…1d1a at0020 = ╱ee╱)╱ // 0x1d18 @0x20
0x1cf8…1d1a at0021 = EOL // 0x1d19 @0x21
0x1cf8…1d1a }
0x1d1a…1d3b aa92 3300 EXEC LUDSKRIV(KONT,DATO,KSIDENR)
0x1d1a…1d3b LineComalBin {
0x1d1a…1d3b ptr = 0xaa92 // 0x1d1a @0x0
0x1d1a…1d3b lno = 0x0ce4 // 0x1d1c @0x2
0x1d1a…1d3b at0004 = ╱9d╱ EXEC ╱ // 0x1d1e @0x4
0x1d1a…1d3b at0005 = ╱4c╱L╱ // 0x1d1f @0x5
0x1d1a…1d3b at0006 = ╱55╱U╱ // 0x1d20 @0x6
0x1d1a…1d3b at0007 = ╱44╱D╱ // 0x1d21 @0x7
0x1d1a…1d3b at0008 = ╱53╱S╱ // 0x1d22 @0x8
0x1d1a…1d3b at0009 = ╱4b╱K╱ // 0x1d23 @0x9
0x1d1a…1d3b at000a = ╱52╱R╱ // 0x1d24 @0xa
0x1d1a…1d3b at000b = ╱49╱I╱ // 0x1d25 @0xb
0x1d1a…1d3b at000c = ╱56╱V╱ // 0x1d26 @0xc
0x1d1a…1d3b at000d = ╱ed╱(╱ // 0x1d27 @0xd
0x1d1a…1d3b at000e = ╱4b╱K╱ // 0x1d28 @0xe
0x1d1a…1d3b at000f = ╱4f╱O╱ // 0x1d29 @0xf
0x1d1a…1d3b at0010 = ╱4e╱N╱ // 0x1d2a @0x10
0x1d1a…1d3b at0011 = ╱54╱T╱ // 0x1d2b @0x11
0x1d1a…1d3b at0012 = ╱ec╱,╱ // 0x1d2c @0x12
0x1d1a…1d3b at0013 = ╱44╱D╱ // 0x1d2d @0x13
0x1d1a…1d3b at0014 = ╱41╱A╱ // 0x1d2e @0x14
0x1d1a…1d3b at0015 = ╱54╱T╱ // 0x1d2f @0x15
0x1d1a…1d3b at0016 = ╱4f╱O╱ // 0x1d30 @0x16
0x1d1a…1d3b at0017 = ╱ec╱,╱ // 0x1d31 @0x17
0x1d1a…1d3b at0018 = ╱4b╱K╱ // 0x1d32 @0x18
0x1d1a…1d3b at0019 = ╱53╱S╱ // 0x1d33 @0x19
0x1d1a…1d3b at001a = ╱49╱I╱ // 0x1d34 @0x1a
0x1d1a…1d3b at001b = ╱44╱D╱ // 0x1d35 @0x1b
0x1d1a…1d3b at001c = ╱45╱E╱ // 0x1d36 @0x1c
0x1d1a…1d3b at001d = ╱4e╱N╱ // 0x1d37 @0x1d
0x1d1a…1d3b at001e = ╱52╱R╱ // 0x1d38 @0x1e
0x1d1a…1d3b at001f = ╱ee╱)╱ // 0x1d39 @0x1f
0x1d1a…1d3b at0020 = EOL // 0x1d3a @0x20
0x1d1a…1d3b }
0x1d3b…1d47 aa9e 3310 PRINT STREG$
0x1d3b…1d47 LineComalBin {
0x1d3b…1d47 ptr = 0xaa9e // 0x1d3b @0x0
0x1d3b…1d47 lno = 0x0cee // 0x1d3d @0x2
0x1d3b…1d47 at0004 = ╱92╱ PRINT ╱ // 0x1d3f @0x4
0x1d3b…1d47 at0005 = ╱53╱S╱ // 0x1d40 @0x5
0x1d3b…1d47 at0006 = ╱54╱T╱ // 0x1d41 @0x6
0x1d3b…1d47 at0007 = ╱52╱R╱ // 0x1d42 @0x7
0x1d3b…1d47 at0008 = ╱45╱E╱ // 0x1d43 @0x8
0x1d3b…1d47 at0009 = ╱47╱G╱ // 0x1d44 @0x9
0x1d3b…1d47 at000a = ╱ef╱$╱ // 0x1d45 @0xa
0x1d3b…1d47 at000b = EOL // 0x1d46 @0xb
0x1d3b…1d47 }
0x1d47…1d4d aaa4 3320 ELSE
0x1d47…1d4d LineComalBin {
0x1d47…1d4d ptr = 0xaaa4 // 0x1d47 @0x0
0x1d47…1d4d lno = 0x0cf8 // 0x1d49 @0x2
0x1d47…1d4d at0004 = ╱9a╱ ELSE ╱ // 0x1d4b @0x4
0x1d47…1d4d at0005 = EOL // 0x1d4c @0x5
0x1d47…1d4d }
0x1d4d…1d53 aaaa 3330 CLEAR
0x1d4d…1d53 LineComalBin {
0x1d4d…1d53 ptr = 0xaaaa // 0x1d4d @0x0
0x1d4d…1d53 lno = 0x0d02 // 0x1d4f @0x2
0x1d4d…1d53 at0004 = ╱a0╱ CLEAR ╱ // 0x1d51 @0x4
0x1d4d…1d53 at0005 = EOL // 0x1d52 @0x5
0x1d4d…1d53 }
0x1d53…1d6b aac2 3340 EXEC OVERSKRIFT(1)
0x1d53…1d6b LineComalBin {
0x1d53…1d6b ptr = 0xaac2 // 0x1d53 @0x0
0x1d53…1d6b lno = 0x0d0c // 0x1d55 @0x2
0x1d53…1d6b at0004 = ╱9d╱ EXEC ╱ // 0x1d57 @0x4
0x1d53…1d6b at0005 = ╱4f╱O╱ // 0x1d58 @0x5
0x1d53…1d6b at0006 = ╱56╱V╱ // 0x1d59 @0x6
0x1d53…1d6b at0007 = ╱45╱E╱ // 0x1d5a @0x7
0x1d53…1d6b at0008 = ╱52╱R╱ // 0x1d5b @0x8
0x1d53…1d6b at0009 = ╱53╱S╱ // 0x1d5c @0x9
0x1d53…1d6b at000a = ╱4b╱K╱ // 0x1d5d @0xa
0x1d53…1d6b at000b = ╱52╱R╱ // 0x1d5e @0xb
0x1d53…1d6b at000c = ╱49╱I╱ // 0x1d5f @0xc
0x1d53…1d6b at000d = ╱46╱F╱ // 0x1d60 @0xd
0x1d53…1d6b at000e = ╱54╱T╱ // 0x1d61 @0xe
0x1d53…1d6b at000f = ╱ed╱(╱ // 0x1d62 @0xf
0x1d53…1d6b at0010 = ╱31╱1╱ // 0x1d63 @0x10
0x1d53…1d6b at0011 = ╱fe00008001╱ // 0x1d64 @0x11
0x1d53…1d6b at0016 = ╱ee╱)╱ // 0x1d69 @0x16
0x1d53…1d6b at0017 = EOL // 0x1d6a @0x17
0x1d53…1d6b }
0x1d6b…1d74 aacb 3350 CURSOR E,V
0x1d6b…1d74 LineComalBin {
0x1d6b…1d74 ptr = 0xaacb // 0x1d6b @0x0
0x1d6b…1d74 lno = 0x0d16 // 0x1d6d @0x2
0x1d6b…1d74 at0004 = ╱a1╱ CURSOR ╱ // 0x1d6f @0x4
0x1d6b…1d74 at0005 = ╱45╱E╱ // 0x1d70 @0x5
0x1d6b…1d74 at0006 = ╱ec╱,╱ // 0x1d71 @0x6
0x1d6b…1d74 at0007 = ╱56╱V╱ // 0x1d72 @0x7
0x1d6b…1d74 at0008 = EOL // 0x1d73 @0x8
0x1d6b…1d74 }
0x1d74…1d7a aad1 3360 ENDIF
0x1d74…1d7a LineComalBin {
0x1d74…1d7a ptr = 0xaad1 // 0x1d74 @0x0
0x1d74…1d7a lno = 0x0d20 // 0x1d76 @0x2
0x1d74…1d7a at0004 = ╱9b╱ ENDIF ╱ // 0x1d78 @0x4
0x1d74…1d7a at0005 = EOL // 0x1d79 @0x5
0x1d74…1d7a }
0x1d7a…1dc1 (98,) ab18 3370 PRINT TAB(V);"Dato";TAB(D);"Bilag Tekst";TAB(44);"Entre";TAB(57);
0x1d7a…1dc1 LineComalBin {
0x1d7a…1dc1 ptr = 0xab18 // 0x1d7a @0x0
0x1d7a…1dc1 lno = 0x0d2a // 0x1d7c @0x2
0x1d7a…1dc1 at0004 = ╱92╱ PRINT ╱ // 0x1d7e @0x4
0x1d7a…1dc1 at0005 = ╱d2╱TAB╱ // 0x1d7f @0x5
0x1d7a…1dc1 at0006 = ╱ed╱(╱ // 0x1d80 @0x6
0x1d7a…1dc1 at0007 = ╱56╱V╱ // 0x1d81 @0x7
0x1d7a…1dc1 at0008 = ╱ee╱)╱ // 0x1d82 @0x8
0x1d7a…1dc1 at0009 = ╱eb╱;╱ // 0x1d83 @0x9
0x1d7a…1dc1 at000a = ╱22╱"╱ // 0x1d84 @0xa
0x1d7a…1dc1 at000b = ╱44╱D╱ // 0x1d85 @0xb
0x1d7a…1dc1 at000c = ╱61╱a╱ // 0x1d86 @0xc
0x1d7a…1dc1 at000d = ╱74╱t╱ // 0x1d87 @0xd
0x1d7a…1dc1 at000e = ╱6f╱o╱ // 0x1d88 @0xe
0x1d7a…1dc1 at000f = ╱22╱"╱ // 0x1d89 @0xf
0x1d7a…1dc1 at0010 = ╱eb╱;╱ // 0x1d8a @0x10
0x1d7a…1dc1 at0011 = ╱d2╱TAB╱ // 0x1d8b @0x11
0x1d7a…1dc1 at0012 = ╱ed╱(╱ // 0x1d8c @0x12
0x1d7a…1dc1 at0013 = ╱44╱D╱ // 0x1d8d @0x13
0x1d7a…1dc1 at0014 = ╱ee╱)╱ // 0x1d8e @0x14
0x1d7a…1dc1 at0015 = ╱eb╱;╱ // 0x1d8f @0x15
0x1d7a…1dc1 at0016 = ╱22╱"╱ // 0x1d90 @0x16
0x1d7a…1dc1 at0017 = ╱42╱B╱ // 0x1d91 @0x17
0x1d7a…1dc1 at0018 = ╱69╱i╱ // 0x1d92 @0x18
0x1d7a…1dc1 at0019 = ╱6c╱l╱ // 0x1d93 @0x19
0x1d7a…1dc1 at001a = ╱61╱a╱ // 0x1d94 @0x1a
0x1d7a…1dc1 at001b = ╱67╱g╱ // 0x1d95 @0x1b
0x1d7a…1dc1 at001c = ╱20╱…╱ // 0x1d96 @0x1c
0x1d7a…1dc1 at001d = ╱20╱…╱ // 0x1d97 @0x1d
0x1d7a…1dc1 at001e = ╱20╱…╱ // 0x1d98 @0x1e
0x1d7a…1dc1 at001f = ╱20╱…╱ // 0x1d99 @0x1f
0x1d7a…1dc1 at0020 = ╱20╱…╱ // 0x1d9a @0x20
0x1d7a…1dc1 at0021 = ╱54╱T╱ // 0x1d9b @0x21
0x1d7a…1dc1 at0022 = ╱65╱e╱ // 0x1d9c @0x22
0x1d7a…1dc1 at0023 = ╱6b╱k╱ // 0x1d9d @0x23
0x1d7a…1dc1 at0024 = ╱73╱s╱ // 0x1d9e @0x24
0x1d7a…1dc1 at0025 = ╱74╱t╱ // 0x1d9f @0x25
0x1d7a…1dc1 at0026 = ╱22╱"╱ // 0x1da0 @0x26
0x1d7a…1dc1 at0027 = ╱eb╱;╱ // 0x1da1 @0x27
0x1d7a…1dc1 at0028 = ╱d2╱TAB╱ // 0x1da2 @0x28
0x1d7a…1dc1 at0029 = ╱ed╱(╱ // 0x1da3 @0x29
0x1d7a…1dc1 at002a = ╱34╱4╱ // 0x1da4 @0x2a
0x1d7a…1dc1 at002b = ╱34╱4╱ // 0x1da5 @0x2b
0x1d7a…1dc1 at002c = ╱fe0000b006╱ // 0x1da6 @0x2c
0x1d7a…1dc1 at0031 = ╱ee╱)╱ // 0x1dab @0x31
0x1d7a…1dc1 at0032 = ╱eb╱;╱ // 0x1dac @0x32
0x1d7a…1dc1 at0033 = ╱22╱"╱ // 0x1dad @0x33
0x1d7a…1dc1 at0034 = ╱45╱E╱ // 0x1dae @0x34
0x1d7a…1dc1 at0035 = ╱6e╱n╱ // 0x1daf @0x35
0x1d7a…1dc1 at0036 = ╱74╱t╱ // 0x1db0 @0x36
0x1d7a…1dc1 at0037 = ╱72╱r╱ // 0x1db1 @0x37
0x1d7a…1dc1 at0038 = ╱65╱e╱ // 0x1db2 @0x38
0x1d7a…1dc1 at0039 = ╱22╱"╱ // 0x1db3 @0x39
0x1d7a…1dc1 at003a = ╱eb╱;╱ // 0x1db4 @0x3a
0x1d7a…1dc1 at003b = ╱d2╱TAB╱ // 0x1db5 @0x3b
0x1d7a…1dc1 at003c = ╱ed╱(╱ // 0x1db6 @0x3c
0x1d7a…1dc1 at003d = ╱35╱5╱ // 0x1db7 @0x3d
0x1d7a…1dc1 at003e = ╱37╱7╱ // 0x1db8 @0x3e
0x1d7a…1dc1 at003f = ╱fe0000e406╱ // 0x1db9 @0x3f
0x1d7a…1dc1 at0044 = ╱ee╱)╱ // 0x1dbe @0x44
0x1d7a…1dc1 at0045 = ╱eb╱;╱ // 0x1dbf @0x45
0x1d7a…1dc1 at0046 = EOL // 0x1dc0 @0x46
0x1d7a…1dc1 }
0x1dc1…1de2 ab39 3375 PRINT "Debet";TAB(72);"Kredit"
0x1dc1…1de2 LineComalBin {
0x1dc1…1de2 ptr = 0xab39 // 0x1dc1 @0x0
0x1dc1…1de2 lno = 0x0d2f // 0x1dc3 @0x2
0x1dc1…1de2 at0004 = ╱92╱ PRINT ╱ // 0x1dc5 @0x4
0x1dc1…1de2 at0005 = ╱22╱"╱ // 0x1dc6 @0x5
0x1dc1…1de2 at0006 = ╱44╱D╱ // 0x1dc7 @0x6
0x1dc1…1de2 at0007 = ╱65╱e╱ // 0x1dc8 @0x7
0x1dc1…1de2 at0008 = ╱62╱b╱ // 0x1dc9 @0x8
0x1dc1…1de2 at0009 = ╱65╱e╱ // 0x1dca @0x9
0x1dc1…1de2 at000a = ╱74╱t╱ // 0x1dcb @0xa
0x1dc1…1de2 at000b = ╱22╱"╱ // 0x1dcc @0xb
0x1dc1…1de2 at000c = ╱eb╱;╱ // 0x1dcd @0xc
0x1dc1…1de2 at000d = ╱d2╱TAB╱ // 0x1dce @0xd
0x1dc1…1de2 at000e = ╱ed╱(╱ // 0x1dcf @0xe
0x1dc1…1de2 at000f = ╱37╱7╱ // 0x1dd0 @0xf
0x1dc1…1de2 at0010 = ╱32╱2╱ // 0x1dd1 @0x10
0x1dc1…1de2 at0011 = ╱fe00009007╱ // 0x1dd2 @0x11
0x1dc1…1de2 at0016 = ╱ee╱)╱ // 0x1dd7 @0x16
0x1dc1…1de2 at0017 = ╱eb╱;╱ // 0x1dd8 @0x17
0x1dc1…1de2 at0018 = ╱22╱"╱ // 0x1dd9 @0x18
0x1dc1…1de2 at0019 = ╱4b╱K╱ // 0x1dda @0x19
0x1dc1…1de2 at001a = ╱72╱r╱ // 0x1ddb @0x1a
0x1dc1…1de2 at001b = ╱65╱e╱ // 0x1ddc @0x1b
0x1dc1…1de2 at001c = ╱64╱d╱ // 0x1ddd @0x1c
0x1dc1…1de2 at001d = ╱69╱i╱ // 0x1dde @0x1d
0x1dc1…1de2 at001e = ╱74╱t╱ // 0x1ddf @0x1e
0x1dc1…1de2 at001f = ╱22╱"╱ // 0x1de0 @0x1f
0x1dc1…1de2 at0020 = EOL // 0x1de1 @0x20
0x1dc1…1de2 }
0x1de2…1dee ab45 3390 PRINT STREG$
0x1de2…1dee LineComalBin {
0x1de2…1dee ptr = 0xab45 // 0x1de2 @0x0
0x1de2…1dee lno = 0x0d3e // 0x1de4 @0x2
0x1de2…1dee at0004 = ╱92╱ PRINT ╱ // 0x1de6 @0x4
0x1de2…1dee at0005 = ╱53╱S╱ // 0x1de7 @0x5
0x1de2…1dee at0006 = ╱54╱T╱ // 0x1de8 @0x6
0x1de2…1dee at0007 = ╱52╱R╱ // 0x1de9 @0x7
0x1de2…1dee at0008 = ╱45╱E╱ // 0x1dea @0x8
0x1de2…1dee at0009 = ╱47╱G╱ // 0x1deb @0x9
0x1de2…1dee at000a = ╱ef╱$╱ // 0x1dec @0xa
0x1de2…1dee at000b = EOL // 0x1ded @0xb
0x1de2…1dee }
0x1dee…1df4 ab4b 3400 ENDPROC
0x1dee…1df4 LineComalBin {
0x1dee…1df4 ptr = 0xab4b // 0x1dee @0x0
0x1dee…1df4 lno = 0x0d48 // 0x1df0 @0x2
0x1dee…1df4 at0004 = ╱9f╱ ENDPROC ╱ // 0x1df2 @0x4
0x1dee…1df4 at0005 = EOL // 0x1df3 @0x5
0x1dee…1df4 }
0x1df4…1e0a ab61 3410 PROC OVERSKRIFT(ART1)
0x1df4…1e0a LineComalBin {
0x1df4…1e0a ptr = 0xab61 // 0x1df4 @0x0
0x1df4…1e0a lno = 0x0d52 // 0x1df6 @0x2
0x1df4…1e0a at0004 = ╱9e╱ PROC ╱ // 0x1df8 @0x4
0x1df4…1e0a at0005 = ╱4f╱O╱ // 0x1df9 @0x5
0x1df4…1e0a at0006 = ╱56╱V╱ // 0x1dfa @0x6
0x1df4…1e0a at0007 = ╱45╱E╱ // 0x1dfb @0x7
0x1df4…1e0a at0008 = ╱52╱R╱ // 0x1dfc @0x8
0x1df4…1e0a at0009 = ╱53╱S╱ // 0x1dfd @0x9
0x1df4…1e0a at000a = ╱4b╱K╱ // 0x1dfe @0xa
0x1df4…1e0a at000b = ╱52╱R╱ // 0x1dff @0xb
0x1df4…1e0a at000c = ╱49╱I╱ // 0x1e00 @0xc
0x1df4…1e0a at000d = ╱46╱F╱ // 0x1e01 @0xd
0x1df4…1e0a at000e = ╱54╱T╱ // 0x1e02 @0xe
0x1df4…1e0a at000f = ╱ed╱(╱ // 0x1e03 @0xf
0x1df4…1e0a at0010 = ╱41╱A╱ // 0x1e04 @0x10
0x1df4…1e0a at0011 = ╱52╱R╱ // 0x1e05 @0x11
0x1df4…1e0a at0012 = ╱54╱T╱ // 0x1e06 @0x12
0x1df4…1e0a at0013 = ╱31╱1╱ // 0x1e07 @0x13
0x1df4…1e0a at0014 = ╱ee╱)╱ // 0x1e08 @0x14
0x1df4…1e0a at0015 = EOL // 0x1e09 @0x15
0x1df4…1e0a }
0x1e0a…1e17 ab6e 3420 IF ART1=B THEN
0x1e0a…1e17 LineComalBin {
0x1e0a…1e17 ptr = 0xab6e // 0x1e0a @0x0
0x1e0a…1e17 lno = 0x0d5c // 0x1e0c @0x2
0x1e0a…1e17 at0004 = ╱9c╱ IF ╱ // 0x1e0e @0x4
0x1e0a…1e17 at0005 = ╱41╱A╱ // 0x1e0f @0x5
0x1e0a…1e17 at0006 = ╱52╱R╱ // 0x1e10 @0x6
0x1e0a…1e17 at0007 = ╱54╱T╱ // 0x1e11 @0x7
0x1e0a…1e17 at0008 = ╱31╱1╱ // 0x1e12 @0x8
0x1e0a…1e17 at0009 = ╱dc╱=╱ // 0x1e13 @0x9
0x1e0a…1e17 at000a = ╱42╱B╱ // 0x1e14 @0xa
0x1e0a…1e17 at000b = ╱b6╱ THEN ╱ // 0x1e15 @0xb
0x1e0a…1e17 at000c = EOL // 0x1e16 @0xc
0x1e0a…1e17 }
0x1e17…1e54 abab 3430 PRINT TAB(21);"Kontospørgeprogram";TAB(61);"Dato:";DAT$
0x1e17…1e54 LineComalBin {
0x1e17…1e54 ptr = 0xabab // 0x1e17 @0x0
0x1e17…1e54 lno = 0x0d66 // 0x1e19 @0x2
0x1e17…1e54 at0004 = ╱92╱ PRINT ╱ // 0x1e1b @0x4
0x1e17…1e54 at0005 = ╱d2╱TAB╱ // 0x1e1c @0x5
0x1e17…1e54 at0006 = ╱ed╱(╱ // 0x1e1d @0x6
0x1e17…1e54 at0007 = ╱32╱2╱ // 0x1e1e @0x7
0x1e17…1e54 at0008 = ╱31╱1╱ // 0x1e1f @0x8
0x1e17…1e54 at0009 = ╱fe0000a805╱ // 0x1e20 @0x9
0x1e17…1e54 at000e = ╱ee╱)╱ // 0x1e25 @0xe
0x1e17…1e54 at000f = ╱eb╱;╱ // 0x1e26 @0xf
0x1e17…1e54 at0010 = ╱22╱"╱ // 0x1e27 @0x10
0x1e17…1e54 at0011 = ╱4b╱K╱ // 0x1e28 @0x11
0x1e17…1e54 at0012 = ╱6f╱o╱ // 0x1e29 @0x12
0x1e17…1e54 at0013 = ╱6e╱n╱ // 0x1e2a @0x13
0x1e17…1e54 at0014 = ╱74╱t╱ // 0x1e2b @0x14
0x1e17…1e54 at0015 = ╱6f╱o╱ // 0x1e2c @0x15
0x1e17…1e54 at0016 = ╱73╱s╱ // 0x1e2d @0x16
0x1e17…1e54 at0017 = ╱70╱p╱ // 0x1e2e @0x17
0x1e17…1e54 at0018 = ╱7c╱ø╱ // 0x1e2f @0x18
0x1e17…1e54 at0019 = ╱72╱r╱ // 0x1e30 @0x19
0x1e17…1e54 at001a = ╱67╱g╱ // 0x1e31 @0x1a
0x1e17…1e54 at001b = ╱65╱e╱ // 0x1e32 @0x1b
0x1e17…1e54 at001c = ╱70╱p╱ // 0x1e33 @0x1c
0x1e17…1e54 at001d = ╱72╱r╱ // 0x1e34 @0x1d
0x1e17…1e54 at001e = ╱6f╱o╱ // 0x1e35 @0x1e
0x1e17…1e54 at001f = ╱67╱g╱ // 0x1e36 @0x1f
0x1e17…1e54 at0020 = ╱72╱r╱ // 0x1e37 @0x20
0x1e17…1e54 at0021 = ╱61╱a╱ // 0x1e38 @0x21
0x1e17…1e54 at0022 = ╱6d╱m╱ // 0x1e39 @0x22
0x1e17…1e54 at0023 = ╱22╱"╱ // 0x1e3a @0x23
0x1e17…1e54 at0024 = ╱eb╱;╱ // 0x1e3b @0x24
0x1e17…1e54 at0025 = ╱d2╱TAB╱ // 0x1e3c @0x25
0x1e17…1e54 at0026 = ╱ed╱(╱ // 0x1e3d @0x26
0x1e17…1e54 at0027 = ╱36╱6╱ // 0x1e3e @0x27
0x1e17…1e54 at0028 = ╱31╱1╱ // 0x1e3f @0x28
0x1e17…1e54 at0029 = ╱fe0000f406╱ // 0x1e40 @0x29
0x1e17…1e54 at002e = ╱ee╱)╱ // 0x1e45 @0x2e
0x1e17…1e54 at002f = ╱eb╱;╱ // 0x1e46 @0x2f
0x1e17…1e54 at0030 = ╱22╱"╱ // 0x1e47 @0x30
0x1e17…1e54 at0031 = ╱44╱D╱ // 0x1e48 @0x31
0x1e17…1e54 at0032 = ╱61╱a╱ // 0x1e49 @0x32
0x1e17…1e54 at0033 = ╱74╱t╱ // 0x1e4a @0x33
0x1e17…1e54 at0034 = ╱6f╱o╱ // 0x1e4b @0x34
0x1e17…1e54 at0035 = ╱3a╱:╱ // 0x1e4c @0x35
0x1e17…1e54 at0036 = ╱22╱"╱ // 0x1e4d @0x36
0x1e17…1e54 at0037 = ╱eb╱;╱ // 0x1e4e @0x37
0x1e17…1e54 at0038 = ╱44╱D╱ // 0x1e4f @0x38
0x1e17…1e54 at0039 = ╱41╱A╱ // 0x1e50 @0x39
0x1e17…1e54 at003a = ╱54╱T╱ // 0x1e51 @0x3a
0x1e17…1e54 at003b = ╱ef╱$╱ // 0x1e52 @0x3b
0x1e17…1e54 at003c = EOL // 0x1e53 @0x3c
0x1e17…1e54 }
0x1e54…1e5a abb1 3440 ELSE
0x1e54…1e5a LineComalBin {
0x1e54…1e5a ptr = 0xabb1 // 0x1e54 @0x0
0x1e54…1e5a lno = 0x0d70 // 0x1e56 @0x2
0x1e54…1e5a at0004 = ╱9a╱ ELSE ╱ // 0x1e58 @0x4
0x1e54…1e5a at0005 = EOL // 0x1e59 @0x5
0x1e54…1e5a }
0x1e5a…1e63 abba 3450 CURSOR E,E
0x1e5a…1e63 LineComalBin {
0x1e5a…1e63 ptr = 0xabba // 0x1e5a @0x0
0x1e5a…1e63 lno = 0x0d7a // 0x1e5c @0x2
0x1e5a…1e63 at0004 = ╱a1╱ CURSOR ╱ // 0x1e5e @0x4
0x1e5a…1e63 at0005 = ╱45╱E╱ // 0x1e5f @0x5
0x1e5a…1e63 at0006 = ╱ec╱,╱ // 0x1e60 @0x6
0x1e5a…1e63 at0007 = ╱45╱E╱ // 0x1e61 @0x7
0x1e5a…1e63 at0008 = EOL // 0x1e62 @0x8
0x1e5a…1e63 }
0x1e63…1e84 abdb 3460 PRINT "Kontospørgeprogram Nr:";
0x1e63…1e84 LineComalBin {
0x1e63…1e84 ptr = 0xabdb // 0x1e63 @0x0
0x1e63…1e84 lno = 0x0d84 // 0x1e65 @0x2
0x1e63…1e84 at0004 = ╱92╱ PRINT ╱ // 0x1e67 @0x4
0x1e63…1e84 at0005 = ╱22╱"╱ // 0x1e68 @0x5
0x1e63…1e84 at0006 = ╱4b╱K╱ // 0x1e69 @0x6
0x1e63…1e84 at0007 = ╱6f╱o╱ // 0x1e6a @0x7
0x1e63…1e84 at0008 = ╱6e╱n╱ // 0x1e6b @0x8
0x1e63…1e84 at0009 = ╱74╱t╱ // 0x1e6c @0x9
0x1e63…1e84 at000a = ╱6f╱o╱ // 0x1e6d @0xa
0x1e63…1e84 at000b = ╱73╱s╱ // 0x1e6e @0xb
0x1e63…1e84 at000c = ╱70╱p╱ // 0x1e6f @0xc
0x1e63…1e84 at000d = ╱7c╱ø╱ // 0x1e70 @0xd
0x1e63…1e84 at000e = ╱72╱r╱ // 0x1e71 @0xe
0x1e63…1e84 at000f = ╱67╱g╱ // 0x1e72 @0xf
0x1e63…1e84 at0010 = ╱65╱e╱ // 0x1e73 @0x10
0x1e63…1e84 at0011 = ╱70╱p╱ // 0x1e74 @0x11
0x1e63…1e84 at0012 = ╱72╱r╱ // 0x1e75 @0x12
0x1e63…1e84 at0013 = ╱6f╱o╱ // 0x1e76 @0x13
0x1e63…1e84 at0014 = ╱67╱g╱ // 0x1e77 @0x14
0x1e63…1e84 at0015 = ╱72╱r╱ // 0x1e78 @0x15
0x1e63…1e84 at0016 = ╱61╱a╱ // 0x1e79 @0x16
0x1e63…1e84 at0017 = ╱6d╱m╱ // 0x1e7a @0x17
0x1e63…1e84 at0018 = ╱20╱…╱ // 0x1e7b @0x18
0x1e63…1e84 at0019 = ╱20╱…╱ // 0x1e7c @0x19
0x1e63…1e84 at001a = ╱20╱…╱ // 0x1e7d @0x1a
0x1e63…1e84 at001b = ╱4e╱N╱ // 0x1e7e @0x1b
0x1e63…1e84 at001c = ╱72╱r╱ // 0x1e7f @0x1c
0x1e63…1e84 at001d = ╱3a╱:╱ // 0x1e80 @0x1d
0x1e63…1e84 at001e = ╱22╱"╱ // 0x1e81 @0x1e
0x1e63…1e84 at001f = ╱eb╱;╱ // 0x1e82 @0x1f
0x1e63…1e84 at0020 = EOL // 0x1e83 @0x20
0x1e63…1e84 }
0x1e84…1ea1 abf8 3470 PRINT USING "###### Navn :":KONT;
0x1e84…1ea1 LineComalBin {
0x1e84…1ea1 ptr = 0xabf8 // 0x1e84 @0x0
0x1e84…1ea1 lno = 0x0d8e // 0x1e86 @0x2
0x1e84…1ea1 at0004 = ╱92╱ PRINT ╱ // 0x1e88 @0x4
0x1e84…1ea1 at0005 = ╱b9╱ USING ╱ // 0x1e89 @0x5
0x1e84…1ea1 at0006 = ╱22╱"╱ // 0x1e8a @0x6
0x1e84…1ea1 at0007 = ╱23╱#╱ // 0x1e8b @0x7
0x1e84…1ea1 at0008 = ╱23╱#╱ // 0x1e8c @0x8
0x1e84…1ea1 at0009 = ╱23╱#╱ // 0x1e8d @0x9
0x1e84…1ea1 at000a = ╱23╱#╱ // 0x1e8e @0xa
0x1e84…1ea1 at000b = ╱23╱#╱ // 0x1e8f @0xb
0x1e84…1ea1 at000c = ╱23╱#╱ // 0x1e90 @0xc
0x1e84…1ea1 at000d = ╱20╱…╱ // 0x1e91 @0xd
0x1e84…1ea1 at000e = ╱20╱…╱ // 0x1e92 @0xe
0x1e84…1ea1 at000f = ╱4e╱N╱ // 0x1e93 @0xf
0x1e84…1ea1 at0010 = ╱61╱a╱ // 0x1e94 @0x10
0x1e84…1ea1 at0011 = ╱76╱v╱ // 0x1e95 @0x11
0x1e84…1ea1 at0012 = ╱6e╱n╱ // 0x1e96 @0x12
0x1e84…1ea1 at0013 = ╱20╱…╱ // 0x1e97 @0x13
0x1e84…1ea1 at0014 = ╱3a╱:╱ // 0x1e98 @0x14
0x1e84…1ea1 at0015 = ╱22╱"╱ // 0x1e99 @0x15
0x1e84…1ea1 at0016 = ╱f0╱:╱ // 0x1e9a @0x16
0x1e84…1ea1 at0017 = ╱4b╱K╱ // 0x1e9b @0x17
0x1e84…1ea1 at0018 = ╱4f╱O╱ // 0x1e9c @0x18
0x1e84…1ea1 at0019 = ╱4e╱N╱ // 0x1e9d @0x19
0x1e84…1ea1 at001a = ╱54╱T╱ // 0x1e9e @0x1a
0x1e84…1ea1 at001b = ╱eb╱;╱ // 0x1e9f @0x1b
0x1e84…1ea1 at001c = EOL // 0x1ea0 @0x1c
0x1e84…1ea1 }
0x1ea1…1eae ac05 3480 CASE KTAL1 OF
0x1ea1…1eae LineComalBin {
0x1ea1…1eae ptr = 0xac05 // 0x1ea1 @0x0
0x1ea1…1eae lno = 0x0d98 // 0x1ea3 @0x2
0x1ea1…1eae at0004 = ╱a201╱ CASE ╱ // 0x1ea5 @0x4
0x1ea1…1eae at0006 = ╱4b╱K╱ // 0x1ea7 @0x6
0x1ea1…1eae at0007 = ╱54╱T╱ // 0x1ea8 @0x7
0x1ea1…1eae at0008 = ╱41╱A╱ // 0x1ea9 @0x8
0x1ea1…1eae at0009 = ╱4c╱L╱ // 0x1eaa @0x9
0x1ea1…1eae at000a = ╱31╱1╱ // 0x1eab @0xa
0x1ea1…1eae at000b = ╱ba╱ OF ╱ // 0x1eac @0xb
0x1ea1…1eae at000c = EOL // 0x1ead @0xc
0x1ea1…1eae }
0x1eae…1ebf (102,) ac16 3490 PRINT FNAVN$;" ";
0x1eae…1ebf LineComalBin {
0x1eae…1ebf ptr = 0xac16 // 0x1eae @0x0
0x1eae…1ebf lno = 0x0da2 // 0x1eb0 @0x2
0x1eae…1ebf at0004 = ╱92╱ PRINT ╱ // 0x1eb2 @0x4
0x1eae…1ebf at0005 = ╱46╱F╱ // 0x1eb3 @0x5
0x1eae…1ebf at0006 = ╱4e╱N╱ // 0x1eb4 @0x6
0x1eae…1ebf at0007 = ╱41╱A╱ // 0x1eb5 @0x7
0x1eae…1ebf at0008 = ╱56╱V╱ // 0x1eb6 @0x8
0x1eae…1ebf at0009 = ╱4e╱N╱ // 0x1eb7 @0x9
0x1eae…1ebf at000a = ╱ef╱$╱ // 0x1eb8 @0xa
0x1eae…1ebf at000b = ╱eb╱;╱ // 0x1eb9 @0xb
0x1eae…1ebf at000c = ╱22╱"╱ // 0x1eba @0xc
0x1eae…1ebf at000d = ╱20╱…╱ // 0x1ebb @0xd
0x1eae…1ebf at000e = ╱22╱"╱ // 0x1ebc @0xe
0x1eae…1ebf at000f = ╱eb╱;╱ // 0x1ebd @0xf
0x1eae…1ebf at0010 = EOL // 0x1ebe @0x10
0x1eae…1ebf }
0x1ebf…1eca ac21 3500 WHEN DTAL
0x1ebf…1eca LineComalBin {
0x1ebf…1eca ptr = 0xac21 // 0x1ebf @0x0
0x1ebf…1eca lno = 0x0dac // 0x1ec1 @0x2
0x1ebf…1eca at0004 = ╱a301╱ WHEN ╱ // 0x1ec3 @0x4
0x1ebf…1eca at0006 = ╱44╱D╱ // 0x1ec5 @0x6
0x1ebf…1eca at0007 = ╱54╱T╱ // 0x1ec6 @0x7
0x1ebf…1eca at0008 = ╱41╱A╱ // 0x1ec7 @0x8
0x1ebf…1eca at0009 = ╱4c╱L╱ // 0x1ec8 @0x9
0x1ebf…1eca at000a = EOL // 0x1ec9 @0xa
0x1ebf…1eca }
0x1eca…1edd ac34 3510 PRINT DEBNAVN$;" ";
0x1eca…1edd LineComalBin {
0x1eca…1edd ptr = 0xac34 // 0x1eca @0x0
0x1eca…1edd lno = 0x0db6 // 0x1ecc @0x2
0x1eca…1edd at0004 = ╱92╱ PRINT ╱ // 0x1ece @0x4
0x1eca…1edd at0005 = ╱44╱D╱ // 0x1ecf @0x5
0x1eca…1edd at0006 = ╱45╱E╱ // 0x1ed0 @0x6
0x1eca…1edd at0007 = ╱42╱B╱ // 0x1ed1 @0x7
0x1eca…1edd at0008 = ╱4e╱N╱ // 0x1ed2 @0x8
0x1eca…1edd at0009 = ╱41╱A╱ // 0x1ed3 @0x9
0x1eca…1edd at000a = ╱56╱V╱ // 0x1ed4 @0xa
0x1eca…1edd at000b = ╱4e╱N╱ // 0x1ed5 @0xb
0x1eca…1edd at000c = ╱ef╱$╱ // 0x1ed6 @0xc
0x1eca…1edd at000d = ╱eb╱;╱ // 0x1ed7 @0xd
0x1eca…1edd at000e = ╱22╱"╱ // 0x1ed8 @0xe
0x1eca…1edd at000f = ╱20╱…╱ // 0x1ed9 @0xf
0x1eca…1edd at0010 = ╱22╱"╱ // 0x1eda @0x10
0x1eca…1edd at0011 = ╱eb╱;╱ // 0x1edb @0x11
0x1eca…1edd at0012 = EOL // 0x1edc @0x12
0x1eca…1edd }
0x1edd…1ee9 ac40 3520 WHEN KRTAL
0x1edd…1ee9 LineComalBin {
0x1edd…1ee9 ptr = 0xac40 // 0x1edd @0x0
0x1edd…1ee9 lno = 0x0dc0 // 0x1edf @0x2
0x1edd…1ee9 at0004 = ╱a301╱ WHEN ╱ // 0x1ee1 @0x4
0x1edd…1ee9 at0006 = ╱4b╱K╱ // 0x1ee3 @0x6
0x1edd…1ee9 at0007 = ╱52╱R╱ // 0x1ee4 @0x7
0x1edd…1ee9 at0008 = ╱54╱T╱ // 0x1ee5 @0x8
0x1edd…1ee9 at0009 = ╱41╱A╱ // 0x1ee6 @0x9
0x1edd…1ee9 at000a = ╱4c╱L╱ // 0x1ee7 @0xa
0x1edd…1ee9 at000b = EOL // 0x1ee8 @0xb
0x1edd…1ee9 }
0x1ee9…1efc ac53 3530 PRINT KRENAVN$;" ";
0x1ee9…1efc LineComalBin {
0x1ee9…1efc ptr = 0xac53 // 0x1ee9 @0x0
0x1ee9…1efc lno = 0x0dca // 0x1eeb @0x2
0x1ee9…1efc at0004 = ╱92╱ PRINT ╱ // 0x1eed @0x4
0x1ee9…1efc at0005 = ╱4b╱K╱ // 0x1eee @0x5
0x1ee9…1efc at0006 = ╱52╱R╱ // 0x1eef @0x6
0x1ee9…1efc at0007 = ╱45╱E╱ // 0x1ef0 @0x7
0x1ee9…1efc at0008 = ╱4e╱N╱ // 0x1ef1 @0x8
0x1ee9…1efc at0009 = ╱41╱A╱ // 0x1ef2 @0x9
0x1ee9…1efc at000a = ╱56╱V╱ // 0x1ef3 @0xa
0x1ee9…1efc at000b = ╱4e╱N╱ // 0x1ef4 @0xb
0x1ee9…1efc at000c = ╱ef╱$╱ // 0x1ef5 @0xc
0x1ee9…1efc at000d = ╱eb╱;╱ // 0x1ef6 @0xd
0x1ee9…1efc at000e = ╱22╱"╱ // 0x1ef7 @0xe
0x1ee9…1efc at000f = ╱20╱…╱ // 0x1ef8 @0xf
0x1ee9…1efc at0010 = ╱22╱"╱ // 0x1ef9 @0x10
0x1ee9…1efc at0011 = ╱eb╱;╱ // 0x1efa @0x11
0x1ee9…1efc at0012 = EOL // 0x1efb @0x12
0x1ee9…1efc }
0x1efc…1f02 ac59 3540 ENDCASE
0x1efc…1f02 LineComalBin {
0x1efc…1f02 ptr = 0xac59 // 0x1efc @0x0
0x1efc…1f02 lno = 0x0dd4 // 0x1efe @0x2
0x1efc…1f02 at0004 = ╱a4╱ ENDCASE ╱ // 0x1f00 @0x4
0x1efc…1f02 at0005 = EOL // 0x1f01 @0x5
0x1efc…1f02 }
0x1f02…1f20 ac77 3550 PRINT TAB(63);" Dato:";DAT$
0x1f02…1f20 LineComalBin {
0x1f02…1f20 ptr = 0xac77 // 0x1f02 @0x0
0x1f02…1f20 lno = 0x0dde // 0x1f04 @0x2
0x1f02…1f20 at0004 = ╱92╱ PRINT ╱ // 0x1f06 @0x4
0x1f02…1f20 at0005 = ╱d2╱TAB╱ // 0x1f07 @0x5
0x1f02…1f20 at0006 = ╱ed╱(╱ // 0x1f08 @0x6
0x1f02…1f20 at0007 = ╱36╱6╱ // 0x1f09 @0x7
0x1f02…1f20 at0008 = ╱33╱3╱ // 0x1f0a @0x8
0x1f02…1f20 at0009 = ╱fe0000fc06╱ // 0x1f0b @0x9
0x1f02…1f20 at000e = ╱ee╱)╱ // 0x1f10 @0xe
0x1f02…1f20 at000f = ╱eb╱;╱ // 0x1f11 @0xf
0x1f02…1f20 at0010 = ╱22╱"╱ // 0x1f12 @0x10
0x1f02…1f20 at0011 = ╱20╱…╱ // 0x1f13 @0x11
0x1f02…1f20 at0012 = ╱44╱D╱ // 0x1f14 @0x12
0x1f02…1f20 at0013 = ╱61╱a╱ // 0x1f15 @0x13
0x1f02…1f20 at0014 = ╱74╱t╱ // 0x1f16 @0x14
0x1f02…1f20 at0015 = ╱6f╱o╱ // 0x1f17 @0x15
0x1f02…1f20 at0016 = ╱3a╱:╱ // 0x1f18 @0x16
0x1f02…1f20 at0017 = ╱22╱"╱ // 0x1f19 @0x17
0x1f02…1f20 at0018 = ╱eb╱;╱ // 0x1f1a @0x18
0x1f02…1f20 at0019 = ╱44╱D╱ // 0x1f1b @0x19
0x1f02…1f20 at001a = ╱41╱A╱ // 0x1f1c @0x1a
0x1f02…1f20 at001b = ╱54╱T╱ // 0x1f1d @0x1b
0x1f02…1f20 at001c = ╱ef╱$╱ // 0x1f1e @0x1c
0x1f02…1f20 at001d = EOL // 0x1f1f @0x1d
0x1f02…1f20 }
0x1f20…1f26 ac7d 3560 ENDIF
0x1f20…1f26 LineComalBin {
0x1f20…1f26 ptr = 0xac7d // 0x1f20 @0x0
0x1f20…1f26 lno = 0x0de8 // 0x1f22 @0x2
0x1f20…1f26 at0004 = ╱9b╱ ENDIF ╱ // 0x1f24 @0x4
0x1f20…1f26 at0005 = EOL // 0x1f25 @0x5
0x1f20…1f26 }
0x1f26…1f2c ac83 3570 ENDPROC
0x1f26…1f2c LineComalBin {
0x1f26…1f2c ptr = 0xac83 // 0x1f26 @0x0
0x1f26…1f2c lno = 0x0df2 // 0x1f28 @0x2
0x1f26…1f2c at0004 = ╱9f╱ ENDPROC ╱ // 0x1f2a @0x4
0x1f26…1f2c at0005 = EOL // 0x1f2b @0x5
0x1f26…1f2c }
0x1f2c…1f4a aca1 3580 PROC UDSKRIV(PKODE1,SU4,LNR1)
0x1f2c…1f4a LineComalBin {
0x1f2c…1f4a ptr = 0xaca1 // 0x1f2c @0x0
0x1f2c…1f4a lno = 0x0dfc // 0x1f2e @0x2
0x1f2c…1f4a at0004 = ╱9e╱ PROC ╱ // 0x1f30 @0x4
0x1f2c…1f4a at0005 = ╱55╱U╱ // 0x1f31 @0x5
0x1f2c…1f4a at0006 = ╱44╱D╱ // 0x1f32 @0x6
0x1f2c…1f4a at0007 = ╱53╱S╱ // 0x1f33 @0x7
0x1f2c…1f4a at0008 = ╱4b╱K╱ // 0x1f34 @0x8
0x1f2c…1f4a at0009 = ╱52╱R╱ // 0x1f35 @0x9
0x1f2c…1f4a at000a = ╱49╱I╱ // 0x1f36 @0xa
0x1f2c…1f4a at000b = ╱56╱V╱ // 0x1f37 @0xb
0x1f2c…1f4a at000c = ╱ed╱(╱ // 0x1f38 @0xc
0x1f2c…1f4a at000d = ╱50╱P╱ // 0x1f39 @0xd
0x1f2c…1f4a at000e = ╱4b╱K╱ // 0x1f3a @0xe
0x1f2c…1f4a at000f = ╱4f╱O╱ // 0x1f3b @0xf
0x1f2c…1f4a at0010 = ╱44╱D╱ // 0x1f3c @0x10
0x1f2c…1f4a at0011 = ╱45╱E╱ // 0x1f3d @0x11
0x1f2c…1f4a at0012 = ╱31╱1╱ // 0x1f3e @0x12
0x1f2c…1f4a at0013 = ╱ec╱,╱ // 0x1f3f @0x13
0x1f2c…1f4a at0014 = ╱53╱S╱ // 0x1f40 @0x14
0x1f2c…1f4a at0015 = ╱55╱U╱ // 0x1f41 @0x15
0x1f2c…1f4a at0016 = ╱34╱4╱ // 0x1f42 @0x16
0x1f2c…1f4a at0017 = ╱ec╱,╱ // 0x1f43 @0x17
0x1f2c…1f4a at0018 = ╱4c╱L╱ // 0x1f44 @0x18
0x1f2c…1f4a at0019 = ╱4e╱N╱ // 0x1f45 @0x19
0x1f2c…1f4a at001a = ╱52╱R╱ // 0x1f46 @0x1a
0x1f2c…1f4a at001b = ╱31╱1╱ // 0x1f47 @0x1b
0x1f2c…1f4a at001c = ╱ee╱)╱ // 0x1f48 @0x1c
0x1f2c…1f4a at001d = EOL // 0x1f49 @0x1d
0x1f2c…1f4a }
0x1f4a…1f7d acd4 3590 EXEC LINIEUD(DDATO,BILAG,TEKST$,BELØB$,SU4$,ENTKO)
0x1f4a…1f7d LineComalBin {
0x1f4a…1f7d ptr = 0xacd4 // 0x1f4a @0x0
0x1f4a…1f7d lno = 0x0e06 // 0x1f4c @0x2
0x1f4a…1f7d at0004 = ╱9d╱ EXEC ╱ // 0x1f4e @0x4
0x1f4a…1f7d at0005 = ╱4c╱L╱ // 0x1f4f @0x5
0x1f4a…1f7d at0006 = ╱49╱I╱ // 0x1f50 @0x6
0x1f4a…1f7d at0007 = ╱4e╱N╱ // 0x1f51 @0x7
0x1f4a…1f7d at0008 = ╱49╱I╱ // 0x1f52 @0x8
0x1f4a…1f7d at0009 = ╱45╱E╱ // 0x1f53 @0x9
0x1f4a…1f7d at000a = ╱55╱U╱ // 0x1f54 @0xa
0x1f4a…1f7d at000b = ╱44╱D╱ // 0x1f55 @0xb
0x1f4a…1f7d at000c = ╱ed╱(╱ // 0x1f56 @0xc
0x1f4a…1f7d at000d = ╱44╱D╱ // 0x1f57 @0xd
0x1f4a…1f7d at000e = ╱44╱D╱ // 0x1f58 @0xe
0x1f4a…1f7d at000f = ╱41╱A╱ // 0x1f59 @0xf
0x1f4a…1f7d at0010 = ╱54╱T╱ // 0x1f5a @0x10
0x1f4a…1f7d at0011 = ╱4f╱O╱ // 0x1f5b @0x11
0x1f4a…1f7d at0012 = ╱ec╱,╱ // 0x1f5c @0x12
0x1f4a…1f7d at0013 = ╱42╱B╱ // 0x1f5d @0x13
0x1f4a…1f7d at0014 = ╱49╱I╱ // 0x1f5e @0x14
0x1f4a…1f7d at0015 = ╱4c╱L╱ // 0x1f5f @0x15
0x1f4a…1f7d at0016 = ╱41╱A╱ // 0x1f60 @0x16
0x1f4a…1f7d at0017 = ╱47╱G╱ // 0x1f61 @0x17
0x1f4a…1f7d at0018 = ╱ec╱,╱ // 0x1f62 @0x18
0x1f4a…1f7d at0019 = ╱54╱T╱ // 0x1f63 @0x19
0x1f4a…1f7d at001a = ╱45╱E╱ // 0x1f64 @0x1a
0x1f4a…1f7d at001b = ╱4b╱K╱ // 0x1f65 @0x1b
0x1f4a…1f7d at001c = ╱53╱S╱ // 0x1f66 @0x1c
0x1f4a…1f7d at001d = ╱54╱T╱ // 0x1f67 @0x1d
0x1f4a…1f7d at001e = ╱ef╱$╱ // 0x1f68 @0x1e
0x1f4a…1f7d at001f = ╱ec╱,╱ // 0x1f69 @0x1f
0x1f4a…1f7d at0020 = ╱42╱B╱ // 0x1f6a @0x20
0x1f4a…1f7d at0021 = ╱45╱E╱ // 0x1f6b @0x21
0x1f4a…1f7d at0022 = ╱4c╱L╱ // 0x1f6c @0x22
0x1f4a…1f7d at0023 = ╱5c╱Ø╱ // 0x1f6d @0x23
0x1f4a…1f7d at0024 = ╱42╱B╱ // 0x1f6e @0x24
0x1f4a…1f7d at0025 = ╱ef╱$╱ // 0x1f6f @0x25
0x1f4a…1f7d at0026 = ╱ec╱,╱ // 0x1f70 @0x26
0x1f4a…1f7d at0027 = ╱53╱S╱ // 0x1f71 @0x27
0x1f4a…1f7d at0028 = ╱55╱U╱ // 0x1f72 @0x28
0x1f4a…1f7d at0029 = ╱34╱4╱ // 0x1f73 @0x29
0x1f4a…1f7d at002a = ╱ef╱$╱ // 0x1f74 @0x2a
0x1f4a…1f7d at002b = ╱ec╱,╱ // 0x1f75 @0x2b
0x1f4a…1f7d at002c = ╱45╱E╱ // 0x1f76 @0x2c
0x1f4a…1f7d at002d = ╱4e╱N╱ // 0x1f77 @0x2d
0x1f4a…1f7d at002e = ╱54╱T╱ // 0x1f78 @0x2e
0x1f4a…1f7d at002f = ╱4b╱K╱ // 0x1f79 @0x2f
0x1f4a…1f7d at0030 = ╱4f╱O╱ // 0x1f7a @0x30
0x1f4a…1f7d at0031 = ╱ee╱)╱ // 0x1f7b @0x31
0x1f4a…1f7d at0032 = EOL // 0x1f7c @0x32
0x1f4a…1f7d }
0x1f7d…1f8d ace4 3600 LNR1=LNR1+E
0x1f7d…1f8d LineComalBin {
0x1f7d…1f8d ptr = 0xace4 // 0x1f7d @0x0
0x1f7d…1f8d lno = 0x0e10 // 0x1f7f @0x2
0x1f7d…1f8d at0004 = ╱4c╱L╱ // 0x1f81 @0x4
0x1f7d…1f8d at0005 = ╱4e╱N╱ // 0x1f82 @0x5
0x1f7d…1f8d at0006 = ╱52╱R╱ // 0x1f83 @0x6
0x1f7d…1f8d at0007 = ╱31╱1╱ // 0x1f84 @0x7
0x1f7d…1f8d at0008 = ╱dc╱=╱ // 0x1f85 @0x8
0x1f7d…1f8d at0009 = ╱4c╱L╱ // 0x1f86 @0x9
0x1f7d…1f8d at000a = ╱4e╱N╱ // 0x1f87 @0xa
0x1f7d…1f8d at000b = ╱52╱R╱ // 0x1f88 @0xb
0x1f7d…1f8d at000c = ╱31╱1╱ // 0x1f89 @0xc
0x1f7d…1f8d at000d = ╱e2╱+╱ // 0x1f8a @0xd
0x1f7d…1f8d at000e = ╱45╱E╱ // 0x1f8b @0xe
0x1f7d…1f8d at000f = EOL // 0x1f8c @0xf
0x1f7d…1f8d }
0x1f8d…1fb9 ad10 3610 IF LNR1=F+6*(SKRIV)-6*(SKRIV1) THEN
0x1f8d…1fb9 LineComalBin {
0x1f8d…1fb9 ptr = 0xad10 // 0x1f8d @0x0
0x1f8d…1fb9 lno = 0x0e1a // 0x1f8f @0x2
0x1f8d…1fb9 at0004 = ╱9c╱ IF ╱ // 0x1f91 @0x4
0x1f8d…1fb9 at0005 = ╱4c╱L╱ // 0x1f92 @0x5
0x1f8d…1fb9 at0006 = ╱4e╱N╱ // 0x1f93 @0x6
0x1f8d…1fb9 at0007 = ╱52╱R╱ // 0x1f94 @0x7
0x1f8d…1fb9 at0008 = ╱31╱1╱ // 0x1f95 @0x8
0x1f8d…1fb9 at0009 = ╱dc╱=╱ // 0x1f96 @0x9
0x1f8d…1fb9 at000a = ╱46╱F╱ // 0x1f97 @0xa
0x1f8d…1fb9 at000b = ╱e2╱+╱ // 0x1f98 @0xb
0x1f8d…1fb9 at000c = ╱36╱6╱ // 0x1f99 @0xc
0x1f8d…1fb9 at000d = ╱fe0000c003╱ // 0x1f9a @0xd
0x1f8d…1fb9 at0012 = ╱e4╱*╱ // 0x1f9f @0x12
0x1f8d…1fb9 at0013 = ╱ed╱(╱ // 0x1fa0 @0x13
0x1f8d…1fb9 at0014 = ╱53╱S╱ // 0x1fa1 @0x14
0x1f8d…1fb9 at0015 = ╱4b╱K╱ // 0x1fa2 @0x15
0x1f8d…1fb9 at0016 = ╱52╱R╱ // 0x1fa3 @0x16
0x1f8d…1fb9 at0017 = ╱49╱I╱ // 0x1fa4 @0x17
0x1f8d…1fb9 at0018 = ╱56╱V╱ // 0x1fa5 @0x18
0x1f8d…1fb9 at0019 = ╱ee╱)╱ // 0x1fa6 @0x19
0x1f8d…1fb9 at001a = ╱e3╱-╱ // 0x1fa7 @0x1a
0x1f8d…1fb9 at001b = ╱36╱6╱ // 0x1fa8 @0x1b
0x1f8d…1fb9 at001c = ╱fe0000c003╱ // 0x1fa9 @0x1c
0x1f8d…1fb9 at0021 = ╱e4╱*╱ // 0x1fae @0x21
0x1f8d…1fb9 at0022 = ╱ed╱(╱ // 0x1faf @0x22
0x1f8d…1fb9 at0023 = ╱53╱S╱ // 0x1fb0 @0x23
0x1f8d…1fb9 at0024 = ╱4b╱K╱ // 0x1fb1 @0x24
0x1f8d…1fb9 at0025 = ╱52╱R╱ // 0x1fb2 @0x25
0x1f8d…1fb9 at0026 = ╱49╱I╱ // 0x1fb3 @0x26
0x1f8d…1fb9 at0027 = ╱56╱V╱ // 0x1fb4 @0x27
0x1f8d…1fb9 at0028 = ╱31╱1╱ // 0x1fb5 @0x28
0x1f8d…1fb9 at0029 = ╱ee╱)╱ // 0x1fb6 @0x29
0x1f8d…1fb9 at002a = ╱b6╱ THEN ╱ // 0x1fb7 @0x2a
0x1f8d…1fb9 at002b = EOL // 0x1fb8 @0x2b
0x1f8d…1fb9 }
0x1fb9…1fc8 ad1f 3620 IF PKODE1=E THEN
0x1fb9…1fc8 LineComalBin {
0x1fb9…1fc8 ptr = 0xad1f // 0x1fb9 @0x0
0x1fb9…1fc8 lno = 0x0e24 // 0x1fbb @0x2
0x1fb9…1fc8 at0004 = ╱9c╱ IF ╱ // 0x1fbd @0x4
0x1fb9…1fc8 at0005 = ╱50╱P╱ // 0x1fbe @0x5
0x1fb9…1fc8 at0006 = ╱4b╱K╱ // 0x1fbf @0x6
0x1fb9…1fc8 at0007 = ╱4f╱O╱ // 0x1fc0 @0x7
0x1fb9…1fc8 at0008 = ╱44╱D╱ // 0x1fc1 @0x8
0x1fb9…1fc8 at0009 = ╱45╱E╱ // 0x1fc2 @0x9
0x1fb9…1fc8 at000a = ╱31╱1╱ // 0x1fc3 @0xa
0x1fb9…1fc8 at000b = ╱dc╱=╱ // 0x1fc4 @0xb
0x1fb9…1fc8 at000c = ╱45╱E╱ // 0x1fc5 @0xc
0x1fb9…1fc8 at000d = ╱b6╱ THEN ╱ // 0x1fc6 @0xd
0x1fb9…1fc8 at000e = EOL // 0x1fc7 @0xe
0x1fb9…1fc8 }
0x1fc8…1fed ad44 3630 IF SKRIV1=B THEN PRINT CHR(10);CHR(10)
0x1fc8…1fed LineComalBin {
0x1fc8…1fed ptr = 0xad44 // 0x1fc8 @0x0
0x1fc8…1fed lno = 0x0e2e // 0x1fca @0x2
0x1fc8…1fed at0004 = ╱82╱ IF ╱ // 0x1fcc @0x4
0x1fc8…1fed at0005 = ╱53╱S╱ // 0x1fcd @0x5
0x1fc8…1fed at0006 = ╱4b╱K╱ // 0x1fce @0x6
0x1fc8…1fed at0007 = ╱52╱R╱ // 0x1fcf @0x7
0x1fc8…1fed at0008 = ╱49╱I╱ // 0x1fd0 @0x8
0x1fc8…1fed at0009 = ╱56╱V╱ // 0x1fd1 @0x9
0x1fc8…1fed at000a = ╱31╱1╱ // 0x1fd2 @0xa
0x1fc8…1fed at000b = ╱dc╱=╱ // 0x1fd3 @0xb
0x1fc8…1fed at000c = ╱42╱B╱ // 0x1fd4 @0xc
0x1fc8…1fed at000d = ╱b6╱ THEN ╱ // 0x1fd5 @0xd
0x1fc8…1fed at000e = ╱92╱ PRINT ╱ // 0x1fd6 @0xe
0x1fc8…1fed at000f = ╱cf╱CHR╱ // 0x1fd7 @0xf
0x1fc8…1fed at0010 = ╱ed╱(╱ // 0x1fd8 @0x10
0x1fc8…1fed at0011 = ╱31╱1╱ // 0x1fd9 @0x11
0x1fc8…1fed at0012 = ╱30╱0╱ // 0x1fda @0x12
0x1fc8…1fed at0013 = ╱fe0000a004╱ // 0x1fdb @0x13
0x1fc8…1fed at0018 = ╱ee╱)╱ // 0x1fe0 @0x18
0x1fc8…1fed at0019 = ╱eb╱;╱ // 0x1fe1 @0x19
0x1fc8…1fed at001a = ╱cf╱CHR╱ // 0x1fe2 @0x1a
0x1fc8…1fed at001b = ╱ed╱(╱ // 0x1fe3 @0x1b
0x1fc8…1fed at001c = ╱31╱1╱ // 0x1fe4 @0x1c
0x1fc8…1fed at001d = ╱30╱0╱ // 0x1fe5 @0x1d
0x1fc8…1fed at001e = ╱fe0000a004╱ // 0x1fe6 @0x1e
0x1fc8…1fed at0023 = ╱ee╱)╱ // 0x1feb @0x23
0x1fc8…1fed at0024 = EOL // 0x1fec @0x24
0x1fc8…1fed }
0x1fed…202b ad82 3640 EXEC BUDSKRIV(TAL4$,1,SU4$,TAL4$,TAL4$,TAL4$,TAL4$,LNR1)
0x1fed…202b LineComalBin {
0x1fed…202b ptr = 0xad82 // 0x1fed @0x0
0x1fed…202b lno = 0x0e38 // 0x1fef @0x2
0x1fed…202b at0004 = ╱9d╱ EXEC ╱ // 0x1ff1 @0x4
0x1fed…202b at0005 = ╱42╱B╱ // 0x1ff2 @0x5
0x1fed…202b at0006 = ╱55╱U╱ // 0x1ff3 @0x6
0x1fed…202b at0007 = ╱44╱D╱ // 0x1ff4 @0x7
0x1fed…202b at0008 = ╱53╱S╱ // 0x1ff5 @0x8
0x1fed…202b at0009 = ╱4b╱K╱ // 0x1ff6 @0x9
0x1fed…202b at000a = ╱52╱R╱ // 0x1ff7 @0xa
0x1fed…202b at000b = ╱49╱I╱ // 0x1ff8 @0xb
0x1fed…202b at000c = ╱56╱V╱ // 0x1ff9 @0xc
0x1fed…202b at000d = ╱ed╱(╱ // 0x1ffa @0xd
0x1fed…202b at000e = ╱54╱T╱ // 0x1ffb @0xe
0x1fed…202b at000f = ╱41╱A╱ // 0x1ffc @0xf
0x1fed…202b at0010 = ╱4c╱L╱ // 0x1ffd @0x10
0x1fed…202b at0011 = ╱34╱4╱ // 0x1ffe @0x11
0x1fed…202b at0012 = ╱ef╱$╱ // 0x1fff @0x12
0x1fed…202b at0013 = ╱ec╱,╱ // 0x2000 @0x13
0x1fed…202b at0014 = ╱31╱1╱ // 0x2001 @0x14
0x1fed…202b at0015 = ╱fe00008001╱ // 0x2002 @0x15
0x1fed…202b at001a = ╱ec╱,╱ // 0x2007 @0x1a
0x1fed…202b at001b = ╱53╱S╱ // 0x2008 @0x1b
0x1fed…202b at001c = ╱55╱U╱ // 0x2009 @0x1c
0x1fed…202b at001d = ╱34╱4╱ // 0x200a @0x1d
0x1fed…202b at001e = ╱ef╱$╱ // 0x200b @0x1e
0x1fed…202b at001f = ╱ec╱,╱ // 0x200c @0x1f
0x1fed…202b at0020 = ╱54╱T╱ // 0x200d @0x20
0x1fed…202b at0021 = ╱41╱A╱ // 0x200e @0x21
0x1fed…202b at0022 = ╱4c╱L╱ // 0x200f @0x22
0x1fed…202b at0023 = ╱34╱4╱ // 0x2010 @0x23
0x1fed…202b at0024 = ╱ef╱$╱ // 0x2011 @0x24
0x1fed…202b at0025 = ╱ec╱,╱ // 0x2012 @0x25
0x1fed…202b at0026 = ╱54╱T╱ // 0x2013 @0x26
0x1fed…202b at0027 = ╱41╱A╱ // 0x2014 @0x27
0x1fed…202b at0028 = ╱4c╱L╱ // 0x2015 @0x28
0x1fed…202b at0029 = ╱34╱4╱ // 0x2016 @0x29
0x1fed…202b at002a = ╱ef╱$╱ // 0x2017 @0x2a
0x1fed…202b at002b = ╱ec╱,╱ // 0x2018 @0x2b
0x1fed…202b at002c = ╱54╱T╱ // 0x2019 @0x2c
0x1fed…202b at002d = ╱41╱A╱ // 0x201a @0x2d
0x1fed…202b at002e = ╱4c╱L╱ // 0x201b @0x2e
0x1fed…202b at002f = ╱34╱4╱ // 0x201c @0x2f
0x1fed…202b at0030 = ╱ef╱$╱ // 0x201d @0x30
0x1fed…202b at0031 = ╱ec╱,╱ // 0x201e @0x31
0x1fed…202b at0032 = ╱54╱T╱ // 0x201f @0x32
0x1fed…202b at0033 = ╱41╱A╱ // 0x2020 @0x33
0x1fed…202b at0034 = ╱4c╱L╱ // 0x2021 @0x34
0x1fed…202b at0035 = ╱34╱4╱ // 0x2022 @0x35
0x1fed…202b at0036 = ╱ef╱$╱ // 0x2023 @0x36
0x1fed…202b at0037 = ╱ec╱,╱ // 0x2024 @0x37
0x1fed…202b at0038 = ╱4c╱L╱ // 0x2025 @0x38
0x1fed…202b at0039 = ╱4e╱N╱ // 0x2026 @0x39
0x1fed…202b at003a = ╱52╱R╱ // 0x2027 @0x3a
0x1fed…202b at003b = ╱31╱1╱ // 0x2028 @0x3b
0x1fed…202b at003c = ╱ee╱)╱ // 0x2029 @0x3c
0x1fed…202b at003d = EOL // 0x202a @0x3d
0x1fed…202b }
0x202b…2039 ad90 3650 EXEC HUDSKRIV
0x202b…2039 LineComalBin {
0x202b…2039 ptr = 0xad90 // 0x202b @0x0
0x202b…2039 lno = 0x0e42 // 0x202d @0x2
0x202b…2039 at0004 = ╱9d╱ EXEC ╱ // 0x202f @0x4
0x202b…2039 at0005 = ╱48╱H╱ // 0x2030 @0x5
0x202b…2039 at0006 = ╱55╱U╱ // 0x2031 @0x6
0x202b…2039 at0007 = ╱44╱D╱ // 0x2032 @0x7
0x202b…2039 at0008 = ╱53╱S╱ // 0x2033 @0x8
0x202b…2039 at0009 = ╱4b╱K╱ // 0x2034 @0x9
0x202b…2039 at000a = ╱52╱R╱ // 0x2035 @0xa
0x202b…2039 at000b = ╱49╱I╱ // 0x2036 @0xb
0x202b…2039 at000c = ╱56╱V╱ // 0x2037 @0xc
0x202b…2039 at000d = EOL // 0x2038 @0xd
0x202b…2039 }
0x2039…2048 ad9f 3660 IF SKRIV1=E THEN
0x2039…2048 LineComalBin {
0x2039…2048 ptr = 0xad9f // 0x2039 @0x0
0x2039…2048 lno = 0x0e4c // 0x203b @0x2
0x2039…2048 at0004 = ╱9c╱ IF ╱ // 0x203d @0x4
0x2039…2048 at0005 = ╱53╱S╱ // 0x203e @0x5
0x2039…2048 at0006 = ╱4b╱K╱ // 0x203f @0x6
0x2039…2048 at0007 = ╱52╱R╱ // 0x2040 @0x7
0x2039…2048 at0008 = ╱49╱I╱ // 0x2041 @0x8
0x2039…2048 at0009 = ╱56╱V╱ // 0x2042 @0x9
0x2039…2048 at000a = ╱31╱1╱ // 0x2043 @0xa
0x2039…2048 at000b = ╱dc╱=╱ // 0x2044 @0xb
0x2039…2048 at000c = ╱45╱E╱ // 0x2045 @0xc
0x2039…2048 at000d = ╱b6╱ THEN ╱ // 0x2046 @0xd
0x2039…2048 at000e = EOL // 0x2047 @0xe
0x2039…2048 }
0x2048…2051 ada8 3665 PRINT " "
0x2048…2051 LineComalBin {
0x2048…2051 ptr = 0xada8 // 0x2048 @0x0
0x2048…2051 lno = 0x0e51 // 0x204a @0x2
0x2048…2051 at0004 = ╱92╱ PRINT ╱ // 0x204c @0x4
0x2048…2051 at0005 = ╱22╱"╱ // 0x204d @0x5
0x2048…2051 at0006 = ╱20╱…╱ // 0x204e @0x6
0x2048…2051 at0007 = ╱22╱"╱ // 0x204f @0x7
0x2048…2051 at0008 = EOL // 0x2050 @0x8
0x2048…2051 }
0x2051…2073 adca 3670 EXEC LUDSKRIV(KONTO,DATO,KSIDENR)
0x2051…2073 LineComalBin {
0x2051…2073 ptr = 0xadca // 0x2051 @0x0
0x2051…2073 lno = 0x0e56 // 0x2053 @0x2
0x2051…2073 at0004 = ╱9d╱ EXEC ╱ // 0x2055 @0x4
0x2051…2073 at0005 = ╱4c╱L╱ // 0x2056 @0x5
0x2051…2073 at0006 = ╱55╱U╱ // 0x2057 @0x6
0x2051…2073 at0007 = ╱44╱D╱ // 0x2058 @0x7
0x2051…2073 at0008 = ╱53╱S╱ // 0x2059 @0x8
0x2051…2073 at0009 = ╱4b╱K╱ // 0x205a @0x9
0x2051…2073 at000a = ╱52╱R╱ // 0x205b @0xa
0x2051…2073 at000b = ╱49╱I╱ // 0x205c @0xb
0x2051…2073 at000c = ╱56╱V╱ // 0x205d @0xc
0x2051…2073 at000d = ╱ed╱(╱ // 0x205e @0xd
0x2051…2073 at000e = ╱4b╱K╱ // 0x205f @0xe
0x2051…2073 at000f = ╱4f╱O╱ // 0x2060 @0xf
0x2051…2073 at0010 = ╱4e╱N╱ // 0x2061 @0x10
0x2051…2073 at0011 = ╱54╱T╱ // 0x2062 @0x11
0x2051…2073 at0012 = ╱4f╱O╱ // 0x2063 @0x12
0x2051…2073 at0013 = ╱ec╱,╱ // 0x2064 @0x13
0x2051…2073 at0014 = ╱44╱D╱ // 0x2065 @0x14
0x2051…2073 at0015 = ╱41╱A╱ // 0x2066 @0x15
0x2051…2073 at0016 = ╱54╱T╱ // 0x2067 @0x16
0x2051…2073 at0017 = ╱4f╱O╱ // 0x2068 @0x17
0x2051…2073 at0018 = ╱ec╱,╱ // 0x2069 @0x18
0x2051…2073 at0019 = ╱4b╱K╱ // 0x206a @0x19
0x2051…2073 at001a = ╱53╱S╱ // 0x206b @0x1a
0x2051…2073 at001b = ╱49╱I╱ // 0x206c @0x1b
0x2051…2073 at001c = ╱44╱D╱ // 0x206d @0x1c
0x2051…2073 at001d = ╱45╱E╱ // 0x206e @0x1d
0x2051…2073 at001e = ╱4e╱N╱ // 0x206f @0x1e
0x2051…2073 at001f = ╱52╱R╱ // 0x2070 @0x1f
0x2051…2073 at0020 = ╱ee╱)╱ // 0x2071 @0x20
0x2051…2073 at0021 = EOL // 0x2072 @0x21
0x2051…2073 }
0x2073…207b add2 3680 PRINT ""
0x2073…207b LineComalBin {
0x2073…207b ptr = 0xadd2 // 0x2073 @0x0
0x2073…207b lno = 0x0e60 // 0x2075 @0x2
0x2073…207b at0004 = ╱92╱ PRINT ╱ // 0x2077 @0x4
0x2073…207b at0005 = ╱22╱"╱ // 0x2078 @0x5
0x2073…207b at0006 = ╱22╱"╱ // 0x2079 @0x6
0x2073…207b at0007 = EOL // 0x207a @0x7
0x2073…207b }
0x207b…2084 addb 3685 PRINT " "
0x207b…2084 LineComalBin {
0x207b…2084 ptr = 0xaddb // 0x207b @0x0
0x207b…2084 lno = 0x0e65 // 0x207d @0x2
0x207b…2084 at0004 = ╱92╱ PRINT ╱ // 0x207f @0x4
0x207b…2084 at0005 = ╱22╱"╱ // 0x2080 @0x5
0x207b…2084 at0006 = ╱20╱…╱ // 0x2081 @0x6
0x207b…2084 at0007 = ╱22╱"╱ // 0x2082 @0x7
0x207b…2084 at0008 = EOL // 0x2083 @0x8
0x207b…2084 }
0x2084…208a ade1 3690 ELSE
0x2084…208a LineComalBin {
0x2084…208a ptr = 0xade1 // 0x2084 @0x0
0x2084…208a lno = 0x0e6a // 0x2086 @0x2
0x2084…208a at0004 = ╱9a╱ ELSE ╱ // 0x2088 @0x4
0x2084…208a at0005 = EOL // 0x2089 @0x5
0x2084…208a }
0x208a…2099 adf0 3700 EXEC HSUDSKRIV
0x208a…2099 LineComalBin {
0x208a…2099 ptr = 0xadf0 // 0x208a @0x0
0x208a…2099 lno = 0x0e74 // 0x208c @0x2
0x208a…2099 at0004 = ╱9d╱ EXEC ╱ // 0x208e @0x4
0x208a…2099 at0005 = ╱48╱H╱ // 0x208f @0x5
0x208a…2099 at0006 = ╱53╱S╱ // 0x2090 @0x6
0x208a…2099 at0007 = ╱55╱U╱ // 0x2091 @0x7
0x208a…2099 at0008 = ╱44╱D╱ // 0x2092 @0x8
0x208a…2099 at0009 = ╱53╱S╱ // 0x2093 @0x9
0x208a…2099 at000a = ╱4b╱K╱ // 0x2094 @0xa
0x208a…2099 at000b = ╱52╱R╱ // 0x2095 @0xb
0x208a…2099 at000c = ╱49╱I╱ // 0x2096 @0xc
0x208a…2099 at000d = ╱56╱V╱ // 0x2097 @0xd
0x208a…2099 at000e = EOL // 0x2098 @0xe
0x208a…2099 }
0x2099…209f adf6 3710 ENDIF
0x2099…209f LineComalBin {
0x2099…209f ptr = 0xadf6 // 0x2099 @0x0
0x2099…209f lno = 0x0e7e // 0x209b @0x2
0x2099…209f at0004 = ╱9b╱ ENDIF ╱ // 0x209d @0x4
0x2099…209f at0005 = EOL // 0x209e @0x5
0x2099…209f }
0x209f…20dd ae34 3720 EXEC BUDSKRIV(TAL4$,2,SU4$,TAL4$,TAL4$,TAL4$,TAL4$,LNR1)
0x209f…20dd LineComalBin {
0x209f…20dd ptr = 0xae34 // 0x209f @0x0
0x209f…20dd lno = 0x0e88 // 0x20a1 @0x2
0x209f…20dd at0004 = ╱9d╱ EXEC ╱ // 0x20a3 @0x4
0x209f…20dd at0005 = ╱42╱B╱ // 0x20a4 @0x5
0x209f…20dd at0006 = ╱55╱U╱ // 0x20a5 @0x6
0x209f…20dd at0007 = ╱44╱D╱ // 0x20a6 @0x7
0x209f…20dd at0008 = ╱53╱S╱ // 0x20a7 @0x8
0x209f…20dd at0009 = ╱4b╱K╱ // 0x20a8 @0x9
0x209f…20dd at000a = ╱52╱R╱ // 0x20a9 @0xa
0x209f…20dd at000b = ╱49╱I╱ // 0x20aa @0xb
0x209f…20dd at000c = ╱56╱V╱ // 0x20ab @0xc
0x209f…20dd at000d = ╱ed╱(╱ // 0x20ac @0xd
0x209f…20dd at000e = ╱54╱T╱ // 0x20ad @0xe
0x209f…20dd at000f = ╱41╱A╱ // 0x20ae @0xf
0x209f…20dd at0010 = ╱4c╱L╱ // 0x20af @0x10
0x209f…20dd at0011 = ╱34╱4╱ // 0x20b0 @0x11
0x209f…20dd at0012 = ╱ef╱$╱ // 0x20b1 @0x12
0x209f…20dd at0013 = ╱ec╱,╱ // 0x20b2 @0x13
0x209f…20dd at0014 = ╱32╱2╱ // 0x20b3 @0x14
0x209f…20dd at0015 = ╱fe00008002╱ // 0x20b4 @0x15
0x209f…20dd at001a = ╱ec╱,╱ // 0x20b9 @0x1a
0x209f…20dd at001b = ╱53╱S╱ // 0x20ba @0x1b
0x209f…20dd at001c = ╱55╱U╱ // 0x20bb @0x1c
0x209f…20dd at001d = ╱34╱4╱ // 0x20bc @0x1d
0x209f…20dd at001e = ╱ef╱$╱ // 0x20bd @0x1e
0x209f…20dd at001f = ╱ec╱,╱ // 0x20be @0x1f
0x209f…20dd at0020 = ╱54╱T╱ // 0x20bf @0x20
0x209f…20dd at0021 = ╱41╱A╱ // 0x20c0 @0x21
0x209f…20dd at0022 = ╱4c╱L╱ // 0x20c1 @0x22
0x209f…20dd at0023 = ╱34╱4╱ // 0x20c2 @0x23
0x209f…20dd at0024 = ╱ef╱$╱ // 0x20c3 @0x24
0x209f…20dd at0025 = ╱ec╱,╱ // 0x20c4 @0x25
0x209f…20dd at0026 = ╱54╱T╱ // 0x20c5 @0x26
0x209f…20dd at0027 = ╱41╱A╱ // 0x20c6 @0x27
0x209f…20dd at0028 = ╱4c╱L╱ // 0x20c7 @0x28
0x209f…20dd at0029 = ╱34╱4╱ // 0x20c8 @0x29
0x209f…20dd at002a = ╱ef╱$╱ // 0x20c9 @0x2a
0x209f…20dd at002b = ╱ec╱,╱ // 0x20ca @0x2b
0x209f…20dd at002c = ╱54╱T╱ // 0x20cb @0x2c
0x209f…20dd at002d = ╱41╱A╱ // 0x20cc @0x2d
0x209f…20dd at002e = ╱4c╱L╱ // 0x20cd @0x2e
0x209f…20dd at002f = ╱34╱4╱ // 0x20ce @0x2f
0x209f…20dd at0030 = ╱ef╱$╱ // 0x20cf @0x30
0x209f…20dd at0031 = ╱ec╱,╱ // 0x20d0 @0x31
0x209f…20dd at0032 = ╱54╱T╱ // 0x20d1 @0x32
0x209f…20dd at0033 = ╱41╱A╱ // 0x20d2 @0x33
0x209f…20dd at0034 = ╱4c╱L╱ // 0x20d3 @0x34
0x209f…20dd at0035 = ╱34╱4╱ // 0x20d4 @0x35
0x209f…20dd at0036 = ╱ef╱$╱ // 0x20d5 @0x36
0x209f…20dd at0037 = ╱ec╱,╱ // 0x20d6 @0x37
0x209f…20dd at0038 = ╱4c╱L╱ // 0x20d7 @0x38
0x209f…20dd at0039 = ╱4e╱N╱ // 0x20d8 @0x39
0x209f…20dd at003a = ╱52╱R╱ // 0x20d9 @0x3a
0x209f…20dd at003b = ╱31╱1╱ // 0x20da @0x3b
0x209f…20dd at003c = ╱ee╱)╱ // 0x20db @0x3c
0x209f…20dd at003d = EOL // 0x20dc @0x3d
0x209f…20dd }
0x20dd…20e8 ae3f 3730 LNR1=E
0x20dd…20e8 LineComalBin {
0x20dd…20e8 ptr = 0xae3f // 0x20dd @0x0
0x20dd…20e8 lno = 0x0e92 // 0x20df @0x2
0x20dd…20e8 at0004 = ╱4c╱L╱ // 0x20e1 @0x4
0x20dd…20e8 at0005 = ╱4e╱N╱ // 0x20e2 @0x5
0x20dd…20e8 at0006 = ╱52╱R╱ // 0x20e3 @0x6
0x20dd…20e8 at0007 = ╱31╱1╱ // 0x20e4 @0x7
0x20dd…20e8 at0008 = ╱dc╱=╱ // 0x20e5 @0x8
0x20dd…20e8 at0009 = ╱45╱E╱ // 0x20e6 @0x9
0x20dd…20e8 at000a = EOL // 0x20e7 @0xa
0x20dd…20e8 }
0x20e8…20ee ae45 3740 ELSE
0x20e8…20ee LineComalBin {
0x20e8…20ee ptr = 0xae45 // 0x20e8 @0x0
0x20e8…20ee lno = 0x0e9c // 0x20ea @0x2
0x20e8…20ee at0004 = ╱9a╱ ELSE ╱ // 0x20ec @0x4
0x20e8…20ee at0005 = EOL // 0x20ed @0x5
0x20e8…20ee }
0x20ee…2127 ae7e 3750 EXEC INDPUT1(4,23,-2,0,LTX$(4))
0x20ee…2127 LineComalBin {
0x20ee…2127 ptr = 0xae7e // 0x20ee @0x0
0x20ee…2127 lno = 0x0ea6 // 0x20f0 @0x2
0x20ee…2127 at0004 = ╱9d╱ EXEC ╱ // 0x20f2 @0x4
0x20ee…2127 at0005 = ╱49╱I╱ // 0x20f3 @0x5
0x20ee…2127 at0006 = ╱4e╱N╱ // 0x20f4 @0x6
0x20ee…2127 at0007 = ╱44╱D╱ // 0x20f5 @0x7
0x20ee…2127 at0008 = ╱50╱P╱ // 0x20f6 @0x8
0x20ee…2127 at0009 = ╱55╱U╱ // 0x20f7 @0x9
0x20ee…2127 at000a = ╱54╱T╱ // 0x20f8 @0xa
0x20ee…2127 at000b = ╱31╱1╱ // 0x20f9 @0xb
0x20ee…2127 at000c = ╱ed╱(╱ // 0x20fa @0xc
0x20ee…2127 at000d = ╱34╱4╱ // 0x20fb @0xd
0x20ee…2127 at000e = ╱fe00008003╱ // 0x20fc @0xe
0x20ee…2127 at0013 = ╱ec╱,╱ // 0x2101 @0x13
0x20ee…2127 at0014 = ╱32╱2╱ // 0x2102 @0x14
0x20ee…2127 at0015 = ╱33╱3╱ // 0x2103 @0x15
0x20ee…2127 at0016 = ╱fe0000b805╱ // 0x2104 @0x16
0x20ee…2127 at001b = ╱ec╱,╱ // 0x2109 @0x1b
0x20ee…2127 at001c = ╱e9╱-╱ // 0x210a @0x1c
0x20ee…2127 at001d = ╱32╱2╱ // 0x210b @0x1d
0x20ee…2127 at001e = ╱fe00008002╱ // 0x210c @0x1e
0x20ee…2127 at0023 = ╱ec╱,╱ // 0x2111 @0x23
0x20ee…2127 at0024 = ╱30╱0╱ // 0x2112 @0x24
0x20ee…2127 at0025 = ╱fe00000000╱ // 0x2113 @0x25
0x20ee…2127 at002a = ╱ec╱,╱ // 0x2118 @0x2a
0x20ee…2127 at002b = ╱4c╱L╱ // 0x2119 @0x2b
0x20ee…2127 at002c = ╱54╱T╱ // 0x211a @0x2c
0x20ee…2127 at002d = ╱58╱X╱ // 0x211b @0x2d
0x20ee…2127 at002e = ╱ef╱$╱ // 0x211c @0x2e
0x20ee…2127 at002f = ╱ed╱(╱ // 0x211d @0x2f
0x20ee…2127 at0030 = ╱34╱4╱ // 0x211e @0x30
0x20ee…2127 at0031 = ╱fe00008003╱ // 0x211f @0x31
0x20ee…2127 at0036 = ╱ee╱)╱ // 0x2124 @0x36
0x20ee…2127 at0037 = ╱ee╱)╱ // 0x2125 @0x37
0x20ee…2127 at0038 = EOL // 0x2126 @0x38
0x20ee…2127 }
0x2127…212d ae84 3760 CLEAR
0x2127…212d LineComalBin {
0x2127…212d ptr = 0xae84 // 0x2127 @0x0
0x2127…212d lno = 0x0eb0 // 0x2129 @0x2
0x2127…212d at0004 = ╱a0╱ CLEAR ╱ // 0x212b @0x4
0x2127…212d at0005 = EOL // 0x212c @0x5
0x2127…212d }
0x212d…213c ae93 3770 EXEC HSUDSKRIV
0x212d…213c LineComalBin {
0x212d…213c ptr = 0xae93 // 0x212d @0x0
0x212d…213c lno = 0x0eba // 0x212f @0x2
0x212d…213c at0004 = ╱9d╱ EXEC ╱ // 0x2131 @0x4
0x212d…213c at0005 = ╱48╱H╱ // 0x2132 @0x5
0x212d…213c at0006 = ╱53╱S╱ // 0x2133 @0x6
0x212d…213c at0007 = ╱55╱U╱ // 0x2134 @0x7
0x212d…213c at0008 = ╱44╱D╱ // 0x2135 @0x8
0x212d…213c at0009 = ╱53╱S╱ // 0x2136 @0x9
0x212d…213c at000a = ╱4b╱K╱ // 0x2137 @0xa
0x212d…213c at000b = ╱52╱R╱ // 0x2138 @0xb
0x212d…213c at000c = ╱49╱I╱ // 0x2139 @0xc
0x212d…213c at000d = ╱56╱V╱ // 0x213a @0xd
0x212d…213c at000e = EOL // 0x213b @0xe
0x212d…213c }
0x213c…2147 ae9e 3780 LNR1=B
0x213c…2147 LineComalBin {
0x213c…2147 ptr = 0xae9e // 0x213c @0x0
0x213c…2147 lno = 0x0ec4 // 0x213e @0x2
0x213c…2147 at0004 = ╱4c╱L╱ // 0x2140 @0x4
0x213c…2147 at0005 = ╱4e╱N╱ // 0x2141 @0x5
0x213c…2147 at0006 = ╱52╱R╱ // 0x2142 @0x6
0x213c…2147 at0007 = ╱31╱1╱ // 0x2143 @0x7
0x213c…2147 at0008 = ╱dc╱=╱ // 0x2144 @0x8
0x213c…2147 at0009 = ╱42╱B╱ // 0x2145 @0x9
0x213c…2147 at000a = EOL // 0x2146 @0xa
0x213c…2147 }
0x2147…214d aea4 3790 ENDIF
0x2147…214d LineComalBin {
0x2147…214d ptr = 0xaea4 // 0x2147 @0x0
0x2147…214d lno = 0x0ece // 0x2149 @0x2
0x2147…214d at0004 = ╱9b╱ ENDIF ╱ // 0x214b @0x4
0x2147…214d at0005 = EOL // 0x214c @0x5
0x2147…214d }
0x214d…2153 aeaa 3800 ENDIF
0x214d…2153 LineComalBin {
0x214d…2153 ptr = 0xaeaa // 0x214d @0x0
0x214d…2153 lno = 0x0ed8 // 0x214f @0x2
0x214d…2153 at0004 = ╱9b╱ ENDIF ╱ // 0x2151 @0x4
0x214d…2153 at0005 = EOL // 0x2152 @0x5
0x214d…2153 }
0x2153…2159 aeb0 3810 ENDPROC
0x2153…2159 LineComalBin {
0x2153…2159 ptr = 0xaeb0 // 0x2153 @0x0
0x2153…2159 lno = 0x0ee2 // 0x2155 @0x2
0x2153…2159 at0004 = ╱9f╱ ENDPROC ╱ // 0x2157 @0x4
0x2153…2159 at0005 = EOL // 0x2158 @0x5
0x2153…2159 }
0x2159…2167 aebe 3820 PROC HENTPOST
0x2159…2167 LineComalBin {
0x2159…2167 ptr = 0xaebe // 0x2159 @0x0
0x2159…2167 lno = 0x0eec // 0x215b @0x2
0x2159…2167 at0004 = ╱9e╱ PROC ╱ // 0x215d @0x4
0x2159…2167 at0005 = ╱48╱H╱ // 0x215e @0x5
0x2159…2167 at0006 = ╱45╱E╱ // 0x215f @0x6
0x2159…2167 at0007 = ╱4e╱N╱ // 0x2160 @0x7
0x2159…2167 at0008 = ╱54╱T╱ // 0x2161 @0x8
0x2159…2167 at0009 = ╱50╱P╱ // 0x2162 @0x9
0x2159…2167 at000a = ╱4f╱O╱ // 0x2163 @0xa
0x2159…2167 at000b = ╱53╱S╱ // 0x2164 @0xb
0x2159…2167 at000c = ╱54╱T╱ // 0x2165 @0xc
0x2159…2167 at000d = EOL // 0x2166 @0xd
0x2159…2167 }
0x2167…217b aed2 3830 S=FTAB(FPIL3,G)
0x2167…217b LineComalBin {
0x2167…217b ptr = 0xaed2 // 0x2167 @0x0
0x2167…217b lno = 0x0ef6 // 0x2169 @0x2
0x2167…217b at0004 = ╱53╱S╱ // 0x216b @0x4
0x2167…217b at0005 = ╱dc╱=╱ // 0x216c @0x5
0x2167…217b at0006 = ╱46╱F╱ // 0x216d @0x6
0x2167…217b at0007 = ╱54╱T╱ // 0x216e @0x7
0x2167…217b at0008 = ╱41╱A╱ // 0x216f @0x8
0x2167…217b at0009 = ╱42╱B╱ // 0x2170 @0x9
0x2167…217b at000a = ╱ed╱(╱ // 0x2171 @0xa
0x2167…217b at000b = ╱46╱F╱ // 0x2172 @0xb
0x2167…217b at000c = ╱50╱P╱ // 0x2173 @0xc
0x2167…217b at000d = ╱49╱I╱ // 0x2174 @0xd
0x2167…217b at000e = ╱4c╱L╱ // 0x2175 @0xe
0x2167…217b at000f = ╱33╱3╱ // 0x2176 @0xf
0x2167…217b at0010 = ╱ec╱,╱ // 0x2177 @0x10
0x2167…217b at0011 = ╱47╱G╱ // 0x2178 @0x11
0x2167…217b at0012 = ╱ee╱)╱ // 0x2179 @0x12
0x2167…217b at0013 = EOL // 0x217a @0x13
0x2167…217b }
0x217b…2191 aee8 3840 GET K5$,S:FNR,FNAVN$
0x217b…2191 LineComalBin {
0x217b…2191 ptr = 0xaee8 // 0x217b @0x0
0x217b…2191 lno = 0x0f00 // 0x217d @0x2
0x217b…2191 at0004 = ╱a9╱ GET ╱ // 0x217f @0x4
0x217b…2191 at0005 = ╱4b╱K╱ // 0x2180 @0x5
0x217b…2191 at0006 = ╱35╱5╱ // 0x2181 @0x6
0x217b…2191 at0007 = ╱ef╱$╱ // 0x2182 @0x7
0x217b…2191 at0008 = ╱ec╱,╱ // 0x2183 @0x8
0x217b…2191 at0009 = ╱53╱S╱ // 0x2184 @0x9
0x217b…2191 at000a = ╱f0╱:╱ // 0x2185 @0xa
0x217b…2191 at000b = ╱46╱F╱ // 0x2186 @0xb
0x217b…2191 at000c = ╱4e╱N╱ // 0x2187 @0xc
0x217b…2191 at000d = ╱52╱R╱ // 0x2188 @0xd
0x217b…2191 at000e = ╱ec╱,╱ // 0x2189 @0xe
0x217b…2191 at000f = ╱46╱F╱ // 0x218a @0xf
0x217b…2191 at0010 = ╱4e╱N╱ // 0x218b @0x10
0x217b…2191 at0011 = ╱41╱A╱ // 0x218c @0x11
0x217b…2191 at0012 = ╱56╱V╱ // 0x218d @0x12
0x217b…2191 at0013 = ╱4e╱N╱ // 0x218e @0x13
0x217b…2191 at0014 = ╱ef╱$╱ // 0x218f @0x14
0x217b…2191 at0015 = EOL // 0x2190 @0x15
0x217b…2191 }
0x2191…21a4 aefb 3850 EXEC FEJL(W,G,K5$)
0x2191…21a4 LineComalBin {
0x2191…21a4 ptr = 0xaefb // 0x2191 @0x0
0x2191…21a4 lno = 0x0f0a // 0x2193 @0x2
0x2191…21a4 at0004 = ╱9d╱ EXEC ╱ // 0x2195 @0x4
0x2191…21a4 at0005 = ╱46╱F╱ // 0x2196 @0x5
0x2191…21a4 at0006 = ╱45╱E╱ // 0x2197 @0x6
0x2191…21a4 at0007 = ╱4a╱J╱ // 0x2198 @0x7
0x2191…21a4 at0008 = ╱4c╱L╱ // 0x2199 @0x8
0x2191…21a4 at0009 = ╱ed╱(╱ // 0x219a @0x9
0x2191…21a4 at000a = ╱57╱W╱ // 0x219b @0xa
0x2191…21a4 at000b = ╱ec╱,╱ // 0x219c @0xb
0x2191…21a4 at000c = ╱47╱G╱ // 0x219d @0xc
0x2191…21a4 at000d = ╱ec╱,╱ // 0x219e @0xd
0x2191…21a4 at000e = ╱4b╱K╱ // 0x219f @0xe
0x2191…21a4 at000f = ╱35╱5╱ // 0x21a0 @0xf
0x2191…21a4 at0010 = ╱ef╱$╱ // 0x21a1 @0x10
0x2191…21a4 at0011 = ╱ee╱)╱ // 0x21a2 @0x11
0x2191…21a4 at0012 = EOL // 0x21a3 @0x12
0x2191…21a4 }
0x21a4…21cc af23 3860 GET K5$,S+E:FMKODE$,FMDEBET$,FMKREDIT$
0x21a4…21cc LineComalBin {
0x21a4…21cc ptr = 0xaf23 // 0x21a4 @0x0
0x21a4…21cc lno = 0x0f14 // 0x21a6 @0x2
0x21a4…21cc at0004 = ╱a9╱ GET ╱ // 0x21a8 @0x4
0x21a4…21cc at0005 = ╱4b╱K╱ // 0x21a9 @0x5
0x21a4…21cc at0006 = ╱35╱5╱ // 0x21aa @0x6
0x21a4…21cc at0007 = ╱ef╱$╱ // 0x21ab @0x7
0x21a4…21cc at0008 = ╱ec╱,╱ // 0x21ac @0x8
0x21a4…21cc at0009 = ╱53╱S╱ // 0x21ad @0x9
0x21a4…21cc at000a = ╱e2╱+╱ // 0x21ae @0xa
0x21a4…21cc at000b = ╱45╱E╱ // 0x21af @0xb
0x21a4…21cc at000c = ╱f0╱:╱ // 0x21b0 @0xc
0x21a4…21cc at000d = ╱46╱F╱ // 0x21b1 @0xd
0x21a4…21cc at000e = ╱4d╱M╱ // 0x21b2 @0xe
0x21a4…21cc at000f = ╱4b╱K╱ // 0x21b3 @0xf
0x21a4…21cc at0010 = ╱4f╱O╱ // 0x21b4 @0x10
0x21a4…21cc at0011 = ╱44╱D╱ // 0x21b5 @0x11
0x21a4…21cc at0012 = ╱45╱E╱ // 0x21b6 @0x12
0x21a4…21cc at0013 = ╱ef╱$╱ // 0x21b7 @0x13
0x21a4…21cc at0014 = ╱ec╱,╱ // 0x21b8 @0x14
0x21a4…21cc at0015 = ╱46╱F╱ // 0x21b9 @0x15
0x21a4…21cc at0016 = ╱4d╱M╱ // 0x21ba @0x16
0x21a4…21cc at0017 = ╱44╱D╱ // 0x21bb @0x17
0x21a4…21cc at0018 = ╱45╱E╱ // 0x21bc @0x18
0x21a4…21cc at0019 = ╱42╱B╱ // 0x21bd @0x19
0x21a4…21cc at001a = ╱45╱E╱ // 0x21be @0x1a
0x21a4…21cc at001b = ╱54╱T╱ // 0x21bf @0x1b
0x21a4…21cc at001c = ╱ef╱$╱ // 0x21c0 @0x1c
0x21a4…21cc at001d = ╱ec╱,╱ // 0x21c1 @0x1d
0x21a4…21cc at001e = ╱46╱F╱ // 0x21c2 @0x1e
0x21a4…21cc at001f = ╱4d╱M╱ // 0x21c3 @0x1f
0x21a4…21cc at0020 = ╱4b╱K╱ // 0x21c4 @0x20
0x21a4…21cc at0021 = ╱52╱R╱ // 0x21c5 @0x21
0x21a4…21cc at0022 = ╱45╱E╱ // 0x21c6 @0x22
0x21a4…21cc at0023 = ╱44╱D╱ // 0x21c7 @0x23
0x21a4…21cc at0024 = ╱49╱I╱ // 0x21c8 @0x24
0x21a4…21cc at0025 = ╱54╱T╱ // 0x21c9 @0x25
0x21a4…21cc at0026 = ╱ef╱$╱ // 0x21ca @0x26
0x21a4…21cc at0027 = EOL // 0x21cb @0x27
0x21a4…21cc }
0x21cc…21df af36 3870 EXEC FEJL(W,V,K5$)
0x21cc…21df LineComalBin {
0x21cc…21df ptr = 0xaf36 // 0x21cc @0x0
0x21cc…21df lno = 0x0f1e // 0x21ce @0x2
0x21cc…21df at0004 = ╱9d╱ EXEC ╱ // 0x21d0 @0x4
0x21cc…21df at0005 = ╱46╱F╱ // 0x21d1 @0x5
0x21cc…21df at0006 = ╱45╱E╱ // 0x21d2 @0x6
0x21cc…21df at0007 = ╱4a╱J╱ // 0x21d3 @0x7
0x21cc…21df at0008 = ╱4c╱L╱ // 0x21d4 @0x8
0x21cc…21df at0009 = ╱ed╱(╱ // 0x21d5 @0x9
0x21cc…21df at000a = ╱57╱W╱ // 0x21d6 @0xa
0x21cc…21df at000b = ╱ec╱,╱ // 0x21d7 @0xb
0x21cc…21df at000c = ╱56╱V╱ // 0x21d8 @0xc
0x21cc…21df at000d = ╱ec╱,╱ // 0x21d9 @0xd
0x21cc…21df at000e = ╱4b╱K╱ // 0x21da @0xe
0x21cc…21df at000f = ╱35╱5╱ // 0x21db @0xf
0x21cc…21df at0010 = ╱ef╱$╱ // 0x21dc @0x10
0x21cc…21df at0011 = ╱ee╱)╱ // 0x21dd @0x11
0x21cc…21df at0012 = EOL // 0x21de @0x12
0x21cc…21df }
0x21df…2207 af5e 3880 GET K5$,S+G:FUKODE$,FÅDEBET$,FÅKREDIT$
0x21df…2207 LineComalBin {
0x21df…2207 ptr = 0xaf5e // 0x21df @0x0
0x21df…2207 lno = 0x0f28 // 0x21e1 @0x2
0x21df…2207 at0004 = ╱a9╱ GET ╱ // 0x21e3 @0x4
0x21df…2207 at0005 = ╱4b╱K╱ // 0x21e4 @0x5
0x21df…2207 at0006 = ╱35╱5╱ // 0x21e5 @0x6
0x21df…2207 at0007 = ╱ef╱$╱ // 0x21e6 @0x7
0x21df…2207 at0008 = ╱ec╱,╱ // 0x21e7 @0x8
0x21df…2207 at0009 = ╱53╱S╱ // 0x21e8 @0x9
0x21df…2207 at000a = ╱e2╱+╱ // 0x21e9 @0xa
0x21df…2207 at000b = ╱47╱G╱ // 0x21ea @0xb
0x21df…2207 at000c = ╱f0╱:╱ // 0x21eb @0xc
0x21df…2207 at000d = ╱46╱F╱ // 0x21ec @0xd
0x21df…2207 at000e = ╱55╱U╱ // 0x21ed @0xe
0x21df…2207 at000f = ╱4b╱K╱ // 0x21ee @0xf
0x21df…2207 at0010 = ╱4f╱O╱ // 0x21ef @0x10
0x21df…2207 at0011 = ╱44╱D╱ // 0x21f0 @0x11
0x21df…2207 at0012 = ╱45╱E╱ // 0x21f1 @0x12
0x21df…2207 at0013 = ╱ef╱$╱ // 0x21f2 @0x13
0x21df…2207 at0014 = ╱ec╱,╱ // 0x21f3 @0x14
0x21df…2207 at0015 = ╱46╱F╱ // 0x21f4 @0x15
0x21df…2207 at0016 = ╱5d╱Å╱ // 0x21f5 @0x16
0x21df…2207 at0017 = ╱44╱D╱ // 0x21f6 @0x17
0x21df…2207 at0018 = ╱45╱E╱ // 0x21f7 @0x18
0x21df…2207 at0019 = ╱42╱B╱ // 0x21f8 @0x19
0x21df…2207 at001a = ╱45╱E╱ // 0x21f9 @0x1a
0x21df…2207 at001b = ╱54╱T╱ // 0x21fa @0x1b
0x21df…2207 at001c = ╱ef╱$╱ // 0x21fb @0x1c
0x21df…2207 at001d = ╱ec╱,╱ // 0x21fc @0x1d
0x21df…2207 at001e = ╱46╱F╱ // 0x21fd @0x1e
0x21df…2207 at001f = ╱5d╱Å╱ // 0x21fe @0x1f
0x21df…2207 at0020 = ╱4b╱K╱ // 0x21ff @0x20
0x21df…2207 at0021 = ╱52╱R╱ // 0x2200 @0x21
0x21df…2207 at0022 = ╱45╱E╱ // 0x2201 @0x22
0x21df…2207 at0023 = ╱44╱D╱ // 0x2202 @0x23
0x21df…2207 at0024 = ╱49╱I╱ // 0x2203 @0x24
0x21df…2207 at0025 = ╱54╱T╱ // 0x2204 @0x25
0x21df…2207 at0026 = ╱ef╱$╱ // 0x2205 @0x26
0x21df…2207 at0027 = EOL // 0x2206 @0x27
0x21df…2207 }
0x2207…221a af71 3890 EXEC FEJL(W,C,K5$)
0x2207…221a LineComalBin {
0x2207…221a ptr = 0xaf71 // 0x2207 @0x0
0x2207…221a lno = 0x0f32 // 0x2209 @0x2
0x2207…221a at0004 = ╱9d╱ EXEC ╱ // 0x220b @0x4
0x2207…221a at0005 = ╱46╱F╱ // 0x220c @0x5
0x2207…221a at0006 = ╱45╱E╱ // 0x220d @0x6
0x2207…221a at0007 = ╱4a╱J╱ // 0x220e @0x7
0x2207…221a at0008 = ╱4c╱L╱ // 0x220f @0x8
0x2207…221a at0009 = ╱ed╱(╱ // 0x2210 @0x9
0x2207…221a at000a = ╱57╱W╱ // 0x2211 @0xa
0x2207…221a at000b = ╱ec╱,╱ // 0x2212 @0xb
0x2207…221a at000c = ╱43╱C╱ // 0x2213 @0xc
0x2207…221a at000d = ╱ec╱,╱ // 0x2214 @0xd
0x2207…221a at000e = ╱4b╱K╱ // 0x2215 @0xe
0x2207…221a at000f = ╱35╱5╱ // 0x2216 @0xf
0x2207…221a at0010 = ╱ef╱$╱ // 0x2217 @0x10
0x2207…221a at0011 = ╱ee╱)╱ // 0x2218 @0x11
0x2207…221a at0012 = EOL // 0x2219 @0x12
0x2207…221a }
0x221a…2220 af77 3900 ENDPROC
0x221a…2220 LineComalBin {
0x221a…2220 ptr = 0xaf77 // 0x221a @0x0
0x221a…2220 lno = 0x0f3c // 0x221c @0x2
0x221a…2220 at0004 = ╱9f╱ ENDPROC ╱ // 0x221e @0x4
0x221a…2220 at0005 = EOL // 0x221f @0x5
0x221a…2220 }
0x2220…222f af86 3910 PROC HENTDPOST
0x2220…222f LineComalBin {
0x2220…222f ptr = 0xaf86 // 0x2220 @0x0
0x2220…222f lno = 0x0f46 // 0x2222 @0x2
0x2220…222f at0004 = ╱9e╱ PROC ╱ // 0x2224 @0x4
0x2220…222f at0005 = ╱48╱H╱ // 0x2225 @0x5
0x2220…222f at0006 = ╱45╱E╱ // 0x2226 @0x6
0x2220…222f at0007 = ╱4e╱N╱ // 0x2227 @0x7
0x2220…222f at0008 = ╱54╱T╱ // 0x2228 @0x8
0x2220…222f at0009 = ╱44╱D╱ // 0x2229 @0x9
0x2220…222f at000a = ╱50╱P╱ // 0x222a @0xa
0x2220…222f at000b = ╱4f╱O╱ // 0x222b @0xb
0x2220…222f at000c = ╱53╱S╱ // 0x222c @0xc
0x2220…222f at000d = ╱54╱T╱ // 0x222d @0xd
0x2220…222f at000e = EOL // 0x222e @0xe
0x2220…222f }
0x222f…2243 af9a 3920 S=DTAB(DPIL3,G)
0x222f…2243 LineComalBin {
0x222f…2243 ptr = 0xaf9a // 0x222f @0x0
0x222f…2243 lno = 0x0f50 // 0x2231 @0x2
0x222f…2243 at0004 = ╱53╱S╱ // 0x2233 @0x4
0x222f…2243 at0005 = ╱dc╱=╱ // 0x2234 @0x5
0x222f…2243 at0006 = ╱44╱D╱ // 0x2235 @0x6
0x222f…2243 at0007 = ╱54╱T╱ // 0x2236 @0x7
0x222f…2243 at0008 = ╱41╱A╱ // 0x2237 @0x8
0x222f…2243 at0009 = ╱42╱B╱ // 0x2238 @0x9
0x222f…2243 at000a = ╱ed╱(╱ // 0x2239 @0xa
0x222f…2243 at000b = ╱44╱D╱ // 0x223a @0xb
0x222f…2243 at000c = ╱50╱P╱ // 0x223b @0xc
0x222f…2243 at000d = ╱49╱I╱ // 0x223c @0xd
0x222f…2243 at000e = ╱4c╱L╱ // 0x223d @0xe
0x222f…2243 at000f = ╱33╱3╱ // 0x223e @0xf
0x222f…2243 at0010 = ╱ec╱,╱ // 0x223f @0x10
0x222f…2243 at0011 = ╱47╱G╱ // 0x2240 @0x11
0x222f…2243 at0012 = ╱ee╱)╱ // 0x2241 @0x12
0x222f…2243 at0013 = EOL // 0x2242 @0x13
0x222f…2243 }
0x2243…226e afc5 3930 GET K6$,S:DEBNR,DEBNAVN$,DSALDO1$,DEBKGR$
0x2243…226e LineComalBin {
0x2243…226e ptr = 0xafc5 // 0x2243 @0x0
0x2243…226e lno = 0x0f5a // 0x2245 @0x2
0x2243…226e at0004 = ╱a9╱ GET ╱ // 0x2247 @0x4
0x2243…226e at0005 = ╱4b╱K╱ // 0x2248 @0x5
0x2243…226e at0006 = ╱36╱6╱ // 0x2249 @0x6
0x2243…226e at0007 = ╱ef╱$╱ // 0x224a @0x7
0x2243…226e at0008 = ╱ec╱,╱ // 0x224b @0x8
0x2243…226e at0009 = ╱53╱S╱ // 0x224c @0x9
0x2243…226e at000a = ╱f0╱:╱ // 0x224d @0xa
0x2243…226e at000b = ╱44╱D╱ // 0x224e @0xb
0x2243…226e at000c = ╱45╱E╱ // 0x224f @0xc
0x2243…226e at000d = ╱42╱B╱ // 0x2250 @0xd
0x2243…226e at000e = ╱4e╱N╱ // 0x2251 @0xe
0x2243…226e at000f = ╱52╱R╱ // 0x2252 @0xf
0x2243…226e at0010 = ╱ec╱,╱ // 0x2253 @0x10
0x2243…226e at0011 = ╱44╱D╱ // 0x2254 @0x11
0x2243…226e at0012 = ╱45╱E╱ // 0x2255 @0x12
0x2243…226e at0013 = ╱42╱B╱ // 0x2256 @0x13
0x2243…226e at0014 = ╱4e╱N╱ // 0x2257 @0x14
0x2243…226e at0015 = ╱41╱A╱ // 0x2258 @0x15
0x2243…226e at0016 = ╱56╱V╱ // 0x2259 @0x16
0x2243…226e at0017 = ╱4e╱N╱ // 0x225a @0x17
0x2243…226e at0018 = ╱ef╱$╱ // 0x225b @0x18
0x2243…226e at0019 = ╱ec╱,╱ // 0x225c @0x19
0x2243…226e at001a = ╱44╱D╱ // 0x225d @0x1a
0x2243…226e at001b = ╱53╱S╱ // 0x225e @0x1b
0x2243…226e at001c = ╱41╱A╱ // 0x225f @0x1c
0x2243…226e at001d = ╱4c╱L╱ // 0x2260 @0x1d
0x2243…226e at001e = ╱44╱D╱ // 0x2261 @0x1e
0x2243…226e at001f = ╱4f╱O╱ // 0x2262 @0x1f
0x2243…226e at0020 = ╱31╱1╱ // 0x2263 @0x20
0x2243…226e at0021 = ╱ef╱$╱ // 0x2264 @0x21
0x2243…226e at0022 = ╱ec╱,╱ // 0x2265 @0x22
0x2243…226e at0023 = ╱44╱D╱ // 0x2266 @0x23
0x2243…226e at0024 = ╱45╱E╱ // 0x2267 @0x24
0x2243…226e at0025 = ╱42╱B╱ // 0x2268 @0x25
0x2243…226e at0026 = ╱4b╱K╱ // 0x2269 @0x26
0x2243…226e at0027 = ╱47╱G╱ // 0x226a @0x27
0x2243…226e at0028 = ╱52╱R╱ // 0x226b @0x28
0x2243…226e at0029 = ╱ef╱$╱ // 0x226c @0x29
0x2243…226e at002a = EOL // 0x226d @0x2a
0x2243…226e }
0x226e…2286 afdd 3940 EXEC FEJL(8,G,K6$)
0x226e…2286 LineComalBin {
0x226e…2286 ptr = 0xafdd // 0x226e @0x0
0x226e…2286 lno = 0x0f64 // 0x2270 @0x2
0x226e…2286 at0004 = ╱9d╱ EXEC ╱ // 0x2272 @0x4
0x226e…2286 at0005 = ╱46╱F╱ // 0x2273 @0x5
0x226e…2286 at0006 = ╱45╱E╱ // 0x2274 @0x6
0x226e…2286 at0007 = ╱4a╱J╱ // 0x2275 @0x7
0x226e…2286 at0008 = ╱4c╱L╱ // 0x2276 @0x8
0x226e…2286 at0009 = ╱ed╱(╱ // 0x2277 @0x9
0x226e…2286 at000a = ╱38╱8╱ // 0x2278 @0xa
0x226e…2286 at000b = ╱fe00008004╱ // 0x2279 @0xb
0x226e…2286 at0010 = ╱ec╱,╱ // 0x227e @0x10
0x226e…2286 at0011 = ╱47╱G╱ // 0x227f @0x11
0x226e…2286 at0012 = ╱ec╱,╱ // 0x2280 @0x12
0x226e…2286 at0013 = ╱4b╱K╱ // 0x2281 @0x13
0x226e…2286 at0014 = ╱36╱6╱ // 0x2282 @0x14
0x226e…2286 at0015 = ╱ef╱$╱ // 0x2283 @0x15
0x226e…2286 at0016 = ╱ee╱)╱ // 0x2284 @0x16
0x226e…2286 at0017 = EOL // 0x2285 @0x17
0x226e…2286 }
0x2286…22bf b016 3950 GET K6$,S+E:DSALDO2$,DSALDO3$,DSALDO4$,DEBPOSTNR,DEBLK$
0x2286…22bf LineComalBin {
0x2286…22bf ptr = 0xb016 // 0x2286 @0x0
0x2286…22bf lno = 0x0f6e // 0x2288 @0x2
0x2286…22bf at0004 = ╱a9╱ GET ╱ // 0x228a @0x4
0x2286…22bf at0005 = ╱4b╱K╱ // 0x228b @0x5
0x2286…22bf at0006 = ╱36╱6╱ // 0x228c @0x6
0x2286…22bf at0007 = ╱ef╱$╱ // 0x228d @0x7
0x2286…22bf at0008 = ╱ec╱,╱ // 0x228e @0x8
0x2286…22bf at0009 = ╱53╱S╱ // 0x228f @0x9
0x2286…22bf at000a = ╱e2╱+╱ // 0x2290 @0xa
0x2286…22bf at000b = ╱45╱E╱ // 0x2291 @0xb
0x2286…22bf at000c = ╱f0╱:╱ // 0x2292 @0xc
0x2286…22bf at000d = ╱44╱D╱ // 0x2293 @0xd
0x2286…22bf at000e = ╱53╱S╱ // 0x2294 @0xe
0x2286…22bf at000f = ╱41╱A╱ // 0x2295 @0xf
0x2286…22bf at0010 = ╱4c╱L╱ // 0x2296 @0x10
0x2286…22bf at0011 = ╱44╱D╱ // 0x2297 @0x11
0x2286…22bf at0012 = ╱4f╱O╱ // 0x2298 @0x12
0x2286…22bf at0013 = ╱32╱2╱ // 0x2299 @0x13
0x2286…22bf at0014 = ╱ef╱$╱ // 0x229a @0x14
0x2286…22bf at0015 = ╱ec╱,╱ // 0x229b @0x15
0x2286…22bf at0016 = ╱44╱D╱ // 0x229c @0x16
0x2286…22bf at0017 = ╱53╱S╱ // 0x229d @0x17
0x2286…22bf at0018 = ╱41╱A╱ // 0x229e @0x18
0x2286…22bf at0019 = ╱4c╱L╱ // 0x229f @0x19
0x2286…22bf at001a = ╱44╱D╱ // 0x22a0 @0x1a
0x2286…22bf at001b = ╱4f╱O╱ // 0x22a1 @0x1b
0x2286…22bf at001c = ╱33╱3╱ // 0x22a2 @0x1c
0x2286…22bf at001d = ╱ef╱$╱ // 0x22a3 @0x1d
0x2286…22bf at001e = ╱ec╱,╱ // 0x22a4 @0x1e
0x2286…22bf at001f = ╱44╱D╱ // 0x22a5 @0x1f
0x2286…22bf at0020 = ╱53╱S╱ // 0x22a6 @0x20
0x2286…22bf at0021 = ╱41╱A╱ // 0x22a7 @0x21
0x2286…22bf at0022 = ╱4c╱L╱ // 0x22a8 @0x22
0x2286…22bf at0023 = ╱44╱D╱ // 0x22a9 @0x23
0x2286…22bf at0024 = ╱4f╱O╱ // 0x22aa @0x24
0x2286…22bf at0025 = ╱34╱4╱ // 0x22ab @0x25
0x2286…22bf at0026 = ╱ef╱$╱ // 0x22ac @0x26
0x2286…22bf at0027 = ╱ec╱,╱ // 0x22ad @0x27
0x2286…22bf at0028 = ╱44╱D╱ // 0x22ae @0x28
0x2286…22bf at0029 = ╱45╱E╱ // 0x22af @0x29
0x2286…22bf at002a = ╱42╱B╱ // 0x22b0 @0x2a
0x2286…22bf at002b = ╱50╱P╱ // 0x22b1 @0x2b
0x2286…22bf at002c = ╱4f╱O╱ // 0x22b2 @0x2c
0x2286…22bf at002d = ╱53╱S╱ // 0x22b3 @0x2d
0x2286…22bf at002e = ╱54╱T╱ // 0x22b4 @0x2e
0x2286…22bf at002f = ╱4e╱N╱ // 0x22b5 @0x2f
0x2286…22bf at0030 = ╱52╱R╱ // 0x22b6 @0x30
0x2286…22bf at0031 = ╱ec╱,╱ // 0x22b7 @0x31
0x2286…22bf at0032 = ╱44╱D╱ // 0x22b8 @0x32
0x2286…22bf at0033 = ╱45╱E╱ // 0x22b9 @0x33
0x2286…22bf at0034 = ╱42╱B╱ // 0x22ba @0x34
0x2286…22bf at0035 = ╱4c╱L╱ // 0x22bb @0x35
0x2286…22bf at0036 = ╱4b╱K╱ // 0x22bc @0x36
0x2286…22bf at0037 = ╱ef╱$╱ // 0x22bd @0x37
0x2286…22bf at0038 = EOL // 0x22be @0x38
0x2286…22bf }
0x22bf…22d7 b02e 3960 EXEC FEJL(8,V,K6$)
0x22bf…22d7 LineComalBin {
0x22bf…22d7 ptr = 0xb02e // 0x22bf @0x0
0x22bf…22d7 lno = 0x0f78 // 0x22c1 @0x2
0x22bf…22d7 at0004 = ╱9d╱ EXEC ╱ // 0x22c3 @0x4
0x22bf…22d7 at0005 = ╱46╱F╱ // 0x22c4 @0x5
0x22bf…22d7 at0006 = ╱45╱E╱ // 0x22c5 @0x6
0x22bf…22d7 at0007 = ╱4a╱J╱ // 0x22c6 @0x7
0x22bf…22d7 at0008 = ╱4c╱L╱ // 0x22c7 @0x8
0x22bf…22d7 at0009 = ╱ed╱(╱ // 0x22c8 @0x9
0x22bf…22d7 at000a = ╱38╱8╱ // 0x22c9 @0xa
0x22bf…22d7 at000b = ╱fe00008004╱ // 0x22ca @0xb
0x22bf…22d7 at0010 = ╱ec╱,╱ // 0x22cf @0x10
0x22bf…22d7 at0011 = ╱56╱V╱ // 0x22d0 @0x11
0x22bf…22d7 at0012 = ╱ec╱,╱ // 0x22d1 @0x12
0x22bf…22d7 at0013 = ╱4b╱K╱ // 0x22d2 @0x13
0x22bf…22d7 at0014 = ╱36╱6╱ // 0x22d3 @0x14
0x22bf…22d7 at0015 = ╱ef╱$╱ // 0x22d4 @0x15
0x22bf…22d7 at0016 = ╱ee╱)╱ // 0x22d5 @0x16
0x22bf…22d7 at0017 = EOL // 0x22d6 @0x17
0x22bf…22d7 }
0x22d7…2302 b059 3970 GET K6$,S+G:DEBGADE$,DEBTLF$,HPOST,HKUNDE
0x22d7…2302 LineComalBin {
0x22d7…2302 ptr = 0xb059 // 0x22d7 @0x0
0x22d7…2302 lno = 0x0f82 // 0x22d9 @0x2
0x22d7…2302 at0004 = ╱a9╱ GET ╱ // 0x22db @0x4
0x22d7…2302 at0005 = ╱4b╱K╱ // 0x22dc @0x5
0x22d7…2302 at0006 = ╱36╱6╱ // 0x22dd @0x6
0x22d7…2302 at0007 = ╱ef╱$╱ // 0x22de @0x7
0x22d7…2302 at0008 = ╱ec╱,╱ // 0x22df @0x8
0x22d7…2302 at0009 = ╱53╱S╱ // 0x22e0 @0x9
0x22d7…2302 at000a = ╱e2╱+╱ // 0x22e1 @0xa
0x22d7…2302 at000b = ╱47╱G╱ // 0x22e2 @0xb
0x22d7…2302 at000c = ╱f0╱:╱ // 0x22e3 @0xc
0x22d7…2302 at000d = ╱44╱D╱ // 0x22e4 @0xd
0x22d7…2302 at000e = ╱45╱E╱ // 0x22e5 @0xe
0x22d7…2302 at000f = ╱42╱B╱ // 0x22e6 @0xf
0x22d7…2302 at0010 = ╱47╱G╱ // 0x22e7 @0x10
0x22d7…2302 at0011 = ╱41╱A╱ // 0x22e8 @0x11
0x22d7…2302 at0012 = ╱44╱D╱ // 0x22e9 @0x12
0x22d7…2302 at0013 = ╱45╱E╱ // 0x22ea @0x13
0x22d7…2302 at0014 = ╱ef╱$╱ // 0x22eb @0x14
0x22d7…2302 at0015 = ╱ec╱,╱ // 0x22ec @0x15
0x22d7…2302 at0016 = ╱44╱D╱ // 0x22ed @0x16
0x22d7…2302 at0017 = ╱45╱E╱ // 0x22ee @0x17
0x22d7…2302 at0018 = ╱42╱B╱ // 0x22ef @0x18
0x22d7…2302 at0019 = ╱54╱T╱ // 0x22f0 @0x19
0x22d7…2302 at001a = ╱4c╱L╱ // 0x22f1 @0x1a
0x22d7…2302 at001b = ╱46╱F╱ // 0x22f2 @0x1b
0x22d7…2302 at001c = ╱ef╱$╱ // 0x22f3 @0x1c
0x22d7…2302 at001d = ╱ec╱,╱ // 0x22f4 @0x1d
0x22d7…2302 at001e = ╱48╱H╱ // 0x22f5 @0x1e
0x22d7…2302 at001f = ╱50╱P╱ // 0x22f6 @0x1f
0x22d7…2302 at0020 = ╱4f╱O╱ // 0x22f7 @0x20
0x22d7…2302 at0021 = ╱53╱S╱ // 0x22f8 @0x21
0x22d7…2302 at0022 = ╱54╱T╱ // 0x22f9 @0x22
0x22d7…2302 at0023 = ╱ec╱,╱ // 0x22fa @0x23
0x22d7…2302 at0024 = ╱48╱H╱ // 0x22fb @0x24
0x22d7…2302 at0025 = ╱4b╱K╱ // 0x22fc @0x25
0x22d7…2302 at0026 = ╱55╱U╱ // 0x22fd @0x26
0x22d7…2302 at0027 = ╱4e╱N╱ // 0x22fe @0x27
0x22d7…2302 at0028 = ╱44╱D╱ // 0x22ff @0x28
0x22d7…2302 at0029 = ╱45╱E╱ // 0x2300 @0x29
0x22d7…2302 at002a = EOL // 0x2301 @0x2a
0x22d7…2302 }
0x2302…231a b071 3980 EXEC FEJL(8,C,K6$)
0x2302…231a LineComalBin {
0x2302…231a ptr = 0xb071 // 0x2302 @0x0
0x2302…231a lno = 0x0f8c // 0x2304 @0x2
0x2302…231a at0004 = ╱9d╱ EXEC ╱ // 0x2306 @0x4
0x2302…231a at0005 = ╱46╱F╱ // 0x2307 @0x5
0x2302…231a at0006 = ╱45╱E╱ // 0x2308 @0x6
0x2302…231a at0007 = ╱4a╱J╱ // 0x2309 @0x7
0x2302…231a at0008 = ╱4c╱L╱ // 0x230a @0x8
0x2302…231a at0009 = ╱ed╱(╱ // 0x230b @0x9
0x2302…231a at000a = ╱38╱8╱ // 0x230c @0xa
0x2302…231a at000b = ╱fe00008004╱ // 0x230d @0xb
0x2302…231a at0010 = ╱ec╱,╱ // 0x2312 @0x10
0x2302…231a at0011 = ╱43╱C╱ // 0x2313 @0x11
0x2302…231a at0012 = ╱ec╱,╱ // 0x2314 @0x12
0x2302…231a at0013 = ╱4b╱K╱ // 0x2315 @0x13
0x2302…231a at0014 = ╱36╱6╱ // 0x2316 @0x14
0x2302…231a at0015 = ╱ef╱$╱ // 0x2317 @0x15
0x2302…231a at0016 = ╱ee╱)╱ // 0x2318 @0x16
0x2302…231a at0017 = EOL // 0x2319 @0x17
0x2302…231a }
0x231a…233d b094 3990 GET K6$,S+V:DEBBY$,ÅRKØB$,MDNKØB$
0x231a…233d LineComalBin {
0x231a…233d ptr = 0xb094 // 0x231a @0x0
0x231a…233d lno = 0x0f96 // 0x231c @0x2
0x231a…233d at0004 = ╱a9╱ GET ╱ // 0x231e @0x4
0x231a…233d at0005 = ╱4b╱K╱ // 0x231f @0x5
0x231a…233d at0006 = ╱36╱6╱ // 0x2320 @0x6
0x231a…233d at0007 = ╱ef╱$╱ // 0x2321 @0x7
0x231a…233d at0008 = ╱ec╱,╱ // 0x2322 @0x8
0x231a…233d at0009 = ╱53╱S╱ // 0x2323 @0x9
0x231a…233d at000a = ╱e2╱+╱ // 0x2324 @0xa
0x231a…233d at000b = ╱56╱V╱ // 0x2325 @0xb
0x231a…233d at000c = ╱f0╱:╱ // 0x2326 @0xc
0x231a…233d at000d = ╱44╱D╱ // 0x2327 @0xd
0x231a…233d at000e = ╱45╱E╱ // 0x2328 @0xe
0x231a…233d at000f = ╱42╱B╱ // 0x2329 @0xf
0x231a…233d at0010 = ╱42╱B╱ // 0x232a @0x10
0x231a…233d at0011 = ╱59╱Y╱ // 0x232b @0x11
0x231a…233d at0012 = ╱ef╱$╱ // 0x232c @0x12
0x231a…233d at0013 = ╱ec╱,╱ // 0x232d @0x13
0x231a…233d at0014 = ╱5d╱Å╱ // 0x232e @0x14
0x231a…233d at0015 = ╱52╱R╱ // 0x232f @0x15
0x231a…233d at0016 = ╱4b╱K╱ // 0x2330 @0x16
0x231a…233d at0017 = ╱5c╱Ø╱ // 0x2331 @0x17
0x231a…233d at0018 = ╱42╱B╱ // 0x2332 @0x18
0x231a…233d at0019 = ╱ef╱$╱ // 0x2333 @0x19
0x231a…233d at001a = ╱ec╱,╱ // 0x2334 @0x1a
0x231a…233d at001b = ╱4d╱M╱ // 0x2335 @0x1b
0x231a…233d at001c = ╱44╱D╱ // 0x2336 @0x1c
0x231a…233d at001d = ╱4e╱N╱ // 0x2337 @0x1d
0x231a…233d at001e = ╱4b╱K╱ // 0x2338 @0x1e
0x231a…233d at001f = ╱5c╱Ø╱ // 0x2339 @0x1f
0x231a…233d at0020 = ╱42╱B╱ // 0x233a @0x20
0x231a…233d at0021 = ╱ef╱$╱ // 0x233b @0x21
0x231a…233d at0022 = EOL // 0x233c @0x22
0x231a…233d }
0x233d…235a b0b1 4000 EXEC FEJL(8,5,K6$)
0x233d…235a LineComalBin {
0x233d…235a ptr = 0xb0b1 // 0x233d @0x0
0x233d…235a lno = 0x0fa0 // 0x233f @0x2
0x233d…235a at0004 = ╱9d╱ EXEC ╱ // 0x2341 @0x4
0x233d…235a at0005 = ╱46╱F╱ // 0x2342 @0x5
0x233d…235a at0006 = ╱45╱E╱ // 0x2343 @0x6
0x233d…235a at0007 = ╱4a╱J╱ // 0x2344 @0x7
0x233d…235a at0008 = ╱4c╱L╱ // 0x2345 @0x8
0x233d…235a at0009 = ╱ed╱(╱ // 0x2346 @0x9
0x233d…235a at000a = ╱38╱8╱ // 0x2347 @0xa
0x233d…235a at000b = ╱fe00008004╱ // 0x2348 @0xb
0x233d…235a at0010 = ╱ec╱,╱ // 0x234d @0x10
0x233d…235a at0011 = ╱35╱5╱ // 0x234e @0x11
0x233d…235a at0012 = ╱fe0000a003╱ // 0x234f @0x12
0x233d…235a at0017 = ╱ec╱,╱ // 0x2354 @0x17
0x233d…235a at0018 = ╱4b╱K╱ // 0x2355 @0x18
0x233d…235a at0019 = ╱36╱6╱ // 0x2356 @0x19
0x233d…235a at001a = ╱ef╱$╱ // 0x2357 @0x1a
0x233d…235a at001b = ╱ee╱)╱ // 0x2358 @0x1b
0x233d…235a at001c = EOL // 0x2359 @0x1c
0x233d…235a }
0x235a…2360 b0b7 4010 ENDPROC
0x235a…2360 LineComalBin {
0x235a…2360 ptr = 0xb0b7 // 0x235a @0x0
0x235a…2360 lno = 0x0faa // 0x235c @0x2
0x235a…2360 at0004 = ╱9f╱ ENDPROC ╱ // 0x235e @0x4
0x235a…2360 at0005 = EOL // 0x235f @0x5
0x235a…2360 }
0x2360…236f b0c6 4020 PROC HENTKPOST
0x2360…236f LineComalBin {
0x2360…236f ptr = 0xb0c6 // 0x2360 @0x0
0x2360…236f lno = 0x0fb4 // 0x2362 @0x2
0x2360…236f at0004 = ╱9e╱ PROC ╱ // 0x2364 @0x4
0x2360…236f at0005 = ╱48╱H╱ // 0x2365 @0x5
0x2360…236f at0006 = ╱45╱E╱ // 0x2366 @0x6
0x2360…236f at0007 = ╱4e╱N╱ // 0x2367 @0x7
0x2360…236f at0008 = ╱54╱T╱ // 0x2368 @0x8
0x2360…236f at0009 = ╱4b╱K╱ // 0x2369 @0x9
0x2360…236f at000a = ╱50╱P╱ // 0x236a @0xa
0x2360…236f at000b = ╱4f╱O╱ // 0x236b @0xb
0x2360…236f at000c = ╱53╱S╱ // 0x236c @0xc
0x2360…236f at000d = ╱54╱T╱ // 0x236d @0xd
0x2360…236f at000e = EOL // 0x236e @0xe
0x2360…236f }
0x236f…2383 b0da 4030 S=KTAB(KPIL3,G)
0x236f…2383 LineComalBin {
0x236f…2383 ptr = 0xb0da // 0x236f @0x0
0x236f…2383 lno = 0x0fbe // 0x2371 @0x2
0x236f…2383 at0004 = ╱53╱S╱ // 0x2373 @0x4
0x236f…2383 at0005 = ╱dc╱=╱ // 0x2374 @0x5
0x236f…2383 at0006 = ╱4b╱K╱ // 0x2375 @0x6
0x236f…2383 at0007 = ╱54╱T╱ // 0x2376 @0x7
0x236f…2383 at0008 = ╱41╱A╱ // 0x2377 @0x8
0x236f…2383 at0009 = ╱42╱B╱ // 0x2378 @0x9
0x236f…2383 at000a = ╱ed╱(╱ // 0x2379 @0xa
0x236f…2383 at000b = ╱4b╱K╱ // 0x237a @0xb
0x236f…2383 at000c = ╱50╱P╱ // 0x237b @0xc
0x236f…2383 at000d = ╱49╱I╱ // 0x237c @0xd
0x236f…2383 at000e = ╱4c╱L╱ // 0x237d @0xe
0x236f…2383 at000f = ╱33╱3╱ // 0x237e @0xf
0x236f…2383 at0010 = ╱ec╱,╱ // 0x237f @0x10
0x236f…2383 at0011 = ╱47╱G╱ // 0x2380 @0x11
0x236f…2383 at0012 = ╱ee╱)╱ // 0x2381 @0x12
0x236f…2383 at0013 = EOL // 0x2382 @0x13
0x236f…2383 }
0x2383…23a6 b0fd 4040 GET K7$,S:KRENR,KRENAVN$,KREGADE$
0x2383…23a6 LineComalBin {
0x2383…23a6 ptr = 0xb0fd // 0x2383 @0x0
0x2383…23a6 lno = 0x0fc8 // 0x2385 @0x2
0x2383…23a6 at0004 = ╱a9╱ GET ╱ // 0x2387 @0x4
0x2383…23a6 at0005 = ╱4b╱K╱ // 0x2388 @0x5
0x2383…23a6 at0006 = ╱37╱7╱ // 0x2389 @0x6
0x2383…23a6 at0007 = ╱ef╱$╱ // 0x238a @0x7
0x2383…23a6 at0008 = ╱ec╱,╱ // 0x238b @0x8
0x2383…23a6 at0009 = ╱53╱S╱ // 0x238c @0x9
0x2383…23a6 at000a = ╱f0╱:╱ // 0x238d @0xa
0x2383…23a6 at000b = ╱4b╱K╱ // 0x238e @0xb
0x2383…23a6 at000c = ╱52╱R╱ // 0x238f @0xc
0x2383…23a6 at000d = ╱45╱E╱ // 0x2390 @0xd
0x2383…23a6 at000e = ╱4e╱N╱ // 0x2391 @0xe
0x2383…23a6 at000f = ╱52╱R╱ // 0x2392 @0xf
0x2383…23a6 at0010 = ╱ec╱,╱ // 0x2393 @0x10
0x2383…23a6 at0011 = ╱4b╱K╱ // 0x2394 @0x11
0x2383…23a6 at0012 = ╱52╱R╱ // 0x2395 @0x12
0x2383…23a6 at0013 = ╱45╱E╱ // 0x2396 @0x13
0x2383…23a6 at0014 = ╱4e╱N╱ // 0x2397 @0x14
0x2383…23a6 at0015 = ╱41╱A╱ // 0x2398 @0x15
0x2383…23a6 at0016 = ╱56╱V╱ // 0x2399 @0x16
0x2383…23a6 at0017 = ╱4e╱N╱ // 0x239a @0x17
0x2383…23a6 at0018 = ╱ef╱$╱ // 0x239b @0x18
0x2383…23a6 at0019 = ╱ec╱,╱ // 0x239c @0x19
0x2383…23a6 at001a = ╱4b╱K╱ // 0x239d @0x1a
0x2383…23a6 at001b = ╱52╱R╱ // 0x239e @0x1b
0x2383…23a6 at001c = ╱45╱E╱ // 0x239f @0x1c
0x2383…23a6 at001d = ╱47╱G╱ // 0x23a0 @0x1d
0x2383…23a6 at001e = ╱41╱A╱ // 0x23a1 @0x1e
0x2383…23a6 at001f = ╱44╱D╱ // 0x23a2 @0x1f
0x2383…23a6 at0020 = ╱45╱E╱ // 0x23a3 @0x20
0x2383…23a6 at0021 = ╱ef╱$╱ // 0x23a4 @0x21
0x2383…23a6 at0022 = EOL // 0x23a5 @0x22
0x2383…23a6 }
0x23a6…23b9 b110 4050 EXEC FEJL(C,E,K7$)
0x23a6…23b9 LineComalBin {
0x23a6…23b9 ptr = 0xb110 // 0x23a6 @0x0
0x23a6…23b9 lno = 0x0fd2 // 0x23a8 @0x2
0x23a6…23b9 at0004 = ╱9d╱ EXEC ╱ // 0x23aa @0x4
0x23a6…23b9 at0005 = ╱46╱F╱ // 0x23ab @0x5
0x23a6…23b9 at0006 = ╱45╱E╱ // 0x23ac @0x6
0x23a6…23b9 at0007 = ╱4a╱J╱ // 0x23ad @0x7
0x23a6…23b9 at0008 = ╱4c╱L╱ // 0x23ae @0x8
0x23a6…23b9 at0009 = ╱ed╱(╱ // 0x23af @0x9
0x23a6…23b9 at000a = ╱43╱C╱ // 0x23b0 @0xa
0x23a6…23b9 at000b = ╱ec╱,╱ // 0x23b1 @0xb
0x23a6…23b9 at000c = ╱45╱E╱ // 0x23b2 @0xc
0x23a6…23b9 at000d = ╱ec╱,╱ // 0x23b3 @0xd
0x23a6…23b9 at000e = ╱4b╱K╱ // 0x23b4 @0xe
0x23a6…23b9 at000f = ╱37╱7╱ // 0x23b5 @0xf
0x23a6…23b9 at0010 = ╱ef╱$╱ // 0x23b6 @0x10
0x23a6…23b9 at0011 = ╱ee╱)╱ // 0x23b7 @0x11
0x23a6…23b9 at0012 = EOL // 0x23b8 @0x12
0x23a6…23b9 }
0x23b9…23f7 b14e 4060 GET K7$,S+E:KREBY$,KRELK$,KREGR$,KREPOSTNR,KSALDO1$,KSALDO2$
0x23b9…23f7 LineComalBin {
0x23b9…23f7 ptr = 0xb14e // 0x23b9 @0x0
0x23b9…23f7 lno = 0x0fdc // 0x23bb @0x2
0x23b9…23f7 at0004 = ╱a9╱ GET ╱ // 0x23bd @0x4
0x23b9…23f7 at0005 = ╱4b╱K╱ // 0x23be @0x5
0x23b9…23f7 at0006 = ╱37╱7╱ // 0x23bf @0x6
0x23b9…23f7 at0007 = ╱ef╱$╱ // 0x23c0 @0x7
0x23b9…23f7 at0008 = ╱ec╱,╱ // 0x23c1 @0x8
0x23b9…23f7 at0009 = ╱53╱S╱ // 0x23c2 @0x9
0x23b9…23f7 at000a = ╱e2╱+╱ // 0x23c3 @0xa
0x23b9…23f7 at000b = ╱45╱E╱ // 0x23c4 @0xb
0x23b9…23f7 at000c = ╱f0╱:╱ // 0x23c5 @0xc
0x23b9…23f7 at000d = ╱4b╱K╱ // 0x23c6 @0xd
0x23b9…23f7 at000e = ╱52╱R╱ // 0x23c7 @0xe
0x23b9…23f7 at000f = ╱45╱E╱ // 0x23c8 @0xf
0x23b9…23f7 at0010 = ╱42╱B╱ // 0x23c9 @0x10
0x23b9…23f7 at0011 = ╱59╱Y╱ // 0x23ca @0x11
0x23b9…23f7 at0012 = ╱ef╱$╱ // 0x23cb @0x12
0x23b9…23f7 at0013 = ╱ec╱,╱ // 0x23cc @0x13
0x23b9…23f7 at0014 = ╱4b╱K╱ // 0x23cd @0x14
0x23b9…23f7 at0015 = ╱52╱R╱ // 0x23ce @0x15
0x23b9…23f7 at0016 = ╱45╱E╱ // 0x23cf @0x16
0x23b9…23f7 at0017 = ╱4c╱L╱ // 0x23d0 @0x17
0x23b9…23f7 at0018 = ╱4b╱K╱ // 0x23d1 @0x18
0x23b9…23f7 at0019 = ╱ef╱$╱ // 0x23d2 @0x19
0x23b9…23f7 at001a = ╱ec╱,╱ // 0x23d3 @0x1a
0x23b9…23f7 at001b = ╱4b╱K╱ // 0x23d4 @0x1b
0x23b9…23f7 at001c = ╱52╱R╱ // 0x23d5 @0x1c
0x23b9…23f7 at001d = ╱45╱E╱ // 0x23d6 @0x1d
0x23b9…23f7 at001e = ╱47╱G╱ // 0x23d7 @0x1e
0x23b9…23f7 at001f = ╱52╱R╱ // 0x23d8 @0x1f
0x23b9…23f7 at0020 = ╱ef╱$╱ // 0x23d9 @0x20
0x23b9…23f7 at0021 = ╱ec╱,╱ // 0x23da @0x21
0x23b9…23f7 at0022 = ╱4b╱K╱ // 0x23db @0x22
0x23b9…23f7 at0023 = ╱52╱R╱ // 0x23dc @0x23
0x23b9…23f7 at0024 = ╱45╱E╱ // 0x23dd @0x24
0x23b9…23f7 at0025 = ╱50╱P╱ // 0x23de @0x25
0x23b9…23f7 at0026 = ╱4f╱O╱ // 0x23df @0x26
0x23b9…23f7 at0027 = ╱53╱S╱ // 0x23e0 @0x27
0x23b9…23f7 at0028 = ╱54╱T╱ // 0x23e1 @0x28
0x23b9…23f7 at0029 = ╱4e╱N╱ // 0x23e2 @0x29
0x23b9…23f7 at002a = ╱52╱R╱ // 0x23e3 @0x2a
0x23b9…23f7 at002b = ╱ec╱,╱ // 0x23e4 @0x2b
0x23b9…23f7 at002c = ╱4b╱K╱ // 0x23e5 @0x2c
0x23b9…23f7 at002d = ╱53╱S╱ // 0x23e6 @0x2d
0x23b9…23f7 at002e = ╱41╱A╱ // 0x23e7 @0x2e
0x23b9…23f7 at002f = ╱4c╱L╱ // 0x23e8 @0x2f
0x23b9…23f7 at0030 = ╱44╱D╱ // 0x23e9 @0x30
0x23b9…23f7 at0031 = ╱4f╱O╱ // 0x23ea @0x31
0x23b9…23f7 at0032 = ╱31╱1╱ // 0x23eb @0x32
0x23b9…23f7 at0033 = ╱ef╱$╱ // 0x23ec @0x33
0x23b9…23f7 at0034 = ╱ec╱,╱ // 0x23ed @0x34
0x23b9…23f7 at0035 = ╱4b╱K╱ // 0x23ee @0x35
0x23b9…23f7 at0036 = ╱53╱S╱ // 0x23ef @0x36
0x23b9…23f7 at0037 = ╱41╱A╱ // 0x23f0 @0x37
0x23b9…23f7 at0038 = ╱4c╱L╱ // 0x23f1 @0x38
0x23b9…23f7 at0039 = ╱44╱D╱ // 0x23f2 @0x39
0x23b9…23f7 at003a = ╱4f╱O╱ // 0x23f3 @0x3a
0x23b9…23f7 at003b = ╱32╱2╱ // 0x23f4 @0x3b
0x23b9…23f7 at003c = ╱ef╱$╱ // 0x23f5 @0x3c
0x23b9…23f7 at003d = EOL // 0x23f6 @0x3d
0x23b9…23f7 }
0x23f7…240a b161 4070 EXEC FEJL(C,G,K7$)
0x23f7…240a LineComalBin {
0x23f7…240a ptr = 0xb161 // 0x23f7 @0x0
0x23f7…240a lno = 0x0fe6 // 0x23f9 @0x2
0x23f7…240a at0004 = ╱9d╱ EXEC ╱ // 0x23fb @0x4
0x23f7…240a at0005 = ╱46╱F╱ // 0x23fc @0x5
0x23f7…240a at0006 = ╱45╱E╱ // 0x23fd @0x6
0x23f7…240a at0007 = ╱4a╱J╱ // 0x23fe @0x7
0x23f7…240a at0008 = ╱4c╱L╱ // 0x23ff @0x8
0x23f7…240a at0009 = ╱ed╱(╱ // 0x2400 @0x9
0x23f7…240a at000a = ╱43╱C╱ // 0x2401 @0xa
0x23f7…240a at000b = ╱ec╱,╱ // 0x2402 @0xb
0x23f7…240a at000c = ╱47╱G╱ // 0x2403 @0xc
0x23f7…240a at000d = ╱ec╱,╱ // 0x2404 @0xd
0x23f7…240a at000e = ╱4b╱K╱ // 0x2405 @0xe
0x23f7…240a at000f = ╱37╱7╱ // 0x2406 @0xf
0x23f7…240a at0010 = ╱ef╱$╱ // 0x2407 @0x10
0x23f7…240a at0011 = ╱ee╱)╱ // 0x2408 @0x11
0x23f7…240a at0012 = EOL // 0x2409 @0x12
0x23f7…240a }
0x240a…2410 b167 4080 ENDPROC
0x240a…2410 LineComalBin {
0x240a…2410 ptr = 0xb167 // 0x240a @0x0
0x240a…2410 lno = 0x0ff0 // 0x240c @0x2
0x240a…2410 at0004 = ╱9f╱ ENDPROC ╱ // 0x240e @0x4
0x240a…2410 at0005 = EOL // 0x240f @0x5
0x240a…2410 }
0x2410…2422 b179 4090 PROC NRTEST(KTN1)
0x2410…2422 LineComalBin {
0x2410…2422 ptr = 0xb179 // 0x2410 @0x0
0x2410…2422 lno = 0x0ffa // 0x2412 @0x2
0x2410…2422 at0004 = ╱9e╱ PROC ╱ // 0x2414 @0x4
0x2410…2422 at0005 = ╱4e╱N╱ // 0x2415 @0x5
0x2410…2422 at0006 = ╱52╱R╱ // 0x2416 @0x6
0x2410…2422 at0007 = ╱54╱T╱ // 0x2417 @0x7
0x2410…2422 at0008 = ╱45╱E╱ // 0x2418 @0x8
0x2410…2422 at0009 = ╱53╱S╱ // 0x2419 @0x9
0x2410…2422 at000a = ╱54╱T╱ // 0x241a @0xa
0x2410…2422 at000b = ╱ed╱(╱ // 0x241b @0xb
0x2410…2422 at000c = ╱4b╱K╱ // 0x241c @0xc
0x2410…2422 at000d = ╱54╱T╱ // 0x241d @0xd
0x2410…2422 at000e = ╱4e╱N╱ // 0x241e @0xe
0x2410…2422 at000f = ╱31╱1╱ // 0x241f @0xf
0x2410…2422 at0010 = ╱ee╱)╱ // 0x2420 @0x10
0x2410…2422 at0011 = EOL // 0x2421 @0x11
0x2410…2422 }
0x2422…2444 b19b 4100 P=B;TEST2=B;KTAL=B;L=LEN(KTN1$)
0x2422…2444 LineComalBin {
0x2422…2444 ptr = 0xb19b // 0x2422 @0x0
0x2422…2444 lno = 0x1004 // 0x2424 @0x2
0x2422…2444 at0004 = ╱50╱P╱ // 0x2426 @0x4
0x2422…2444 at0005 = ╱dc╱=╱ // 0x2427 @0x5
0x2422…2444 at0006 = ╱42╱B╱ // 0x2428 @0x6
0x2422…2444 at0007 = ╱eb╱;╱ // 0x2429 @0x7
0x2422…2444 at0008 = ╱54╱T╱ // 0x242a @0x8
0x2422…2444 at0009 = ╱45╱E╱ // 0x242b @0x9
0x2422…2444 at000a = ╱53╱S╱ // 0x242c @0xa
0x2422…2444 at000b = ╱54╱T╱ // 0x242d @0xb
0x2422…2444 at000c = ╱32╱2╱ // 0x242e @0xc
0x2422…2444 at000d = ╱dc╱=╱ // 0x242f @0xd
0x2422…2444 at000e = ╱42╱B╱ // 0x2430 @0xe
0x2422…2444 at000f = ╱eb╱;╱ // 0x2431 @0xf
0x2422…2444 at0010 = ╱4b╱K╱ // 0x2432 @0x10
0x2422…2444 at0011 = ╱54╱T╱ // 0x2433 @0x11
0x2422…2444 at0012 = ╱41╱A╱ // 0x2434 @0x12
0x2422…2444 at0013 = ╱4c╱L╱ // 0x2435 @0x13
0x2422…2444 at0014 = ╱dc╱=╱ // 0x2436 @0x14
0x2422…2444 at0015 = ╱42╱B╱ // 0x2437 @0x15
0x2422…2444 at0016 = ╱eb╱;╱ // 0x2438 @0x16
0x2422…2444 at0017 = ╱4c╱L╱ // 0x2439 @0x17
0x2422…2444 at0018 = ╱dc╱=╱ // 0x243a @0x18
0x2422…2444 at0019 = ╱cc╱LEN╱ // 0x243b @0x19
0x2422…2444 at001a = ╱ed╱(╱ // 0x243c @0x1a
0x2422…2444 at001b = ╱4b╱K╱ // 0x243d @0x1b
0x2422…2444 at001c = ╱54╱T╱ // 0x243e @0x1c
0x2422…2444 at001d = ╱4e╱N╱ // 0x243f @0x1d
0x2422…2444 at001e = ╱31╱1╱ // 0x2440 @0x1e
0x2422…2444 at001f = ╱ef╱$╱ // 0x2441 @0x1f
0x2422…2444 at0020 = ╱ee╱)╱ // 0x2442 @0x20
0x2422…2444 at0021 = EOL // 0x2443 @0x21
0x2422…2444 }
0x2444…244d b1a4 4110 CASE L OF
0x2444…244d LineComalBin {
0x2444…244d ptr = 0xb1a4 // 0x2444 @0x0
0x2444…244d lno = 0x100e // 0x2446 @0x2
0x2444…244d at0004 = ╱a201╱ CASE ╱ // 0x2448 @0x4
0x2444…244d at0006 = ╱4c╱L╱ // 0x244a @0x6
0x2444…244d at0007 = ╱ba╱ OF ╱ // 0x244b @0x7
0x2444…244d at0008 = EOL // 0x244c @0x8
0x2444…244d }
0x244d…2458 b1af 4120 FOR I=E TO L
0x244d…2458 LineComalBin {
0x244d…2458 ptr = 0xb1af // 0x244d @0x0
0x244d…2458 lno = 0x1018 // 0x244f @0x2
0x244d…2458 at0004 = ╱83╱ FOR ╱ // 0x2451 @0x4
0x244d…2458 at0005 = ╱49╱I╱ // 0x2452 @0x5
0x244d…2458 at0006 = ╱dc╱=╱ // 0x2453 @0x6
0x244d…2458 at0007 = ╱45╱E╱ // 0x2454 @0x7
0x244d…2458 at0008 = ╱b7╱ TO ╱ // 0x2455 @0x8
0x244d…2458 at0009 = ╱4c╱L╱ // 0x2456 @0x9
0x244d…2458 at000a = EOL // 0x2457 @0xa
0x244d…2458 }
0x2458…2476 b1cd 4130 P1=INT(ORD(KTN1$(I))-48)
0x2458…2476 LineComalBin {
0x2458…2476 ptr = 0xb1cd // 0x2458 @0x0
0x2458…2476 lno = 0x1022 // 0x245a @0x2
0x2458…2476 at0004 = ╱50╱P╱ // 0x245c @0x4
0x2458…2476 at0005 = ╱31╱1╱ // 0x245d @0x5
0x2458…2476 at0006 = ╱dc╱=╱ // 0x245e @0x6
0x2458…2476 at0007 = ╱c6╱INT╱ // 0x245f @0x7
0x2458…2476 at0008 = ╱ed╱(╱ // 0x2460 @0x8
0x2458…2476 at0009 = ╱cd╱ORD╱ // 0x2461 @0x9
0x2458…2476 at000a = ╱ed╱(╱ // 0x2462 @0xa
0x2458…2476 at000b = ╱4b╱K╱ // 0x2463 @0xb
0x2458…2476 at000c = ╱54╱T╱ // 0x2464 @0xc
0x2458…2476 at000d = ╱4e╱N╱ // 0x2465 @0xd
0x2458…2476 at000e = ╱31╱1╱ // 0x2466 @0xe
0x2458…2476 at000f = ╱ef╱$╱ // 0x2467 @0xf
0x2458…2476 at0010 = ╱ed╱(╱ // 0x2468 @0x10
0x2458…2476 at0011 = ╱49╱I╱ // 0x2469 @0x11
0x2458…2476 at0012 = ╱ee╱)╱ // 0x246a @0x12
0x2458…2476 at0013 = ╱ee╱)╱ // 0x246b @0x13
0x2458…2476 at0014 = ╱e3╱-╱ // 0x246c @0x14
0x2458…2476 at0015 = ╱34╱4╱ // 0x246d @0x15
0x2458…2476 at0016 = ╱38╱8╱ // 0x246e @0x16
0x2458…2476 at0017 = ╱fe0000c006╱ // 0x246f @0x17
0x2458…2476 at001c = ╱ee╱)╱ // 0x2474 @0x1c
0x2458…2476 at001d = EOL // 0x2475 @0x1d
0x2458…2476 }
0x2476…2486 b1dd 4140 IF P1=>B AND P1<=W THEN
0x2476…2486 LineComalBin {
0x2476…2486 ptr = 0xb1dd // 0x2476 @0x0
0x2476…2486 lno = 0x102c // 0x2478 @0x2
0x2476…2486 at0004 = ╱9c╱ IF ╱ // 0x247a @0x4
0x2476…2486 at0005 = ╱50╱P╱ // 0x247b @0x5
0x2476…2486 at0006 = ╱31╱1╱ // 0x247c @0x6
0x2476…2486 at0007 = ╱e0╱=>╱ // 0x247d @0x7
0x2476…2486 at0008 = ╱42╱B╱ // 0x247e @0x8
0x2476…2486 at0009 = ╱da╱ AND ╱ // 0x247f @0x9
0x2476…2486 at000a = ╱50╱P╱ // 0x2480 @0xa
0x2476…2486 at000b = ╱31╱1╱ // 0x2481 @0xb
0x2476…2486 at000c = ╱df╱<=╱ // 0x2482 @0xc
0x2476…2486 at000d = ╱57╱W╱ // 0x2483 @0xd
0x2476…2486 at000e = ╱b6╱ THEN ╱ // 0x2484 @0xe
0x2476…2486 at000f = EOL // 0x2485 @0xf
0x2476…2486 }
0x2486…2499 b1f0 4150 P=P*10+P1
0x2486…2499 LineComalBin {
0x2486…2499 ptr = 0xb1f0 // 0x2486 @0x0
0x2486…2499 lno = 0x1036 // 0x2488 @0x2
0x2486…2499 at0004 = ╱50╱P╱ // 0x248a @0x4
0x2486…2499 at0005 = ╱dc╱=╱ // 0x248b @0x5
0x2486…2499 at0006 = ╱50╱P╱ // 0x248c @0x6
0x2486…2499 at0007 = ╱e4╱*╱ // 0x248d @0x7
0x2486…2499 at0008 = ╱31╱1╱ // 0x248e @0x8
0x2486…2499 at0009 = ╱30╱0╱ // 0x248f @0x9
0x2486…2499 at000a = ╱fe0000a004╱ // 0x2490 @0xa
0x2486…2499 at000f = ╱e2╱+╱ // 0x2495 @0xf
0x2486…2499 at0010 = ╱50╱P╱ // 0x2496 @0x10
0x2486…2499 at0011 = ╱31╱1╱ // 0x2497 @0x11
0x2486…2499 at0012 = EOL // 0x2498 @0x12
0x2486…2499 }
0x2499…249f b1f6 4160 ELSE
0x2499…249f LineComalBin {
0x2499…249f ptr = 0xb1f6 // 0x2499 @0x0
0x2499…249f lno = 0x1040 // 0x249b @0x2
0x2499…249f at0004 = ╱9a╱ ELSE ╱ // 0x249d @0x4
0x2499…249f at0005 = EOL // 0x249e @0x5
0x2499…249f }
0x249f…24ab b202 4170 TEST2=E
0x249f…24ab LineComalBin {
0x249f…24ab ptr = 0xb202 // 0x249f @0x0
0x249f…24ab lno = 0x104a // 0x24a1 @0x2
0x249f…24ab at0004 = ╱54╱T╱ // 0x24a3 @0x4
0x249f…24ab at0005 = ╱45╱E╱ // 0x24a4 @0x5
0x249f…24ab at0006 = ╱53╱S╱ // 0x24a5 @0x6
0x249f…24ab at0007 = ╱54╱T╱ // 0x24a6 @0x7
0x249f…24ab at0008 = ╱32╱2╱ // 0x24a7 @0x8
0x249f…24ab at0009 = ╱dc╱=╱ // 0x24a8 @0x9
0x249f…24ab at000a = ╱45╱E╱ // 0x24a9 @0xa
0x249f…24ab at000b = EOL // 0x24aa @0xb
0x249f…24ab }
0x24ab…24b1 b208 4180 ENDIF
0x24ab…24b1 LineComalBin {
0x24ab…24b1 ptr = 0xb208 // 0x24ab @0x0
0x24ab…24b1 lno = 0x1054 // 0x24ad @0x2
0x24ab…24b1 at0004 = ╱9b╱ ENDIF ╱ // 0x24af @0x4
0x24ab…24b1 at0005 = EOL // 0x24b0 @0x5
0x24ab…24b1 }
0x24b1…24b8 b20f 4190 NEXT I
0x24b1…24b8 LineComalBin {
0x24b1…24b8 ptr = 0xb20f // 0x24b1 @0x0
0x24b1…24b8 lno = 0x105e // 0x24b3 @0x2
0x24b1…24b8 at0004 = ╱84╱ NEXT ╱ // 0x24b5 @0x4
0x24b1…24b8 at0005 = ╱49╱I╱ // 0x24b6 @0x5
0x24b1…24b8 at0006 = EOL // 0x24b7 @0x6
0x24b1…24b8 }
0x24b8…24e0 b237 4200 KTAL=P DIV 10000;KTAL9=P DIV 1000
0x24b8…24e0 LineComalBin {
0x24b8…24e0 ptr = 0xb237 // 0x24b8 @0x0
0x24b8…24e0 lno = 0x1068 // 0x24ba @0x2
0x24b8…24e0 at0004 = ╱4b╱K╱ // 0x24bc @0x4
0x24b8…24e0 at0005 = ╱54╱T╱ // 0x24bd @0x5
0x24b8…24e0 at0006 = ╱41╱A╱ // 0x24be @0x6
0x24b8…24e0 at0007 = ╱4c╱L╱ // 0x24bf @0x7
0x24b8…24e0 at0008 = ╱dc╱=╱ // 0x24c0 @0x8
0x24b8…24e0 at0009 = ╱50╱P╱ // 0x24c1 @0x9
0x24b8…24e0 at000a = ╱e7╱ DIV ╱ // 0x24c2 @0xa
0x24b8…24e0 at000b = ╱31╱1╱ // 0x24c3 @0xb
0x24b8…24e0 at000c = ╱30╱0╱ // 0x24c4 @0xc
0x24b8…24e0 at000d = ╱30╱0╱ // 0x24c5 @0xd
0x24b8…24e0 at000e = ╱30╱0╱ // 0x24c6 @0xe
0x24b8…24e0 at000f = ╱30╱0╱ // 0x24c7 @0xf
0x24b8…24e0 at0010 = ╱fe00409c0e╱ // 0x24c8 @0x10
0x24b8…24e0 at0015 = ╱eb╱;╱ // 0x24cd @0x15
0x24b8…24e0 at0016 = ╱4b╱K╱ // 0x24ce @0x16
0x24b8…24e0 at0017 = ╱54╱T╱ // 0x24cf @0x17
0x24b8…24e0 at0018 = ╱41╱A╱ // 0x24d0 @0x18
0x24b8…24e0 at0019 = ╱4c╱L╱ // 0x24d1 @0x19
0x24b8…24e0 at001a = ╱39╱9╱ // 0x24d2 @0x1a
0x24b8…24e0 at001b = ╱dc╱=╱ // 0x24d3 @0x1b
0x24b8…24e0 at001c = ╱50╱P╱ // 0x24d4 @0x1c
0x24b8…24e0 at001d = ╱e7╱ DIV ╱ // 0x24d5 @0x1d
0x24b8…24e0 at001e = ╱31╱1╱ // 0x24d6 @0x1e
0x24b8…24e0 at001f = ╱30╱0╱ // 0x24d7 @0x1f
0x24b8…24e0 at0020 = ╱30╱0╱ // 0x24d8 @0x20
0x24b8…24e0 at0021 = ╱30╱0╱ // 0x24d9 @0x21
0x24b8…24e0 at0022 = ╱fe0000fa0a╱ // 0x24da @0x22
0x24b8…24e0 at0027 = EOL // 0x24df @0x27
0x24b8…24e0 }
0x24e0…24fc b253 4210 IF KTAL9=KRTAL THEN KTAL=KTAL9
0x24e0…24fc LineComalBin {
0x24e0…24fc ptr = 0xb253 // 0x24e0 @0x0
0x24e0…24fc lno = 0x1072 // 0x24e2 @0x2
0x24e0…24fc at0004 = ╱82╱ IF ╱ // 0x24e4 @0x4
0x24e0…24fc at0005 = ╱4b╱K╱ // 0x24e5 @0x5
0x24e0…24fc at0006 = ╱54╱T╱ // 0x24e6 @0x6
0x24e0…24fc at0007 = ╱41╱A╱ // 0x24e7 @0x7
0x24e0…24fc at0008 = ╱4c╱L╱ // 0x24e8 @0x8
0x24e0…24fc at0009 = ╱39╱9╱ // 0x24e9 @0x9
0x24e0…24fc at000a = ╱dc╱=╱ // 0x24ea @0xa
0x24e0…24fc at000b = ╱4b╱K╱ // 0x24eb @0xb
0x24e0…24fc at000c = ╱52╱R╱ // 0x24ec @0xc
0x24e0…24fc at000d = ╱54╱T╱ // 0x24ed @0xd
0x24e0…24fc at000e = ╱41╱A╱ // 0x24ee @0xe
0x24e0…24fc at000f = ╱4c╱L╱ // 0x24ef @0xf
0x24e0…24fc at0010 = ╱b6╱ THEN ╱ // 0x24f0 @0x10
0x24e0…24fc at0011 = ╱4b╱K╱ // 0x24f1 @0x11
0x24e0…24fc at0012 = ╱54╱T╱ // 0x24f2 @0x12
0x24e0…24fc at0013 = ╱41╱A╱ // 0x24f3 @0x13
0x24e0…24fc at0014 = ╱4c╱L╱ // 0x24f4 @0x14
0x24e0…24fc at0015 = ╱dc╱=╱ // 0x24f5 @0x15
0x24e0…24fc at0016 = ╱4b╱K╱ // 0x24f6 @0x16
0x24e0…24fc at0017 = ╱54╱T╱ // 0x24f7 @0x17
0x24e0…24fc at0018 = ╱41╱A╱ // 0x24f8 @0x18
0x24e0…24fc at0019 = ╱4c╱L╱ // 0x24f9 @0x19
0x24e0…24fc at001a = ╱39╱9╱ // 0x24fa @0x1a
0x24e0…24fc at001b = EOL // 0x24fb @0x1b
0x24e0…24fc }
0x24fc…2504 b25b 4220 WHEN B
0x24fc…2504 LineComalBin {
0x24fc…2504 ptr = 0xb25b // 0x24fc @0x0
0x24fc…2504 lno = 0x107c // 0x24fe @0x2
0x24fc…2504 at0004 = ╱a301╱ WHEN ╱ // 0x2500 @0x4
0x24fc…2504 at0006 = ╱42╱B╱ // 0x2502 @0x6
0x24fc…2504 at0007 = EOL // 0x2503 @0x7
0x24fc…2504 }
0x2504…250d b264 4230 P=-E
0x2504…250d LineComalBin {
0x2504…250d ptr = 0xb264 // 0x2504 @0x0
0x2504…250d lno = 0x1086 // 0x2506 @0x2
0x2504…250d at0004 = ╱50╱P╱ // 0x2508 @0x4
0x2504…250d at0005 = ╱dc╱=╱ // 0x2509 @0x5
0x2504…250d at0006 = ╱e9╱-╱ // 0x250a @0x6
0x2504…250d at0007 = ╱45╱E╱ // 0x250b @0x7
0x2504…250d at0008 = EOL // 0x250c @0x8
0x2504…250d }
0x250d…2515 b26c 4240 WHEN E
0x250d…2515 LineComalBin {
0x250d…2515 ptr = 0xb26c // 0x250d @0x0
0x250d…2515 lno = 0x1090 // 0x250f @0x2
0x250d…2515 at0004 = ╱a301╱ WHEN ╱ // 0x2511 @0x4
0x250d…2515 at0006 = ╱45╱E╱ // 0x2513 @0x6
0x250d…2515 at0007 = EOL // 0x2514 @0x7
0x250d…2515 }
0x2515…2522 b279 4250 CASE KTN1$ OF
0x2515…2522 LineComalBin {
0x2515…2522 ptr = 0xb279 // 0x2515 @0x0
0x2515…2522 lno = 0x109a // 0x2517 @0x2
0x2515…2522 at0004 = ╱a200╱ CASE ╱ // 0x2519 @0x4
0x2515…2522 at0006 = ╱4b╱K╱ // 0x251b @0x6
0x2515…2522 at0007 = ╱54╱T╱ // 0x251c @0x7
0x2515…2522 at0008 = ╱4e╱N╱ // 0x251d @0x8
0x2515…2522 at0009 = ╱31╱1╱ // 0x251e @0x9
0x2515…2522 at000a = ╱ef╱$╱ // 0x251f @0xa
0x2515…2522 at000b = ╱ba╱ OF ╱ // 0x2520 @0xb
0x2515…2522 at000c = EOL // 0x2521 @0xc
0x2515…2522 }
0x2522…253c b293 4260 P=INT(ORD(KTN1$)-48)
0x2522…253c LineComalBin {
0x2522…253c ptr = 0xb293 // 0x2522 @0x0
0x2522…253c lno = 0x10a4 // 0x2524 @0x2
0x2522…253c at0004 = ╱50╱P╱ // 0x2526 @0x4
0x2522…253c at0005 = ╱dc╱=╱ // 0x2527 @0x5
0x2522…253c at0006 = ╱c6╱INT╱ // 0x2528 @0x6
0x2522…253c at0007 = ╱ed╱(╱ // 0x2529 @0x7
0x2522…253c at0008 = ╱cd╱ORD╱ // 0x252a @0x8
0x2522…253c at0009 = ╱ed╱(╱ // 0x252b @0x9
0x2522…253c at000a = ╱4b╱K╱ // 0x252c @0xa
0x2522…253c at000b = ╱54╱T╱ // 0x252d @0xb
0x2522…253c at000c = ╱4e╱N╱ // 0x252e @0xc
0x2522…253c at000d = ╱31╱1╱ // 0x252f @0xd
0x2522…253c at000e = ╱ef╱$╱ // 0x2530 @0xe
0x2522…253c at000f = ╱ee╱)╱ // 0x2531 @0xf
0x2522…253c at0010 = ╱e3╱-╱ // 0x2532 @0x10
0x2522…253c at0011 = ╱34╱4╱ // 0x2533 @0x11
0x2522…253c at0012 = ╱38╱8╱ // 0x2534 @0x12
0x2522…253c at0013 = ╱fe0000c006╱ // 0x2535 @0x13
0x2522…253c at0018 = ╱ee╱)╱ // 0x253a @0x18
0x2522…253c at0019 = EOL // 0x253b @0x19
0x2522…253c }
0x253c…254a b2a1 4270 WHEN "j","J"
0x253c…254a LineComalBin {
0x253c…254a ptr = 0xb2a1 // 0x253c @0x0
0x253c…254a lno = 0x10ae // 0x253e @0x2
0x253c…254a at0004 = ╱a300╱ WHEN ╱ // 0x2540 @0x4
0x253c…254a at0006 = ╱22╱"╱ // 0x2542 @0x6
0x253c…254a at0007 = ╱6a╱j╱ // 0x2543 @0x7
0x253c…254a at0008 = ╱22╱"╱ // 0x2544 @0x8
0x253c…254a at0009 = ╱ec╱,╱ // 0x2545 @0x9
0x253c…254a at000a = ╱22╱"╱ // 0x2546 @0xa
0x253c…254a at000b = ╱4a╱J╱ // 0x2547 @0xb
0x253c…254a at000c = ╱22╱"╱ // 0x2548 @0xc
0x253c…254a at000d = EOL // 0x2549 @0xd
0x253c…254a }
0x254a…2558 b2af 4280 P=-7
0x254a…2558 LineComalBin {
0x254a…2558 ptr = 0xb2af // 0x254a @0x0
0x254a…2558 lno = 0x10b8 // 0x254c @0x2
0x254a…2558 at0004 = ╱50╱P╱ // 0x254e @0x4
0x254a…2558 at0005 = ╱dc╱=╱ // 0x254f @0x5
0x254a…2558 at0006 = ╱e9╱-╱ // 0x2550 @0x6
0x254a…2558 at0007 = ╱37╱7╱ // 0x2551 @0x7
0x254a…2558 at0008 = ╱fe0000e003╱ // 0x2552 @0x8
0x254a…2558 at000d = EOL // 0x2557 @0xd
0x254a…2558 }
0x2558…2566 b2bd 4290 WHEN "n","N"
0x2558…2566 LineComalBin {
0x2558…2566 ptr = 0xb2bd // 0x2558 @0x0
0x2558…2566 lno = 0x10c2 // 0x255a @0x2
0x2558…2566 at0004 = ╱a300╱ WHEN ╱ // 0x255c @0x4
0x2558…2566 at0006 = ╱22╱"╱ // 0x255e @0x6
0x2558…2566 at0007 = ╱6e╱n╱ // 0x255f @0x7
0x2558…2566 at0008 = ╱22╱"╱ // 0x2560 @0x8
0x2558…2566 at0009 = ╱ec╱,╱ // 0x2561 @0x9
0x2558…2566 at000a = ╱22╱"╱ // 0x2562 @0xa
0x2558…2566 at000b = ╱4e╱N╱ // 0x2563 @0xb
0x2558…2566 at000c = ╱22╱"╱ // 0x2564 @0xc
0x2558…2566 at000d = EOL // 0x2565 @0xd
0x2558…2566 }
0x2566…2574 b2cb 4300 P=-8
0x2566…2574 LineComalBin {
0x2566…2574 ptr = 0xb2cb // 0x2566 @0x0
0x2566…2574 lno = 0x10cc // 0x2568 @0x2
0x2566…2574 at0004 = ╱50╱P╱ // 0x256a @0x4
0x2566…2574 at0005 = ╱dc╱=╱ // 0x256b @0x5
0x2566…2574 at0006 = ╱e9╱-╱ // 0x256c @0x6
0x2566…2574 at0007 = ╱38╱8╱ // 0x256d @0x7
0x2566…2574 at0008 = ╱fe00008004╱ // 0x256e @0x8
0x2566…2574 at000d = EOL // 0x2573 @0xd
0x2566…2574 }
0x2574…257a b2d1 4310 ENDCASE
0x2574…257a LineComalBin {
0x2574…257a ptr = 0xb2d1 // 0x2574 @0x0
0x2574…257a lno = 0x10d6 // 0x2576 @0x2
0x2574…257a at0004 = ╱a4╱ ENDCASE ╱ // 0x2578 @0x4
0x2574…257a at0005 = EOL // 0x2579 @0x5
0x2574…257a }
0x257a…2580 b2d7 4320 ENDCASE
0x257a…2580 LineComalBin {
0x257a…2580 ptr = 0xb2d7 // 0x257a @0x0
0x257a…2580 lno = 0x10e0 // 0x257c @0x2
0x257a…2580 at0004 = ╱a4╱ ENDCASE ╱ // 0x257e @0x4
0x257a…2580 at0005 = EOL // 0x257f @0x5
0x257a…2580 }
0x2580…2586 b2dd 4330 ENDPROC
0x2580…2586 LineComalBin {
0x2580…2586 ptr = 0xb2dd // 0x2580 @0x0
0x2580…2586 lno = 0x10ea // 0x2582 @0x2
0x2580…2586 at0004 = ╱9f╱ ENDPROC ╱ // 0x2584 @0x4
0x2580…2586 at0005 = EOL // 0x2585 @0x5
0x2580…2586 }
0x2586…25a4 b2fb 4340 PROC HOVIND(V1,MPOSTANTAL1,R)
0x2586…25a4 LineComalBin {
0x2586…25a4 ptr = 0xb2fb // 0x2586 @0x0
0x2586…25a4 lno = 0x10f4 // 0x2588 @0x2
0x2586…25a4 at0004 = ╱9e╱ PROC ╱ // 0x258a @0x4
0x2586…25a4 at0005 = ╱48╱H╱ // 0x258b @0x5
0x2586…25a4 at0006 = ╱4f╱O╱ // 0x258c @0x6
0x2586…25a4 at0007 = ╱56╱V╱ // 0x258d @0x7
0x2586…25a4 at0008 = ╱49╱I╱ // 0x258e @0x8
0x2586…25a4 at0009 = ╱4e╱N╱ // 0x258f @0x9
0x2586…25a4 at000a = ╱44╱D╱ // 0x2590 @0xa
0x2586…25a4 at000b = ╱ed╱(╱ // 0x2591 @0xb
0x2586…25a4 at000c = ╱56╱V╱ // 0x2592 @0xc
0x2586…25a4 at000d = ╱31╱1╱ // 0x2593 @0xd
0x2586…25a4 at000e = ╱ec╱,╱ // 0x2594 @0xe
0x2586…25a4 at000f = ╱4d╱M╱ // 0x2595 @0xf
0x2586…25a4 at0010 = ╱50╱P╱ // 0x2596 @0x10
0x2586…25a4 at0011 = ╱4f╱O╱ // 0x2597 @0x11
0x2586…25a4 at0012 = ╱53╱S╱ // 0x2598 @0x12
0x2586…25a4 at0013 = ╱54╱T╱ // 0x2599 @0x13
0x2586…25a4 at0014 = ╱41╱A╱ // 0x259a @0x14
0x2586…25a4 at0015 = ╱4e╱N╱ // 0x259b @0x15
0x2586…25a4 at0016 = ╱54╱T╱ // 0x259c @0x16
0x2586…25a4 at0017 = ╱41╱A╱ // 0x259d @0x17
0x2586…25a4 at0018 = ╱4c╱L╱ // 0x259e @0x18
0x2586…25a4 at0019 = ╱31╱1╱ // 0x259f @0x19
0x2586…25a4 at001a = ╱ec╱,╱ // 0x25a0 @0x1a
0x2586…25a4 at001b = ╱52╱R╱ // 0x25a1 @0x1b
0x2586…25a4 at001c = ╱ee╱)╱ // 0x25a2 @0x1c
0x2586…25a4 at001d = EOL // 0x25a3 @0x1d
0x2586…25a4 }
0x25a4…25af b306 4350 OPEN V1$,R
0x25a4…25af LineComalBin {
0x25a4…25af ptr = 0xb306 // 0x25a4 @0x0
0x25a4…25af lno = 0x10fe // 0x25a6 @0x2
0x25a4…25af at0004 = ╱a7╱ OPEN ╱ // 0x25a8 @0x4
0x25a4…25af at0005 = ╱56╱V╱ // 0x25a9 @0x5
0x25a4…25af at0006 = ╱31╱1╱ // 0x25aa @0x6
0x25a4…25af at0007 = ╱ef╱$╱ // 0x25ab @0x7
0x25a4…25af at0008 = ╱ec╱,╱ // 0x25ac @0x8
0x25a4…25af at0009 = ╱52╱R╱ // 0x25ad @0x9
0x25a4…25af at000a = EOL // 0x25ae @0xa
0x25a4…25af }
0x25af…25c8 b31f 4360 EXEC FEJL(13,E,V1$)
0x25af…25c8 LineComalBin {
0x25af…25c8 ptr = 0xb31f // 0x25af @0x0
0x25af…25c8 lno = 0x1108 // 0x25b1 @0x2
0x25af…25c8 at0004 = ╱9d╱ EXEC ╱ // 0x25b3 @0x4
0x25af…25c8 at0005 = ╱46╱F╱ // 0x25b4 @0x5
0x25af…25c8 at0006 = ╱45╱E╱ // 0x25b5 @0x6
0x25af…25c8 at0007 = ╱4a╱J╱ // 0x25b6 @0x7
0x25af…25c8 at0008 = ╱4c╱L╱ // 0x25b7 @0x8
0x25af…25c8 at0009 = ╱ed╱(╱ // 0x25b8 @0x9
0x25af…25c8 at000a = ╱31╱1╱ // 0x25b9 @0xa
0x25af…25c8 at000b = ╱33╱3╱ // 0x25ba @0xb
0x25af…25c8 at000c = ╱fe0000d004╱ // 0x25bb @0xc
0x25af…25c8 at0011 = ╱ec╱,╱ // 0x25c0 @0x11
0x25af…25c8 at0012 = ╱45╱E╱ // 0x25c1 @0x12
0x25af…25c8 at0013 = ╱ec╱,╱ // 0x25c2 @0x13
0x25af…25c8 at0014 = ╱56╱V╱ // 0x25c3 @0x14
0x25af…25c8 at0015 = ╱31╱1╱ // 0x25c4 @0x15
0x25af…25c8 at0016 = ╱ef╱$╱ // 0x25c5 @0x16
0x25af…25c8 at0017 = ╱ee╱)╱ // 0x25c6 @0x17
0x25af…25c8 at0018 = EOL // 0x25c7 @0x18
0x25af…25c8 }
0x25c8…25e6 b33d 4370 FOR I=E TO MPOSTANTAL1 DIV 160
0x25c8…25e6 LineComalBin {
0x25c8…25e6 ptr = 0xb33d // 0x25c8 @0x0
0x25c8…25e6 lno = 0x1112 // 0x25ca @0x2
0x25c8…25e6 at0004 = ╱83╱ FOR ╱ // 0x25cc @0x4
0x25c8…25e6 at0005 = ╱49╱I╱ // 0x25cd @0x5
0x25c8…25e6 at0006 = ╱dc╱=╱ // 0x25ce @0x6
0x25c8…25e6 at0007 = ╱45╱E╱ // 0x25cf @0x7
0x25c8…25e6 at0008 = ╱b7╱ TO ╱ // 0x25d0 @0x8
0x25c8…25e6 at0009 = ╱4d╱M╱ // 0x25d1 @0x9
0x25c8…25e6 at000a = ╱50╱P╱ // 0x25d2 @0xa
0x25c8…25e6 at000b = ╱4f╱O╱ // 0x25d3 @0xb
0x25c8…25e6 at000c = ╱53╱S╱ // 0x25d4 @0xc
0x25c8…25e6 at000d = ╱54╱T╱ // 0x25d5 @0xd
0x25c8…25e6 at000e = ╱41╱A╱ // 0x25d6 @0xe
0x25c8…25e6 at000f = ╱4e╱N╱ // 0x25d7 @0xf
0x25c8…25e6 at0010 = ╱54╱T╱ // 0x25d8 @0x10
0x25c8…25e6 at0011 = ╱41╱A╱ // 0x25d9 @0x11
0x25c8…25e6 at0012 = ╱4c╱L╱ // 0x25da @0x12
0x25c8…25e6 at0013 = ╱31╱1╱ // 0x25db @0x13
0x25c8…25e6 at0014 = ╱e7╱ DIV ╱ // 0x25dc @0x14
0x25c8…25e6 at0015 = ╱31╱1╱ // 0x25dd @0x15
0x25c8…25e6 at0016 = ╱36╱6╱ // 0x25de @0x16
0x25c8…25e6 at0017 = ╱30╱0╱ // 0x25df @0x17
0x25c8…25e6 at0018 = ╱fe0000a008╱ // 0x25e0 @0x18
0x25c8…25e6 at001d = EOL // 0x25e5 @0x1d
0x25c8…25e6 }
0x25e6…260b (126,) b362 4380 J=(I-E)*C+E;J1=J+E;J2=J+G;J3=J+V
0x25e6…260b LineComalBin {
0x25e6…260b ptr = 0xb362 // 0x25e6 @0x0
0x25e6…260b lno = 0x111c // 0x25e8 @0x2
0x25e6…260b at0004 = ╱4a╱J╱ // 0x25ea @0x4
0x25e6…260b at0005 = ╱dc╱=╱ // 0x25eb @0x5
0x25e6…260b at0006 = ╱ed╱(╱ // 0x25ec @0x6
0x25e6…260b at0007 = ╱49╱I╱ // 0x25ed @0x7
0x25e6…260b at0008 = ╱e3╱-╱ // 0x25ee @0x8
0x25e6…260b at0009 = ╱45╱E╱ // 0x25ef @0x9
0x25e6…260b at000a = ╱ee╱)╱ // 0x25f0 @0xa
0x25e6…260b at000b = ╱e4╱*╱ // 0x25f1 @0xb
0x25e6…260b at000c = ╱43╱C╱ // 0x25f2 @0xc
0x25e6…260b at000d = ╱e2╱+╱ // 0x25f3 @0xd
0x25e6…260b at000e = ╱45╱E╱ // 0x25f4 @0xe
0x25e6…260b at000f = ╱eb╱;╱ // 0x25f5 @0xf
0x25e6…260b at0010 = ╱4a╱J╱ // 0x25f6 @0x10
0x25e6…260b at0011 = ╱31╱1╱ // 0x25f7 @0x11
0x25e6…260b at0012 = ╱dc╱=╱ // 0x25f8 @0x12
0x25e6…260b at0013 = ╱4a╱J╱ // 0x25f9 @0x13
0x25e6…260b at0014 = ╱e2╱+╱ // 0x25fa @0x14
0x25e6…260b at0015 = ╱45╱E╱ // 0x25fb @0x15
0x25e6…260b at0016 = ╱eb╱;╱ // 0x25fc @0x16
0x25e6…260b at0017 = ╱4a╱J╱ // 0x25fd @0x17
0x25e6…260b at0018 = ╱32╱2╱ // 0x25fe @0x18
0x25e6…260b at0019 = ╱dc╱=╱ // 0x25ff @0x19
0x25e6…260b at001a = ╱4a╱J╱ // 0x2600 @0x1a
0x25e6…260b at001b = ╱e2╱+╱ // 0x2601 @0x1b
0x25e6…260b at001c = ╱47╱G╱ // 0x2602 @0x1c
0x25e6…260b at001d = ╱eb╱;╱ // 0x2603 @0x1d
0x25e6…260b at001e = ╱4a╱J╱ // 0x2604 @0x1e
0x25e6…260b at001f = ╱33╱3╱ // 0x2605 @0x1f
0x25e6…260b at0020 = ╱dc╱=╱ // 0x2606 @0x20
0x25e6…260b at0021 = ╱4a╱J╱ // 0x2607 @0x21
0x25e6…260b at0022 = ╱e2╱+╱ // 0x2608 @0x22
0x25e6…260b at0023 = ╱56╱V╱ // 0x2609 @0x23
0x25e6…260b at0024 = EOL // 0x260a @0x24
0x25e6…260b }
0x260b…2654 b3ab 4390 GET V1$,I:R(J,E),R(J,G),R(J1,E),R(J1,G),R(J2,E),R(J2,G),R(J3,E),R(J3,G)
0x260b…2654 LineComalBin {
0x260b…2654 ptr = 0xb3ab // 0x260b @0x0
0x260b…2654 lno = 0x1126 // 0x260d @0x2
0x260b…2654 at0004 = ╱a9╱ GET ╱ // 0x260f @0x4
0x260b…2654 at0005 = ╱56╱V╱ // 0x2610 @0x5
0x260b…2654 at0006 = ╱31╱1╱ // 0x2611 @0x6
0x260b…2654 at0007 = ╱ef╱$╱ // 0x2612 @0x7
0x260b…2654 at0008 = ╱ec╱,╱ // 0x2613 @0x8
0x260b…2654 at0009 = ╱49╱I╱ // 0x2614 @0x9
0x260b…2654 at000a = ╱f0╱:╱ // 0x2615 @0xa
0x260b…2654 at000b = ╱52╱R╱ // 0x2616 @0xb
0x260b…2654 at000c = ╱ed╱(╱ // 0x2617 @0xc
0x260b…2654 at000d = ╱4a╱J╱ // 0x2618 @0xd
0x260b…2654 at000e = ╱ec╱,╱ // 0x2619 @0xe
0x260b…2654 at000f = ╱45╱E╱ // 0x261a @0xf
0x260b…2654 at0010 = ╱ee╱)╱ // 0x261b @0x10
0x260b…2654 at0011 = ╱ec╱,╱ // 0x261c @0x11
0x260b…2654 at0012 = ╱52╱R╱ // 0x261d @0x12
0x260b…2654 at0013 = ╱ed╱(╱ // 0x261e @0x13
0x260b…2654 at0014 = ╱4a╱J╱ // 0x261f @0x14
0x260b…2654 at0015 = ╱ec╱,╱ // 0x2620 @0x15
0x260b…2654 at0016 = ╱47╱G╱ // 0x2621 @0x16
0x260b…2654 at0017 = ╱ee╱)╱ // 0x2622 @0x17
0x260b…2654 at0018 = ╱ec╱,╱ // 0x2623 @0x18
0x260b…2654 at0019 = ╱52╱R╱ // 0x2624 @0x19
0x260b…2654 at001a = ╱ed╱(╱ // 0x2625 @0x1a
0x260b…2654 at001b = ╱4a╱J╱ // 0x2626 @0x1b
0x260b…2654 at001c = ╱31╱1╱ // 0x2627 @0x1c
0x260b…2654 at001d = ╱ec╱,╱ // 0x2628 @0x1d
0x260b…2654 at001e = ╱45╱E╱ // 0x2629 @0x1e
0x260b…2654 at001f = ╱ee╱)╱ // 0x262a @0x1f
0x260b…2654 at0020 = ╱ec╱,╱ // 0x262b @0x20
0x260b…2654 at0021 = ╱52╱R╱ // 0x262c @0x21
0x260b…2654 at0022 = ╱ed╱(╱ // 0x262d @0x22
0x260b…2654 at0023 = ╱4a╱J╱ // 0x262e @0x23
0x260b…2654 at0024 = ╱31╱1╱ // 0x262f @0x24
0x260b…2654 at0025 = ╱ec╱,╱ // 0x2630 @0x25
0x260b…2654 at0026 = ╱47╱G╱ // 0x2631 @0x26
0x260b…2654 at0027 = ╱ee╱)╱ // 0x2632 @0x27
0x260b…2654 at0028 = ╱ec╱,╱ // 0x2633 @0x28
0x260b…2654 at0029 = ╱52╱R╱ // 0x2634 @0x29
0x260b…2654 at002a = ╱ed╱(╱ // 0x2635 @0x2a
0x260b…2654 at002b = ╱4a╱J╱ // 0x2636 @0x2b
0x260b…2654 at002c = ╱32╱2╱ // 0x2637 @0x2c
0x260b…2654 at002d = ╱ec╱,╱ // 0x2638 @0x2d
0x260b…2654 at002e = ╱45╱E╱ // 0x2639 @0x2e
0x260b…2654 at002f = ╱ee╱)╱ // 0x263a @0x2f
0x260b…2654 at0030 = ╱ec╱,╱ // 0x263b @0x30
0x260b…2654 at0031 = ╱52╱R╱ // 0x263c @0x31
0x260b…2654 at0032 = ╱ed╱(╱ // 0x263d @0x32
0x260b…2654 at0033 = ╱4a╱J╱ // 0x263e @0x33
0x260b…2654 at0034 = ╱32╱2╱ // 0x263f @0x34
0x260b…2654 at0035 = ╱ec╱,╱ // 0x2640 @0x35
0x260b…2654 at0036 = ╱47╱G╱ // 0x2641 @0x36
0x260b…2654 at0037 = ╱ee╱)╱ // 0x2642 @0x37
0x260b…2654 at0038 = ╱ec╱,╱ // 0x2643 @0x38
0x260b…2654 at0039 = ╱52╱R╱ // 0x2644 @0x39
0x260b…2654 at003a = ╱ed╱(╱ // 0x2645 @0x3a
0x260b…2654 at003b = ╱4a╱J╱ // 0x2646 @0x3b
0x260b…2654 at003c = ╱33╱3╱ // 0x2647 @0x3c
0x260b…2654 at003d = ╱ec╱,╱ // 0x2648 @0x3d
0x260b…2654 at003e = ╱45╱E╱ // 0x2649 @0x3e
0x260b…2654 at003f = ╱ee╱)╱ // 0x264a @0x3f
0x260b…2654 at0040 = ╱ec╱,╱ // 0x264b @0x40
0x260b…2654 at0041 = ╱52╱R╱ // 0x264c @0x41
0x260b…2654 at0042 = ╱ed╱(╱ // 0x264d @0x42
0x260b…2654 at0043 = ╱4a╱J╱ // 0x264e @0x43
0x260b…2654 at0044 = ╱33╱3╱ // 0x264f @0x44
0x260b…2654 at0045 = ╱ec╱,╱ // 0x2650 @0x45
0x260b…2654 at0046 = ╱47╱G╱ // 0x2651 @0x46
0x260b…2654 at0047 = ╱ee╱)╱ // 0x2652 @0x47
0x260b…2654 at0048 = EOL // 0x2653 @0x48
0x260b…2654 }
0x2654…266d b3c4 4400 EXEC FEJL(13,G,V1$)
0x2654…266d LineComalBin {
0x2654…266d ptr = 0xb3c4 // 0x2654 @0x0
0x2654…266d lno = 0x1130 // 0x2656 @0x2
0x2654…266d at0004 = ╱9d╱ EXEC ╱ // 0x2658 @0x4
0x2654…266d at0005 = ╱46╱F╱ // 0x2659 @0x5
0x2654…266d at0006 = ╱45╱E╱ // 0x265a @0x6
0x2654…266d at0007 = ╱4a╱J╱ // 0x265b @0x7
0x2654…266d at0008 = ╱4c╱L╱ // 0x265c @0x8
0x2654…266d at0009 = ╱ed╱(╱ // 0x265d @0x9
0x2654…266d at000a = ╱31╱1╱ // 0x265e @0xa
0x2654…266d at000b = ╱33╱3╱ // 0x265f @0xb
0x2654…266d at000c = ╱fe0000d004╱ // 0x2660 @0xc
0x2654…266d at0011 = ╱ec╱,╱ // 0x2665 @0x11
0x2654…266d at0012 = ╱47╱G╱ // 0x2666 @0x12
0x2654…266d at0013 = ╱ec╱,╱ // 0x2667 @0x13
0x2654…266d at0014 = ╱56╱V╱ // 0x2668 @0x14
0x2654…266d at0015 = ╱31╱1╱ // 0x2669 @0x15
0x2654…266d at0016 = ╱ef╱$╱ // 0x266a @0x16
0x2654…266d at0017 = ╱ee╱)╱ // 0x266b @0x17
0x2654…266d at0018 = EOL // 0x266c @0x18
0x2654…266d }
0x266d…2674 b3cb 4410 NEXT I
0x266d…2674 LineComalBin {
0x266d…2674 ptr = 0xb3cb // 0x266d @0x0
0x266d…2674 lno = 0x113a // 0x266f @0x2
0x266d…2674 at0004 = ╱84╱ NEXT ╱ // 0x2671 @0x4
0x266d…2674 at0005 = ╱49╱I╱ // 0x2672 @0x5
0x266d…2674 at0006 = EOL // 0x2673 @0x6
0x266d…2674 }
0x2674…267d b3d4 4420 CLOSE V1$
0x2674…267d LineComalBin {
0x2674…267d ptr = 0xb3d4 // 0x2674 @0x0
0x2674…267d lno = 0x1144 // 0x2676 @0x2
0x2674…267d at0004 = ╱a8╱ CLOSE ╱ // 0x2678 @0x4
0x2674…267d at0005 = ╱56╱V╱ // 0x2679 @0x5
0x2674…267d at0006 = ╱31╱1╱ // 0x267a @0x6
0x2674…267d at0007 = ╱ef╱$╱ // 0x267b @0x7
0x2674…267d at0008 = EOL // 0x267c @0x8
0x2674…267d }
0x267d…2696 b3ed 4430 EXEC FEJL(13,V,V1$)
0x267d…2696 LineComalBin {
0x267d…2696 ptr = 0xb3ed // 0x267d @0x0
0x267d…2696 lno = 0x114e // 0x267f @0x2
0x267d…2696 at0004 = ╱9d╱ EXEC ╱ // 0x2681 @0x4
0x267d…2696 at0005 = ╱46╱F╱ // 0x2682 @0x5
0x267d…2696 at0006 = ╱45╱E╱ // 0x2683 @0x6
0x267d…2696 at0007 = ╱4a╱J╱ // 0x2684 @0x7
0x267d…2696 at0008 = ╱4c╱L╱ // 0x2685 @0x8
0x267d…2696 at0009 = ╱ed╱(╱ // 0x2686 @0x9
0x267d…2696 at000a = ╱31╱1╱ // 0x2687 @0xa
0x267d…2696 at000b = ╱33╱3╱ // 0x2688 @0xb
0x267d…2696 at000c = ╱fe0000d004╱ // 0x2689 @0xc
0x267d…2696 at0011 = ╱ec╱,╱ // 0x268e @0x11
0x267d…2696 at0012 = ╱56╱V╱ // 0x268f @0x12
0x267d…2696 at0013 = ╱ec╱,╱ // 0x2690 @0x13
0x267d…2696 at0014 = ╱56╱V╱ // 0x2691 @0x14
0x267d…2696 at0015 = ╱31╱1╱ // 0x2692 @0x15
0x267d…2696 at0016 = ╱ef╱$╱ // 0x2693 @0x16
0x267d…2696 at0017 = ╱ee╱)╱ // 0x2694 @0x17
0x267d…2696 at0018 = EOL // 0x2695 @0x18
0x267d…2696 }
0x2696…269c b3f3 4440 ENDPROC
0x2696…269c LineComalBin {
0x2696…269c ptr = 0xb3f3 // 0x2696 @0x0
0x2696…269c lno = 0x1158 // 0x2698 @0x2
0x2696…269c at0004 = ╱9f╱ ENDPROC ╱ // 0x269a @0x4
0x2696…269c at0005 = EOL // 0x269b @0x5
0x2696…269c }
0x269c…26b1 b408 4450 PROC UNDIND(V2,U1,Z)
0x269c…26b1 LineComalBin {
0x269c…26b1 ptr = 0xb408 // 0x269c @0x0
0x269c…26b1 lno = 0x1162 // 0x269e @0x2
0x269c…26b1 at0004 = ╱9e╱ PROC ╱ // 0x26a0 @0x4
0x269c…26b1 at0005 = ╱55╱U╱ // 0x26a1 @0x5
0x269c…26b1 at0006 = ╱4e╱N╱ // 0x26a2 @0x6
0x269c…26b1 at0007 = ╱44╱D╱ // 0x26a3 @0x7
0x269c…26b1 at0008 = ╱49╱I╱ // 0x26a4 @0x8
0x269c…26b1 at0009 = ╱4e╱N╱ // 0x26a5 @0x9
0x269c…26b1 at000a = ╱44╱D╱ // 0x26a6 @0xa
0x269c…26b1 at000b = ╱ed╱(╱ // 0x26a7 @0xb
0x269c…26b1 at000c = ╱56╱V╱ // 0x26a8 @0xc
0x269c…26b1 at000d = ╱32╱2╱ // 0x26a9 @0xd
0x269c…26b1 at000e = ╱ec╱,╱ // 0x26aa @0xe
0x269c…26b1 at000f = ╱55╱U╱ // 0x26ab @0xf
0x269c…26b1 at0010 = ╱31╱1╱ // 0x26ac @0x10
0x269c…26b1 at0011 = ╱ec╱,╱ // 0x26ad @0x11
0x269c…26b1 at0012 = ╱5a╱Z╱ // 0x26ae @0x12
0x269c…26b1 at0013 = ╱ee╱)╱ // 0x26af @0x13
0x269c…26b1 at0014 = EOL // 0x26b0 @0x14
0x269c…26b1 }
0x26b1…26bc b413 4460 OPEN V2$,R
0x26b1…26bc LineComalBin {
0x26b1…26bc ptr = 0xb413 // 0x26b1 @0x0
0x26b1…26bc lno = 0x116c // 0x26b3 @0x2
0x26b1…26bc at0004 = ╱a7╱ OPEN ╱ // 0x26b5 @0x4
0x26b1…26bc at0005 = ╱56╱V╱ // 0x26b6 @0x5
0x26b1…26bc at0006 = ╱32╱2╱ // 0x26b7 @0x6
0x26b1…26bc at0007 = ╱ef╱$╱ // 0x26b8 @0x7
0x26b1…26bc at0008 = ╱ec╱,╱ // 0x26b9 @0x8
0x26b1…26bc at0009 = ╱52╱R╱ // 0x26ba @0x9
0x26b1…26bc at000a = EOL // 0x26bb @0xa
0x26b1…26bc }
0x26bc…26cf b426 4470 EXEC FEJL(M,E,V2$)
0x26bc…26cf LineComalBin {
0x26bc…26cf ptr = 0xb426 // 0x26bc @0x0
0x26bc…26cf lno = 0x1176 // 0x26be @0x2
0x26bc…26cf at0004 = ╱9d╱ EXEC ╱ // 0x26c0 @0x4
0x26bc…26cf at0005 = ╱46╱F╱ // 0x26c1 @0x5
0x26bc…26cf at0006 = ╱45╱E╱ // 0x26c2 @0x6
0x26bc…26cf at0007 = ╱4a╱J╱ // 0x26c3 @0x7
0x26bc…26cf at0008 = ╱4c╱L╱ // 0x26c4 @0x8
0x26bc…26cf at0009 = ╱ed╱(╱ // 0x26c5 @0x9
0x26bc…26cf at000a = ╱4d╱M╱ // 0x26c6 @0xa
0x26bc…26cf at000b = ╱ec╱,╱ // 0x26c7 @0xb
0x26bc…26cf at000c = ╱45╱E╱ // 0x26c8 @0xc
0x26bc…26cf at000d = ╱ec╱,╱ // 0x26c9 @0xd
0x26bc…26cf at000e = ╱56╱V╱ // 0x26ca @0xe
0x26bc…26cf at000f = ╱32╱2╱ // 0x26cb @0xf
0x26bc…26cf at0010 = ╱ef╱$╱ // 0x26cc @0x10
0x26bc…26cf at0011 = ╱ee╱)╱ // 0x26cd @0x11
0x26bc…26cf at0012 = EOL // 0x26ce @0x12
0x26bc…26cf }
0x26cf…2713 b46a 4480 GET V2$,U1:Z(E,E),Z(E,G),Z(G,E),Z(G,G),Z(V,E),Z(V,G),Z(C,E),Z(C,G)
0x26cf…2713 LineComalBin {
0x26cf…2713 ptr = 0xb46a // 0x26cf @0x0
0x26cf…2713 lno = 0x1180 // 0x26d1 @0x2
0x26cf…2713 at0004 = ╱a9╱ GET ╱ // 0x26d3 @0x4
0x26cf…2713 at0005 = ╱56╱V╱ // 0x26d4 @0x5
0x26cf…2713 at0006 = ╱32╱2╱ // 0x26d5 @0x6
0x26cf…2713 at0007 = ╱ef╱$╱ // 0x26d6 @0x7
0x26cf…2713 at0008 = ╱ec╱,╱ // 0x26d7 @0x8
0x26cf…2713 at0009 = ╱55╱U╱ // 0x26d8 @0x9
0x26cf…2713 at000a = ╱31╱1╱ // 0x26d9 @0xa
0x26cf…2713 at000b = ╱f0╱:╱ // 0x26da @0xb
0x26cf…2713 at000c = ╱5a╱Z╱ // 0x26db @0xc
0x26cf…2713 at000d = ╱ed╱(╱ // 0x26dc @0xd
0x26cf…2713 at000e = ╱45╱E╱ // 0x26dd @0xe
0x26cf…2713 at000f = ╱ec╱,╱ // 0x26de @0xf
0x26cf…2713 at0010 = ╱45╱E╱ // 0x26df @0x10
0x26cf…2713 at0011 = ╱ee╱)╱ // 0x26e0 @0x11
0x26cf…2713 at0012 = ╱ec╱,╱ // 0x26e1 @0x12
0x26cf…2713 at0013 = ╱5a╱Z╱ // 0x26e2 @0x13
0x26cf…2713 at0014 = ╱ed╱(╱ // 0x26e3 @0x14
0x26cf…2713 at0015 = ╱45╱E╱ // 0x26e4 @0x15
0x26cf…2713 at0016 = ╱ec╱,╱ // 0x26e5 @0x16
0x26cf…2713 at0017 = ╱47╱G╱ // 0x26e6 @0x17
0x26cf…2713 at0018 = ╱ee╱)╱ // 0x26e7 @0x18
0x26cf…2713 at0019 = ╱ec╱,╱ // 0x26e8 @0x19
0x26cf…2713 at001a = ╱5a╱Z╱ // 0x26e9 @0x1a
0x26cf…2713 at001b = ╱ed╱(╱ // 0x26ea @0x1b
0x26cf…2713 at001c = ╱47╱G╱ // 0x26eb @0x1c
0x26cf…2713 at001d = ╱ec╱,╱ // 0x26ec @0x1d
0x26cf…2713 at001e = ╱45╱E╱ // 0x26ed @0x1e
0x26cf…2713 at001f = ╱ee╱)╱ // 0x26ee @0x1f
0x26cf…2713 at0020 = ╱ec╱,╱ // 0x26ef @0x20
0x26cf…2713 at0021 = ╱5a╱Z╱ // 0x26f0 @0x21
0x26cf…2713 at0022 = ╱ed╱(╱ // 0x26f1 @0x22
0x26cf…2713 at0023 = ╱47╱G╱ // 0x26f2 @0x23
0x26cf…2713 at0024 = ╱ec╱,╱ // 0x26f3 @0x24
0x26cf…2713 at0025 = ╱47╱G╱ // 0x26f4 @0x25
0x26cf…2713 at0026 = ╱ee╱)╱ // 0x26f5 @0x26
0x26cf…2713 at0027 = ╱ec╱,╱ // 0x26f6 @0x27
0x26cf…2713 at0028 = ╱5a╱Z╱ // 0x26f7 @0x28
0x26cf…2713 at0029 = ╱ed╱(╱ // 0x26f8 @0x29
0x26cf…2713 at002a = ╱56╱V╱ // 0x26f9 @0x2a
0x26cf…2713 at002b = ╱ec╱,╱ // 0x26fa @0x2b
0x26cf…2713 at002c = ╱45╱E╱ // 0x26fb @0x2c
0x26cf…2713 at002d = ╱ee╱)╱ // 0x26fc @0x2d
0x26cf…2713 at002e = ╱ec╱,╱ // 0x26fd @0x2e
0x26cf…2713 at002f = ╱5a╱Z╱ // 0x26fe @0x2f
0x26cf…2713 at0030 = ╱ed╱(╱ // 0x26ff @0x30
0x26cf…2713 at0031 = ╱56╱V╱ // 0x2700 @0x31
0x26cf…2713 at0032 = ╱ec╱,╱ // 0x2701 @0x32
0x26cf…2713 at0033 = ╱47╱G╱ // 0x2702 @0x33
0x26cf…2713 at0034 = ╱ee╱)╱ // 0x2703 @0x34
0x26cf…2713 at0035 = ╱ec╱,╱ // 0x2704 @0x35
0x26cf…2713 at0036 = ╱5a╱Z╱ // 0x2705 @0x36
0x26cf…2713 at0037 = ╱ed╱(╱ // 0x2706 @0x37
0x26cf…2713 at0038 = ╱43╱C╱ // 0x2707 @0x38
0x26cf…2713 at0039 = ╱ec╱,╱ // 0x2708 @0x39
0x26cf…2713 at003a = ╱45╱E╱ // 0x2709 @0x3a
0x26cf…2713 at003b = ╱ee╱)╱ // 0x270a @0x3b
0x26cf…2713 at003c = ╱ec╱,╱ // 0x270b @0x3c
0x26cf…2713 at003d = ╱5a╱Z╱ // 0x270c @0x3d
0x26cf…2713 at003e = ╱ed╱(╱ // 0x270d @0x3e
0x26cf…2713 at003f = ╱43╱C╱ // 0x270e @0x3f
0x26cf…2713 at0040 = ╱ec╱,╱ // 0x270f @0x40
0x26cf…2713 at0041 = ╱47╱G╱ // 0x2710 @0x41
0x26cf…2713 at0042 = ╱ee╱)╱ // 0x2711 @0x42
0x26cf…2713 at0043 = EOL // 0x2712 @0x43
0x26cf…2713 }
0x2713…2726 b47d 4490 EXEC FEJL(M,G,V2$)
0x2713…2726 LineComalBin {
0x2713…2726 ptr = 0xb47d // 0x2713 @0x0
0x2713…2726 lno = 0x118a // 0x2715 @0x2
0x2713…2726 at0004 = ╱9d╱ EXEC ╱ // 0x2717 @0x4
0x2713…2726 at0005 = ╱46╱F╱ // 0x2718 @0x5
0x2713…2726 at0006 = ╱45╱E╱ // 0x2719 @0x6
0x2713…2726 at0007 = ╱4a╱J╱ // 0x271a @0x7
0x2713…2726 at0008 = ╱4c╱L╱ // 0x271b @0x8
0x2713…2726 at0009 = ╱ed╱(╱ // 0x271c @0x9
0x2713…2726 at000a = ╱4d╱M╱ // 0x271d @0xa
0x2713…2726 at000b = ╱ec╱,╱ // 0x271e @0xb
0x2713…2726 at000c = ╱47╱G╱ // 0x271f @0xc
0x2713…2726 at000d = ╱ec╱,╱ // 0x2720 @0xd
0x2713…2726 at000e = ╱56╱V╱ // 0x2721 @0xe
0x2713…2726 at000f = ╱32╱2╱ // 0x2722 @0xf
0x2713…2726 at0010 = ╱ef╱$╱ // 0x2723 @0x10
0x2713…2726 at0011 = ╱ee╱)╱ // 0x2724 @0x11
0x2713…2726 at0012 = EOL // 0x2725 @0x12
0x2713…2726 }
0x2726…272f b486 4500 CLOSE V2$
0x2726…272f LineComalBin {
0x2726…272f ptr = 0xb486 // 0x2726 @0x0
0x2726…272f lno = 0x1194 // 0x2728 @0x2
0x2726…272f at0004 = ╱a8╱ CLOSE ╱ // 0x272a @0x4
0x2726…272f at0005 = ╱56╱V╱ // 0x272b @0x5
0x2726…272f at0006 = ╱32╱2╱ // 0x272c @0x6
0x2726…272f at0007 = ╱ef╱$╱ // 0x272d @0x7
0x2726…272f at0008 = EOL // 0x272e @0x8
0x2726…272f }
0x272f…2742 b499 4510 EXEC FEJL(M,V,V2$)
0x272f…2742 LineComalBin {
0x272f…2742 ptr = 0xb499 // 0x272f @0x0
0x272f…2742 lno = 0x119e // 0x2731 @0x2
0x272f…2742 at0004 = ╱9d╱ EXEC ╱ // 0x2733 @0x4
0x272f…2742 at0005 = ╱46╱F╱ // 0x2734 @0x5
0x272f…2742 at0006 = ╱45╱E╱ // 0x2735 @0x6
0x272f…2742 at0007 = ╱4a╱J╱ // 0x2736 @0x7
0x272f…2742 at0008 = ╱4c╱L╱ // 0x2737 @0x8
0x272f…2742 at0009 = ╱ed╱(╱ // 0x2738 @0x9
0x272f…2742 at000a = ╱4d╱M╱ // 0x2739 @0xa
0x272f…2742 at000b = ╱ec╱,╱ // 0x273a @0xb
0x272f…2742 at000c = ╱56╱V╱ // 0x273b @0xc
0x272f…2742 at000d = ╱ec╱,╱ // 0x273c @0xd
0x272f…2742 at000e = ╱56╱V╱ // 0x273d @0xe
0x272f…2742 at000f = ╱32╱2╱ // 0x273e @0xf
0x272f…2742 at0010 = ╱ef╱$╱ // 0x273f @0x10
0x272f…2742 at0011 = ╱ee╱)╱ // 0x2740 @0x11
0x272f…2742 at0012 = EOL // 0x2741 @0x12
0x272f…2742 }
0x2742…2748 b49f 4520 ENDPROC
0x2742…2748 LineComalBin {
0x2742…2748 ptr = 0xb49f // 0x2742 @0x0
0x2742…2748 lno = 0x11a8 // 0x2744 @0x2
0x2742…2748 at0004 = ╱9f╱ ENDPROC ╱ // 0x2746 @0x4
0x2742…2748 at0005 = EOL // 0x2747 @0x5
0x2742…2748 }
0x2748…275d b4b4 4530 PROC DATOUD(DA1,DA2)
0x2748…275d LineComalBin {
0x2748…275d ptr = 0xb4b4 // 0x2748 @0x0
0x2748…275d lno = 0x11b2 // 0x274a @0x2
0x2748…275d at0004 = ╱9e╱ PROC ╱ // 0x274c @0x4
0x2748…275d at0005 = ╱44╱D╱ // 0x274d @0x5
0x2748…275d at0006 = ╱41╱A╱ // 0x274e @0x6
0x2748…275d at0007 = ╱54╱T╱ // 0x274f @0x7
0x2748…275d at0008 = ╱4f╱O╱ // 0x2750 @0x8
0x2748…275d at0009 = ╱55╱U╱ // 0x2751 @0x9
0x2748…275d at000a = ╱44╱D╱ // 0x2752 @0xa
0x2748…275d at000b = ╱ed╱(╱ // 0x2753 @0xb
0x2748…275d at000c = ╱44╱D╱ // 0x2754 @0xc
0x2748…275d at000d = ╱41╱A╱ // 0x2755 @0xd
0x2748…275d at000e = ╱31╱1╱ // 0x2756 @0xe
0x2748…275d at000f = ╱ec╱,╱ // 0x2757 @0xf
0x2748…275d at0010 = ╱44╱D╱ // 0x2758 @0x10
0x2748…275d at0011 = ╱41╱A╱ // 0x2759 @0x11
0x2748…275d at0012 = ╱32╱2╱ // 0x275a @0x12
0x2748…275d at0013 = ╱ee╱)╱ // 0x275b @0x13
0x2748…275d at0014 = EOL // 0x275c @0x14
0x2748…275d }
0x275d…2779 b4d0 4550 DA3=DA1;DA2$=" "
0x275d…2779 LineComalBin {
0x275d…2779 ptr = 0xb4d0 // 0x275d @0x0
0x275d…2779 lno = 0x11c6 // 0x275f @0x2
0x275d…2779 at0004 = ╱44╱D╱ // 0x2761 @0x4
0x275d…2779 at0005 = ╱41╱A╱ // 0x2762 @0x5
0x275d…2779 at0006 = ╱33╱3╱ // 0x2763 @0x6
0x275d…2779 at0007 = ╱dc╱=╱ // 0x2764 @0x7
0x275d…2779 at0008 = ╱44╱D╱ // 0x2765 @0x8
0x275d…2779 at0009 = ╱41╱A╱ // 0x2766 @0x9
0x275d…2779 at000a = ╱31╱1╱ // 0x2767 @0xa
0x275d…2779 at000b = ╱eb╱;╱ // 0x2768 @0xb
0x275d…2779 at000c = ╱44╱D╱ // 0x2769 @0xc
0x275d…2779 at000d = ╱41╱A╱ // 0x276a @0xd
0x275d…2779 at000e = ╱32╱2╱ // 0x276b @0xe
0x275d…2779 at000f = ╱ef╱$╱ // 0x276c @0xf
0x275d…2779 at0010 = ╱dc╱=╱ // 0x276d @0x10
0x275d…2779 at0011 = ╱22╱"╱ // 0x276e @0x11
0x275d…2779 at0012 = ╱20╱…╱ // 0x276f @0x12
0x275d…2779 at0013 = ╱20╱…╱ // 0x2770 @0x13
0x275d…2779 at0014 = ╱20╱…╱ // 0x2771 @0x14
0x275d…2779 at0015 = ╱20╱…╱ // 0x2772 @0x15
0x275d…2779 at0016 = ╱20╱…╱ // 0x2773 @0x16
0x275d…2779 at0017 = ╱20╱…╱ // 0x2774 @0x17
0x275d…2779 at0018 = ╱20╱…╱ // 0x2775 @0x18
0x275d…2779 at0019 = ╱20╱…╱ // 0x2776 @0x19
0x275d…2779 at001a = ╱22╱"╱ // 0x2777 @0x1a
0x275d…2779 at001b = EOL // 0x2778 @0x1b
0x275d…2779 }
0x2779…278c b4e3 4560 FOR J=8 TO E STEP -E
0x2779…278c LineComalBin {
0x2779…278c ptr = 0xb4e3 // 0x2779 @0x0
0x2779…278c lno = 0x11d0 // 0x277b @0x2
0x2779…278c at0004 = ╱83╱ FOR ╱ // 0x277d @0x4
0x2779…278c at0005 = ╱4a╱J╱ // 0x277e @0x5
0x2779…278c at0006 = ╱dc╱=╱ // 0x277f @0x6
0x2779…278c at0007 = ╱38╱8╱ // 0x2780 @0x7
0x2779…278c at0008 = ╱fe00008004╱ // 0x2781 @0x8
0x2779…278c at000d = ╱b7╱ TO ╱ // 0x2786 @0xd
0x2779…278c at000e = ╱45╱E╱ // 0x2787 @0xe
0x2779…278c at000f = ╱b8╱ STEP ╱ // 0x2788 @0xf
0x2779…278c at0010 = ╱e9╱-╱ // 0x2789 @0x10
0x2779…278c at0011 = ╱45╱E╱ // 0x278a @0x11
0x2779…278c at0012 = EOL // 0x278b @0x12
0x2779…278c }
0x278c…2798 b4ef 4570 IF J MOD V=B THEN
0x278c…2798 LineComalBin {
0x278c…2798 ptr = 0xb4ef // 0x278c @0x0
0x278c…2798 lno = 0x11da // 0x278e @0x2
0x278c…2798 at0004 = ╱9c╱ IF ╱ // 0x2790 @0x4
0x278c…2798 at0005 = ╱4a╱J╱ // 0x2791 @0x5
0x278c…2798 at0006 = ╱e8╱ MOD ╱ // 0x2792 @0x6
0x278c…2798 at0007 = ╱56╱V╱ // 0x2793 @0x7
0x278c…2798 at0008 = ╱dc╱=╱ // 0x2794 @0x8
0x278c…2798 at0009 = ╱42╱B╱ // 0x2795 @0x9
0x278c…2798 at000a = ╱b6╱ THEN ╱ // 0x2796 @0xa
0x278c…2798 at000b = EOL // 0x2797 @0xb
0x278c…2798 }
0x2798…27a8 b4ff 4580 DA2$(J)="."
0x2798…27a8 LineComalBin {
0x2798…27a8 ptr = 0xb4ff // 0x2798 @0x0
0x2798…27a8 lno = 0x11e4 // 0x279a @0x2
0x2798…27a8 at0004 = ╱44╱D╱ // 0x279c @0x4
0x2798…27a8 at0005 = ╱41╱A╱ // 0x279d @0x5
0x2798…27a8 at0006 = ╱32╱2╱ // 0x279e @0x6
0x2798…27a8 at0007 = ╱ef╱$╱ // 0x279f @0x7
0x2798…27a8 at0008 = ╱ed╱(╱ // 0x27a0 @0x8
0x2798…27a8 at0009 = ╱4a╱J╱ // 0x27a1 @0x9
0x2798…27a8 at000a = ╱ee╱)╱ // 0x27a2 @0xa
0x2798…27a8 at000b = ╱dc╱=╱ // 0x27a3 @0xb
0x2798…27a8 at000c = ╱22╱"╱ // 0x27a4 @0xc
0x2798…27a8 at000d = ╱2e╱.╱ // 0x27a5 @0xd
0x2798…27a8 at000e = ╱22╱"╱ // 0x27a6 @0xe
0x2798…27a8 at000f = EOL // 0x27a7 @0xf
0x2798…27a8 }
0x27a8…27ae b505 4590 ELSE
0x27a8…27ae LineComalBin {
0x27a8…27ae ptr = 0xb505 // 0x27a8 @0x0
0x27a8…27ae lno = 0x11ee // 0x27aa @0x2
0x27a8…27ae at0004 = ╱9a╱ ELSE ╱ // 0x27ac @0x4
0x27a8…27ae at0005 = EOL // 0x27ad @0x5
0x27a8…27ae }
0x27ae…27e1 b538 4600 DA2$(J)=CHR(DA3 MOD 10+48);DA3=DA3 DIV 10
0x27ae…27e1 LineComalBin {
0x27ae…27e1 ptr = 0xb538 // 0x27ae @0x0
0x27ae…27e1 lno = 0x11f8 // 0x27b0 @0x2
0x27ae…27e1 at0004 = ╱44╱D╱ // 0x27b2 @0x4
0x27ae…27e1 at0005 = ╱41╱A╱ // 0x27b3 @0x5
0x27ae…27e1 at0006 = ╱32╱2╱ // 0x27b4 @0x6
0x27ae…27e1 at0007 = ╱ef╱$╱ // 0x27b5 @0x7
0x27ae…27e1 at0008 = ╱ed╱(╱ // 0x27b6 @0x8
0x27ae…27e1 at0009 = ╱4a╱J╱ // 0x27b7 @0x9
0x27ae…27e1 at000a = ╱ee╱)╱ // 0x27b8 @0xa
0x27ae…27e1 at000b = ╱dc╱=╱ // 0x27b9 @0xb
0x27ae…27e1 at000c = ╱cf╱CHR╱ // 0x27ba @0xc
0x27ae…27e1 at000d = ╱ed╱(╱ // 0x27bb @0xd
0x27ae…27e1 at000e = ╱44╱D╱ // 0x27bc @0xe
0x27ae…27e1 at000f = ╱41╱A╱ // 0x27bd @0xf
0x27ae…27e1 at0010 = ╱33╱3╱ // 0x27be @0x10
0x27ae…27e1 at0011 = ╱e8╱ MOD ╱ // 0x27bf @0x11
0x27ae…27e1 at0012 = ╱31╱1╱ // 0x27c0 @0x12
0x27ae…27e1 at0013 = ╱30╱0╱ // 0x27c1 @0x13
0x27ae…27e1 at0014 = ╱fe0000a004╱ // 0x27c2 @0x14
0x27ae…27e1 at0019 = ╱e2╱+╱ // 0x27c7 @0x19
0x27ae…27e1 at001a = ╱34╱4╱ // 0x27c8 @0x1a
0x27ae…27e1 at001b = ╱38╱8╱ // 0x27c9 @0x1b
0x27ae…27e1 at001c = ╱fe0000c006╱ // 0x27ca @0x1c
0x27ae…27e1 at0021 = ╱ee╱)╱ // 0x27cf @0x21
0x27ae…27e1 at0022 = ╱eb╱;╱ // 0x27d0 @0x22
0x27ae…27e1 at0023 = ╱44╱D╱ // 0x27d1 @0x23
0x27ae…27e1 at0024 = ╱41╱A╱ // 0x27d2 @0x24
0x27ae…27e1 at0025 = ╱33╱3╱ // 0x27d3 @0x25
0x27ae…27e1 at0026 = ╱dc╱=╱ // 0x27d4 @0x26
0x27ae…27e1 at0027 = ╱44╱D╱ // 0x27d5 @0x27
0x27ae…27e1 at0028 = ╱41╱A╱ // 0x27d6 @0x28
0x27ae…27e1 at0029 = ╱33╱3╱ // 0x27d7 @0x29
0x27ae…27e1 at002a = ╱e7╱ DIV ╱ // 0x27d8 @0x2a
0x27ae…27e1 at002b = ╱31╱1╱ // 0x27d9 @0x2b
0x27ae…27e1 at002c = ╱30╱0╱ // 0x27da @0x2c
0x27ae…27e1 at002d = ╱fe0000a004╱ // 0x27db @0x2d
0x27ae…27e1 at0032 = EOL // 0x27e0 @0x32
0x27ae…27e1 }
0x27e1…27e7 b53e 4620 ENDIF
0x27e1…27e7 LineComalBin {
0x27e1…27e7 ptr = 0xb53e // 0x27e1 @0x0
0x27e1…27e7 lno = 0x120c // 0x27e3 @0x2
0x27e1…27e7 at0004 = ╱9b╱ ENDIF ╱ // 0x27e5 @0x4
0x27e1…27e7 at0005 = EOL // 0x27e6 @0x5
0x27e1…27e7 }
0x27e7…27ee b545 4630 NEXT J
0x27e7…27ee LineComalBin {
0x27e7…27ee ptr = 0xb545 // 0x27e7 @0x0
0x27e7…27ee lno = 0x1216 // 0x27e9 @0x2
0x27e7…27ee at0004 = ╱84╱ NEXT ╱ // 0x27eb @0x4
0x27e7…27ee at0005 = ╱4a╱J╱ // 0x27ec @0x5
0x27e7…27ee at0006 = EOL // 0x27ed @0x6
0x27e7…27ee }
0x27ee…27f4 b54b 4640 ENDPROC
0x27ee…27f4 LineComalBin {
0x27ee…27f4 ptr = 0xb54b // 0x27ee @0x0
0x27ee…27f4 lno = 0x1220 // 0x27f0 @0x2
0x27ee…27f4 at0004 = ╱9f╱ ENDPROC ╱ // 0x27f2 @0x4
0x27ee…27f4 at0005 = EOL // 0x27f3 @0x5
0x27ee…27f4 }
0x27f4…2812 b569 4650 PROC MKONTUD(K61,MPOSTANTAL8)
0x27f4…2812 LineComalBin {
0x27f4…2812 ptr = 0xb569 // 0x27f4 @0x0
0x27f4…2812 lno = 0x122a // 0x27f6 @0x2
0x27f4…2812 at0004 = ╱9e╱ PROC ╱ // 0x27f8 @0x4
0x27f4…2812 at0005 = ╱4d╱M╱ // 0x27f9 @0x5
0x27f4…2812 at0006 = ╱4b╱K╱ // 0x27fa @0x6
0x27f4…2812 at0007 = ╱4f╱O╱ // 0x27fb @0x7
0x27f4…2812 at0008 = ╱4e╱N╱ // 0x27fc @0x8
0x27f4…2812 at0009 = ╱54╱T╱ // 0x27fd @0x9
0x27f4…2812 at000a = ╱55╱U╱ // 0x27fe @0xa
0x27f4…2812 at000b = ╱44╱D╱ // 0x27ff @0xb
0x27f4…2812 at000c = ╱ed╱(╱ // 0x2800 @0xc
0x27f4…2812 at000d = ╱4b╱K╱ // 0x2801 @0xd
0x27f4…2812 at000e = ╱36╱6╱ // 0x2802 @0xe
0x27f4…2812 at000f = ╱31╱1╱ // 0x2803 @0xf
0x27f4…2812 at0010 = ╱ec╱,╱ // 0x2804 @0x10
0x27f4…2812 at0011 = ╱4d╱M╱ // 0x2805 @0x11
0x27f4…2812 at0012 = ╱50╱P╱ // 0x2806 @0x12
0x27f4…2812 at0013 = ╱4f╱O╱ // 0x2807 @0x13
0x27f4…2812 at0014 = ╱53╱S╱ // 0x2808 @0x14
0x27f4…2812 at0015 = ╱54╱T╱ // 0x2809 @0x15
0x27f4…2812 at0016 = ╱41╱A╱ // 0x280a @0x16
0x27f4…2812 at0017 = ╱4e╱N╱ // 0x280b @0x17
0x27f4…2812 at0018 = ╱54╱T╱ // 0x280c @0x18
0x27f4…2812 at0019 = ╱41╱A╱ // 0x280d @0x19
0x27f4…2812 at001a = ╱4c╱L╱ // 0x280e @0x1a
0x27f4…2812 at001b = ╱38╱8╱ // 0x280f @0x1b
0x27f4…2812 at001c = ╱ee╱)╱ // 0x2810 @0x1c
0x27f4…2812 at001d = EOL // 0x2811 @0x1d
0x27f4…2812 }
0x2812…2819 b570 4660 OUTPUT P
0x2812…2819 LineComalBin {
0x2812…2819 ptr = 0xb570 // 0x2812 @0x0
0x2812…2819 lno = 0x1234 // 0x2814 @0x2
0x2812…2819 at0004 = ╱a5╱ OUTPUT ╱ // 0x2816 @0x4
0x2812…2819 at0005 = ╱50╱P╱ // 0x2817 @0x5
0x2812…2819 at0006 = EOL // 0x2818 @0x6
0x2812…2819 }
0x2819…2825 b57c 4670 P=E;T=E
0x2819…2825 LineComalBin {
0x2819…2825 ptr = 0xb57c // 0x2819 @0x0
0x2819…2825 lno = 0x123e // 0x281b @0x2
0x2819…2825 at0004 = ╱50╱P╱ // 0x281d @0x4
0x2819…2825 at0005 = ╱dc╱=╱ // 0x281e @0x5
0x2819…2825 at0006 = ╱45╱E╱ // 0x281f @0x6
0x2819…2825 at0007 = ╱eb╱;╱ // 0x2820 @0x7
0x2819…2825 at0008 = ╱54╱T╱ // 0x2821 @0x8
0x2819…2825 at0009 = ╱dc╱=╱ // 0x2822 @0x9
0x2819…2825 at000a = ╱45╱E╱ // 0x2823 @0xa
0x2819…2825 at000b = EOL // 0x2824 @0xb
0x2819…2825 }
0x2825…2852 b5a9 4680 EXEC POSTER(K61$,P,T,MPOSTANTAL8,SKRIV,SUM$)
0x2825…2852 LineComalBin {
0x2825…2852 ptr = 0xb5a9 // 0x2825 @0x0
0x2825…2852 lno = 0x1248 // 0x2827 @0x2
0x2825…2852 at0004 = ╱9d╱ EXEC ╱ // 0x2829 @0x4
0x2825…2852 at0005 = ╱50╱P╱ // 0x282a @0x5
0x2825…2852 at0006 = ╱4f╱O╱ // 0x282b @0x6
0x2825…2852 at0007 = ╱53╱S╱ // 0x282c @0x7
0x2825…2852 at0008 = ╱54╱T╱ // 0x282d @0x8
0x2825…2852 at0009 = ╱45╱E╱ // 0x282e @0x9
0x2825…2852 at000a = ╱52╱R╱ // 0x282f @0xa
0x2825…2852 at000b = ╱ed╱(╱ // 0x2830 @0xb
0x2825…2852 at000c = ╱4b╱K╱ // 0x2831 @0xc
0x2825…2852 at000d = ╱36╱6╱ // 0x2832 @0xd
0x2825…2852 at000e = ╱31╱1╱ // 0x2833 @0xe
0x2825…2852 at000f = ╱ef╱$╱ // 0x2834 @0xf
0x2825…2852 at0010 = ╱ec╱,╱ // 0x2835 @0x10
0x2825…2852 at0011 = ╱50╱P╱ // 0x2836 @0x11
0x2825…2852 at0012 = ╱ec╱,╱ // 0x2837 @0x12
0x2825…2852 at0013 = ╱54╱T╱ // 0x2838 @0x13
0x2825…2852 at0014 = ╱ec╱,╱ // 0x2839 @0x14
0x2825…2852 at0015 = ╱4d╱M╱ // 0x283a @0x15
0x2825…2852 at0016 = ╱50╱P╱ // 0x283b @0x16
0x2825…2852 at0017 = ╱4f╱O╱ // 0x283c @0x17
0x2825…2852 at0018 = ╱53╱S╱ // 0x283d @0x18
0x2825…2852 at0019 = ╱54╱T╱ // 0x283e @0x19
0x2825…2852 at001a = ╱41╱A╱ // 0x283f @0x1a
0x2825…2852 at001b = ╱4e╱N╱ // 0x2840 @0x1b
0x2825…2852 at001c = ╱54╱T╱ // 0x2841 @0x1c
0x2825…2852 at001d = ╱41╱A╱ // 0x2842 @0x1d
0x2825…2852 at001e = ╱4c╱L╱ // 0x2843 @0x1e
0x2825…2852 at001f = ╱38╱8╱ // 0x2844 @0x1f
0x2825…2852 at0020 = ╱ec╱,╱ // 0x2845 @0x20
0x2825…2852 at0021 = ╱53╱S╱ // 0x2846 @0x21
0x2825…2852 at0022 = ╱4b╱K╱ // 0x2847 @0x22
0x2825…2852 at0023 = ╱52╱R╱ // 0x2848 @0x23
0x2825…2852 at0024 = ╱49╱I╱ // 0x2849 @0x24
0x2825…2852 at0025 = ╱56╱V╱ // 0x284a @0x25
0x2825…2852 at0026 = ╱ec╱,╱ // 0x284b @0x26
0x2825…2852 at0027 = ╱53╱S╱ // 0x284c @0x27
0x2825…2852 at0028 = ╱55╱U╱ // 0x284d @0x28
0x2825…2852 at0029 = ╱4d╱M╱ // 0x284e @0x29
0x2825…2852 at002a = ╱ef╱$╱ // 0x284f @0x2a
0x2825…2852 at002b = ╱ee╱)╱ // 0x2850 @0x2b
0x2825…2852 at002c = EOL // 0x2851 @0x2c
0x2825…2852 }
0x2852…285a b5b1 4690 T=E
0x2852…285a LineComalBin {
0x2852…285a ptr = 0xb5b1 // 0x2852 @0x0
0x2852…285a lno = 0x1252 // 0x2854 @0x2
0x2852…285a at0004 = ╱54╱T╱ // 0x2856 @0x4
0x2852…285a at0005 = ╱dc╱=╱ // 0x2857 @0x5
0x2852…285a at0006 = ╱45╱E╱ // 0x2858 @0x6
0x2852…285a at0007 = EOL // 0x2859 @0x7
0x2852…285a }
0x285a…286e b5c5 4700 IF P<100000 THEN
0x285a…286e LineComalBin {
0x285a…286e ptr = 0xb5c5 // 0x285a @0x0
0x285a…286e lno = 0x125c // 0x285c @0x2
0x285a…286e at0004 = ╱9c╱ IF ╱ // 0x285e @0x4
0x285a…286e at0005 = ╱50╱P╱ // 0x285f @0x5
0x285a…286e at0006 = ╱dd╱<╱ // 0x2860 @0x6
0x285a…286e at0007 = ╱31╱1╱ // 0x2861 @0x7
0x285a…286e at0008 = ╱30╱0╱ // 0x2862 @0x8
0x285a…286e at0009 = ╱30╱0╱ // 0x2863 @0x9
0x285a…286e at000a = ╱30╱0╱ // 0x2864 @0xa
0x285a…286e at000b = ╱30╱0╱ // 0x2865 @0xb
0x285a…286e at000c = ╱30╱0╱ // 0x2866 @0xc
0x285a…286e at000d = ╱fe0050c311╱ // 0x2867 @0xd
0x285a…286e at0012 = ╱b6╱ THEN ╱ // 0x286c @0x12
0x285a…286e at0013 = EOL // 0x286d @0x13
0x285a…286e }
0x286e…2874 b5cb 4710 REPEAT
0x286e…2874 LineComalBin {
0x286e…2874 ptr = 0xb5cb // 0x286e @0x0
0x286e…2874 lno = 0x1266 // 0x2870 @0x2
0x286e…2874 at0004 = ╱97╱ REPEAT ╱ // 0x2872 @0x4
0x286e…2874 at0005 = EOL // 0x2873 @0x5
0x286e…2874 }
0x2874…288c b5e3 4720 KSIDENR=B;SUM$="0+"
0x2874…288c LineComalBin {
0x2874…288c ptr = 0xb5e3 // 0x2874 @0x0
0x2874…288c lno = 0x1270 // 0x2876 @0x2
0x2874…288c at0004 = ╱4b╱K╱ // 0x2878 @0x4
0x2874…288c at0005 = ╱53╱S╱ // 0x2879 @0x5
0x2874…288c at0006 = ╱49╱I╱ // 0x287a @0x6
0x2874…288c at0007 = ╱44╱D╱ // 0x287b @0x7
0x2874…288c at0008 = ╱45╱E╱ // 0x287c @0x8
0x2874…288c at0009 = ╱4e╱N╱ // 0x287d @0x9
0x2874…288c at000a = ╱52╱R╱ // 0x287e @0xa
0x2874…288c at000b = ╱dc╱=╱ // 0x287f @0xb
0x2874…288c at000c = ╱42╱B╱ // 0x2880 @0xc
0x2874…288c at000d = ╱eb╱;╱ // 0x2881 @0xd
0x2874…288c at000e = ╱53╱S╱ // 0x2882 @0xe
0x2874…288c at000f = ╱55╱U╱ // 0x2883 @0xf
0x2874…288c at0010 = ╱4d╱M╱ // 0x2884 @0x10
0x2874…288c at0011 = ╱ef╱$╱ // 0x2885 @0x11
0x2874…288c at0012 = ╱dc╱=╱ // 0x2886 @0x12
0x2874…288c at0013 = ╱22╱"╱ // 0x2887 @0x13
0x2874…288c at0014 = ╱30╱0╱ // 0x2888 @0x14
0x2874…288c at0015 = ╱2b╱+╱ // 0x2889 @0x15
0x2874…288c at0016 = ╱22╱"╱ // 0x288a @0x16
0x2874…288c at0017 = EOL // 0x288b @0x17
0x2874…288c }
0x288c…2899 b5f0 4730 CASE KTAL1 OF
0x288c…2899 LineComalBin {
0x288c…2899 ptr = 0xb5f0 // 0x288c @0x0
0x288c…2899 lno = 0x127a // 0x288e @0x2
0x288c…2899 at0004 = ╱a201╱ CASE ╱ // 0x2890 @0x4
0x288c…2899 at0006 = ╱4b╱K╱ // 0x2892 @0x6
0x288c…2899 at0007 = ╱54╱T╱ // 0x2893 @0x7
0x288c…2899 at0008 = ╱41╱A╱ // 0x2894 @0x8
0x288c…2899 at0009 = ╱4c╱L╱ // 0x2895 @0x9
0x288c…2899 at000a = ╱31╱1╱ // 0x2896 @0xa
0x288c…2899 at000b = ╱ba╱ OF ╱ // 0x2897 @0xb
0x288c…2899 at000c = EOL // 0x2898 @0xc
0x288c…2899 }
0x2899…28c8 b61f 4740 EXEC FINDPOST1(FTAB1,FTAB,MFANTAL,P,FPIL3,K2$)
0x2899…28c8 LineComalBin {
0x2899…28c8 ptr = 0xb61f // 0x2899 @0x0
0x2899…28c8 lno = 0x1284 // 0x289b @0x2
0x2899…28c8 at0004 = ╱9d╱ EXEC ╱ // 0x289d @0x4
0x2899…28c8 at0005 = ╱46╱F╱ // 0x289e @0x5
0x2899…28c8 at0006 = ╱49╱I╱ // 0x289f @0x6
0x2899…28c8 at0007 = ╱4e╱N╱ // 0x28a0 @0x7
0x2899…28c8 at0008 = ╱44╱D╱ // 0x28a1 @0x8
0x2899…28c8 at0009 = ╱50╱P╱ // 0x28a2 @0x9
0x2899…28c8 at000a = ╱4f╱O╱ // 0x28a3 @0xa
0x2899…28c8 at000b = ╱53╱S╱ // 0x28a4 @0xb
0x2899…28c8 at000c = ╱54╱T╱ // 0x28a5 @0xc
0x2899…28c8 at000d = ╱31╱1╱ // 0x28a6 @0xd
0x2899…28c8 at000e = ╱ed╱(╱ // 0x28a7 @0xe
0x2899…28c8 at000f = ╱46╱F╱ // 0x28a8 @0xf
0x2899…28c8 at0010 = ╱54╱T╱ // 0x28a9 @0x10
0x2899…28c8 at0011 = ╱41╱A╱ // 0x28aa @0x11
0x2899…28c8 at0012 = ╱42╱B╱ // 0x28ab @0x12
0x2899…28c8 at0013 = ╱31╱1╱ // 0x28ac @0x13
0x2899…28c8 at0014 = ╱ec╱,╱ // 0x28ad @0x14
0x2899…28c8 at0015 = ╱46╱F╱ // 0x28ae @0x15
0x2899…28c8 at0016 = ╱54╱T╱ // 0x28af @0x16
0x2899…28c8 at0017 = ╱41╱A╱ // 0x28b0 @0x17
0x2899…28c8 at0018 = ╱42╱B╱ // 0x28b1 @0x18
0x2899…28c8 at0019 = ╱ec╱,╱ // 0x28b2 @0x19
0x2899…28c8 at001a = ╱4d╱M╱ // 0x28b3 @0x1a
0x2899…28c8 at001b = ╱46╱F╱ // 0x28b4 @0x1b
0x2899…28c8 at001c = ╱41╱A╱ // 0x28b5 @0x1c
0x2899…28c8 at001d = ╱4e╱N╱ // 0x28b6 @0x1d
0x2899…28c8 at001e = ╱54╱T╱ // 0x28b7 @0x1e
0x2899…28c8 at001f = ╱41╱A╱ // 0x28b8 @0x1f
0x2899…28c8 at0020 = ╱4c╱L╱ // 0x28b9 @0x20
0x2899…28c8 at0021 = ╱ec╱,╱ // 0x28ba @0x21
0x2899…28c8 at0022 = ╱50╱P╱ // 0x28bb @0x22
0x2899…28c8 at0023 = ╱ec╱,╱ // 0x28bc @0x23
0x2899…28c8 at0024 = ╱46╱F╱ // 0x28bd @0x24
0x2899…28c8 at0025 = ╱50╱P╱ // 0x28be @0x25
0x2899…28c8 at0026 = ╱49╱I╱ // 0x28bf @0x26
0x2899…28c8 at0027 = ╱4c╱L╱ // 0x28c0 @0x27
0x2899…28c8 at0028 = ╱33╱3╱ // 0x28c1 @0x28
0x2899…28c8 at0029 = ╱ec╱,╱ // 0x28c2 @0x29
0x2899…28c8 at002a = ╱4b╱K╱ // 0x28c3 @0x2a
0x2899…28c8 at002b = ╱32╱2╱ // 0x28c4 @0x2b
0x2899…28c8 at002c = ╱ef╱$╱ // 0x28c5 @0x2c
0x2899…28c8 at002d = ╱ee╱)╱ // 0x28c6 @0x2d
0x2899…28c8 at002e = EOL // 0x28c7 @0x2e
0x2899…28c8 }
0x28c8…28de b635 4750 IF CEKS=B THEN EXEC HENTPOST
0x28c8…28de LineComalBin {
0x28c8…28de ptr = 0xb635 // 0x28c8 @0x0
0x28c8…28de lno = 0x128e // 0x28ca @0x2
0x28c8…28de at0004 = ╱82╱ IF ╱ // 0x28cc @0x4
0x28c8…28de at0005 = ╱43╱C╱ // 0x28cd @0x5
0x28c8…28de at0006 = ╱45╱E╱ // 0x28ce @0x6
0x28c8…28de at0007 = ╱4b╱K╱ // 0x28cf @0x7
0x28c8…28de at0008 = ╱53╱S╱ // 0x28d0 @0x8
0x28c8…28de at0009 = ╱dc╱=╱ // 0x28d1 @0x9
0x28c8…28de at000a = ╱42╱B╱ // 0x28d2 @0xa
0x28c8…28de at000b = ╱b6╱ THEN ╱ // 0x28d3 @0xb
0x28c8…28de at000c = ╱9d╱ EXEC ╱ // 0x28d4 @0xc
0x28c8…28de at000d = ╱48╱H╱ // 0x28d5 @0xd
0x28c8…28de at000e = ╱45╱E╱ // 0x28d6 @0xe
0x28c8…28de at000f = ╱4e╱N╱ // 0x28d7 @0xf
0x28c8…28de at0010 = ╱54╱T╱ // 0x28d8 @0x10
0x28c8…28de at0011 = ╱50╱P╱ // 0x28d9 @0x11
0x28c8…28de at0012 = ╱4f╱O╱ // 0x28da @0x12
0x28c8…28de at0013 = ╱53╱S╱ // 0x28db @0x13
0x28c8…28de at0014 = ╱54╱T╱ // 0x28dc @0x14
0x28c8…28de at0015 = EOL // 0x28dd @0x15
0x28c8…28de }
0x28de…28e9 b640 4760 WHEN DTAL
0x28de…28e9 LineComalBin {
0x28de…28e9 ptr = 0xb640 // 0x28de @0x0
0x28de…28e9 lno = 0x1298 // 0x28e0 @0x2
0x28de…28e9 at0004 = ╱a301╱ WHEN ╱ // 0x28e2 @0x4
0x28de…28e9 at0006 = ╱44╱D╱ // 0x28e4 @0x6
0x28de…28e9 at0007 = ╱54╱T╱ // 0x28e5 @0x7
0x28de…28e9 at0008 = ╱41╱A╱ // 0x28e6 @0x8
0x28de…28e9 at0009 = ╱4c╱L╱ // 0x28e7 @0x9
0x28de…28e9 at000a = EOL // 0x28e8 @0xa
0x28de…28e9 }
0x28e9…2918 b66f 4770 EXEC FINDPOST1(DTAB1,DTAB,MDANTAL,P,DPIL3,K3$)
0x28e9…2918 LineComalBin {
0x28e9…2918 ptr = 0xb66f // 0x28e9 @0x0
0x28e9…2918 lno = 0x12a2 // 0x28eb @0x2
0x28e9…2918 at0004 = ╱9d╱ EXEC ╱ // 0x28ed @0x4
0x28e9…2918 at0005 = ╱46╱F╱ // 0x28ee @0x5
0x28e9…2918 at0006 = ╱49╱I╱ // 0x28ef @0x6
0x28e9…2918 at0007 = ╱4e╱N╱ // 0x28f0 @0x7
0x28e9…2918 at0008 = ╱44╱D╱ // 0x28f1 @0x8
0x28e9…2918 at0009 = ╱50╱P╱ // 0x28f2 @0x9
0x28e9…2918 at000a = ╱4f╱O╱ // 0x28f3 @0xa
0x28e9…2918 at000b = ╱53╱S╱ // 0x28f4 @0xb
0x28e9…2918 at000c = ╱54╱T╱ // 0x28f5 @0xc
0x28e9…2918 at000d = ╱31╱1╱ // 0x28f6 @0xd
0x28e9…2918 at000e = ╱ed╱(╱ // 0x28f7 @0xe
0x28e9…2918 at000f = ╱44╱D╱ // 0x28f8 @0xf
0x28e9…2918 at0010 = ╱54╱T╱ // 0x28f9 @0x10
0x28e9…2918 at0011 = ╱41╱A╱ // 0x28fa @0x11
0x28e9…2918 at0012 = ╱42╱B╱ // 0x28fb @0x12
0x28e9…2918 at0013 = ╱31╱1╱ // 0x28fc @0x13
0x28e9…2918 at0014 = ╱ec╱,╱ // 0x28fd @0x14
0x28e9…2918 at0015 = ╱44╱D╱ // 0x28fe @0x15
0x28e9…2918 at0016 = ╱54╱T╱ // 0x28ff @0x16
0x28e9…2918 at0017 = ╱41╱A╱ // 0x2900 @0x17
0x28e9…2918 at0018 = ╱42╱B╱ // 0x2901 @0x18
0x28e9…2918 at0019 = ╱ec╱,╱ // 0x2902 @0x19
0x28e9…2918 at001a = ╱4d╱M╱ // 0x2903 @0x1a
0x28e9…2918 at001b = ╱44╱D╱ // 0x2904 @0x1b
0x28e9…2918 at001c = ╱41╱A╱ // 0x2905 @0x1c
0x28e9…2918 at001d = ╱4e╱N╱ // 0x2906 @0x1d
0x28e9…2918 at001e = ╱54╱T╱ // 0x2907 @0x1e
0x28e9…2918 at001f = ╱41╱A╱ // 0x2908 @0x1f
0x28e9…2918 at0020 = ╱4c╱L╱ // 0x2909 @0x20
0x28e9…2918 at0021 = ╱ec╱,╱ // 0x290a @0x21
0x28e9…2918 at0022 = ╱50╱P╱ // 0x290b @0x22
0x28e9…2918 at0023 = ╱ec╱,╱ // 0x290c @0x23
0x28e9…2918 at0024 = ╱44╱D╱ // 0x290d @0x24
0x28e9…2918 at0025 = ╱50╱P╱ // 0x290e @0x25
0x28e9…2918 at0026 = ╱49╱I╱ // 0x290f @0x26
0x28e9…2918 at0027 = ╱4c╱L╱ // 0x2910 @0x27
0x28e9…2918 at0028 = ╱33╱3╱ // 0x2911 @0x28
0x28e9…2918 at0029 = ╱ec╱,╱ // 0x2912 @0x29
0x28e9…2918 at002a = ╱4b╱K╱ // 0x2913 @0x2a
0x28e9…2918 at002b = ╱33╱3╱ // 0x2914 @0x2b
0x28e9…2918 at002c = ╱ef╱$╱ // 0x2915 @0x2c
0x28e9…2918 at002d = ╱ee╱)╱ // 0x2916 @0x2d
0x28e9…2918 at002e = EOL // 0x2917 @0x2e
0x28e9…2918 }
0x2918…292f b686 4780 IF CEKS=B THEN EXEC HENTDPOST
0x2918…292f LineComalBin {
0x2918…292f ptr = 0xb686 // 0x2918 @0x0
0x2918…292f lno = 0x12ac // 0x291a @0x2
0x2918…292f at0004 = ╱82╱ IF ╱ // 0x291c @0x4
0x2918…292f at0005 = ╱43╱C╱ // 0x291d @0x5
0x2918…292f at0006 = ╱45╱E╱ // 0x291e @0x6
0x2918…292f at0007 = ╱4b╱K╱ // 0x291f @0x7
0x2918…292f at0008 = ╱53╱S╱ // 0x2920 @0x8
0x2918…292f at0009 = ╱dc╱=╱ // 0x2921 @0x9
0x2918…292f at000a = ╱42╱B╱ // 0x2922 @0xa
0x2918…292f at000b = ╱b6╱ THEN ╱ // 0x2923 @0xb
0x2918…292f at000c = ╱9d╱ EXEC ╱ // 0x2924 @0xc
0x2918…292f at000d = ╱48╱H╱ // 0x2925 @0xd
0x2918…292f at000e = ╱45╱E╱ // 0x2926 @0xe
0x2918…292f at000f = ╱4e╱N╱ // 0x2927 @0xf
0x2918…292f at0010 = ╱54╱T╱ // 0x2928 @0x10
0x2918…292f at0011 = ╱44╱D╱ // 0x2929 @0x11
0x2918…292f at0012 = ╱50╱P╱ // 0x292a @0x12
0x2918…292f at0013 = ╱4f╱O╱ // 0x292b @0x13
0x2918…292f at0014 = ╱53╱S╱ // 0x292c @0x14
0x2918…292f at0015 = ╱54╱T╱ // 0x292d @0x15
0x2918…292f at0016 = EOL // 0x292e @0x16
0x2918…292f }
0x292f…293b b692 4790 WHEN KRTAL
0x292f…293b LineComalBin {
0x292f…293b ptr = 0xb692 // 0x292f @0x0
0x292f…293b lno = 0x12b6 // 0x2931 @0x2
0x292f…293b at0004 = ╱a301╱ WHEN ╱ // 0x2933 @0x4
0x292f…293b at0006 = ╱4b╱K╱ // 0x2935 @0x6
0x292f…293b at0007 = ╱52╱R╱ // 0x2936 @0x7
0x292f…293b at0008 = ╱54╱T╱ // 0x2937 @0x8
0x292f…293b at0009 = ╱41╱A╱ // 0x2938 @0x9
0x292f…293b at000a = ╱4c╱L╱ // 0x2939 @0xa
0x292f…293b at000b = EOL // 0x293a @0xb
0x292f…293b }
0x293b…296a b6c1 4800 EXEC FINDPOST1(KTAB1,KTAB,MKANTAL,P,KPIL3,K4$)
0x293b…296a LineComalBin {
0x293b…296a ptr = 0xb6c1 // 0x293b @0x0
0x293b…296a lno = 0x12c0 // 0x293d @0x2
0x293b…296a at0004 = ╱9d╱ EXEC ╱ // 0x293f @0x4
0x293b…296a at0005 = ╱46╱F╱ // 0x2940 @0x5
0x293b…296a at0006 = ╱49╱I╱ // 0x2941 @0x6
0x293b…296a at0007 = ╱4e╱N╱ // 0x2942 @0x7
0x293b…296a at0008 = ╱44╱D╱ // 0x2943 @0x8
0x293b…296a at0009 = ╱50╱P╱ // 0x2944 @0x9
0x293b…296a at000a = ╱4f╱O╱ // 0x2945 @0xa
0x293b…296a at000b = ╱53╱S╱ // 0x2946 @0xb
0x293b…296a at000c = ╱54╱T╱ // 0x2947 @0xc
0x293b…296a at000d = ╱31╱1╱ // 0x2948 @0xd
0x293b…296a at000e = ╱ed╱(╱ // 0x2949 @0xe
0x293b…296a at000f = ╱4b╱K╱ // 0x294a @0xf
0x293b…296a at0010 = ╱54╱T╱ // 0x294b @0x10
0x293b…296a at0011 = ╱41╱A╱ // 0x294c @0x11
0x293b…296a at0012 = ╱42╱B╱ // 0x294d @0x12
0x293b…296a at0013 = ╱31╱1╱ // 0x294e @0x13
0x293b…296a at0014 = ╱ec╱,╱ // 0x294f @0x14
0x293b…296a at0015 = ╱4b╱K╱ // 0x2950 @0x15
0x293b…296a at0016 = ╱54╱T╱ // 0x2951 @0x16
0x293b…296a at0017 = ╱41╱A╱ // 0x2952 @0x17
0x293b…296a at0018 = ╱42╱B╱ // 0x2953 @0x18
0x293b…296a at0019 = ╱ec╱,╱ // 0x2954 @0x19
0x293b…296a at001a = ╱4d╱M╱ // 0x2955 @0x1a
0x293b…296a at001b = ╱4b╱K╱ // 0x2956 @0x1b
0x293b…296a at001c = ╱41╱A╱ // 0x2957 @0x1c
0x293b…296a at001d = ╱4e╱N╱ // 0x2958 @0x1d
0x293b…296a at001e = ╱54╱T╱ // 0x2959 @0x1e
0x293b…296a at001f = ╱41╱A╱ // 0x295a @0x1f
0x293b…296a at0020 = ╱4c╱L╱ // 0x295b @0x20
0x293b…296a at0021 = ╱ec╱,╱ // 0x295c @0x21
0x293b…296a at0022 = ╱50╱P╱ // 0x295d @0x22
0x293b…296a at0023 = ╱ec╱,╱ // 0x295e @0x23
0x293b…296a at0024 = ╱4b╱K╱ // 0x295f @0x24
0x293b…296a at0025 = ╱50╱P╱ // 0x2960 @0x25
0x293b…296a at0026 = ╱49╱I╱ // 0x2961 @0x26
0x293b…296a at0027 = ╱4c╱L╱ // 0x2962 @0x27
0x293b…296a at0028 = ╱33╱3╱ // 0x2963 @0x28
0x293b…296a at0029 = ╱ec╱,╱ // 0x2964 @0x29
0x293b…296a at002a = ╱4b╱K╱ // 0x2965 @0x2a
0x293b…296a at002b = ╱34╱4╱ // 0x2966 @0x2b
0x293b…296a at002c = ╱ef╱$╱ // 0x2967 @0x2c
0x293b…296a at002d = ╱ee╱)╱ // 0x2968 @0x2d
0x293b…296a at002e = EOL // 0x2969 @0x2e
0x293b…296a }
0x296a…2981 b6d8 4810 IF CEKS=B THEN EXEC HENTKPOST
0x296a…2981 LineComalBin {
0x296a…2981 ptr = 0xb6d8 // 0x296a @0x0
0x296a…2981 lno = 0x12ca // 0x296c @0x2
0x296a…2981 at0004 = ╱82╱ IF ╱ // 0x296e @0x4
0x296a…2981 at0005 = ╱43╱C╱ // 0x296f @0x5
0x296a…2981 at0006 = ╱45╱E╱ // 0x2970 @0x6
0x296a…2981 at0007 = ╱4b╱K╱ // 0x2971 @0x7
0x296a…2981 at0008 = ╱53╱S╱ // 0x2972 @0x8
0x296a…2981 at0009 = ╱dc╱=╱ // 0x2973 @0x9
0x296a…2981 at000a = ╱42╱B╱ // 0x2974 @0xa
0x296a…2981 at000b = ╱b6╱ THEN ╱ // 0x2975 @0xb
0x296a…2981 at000c = ╱9d╱ EXEC ╱ // 0x2976 @0xc
0x296a…2981 at000d = ╱48╱H╱ // 0x2977 @0xd
0x296a…2981 at000e = ╱45╱E╱ // 0x2978 @0xe
0x296a…2981 at000f = ╱4e╱N╱ // 0x2979 @0xf
0x296a…2981 at0010 = ╱54╱T╱ // 0x297a @0x10
0x296a…2981 at0011 = ╱4b╱K╱ // 0x297b @0x11
0x296a…2981 at0012 = ╱50╱P╱ // 0x297c @0x12
0x296a…2981 at0013 = ╱4f╱O╱ // 0x297d @0x13
0x296a…2981 at0014 = ╱53╱S╱ // 0x297e @0x14
0x296a…2981 at0015 = ╱54╱T╱ // 0x297f @0x15
0x296a…2981 at0016 = EOL // 0x2980 @0x16
0x296a…2981 }
0x2981…2987 b6de 4820 ENDCASE
0x2981…2987 LineComalBin {
0x2981…2987 ptr = 0xb6de // 0x2981 @0x0
0x2981…2987 lno = 0x12d4 // 0x2983 @0x2
0x2981…2987 at0004 = ╱a4╱ ENDCASE ╱ // 0x2985 @0x4
0x2981…2987 at0005 = EOL // 0x2986 @0x5
0x2981…2987 }
0x2987…2995 b6ec 4830 IF CEKS<>B THEN STOP
0x2987…2995 LineComalBin {
0x2987…2995 ptr = 0xb6ec // 0x2987 @0x0
0x2987…2995 lno = 0x12de // 0x2989 @0x2
0x2987…2995 at0004 = ╱82╱ IF ╱ // 0x298b @0x4
0x2987…2995 at0005 = ╱43╱C╱ // 0x298c @0x5
0x2987…2995 at0006 = ╱45╱E╱ // 0x298d @0x6
0x2987…2995 at0007 = ╱4b╱K╱ // 0x298e @0x7
0x2987…2995 at0008 = ╱53╱S╱ // 0x298f @0x8
0x2987…2995 at0009 = ╱e1╱<>╱ // 0x2990 @0x9
0x2987…2995 at000a = ╱42╱B╱ // 0x2991 @0xa
0x2987…2995 at000b = ╱b6╱ THEN ╱ // 0x2992 @0xb
0x2987…2995 at000c = ╱8d╱ STOP ╱ // 0x2993 @0xc
0x2987…2995 at000d = EOL // 0x2994 @0xd
0x2987…2995 }
0x2995…29a3 b6fa 4840 EXEC HUDSKRIV
0x2995…29a3 LineComalBin {
0x2995…29a3 ptr = 0xb6fa // 0x2995 @0x0
0x2995…29a3 lno = 0x12e8 // 0x2997 @0x2
0x2995…29a3 at0004 = ╱9d╱ EXEC ╱ // 0x2999 @0x4
0x2995…29a3 at0005 = ╱48╱H╱ // 0x299a @0x5
0x2995…29a3 at0006 = ╱55╱U╱ // 0x299b @0x6
0x2995…29a3 at0007 = ╱44╱D╱ // 0x299c @0x7
0x2995…29a3 at0008 = ╱53╱S╱ // 0x299d @0x8
0x2995…29a3 at0009 = ╱4b╱K╱ // 0x299e @0x9
0x2995…29a3 at000a = ╱52╱R╱ // 0x299f @0xa
0x2995…29a3 at000b = ╱49╱I╱ // 0x29a0 @0xb
0x2995…29a3 at000c = ╱56╱V╱ // 0x29a1 @0xc
0x2995…29a3 at000d = EOL // 0x29a2 @0xd
0x2995…29a3 }
0x29a3…29bd b714 4850 IF DTAL=KTAL1 AND SKRIV1=E THEN
0x29a3…29bd LineComalBin {
0x29a3…29bd ptr = 0xb714 // 0x29a3 @0x0
0x29a3…29bd lno = 0x12f2 // 0x29a5 @0x2
0x29a3…29bd at0004 = ╱9c╱ IF ╱ // 0x29a7 @0x4
0x29a3…29bd at0005 = ╱44╱D╱ // 0x29a8 @0x5
0x29a3…29bd at0006 = ╱54╱T╱ // 0x29a9 @0x6
0x29a3…29bd at0007 = ╱41╱A╱ // 0x29aa @0x7
0x29a3…29bd at0008 = ╱4c╱L╱ // 0x29ab @0x8
0x29a3…29bd at0009 = ╱dc╱=╱ // 0x29ac @0x9
0x29a3…29bd at000a = ╱4b╱K╱ // 0x29ad @0xa
0x29a3…29bd at000b = ╱54╱T╱ // 0x29ae @0xb
0x29a3…29bd at000c = ╱41╱A╱ // 0x29af @0xc
0x29a3…29bd at000d = ╱4c╱L╱ // 0x29b0 @0xd
0x29a3…29bd at000e = ╱31╱1╱ // 0x29b1 @0xe
0x29a3…29bd at000f = ╱da╱ AND ╱ // 0x29b2 @0xf
0x29a3…29bd at0010 = ╱53╱S╱ // 0x29b3 @0x10
0x29a3…29bd at0011 = ╱4b╱K╱ // 0x29b4 @0x11
0x29a3…29bd at0012 = ╱52╱R╱ // 0x29b5 @0x12
0x29a3…29bd at0013 = ╱49╱I╱ // 0x29b6 @0x13
0x29a3…29bd at0014 = ╱56╱V╱ // 0x29b7 @0x14
0x29a3…29bd at0015 = ╱31╱1╱ // 0x29b8 @0x15
0x29a3…29bd at0016 = ╱dc╱=╱ // 0x29b9 @0x16
0x29a3…29bd at0017 = ╱45╱E╱ // 0x29ba @0x17
0x29a3…29bd at0018 = ╱b6╱ THEN ╱ // 0x29bb @0x18
0x29a3…29bd at0019 = EOL // 0x29bc @0x19
0x29a3…29bd }
0x29bd…29c6 b71d 4855 PRINT " "
0x29bd…29c6 LineComalBin {
0x29bd…29c6 ptr = 0xb71d // 0x29bd @0x0
0x29bd…29c6 lno = 0x12f7 // 0x29bf @0x2
0x29bd…29c6 at0004 = ╱92╱ PRINT ╱ // 0x29c1 @0x4
0x29bd…29c6 at0005 = ╱22╱"╱ // 0x29c2 @0x5
0x29bd…29c6 at0006 = ╱20╱…╱ // 0x29c3 @0x6
0x29bd…29c6 at0007 = ╱22╱"╱ // 0x29c4 @0x7
0x29bd…29c6 at0008 = EOL // 0x29c5 @0x8
0x29bd…29c6 }
0x29c6…29e4 b73b 4860 EXEC LUDSKRIV(P,DATO,KSIDENR)
0x29c6…29e4 LineComalBin {
0x29c6…29e4 ptr = 0xb73b // 0x29c6 @0x0
0x29c6…29e4 lno = 0x12fc // 0x29c8 @0x2
0x29c6…29e4 at0004 = ╱9d╱ EXEC ╱ // 0x29ca @0x4
0x29c6…29e4 at0005 = ╱4c╱L╱ // 0x29cb @0x5
0x29c6…29e4 at0006 = ╱55╱U╱ // 0x29cc @0x6
0x29c6…29e4 at0007 = ╱44╱D╱ // 0x29cd @0x7
0x29c6…29e4 at0008 = ╱53╱S╱ // 0x29ce @0x8
0x29c6…29e4 at0009 = ╱4b╱K╱ // 0x29cf @0x9
0x29c6…29e4 at000a = ╱52╱R╱ // 0x29d0 @0xa
0x29c6…29e4 at000b = ╱49╱I╱ // 0x29d1 @0xb
0x29c6…29e4 at000c = ╱56╱V╱ // 0x29d2 @0xc
0x29c6…29e4 at000d = ╱ed╱(╱ // 0x29d3 @0xd
0x29c6…29e4 at000e = ╱50╱P╱ // 0x29d4 @0xe
0x29c6…29e4 at000f = ╱ec╱,╱ // 0x29d5 @0xf
0x29c6…29e4 at0010 = ╱44╱D╱ // 0x29d6 @0x10
0x29c6…29e4 at0011 = ╱41╱A╱ // 0x29d7 @0x11
0x29c6…29e4 at0012 = ╱54╱T╱ // 0x29d8 @0x12
0x29c6…29e4 at0013 = ╱4f╱O╱ // 0x29d9 @0x13
0x29c6…29e4 at0014 = ╱ec╱,╱ // 0x29da @0x14
0x29c6…29e4 at0015 = ╱4b╱K╱ // 0x29db @0x15
0x29c6…29e4 at0016 = ╱53╱S╱ // 0x29dc @0x16
0x29c6…29e4 at0017 = ╱49╱I╱ // 0x29dd @0x17
0x29c6…29e4 at0018 = ╱44╱D╱ // 0x29de @0x18
0x29c6…29e4 at0019 = ╱45╱E╱ // 0x29df @0x19
0x29c6…29e4 at001a = ╱4e╱N╱ // 0x29e0 @0x1a
0x29c6…29e4 at001b = ╱52╱R╱ // 0x29e1 @0x1b
0x29c6…29e4 at001c = ╱ee╱)╱ // 0x29e2 @0x1c
0x29c6…29e4 at001d = EOL // 0x29e3 @0x1d
0x29c6…29e4 }
0x29e4…29ed b744 4870 PRINT " "
0x29e4…29ed LineComalBin {
0x29e4…29ed ptr = 0xb744 // 0x29e4 @0x0
0x29e4…29ed lno = 0x1306 // 0x29e6 @0x2
0x29e4…29ed at0004 = ╱92╱ PRINT ╱ // 0x29e8 @0x4
0x29e4…29ed at0005 = ╱22╱"╱ // 0x29e9 @0x5
0x29e4…29ed at0006 = ╱20╱…╱ // 0x29ea @0x6
0x29e4…29ed at0007 = ╱22╱"╱ // 0x29eb @0x7
0x29e4…29ed at0008 = EOL // 0x29ec @0x8
0x29e4…29ed }
0x29ed…29f6 b74d 4875 PRINT " "
0x29ed…29f6 LineComalBin {
0x29ed…29f6 ptr = 0xb74d // 0x29ed @0x0
0x29ed…29f6 lno = 0x130b // 0x29ef @0x2
0x29ed…29f6 at0004 = ╱92╱ PRINT ╱ // 0x29f1 @0x4
0x29ed…29f6 at0005 = ╱22╱"╱ // 0x29f2 @0x5
0x29ed…29f6 at0006 = ╱20╱…╱ // 0x29f3 @0x6
0x29ed…29f6 at0007 = ╱22╱"╱ // 0x29f4 @0x7
0x29ed…29f6 at0008 = EOL // 0x29f5 @0x8
0x29ed…29f6 }
0x29f6…29fc b753 4880 ELSE
0x29f6…29fc LineComalBin {
0x29f6…29fc ptr = 0xb753 // 0x29f6 @0x0
0x29f6…29fc lno = 0x1310 // 0x29f8 @0x2
0x29f6…29fc at0004 = ╱9a╱ ELSE ╱ // 0x29fa @0x4
0x29f6…29fc at0005 = EOL // 0x29fb @0x5
0x29f6…29fc }
0x29fc…2a07 b75e 4890 KONT=P
0x29fc…2a07 LineComalBin {
0x29fc…2a07 ptr = 0xb75e // 0x29fc @0x0
0x29fc…2a07 lno = 0x131a // 0x29fe @0x2
0x29fc…2a07 at0004 = ╱4b╱K╱ // 0x2a00 @0x4
0x29fc…2a07 at0005 = ╱4f╱O╱ // 0x2a01 @0x5
0x29fc…2a07 at0006 = ╱4e╱N╱ // 0x2a02 @0x6
0x29fc…2a07 at0007 = ╱54╱T╱ // 0x2a03 @0x7
0x29fc…2a07 at0008 = ╱dc╱=╱ // 0x2a04 @0x8
0x29fc…2a07 at0009 = ╱50╱P╱ // 0x2a05 @0x9
0x29fc…2a07 at000a = EOL // 0x2a06 @0xa
0x29fc…2a07 }
0x2a07…2a16 b76d 4900 EXEC HSUDSKRIV
0x2a07…2a16 LineComalBin {
0x2a07…2a16 ptr = 0xb76d // 0x2a07 @0x0
0x2a07…2a16 lno = 0x1324 // 0x2a09 @0x2
0x2a07…2a16 at0004 = ╱9d╱ EXEC ╱ // 0x2a0b @0x4
0x2a07…2a16 at0005 = ╱48╱H╱ // 0x2a0c @0x5
0x2a07…2a16 at0006 = ╱53╱S╱ // 0x2a0d @0x6
0x2a07…2a16 at0007 = ╱55╱U╱ // 0x2a0e @0x7
0x2a07…2a16 at0008 = ╱44╱D╱ // 0x2a0f @0x8
0x2a07…2a16 at0009 = ╱53╱S╱ // 0x2a10 @0x9
0x2a07…2a16 at000a = ╱4b╱K╱ // 0x2a11 @0xa
0x2a07…2a16 at000b = ╱52╱R╱ // 0x2a12 @0xb
0x2a07…2a16 at000c = ╱49╱I╱ // 0x2a13 @0xc
0x2a07…2a16 at000d = ╱56╱V╱ // 0x2a14 @0xd
0x2a07…2a16 at000e = EOL // 0x2a15 @0xe
0x2a07…2a16 }
0x2a16…2a1c b773 4910 ENDIF
0x2a16…2a1c LineComalBin {
0x2a16…2a1c ptr = 0xb773 // 0x2a16 @0x0
0x2a16…2a1c lno = 0x132e // 0x2a18 @0x2
0x2a16…2a1c at0004 = ╱9b╱ ENDIF ╱ // 0x2a1a @0x4
0x2a16…2a1c at0005 = EOL // 0x2a1b @0x5
0x2a16…2a1c }
0x2a1c…2a49 (140,) b7a0 4920 EXEC POSTER(K61$,P,T,MPOSTANTAL8,SKRIV,SUM$)
0x2a1c…2a49 LineComalBin {
0x2a1c…2a49 ptr = 0xb7a0 // 0x2a1c @0x0
0x2a1c…2a49 lno = 0x1338 // 0x2a1e @0x2
0x2a1c…2a49 at0004 = ╱9d╱ EXEC ╱ // 0x2a20 @0x4
0x2a1c…2a49 at0005 = ╱50╱P╱ // 0x2a21 @0x5
0x2a1c…2a49 at0006 = ╱4f╱O╱ // 0x2a22 @0x6
0x2a1c…2a49 at0007 = ╱53╱S╱ // 0x2a23 @0x7
0x2a1c…2a49 at0008 = ╱54╱T╱ // 0x2a24 @0x8
0x2a1c…2a49 at0009 = ╱45╱E╱ // 0x2a25 @0x9
0x2a1c…2a49 at000a = ╱52╱R╱ // 0x2a26 @0xa
0x2a1c…2a49 at000b = ╱ed╱(╱ // 0x2a27 @0xb
0x2a1c…2a49 at000c = ╱4b╱K╱ // 0x2a28 @0xc
0x2a1c…2a49 at000d = ╱36╱6╱ // 0x2a29 @0xd
0x2a1c…2a49 at000e = ╱31╱1╱ // 0x2a2a @0xe
0x2a1c…2a49 at000f = ╱ef╱$╱ // 0x2a2b @0xf
0x2a1c…2a49 at0010 = ╱ec╱,╱ // 0x2a2c @0x10
0x2a1c…2a49 at0011 = ╱50╱P╱ // 0x2a2d @0x11
0x2a1c…2a49 at0012 = ╱ec╱,╱ // 0x2a2e @0x12
0x2a1c…2a49 at0013 = ╱54╱T╱ // 0x2a2f @0x13
0x2a1c…2a49 at0014 = ╱ec╱,╱ // 0x2a30 @0x14
0x2a1c…2a49 at0015 = ╱4d╱M╱ // 0x2a31 @0x15
0x2a1c…2a49 at0016 = ╱50╱P╱ // 0x2a32 @0x16
0x2a1c…2a49 at0017 = ╱4f╱O╱ // 0x2a33 @0x17
0x2a1c…2a49 at0018 = ╱53╱S╱ // 0x2a34 @0x18
0x2a1c…2a49 at0019 = ╱54╱T╱ // 0x2a35 @0x19
0x2a1c…2a49 at001a = ╱41╱A╱ // 0x2a36 @0x1a
0x2a1c…2a49 at001b = ╱4e╱N╱ // 0x2a37 @0x1b
0x2a1c…2a49 at001c = ╱54╱T╱ // 0x2a38 @0x1c
0x2a1c…2a49 at001d = ╱41╱A╱ // 0x2a39 @0x1d
0x2a1c…2a49 at001e = ╱4c╱L╱ // 0x2a3a @0x1e
0x2a1c…2a49 at001f = ╱38╱8╱ // 0x2a3b @0x1f
0x2a1c…2a49 at0020 = ╱ec╱,╱ // 0x2a3c @0x20
0x2a1c…2a49 at0021 = ╱53╱S╱ // 0x2a3d @0x21
0x2a1c…2a49 at0022 = ╱4b╱K╱ // 0x2a3e @0x22
0x2a1c…2a49 at0023 = ╱52╱R╱ // 0x2a3f @0x23
0x2a1c…2a49 at0024 = ╱49╱I╱ // 0x2a40 @0x24
0x2a1c…2a49 at0025 = ╱56╱V╱ // 0x2a41 @0x25
0x2a1c…2a49 at0026 = ╱ec╱,╱ // 0x2a42 @0x26
0x2a1c…2a49 at0027 = ╱53╱S╱ // 0x2a43 @0x27
0x2a1c…2a49 at0028 = ╱55╱U╱ // 0x2a44 @0x28
0x2a1c…2a49 at0029 = ╱4d╱M╱ // 0x2a45 @0x29
0x2a1c…2a49 at002a = ╱ef╱$╱ // 0x2a46 @0x2a
0x2a1c…2a49 at002b = ╱ee╱)╱ // 0x2a47 @0x2b
0x2a1c…2a49 at002c = EOL // 0x2a48 @0x2c
0x2a1c…2a49 }
0x2a49…2a56 b7ad 4930 CASE KTAL1 OF
0x2a49…2a56 LineComalBin {
0x2a49…2a56 ptr = 0xb7ad // 0x2a49 @0x0
0x2a49…2a56 lno = 0x1342 // 0x2a4b @0x2
0x2a49…2a56 at0004 = ╱a201╱ CASE ╱ // 0x2a4d @0x4
0x2a49…2a56 at0006 = ╱4b╱K╱ // 0x2a4f @0x6
0x2a49…2a56 at0007 = ╱54╱T╱ // 0x2a50 @0x7
0x2a49…2a56 at0008 = ╱41╱A╱ // 0x2a51 @0x8
0x2a49…2a56 at0009 = ╱4c╱L╱ // 0x2a52 @0x9
0x2a49…2a56 at000a = ╱31╱1╱ // 0x2a53 @0xa
0x2a49…2a56 at000b = ╱ba╱ OF ╱ // 0x2a54 @0xb
0x2a49…2a56 at000c = EOL // 0x2a55 @0xc
0x2a49…2a56 }
0x2a56…2aa3 b7fa 4940 EXEC BUDSKRIV(TAL4$,3,SUM$,FMDEBET$,FMKREDIT$,FÅDEBET$,FÅKREDIT$,LINIE)
0x2a56…2aa3 LineComalBin {
0x2a56…2aa3 ptr = 0xb7fa // 0x2a56 @0x0
0x2a56…2aa3 lno = 0x134c // 0x2a58 @0x2
0x2a56…2aa3 at0004 = ╱9d╱ EXEC ╱ // 0x2a5a @0x4
0x2a56…2aa3 at0005 = ╱42╱B╱ // 0x2a5b @0x5
0x2a56…2aa3 at0006 = ╱55╱U╱ // 0x2a5c @0x6
0x2a56…2aa3 at0007 = ╱44╱D╱ // 0x2a5d @0x7
0x2a56…2aa3 at0008 = ╱53╱S╱ // 0x2a5e @0x8
0x2a56…2aa3 at0009 = ╱4b╱K╱ // 0x2a5f @0x9
0x2a56…2aa3 at000a = ╱52╱R╱ // 0x2a60 @0xa
0x2a56…2aa3 at000b = ╱49╱I╱ // 0x2a61 @0xb
0x2a56…2aa3 at000c = ╱56╱V╱ // 0x2a62 @0xc
0x2a56…2aa3 at000d = ╱ed╱(╱ // 0x2a63 @0xd
0x2a56…2aa3 at000e = ╱54╱T╱ // 0x2a64 @0xe
0x2a56…2aa3 at000f = ╱41╱A╱ // 0x2a65 @0xf
0x2a56…2aa3 at0010 = ╱4c╱L╱ // 0x2a66 @0x10
0x2a56…2aa3 at0011 = ╱34╱4╱ // 0x2a67 @0x11
0x2a56…2aa3 at0012 = ╱ef╱$╱ // 0x2a68 @0x12
0x2a56…2aa3 at0013 = ╱ec╱,╱ // 0x2a69 @0x13
0x2a56…2aa3 at0014 = ╱33╱3╱ // 0x2a6a @0x14
0x2a56…2aa3 at0015 = ╱fe0000c002╱ // 0x2a6b @0x15
0x2a56…2aa3 at001a = ╱ec╱,╱ // 0x2a70 @0x1a
0x2a56…2aa3 at001b = ╱53╱S╱ // 0x2a71 @0x1b
0x2a56…2aa3 at001c = ╱55╱U╱ // 0x2a72 @0x1c
0x2a56…2aa3 at001d = ╱4d╱M╱ // 0x2a73 @0x1d
0x2a56…2aa3 at001e = ╱ef╱$╱ // 0x2a74 @0x1e
0x2a56…2aa3 at001f = ╱ec╱,╱ // 0x2a75 @0x1f
0x2a56…2aa3 at0020 = ╱46╱F╱ // 0x2a76 @0x20
0x2a56…2aa3 at0021 = ╱4d╱M╱ // 0x2a77 @0x21
0x2a56…2aa3 at0022 = ╱44╱D╱ // 0x2a78 @0x22
0x2a56…2aa3 at0023 = ╱45╱E╱ // 0x2a79 @0x23
0x2a56…2aa3 at0024 = ╱42╱B╱ // 0x2a7a @0x24
0x2a56…2aa3 at0025 = ╱45╱E╱ // 0x2a7b @0x25
0x2a56…2aa3 at0026 = ╱54╱T╱ // 0x2a7c @0x26
0x2a56…2aa3 at0027 = ╱ef╱$╱ // 0x2a7d @0x27
0x2a56…2aa3 at0028 = ╱ec╱,╱ // 0x2a7e @0x28
0x2a56…2aa3 at0029 = ╱46╱F╱ // 0x2a7f @0x29
0x2a56…2aa3 at002a = ╱4d╱M╱ // 0x2a80 @0x2a
0x2a56…2aa3 at002b = ╱4b╱K╱ // 0x2a81 @0x2b
0x2a56…2aa3 at002c = ╱52╱R╱ // 0x2a82 @0x2c
0x2a56…2aa3 at002d = ╱45╱E╱ // 0x2a83 @0x2d
0x2a56…2aa3 at002e = ╱44╱D╱ // 0x2a84 @0x2e
0x2a56…2aa3 at002f = ╱49╱I╱ // 0x2a85 @0x2f
0x2a56…2aa3 at0030 = ╱54╱T╱ // 0x2a86 @0x30
0x2a56…2aa3 at0031 = ╱ef╱$╱ // 0x2a87 @0x31
0x2a56…2aa3 at0032 = ╱ec╱,╱ // 0x2a88 @0x32
0x2a56…2aa3 at0033 = ╱46╱F╱ // 0x2a89 @0x33
0x2a56…2aa3 at0034 = ╱5d╱Å╱ // 0x2a8a @0x34
0x2a56…2aa3 at0035 = ╱44╱D╱ // 0x2a8b @0x35
0x2a56…2aa3 at0036 = ╱45╱E╱ // 0x2a8c @0x36
0x2a56…2aa3 at0037 = ╱42╱B╱ // 0x2a8d @0x37
0x2a56…2aa3 at0038 = ╱45╱E╱ // 0x2a8e @0x38
0x2a56…2aa3 at0039 = ╱54╱T╱ // 0x2a8f @0x39
0x2a56…2aa3 at003a = ╱ef╱$╱ // 0x2a90 @0x3a
0x2a56…2aa3 at003b = ╱ec╱,╱ // 0x2a91 @0x3b
0x2a56…2aa3 at003c = ╱46╱F╱ // 0x2a92 @0x3c
0x2a56…2aa3 at003d = ╱5d╱Å╱ // 0x2a93 @0x3d
0x2a56…2aa3 at003e = ╱4b╱K╱ // 0x2a94 @0x3e
0x2a56…2aa3 at003f = ╱52╱R╱ // 0x2a95 @0x3f
0x2a56…2aa3 at0040 = ╱45╱E╱ // 0x2a96 @0x40
0x2a56…2aa3 at0041 = ╱44╱D╱ // 0x2a97 @0x41
0x2a56…2aa3 at0042 = ╱49╱I╱ // 0x2a98 @0x42
0x2a56…2aa3 at0043 = ╱54╱T╱ // 0x2a99 @0x43
0x2a56…2aa3 at0044 = ╱ef╱$╱ // 0x2a9a @0x44
0x2a56…2aa3 at0045 = ╱ec╱,╱ // 0x2a9b @0x45
0x2a56…2aa3 at0046 = ╱4c╱L╱ // 0x2a9c @0x46
0x2a56…2aa3 at0047 = ╱49╱I╱ // 0x2a9d @0x47
0x2a56…2aa3 at0048 = ╱4e╱N╱ // 0x2a9e @0x48
0x2a56…2aa3 at0049 = ╱49╱I╱ // 0x2a9f @0x49
0x2a56…2aa3 at004a = ╱45╱E╱ // 0x2aa0 @0x4a
0x2a56…2aa3 at004b = ╱ee╱)╱ // 0x2aa1 @0x4b
0x2a56…2aa3 at004c = EOL // 0x2aa2 @0x4c
0x2a56…2aa3 }
0x2aa3…2aae b805 4950 WHEN DTAL
0x2aa3…2aae LineComalBin {
0x2aa3…2aae ptr = 0xb805 // 0x2aa3 @0x0
0x2aa3…2aae lno = 0x1356 // 0x2aa5 @0x2
0x2aa3…2aae at0004 = ╱a301╱ WHEN ╱ // 0x2aa7 @0x4
0x2aa3…2aae at0006 = ╱44╱D╱ // 0x2aa9 @0x6
0x2aa3…2aae at0007 = ╱54╱T╱ // 0x2aaa @0x7
0x2aa3…2aae at0008 = ╱41╱A╱ // 0x2aab @0x8
0x2aa3…2aae at0009 = ╱4c╱L╱ // 0x2aac @0x9
0x2aa3…2aae at000a = EOL // 0x2aad @0xa
0x2aa3…2aae }
0x2aae…2afb b852 4960 EXEC BUDSKRIV(MDNKØB$,0,SUM$,DSALDO1$,DSALDO2$,DSALDO3$,DSALDO4$,LINIE)
0x2aae…2afb LineComalBin {
0x2aae…2afb ptr = 0xb852 // 0x2aae @0x0
0x2aae…2afb lno = 0x1360 // 0x2ab0 @0x2
0x2aae…2afb at0004 = ╱9d╱ EXEC ╱ // 0x2ab2 @0x4
0x2aae…2afb at0005 = ╱42╱B╱ // 0x2ab3 @0x5
0x2aae…2afb at0006 = ╱55╱U╱ // 0x2ab4 @0x6
0x2aae…2afb at0007 = ╱44╱D╱ // 0x2ab5 @0x7
0x2aae…2afb at0008 = ╱53╱S╱ // 0x2ab6 @0x8
0x2aae…2afb at0009 = ╱4b╱K╱ // 0x2ab7 @0x9
0x2aae…2afb at000a = ╱52╱R╱ // 0x2ab8 @0xa
0x2aae…2afb at000b = ╱49╱I╱ // 0x2ab9 @0xb
0x2aae…2afb at000c = ╱56╱V╱ // 0x2aba @0xc
0x2aae…2afb at000d = ╱ed╱(╱ // 0x2abb @0xd
0x2aae…2afb at000e = ╱4d╱M╱ // 0x2abc @0xe
0x2aae…2afb at000f = ╱44╱D╱ // 0x2abd @0xf
0x2aae…2afb at0010 = ╱4e╱N╱ // 0x2abe @0x10
0x2aae…2afb at0011 = ╱4b╱K╱ // 0x2abf @0x11
0x2aae…2afb at0012 = ╱5c╱Ø╱ // 0x2ac0 @0x12
0x2aae…2afb at0013 = ╱42╱B╱ // 0x2ac1 @0x13
0x2aae…2afb at0014 = ╱ef╱$╱ // 0x2ac2 @0x14
0x2aae…2afb at0015 = ╱ec╱,╱ // 0x2ac3 @0x15
0x2aae…2afb at0016 = ╱30╱0╱ // 0x2ac4 @0x16
0x2aae…2afb at0017 = ╱fe00000000╱ // 0x2ac5 @0x17
0x2aae…2afb at001c = ╱ec╱,╱ // 0x2aca @0x1c
0x2aae…2afb at001d = ╱53╱S╱ // 0x2acb @0x1d
0x2aae…2afb at001e = ╱55╱U╱ // 0x2acc @0x1e
0x2aae…2afb at001f = ╱4d╱M╱ // 0x2acd @0x1f
0x2aae…2afb at0020 = ╱ef╱$╱ // 0x2ace @0x20
0x2aae…2afb at0021 = ╱ec╱,╱ // 0x2acf @0x21
0x2aae…2afb at0022 = ╱44╱D╱ // 0x2ad0 @0x22
0x2aae…2afb at0023 = ╱53╱S╱ // 0x2ad1 @0x23
0x2aae…2afb at0024 = ╱41╱A╱ // 0x2ad2 @0x24
0x2aae…2afb at0025 = ╱4c╱L╱ // 0x2ad3 @0x25
0x2aae…2afb at0026 = ╱44╱D╱ // 0x2ad4 @0x26
0x2aae…2afb at0027 = ╱4f╱O╱ // 0x2ad5 @0x27
0x2aae…2afb at0028 = ╱31╱1╱ // 0x2ad6 @0x28
0x2aae…2afb at0029 = ╱ef╱$╱ // 0x2ad7 @0x29
0x2aae…2afb at002a = ╱ec╱,╱ // 0x2ad8 @0x2a
0x2aae…2afb at002b = ╱44╱D╱ // 0x2ad9 @0x2b
0x2aae…2afb at002c = ╱53╱S╱ // 0x2ada @0x2c
0x2aae…2afb at002d = ╱41╱A╱ // 0x2adb @0x2d
0x2aae…2afb at002e = ╱4c╱L╱ // 0x2adc @0x2e
0x2aae…2afb at002f = ╱44╱D╱ // 0x2add @0x2f
0x2aae…2afb at0030 = ╱4f╱O╱ // 0x2ade @0x30
0x2aae…2afb at0031 = ╱32╱2╱ // 0x2adf @0x31
0x2aae…2afb at0032 = ╱ef╱$╱ // 0x2ae0 @0x32
0x2aae…2afb at0033 = ╱ec╱,╱ // 0x2ae1 @0x33
0x2aae…2afb at0034 = ╱44╱D╱ // 0x2ae2 @0x34
0x2aae…2afb at0035 = ╱53╱S╱ // 0x2ae3 @0x35
0x2aae…2afb at0036 = ╱41╱A╱ // 0x2ae4 @0x36
0x2aae…2afb at0037 = ╱4c╱L╱ // 0x2ae5 @0x37
0x2aae…2afb at0038 = ╱44╱D╱ // 0x2ae6 @0x38
0x2aae…2afb at0039 = ╱4f╱O╱ // 0x2ae7 @0x39
0x2aae…2afb at003a = ╱33╱3╱ // 0x2ae8 @0x3a
0x2aae…2afb at003b = ╱ef╱$╱ // 0x2ae9 @0x3b
0x2aae…2afb at003c = ╱ec╱,╱ // 0x2aea @0x3c
0x2aae…2afb at003d = ╱44╱D╱ // 0x2aeb @0x3d
0x2aae…2afb at003e = ╱53╱S╱ // 0x2aec @0x3e
0x2aae…2afb at003f = ╱41╱A╱ // 0x2aed @0x3f
0x2aae…2afb at0040 = ╱4c╱L╱ // 0x2aee @0x40
0x2aae…2afb at0041 = ╱44╱D╱ // 0x2aef @0x41
0x2aae…2afb at0042 = ╱4f╱O╱ // 0x2af0 @0x42
0x2aae…2afb at0043 = ╱34╱4╱ // 0x2af1 @0x43
0x2aae…2afb at0044 = ╱ef╱$╱ // 0x2af2 @0x44
0x2aae…2afb at0045 = ╱ec╱,╱ // 0x2af3 @0x45
0x2aae…2afb at0046 = ╱4c╱L╱ // 0x2af4 @0x46
0x2aae…2afb at0047 = ╱49╱I╱ // 0x2af5 @0x47
0x2aae…2afb at0048 = ╱4e╱N╱ // 0x2af6 @0x48
0x2aae…2afb at0049 = ╱49╱I╱ // 0x2af7 @0x49
0x2aae…2afb at004a = ╱45╱E╱ // 0x2af8 @0x4a
0x2aae…2afb at004b = ╱ee╱)╱ // 0x2af9 @0x4b
0x2aae…2afb at004c = EOL // 0x2afa @0x4c
0x2aae…2afb }
0x2afb…2b07 b85e 4970 WHEN KRTAL
0x2afb…2b07 LineComalBin {
0x2afb…2b07 ptr = 0xb85e // 0x2afb @0x0
0x2afb…2b07 lno = 0x136a // 0x2afd @0x2
0x2afb…2b07 at0004 = ╱a301╱ WHEN ╱ // 0x2aff @0x4
0x2afb…2b07 at0006 = ╱4b╱K╱ // 0x2b01 @0x6
0x2afb…2b07 at0007 = ╱52╱R╱ // 0x2b02 @0x7
0x2afb…2b07 at0008 = ╱54╱T╱ // 0x2b03 @0x8
0x2afb…2b07 at0009 = ╱41╱A╱ // 0x2b04 @0x9
0x2afb…2b07 at000a = ╱4c╱L╱ // 0x2b05 @0xa
0x2afb…2b07 at000b = EOL // 0x2b06 @0xb
0x2afb…2b07 }
0x2b07…2b4c b8a3 4980 EXEC BUDSKRIV(TAL4$,4,SUM$,KSALDO1$,TAL4$,TAL4$,KSALDO2$,LINIE)
0x2b07…2b4c LineComalBin {
0x2b07…2b4c ptr = 0xb8a3 // 0x2b07 @0x0
0x2b07…2b4c lno = 0x1374 // 0x2b09 @0x2
0x2b07…2b4c at0004 = ╱9d╱ EXEC ╱ // 0x2b0b @0x4
0x2b07…2b4c at0005 = ╱42╱B╱ // 0x2b0c @0x5
0x2b07…2b4c at0006 = ╱55╱U╱ // 0x2b0d @0x6
0x2b07…2b4c at0007 = ╱44╱D╱ // 0x2b0e @0x7
0x2b07…2b4c at0008 = ╱53╱S╱ // 0x2b0f @0x8
0x2b07…2b4c at0009 = ╱4b╱K╱ // 0x2b10 @0x9
0x2b07…2b4c at000a = ╱52╱R╱ // 0x2b11 @0xa
0x2b07…2b4c at000b = ╱49╱I╱ // 0x2b12 @0xb
0x2b07…2b4c at000c = ╱56╱V╱ // 0x2b13 @0xc
0x2b07…2b4c at000d = ╱ed╱(╱ // 0x2b14 @0xd
0x2b07…2b4c at000e = ╱54╱T╱ // 0x2b15 @0xe
0x2b07…2b4c at000f = ╱41╱A╱ // 0x2b16 @0xf
0x2b07…2b4c at0010 = ╱4c╱L╱ // 0x2b17 @0x10
0x2b07…2b4c at0011 = ╱34╱4╱ // 0x2b18 @0x11
0x2b07…2b4c at0012 = ╱ef╱$╱ // 0x2b19 @0x12
0x2b07…2b4c at0013 = ╱ec╱,╱ // 0x2b1a @0x13
0x2b07…2b4c at0014 = ╱34╱4╱ // 0x2b1b @0x14
0x2b07…2b4c at0015 = ╱fe00008003╱ // 0x2b1c @0x15
0x2b07…2b4c at001a = ╱ec╱,╱ // 0x2b21 @0x1a
0x2b07…2b4c at001b = ╱53╱S╱ // 0x2b22 @0x1b
0x2b07…2b4c at001c = ╱55╱U╱ // 0x2b23 @0x1c
0x2b07…2b4c at001d = ╱4d╱M╱ // 0x2b24 @0x1d
0x2b07…2b4c at001e = ╱ef╱$╱ // 0x2b25 @0x1e
0x2b07…2b4c at001f = ╱ec╱,╱ // 0x2b26 @0x1f
0x2b07…2b4c at0020 = ╱4b╱K╱ // 0x2b27 @0x20
0x2b07…2b4c at0021 = ╱53╱S╱ // 0x2b28 @0x21
0x2b07…2b4c at0022 = ╱41╱A╱ // 0x2b29 @0x22
0x2b07…2b4c at0023 = ╱4c╱L╱ // 0x2b2a @0x23
0x2b07…2b4c at0024 = ╱44╱D╱ // 0x2b2b @0x24
0x2b07…2b4c at0025 = ╱4f╱O╱ // 0x2b2c @0x25
0x2b07…2b4c at0026 = ╱31╱1╱ // 0x2b2d @0x26
0x2b07…2b4c at0027 = ╱ef╱$╱ // 0x2b2e @0x27
0x2b07…2b4c at0028 = ╱ec╱,╱ // 0x2b2f @0x28
0x2b07…2b4c at0029 = ╱54╱T╱ // 0x2b30 @0x29
0x2b07…2b4c at002a = ╱41╱A╱ // 0x2b31 @0x2a
0x2b07…2b4c at002b = ╱4c╱L╱ // 0x2b32 @0x2b
0x2b07…2b4c at002c = ╱34╱4╱ // 0x2b33 @0x2c
0x2b07…2b4c at002d = ╱ef╱$╱ // 0x2b34 @0x2d
0x2b07…2b4c at002e = ╱ec╱,╱ // 0x2b35 @0x2e
0x2b07…2b4c at002f = ╱54╱T╱ // 0x2b36 @0x2f
0x2b07…2b4c at0030 = ╱41╱A╱ // 0x2b37 @0x30
0x2b07…2b4c at0031 = ╱4c╱L╱ // 0x2b38 @0x31
0x2b07…2b4c at0032 = ╱34╱4╱ // 0x2b39 @0x32
0x2b07…2b4c at0033 = ╱ef╱$╱ // 0x2b3a @0x33
0x2b07…2b4c at0034 = ╱ec╱,╱ // 0x2b3b @0x34
0x2b07…2b4c at0035 = ╱4b╱K╱ // 0x2b3c @0x35
0x2b07…2b4c at0036 = ╱53╱S╱ // 0x2b3d @0x36
0x2b07…2b4c at0037 = ╱41╱A╱ // 0x2b3e @0x37
0x2b07…2b4c at0038 = ╱4c╱L╱ // 0x2b3f @0x38
0x2b07…2b4c at0039 = ╱44╱D╱ // 0x2b40 @0x39
0x2b07…2b4c at003a = ╱4f╱O╱ // 0x2b41 @0x3a
0x2b07…2b4c at003b = ╱32╱2╱ // 0x2b42 @0x3b
0x2b07…2b4c at003c = ╱ef╱$╱ // 0x2b43 @0x3c
0x2b07…2b4c at003d = ╱ec╱,╱ // 0x2b44 @0x3d
0x2b07…2b4c at003e = ╱4c╱L╱ // 0x2b45 @0x3e
0x2b07…2b4c at003f = ╱49╱I╱ // 0x2b46 @0x3f
0x2b07…2b4c at0040 = ╱4e╱N╱ // 0x2b47 @0x40
0x2b07…2b4c at0041 = ╱49╱I╱ // 0x2b48 @0x41
0x2b07…2b4c at0042 = ╱45╱E╱ // 0x2b49 @0x42
0x2b07…2b4c at0043 = ╱ee╱)╱ // 0x2b4a @0x43
0x2b07…2b4c at0044 = EOL // 0x2b4b @0x44
0x2b07…2b4c }
0x2b4c…2b52 b8a9 4990 ENDCASE
0x2b4c…2b52 LineComalBin {
0x2b4c…2b52 ptr = 0xb8a9 // 0x2b4c @0x0
0x2b4c…2b52 lno = 0x137e // 0x2b4e @0x2
0x2b4c…2b52 at0004 = ╱a4╱ ENDCASE ╱ // 0x2b50 @0x4
0x2b4c…2b52 at0005 = EOL // 0x2b51 @0x5
0x2b4c…2b52 }
0x2b52…2b5b b8b2 5000 T=T6
0x2b52…2b5b LineComalBin {
0x2b52…2b5b ptr = 0xb8b2 // 0x2b52 @0x0
0x2b52…2b5b lno = 0x1388 // 0x2b54 @0x2
0x2b52…2b5b at0004 = ╱54╱T╱ // 0x2b56 @0x4
0x2b52…2b5b at0005 = ╱dc╱=╱ // 0x2b57 @0x5
0x2b52…2b5b at0006 = ╱54╱T╱ // 0x2b58 @0x6
0x2b52…2b5b at0007 = ╱36╱6╱ // 0x2b59 @0x7
0x2b52…2b5b at0008 = EOL // 0x2b5a @0x8
0x2b52…2b5b }
0x2b5b…2b7c b8d3 5010 UNTIL P=100000 OR T=>MPOSTANTAL8
0x2b5b…2b7c LineComalBin {
0x2b5b…2b7c ptr = 0xb8d3 // 0x2b5b @0x0
0x2b5b…2b7c lno = 0x1392 // 0x2b5d @0x2
0x2b5b…2b7c at0004 = ╱98╱ UNTIL ╱ // 0x2b5f @0x4
0x2b5b…2b7c at0005 = ╱50╱P╱ // 0x2b60 @0x5
0x2b5b…2b7c at0006 = ╱dc╱=╱ // 0x2b61 @0x6
0x2b5b…2b7c at0007 = ╱31╱1╱ // 0x2b62 @0x7
0x2b5b…2b7c at0008 = ╱30╱0╱ // 0x2b63 @0x8
0x2b5b…2b7c at0009 = ╱30╱0╱ // 0x2b64 @0x9
0x2b5b…2b7c at000a = ╱30╱0╱ // 0x2b65 @0xa
0x2b5b…2b7c at000b = ╱30╱0╱ // 0x2b66 @0xb
0x2b5b…2b7c at000c = ╱30╱0╱ // 0x2b67 @0xc
0x2b5b…2b7c at000d = ╱fe0050c311╱ // 0x2b68 @0xd
0x2b5b…2b7c at0012 = ╱db╱ OR ╱ // 0x2b6d @0x12
0x2b5b…2b7c at0013 = ╱54╱T╱ // 0x2b6e @0x13
0x2b5b…2b7c at0014 = ╱e0╱=>╱ // 0x2b6f @0x14
0x2b5b…2b7c at0015 = ╱4d╱M╱ // 0x2b70 @0x15
0x2b5b…2b7c at0016 = ╱50╱P╱ // 0x2b71 @0x16
0x2b5b…2b7c at0017 = ╱4f╱O╱ // 0x2b72 @0x17
0x2b5b…2b7c at0018 = ╱53╱S╱ // 0x2b73 @0x18
0x2b5b…2b7c at0019 = ╱54╱T╱ // 0x2b74 @0x19
0x2b5b…2b7c at001a = ╱41╱A╱ // 0x2b75 @0x1a
0x2b5b…2b7c at001b = ╱4e╱N╱ // 0x2b76 @0x1b
0x2b5b…2b7c at001c = ╱54╱T╱ // 0x2b77 @0x1c
0x2b5b…2b7c at001d = ╱41╱A╱ // 0x2b78 @0x1d
0x2b5b…2b7c at001e = ╱4c╱L╱ // 0x2b79 @0x1e
0x2b5b…2b7c at001f = ╱38╱8╱ // 0x2b7a @0x1f
0x2b5b…2b7c at0020 = EOL // 0x2b7b @0x20
0x2b5b…2b7c }
0x2b7c…2b82 b8d9 5020 ENDIF
0x2b7c…2b82 LineComalBin {
0x2b7c…2b82 ptr = 0xb8d9 // 0x2b7c @0x0
0x2b7c…2b82 lno = 0x139c // 0x2b7e @0x2
0x2b7c…2b82 at0004 = ╱9b╱ ENDIF ╱ // 0x2b80 @0x4
0x2b7c…2b82 at0005 = EOL // 0x2b81 @0x5
0x2b7c…2b82 }
0x2b82…2b8a b8e1 5030 P=B
0x2b82…2b8a LineComalBin {
0x2b82…2b8a ptr = 0xb8e1 // 0x2b82 @0x0
0x2b82…2b8a lno = 0x13a6 // 0x2b84 @0x2
0x2b82…2b8a at0004 = ╱50╱P╱ // 0x2b86 @0x4
0x2b82…2b8a at0005 = ╱dc╱=╱ // 0x2b87 @0x5
0x2b82…2b8a at0006 = ╱42╱B╱ // 0x2b88 @0x6
0x2b82…2b8a at0007 = EOL // 0x2b89 @0x7
0x2b82…2b8a }
0x2b8a…2b90 b8e7 5040 ENDPROC
0x2b8a…2b90 LineComalBin {
0x2b8a…2b90 ptr = 0xb8e7 // 0x2b8a @0x0
0x2b8a…2b90 lno = 0x13b0 // 0x2b8c @0x2
0x2b8a…2b90 at0004 = ╱9f╱ ENDPROC ╱ // 0x2b8e @0x4
0x2b8a…2b90 at0005 = EOL // 0x2b8f @0x5
0x2b8a…2b90 }
0x2b90…2baa b901 5050 K1$="P641220:SYSTEM1"
0x2b90…2baa LineComalBin {
0x2b90…2baa ptr = 0xb901 // 0x2b90 @0x0
0x2b90…2baa lno = 0x13ba // 0x2b92 @0x2
0x2b90…2baa at0004 = ╱4b╱K╱ // 0x2b94 @0x4
0x2b90…2baa at0005 = ╱31╱1╱ // 0x2b95 @0x5
0x2b90…2baa at0006 = ╱ef╱$╱ // 0x2b96 @0x6
0x2b90…2baa at0007 = ╱dc╱=╱ // 0x2b97 @0x7
0x2b90…2baa at0008 = ╱22╱"╱ // 0x2b98 @0x8
0x2b90…2baa at0009 = ╱50╱P╱ // 0x2b99 @0x9
0x2b90…2baa at000a = ╱36╱6╱ // 0x2b9a @0xa
0x2b90…2baa at000b = ╱34╱4╱ // 0x2b9b @0xb
0x2b90…2baa at000c = ╱31╱1╱ // 0x2b9c @0xc
0x2b90…2baa at000d = ╱32╱2╱ // 0x2b9d @0xd
0x2b90…2baa at000e = ╱32╱2╱ // 0x2b9e @0xe
0x2b90…2baa at000f = ╱30╱0╱ // 0x2b9f @0xf
0x2b90…2baa at0010 = ╱3a╱:╱ // 0x2ba0 @0x10
0x2b90…2baa at0011 = ╱53╱S╱ // 0x2ba1 @0x11
0x2b90…2baa at0012 = ╱59╱Y╱ // 0x2ba2 @0x12
0x2b90…2baa at0013 = ╱53╱S╱ // 0x2ba3 @0x13
0x2b90…2baa at0014 = ╱54╱T╱ // 0x2ba4 @0x14
0x2b90…2baa at0015 = ╱45╱E╱ // 0x2ba5 @0x15
0x2b90…2baa at0016 = ╱4d╱M╱ // 0x2ba6 @0x16
0x2b90…2baa at0017 = ╱31╱1╱ // 0x2ba7 @0x17
0x2b90…2baa at0018 = ╱22╱"╱ // 0x2ba8 @0x18
0x2b90…2baa at0019 = EOL // 0x2ba9 @0x19
0x2b90…2baa }
0x2baa…2bb0 b907 5060 REPEAT
0x2baa…2bb0 LineComalBin {
0x2baa…2bb0 ptr = 0xb907 // 0x2baa @0x0
0x2baa…2bb0 lno = 0x13c4 // 0x2bac @0x2
0x2baa…2bb0 at0004 = ╱97╱ REPEAT ╱ // 0x2bae @0x4
0x2baa…2bb0 at0005 = EOL // 0x2baf @0x5
0x2baa…2bb0 }
0x2bb0…2bbb b912 5070 OPEN K1$,R
0x2bb0…2bbb LineComalBin {
0x2bb0…2bbb ptr = 0xb912 // 0x2bb0 @0x0
0x2bb0…2bbb lno = 0x13ce // 0x2bb2 @0x2
0x2bb0…2bbb at0004 = ╱a7╱ OPEN ╱ // 0x2bb4 @0x4
0x2bb0…2bbb at0005 = ╱4b╱K╱ // 0x2bb5 @0x5
0x2bb0…2bbb at0006 = ╱31╱1╱ // 0x2bb6 @0x6
0x2bb0…2bbb at0007 = ╱ef╱$╱ // 0x2bb7 @0x7
0x2bb0…2bbb at0008 = ╱ec╱,╱ // 0x2bb8 @0x8
0x2bb0…2bbb at0009 = ╱52╱R╱ // 0x2bb9 @0x9
0x2bb0…2bbb at000a = EOL // 0x2bba @0xa
0x2bb0…2bbb }
0x2bbb…2bcb b922 5080 IF STATUS(K1$)=B THEN EXIT
0x2bbb…2bcb LineComalBin {
0x2bbb…2bcb ptr = 0xb922 // 0x2bbb @0x0
0x2bbb…2bcb lno = 0x13d8 // 0x2bbd @0x2
0x2bbb…2bcb at0004 = ╱82╱ IF ╱ // 0x2bbf @0x4
0x2bbb…2bcb at0005 = ╱ce╱STATUS╱ // 0x2bc0 @0x5
0x2bbb…2bcb at0006 = ╱ed╱(╱ // 0x2bc1 @0x6
0x2bbb…2bcb at0007 = ╱4b╱K╱ // 0x2bc2 @0x7
0x2bbb…2bcb at0008 = ╱31╱1╱ // 0x2bc3 @0x8
0x2bbb…2bcb at0009 = ╱ef╱$╱ // 0x2bc4 @0x9
0x2bbb…2bcb at000a = ╱ee╱)╱ // 0x2bc5 @0xa
0x2bbb…2bcb at000b = ╱dc╱=╱ // 0x2bc6 @0xb
0x2bbb…2bcb at000c = ╱42╱B╱ // 0x2bc7 @0xc
0x2bbb…2bcb at000d = ╱b6╱ THEN ╱ // 0x2bc8 @0xd
0x2bbb…2bcb at000e = ╱99╱ EXIT ╱ // 0x2bc9 @0xe
0x2bbb…2bcb at000f = EOL // 0x2bca @0xf
0x2bbb…2bcb }
0x2bcb…2bd1 b928 5090 CLEAR
0x2bcb…2bd1 LineComalBin {
0x2bcb…2bd1 ptr = 0xb928 // 0x2bcb @0x0
0x2bcb…2bd1 lno = 0x13e2 // 0x2bcd @0x2
0x2bcb…2bd1 at0004 = ╱a0╱ CLEAR ╱ // 0x2bcf @0x4
0x2bcb…2bd1 at0005 = EOL // 0x2bd0 @0x5
0x2bcb…2bd1 }
0x2bd1…2be0 b937 5100 CURSOR U,13
0x2bd1…2be0 LineComalBin {
0x2bd1…2be0 ptr = 0xb937 // 0x2bd1 @0x0
0x2bd1…2be0 lno = 0x13ec // 0x2bd3 @0x2
0x2bd1…2be0 at0004 = ╱a1╱ CURSOR ╱ // 0x2bd5 @0x4
0x2bd1…2be0 at0005 = ╱55╱U╱ // 0x2bd6 @0x5
0x2bd1…2be0 at0006 = ╱ec╱,╱ // 0x2bd7 @0x6
0x2bd1…2be0 at0007 = ╱31╱1╱ // 0x2bd8 @0x7
0x2bd1…2be0 at0008 = ╱33╱3╱ // 0x2bd9 @0x8
0x2bd1…2be0 at0009 = ╱fe0000d004╱ // 0x2bda @0x9
0x2bd1…2be0 at000e = EOL // 0x2bdf @0xe
0x2bd1…2be0 }
0x2be0…2c07 b95e 5110 INPUT "ISÆT PLADE NR.20,TAST RETURN",A$
0x2be0…2c07 LineComalBin {
0x2be0…2c07 ptr = 0xb95e // 0x2be0 @0x0
0x2be0…2c07 lno = 0x13f6 // 0x2be2 @0x2
0x2be0…2c07 at0004 = ╱91╱ INPUT ╱ // 0x2be4 @0x4
0x2be0…2c07 at0005 = ╱22╱"╱ // 0x2be5 @0x5
0x2be0…2c07 at0006 = ╱49╱I╱ // 0x2be6 @0x6
0x2be0…2c07 at0007 = ╱53╱S╱ // 0x2be7 @0x7
0x2be0…2c07 at0008 = ╱5b╱Æ╱ // 0x2be8 @0x8
0x2be0…2c07 at0009 = ╱54╱T╱ // 0x2be9 @0x9
0x2be0…2c07 at000a = ╱20╱…╱ // 0x2bea @0xa
0x2be0…2c07 at000b = ╱50╱P╱ // 0x2beb @0xb
0x2be0…2c07 at000c = ╱4c╱L╱ // 0x2bec @0xc
0x2be0…2c07 at000d = ╱41╱A╱ // 0x2bed @0xd
0x2be0…2c07 at000e = ╱44╱D╱ // 0x2bee @0xe
0x2be0…2c07 at000f = ╱45╱E╱ // 0x2bef @0xf
0x2be0…2c07 at0010 = ╱20╱…╱ // 0x2bf0 @0x10
0x2be0…2c07 at0011 = ╱4e╱N╱ // 0x2bf1 @0x11
0x2be0…2c07 at0012 = ╱52╱R╱ // 0x2bf2 @0x12
0x2be0…2c07 at0013 = ╱2e╱.╱ // 0x2bf3 @0x13
0x2be0…2c07 at0014 = ╱32╱2╱ // 0x2bf4 @0x14
0x2be0…2c07 at0015 = ╱30╱0╱ // 0x2bf5 @0x15
0x2be0…2c07 at0016 = ╱2c╱,╱ // 0x2bf6 @0x16
0x2be0…2c07 at0017 = ╱54╱T╱ // 0x2bf7 @0x17
0x2be0…2c07 at0018 = ╱41╱A╱ // 0x2bf8 @0x18
0x2be0…2c07 at0019 = ╱53╱S╱ // 0x2bf9 @0x19
0x2be0…2c07 at001a = ╱54╱T╱ // 0x2bfa @0x1a
0x2be0…2c07 at001b = ╱20╱…╱ // 0x2bfb @0x1b
0x2be0…2c07 at001c = ╱52╱R╱ // 0x2bfc @0x1c
0x2be0…2c07 at001d = ╱45╱E╱ // 0x2bfd @0x1d
0x2be0…2c07 at001e = ╱54╱T╱ // 0x2bfe @0x1e
0x2be0…2c07 at001f = ╱55╱U╱ // 0x2bff @0x1f
0x2be0…2c07 at0020 = ╱52╱R╱ // 0x2c00 @0x20
0x2be0…2c07 at0021 = ╱4e╱N╱ // 0x2c01 @0x21
0x2be0…2c07 at0022 = ╱22╱"╱ // 0x2c02 @0x22
0x2be0…2c07 at0023 = ╱ec╱,╱ // 0x2c03 @0x23
0x2be0…2c07 at0024 = ╱41╱A╱ // 0x2c04 @0x24
0x2be0…2c07 at0025 = ╱ef╱$╱ // 0x2c05 @0x25
0x2be0…2c07 at0026 = EOL // 0x2c06 @0x26
0x2be0…2c07 }
0x2c07…2c15 b96c 5120 UNTIL STATUS(K1$)=B
0x2c07…2c15 LineComalBin {
0x2c07…2c15 ptr = 0xb96c // 0x2c07 @0x0
0x2c07…2c15 lno = 0x1400 // 0x2c09 @0x2
0x2c07…2c15 at0004 = ╱98╱ UNTIL ╱ // 0x2c0b @0x4
0x2c07…2c15 at0005 = ╱ce╱STATUS╱ // 0x2c0c @0x5
0x2c07…2c15 at0006 = ╱ed╱(╱ // 0x2c0d @0x6
0x2c07…2c15 at0007 = ╱4b╱K╱ // 0x2c0e @0x7
0x2c07…2c15 at0008 = ╱31╱1╱ // 0x2c0f @0x8
0x2c07…2c15 at0009 = ╱ef╱$╱ // 0x2c10 @0x9
0x2c07…2c15 at000a = ╱ee╱)╱ // 0x2c11 @0xa
0x2c07…2c15 at000b = ╱dc╱=╱ // 0x2c12 @0xb
0x2c07…2c15 at000c = ╱42╱B╱ // 0x2c13 @0xc
0x2c07…2c15 at000d = EOL // 0x2c14 @0xd
0x2c07…2c15 }
0x2c15…2c38 b98f 5130 GET K1$,E:MFANTAL,MDANTAL,MKANTAL
0x2c15…2c38 LineComalBin {
0x2c15…2c38 ptr = 0xb98f // 0x2c15 @0x0
0x2c15…2c38 lno = 0x140a // 0x2c17 @0x2
0x2c15…2c38 at0004 = ╱a9╱ GET ╱ // 0x2c19 @0x4
0x2c15…2c38 at0005 = ╱4b╱K╱ // 0x2c1a @0x5
0x2c15…2c38 at0006 = ╱31╱1╱ // 0x2c1b @0x6
0x2c15…2c38 at0007 = ╱ef╱$╱ // 0x2c1c @0x7
0x2c15…2c38 at0008 = ╱ec╱,╱ // 0x2c1d @0x8
0x2c15…2c38 at0009 = ╱45╱E╱ // 0x2c1e @0x9
0x2c15…2c38 at000a = ╱f0╱:╱ // 0x2c1f @0xa
0x2c15…2c38 at000b = ╱4d╱M╱ // 0x2c20 @0xb
0x2c15…2c38 at000c = ╱46╱F╱ // 0x2c21 @0xc
0x2c15…2c38 at000d = ╱41╱A╱ // 0x2c22 @0xd
0x2c15…2c38 at000e = ╱4e╱N╱ // 0x2c23 @0xe
0x2c15…2c38 at000f = ╱54╱T╱ // 0x2c24 @0xf
0x2c15…2c38 at0010 = ╱41╱A╱ // 0x2c25 @0x10
0x2c15…2c38 at0011 = ╱4c╱L╱ // 0x2c26 @0x11
0x2c15…2c38 at0012 = ╱ec╱,╱ // 0x2c27 @0x12
0x2c15…2c38 at0013 = ╱4d╱M╱ // 0x2c28 @0x13
0x2c15…2c38 at0014 = ╱44╱D╱ // 0x2c29 @0x14
0x2c15…2c38 at0015 = ╱41╱A╱ // 0x2c2a @0x15
0x2c15…2c38 at0016 = ╱4e╱N╱ // 0x2c2b @0x16
0x2c15…2c38 at0017 = ╱54╱T╱ // 0x2c2c @0x17
0x2c15…2c38 at0018 = ╱41╱A╱ // 0x2c2d @0x18
0x2c15…2c38 at0019 = ╱4c╱L╱ // 0x2c2e @0x19
0x2c15…2c38 at001a = ╱ec╱,╱ // 0x2c2f @0x1a
0x2c15…2c38 at001b = ╱4d╱M╱ // 0x2c30 @0x1b
0x2c15…2c38 at001c = ╱4b╱K╱ // 0x2c31 @0x1c
0x2c15…2c38 at001d = ╱41╱A╱ // 0x2c32 @0x1d
0x2c15…2c38 at001e = ╱4e╱N╱ // 0x2c33 @0x1e
0x2c15…2c38 at001f = ╱54╱T╱ // 0x2c34 @0x1f
0x2c15…2c38 at0020 = ╱41╱A╱ // 0x2c35 @0x20
0x2c15…2c38 at0021 = ╱4c╱L╱ // 0x2c36 @0x21
0x2c15…2c38 at0022 = EOL // 0x2c37 @0x22
0x2c15…2c38 }
0x2c38…2c4b b9a2 5140 EXEC FEJL(W,E,K1$)
0x2c38…2c4b LineComalBin {
0x2c38…2c4b ptr = 0xb9a2 // 0x2c38 @0x0
0x2c38…2c4b lno = 0x1414 // 0x2c3a @0x2
0x2c38…2c4b at0004 = ╱9d╱ EXEC ╱ // 0x2c3c @0x4
0x2c38…2c4b at0005 = ╱46╱F╱ // 0x2c3d @0x5
0x2c38…2c4b at0006 = ╱45╱E╱ // 0x2c3e @0x6
0x2c38…2c4b at0007 = ╱4a╱J╱ // 0x2c3f @0x7
0x2c38…2c4b at0008 = ╱4c╱L╱ // 0x2c40 @0x8
0x2c38…2c4b at0009 = ╱ed╱(╱ // 0x2c41 @0x9
0x2c38…2c4b at000a = ╱57╱W╱ // 0x2c42 @0xa
0x2c38…2c4b at000b = ╱ec╱,╱ // 0x2c43 @0xb
0x2c38…2c4b at000c = ╱45╱E╱ // 0x2c44 @0xc
0x2c38…2c4b at000d = ╱ec╱,╱ // 0x2c45 @0xd
0x2c38…2c4b at000e = ╱4b╱K╱ // 0x2c46 @0xe
0x2c38…2c4b at000f = ╱31╱1╱ // 0x2c47 @0xf
0x2c38…2c4b at0010 = ╱ef╱$╱ // 0x2c48 @0x10
0x2c38…2c4b at0011 = ╱ee╱)╱ // 0x2c49 @0x11
0x2c38…2c4b at0012 = EOL // 0x2c4a @0x12
0x2c38…2c4b }
0x2c4b…2c70 b9c7 5150 GET K1$,V:DPOST,KPOST,MFPOST,MDPOST
0x2c4b…2c70 LineComalBin {
0x2c4b…2c70 ptr = 0xb9c7 // 0x2c4b @0x0
0x2c4b…2c70 lno = 0x141e // 0x2c4d @0x2
0x2c4b…2c70 at0004 = ╱a9╱ GET ╱ // 0x2c4f @0x4
0x2c4b…2c70 at0005 = ╱4b╱K╱ // 0x2c50 @0x5
0x2c4b…2c70 at0006 = ╱31╱1╱ // 0x2c51 @0x6
0x2c4b…2c70 at0007 = ╱ef╱$╱ // 0x2c52 @0x7
0x2c4b…2c70 at0008 = ╱ec╱,╱ // 0x2c53 @0x8
0x2c4b…2c70 at0009 = ╱56╱V╱ // 0x2c54 @0x9
0x2c4b…2c70 at000a = ╱f0╱:╱ // 0x2c55 @0xa
0x2c4b…2c70 at000b = ╱44╱D╱ // 0x2c56 @0xb
0x2c4b…2c70 at000c = ╱50╱P╱ // 0x2c57 @0xc
0x2c4b…2c70 at000d = ╱4f╱O╱ // 0x2c58 @0xd
0x2c4b…2c70 at000e = ╱53╱S╱ // 0x2c59 @0xe
0x2c4b…2c70 at000f = ╱54╱T╱ // 0x2c5a @0xf
0x2c4b…2c70 at0010 = ╱ec╱,╱ // 0x2c5b @0x10
0x2c4b…2c70 at0011 = ╱4b╱K╱ // 0x2c5c @0x11
0x2c4b…2c70 at0012 = ╱50╱P╱ // 0x2c5d @0x12
0x2c4b…2c70 at0013 = ╱4f╱O╱ // 0x2c5e @0x13
0x2c4b…2c70 at0014 = ╱53╱S╱ // 0x2c5f @0x14
0x2c4b…2c70 at0015 = ╱54╱T╱ // 0x2c60 @0x15
0x2c4b…2c70 at0016 = ╱ec╱,╱ // 0x2c61 @0x16
0x2c4b…2c70 at0017 = ╱4d╱M╱ // 0x2c62 @0x17
0x2c4b…2c70 at0018 = ╱46╱F╱ // 0x2c63 @0x18
0x2c4b…2c70 at0019 = ╱50╱P╱ // 0x2c64 @0x19
0x2c4b…2c70 at001a = ╱4f╱O╱ // 0x2c65 @0x1a
0x2c4b…2c70 at001b = ╱53╱S╱ // 0x2c66 @0x1b
0x2c4b…2c70 at001c = ╱54╱T╱ // 0x2c67 @0x1c
0x2c4b…2c70 at001d = ╱ec╱,╱ // 0x2c68 @0x1d
0x2c4b…2c70 at001e = ╱4d╱M╱ // 0x2c69 @0x1e
0x2c4b…2c70 at001f = ╱44╱D╱ // 0x2c6a @0x1f
0x2c4b…2c70 at0020 = ╱50╱P╱ // 0x2c6b @0x20
0x2c4b…2c70 at0021 = ╱4f╱O╱ // 0x2c6c @0x21
0x2c4b…2c70 at0022 = ╱53╱S╱ // 0x2c6d @0x22
0x2c4b…2c70 at0023 = ╱54╱T╱ // 0x2c6e @0x23
0x2c4b…2c70 at0024 = EOL // 0x2c6f @0x24
0x2c4b…2c70 }
0x2c70…2c83 b9da 5160 EXEC FEJL(W,G,K1$)
0x2c70…2c83 LineComalBin {
0x2c70…2c83 ptr = 0xb9da // 0x2c70 @0x0
0x2c70…2c83 lno = 0x1428 // 0x2c72 @0x2
0x2c70…2c83 at0004 = ╱9d╱ EXEC ╱ // 0x2c74 @0x4
0x2c70…2c83 at0005 = ╱46╱F╱ // 0x2c75 @0x5
0x2c70…2c83 at0006 = ╱45╱E╱ // 0x2c76 @0x6
0x2c70…2c83 at0007 = ╱4a╱J╱ // 0x2c77 @0x7
0x2c70…2c83 at0008 = ╱4c╱L╱ // 0x2c78 @0x8
0x2c70…2c83 at0009 = ╱ed╱(╱ // 0x2c79 @0x9
0x2c70…2c83 at000a = ╱57╱W╱ // 0x2c7a @0xa
0x2c70…2c83 at000b = ╱ec╱,╱ // 0x2c7b @0xb
0x2c70…2c83 at000c = ╱47╱G╱ // 0x2c7c @0xc
0x2c70…2c83 at000d = ╱ec╱,╱ // 0x2c7d @0xd
0x2c70…2c83 at000e = ╱4b╱K╱ // 0x2c7e @0xe
0x2c70…2c83 at000f = ╱31╱1╱ // 0x2c7f @0xf
0x2c70…2c83 at0010 = ╱ef╱$╱ // 0x2c80 @0x10
0x2c70…2c83 at0011 = ╱ee╱)╱ // 0x2c81 @0x11
0x2c70…2c83 at0012 = EOL // 0x2c82 @0x12
0x2c70…2c83 }
0x2c83…2ca4 b9fb 5170 GET K1$,C:MKPOST,MFAK,MVGR,MKGR
0x2c83…2ca4 LineComalBin {
0x2c83…2ca4 ptr = 0xb9fb // 0x2c83 @0x0
0x2c83…2ca4 lno = 0x1432 // 0x2c85 @0x2
0x2c83…2ca4 at0004 = ╱a9╱ GET ╱ // 0x2c87 @0x4
0x2c83…2ca4 at0005 = ╱4b╱K╱ // 0x2c88 @0x5
0x2c83…2ca4 at0006 = ╱31╱1╱ // 0x2c89 @0x6
0x2c83…2ca4 at0007 = ╱ef╱$╱ // 0x2c8a @0x7
0x2c83…2ca4 at0008 = ╱ec╱,╱ // 0x2c8b @0x8
0x2c83…2ca4 at0009 = ╱43╱C╱ // 0x2c8c @0x9
0x2c83…2ca4 at000a = ╱f0╱:╱ // 0x2c8d @0xa
0x2c83…2ca4 at000b = ╱4d╱M╱ // 0x2c8e @0xb
0x2c83…2ca4 at000c = ╱4b╱K╱ // 0x2c8f @0xc
0x2c83…2ca4 at000d = ╱50╱P╱ // 0x2c90 @0xd
0x2c83…2ca4 at000e = ╱4f╱O╱ // 0x2c91 @0xe
0x2c83…2ca4 at000f = ╱53╱S╱ // 0x2c92 @0xf
0x2c83…2ca4 at0010 = ╱54╱T╱ // 0x2c93 @0x10
0x2c83…2ca4 at0011 = ╱ec╱,╱ // 0x2c94 @0x11
0x2c83…2ca4 at0012 = ╱4d╱M╱ // 0x2c95 @0x12
0x2c83…2ca4 at0013 = ╱46╱F╱ // 0x2c96 @0x13
0x2c83…2ca4 at0014 = ╱41╱A╱ // 0x2c97 @0x14
0x2c83…2ca4 at0015 = ╱4b╱K╱ // 0x2c98 @0x15
0x2c83…2ca4 at0016 = ╱ec╱,╱ // 0x2c99 @0x16
0x2c83…2ca4 at0017 = ╱4d╱M╱ // 0x2c9a @0x17
0x2c83…2ca4 at0018 = ╱56╱V╱ // 0x2c9b @0x18
0x2c83…2ca4 at0019 = ╱47╱G╱ // 0x2c9c @0x19
0x2c83…2ca4 at001a = ╱52╱R╱ // 0x2c9d @0x1a
0x2c83…2ca4 at001b = ╱ec╱,╱ // 0x2c9e @0x1b
0x2c83…2ca4 at001c = ╱4d╱M╱ // 0x2c9f @0x1c
0x2c83…2ca4 at001d = ╱4b╱K╱ // 0x2ca0 @0x1d
0x2c83…2ca4 at001e = ╱47╱G╱ // 0x2ca1 @0x1e
0x2c83…2ca4 at001f = ╱52╱R╱ // 0x2ca2 @0x1f
0x2c83…2ca4 at0020 = EOL // 0x2ca3 @0x20
0x2c83…2ca4 }
0x2ca4…2cb7 ba0e 5180 EXEC FEJL(W,V,K1$)
0x2ca4…2cb7 LineComalBin {
0x2ca4…2cb7 ptr = 0xba0e // 0x2ca4 @0x0
0x2ca4…2cb7 lno = 0x143c // 0x2ca6 @0x2
0x2ca4…2cb7 at0004 = ╱9d╱ EXEC ╱ // 0x2ca8 @0x4
0x2ca4…2cb7 at0005 = ╱46╱F╱ // 0x2ca9 @0x5
0x2ca4…2cb7 at0006 = ╱45╱E╱ // 0x2caa @0x6
0x2ca4…2cb7 at0007 = ╱4a╱J╱ // 0x2cab @0x7
0x2ca4…2cb7 at0008 = ╱4c╱L╱ // 0x2cac @0x8
0x2ca4…2cb7 at0009 = ╱ed╱(╱ // 0x2cad @0x9
0x2ca4…2cb7 at000a = ╱57╱W╱ // 0x2cae @0xa
0x2ca4…2cb7 at000b = ╱ec╱,╱ // 0x2caf @0xb
0x2ca4…2cb7 at000c = ╱56╱V╱ // 0x2cb0 @0xc
0x2ca4…2cb7 at000d = ╱ec╱,╱ // 0x2cb1 @0xd
0x2ca4…2cb7 at000e = ╱4b╱K╱ // 0x2cb2 @0xe
0x2ca4…2cb7 at000f = ╱31╱1╱ // 0x2cb3 @0xf
0x2ca4…2cb7 at0010 = ╱ef╱$╱ // 0x2cb4 @0x10
0x2ca4…2cb7 at0011 = ╱ee╱)╱ // 0x2cb5 @0x11
0x2ca4…2cb7 at0012 = EOL // 0x2cb6 @0x12
0x2ca4…2cb7 }
0x2cb7…2ccd ba24 5190 GET K1$,5:MKRGR
0x2cb7…2ccd LineComalBin {
0x2cb7…2ccd ptr = 0xba24 // 0x2cb7 @0x0
0x2cb7…2ccd lno = 0x1446 // 0x2cb9 @0x2
0x2cb7…2ccd at0004 = ╱a9╱ GET ╱ // 0x2cbb @0x4
0x2cb7…2ccd at0005 = ╱4b╱K╱ // 0x2cbc @0x5
0x2cb7…2ccd at0006 = ╱31╱1╱ // 0x2cbd @0x6
0x2cb7…2ccd at0007 = ╱ef╱$╱ // 0x2cbe @0x7
0x2cb7…2ccd at0008 = ╱ec╱,╱ // 0x2cbf @0x8
0x2cb7…2ccd at0009 = ╱35╱5╱ // 0x2cc0 @0x9
0x2cb7…2ccd at000a = ╱fe0000a003╱ // 0x2cc1 @0xa
0x2cb7…2ccd at000f = ╱f0╱:╱ // 0x2cc6 @0xf
0x2cb7…2ccd at0010 = ╱4d╱M╱ // 0x2cc7 @0x10
0x2cb7…2ccd at0011 = ╱4b╱K╱ // 0x2cc8 @0x11
0x2cb7…2ccd at0012 = ╱52╱R╱ // 0x2cc9 @0x12
0x2cb7…2ccd at0013 = ╱47╱G╱ // 0x2cca @0x13
0x2cb7…2ccd at0014 = ╱52╱R╱ // 0x2ccb @0x14
0x2cb7…2ccd at0015 = EOL // 0x2ccc @0x15
0x2cb7…2ccd }
0x2ccd…2ce0 ba37 5200 EXEC FEJL(W,C,K1$)
0x2ccd…2ce0 LineComalBin {
0x2ccd…2ce0 ptr = 0xba37 // 0x2ccd @0x0
0x2ccd…2ce0 lno = 0x1450 // 0x2ccf @0x2
0x2ccd…2ce0 at0004 = ╱9d╱ EXEC ╱ // 0x2cd1 @0x4
0x2ccd…2ce0 at0005 = ╱46╱F╱ // 0x2cd2 @0x5
0x2ccd…2ce0 at0006 = ╱45╱E╱ // 0x2cd3 @0x6
0x2ccd…2ce0 at0007 = ╱4a╱J╱ // 0x2cd4 @0x7
0x2ccd…2ce0 at0008 = ╱4c╱L╱ // 0x2cd5 @0x8
0x2ccd…2ce0 at0009 = ╱ed╱(╱ // 0x2cd6 @0x9
0x2ccd…2ce0 at000a = ╱57╱W╱ // 0x2cd7 @0xa
0x2ccd…2ce0 at000b = ╱ec╱,╱ // 0x2cd8 @0xb
0x2ccd…2ce0 at000c = ╱43╱C╱ // 0x2cd9 @0xc
0x2ccd…2ce0 at000d = ╱ec╱,╱ // 0x2cda @0xd
0x2ccd…2ce0 at000e = ╱4b╱K╱ // 0x2cdb @0xe
0x2ccd…2ce0 at000f = ╱31╱1╱ // 0x2cdc @0xf
0x2ccd…2ce0 at0010 = ╱ef╱$╱ // 0x2cdd @0x10
0x2ccd…2ce0 at0011 = ╱ee╱)╱ // 0x2cde @0x11
0x2ccd…2ce0 at0012 = EOL // 0x2cdf @0x12
0x2ccd…2ce0 }
0x2ce0…2d08 ba5f 5210 GET K1$,8:DIVNR,DIVDNR,DIFNR,DTAL
0x2ce0…2d08 LineComalBin {
0x2ce0…2d08 ptr = 0xba5f // 0x2ce0 @0x0
0x2ce0…2d08 lno = 0x145a // 0x2ce2 @0x2
0x2ce0…2d08 at0004 = ╱a9╱ GET ╱ // 0x2ce4 @0x4
0x2ce0…2d08 at0005 = ╱4b╱K╱ // 0x2ce5 @0x5
0x2ce0…2d08 at0006 = ╱31╱1╱ // 0x2ce6 @0x6
0x2ce0…2d08 at0007 = ╱ef╱$╱ // 0x2ce7 @0x7
0x2ce0…2d08 at0008 = ╱ec╱,╱ // 0x2ce8 @0x8
0x2ce0…2d08 at0009 = ╱38╱8╱ // 0x2ce9 @0x9
0x2ce0…2d08 at000a = ╱fe00008004╱ // 0x2cea @0xa
0x2ce0…2d08 at000f = ╱f0╱:╱ // 0x2cef @0xf
0x2ce0…2d08 at0010 = ╱44╱D╱ // 0x2cf0 @0x10
0x2ce0…2d08 at0011 = ╱49╱I╱ // 0x2cf1 @0x11
0x2ce0…2d08 at0012 = ╱56╱V╱ // 0x2cf2 @0x12
0x2ce0…2d08 at0013 = ╱4e╱N╱ // 0x2cf3 @0x13
0x2ce0…2d08 at0014 = ╱52╱R╱ // 0x2cf4 @0x14
0x2ce0…2d08 at0015 = ╱ec╱,╱ // 0x2cf5 @0x15
0x2ce0…2d08 at0016 = ╱44╱D╱ // 0x2cf6 @0x16
0x2ce0…2d08 at0017 = ╱49╱I╱ // 0x2cf7 @0x17
0x2ce0…2d08 at0018 = ╱56╱V╱ // 0x2cf8 @0x18
0x2ce0…2d08 at0019 = ╱44╱D╱ // 0x2cf9 @0x19
0x2ce0…2d08 at001a = ╱4e╱N╱ // 0x2cfa @0x1a
0x2ce0…2d08 at001b = ╱52╱R╱ // 0x2cfb @0x1b
0x2ce0…2d08 at001c = ╱ec╱,╱ // 0x2cfc @0x1c
0x2ce0…2d08 at001d = ╱44╱D╱ // 0x2cfd @0x1d
0x2ce0…2d08 at001e = ╱49╱I╱ // 0x2cfe @0x1e
0x2ce0…2d08 at001f = ╱46╱F╱ // 0x2cff @0x1f
0x2ce0…2d08 at0020 = ╱4e╱N╱ // 0x2d00 @0x20
0x2ce0…2d08 at0021 = ╱52╱R╱ // 0x2d01 @0x21
0x2ce0…2d08 at0022 = ╱ec╱,╱ // 0x2d02 @0x22
0x2ce0…2d08 at0023 = ╱44╱D╱ // 0x2d03 @0x23
0x2ce0…2d08 at0024 = ╱54╱T╱ // 0x2d04 @0x24
0x2ce0…2d08 at0025 = ╱41╱A╱ // 0x2d05 @0x25
0x2ce0…2d08 at0026 = ╱4c╱L╱ // 0x2d06 @0x26
0x2ce0…2d08 at0027 = EOL // 0x2d07 @0x27
0x2ce0…2d08 }
0x2d08…2d20 ba77 5220 EXEC FEJL(W,5,K1$)
0x2d08…2d20 LineComalBin {
0x2d08…2d20 ptr = 0xba77 // 0x2d08 @0x0
0x2d08…2d20 lno = 0x1464 // 0x2d0a @0x2
0x2d08…2d20 at0004 = ╱9d╱ EXEC ╱ // 0x2d0c @0x4
0x2d08…2d20 at0005 = ╱46╱F╱ // 0x2d0d @0x5
0x2d08…2d20 at0006 = ╱45╱E╱ // 0x2d0e @0x6
0x2d08…2d20 at0007 = ╱4a╱J╱ // 0x2d0f @0x7
0x2d08…2d20 at0008 = ╱4c╱L╱ // 0x2d10 @0x8
0x2d08…2d20 at0009 = ╱ed╱(╱ // 0x2d11 @0x9
0x2d08…2d20 at000a = ╱57╱W╱ // 0x2d12 @0xa
0x2d08…2d20 at000b = ╱ec╱,╱ // 0x2d13 @0xb
0x2d08…2d20 at000c = ╱35╱5╱ // 0x2d14 @0xc
0x2d08…2d20 at000d = ╱fe0000a003╱ // 0x2d15 @0xd
0x2d08…2d20 at0012 = ╱ec╱,╱ // 0x2d1a @0x12
0x2d08…2d20 at0013 = ╱4b╱K╱ // 0x2d1b @0x13
0x2d08…2d20 at0014 = ╱31╱1╱ // 0x2d1c @0x14
0x2d08…2d20 at0015 = ╱ef╱$╱ // 0x2d1d @0x15
0x2d08…2d20 at0016 = ╱ee╱)╱ // 0x2d1e @0x16
0x2d08…2d20 at0017 = EOL // 0x2d1f @0x17
0x2d08…2d20 }
0x2d20…2d31 ba88 5230 GET K1$,W:KRTAL
0x2d20…2d31 LineComalBin {
0x2d20…2d31 ptr = 0xba88 // 0x2d20 @0x0
0x2d20…2d31 lno = 0x146e // 0x2d22 @0x2
0x2d20…2d31 at0004 = ╱a9╱ GET ╱ // 0x2d24 @0x4
0x2d20…2d31 at0005 = ╱4b╱K╱ // 0x2d25 @0x5
0x2d20…2d31 at0006 = ╱31╱1╱ // 0x2d26 @0x6
0x2d20…2d31 at0007 = ╱ef╱$╱ // 0x2d27 @0x7
0x2d20…2d31 at0008 = ╱ec╱,╱ // 0x2d28 @0x8
0x2d20…2d31 at0009 = ╱57╱W╱ // 0x2d29 @0x9
0x2d20…2d31 at000a = ╱f0╱:╱ // 0x2d2a @0xa
0x2d20…2d31 at000b = ╱4b╱K╱ // 0x2d2b @0xb
0x2d20…2d31 at000c = ╱52╱R╱ // 0x2d2c @0xc
0x2d20…2d31 at000d = ╱54╱T╱ // 0x2d2d @0xd
0x2d20…2d31 at000e = ╱41╱A╱ // 0x2d2e @0xe
0x2d20…2d31 at000f = ╱4c╱L╱ // 0x2d2f @0xf
0x2d20…2d31 at0010 = EOL // 0x2d30 @0x10
0x2d20…2d31 }
0x2d31…2d49 baa0 5240 EXEC FEJL(W,6,K1$)
0x2d31…2d49 LineComalBin {
0x2d31…2d49 ptr = 0xbaa0 // 0x2d31 @0x0
0x2d31…2d49 lno = 0x1478 // 0x2d33 @0x2
0x2d31…2d49 at0004 = ╱9d╱ EXEC ╱ // 0x2d35 @0x4
0x2d31…2d49 at0005 = ╱46╱F╱ // 0x2d36 @0x5
0x2d31…2d49 at0006 = ╱45╱E╱ // 0x2d37 @0x6
0x2d31…2d49 at0007 = ╱4a╱J╱ // 0x2d38 @0x7
0x2d31…2d49 at0008 = ╱4c╱L╱ // 0x2d39 @0x8
0x2d31…2d49 at0009 = ╱ed╱(╱ // 0x2d3a @0x9
0x2d31…2d49 at000a = ╱57╱W╱ // 0x2d3b @0xa
0x2d31…2d49 at000b = ╱ec╱,╱ // 0x2d3c @0xb
0x2d31…2d49 at000c = ╱36╱6╱ // 0x2d3d @0xc
0x2d31…2d49 at000d = ╱fe0000c003╱ // 0x2d3e @0xd
0x2d31…2d49 at0012 = ╱ec╱,╱ // 0x2d43 @0x12
0x2d31…2d49 at0013 = ╱4b╱K╱ // 0x2d44 @0x13
0x2d31…2d49 at0014 = ╱31╱1╱ // 0x2d45 @0x14
0x2d31…2d49 at0015 = ╱ef╱$╱ // 0x2d46 @0x15
0x2d31…2d49 at0016 = ╱ee╱)╱ // 0x2d47 @0x16
0x2d31…2d49 at0017 = EOL // 0x2d48 @0x17
0x2d31…2d49 }
0x2d49…2d5d bab4 5250 GET K1$,10:N$
0x2d49…2d5d LineComalBin {
0x2d49…2d5d ptr = 0xbab4 // 0x2d49 @0x0
0x2d49…2d5d lno = 0x1482 // 0x2d4b @0x2
0x2d49…2d5d at0004 = ╱a9╱ GET ╱ // 0x2d4d @0x4
0x2d49…2d5d at0005 = ╱4b╱K╱ // 0x2d4e @0x5
0x2d49…2d5d at0006 = ╱31╱1╱ // 0x2d4f @0x6
0x2d49…2d5d at0007 = ╱ef╱$╱ // 0x2d50 @0x7
0x2d49…2d5d at0008 = ╱ec╱,╱ // 0x2d51 @0x8
0x2d49…2d5d at0009 = ╱31╱1╱ // 0x2d52 @0x9
0x2d49…2d5d at000a = ╱30╱0╱ // 0x2d53 @0xa
0x2d49…2d5d at000b = ╱fe0000a004╱ // 0x2d54 @0xb
0x2d49…2d5d at0010 = ╱f0╱:╱ // 0x2d59 @0x10
0x2d49…2d5d at0011 = ╱4e╱N╱ // 0x2d5a @0x11
0x2d49…2d5d at0012 = ╱ef╱$╱ // 0x2d5b @0x12
0x2d49…2d5d at0013 = EOL // 0x2d5c @0x13
0x2d49…2d5d }
0x2d5d…2d75 bacc 5260 EXEC FEJL(W,7,K1$)
0x2d5d…2d75 LineComalBin {
0x2d5d…2d75 ptr = 0xbacc // 0x2d5d @0x0
0x2d5d…2d75 lno = 0x148c // 0x2d5f @0x2
0x2d5d…2d75 at0004 = ╱9d╱ EXEC ╱ // 0x2d61 @0x4
0x2d5d…2d75 at0005 = ╱46╱F╱ // 0x2d62 @0x5
0x2d5d…2d75 at0006 = ╱45╱E╱ // 0x2d63 @0x6
0x2d5d…2d75 at0007 = ╱4a╱J╱ // 0x2d64 @0x7
0x2d5d…2d75 at0008 = ╱4c╱L╱ // 0x2d65 @0x8
0x2d5d…2d75 at0009 = ╱ed╱(╱ // 0x2d66 @0x9
0x2d5d…2d75 at000a = ╱57╱W╱ // 0x2d67 @0xa
0x2d5d…2d75 at000b = ╱ec╱,╱ // 0x2d68 @0xb
0x2d5d…2d75 at000c = ╱37╱7╱ // 0x2d69 @0xc
0x2d5d…2d75 at000d = ╱fe0000e003╱ // 0x2d6a @0xd
0x2d5d…2d75 at0012 = ╱ec╱,╱ // 0x2d6f @0x12
0x2d5d…2d75 at0013 = ╱4b╱K╱ // 0x2d70 @0x13
0x2d5d…2d75 at0014 = ╱31╱1╱ // 0x2d71 @0x14
0x2d5d…2d75 at0015 = ╱ef╱$╱ // 0x2d72 @0x15
0x2d5d…2d75 at0016 = ╱ee╱)╱ // 0x2d73 @0x16
0x2d5d…2d75 at0017 = EOL // 0x2d74 @0x17
0x2d5d…2d75 }
0x2d75…2d8a bae1 5270 GET K1$,11:K2$
0x2d75…2d8a LineComalBin {
0x2d75…2d8a ptr = 0xbae1 // 0x2d75 @0x0
0x2d75…2d8a lno = 0x1496 // 0x2d77 @0x2
0x2d75…2d8a at0004 = ╱a9╱ GET ╱ // 0x2d79 @0x4
0x2d75…2d8a at0005 = ╱4b╱K╱ // 0x2d7a @0x5
0x2d75…2d8a at0006 = ╱31╱1╱ // 0x2d7b @0x6
0x2d75…2d8a at0007 = ╱ef╱$╱ // 0x2d7c @0x7
0x2d75…2d8a at0008 = ╱ec╱,╱ // 0x2d7d @0x8
0x2d75…2d8a at0009 = ╱31╱1╱ // 0x2d7e @0x9
0x2d75…2d8a at000a = ╱31╱1╱ // 0x2d7f @0xa
0x2d75…2d8a at000b = ╱fe0000b004╱ // 0x2d80 @0xb
0x2d75…2d8a at0010 = ╱f0╱:╱ // 0x2d85 @0x10
0x2d75…2d8a at0011 = ╱4b╱K╱ // 0x2d86 @0x11
0x2d75…2d8a at0012 = ╱32╱2╱ // 0x2d87 @0x12
0x2d75…2d8a at0013 = ╱ef╱$╱ // 0x2d88 @0x13
0x2d75…2d8a at0014 = EOL // 0x2d89 @0x14
0x2d75…2d8a }
0x2d8a…2da2 baf9 5280 EXEC FEJL(W,8,K1$)
0x2d8a…2da2 LineComalBin {
0x2d8a…2da2 ptr = 0xbaf9 // 0x2d8a @0x0
0x2d8a…2da2 lno = 0x14a0 // 0x2d8c @0x2
0x2d8a…2da2 at0004 = ╱9d╱ EXEC ╱ // 0x2d8e @0x4
0x2d8a…2da2 at0005 = ╱46╱F╱ // 0x2d8f @0x5
0x2d8a…2da2 at0006 = ╱45╱E╱ // 0x2d90 @0x6
0x2d8a…2da2 at0007 = ╱4a╱J╱ // 0x2d91 @0x7
0x2d8a…2da2 at0008 = ╱4c╱L╱ // 0x2d92 @0x8
0x2d8a…2da2 at0009 = ╱ed╱(╱ // 0x2d93 @0x9
0x2d8a…2da2 at000a = ╱57╱W╱ // 0x2d94 @0xa
0x2d8a…2da2 at000b = ╱ec╱,╱ // 0x2d95 @0xb
0x2d8a…2da2 at000c = ╱38╱8╱ // 0x2d96 @0xc
0x2d8a…2da2 at000d = ╱fe00008004╱ // 0x2d97 @0xd
0x2d8a…2da2 at0012 = ╱ec╱,╱ // 0x2d9c @0x12
0x2d8a…2da2 at0013 = ╱4b╱K╱ // 0x2d9d @0x13
0x2d8a…2da2 at0014 = ╱31╱1╱ // 0x2d9e @0x14
0x2d8a…2da2 at0015 = ╱ef╱$╱ // 0x2d9f @0x15
0x2d8a…2da2 at0016 = ╱ee╱)╱ // 0x2da0 @0x16
0x2d8a…2da2 at0017 = EOL // 0x2da1 @0x17
0x2d8a…2da2 }
0x2da2…2db1 bb08 5290 GET K1$,D:K3$
0x2da2…2db1 LineComalBin {
0x2da2…2db1 ptr = 0xbb08 // 0x2da2 @0x0
0x2da2…2db1 lno = 0x14aa // 0x2da4 @0x2
0x2da2…2db1 at0004 = ╱a9╱ GET ╱ // 0x2da6 @0x4
0x2da2…2db1 at0005 = ╱4b╱K╱ // 0x2da7 @0x5
0x2da2…2db1 at0006 = ╱31╱1╱ // 0x2da8 @0x6
0x2da2…2db1 at0007 = ╱ef╱$╱ // 0x2da9 @0x7
0x2da2…2db1 at0008 = ╱ec╱,╱ // 0x2daa @0x8
0x2da2…2db1 at0009 = ╱44╱D╱ // 0x2dab @0x9
0x2da2…2db1 at000a = ╱f0╱:╱ // 0x2dac @0xa
0x2da2…2db1 at000b = ╱4b╱K╱ // 0x2dad @0xb
0x2da2…2db1 at000c = ╱33╱3╱ // 0x2dae @0xc
0x2da2…2db1 at000d = ╱ef╱$╱ // 0x2daf @0xd
0x2da2…2db1 at000e = EOL // 0x2db0 @0xe
0x2da2…2db1 }
0x2db1…2dc4 bb1b 5300 EXEC FEJL(W,W,K1$)
0x2db1…2dc4 LineComalBin {
0x2db1…2dc4 ptr = 0xbb1b // 0x2db1 @0x0
0x2db1…2dc4 lno = 0x14b4 // 0x2db3 @0x2
0x2db1…2dc4 at0004 = ╱9d╱ EXEC ╱ // 0x2db5 @0x4
0x2db1…2dc4 at0005 = ╱46╱F╱ // 0x2db6 @0x5
0x2db1…2dc4 at0006 = ╱45╱E╱ // 0x2db7 @0x6
0x2db1…2dc4 at0007 = ╱4a╱J╱ // 0x2db8 @0x7
0x2db1…2dc4 at0008 = ╱4c╱L╱ // 0x2db9 @0x8
0x2db1…2dc4 at0009 = ╱ed╱(╱ // 0x2dba @0x9
0x2db1…2dc4 at000a = ╱57╱W╱ // 0x2dbb @0xa
0x2db1…2dc4 at000b = ╱ec╱,╱ // 0x2dbc @0xb
0x2db1…2dc4 at000c = ╱57╱W╱ // 0x2dbd @0xc
0x2db1…2dc4 at000d = ╱ec╱,╱ // 0x2dbe @0xd
0x2db1…2dc4 at000e = ╱4b╱K╱ // 0x2dbf @0xe
0x2db1…2dc4 at000f = ╱31╱1╱ // 0x2dc0 @0xf
0x2db1…2dc4 at0010 = ╱ef╱$╱ // 0x2dc1 @0x10
0x2db1…2dc4 at0011 = ╱ee╱)╱ // 0x2dc2 @0x11
0x2db1…2dc4 at0012 = EOL // 0x2dc3 @0x12
0x2db1…2dc4 }
0x2dc4…2dd9 bb30 5310 GET K1$,13:K4$
0x2dc4…2dd9 LineComalBin {
0x2dc4…2dd9 ptr = 0xbb30 // 0x2dc4 @0x0
0x2dc4…2dd9 lno = 0x14be // 0x2dc6 @0x2
0x2dc4…2dd9 at0004 = ╱a9╱ GET ╱ // 0x2dc8 @0x4
0x2dc4…2dd9 at0005 = ╱4b╱K╱ // 0x2dc9 @0x5
0x2dc4…2dd9 at0006 = ╱31╱1╱ // 0x2dca @0x6
0x2dc4…2dd9 at0007 = ╱ef╱$╱ // 0x2dcb @0x7
0x2dc4…2dd9 at0008 = ╱ec╱,╱ // 0x2dcc @0x8
0x2dc4…2dd9 at0009 = ╱31╱1╱ // 0x2dcd @0x9
0x2dc4…2dd9 at000a = ╱33╱3╱ // 0x2dce @0xa
0x2dc4…2dd9 at000b = ╱fe0000d004╱ // 0x2dcf @0xb
0x2dc4…2dd9 at0010 = ╱f0╱:╱ // 0x2dd4 @0x10
0x2dc4…2dd9 at0011 = ╱4b╱K╱ // 0x2dd5 @0x11
0x2dc4…2dd9 at0012 = ╱34╱4╱ // 0x2dd6 @0x12
0x2dc4…2dd9 at0013 = ╱ef╱$╱ // 0x2dd7 @0x13
0x2dc4…2dd9 at0014 = EOL // 0x2dd8 @0x14
0x2dc4…2dd9 }
0x2dd9…2df2 bb49 5320 EXEC FEJL(W,10,K1$)
0x2dd9…2df2 LineComalBin {
0x2dd9…2df2 ptr = 0xbb49 // 0x2dd9 @0x0
0x2dd9…2df2 lno = 0x14c8 // 0x2ddb @0x2
0x2dd9…2df2 at0004 = ╱9d╱ EXEC ╱ // 0x2ddd @0x4
0x2dd9…2df2 at0005 = ╱46╱F╱ // 0x2dde @0x5
0x2dd9…2df2 at0006 = ╱45╱E╱ // 0x2ddf @0x6
0x2dd9…2df2 at0007 = ╱4a╱J╱ // 0x2de0 @0x7
0x2dd9…2df2 at0008 = ╱4c╱L╱ // 0x2de1 @0x8
0x2dd9…2df2 at0009 = ╱ed╱(╱ // 0x2de2 @0x9
0x2dd9…2df2 at000a = ╱57╱W╱ // 0x2de3 @0xa
0x2dd9…2df2 at000b = ╱ec╱,╱ // 0x2de4 @0xb
0x2dd9…2df2 at000c = ╱31╱1╱ // 0x2de5 @0xc
0x2dd9…2df2 at000d = ╱30╱0╱ // 0x2de6 @0xd
0x2dd9…2df2 at000e = ╱fe0000a004╱ // 0x2de7 @0xe
0x2dd9…2df2 at0013 = ╱ec╱,╱ // 0x2dec @0x13
0x2dd9…2df2 at0014 = ╱4b╱K╱ // 0x2ded @0x14
0x2dd9…2df2 at0015 = ╱31╱1╱ // 0x2dee @0x15
0x2dd9…2df2 at0016 = ╱ef╱$╱ // 0x2def @0x16
0x2dd9…2df2 at0017 = ╱ee╱)╱ // 0x2df0 @0x17
0x2dd9…2df2 at0018 = EOL // 0x2df1 @0x18
0x2dd9…2df2 }
0x2df2…2e07 bb5e 5330 GET K1$,15:K5$
0x2df2…2e07 LineComalBin {
0x2df2…2e07 ptr = 0xbb5e // 0x2df2 @0x0
0x2df2…2e07 lno = 0x14d2 // 0x2df4 @0x2
0x2df2…2e07 at0004 = ╱a9╱ GET ╱ // 0x2df6 @0x4
0x2df2…2e07 at0005 = ╱4b╱K╱ // 0x2df7 @0x5
0x2df2…2e07 at0006 = ╱31╱1╱ // 0x2df8 @0x6
0x2df2…2e07 at0007 = ╱ef╱$╱ // 0x2df9 @0x7
0x2df2…2e07 at0008 = ╱ec╱,╱ // 0x2dfa @0x8
0x2df2…2e07 at0009 = ╱31╱1╱ // 0x2dfb @0x9
0x2df2…2e07 at000a = ╱35╱5╱ // 0x2dfc @0xa
0x2df2…2e07 at000b = ╱fe0000f004╱ // 0x2dfd @0xb
0x2df2…2e07 at0010 = ╱f0╱:╱ // 0x2e02 @0x10
0x2df2…2e07 at0011 = ╱4b╱K╱ // 0x2e03 @0x11
0x2df2…2e07 at0012 = ╱35╱5╱ // 0x2e04 @0x12
0x2df2…2e07 at0013 = ╱ef╱$╱ // 0x2e05 @0x13
0x2df2…2e07 at0014 = EOL // 0x2e06 @0x14
0x2df2…2e07 }
0x2e07…2e20 bb77 5340 EXEC FEJL(W,11,K1$)
0x2e07…2e20 LineComalBin {
0x2e07…2e20 ptr = 0xbb77 // 0x2e07 @0x0
0x2e07…2e20 lno = 0x14dc // 0x2e09 @0x2
0x2e07…2e20 at0004 = ╱9d╱ EXEC ╱ // 0x2e0b @0x4
0x2e07…2e20 at0005 = ╱46╱F╱ // 0x2e0c @0x5
0x2e07…2e20 at0006 = ╱45╱E╱ // 0x2e0d @0x6
0x2e07…2e20 at0007 = ╱4a╱J╱ // 0x2e0e @0x7
0x2e07…2e20 at0008 = ╱4c╱L╱ // 0x2e0f @0x8
0x2e07…2e20 at0009 = ╱ed╱(╱ // 0x2e10 @0x9
0x2e07…2e20 at000a = ╱57╱W╱ // 0x2e11 @0xa
0x2e07…2e20 at000b = ╱ec╱,╱ // 0x2e12 @0xb
0x2e07…2e20 at000c = ╱31╱1╱ // 0x2e13 @0xc
0x2e07…2e20 at000d = ╱31╱1╱ // 0x2e14 @0xd
0x2e07…2e20 at000e = ╱fe0000b004╱ // 0x2e15 @0xe
0x2e07…2e20 at0013 = ╱ec╱,╱ // 0x2e1a @0x13
0x2e07…2e20 at0014 = ╱4b╱K╱ // 0x2e1b @0x14
0x2e07…2e20 at0015 = ╱31╱1╱ // 0x2e1c @0x15
0x2e07…2e20 at0016 = ╱ef╱$╱ // 0x2e1d @0x16
0x2e07…2e20 at0017 = ╱ee╱)╱ // 0x2e1e @0x17
0x2e07…2e20 at0018 = EOL // 0x2e1f @0x18
0x2e07…2e20 }
0x2e20…2e35 bb8c 5350 GET K1$,16:K6$
0x2e20…2e35 LineComalBin {
0x2e20…2e35 ptr = 0xbb8c // 0x2e20 @0x0
0x2e20…2e35 lno = 0x14e6 // 0x2e22 @0x2
0x2e20…2e35 at0004 = ╱a9╱ GET ╱ // 0x2e24 @0x4
0x2e20…2e35 at0005 = ╱4b╱K╱ // 0x2e25 @0x5
0x2e20…2e35 at0006 = ╱31╱1╱ // 0x2e26 @0x6
0x2e20…2e35 at0007 = ╱ef╱$╱ // 0x2e27 @0x7
0x2e20…2e35 at0008 = ╱ec╱,╱ // 0x2e28 @0x8
0x2e20…2e35 at0009 = ╱31╱1╱ // 0x2e29 @0x9
0x2e20…2e35 at000a = ╱36╱6╱ // 0x2e2a @0xa
0x2e20…2e35 at000b = ╱fe00008005╱ // 0x2e2b @0xb
0x2e20…2e35 at0010 = ╱f0╱:╱ // 0x2e30 @0x10
0x2e20…2e35 at0011 = ╱4b╱K╱ // 0x2e31 @0x11
0x2e20…2e35 at0012 = ╱36╱6╱ // 0x2e32 @0x12
0x2e20…2e35 at0013 = ╱ef╱$╱ // 0x2e33 @0x13
0x2e20…2e35 at0014 = EOL // 0x2e34 @0x14
0x2e20…2e35 }
0x2e35…2e48 bb9f 5360 EXEC FEJL(W,D,K1$)
0x2e35…2e48 LineComalBin {
0x2e35…2e48 ptr = 0xbb9f // 0x2e35 @0x0
0x2e35…2e48 lno = 0x14f0 // 0x2e37 @0x2
0x2e35…2e48 at0004 = ╱9d╱ EXEC ╱ // 0x2e39 @0x4
0x2e35…2e48 at0005 = ╱46╱F╱ // 0x2e3a @0x5
0x2e35…2e48 at0006 = ╱45╱E╱ // 0x2e3b @0x6
0x2e35…2e48 at0007 = ╱4a╱J╱ // 0x2e3c @0x7
0x2e35…2e48 at0008 = ╱4c╱L╱ // 0x2e3d @0x8
0x2e35…2e48 at0009 = ╱ed╱(╱ // 0x2e3e @0x9
0x2e35…2e48 at000a = ╱57╱W╱ // 0x2e3f @0xa
0x2e35…2e48 at000b = ╱ec╱,╱ // 0x2e40 @0xb
0x2e35…2e48 at000c = ╱44╱D╱ // 0x2e41 @0xc
0x2e35…2e48 at000d = ╱ec╱,╱ // 0x2e42 @0xd
0x2e35…2e48 at000e = ╱4b╱K╱ // 0x2e43 @0xe
0x2e35…2e48 at000f = ╱31╱1╱ // 0x2e44 @0xf
0x2e35…2e48 at0010 = ╱ef╱$╱ // 0x2e45 @0x10
0x2e35…2e48 at0011 = ╱ee╱)╱ // 0x2e46 @0x11
0x2e35…2e48 at0012 = EOL // 0x2e47 @0x12
0x2e35…2e48 }
0x2e48…2e57 bbae 5370 GET K1$,F:K7$
0x2e48…2e57 LineComalBin {
0x2e48…2e57 ptr = 0xbbae // 0x2e48 @0x0
0x2e48…2e57 lno = 0x14fa // 0x2e4a @0x2
0x2e48…2e57 at0004 = ╱a9╱ GET ╱ // 0x2e4c @0x4
0x2e48…2e57 at0005 = ╱4b╱K╱ // 0x2e4d @0x5
0x2e48…2e57 at0006 = ╱31╱1╱ // 0x2e4e @0x6
0x2e48…2e57 at0007 = ╱ef╱$╱ // 0x2e4f @0x7
0x2e48…2e57 at0008 = ╱ec╱,╱ // 0x2e50 @0x8
0x2e48…2e57 at0009 = ╱46╱F╱ // 0x2e51 @0x9
0x2e48…2e57 at000a = ╱f0╱:╱ // 0x2e52 @0xa
0x2e48…2e57 at000b = ╱4b╱K╱ // 0x2e53 @0xb
0x2e48…2e57 at000c = ╱37╱7╱ // 0x2e54 @0xc
0x2e48…2e57 at000d = ╱ef╱$╱ // 0x2e55 @0xd
0x2e48…2e57 at000e = EOL // 0x2e56 @0xe
0x2e48…2e57 }
0x2e57…2e70 bbc7 5380 EXEC FEJL(W,13,K1$)
0x2e57…2e70 LineComalBin {
0x2e57…2e70 ptr = 0xbbc7 // 0x2e57 @0x0
0x2e57…2e70 lno = 0x1504 // 0x2e59 @0x2
0x2e57…2e70 at0004 = ╱9d╱ EXEC ╱ // 0x2e5b @0x4
0x2e57…2e70 at0005 = ╱46╱F╱ // 0x2e5c @0x5
0x2e57…2e70 at0006 = ╱45╱E╱ // 0x2e5d @0x6
0x2e57…2e70 at0007 = ╱4a╱J╱ // 0x2e5e @0x7
0x2e57…2e70 at0008 = ╱4c╱L╱ // 0x2e5f @0x8
0x2e57…2e70 at0009 = ╱ed╱(╱ // 0x2e60 @0x9
0x2e57…2e70 at000a = ╱57╱W╱ // 0x2e61 @0xa
0x2e57…2e70 at000b = ╱ec╱,╱ // 0x2e62 @0xb
0x2e57…2e70 at000c = ╱31╱1╱ // 0x2e63 @0xc
0x2e57…2e70 at000d = ╱33╱3╱ // 0x2e64 @0xd
0x2e57…2e70 at000e = ╱fe0000d004╱ // 0x2e65 @0xe
0x2e57…2e70 at0013 = ╱ec╱,╱ // 0x2e6a @0x13
0x2e57…2e70 at0014 = ╱4b╱K╱ // 0x2e6b @0x14
0x2e57…2e70 at0015 = ╱31╱1╱ // 0x2e6c @0x15
0x2e57…2e70 at0016 = ╱ef╱$╱ // 0x2e6d @0x16
0x2e57…2e70 at0017 = ╱ee╱)╱ // 0x2e6e @0x17
0x2e57…2e70 at0018 = EOL // 0x2e6f @0x18
0x2e57…2e70 }
0x2e70…2e7f bbd6 5390 GET K1$,U:K8$
0x2e70…2e7f LineComalBin {
0x2e70…2e7f ptr = 0xbbd6 // 0x2e70 @0x0
0x2e70…2e7f lno = 0x150e // 0x2e72 @0x2
0x2e70…2e7f at0004 = ╱a9╱ GET ╱ // 0x2e74 @0x4
0x2e70…2e7f at0005 = ╱4b╱K╱ // 0x2e75 @0x5
0x2e70…2e7f at0006 = ╱31╱1╱ // 0x2e76 @0x6
0x2e70…2e7f at0007 = ╱ef╱$╱ // 0x2e77 @0x7
0x2e70…2e7f at0008 = ╱ec╱,╱ // 0x2e78 @0x8
0x2e70…2e7f at0009 = ╱55╱U╱ // 0x2e79 @0x9
0x2e70…2e7f at000a = ╱f0╱:╱ // 0x2e7a @0xa
0x2e70…2e7f at000b = ╱4b╱K╱ // 0x2e7b @0xb
0x2e70…2e7f at000c = ╱38╱8╱ // 0x2e7c @0xc
0x2e70…2e7f at000d = ╱ef╱$╱ // 0x2e7d @0xd
0x2e70…2e7f at000e = EOL // 0x2e7e @0xe
0x2e70…2e7f }
0x2e7f…2e92 bbe9 5400 EXEC FEJL(W,M,K1$)
0x2e7f…2e92 LineComalBin {
0x2e7f…2e92 ptr = 0xbbe9 // 0x2e7f @0x0
0x2e7f…2e92 lno = 0x1518 // 0x2e81 @0x2
0x2e7f…2e92 at0004 = ╱9d╱ EXEC ╱ // 0x2e83 @0x4
0x2e7f…2e92 at0005 = ╱46╱F╱ // 0x2e84 @0x5
0x2e7f…2e92 at0006 = ╱45╱E╱ // 0x2e85 @0x6
0x2e7f…2e92 at0007 = ╱4a╱J╱ // 0x2e86 @0x7
0x2e7f…2e92 at0008 = ╱4c╱L╱ // 0x2e87 @0x8
0x2e7f…2e92 at0009 = ╱ed╱(╱ // 0x2e88 @0x9
0x2e7f…2e92 at000a = ╱57╱W╱ // 0x2e89 @0xa
0x2e7f…2e92 at000b = ╱ec╱,╱ // 0x2e8a @0xb
0x2e7f…2e92 at000c = ╱4d╱M╱ // 0x2e8b @0xc
0x2e7f…2e92 at000d = ╱ec╱,╱ // 0x2e8c @0xd
0x2e7f…2e92 at000e = ╱4b╱K╱ // 0x2e8d @0xe
0x2e7f…2e92 at000f = ╱31╱1╱ // 0x2e8e @0xf
0x2e7f…2e92 at0010 = ╱ef╱$╱ // 0x2e8f @0x10
0x2e7f…2e92 at0011 = ╱ee╱)╱ // 0x2e90 @0x11
0x2e7f…2e92 at0012 = EOL // 0x2e91 @0x12
0x2e7f…2e92 }
0x2e92…2ea7 bbfe 5410 GET K1$,26:K9$
0x2e92…2ea7 LineComalBin {
0x2e92…2ea7 ptr = 0xbbfe // 0x2e92 @0x0
0x2e92…2ea7 lno = 0x1522 // 0x2e94 @0x2
0x2e92…2ea7 at0004 = ╱a9╱ GET ╱ // 0x2e96 @0x4
0x2e92…2ea7 at0005 = ╱4b╱K╱ // 0x2e97 @0x5
0x2e92…2ea7 at0006 = ╱31╱1╱ // 0x2e98 @0x6
0x2e92…2ea7 at0007 = ╱ef╱$╱ // 0x2e99 @0x7
0x2e92…2ea7 at0008 = ╱ec╱,╱ // 0x2e9a @0x8
0x2e92…2ea7 at0009 = ╱32╱2╱ // 0x2e9b @0x9
0x2e92…2ea7 at000a = ╱36╱6╱ // 0x2e9c @0xa
0x2e92…2ea7 at000b = ╱fe0000d005╱ // 0x2e9d @0xb
0x2e92…2ea7 at0010 = ╱f0╱:╱ // 0x2ea2 @0x10
0x2e92…2ea7 at0011 = ╱4b╱K╱ // 0x2ea3 @0x11
0x2e92…2ea7 at0012 = ╱39╱9╱ // 0x2ea4 @0x12
0x2e92…2ea7 at0013 = ╱ef╱$╱ // 0x2ea5 @0x13
0x2e92…2ea7 at0014 = EOL // 0x2ea6 @0x14
0x2e92…2ea7 }
0x2ea7…2ec0 bc17 5420 EXEC FEJL(W,15,K1$)
0x2ea7…2ec0 LineComalBin {
0x2ea7…2ec0 ptr = 0xbc17 // 0x2ea7 @0x0
0x2ea7…2ec0 lno = 0x152c // 0x2ea9 @0x2
0x2ea7…2ec0 at0004 = ╱9d╱ EXEC ╱ // 0x2eab @0x4
0x2ea7…2ec0 at0005 = ╱46╱F╱ // 0x2eac @0x5
0x2ea7…2ec0 at0006 = ╱45╱E╱ // 0x2ead @0x6
0x2ea7…2ec0 at0007 = ╱4a╱J╱ // 0x2eae @0x7
0x2ea7…2ec0 at0008 = ╱4c╱L╱ // 0x2eaf @0x8
0x2ea7…2ec0 at0009 = ╱ed╱(╱ // 0x2eb0 @0x9
0x2ea7…2ec0 at000a = ╱57╱W╱ // 0x2eb1 @0xa
0x2ea7…2ec0 at000b = ╱ec╱,╱ // 0x2eb2 @0xb
0x2ea7…2ec0 at000c = ╱31╱1╱ // 0x2eb3 @0xc
0x2ea7…2ec0 at000d = ╱35╱5╱ // 0x2eb4 @0xd
0x2ea7…2ec0 at000e = ╱fe0000f004╱ // 0x2eb5 @0xe
0x2ea7…2ec0 at0013 = ╱ec╱,╱ // 0x2eba @0x13
0x2ea7…2ec0 at0014 = ╱4b╱K╱ // 0x2ebb @0x14
0x2ea7…2ec0 at0015 = ╱31╱1╱ // 0x2ebc @0x15
0x2ea7…2ec0 at0016 = ╱ef╱$╱ // 0x2ebd @0x16
0x2ea7…2ec0 at0017 = ╱ee╱)╱ // 0x2ebe @0x17
0x2ea7…2ec0 at0018 = EOL // 0x2ebf @0x18
0x2ea7…2ec0 }
0x2ec0…2ed6 bc2d 5430 GET K1$,27:K10$
0x2ec0…2ed6 LineComalBin {
0x2ec0…2ed6 ptr = 0xbc2d // 0x2ec0 @0x0
0x2ec0…2ed6 lno = 0x1536 // 0x2ec2 @0x2
0x2ec0…2ed6 at0004 = ╱a9╱ GET ╱ // 0x2ec4 @0x4
0x2ec0…2ed6 at0005 = ╱4b╱K╱ // 0x2ec5 @0x5
0x2ec0…2ed6 at0006 = ╱31╱1╱ // 0x2ec6 @0x6
0x2ec0…2ed6 at0007 = ╱ef╱$╱ // 0x2ec7 @0x7
0x2ec0…2ed6 at0008 = ╱ec╱,╱ // 0x2ec8 @0x8
0x2ec0…2ed6 at0009 = ╱32╱2╱ // 0x2ec9 @0x9
0x2ec0…2ed6 at000a = ╱37╱7╱ // 0x2eca @0xa
0x2ec0…2ed6 at000b = ╱fe0000d805╱ // 0x2ecb @0xb
0x2ec0…2ed6 at0010 = ╱f0╱:╱ // 0x2ed0 @0x10
0x2ec0…2ed6 at0011 = ╱4b╱K╱ // 0x2ed1 @0x11
0x2ec0…2ed6 at0012 = ╱31╱1╱ // 0x2ed2 @0x12
0x2ec0…2ed6 at0013 = ╱30╱0╱ // 0x2ed3 @0x13
0x2ec0…2ed6 at0014 = ╱ef╱$╱ // 0x2ed4 @0x14
0x2ec0…2ed6 at0015 = EOL // 0x2ed5 @0x15
0x2ec0…2ed6 }
0x2ed6…2eef bc46 5440 EXEC FEJL(W,16,K1$)
0x2ed6…2eef LineComalBin {
0x2ed6…2eef ptr = 0xbc46 // 0x2ed6 @0x0
0x2ed6…2eef lno = 0x1540 // 0x2ed8 @0x2
0x2ed6…2eef at0004 = ╱9d╱ EXEC ╱ // 0x2eda @0x4
0x2ed6…2eef at0005 = ╱46╱F╱ // 0x2edb @0x5
0x2ed6…2eef at0006 = ╱45╱E╱ // 0x2edc @0x6
0x2ed6…2eef at0007 = ╱4a╱J╱ // 0x2edd @0x7
0x2ed6…2eef at0008 = ╱4c╱L╱ // 0x2ede @0x8
0x2ed6…2eef at0009 = ╱ed╱(╱ // 0x2edf @0x9
0x2ed6…2eef at000a = ╱57╱W╱ // 0x2ee0 @0xa
0x2ed6…2eef at000b = ╱ec╱,╱ // 0x2ee1 @0xb
0x2ed6…2eef at000c = ╱31╱1╱ // 0x2ee2 @0xc
0x2ed6…2eef at000d = ╱36╱6╱ // 0x2ee3 @0xd
0x2ed6…2eef at000e = ╱fe00008005╱ // 0x2ee4 @0xe
0x2ed6…2eef at0013 = ╱ec╱,╱ // 0x2ee9 @0x13
0x2ed6…2eef at0014 = ╱4b╱K╱ // 0x2eea @0x14
0x2ed6…2eef at0015 = ╱31╱1╱ // 0x2eeb @0x15
0x2ed6…2eef at0016 = ╱ef╱$╱ // 0x2eec @0x16
0x2ed6…2eef at0017 = ╱ee╱)╱ // 0x2eed @0x17
0x2ed6…2eef at0018 = EOL // 0x2eee @0x18
0x2ed6…2eef }
0x2eef…2f05 bc5c 5450 GET K1$,32:K11$
0x2eef…2f05 LineComalBin {
0x2eef…2f05 ptr = 0xbc5c // 0x2eef @0x0
0x2eef…2f05 lno = 0x154a // 0x2ef1 @0x2
0x2eef…2f05 at0004 = ╱a9╱ GET ╱ // 0x2ef3 @0x4
0x2eef…2f05 at0005 = ╱4b╱K╱ // 0x2ef4 @0x5
0x2eef…2f05 at0006 = ╱31╱1╱ // 0x2ef5 @0x6
0x2eef…2f05 at0007 = ╱ef╱$╱ // 0x2ef6 @0x7
0x2eef…2f05 at0008 = ╱ec╱,╱ // 0x2ef7 @0x8
0x2eef…2f05 at0009 = ╱33╱3╱ // 0x2ef8 @0x9
0x2eef…2f05 at000a = ╱32╱2╱ // 0x2ef9 @0xa
0x2eef…2f05 at000b = ╱fe00008006╱ // 0x2efa @0xb
0x2eef…2f05 at0010 = ╱f0╱:╱ // 0x2eff @0x10
0x2eef…2f05 at0011 = ╱4b╱K╱ // 0x2f00 @0x11
0x2eef…2f05 at0012 = ╱31╱1╱ // 0x2f01 @0x12
0x2eef…2f05 at0013 = ╱31╱1╱ // 0x2f02 @0x13
0x2eef…2f05 at0014 = ╱ef╱$╱ // 0x2f03 @0x14
0x2eef…2f05 at0015 = EOL // 0x2f04 @0x15
0x2eef…2f05 }
0x2f05…2f18 bc6f 5460 EXEC FEJL(W,F,K1$)
0x2f05…2f18 LineComalBin {
0x2f05…2f18 ptr = 0xbc6f // 0x2f05 @0x0
0x2f05…2f18 lno = 0x1554 // 0x2f07 @0x2
0x2f05…2f18 at0004 = ╱9d╱ EXEC ╱ // 0x2f09 @0x4
0x2f05…2f18 at0005 = ╱46╱F╱ // 0x2f0a @0x5
0x2f05…2f18 at0006 = ╱45╱E╱ // 0x2f0b @0x6
0x2f05…2f18 at0007 = ╱4a╱J╱ // 0x2f0c @0x7
0x2f05…2f18 at0008 = ╱4c╱L╱ // 0x2f0d @0x8
0x2f05…2f18 at0009 = ╱ed╱(╱ // 0x2f0e @0x9
0x2f05…2f18 at000a = ╱57╱W╱ // 0x2f0f @0xa
0x2f05…2f18 at000b = ╱ec╱,╱ // 0x2f10 @0xb
0x2f05…2f18 at000c = ╱46╱F╱ // 0x2f11 @0xc
0x2f05…2f18 at000d = ╱ec╱,╱ // 0x2f12 @0xd
0x2f05…2f18 at000e = ╱4b╱K╱ // 0x2f13 @0xe
0x2f05…2f18 at000f = ╱31╱1╱ // 0x2f14 @0xf
0x2f05…2f18 at0010 = ╱ef╱$╱ // 0x2f15 @0x10
0x2f05…2f18 at0011 = ╱ee╱)╱ // 0x2f16 @0x11
0x2f05…2f18 at0012 = EOL // 0x2f17 @0x12
0x2f05…2f18 }
0x2f18…2f2e bc85 5470 GET K1$,33:K12$
0x2f18…2f2e LineComalBin {
0x2f18…2f2e ptr = 0xbc85 // 0x2f18 @0x0
0x2f18…2f2e lno = 0x155e // 0x2f1a @0x2
0x2f18…2f2e at0004 = ╱a9╱ GET ╱ // 0x2f1c @0x4
0x2f18…2f2e at0005 = ╱4b╱K╱ // 0x2f1d @0x5
0x2f18…2f2e at0006 = ╱31╱1╱ // 0x2f1e @0x6
0x2f18…2f2e at0007 = ╱ef╱$╱ // 0x2f1f @0x7
0x2f18…2f2e at0008 = ╱ec╱,╱ // 0x2f20 @0x8
0x2f18…2f2e at0009 = ╱33╱3╱ // 0x2f21 @0x9
0x2f18…2f2e at000a = ╱33╱3╱ // 0x2f22 @0xa
0x2f18…2f2e at000b = ╱fe00008406╱ // 0x2f23 @0xb
0x2f18…2f2e at0010 = ╱f0╱:╱ // 0x2f28 @0x10
0x2f18…2f2e at0011 = ╱4b╱K╱ // 0x2f29 @0x11
0x2f18…2f2e at0012 = ╱31╱1╱ // 0x2f2a @0x12
0x2f18…2f2e at0013 = ╱32╱2╱ // 0x2f2b @0x13
0x2f18…2f2e at0014 = ╱ef╱$╱ // 0x2f2c @0x14
0x2f18…2f2e at0015 = EOL // 0x2f2d @0x15
0x2f18…2f2e }
0x2f2e…2f47 bc9e 5480 EXEC FEJL(W,18,K1$)
0x2f2e…2f47 LineComalBin {
0x2f2e…2f47 ptr = 0xbc9e // 0x2f2e @0x0
0x2f2e…2f47 lno = 0x1568 // 0x2f30 @0x2
0x2f2e…2f47 at0004 = ╱9d╱ EXEC ╱ // 0x2f32 @0x4
0x2f2e…2f47 at0005 = ╱46╱F╱ // 0x2f33 @0x5
0x2f2e…2f47 at0006 = ╱45╱E╱ // 0x2f34 @0x6
0x2f2e…2f47 at0007 = ╱4a╱J╱ // 0x2f35 @0x7
0x2f2e…2f47 at0008 = ╱4c╱L╱ // 0x2f36 @0x8
0x2f2e…2f47 at0009 = ╱ed╱(╱ // 0x2f37 @0x9
0x2f2e…2f47 at000a = ╱57╱W╱ // 0x2f38 @0xa
0x2f2e…2f47 at000b = ╱ec╱,╱ // 0x2f39 @0xb
0x2f2e…2f47 at000c = ╱31╱1╱ // 0x2f3a @0xc
0x2f2e…2f47 at000d = ╱38╱8╱ // 0x2f3b @0xd
0x2f2e…2f47 at000e = ╱fe00009005╱ // 0x2f3c @0xe
0x2f2e…2f47 at0013 = ╱ec╱,╱ // 0x2f41 @0x13
0x2f2e…2f47 at0014 = ╱4b╱K╱ // 0x2f42 @0x14
0x2f2e…2f47 at0015 = ╱31╱1╱ // 0x2f43 @0x15
0x2f2e…2f47 at0016 = ╱ef╱$╱ // 0x2f44 @0x16
0x2f2e…2f47 at0017 = ╱ee╱)╱ // 0x2f45 @0x17
0x2f2e…2f47 at0018 = EOL // 0x2f46 @0x18
0x2f2e…2f47 }
0x2f47…2f5d bcb4 5490 GET K1$,34:K13$
0x2f47…2f5d LineComalBin {
0x2f47…2f5d ptr = 0xbcb4 // 0x2f47 @0x0
0x2f47…2f5d lno = 0x1572 // 0x2f49 @0x2
0x2f47…2f5d at0004 = ╱a9╱ GET ╱ // 0x2f4b @0x4
0x2f47…2f5d at0005 = ╱4b╱K╱ // 0x2f4c @0x5
0x2f47…2f5d at0006 = ╱31╱1╱ // 0x2f4d @0x6
0x2f47…2f5d at0007 = ╱ef╱$╱ // 0x2f4e @0x7
0x2f47…2f5d at0008 = ╱ec╱,╱ // 0x2f4f @0x8
0x2f47…2f5d at0009 = ╱33╱3╱ // 0x2f50 @0x9
0x2f47…2f5d at000a = ╱34╱4╱ // 0x2f51 @0xa
0x2f47…2f5d at000b = ╱fe00008806╱ // 0x2f52 @0xb
0x2f47…2f5d at0010 = ╱f0╱:╱ // 0x2f57 @0x10
0x2f47…2f5d at0011 = ╱4b╱K╱ // 0x2f58 @0x11
0x2f47…2f5d at0012 = ╱31╱1╱ // 0x2f59 @0x12
0x2f47…2f5d at0013 = ╱33╱3╱ // 0x2f5a @0x13
0x2f47…2f5d at0014 = ╱ef╱$╱ // 0x2f5b @0x14
0x2f47…2f5d at0015 = EOL // 0x2f5c @0x15
0x2f47…2f5d }
0x2f5d…2f76 bccd 5500 EXEC FEJL(W,19,K1$)
0x2f5d…2f76 LineComalBin {
0x2f5d…2f76 ptr = 0xbccd // 0x2f5d @0x0
0x2f5d…2f76 lno = 0x157c // 0x2f5f @0x2
0x2f5d…2f76 at0004 = ╱9d╱ EXEC ╱ // 0x2f61 @0x4
0x2f5d…2f76 at0005 = ╱46╱F╱ // 0x2f62 @0x5
0x2f5d…2f76 at0006 = ╱45╱E╱ // 0x2f63 @0x6
0x2f5d…2f76 at0007 = ╱4a╱J╱ // 0x2f64 @0x7
0x2f5d…2f76 at0008 = ╱4c╱L╱ // 0x2f65 @0x8
0x2f5d…2f76 at0009 = ╱ed╱(╱ // 0x2f66 @0x9
0x2f5d…2f76 at000a = ╱57╱W╱ // 0x2f67 @0xa
0x2f5d…2f76 at000b = ╱ec╱,╱ // 0x2f68 @0xb
0x2f5d…2f76 at000c = ╱31╱1╱ // 0x2f69 @0xc
0x2f5d…2f76 at000d = ╱39╱9╱ // 0x2f6a @0xd
0x2f5d…2f76 at000e = ╱fe00009805╱ // 0x2f6b @0xe
0x2f5d…2f76 at0013 = ╱ec╱,╱ // 0x2f70 @0x13
0x2f5d…2f76 at0014 = ╱4b╱K╱ // 0x2f71 @0x14
0x2f5d…2f76 at0015 = ╱31╱1╱ // 0x2f72 @0x15
0x2f5d…2f76 at0016 = ╱ef╱$╱ // 0x2f73 @0x16
0x2f5d…2f76 at0017 = ╱ee╱)╱ // 0x2f74 @0x17
0x2f5d…2f76 at0018 = EOL // 0x2f75 @0x18
0x2f5d…2f76 }
0x2f76…2f8c bce3 5510 GET K1$,36:K14$
0x2f76…2f8c LineComalBin {
0x2f76…2f8c ptr = 0xbce3 // 0x2f76 @0x0
0x2f76…2f8c lno = 0x1586 // 0x2f78 @0x2
0x2f76…2f8c at0004 = ╱a9╱ GET ╱ // 0x2f7a @0x4
0x2f76…2f8c at0005 = ╱4b╱K╱ // 0x2f7b @0x5
0x2f76…2f8c at0006 = ╱31╱1╱ // 0x2f7c @0x6
0x2f76…2f8c at0007 = ╱ef╱$╱ // 0x2f7d @0x7
0x2f76…2f8c at0008 = ╱ec╱,╱ // 0x2f7e @0x8
0x2f76…2f8c at0009 = ╱33╱3╱ // 0x2f7f @0x9
0x2f76…2f8c at000a = ╱36╱6╱ // 0x2f80 @0xa
0x2f76…2f8c at000b = ╱fe00009006╱ // 0x2f81 @0xb
0x2f76…2f8c at0010 = ╱f0╱:╱ // 0x2f86 @0x10
0x2f76…2f8c at0011 = ╱4b╱K╱ // 0x2f87 @0x11
0x2f76…2f8c at0012 = ╱31╱1╱ // 0x2f88 @0x12
0x2f76…2f8c at0013 = ╱34╱4╱ // 0x2f89 @0x13
0x2f76…2f8c at0014 = ╱ef╱$╱ // 0x2f8a @0x14
0x2f76…2f8c at0015 = EOL // 0x2f8b @0x15
0x2f76…2f8c }
0x2f8c…2fa5 bcfc 5520 EXEC FEJL(W,20,K1$)
0x2f8c…2fa5 LineComalBin {
0x2f8c…2fa5 ptr = 0xbcfc // 0x2f8c @0x0
0x2f8c…2fa5 lno = 0x1590 // 0x2f8e @0x2
0x2f8c…2fa5 at0004 = ╱9d╱ EXEC ╱ // 0x2f90 @0x4
0x2f8c…2fa5 at0005 = ╱46╱F╱ // 0x2f91 @0x5
0x2f8c…2fa5 at0006 = ╱45╱E╱ // 0x2f92 @0x6
0x2f8c…2fa5 at0007 = ╱4a╱J╱ // 0x2f93 @0x7
0x2f8c…2fa5 at0008 = ╱4c╱L╱ // 0x2f94 @0x8
0x2f8c…2fa5 at0009 = ╱ed╱(╱ // 0x2f95 @0x9
0x2f8c…2fa5 at000a = ╱57╱W╱ // 0x2f96 @0xa
0x2f8c…2fa5 at000b = ╱ec╱,╱ // 0x2f97 @0xb
0x2f8c…2fa5 at000c = ╱32╱2╱ // 0x2f98 @0xc
0x2f8c…2fa5 at000d = ╱30╱0╱ // 0x2f99 @0xd
0x2f8c…2fa5 at000e = ╱fe0000a005╱ // 0x2f9a @0xe
0x2f8c…2fa5 at0013 = ╱ec╱,╱ // 0x2f9f @0x13
0x2f8c…2fa5 at0014 = ╱4b╱K╱ // 0x2fa0 @0x14
0x2f8c…2fa5 at0015 = ╱31╱1╱ // 0x2fa1 @0x15
0x2f8c…2fa5 at0016 = ╱ef╱$╱ // 0x2fa2 @0x16
0x2f8c…2fa5 at0017 = ╱ee╱)╱ // 0x2fa3 @0x17
0x2f8c…2fa5 at0018 = EOL // 0x2fa4 @0x18
0x2f8c…2fa5 }
0x2fa5…2fae bd05 5530 CLOSE K1$
0x2fa5…2fae LineComalBin {
0x2fa5…2fae ptr = 0xbd05 // 0x2fa5 @0x0
0x2fa5…2fae lno = 0x159a // 0x2fa7 @0x2
0x2fa5…2fae at0004 = ╱a8╱ CLOSE ╱ // 0x2fa9 @0x4
0x2fa5…2fae at0005 = ╱4b╱K╱ // 0x2faa @0x5
0x2fa5…2fae at0006 = ╱31╱1╱ // 0x2fab @0x6
0x2fa5…2fae at0007 = ╱ef╱$╱ // 0x2fac @0x7
0x2fa5…2fae at0008 = EOL // 0x2fad @0x8
0x2fa5…2fae }
0x2fae…2fc7 bd1e 5540 EXEC FEJL(W,21,K1$)
0x2fae…2fc7 LineComalBin {
0x2fae…2fc7 ptr = 0xbd1e // 0x2fae @0x0
0x2fae…2fc7 lno = 0x15a4 // 0x2fb0 @0x2
0x2fae…2fc7 at0004 = ╱9d╱ EXEC ╱ // 0x2fb2 @0x4
0x2fae…2fc7 at0005 = ╱46╱F╱ // 0x2fb3 @0x5
0x2fae…2fc7 at0006 = ╱45╱E╱ // 0x2fb4 @0x6
0x2fae…2fc7 at0007 = ╱4a╱J╱ // 0x2fb5 @0x7
0x2fae…2fc7 at0008 = ╱4c╱L╱ // 0x2fb6 @0x8
0x2fae…2fc7 at0009 = ╱ed╱(╱ // 0x2fb7 @0x9
0x2fae…2fc7 at000a = ╱57╱W╱ // 0x2fb8 @0xa
0x2fae…2fc7 at000b = ╱ec╱,╱ // 0x2fb9 @0xb
0x2fae…2fc7 at000c = ╱32╱2╱ // 0x2fba @0xc
0x2fae…2fc7 at000d = ╱31╱1╱ // 0x2fbb @0xd
0x2fae…2fc7 at000e = ╱fe0000a805╱ // 0x2fbc @0xe
0x2fae…2fc7 at0013 = ╱ec╱,╱ // 0x2fc1 @0x13
0x2fae…2fc7 at0014 = ╱4b╱K╱ // 0x2fc2 @0x14
0x2fae…2fc7 at0015 = ╱31╱1╱ // 0x2fc3 @0x15
0x2fae…2fc7 at0016 = ╱ef╱$╱ // 0x2fc4 @0x16
0x2fae…2fc7 at0017 = ╱ee╱)╱ // 0x2fc5 @0x17
0x2fae…2fc7 at0018 = EOL // 0x2fc6 @0x18
0x2fae…2fc7 }
0x2fc7…300d bd64 5550 K2$=N$+K2$;K3$=N$+K3$;K4$=N$+K4$;K5$=N$+K5$;K6$=N$+K6$;K7$=N$+K7$
0x2fc7…300d LineComalBin {
0x2fc7…300d ptr = 0xbd64 // 0x2fc7 @0x0
0x2fc7…300d lno = 0x15ae // 0x2fc9 @0x2
0x2fc7…300d at0004 = ╱4b╱K╱ // 0x2fcb @0x4
0x2fc7…300d at0005 = ╱32╱2╱ // 0x2fcc @0x5
0x2fc7…300d at0006 = ╱ef╱$╱ // 0x2fcd @0x6
0x2fc7…300d at0007 = ╱dc╱=╱ // 0x2fce @0x7
0x2fc7…300d at0008 = ╱4e╱N╱ // 0x2fcf @0x8
0x2fc7…300d at0009 = ╱ef╱$╱ // 0x2fd0 @0x9
0x2fc7…300d at000a = ╱f1╱+╱ // 0x2fd1 @0xa
0x2fc7…300d at000b = ╱4b╱K╱ // 0x2fd2 @0xb
0x2fc7…300d at000c = ╱32╱2╱ // 0x2fd3 @0xc
0x2fc7…300d at000d = ╱ef╱$╱ // 0x2fd4 @0xd
0x2fc7…300d at000e = ╱eb╱;╱ // 0x2fd5 @0xe
0x2fc7…300d at000f = ╱4b╱K╱ // 0x2fd6 @0xf
0x2fc7…300d at0010 = ╱33╱3╱ // 0x2fd7 @0x10
0x2fc7…300d at0011 = ╱ef╱$╱ // 0x2fd8 @0x11
0x2fc7…300d at0012 = ╱dc╱=╱ // 0x2fd9 @0x12
0x2fc7…300d at0013 = ╱4e╱N╱ // 0x2fda @0x13
0x2fc7…300d at0014 = ╱ef╱$╱ // 0x2fdb @0x14
0x2fc7…300d at0015 = ╱f1╱+╱ // 0x2fdc @0x15
0x2fc7…300d at0016 = ╱4b╱K╱ // 0x2fdd @0x16
0x2fc7…300d at0017 = ╱33╱3╱ // 0x2fde @0x17
0x2fc7…300d at0018 = ╱ef╱$╱ // 0x2fdf @0x18
0x2fc7…300d at0019 = ╱eb╱;╱ // 0x2fe0 @0x19
0x2fc7…300d at001a = ╱4b╱K╱ // 0x2fe1 @0x1a
0x2fc7…300d at001b = ╱34╱4╱ // 0x2fe2 @0x1b
0x2fc7…300d at001c = ╱ef╱$╱ // 0x2fe3 @0x1c
0x2fc7…300d at001d = ╱dc╱=╱ // 0x2fe4 @0x1d
0x2fc7…300d at001e = ╱4e╱N╱ // 0x2fe5 @0x1e
0x2fc7…300d at001f = ╱ef╱$╱ // 0x2fe6 @0x1f
0x2fc7…300d at0020 = ╱f1╱+╱ // 0x2fe7 @0x20
0x2fc7…300d at0021 = ╱4b╱K╱ // 0x2fe8 @0x21
0x2fc7…300d at0022 = ╱34╱4╱ // 0x2fe9 @0x22
0x2fc7…300d at0023 = ╱ef╱$╱ // 0x2fea @0x23
0x2fc7…300d at0024 = ╱eb╱;╱ // 0x2feb @0x24
0x2fc7…300d at0025 = ╱4b╱K╱ // 0x2fec @0x25
0x2fc7…300d at0026 = ╱35╱5╱ // 0x2fed @0x26
0x2fc7…300d at0027 = ╱ef╱$╱ // 0x2fee @0x27
0x2fc7…300d at0028 = ╱dc╱=╱ // 0x2fef @0x28
0x2fc7…300d at0029 = ╱4e╱N╱ // 0x2ff0 @0x29
0x2fc7…300d at002a = ╱ef╱$╱ // 0x2ff1 @0x2a
0x2fc7…300d at002b = ╱f1╱+╱ // 0x2ff2 @0x2b
0x2fc7…300d at002c = ╱4b╱K╱ // 0x2ff3 @0x2c
0x2fc7…300d at002d = ╱35╱5╱ // 0x2ff4 @0x2d
0x2fc7…300d at002e = ╱ef╱$╱ // 0x2ff5 @0x2e
0x2fc7…300d at002f = ╱eb╱;╱ // 0x2ff6 @0x2f
0x2fc7…300d at0030 = ╱4b╱K╱ // 0x2ff7 @0x30
0x2fc7…300d at0031 = ╱36╱6╱ // 0x2ff8 @0x31
0x2fc7…300d at0032 = ╱ef╱$╱ // 0x2ff9 @0x32
0x2fc7…300d at0033 = ╱dc╱=╱ // 0x2ffa @0x33
0x2fc7…300d at0034 = ╱4e╱N╱ // 0x2ffb @0x34
0x2fc7…300d at0035 = ╱ef╱$╱ // 0x2ffc @0x35
0x2fc7…300d at0036 = ╱f1╱+╱ // 0x2ffd @0x36
0x2fc7…300d at0037 = ╱4b╱K╱ // 0x2ffe @0x37
0x2fc7…300d at0038 = ╱36╱6╱ // 0x2fff @0x38
0x2fc7…300d at0039 = ╱ef╱$╱ // 0x3000 @0x39
0x2fc7…300d at003a = ╱eb╱;╱ // 0x3001 @0x3a
0x2fc7…300d at003b = ╱4b╱K╱ // 0x3002 @0x3b
0x2fc7…300d at003c = ╱37╱7╱ // 0x3003 @0x3c
0x2fc7…300d at003d = ╱ef╱$╱ // 0x3004 @0x3d
0x2fc7…300d at003e = ╱dc╱=╱ // 0x3005 @0x3e
0x2fc7…300d at003f = ╱4e╱N╱ // 0x3006 @0x3f
0x2fc7…300d at0040 = ╱ef╱$╱ // 0x3007 @0x40
0x2fc7…300d at0041 = ╱f1╱+╱ // 0x3008 @0x41
0x2fc7…300d at0042 = ╱4b╱K╱ // 0x3009 @0x42
0x2fc7…300d at0043 = ╱37╱7╱ // 0x300a @0x43
0x2fc7…300d at0044 = ╱ef╱$╱ // 0x300b @0x44
0x2fc7…300d at0045 = EOL // 0x300c @0x45
0x2fc7…300d }
0x300d…304e bda5 5560 K8$=N$+K8$;K9$=N$+K9$;K10$=N$+K10$;K11$=N$+K11$;K12$=N$+K12$
0x300d…304e LineComalBin {
0x300d…304e ptr = 0xbda5 // 0x300d @0x0
0x300d…304e lno = 0x15b8 // 0x300f @0x2
0x300d…304e at0004 = ╱4b╱K╱ // 0x3011 @0x4
0x300d…304e at0005 = ╱38╱8╱ // 0x3012 @0x5
0x300d…304e at0006 = ╱ef╱$╱ // 0x3013 @0x6
0x300d…304e at0007 = ╱dc╱=╱ // 0x3014 @0x7
0x300d…304e at0008 = ╱4e╱N╱ // 0x3015 @0x8
0x300d…304e at0009 = ╱ef╱$╱ // 0x3016 @0x9
0x300d…304e at000a = ╱f1╱+╱ // 0x3017 @0xa
0x300d…304e at000b = ╱4b╱K╱ // 0x3018 @0xb
0x300d…304e at000c = ╱38╱8╱ // 0x3019 @0xc
0x300d…304e at000d = ╱ef╱$╱ // 0x301a @0xd
0x300d…304e at000e = ╱eb╱;╱ // 0x301b @0xe
0x300d…304e at000f = ╱4b╱K╱ // 0x301c @0xf
0x300d…304e at0010 = ╱39╱9╱ // 0x301d @0x10
0x300d…304e at0011 = ╱ef╱$╱ // 0x301e @0x11
0x300d…304e at0012 = ╱dc╱=╱ // 0x301f @0x12
0x300d…304e at0013 = ╱4e╱N╱ // 0x3020 @0x13
0x300d…304e at0014 = ╱ef╱$╱ // 0x3021 @0x14
0x300d…304e at0015 = ╱f1╱+╱ // 0x3022 @0x15
0x300d…304e at0016 = ╱4b╱K╱ // 0x3023 @0x16
0x300d…304e at0017 = ╱39╱9╱ // 0x3024 @0x17
0x300d…304e at0018 = ╱ef╱$╱ // 0x3025 @0x18
0x300d…304e at0019 = ╱eb╱;╱ // 0x3026 @0x19
0x300d…304e at001a = ╱4b╱K╱ // 0x3027 @0x1a
0x300d…304e at001b = ╱31╱1╱ // 0x3028 @0x1b
0x300d…304e at001c = ╱30╱0╱ // 0x3029 @0x1c
0x300d…304e at001d = ╱ef╱$╱ // 0x302a @0x1d
0x300d…304e at001e = ╱dc╱=╱ // 0x302b @0x1e
0x300d…304e at001f = ╱4e╱N╱ // 0x302c @0x1f
0x300d…304e at0020 = ╱ef╱$╱ // 0x302d @0x20
0x300d…304e at0021 = ╱f1╱+╱ // 0x302e @0x21
0x300d…304e at0022 = ╱4b╱K╱ // 0x302f @0x22
0x300d…304e at0023 = ╱31╱1╱ // 0x3030 @0x23
0x300d…304e at0024 = ╱30╱0╱ // 0x3031 @0x24
0x300d…304e at0025 = ╱ef╱$╱ // 0x3032 @0x25
0x300d…304e at0026 = ╱eb╱;╱ // 0x3033 @0x26
0x300d…304e at0027 = ╱4b╱K╱ // 0x3034 @0x27
0x300d…304e at0028 = ╱31╱1╱ // 0x3035 @0x28
0x300d…304e at0029 = ╱31╱1╱ // 0x3036 @0x29
0x300d…304e at002a = ╱ef╱$╱ // 0x3037 @0x2a
0x300d…304e at002b = ╱dc╱=╱ // 0x3038 @0x2b
0x300d…304e at002c = ╱4e╱N╱ // 0x3039 @0x2c
0x300d…304e at002d = ╱ef╱$╱ // 0x303a @0x2d
0x300d…304e at002e = ╱f1╱+╱ // 0x303b @0x2e
0x300d…304e at002f = ╱4b╱K╱ // 0x303c @0x2f
0x300d…304e at0030 = ╱31╱1╱ // 0x303d @0x30
0x300d…304e at0031 = ╱31╱1╱ // 0x303e @0x31
0x300d…304e at0032 = ╱ef╱$╱ // 0x303f @0x32
0x300d…304e at0033 = ╱eb╱;╱ // 0x3040 @0x33
0x300d…304e at0034 = ╱4b╱K╱ // 0x3041 @0x34
0x300d…304e at0035 = ╱31╱1╱ // 0x3042 @0x35
0x300d…304e at0036 = ╱32╱2╱ // 0x3043 @0x36
0x300d…304e at0037 = ╱ef╱$╱ // 0x3044 @0x37
0x300d…304e at0038 = ╱dc╱=╱ // 0x3045 @0x38
0x300d…304e at0039 = ╱4e╱N╱ // 0x3046 @0x39
0x300d…304e at003a = ╱ef╱$╱ // 0x3047 @0x3a
0x300d…304e at003b = ╱f1╱+╱ // 0x3048 @0x3b
0x300d…304e at003c = ╱4b╱K╱ // 0x3049 @0x3c
0x300d…304e at003d = ╱31╱1╱ // 0x304a @0x3d
0x300d…304e at003e = ╱32╱2╱ // 0x304b @0x3e
0x300d…304e at003f = ╱ef╱$╱ // 0x304c @0x3f
0x300d…304e at0040 = EOL // 0x304d @0x40
0x300d…304e }
0x304e…306c bdc3 5570 K13$=N$+K13$;K14$=N$+K14$
0x304e…306c LineComalBin {
0x304e…306c ptr = 0xbdc3 // 0x304e @0x0
0x304e…306c lno = 0x15c2 // 0x3050 @0x2
0x304e…306c at0004 = ╱4b╱K╱ // 0x3052 @0x4
0x304e…306c at0005 = ╱31╱1╱ // 0x3053 @0x5
0x304e…306c at0006 = ╱33╱3╱ // 0x3054 @0x6
0x304e…306c at0007 = ╱ef╱$╱ // 0x3055 @0x7
0x304e…306c at0008 = ╱dc╱=╱ // 0x3056 @0x8
0x304e…306c at0009 = ╱4e╱N╱ // 0x3057 @0x9
0x304e…306c at000a = ╱ef╱$╱ // 0x3058 @0xa
0x304e…306c at000b = ╱f1╱+╱ // 0x3059 @0xb
0x304e…306c at000c = ╱4b╱K╱ // 0x305a @0xc
0x304e…306c at000d = ╱31╱1╱ // 0x305b @0xd
0x304e…306c at000e = ╱33╱3╱ // 0x305c @0xe
0x304e…306c at000f = ╱ef╱$╱ // 0x305d @0xf
0x304e…306c at0010 = ╱eb╱;╱ // 0x305e @0x10
0x304e…306c at0011 = ╱4b╱K╱ // 0x305f @0x11
0x304e…306c at0012 = ╱31╱1╱ // 0x3060 @0x12
0x304e…306c at0013 = ╱34╱4╱ // 0x3061 @0x13
0x304e…306c at0014 = ╱ef╱$╱ // 0x3062 @0x14
0x304e…306c at0015 = ╱dc╱=╱ // 0x3063 @0x15
0x304e…306c at0016 = ╱4e╱N╱ // 0x3064 @0x16
0x304e…306c at0017 = ╱ef╱$╱ // 0x3065 @0x17
0x304e…306c at0018 = ╱f1╱+╱ // 0x3066 @0x18
0x304e…306c at0019 = ╱4b╱K╱ // 0x3067 @0x19
0x304e…306c at001a = ╱31╱1╱ // 0x3068 @0x1a
0x304e…306c at001b = ╱34╱4╱ // 0x3069 @0x1b
0x304e…306c at001c = ╱ef╱$╱ // 0x306a @0x1c
0x304e…306c at001d = EOL // 0x306b @0x1d
0x304e…306c }
0x306c…3078 bdcf 5580 OPEN K14$,R
0x306c…3078 LineComalBin {
0x306c…3078 ptr = 0xbdcf // 0x306c @0x0
0x306c…3078 lno = 0x15cc // 0x306e @0x2
0x306c…3078 at0004 = ╱a7╱ OPEN ╱ // 0x3070 @0x4
0x306c…3078 at0005 = ╱4b╱K╱ // 0x3071 @0x5
0x306c…3078 at0006 = ╱31╱1╱ // 0x3072 @0x6
0x306c…3078 at0007 = ╱34╱4╱ // 0x3073 @0x7
0x306c…3078 at0008 = ╱ef╱$╱ // 0x3074 @0x8
0x306c…3078 at0009 = ╱ec╱,╱ // 0x3075 @0x9
0x306c…3078 at000a = ╱52╱R╱ // 0x3076 @0xa
0x306c…3078 at000b = EOL // 0x3077 @0xb
0x306c…3078 }
0x3078…3092 bde9 5590 EXEC FEJL(W,22,K14$)
0x3078…3092 LineComalBin {
0x3078…3092 ptr = 0xbde9 // 0x3078 @0x0
0x3078…3092 lno = 0x15d6 // 0x307a @0x2
0x3078…3092 at0004 = ╱9d╱ EXEC ╱ // 0x307c @0x4
0x3078…3092 at0005 = ╱46╱F╱ // 0x307d @0x5
0x3078…3092 at0006 = ╱45╱E╱ // 0x307e @0x6
0x3078…3092 at0007 = ╱4a╱J╱ // 0x307f @0x7
0x3078…3092 at0008 = ╱4c╱L╱ // 0x3080 @0x8
0x3078…3092 at0009 = ╱ed╱(╱ // 0x3081 @0x9
0x3078…3092 at000a = ╱57╱W╱ // 0x3082 @0xa
0x3078…3092 at000b = ╱ec╱,╱ // 0x3083 @0xb
0x3078…3092 at000c = ╱32╱2╱ // 0x3084 @0xc
0x3078…3092 at000d = ╱32╱2╱ // 0x3085 @0xd
0x3078…3092 at000e = ╱fe0000b005╱ // 0x3086 @0xe
0x3078…3092 at0013 = ╱ec╱,╱ // 0x308b @0x13
0x3078…3092 at0014 = ╱4b╱K╱ // 0x308c @0x14
0x3078…3092 at0015 = ╱31╱1╱ // 0x308d @0x15
0x3078…3092 at0016 = ╱34╱4╱ // 0x308e @0x16
0x3078…3092 at0017 = ╱ef╱$╱ // 0x308f @0x17
0x3078…3092 at0018 = ╱ee╱)╱ // 0x3090 @0x18
0x3078…3092 at0019 = EOL // 0x3091 @0x19
0x3078…3092 }
0x3092…30e8 be3f 5600 GET K14$,G:T1(E),T1(G),T1(V),T1(C),T1(5),T1(6),T1(7),T1(8),T1(W)
0x3092…30e8 LineComalBin {
0x3092…30e8 ptr = 0xbe3f // 0x3092 @0x0
0x3092…30e8 lno = 0x15e0 // 0x3094 @0x2
0x3092…30e8 at0004 = ╱a9╱ GET ╱ // 0x3096 @0x4
0x3092…30e8 at0005 = ╱4b╱K╱ // 0x3097 @0x5
0x3092…30e8 at0006 = ╱31╱1╱ // 0x3098 @0x6
0x3092…30e8 at0007 = ╱34╱4╱ // 0x3099 @0x7
0x3092…30e8 at0008 = ╱ef╱$╱ // 0x309a @0x8
0x3092…30e8 at0009 = ╱ec╱,╱ // 0x309b @0x9
0x3092…30e8 at000a = ╱47╱G╱ // 0x309c @0xa
0x3092…30e8 at000b = ╱f0╱:╱ // 0x309d @0xb
0x3092…30e8 at000c = ╱54╱T╱ // 0x309e @0xc
0x3092…30e8 at000d = ╱31╱1╱ // 0x309f @0xd
0x3092…30e8 at000e = ╱ed╱(╱ // 0x30a0 @0xe
0x3092…30e8 at000f = ╱45╱E╱ // 0x30a1 @0xf
0x3092…30e8 at0010 = ╱ee╱)╱ // 0x30a2 @0x10
0x3092…30e8 at0011 = ╱ec╱,╱ // 0x30a3 @0x11
0x3092…30e8 at0012 = ╱54╱T╱ // 0x30a4 @0x12
0x3092…30e8 at0013 = ╱31╱1╱ // 0x30a5 @0x13
0x3092…30e8 at0014 = ╱ed╱(╱ // 0x30a6 @0x14
0x3092…30e8 at0015 = ╱47╱G╱ // 0x30a7 @0x15
0x3092…30e8 at0016 = ╱ee╱)╱ // 0x30a8 @0x16
0x3092…30e8 at0017 = ╱ec╱,╱ // 0x30a9 @0x17
0x3092…30e8 at0018 = ╱54╱T╱ // 0x30aa @0x18
0x3092…30e8 at0019 = ╱31╱1╱ // 0x30ab @0x19
0x3092…30e8 at001a = ╱ed╱(╱ // 0x30ac @0x1a
0x3092…30e8 at001b = ╱56╱V╱ // 0x30ad @0x1b
0x3092…30e8 at001c = ╱ee╱)╱ // 0x30ae @0x1c
0x3092…30e8 at001d = ╱ec╱,╱ // 0x30af @0x1d
0x3092…30e8 at001e = ╱54╱T╱ // 0x30b0 @0x1e
0x3092…30e8 at001f = ╱31╱1╱ // 0x30b1 @0x1f
0x3092…30e8 at0020 = ╱ed╱(╱ // 0x30b2 @0x20
0x3092…30e8 at0021 = ╱43╱C╱ // 0x30b3 @0x21
0x3092…30e8 at0022 = ╱ee╱)╱ // 0x30b4 @0x22
0x3092…30e8 at0023 = ╱ec╱,╱ // 0x30b5 @0x23
0x3092…30e8 at0024 = ╱54╱T╱ // 0x30b6 @0x24
0x3092…30e8 at0025 = ╱31╱1╱ // 0x30b7 @0x25
0x3092…30e8 at0026 = ╱ed╱(╱ // 0x30b8 @0x26
0x3092…30e8 at0027 = ╱35╱5╱ // 0x30b9 @0x27
0x3092…30e8 at0028 = ╱fe0000a003╱ // 0x30ba @0x28
0x3092…30e8 at002d = ╱ee╱)╱ // 0x30bf @0x2d
0x3092…30e8 at002e = ╱ec╱,╱ // 0x30c0 @0x2e
0x3092…30e8 at002f = ╱54╱T╱ // 0x30c1 @0x2f
0x3092…30e8 at0030 = ╱31╱1╱ // 0x30c2 @0x30
0x3092…30e8 at0031 = ╱ed╱(╱ // 0x30c3 @0x31
0x3092…30e8 at0032 = ╱36╱6╱ // 0x30c4 @0x32
0x3092…30e8 at0033 = ╱fe0000c003╱ // 0x30c5 @0x33
0x3092…30e8 at0038 = ╱ee╱)╱ // 0x30ca @0x38
0x3092…30e8 at0039 = ╱ec╱,╱ // 0x30cb @0x39
0x3092…30e8 at003a = ╱54╱T╱ // 0x30cc @0x3a
0x3092…30e8 at003b = ╱31╱1╱ // 0x30cd @0x3b
0x3092…30e8 at003c = ╱ed╱(╱ // 0x30ce @0x3c
0x3092…30e8 at003d = ╱37╱7╱ // 0x30cf @0x3d
0x3092…30e8 at003e = ╱fe0000e003╱ // 0x30d0 @0x3e
0x3092…30e8 at0043 = ╱ee╱)╱ // 0x30d5 @0x43
0x3092…30e8 at0044 = ╱ec╱,╱ // 0x30d6 @0x44
0x3092…30e8 at0045 = ╱54╱T╱ // 0x30d7 @0x45
0x3092…30e8 at0046 = ╱31╱1╱ // 0x30d8 @0x46
0x3092…30e8 at0047 = ╱ed╱(╱ // 0x30d9 @0x47
0x3092…30e8 at0048 = ╱38╱8╱ // 0x30da @0x48
0x3092…30e8 at0049 = ╱fe00008004╱ // 0x30db @0x49
0x3092…30e8 at004e = ╱ee╱)╱ // 0x30e0 @0x4e
0x3092…30e8 at004f = ╱ec╱,╱ // 0x30e1 @0x4f
0x3092…30e8 at0050 = ╱54╱T╱ // 0x30e2 @0x50
0x3092…30e8 at0051 = ╱31╱1╱ // 0x30e3 @0x51
0x3092…30e8 at0052 = ╱ed╱(╱ // 0x30e4 @0x52
0x3092…30e8 at0053 = ╱57╱W╱ // 0x30e5 @0x53
0x3092…30e8 at0054 = ╱ee╱)╱ // 0x30e6 @0x54
0x3092…30e8 at0055 = EOL // 0x30e7 @0x55
0x3092…30e8 }
0x30e8…3102 be59 5610 EXEC FEJL(W,23,K14$)
0x30e8…3102 LineComalBin {
0x30e8…3102 ptr = 0xbe59 // 0x30e8 @0x0
0x30e8…3102 lno = 0x15ea // 0x30ea @0x2
0x30e8…3102 at0004 = ╱9d╱ EXEC ╱ // 0x30ec @0x4
0x30e8…3102 at0005 = ╱46╱F╱ // 0x30ed @0x5
0x30e8…3102 at0006 = ╱45╱E╱ // 0x30ee @0x6
0x30e8…3102 at0007 = ╱4a╱J╱ // 0x30ef @0x7
0x30e8…3102 at0008 = ╱4c╱L╱ // 0x30f0 @0x8
0x30e8…3102 at0009 = ╱ed╱(╱ // 0x30f1 @0x9
0x30e8…3102 at000a = ╱57╱W╱ // 0x30f2 @0xa
0x30e8…3102 at000b = ╱ec╱,╱ // 0x30f3 @0xb
0x30e8…3102 at000c = ╱32╱2╱ // 0x30f4 @0xc
0x30e8…3102 at000d = ╱33╱3╱ // 0x30f5 @0xd
0x30e8…3102 at000e = ╱fe0000b805╱ // 0x30f6 @0xe
0x30e8…3102 at0013 = ╱ec╱,╱ // 0x30fb @0x13
0x30e8…3102 at0014 = ╱4b╱K╱ // 0x30fc @0x14
0x30e8…3102 at0015 = ╱31╱1╱ // 0x30fd @0x15
0x30e8…3102 at0016 = ╱34╱4╱ // 0x30fe @0x16
0x30e8…3102 at0017 = ╱ef╱$╱ // 0x30ff @0x17
0x30e8…3102 at0018 = ╱ee╱)╱ // 0x3100 @0x18
0x30e8…3102 at0019 = EOL // 0x3101 @0x19
0x30e8…3102 }
0x3102…310d be64 5620 FOR I=E TO V
0x3102…310d LineComalBin {
0x3102…310d ptr = 0xbe64 // 0x3102 @0x0
0x3102…310d lno = 0x15f4 // 0x3104 @0x2
0x3102…310d at0004 = ╱83╱ FOR ╱ // 0x3106 @0x4
0x3102…310d at0005 = ╱49╱I╱ // 0x3107 @0x5
0x3102…310d at0006 = ╱dc╱=╱ // 0x3108 @0x6
0x3102…310d at0007 = ╱45╱E╱ // 0x3109 @0x7
0x3102…310d at0008 = ╱b7╱ TO ╱ // 0x310a @0x8
0x3102…310d at0009 = ╱56╱V╱ // 0x310b @0x9
0x3102…310d at000a = EOL // 0x310c @0xa
0x3102…310d }
0x310d…311d be74 5630 H=(I-E)*V+E
0x310d…311d LineComalBin {
0x310d…311d ptr = 0xbe74 // 0x310d @0x0
0x310d…311d lno = 0x15fe // 0x310f @0x2
0x310d…311d at0004 = ╱48╱H╱ // 0x3111 @0x4
0x310d…311d at0005 = ╱dc╱=╱ // 0x3112 @0x5
0x310d…311d at0006 = ╱ed╱(╱ // 0x3113 @0x6
0x310d…311d at0007 = ╱49╱I╱ // 0x3114 @0x7
0x310d…311d at0008 = ╱e3╱-╱ // 0x3115 @0x8
0x310d…311d at0009 = ╱45╱E╱ // 0x3116 @0x9
0x310d…311d at000a = ╱ee╱)╱ // 0x3117 @0xa
0x310d…311d at000b = ╱e4╱*╱ // 0x3118 @0xb
0x310d…311d at000c = ╱56╱V╱ // 0x3119 @0xc
0x310d…311d at000d = ╱e2╱+╱ // 0x311a @0xd
0x310d…311d at000e = ╱45╱E╱ // 0x311b @0xe
0x310d…311d at000f = EOL // 0x311c @0xf
0x310d…311d }
0x311d…314a bea1 5640 GET K14$,I+G:LAND$(H),LAND$(H+E),LAND$(H+G)
0x311d…314a LineComalBin {
0x311d…314a ptr = 0xbea1 // 0x311d @0x0
0x311d…314a lno = 0x1608 // 0x311f @0x2
0x311d…314a at0004 = ╱a9╱ GET ╱ // 0x3121 @0x4
0x311d…314a at0005 = ╱4b╱K╱ // 0x3122 @0x5
0x311d…314a at0006 = ╱31╱1╱ // 0x3123 @0x6
0x311d…314a at0007 = ╱34╱4╱ // 0x3124 @0x7
0x311d…314a at0008 = ╱ef╱$╱ // 0x3125 @0x8
0x311d…314a at0009 = ╱ec╱,╱ // 0x3126 @0x9
0x311d…314a at000a = ╱49╱I╱ // 0x3127 @0xa
0x311d…314a at000b = ╱e2╱+╱ // 0x3128 @0xb
0x311d…314a at000c = ╱47╱G╱ // 0x3129 @0xc
0x311d…314a at000d = ╱f0╱:╱ // 0x312a @0xd
0x311d…314a at000e = ╱4c╱L╱ // 0x312b @0xe
0x311d…314a at000f = ╱41╱A╱ // 0x312c @0xf
0x311d…314a at0010 = ╱4e╱N╱ // 0x312d @0x10
0x311d…314a at0011 = ╱44╱D╱ // 0x312e @0x11
0x311d…314a at0012 = ╱ef╱$╱ // 0x312f @0x12
0x311d…314a at0013 = ╱ed╱(╱ // 0x3130 @0x13
0x311d…314a at0014 = ╱48╱H╱ // 0x3131 @0x14
0x311d…314a at0015 = ╱ee╱)╱ // 0x3132 @0x15
0x311d…314a at0016 = ╱ec╱,╱ // 0x3133 @0x16
0x311d…314a at0017 = ╱4c╱L╱ // 0x3134 @0x17
0x311d…314a at0018 = ╱41╱A╱ // 0x3135 @0x18
0x311d…314a at0019 = ╱4e╱N╱ // 0x3136 @0x19
0x311d…314a at001a = ╱44╱D╱ // 0x3137 @0x1a
0x311d…314a at001b = ╱ef╱$╱ // 0x3138 @0x1b
0x311d…314a at001c = ╱ed╱(╱ // 0x3139 @0x1c
0x311d…314a at001d = ╱48╱H╱ // 0x313a @0x1d
0x311d…314a at001e = ╱e2╱+╱ // 0x313b @0x1e
0x311d…314a at001f = ╱45╱E╱ // 0x313c @0x1f
0x311d…314a at0020 = ╱ee╱)╱ // 0x313d @0x20
0x311d…314a at0021 = ╱ec╱,╱ // 0x313e @0x21
0x311d…314a at0022 = ╱4c╱L╱ // 0x313f @0x22
0x311d…314a at0023 = ╱41╱A╱ // 0x3140 @0x23
0x311d…314a at0024 = ╱4e╱N╱ // 0x3141 @0x24
0x311d…314a at0025 = ╱44╱D╱ // 0x3142 @0x25
0x311d…314a at0026 = ╱ef╱$╱ // 0x3143 @0x26
0x311d…314a at0027 = ╱ed╱(╱ // 0x3144 @0x27
0x311d…314a at0028 = ╱48╱H╱ // 0x3145 @0x28
0x311d…314a at0029 = ╱e2╱+╱ // 0x3146 @0x29
0x311d…314a at002a = ╱47╱G╱ // 0x3147 @0x2a
0x311d…314a at002b = ╱ee╱)╱ // 0x3148 @0x2b
0x311d…314a at002c = EOL // 0x3149 @0x2c
0x311d…314a }
0x314a…3164 bebb 5650 EXEC FEJL(W,24,K14$)
0x314a…3164 LineComalBin {
0x314a…3164 ptr = 0xbebb // 0x314a @0x0
0x314a…3164 lno = 0x1612 // 0x314c @0x2
0x314a…3164 at0004 = ╱9d╱ EXEC ╱ // 0x314e @0x4
0x314a…3164 at0005 = ╱46╱F╱ // 0x314f @0x5
0x314a…3164 at0006 = ╱45╱E╱ // 0x3150 @0x6
0x314a…3164 at0007 = ╱4a╱J╱ // 0x3151 @0x7
0x314a…3164 at0008 = ╱4c╱L╱ // 0x3152 @0x8
0x314a…3164 at0009 = ╱ed╱(╱ // 0x3153 @0x9
0x314a…3164 at000a = ╱57╱W╱ // 0x3154 @0xa
0x314a…3164 at000b = ╱ec╱,╱ // 0x3155 @0xb
0x314a…3164 at000c = ╱32╱2╱ // 0x3156 @0xc
0x314a…3164 at000d = ╱34╱4╱ // 0x3157 @0xd
0x314a…3164 at000e = ╱fe0000c005╱ // 0x3158 @0xe
0x314a…3164 at0013 = ╱ec╱,╱ // 0x315d @0x13
0x314a…3164 at0014 = ╱4b╱K╱ // 0x315e @0x14
0x314a…3164 at0015 = ╱31╱1╱ // 0x315f @0x15
0x314a…3164 at0016 = ╱34╱4╱ // 0x3160 @0x16
0x314a…3164 at0017 = ╱ef╱$╱ // 0x3161 @0x17
0x314a…3164 at0018 = ╱ee╱)╱ // 0x3162 @0x18
0x314a…3164 at0019 = EOL // 0x3163 @0x19
0x314a…3164 }
0x3164…316b bec2 5660 NEXT I
0x3164…316b LineComalBin {
0x3164…316b ptr = 0xbec2 // 0x3164 @0x0
0x3164…316b lno = 0x161c // 0x3166 @0x2
0x3164…316b at0004 = ╱84╱ NEXT ╱ // 0x3168 @0x4
0x3164…316b at0005 = ╱49╱I╱ // 0x3169 @0x5
0x3164…316b at0006 = EOL // 0x316a @0x6
0x3164…316b }
0x316b…317b bed2 5670 FOR I=E TO 6
0x316b…317b LineComalBin {
0x316b…317b ptr = 0xbed2 // 0x316b @0x0
0x316b…317b lno = 0x1626 // 0x316d @0x2
0x316b…317b at0004 = ╱83╱ FOR ╱ // 0x316f @0x4
0x316b…317b at0005 = ╱49╱I╱ // 0x3170 @0x5
0x316b…317b at0006 = ╱dc╱=╱ // 0x3171 @0x6
0x316b…317b at0007 = ╱45╱E╱ // 0x3172 @0x7
0x316b…317b at0008 = ╱b7╱ TO ╱ // 0x3173 @0x8
0x316b…317b at0009 = ╱36╱6╱ // 0x3174 @0x9
0x316b…317b at000a = ╱fe0000c003╱ // 0x3175 @0xa
0x316b…317b at000f = EOL // 0x317a @0xf
0x316b…317b }
0x317b…318b bee2 5680 H=(I-E)*V+E
0x317b…318b LineComalBin {
0x317b…318b ptr = 0xbee2 // 0x317b @0x0
0x317b…318b lno = 0x1630 // 0x317d @0x2
0x317b…318b at0004 = ╱48╱H╱ // 0x317f @0x4
0x317b…318b at0005 = ╱dc╱=╱ // 0x3180 @0x5
0x317b…318b at0006 = ╱ed╱(╱ // 0x3181 @0x6
0x317b…318b at0007 = ╱49╱I╱ // 0x3182 @0x7
0x317b…318b at0008 = ╱e3╱-╱ // 0x3183 @0x8
0x317b…318b at0009 = ╱45╱E╱ // 0x3184 @0x9
0x317b…318b at000a = ╱ee╱)╱ // 0x3185 @0xa
0x317b…318b at000b = ╱e4╱*╱ // 0x3186 @0xb
0x317b…318b at000c = ╱56╱V╱ // 0x3187 @0xc
0x317b…318b at000d = ╱e2╱+╱ // 0x3188 @0xd
0x317b…318b at000e = ╱45╱E╱ // 0x3189 @0xe
0x317b…318b at000f = EOL // 0x318a @0xf
0x317b…318b }
0x318b…31bd bf14 5690 GET K14$,I+5:TFIL$(H),TFIL$(H+E),TFIL$(H+G)
0x318b…31bd LineComalBin {
0x318b…31bd ptr = 0xbf14 // 0x318b @0x0
0x318b…31bd lno = 0x163a // 0x318d @0x2
0x318b…31bd at0004 = ╱a9╱ GET ╱ // 0x318f @0x4
0x318b…31bd at0005 = ╱4b╱K╱ // 0x3190 @0x5
0x318b…31bd at0006 = ╱31╱1╱ // 0x3191 @0x6
0x318b…31bd at0007 = ╱34╱4╱ // 0x3192 @0x7
0x318b…31bd at0008 = ╱ef╱$╱ // 0x3193 @0x8
0x318b…31bd at0009 = ╱ec╱,╱ // 0x3194 @0x9
0x318b…31bd at000a = ╱49╱I╱ // 0x3195 @0xa
0x318b…31bd at000b = ╱e2╱+╱ // 0x3196 @0xb
0x318b…31bd at000c = ╱35╱5╱ // 0x3197 @0xc
0x318b…31bd at000d = ╱fe0000a003╱ // 0x3198 @0xd
0x318b…31bd at0012 = ╱f0╱:╱ // 0x319d @0x12
0x318b…31bd at0013 = ╱54╱T╱ // 0x319e @0x13
0x318b…31bd at0014 = ╱46╱F╱ // 0x319f @0x14
0x318b…31bd at0015 = ╱49╱I╱ // 0x31a0 @0x15
0x318b…31bd at0016 = ╱4c╱L╱ // 0x31a1 @0x16
0x318b…31bd at0017 = ╱ef╱$╱ // 0x31a2 @0x17
0x318b…31bd at0018 = ╱ed╱(╱ // 0x31a3 @0x18
0x318b…31bd at0019 = ╱48╱H╱ // 0x31a4 @0x19
0x318b…31bd at001a = ╱ee╱)╱ // 0x31a5 @0x1a
0x318b…31bd at001b = ╱ec╱,╱ // 0x31a6 @0x1b
0x318b…31bd at001c = ╱54╱T╱ // 0x31a7 @0x1c
0x318b…31bd at001d = ╱46╱F╱ // 0x31a8 @0x1d
0x318b…31bd at001e = ╱49╱I╱ // 0x31a9 @0x1e
0x318b…31bd at001f = ╱4c╱L╱ // 0x31aa @0x1f
0x318b…31bd at0020 = ╱ef╱$╱ // 0x31ab @0x20
0x318b…31bd at0021 = ╱ed╱(╱ // 0x31ac @0x21
0x318b…31bd at0022 = ╱48╱H╱ // 0x31ad @0x22
0x318b…31bd at0023 = ╱e2╱+╱ // 0x31ae @0x23
0x318b…31bd at0024 = ╱45╱E╱ // 0x31af @0x24
0x318b…31bd at0025 = ╱ee╱)╱ // 0x31b0 @0x25
0x318b…31bd at0026 = ╱ec╱,╱ // 0x31b1 @0x26
0x318b…31bd at0027 = ╱54╱T╱ // 0x31b2 @0x27
0x318b…31bd at0028 = ╱46╱F╱ // 0x31b3 @0x28
0x318b…31bd at0029 = ╱49╱I╱ // 0x31b4 @0x29
0x318b…31bd at002a = ╱4c╱L╱ // 0x31b5 @0x2a
0x318b…31bd at002b = ╱ef╱$╱ // 0x31b6 @0x2b
0x318b…31bd at002c = ╱ed╱(╱ // 0x31b7 @0x2c
0x318b…31bd at002d = ╱48╱H╱ // 0x31b8 @0x2d
0x318b…31bd at002e = ╱e2╱+╱ // 0x31b9 @0x2e
0x318b…31bd at002f = ╱47╱G╱ // 0x31ba @0x2f
0x318b…31bd at0030 = ╱ee╱)╱ // 0x31bb @0x30
0x318b…31bd at0031 = EOL // 0x31bc @0x31
0x318b…31bd }
0x31bd…31d1 bf28 5700 EXEC FEJL(W,U,K14$)
0x31bd…31d1 LineComalBin {
0x31bd…31d1 ptr = 0xbf28 // 0x31bd @0x0
0x31bd…31d1 lno = 0x1644 // 0x31bf @0x2
0x31bd…31d1 at0004 = ╱9d╱ EXEC ╱ // 0x31c1 @0x4
0x31bd…31d1 at0005 = ╱46╱F╱ // 0x31c2 @0x5
0x31bd…31d1 at0006 = ╱45╱E╱ // 0x31c3 @0x6
0x31bd…31d1 at0007 = ╱4a╱J╱ // 0x31c4 @0x7
0x31bd…31d1 at0008 = ╱4c╱L╱ // 0x31c5 @0x8
0x31bd…31d1 at0009 = ╱ed╱(╱ // 0x31c6 @0x9
0x31bd…31d1 at000a = ╱57╱W╱ // 0x31c7 @0xa
0x31bd…31d1 at000b = ╱ec╱,╱ // 0x31c8 @0xb
0x31bd…31d1 at000c = ╱55╱U╱ // 0x31c9 @0xc
0x31bd…31d1 at000d = ╱ec╱,╱ // 0x31ca @0xd
0x31bd…31d1 at000e = ╱4b╱K╱ // 0x31cb @0xe
0x31bd…31d1 at000f = ╱31╱1╱ // 0x31cc @0xf
0x31bd…31d1 at0010 = ╱34╱4╱ // 0x31cd @0x10
0x31bd…31d1 at0011 = ╱ef╱$╱ // 0x31ce @0x11
0x31bd…31d1 at0012 = ╱ee╱)╱ // 0x31cf @0x12
0x31bd…31d1 at0013 = EOL // 0x31d0 @0x13
0x31bd…31d1 }
0x31d1…31d8 bf2f 5710 NEXT I
0x31d1…31d8 LineComalBin {
0x31d1…31d8 ptr = 0xbf2f // 0x31d1 @0x0
0x31d1…31d8 lno = 0x164e // 0x31d3 @0x2
0x31d1…31d8 at0004 = ╱84╱ NEXT ╱ // 0x31d5 @0x4
0x31d1…31d8 at0005 = ╱49╱I╱ // 0x31d6 @0x5
0x31d1…31d8 at0006 = EOL // 0x31d7 @0x6
0x31d1…31d8 }
0x31d8…3234 bf8b 5720 GET K14$,13:T2(E),T2(G),T2(V),T2(C),T2(5),T2(6),T2(7),T2(8),T2(W)
0x31d8…3234 LineComalBin {
0x31d8…3234 ptr = 0xbf8b // 0x31d8 @0x0
0x31d8…3234 lno = 0x1658 // 0x31da @0x2
0x31d8…3234 at0004 = ╱a9╱ GET ╱ // 0x31dc @0x4
0x31d8…3234 at0005 = ╱4b╱K╱ // 0x31dd @0x5
0x31d8…3234 at0006 = ╱31╱1╱ // 0x31de @0x6
0x31d8…3234 at0007 = ╱34╱4╱ // 0x31df @0x7
0x31d8…3234 at0008 = ╱ef╱$╱ // 0x31e0 @0x8
0x31d8…3234 at0009 = ╱ec╱,╱ // 0x31e1 @0x9
0x31d8…3234 at000a = ╱31╱1╱ // 0x31e2 @0xa
0x31d8…3234 at000b = ╱33╱3╱ // 0x31e3 @0xb
0x31d8…3234 at000c = ╱fe0000d004╱ // 0x31e4 @0xc
0x31d8…3234 at0011 = ╱f0╱:╱ // 0x31e9 @0x11
0x31d8…3234 at0012 = ╱54╱T╱ // 0x31ea @0x12
0x31d8…3234 at0013 = ╱32╱2╱ // 0x31eb @0x13
0x31d8…3234 at0014 = ╱ed╱(╱ // 0x31ec @0x14
0x31d8…3234 at0015 = ╱45╱E╱ // 0x31ed @0x15
0x31d8…3234 at0016 = ╱ee╱)╱ // 0x31ee @0x16
0x31d8…3234 at0017 = ╱ec╱,╱ // 0x31ef @0x17
0x31d8…3234 at0018 = ╱54╱T╱ // 0x31f0 @0x18
0x31d8…3234 at0019 = ╱32╱2╱ // 0x31f1 @0x19
0x31d8…3234 at001a = ╱ed╱(╱ // 0x31f2 @0x1a
0x31d8…3234 at001b = ╱47╱G╱ // 0x31f3 @0x1b
0x31d8…3234 at001c = ╱ee╱)╱ // 0x31f4 @0x1c
0x31d8…3234 at001d = ╱ec╱,╱ // 0x31f5 @0x1d
0x31d8…3234 at001e = ╱54╱T╱ // 0x31f6 @0x1e
0x31d8…3234 at001f = ╱32╱2╱ // 0x31f7 @0x1f
0x31d8…3234 at0020 = ╱ed╱(╱ // 0x31f8 @0x20
0x31d8…3234 at0021 = ╱56╱V╱ // 0x31f9 @0x21
0x31d8…3234 at0022 = ╱ee╱)╱ // 0x31fa @0x22
0x31d8…3234 at0023 = ╱ec╱,╱ // 0x31fb @0x23
0x31d8…3234 at0024 = ╱54╱T╱ // 0x31fc @0x24
0x31d8…3234 at0025 = ╱32╱2╱ // 0x31fd @0x25
0x31d8…3234 at0026 = ╱ed╱(╱ // 0x31fe @0x26
0x31d8…3234 at0027 = ╱43╱C╱ // 0x31ff @0x27
0x31d8…3234 at0028 = ╱ee╱)╱ // 0x3200 @0x28
0x31d8…3234 at0029 = ╱ec╱,╱ // 0x3201 @0x29
0x31d8…3234 at002a = ╱54╱T╱ // 0x3202 @0x2a
0x31d8…3234 at002b = ╱32╱2╱ // 0x3203 @0x2b
0x31d8…3234 at002c = ╱ed╱(╱ // 0x3204 @0x2c
0x31d8…3234 at002d = ╱35╱5╱ // 0x3205 @0x2d
0x31d8…3234 at002e = ╱fe0000a003╱ // 0x3206 @0x2e
0x31d8…3234 at0033 = ╱ee╱)╱ // 0x320b @0x33
0x31d8…3234 at0034 = ╱ec╱,╱ // 0x320c @0x34
0x31d8…3234 at0035 = ╱54╱T╱ // 0x320d @0x35
0x31d8…3234 at0036 = ╱32╱2╱ // 0x320e @0x36
0x31d8…3234 at0037 = ╱ed╱(╱ // 0x320f @0x37
0x31d8…3234 at0038 = ╱36╱6╱ // 0x3210 @0x38
0x31d8…3234 at0039 = ╱fe0000c003╱ // 0x3211 @0x39
0x31d8…3234 at003e = ╱ee╱)╱ // 0x3216 @0x3e
0x31d8…3234 at003f = ╱ec╱,╱ // 0x3217 @0x3f
0x31d8…3234 at0040 = ╱54╱T╱ // 0x3218 @0x40
0x31d8…3234 at0041 = ╱32╱2╱ // 0x3219 @0x41
0x31d8…3234 at0042 = ╱ed╱(╱ // 0x321a @0x42
0x31d8…3234 at0043 = ╱37╱7╱ // 0x321b @0x43
0x31d8…3234 at0044 = ╱fe0000e003╱ // 0x321c @0x44
0x31d8…3234 at0049 = ╱ee╱)╱ // 0x3221 @0x49
0x31d8…3234 at004a = ╱ec╱,╱ // 0x3222 @0x4a
0x31d8…3234 at004b = ╱54╱T╱ // 0x3223 @0x4b
0x31d8…3234 at004c = ╱32╱2╱ // 0x3224 @0x4c
0x31d8…3234 at004d = ╱ed╱(╱ // 0x3225 @0x4d
0x31d8…3234 at004e = ╱38╱8╱ // 0x3226 @0x4e
0x31d8…3234 at004f = ╱fe00008004╱ // 0x3227 @0x4f
0x31d8…3234 at0054 = ╱ee╱)╱ // 0x322c @0x54
0x31d8…3234 at0055 = ╱ec╱,╱ // 0x322d @0x55
0x31d8…3234 at0056 = ╱54╱T╱ // 0x322e @0x56
0x31d8…3234 at0057 = ╱32╱2╱ // 0x322f @0x57
0x31d8…3234 at0058 = ╱ed╱(╱ // 0x3230 @0x58
0x31d8…3234 at0059 = ╱57╱W╱ // 0x3231 @0x59
0x31d8…3234 at005a = ╱ee╱)╱ // 0x3232 @0x5a
0x31d8…3234 at005b = EOL // 0x3233 @0x5b
0x31d8…3234 }
0x3234…324e bfa5 5730 EXEC FEJL(W,26,K14$)
0x3234…324e LineComalBin {
0x3234…324e ptr = 0xbfa5 // 0x3234 @0x0
0x3234…324e lno = 0x1662 // 0x3236 @0x2
0x3234…324e at0004 = ╱9d╱ EXEC ╱ // 0x3238 @0x4
0x3234…324e at0005 = ╱46╱F╱ // 0x3239 @0x5
0x3234…324e at0006 = ╱45╱E╱ // 0x323a @0x6
0x3234…324e at0007 = ╱4a╱J╱ // 0x323b @0x7
0x3234…324e at0008 = ╱4c╱L╱ // 0x323c @0x8
0x3234…324e at0009 = ╱ed╱(╱ // 0x323d @0x9
0x3234…324e at000a = ╱57╱W╱ // 0x323e @0xa
0x3234…324e at000b = ╱ec╱,╱ // 0x323f @0xb
0x3234…324e at000c = ╱32╱2╱ // 0x3240 @0xc
0x3234…324e at000d = ╱36╱6╱ // 0x3241 @0xd
0x3234…324e at000e = ╱fe0000d005╱ // 0x3242 @0xe
0x3234…324e at0013 = ╱ec╱,╱ // 0x3247 @0x13
0x3234…324e at0014 = ╱4b╱K╱ // 0x3248 @0x14
0x3234…324e at0015 = ╱31╱1╱ // 0x3249 @0x15
0x3234…324e at0016 = ╱34╱4╱ // 0x324a @0x16
0x3234…324e at0017 = ╱ef╱$╱ // 0x324b @0x17
0x3234…324e at0018 = ╱ee╱)╱ // 0x324c @0x18
0x3234…324e at0019 = EOL // 0x324d @0x19
0x3234…324e }
0x324e…32a4 bffb 5740 GET K14$,F:T3(E),T3(G),T3(V),T3(C),T3(5),T3(6),T3(7),T3(8),T3(W)
0x324e…32a4 LineComalBin {
0x324e…32a4 ptr = 0xbffb // 0x324e @0x0
0x324e…32a4 lno = 0x166c // 0x3250 @0x2
0x324e…32a4 at0004 = ╱a9╱ GET ╱ // 0x3252 @0x4
0x324e…32a4 at0005 = ╱4b╱K╱ // 0x3253 @0x5
0x324e…32a4 at0006 = ╱31╱1╱ // 0x3254 @0x6
0x324e…32a4 at0007 = ╱34╱4╱ // 0x3255 @0x7
0x324e…32a4 at0008 = ╱ef╱$╱ // 0x3256 @0x8
0x324e…32a4 at0009 = ╱ec╱,╱ // 0x3257 @0x9
0x324e…32a4 at000a = ╱46╱F╱ // 0x3258 @0xa
0x324e…32a4 at000b = ╱f0╱:╱ // 0x3259 @0xb
0x324e…32a4 at000c = ╱54╱T╱ // 0x325a @0xc
0x324e…32a4 at000d = ╱33╱3╱ // 0x325b @0xd
0x324e…32a4 at000e = ╱ed╱(╱ // 0x325c @0xe
0x324e…32a4 at000f = ╱45╱E╱ // 0x325d @0xf
0x324e…32a4 at0010 = ╱ee╱)╱ // 0x325e @0x10
0x324e…32a4 at0011 = ╱ec╱,╱ // 0x325f @0x11
0x324e…32a4 at0012 = ╱54╱T╱ // 0x3260 @0x12
0x324e…32a4 at0013 = ╱33╱3╱ // 0x3261 @0x13
0x324e…32a4 at0014 = ╱ed╱(╱ // 0x3262 @0x14
0x324e…32a4 at0015 = ╱47╱G╱ // 0x3263 @0x15
0x324e…32a4 at0016 = ╱ee╱)╱ // 0x3264 @0x16
0x324e…32a4 at0017 = ╱ec╱,╱ // 0x3265 @0x17
0x324e…32a4 at0018 = ╱54╱T╱ // 0x3266 @0x18
0x324e…32a4 at0019 = ╱33╱3╱ // 0x3267 @0x19
0x324e…32a4 at001a = ╱ed╱(╱ // 0x3268 @0x1a
0x324e…32a4 at001b = ╱56╱V╱ // 0x3269 @0x1b
0x324e…32a4 at001c = ╱ee╱)╱ // 0x326a @0x1c
0x324e…32a4 at001d = ╱ec╱,╱ // 0x326b @0x1d
0x324e…32a4 at001e = ╱54╱T╱ // 0x326c @0x1e
0x324e…32a4 at001f = ╱33╱3╱ // 0x326d @0x1f
0x324e…32a4 at0020 = ╱ed╱(╱ // 0x326e @0x20
0x324e…32a4 at0021 = ╱43╱C╱ // 0x326f @0x21
0x324e…32a4 at0022 = ╱ee╱)╱ // 0x3270 @0x22
0x324e…32a4 at0023 = ╱ec╱,╱ // 0x3271 @0x23
0x324e…32a4 at0024 = ╱54╱T╱ // 0x3272 @0x24
0x324e…32a4 at0025 = ╱33╱3╱ // 0x3273 @0x25
0x324e…32a4 at0026 = ╱ed╱(╱ // 0x3274 @0x26
0x324e…32a4 at0027 = ╱35╱5╱ // 0x3275 @0x27
0x324e…32a4 at0028 = ╱fe0000a003╱ // 0x3276 @0x28
0x324e…32a4 at002d = ╱ee╱)╱ // 0x327b @0x2d
0x324e…32a4 at002e = ╱ec╱,╱ // 0x327c @0x2e
0x324e…32a4 at002f = ╱54╱T╱ // 0x327d @0x2f
0x324e…32a4 at0030 = ╱33╱3╱ // 0x327e @0x30
0x324e…32a4 at0031 = ╱ed╱(╱ // 0x327f @0x31
0x324e…32a4 at0032 = ╱36╱6╱ // 0x3280 @0x32
0x324e…32a4 at0033 = ╱fe0000c003╱ // 0x3281 @0x33
0x324e…32a4 at0038 = ╱ee╱)╱ // 0x3286 @0x38
0x324e…32a4 at0039 = ╱ec╱,╱ // 0x3287 @0x39
0x324e…32a4 at003a = ╱54╱T╱ // 0x3288 @0x3a
0x324e…32a4 at003b = ╱33╱3╱ // 0x3289 @0x3b
0x324e…32a4 at003c = ╱ed╱(╱ // 0x328a @0x3c
0x324e…32a4 at003d = ╱37╱7╱ // 0x328b @0x3d
0x324e…32a4 at003e = ╱fe0000e003╱ // 0x328c @0x3e
0x324e…32a4 at0043 = ╱ee╱)╱ // 0x3291 @0x43
0x324e…32a4 at0044 = ╱ec╱,╱ // 0x3292 @0x44
0x324e…32a4 at0045 = ╱54╱T╱ // 0x3293 @0x45
0x324e…32a4 at0046 = ╱33╱3╱ // 0x3294 @0x46
0x324e…32a4 at0047 = ╱ed╱(╱ // 0x3295 @0x47
0x324e…32a4 at0048 = ╱38╱8╱ // 0x3296 @0x48
0x324e…32a4 at0049 = ╱fe00008004╱ // 0x3297 @0x49
0x324e…32a4 at004e = ╱ee╱)╱ // 0x329c @0x4e
0x324e…32a4 at004f = ╱ec╱,╱ // 0x329d @0x4f
0x324e…32a4 at0050 = ╱54╱T╱ // 0x329e @0x50
0x324e…32a4 at0051 = ╱33╱3╱ // 0x329f @0x51
0x324e…32a4 at0052 = ╱ed╱(╱ // 0x32a0 @0x52
0x324e…32a4 at0053 = ╱57╱W╱ // 0x32a1 @0x53
0x324e…32a4 at0054 = ╱ee╱)╱ // 0x32a2 @0x54
0x324e…32a4 at0055 = EOL // 0x32a3 @0x55
0x324e…32a4 }
0x32a4…32be c015 5750 EXEC FEJL(W,27,K14$)
0x32a4…32be LineComalBin {
0x32a4…32be ptr = 0xc015 // 0x32a4 @0x0
0x32a4…32be lno = 0x1676 // 0x32a6 @0x2
0x32a4…32be at0004 = ╱9d╱ EXEC ╱ // 0x32a8 @0x4
0x32a4…32be at0005 = ╱46╱F╱ // 0x32a9 @0x5
0x32a4…32be at0006 = ╱45╱E╱ // 0x32aa @0x6
0x32a4…32be at0007 = ╱4a╱J╱ // 0x32ab @0x7
0x32a4…32be at0008 = ╱4c╱L╱ // 0x32ac @0x8
0x32a4…32be at0009 = ╱ed╱(╱ // 0x32ad @0x9
0x32a4…32be at000a = ╱57╱W╱ // 0x32ae @0xa
0x32a4…32be at000b = ╱ec╱,╱ // 0x32af @0xb
0x32a4…32be at000c = ╱32╱2╱ // 0x32b0 @0xc
0x32a4…32be at000d = ╱37╱7╱ // 0x32b1 @0xd
0x32a4…32be at000e = ╱fe0000d805╱ // 0x32b2 @0xe
0x32a4…32be at0013 = ╱ec╱,╱ // 0x32b7 @0x13
0x32a4…32be at0014 = ╱4b╱K╱ // 0x32b8 @0x14
0x32a4…32be at0015 = ╱31╱1╱ // 0x32b9 @0x15
0x32a4…32be at0016 = ╱34╱4╱ // 0x32ba @0x16
0x32a4…32be at0017 = ╱ef╱$╱ // 0x32bb @0x17
0x32a4…32be at0018 = ╱ee╱)╱ // 0x32bc @0x18
0x32a4…32be at0019 = EOL // 0x32bd @0x19
0x32a4…32be }
0x32be…32d8 c02f 5760 GET K14$,18:EGNAVN$
0x32be…32d8 LineComalBin {
0x32be…32d8 ptr = 0xc02f // 0x32be @0x0
0x32be…32d8 lno = 0x1680 // 0x32c0 @0x2
0x32be…32d8 at0004 = ╱a9╱ GET ╱ // 0x32c2 @0x4
0x32be…32d8 at0005 = ╱4b╱K╱ // 0x32c3 @0x5
0x32be…32d8 at0006 = ╱31╱1╱ // 0x32c4 @0x6
0x32be…32d8 at0007 = ╱34╱4╱ // 0x32c5 @0x7
0x32be…32d8 at0008 = ╱ef╱$╱ // 0x32c6 @0x8
0x32be…32d8 at0009 = ╱ec╱,╱ // 0x32c7 @0x9
0x32be…32d8 at000a = ╱31╱1╱ // 0x32c8 @0xa
0x32be…32d8 at000b = ╱38╱8╱ // 0x32c9 @0xb
0x32be…32d8 at000c = ╱fe00009005╱ // 0x32ca @0xc
0x32be…32d8 at0011 = ╱f0╱:╱ // 0x32cf @0x11
0x32be…32d8 at0012 = ╱45╱E╱ // 0x32d0 @0x12
0x32be…32d8 at0013 = ╱47╱G╱ // 0x32d1 @0x13
0x32be…32d8 at0014 = ╱4e╱N╱ // 0x32d2 @0x14
0x32be…32d8 at0015 = ╱41╱A╱ // 0x32d3 @0x15
0x32be…32d8 at0016 = ╱56╱V╱ // 0x32d4 @0x16
0x32be…32d8 at0017 = ╱4e╱N╱ // 0x32d5 @0x17
0x32be…32d8 at0018 = ╱ef╱$╱ // 0x32d6 @0x18
0x32be…32d8 at0019 = EOL // 0x32d7 @0x19
0x32be…32d8 }
0x32d8…32f2 c049 5770 EXEC FEJL(W,50,K14$)
0x32d8…32f2 LineComalBin {
0x32d8…32f2 ptr = 0xc049 // 0x32d8 @0x0
0x32d8…32f2 lno = 0x168a // 0x32da @0x2
0x32d8…32f2 at0004 = ╱9d╱ EXEC ╱ // 0x32dc @0x4
0x32d8…32f2 at0005 = ╱46╱F╱ // 0x32dd @0x5
0x32d8…32f2 at0006 = ╱45╱E╱ // 0x32de @0x6
0x32d8…32f2 at0007 = ╱4a╱J╱ // 0x32df @0x7
0x32d8…32f2 at0008 = ╱4c╱L╱ // 0x32e0 @0x8
0x32d8…32f2 at0009 = ╱ed╱(╱ // 0x32e1 @0x9
0x32d8…32f2 at000a = ╱57╱W╱ // 0x32e2 @0xa
0x32d8…32f2 at000b = ╱ec╱,╱ // 0x32e3 @0xb
0x32d8…32f2 at000c = ╱35╱5╱ // 0x32e4 @0xc
0x32d8…32f2 at000d = ╱30╱0╱ // 0x32e5 @0xd
0x32d8…32f2 at000e = ╱fe0000c806╱ // 0x32e6 @0xe
0x32d8…32f2 at0013 = ╱ec╱,╱ // 0x32eb @0x13
0x32d8…32f2 at0014 = ╱4b╱K╱ // 0x32ec @0x14
0x32d8…32f2 at0015 = ╱31╱1╱ // 0x32ed @0x15
0x32d8…32f2 at0016 = ╱34╱4╱ // 0x32ee @0x16
0x32d8…32f2 at0017 = ╱ef╱$╱ // 0x32ef @0x17
0x32d8…32f2 at0018 = ╱ee╱)╱ // 0x32f0 @0x18
0x32d8…32f2 at0019 = EOL // 0x32f1 @0x19
0x32d8…32f2 }
0x32f2…330c c063 5780 GET K14$,19:EGGADE$
0x32f2…330c LineComalBin {
0x32f2…330c ptr = 0xc063 // 0x32f2 @0x0
0x32f2…330c lno = 0x1694 // 0x32f4 @0x2
0x32f2…330c at0004 = ╱a9╱ GET ╱ // 0x32f6 @0x4
0x32f2…330c at0005 = ╱4b╱K╱ // 0x32f7 @0x5
0x32f2…330c at0006 = ╱31╱1╱ // 0x32f8 @0x6
0x32f2…330c at0007 = ╱34╱4╱ // 0x32f9 @0x7
0x32f2…330c at0008 = ╱ef╱$╱ // 0x32fa @0x8
0x32f2…330c at0009 = ╱ec╱,╱ // 0x32fb @0x9
0x32f2…330c at000a = ╱31╱1╱ // 0x32fc @0xa
0x32f2…330c at000b = ╱39╱9╱ // 0x32fd @0xb
0x32f2…330c at000c = ╱fe00009805╱ // 0x32fe @0xc
0x32f2…330c at0011 = ╱f0╱:╱ // 0x3303 @0x11
0x32f2…330c at0012 = ╱45╱E╱ // 0x3304 @0x12
0x32f2…330c at0013 = ╱47╱G╱ // 0x3305 @0x13
0x32f2…330c at0014 = ╱47╱G╱ // 0x3306 @0x14
0x32f2…330c at0015 = ╱41╱A╱ // 0x3307 @0x15
0x32f2…330c at0016 = ╱44╱D╱ // 0x3308 @0x16
0x32f2…330c at0017 = ╱45╱E╱ // 0x3309 @0x17
0x32f2…330c at0018 = ╱ef╱$╱ // 0x330a @0x18
0x32f2…330c at0019 = EOL // 0x330b @0x19
0x32f2…330c }
0x330c…3326 c07d 5790 EXEC FEJL(W,51,K14$)
0x330c…3326 LineComalBin {
0x330c…3326 ptr = 0xc07d // 0x330c @0x0
0x330c…3326 lno = 0x169e // 0x330e @0x2
0x330c…3326 at0004 = ╱9d╱ EXEC ╱ // 0x3310 @0x4
0x330c…3326 at0005 = ╱46╱F╱ // 0x3311 @0x5
0x330c…3326 at0006 = ╱45╱E╱ // 0x3312 @0x6
0x330c…3326 at0007 = ╱4a╱J╱ // 0x3313 @0x7
0x330c…3326 at0008 = ╱4c╱L╱ // 0x3314 @0x8
0x330c…3326 at0009 = ╱ed╱(╱ // 0x3315 @0x9
0x330c…3326 at000a = ╱57╱W╱ // 0x3316 @0xa
0x330c…3326 at000b = ╱ec╱,╱ // 0x3317 @0xb
0x330c…3326 at000c = ╱35╱5╱ // 0x3318 @0xc
0x330c…3326 at000d = ╱31╱1╱ // 0x3319 @0xd
0x330c…3326 at000e = ╱fe0000cc06╱ // 0x331a @0xe
0x330c…3326 at0013 = ╱ec╱,╱ // 0x331f @0x13
0x330c…3326 at0014 = ╱4b╱K╱ // 0x3320 @0x14
0x330c…3326 at0015 = ╱31╱1╱ // 0x3321 @0x15
0x330c…3326 at0016 = ╱34╱4╱ // 0x3322 @0x16
0x330c…3326 at0017 = ╱ef╱$╱ // 0x3323 @0x17
0x330c…3326 at0018 = ╱ee╱)╱ // 0x3324 @0x18
0x330c…3326 at0019 = EOL // 0x3325 @0x19
0x330c…3326 }
0x3326…334c c0a3 5800 GET K14$,20:DV$,EGBY$,EGPOSTNR$
0x3326…334c LineComalBin {
0x3326…334c ptr = 0xc0a3 // 0x3326 @0x0
0x3326…334c lno = 0x16a8 // 0x3328 @0x2
0x3326…334c at0004 = ╱a9╱ GET ╱ // 0x332a @0x4
0x3326…334c at0005 = ╱4b╱K╱ // 0x332b @0x5
0x3326…334c at0006 = ╱31╱1╱ // 0x332c @0x6
0x3326…334c at0007 = ╱34╱4╱ // 0x332d @0x7
0x3326…334c at0008 = ╱ef╱$╱ // 0x332e @0x8
0x3326…334c at0009 = ╱ec╱,╱ // 0x332f @0x9
0x3326…334c at000a = ╱32╱2╱ // 0x3330 @0xa
0x3326…334c at000b = ╱30╱0╱ // 0x3331 @0xb
0x3326…334c at000c = ╱fe0000a005╱ // 0x3332 @0xc
0x3326…334c at0011 = ╱f0╱:╱ // 0x3337 @0x11
0x3326…334c at0012 = ╱44╱D╱ // 0x3338 @0x12
0x3326…334c at0013 = ╱56╱V╱ // 0x3339 @0x13
0x3326…334c at0014 = ╱ef╱$╱ // 0x333a @0x14
0x3326…334c at0015 = ╱ec╱,╱ // 0x333b @0x15
0x3326…334c at0016 = ╱45╱E╱ // 0x333c @0x16
0x3326…334c at0017 = ╱47╱G╱ // 0x333d @0x17
0x3326…334c at0018 = ╱42╱B╱ // 0x333e @0x18
0x3326…334c at0019 = ╱59╱Y╱ // 0x333f @0x19
0x3326…334c at001a = ╱ef╱$╱ // 0x3340 @0x1a
0x3326…334c at001b = ╱ec╱,╱ // 0x3341 @0x1b
0x3326…334c at001c = ╱45╱E╱ // 0x3342 @0x1c
0x3326…334c at001d = ╱47╱G╱ // 0x3343 @0x1d
0x3326…334c at001e = ╱50╱P╱ // 0x3344 @0x1e
0x3326…334c at001f = ╱4f╱O╱ // 0x3345 @0x1f
0x3326…334c at0020 = ╱53╱S╱ // 0x3346 @0x20
0x3326…334c at0021 = ╱54╱T╱ // 0x3347 @0x21
0x3326…334c at0022 = ╱4e╱N╱ // 0x3348 @0x22
0x3326…334c at0023 = ╱52╱R╱ // 0x3349 @0x23
0x3326…334c at0024 = ╱ef╱$╱ // 0x334a @0x24
0x3326…334c at0025 = EOL // 0x334b @0x25
0x3326…334c }
0x334c…3366 c0bd 5810 EXEC FEJL(W,52,K14$)
0x334c…3366 LineComalBin {
0x334c…3366 ptr = 0xc0bd // 0x334c @0x0
0x334c…3366 lno = 0x16b2 // 0x334e @0x2
0x334c…3366 at0004 = ╱9d╱ EXEC ╱ // 0x3350 @0x4
0x334c…3366 at0005 = ╱46╱F╱ // 0x3351 @0x5
0x334c…3366 at0006 = ╱45╱E╱ // 0x3352 @0x6
0x334c…3366 at0007 = ╱4a╱J╱ // 0x3353 @0x7
0x334c…3366 at0008 = ╱4c╱L╱ // 0x3354 @0x8
0x334c…3366 at0009 = ╱ed╱(╱ // 0x3355 @0x9
0x334c…3366 at000a = ╱57╱W╱ // 0x3356 @0xa
0x334c…3366 at000b = ╱ec╱,╱ // 0x3357 @0xb
0x334c…3366 at000c = ╱35╱5╱ // 0x3358 @0xc
0x334c…3366 at000d = ╱32╱2╱ // 0x3359 @0xd
0x334c…3366 at000e = ╱fe0000d006╱ // 0x335a @0xe
0x334c…3366 at0013 = ╱ec╱,╱ // 0x335f @0x13
0x334c…3366 at0014 = ╱4b╱K╱ // 0x3360 @0x14
0x334c…3366 at0015 = ╱31╱1╱ // 0x3361 @0x15
0x334c…3366 at0016 = ╱34╱4╱ // 0x3362 @0x16
0x334c…3366 at0017 = ╱ef╱$╱ // 0x3363 @0x17
0x334c…3366 at0018 = ╱ee╱)╱ // 0x3364 @0x18
0x334c…3366 at0019 = EOL // 0x3365 @0x19
0x334c…3366 }
0x3366…3370 c0c7 5820 CLOSE K14$
0x3366…3370 LineComalBin {
0x3366…3370 ptr = 0xc0c7 // 0x3366 @0x0
0x3366…3370 lno = 0x16bc // 0x3368 @0x2
0x3366…3370 at0004 = ╱a8╱ CLOSE ╱ // 0x336a @0x4
0x3366…3370 at0005 = ╱4b╱K╱ // 0x336b @0x5
0x3366…3370 at0006 = ╱31╱1╱ // 0x336c @0x6
0x3366…3370 at0007 = ╱34╱4╱ // 0x336d @0x7
0x3366…3370 at0008 = ╱ef╱$╱ // 0x336e @0x8
0x3366…3370 at0009 = EOL // 0x336f @0x9
0x3366…3370 }
0x3370…338a c0e1 5830 EXEC FEJL(W,31,K14$)
0x3370…338a LineComalBin {
0x3370…338a ptr = 0xc0e1 // 0x3370 @0x0
0x3370…338a lno = 0x16c6 // 0x3372 @0x2
0x3370…338a at0004 = ╱9d╱ EXEC ╱ // 0x3374 @0x4
0x3370…338a at0005 = ╱46╱F╱ // 0x3375 @0x5
0x3370…338a at0006 = ╱45╱E╱ // 0x3376 @0x6
0x3370…338a at0007 = ╱4a╱J╱ // 0x3377 @0x7
0x3370…338a at0008 = ╱4c╱L╱ // 0x3378 @0x8
0x3370…338a at0009 = ╱ed╱(╱ // 0x3379 @0x9
0x3370…338a at000a = ╱57╱W╱ // 0x337a @0xa
0x3370…338a at000b = ╱ec╱,╱ // 0x337b @0xb
0x3370…338a at000c = ╱33╱3╱ // 0x337c @0xc
0x3370…338a at000d = ╱31╱1╱ // 0x337d @0xd
0x3370…338a at000e = ╱fe0000f805╱ // 0x337e @0xe
0x3370…338a at0013 = ╱ec╱,╱ // 0x3383 @0x13
0x3370…338a at0014 = ╱4b╱K╱ // 0x3384 @0x14
0x3370…338a at0015 = ╱31╱1╱ // 0x3385 @0x15
0x3370…338a at0016 = ╱34╱4╱ // 0x3386 @0x16
0x3370…338a at0017 = ╱ef╱$╱ // 0x3387 @0x17
0x3370…338a at0018 = ╱ee╱)╱ // 0x3388 @0x18
0x3370…338a at0019 = EOL // 0x3389 @0x19
0x3370…338a }
0x338a…3395 c0ec 5840 OPEN K2$,R
0x338a…3395 LineComalBin {
0x338a…3395 ptr = 0xc0ec // 0x338a @0x0
0x338a…3395 lno = 0x16d0 // 0x338c @0x2
0x338a…3395 at0004 = ╱a7╱ OPEN ╱ // 0x338e @0x4
0x338a…3395 at0005 = ╱4b╱K╱ // 0x338f @0x5
0x338a…3395 at0006 = ╱32╱2╱ // 0x3390 @0x6
0x338a…3395 at0007 = ╱ef╱$╱ // 0x3391 @0x7
0x338a…3395 at0008 = ╱ec╱,╱ // 0x3392 @0x8
0x338a…3395 at0009 = ╱52╱R╱ // 0x3393 @0x9
0x338a…3395 at000a = EOL // 0x3394 @0xa
0x338a…3395 }
0x3395…33ae c105 5850 EXEC FEJL(W,32,K2$)
0x3395…33ae LineComalBin {
0x3395…33ae ptr = 0xc105 // 0x3395 @0x0
0x3395…33ae lno = 0x16da // 0x3397 @0x2
0x3395…33ae at0004 = ╱9d╱ EXEC ╱ // 0x3399 @0x4
0x3395…33ae at0005 = ╱46╱F╱ // 0x339a @0x5
0x3395…33ae at0006 = ╱45╱E╱ // 0x339b @0x6
0x3395…33ae at0007 = ╱4a╱J╱ // 0x339c @0x7
0x3395…33ae at0008 = ╱4c╱L╱ // 0x339d @0x8
0x3395…33ae at0009 = ╱ed╱(╱ // 0x339e @0x9
0x3395…33ae at000a = ╱57╱W╱ // 0x339f @0xa
0x3395…33ae at000b = ╱ec╱,╱ // 0x33a0 @0xb
0x3395…33ae at000c = ╱33╱3╱ // 0x33a1 @0xc
0x3395…33ae at000d = ╱32╱2╱ // 0x33a2 @0xd
0x3395…33ae at000e = ╱fe00008006╱ // 0x33a3 @0xe
0x3395…33ae at0013 = ╱ec╱,╱ // 0x33a8 @0x13
0x3395…33ae at0014 = ╱4b╱K╱ // 0x33a9 @0x14
0x3395…33ae at0015 = ╱32╱2╱ // 0x33aa @0x15
0x3395…33ae at0016 = ╱ef╱$╱ // 0x33ab @0x16
0x3395…33ae at0017 = ╱ee╱)╱ // 0x33ac @0x17
0x3395…33ae at0018 = EOL // 0x33ad @0x18
0x3395…33ae }
0x33ae…33b9 c110 5860 OPEN K3$,R
0x33ae…33b9 LineComalBin {
0x33ae…33b9 ptr = 0xc110 // 0x33ae @0x0
0x33ae…33b9 lno = 0x16e4 // 0x33b0 @0x2
0x33ae…33b9 at0004 = ╱a7╱ OPEN ╱ // 0x33b2 @0x4
0x33ae…33b9 at0005 = ╱4b╱K╱ // 0x33b3 @0x5
0x33ae…33b9 at0006 = ╱33╱3╱ // 0x33b4 @0x6
0x33ae…33b9 at0007 = ╱ef╱$╱ // 0x33b5 @0x7
0x33ae…33b9 at0008 = ╱ec╱,╱ // 0x33b6 @0x8
0x33ae…33b9 at0009 = ╱52╱R╱ // 0x33b7 @0x9
0x33ae…33b9 at000a = EOL // 0x33b8 @0xa
0x33ae…33b9 }
0x33b9…33d2 c129 5870 EXEC FEJL(W,33,K3$)
0x33b9…33d2 LineComalBin {
0x33b9…33d2 ptr = 0xc129 // 0x33b9 @0x0
0x33b9…33d2 lno = 0x16ee // 0x33bb @0x2
0x33b9…33d2 at0004 = ╱9d╱ EXEC ╱ // 0x33bd @0x4
0x33b9…33d2 at0005 = ╱46╱F╱ // 0x33be @0x5
0x33b9…33d2 at0006 = ╱45╱E╱ // 0x33bf @0x6
0x33b9…33d2 at0007 = ╱4a╱J╱ // 0x33c0 @0x7
0x33b9…33d2 at0008 = ╱4c╱L╱ // 0x33c1 @0x8
0x33b9…33d2 at0009 = ╱ed╱(╱ // 0x33c2 @0x9
0x33b9…33d2 at000a = ╱57╱W╱ // 0x33c3 @0xa
0x33b9…33d2 at000b = ╱ec╱,╱ // 0x33c4 @0xb
0x33b9…33d2 at000c = ╱33╱3╱ // 0x33c5 @0xc
0x33b9…33d2 at000d = ╱33╱3╱ // 0x33c6 @0xd
0x33b9…33d2 at000e = ╱fe00008406╱ // 0x33c7 @0xe
0x33b9…33d2 at0013 = ╱ec╱,╱ // 0x33cc @0x13
0x33b9…33d2 at0014 = ╱4b╱K╱ // 0x33cd @0x14
0x33b9…33d2 at0015 = ╱33╱3╱ // 0x33ce @0x15
0x33b9…33d2 at0016 = ╱ef╱$╱ // 0x33cf @0x16
0x33b9…33d2 at0017 = ╱ee╱)╱ // 0x33d0 @0x17
0x33b9…33d2 at0018 = EOL // 0x33d1 @0x18
0x33b9…33d2 }
0x33d2…33dd c134 5880 OPEN K4$,R
0x33d2…33dd LineComalBin {
0x33d2…33dd ptr = 0xc134 // 0x33d2 @0x0
0x33d2…33dd lno = 0x16f8 // 0x33d4 @0x2
0x33d2…33dd at0004 = ╱a7╱ OPEN ╱ // 0x33d6 @0x4
0x33d2…33dd at0005 = ╱4b╱K╱ // 0x33d7 @0x5
0x33d2…33dd at0006 = ╱34╱4╱ // 0x33d8 @0x6
0x33d2…33dd at0007 = ╱ef╱$╱ // 0x33d9 @0x7
0x33d2…33dd at0008 = ╱ec╱,╱ // 0x33da @0x8
0x33d2…33dd at0009 = ╱52╱R╱ // 0x33db @0x9
0x33d2…33dd at000a = EOL // 0x33dc @0xa
0x33d2…33dd }
0x33dd…33f6 c14d 5890 EXEC FEJL(W,34,K4$)
0x33dd…33f6 LineComalBin {
0x33dd…33f6 ptr = 0xc14d // 0x33dd @0x0
0x33dd…33f6 lno = 0x1702 // 0x33df @0x2
0x33dd…33f6 at0004 = ╱9d╱ EXEC ╱ // 0x33e1 @0x4
0x33dd…33f6 at0005 = ╱46╱F╱ // 0x33e2 @0x5
0x33dd…33f6 at0006 = ╱45╱E╱ // 0x33e3 @0x6
0x33dd…33f6 at0007 = ╱4a╱J╱ // 0x33e4 @0x7
0x33dd…33f6 at0008 = ╱4c╱L╱ // 0x33e5 @0x8
0x33dd…33f6 at0009 = ╱ed╱(╱ // 0x33e6 @0x9
0x33dd…33f6 at000a = ╱57╱W╱ // 0x33e7 @0xa
0x33dd…33f6 at000b = ╱ec╱,╱ // 0x33e8 @0xb
0x33dd…33f6 at000c = ╱33╱3╱ // 0x33e9 @0xc
0x33dd…33f6 at000d = ╱34╱4╱ // 0x33ea @0xd
0x33dd…33f6 at000e = ╱fe00008806╱ // 0x33eb @0xe
0x33dd…33f6 at0013 = ╱ec╱,╱ // 0x33f0 @0x13
0x33dd…33f6 at0014 = ╱4b╱K╱ // 0x33f1 @0x14
0x33dd…33f6 at0015 = ╱34╱4╱ // 0x33f2 @0x15
0x33dd…33f6 at0016 = ╱ef╱$╱ // 0x33f3 @0x16
0x33dd…33f6 at0017 = ╱ee╱)╱ // 0x33f4 @0x17
0x33dd…33f6 at0018 = EOL // 0x33f5 @0x18
0x33dd…33f6 }
0x33f6…3401 c158 5900 OPEN K5$,R
0x33f6…3401 LineComalBin {
0x33f6…3401 ptr = 0xc158 // 0x33f6 @0x0
0x33f6…3401 lno = 0x170c // 0x33f8 @0x2
0x33f6…3401 at0004 = ╱a7╱ OPEN ╱ // 0x33fa @0x4
0x33f6…3401 at0005 = ╱4b╱K╱ // 0x33fb @0x5
0x33f6…3401 at0006 = ╱35╱5╱ // 0x33fc @0x6
0x33f6…3401 at0007 = ╱ef╱$╱ // 0x33fd @0x7
0x33f6…3401 at0008 = ╱ec╱,╱ // 0x33fe @0x8
0x33f6…3401 at0009 = ╱52╱R╱ // 0x33ff @0x9
0x33f6…3401 at000a = EOL // 0x3400 @0xa
0x33f6…3401 }
0x3401…341a c171 5910 EXEC FEJL(W,35,K5$)
0x3401…341a LineComalBin {
0x3401…341a ptr = 0xc171 // 0x3401 @0x0
0x3401…341a lno = 0x1716 // 0x3403 @0x2
0x3401…341a at0004 = ╱9d╱ EXEC ╱ // 0x3405 @0x4
0x3401…341a at0005 = ╱46╱F╱ // 0x3406 @0x5
0x3401…341a at0006 = ╱45╱E╱ // 0x3407 @0x6
0x3401…341a at0007 = ╱4a╱J╱ // 0x3408 @0x7
0x3401…341a at0008 = ╱4c╱L╱ // 0x3409 @0x8
0x3401…341a at0009 = ╱ed╱(╱ // 0x340a @0x9
0x3401…341a at000a = ╱57╱W╱ // 0x340b @0xa
0x3401…341a at000b = ╱ec╱,╱ // 0x340c @0xb
0x3401…341a at000c = ╱33╱3╱ // 0x340d @0xc
0x3401…341a at000d = ╱35╱5╱ // 0x340e @0xd
0x3401…341a at000e = ╱fe00008c06╱ // 0x340f @0xe
0x3401…341a at0013 = ╱ec╱,╱ // 0x3414 @0x13
0x3401…341a at0014 = ╱4b╱K╱ // 0x3415 @0x14
0x3401…341a at0015 = ╱35╱5╱ // 0x3416 @0x15
0x3401…341a at0016 = ╱ef╱$╱ // 0x3417 @0x16
0x3401…341a at0017 = ╱ee╱)╱ // 0x3418 @0x17
0x3401…341a at0018 = EOL // 0x3419 @0x18
0x3401…341a }
0x341a…3425 c17c 5920 OPEN K6$,R
0x341a…3425 LineComalBin {
0x341a…3425 ptr = 0xc17c // 0x341a @0x0
0x341a…3425 lno = 0x1720 // 0x341c @0x2
0x341a…3425 at0004 = ╱a7╱ OPEN ╱ // 0x341e @0x4
0x341a…3425 at0005 = ╱4b╱K╱ // 0x341f @0x5
0x341a…3425 at0006 = ╱36╱6╱ // 0x3420 @0x6
0x341a…3425 at0007 = ╱ef╱$╱ // 0x3421 @0x7
0x341a…3425 at0008 = ╱ec╱,╱ // 0x3422 @0x8
0x341a…3425 at0009 = ╱52╱R╱ // 0x3423 @0x9
0x341a…3425 at000a = EOL // 0x3424 @0xa
0x341a…3425 }
0x3425…343e c195 5930 EXEC FEJL(W,36,K6$)
0x3425…343e LineComalBin {
0x3425…343e ptr = 0xc195 // 0x3425 @0x0
0x3425…343e lno = 0x172a // 0x3427 @0x2
0x3425…343e at0004 = ╱9d╱ EXEC ╱ // 0x3429 @0x4
0x3425…343e at0005 = ╱46╱F╱ // 0x342a @0x5
0x3425…343e at0006 = ╱45╱E╱ // 0x342b @0x6
0x3425…343e at0007 = ╱4a╱J╱ // 0x342c @0x7
0x3425…343e at0008 = ╱4c╱L╱ // 0x342d @0x8
0x3425…343e at0009 = ╱ed╱(╱ // 0x342e @0x9
0x3425…343e at000a = ╱57╱W╱ // 0x342f @0xa
0x3425…343e at000b = ╱ec╱,╱ // 0x3430 @0xb
0x3425…343e at000c = ╱33╱3╱ // 0x3431 @0xc
0x3425…343e at000d = ╱36╱6╱ // 0x3432 @0xd
0x3425…343e at000e = ╱fe00009006╱ // 0x3433 @0xe
0x3425…343e at0013 = ╱ec╱,╱ // 0x3438 @0x13
0x3425…343e at0014 = ╱4b╱K╱ // 0x3439 @0x14
0x3425…343e at0015 = ╱36╱6╱ // 0x343a @0x15
0x3425…343e at0016 = ╱ef╱$╱ // 0x343b @0x16
0x3425…343e at0017 = ╱ee╱)╱ // 0x343c @0x17
0x3425…343e at0018 = EOL // 0x343d @0x18
0x3425…343e }
0x343e…3449 c1a0 5940 OPEN K7$,R
0x343e…3449 LineComalBin {
0x343e…3449 ptr = 0xc1a0 // 0x343e @0x0
0x343e…3449 lno = 0x1734 // 0x3440 @0x2
0x343e…3449 at0004 = ╱a7╱ OPEN ╱ // 0x3442 @0x4
0x343e…3449 at0005 = ╱4b╱K╱ // 0x3443 @0x5
0x343e…3449 at0006 = ╱37╱7╱ // 0x3444 @0x6
0x343e…3449 at0007 = ╱ef╱$╱ // 0x3445 @0x7
0x343e…3449 at0008 = ╱ec╱,╱ // 0x3446 @0x8
0x343e…3449 at0009 = ╱52╱R╱ // 0x3447 @0x9
0x343e…3449 at000a = EOL // 0x3448 @0xa
0x343e…3449 }
0x3449…3462 c1b9 5950 EXEC FEJL(W,37,K7$)
0x3449…3462 LineComalBin {
0x3449…3462 ptr = 0xc1b9 // 0x3449 @0x0
0x3449…3462 lno = 0x173e // 0x344b @0x2
0x3449…3462 at0004 = ╱9d╱ EXEC ╱ // 0x344d @0x4
0x3449…3462 at0005 = ╱46╱F╱ // 0x344e @0x5
0x3449…3462 at0006 = ╱45╱E╱ // 0x344f @0x6
0x3449…3462 at0007 = ╱4a╱J╱ // 0x3450 @0x7
0x3449…3462 at0008 = ╱4c╱L╱ // 0x3451 @0x8
0x3449…3462 at0009 = ╱ed╱(╱ // 0x3452 @0x9
0x3449…3462 at000a = ╱57╱W╱ // 0x3453 @0xa
0x3449…3462 at000b = ╱ec╱,╱ // 0x3454 @0xb
0x3449…3462 at000c = ╱33╱3╱ // 0x3455 @0xc
0x3449…3462 at000d = ╱37╱7╱ // 0x3456 @0xd
0x3449…3462 at000e = ╱fe00009406╱ // 0x3457 @0xe
0x3449…3462 at0013 = ╱ec╱,╱ // 0x345c @0x13
0x3449…3462 at0014 = ╱4b╱K╱ // 0x345d @0x14
0x3449…3462 at0015 = ╱37╱7╱ // 0x345e @0x15
0x3449…3462 at0016 = ╱ef╱$╱ // 0x345f @0x16
0x3449…3462 at0017 = ╱ee╱)╱ // 0x3460 @0x17
0x3449…3462 at0018 = EOL // 0x3461 @0x18
0x3449…3462 }
0x3462…349a c1f1 5960 DIM DTAB1(MDANTAL DIV C),FTAB1(MFANTAL DIV C),KTAB1(MKANTAL DIV C)
0x3462…349a LineComalBin {
0x3462…349a ptr = 0xc1f1 // 0x3462 @0x0
0x3462…349a lno = 0x1748 // 0x3464 @0x2
0x3462…349a at0004 = ╱87╱ DIM ╱ // 0x3466 @0x4
0x3462…349a at0005 = ╱44╱D╱ // 0x3467 @0x5
0x3462…349a at0006 = ╱54╱T╱ // 0x3468 @0x6
0x3462…349a at0007 = ╱41╱A╱ // 0x3469 @0x7
0x3462…349a at0008 = ╱42╱B╱ // 0x346a @0x8
0x3462…349a at0009 = ╱31╱1╱ // 0x346b @0x9
0x3462…349a at000a = ╱ed╱(╱ // 0x346c @0xa
0x3462…349a at000b = ╱4d╱M╱ // 0x346d @0xb
0x3462…349a at000c = ╱44╱D╱ // 0x346e @0xc
0x3462…349a at000d = ╱41╱A╱ // 0x346f @0xd
0x3462…349a at000e = ╱4e╱N╱ // 0x3470 @0xe
0x3462…349a at000f = ╱54╱T╱ // 0x3471 @0xf
0x3462…349a at0010 = ╱41╱A╱ // 0x3472 @0x10
0x3462…349a at0011 = ╱4c╱L╱ // 0x3473 @0x11
0x3462…349a at0012 = ╱e7╱ DIV ╱ // 0x3474 @0x12
0x3462…349a at0013 = ╱43╱C╱ // 0x3475 @0x13
0x3462…349a at0014 = ╱ee╱)╱ // 0x3476 @0x14
0x3462…349a at0015 = ╱ec╱,╱ // 0x3477 @0x15
0x3462…349a at0016 = ╱46╱F╱ // 0x3478 @0x16
0x3462…349a at0017 = ╱54╱T╱ // 0x3479 @0x17
0x3462…349a at0018 = ╱41╱A╱ // 0x347a @0x18
0x3462…349a at0019 = ╱42╱B╱ // 0x347b @0x19
0x3462…349a at001a = ╱31╱1╱ // 0x347c @0x1a
0x3462…349a at001b = ╱ed╱(╱ // 0x347d @0x1b
0x3462…349a at001c = ╱4d╱M╱ // 0x347e @0x1c
0x3462…349a at001d = ╱46╱F╱ // 0x347f @0x1d
0x3462…349a at001e = ╱41╱A╱ // 0x3480 @0x1e
0x3462…349a at001f = ╱4e╱N╱ // 0x3481 @0x1f
0x3462…349a at0020 = ╱54╱T╱ // 0x3482 @0x20
0x3462…349a at0021 = ╱41╱A╱ // 0x3483 @0x21
0x3462…349a at0022 = ╱4c╱L╱ // 0x3484 @0x22
0x3462…349a at0023 = ╱e7╱ DIV ╱ // 0x3485 @0x23
0x3462…349a at0024 = ╱43╱C╱ // 0x3486 @0x24
0x3462…349a at0025 = ╱ee╱)╱ // 0x3487 @0x25
0x3462…349a at0026 = ╱ec╱,╱ // 0x3488 @0x26
0x3462…349a at0027 = ╱4b╱K╱ // 0x3489 @0x27
0x3462…349a at0028 = ╱54╱T╱ // 0x348a @0x28
0x3462…349a at0029 = ╱41╱A╱ // 0x348b @0x29
0x3462…349a at002a = ╱42╱B╱ // 0x348c @0x2a
0x3462…349a at002b = ╱31╱1╱ // 0x348d @0x2b
0x3462…349a at002c = ╱ed╱(╱ // 0x348e @0x2c
0x3462…349a at002d = ╱4d╱M╱ // 0x348f @0x2d
0x3462…349a at002e = ╱4b╱K╱ // 0x3490 @0x2e
0x3462…349a at002f = ╱41╱A╱ // 0x3491 @0x2f
0x3462…349a at0030 = ╱4e╱N╱ // 0x3492 @0x30
0x3462…349a at0031 = ╱54╱T╱ // 0x3493 @0x31
0x3462…349a at0032 = ╱41╱A╱ // 0x3494 @0x32
0x3462…349a at0033 = ╱4c╱L╱ // 0x3495 @0x33
0x3462…349a at0034 = ╱e7╱ DIV ╱ // 0x3496 @0x34
0x3462…349a at0035 = ╱43╱C╱ // 0x3497 @0x35
0x3462…349a at0036 = ╱ee╱)╱ // 0x3498 @0x36
0x3462…349a at0037 = EOL // 0x3499 @0x37
0x3462…349a }
0x349a…34e3 c23a 5970 DIM HFTAB(MFPOST DIV 40,G),FTAB(C,G),KTAB(C,G),HDTAB(MDPOST DIV 40,G)
0x349a…34e3 LineComalBin {
0x349a…34e3 ptr = 0xc23a // 0x349a @0x0
0x349a…34e3 lno = 0x1752 // 0x349c @0x2
0x349a…34e3 at0004 = ╱87╱ DIM ╱ // 0x349e @0x4
0x349a…34e3 at0005 = ╱48╱H╱ // 0x349f @0x5
0x349a…34e3 at0006 = ╱46╱F╱ // 0x34a0 @0x6
0x349a…34e3 at0007 = ╱54╱T╱ // 0x34a1 @0x7
0x349a…34e3 at0008 = ╱41╱A╱ // 0x34a2 @0x8
0x349a…34e3 at0009 = ╱42╱B╱ // 0x34a3 @0x9
0x349a…34e3 at000a = ╱ed╱(╱ // 0x34a4 @0xa
0x349a…34e3 at000b = ╱4d╱M╱ // 0x34a5 @0xb
0x349a…34e3 at000c = ╱46╱F╱ // 0x34a6 @0xc
0x349a…34e3 at000d = ╱50╱P╱ // 0x34a7 @0xd
0x349a…34e3 at000e = ╱4f╱O╱ // 0x34a8 @0xe
0x349a…34e3 at000f = ╱53╱S╱ // 0x34a9 @0xf
0x349a…34e3 at0010 = ╱54╱T╱ // 0x34aa @0x10
0x349a…34e3 at0011 = ╱e7╱ DIV ╱ // 0x34ab @0x11
0x349a…34e3 at0012 = ╱34╱4╱ // 0x34ac @0x12
0x349a…34e3 at0013 = ╱30╱0╱ // 0x34ad @0x13
0x349a…34e3 at0014 = ╱fe0000a006╱ // 0x34ae @0x14
0x349a…34e3 at0019 = ╱ec╱,╱ // 0x34b3 @0x19
0x349a…34e3 at001a = ╱47╱G╱ // 0x34b4 @0x1a
0x349a…34e3 at001b = ╱ee╱)╱ // 0x34b5 @0x1b
0x349a…34e3 at001c = ╱ec╱,╱ // 0x34b6 @0x1c
0x349a…34e3 at001d = ╱46╱F╱ // 0x34b7 @0x1d
0x349a…34e3 at001e = ╱54╱T╱ // 0x34b8 @0x1e
0x349a…34e3 at001f = ╱41╱A╱ // 0x34b9 @0x1f
0x349a…34e3 at0020 = ╱42╱B╱ // 0x34ba @0x20
0x349a…34e3 at0021 = ╱ed╱(╱ // 0x34bb @0x21
0x349a…34e3 at0022 = ╱43╱C╱ // 0x34bc @0x22
0x349a…34e3 at0023 = ╱ec╱,╱ // 0x34bd @0x23
0x349a…34e3 at0024 = ╱47╱G╱ // 0x34be @0x24
0x349a…34e3 at0025 = ╱ee╱)╱ // 0x34bf @0x25
0x349a…34e3 at0026 = ╱ec╱,╱ // 0x34c0 @0x26
0x349a…34e3 at0027 = ╱4b╱K╱ // 0x34c1 @0x27
0x349a…34e3 at0028 = ╱54╱T╱ // 0x34c2 @0x28
0x349a…34e3 at0029 = ╱41╱A╱ // 0x34c3 @0x29
0x349a…34e3 at002a = ╱42╱B╱ // 0x34c4 @0x2a
0x349a…34e3 at002b = ╱ed╱(╱ // 0x34c5 @0x2b
0x349a…34e3 at002c = ╱43╱C╱ // 0x34c6 @0x2c
0x349a…34e3 at002d = ╱ec╱,╱ // 0x34c7 @0x2d
0x349a…34e3 at002e = ╱47╱G╱ // 0x34c8 @0x2e
0x349a…34e3 at002f = ╱ee╱)╱ // 0x34c9 @0x2f
0x349a…34e3 at0030 = ╱ec╱,╱ // 0x34ca @0x30
0x349a…34e3 at0031 = ╱48╱H╱ // 0x34cb @0x31
0x349a…34e3 at0032 = ╱44╱D╱ // 0x34cc @0x32
0x349a…34e3 at0033 = ╱54╱T╱ // 0x34cd @0x33
0x349a…34e3 at0034 = ╱41╱A╱ // 0x34ce @0x34
0x349a…34e3 at0035 = ╱42╱B╱ // 0x34cf @0x35
0x349a…34e3 at0036 = ╱ed╱(╱ // 0x34d0 @0x36
0x349a…34e3 at0037 = ╱4d╱M╱ // 0x34d1 @0x37
0x349a…34e3 at0038 = ╱44╱D╱ // 0x34d2 @0x38
0x349a…34e3 at0039 = ╱50╱P╱ // 0x34d3 @0x39
0x349a…34e3 at003a = ╱4f╱O╱ // 0x34d4 @0x3a
0x349a…34e3 at003b = ╱53╱S╱ // 0x34d5 @0x3b
0x349a…34e3 at003c = ╱54╱T╱ // 0x34d6 @0x3c
0x349a…34e3 at003d = ╱e7╱ DIV ╱ // 0x34d7 @0x3d
0x349a…34e3 at003e = ╱34╱4╱ // 0x34d8 @0x3e
0x349a…34e3 at003f = ╱30╱0╱ // 0x34d9 @0x3f
0x349a…34e3 at0040 = ╱fe0000a006╱ // 0x34da @0x40
0x349a…34e3 at0045 = ╱ec╱,╱ // 0x34df @0x45
0x349a…34e3 at0046 = ╱47╱G╱ // 0x34e0 @0x46
0x349a…34e3 at0047 = ╱ee╱)╱ // 0x34e1 @0x47
0x349a…34e3 at0048 = EOL // 0x34e2 @0x48
0x349a…34e3 }
0x34e3…352d c284 5990 DIM HKRTAB(MKPOST DIV 40,G),UFTAB(C,G),UDTAB(C,G),UKRTAB(C,G),DTAB(C,G)
0x34e3…352d LineComalBin {
0x34e3…352d ptr = 0xc284 // 0x34e3 @0x0
0x34e3…352d lno = 0x1766 // 0x34e5 @0x2
0x34e3…352d at0004 = ╱87╱ DIM ╱ // 0x34e7 @0x4
0x34e3…352d at0005 = ╱48╱H╱ // 0x34e8 @0x5
0x34e3…352d at0006 = ╱4b╱K╱ // 0x34e9 @0x6
0x34e3…352d at0007 = ╱52╱R╱ // 0x34ea @0x7
0x34e3…352d at0008 = ╱54╱T╱ // 0x34eb @0x8
0x34e3…352d at0009 = ╱41╱A╱ // 0x34ec @0x9
0x34e3…352d at000a = ╱42╱B╱ // 0x34ed @0xa
0x34e3…352d at000b = ╱ed╱(╱ // 0x34ee @0xb
0x34e3…352d at000c = ╱4d╱M╱ // 0x34ef @0xc
0x34e3…352d at000d = ╱4b╱K╱ // 0x34f0 @0xd
0x34e3…352d at000e = ╱50╱P╱ // 0x34f1 @0xe
0x34e3…352d at000f = ╱4f╱O╱ // 0x34f2 @0xf
0x34e3…352d at0010 = ╱53╱S╱ // 0x34f3 @0x10
0x34e3…352d at0011 = ╱54╱T╱ // 0x34f4 @0x11
0x34e3…352d at0012 = ╱e7╱ DIV ╱ // 0x34f5 @0x12
0x34e3…352d at0013 = ╱34╱4╱ // 0x34f6 @0x13
0x34e3…352d at0014 = ╱30╱0╱ // 0x34f7 @0x14
0x34e3…352d at0015 = ╱fe0000a006╱ // 0x34f8 @0x15
0x34e3…352d at001a = ╱ec╱,╱ // 0x34fd @0x1a
0x34e3…352d at001b = ╱47╱G╱ // 0x34fe @0x1b
0x34e3…352d at001c = ╱ee╱)╱ // 0x34ff @0x1c
0x34e3…352d at001d = ╱ec╱,╱ // 0x3500 @0x1d
0x34e3…352d at001e = ╱55╱U╱ // 0x3501 @0x1e
0x34e3…352d at001f = ╱46╱F╱ // 0x3502 @0x1f
0x34e3…352d at0020 = ╱54╱T╱ // 0x3503 @0x20
0x34e3…352d at0021 = ╱41╱A╱ // 0x3504 @0x21
0x34e3…352d at0022 = ╱42╱B╱ // 0x3505 @0x22
0x34e3…352d at0023 = ╱ed╱(╱ // 0x3506 @0x23
0x34e3…352d at0024 = ╱43╱C╱ // 0x3507 @0x24
0x34e3…352d at0025 = ╱ec╱,╱ // 0x3508 @0x25
0x34e3…352d at0026 = ╱47╱G╱ // 0x3509 @0x26
0x34e3…352d at0027 = ╱ee╱)╱ // 0x350a @0x27
0x34e3…352d at0028 = ╱ec╱,╱ // 0x350b @0x28
0x34e3…352d at0029 = ╱55╱U╱ // 0x350c @0x29
0x34e3…352d at002a = ╱44╱D╱ // 0x350d @0x2a
0x34e3…352d at002b = ╱54╱T╱ // 0x350e @0x2b
0x34e3…352d at002c = ╱41╱A╱ // 0x350f @0x2c
0x34e3…352d at002d = ╱42╱B╱ // 0x3510 @0x2d
0x34e3…352d at002e = ╱ed╱(╱ // 0x3511 @0x2e
0x34e3…352d at002f = ╱43╱C╱ // 0x3512 @0x2f
0x34e3…352d at0030 = ╱ec╱,╱ // 0x3513 @0x30
0x34e3…352d at0031 = ╱47╱G╱ // 0x3514 @0x31
0x34e3…352d at0032 = ╱ee╱)╱ // 0x3515 @0x32
0x34e3…352d at0033 = ╱ec╱,╱ // 0x3516 @0x33
0x34e3…352d at0034 = ╱55╱U╱ // 0x3517 @0x34
0x34e3…352d at0035 = ╱4b╱K╱ // 0x3518 @0x35
0x34e3…352d at0036 = ╱52╱R╱ // 0x3519 @0x36
0x34e3…352d at0037 = ╱54╱T╱ // 0x351a @0x37
0x34e3…352d at0038 = ╱41╱A╱ // 0x351b @0x38
0x34e3…352d at0039 = ╱42╱B╱ // 0x351c @0x39
0x34e3…352d at003a = ╱ed╱(╱ // 0x351d @0x3a
0x34e3…352d at003b = ╱43╱C╱ // 0x351e @0x3b
0x34e3…352d at003c = ╱ec╱,╱ // 0x351f @0x3c
0x34e3…352d at003d = ╱47╱G╱ // 0x3520 @0x3d
0x34e3…352d at003e = ╱ee╱)╱ // 0x3521 @0x3e
0x34e3…352d at003f = ╱ec╱,╱ // 0x3522 @0x3f
0x34e3…352d at0040 = ╱44╱D╱ // 0x3523 @0x40
0x34e3…352d at0041 = ╱54╱T╱ // 0x3524 @0x41
0x34e3…352d at0042 = ╱41╱A╱ // 0x3525 @0x42
0x34e3…352d at0043 = ╱42╱B╱ // 0x3526 @0x43
0x34e3…352d at0044 = ╱ed╱(╱ // 0x3527 @0x44
0x34e3…352d at0045 = ╱43╱C╱ // 0x3528 @0x45
0x34e3…352d at0046 = ╱ec╱,╱ // 0x3529 @0x46
0x34e3…352d at0047 = ╱47╱G╱ // 0x352a @0x47
0x34e3…352d at0048 = ╱ee╱)╱ // 0x352b @0x48
0x34e3…352d at0049 = EOL // 0x352c @0x49
0x34e3…352d }
0x352d…354d c2a4 6000 EXEC INDTAB1(FTAB1,MFANTAL,K2$)
0x352d…354d LineComalBin {
0x352d…354d ptr = 0xc2a4 // 0x352d @0x0
0x352d…354d lno = 0x1770 // 0x352f @0x2
0x352d…354d at0004 = ╱9d╱ EXEC ╱ // 0x3531 @0x4
0x352d…354d at0005 = ╱49╱I╱ // 0x3532 @0x5
0x352d…354d at0006 = ╱4e╱N╱ // 0x3533 @0x6
0x352d…354d at0007 = ╱44╱D╱ // 0x3534 @0x7
0x352d…354d at0008 = ╱54╱T╱ // 0x3535 @0x8
0x352d…354d at0009 = ╱41╱A╱ // 0x3536 @0x9
0x352d…354d at000a = ╱42╱B╱ // 0x3537 @0xa
0x352d…354d at000b = ╱31╱1╱ // 0x3538 @0xb
0x352d…354d at000c = ╱ed╱(╱ // 0x3539 @0xc
0x352d…354d at000d = ╱46╱F╱ // 0x353a @0xd
0x352d…354d at000e = ╱54╱T╱ // 0x353b @0xe
0x352d…354d at000f = ╱41╱A╱ // 0x353c @0xf
0x352d…354d at0010 = ╱42╱B╱ // 0x353d @0x10
0x352d…354d at0011 = ╱31╱1╱ // 0x353e @0x11
0x352d…354d at0012 = ╱ec╱,╱ // 0x353f @0x12
0x352d…354d at0013 = ╱4d╱M╱ // 0x3540 @0x13
0x352d…354d at0014 = ╱46╱F╱ // 0x3541 @0x14
0x352d…354d at0015 = ╱41╱A╱ // 0x3542 @0x15
0x352d…354d at0016 = ╱4e╱N╱ // 0x3543 @0x16
0x352d…354d at0017 = ╱54╱T╱ // 0x3544 @0x17
0x352d…354d at0018 = ╱41╱A╱ // 0x3545 @0x18
0x352d…354d at0019 = ╱4c╱L╱ // 0x3546 @0x19
0x352d…354d at001a = ╱ec╱,╱ // 0x3547 @0x1a
0x352d…354d at001b = ╱4b╱K╱ // 0x3548 @0x1b
0x352d…354d at001c = ╱32╱2╱ // 0x3549 @0x1c
0x352d…354d at001d = ╱ef╱$╱ // 0x354a @0x1d
0x352d…354d at001e = ╱ee╱)╱ // 0x354b @0x1e
0x352d…354d at001f = EOL // 0x354c @0x1f
0x352d…354d }
0x354d…356d c2c4 6010 EXEC INDTAB1(DTAB1,MDANTAL,K3$)
0x354d…356d LineComalBin {
0x354d…356d ptr = 0xc2c4 // 0x354d @0x0
0x354d…356d lno = 0x177a // 0x354f @0x2
0x354d…356d at0004 = ╱9d╱ EXEC ╱ // 0x3551 @0x4
0x354d…356d at0005 = ╱49╱I╱ // 0x3552 @0x5
0x354d…356d at0006 = ╱4e╱N╱ // 0x3553 @0x6
0x354d…356d at0007 = ╱44╱D╱ // 0x3554 @0x7
0x354d…356d at0008 = ╱54╱T╱ // 0x3555 @0x8
0x354d…356d at0009 = ╱41╱A╱ // 0x3556 @0x9
0x354d…356d at000a = ╱42╱B╱ // 0x3557 @0xa
0x354d…356d at000b = ╱31╱1╱ // 0x3558 @0xb
0x354d…356d at000c = ╱ed╱(╱ // 0x3559 @0xc
0x354d…356d at000d = ╱44╱D╱ // 0x355a @0xd
0x354d…356d at000e = ╱54╱T╱ // 0x355b @0xe
0x354d…356d at000f = ╱41╱A╱ // 0x355c @0xf
0x354d…356d at0010 = ╱42╱B╱ // 0x355d @0x10
0x354d…356d at0011 = ╱31╱1╱ // 0x355e @0x11
0x354d…356d at0012 = ╱ec╱,╱ // 0x355f @0x12
0x354d…356d at0013 = ╱4d╱M╱ // 0x3560 @0x13
0x354d…356d at0014 = ╱44╱D╱ // 0x3561 @0x14
0x354d…356d at0015 = ╱41╱A╱ // 0x3562 @0x15
0x354d…356d at0016 = ╱4e╱N╱ // 0x3563 @0x16
0x354d…356d at0017 = ╱54╱T╱ // 0x3564 @0x17
0x354d…356d at0018 = ╱41╱A╱ // 0x3565 @0x18
0x354d…356d at0019 = ╱4c╱L╱ // 0x3566 @0x19
0x354d…356d at001a = ╱ec╱,╱ // 0x3567 @0x1a
0x354d…356d at001b = ╱4b╱K╱ // 0x3568 @0x1b
0x354d…356d at001c = ╱33╱3╱ // 0x3569 @0x1c
0x354d…356d at001d = ╱ef╱$╱ // 0x356a @0x1d
0x354d…356d at001e = ╱ee╱)╱ // 0x356b @0x1e
0x354d…356d at001f = EOL // 0x356c @0x1f
0x354d…356d }
0x356d…358d c2e4 6020 EXEC INDTAB1(KTAB1,MKANTAL,K4$)
0x356d…358d LineComalBin {
0x356d…358d ptr = 0xc2e4 // 0x356d @0x0
0x356d…358d lno = 0x1784 // 0x356f @0x2
0x356d…358d at0004 = ╱9d╱ EXEC ╱ // 0x3571 @0x4
0x356d…358d at0005 = ╱49╱I╱ // 0x3572 @0x5
0x356d…358d at0006 = ╱4e╱N╱ // 0x3573 @0x6
0x356d…358d at0007 = ╱44╱D╱ // 0x3574 @0x7
0x356d…358d at0008 = ╱54╱T╱ // 0x3575 @0x8
0x356d…358d at0009 = ╱41╱A╱ // 0x3576 @0x9
0x356d…358d at000a = ╱42╱B╱ // 0x3577 @0xa
0x356d…358d at000b = ╱31╱1╱ // 0x3578 @0xb
0x356d…358d at000c = ╱ed╱(╱ // 0x3579 @0xc
0x356d…358d at000d = ╱4b╱K╱ // 0x357a @0xd
0x356d…358d at000e = ╱54╱T╱ // 0x357b @0xe
0x356d…358d at000f = ╱41╱A╱ // 0x357c @0xf
0x356d…358d at0010 = ╱42╱B╱ // 0x357d @0x10
0x356d…358d at0011 = ╱31╱1╱ // 0x357e @0x11
0x356d…358d at0012 = ╱ec╱,╱ // 0x357f @0x12
0x356d…358d at0013 = ╱4d╱M╱ // 0x3580 @0x13
0x356d…358d at0014 = ╱4b╱K╱ // 0x3581 @0x14
0x356d…358d at0015 = ╱41╱A╱ // 0x3582 @0x15
0x356d…358d at0016 = ╱4e╱N╱ // 0x3583 @0x16
0x356d…358d at0017 = ╱54╱T╱ // 0x3584 @0x17
0x356d…358d at0018 = ╱41╱A╱ // 0x3585 @0x18
0x356d…358d at0019 = ╱4c╱L╱ // 0x3586 @0x19
0x356d…358d at001a = ╱ec╱,╱ // 0x3587 @0x1a
0x356d…358d at001b = ╱4b╱K╱ // 0x3588 @0x1b
0x356d…358d at001c = ╱34╱4╱ // 0x3589 @0x1c
0x356d…358d at001d = ╱ef╱$╱ // 0x358a @0x1d
0x356d…358d at001e = ╱ee╱)╱ // 0x358b @0x1e
0x356d…358d at001f = EOL // 0x358c @0x1f
0x356d…358d }
0x358d…35ac c303 6030 EXEC HOVIND(K11$,MFPOST,HFTAB)
0x358d…35ac LineComalBin {
0x358d…35ac ptr = 0xc303 // 0x358d @0x0
0x358d…35ac lno = 0x178e // 0x358f @0x2
0x358d…35ac at0004 = ╱9d╱ EXEC ╱ // 0x3591 @0x4
0x358d…35ac at0005 = ╱48╱H╱ // 0x3592 @0x5
0x358d…35ac at0006 = ╱4f╱O╱ // 0x3593 @0x6
0x358d…35ac at0007 = ╱56╱V╱ // 0x3594 @0x7
0x358d…35ac at0008 = ╱49╱I╱ // 0x3595 @0x8
0x358d…35ac at0009 = ╱4e╱N╱ // 0x3596 @0x9
0x358d…35ac at000a = ╱44╱D╱ // 0x3597 @0xa
0x358d…35ac at000b = ╱ed╱(╱ // 0x3598 @0xb
0x358d…35ac at000c = ╱4b╱K╱ // 0x3599 @0xc
0x358d…35ac at000d = ╱31╱1╱ // 0x359a @0xd
0x358d…35ac at000e = ╱31╱1╱ // 0x359b @0xe
0x358d…35ac at000f = ╱ef╱$╱ // 0x359c @0xf
0x358d…35ac at0010 = ╱ec╱,╱ // 0x359d @0x10
0x358d…35ac at0011 = ╱4d╱M╱ // 0x359e @0x11
0x358d…35ac at0012 = ╱46╱F╱ // 0x359f @0x12
0x358d…35ac at0013 = ╱50╱P╱ // 0x35a0 @0x13
0x358d…35ac at0014 = ╱4f╱O╱ // 0x35a1 @0x14
0x358d…35ac at0015 = ╱53╱S╱ // 0x35a2 @0x15
0x358d…35ac at0016 = ╱54╱T╱ // 0x35a3 @0x16
0x358d…35ac at0017 = ╱ec╱,╱ // 0x35a4 @0x17
0x358d…35ac at0018 = ╱48╱H╱ // 0x35a5 @0x18
0x358d…35ac at0019 = ╱46╱F╱ // 0x35a6 @0x19
0x358d…35ac at001a = ╱54╱T╱ // 0x35a7 @0x1a
0x358d…35ac at001b = ╱41╱A╱ // 0x35a8 @0x1b
0x358d…35ac at001c = ╱42╱B╱ // 0x35a9 @0x1c
0x358d…35ac at001d = ╱ee╱)╱ // 0x35aa @0x1d
0x358d…35ac at001e = EOL // 0x35ab @0x1e
0x358d…35ac }
0x35ac…35cb c322 6040 EXEC HOVIND(K12$,MDPOST,HDTAB)
0x35ac…35cb LineComalBin {
0x35ac…35cb ptr = 0xc322 // 0x35ac @0x0
0x35ac…35cb lno = 0x1798 // 0x35ae @0x2
0x35ac…35cb at0004 = ╱9d╱ EXEC ╱ // 0x35b0 @0x4
0x35ac…35cb at0005 = ╱48╱H╱ // 0x35b1 @0x5
0x35ac…35cb at0006 = ╱4f╱O╱ // 0x35b2 @0x6
0x35ac…35cb at0007 = ╱56╱V╱ // 0x35b3 @0x7
0x35ac…35cb at0008 = ╱49╱I╱ // 0x35b4 @0x8
0x35ac…35cb at0009 = ╱4e╱N╱ // 0x35b5 @0x9
0x35ac…35cb at000a = ╱44╱D╱ // 0x35b6 @0xa
0x35ac…35cb at000b = ╱ed╱(╱ // 0x35b7 @0xb
0x35ac…35cb at000c = ╱4b╱K╱ // 0x35b8 @0xc
0x35ac…35cb at000d = ╱31╱1╱ // 0x35b9 @0xd
0x35ac…35cb at000e = ╱32╱2╱ // 0x35ba @0xe
0x35ac…35cb at000f = ╱ef╱$╱ // 0x35bb @0xf
0x35ac…35cb at0010 = ╱ec╱,╱ // 0x35bc @0x10
0x35ac…35cb at0011 = ╱4d╱M╱ // 0x35bd @0x11
0x35ac…35cb at0012 = ╱44╱D╱ // 0x35be @0x12
0x35ac…35cb at0013 = ╱50╱P╱ // 0x35bf @0x13
0x35ac…35cb at0014 = ╱4f╱O╱ // 0x35c0 @0x14
0x35ac…35cb at0015 = ╱53╱S╱ // 0x35c1 @0x15
0x35ac…35cb at0016 = ╱54╱T╱ // 0x35c2 @0x16
0x35ac…35cb at0017 = ╱ec╱,╱ // 0x35c3 @0x17
0x35ac…35cb at0018 = ╱48╱H╱ // 0x35c4 @0x18
0x35ac…35cb at0019 = ╱44╱D╱ // 0x35c5 @0x19
0x35ac…35cb at001a = ╱54╱T╱ // 0x35c6 @0x1a
0x35ac…35cb at001b = ╱41╱A╱ // 0x35c7 @0x1b
0x35ac…35cb at001c = ╱42╱B╱ // 0x35c8 @0x1c
0x35ac…35cb at001d = ╱ee╱)╱ // 0x35c9 @0x1d
0x35ac…35cb at001e = EOL // 0x35ca @0x1e
0x35ac…35cb }
0x35cb…35eb c342 6050 EXEC HOVIND(K13$,MKPOST,HKRTAB)
0x35cb…35eb LineComalBin {
0x35cb…35eb ptr = 0xc342 // 0x35cb @0x0
0x35cb…35eb lno = 0x17a2 // 0x35cd @0x2
0x35cb…35eb at0004 = ╱9d╱ EXEC ╱ // 0x35cf @0x4
0x35cb…35eb at0005 = ╱48╱H╱ // 0x35d0 @0x5
0x35cb…35eb at0006 = ╱4f╱O╱ // 0x35d1 @0x6
0x35cb…35eb at0007 = ╱56╱V╱ // 0x35d2 @0x7
0x35cb…35eb at0008 = ╱49╱I╱ // 0x35d3 @0x8
0x35cb…35eb at0009 = ╱4e╱N╱ // 0x35d4 @0x9
0x35cb…35eb at000a = ╱44╱D╱ // 0x35d5 @0xa
0x35cb…35eb at000b = ╱ed╱(╱ // 0x35d6 @0xb
0x35cb…35eb at000c = ╱4b╱K╱ // 0x35d7 @0xc
0x35cb…35eb at000d = ╱31╱1╱ // 0x35d8 @0xd
0x35cb…35eb at000e = ╱33╱3╱ // 0x35d9 @0xe
0x35cb…35eb at000f = ╱ef╱$╱ // 0x35da @0xf
0x35cb…35eb at0010 = ╱ec╱,╱ // 0x35db @0x10
0x35cb…35eb at0011 = ╱4d╱M╱ // 0x35dc @0x11
0x35cb…35eb at0012 = ╱4b╱K╱ // 0x35dd @0x12
0x35cb…35eb at0013 = ╱50╱P╱ // 0x35de @0x13
0x35cb…35eb at0014 = ╱4f╱O╱ // 0x35df @0x14
0x35cb…35eb at0015 = ╱53╱S╱ // 0x35e0 @0x15
0x35cb…35eb at0016 = ╱54╱T╱ // 0x35e1 @0x16
0x35cb…35eb at0017 = ╱ec╱,╱ // 0x35e2 @0x17
0x35cb…35eb at0018 = ╱48╱H╱ // 0x35e3 @0x18
0x35cb…35eb at0019 = ╱4b╱K╱ // 0x35e4 @0x19
0x35cb…35eb at001a = ╱52╱R╱ // 0x35e5 @0x1a
0x35cb…35eb at001b = ╱54╱T╱ // 0x35e6 @0x1b
0x35cb…35eb at001c = ╱41╱A╱ // 0x35e7 @0x1c
0x35cb…35eb at001d = ╱42╱B╱ // 0x35e8 @0x1d
0x35cb…35eb at001e = ╱ee╱)╱ // 0x35e9 @0x1e
0x35cb…35eb at001f = EOL // 0x35ea @0x1f
0x35cb…35eb }
0x35eb…3616 c36d 6060 LTX$(E)="Indtast kontonr. (0:færdig):"
0x35eb…3616 LineComalBin {
0x35eb…3616 ptr = 0xc36d // 0x35eb @0x0
0x35eb…3616 lno = 0x17ac // 0x35ed @0x2
0x35eb…3616 at0004 = ╱4c╱L╱ // 0x35ef @0x4
0x35eb…3616 at0005 = ╱54╱T╱ // 0x35f0 @0x5
0x35eb…3616 at0006 = ╱58╱X╱ // 0x35f1 @0x6
0x35eb…3616 at0007 = ╱ef╱$╱ // 0x35f2 @0x7
0x35eb…3616 at0008 = ╱ed╱(╱ // 0x35f3 @0x8
0x35eb…3616 at0009 = ╱45╱E╱ // 0x35f4 @0x9
0x35eb…3616 at000a = ╱ee╱)╱ // 0x35f5 @0xa
0x35eb…3616 at000b = ╱dc╱=╱ // 0x35f6 @0xb
0x35eb…3616 at000c = ╱22╱"╱ // 0x35f7 @0xc
0x35eb…3616 at000d = ╱49╱I╱ // 0x35f8 @0xd
0x35eb…3616 at000e = ╱6e╱n╱ // 0x35f9 @0xe
0x35eb…3616 at000f = ╱64╱d╱ // 0x35fa @0xf
0x35eb…3616 at0010 = ╱74╱t╱ // 0x35fb @0x10
0x35eb…3616 at0011 = ╱61╱a╱ // 0x35fc @0x11
0x35eb…3616 at0012 = ╱73╱s╱ // 0x35fd @0x12
0x35eb…3616 at0013 = ╱74╱t╱ // 0x35fe @0x13
0x35eb…3616 at0014 = ╱20╱…╱ // 0x35ff @0x14
0x35eb…3616 at0015 = ╱6b╱k╱ // 0x3600 @0x15
0x35eb…3616 at0016 = ╱6f╱o╱ // 0x3601 @0x16
0x35eb…3616 at0017 = ╱6e╱n╱ // 0x3602 @0x17
0x35eb…3616 at0018 = ╱74╱t╱ // 0x3603 @0x18
0x35eb…3616 at0019 = ╱6f╱o╱ // 0x3604 @0x19
0x35eb…3616 at001a = ╱6e╱n╱ // 0x3605 @0x1a
0x35eb…3616 at001b = ╱72╱r╱ // 0x3606 @0x1b
0x35eb…3616 at001c = ╱2e╱.╱ // 0x3607 @0x1c
0x35eb…3616 at001d = ╱20╱…╱ // 0x3608 @0x1d
0x35eb…3616 at001e = ╱28╱(╱ // 0x3609 @0x1e
0x35eb…3616 at001f = ╱30╱0╱ // 0x360a @0x1f
0x35eb…3616 at0020 = ╱3a╱:╱ // 0x360b @0x20
0x35eb…3616 at0021 = ╱66╱f╱ // 0x360c @0x21
0x35eb…3616 at0022 = ╱7b╱æ╱ // 0x360d @0x22
0x35eb…3616 at0023 = ╱72╱r╱ // 0x360e @0x23
0x35eb…3616 at0024 = ╱64╱d╱ // 0x360f @0x24
0x35eb…3616 at0025 = ╱69╱i╱ // 0x3610 @0x25
0x35eb…3616 at0026 = ╱67╱g╱ // 0x3611 @0x26
0x35eb…3616 at0027 = ╱29╱)╱ // 0x3612 @0x27
0x35eb…3616 at0028 = ╱3a╱:╱ // 0x3613 @0x28
0x35eb…3616 at0029 = ╱22╱"╱ // 0x3614 @0x29
0x35eb…3616 at002a = EOL // 0x3615 @0x2a
0x35eb…3616 }
0x3616…3637 c38e 6070 LTX$(G)="Rigtig konto (J/N)"
0x3616…3637 LineComalBin {
0x3616…3637 ptr = 0xc38e // 0x3616 @0x0
0x3616…3637 lno = 0x17b6 // 0x3618 @0x2
0x3616…3637 at0004 = ╱4c╱L╱ // 0x361a @0x4
0x3616…3637 at0005 = ╱54╱T╱ // 0x361b @0x5
0x3616…3637 at0006 = ╱58╱X╱ // 0x361c @0x6
0x3616…3637 at0007 = ╱ef╱$╱ // 0x361d @0x7
0x3616…3637 at0008 = ╱ed╱(╱ // 0x361e @0x8
0x3616…3637 at0009 = ╱47╱G╱ // 0x361f @0x9
0x3616…3637 at000a = ╱ee╱)╱ // 0x3620 @0xa
0x3616…3637 at000b = ╱dc╱=╱ // 0x3621 @0xb
0x3616…3637 at000c = ╱22╱"╱ // 0x3622 @0xc
0x3616…3637 at000d = ╱52╱R╱ // 0x3623 @0xd
0x3616…3637 at000e = ╱69╱i╱ // 0x3624 @0xe
0x3616…3637 at000f = ╱67╱g╱ // 0x3625 @0xf
0x3616…3637 at0010 = ╱74╱t╱ // 0x3626 @0x10
0x3616…3637 at0011 = ╱69╱i╱ // 0x3627 @0x11
0x3616…3637 at0012 = ╱67╱g╱ // 0x3628 @0x12
0x3616…3637 at0013 = ╱20╱…╱ // 0x3629 @0x13
0x3616…3637 at0014 = ╱6b╱k╱ // 0x362a @0x14
0x3616…3637 at0015 = ╱6f╱o╱ // 0x362b @0x15
0x3616…3637 at0016 = ╱6e╱n╱ // 0x362c @0x16
0x3616…3637 at0017 = ╱74╱t╱ // 0x362d @0x17
0x3616…3637 at0018 = ╱6f╱o╱ // 0x362e @0x18
0x3616…3637 at0019 = ╱20╱…╱ // 0x362f @0x19
0x3616…3637 at001a = ╱28╱(╱ // 0x3630 @0x1a
0x3616…3637 at001b = ╱4a╱J╱ // 0x3631 @0x1b
0x3616…3637 at001c = ╱2f╱/╱ // 0x3632 @0x1c
0x3616…3637 at001d = ╱4e╱N╱ // 0x3633 @0x1d
0x3616…3637 at001e = ╱29╱)╱ // 0x3634 @0x1e
0x3616…3637 at001f = ╱22╱"╱ // 0x3635 @0x1f
0x3616…3637 at0020 = EOL // 0x3636 @0x20
0x3616…3637 }
0x3637…3668 c3bf 6080 LTX$(V)="Konto eksisterer ikke, tast RETURN"
0x3637…3668 LineComalBin {
0x3637…3668 ptr = 0xc3bf // 0x3637 @0x0
0x3637…3668 lno = 0x17c0 // 0x3639 @0x2
0x3637…3668 at0004 = ╱4c╱L╱ // 0x363b @0x4
0x3637…3668 at0005 = ╱54╱T╱ // 0x363c @0x5
0x3637…3668 at0006 = ╱58╱X╱ // 0x363d @0x6
0x3637…3668 at0007 = ╱ef╱$╱ // 0x363e @0x7
0x3637…3668 at0008 = ╱ed╱(╱ // 0x363f @0x8
0x3637…3668 at0009 = ╱56╱V╱ // 0x3640 @0x9
0x3637…3668 at000a = ╱ee╱)╱ // 0x3641 @0xa
0x3637…3668 at000b = ╱dc╱=╱ // 0x3642 @0xb
0x3637…3668 at000c = ╱22╱"╱ // 0x3643 @0xc
0x3637…3668 at000d = ╱4b╱K╱ // 0x3644 @0xd
0x3637…3668 at000e = ╱6f╱o╱ // 0x3645 @0xe
0x3637…3668 at000f = ╱6e╱n╱ // 0x3646 @0xf
0x3637…3668 at0010 = ╱74╱t╱ // 0x3647 @0x10
0x3637…3668 at0011 = ╱6f╱o╱ // 0x3648 @0x11
0x3637…3668 at0012 = ╱20╱…╱ // 0x3649 @0x12
0x3637…3668 at0013 = ╱65╱e╱ // 0x364a @0x13
0x3637…3668 at0014 = ╱6b╱k╱ // 0x364b @0x14
0x3637…3668 at0015 = ╱73╱s╱ // 0x364c @0x15
0x3637…3668 at0016 = ╱69╱i╱ // 0x364d @0x16
0x3637…3668 at0017 = ╱73╱s╱ // 0x364e @0x17
0x3637…3668 at0018 = ╱74╱t╱ // 0x364f @0x18
0x3637…3668 at0019 = ╱65╱e╱ // 0x3650 @0x19
0x3637…3668 at001a = ╱72╱r╱ // 0x3651 @0x1a
0x3637…3668 at001b = ╱65╱e╱ // 0x3652 @0x1b
0x3637…3668 at001c = ╱72╱r╱ // 0x3653 @0x1c
0x3637…3668 at001d = ╱20╱…╱ // 0x3654 @0x1d
0x3637…3668 at001e = ╱69╱i╱ // 0x3655 @0x1e
0x3637…3668 at001f = ╱6b╱k╱ // 0x3656 @0x1f
0x3637…3668 at0020 = ╱6b╱k╱ // 0x3657 @0x20
0x3637…3668 at0021 = ╱65╱e╱ // 0x3658 @0x21
0x3637…3668 at0022 = ╱2c╱,╱ // 0x3659 @0x22
0x3637…3668 at0023 = ╱20╱…╱ // 0x365a @0x23
0x3637…3668 at0024 = ╱74╱t╱ // 0x365b @0x24
0x3637…3668 at0025 = ╱61╱a╱ // 0x365c @0x25
0x3637…3668 at0026 = ╱73╱s╱ // 0x365d @0x26
0x3637…3668 at0027 = ╱74╱t╱ // 0x365e @0x27
0x3637…3668 at0028 = ╱20╱…╱ // 0x365f @0x28
0x3637…3668 at0029 = ╱52╱R╱ // 0x3660 @0x29
0x3637…3668 at002a = ╱45╱E╱ // 0x3661 @0x2a
0x3637…3668 at002b = ╱54╱T╱ // 0x3662 @0x2b
0x3637…3668 at002c = ╱55╱U╱ // 0x3663 @0x2c
0x3637…3668 at002d = ╱52╱R╱ // 0x3664 @0x2d
0x3637…3668 at002e = ╱4e╱N╱ // 0x3665 @0x2e
0x3637…3668 at002f = ╱22╱"╱ // 0x3666 @0x2f
0x3637…3668 at0030 = EOL // 0x3667 @0x30
0x3637…3668 }
0x3668…3697 c3ee 6090 LTX$(C)="Tast RETURN når sideskift ønskes"
0x3668…3697 LineComalBin {
0x3668…3697 ptr = 0xc3ee // 0x3668 @0x0
0x3668…3697 lno = 0x17ca // 0x366a @0x2
0x3668…3697 at0004 = ╱4c╱L╱ // 0x366c @0x4
0x3668…3697 at0005 = ╱54╱T╱ // 0x366d @0x5
0x3668…3697 at0006 = ╱58╱X╱ // 0x366e @0x6
0x3668…3697 at0007 = ╱ef╱$╱ // 0x366f @0x7
0x3668…3697 at0008 = ╱ed╱(╱ // 0x3670 @0x8
0x3668…3697 at0009 = ╱43╱C╱ // 0x3671 @0x9
0x3668…3697 at000a = ╱ee╱)╱ // 0x3672 @0xa
0x3668…3697 at000b = ╱dc╱=╱ // 0x3673 @0xb
0x3668…3697 at000c = ╱22╱"╱ // 0x3674 @0xc
0x3668…3697 at000d = ╱54╱T╱ // 0x3675 @0xd
0x3668…3697 at000e = ╱61╱a╱ // 0x3676 @0xe
0x3668…3697 at000f = ╱73╱s╱ // 0x3677 @0xf
0x3668…3697 at0010 = ╱74╱t╱ // 0x3678 @0x10
0x3668…3697 at0011 = ╱20╱…╱ // 0x3679 @0x11
0x3668…3697 at0012 = ╱52╱R╱ // 0x367a @0x12
0x3668…3697 at0013 = ╱45╱E╱ // 0x367b @0x13
0x3668…3697 at0014 = ╱54╱T╱ // 0x367c @0x14
0x3668…3697 at0015 = ╱55╱U╱ // 0x367d @0x15
0x3668…3697 at0016 = ╱52╱R╱ // 0x367e @0x16
0x3668…3697 at0017 = ╱4e╱N╱ // 0x367f @0x17
0x3668…3697 at0018 = ╱20╱…╱ // 0x3680 @0x18
0x3668…3697 at0019 = ╱6e╱n╱ // 0x3681 @0x19
0x3668…3697 at001a = ╱7d╱å╱ // 0x3682 @0x1a
0x3668…3697 at001b = ╱72╱r╱ // 0x3683 @0x1b
0x3668…3697 at001c = ╱20╱…╱ // 0x3684 @0x1c
0x3668…3697 at001d = ╱73╱s╱ // 0x3685 @0x1d
0x3668…3697 at001e = ╱69╱i╱ // 0x3686 @0x1e
0x3668…3697 at001f = ╱64╱d╱ // 0x3687 @0x1f
0x3668…3697 at0020 = ╱65╱e╱ // 0x3688 @0x20
0x3668…3697 at0021 = ╱73╱s╱ // 0x3689 @0x21
0x3668…3697 at0022 = ╱6b╱k╱ // 0x368a @0x22
0x3668…3697 at0023 = ╱69╱i╱ // 0x368b @0x23
0x3668…3697 at0024 = ╱66╱f╱ // 0x368c @0x24
0x3668…3697 at0025 = ╱74╱t╱ // 0x368d @0x25
0x3668…3697 at0026 = ╱20╱…╱ // 0x368e @0x26
0x3668…3697 at0027 = ╱7c╱ø╱ // 0x368f @0x27
0x3668…3697 at0028 = ╱6e╱n╱ // 0x3690 @0x28
0x3668…3697 at0029 = ╱73╱s╱ // 0x3691 @0x29
0x3668…3697 at002a = ╱6b╱k╱ // 0x3692 @0x2a
0x3668…3697 at002b = ╱65╱e╱ // 0x3693 @0x2b
0x3668…3697 at002c = ╱73╱s╱ // 0x3694 @0x2c
0x3668…3697 at002d = ╱22╱"╱ // 0x3695 @0x2d
0x3668…3697 at002e = EOL // 0x3696 @0x2e
0x3668…3697 }
0x3697…36d7 c42e 6100 LTX$(5)="Ønskes kontoudtog skrevet på formular (J/N):"
0x3697…36d7 LineComalBin {
0x3697…36d7 ptr = 0xc42e // 0x3697 @0x0
0x3697…36d7 lno = 0x17d4 // 0x3699 @0x2
0x3697…36d7 at0004 = ╱4c╱L╱ // 0x369b @0x4
0x3697…36d7 at0005 = ╱54╱T╱ // 0x369c @0x5
0x3697…36d7 at0006 = ╱58╱X╱ // 0x369d @0x6
0x3697…36d7 at0007 = ╱ef╱$╱ // 0x369e @0x7
0x3697…36d7 at0008 = ╱ed╱(╱ // 0x369f @0x8
0x3697…36d7 at0009 = ╱35╱5╱ // 0x36a0 @0x9
0x3697…36d7 at000a = ╱fe0000a003╱ // 0x36a1 @0xa
0x3697…36d7 at000f = ╱ee╱)╱ // 0x36a6 @0xf
0x3697…36d7 at0010 = ╱dc╱=╱ // 0x36a7 @0x10
0x3697…36d7 at0011 = ╱22╱"╱ // 0x36a8 @0x11
0x3697…36d7 at0012 = ╱5c╱Ø╱ // 0x36a9 @0x12
0x3697…36d7 at0013 = ╱6e╱n╱ // 0x36aa @0x13
0x3697…36d7 at0014 = ╱73╱s╱ // 0x36ab @0x14
0x3697…36d7 at0015 = ╱6b╱k╱ // 0x36ac @0x15
0x3697…36d7 at0016 = ╱65╱e╱ // 0x36ad @0x16
0x3697…36d7 at0017 = ╱73╱s╱ // 0x36ae @0x17
0x3697…36d7 at0018 = ╱20╱…╱ // 0x36af @0x18
0x3697…36d7 at0019 = ╱6b╱k╱ // 0x36b0 @0x19
0x3697…36d7 at001a = ╱6f╱o╱ // 0x36b1 @0x1a
0x3697…36d7 at001b = ╱6e╱n╱ // 0x36b2 @0x1b
0x3697…36d7 at001c = ╱74╱t╱ // 0x36b3 @0x1c
0x3697…36d7 at001d = ╱6f╱o╱ // 0x36b4 @0x1d
0x3697…36d7 at001e = ╱75╱u╱ // 0x36b5 @0x1e
0x3697…36d7 at001f = ╱64╱d╱ // 0x36b6 @0x1f
0x3697…36d7 at0020 = ╱74╱t╱ // 0x36b7 @0x20
0x3697…36d7 at0021 = ╱6f╱o╱ // 0x36b8 @0x21
0x3697…36d7 at0022 = ╱67╱g╱ // 0x36b9 @0x22
0x3697…36d7 at0023 = ╱20╱…╱ // 0x36ba @0x23
0x3697…36d7 at0024 = ╱73╱s╱ // 0x36bb @0x24
0x3697…36d7 at0025 = ╱6b╱k╱ // 0x36bc @0x25
0x3697…36d7 at0026 = ╱72╱r╱ // 0x36bd @0x26
0x3697…36d7 at0027 = ╱65╱e╱ // 0x36be @0x27
0x3697…36d7 at0028 = ╱76╱v╱ // 0x36bf @0x28
0x3697…36d7 at0029 = ╱65╱e╱ // 0x36c0 @0x29
0x3697…36d7 at002a = ╱74╱t╱ // 0x36c1 @0x2a
0x3697…36d7 at002b = ╱20╱…╱ // 0x36c2 @0x2b
0x3697…36d7 at002c = ╱70╱p╱ // 0x36c3 @0x2c
0x3697…36d7 at002d = ╱7d╱å╱ // 0x36c4 @0x2d
0x3697…36d7 at002e = ╱20╱…╱ // 0x36c5 @0x2e
0x3697…36d7 at002f = ╱66╱f╱ // 0x36c6 @0x2f
0x3697…36d7 at0030 = ╱6f╱o╱ // 0x36c7 @0x30
0x3697…36d7 at0031 = ╱72╱r╱ // 0x36c8 @0x31
0x3697…36d7 at0032 = ╱6d╱m╱ // 0x36c9 @0x32
0x3697…36d7 at0033 = ╱75╱u╱ // 0x36ca @0x33
0x3697…36d7 at0034 = ╱6c╱l╱ // 0x36cb @0x34
0x3697…36d7 at0035 = ╱61╱a╱ // 0x36cc @0x35
0x3697…36d7 at0036 = ╱72╱r╱ // 0x36cd @0x36
0x3697…36d7 at0037 = ╱20╱…╱ // 0x36ce @0x37
0x3697…36d7 at0038 = ╱28╱(╱ // 0x36cf @0x38
0x3697…36d7 at0039 = ╱4a╱J╱ // 0x36d0 @0x39
0x3697…36d7 at003a = ╱2f╱/╱ // 0x36d1 @0x3a
0x3697…36d7 at003b = ╱4e╱N╱ // 0x36d2 @0x3b
0x3697…36d7 at003c = ╱29╱)╱ // 0x36d3 @0x3c
0x3697…36d7 at003d = ╱3a╱:╱ // 0x36d4 @0x3d
0x3697…36d7 at003e = ╱22╱"╱ // 0x36d5 @0x3e
0x3697…36d7 at003f = EOL // 0x36d6 @0x3f
0x3697…36d7 }
0x36d7…3716 c46d 6110 LTX$(6)="Monter kontoudtogsformularer og tast RETURN"
0x36d7…3716 LineComalBin {
0x36d7…3716 ptr = 0xc46d // 0x36d7 @0x0
0x36d7…3716 lno = 0x17de // 0x36d9 @0x2
0x36d7…3716 at0004 = ╱4c╱L╱ // 0x36db @0x4
0x36d7…3716 at0005 = ╱54╱T╱ // 0x36dc @0x5
0x36d7…3716 at0006 = ╱58╱X╱ // 0x36dd @0x6
0x36d7…3716 at0007 = ╱ef╱$╱ // 0x36de @0x7
0x36d7…3716 at0008 = ╱ed╱(╱ // 0x36df @0x8
0x36d7…3716 at0009 = ╱36╱6╱ // 0x36e0 @0x9
0x36d7…3716 at000a = ╱fe0000c003╱ // 0x36e1 @0xa
0x36d7…3716 at000f = ╱ee╱)╱ // 0x36e6 @0xf
0x36d7…3716 at0010 = ╱dc╱=╱ // 0x36e7 @0x10
0x36d7…3716 at0011 = ╱22╱"╱ // 0x36e8 @0x11
0x36d7…3716 at0012 = ╱4d╱M╱ // 0x36e9 @0x12
0x36d7…3716 at0013 = ╱6f╱o╱ // 0x36ea @0x13
0x36d7…3716 at0014 = ╱6e╱n╱ // 0x36eb @0x14
0x36d7…3716 at0015 = ╱74╱t╱ // 0x36ec @0x15
0x36d7…3716 at0016 = ╱65╱e╱ // 0x36ed @0x16
0x36d7…3716 at0017 = ╱72╱r╱ // 0x36ee @0x17
0x36d7…3716 at0018 = ╱20╱…╱ // 0x36ef @0x18
0x36d7…3716 at0019 = ╱6b╱k╱ // 0x36f0 @0x19
0x36d7…3716 at001a = ╱6f╱o╱ // 0x36f1 @0x1a
0x36d7…3716 at001b = ╱6e╱n╱ // 0x36f2 @0x1b
0x36d7…3716 at001c = ╱74╱t╱ // 0x36f3 @0x1c
0x36d7…3716 at001d = ╱6f╱o╱ // 0x36f4 @0x1d
0x36d7…3716 at001e = ╱75╱u╱ // 0x36f5 @0x1e
0x36d7…3716 at001f = ╱64╱d╱ // 0x36f6 @0x1f
0x36d7…3716 at0020 = ╱74╱t╱ // 0x36f7 @0x20
0x36d7…3716 at0021 = ╱6f╱o╱ // 0x36f8 @0x21
0x36d7…3716 at0022 = ╱67╱g╱ // 0x36f9 @0x22
0x36d7…3716 at0023 = ╱73╱s╱ // 0x36fa @0x23
0x36d7…3716 at0024 = ╱66╱f╱ // 0x36fb @0x24
0x36d7…3716 at0025 = ╱6f╱o╱ // 0x36fc @0x25
0x36d7…3716 at0026 = ╱72╱r╱ // 0x36fd @0x26
0x36d7…3716 at0027 = ╱6d╱m╱ // 0x36fe @0x27
0x36d7…3716 at0028 = ╱75╱u╱ // 0x36ff @0x28
0x36d7…3716 at0029 = ╱6c╱l╱ // 0x3700 @0x29
0x36d7…3716 at002a = ╱61╱a╱ // 0x3701 @0x2a
0x36d7…3716 at002b = ╱72╱r╱ // 0x3702 @0x2b
0x36d7…3716 at002c = ╱65╱e╱ // 0x3703 @0x2c
0x36d7…3716 at002d = ╱72╱r╱ // 0x3704 @0x2d
0x36d7…3716 at002e = ╱20╱…╱ // 0x3705 @0x2e
0x36d7…3716 at002f = ╱6f╱o╱ // 0x3706 @0x2f
0x36d7…3716 at0030 = ╱67╱g╱ // 0x3707 @0x30
0x36d7…3716 at0031 = ╱20╱…╱ // 0x3708 @0x31
0x36d7…3716 at0032 = ╱74╱t╱ // 0x3709 @0x32
0x36d7…3716 at0033 = ╱61╱a╱ // 0x370a @0x33
0x36d7…3716 at0034 = ╱73╱s╱ // 0x370b @0x34
0x36d7…3716 at0035 = ╱74╱t╱ // 0x370c @0x35
0x36d7…3716 at0036 = ╱20╱…╱ // 0x370d @0x36
0x36d7…3716 at0037 = ╱52╱R╱ // 0x370e @0x37
0x36d7…3716 at0038 = ╱45╱E╱ // 0x370f @0x38
0x36d7…3716 at0039 = ╱54╱T╱ // 0x3710 @0x39
0x36d7…3716 at003a = ╱55╱U╱ // 0x3711 @0x3a
0x36d7…3716 at003b = ╱52╱R╱ // 0x3712 @0x3b
0x36d7…3716 at003c = ╱4e╱N╱ // 0x3713 @0x3c
0x36d7…3716 at003d = ╱22╱"╱ // 0x3714 @0x3d
0x36d7…3716 at003e = EOL // 0x3715 @0x3e
0x36d7…3716 }
0x3716…374c c4a3 6120 LTX$(7)="Ønskes yderligere testprint (J/N):"
0x3716…374c LineComalBin {
0x3716…374c ptr = 0xc4a3 // 0x3716 @0x0
0x3716…374c lno = 0x17e8 // 0x3718 @0x2
0x3716…374c at0004 = ╱4c╱L╱ // 0x371a @0x4
0x3716…374c at0005 = ╱54╱T╱ // 0x371b @0x5
0x3716…374c at0006 = ╱58╱X╱ // 0x371c @0x6
0x3716…374c at0007 = ╱ef╱$╱ // 0x371d @0x7
0x3716…374c at0008 = ╱ed╱(╱ // 0x371e @0x8
0x3716…374c at0009 = ╱37╱7╱ // 0x371f @0x9
0x3716…374c at000a = ╱fe0000e003╱ // 0x3720 @0xa
0x3716…374c at000f = ╱ee╱)╱ // 0x3725 @0xf
0x3716…374c at0010 = ╱dc╱=╱ // 0x3726 @0x10
0x3716…374c at0011 = ╱22╱"╱ // 0x3727 @0x11
0x3716…374c at0012 = ╱5c╱Ø╱ // 0x3728 @0x12
0x3716…374c at0013 = ╱6e╱n╱ // 0x3729 @0x13
0x3716…374c at0014 = ╱73╱s╱ // 0x372a @0x14
0x3716…374c at0015 = ╱6b╱k╱ // 0x372b @0x15
0x3716…374c at0016 = ╱65╱e╱ // 0x372c @0x16
0x3716…374c at0017 = ╱73╱s╱ // 0x372d @0x17
0x3716…374c at0018 = ╱20╱…╱ // 0x372e @0x18
0x3716…374c at0019 = ╱79╱y╱ // 0x372f @0x19
0x3716…374c at001a = ╱64╱d╱ // 0x3730 @0x1a
0x3716…374c at001b = ╱65╱e╱ // 0x3731 @0x1b
0x3716…374c at001c = ╱72╱r╱ // 0x3732 @0x1c
0x3716…374c at001d = ╱6c╱l╱ // 0x3733 @0x1d
0x3716…374c at001e = ╱69╱i╱ // 0x3734 @0x1e
0x3716…374c at001f = ╱67╱g╱ // 0x3735 @0x1f
0x3716…374c at0020 = ╱65╱e╱ // 0x3736 @0x20
0x3716…374c at0021 = ╱72╱r╱ // 0x3737 @0x21
0x3716…374c at0022 = ╱65╱e╱ // 0x3738 @0x22
0x3716…374c at0023 = ╱20╱…╱ // 0x3739 @0x23
0x3716…374c at0024 = ╱74╱t╱ // 0x373a @0x24
0x3716…374c at0025 = ╱65╱e╱ // 0x373b @0x25
0x3716…374c at0026 = ╱73╱s╱ // 0x373c @0x26
0x3716…374c at0027 = ╱74╱t╱ // 0x373d @0x27
0x3716…374c at0028 = ╱70╱p╱ // 0x373e @0x28
0x3716…374c at0029 = ╱72╱r╱ // 0x373f @0x29
0x3716…374c at002a = ╱69╱i╱ // 0x3740 @0x2a
0x3716…374c at002b = ╱6e╱n╱ // 0x3741 @0x2b
0x3716…374c at002c = ╱74╱t╱ // 0x3742 @0x2c
0x3716…374c at002d = ╱20╱…╱ // 0x3743 @0x2d
0x3716…374c at002e = ╱28╱(╱ // 0x3744 @0x2e
0x3716…374c at002f = ╱4a╱J╱ // 0x3745 @0x2f
0x3716…374c at0030 = ╱2f╱/╱ // 0x3746 @0x30
0x3716…374c at0031 = ╱4e╱N╱ // 0x3747 @0x31
0x3716…374c at0032 = ╱29╱)╱ // 0x3748 @0x32
0x3716…374c at0033 = ╱3a╱:╱ // 0x3749 @0x33
0x3716…374c at0034 = ╱22╱"╱ // 0x374a @0x34
0x3716…374c at0035 = EOL // 0x374b @0x35
0x3716…374c }
0x374c…378a c4e1 6130 LTX$(8)="Monter papir til kontoudtog og tast RETURN"
0x374c…378a LineComalBin {
0x374c…378a ptr = 0xc4e1 // 0x374c @0x0
0x374c…378a lno = 0x17f2 // 0x374e @0x2
0x374c…378a at0004 = ╱4c╱L╱ // 0x3750 @0x4
0x374c…378a at0005 = ╱54╱T╱ // 0x3751 @0x5
0x374c…378a at0006 = ╱58╱X╱ // 0x3752 @0x6
0x374c…378a at0007 = ╱ef╱$╱ // 0x3753 @0x7
0x374c…378a at0008 = ╱ed╱(╱ // 0x3754 @0x8
0x374c…378a at0009 = ╱38╱8╱ // 0x3755 @0x9
0x374c…378a at000a = ╱fe00008004╱ // 0x3756 @0xa
0x374c…378a at000f = ╱ee╱)╱ // 0x375b @0xf
0x374c…378a at0010 = ╱dc╱=╱ // 0x375c @0x10
0x374c…378a at0011 = ╱22╱"╱ // 0x375d @0x11
0x374c…378a at0012 = ╱4d╱M╱ // 0x375e @0x12
0x374c…378a at0013 = ╱6f╱o╱ // 0x375f @0x13
0x374c…378a at0014 = ╱6e╱n╱ // 0x3760 @0x14
0x374c…378a at0015 = ╱74╱t╱ // 0x3761 @0x15
0x374c…378a at0016 = ╱65╱e╱ // 0x3762 @0x16
0x374c…378a at0017 = ╱72╱r╱ // 0x3763 @0x17
0x374c…378a at0018 = ╱20╱…╱ // 0x3764 @0x18
0x374c…378a at0019 = ╱70╱p╱ // 0x3765 @0x19
0x374c…378a at001a = ╱61╱a╱ // 0x3766 @0x1a
0x374c…378a at001b = ╱70╱p╱ // 0x3767 @0x1b
0x374c…378a at001c = ╱69╱i╱ // 0x3768 @0x1c
0x374c…378a at001d = ╱72╱r╱ // 0x3769 @0x1d
0x374c…378a at001e = ╱20╱…╱ // 0x376a @0x1e
0x374c…378a at001f = ╱74╱t╱ // 0x376b @0x1f
0x374c…378a at0020 = ╱69╱i╱ // 0x376c @0x20
0x374c…378a at0021 = ╱6c╱l╱ // 0x376d @0x21
0x374c…378a at0022 = ╱20╱…╱ // 0x376e @0x22
0x374c…378a at0023 = ╱6b╱k╱ // 0x376f @0x23
0x374c…378a at0024 = ╱6f╱o╱ // 0x3770 @0x24
0x374c…378a at0025 = ╱6e╱n╱ // 0x3771 @0x25
0x374c…378a at0026 = ╱74╱t╱ // 0x3772 @0x26
0x374c…378a at0027 = ╱6f╱o╱ // 0x3773 @0x27
0x374c…378a at0028 = ╱75╱u╱ // 0x3774 @0x28
0x374c…378a at0029 = ╱64╱d╱ // 0x3775 @0x29
0x374c…378a at002a = ╱74╱t╱ // 0x3776 @0x2a
0x374c…378a at002b = ╱6f╱o╱ // 0x3777 @0x2b
0x374c…378a at002c = ╱67╱g╱ // 0x3778 @0x2c
0x374c…378a at002d = ╱20╱…╱ // 0x3779 @0x2d
0x374c…378a at002e = ╱6f╱o╱ // 0x377a @0x2e
0x374c…378a at002f = ╱67╱g╱ // 0x377b @0x2f
0x374c…378a at0030 = ╱20╱…╱ // 0x377c @0x30
0x374c…378a at0031 = ╱74╱t╱ // 0x377d @0x31
0x374c…378a at0032 = ╱61╱a╱ // 0x377e @0x32
0x374c…378a at0033 = ╱73╱s╱ // 0x377f @0x33
0x374c…378a at0034 = ╱74╱t╱ // 0x3780 @0x34
0x374c…378a at0035 = ╱20╱…╱ // 0x3781 @0x35
0x374c…378a at0036 = ╱52╱R╱ // 0x3782 @0x36
0x374c…378a at0037 = ╱45╱E╱ // 0x3783 @0x37
0x374c…378a at0038 = ╱54╱T╱ // 0x3784 @0x38
0x374c…378a at0039 = ╱55╱U╱ // 0x3785 @0x39
0x374c…378a at003a = ╱52╱R╱ // 0x3786 @0x3a
0x374c…378a at003b = ╱4e╱N╱ // 0x3787 @0x3b
0x374c…378a at003c = ╱22╱"╱ // 0x3788 @0x3c
0x374c…378a at003d = EOL // 0x3789 @0x3d
0x374c…378a }
0x378a…37ba c511 6140 LTX$(W)="Ønskes udskrift på printer (J/N):"
0x378a…37ba LineComalBin {
0x378a…37ba ptr = 0xc511 // 0x378a @0x0
0x378a…37ba lno = 0x17fc // 0x378c @0x2
0x378a…37ba at0004 = ╱4c╱L╱ // 0x378e @0x4
0x378a…37ba at0005 = ╱54╱T╱ // 0x378f @0x5
0x378a…37ba at0006 = ╱58╱X╱ // 0x3790 @0x6
0x378a…37ba at0007 = ╱ef╱$╱ // 0x3791 @0x7
0x378a…37ba at0008 = ╱ed╱(╱ // 0x3792 @0x8
0x378a…37ba at0009 = ╱57╱W╱ // 0x3793 @0x9
0x378a…37ba at000a = ╱ee╱)╱ // 0x3794 @0xa
0x378a…37ba at000b = ╱dc╱=╱ // 0x3795 @0xb
0x378a…37ba at000c = ╱22╱"╱ // 0x3796 @0xc
0x378a…37ba at000d = ╱5c╱Ø╱ // 0x3797 @0xd
0x378a…37ba at000e = ╱6e╱n╱ // 0x3798 @0xe
0x378a…37ba at000f = ╱73╱s╱ // 0x3799 @0xf
0x378a…37ba at0010 = ╱6b╱k╱ // 0x379a @0x10
0x378a…37ba at0011 = ╱65╱e╱ // 0x379b @0x11
0x378a…37ba at0012 = ╱73╱s╱ // 0x379c @0x12
0x378a…37ba at0013 = ╱20╱…╱ // 0x379d @0x13
0x378a…37ba at0014 = ╱75╱u╱ // 0x379e @0x14
0x378a…37ba at0015 = ╱64╱d╱ // 0x379f @0x15
0x378a…37ba at0016 = ╱73╱s╱ // 0x37a0 @0x16
0x378a…37ba at0017 = ╱6b╱k╱ // 0x37a1 @0x17
0x378a…37ba at0018 = ╱72╱r╱ // 0x37a2 @0x18
0x378a…37ba at0019 = ╱69╱i╱ // 0x37a3 @0x19
0x378a…37ba at001a = ╱66╱f╱ // 0x37a4 @0x1a
0x378a…37ba at001b = ╱74╱t╱ // 0x37a5 @0x1b
0x378a…37ba at001c = ╱20╱…╱ // 0x37a6 @0x1c
0x378a…37ba at001d = ╱70╱p╱ // 0x37a7 @0x1d
0x378a…37ba at001e = ╱7d╱å╱ // 0x37a8 @0x1e
0x378a…37ba at001f = ╱20╱…╱ // 0x37a9 @0x1f
0x378a…37ba at0020 = ╱70╱p╱ // 0x37aa @0x20
0x378a…37ba at0021 = ╱72╱r╱ // 0x37ab @0x21
0x378a…37ba at0022 = ╱69╱i╱ // 0x37ac @0x22
0x378a…37ba at0023 = ╱6e╱n╱ // 0x37ad @0x23
0x378a…37ba at0024 = ╱74╱t╱ // 0x37ae @0x24
0x378a…37ba at0025 = ╱65╱e╱ // 0x37af @0x25
0x378a…37ba at0026 = ╱72╱r╱ // 0x37b0 @0x26
0x378a…37ba at0027 = ╱20╱…╱ // 0x37b1 @0x27
0x378a…37ba at0028 = ╱28╱(╱ // 0x37b2 @0x28
0x378a…37ba at0029 = ╱4a╱J╱ // 0x37b3 @0x29
0x378a…37ba at002a = ╱2f╱/╱ // 0x37b4 @0x2a
0x378a…37ba at002b = ╱4e╱N╱ // 0x37b5 @0x2b
0x378a…37ba at002c = ╱29╱)╱ // 0x37b6 @0x2c
0x378a…37ba at002d = ╱3a╱:╱ // 0x37b7 @0x2d
0x378a…37ba at002e = ╱22╱"╱ // 0x37b8 @0x2e
0x378a…37ba at002f = EOL // 0x37b9 @0x2f
0x378a…37ba }
0x37ba…37ed c544 6150 LTX$(10)="Ønskes flere udskrifter (J/N):"
0x37ba…37ed LineComalBin {
0x37ba…37ed ptr = 0xc544 // 0x37ba @0x0
0x37ba…37ed lno = 0x1806 // 0x37bc @0x2
0x37ba…37ed at0004 = ╱4c╱L╱ // 0x37be @0x4
0x37ba…37ed at0005 = ╱54╱T╱ // 0x37bf @0x5
0x37ba…37ed at0006 = ╱58╱X╱ // 0x37c0 @0x6
0x37ba…37ed at0007 = ╱ef╱$╱ // 0x37c1 @0x7
0x37ba…37ed at0008 = ╱ed╱(╱ // 0x37c2 @0x8
0x37ba…37ed at0009 = ╱31╱1╱ // 0x37c3 @0x9
0x37ba…37ed at000a = ╱30╱0╱ // 0x37c4 @0xa
0x37ba…37ed at000b = ╱fe0000a004╱ // 0x37c5 @0xb
0x37ba…37ed at0010 = ╱ee╱)╱ // 0x37ca @0x10
0x37ba…37ed at0011 = ╱dc╱=╱ // 0x37cb @0x11
0x37ba…37ed at0012 = ╱22╱"╱ // 0x37cc @0x12
0x37ba…37ed at0013 = ╱5c╱Ø╱ // 0x37cd @0x13
0x37ba…37ed at0014 = ╱6e╱n╱ // 0x37ce @0x14
0x37ba…37ed at0015 = ╱73╱s╱ // 0x37cf @0x15
0x37ba…37ed at0016 = ╱6b╱k╱ // 0x37d0 @0x16
0x37ba…37ed at0017 = ╱65╱e╱ // 0x37d1 @0x17
0x37ba…37ed at0018 = ╱73╱s╱ // 0x37d2 @0x18
0x37ba…37ed at0019 = ╱20╱…╱ // 0x37d3 @0x19
0x37ba…37ed at001a = ╱66╱f╱ // 0x37d4 @0x1a
0x37ba…37ed at001b = ╱6c╱l╱ // 0x37d5 @0x1b
0x37ba…37ed at001c = ╱65╱e╱ // 0x37d6 @0x1c
0x37ba…37ed at001d = ╱72╱r╱ // 0x37d7 @0x1d
0x37ba…37ed at001e = ╱65╱e╱ // 0x37d8 @0x1e
0x37ba…37ed at001f = ╱20╱…╱ // 0x37d9 @0x1f
0x37ba…37ed at0020 = ╱75╱u╱ // 0x37da @0x20
0x37ba…37ed at0021 = ╱64╱d╱ // 0x37db @0x21
0x37ba…37ed at0022 = ╱73╱s╱ // 0x37dc @0x22
0x37ba…37ed at0023 = ╱6b╱k╱ // 0x37dd @0x23
0x37ba…37ed at0024 = ╱72╱r╱ // 0x37de @0x24
0x37ba…37ed at0025 = ╱69╱i╱ // 0x37df @0x25
0x37ba…37ed at0026 = ╱66╱f╱ // 0x37e0 @0x26
0x37ba…37ed at0027 = ╱74╱t╱ // 0x37e1 @0x27
0x37ba…37ed at0028 = ╱65╱e╱ // 0x37e2 @0x28
0x37ba…37ed at0029 = ╱72╱r╱ // 0x37e3 @0x29
0x37ba…37ed at002a = ╱20╱…╱ // 0x37e4 @0x2a
0x37ba…37ed at002b = ╱28╱(╱ // 0x37e5 @0x2b
0x37ba…37ed at002c = ╱4a╱J╱ // 0x37e6 @0x2c
0x37ba…37ed at002d = ╱2f╱/╱ // 0x37e7 @0x2d
0x37ba…37ed at002e = ╱4e╱N╱ // 0x37e8 @0x2e
0x37ba…37ed at002f = ╱29╱)╱ // 0x37e9 @0x2f
0x37ba…37ed at0030 = ╱3a╱:╱ // 0x37ea @0x30
0x37ba…37ed at0031 = ╱22╱"╱ // 0x37eb @0x31
0x37ba…37ed at0032 = EOL // 0x37ec @0x32
0x37ba…37ed }
0x37ed…3836 c58d 6160 LTX$(11)="Monter papir til udskrift af finanskonti,tast RETURN"
0x37ed…3836 LineComalBin {
0x37ed…3836 ptr = 0xc58d // 0x37ed @0x0
0x37ed…3836 lno = 0x1810 // 0x37ef @0x2
0x37ed…3836 at0004 = ╱4c╱L╱ // 0x37f1 @0x4
0x37ed…3836 at0005 = ╱54╱T╱ // 0x37f2 @0x5
0x37ed…3836 at0006 = ╱58╱X╱ // 0x37f3 @0x6
0x37ed…3836 at0007 = ╱ef╱$╱ // 0x37f4 @0x7
0x37ed…3836 at0008 = ╱ed╱(╱ // 0x37f5 @0x8
0x37ed…3836 at0009 = ╱31╱1╱ // 0x37f6 @0x9
0x37ed…3836 at000a = ╱31╱1╱ // 0x37f7 @0xa
0x37ed…3836 at000b = ╱fe0000b004╱ // 0x37f8 @0xb
0x37ed…3836 at0010 = ╱ee╱)╱ // 0x37fd @0x10
0x37ed…3836 at0011 = ╱dc╱=╱ // 0x37fe @0x11
0x37ed…3836 at0012 = ╱22╱"╱ // 0x37ff @0x12
0x37ed…3836 at0013 = ╱4d╱M╱ // 0x3800 @0x13
0x37ed…3836 at0014 = ╱6f╱o╱ // 0x3801 @0x14
0x37ed…3836 at0015 = ╱6e╱n╱ // 0x3802 @0x15
0x37ed…3836 at0016 = ╱74╱t╱ // 0x3803 @0x16
0x37ed…3836 at0017 = ╱65╱e╱ // 0x3804 @0x17
0x37ed…3836 at0018 = ╱72╱r╱ // 0x3805 @0x18
0x37ed…3836 at0019 = ╱20╱…╱ // 0x3806 @0x19
0x37ed…3836 at001a = ╱70╱p╱ // 0x3807 @0x1a
0x37ed…3836 at001b = ╱61╱a╱ // 0x3808 @0x1b
0x37ed…3836 at001c = ╱70╱p╱ // 0x3809 @0x1c
0x37ed…3836 at001d = ╱69╱i╱ // 0x380a @0x1d
0x37ed…3836 at001e = ╱72╱r╱ // 0x380b @0x1e
0x37ed…3836 at001f = ╱20╱…╱ // 0x380c @0x1f
0x37ed…3836 at0020 = ╱74╱t╱ // 0x380d @0x20
0x37ed…3836 at0021 = ╱69╱i╱ // 0x380e @0x21
0x37ed…3836 at0022 = ╱6c╱l╱ // 0x380f @0x22
0x37ed…3836 at0023 = ╱20╱…╱ // 0x3810 @0x23
0x37ed…3836 at0024 = ╱75╱u╱ // 0x3811 @0x24
0x37ed…3836 at0025 = ╱64╱d╱ // 0x3812 @0x25
0x37ed…3836 at0026 = ╱73╱s╱ // 0x3813 @0x26
0x37ed…3836 at0027 = ╱6b╱k╱ // 0x3814 @0x27
0x37ed…3836 at0028 = ╱72╱r╱ // 0x3815 @0x28
0x37ed…3836 at0029 = ╱69╱i╱ // 0x3816 @0x29
0x37ed…3836 at002a = ╱66╱f╱ // 0x3817 @0x2a
0x37ed…3836 at002b = ╱74╱t╱ // 0x3818 @0x2b
0x37ed…3836 at002c = ╱20╱…╱ // 0x3819 @0x2c
0x37ed…3836 at002d = ╱61╱a╱ // 0x381a @0x2d
0x37ed…3836 at002e = ╱66╱f╱ // 0x381b @0x2e
0x37ed…3836 at002f = ╱20╱…╱ // 0x381c @0x2f
0x37ed…3836 at0030 = ╱66╱f╱ // 0x381d @0x30
0x37ed…3836 at0031 = ╱69╱i╱ // 0x381e @0x31
0x37ed…3836 at0032 = ╱6e╱n╱ // 0x381f @0x32
0x37ed…3836 at0033 = ╱61╱a╱ // 0x3820 @0x33
0x37ed…3836 at0034 = ╱6e╱n╱ // 0x3821 @0x34
0x37ed…3836 at0035 = ╱73╱s╱ // 0x3822 @0x35
0x37ed…3836 at0036 = ╱6b╱k╱ // 0x3823 @0x36
0x37ed…3836 at0037 = ╱6f╱o╱ // 0x3824 @0x37
0x37ed…3836 at0038 = ╱6e╱n╱ // 0x3825 @0x38
0x37ed…3836 at0039 = ╱74╱t╱ // 0x3826 @0x39
0x37ed…3836 at003a = ╱69╱i╱ // 0x3827 @0x3a
0x37ed…3836 at003b = ╱2c╱,╱ // 0x3828 @0x3b
0x37ed…3836 at003c = ╱74╱t╱ // 0x3829 @0x3c
0x37ed…3836 at003d = ╱61╱a╱ // 0x382a @0x3d
0x37ed…3836 at003e = ╱73╱s╱ // 0x382b @0x3e
0x37ed…3836 at003f = ╱74╱t╱ // 0x382c @0x3f
0x37ed…3836 at0040 = ╱20╱…╱ // 0x382d @0x40
0x37ed…3836 at0041 = ╱52╱R╱ // 0x382e @0x41
0x37ed…3836 at0042 = ╱45╱E╱ // 0x382f @0x42
0x37ed…3836 at0043 = ╱54╱T╱ // 0x3830 @0x43
0x37ed…3836 at0044 = ╱55╱U╱ // 0x3831 @0x44
0x37ed…3836 at0045 = ╱52╱R╱ // 0x3832 @0x45
0x37ed…3836 at0046 = ╱4e╱N╱ // 0x3833 @0x46
0x37ed…3836 at0047 = ╱22╱"╱ // 0x3834 @0x47
0x37ed…3836 at0048 = EOL // 0x3835 @0x48
0x37ed…3836 }
0x3836…3858 c5af 6170 DATO=T1(7);MAFSLUT=T3(G)
0x3836…3858 LineComalBin {
0x3836…3858 ptr = 0xc5af // 0x3836 @0x0
0x3836…3858 lno = 0x181a // 0x3838 @0x2
0x3836…3858 at0004 = ╱44╱D╱ // 0x383a @0x4
0x3836…3858 at0005 = ╱41╱A╱ // 0x383b @0x5
0x3836…3858 at0006 = ╱54╱T╱ // 0x383c @0x6
0x3836…3858 at0007 = ╱4f╱O╱ // 0x383d @0x7
0x3836…3858 at0008 = ╱dc╱=╱ // 0x383e @0x8
0x3836…3858 at0009 = ╱54╱T╱ // 0x383f @0x9
0x3836…3858 at000a = ╱31╱1╱ // 0x3840 @0xa
0x3836…3858 at000b = ╱ed╱(╱ // 0x3841 @0xb
0x3836…3858 at000c = ╱37╱7╱ // 0x3842 @0xc
0x3836…3858 at000d = ╱fe0000e003╱ // 0x3843 @0xd
0x3836…3858 at0012 = ╱ee╱)╱ // 0x3848 @0x12
0x3836…3858 at0013 = ╱eb╱;╱ // 0x3849 @0x13
0x3836…3858 at0014 = ╱4d╱M╱ // 0x384a @0x14
0x3836…3858 at0015 = ╱41╱A╱ // 0x384b @0x15
0x3836…3858 at0016 = ╱46╱F╱ // 0x384c @0x16
0x3836…3858 at0017 = ╱53╱S╱ // 0x384d @0x17
0x3836…3858 at0018 = ╱4c╱L╱ // 0x384e @0x18
0x3836…3858 at0019 = ╱55╱U╱ // 0x384f @0x19
0x3836…3858 at001a = ╱54╱T╱ // 0x3850 @0x1a
0x3836…3858 at001b = ╱dc╱=╱ // 0x3851 @0x1b
0x3836…3858 at001c = ╱54╱T╱ // 0x3852 @0x1c
0x3836…3858 at001d = ╱33╱3╱ // 0x3853 @0x1d
0x3836…3858 at001e = ╱ed╱(╱ // 0x3854 @0x1e
0x3836…3858 at001f = ╱47╱G╱ // 0x3855 @0x1f
0x3836…3858 at0020 = ╱ee╱)╱ // 0x3856 @0x20
0x3836…3858 at0021 = EOL // 0x3857 @0x21
0x3836…3858 }
0x3858…386f c5c6 6180 EXEC DATOUD(DATO,DAT$)
0x3858…386f LineComalBin {
0x3858…386f ptr = 0xc5c6 // 0x3858 @0x0
0x3858…386f lno = 0x1824 // 0x385a @0x2
0x3858…386f at0004 = ╱9d╱ EXEC ╱ // 0x385c @0x4
0x3858…386f at0005 = ╱44╱D╱ // 0x385d @0x5
0x3858…386f at0006 = ╱41╱A╱ // 0x385e @0x6
0x3858…386f at0007 = ╱54╱T╱ // 0x385f @0x7
0x3858…386f at0008 = ╱4f╱O╱ // 0x3860 @0x8
0x3858…386f at0009 = ╱55╱U╱ // 0x3861 @0x9
0x3858…386f at000a = ╱44╱D╱ // 0x3862 @0xa
0x3858…386f at000b = ╱ed╱(╱ // 0x3863 @0xb
0x3858…386f at000c = ╱44╱D╱ // 0x3864 @0xc
0x3858…386f at000d = ╱41╱A╱ // 0x3865 @0xd
0x3858…386f at000e = ╱54╱T╱ // 0x3866 @0xe
0x3858…386f at000f = ╱4f╱O╱ // 0x3867 @0xf
0x3858…386f at0010 = ╱ec╱,╱ // 0x3868 @0x10
0x3858…386f at0011 = ╱44╱D╱ // 0x3869 @0x11
0x3858…386f at0012 = ╱41╱A╱ // 0x386a @0x12
0x3858…386f at0013 = ╱54╱T╱ // 0x386b @0x13
0x3858…386f at0014 = ╱ef╱$╱ // 0x386c @0x14
0x3858…386f at0015 = ╱ee╱)╱ // 0x386d @0x15
0x3858…386f at0016 = EOL // 0x386e @0x16
0x3858…386f }
0x386f…38bc c613 6190 STREG$="--------------------------------------";STREG$=STREG$+STREG$+"-"
0x386f…38bc LineComalBin {
0x386f…38bc ptr = 0xc613 // 0x386f @0x0
0x386f…38bc lno = 0x182e // 0x3871 @0x2
0x386f…38bc at0004 = ╱53╱S╱ // 0x3873 @0x4
0x386f…38bc at0005 = ╱54╱T╱ // 0x3874 @0x5
0x386f…38bc at0006 = ╱52╱R╱ // 0x3875 @0x6
0x386f…38bc at0007 = ╱45╱E╱ // 0x3876 @0x7
0x386f…38bc at0008 = ╱47╱G╱ // 0x3877 @0x8
0x386f…38bc at0009 = ╱ef╱$╱ // 0x3878 @0x9
0x386f…38bc at000a = ╱dc╱=╱ // 0x3879 @0xa
0x386f…38bc at000b = ╱22╱"╱ // 0x387a @0xb
0x386f…38bc at000c = ╱2d╱-╱ // 0x387b @0xc
0x386f…38bc at000d = ╱2d╱-╱ // 0x387c @0xd
0x386f…38bc at000e = ╱2d╱-╱ // 0x387d @0xe
0x386f…38bc at000f = ╱2d╱-╱ // 0x387e @0xf
0x386f…38bc at0010 = ╱2d╱-╱ // 0x387f @0x10
0x386f…38bc at0011 = ╱2d╱-╱ // 0x3880 @0x11
0x386f…38bc at0012 = ╱2d╱-╱ // 0x3881 @0x12
0x386f…38bc at0013 = ╱2d╱-╱ // 0x3882 @0x13
0x386f…38bc at0014 = ╱2d╱-╱ // 0x3883 @0x14
0x386f…38bc at0015 = ╱2d╱-╱ // 0x3884 @0x15
0x386f…38bc at0016 = ╱2d╱-╱ // 0x3885 @0x16
0x386f…38bc at0017 = ╱2d╱-╱ // 0x3886 @0x17
0x386f…38bc at0018 = ╱2d╱-╱ // 0x3887 @0x18
0x386f…38bc at0019 = ╱2d╱-╱ // 0x3888 @0x19
0x386f…38bc at001a = ╱2d╱-╱ // 0x3889 @0x1a
0x386f…38bc at001b = ╱2d╱-╱ // 0x388a @0x1b
0x386f…38bc at001c = ╱2d╱-╱ // 0x388b @0x1c
0x386f…38bc at001d = ╱2d╱-╱ // 0x388c @0x1d
0x386f…38bc at001e = ╱2d╱-╱ // 0x388d @0x1e
0x386f…38bc at001f = ╱2d╱-╱ // 0x388e @0x1f
0x386f…38bc at0020 = ╱2d╱-╱ // 0x388f @0x20
0x386f…38bc at0021 = ╱2d╱-╱ // 0x3890 @0x21
0x386f…38bc at0022 = ╱2d╱-╱ // 0x3891 @0x22
0x386f…38bc at0023 = ╱2d╱-╱ // 0x3892 @0x23
0x386f…38bc at0024 = ╱2d╱-╱ // 0x3893 @0x24
0x386f…38bc at0025 = ╱2d╱-╱ // 0x3894 @0x25
0x386f…38bc at0026 = ╱2d╱-╱ // 0x3895 @0x26
0x386f…38bc at0027 = ╱2d╱-╱ // 0x3896 @0x27
0x386f…38bc at0028 = ╱2d╱-╱ // 0x3897 @0x28
0x386f…38bc at0029 = ╱2d╱-╱ // 0x3898 @0x29
0x386f…38bc at002a = ╱2d╱-╱ // 0x3899 @0x2a
0x386f…38bc at002b = ╱2d╱-╱ // 0x389a @0x2b
0x386f…38bc at002c = ╱2d╱-╱ // 0x389b @0x2c
0x386f…38bc at002d = ╱2d╱-╱ // 0x389c @0x2d
0x386f…38bc at002e = ╱2d╱-╱ // 0x389d @0x2e
0x386f…38bc at002f = ╱2d╱-╱ // 0x389e @0x2f
0x386f…38bc at0030 = ╱2d╱-╱ // 0x389f @0x30
0x386f…38bc at0031 = ╱2d╱-╱ // 0x38a0 @0x31
0x386f…38bc at0032 = ╱22╱"╱ // 0x38a1 @0x32
0x386f…38bc at0033 = ╱eb╱;╱ // 0x38a2 @0x33
0x386f…38bc at0034 = ╱53╱S╱ // 0x38a3 @0x34
0x386f…38bc at0035 = ╱54╱T╱ // 0x38a4 @0x35
0x386f…38bc at0036 = ╱52╱R╱ // 0x38a5 @0x36
0x386f…38bc at0037 = ╱45╱E╱ // 0x38a6 @0x37
0x386f…38bc at0038 = ╱47╱G╱ // 0x38a7 @0x38
0x386f…38bc at0039 = ╱ef╱$╱ // 0x38a8 @0x39
0x386f…38bc at003a = ╱dc╱=╱ // 0x38a9 @0x3a
0x386f…38bc at003b = ╱53╱S╱ // 0x38aa @0x3b
0x386f…38bc at003c = ╱54╱T╱ // 0x38ab @0x3c
0x386f…38bc at003d = ╱52╱R╱ // 0x38ac @0x3d
0x386f…38bc at003e = ╱45╱E╱ // 0x38ad @0x3e
0x386f…38bc at003f = ╱47╱G╱ // 0x38ae @0x3f
0x386f…38bc at0040 = ╱ef╱$╱ // 0x38af @0x40
0x386f…38bc at0041 = ╱f1╱+╱ // 0x38b0 @0x41
0x386f…38bc at0042 = ╱53╱S╱ // 0x38b1 @0x42
0x386f…38bc at0043 = ╱54╱T╱ // 0x38b2 @0x43
0x386f…38bc at0044 = ╱52╱R╱ // 0x38b3 @0x44
0x386f…38bc at0045 = ╱45╱E╱ // 0x38b4 @0x45
0x386f…38bc at0046 = ╱47╱G╱ // 0x38b5 @0x46
0x386f…38bc at0047 = ╱ef╱$╱ // 0x38b6 @0x47
0x386f…38bc at0048 = ╱f1╱+╱ // 0x38b7 @0x48
0x386f…38bc at0049 = ╱22╱"╱ // 0x38b8 @0x49
0x386f…38bc at004a = ╱2d╱-╱ // 0x38b9 @0x4a
0x386f…38bc at004b = ╱22╱"╱ // 0x38ba @0x4b
0x386f…38bc at004c = EOL // 0x38bb @0x4c
0x386f…38bc }
0x38bc…38e3 c63a 6200 BLANK$=" "
0x38bc…38e3 LineComalBin {
0x38bc…38e3 ptr = 0xc63a // 0x38bc @0x0
0x38bc…38e3 lno = 0x1838 // 0x38be @0x2
0x38bc…38e3 at0004 = ╱42╱B╱ // 0x38c0 @0x4
0x38bc…38e3 at0005 = ╱4c╱L╱ // 0x38c1 @0x5
0x38bc…38e3 at0006 = ╱41╱A╱ // 0x38c2 @0x6
0x38bc…38e3 at0007 = ╱4e╱N╱ // 0x38c3 @0x7
0x38bc…38e3 at0008 = ╱4b╱K╱ // 0x38c4 @0x8
0x38bc…38e3 at0009 = ╱ef╱$╱ // 0x38c5 @0x9
0x38bc…38e3 at000a = ╱dc╱=╱ // 0x38c6 @0xa
0x38bc…38e3 at000b = ╱22╱"╱ // 0x38c7 @0xb
0x38bc…38e3 at000c = ╱20╱…╱ // 0x38c8 @0xc
0x38bc…38e3 at000d = ╱20╱…╱ // 0x38c9 @0xd
0x38bc…38e3 at000e = ╱20╱…╱ // 0x38ca @0xe
0x38bc…38e3 at000f = ╱20╱…╱ // 0x38cb @0xf
0x38bc…38e3 at0010 = ╱20╱…╱ // 0x38cc @0x10
0x38bc…38e3 at0011 = ╱20╱…╱ // 0x38cd @0x11
0x38bc…38e3 at0012 = ╱20╱…╱ // 0x38ce @0x12
0x38bc…38e3 at0013 = ╱20╱…╱ // 0x38cf @0x13
0x38bc…38e3 at0014 = ╱20╱…╱ // 0x38d0 @0x14
0x38bc…38e3 at0015 = ╱20╱…╱ // 0x38d1 @0x15
0x38bc…38e3 at0016 = ╱20╱…╱ // 0x38d2 @0x16
0x38bc…38e3 at0017 = ╱20╱…╱ // 0x38d3 @0x17
0x38bc…38e3 at0018 = ╱20╱…╱ // 0x38d4 @0x18
0x38bc…38e3 at0019 = ╱20╱…╱ // 0x38d5 @0x19
0x38bc…38e3 at001a = ╱20╱…╱ // 0x38d6 @0x1a
0x38bc…38e3 at001b = ╱20╱…╱ // 0x38d7 @0x1b
0x38bc…38e3 at001c = ╱20╱…╱ // 0x38d8 @0x1c
0x38bc…38e3 at001d = ╱20╱…╱ // 0x38d9 @0x1d
0x38bc…38e3 at001e = ╱20╱…╱ // 0x38da @0x1e
0x38bc…38e3 at001f = ╱20╱…╱ // 0x38db @0x1f
0x38bc…38e3 at0020 = ╱20╱…╱ // 0x38dc @0x20
0x38bc…38e3 at0021 = ╱20╱…╱ // 0x38dd @0x21
0x38bc…38e3 at0022 = ╱20╱…╱ // 0x38de @0x22
0x38bc…38e3 at0023 = ╱20╱…╱ // 0x38df @0x23
0x38bc…38e3 at0024 = ╱20╱…╱ // 0x38e0 @0x24
0x38bc…38e3 at0025 = ╱22╱"╱ // 0x38e1 @0x25
0x38bc…38e3 at0026 = EOL // 0x38e2 @0x26
0x38bc…38e3 }
0x38e3…38f3 c64a 6210 IF MAFSLUT=E THEN
0x38e3…38f3 LineComalBin {
0x38e3…38f3 ptr = 0xc64a // 0x38e3 @0x0
0x38e3…38f3 lno = 0x1842 // 0x38e5 @0x2
0x38e3…38f3 at0004 = ╱9c╱ IF ╱ // 0x38e7 @0x4
0x38e3…38f3 at0005 = ╱4d╱M╱ // 0x38e8 @0x5
0x38e3…38f3 at0006 = ╱41╱A╱ // 0x38e9 @0x6
0x38e3…38f3 at0007 = ╱46╱F╱ // 0x38ea @0x7
0x38e3…38f3 at0008 = ╱53╱S╱ // 0x38eb @0x8
0x38e3…38f3 at0009 = ╱4c╱L╱ // 0x38ec @0x9
0x38e3…38f3 at000a = ╱55╱U╱ // 0x38ed @0xa
0x38e3…38f3 at000b = ╱54╱T╱ // 0x38ee @0xb
0x38e3…38f3 at000c = ╱dc╱=╱ // 0x38ef @0xc
0x38e3…38f3 at000d = ╱45╱E╱ // 0x38f0 @0xd
0x38e3…38f3 at000e = ╱b6╱ THEN ╱ // 0x38f1 @0xe
0x38e3…38f3 at000f = EOL // 0x38f2 @0xf
0x38e3…38f3 }
0x38f3…38f9 c650 6220 REPEAT
0x38f3…38f9 LineComalBin {
0x38f3…38f9 ptr = 0xc650 // 0x38f3 @0x0
0x38f3…38f9 lno = 0x184c // 0x38f5 @0x2
0x38f3…38f9 at0004 = ╱97╱ REPEAT ╱ // 0x38f7 @0x4
0x38f3…38f9 at0005 = EOL // 0x38f8 @0x5
0x38f3…38f9 }
0x38f9…38ff c656 6230 CLEAR
0x38f9…38ff LineComalBin {
0x38f9…38ff ptr = 0xc656 // 0x38f9 @0x0
0x38f9…38ff lno = 0x1856 // 0x38fb @0x2
0x38f9…38ff at0004 = ╱a0╱ CLEAR ╱ // 0x38fd @0x4
0x38f9…38ff at0005 = EOL // 0x38fe @0x5
0x38f9…38ff }
0x38ff…3908 c65f 6240 CURSOR E,E
0x38ff…3908 LineComalBin {
0x38ff…3908 ptr = 0xc65f // 0x38ff @0x0
0x38ff…3908 lno = 0x1860 // 0x3901 @0x2
0x38ff…3908 at0004 = ╱a1╱ CURSOR ╱ // 0x3903 @0x4
0x38ff…3908 at0005 = ╱45╱E╱ // 0x3904 @0x5
0x38ff…3908 at0006 = ╱ec╱,╱ // 0x3905 @0x6
0x38ff…3908 at0007 = ╱45╱E╱ // 0x3906 @0x7
0x38ff…3908 at0008 = EOL // 0x3907 @0x8
0x38ff…3908 }
0x3908…394f c6a6 6250 PRINT TAB(15);"Månedsafslutning Kontoudtog";TAB(63);" Dato:";DAT$
0x3908…394f LineComalBin {
0x3908…394f ptr = 0xc6a6 // 0x3908 @0x0
0x3908…394f lno = 0x186a // 0x390a @0x2
0x3908…394f at0004 = ╱92╱ PRINT ╱ // 0x390c @0x4
0x3908…394f at0005 = ╱d2╱TAB╱ // 0x390d @0x5
0x3908…394f at0006 = ╱ed╱(╱ // 0x390e @0x6
0x3908…394f at0007 = ╱31╱1╱ // 0x390f @0x7
0x3908…394f at0008 = ╱35╱5╱ // 0x3910 @0x8
0x3908…394f at0009 = ╱fe0000f004╱ // 0x3911 @0x9
0x3908…394f at000e = ╱ee╱)╱ // 0x3916 @0xe
0x3908…394f at000f = ╱eb╱;╱ // 0x3917 @0xf
0x3908…394f at0010 = ╱22╱"╱ // 0x3918 @0x10
0x3908…394f at0011 = ╱4d╱M╱ // 0x3919 @0x11
0x3908…394f at0012 = ╱7d╱å╱ // 0x391a @0x12
0x3908…394f at0013 = ╱6e╱n╱ // 0x391b @0x13
0x3908…394f at0014 = ╱65╱e╱ // 0x391c @0x14
0x3908…394f at0015 = ╱64╱d╱ // 0x391d @0x15
0x3908…394f at0016 = ╱73╱s╱ // 0x391e @0x16
0x3908…394f at0017 = ╱61╱a╱ // 0x391f @0x17
0x3908…394f at0018 = ╱66╱f╱ // 0x3920 @0x18
0x3908…394f at0019 = ╱73╱s╱ // 0x3921 @0x19
0x3908…394f at001a = ╱6c╱l╱ // 0x3922 @0x1a
0x3908…394f at001b = ╱75╱u╱ // 0x3923 @0x1b
0x3908…394f at001c = ╱74╱t╱ // 0x3924 @0x1c
0x3908…394f at001d = ╱6e╱n╱ // 0x3925 @0x1d
0x3908…394f at001e = ╱69╱i╱ // 0x3926 @0x1e
0x3908…394f at001f = ╱6e╱n╱ // 0x3927 @0x1f
0x3908…394f at0020 = ╱67╱g╱ // 0x3928 @0x20
0x3908…394f at0021 = ╱20╱…╱ // 0x3929 @0x21
0x3908…394f at0022 = ╱4b╱K╱ // 0x392a @0x22
0x3908…394f at0023 = ╱6f╱o╱ // 0x392b @0x23
0x3908…394f at0024 = ╱6e╱n╱ // 0x392c @0x24
0x3908…394f at0025 = ╱74╱t╱ // 0x392d @0x25
0x3908…394f at0026 = ╱6f╱o╱ // 0x392e @0x26
0x3908…394f at0027 = ╱75╱u╱ // 0x392f @0x27
0x3908…394f at0028 = ╱64╱d╱ // 0x3930 @0x28
0x3908…394f at0029 = ╱74╱t╱ // 0x3931 @0x29
0x3908…394f at002a = ╱6f╱o╱ // 0x3932 @0x2a
0x3908…394f at002b = ╱67╱g╱ // 0x3933 @0x2b
0x3908…394f at002c = ╱22╱"╱ // 0x3934 @0x2c
0x3908…394f at002d = ╱eb╱;╱ // 0x3935 @0x2d
0x3908…394f at002e = ╱d2╱TAB╱ // 0x3936 @0x2e
0x3908…394f at002f = ╱ed╱(╱ // 0x3937 @0x2f
0x3908…394f at0030 = ╱36╱6╱ // 0x3938 @0x30
0x3908…394f at0031 = ╱33╱3╱ // 0x3939 @0x31
0x3908…394f at0032 = ╱fe0000fc06╱ // 0x393a @0x32
0x3908…394f at0037 = ╱ee╱)╱ // 0x393f @0x37
0x3908…394f at0038 = ╱eb╱;╱ // 0x3940 @0x38
0x3908…394f at0039 = ╱22╱"╱ // 0x3941 @0x39
0x3908…394f at003a = ╱20╱…╱ // 0x3942 @0x3a
0x3908…394f at003b = ╱44╱D╱ // 0x3943 @0x3b
0x3908…394f at003c = ╱61╱a╱ // 0x3944 @0x3c
0x3908…394f at003d = ╱74╱t╱ // 0x3945 @0x3d
0x3908…394f at003e = ╱6f╱o╱ // 0x3946 @0x3e
0x3908…394f at003f = ╱3a╱:╱ // 0x3947 @0x3f
0x3908…394f at0040 = ╱22╱"╱ // 0x3948 @0x40
0x3908…394f at0041 = ╱eb╱;╱ // 0x3949 @0x41
0x3908…394f at0042 = ╱44╱D╱ // 0x394a @0x42
0x3908…394f at0043 = ╱41╱A╱ // 0x394b @0x43
0x3908…394f at0044 = ╱54╱T╱ // 0x394c @0x44
0x3908…394f at0045 = ╱ef╱$╱ // 0x394d @0x45
0x3908…394f at0046 = EOL // 0x394e @0x46
0x3908…394f }
0x394f…3988 c6df 6260 EXEC INDPUT1(4,8,-9,-6,LTX$(5))
0x394f…3988 LineComalBin {
0x394f…3988 ptr = 0xc6df // 0x394f @0x0
0x394f…3988 lno = 0x1874 // 0x3951 @0x2
0x394f…3988 at0004 = ╱9d╱ EXEC ╱ // 0x3953 @0x4
0x394f…3988 at0005 = ╱49╱I╱ // 0x3954 @0x5
0x394f…3988 at0006 = ╱4e╱N╱ // 0x3955 @0x6
0x394f…3988 at0007 = ╱44╱D╱ // 0x3956 @0x7
0x394f…3988 at0008 = ╱50╱P╱ // 0x3957 @0x8
0x394f…3988 at0009 = ╱55╱U╱ // 0x3958 @0x9
0x394f…3988 at000a = ╱54╱T╱ // 0x3959 @0xa
0x394f…3988 at000b = ╱31╱1╱ // 0x395a @0xb
0x394f…3988 at000c = ╱ed╱(╱ // 0x395b @0xc
0x394f…3988 at000d = ╱34╱4╱ // 0x395c @0xd
0x394f…3988 at000e = ╱fe00008003╱ // 0x395d @0xe
0x394f…3988 at0013 = ╱ec╱,╱ // 0x3962 @0x13
0x394f…3988 at0014 = ╱38╱8╱ // 0x3963 @0x14
0x394f…3988 at0015 = ╱fe00008004╱ // 0x3964 @0x15
0x394f…3988 at001a = ╱ec╱,╱ // 0x3969 @0x1a
0x394f…3988 at001b = ╱e9╱-╱ // 0x396a @0x1b
0x394f…3988 at001c = ╱39╱9╱ // 0x396b @0x1c
0x394f…3988 at001d = ╱fe00009004╱ // 0x396c @0x1d
0x394f…3988 at0022 = ╱ec╱,╱ // 0x3971 @0x22
0x394f…3988 at0023 = ╱e9╱-╱ // 0x3972 @0x23
0x394f…3988 at0024 = ╱36╱6╱ // 0x3973 @0x24
0x394f…3988 at0025 = ╱fe0000c003╱ // 0x3974 @0x25
0x394f…3988 at002a = ╱ec╱,╱ // 0x3979 @0x2a
0x394f…3988 at002b = ╱4c╱L╱ // 0x397a @0x2b
0x394f…3988 at002c = ╱54╱T╱ // 0x397b @0x2c
0x394f…3988 at002d = ╱58╱X╱ // 0x397c @0x2d
0x394f…3988 at002e = ╱ef╱$╱ // 0x397d @0x2e
0x394f…3988 at002f = ╱ed╱(╱ // 0x397e @0x2f
0x394f…3988 at0030 = ╱35╱5╱ // 0x397f @0x30
0x394f…3988 at0031 = ╱fe0000a003╱ // 0x3980 @0x31
0x394f…3988 at0036 = ╱ee╱)╱ // 0x3985 @0x36
0x394f…3988 at0037 = ╱ee╱)╱ // 0x3986 @0x37
0x394f…3988 at0038 = EOL // 0x3987 @0x38
0x394f…3988 }
0x3988…3997 c6ee 6270 KTAL1=DTAL
0x3988…3997 LineComalBin {
0x3988…3997 ptr = 0xc6ee // 0x3988 @0x0
0x3988…3997 lno = 0x187e // 0x398a @0x2
0x3988…3997 at0004 = ╱4b╱K╱ // 0x398c @0x4
0x3988…3997 at0005 = ╱54╱T╱ // 0x398d @0x5
0x3988…3997 at0006 = ╱41╱A╱ // 0x398e @0x6
0x3988…3997 at0007 = ╱4c╱L╱ // 0x398f @0x7
0x3988…3997 at0008 = ╱31╱1╱ // 0x3990 @0x8
0x3988…3997 at0009 = ╱dc╱=╱ // 0x3991 @0x9
0x3988…3997 at000a = ╱44╱D╱ // 0x3992 @0xa
0x3988…3997 at000b = ╱54╱T╱ // 0x3993 @0xb
0x3988…3997 at000c = ╱41╱A╱ // 0x3994 @0xc
0x3988…3997 at000d = ╱4c╱L╱ // 0x3995 @0xd
0x3988…3997 at000e = EOL // 0x3996 @0xe
0x3988…3997 }
0x3997…39a7 c6fe 6280 IF P=-7 THEN
0x3997…39a7 LineComalBin {
0x3997…39a7 ptr = 0xc6fe // 0x3997 @0x0
0x3997…39a7 lno = 0x1888 // 0x3999 @0x2
0x3997…39a7 at0004 = ╱9c╱ IF ╱ // 0x399b @0x4
0x3997…39a7 at0005 = ╱50╱P╱ // 0x399c @0x5
0x3997…39a7 at0006 = ╱dc╱=╱ // 0x399d @0x6
0x3997…39a7 at0007 = ╱e9╱-╱ // 0x399e @0x7
0x3997…39a7 at0008 = ╱37╱7╱ // 0x399f @0x8
0x3997…39a7 at0009 = ╱fe0000e003╱ // 0x39a0 @0x9
0x3997…39a7 at000e = ╱b6╱ THEN ╱ // 0x39a5 @0xe
0x3997…39a7 at000f = EOL // 0x39a6 @0xf
0x3997…39a7 }
0x39a7…39e0 c737 6290 EXEC INDPUT1(4,10,-2,0,LTX$(6))
0x39a7…39e0 LineComalBin {
0x39a7…39e0 ptr = 0xc737 // 0x39a7 @0x0
0x39a7…39e0 lno = 0x1892 // 0x39a9 @0x2
0x39a7…39e0 at0004 = ╱9d╱ EXEC ╱ // 0x39ab @0x4
0x39a7…39e0 at0005 = ╱49╱I╱ // 0x39ac @0x5
0x39a7…39e0 at0006 = ╱4e╱N╱ // 0x39ad @0x6
0x39a7…39e0 at0007 = ╱44╱D╱ // 0x39ae @0x7
0x39a7…39e0 at0008 = ╱50╱P╱ // 0x39af @0x8
0x39a7…39e0 at0009 = ╱55╱U╱ // 0x39b0 @0x9
0x39a7…39e0 at000a = ╱54╱T╱ // 0x39b1 @0xa
0x39a7…39e0 at000b = ╱31╱1╱ // 0x39b2 @0xb
0x39a7…39e0 at000c = ╱ed╱(╱ // 0x39b3 @0xc
0x39a7…39e0 at000d = ╱34╱4╱ // 0x39b4 @0xd
0x39a7…39e0 at000e = ╱fe00008003╱ // 0x39b5 @0xe
0x39a7…39e0 at0013 = ╱ec╱,╱ // 0x39ba @0x13
0x39a7…39e0 at0014 = ╱31╱1╱ // 0x39bb @0x14
0x39a7…39e0 at0015 = ╱30╱0╱ // 0x39bc @0x15
0x39a7…39e0 at0016 = ╱fe0000a004╱ // 0x39bd @0x16
0x39a7…39e0 at001b = ╱ec╱,╱ // 0x39c2 @0x1b
0x39a7…39e0 at001c = ╱e9╱-╱ // 0x39c3 @0x1c
0x39a7…39e0 at001d = ╱32╱2╱ // 0x39c4 @0x1d
0x39a7…39e0 at001e = ╱fe00008002╱ // 0x39c5 @0x1e
0x39a7…39e0 at0023 = ╱ec╱,╱ // 0x39ca @0x23
0x39a7…39e0 at0024 = ╱30╱0╱ // 0x39cb @0x24
0x39a7…39e0 at0025 = ╱fe00000000╱ // 0x39cc @0x25
0x39a7…39e0 at002a = ╱ec╱,╱ // 0x39d1 @0x2a
0x39a7…39e0 at002b = ╱4c╱L╱ // 0x39d2 @0x2b
0x39a7…39e0 at002c = ╱54╱T╱ // 0x39d3 @0x2c
0x39a7…39e0 at002d = ╱58╱X╱ // 0x39d4 @0x2d
0x39a7…39e0 at002e = ╱ef╱$╱ // 0x39d5 @0x2e
0x39a7…39e0 at002f = ╱ed╱(╱ // 0x39d6 @0x2f
0x39a7…39e0 at0030 = ╱36╱6╱ // 0x39d7 @0x30
0x39a7…39e0 at0031 = ╱fe0000c003╱ // 0x39d8 @0x31
0x39a7…39e0 at0036 = ╱ee╱)╱ // 0x39dd @0x36
0x39a7…39e0 at0037 = ╱ee╱)╱ // 0x39de @0x37
0x39a7…39e0 at0038 = EOL // 0x39df @0x38
0x39a7…39e0 }
0x39e0…39ed c744 6300 SKRIV1=E
0x39e0…39ed LineComalBin {
0x39e0…39ed ptr = 0xc744 // 0x39e0 @0x0
0x39e0…39ed lno = 0x189c // 0x39e2 @0x2
0x39e0…39ed at0004 = ╱53╱S╱ // 0x39e4 @0x4
0x39e0…39ed at0005 = ╱4b╱K╱ // 0x39e5 @0x5
0x39e0…39ed at0006 = ╱52╱R╱ // 0x39e6 @0x6
0x39e0…39ed at0007 = ╱49╱I╱ // 0x39e7 @0x7
0x39e0…39ed at0008 = ╱56╱V╱ // 0x39e8 @0x8
0x39e0…39ed at0009 = ╱31╱1╱ // 0x39e9 @0x9
0x39e0…39ed at000a = ╱dc╱=╱ // 0x39ea @0xa
0x39e0…39ed at000b = ╱45╱E╱ // 0x39eb @0xb
0x39e0…39ed at000c = EOL // 0x39ec @0xc
0x39e0…39ed }
0x39ed…39f3 c74a 6310 REPEAT
0x39ed…39f3 LineComalBin {
0x39ed…39f3 ptr = 0xc74a // 0x39ed @0x0
0x39ed…39f3 lno = 0x18a6 // 0x39ef @0x2
0x39ed…39f3 at0004 = ╱97╱ REPEAT ╱ // 0x39f1 @0x4
0x39ed…39f3 at0005 = EOL // 0x39f2 @0x5
0x39ed…39f3 }
0x39f3…3a42 c799 6320 DEBNAVN$="XXXXXXXXXXXXXXXXXXXXXXXXX";DEBGADE$=DEBNAVN$;DEBPOSTNR=9999
0x39f3…3a42 LineComalBin {
0x39f3…3a42 ptr = 0xc799 // 0x39f3 @0x0
0x39f3…3a42 lno = 0x18b0 // 0x39f5 @0x2
0x39f3…3a42 at0004 = ╱44╱D╱ // 0x39f7 @0x4
0x39f3…3a42 at0005 = ╱45╱E╱ // 0x39f8 @0x5
0x39f3…3a42 at0006 = ╱42╱B╱ // 0x39f9 @0x6
0x39f3…3a42 at0007 = ╱4e╱N╱ // 0x39fa @0x7
0x39f3…3a42 at0008 = ╱41╱A╱ // 0x39fb @0x8
0x39f3…3a42 at0009 = ╱56╱V╱ // 0x39fc @0x9
0x39f3…3a42 at000a = ╱4e╱N╱ // 0x39fd @0xa
0x39f3…3a42 at000b = ╱ef╱$╱ // 0x39fe @0xb
0x39f3…3a42 at000c = ╱dc╱=╱ // 0x39ff @0xc
0x39f3…3a42 at000d = ╱22╱"╱ // 0x3a00 @0xd
0x39f3…3a42 at000e = ╱58╱X╱ // 0x3a01 @0xe
0x39f3…3a42 at000f = ╱58╱X╱ // 0x3a02 @0xf
0x39f3…3a42 at0010 = ╱58╱X╱ // 0x3a03 @0x10
0x39f3…3a42 at0011 = ╱58╱X╱ // 0x3a04 @0x11
0x39f3…3a42 at0012 = ╱58╱X╱ // 0x3a05 @0x12
0x39f3…3a42 at0013 = ╱58╱X╱ // 0x3a06 @0x13
0x39f3…3a42 at0014 = ╱58╱X╱ // 0x3a07 @0x14
0x39f3…3a42 at0015 = ╱58╱X╱ // 0x3a08 @0x15
0x39f3…3a42 at0016 = ╱58╱X╱ // 0x3a09 @0x16
0x39f3…3a42 at0017 = ╱58╱X╱ // 0x3a0a @0x17
0x39f3…3a42 at0018 = ╱58╱X╱ // 0x3a0b @0x18
0x39f3…3a42 at0019 = ╱58╱X╱ // 0x3a0c @0x19
0x39f3…3a42 at001a = ╱58╱X╱ // 0x3a0d @0x1a
0x39f3…3a42 at001b = ╱58╱X╱ // 0x3a0e @0x1b
0x39f3…3a42 at001c = ╱58╱X╱ // 0x3a0f @0x1c
0x39f3…3a42 at001d = ╱58╱X╱ // 0x3a10 @0x1d
0x39f3…3a42 at001e = ╱58╱X╱ // 0x3a11 @0x1e
0x39f3…3a42 at001f = ╱58╱X╱ // 0x3a12 @0x1f
0x39f3…3a42 at0020 = ╱58╱X╱ // 0x3a13 @0x20
0x39f3…3a42 at0021 = ╱58╱X╱ // 0x3a14 @0x21
0x39f3…3a42 at0022 = ╱58╱X╱ // 0x3a15 @0x22
0x39f3…3a42 at0023 = ╱58╱X╱ // 0x3a16 @0x23
0x39f3…3a42 at0024 = ╱58╱X╱ // 0x3a17 @0x24
0x39f3…3a42 at0025 = ╱58╱X╱ // 0x3a18 @0x25
0x39f3…3a42 at0026 = ╱58╱X╱ // 0x3a19 @0x26
0x39f3…3a42 at0027 = ╱22╱"╱ // 0x3a1a @0x27
0x39f3…3a42 at0028 = ╱eb╱;╱ // 0x3a1b @0x28
0x39f3…3a42 at0029 = ╱44╱D╱ // 0x3a1c @0x29
0x39f3…3a42 at002a = ╱45╱E╱ // 0x3a1d @0x2a
0x39f3…3a42 at002b = ╱42╱B╱ // 0x3a1e @0x2b
0x39f3…3a42 at002c = ╱47╱G╱ // 0x3a1f @0x2c
0x39f3…3a42 at002d = ╱41╱A╱ // 0x3a20 @0x2d
0x39f3…3a42 at002e = ╱44╱D╱ // 0x3a21 @0x2e
0x39f3…3a42 at002f = ╱45╱E╱ // 0x3a22 @0x2f
0x39f3…3a42 at0030 = ╱ef╱$╱ // 0x3a23 @0x30
0x39f3…3a42 at0031 = ╱dc╱=╱ // 0x3a24 @0x31
0x39f3…3a42 at0032 = ╱44╱D╱ // 0x3a25 @0x32
0x39f3…3a42 at0033 = ╱45╱E╱ // 0x3a26 @0x33
0x39f3…3a42 at0034 = ╱42╱B╱ // 0x3a27 @0x34
0x39f3…3a42 at0035 = ╱4e╱N╱ // 0x3a28 @0x35
0x39f3…3a42 at0036 = ╱41╱A╱ // 0x3a29 @0x36
0x39f3…3a42 at0037 = ╱56╱V╱ // 0x3a2a @0x37
0x39f3…3a42 at0038 = ╱4e╱N╱ // 0x3a2b @0x38
0x39f3…3a42 at0039 = ╱ef╱$╱ // 0x3a2c @0x39
0x39f3…3a42 at003a = ╱eb╱;╱ // 0x3a2d @0x3a
0x39f3…3a42 at003b = ╱44╱D╱ // 0x3a2e @0x3b
0x39f3…3a42 at003c = ╱45╱E╱ // 0x3a2f @0x3c
0x39f3…3a42 at003d = ╱42╱B╱ // 0x3a30 @0x3d
0x39f3…3a42 at003e = ╱50╱P╱ // 0x3a31 @0x3e
0x39f3…3a42 at003f = ╱4f╱O╱ // 0x3a32 @0x3f
0x39f3…3a42 at0040 = ╱53╱S╱ // 0x3a33 @0x40
0x39f3…3a42 at0041 = ╱54╱T╱ // 0x3a34 @0x41
0x39f3…3a42 at0042 = ╱4e╱N╱ // 0x3a35 @0x42
0x39f3…3a42 at0043 = ╱52╱R╱ // 0x3a36 @0x43
0x39f3…3a42 at0044 = ╱dc╱=╱ // 0x3a37 @0x44
0x39f3…3a42 at0045 = ╱39╱9╱ // 0x3a38 @0x45
0x39f3…3a42 at0046 = ╱39╱9╱ // 0x3a39 @0x46
0x39f3…3a42 at0047 = ╱39╱9╱ // 0x3a3a @0x47
0x39f3…3a42 at0048 = ╱39╱9╱ // 0x3a3b @0x48
0x39f3…3a42 at0049 = ╱fe003c9c0e╱ // 0x3a3c @0x49
0x39f3…3a42 at004e = EOL // 0x3a41 @0x4e
0x39f3…3a42 }
0x3a42…3a49 c7a0 6330 OUTPUT P
0x3a42…3a49 LineComalBin {
0x3a42…3a49 ptr = 0xc7a0 // 0x3a42 @0x0
0x3a42…3a49 lno = 0x18ba // 0x3a44 @0x2
0x3a42…3a49 at0004 = ╱a5╱ OUTPUT ╱ // 0x3a46 @0x4
0x3a42…3a49 at0005 = ╱50╱P╱ // 0x3a47 @0x5
0x3a42…3a49 at0006 = EOL // 0x3a48 @0x6
0x3a42…3a49 }
0x3a49…3a73 c7ca 6340 DEBBY$=DEBNAVN$(E:15);DEBLK$="0"
0x3a49…3a73 LineComalBin {
0x3a49…3a73 ptr = 0xc7ca // 0x3a49 @0x0
0x3a49…3a73 lno = 0x18c4 // 0x3a4b @0x2
0x3a49…3a73 at0004 = ╱44╱D╱ // 0x3a4d @0x4
0x3a49…3a73 at0005 = ╱45╱E╱ // 0x3a4e @0x5
0x3a49…3a73 at0006 = ╱42╱B╱ // 0x3a4f @0x6
0x3a49…3a73 at0007 = ╱42╱B╱ // 0x3a50 @0x7
0x3a49…3a73 at0008 = ╱59╱Y╱ // 0x3a51 @0x8
0x3a49…3a73 at0009 = ╱ef╱$╱ // 0x3a52 @0x9
0x3a49…3a73 at000a = ╱dc╱=╱ // 0x3a53 @0xa
0x3a49…3a73 at000b = ╱44╱D╱ // 0x3a54 @0xb
0x3a49…3a73 at000c = ╱45╱E╱ // 0x3a55 @0xc
0x3a49…3a73 at000d = ╱42╱B╱ // 0x3a56 @0xd
0x3a49…3a73 at000e = ╱4e╱N╱ // 0x3a57 @0xe
0x3a49…3a73 at000f = ╱41╱A╱ // 0x3a58 @0xf
0x3a49…3a73 at0010 = ╱56╱V╱ // 0x3a59 @0x10
0x3a49…3a73 at0011 = ╱4e╱N╱ // 0x3a5a @0x11
0x3a49…3a73 at0012 = ╱ef╱$╱ // 0x3a5b @0x12
0x3a49…3a73 at0013 = ╱ed╱(╱ // 0x3a5c @0x13
0x3a49…3a73 at0014 = ╱45╱E╱ // 0x3a5d @0x14
0x3a49…3a73 at0015 = ╱f0╱:╱ // 0x3a5e @0x15
0x3a49…3a73 at0016 = ╱31╱1╱ // 0x3a5f @0x16
0x3a49…3a73 at0017 = ╱35╱5╱ // 0x3a60 @0x17
0x3a49…3a73 at0018 = ╱fe0000f004╱ // 0x3a61 @0x18
0x3a49…3a73 at001d = ╱ee╱)╱ // 0x3a66 @0x1d
0x3a49…3a73 at001e = ╱eb╱;╱ // 0x3a67 @0x1e
0x3a49…3a73 at001f = ╱44╱D╱ // 0x3a68 @0x1f
0x3a49…3a73 at0020 = ╱45╱E╱ // 0x3a69 @0x20
0x3a49…3a73 at0021 = ╱42╱B╱ // 0x3a6a @0x21
0x3a49…3a73 at0022 = ╱4c╱L╱ // 0x3a6b @0x22
0x3a49…3a73 at0023 = ╱4b╱K╱ // 0x3a6c @0x23
0x3a49…3a73 at0024 = ╱ef╱$╱ // 0x3a6d @0x24
0x3a49…3a73 at0025 = ╱dc╱=╱ // 0x3a6e @0x25
0x3a49…3a73 at0026 = ╱22╱"╱ // 0x3a6f @0x26
0x3a49…3a73 at0027 = ╱30╱0╱ // 0x3a70 @0x27
0x3a49…3a73 at0028 = ╱22╱"╱ // 0x3a71 @0x28
0x3a49…3a73 at0029 = EOL // 0x3a72 @0x29
0x3a49…3a73 }
0x3a73…3a81 c7d8 6350 EXEC HUDSKRIV
0x3a73…3a81 LineComalBin {
0x3a73…3a81 ptr = 0xc7d8 // 0x3a73 @0x0
0x3a73…3a81 lno = 0x18ce // 0x3a75 @0x2
0x3a73…3a81 at0004 = ╱9d╱ EXEC ╱ // 0x3a77 @0x4
0x3a73…3a81 at0005 = ╱48╱H╱ // 0x3a78 @0x5
0x3a73…3a81 at0006 = ╱55╱U╱ // 0x3a79 @0x6
0x3a73…3a81 at0007 = ╱44╱D╱ // 0x3a7a @0x7
0x3a73…3a81 at0008 = ╱53╱S╱ // 0x3a7b @0x8
0x3a73…3a81 at0009 = ╱4b╱K╱ // 0x3a7c @0x9
0x3a73…3a81 at000a = ╱52╱R╱ // 0x3a7d @0xa
0x3a73…3a81 at000b = ╱49╱I╱ // 0x3a7e @0xb
0x3a73…3a81 at000c = ╱56╱V╱ // 0x3a7f @0xc
0x3a73…3a81 at000d = EOL // 0x3a80 @0xd
0x3a73…3a81 }
0x3a81…3aae c805 6360 EXEC LUDSKRIV(99999,999999,9)
0x3a81…3aae LineComalBin {
0x3a81…3aae ptr = 0xc805 // 0x3a81 @0x0
0x3a81…3aae lno = 0x18d8 // 0x3a83 @0x2
0x3a81…3aae at0004 = ╱9d╱ EXEC ╱ // 0x3a85 @0x4
0x3a81…3aae at0005 = ╱4c╱L╱ // 0x3a86 @0x5
0x3a81…3aae at0006 = ╱55╱U╱ // 0x3a87 @0x6
0x3a81…3aae at0007 = ╱44╱D╱ // 0x3a88 @0x7
0x3a81…3aae at0008 = ╱53╱S╱ // 0x3a89 @0x8
0x3a81…3aae at0009 = ╱4b╱K╱ // 0x3a8a @0x9
0x3a81…3aae at000a = ╱52╱R╱ // 0x3a8b @0xa
0x3a81…3aae at000b = ╱49╱I╱ // 0x3a8c @0xb
0x3a81…3aae at000c = ╱56╱V╱ // 0x3a8d @0xc
0x3a81…3aae at000d = ╱ed╱(╱ // 0x3a8e @0xd
0x3a81…3aae at000e = ╱39╱9╱ // 0x3a8f @0xe
0x3a81…3aae at000f = ╱39╱9╱ // 0x3a90 @0xf
0x3a81…3aae at0010 = ╱39╱9╱ // 0x3a91 @0x10
0x3a81…3aae at0011 = ╱39╱9╱ // 0x3a92 @0x11
0x3a81…3aae at0012 = ╱39╱9╱ // 0x3a93 @0x12
0x3a81…3aae at0013 = ╱fe804fc311╱ // 0x3a94 @0x13
0x3a81…3aae at0018 = ╱ec╱,╱ // 0x3a99 @0x18
0x3a81…3aae at0019 = ╱39╱9╱ // 0x3a9a @0x19
0x3a81…3aae at001a = ╱39╱9╱ // 0x3a9b @0x1a
0x3a81…3aae at001b = ╱39╱9╱ // 0x3a9c @0x1b
0x3a81…3aae at001c = ╱39╱9╱ // 0x3a9d @0x1c
0x3a81…3aae at001d = ╱39╱9╱ // 0x3a9e @0x1d
0x3a81…3aae at001e = ╱39╱9╱ // 0x3a9f @0x1e
0x3a81…3aae at001f = ╱fef023f414╱ // 0x3aa0 @0x1f
0x3a81…3aae at0024 = ╱ec╱,╱ // 0x3aa5 @0x24
0x3a81…3aae at0025 = ╱39╱9╱ // 0x3aa6 @0x25
0x3a81…3aae at0026 = ╱fe00009004╱ // 0x3aa7 @0x26
0x3a81…3aae at002b = ╱ee╱)╱ // 0x3aac @0x2b
0x3a81…3aae at002c = EOL // 0x3aad @0x2c
0x3a81…3aae }
0x3aae…3ac9 c820 6370 PRINT CHR(10);CHR(10)
0x3aae…3ac9 LineComalBin {
0x3aae…3ac9 ptr = 0xc820 // 0x3aae @0x0
0x3aae…3ac9 lno = 0x18e2 // 0x3ab0 @0x2
0x3aae…3ac9 at0004 = ╱92╱ PRINT ╱ // 0x3ab2 @0x4
0x3aae…3ac9 at0005 = ╱cf╱CHR╱ // 0x3ab3 @0x5
0x3aae…3ac9 at0006 = ╱ed╱(╱ // 0x3ab4 @0x6
0x3aae…3ac9 at0007 = ╱31╱1╱ // 0x3ab5 @0x7
0x3aae…3ac9 at0008 = ╱30╱0╱ // 0x3ab6 @0x8
0x3aae…3ac9 at0009 = ╱fe0000a004╱ // 0x3ab7 @0x9
0x3aae…3ac9 at000e = ╱ee╱)╱ // 0x3abc @0xe
0x3aae…3ac9 at000f = ╱eb╱;╱ // 0x3abd @0xf
0x3aae…3ac9 at0010 = ╱cf╱CHR╱ // 0x3abe @0x10
0x3aae…3ac9 at0011 = ╱ed╱(╱ // 0x3abf @0x11
0x3aae…3ac9 at0012 = ╱31╱1╱ // 0x3ac0 @0x12
0x3aae…3ac9 at0013 = ╱30╱0╱ // 0x3ac1 @0x13
0x3aae…3ac9 at0014 = ╱fe0000a004╱ // 0x3ac2 @0x14
0x3aae…3ac9 at0019 = ╱ee╱)╱ // 0x3ac7 @0x19
0x3aae…3ac9 at001a = EOL // 0x3ac8 @0x1a
0x3aae…3ac9 }
0x3ac9…3b0f c866 6380 PRINT TAB(11);"XX.XX.XX XXXXXX ";DEBNAVN$;" XXX.XXX,XX XXX.XXX,XX"
0x3ac9…3b0f LineComalBin {
0x3ac9…3b0f ptr = 0xc866 // 0x3ac9 @0x0
0x3ac9…3b0f lno = 0x18ec // 0x3acb @0x2
0x3ac9…3b0f at0004 = ╱92╱ PRINT ╱ // 0x3acd @0x4
0x3ac9…3b0f at0005 = ╱d2╱TAB╱ // 0x3ace @0x5
0x3ac9…3b0f at0006 = ╱ed╱(╱ // 0x3acf @0x6
0x3ac9…3b0f at0007 = ╱31╱1╱ // 0x3ad0 @0x7
0x3ac9…3b0f at0008 = ╱31╱1╱ // 0x3ad1 @0x8
0x3ac9…3b0f at0009 = ╱fe0000b004╱ // 0x3ad2 @0x9
0x3ac9…3b0f at000e = ╱ee╱)╱ // 0x3ad7 @0xe
0x3ac9…3b0f at000f = ╱eb╱;╱ // 0x3ad8 @0xf
0x3ac9…3b0f at0010 = ╱22╱"╱ // 0x3ad9 @0x10
0x3ac9…3b0f at0011 = ╱58╱X╱ // 0x3ada @0x11
0x3ac9…3b0f at0012 = ╱58╱X╱ // 0x3adb @0x12
0x3ac9…3b0f at0013 = ╱2e╱.╱ // 0x3adc @0x13
0x3ac9…3b0f at0014 = ╱58╱X╱ // 0x3add @0x14
0x3ac9…3b0f at0015 = ╱58╱X╱ // 0x3ade @0x15
0x3ac9…3b0f at0016 = ╱2e╱.╱ // 0x3adf @0x16
0x3ac9…3b0f at0017 = ╱58╱X╱ // 0x3ae0 @0x17
0x3ac9…3b0f at0018 = ╱58╱X╱ // 0x3ae1 @0x18
0x3ac9…3b0f at0019 = ╱20╱…╱ // 0x3ae2 @0x19
0x3ac9…3b0f at001a = ╱58╱X╱ // 0x3ae3 @0x1a
0x3ac9…3b0f at001b = ╱58╱X╱ // 0x3ae4 @0x1b
0x3ac9…3b0f at001c = ╱58╱X╱ // 0x3ae5 @0x1c
0x3ac9…3b0f at001d = ╱58╱X╱ // 0x3ae6 @0x1d
0x3ac9…3b0f at001e = ╱58╱X╱ // 0x3ae7 @0x1e
0x3ac9…3b0f at001f = ╱58╱X╱ // 0x3ae8 @0x1f
0x3ac9…3b0f at0020 = ╱20╱…╱ // 0x3ae9 @0x20
0x3ac9…3b0f at0021 = ╱22╱"╱ // 0x3aea @0x21
0x3ac9…3b0f at0022 = ╱eb╱;╱ // 0x3aeb @0x22
0x3ac9…3b0f at0023 = ╱44╱D╱ // 0x3aec @0x23
0x3ac9…3b0f at0024 = ╱45╱E╱ // 0x3aed @0x24
0x3ac9…3b0f at0025 = ╱42╱B╱ // 0x3aee @0x25
0x3ac9…3b0f at0026 = ╱4e╱N╱ // 0x3aef @0x26
0x3ac9…3b0f at0027 = ╱41╱A╱ // 0x3af0 @0x27
0x3ac9…3b0f at0028 = ╱56╱V╱ // 0x3af1 @0x28
0x3ac9…3b0f at0029 = ╱4e╱N╱ // 0x3af2 @0x29
0x3ac9…3b0f at002a = ╱ef╱$╱ // 0x3af3 @0x2a
0x3ac9…3b0f at002b = ╱eb╱;╱ // 0x3af4 @0x2b
0x3ac9…3b0f at002c = ╱22╱"╱ // 0x3af5 @0x2c
0x3ac9…3b0f at002d = ╱20╱…╱ // 0x3af6 @0x2d
0x3ac9…3b0f at002e = ╱20╱…╱ // 0x3af7 @0x2e
0x3ac9…3b0f at002f = ╱58╱X╱ // 0x3af8 @0x2f
0x3ac9…3b0f at0030 = ╱58╱X╱ // 0x3af9 @0x30
0x3ac9…3b0f at0031 = ╱58╱X╱ // 0x3afa @0x31
0x3ac9…3b0f at0032 = ╱2e╱.╱ // 0x3afb @0x32
0x3ac9…3b0f at0033 = ╱58╱X╱ // 0x3afc @0x33
0x3ac9…3b0f at0034 = ╱58╱X╱ // 0x3afd @0x34
0x3ac9…3b0f at0035 = ╱58╱X╱ // 0x3afe @0x35
0x3ac9…3b0f at0036 = ╱2c╱,╱ // 0x3aff @0x36
0x3ac9…3b0f at0037 = ╱58╱X╱ // 0x3b00 @0x37
0x3ac9…3b0f at0038 = ╱58╱X╱ // 0x3b01 @0x38
0x3ac9…3b0f at0039 = ╱20╱…╱ // 0x3b02 @0x39
0x3ac9…3b0f at003a = ╱58╱X╱ // 0x3b03 @0x3a
0x3ac9…3b0f at003b = ╱58╱X╱ // 0x3b04 @0x3b
0x3ac9…3b0f at003c = ╱58╱X╱ // 0x3b05 @0x3c
0x3ac9…3b0f at003d = ╱2e╱.╱ // 0x3b06 @0x3d
0x3ac9…3b0f at003e = ╱58╱X╱ // 0x3b07 @0x3e
0x3ac9…3b0f at003f = ╱58╱X╱ // 0x3b08 @0x3f
0x3ac9…3b0f at0040 = ╱58╱X╱ // 0x3b09 @0x40
0x3ac9…3b0f at0041 = ╱2c╱,╱ // 0x3b0a @0x41
0x3ac9…3b0f at0042 = ╱58╱X╱ // 0x3b0b @0x42
0x3ac9…3b0f at0043 = ╱58╱X╱ // 0x3b0c @0x43
0x3ac9…3b0f at0044 = ╱22╱"╱ // 0x3b0d @0x44
0x3ac9…3b0f at0045 = EOL // 0x3b0e @0x45
0x3ac9…3b0f }
0x3b0f…3b20 c877 6400 FOR I=E TO 18
0x3b0f…3b20 LineComalBin {
0x3b0f…3b20 ptr = 0xc877 // 0x3b0f @0x0
0x3b0f…3b20 lno = 0x1900 // 0x3b11 @0x2
0x3b0f…3b20 at0004 = ╱83╱ FOR ╱ // 0x3b13 @0x4
0x3b0f…3b20 at0005 = ╱49╱I╱ // 0x3b14 @0x5
0x3b0f…3b20 at0006 = ╱dc╱=╱ // 0x3b15 @0x6
0x3b0f…3b20 at0007 = ╱45╱E╱ // 0x3b16 @0x7
0x3b0f…3b20 at0008 = ╱b7╱ TO ╱ // 0x3b17 @0x8
0x3b0f…3b20 at0009 = ╱31╱1╱ // 0x3b18 @0x9
0x3b0f…3b20 at000a = ╱38╱8╱ // 0x3b19 @0xa
0x3b0f…3b20 at000b = ╱fe00009005╱ // 0x3b1a @0xb
0x3b0f…3b20 at0010 = EOL // 0x3b1f @0x10
0x3b0f…3b20 }
0x3b20…3b29 c880 6410 PRINT " "
0x3b20…3b29 LineComalBin {
0x3b20…3b29 ptr = 0xc880 // 0x3b20 @0x0
0x3b20…3b29 lno = 0x190a // 0x3b22 @0x2
0x3b20…3b29 at0004 = ╱92╱ PRINT ╱ // 0x3b24 @0x4
0x3b20…3b29 at0005 = ╱22╱"╱ // 0x3b25 @0x5
0x3b20…3b29 at0006 = ╱20╱…╱ // 0x3b26 @0x6
0x3b20…3b29 at0007 = ╱22╱"╱ // 0x3b27 @0x7
0x3b20…3b29 at0008 = EOL // 0x3b28 @0x8
0x3b20…3b29 }
0x3b29…3b30 c887 6420 NEXT I
0x3b29…3b30 LineComalBin {
0x3b29…3b30 ptr = 0xc887 // 0x3b29 @0x0
0x3b29…3b30 lno = 0x1914 // 0x3b2b @0x2
0x3b29…3b30 at0004 = ╱84╱ NEXT ╱ // 0x3b2d @0x4
0x3b29…3b30 at0005 = ╱49╱I╱ // 0x3b2e @0x5
0x3b29…3b30 at0006 = EOL // 0x3b2f @0x6
0x3b29…3b30 }
0x3b30…3b76 c8cd 6440 PRINT TAB(11);"XX.XX.XX XXXXXX ";DEBNAVN$;" XXX.XXX,XX XXX.XXX,XX"
0x3b30…3b76 LineComalBin {
0x3b30…3b76 ptr = 0xc8cd // 0x3b30 @0x0
0x3b30…3b76 lno = 0x1928 // 0x3b32 @0x2
0x3b30…3b76 at0004 = ╱92╱ PRINT ╱ // 0x3b34 @0x4
0x3b30…3b76 at0005 = ╱d2╱TAB╱ // 0x3b35 @0x5
0x3b30…3b76 at0006 = ╱ed╱(╱ // 0x3b36 @0x6
0x3b30…3b76 at0007 = ╱31╱1╱ // 0x3b37 @0x7
0x3b30…3b76 at0008 = ╱31╱1╱ // 0x3b38 @0x8
0x3b30…3b76 at0009 = ╱fe0000b004╱ // 0x3b39 @0x9
0x3b30…3b76 at000e = ╱ee╱)╱ // 0x3b3e @0xe
0x3b30…3b76 at000f = ╱eb╱;╱ // 0x3b3f @0xf
0x3b30…3b76 at0010 = ╱22╱"╱ // 0x3b40 @0x10
0x3b30…3b76 at0011 = ╱58╱X╱ // 0x3b41 @0x11
0x3b30…3b76 at0012 = ╱58╱X╱ // 0x3b42 @0x12
0x3b30…3b76 at0013 = ╱2e╱.╱ // 0x3b43 @0x13
0x3b30…3b76 at0014 = ╱58╱X╱ // 0x3b44 @0x14
0x3b30…3b76 at0015 = ╱58╱X╱ // 0x3b45 @0x15
0x3b30…3b76 at0016 = ╱2e╱.╱ // 0x3b46 @0x16
0x3b30…3b76 at0017 = ╱58╱X╱ // 0x3b47 @0x17
0x3b30…3b76 at0018 = ╱58╱X╱ // 0x3b48 @0x18
0x3b30…3b76 at0019 = ╱20╱…╱ // 0x3b49 @0x19
0x3b30…3b76 at001a = ╱58╱X╱ // 0x3b4a @0x1a
0x3b30…3b76 at001b = ╱58╱X╱ // 0x3b4b @0x1b
0x3b30…3b76 at001c = ╱58╱X╱ // 0x3b4c @0x1c
0x3b30…3b76 at001d = ╱58╱X╱ // 0x3b4d @0x1d
0x3b30…3b76 at001e = ╱58╱X╱ // 0x3b4e @0x1e
0x3b30…3b76 at001f = ╱58╱X╱ // 0x3b4f @0x1f
0x3b30…3b76 at0020 = ╱20╱…╱ // 0x3b50 @0x20
0x3b30…3b76 at0021 = ╱22╱"╱ // 0x3b51 @0x21
0x3b30…3b76 at0022 = ╱eb╱;╱ // 0x3b52 @0x22
0x3b30…3b76 at0023 = ╱44╱D╱ // 0x3b53 @0x23
0x3b30…3b76 at0024 = ╱45╱E╱ // 0x3b54 @0x24
0x3b30…3b76 at0025 = ╱42╱B╱ // 0x3b55 @0x25
0x3b30…3b76 at0026 = ╱4e╱N╱ // 0x3b56 @0x26
0x3b30…3b76 at0027 = ╱41╱A╱ // 0x3b57 @0x27
0x3b30…3b76 at0028 = ╱56╱V╱ // 0x3b58 @0x28
0x3b30…3b76 at0029 = ╱4e╱N╱ // 0x3b59 @0x29
0x3b30…3b76 at002a = ╱ef╱$╱ // 0x3b5a @0x2a
0x3b30…3b76 at002b = ╱eb╱;╱ // 0x3b5b @0x2b
0x3b30…3b76 at002c = ╱22╱"╱ // 0x3b5c @0x2c
0x3b30…3b76 at002d = ╱20╱…╱ // 0x3b5d @0x2d
0x3b30…3b76 at002e = ╱20╱…╱ // 0x3b5e @0x2e
0x3b30…3b76 at002f = ╱58╱X╱ // 0x3b5f @0x2f
0x3b30…3b76 at0030 = ╱58╱X╱ // 0x3b60 @0x30
0x3b30…3b76 at0031 = ╱58╱X╱ // 0x3b61 @0x31
0x3b30…3b76 at0032 = ╱2e╱.╱ // 0x3b62 @0x32
0x3b30…3b76 at0033 = ╱58╱X╱ // 0x3b63 @0x33
0x3b30…3b76 at0034 = ╱58╱X╱ // 0x3b64 @0x34
0x3b30…3b76 at0035 = ╱58╱X╱ // 0x3b65 @0x35
0x3b30…3b76 at0036 = ╱2c╱,╱ // 0x3b66 @0x36
0x3b30…3b76 at0037 = ╱58╱X╱ // 0x3b67 @0x37
0x3b30…3b76 at0038 = ╱58╱X╱ // 0x3b68 @0x38
0x3b30…3b76 at0039 = ╱20╱…╱ // 0x3b69 @0x39
0x3b30…3b76 at003a = ╱58╱X╱ // 0x3b6a @0x3a
0x3b30…3b76 at003b = ╱58╱X╱ // 0x3b6b @0x3b
0x3b30…3b76 at003c = ╱58╱X╱ // 0x3b6c @0x3c
0x3b30…3b76 at003d = ╱2e╱.╱ // 0x3b6d @0x3d
0x3b30…3b76 at003e = ╱58╱X╱ // 0x3b6e @0x3e
0x3b30…3b76 at003f = ╱58╱X╱ // 0x3b6f @0x3f
0x3b30…3b76 at0040 = ╱58╱X╱ // 0x3b70 @0x40
0x3b30…3b76 at0041 = ╱2c╱,╱ // 0x3b71 @0x41
0x3b30…3b76 at0042 = ╱58╱X╱ // 0x3b72 @0x42
0x3b30…3b76 at0043 = ╱58╱X╱ // 0x3b73 @0x43
0x3b30…3b76 at0044 = ╱22╱"╱ // 0x3b74 @0x44
0x3b30…3b76 at0045 = EOL // 0x3b75 @0x45
0x3b30…3b76 }
0x3b76…3b7f c8d6 6460 PRINT " "
0x3b76…3b7f LineComalBin {
0x3b76…3b7f ptr = 0xc8d6 // 0x3b76 @0x0
0x3b76…3b7f lno = 0x193c // 0x3b78 @0x2
0x3b76…3b7f at0004 = ╱92╱ PRINT ╱ // 0x3b7a @0x4
0x3b76…3b7f at0005 = ╱22╱"╱ // 0x3b7b @0x5
0x3b76…3b7f at0006 = ╱20╱…╱ // 0x3b7c @0x6
0x3b76…3b7f at0007 = ╱22╱"╱ // 0x3b7d @0x7
0x3b76…3b7f at0008 = EOL // 0x3b7e @0x8
0x3b76…3b7f }
0x3b7f…3b88 c8df 6465 PRINT " "
0x3b7f…3b88 LineComalBin {
0x3b7f…3b88 ptr = 0xc8df // 0x3b7f @0x0
0x3b7f…3b88 lno = 0x1941 // 0x3b81 @0x2
0x3b7f…3b88 at0004 = ╱92╱ PRINT ╱ // 0x3b83 @0x4
0x3b7f…3b88 at0005 = ╱22╱"╱ // 0x3b84 @0x5
0x3b7f…3b88 at0006 = ╱20╱…╱ // 0x3b85 @0x6
0x3b7f…3b88 at0007 = ╱22╱"╱ // 0x3b86 @0x7
0x3b7f…3b88 at0008 = EOL // 0x3b87 @0x8
0x3b7f…3b88 }
0x3b88…3bcb c922 6470 PRINT TAB(11);"XX.XXX.XXX,XX";TAB(52);"XXX.XXX,XX XXX.XXX,XX"
0x3b88…3bcb LineComalBin {
0x3b88…3bcb ptr = 0xc922 // 0x3b88 @0x0
0x3b88…3bcb lno = 0x1946 // 0x3b8a @0x2
0x3b88…3bcb at0004 = ╱92╱ PRINT ╱ // 0x3b8c @0x4
0x3b88…3bcb at0005 = ╱d2╱TAB╱ // 0x3b8d @0x5
0x3b88…3bcb at0006 = ╱ed╱(╱ // 0x3b8e @0x6
0x3b88…3bcb at0007 = ╱31╱1╱ // 0x3b8f @0x7
0x3b88…3bcb at0008 = ╱31╱1╱ // 0x3b90 @0x8
0x3b88…3bcb at0009 = ╱fe0000b004╱ // 0x3b91 @0x9
0x3b88…3bcb at000e = ╱ee╱)╱ // 0x3b96 @0xe
0x3b88…3bcb at000f = ╱eb╱;╱ // 0x3b97 @0xf
0x3b88…3bcb at0010 = ╱22╱"╱ // 0x3b98 @0x10
0x3b88…3bcb at0011 = ╱58╱X╱ // 0x3b99 @0x11
0x3b88…3bcb at0012 = ╱58╱X╱ // 0x3b9a @0x12
0x3b88…3bcb at0013 = ╱2e╱.╱ // 0x3b9b @0x13
0x3b88…3bcb at0014 = ╱58╱X╱ // 0x3b9c @0x14
0x3b88…3bcb at0015 = ╱58╱X╱ // 0x3b9d @0x15
0x3b88…3bcb at0016 = ╱58╱X╱ // 0x3b9e @0x16
0x3b88…3bcb at0017 = ╱2e╱.╱ // 0x3b9f @0x17
0x3b88…3bcb at0018 = ╱58╱X╱ // 0x3ba0 @0x18
0x3b88…3bcb at0019 = ╱58╱X╱ // 0x3ba1 @0x19
0x3b88…3bcb at001a = ╱58╱X╱ // 0x3ba2 @0x1a
0x3b88…3bcb at001b = ╱2c╱,╱ // 0x3ba3 @0x1b
0x3b88…3bcb at001c = ╱58╱X╱ // 0x3ba4 @0x1c
0x3b88…3bcb at001d = ╱58╱X╱ // 0x3ba5 @0x1d
0x3b88…3bcb at001e = ╱22╱"╱ // 0x3ba6 @0x1e
0x3b88…3bcb at001f = ╱eb╱;╱ // 0x3ba7 @0x1f
0x3b88…3bcb at0020 = ╱d2╱TAB╱ // 0x3ba8 @0x20
0x3b88…3bcb at0021 = ╱ed╱(╱ // 0x3ba9 @0x21
0x3b88…3bcb at0022 = ╱35╱5╱ // 0x3baa @0x22
0x3b88…3bcb at0023 = ╱32╱2╱ // 0x3bab @0x23
0x3b88…3bcb at0024 = ╱fe0000d006╱ // 0x3bac @0x24
0x3b88…3bcb at0029 = ╱ee╱)╱ // 0x3bb1 @0x29
0x3b88…3bcb at002a = ╱eb╱;╱ // 0x3bb2 @0x2a
0x3b88…3bcb at002b = ╱22╱"╱ // 0x3bb3 @0x2b
0x3b88…3bcb at002c = ╱58╱X╱ // 0x3bb4 @0x2c
0x3b88…3bcb at002d = ╱58╱X╱ // 0x3bb5 @0x2d
0x3b88…3bcb at002e = ╱58╱X╱ // 0x3bb6 @0x2e
0x3b88…3bcb at002f = ╱2e╱.╱ // 0x3bb7 @0x2f
0x3b88…3bcb at0030 = ╱58╱X╱ // 0x3bb8 @0x30
0x3b88…3bcb at0031 = ╱58╱X╱ // 0x3bb9 @0x31
0x3b88…3bcb at0032 = ╱58╱X╱ // 0x3bba @0x32
0x3b88…3bcb at0033 = ╱2c╱,╱ // 0x3bbb @0x33
0x3b88…3bcb at0034 = ╱58╱X╱ // 0x3bbc @0x34
0x3b88…3bcb at0035 = ╱58╱X╱ // 0x3bbd @0x35
0x3b88…3bcb at0036 = ╱20╱…╱ // 0x3bbe @0x36
0x3b88…3bcb at0037 = ╱58╱X╱ // 0x3bbf @0x37
0x3b88…3bcb at0038 = ╱58╱X╱ // 0x3bc0 @0x38
0x3b88…3bcb at0039 = ╱58╱X╱ // 0x3bc1 @0x39
0x3b88…3bcb at003a = ╱2e╱.╱ // 0x3bc2 @0x3a
0x3b88…3bcb at003b = ╱58╱X╱ // 0x3bc3 @0x3b
0x3b88…3bcb at003c = ╱58╱X╱ // 0x3bc4 @0x3c
0x3b88…3bcb at003d = ╱58╱X╱ // 0x3bc5 @0x3d
0x3b88…3bcb at003e = ╱2c╱,╱ // 0x3bc6 @0x3e
0x3b88…3bcb at003f = ╱58╱X╱ // 0x3bc7 @0x3f
0x3b88…3bcb at0040 = ╱58╱X╱ // 0x3bc8 @0x40
0x3b88…3bcb at0041 = ╱22╱"╱ // 0x3bc9 @0x41
0x3b88…3bcb at0042 = EOL // 0x3bca @0x42
0x3b88…3bcb }
0x3bcb…3bd4 c92b 6480 PRINT " "
0x3bcb…3bd4 LineComalBin {
0x3bcb…3bd4 ptr = 0xc92b // 0x3bcb @0x0
0x3bcb…3bd4 lno = 0x1950 // 0x3bcd @0x2
0x3bcb…3bd4 at0004 = ╱92╱ PRINT ╱ // 0x3bcf @0x4
0x3bcb…3bd4 at0005 = ╱22╱"╱ // 0x3bd0 @0x5
0x3bcb…3bd4 at0006 = ╱20╱…╱ // 0x3bd1 @0x6
0x3bcb…3bd4 at0007 = ╱22╱"╱ // 0x3bd2 @0x7
0x3bcb…3bd4 at0008 = EOL // 0x3bd3 @0x8
0x3bcb…3bd4 }
0x3bd4…3bdd c934 6485 PRINT " "
0x3bd4…3bdd LineComalBin {
0x3bd4…3bdd ptr = 0xc934 // 0x3bd4 @0x0
0x3bd4…3bdd lno = 0x1955 // 0x3bd6 @0x2
0x3bd4…3bdd at0004 = ╱92╱ PRINT ╱ // 0x3bd8 @0x4
0x3bd4…3bdd at0005 = ╱22╱"╱ // 0x3bd9 @0x5
0x3bd4…3bdd at0006 = ╱20╱…╱ // 0x3bda @0x6
0x3bd4…3bdd at0007 = ╱22╱"╱ // 0x3bdb @0x7
0x3bd4…3bdd at0008 = EOL // 0x3bdc @0x8
0x3bd4…3bdd }
0x3bdd…3c22 c979 6490 PRINT TAB(11);"XX.XXX.XXX,XX XX.XXX.XXX,XX XX.XXX.XXX,XX ";
0x3bdd…3c22 LineComalBin {
0x3bdd…3c22 ptr = 0xc979 // 0x3bdd @0x0
0x3bdd…3c22 lno = 0x195a // 0x3bdf @0x2
0x3bdd…3c22 at0004 = ╱92╱ PRINT ╱ // 0x3be1 @0x4
0x3bdd…3c22 at0005 = ╱d2╱TAB╱ // 0x3be2 @0x5
0x3bdd…3c22 at0006 = ╱ed╱(╱ // 0x3be3 @0x6
0x3bdd…3c22 at0007 = ╱31╱1╱ // 0x3be4 @0x7
0x3bdd…3c22 at0008 = ╱31╱1╱ // 0x3be5 @0x8
0x3bdd…3c22 at0009 = ╱fe0000b004╱ // 0x3be6 @0x9
0x3bdd…3c22 at000e = ╱ee╱)╱ // 0x3beb @0xe
0x3bdd…3c22 at000f = ╱eb╱;╱ // 0x3bec @0xf
0x3bdd…3c22 at0010 = ╱22╱"╱ // 0x3bed @0x10
0x3bdd…3c22 at0011 = ╱58╱X╱ // 0x3bee @0x11
0x3bdd…3c22 at0012 = ╱58╱X╱ // 0x3bef @0x12
0x3bdd…3c22 at0013 = ╱2e╱.╱ // 0x3bf0 @0x13
0x3bdd…3c22 at0014 = ╱58╱X╱ // 0x3bf1 @0x14
0x3bdd…3c22 at0015 = ╱58╱X╱ // 0x3bf2 @0x15
0x3bdd…3c22 at0016 = ╱58╱X╱ // 0x3bf3 @0x16
0x3bdd…3c22 at0017 = ╱2e╱.╱ // 0x3bf4 @0x17
0x3bdd…3c22 at0018 = ╱58╱X╱ // 0x3bf5 @0x18
0x3bdd…3c22 at0019 = ╱58╱X╱ // 0x3bf6 @0x19
0x3bdd…3c22 at001a = ╱58╱X╱ // 0x3bf7 @0x1a
0x3bdd…3c22 at001b = ╱2c╱,╱ // 0x3bf8 @0x1b
0x3bdd…3c22 at001c = ╱58╱X╱ // 0x3bf9 @0x1c
0x3bdd…3c22 at001d = ╱58╱X╱ // 0x3bfa @0x1d
0x3bdd…3c22 at001e = ╱20╱…╱ // 0x3bfb @0x1e
0x3bdd…3c22 at001f = ╱20╱…╱ // 0x3bfc @0x1f
0x3bdd…3c22 at0020 = ╱20╱…╱ // 0x3bfd @0x20
0x3bdd…3c22 at0021 = ╱58╱X╱ // 0x3bfe @0x21
0x3bdd…3c22 at0022 = ╱58╱X╱ // 0x3bff @0x22
0x3bdd…3c22 at0023 = ╱2e╱.╱ // 0x3c00 @0x23
0x3bdd…3c22 at0024 = ╱58╱X╱ // 0x3c01 @0x24
0x3bdd…3c22 at0025 = ╱58╱X╱ // 0x3c02 @0x25
0x3bdd…3c22 at0026 = ╱58╱X╱ // 0x3c03 @0x26
0x3bdd…3c22 at0027 = ╱2e╱.╱ // 0x3c04 @0x27
0x3bdd…3c22 at0028 = ╱58╱X╱ // 0x3c05 @0x28
0x3bdd…3c22 at0029 = ╱58╱X╱ // 0x3c06 @0x29
0x3bdd…3c22 at002a = ╱58╱X╱ // 0x3c07 @0x2a
0x3bdd…3c22 at002b = ╱2c╱,╱ // 0x3c08 @0x2b
0x3bdd…3c22 at002c = ╱58╱X╱ // 0x3c09 @0x2c
0x3bdd…3c22 at002d = ╱58╱X╱ // 0x3c0a @0x2d
0x3bdd…3c22 at002e = ╱20╱…╱ // 0x3c0b @0x2e
0x3bdd…3c22 at002f = ╱20╱…╱ // 0x3c0c @0x2f
0x3bdd…3c22 at0030 = ╱20╱…╱ // 0x3c0d @0x30
0x3bdd…3c22 at0031 = ╱20╱…╱ // 0x3c0e @0x31
0x3bdd…3c22 at0032 = ╱58╱X╱ // 0x3c0f @0x32
0x3bdd…3c22 at0033 = ╱58╱X╱ // 0x3c10 @0x33
0x3bdd…3c22 at0034 = ╱2e╱.╱ // 0x3c11 @0x34
0x3bdd…3c22 at0035 = ╱58╱X╱ // 0x3c12 @0x35
0x3bdd…3c22 at0036 = ╱58╱X╱ // 0x3c13 @0x36
0x3bdd…3c22 at0037 = ╱58╱X╱ // 0x3c14 @0x37
0x3bdd…3c22 at0038 = ╱2e╱.╱ // 0x3c15 @0x38
0x3bdd…3c22 at0039 = ╱58╱X╱ // 0x3c16 @0x39
0x3bdd…3c22 at003a = ╱58╱X╱ // 0x3c17 @0x3a
0x3bdd…3c22 at003b = ╱58╱X╱ // 0x3c18 @0x3b
0x3bdd…3c22 at003c = ╱2c╱,╱ // 0x3c19 @0x3c
0x3bdd…3c22 at003d = ╱58╱X╱ // 0x3c1a @0x3d
0x3bdd…3c22 at003e = ╱58╱X╱ // 0x3c1b @0x3e
0x3bdd…3c22 at003f = ╱20╱…╱ // 0x3c1c @0x3f
0x3bdd…3c22 at0040 = ╱20╱…╱ // 0x3c1d @0x40
0x3bdd…3c22 at0041 = ╱20╱…╱ // 0x3c1e @0x41
0x3bdd…3c22 at0042 = ╱22╱"╱ // 0x3c1f @0x42
0x3bdd…3c22 at0043 = ╱eb╱;╱ // 0x3c20 @0x43
0x3bdd…3c22 at0044 = EOL // 0x3c21 @0x44
0x3bdd…3c22 }
0x3c22…3c37 c98e 6500 PRINT "XX.XXX.XXX,XX"
0x3c22…3c37 LineComalBin {
0x3c22…3c37 ptr = 0xc98e // 0x3c22 @0x0
0x3c22…3c37 lno = 0x1964 // 0x3c24 @0x2
0x3c22…3c37 at0004 = ╱92╱ PRINT ╱ // 0x3c26 @0x4
0x3c22…3c37 at0005 = ╱22╱"╱ // 0x3c27 @0x5
0x3c22…3c37 at0006 = ╱58╱X╱ // 0x3c28 @0x6
0x3c22…3c37 at0007 = ╱58╱X╱ // 0x3c29 @0x7
0x3c22…3c37 at0008 = ╱2e╱.╱ // 0x3c2a @0x8
0x3c22…3c37 at0009 = ╱58╱X╱ // 0x3c2b @0x9
0x3c22…3c37 at000a = ╱58╱X╱ // 0x3c2c @0xa
0x3c22…3c37 at000b = ╱58╱X╱ // 0x3c2d @0xb
0x3c22…3c37 at000c = ╱2e╱.╱ // 0x3c2e @0xc
0x3c22…3c37 at000d = ╱58╱X╱ // 0x3c2f @0xd
0x3c22…3c37 at000e = ╱58╱X╱ // 0x3c30 @0xe
0x3c22…3c37 at000f = ╱58╱X╱ // 0x3c31 @0xf
0x3c22…3c37 at0010 = ╱2c╱,╱ // 0x3c32 @0x10
0x3c22…3c37 at0011 = ╱58╱X╱ // 0x3c33 @0x11
0x3c22…3c37 at0012 = ╱58╱X╱ // 0x3c34 @0x12
0x3c22…3c37 at0013 = ╱22╱"╱ // 0x3c35 @0x13
0x3c22…3c37 at0014 = EOL // 0x3c36 @0x14
0x3c22…3c37 }
0x3c37…3c73 c9ca 6510 PRINT CHR(10);CHR(10);CHR(10);CHR(10);CHR(10)
0x3c37…3c73 LineComalBin {
0x3c37…3c73 ptr = 0xc9ca // 0x3c37 @0x0
0x3c37…3c73 lno = 0x196e // 0x3c39 @0x2
0x3c37…3c73 at0004 = ╱92╱ PRINT ╱ // 0x3c3b @0x4
0x3c37…3c73 at0005 = ╱cf╱CHR╱ // 0x3c3c @0x5
0x3c37…3c73 at0006 = ╱ed╱(╱ // 0x3c3d @0x6
0x3c37…3c73 at0007 = ╱31╱1╱ // 0x3c3e @0x7
0x3c37…3c73 at0008 = ╱30╱0╱ // 0x3c3f @0x8
0x3c37…3c73 at0009 = ╱fe0000a004╱ // 0x3c40 @0x9
0x3c37…3c73 at000e = ╱ee╱)╱ // 0x3c45 @0xe
0x3c37…3c73 at000f = ╱eb╱;╱ // 0x3c46 @0xf
0x3c37…3c73 at0010 = ╱cf╱CHR╱ // 0x3c47 @0x10
0x3c37…3c73 at0011 = ╱ed╱(╱ // 0x3c48 @0x11
0x3c37…3c73 at0012 = ╱31╱1╱ // 0x3c49 @0x12
0x3c37…3c73 at0013 = ╱30╱0╱ // 0x3c4a @0x13
0x3c37…3c73 at0014 = ╱fe0000a004╱ // 0x3c4b @0x14
0x3c37…3c73 at0019 = ╱ee╱)╱ // 0x3c50 @0x19
0x3c37…3c73 at001a = ╱eb╱;╱ // 0x3c51 @0x1a
0x3c37…3c73 at001b = ╱cf╱CHR╱ // 0x3c52 @0x1b
0x3c37…3c73 at001c = ╱ed╱(╱ // 0x3c53 @0x1c
0x3c37…3c73 at001d = ╱31╱1╱ // 0x3c54 @0x1d
0x3c37…3c73 at001e = ╱30╱0╱ // 0x3c55 @0x1e
0x3c37…3c73 at001f = ╱fe0000a004╱ // 0x3c56 @0x1f
0x3c37…3c73 at0024 = ╱ee╱)╱ // 0x3c5b @0x24
0x3c37…3c73 at0025 = ╱eb╱;╱ // 0x3c5c @0x25
0x3c37…3c73 at0026 = ╱cf╱CHR╱ // 0x3c5d @0x26
0x3c37…3c73 at0027 = ╱ed╱(╱ // 0x3c5e @0x27
0x3c37…3c73 at0028 = ╱31╱1╱ // 0x3c5f @0x28
0x3c37…3c73 at0029 = ╱30╱0╱ // 0x3c60 @0x29
0x3c37…3c73 at002a = ╱fe0000a004╱ // 0x3c61 @0x2a
0x3c37…3c73 at002f = ╱ee╱)╱ // 0x3c66 @0x2f
0x3c37…3c73 at0030 = ╱eb╱;╱ // 0x3c67 @0x30
0x3c37…3c73 at0031 = ╱cf╱CHR╱ // 0x3c68 @0x31
0x3c37…3c73 at0032 = ╱ed╱(╱ // 0x3c69 @0x32
0x3c37…3c73 at0033 = ╱31╱1╱ // 0x3c6a @0x33
0x3c37…3c73 at0034 = ╱30╱0╱ // 0x3c6b @0x34
0x3c37…3c73 at0035 = ╱fe0000a004╱ // 0x3c6c @0x35
0x3c37…3c73 at003a = ╱ee╱)╱ // 0x3c71 @0x3a
0x3c37…3c73 at003b = EOL // 0x3c72 @0x3b
0x3c37…3c73 }
0x3c73…3c7a c9d1 6520 OUTPUT T
0x3c73…3c7a LineComalBin {
0x3c73…3c7a ptr = 0xc9d1 // 0x3c73 @0x0
0x3c73…3c7a lno = 0x1978 // 0x3c75 @0x2
0x3c73…3c7a at0004 = ╱a5╱ OUTPUT ╱ // 0x3c77 @0x4
0x3c73…3c7a at0005 = ╱54╱T╱ // 0x3c78 @0x5
0x3c73…3c7a at0006 = EOL // 0x3c79 @0x6
0x3c73…3c7a }
0x3c7a…3cb4 ca0b 6530 EXEC INDPUT1(4,12,-9,-6,LTX$(7))
0x3c7a…3cb4 LineComalBin {
0x3c7a…3cb4 ptr = 0xca0b // 0x3c7a @0x0
0x3c7a…3cb4 lno = 0x1982 // 0x3c7c @0x2
0x3c7a…3cb4 at0004 = ╱9d╱ EXEC ╱ // 0x3c7e @0x4
0x3c7a…3cb4 at0005 = ╱49╱I╱ // 0x3c7f @0x5
0x3c7a…3cb4 at0006 = ╱4e╱N╱ // 0x3c80 @0x6
0x3c7a…3cb4 at0007 = ╱44╱D╱ // 0x3c81 @0x7
0x3c7a…3cb4 at0008 = ╱50╱P╱ // 0x3c82 @0x8
0x3c7a…3cb4 at0009 = ╱55╱U╱ // 0x3c83 @0x9
0x3c7a…3cb4 at000a = ╱54╱T╱ // 0x3c84 @0xa
0x3c7a…3cb4 at000b = ╱31╱1╱ // 0x3c85 @0xb
0x3c7a…3cb4 at000c = ╱ed╱(╱ // 0x3c86 @0xc
0x3c7a…3cb4 at000d = ╱34╱4╱ // 0x3c87 @0xd
0x3c7a…3cb4 at000e = ╱fe00008003╱ // 0x3c88 @0xe
0x3c7a…3cb4 at0013 = ╱ec╱,╱ // 0x3c8d @0x13
0x3c7a…3cb4 at0014 = ╱31╱1╱ // 0x3c8e @0x14
0x3c7a…3cb4 at0015 = ╱32╱2╱ // 0x3c8f @0x15
0x3c7a…3cb4 at0016 = ╱fe0000c004╱ // 0x3c90 @0x16
0x3c7a…3cb4 at001b = ╱ec╱,╱ // 0x3c95 @0x1b
0x3c7a…3cb4 at001c = ╱e9╱-╱ // 0x3c96 @0x1c
0x3c7a…3cb4 at001d = ╱39╱9╱ // 0x3c97 @0x1d
0x3c7a…3cb4 at001e = ╱fe00009004╱ // 0x3c98 @0x1e
0x3c7a…3cb4 at0023 = ╱ec╱,╱ // 0x3c9d @0x23
0x3c7a…3cb4 at0024 = ╱e9╱-╱ // 0x3c9e @0x24
0x3c7a…3cb4 at0025 = ╱36╱6╱ // 0x3c9f @0x25
0x3c7a…3cb4 at0026 = ╱fe0000c003╱ // 0x3ca0 @0x26
0x3c7a…3cb4 at002b = ╱ec╱,╱ // 0x3ca5 @0x2b
0x3c7a…3cb4 at002c = ╱4c╱L╱ // 0x3ca6 @0x2c
0x3c7a…3cb4 at002d = ╱54╱T╱ // 0x3ca7 @0x2d
0x3c7a…3cb4 at002e = ╱58╱X╱ // 0x3ca8 @0x2e
0x3c7a…3cb4 at002f = ╱ef╱$╱ // 0x3ca9 @0x2f
0x3c7a…3cb4 at0030 = ╱ed╱(╱ // 0x3caa @0x30
0x3c7a…3cb4 at0031 = ╱37╱7╱ // 0x3cab @0x31
0x3c7a…3cb4 at0032 = ╱fe0000e003╱ // 0x3cac @0x32
0x3c7a…3cb4 at0037 = ╱ee╱)╱ // 0x3cb1 @0x37
0x3c7a…3cb4 at0038 = ╱ee╱)╱ // 0x3cb2 @0x38
0x3c7a…3cb4 at0039 = EOL // 0x3cb3 @0x39
0x3c7a…3cb4 }
0x3cb4…3cc3 ca1a 6540 UNTIL P=-8
0x3cb4…3cc3 LineComalBin {
0x3cb4…3cc3 ptr = 0xca1a // 0x3cb4 @0x0
0x3cb4…3cc3 lno = 0x198c // 0x3cb6 @0x2
0x3cb4…3cc3 at0004 = ╱98╱ UNTIL ╱ // 0x3cb8 @0x4
0x3cb4…3cc3 at0005 = ╱50╱P╱ // 0x3cb9 @0x5
0x3cb4…3cc3 at0006 = ╱dc╱=╱ // 0x3cba @0x6
0x3cb4…3cc3 at0007 = ╱e9╱-╱ // 0x3cbb @0x7
0x3cb4…3cc3 at0008 = ╱38╱8╱ // 0x3cbc @0x8
0x3cb4…3cc3 at0009 = ╱fe00008004╱ // 0x3cbd @0x9
0x3cb4…3cc3 at000e = EOL // 0x3cc2 @0xe
0x3cb4…3cc3 }
0x3cc3…3cc9 ca20 6550 ELSE
0x3cc3…3cc9 LineComalBin {
0x3cc3…3cc9 ptr = 0xca20 // 0x3cc3 @0x0
0x3cc3…3cc9 lno = 0x1996 // 0x3cc5 @0x2
0x3cc3…3cc9 at0004 = ╱9a╱ ELSE ╱ // 0x3cc7 @0x4
0x3cc3…3cc9 at0005 = EOL // 0x3cc8 @0x5
0x3cc3…3cc9 }
0x3cc9…3d02 ca59 6560 EXEC INDPUT1(4,10,-2,0,LTX$(8))
0x3cc9…3d02 LineComalBin {
0x3cc9…3d02 ptr = 0xca59 // 0x3cc9 @0x0
0x3cc9…3d02 lno = 0x19a0 // 0x3ccb @0x2
0x3cc9…3d02 at0004 = ╱9d╱ EXEC ╱ // 0x3ccd @0x4
0x3cc9…3d02 at0005 = ╱49╱I╱ // 0x3cce @0x5
0x3cc9…3d02 at0006 = ╱4e╱N╱ // 0x3ccf @0x6
0x3cc9…3d02 at0007 = ╱44╱D╱ // 0x3cd0 @0x7
0x3cc9…3d02 at0008 = ╱50╱P╱ // 0x3cd1 @0x8
0x3cc9…3d02 at0009 = ╱55╱U╱ // 0x3cd2 @0x9
0x3cc9…3d02 at000a = ╱54╱T╱ // 0x3cd3 @0xa
0x3cc9…3d02 at000b = ╱31╱1╱ // 0x3cd4 @0xb
0x3cc9…3d02 at000c = ╱ed╱(╱ // 0x3cd5 @0xc
0x3cc9…3d02 at000d = ╱34╱4╱ // 0x3cd6 @0xd
0x3cc9…3d02 at000e = ╱fe00008003╱ // 0x3cd7 @0xe
0x3cc9…3d02 at0013 = ╱ec╱,╱ // 0x3cdc @0x13
0x3cc9…3d02 at0014 = ╱31╱1╱ // 0x3cdd @0x14
0x3cc9…3d02 at0015 = ╱30╱0╱ // 0x3cde @0x15
0x3cc9…3d02 at0016 = ╱fe0000a004╱ // 0x3cdf @0x16
0x3cc9…3d02 at001b = ╱ec╱,╱ // 0x3ce4 @0x1b
0x3cc9…3d02 at001c = ╱e9╱-╱ // 0x3ce5 @0x1c
0x3cc9…3d02 at001d = ╱32╱2╱ // 0x3ce6 @0x1d
0x3cc9…3d02 at001e = ╱fe00008002╱ // 0x3ce7 @0x1e
0x3cc9…3d02 at0023 = ╱ec╱,╱ // 0x3cec @0x23
0x3cc9…3d02 at0024 = ╱30╱0╱ // 0x3ced @0x24
0x3cc9…3d02 at0025 = ╱fe00000000╱ // 0x3cee @0x25
0x3cc9…3d02 at002a = ╱ec╱,╱ // 0x3cf3 @0x2a
0x3cc9…3d02 at002b = ╱4c╱L╱ // 0x3cf4 @0x2b
0x3cc9…3d02 at002c = ╱54╱T╱ // 0x3cf5 @0x2c
0x3cc9…3d02 at002d = ╱58╱X╱ // 0x3cf6 @0x2d
0x3cc9…3d02 at002e = ╱ef╱$╱ // 0x3cf7 @0x2e
0x3cc9…3d02 at002f = ╱ed╱(╱ // 0x3cf8 @0x2f
0x3cc9…3d02 at0030 = ╱38╱8╱ // 0x3cf9 @0x30
0x3cc9…3d02 at0031 = ╱fe00008004╱ // 0x3cfa @0x31
0x3cc9…3d02 at0036 = ╱ee╱)╱ // 0x3cff @0x36
0x3cc9…3d02 at0037 = ╱ee╱)╱ // 0x3d00 @0x37
0x3cc9…3d02 at0038 = EOL // 0x3d01 @0x38
0x3cc9…3d02 }
0x3d02…3d0f ca66 6570 SKRIV1=B
0x3d02…3d0f LineComalBin {
0x3d02…3d0f ptr = 0xca66 // 0x3d02 @0x0
0x3d02…3d0f lno = 0x19aa // 0x3d04 @0x2
0x3d02…3d0f at0004 = ╱53╱S╱ // 0x3d06 @0x4
0x3d02…3d0f at0005 = ╱4b╱K╱ // 0x3d07 @0x5
0x3d02…3d0f at0006 = ╱52╱R╱ // 0x3d08 @0x6
0x3d02…3d0f at0007 = ╱49╱I╱ // 0x3d09 @0x7
0x3d02…3d0f at0008 = ╱56╱V╱ // 0x3d0a @0x8
0x3d02…3d0f at0009 = ╱31╱1╱ // 0x3d0b @0x9
0x3d02…3d0f at000a = ╱dc╱=╱ // 0x3d0c @0xa
0x3d02…3d0f at000b = ╱42╱B╱ // 0x3d0d @0xb
0x3d02…3d0f at000c = EOL // 0x3d0e @0xc
0x3d02…3d0f }
0x3d0f…3d15 (203,) ca6c 6580 ENDIF
0x3d0f…3d15 LineComalBin {
0x3d0f…3d15 ptr = 0xca6c // 0x3d0f @0x0
0x3d0f…3d15 lno = 0x19b4 // 0x3d11 @0x2
0x3d0f…3d15 at0004 = ╱9b╱ ENDIF ╱ // 0x3d13 @0x4
0x3d0f…3d15 at0005 = EOL // 0x3d14 @0x5
0x3d0f…3d15 }
0x3d15…3d2d ca84 6590 SKRIV=E;LINIE=B;T=E
0x3d15…3d2d LineComalBin {
0x3d15…3d2d ptr = 0xca84 // 0x3d15 @0x0
0x3d15…3d2d lno = 0x19be // 0x3d17 @0x2
0x3d15…3d2d at0004 = ╱53╱S╱ // 0x3d19 @0x4
0x3d15…3d2d at0005 = ╱4b╱K╱ // 0x3d1a @0x5
0x3d15…3d2d at0006 = ╱52╱R╱ // 0x3d1b @0x6
0x3d15…3d2d at0007 = ╱49╱I╱ // 0x3d1c @0x7
0x3d15…3d2d at0008 = ╱56╱V╱ // 0x3d1d @0x8
0x3d15…3d2d at0009 = ╱dc╱=╱ // 0x3d1e @0x9
0x3d15…3d2d at000a = ╱45╱E╱ // 0x3d1f @0xa
0x3d15…3d2d at000b = ╱eb╱;╱ // 0x3d20 @0xb
0x3d15…3d2d at000c = ╱4c╱L╱ // 0x3d21 @0xc
0x3d15…3d2d at000d = ╱49╱I╱ // 0x3d22 @0xd
0x3d15…3d2d at000e = ╱4e╱N╱ // 0x3d23 @0xe
0x3d15…3d2d at000f = ╱49╱I╱ // 0x3d24 @0xf
0x3d15…3d2d at0010 = ╱45╱E╱ // 0x3d25 @0x10
0x3d15…3d2d at0011 = ╱dc╱=╱ // 0x3d26 @0x11
0x3d15…3d2d at0012 = ╱42╱B╱ // 0x3d27 @0x12
0x3d15…3d2d at0013 = ╱eb╱;╱ // 0x3d28 @0x13
0x3d15…3d2d at0014 = ╱54╱T╱ // 0x3d29 @0x14
0x3d15…3d2d at0015 = ╱dc╱=╱ // 0x3d2a @0x15
0x3d15…3d2d at0016 = ╱45╱E╱ // 0x3d2b @0x16
0x3d15…3d2d at0017 = EOL // 0x3d2c @0x17
0x3d15…3d2d }
0x3d2d…3d46 ca9d 6610 EXEC MKONTUD(K9$,MDPOST)
0x3d2d…3d46 LineComalBin {
0x3d2d…3d46 ptr = 0xca9d // 0x3d2d @0x0
0x3d2d…3d46 lno = 0x19d2 // 0x3d2f @0x2
0x3d2d…3d46 at0004 = ╱9d╱ EXEC ╱ // 0x3d31 @0x4
0x3d2d…3d46 at0005 = ╱4d╱M╱ // 0x3d32 @0x5
0x3d2d…3d46 at0006 = ╱4b╱K╱ // 0x3d33 @0x6
0x3d2d…3d46 at0007 = ╱4f╱O╱ // 0x3d34 @0x7
0x3d2d…3d46 at0008 = ╱4e╱N╱ // 0x3d35 @0x8
0x3d2d…3d46 at0009 = ╱54╱T╱ // 0x3d36 @0x9
0x3d2d…3d46 at000a = ╱55╱U╱ // 0x3d37 @0xa
0x3d2d…3d46 at000b = ╱44╱D╱ // 0x3d38 @0xb
0x3d2d…3d46 at000c = ╱ed╱(╱ // 0x3d39 @0xc
0x3d2d…3d46 at000d = ╱4b╱K╱ // 0x3d3a @0xd
0x3d2d…3d46 at000e = ╱39╱9╱ // 0x3d3b @0xe
0x3d2d…3d46 at000f = ╱ef╱$╱ // 0x3d3c @0xf
0x3d2d…3d46 at0010 = ╱ec╱,╱ // 0x3d3d @0x10
0x3d2d…3d46 at0011 = ╱4d╱M╱ // 0x3d3e @0x11
0x3d2d…3d46 at0012 = ╱44╱D╱ // 0x3d3f @0x12
0x3d2d…3d46 at0013 = ╱50╱P╱ // 0x3d40 @0x13
0x3d2d…3d46 at0014 = ╱4f╱O╱ // 0x3d41 @0x14
0x3d2d…3d46 at0015 = ╱53╱S╱ // 0x3d42 @0x15
0x3d2d…3d46 at0016 = ╱54╱T╱ // 0x3d43 @0x16
0x3d2d…3d46 at0017 = ╱ee╱)╱ // 0x3d44 @0x17
0x3d2d…3d46 at0018 = EOL // 0x3d45 @0x18
0x3d2d…3d46 }
0x3d46…3d57 caae 6620 KTAL1=DTAL-E
0x3d46…3d57 LineComalBin {
0x3d46…3d57 ptr = 0xcaae // 0x3d46 @0x0
0x3d46…3d57 lno = 0x19dc // 0x3d48 @0x2
0x3d46…3d57 at0004 = ╱4b╱K╱ // 0x3d4a @0x4
0x3d46…3d57 at0005 = ╱54╱T╱ // 0x3d4b @0x5
0x3d46…3d57 at0006 = ╱41╱A╱ // 0x3d4c @0x6
0x3d46…3d57 at0007 = ╱4c╱L╱ // 0x3d4d @0x7
0x3d46…3d57 at0008 = ╱31╱1╱ // 0x3d4e @0x8
0x3d46…3d57 at0009 = ╱dc╱=╱ // 0x3d4f @0x9
0x3d46…3d57 at000a = ╱44╱D╱ // 0x3d50 @0xa
0x3d46…3d57 at000b = ╱54╱T╱ // 0x3d51 @0xb
0x3d46…3d57 at000c = ╱41╱A╱ // 0x3d52 @0xc
0x3d46…3d57 at000d = ╱4c╱L╱ // 0x3d53 @0xd
0x3d46…3d57 at000e = ╱e3╱-╱ // 0x3d54 @0xe
0x3d46…3d57 at000f = ╱45╱E╱ // 0x3d55 @0xf
0x3d46…3d57 at0010 = EOL // 0x3d56 @0x10
0x3d46…3d57 }
0x3d57…3d66 cabd 6630 IF SKRIV1=E THEN
0x3d57…3d66 LineComalBin {
0x3d57…3d66 ptr = 0xcabd // 0x3d57 @0x0
0x3d57…3d66 lno = 0x19e6 // 0x3d59 @0x2
0x3d57…3d66 at0004 = ╱9c╱ IF ╱ // 0x3d5b @0x4
0x3d57…3d66 at0005 = ╱53╱S╱ // 0x3d5c @0x5
0x3d57…3d66 at0006 = ╱4b╱K╱ // 0x3d5d @0x6
0x3d57…3d66 at0007 = ╱52╱R╱ // 0x3d5e @0x7
0x3d57…3d66 at0008 = ╱49╱I╱ // 0x3d5f @0x8
0x3d57…3d66 at0009 = ╱56╱V╱ // 0x3d60 @0x9
0x3d57…3d66 at000a = ╱31╱1╱ // 0x3d61 @0xa
0x3d57…3d66 at000b = ╱dc╱=╱ // 0x3d62 @0xb
0x3d57…3d66 at000c = ╱45╱E╱ // 0x3d63 @0xc
0x3d57…3d66 at000d = ╱b6╱ THEN ╱ // 0x3d64 @0xd
0x3d57…3d66 at000e = EOL // 0x3d65 @0xe
0x3d57…3d66 }
0x3d66…3d73 caca 6640 SKRIV1=B
0x3d66…3d73 LineComalBin {
0x3d66…3d73 ptr = 0xcaca // 0x3d66 @0x0
0x3d66…3d73 lno = 0x19f0 // 0x3d68 @0x2
0x3d66…3d73 at0004 = ╱53╱S╱ // 0x3d6a @0x4
0x3d66…3d73 at0005 = ╱4b╱K╱ // 0x3d6b @0x5
0x3d66…3d73 at0006 = ╱52╱R╱ // 0x3d6c @0x6
0x3d66…3d73 at0007 = ╱49╱I╱ // 0x3d6d @0x7
0x3d66…3d73 at0008 = ╱56╱V╱ // 0x3d6e @0x8
0x3d66…3d73 at0009 = ╱31╱1╱ // 0x3d6f @0x9
0x3d66…3d73 at000a = ╱dc╱=╱ // 0x3d70 @0xa
0x3d66…3d73 at000b = ╱42╱B╱ // 0x3d71 @0xb
0x3d66…3d73 at000c = EOL // 0x3d72 @0xc
0x3d66…3d73 }
0x3d73…3d7a cad1 6650 OUTPUT T
0x3d73…3d7a LineComalBin {
0x3d73…3d7a ptr = 0xcad1 // 0x3d73 @0x0
0x3d73…3d7a lno = 0x19fa // 0x3d75 @0x2
0x3d73…3d7a at0004 = ╱a5╱ OUTPUT ╱ // 0x3d77 @0x4
0x3d73…3d7a at0005 = ╱54╱T╱ // 0x3d78 @0x5
0x3d73…3d7a at0006 = EOL // 0x3d79 @0x6
0x3d73…3d7a }
0x3d7a…3d80 cad7 6660 CLEAR
0x3d7a…3d80 LineComalBin {
0x3d7a…3d80 ptr = 0xcad7 // 0x3d7a @0x0
0x3d7a…3d80 lno = 0x1a04 // 0x3d7c @0x2
0x3d7a…3d80 at0004 = ╱a0╱ CLEAR ╱ // 0x3d7e @0x4
0x3d7a…3d80 at0005 = EOL // 0x3d7f @0x5
0x3d7a…3d80 }
0x3d80…3dbb cb12 6670 EXEC INDPUT1(20,13,-2,0,LTX$(11))
0x3d80…3dbb LineComalBin {
0x3d80…3dbb ptr = 0xcb12 // 0x3d80 @0x0
0x3d80…3dbb lno = 0x1a0e // 0x3d82 @0x2
0x3d80…3dbb at0004 = ╱9d╱ EXEC ╱ // 0x3d84 @0x4
0x3d80…3dbb at0005 = ╱49╱I╱ // 0x3d85 @0x5
0x3d80…3dbb at0006 = ╱4e╱N╱ // 0x3d86 @0x6
0x3d80…3dbb at0007 = ╱44╱D╱ // 0x3d87 @0x7
0x3d80…3dbb at0008 = ╱50╱P╱ // 0x3d88 @0x8
0x3d80…3dbb at0009 = ╱55╱U╱ // 0x3d89 @0x9
0x3d80…3dbb at000a = ╱54╱T╱ // 0x3d8a @0xa
0x3d80…3dbb at000b = ╱31╱1╱ // 0x3d8b @0xb
0x3d80…3dbb at000c = ╱ed╱(╱ // 0x3d8c @0xc
0x3d80…3dbb at000d = ╱32╱2╱ // 0x3d8d @0xd
0x3d80…3dbb at000e = ╱30╱0╱ // 0x3d8e @0xe
0x3d80…3dbb at000f = ╱fe0000a005╱ // 0x3d8f @0xf
0x3d80…3dbb at0014 = ╱ec╱,╱ // 0x3d94 @0x14
0x3d80…3dbb at0015 = ╱31╱1╱ // 0x3d95 @0x15
0x3d80…3dbb at0016 = ╱33╱3╱ // 0x3d96 @0x16
0x3d80…3dbb at0017 = ╱fe0000d004╱ // 0x3d97 @0x17
0x3d80…3dbb at001c = ╱ec╱,╱ // 0x3d9c @0x1c
0x3d80…3dbb at001d = ╱e9╱-╱ // 0x3d9d @0x1d
0x3d80…3dbb at001e = ╱32╱2╱ // 0x3d9e @0x1e
0x3d80…3dbb at001f = ╱fe00008002╱ // 0x3d9f @0x1f
0x3d80…3dbb at0024 = ╱ec╱,╱ // 0x3da4 @0x24
0x3d80…3dbb at0025 = ╱30╱0╱ // 0x3da5 @0x25
0x3d80…3dbb at0026 = ╱fe00000000╱ // 0x3da6 @0x26
0x3d80…3dbb at002b = ╱ec╱,╱ // 0x3dab @0x2b
0x3d80…3dbb at002c = ╱4c╱L╱ // 0x3dac @0x2c
0x3d80…3dbb at002d = ╱54╱T╱ // 0x3dad @0x2d
0x3d80…3dbb at002e = ╱58╱X╱ // 0x3dae @0x2e
0x3d80…3dbb at002f = ╱ef╱$╱ // 0x3daf @0x2f
0x3d80…3dbb at0030 = ╱ed╱(╱ // 0x3db0 @0x30
0x3d80…3dbb at0031 = ╱31╱1╱ // 0x3db1 @0x31
0x3d80…3dbb at0032 = ╱31╱1╱ // 0x3db2 @0x32
0x3d80…3dbb at0033 = ╱fe0000b004╱ // 0x3db3 @0x33
0x3d80…3dbb at0038 = ╱ee╱)╱ // 0x3db8 @0x38
0x3d80…3dbb at0039 = ╱ee╱)╱ // 0x3db9 @0x39
0x3d80…3dbb at003a = EOL // 0x3dba @0x3a
0x3d80…3dbb }
0x3dbb…3dc1 cb18 6680 ENDIF
0x3dbb…3dc1 LineComalBin {
0x3dbb…3dc1 ptr = 0xcb18 // 0x3dbb @0x0
0x3dbb…3dc1 lno = 0x1a18 // 0x3dbd @0x2
0x3dbb…3dc1 at0004 = ╱9b╱ ENDIF ╱ // 0x3dbf @0x4
0x3dbb…3dc1 at0005 = EOL // 0x3dc0 @0x5
0x3dbb…3dc1 }
0x3dc1…3dda cb31 6690 EXEC MKONTUD(K8$,MFPOST)
0x3dc1…3dda LineComalBin {
0x3dc1…3dda ptr = 0xcb31 // 0x3dc1 @0x0
0x3dc1…3dda lno = 0x1a22 // 0x3dc3 @0x2
0x3dc1…3dda at0004 = ╱9d╱ EXEC ╱ // 0x3dc5 @0x4
0x3dc1…3dda at0005 = ╱4d╱M╱ // 0x3dc6 @0x5
0x3dc1…3dda at0006 = ╱4b╱K╱ // 0x3dc7 @0x6
0x3dc1…3dda at0007 = ╱4f╱O╱ // 0x3dc8 @0x7
0x3dc1…3dda at0008 = ╱4e╱N╱ // 0x3dc9 @0x8
0x3dc1…3dda at0009 = ╱54╱T╱ // 0x3dca @0x9
0x3dc1…3dda at000a = ╱55╱U╱ // 0x3dcb @0xa
0x3dc1…3dda at000b = ╱44╱D╱ // 0x3dcc @0xb
0x3dc1…3dda at000c = ╱ed╱(╱ // 0x3dcd @0xc
0x3dc1…3dda at000d = ╱4b╱K╱ // 0x3dce @0xd
0x3dc1…3dda at000e = ╱38╱8╱ // 0x3dcf @0xe
0x3dc1…3dda at000f = ╱ef╱$╱ // 0x3dd0 @0xf
0x3dc1…3dda at0010 = ╱ec╱,╱ // 0x3dd1 @0x10
0x3dc1…3dda at0011 = ╱4d╱M╱ // 0x3dd2 @0x11
0x3dc1…3dda at0012 = ╱46╱F╱ // 0x3dd3 @0x12
0x3dc1…3dda at0013 = ╱50╱P╱ // 0x3dd4 @0x13
0x3dc1…3dda at0014 = ╱4f╱O╱ // 0x3dd5 @0x14
0x3dc1…3dda at0015 = ╱53╱S╱ // 0x3dd6 @0x15
0x3dc1…3dda at0016 = ╱54╱T╱ // 0x3dd7 @0x16
0x3dc1…3dda at0017 = ╱ee╱)╱ // 0x3dd8 @0x17
0x3dc1…3dda at0018 = EOL // 0x3dd9 @0x18
0x3dc1…3dda }
0x3dda…3dea cb41 6700 KTAL1=KRTAL
0x3dda…3dea LineComalBin {
0x3dda…3dea ptr = 0xcb41 // 0x3dda @0x0
0x3dda…3dea lno = 0x1a2c // 0x3ddc @0x2
0x3dda…3dea at0004 = ╱4b╱K╱ // 0x3dde @0x4
0x3dda…3dea at0005 = ╱54╱T╱ // 0x3ddf @0x5
0x3dda…3dea at0006 = ╱41╱A╱ // 0x3de0 @0x6
0x3dda…3dea at0007 = ╱4c╱L╱ // 0x3de1 @0x7
0x3dda…3dea at0008 = ╱31╱1╱ // 0x3de2 @0x8
0x3dda…3dea at0009 = ╱dc╱=╱ // 0x3de3 @0x9
0x3dda…3dea at000a = ╱4b╱K╱ // 0x3de4 @0xa
0x3dda…3dea at000b = ╱52╱R╱ // 0x3de5 @0xb
0x3dda…3dea at000c = ╱54╱T╱ // 0x3de6 @0xc
0x3dda…3dea at000d = ╱41╱A╱ // 0x3de7 @0xd
0x3dda…3dea at000e = ╱4c╱L╱ // 0x3de8 @0xe
0x3dda…3dea at000f = EOL // 0x3de9 @0xf
0x3dda…3dea }
0x3dea…3df1 cb48 6705 OUTPUT T
0x3dea…3df1 LineComalBin {
0x3dea…3df1 ptr = 0xcb48 // 0x3dea @0x0
0x3dea…3df1 lno = 0x1a31 // 0x3dec @0x2
0x3dea…3df1 at0004 = ╱a5╱ OUTPUT ╱ // 0x3dee @0x4
0x3dea…3df1 at0005 = ╱54╱T╱ // 0x3def @0x5
0x3dea…3df1 at0006 = EOL // 0x3df0 @0x6
0x3dea…3df1 }
0x3df1…3e0b cb62 6710 EXEC MKONTUD(K10$,MKPOST)
0x3df1…3e0b LineComalBin {
0x3df1…3e0b ptr = 0xcb62 // 0x3df1 @0x0
0x3df1…3e0b lno = 0x1a36 // 0x3df3 @0x2
0x3df1…3e0b at0004 = ╱9d╱ EXEC ╱ // 0x3df5 @0x4
0x3df1…3e0b at0005 = ╱4d╱M╱ // 0x3df6 @0x5
0x3df1…3e0b at0006 = ╱4b╱K╱ // 0x3df7 @0x6
0x3df1…3e0b at0007 = ╱4f╱O╱ // 0x3df8 @0x7
0x3df1…3e0b at0008 = ╱4e╱N╱ // 0x3df9 @0x8
0x3df1…3e0b at0009 = ╱54╱T╱ // 0x3dfa @0x9
0x3df1…3e0b at000a = ╱55╱U╱ // 0x3dfb @0xa
0x3df1…3e0b at000b = ╱44╱D╱ // 0x3dfc @0xb
0x3df1…3e0b at000c = ╱ed╱(╱ // 0x3dfd @0xc
0x3df1…3e0b at000d = ╱4b╱K╱ // 0x3dfe @0xd
0x3df1…3e0b at000e = ╱31╱1╱ // 0x3dff @0xe
0x3df1…3e0b at000f = ╱30╱0╱ // 0x3e00 @0xf
0x3df1…3e0b at0010 = ╱ef╱$╱ // 0x3e01 @0x10
0x3df1…3e0b at0011 = ╱ec╱,╱ // 0x3e02 @0x11
0x3df1…3e0b at0012 = ╱4d╱M╱ // 0x3e03 @0x12
0x3df1…3e0b at0013 = ╱4b╱K╱ // 0x3e04 @0x13
0x3df1…3e0b at0014 = ╱50╱P╱ // 0x3e05 @0x14
0x3df1…3e0b at0015 = ╱4f╱O╱ // 0x3e06 @0x15
0x3df1…3e0b at0016 = ╱53╱S╱ // 0x3e07 @0x16
0x3df1…3e0b at0017 = ╱54╱T╱ // 0x3e08 @0x17
0x3df1…3e0b at0018 = ╱ee╱)╱ // 0x3e09 @0x18
0x3df1…3e0b at0019 = EOL // 0x3e0a @0x19
0x3df1…3e0b }
0x3e0b…3e11 cb68 6720 CLEAR
0x3e0b…3e11 LineComalBin {
0x3e0b…3e11 ptr = 0xcb68 // 0x3e0b @0x0
0x3e0b…3e11 lno = 0x1a40 // 0x3e0d @0x2
0x3e0b…3e11 at0004 = ╱a0╱ CLEAR ╱ // 0x3e0f @0x4
0x3e0b…3e11 at0005 = EOL // 0x3e10 @0x5
0x3e0b…3e11 }
0x3e11…3e18 cb6f 6730 OUTPUT T
0x3e11…3e18 LineComalBin {
0x3e11…3e18 ptr = 0xcb6f // 0x3e11 @0x0
0x3e11…3e18 lno = 0x1a4a // 0x3e13 @0x2
0x3e11…3e18 at0004 = ╱a5╱ OUTPUT ╱ // 0x3e15 @0x4
0x3e11…3e18 at0005 = ╱54╱T╱ // 0x3e16 @0x5
0x3e11…3e18 at0006 = EOL // 0x3e17 @0x6
0x3e11…3e18 }
0x3e18…3e54 cbab 6740 EXEC INDPUT1(20,13,-9,-6,LTX$(10))
0x3e18…3e54 LineComalBin {
0x3e18…3e54 ptr = 0xcbab // 0x3e18 @0x0
0x3e18…3e54 lno = 0x1a54 // 0x3e1a @0x2
0x3e18…3e54 at0004 = ╱9d╱ EXEC ╱ // 0x3e1c @0x4
0x3e18…3e54 at0005 = ╱49╱I╱ // 0x3e1d @0x5
0x3e18…3e54 at0006 = ╱4e╱N╱ // 0x3e1e @0x6
0x3e18…3e54 at0007 = ╱44╱D╱ // 0x3e1f @0x7
0x3e18…3e54 at0008 = ╱50╱P╱ // 0x3e20 @0x8
0x3e18…3e54 at0009 = ╱55╱U╱ // 0x3e21 @0x9
0x3e18…3e54 at000a = ╱54╱T╱ // 0x3e22 @0xa
0x3e18…3e54 at000b = ╱31╱1╱ // 0x3e23 @0xb
0x3e18…3e54 at000c = ╱ed╱(╱ // 0x3e24 @0xc
0x3e18…3e54 at000d = ╱32╱2╱ // 0x3e25 @0xd
0x3e18…3e54 at000e = ╱30╱0╱ // 0x3e26 @0xe
0x3e18…3e54 at000f = ╱fe0000a005╱ // 0x3e27 @0xf
0x3e18…3e54 at0014 = ╱ec╱,╱ // 0x3e2c @0x14
0x3e18…3e54 at0015 = ╱31╱1╱ // 0x3e2d @0x15
0x3e18…3e54 at0016 = ╱33╱3╱ // 0x3e2e @0x16
0x3e18…3e54 at0017 = ╱fe0000d004╱ // 0x3e2f @0x17
0x3e18…3e54 at001c = ╱ec╱,╱ // 0x3e34 @0x1c
0x3e18…3e54 at001d = ╱e9╱-╱ // 0x3e35 @0x1d
0x3e18…3e54 at001e = ╱39╱9╱ // 0x3e36 @0x1e
0x3e18…3e54 at001f = ╱fe00009004╱ // 0x3e37 @0x1f
0x3e18…3e54 at0024 = ╱ec╱,╱ // 0x3e3c @0x24
0x3e18…3e54 at0025 = ╱e9╱-╱ // 0x3e3d @0x25
0x3e18…3e54 at0026 = ╱36╱6╱ // 0x3e3e @0x26
0x3e18…3e54 at0027 = ╱fe0000c003╱ // 0x3e3f @0x27
0x3e18…3e54 at002c = ╱ec╱,╱ // 0x3e44 @0x2c
0x3e18…3e54 at002d = ╱4c╱L╱ // 0x3e45 @0x2d
0x3e18…3e54 at002e = ╱54╱T╱ // 0x3e46 @0x2e
0x3e18…3e54 at002f = ╱58╱X╱ // 0x3e47 @0x2f
0x3e18…3e54 at0030 = ╱ef╱$╱ // 0x3e48 @0x30
0x3e18…3e54 at0031 = ╱ed╱(╱ // 0x3e49 @0x31
0x3e18…3e54 at0032 = ╱31╱1╱ // 0x3e4a @0x32
0x3e18…3e54 at0033 = ╱30╱0╱ // 0x3e4b @0x33
0x3e18…3e54 at0034 = ╱fe0000a004╱ // 0x3e4c @0x34
0x3e18…3e54 at0039 = ╱ee╱)╱ // 0x3e51 @0x39
0x3e18…3e54 at003a = ╱ee╱)╱ // 0x3e52 @0x3a
0x3e18…3e54 at003b = EOL // 0x3e53 @0x3b
0x3e18…3e54 }
0x3e54…3e63 cbba 6750 UNTIL P=-8
0x3e54…3e63 LineComalBin {
0x3e54…3e63 ptr = 0xcbba // 0x3e54 @0x0
0x3e54…3e63 lno = 0x1a5e // 0x3e56 @0x2
0x3e54…3e63 at0004 = ╱98╱ UNTIL ╱ // 0x3e58 @0x4
0x3e54…3e63 at0005 = ╱50╱P╱ // 0x3e59 @0x5
0x3e54…3e63 at0006 = ╱dc╱=╱ // 0x3e5a @0x6
0x3e54…3e63 at0007 = ╱e9╱-╱ // 0x3e5b @0x7
0x3e54…3e63 at0008 = ╱38╱8╱ // 0x3e5c @0x8
0x3e54…3e63 at0009 = ╱fe00008004╱ // 0x3e5d @0x9
0x3e54…3e63 at000e = EOL // 0x3e62 @0xe
0x3e54…3e63 }
0x3e63…3e69 cbc0 6760 ELSE
0x3e63…3e69 LineComalBin {
0x3e63…3e69 ptr = 0xcbc0 // 0x3e63 @0x0
0x3e63…3e69 lno = 0x1a68 // 0x3e65 @0x2
0x3e63…3e69 at0004 = ╱9a╱ ELSE ╱ // 0x3e67 @0x4
0x3e63…3e69 at0005 = EOL // 0x3e68 @0x5
0x3e63…3e69 }
0x3e69…3e77 cbce 6770 EXEC STARTBIL
0x3e69…3e77 LineComalBin {
0x3e69…3e77 ptr = 0xcbce // 0x3e69 @0x0
0x3e69…3e77 lno = 0x1a72 // 0x3e6b @0x2
0x3e69…3e77 at0004 = ╱9d╱ EXEC ╱ // 0x3e6d @0x4
0x3e69…3e77 at0005 = ╱53╱S╱ // 0x3e6e @0x5
0x3e69…3e77 at0006 = ╱54╱T╱ // 0x3e6f @0x6
0x3e69…3e77 at0007 = ╱41╱A╱ // 0x3e70 @0x7
0x3e69…3e77 at0008 = ╱52╱R╱ // 0x3e71 @0x8
0x3e69…3e77 at0009 = ╱54╱T╱ // 0x3e72 @0x9
0x3e69…3e77 at000a = ╱42╱B╱ // 0x3e73 @0xa
0x3e69…3e77 at000b = ╱49╱I╱ // 0x3e74 @0xb
0x3e69…3e77 at000c = ╱4c╱L╱ // 0x3e75 @0xc
0x3e69…3e77 at000d = EOL // 0x3e76 @0xd
0x3e69…3e77 }
0x3e77…3e7d cbd4 6780 REPEAT
0x3e77…3e7d LineComalBin {
0x3e77…3e7d ptr = 0xcbd4 // 0x3e77 @0x0
0x3e77…3e7d lno = 0x1a7c // 0x3e79 @0x2
0x3e77…3e7d at0004 = ╱97╱ REPEAT ╱ // 0x3e7b @0x4
0x3e77…3e7d at0005 = EOL // 0x3e7c @0x5
0x3e77…3e7d }
0x3e7d…3e8b cbe2 6790 IF KONT=B THEN EXIT
0x3e7d…3e8b LineComalBin {
0x3e7d…3e8b ptr = 0xcbe2 // 0x3e7d @0x0
0x3e7d…3e8b lno = 0x1a86 // 0x3e7f @0x2
0x3e7d…3e8b at0004 = ╱82╱ IF ╱ // 0x3e81 @0x4
0x3e7d…3e8b at0005 = ╱4b╱K╱ // 0x3e82 @0x5
0x3e7d…3e8b at0006 = ╱4f╱O╱ // 0x3e83 @0x6
0x3e7d…3e8b at0007 = ╱4e╱N╱ // 0x3e84 @0x7
0x3e7d…3e8b at0008 = ╱54╱T╱ // 0x3e85 @0x8
0x3e7d…3e8b at0009 = ╱dc╱=╱ // 0x3e86 @0x9
0x3e7d…3e8b at000a = ╱42╱B╱ // 0x3e87 @0xa
0x3e7d…3e8b at000b = ╱b6╱ THEN ╱ // 0x3e88 @0xb
0x3e7d…3e8b at000c = ╱99╱ EXIT ╱ // 0x3e89 @0xc
0x3e7d…3e8b at000d = EOL // 0x3e8a @0xd
0x3e7d…3e8b }
0x3e8b…3ec5 cc1c 6800 EXEC INDPUT1(4,14,-9,-6,LTX$(9))
0x3e8b…3ec5 LineComalBin {
0x3e8b…3ec5 ptr = 0xcc1c // 0x3e8b @0x0
0x3e8b…3ec5 lno = 0x1a90 // 0x3e8d @0x2
0x3e8b…3ec5 at0004 = ╱9d╱ EXEC ╱ // 0x3e8f @0x4
0x3e8b…3ec5 at0005 = ╱49╱I╱ // 0x3e90 @0x5
0x3e8b…3ec5 at0006 = ╱4e╱N╱ // 0x3e91 @0x6
0x3e8b…3ec5 at0007 = ╱44╱D╱ // 0x3e92 @0x7
0x3e8b…3ec5 at0008 = ╱50╱P╱ // 0x3e93 @0x8
0x3e8b…3ec5 at0009 = ╱55╱U╱ // 0x3e94 @0x9
0x3e8b…3ec5 at000a = ╱54╱T╱ // 0x3e95 @0xa
0x3e8b…3ec5 at000b = ╱31╱1╱ // 0x3e96 @0xb
0x3e8b…3ec5 at000c = ╱ed╱(╱ // 0x3e97 @0xc
0x3e8b…3ec5 at000d = ╱34╱4╱ // 0x3e98 @0xd
0x3e8b…3ec5 at000e = ╱fe00008003╱ // 0x3e99 @0xe
0x3e8b…3ec5 at0013 = ╱ec╱,╱ // 0x3e9e @0x13
0x3e8b…3ec5 at0014 = ╱31╱1╱ // 0x3e9f @0x14
0x3e8b…3ec5 at0015 = ╱34╱4╱ // 0x3ea0 @0x15
0x3e8b…3ec5 at0016 = ╱fe0000e004╱ // 0x3ea1 @0x16
0x3e8b…3ec5 at001b = ╱ec╱,╱ // 0x3ea6 @0x1b
0x3e8b…3ec5 at001c = ╱e9╱-╱ // 0x3ea7 @0x1c
0x3e8b…3ec5 at001d = ╱39╱9╱ // 0x3ea8 @0x1d
0x3e8b…3ec5 at001e = ╱fe00009004╱ // 0x3ea9 @0x1e
0x3e8b…3ec5 at0023 = ╱ec╱,╱ // 0x3eae @0x23
0x3e8b…3ec5 at0024 = ╱e9╱-╱ // 0x3eaf @0x24
0x3e8b…3ec5 at0025 = ╱36╱6╱ // 0x3eb0 @0x25
0x3e8b…3ec5 at0026 = ╱fe0000c003╱ // 0x3eb1 @0x26
0x3e8b…3ec5 at002b = ╱ec╱,╱ // 0x3eb6 @0x2b
0x3e8b…3ec5 at002c = ╱4c╱L╱ // 0x3eb7 @0x2c
0x3e8b…3ec5 at002d = ╱54╱T╱ // 0x3eb8 @0x2d
0x3e8b…3ec5 at002e = ╱58╱X╱ // 0x3eb9 @0x2e
0x3e8b…3ec5 at002f = ╱ef╱$╱ // 0x3eba @0x2f
0x3e8b…3ec5 at0030 = ╱ed╱(╱ // 0x3ebb @0x30
0x3e8b…3ec5 at0031 = ╱39╱9╱ // 0x3ebc @0x31
0x3e8b…3ec5 at0032 = ╱fe00009004╱ // 0x3ebd @0x32
0x3e8b…3ec5 at0037 = ╱ee╱)╱ // 0x3ec2 @0x37
0x3e8b…3ec5 at0038 = ╱ee╱)╱ // 0x3ec3 @0x38
0x3e8b…3ec5 at0039 = EOL // 0x3ec4 @0x39
0x3e8b…3ec5 }
0x3ec5…3edc cc33 6810 KSIDENR=B;SKRIV1=B
0x3ec5…3edc LineComalBin {
0x3ec5…3edc ptr = 0xcc33 // 0x3ec5 @0x0
0x3ec5…3edc lno = 0x1a9a // 0x3ec7 @0x2
0x3ec5…3edc at0004 = ╱4b╱K╱ // 0x3ec9 @0x4
0x3ec5…3edc at0005 = ╱53╱S╱ // 0x3eca @0x5
0x3ec5…3edc at0006 = ╱49╱I╱ // 0x3ecb @0x6
0x3ec5…3edc at0007 = ╱44╱D╱ // 0x3ecc @0x7
0x3ec5…3edc at0008 = ╱45╱E╱ // 0x3ecd @0x8
0x3ec5…3edc at0009 = ╱4e╱N╱ // 0x3ece @0x9
0x3ec5…3edc at000a = ╱52╱R╱ // 0x3ecf @0xa
0x3ec5…3edc at000b = ╱dc╱=╱ // 0x3ed0 @0xb
0x3ec5…3edc at000c = ╱42╱B╱ // 0x3ed1 @0xc
0x3ec5…3edc at000d = ╱eb╱;╱ // 0x3ed2 @0xd
0x3ec5…3edc at000e = ╱53╱S╱ // 0x3ed3 @0xe
0x3ec5…3edc at000f = ╱4b╱K╱ // 0x3ed4 @0xf
0x3ec5…3edc at0010 = ╱52╱R╱ // 0x3ed5 @0x10
0x3ec5…3edc at0011 = ╱49╱I╱ // 0x3ed6 @0x11
0x3ec5…3edc at0012 = ╱56╱V╱ // 0x3ed7 @0x12
0x3ec5…3edc at0013 = ╱31╱1╱ // 0x3ed8 @0x13
0x3ec5…3edc at0014 = ╱dc╱=╱ // 0x3ed9 @0x14
0x3ec5…3edc at0015 = ╱42╱B╱ // 0x3eda @0x15
0x3ec5…3edc at0016 = EOL // 0x3edb @0x16
0x3ec5…3edc }
0x3edc…3eec cc43 6820 IF P=-7 THEN
0x3edc…3eec LineComalBin {
0x3edc…3eec ptr = 0xcc43 // 0x3edc @0x0
0x3edc…3eec lno = 0x1aa4 // 0x3ede @0x2
0x3edc…3eec at0004 = ╱9c╱ IF ╱ // 0x3ee0 @0x4
0x3edc…3eec at0005 = ╱50╱P╱ // 0x3ee1 @0x5
0x3edc…3eec at0006 = ╱dc╱=╱ // 0x3ee2 @0x6
0x3edc…3eec at0007 = ╱e9╱-╱ // 0x3ee3 @0x7
0x3edc…3eec at0008 = ╱37╱7╱ // 0x3ee4 @0x8
0x3edc…3eec at0009 = ╱fe0000e003╱ // 0x3ee5 @0x9
0x3edc…3eec at000e = ╱b6╱ THEN ╱ // 0x3eea @0xe
0x3edc…3eec at000f = EOL // 0x3eeb @0xf
0x3edc…3eec }
0x3eec…3ef8 cc4f 6830 SKRIV=E
0x3eec…3ef8 LineComalBin {
0x3eec…3ef8 ptr = 0xcc4f // 0x3eec @0x0
0x3eec…3ef8 lno = 0x1aae // 0x3eee @0x2
0x3eec…3ef8 at0004 = ╱53╱S╱ // 0x3ef0 @0x4
0x3eec…3ef8 at0005 = ╱4b╱K╱ // 0x3ef1 @0x5
0x3eec…3ef8 at0006 = ╱52╱R╱ // 0x3ef2 @0x6
0x3eec…3ef8 at0007 = ╱49╱I╱ // 0x3ef3 @0x7
0x3eec…3ef8 at0008 = ╱56╱V╱ // 0x3ef4 @0x8
0x3eec…3ef8 at0009 = ╱dc╱=╱ // 0x3ef5 @0x9
0x3eec…3ef8 at000a = ╱45╱E╱ // 0x3ef6 @0xa
0x3eec…3ef8 at000b = EOL // 0x3ef7 @0xb
0x3eec…3ef8 }
0x3ef8…3eff cc56 6840 OUTPUT P
0x3ef8…3eff LineComalBin {
0x3ef8…3eff ptr = 0xcc56 // 0x3ef8 @0x0
0x3ef8…3eff lno = 0x1ab8 // 0x3efa @0x2
0x3ef8…3eff at0004 = ╱a5╱ OUTPUT ╱ // 0x3efc @0x4
0x3ef8…3eff at0005 = ╱50╱P╱ // 0x3efd @0x5
0x3ef8…3eff at0006 = EOL // 0x3efe @0x6
0x3ef8…3eff }
0x3eff…3f0d cc64 6850 EXEC HUDSKRIV
0x3eff…3f0d LineComalBin {
0x3eff…3f0d ptr = 0xcc64 // 0x3eff @0x0
0x3eff…3f0d lno = 0x1ac2 // 0x3f01 @0x2
0x3eff…3f0d at0004 = ╱9d╱ EXEC ╱ // 0x3f03 @0x4
0x3eff…3f0d at0005 = ╱48╱H╱ // 0x3f04 @0x5
0x3eff…3f0d at0006 = ╱55╱U╱ // 0x3f05 @0x6
0x3eff…3f0d at0007 = ╱44╱D╱ // 0x3f06 @0x7
0x3eff…3f0d at0008 = ╱53╱S╱ // 0x3f07 @0x8
0x3eff…3f0d at0009 = ╱4b╱K╱ // 0x3f08 @0x9
0x3eff…3f0d at000a = ╱52╱R╱ // 0x3f09 @0xa
0x3eff…3f0d at000b = ╱49╱I╱ // 0x3f0a @0xb
0x3eff…3f0d at000c = ╱56╱V╱ // 0x3f0b @0xc
0x3eff…3f0d at000d = EOL // 0x3f0c @0xd
0x3eff…3f0d }
0x3f0d…3f13 cc6a 6870 ELSE
0x3f0d…3f13 LineComalBin {
0x3f0d…3f13 ptr = 0xcc6a // 0x3f0d @0x0
0x3f0d…3f13 lno = 0x1ad6 // 0x3f0f @0x2
0x3f0d…3f13 at0004 = ╱9a╱ ELSE ╱ // 0x3f11 @0x4
0x3f0d…3f13 at0005 = EOL // 0x3f12 @0x5
0x3f0d…3f13 }
0x3f13…3f1f cc76 6880 SKRIV=B
0x3f13…3f1f LineComalBin {
0x3f13…3f1f ptr = 0xcc76 // 0x3f13 @0x0
0x3f13…3f1f lno = 0x1ae0 // 0x3f15 @0x2
0x3f13…3f1f at0004 = ╱53╱S╱ // 0x3f17 @0x4
0x3f13…3f1f at0005 = ╱4b╱K╱ // 0x3f18 @0x5
0x3f13…3f1f at0006 = ╱52╱R╱ // 0x3f19 @0x6
0x3f13…3f1f at0007 = ╱49╱I╱ // 0x3f1a @0x7
0x3f13…3f1f at0008 = ╱56╱V╱ // 0x3f1b @0x8
0x3f13…3f1f at0009 = ╱dc╱=╱ // 0x3f1c @0x9
0x3f13…3f1f at000a = ╱42╱B╱ // 0x3f1d @0xa
0x3f13…3f1f at000b = EOL // 0x3f1e @0xb
0x3f13…3f1f }
0x3f1f…3f26 cc7d 6890 OUTPUT T
0x3f1f…3f26 LineComalBin {
0x3f1f…3f26 ptr = 0xcc7d // 0x3f1f @0x0
0x3f1f…3f26 lno = 0x1aea // 0x3f21 @0x2
0x3f1f…3f26 at0004 = ╱a5╱ OUTPUT ╱ // 0x3f23 @0x4
0x3f1f…3f26 at0005 = ╱54╱T╱ // 0x3f24 @0x5
0x3f1f…3f26 at0006 = EOL // 0x3f25 @0x6
0x3f1f…3f26 }
0x3f26…3f2c cc83 6895 ENDIF
0x3f26…3f2c LineComalBin {
0x3f26…3f2c ptr = 0xcc83 // 0x3f26 @0x0
0x3f26…3f2c lno = 0x1aef // 0x3f28 @0x2
0x3f26…3f2c at0004 = ╱9b╱ ENDIF ╱ // 0x3f2a @0x4
0x3f26…3f2c at0005 = EOL // 0x3f2b @0x5
0x3f26…3f2c }
0x3f2c…3f3b cc92 6900 EXEC HSUDSKRIV
0x3f2c…3f3b LineComalBin {
0x3f2c…3f3b ptr = 0xcc92 // 0x3f2c @0x0
0x3f2c…3f3b lno = 0x1af4 // 0x3f2e @0x2
0x3f2c…3f3b at0004 = ╱9d╱ EXEC ╱ // 0x3f30 @0x4
0x3f2c…3f3b at0005 = ╱48╱H╱ // 0x3f31 @0x5
0x3f2c…3f3b at0006 = ╱53╱S╱ // 0x3f32 @0x6
0x3f2c…3f3b at0007 = ╱55╱U╱ // 0x3f33 @0x7
0x3f2c…3f3b at0008 = ╱44╱D╱ // 0x3f34 @0x8
0x3f2c…3f3b at0009 = ╱53╱S╱ // 0x3f35 @0x9
0x3f2c…3f3b at000a = ╱4b╱K╱ // 0x3f36 @0xa
0x3f2c…3f3b at000b = ╱52╱R╱ // 0x3f37 @0xb
0x3f2c…3f3b at000c = ╱49╱I╱ // 0x3f38 @0xc
0x3f2c…3f3b at000d = ╱56╱V╱ // 0x3f39 @0xd
0x3f2c…3f3b at000e = EOL // 0x3f3a @0xe
0x3f2c…3f3b }
0x3f3b…3f48 cc9f 6920 CASE KTAL1 OF
0x3f3b…3f48 LineComalBin {
0x3f3b…3f48 ptr = 0xcc9f // 0x3f3b @0x0
0x3f3b…3f48 lno = 0x1b08 // 0x3f3d @0x2
0x3f3b…3f48 at0004 = ╱a201╱ CASE ╱ // 0x3f3f @0x4
0x3f3b…3f48 at0006 = ╱4b╱K╱ // 0x3f41 @0x6
0x3f3b…3f48 at0007 = ╱54╱T╱ // 0x3f42 @0x7
0x3f3b…3f48 at0008 = ╱41╱A╱ // 0x3f43 @0x8
0x3f3b…3f48 at0009 = ╱4c╱L╱ // 0x3f44 @0x9
0x3f3b…3f48 at000a = ╱31╱1╱ // 0x3f45 @0xa
0x3f3b…3f48 at000b = ╱ba╱ OF ╱ // 0x3f46 @0xb
0x3f3b…3f48 at000c = EOL // 0x3f47 @0xc
0x3f3b…3f48 }
0x3f48…3f6f ccc6 6930 EXEC SØG(MFPOST,HFTAB,KONT,UFTAB,K11$)
0x3f48…3f6f LineComalBin {
0x3f48…3f6f ptr = 0xccc6 // 0x3f48 @0x0
0x3f48…3f6f lno = 0x1b12 // 0x3f4a @0x2
0x3f48…3f6f at0004 = ╱9d╱ EXEC ╱ // 0x3f4c @0x4
0x3f48…3f6f at0005 = ╱53╱S╱ // 0x3f4d @0x5
0x3f48…3f6f at0006 = ╱5c╱Ø╱ // 0x3f4e @0x6
0x3f48…3f6f at0007 = ╱47╱G╱ // 0x3f4f @0x7
0x3f48…3f6f at0008 = ╱ed╱(╱ // 0x3f50 @0x8
0x3f48…3f6f at0009 = ╱4d╱M╱ // 0x3f51 @0x9
0x3f48…3f6f at000a = ╱46╱F╱ // 0x3f52 @0xa
0x3f48…3f6f at000b = ╱50╱P╱ // 0x3f53 @0xb
0x3f48…3f6f at000c = ╱4f╱O╱ // 0x3f54 @0xc
0x3f48…3f6f at000d = ╱53╱S╱ // 0x3f55 @0xd
0x3f48…3f6f at000e = ╱54╱T╱ // 0x3f56 @0xe
0x3f48…3f6f at000f = ╱ec╱,╱ // 0x3f57 @0xf
0x3f48…3f6f at0010 = ╱48╱H╱ // 0x3f58 @0x10
0x3f48…3f6f at0011 = ╱46╱F╱ // 0x3f59 @0x11
0x3f48…3f6f at0012 = ╱54╱T╱ // 0x3f5a @0x12
0x3f48…3f6f at0013 = ╱41╱A╱ // 0x3f5b @0x13
0x3f48…3f6f at0014 = ╱42╱B╱ // 0x3f5c @0x14
0x3f48…3f6f at0015 = ╱ec╱,╱ // 0x3f5d @0x15
0x3f48…3f6f at0016 = ╱4b╱K╱ // 0x3f5e @0x16
0x3f48…3f6f at0017 = ╱4f╱O╱ // 0x3f5f @0x17
0x3f48…3f6f at0018 = ╱4e╱N╱ // 0x3f60 @0x18
0x3f48…3f6f at0019 = ╱54╱T╱ // 0x3f61 @0x19
0x3f48…3f6f at001a = ╱ec╱,╱ // 0x3f62 @0x1a
0x3f48…3f6f at001b = ╱55╱U╱ // 0x3f63 @0x1b
0x3f48…3f6f at001c = ╱46╱F╱ // 0x3f64 @0x1c
0x3f48…3f6f at001d = ╱54╱T╱ // 0x3f65 @0x1d
0x3f48…3f6f at001e = ╱41╱A╱ // 0x3f66 @0x1e
0x3f48…3f6f at001f = ╱42╱B╱ // 0x3f67 @0x1f
0x3f48…3f6f at0020 = ╱ec╱,╱ // 0x3f68 @0x20
0x3f48…3f6f at0021 = ╱4b╱K╱ // 0x3f69 @0x21
0x3f48…3f6f at0022 = ╱31╱1╱ // 0x3f6a @0x22
0x3f48…3f6f at0023 = ╱31╱1╱ // 0x3f6b @0x23
0x3f48…3f6f at0024 = ╱ef╱$╱ // 0x3f6c @0x24
0x3f48…3f6f at0025 = ╱ee╱)╱ // 0x3f6d @0x25
0x3f48…3f6f at0026 = EOL // 0x3f6e @0x26
0x3f48…3f6f }
0x3f6f…3f7a ccd1 6940 WHEN DTAL
0x3f6f…3f7a LineComalBin {
0x3f6f…3f7a ptr = 0xccd1 // 0x3f6f @0x0
0x3f6f…3f7a lno = 0x1b1c // 0x3f71 @0x2
0x3f6f…3f7a at0004 = ╱a301╱ WHEN ╱ // 0x3f73 @0x4
0x3f6f…3f7a at0006 = ╱44╱D╱ // 0x3f75 @0x6
0x3f6f…3f7a at0007 = ╱54╱T╱ // 0x3f76 @0x7
0x3f6f…3f7a at0008 = ╱41╱A╱ // 0x3f77 @0x8
0x3f6f…3f7a at0009 = ╱4c╱L╱ // 0x3f78 @0x9
0x3f6f…3f7a at000a = EOL // 0x3f79 @0xa
0x3f6f…3f7a }
0x3f7a…3fa1 ccf8 6950 EXEC SØG(MDPOST,HDTAB,KONT,UDTAB,K12$)
0x3f7a…3fa1 LineComalBin {
0x3f7a…3fa1 ptr = 0xccf8 // 0x3f7a @0x0
0x3f7a…3fa1 lno = 0x1b26 // 0x3f7c @0x2
0x3f7a…3fa1 at0004 = ╱9d╱ EXEC ╱ // 0x3f7e @0x4
0x3f7a…3fa1 at0005 = ╱53╱S╱ // 0x3f7f @0x5
0x3f7a…3fa1 at0006 = ╱5c╱Ø╱ // 0x3f80 @0x6
0x3f7a…3fa1 at0007 = ╱47╱G╱ // 0x3f81 @0x7
0x3f7a…3fa1 at0008 = ╱ed╱(╱ // 0x3f82 @0x8
0x3f7a…3fa1 at0009 = ╱4d╱M╱ // 0x3f83 @0x9
0x3f7a…3fa1 at000a = ╱44╱D╱ // 0x3f84 @0xa
0x3f7a…3fa1 at000b = ╱50╱P╱ // 0x3f85 @0xb
0x3f7a…3fa1 at000c = ╱4f╱O╱ // 0x3f86 @0xc
0x3f7a…3fa1 at000d = ╱53╱S╱ // 0x3f87 @0xd
0x3f7a…3fa1 at000e = ╱54╱T╱ // 0x3f88 @0xe
0x3f7a…3fa1 at000f = ╱ec╱,╱ // 0x3f89 @0xf
0x3f7a…3fa1 at0010 = ╱48╱H╱ // 0x3f8a @0x10
0x3f7a…3fa1 at0011 = ╱44╱D╱ // 0x3f8b @0x11
0x3f7a…3fa1 at0012 = ╱54╱T╱ // 0x3f8c @0x12
0x3f7a…3fa1 at0013 = ╱41╱A╱ // 0x3f8d @0x13
0x3f7a…3fa1 at0014 = ╱42╱B╱ // 0x3f8e @0x14
0x3f7a…3fa1 at0015 = ╱ec╱,╱ // 0x3f8f @0x15
0x3f7a…3fa1 at0016 = ╱4b╱K╱ // 0x3f90 @0x16
0x3f7a…3fa1 at0017 = ╱4f╱O╱ // 0x3f91 @0x17
0x3f7a…3fa1 at0018 = ╱4e╱N╱ // 0x3f92 @0x18
0x3f7a…3fa1 at0019 = ╱54╱T╱ // 0x3f93 @0x19
0x3f7a…3fa1 at001a = ╱ec╱,╱ // 0x3f94 @0x1a
0x3f7a…3fa1 at001b = ╱55╱U╱ // 0x3f95 @0x1b
0x3f7a…3fa1 at001c = ╱44╱D╱ // 0x3f96 @0x1c
0x3f7a…3fa1 at001d = ╱54╱T╱ // 0x3f97 @0x1d
0x3f7a…3fa1 at001e = ╱41╱A╱ // 0x3f98 @0x1e
0x3f7a…3fa1 at001f = ╱42╱B╱ // 0x3f99 @0x1f
0x3f7a…3fa1 at0020 = ╱ec╱,╱ // 0x3f9a @0x20
0x3f7a…3fa1 at0021 = ╱4b╱K╱ // 0x3f9b @0x21
0x3f7a…3fa1 at0022 = ╱31╱1╱ // 0x3f9c @0x22
0x3f7a…3fa1 at0023 = ╱32╱2╱ // 0x3f9d @0x23
0x3f7a…3fa1 at0024 = ╱ef╱$╱ // 0x3f9e @0x24
0x3f7a…3fa1 at0025 = ╱ee╱)╱ // 0x3f9f @0x25
0x3f7a…3fa1 at0026 = EOL // 0x3fa0 @0x26
0x3f7a…3fa1 }
0x3fa1…3fad cd04 6960 WHEN KRTAL
0x3fa1…3fad LineComalBin {
0x3fa1…3fad ptr = 0xcd04 // 0x3fa1 @0x0
0x3fa1…3fad lno = 0x1b30 // 0x3fa3 @0x2
0x3fa1…3fad at0004 = ╱a301╱ WHEN ╱ // 0x3fa5 @0x4
0x3fa1…3fad at0006 = ╱4b╱K╱ // 0x3fa7 @0x6
0x3fa1…3fad at0007 = ╱52╱R╱ // 0x3fa8 @0x7
0x3fa1…3fad at0008 = ╱54╱T╱ // 0x3fa9 @0x8
0x3fa1…3fad at0009 = ╱41╱A╱ // 0x3faa @0x9
0x3fa1…3fad at000a = ╱4c╱L╱ // 0x3fab @0xa
0x3fa1…3fad at000b = EOL // 0x3fac @0xb
0x3fa1…3fad }
0x3fad…3fd6 cd2d 6970 EXEC SØG(MKPOST,HKRTAB,KONT,UKRTAB,K13$)
0x3fad…3fd6 LineComalBin {
0x3fad…3fd6 ptr = 0xcd2d // 0x3fad @0x0
0x3fad…3fd6 lno = 0x1b3a // 0x3faf @0x2
0x3fad…3fd6 at0004 = ╱9d╱ EXEC ╱ // 0x3fb1 @0x4
0x3fad…3fd6 at0005 = ╱53╱S╱ // 0x3fb2 @0x5
0x3fad…3fd6 at0006 = ╱5c╱Ø╱ // 0x3fb3 @0x6
0x3fad…3fd6 at0007 = ╱47╱G╱ // 0x3fb4 @0x7
0x3fad…3fd6 at0008 = ╱ed╱(╱ // 0x3fb5 @0x8
0x3fad…3fd6 at0009 = ╱4d╱M╱ // 0x3fb6 @0x9
0x3fad…3fd6 at000a = ╱4b╱K╱ // 0x3fb7 @0xa
0x3fad…3fd6 at000b = ╱50╱P╱ // 0x3fb8 @0xb
0x3fad…3fd6 at000c = ╱4f╱O╱ // 0x3fb9 @0xc
0x3fad…3fd6 at000d = ╱53╱S╱ // 0x3fba @0xd
0x3fad…3fd6 at000e = ╱54╱T╱ // 0x3fbb @0xe
0x3fad…3fd6 at000f = ╱ec╱,╱ // 0x3fbc @0xf
0x3fad…3fd6 at0010 = ╱48╱H╱ // 0x3fbd @0x10
0x3fad…3fd6 at0011 = ╱4b╱K╱ // 0x3fbe @0x11
0x3fad…3fd6 at0012 = ╱52╱R╱ // 0x3fbf @0x12
0x3fad…3fd6 at0013 = ╱54╱T╱ // 0x3fc0 @0x13
0x3fad…3fd6 at0014 = ╱41╱A╱ // 0x3fc1 @0x14
0x3fad…3fd6 at0015 = ╱42╱B╱ // 0x3fc2 @0x15
0x3fad…3fd6 at0016 = ╱ec╱,╱ // 0x3fc3 @0x16
0x3fad…3fd6 at0017 = ╱4b╱K╱ // 0x3fc4 @0x17
0x3fad…3fd6 at0018 = ╱4f╱O╱ // 0x3fc5 @0x18
0x3fad…3fd6 at0019 = ╱4e╱N╱ // 0x3fc6 @0x19
0x3fad…3fd6 at001a = ╱54╱T╱ // 0x3fc7 @0x1a
0x3fad…3fd6 at001b = ╱ec╱,╱ // 0x3fc8 @0x1b
0x3fad…3fd6 at001c = ╱55╱U╱ // 0x3fc9 @0x1c
0x3fad…3fd6 at001d = ╱4b╱K╱ // 0x3fca @0x1d
0x3fad…3fd6 at001e = ╱52╱R╱ // 0x3fcb @0x1e
0x3fad…3fd6 at001f = ╱54╱T╱ // 0x3fcc @0x1f
0x3fad…3fd6 at0020 = ╱41╱A╱ // 0x3fcd @0x20
0x3fad…3fd6 at0021 = ╱42╱B╱ // 0x3fce @0x21
0x3fad…3fd6 at0022 = ╱ec╱,╱ // 0x3fcf @0x22
0x3fad…3fd6 at0023 = ╱4b╱K╱ // 0x3fd0 @0x23
0x3fad…3fd6 at0024 = ╱31╱1╱ // 0x3fd1 @0x24
0x3fad…3fd6 at0025 = ╱33╱3╱ // 0x3fd2 @0x25
0x3fad…3fd6 at0026 = ╱ef╱$╱ // 0x3fd3 @0x26
0x3fad…3fd6 at0027 = ╱ee╱)╱ // 0x3fd4 @0x27
0x3fad…3fd6 at0028 = EOL // 0x3fd5 @0x28
0x3fad…3fd6 }
0x3fd6…3fdc cd33 6980 ENDCASE
0x3fd6…3fdc LineComalBin {
0x3fd6…3fdc ptr = 0xcd33 // 0x3fd6 @0x0
0x3fd6…3fdc lno = 0x1b44 // 0x3fd8 @0x2
0x3fd6…3fdc at0004 = ╱a4╱ ENDCASE ╱ // 0x3fda @0x4
0x3fd6…3fdc at0005 = EOL // 0x3fdb @0x5
0x3fd6…3fdc }
0x3fdc…3fe6 cd3d 6990 IF T>B THEN
0x3fdc…3fe6 LineComalBin {
0x3fdc…3fe6 ptr = 0xcd3d // 0x3fdc @0x0
0x3fdc…3fe6 lno = 0x1b4e // 0x3fde @0x2
0x3fdc…3fe6 at0004 = ╱9c╱ IF ╱ // 0x3fe0 @0x4
0x3fdc…3fe6 at0005 = ╱54╱T╱ // 0x3fe1 @0x5
0x3fdc…3fe6 at0006 = ╱de╱>╱ // 0x3fe2 @0x6
0x3fdc…3fe6 at0007 = ╱42╱B╱ // 0x3fe3 @0x7
0x3fdc…3fe6 at0008 = ╱b6╱ THEN ╱ // 0x3fe4 @0x8
0x3fdc…3fe6 at0009 = EOL // 0x3fe5 @0x9
0x3fdc…3fe6 }
0x3fe6…3ff3 cd4a 7000 CASE KTAL1 OF
0x3fe6…3ff3 LineComalBin {
0x3fe6…3ff3 ptr = 0xcd4a // 0x3fe6 @0x0
0x3fe6…3ff3 lno = 0x1b58 // 0x3fe8 @0x2
0x3fe6…3ff3 at0004 = ╱a201╱ CASE ╱ // 0x3fea @0x4
0x3fe6…3ff3 at0006 = ╱4b╱K╱ // 0x3fec @0x6
0x3fe6…3ff3 at0007 = ╱54╱T╱ // 0x3fed @0x7
0x3fe6…3ff3 at0008 = ╱41╱A╱ // 0x3fee @0x8
0x3fe6…3ff3 at0009 = ╱4c╱L╱ // 0x3fef @0x9
0x3fe6…3ff3 at000a = ╱31╱1╱ // 0x3ff0 @0xa
0x3fe6…3ff3 at000b = ╱ba╱ OF ╱ // 0x3ff1 @0xb
0x3fe6…3ff3 at000c = EOL // 0x3ff2 @0xc
0x3fe6…3ff3 }
0x3ff3…401d cd74 7010 EXEC POSTER(K8$,KONT,T,MFPOST,SKRIV,SUM$)
0x3ff3…401d LineComalBin {
0x3ff3…401d ptr = 0xcd74 // 0x3ff3 @0x0
0x3ff3…401d lno = 0x1b62 // 0x3ff5 @0x2
0x3ff3…401d at0004 = ╱9d╱ EXEC ╱ // 0x3ff7 @0x4
0x3ff3…401d at0005 = ╱50╱P╱ // 0x3ff8 @0x5
0x3ff3…401d at0006 = ╱4f╱O╱ // 0x3ff9 @0x6
0x3ff3…401d at0007 = ╱53╱S╱ // 0x3ffa @0x7
0x3ff3…401d at0008 = ╱54╱T╱ // 0x3ffb @0x8
0x3ff3…401d at0009 = ╱45╱E╱ // 0x3ffc @0x9
0x3ff3…401d at000a = ╱52╱R╱ // 0x3ffd @0xa
0x3ff3…401d at000b = ╱ed╱(╱ // 0x3ffe @0xb
0x3ff3…401d at000c = ╱4b╱K╱ // 0x3fff @0xc
0x3ff3…401d at000d = ╱38╱8╱ // 0x4000 @0xd
0x3ff3…401d at000e = ╱ef╱$╱ // 0x4001 @0xe
0x3ff3…401d at000f = ╱ec╱,╱ // 0x4002 @0xf
0x3ff3…401d at0010 = ╱4b╱K╱ // 0x4003 @0x10
0x3ff3…401d at0011 = ╱4f╱O╱ // 0x4004 @0x11
0x3ff3…401d at0012 = ╱4e╱N╱ // 0x4005 @0x12
0x3ff3…401d at0013 = ╱54╱T╱ // 0x4006 @0x13
0x3ff3…401d at0014 = ╱ec╱,╱ // 0x4007 @0x14
0x3ff3…401d at0015 = ╱54╱T╱ // 0x4008 @0x15
0x3ff3…401d at0016 = ╱ec╱,╱ // 0x4009 @0x16
0x3ff3…401d at0017 = ╱4d╱M╱ // 0x400a @0x17
0x3ff3…401d at0018 = ╱46╱F╱ // 0x400b @0x18
0x3ff3…401d at0019 = ╱50╱P╱ // 0x400c @0x19
0x3ff3…401d at001a = ╱4f╱O╱ // 0x400d @0x1a
0x3ff3…401d at001b = ╱53╱S╱ // 0x400e @0x1b
0x3ff3…401d at001c = ╱54╱T╱ // 0x400f @0x1c
0x3ff3…401d at001d = ╱ec╱,╱ // 0x4010 @0x1d
0x3ff3…401d at001e = ╱53╱S╱ // 0x4011 @0x1e
0x3ff3…401d at001f = ╱4b╱K╱ // 0x4012 @0x1f
0x3ff3…401d at0020 = ╱52╱R╱ // 0x4013 @0x20
0x3ff3…401d at0021 = ╱49╱I╱ // 0x4014 @0x21
0x3ff3…401d at0022 = ╱56╱V╱ // 0x4015 @0x22
0x3ff3…401d at0023 = ╱ec╱,╱ // 0x4016 @0x23
0x3ff3…401d at0024 = ╱53╱S╱ // 0x4017 @0x24
0x3ff3…401d at0025 = ╱55╱U╱ // 0x4018 @0x25
0x3ff3…401d at0026 = ╱4d╱M╱ // 0x4019 @0x26
0x3ff3…401d at0027 = ╱ef╱$╱ // 0x401a @0x27
0x3ff3…401d at0028 = ╱ee╱)╱ // 0x401b @0x28
0x3ff3…401d at0029 = EOL // 0x401c @0x29
0x3ff3…401d }
0x401d…4028 cd7f 7020 WHEN DTAL
0x401d…4028 LineComalBin {
0x401d…4028 ptr = 0xcd7f // 0x401d @0x0
0x401d…4028 lno = 0x1b6c // 0x401f @0x2
0x401d…4028 at0004 = ╱a301╱ WHEN ╱ // 0x4021 @0x4
0x401d…4028 at0006 = ╱44╱D╱ // 0x4023 @0x6
0x401d…4028 at0007 = ╱54╱T╱ // 0x4024 @0x7
0x401d…4028 at0008 = ╱41╱A╱ // 0x4025 @0x8
0x401d…4028 at0009 = ╱4c╱L╱ // 0x4026 @0x9
0x401d…4028 at000a = EOL // 0x4027 @0xa
0x401d…4028 }
0x4028…4052 cda9 7030 EXEC POSTER(K9$,KONT,T,MDPOST,SKRIV,SUM$)
0x4028…4052 LineComalBin {
0x4028…4052 ptr = 0xcda9 // 0x4028 @0x0
0x4028…4052 lno = 0x1b76 // 0x402a @0x2
0x4028…4052 at0004 = ╱9d╱ EXEC ╱ // 0x402c @0x4
0x4028…4052 at0005 = ╱50╱P╱ // 0x402d @0x5
0x4028…4052 at0006 = ╱4f╱O╱ // 0x402e @0x6
0x4028…4052 at0007 = ╱53╱S╱ // 0x402f @0x7
0x4028…4052 at0008 = ╱54╱T╱ // 0x4030 @0x8
0x4028…4052 at0009 = ╱45╱E╱ // 0x4031 @0x9
0x4028…4052 at000a = ╱52╱R╱ // 0x4032 @0xa
0x4028…4052 at000b = ╱ed╱(╱ // 0x4033 @0xb
0x4028…4052 at000c = ╱4b╱K╱ // 0x4034 @0xc
0x4028…4052 at000d = ╱39╱9╱ // 0x4035 @0xd
0x4028…4052 at000e = ╱ef╱$╱ // 0x4036 @0xe
0x4028…4052 at000f = ╱ec╱,╱ // 0x4037 @0xf
0x4028…4052 at0010 = ╱4b╱K╱ // 0x4038 @0x10
0x4028…4052 at0011 = ╱4f╱O╱ // 0x4039 @0x11
0x4028…4052 at0012 = ╱4e╱N╱ // 0x403a @0x12
0x4028…4052 at0013 = ╱54╱T╱ // 0x403b @0x13
0x4028…4052 at0014 = ╱ec╱,╱ // 0x403c @0x14
0x4028…4052 at0015 = ╱54╱T╱ // 0x403d @0x15
0x4028…4052 at0016 = ╱ec╱,╱ // 0x403e @0x16
0x4028…4052 at0017 = ╱4d╱M╱ // 0x403f @0x17
0x4028…4052 at0018 = ╱44╱D╱ // 0x4040 @0x18
0x4028…4052 at0019 = ╱50╱P╱ // 0x4041 @0x19
0x4028…4052 at001a = ╱4f╱O╱ // 0x4042 @0x1a
0x4028…4052 at001b = ╱53╱S╱ // 0x4043 @0x1b
0x4028…4052 at001c = ╱54╱T╱ // 0x4044 @0x1c
0x4028…4052 at001d = ╱ec╱,╱ // 0x4045 @0x1d
0x4028…4052 at001e = ╱53╱S╱ // 0x4046 @0x1e
0x4028…4052 at001f = ╱4b╱K╱ // 0x4047 @0x1f
0x4028…4052 at0020 = ╱52╱R╱ // 0x4048 @0x20
0x4028…4052 at0021 = ╱49╱I╱ // 0x4049 @0x21
0x4028…4052 at0022 = ╱56╱V╱ // 0x404a @0x22
0x4028…4052 at0023 = ╱ec╱,╱ // 0x404b @0x23
0x4028…4052 at0024 = ╱53╱S╱ // 0x404c @0x24
0x4028…4052 at0025 = ╱55╱U╱ // 0x404d @0x25
0x4028…4052 at0026 = ╱4d╱M╱ // 0x404e @0x26
0x4028…4052 at0027 = ╱ef╱$╱ // 0x404f @0x27
0x4028…4052 at0028 = ╱ee╱)╱ // 0x4050 @0x28
0x4028…4052 at0029 = EOL // 0x4051 @0x29
0x4028…4052 }
0x4052…405e cdb5 7040 WHEN KRTAL
0x4052…405e LineComalBin {
0x4052…405e ptr = 0xcdb5 // 0x4052 @0x0
0x4052…405e lno = 0x1b80 // 0x4054 @0x2
0x4052…405e at0004 = ╱a301╱ WHEN ╱ // 0x4056 @0x4
0x4052…405e at0006 = ╱4b╱K╱ // 0x4058 @0x6
0x4052…405e at0007 = ╱52╱R╱ // 0x4059 @0x7
0x4052…405e at0008 = ╱54╱T╱ // 0x405a @0x8
0x4052…405e at0009 = ╱41╱A╱ // 0x405b @0x9
0x4052…405e at000a = ╱4c╱L╱ // 0x405c @0xa
0x4052…405e at000b = EOL // 0x405d @0xb
0x4052…405e }
0x405e…4089 (214,) cde0 7050 EXEC POSTER(K10$,KONT,T,MKPOST,SKRIV,SUM$)
0x405e…4089 LineComalBin {
0x405e…4089 ptr = 0xcde0 // 0x405e @0x0
0x405e…4089 lno = 0x1b8a // 0x4060 @0x2
0x405e…4089 at0004 = ╱9d╱ EXEC ╱ // 0x4062 @0x4
0x405e…4089 at0005 = ╱50╱P╱ // 0x4063 @0x5
0x405e…4089 at0006 = ╱4f╱O╱ // 0x4064 @0x6
0x405e…4089 at0007 = ╱53╱S╱ // 0x4065 @0x7
0x405e…4089 at0008 = ╱54╱T╱ // 0x4066 @0x8
0x405e…4089 at0009 = ╱45╱E╱ // 0x4067 @0x9
0x405e…4089 at000a = ╱52╱R╱ // 0x4068 @0xa
0x405e…4089 at000b = ╱ed╱(╱ // 0x4069 @0xb
0x405e…4089 at000c = ╱4b╱K╱ // 0x406a @0xc
0x405e…4089 at000d = ╱31╱1╱ // 0x406b @0xd
0x405e…4089 at000e = ╱30╱0╱ // 0x406c @0xe
0x405e…4089 at000f = ╱ef╱$╱ // 0x406d @0xf
0x405e…4089 at0010 = ╱ec╱,╱ // 0x406e @0x10
0x405e…4089 at0011 = ╱4b╱K╱ // 0x406f @0x11
0x405e…4089 at0012 = ╱4f╱O╱ // 0x4070 @0x12
0x405e…4089 at0013 = ╱4e╱N╱ // 0x4071 @0x13
0x405e…4089 at0014 = ╱54╱T╱ // 0x4072 @0x14
0x405e…4089 at0015 = ╱ec╱,╱ // 0x4073 @0x15
0x405e…4089 at0016 = ╱54╱T╱ // 0x4074 @0x16
0x405e…4089 at0017 = ╱ec╱,╱ // 0x4075 @0x17
0x405e…4089 at0018 = ╱4d╱M╱ // 0x4076 @0x18
0x405e…4089 at0019 = ╱4b╱K╱ // 0x4077 @0x19
0x405e…4089 at001a = ╱50╱P╱ // 0x4078 @0x1a
0x405e…4089 at001b = ╱4f╱O╱ // 0x4079 @0x1b
0x405e…4089 at001c = ╱53╱S╱ // 0x407a @0x1c
0x405e…4089 at001d = ╱54╱T╱ // 0x407b @0x1d
0x405e…4089 at001e = ╱ec╱,╱ // 0x407c @0x1e
0x405e…4089 at001f = ╱53╱S╱ // 0x407d @0x1f
0x405e…4089 at0020 = ╱4b╱K╱ // 0x407e @0x20
0x405e…4089 at0021 = ╱52╱R╱ // 0x407f @0x21
0x405e…4089 at0022 = ╱49╱I╱ // 0x4080 @0x22
0x405e…4089 at0023 = ╱56╱V╱ // 0x4081 @0x23
0x405e…4089 at0024 = ╱ec╱,╱ // 0x4082 @0x24
0x405e…4089 at0025 = ╱53╱S╱ // 0x4083 @0x25
0x405e…4089 at0026 = ╱55╱U╱ // 0x4084 @0x26
0x405e…4089 at0027 = ╱4d╱M╱ // 0x4085 @0x27
0x405e…4089 at0028 = ╱ef╱$╱ // 0x4086 @0x28
0x405e…4089 at0029 = ╱ee╱)╱ // 0x4087 @0x29
0x405e…4089 at002a = EOL // 0x4088 @0x2a
0x405e…4089 }
0x4089…408f cde6 7060 ENDCASE
0x4089…408f LineComalBin {
0x4089…408f ptr = 0xcde6 // 0x4089 @0x0
0x4089…408f lno = 0x1b94 // 0x408b @0x2
0x4089…408f at0004 = ╱a4╱ ENDCASE ╱ // 0x408d @0x4
0x4089…408f at0005 = EOL // 0x408e @0x5
0x4089…408f }
0x408f…4095 cdec 7070 ELSE
0x408f…4095 LineComalBin {
0x408f…4095 ptr = 0xcdec // 0x408f @0x0
0x408f…4095 lno = 0x1b9e // 0x4091 @0x2
0x408f…4095 at0004 = ╱9a╱ ELSE ╱ // 0x4093 @0x4
0x408f…4095 at0005 = EOL // 0x4094 @0x5
0x408f…4095 }
0x4095…40a1 cdf8 7080 LINIE=B
0x4095…40a1 LineComalBin {
0x4095…40a1 ptr = 0xcdf8 // 0x4095 @0x0
0x4095…40a1 lno = 0x1ba8 // 0x4097 @0x2
0x4095…40a1 at0004 = ╱4c╱L╱ // 0x4099 @0x4
0x4095…40a1 at0005 = ╱49╱I╱ // 0x409a @0x5
0x4095…40a1 at0006 = ╱4e╱N╱ // 0x409b @0x6
0x4095…40a1 at0007 = ╱49╱I╱ // 0x409c @0x7
0x4095…40a1 at0008 = ╱45╱E╱ // 0x409d @0x8
0x4095…40a1 at0009 = ╱dc╱=╱ // 0x409e @0x9
0x4095…40a1 at000a = ╱42╱B╱ // 0x409f @0xa
0x4095…40a1 at000b = EOL // 0x40a0 @0xb
0x4095…40a1 }
0x40a1…40a7 cdfe 7090 ENDIF
0x40a1…40a7 LineComalBin {
0x40a1…40a7 ptr = 0xcdfe // 0x40a1 @0x0
0x40a1…40a7 lno = 0x1bb2 // 0x40a3 @0x2
0x40a1…40a7 at0004 = ╱9b╱ ENDIF ╱ // 0x40a5 @0x4
0x40a1…40a7 at0005 = EOL // 0x40a6 @0x5
0x40a1…40a7 }
0x40a7…40ba ce11 7100 IF T=B THEN SUM$="0+"
0x40a7…40ba LineComalBin {
0x40a7…40ba ptr = 0xce11 // 0x40a7 @0x0
0x40a7…40ba lno = 0x1bbc // 0x40a9 @0x2
0x40a7…40ba at0004 = ╱82╱ IF ╱ // 0x40ab @0x4
0x40a7…40ba at0005 = ╱54╱T╱ // 0x40ac @0x5
0x40a7…40ba at0006 = ╱dc╱=╱ // 0x40ad @0x6
0x40a7…40ba at0007 = ╱42╱B╱ // 0x40ae @0x7
0x40a7…40ba at0008 = ╱b6╱ THEN ╱ // 0x40af @0x8
0x40a7…40ba at0009 = ╱53╱S╱ // 0x40b0 @0x9
0x40a7…40ba at000a = ╱55╱U╱ // 0x40b1 @0xa
0x40a7…40ba at000b = ╱4d╱M╱ // 0x40b2 @0xb
0x40a7…40ba at000c = ╱ef╱$╱ // 0x40b3 @0xc
0x40a7…40ba at000d = ╱dc╱=╱ // 0x40b4 @0xd
0x40a7…40ba at000e = ╱22╱"╱ // 0x40b5 @0xe
0x40a7…40ba at000f = ╱30╱0╱ // 0x40b6 @0xf
0x40a7…40ba at0010 = ╱2b╱+╱ // 0x40b7 @0x10
0x40a7…40ba at0011 = ╱22╱"╱ // 0x40b8 @0x11
0x40a7…40ba at0012 = EOL // 0x40b9 @0x12
0x40a7…40ba }
0x40ba…40c8 ce1f 7110 IF SKRIV=B THEN
0x40ba…40c8 LineComalBin {
0x40ba…40c8 ptr = 0xce1f // 0x40ba @0x0
0x40ba…40c8 lno = 0x1bc6 // 0x40bc @0x2
0x40ba…40c8 at0004 = ╱9c╱ IF ╱ // 0x40be @0x4
0x40ba…40c8 at0005 = ╱53╱S╱ // 0x40bf @0x5
0x40ba…40c8 at0006 = ╱4b╱K╱ // 0x40c0 @0x6
0x40ba…40c8 at0007 = ╱52╱R╱ // 0x40c1 @0x7
0x40ba…40c8 at0008 = ╱49╱I╱ // 0x40c2 @0x8
0x40ba…40c8 at0009 = ╱56╱V╱ // 0x40c3 @0x9
0x40ba…40c8 at000a = ╱dc╱=╱ // 0x40c4 @0xa
0x40ba…40c8 at000b = ╱42╱B╱ // 0x40c5 @0xb
0x40ba…40c8 at000c = ╱b6╱ THEN ╱ // 0x40c6 @0xc
0x40ba…40c8 at000d = EOL // 0x40c7 @0xd
0x40ba…40c8 }
0x40c8…40e3 ce3a 7120 EXEC TUD(SUM$,UBELØB$,B,B)
0x40c8…40e3 LineComalBin {
0x40c8…40e3 ptr = 0xce3a // 0x40c8 @0x0
0x40c8…40e3 lno = 0x1bd0 // 0x40ca @0x2
0x40c8…40e3 at0004 = ╱9d╱ EXEC ╱ // 0x40cc @0x4
0x40c8…40e3 at0005 = ╱54╱T╱ // 0x40cd @0x5
0x40c8…40e3 at0006 = ╱55╱U╱ // 0x40ce @0x6
0x40c8…40e3 at0007 = ╱44╱D╱ // 0x40cf @0x7
0x40c8…40e3 at0008 = ╱ed╱(╱ // 0x40d0 @0x8
0x40c8…40e3 at0009 = ╱53╱S╱ // 0x40d1 @0x9
0x40c8…40e3 at000a = ╱55╱U╱ // 0x40d2 @0xa
0x40c8…40e3 at000b = ╱4d╱M╱ // 0x40d3 @0xb
0x40c8…40e3 at000c = ╱ef╱$╱ // 0x40d4 @0xc
0x40c8…40e3 at000d = ╱ec╱,╱ // 0x40d5 @0xd
0x40c8…40e3 at000e = ╱55╱U╱ // 0x40d6 @0xe
0x40c8…40e3 at000f = ╱42╱B╱ // 0x40d7 @0xf
0x40c8…40e3 at0010 = ╱45╱E╱ // 0x40d8 @0x10
0x40c8…40e3 at0011 = ╱4c╱L╱ // 0x40d9 @0x11
0x40c8…40e3 at0012 = ╱5c╱Ø╱ // 0x40da @0x12
0x40c8…40e3 at0013 = ╱42╱B╱ // 0x40db @0x13
0x40c8…40e3 at0014 = ╱ef╱$╱ // 0x40dc @0x14
0x40c8…40e3 at0015 = ╱ec╱,╱ // 0x40dd @0x15
0x40c8…40e3 at0016 = ╱42╱B╱ // 0x40de @0x16
0x40c8…40e3 at0017 = ╱ec╱,╱ // 0x40df @0x17
0x40c8…40e3 at0018 = ╱42╱B╱ // 0x40e0 @0x18
0x40c8…40e3 at0019 = ╱ee╱)╱ // 0x40e1 @0x19
0x40c8…40e3 at001a = EOL // 0x40e2 @0x1a
0x40c8…40e3 }
0x40e3…4105 ce5c 7130 PRINT TAB(35);STREG$(E:43)
0x40e3…4105 LineComalBin {
0x40e3…4105 ptr = 0xce5c // 0x40e3 @0x0
0x40e3…4105 lno = 0x1bda // 0x40e5 @0x2
0x40e3…4105 at0004 = ╱92╱ PRINT ╱ // 0x40e7 @0x4
0x40e3…4105 at0005 = ╱d2╱TAB╱ // 0x40e8 @0x5
0x40e3…4105 at0006 = ╱ed╱(╱ // 0x40e9 @0x6
0x40e3…4105 at0007 = ╱33╱3╱ // 0x40ea @0x7
0x40e3…4105 at0008 = ╱35╱5╱ // 0x40eb @0x8
0x40e3…4105 at0009 = ╱fe00008c06╱ // 0x40ec @0x9
0x40e3…4105 at000e = ╱ee╱)╱ // 0x40f1 @0xe
0x40e3…4105 at000f = ╱eb╱;╱ // 0x40f2 @0xf
0x40e3…4105 at0010 = ╱53╱S╱ // 0x40f3 @0x10
0x40e3…4105 at0011 = ╱54╱T╱ // 0x40f4 @0x11
0x40e3…4105 at0012 = ╱52╱R╱ // 0x40f5 @0x12
0x40e3…4105 at0013 = ╱45╱E╱ // 0x40f6 @0x13
0x40e3…4105 at0014 = ╱47╱G╱ // 0x40f7 @0x14
0x40e3…4105 at0015 = ╱ef╱$╱ // 0x40f8 @0x15
0x40e3…4105 at0016 = ╱ed╱(╱ // 0x40f9 @0x16
0x40e3…4105 at0017 = ╱45╱E╱ // 0x40fa @0x17
0x40e3…4105 at0018 = ╱f0╱:╱ // 0x40fb @0x18
0x40e3…4105 at0019 = ╱34╱4╱ // 0x40fc @0x19
0x40e3…4105 at001a = ╱33╱3╱ // 0x40fd @0x1a
0x40e3…4105 at001b = ╱fe0000ac06╱ // 0x40fe @0x1b
0x40e3…4105 at0020 = ╱ee╱)╱ // 0x4103 @0x20
0x40e3…4105 at0021 = EOL // 0x4104 @0x21
0x40e3…4105 }
0x4105…414f cea6 7140 PRINT TAB(35);"Ny saldo";TAB(51+15*(SUM$(LEN(SUM$))="-"));UBELØB$
0x4105…414f LineComalBin {
0x4105…414f ptr = 0xcea6 // 0x4105 @0x0
0x4105…414f lno = 0x1be4 // 0x4107 @0x2
0x4105…414f at0004 = ╱92╱ PRINT ╱ // 0x4109 @0x4
0x4105…414f at0005 = ╱d2╱TAB╱ // 0x410a @0x5
0x4105…414f at0006 = ╱ed╱(╱ // 0x410b @0x6
0x4105…414f at0007 = ╱33╱3╱ // 0x410c @0x7
0x4105…414f at0008 = ╱35╱5╱ // 0x410d @0x8
0x4105…414f at0009 = ╱fe00008c06╱ // 0x410e @0x9
0x4105…414f at000e = ╱ee╱)╱ // 0x4113 @0xe
0x4105…414f at000f = ╱eb╱;╱ // 0x4114 @0xf
0x4105…414f at0010 = ╱22╱"╱ // 0x4115 @0x10
0x4105…414f at0011 = ╱4e╱N╱ // 0x4116 @0x11
0x4105…414f at0012 = ╱79╱y╱ // 0x4117 @0x12
0x4105…414f at0013 = ╱20╱…╱ // 0x4118 @0x13
0x4105…414f at0014 = ╱73╱s╱ // 0x4119 @0x14
0x4105…414f at0015 = ╱61╱a╱ // 0x411a @0x15
0x4105…414f at0016 = ╱6c╱l╱ // 0x411b @0x16
0x4105…414f at0017 = ╱64╱d╱ // 0x411c @0x17
0x4105…414f at0018 = ╱6f╱o╱ // 0x411d @0x18
0x4105…414f at0019 = ╱22╱"╱ // 0x411e @0x19
0x4105…414f at001a = ╱eb╱;╱ // 0x411f @0x1a
0x4105…414f at001b = ╱d2╱TAB╱ // 0x4120 @0x1b
0x4105…414f at001c = ╱ed╱(╱ // 0x4121 @0x1c
0x4105…414f at001d = ╱35╱5╱ // 0x4122 @0x1d
0x4105…414f at001e = ╱31╱1╱ // 0x4123 @0x1e
0x4105…414f at001f = ╱fe0000cc06╱ // 0x4124 @0x1f
0x4105…414f at0024 = ╱e2╱+╱ // 0x4129 @0x24
0x4105…414f at0025 = ╱31╱1╱ // 0x412a @0x25
0x4105…414f at0026 = ╱35╱5╱ // 0x412b @0x26
0x4105…414f at0027 = ╱fe0000f004╱ // 0x412c @0x27
0x4105…414f at002c = ╱e4╱*╱ // 0x4131 @0x2c
0x4105…414f at002d = ╱ed╱(╱ // 0x4132 @0x2d
0x4105…414f at002e = ╱53╱S╱ // 0x4133 @0x2e
0x4105…414f at002f = ╱55╱U╱ // 0x4134 @0x2f
0x4105…414f at0030 = ╱4d╱M╱ // 0x4135 @0x30
0x4105…414f at0031 = ╱ef╱$╱ // 0x4136 @0x31
0x4105…414f at0032 = ╱ed╱(╱ // 0x4137 @0x32
0x4105…414f at0033 = ╱cc╱LEN╱ // 0x4138 @0x33
0x4105…414f at0034 = ╱ed╱(╱ // 0x4139 @0x34
0x4105…414f at0035 = ╱53╱S╱ // 0x413a @0x35
0x4105…414f at0036 = ╱55╱U╱ // 0x413b @0x36
0x4105…414f at0037 = ╱4d╱M╱ // 0x413c @0x37
0x4105…414f at0038 = ╱ef╱$╱ // 0x413d @0x38
0x4105…414f at0039 = ╱ee╱)╱ // 0x413e @0x39
0x4105…414f at003a = ╱ee╱)╱ // 0x413f @0x3a
0x4105…414f at003b = ╱dc╱=╱ // 0x4140 @0x3b
0x4105…414f at003c = ╱22╱"╱ // 0x4141 @0x3c
0x4105…414f at003d = ╱2d╱-╱ // 0x4142 @0x3d
0x4105…414f at003e = ╱22╱"╱ // 0x4143 @0x3e
0x4105…414f at003f = ╱ee╱)╱ // 0x4144 @0x3f
0x4105…414f at0040 = ╱ee╱)╱ // 0x4145 @0x40
0x4105…414f at0041 = ╱eb╱;╱ // 0x4146 @0x41
0x4105…414f at0042 = ╱55╱U╱ // 0x4147 @0x42
0x4105…414f at0043 = ╱42╱B╱ // 0x4148 @0x43
0x4105…414f at0044 = ╱45╱E╱ // 0x4149 @0x44
0x4105…414f at0045 = ╱4c╱L╱ // 0x414a @0x45
0x4105…414f at0046 = ╱5c╱Ø╱ // 0x414b @0x46
0x4105…414f at0047 = ╱42╱B╱ // 0x414c @0x47
0x4105…414f at0048 = ╱ef╱$╱ // 0x414d @0x48
0x4105…414f at0049 = EOL // 0x414e @0x49
0x4105…414f }
0x414f…4155 ceac 7150 ELSE
0x414f…4155 LineComalBin {
0x414f…4155 ptr = 0xceac // 0x414f @0x0
0x414f…4155 lno = 0x1bee // 0x4151 @0x2
0x414f…4155 at0004 = ╱9a╱ ELSE ╱ // 0x4153 @0x4
0x414f…4155 at0005 = EOL // 0x4154 @0x5
0x414f…4155 }
0x4155…4162 ceb9 7160 CASE KTAL1 OF
0x4155…4162 LineComalBin {
0x4155…4162 ptr = 0xceb9 // 0x4155 @0x0
0x4155…4162 lno = 0x1bf8 // 0x4157 @0x2
0x4155…4162 at0004 = ╱a201╱ CASE ╱ // 0x4159 @0x4
0x4155…4162 at0006 = ╱4b╱K╱ // 0x415b @0x6
0x4155…4162 at0007 = ╱54╱T╱ // 0x415c @0x7
0x4155…4162 at0008 = ╱41╱A╱ // 0x415d @0x8
0x4155…4162 at0009 = ╱4c╱L╱ // 0x415e @0x9
0x4155…4162 at000a = ╱31╱1╱ // 0x415f @0xa
0x4155…4162 at000b = ╱ba╱ OF ╱ // 0x4160 @0xb
0x4155…4162 at000c = EOL // 0x4161 @0xc
0x4155…4162 }
0x4162…41af cf06 7170 EXEC BUDSKRIV(TAL4$,3,SUM$,FMDEBET$,FMKREDIT$,FÅDEBET$,FÅKREDIT$,LINIE)
0x4162…41af LineComalBin {
0x4162…41af ptr = 0xcf06 // 0x4162 @0x0
0x4162…41af lno = 0x1c02 // 0x4164 @0x2
0x4162…41af at0004 = ╱9d╱ EXEC ╱ // 0x4166 @0x4
0x4162…41af at0005 = ╱42╱B╱ // 0x4167 @0x5
0x4162…41af at0006 = ╱55╱U╱ // 0x4168 @0x6
0x4162…41af at0007 = ╱44╱D╱ // 0x4169 @0x7
0x4162…41af at0008 = ╱53╱S╱ // 0x416a @0x8
0x4162…41af at0009 = ╱4b╱K╱ // 0x416b @0x9
0x4162…41af at000a = ╱52╱R╱ // 0x416c @0xa
0x4162…41af at000b = ╱49╱I╱ // 0x416d @0xb
0x4162…41af at000c = ╱56╱V╱ // 0x416e @0xc
0x4162…41af at000d = ╱ed╱(╱ // 0x416f @0xd
0x4162…41af at000e = ╱54╱T╱ // 0x4170 @0xe
0x4162…41af at000f = ╱41╱A╱ // 0x4171 @0xf
0x4162…41af at0010 = ╱4c╱L╱ // 0x4172 @0x10
0x4162…41af at0011 = ╱34╱4╱ // 0x4173 @0x11
0x4162…41af at0012 = ╱ef╱$╱ // 0x4174 @0x12
0x4162…41af at0013 = ╱ec╱,╱ // 0x4175 @0x13
0x4162…41af at0014 = ╱33╱3╱ // 0x4176 @0x14
0x4162…41af at0015 = ╱fe0000c002╱ // 0x4177 @0x15
0x4162…41af at001a = ╱ec╱,╱ // 0x417c @0x1a
0x4162…41af at001b = ╱53╱S╱ // 0x417d @0x1b
0x4162…41af at001c = ╱55╱U╱ // 0x417e @0x1c
0x4162…41af at001d = ╱4d╱M╱ // 0x417f @0x1d
0x4162…41af at001e = ╱ef╱$╱ // 0x4180 @0x1e
0x4162…41af at001f = ╱ec╱,╱ // 0x4181 @0x1f
0x4162…41af at0020 = ╱46╱F╱ // 0x4182 @0x20
0x4162…41af at0021 = ╱4d╱M╱ // 0x4183 @0x21
0x4162…41af at0022 = ╱44╱D╱ // 0x4184 @0x22
0x4162…41af at0023 = ╱45╱E╱ // 0x4185 @0x23
0x4162…41af at0024 = ╱42╱B╱ // 0x4186 @0x24
0x4162…41af at0025 = ╱45╱E╱ // 0x4187 @0x25
0x4162…41af at0026 = ╱54╱T╱ // 0x4188 @0x26
0x4162…41af at0027 = ╱ef╱$╱ // 0x4189 @0x27
0x4162…41af at0028 = ╱ec╱,╱ // 0x418a @0x28
0x4162…41af at0029 = ╱46╱F╱ // 0x418b @0x29
0x4162…41af at002a = ╱4d╱M╱ // 0x418c @0x2a
0x4162…41af at002b = ╱4b╱K╱ // 0x418d @0x2b
0x4162…41af at002c = ╱52╱R╱ // 0x418e @0x2c
0x4162…41af at002d = ╱45╱E╱ // 0x418f @0x2d
0x4162…41af at002e = ╱44╱D╱ // 0x4190 @0x2e
0x4162…41af at002f = ╱49╱I╱ // 0x4191 @0x2f
0x4162…41af at0030 = ╱54╱T╱ // 0x4192 @0x30
0x4162…41af at0031 = ╱ef╱$╱ // 0x4193 @0x31
0x4162…41af at0032 = ╱ec╱,╱ // 0x4194 @0x32
0x4162…41af at0033 = ╱46╱F╱ // 0x4195 @0x33
0x4162…41af at0034 = ╱5d╱Å╱ // 0x4196 @0x34
0x4162…41af at0035 = ╱44╱D╱ // 0x4197 @0x35
0x4162…41af at0036 = ╱45╱E╱ // 0x4198 @0x36
0x4162…41af at0037 = ╱42╱B╱ // 0x4199 @0x37
0x4162…41af at0038 = ╱45╱E╱ // 0x419a @0x38
0x4162…41af at0039 = ╱54╱T╱ // 0x419b @0x39
0x4162…41af at003a = ╱ef╱$╱ // 0x419c @0x3a
0x4162…41af at003b = ╱ec╱,╱ // 0x419d @0x3b
0x4162…41af at003c = ╱46╱F╱ // 0x419e @0x3c
0x4162…41af at003d = ╱5d╱Å╱ // 0x419f @0x3d
0x4162…41af at003e = ╱4b╱K╱ // 0x41a0 @0x3e
0x4162…41af at003f = ╱52╱R╱ // 0x41a1 @0x3f
0x4162…41af at0040 = ╱45╱E╱ // 0x41a2 @0x40
0x4162…41af at0041 = ╱44╱D╱ // 0x41a3 @0x41
0x4162…41af at0042 = ╱49╱I╱ // 0x41a4 @0x42
0x4162…41af at0043 = ╱54╱T╱ // 0x41a5 @0x43
0x4162…41af at0044 = ╱ef╱$╱ // 0x41a6 @0x44
0x4162…41af at0045 = ╱ec╱,╱ // 0x41a7 @0x45
0x4162…41af at0046 = ╱4c╱L╱ // 0x41a8 @0x46
0x4162…41af at0047 = ╱49╱I╱ // 0x41a9 @0x47
0x4162…41af at0048 = ╱4e╱N╱ // 0x41aa @0x48
0x4162…41af at0049 = ╱49╱I╱ // 0x41ab @0x49
0x4162…41af at004a = ╱45╱E╱ // 0x41ac @0x4a
0x4162…41af at004b = ╱ee╱)╱ // 0x41ad @0x4b
0x4162…41af at004c = EOL // 0x41ae @0x4c
0x4162…41af }
0x41af…41ba cf11 7180 WHEN DTAL
0x41af…41ba LineComalBin {
0x41af…41ba ptr = 0xcf11 // 0x41af @0x0
0x41af…41ba lno = 0x1c0c // 0x41b1 @0x2
0x41af…41ba at0004 = ╱a301╱ WHEN ╱ // 0x41b3 @0x4
0x41af…41ba at0006 = ╱44╱D╱ // 0x41b5 @0x6
0x41af…41ba at0007 = ╱54╱T╱ // 0x41b6 @0x7
0x41af…41ba at0008 = ╱41╱A╱ // 0x41b7 @0x8
0x41af…41ba at0009 = ╱4c╱L╱ // 0x41b8 @0x9
0x41af…41ba at000a = EOL // 0x41b9 @0xa
0x41af…41ba }
0x41ba…4207 cf5e 7190 EXEC BUDSKRIV(MDNKØB$,0,SUM$,DSALDO1$,DSALDO2$,DSALDO3$,DSALDO4$,LINIE)
0x41ba…4207 LineComalBin {
0x41ba…4207 ptr = 0xcf5e // 0x41ba @0x0
0x41ba…4207 lno = 0x1c16 // 0x41bc @0x2
0x41ba…4207 at0004 = ╱9d╱ EXEC ╱ // 0x41be @0x4
0x41ba…4207 at0005 = ╱42╱B╱ // 0x41bf @0x5
0x41ba…4207 at0006 = ╱55╱U╱ // 0x41c0 @0x6
0x41ba…4207 at0007 = ╱44╱D╱ // 0x41c1 @0x7
0x41ba…4207 at0008 = ╱53╱S╱ // 0x41c2 @0x8
0x41ba…4207 at0009 = ╱4b╱K╱ // 0x41c3 @0x9
0x41ba…4207 at000a = ╱52╱R╱ // 0x41c4 @0xa
0x41ba…4207 at000b = ╱49╱I╱ // 0x41c5 @0xb
0x41ba…4207 at000c = ╱56╱V╱ // 0x41c6 @0xc
0x41ba…4207 at000d = ╱ed╱(╱ // 0x41c7 @0xd
0x41ba…4207 at000e = ╱4d╱M╱ // 0x41c8 @0xe
0x41ba…4207 at000f = ╱44╱D╱ // 0x41c9 @0xf
0x41ba…4207 at0010 = ╱4e╱N╱ // 0x41ca @0x10
0x41ba…4207 at0011 = ╱4b╱K╱ // 0x41cb @0x11
0x41ba…4207 at0012 = ╱5c╱Ø╱ // 0x41cc @0x12
0x41ba…4207 at0013 = ╱42╱B╱ // 0x41cd @0x13
0x41ba…4207 at0014 = ╱ef╱$╱ // 0x41ce @0x14
0x41ba…4207 at0015 = ╱ec╱,╱ // 0x41cf @0x15
0x41ba…4207 at0016 = ╱30╱0╱ // 0x41d0 @0x16
0x41ba…4207 at0017 = ╱fe00000000╱ // 0x41d1 @0x17
0x41ba…4207 at001c = ╱ec╱,╱ // 0x41d6 @0x1c
0x41ba…4207 at001d = ╱53╱S╱ // 0x41d7 @0x1d
0x41ba…4207 at001e = ╱55╱U╱ // 0x41d8 @0x1e
0x41ba…4207 at001f = ╱4d╱M╱ // 0x41d9 @0x1f
0x41ba…4207 at0020 = ╱ef╱$╱ // 0x41da @0x20
0x41ba…4207 at0021 = ╱ec╱,╱ // 0x41db @0x21
0x41ba…4207 at0022 = ╱44╱D╱ // 0x41dc @0x22
0x41ba…4207 at0023 = ╱53╱S╱ // 0x41dd @0x23
0x41ba…4207 at0024 = ╱41╱A╱ // 0x41de @0x24
0x41ba…4207 at0025 = ╱4c╱L╱ // 0x41df @0x25
0x41ba…4207 at0026 = ╱44╱D╱ // 0x41e0 @0x26
0x41ba…4207 at0027 = ╱4f╱O╱ // 0x41e1 @0x27
0x41ba…4207 at0028 = ╱31╱1╱ // 0x41e2 @0x28
0x41ba…4207 at0029 = ╱ef╱$╱ // 0x41e3 @0x29
0x41ba…4207 at002a = ╱ec╱,╱ // 0x41e4 @0x2a
0x41ba…4207 at002b = ╱44╱D╱ // 0x41e5 @0x2b
0x41ba…4207 at002c = ╱53╱S╱ // 0x41e6 @0x2c
0x41ba…4207 at002d = ╱41╱A╱ // 0x41e7 @0x2d
0x41ba…4207 at002e = ╱4c╱L╱ // 0x41e8 @0x2e
0x41ba…4207 at002f = ╱44╱D╱ // 0x41e9 @0x2f
0x41ba…4207 at0030 = ╱4f╱O╱ // 0x41ea @0x30
0x41ba…4207 at0031 = ╱32╱2╱ // 0x41eb @0x31
0x41ba…4207 at0032 = ╱ef╱$╱ // 0x41ec @0x32
0x41ba…4207 at0033 = ╱ec╱,╱ // 0x41ed @0x33
0x41ba…4207 at0034 = ╱44╱D╱ // 0x41ee @0x34
0x41ba…4207 at0035 = ╱53╱S╱ // 0x41ef @0x35
0x41ba…4207 at0036 = ╱41╱A╱ // 0x41f0 @0x36
0x41ba…4207 at0037 = ╱4c╱L╱ // 0x41f1 @0x37
0x41ba…4207 at0038 = ╱44╱D╱ // 0x41f2 @0x38
0x41ba…4207 at0039 = ╱4f╱O╱ // 0x41f3 @0x39
0x41ba…4207 at003a = ╱33╱3╱ // 0x41f4 @0x3a
0x41ba…4207 at003b = ╱ef╱$╱ // 0x41f5 @0x3b
0x41ba…4207 at003c = ╱ec╱,╱ // 0x41f6 @0x3c
0x41ba…4207 at003d = ╱44╱D╱ // 0x41f7 @0x3d
0x41ba…4207 at003e = ╱53╱S╱ // 0x41f8 @0x3e
0x41ba…4207 at003f = ╱41╱A╱ // 0x41f9 @0x3f
0x41ba…4207 at0040 = ╱4c╱L╱ // 0x41fa @0x40
0x41ba…4207 at0041 = ╱44╱D╱ // 0x41fb @0x41
0x41ba…4207 at0042 = ╱4f╱O╱ // 0x41fc @0x42
0x41ba…4207 at0043 = ╱34╱4╱ // 0x41fd @0x43
0x41ba…4207 at0044 = ╱ef╱$╱ // 0x41fe @0x44
0x41ba…4207 at0045 = ╱ec╱,╱ // 0x41ff @0x45
0x41ba…4207 at0046 = ╱4c╱L╱ // 0x4200 @0x46
0x41ba…4207 at0047 = ╱49╱I╱ // 0x4201 @0x47
0x41ba…4207 at0048 = ╱4e╱N╱ // 0x4202 @0x48
0x41ba…4207 at0049 = ╱49╱I╱ // 0x4203 @0x49
0x41ba…4207 at004a = ╱45╱E╱ // 0x4204 @0x4a
0x41ba…4207 at004b = ╱ee╱)╱ // 0x4205 @0x4b
0x41ba…4207 at004c = EOL // 0x4206 @0x4c
0x41ba…4207 }
0x4207…4213 cf6a 7200 WHEN KRTAL
0x4207…4213 LineComalBin {
0x4207…4213 ptr = 0xcf6a // 0x4207 @0x0
0x4207…4213 lno = 0x1c20 // 0x4209 @0x2
0x4207…4213 at0004 = ╱a301╱ WHEN ╱ // 0x420b @0x4
0x4207…4213 at0006 = ╱4b╱K╱ // 0x420d @0x6
0x4207…4213 at0007 = ╱52╱R╱ // 0x420e @0x7
0x4207…4213 at0008 = ╱54╱T╱ // 0x420f @0x8
0x4207…4213 at0009 = ╱41╱A╱ // 0x4210 @0x9
0x4207…4213 at000a = ╱4c╱L╱ // 0x4211 @0xa
0x4207…4213 at000b = EOL // 0x4212 @0xb
0x4207…4213 }
0x4213…4258 cfaf 7210 EXEC BUDSKRIV(TAL4$,4,SUM$,KSALDO1$,TAL4$,TAL4$,KSALDO2$,LINIE)
0x4213…4258 LineComalBin {
0x4213…4258 ptr = 0xcfaf // 0x4213 @0x0
0x4213…4258 lno = 0x1c2a // 0x4215 @0x2
0x4213…4258 at0004 = ╱9d╱ EXEC ╱ // 0x4217 @0x4
0x4213…4258 at0005 = ╱42╱B╱ // 0x4218 @0x5
0x4213…4258 at0006 = ╱55╱U╱ // 0x4219 @0x6
0x4213…4258 at0007 = ╱44╱D╱ // 0x421a @0x7
0x4213…4258 at0008 = ╱53╱S╱ // 0x421b @0x8
0x4213…4258 at0009 = ╱4b╱K╱ // 0x421c @0x9
0x4213…4258 at000a = ╱52╱R╱ // 0x421d @0xa
0x4213…4258 at000b = ╱49╱I╱ // 0x421e @0xb
0x4213…4258 at000c = ╱56╱V╱ // 0x421f @0xc
0x4213…4258 at000d = ╱ed╱(╱ // 0x4220 @0xd
0x4213…4258 at000e = ╱54╱T╱ // 0x4221 @0xe
0x4213…4258 at000f = ╱41╱A╱ // 0x4222 @0xf
0x4213…4258 at0010 = ╱4c╱L╱ // 0x4223 @0x10
0x4213…4258 at0011 = ╱34╱4╱ // 0x4224 @0x11
0x4213…4258 at0012 = ╱ef╱$╱ // 0x4225 @0x12
0x4213…4258 at0013 = ╱ec╱,╱ // 0x4226 @0x13
0x4213…4258 at0014 = ╱34╱4╱ // 0x4227 @0x14
0x4213…4258 at0015 = ╱fe00008003╱ // 0x4228 @0x15
0x4213…4258 at001a = ╱ec╱,╱ // 0x422d @0x1a
0x4213…4258 at001b = ╱53╱S╱ // 0x422e @0x1b
0x4213…4258 at001c = ╱55╱U╱ // 0x422f @0x1c
0x4213…4258 at001d = ╱4d╱M╱ // 0x4230 @0x1d
0x4213…4258 at001e = ╱ef╱$╱ // 0x4231 @0x1e
0x4213…4258 at001f = ╱ec╱,╱ // 0x4232 @0x1f
0x4213…4258 at0020 = ╱4b╱K╱ // 0x4233 @0x20
0x4213…4258 at0021 = ╱53╱S╱ // 0x4234 @0x21
0x4213…4258 at0022 = ╱41╱A╱ // 0x4235 @0x22
0x4213…4258 at0023 = ╱4c╱L╱ // 0x4236 @0x23
0x4213…4258 at0024 = ╱44╱D╱ // 0x4237 @0x24
0x4213…4258 at0025 = ╱4f╱O╱ // 0x4238 @0x25
0x4213…4258 at0026 = ╱31╱1╱ // 0x4239 @0x26
0x4213…4258 at0027 = ╱ef╱$╱ // 0x423a @0x27
0x4213…4258 at0028 = ╱ec╱,╱ // 0x423b @0x28
0x4213…4258 at0029 = ╱54╱T╱ // 0x423c @0x29
0x4213…4258 at002a = ╱41╱A╱ // 0x423d @0x2a
0x4213…4258 at002b = ╱4c╱L╱ // 0x423e @0x2b
0x4213…4258 at002c = ╱34╱4╱ // 0x423f @0x2c
0x4213…4258 at002d = ╱ef╱$╱ // 0x4240 @0x2d
0x4213…4258 at002e = ╱ec╱,╱ // 0x4241 @0x2e
0x4213…4258 at002f = ╱54╱T╱ // 0x4242 @0x2f
0x4213…4258 at0030 = ╱41╱A╱ // 0x4243 @0x30
0x4213…4258 at0031 = ╱4c╱L╱ // 0x4244 @0x31
0x4213…4258 at0032 = ╱34╱4╱ // 0x4245 @0x32
0x4213…4258 at0033 = ╱ef╱$╱ // 0x4246 @0x33
0x4213…4258 at0034 = ╱ec╱,╱ // 0x4247 @0x34
0x4213…4258 at0035 = ╱4b╱K╱ // 0x4248 @0x35
0x4213…4258 at0036 = ╱53╱S╱ // 0x4249 @0x36
0x4213…4258 at0037 = ╱41╱A╱ // 0x424a @0x37
0x4213…4258 at0038 = ╱4c╱L╱ // 0x424b @0x38
0x4213…4258 at0039 = ╱44╱D╱ // 0x424c @0x39
0x4213…4258 at003a = ╱4f╱O╱ // 0x424d @0x3a
0x4213…4258 at003b = ╱32╱2╱ // 0x424e @0x3b
0x4213…4258 at003c = ╱ef╱$╱ // 0x424f @0x3c
0x4213…4258 at003d = ╱ec╱,╱ // 0x4250 @0x3d
0x4213…4258 at003e = ╱4c╱L╱ // 0x4251 @0x3e
0x4213…4258 at003f = ╱49╱I╱ // 0x4252 @0x3f
0x4213…4258 at0040 = ╱4e╱N╱ // 0x4253 @0x40
0x4213…4258 at0041 = ╱49╱I╱ // 0x4254 @0x41
0x4213…4258 at0042 = ╱45╱E╱ // 0x4255 @0x42
0x4213…4258 at0043 = ╱ee╱)╱ // 0x4256 @0x43
0x4213…4258 at0044 = EOL // 0x4257 @0x44
0x4213…4258 }
0x4258…425e cfb5 7220 ENDCASE
0x4258…425e LineComalBin {
0x4258…425e ptr = 0xcfb5 // 0x4258 @0x0
0x4258…425e lno = 0x1c34 // 0x425a @0x2
0x4258…425e at0004 = ╱a4╱ ENDCASE ╱ // 0x425c @0x4
0x4258…425e at0005 = EOL // 0x425d @0x5
0x4258…425e }
0x425e…4264 cfbb 7230 ENDIF
0x425e…4264 LineComalBin {
0x425e…4264 ptr = 0xcfbb // 0x425e @0x0
0x425e…4264 lno = 0x1c3e // 0x4260 @0x2
0x425e…4264 at0004 = ╱9b╱ ENDIF ╱ // 0x4262 @0x4
0x425e…4264 at0005 = EOL // 0x4263 @0x5
0x425e…4264 }
0x4264…426b cfc2 7240 OUTPUT T
0x4264…426b LineComalBin {
0x4264…426b ptr = 0xcfc2 // 0x4264 @0x0
0x4264…426b lno = 0x1c48 // 0x4266 @0x2
0x4264…426b at0004 = ╱a5╱ OUTPUT ╱ // 0x4268 @0x4
0x4264…426b at0005 = ╱54╱T╱ // 0x4269 @0x5
0x4264…426b at0006 = EOL // 0x426a @0x6
0x4264…426b }
0x426b…42a6 cffd 7250 EXEC INDPUT1(4,23,-9,-6,LTX$(10))
0x426b…42a6 LineComalBin {
0x426b…42a6 ptr = 0xcffd // 0x426b @0x0
0x426b…42a6 lno = 0x1c52 // 0x426d @0x2
0x426b…42a6 at0004 = ╱9d╱ EXEC ╱ // 0x426f @0x4
0x426b…42a6 at0005 = ╱49╱I╱ // 0x4270 @0x5
0x426b…42a6 at0006 = ╱4e╱N╱ // 0x4271 @0x6
0x426b…42a6 at0007 = ╱44╱D╱ // 0x4272 @0x7
0x426b…42a6 at0008 = ╱50╱P╱ // 0x4273 @0x8
0x426b…42a6 at0009 = ╱55╱U╱ // 0x4274 @0x9
0x426b…42a6 at000a = ╱54╱T╱ // 0x4275 @0xa
0x426b…42a6 at000b = ╱31╱1╱ // 0x4276 @0xb
0x426b…42a6 at000c = ╱ed╱(╱ // 0x4277 @0xc
0x426b…42a6 at000d = ╱34╱4╱ // 0x4278 @0xd
0x426b…42a6 at000e = ╱fe00008003╱ // 0x4279 @0xe
0x426b…42a6 at0013 = ╱ec╱,╱ // 0x427e @0x13
0x426b…42a6 at0014 = ╱32╱2╱ // 0x427f @0x14
0x426b…42a6 at0015 = ╱33╱3╱ // 0x4280 @0x15
0x426b…42a6 at0016 = ╱fe0000b805╱ // 0x4281 @0x16
0x426b…42a6 at001b = ╱ec╱,╱ // 0x4286 @0x1b
0x426b…42a6 at001c = ╱e9╱-╱ // 0x4287 @0x1c
0x426b…42a6 at001d = ╱39╱9╱ // 0x4288 @0x1d
0x426b…42a6 at001e = ╱fe00009004╱ // 0x4289 @0x1e
0x426b…42a6 at0023 = ╱ec╱,╱ // 0x428e @0x23
0x426b…42a6 at0024 = ╱e9╱-╱ // 0x428f @0x24
0x426b…42a6 at0025 = ╱36╱6╱ // 0x4290 @0x25
0x426b…42a6 at0026 = ╱fe0000c003╱ // 0x4291 @0x26
0x426b…42a6 at002b = ╱ec╱,╱ // 0x4296 @0x2b
0x426b…42a6 at002c = ╱4c╱L╱ // 0x4297 @0x2c
0x426b…42a6 at002d = ╱54╱T╱ // 0x4298 @0x2d
0x426b…42a6 at002e = ╱58╱X╱ // 0x4299 @0x2e
0x426b…42a6 at002f = ╱ef╱$╱ // 0x429a @0x2f
0x426b…42a6 at0030 = ╱ed╱(╱ // 0x429b @0x30
0x426b…42a6 at0031 = ╱31╱1╱ // 0x429c @0x31
0x426b…42a6 at0032 = ╱30╱0╱ // 0x429d @0x32
0x426b…42a6 at0033 = ╱fe0000a004╱ // 0x429e @0x33
0x426b…42a6 at0038 = ╱ee╱)╱ // 0x42a3 @0x38
0x426b…42a6 at0039 = ╱ee╱)╱ // 0x42a4 @0x39
0x426b…42a6 at003a = EOL // 0x42a5 @0x3a
0x426b…42a6 }
0x42a6…42b6 d00d 7260 IF P=-7 THEN
0x42a6…42b6 LineComalBin {
0x42a6…42b6 ptr = 0xd00d // 0x42a6 @0x0
0x42a6…42b6 lno = 0x1c5c // 0x42a8 @0x2
0x42a6…42b6 at0004 = ╱9c╱ IF ╱ // 0x42aa @0x4
0x42a6…42b6 at0005 = ╱50╱P╱ // 0x42ab @0x5
0x42a6…42b6 at0006 = ╱dc╱=╱ // 0x42ac @0x6
0x42a6…42b6 at0007 = ╱e9╱-╱ // 0x42ad @0x7
0x42a6…42b6 at0008 = ╱37╱7╱ // 0x42ae @0x8
0x42a6…42b6 at0009 = ╱fe0000e003╱ // 0x42af @0x9
0x42a6…42b6 at000e = ╱b6╱ THEN ╱ // 0x42b4 @0xe
0x42a6…42b6 at000f = EOL // 0x42b5 @0xf
0x42a6…42b6 }
0x42b6…42c4 d01b 7270 EXEC STARTBIL
0x42b6…42c4 LineComalBin {
0x42b6…42c4 ptr = 0xd01b // 0x42b6 @0x0
0x42b6…42c4 lno = 0x1c66 // 0x42b8 @0x2
0x42b6…42c4 at0004 = ╱9d╱ EXEC ╱ // 0x42ba @0x4
0x42b6…42c4 at0005 = ╱53╱S╱ // 0x42bb @0x5
0x42b6…42c4 at0006 = ╱54╱T╱ // 0x42bc @0x6
0x42b6…42c4 at0007 = ╱41╱A╱ // 0x42bd @0x7
0x42b6…42c4 at0008 = ╱52╱R╱ // 0x42be @0x8
0x42b6…42c4 at0009 = ╱54╱T╱ // 0x42bf @0x9
0x42b6…42c4 at000a = ╱42╱B╱ // 0x42c0 @0xa
0x42b6…42c4 at000b = ╱49╱I╱ // 0x42c1 @0xb
0x42b6…42c4 at000c = ╱4c╱L╱ // 0x42c2 @0xc
0x42b6…42c4 at000d = EOL // 0x42c3 @0xd
0x42b6…42c4 }
0x42c4…42ca d021 7280 ELSE
0x42c4…42ca LineComalBin {
0x42c4…42ca ptr = 0xd021 // 0x42c4 @0x0
0x42c4…42ca lno = 0x1c70 // 0x42c6 @0x2
0x42c4…42ca at0004 = ╱9a╱ ELSE ╱ // 0x42c8 @0x4
0x42c4…42ca at0005 = EOL // 0x42c9 @0x5
0x42c4…42ca }
0x42ca…42d5 d02c 7290 KONT=B
0x42ca…42d5 LineComalBin {
0x42ca…42d5 ptr = 0xd02c // 0x42ca @0x0
0x42ca…42d5 lno = 0x1c7a // 0x42cc @0x2
0x42ca…42d5 at0004 = ╱4b╱K╱ // 0x42ce @0x4
0x42ca…42d5 at0005 = ╱4f╱O╱ // 0x42cf @0x5
0x42ca…42d5 at0006 = ╱4e╱N╱ // 0x42d0 @0x6
0x42ca…42d5 at0007 = ╱54╱T╱ // 0x42d1 @0x7
0x42ca…42d5 at0008 = ╱dc╱=╱ // 0x42d2 @0x8
0x42ca…42d5 at0009 = ╱42╱B╱ // 0x42d3 @0x9
0x42ca…42d5 at000a = EOL // 0x42d4 @0xa
0x42ca…42d5 }
0x42d5…42db d032 7300 ENDIF
0x42d5…42db LineComalBin {
0x42d5…42db ptr = 0xd032 // 0x42d5 @0x0
0x42d5…42db lno = 0x1c84 // 0x42d7 @0x2
0x42d5…42db at0004 = ╱9b╱ ENDIF ╱ // 0x42d9 @0x4
0x42d5…42db at0005 = EOL // 0x42da @0x5
0x42d5…42db }
0x42db…42e7 d03e 7310 UNTIL KONT=B
0x42db…42e7 LineComalBin {
0x42db…42e7 ptr = 0xd03e // 0x42db @0x0
0x42db…42e7 lno = 0x1c8e // 0x42dd @0x2
0x42db…42e7 at0004 = ╱98╱ UNTIL ╱ // 0x42df @0x4
0x42db…42e7 at0005 = ╱4b╱K╱ // 0x42e0 @0x5
0x42db…42e7 at0006 = ╱4f╱O╱ // 0x42e1 @0x6
0x42db…42e7 at0007 = ╱4e╱N╱ // 0x42e2 @0x7
0x42db…42e7 at0008 = ╱54╱T╱ // 0x42e3 @0x8
0x42db…42e7 at0009 = ╱dc╱=╱ // 0x42e4 @0x9
0x42db…42e7 at000a = ╱42╱B╱ // 0x42e5 @0xa
0x42db…42e7 at000b = EOL // 0x42e6 @0xb
0x42db…42e7 }
0x42e7…42ed d044 7320 ENDIF
0x42e7…42ed LineComalBin {
0x42e7…42ed ptr = 0xd044 // 0x42e7 @0x0
0x42e7…42ed lno = 0x1c98 // 0x42e9 @0x2
0x42e7…42ed at0004 = ╱9b╱ ENDIF ╱ // 0x42eb @0x4
0x42e7…42ed at0005 = EOL // 0x42ec @0x5
0x42e7…42ed }
0x42ed…42f4 d04b 7330 OUTPUT T
0x42ed…42f4 LineComalBin {
0x42ed…42f4 ptr = 0xd04b // 0x42ed @0x0
0x42ed…42f4 lno = 0x1ca2 // 0x42ef @0x2
0x42ed…42f4 at0004 = ╱a5╱ OUTPUT ╱ // 0x42f1 @0x4
0x42ed…42f4 at0005 = ╱54╱T╱ // 0x42f2 @0x5
0x42ed…42f4 at0006 = EOL // 0x42f3 @0x6
0x42ed…42f4 }
0x42f4…42fa d051 7340 CLEAR
0x42f4…42fa LineComalBin {
0x42f4…42fa ptr = 0xd051 // 0x42f4 @0x0
0x42f4…42fa lno = 0x1cac // 0x42f6 @0x2
0x42f4…42fa at0004 = ╱a0╱ CLEAR ╱ // 0x42f8 @0x4
0x42f4…42fa at0005 = EOL // 0x42f9 @0x5
0x42f4…42fa }
0x42fa…431c d073 7350 IF MAFSLUT=E THEN CHAIN "P641210:ENTKSP1"
0x42fa…431c LineComalBin {
0x42fa…431c ptr = 0xd073 // 0x42fa @0x0
0x42fa…431c lno = 0x1cb6 // 0x42fc @0x2
0x42fa…431c at0004 = ╱82╱ IF ╱ // 0x42fe @0x4
0x42fa…431c at0005 = ╱4d╱M╱ // 0x42ff @0x5
0x42fa…431c at0006 = ╱41╱A╱ // 0x4300 @0x6
0x42fa…431c at0007 = ╱46╱F╱ // 0x4301 @0x7
0x42fa…431c at0008 = ╱53╱S╱ // 0x4302 @0x8
0x42fa…431c at0009 = ╱4c╱L╱ // 0x4303 @0x9
0x42fa…431c at000a = ╱55╱U╱ // 0x4304 @0xa
0x42fa…431c at000b = ╱54╱T╱ // 0x4305 @0xb
0x42fa…431c at000c = ╱dc╱=╱ // 0x4306 @0xc
0x42fa…431c at000d = ╱45╱E╱ // 0x4307 @0xd
0x42fa…431c at000e = ╱b6╱ THEN ╱ // 0x4308 @0xe
0x42fa…431c at000f = ╱ac╱ CHAIN ╱ // 0x4309 @0xf
0x42fa…431c at0010 = ╱22╱"╱ // 0x430a @0x10
0x42fa…431c at0011 = ╱50╱P╱ // 0x430b @0x11
0x42fa…431c at0012 = ╱36╱6╱ // 0x430c @0x12
0x42fa…431c at0013 = ╱34╱4╱ // 0x430d @0x13
0x42fa…431c at0014 = ╱31╱1╱ // 0x430e @0x14
0x42fa…431c at0015 = ╱32╱2╱ // 0x430f @0x15
0x42fa…431c at0016 = ╱31╱1╱ // 0x4310 @0x16
0x42fa…431c at0017 = ╱30╱0╱ // 0x4311 @0x17
0x42fa…431c at0018 = ╱3a╱:╱ // 0x4312 @0x18
0x42fa…431c at0019 = ╱45╱E╱ // 0x4313 @0x19
0x42fa…431c at001a = ╱4e╱N╱ // 0x4314 @0x1a
0x42fa…431c at001b = ╱54╱T╱ // 0x4315 @0x1b
0x42fa…431c at001c = ╱4b╱K╱ // 0x4316 @0x1c
0x42fa…431c at001d = ╱53╱S╱ // 0x4317 @0x1d
0x42fa…431c at001e = ╱50╱P╱ // 0x4318 @0x1e
0x42fa…431c at001f = ╱31╱1╱ // 0x4319 @0x1f
0x42fa…431c at0020 = ╱22╱"╱ // 0x431a @0x20
0x42fa…431c at0021 = EOL // 0x431b @0x21
0x42fa…431c }
0x431c…4333 0000 7360 CHAIN "P641210:OPSTART"
0x431c…4333 LineComalBin {
0x431c…4333 ptr = 0x0000 // 0x431c @0x0
0x431c…4333 lno = 0x1cc0 // 0x431e @0x2
0x431c…4333 at0004 = ╱ac╱ CHAIN ╱ // 0x4320 @0x4
0x431c…4333 at0005 = ╱22╱"╱ // 0x4321 @0x5
0x431c…4333 at0006 = ╱50╱P╱ // 0x4322 @0x6
0x431c…4333 at0007 = ╱36╱6╱ // 0x4323 @0x7
0x431c…4333 at0008 = ╱34╱4╱ // 0x4324 @0x8
0x431c…4333 at0009 = ╱31╱1╱ // 0x4325 @0x9
0x431c…4333 at000a = ╱32╱2╱ // 0x4326 @0xa
0x431c…4333 at000b = ╱31╱1╱ // 0x4327 @0xb
0x431c…4333 at000c = ╱30╱0╱ // 0x4328 @0xc
0x431c…4333 at000d = ╱3a╱:╱ // 0x4329 @0xd
0x431c…4333 at000e = ╱4f╱O╱ // 0x432a @0xe
0x431c…4333 at000f = ╱50╱P╱ // 0x432b @0xf
0x431c…4333 at0010 = ╱53╱S╱ // 0x432c @0x10
0x431c…4333 at0011 = ╱54╱T╱ // 0x432d @0x11
0x431c…4333 at0012 = ╱41╱A╱ // 0x432e @0x12
0x431c…4333 at0013 = ╱52╱R╱ // 0x432f @0x13
0x431c…4333 at0014 = ╱54╱T╱ // 0x4330 @0x14
0x431c…4333 at0015 = ╱22╱"╱ // 0x4331 @0x15
0x431c…4333 at0016 = EOL // 0x4332 @0x16
0x431c…4333 }
0x4333…4339 (224,) 57 8d 57 8d 10 00 ┆W W ┆