|
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: 10856 (0x2a68)
Types: SPC/1-COMAL-BIN
Notes: Mikados_B
Names: »ÅRSLUT.B«
└─⟦385f097a1⟧ Bits:30008988 SPC/1 COMAL programmer til bogføring
└─⟦this⟧ »ÅRSLUT.B«
└─⟦ff7f7aeee⟧ Bits:30009007 NBT 15/3-84
└─⟦this⟧ »ÅRSLUT.B«
0100 DIM RES$(15),OP1$(12),OP2$(12),N$(6),K1$(17),A$(E),TAL4$(12),BLANK$(25) 0110 DIM UBELØB1$(14),UBELØB2$(14),STREG$(71),FÅDK$(12),FMDK$(12),GLNAVN$(25) 0120 DIM DAT$(8),FÅKREDIT$(12),FÅDEBET$(12),FMKREDIT$(12),FMDEBET$(12) 0130 DIM FMKODE$(E),FNAVN$(25),FUKODE$(E),SALDO13$(12),SALDO3$(12) 0140 DIM SALDO2$(12),SALDO11$(12),SALDO1$(12),SALDO12$(12),SUM$(12),SUM1$(14) 0150 DIM K2$(17),K3$(17),K4$(17),K5$(17),T1(W),LAND$(W,12),DEBNAVN$(25) 0160 DIM DSALDO1$(12),DEBKGR$(E),DSALDO2$(12),DSALDO3$(12),DSALDO4$(12) 0170 DIM DEBLK$(E),DEBBY$(20),ÅRKØB$(12),MDNKØB$(12),TÅRKØB$(12),SALDO$(12) 0180 DIM TOKØB$(12),TOSALDO1$(12),K$(26,11),KREBY$(20) 0190 DIM TOSALDO$(12),KRELK$(E),KREGR$(E),KSALDO1$(12),T2(W) 0200 DIM KSALDO2$(12),K10$(17),K6$(17),K7$(17),K9$(17),K8$(17),TYPE$(E) 0210 DIM BLB2$(12),TILNAVN$(27,8),FRANAVN$(27,8),TEKST$(25) 0220 DIM SUM3$(12),DREVFRA$(G),DREVTIL$(G),TKODE$(E),DV$(10) 0230 PROC CALC(ART,B1,B2,ES) 0240 OP1$=B1$;OP2$=B2$;RES$=ES$;SI=B;FLAG=B 0250 CALL "P641210:REGN" 0260 ES$=RES$ 0270 IF FLAG<>B THEN STOP 0280 ENDPROC 0290 PROC DATOUD(DA1,DA2) 0300 DA3=DA1 0310 DA2$=" " 0320 FOR J=8 TO E STEP -E 0330 IF J MOD V=B THEN 0340 DA2$(J)="." 0350 ELSE 0360 DA2$(J)=CHR(DA3 MOD 10+48) 0370 DA3=DA3 DIV 10 0380 ENDIF 0390 NEXT J 0400 ENDPROC 0410 PROC UDLIN 0420 EXEC TUD(SUM$,SUM1$,E,B) 0430 PRINT TAB(5);GR;TAB(12);UBELØB1$;TAB(37);UBELØB2$;TAB(57);SUM1$ 0440 ENDPROC 0450 PROC INDTAB1(Z,MANT5,L7) 0460 PIL1=MANT5 DIV 32 0470 FOR I=E TO PIL1 0480 H=(I-E)*8+E 0490 GET L7$,I:Z(H),Z(H+E),Z(H+G),Z(H+V),Z(H+4),Z(H+5),Z(H+6),Z(H+7) 0500 EXEC FEJL(G,E,L7$) 0510 NEXT I 0520 ENDPROC 0530 PROC UNDIND(V2,U1,Z) 0540 OPEN V2$,R 0550 EXEC FEJL(14,E,V2$) 0560 GET V2$,U1:Z(E,E),Z(E,G),Z(G,E),Z(G,G),Z(V,E),Z(V,G),Z(4,E),Z(4,G) 0570 EXEC FEJL(14,G,V2$) 0580 CLOSE V2$ 0590 EXEC FEJL(14,V,V2$) 0600 ENDPROC ;UNDIND 0610 PROC TABINIT(K31,K32,MPOSTANTAL3,HTAB2,UTAB2) 0620 OPEN K31$,R 0630 EXEC FEJL(15,E,K31$) 0640 OPEN K32$,W 0650 EXEC FEJL(15,G,K32$) 0660 H=E 0670 FOR I=E TO MPOSTANTAL3 DIV 40 0680 GET K31$,H:KONR 0690 EXEC FEJL(15,V,K31$) 0700 HTAB2(I,E)=KONR 0710 FOR J=E TO 4 0720 GET K31$,H:KONR 0730 EXEC FEJL(15,4,K31$) 0740 UTAB2(J,E)=KONR 0750 H=H+W 0760 GET K31$,H:KONR 0770 EXEC FEJL(15,5,K31$) 0780 UTAB2(J,G)=KONR 0790 H=H+E 0800 NEXT J 0810 HTAB2(I,G)=KONR 0820 K90=I+MPOSTANTAL3 DIV 160 0830 EXEC UNDUD(K32$,K90,UTAB2) 0840 NEXT I 0850 EXEC HOVUD(K32$,MPOSTANTAL3,HTAB2) 0860 CLOSE K31$ 0870 EXEC FEJL(15,6,K31$) 0880 CLOSE K32$ 0890 EXEC FEJL(15,7,K32$) 0900 ENDPROC ;TABINIT 0910 PROC UNDUD(V3,U2,T) 0920 PUT V3$,U2:T(E,E),T(E,G),T(G,E),T(G,G),T(V,E),T(V,G),T(4,E),T(4,G) 0930 EXEC FEJL(16,E,V3$) 0940 ENDPROC ;UNDUD 0950 PROC HOVUD(V4,MPOSTANTAL4,S) 0960 FOR I=E TO MPOSTANTAL4 DIV 160 0970 J=(I-E)*4+E;J1=J+E;J2=J+G;J3=J+V 0980 PUT V4$,I:S(J,E),S(J,G),S(J1,E),S(J1,G),S(J2,E),S(J2,G),S(J3,E),S(J3,G) 0990 EXEC FEJL(17,G,V4$) 1000 NEXT I 1010 ENDPROC 1020 PROC PINIT(K61,MPOSTANTAL8) 1030 OPEN K61$,W 1040 EXEC FEJL(E,E,K61$) 1050 FOR I=E TO MPOSTANTAL8 1060 PUT K61$,I:100000 1070 EXEC FEJL(E,G,K61$) 1080 NEXT I 1090 CLOSE K61$ 1100 EXEC FEJL(E,V,K61$) 1110 ENDPROC 1120 PROC HENTPOST 1130 S1=FTAB(FPIL3,G) 1140 GET K5$,S1:FNR,FNAVN$ 1150 EXEC FEJL(G,G,K5$) 1160 GET K5$,S1+E:FMKODE$,FMDEBET$,FMKREDIT$ 1170 EXEC FEJL(G,V,K5$) 1180 GET K5$,S1+G:FUKODE$,FÅDEBET$,FÅKREDIT$ 1190 EXEC FEJL(G,4,K5$) 1200 ENDPROC 1210 PROC FINDPOST1(TAB4,Q,MANT2,NØGL5,PIL6,L8) 1220 PIL1=MANT2 DIV 8;PIL6=PIL1;CEKS=E;MANT3=MANT2 DIV 4;MANT4=MANT2 DIV 32 1230 REPEAT 1240 IF NØGL5=TAB4(PIL6) OR PIL1=E THEN EXIT 1250 PIL1=(PIL1+E) DIV G;PIL6=PIL6+PIL1*(E-G*(NØGL5<TAB4(PIL6))) 1260 IF PIL6<E THEN PIL6=MANT3 1270 UNTIL PIL1=B 1280 IF TAB4(PIL6)>NØGL5 THEN PIL6=PIL6-E*(PIL6>E) 1290 PIL6=MANT4+PIL6 1300 GET L8$,PIL6:Q(E,E),Q(E,G),Q(G,E),Q(G,G),Q(V,E),Q(V,G),Q(4,E),Q(4,G) 1310 EXEC FEJL(E,E,L8$) 1320 FOR PIL6=E TO 4 1330 IF NØGL5=Q(PIL6,E) THEN EXIT 1340 NEXT PIL6 1350 IF PIL6<>5 THEN CEKS=B 1360 ENDPROC 1370 PROC GEMFPOST 1380 S1=FTAB(FPIL3,G) 1390 PUT K5$,S1:FNR,FNAVN$ 1400 EXEC FEJL(4,V,K5$) 1410 PUT K5$,S1+E:FMKODE$,FMDEBET$,FMKREDIT$ 1420 EXEC FEJL(4,4,K5$) 1430 PUT K5$,S1+G:FUKODE$,FÅDEBET$,FÅKREDIT$ 1440 EXEC FEJL(4,4,K5$) 1450 ENDPROC 1460 PROC NRTEST(NUM1) 1470 P=B;TEST2=B;KTAL=B;L=LEN(NUM1$) 1480 IF L>6 THEN EXIT 1490 CASE L OF 1500 FOR I=E TO L 1510 P1=INT(ORD(NUM1$(I))-48) 1520 IF P1<B OR P1>W THEN TEST2=E 1530 P=P*10+P1 1540 NEXT I 1550 KTAL=P DIV 10000 1560 WHEN B 1570 P=-E 1580 WHEN E 1590 CASE NUM1$ OF 1600 P=INT(ORD(NUM1$)-48) 1610 WHEN "D","d" 1620 P=-G 1630 WHEN "A","a" 1640 P=-V 1650 WHEN "M","m" 1660 P=-4 1670 WHEN "J","j" 1680 P=-7 1690 WHEN "N","n" 1700 P=-8 1710 ENDCASE 1720 ENDCASE 1730 ENDPROC 1740 PROC KINIT(K62,K63,TAB1,KM,MANTAL) 1750 OPEN K63$,W 1760 EXEC FEJL(G,E,K63$) 1770 FOR J=E TO MANTAL DIV 4 1780 K90=J+MANTAL DIV 32 1790 EXEC UNDIND(K62$,K90,TAB1) 1800 FOR I=E TO 4 1810 IF TAB1(I,E)=1000000 THEN EXIT 1820 X=TAB1(I,G);SALDO$="0+" 1830 CASE KM OF 1840 GET K63$,X:DEBNR,DEBNAVN$,DSALDO1$,DEBKGR$ 1850 EXEC FEJL(7,E,K63$) 1860 GET K63$,X+E:DSALDO2$,DSALDO3$,DSALDO4$,DEBPOSTNR,DEBLK$ 1870 EXEC FEJL(7,G,K63$) 1880 GET K63$,X+V:DEBBY$,ÅRKØB$,MDNKØB$ 1890 EXEC FEJL(7,V,K63$) 1900 GR=ORD(DEBKGR$)-48;TÅRKØB$=ÅRKØB$ 1910 EXEC CALC(B,DSALDO3$,DSALDO4$,SALDO$) 1920 EXEC CALC(B,SALDO$,DSALDO2$,SALDO$) 1930 EXEC CALC(B,SALDO$,DSALDO1$,SALDO$) 1940 EXEC CALC(B,DSALDI$(GR),SALDO$,DSALDI$(GR)) 1950 EXEC CALC(B,TÅRKØB$,TOKØB$,TOKØB$) 1960 ÅRKØB$="0+" 1970 PUT K63$,X+V:DEBBY$,ÅRKØB$,MDNKØB$ 1980 EXEC FEJL(7,4,K63$) 1990 WHEN E 2000 GET K63$,X:FNR 2010 EXEC FEJL(7,6,K63$) 2020 GET K63$,X+G:FUKODE$,FÅDEBET$,FÅKREDIT$ 2030 EXEC FEJL(7,7,K63$) 2040 GR=ORD(FUKODE$)-48 2050 IF (DTAL=FNR DIV 10000 OR KRTAL=FNR DIV 1000) AND GR=E THEN 2060 EXEC CALC(B,FÅDEBET$,FÅKREDIT$,SALDO$) 2080 GRUP=FNR MOD 100 2090 IF DTAL=FNR DIV 10000 THEN 2100 DSALDI1$(GRUP)=SALDO$ 2110 IF DSALDI$(GRUP,LEN(DSALDI$(GRUP)))="-" THEN 2120 FÅKREDIT$=DSALDI$(GRUP);FÅDEBET$="0+" 2130 ELSE 2140 FÅDEBET$=DSALDI$(GRUP);FÅKREDIT$="0+" 2150 ENDIF 2160 ELSE 2170 KSALDI1$(GRUP)=SALDO$ 2180 IF KSALDI$(GRUP,LEN(KSALDI$(GRUP)))="-" THEN 2190 FÅKREDIT$=KSALDI$(GRUP);FÅDEBET$="0+" 2200 ELSE 2210 FÅDEBET$=KSALDI$(GRUP);FÅKREDIT$="0+" 2220 ENDIF 2230 ENDIF 2233 EXEC CALC(B,FÅDEBET$,FÅKREDIT$,SALDO$) 2235 EXEC CALC(B,TOSALDO1$,SALDO$,TOSALDO1$) 2240 ELSE 2250 IF GR=B THEN 2260 EXEC CALC(B,FÅDEBET$,FÅKREDIT$,SALDO$) 2270 EXEC CALC(B,TOSALDO$,SALDO$,TOSALDO$) 2280 FÅDEBET$="0+";FÅKREDIT$="0+" 2290 ENDIF 2300 ENDIF 2310 PUT K63$,X+G:FUKODE$,FÅDEBET$,FÅKREDIT$ 2320 EXEC FEJL(7,8,K63$) 2330 WHEN G 2340 GET K63$,X+E:KREBY$,KRELK$,KREGR$,KREPOSTNR,KSALDO1$,KSALDO2$ 2350 EXEC FEJL(7,5,K63$) 2360 GR=ORD(KREGR$)-48 2370 EXEC CALC(B,KSALDO1$,KSALDO2$,SALDO$) 2380 EXEC CALC(B,KSALDI$(GR),SALDO$,KSALDI$(GR)) 2390 ENDCASE 2400 NEXT I 2410 IF TAB1(I-E*(I=5),E)=1000000 THEN EXIT 2420 NEXT J 2430 CLOSE K63$ 2440 EXEC FEJL(G,22,K63$) 2450 ENDPROC 2460 PROC FEJL(NR1,NR2,NR3) 2470 IF STATUS(NR3$)<>B THEN 2480 PRINT STATUS(NR3$),NR1,NR2,NR3$ 2490 STOP 2500 ENDIF 2510 ENDPROC 2520 PROC TUD(BLB1,UBLB1,TEGN,STØR) 2530 BLB2$=BLB1$ 2540 EXEC CALC(5,BLB2$,TAL4$,UBLB1$) 2550 IF TEGN=B THEN 2560 UBLB1$=UBLB1$(E:13) 2570 ELSE 2580 IF TEGN=E AND UBLB1$(LEN(UBLB1$))="+" THEN 2590 UBLB1$(LEN(UBLB1$))=" " 2600 ENDIF 2610 ENDIF 2620 IF STØR=E THEN 2630 UBLB1$=UBLB1$(4:LEN(UBLB1$)-V) 2640 ENDIF 2650 ENDPROC 2660 K1$="P641220:SYSTEM1" 2670 OPEN K1$,R 2680 EXEC FEJL(W,E,K1$) 2690 GET K1$,E:MFANTAL,MDANTAL,MKANTAL 2700 EXEC FEJL(W,G,K1$) 2710 GET K1$,V:DPOST,KPOST,MFPOST,MDPOST 2720 EXEC FEJL(W,21,K1$) 2730 GET K1$,4:MKPOST,MFAK,MVGR,MKGR 2740 EXEC FEJL(W,V,K1$) 2750 GET K1$,5:MKRGR 2760 EXEC FEJL(W,4,K1$) 2770 GET K1$,8:DIVNR,DIVDNR,DIFNR,DTAL 2780 EXEC FEJL(W,5,K1$) 2790 GET K1$,W:KRTAL 2800 EXEC FEJL(W,6,K1$) 2810 GET K1$,10:N$ 2820 EXEC FEJL(W,7,K1$) 2830 FOR I=E TO 26 2840 GET K1$,I+10:K$(I) 2850 EXEC FEJL(W,8,K1$) 2860 NEXT I 2870 CLOSE K1$ 2880 EXEC FEJL(W,11,K1$) 2890 DIM DSALDI$(MKGR,12),DSALDI1$(MKGR,12),KSALDI1$(MKRGR,12) 2900 DIM KSALDI$(MKRGR,12) 2910 K3$=N$+K$(G);K4$=N$+K$(V);K5$=N$+K$(5);K6$=N$+K$(6);K7$=N$+K$(7) 2920 K8$=N$+K$(15);K9$=N$+K$(22);K2$=N$+K$(E);K10$=N$+K$(26) 2930 DIM FTAB1(MFANTAL DIV 4),DTAB1(MDANTAL DIV 4),KTAB1(MKANTAL DIV 4) 2940 DIM FTAB(4,G),DTAB(4,G),KTAB(4,G),HFTAB(MFPOST DIV 40,G),UFTAB(4,G) 2950 OPEN K10$,R 2960 EXEC FEJL(W,12,K10$) 2970 GET K10$,G:T1(E),T1(G),T1(V),T1(4),T1(5),T1(6),T1(7),T1(8),T1(W) 2980 EXEC FEJL(W,13,K10$) 2990 GET K10$,13:T2(E),T2(G),T2(V),T2(4),T2(5),T2(6),T2(7),T2(8),T2(W) 3000 EXEC FEJL(W,14,K10$) 3002 GET K10$,20:DV$ 3004 EXEC FEJL(W,25,K10$) 3010 CLOSE K10$ 3020 EXEC FEJL(W,15,K10$) 3030 OPEN K2$,R 3040 EXEC FEJL(W,16,K2$) 3050 OPEN K3$,R 3060 EXEC FEJL(W,18,K3$) 3070 OPEN K4$,R 3080 EXEC FEJL(W,19,K4$) 3090 FOR I=E TO MKGR 3100 DSALDI$(I)="0+";DSALDI1$(I)="0+" 3110 NEXT I 3120 FOR I=E TO MKRGR 3130 KSALDI$(I)="0+";KSALDI1$(I)="0+" 3140 NEXT I 3150 TOSALDO$="0+";TOSALDO1$="0+";SUM$="0+";SUM3$="0+" 3160 EXEC INDTAB1(FTAB1,MFANTAL,K2$) 3170 EXEC INDTAB1(DTAB1,MDANTAL,K3$) 3180 EXEC INDTAB1(KTAB1,MKANTAL,K4$) 3185 CLOSE 3190 EXEC KINIT(K3$,K6$,DTAB,0,MDANTAL) 3200 EXEC KINIT(K4$,K7$,KTAB,2,MKANTAL) 3210 EXEC KINIT(K2$,K5$,FTAB,1,MFANTAL) 3220 EXEC PINIT(K8$,MFPOST) 3230 EXEC TABINIT(K8$,K9$,MFPOST,HFTAB,UFTAB) 3240 OPEN K5$,W 3250 EXEC FEJL(W,20,K5$) 3255 OPEN K2$,R 3256 EXEC FEJL(20,5,K2$) 3260 EXEC FINDPOST1(FTAB1,FTAB,MFANTAL,DIFNR,FPIL3,K2$) 3270 IF CEKS=E THEN STOP 3280 EXEC HENTPOST 3290 IF TOSALDO1$(LEN(TOSALDO1$))="+" THEN 3300 EXEC CALC(E,FÅKREDIT$,TOSALDO1$,FÅKREDIT$) 3310 ELSE 3320 EXEC CALC(E,FÅDEBET$,TOSALDO1$,FÅDEBET$) 3330 ENDIF 3340 EXEC GEMFPOST 3350 TKODE$=CHR(10+48);TEKST$="Årsafslutnings difference" 3360 OPEN K8$,W 3370 EXEC FEJL(W,21,K8$) 3380 PUT K8$,E:DIFNR,T1(7),-E,TKODE$,TOSALDO$ 3390 EXEC FEJL(W,22,K8$) 3400 PUT K8$,G:DIFNR,TEKST$ 3410 EXEC FEJL(W,23,K8$) 3420 CLOSE K8$ 3430 EXEC FEJL(W,24,K8$) 3440 T2(5)=G 3450 OPEN K10$,W 3460 EXEC FEJL(W,25,K10$) 3470 PUT K10$,13:T2(E),T2(G),T2(V),T2(4),T2(5),T2(6),T2(7),T2(8),T2(W) 3480 EXEC FEJL(W,26,K10$) 3490 CLOSE K10$ 3500 EXEC FEJL(W,27,K10$) 3510 EXEC DATOUD(T1(7),DAT$) 3520 CLEAR 3530 REPEAT 3540 CURSOR 15,13 3550 INPUT "Monter papir til udskrift og tast RETURN",A$ 3560 EXEC NRTEST(A$) 3570 UNTIL P=-E 3580 OUTPUT P 3585 PRINT TAB(67);DV$;" " 3590 PRINT TAB(10);CHR(14);"Årsafslutningsjournal";CHR(15);TAB(40); 3600 PRINT "DATO: ";DAT$ 3610 PRINT CHR(10) 3620 PRINT TAB(5);"Gr. Totaler Deb. ";TAB(37);"Gr.Total Deb."; 3630 PRINT TAB(60);"Difference" 3640 PRINT " " 3650 FOR GR=E TO MKGR 3660 EXEC CALC(E,DSALDI$(GR),DSALDI1$(GR),SUM$) 3670 EXEC TUD(DSALDI$(GR),UBELØB1$,E,B) 3680 EXEC TUD(DSALDI1$(GR),UBELØB2$,E,B) 3690 EXEC UDLIN 3700 NEXT GR 3710 PRINT CHR(10) 3720 PRINT TAB(5);"Gr. Totaler Kre. ";TAB(37);"Gr.Total Kre."; 3730 PRINT TAB(60);"Difference" 3740 PRINT " " 3750 FOR GR=E TO MKRGR 3760 EXEC CALC(E,KSALDI$(GR),KSALDI1$(GR),SUM$) 3770 EXEC TUD(KSALDI$(GR),UBELØB1$,E,B) 3780 EXEC TUD(KSALDI1$(GR),UBELØB2$,E,B) 3790 EXEC UDLIN 3800 NEXT GR 3810 PRINT CHR(10) 3820 PRINT TAB(5);"Total Deb+Kre.";TAB(40);"Total Fin.";TAB(60);"Difference" 3830 PRINT " " 3840 EXEC CALC(B,TOSALDO1$,TOSALDO$,SUM3$) 3850 EXEC TUD(TOSALDO1$,UBELØB1$,E,B) 3860 EXEC TUD(TOSALDO$,UBELØB2$,E,B) 3870 EXEC TUD(SUM3$,SUM1$,E,B) 3880 PRINT TAB(6);UBELØB1$;TAB(37);UBELØB2$; 3890 PRINT TAB(57);SUM1$ 3900 PRINT " " 3901 SUM1$="0+" 3902 EXEC CALC(E,SUM1$,TOSALDO1$,TOSALDO1$) 3903 EXEC TUD(TOSALDO1$,UBELØB1$,E,B) 3910 PRINT TAB(5);"Bogført på difference konto:";TAB(57);UBELØB1$ 3920 FOR I=E TO 49-15-MKGR-MKRGR 3930 PRINT " " 3940 NEXT I 3950 OUTPUT T 3960 CLEAR 3970 CHAIN "P641210:OPSTART"
0x0000…006c (0,) 8dc3 0100 DIM RES$(15),OP1$(12),OP2$(12),N$(6),K1$(17),A$(E),TAL4$(12),BLANK$(25)
0x0000…006c LineComalBin {
0x0000…006c ptr = 0x8dc3 // 0x0 @0x0
0x0000…006c lno = 0x0064 // 0x2 @0x2
0x0000…006c at0004 = ╱87╱ DIM ╱ // 0x4 @0x4
0x0000…006c at0005 = ╱52╱R╱ // 0x5 @0x5
0x0000…006c at0006 = ╱45╱E╱ // 0x6 @0x6
0x0000…006c at0007 = ╱53╱S╱ // 0x7 @0x7
0x0000…006c at0008 = ╱ef╱$╱ // 0x8 @0x8
0x0000…006c at0009 = ╱ed╱(╱ // 0x9 @0x9
0x0000…006c at000a = ╱31╱1╱ // 0xa @0xa
0x0000…006c at000b = ╱35╱5╱ // 0xb @0xb
0x0000…006c at000c = ╱fe0000f004╱ // 0xc @0xc
0x0000…006c at0011 = ╱ee╱)╱ // 0x11 @0x11
0x0000…006c at0012 = ╱ec╱,╱ // 0x12 @0x12
0x0000…006c at0013 = ╱4f╱O╱ // 0x13 @0x13
0x0000…006c at0014 = ╱50╱P╱ // 0x14 @0x14
0x0000…006c at0015 = ╱31╱1╱ // 0x15 @0x15
0x0000…006c at0016 = ╱ef╱$╱ // 0x16 @0x16
0x0000…006c at0017 = ╱ed╱(╱ // 0x17 @0x17
0x0000…006c at0018 = ╱31╱1╱ // 0x18 @0x18
0x0000…006c at0019 = ╱32╱2╱ // 0x19 @0x19
0x0000…006c at001a = ╱fe0000c004╱ // 0x1a @0x1a
0x0000…006c at001f = ╱ee╱)╱ // 0x1f @0x1f
0x0000…006c at0020 = ╱ec╱,╱ // 0x20 @0x20
0x0000…006c at0021 = ╱4f╱O╱ // 0x21 @0x21
0x0000…006c at0022 = ╱50╱P╱ // 0x22 @0x22
0x0000…006c at0023 = ╱32╱2╱ // 0x23 @0x23
0x0000…006c at0024 = ╱ef╱$╱ // 0x24 @0x24
0x0000…006c at0025 = ╱ed╱(╱ // 0x25 @0x25
0x0000…006c at0026 = ╱31╱1╱ // 0x26 @0x26
0x0000…006c at0027 = ╱32╱2╱ // 0x27 @0x27
0x0000…006c at0028 = ╱fe0000c004╱ // 0x28 @0x28
0x0000…006c at002d = ╱ee╱)╱ // 0x2d @0x2d
0x0000…006c at002e = ╱ec╱,╱ // 0x2e @0x2e
0x0000…006c at002f = ╱4e╱N╱ // 0x2f @0x2f
0x0000…006c at0030 = ╱ef╱$╱ // 0x30 @0x30
0x0000…006c at0031 = ╱ed╱(╱ // 0x31 @0x31
0x0000…006c at0032 = ╱36╱6╱ // 0x32 @0x32
0x0000…006c at0033 = ╱fe0000c003╱ // 0x33 @0x33
0x0000…006c at0038 = ╱ee╱)╱ // 0x38 @0x38
0x0000…006c at0039 = ╱ec╱,╱ // 0x39 @0x39
0x0000…006c at003a = ╱4b╱K╱ // 0x3a @0x3a
0x0000…006c at003b = ╱31╱1╱ // 0x3b @0x3b
0x0000…006c at003c = ╱ef╱$╱ // 0x3c @0x3c
0x0000…006c at003d = ╱ed╱(╱ // 0x3d @0x3d
0x0000…006c at003e = ╱31╱1╱ // 0x3e @0x3e
0x0000…006c at003f = ╱37╱7╱ // 0x3f @0x3f
0x0000…006c at0040 = ╱fe00008805╱ // 0x40 @0x40
0x0000…006c at0045 = ╱ee╱)╱ // 0x45 @0x45
0x0000…006c at0046 = ╱ec╱,╱ // 0x46 @0x46
0x0000…006c at0047 = ╱41╱A╱ // 0x47 @0x47
0x0000…006c at0048 = ╱ef╱$╱ // 0x48 @0x48
0x0000…006c at0049 = ╱ed╱(╱ // 0x49 @0x49
0x0000…006c at004a = ╱45╱E╱ // 0x4a @0x4a
0x0000…006c at004b = ╱ee╱)╱ // 0x4b @0x4b
0x0000…006c at004c = ╱ec╱,╱ // 0x4c @0x4c
0x0000…006c at004d = ╱54╱T╱ // 0x4d @0x4d
0x0000…006c at004e = ╱41╱A╱ // 0x4e @0x4e
0x0000…006c at004f = ╱4c╱L╱ // 0x4f @0x4f
0x0000…006c at0050 = ╱34╱4╱ // 0x50 @0x50
0x0000…006c at0051 = ╱ef╱$╱ // 0x51 @0x51
0x0000…006c at0052 = ╱ed╱(╱ // 0x52 @0x52
0x0000…006c at0053 = ╱31╱1╱ // 0x53 @0x53
0x0000…006c at0054 = ╱32╱2╱ // 0x54 @0x54
0x0000…006c at0055 = ╱fe0000c004╱ // 0x55 @0x55
0x0000…006c at005a = ╱ee╱)╱ // 0x5a @0x5a
0x0000…006c at005b = ╱ec╱,╱ // 0x5b @0x5b
0x0000…006c at005c = ╱42╱B╱ // 0x5c @0x5c
0x0000…006c at005d = ╱4c╱L╱ // 0x5d @0x5d
0x0000…006c at005e = ╱41╱A╱ // 0x5e @0x5e
0x0000…006c at005f = ╱4e╱N╱ // 0x5f @0x5f
0x0000…006c at0060 = ╱4b╱K╱ // 0x60 @0x60
0x0000…006c at0061 = ╱ef╱$╱ // 0x61 @0x61
0x0000…006c at0062 = ╱ed╱(╱ // 0x62 @0x62
0x0000…006c at0063 = ╱32╱2╱ // 0x63 @0x63
0x0000…006c at0064 = ╱35╱5╱ // 0x64 @0x64
0x0000…006c at0065 = ╱fe0000c805╱ // 0x65 @0x65
0x0000…006c at006a = ╱ee╱)╱ // 0x6a @0x6a
0x0000…006c at006b = EOL // 0x6b @0x6b
0x0000…006c }
0x006c…00d4 8e2b 0110 DIM UBELØB1$(14),UBELØB2$(14),STREG$(71),FÅDK$(12),FMDK$(12),GLNAVN$(25)
0x006c…00d4 LineComalBin {
0x006c…00d4 ptr = 0x8e2b // 0x6c @0x0
0x006c…00d4 lno = 0x006e // 0x6e @0x2
0x006c…00d4 at0004 = ╱87╱ DIM ╱ // 0x70 @0x4
0x006c…00d4 at0005 = ╱55╱U╱ // 0x71 @0x5
0x006c…00d4 at0006 = ╱42╱B╱ // 0x72 @0x6
0x006c…00d4 at0007 = ╱45╱E╱ // 0x73 @0x7
0x006c…00d4 at0008 = ╱4c╱L╱ // 0x74 @0x8
0x006c…00d4 at0009 = ╱5c╱Ø╱ // 0x75 @0x9
0x006c…00d4 at000a = ╱42╱B╱ // 0x76 @0xa
0x006c…00d4 at000b = ╱31╱1╱ // 0x77 @0xb
0x006c…00d4 at000c = ╱ef╱$╱ // 0x78 @0xc
0x006c…00d4 at000d = ╱ed╱(╱ // 0x79 @0xd
0x006c…00d4 at000e = ╱31╱1╱ // 0x7a @0xe
0x006c…00d4 at000f = ╱34╱4╱ // 0x7b @0xf
0x006c…00d4 at0010 = ╱fe0000e004╱ // 0x7c @0x10
0x006c…00d4 at0015 = ╱ee╱)╱ // 0x81 @0x15
0x006c…00d4 at0016 = ╱ec╱,╱ // 0x82 @0x16
0x006c…00d4 at0017 = ╱55╱U╱ // 0x83 @0x17
0x006c…00d4 at0018 = ╱42╱B╱ // 0x84 @0x18
0x006c…00d4 at0019 = ╱45╱E╱ // 0x85 @0x19
0x006c…00d4 at001a = ╱4c╱L╱ // 0x86 @0x1a
0x006c…00d4 at001b = ╱5c╱Ø╱ // 0x87 @0x1b
0x006c…00d4 at001c = ╱42╱B╱ // 0x88 @0x1c
0x006c…00d4 at001d = ╱32╱2╱ // 0x89 @0x1d
0x006c…00d4 at001e = ╱ef╱$╱ // 0x8a @0x1e
0x006c…00d4 at001f = ╱ed╱(╱ // 0x8b @0x1f
0x006c…00d4 at0020 = ╱31╱1╱ // 0x8c @0x20
0x006c…00d4 at0021 = ╱34╱4╱ // 0x8d @0x21
0x006c…00d4 at0022 = ╱fe0000e004╱ // 0x8e @0x22
0x006c…00d4 at0027 = ╱ee╱)╱ // 0x93 @0x27
0x006c…00d4 at0028 = ╱ec╱,╱ // 0x94 @0x28
0x006c…00d4 at0029 = ╱53╱S╱ // 0x95 @0x29
0x006c…00d4 at002a = ╱54╱T╱ // 0x96 @0x2a
0x006c…00d4 at002b = ╱52╱R╱ // 0x97 @0x2b
0x006c…00d4 at002c = ╱45╱E╱ // 0x98 @0x2c
0x006c…00d4 at002d = ╱47╱G╱ // 0x99 @0x2d
0x006c…00d4 at002e = ╱ef╱$╱ // 0x9a @0x2e
0x006c…00d4 at002f = ╱ed╱(╱ // 0x9b @0x2f
0x006c…00d4 at0030 = ╱37╱7╱ // 0x9c @0x30
0x006c…00d4 at0031 = ╱31╱1╱ // 0x9d @0x31
0x006c…00d4 at0032 = ╱fe00008e07╱ // 0x9e @0x32
0x006c…00d4 at0037 = ╱ee╱)╱ // 0xa3 @0x37
0x006c…00d4 at0038 = ╱ec╱,╱ // 0xa4 @0x38
0x006c…00d4 at0039 = ╱46╱F╱ // 0xa5 @0x39
0x006c…00d4 at003a = ╱5d╱Å╱ // 0xa6 @0x3a
0x006c…00d4 at003b = ╱44╱D╱ // 0xa7 @0x3b
0x006c…00d4 at003c = ╱4b╱K╱ // 0xa8 @0x3c
0x006c…00d4 at003d = ╱ef╱$╱ // 0xa9 @0x3d
0x006c…00d4 at003e = ╱ed╱(╱ // 0xaa @0x3e
0x006c…00d4 at003f = ╱31╱1╱ // 0xab @0x3f
0x006c…00d4 at0040 = ╱32╱2╱ // 0xac @0x40
0x006c…00d4 at0041 = ╱fe0000c004╱ // 0xad @0x41
0x006c…00d4 at0046 = ╱ee╱)╱ // 0xb2 @0x46
0x006c…00d4 at0047 = ╱ec╱,╱ // 0xb3 @0x47
0x006c…00d4 at0048 = ╱46╱F╱ // 0xb4 @0x48
0x006c…00d4 at0049 = ╱4d╱M╱ // 0xb5 @0x49
0x006c…00d4 at004a = ╱44╱D╱ // 0xb6 @0x4a
0x006c…00d4 at004b = ╱4b╱K╱ // 0xb7 @0x4b
0x006c…00d4 at004c = ╱ef╱$╱ // 0xb8 @0x4c
0x006c…00d4 at004d = ╱ed╱(╱ // 0xb9 @0x4d
0x006c…00d4 at004e = ╱31╱1╱ // 0xba @0x4e
0x006c…00d4 at004f = ╱32╱2╱ // 0xbb @0x4f
0x006c…00d4 at0050 = ╱fe0000c004╱ // 0xbc @0x50
0x006c…00d4 at0055 = ╱ee╱)╱ // 0xc1 @0x55
0x006c…00d4 at0056 = ╱ec╱,╱ // 0xc2 @0x56
0x006c…00d4 at0057 = ╱47╱G╱ // 0xc3 @0x57
0x006c…00d4 at0058 = ╱4c╱L╱ // 0xc4 @0x58
0x006c…00d4 at0059 = ╱4e╱N╱ // 0xc5 @0x59
0x006c…00d4 at005a = ╱41╱A╱ // 0xc6 @0x5a
0x006c…00d4 at005b = ╱56╱V╱ // 0xc7 @0x5b
0x006c…00d4 at005c = ╱4e╱N╱ // 0xc8 @0x5c
0x006c…00d4 at005d = ╱ef╱$╱ // 0xc9 @0x5d
0x006c…00d4 at005e = ╱ed╱(╱ // 0xca @0x5e
0x006c…00d4 at005f = ╱32╱2╱ // 0xcb @0x5f
0x006c…00d4 at0060 = ╱35╱5╱ // 0xcc @0x60
0x006c…00d4 at0061 = ╱fe0000c805╱ // 0xcd @0x61
0x006c…00d4 at0066 = ╱ee╱)╱ // 0xd2 @0x66
0x006c…00d4 at0067 = EOL // 0xd3 @0x67
0x006c…00d4 }
0x00d4…0130 8e87 0120 DIM DAT$(8),FÅKREDIT$(12),FÅDEBET$(12),FMKREDIT$(12),FMDEBET$(12)
0x00d4…0130 LineComalBin {
0x00d4…0130 ptr = 0x8e87 // 0xd4 @0x0
0x00d4…0130 lno = 0x0078 // 0xd6 @0x2
0x00d4…0130 at0004 = ╱87╱ DIM ╱ // 0xd8 @0x4
0x00d4…0130 at0005 = ╱44╱D╱ // 0xd9 @0x5
0x00d4…0130 at0006 = ╱41╱A╱ // 0xda @0x6
0x00d4…0130 at0007 = ╱54╱T╱ // 0xdb @0x7
0x00d4…0130 at0008 = ╱ef╱$╱ // 0xdc @0x8
0x00d4…0130 at0009 = ╱ed╱(╱ // 0xdd @0x9
0x00d4…0130 at000a = ╱38╱8╱ // 0xde @0xa
0x00d4…0130 at000b = ╱fe00008004╱ // 0xdf @0xb
0x00d4…0130 at0010 = ╱ee╱)╱ // 0xe4 @0x10
0x00d4…0130 at0011 = ╱ec╱,╱ // 0xe5 @0x11
0x00d4…0130 at0012 = ╱46╱F╱ // 0xe6 @0x12
0x00d4…0130 at0013 = ╱5d╱Å╱ // 0xe7 @0x13
0x00d4…0130 at0014 = ╱4b╱K╱ // 0xe8 @0x14
0x00d4…0130 at0015 = ╱52╱R╱ // 0xe9 @0x15
0x00d4…0130 at0016 = ╱45╱E╱ // 0xea @0x16
0x00d4…0130 at0017 = ╱44╱D╱ // 0xeb @0x17
0x00d4…0130 at0018 = ╱49╱I╱ // 0xec @0x18
0x00d4…0130 at0019 = ╱54╱T╱ // 0xed @0x19
0x00d4…0130 at001a = ╱ef╱$╱ // 0xee @0x1a
0x00d4…0130 at001b = ╱ed╱(╱ // 0xef @0x1b
0x00d4…0130 at001c = ╱31╱1╱ // 0xf0 @0x1c
0x00d4…0130 at001d = ╱32╱2╱ // 0xf1 @0x1d
0x00d4…0130 at001e = ╱fe0000c004╱ // 0xf2 @0x1e
0x00d4…0130 at0023 = ╱ee╱)╱ // 0xf7 @0x23
0x00d4…0130 at0024 = ╱ec╱,╱ // 0xf8 @0x24
0x00d4…0130 at0025 = ╱46╱F╱ // 0xf9 @0x25
0x00d4…0130 at0026 = ╱5d╱Å╱ // 0xfa @0x26
0x00d4…0130 at0027 = ╱44╱D╱ // 0xfb @0x27
0x00d4…0130 at0028 = ╱45╱E╱ // 0xfc @0x28
0x00d4…0130 at0029 = ╱42╱B╱ // 0xfd @0x29
0x00d4…0130 at002a = ╱45╱E╱ // 0xfe @0x2a
0x00d4…0130 at002b = ╱54╱T╱ // 0xff @0x2b
0x00d4…0130 at002c = ╱ef╱$╱ // 0x100 @0x2c
0x00d4…0130 at002d = ╱ed╱(╱ // 0x101 @0x2d
0x00d4…0130 at002e = ╱31╱1╱ // 0x102 @0x2e
0x00d4…0130 at002f = ╱32╱2╱ // 0x103 @0x2f
0x00d4…0130 at0030 = ╱fe0000c004╱ // 0x104 @0x30
0x00d4…0130 at0035 = ╱ee╱)╱ // 0x109 @0x35
0x00d4…0130 at0036 = ╱ec╱,╱ // 0x10a @0x36
0x00d4…0130 at0037 = ╱46╱F╱ // 0x10b @0x37
0x00d4…0130 at0038 = ╱4d╱M╱ // 0x10c @0x38
0x00d4…0130 at0039 = ╱4b╱K╱ // 0x10d @0x39
0x00d4…0130 at003a = ╱52╱R╱ // 0x10e @0x3a
0x00d4…0130 at003b = ╱45╱E╱ // 0x10f @0x3b
0x00d4…0130 at003c = ╱44╱D╱ // 0x110 @0x3c
0x00d4…0130 at003d = ╱49╱I╱ // 0x111 @0x3d
0x00d4…0130 at003e = ╱54╱T╱ // 0x112 @0x3e
0x00d4…0130 at003f = ╱ef╱$╱ // 0x113 @0x3f
0x00d4…0130 at0040 = ╱ed╱(╱ // 0x114 @0x40
0x00d4…0130 at0041 = ╱31╱1╱ // 0x115 @0x41
0x00d4…0130 at0042 = ╱32╱2╱ // 0x116 @0x42
0x00d4…0130 at0043 = ╱fe0000c004╱ // 0x117 @0x43
0x00d4…0130 at0048 = ╱ee╱)╱ // 0x11c @0x48
0x00d4…0130 at0049 = ╱ec╱,╱ // 0x11d @0x49
0x00d4…0130 at004a = ╱46╱F╱ // 0x11e @0x4a
0x00d4…0130 at004b = ╱4d╱M╱ // 0x11f @0x4b
0x00d4…0130 at004c = ╱44╱D╱ // 0x120 @0x4c
0x00d4…0130 at004d = ╱45╱E╱ // 0x121 @0x4d
0x00d4…0130 at004e = ╱42╱B╱ // 0x122 @0x4e
0x00d4…0130 at004f = ╱45╱E╱ // 0x123 @0x4f
0x00d4…0130 at0050 = ╱54╱T╱ // 0x124 @0x50
0x00d4…0130 at0051 = ╱ef╱$╱ // 0x125 @0x51
0x00d4…0130 at0052 = ╱ed╱(╱ // 0x126 @0x52
0x00d4…0130 at0053 = ╱31╱1╱ // 0x127 @0x53
0x00d4…0130 at0054 = ╱32╱2╱ // 0x128 @0x54
0x00d4…0130 at0055 = ╱fe0000c004╱ // 0x129 @0x55
0x00d4…0130 at005a = ╱ee╱)╱ // 0x12e @0x5a
0x00d4…0130 at005b = EOL // 0x12f @0x5b
0x00d4…0130 }
0x0130…017e 8ed5 0130 DIM FMKODE$(E),FNAVN$(25),FUKODE$(E),SALDO13$(12),SALDO3$(12)
0x0130…017e LineComalBin {
0x0130…017e ptr = 0x8ed5 // 0x130 @0x0
0x0130…017e lno = 0x0082 // 0x132 @0x2
0x0130…017e at0004 = ╱87╱ DIM ╱ // 0x134 @0x4
0x0130…017e at0005 = ╱46╱F╱ // 0x135 @0x5
0x0130…017e at0006 = ╱4d╱M╱ // 0x136 @0x6
0x0130…017e at0007 = ╱4b╱K╱ // 0x137 @0x7
0x0130…017e at0008 = ╱4f╱O╱ // 0x138 @0x8
0x0130…017e at0009 = ╱44╱D╱ // 0x139 @0x9
0x0130…017e at000a = ╱45╱E╱ // 0x13a @0xa
0x0130…017e at000b = ╱ef╱$╱ // 0x13b @0xb
0x0130…017e at000c = ╱ed╱(╱ // 0x13c @0xc
0x0130…017e at000d = ╱45╱E╱ // 0x13d @0xd
0x0130…017e at000e = ╱ee╱)╱ // 0x13e @0xe
0x0130…017e at000f = ╱ec╱,╱ // 0x13f @0xf
0x0130…017e at0010 = ╱46╱F╱ // 0x140 @0x10
0x0130…017e at0011 = ╱4e╱N╱ // 0x141 @0x11
0x0130…017e at0012 = ╱41╱A╱ // 0x142 @0x12
0x0130…017e at0013 = ╱56╱V╱ // 0x143 @0x13
0x0130…017e at0014 = ╱4e╱N╱ // 0x144 @0x14
0x0130…017e at0015 = ╱ef╱$╱ // 0x145 @0x15
0x0130…017e at0016 = ╱ed╱(╱ // 0x146 @0x16
0x0130…017e at0017 = ╱32╱2╱ // 0x147 @0x17
0x0130…017e at0018 = ╱35╱5╱ // 0x148 @0x18
0x0130…017e at0019 = ╱fe0000c805╱ // 0x149 @0x19
0x0130…017e at001e = ╱ee╱)╱ // 0x14e @0x1e
0x0130…017e at001f = ╱ec╱,╱ // 0x14f @0x1f
0x0130…017e at0020 = ╱46╱F╱ // 0x150 @0x20
0x0130…017e at0021 = ╱55╱U╱ // 0x151 @0x21
0x0130…017e at0022 = ╱4b╱K╱ // 0x152 @0x22
0x0130…017e at0023 = ╱4f╱O╱ // 0x153 @0x23
0x0130…017e at0024 = ╱44╱D╱ // 0x154 @0x24
0x0130…017e at0025 = ╱45╱E╱ // 0x155 @0x25
0x0130…017e at0026 = ╱ef╱$╱ // 0x156 @0x26
0x0130…017e at0027 = ╱ed╱(╱ // 0x157 @0x27
0x0130…017e at0028 = ╱45╱E╱ // 0x158 @0x28
0x0130…017e at0029 = ╱ee╱)╱ // 0x159 @0x29
0x0130…017e at002a = ╱ec╱,╱ // 0x15a @0x2a
0x0130…017e at002b = ╱53╱S╱ // 0x15b @0x2b
0x0130…017e at002c = ╱41╱A╱ // 0x15c @0x2c
0x0130…017e at002d = ╱4c╱L╱ // 0x15d @0x2d
0x0130…017e at002e = ╱44╱D╱ // 0x15e @0x2e
0x0130…017e at002f = ╱4f╱O╱ // 0x15f @0x2f
0x0130…017e at0030 = ╱31╱1╱ // 0x160 @0x30
0x0130…017e at0031 = ╱33╱3╱ // 0x161 @0x31
0x0130…017e at0032 = ╱ef╱$╱ // 0x162 @0x32
0x0130…017e at0033 = ╱ed╱(╱ // 0x163 @0x33
0x0130…017e at0034 = ╱31╱1╱ // 0x164 @0x34
0x0130…017e at0035 = ╱32╱2╱ // 0x165 @0x35
0x0130…017e at0036 = ╱fe0000c004╱ // 0x166 @0x36
0x0130…017e at003b = ╱ee╱)╱ // 0x16b @0x3b
0x0130…017e at003c = ╱ec╱,╱ // 0x16c @0x3c
0x0130…017e at003d = ╱53╱S╱ // 0x16d @0x3d
0x0130…017e at003e = ╱41╱A╱ // 0x16e @0x3e
0x0130…017e at003f = ╱4c╱L╱ // 0x16f @0x3f
0x0130…017e at0040 = ╱44╱D╱ // 0x170 @0x40
0x0130…017e at0041 = ╱4f╱O╱ // 0x171 @0x41
0x0130…017e at0042 = ╱33╱3╱ // 0x172 @0x42
0x0130…017e at0043 = ╱ef╱$╱ // 0x173 @0x43
0x0130…017e at0044 = ╱ed╱(╱ // 0x174 @0x44
0x0130…017e at0045 = ╱31╱1╱ // 0x175 @0x45
0x0130…017e at0046 = ╱32╱2╱ // 0x176 @0x46
0x0130…017e at0047 = ╱fe0000c004╱ // 0x177 @0x47
0x0130…017e at004c = ╱ee╱)╱ // 0x17c @0x4c
0x0130…017e at004d = EOL // 0x17d @0x4d
0x0130…017e }
0x017e…01e6 8f3d 0140 DIM SALDO2$(12),SALDO11$(12),SALDO1$(12),SALDO12$(12),SUM$(12),SUM1$(14)
0x017e…01e6 LineComalBin {
0x017e…01e6 ptr = 0x8f3d // 0x17e @0x0
0x017e…01e6 lno = 0x008c // 0x180 @0x2
0x017e…01e6 at0004 = ╱87╱ DIM ╱ // 0x182 @0x4
0x017e…01e6 at0005 = ╱53╱S╱ // 0x183 @0x5
0x017e…01e6 at0006 = ╱41╱A╱ // 0x184 @0x6
0x017e…01e6 at0007 = ╱4c╱L╱ // 0x185 @0x7
0x017e…01e6 at0008 = ╱44╱D╱ // 0x186 @0x8
0x017e…01e6 at0009 = ╱4f╱O╱ // 0x187 @0x9
0x017e…01e6 at000a = ╱32╱2╱ // 0x188 @0xa
0x017e…01e6 at000b = ╱ef╱$╱ // 0x189 @0xb
0x017e…01e6 at000c = ╱ed╱(╱ // 0x18a @0xc
0x017e…01e6 at000d = ╱31╱1╱ // 0x18b @0xd
0x017e…01e6 at000e = ╱32╱2╱ // 0x18c @0xe
0x017e…01e6 at000f = ╱fe0000c004╱ // 0x18d @0xf
0x017e…01e6 at0014 = ╱ee╱)╱ // 0x192 @0x14
0x017e…01e6 at0015 = ╱ec╱,╱ // 0x193 @0x15
0x017e…01e6 at0016 = ╱53╱S╱ // 0x194 @0x16
0x017e…01e6 at0017 = ╱41╱A╱ // 0x195 @0x17
0x017e…01e6 at0018 = ╱4c╱L╱ // 0x196 @0x18
0x017e…01e6 at0019 = ╱44╱D╱ // 0x197 @0x19
0x017e…01e6 at001a = ╱4f╱O╱ // 0x198 @0x1a
0x017e…01e6 at001b = ╱31╱1╱ // 0x199 @0x1b
0x017e…01e6 at001c = ╱31╱1╱ // 0x19a @0x1c
0x017e…01e6 at001d = ╱ef╱$╱ // 0x19b @0x1d
0x017e…01e6 at001e = ╱ed╱(╱ // 0x19c @0x1e
0x017e…01e6 at001f = ╱31╱1╱ // 0x19d @0x1f
0x017e…01e6 at0020 = ╱32╱2╱ // 0x19e @0x20
0x017e…01e6 at0021 = ╱fe0000c004╱ // 0x19f @0x21
0x017e…01e6 at0026 = ╱ee╱)╱ // 0x1a4 @0x26
0x017e…01e6 at0027 = ╱ec╱,╱ // 0x1a5 @0x27
0x017e…01e6 at0028 = ╱53╱S╱ // 0x1a6 @0x28
0x017e…01e6 at0029 = ╱41╱A╱ // 0x1a7 @0x29
0x017e…01e6 at002a = ╱4c╱L╱ // 0x1a8 @0x2a
0x017e…01e6 at002b = ╱44╱D╱ // 0x1a9 @0x2b
0x017e…01e6 at002c = ╱4f╱O╱ // 0x1aa @0x2c
0x017e…01e6 at002d = ╱31╱1╱ // 0x1ab @0x2d
0x017e…01e6 at002e = ╱ef╱$╱ // 0x1ac @0x2e
0x017e…01e6 at002f = ╱ed╱(╱ // 0x1ad @0x2f
0x017e…01e6 at0030 = ╱31╱1╱ // 0x1ae @0x30
0x017e…01e6 at0031 = ╱32╱2╱ // 0x1af @0x31
0x017e…01e6 at0032 = ╱fe0000c004╱ // 0x1b0 @0x32
0x017e…01e6 at0037 = ╱ee╱)╱ // 0x1b5 @0x37
0x017e…01e6 at0038 = ╱ec╱,╱ // 0x1b6 @0x38
0x017e…01e6 at0039 = ╱53╱S╱ // 0x1b7 @0x39
0x017e…01e6 at003a = ╱41╱A╱ // 0x1b8 @0x3a
0x017e…01e6 at003b = ╱4c╱L╱ // 0x1b9 @0x3b
0x017e…01e6 at003c = ╱44╱D╱ // 0x1ba @0x3c
0x017e…01e6 at003d = ╱4f╱O╱ // 0x1bb @0x3d
0x017e…01e6 at003e = ╱31╱1╱ // 0x1bc @0x3e
0x017e…01e6 at003f = ╱32╱2╱ // 0x1bd @0x3f
0x017e…01e6 at0040 = ╱ef╱$╱ // 0x1be @0x40
0x017e…01e6 at0041 = ╱ed╱(╱ // 0x1bf @0x41
0x017e…01e6 at0042 = ╱31╱1╱ // 0x1c0 @0x42
0x017e…01e6 at0043 = ╱32╱2╱ // 0x1c1 @0x43
0x017e…01e6 at0044 = ╱fe0000c004╱ // 0x1c2 @0x44
0x017e…01e6 at0049 = ╱ee╱)╱ // 0x1c7 @0x49
0x017e…01e6 at004a = ╱ec╱,╱ // 0x1c8 @0x4a
0x017e…01e6 at004b = ╱53╱S╱ // 0x1c9 @0x4b
0x017e…01e6 at004c = ╱55╱U╱ // 0x1ca @0x4c
0x017e…01e6 at004d = ╱4d╱M╱ // 0x1cb @0x4d
0x017e…01e6 at004e = ╱ef╱$╱ // 0x1cc @0x4e
0x017e…01e6 at004f = ╱ed╱(╱ // 0x1cd @0x4f
0x017e…01e6 at0050 = ╱31╱1╱ // 0x1ce @0x50
0x017e…01e6 at0051 = ╱32╱2╱ // 0x1cf @0x51
0x017e…01e6 at0052 = ╱fe0000c004╱ // 0x1d0 @0x52
0x017e…01e6 at0057 = ╱ee╱)╱ // 0x1d5 @0x57
0x017e…01e6 at0058 = ╱ec╱,╱ // 0x1d6 @0x58
0x017e…01e6 at0059 = ╱53╱S╱ // 0x1d7 @0x59
0x017e…01e6 at005a = ╱55╱U╱ // 0x1d8 @0x5a
0x017e…01e6 at005b = ╱4d╱M╱ // 0x1d9 @0x5b
0x017e…01e6 at005c = ╱31╱1╱ // 0x1da @0x5c
0x017e…01e6 at005d = ╱ef╱$╱ // 0x1db @0x5d
0x017e…01e6 at005e = ╱ed╱(╱ // 0x1dc @0x5e
0x017e…01e6 at005f = ╱31╱1╱ // 0x1dd @0x5f
0x017e…01e6 at0060 = ╱34╱4╱ // 0x1de @0x60
0x017e…01e6 at0061 = ╱fe0000e004╱ // 0x1df @0x61
0x017e…01e6 at0066 = ╱ee╱)╱ // 0x1e4 @0x66
0x017e…01e6 at0067 = EOL // 0x1e5 @0x67
0x017e…01e6 }
0x01e6…0248 8f9f 0150 DIM K2$(17),K3$(17),K4$(17),K5$(17),T1(W),LAND$(W,12),DEBNAVN$(25)
0x01e6…0248 LineComalBin {
0x01e6…0248 ptr = 0x8f9f // 0x1e6 @0x0
0x01e6…0248 lno = 0x0096 // 0x1e8 @0x2
0x01e6…0248 at0004 = ╱87╱ DIM ╱ // 0x1ea @0x4
0x01e6…0248 at0005 = ╱4b╱K╱ // 0x1eb @0x5
0x01e6…0248 at0006 = ╱32╱2╱ // 0x1ec @0x6
0x01e6…0248 at0007 = ╱ef╱$╱ // 0x1ed @0x7
0x01e6…0248 at0008 = ╱ed╱(╱ // 0x1ee @0x8
0x01e6…0248 at0009 = ╱31╱1╱ // 0x1ef @0x9
0x01e6…0248 at000a = ╱37╱7╱ // 0x1f0 @0xa
0x01e6…0248 at000b = ╱fe00008805╱ // 0x1f1 @0xb
0x01e6…0248 at0010 = ╱ee╱)╱ // 0x1f6 @0x10
0x01e6…0248 at0011 = ╱ec╱,╱ // 0x1f7 @0x11
0x01e6…0248 at0012 = ╱4b╱K╱ // 0x1f8 @0x12
0x01e6…0248 at0013 = ╱33╱3╱ // 0x1f9 @0x13
0x01e6…0248 at0014 = ╱ef╱$╱ // 0x1fa @0x14
0x01e6…0248 at0015 = ╱ed╱(╱ // 0x1fb @0x15
0x01e6…0248 at0016 = ╱31╱1╱ // 0x1fc @0x16
0x01e6…0248 at0017 = ╱37╱7╱ // 0x1fd @0x17
0x01e6…0248 at0018 = ╱fe00008805╱ // 0x1fe @0x18
0x01e6…0248 at001d = ╱ee╱)╱ // 0x203 @0x1d
0x01e6…0248 at001e = ╱ec╱,╱ // 0x204 @0x1e
0x01e6…0248 at001f = ╱4b╱K╱ // 0x205 @0x1f
0x01e6…0248 at0020 = ╱34╱4╱ // 0x206 @0x20
0x01e6…0248 at0021 = ╱ef╱$╱ // 0x207 @0x21
0x01e6…0248 at0022 = ╱ed╱(╱ // 0x208 @0x22
0x01e6…0248 at0023 = ╱31╱1╱ // 0x209 @0x23
0x01e6…0248 at0024 = ╱37╱7╱ // 0x20a @0x24
0x01e6…0248 at0025 = ╱fe00008805╱ // 0x20b @0x25
0x01e6…0248 at002a = ╱ee╱)╱ // 0x210 @0x2a
0x01e6…0248 at002b = ╱ec╱,╱ // 0x211 @0x2b
0x01e6…0248 at002c = ╱4b╱K╱ // 0x212 @0x2c
0x01e6…0248 at002d = ╱35╱5╱ // 0x213 @0x2d
0x01e6…0248 at002e = ╱ef╱$╱ // 0x214 @0x2e
0x01e6…0248 at002f = ╱ed╱(╱ // 0x215 @0x2f
0x01e6…0248 at0030 = ╱31╱1╱ // 0x216 @0x30
0x01e6…0248 at0031 = ╱37╱7╱ // 0x217 @0x31
0x01e6…0248 at0032 = ╱fe00008805╱ // 0x218 @0x32
0x01e6…0248 at0037 = ╱ee╱)╱ // 0x21d @0x37
0x01e6…0248 at0038 = ╱ec╱,╱ // 0x21e @0x38
0x01e6…0248 at0039 = ╱54╱T╱ // 0x21f @0x39
0x01e6…0248 at003a = ╱31╱1╱ // 0x220 @0x3a
0x01e6…0248 at003b = ╱ed╱(╱ // 0x221 @0x3b
0x01e6…0248 at003c = ╱57╱W╱ // 0x222 @0x3c
0x01e6…0248 at003d = ╱ee╱)╱ // 0x223 @0x3d
0x01e6…0248 at003e = ╱ec╱,╱ // 0x224 @0x3e
0x01e6…0248 at003f = ╱4c╱L╱ // 0x225 @0x3f
0x01e6…0248 at0040 = ╱41╱A╱ // 0x226 @0x40
0x01e6…0248 at0041 = ╱4e╱N╱ // 0x227 @0x41
0x01e6…0248 at0042 = ╱44╱D╱ // 0x228 @0x42
0x01e6…0248 at0043 = ╱ef╱$╱ // 0x229 @0x43
0x01e6…0248 at0044 = ╱ed╱(╱ // 0x22a @0x44
0x01e6…0248 at0045 = ╱57╱W╱ // 0x22b @0x45
0x01e6…0248 at0046 = ╱ec╱,╱ // 0x22c @0x46
0x01e6…0248 at0047 = ╱31╱1╱ // 0x22d @0x47
0x01e6…0248 at0048 = ╱32╱2╱ // 0x22e @0x48
0x01e6…0248 at0049 = ╱fe0000c004╱ // 0x22f @0x49
0x01e6…0248 at004e = ╱ee╱)╱ // 0x234 @0x4e
0x01e6…0248 at004f = ╱ec╱,╱ // 0x235 @0x4f
0x01e6…0248 at0050 = ╱44╱D╱ // 0x236 @0x50
0x01e6…0248 at0051 = ╱45╱E╱ // 0x237 @0x51
0x01e6…0248 at0052 = ╱42╱B╱ // 0x238 @0x52
0x01e6…0248 at0053 = ╱4e╱N╱ // 0x239 @0x53
0x01e6…0248 at0054 = ╱41╱A╱ // 0x23a @0x54
0x01e6…0248 at0055 = ╱56╱V╱ // 0x23b @0x55
0x01e6…0248 at0056 = ╱4e╱N╱ // 0x23c @0x56
0x01e6…0248 at0057 = ╱ef╱$╱ // 0x23d @0x57
0x01e6…0248 at0058 = ╱ed╱(╱ // 0x23e @0x58
0x01e6…0248 at0059 = ╱32╱2╱ // 0x23f @0x59
0x01e6…0248 at005a = ╱35╱5╱ // 0x240 @0x5a
0x01e6…0248 at005b = ╱fe0000c805╱ // 0x241 @0x5b
0x01e6…0248 at0060 = ╱ee╱)╱ // 0x246 @0x60
0x01e6…0248 at0061 = EOL // 0x247 @0x61
0x01e6…0248 }
0x0248…02a0 8ff7 0160 DIM DSALDO1$(12),DEBKGR$(E),DSALDO2$(12),DSALDO3$(12),DSALDO4$(12)
0x0248…02a0 LineComalBin {
0x0248…02a0 ptr = 0x8ff7 // 0x248 @0x0
0x0248…02a0 lno = 0x00a0 // 0x24a @0x2
0x0248…02a0 at0004 = ╱87╱ DIM ╱ // 0x24c @0x4
0x0248…02a0 at0005 = ╱44╱D╱ // 0x24d @0x5
0x0248…02a0 at0006 = ╱53╱S╱ // 0x24e @0x6
0x0248…02a0 at0007 = ╱41╱A╱ // 0x24f @0x7
0x0248…02a0 at0008 = ╱4c╱L╱ // 0x250 @0x8
0x0248…02a0 at0009 = ╱44╱D╱ // 0x251 @0x9
0x0248…02a0 at000a = ╱4f╱O╱ // 0x252 @0xa
0x0248…02a0 at000b = ╱31╱1╱ // 0x253 @0xb
0x0248…02a0 at000c = ╱ef╱$╱ // 0x254 @0xc
0x0248…02a0 at000d = ╱ed╱(╱ // 0x255 @0xd
0x0248…02a0 at000e = ╱31╱1╱ // 0x256 @0xe
0x0248…02a0 at000f = ╱32╱2╱ // 0x257 @0xf
0x0248…02a0 at0010 = ╱fe0000c004╱ // 0x258 @0x10
0x0248…02a0 at0015 = ╱ee╱)╱ // 0x25d @0x15
0x0248…02a0 at0016 = ╱ec╱,╱ // 0x25e @0x16
0x0248…02a0 at0017 = ╱44╱D╱ // 0x25f @0x17
0x0248…02a0 at0018 = ╱45╱E╱ // 0x260 @0x18
0x0248…02a0 at0019 = ╱42╱B╱ // 0x261 @0x19
0x0248…02a0 at001a = ╱4b╱K╱ // 0x262 @0x1a
0x0248…02a0 at001b = ╱47╱G╱ // 0x263 @0x1b
0x0248…02a0 at001c = ╱52╱R╱ // 0x264 @0x1c
0x0248…02a0 at001d = ╱ef╱$╱ // 0x265 @0x1d
0x0248…02a0 at001e = ╱ed╱(╱ // 0x266 @0x1e
0x0248…02a0 at001f = ╱45╱E╱ // 0x267 @0x1f
0x0248…02a0 at0020 = ╱ee╱)╱ // 0x268 @0x20
0x0248…02a0 at0021 = ╱ec╱,╱ // 0x269 @0x21
0x0248…02a0 at0022 = ╱44╱D╱ // 0x26a @0x22
0x0248…02a0 at0023 = ╱53╱S╱ // 0x26b @0x23
0x0248…02a0 at0024 = ╱41╱A╱ // 0x26c @0x24
0x0248…02a0 at0025 = ╱4c╱L╱ // 0x26d @0x25
0x0248…02a0 at0026 = ╱44╱D╱ // 0x26e @0x26
0x0248…02a0 at0027 = ╱4f╱O╱ // 0x26f @0x27
0x0248…02a0 at0028 = ╱32╱2╱ // 0x270 @0x28
0x0248…02a0 at0029 = ╱ef╱$╱ // 0x271 @0x29
0x0248…02a0 at002a = ╱ed╱(╱ // 0x272 @0x2a
0x0248…02a0 at002b = ╱31╱1╱ // 0x273 @0x2b
0x0248…02a0 at002c = ╱32╱2╱ // 0x274 @0x2c
0x0248…02a0 at002d = ╱fe0000c004╱ // 0x275 @0x2d
0x0248…02a0 at0032 = ╱ee╱)╱ // 0x27a @0x32
0x0248…02a0 at0033 = ╱ec╱,╱ // 0x27b @0x33
0x0248…02a0 at0034 = ╱44╱D╱ // 0x27c @0x34
0x0248…02a0 at0035 = ╱53╱S╱ // 0x27d @0x35
0x0248…02a0 at0036 = ╱41╱A╱ // 0x27e @0x36
0x0248…02a0 at0037 = ╱4c╱L╱ // 0x27f @0x37
0x0248…02a0 at0038 = ╱44╱D╱ // 0x280 @0x38
0x0248…02a0 at0039 = ╱4f╱O╱ // 0x281 @0x39
0x0248…02a0 at003a = ╱33╱3╱ // 0x282 @0x3a
0x0248…02a0 at003b = ╱ef╱$╱ // 0x283 @0x3b
0x0248…02a0 at003c = ╱ed╱(╱ // 0x284 @0x3c
0x0248…02a0 at003d = ╱31╱1╱ // 0x285 @0x3d
0x0248…02a0 at003e = ╱32╱2╱ // 0x286 @0x3e
0x0248…02a0 at003f = ╱fe0000c004╱ // 0x287 @0x3f
0x0248…02a0 at0044 = ╱ee╱)╱ // 0x28c @0x44
0x0248…02a0 at0045 = ╱ec╱,╱ // 0x28d @0x45
0x0248…02a0 at0046 = ╱44╱D╱ // 0x28e @0x46
0x0248…02a0 at0047 = ╱53╱S╱ // 0x28f @0x47
0x0248…02a0 at0048 = ╱41╱A╱ // 0x290 @0x48
0x0248…02a0 at0049 = ╱4c╱L╱ // 0x291 @0x49
0x0248…02a0 at004a = ╱44╱D╱ // 0x292 @0x4a
0x0248…02a0 at004b = ╱4f╱O╱ // 0x293 @0x4b
0x0248…02a0 at004c = ╱34╱4╱ // 0x294 @0x4c
0x0248…02a0 at004d = ╱ef╱$╱ // 0x295 @0x4d
0x0248…02a0 at004e = ╱ed╱(╱ // 0x296 @0x4e
0x0248…02a0 at004f = ╱31╱1╱ // 0x297 @0x4f
0x0248…02a0 at0050 = ╱32╱2╱ // 0x298 @0x50
0x0248…02a0 at0051 = ╱fe0000c004╱ // 0x299 @0x51
0x0248…02a0 at0056 = ╱ee╱)╱ // 0x29e @0x56
0x0248…02a0 at0057 = EOL // 0x29f @0x57
0x0248…02a0 }
0x02a0…0301 9058 0170 DIM DEBLK$(E),DEBBY$(20),ÅRKØB$(12),MDNKØB$(12),TÅRKØB$(12),SALDO$(12)
0x02a0…0301 LineComalBin {
0x02a0…0301 ptr = 0x9058 // 0x2a0 @0x0
0x02a0…0301 lno = 0x00aa // 0x2a2 @0x2
0x02a0…0301 at0004 = ╱87╱ DIM ╱ // 0x2a4 @0x4
0x02a0…0301 at0005 = ╱44╱D╱ // 0x2a5 @0x5
0x02a0…0301 at0006 = ╱45╱E╱ // 0x2a6 @0x6
0x02a0…0301 at0007 = ╱42╱B╱ // 0x2a7 @0x7
0x02a0…0301 at0008 = ╱4c╱L╱ // 0x2a8 @0x8
0x02a0…0301 at0009 = ╱4b╱K╱ // 0x2a9 @0x9
0x02a0…0301 at000a = ╱ef╱$╱ // 0x2aa @0xa
0x02a0…0301 at000b = ╱ed╱(╱ // 0x2ab @0xb
0x02a0…0301 at000c = ╱45╱E╱ // 0x2ac @0xc
0x02a0…0301 at000d = ╱ee╱)╱ // 0x2ad @0xd
0x02a0…0301 at000e = ╱ec╱,╱ // 0x2ae @0xe
0x02a0…0301 at000f = ╱44╱D╱ // 0x2af @0xf
0x02a0…0301 at0010 = ╱45╱E╱ // 0x2b0 @0x10
0x02a0…0301 at0011 = ╱42╱B╱ // 0x2b1 @0x11
0x02a0…0301 at0012 = ╱42╱B╱ // 0x2b2 @0x12
0x02a0…0301 at0013 = ╱59╱Y╱ // 0x2b3 @0x13
0x02a0…0301 at0014 = ╱ef╱$╱ // 0x2b4 @0x14
0x02a0…0301 at0015 = ╱ed╱(╱ // 0x2b5 @0x15
0x02a0…0301 at0016 = ╱32╱2╱ // 0x2b6 @0x16
0x02a0…0301 at0017 = ╱30╱0╱ // 0x2b7 @0x17
0x02a0…0301 at0018 = ╱fe0000a005╱ // 0x2b8 @0x18
0x02a0…0301 at001d = ╱ee╱)╱ // 0x2bd @0x1d
0x02a0…0301 at001e = ╱ec╱,╱ // 0x2be @0x1e
0x02a0…0301 at001f = ╱5d╱Å╱ // 0x2bf @0x1f
0x02a0…0301 at0020 = ╱52╱R╱ // 0x2c0 @0x20
0x02a0…0301 at0021 = ╱4b╱K╱ // 0x2c1 @0x21
0x02a0…0301 at0022 = ╱5c╱Ø╱ // 0x2c2 @0x22
0x02a0…0301 at0023 = ╱42╱B╱ // 0x2c3 @0x23
0x02a0…0301 at0024 = ╱ef╱$╱ // 0x2c4 @0x24
0x02a0…0301 at0025 = ╱ed╱(╱ // 0x2c5 @0x25
0x02a0…0301 at0026 = ╱31╱1╱ // 0x2c6 @0x26
0x02a0…0301 at0027 = ╱32╱2╱ // 0x2c7 @0x27
0x02a0…0301 at0028 = ╱fe0000c004╱ // 0x2c8 @0x28
0x02a0…0301 at002d = ╱ee╱)╱ // 0x2cd @0x2d
0x02a0…0301 at002e = ╱ec╱,╱ // 0x2ce @0x2e
0x02a0…0301 at002f = ╱4d╱M╱ // 0x2cf @0x2f
0x02a0…0301 at0030 = ╱44╱D╱ // 0x2d0 @0x30
0x02a0…0301 at0031 = ╱4e╱N╱ // 0x2d1 @0x31
0x02a0…0301 at0032 = ╱4b╱K╱ // 0x2d2 @0x32
0x02a0…0301 at0033 = ╱5c╱Ø╱ // 0x2d3 @0x33
0x02a0…0301 at0034 = ╱42╱B╱ // 0x2d4 @0x34
0x02a0…0301 at0035 = ╱ef╱$╱ // 0x2d5 @0x35
0x02a0…0301 at0036 = ╱ed╱(╱ // 0x2d6 @0x36
0x02a0…0301 at0037 = ╱31╱1╱ // 0x2d7 @0x37
0x02a0…0301 at0038 = ╱32╱2╱ // 0x2d8 @0x38
0x02a0…0301 at0039 = ╱fe0000c004╱ // 0x2d9 @0x39
0x02a0…0301 at003e = ╱ee╱)╱ // 0x2de @0x3e
0x02a0…0301 at003f = ╱ec╱,╱ // 0x2df @0x3f
0x02a0…0301 at0040 = ╱54╱T╱ // 0x2e0 @0x40
0x02a0…0301 at0041 = ╱5d╱Å╱ // 0x2e1 @0x41
0x02a0…0301 at0042 = ╱52╱R╱ // 0x2e2 @0x42
0x02a0…0301 at0043 = ╱4b╱K╱ // 0x2e3 @0x43
0x02a0…0301 at0044 = ╱5c╱Ø╱ // 0x2e4 @0x44
0x02a0…0301 at0045 = ╱42╱B╱ // 0x2e5 @0x45
0x02a0…0301 at0046 = ╱ef╱$╱ // 0x2e6 @0x46
0x02a0…0301 at0047 = ╱ed╱(╱ // 0x2e7 @0x47
0x02a0…0301 at0048 = ╱31╱1╱ // 0x2e8 @0x48
0x02a0…0301 at0049 = ╱32╱2╱ // 0x2e9 @0x49
0x02a0…0301 at004a = ╱fe0000c004╱ // 0x2ea @0x4a
0x02a0…0301 at004f = ╱ee╱)╱ // 0x2ef @0x4f
0x02a0…0301 at0050 = ╱ec╱,╱ // 0x2f0 @0x50
0x02a0…0301 at0051 = ╱53╱S╱ // 0x2f1 @0x51
0x02a0…0301 at0052 = ╱41╱A╱ // 0x2f2 @0x52
0x02a0…0301 at0053 = ╱4c╱L╱ // 0x2f3 @0x53
0x02a0…0301 at0054 = ╱44╱D╱ // 0x2f4 @0x54
0x02a0…0301 at0055 = ╱4f╱O╱ // 0x2f5 @0x55
0x02a0…0301 at0056 = ╱ef╱$╱ // 0x2f6 @0x56
0x02a0…0301 at0057 = ╱ed╱(╱ // 0x2f7 @0x57
0x02a0…0301 at0058 = ╱31╱1╱ // 0x2f8 @0x58
0x02a0…0301 at0059 = ╱32╱2╱ // 0x2f9 @0x59
0x02a0…0301 at005a = ╱fe0000c004╱ // 0x2fa @0x5a
0x02a0…0301 at005f = ╱ee╱)╱ // 0x2ff @0x5f
0x02a0…0301 at0060 = EOL // 0x300 @0x60
0x02a0…0301 }
0x0301…034d 90a4 0180 DIM TOKØB$(12),TOSALDO1$(12),K$(26,11),KREBY$(20)
0x0301…034d LineComalBin {
0x0301…034d ptr = 0x90a4 // 0x301 @0x0
0x0301…034d lno = 0x00b4 // 0x303 @0x2
0x0301…034d at0004 = ╱87╱ DIM ╱ // 0x305 @0x4
0x0301…034d at0005 = ╱54╱T╱ // 0x306 @0x5
0x0301…034d at0006 = ╱4f╱O╱ // 0x307 @0x6
0x0301…034d at0007 = ╱4b╱K╱ // 0x308 @0x7
0x0301…034d at0008 = ╱5c╱Ø╱ // 0x309 @0x8
0x0301…034d at0009 = ╱42╱B╱ // 0x30a @0x9
0x0301…034d at000a = ╱ef╱$╱ // 0x30b @0xa
0x0301…034d at000b = ╱ed╱(╱ // 0x30c @0xb
0x0301…034d at000c = ╱31╱1╱ // 0x30d @0xc
0x0301…034d at000d = ╱32╱2╱ // 0x30e @0xd
0x0301…034d at000e = ╱fe0000c004╱ // 0x30f @0xe
0x0301…034d at0013 = ╱ee╱)╱ // 0x314 @0x13
0x0301…034d at0014 = ╱ec╱,╱ // 0x315 @0x14
0x0301…034d at0015 = ╱54╱T╱ // 0x316 @0x15
0x0301…034d at0016 = ╱4f╱O╱ // 0x317 @0x16
0x0301…034d at0017 = ╱53╱S╱ // 0x318 @0x17
0x0301…034d at0018 = ╱41╱A╱ // 0x319 @0x18
0x0301…034d at0019 = ╱4c╱L╱ // 0x31a @0x19
0x0301…034d at001a = ╱44╱D╱ // 0x31b @0x1a
0x0301…034d at001b = ╱4f╱O╱ // 0x31c @0x1b
0x0301…034d at001c = ╱31╱1╱ // 0x31d @0x1c
0x0301…034d at001d = ╱ef╱$╱ // 0x31e @0x1d
0x0301…034d at001e = ╱ed╱(╱ // 0x31f @0x1e
0x0301…034d at001f = ╱31╱1╱ // 0x320 @0x1f
0x0301…034d at0020 = ╱32╱2╱ // 0x321 @0x20
0x0301…034d at0021 = ╱fe0000c004╱ // 0x322 @0x21
0x0301…034d at0026 = ╱ee╱)╱ // 0x327 @0x26
0x0301…034d at0027 = ╱ec╱,╱ // 0x328 @0x27
0x0301…034d at0028 = ╱4b╱K╱ // 0x329 @0x28
0x0301…034d at0029 = ╱ef╱$╱ // 0x32a @0x29
0x0301…034d at002a = ╱ed╱(╱ // 0x32b @0x2a
0x0301…034d at002b = ╱32╱2╱ // 0x32c @0x2b
0x0301…034d at002c = ╱36╱6╱ // 0x32d @0x2c
0x0301…034d at002d = ╱fe0000d005╱ // 0x32e @0x2d
0x0301…034d at0032 = ╱ec╱,╱ // 0x333 @0x32
0x0301…034d at0033 = ╱31╱1╱ // 0x334 @0x33
0x0301…034d at0034 = ╱31╱1╱ // 0x335 @0x34
0x0301…034d at0035 = ╱fe0000b004╱ // 0x336 @0x35
0x0301…034d at003a = ╱ee╱)╱ // 0x33b @0x3a
0x0301…034d at003b = ╱ec╱,╱ // 0x33c @0x3b
0x0301…034d at003c = ╱4b╱K╱ // 0x33d @0x3c
0x0301…034d at003d = ╱52╱R╱ // 0x33e @0x3d
0x0301…034d at003e = ╱45╱E╱ // 0x33f @0x3e
0x0301…034d at003f = ╱42╱B╱ // 0x340 @0x3f
0x0301…034d at0040 = ╱59╱Y╱ // 0x341 @0x40
0x0301…034d at0041 = ╱ef╱$╱ // 0x342 @0x41
0x0301…034d at0042 = ╱ed╱(╱ // 0x343 @0x42
0x0301…034d at0043 = ╱32╱2╱ // 0x344 @0x43
0x0301…034d at0044 = ╱30╱0╱ // 0x345 @0x44
0x0301…034d at0045 = ╱fe0000a005╱ // 0x346 @0x45
0x0301…034d at004a = ╱ee╱)╱ // 0x34b @0x4a
0x0301…034d at004b = EOL // 0x34c @0x4b
0x0301…034d }
0x034d…0390 90e7 0190 DIM TOSALDO$(12),KRELK$(E),KREGR$(E),KSALDO1$(12),T2(W)
0x034d…0390 LineComalBin {
0x034d…0390 ptr = 0x90e7 // 0x34d @0x0
0x034d…0390 lno = 0x00be // 0x34f @0x2
0x034d…0390 at0004 = ╱87╱ DIM ╱ // 0x351 @0x4
0x034d…0390 at0005 = ╱54╱T╱ // 0x352 @0x5
0x034d…0390 at0006 = ╱4f╱O╱ // 0x353 @0x6
0x034d…0390 at0007 = ╱53╱S╱ // 0x354 @0x7
0x034d…0390 at0008 = ╱41╱A╱ // 0x355 @0x8
0x034d…0390 at0009 = ╱4c╱L╱ // 0x356 @0x9
0x034d…0390 at000a = ╱44╱D╱ // 0x357 @0xa
0x034d…0390 at000b = ╱4f╱O╱ // 0x358 @0xb
0x034d…0390 at000c = ╱ef╱$╱ // 0x359 @0xc
0x034d…0390 at000d = ╱ed╱(╱ // 0x35a @0xd
0x034d…0390 at000e = ╱31╱1╱ // 0x35b @0xe
0x034d…0390 at000f = ╱32╱2╱ // 0x35c @0xf
0x034d…0390 at0010 = ╱fe0000c004╱ // 0x35d @0x10
0x034d…0390 at0015 = ╱ee╱)╱ // 0x362 @0x15
0x034d…0390 at0016 = ╱ec╱,╱ // 0x363 @0x16
0x034d…0390 at0017 = ╱4b╱K╱ // 0x364 @0x17
0x034d…0390 at0018 = ╱52╱R╱ // 0x365 @0x18
0x034d…0390 at0019 = ╱45╱E╱ // 0x366 @0x19
0x034d…0390 at001a = ╱4c╱L╱ // 0x367 @0x1a
0x034d…0390 at001b = ╱4b╱K╱ // 0x368 @0x1b
0x034d…0390 at001c = ╱ef╱$╱ // 0x369 @0x1c
0x034d…0390 at001d = ╱ed╱(╱ // 0x36a @0x1d
0x034d…0390 at001e = ╱45╱E╱ // 0x36b @0x1e
0x034d…0390 at001f = ╱ee╱)╱ // 0x36c @0x1f
0x034d…0390 at0020 = ╱ec╱,╱ // 0x36d @0x20
0x034d…0390 at0021 = ╱4b╱K╱ // 0x36e @0x21
0x034d…0390 at0022 = ╱52╱R╱ // 0x36f @0x22
0x034d…0390 at0023 = ╱45╱E╱ // 0x370 @0x23
0x034d…0390 at0024 = ╱47╱G╱ // 0x371 @0x24
0x034d…0390 at0025 = ╱52╱R╱ // 0x372 @0x25
0x034d…0390 at0026 = ╱ef╱$╱ // 0x373 @0x26
0x034d…0390 at0027 = ╱ed╱(╱ // 0x374 @0x27
0x034d…0390 at0028 = ╱45╱E╱ // 0x375 @0x28
0x034d…0390 at0029 = ╱ee╱)╱ // 0x376 @0x29
0x034d…0390 at002a = ╱ec╱,╱ // 0x377 @0x2a
0x034d…0390 at002b = ╱4b╱K╱ // 0x378 @0x2b
0x034d…0390 at002c = ╱53╱S╱ // 0x379 @0x2c
0x034d…0390 at002d = ╱41╱A╱ // 0x37a @0x2d
0x034d…0390 at002e = ╱4c╱L╱ // 0x37b @0x2e
0x034d…0390 at002f = ╱44╱D╱ // 0x37c @0x2f
0x034d…0390 at0030 = ╱4f╱O╱ // 0x37d @0x30
0x034d…0390 at0031 = ╱31╱1╱ // 0x37e @0x31
0x034d…0390 at0032 = ╱ef╱$╱ // 0x37f @0x32
0x034d…0390 at0033 = ╱ed╱(╱ // 0x380 @0x33
0x034d…0390 at0034 = ╱31╱1╱ // 0x381 @0x34
0x034d…0390 at0035 = ╱32╱2╱ // 0x382 @0x35
0x034d…0390 at0036 = ╱fe0000c004╱ // 0x383 @0x36
0x034d…0390 at003b = ╱ee╱)╱ // 0x388 @0x3b
0x034d…0390 at003c = ╱ec╱,╱ // 0x389 @0x3c
0x034d…0390 at003d = ╱54╱T╱ // 0x38a @0x3d
0x034d…0390 at003e = ╱32╱2╱ // 0x38b @0x3e
0x034d…0390 at003f = ╱ed╱(╱ // 0x38c @0x3f
0x034d…0390 at0040 = ╱57╱W╱ // 0x38d @0x40
0x034d…0390 at0041 = ╱ee╱)╱ // 0x38e @0x41
0x034d…0390 at0042 = EOL // 0x38f @0x42
0x034d…0390 }
0x0390…03f2 9149 0200 DIM KSALDO2$(12),K10$(17),K6$(17),K7$(17),K9$(17),K8$(17),TYPE$(E)
0x0390…03f2 LineComalBin {
0x0390…03f2 ptr = 0x9149 // 0x390 @0x0
0x0390…03f2 lno = 0x00c8 // 0x392 @0x2
0x0390…03f2 at0004 = ╱87╱ DIM ╱ // 0x394 @0x4
0x0390…03f2 at0005 = ╱4b╱K╱ // 0x395 @0x5
0x0390…03f2 at0006 = ╱53╱S╱ // 0x396 @0x6
0x0390…03f2 at0007 = ╱41╱A╱ // 0x397 @0x7
0x0390…03f2 at0008 = ╱4c╱L╱ // 0x398 @0x8
0x0390…03f2 at0009 = ╱44╱D╱ // 0x399 @0x9
0x0390…03f2 at000a = ╱4f╱O╱ // 0x39a @0xa
0x0390…03f2 at000b = ╱32╱2╱ // 0x39b @0xb
0x0390…03f2 at000c = ╱ef╱$╱ // 0x39c @0xc
0x0390…03f2 at000d = ╱ed╱(╱ // 0x39d @0xd
0x0390…03f2 at000e = ╱31╱1╱ // 0x39e @0xe
0x0390…03f2 at000f = ╱32╱2╱ // 0x39f @0xf
0x0390…03f2 at0010 = ╱fe0000c004╱ // 0x3a0 @0x10
0x0390…03f2 at0015 = ╱ee╱)╱ // 0x3a5 @0x15
0x0390…03f2 at0016 = ╱ec╱,╱ // 0x3a6 @0x16
0x0390…03f2 at0017 = ╱4b╱K╱ // 0x3a7 @0x17
0x0390…03f2 at0018 = ╱31╱1╱ // 0x3a8 @0x18
0x0390…03f2 at0019 = ╱30╱0╱ // 0x3a9 @0x19
0x0390…03f2 at001a = ╱ef╱$╱ // 0x3aa @0x1a
0x0390…03f2 at001b = ╱ed╱(╱ // 0x3ab @0x1b
0x0390…03f2 at001c = ╱31╱1╱ // 0x3ac @0x1c
0x0390…03f2 at001d = ╱37╱7╱ // 0x3ad @0x1d
0x0390…03f2 at001e = ╱fe00008805╱ // 0x3ae @0x1e
0x0390…03f2 at0023 = ╱ee╱)╱ // 0x3b3 @0x23
0x0390…03f2 at0024 = ╱ec╱,╱ // 0x3b4 @0x24
0x0390…03f2 at0025 = ╱4b╱K╱ // 0x3b5 @0x25
0x0390…03f2 at0026 = ╱36╱6╱ // 0x3b6 @0x26
0x0390…03f2 at0027 = ╱ef╱$╱ // 0x3b7 @0x27
0x0390…03f2 at0028 = ╱ed╱(╱ // 0x3b8 @0x28
0x0390…03f2 at0029 = ╱31╱1╱ // 0x3b9 @0x29
0x0390…03f2 at002a = ╱37╱7╱ // 0x3ba @0x2a
0x0390…03f2 at002b = ╱fe00008805╱ // 0x3bb @0x2b
0x0390…03f2 at0030 = ╱ee╱)╱ // 0x3c0 @0x30
0x0390…03f2 at0031 = ╱ec╱,╱ // 0x3c1 @0x31
0x0390…03f2 at0032 = ╱4b╱K╱ // 0x3c2 @0x32
0x0390…03f2 at0033 = ╱37╱7╱ // 0x3c3 @0x33
0x0390…03f2 at0034 = ╱ef╱$╱ // 0x3c4 @0x34
0x0390…03f2 at0035 = ╱ed╱(╱ // 0x3c5 @0x35
0x0390…03f2 at0036 = ╱31╱1╱ // 0x3c6 @0x36
0x0390…03f2 at0037 = ╱37╱7╱ // 0x3c7 @0x37
0x0390…03f2 at0038 = ╱fe00008805╱ // 0x3c8 @0x38
0x0390…03f2 at003d = ╱ee╱)╱ // 0x3cd @0x3d
0x0390…03f2 at003e = ╱ec╱,╱ // 0x3ce @0x3e
0x0390…03f2 at003f = ╱4b╱K╱ // 0x3cf @0x3f
0x0390…03f2 at0040 = ╱39╱9╱ // 0x3d0 @0x40
0x0390…03f2 at0041 = ╱ef╱$╱ // 0x3d1 @0x41
0x0390…03f2 at0042 = ╱ed╱(╱ // 0x3d2 @0x42
0x0390…03f2 at0043 = ╱31╱1╱ // 0x3d3 @0x43
0x0390…03f2 at0044 = ╱37╱7╱ // 0x3d4 @0x44
0x0390…03f2 at0045 = ╱fe00008805╱ // 0x3d5 @0x45
0x0390…03f2 at004a = ╱ee╱)╱ // 0x3da @0x4a
0x0390…03f2 at004b = ╱ec╱,╱ // 0x3db @0x4b
0x0390…03f2 at004c = ╱4b╱K╱ // 0x3dc @0x4c
0x0390…03f2 at004d = ╱38╱8╱ // 0x3dd @0x4d
0x0390…03f2 at004e = ╱ef╱$╱ // 0x3de @0x4e
0x0390…03f2 at004f = ╱ed╱(╱ // 0x3df @0x4f
0x0390…03f2 at0050 = ╱31╱1╱ // 0x3e0 @0x50
0x0390…03f2 at0051 = ╱37╱7╱ // 0x3e1 @0x51
0x0390…03f2 at0052 = ╱fe00008805╱ // 0x3e2 @0x52
0x0390…03f2 at0057 = ╱ee╱)╱ // 0x3e7 @0x57
0x0390…03f2 at0058 = ╱ec╱,╱ // 0x3e8 @0x58
0x0390…03f2 at0059 = ╱54╱T╱ // 0x3e9 @0x59
0x0390…03f2 at005a = ╱59╱Y╱ // 0x3ea @0x5a
0x0390…03f2 at005b = ╱50╱P╱ // 0x3eb @0x5b
0x0390…03f2 at005c = ╱45╱E╱ // 0x3ec @0x5c
0x0390…03f2 at005d = ╱ef╱$╱ // 0x3ed @0x5d
0x0390…03f2 at005e = ╱ed╱(╱ // 0x3ee @0x5e
0x0390…03f2 at005f = ╱45╱E╱ // 0x3ef @0x5f
0x0390…03f2 at0060 = ╱ee╱)╱ // 0x3f0 @0x60
0x0390…03f2 at0061 = EOL // 0x3f1 @0x61
0x0390…03f2 }
0x03f2…0448 919f 0210 DIM BLB2$(12),TILNAVN$(27,8),FRANAVN$(27,8),TEKST$(25)
0x03f2…0448 LineComalBin {
0x03f2…0448 ptr = 0x919f // 0x3f2 @0x0
0x03f2…0448 lno = 0x00d2 // 0x3f4 @0x2
0x03f2…0448 at0004 = ╱87╱ DIM ╱ // 0x3f6 @0x4
0x03f2…0448 at0005 = ╱42╱B╱ // 0x3f7 @0x5
0x03f2…0448 at0006 = ╱4c╱L╱ // 0x3f8 @0x6
0x03f2…0448 at0007 = ╱42╱B╱ // 0x3f9 @0x7
0x03f2…0448 at0008 = ╱32╱2╱ // 0x3fa @0x8
0x03f2…0448 at0009 = ╱ef╱$╱ // 0x3fb @0x9
0x03f2…0448 at000a = ╱ed╱(╱ // 0x3fc @0xa
0x03f2…0448 at000b = ╱31╱1╱ // 0x3fd @0xb
0x03f2…0448 at000c = ╱32╱2╱ // 0x3fe @0xc
0x03f2…0448 at000d = ╱fe0000c004╱ // 0x3ff @0xd
0x03f2…0448 at0012 = ╱ee╱)╱ // 0x404 @0x12
0x03f2…0448 at0013 = ╱ec╱,╱ // 0x405 @0x13
0x03f2…0448 at0014 = ╱54╱T╱ // 0x406 @0x14
0x03f2…0448 at0015 = ╱49╱I╱ // 0x407 @0x15
0x03f2…0448 at0016 = ╱4c╱L╱ // 0x408 @0x16
0x03f2…0448 at0017 = ╱4e╱N╱ // 0x409 @0x17
0x03f2…0448 at0018 = ╱41╱A╱ // 0x40a @0x18
0x03f2…0448 at0019 = ╱56╱V╱ // 0x40b @0x19
0x03f2…0448 at001a = ╱4e╱N╱ // 0x40c @0x1a
0x03f2…0448 at001b = ╱ef╱$╱ // 0x40d @0x1b
0x03f2…0448 at001c = ╱ed╱(╱ // 0x40e @0x1c
0x03f2…0448 at001d = ╱32╱2╱ // 0x40f @0x1d
0x03f2…0448 at001e = ╱37╱7╱ // 0x410 @0x1e
0x03f2…0448 at001f = ╱fe0000d805╱ // 0x411 @0x1f
0x03f2…0448 at0024 = ╱ec╱,╱ // 0x416 @0x24
0x03f2…0448 at0025 = ╱38╱8╱ // 0x417 @0x25
0x03f2…0448 at0026 = ╱fe00008004╱ // 0x418 @0x26
0x03f2…0448 at002b = ╱ee╱)╱ // 0x41d @0x2b
0x03f2…0448 at002c = ╱ec╱,╱ // 0x41e @0x2c
0x03f2…0448 at002d = ╱46╱F╱ // 0x41f @0x2d
0x03f2…0448 at002e = ╱52╱R╱ // 0x420 @0x2e
0x03f2…0448 at002f = ╱41╱A╱ // 0x421 @0x2f
0x03f2…0448 at0030 = ╱4e╱N╱ // 0x422 @0x30
0x03f2…0448 at0031 = ╱41╱A╱ // 0x423 @0x31
0x03f2…0448 at0032 = ╱56╱V╱ // 0x424 @0x32
0x03f2…0448 at0033 = ╱4e╱N╱ // 0x425 @0x33
0x03f2…0448 at0034 = ╱ef╱$╱ // 0x426 @0x34
0x03f2…0448 at0035 = ╱ed╱(╱ // 0x427 @0x35
0x03f2…0448 at0036 = ╱32╱2╱ // 0x428 @0x36
0x03f2…0448 at0037 = ╱37╱7╱ // 0x429 @0x37
0x03f2…0448 at0038 = ╱fe0000d805╱ // 0x42a @0x38
0x03f2…0448 at003d = ╱ec╱,╱ // 0x42f @0x3d
0x03f2…0448 at003e = ╱38╱8╱ // 0x430 @0x3e
0x03f2…0448 at003f = ╱fe00008004╱ // 0x431 @0x3f
0x03f2…0448 at0044 = ╱ee╱)╱ // 0x436 @0x44
0x03f2…0448 at0045 = ╱ec╱,╱ // 0x437 @0x45
0x03f2…0448 at0046 = ╱54╱T╱ // 0x438 @0x46
0x03f2…0448 at0047 = ╱45╱E╱ // 0x439 @0x47
0x03f2…0448 at0048 = ╱4b╱K╱ // 0x43a @0x48
0x03f2…0448 at0049 = ╱53╱S╱ // 0x43b @0x49
0x03f2…0448 at004a = ╱54╱T╱ // 0x43c @0x4a
0x03f2…0448 at004b = ╱ef╱$╱ // 0x43d @0x4b
0x03f2…0448 at004c = ╱ed╱(╱ // 0x43e @0x4c
0x03f2…0448 at004d = ╱32╱2╱ // 0x43f @0x4d
0x03f2…0448 at004e = ╱35╱5╱ // 0x440 @0x4e
0x03f2…0448 at004f = ╱fe0000c805╱ // 0x441 @0x4f
0x03f2…0448 at0054 = ╱ee╱)╱ // 0x446 @0x54
0x03f2…0448 at0055 = EOL // 0x447 @0x55
0x03f2…0448 }
0x0448…048b 91e2 0220 DIM SUM3$(12),DREVFRA$(G),DREVTIL$(G),TKODE$(E),DV$(10)
0x0448…048b LineComalBin {
0x0448…048b ptr = 0x91e2 // 0x448 @0x0
0x0448…048b lno = 0x00dc // 0x44a @0x2
0x0448…048b at0004 = ╱87╱ DIM ╱ // 0x44c @0x4
0x0448…048b at0005 = ╱53╱S╱ // 0x44d @0x5
0x0448…048b at0006 = ╱55╱U╱ // 0x44e @0x6
0x0448…048b at0007 = ╱4d╱M╱ // 0x44f @0x7
0x0448…048b at0008 = ╱33╱3╱ // 0x450 @0x8
0x0448…048b at0009 = ╱ef╱$╱ // 0x451 @0x9
0x0448…048b at000a = ╱ed╱(╱ // 0x452 @0xa
0x0448…048b at000b = ╱31╱1╱ // 0x453 @0xb
0x0448…048b at000c = ╱32╱2╱ // 0x454 @0xc
0x0448…048b at000d = ╱fe0000c004╱ // 0x455 @0xd
0x0448…048b at0012 = ╱ee╱)╱ // 0x45a @0x12
0x0448…048b at0013 = ╱ec╱,╱ // 0x45b @0x13
0x0448…048b at0014 = ╱44╱D╱ // 0x45c @0x14
0x0448…048b at0015 = ╱52╱R╱ // 0x45d @0x15
0x0448…048b at0016 = ╱45╱E╱ // 0x45e @0x16
0x0448…048b at0017 = ╱56╱V╱ // 0x45f @0x17
0x0448…048b at0018 = ╱46╱F╱ // 0x460 @0x18
0x0448…048b at0019 = ╱52╱R╱ // 0x461 @0x19
0x0448…048b at001a = ╱41╱A╱ // 0x462 @0x1a
0x0448…048b at001b = ╱ef╱$╱ // 0x463 @0x1b
0x0448…048b at001c = ╱ed╱(╱ // 0x464 @0x1c
0x0448…048b at001d = ╱47╱G╱ // 0x465 @0x1d
0x0448…048b at001e = ╱ee╱)╱ // 0x466 @0x1e
0x0448…048b at001f = ╱ec╱,╱ // 0x467 @0x1f
0x0448…048b at0020 = ╱44╱D╱ // 0x468 @0x20
0x0448…048b at0021 = ╱52╱R╱ // 0x469 @0x21
0x0448…048b at0022 = ╱45╱E╱ // 0x46a @0x22
0x0448…048b at0023 = ╱56╱V╱ // 0x46b @0x23
0x0448…048b at0024 = ╱54╱T╱ // 0x46c @0x24
0x0448…048b at0025 = ╱49╱I╱ // 0x46d @0x25
0x0448…048b at0026 = ╱4c╱L╱ // 0x46e @0x26
0x0448…048b at0027 = ╱ef╱$╱ // 0x46f @0x27
0x0448…048b at0028 = ╱ed╱(╱ // 0x470 @0x28
0x0448…048b at0029 = ╱47╱G╱ // 0x471 @0x29
0x0448…048b at002a = ╱ee╱)╱ // 0x472 @0x2a
0x0448…048b at002b = ╱ec╱,╱ // 0x473 @0x2b
0x0448…048b at002c = ╱54╱T╱ // 0x474 @0x2c
0x0448…048b at002d = ╱4b╱K╱ // 0x475 @0x2d
0x0448…048b at002e = ╱4f╱O╱ // 0x476 @0x2e
0x0448…048b at002f = ╱44╱D╱ // 0x477 @0x2f
0x0448…048b at0030 = ╱45╱E╱ // 0x478 @0x30
0x0448…048b at0031 = ╱ef╱$╱ // 0x479 @0x31
0x0448…048b at0032 = ╱ed╱(╱ // 0x47a @0x32
0x0448…048b at0033 = ╱45╱E╱ // 0x47b @0x33
0x0448…048b at0034 = ╱ee╱)╱ // 0x47c @0x34
0x0448…048b at0035 = ╱ec╱,╱ // 0x47d @0x35
0x0448…048b at0036 = ╱44╱D╱ // 0x47e @0x36
0x0448…048b at0037 = ╱56╱V╱ // 0x47f @0x37
0x0448…048b at0038 = ╱ef╱$╱ // 0x480 @0x38
0x0448…048b at0039 = ╱ed╱(╱ // 0x481 @0x39
0x0448…048b at003a = ╱31╱1╱ // 0x482 @0x3a
0x0448…048b at003b = ╱30╱0╱ // 0x483 @0x3b
0x0448…048b at003c = ╱fe0000a004╱ // 0x484 @0x3c
0x0448…048b at0041 = ╱ee╱)╱ // 0x489 @0x41
0x0448…048b at0042 = EOL // 0x48a @0x42
0x0448…048b }
0x048b…04a3 91fa 0230 PROC CALC(ART,B1,B2,ES)
0x048b…04a3 LineComalBin {
0x048b…04a3 ptr = 0x91fa // 0x48b @0x0
0x048b…04a3 lno = 0x00e6 // 0x48d @0x2
0x048b…04a3 at0004 = ╱9e╱ PROC ╱ // 0x48f @0x4
0x048b…04a3 at0005 = ╱43╱C╱ // 0x490 @0x5
0x048b…04a3 at0006 = ╱41╱A╱ // 0x491 @0x6
0x048b…04a3 at0007 = ╱4c╱L╱ // 0x492 @0x7
0x048b…04a3 at0008 = ╱43╱C╱ // 0x493 @0x8
0x048b…04a3 at0009 = ╱ed╱(╱ // 0x494 @0x9
0x048b…04a3 at000a = ╱41╱A╱ // 0x495 @0xa
0x048b…04a3 at000b = ╱52╱R╱ // 0x496 @0xb
0x048b…04a3 at000c = ╱54╱T╱ // 0x497 @0xc
0x048b…04a3 at000d = ╱ec╱,╱ // 0x498 @0xd
0x048b…04a3 at000e = ╱42╱B╱ // 0x499 @0xe
0x048b…04a3 at000f = ╱31╱1╱ // 0x49a @0xf
0x048b…04a3 at0010 = ╱ec╱,╱ // 0x49b @0x10
0x048b…04a3 at0011 = ╱42╱B╱ // 0x49c @0x11
0x048b…04a3 at0012 = ╱32╱2╱ // 0x49d @0x12
0x048b…04a3 at0013 = ╱ec╱,╱ // 0x49e @0x13
0x048b…04a3 at0014 = ╱45╱E╱ // 0x49f @0x14
0x048b…04a3 at0015 = ╱53╱S╱ // 0x4a0 @0x15
0x048b…04a3 at0016 = ╱ee╱)╱ // 0x4a1 @0x16
0x048b…04a3 at0017 = EOL // 0x4a2 @0x17
0x048b…04a3 }
0x04a3…04ce 9225 0240 OP1$=B1$;OP2$=B2$;RES$=ES$;SI=B;FLAG=B
0x04a3…04ce LineComalBin {
0x04a3…04ce ptr = 0x9225 // 0x4a3 @0x0
0x04a3…04ce lno = 0x00f0 // 0x4a5 @0x2
0x04a3…04ce at0004 = ╱4f╱O╱ // 0x4a7 @0x4
0x04a3…04ce at0005 = ╱50╱P╱ // 0x4a8 @0x5
0x04a3…04ce at0006 = ╱31╱1╱ // 0x4a9 @0x6
0x04a3…04ce at0007 = ╱ef╱$╱ // 0x4aa @0x7
0x04a3…04ce at0008 = ╱dc╱=╱ // 0x4ab @0x8
0x04a3…04ce at0009 = ╱42╱B╱ // 0x4ac @0x9
0x04a3…04ce at000a = ╱31╱1╱ // 0x4ad @0xa
0x04a3…04ce at000b = ╱ef╱$╱ // 0x4ae @0xb
0x04a3…04ce at000c = ╱eb╱;╱ // 0x4af @0xc
0x04a3…04ce at000d = ╱4f╱O╱ // 0x4b0 @0xd
0x04a3…04ce at000e = ╱50╱P╱ // 0x4b1 @0xe
0x04a3…04ce at000f = ╱32╱2╱ // 0x4b2 @0xf
0x04a3…04ce at0010 = ╱ef╱$╱ // 0x4b3 @0x10
0x04a3…04ce at0011 = ╱dc╱=╱ // 0x4b4 @0x11
0x04a3…04ce at0012 = ╱42╱B╱ // 0x4b5 @0x12
0x04a3…04ce at0013 = ╱32╱2╱ // 0x4b6 @0x13
0x04a3…04ce at0014 = ╱ef╱$╱ // 0x4b7 @0x14
0x04a3…04ce at0015 = ╱eb╱;╱ // 0x4b8 @0x15
0x04a3…04ce at0016 = ╱52╱R╱ // 0x4b9 @0x16
0x04a3…04ce at0017 = ╱45╱E╱ // 0x4ba @0x17
0x04a3…04ce at0018 = ╱53╱S╱ // 0x4bb @0x18
0x04a3…04ce at0019 = ╱ef╱$╱ // 0x4bc @0x19
0x04a3…04ce at001a = ╱dc╱=╱ // 0x4bd @0x1a
0x04a3…04ce at001b = ╱45╱E╱ // 0x4be @0x1b
0x04a3…04ce at001c = ╱53╱S╱ // 0x4bf @0x1c
0x04a3…04ce at001d = ╱ef╱$╱ // 0x4c0 @0x1d
0x04a3…04ce at001e = ╱eb╱;╱ // 0x4c1 @0x1e
0x04a3…04ce at001f = ╱53╱S╱ // 0x4c2 @0x1f
0x04a3…04ce at0020 = ╱49╱I╱ // 0x4c3 @0x20
0x04a3…04ce at0021 = ╱dc╱=╱ // 0x4c4 @0x21
0x04a3…04ce at0022 = ╱42╱B╱ // 0x4c5 @0x22
0x04a3…04ce at0023 = ╱eb╱;╱ // 0x4c6 @0x23
0x04a3…04ce at0024 = ╱46╱F╱ // 0x4c7 @0x24
0x04a3…04ce at0025 = ╱4c╱L╱ // 0x4c8 @0x25
0x04a3…04ce at0026 = ╱41╱A╱ // 0x4c9 @0x26
0x04a3…04ce at0027 = ╱47╱G╱ // 0x4ca @0x27
0x04a3…04ce at0028 = ╱dc╱=╱ // 0x4cb @0x28
0x04a3…04ce at0029 = ╱42╱B╱ // 0x4cc @0x29
0x04a3…04ce at002a = EOL // 0x4cd @0x2a
0x04a3…04ce }
0x04ce…04e4 923b 0250 CALL "P641210:REGN"
0x04ce…04e4 LineComalBin {
0x04ce…04e4 ptr = 0x923b // 0x4ce @0x0
0x04ce…04e4 lno = 0x00fa // 0x4d0 @0x2
0x04ce…04e4 at0004 = ╱adff00╱ CALL ╱ // 0x4d2 @0x4
0x04ce…04e4 at0007 = ╱22╱"╱ // 0x4d5 @0x7
0x04ce…04e4 at0008 = ╱50╱P╱ // 0x4d6 @0x8
0x04ce…04e4 at0009 = ╱36╱6╱ // 0x4d7 @0x9
0x04ce…04e4 at000a = ╱34╱4╱ // 0x4d8 @0xa
0x04ce…04e4 at000b = ╱31╱1╱ // 0x4d9 @0xb
0x04ce…04e4 at000c = ╱32╱2╱ // 0x4da @0xc
0x04ce…04e4 at000d = ╱31╱1╱ // 0x4db @0xd
0x04ce…04e4 at000e = ╱30╱0╱ // 0x4dc @0xe
0x04ce…04e4 at000f = ╱3a╱:╱ // 0x4dd @0xf
0x04ce…04e4 at0010 = ╱52╱R╱ // 0x4de @0x10
0x04ce…04e4 at0011 = ╱45╱E╱ // 0x4df @0x11
0x04ce…04e4 at0012 = ╱47╱G╱ // 0x4e0 @0x12
0x04ce…04e4 at0013 = ╱4e╱N╱ // 0x4e1 @0x13
0x04ce…04e4 at0014 = ╱22╱"╱ // 0x4e2 @0x14
0x04ce…04e4 at0015 = EOL // 0x4e3 @0x15
0x04ce…04e4 }
0x04e4…04f1 9248 0260 ES$=RES$
0x04e4…04f1 LineComalBin {
0x04e4…04f1 ptr = 0x9248 // 0x4e4 @0x0
0x04e4…04f1 lno = 0x0104 // 0x4e6 @0x2
0x04e4…04f1 at0004 = ╱45╱E╱ // 0x4e8 @0x4
0x04e4…04f1 at0005 = ╱53╱S╱ // 0x4e9 @0x5
0x04e4…04f1 at0006 = ╱ef╱$╱ // 0x4ea @0x6
0x04e4…04f1 at0007 = ╱dc╱=╱ // 0x4eb @0x7
0x04e4…04f1 at0008 = ╱52╱R╱ // 0x4ec @0x8
0x04e4…04f1 at0009 = ╱45╱E╱ // 0x4ed @0x9
0x04e4…04f1 at000a = ╱53╱S╱ // 0x4ee @0xa
0x04e4…04f1 at000b = ╱ef╱$╱ // 0x4ef @0xb
0x04e4…04f1 at000c = EOL // 0x4f0 @0xc
0x04e4…04f1 }
0x04f1…04ff 9256 0270 IF FLAG<>B THEN STOP
0x04f1…04ff LineComalBin {
0x04f1…04ff ptr = 0x9256 // 0x4f1 @0x0
0x04f1…04ff lno = 0x010e // 0x4f3 @0x2
0x04f1…04ff at0004 = ╱82╱ IF ╱ // 0x4f5 @0x4
0x04f1…04ff at0005 = ╱46╱F╱ // 0x4f6 @0x5
0x04f1…04ff at0006 = ╱4c╱L╱ // 0x4f7 @0x6
0x04f1…04ff at0007 = ╱41╱A╱ // 0x4f8 @0x7
0x04f1…04ff at0008 = ╱47╱G╱ // 0x4f9 @0x8
0x04f1…04ff at0009 = ╱e1╱<>╱ // 0x4fa @0x9
0x04f1…04ff at000a = ╱42╱B╱ // 0x4fb @0xa
0x04f1…04ff at000b = ╱b6╱ THEN ╱ // 0x4fc @0xb
0x04f1…04ff at000c = ╱8d╱ STOP ╱ // 0x4fd @0xc
0x04f1…04ff at000d = EOL // 0x4fe @0xd
0x04f1…04ff }
0x04ff…0505 925c 0280 ENDPROC
0x04ff…0505 LineComalBin {
0x04ff…0505 ptr = 0x925c // 0x4ff @0x0
0x04ff…0505 lno = 0x0118 // 0x501 @0x2
0x04ff…0505 at0004 = ╱9f╱ ENDPROC ╱ // 0x503 @0x4
0x04ff…0505 at0005 = EOL // 0x504 @0x5
0x04ff…0505 }
0x0505…051a 9271 0290 PROC DATOUD(DA1,DA2)
0x0505…051a LineComalBin {
0x0505…051a ptr = 0x9271 // 0x505 @0x0
0x0505…051a lno = 0x0122 // 0x507 @0x2
0x0505…051a at0004 = ╱9e╱ PROC ╱ // 0x509 @0x4
0x0505…051a at0005 = ╱44╱D╱ // 0x50a @0x5
0x0505…051a at0006 = ╱41╱A╱ // 0x50b @0x6
0x0505…051a at0007 = ╱54╱T╱ // 0x50c @0x7
0x0505…051a at0008 = ╱4f╱O╱ // 0x50d @0x8
0x0505…051a at0009 = ╱55╱U╱ // 0x50e @0x9
0x0505…051a at000a = ╱44╱D╱ // 0x50f @0xa
0x0505…051a at000b = ╱ed╱(╱ // 0x510 @0xb
0x0505…051a at000c = ╱44╱D╱ // 0x511 @0xc
0x0505…051a at000d = ╱41╱A╱ // 0x512 @0xd
0x0505…051a at000e = ╱31╱1╱ // 0x513 @0xe
0x0505…051a at000f = ╱ec╱,╱ // 0x514 @0xf
0x0505…051a at0010 = ╱44╱D╱ // 0x515 @0x10
0x0505…051a at0011 = ╱41╱A╱ // 0x516 @0x11
0x0505…051a at0012 = ╱32╱2╱ // 0x517 @0x12
0x0505…051a at0013 = ╱ee╱)╱ // 0x518 @0x13
0x0505…051a at0014 = EOL // 0x519 @0x14
0x0505…051a }
0x051a…0526 927d 0300 DA3=DA1
0x051a…0526 LineComalBin {
0x051a…0526 ptr = 0x927d // 0x51a @0x0
0x051a…0526 lno = 0x012c // 0x51c @0x2
0x051a…0526 at0004 = ╱44╱D╱ // 0x51e @0x4
0x051a…0526 at0005 = ╱41╱A╱ // 0x51f @0x5
0x051a…0526 at0006 = ╱33╱3╱ // 0x520 @0x6
0x051a…0526 at0007 = ╱dc╱=╱ // 0x521 @0x7
0x051a…0526 at0008 = ╱44╱D╱ // 0x522 @0x8
0x051a…0526 at0009 = ╱41╱A╱ // 0x523 @0x9
0x051a…0526 at000a = ╱31╱1╱ // 0x524 @0xa
0x051a…0526 at000b = EOL // 0x525 @0xb
0x051a…0526 }
0x0526…053a 9291 0310 DA2$=" "
0x0526…053a LineComalBin {
0x0526…053a ptr = 0x9291 // 0x526 @0x0
0x0526…053a lno = 0x0136 // 0x528 @0x2
0x0526…053a at0004 = ╱44╱D╱ // 0x52a @0x4
0x0526…053a at0005 = ╱41╱A╱ // 0x52b @0x5
0x0526…053a at0006 = ╱32╱2╱ // 0x52c @0x6
0x0526…053a at0007 = ╱ef╱$╱ // 0x52d @0x7
0x0526…053a at0008 = ╱dc╱=╱ // 0x52e @0x8
0x0526…053a at0009 = ╱22╱"╱ // 0x52f @0x9
0x0526…053a at000a = ╱20╱…╱ // 0x530 @0xa
0x0526…053a at000b = ╱20╱…╱ // 0x531 @0xb
0x0526…053a at000c = ╱20╱…╱ // 0x532 @0xc
0x0526…053a at000d = ╱20╱…╱ // 0x533 @0xd
0x0526…053a at000e = ╱20╱…╱ // 0x534 @0xe
0x0526…053a at000f = ╱20╱…╱ // 0x535 @0xf
0x0526…053a at0010 = ╱20╱…╱ // 0x536 @0x10
0x0526…053a at0011 = ╱20╱…╱ // 0x537 @0x11
0x0526…053a at0012 = ╱22╱"╱ // 0x538 @0x12
0x0526…053a at0013 = EOL // 0x539 @0x13
0x0526…053a }
0x053a…054d 92a4 0320 FOR J=8 TO E STEP -E
0x053a…054d LineComalBin {
0x053a…054d ptr = 0x92a4 // 0x53a @0x0
0x053a…054d lno = 0x0140 // 0x53c @0x2
0x053a…054d at0004 = ╱83╱ FOR ╱ // 0x53e @0x4
0x053a…054d at0005 = ╱4a╱J╱ // 0x53f @0x5
0x053a…054d at0006 = ╱dc╱=╱ // 0x540 @0x6
0x053a…054d at0007 = ╱38╱8╱ // 0x541 @0x7
0x053a…054d at0008 = ╱fe00008004╱ // 0x542 @0x8
0x053a…054d at000d = ╱b7╱ TO ╱ // 0x547 @0xd
0x053a…054d at000e = ╱45╱E╱ // 0x548 @0xe
0x053a…054d at000f = ╱b8╱ STEP ╱ // 0x549 @0xf
0x053a…054d at0010 = ╱e9╱-╱ // 0x54a @0x10
0x053a…054d at0011 = ╱45╱E╱ // 0x54b @0x11
0x053a…054d at0012 = EOL // 0x54c @0x12
0x053a…054d }
0x054d…0559 92b0 0330 IF J MOD V=B THEN
0x054d…0559 LineComalBin {
0x054d…0559 ptr = 0x92b0 // 0x54d @0x0
0x054d…0559 lno = 0x014a // 0x54f @0x2
0x054d…0559 at0004 = ╱9c╱ IF ╱ // 0x551 @0x4
0x054d…0559 at0005 = ╱4a╱J╱ // 0x552 @0x5
0x054d…0559 at0006 = ╱e8╱ MOD ╱ // 0x553 @0x6
0x054d…0559 at0007 = ╱56╱V╱ // 0x554 @0x7
0x054d…0559 at0008 = ╱dc╱=╱ // 0x555 @0x8
0x054d…0559 at0009 = ╱42╱B╱ // 0x556 @0x9
0x054d…0559 at000a = ╱b6╱ THEN ╱ // 0x557 @0xa
0x054d…0559 at000b = EOL // 0x558 @0xb
0x054d…0559 }
0x0559…0569 92c0 0340 DA2$(J)="."
0x0559…0569 LineComalBin {
0x0559…0569 ptr = 0x92c0 // 0x559 @0x0
0x0559…0569 lno = 0x0154 // 0x55b @0x2
0x0559…0569 at0004 = ╱44╱D╱ // 0x55d @0x4
0x0559…0569 at0005 = ╱41╱A╱ // 0x55e @0x5
0x0559…0569 at0006 = ╱32╱2╱ // 0x55f @0x6
0x0559…0569 at0007 = ╱ef╱$╱ // 0x560 @0x7
0x0559…0569 at0008 = ╱ed╱(╱ // 0x561 @0x8
0x0559…0569 at0009 = ╱4a╱J╱ // 0x562 @0x9
0x0559…0569 at000a = ╱ee╱)╱ // 0x563 @0xa
0x0559…0569 at000b = ╱dc╱=╱ // 0x564 @0xb
0x0559…0569 at000c = ╱22╱"╱ // 0x565 @0xc
0x0559…0569 at000d = ╱2e╱.╱ // 0x566 @0xd
0x0559…0569 at000e = ╱22╱"╱ // 0x567 @0xe
0x0559…0569 at000f = EOL // 0x568 @0xf
0x0559…0569 }
0x0569…056f 92c6 0350 ELSE
0x0569…056f LineComalBin {
0x0569…056f ptr = 0x92c6 // 0x569 @0x0
0x0569…056f lno = 0x015e // 0x56b @0x2
0x0569…056f at0004 = ╱9a╱ ELSE ╱ // 0x56d @0x4
0x0569…056f at0005 = EOL // 0x56e @0x5
0x0569…056f }
0x056f…0592 92e9 0360 DA2$(J)=CHR(DA3 MOD 10+48)
0x056f…0592 LineComalBin {
0x056f…0592 ptr = 0x92e9 // 0x56f @0x0
0x056f…0592 lno = 0x0168 // 0x571 @0x2
0x056f…0592 at0004 = ╱44╱D╱ // 0x573 @0x4
0x056f…0592 at0005 = ╱41╱A╱ // 0x574 @0x5
0x056f…0592 at0006 = ╱32╱2╱ // 0x575 @0x6
0x056f…0592 at0007 = ╱ef╱$╱ // 0x576 @0x7
0x056f…0592 at0008 = ╱ed╱(╱ // 0x577 @0x8
0x056f…0592 at0009 = ╱4a╱J╱ // 0x578 @0x9
0x056f…0592 at000a = ╱ee╱)╱ // 0x579 @0xa
0x056f…0592 at000b = ╱dc╱=╱ // 0x57a @0xb
0x056f…0592 at000c = ╱cf╱CHR╱ // 0x57b @0xc
0x056f…0592 at000d = ╱ed╱(╱ // 0x57c @0xd
0x056f…0592 at000e = ╱44╱D╱ // 0x57d @0xe
0x056f…0592 at000f = ╱41╱A╱ // 0x57e @0xf
0x056f…0592 at0010 = ╱33╱3╱ // 0x57f @0x10
0x056f…0592 at0011 = ╱e8╱ MOD ╱ // 0x580 @0x11
0x056f…0592 at0012 = ╱31╱1╱ // 0x581 @0x12
0x056f…0592 at0013 = ╱30╱0╱ // 0x582 @0x13
0x056f…0592 at0014 = ╱fe0000a004╱ // 0x583 @0x14
0x056f…0592 at0019 = ╱e2╱+╱ // 0x588 @0x19
0x056f…0592 at001a = ╱34╱4╱ // 0x589 @0x1a
0x056f…0592 at001b = ╱38╱8╱ // 0x58a @0x1b
0x056f…0592 at001c = ╱fe0000c006╱ // 0x58b @0x1c
0x056f…0592 at0021 = ╱ee╱)╱ // 0x590 @0x21
0x056f…0592 at0022 = EOL // 0x591 @0x22
0x056f…0592 }
0x0592…05a6 92fd 0370 DA3=DA3 DIV 10
0x0592…05a6 LineComalBin {
0x0592…05a6 ptr = 0x92fd // 0x592 @0x0
0x0592…05a6 lno = 0x0172 // 0x594 @0x2
0x0592…05a6 at0004 = ╱44╱D╱ // 0x596 @0x4
0x0592…05a6 at0005 = ╱41╱A╱ // 0x597 @0x5
0x0592…05a6 at0006 = ╱33╱3╱ // 0x598 @0x6
0x0592…05a6 at0007 = ╱dc╱=╱ // 0x599 @0x7
0x0592…05a6 at0008 = ╱44╱D╱ // 0x59a @0x8
0x0592…05a6 at0009 = ╱41╱A╱ // 0x59b @0x9
0x0592…05a6 at000a = ╱33╱3╱ // 0x59c @0xa
0x0592…05a6 at000b = ╱e7╱ DIV ╱ // 0x59d @0xb
0x0592…05a6 at000c = ╱31╱1╱ // 0x59e @0xc
0x0592…05a6 at000d = ╱30╱0╱ // 0x59f @0xd
0x0592…05a6 at000e = ╱fe0000a004╱ // 0x5a0 @0xe
0x0592…05a6 at0013 = EOL // 0x5a5 @0x13
0x0592…05a6 }
0x05a6…05ac 9303 0380 ENDIF
0x05a6…05ac LineComalBin {
0x05a6…05ac ptr = 0x9303 // 0x5a6 @0x0
0x05a6…05ac lno = 0x017c // 0x5a8 @0x2
0x05a6…05ac at0004 = ╱9b╱ ENDIF ╱ // 0x5aa @0x4
0x05a6…05ac at0005 = EOL // 0x5ab @0x5
0x05a6…05ac }
0x05ac…05b3 930a 0390 NEXT J
0x05ac…05b3 LineComalBin {
0x05ac…05b3 ptr = 0x930a // 0x5ac @0x0
0x05ac…05b3 lno = 0x0186 // 0x5ae @0x2
0x05ac…05b3 at0004 = ╱84╱ NEXT ╱ // 0x5b0 @0x4
0x05ac…05b3 at0005 = ╱4a╱J╱ // 0x5b1 @0x5
0x05ac…05b3 at0006 = EOL // 0x5b2 @0x6
0x05ac…05b3 }
0x05b3…05b9 9310 0400 ENDPROC
0x05b3…05b9 LineComalBin {
0x05b3…05b9 ptr = 0x9310 // 0x5b3 @0x0
0x05b3…05b9 lno = 0x0190 // 0x5b5 @0x2
0x05b3…05b9 at0004 = ╱9f╱ ENDPROC ╱ // 0x5b7 @0x4
0x05b3…05b9 at0005 = EOL // 0x5b8 @0x5
0x05b3…05b9 }
0x05b9…05c4 931b 0410 PROC UDLIN
0x05b9…05c4 LineComalBin {
0x05b9…05c4 ptr = 0x931b // 0x5b9 @0x0
0x05b9…05c4 lno = 0x019a // 0x5bb @0x2
0x05b9…05c4 at0004 = ╱9e╱ PROC ╱ // 0x5bd @0x4
0x05b9…05c4 at0005 = ╱55╱U╱ // 0x5be @0x5
0x05b9…05c4 at0006 = ╱44╱D╱ // 0x5bf @0x6
0x05b9…05c4 at0007 = ╱4c╱L╱ // 0x5c0 @0x7
0x05b9…05c4 at0008 = ╱49╱I╱ // 0x5c1 @0x8
0x05b9…05c4 at0009 = ╱4e╱N╱ // 0x5c2 @0x9
0x05b9…05c4 at000a = EOL // 0x5c3 @0xa
0x05b9…05c4 }
0x05c4…05dd 9334 0420 EXEC TUD(SUM$,SUM1$,E,B)
0x05c4…05dd LineComalBin {
0x05c4…05dd ptr = 0x9334 // 0x5c4 @0x0
0x05c4…05dd lno = 0x01a4 // 0x5c6 @0x2
0x05c4…05dd at0004 = ╱9d╱ EXEC ╱ // 0x5c8 @0x4
0x05c4…05dd at0005 = ╱54╱T╱ // 0x5c9 @0x5
0x05c4…05dd at0006 = ╱55╱U╱ // 0x5ca @0x6
0x05c4…05dd at0007 = ╱44╱D╱ // 0x5cb @0x7
0x05c4…05dd at0008 = ╱ed╱(╱ // 0x5cc @0x8
0x05c4…05dd at0009 = ╱53╱S╱ // 0x5cd @0x9
0x05c4…05dd at000a = ╱55╱U╱ // 0x5ce @0xa
0x05c4…05dd at000b = ╱4d╱M╱ // 0x5cf @0xb
0x05c4…05dd at000c = ╱ef╱$╱ // 0x5d0 @0xc
0x05c4…05dd at000d = ╱ec╱,╱ // 0x5d1 @0xd
0x05c4…05dd at000e = ╱53╱S╱ // 0x5d2 @0xe
0x05c4…05dd at000f = ╱55╱U╱ // 0x5d3 @0xf
0x05c4…05dd at0010 = ╱4d╱M╱ // 0x5d4 @0x10
0x05c4…05dd at0011 = ╱31╱1╱ // 0x5d5 @0x11
0x05c4…05dd at0012 = ╱ef╱$╱ // 0x5d6 @0x12
0x05c4…05dd at0013 = ╱ec╱,╱ // 0x5d7 @0x13
0x05c4…05dd at0014 = ╱45╱E╱ // 0x5d8 @0x14
0x05c4…05dd at0015 = ╱ec╱,╱ // 0x5d9 @0x15
0x05c4…05dd at0016 = ╱42╱B╱ // 0x5da @0x16
0x05c4…05dd at0017 = ╱ee╱)╱ // 0x5db @0x17
0x05c4…05dd at0018 = EOL // 0x5dc @0x18
0x05c4…05dd }
0x05dd…0628 937f 0430 PRINT TAB(5);GR;TAB(12);UBELØB1$;TAB(37);UBELØB2$;TAB(57);SUM1$
0x05dd…0628 LineComalBin {
0x05dd…0628 ptr = 0x937f // 0x5dd @0x0
0x05dd…0628 lno = 0x01ae // 0x5df @0x2
0x05dd…0628 at0004 = ╱92╱ PRINT ╱ // 0x5e1 @0x4
0x05dd…0628 at0005 = ╱d2╱TAB╱ // 0x5e2 @0x5
0x05dd…0628 at0006 = ╱ed╱(╱ // 0x5e3 @0x6
0x05dd…0628 at0007 = ╱35╱5╱ // 0x5e4 @0x7
0x05dd…0628 at0008 = ╱fe0000a003╱ // 0x5e5 @0x8
0x05dd…0628 at000d = ╱ee╱)╱ // 0x5ea @0xd
0x05dd…0628 at000e = ╱eb╱;╱ // 0x5eb @0xe
0x05dd…0628 at000f = ╱47╱G╱ // 0x5ec @0xf
0x05dd…0628 at0010 = ╱52╱R╱ // 0x5ed @0x10
0x05dd…0628 at0011 = ╱eb╱;╱ // 0x5ee @0x11
0x05dd…0628 at0012 = ╱d2╱TAB╱ // 0x5ef @0x12
0x05dd…0628 at0013 = ╱ed╱(╱ // 0x5f0 @0x13
0x05dd…0628 at0014 = ╱31╱1╱ // 0x5f1 @0x14
0x05dd…0628 at0015 = ╱32╱2╱ // 0x5f2 @0x15
0x05dd…0628 at0016 = ╱fe0000c004╱ // 0x5f3 @0x16
0x05dd…0628 at001b = ╱ee╱)╱ // 0x5f8 @0x1b
0x05dd…0628 at001c = ╱eb╱;╱ // 0x5f9 @0x1c
0x05dd…0628 at001d = ╱55╱U╱ // 0x5fa @0x1d
0x05dd…0628 at001e = ╱42╱B╱ // 0x5fb @0x1e
0x05dd…0628 at001f = ╱45╱E╱ // 0x5fc @0x1f
0x05dd…0628 at0020 = ╱4c╱L╱ // 0x5fd @0x20
0x05dd…0628 at0021 = ╱5c╱Ø╱ // 0x5fe @0x21
0x05dd…0628 at0022 = ╱42╱B╱ // 0x5ff @0x22
0x05dd…0628 at0023 = ╱31╱1╱ // 0x600 @0x23
0x05dd…0628 at0024 = ╱ef╱$╱ // 0x601 @0x24
0x05dd…0628 at0025 = ╱eb╱;╱ // 0x602 @0x25
0x05dd…0628 at0026 = ╱d2╱TAB╱ // 0x603 @0x26
0x05dd…0628 at0027 = ╱ed╱(╱ // 0x604 @0x27
0x05dd…0628 at0028 = ╱33╱3╱ // 0x605 @0x28
0x05dd…0628 at0029 = ╱37╱7╱ // 0x606 @0x29
0x05dd…0628 at002a = ╱fe00009406╱ // 0x607 @0x2a
0x05dd…0628 at002f = ╱ee╱)╱ // 0x60c @0x2f
0x05dd…0628 at0030 = ╱eb╱;╱ // 0x60d @0x30
0x05dd…0628 at0031 = ╱55╱U╱ // 0x60e @0x31
0x05dd…0628 at0032 = ╱42╱B╱ // 0x60f @0x32
0x05dd…0628 at0033 = ╱45╱E╱ // 0x610 @0x33
0x05dd…0628 at0034 = ╱4c╱L╱ // 0x611 @0x34
0x05dd…0628 at0035 = ╱5c╱Ø╱ // 0x612 @0x35
0x05dd…0628 at0036 = ╱42╱B╱ // 0x613 @0x36
0x05dd…0628 at0037 = ╱32╱2╱ // 0x614 @0x37
0x05dd…0628 at0038 = ╱ef╱$╱ // 0x615 @0x38
0x05dd…0628 at0039 = ╱eb╱;╱ // 0x616 @0x39
0x05dd…0628 at003a = ╱d2╱TAB╱ // 0x617 @0x3a
0x05dd…0628 at003b = ╱ed╱(╱ // 0x618 @0x3b
0x05dd…0628 at003c = ╱35╱5╱ // 0x619 @0x3c
0x05dd…0628 at003d = ╱37╱7╱ // 0x61a @0x3d
0x05dd…0628 at003e = ╱fe0000e406╱ // 0x61b @0x3e
0x05dd…0628 at0043 = ╱ee╱)╱ // 0x620 @0x43
0x05dd…0628 at0044 = ╱eb╱;╱ // 0x621 @0x44
0x05dd…0628 at0045 = ╱53╱S╱ // 0x622 @0x45
0x05dd…0628 at0046 = ╱55╱U╱ // 0x623 @0x46
0x05dd…0628 at0047 = ╱4d╱M╱ // 0x624 @0x47
0x05dd…0628 at0048 = ╱31╱1╱ // 0x625 @0x48
0x05dd…0628 at0049 = ╱ef╱$╱ // 0x626 @0x49
0x05dd…0628 at004a = EOL // 0x627 @0x4a
0x05dd…0628 }
0x0628…062e 9385 0440 ENDPROC
0x0628…062e LineComalBin {
0x0628…062e ptr = 0x9385 // 0x628 @0x0
0x0628…062e lno = 0x01b8 // 0x62a @0x2
0x0628…062e at0004 = ╱9f╱ ENDPROC ╱ // 0x62c @0x4
0x0628…062e at0005 = EOL // 0x62d @0x5
0x0628…062e }
0x062e…0647 939e 0450 PROC INDTAB1(Z,MANT5,L7)
0x062e…0647 LineComalBin {
0x062e…0647 ptr = 0x939e // 0x62e @0x0
0x062e…0647 lno = 0x01c2 // 0x630 @0x2
0x062e…0647 at0004 = ╱9e╱ PROC ╱ // 0x632 @0x4
0x062e…0647 at0005 = ╱49╱I╱ // 0x633 @0x5
0x062e…0647 at0006 = ╱4e╱N╱ // 0x634 @0x6
0x062e…0647 at0007 = ╱44╱D╱ // 0x635 @0x7
0x062e…0647 at0008 = ╱54╱T╱ // 0x636 @0x8
0x062e…0647 at0009 = ╱41╱A╱ // 0x637 @0x9
0x062e…0647 at000a = ╱42╱B╱ // 0x638 @0xa
0x062e…0647 at000b = ╱31╱1╱ // 0x639 @0xb
0x062e…0647 at000c = ╱ed╱(╱ // 0x63a @0xc
0x062e…0647 at000d = ╱5a╱Z╱ // 0x63b @0xd
0x062e…0647 at000e = ╱ec╱,╱ // 0x63c @0xe
0x062e…0647 at000f = ╱4d╱M╱ // 0x63d @0xf
0x062e…0647 at0010 = ╱41╱A╱ // 0x63e @0x10
0x062e…0647 at0011 = ╱4e╱N╱ // 0x63f @0x11
0x062e…0647 at0012 = ╱54╱T╱ // 0x640 @0x12
0x062e…0647 at0013 = ╱35╱5╱ // 0x641 @0x13
0x062e…0647 at0014 = ╱ec╱,╱ // 0x642 @0x14
0x062e…0647 at0015 = ╱4c╱L╱ // 0x643 @0x15
0x062e…0647 at0016 = ╱37╱7╱ // 0x644 @0x16
0x062e…0647 at0017 = ╱ee╱)╱ // 0x645 @0x17
0x062e…0647 at0018 = EOL // 0x646 @0x18
0x062e…0647 }
0x0647…065e 93b5 0460 PIL1=MANT5 DIV 32
0x0647…065e LineComalBin {
0x0647…065e ptr = 0x93b5 // 0x647 @0x0
0x0647…065e lno = 0x01cc // 0x649 @0x2
0x0647…065e at0004 = ╱50╱P╱ // 0x64b @0x4
0x0647…065e at0005 = ╱49╱I╱ // 0x64c @0x5
0x0647…065e at0006 = ╱4c╱L╱ // 0x64d @0x6
0x0647…065e at0007 = ╱31╱1╱ // 0x64e @0x7
0x0647…065e at0008 = ╱dc╱=╱ // 0x64f @0x8
0x0647…065e at0009 = ╱4d╱M╱ // 0x650 @0x9
0x0647…065e at000a = ╱41╱A╱ // 0x651 @0xa
0x0647…065e at000b = ╱4e╱N╱ // 0x652 @0xb
0x0647…065e at000c = ╱54╱T╱ // 0x653 @0xc
0x0647…065e at000d = ╱35╱5╱ // 0x654 @0xd
0x0647…065e at000e = ╱e7╱ DIV ╱ // 0x655 @0xe
0x0647…065e at000f = ╱33╱3╱ // 0x656 @0xf
0x0647…065e at0010 = ╱32╱2╱ // 0x657 @0x10
0x0647…065e at0011 = ╱fe00008006╱ // 0x658 @0x11
0x0647…065e at0016 = EOL // 0x65d @0x16
0x0647…065e }
0x065e…066c 93c3 0470 FOR I=E TO PIL1
0x065e…066c LineComalBin {
0x065e…066c ptr = 0x93c3 // 0x65e @0x0
0x065e…066c lno = 0x01d6 // 0x660 @0x2
0x065e…066c at0004 = ╱83╱ FOR ╱ // 0x662 @0x4
0x065e…066c at0005 = ╱49╱I╱ // 0x663 @0x5
0x065e…066c at0006 = ╱dc╱=╱ // 0x664 @0x6
0x065e…066c at0007 = ╱45╱E╱ // 0x665 @0x7
0x065e…066c at0008 = ╱b7╱ TO ╱ // 0x666 @0x8
0x065e…066c at0009 = ╱50╱P╱ // 0x667 @0x9
0x065e…066c at000a = ╱49╱I╱ // 0x668 @0xa
0x065e…066c at000b = ╱4c╱L╱ // 0x669 @0xb
0x065e…066c at000c = ╱31╱1╱ // 0x66a @0xc
0x065e…066c at000d = EOL // 0x66b @0xd
0x065e…066c }
0x066c…0681 93d8 0480 H=(I-E)*8+E
0x066c…0681 LineComalBin {
0x066c…0681 ptr = 0x93d8 // 0x66c @0x0
0x066c…0681 lno = 0x01e0 // 0x66e @0x2
0x066c…0681 at0004 = ╱48╱H╱ // 0x670 @0x4
0x066c…0681 at0005 = ╱dc╱=╱ // 0x671 @0x5
0x066c…0681 at0006 = ╱ed╱(╱ // 0x672 @0x6
0x066c…0681 at0007 = ╱49╱I╱ // 0x673 @0x7
0x066c…0681 at0008 = ╱e3╱-╱ // 0x674 @0x8
0x066c…0681 at0009 = ╱45╱E╱ // 0x675 @0x9
0x066c…0681 at000a = ╱ee╱)╱ // 0x676 @0xa
0x066c…0681 at000b = ╱e4╱*╱ // 0x677 @0xb
0x066c…0681 at000c = ╱38╱8╱ // 0x678 @0xc
0x066c…0681 at000d = ╱fe00008004╱ // 0x679 @0xd
0x066c…0681 at0012 = ╱e2╱+╱ // 0x67e @0x12
0x066c…0681 at0013 = ╱45╱E╱ // 0x67f @0x13
0x066c…0681 at0014 = EOL // 0x680 @0x14
0x066c…0681 }
0x0681…06d6 942d 0490 GET L7$,I:Z(H),Z(H+E),Z(H+G),Z(H+V),Z(H+4),Z(H+5),Z(H+6),Z(H+7)
0x0681…06d6 LineComalBin {
0x0681…06d6 ptr = 0x942d // 0x681 @0x0
0x0681…06d6 lno = 0x01ea // 0x683 @0x2
0x0681…06d6 at0004 = ╱a9╱ GET ╱ // 0x685 @0x4
0x0681…06d6 at0005 = ╱4c╱L╱ // 0x686 @0x5
0x0681…06d6 at0006 = ╱37╱7╱ // 0x687 @0x6
0x0681…06d6 at0007 = ╱ef╱$╱ // 0x688 @0x7
0x0681…06d6 at0008 = ╱ec╱,╱ // 0x689 @0x8
0x0681…06d6 at0009 = ╱49╱I╱ // 0x68a @0x9
0x0681…06d6 at000a = ╱f0╱:╱ // 0x68b @0xa
0x0681…06d6 at000b = ╱5a╱Z╱ // 0x68c @0xb
0x0681…06d6 at000c = ╱ed╱(╱ // 0x68d @0xc
0x0681…06d6 at000d = ╱48╱H╱ // 0x68e @0xd
0x0681…06d6 at000e = ╱ee╱)╱ // 0x68f @0xe
0x0681…06d6 at000f = ╱ec╱,╱ // 0x690 @0xf
0x0681…06d6 at0010 = ╱5a╱Z╱ // 0x691 @0x10
0x0681…06d6 at0011 = ╱ed╱(╱ // 0x692 @0x11
0x0681…06d6 at0012 = ╱48╱H╱ // 0x693 @0x12
0x0681…06d6 at0013 = ╱e2╱+╱ // 0x694 @0x13
0x0681…06d6 at0014 = ╱45╱E╱ // 0x695 @0x14
0x0681…06d6 at0015 = ╱ee╱)╱ // 0x696 @0x15
0x0681…06d6 at0016 = ╱ec╱,╱ // 0x697 @0x16
0x0681…06d6 at0017 = ╱5a╱Z╱ // 0x698 @0x17
0x0681…06d6 at0018 = ╱ed╱(╱ // 0x699 @0x18
0x0681…06d6 at0019 = ╱48╱H╱ // 0x69a @0x19
0x0681…06d6 at001a = ╱e2╱+╱ // 0x69b @0x1a
0x0681…06d6 at001b = ╱47╱G╱ // 0x69c @0x1b
0x0681…06d6 at001c = ╱ee╱)╱ // 0x69d @0x1c
0x0681…06d6 at001d = ╱ec╱,╱ // 0x69e @0x1d
0x0681…06d6 at001e = ╱5a╱Z╱ // 0x69f @0x1e
0x0681…06d6 at001f = ╱ed╱(╱ // 0x6a0 @0x1f
0x0681…06d6 at0020 = ╱48╱H╱ // 0x6a1 @0x20
0x0681…06d6 at0021 = ╱e2╱+╱ // 0x6a2 @0x21
0x0681…06d6 at0022 = ╱56╱V╱ // 0x6a3 @0x22
0x0681…06d6 at0023 = ╱ee╱)╱ // 0x6a4 @0x23
0x0681…06d6 at0024 = ╱ec╱,╱ // 0x6a5 @0x24
0x0681…06d6 at0025 = ╱5a╱Z╱ // 0x6a6 @0x25
0x0681…06d6 at0026 = ╱ed╱(╱ // 0x6a7 @0x26
0x0681…06d6 at0027 = ╱48╱H╱ // 0x6a8 @0x27
0x0681…06d6 at0028 = ╱e2╱+╱ // 0x6a9 @0x28
0x0681…06d6 at0029 = ╱34╱4╱ // 0x6aa @0x29
0x0681…06d6 at002a = ╱fe00008003╱ // 0x6ab @0x2a
0x0681…06d6 at002f = ╱ee╱)╱ // 0x6b0 @0x2f
0x0681…06d6 at0030 = ╱ec╱,╱ // 0x6b1 @0x30
0x0681…06d6 at0031 = ╱5a╱Z╱ // 0x6b2 @0x31
0x0681…06d6 at0032 = ╱ed╱(╱ // 0x6b3 @0x32
0x0681…06d6 at0033 = ╱48╱H╱ // 0x6b4 @0x33
0x0681…06d6 at0034 = ╱e2╱+╱ // 0x6b5 @0x34
0x0681…06d6 at0035 = ╱35╱5╱ // 0x6b6 @0x35
0x0681…06d6 at0036 = ╱fe0000a003╱ // 0x6b7 @0x36
0x0681…06d6 at003b = ╱ee╱)╱ // 0x6bc @0x3b
0x0681…06d6 at003c = ╱ec╱,╱ // 0x6bd @0x3c
0x0681…06d6 at003d = ╱5a╱Z╱ // 0x6be @0x3d
0x0681…06d6 at003e = ╱ed╱(╱ // 0x6bf @0x3e
0x0681…06d6 at003f = ╱48╱H╱ // 0x6c0 @0x3f
0x0681…06d6 at0040 = ╱e2╱+╱ // 0x6c1 @0x40
0x0681…06d6 at0041 = ╱36╱6╱ // 0x6c2 @0x41
0x0681…06d6 at0042 = ╱fe0000c003╱ // 0x6c3 @0x42
0x0681…06d6 at0047 = ╱ee╱)╱ // 0x6c8 @0x47
0x0681…06d6 at0048 = ╱ec╱,╱ // 0x6c9 @0x48
0x0681…06d6 at0049 = ╱5a╱Z╱ // 0x6ca @0x49
0x0681…06d6 at004a = ╱ed╱(╱ // 0x6cb @0x4a
0x0681…06d6 at004b = ╱48╱H╱ // 0x6cc @0x4b
0x0681…06d6 at004c = ╱e2╱+╱ // 0x6cd @0x4c
0x0681…06d6 at004d = ╱37╱7╱ // 0x6ce @0x4d
0x0681…06d6 at004e = ╱fe0000e003╱ // 0x6cf @0x4e
0x0681…06d6 at0053 = ╱ee╱)╱ // 0x6d4 @0x53
0x0681…06d6 at0054 = EOL // 0x6d5 @0x54
0x0681…06d6 }
0x06d6…06e9 9440 0500 EXEC FEJL(G,E,L7$)
0x06d6…06e9 LineComalBin {
0x06d6…06e9 ptr = 0x9440 // 0x6d6 @0x0
0x06d6…06e9 lno = 0x01f4 // 0x6d8 @0x2
0x06d6…06e9 at0004 = ╱9d╱ EXEC ╱ // 0x6da @0x4
0x06d6…06e9 at0005 = ╱46╱F╱ // 0x6db @0x5
0x06d6…06e9 at0006 = ╱45╱E╱ // 0x6dc @0x6
0x06d6…06e9 at0007 = ╱4a╱J╱ // 0x6dd @0x7
0x06d6…06e9 at0008 = ╱4c╱L╱ // 0x6de @0x8
0x06d6…06e9 at0009 = ╱ed╱(╱ // 0x6df @0x9
0x06d6…06e9 at000a = ╱47╱G╱ // 0x6e0 @0xa
0x06d6…06e9 at000b = ╱ec╱,╱ // 0x6e1 @0xb
0x06d6…06e9 at000c = ╱45╱E╱ // 0x6e2 @0xc
0x06d6…06e9 at000d = ╱ec╱,╱ // 0x6e3 @0xd
0x06d6…06e9 at000e = ╱4c╱L╱ // 0x6e4 @0xe
0x06d6…06e9 at000f = ╱37╱7╱ // 0x6e5 @0xf
0x06d6…06e9 at0010 = ╱ef╱$╱ // 0x6e6 @0x10
0x06d6…06e9 at0011 = ╱ee╱)╱ // 0x6e7 @0x11
0x06d6…06e9 at0012 = EOL // 0x6e8 @0x12
0x06d6…06e9 }
0x06e9…06f0 9447 0510 NEXT I
0x06e9…06f0 LineComalBin {
0x06e9…06f0 ptr = 0x9447 // 0x6e9 @0x0
0x06e9…06f0 lno = 0x01fe // 0x6eb @0x2
0x06e9…06f0 at0004 = ╱84╱ NEXT ╱ // 0x6ed @0x4
0x06e9…06f0 at0005 = ╱49╱I╱ // 0x6ee @0x5
0x06e9…06f0 at0006 = EOL // 0x6ef @0x6
0x06e9…06f0 }
0x06f0…06f6 944d 0520 ENDPROC
0x06f0…06f6 LineComalBin {
0x06f0…06f6 ptr = 0x944d // 0x6f0 @0x0
0x06f0…06f6 lno = 0x0208 // 0x6f2 @0x2
0x06f0…06f6 at0004 = ╱9f╱ ENDPROC ╱ // 0x6f4 @0x4
0x06f0…06f6 at0005 = EOL // 0x6f5 @0x5
0x06f0…06f6 }
0x06f6…070b 9462 0530 PROC UNDIND(V2,U1,Z)
0x06f6…070b LineComalBin {
0x06f6…070b ptr = 0x9462 // 0x6f6 @0x0
0x06f6…070b lno = 0x0212 // 0x6f8 @0x2
0x06f6…070b at0004 = ╱9e╱ PROC ╱ // 0x6fa @0x4
0x06f6…070b at0005 = ╱55╱U╱ // 0x6fb @0x5
0x06f6…070b at0006 = ╱4e╱N╱ // 0x6fc @0x6
0x06f6…070b at0007 = ╱44╱D╱ // 0x6fd @0x7
0x06f6…070b at0008 = ╱49╱I╱ // 0x6fe @0x8
0x06f6…070b at0009 = ╱4e╱N╱ // 0x6ff @0x9
0x06f6…070b at000a = ╱44╱D╱ // 0x700 @0xa
0x06f6…070b at000b = ╱ed╱(╱ // 0x701 @0xb
0x06f6…070b at000c = ╱56╱V╱ // 0x702 @0xc
0x06f6…070b at000d = ╱32╱2╱ // 0x703 @0xd
0x06f6…070b at000e = ╱ec╱,╱ // 0x704 @0xe
0x06f6…070b at000f = ╱55╱U╱ // 0x705 @0xf
0x06f6…070b at0010 = ╱31╱1╱ // 0x706 @0x10
0x06f6…070b at0011 = ╱ec╱,╱ // 0x707 @0x11
0x06f6…070b at0012 = ╱5a╱Z╱ // 0x708 @0x12
0x06f6…070b at0013 = ╱ee╱)╱ // 0x709 @0x13
0x06f6…070b at0014 = EOL // 0x70a @0x14
0x06f6…070b }
0x070b…0716 946d 0540 OPEN V2$,R
0x070b…0716 LineComalBin {
0x070b…0716 ptr = 0x946d // 0x70b @0x0
0x070b…0716 lno = 0x021c // 0x70d @0x2
0x070b…0716 at0004 = ╱a7╱ OPEN ╱ // 0x70f @0x4
0x070b…0716 at0005 = ╱56╱V╱ // 0x710 @0x5
0x070b…0716 at0006 = ╱32╱2╱ // 0x711 @0x6
0x070b…0716 at0007 = ╱ef╱$╱ // 0x712 @0x7
0x070b…0716 at0008 = ╱ec╱,╱ // 0x713 @0x8
0x070b…0716 at0009 = ╱52╱R╱ // 0x714 @0x9
0x070b…0716 at000a = EOL // 0x715 @0xa
0x070b…0716 }
0x0716…072f 9486 0550 EXEC FEJL(14,E,V2$)
0x0716…072f LineComalBin {
0x0716…072f ptr = 0x9486 // 0x716 @0x0
0x0716…072f lno = 0x0226 // 0x718 @0x2
0x0716…072f at0004 = ╱9d╱ EXEC ╱ // 0x71a @0x4
0x0716…072f at0005 = ╱46╱F╱ // 0x71b @0x5
0x0716…072f at0006 = ╱45╱E╱ // 0x71c @0x6
0x0716…072f at0007 = ╱4a╱J╱ // 0x71d @0x7
0x0716…072f at0008 = ╱4c╱L╱ // 0x71e @0x8
0x0716…072f at0009 = ╱ed╱(╱ // 0x71f @0x9
0x0716…072f at000a = ╱31╱1╱ // 0x720 @0xa
0x0716…072f at000b = ╱34╱4╱ // 0x721 @0xb
0x0716…072f at000c = ╱fe0000e004╱ // 0x722 @0xc
0x0716…072f at0011 = ╱ec╱,╱ // 0x727 @0x11
0x0716…072f at0012 = ╱45╱E╱ // 0x728 @0x12
0x0716…072f at0013 = ╱ec╱,╱ // 0x729 @0x13
0x0716…072f at0014 = ╱56╱V╱ // 0x72a @0x14
0x0716…072f at0015 = ╱32╱2╱ // 0x72b @0x15
0x0716…072f at0016 = ╱ef╱$╱ // 0x72c @0x16
0x0716…072f at0017 = ╱ee╱)╱ // 0x72d @0x17
0x0716…072f at0018 = EOL // 0x72e @0x18
0x0716…072f }
0x072f…077d 94d4 0560 GET V2$,U1:Z(E,E),Z(E,G),Z(G,E),Z(G,G),Z(V,E),Z(V,G),Z(4,E),Z(4,G)
0x072f…077d LineComalBin {
0x072f…077d ptr = 0x94d4 // 0x72f @0x0
0x072f…077d lno = 0x0230 // 0x731 @0x2
0x072f…077d at0004 = ╱a9╱ GET ╱ // 0x733 @0x4
0x072f…077d at0005 = ╱56╱V╱ // 0x734 @0x5
0x072f…077d at0006 = ╱32╱2╱ // 0x735 @0x6
0x072f…077d at0007 = ╱ef╱$╱ // 0x736 @0x7
0x072f…077d at0008 = ╱ec╱,╱ // 0x737 @0x8
0x072f…077d at0009 = ╱55╱U╱ // 0x738 @0x9
0x072f…077d at000a = ╱31╱1╱ // 0x739 @0xa
0x072f…077d at000b = ╱f0╱:╱ // 0x73a @0xb
0x072f…077d at000c = ╱5a╱Z╱ // 0x73b @0xc
0x072f…077d at000d = ╱ed╱(╱ // 0x73c @0xd
0x072f…077d at000e = ╱45╱E╱ // 0x73d @0xe
0x072f…077d at000f = ╱ec╱,╱ // 0x73e @0xf
0x072f…077d at0010 = ╱45╱E╱ // 0x73f @0x10
0x072f…077d at0011 = ╱ee╱)╱ // 0x740 @0x11
0x072f…077d at0012 = ╱ec╱,╱ // 0x741 @0x12
0x072f…077d at0013 = ╱5a╱Z╱ // 0x742 @0x13
0x072f…077d at0014 = ╱ed╱(╱ // 0x743 @0x14
0x072f…077d at0015 = ╱45╱E╱ // 0x744 @0x15
0x072f…077d at0016 = ╱ec╱,╱ // 0x745 @0x16
0x072f…077d at0017 = ╱47╱G╱ // 0x746 @0x17
0x072f…077d at0018 = ╱ee╱)╱ // 0x747 @0x18
0x072f…077d at0019 = ╱ec╱,╱ // 0x748 @0x19
0x072f…077d at001a = ╱5a╱Z╱ // 0x749 @0x1a
0x072f…077d at001b = ╱ed╱(╱ // 0x74a @0x1b
0x072f…077d at001c = ╱47╱G╱ // 0x74b @0x1c
0x072f…077d at001d = ╱ec╱,╱ // 0x74c @0x1d
0x072f…077d at001e = ╱45╱E╱ // 0x74d @0x1e
0x072f…077d at001f = ╱ee╱)╱ // 0x74e @0x1f
0x072f…077d at0020 = ╱ec╱,╱ // 0x74f @0x20
0x072f…077d at0021 = ╱5a╱Z╱ // 0x750 @0x21
0x072f…077d at0022 = ╱ed╱(╱ // 0x751 @0x22
0x072f…077d at0023 = ╱47╱G╱ // 0x752 @0x23
0x072f…077d at0024 = ╱ec╱,╱ // 0x753 @0x24
0x072f…077d at0025 = ╱47╱G╱ // 0x754 @0x25
0x072f…077d at0026 = ╱ee╱)╱ // 0x755 @0x26
0x072f…077d at0027 = ╱ec╱,╱ // 0x756 @0x27
0x072f…077d at0028 = ╱5a╱Z╱ // 0x757 @0x28
0x072f…077d at0029 = ╱ed╱(╱ // 0x758 @0x29
0x072f…077d at002a = ╱56╱V╱ // 0x759 @0x2a
0x072f…077d at002b = ╱ec╱,╱ // 0x75a @0x2b
0x072f…077d at002c = ╱45╱E╱ // 0x75b @0x2c
0x072f…077d at002d = ╱ee╱)╱ // 0x75c @0x2d
0x072f…077d at002e = ╱ec╱,╱ // 0x75d @0x2e
0x072f…077d at002f = ╱5a╱Z╱ // 0x75e @0x2f
0x072f…077d at0030 = ╱ed╱(╱ // 0x75f @0x30
0x072f…077d at0031 = ╱56╱V╱ // 0x760 @0x31
0x072f…077d at0032 = ╱ec╱,╱ // 0x761 @0x32
0x072f…077d at0033 = ╱47╱G╱ // 0x762 @0x33
0x072f…077d at0034 = ╱ee╱)╱ // 0x763 @0x34
0x072f…077d at0035 = ╱ec╱,╱ // 0x764 @0x35
0x072f…077d at0036 = ╱5a╱Z╱ // 0x765 @0x36
0x072f…077d at0037 = ╱ed╱(╱ // 0x766 @0x37
0x072f…077d at0038 = ╱34╱4╱ // 0x767 @0x38
0x072f…077d at0039 = ╱fe00008003╱ // 0x768 @0x39
0x072f…077d at003e = ╱ec╱,╱ // 0x76d @0x3e
0x072f…077d at003f = ╱45╱E╱ // 0x76e @0x3f
0x072f…077d at0040 = ╱ee╱)╱ // 0x76f @0x40
0x072f…077d at0041 = ╱ec╱,╱ // 0x770 @0x41
0x072f…077d at0042 = ╱5a╱Z╱ // 0x771 @0x42
0x072f…077d at0043 = ╱ed╱(╱ // 0x772 @0x43
0x072f…077d at0044 = ╱34╱4╱ // 0x773 @0x44
0x072f…077d at0045 = ╱fe00008003╱ // 0x774 @0x45
0x072f…077d at004a = ╱ec╱,╱ // 0x779 @0x4a
0x072f…077d at004b = ╱47╱G╱ // 0x77a @0x4b
0x072f…077d at004c = ╱ee╱)╱ // 0x77b @0x4c
0x072f…077d at004d = EOL // 0x77c @0x4d
0x072f…077d }
0x077d…0796 94ed 0570 EXEC FEJL(14,G,V2$)
0x077d…0796 LineComalBin {
0x077d…0796 ptr = 0x94ed // 0x77d @0x0
0x077d…0796 lno = 0x023a // 0x77f @0x2
0x077d…0796 at0004 = ╱9d╱ EXEC ╱ // 0x781 @0x4
0x077d…0796 at0005 = ╱46╱F╱ // 0x782 @0x5
0x077d…0796 at0006 = ╱45╱E╱ // 0x783 @0x6
0x077d…0796 at0007 = ╱4a╱J╱ // 0x784 @0x7
0x077d…0796 at0008 = ╱4c╱L╱ // 0x785 @0x8
0x077d…0796 at0009 = ╱ed╱(╱ // 0x786 @0x9
0x077d…0796 at000a = ╱31╱1╱ // 0x787 @0xa
0x077d…0796 at000b = ╱34╱4╱ // 0x788 @0xb
0x077d…0796 at000c = ╱fe0000e004╱ // 0x789 @0xc
0x077d…0796 at0011 = ╱ec╱,╱ // 0x78e @0x11
0x077d…0796 at0012 = ╱47╱G╱ // 0x78f @0x12
0x077d…0796 at0013 = ╱ec╱,╱ // 0x790 @0x13
0x077d…0796 at0014 = ╱56╱V╱ // 0x791 @0x14
0x077d…0796 at0015 = ╱32╱2╱ // 0x792 @0x15
0x077d…0796 at0016 = ╱ef╱$╱ // 0x793 @0x16
0x077d…0796 at0017 = ╱ee╱)╱ // 0x794 @0x17
0x077d…0796 at0018 = EOL // 0x795 @0x18
0x077d…0796 }
0x0796…079f 94f6 0580 CLOSE V2$
0x0796…079f LineComalBin {
0x0796…079f ptr = 0x94f6 // 0x796 @0x0
0x0796…079f lno = 0x0244 // 0x798 @0x2
0x0796…079f at0004 = ╱a8╱ CLOSE ╱ // 0x79a @0x4
0x0796…079f at0005 = ╱56╱V╱ // 0x79b @0x5
0x0796…079f at0006 = ╱32╱2╱ // 0x79c @0x6
0x0796…079f at0007 = ╱ef╱$╱ // 0x79d @0x7
0x0796…079f at0008 = EOL // 0x79e @0x8
0x0796…079f }
0x079f…07b8 950f 0590 EXEC FEJL(14,V,V2$)
0x079f…07b8 LineComalBin {
0x079f…07b8 ptr = 0x950f // 0x79f @0x0
0x079f…07b8 lno = 0x024e // 0x7a1 @0x2
0x079f…07b8 at0004 = ╱9d╱ EXEC ╱ // 0x7a3 @0x4
0x079f…07b8 at0005 = ╱46╱F╱ // 0x7a4 @0x5
0x079f…07b8 at0006 = ╱45╱E╱ // 0x7a5 @0x6
0x079f…07b8 at0007 = ╱4a╱J╱ // 0x7a6 @0x7
0x079f…07b8 at0008 = ╱4c╱L╱ // 0x7a7 @0x8
0x079f…07b8 at0009 = ╱ed╱(╱ // 0x7a8 @0x9
0x079f…07b8 at000a = ╱31╱1╱ // 0x7a9 @0xa
0x079f…07b8 at000b = ╱34╱4╱ // 0x7aa @0xb
0x079f…07b8 at000c = ╱fe0000e004╱ // 0x7ab @0xc
0x079f…07b8 at0011 = ╱ec╱,╱ // 0x7b0 @0x11
0x079f…07b8 at0012 = ╱56╱V╱ // 0x7b1 @0x12
0x079f…07b8 at0013 = ╱ec╱,╱ // 0x7b2 @0x13
0x079f…07b8 at0014 = ╱56╱V╱ // 0x7b3 @0x14
0x079f…07b8 at0015 = ╱32╱2╱ // 0x7b4 @0x15
0x079f…07b8 at0016 = ╱ef╱$╱ // 0x7b5 @0x16
0x079f…07b8 at0017 = ╱ee╱)╱ // 0x7b6 @0x17
0x079f…07b8 at0018 = EOL // 0x7b7 @0x18
0x079f…07b8 }
0x07b8…07c5 951c 0600 ENDPROC ;UNDIND
0x07b8…07c5 LineComalBin {
0x07b8…07c5 ptr = 0x951c // 0x7b8 @0x0
0x07b8…07c5 lno = 0x0258 // 0x7ba @0x2
0x07b8…07c5 at0004 = ╱9f╱ ENDPROC ╱ // 0x7bc @0x4
0x07b8…07c5 at0005 = ╱eb╱;╱ // 0x7bd @0x5
0x07b8…07c5 at0006 = ╱55╱U╱ // 0x7be @0x6
0x07b8…07c5 at0007 = ╱4e╱N╱ // 0x7bf @0x7
0x07b8…07c5 at0008 = ╱44╱D╱ // 0x7c0 @0x8
0x07b8…07c5 at0009 = ╱49╱I╱ // 0x7c1 @0x9
0x07b8…07c5 at000a = ╱4e╱N╱ // 0x7c2 @0xa
0x07b8…07c5 at000b = ╱44╱D╱ // 0x7c3 @0xb
0x07b8…07c5 at000c = EOL // 0x7c4 @0xc
0x07b8…07c5 }
0x07c5…07f3 954a 0610 PROC TABINIT(K31,K32,MPOSTANTAL3,HTAB2,UTAB2)
0x07c5…07f3 LineComalBin {
0x07c5…07f3 ptr = 0x954a // 0x7c5 @0x0
0x07c5…07f3 lno = 0x0262 // 0x7c7 @0x2
0x07c5…07f3 at0004 = ╱9e╱ PROC ╱ // 0x7c9 @0x4
0x07c5…07f3 at0005 = ╱54╱T╱ // 0x7ca @0x5
0x07c5…07f3 at0006 = ╱41╱A╱ // 0x7cb @0x6
0x07c5…07f3 at0007 = ╱42╱B╱ // 0x7cc @0x7
0x07c5…07f3 at0008 = ╱49╱I╱ // 0x7cd @0x8
0x07c5…07f3 at0009 = ╱4e╱N╱ // 0x7ce @0x9
0x07c5…07f3 at000a = ╱49╱I╱ // 0x7cf @0xa
0x07c5…07f3 at000b = ╱54╱T╱ // 0x7d0 @0xb
0x07c5…07f3 at000c = ╱ed╱(╱ // 0x7d1 @0xc
0x07c5…07f3 at000d = ╱4b╱K╱ // 0x7d2 @0xd
0x07c5…07f3 at000e = ╱33╱3╱ // 0x7d3 @0xe
0x07c5…07f3 at000f = ╱31╱1╱ // 0x7d4 @0xf
0x07c5…07f3 at0010 = ╱ec╱,╱ // 0x7d5 @0x10
0x07c5…07f3 at0011 = ╱4b╱K╱ // 0x7d6 @0x11
0x07c5…07f3 at0012 = ╱33╱3╱ // 0x7d7 @0x12
0x07c5…07f3 at0013 = ╱32╱2╱ // 0x7d8 @0x13
0x07c5…07f3 at0014 = ╱ec╱,╱ // 0x7d9 @0x14
0x07c5…07f3 at0015 = ╱4d╱M╱ // 0x7da @0x15
0x07c5…07f3 at0016 = ╱50╱P╱ // 0x7db @0x16
0x07c5…07f3 at0017 = ╱4f╱O╱ // 0x7dc @0x17
0x07c5…07f3 at0018 = ╱53╱S╱ // 0x7dd @0x18
0x07c5…07f3 at0019 = ╱54╱T╱ // 0x7de @0x19
0x07c5…07f3 at001a = ╱41╱A╱ // 0x7df @0x1a
0x07c5…07f3 at001b = ╱4e╱N╱ // 0x7e0 @0x1b
0x07c5…07f3 at001c = ╱54╱T╱ // 0x7e1 @0x1c
0x07c5…07f3 at001d = ╱41╱A╱ // 0x7e2 @0x1d
0x07c5…07f3 at001e = ╱4c╱L╱ // 0x7e3 @0x1e
0x07c5…07f3 at001f = ╱33╱3╱ // 0x7e4 @0x1f
0x07c5…07f3 at0020 = ╱ec╱,╱ // 0x7e5 @0x20
0x07c5…07f3 at0021 = ╱48╱H╱ // 0x7e6 @0x21
0x07c5…07f3 at0022 = ╱54╱T╱ // 0x7e7 @0x22
0x07c5…07f3 at0023 = ╱41╱A╱ // 0x7e8 @0x23
0x07c5…07f3 at0024 = ╱42╱B╱ // 0x7e9 @0x24
0x07c5…07f3 at0025 = ╱32╱2╱ // 0x7ea @0x25
0x07c5…07f3 at0026 = ╱ec╱,╱ // 0x7eb @0x26
0x07c5…07f3 at0027 = ╱55╱U╱ // 0x7ec @0x27
0x07c5…07f3 at0028 = ╱54╱T╱ // 0x7ed @0x28
0x07c5…07f3 at0029 = ╱41╱A╱ // 0x7ee @0x29
0x07c5…07f3 at002a = ╱42╱B╱ // 0x7ef @0x2a
0x07c5…07f3 at002b = ╱32╱2╱ // 0x7f0 @0x2b
0x07c5…07f3 at002c = ╱ee╱)╱ // 0x7f1 @0x2c
0x07c5…07f3 at002d = EOL // 0x7f2 @0x2d
0x07c5…07f3 }
0x07f3…07ff 9556 0620 OPEN K31$,R
0x07f3…07ff LineComalBin {
0x07f3…07ff ptr = 0x9556 // 0x7f3 @0x0
0x07f3…07ff lno = 0x026c // 0x7f5 @0x2
0x07f3…07ff at0004 = ╱a7╱ OPEN ╱ // 0x7f7 @0x4
0x07f3…07ff at0005 = ╱4b╱K╱ // 0x7f8 @0x5
0x07f3…07ff at0006 = ╱33╱3╱ // 0x7f9 @0x6
0x07f3…07ff at0007 = ╱31╱1╱ // 0x7fa @0x7
0x07f3…07ff at0008 = ╱ef╱$╱ // 0x7fb @0x8
0x07f3…07ff at0009 = ╱ec╱,╱ // 0x7fc @0x9
0x07f3…07ff at000a = ╱52╱R╱ // 0x7fd @0xa
0x07f3…07ff at000b = EOL // 0x7fe @0xb
0x07f3…07ff }
0x07ff…0819 9570 0630 EXEC FEJL(15,E,K31$)
0x07ff…0819 LineComalBin {
0x07ff…0819 ptr = 0x9570 // 0x7ff @0x0
0x07ff…0819 lno = 0x0276 // 0x801 @0x2
0x07ff…0819 at0004 = ╱9d╱ EXEC ╱ // 0x803 @0x4
0x07ff…0819 at0005 = ╱46╱F╱ // 0x804 @0x5
0x07ff…0819 at0006 = ╱45╱E╱ // 0x805 @0x6
0x07ff…0819 at0007 = ╱4a╱J╱ // 0x806 @0x7
0x07ff…0819 at0008 = ╱4c╱L╱ // 0x807 @0x8
0x07ff…0819 at0009 = ╱ed╱(╱ // 0x808 @0x9
0x07ff…0819 at000a = ╱31╱1╱ // 0x809 @0xa
0x07ff…0819 at000b = ╱35╱5╱ // 0x80a @0xb
0x07ff…0819 at000c = ╱fe0000f004╱ // 0x80b @0xc
0x07ff…0819 at0011 = ╱ec╱,╱ // 0x810 @0x11
0x07ff…0819 at0012 = ╱45╱E╱ // 0x811 @0x12
0x07ff…0819 at0013 = ╱ec╱,╱ // 0x812 @0x13
0x07ff…0819 at0014 = ╱4b╱K╱ // 0x813 @0x14
0x07ff…0819 at0015 = ╱33╱3╱ // 0x814 @0x15
0x07ff…0819 at0016 = ╱31╱1╱ // 0x815 @0x16
0x07ff…0819 at0017 = ╱ef╱$╱ // 0x816 @0x17
0x07ff…0819 at0018 = ╱ee╱)╱ // 0x817 @0x18
0x07ff…0819 at0019 = EOL // 0x818 @0x19
0x07ff…0819 }
0x0819…0825 957c 0640 OPEN K32$,W
0x0819…0825 LineComalBin {
0x0819…0825 ptr = 0x957c // 0x819 @0x0
0x0819…0825 lno = 0x0280 // 0x81b @0x2
0x0819…0825 at0004 = ╱a7╱ OPEN ╱ // 0x81d @0x4
0x0819…0825 at0005 = ╱4b╱K╱ // 0x81e @0x5
0x0819…0825 at0006 = ╱33╱3╱ // 0x81f @0x6
0x0819…0825 at0007 = ╱32╱2╱ // 0x820 @0x7
0x0819…0825 at0008 = ╱ef╱$╱ // 0x821 @0x8
0x0819…0825 at0009 = ╱ec╱,╱ // 0x822 @0x9
0x0819…0825 at000a = ╱57╱W╱ // 0x823 @0xa
0x0819…0825 at000b = EOL // 0x824 @0xb
0x0819…0825 }
0x0825…083f 9596 0650 EXEC FEJL(15,G,K32$)
0x0825…083f LineComalBin {
0x0825…083f ptr = 0x9596 // 0x825 @0x0
0x0825…083f lno = 0x028a // 0x827 @0x2
0x0825…083f at0004 = ╱9d╱ EXEC ╱ // 0x829 @0x4
0x0825…083f at0005 = ╱46╱F╱ // 0x82a @0x5
0x0825…083f at0006 = ╱45╱E╱ // 0x82b @0x6
0x0825…083f at0007 = ╱4a╱J╱ // 0x82c @0x7
0x0825…083f at0008 = ╱4c╱L╱ // 0x82d @0x8
0x0825…083f at0009 = ╱ed╱(╱ // 0x82e @0x9
0x0825…083f at000a = ╱31╱1╱ // 0x82f @0xa
0x0825…083f at000b = ╱35╱5╱ // 0x830 @0xb
0x0825…083f at000c = ╱fe0000f004╱ // 0x831 @0xc
0x0825…083f at0011 = ╱ec╱,╱ // 0x836 @0x11
0x0825…083f at0012 = ╱47╱G╱ // 0x837 @0x12
0x0825…083f at0013 = ╱ec╱,╱ // 0x838 @0x13
0x0825…083f at0014 = ╱4b╱K╱ // 0x839 @0x14
0x0825…083f at0015 = ╱33╱3╱ // 0x83a @0x15
0x0825…083f at0016 = ╱32╱2╱ // 0x83b @0x16
0x0825…083f at0017 = ╱ef╱$╱ // 0x83c @0x17
0x0825…083f at0018 = ╱ee╱)╱ // 0x83d @0x18
0x0825…083f at0019 = EOL // 0x83e @0x19
0x0825…083f }
0x083f…0847 959e 0660 H=E
0x083f…0847 LineComalBin {
0x083f…0847 ptr = 0x959e // 0x83f @0x0
0x083f…0847 lno = 0x0294 // 0x841 @0x2
0x083f…0847 at0004 = ╱48╱H╱ // 0x843 @0x4
0x083f…0847 at0005 = ╱dc╱=╱ // 0x844 @0x5
0x083f…0847 at0006 = ╱45╱E╱ // 0x845 @0x6
0x083f…0847 at0007 = EOL // 0x846 @0x7
0x083f…0847 }
0x0847…0864 95bb 0670 FOR I=E TO MPOSTANTAL3 DIV 40
0x0847…0864 LineComalBin {
0x0847…0864 ptr = 0x95bb // 0x847 @0x0
0x0847…0864 lno = 0x029e // 0x849 @0x2
0x0847…0864 at0004 = ╱83╱ FOR ╱ // 0x84b @0x4
0x0847…0864 at0005 = ╱49╱I╱ // 0x84c @0x5
0x0847…0864 at0006 = ╱dc╱=╱ // 0x84d @0x6
0x0847…0864 at0007 = ╱45╱E╱ // 0x84e @0x7
0x0847…0864 at0008 = ╱b7╱ TO ╱ // 0x84f @0x8
0x0847…0864 at0009 = ╱4d╱M╱ // 0x850 @0x9
0x0847…0864 at000a = ╱50╱P╱ // 0x851 @0xa
0x0847…0864 at000b = ╱4f╱O╱ // 0x852 @0xb
0x0847…0864 at000c = ╱53╱S╱ // 0x853 @0xc
0x0847…0864 at000d = ╱54╱T╱ // 0x854 @0xd
0x0847…0864 at000e = ╱41╱A╱ // 0x855 @0xe
0x0847…0864 at000f = ╱4e╱N╱ // 0x856 @0xf
0x0847…0864 at0010 = ╱54╱T╱ // 0x857 @0x10
0x0847…0864 at0011 = ╱41╱A╱ // 0x858 @0x11
0x0847…0864 at0012 = ╱4c╱L╱ // 0x859 @0x12
0x0847…0864 at0013 = ╱33╱3╱ // 0x85a @0x13
0x0847…0864 at0014 = ╱e7╱ DIV ╱ // 0x85b @0x14
0x0847…0864 at0015 = ╱34╱4╱ // 0x85c @0x15
0x0847…0864 at0016 = ╱30╱0╱ // 0x85d @0x16
0x0847…0864 at0017 = ╱fe0000a006╱ // 0x85e @0x17
0x0847…0864 at001c = EOL // 0x863 @0x1c
0x0847…0864 }
0x0864…0875 95cc 0680 GET K31$,H:KONR
0x0864…0875 LineComalBin {
0x0864…0875 ptr = 0x95cc // 0x864 @0x0
0x0864…0875 lno = 0x02a8 // 0x866 @0x2
0x0864…0875 at0004 = ╱a9╱ GET ╱ // 0x868 @0x4
0x0864…0875 at0005 = ╱4b╱K╱ // 0x869 @0x5
0x0864…0875 at0006 = ╱33╱3╱ // 0x86a @0x6
0x0864…0875 at0007 = ╱31╱1╱ // 0x86b @0x7
0x0864…0875 at0008 = ╱ef╱$╱ // 0x86c @0x8
0x0864…0875 at0009 = ╱ec╱,╱ // 0x86d @0x9
0x0864…0875 at000a = ╱48╱H╱ // 0x86e @0xa
0x0864…0875 at000b = ╱f0╱:╱ // 0x86f @0xb
0x0864…0875 at000c = ╱4b╱K╱ // 0x870 @0xc
0x0864…0875 at000d = ╱4f╱O╱ // 0x871 @0xd
0x0864…0875 at000e = ╱4e╱N╱ // 0x872 @0xe
0x0864…0875 at000f = ╱52╱R╱ // 0x873 @0xf
0x0864…0875 at0010 = EOL // 0x874 @0x10
0x0864…0875 }
0x0875…088f 95e6 0690 EXEC FEJL(15,V,K31$)
0x0875…088f LineComalBin {
0x0875…088f ptr = 0x95e6 // 0x875 @0x0
0x0875…088f lno = 0x02b2 // 0x877 @0x2
0x0875…088f at0004 = ╱9d╱ EXEC ╱ // 0x879 @0x4
0x0875…088f at0005 = ╱46╱F╱ // 0x87a @0x5
0x0875…088f at0006 = ╱45╱E╱ // 0x87b @0x6
0x0875…088f at0007 = ╱4a╱J╱ // 0x87c @0x7
0x0875…088f at0008 = ╱4c╱L╱ // 0x87d @0x8
0x0875…088f at0009 = ╱ed╱(╱ // 0x87e @0x9
0x0875…088f at000a = ╱31╱1╱ // 0x87f @0xa
0x0875…088f at000b = ╱35╱5╱ // 0x880 @0xb
0x0875…088f at000c = ╱fe0000f004╱ // 0x881 @0xc
0x0875…088f at0011 = ╱ec╱,╱ // 0x886 @0x11
0x0875…088f at0012 = ╱56╱V╱ // 0x887 @0x12
0x0875…088f at0013 = ╱ec╱,╱ // 0x888 @0x13
0x0875…088f at0014 = ╱4b╱K╱ // 0x889 @0x14
0x0875…088f at0015 = ╱33╱3╱ // 0x88a @0x15
0x0875…088f at0016 = ╱31╱1╱ // 0x88b @0x16
0x0875…088f at0017 = ╱ef╱$╱ // 0x88c @0x17
0x0875…088f at0018 = ╱ee╱)╱ // 0x88d @0x18
0x0875…088f at0019 = EOL // 0x88e @0x19
0x0875…088f }
0x088f…08a3 95fa 0700 HTAB2(I,E)=KONR
0x088f…08a3 LineComalBin {
0x088f…08a3 ptr = 0x95fa // 0x88f @0x0
0x088f…08a3 lno = 0x02bc // 0x891 @0x2
0x088f…08a3 at0004 = ╱48╱H╱ // 0x893 @0x4
0x088f…08a3 at0005 = ╱54╱T╱ // 0x894 @0x5
0x088f…08a3 at0006 = ╱41╱A╱ // 0x895 @0x6
0x088f…08a3 at0007 = ╱42╱B╱ // 0x896 @0x7
0x088f…08a3 at0008 = ╱32╱2╱ // 0x897 @0x8
0x088f…08a3 at0009 = ╱ed╱(╱ // 0x898 @0x9
0x088f…08a3 at000a = ╱49╱I╱ // 0x899 @0xa
0x088f…08a3 at000b = ╱ec╱,╱ // 0x89a @0xb
0x088f…08a3 at000c = ╱45╱E╱ // 0x89b @0xc
0x088f…08a3 at000d = ╱ee╱)╱ // 0x89c @0xd
0x088f…08a3 at000e = ╱dc╱=╱ // 0x89d @0xe
0x088f…08a3 at000f = ╱4b╱K╱ // 0x89e @0xf
0x088f…08a3 at0010 = ╱4f╱O╱ // 0x89f @0x10
0x088f…08a3 at0011 = ╱4e╱N╱ // 0x8a0 @0x11
0x088f…08a3 at0012 = ╱52╱R╱ // 0x8a1 @0x12
0x088f…08a3 at0013 = EOL // 0x8a2 @0x13
0x088f…08a3 }
0x08a3…08b3 960a 0710 FOR J=E TO 4
0x08a3…08b3 LineComalBin {
0x08a3…08b3 ptr = 0x960a // 0x8a3 @0x0
0x08a3…08b3 lno = 0x02c6 // 0x8a5 @0x2
0x08a3…08b3 at0004 = ╱83╱ FOR ╱ // 0x8a7 @0x4
0x08a3…08b3 at0005 = ╱4a╱J╱ // 0x8a8 @0x5
0x08a3…08b3 at0006 = ╱dc╱=╱ // 0x8a9 @0x6
0x08a3…08b3 at0007 = ╱45╱E╱ // 0x8aa @0x7
0x08a3…08b3 at0008 = ╱b7╱ TO ╱ // 0x8ab @0x8
0x08a3…08b3 at0009 = ╱34╱4╱ // 0x8ac @0x9
0x08a3…08b3 at000a = ╱fe00008003╱ // 0x8ad @0xa
0x08a3…08b3 at000f = EOL // 0x8b2 @0xf
0x08a3…08b3 }
0x08b3…08c4 961b 0720 GET K31$,H:KONR
0x08b3…08c4 LineComalBin {
0x08b3…08c4 ptr = 0x961b // 0x8b3 @0x0
0x08b3…08c4 lno = 0x02d0 // 0x8b5 @0x2
0x08b3…08c4 at0004 = ╱a9╱ GET ╱ // 0x8b7 @0x4
0x08b3…08c4 at0005 = ╱4b╱K╱ // 0x8b8 @0x5
0x08b3…08c4 at0006 = ╱33╱3╱ // 0x8b9 @0x6
0x08b3…08c4 at0007 = ╱31╱1╱ // 0x8ba @0x7
0x08b3…08c4 at0008 = ╱ef╱$╱ // 0x8bb @0x8
0x08b3…08c4 at0009 = ╱ec╱,╱ // 0x8bc @0x9
0x08b3…08c4 at000a = ╱48╱H╱ // 0x8bd @0xa
0x08b3…08c4 at000b = ╱f0╱:╱ // 0x8be @0xb
0x08b3…08c4 at000c = ╱4b╱K╱ // 0x8bf @0xc
0x08b3…08c4 at000d = ╱4f╱O╱ // 0x8c0 @0xd
0x08b3…08c4 at000e = ╱4e╱N╱ // 0x8c1 @0xe
0x08b3…08c4 at000f = ╱52╱R╱ // 0x8c2 @0xf
0x08b3…08c4 at0010 = EOL // 0x8c3 @0x10
0x08b3…08c4 }
0x08c4…08e3 963a 0730 EXEC FEJL(15,4,K31$)
0x08c4…08e3 LineComalBin {
0x08c4…08e3 ptr = 0x963a // 0x8c4 @0x0
0x08c4…08e3 lno = 0x02da // 0x8c6 @0x2
0x08c4…08e3 at0004 = ╱9d╱ EXEC ╱ // 0x8c8 @0x4
0x08c4…08e3 at0005 = ╱46╱F╱ // 0x8c9 @0x5
0x08c4…08e3 at0006 = ╱45╱E╱ // 0x8ca @0x6
0x08c4…08e3 at0007 = ╱4a╱J╱ // 0x8cb @0x7
0x08c4…08e3 at0008 = ╱4c╱L╱ // 0x8cc @0x8
0x08c4…08e3 at0009 = ╱ed╱(╱ // 0x8cd @0x9
0x08c4…08e3 at000a = ╱31╱1╱ // 0x8ce @0xa
0x08c4…08e3 at000b = ╱35╱5╱ // 0x8cf @0xb
0x08c4…08e3 at000c = ╱fe0000f004╱ // 0x8d0 @0xc
0x08c4…08e3 at0011 = ╱ec╱,╱ // 0x8d5 @0x11
0x08c4…08e3 at0012 = ╱34╱4╱ // 0x8d6 @0x12
0x08c4…08e3 at0013 = ╱fe00008003╱ // 0x8d7 @0x13
0x08c4…08e3 at0018 = ╱ec╱,╱ // 0x8dc @0x18
0x08c4…08e3 at0019 = ╱4b╱K╱ // 0x8dd @0x19
0x08c4…08e3 at001a = ╱33╱3╱ // 0x8de @0x1a
0x08c4…08e3 at001b = ╱31╱1╱ // 0x8df @0x1b
0x08c4…08e3 at001c = ╱ef╱$╱ // 0x8e0 @0x1c
0x08c4…08e3 at001d = ╱ee╱)╱ // 0x8e1 @0x1d
0x08c4…08e3 at001e = EOL // 0x8e2 @0x1e
0x08c4…08e3 }
0x08e3…08f7 964e 0740 UTAB2(J,E)=KONR
0x08e3…08f7 LineComalBin {
0x08e3…08f7 ptr = 0x964e // 0x8e3 @0x0
0x08e3…08f7 lno = 0x02e4 // 0x8e5 @0x2
0x08e3…08f7 at0004 = ╱55╱U╱ // 0x8e7 @0x4
0x08e3…08f7 at0005 = ╱54╱T╱ // 0x8e8 @0x5
0x08e3…08f7 at0006 = ╱41╱A╱ // 0x8e9 @0x6
0x08e3…08f7 at0007 = ╱42╱B╱ // 0x8ea @0x7
0x08e3…08f7 at0008 = ╱32╱2╱ // 0x8eb @0x8
0x08e3…08f7 at0009 = ╱ed╱(╱ // 0x8ec @0x9
0x08e3…08f7 at000a = ╱4a╱J╱ // 0x8ed @0xa
0x08e3…08f7 at000b = ╱ec╱,╱ // 0x8ee @0xb
0x08e3…08f7 at000c = ╱45╱E╱ // 0x8ef @0xc
0x08e3…08f7 at000d = ╱ee╱)╱ // 0x8f0 @0xd
0x08e3…08f7 at000e = ╱dc╱=╱ // 0x8f1 @0xe
0x08e3…08f7 at000f = ╱4b╱K╱ // 0x8f2 @0xf
0x08e3…08f7 at0010 = ╱4f╱O╱ // 0x8f3 @0x10
0x08e3…08f7 at0011 = ╱4e╱N╱ // 0x8f4 @0x11
0x08e3…08f7 at0012 = ╱52╱R╱ // 0x8f5 @0x12
0x08e3…08f7 at0013 = EOL // 0x8f6 @0x13
0x08e3…08f7 }
0x08f7…0901 9658 0750 H=H+W
0x08f7…0901 LineComalBin {
0x08f7…0901 ptr = 0x9658 // 0x8f7 @0x0
0x08f7…0901 lno = 0x02ee // 0x8f9 @0x2
0x08f7…0901 at0004 = ╱48╱H╱ // 0x8fb @0x4
0x08f7…0901 at0005 = ╱dc╱=╱ // 0x8fc @0x5
0x08f7…0901 at0006 = ╱48╱H╱ // 0x8fd @0x6
0x08f7…0901 at0007 = ╱e2╱+╱ // 0x8fe @0x7
0x08f7…0901 at0008 = ╱57╱W╱ // 0x8ff @0x8
0x08f7…0901 at0009 = EOL // 0x900 @0x9
0x08f7…0901 }
0x0901…0912 9669 0760 GET K31$,H:KONR
0x0901…0912 LineComalBin {
0x0901…0912 ptr = 0x9669 // 0x901 @0x0
0x0901…0912 lno = 0x02f8 // 0x903 @0x2
0x0901…0912 at0004 = ╱a9╱ GET ╱ // 0x905 @0x4
0x0901…0912 at0005 = ╱4b╱K╱ // 0x906 @0x5
0x0901…0912 at0006 = ╱33╱3╱ // 0x907 @0x6
0x0901…0912 at0007 = ╱31╱1╱ // 0x908 @0x7
0x0901…0912 at0008 = ╱ef╱$╱ // 0x909 @0x8
0x0901…0912 at0009 = ╱ec╱,╱ // 0x90a @0x9
0x0901…0912 at000a = ╱48╱H╱ // 0x90b @0xa
0x0901…0912 at000b = ╱f0╱:╱ // 0x90c @0xb
0x0901…0912 at000c = ╱4b╱K╱ // 0x90d @0xc
0x0901…0912 at000d = ╱4f╱O╱ // 0x90e @0xd
0x0901…0912 at000e = ╱4e╱N╱ // 0x90f @0xe
0x0901…0912 at000f = ╱52╱R╱ // 0x910 @0xf
0x0901…0912 at0010 = EOL // 0x911 @0x10
0x0901…0912 }
0x0912…0931 9688 0770 EXEC FEJL(15,5,K31$)
0x0912…0931 LineComalBin {
0x0912…0931 ptr = 0x9688 // 0x912 @0x0
0x0912…0931 lno = 0x0302 // 0x914 @0x2
0x0912…0931 at0004 = ╱9d╱ EXEC ╱ // 0x916 @0x4
0x0912…0931 at0005 = ╱46╱F╱ // 0x917 @0x5
0x0912…0931 at0006 = ╱45╱E╱ // 0x918 @0x6
0x0912…0931 at0007 = ╱4a╱J╱ // 0x919 @0x7
0x0912…0931 at0008 = ╱4c╱L╱ // 0x91a @0x8
0x0912…0931 at0009 = ╱ed╱(╱ // 0x91b @0x9
0x0912…0931 at000a = ╱31╱1╱ // 0x91c @0xa
0x0912…0931 at000b = ╱35╱5╱ // 0x91d @0xb
0x0912…0931 at000c = ╱fe0000f004╱ // 0x91e @0xc
0x0912…0931 at0011 = ╱ec╱,╱ // 0x923 @0x11
0x0912…0931 at0012 = ╱35╱5╱ // 0x924 @0x12
0x0912…0931 at0013 = ╱fe0000a003╱ // 0x925 @0x13
0x0912…0931 at0018 = ╱ec╱,╱ // 0x92a @0x18
0x0912…0931 at0019 = ╱4b╱K╱ // 0x92b @0x19
0x0912…0931 at001a = ╱33╱3╱ // 0x92c @0x1a
0x0912…0931 at001b = ╱31╱1╱ // 0x92d @0x1b
0x0912…0931 at001c = ╱ef╱$╱ // 0x92e @0x1c
0x0912…0931 at001d = ╱ee╱)╱ // 0x92f @0x1d
0x0912…0931 at001e = EOL // 0x930 @0x1e
0x0912…0931 }
0x0931…0945 969c 0780 UTAB2(J,G)=KONR
0x0931…0945 LineComalBin {
0x0931…0945 ptr = 0x969c // 0x931 @0x0
0x0931…0945 lno = 0x030c // 0x933 @0x2
0x0931…0945 at0004 = ╱55╱U╱ // 0x935 @0x4
0x0931…0945 at0005 = ╱54╱T╱ // 0x936 @0x5
0x0931…0945 at0006 = ╱41╱A╱ // 0x937 @0x6
0x0931…0945 at0007 = ╱42╱B╱ // 0x938 @0x7
0x0931…0945 at0008 = ╱32╱2╱ // 0x939 @0x8
0x0931…0945 at0009 = ╱ed╱(╱ // 0x93a @0x9
0x0931…0945 at000a = ╱4a╱J╱ // 0x93b @0xa
0x0931…0945 at000b = ╱ec╱,╱ // 0x93c @0xb
0x0931…0945 at000c = ╱47╱G╱ // 0x93d @0xc
0x0931…0945 at000d = ╱ee╱)╱ // 0x93e @0xd
0x0931…0945 at000e = ╱dc╱=╱ // 0x93f @0xe
0x0931…0945 at000f = ╱4b╱K╱ // 0x940 @0xf
0x0931…0945 at0010 = ╱4f╱O╱ // 0x941 @0x10
0x0931…0945 at0011 = ╱4e╱N╱ // 0x942 @0x11
0x0931…0945 at0012 = ╱52╱R╱ // 0x943 @0x12
0x0931…0945 at0013 = EOL // 0x944 @0x13
0x0931…0945 }
0x0945…094f 96a6 0790 H=H+E
0x0945…094f LineComalBin {
0x0945…094f ptr = 0x96a6 // 0x945 @0x0
0x0945…094f lno = 0x0316 // 0x947 @0x2
0x0945…094f at0004 = ╱48╱H╱ // 0x949 @0x4
0x0945…094f at0005 = ╱dc╱=╱ // 0x94a @0x5
0x0945…094f at0006 = ╱48╱H╱ // 0x94b @0x6
0x0945…094f at0007 = ╱e2╱+╱ // 0x94c @0x7
0x0945…094f at0008 = ╱45╱E╱ // 0x94d @0x8
0x0945…094f at0009 = EOL // 0x94e @0x9
0x0945…094f }
0x094f…0956 96ad 0800 NEXT J
0x094f…0956 LineComalBin {
0x094f…0956 ptr = 0x96ad // 0x94f @0x0
0x094f…0956 lno = 0x0320 // 0x951 @0x2
0x094f…0956 at0004 = ╱84╱ NEXT ╱ // 0x953 @0x4
0x094f…0956 at0005 = ╱4a╱J╱ // 0x954 @0x5
0x094f…0956 at0006 = EOL // 0x955 @0x6
0x094f…0956 }
0x0956…096a 96c1 0810 HTAB2(I,G)=KONR
0x0956…096a LineComalBin {
0x0956…096a ptr = 0x96c1 // 0x956 @0x0
0x0956…096a lno = 0x032a // 0x958 @0x2
0x0956…096a at0004 = ╱48╱H╱ // 0x95a @0x4
0x0956…096a at0005 = ╱54╱T╱ // 0x95b @0x5
0x0956…096a at0006 = ╱41╱A╱ // 0x95c @0x6
0x0956…096a at0007 = ╱42╱B╱ // 0x95d @0x7
0x0956…096a at0008 = ╱32╱2╱ // 0x95e @0x8
0x0956…096a at0009 = ╱ed╱(╱ // 0x95f @0x9
0x0956…096a at000a = ╱49╱I╱ // 0x960 @0xa
0x0956…096a at000b = ╱ec╱,╱ // 0x961 @0xb
0x0956…096a at000c = ╱47╱G╱ // 0x962 @0xc
0x0956…096a at000d = ╱ee╱)╱ // 0x963 @0xd
0x0956…096a at000e = ╱dc╱=╱ // 0x964 @0xe
0x0956…096a at000f = ╱4b╱K╱ // 0x965 @0xf
0x0956…096a at0010 = ╱4f╱O╱ // 0x966 @0x10
0x0956…096a at0011 = ╱4e╱N╱ // 0x967 @0x11
0x0956…096a at0012 = ╱52╱R╱ // 0x968 @0x12
0x0956…096a at0013 = EOL // 0x969 @0x13
0x0956…096a }
0x096a…0989 96e0 0820 K90=I+MPOSTANTAL3 DIV 160
0x096a…0989 LineComalBin {
0x096a…0989 ptr = 0x96e0 // 0x96a @0x0
0x096a…0989 lno = 0x0334 // 0x96c @0x2
0x096a…0989 at0004 = ╱4b╱K╱ // 0x96e @0x4
0x096a…0989 at0005 = ╱39╱9╱ // 0x96f @0x5
0x096a…0989 at0006 = ╱30╱0╱ // 0x970 @0x6
0x096a…0989 at0007 = ╱dc╱=╱ // 0x971 @0x7
0x096a…0989 at0008 = ╱49╱I╱ // 0x972 @0x8
0x096a…0989 at0009 = ╱e2╱+╱ // 0x973 @0x9
0x096a…0989 at000a = ╱4d╱M╱ // 0x974 @0xa
0x096a…0989 at000b = ╱50╱P╱ // 0x975 @0xb
0x096a…0989 at000c = ╱4f╱O╱ // 0x976 @0xc
0x096a…0989 at000d = ╱53╱S╱ // 0x977 @0xd
0x096a…0989 at000e = ╱54╱T╱ // 0x978 @0xe
0x096a…0989 at000f = ╱41╱A╱ // 0x979 @0xf
0x096a…0989 at0010 = ╱4e╱N╱ // 0x97a @0x10
0x096a…0989 at0011 = ╱54╱T╱ // 0x97b @0x11
0x096a…0989 at0012 = ╱41╱A╱ // 0x97c @0x12
0x096a…0989 at0013 = ╱4c╱L╱ // 0x97d @0x13
0x096a…0989 at0014 = ╱33╱3╱ // 0x97e @0x14
0x096a…0989 at0015 = ╱e7╱ DIV ╱ // 0x97f @0x15
0x096a…0989 at0016 = ╱31╱1╱ // 0x980 @0x16
0x096a…0989 at0017 = ╱36╱6╱ // 0x981 @0x17
0x096a…0989 at0018 = ╱30╱0╱ // 0x982 @0x18
0x096a…0989 at0019 = ╱fe0000a008╱ // 0x983 @0x19
0x096a…0989 at001e = EOL // 0x988 @0x1e
0x096a…0989 }
0x0989…09a4 96fb 0830 EXEC UNDUD(K32$,K90,UTAB2)
0x0989…09a4 LineComalBin {
0x0989…09a4 ptr = 0x96fb // 0x989 @0x0
0x0989…09a4 lno = 0x033e // 0x98b @0x2
0x0989…09a4 at0004 = ╱9d╱ EXEC ╱ // 0x98d @0x4
0x0989…09a4 at0005 = ╱55╱U╱ // 0x98e @0x5
0x0989…09a4 at0006 = ╱4e╱N╱ // 0x98f @0x6
0x0989…09a4 at0007 = ╱44╱D╱ // 0x990 @0x7
0x0989…09a4 at0008 = ╱55╱U╱ // 0x991 @0x8
0x0989…09a4 at0009 = ╱44╱D╱ // 0x992 @0x9
0x0989…09a4 at000a = ╱ed╱(╱ // 0x993 @0xa
0x0989…09a4 at000b = ╱4b╱K╱ // 0x994 @0xb
0x0989…09a4 at000c = ╱33╱3╱ // 0x995 @0xc
0x0989…09a4 at000d = ╱32╱2╱ // 0x996 @0xd
0x0989…09a4 at000e = ╱ef╱$╱ // 0x997 @0xe
0x0989…09a4 at000f = ╱ec╱,╱ // 0x998 @0xf
0x0989…09a4 at0010 = ╱4b╱K╱ // 0x999 @0x10
0x0989…09a4 at0011 = ╱39╱9╱ // 0x99a @0x11
0x0989…09a4 at0012 = ╱30╱0╱ // 0x99b @0x12
0x0989…09a4 at0013 = ╱ec╱,╱ // 0x99c @0x13
0x0989…09a4 at0014 = ╱55╱U╱ // 0x99d @0x14
0x0989…09a4 at0015 = ╱54╱T╱ // 0x99e @0x15
0x0989…09a4 at0016 = ╱41╱A╱ // 0x99f @0x16
0x0989…09a4 at0017 = ╱42╱B╱ // 0x9a0 @0x17
0x0989…09a4 at0018 = ╱32╱2╱ // 0x9a1 @0x18
0x0989…09a4 at0019 = ╱ee╱)╱ // 0x9a2 @0x19
0x0989…09a4 at001a = EOL // 0x9a3 @0x1a
0x0989…09a4 }
0x09a4…09ab 9702 0840 NEXT I
0x09a4…09ab LineComalBin {
0x09a4…09ab ptr = 0x9702 // 0x9a4 @0x0
0x09a4…09ab lno = 0x0348 // 0x9a6 @0x2
0x09a4…09ab at0004 = ╱84╱ NEXT ╱ // 0x9a8 @0x4
0x09a4…09ab at0005 = ╱49╱I╱ // 0x9a9 @0x5
0x09a4…09ab at0006 = EOL // 0x9aa @0x6
0x09a4…09ab }
0x09ab…09ce 9725 0850 EXEC HOVUD(K32$,MPOSTANTAL3,HTAB2)
0x09ab…09ce LineComalBin {
0x09ab…09ce ptr = 0x9725 // 0x9ab @0x0
0x09ab…09ce lno = 0x0352 // 0x9ad @0x2
0x09ab…09ce at0004 = ╱9d╱ EXEC ╱ // 0x9af @0x4
0x09ab…09ce at0005 = ╱48╱H╱ // 0x9b0 @0x5
0x09ab…09ce at0006 = ╱4f╱O╱ // 0x9b1 @0x6
0x09ab…09ce at0007 = ╱56╱V╱ // 0x9b2 @0x7
0x09ab…09ce at0008 = ╱55╱U╱ // 0x9b3 @0x8
0x09ab…09ce at0009 = ╱44╱D╱ // 0x9b4 @0x9
0x09ab…09ce at000a = ╱ed╱(╱ // 0x9b5 @0xa
0x09ab…09ce at000b = ╱4b╱K╱ // 0x9b6 @0xb
0x09ab…09ce at000c = ╱33╱3╱ // 0x9b7 @0xc
0x09ab…09ce at000d = ╱32╱2╱ // 0x9b8 @0xd
0x09ab…09ce at000e = ╱ef╱$╱ // 0x9b9 @0xe
0x09ab…09ce at000f = ╱ec╱,╱ // 0x9ba @0xf
0x09ab…09ce at0010 = ╱4d╱M╱ // 0x9bb @0x10
0x09ab…09ce at0011 = ╱50╱P╱ // 0x9bc @0x11
0x09ab…09ce at0012 = ╱4f╱O╱ // 0x9bd @0x12
0x09ab…09ce at0013 = ╱53╱S╱ // 0x9be @0x13
0x09ab…09ce at0014 = ╱54╱T╱ // 0x9bf @0x14
0x09ab…09ce at0015 = ╱41╱A╱ // 0x9c0 @0x15
0x09ab…09ce at0016 = ╱4e╱N╱ // 0x9c1 @0x16
0x09ab…09ce at0017 = ╱54╱T╱ // 0x9c2 @0x17
0x09ab…09ce at0018 = ╱41╱A╱ // 0x9c3 @0x18
0x09ab…09ce at0019 = ╱4c╱L╱ // 0x9c4 @0x19
0x09ab…09ce at001a = ╱33╱3╱ // 0x9c5 @0x1a
0x09ab…09ce at001b = ╱ec╱,╱ // 0x9c6 @0x1b
0x09ab…09ce at001c = ╱48╱H╱ // 0x9c7 @0x1c
0x09ab…09ce at001d = ╱54╱T╱ // 0x9c8 @0x1d
0x09ab…09ce at001e = ╱41╱A╱ // 0x9c9 @0x1e
0x09ab…09ce at001f = ╱42╱B╱ // 0x9ca @0x1f
0x09ab…09ce at0020 = ╱32╱2╱ // 0x9cb @0x20
0x09ab…09ce at0021 = ╱ee╱)╱ // 0x9cc @0x21
0x09ab…09ce at0022 = EOL // 0x9cd @0x22
0x09ab…09ce }
0x09ce…09d8 972f 0860 CLOSE K31$
0x09ce…09d8 LineComalBin {
0x09ce…09d8 ptr = 0x972f // 0x9ce @0x0
0x09ce…09d8 lno = 0x035c // 0x9d0 @0x2
0x09ce…09d8 at0004 = ╱a8╱ CLOSE ╱ // 0x9d2 @0x4
0x09ce…09d8 at0005 = ╱4b╱K╱ // 0x9d3 @0x5
0x09ce…09d8 at0006 = ╱33╱3╱ // 0x9d4 @0x6
0x09ce…09d8 at0007 = ╱31╱1╱ // 0x9d5 @0x7
0x09ce…09d8 at0008 = ╱ef╱$╱ // 0x9d6 @0x8
0x09ce…09d8 at0009 = EOL // 0x9d7 @0x9
0x09ce…09d8 }
0x09d8…09f7 974e 0870 EXEC FEJL(15,6,K31$)
0x09d8…09f7 LineComalBin {
0x09d8…09f7 ptr = 0x974e // 0x9d8 @0x0
0x09d8…09f7 lno = 0x0366 // 0x9da @0x2
0x09d8…09f7 at0004 = ╱9d╱ EXEC ╱ // 0x9dc @0x4
0x09d8…09f7 at0005 = ╱46╱F╱ // 0x9dd @0x5
0x09d8…09f7 at0006 = ╱45╱E╱ // 0x9de @0x6
0x09d8…09f7 at0007 = ╱4a╱J╱ // 0x9df @0x7
0x09d8…09f7 at0008 = ╱4c╱L╱ // 0x9e0 @0x8
0x09d8…09f7 at0009 = ╱ed╱(╱ // 0x9e1 @0x9
0x09d8…09f7 at000a = ╱31╱1╱ // 0x9e2 @0xa
0x09d8…09f7 at000b = ╱35╱5╱ // 0x9e3 @0xb
0x09d8…09f7 at000c = ╱fe0000f004╱ // 0x9e4 @0xc
0x09d8…09f7 at0011 = ╱ec╱,╱ // 0x9e9 @0x11
0x09d8…09f7 at0012 = ╱36╱6╱ // 0x9ea @0x12
0x09d8…09f7 at0013 = ╱fe0000c003╱ // 0x9eb @0x13
0x09d8…09f7 at0018 = ╱ec╱,╱ // 0x9f0 @0x18
0x09d8…09f7 at0019 = ╱4b╱K╱ // 0x9f1 @0x19
0x09d8…09f7 at001a = ╱33╱3╱ // 0x9f2 @0x1a
0x09d8…09f7 at001b = ╱31╱1╱ // 0x9f3 @0x1b
0x09d8…09f7 at001c = ╱ef╱$╱ // 0x9f4 @0x1c
0x09d8…09f7 at001d = ╱ee╱)╱ // 0x9f5 @0x1d
0x09d8…09f7 at001e = EOL // 0x9f6 @0x1e
0x09d8…09f7 }
0x09f7…0a01 9758 0880 CLOSE K32$
0x09f7…0a01 LineComalBin {
0x09f7…0a01 ptr = 0x9758 // 0x9f7 @0x0
0x09f7…0a01 lno = 0x0370 // 0x9f9 @0x2
0x09f7…0a01 at0004 = ╱a8╱ CLOSE ╱ // 0x9fb @0x4
0x09f7…0a01 at0005 = ╱4b╱K╱ // 0x9fc @0x5
0x09f7…0a01 at0006 = ╱33╱3╱ // 0x9fd @0x6
0x09f7…0a01 at0007 = ╱32╱2╱ // 0x9fe @0x7
0x09f7…0a01 at0008 = ╱ef╱$╱ // 0x9ff @0x8
0x09f7…0a01 at0009 = EOL // 0xa00 @0x9
0x09f7…0a01 }
0x0a01…0a20 9777 0890 EXEC FEJL(15,7,K32$)
0x0a01…0a20 LineComalBin {
0x0a01…0a20 ptr = 0x9777 // 0xa01 @0x0
0x0a01…0a20 lno = 0x037a // 0xa03 @0x2
0x0a01…0a20 at0004 = ╱9d╱ EXEC ╱ // 0xa05 @0x4
0x0a01…0a20 at0005 = ╱46╱F╱ // 0xa06 @0x5
0x0a01…0a20 at0006 = ╱45╱E╱ // 0xa07 @0x6
0x0a01…0a20 at0007 = ╱4a╱J╱ // 0xa08 @0x7
0x0a01…0a20 at0008 = ╱4c╱L╱ // 0xa09 @0x8
0x0a01…0a20 at0009 = ╱ed╱(╱ // 0xa0a @0x9
0x0a01…0a20 at000a = ╱31╱1╱ // 0xa0b @0xa
0x0a01…0a20 at000b = ╱35╱5╱ // 0xa0c @0xb
0x0a01…0a20 at000c = ╱fe0000f004╱ // 0xa0d @0xc
0x0a01…0a20 at0011 = ╱ec╱,╱ // 0xa12 @0x11
0x0a01…0a20 at0012 = ╱37╱7╱ // 0xa13 @0x12
0x0a01…0a20 at0013 = ╱fe0000e003╱ // 0xa14 @0x13
0x0a01…0a20 at0018 = ╱ec╱,╱ // 0xa19 @0x18
0x0a01…0a20 at0019 = ╱4b╱K╱ // 0xa1a @0x19
0x0a01…0a20 at001a = ╱33╱3╱ // 0xa1b @0x1a
0x0a01…0a20 at001b = ╱32╱2╱ // 0xa1c @0x1b
0x0a01…0a20 at001c = ╱ef╱$╱ // 0xa1d @0x1c
0x0a01…0a20 at001d = ╱ee╱)╱ // 0xa1e @0x1d
0x0a01…0a20 at001e = EOL // 0xa1f @0x1e
0x0a01…0a20 }
0x0a20…0a2e 9785 0900 ENDPROC ;TABINIT
0x0a20…0a2e LineComalBin {
0x0a20…0a2e ptr = 0x9785 // 0xa20 @0x0
0x0a20…0a2e lno = 0x0384 // 0xa22 @0x2
0x0a20…0a2e at0004 = ╱9f╱ ENDPROC ╱ // 0xa24 @0x4
0x0a20…0a2e at0005 = ╱eb╱;╱ // 0xa25 @0x5
0x0a20…0a2e at0006 = ╱54╱T╱ // 0xa26 @0x6
0x0a20…0a2e at0007 = ╱41╱A╱ // 0xa27 @0x7
0x0a20…0a2e at0008 = ╱42╱B╱ // 0xa28 @0x8
0x0a20…0a2e at0009 = ╱49╱I╱ // 0xa29 @0x9
0x0a20…0a2e at000a = ╱4e╱N╱ // 0xa2a @0xa
0x0a20…0a2e at000b = ╱49╱I╱ // 0xa2b @0xb
0x0a20…0a2e at000c = ╱54╱T╱ // 0xa2c @0xc
0x0a20…0a2e at000d = EOL // 0xa2d @0xd
0x0a20…0a2e }
0x0a2e…0a42 9799 0910 PROC UNDUD(V3,U2,T)
0x0a2e…0a42 LineComalBin {
0x0a2e…0a42 ptr = 0x9799 // 0xa2e @0x0
0x0a2e…0a42 lno = 0x038e // 0xa30 @0x2
0x0a2e…0a42 at0004 = ╱9e╱ PROC ╱ // 0xa32 @0x4
0x0a2e…0a42 at0005 = ╱55╱U╱ // 0xa33 @0x5
0x0a2e…0a42 at0006 = ╱4e╱N╱ // 0xa34 @0x6
0x0a2e…0a42 at0007 = ╱44╱D╱ // 0xa35 @0x7
0x0a2e…0a42 at0008 = ╱55╱U╱ // 0xa36 @0x8
0x0a2e…0a42 at0009 = ╱44╱D╱ // 0xa37 @0x9
0x0a2e…0a42 at000a = ╱ed╱(╱ // 0xa38 @0xa
0x0a2e…0a42 at000b = ╱56╱V╱ // 0xa39 @0xb
0x0a2e…0a42 at000c = ╱33╱3╱ // 0xa3a @0xc
0x0a2e…0a42 at000d = ╱ec╱,╱ // 0xa3b @0xd
0x0a2e…0a42 at000e = ╱55╱U╱ // 0xa3c @0xe
0x0a2e…0a42 at000f = ╱32╱2╱ // 0xa3d @0xf
0x0a2e…0a42 at0010 = ╱ec╱,╱ // 0xa3e @0x10
0x0a2e…0a42 at0011 = ╱54╱T╱ // 0xa3f @0x11
0x0a2e…0a42 at0012 = ╱ee╱)╱ // 0xa40 @0x12
0x0a2e…0a42 at0013 = EOL // 0xa41 @0x13
0x0a2e…0a42 }
0x0a42…0a90 97e7 0920 PUT V3$,U2:T(E,E),T(E,G),T(G,E),T(G,G),T(V,E),T(V,G),T(4,E),T(4,G)
0x0a42…0a90 LineComalBin {
0x0a42…0a90 ptr = 0x97e7 // 0xa42 @0x0
0x0a42…0a90 lno = 0x0398 // 0xa44 @0x2
0x0a42…0a90 at0004 = ╱aa╱ PUT ╱ // 0xa46 @0x4
0x0a42…0a90 at0005 = ╱56╱V╱ // 0xa47 @0x5
0x0a42…0a90 at0006 = ╱33╱3╱ // 0xa48 @0x6
0x0a42…0a90 at0007 = ╱ef╱$╱ // 0xa49 @0x7
0x0a42…0a90 at0008 = ╱ec╱,╱ // 0xa4a @0x8
0x0a42…0a90 at0009 = ╱55╱U╱ // 0xa4b @0x9
0x0a42…0a90 at000a = ╱32╱2╱ // 0xa4c @0xa
0x0a42…0a90 at000b = ╱f0╱:╱ // 0xa4d @0xb
0x0a42…0a90 at000c = ╱54╱T╱ // 0xa4e @0xc
0x0a42…0a90 at000d = ╱ed╱(╱ // 0xa4f @0xd
0x0a42…0a90 at000e = ╱45╱E╱ // 0xa50 @0xe
0x0a42…0a90 at000f = ╱ec╱,╱ // 0xa51 @0xf
0x0a42…0a90 at0010 = ╱45╱E╱ // 0xa52 @0x10
0x0a42…0a90 at0011 = ╱ee╱)╱ // 0xa53 @0x11
0x0a42…0a90 at0012 = ╱ec╱,╱ // 0xa54 @0x12
0x0a42…0a90 at0013 = ╱54╱T╱ // 0xa55 @0x13
0x0a42…0a90 at0014 = ╱ed╱(╱ // 0xa56 @0x14
0x0a42…0a90 at0015 = ╱45╱E╱ // 0xa57 @0x15
0x0a42…0a90 at0016 = ╱ec╱,╱ // 0xa58 @0x16
0x0a42…0a90 at0017 = ╱47╱G╱ // 0xa59 @0x17
0x0a42…0a90 at0018 = ╱ee╱)╱ // 0xa5a @0x18
0x0a42…0a90 at0019 = ╱ec╱,╱ // 0xa5b @0x19
0x0a42…0a90 at001a = ╱54╱T╱ // 0xa5c @0x1a
0x0a42…0a90 at001b = ╱ed╱(╱ // 0xa5d @0x1b
0x0a42…0a90 at001c = ╱47╱G╱ // 0xa5e @0x1c
0x0a42…0a90 at001d = ╱ec╱,╱ // 0xa5f @0x1d
0x0a42…0a90 at001e = ╱45╱E╱ // 0xa60 @0x1e
0x0a42…0a90 at001f = ╱ee╱)╱ // 0xa61 @0x1f
0x0a42…0a90 at0020 = ╱ec╱,╱ // 0xa62 @0x20
0x0a42…0a90 at0021 = ╱54╱T╱ // 0xa63 @0x21
0x0a42…0a90 at0022 = ╱ed╱(╱ // 0xa64 @0x22
0x0a42…0a90 at0023 = ╱47╱G╱ // 0xa65 @0x23
0x0a42…0a90 at0024 = ╱ec╱,╱ // 0xa66 @0x24
0x0a42…0a90 at0025 = ╱47╱G╱ // 0xa67 @0x25
0x0a42…0a90 at0026 = ╱ee╱)╱ // 0xa68 @0x26
0x0a42…0a90 at0027 = ╱ec╱,╱ // 0xa69 @0x27
0x0a42…0a90 at0028 = ╱54╱T╱ // 0xa6a @0x28
0x0a42…0a90 at0029 = ╱ed╱(╱ // 0xa6b @0x29
0x0a42…0a90 at002a = ╱56╱V╱ // 0xa6c @0x2a
0x0a42…0a90 at002b = ╱ec╱,╱ // 0xa6d @0x2b
0x0a42…0a90 at002c = ╱45╱E╱ // 0xa6e @0x2c
0x0a42…0a90 at002d = ╱ee╱)╱ // 0xa6f @0x2d
0x0a42…0a90 at002e = ╱ec╱,╱ // 0xa70 @0x2e
0x0a42…0a90 at002f = ╱54╱T╱ // 0xa71 @0x2f
0x0a42…0a90 at0030 = ╱ed╱(╱ // 0xa72 @0x30
0x0a42…0a90 at0031 = ╱56╱V╱ // 0xa73 @0x31
0x0a42…0a90 at0032 = ╱ec╱,╱ // 0xa74 @0x32
0x0a42…0a90 at0033 = ╱47╱G╱ // 0xa75 @0x33
0x0a42…0a90 at0034 = ╱ee╱)╱ // 0xa76 @0x34
0x0a42…0a90 at0035 = ╱ec╱,╱ // 0xa77 @0x35
0x0a42…0a90 at0036 = ╱54╱T╱ // 0xa78 @0x36
0x0a42…0a90 at0037 = ╱ed╱(╱ // 0xa79 @0x37
0x0a42…0a90 at0038 = ╱34╱4╱ // 0xa7a @0x38
0x0a42…0a90 at0039 = ╱fe00008003╱ // 0xa7b @0x39
0x0a42…0a90 at003e = ╱ec╱,╱ // 0xa80 @0x3e
0x0a42…0a90 at003f = ╱45╱E╱ // 0xa81 @0x3f
0x0a42…0a90 at0040 = ╱ee╱)╱ // 0xa82 @0x40
0x0a42…0a90 at0041 = ╱ec╱,╱ // 0xa83 @0x41
0x0a42…0a90 at0042 = ╱54╱T╱ // 0xa84 @0x42
0x0a42…0a90 at0043 = ╱ed╱(╱ // 0xa85 @0x43
0x0a42…0a90 at0044 = ╱34╱4╱ // 0xa86 @0x44
0x0a42…0a90 at0045 = ╱fe00008003╱ // 0xa87 @0x45
0x0a42…0a90 at004a = ╱ec╱,╱ // 0xa8c @0x4a
0x0a42…0a90 at004b = ╱47╱G╱ // 0xa8d @0x4b
0x0a42…0a90 at004c = ╱ee╱)╱ // 0xa8e @0x4c
0x0a42…0a90 at004d = EOL // 0xa8f @0x4d
0x0a42…0a90 }
0x0a90…0aa9 9800 0930 EXEC FEJL(16,E,V3$)
0x0a90…0aa9 LineComalBin {
0x0a90…0aa9 ptr = 0x9800 // 0xa90 @0x0
0x0a90…0aa9 lno = 0x03a2 // 0xa92 @0x2
0x0a90…0aa9 at0004 = ╱9d╱ EXEC ╱ // 0xa94 @0x4
0x0a90…0aa9 at0005 = ╱46╱F╱ // 0xa95 @0x5
0x0a90…0aa9 at0006 = ╱45╱E╱ // 0xa96 @0x6
0x0a90…0aa9 at0007 = ╱4a╱J╱ // 0xa97 @0x7
0x0a90…0aa9 at0008 = ╱4c╱L╱ // 0xa98 @0x8
0x0a90…0aa9 at0009 = ╱ed╱(╱ // 0xa99 @0x9
0x0a90…0aa9 at000a = ╱31╱1╱ // 0xa9a @0xa
0x0a90…0aa9 at000b = ╱36╱6╱ // 0xa9b @0xb
0x0a90…0aa9 at000c = ╱fe00008005╱ // 0xa9c @0xc
0x0a90…0aa9 at0011 = ╱ec╱,╱ // 0xaa1 @0x11
0x0a90…0aa9 at0012 = ╱45╱E╱ // 0xaa2 @0x12
0x0a90…0aa9 at0013 = ╱ec╱,╱ // 0xaa3 @0x13
0x0a90…0aa9 at0014 = ╱56╱V╱ // 0xaa4 @0x14
0x0a90…0aa9 at0015 = ╱33╱3╱ // 0xaa5 @0x15
0x0a90…0aa9 at0016 = ╱ef╱$╱ // 0xaa6 @0x16
0x0a90…0aa9 at0017 = ╱ee╱)╱ // 0xaa7 @0x17
0x0a90…0aa9 at0018 = EOL // 0xaa8 @0x18
0x0a90…0aa9 }
0x0aa9…0ab5 980c 0940 ENDPROC ;UNDUD
0x0aa9…0ab5 LineComalBin {
0x0aa9…0ab5 ptr = 0x980c // 0xaa9 @0x0
0x0aa9…0ab5 lno = 0x03ac // 0xaab @0x2
0x0aa9…0ab5 at0004 = ╱9f╱ ENDPROC ╱ // 0xaad @0x4
0x0aa9…0ab5 at0005 = ╱eb╱;╱ // 0xaae @0x5
0x0aa9…0ab5 at0006 = ╱55╱U╱ // 0xaaf @0x6
0x0aa9…0ab5 at0007 = ╱4e╱N╱ // 0xab0 @0x7
0x0aa9…0ab5 at0008 = ╱44╱D╱ // 0xab1 @0x8
0x0aa9…0ab5 at0009 = ╱55╱U╱ // 0xab2 @0x9
0x0aa9…0ab5 at000a = ╱44╱D╱ // 0xab3 @0xa
0x0aa9…0ab5 at000b = EOL // 0xab4 @0xb
0x0aa9…0ab5 }
0x0ab5…0ad2 9829 0950 PROC HOVUD(V4,MPOSTANTAL4,S)
0x0ab5…0ad2 LineComalBin {
0x0ab5…0ad2 ptr = 0x9829 // 0xab5 @0x0
0x0ab5…0ad2 lno = 0x03b6 // 0xab7 @0x2
0x0ab5…0ad2 at0004 = ╱9e╱ PROC ╱ // 0xab9 @0x4
0x0ab5…0ad2 at0005 = ╱48╱H╱ // 0xaba @0x5
0x0ab5…0ad2 at0006 = ╱4f╱O╱ // 0xabb @0x6
0x0ab5…0ad2 at0007 = ╱56╱V╱ // 0xabc @0x7
0x0ab5…0ad2 at0008 = ╱55╱U╱ // 0xabd @0x8
0x0ab5…0ad2 at0009 = ╱44╱D╱ // 0xabe @0x9
0x0ab5…0ad2 at000a = ╱ed╱(╱ // 0xabf @0xa
0x0ab5…0ad2 at000b = ╱56╱V╱ // 0xac0 @0xb
0x0ab5…0ad2 at000c = ╱34╱4╱ // 0xac1 @0xc
0x0ab5…0ad2 at000d = ╱ec╱,╱ // 0xac2 @0xd
0x0ab5…0ad2 at000e = ╱4d╱M╱ // 0xac3 @0xe
0x0ab5…0ad2 at000f = ╱50╱P╱ // 0xac4 @0xf
0x0ab5…0ad2 at0010 = ╱4f╱O╱ // 0xac5 @0x10
0x0ab5…0ad2 at0011 = ╱53╱S╱ // 0xac6 @0x11
0x0ab5…0ad2 at0012 = ╱54╱T╱ // 0xac7 @0x12
0x0ab5…0ad2 at0013 = ╱41╱A╱ // 0xac8 @0x13
0x0ab5…0ad2 at0014 = ╱4e╱N╱ // 0xac9 @0x14
0x0ab5…0ad2 at0015 = ╱54╱T╱ // 0xaca @0x15
0x0ab5…0ad2 at0016 = ╱41╱A╱ // 0xacb @0x16
0x0ab5…0ad2 at0017 = ╱4c╱L╱ // 0xacc @0x17
0x0ab5…0ad2 at0018 = ╱34╱4╱ // 0xacd @0x18
0x0ab5…0ad2 at0019 = ╱ec╱,╱ // 0xace @0x19
0x0ab5…0ad2 at001a = ╱53╱S╱ // 0xacf @0x1a
0x0ab5…0ad2 at001b = ╱ee╱)╱ // 0xad0 @0x1b
0x0ab5…0ad2 at001c = EOL // 0xad1 @0x1c
0x0ab5…0ad2 }
0x0ad2…0af0 9847 0960 FOR I=E TO MPOSTANTAL4 DIV 160
0x0ad2…0af0 LineComalBin {
0x0ad2…0af0 ptr = 0x9847 // 0xad2 @0x0
0x0ad2…0af0 lno = 0x03c0 // 0xad4 @0x2
0x0ad2…0af0 at0004 = ╱83╱ FOR ╱ // 0xad6 @0x4
0x0ad2…0af0 at0005 = ╱49╱I╱ // 0xad7 @0x5
0x0ad2…0af0 at0006 = ╱dc╱=╱ // 0xad8 @0x6
0x0ad2…0af0 at0007 = ╱45╱E╱ // 0xad9 @0x7
0x0ad2…0af0 at0008 = ╱b7╱ TO ╱ // 0xada @0x8
0x0ad2…0af0 at0009 = ╱4d╱M╱ // 0xadb @0x9
0x0ad2…0af0 at000a = ╱50╱P╱ // 0xadc @0xa
0x0ad2…0af0 at000b = ╱4f╱O╱ // 0xadd @0xb
0x0ad2…0af0 at000c = ╱53╱S╱ // 0xade @0xc
0x0ad2…0af0 at000d = ╱54╱T╱ // 0xadf @0xd
0x0ad2…0af0 at000e = ╱41╱A╱ // 0xae0 @0xe
0x0ad2…0af0 at000f = ╱4e╱N╱ // 0xae1 @0xf
0x0ad2…0af0 at0010 = ╱54╱T╱ // 0xae2 @0x10
0x0ad2…0af0 at0011 = ╱41╱A╱ // 0xae3 @0x11
0x0ad2…0af0 at0012 = ╱4c╱L╱ // 0xae4 @0x12
0x0ad2…0af0 at0013 = ╱34╱4╱ // 0xae5 @0x13
0x0ad2…0af0 at0014 = ╱e7╱ DIV ╱ // 0xae6 @0x14
0x0ad2…0af0 at0015 = ╱31╱1╱ // 0xae7 @0x15
0x0ad2…0af0 at0016 = ╱36╱6╱ // 0xae8 @0x16
0x0ad2…0af0 at0017 = ╱30╱0╱ // 0xae9 @0x17
0x0ad2…0af0 at0018 = ╱fe0000a008╱ // 0xaea @0x18
0x0ad2…0af0 at001d = EOL // 0xaef @0x1d
0x0ad2…0af0 }
0x0af0…0b1a 9871 0970 J=(I-E)*4+E;J1=J+E;J2=J+G;J3=J+V
0x0af0…0b1a LineComalBin {
0x0af0…0b1a ptr = 0x9871 // 0xaf0 @0x0
0x0af0…0b1a lno = 0x03ca // 0xaf2 @0x2
0x0af0…0b1a at0004 = ╱4a╱J╱ // 0xaf4 @0x4
0x0af0…0b1a at0005 = ╱dc╱=╱ // 0xaf5 @0x5
0x0af0…0b1a at0006 = ╱ed╱(╱ // 0xaf6 @0x6
0x0af0…0b1a at0007 = ╱49╱I╱ // 0xaf7 @0x7
0x0af0…0b1a at0008 = ╱e3╱-╱ // 0xaf8 @0x8
0x0af0…0b1a at0009 = ╱45╱E╱ // 0xaf9 @0x9
0x0af0…0b1a at000a = ╱ee╱)╱ // 0xafa @0xa
0x0af0…0b1a at000b = ╱e4╱*╱ // 0xafb @0xb
0x0af0…0b1a at000c = ╱34╱4╱ // 0xafc @0xc
0x0af0…0b1a at000d = ╱fe00008003╱ // 0xafd @0xd
0x0af0…0b1a at0012 = ╱e2╱+╱ // 0xb02 @0x12
0x0af0…0b1a at0013 = ╱45╱E╱ // 0xb03 @0x13
0x0af0…0b1a at0014 = ╱eb╱;╱ // 0xb04 @0x14
0x0af0…0b1a at0015 = ╱4a╱J╱ // 0xb05 @0x15
0x0af0…0b1a at0016 = ╱31╱1╱ // 0xb06 @0x16
0x0af0…0b1a at0017 = ╱dc╱=╱ // 0xb07 @0x17
0x0af0…0b1a at0018 = ╱4a╱J╱ // 0xb08 @0x18
0x0af0…0b1a at0019 = ╱e2╱+╱ // 0xb09 @0x19
0x0af0…0b1a at001a = ╱45╱E╱ // 0xb0a @0x1a
0x0af0…0b1a at001b = ╱eb╱;╱ // 0xb0b @0x1b
0x0af0…0b1a at001c = ╱4a╱J╱ // 0xb0c @0x1c
0x0af0…0b1a at001d = ╱32╱2╱ // 0xb0d @0x1d
0x0af0…0b1a at001e = ╱dc╱=╱ // 0xb0e @0x1e
0x0af0…0b1a at001f = ╱4a╱J╱ // 0xb0f @0x1f
0x0af0…0b1a at0020 = ╱e2╱+╱ // 0xb10 @0x20
0x0af0…0b1a at0021 = ╱47╱G╱ // 0xb11 @0x21
0x0af0…0b1a at0022 = ╱eb╱;╱ // 0xb12 @0x22
0x0af0…0b1a at0023 = ╱4a╱J╱ // 0xb13 @0x23
0x0af0…0b1a at0024 = ╱33╱3╱ // 0xb14 @0x24
0x0af0…0b1a at0025 = ╱dc╱=╱ // 0xb15 @0x25
0x0af0…0b1a at0026 = ╱4a╱J╱ // 0xb16 @0x26
0x0af0…0b1a at0027 = ╱e2╱+╱ // 0xb17 @0x27
0x0af0…0b1a at0028 = ╱56╱V╱ // 0xb18 @0x28
0x0af0…0b1a at0029 = EOL // 0xb19 @0x29
0x0af0…0b1a }
0x0b1a…0b63 98ba 0980 PUT V4$,I:S(J,E),S(J,G),S(J1,E),S(J1,G),S(J2,E),S(J2,G),S(J3,E),S(J3,G)
0x0b1a…0b63 LineComalBin {
0x0b1a…0b63 ptr = 0x98ba // 0xb1a @0x0
0x0b1a…0b63 lno = 0x03d4 // 0xb1c @0x2
0x0b1a…0b63 at0004 = ╱aa╱ PUT ╱ // 0xb1e @0x4
0x0b1a…0b63 at0005 = ╱56╱V╱ // 0xb1f @0x5
0x0b1a…0b63 at0006 = ╱34╱4╱ // 0xb20 @0x6
0x0b1a…0b63 at0007 = ╱ef╱$╱ // 0xb21 @0x7
0x0b1a…0b63 at0008 = ╱ec╱,╱ // 0xb22 @0x8
0x0b1a…0b63 at0009 = ╱49╱I╱ // 0xb23 @0x9
0x0b1a…0b63 at000a = ╱f0╱:╱ // 0xb24 @0xa
0x0b1a…0b63 at000b = ╱53╱S╱ // 0xb25 @0xb
0x0b1a…0b63 at000c = ╱ed╱(╱ // 0xb26 @0xc
0x0b1a…0b63 at000d = ╱4a╱J╱ // 0xb27 @0xd
0x0b1a…0b63 at000e = ╱ec╱,╱ // 0xb28 @0xe
0x0b1a…0b63 at000f = ╱45╱E╱ // 0xb29 @0xf
0x0b1a…0b63 at0010 = ╱ee╱)╱ // 0xb2a @0x10
0x0b1a…0b63 at0011 = ╱ec╱,╱ // 0xb2b @0x11
0x0b1a…0b63 at0012 = ╱53╱S╱ // 0xb2c @0x12
0x0b1a…0b63 at0013 = ╱ed╱(╱ // 0xb2d @0x13
0x0b1a…0b63 at0014 = ╱4a╱J╱ // 0xb2e @0x14
0x0b1a…0b63 at0015 = ╱ec╱,╱ // 0xb2f @0x15
0x0b1a…0b63 at0016 = ╱47╱G╱ // 0xb30 @0x16
0x0b1a…0b63 at0017 = ╱ee╱)╱ // 0xb31 @0x17
0x0b1a…0b63 at0018 = ╱ec╱,╱ // 0xb32 @0x18
0x0b1a…0b63 at0019 = ╱53╱S╱ // 0xb33 @0x19
0x0b1a…0b63 at001a = ╱ed╱(╱ // 0xb34 @0x1a
0x0b1a…0b63 at001b = ╱4a╱J╱ // 0xb35 @0x1b
0x0b1a…0b63 at001c = ╱31╱1╱ // 0xb36 @0x1c
0x0b1a…0b63 at001d = ╱ec╱,╱ // 0xb37 @0x1d
0x0b1a…0b63 at001e = ╱45╱E╱ // 0xb38 @0x1e
0x0b1a…0b63 at001f = ╱ee╱)╱ // 0xb39 @0x1f
0x0b1a…0b63 at0020 = ╱ec╱,╱ // 0xb3a @0x20
0x0b1a…0b63 at0021 = ╱53╱S╱ // 0xb3b @0x21
0x0b1a…0b63 at0022 = ╱ed╱(╱ // 0xb3c @0x22
0x0b1a…0b63 at0023 = ╱4a╱J╱ // 0xb3d @0x23
0x0b1a…0b63 at0024 = ╱31╱1╱ // 0xb3e @0x24
0x0b1a…0b63 at0025 = ╱ec╱,╱ // 0xb3f @0x25
0x0b1a…0b63 at0026 = ╱47╱G╱ // 0xb40 @0x26
0x0b1a…0b63 at0027 = ╱ee╱)╱ // 0xb41 @0x27
0x0b1a…0b63 at0028 = ╱ec╱,╱ // 0xb42 @0x28
0x0b1a…0b63 at0029 = ╱53╱S╱ // 0xb43 @0x29
0x0b1a…0b63 at002a = ╱ed╱(╱ // 0xb44 @0x2a
0x0b1a…0b63 at002b = ╱4a╱J╱ // 0xb45 @0x2b
0x0b1a…0b63 at002c = ╱32╱2╱ // 0xb46 @0x2c
0x0b1a…0b63 at002d = ╱ec╱,╱ // 0xb47 @0x2d
0x0b1a…0b63 at002e = ╱45╱E╱ // 0xb48 @0x2e
0x0b1a…0b63 at002f = ╱ee╱)╱ // 0xb49 @0x2f
0x0b1a…0b63 at0030 = ╱ec╱,╱ // 0xb4a @0x30
0x0b1a…0b63 at0031 = ╱53╱S╱ // 0xb4b @0x31
0x0b1a…0b63 at0032 = ╱ed╱(╱ // 0xb4c @0x32
0x0b1a…0b63 at0033 = ╱4a╱J╱ // 0xb4d @0x33
0x0b1a…0b63 at0034 = ╱32╱2╱ // 0xb4e @0x34
0x0b1a…0b63 at0035 = ╱ec╱,╱ // 0xb4f @0x35
0x0b1a…0b63 at0036 = ╱47╱G╱ // 0xb50 @0x36
0x0b1a…0b63 at0037 = ╱ee╱)╱ // 0xb51 @0x37
0x0b1a…0b63 at0038 = ╱ec╱,╱ // 0xb52 @0x38
0x0b1a…0b63 at0039 = ╱53╱S╱ // 0xb53 @0x39
0x0b1a…0b63 at003a = ╱ed╱(╱ // 0xb54 @0x3a
0x0b1a…0b63 at003b = ╱4a╱J╱ // 0xb55 @0x3b
0x0b1a…0b63 at003c = ╱33╱3╱ // 0xb56 @0x3c
0x0b1a…0b63 at003d = ╱ec╱,╱ // 0xb57 @0x3d
0x0b1a…0b63 at003e = ╱45╱E╱ // 0xb58 @0x3e
0x0b1a…0b63 at003f = ╱ee╱)╱ // 0xb59 @0x3f
0x0b1a…0b63 at0040 = ╱ec╱,╱ // 0xb5a @0x40
0x0b1a…0b63 at0041 = ╱53╱S╱ // 0xb5b @0x41
0x0b1a…0b63 at0042 = ╱ed╱(╱ // 0xb5c @0x42
0x0b1a…0b63 at0043 = ╱4a╱J╱ // 0xb5d @0x43
0x0b1a…0b63 at0044 = ╱33╱3╱ // 0xb5e @0x44
0x0b1a…0b63 at0045 = ╱ec╱,╱ // 0xb5f @0x45
0x0b1a…0b63 at0046 = ╱47╱G╱ // 0xb60 @0x46
0x0b1a…0b63 at0047 = ╱ee╱)╱ // 0xb61 @0x47
0x0b1a…0b63 at0048 = EOL // 0xb62 @0x48
0x0b1a…0b63 }
0x0b63…0b7c 98d3 0990 EXEC FEJL(17,G,V4$)
0x0b63…0b7c LineComalBin {
0x0b63…0b7c ptr = 0x98d3 // 0xb63 @0x0
0x0b63…0b7c lno = 0x03de // 0xb65 @0x2
0x0b63…0b7c at0004 = ╱9d╱ EXEC ╱ // 0xb67 @0x4
0x0b63…0b7c at0005 = ╱46╱F╱ // 0xb68 @0x5
0x0b63…0b7c at0006 = ╱45╱E╱ // 0xb69 @0x6
0x0b63…0b7c at0007 = ╱4a╱J╱ // 0xb6a @0x7
0x0b63…0b7c at0008 = ╱4c╱L╱ // 0xb6b @0x8
0x0b63…0b7c at0009 = ╱ed╱(╱ // 0xb6c @0x9
0x0b63…0b7c at000a = ╱31╱1╱ // 0xb6d @0xa
0x0b63…0b7c at000b = ╱37╱7╱ // 0xb6e @0xb
0x0b63…0b7c at000c = ╱fe00008805╱ // 0xb6f @0xc
0x0b63…0b7c at0011 = ╱ec╱,╱ // 0xb74 @0x11
0x0b63…0b7c at0012 = ╱47╱G╱ // 0xb75 @0x12
0x0b63…0b7c at0013 = ╱ec╱,╱ // 0xb76 @0x13
0x0b63…0b7c at0014 = ╱56╱V╱ // 0xb77 @0x14
0x0b63…0b7c at0015 = ╱34╱4╱ // 0xb78 @0x15
0x0b63…0b7c at0016 = ╱ef╱$╱ // 0xb79 @0x16
0x0b63…0b7c at0017 = ╱ee╱)╱ // 0xb7a @0x17
0x0b63…0b7c at0018 = EOL // 0xb7b @0x18
0x0b63…0b7c }
0x0b7c…0b83 98da 1000 NEXT I
0x0b7c…0b83 LineComalBin {
0x0b7c…0b83 ptr = 0x98da // 0xb7c @0x0
0x0b7c…0b83 lno = 0x03e8 // 0xb7e @0x2
0x0b7c…0b83 at0004 = ╱84╱ NEXT ╱ // 0xb80 @0x4
0x0b7c…0b83 at0005 = ╱49╱I╱ // 0xb81 @0x5
0x0b7c…0b83 at0006 = EOL // 0xb82 @0x6
0x0b7c…0b83 }
0x0b83…0b89 98e0 1010 ENDPROC
0x0b83…0b89 LineComalBin {
0x0b83…0b89 ptr = 0x98e0 // 0xb83 @0x0
0x0b83…0b89 lno = 0x03f2 // 0xb85 @0x2
0x0b83…0b89 at0004 = ╱9f╱ ENDPROC ╱ // 0xb87 @0x4
0x0b83…0b89 at0005 = EOL // 0xb88 @0x5
0x0b83…0b89 }
0x0b89…0ba5 98fc 1020 PROC PINIT(K61,MPOSTANTAL8)
0x0b89…0ba5 LineComalBin {
0x0b89…0ba5 ptr = 0x98fc // 0xb89 @0x0
0x0b89…0ba5 lno = 0x03fc // 0xb8b @0x2
0x0b89…0ba5 at0004 = ╱9e╱ PROC ╱ // 0xb8d @0x4
0x0b89…0ba5 at0005 = ╱50╱P╱ // 0xb8e @0x5
0x0b89…0ba5 at0006 = ╱49╱I╱ // 0xb8f @0x6
0x0b89…0ba5 at0007 = ╱4e╱N╱ // 0xb90 @0x7
0x0b89…0ba5 at0008 = ╱49╱I╱ // 0xb91 @0x8
0x0b89…0ba5 at0009 = ╱54╱T╱ // 0xb92 @0x9
0x0b89…0ba5 at000a = ╱ed╱(╱ // 0xb93 @0xa
0x0b89…0ba5 at000b = ╱4b╱K╱ // 0xb94 @0xb
0x0b89…0ba5 at000c = ╱36╱6╱ // 0xb95 @0xc
0x0b89…0ba5 at000d = ╱31╱1╱ // 0xb96 @0xd
0x0b89…0ba5 at000e = ╱ec╱,╱ // 0xb97 @0xe
0x0b89…0ba5 at000f = ╱4d╱M╱ // 0xb98 @0xf
0x0b89…0ba5 at0010 = ╱50╱P╱ // 0xb99 @0x10
0x0b89…0ba5 at0011 = ╱4f╱O╱ // 0xb9a @0x11
0x0b89…0ba5 at0012 = ╱53╱S╱ // 0xb9b @0x12
0x0b89…0ba5 at0013 = ╱54╱T╱ // 0xb9c @0x13
0x0b89…0ba5 at0014 = ╱41╱A╱ // 0xb9d @0x14
0x0b89…0ba5 at0015 = ╱4e╱N╱ // 0xb9e @0x15
0x0b89…0ba5 at0016 = ╱54╱T╱ // 0xb9f @0x16
0x0b89…0ba5 at0017 = ╱41╱A╱ // 0xba0 @0x17
0x0b89…0ba5 at0018 = ╱4c╱L╱ // 0xba1 @0x18
0x0b89…0ba5 at0019 = ╱38╱8╱ // 0xba2 @0x19
0x0b89…0ba5 at001a = ╱ee╱)╱ // 0xba3 @0x1a
0x0b89…0ba5 at001b = EOL // 0xba4 @0x1b
0x0b89…0ba5 }
0x0ba5…0bb1 9908 1030 OPEN K61$,W
0x0ba5…0bb1 LineComalBin {
0x0ba5…0bb1 ptr = 0x9908 // 0xba5 @0x0
0x0ba5…0bb1 lno = 0x0406 // 0xba7 @0x2
0x0ba5…0bb1 at0004 = ╱a7╱ OPEN ╱ // 0xba9 @0x4
0x0ba5…0bb1 at0005 = ╱4b╱K╱ // 0xbaa @0x5
0x0ba5…0bb1 at0006 = ╱36╱6╱ // 0xbab @0x6
0x0ba5…0bb1 at0007 = ╱31╱1╱ // 0xbac @0x7
0x0ba5…0bb1 at0008 = ╱ef╱$╱ // 0xbad @0x8
0x0ba5…0bb1 at0009 = ╱ec╱,╱ // 0xbae @0x9
0x0ba5…0bb1 at000a = ╱57╱W╱ // 0xbaf @0xa
0x0ba5…0bb1 at000b = EOL // 0xbb0 @0xb
0x0ba5…0bb1 }
0x0bb1…0bc5 991c 1040 EXEC FEJL(E,E,K61$)
0x0bb1…0bc5 LineComalBin {
0x0bb1…0bc5 ptr = 0x991c // 0xbb1 @0x0
0x0bb1…0bc5 lno = 0x0410 // 0xbb3 @0x2
0x0bb1…0bc5 at0004 = ╱9d╱ EXEC ╱ // 0xbb5 @0x4
0x0bb1…0bc5 at0005 = ╱46╱F╱ // 0xbb6 @0x5
0x0bb1…0bc5 at0006 = ╱45╱E╱ // 0xbb7 @0x6
0x0bb1…0bc5 at0007 = ╱4a╱J╱ // 0xbb8 @0x7
0x0bb1…0bc5 at0008 = ╱4c╱L╱ // 0xbb9 @0x8
0x0bb1…0bc5 at0009 = ╱ed╱(╱ // 0xbba @0x9
0x0bb1…0bc5 at000a = ╱45╱E╱ // 0xbbb @0xa
0x0bb1…0bc5 at000b = ╱ec╱,╱ // 0xbbc @0xb
0x0bb1…0bc5 at000c = ╱45╱E╱ // 0xbbd @0xc
0x0bb1…0bc5 at000d = ╱ec╱,╱ // 0xbbe @0xd
0x0bb1…0bc5 at000e = ╱4b╱K╱ // 0xbbf @0xe
0x0bb1…0bc5 at000f = ╱36╱6╱ // 0xbc0 @0xf
0x0bb1…0bc5 at0010 = ╱31╱1╱ // 0xbc1 @0x10
0x0bb1…0bc5 at0011 = ╱ef╱$╱ // 0xbc2 @0x11
0x0bb1…0bc5 at0012 = ╱ee╱)╱ // 0xbc3 @0x12
0x0bb1…0bc5 at0013 = EOL // 0xbc4 @0x13
0x0bb1…0bc5 }
0x0bc5…0bda 9931 1050 FOR I=E TO MPOSTANTAL8
0x0bc5…0bda LineComalBin {
0x0bc5…0bda ptr = 0x9931 // 0xbc5 @0x0
0x0bc5…0bda lno = 0x041a // 0xbc7 @0x2
0x0bc5…0bda at0004 = ╱83╱ FOR ╱ // 0xbc9 @0x4
0x0bc5…0bda at0005 = ╱49╱I╱ // 0xbca @0x5
0x0bc5…0bda at0006 = ╱dc╱=╱ // 0xbcb @0x6
0x0bc5…0bda at0007 = ╱45╱E╱ // 0xbcc @0x7
0x0bc5…0bda at0008 = ╱b7╱ TO ╱ // 0xbcd @0x8
0x0bc5…0bda at0009 = ╱4d╱M╱ // 0xbce @0x9
0x0bc5…0bda at000a = ╱50╱P╱ // 0xbcf @0xa
0x0bc5…0bda at000b = ╱4f╱O╱ // 0xbd0 @0xb
0x0bc5…0bda at000c = ╱53╱S╱ // 0xbd1 @0xc
0x0bc5…0bda at000d = ╱54╱T╱ // 0xbd2 @0xd
0x0bc5…0bda at000e = ╱41╱A╱ // 0xbd3 @0xe
0x0bc5…0bda at000f = ╱4e╱N╱ // 0xbd4 @0xf
0x0bc5…0bda at0010 = ╱54╱T╱ // 0xbd5 @0x10
0x0bc5…0bda at0011 = ╱41╱A╱ // 0xbd6 @0x11
0x0bc5…0bda at0012 = ╱4c╱L╱ // 0xbd7 @0x12
0x0bc5…0bda at0013 = ╱38╱8╱ // 0xbd8 @0x13
0x0bc5…0bda at0014 = EOL // 0xbd9 @0x14
0x0bc5…0bda }
0x0bda…0bf2 9949 1060 PUT K61$,I:100000
0x0bda…0bf2 LineComalBin {
0x0bda…0bf2 ptr = 0x9949 // 0xbda @0x0
0x0bda…0bf2 lno = 0x0424 // 0xbdc @0x2
0x0bda…0bf2 at0004 = ╱aa╱ PUT ╱ // 0xbde @0x4
0x0bda…0bf2 at0005 = ╱4b╱K╱ // 0xbdf @0x5
0x0bda…0bf2 at0006 = ╱36╱6╱ // 0xbe0 @0x6
0x0bda…0bf2 at0007 = ╱31╱1╱ // 0xbe1 @0x7
0x0bda…0bf2 at0008 = ╱ef╱$╱ // 0xbe2 @0x8
0x0bda…0bf2 at0009 = ╱ec╱,╱ // 0xbe3 @0x9
0x0bda…0bf2 at000a = ╱49╱I╱ // 0xbe4 @0xa
0x0bda…0bf2 at000b = ╱f0╱:╱ // 0xbe5 @0xb
0x0bda…0bf2 at000c = ╱31╱1╱ // 0xbe6 @0xc
0x0bda…0bf2 at000d = ╱30╱0╱ // 0xbe7 @0xd
0x0bda…0bf2 at000e = ╱30╱0╱ // 0xbe8 @0xe
0x0bda…0bf2 at000f = ╱30╱0╱ // 0xbe9 @0xf
0x0bda…0bf2 at0010 = ╱30╱0╱ // 0xbea @0x10
0x0bda…0bf2 at0011 = ╱30╱0╱ // 0xbeb @0x11
0x0bda…0bf2 at0012 = ╱fe0050c311╱ // 0xbec @0x12
0x0bda…0bf2 at0017 = EOL // 0xbf1 @0x17
0x0bda…0bf2 }
0x0bf2…0c06 995d 1070 EXEC FEJL(E,G,K61$)
0x0bf2…0c06 LineComalBin {
0x0bf2…0c06 ptr = 0x995d // 0xbf2 @0x0
0x0bf2…0c06 lno = 0x042e // 0xbf4 @0x2
0x0bf2…0c06 at0004 = ╱9d╱ EXEC ╱ // 0xbf6 @0x4
0x0bf2…0c06 at0005 = ╱46╱F╱ // 0xbf7 @0x5
0x0bf2…0c06 at0006 = ╱45╱E╱ // 0xbf8 @0x6
0x0bf2…0c06 at0007 = ╱4a╱J╱ // 0xbf9 @0x7
0x0bf2…0c06 at0008 = ╱4c╱L╱ // 0xbfa @0x8
0x0bf2…0c06 at0009 = ╱ed╱(╱ // 0xbfb @0x9
0x0bf2…0c06 at000a = ╱45╱E╱ // 0xbfc @0xa
0x0bf2…0c06 at000b = ╱ec╱,╱ // 0xbfd @0xb
0x0bf2…0c06 at000c = ╱47╱G╱ // 0xbfe @0xc
0x0bf2…0c06 at000d = ╱ec╱,╱ // 0xbff @0xd
0x0bf2…0c06 at000e = ╱4b╱K╱ // 0xc00 @0xe
0x0bf2…0c06 at000f = ╱36╱6╱ // 0xc01 @0xf
0x0bf2…0c06 at0010 = ╱31╱1╱ // 0xc02 @0x10
0x0bf2…0c06 at0011 = ╱ef╱$╱ // 0xc03 @0x11
0x0bf2…0c06 at0012 = ╱ee╱)╱ // 0xc04 @0x12
0x0bf2…0c06 at0013 = EOL // 0xc05 @0x13
0x0bf2…0c06 }
0x0c06…0c0d 9964 1080 NEXT I
0x0c06…0c0d LineComalBin {
0x0c06…0c0d ptr = 0x9964 // 0xc06 @0x0
0x0c06…0c0d lno = 0x0438 // 0xc08 @0x2
0x0c06…0c0d at0004 = ╱84╱ NEXT ╱ // 0xc0a @0x4
0x0c06…0c0d at0005 = ╱49╱I╱ // 0xc0b @0x5
0x0c06…0c0d at0006 = EOL // 0xc0c @0x6
0x0c06…0c0d }
0x0c0d…0c17 996e 1090 CLOSE K61$
0x0c0d…0c17 LineComalBin {
0x0c0d…0c17 ptr = 0x996e // 0xc0d @0x0
0x0c0d…0c17 lno = 0x0442 // 0xc0f @0x2
0x0c0d…0c17 at0004 = ╱a8╱ CLOSE ╱ // 0xc11 @0x4
0x0c0d…0c17 at0005 = ╱4b╱K╱ // 0xc12 @0x5
0x0c0d…0c17 at0006 = ╱36╱6╱ // 0xc13 @0x6
0x0c0d…0c17 at0007 = ╱31╱1╱ // 0xc14 @0x7
0x0c0d…0c17 at0008 = ╱ef╱$╱ // 0xc15 @0x8
0x0c0d…0c17 at0009 = EOL // 0xc16 @0x9
0x0c0d…0c17 }
0x0c17…0c2b 9982 1100 EXEC FEJL(E,V,K61$)
0x0c17…0c2b LineComalBin {
0x0c17…0c2b ptr = 0x9982 // 0xc17 @0x0
0x0c17…0c2b lno = 0x044c // 0xc19 @0x2
0x0c17…0c2b at0004 = ╱9d╱ EXEC ╱ // 0xc1b @0x4
0x0c17…0c2b at0005 = ╱46╱F╱ // 0xc1c @0x5
0x0c17…0c2b at0006 = ╱45╱E╱ // 0xc1d @0x6
0x0c17…0c2b at0007 = ╱4a╱J╱ // 0xc1e @0x7
0x0c17…0c2b at0008 = ╱4c╱L╱ // 0xc1f @0x8
0x0c17…0c2b at0009 = ╱ed╱(╱ // 0xc20 @0x9
0x0c17…0c2b at000a = ╱45╱E╱ // 0xc21 @0xa
0x0c17…0c2b at000b = ╱ec╱,╱ // 0xc22 @0xb
0x0c17…0c2b at000c = ╱56╱V╱ // 0xc23 @0xc
0x0c17…0c2b at000d = ╱ec╱,╱ // 0xc24 @0xd
0x0c17…0c2b at000e = ╱4b╱K╱ // 0xc25 @0xe
0x0c17…0c2b at000f = ╱36╱6╱ // 0xc26 @0xf
0x0c17…0c2b at0010 = ╱31╱1╱ // 0xc27 @0x10
0x0c17…0c2b at0011 = ╱ef╱$╱ // 0xc28 @0x11
0x0c17…0c2b at0012 = ╱ee╱)╱ // 0xc29 @0x12
0x0c17…0c2b at0013 = EOL // 0xc2a @0x13
0x0c17…0c2b }
0x0c2b…0c31 9988 1110 ENDPROC
0x0c2b…0c31 LineComalBin {
0x0c2b…0c31 ptr = 0x9988 // 0xc2b @0x0
0x0c2b…0c31 lno = 0x0456 // 0xc2d @0x2
0x0c2b…0c31 at0004 = ╱9f╱ ENDPROC ╱ // 0xc2f @0x4
0x0c2b…0c31 at0005 = EOL // 0xc30 @0x5
0x0c2b…0c31 }
0x0c31…0c3f 9996 1120 PROC HENTPOST
0x0c31…0c3f LineComalBin {
0x0c31…0c3f ptr = 0x9996 // 0xc31 @0x0
0x0c31…0c3f lno = 0x0460 // 0xc33 @0x2
0x0c31…0c3f at0004 = ╱9e╱ PROC ╱ // 0xc35 @0x4
0x0c31…0c3f at0005 = ╱48╱H╱ // 0xc36 @0x5
0x0c31…0c3f at0006 = ╱45╱E╱ // 0xc37 @0x6
0x0c31…0c3f at0007 = ╱4e╱N╱ // 0xc38 @0x7
0x0c31…0c3f at0008 = ╱54╱T╱ // 0xc39 @0x8
0x0c31…0c3f at0009 = ╱50╱P╱ // 0xc3a @0x9
0x0c31…0c3f at000a = ╱4f╱O╱ // 0xc3b @0xa
0x0c31…0c3f at000b = ╱53╱S╱ // 0xc3c @0xb
0x0c31…0c3f at000c = ╱54╱T╱ // 0xc3d @0xc
0x0c31…0c3f at000d = EOL // 0xc3e @0xd
0x0c31…0c3f }
0x0c3f…0c54 99ab 1130 S1=FTAB(FPIL3,G)
0x0c3f…0c54 LineComalBin {
0x0c3f…0c54 ptr = 0x99ab // 0xc3f @0x0
0x0c3f…0c54 lno = 0x046a // 0xc41 @0x2
0x0c3f…0c54 at0004 = ╱53╱S╱ // 0xc43 @0x4
0x0c3f…0c54 at0005 = ╱31╱1╱ // 0xc44 @0x5
0x0c3f…0c54 at0006 = ╱dc╱=╱ // 0xc45 @0x6
0x0c3f…0c54 at0007 = ╱46╱F╱ // 0xc46 @0x7
0x0c3f…0c54 at0008 = ╱54╱T╱ // 0xc47 @0x8
0x0c3f…0c54 at0009 = ╱41╱A╱ // 0xc48 @0x9
0x0c3f…0c54 at000a = ╱42╱B╱ // 0xc49 @0xa
0x0c3f…0c54 at000b = ╱ed╱(╱ // 0xc4a @0xb
0x0c3f…0c54 at000c = ╱46╱F╱ // 0xc4b @0xc
0x0c3f…0c54 at000d = ╱50╱P╱ // 0xc4c @0xd
0x0c3f…0c54 at000e = ╱49╱I╱ // 0xc4d @0xe
0x0c3f…0c54 at000f = ╱4c╱L╱ // 0xc4e @0xf
0x0c3f…0c54 at0010 = ╱33╱3╱ // 0xc4f @0x10
0x0c3f…0c54 at0011 = ╱ec╱,╱ // 0xc50 @0x11
0x0c3f…0c54 at0012 = ╱47╱G╱ // 0xc51 @0x12
0x0c3f…0c54 at0013 = ╱ee╱)╱ // 0xc52 @0x13
0x0c3f…0c54 at0014 = EOL // 0xc53 @0x14
0x0c3f…0c54 }
0x0c54…0c6b 99c2 1140 GET K5$,S1:FNR,FNAVN$
0x0c54…0c6b LineComalBin {
0x0c54…0c6b ptr = 0x99c2 // 0xc54 @0x0
0x0c54…0c6b lno = 0x0474 // 0xc56 @0x2
0x0c54…0c6b at0004 = ╱a9╱ GET ╱ // 0xc58 @0x4
0x0c54…0c6b at0005 = ╱4b╱K╱ // 0xc59 @0x5
0x0c54…0c6b at0006 = ╱35╱5╱ // 0xc5a @0x6
0x0c54…0c6b at0007 = ╱ef╱$╱ // 0xc5b @0x7
0x0c54…0c6b at0008 = ╱ec╱,╱ // 0xc5c @0x8
0x0c54…0c6b at0009 = ╱53╱S╱ // 0xc5d @0x9
0x0c54…0c6b at000a = ╱31╱1╱ // 0xc5e @0xa
0x0c54…0c6b at000b = ╱f0╱:╱ // 0xc5f @0xb
0x0c54…0c6b at000c = ╱46╱F╱ // 0xc60 @0xc
0x0c54…0c6b at000d = ╱4e╱N╱ // 0xc61 @0xd
0x0c54…0c6b at000e = ╱52╱R╱ // 0xc62 @0xe
0x0c54…0c6b at000f = ╱ec╱,╱ // 0xc63 @0xf
0x0c54…0c6b at0010 = ╱46╱F╱ // 0xc64 @0x10
0x0c54…0c6b at0011 = ╱4e╱N╱ // 0xc65 @0x11
0x0c54…0c6b at0012 = ╱41╱A╱ // 0xc66 @0x12
0x0c54…0c6b at0013 = ╱56╱V╱ // 0xc67 @0x13
0x0c54…0c6b at0014 = ╱4e╱N╱ // 0xc68 @0x14
0x0c54…0c6b at0015 = ╱ef╱$╱ // 0xc69 @0x15
0x0c54…0c6b at0016 = EOL // 0xc6a @0x16
0x0c54…0c6b }
0x0c6b…0c7e 99d5 1150 EXEC FEJL(G,G,K5$)
0x0c6b…0c7e LineComalBin {
0x0c6b…0c7e ptr = 0x99d5 // 0xc6b @0x0
0x0c6b…0c7e lno = 0x047e // 0xc6d @0x2
0x0c6b…0c7e at0004 = ╱9d╱ EXEC ╱ // 0xc6f @0x4
0x0c6b…0c7e at0005 = ╱46╱F╱ // 0xc70 @0x5
0x0c6b…0c7e at0006 = ╱45╱E╱ // 0xc71 @0x6
0x0c6b…0c7e at0007 = ╱4a╱J╱ // 0xc72 @0x7
0x0c6b…0c7e at0008 = ╱4c╱L╱ // 0xc73 @0x8
0x0c6b…0c7e at0009 = ╱ed╱(╱ // 0xc74 @0x9
0x0c6b…0c7e at000a = ╱47╱G╱ // 0xc75 @0xa
0x0c6b…0c7e at000b = ╱ec╱,╱ // 0xc76 @0xb
0x0c6b…0c7e at000c = ╱47╱G╱ // 0xc77 @0xc
0x0c6b…0c7e at000d = ╱ec╱,╱ // 0xc78 @0xd
0x0c6b…0c7e at000e = ╱4b╱K╱ // 0xc79 @0xe
0x0c6b…0c7e at000f = ╱35╱5╱ // 0xc7a @0xf
0x0c6b…0c7e at0010 = ╱ef╱$╱ // 0xc7b @0x10
0x0c6b…0c7e at0011 = ╱ee╱)╱ // 0xc7c @0x11
0x0c6b…0c7e at0012 = EOL // 0xc7d @0x12
0x0c6b…0c7e }
0x0c7e…0ca7 99fe 1160 GET K5$,S1+E:FMKODE$,FMDEBET$,FMKREDIT$
0x0c7e…0ca7 LineComalBin {
0x0c7e…0ca7 ptr = 0x99fe // 0xc7e @0x0
0x0c7e…0ca7 lno = 0x0488 // 0xc80 @0x2
0x0c7e…0ca7 at0004 = ╱a9╱ GET ╱ // 0xc82 @0x4
0x0c7e…0ca7 at0005 = ╱4b╱K╱ // 0xc83 @0x5
0x0c7e…0ca7 at0006 = ╱35╱5╱ // 0xc84 @0x6
0x0c7e…0ca7 at0007 = ╱ef╱$╱ // 0xc85 @0x7
0x0c7e…0ca7 at0008 = ╱ec╱,╱ // 0xc86 @0x8
0x0c7e…0ca7 at0009 = ╱53╱S╱ // 0xc87 @0x9
0x0c7e…0ca7 at000a = ╱31╱1╱ // 0xc88 @0xa
0x0c7e…0ca7 at000b = ╱e2╱+╱ // 0xc89 @0xb
0x0c7e…0ca7 at000c = ╱45╱E╱ // 0xc8a @0xc
0x0c7e…0ca7 at000d = ╱f0╱:╱ // 0xc8b @0xd
0x0c7e…0ca7 at000e = ╱46╱F╱ // 0xc8c @0xe
0x0c7e…0ca7 at000f = ╱4d╱M╱ // 0xc8d @0xf
0x0c7e…0ca7 at0010 = ╱4b╱K╱ // 0xc8e @0x10
0x0c7e…0ca7 at0011 = ╱4f╱O╱ // 0xc8f @0x11
0x0c7e…0ca7 at0012 = ╱44╱D╱ // 0xc90 @0x12
0x0c7e…0ca7 at0013 = ╱45╱E╱ // 0xc91 @0x13
0x0c7e…0ca7 at0014 = ╱ef╱$╱ // 0xc92 @0x14
0x0c7e…0ca7 at0015 = ╱ec╱,╱ // 0xc93 @0x15
0x0c7e…0ca7 at0016 = ╱46╱F╱ // 0xc94 @0x16
0x0c7e…0ca7 at0017 = ╱4d╱M╱ // 0xc95 @0x17
0x0c7e…0ca7 at0018 = ╱44╱D╱ // 0xc96 @0x18
0x0c7e…0ca7 at0019 = ╱45╱E╱ // 0xc97 @0x19
0x0c7e…0ca7 at001a = ╱42╱B╱ // 0xc98 @0x1a
0x0c7e…0ca7 at001b = ╱45╱E╱ // 0xc99 @0x1b
0x0c7e…0ca7 at001c = ╱54╱T╱ // 0xc9a @0x1c
0x0c7e…0ca7 at001d = ╱ef╱$╱ // 0xc9b @0x1d
0x0c7e…0ca7 at001e = ╱ec╱,╱ // 0xc9c @0x1e
0x0c7e…0ca7 at001f = ╱46╱F╱ // 0xc9d @0x1f
0x0c7e…0ca7 at0020 = ╱4d╱M╱ // 0xc9e @0x20
0x0c7e…0ca7 at0021 = ╱4b╱K╱ // 0xc9f @0x21
0x0c7e…0ca7 at0022 = ╱52╱R╱ // 0xca0 @0x22
0x0c7e…0ca7 at0023 = ╱45╱E╱ // 0xca1 @0x23
0x0c7e…0ca7 at0024 = ╱44╱D╱ // 0xca2 @0x24
0x0c7e…0ca7 at0025 = ╱49╱I╱ // 0xca3 @0x25
0x0c7e…0ca7 at0026 = ╱54╱T╱ // 0xca4 @0x26
0x0c7e…0ca7 at0027 = ╱ef╱$╱ // 0xca5 @0x27
0x0c7e…0ca7 at0028 = EOL // 0xca6 @0x28
0x0c7e…0ca7 }
0x0ca7…0cba 9a11 1170 EXEC FEJL(G,V,K5$)
0x0ca7…0cba LineComalBin {
0x0ca7…0cba ptr = 0x9a11 // 0xca7 @0x0
0x0ca7…0cba lno = 0x0492 // 0xca9 @0x2
0x0ca7…0cba at0004 = ╱9d╱ EXEC ╱ // 0xcab @0x4
0x0ca7…0cba at0005 = ╱46╱F╱ // 0xcac @0x5
0x0ca7…0cba at0006 = ╱45╱E╱ // 0xcad @0x6
0x0ca7…0cba at0007 = ╱4a╱J╱ // 0xcae @0x7
0x0ca7…0cba at0008 = ╱4c╱L╱ // 0xcaf @0x8
0x0ca7…0cba at0009 = ╱ed╱(╱ // 0xcb0 @0x9
0x0ca7…0cba at000a = ╱47╱G╱ // 0xcb1 @0xa
0x0ca7…0cba at000b = ╱ec╱,╱ // 0xcb2 @0xb
0x0ca7…0cba at000c = ╱56╱V╱ // 0xcb3 @0xc
0x0ca7…0cba at000d = ╱ec╱,╱ // 0xcb4 @0xd
0x0ca7…0cba at000e = ╱4b╱K╱ // 0xcb5 @0xe
0x0ca7…0cba at000f = ╱35╱5╱ // 0xcb6 @0xf
0x0ca7…0cba at0010 = ╱ef╱$╱ // 0xcb7 @0x10
0x0ca7…0cba at0011 = ╱ee╱)╱ // 0xcb8 @0x11
0x0ca7…0cba at0012 = EOL // 0xcb9 @0x12
0x0ca7…0cba }
0x0cba…0ce3 9a3a 1180 GET K5$,S1+G:FUKODE$,FÅDEBET$,FÅKREDIT$
0x0cba…0ce3 LineComalBin {
0x0cba…0ce3 ptr = 0x9a3a // 0xcba @0x0
0x0cba…0ce3 lno = 0x049c // 0xcbc @0x2
0x0cba…0ce3 at0004 = ╱a9╱ GET ╱ // 0xcbe @0x4
0x0cba…0ce3 at0005 = ╱4b╱K╱ // 0xcbf @0x5
0x0cba…0ce3 at0006 = ╱35╱5╱ // 0xcc0 @0x6
0x0cba…0ce3 at0007 = ╱ef╱$╱ // 0xcc1 @0x7
0x0cba…0ce3 at0008 = ╱ec╱,╱ // 0xcc2 @0x8
0x0cba…0ce3 at0009 = ╱53╱S╱ // 0xcc3 @0x9
0x0cba…0ce3 at000a = ╱31╱1╱ // 0xcc4 @0xa
0x0cba…0ce3 at000b = ╱e2╱+╱ // 0xcc5 @0xb
0x0cba…0ce3 at000c = ╱47╱G╱ // 0xcc6 @0xc
0x0cba…0ce3 at000d = ╱f0╱:╱ // 0xcc7 @0xd
0x0cba…0ce3 at000e = ╱46╱F╱ // 0xcc8 @0xe
0x0cba…0ce3 at000f = ╱55╱U╱ // 0xcc9 @0xf
0x0cba…0ce3 at0010 = ╱4b╱K╱ // 0xcca @0x10
0x0cba…0ce3 at0011 = ╱4f╱O╱ // 0xccb @0x11
0x0cba…0ce3 at0012 = ╱44╱D╱ // 0xccc @0x12
0x0cba…0ce3 at0013 = ╱45╱E╱ // 0xccd @0x13
0x0cba…0ce3 at0014 = ╱ef╱$╱ // 0xcce @0x14
0x0cba…0ce3 at0015 = ╱ec╱,╱ // 0xccf @0x15
0x0cba…0ce3 at0016 = ╱46╱F╱ // 0xcd0 @0x16
0x0cba…0ce3 at0017 = ╱5d╱Å╱ // 0xcd1 @0x17
0x0cba…0ce3 at0018 = ╱44╱D╱ // 0xcd2 @0x18
0x0cba…0ce3 at0019 = ╱45╱E╱ // 0xcd3 @0x19
0x0cba…0ce3 at001a = ╱42╱B╱ // 0xcd4 @0x1a
0x0cba…0ce3 at001b = ╱45╱E╱ // 0xcd5 @0x1b
0x0cba…0ce3 at001c = ╱54╱T╱ // 0xcd6 @0x1c
0x0cba…0ce3 at001d = ╱ef╱$╱ // 0xcd7 @0x1d
0x0cba…0ce3 at001e = ╱ec╱,╱ // 0xcd8 @0x1e
0x0cba…0ce3 at001f = ╱46╱F╱ // 0xcd9 @0x1f
0x0cba…0ce3 at0020 = ╱5d╱Å╱ // 0xcda @0x20
0x0cba…0ce3 at0021 = ╱4b╱K╱ // 0xcdb @0x21
0x0cba…0ce3 at0022 = ╱52╱R╱ // 0xcdc @0x22
0x0cba…0ce3 at0023 = ╱45╱E╱ // 0xcdd @0x23
0x0cba…0ce3 at0024 = ╱44╱D╱ // 0xcde @0x24
0x0cba…0ce3 at0025 = ╱49╱I╱ // 0xcdf @0x25
0x0cba…0ce3 at0026 = ╱54╱T╱ // 0xce0 @0x26
0x0cba…0ce3 at0027 = ╱ef╱$╱ // 0xce1 @0x27
0x0cba…0ce3 at0028 = EOL // 0xce2 @0x28
0x0cba…0ce3 }
0x0ce3…0cfb 9a52 1190 EXEC FEJL(G,4,K5$)
0x0ce3…0cfb LineComalBin {
0x0ce3…0cfb ptr = 0x9a52 // 0xce3 @0x0
0x0ce3…0cfb lno = 0x04a6 // 0xce5 @0x2
0x0ce3…0cfb at0004 = ╱9d╱ EXEC ╱ // 0xce7 @0x4
0x0ce3…0cfb at0005 = ╱46╱F╱ // 0xce8 @0x5
0x0ce3…0cfb at0006 = ╱45╱E╱ // 0xce9 @0x6
0x0ce3…0cfb at0007 = ╱4a╱J╱ // 0xcea @0x7
0x0ce3…0cfb at0008 = ╱4c╱L╱ // 0xceb @0x8
0x0ce3…0cfb at0009 = ╱ed╱(╱ // 0xcec @0x9
0x0ce3…0cfb at000a = ╱47╱G╱ // 0xced @0xa
0x0ce3…0cfb at000b = ╱ec╱,╱ // 0xcee @0xb
0x0ce3…0cfb at000c = ╱34╱4╱ // 0xcef @0xc
0x0ce3…0cfb at000d = ╱fe00008003╱ // 0xcf0 @0xd
0x0ce3…0cfb at0012 = ╱ec╱,╱ // 0xcf5 @0x12
0x0ce3…0cfb at0013 = ╱4b╱K╱ // 0xcf6 @0x13
0x0ce3…0cfb at0014 = ╱35╱5╱ // 0xcf7 @0x14
0x0ce3…0cfb at0015 = ╱ef╱$╱ // 0xcf8 @0x15
0x0ce3…0cfb at0016 = ╱ee╱)╱ // 0xcf9 @0x16
0x0ce3…0cfb at0017 = EOL // 0xcfa @0x17
0x0ce3…0cfb }
0x0cfb…0d01 9a58 1200 ENDPROC
0x0cfb…0d01 LineComalBin {
0x0cfb…0d01 ptr = 0x9a58 // 0xcfb @0x0
0x0cfb…0d01 lno = 0x04b0 // 0xcfd @0x2
0x0cfb…0d01 at0004 = ╱9f╱ ENDPROC ╱ // 0xcff @0x4
0x0cfb…0d01 at0005 = EOL // 0xd00 @0x5
0x0cfb…0d01 }
0x0d01…0d2c 9a83 1210 PROC FINDPOST1(TAB4,Q,MANT2,NØGL5,PIL6,L8)
0x0d01…0d2c LineComalBin {
0x0d01…0d2c ptr = 0x9a83 // 0xd01 @0x0
0x0d01…0d2c lno = 0x04ba // 0xd03 @0x2
0x0d01…0d2c at0004 = ╱9e╱ PROC ╱ // 0xd05 @0x4
0x0d01…0d2c at0005 = ╱46╱F╱ // 0xd06 @0x5
0x0d01…0d2c at0006 = ╱49╱I╱ // 0xd07 @0x6
0x0d01…0d2c at0007 = ╱4e╱N╱ // 0xd08 @0x7
0x0d01…0d2c at0008 = ╱44╱D╱ // 0xd09 @0x8
0x0d01…0d2c at0009 = ╱50╱P╱ // 0xd0a @0x9
0x0d01…0d2c at000a = ╱4f╱O╱ // 0xd0b @0xa
0x0d01…0d2c at000b = ╱53╱S╱ // 0xd0c @0xb
0x0d01…0d2c at000c = ╱54╱T╱ // 0xd0d @0xc
0x0d01…0d2c at000d = ╱31╱1╱ // 0xd0e @0xd
0x0d01…0d2c at000e = ╱ed╱(╱ // 0xd0f @0xe
0x0d01…0d2c at000f = ╱54╱T╱ // 0xd10 @0xf
0x0d01…0d2c at0010 = ╱41╱A╱ // 0xd11 @0x10
0x0d01…0d2c at0011 = ╱42╱B╱ // 0xd12 @0x11
0x0d01…0d2c at0012 = ╱34╱4╱ // 0xd13 @0x12
0x0d01…0d2c at0013 = ╱ec╱,╱ // 0xd14 @0x13
0x0d01…0d2c at0014 = ╱51╱Q╱ // 0xd15 @0x14
0x0d01…0d2c at0015 = ╱ec╱,╱ // 0xd16 @0x15
0x0d01…0d2c at0016 = ╱4d╱M╱ // 0xd17 @0x16
0x0d01…0d2c at0017 = ╱41╱A╱ // 0xd18 @0x17
0x0d01…0d2c at0018 = ╱4e╱N╱ // 0xd19 @0x18
0x0d01…0d2c at0019 = ╱54╱T╱ // 0xd1a @0x19
0x0d01…0d2c at001a = ╱32╱2╱ // 0xd1b @0x1a
0x0d01…0d2c at001b = ╱ec╱,╱ // 0xd1c @0x1b
0x0d01…0d2c at001c = ╱4e╱N╱ // 0xd1d @0x1c
0x0d01…0d2c at001d = ╱5c╱Ø╱ // 0xd1e @0x1d
0x0d01…0d2c at001e = ╱47╱G╱ // 0xd1f @0x1e
0x0d01…0d2c at001f = ╱4c╱L╱ // 0xd20 @0x1f
0x0d01…0d2c at0020 = ╱35╱5╱ // 0xd21 @0x20
0x0d01…0d2c at0021 = ╱ec╱,╱ // 0xd22 @0x21
0x0d01…0d2c at0022 = ╱50╱P╱ // 0xd23 @0x22
0x0d01…0d2c at0023 = ╱49╱I╱ // 0xd24 @0x23
0x0d01…0d2c at0024 = ╱4c╱L╱ // 0xd25 @0x24
0x0d01…0d2c at0025 = ╱36╱6╱ // 0xd26 @0x25
0x0d01…0d2c at0026 = ╱ec╱,╱ // 0xd27 @0x26
0x0d01…0d2c at0027 = ╱4c╱L╱ // 0xd28 @0x27
0x0d01…0d2c at0028 = ╱38╱8╱ // 0xd29 @0x28
0x0d01…0d2c at0029 = ╱ee╱)╱ // 0xd2a @0x29
0x0d01…0d2c at002a = EOL // 0xd2b @0x2a
0x0d01…0d2c }
0x0d2c…0d7a 9ad1 1220 PIL1=MANT2 DIV 8;PIL6=PIL1;CEKS=E;MANT3=MANT2 DIV 4;MANT4=MANT2 DIV 32
0x0d2c…0d7a LineComalBin {
0x0d2c…0d7a ptr = 0x9ad1 // 0xd2c @0x0
0x0d2c…0d7a lno = 0x04c4 // 0xd2e @0x2
0x0d2c…0d7a at0004 = ╱50╱P╱ // 0xd30 @0x4
0x0d2c…0d7a at0005 = ╱49╱I╱ // 0xd31 @0x5
0x0d2c…0d7a at0006 = ╱4c╱L╱ // 0xd32 @0x6
0x0d2c…0d7a at0007 = ╱31╱1╱ // 0xd33 @0x7
0x0d2c…0d7a at0008 = ╱dc╱=╱ // 0xd34 @0x8
0x0d2c…0d7a at0009 = ╱4d╱M╱ // 0xd35 @0x9
0x0d2c…0d7a at000a = ╱41╱A╱ // 0xd36 @0xa
0x0d2c…0d7a at000b = ╱4e╱N╱ // 0xd37 @0xb
0x0d2c…0d7a at000c = ╱54╱T╱ // 0xd38 @0xc
0x0d2c…0d7a at000d = ╱32╱2╱ // 0xd39 @0xd
0x0d2c…0d7a at000e = ╱e7╱ DIV ╱ // 0xd3a @0xe
0x0d2c…0d7a at000f = ╱38╱8╱ // 0xd3b @0xf
0x0d2c…0d7a at0010 = ╱fe00008004╱ // 0xd3c @0x10
0x0d2c…0d7a at0015 = ╱eb╱;╱ // 0xd41 @0x15
0x0d2c…0d7a at0016 = ╱50╱P╱ // 0xd42 @0x16
0x0d2c…0d7a at0017 = ╱49╱I╱ // 0xd43 @0x17
0x0d2c…0d7a at0018 = ╱4c╱L╱ // 0xd44 @0x18
0x0d2c…0d7a at0019 = ╱36╱6╱ // 0xd45 @0x19
0x0d2c…0d7a at001a = ╱dc╱=╱ // 0xd46 @0x1a
0x0d2c…0d7a at001b = ╱50╱P╱ // 0xd47 @0x1b
0x0d2c…0d7a at001c = ╱49╱I╱ // 0xd48 @0x1c
0x0d2c…0d7a at001d = ╱4c╱L╱ // 0xd49 @0x1d
0x0d2c…0d7a at001e = ╱31╱1╱ // 0xd4a @0x1e
0x0d2c…0d7a at001f = ╱eb╱;╱ // 0xd4b @0x1f
0x0d2c…0d7a at0020 = ╱43╱C╱ // 0xd4c @0x20
0x0d2c…0d7a at0021 = ╱45╱E╱ // 0xd4d @0x21
0x0d2c…0d7a at0022 = ╱4b╱K╱ // 0xd4e @0x22
0x0d2c…0d7a at0023 = ╱53╱S╱ // 0xd4f @0x23
0x0d2c…0d7a at0024 = ╱dc╱=╱ // 0xd50 @0x24
0x0d2c…0d7a at0025 = ╱45╱E╱ // 0xd51 @0x25
0x0d2c…0d7a at0026 = ╱eb╱;╱ // 0xd52 @0x26
0x0d2c…0d7a at0027 = ╱4d╱M╱ // 0xd53 @0x27
0x0d2c…0d7a at0028 = ╱41╱A╱ // 0xd54 @0x28
0x0d2c…0d7a at0029 = ╱4e╱N╱ // 0xd55 @0x29
0x0d2c…0d7a at002a = ╱54╱T╱ // 0xd56 @0x2a
0x0d2c…0d7a at002b = ╱33╱3╱ // 0xd57 @0x2b
0x0d2c…0d7a at002c = ╱dc╱=╱ // 0xd58 @0x2c
0x0d2c…0d7a at002d = ╱4d╱M╱ // 0xd59 @0x2d
0x0d2c…0d7a at002e = ╱41╱A╱ // 0xd5a @0x2e
0x0d2c…0d7a at002f = ╱4e╱N╱ // 0xd5b @0x2f
0x0d2c…0d7a at0030 = ╱54╱T╱ // 0xd5c @0x30
0x0d2c…0d7a at0031 = ╱32╱2╱ // 0xd5d @0x31
0x0d2c…0d7a at0032 = ╱e7╱ DIV ╱ // 0xd5e @0x32
0x0d2c…0d7a at0033 = ╱34╱4╱ // 0xd5f @0x33
0x0d2c…0d7a at0034 = ╱fe00008003╱ // 0xd60 @0x34
0x0d2c…0d7a at0039 = ╱eb╱;╱ // 0xd65 @0x39
0x0d2c…0d7a at003a = ╱4d╱M╱ // 0xd66 @0x3a
0x0d2c…0d7a at003b = ╱41╱A╱ // 0xd67 @0x3b
0x0d2c…0d7a at003c = ╱4e╱N╱ // 0xd68 @0x3c
0x0d2c…0d7a at003d = ╱54╱T╱ // 0xd69 @0x3d
0x0d2c…0d7a at003e = ╱34╱4╱ // 0xd6a @0x3e
0x0d2c…0d7a at003f = ╱dc╱=╱ // 0xd6b @0x3f
0x0d2c…0d7a at0040 = ╱4d╱M╱ // 0xd6c @0x40
0x0d2c…0d7a at0041 = ╱41╱A╱ // 0xd6d @0x41
0x0d2c…0d7a at0042 = ╱4e╱N╱ // 0xd6e @0x42
0x0d2c…0d7a at0043 = ╱54╱T╱ // 0xd6f @0x43
0x0d2c…0d7a at0044 = ╱32╱2╱ // 0xd70 @0x44
0x0d2c…0d7a at0045 = ╱e7╱ DIV ╱ // 0xd71 @0x45
0x0d2c…0d7a at0046 = ╱33╱3╱ // 0xd72 @0x46
0x0d2c…0d7a at0047 = ╱32╱2╱ // 0xd73 @0x47
0x0d2c…0d7a at0048 = ╱fe00008006╱ // 0xd74 @0x48
0x0d2c…0d7a at004d = EOL // 0xd79 @0x4d
0x0d2c…0d7a }
0x0d7a…0d80 9ad7 1230 REPEAT
0x0d7a…0d80 LineComalBin {
0x0d7a…0d80 ptr = 0x9ad7 // 0xd7a @0x0
0x0d7a…0d80 lno = 0x04ce // 0xd7c @0x2
0x0d7a…0d80 at0004 = ╱97╱ REPEAT ╱ // 0xd7e @0x4
0x0d7a…0d80 at0005 = EOL // 0xd7f @0x5
0x0d7a…0d80 }
0x0d80…0d9f 9af6 1240 IF NØGL5=TAB4(PIL6) OR PIL1=E THEN EXIT
0x0d80…0d9f LineComalBin {
0x0d80…0d9f ptr = 0x9af6 // 0xd80 @0x0
0x0d80…0d9f lno = 0x04d8 // 0xd82 @0x2
0x0d80…0d9f at0004 = ╱82╱ IF ╱ // 0xd84 @0x4
0x0d80…0d9f at0005 = ╱4e╱N╱ // 0xd85 @0x5
0x0d80…0d9f at0006 = ╱5c╱Ø╱ // 0xd86 @0x6
0x0d80…0d9f at0007 = ╱47╱G╱ // 0xd87 @0x7
0x0d80…0d9f at0008 = ╱4c╱L╱ // 0xd88 @0x8
0x0d80…0d9f at0009 = ╱35╱5╱ // 0xd89 @0x9
0x0d80…0d9f at000a = ╱dc╱=╱ // 0xd8a @0xa
0x0d80…0d9f at000b = ╱54╱T╱ // 0xd8b @0xb
0x0d80…0d9f at000c = ╱41╱A╱ // 0xd8c @0xc
0x0d80…0d9f at000d = ╱42╱B╱ // 0xd8d @0xd
0x0d80…0d9f at000e = ╱34╱4╱ // 0xd8e @0xe
0x0d80…0d9f at000f = ╱ed╱(╱ // 0xd8f @0xf
0x0d80…0d9f at0010 = ╱50╱P╱ // 0xd90 @0x10
0x0d80…0d9f at0011 = ╱49╱I╱ // 0xd91 @0x11
0x0d80…0d9f at0012 = ╱4c╱L╱ // 0xd92 @0x12
0x0d80…0d9f at0013 = ╱36╱6╱ // 0xd93 @0x13
0x0d80…0d9f at0014 = ╱ee╱)╱ // 0xd94 @0x14
0x0d80…0d9f at0015 = ╱db╱ OR ╱ // 0xd95 @0x15
0x0d80…0d9f at0016 = ╱50╱P╱ // 0xd96 @0x16
0x0d80…0d9f at0017 = ╱49╱I╱ // 0xd97 @0x17
0x0d80…0d9f at0018 = ╱4c╱L╱ // 0xd98 @0x18
0x0d80…0d9f at0019 = ╱31╱1╱ // 0xd99 @0x19
0x0d80…0d9f at001a = ╱dc╱=╱ // 0xd9a @0x1a
0x0d80…0d9f at001b = ╱45╱E╱ // 0xd9b @0x1b
0x0d80…0d9f at001c = ╱b6╱ THEN ╱ // 0xd9c @0x1c
0x0d80…0d9f at001d = ╱99╱ EXIT ╱ // 0xd9d @0x1d
0x0d80…0d9f at001e = EOL // 0xd9e @0x1e
0x0d80…0d9f }
0x0d9f…0ddb 9b32 1250 PIL1=(PIL1+E) DIV G;PIL6=PIL6+PIL1*(E-G*(NØGL5<TAB4(PIL6)))
0x0d9f…0ddb LineComalBin {
0x0d9f…0ddb ptr = 0x9b32 // 0xd9f @0x0
0x0d9f…0ddb lno = 0x04e2 // 0xda1 @0x2
0x0d9f…0ddb at0004 = ╱50╱P╱ // 0xda3 @0x4
0x0d9f…0ddb at0005 = ╱49╱I╱ // 0xda4 @0x5
0x0d9f…0ddb at0006 = ╱4c╱L╱ // 0xda5 @0x6
0x0d9f…0ddb at0007 = ╱31╱1╱ // 0xda6 @0x7
0x0d9f…0ddb at0008 = ╱dc╱=╱ // 0xda7 @0x8
0x0d9f…0ddb at0009 = ╱ed╱(╱ // 0xda8 @0x9
0x0d9f…0ddb at000a = ╱50╱P╱ // 0xda9 @0xa
0x0d9f…0ddb at000b = ╱49╱I╱ // 0xdaa @0xb
0x0d9f…0ddb at000c = ╱4c╱L╱ // 0xdab @0xc
0x0d9f…0ddb at000d = ╱31╱1╱ // 0xdac @0xd
0x0d9f…0ddb at000e = ╱e2╱+╱ // 0xdad @0xe
0x0d9f…0ddb at000f = ╱45╱E╱ // 0xdae @0xf
0x0d9f…0ddb at0010 = ╱ee╱)╱ // 0xdaf @0x10
0x0d9f…0ddb at0011 = ╱e7╱ DIV ╱ // 0xdb0 @0x11
0x0d9f…0ddb at0012 = ╱47╱G╱ // 0xdb1 @0x12
0x0d9f…0ddb at0013 = ╱eb╱;╱ // 0xdb2 @0x13
0x0d9f…0ddb at0014 = ╱50╱P╱ // 0xdb3 @0x14
0x0d9f…0ddb at0015 = ╱49╱I╱ // 0xdb4 @0x15
0x0d9f…0ddb at0016 = ╱4c╱L╱ // 0xdb5 @0x16
0x0d9f…0ddb at0017 = ╱36╱6╱ // 0xdb6 @0x17
0x0d9f…0ddb at0018 = ╱dc╱=╱ // 0xdb7 @0x18
0x0d9f…0ddb at0019 = ╱50╱P╱ // 0xdb8 @0x19
0x0d9f…0ddb at001a = ╱49╱I╱ // 0xdb9 @0x1a
0x0d9f…0ddb at001b = ╱4c╱L╱ // 0xdba @0x1b
0x0d9f…0ddb at001c = ╱36╱6╱ // 0xdbb @0x1c
0x0d9f…0ddb at001d = ╱e2╱+╱ // 0xdbc @0x1d
0x0d9f…0ddb at001e = ╱50╱P╱ // 0xdbd @0x1e
0x0d9f…0ddb at001f = ╱49╱I╱ // 0xdbe @0x1f
0x0d9f…0ddb at0020 = ╱4c╱L╱ // 0xdbf @0x20
0x0d9f…0ddb at0021 = ╱31╱1╱ // 0xdc0 @0x21
0x0d9f…0ddb at0022 = ╱e4╱*╱ // 0xdc1 @0x22
0x0d9f…0ddb at0023 = ╱ed╱(╱ // 0xdc2 @0x23
0x0d9f…0ddb at0024 = ╱45╱E╱ // 0xdc3 @0x24
0x0d9f…0ddb at0025 = ╱e3╱-╱ // 0xdc4 @0x25
0x0d9f…0ddb at0026 = ╱47╱G╱ // 0xdc5 @0x26
0x0d9f…0ddb at0027 = ╱e4╱*╱ // 0xdc6 @0x27
0x0d9f…0ddb at0028 = ╱ed╱(╱ // 0xdc7 @0x28
0x0d9f…0ddb at0029 = ╱4e╱N╱ // 0xdc8 @0x29
0x0d9f…0ddb at002a = ╱5c╱Ø╱ // 0xdc9 @0x2a
0x0d9f…0ddb at002b = ╱47╱G╱ // 0xdca @0x2b
0x0d9f…0ddb at002c = ╱4c╱L╱ // 0xdcb @0x2c
0x0d9f…0ddb at002d = ╱35╱5╱ // 0xdcc @0x2d
0x0d9f…0ddb at002e = ╱dd╱<╱ // 0xdcd @0x2e
0x0d9f…0ddb at002f = ╱54╱T╱ // 0xdce @0x2f
0x0d9f…0ddb at0030 = ╱41╱A╱ // 0xdcf @0x30
0x0d9f…0ddb at0031 = ╱42╱B╱ // 0xdd0 @0x31
0x0d9f…0ddb at0032 = ╱34╱4╱ // 0xdd1 @0x32
0x0d9f…0ddb at0033 = ╱ed╱(╱ // 0xdd2 @0x33
0x0d9f…0ddb at0034 = ╱50╱P╱ // 0xdd3 @0x34
0x0d9f…0ddb at0035 = ╱49╱I╱ // 0xdd4 @0x35
0x0d9f…0ddb at0036 = ╱4c╱L╱ // 0xdd5 @0x36
0x0d9f…0ddb at0037 = ╱36╱6╱ // 0xdd6 @0x37
0x0d9f…0ddb at0038 = ╱ee╱)╱ // 0xdd7 @0x38
0x0d9f…0ddb at0039 = ╱ee╱)╱ // 0xdd8 @0x39
0x0d9f…0ddb at003a = ╱ee╱)╱ // 0xdd9 @0x3a
0x0d9f…0ddb at003b = EOL // 0xdda @0x3b
0x0d9f…0ddb }
0x0ddb…0df2 9b49 1260 IF PIL6<E THEN PIL6=MANT3
0x0ddb…0df2 LineComalBin {
0x0ddb…0df2 ptr = 0x9b49 // 0xddb @0x0
0x0ddb…0df2 lno = 0x04ec // 0xddd @0x2
0x0ddb…0df2 at0004 = ╱82╱ IF ╱ // 0xddf @0x4
0x0ddb…0df2 at0005 = ╱50╱P╱ // 0xde0 @0x5
0x0ddb…0df2 at0006 = ╱49╱I╱ // 0xde1 @0x6
0x0ddb…0df2 at0007 = ╱4c╱L╱ // 0xde2 @0x7
0x0ddb…0df2 at0008 = ╱36╱6╱ // 0xde3 @0x8
0x0ddb…0df2 at0009 = ╱dd╱<╱ // 0xde4 @0x9
0x0ddb…0df2 at000a = ╱45╱E╱ // 0xde5 @0xa
0x0ddb…0df2 at000b = ╱b6╱ THEN ╱ // 0xde6 @0xb
0x0ddb…0df2 at000c = ╱50╱P╱ // 0xde7 @0xc
0x0ddb…0df2 at000d = ╱49╱I╱ // 0xde8 @0xd
0x0ddb…0df2 at000e = ╱4c╱L╱ // 0xde9 @0xe
0x0ddb…0df2 at000f = ╱36╱6╱ // 0xdea @0xf
0x0ddb…0df2 at0010 = ╱dc╱=╱ // 0xdeb @0x10
0x0ddb…0df2 at0011 = ╱4d╱M╱ // 0xdec @0x11
0x0ddb…0df2 at0012 = ╱41╱A╱ // 0xded @0x12
0x0ddb…0df2 at0013 = ╱4e╱N╱ // 0xdee @0x13
0x0ddb…0df2 at0014 = ╱54╱T╱ // 0xdef @0x14
0x0ddb…0df2 at0015 = ╱33╱3╱ // 0xdf0 @0x15
0x0ddb…0df2 at0016 = EOL // 0xdf1 @0x16
0x0ddb…0df2 }
0x0df2…0dfe 9b55 1270 UNTIL PIL1=B
0x0df2…0dfe LineComalBin {
0x0df2…0dfe ptr = 0x9b55 // 0xdf2 @0x0
0x0df2…0dfe lno = 0x04f6 // 0xdf4 @0x2
0x0df2…0dfe at0004 = ╱98╱ UNTIL ╱ // 0xdf6 @0x4
0x0df2…0dfe at0005 = ╱50╱P╱ // 0xdf7 @0x5
0x0df2…0dfe at0006 = ╱49╱I╱ // 0xdf8 @0x6
0x0df2…0dfe at0007 = ╱4c╱L╱ // 0xdf9 @0x7
0x0df2…0dfe at0008 = ╱31╱1╱ // 0xdfa @0x8
0x0df2…0dfe at0009 = ╱dc╱=╱ // 0xdfb @0x9
0x0df2…0dfe at000a = ╱42╱B╱ // 0xdfc @0xa
0x0df2…0dfe at000b = EOL // 0xdfd @0xb
0x0df2…0dfe }
0x0dfe…0e29 9b80 1280 IF TAB4(PIL6)>NØGL5 THEN PIL6=PIL6-E*(PIL6>E)
0x0dfe…0e29 LineComalBin {
0x0dfe…0e29 ptr = 0x9b80 // 0xdfe @0x0
0x0dfe…0e29 lno = 0x0500 // 0xe00 @0x2
0x0dfe…0e29 at0004 = ╱82╱ IF ╱ // 0xe02 @0x4
0x0dfe…0e29 at0005 = ╱54╱T╱ // 0xe03 @0x5
0x0dfe…0e29 at0006 = ╱41╱A╱ // 0xe04 @0x6
0x0dfe…0e29 at0007 = ╱42╱B╱ // 0xe05 @0x7
0x0dfe…0e29 at0008 = ╱34╱4╱ // 0xe06 @0x8
0x0dfe…0e29 at0009 = ╱ed╱(╱ // 0xe07 @0x9
0x0dfe…0e29 at000a = ╱50╱P╱ // 0xe08 @0xa
0x0dfe…0e29 at000b = ╱49╱I╱ // 0xe09 @0xb
0x0dfe…0e29 at000c = ╱4c╱L╱ // 0xe0a @0xc
0x0dfe…0e29 at000d = ╱36╱6╱ // 0xe0b @0xd
0x0dfe…0e29 at000e = ╱ee╱)╱ // 0xe0c @0xe
0x0dfe…0e29 at000f = ╱de╱>╱ // 0xe0d @0xf
0x0dfe…0e29 at0010 = ╱4e╱N╱ // 0xe0e @0x10
0x0dfe…0e29 at0011 = ╱5c╱Ø╱ // 0xe0f @0x11
0x0dfe…0e29 at0012 = ╱47╱G╱ // 0xe10 @0x12
0x0dfe…0e29 at0013 = ╱4c╱L╱ // 0xe11 @0x13
0x0dfe…0e29 at0014 = ╱35╱5╱ // 0xe12 @0x14
0x0dfe…0e29 at0015 = ╱b6╱ THEN ╱ // 0xe13 @0x15
0x0dfe…0e29 at0016 = ╱50╱P╱ // 0xe14 @0x16
0x0dfe…0e29 at0017 = ╱49╱I╱ // 0xe15 @0x17
0x0dfe…0e29 at0018 = ╱4c╱L╱ // 0xe16 @0x18
0x0dfe…0e29 at0019 = ╱36╱6╱ // 0xe17 @0x19
0x0dfe…0e29 at001a = ╱dc╱=╱ // 0xe18 @0x1a
0x0dfe…0e29 at001b = ╱50╱P╱ // 0xe19 @0x1b
0x0dfe…0e29 at001c = ╱49╱I╱ // 0xe1a @0x1c
0x0dfe…0e29 at001d = ╱4c╱L╱ // 0xe1b @0x1d
0x0dfe…0e29 at001e = ╱36╱6╱ // 0xe1c @0x1e
0x0dfe…0e29 at001f = ╱e3╱-╱ // 0xe1d @0x1f
0x0dfe…0e29 at0020 = ╱45╱E╱ // 0xe1e @0x20
0x0dfe…0e29 at0021 = ╱e4╱*╱ // 0xe1f @0x21
0x0dfe…0e29 at0022 = ╱ed╱(╱ // 0xe20 @0x22
0x0dfe…0e29 at0023 = ╱50╱P╱ // 0xe21 @0x23
0x0dfe…0e29 at0024 = ╱49╱I╱ // 0xe22 @0x24
0x0dfe…0e29 at0025 = ╱4c╱L╱ // 0xe23 @0x25
0x0dfe…0e29 at0026 = ╱36╱6╱ // 0xe24 @0x26
0x0dfe…0e29 at0027 = ╱de╱>╱ // 0xe25 @0x27
0x0dfe…0e29 at0028 = ╱45╱E╱ // 0xe26 @0x28
0x0dfe…0e29 at0029 = ╱ee╱)╱ // 0xe27 @0x29
0x0dfe…0e29 at002a = EOL // 0xe28 @0x2a
0x0dfe…0e29 }
0x0e29…0e3d 9b94 1290 PIL6=MANT4+PIL6
0x0e29…0e3d LineComalBin {
0x0e29…0e3d ptr = 0x9b94 // 0xe29 @0x0
0x0e29…0e3d lno = 0x050a // 0xe2b @0x2
0x0e29…0e3d at0004 = ╱50╱P╱ // 0xe2d @0x4
0x0e29…0e3d at0005 = ╱49╱I╱ // 0xe2e @0x5
0x0e29…0e3d at0006 = ╱4c╱L╱ // 0xe2f @0x6
0x0e29…0e3d at0007 = ╱36╱6╱ // 0xe30 @0x7
0x0e29…0e3d at0008 = ╱dc╱=╱ // 0xe31 @0x8
0x0e29…0e3d at0009 = ╱4d╱M╱ // 0xe32 @0x9
0x0e29…0e3d at000a = ╱41╱A╱ // 0xe33 @0xa
0x0e29…0e3d at000b = ╱4e╱N╱ // 0xe34 @0xb
0x0e29…0e3d at000c = ╱54╱T╱ // 0xe35 @0xc
0x0e29…0e3d at000d = ╱34╱4╱ // 0xe36 @0xd
0x0e29…0e3d at000e = ╱e2╱+╱ // 0xe37 @0xe
0x0e29…0e3d at000f = ╱50╱P╱ // 0xe38 @0xf
0x0e29…0e3d at0010 = ╱49╱I╱ // 0xe39 @0x10
0x0e29…0e3d at0011 = ╱4c╱L╱ // 0xe3a @0x11
0x0e29…0e3d at0012 = ╱36╱6╱ // 0xe3b @0x12
0x0e29…0e3d at0013 = EOL // 0xe3c @0x13
0x0e29…0e3d }
0x0e3d…0e8d 9be4 1300 GET L8$,PIL6:Q(E,E),Q(E,G),Q(G,E),Q(G,G),Q(V,E),Q(V,G),Q(4,E),Q(4,G)
0x0e3d…0e8d LineComalBin {
0x0e3d…0e8d ptr = 0x9be4 // 0xe3d @0x0
0x0e3d…0e8d lno = 0x0514 // 0xe3f @0x2
0x0e3d…0e8d at0004 = ╱a9╱ GET ╱ // 0xe41 @0x4
0x0e3d…0e8d at0005 = ╱4c╱L╱ // 0xe42 @0x5
0x0e3d…0e8d at0006 = ╱38╱8╱ // 0xe43 @0x6
0x0e3d…0e8d at0007 = ╱ef╱$╱ // 0xe44 @0x7
0x0e3d…0e8d at0008 = ╱ec╱,╱ // 0xe45 @0x8
0x0e3d…0e8d at0009 = ╱50╱P╱ // 0xe46 @0x9
0x0e3d…0e8d at000a = ╱49╱I╱ // 0xe47 @0xa
0x0e3d…0e8d at000b = ╱4c╱L╱ // 0xe48 @0xb
0x0e3d…0e8d at000c = ╱36╱6╱ // 0xe49 @0xc
0x0e3d…0e8d at000d = ╱f0╱:╱ // 0xe4a @0xd
0x0e3d…0e8d at000e = ╱51╱Q╱ // 0xe4b @0xe
0x0e3d…0e8d at000f = ╱ed╱(╱ // 0xe4c @0xf
0x0e3d…0e8d at0010 = ╱45╱E╱ // 0xe4d @0x10
0x0e3d…0e8d at0011 = ╱ec╱,╱ // 0xe4e @0x11
0x0e3d…0e8d at0012 = ╱45╱E╱ // 0xe4f @0x12
0x0e3d…0e8d at0013 = ╱ee╱)╱ // 0xe50 @0x13
0x0e3d…0e8d at0014 = ╱ec╱,╱ // 0xe51 @0x14
0x0e3d…0e8d at0015 = ╱51╱Q╱ // 0xe52 @0x15
0x0e3d…0e8d at0016 = ╱ed╱(╱ // 0xe53 @0x16
0x0e3d…0e8d at0017 = ╱45╱E╱ // 0xe54 @0x17
0x0e3d…0e8d at0018 = ╱ec╱,╱ // 0xe55 @0x18
0x0e3d…0e8d at0019 = ╱47╱G╱ // 0xe56 @0x19
0x0e3d…0e8d at001a = ╱ee╱)╱ // 0xe57 @0x1a
0x0e3d…0e8d at001b = ╱ec╱,╱ // 0xe58 @0x1b
0x0e3d…0e8d at001c = ╱51╱Q╱ // 0xe59 @0x1c
0x0e3d…0e8d at001d = ╱ed╱(╱ // 0xe5a @0x1d
0x0e3d…0e8d at001e = ╱47╱G╱ // 0xe5b @0x1e
0x0e3d…0e8d at001f = ╱ec╱,╱ // 0xe5c @0x1f
0x0e3d…0e8d at0020 = ╱45╱E╱ // 0xe5d @0x20
0x0e3d…0e8d at0021 = ╱ee╱)╱ // 0xe5e @0x21
0x0e3d…0e8d at0022 = ╱ec╱,╱ // 0xe5f @0x22
0x0e3d…0e8d at0023 = ╱51╱Q╱ // 0xe60 @0x23
0x0e3d…0e8d at0024 = ╱ed╱(╱ // 0xe61 @0x24
0x0e3d…0e8d at0025 = ╱47╱G╱ // 0xe62 @0x25
0x0e3d…0e8d at0026 = ╱ec╱,╱ // 0xe63 @0x26
0x0e3d…0e8d at0027 = ╱47╱G╱ // 0xe64 @0x27
0x0e3d…0e8d at0028 = ╱ee╱)╱ // 0xe65 @0x28
0x0e3d…0e8d at0029 = ╱ec╱,╱ // 0xe66 @0x29
0x0e3d…0e8d at002a = ╱51╱Q╱ // 0xe67 @0x2a
0x0e3d…0e8d at002b = ╱ed╱(╱ // 0xe68 @0x2b
0x0e3d…0e8d at002c = ╱56╱V╱ // 0xe69 @0x2c
0x0e3d…0e8d at002d = ╱ec╱,╱ // 0xe6a @0x2d
0x0e3d…0e8d at002e = ╱45╱E╱ // 0xe6b @0x2e
0x0e3d…0e8d at002f = ╱ee╱)╱ // 0xe6c @0x2f
0x0e3d…0e8d at0030 = ╱ec╱,╱ // 0xe6d @0x30
0x0e3d…0e8d at0031 = ╱51╱Q╱ // 0xe6e @0x31
0x0e3d…0e8d at0032 = ╱ed╱(╱ // 0xe6f @0x32
0x0e3d…0e8d at0033 = ╱56╱V╱ // 0xe70 @0x33
0x0e3d…0e8d at0034 = ╱ec╱,╱ // 0xe71 @0x34
0x0e3d…0e8d at0035 = ╱47╱G╱ // 0xe72 @0x35
0x0e3d…0e8d at0036 = ╱ee╱)╱ // 0xe73 @0x36
0x0e3d…0e8d at0037 = ╱ec╱,╱ // 0xe74 @0x37
0x0e3d…0e8d at0038 = ╱51╱Q╱ // 0xe75 @0x38
0x0e3d…0e8d at0039 = ╱ed╱(╱ // 0xe76 @0x39
0x0e3d…0e8d at003a = ╱34╱4╱ // 0xe77 @0x3a
0x0e3d…0e8d at003b = ╱fe00008003╱ // 0xe78 @0x3b
0x0e3d…0e8d at0040 = ╱ec╱,╱ // 0xe7d @0x40
0x0e3d…0e8d at0041 = ╱45╱E╱ // 0xe7e @0x41
0x0e3d…0e8d at0042 = ╱ee╱)╱ // 0xe7f @0x42
0x0e3d…0e8d at0043 = ╱ec╱,╱ // 0xe80 @0x43
0x0e3d…0e8d at0044 = ╱51╱Q╱ // 0xe81 @0x44
0x0e3d…0e8d at0045 = ╱ed╱(╱ // 0xe82 @0x45
0x0e3d…0e8d at0046 = ╱34╱4╱ // 0xe83 @0x46
0x0e3d…0e8d at0047 = ╱fe00008003╱ // 0xe84 @0x47
0x0e3d…0e8d at004c = ╱ec╱,╱ // 0xe89 @0x4c
0x0e3d…0e8d at004d = ╱47╱G╱ // 0xe8a @0x4d
0x0e3d…0e8d at004e = ╱ee╱)╱ // 0xe8b @0x4e
0x0e3d…0e8d at004f = EOL // 0xe8c @0x4f
0x0e3d…0e8d }
0x0e8d…0ea0 9bf7 1310 EXEC FEJL(E,E,L8$)
0x0e8d…0ea0 LineComalBin {
0x0e8d…0ea0 ptr = 0x9bf7 // 0xe8d @0x0
0x0e8d…0ea0 lno = 0x051e // 0xe8f @0x2
0x0e8d…0ea0 at0004 = ╱9d╱ EXEC ╱ // 0xe91 @0x4
0x0e8d…0ea0 at0005 = ╱46╱F╱ // 0xe92 @0x5
0x0e8d…0ea0 at0006 = ╱45╱E╱ // 0xe93 @0x6
0x0e8d…0ea0 at0007 = ╱4a╱J╱ // 0xe94 @0x7
0x0e8d…0ea0 at0008 = ╱4c╱L╱ // 0xe95 @0x8
0x0e8d…0ea0 at0009 = ╱ed╱(╱ // 0xe96 @0x9
0x0e8d…0ea0 at000a = ╱45╱E╱ // 0xe97 @0xa
0x0e8d…0ea0 at000b = ╱ec╱,╱ // 0xe98 @0xb
0x0e8d…0ea0 at000c = ╱45╱E╱ // 0xe99 @0xc
0x0e8d…0ea0 at000d = ╱ec╱,╱ // 0xe9a @0xd
0x0e8d…0ea0 at000e = ╱4c╱L╱ // 0xe9b @0xe
0x0e8d…0ea0 at000f = ╱38╱8╱ // 0xe9c @0xf
0x0e8d…0ea0 at0010 = ╱ef╱$╱ // 0xe9d @0x10
0x0e8d…0ea0 at0011 = ╱ee╱)╱ // 0xe9e @0x11
0x0e8d…0ea0 at0012 = EOL // 0xe9f @0x12
0x0e8d…0ea0 }
0x0ea0…0eb3 9c0a 1320 FOR PIL6=E TO 4
0x0ea0…0eb3 LineComalBin {
0x0ea0…0eb3 ptr = 0x9c0a // 0xea0 @0x0
0x0ea0…0eb3 lno = 0x0528 // 0xea2 @0x2
0x0ea0…0eb3 at0004 = ╱83╱ FOR ╱ // 0xea4 @0x4
0x0ea0…0eb3 at0005 = ╱50╱P╱ // 0xea5 @0x5
0x0ea0…0eb3 at0006 = ╱49╱I╱ // 0xea6 @0x6
0x0ea0…0eb3 at0007 = ╱4c╱L╱ // 0xea7 @0x7
0x0ea0…0eb3 at0008 = ╱36╱6╱ // 0xea8 @0x8
0x0ea0…0eb3 at0009 = ╱dc╱=╱ // 0xea9 @0x9
0x0ea0…0eb3 at000a = ╱45╱E╱ // 0xeaa @0xa
0x0ea0…0eb3 at000b = ╱b7╱ TO ╱ // 0xeab @0xb
0x0ea0…0eb3 at000c = ╱34╱4╱ // 0xeac @0xc
0x0ea0…0eb3 at000d = ╱fe00008003╱ // 0xead @0xd
0x0ea0…0eb3 at0012 = EOL // 0xeb2 @0x12
0x0ea0…0eb3 }
0x0eb3…0eca 9c21 1330 IF NØGL5=Q(PIL6,E) THEN EXIT
0x0eb3…0eca LineComalBin {
0x0eb3…0eca ptr = 0x9c21 // 0xeb3 @0x0
0x0eb3…0eca lno = 0x0532 // 0xeb5 @0x2
0x0eb3…0eca at0004 = ╱82╱ IF ╱ // 0xeb7 @0x4
0x0eb3…0eca at0005 = ╱4e╱N╱ // 0xeb8 @0x5
0x0eb3…0eca at0006 = ╱5c╱Ø╱ // 0xeb9 @0x6
0x0eb3…0eca at0007 = ╱47╱G╱ // 0xeba @0x7
0x0eb3…0eca at0008 = ╱4c╱L╱ // 0xebb @0x8
0x0eb3…0eca at0009 = ╱35╱5╱ // 0xebc @0x9
0x0eb3…0eca at000a = ╱dc╱=╱ // 0xebd @0xa
0x0eb3…0eca at000b = ╱51╱Q╱ // 0xebe @0xb
0x0eb3…0eca at000c = ╱ed╱(╱ // 0xebf @0xc
0x0eb3…0eca at000d = ╱50╱P╱ // 0xec0 @0xd
0x0eb3…0eca at000e = ╱49╱I╱ // 0xec1 @0xe
0x0eb3…0eca at000f = ╱4c╱L╱ // 0xec2 @0xf
0x0eb3…0eca at0010 = ╱36╱6╱ // 0xec3 @0x10
0x0eb3…0eca at0011 = ╱ec╱,╱ // 0xec4 @0x11
0x0eb3…0eca at0012 = ╱45╱E╱ // 0xec5 @0x12
0x0eb3…0eca at0013 = ╱ee╱)╱ // 0xec6 @0x13
0x0eb3…0eca at0014 = ╱b6╱ THEN ╱ // 0xec7 @0x14
0x0eb3…0eca at0015 = ╱99╱ EXIT ╱ // 0xec8 @0x15
0x0eb3…0eca at0016 = EOL // 0xec9 @0x16
0x0eb3…0eca }
0x0eca…0ed4 9c2b 1340 NEXT PIL6
0x0eca…0ed4 LineComalBin {
0x0eca…0ed4 ptr = 0x9c2b // 0xeca @0x0
0x0eca…0ed4 lno = 0x053c // 0xecc @0x2
0x0eca…0ed4 at0004 = ╱84╱ NEXT ╱ // 0xece @0x4
0x0eca…0ed4 at0005 = ╱50╱P╱ // 0xecf @0x5
0x0eca…0ed4 at0006 = ╱49╱I╱ // 0xed0 @0x6
0x0eca…0ed4 at0007 = ╱4c╱L╱ // 0xed1 @0x7
0x0eca…0ed4 at0008 = ╱36╱6╱ // 0xed2 @0x8
0x0eca…0ed4 at0009 = EOL // 0xed3 @0x9
0x0eca…0ed4 }
0x0ed4…0eec 9c43 1350 IF PIL6<>5 THEN CEKS=B
0x0ed4…0eec LineComalBin {
0x0ed4…0eec ptr = 0x9c43 // 0xed4 @0x0
0x0ed4…0eec lno = 0x0546 // 0xed6 @0x2
0x0ed4…0eec at0004 = ╱82╱ IF ╱ // 0xed8 @0x4
0x0ed4…0eec at0005 = ╱50╱P╱ // 0xed9 @0x5
0x0ed4…0eec at0006 = ╱49╱I╱ // 0xeda @0x6
0x0ed4…0eec at0007 = ╱4c╱L╱ // 0xedb @0x7
0x0ed4…0eec at0008 = ╱36╱6╱ // 0xedc @0x8
0x0ed4…0eec at0009 = ╱e1╱<>╱ // 0xedd @0x9
0x0ed4…0eec at000a = ╱35╱5╱ // 0xede @0xa
0x0ed4…0eec at000b = ╱fe0000a003╱ // 0xedf @0xb
0x0ed4…0eec at0010 = ╱b6╱ THEN ╱ // 0xee4 @0x10
0x0ed4…0eec at0011 = ╱43╱C╱ // 0xee5 @0x11
0x0ed4…0eec at0012 = ╱45╱E╱ // 0xee6 @0x12
0x0ed4…0eec at0013 = ╱4b╱K╱ // 0xee7 @0x13
0x0ed4…0eec at0014 = ╱53╱S╱ // 0xee8 @0x14
0x0ed4…0eec at0015 = ╱dc╱=╱ // 0xee9 @0x15
0x0ed4…0eec at0016 = ╱42╱B╱ // 0xeea @0x16
0x0ed4…0eec at0017 = EOL // 0xeeb @0x17
0x0ed4…0eec }
0x0eec…0ef2 9c49 1360 ENDPROC
0x0eec…0ef2 LineComalBin {
0x0eec…0ef2 ptr = 0x9c49 // 0xeec @0x0
0x0eec…0ef2 lno = 0x0550 // 0xeee @0x2
0x0eec…0ef2 at0004 = ╱9f╱ ENDPROC ╱ // 0xef0 @0x4
0x0eec…0ef2 at0005 = EOL // 0xef1 @0x5
0x0eec…0ef2 }
0x0ef2…0f00 9c57 1370 PROC GEMFPOST
0x0ef2…0f00 LineComalBin {
0x0ef2…0f00 ptr = 0x9c57 // 0xef2 @0x0
0x0ef2…0f00 lno = 0x055a // 0xef4 @0x2
0x0ef2…0f00 at0004 = ╱9e╱ PROC ╱ // 0xef6 @0x4
0x0ef2…0f00 at0005 = ╱47╱G╱ // 0xef7 @0x5
0x0ef2…0f00 at0006 = ╱45╱E╱ // 0xef8 @0x6
0x0ef2…0f00 at0007 = ╱4d╱M╱ // 0xef9 @0x7
0x0ef2…0f00 at0008 = ╱46╱F╱ // 0xefa @0x8
0x0ef2…0f00 at0009 = ╱50╱P╱ // 0xefb @0x9
0x0ef2…0f00 at000a = ╱4f╱O╱ // 0xefc @0xa
0x0ef2…0f00 at000b = ╱53╱S╱ // 0xefd @0xb
0x0ef2…0f00 at000c = ╱54╱T╱ // 0xefe @0xc
0x0ef2…0f00 at000d = EOL // 0xeff @0xd
0x0ef2…0f00 }
0x0f00…0f15 9c6c 1380 S1=FTAB(FPIL3,G)
0x0f00…0f15 LineComalBin {
0x0f00…0f15 ptr = 0x9c6c // 0xf00 @0x0
0x0f00…0f15 lno = 0x0564 // 0xf02 @0x2
0x0f00…0f15 at0004 = ╱53╱S╱ // 0xf04 @0x4
0x0f00…0f15 at0005 = ╱31╱1╱ // 0xf05 @0x5
0x0f00…0f15 at0006 = ╱dc╱=╱ // 0xf06 @0x6
0x0f00…0f15 at0007 = ╱46╱F╱ // 0xf07 @0x7
0x0f00…0f15 at0008 = ╱54╱T╱ // 0xf08 @0x8
0x0f00…0f15 at0009 = ╱41╱A╱ // 0xf09 @0x9
0x0f00…0f15 at000a = ╱42╱B╱ // 0xf0a @0xa
0x0f00…0f15 at000b = ╱ed╱(╱ // 0xf0b @0xb
0x0f00…0f15 at000c = ╱46╱F╱ // 0xf0c @0xc
0x0f00…0f15 at000d = ╱50╱P╱ // 0xf0d @0xd
0x0f00…0f15 at000e = ╱49╱I╱ // 0xf0e @0xe
0x0f00…0f15 at000f = ╱4c╱L╱ // 0xf0f @0xf
0x0f00…0f15 at0010 = ╱33╱3╱ // 0xf10 @0x10
0x0f00…0f15 at0011 = ╱ec╱,╱ // 0xf11 @0x11
0x0f00…0f15 at0012 = ╱47╱G╱ // 0xf12 @0x12
0x0f00…0f15 at0013 = ╱ee╱)╱ // 0xf13 @0x13
0x0f00…0f15 at0014 = EOL // 0xf14 @0x14
0x0f00…0f15 }
0x0f15…0f2c 9c83 1390 PUT K5$,S1:FNR,FNAVN$
0x0f15…0f2c LineComalBin {
0x0f15…0f2c ptr = 0x9c83 // 0xf15 @0x0
0x0f15…0f2c lno = 0x056e // 0xf17 @0x2
0x0f15…0f2c at0004 = ╱aa╱ PUT ╱ // 0xf19 @0x4
0x0f15…0f2c at0005 = ╱4b╱K╱ // 0xf1a @0x5
0x0f15…0f2c at0006 = ╱35╱5╱ // 0xf1b @0x6
0x0f15…0f2c at0007 = ╱ef╱$╱ // 0xf1c @0x7
0x0f15…0f2c at0008 = ╱ec╱,╱ // 0xf1d @0x8
0x0f15…0f2c at0009 = ╱53╱S╱ // 0xf1e @0x9
0x0f15…0f2c at000a = ╱31╱1╱ // 0xf1f @0xa
0x0f15…0f2c at000b = ╱f0╱:╱ // 0xf20 @0xb
0x0f15…0f2c at000c = ╱46╱F╱ // 0xf21 @0xc
0x0f15…0f2c at000d = ╱4e╱N╱ // 0xf22 @0xd
0x0f15…0f2c at000e = ╱52╱R╱ // 0xf23 @0xe
0x0f15…0f2c at000f = ╱ec╱,╱ // 0xf24 @0xf
0x0f15…0f2c at0010 = ╱46╱F╱ // 0xf25 @0x10
0x0f15…0f2c at0011 = ╱4e╱N╱ // 0xf26 @0x11
0x0f15…0f2c at0012 = ╱41╱A╱ // 0xf27 @0x12
0x0f15…0f2c at0013 = ╱56╱V╱ // 0xf28 @0x13
0x0f15…0f2c at0014 = ╱4e╱N╱ // 0xf29 @0x14
0x0f15…0f2c at0015 = ╱ef╱$╱ // 0xf2a @0x15
0x0f15…0f2c at0016 = EOL // 0xf2b @0x16
0x0f15…0f2c }
0x0f2c…0f44 9c9b 1400 EXEC FEJL(4,V,K5$)
0x0f2c…0f44 LineComalBin {
0x0f2c…0f44 ptr = 0x9c9b // 0xf2c @0x0
0x0f2c…0f44 lno = 0x0578 // 0xf2e @0x2
0x0f2c…0f44 at0004 = ╱9d╱ EXEC ╱ // 0xf30 @0x4
0x0f2c…0f44 at0005 = ╱46╱F╱ // 0xf31 @0x5
0x0f2c…0f44 at0006 = ╱45╱E╱ // 0xf32 @0x6
0x0f2c…0f44 at0007 = ╱4a╱J╱ // 0xf33 @0x7
0x0f2c…0f44 at0008 = ╱4c╱L╱ // 0xf34 @0x8
0x0f2c…0f44 at0009 = ╱ed╱(╱ // 0xf35 @0x9
0x0f2c…0f44 at000a = ╱34╱4╱ // 0xf36 @0xa
0x0f2c…0f44 at000b = ╱fe00008003╱ // 0xf37 @0xb
0x0f2c…0f44 at0010 = ╱ec╱,╱ // 0xf3c @0x10
0x0f2c…0f44 at0011 = ╱56╱V╱ // 0xf3d @0x11
0x0f2c…0f44 at0012 = ╱ec╱,╱ // 0xf3e @0x12
0x0f2c…0f44 at0013 = ╱4b╱K╱ // 0xf3f @0x13
0x0f2c…0f44 at0014 = ╱35╱5╱ // 0xf40 @0x14
0x0f2c…0f44 at0015 = ╱ef╱$╱ // 0xf41 @0x15
0x0f2c…0f44 at0016 = ╱ee╱)╱ // 0xf42 @0x16
0x0f2c…0f44 at0017 = EOL // 0xf43 @0x17
0x0f2c…0f44 }
0x0f44…0f6d 9cc4 1410 PUT K5$,S1+E:FMKODE$,FMDEBET$,FMKREDIT$
0x0f44…0f6d LineComalBin {
0x0f44…0f6d ptr = 0x9cc4 // 0xf44 @0x0
0x0f44…0f6d lno = 0x0582 // 0xf46 @0x2
0x0f44…0f6d at0004 = ╱aa╱ PUT ╱ // 0xf48 @0x4
0x0f44…0f6d at0005 = ╱4b╱K╱ // 0xf49 @0x5
0x0f44…0f6d at0006 = ╱35╱5╱ // 0xf4a @0x6
0x0f44…0f6d at0007 = ╱ef╱$╱ // 0xf4b @0x7
0x0f44…0f6d at0008 = ╱ec╱,╱ // 0xf4c @0x8
0x0f44…0f6d at0009 = ╱53╱S╱ // 0xf4d @0x9
0x0f44…0f6d at000a = ╱31╱1╱ // 0xf4e @0xa
0x0f44…0f6d at000b = ╱e2╱+╱ // 0xf4f @0xb
0x0f44…0f6d at000c = ╱45╱E╱ // 0xf50 @0xc
0x0f44…0f6d at000d = ╱f0╱:╱ // 0xf51 @0xd
0x0f44…0f6d at000e = ╱46╱F╱ // 0xf52 @0xe
0x0f44…0f6d at000f = ╱4d╱M╱ // 0xf53 @0xf
0x0f44…0f6d at0010 = ╱4b╱K╱ // 0xf54 @0x10
0x0f44…0f6d at0011 = ╱4f╱O╱ // 0xf55 @0x11
0x0f44…0f6d at0012 = ╱44╱D╱ // 0xf56 @0x12
0x0f44…0f6d at0013 = ╱45╱E╱ // 0xf57 @0x13
0x0f44…0f6d at0014 = ╱ef╱$╱ // 0xf58 @0x14
0x0f44…0f6d at0015 = ╱ec╱,╱ // 0xf59 @0x15
0x0f44…0f6d at0016 = ╱46╱F╱ // 0xf5a @0x16
0x0f44…0f6d at0017 = ╱4d╱M╱ // 0xf5b @0x17
0x0f44…0f6d at0018 = ╱44╱D╱ // 0xf5c @0x18
0x0f44…0f6d at0019 = ╱45╱E╱ // 0xf5d @0x19
0x0f44…0f6d at001a = ╱42╱B╱ // 0xf5e @0x1a
0x0f44…0f6d at001b = ╱45╱E╱ // 0xf5f @0x1b
0x0f44…0f6d at001c = ╱54╱T╱ // 0xf60 @0x1c
0x0f44…0f6d at001d = ╱ef╱$╱ // 0xf61 @0x1d
0x0f44…0f6d at001e = ╱ec╱,╱ // 0xf62 @0x1e
0x0f44…0f6d at001f = ╱46╱F╱ // 0xf63 @0x1f
0x0f44…0f6d at0020 = ╱4d╱M╱ // 0xf64 @0x20
0x0f44…0f6d at0021 = ╱4b╱K╱ // 0xf65 @0x21
0x0f44…0f6d at0022 = ╱52╱R╱ // 0xf66 @0x22
0x0f44…0f6d at0023 = ╱45╱E╱ // 0xf67 @0x23
0x0f44…0f6d at0024 = ╱44╱D╱ // 0xf68 @0x24
0x0f44…0f6d at0025 = ╱49╱I╱ // 0xf69 @0x25
0x0f44…0f6d at0026 = ╱54╱T╱ // 0xf6a @0x26
0x0f44…0f6d at0027 = ╱ef╱$╱ // 0xf6b @0x27
0x0f44…0f6d at0028 = EOL // 0xf6c @0x28
0x0f44…0f6d }
0x0f6d…0f8a 9ce1 1420 EXEC FEJL(4,4,K5$)
0x0f6d…0f8a LineComalBin {
0x0f6d…0f8a ptr = 0x9ce1 // 0xf6d @0x0
0x0f6d…0f8a lno = 0x058c // 0xf6f @0x2
0x0f6d…0f8a at0004 = ╱9d╱ EXEC ╱ // 0xf71 @0x4
0x0f6d…0f8a at0005 = ╱46╱F╱ // 0xf72 @0x5
0x0f6d…0f8a at0006 = ╱45╱E╱ // 0xf73 @0x6
0x0f6d…0f8a at0007 = ╱4a╱J╱ // 0xf74 @0x7
0x0f6d…0f8a at0008 = ╱4c╱L╱ // 0xf75 @0x8
0x0f6d…0f8a at0009 = ╱ed╱(╱ // 0xf76 @0x9
0x0f6d…0f8a at000a = ╱34╱4╱ // 0xf77 @0xa
0x0f6d…0f8a at000b = ╱fe00008003╱ // 0xf78 @0xb
0x0f6d…0f8a at0010 = ╱ec╱,╱ // 0xf7d @0x10
0x0f6d…0f8a at0011 = ╱34╱4╱ // 0xf7e @0x11
0x0f6d…0f8a at0012 = ╱fe00008003╱ // 0xf7f @0x12
0x0f6d…0f8a at0017 = ╱ec╱,╱ // 0xf84 @0x17
0x0f6d…0f8a at0018 = ╱4b╱K╱ // 0xf85 @0x18
0x0f6d…0f8a at0019 = ╱35╱5╱ // 0xf86 @0x19
0x0f6d…0f8a at001a = ╱ef╱$╱ // 0xf87 @0x1a
0x0f6d…0f8a at001b = ╱ee╱)╱ // 0xf88 @0x1b
0x0f6d…0f8a at001c = EOL // 0xf89 @0x1c
0x0f6d…0f8a }
0x0f8a…0fb3 9d0a 1430 PUT K5$,S1+G:FUKODE$,FÅDEBET$,FÅKREDIT$
0x0f8a…0fb3 LineComalBin {
0x0f8a…0fb3 ptr = 0x9d0a // 0xf8a @0x0
0x0f8a…0fb3 lno = 0x0596 // 0xf8c @0x2
0x0f8a…0fb3 at0004 = ╱aa╱ PUT ╱ // 0xf8e @0x4
0x0f8a…0fb3 at0005 = ╱4b╱K╱ // 0xf8f @0x5
0x0f8a…0fb3 at0006 = ╱35╱5╱ // 0xf90 @0x6
0x0f8a…0fb3 at0007 = ╱ef╱$╱ // 0xf91 @0x7
0x0f8a…0fb3 at0008 = ╱ec╱,╱ // 0xf92 @0x8
0x0f8a…0fb3 at0009 = ╱53╱S╱ // 0xf93 @0x9
0x0f8a…0fb3 at000a = ╱31╱1╱ // 0xf94 @0xa
0x0f8a…0fb3 at000b = ╱e2╱+╱ // 0xf95 @0xb
0x0f8a…0fb3 at000c = ╱47╱G╱ // 0xf96 @0xc
0x0f8a…0fb3 at000d = ╱f0╱:╱ // 0xf97 @0xd
0x0f8a…0fb3 at000e = ╱46╱F╱ // 0xf98 @0xe
0x0f8a…0fb3 at000f = ╱55╱U╱ // 0xf99 @0xf
0x0f8a…0fb3 at0010 = ╱4b╱K╱ // 0xf9a @0x10
0x0f8a…0fb3 at0011 = ╱4f╱O╱ // 0xf9b @0x11
0x0f8a…0fb3 at0012 = ╱44╱D╱ // 0xf9c @0x12
0x0f8a…0fb3 at0013 = ╱45╱E╱ // 0xf9d @0x13
0x0f8a…0fb3 at0014 = ╱ef╱$╱ // 0xf9e @0x14
0x0f8a…0fb3 at0015 = ╱ec╱,╱ // 0xf9f @0x15
0x0f8a…0fb3 at0016 = ╱46╱F╱ // 0xfa0 @0x16
0x0f8a…0fb3 at0017 = ╱5d╱Å╱ // 0xfa1 @0x17
0x0f8a…0fb3 at0018 = ╱44╱D╱ // 0xfa2 @0x18
0x0f8a…0fb3 at0019 = ╱45╱E╱ // 0xfa3 @0x19
0x0f8a…0fb3 at001a = ╱42╱B╱ // 0xfa4 @0x1a
0x0f8a…0fb3 at001b = ╱45╱E╱ // 0xfa5 @0x1b
0x0f8a…0fb3 at001c = ╱54╱T╱ // 0xfa6 @0x1c
0x0f8a…0fb3 at001d = ╱ef╱$╱ // 0xfa7 @0x1d
0x0f8a…0fb3 at001e = ╱ec╱,╱ // 0xfa8 @0x1e
0x0f8a…0fb3 at001f = ╱46╱F╱ // 0xfa9 @0x1f
0x0f8a…0fb3 at0020 = ╱5d╱Å╱ // 0xfaa @0x20
0x0f8a…0fb3 at0021 = ╱4b╱K╱ // 0xfab @0x21
0x0f8a…0fb3 at0022 = ╱52╱R╱ // 0xfac @0x22
0x0f8a…0fb3 at0023 = ╱45╱E╱ // 0xfad @0x23
0x0f8a…0fb3 at0024 = ╱44╱D╱ // 0xfae @0x24
0x0f8a…0fb3 at0025 = ╱49╱I╱ // 0xfaf @0x25
0x0f8a…0fb3 at0026 = ╱54╱T╱ // 0xfb0 @0x26
0x0f8a…0fb3 at0027 = ╱ef╱$╱ // 0xfb1 @0x27
0x0f8a…0fb3 at0028 = EOL // 0xfb2 @0x28
0x0f8a…0fb3 }
0x0fb3…0fd0 9d27 1440 EXEC FEJL(4,4,K5$)
0x0fb3…0fd0 LineComalBin {
0x0fb3…0fd0 ptr = 0x9d27 // 0xfb3 @0x0
0x0fb3…0fd0 lno = 0x05a0 // 0xfb5 @0x2
0x0fb3…0fd0 at0004 = ╱9d╱ EXEC ╱ // 0xfb7 @0x4
0x0fb3…0fd0 at0005 = ╱46╱F╱ // 0xfb8 @0x5
0x0fb3…0fd0 at0006 = ╱45╱E╱ // 0xfb9 @0x6
0x0fb3…0fd0 at0007 = ╱4a╱J╱ // 0xfba @0x7
0x0fb3…0fd0 at0008 = ╱4c╱L╱ // 0xfbb @0x8
0x0fb3…0fd0 at0009 = ╱ed╱(╱ // 0xfbc @0x9
0x0fb3…0fd0 at000a = ╱34╱4╱ // 0xfbd @0xa
0x0fb3…0fd0 at000b = ╱fe00008003╱ // 0xfbe @0xb
0x0fb3…0fd0 at0010 = ╱ec╱,╱ // 0xfc3 @0x10
0x0fb3…0fd0 at0011 = ╱34╱4╱ // 0xfc4 @0x11
0x0fb3…0fd0 at0012 = ╱fe00008003╱ // 0xfc5 @0x12
0x0fb3…0fd0 at0017 = ╱ec╱,╱ // 0xfca @0x17
0x0fb3…0fd0 at0018 = ╱4b╱K╱ // 0xfcb @0x18
0x0fb3…0fd0 at0019 = ╱35╱5╱ // 0xfcc @0x19
0x0fb3…0fd0 at001a = ╱ef╱$╱ // 0xfcd @0x1a
0x0fb3…0fd0 at001b = ╱ee╱)╱ // 0xfce @0x1b
0x0fb3…0fd0 at001c = EOL // 0xfcf @0x1c
0x0fb3…0fd0 }
0x0fd0…0fd6 9d2d 1450 ENDPROC
0x0fd0…0fd6 LineComalBin {
0x0fd0…0fd6 ptr = 0x9d2d // 0xfd0 @0x0
0x0fd0…0fd6 lno = 0x05aa // 0xfd2 @0x2
0x0fd0…0fd6 at0004 = ╱9f╱ ENDPROC ╱ // 0xfd4 @0x4
0x0fd0…0fd6 at0005 = EOL // 0xfd5 @0x5
0x0fd0…0fd6 }
0x0fd6…0fe8 9d3f 1460 PROC NRTEST(NUM1)
0x0fd6…0fe8 LineComalBin {
0x0fd6…0fe8 ptr = 0x9d3f // 0xfd6 @0x0
0x0fd6…0fe8 lno = 0x05b4 // 0xfd8 @0x2
0x0fd6…0fe8 at0004 = ╱9e╱ PROC ╱ // 0xfda @0x4
0x0fd6…0fe8 at0005 = ╱4e╱N╱ // 0xfdb @0x5
0x0fd6…0fe8 at0006 = ╱52╱R╱ // 0xfdc @0x6
0x0fd6…0fe8 at0007 = ╱54╱T╱ // 0xfdd @0x7
0x0fd6…0fe8 at0008 = ╱45╱E╱ // 0xfde @0x8
0x0fd6…0fe8 at0009 = ╱53╱S╱ // 0xfdf @0x9
0x0fd6…0fe8 at000a = ╱54╱T╱ // 0xfe0 @0xa
0x0fd6…0fe8 at000b = ╱ed╱(╱ // 0xfe1 @0xb
0x0fd6…0fe8 at000c = ╱4e╱N╱ // 0xfe2 @0xc
0x0fd6…0fe8 at000d = ╱55╱U╱ // 0xfe3 @0xd
0x0fd6…0fe8 at000e = ╱4d╱M╱ // 0xfe4 @0xe
0x0fd6…0fe8 at000f = ╱31╱1╱ // 0xfe5 @0xf
0x0fd6…0fe8 at0010 = ╱ee╱)╱ // 0xfe6 @0x10
0x0fd6…0fe8 at0011 = EOL // 0xfe7 @0x11
0x0fd6…0fe8 }
0x0fe8…100a 9d61 1470 P=B;TEST2=B;KTAL=B;L=LEN(NUM1$)
0x0fe8…100a LineComalBin {
0x0fe8…100a ptr = 0x9d61 // 0xfe8 @0x0
0x0fe8…100a lno = 0x05be // 0xfea @0x2
0x0fe8…100a at0004 = ╱50╱P╱ // 0xfec @0x4
0x0fe8…100a at0005 = ╱dc╱=╱ // 0xfed @0x5
0x0fe8…100a at0006 = ╱42╱B╱ // 0xfee @0x6
0x0fe8…100a at0007 = ╱eb╱;╱ // 0xfef @0x7
0x0fe8…100a at0008 = ╱54╱T╱ // 0xff0 @0x8
0x0fe8…100a at0009 = ╱45╱E╱ // 0xff1 @0x9
0x0fe8…100a at000a = ╱53╱S╱ // 0xff2 @0xa
0x0fe8…100a at000b = ╱54╱T╱ // 0xff3 @0xb
0x0fe8…100a at000c = ╱32╱2╱ // 0xff4 @0xc
0x0fe8…100a at000d = ╱dc╱=╱ // 0xff5 @0xd
0x0fe8…100a at000e = ╱42╱B╱ // 0xff6 @0xe
0x0fe8…100a at000f = ╱eb╱;╱ // 0xff7 @0xf
0x0fe8…100a at0010 = ╱4b╱K╱ // 0xff8 @0x10
0x0fe8…100a at0011 = ╱54╱T╱ // 0xff9 @0x11
0x0fe8…100a at0012 = ╱41╱A╱ // 0xffa @0x12
0x0fe8…100a at0013 = ╱4c╱L╱ // 0xffb @0x13
0x0fe8…100a at0014 = ╱dc╱=╱ // 0xffc @0x14
0x0fe8…100a at0015 = ╱42╱B╱ // 0xffd @0x15
0x0fe8…100a at0016 = ╱eb╱;╱ // 0xffe @0x16
0x0fe8…100a at0017 = ╱4c╱L╱ // 0xfff @0x17
0x0fe8…100a at0018 = ╱dc╱=╱ // 0x1000 @0x18
0x0fe8…100a at0019 = ╱cc╱LEN╱ // 0x1001 @0x19
0x0fe8…100a at001a = ╱ed╱(╱ // 0x1002 @0x1a
0x0fe8…100a at001b = ╱4e╱N╱ // 0x1003 @0x1b
0x0fe8…100a at001c = ╱55╱U╱ // 0x1004 @0x1c
0x0fe8…100a at001d = ╱4d╱M╱ // 0x1005 @0x1d
0x0fe8…100a at001e = ╱31╱1╱ // 0x1006 @0x1e
0x0fe8…100a at001f = ╱ef╱$╱ // 0x1007 @0x1f
0x0fe8…100a at0020 = ╱ee╱)╱ // 0x1008 @0x20
0x0fe8…100a at0021 = EOL // 0x1009 @0x21
0x0fe8…100a }
0x100a…101a 9d71 1480 IF L>6 THEN EXIT
0x100a…101a LineComalBin {
0x100a…101a ptr = 0x9d71 // 0x100a @0x0
0x100a…101a lno = 0x05c8 // 0x100c @0x2
0x100a…101a at0004 = ╱82╱ IF ╱ // 0x100e @0x4
0x100a…101a at0005 = ╱4c╱L╱ // 0x100f @0x5
0x100a…101a at0006 = ╱de╱>╱ // 0x1010 @0x6
0x100a…101a at0007 = ╱36╱6╱ // 0x1011 @0x7
0x100a…101a at0008 = ╱fe0000c003╱ // 0x1012 @0x8
0x100a…101a at000d = ╱b6╱ THEN ╱ // 0x1017 @0xd
0x100a…101a at000e = ╱99╱ EXIT ╱ // 0x1018 @0xe
0x100a…101a at000f = EOL // 0x1019 @0xf
0x100a…101a }
0x101a…1023 9d7a 1490 CASE L OF
0x101a…1023 LineComalBin {
0x101a…1023 ptr = 0x9d7a // 0x101a @0x0
0x101a…1023 lno = 0x05d2 // 0x101c @0x2
0x101a…1023 at0004 = ╱a201╱ CASE ╱ // 0x101e @0x4
0x101a…1023 at0006 = ╱4c╱L╱ // 0x1020 @0x6
0x101a…1023 at0007 = ╱ba╱ OF ╱ // 0x1021 @0x7
0x101a…1023 at0008 = EOL // 0x1022 @0x8
0x101a…1023 }
0x1023…102e 9d85 1500 FOR I=E TO L
0x1023…102e LineComalBin {
0x1023…102e ptr = 0x9d85 // 0x1023 @0x0
0x1023…102e lno = 0x05dc // 0x1025 @0x2
0x1023…102e at0004 = ╱83╱ FOR ╱ // 0x1027 @0x4
0x1023…102e at0005 = ╱49╱I╱ // 0x1028 @0x5
0x1023…102e at0006 = ╱dc╱=╱ // 0x1029 @0x6
0x1023…102e at0007 = ╱45╱E╱ // 0x102a @0x7
0x1023…102e at0008 = ╱b7╱ TO ╱ // 0x102b @0x8
0x1023…102e at0009 = ╱4c╱L╱ // 0x102c @0x9
0x1023…102e at000a = EOL // 0x102d @0xa
0x1023…102e }
0x102e…104c 9da3 1510 P1=INT(ORD(NUM1$(I))-48)
0x102e…104c LineComalBin {
0x102e…104c ptr = 0x9da3 // 0x102e @0x0
0x102e…104c lno = 0x05e6 // 0x1030 @0x2
0x102e…104c at0004 = ╱50╱P╱ // 0x1032 @0x4
0x102e…104c at0005 = ╱31╱1╱ // 0x1033 @0x5
0x102e…104c at0006 = ╱dc╱=╱ // 0x1034 @0x6
0x102e…104c at0007 = ╱c6╱INT╱ // 0x1035 @0x7
0x102e…104c at0008 = ╱ed╱(╱ // 0x1036 @0x8
0x102e…104c at0009 = ╱cd╱ORD╱ // 0x1037 @0x9
0x102e…104c at000a = ╱ed╱(╱ // 0x1038 @0xa
0x102e…104c at000b = ╱4e╱N╱ // 0x1039 @0xb
0x102e…104c at000c = ╱55╱U╱ // 0x103a @0xc
0x102e…104c at000d = ╱4d╱M╱ // 0x103b @0xd
0x102e…104c at000e = ╱31╱1╱ // 0x103c @0xe
0x102e…104c at000f = ╱ef╱$╱ // 0x103d @0xf
0x102e…104c at0010 = ╱ed╱(╱ // 0x103e @0x10
0x102e…104c at0011 = ╱49╱I╱ // 0x103f @0x11
0x102e…104c at0012 = ╱ee╱)╱ // 0x1040 @0x12
0x102e…104c at0013 = ╱ee╱)╱ // 0x1041 @0x13
0x102e…104c at0014 = ╱e3╱-╱ // 0x1042 @0x14
0x102e…104c at0015 = ╱34╱4╱ // 0x1043 @0x15
0x102e…104c at0016 = ╱38╱8╱ // 0x1044 @0x16
0x102e…104c at0017 = ╱fe0000c006╱ // 0x1045 @0x17
0x102e…104c at001c = ╱ee╱)╱ // 0x104a @0x1c
0x102e…104c at001d = EOL // 0x104b @0x1d
0x102e…104c }
0x104c…1063 9dba 1520 IF P1<B OR P1>W THEN TEST2=E
0x104c…1063 LineComalBin {
0x104c…1063 ptr = 0x9dba // 0x104c @0x0
0x104c…1063 lno = 0x05f0 // 0x104e @0x2
0x104c…1063 at0004 = ╱82╱ IF ╱ // 0x1050 @0x4
0x104c…1063 at0005 = ╱50╱P╱ // 0x1051 @0x5
0x104c…1063 at0006 = ╱31╱1╱ // 0x1052 @0x6
0x104c…1063 at0007 = ╱dd╱<╱ // 0x1053 @0x7
0x104c…1063 at0008 = ╱42╱B╱ // 0x1054 @0x8
0x104c…1063 at0009 = ╱db╱ OR ╱ // 0x1055 @0x9
0x104c…1063 at000a = ╱50╱P╱ // 0x1056 @0xa
0x104c…1063 at000b = ╱31╱1╱ // 0x1057 @0xb
0x104c…1063 at000c = ╱de╱>╱ // 0x1058 @0xc
0x104c…1063 at000d = ╱57╱W╱ // 0x1059 @0xd
0x104c…1063 at000e = ╱b6╱ THEN ╱ // 0x105a @0xe
0x104c…1063 at000f = ╱54╱T╱ // 0x105b @0xf
0x104c…1063 at0010 = ╱45╱E╱ // 0x105c @0x10
0x104c…1063 at0011 = ╱53╱S╱ // 0x105d @0x11
0x104c…1063 at0012 = ╱54╱T╱ // 0x105e @0x12
0x104c…1063 at0013 = ╱32╱2╱ // 0x105f @0x13
0x104c…1063 at0014 = ╱dc╱=╱ // 0x1060 @0x14
0x104c…1063 at0015 = ╱45╱E╱ // 0x1061 @0x15
0x104c…1063 at0016 = EOL // 0x1062 @0x16
0x104c…1063 }
0x1063…1076 9dcd 1530 P=P*10+P1
0x1063…1076 LineComalBin {
0x1063…1076 ptr = 0x9dcd // 0x1063 @0x0
0x1063…1076 lno = 0x05fa // 0x1065 @0x2
0x1063…1076 at0004 = ╱50╱P╱ // 0x1067 @0x4
0x1063…1076 at0005 = ╱dc╱=╱ // 0x1068 @0x5
0x1063…1076 at0006 = ╱50╱P╱ // 0x1069 @0x6
0x1063…1076 at0007 = ╱e4╱*╱ // 0x106a @0x7
0x1063…1076 at0008 = ╱31╱1╱ // 0x106b @0x8
0x1063…1076 at0009 = ╱30╱0╱ // 0x106c @0x9
0x1063…1076 at000a = ╱fe0000a004╱ // 0x106d @0xa
0x1063…1076 at000f = ╱e2╱+╱ // 0x1072 @0xf
0x1063…1076 at0010 = ╱50╱P╱ // 0x1073 @0x10
0x1063…1076 at0011 = ╱31╱1╱ // 0x1074 @0x11
0x1063…1076 at0012 = EOL // 0x1075 @0x12
0x1063…1076 }
0x1076…107d 9dd4 1540 NEXT I
0x1076…107d LineComalBin {
0x1076…107d ptr = 0x9dd4 // 0x1076 @0x0
0x1076…107d lno = 0x0604 // 0x1078 @0x2
0x1076…107d at0004 = ╱84╱ NEXT ╱ // 0x107a @0x4
0x1076…107d at0005 = ╱49╱I╱ // 0x107b @0x5
0x1076…107d at0006 = EOL // 0x107c @0x6
0x1076…107d }
0x107d…1093 9dea 1550 KTAL=P DIV 10000
0x107d…1093 LineComalBin {
0x107d…1093 ptr = 0x9dea // 0x107d @0x0
0x107d…1093 lno = 0x060e // 0x107f @0x2
0x107d…1093 at0004 = ╱4b╱K╱ // 0x1081 @0x4
0x107d…1093 at0005 = ╱54╱T╱ // 0x1082 @0x5
0x107d…1093 at0006 = ╱41╱A╱ // 0x1083 @0x6
0x107d…1093 at0007 = ╱4c╱L╱ // 0x1084 @0x7
0x107d…1093 at0008 = ╱dc╱=╱ // 0x1085 @0x8
0x107d…1093 at0009 = ╱50╱P╱ // 0x1086 @0x9
0x107d…1093 at000a = ╱e7╱ DIV ╱ // 0x1087 @0xa
0x107d…1093 at000b = ╱31╱1╱ // 0x1088 @0xb
0x107d…1093 at000c = ╱30╱0╱ // 0x1089 @0xc
0x107d…1093 at000d = ╱30╱0╱ // 0x108a @0xd
0x107d…1093 at000e = ╱30╱0╱ // 0x108b @0xe
0x107d…1093 at000f = ╱30╱0╱ // 0x108c @0xf
0x107d…1093 at0010 = ╱fe00409c0e╱ // 0x108d @0x10
0x107d…1093 at0015 = EOL // 0x1092 @0x15
0x107d…1093 }
0x1093…109b 9df2 1560 WHEN B
0x1093…109b LineComalBin {
0x1093…109b ptr = 0x9df2 // 0x1093 @0x0
0x1093…109b lno = 0x0618 // 0x1095 @0x2
0x1093…109b at0004 = ╱a301╱ WHEN ╱ // 0x1097 @0x4
0x1093…109b at0006 = ╱42╱B╱ // 0x1099 @0x6
0x1093…109b at0007 = EOL // 0x109a @0x7
0x1093…109b }
0x109b…10a4 9dfb 1570 P=-E
0x109b…10a4 LineComalBin {
0x109b…10a4 ptr = 0x9dfb // 0x109b @0x0
0x109b…10a4 lno = 0x0622 // 0x109d @0x2
0x109b…10a4 at0004 = ╱50╱P╱ // 0x109f @0x4
0x109b…10a4 at0005 = ╱dc╱=╱ // 0x10a0 @0x5
0x109b…10a4 at0006 = ╱e9╱-╱ // 0x10a1 @0x6
0x109b…10a4 at0007 = ╱45╱E╱ // 0x10a2 @0x7
0x109b…10a4 at0008 = EOL // 0x10a3 @0x8
0x109b…10a4 }
0x10a4…10ac 9e03 1580 WHEN E
0x10a4…10ac LineComalBin {
0x10a4…10ac ptr = 0x9e03 // 0x10a4 @0x0
0x10a4…10ac lno = 0x062c // 0x10a6 @0x2
0x10a4…10ac at0004 = ╱a301╱ WHEN ╱ // 0x10a8 @0x4
0x10a4…10ac at0006 = ╱45╱E╱ // 0x10aa @0x6
0x10a4…10ac at0007 = EOL // 0x10ab @0x7
0x10a4…10ac }
0x10ac…10b9 9e10 1590 CASE NUM1$ OF
0x10ac…10b9 LineComalBin {
0x10ac…10b9 ptr = 0x9e10 // 0x10ac @0x0
0x10ac…10b9 lno = 0x0636 // 0x10ae @0x2
0x10ac…10b9 at0004 = ╱a200╱ CASE ╱ // 0x10b0 @0x4
0x10ac…10b9 at0006 = ╱4e╱N╱ // 0x10b2 @0x6
0x10ac…10b9 at0007 = ╱55╱U╱ // 0x10b3 @0x7
0x10ac…10b9 at0008 = ╱4d╱M╱ // 0x10b4 @0x8
0x10ac…10b9 at0009 = ╱31╱1╱ // 0x10b5 @0x9
0x10ac…10b9 at000a = ╱ef╱$╱ // 0x10b6 @0xa
0x10ac…10b9 at000b = ╱ba╱ OF ╱ // 0x10b7 @0xb
0x10ac…10b9 at000c = EOL // 0x10b8 @0xc
0x10ac…10b9 }
0x10b9…10d3 9e2a 1600 P=INT(ORD(NUM1$)-48)
0x10b9…10d3 LineComalBin {
0x10b9…10d3 ptr = 0x9e2a // 0x10b9 @0x0
0x10b9…10d3 lno = 0x0640 // 0x10bb @0x2
0x10b9…10d3 at0004 = ╱50╱P╱ // 0x10bd @0x4
0x10b9…10d3 at0005 = ╱dc╱=╱ // 0x10be @0x5
0x10b9…10d3 at0006 = ╱c6╱INT╱ // 0x10bf @0x6
0x10b9…10d3 at0007 = ╱ed╱(╱ // 0x10c0 @0x7
0x10b9…10d3 at0008 = ╱cd╱ORD╱ // 0x10c1 @0x8
0x10b9…10d3 at0009 = ╱ed╱(╱ // 0x10c2 @0x9
0x10b9…10d3 at000a = ╱4e╱N╱ // 0x10c3 @0xa
0x10b9…10d3 at000b = ╱55╱U╱ // 0x10c4 @0xb
0x10b9…10d3 at000c = ╱4d╱M╱ // 0x10c5 @0xc
0x10b9…10d3 at000d = ╱31╱1╱ // 0x10c6 @0xd
0x10b9…10d3 at000e = ╱ef╱$╱ // 0x10c7 @0xe
0x10b9…10d3 at000f = ╱ee╱)╱ // 0x10c8 @0xf
0x10b9…10d3 at0010 = ╱e3╱-╱ // 0x10c9 @0x10
0x10b9…10d3 at0011 = ╱34╱4╱ // 0x10ca @0x11
0x10b9…10d3 at0012 = ╱38╱8╱ // 0x10cb @0x12
0x10b9…10d3 at0013 = ╱fe0000c006╱ // 0x10cc @0x13
0x10b9…10d3 at0018 = ╱ee╱)╱ // 0x10d1 @0x18
0x10b9…10d3 at0019 = EOL // 0x10d2 @0x19
0x10b9…10d3 }
0x10d3…10e1 9e38 1610 WHEN "D","d"
0x10d3…10e1 LineComalBin {
0x10d3…10e1 ptr = 0x9e38 // 0x10d3 @0x0
0x10d3…10e1 lno = 0x064a // 0x10d5 @0x2
0x10d3…10e1 at0004 = ╱a300╱ WHEN ╱ // 0x10d7 @0x4
0x10d3…10e1 at0006 = ╱22╱"╱ // 0x10d9 @0x6
0x10d3…10e1 at0007 = ╱44╱D╱ // 0x10da @0x7
0x10d3…10e1 at0008 = ╱22╱"╱ // 0x10db @0x8
0x10d3…10e1 at0009 = ╱ec╱,╱ // 0x10dc @0x9
0x10d3…10e1 at000a = ╱22╱"╱ // 0x10dd @0xa
0x10d3…10e1 at000b = ╱64╱d╱ // 0x10de @0xb
0x10d3…10e1 at000c = ╱22╱"╱ // 0x10df @0xc
0x10d3…10e1 at000d = EOL // 0x10e0 @0xd
0x10d3…10e1 }
0x10e1…10ea 9e41 1620 P=-G
0x10e1…10ea LineComalBin {
0x10e1…10ea ptr = 0x9e41 // 0x10e1 @0x0
0x10e1…10ea lno = 0x0654 // 0x10e3 @0x2
0x10e1…10ea at0004 = ╱50╱P╱ // 0x10e5 @0x4
0x10e1…10ea at0005 = ╱dc╱=╱ // 0x10e6 @0x5
0x10e1…10ea at0006 = ╱e9╱-╱ // 0x10e7 @0x6
0x10e1…10ea at0007 = ╱47╱G╱ // 0x10e8 @0x7
0x10e1…10ea at0008 = EOL // 0x10e9 @0x8
0x10e1…10ea }
0x10ea…10f8 9e4f 1630 WHEN "A","a"
0x10ea…10f8 LineComalBin {
0x10ea…10f8 ptr = 0x9e4f // 0x10ea @0x0
0x10ea…10f8 lno = 0x065e // 0x10ec @0x2
0x10ea…10f8 at0004 = ╱a300╱ WHEN ╱ // 0x10ee @0x4
0x10ea…10f8 at0006 = ╱22╱"╱ // 0x10f0 @0x6
0x10ea…10f8 at0007 = ╱41╱A╱ // 0x10f1 @0x7
0x10ea…10f8 at0008 = ╱22╱"╱ // 0x10f2 @0x8
0x10ea…10f8 at0009 = ╱ec╱,╱ // 0x10f3 @0x9
0x10ea…10f8 at000a = ╱22╱"╱ // 0x10f4 @0xa
0x10ea…10f8 at000b = ╱61╱a╱ // 0x10f5 @0xb
0x10ea…10f8 at000c = ╱22╱"╱ // 0x10f6 @0xc
0x10ea…10f8 at000d = EOL // 0x10f7 @0xd
0x10ea…10f8 }
0x10f8…1101 9e58 1640 P=-V
0x10f8…1101 LineComalBin {
0x10f8…1101 ptr = 0x9e58 // 0x10f8 @0x0
0x10f8…1101 lno = 0x0668 // 0x10fa @0x2
0x10f8…1101 at0004 = ╱50╱P╱ // 0x10fc @0x4
0x10f8…1101 at0005 = ╱dc╱=╱ // 0x10fd @0x5
0x10f8…1101 at0006 = ╱e9╱-╱ // 0x10fe @0x6
0x10f8…1101 at0007 = ╱56╱V╱ // 0x10ff @0x7
0x10f8…1101 at0008 = EOL // 0x1100 @0x8
0x10f8…1101 }
0x1101…110f 9e66 1650 WHEN "M","m"
0x1101…110f LineComalBin {
0x1101…110f ptr = 0x9e66 // 0x1101 @0x0
0x1101…110f lno = 0x0672 // 0x1103 @0x2
0x1101…110f at0004 = ╱a300╱ WHEN ╱ // 0x1105 @0x4
0x1101…110f at0006 = ╱22╱"╱ // 0x1107 @0x6
0x1101…110f at0007 = ╱4d╱M╱ // 0x1108 @0x7
0x1101…110f at0008 = ╱22╱"╱ // 0x1109 @0x8
0x1101…110f at0009 = ╱ec╱,╱ // 0x110a @0x9
0x1101…110f at000a = ╱22╱"╱ // 0x110b @0xa
0x1101…110f at000b = ╱6d╱m╱ // 0x110c @0xb
0x1101…110f at000c = ╱22╱"╱ // 0x110d @0xc
0x1101…110f at000d = EOL // 0x110e @0xd
0x1101…110f }
0x110f…111d 9e74 1660 P=-4
0x110f…111d LineComalBin {
0x110f…111d ptr = 0x9e74 // 0x110f @0x0
0x110f…111d lno = 0x067c // 0x1111 @0x2
0x110f…111d at0004 = ╱50╱P╱ // 0x1113 @0x4
0x110f…111d at0005 = ╱dc╱=╱ // 0x1114 @0x5
0x110f…111d at0006 = ╱e9╱-╱ // 0x1115 @0x6
0x110f…111d at0007 = ╱34╱4╱ // 0x1116 @0x7
0x110f…111d at0008 = ╱fe00008003╱ // 0x1117 @0x8
0x110f…111d at000d = EOL // 0x111c @0xd
0x110f…111d }
0x111d…112b 9e82 1670 WHEN "J","j"
0x111d…112b LineComalBin {
0x111d…112b ptr = 0x9e82 // 0x111d @0x0
0x111d…112b lno = 0x0686 // 0x111f @0x2
0x111d…112b at0004 = ╱a300╱ WHEN ╱ // 0x1121 @0x4
0x111d…112b at0006 = ╱22╱"╱ // 0x1123 @0x6
0x111d…112b at0007 = ╱4a╱J╱ // 0x1124 @0x7
0x111d…112b at0008 = ╱22╱"╱ // 0x1125 @0x8
0x111d…112b at0009 = ╱ec╱,╱ // 0x1126 @0x9
0x111d…112b at000a = ╱22╱"╱ // 0x1127 @0xa
0x111d…112b at000b = ╱6a╱j╱ // 0x1128 @0xb
0x111d…112b at000c = ╱22╱"╱ // 0x1129 @0xc
0x111d…112b at000d = EOL // 0x112a @0xd
0x111d…112b }
0x112b…1139 9e90 1680 P=-7
0x112b…1139 LineComalBin {
0x112b…1139 ptr = 0x9e90 // 0x112b @0x0
0x112b…1139 lno = 0x0690 // 0x112d @0x2
0x112b…1139 at0004 = ╱50╱P╱ // 0x112f @0x4
0x112b…1139 at0005 = ╱dc╱=╱ // 0x1130 @0x5
0x112b…1139 at0006 = ╱e9╱-╱ // 0x1131 @0x6
0x112b…1139 at0007 = ╱37╱7╱ // 0x1132 @0x7
0x112b…1139 at0008 = ╱fe0000e003╱ // 0x1133 @0x8
0x112b…1139 at000d = EOL // 0x1138 @0xd
0x112b…1139 }
0x1139…1147 9e9e 1690 WHEN "N","n"
0x1139…1147 LineComalBin {
0x1139…1147 ptr = 0x9e9e // 0x1139 @0x0
0x1139…1147 lno = 0x069a // 0x113b @0x2
0x1139…1147 at0004 = ╱a300╱ WHEN ╱ // 0x113d @0x4
0x1139…1147 at0006 = ╱22╱"╱ // 0x113f @0x6
0x1139…1147 at0007 = ╱4e╱N╱ // 0x1140 @0x7
0x1139…1147 at0008 = ╱22╱"╱ // 0x1141 @0x8
0x1139…1147 at0009 = ╱ec╱,╱ // 0x1142 @0x9
0x1139…1147 at000a = ╱22╱"╱ // 0x1143 @0xa
0x1139…1147 at000b = ╱6e╱n╱ // 0x1144 @0xb
0x1139…1147 at000c = ╱22╱"╱ // 0x1145 @0xc
0x1139…1147 at000d = EOL // 0x1146 @0xd
0x1139…1147 }
0x1147…1155 9eac 1700 P=-8
0x1147…1155 LineComalBin {
0x1147…1155 ptr = 0x9eac // 0x1147 @0x0
0x1147…1155 lno = 0x06a4 // 0x1149 @0x2
0x1147…1155 at0004 = ╱50╱P╱ // 0x114b @0x4
0x1147…1155 at0005 = ╱dc╱=╱ // 0x114c @0x5
0x1147…1155 at0006 = ╱e9╱-╱ // 0x114d @0x6
0x1147…1155 at0007 = ╱38╱8╱ // 0x114e @0x7
0x1147…1155 at0008 = ╱fe00008004╱ // 0x114f @0x8
0x1147…1155 at000d = EOL // 0x1154 @0xd
0x1147…1155 }
0x1155…115b 9eb2 1710 ENDCASE
0x1155…115b LineComalBin {
0x1155…115b ptr = 0x9eb2 // 0x1155 @0x0
0x1155…115b lno = 0x06ae // 0x1157 @0x2
0x1155…115b at0004 = ╱a4╱ ENDCASE ╱ // 0x1159 @0x4
0x1155…115b at0005 = EOL // 0x115a @0x5
0x1155…115b }
0x115b…1161 9eb8 1720 ENDCASE
0x115b…1161 LineComalBin {
0x115b…1161 ptr = 0x9eb8 // 0x115b @0x0
0x115b…1161 lno = 0x06b8 // 0x115d @0x2
0x115b…1161 at0004 = ╱a4╱ ENDCASE ╱ // 0x115f @0x4
0x115b…1161 at0005 = EOL // 0x1160 @0x5
0x115b…1161 }
0x1161…1167 9ebe 1730 ENDPROC
0x1161…1167 LineComalBin {
0x1161…1167 ptr = 0x9ebe // 0x1161 @0x0
0x1161…1167 lno = 0x06c2 // 0x1163 @0x2
0x1161…1167 at0004 = ╱9f╱ ENDPROC ╱ // 0x1165 @0x4
0x1161…1167 at0005 = EOL // 0x1166 @0x5
0x1161…1167 }
0x1167…118a 9ee1 1740 PROC KINIT(K62,K63,TAB1,KM,MANTAL)
0x1167…118a LineComalBin {
0x1167…118a ptr = 0x9ee1 // 0x1167 @0x0
0x1167…118a lno = 0x06cc // 0x1169 @0x2
0x1167…118a at0004 = ╱9e╱ PROC ╱ // 0x116b @0x4
0x1167…118a at0005 = ╱4b╱K╱ // 0x116c @0x5
0x1167…118a at0006 = ╱49╱I╱ // 0x116d @0x6
0x1167…118a at0007 = ╱4e╱N╱ // 0x116e @0x7
0x1167…118a at0008 = ╱49╱I╱ // 0x116f @0x8
0x1167…118a at0009 = ╱54╱T╱ // 0x1170 @0x9
0x1167…118a at000a = ╱ed╱(╱ // 0x1171 @0xa
0x1167…118a at000b = ╱4b╱K╱ // 0x1172 @0xb
0x1167…118a at000c = ╱36╱6╱ // 0x1173 @0xc
0x1167…118a at000d = ╱32╱2╱ // 0x1174 @0xd
0x1167…118a at000e = ╱ec╱,╱ // 0x1175 @0xe
0x1167…118a at000f = ╱4b╱K╱ // 0x1176 @0xf
0x1167…118a at0010 = ╱36╱6╱ // 0x1177 @0x10
0x1167…118a at0011 = ╱33╱3╱ // 0x1178 @0x11
0x1167…118a at0012 = ╱ec╱,╱ // 0x1179 @0x12
0x1167…118a at0013 = ╱54╱T╱ // 0x117a @0x13
0x1167…118a at0014 = ╱41╱A╱ // 0x117b @0x14
0x1167…118a at0015 = ╱42╱B╱ // 0x117c @0x15
0x1167…118a at0016 = ╱31╱1╱ // 0x117d @0x16
0x1167…118a at0017 = ╱ec╱,╱ // 0x117e @0x17
0x1167…118a at0018 = ╱4b╱K╱ // 0x117f @0x18
0x1167…118a at0019 = ╱4d╱M╱ // 0x1180 @0x19
0x1167…118a at001a = ╱ec╱,╱ // 0x1181 @0x1a
0x1167…118a at001b = ╱4d╱M╱ // 0x1182 @0x1b
0x1167…118a at001c = ╱41╱A╱ // 0x1183 @0x1c
0x1167…118a at001d = ╱4e╱N╱ // 0x1184 @0x1d
0x1167…118a at001e = ╱54╱T╱ // 0x1185 @0x1e
0x1167…118a at001f = ╱41╱A╱ // 0x1186 @0x1f
0x1167…118a at0020 = ╱4c╱L╱ // 0x1187 @0x20
0x1167…118a at0021 = ╱ee╱)╱ // 0x1188 @0x21
0x1167…118a at0022 = EOL // 0x1189 @0x22
0x1167…118a }
0x118a…1196 9eed 1750 OPEN K63$,W
0x118a…1196 LineComalBin {
0x118a…1196 ptr = 0x9eed // 0x118a @0x0
0x118a…1196 lno = 0x06d6 // 0x118c @0x2
0x118a…1196 at0004 = ╱a7╱ OPEN ╱ // 0x118e @0x4
0x118a…1196 at0005 = ╱4b╱K╱ // 0x118f @0x5
0x118a…1196 at0006 = ╱36╱6╱ // 0x1190 @0x6
0x118a…1196 at0007 = ╱33╱3╱ // 0x1191 @0x7
0x118a…1196 at0008 = ╱ef╱$╱ // 0x1192 @0x8
0x118a…1196 at0009 = ╱ec╱,╱ // 0x1193 @0x9
0x118a…1196 at000a = ╱57╱W╱ // 0x1194 @0xa
0x118a…1196 at000b = EOL // 0x1195 @0xb
0x118a…1196 }
0x1196…11aa 9f01 1760 EXEC FEJL(G,E,K63$)
0x1196…11aa LineComalBin {
0x1196…11aa ptr = 0x9f01 // 0x1196 @0x0
0x1196…11aa lno = 0x06e0 // 0x1198 @0x2
0x1196…11aa at0004 = ╱9d╱ EXEC ╱ // 0x119a @0x4
0x1196…11aa at0005 = ╱46╱F╱ // 0x119b @0x5
0x1196…11aa at0006 = ╱45╱E╱ // 0x119c @0x6
0x1196…11aa at0007 = ╱4a╱J╱ // 0x119d @0x7
0x1196…11aa at0008 = ╱4c╱L╱ // 0x119e @0x8
0x1196…11aa at0009 = ╱ed╱(╱ // 0x119f @0x9
0x1196…11aa at000a = ╱47╱G╱ // 0x11a0 @0xa
0x1196…11aa at000b = ╱ec╱,╱ // 0x11a1 @0xb
0x1196…11aa at000c = ╱45╱E╱ // 0x11a2 @0xc
0x1196…11aa at000d = ╱ec╱,╱ // 0x11a3 @0xd
0x1196…11aa at000e = ╱4b╱K╱ // 0x11a4 @0xe
0x1196…11aa at000f = ╱36╱6╱ // 0x11a5 @0xf
0x1196…11aa at0010 = ╱33╱3╱ // 0x11a6 @0x10
0x1196…11aa at0011 = ╱ef╱$╱ // 0x11a7 @0x11
0x1196…11aa at0012 = ╱ee╱)╱ // 0x11a8 @0x12
0x1196…11aa at0013 = EOL // 0x11a9 @0x13
0x1196…11aa }
0x11aa…11c1 9f18 1770 FOR J=E TO MANTAL DIV 4
0x11aa…11c1 LineComalBin {
0x11aa…11c1 ptr = 0x9f18 // 0x11aa @0x0
0x11aa…11c1 lno = 0x06ea // 0x11ac @0x2
0x11aa…11c1 at0004 = ╱83╱ FOR ╱ // 0x11ae @0x4
0x11aa…11c1 at0005 = ╱4a╱J╱ // 0x11af @0x5
0x11aa…11c1 at0006 = ╱dc╱=╱ // 0x11b0 @0x6
0x11aa…11c1 at0007 = ╱45╱E╱ // 0x11b1 @0x7
0x11aa…11c1 at0008 = ╱b7╱ TO ╱ // 0x11b2 @0x8
0x11aa…11c1 at0009 = ╱4d╱M╱ // 0x11b3 @0x9
0x11aa…11c1 at000a = ╱41╱A╱ // 0x11b4 @0xa
0x11aa…11c1 at000b = ╱4e╱N╱ // 0x11b5 @0xb
0x11aa…11c1 at000c = ╱54╱T╱ // 0x11b6 @0xc
0x11aa…11c1 at000d = ╱41╱A╱ // 0x11b7 @0xd
0x11aa…11c1 at000e = ╱4c╱L╱ // 0x11b8 @0xe
0x11aa…11c1 at000f = ╱e7╱ DIV ╱ // 0x11b9 @0xf
0x11aa…11c1 at0010 = ╱34╱4╱ // 0x11ba @0x10
0x11aa…11c1 at0011 = ╱fe00008003╱ // 0x11bb @0x11
0x11aa…11c1 at0016 = EOL // 0x11c0 @0x16
0x11aa…11c1 }
0x11c1…11da 9f31 1780 K90=J+MANTAL DIV 32
0x11c1…11da LineComalBin {
0x11c1…11da ptr = 0x9f31 // 0x11c1 @0x0
0x11c1…11da lno = 0x06f4 // 0x11c3 @0x2
0x11c1…11da at0004 = ╱4b╱K╱ // 0x11c5 @0x4
0x11c1…11da at0005 = ╱39╱9╱ // 0x11c6 @0x5
0x11c1…11da at0006 = ╱30╱0╱ // 0x11c7 @0x6
0x11c1…11da at0007 = ╱dc╱=╱ // 0x11c8 @0x7
0x11c1…11da at0008 = ╱4a╱J╱ // 0x11c9 @0x8
0x11c1…11da at0009 = ╱e2╱+╱ // 0x11ca @0x9
0x11c1…11da at000a = ╱4d╱M╱ // 0x11cb @0xa
0x11c1…11da at000b = ╱41╱A╱ // 0x11cc @0xb
0x11c1…11da at000c = ╱4e╱N╱ // 0x11cd @0xc
0x11c1…11da at000d = ╱54╱T╱ // 0x11ce @0xd
0x11c1…11da at000e = ╱41╱A╱ // 0x11cf @0xe
0x11c1…11da at000f = ╱4c╱L╱ // 0x11d0 @0xf
0x11c1…11da at0010 = ╱e7╱ DIV ╱ // 0x11d1 @0x10
0x11c1…11da at0011 = ╱33╱3╱ // 0x11d2 @0x11
0x11c1…11da at0012 = ╱32╱2╱ // 0x11d3 @0x12
0x11c1…11da at0013 = ╱fe00008006╱ // 0x11d4 @0x13
0x11c1…11da at0018 = EOL // 0x11d9 @0x18
0x11c1…11da }
0x11da…11f5 9f4c 1790 EXEC UNDIND(K62$,K90,TAB1)
0x11da…11f5 LineComalBin {
0x11da…11f5 ptr = 0x9f4c // 0x11da @0x0
0x11da…11f5 lno = 0x06fe // 0x11dc @0x2
0x11da…11f5 at0004 = ╱9d╱ EXEC ╱ // 0x11de @0x4
0x11da…11f5 at0005 = ╱55╱U╱ // 0x11df @0x5
0x11da…11f5 at0006 = ╱4e╱N╱ // 0x11e0 @0x6
0x11da…11f5 at0007 = ╱44╱D╱ // 0x11e1 @0x7
0x11da…11f5 at0008 = ╱49╱I╱ // 0x11e2 @0x8
0x11da…11f5 at0009 = ╱4e╱N╱ // 0x11e3 @0x9
0x11da…11f5 at000a = ╱44╱D╱ // 0x11e4 @0xa
0x11da…11f5 at000b = ╱ed╱(╱ // 0x11e5 @0xb
0x11da…11f5 at000c = ╱4b╱K╱ // 0x11e6 @0xc
0x11da…11f5 at000d = ╱36╱6╱ // 0x11e7 @0xd
0x11da…11f5 at000e = ╱32╱2╱ // 0x11e8 @0xe
0x11da…11f5 at000f = ╱ef╱$╱ // 0x11e9 @0xf
0x11da…11f5 at0010 = ╱ec╱,╱ // 0x11ea @0x10
0x11da…11f5 at0011 = ╱4b╱K╱ // 0x11eb @0x11
0x11da…11f5 at0012 = ╱39╱9╱ // 0x11ec @0x12
0x11da…11f5 at0013 = ╱30╱0╱ // 0x11ed @0x13
0x11da…11f5 at0014 = ╱ec╱,╱ // 0x11ee @0x14
0x11da…11f5 at0015 = ╱54╱T╱ // 0x11ef @0x15
0x11da…11f5 at0016 = ╱41╱A╱ // 0x11f0 @0x16
0x11da…11f5 at0017 = ╱42╱B╱ // 0x11f1 @0x17
0x11da…11f5 at0018 = ╱31╱1╱ // 0x11f2 @0x18
0x11da…11f5 at0019 = ╱ee╱)╱ // 0x11f3 @0x19
0x11da…11f5 at001a = EOL // 0x11f4 @0x1a
0x11da…11f5 }
0x11f5…1205 9f5c 1800 FOR I=E TO 4
0x11f5…1205 LineComalBin {
0x11f5…1205 ptr = 0x9f5c // 0x11f5 @0x0
0x11f5…1205 lno = 0x0708 // 0x11f7 @0x2
0x11f5…1205 at0004 = ╱83╱ FOR ╱ // 0x11f9 @0x4
0x11f5…1205 at0005 = ╱49╱I╱ // 0x11fa @0x5
0x11f5…1205 at0006 = ╱dc╱=╱ // 0x11fb @0x6
0x11f5…1205 at0007 = ╱45╱E╱ // 0x11fc @0x7
0x11f5…1205 at0008 = ╱b7╱ TO ╱ // 0x11fd @0x8
0x11f5…1205 at0009 = ╱34╱4╱ // 0x11fe @0x9
0x11f5…1205 at000a = ╱fe00008003╱ // 0x11ff @0xa
0x11f5…1205 at000f = EOL // 0x1204 @0xf
0x11f5…1205 }
0x1205…1223 9f7a 1810 IF TAB1(I,E)=1000000 THEN EXIT
0x1205…1223 LineComalBin {
0x1205…1223 ptr = 0x9f7a // 0x1205 @0x0
0x1205…1223 lno = 0x0712 // 0x1207 @0x2
0x1205…1223 at0004 = ╱82╱ IF ╱ // 0x1209 @0x4
0x1205…1223 at0005 = ╱54╱T╱ // 0x120a @0x5
0x1205…1223 at0006 = ╱41╱A╱ // 0x120b @0x6
0x1205…1223 at0007 = ╱42╱B╱ // 0x120c @0x7
0x1205…1223 at0008 = ╱31╱1╱ // 0x120d @0x8
0x1205…1223 at0009 = ╱ed╱(╱ // 0x120e @0x9
0x1205…1223 at000a = ╱49╱I╱ // 0x120f @0xa
0x1205…1223 at000b = ╱ec╱,╱ // 0x1210 @0xb
0x1205…1223 at000c = ╱45╱E╱ // 0x1211 @0xc
0x1205…1223 at000d = ╱ee╱)╱ // 0x1212 @0xd
0x1205…1223 at000e = ╱dc╱=╱ // 0x1213 @0xe
0x1205…1223 at000f = ╱31╱1╱ // 0x1214 @0xf
0x1205…1223 at0010 = ╱30╱0╱ // 0x1215 @0x10
0x1205…1223 at0011 = ╱30╱0╱ // 0x1216 @0x11
0x1205…1223 at0012 = ╱30╱0╱ // 0x1217 @0x12
0x1205…1223 at0013 = ╱30╱0╱ // 0x1218 @0x13
0x1205…1223 at0014 = ╱30╱0╱ // 0x1219 @0x14
0x1205…1223 at0015 = ╱30╱0╱ // 0x121a @0x15
0x1205…1223 at0016 = ╱fe0024f414╱ // 0x121b @0x16
0x1205…1223 at001b = ╱b6╱ THEN ╱ // 0x1220 @0x1b
0x1205…1223 at001c = ╱99╱ EXIT ╱ // 0x1221 @0x1c
0x1205…1223 at001d = EOL // 0x1222 @0x1d
0x1205…1223 }
0x1223…123f 9f96 1820 X=TAB1(I,G);SALDO$="0+"
0x1223…123f LineComalBin {
0x1223…123f ptr = 0x9f96 // 0x1223 @0x0
0x1223…123f lno = 0x071c // 0x1225 @0x2
0x1223…123f at0004 = ╱58╱X╱ // 0x1227 @0x4
0x1223…123f at0005 = ╱dc╱=╱ // 0x1228 @0x5
0x1223…123f at0006 = ╱54╱T╱ // 0x1229 @0x6
0x1223…123f at0007 = ╱41╱A╱ // 0x122a @0x7
0x1223…123f at0008 = ╱42╱B╱ // 0x122b @0x8
0x1223…123f at0009 = ╱31╱1╱ // 0x122c @0x9
0x1223…123f at000a = ╱ed╱(╱ // 0x122d @0xa
0x1223…123f at000b = ╱49╱I╱ // 0x122e @0xb
0x1223…123f at000c = ╱ec╱,╱ // 0x122f @0xc
0x1223…123f at000d = ╱47╱G╱ // 0x1230 @0xd
0x1223…123f at000e = ╱ee╱)╱ // 0x1231 @0xe
0x1223…123f at000f = ╱eb╱;╱ // 0x1232 @0xf
0x1223…123f at0010 = ╱53╱S╱ // 0x1233 @0x10
0x1223…123f at0011 = ╱41╱A╱ // 0x1234 @0x11
0x1223…123f at0012 = ╱4c╱L╱ // 0x1235 @0x12
0x1223…123f at0013 = ╱44╱D╱ // 0x1236 @0x13
0x1223…123f at0014 = ╱4f╱O╱ // 0x1237 @0x14
0x1223…123f at0015 = ╱ef╱$╱ // 0x1238 @0x15
0x1223…123f at0016 = ╱dc╱=╱ // 0x1239 @0x16
0x1223…123f at0017 = ╱22╱"╱ // 0x123a @0x17
0x1223…123f at0018 = ╱30╱0╱ // 0x123b @0x18
0x1223…123f at0019 = ╱2b╱+╱ // 0x123c @0x19
0x1223…123f at001a = ╱22╱"╱ // 0x123d @0x1a
0x1223…123f at001b = EOL // 0x123e @0x1b
0x1223…123f }
0x123f…1249 9fa0 1830 CASE KM OF
0x123f…1249 LineComalBin {
0x123f…1249 ptr = 0x9fa0 // 0x123f @0x0
0x123f…1249 lno = 0x0726 // 0x1241 @0x2
0x123f…1249 at0004 = ╱a201╱ CASE ╱ // 0x1243 @0x4
0x123f…1249 at0006 = ╱4b╱K╱ // 0x1245 @0x6
0x123f…1249 at0007 = ╱4d╱M╱ // 0x1246 @0x7
0x123f…1249 at0008 = ╱ba╱ OF ╱ // 0x1247 @0x8
0x123f…1249 at0009 = EOL // 0x1248 @0x9
0x123f…1249 }
0x1249…1275 9fcc 1840 GET K63$,X:DEBNR,DEBNAVN$,DSALDO1$,DEBKGR$
0x1249…1275 LineComalBin {
0x1249…1275 ptr = 0x9fcc // 0x1249 @0x0
0x1249…1275 lno = 0x0730 // 0x124b @0x2
0x1249…1275 at0004 = ╱a9╱ GET ╱ // 0x124d @0x4
0x1249…1275 at0005 = ╱4b╱K╱ // 0x124e @0x5
0x1249…1275 at0006 = ╱36╱6╱ // 0x124f @0x6
0x1249…1275 at0007 = ╱33╱3╱ // 0x1250 @0x7
0x1249…1275 at0008 = ╱ef╱$╱ // 0x1251 @0x8
0x1249…1275 at0009 = ╱ec╱,╱ // 0x1252 @0x9
0x1249…1275 at000a = ╱58╱X╱ // 0x1253 @0xa
0x1249…1275 at000b = ╱f0╱:╱ // 0x1254 @0xb
0x1249…1275 at000c = ╱44╱D╱ // 0x1255 @0xc
0x1249…1275 at000d = ╱45╱E╱ // 0x1256 @0xd
0x1249…1275 at000e = ╱42╱B╱ // 0x1257 @0xe
0x1249…1275 at000f = ╱4e╱N╱ // 0x1258 @0xf
0x1249…1275 at0010 = ╱52╱R╱ // 0x1259 @0x10
0x1249…1275 at0011 = ╱ec╱,╱ // 0x125a @0x11
0x1249…1275 at0012 = ╱44╱D╱ // 0x125b @0x12
0x1249…1275 at0013 = ╱45╱E╱ // 0x125c @0x13
0x1249…1275 at0014 = ╱42╱B╱ // 0x125d @0x14
0x1249…1275 at0015 = ╱4e╱N╱ // 0x125e @0x15
0x1249…1275 at0016 = ╱41╱A╱ // 0x125f @0x16
0x1249…1275 at0017 = ╱56╱V╱ // 0x1260 @0x17
0x1249…1275 at0018 = ╱4e╱N╱ // 0x1261 @0x18
0x1249…1275 at0019 = ╱ef╱$╱ // 0x1262 @0x19
0x1249…1275 at001a = ╱ec╱,╱ // 0x1263 @0x1a
0x1249…1275 at001b = ╱44╱D╱ // 0x1264 @0x1b
0x1249…1275 at001c = ╱53╱S╱ // 0x1265 @0x1c
0x1249…1275 at001d = ╱41╱A╱ // 0x1266 @0x1d
0x1249…1275 at001e = ╱4c╱L╱ // 0x1267 @0x1e
0x1249…1275 at001f = ╱44╱D╱ // 0x1268 @0x1f
0x1249…1275 at0020 = ╱4f╱O╱ // 0x1269 @0x20
0x1249…1275 at0021 = ╱31╱1╱ // 0x126a @0x21
0x1249…1275 at0022 = ╱ef╱$╱ // 0x126b @0x22
0x1249…1275 at0023 = ╱ec╱,╱ // 0x126c @0x23
0x1249…1275 at0024 = ╱44╱D╱ // 0x126d @0x24
0x1249…1275 at0025 = ╱45╱E╱ // 0x126e @0x25
0x1249…1275 at0026 = ╱42╱B╱ // 0x126f @0x26
0x1249…1275 at0027 = ╱4b╱K╱ // 0x1270 @0x27
0x1249…1275 at0028 = ╱47╱G╱ // 0x1271 @0x28
0x1249…1275 at0029 = ╱52╱R╱ // 0x1272 @0x29
0x1249…1275 at002a = ╱ef╱$╱ // 0x1273 @0x2a
0x1249…1275 at002b = EOL // 0x1274 @0x2b
0x1249…1275 }
0x1275…128e 9fe5 1850 EXEC FEJL(7,E,K63$)
0x1275…128e LineComalBin {
0x1275…128e ptr = 0x9fe5 // 0x1275 @0x0
0x1275…128e lno = 0x073a // 0x1277 @0x2
0x1275…128e at0004 = ╱9d╱ EXEC ╱ // 0x1279 @0x4
0x1275…128e at0005 = ╱46╱F╱ // 0x127a @0x5
0x1275…128e at0006 = ╱45╱E╱ // 0x127b @0x6
0x1275…128e at0007 = ╱4a╱J╱ // 0x127c @0x7
0x1275…128e at0008 = ╱4c╱L╱ // 0x127d @0x8
0x1275…128e at0009 = ╱ed╱(╱ // 0x127e @0x9
0x1275…128e at000a = ╱37╱7╱ // 0x127f @0xa
0x1275…128e at000b = ╱fe0000e003╱ // 0x1280 @0xb
0x1275…128e at0010 = ╱ec╱,╱ // 0x1285 @0x10
0x1275…128e at0011 = ╱45╱E╱ // 0x1286 @0x11
0x1275…128e at0012 = ╱ec╱,╱ // 0x1287 @0x12
0x1275…128e at0013 = ╱4b╱K╱ // 0x1288 @0x13
0x1275…128e at0014 = ╱36╱6╱ // 0x1289 @0x14
0x1275…128e at0015 = ╱33╱3╱ // 0x128a @0x15
0x1275…128e at0016 = ╱ef╱$╱ // 0x128b @0x16
0x1275…128e at0017 = ╱ee╱)╱ // 0x128c @0x17
0x1275…128e at0018 = EOL // 0x128d @0x18
0x1275…128e }
0x128e…12c8 a01f 1860 GET K63$,X+E:DSALDO2$,DSALDO3$,DSALDO4$,DEBPOSTNR,DEBLK$
0x128e…12c8 LineComalBin {
0x128e…12c8 ptr = 0xa01f // 0x128e @0x0
0x128e…12c8 lno = 0x0744 // 0x1290 @0x2
0x128e…12c8 at0004 = ╱a9╱ GET ╱ // 0x1292 @0x4
0x128e…12c8 at0005 = ╱4b╱K╱ // 0x1293 @0x5
0x128e…12c8 at0006 = ╱36╱6╱ // 0x1294 @0x6
0x128e…12c8 at0007 = ╱33╱3╱ // 0x1295 @0x7
0x128e…12c8 at0008 = ╱ef╱$╱ // 0x1296 @0x8
0x128e…12c8 at0009 = ╱ec╱,╱ // 0x1297 @0x9
0x128e…12c8 at000a = ╱58╱X╱ // 0x1298 @0xa
0x128e…12c8 at000b = ╱e2╱+╱ // 0x1299 @0xb
0x128e…12c8 at000c = ╱45╱E╱ // 0x129a @0xc
0x128e…12c8 at000d = ╱f0╱:╱ // 0x129b @0xd
0x128e…12c8 at000e = ╱44╱D╱ // 0x129c @0xe
0x128e…12c8 at000f = ╱53╱S╱ // 0x129d @0xf
0x128e…12c8 at0010 = ╱41╱A╱ // 0x129e @0x10
0x128e…12c8 at0011 = ╱4c╱L╱ // 0x129f @0x11
0x128e…12c8 at0012 = ╱44╱D╱ // 0x12a0 @0x12
0x128e…12c8 at0013 = ╱4f╱O╱ // 0x12a1 @0x13
0x128e…12c8 at0014 = ╱32╱2╱ // 0x12a2 @0x14
0x128e…12c8 at0015 = ╱ef╱$╱ // 0x12a3 @0x15
0x128e…12c8 at0016 = ╱ec╱,╱ // 0x12a4 @0x16
0x128e…12c8 at0017 = ╱44╱D╱ // 0x12a5 @0x17
0x128e…12c8 at0018 = ╱53╱S╱ // 0x12a6 @0x18
0x128e…12c8 at0019 = ╱41╱A╱ // 0x12a7 @0x19
0x128e…12c8 at001a = ╱4c╱L╱ // 0x12a8 @0x1a
0x128e…12c8 at001b = ╱44╱D╱ // 0x12a9 @0x1b
0x128e…12c8 at001c = ╱4f╱O╱ // 0x12aa @0x1c
0x128e…12c8 at001d = ╱33╱3╱ // 0x12ab @0x1d
0x128e…12c8 at001e = ╱ef╱$╱ // 0x12ac @0x1e
0x128e…12c8 at001f = ╱ec╱,╱ // 0x12ad @0x1f
0x128e…12c8 at0020 = ╱44╱D╱ // 0x12ae @0x20
0x128e…12c8 at0021 = ╱53╱S╱ // 0x12af @0x21
0x128e…12c8 at0022 = ╱41╱A╱ // 0x12b0 @0x22
0x128e…12c8 at0023 = ╱4c╱L╱ // 0x12b1 @0x23
0x128e…12c8 at0024 = ╱44╱D╱ // 0x12b2 @0x24
0x128e…12c8 at0025 = ╱4f╱O╱ // 0x12b3 @0x25
0x128e…12c8 at0026 = ╱34╱4╱ // 0x12b4 @0x26
0x128e…12c8 at0027 = ╱ef╱$╱ // 0x12b5 @0x27
0x128e…12c8 at0028 = ╱ec╱,╱ // 0x12b6 @0x28
0x128e…12c8 at0029 = ╱44╱D╱ // 0x12b7 @0x29
0x128e…12c8 at002a = ╱45╱E╱ // 0x12b8 @0x2a
0x128e…12c8 at002b = ╱42╱B╱ // 0x12b9 @0x2b
0x128e…12c8 at002c = ╱50╱P╱ // 0x12ba @0x2c
0x128e…12c8 at002d = ╱4f╱O╱ // 0x12bb @0x2d
0x128e…12c8 at002e = ╱53╱S╱ // 0x12bc @0x2e
0x128e…12c8 at002f = ╱54╱T╱ // 0x12bd @0x2f
0x128e…12c8 at0030 = ╱4e╱N╱ // 0x12be @0x30
0x128e…12c8 at0031 = ╱52╱R╱ // 0x12bf @0x31
0x128e…12c8 at0032 = ╱ec╱,╱ // 0x12c0 @0x32
0x128e…12c8 at0033 = ╱44╱D╱ // 0x12c1 @0x33
0x128e…12c8 at0034 = ╱45╱E╱ // 0x12c2 @0x34
0x128e…12c8 at0035 = ╱42╱B╱ // 0x12c3 @0x35
0x128e…12c8 at0036 = ╱4c╱L╱ // 0x12c4 @0x36
0x128e…12c8 at0037 = ╱4b╱K╱ // 0x12c5 @0x37
0x128e…12c8 at0038 = ╱ef╱$╱ // 0x12c6 @0x38
0x128e…12c8 at0039 = EOL // 0x12c7 @0x39
0x128e…12c8 }
0x12c8…12e1 a038 1870 EXEC FEJL(7,G,K63$)
0x12c8…12e1 LineComalBin {
0x12c8…12e1 ptr = 0xa038 // 0x12c8 @0x0
0x12c8…12e1 lno = 0x074e // 0x12ca @0x2
0x12c8…12e1 at0004 = ╱9d╱ EXEC ╱ // 0x12cc @0x4
0x12c8…12e1 at0005 = ╱46╱F╱ // 0x12cd @0x5
0x12c8…12e1 at0006 = ╱45╱E╱ // 0x12ce @0x6
0x12c8…12e1 at0007 = ╱4a╱J╱ // 0x12cf @0x7
0x12c8…12e1 at0008 = ╱4c╱L╱ // 0x12d0 @0x8
0x12c8…12e1 at0009 = ╱ed╱(╱ // 0x12d1 @0x9
0x12c8…12e1 at000a = ╱37╱7╱ // 0x12d2 @0xa
0x12c8…12e1 at000b = ╱fe0000e003╱ // 0x12d3 @0xb
0x12c8…12e1 at0010 = ╱ec╱,╱ // 0x12d8 @0x10
0x12c8…12e1 at0011 = ╱47╱G╱ // 0x12d9 @0x11
0x12c8…12e1 at0012 = ╱ec╱,╱ // 0x12da @0x12
0x12c8…12e1 at0013 = ╱4b╱K╱ // 0x12db @0x13
0x12c8…12e1 at0014 = ╱36╱6╱ // 0x12dc @0x14
0x12c8…12e1 at0015 = ╱33╱3╱ // 0x12dd @0x15
0x12c8…12e1 at0016 = ╱ef╱$╱ // 0x12de @0x16
0x12c8…12e1 at0017 = ╱ee╱)╱ // 0x12df @0x17
0x12c8…12e1 at0018 = EOL // 0x12e0 @0x18
0x12c8…12e1 }
0x12e1…1305 a05c 1880 GET K63$,X+V:DEBBY$,ÅRKØB$,MDNKØB$
0x12e1…1305 LineComalBin {
0x12e1…1305 ptr = 0xa05c // 0x12e1 @0x0
0x12e1…1305 lno = 0x0758 // 0x12e3 @0x2
0x12e1…1305 at0004 = ╱a9╱ GET ╱ // 0x12e5 @0x4
0x12e1…1305 at0005 = ╱4b╱K╱ // 0x12e6 @0x5
0x12e1…1305 at0006 = ╱36╱6╱ // 0x12e7 @0x6
0x12e1…1305 at0007 = ╱33╱3╱ // 0x12e8 @0x7
0x12e1…1305 at0008 = ╱ef╱$╱ // 0x12e9 @0x8
0x12e1…1305 at0009 = ╱ec╱,╱ // 0x12ea @0x9
0x12e1…1305 at000a = ╱58╱X╱ // 0x12eb @0xa
0x12e1…1305 at000b = ╱e2╱+╱ // 0x12ec @0xb
0x12e1…1305 at000c = ╱56╱V╱ // 0x12ed @0xc
0x12e1…1305 at000d = ╱f0╱:╱ // 0x12ee @0xd
0x12e1…1305 at000e = ╱44╱D╱ // 0x12ef @0xe
0x12e1…1305 at000f = ╱45╱E╱ // 0x12f0 @0xf
0x12e1…1305 at0010 = ╱42╱B╱ // 0x12f1 @0x10
0x12e1…1305 at0011 = ╱42╱B╱ // 0x12f2 @0x11
0x12e1…1305 at0012 = ╱59╱Y╱ // 0x12f3 @0x12
0x12e1…1305 at0013 = ╱ef╱$╱ // 0x12f4 @0x13
0x12e1…1305 at0014 = ╱ec╱,╱ // 0x12f5 @0x14
0x12e1…1305 at0015 = ╱5d╱Å╱ // 0x12f6 @0x15
0x12e1…1305 at0016 = ╱52╱R╱ // 0x12f7 @0x16
0x12e1…1305 at0017 = ╱4b╱K╱ // 0x12f8 @0x17
0x12e1…1305 at0018 = ╱5c╱Ø╱ // 0x12f9 @0x18
0x12e1…1305 at0019 = ╱42╱B╱ // 0x12fa @0x19
0x12e1…1305 at001a = ╱ef╱$╱ // 0x12fb @0x1a
0x12e1…1305 at001b = ╱ec╱,╱ // 0x12fc @0x1b
0x12e1…1305 at001c = ╱4d╱M╱ // 0x12fd @0x1c
0x12e1…1305 at001d = ╱44╱D╱ // 0x12fe @0x1d
0x12e1…1305 at001e = ╱4e╱N╱ // 0x12ff @0x1e
0x12e1…1305 at001f = ╱4b╱K╱ // 0x1300 @0x1f
0x12e1…1305 at0020 = ╱5c╱Ø╱ // 0x1301 @0x20
0x12e1…1305 at0021 = ╱42╱B╱ // 0x1302 @0x21
0x12e1…1305 at0022 = ╱ef╱$╱ // 0x1303 @0x22
0x12e1…1305 at0023 = EOL // 0x1304 @0x23
0x12e1…1305 }
0x1305…131e a075 1890 EXEC FEJL(7,V,K63$)
0x1305…131e LineComalBin {
0x1305…131e ptr = 0xa075 // 0x1305 @0x0
0x1305…131e lno = 0x0762 // 0x1307 @0x2
0x1305…131e at0004 = ╱9d╱ EXEC ╱ // 0x1309 @0x4
0x1305…131e at0005 = ╱46╱F╱ // 0x130a @0x5
0x1305…131e at0006 = ╱45╱E╱ // 0x130b @0x6
0x1305…131e at0007 = ╱4a╱J╱ // 0x130c @0x7
0x1305…131e at0008 = ╱4c╱L╱ // 0x130d @0x8
0x1305…131e at0009 = ╱ed╱(╱ // 0x130e @0x9
0x1305…131e at000a = ╱37╱7╱ // 0x130f @0xa
0x1305…131e at000b = ╱fe0000e003╱ // 0x1310 @0xb
0x1305…131e at0010 = ╱ec╱,╱ // 0x1315 @0x10
0x1305…131e at0011 = ╱56╱V╱ // 0x1316 @0x11
0x1305…131e at0012 = ╱ec╱,╱ // 0x1317 @0x12
0x1305…131e at0013 = ╱4b╱K╱ // 0x1318 @0x13
0x1305…131e at0014 = ╱36╱6╱ // 0x1319 @0x14
0x1305…131e at0015 = ╱33╱3╱ // 0x131a @0x15
0x1305…131e at0016 = ╱ef╱$╱ // 0x131b @0x16
0x1305…131e at0017 = ╱ee╱)╱ // 0x131c @0x17
0x1305…131e at0018 = EOL // 0x131d @0x18
0x1305…131e }
0x131e…1347 a09e 1900 GR=ORD(DEBKGR$)-48;TÅRKØB$=ÅRKØB$
0x131e…1347 LineComalBin {
0x131e…1347 ptr = 0xa09e // 0x131e @0x0
0x131e…1347 lno = 0x076c // 0x1320 @0x2
0x131e…1347 at0004 = ╱47╱G╱ // 0x1322 @0x4
0x131e…1347 at0005 = ╱52╱R╱ // 0x1323 @0x5
0x131e…1347 at0006 = ╱dc╱=╱ // 0x1324 @0x6
0x131e…1347 at0007 = ╱cd╱ORD╱ // 0x1325 @0x7
0x131e…1347 at0008 = ╱ed╱(╱ // 0x1326 @0x8
0x131e…1347 at0009 = ╱44╱D╱ // 0x1327 @0x9
0x131e…1347 at000a = ╱45╱E╱ // 0x1328 @0xa
0x131e…1347 at000b = ╱42╱B╱ // 0x1329 @0xb
0x131e…1347 at000c = ╱4b╱K╱ // 0x132a @0xc
0x131e…1347 at000d = ╱47╱G╱ // 0x132b @0xd
0x131e…1347 at000e = ╱52╱R╱ // 0x132c @0xe
0x131e…1347 at000f = ╱ef╱$╱ // 0x132d @0xf
0x131e…1347 at0010 = ╱ee╱)╱ // 0x132e @0x10
0x131e…1347 at0011 = ╱e3╱-╱ // 0x132f @0x11
0x131e…1347 at0012 = ╱34╱4╱ // 0x1330 @0x12
0x131e…1347 at0013 = ╱38╱8╱ // 0x1331 @0x13
0x131e…1347 at0014 = ╱fe0000c006╱ // 0x1332 @0x14
0x131e…1347 at0019 = ╱eb╱;╱ // 0x1337 @0x19
0x131e…1347 at001a = ╱54╱T╱ // 0x1338 @0x1a
0x131e…1347 at001b = ╱5d╱Å╱ // 0x1339 @0x1b
0x131e…1347 at001c = ╱52╱R╱ // 0x133a @0x1c
0x131e…1347 at001d = ╱4b╱K╱ // 0x133b @0x1d
0x131e…1347 at001e = ╱5c╱Ø╱ // 0x133c @0x1e
0x131e…1347 at001f = ╱42╱B╱ // 0x133d @0x1f
0x131e…1347 at0020 = ╱ef╱$╱ // 0x133e @0x20
0x131e…1347 at0021 = ╱dc╱=╱ // 0x133f @0x21
0x131e…1347 at0022 = ╱5d╱Å╱ // 0x1340 @0x22
0x131e…1347 at0023 = ╱52╱R╱ // 0x1341 @0x23
0x131e…1347 at0024 = ╱4b╱K╱ // 0x1342 @0x24
0x131e…1347 at0025 = ╱5c╱Ø╱ // 0x1343 @0x25
0x131e…1347 at0026 = ╱42╱B╱ // 0x1344 @0x26
0x131e…1347 at0027 = ╱ef╱$╱ // 0x1345 @0x27
0x131e…1347 at0028 = EOL // 0x1346 @0x28
0x131e…1347 }
0x1347…136d a0c4 1910 EXEC CALC(B,DSALDO3$,DSALDO4$,SALDO$)
0x1347…136d LineComalBin {
0x1347…136d ptr = 0xa0c4 // 0x1347 @0x0
0x1347…136d lno = 0x0776 // 0x1349 @0x2
0x1347…136d at0004 = ╱9d╱ EXEC ╱ // 0x134b @0x4
0x1347…136d at0005 = ╱43╱C╱ // 0x134c @0x5
0x1347…136d at0006 = ╱41╱A╱ // 0x134d @0x6
0x1347…136d at0007 = ╱4c╱L╱ // 0x134e @0x7
0x1347…136d at0008 = ╱43╱C╱ // 0x134f @0x8
0x1347…136d at0009 = ╱ed╱(╱ // 0x1350 @0x9
0x1347…136d at000a = ╱42╱B╱ // 0x1351 @0xa
0x1347…136d at000b = ╱ec╱,╱ // 0x1352 @0xb
0x1347…136d at000c = ╱44╱D╱ // 0x1353 @0xc
0x1347…136d at000d = ╱53╱S╱ // 0x1354 @0xd
0x1347…136d at000e = ╱41╱A╱ // 0x1355 @0xe
0x1347…136d at000f = ╱4c╱L╱ // 0x1356 @0xf
0x1347…136d at0010 = ╱44╱D╱ // 0x1357 @0x10
0x1347…136d at0011 = ╱4f╱O╱ // 0x1358 @0x11
0x1347…136d at0012 = ╱33╱3╱ // 0x1359 @0x12
0x1347…136d at0013 = ╱ef╱$╱ // 0x135a @0x13
0x1347…136d at0014 = ╱ec╱,╱ // 0x135b @0x14
0x1347…136d at0015 = ╱44╱D╱ // 0x135c @0x15
0x1347…136d at0016 = ╱53╱S╱ // 0x135d @0x16
0x1347…136d at0017 = ╱41╱A╱ // 0x135e @0x17
0x1347…136d at0018 = ╱4c╱L╱ // 0x135f @0x18
0x1347…136d at0019 = ╱44╱D╱ // 0x1360 @0x19
0x1347…136d at001a = ╱4f╱O╱ // 0x1361 @0x1a
0x1347…136d at001b = ╱34╱4╱ // 0x1362 @0x1b
0x1347…136d at001c = ╱ef╱$╱ // 0x1363 @0x1c
0x1347…136d at001d = ╱ec╱,╱ // 0x1364 @0x1d
0x1347…136d at001e = ╱53╱S╱ // 0x1365 @0x1e
0x1347…136d at001f = ╱41╱A╱ // 0x1366 @0x1f
0x1347…136d at0020 = ╱4c╱L╱ // 0x1367 @0x20
0x1347…136d at0021 = ╱44╱D╱ // 0x1368 @0x21
0x1347…136d at0022 = ╱4f╱O╱ // 0x1369 @0x22
0x1347…136d at0023 = ╱ef╱$╱ // 0x136a @0x23
0x1347…136d at0024 = ╱ee╱)╱ // 0x136b @0x24
0x1347…136d at0025 = EOL // 0x136c @0x25
0x1347…136d }
0x136d…1391 a0e8 1920 EXEC CALC(B,SALDO$,DSALDO2$,SALDO$)
0x136d…1391 LineComalBin {
0x136d…1391 ptr = 0xa0e8 // 0x136d @0x0
0x136d…1391 lno = 0x0780 // 0x136f @0x2
0x136d…1391 at0004 = ╱9d╱ EXEC ╱ // 0x1371 @0x4
0x136d…1391 at0005 = ╱43╱C╱ // 0x1372 @0x5
0x136d…1391 at0006 = ╱41╱A╱ // 0x1373 @0x6
0x136d…1391 at0007 = ╱4c╱L╱ // 0x1374 @0x7
0x136d…1391 at0008 = ╱43╱C╱ // 0x1375 @0x8
0x136d…1391 at0009 = ╱ed╱(╱ // 0x1376 @0x9
0x136d…1391 at000a = ╱42╱B╱ // 0x1377 @0xa
0x136d…1391 at000b = ╱ec╱,╱ // 0x1378 @0xb
0x136d…1391 at000c = ╱53╱S╱ // 0x1379 @0xc
0x136d…1391 at000d = ╱41╱A╱ // 0x137a @0xd
0x136d…1391 at000e = ╱4c╱L╱ // 0x137b @0xe
0x136d…1391 at000f = ╱44╱D╱ // 0x137c @0xf
0x136d…1391 at0010 = ╱4f╱O╱ // 0x137d @0x10
0x136d…1391 at0011 = ╱ef╱$╱ // 0x137e @0x11
0x136d…1391 at0012 = ╱ec╱,╱ // 0x137f @0x12
0x136d…1391 at0013 = ╱44╱D╱ // 0x1380 @0x13
0x136d…1391 at0014 = ╱53╱S╱ // 0x1381 @0x14
0x136d…1391 at0015 = ╱41╱A╱ // 0x1382 @0x15
0x136d…1391 at0016 = ╱4c╱L╱ // 0x1383 @0x16
0x136d…1391 at0017 = ╱44╱D╱ // 0x1384 @0x17
0x136d…1391 at0018 = ╱4f╱O╱ // 0x1385 @0x18
0x136d…1391 at0019 = ╱32╱2╱ // 0x1386 @0x19
0x136d…1391 at001a = ╱ef╱$╱ // 0x1387 @0x1a
0x136d…1391 at001b = ╱ec╱,╱ // 0x1388 @0x1b
0x136d…1391 at001c = ╱53╱S╱ // 0x1389 @0x1c
0x136d…1391 at001d = ╱41╱A╱ // 0x138a @0x1d
0x136d…1391 at001e = ╱4c╱L╱ // 0x138b @0x1e
0x136d…1391 at001f = ╱44╱D╱ // 0x138c @0x1f
0x136d…1391 at0020 = ╱4f╱O╱ // 0x138d @0x20
0x136d…1391 at0021 = ╱ef╱$╱ // 0x138e @0x21
0x136d…1391 at0022 = ╱ee╱)╱ // 0x138f @0x22
0x136d…1391 at0023 = EOL // 0x1390 @0x23
0x136d…1391 }
0x1391…13b5 a10c 1930 EXEC CALC(B,SALDO$,DSALDO1$,SALDO$)
0x1391…13b5 LineComalBin {
0x1391…13b5 ptr = 0xa10c // 0x1391 @0x0
0x1391…13b5 lno = 0x078a // 0x1393 @0x2
0x1391…13b5 at0004 = ╱9d╱ EXEC ╱ // 0x1395 @0x4
0x1391…13b5 at0005 = ╱43╱C╱ // 0x1396 @0x5
0x1391…13b5 at0006 = ╱41╱A╱ // 0x1397 @0x6
0x1391…13b5 at0007 = ╱4c╱L╱ // 0x1398 @0x7
0x1391…13b5 at0008 = ╱43╱C╱ // 0x1399 @0x8
0x1391…13b5 at0009 = ╱ed╱(╱ // 0x139a @0x9
0x1391…13b5 at000a = ╱42╱B╱ // 0x139b @0xa
0x1391…13b5 at000b = ╱ec╱,╱ // 0x139c @0xb
0x1391…13b5 at000c = ╱53╱S╱ // 0x139d @0xc
0x1391…13b5 at000d = ╱41╱A╱ // 0x139e @0xd
0x1391…13b5 at000e = ╱4c╱L╱ // 0x139f @0xe
0x1391…13b5 at000f = ╱44╱D╱ // 0x13a0 @0xf
0x1391…13b5 at0010 = ╱4f╱O╱ // 0x13a1 @0x10
0x1391…13b5 at0011 = ╱ef╱$╱ // 0x13a2 @0x11
0x1391…13b5 at0012 = ╱ec╱,╱ // 0x13a3 @0x12
0x1391…13b5 at0013 = ╱44╱D╱ // 0x13a4 @0x13
0x1391…13b5 at0014 = ╱53╱S╱ // 0x13a5 @0x14
0x1391…13b5 at0015 = ╱41╱A╱ // 0x13a6 @0x15
0x1391…13b5 at0016 = ╱4c╱L╱ // 0x13a7 @0x16
0x1391…13b5 at0017 = ╱44╱D╱ // 0x13a8 @0x17
0x1391…13b5 at0018 = ╱4f╱O╱ // 0x13a9 @0x18
0x1391…13b5 at0019 = ╱31╱1╱ // 0x13aa @0x19
0x1391…13b5 at001a = ╱ef╱$╱ // 0x13ab @0x1a
0x1391…13b5 at001b = ╱ec╱,╱ // 0x13ac @0x1b
0x1391…13b5 at001c = ╱53╱S╱ // 0x13ad @0x1c
0x1391…13b5 at001d = ╱41╱A╱ // 0x13ae @0x1d
0x1391…13b5 at001e = ╱4c╱L╱ // 0x13af @0x1e
0x1391…13b5 at001f = ╱44╱D╱ // 0x13b0 @0x1f
0x1391…13b5 at0020 = ╱4f╱O╱ // 0x13b1 @0x20
0x1391…13b5 at0021 = ╱ef╱$╱ // 0x13b2 @0x21
0x1391…13b5 at0022 = ╱ee╱)╱ // 0x13b3 @0x22
0x1391…13b5 at0023 = EOL // 0x13b4 @0x23
0x1391…13b5 }
0x13b5…13e1 a138 1940 EXEC CALC(B,DSALDI$(GR),SALDO$,DSALDI$(GR))
0x13b5…13e1 LineComalBin {
0x13b5…13e1 ptr = 0xa138 // 0x13b5 @0x0
0x13b5…13e1 lno = 0x0794 // 0x13b7 @0x2
0x13b5…13e1 at0004 = ╱9d╱ EXEC ╱ // 0x13b9 @0x4
0x13b5…13e1 at0005 = ╱43╱C╱ // 0x13ba @0x5
0x13b5…13e1 at0006 = ╱41╱A╱ // 0x13bb @0x6
0x13b5…13e1 at0007 = ╱4c╱L╱ // 0x13bc @0x7
0x13b5…13e1 at0008 = ╱43╱C╱ // 0x13bd @0x8
0x13b5…13e1 at0009 = ╱ed╱(╱ // 0x13be @0x9
0x13b5…13e1 at000a = ╱42╱B╱ // 0x13bf @0xa
0x13b5…13e1 at000b = ╱ec╱,╱ // 0x13c0 @0xb
0x13b5…13e1 at000c = ╱44╱D╱ // 0x13c1 @0xc
0x13b5…13e1 at000d = ╱53╱S╱ // 0x13c2 @0xd
0x13b5…13e1 at000e = ╱41╱A╱ // 0x13c3 @0xe
0x13b5…13e1 at000f = ╱4c╱L╱ // 0x13c4 @0xf
0x13b5…13e1 at0010 = ╱44╱D╱ // 0x13c5 @0x10
0x13b5…13e1 at0011 = ╱49╱I╱ // 0x13c6 @0x11
0x13b5…13e1 at0012 = ╱ef╱$╱ // 0x13c7 @0x12
0x13b5…13e1 at0013 = ╱ed╱(╱ // 0x13c8 @0x13
0x13b5…13e1 at0014 = ╱47╱G╱ // 0x13c9 @0x14
0x13b5…13e1 at0015 = ╱52╱R╱ // 0x13ca @0x15
0x13b5…13e1 at0016 = ╱ee╱)╱ // 0x13cb @0x16
0x13b5…13e1 at0017 = ╱ec╱,╱ // 0x13cc @0x17
0x13b5…13e1 at0018 = ╱53╱S╱ // 0x13cd @0x18
0x13b5…13e1 at0019 = ╱41╱A╱ // 0x13ce @0x19
0x13b5…13e1 at001a = ╱4c╱L╱ // 0x13cf @0x1a
0x13b5…13e1 at001b = ╱44╱D╱ // 0x13d0 @0x1b
0x13b5…13e1 at001c = ╱4f╱O╱ // 0x13d1 @0x1c
0x13b5…13e1 at001d = ╱ef╱$╱ // 0x13d2 @0x1d
0x13b5…13e1 at001e = ╱ec╱,╱ // 0x13d3 @0x1e
0x13b5…13e1 at001f = ╱44╱D╱ // 0x13d4 @0x1f
0x13b5…13e1 at0020 = ╱53╱S╱ // 0x13d5 @0x20
0x13b5…13e1 at0021 = ╱41╱A╱ // 0x13d6 @0x21
0x13b5…13e1 at0022 = ╱4c╱L╱ // 0x13d7 @0x22
0x13b5…13e1 at0023 = ╱44╱D╱ // 0x13d8 @0x23
0x13b5…13e1 at0024 = ╱49╱I╱ // 0x13d9 @0x24
0x13b5…13e1 at0025 = ╱ef╱$╱ // 0x13da @0x25
0x13b5…13e1 at0026 = ╱ed╱(╱ // 0x13db @0x26
0x13b5…13e1 at0027 = ╱47╱G╱ // 0x13dc @0x27
0x13b5…13e1 at0028 = ╱52╱R╱ // 0x13dd @0x28
0x13b5…13e1 at0029 = ╱ee╱)╱ // 0x13de @0x29
0x13b5…13e1 at002a = ╱ee╱)╱ // 0x13df @0x2a
0x13b5…13e1 at002b = EOL // 0x13e0 @0x2b
0x13b5…13e1 }
0x13e1…1404 a15b 1950 EXEC CALC(B,TÅRKØB$,TOKØB$,TOKØB$)
0x13e1…1404 LineComalBin {
0x13e1…1404 ptr = 0xa15b // 0x13e1 @0x0
0x13e1…1404 lno = 0x079e // 0x13e3 @0x2
0x13e1…1404 at0004 = ╱9d╱ EXEC ╱ // 0x13e5 @0x4
0x13e1…1404 at0005 = ╱43╱C╱ // 0x13e6 @0x5
0x13e1…1404 at0006 = ╱41╱A╱ // 0x13e7 @0x6
0x13e1…1404 at0007 = ╱4c╱L╱ // 0x13e8 @0x7
0x13e1…1404 at0008 = ╱43╱C╱ // 0x13e9 @0x8
0x13e1…1404 at0009 = ╱ed╱(╱ // 0x13ea @0x9
0x13e1…1404 at000a = ╱42╱B╱ // 0x13eb @0xa
0x13e1…1404 at000b = ╱ec╱,╱ // 0x13ec @0xb
0x13e1…1404 at000c = ╱54╱T╱ // 0x13ed @0xc
0x13e1…1404 at000d = ╱5d╱Å╱ // 0x13ee @0xd
0x13e1…1404 at000e = ╱52╱R╱ // 0x13ef @0xe
0x13e1…1404 at000f = ╱4b╱K╱ // 0x13f0 @0xf
0x13e1…1404 at0010 = ╱5c╱Ø╱ // 0x13f1 @0x10
0x13e1…1404 at0011 = ╱42╱B╱ // 0x13f2 @0x11
0x13e1…1404 at0012 = ╱ef╱$╱ // 0x13f3 @0x12
0x13e1…1404 at0013 = ╱ec╱,╱ // 0x13f4 @0x13
0x13e1…1404 at0014 = ╱54╱T╱ // 0x13f5 @0x14
0x13e1…1404 at0015 = ╱4f╱O╱ // 0x13f6 @0x15
0x13e1…1404 at0016 = ╱4b╱K╱ // 0x13f7 @0x16
0x13e1…1404 at0017 = ╱5c╱Ø╱ // 0x13f8 @0x17
0x13e1…1404 at0018 = ╱42╱B╱ // 0x13f9 @0x18
0x13e1…1404 at0019 = ╱ef╱$╱ // 0x13fa @0x19
0x13e1…1404 at001a = ╱ec╱,╱ // 0x13fb @0x1a
0x13e1…1404 at001b = ╱54╱T╱ // 0x13fc @0x1b
0x13e1…1404 at001c = ╱4f╱O╱ // 0x13fd @0x1c
0x13e1…1404 at001d = ╱4b╱K╱ // 0x13fe @0x1d
0x13e1…1404 at001e = ╱5c╱Ø╱ // 0x13ff @0x1e
0x13e1…1404 at001f = ╱42╱B╱ // 0x1400 @0x1f
0x13e1…1404 at0020 = ╱ef╱$╱ // 0x1401 @0x20
0x13e1…1404 at0021 = ╱ee╱)╱ // 0x1402 @0x21
0x13e1…1404 at0022 = EOL // 0x1403 @0x22
0x13e1…1404 }
0x1404…1414 a16b 1960 ÅRKØB$="0+"
0x1404…1414 LineComalBin {
0x1404…1414 ptr = 0xa16b // 0x1404 @0x0
0x1404…1414 lno = 0x07a8 // 0x1406 @0x2
0x1404…1414 at0004 = ╱5d╱Å╱ // 0x1408 @0x4
0x1404…1414 at0005 = ╱52╱R╱ // 0x1409 @0x5
0x1404…1414 at0006 = ╱4b╱K╱ // 0x140a @0x6
0x1404…1414 at0007 = ╱5c╱Ø╱ // 0x140b @0x7
0x1404…1414 at0008 = ╱42╱B╱ // 0x140c @0x8
0x1404…1414 at0009 = ╱ef╱$╱ // 0x140d @0x9
0x1404…1414 at000a = ╱dc╱=╱ // 0x140e @0xa
0x1404…1414 at000b = ╱22╱"╱ // 0x140f @0xb
0x1404…1414 at000c = ╱30╱0╱ // 0x1410 @0xc
0x1404…1414 at000d = ╱2b╱+╱ // 0x1411 @0xd
0x1404…1414 at000e = ╱22╱"╱ // 0x1412 @0xe
0x1404…1414 at000f = EOL // 0x1413 @0xf
0x1404…1414 }
0x1414…1438 a18f 1970 PUT K63$,X+V:DEBBY$,ÅRKØB$,MDNKØB$
0x1414…1438 LineComalBin {
0x1414…1438 ptr = 0xa18f // 0x1414 @0x0
0x1414…1438 lno = 0x07b2 // 0x1416 @0x2
0x1414…1438 at0004 = ╱aa╱ PUT ╱ // 0x1418 @0x4
0x1414…1438 at0005 = ╱4b╱K╱ // 0x1419 @0x5
0x1414…1438 at0006 = ╱36╱6╱ // 0x141a @0x6
0x1414…1438 at0007 = ╱33╱3╱ // 0x141b @0x7
0x1414…1438 at0008 = ╱ef╱$╱ // 0x141c @0x8
0x1414…1438 at0009 = ╱ec╱,╱ // 0x141d @0x9
0x1414…1438 at000a = ╱58╱X╱ // 0x141e @0xa
0x1414…1438 at000b = ╱e2╱+╱ // 0x141f @0xb
0x1414…1438 at000c = ╱56╱V╱ // 0x1420 @0xc
0x1414…1438 at000d = ╱f0╱:╱ // 0x1421 @0xd
0x1414…1438 at000e = ╱44╱D╱ // 0x1422 @0xe
0x1414…1438 at000f = ╱45╱E╱ // 0x1423 @0xf
0x1414…1438 at0010 = ╱42╱B╱ // 0x1424 @0x10
0x1414…1438 at0011 = ╱42╱B╱ // 0x1425 @0x11
0x1414…1438 at0012 = ╱59╱Y╱ // 0x1426 @0x12
0x1414…1438 at0013 = ╱ef╱$╱ // 0x1427 @0x13
0x1414…1438 at0014 = ╱ec╱,╱ // 0x1428 @0x14
0x1414…1438 at0015 = ╱5d╱Å╱ // 0x1429 @0x15
0x1414…1438 at0016 = ╱52╱R╱ // 0x142a @0x16
0x1414…1438 at0017 = ╱4b╱K╱ // 0x142b @0x17
0x1414…1438 at0018 = ╱5c╱Ø╱ // 0x142c @0x18
0x1414…1438 at0019 = ╱42╱B╱ // 0x142d @0x19
0x1414…1438 at001a = ╱ef╱$╱ // 0x142e @0x1a
0x1414…1438 at001b = ╱ec╱,╱ // 0x142f @0x1b
0x1414…1438 at001c = ╱4d╱M╱ // 0x1430 @0x1c
0x1414…1438 at001d = ╱44╱D╱ // 0x1431 @0x1d
0x1414…1438 at001e = ╱4e╱N╱ // 0x1432 @0x1e
0x1414…1438 at001f = ╱4b╱K╱ // 0x1433 @0x1f
0x1414…1438 at0020 = ╱5c╱Ø╱ // 0x1434 @0x20
0x1414…1438 at0021 = ╱42╱B╱ // 0x1435 @0x21
0x1414…1438 at0022 = ╱ef╱$╱ // 0x1436 @0x22
0x1414…1438 at0023 = EOL // 0x1437 @0x23
0x1414…1438 }
0x1438…1456 a1ad 1980 EXEC FEJL(7,4,K63$)
0x1438…1456 LineComalBin {
0x1438…1456 ptr = 0xa1ad // 0x1438 @0x0
0x1438…1456 lno = 0x07bc // 0x143a @0x2
0x1438…1456 at0004 = ╱9d╱ EXEC ╱ // 0x143c @0x4
0x1438…1456 at0005 = ╱46╱F╱ // 0x143d @0x5
0x1438…1456 at0006 = ╱45╱E╱ // 0x143e @0x6
0x1438…1456 at0007 = ╱4a╱J╱ // 0x143f @0x7
0x1438…1456 at0008 = ╱4c╱L╱ // 0x1440 @0x8
0x1438…1456 at0009 = ╱ed╱(╱ // 0x1441 @0x9
0x1438…1456 at000a = ╱37╱7╱ // 0x1442 @0xa
0x1438…1456 at000b = ╱fe0000e003╱ // 0x1443 @0xb
0x1438…1456 at0010 = ╱ec╱,╱ // 0x1448 @0x10
0x1438…1456 at0011 = ╱34╱4╱ // 0x1449 @0x11
0x1438…1456 at0012 = ╱fe00008003╱ // 0x144a @0x12
0x1438…1456 at0017 = ╱ec╱,╱ // 0x144f @0x17
0x1438…1456 at0018 = ╱4b╱K╱ // 0x1450 @0x18
0x1438…1456 at0019 = ╱36╱6╱ // 0x1451 @0x19
0x1438…1456 at001a = ╱33╱3╱ // 0x1452 @0x1a
0x1438…1456 at001b = ╱ef╱$╱ // 0x1453 @0x1b
0x1438…1456 at001c = ╱ee╱)╱ // 0x1454 @0x1c
0x1438…1456 at001d = EOL // 0x1455 @0x1d
0x1438…1456 }
0x1456…145e a1b5 1990 WHEN E
0x1456…145e LineComalBin {
0x1456…145e ptr = 0xa1b5 // 0x1456 @0x0
0x1456…145e lno = 0x07c6 // 0x1458 @0x2
0x1456…145e at0004 = ╱a301╱ WHEN ╱ // 0x145a @0x4
0x1456…145e at0006 = ╱45╱E╱ // 0x145c @0x6
0x1456…145e at0007 = EOL // 0x145d @0x7
0x1456…145e }
0x145e…146e a1c5 2000 GET K63$,X:FNR
0x145e…146e LineComalBin {
0x145e…146e ptr = 0xa1c5 // 0x145e @0x0
0x145e…146e lno = 0x07d0 // 0x1460 @0x2
0x145e…146e at0004 = ╱a9╱ GET ╱ // 0x1462 @0x4
0x145e…146e at0005 = ╱4b╱K╱ // 0x1463 @0x5
0x145e…146e at0006 = ╱36╱6╱ // 0x1464 @0x6
0x145e…146e at0007 = ╱33╱3╱ // 0x1465 @0x7
0x145e…146e at0008 = ╱ef╱$╱ // 0x1466 @0x8
0x145e…146e at0009 = ╱ec╱,╱ // 0x1467 @0x9
0x145e…146e at000a = ╱58╱X╱ // 0x1468 @0xa
0x145e…146e at000b = ╱f0╱:╱ // 0x1469 @0xb
0x145e…146e at000c = ╱46╱F╱ // 0x146a @0xc
0x145e…146e at000d = ╱4e╱N╱ // 0x146b @0xd
0x145e…146e at000e = ╱52╱R╱ // 0x146c @0xe
0x145e…146e at000f = EOL // 0x146d @0xf
0x145e…146e }
0x146e…148c a1e3 2010 EXEC FEJL(7,6,K63$)
0x146e…148c LineComalBin {
0x146e…148c ptr = 0xa1e3 // 0x146e @0x0
0x146e…148c lno = 0x07da // 0x1470 @0x2
0x146e…148c at0004 = ╱9d╱ EXEC ╱ // 0x1472 @0x4
0x146e…148c at0005 = ╱46╱F╱ // 0x1473 @0x5
0x146e…148c at0006 = ╱45╱E╱ // 0x1474 @0x6
0x146e…148c at0007 = ╱4a╱J╱ // 0x1475 @0x7
0x146e…148c at0008 = ╱4c╱L╱ // 0x1476 @0x8
0x146e…148c at0009 = ╱ed╱(╱ // 0x1477 @0x9
0x146e…148c at000a = ╱37╱7╱ // 0x1478 @0xa
0x146e…148c at000b = ╱fe0000e003╱ // 0x1479 @0xb
0x146e…148c at0010 = ╱ec╱,╱ // 0x147e @0x10
0x146e…148c at0011 = ╱36╱6╱ // 0x147f @0x11
0x146e…148c at0012 = ╱fe0000c003╱ // 0x1480 @0x12
0x146e…148c at0017 = ╱ec╱,╱ // 0x1485 @0x17
0x146e…148c at0018 = ╱4b╱K╱ // 0x1486 @0x18
0x146e…148c at0019 = ╱36╱6╱ // 0x1487 @0x19
0x146e…148c at001a = ╱33╱3╱ // 0x1488 @0x1a
0x146e…148c at001b = ╱ef╱$╱ // 0x1489 @0x1b
0x146e…148c at001c = ╱ee╱)╱ // 0x148a @0x1c
0x146e…148c at001d = EOL // 0x148b @0x1d
0x146e…148c }
0x148c…14b5 a20c 2020 GET K63$,X+G:FUKODE$,FÅDEBET$,FÅKREDIT$
0x148c…14b5 LineComalBin {
0x148c…14b5 ptr = 0xa20c // 0x148c @0x0
0x148c…14b5 lno = 0x07e4 // 0x148e @0x2
0x148c…14b5 at0004 = ╱a9╱ GET ╱ // 0x1490 @0x4
0x148c…14b5 at0005 = ╱4b╱K╱ // 0x1491 @0x5
0x148c…14b5 at0006 = ╱36╱6╱ // 0x1492 @0x6
0x148c…14b5 at0007 = ╱33╱3╱ // 0x1493 @0x7
0x148c…14b5 at0008 = ╱ef╱$╱ // 0x1494 @0x8
0x148c…14b5 at0009 = ╱ec╱,╱ // 0x1495 @0x9
0x148c…14b5 at000a = ╱58╱X╱ // 0x1496 @0xa
0x148c…14b5 at000b = ╱e2╱+╱ // 0x1497 @0xb
0x148c…14b5 at000c = ╱47╱G╱ // 0x1498 @0xc
0x148c…14b5 at000d = ╱f0╱:╱ // 0x1499 @0xd
0x148c…14b5 at000e = ╱46╱F╱ // 0x149a @0xe
0x148c…14b5 at000f = ╱55╱U╱ // 0x149b @0xf
0x148c…14b5 at0010 = ╱4b╱K╱ // 0x149c @0x10
0x148c…14b5 at0011 = ╱4f╱O╱ // 0x149d @0x11
0x148c…14b5 at0012 = ╱44╱D╱ // 0x149e @0x12
0x148c…14b5 at0013 = ╱45╱E╱ // 0x149f @0x13
0x148c…14b5 at0014 = ╱ef╱$╱ // 0x14a0 @0x14
0x148c…14b5 at0015 = ╱ec╱,╱ // 0x14a1 @0x15
0x148c…14b5 at0016 = ╱46╱F╱ // 0x14a2 @0x16
0x148c…14b5 at0017 = ╱5d╱Å╱ // 0x14a3 @0x17
0x148c…14b5 at0018 = ╱44╱D╱ // 0x14a4 @0x18
0x148c…14b5 at0019 = ╱45╱E╱ // 0x14a5 @0x19
0x148c…14b5 at001a = ╱42╱B╱ // 0x14a6 @0x1a
0x148c…14b5 at001b = ╱45╱E╱ // 0x14a7 @0x1b
0x148c…14b5 at001c = ╱54╱T╱ // 0x14a8 @0x1c
0x148c…14b5 at001d = ╱ef╱$╱ // 0x14a9 @0x1d
0x148c…14b5 at001e = ╱ec╱,╱ // 0x14aa @0x1e
0x148c…14b5 at001f = ╱46╱F╱ // 0x14ab @0x1f
0x148c…14b5 at0020 = ╱5d╱Å╱ // 0x14ac @0x20
0x148c…14b5 at0021 = ╱4b╱K╱ // 0x14ad @0x21
0x148c…14b5 at0022 = ╱52╱R╱ // 0x14ae @0x22
0x148c…14b5 at0023 = ╱45╱E╱ // 0x14af @0x23
0x148c…14b5 at0024 = ╱44╱D╱ // 0x14b0 @0x24
0x148c…14b5 at0025 = ╱49╱I╱ // 0x14b1 @0x25
0x148c…14b5 at0026 = ╱54╱T╱ // 0x14b2 @0x26
0x148c…14b5 at0027 = ╱ef╱$╱ // 0x14b3 @0x27
0x148c…14b5 at0028 = EOL // 0x14b4 @0x28
0x148c…14b5 }
0x14b5…14d3 a22a 2030 EXEC FEJL(7,7,K63$)
0x14b5…14d3 LineComalBin {
0x14b5…14d3 ptr = 0xa22a // 0x14b5 @0x0
0x14b5…14d3 lno = 0x07ee // 0x14b7 @0x2
0x14b5…14d3 at0004 = ╱9d╱ EXEC ╱ // 0x14b9 @0x4
0x14b5…14d3 at0005 = ╱46╱F╱ // 0x14ba @0x5
0x14b5…14d3 at0006 = ╱45╱E╱ // 0x14bb @0x6
0x14b5…14d3 at0007 = ╱4a╱J╱ // 0x14bc @0x7
0x14b5…14d3 at0008 = ╱4c╱L╱ // 0x14bd @0x8
0x14b5…14d3 at0009 = ╱ed╱(╱ // 0x14be @0x9
0x14b5…14d3 at000a = ╱37╱7╱ // 0x14bf @0xa
0x14b5…14d3 at000b = ╱fe0000e003╱ // 0x14c0 @0xb
0x14b5…14d3 at0010 = ╱ec╱,╱ // 0x14c5 @0x10
0x14b5…14d3 at0011 = ╱37╱7╱ // 0x14c6 @0x11
0x14b5…14d3 at0012 = ╱fe0000e003╱ // 0x14c7 @0x12
0x14b5…14d3 at0017 = ╱ec╱,╱ // 0x14cc @0x17
0x14b5…14d3 at0018 = ╱4b╱K╱ // 0x14cd @0x18
0x14b5…14d3 at0019 = ╱36╱6╱ // 0x14ce @0x19
0x14b5…14d3 at001a = ╱33╱3╱ // 0x14cf @0x1a
0x14b5…14d3 at001b = ╱ef╱$╱ // 0x14d0 @0x1b
0x14b5…14d3 at001c = ╱ee╱)╱ // 0x14d1 @0x1c
0x14b5…14d3 at001d = EOL // 0x14d2 @0x1d
0x14b5…14d3 }
0x14d3…14ed a244 2040 GR=ORD(FUKODE$)-48
0x14d3…14ed LineComalBin {
0x14d3…14ed ptr = 0xa244 // 0x14d3 @0x0
0x14d3…14ed lno = 0x07f8 // 0x14d5 @0x2
0x14d3…14ed at0004 = ╱47╱G╱ // 0x14d7 @0x4
0x14d3…14ed at0005 = ╱52╱R╱ // 0x14d8 @0x5
0x14d3…14ed at0006 = ╱dc╱=╱ // 0x14d9 @0x6
0x14d3…14ed at0007 = ╱cd╱ORD╱ // 0x14da @0x7
0x14d3…14ed at0008 = ╱ed╱(╱ // 0x14db @0x8
0x14d3…14ed at0009 = ╱46╱F╱ // 0x14dc @0x9
0x14d3…14ed at000a = ╱55╱U╱ // 0x14dd @0xa
0x14d3…14ed at000b = ╱4b╱K╱ // 0x14de @0xb
0x14d3…14ed at000c = ╱4f╱O╱ // 0x14df @0xc
0x14d3…14ed at000d = ╱44╱D╱ // 0x14e0 @0xd
0x14d3…14ed at000e = ╱45╱E╱ // 0x14e1 @0xe
0x14d3…14ed at000f = ╱ef╱$╱ // 0x14e2 @0xf
0x14d3…14ed at0010 = ╱ee╱)╱ // 0x14e3 @0x10
0x14d3…14ed at0011 = ╱e3╱-╱ // 0x14e4 @0x11
0x14d3…14ed at0012 = ╱34╱4╱ // 0x14e5 @0x12
0x14d3…14ed at0013 = ╱38╱8╱ // 0x14e6 @0x13
0x14d3…14ed at0014 = ╱fe0000c006╱ // 0x14e7 @0x14
0x14d3…14ed at0019 = EOL // 0x14ec @0x19
0x14d3…14ed }
0x14ed…1522 a279 2050 IF (DTAL=FNR DIV 10000 OR KRTAL=FNR DIV 1000) AND GR=E THEN
0x14ed…1522 LineComalBin {
0x14ed…1522 ptr = 0xa279 // 0x14ed @0x0
0x14ed…1522 lno = 0x0802 // 0x14ef @0x2
0x14ed…1522 at0004 = ╱9c╱ IF ╱ // 0x14f1 @0x4
0x14ed…1522 at0005 = ╱ed╱(╱ // 0x14f2 @0x5
0x14ed…1522 at0006 = ╱44╱D╱ // 0x14f3 @0x6
0x14ed…1522 at0007 = ╱54╱T╱ // 0x14f4 @0x7
0x14ed…1522 at0008 = ╱41╱A╱ // 0x14f5 @0x8
0x14ed…1522 at0009 = ╱4c╱L╱ // 0x14f6 @0x9
0x14ed…1522 at000a = ╱dc╱=╱ // 0x14f7 @0xa
0x14ed…1522 at000b = ╱46╱F╱ // 0x14f8 @0xb
0x14ed…1522 at000c = ╱4e╱N╱ // 0x14f9 @0xc
0x14ed…1522 at000d = ╱52╱R╱ // 0x14fa @0xd
0x14ed…1522 at000e = ╱e7╱ DIV ╱ // 0x14fb @0xe
0x14ed…1522 at000f = ╱31╱1╱ // 0x14fc @0xf
0x14ed…1522 at0010 = ╱30╱0╱ // 0x14fd @0x10
0x14ed…1522 at0011 = ╱30╱0╱ // 0x14fe @0x11
0x14ed…1522 at0012 = ╱30╱0╱ // 0x14ff @0x12
0x14ed…1522 at0013 = ╱30╱0╱ // 0x1500 @0x13
0x14ed…1522 at0014 = ╱fe00409c0e╱ // 0x1501 @0x14
0x14ed…1522 at0019 = ╱db╱ OR ╱ // 0x1506 @0x19
0x14ed…1522 at001a = ╱4b╱K╱ // 0x1507 @0x1a
0x14ed…1522 at001b = ╱52╱R╱ // 0x1508 @0x1b
0x14ed…1522 at001c = ╱54╱T╱ // 0x1509 @0x1c
0x14ed…1522 at001d = ╱41╱A╱ // 0x150a @0x1d
0x14ed…1522 at001e = ╱4c╱L╱ // 0x150b @0x1e
0x14ed…1522 at001f = ╱dc╱=╱ // 0x150c @0x1f
0x14ed…1522 at0020 = ╱46╱F╱ // 0x150d @0x20
0x14ed…1522 at0021 = ╱4e╱N╱ // 0x150e @0x21
0x14ed…1522 at0022 = ╱52╱R╱ // 0x150f @0x22
0x14ed…1522 at0023 = ╱e7╱ DIV ╱ // 0x1510 @0x23
0x14ed…1522 at0024 = ╱31╱1╱ // 0x1511 @0x24
0x14ed…1522 at0025 = ╱30╱0╱ // 0x1512 @0x25
0x14ed…1522 at0026 = ╱30╱0╱ // 0x1513 @0x26
0x14ed…1522 at0027 = ╱30╱0╱ // 0x1514 @0x27
0x14ed…1522 at0028 = ╱fe0000fa0a╱ // 0x1515 @0x28
0x14ed…1522 at002d = ╱ee╱)╱ // 0x151a @0x2d
0x14ed…1522 at002e = ╱da╱ AND ╱ // 0x151b @0x2e
0x14ed…1522 at002f = ╱47╱G╱ // 0x151c @0x2f
0x14ed…1522 at0030 = ╱52╱R╱ // 0x151d @0x30
0x14ed…1522 at0031 = ╱dc╱=╱ // 0x151e @0x31
0x14ed…1522 at0032 = ╱45╱E╱ // 0x151f @0x32
0x14ed…1522 at0033 = ╱b6╱ THEN ╱ // 0x1520 @0x33
0x14ed…1522 at0034 = EOL // 0x1521 @0x34
0x14ed…1522 }
0x1522…1549 a2a0 2060 EXEC CALC(B,FÅDEBET$,FÅKREDIT$,SALDO$)
0x1522…1549 LineComalBin {
0x1522…1549 ptr = 0xa2a0 // 0x1522 @0x0
0x1522…1549 lno = 0x080c // 0x1524 @0x2
0x1522…1549 at0004 = ╱9d╱ EXEC ╱ // 0x1526 @0x4
0x1522…1549 at0005 = ╱43╱C╱ // 0x1527 @0x5
0x1522…1549 at0006 = ╱41╱A╱ // 0x1528 @0x6
0x1522…1549 at0007 = ╱4c╱L╱ // 0x1529 @0x7
0x1522…1549 at0008 = ╱43╱C╱ // 0x152a @0x8
0x1522…1549 at0009 = ╱ed╱(╱ // 0x152b @0x9
0x1522…1549 at000a = ╱42╱B╱ // 0x152c @0xa
0x1522…1549 at000b = ╱ec╱,╱ // 0x152d @0xb
0x1522…1549 at000c = ╱46╱F╱ // 0x152e @0xc
0x1522…1549 at000d = ╱5d╱Å╱ // 0x152f @0xd
0x1522…1549 at000e = ╱44╱D╱ // 0x1530 @0xe
0x1522…1549 at000f = ╱45╱E╱ // 0x1531 @0xf
0x1522…1549 at0010 = ╱42╱B╱ // 0x1532 @0x10
0x1522…1549 at0011 = ╱45╱E╱ // 0x1533 @0x11
0x1522…1549 at0012 = ╱54╱T╱ // 0x1534 @0x12
0x1522…1549 at0013 = ╱ef╱$╱ // 0x1535 @0x13
0x1522…1549 at0014 = ╱ec╱,╱ // 0x1536 @0x14
0x1522…1549 at0015 = ╱46╱F╱ // 0x1537 @0x15
0x1522…1549 at0016 = ╱5d╱Å╱ // 0x1538 @0x16
0x1522…1549 at0017 = ╱4b╱K╱ // 0x1539 @0x17
0x1522…1549 at0018 = ╱52╱R╱ // 0x153a @0x18
0x1522…1549 at0019 = ╱45╱E╱ // 0x153b @0x19
0x1522…1549 at001a = ╱44╱D╱ // 0x153c @0x1a
0x1522…1549 at001b = ╱49╱I╱ // 0x153d @0x1b
0x1522…1549 at001c = ╱54╱T╱ // 0x153e @0x1c
0x1522…1549 at001d = ╱ef╱$╱ // 0x153f @0x1d
0x1522…1549 at001e = ╱ec╱,╱ // 0x1540 @0x1e
0x1522…1549 at001f = ╱53╱S╱ // 0x1541 @0x1f
0x1522…1549 at0020 = ╱41╱A╱ // 0x1542 @0x20
0x1522…1549 at0021 = ╱4c╱L╱ // 0x1543 @0x21
0x1522…1549 at0022 = ╱44╱D╱ // 0x1544 @0x22
0x1522…1549 at0023 = ╱4f╱O╱ // 0x1545 @0x23
0x1522…1549 at0024 = ╱ef╱$╱ // 0x1546 @0x24
0x1522…1549 at0025 = ╱ee╱)╱ // 0x1547 @0x25
0x1522…1549 at0026 = EOL // 0x1548 @0x26
0x1522…1549 }
0x1549…155f a2b6 2080 GRUP=FNR MOD 100
0x1549…155f LineComalBin {
0x1549…155f ptr = 0xa2b6 // 0x1549 @0x0
0x1549…155f lno = 0x0820 // 0x154b @0x2
0x1549…155f at0004 = ╱47╱G╱ // 0x154d @0x4
0x1549…155f at0005 = ╱52╱R╱ // 0x154e @0x5
0x1549…155f at0006 = ╱55╱U╱ // 0x154f @0x6
0x1549…155f at0007 = ╱50╱P╱ // 0x1550 @0x7
0x1549…155f at0008 = ╱dc╱=╱ // 0x1551 @0x8
0x1549…155f at0009 = ╱46╱F╱ // 0x1552 @0x9
0x1549…155f at000a = ╱4e╱N╱ // 0x1553 @0xa
0x1549…155f at000b = ╱52╱R╱ // 0x1554 @0xb
0x1549…155f at000c = ╱e8╱ MOD ╱ // 0x1555 @0xc
0x1549…155f at000d = ╱31╱1╱ // 0x1556 @0xd
0x1549…155f at000e = ╱30╱0╱ // 0x1557 @0xe
0x1549…155f at000f = ╱30╱0╱ // 0x1558 @0xf
0x1549…155f at0010 = ╱fe0000c807╱ // 0x1559 @0x10
0x1549…155f at0015 = EOL // 0x155e @0x15
0x1549…155f }
0x155f…1579 a2d0 2090 IF DTAL=FNR DIV 10000 THEN
0x155f…1579 LineComalBin {
0x155f…1579 ptr = 0xa2d0 // 0x155f @0x0
0x155f…1579 lno = 0x082a // 0x1561 @0x2
0x155f…1579 at0004 = ╱9c╱ IF ╱ // 0x1563 @0x4
0x155f…1579 at0005 = ╱44╱D╱ // 0x1564 @0x5
0x155f…1579 at0006 = ╱54╱T╱ // 0x1565 @0x6
0x155f…1579 at0007 = ╱41╱A╱ // 0x1566 @0x7
0x155f…1579 at0008 = ╱4c╱L╱ // 0x1567 @0x8
0x155f…1579 at0009 = ╱dc╱=╱ // 0x1568 @0x9
0x155f…1579 at000a = ╱46╱F╱ // 0x1569 @0xa
0x155f…1579 at000b = ╱4e╱N╱ // 0x156a @0xb
0x155f…1579 at000c = ╱52╱R╱ // 0x156b @0xc
0x155f…1579 at000d = ╱e7╱ DIV ╱ // 0x156c @0xd
0x155f…1579 at000e = ╱31╱1╱ // 0x156d @0xe
0x155f…1579 at000f = ╱30╱0╱ // 0x156e @0xf
0x155f…1579 at0010 = ╱30╱0╱ // 0x156f @0x10
0x155f…1579 at0011 = ╱30╱0╱ // 0x1570 @0x11
0x155f…1579 at0012 = ╱30╱0╱ // 0x1571 @0x12
0x155f…1579 at0013 = ╱fe00409c0e╱ // 0x1572 @0x13
0x155f…1579 at0018 = ╱b6╱ THEN ╱ // 0x1577 @0x18
0x155f…1579 at0019 = EOL // 0x1578 @0x19
0x155f…1579 }
0x1579…1593 a2ea 2100 DSALDI1$(GRUP)=SALDO$
0x1579…1593 LineComalBin {
0x1579…1593 ptr = 0xa2ea // 0x1579 @0x0
0x1579…1593 lno = 0x0834 // 0x157b @0x2
0x1579…1593 at0004 = ╱44╱D╱ // 0x157d @0x4
0x1579…1593 at0005 = ╱53╱S╱ // 0x157e @0x5
0x1579…1593 at0006 = ╱41╱A╱ // 0x157f @0x6
0x1579…1593 at0007 = ╱4c╱L╱ // 0x1580 @0x7
0x1579…1593 at0008 = ╱44╱D╱ // 0x1581 @0x8
0x1579…1593 at0009 = ╱49╱I╱ // 0x1582 @0x9
0x1579…1593 at000a = ╱31╱1╱ // 0x1583 @0xa
0x1579…1593 at000b = ╱ef╱$╱ // 0x1584 @0xb
0x1579…1593 at000c = ╱ed╱(╱ // 0x1585 @0xc
0x1579…1593 at000d = ╱47╱G╱ // 0x1586 @0xd
0x1579…1593 at000e = ╱52╱R╱ // 0x1587 @0xe
0x1579…1593 at000f = ╱55╱U╱ // 0x1588 @0xf
0x1579…1593 at0010 = ╱50╱P╱ // 0x1589 @0x10
0x1579…1593 at0011 = ╱ee╱)╱ // 0x158a @0x11
0x1579…1593 at0012 = ╱dc╱=╱ // 0x158b @0x12
0x1579…1593 at0013 = ╱53╱S╱ // 0x158c @0x13
0x1579…1593 at0014 = ╱41╱A╱ // 0x158d @0x14
0x1579…1593 at0015 = ╱4c╱L╱ // 0x158e @0x15
0x1579…1593 at0016 = ╱44╱D╱ // 0x158f @0x16
0x1579…1593 at0017 = ╱4f╱O╱ // 0x1590 @0x17
0x1579…1593 at0018 = ╱ef╱$╱ // 0x1591 @0x18
0x1579…1593 at0019 = EOL // 0x1592 @0x19
0x1579…1593 }
0x1593…15bc a313 2110 IF DSALDI$(GRUP,LEN(DSALDI$(GRUP)))="-" THEN
0x1593…15bc LineComalBin {
0x1593…15bc ptr = 0xa313 // 0x1593 @0x0
0x1593…15bc lno = 0x083e // 0x1595 @0x2
0x1593…15bc at0004 = ╱9c╱ IF ╱ // 0x1597 @0x4
0x1593…15bc at0005 = ╱44╱D╱ // 0x1598 @0x5
0x1593…15bc at0006 = ╱53╱S╱ // 0x1599 @0x6
0x1593…15bc at0007 = ╱41╱A╱ // 0x159a @0x7
0x1593…15bc at0008 = ╱4c╱L╱ // 0x159b @0x8
0x1593…15bc at0009 = ╱44╱D╱ // 0x159c @0x9
0x1593…15bc at000a = ╱49╱I╱ // 0x159d @0xa
0x1593…15bc at000b = ╱ef╱$╱ // 0x159e @0xb
0x1593…15bc at000c = ╱ed╱(╱ // 0x159f @0xc
0x1593…15bc at000d = ╱47╱G╱ // 0x15a0 @0xd
0x1593…15bc at000e = ╱52╱R╱ // 0x15a1 @0xe
0x1593…15bc at000f = ╱55╱U╱ // 0x15a2 @0xf
0x1593…15bc at0010 = ╱50╱P╱ // 0x15a3 @0x10
0x1593…15bc at0011 = ╱ec╱,╱ // 0x15a4 @0x11
0x1593…15bc at0012 = ╱cc╱LEN╱ // 0x15a5 @0x12
0x1593…15bc at0013 = ╱ed╱(╱ // 0x15a6 @0x13
0x1593…15bc at0014 = ╱44╱D╱ // 0x15a7 @0x14
0x1593…15bc at0015 = ╱53╱S╱ // 0x15a8 @0x15
0x1593…15bc at0016 = ╱41╱A╱ // 0x15a9 @0x16
0x1593…15bc at0017 = ╱4c╱L╱ // 0x15aa @0x17
0x1593…15bc at0018 = ╱44╱D╱ // 0x15ab @0x18
0x1593…15bc at0019 = ╱49╱I╱ // 0x15ac @0x19
0x1593…15bc at001a = ╱ef╱$╱ // 0x15ad @0x1a
0x1593…15bc at001b = ╱ed╱(╱ // 0x15ae @0x1b
0x1593…15bc at001c = ╱47╱G╱ // 0x15af @0x1c
0x1593…15bc at001d = ╱52╱R╱ // 0x15b0 @0x1d
0x1593…15bc at001e = ╱55╱U╱ // 0x15b1 @0x1e
0x1593…15bc at001f = ╱50╱P╱ // 0x15b2 @0x1f
0x1593…15bc at0020 = ╱ee╱)╱ // 0x15b3 @0x20
0x1593…15bc at0021 = ╱ee╱)╱ // 0x15b4 @0x21
0x1593…15bc at0022 = ╱ee╱)╱ // 0x15b5 @0x22
0x1593…15bc at0023 = ╱dc╱=╱ // 0x15b6 @0x23
0x1593…15bc at0024 = ╱22╱"╱ // 0x15b7 @0x24
0x1593…15bc at0025 = ╱2d╱-╱ // 0x15b8 @0x25
0x1593…15bc at0026 = ╱22╱"╱ // 0x15b9 @0x26
0x1593…15bc at0027 = ╱b6╱ THEN ╱ // 0x15ba @0x27
0x1593…15bc at0028 = EOL // 0x15bb @0x28
0x1593…15bc }
0x15bc…15e6 a33d 2120 FÅKREDIT$=DSALDI$(GRUP);FÅDEBET$="0+"
0x15bc…15e6 LineComalBin {
0x15bc…15e6 ptr = 0xa33d // 0x15bc @0x0
0x15bc…15e6 lno = 0x0848 // 0x15be @0x2
0x15bc…15e6 at0004 = ╱46╱F╱ // 0x15c0 @0x4
0x15bc…15e6 at0005 = ╱5d╱Å╱ // 0x15c1 @0x5
0x15bc…15e6 at0006 = ╱4b╱K╱ // 0x15c2 @0x6
0x15bc…15e6 at0007 = ╱52╱R╱ // 0x15c3 @0x7
0x15bc…15e6 at0008 = ╱45╱E╱ // 0x15c4 @0x8
0x15bc…15e6 at0009 = ╱44╱D╱ // 0x15c5 @0x9
0x15bc…15e6 at000a = ╱49╱I╱ // 0x15c6 @0xa
0x15bc…15e6 at000b = ╱54╱T╱ // 0x15c7 @0xb
0x15bc…15e6 at000c = ╱ef╱$╱ // 0x15c8 @0xc
0x15bc…15e6 at000d = ╱dc╱=╱ // 0x15c9 @0xd
0x15bc…15e6 at000e = ╱44╱D╱ // 0x15ca @0xe
0x15bc…15e6 at000f = ╱53╱S╱ // 0x15cb @0xf
0x15bc…15e6 at0010 = ╱41╱A╱ // 0x15cc @0x10
0x15bc…15e6 at0011 = ╱4c╱L╱ // 0x15cd @0x11
0x15bc…15e6 at0012 = ╱44╱D╱ // 0x15ce @0x12
0x15bc…15e6 at0013 = ╱49╱I╱ // 0x15cf @0x13
0x15bc…15e6 at0014 = ╱ef╱$╱ // 0x15d0 @0x14
0x15bc…15e6 at0015 = ╱ed╱(╱ // 0x15d1 @0x15
0x15bc…15e6 at0016 = ╱47╱G╱ // 0x15d2 @0x16
0x15bc…15e6 at0017 = ╱52╱R╱ // 0x15d3 @0x17
0x15bc…15e6 at0018 = ╱55╱U╱ // 0x15d4 @0x18
0x15bc…15e6 at0019 = ╱50╱P╱ // 0x15d5 @0x19
0x15bc…15e6 at001a = ╱ee╱)╱ // 0x15d6 @0x1a
0x15bc…15e6 at001b = ╱eb╱;╱ // 0x15d7 @0x1b
0x15bc…15e6 at001c = ╱46╱F╱ // 0x15d8 @0x1c
0x15bc…15e6 at001d = ╱5d╱Å╱ // 0x15d9 @0x1d
0x15bc…15e6 at001e = ╱44╱D╱ // 0x15da @0x1e
0x15bc…15e6 at001f = ╱45╱E╱ // 0x15db @0x1f
0x15bc…15e6 at0020 = ╱42╱B╱ // 0x15dc @0x20
0x15bc…15e6 at0021 = ╱45╱E╱ // 0x15dd @0x21
0x15bc…15e6 at0022 = ╱54╱T╱ // 0x15de @0x22
0x15bc…15e6 at0023 = ╱ef╱$╱ // 0x15df @0x23
0x15bc…15e6 at0024 = ╱dc╱=╱ // 0x15e0 @0x24
0x15bc…15e6 at0025 = ╱22╱"╱ // 0x15e1 @0x25
0x15bc…15e6 at0026 = ╱30╱0╱ // 0x15e2 @0x26
0x15bc…15e6 at0027 = ╱2b╱+╱ // 0x15e3 @0x27
0x15bc…15e6 at0028 = ╱22╱"╱ // 0x15e4 @0x28
0x15bc…15e6 at0029 = EOL // 0x15e5 @0x29
0x15bc…15e6 }
0x15e6…15ec a343 2130 ELSE
0x15e6…15ec LineComalBin {
0x15e6…15ec ptr = 0xa343 // 0x15e6 @0x0
0x15e6…15ec lno = 0x0852 // 0x15e8 @0x2
0x15e6…15ec at0004 = ╱9a╱ ELSE ╱ // 0x15ea @0x4
0x15e6…15ec at0005 = EOL // 0x15eb @0x5
0x15e6…15ec }
0x15ec…1616 a36d 2140 FÅDEBET$=DSALDI$(GRUP);FÅKREDIT$="0+"
0x15ec…1616 LineComalBin {
0x15ec…1616 ptr = 0xa36d // 0x15ec @0x0
0x15ec…1616 lno = 0x085c // 0x15ee @0x2
0x15ec…1616 at0004 = ╱46╱F╱ // 0x15f0 @0x4
0x15ec…1616 at0005 = ╱5d╱Å╱ // 0x15f1 @0x5
0x15ec…1616 at0006 = ╱44╱D╱ // 0x15f2 @0x6
0x15ec…1616 at0007 = ╱45╱E╱ // 0x15f3 @0x7
0x15ec…1616 at0008 = ╱42╱B╱ // 0x15f4 @0x8
0x15ec…1616 at0009 = ╱45╱E╱ // 0x15f5 @0x9
0x15ec…1616 at000a = ╱54╱T╱ // 0x15f6 @0xa
0x15ec…1616 at000b = ╱ef╱$╱ // 0x15f7 @0xb
0x15ec…1616 at000c = ╱dc╱=╱ // 0x15f8 @0xc
0x15ec…1616 at000d = ╱44╱D╱ // 0x15f9 @0xd
0x15ec…1616 at000e = ╱53╱S╱ // 0x15fa @0xe
0x15ec…1616 at000f = ╱41╱A╱ // 0x15fb @0xf
0x15ec…1616 at0010 = ╱4c╱L╱ // 0x15fc @0x10
0x15ec…1616 at0011 = ╱44╱D╱ // 0x15fd @0x11
0x15ec…1616 at0012 = ╱49╱I╱ // 0x15fe @0x12
0x15ec…1616 at0013 = ╱ef╱$╱ // 0x15ff @0x13
0x15ec…1616 at0014 = ╱ed╱(╱ // 0x1600 @0x14
0x15ec…1616 at0015 = ╱47╱G╱ // 0x1601 @0x15
0x15ec…1616 at0016 = ╱52╱R╱ // 0x1602 @0x16
0x15ec…1616 at0017 = ╱55╱U╱ // 0x1603 @0x17
0x15ec…1616 at0018 = ╱50╱P╱ // 0x1604 @0x18
0x15ec…1616 at0019 = ╱ee╱)╱ // 0x1605 @0x19
0x15ec…1616 at001a = ╱eb╱;╱ // 0x1606 @0x1a
0x15ec…1616 at001b = ╱46╱F╱ // 0x1607 @0x1b
0x15ec…1616 at001c = ╱5d╱Å╱ // 0x1608 @0x1c
0x15ec…1616 at001d = ╱4b╱K╱ // 0x1609 @0x1d
0x15ec…1616 at001e = ╱52╱R╱ // 0x160a @0x1e
0x15ec…1616 at001f = ╱45╱E╱ // 0x160b @0x1f
0x15ec…1616 at0020 = ╱44╱D╱ // 0x160c @0x20
0x15ec…1616 at0021 = ╱49╱I╱ // 0x160d @0x21
0x15ec…1616 at0022 = ╱54╱T╱ // 0x160e @0x22
0x15ec…1616 at0023 = ╱ef╱$╱ // 0x160f @0x23
0x15ec…1616 at0024 = ╱dc╱=╱ // 0x1610 @0x24
0x15ec…1616 at0025 = ╱22╱"╱ // 0x1611 @0x25
0x15ec…1616 at0026 = ╱30╱0╱ // 0x1612 @0x26
0x15ec…1616 at0027 = ╱2b╱+╱ // 0x1613 @0x27
0x15ec…1616 at0028 = ╱22╱"╱ // 0x1614 @0x28
0x15ec…1616 at0029 = EOL // 0x1615 @0x29
0x15ec…1616 }
0x1616…161c a373 2150 ENDIF
0x1616…161c LineComalBin {
0x1616…161c ptr = 0xa373 // 0x1616 @0x0
0x1616…161c lno = 0x0866 // 0x1618 @0x2
0x1616…161c at0004 = ╱9b╱ ENDIF ╱ // 0x161a @0x4
0x1616…161c at0005 = EOL // 0x161b @0x5
0x1616…161c }
0x161c…1622 a379 2160 ELSE
0x161c…1622 LineComalBin {
0x161c…1622 ptr = 0xa379 // 0x161c @0x0
0x161c…1622 lno = 0x0870 // 0x161e @0x2
0x161c…1622 at0004 = ╱9a╱ ELSE ╱ // 0x1620 @0x4
0x161c…1622 at0005 = EOL // 0x1621 @0x5
0x161c…1622 }
0x1622…163c a393 2170 KSALDI1$(GRUP)=SALDO$
0x1622…163c LineComalBin {
0x1622…163c ptr = 0xa393 // 0x1622 @0x0
0x1622…163c lno = 0x087a // 0x1624 @0x2
0x1622…163c at0004 = ╱4b╱K╱ // 0x1626 @0x4
0x1622…163c at0005 = ╱53╱S╱ // 0x1627 @0x5
0x1622…163c at0006 = ╱41╱A╱ // 0x1628 @0x6
0x1622…163c at0007 = ╱4c╱L╱ // 0x1629 @0x7
0x1622…163c at0008 = ╱44╱D╱ // 0x162a @0x8
0x1622…163c at0009 = ╱49╱I╱ // 0x162b @0x9
0x1622…163c at000a = ╱31╱1╱ // 0x162c @0xa
0x1622…163c at000b = ╱ef╱$╱ // 0x162d @0xb
0x1622…163c at000c = ╱ed╱(╱ // 0x162e @0xc
0x1622…163c at000d = ╱47╱G╱ // 0x162f @0xd
0x1622…163c at000e = ╱52╱R╱ // 0x1630 @0xe
0x1622…163c at000f = ╱55╱U╱ // 0x1631 @0xf
0x1622…163c at0010 = ╱50╱P╱ // 0x1632 @0x10
0x1622…163c at0011 = ╱ee╱)╱ // 0x1633 @0x11
0x1622…163c at0012 = ╱dc╱=╱ // 0x1634 @0x12
0x1622…163c at0013 = ╱53╱S╱ // 0x1635 @0x13
0x1622…163c at0014 = ╱41╱A╱ // 0x1636 @0x14
0x1622…163c at0015 = ╱4c╱L╱ // 0x1637 @0x15
0x1622…163c at0016 = ╱44╱D╱ // 0x1638 @0x16
0x1622…163c at0017 = ╱4f╱O╱ // 0x1639 @0x17
0x1622…163c at0018 = ╱ef╱$╱ // 0x163a @0x18
0x1622…163c at0019 = EOL // 0x163b @0x19
0x1622…163c }
0x163c…1665 a3bc 2180 IF KSALDI$(GRUP,LEN(KSALDI$(GRUP)))="-" THEN
0x163c…1665 LineComalBin {
0x163c…1665 ptr = 0xa3bc // 0x163c @0x0
0x163c…1665 lno = 0x0884 // 0x163e @0x2
0x163c…1665 at0004 = ╱9c╱ IF ╱ // 0x1640 @0x4
0x163c…1665 at0005 = ╱4b╱K╱ // 0x1641 @0x5
0x163c…1665 at0006 = ╱53╱S╱ // 0x1642 @0x6
0x163c…1665 at0007 = ╱41╱A╱ // 0x1643 @0x7
0x163c…1665 at0008 = ╱4c╱L╱ // 0x1644 @0x8
0x163c…1665 at0009 = ╱44╱D╱ // 0x1645 @0x9
0x163c…1665 at000a = ╱49╱I╱ // 0x1646 @0xa
0x163c…1665 at000b = ╱ef╱$╱ // 0x1647 @0xb
0x163c…1665 at000c = ╱ed╱(╱ // 0x1648 @0xc
0x163c…1665 at000d = ╱47╱G╱ // 0x1649 @0xd
0x163c…1665 at000e = ╱52╱R╱ // 0x164a @0xe
0x163c…1665 at000f = ╱55╱U╱ // 0x164b @0xf
0x163c…1665 at0010 = ╱50╱P╱ // 0x164c @0x10
0x163c…1665 at0011 = ╱ec╱,╱ // 0x164d @0x11
0x163c…1665 at0012 = ╱cc╱LEN╱ // 0x164e @0x12
0x163c…1665 at0013 = ╱ed╱(╱ // 0x164f @0x13
0x163c…1665 at0014 = ╱4b╱K╱ // 0x1650 @0x14
0x163c…1665 at0015 = ╱53╱S╱ // 0x1651 @0x15
0x163c…1665 at0016 = ╱41╱A╱ // 0x1652 @0x16
0x163c…1665 at0017 = ╱4c╱L╱ // 0x1653 @0x17
0x163c…1665 at0018 = ╱44╱D╱ // 0x1654 @0x18
0x163c…1665 at0019 = ╱49╱I╱ // 0x1655 @0x19
0x163c…1665 at001a = ╱ef╱$╱ // 0x1656 @0x1a
0x163c…1665 at001b = ╱ed╱(╱ // 0x1657 @0x1b
0x163c…1665 at001c = ╱47╱G╱ // 0x1658 @0x1c
0x163c…1665 at001d = ╱52╱R╱ // 0x1659 @0x1d
0x163c…1665 at001e = ╱55╱U╱ // 0x165a @0x1e
0x163c…1665 at001f = ╱50╱P╱ // 0x165b @0x1f
0x163c…1665 at0020 = ╱ee╱)╱ // 0x165c @0x20
0x163c…1665 at0021 = ╱ee╱)╱ // 0x165d @0x21
0x163c…1665 at0022 = ╱ee╱)╱ // 0x165e @0x22
0x163c…1665 at0023 = ╱dc╱=╱ // 0x165f @0x23
0x163c…1665 at0024 = ╱22╱"╱ // 0x1660 @0x24
0x163c…1665 at0025 = ╱2d╱-╱ // 0x1661 @0x25
0x163c…1665 at0026 = ╱22╱"╱ // 0x1662 @0x26
0x163c…1665 at0027 = ╱b6╱ THEN ╱ // 0x1663 @0x27
0x163c…1665 at0028 = EOL // 0x1664 @0x28
0x163c…1665 }
0x1665…168f a3e6 2190 FÅKREDIT$=KSALDI$(GRUP);FÅDEBET$="0+"
0x1665…168f LineComalBin {
0x1665…168f ptr = 0xa3e6 // 0x1665 @0x0
0x1665…168f lno = 0x088e // 0x1667 @0x2
0x1665…168f at0004 = ╱46╱F╱ // 0x1669 @0x4
0x1665…168f at0005 = ╱5d╱Å╱ // 0x166a @0x5
0x1665…168f at0006 = ╱4b╱K╱ // 0x166b @0x6
0x1665…168f at0007 = ╱52╱R╱ // 0x166c @0x7
0x1665…168f at0008 = ╱45╱E╱ // 0x166d @0x8
0x1665…168f at0009 = ╱44╱D╱ // 0x166e @0x9
0x1665…168f at000a = ╱49╱I╱ // 0x166f @0xa
0x1665…168f at000b = ╱54╱T╱ // 0x1670 @0xb
0x1665…168f at000c = ╱ef╱$╱ // 0x1671 @0xc
0x1665…168f at000d = ╱dc╱=╱ // 0x1672 @0xd
0x1665…168f at000e = ╱4b╱K╱ // 0x1673 @0xe
0x1665…168f at000f = ╱53╱S╱ // 0x1674 @0xf
0x1665…168f at0010 = ╱41╱A╱ // 0x1675 @0x10
0x1665…168f at0011 = ╱4c╱L╱ // 0x1676 @0x11
0x1665…168f at0012 = ╱44╱D╱ // 0x1677 @0x12
0x1665…168f at0013 = ╱49╱I╱ // 0x1678 @0x13
0x1665…168f at0014 = ╱ef╱$╱ // 0x1679 @0x14
0x1665…168f at0015 = ╱ed╱(╱ // 0x167a @0x15
0x1665…168f at0016 = ╱47╱G╱ // 0x167b @0x16
0x1665…168f at0017 = ╱52╱R╱ // 0x167c @0x17
0x1665…168f at0018 = ╱55╱U╱ // 0x167d @0x18
0x1665…168f at0019 = ╱50╱P╱ // 0x167e @0x19
0x1665…168f at001a = ╱ee╱)╱ // 0x167f @0x1a
0x1665…168f at001b = ╱eb╱;╱ // 0x1680 @0x1b
0x1665…168f at001c = ╱46╱F╱ // 0x1681 @0x1c
0x1665…168f at001d = ╱5d╱Å╱ // 0x1682 @0x1d
0x1665…168f at001e = ╱44╱D╱ // 0x1683 @0x1e
0x1665…168f at001f = ╱45╱E╱ // 0x1684 @0x1f
0x1665…168f at0020 = ╱42╱B╱ // 0x1685 @0x20
0x1665…168f at0021 = ╱45╱E╱ // 0x1686 @0x21
0x1665…168f at0022 = ╱54╱T╱ // 0x1687 @0x22
0x1665…168f at0023 = ╱ef╱$╱ // 0x1688 @0x23
0x1665…168f at0024 = ╱dc╱=╱ // 0x1689 @0x24
0x1665…168f at0025 = ╱22╱"╱ // 0x168a @0x25
0x1665…168f at0026 = ╱30╱0╱ // 0x168b @0x26
0x1665…168f at0027 = ╱2b╱+╱ // 0x168c @0x27
0x1665…168f at0028 = ╱22╱"╱ // 0x168d @0x28
0x1665…168f at0029 = EOL // 0x168e @0x29
0x1665…168f }
0x168f…1695 (75,) a3ec 2200 ELSE
0x168f…1695 LineComalBin {
0x168f…1695 ptr = 0xa3ec // 0x168f @0x0
0x168f…1695 lno = 0x0898 // 0x1691 @0x2
0x168f…1695 at0004 = ╱9a╱ ELSE ╱ // 0x1693 @0x4
0x168f…1695 at0005 = EOL // 0x1694 @0x5
0x168f…1695 }
0x1695…16bf a416 2210 FÅDEBET$=KSALDI$(GRUP);FÅKREDIT$="0+"
0x1695…16bf LineComalBin {
0x1695…16bf ptr = 0xa416 // 0x1695 @0x0
0x1695…16bf lno = 0x08a2 // 0x1697 @0x2
0x1695…16bf at0004 = ╱46╱F╱ // 0x1699 @0x4
0x1695…16bf at0005 = ╱5d╱Å╱ // 0x169a @0x5
0x1695…16bf at0006 = ╱44╱D╱ // 0x169b @0x6
0x1695…16bf at0007 = ╱45╱E╱ // 0x169c @0x7
0x1695…16bf at0008 = ╱42╱B╱ // 0x169d @0x8
0x1695…16bf at0009 = ╱45╱E╱ // 0x169e @0x9
0x1695…16bf at000a = ╱54╱T╱ // 0x169f @0xa
0x1695…16bf at000b = ╱ef╱$╱ // 0x16a0 @0xb
0x1695…16bf at000c = ╱dc╱=╱ // 0x16a1 @0xc
0x1695…16bf at000d = ╱4b╱K╱ // 0x16a2 @0xd
0x1695…16bf at000e = ╱53╱S╱ // 0x16a3 @0xe
0x1695…16bf at000f = ╱41╱A╱ // 0x16a4 @0xf
0x1695…16bf at0010 = ╱4c╱L╱ // 0x16a5 @0x10
0x1695…16bf at0011 = ╱44╱D╱ // 0x16a6 @0x11
0x1695…16bf at0012 = ╱49╱I╱ // 0x16a7 @0x12
0x1695…16bf at0013 = ╱ef╱$╱ // 0x16a8 @0x13
0x1695…16bf at0014 = ╱ed╱(╱ // 0x16a9 @0x14
0x1695…16bf at0015 = ╱47╱G╱ // 0x16aa @0x15
0x1695…16bf at0016 = ╱52╱R╱ // 0x16ab @0x16
0x1695…16bf at0017 = ╱55╱U╱ // 0x16ac @0x17
0x1695…16bf at0018 = ╱50╱P╱ // 0x16ad @0x18
0x1695…16bf at0019 = ╱ee╱)╱ // 0x16ae @0x19
0x1695…16bf at001a = ╱eb╱;╱ // 0x16af @0x1a
0x1695…16bf at001b = ╱46╱F╱ // 0x16b0 @0x1b
0x1695…16bf at001c = ╱5d╱Å╱ // 0x16b1 @0x1c
0x1695…16bf at001d = ╱4b╱K╱ // 0x16b2 @0x1d
0x1695…16bf at001e = ╱52╱R╱ // 0x16b3 @0x1e
0x1695…16bf at001f = ╱45╱E╱ // 0x16b4 @0x1f
0x1695…16bf at0020 = ╱44╱D╱ // 0x16b5 @0x20
0x1695…16bf at0021 = ╱49╱I╱ // 0x16b6 @0x21
0x1695…16bf at0022 = ╱54╱T╱ // 0x16b7 @0x22
0x1695…16bf at0023 = ╱ef╱$╱ // 0x16b8 @0x23
0x1695…16bf at0024 = ╱dc╱=╱ // 0x16b9 @0x24
0x1695…16bf at0025 = ╱22╱"╱ // 0x16ba @0x25
0x1695…16bf at0026 = ╱30╱0╱ // 0x16bb @0x26
0x1695…16bf at0027 = ╱2b╱+╱ // 0x16bc @0x27
0x1695…16bf at0028 = ╱22╱"╱ // 0x16bd @0x28
0x1695…16bf at0029 = EOL // 0x16be @0x29
0x1695…16bf }
0x16bf…16c5 a41c 2220 ENDIF
0x16bf…16c5 LineComalBin {
0x16bf…16c5 ptr = 0xa41c // 0x16bf @0x0
0x16bf…16c5 lno = 0x08ac // 0x16c1 @0x2
0x16bf…16c5 at0004 = ╱9b╱ ENDIF ╱ // 0x16c3 @0x4
0x16bf…16c5 at0005 = EOL // 0x16c4 @0x5
0x16bf…16c5 }
0x16c5…16cb a422 2230 ENDIF
0x16c5…16cb LineComalBin {
0x16c5…16cb ptr = 0xa422 // 0x16c5 @0x0
0x16c5…16cb lno = 0x08b6 // 0x16c7 @0x2
0x16c5…16cb at0004 = ╱9b╱ ENDIF ╱ // 0x16c9 @0x4
0x16c5…16cb at0005 = EOL // 0x16ca @0x5
0x16c5…16cb }
0x16cb…16f2 a449 2233 EXEC CALC(B,FÅDEBET$,FÅKREDIT$,SALDO$)
0x16cb…16f2 LineComalBin {
0x16cb…16f2 ptr = 0xa449 // 0x16cb @0x0
0x16cb…16f2 lno = 0x08b9 // 0x16cd @0x2
0x16cb…16f2 at0004 = ╱9d╱ EXEC ╱ // 0x16cf @0x4
0x16cb…16f2 at0005 = ╱43╱C╱ // 0x16d0 @0x5
0x16cb…16f2 at0006 = ╱41╱A╱ // 0x16d1 @0x6
0x16cb…16f2 at0007 = ╱4c╱L╱ // 0x16d2 @0x7
0x16cb…16f2 at0008 = ╱43╱C╱ // 0x16d3 @0x8
0x16cb…16f2 at0009 = ╱ed╱(╱ // 0x16d4 @0x9
0x16cb…16f2 at000a = ╱42╱B╱ // 0x16d5 @0xa
0x16cb…16f2 at000b = ╱ec╱,╱ // 0x16d6 @0xb
0x16cb…16f2 at000c = ╱46╱F╱ // 0x16d7 @0xc
0x16cb…16f2 at000d = ╱5d╱Å╱ // 0x16d8 @0xd
0x16cb…16f2 at000e = ╱44╱D╱ // 0x16d9 @0xe
0x16cb…16f2 at000f = ╱45╱E╱ // 0x16da @0xf
0x16cb…16f2 at0010 = ╱42╱B╱ // 0x16db @0x10
0x16cb…16f2 at0011 = ╱45╱E╱ // 0x16dc @0x11
0x16cb…16f2 at0012 = ╱54╱T╱ // 0x16dd @0x12
0x16cb…16f2 at0013 = ╱ef╱$╱ // 0x16de @0x13
0x16cb…16f2 at0014 = ╱ec╱,╱ // 0x16df @0x14
0x16cb…16f2 at0015 = ╱46╱F╱ // 0x16e0 @0x15
0x16cb…16f2 at0016 = ╱5d╱Å╱ // 0x16e1 @0x16
0x16cb…16f2 at0017 = ╱4b╱K╱ // 0x16e2 @0x17
0x16cb…16f2 at0018 = ╱52╱R╱ // 0x16e3 @0x18
0x16cb…16f2 at0019 = ╱45╱E╱ // 0x16e4 @0x19
0x16cb…16f2 at001a = ╱44╱D╱ // 0x16e5 @0x1a
0x16cb…16f2 at001b = ╱49╱I╱ // 0x16e6 @0x1b
0x16cb…16f2 at001c = ╱54╱T╱ // 0x16e7 @0x1c
0x16cb…16f2 at001d = ╱ef╱$╱ // 0x16e8 @0x1d
0x16cb…16f2 at001e = ╱ec╱,╱ // 0x16e9 @0x1e
0x16cb…16f2 at001f = ╱53╱S╱ // 0x16ea @0x1f
0x16cb…16f2 at0020 = ╱41╱A╱ // 0x16eb @0x20
0x16cb…16f2 at0021 = ╱4c╱L╱ // 0x16ec @0x21
0x16cb…16f2 at0022 = ╱44╱D╱ // 0x16ed @0x22
0x16cb…16f2 at0023 = ╱4f╱O╱ // 0x16ee @0x23
0x16cb…16f2 at0024 = ╱ef╱$╱ // 0x16ef @0x24
0x16cb…16f2 at0025 = ╱ee╱)╱ // 0x16f0 @0x25
0x16cb…16f2 at0026 = EOL // 0x16f1 @0x26
0x16cb…16f2 }
0x16f2…171a a471 2235 EXEC CALC(B,TOSALDO1$,SALDO$,TOSALDO1$)
0x16f2…171a LineComalBin {
0x16f2…171a ptr = 0xa471 // 0x16f2 @0x0
0x16f2…171a lno = 0x08bb // 0x16f4 @0x2
0x16f2…171a at0004 = ╱9d╱ EXEC ╱ // 0x16f6 @0x4
0x16f2…171a at0005 = ╱43╱C╱ // 0x16f7 @0x5
0x16f2…171a at0006 = ╱41╱A╱ // 0x16f8 @0x6
0x16f2…171a at0007 = ╱4c╱L╱ // 0x16f9 @0x7
0x16f2…171a at0008 = ╱43╱C╱ // 0x16fa @0x8
0x16f2…171a at0009 = ╱ed╱(╱ // 0x16fb @0x9
0x16f2…171a at000a = ╱42╱B╱ // 0x16fc @0xa
0x16f2…171a at000b = ╱ec╱,╱ // 0x16fd @0xb
0x16f2…171a at000c = ╱54╱T╱ // 0x16fe @0xc
0x16f2…171a at000d = ╱4f╱O╱ // 0x16ff @0xd
0x16f2…171a at000e = ╱53╱S╱ // 0x1700 @0xe
0x16f2…171a at000f = ╱41╱A╱ // 0x1701 @0xf
0x16f2…171a at0010 = ╱4c╱L╱ // 0x1702 @0x10
0x16f2…171a at0011 = ╱44╱D╱ // 0x1703 @0x11
0x16f2…171a at0012 = ╱4f╱O╱ // 0x1704 @0x12
0x16f2…171a at0013 = ╱31╱1╱ // 0x1705 @0x13
0x16f2…171a at0014 = ╱ef╱$╱ // 0x1706 @0x14
0x16f2…171a at0015 = ╱ec╱,╱ // 0x1707 @0x15
0x16f2…171a at0016 = ╱53╱S╱ // 0x1708 @0x16
0x16f2…171a at0017 = ╱41╱A╱ // 0x1709 @0x17
0x16f2…171a at0018 = ╱4c╱L╱ // 0x170a @0x18
0x16f2…171a at0019 = ╱44╱D╱ // 0x170b @0x19
0x16f2…171a at001a = ╱4f╱O╱ // 0x170c @0x1a
0x16f2…171a at001b = ╱ef╱$╱ // 0x170d @0x1b
0x16f2…171a at001c = ╱ec╱,╱ // 0x170e @0x1c
0x16f2…171a at001d = ╱54╱T╱ // 0x170f @0x1d
0x16f2…171a at001e = ╱4f╱O╱ // 0x1710 @0x1e
0x16f2…171a at001f = ╱53╱S╱ // 0x1711 @0x1f
0x16f2…171a at0020 = ╱41╱A╱ // 0x1712 @0x20
0x16f2…171a at0021 = ╱4c╱L╱ // 0x1713 @0x21
0x16f2…171a at0022 = ╱44╱D╱ // 0x1714 @0x22
0x16f2…171a at0023 = ╱4f╱O╱ // 0x1715 @0x23
0x16f2…171a at0024 = ╱31╱1╱ // 0x1716 @0x24
0x16f2…171a at0025 = ╱ef╱$╱ // 0x1717 @0x25
0x16f2…171a at0026 = ╱ee╱)╱ // 0x1718 @0x26
0x16f2…171a at0027 = EOL // 0x1719 @0x27
0x16f2…171a }
0x171a…1720 a477 2240 ELSE
0x171a…1720 LineComalBin {
0x171a…1720 ptr = 0xa477 // 0x171a @0x0
0x171a…1720 lno = 0x08c0 // 0x171c @0x2
0x171a…1720 at0004 = ╱9a╱ ELSE ╱ // 0x171e @0x4
0x171a…1720 at0005 = EOL // 0x171f @0x5
0x171a…1720 }
0x1720…172b a482 2250 IF GR=B THEN
0x1720…172b LineComalBin {
0x1720…172b ptr = 0xa482 // 0x1720 @0x0
0x1720…172b lno = 0x08ca // 0x1722 @0x2
0x1720…172b at0004 = ╱9c╱ IF ╱ // 0x1724 @0x4
0x1720…172b at0005 = ╱47╱G╱ // 0x1725 @0x5
0x1720…172b at0006 = ╱52╱R╱ // 0x1726 @0x6
0x1720…172b at0007 = ╱dc╱=╱ // 0x1727 @0x7
0x1720…172b at0008 = ╱42╱B╱ // 0x1728 @0x8
0x1720…172b at0009 = ╱b6╱ THEN ╱ // 0x1729 @0x9
0x1720…172b at000a = EOL // 0x172a @0xa
0x1720…172b }
0x172b…1752 a4a9 2260 EXEC CALC(B,FÅDEBET$,FÅKREDIT$,SALDO$)
0x172b…1752 LineComalBin {
0x172b…1752 ptr = 0xa4a9 // 0x172b @0x0
0x172b…1752 lno = 0x08d4 // 0x172d @0x2
0x172b…1752 at0004 = ╱9d╱ EXEC ╱ // 0x172f @0x4
0x172b…1752 at0005 = ╱43╱C╱ // 0x1730 @0x5
0x172b…1752 at0006 = ╱41╱A╱ // 0x1731 @0x6
0x172b…1752 at0007 = ╱4c╱L╱ // 0x1732 @0x7
0x172b…1752 at0008 = ╱43╱C╱ // 0x1733 @0x8
0x172b…1752 at0009 = ╱ed╱(╱ // 0x1734 @0x9
0x172b…1752 at000a = ╱42╱B╱ // 0x1735 @0xa
0x172b…1752 at000b = ╱ec╱,╱ // 0x1736 @0xb
0x172b…1752 at000c = ╱46╱F╱ // 0x1737 @0xc
0x172b…1752 at000d = ╱5d╱Å╱ // 0x1738 @0xd
0x172b…1752 at000e = ╱44╱D╱ // 0x1739 @0xe
0x172b…1752 at000f = ╱45╱E╱ // 0x173a @0xf
0x172b…1752 at0010 = ╱42╱B╱ // 0x173b @0x10
0x172b…1752 at0011 = ╱45╱E╱ // 0x173c @0x11
0x172b…1752 at0012 = ╱54╱T╱ // 0x173d @0x12
0x172b…1752 at0013 = ╱ef╱$╱ // 0x173e @0x13
0x172b…1752 at0014 = ╱ec╱,╱ // 0x173f @0x14
0x172b…1752 at0015 = ╱46╱F╱ // 0x1740 @0x15
0x172b…1752 at0016 = ╱5d╱Å╱ // 0x1741 @0x16
0x172b…1752 at0017 = ╱4b╱K╱ // 0x1742 @0x17
0x172b…1752 at0018 = ╱52╱R╱ // 0x1743 @0x18
0x172b…1752 at0019 = ╱45╱E╱ // 0x1744 @0x19
0x172b…1752 at001a = ╱44╱D╱ // 0x1745 @0x1a
0x172b…1752 at001b = ╱49╱I╱ // 0x1746 @0x1b
0x172b…1752 at001c = ╱54╱T╱ // 0x1747 @0x1c
0x172b…1752 at001d = ╱ef╱$╱ // 0x1748 @0x1d
0x172b…1752 at001e = ╱ec╱,╱ // 0x1749 @0x1e
0x172b…1752 at001f = ╱53╱S╱ // 0x174a @0x1f
0x172b…1752 at0020 = ╱41╱A╱ // 0x174b @0x20
0x172b…1752 at0021 = ╱4c╱L╱ // 0x174c @0x21
0x172b…1752 at0022 = ╱44╱D╱ // 0x174d @0x22
0x172b…1752 at0023 = ╱4f╱O╱ // 0x174e @0x23
0x172b…1752 at0024 = ╱ef╱$╱ // 0x174f @0x24
0x172b…1752 at0025 = ╱ee╱)╱ // 0x1750 @0x25
0x172b…1752 at0026 = EOL // 0x1751 @0x26
0x172b…1752 }
0x1752…1778 a4cf 2270 EXEC CALC(B,TOSALDO$,SALDO$,TOSALDO$)
0x1752…1778 LineComalBin {
0x1752…1778 ptr = 0xa4cf // 0x1752 @0x0
0x1752…1778 lno = 0x08de // 0x1754 @0x2
0x1752…1778 at0004 = ╱9d╱ EXEC ╱ // 0x1756 @0x4
0x1752…1778 at0005 = ╱43╱C╱ // 0x1757 @0x5
0x1752…1778 at0006 = ╱41╱A╱ // 0x1758 @0x6
0x1752…1778 at0007 = ╱4c╱L╱ // 0x1759 @0x7
0x1752…1778 at0008 = ╱43╱C╱ // 0x175a @0x8
0x1752…1778 at0009 = ╱ed╱(╱ // 0x175b @0x9
0x1752…1778 at000a = ╱42╱B╱ // 0x175c @0xa
0x1752…1778 at000b = ╱ec╱,╱ // 0x175d @0xb
0x1752…1778 at000c = ╱54╱T╱ // 0x175e @0xc
0x1752…1778 at000d = ╱4f╱O╱ // 0x175f @0xd
0x1752…1778 at000e = ╱53╱S╱ // 0x1760 @0xe
0x1752…1778 at000f = ╱41╱A╱ // 0x1761 @0xf
0x1752…1778 at0010 = ╱4c╱L╱ // 0x1762 @0x10
0x1752…1778 at0011 = ╱44╱D╱ // 0x1763 @0x11
0x1752…1778 at0012 = ╱4f╱O╱ // 0x1764 @0x12
0x1752…1778 at0013 = ╱ef╱$╱ // 0x1765 @0x13
0x1752…1778 at0014 = ╱ec╱,╱ // 0x1766 @0x14
0x1752…1778 at0015 = ╱53╱S╱ // 0x1767 @0x15
0x1752…1778 at0016 = ╱41╱A╱ // 0x1768 @0x16
0x1752…1778 at0017 = ╱4c╱L╱ // 0x1769 @0x17
0x1752…1778 at0018 = ╱44╱D╱ // 0x176a @0x18
0x1752…1778 at0019 = ╱4f╱O╱ // 0x176b @0x19
0x1752…1778 at001a = ╱ef╱$╱ // 0x176c @0x1a
0x1752…1778 at001b = ╱ec╱,╱ // 0x176d @0x1b
0x1752…1778 at001c = ╱54╱T╱ // 0x176e @0x1c
0x1752…1778 at001d = ╱4f╱O╱ // 0x176f @0x1d
0x1752…1778 at001e = ╱53╱S╱ // 0x1770 @0x1e
0x1752…1778 at001f = ╱41╱A╱ // 0x1771 @0x1f
0x1752…1778 at0020 = ╱4c╱L╱ // 0x1772 @0x20
0x1752…1778 at0021 = ╱44╱D╱ // 0x1773 @0x21
0x1752…1778 at0022 = ╱4f╱O╱ // 0x1774 @0x22
0x1752…1778 at0023 = ╱ef╱$╱ // 0x1775 @0x23
0x1752…1778 at0024 = ╱ee╱)╱ // 0x1776 @0x24
0x1752…1778 at0025 = EOL // 0x1777 @0x25
0x1752…1778 }
0x1778…1799 a4f0 2280 FÅDEBET$="0+";FÅKREDIT$="0+"
0x1778…1799 LineComalBin {
0x1778…1799 ptr = 0xa4f0 // 0x1778 @0x0
0x1778…1799 lno = 0x08e8 // 0x177a @0x2
0x1778…1799 at0004 = ╱46╱F╱ // 0x177c @0x4
0x1778…1799 at0005 = ╱5d╱Å╱ // 0x177d @0x5
0x1778…1799 at0006 = ╱44╱D╱ // 0x177e @0x6
0x1778…1799 at0007 = ╱45╱E╱ // 0x177f @0x7
0x1778…1799 at0008 = ╱42╱B╱ // 0x1780 @0x8
0x1778…1799 at0009 = ╱45╱E╱ // 0x1781 @0x9
0x1778…1799 at000a = ╱54╱T╱ // 0x1782 @0xa
0x1778…1799 at000b = ╱ef╱$╱ // 0x1783 @0xb
0x1778…1799 at000c = ╱dc╱=╱ // 0x1784 @0xc
0x1778…1799 at000d = ╱22╱"╱ // 0x1785 @0xd
0x1778…1799 at000e = ╱30╱0╱ // 0x1786 @0xe
0x1778…1799 at000f = ╱2b╱+╱ // 0x1787 @0xf
0x1778…1799 at0010 = ╱22╱"╱ // 0x1788 @0x10
0x1778…1799 at0011 = ╱eb╱;╱ // 0x1789 @0x11
0x1778…1799 at0012 = ╱46╱F╱ // 0x178a @0x12
0x1778…1799 at0013 = ╱5d╱Å╱ // 0x178b @0x13
0x1778…1799 at0014 = ╱4b╱K╱ // 0x178c @0x14
0x1778…1799 at0015 = ╱52╱R╱ // 0x178d @0x15
0x1778…1799 at0016 = ╱45╱E╱ // 0x178e @0x16
0x1778…1799 at0017 = ╱44╱D╱ // 0x178f @0x17
0x1778…1799 at0018 = ╱49╱I╱ // 0x1790 @0x18
0x1778…1799 at0019 = ╱54╱T╱ // 0x1791 @0x19
0x1778…1799 at001a = ╱ef╱$╱ // 0x1792 @0x1a
0x1778…1799 at001b = ╱dc╱=╱ // 0x1793 @0x1b
0x1778…1799 at001c = ╱22╱"╱ // 0x1794 @0x1c
0x1778…1799 at001d = ╱30╱0╱ // 0x1795 @0x1d
0x1778…1799 at001e = ╱2b╱+╱ // 0x1796 @0x1e
0x1778…1799 at001f = ╱22╱"╱ // 0x1797 @0x1f
0x1778…1799 at0020 = EOL // 0x1798 @0x20
0x1778…1799 }
0x1799…179f a4f6 2290 ENDIF
0x1799…179f LineComalBin {
0x1799…179f ptr = 0xa4f6 // 0x1799 @0x0
0x1799…179f lno = 0x08f2 // 0x179b @0x2
0x1799…179f at0004 = ╱9b╱ ENDIF ╱ // 0x179d @0x4
0x1799…179f at0005 = EOL // 0x179e @0x5
0x1799…179f }
0x179f…17a5 a4fc 2300 ENDIF
0x179f…17a5 LineComalBin {
0x179f…17a5 ptr = 0xa4fc // 0x179f @0x0
0x179f…17a5 lno = 0x08fc // 0x17a1 @0x2
0x179f…17a5 at0004 = ╱9b╱ ENDIF ╱ // 0x17a3 @0x4
0x179f…17a5 at0005 = EOL // 0x17a4 @0x5
0x179f…17a5 }
0x17a5…17ce a525 2310 PUT K63$,X+G:FUKODE$,FÅDEBET$,FÅKREDIT$
0x17a5…17ce LineComalBin {
0x17a5…17ce ptr = 0xa525 // 0x17a5 @0x0
0x17a5…17ce lno = 0x0906 // 0x17a7 @0x2
0x17a5…17ce at0004 = ╱aa╱ PUT ╱ // 0x17a9 @0x4
0x17a5…17ce at0005 = ╱4b╱K╱ // 0x17aa @0x5
0x17a5…17ce at0006 = ╱36╱6╱ // 0x17ab @0x6
0x17a5…17ce at0007 = ╱33╱3╱ // 0x17ac @0x7
0x17a5…17ce at0008 = ╱ef╱$╱ // 0x17ad @0x8
0x17a5…17ce at0009 = ╱ec╱,╱ // 0x17ae @0x9
0x17a5…17ce at000a = ╱58╱X╱ // 0x17af @0xa
0x17a5…17ce at000b = ╱e2╱+╱ // 0x17b0 @0xb
0x17a5…17ce at000c = ╱47╱G╱ // 0x17b1 @0xc
0x17a5…17ce at000d = ╱f0╱:╱ // 0x17b2 @0xd
0x17a5…17ce at000e = ╱46╱F╱ // 0x17b3 @0xe
0x17a5…17ce at000f = ╱55╱U╱ // 0x17b4 @0xf
0x17a5…17ce at0010 = ╱4b╱K╱ // 0x17b5 @0x10
0x17a5…17ce at0011 = ╱4f╱O╱ // 0x17b6 @0x11
0x17a5…17ce at0012 = ╱44╱D╱ // 0x17b7 @0x12
0x17a5…17ce at0013 = ╱45╱E╱ // 0x17b8 @0x13
0x17a5…17ce at0014 = ╱ef╱$╱ // 0x17b9 @0x14
0x17a5…17ce at0015 = ╱ec╱,╱ // 0x17ba @0x15
0x17a5…17ce at0016 = ╱46╱F╱ // 0x17bb @0x16
0x17a5…17ce at0017 = ╱5d╱Å╱ // 0x17bc @0x17
0x17a5…17ce at0018 = ╱44╱D╱ // 0x17bd @0x18
0x17a5…17ce at0019 = ╱45╱E╱ // 0x17be @0x19
0x17a5…17ce at001a = ╱42╱B╱ // 0x17bf @0x1a
0x17a5…17ce at001b = ╱45╱E╱ // 0x17c0 @0x1b
0x17a5…17ce at001c = ╱54╱T╱ // 0x17c1 @0x1c
0x17a5…17ce at001d = ╱ef╱$╱ // 0x17c2 @0x1d
0x17a5…17ce at001e = ╱ec╱,╱ // 0x17c3 @0x1e
0x17a5…17ce at001f = ╱46╱F╱ // 0x17c4 @0x1f
0x17a5…17ce at0020 = ╱5d╱Å╱ // 0x17c5 @0x20
0x17a5…17ce at0021 = ╱4b╱K╱ // 0x17c6 @0x21
0x17a5…17ce at0022 = ╱52╱R╱ // 0x17c7 @0x22
0x17a5…17ce at0023 = ╱45╱E╱ // 0x17c8 @0x23
0x17a5…17ce at0024 = ╱44╱D╱ // 0x17c9 @0x24
0x17a5…17ce at0025 = ╱49╱I╱ // 0x17ca @0x25
0x17a5…17ce at0026 = ╱54╱T╱ // 0x17cb @0x26
0x17a5…17ce at0027 = ╱ef╱$╱ // 0x17cc @0x27
0x17a5…17ce at0028 = EOL // 0x17cd @0x28
0x17a5…17ce }
0x17ce…17ec a543 2320 EXEC FEJL(7,8,K63$)
0x17ce…17ec LineComalBin {
0x17ce…17ec ptr = 0xa543 // 0x17ce @0x0
0x17ce…17ec lno = 0x0910 // 0x17d0 @0x2
0x17ce…17ec at0004 = ╱9d╱ EXEC ╱ // 0x17d2 @0x4
0x17ce…17ec at0005 = ╱46╱F╱ // 0x17d3 @0x5
0x17ce…17ec at0006 = ╱45╱E╱ // 0x17d4 @0x6
0x17ce…17ec at0007 = ╱4a╱J╱ // 0x17d5 @0x7
0x17ce…17ec at0008 = ╱4c╱L╱ // 0x17d6 @0x8
0x17ce…17ec at0009 = ╱ed╱(╱ // 0x17d7 @0x9
0x17ce…17ec at000a = ╱37╱7╱ // 0x17d8 @0xa
0x17ce…17ec at000b = ╱fe0000e003╱ // 0x17d9 @0xb
0x17ce…17ec at0010 = ╱ec╱,╱ // 0x17de @0x10
0x17ce…17ec at0011 = ╱38╱8╱ // 0x17df @0x11
0x17ce…17ec at0012 = ╱fe00008004╱ // 0x17e0 @0x12
0x17ce…17ec at0017 = ╱ec╱,╱ // 0x17e5 @0x17
0x17ce…17ec at0018 = ╱4b╱K╱ // 0x17e6 @0x18
0x17ce…17ec at0019 = ╱36╱6╱ // 0x17e7 @0x19
0x17ce…17ec at001a = ╱33╱3╱ // 0x17e8 @0x1a
0x17ce…17ec at001b = ╱ef╱$╱ // 0x17e9 @0x1b
0x17ce…17ec at001c = ╱ee╱)╱ // 0x17ea @0x1c
0x17ce…17ec at001d = EOL // 0x17eb @0x1d
0x17ce…17ec }
0x17ec…17f4 a54b 2330 WHEN G
0x17ec…17f4 LineComalBin {
0x17ec…17f4 ptr = 0xa54b // 0x17ec @0x0
0x17ec…17f4 lno = 0x091a // 0x17ee @0x2
0x17ec…17f4 at0004 = ╱a301╱ WHEN ╱ // 0x17f0 @0x4
0x17ec…17f4 at0006 = ╱47╱G╱ // 0x17f2 @0x6
0x17ec…17f4 at0007 = EOL // 0x17f3 @0x7
0x17ec…17f4 }
0x17f4…1833 a58a 2340 GET K63$,X+E:KREBY$,KRELK$,KREGR$,KREPOSTNR,KSALDO1$,KSALDO2$
0x17f4…1833 LineComalBin {
0x17f4…1833 ptr = 0xa58a // 0x17f4 @0x0
0x17f4…1833 lno = 0x0924 // 0x17f6 @0x2
0x17f4…1833 at0004 = ╱a9╱ GET ╱ // 0x17f8 @0x4
0x17f4…1833 at0005 = ╱4b╱K╱ // 0x17f9 @0x5
0x17f4…1833 at0006 = ╱36╱6╱ // 0x17fa @0x6
0x17f4…1833 at0007 = ╱33╱3╱ // 0x17fb @0x7
0x17f4…1833 at0008 = ╱ef╱$╱ // 0x17fc @0x8
0x17f4…1833 at0009 = ╱ec╱,╱ // 0x17fd @0x9
0x17f4…1833 at000a = ╱58╱X╱ // 0x17fe @0xa
0x17f4…1833 at000b = ╱e2╱+╱ // 0x17ff @0xb
0x17f4…1833 at000c = ╱45╱E╱ // 0x1800 @0xc
0x17f4…1833 at000d = ╱f0╱:╱ // 0x1801 @0xd
0x17f4…1833 at000e = ╱4b╱K╱ // 0x1802 @0xe
0x17f4…1833 at000f = ╱52╱R╱ // 0x1803 @0xf
0x17f4…1833 at0010 = ╱45╱E╱ // 0x1804 @0x10
0x17f4…1833 at0011 = ╱42╱B╱ // 0x1805 @0x11
0x17f4…1833 at0012 = ╱59╱Y╱ // 0x1806 @0x12
0x17f4…1833 at0013 = ╱ef╱$╱ // 0x1807 @0x13
0x17f4…1833 at0014 = ╱ec╱,╱ // 0x1808 @0x14
0x17f4…1833 at0015 = ╱4b╱K╱ // 0x1809 @0x15
0x17f4…1833 at0016 = ╱52╱R╱ // 0x180a @0x16
0x17f4…1833 at0017 = ╱45╱E╱ // 0x180b @0x17
0x17f4…1833 at0018 = ╱4c╱L╱ // 0x180c @0x18
0x17f4…1833 at0019 = ╱4b╱K╱ // 0x180d @0x19
0x17f4…1833 at001a = ╱ef╱$╱ // 0x180e @0x1a
0x17f4…1833 at001b = ╱ec╱,╱ // 0x180f @0x1b
0x17f4…1833 at001c = ╱4b╱K╱ // 0x1810 @0x1c
0x17f4…1833 at001d = ╱52╱R╱ // 0x1811 @0x1d
0x17f4…1833 at001e = ╱45╱E╱ // 0x1812 @0x1e
0x17f4…1833 at001f = ╱47╱G╱ // 0x1813 @0x1f
0x17f4…1833 at0020 = ╱52╱R╱ // 0x1814 @0x20
0x17f4…1833 at0021 = ╱ef╱$╱ // 0x1815 @0x21
0x17f4…1833 at0022 = ╱ec╱,╱ // 0x1816 @0x22
0x17f4…1833 at0023 = ╱4b╱K╱ // 0x1817 @0x23
0x17f4…1833 at0024 = ╱52╱R╱ // 0x1818 @0x24
0x17f4…1833 at0025 = ╱45╱E╱ // 0x1819 @0x25
0x17f4…1833 at0026 = ╱50╱P╱ // 0x181a @0x26
0x17f4…1833 at0027 = ╱4f╱O╱ // 0x181b @0x27
0x17f4…1833 at0028 = ╱53╱S╱ // 0x181c @0x28
0x17f4…1833 at0029 = ╱54╱T╱ // 0x181d @0x29
0x17f4…1833 at002a = ╱4e╱N╱ // 0x181e @0x2a
0x17f4…1833 at002b = ╱52╱R╱ // 0x181f @0x2b
0x17f4…1833 at002c = ╱ec╱,╱ // 0x1820 @0x2c
0x17f4…1833 at002d = ╱4b╱K╱ // 0x1821 @0x2d
0x17f4…1833 at002e = ╱53╱S╱ // 0x1822 @0x2e
0x17f4…1833 at002f = ╱41╱A╱ // 0x1823 @0x2f
0x17f4…1833 at0030 = ╱4c╱L╱ // 0x1824 @0x30
0x17f4…1833 at0031 = ╱44╱D╱ // 0x1825 @0x31
0x17f4…1833 at0032 = ╱4f╱O╱ // 0x1826 @0x32
0x17f4…1833 at0033 = ╱31╱1╱ // 0x1827 @0x33
0x17f4…1833 at0034 = ╱ef╱$╱ // 0x1828 @0x34
0x17f4…1833 at0035 = ╱ec╱,╱ // 0x1829 @0x35
0x17f4…1833 at0036 = ╱4b╱K╱ // 0x182a @0x36
0x17f4…1833 at0037 = ╱53╱S╱ // 0x182b @0x37
0x17f4…1833 at0038 = ╱41╱A╱ // 0x182c @0x38
0x17f4…1833 at0039 = ╱4c╱L╱ // 0x182d @0x39
0x17f4…1833 at003a = ╱44╱D╱ // 0x182e @0x3a
0x17f4…1833 at003b = ╱4f╱O╱ // 0x182f @0x3b
0x17f4…1833 at003c = ╱32╱2╱ // 0x1830 @0x3c
0x17f4…1833 at003d = ╱ef╱$╱ // 0x1831 @0x3d
0x17f4…1833 at003e = EOL // 0x1832 @0x3e
0x17f4…1833 }
0x1833…1851 a5a8 2350 EXEC FEJL(7,5,K63$)
0x1833…1851 LineComalBin {
0x1833…1851 ptr = 0xa5a8 // 0x1833 @0x0
0x1833…1851 lno = 0x092e // 0x1835 @0x2
0x1833…1851 at0004 = ╱9d╱ EXEC ╱ // 0x1837 @0x4
0x1833…1851 at0005 = ╱46╱F╱ // 0x1838 @0x5
0x1833…1851 at0006 = ╱45╱E╱ // 0x1839 @0x6
0x1833…1851 at0007 = ╱4a╱J╱ // 0x183a @0x7
0x1833…1851 at0008 = ╱4c╱L╱ // 0x183b @0x8
0x1833…1851 at0009 = ╱ed╱(╱ // 0x183c @0x9
0x1833…1851 at000a = ╱37╱7╱ // 0x183d @0xa
0x1833…1851 at000b = ╱fe0000e003╱ // 0x183e @0xb
0x1833…1851 at0010 = ╱ec╱,╱ // 0x1843 @0x10
0x1833…1851 at0011 = ╱35╱5╱ // 0x1844 @0x11
0x1833…1851 at0012 = ╱fe0000a003╱ // 0x1845 @0x12
0x1833…1851 at0017 = ╱ec╱,╱ // 0x184a @0x17
0x1833…1851 at0018 = ╱4b╱K╱ // 0x184b @0x18
0x1833…1851 at0019 = ╱36╱6╱ // 0x184c @0x19
0x1833…1851 at001a = ╱33╱3╱ // 0x184d @0x1a
0x1833…1851 at001b = ╱ef╱$╱ // 0x184e @0x1b
0x1833…1851 at001c = ╱ee╱)╱ // 0x184f @0x1c
0x1833…1851 at001d = EOL // 0x1850 @0x1d
0x1833…1851 }
0x1851…186a a5c1 2360 GR=ORD(KREGR$)-48
0x1851…186a LineComalBin {
0x1851…186a ptr = 0xa5c1 // 0x1851 @0x0
0x1851…186a lno = 0x0938 // 0x1853 @0x2
0x1851…186a at0004 = ╱47╱G╱ // 0x1855 @0x4
0x1851…186a at0005 = ╱52╱R╱ // 0x1856 @0x5
0x1851…186a at0006 = ╱dc╱=╱ // 0x1857 @0x6
0x1851…186a at0007 = ╱cd╱ORD╱ // 0x1858 @0x7
0x1851…186a at0008 = ╱ed╱(╱ // 0x1859 @0x8
0x1851…186a at0009 = ╱4b╱K╱ // 0x185a @0x9
0x1851…186a at000a = ╱52╱R╱ // 0x185b @0xa
0x1851…186a at000b = ╱45╱E╱ // 0x185c @0xb
0x1851…186a at000c = ╱47╱G╱ // 0x185d @0xc
0x1851…186a at000d = ╱52╱R╱ // 0x185e @0xd
0x1851…186a at000e = ╱ef╱$╱ // 0x185f @0xe
0x1851…186a at000f = ╱ee╱)╱ // 0x1860 @0xf
0x1851…186a at0010 = ╱e3╱-╱ // 0x1861 @0x10
0x1851…186a at0011 = ╱34╱4╱ // 0x1862 @0x11
0x1851…186a at0012 = ╱38╱8╱ // 0x1863 @0x12
0x1851…186a at0013 = ╱fe0000c006╱ // 0x1864 @0x13
0x1851…186a at0018 = EOL // 0x1869 @0x18
0x1851…186a }
0x186a…1890 a5e7 2370 EXEC CALC(B,KSALDO1$,KSALDO2$,SALDO$)
0x186a…1890 LineComalBin {
0x186a…1890 ptr = 0xa5e7 // 0x186a @0x0
0x186a…1890 lno = 0x0942 // 0x186c @0x2
0x186a…1890 at0004 = ╱9d╱ EXEC ╱ // 0x186e @0x4
0x186a…1890 at0005 = ╱43╱C╱ // 0x186f @0x5
0x186a…1890 at0006 = ╱41╱A╱ // 0x1870 @0x6
0x186a…1890 at0007 = ╱4c╱L╱ // 0x1871 @0x7
0x186a…1890 at0008 = ╱43╱C╱ // 0x1872 @0x8
0x186a…1890 at0009 = ╱ed╱(╱ // 0x1873 @0x9
0x186a…1890 at000a = ╱42╱B╱ // 0x1874 @0xa
0x186a…1890 at000b = ╱ec╱,╱ // 0x1875 @0xb
0x186a…1890 at000c = ╱4b╱K╱ // 0x1876 @0xc
0x186a…1890 at000d = ╱53╱S╱ // 0x1877 @0xd
0x186a…1890 at000e = ╱41╱A╱ // 0x1878 @0xe
0x186a…1890 at000f = ╱4c╱L╱ // 0x1879 @0xf
0x186a…1890 at0010 = ╱44╱D╱ // 0x187a @0x10
0x186a…1890 at0011 = ╱4f╱O╱ // 0x187b @0x11
0x186a…1890 at0012 = ╱31╱1╱ // 0x187c @0x12
0x186a…1890 at0013 = ╱ef╱$╱ // 0x187d @0x13
0x186a…1890 at0014 = ╱ec╱,╱ // 0x187e @0x14
0x186a…1890 at0015 = ╱4b╱K╱ // 0x187f @0x15
0x186a…1890 at0016 = ╱53╱S╱ // 0x1880 @0x16
0x186a…1890 at0017 = ╱41╱A╱ // 0x1881 @0x17
0x186a…1890 at0018 = ╱4c╱L╱ // 0x1882 @0x18
0x186a…1890 at0019 = ╱44╱D╱ // 0x1883 @0x19
0x186a…1890 at001a = ╱4f╱O╱ // 0x1884 @0x1a
0x186a…1890 at001b = ╱32╱2╱ // 0x1885 @0x1b
0x186a…1890 at001c = ╱ef╱$╱ // 0x1886 @0x1c
0x186a…1890 at001d = ╱ec╱,╱ // 0x1887 @0x1d
0x186a…1890 at001e = ╱53╱S╱ // 0x1888 @0x1e
0x186a…1890 at001f = ╱41╱A╱ // 0x1889 @0x1f
0x186a…1890 at0020 = ╱4c╱L╱ // 0x188a @0x20
0x186a…1890 at0021 = ╱44╱D╱ // 0x188b @0x21
0x186a…1890 at0022 = ╱4f╱O╱ // 0x188c @0x22
0x186a…1890 at0023 = ╱ef╱$╱ // 0x188d @0x23
0x186a…1890 at0024 = ╱ee╱)╱ // 0x188e @0x24
0x186a…1890 at0025 = EOL // 0x188f @0x25
0x186a…1890 }
0x1890…18bc a613 2380 EXEC CALC(B,KSALDI$(GR),SALDO$,KSALDI$(GR))
0x1890…18bc LineComalBin {
0x1890…18bc ptr = 0xa613 // 0x1890 @0x0
0x1890…18bc lno = 0x094c // 0x1892 @0x2
0x1890…18bc at0004 = ╱9d╱ EXEC ╱ // 0x1894 @0x4
0x1890…18bc at0005 = ╱43╱C╱ // 0x1895 @0x5
0x1890…18bc at0006 = ╱41╱A╱ // 0x1896 @0x6
0x1890…18bc at0007 = ╱4c╱L╱ // 0x1897 @0x7
0x1890…18bc at0008 = ╱43╱C╱ // 0x1898 @0x8
0x1890…18bc at0009 = ╱ed╱(╱ // 0x1899 @0x9
0x1890…18bc at000a = ╱42╱B╱ // 0x189a @0xa
0x1890…18bc at000b = ╱ec╱,╱ // 0x189b @0xb
0x1890…18bc at000c = ╱4b╱K╱ // 0x189c @0xc
0x1890…18bc at000d = ╱53╱S╱ // 0x189d @0xd
0x1890…18bc at000e = ╱41╱A╱ // 0x189e @0xe
0x1890…18bc at000f = ╱4c╱L╱ // 0x189f @0xf
0x1890…18bc at0010 = ╱44╱D╱ // 0x18a0 @0x10
0x1890…18bc at0011 = ╱49╱I╱ // 0x18a1 @0x11
0x1890…18bc at0012 = ╱ef╱$╱ // 0x18a2 @0x12
0x1890…18bc at0013 = ╱ed╱(╱ // 0x18a3 @0x13
0x1890…18bc at0014 = ╱47╱G╱ // 0x18a4 @0x14
0x1890…18bc at0015 = ╱52╱R╱ // 0x18a5 @0x15
0x1890…18bc at0016 = ╱ee╱)╱ // 0x18a6 @0x16
0x1890…18bc at0017 = ╱ec╱,╱ // 0x18a7 @0x17
0x1890…18bc at0018 = ╱53╱S╱ // 0x18a8 @0x18
0x1890…18bc at0019 = ╱41╱A╱ // 0x18a9 @0x19
0x1890…18bc at001a = ╱4c╱L╱ // 0x18aa @0x1a
0x1890…18bc at001b = ╱44╱D╱ // 0x18ab @0x1b
0x1890…18bc at001c = ╱4f╱O╱ // 0x18ac @0x1c
0x1890…18bc at001d = ╱ef╱$╱ // 0x18ad @0x1d
0x1890…18bc at001e = ╱ec╱,╱ // 0x18ae @0x1e
0x1890…18bc at001f = ╱4b╱K╱ // 0x18af @0x1f
0x1890…18bc at0020 = ╱53╱S╱ // 0x18b0 @0x20
0x1890…18bc at0021 = ╱41╱A╱ // 0x18b1 @0x21
0x1890…18bc at0022 = ╱4c╱L╱ // 0x18b2 @0x22
0x1890…18bc at0023 = ╱44╱D╱ // 0x18b3 @0x23
0x1890…18bc at0024 = ╱49╱I╱ // 0x18b4 @0x24
0x1890…18bc at0025 = ╱ef╱$╱ // 0x18b5 @0x25
0x1890…18bc at0026 = ╱ed╱(╱ // 0x18b6 @0x26
0x1890…18bc at0027 = ╱47╱G╱ // 0x18b7 @0x27
0x1890…18bc at0028 = ╱52╱R╱ // 0x18b8 @0x28
0x1890…18bc at0029 = ╱ee╱)╱ // 0x18b9 @0x29
0x1890…18bc at002a = ╱ee╱)╱ // 0x18ba @0x2a
0x1890…18bc at002b = EOL // 0x18bb @0x2b
0x1890…18bc }
0x18bc…18c2 a619 2390 ENDCASE
0x18bc…18c2 LineComalBin {
0x18bc…18c2 ptr = 0xa619 // 0x18bc @0x0
0x18bc…18c2 lno = 0x0956 // 0x18be @0x2
0x18bc…18c2 at0004 = ╱a4╱ ENDCASE ╱ // 0x18c0 @0x4
0x18bc…18c2 at0005 = EOL // 0x18c1 @0x5
0x18bc…18c2 }
0x18c2…18c9 a620 2400 NEXT I
0x18c2…18c9 LineComalBin {
0x18c2…18c9 ptr = 0xa620 // 0x18c2 @0x0
0x18c2…18c9 lno = 0x0960 // 0x18c4 @0x2
0x18c2…18c9 at0004 = ╱84╱ NEXT ╱ // 0x18c6 @0x4
0x18c2…18c9 at0005 = ╱49╱I╱ // 0x18c7 @0x5
0x18c2…18c9 at0006 = EOL // 0x18c8 @0x6
0x18c2…18c9 }
0x18c9…18f4 a64b 2410 IF TAB1(I-E*(I=5),E)=1000000 THEN EXIT
0x18c9…18f4 LineComalBin {
0x18c9…18f4 ptr = 0xa64b // 0x18c9 @0x0
0x18c9…18f4 lno = 0x096a // 0x18cb @0x2
0x18c9…18f4 at0004 = ╱82╱ IF ╱ // 0x18cd @0x4
0x18c9…18f4 at0005 = ╱54╱T╱ // 0x18ce @0x5
0x18c9…18f4 at0006 = ╱41╱A╱ // 0x18cf @0x6
0x18c9…18f4 at0007 = ╱42╱B╱ // 0x18d0 @0x7
0x18c9…18f4 at0008 = ╱31╱1╱ // 0x18d1 @0x8
0x18c9…18f4 at0009 = ╱ed╱(╱ // 0x18d2 @0x9
0x18c9…18f4 at000a = ╱49╱I╱ // 0x18d3 @0xa
0x18c9…18f4 at000b = ╱e3╱-╱ // 0x18d4 @0xb
0x18c9…18f4 at000c = ╱45╱E╱ // 0x18d5 @0xc
0x18c9…18f4 at000d = ╱e4╱*╱ // 0x18d6 @0xd
0x18c9…18f4 at000e = ╱ed╱(╱ // 0x18d7 @0xe
0x18c9…18f4 at000f = ╱49╱I╱ // 0x18d8 @0xf
0x18c9…18f4 at0010 = ╱dc╱=╱ // 0x18d9 @0x10
0x18c9…18f4 at0011 = ╱35╱5╱ // 0x18da @0x11
0x18c9…18f4 at0012 = ╱fe0000a003╱ // 0x18db @0x12
0x18c9…18f4 at0017 = ╱ee╱)╱ // 0x18e0 @0x17
0x18c9…18f4 at0018 = ╱ec╱,╱ // 0x18e1 @0x18
0x18c9…18f4 at0019 = ╱45╱E╱ // 0x18e2 @0x19
0x18c9…18f4 at001a = ╱ee╱)╱ // 0x18e3 @0x1a
0x18c9…18f4 at001b = ╱dc╱=╱ // 0x18e4 @0x1b
0x18c9…18f4 at001c = ╱31╱1╱ // 0x18e5 @0x1c
0x18c9…18f4 at001d = ╱30╱0╱ // 0x18e6 @0x1d
0x18c9…18f4 at001e = ╱30╱0╱ // 0x18e7 @0x1e
0x18c9…18f4 at001f = ╱30╱0╱ // 0x18e8 @0x1f
0x18c9…18f4 at0020 = ╱30╱0╱ // 0x18e9 @0x20
0x18c9…18f4 at0021 = ╱30╱0╱ // 0x18ea @0x21
0x18c9…18f4 at0022 = ╱30╱0╱ // 0x18eb @0x22
0x18c9…18f4 at0023 = ╱fe0024f414╱ // 0x18ec @0x23
0x18c9…18f4 at0028 = ╱b6╱ THEN ╱ // 0x18f1 @0x28
0x18c9…18f4 at0029 = ╱99╱ EXIT ╱ // 0x18f2 @0x29
0x18c9…18f4 at002a = EOL // 0x18f3 @0x2a
0x18c9…18f4 }
0x18f4…18fb a652 2420 NEXT J
0x18f4…18fb LineComalBin {
0x18f4…18fb ptr = 0xa652 // 0x18f4 @0x0
0x18f4…18fb lno = 0x0974 // 0x18f6 @0x2
0x18f4…18fb at0004 = ╱84╱ NEXT ╱ // 0x18f8 @0x4
0x18f4…18fb at0005 = ╱4a╱J╱ // 0x18f9 @0x5
0x18f4…18fb at0006 = EOL // 0x18fa @0x6
0x18f4…18fb }
0x18fb…1905 a65c 2430 CLOSE K63$
0x18fb…1905 LineComalBin {
0x18fb…1905 ptr = 0xa65c // 0x18fb @0x0
0x18fb…1905 lno = 0x097e // 0x18fd @0x2
0x18fb…1905 at0004 = ╱a8╱ CLOSE ╱ // 0x18ff @0x4
0x18fb…1905 at0005 = ╱4b╱K╱ // 0x1900 @0x5
0x18fb…1905 at0006 = ╱36╱6╱ // 0x1901 @0x6
0x18fb…1905 at0007 = ╱33╱3╱ // 0x1902 @0x7
0x18fb…1905 at0008 = ╱ef╱$╱ // 0x1903 @0x8
0x18fb…1905 at0009 = EOL // 0x1904 @0x9
0x18fb…1905 }
0x1905…191f a676 2440 EXEC FEJL(G,22,K63$)
0x1905…191f LineComalBin {
0x1905…191f ptr = 0xa676 // 0x1905 @0x0
0x1905…191f lno = 0x0988 // 0x1907 @0x2
0x1905…191f at0004 = ╱9d╱ EXEC ╱ // 0x1909 @0x4
0x1905…191f at0005 = ╱46╱F╱ // 0x190a @0x5
0x1905…191f at0006 = ╱45╱E╱ // 0x190b @0x6
0x1905…191f at0007 = ╱4a╱J╱ // 0x190c @0x7
0x1905…191f at0008 = ╱4c╱L╱ // 0x190d @0x8
0x1905…191f at0009 = ╱ed╱(╱ // 0x190e @0x9
0x1905…191f at000a = ╱47╱G╱ // 0x190f @0xa
0x1905…191f at000b = ╱ec╱,╱ // 0x1910 @0xb
0x1905…191f at000c = ╱32╱2╱ // 0x1911 @0xc
0x1905…191f at000d = ╱32╱2╱ // 0x1912 @0xd
0x1905…191f at000e = ╱fe0000b005╱ // 0x1913 @0xe
0x1905…191f at0013 = ╱ec╱,╱ // 0x1918 @0x13
0x1905…191f at0014 = ╱4b╱K╱ // 0x1919 @0x14
0x1905…191f at0015 = ╱36╱6╱ // 0x191a @0x15
0x1905…191f at0016 = ╱33╱3╱ // 0x191b @0x16
0x1905…191f at0017 = ╱ef╱$╱ // 0x191c @0x17
0x1905…191f at0018 = ╱ee╱)╱ // 0x191d @0x18
0x1905…191f at0019 = EOL // 0x191e @0x19
0x1905…191f }
0x191f…1925 a67c 2450 ENDPROC
0x191f…1925 LineComalBin {
0x191f…1925 ptr = 0xa67c // 0x191f @0x0
0x191f…1925 lno = 0x0992 // 0x1921 @0x2
0x191f…1925 at0004 = ╱9f╱ ENDPROC ╱ // 0x1923 @0x4
0x191f…1925 at0005 = EOL // 0x1924 @0x5
0x191f…1925 }
0x1925…193c a693 2460 PROC FEJL(NR1,NR2,NR3)
0x1925…193c LineComalBin {
0x1925…193c ptr = 0xa693 // 0x1925 @0x0
0x1925…193c lno = 0x099c // 0x1927 @0x2
0x1925…193c at0004 = ╱9e╱ PROC ╱ // 0x1929 @0x4
0x1925…193c at0005 = ╱46╱F╱ // 0x192a @0x5
0x1925…193c at0006 = ╱45╱E╱ // 0x192b @0x6
0x1925…193c at0007 = ╱4a╱J╱ // 0x192c @0x7
0x1925…193c at0008 = ╱4c╱L╱ // 0x192d @0x8
0x1925…193c at0009 = ╱ed╱(╱ // 0x192e @0x9
0x1925…193c at000a = ╱4e╱N╱ // 0x192f @0xa
0x1925…193c at000b = ╱52╱R╱ // 0x1930 @0xb
0x1925…193c at000c = ╱31╱1╱ // 0x1931 @0xc
0x1925…193c at000d = ╱ec╱,╱ // 0x1932 @0xd
0x1925…193c at000e = ╱4e╱N╱ // 0x1933 @0xe
0x1925…193c at000f = ╱52╱R╱ // 0x1934 @0xf
0x1925…193c at0010 = ╱32╱2╱ // 0x1935 @0x10
0x1925…193c at0011 = ╱ec╱,╱ // 0x1936 @0x11
0x1925…193c at0012 = ╱4e╱N╱ // 0x1937 @0x12
0x1925…193c at0013 = ╱52╱R╱ // 0x1938 @0x13
0x1925…193c at0014 = ╱33╱3╱ // 0x1939 @0x14
0x1925…193c at0015 = ╱ee╱)╱ // 0x193a @0x15
0x1925…193c at0016 = EOL // 0x193b @0x16
0x1925…193c }
0x193c…194c a6a3 2470 IF STATUS(NR3$)<>B THEN
0x193c…194c LineComalBin {
0x193c…194c ptr = 0xa6a3 // 0x193c @0x0
0x193c…194c lno = 0x09a6 // 0x193e @0x2
0x193c…194c at0004 = ╱9c╱ IF ╱ // 0x1940 @0x4
0x193c…194c at0005 = ╱ce╱STATUS╱ // 0x1941 @0x5
0x193c…194c at0006 = ╱ed╱(╱ // 0x1942 @0x6
0x193c…194c at0007 = ╱4e╱N╱ // 0x1943 @0x7
0x193c…194c at0008 = ╱52╱R╱ // 0x1944 @0x8
0x193c…194c at0009 = ╱33╱3╱ // 0x1945 @0x9
0x193c…194c at000a = ╱ef╱$╱ // 0x1946 @0xa
0x193c…194c at000b = ╱ee╱)╱ // 0x1947 @0xb
0x193c…194c at000c = ╱e1╱<>╱ // 0x1948 @0xc
0x193c…194c at000d = ╱42╱B╱ // 0x1949 @0xd
0x193c…194c at000e = ╱b6╱ THEN ╱ // 0x194a @0xe
0x193c…194c at000f = EOL // 0x194b @0xf
0x193c…194c }
0x194c…1966 a6bd 2480 PRINT STATUS(NR3$),NR1,NR2,NR3$
0x194c…1966 LineComalBin {
0x194c…1966 ptr = 0xa6bd // 0x194c @0x0
0x194c…1966 lno = 0x09b0 // 0x194e @0x2
0x194c…1966 at0004 = ╱92╱ PRINT ╱ // 0x1950 @0x4
0x194c…1966 at0005 = ╱ce╱STATUS╱ // 0x1951 @0x5
0x194c…1966 at0006 = ╱ed╱(╱ // 0x1952 @0x6
0x194c…1966 at0007 = ╱4e╱N╱ // 0x1953 @0x7
0x194c…1966 at0008 = ╱52╱R╱ // 0x1954 @0x8
0x194c…1966 at0009 = ╱33╱3╱ // 0x1955 @0x9
0x194c…1966 at000a = ╱ef╱$╱ // 0x1956 @0xa
0x194c…1966 at000b = ╱ee╱)╱ // 0x1957 @0xb
0x194c…1966 at000c = ╱ec╱,╱ // 0x1958 @0xc
0x194c…1966 at000d = ╱4e╱N╱ // 0x1959 @0xd
0x194c…1966 at000e = ╱52╱R╱ // 0x195a @0xe
0x194c…1966 at000f = ╱31╱1╱ // 0x195b @0xf
0x194c…1966 at0010 = ╱ec╱,╱ // 0x195c @0x10
0x194c…1966 at0011 = ╱4e╱N╱ // 0x195d @0x11
0x194c…1966 at0012 = ╱52╱R╱ // 0x195e @0x12
0x194c…1966 at0013 = ╱32╱2╱ // 0x195f @0x13
0x194c…1966 at0014 = ╱ec╱,╱ // 0x1960 @0x14
0x194c…1966 at0015 = ╱4e╱N╱ // 0x1961 @0x15
0x194c…1966 at0016 = ╱52╱R╱ // 0x1962 @0x16
0x194c…1966 at0017 = ╱33╱3╱ // 0x1963 @0x17
0x194c…1966 at0018 = ╱ef╱$╱ // 0x1964 @0x18
0x194c…1966 at0019 = EOL // 0x1965 @0x19
0x194c…1966 }
0x1966…196c a6c3 2490 STOP
0x1966…196c LineComalBin {
0x1966…196c ptr = 0xa6c3 // 0x1966 @0x0
0x1966…196c lno = 0x09ba // 0x1968 @0x2
0x1966…196c at0004 = ╱8d╱ STOP ╱ // 0x196a @0x4
0x1966…196c at0005 = EOL // 0x196b @0x5
0x1966…196c }
0x196c…1972 a6c9 2500 ENDIF
0x196c…1972 LineComalBin {
0x196c…1972 ptr = 0xa6c9 // 0x196c @0x0
0x196c…1972 lno = 0x09c4 // 0x196e @0x2
0x196c…1972 at0004 = ╱9b╱ ENDIF ╱ // 0x1970 @0x4
0x196c…1972 at0005 = EOL // 0x1971 @0x5
0x196c…1972 }
0x1972…1978 a6cf 2510 ENDPROC
0x1972…1978 LineComalBin {
0x1972…1978 ptr = 0xa6cf // 0x1972 @0x0
0x1972…1978 lno = 0x09ce // 0x1974 @0x2
0x1972…1978 at0004 = ╱9f╱ ENDPROC ╱ // 0x1976 @0x4
0x1972…1978 at0005 = EOL // 0x1977 @0x5
0x1972…1978 }
0x1978…1997 a6ee 2520 PROC TUD(BLB1,UBLB1,TEGN,STØR)
0x1978…1997 LineComalBin {
0x1978…1997 ptr = 0xa6ee // 0x1978 @0x0
0x1978…1997 lno = 0x09d8 // 0x197a @0x2
0x1978…1997 at0004 = ╱9e╱ PROC ╱ // 0x197c @0x4
0x1978…1997 at0005 = ╱54╱T╱ // 0x197d @0x5
0x1978…1997 at0006 = ╱55╱U╱ // 0x197e @0x6
0x1978…1997 at0007 = ╱44╱D╱ // 0x197f @0x7
0x1978…1997 at0008 = ╱ed╱(╱ // 0x1980 @0x8
0x1978…1997 at0009 = ╱42╱B╱ // 0x1981 @0x9
0x1978…1997 at000a = ╱4c╱L╱ // 0x1982 @0xa
0x1978…1997 at000b = ╱42╱B╱ // 0x1983 @0xb
0x1978…1997 at000c = ╱31╱1╱ // 0x1984 @0xc
0x1978…1997 at000d = ╱ec╱,╱ // 0x1985 @0xd
0x1978…1997 at000e = ╱55╱U╱ // 0x1986 @0xe
0x1978…1997 at000f = ╱42╱B╱ // 0x1987 @0xf
0x1978…1997 at0010 = ╱4c╱L╱ // 0x1988 @0x10
0x1978…1997 at0011 = ╱42╱B╱ // 0x1989 @0x11
0x1978…1997 at0012 = ╱31╱1╱ // 0x198a @0x12
0x1978…1997 at0013 = ╱ec╱,╱ // 0x198b @0x13
0x1978…1997 at0014 = ╱54╱T╱ // 0x198c @0x14
0x1978…1997 at0015 = ╱45╱E╱ // 0x198d @0x15
0x1978…1997 at0016 = ╱47╱G╱ // 0x198e @0x16
0x1978…1997 at0017 = ╱4e╱N╱ // 0x198f @0x17
0x1978…1997 at0018 = ╱ec╱,╱ // 0x1990 @0x18
0x1978…1997 at0019 = ╱53╱S╱ // 0x1991 @0x19
0x1978…1997 at001a = ╱54╱T╱ // 0x1992 @0x1a
0x1978…1997 at001b = ╱5c╱Ø╱ // 0x1993 @0x1b
0x1978…1997 at001c = ╱52╱R╱ // 0x1994 @0x1c
0x1978…1997 at001d = ╱ee╱)╱ // 0x1995 @0x1d
0x1978…1997 at001e = EOL // 0x1996 @0x1e
0x1978…1997 }
0x1997…19a7 a6fe 2530 BLB2$=BLB1$
0x1997…19a7 LineComalBin {
0x1997…19a7 ptr = 0xa6fe // 0x1997 @0x0
0x1997…19a7 lno = 0x09e2 // 0x1999 @0x2
0x1997…19a7 at0004 = ╱42╱B╱ // 0x199b @0x4
0x1997…19a7 at0005 = ╱4c╱L╱ // 0x199c @0x5
0x1997…19a7 at0006 = ╱42╱B╱ // 0x199d @0x6
0x1997…19a7 at0007 = ╱32╱2╱ // 0x199e @0x7
0x1997…19a7 at0008 = ╱ef╱$╱ // 0x199f @0x8
0x1997…19a7 at0009 = ╱dc╱=╱ // 0x19a0 @0x9
0x1997…19a7 at000a = ╱42╱B╱ // 0x19a1 @0xa
0x1997…19a7 at000b = ╱4c╱L╱ // 0x19a2 @0xb
0x1997…19a7 at000c = ╱42╱B╱ // 0x19a3 @0xc
0x1997…19a7 at000d = ╱31╱1╱ // 0x19a4 @0xd
0x1997…19a7 at000e = ╱ef╱$╱ // 0x19a5 @0xe
0x1997…19a7 at000f = EOL // 0x19a6 @0xf
0x1997…19a7 }
0x19a7…19cc a723 2540 EXEC CALC(5,BLB2$,TAL4$,UBLB1$)
0x19a7…19cc LineComalBin {
0x19a7…19cc ptr = 0xa723 // 0x19a7 @0x0
0x19a7…19cc lno = 0x09ec // 0x19a9 @0x2
0x19a7…19cc at0004 = ╱9d╱ EXEC ╱ // 0x19ab @0x4
0x19a7…19cc at0005 = ╱43╱C╱ // 0x19ac @0x5
0x19a7…19cc at0006 = ╱41╱A╱ // 0x19ad @0x6
0x19a7…19cc at0007 = ╱4c╱L╱ // 0x19ae @0x7
0x19a7…19cc at0008 = ╱43╱C╱ // 0x19af @0x8
0x19a7…19cc at0009 = ╱ed╱(╱ // 0x19b0 @0x9
0x19a7…19cc at000a = ╱35╱5╱ // 0x19b1 @0xa
0x19a7…19cc at000b = ╱fe0000a003╱ // 0x19b2 @0xb
0x19a7…19cc at0010 = ╱ec╱,╱ // 0x19b7 @0x10
0x19a7…19cc at0011 = ╱42╱B╱ // 0x19b8 @0x11
0x19a7…19cc at0012 = ╱4c╱L╱ // 0x19b9 @0x12
0x19a7…19cc at0013 = ╱42╱B╱ // 0x19ba @0x13
0x19a7…19cc at0014 = ╱32╱2╱ // 0x19bb @0x14
0x19a7…19cc at0015 = ╱ef╱$╱ // 0x19bc @0x15
0x19a7…19cc at0016 = ╱ec╱,╱ // 0x19bd @0x16
0x19a7…19cc at0017 = ╱54╱T╱ // 0x19be @0x17
0x19a7…19cc at0018 = ╱41╱A╱ // 0x19bf @0x18
0x19a7…19cc at0019 = ╱4c╱L╱ // 0x19c0 @0x19
0x19a7…19cc at001a = ╱34╱4╱ // 0x19c1 @0x1a
0x19a7…19cc at001b = ╱ef╱$╱ // 0x19c2 @0x1b
0x19a7…19cc at001c = ╱ec╱,╱ // 0x19c3 @0x1c
0x19a7…19cc at001d = ╱55╱U╱ // 0x19c4 @0x1d
0x19a7…19cc at001e = ╱42╱B╱ // 0x19c5 @0x1e
0x19a7…19cc at001f = ╱4c╱L╱ // 0x19c6 @0x1f
0x19a7…19cc at0020 = ╱42╱B╱ // 0x19c7 @0x20
0x19a7…19cc at0021 = ╱31╱1╱ // 0x19c8 @0x21
0x19a7…19cc at0022 = ╱ef╱$╱ // 0x19c9 @0x22
0x19a7…19cc at0023 = ╱ee╱)╱ // 0x19ca @0x23
0x19a7…19cc at0024 = EOL // 0x19cb @0x24
0x19a7…19cc }
0x19cc…19d9 a730 2550 IF TEGN=B THEN
0x19cc…19d9 LineComalBin {
0x19cc…19d9 ptr = 0xa730 // 0x19cc @0x0
0x19cc…19d9 lno = 0x09f6 // 0x19ce @0x2
0x19cc…19d9 at0004 = ╱9c╱ IF ╱ // 0x19d0 @0x4
0x19cc…19d9 at0005 = ╱54╱T╱ // 0x19d1 @0x5
0x19cc…19d9 at0006 = ╱45╱E╱ // 0x19d2 @0x6
0x19cc…19d9 at0007 = ╱47╱G╱ // 0x19d3 @0x7
0x19cc…19d9 at0008 = ╱4e╱N╱ // 0x19d4 @0x8
0x19cc…19d9 at0009 = ╱dc╱=╱ // 0x19d5 @0x9
0x19cc…19d9 at000a = ╱42╱B╱ // 0x19d6 @0xa
0x19cc…19d9 at000b = ╱b6╱ THEN ╱ // 0x19d7 @0xb
0x19cc…19d9 at000c = EOL // 0x19d8 @0xc
0x19cc…19d9 }
0x19d9…19f6 a74d 2560 UBLB1$=UBLB1$(E:13)
0x19d9…19f6 LineComalBin {
0x19d9…19f6 ptr = 0xa74d // 0x19d9 @0x0
0x19d9…19f6 lno = 0x0a00 // 0x19db @0x2
0x19d9…19f6 at0004 = ╱55╱U╱ // 0x19dd @0x4
0x19d9…19f6 at0005 = ╱42╱B╱ // 0x19de @0x5
0x19d9…19f6 at0006 = ╱4c╱L╱ // 0x19df @0x6
0x19d9…19f6 at0007 = ╱42╱B╱ // 0x19e0 @0x7
0x19d9…19f6 at0008 = ╱31╱1╱ // 0x19e1 @0x8
0x19d9…19f6 at0009 = ╱ef╱$╱ // 0x19e2 @0x9
0x19d9…19f6 at000a = ╱dc╱=╱ // 0x19e3 @0xa
0x19d9…19f6 at000b = ╱55╱U╱ // 0x19e4 @0xb
0x19d9…19f6 at000c = ╱42╱B╱ // 0x19e5 @0xc
0x19d9…19f6 at000d = ╱4c╱L╱ // 0x19e6 @0xd
0x19d9…19f6 at000e = ╱42╱B╱ // 0x19e7 @0xe
0x19d9…19f6 at000f = ╱31╱1╱ // 0x19e8 @0xf
0x19d9…19f6 at0010 = ╱ef╱$╱ // 0x19e9 @0x10
0x19d9…19f6 at0011 = ╱ed╱(╱ // 0x19ea @0x11
0x19d9…19f6 at0012 = ╱45╱E╱ // 0x19eb @0x12
0x19d9…19f6 at0013 = ╱f0╱:╱ // 0x19ec @0x13
0x19d9…19f6 at0014 = ╱31╱1╱ // 0x19ed @0x14
0x19d9…19f6 at0015 = ╱33╱3╱ // 0x19ee @0x15
0x19d9…19f6 at0016 = ╱fe0000d004╱ // 0x19ef @0x16
0x19d9…19f6 at001b = ╱ee╱)╱ // 0x19f4 @0x1b
0x19d9…19f6 at001c = EOL // 0x19f5 @0x1c
0x19d9…19f6 }
0x19f6…19fc a753 2570 ELSE
0x19f6…19fc LineComalBin {
0x19f6…19fc ptr = 0xa753 // 0x19f6 @0x0
0x19f6…19fc lno = 0x0a0a // 0x19f8 @0x2
0x19f6…19fc at0004 = ╱9a╱ ELSE ╱ // 0x19fa @0x4
0x19f6…19fc at0005 = EOL // 0x19fb @0x5
0x19f6…19fc }
0x19fc…1a1f a776 2580 IF TEGN=E AND UBLB1$(LEN(UBLB1$))="+" THEN
0x19fc…1a1f LineComalBin {
0x19fc…1a1f ptr = 0xa776 // 0x19fc @0x0
0x19fc…1a1f lno = 0x0a14 // 0x19fe @0x2
0x19fc…1a1f at0004 = ╱9c╱ IF ╱ // 0x1a00 @0x4
0x19fc…1a1f at0005 = ╱54╱T╱ // 0x1a01 @0x5
0x19fc…1a1f at0006 = ╱45╱E╱ // 0x1a02 @0x6
0x19fc…1a1f at0007 = ╱47╱G╱ // 0x1a03 @0x7
0x19fc…1a1f at0008 = ╱4e╱N╱ // 0x1a04 @0x8
0x19fc…1a1f at0009 = ╱dc╱=╱ // 0x1a05 @0x9
0x19fc…1a1f at000a = ╱45╱E╱ // 0x1a06 @0xa
0x19fc…1a1f at000b = ╱da╱ AND ╱ // 0x1a07 @0xb
0x19fc…1a1f at000c = ╱55╱U╱ // 0x1a08 @0xc
0x19fc…1a1f at000d = ╱42╱B╱ // 0x1a09 @0xd
0x19fc…1a1f at000e = ╱4c╱L╱ // 0x1a0a @0xe
0x19fc…1a1f at000f = ╱42╱B╱ // 0x1a0b @0xf
0x19fc…1a1f at0010 = ╱31╱1╱ // 0x1a0c @0x10
0x19fc…1a1f at0011 = ╱ef╱$╱ // 0x1a0d @0x11
0x19fc…1a1f at0012 = ╱ed╱(╱ // 0x1a0e @0x12
0x19fc…1a1f at0013 = ╱cc╱LEN╱ // 0x1a0f @0x13
0x19fc…1a1f at0014 = ╱ed╱(╱ // 0x1a10 @0x14
0x19fc…1a1f at0015 = ╱55╱U╱ // 0x1a11 @0x15
0x19fc…1a1f at0016 = ╱42╱B╱ // 0x1a12 @0x16
0x19fc…1a1f at0017 = ╱4c╱L╱ // 0x1a13 @0x17
0x19fc…1a1f at0018 = ╱42╱B╱ // 0x1a14 @0x18
0x19fc…1a1f at0019 = ╱31╱1╱ // 0x1a15 @0x19
0x19fc…1a1f at001a = ╱ef╱$╱ // 0x1a16 @0x1a
0x19fc…1a1f at001b = ╱ee╱)╱ // 0x1a17 @0x1b
0x19fc…1a1f at001c = ╱ee╱)╱ // 0x1a18 @0x1c
0x19fc…1a1f at001d = ╱dc╱=╱ // 0x1a19 @0x1d
0x19fc…1a1f at001e = ╱22╱"╱ // 0x1a1a @0x1e
0x19fc…1a1f at001f = ╱2b╱+╱ // 0x1a1b @0x1f
0x19fc…1a1f at0020 = ╱22╱"╱ // 0x1a1c @0x20
0x19fc…1a1f at0021 = ╱b6╱ THEN ╱ // 0x1a1d @0x21
0x19fc…1a1f at0022 = EOL // 0x1a1e @0x22
0x19fc…1a1f }
0x1a1f…1a39 a790 2590 UBLB1$(LEN(UBLB1$))=" "
0x1a1f…1a39 LineComalBin {
0x1a1f…1a39 ptr = 0xa790 // 0x1a1f @0x0
0x1a1f…1a39 lno = 0x0a1e // 0x1a21 @0x2
0x1a1f…1a39 at0004 = ╱55╱U╱ // 0x1a23 @0x4
0x1a1f…1a39 at0005 = ╱42╱B╱ // 0x1a24 @0x5
0x1a1f…1a39 at0006 = ╱4c╱L╱ // 0x1a25 @0x6
0x1a1f…1a39 at0007 = ╱42╱B╱ // 0x1a26 @0x7
0x1a1f…1a39 at0008 = ╱31╱1╱ // 0x1a27 @0x8
0x1a1f…1a39 at0009 = ╱ef╱$╱ // 0x1a28 @0x9
0x1a1f…1a39 at000a = ╱ed╱(╱ // 0x1a29 @0xa
0x1a1f…1a39 at000b = ╱cc╱LEN╱ // 0x1a2a @0xb
0x1a1f…1a39 at000c = ╱ed╱(╱ // 0x1a2b @0xc
0x1a1f…1a39 at000d = ╱55╱U╱ // 0x1a2c @0xd
0x1a1f…1a39 at000e = ╱42╱B╱ // 0x1a2d @0xe
0x1a1f…1a39 at000f = ╱4c╱L╱ // 0x1a2e @0xf
0x1a1f…1a39 at0010 = ╱42╱B╱ // 0x1a2f @0x10
0x1a1f…1a39 at0011 = ╱31╱1╱ // 0x1a30 @0x11
0x1a1f…1a39 at0012 = ╱ef╱$╱ // 0x1a31 @0x12
0x1a1f…1a39 at0013 = ╱ee╱)╱ // 0x1a32 @0x13
0x1a1f…1a39 at0014 = ╱ee╱)╱ // 0x1a33 @0x14
0x1a1f…1a39 at0015 = ╱dc╱=╱ // 0x1a34 @0x15
0x1a1f…1a39 at0016 = ╱22╱"╱ // 0x1a35 @0x16
0x1a1f…1a39 at0017 = ╱20╱…╱ // 0x1a36 @0x17
0x1a1f…1a39 at0018 = ╱22╱"╱ // 0x1a37 @0x18
0x1a1f…1a39 at0019 = EOL // 0x1a38 @0x19
0x1a1f…1a39 }
0x1a39…1a3f a796 2600 ENDIF
0x1a39…1a3f LineComalBin {
0x1a39…1a3f ptr = 0xa796 // 0x1a39 @0x0
0x1a39…1a3f lno = 0x0a28 // 0x1a3b @0x2
0x1a39…1a3f at0004 = ╱9b╱ ENDIF ╱ // 0x1a3d @0x4
0x1a39…1a3f at0005 = EOL // 0x1a3e @0x5
0x1a39…1a3f }
0x1a3f…1a45 a79c 2610 ENDIF
0x1a3f…1a45 LineComalBin {
0x1a3f…1a45 ptr = 0xa79c // 0x1a3f @0x0
0x1a3f…1a45 lno = 0x0a32 // 0x1a41 @0x2
0x1a3f…1a45 at0004 = ╱9b╱ ENDIF ╱ // 0x1a43 @0x4
0x1a3f…1a45 at0005 = EOL // 0x1a44 @0x5
0x1a3f…1a45 }
0x1a45…1a52 a7a9 2620 IF STØR=E THEN
0x1a45…1a52 LineComalBin {
0x1a45…1a52 ptr = 0xa7a9 // 0x1a45 @0x0
0x1a45…1a52 lno = 0x0a3c // 0x1a47 @0x2
0x1a45…1a52 at0004 = ╱9c╱ IF ╱ // 0x1a49 @0x4
0x1a45…1a52 at0005 = ╱53╱S╱ // 0x1a4a @0x5
0x1a45…1a52 at0006 = ╱54╱T╱ // 0x1a4b @0x6
0x1a45…1a52 at0007 = ╱5c╱Ø╱ // 0x1a4c @0x7
0x1a45…1a52 at0008 = ╱52╱R╱ // 0x1a4d @0x8
0x1a45…1a52 at0009 = ╱dc╱=╱ // 0x1a4e @0x9
0x1a45…1a52 at000a = ╱45╱E╱ // 0x1a4f @0xa
0x1a45…1a52 at000b = ╱b6╱ THEN ╱ // 0x1a50 @0xb
0x1a45…1a52 at000c = EOL // 0x1a51 @0xc
0x1a45…1a52 }
0x1a52…1a78 a7cf 2630 UBLB1$=UBLB1$(4:LEN(UBLB1$)-V)
0x1a52…1a78 LineComalBin {
0x1a52…1a78 ptr = 0xa7cf // 0x1a52 @0x0
0x1a52…1a78 lno = 0x0a46 // 0x1a54 @0x2
0x1a52…1a78 at0004 = ╱55╱U╱ // 0x1a56 @0x4
0x1a52…1a78 at0005 = ╱42╱B╱ // 0x1a57 @0x5
0x1a52…1a78 at0006 = ╱4c╱L╱ // 0x1a58 @0x6
0x1a52…1a78 at0007 = ╱42╱B╱ // 0x1a59 @0x7
0x1a52…1a78 at0008 = ╱31╱1╱ // 0x1a5a @0x8
0x1a52…1a78 at0009 = ╱ef╱$╱ // 0x1a5b @0x9
0x1a52…1a78 at000a = ╱dc╱=╱ // 0x1a5c @0xa
0x1a52…1a78 at000b = ╱55╱U╱ // 0x1a5d @0xb
0x1a52…1a78 at000c = ╱42╱B╱ // 0x1a5e @0xc
0x1a52…1a78 at000d = ╱4c╱L╱ // 0x1a5f @0xd
0x1a52…1a78 at000e = ╱42╱B╱ // 0x1a60 @0xe
0x1a52…1a78 at000f = ╱31╱1╱ // 0x1a61 @0xf
0x1a52…1a78 at0010 = ╱ef╱$╱ // 0x1a62 @0x10
0x1a52…1a78 at0011 = ╱ed╱(╱ // 0x1a63 @0x11
0x1a52…1a78 at0012 = ╱34╱4╱ // 0x1a64 @0x12
0x1a52…1a78 at0013 = ╱fe00008003╱ // 0x1a65 @0x13
0x1a52…1a78 at0018 = ╱f0╱:╱ // 0x1a6a @0x18
0x1a52…1a78 at0019 = ╱cc╱LEN╱ // 0x1a6b @0x19
0x1a52…1a78 at001a = ╱ed╱(╱ // 0x1a6c @0x1a
0x1a52…1a78 at001b = ╱55╱U╱ // 0x1a6d @0x1b
0x1a52…1a78 at001c = ╱42╱B╱ // 0x1a6e @0x1c
0x1a52…1a78 at001d = ╱4c╱L╱ // 0x1a6f @0x1d
0x1a52…1a78 at001e = ╱42╱B╱ // 0x1a70 @0x1e
0x1a52…1a78 at001f = ╱31╱1╱ // 0x1a71 @0x1f
0x1a52…1a78 at0020 = ╱ef╱$╱ // 0x1a72 @0x20
0x1a52…1a78 at0021 = ╱ee╱)╱ // 0x1a73 @0x21
0x1a52…1a78 at0022 = ╱e3╱-╱ // 0x1a74 @0x22
0x1a52…1a78 at0023 = ╱56╱V╱ // 0x1a75 @0x23
0x1a52…1a78 at0024 = ╱ee╱)╱ // 0x1a76 @0x24
0x1a52…1a78 at0025 = EOL // 0x1a77 @0x25
0x1a52…1a78 }
0x1a78…1a7e (88,) a7d5 2640 ENDIF
0x1a78…1a7e LineComalBin {
0x1a78…1a7e ptr = 0xa7d5 // 0x1a78 @0x0
0x1a78…1a7e lno = 0x0a50 // 0x1a7a @0x2
0x1a78…1a7e at0004 = ╱9b╱ ENDIF ╱ // 0x1a7c @0x4
0x1a78…1a7e at0005 = EOL // 0x1a7d @0x5
0x1a78…1a7e }
0x1a7e…1a84 a7db 2650 ENDPROC
0x1a7e…1a84 LineComalBin {
0x1a7e…1a84 ptr = 0xa7db // 0x1a7e @0x0
0x1a7e…1a84 lno = 0x0a5a // 0x1a80 @0x2
0x1a7e…1a84 at0004 = ╱9f╱ ENDPROC ╱ // 0x1a82 @0x4
0x1a7e…1a84 at0005 = EOL // 0x1a83 @0x5
0x1a7e…1a84 }
0x1a84…1a9e a7f5 2660 K1$="P641220:SYSTEM1"
0x1a84…1a9e LineComalBin {
0x1a84…1a9e ptr = 0xa7f5 // 0x1a84 @0x0
0x1a84…1a9e lno = 0x0a64 // 0x1a86 @0x2
0x1a84…1a9e at0004 = ╱4b╱K╱ // 0x1a88 @0x4
0x1a84…1a9e at0005 = ╱31╱1╱ // 0x1a89 @0x5
0x1a84…1a9e at0006 = ╱ef╱$╱ // 0x1a8a @0x6
0x1a84…1a9e at0007 = ╱dc╱=╱ // 0x1a8b @0x7
0x1a84…1a9e at0008 = ╱22╱"╱ // 0x1a8c @0x8
0x1a84…1a9e at0009 = ╱50╱P╱ // 0x1a8d @0x9
0x1a84…1a9e at000a = ╱36╱6╱ // 0x1a8e @0xa
0x1a84…1a9e at000b = ╱34╱4╱ // 0x1a8f @0xb
0x1a84…1a9e at000c = ╱31╱1╱ // 0x1a90 @0xc
0x1a84…1a9e at000d = ╱32╱2╱ // 0x1a91 @0xd
0x1a84…1a9e at000e = ╱32╱2╱ // 0x1a92 @0xe
0x1a84…1a9e at000f = ╱30╱0╱ // 0x1a93 @0xf
0x1a84…1a9e at0010 = ╱3a╱:╱ // 0x1a94 @0x10
0x1a84…1a9e at0011 = ╱53╱S╱ // 0x1a95 @0x11
0x1a84…1a9e at0012 = ╱59╱Y╱ // 0x1a96 @0x12
0x1a84…1a9e at0013 = ╱53╱S╱ // 0x1a97 @0x13
0x1a84…1a9e at0014 = ╱54╱T╱ // 0x1a98 @0x14
0x1a84…1a9e at0015 = ╱45╱E╱ // 0x1a99 @0x15
0x1a84…1a9e at0016 = ╱4d╱M╱ // 0x1a9a @0x16
0x1a84…1a9e at0017 = ╱31╱1╱ // 0x1a9b @0x17
0x1a84…1a9e at0018 = ╱22╱"╱ // 0x1a9c @0x18
0x1a84…1a9e at0019 = EOL // 0x1a9d @0x19
0x1a84…1a9e }
0x1a9e…1aa9 a800 2670 OPEN K1$,R
0x1a9e…1aa9 LineComalBin {
0x1a9e…1aa9 ptr = 0xa800 // 0x1a9e @0x0
0x1a9e…1aa9 lno = 0x0a6e // 0x1aa0 @0x2
0x1a9e…1aa9 at0004 = ╱a7╱ OPEN ╱ // 0x1aa2 @0x4
0x1a9e…1aa9 at0005 = ╱4b╱K╱ // 0x1aa3 @0x5
0x1a9e…1aa9 at0006 = ╱31╱1╱ // 0x1aa4 @0x6
0x1a9e…1aa9 at0007 = ╱ef╱$╱ // 0x1aa5 @0x7
0x1a9e…1aa9 at0008 = ╱ec╱,╱ // 0x1aa6 @0x8
0x1a9e…1aa9 at0009 = ╱52╱R╱ // 0x1aa7 @0x9
0x1a9e…1aa9 at000a = EOL // 0x1aa8 @0xa
0x1a9e…1aa9 }
0x1aa9…1abc a813 2680 EXEC FEJL(W,E,K1$)
0x1aa9…1abc LineComalBin {
0x1aa9…1abc ptr = 0xa813 // 0x1aa9 @0x0
0x1aa9…1abc lno = 0x0a78 // 0x1aab @0x2
0x1aa9…1abc at0004 = ╱9d╱ EXEC ╱ // 0x1aad @0x4
0x1aa9…1abc at0005 = ╱46╱F╱ // 0x1aae @0x5
0x1aa9…1abc at0006 = ╱45╱E╱ // 0x1aaf @0x6
0x1aa9…1abc at0007 = ╱4a╱J╱ // 0x1ab0 @0x7
0x1aa9…1abc at0008 = ╱4c╱L╱ // 0x1ab1 @0x8
0x1aa9…1abc at0009 = ╱ed╱(╱ // 0x1ab2 @0x9
0x1aa9…1abc at000a = ╱57╱W╱ // 0x1ab3 @0xa
0x1aa9…1abc at000b = ╱ec╱,╱ // 0x1ab4 @0xb
0x1aa9…1abc at000c = ╱45╱E╱ // 0x1ab5 @0xc
0x1aa9…1abc at000d = ╱ec╱,╱ // 0x1ab6 @0xd
0x1aa9…1abc at000e = ╱4b╱K╱ // 0x1ab7 @0xe
0x1aa9…1abc at000f = ╱31╱1╱ // 0x1ab8 @0xf
0x1aa9…1abc at0010 = ╱ef╱$╱ // 0x1ab9 @0x10
0x1aa9…1abc at0011 = ╱ee╱)╱ // 0x1aba @0x11
0x1aa9…1abc at0012 = EOL // 0x1abb @0x12
0x1aa9…1abc }
0x1abc…1adf a836 2690 GET K1$,E:MFANTAL,MDANTAL,MKANTAL
0x1abc…1adf LineComalBin {
0x1abc…1adf ptr = 0xa836 // 0x1abc @0x0
0x1abc…1adf lno = 0x0a82 // 0x1abe @0x2
0x1abc…1adf at0004 = ╱a9╱ GET ╱ // 0x1ac0 @0x4
0x1abc…1adf at0005 = ╱4b╱K╱ // 0x1ac1 @0x5
0x1abc…1adf at0006 = ╱31╱1╱ // 0x1ac2 @0x6
0x1abc…1adf at0007 = ╱ef╱$╱ // 0x1ac3 @0x7
0x1abc…1adf at0008 = ╱ec╱,╱ // 0x1ac4 @0x8
0x1abc…1adf at0009 = ╱45╱E╱ // 0x1ac5 @0x9
0x1abc…1adf at000a = ╱f0╱:╱ // 0x1ac6 @0xa
0x1abc…1adf at000b = ╱4d╱M╱ // 0x1ac7 @0xb
0x1abc…1adf at000c = ╱46╱F╱ // 0x1ac8 @0xc
0x1abc…1adf at000d = ╱41╱A╱ // 0x1ac9 @0xd
0x1abc…1adf at000e = ╱4e╱N╱ // 0x1aca @0xe
0x1abc…1adf at000f = ╱54╱T╱ // 0x1acb @0xf
0x1abc…1adf at0010 = ╱41╱A╱ // 0x1acc @0x10
0x1abc…1adf at0011 = ╱4c╱L╱ // 0x1acd @0x11
0x1abc…1adf at0012 = ╱ec╱,╱ // 0x1ace @0x12
0x1abc…1adf at0013 = ╱4d╱M╱ // 0x1acf @0x13
0x1abc…1adf at0014 = ╱44╱D╱ // 0x1ad0 @0x14
0x1abc…1adf at0015 = ╱41╱A╱ // 0x1ad1 @0x15
0x1abc…1adf at0016 = ╱4e╱N╱ // 0x1ad2 @0x16
0x1abc…1adf at0017 = ╱54╱T╱ // 0x1ad3 @0x17
0x1abc…1adf at0018 = ╱41╱A╱ // 0x1ad4 @0x18
0x1abc…1adf at0019 = ╱4c╱L╱ // 0x1ad5 @0x19
0x1abc…1adf at001a = ╱ec╱,╱ // 0x1ad6 @0x1a
0x1abc…1adf at001b = ╱4d╱M╱ // 0x1ad7 @0x1b
0x1abc…1adf at001c = ╱4b╱K╱ // 0x1ad8 @0x1c
0x1abc…1adf at001d = ╱41╱A╱ // 0x1ad9 @0x1d
0x1abc…1adf at001e = ╱4e╱N╱ // 0x1ada @0x1e
0x1abc…1adf at001f = ╱54╱T╱ // 0x1adb @0x1f
0x1abc…1adf at0020 = ╱41╱A╱ // 0x1adc @0x20
0x1abc…1adf at0021 = ╱4c╱L╱ // 0x1add @0x21
0x1abc…1adf at0022 = EOL // 0x1ade @0x22
0x1abc…1adf }
0x1adf…1af2 a849 2700 EXEC FEJL(W,G,K1$)
0x1adf…1af2 LineComalBin {
0x1adf…1af2 ptr = 0xa849 // 0x1adf @0x0
0x1adf…1af2 lno = 0x0a8c // 0x1ae1 @0x2
0x1adf…1af2 at0004 = ╱9d╱ EXEC ╱ // 0x1ae3 @0x4
0x1adf…1af2 at0005 = ╱46╱F╱ // 0x1ae4 @0x5
0x1adf…1af2 at0006 = ╱45╱E╱ // 0x1ae5 @0x6
0x1adf…1af2 at0007 = ╱4a╱J╱ // 0x1ae6 @0x7
0x1adf…1af2 at0008 = ╱4c╱L╱ // 0x1ae7 @0x8
0x1adf…1af2 at0009 = ╱ed╱(╱ // 0x1ae8 @0x9
0x1adf…1af2 at000a = ╱57╱W╱ // 0x1ae9 @0xa
0x1adf…1af2 at000b = ╱ec╱,╱ // 0x1aea @0xb
0x1adf…1af2 at000c = ╱47╱G╱ // 0x1aeb @0xc
0x1adf…1af2 at000d = ╱ec╱,╱ // 0x1aec @0xd
0x1adf…1af2 at000e = ╱4b╱K╱ // 0x1aed @0xe
0x1adf…1af2 at000f = ╱31╱1╱ // 0x1aee @0xf
0x1adf…1af2 at0010 = ╱ef╱$╱ // 0x1aef @0x10
0x1adf…1af2 at0011 = ╱ee╱)╱ // 0x1af0 @0x11
0x1adf…1af2 at0012 = EOL // 0x1af1 @0x12
0x1adf…1af2 }
0x1af2…1b17 a86e 2710 GET K1$,V:DPOST,KPOST,MFPOST,MDPOST
0x1af2…1b17 LineComalBin {
0x1af2…1b17 ptr = 0xa86e // 0x1af2 @0x0
0x1af2…1b17 lno = 0x0a96 // 0x1af4 @0x2
0x1af2…1b17 at0004 = ╱a9╱ GET ╱ // 0x1af6 @0x4
0x1af2…1b17 at0005 = ╱4b╱K╱ // 0x1af7 @0x5
0x1af2…1b17 at0006 = ╱31╱1╱ // 0x1af8 @0x6
0x1af2…1b17 at0007 = ╱ef╱$╱ // 0x1af9 @0x7
0x1af2…1b17 at0008 = ╱ec╱,╱ // 0x1afa @0x8
0x1af2…1b17 at0009 = ╱56╱V╱ // 0x1afb @0x9
0x1af2…1b17 at000a = ╱f0╱:╱ // 0x1afc @0xa
0x1af2…1b17 at000b = ╱44╱D╱ // 0x1afd @0xb
0x1af2…1b17 at000c = ╱50╱P╱ // 0x1afe @0xc
0x1af2…1b17 at000d = ╱4f╱O╱ // 0x1aff @0xd
0x1af2…1b17 at000e = ╱53╱S╱ // 0x1b00 @0xe
0x1af2…1b17 at000f = ╱54╱T╱ // 0x1b01 @0xf
0x1af2…1b17 at0010 = ╱ec╱,╱ // 0x1b02 @0x10
0x1af2…1b17 at0011 = ╱4b╱K╱ // 0x1b03 @0x11
0x1af2…1b17 at0012 = ╱50╱P╱ // 0x1b04 @0x12
0x1af2…1b17 at0013 = ╱4f╱O╱ // 0x1b05 @0x13
0x1af2…1b17 at0014 = ╱53╱S╱ // 0x1b06 @0x14
0x1af2…1b17 at0015 = ╱54╱T╱ // 0x1b07 @0x15
0x1af2…1b17 at0016 = ╱ec╱,╱ // 0x1b08 @0x16
0x1af2…1b17 at0017 = ╱4d╱M╱ // 0x1b09 @0x17
0x1af2…1b17 at0018 = ╱46╱F╱ // 0x1b0a @0x18
0x1af2…1b17 at0019 = ╱50╱P╱ // 0x1b0b @0x19
0x1af2…1b17 at001a = ╱4f╱O╱ // 0x1b0c @0x1a
0x1af2…1b17 at001b = ╱53╱S╱ // 0x1b0d @0x1b
0x1af2…1b17 at001c = ╱54╱T╱ // 0x1b0e @0x1c
0x1af2…1b17 at001d = ╱ec╱,╱ // 0x1b0f @0x1d
0x1af2…1b17 at001e = ╱4d╱M╱ // 0x1b10 @0x1e
0x1af2…1b17 at001f = ╱44╱D╱ // 0x1b11 @0x1f
0x1af2…1b17 at0020 = ╱50╱P╱ // 0x1b12 @0x20
0x1af2…1b17 at0021 = ╱4f╱O╱ // 0x1b13 @0x21
0x1af2…1b17 at0022 = ╱53╱S╱ // 0x1b14 @0x22
0x1af2…1b17 at0023 = ╱54╱T╱ // 0x1b15 @0x23
0x1af2…1b17 at0024 = EOL // 0x1b16 @0x24
0x1af2…1b17 }
0x1b17…1b30 a887 2720 EXEC FEJL(W,21,K1$)
0x1b17…1b30 LineComalBin {
0x1b17…1b30 ptr = 0xa887 // 0x1b17 @0x0
0x1b17…1b30 lno = 0x0aa0 // 0x1b19 @0x2
0x1b17…1b30 at0004 = ╱9d╱ EXEC ╱ // 0x1b1b @0x4
0x1b17…1b30 at0005 = ╱46╱F╱ // 0x1b1c @0x5
0x1b17…1b30 at0006 = ╱45╱E╱ // 0x1b1d @0x6
0x1b17…1b30 at0007 = ╱4a╱J╱ // 0x1b1e @0x7
0x1b17…1b30 at0008 = ╱4c╱L╱ // 0x1b1f @0x8
0x1b17…1b30 at0009 = ╱ed╱(╱ // 0x1b20 @0x9
0x1b17…1b30 at000a = ╱57╱W╱ // 0x1b21 @0xa
0x1b17…1b30 at000b = ╱ec╱,╱ // 0x1b22 @0xb
0x1b17…1b30 at000c = ╱32╱2╱ // 0x1b23 @0xc
0x1b17…1b30 at000d = ╱31╱1╱ // 0x1b24 @0xd
0x1b17…1b30 at000e = ╱fe0000a805╱ // 0x1b25 @0xe
0x1b17…1b30 at0013 = ╱ec╱,╱ // 0x1b2a @0x13
0x1b17…1b30 at0014 = ╱4b╱K╱ // 0x1b2b @0x14
0x1b17…1b30 at0015 = ╱31╱1╱ // 0x1b2c @0x15
0x1b17…1b30 at0016 = ╱ef╱$╱ // 0x1b2d @0x16
0x1b17…1b30 at0017 = ╱ee╱)╱ // 0x1b2e @0x17
0x1b17…1b30 at0018 = EOL // 0x1b2f @0x18
0x1b17…1b30 }
0x1b30…1b56 a8ad 2730 GET K1$,4:MKPOST,MFAK,MVGR,MKGR
0x1b30…1b56 LineComalBin {
0x1b30…1b56 ptr = 0xa8ad // 0x1b30 @0x0
0x1b30…1b56 lno = 0x0aaa // 0x1b32 @0x2
0x1b30…1b56 at0004 = ╱a9╱ GET ╱ // 0x1b34 @0x4
0x1b30…1b56 at0005 = ╱4b╱K╱ // 0x1b35 @0x5
0x1b30…1b56 at0006 = ╱31╱1╱ // 0x1b36 @0x6
0x1b30…1b56 at0007 = ╱ef╱$╱ // 0x1b37 @0x7
0x1b30…1b56 at0008 = ╱ec╱,╱ // 0x1b38 @0x8
0x1b30…1b56 at0009 = ╱34╱4╱ // 0x1b39 @0x9
0x1b30…1b56 at000a = ╱fe00008003╱ // 0x1b3a @0xa
0x1b30…1b56 at000f = ╱f0╱:╱ // 0x1b3f @0xf
0x1b30…1b56 at0010 = ╱4d╱M╱ // 0x1b40 @0x10
0x1b30…1b56 at0011 = ╱4b╱K╱ // 0x1b41 @0x11
0x1b30…1b56 at0012 = ╱50╱P╱ // 0x1b42 @0x12
0x1b30…1b56 at0013 = ╱4f╱O╱ // 0x1b43 @0x13
0x1b30…1b56 at0014 = ╱53╱S╱ // 0x1b44 @0x14
0x1b30…1b56 at0015 = ╱54╱T╱ // 0x1b45 @0x15
0x1b30…1b56 at0016 = ╱ec╱,╱ // 0x1b46 @0x16
0x1b30…1b56 at0017 = ╱4d╱M╱ // 0x1b47 @0x17
0x1b30…1b56 at0018 = ╱46╱F╱ // 0x1b48 @0x18
0x1b30…1b56 at0019 = ╱41╱A╱ // 0x1b49 @0x19
0x1b30…1b56 at001a = ╱4b╱K╱ // 0x1b4a @0x1a
0x1b30…1b56 at001b = ╱ec╱,╱ // 0x1b4b @0x1b
0x1b30…1b56 at001c = ╱4d╱M╱ // 0x1b4c @0x1c
0x1b30…1b56 at001d = ╱56╱V╱ // 0x1b4d @0x1d
0x1b30…1b56 at001e = ╱47╱G╱ // 0x1b4e @0x1e
0x1b30…1b56 at001f = ╱52╱R╱ // 0x1b4f @0x1f
0x1b30…1b56 at0020 = ╱ec╱,╱ // 0x1b50 @0x20
0x1b30…1b56 at0021 = ╱4d╱M╱ // 0x1b51 @0x21
0x1b30…1b56 at0022 = ╱4b╱K╱ // 0x1b52 @0x22
0x1b30…1b56 at0023 = ╱47╱G╱ // 0x1b53 @0x23
0x1b30…1b56 at0024 = ╱52╱R╱ // 0x1b54 @0x24
0x1b30…1b56 at0025 = EOL // 0x1b55 @0x25
0x1b30…1b56 }
0x1b56…1b69 a8c0 2740 EXEC FEJL(W,V,K1$)
0x1b56…1b69 LineComalBin {
0x1b56…1b69 ptr = 0xa8c0 // 0x1b56 @0x0
0x1b56…1b69 lno = 0x0ab4 // 0x1b58 @0x2
0x1b56…1b69 at0004 = ╱9d╱ EXEC ╱ // 0x1b5a @0x4
0x1b56…1b69 at0005 = ╱46╱F╱ // 0x1b5b @0x5
0x1b56…1b69 at0006 = ╱45╱E╱ // 0x1b5c @0x6
0x1b56…1b69 at0007 = ╱4a╱J╱ // 0x1b5d @0x7
0x1b56…1b69 at0008 = ╱4c╱L╱ // 0x1b5e @0x8
0x1b56…1b69 at0009 = ╱ed╱(╱ // 0x1b5f @0x9
0x1b56…1b69 at000a = ╱57╱W╱ // 0x1b60 @0xa
0x1b56…1b69 at000b = ╱ec╱,╱ // 0x1b61 @0xb
0x1b56…1b69 at000c = ╱56╱V╱ // 0x1b62 @0xc
0x1b56…1b69 at000d = ╱ec╱,╱ // 0x1b63 @0xd
0x1b56…1b69 at000e = ╱4b╱K╱ // 0x1b64 @0xe
0x1b56…1b69 at000f = ╱31╱1╱ // 0x1b65 @0xf
0x1b56…1b69 at0010 = ╱ef╱$╱ // 0x1b66 @0x10
0x1b56…1b69 at0011 = ╱ee╱)╱ // 0x1b67 @0x11
0x1b56…1b69 at0012 = EOL // 0x1b68 @0x12
0x1b56…1b69 }
0x1b69…1b7f a8d6 2750 GET K1$,5:MKRGR
0x1b69…1b7f LineComalBin {
0x1b69…1b7f ptr = 0xa8d6 // 0x1b69 @0x0
0x1b69…1b7f lno = 0x0abe // 0x1b6b @0x2
0x1b69…1b7f at0004 = ╱a9╱ GET ╱ // 0x1b6d @0x4
0x1b69…1b7f at0005 = ╱4b╱K╱ // 0x1b6e @0x5
0x1b69…1b7f at0006 = ╱31╱1╱ // 0x1b6f @0x6
0x1b69…1b7f at0007 = ╱ef╱$╱ // 0x1b70 @0x7
0x1b69…1b7f at0008 = ╱ec╱,╱ // 0x1b71 @0x8
0x1b69…1b7f at0009 = ╱35╱5╱ // 0x1b72 @0x9
0x1b69…1b7f at000a = ╱fe0000a003╱ // 0x1b73 @0xa
0x1b69…1b7f at000f = ╱f0╱:╱ // 0x1b78 @0xf
0x1b69…1b7f at0010 = ╱4d╱M╱ // 0x1b79 @0x10
0x1b69…1b7f at0011 = ╱4b╱K╱ // 0x1b7a @0x11
0x1b69…1b7f at0012 = ╱52╱R╱ // 0x1b7b @0x12
0x1b69…1b7f at0013 = ╱47╱G╱ // 0x1b7c @0x13
0x1b69…1b7f at0014 = ╱52╱R╱ // 0x1b7d @0x14
0x1b69…1b7f at0015 = EOL // 0x1b7e @0x15
0x1b69…1b7f }
0x1b7f…1b97 a8ee 2760 EXEC FEJL(W,4,K1$)
0x1b7f…1b97 LineComalBin {
0x1b7f…1b97 ptr = 0xa8ee // 0x1b7f @0x0
0x1b7f…1b97 lno = 0x0ac8 // 0x1b81 @0x2
0x1b7f…1b97 at0004 = ╱9d╱ EXEC ╱ // 0x1b83 @0x4
0x1b7f…1b97 at0005 = ╱46╱F╱ // 0x1b84 @0x5
0x1b7f…1b97 at0006 = ╱45╱E╱ // 0x1b85 @0x6
0x1b7f…1b97 at0007 = ╱4a╱J╱ // 0x1b86 @0x7
0x1b7f…1b97 at0008 = ╱4c╱L╱ // 0x1b87 @0x8
0x1b7f…1b97 at0009 = ╱ed╱(╱ // 0x1b88 @0x9
0x1b7f…1b97 at000a = ╱57╱W╱ // 0x1b89 @0xa
0x1b7f…1b97 at000b = ╱ec╱,╱ // 0x1b8a @0xb
0x1b7f…1b97 at000c = ╱34╱4╱ // 0x1b8b @0xc
0x1b7f…1b97 at000d = ╱fe00008003╱ // 0x1b8c @0xd
0x1b7f…1b97 at0012 = ╱ec╱,╱ // 0x1b91 @0x12
0x1b7f…1b97 at0013 = ╱4b╱K╱ // 0x1b92 @0x13
0x1b7f…1b97 at0014 = ╱31╱1╱ // 0x1b93 @0x14
0x1b7f…1b97 at0015 = ╱ef╱$╱ // 0x1b94 @0x15
0x1b7f…1b97 at0016 = ╱ee╱)╱ // 0x1b95 @0x16
0x1b7f…1b97 at0017 = EOL // 0x1b96 @0x17
0x1b7f…1b97 }
0x1b97…1bbf a916 2770 GET K1$,8:DIVNR,DIVDNR,DIFNR,DTAL
0x1b97…1bbf LineComalBin {
0x1b97…1bbf ptr = 0xa916 // 0x1b97 @0x0
0x1b97…1bbf lno = 0x0ad2 // 0x1b99 @0x2
0x1b97…1bbf at0004 = ╱a9╱ GET ╱ // 0x1b9b @0x4
0x1b97…1bbf at0005 = ╱4b╱K╱ // 0x1b9c @0x5
0x1b97…1bbf at0006 = ╱31╱1╱ // 0x1b9d @0x6
0x1b97…1bbf at0007 = ╱ef╱$╱ // 0x1b9e @0x7
0x1b97…1bbf at0008 = ╱ec╱,╱ // 0x1b9f @0x8
0x1b97…1bbf at0009 = ╱38╱8╱ // 0x1ba0 @0x9
0x1b97…1bbf at000a = ╱fe00008004╱ // 0x1ba1 @0xa
0x1b97…1bbf at000f = ╱f0╱:╱ // 0x1ba6 @0xf
0x1b97…1bbf at0010 = ╱44╱D╱ // 0x1ba7 @0x10
0x1b97…1bbf at0011 = ╱49╱I╱ // 0x1ba8 @0x11
0x1b97…1bbf at0012 = ╱56╱V╱ // 0x1ba9 @0x12
0x1b97…1bbf at0013 = ╱4e╱N╱ // 0x1baa @0x13
0x1b97…1bbf at0014 = ╱52╱R╱ // 0x1bab @0x14
0x1b97…1bbf at0015 = ╱ec╱,╱ // 0x1bac @0x15
0x1b97…1bbf at0016 = ╱44╱D╱ // 0x1bad @0x16
0x1b97…1bbf at0017 = ╱49╱I╱ // 0x1bae @0x17
0x1b97…1bbf at0018 = ╱56╱V╱ // 0x1baf @0x18
0x1b97…1bbf at0019 = ╱44╱D╱ // 0x1bb0 @0x19
0x1b97…1bbf at001a = ╱4e╱N╱ // 0x1bb1 @0x1a
0x1b97…1bbf at001b = ╱52╱R╱ // 0x1bb2 @0x1b
0x1b97…1bbf at001c = ╱ec╱,╱ // 0x1bb3 @0x1c
0x1b97…1bbf at001d = ╱44╱D╱ // 0x1bb4 @0x1d
0x1b97…1bbf at001e = ╱49╱I╱ // 0x1bb5 @0x1e
0x1b97…1bbf at001f = ╱46╱F╱ // 0x1bb6 @0x1f
0x1b97…1bbf at0020 = ╱4e╱N╱ // 0x1bb7 @0x20
0x1b97…1bbf at0021 = ╱52╱R╱ // 0x1bb8 @0x21
0x1b97…1bbf at0022 = ╱ec╱,╱ // 0x1bb9 @0x22
0x1b97…1bbf at0023 = ╱44╱D╱ // 0x1bba @0x23
0x1b97…1bbf at0024 = ╱54╱T╱ // 0x1bbb @0x24
0x1b97…1bbf at0025 = ╱41╱A╱ // 0x1bbc @0x25
0x1b97…1bbf at0026 = ╱4c╱L╱ // 0x1bbd @0x26
0x1b97…1bbf at0027 = EOL // 0x1bbe @0x27
0x1b97…1bbf }
0x1bbf…1bd7 a92e 2780 EXEC FEJL(W,5,K1$)
0x1bbf…1bd7 LineComalBin {
0x1bbf…1bd7 ptr = 0xa92e // 0x1bbf @0x0
0x1bbf…1bd7 lno = 0x0adc // 0x1bc1 @0x2
0x1bbf…1bd7 at0004 = ╱9d╱ EXEC ╱ // 0x1bc3 @0x4
0x1bbf…1bd7 at0005 = ╱46╱F╱ // 0x1bc4 @0x5
0x1bbf…1bd7 at0006 = ╱45╱E╱ // 0x1bc5 @0x6
0x1bbf…1bd7 at0007 = ╱4a╱J╱ // 0x1bc6 @0x7
0x1bbf…1bd7 at0008 = ╱4c╱L╱ // 0x1bc7 @0x8
0x1bbf…1bd7 at0009 = ╱ed╱(╱ // 0x1bc8 @0x9
0x1bbf…1bd7 at000a = ╱57╱W╱ // 0x1bc9 @0xa
0x1bbf…1bd7 at000b = ╱ec╱,╱ // 0x1bca @0xb
0x1bbf…1bd7 at000c = ╱35╱5╱ // 0x1bcb @0xc
0x1bbf…1bd7 at000d = ╱fe0000a003╱ // 0x1bcc @0xd
0x1bbf…1bd7 at0012 = ╱ec╱,╱ // 0x1bd1 @0x12
0x1bbf…1bd7 at0013 = ╱4b╱K╱ // 0x1bd2 @0x13
0x1bbf…1bd7 at0014 = ╱31╱1╱ // 0x1bd3 @0x14
0x1bbf…1bd7 at0015 = ╱ef╱$╱ // 0x1bd4 @0x15
0x1bbf…1bd7 at0016 = ╱ee╱)╱ // 0x1bd5 @0x16
0x1bbf…1bd7 at0017 = EOL // 0x1bd6 @0x17
0x1bbf…1bd7 }
0x1bd7…1be8 a93f 2790 GET K1$,W:KRTAL
0x1bd7…1be8 LineComalBin {
0x1bd7…1be8 ptr = 0xa93f // 0x1bd7 @0x0
0x1bd7…1be8 lno = 0x0ae6 // 0x1bd9 @0x2
0x1bd7…1be8 at0004 = ╱a9╱ GET ╱ // 0x1bdb @0x4
0x1bd7…1be8 at0005 = ╱4b╱K╱ // 0x1bdc @0x5
0x1bd7…1be8 at0006 = ╱31╱1╱ // 0x1bdd @0x6
0x1bd7…1be8 at0007 = ╱ef╱$╱ // 0x1bde @0x7
0x1bd7…1be8 at0008 = ╱ec╱,╱ // 0x1bdf @0x8
0x1bd7…1be8 at0009 = ╱57╱W╱ // 0x1be0 @0x9
0x1bd7…1be8 at000a = ╱f0╱:╱ // 0x1be1 @0xa
0x1bd7…1be8 at000b = ╱4b╱K╱ // 0x1be2 @0xb
0x1bd7…1be8 at000c = ╱52╱R╱ // 0x1be3 @0xc
0x1bd7…1be8 at000d = ╱54╱T╱ // 0x1be4 @0xd
0x1bd7…1be8 at000e = ╱41╱A╱ // 0x1be5 @0xe
0x1bd7…1be8 at000f = ╱4c╱L╱ // 0x1be6 @0xf
0x1bd7…1be8 at0010 = EOL // 0x1be7 @0x10
0x1bd7…1be8 }
0x1be8…1c00 a957 2800 EXEC FEJL(W,6,K1$)
0x1be8…1c00 LineComalBin {
0x1be8…1c00 ptr = 0xa957 // 0x1be8 @0x0
0x1be8…1c00 lno = 0x0af0 // 0x1bea @0x2
0x1be8…1c00 at0004 = ╱9d╱ EXEC ╱ // 0x1bec @0x4
0x1be8…1c00 at0005 = ╱46╱F╱ // 0x1bed @0x5
0x1be8…1c00 at0006 = ╱45╱E╱ // 0x1bee @0x6
0x1be8…1c00 at0007 = ╱4a╱J╱ // 0x1bef @0x7
0x1be8…1c00 at0008 = ╱4c╱L╱ // 0x1bf0 @0x8
0x1be8…1c00 at0009 = ╱ed╱(╱ // 0x1bf1 @0x9
0x1be8…1c00 at000a = ╱57╱W╱ // 0x1bf2 @0xa
0x1be8…1c00 at000b = ╱ec╱,╱ // 0x1bf3 @0xb
0x1be8…1c00 at000c = ╱36╱6╱ // 0x1bf4 @0xc
0x1be8…1c00 at000d = ╱fe0000c003╱ // 0x1bf5 @0xd
0x1be8…1c00 at0012 = ╱ec╱,╱ // 0x1bfa @0x12
0x1be8…1c00 at0013 = ╱4b╱K╱ // 0x1bfb @0x13
0x1be8…1c00 at0014 = ╱31╱1╱ // 0x1bfc @0x14
0x1be8…1c00 at0015 = ╱ef╱$╱ // 0x1bfd @0x15
0x1be8…1c00 at0016 = ╱ee╱)╱ // 0x1bfe @0x16
0x1be8…1c00 at0017 = EOL // 0x1bff @0x17
0x1be8…1c00 }
0x1c00…1c14 a96b 2810 GET K1$,10:N$
0x1c00…1c14 LineComalBin {
0x1c00…1c14 ptr = 0xa96b // 0x1c00 @0x0
0x1c00…1c14 lno = 0x0afa // 0x1c02 @0x2
0x1c00…1c14 at0004 = ╱a9╱ GET ╱ // 0x1c04 @0x4
0x1c00…1c14 at0005 = ╱4b╱K╱ // 0x1c05 @0x5
0x1c00…1c14 at0006 = ╱31╱1╱ // 0x1c06 @0x6
0x1c00…1c14 at0007 = ╱ef╱$╱ // 0x1c07 @0x7
0x1c00…1c14 at0008 = ╱ec╱,╱ // 0x1c08 @0x8
0x1c00…1c14 at0009 = ╱31╱1╱ // 0x1c09 @0x9
0x1c00…1c14 at000a = ╱30╱0╱ // 0x1c0a @0xa
0x1c00…1c14 at000b = ╱fe0000a004╱ // 0x1c0b @0xb
0x1c00…1c14 at0010 = ╱f0╱:╱ // 0x1c10 @0x10
0x1c00…1c14 at0011 = ╱4e╱N╱ // 0x1c11 @0x11
0x1c00…1c14 at0012 = ╱ef╱$╱ // 0x1c12 @0x12
0x1c00…1c14 at0013 = EOL // 0x1c13 @0x13
0x1c00…1c14 }
0x1c14…1c2c a983 2820 EXEC FEJL(W,7,K1$)
0x1c14…1c2c LineComalBin {
0x1c14…1c2c ptr = 0xa983 // 0x1c14 @0x0
0x1c14…1c2c lno = 0x0b04 // 0x1c16 @0x2
0x1c14…1c2c at0004 = ╱9d╱ EXEC ╱ // 0x1c18 @0x4
0x1c14…1c2c at0005 = ╱46╱F╱ // 0x1c19 @0x5
0x1c14…1c2c at0006 = ╱45╱E╱ // 0x1c1a @0x6
0x1c14…1c2c at0007 = ╱4a╱J╱ // 0x1c1b @0x7
0x1c14…1c2c at0008 = ╱4c╱L╱ // 0x1c1c @0x8
0x1c14…1c2c at0009 = ╱ed╱(╱ // 0x1c1d @0x9
0x1c14…1c2c at000a = ╱57╱W╱ // 0x1c1e @0xa
0x1c14…1c2c at000b = ╱ec╱,╱ // 0x1c1f @0xb
0x1c14…1c2c at000c = ╱37╱7╱ // 0x1c20 @0xc
0x1c14…1c2c at000d = ╱fe0000e003╱ // 0x1c21 @0xd
0x1c14…1c2c at0012 = ╱ec╱,╱ // 0x1c26 @0x12
0x1c14…1c2c at0013 = ╱4b╱K╱ // 0x1c27 @0x13
0x1c14…1c2c at0014 = ╱31╱1╱ // 0x1c28 @0x14
0x1c14…1c2c at0015 = ╱ef╱$╱ // 0x1c29 @0x15
0x1c14…1c2c at0016 = ╱ee╱)╱ // 0x1c2a @0x16
0x1c14…1c2c at0017 = EOL // 0x1c2b @0x17
0x1c14…1c2c }
0x1c2c…1c3d a994 2830 FOR I=E TO 26
0x1c2c…1c3d LineComalBin {
0x1c2c…1c3d ptr = 0xa994 // 0x1c2c @0x0
0x1c2c…1c3d lno = 0x0b0e // 0x1c2e @0x2
0x1c2c…1c3d at0004 = ╱83╱ FOR ╱ // 0x1c30 @0x4
0x1c2c…1c3d at0005 = ╱49╱I╱ // 0x1c31 @0x5
0x1c2c…1c3d at0006 = ╱dc╱=╱ // 0x1c32 @0x6
0x1c2c…1c3d at0007 = ╱45╱E╱ // 0x1c33 @0x7
0x1c2c…1c3d at0008 = ╱b7╱ TO ╱ // 0x1c34 @0x8
0x1c2c…1c3d at0009 = ╱32╱2╱ // 0x1c35 @0x9
0x1c2c…1c3d at000a = ╱36╱6╱ // 0x1c36 @0xa
0x1c2c…1c3d at000b = ╱fe0000d005╱ // 0x1c37 @0xb
0x1c2c…1c3d at0010 = EOL // 0x1c3c @0x10
0x1c2c…1c3d }
0x1c3d…1c56 a9ad 2840 GET K1$,I+10:K$(I)
0x1c3d…1c56 LineComalBin {
0x1c3d…1c56 ptr = 0xa9ad // 0x1c3d @0x0
0x1c3d…1c56 lno = 0x0b18 // 0x1c3f @0x2
0x1c3d…1c56 at0004 = ╱a9╱ GET ╱ // 0x1c41 @0x4
0x1c3d…1c56 at0005 = ╱4b╱K╱ // 0x1c42 @0x5
0x1c3d…1c56 at0006 = ╱31╱1╱ // 0x1c43 @0x6
0x1c3d…1c56 at0007 = ╱ef╱$╱ // 0x1c44 @0x7
0x1c3d…1c56 at0008 = ╱ec╱,╱ // 0x1c45 @0x8
0x1c3d…1c56 at0009 = ╱49╱I╱ // 0x1c46 @0x9
0x1c3d…1c56 at000a = ╱e2╱+╱ // 0x1c47 @0xa
0x1c3d…1c56 at000b = ╱31╱1╱ // 0x1c48 @0xb
0x1c3d…1c56 at000c = ╱30╱0╱ // 0x1c49 @0xc
0x1c3d…1c56 at000d = ╱fe0000a004╱ // 0x1c4a @0xd
0x1c3d…1c56 at0012 = ╱f0╱:╱ // 0x1c4f @0x12
0x1c3d…1c56 at0013 = ╱4b╱K╱ // 0x1c50 @0x13
0x1c3d…1c56 at0014 = ╱ef╱$╱ // 0x1c51 @0x14
0x1c3d…1c56 at0015 = ╱ed╱(╱ // 0x1c52 @0x15
0x1c3d…1c56 at0016 = ╱49╱I╱ // 0x1c53 @0x16
0x1c3d…1c56 at0017 = ╱ee╱)╱ // 0x1c54 @0x17
0x1c3d…1c56 at0018 = EOL // 0x1c55 @0x18
0x1c3d…1c56 }
0x1c56…1c6e a9c5 2850 EXEC FEJL(W,8,K1$)
0x1c56…1c6e LineComalBin {
0x1c56…1c6e ptr = 0xa9c5 // 0x1c56 @0x0
0x1c56…1c6e lno = 0x0b22 // 0x1c58 @0x2
0x1c56…1c6e at0004 = ╱9d╱ EXEC ╱ // 0x1c5a @0x4
0x1c56…1c6e at0005 = ╱46╱F╱ // 0x1c5b @0x5
0x1c56…1c6e at0006 = ╱45╱E╱ // 0x1c5c @0x6
0x1c56…1c6e at0007 = ╱4a╱J╱ // 0x1c5d @0x7
0x1c56…1c6e at0008 = ╱4c╱L╱ // 0x1c5e @0x8
0x1c56…1c6e at0009 = ╱ed╱(╱ // 0x1c5f @0x9
0x1c56…1c6e at000a = ╱57╱W╱ // 0x1c60 @0xa
0x1c56…1c6e at000b = ╱ec╱,╱ // 0x1c61 @0xb
0x1c56…1c6e at000c = ╱38╱8╱ // 0x1c62 @0xc
0x1c56…1c6e at000d = ╱fe00008004╱ // 0x1c63 @0xd
0x1c56…1c6e at0012 = ╱ec╱,╱ // 0x1c68 @0x12
0x1c56…1c6e at0013 = ╱4b╱K╱ // 0x1c69 @0x13
0x1c56…1c6e at0014 = ╱31╱1╱ // 0x1c6a @0x14
0x1c56…1c6e at0015 = ╱ef╱$╱ // 0x1c6b @0x15
0x1c56…1c6e at0016 = ╱ee╱)╱ // 0x1c6c @0x16
0x1c56…1c6e at0017 = EOL // 0x1c6d @0x17
0x1c56…1c6e }
0x1c6e…1c75 a9cc 2860 NEXT I
0x1c6e…1c75 LineComalBin {
0x1c6e…1c75 ptr = 0xa9cc // 0x1c6e @0x0
0x1c6e…1c75 lno = 0x0b2c // 0x1c70 @0x2
0x1c6e…1c75 at0004 = ╱84╱ NEXT ╱ // 0x1c72 @0x4
0x1c6e…1c75 at0005 = ╱49╱I╱ // 0x1c73 @0x5
0x1c6e…1c75 at0006 = EOL // 0x1c74 @0x6
0x1c6e…1c75 }
0x1c75…1c7e a9d5 2870 CLOSE K1$
0x1c75…1c7e LineComalBin {
0x1c75…1c7e ptr = 0xa9d5 // 0x1c75 @0x0
0x1c75…1c7e lno = 0x0b36 // 0x1c77 @0x2
0x1c75…1c7e at0004 = ╱a8╱ CLOSE ╱ // 0x1c79 @0x4
0x1c75…1c7e at0005 = ╱4b╱K╱ // 0x1c7a @0x5
0x1c75…1c7e at0006 = ╱31╱1╱ // 0x1c7b @0x6
0x1c75…1c7e at0007 = ╱ef╱$╱ // 0x1c7c @0x7
0x1c75…1c7e at0008 = EOL // 0x1c7d @0x8
0x1c75…1c7e }
0x1c7e…1c97 a9ee 2880 EXEC FEJL(W,11,K1$)
0x1c7e…1c97 LineComalBin {
0x1c7e…1c97 ptr = 0xa9ee // 0x1c7e @0x0
0x1c7e…1c97 lno = 0x0b40 // 0x1c80 @0x2
0x1c7e…1c97 at0004 = ╱9d╱ EXEC ╱ // 0x1c82 @0x4
0x1c7e…1c97 at0005 = ╱46╱F╱ // 0x1c83 @0x5
0x1c7e…1c97 at0006 = ╱45╱E╱ // 0x1c84 @0x6
0x1c7e…1c97 at0007 = ╱4a╱J╱ // 0x1c85 @0x7
0x1c7e…1c97 at0008 = ╱4c╱L╱ // 0x1c86 @0x8
0x1c7e…1c97 at0009 = ╱ed╱(╱ // 0x1c87 @0x9
0x1c7e…1c97 at000a = ╱57╱W╱ // 0x1c88 @0xa
0x1c7e…1c97 at000b = ╱ec╱,╱ // 0x1c89 @0xb
0x1c7e…1c97 at000c = ╱31╱1╱ // 0x1c8a @0xc
0x1c7e…1c97 at000d = ╱31╱1╱ // 0x1c8b @0xd
0x1c7e…1c97 at000e = ╱fe0000b004╱ // 0x1c8c @0xe
0x1c7e…1c97 at0013 = ╱ec╱,╱ // 0x1c91 @0x13
0x1c7e…1c97 at0014 = ╱4b╱K╱ // 0x1c92 @0x14
0x1c7e…1c97 at0015 = ╱31╱1╱ // 0x1c93 @0x15
0x1c7e…1c97 at0016 = ╱ef╱$╱ // 0x1c94 @0x16
0x1c7e…1c97 at0017 = ╱ee╱)╱ // 0x1c95 @0x17
0x1c7e…1c97 at0018 = EOL // 0x1c96 @0x18
0x1c7e…1c97 }
0x1c97…1ce1 aa38 2890 DIM DSALDI$(MKGR,12),DSALDI1$(MKGR,12),KSALDI1$(MKRGR,12)
0x1c97…1ce1 LineComalBin {
0x1c97…1ce1 ptr = 0xaa38 // 0x1c97 @0x0
0x1c97…1ce1 lno = 0x0b4a // 0x1c99 @0x2
0x1c97…1ce1 at0004 = ╱87╱ DIM ╱ // 0x1c9b @0x4
0x1c97…1ce1 at0005 = ╱44╱D╱ // 0x1c9c @0x5
0x1c97…1ce1 at0006 = ╱53╱S╱ // 0x1c9d @0x6
0x1c97…1ce1 at0007 = ╱41╱A╱ // 0x1c9e @0x7
0x1c97…1ce1 at0008 = ╱4c╱L╱ // 0x1c9f @0x8
0x1c97…1ce1 at0009 = ╱44╱D╱ // 0x1ca0 @0x9
0x1c97…1ce1 at000a = ╱49╱I╱ // 0x1ca1 @0xa
0x1c97…1ce1 at000b = ╱ef╱$╱ // 0x1ca2 @0xb
0x1c97…1ce1 at000c = ╱ed╱(╱ // 0x1ca3 @0xc
0x1c97…1ce1 at000d = ╱4d╱M╱ // 0x1ca4 @0xd
0x1c97…1ce1 at000e = ╱4b╱K╱ // 0x1ca5 @0xe
0x1c97…1ce1 at000f = ╱47╱G╱ // 0x1ca6 @0xf
0x1c97…1ce1 at0010 = ╱52╱R╱ // 0x1ca7 @0x10
0x1c97…1ce1 at0011 = ╱ec╱,╱ // 0x1ca8 @0x11
0x1c97…1ce1 at0012 = ╱31╱1╱ // 0x1ca9 @0x12
0x1c97…1ce1 at0013 = ╱32╱2╱ // 0x1caa @0x13
0x1c97…1ce1 at0014 = ╱fe0000c004╱ // 0x1cab @0x14
0x1c97…1ce1 at0019 = ╱ee╱)╱ // 0x1cb0 @0x19
0x1c97…1ce1 at001a = ╱ec╱,╱ // 0x1cb1 @0x1a
0x1c97…1ce1 at001b = ╱44╱D╱ // 0x1cb2 @0x1b
0x1c97…1ce1 at001c = ╱53╱S╱ // 0x1cb3 @0x1c
0x1c97…1ce1 at001d = ╱41╱A╱ // 0x1cb4 @0x1d
0x1c97…1ce1 at001e = ╱4c╱L╱ // 0x1cb5 @0x1e
0x1c97…1ce1 at001f = ╱44╱D╱ // 0x1cb6 @0x1f
0x1c97…1ce1 at0020 = ╱49╱I╱ // 0x1cb7 @0x20
0x1c97…1ce1 at0021 = ╱31╱1╱ // 0x1cb8 @0x21
0x1c97…1ce1 at0022 = ╱ef╱$╱ // 0x1cb9 @0x22
0x1c97…1ce1 at0023 = ╱ed╱(╱ // 0x1cba @0x23
0x1c97…1ce1 at0024 = ╱4d╱M╱ // 0x1cbb @0x24
0x1c97…1ce1 at0025 = ╱4b╱K╱ // 0x1cbc @0x25
0x1c97…1ce1 at0026 = ╱47╱G╱ // 0x1cbd @0x26
0x1c97…1ce1 at0027 = ╱52╱R╱ // 0x1cbe @0x27
0x1c97…1ce1 at0028 = ╱ec╱,╱ // 0x1cbf @0x28
0x1c97…1ce1 at0029 = ╱31╱1╱ // 0x1cc0 @0x29
0x1c97…1ce1 at002a = ╱32╱2╱ // 0x1cc1 @0x2a
0x1c97…1ce1 at002b = ╱fe0000c004╱ // 0x1cc2 @0x2b
0x1c97…1ce1 at0030 = ╱ee╱)╱ // 0x1cc7 @0x30
0x1c97…1ce1 at0031 = ╱ec╱,╱ // 0x1cc8 @0x31
0x1c97…1ce1 at0032 = ╱4b╱K╱ // 0x1cc9 @0x32
0x1c97…1ce1 at0033 = ╱53╱S╱ // 0x1cca @0x33
0x1c97…1ce1 at0034 = ╱41╱A╱ // 0x1ccb @0x34
0x1c97…1ce1 at0035 = ╱4c╱L╱ // 0x1ccc @0x35
0x1c97…1ce1 at0036 = ╱44╱D╱ // 0x1ccd @0x36
0x1c97…1ce1 at0037 = ╱49╱I╱ // 0x1cce @0x37
0x1c97…1ce1 at0038 = ╱31╱1╱ // 0x1ccf @0x38
0x1c97…1ce1 at0039 = ╱ef╱$╱ // 0x1cd0 @0x39
0x1c97…1ce1 at003a = ╱ed╱(╱ // 0x1cd1 @0x3a
0x1c97…1ce1 at003b = ╱4d╱M╱ // 0x1cd2 @0x3b
0x1c97…1ce1 at003c = ╱4b╱K╱ // 0x1cd3 @0x3c
0x1c97…1ce1 at003d = ╱52╱R╱ // 0x1cd4 @0x3d
0x1c97…1ce1 at003e = ╱47╱G╱ // 0x1cd5 @0x3e
0x1c97…1ce1 at003f = ╱52╱R╱ // 0x1cd6 @0x3f
0x1c97…1ce1 at0040 = ╱ec╱,╱ // 0x1cd7 @0x40
0x1c97…1ce1 at0041 = ╱31╱1╱ // 0x1cd8 @0x41
0x1c97…1ce1 at0042 = ╱32╱2╱ // 0x1cd9 @0x42
0x1c97…1ce1 at0043 = ╱fe0000c004╱ // 0x1cda @0x43
0x1c97…1ce1 at0048 = ╱ee╱)╱ // 0x1cdf @0x48
0x1c97…1ce1 at0049 = EOL // 0x1ce0 @0x49
0x1c97…1ce1 }
0x1ce1…1cfd aa54 2900 DIM KSALDI$(MKRGR,12)
0x1ce1…1cfd LineComalBin {
0x1ce1…1cfd ptr = 0xaa54 // 0x1ce1 @0x0
0x1ce1…1cfd lno = 0x0b54 // 0x1ce3 @0x2
0x1ce1…1cfd at0004 = ╱87╱ DIM ╱ // 0x1ce5 @0x4
0x1ce1…1cfd at0005 = ╱4b╱K╱ // 0x1ce6 @0x5
0x1ce1…1cfd at0006 = ╱53╱S╱ // 0x1ce7 @0x6
0x1ce1…1cfd at0007 = ╱41╱A╱ // 0x1ce8 @0x7
0x1ce1…1cfd at0008 = ╱4c╱L╱ // 0x1ce9 @0x8
0x1ce1…1cfd at0009 = ╱44╱D╱ // 0x1cea @0x9
0x1ce1…1cfd at000a = ╱49╱I╱ // 0x1ceb @0xa
0x1ce1…1cfd at000b = ╱ef╱$╱ // 0x1cec @0xb
0x1ce1…1cfd at000c = ╱ed╱(╱ // 0x1ced @0xc
0x1ce1…1cfd at000d = ╱4d╱M╱ // 0x1cee @0xd
0x1ce1…1cfd at000e = ╱4b╱K╱ // 0x1cef @0xe
0x1ce1…1cfd at000f = ╱52╱R╱ // 0x1cf0 @0xf
0x1ce1…1cfd at0010 = ╱47╱G╱ // 0x1cf1 @0x10
0x1ce1…1cfd at0011 = ╱52╱R╱ // 0x1cf2 @0x11
0x1ce1…1cfd at0012 = ╱ec╱,╱ // 0x1cf3 @0x12
0x1ce1…1cfd at0013 = ╱31╱1╱ // 0x1cf4 @0x13
0x1ce1…1cfd at0014 = ╱32╱2╱ // 0x1cf5 @0x14
0x1ce1…1cfd at0015 = ╱fe0000c004╱ // 0x1cf6 @0x15
0x1ce1…1cfd at001a = ╱ee╱)╱ // 0x1cfb @0x1a
0x1ce1…1cfd at001b = EOL // 0x1cfc @0x1b
0x1ce1…1cfd }
0x1cfd…1d51 aaa8 2910 K3$=N$+K$(G);K4$=N$+K$(V);K5$=N$+K$(5);K6$=N$+K$(6);K7$=N$+K$(7)
0x1cfd…1d51 LineComalBin {
0x1cfd…1d51 ptr = 0xaaa8 // 0x1cfd @0x0
0x1cfd…1d51 lno = 0x0b5e // 0x1cff @0x2
0x1cfd…1d51 at0004 = ╱4b╱K╱ // 0x1d01 @0x4
0x1cfd…1d51 at0005 = ╱33╱3╱ // 0x1d02 @0x5
0x1cfd…1d51 at0006 = ╱ef╱$╱ // 0x1d03 @0x6
0x1cfd…1d51 at0007 = ╱dc╱=╱ // 0x1d04 @0x7
0x1cfd…1d51 at0008 = ╱4e╱N╱ // 0x1d05 @0x8
0x1cfd…1d51 at0009 = ╱ef╱$╱ // 0x1d06 @0x9
0x1cfd…1d51 at000a = ╱f1╱+╱ // 0x1d07 @0xa
0x1cfd…1d51 at000b = ╱4b╱K╱ // 0x1d08 @0xb
0x1cfd…1d51 at000c = ╱ef╱$╱ // 0x1d09 @0xc
0x1cfd…1d51 at000d = ╱ed╱(╱ // 0x1d0a @0xd
0x1cfd…1d51 at000e = ╱47╱G╱ // 0x1d0b @0xe
0x1cfd…1d51 at000f = ╱ee╱)╱ // 0x1d0c @0xf
0x1cfd…1d51 at0010 = ╱eb╱;╱ // 0x1d0d @0x10
0x1cfd…1d51 at0011 = ╱4b╱K╱ // 0x1d0e @0x11
0x1cfd…1d51 at0012 = ╱34╱4╱ // 0x1d0f @0x12
0x1cfd…1d51 at0013 = ╱ef╱$╱ // 0x1d10 @0x13
0x1cfd…1d51 at0014 = ╱dc╱=╱ // 0x1d11 @0x14
0x1cfd…1d51 at0015 = ╱4e╱N╱ // 0x1d12 @0x15
0x1cfd…1d51 at0016 = ╱ef╱$╱ // 0x1d13 @0x16
0x1cfd…1d51 at0017 = ╱f1╱+╱ // 0x1d14 @0x17
0x1cfd…1d51 at0018 = ╱4b╱K╱ // 0x1d15 @0x18
0x1cfd…1d51 at0019 = ╱ef╱$╱ // 0x1d16 @0x19
0x1cfd…1d51 at001a = ╱ed╱(╱ // 0x1d17 @0x1a
0x1cfd…1d51 at001b = ╱56╱V╱ // 0x1d18 @0x1b
0x1cfd…1d51 at001c = ╱ee╱)╱ // 0x1d19 @0x1c
0x1cfd…1d51 at001d = ╱eb╱;╱ // 0x1d1a @0x1d
0x1cfd…1d51 at001e = ╱4b╱K╱ // 0x1d1b @0x1e
0x1cfd…1d51 at001f = ╱35╱5╱ // 0x1d1c @0x1f
0x1cfd…1d51 at0020 = ╱ef╱$╱ // 0x1d1d @0x20
0x1cfd…1d51 at0021 = ╱dc╱=╱ // 0x1d1e @0x21
0x1cfd…1d51 at0022 = ╱4e╱N╱ // 0x1d1f @0x22
0x1cfd…1d51 at0023 = ╱ef╱$╱ // 0x1d20 @0x23
0x1cfd…1d51 at0024 = ╱f1╱+╱ // 0x1d21 @0x24
0x1cfd…1d51 at0025 = ╱4b╱K╱ // 0x1d22 @0x25
0x1cfd…1d51 at0026 = ╱ef╱$╱ // 0x1d23 @0x26
0x1cfd…1d51 at0027 = ╱ed╱(╱ // 0x1d24 @0x27
0x1cfd…1d51 at0028 = ╱35╱5╱ // 0x1d25 @0x28
0x1cfd…1d51 at0029 = ╱fe0000a003╱ // 0x1d26 @0x29
0x1cfd…1d51 at002e = ╱ee╱)╱ // 0x1d2b @0x2e
0x1cfd…1d51 at002f = ╱eb╱;╱ // 0x1d2c @0x2f
0x1cfd…1d51 at0030 = ╱4b╱K╱ // 0x1d2d @0x30
0x1cfd…1d51 at0031 = ╱36╱6╱ // 0x1d2e @0x31
0x1cfd…1d51 at0032 = ╱ef╱$╱ // 0x1d2f @0x32
0x1cfd…1d51 at0033 = ╱dc╱=╱ // 0x1d30 @0x33
0x1cfd…1d51 at0034 = ╱4e╱N╱ // 0x1d31 @0x34
0x1cfd…1d51 at0035 = ╱ef╱$╱ // 0x1d32 @0x35
0x1cfd…1d51 at0036 = ╱f1╱+╱ // 0x1d33 @0x36
0x1cfd…1d51 at0037 = ╱4b╱K╱ // 0x1d34 @0x37
0x1cfd…1d51 at0038 = ╱ef╱$╱ // 0x1d35 @0x38
0x1cfd…1d51 at0039 = ╱ed╱(╱ // 0x1d36 @0x39
0x1cfd…1d51 at003a = ╱36╱6╱ // 0x1d37 @0x3a
0x1cfd…1d51 at003b = ╱fe0000c003╱ // 0x1d38 @0x3b
0x1cfd…1d51 at0040 = ╱ee╱)╱ // 0x1d3d @0x40
0x1cfd…1d51 at0041 = ╱eb╱;╱ // 0x1d3e @0x41
0x1cfd…1d51 at0042 = ╱4b╱K╱ // 0x1d3f @0x42
0x1cfd…1d51 at0043 = ╱37╱7╱ // 0x1d40 @0x43
0x1cfd…1d51 at0044 = ╱ef╱$╱ // 0x1d41 @0x44
0x1cfd…1d51 at0045 = ╱dc╱=╱ // 0x1d42 @0x45
0x1cfd…1d51 at0046 = ╱4e╱N╱ // 0x1d43 @0x46
0x1cfd…1d51 at0047 = ╱ef╱$╱ // 0x1d44 @0x47
0x1cfd…1d51 at0048 = ╱f1╱+╱ // 0x1d45 @0x48
0x1cfd…1d51 at0049 = ╱4b╱K╱ // 0x1d46 @0x49
0x1cfd…1d51 at004a = ╱ef╱$╱ // 0x1d47 @0x4a
0x1cfd…1d51 at004b = ╱ed╱(╱ // 0x1d48 @0x4b
0x1cfd…1d51 at004c = ╱37╱7╱ // 0x1d49 @0x4c
0x1cfd…1d51 at004d = ╱fe0000e003╱ // 0x1d4a @0x4d
0x1cfd…1d51 at0052 = ╱ee╱)╱ // 0x1d4f @0x52
0x1cfd…1d51 at0053 = EOL // 0x1d50 @0x53
0x1cfd…1d51 }
0x1d51…1d9c aaf3 2920 K8$=N$+K$(15);K9$=N$+K$(22);K2$=N$+K$(E);K10$=N$+K$(26)
0x1d51…1d9c LineComalBin {
0x1d51…1d9c ptr = 0xaaf3 // 0x1d51 @0x0
0x1d51…1d9c lno = 0x0b68 // 0x1d53 @0x2
0x1d51…1d9c at0004 = ╱4b╱K╱ // 0x1d55 @0x4
0x1d51…1d9c at0005 = ╱38╱8╱ // 0x1d56 @0x5
0x1d51…1d9c at0006 = ╱ef╱$╱ // 0x1d57 @0x6
0x1d51…1d9c at0007 = ╱dc╱=╱ // 0x1d58 @0x7
0x1d51…1d9c at0008 = ╱4e╱N╱ // 0x1d59 @0x8
0x1d51…1d9c at0009 = ╱ef╱$╱ // 0x1d5a @0x9
0x1d51…1d9c at000a = ╱f1╱+╱ // 0x1d5b @0xa
0x1d51…1d9c at000b = ╱4b╱K╱ // 0x1d5c @0xb
0x1d51…1d9c at000c = ╱ef╱$╱ // 0x1d5d @0xc
0x1d51…1d9c at000d = ╱ed╱(╱ // 0x1d5e @0xd
0x1d51…1d9c at000e = ╱31╱1╱ // 0x1d5f @0xe
0x1d51…1d9c at000f = ╱35╱5╱ // 0x1d60 @0xf
0x1d51…1d9c at0010 = ╱fe0000f004╱ // 0x1d61 @0x10
0x1d51…1d9c at0015 = ╱ee╱)╱ // 0x1d66 @0x15
0x1d51…1d9c at0016 = ╱eb╱;╱ // 0x1d67 @0x16
0x1d51…1d9c at0017 = ╱4b╱K╱ // 0x1d68 @0x17
0x1d51…1d9c at0018 = ╱39╱9╱ // 0x1d69 @0x18
0x1d51…1d9c at0019 = ╱ef╱$╱ // 0x1d6a @0x19
0x1d51…1d9c at001a = ╱dc╱=╱ // 0x1d6b @0x1a
0x1d51…1d9c at001b = ╱4e╱N╱ // 0x1d6c @0x1b
0x1d51…1d9c at001c = ╱ef╱$╱ // 0x1d6d @0x1c
0x1d51…1d9c at001d = ╱f1╱+╱ // 0x1d6e @0x1d
0x1d51…1d9c at001e = ╱4b╱K╱ // 0x1d6f @0x1e
0x1d51…1d9c at001f = ╱ef╱$╱ // 0x1d70 @0x1f
0x1d51…1d9c at0020 = ╱ed╱(╱ // 0x1d71 @0x20
0x1d51…1d9c at0021 = ╱32╱2╱ // 0x1d72 @0x21
0x1d51…1d9c at0022 = ╱32╱2╱ // 0x1d73 @0x22
0x1d51…1d9c at0023 = ╱fe0000b005╱ // 0x1d74 @0x23
0x1d51…1d9c at0028 = ╱ee╱)╱ // 0x1d79 @0x28
0x1d51…1d9c at0029 = ╱eb╱;╱ // 0x1d7a @0x29
0x1d51…1d9c at002a = ╱4b╱K╱ // 0x1d7b @0x2a
0x1d51…1d9c at002b = ╱32╱2╱ // 0x1d7c @0x2b
0x1d51…1d9c at002c = ╱ef╱$╱ // 0x1d7d @0x2c
0x1d51…1d9c at002d = ╱dc╱=╱ // 0x1d7e @0x2d
0x1d51…1d9c at002e = ╱4e╱N╱ // 0x1d7f @0x2e
0x1d51…1d9c at002f = ╱ef╱$╱ // 0x1d80 @0x2f
0x1d51…1d9c at0030 = ╱f1╱+╱ // 0x1d81 @0x30
0x1d51…1d9c at0031 = ╱4b╱K╱ // 0x1d82 @0x31
0x1d51…1d9c at0032 = ╱ef╱$╱ // 0x1d83 @0x32
0x1d51…1d9c at0033 = ╱ed╱(╱ // 0x1d84 @0x33
0x1d51…1d9c at0034 = ╱45╱E╱ // 0x1d85 @0x34
0x1d51…1d9c at0035 = ╱ee╱)╱ // 0x1d86 @0x35
0x1d51…1d9c at0036 = ╱eb╱;╱ // 0x1d87 @0x36
0x1d51…1d9c at0037 = ╱4b╱K╱ // 0x1d88 @0x37
0x1d51…1d9c at0038 = ╱31╱1╱ // 0x1d89 @0x38
0x1d51…1d9c at0039 = ╱30╱0╱ // 0x1d8a @0x39
0x1d51…1d9c at003a = ╱ef╱$╱ // 0x1d8b @0x3a
0x1d51…1d9c at003b = ╱dc╱=╱ // 0x1d8c @0x3b
0x1d51…1d9c at003c = ╱4e╱N╱ // 0x1d8d @0x3c
0x1d51…1d9c at003d = ╱ef╱$╱ // 0x1d8e @0x3d
0x1d51…1d9c at003e = ╱f1╱+╱ // 0x1d8f @0x3e
0x1d51…1d9c at003f = ╱4b╱K╱ // 0x1d90 @0x3f
0x1d51…1d9c at0040 = ╱ef╱$╱ // 0x1d91 @0x40
0x1d51…1d9c at0041 = ╱ed╱(╱ // 0x1d92 @0x41
0x1d51…1d9c at0042 = ╱32╱2╱ // 0x1d93 @0x42
0x1d51…1d9c at0043 = ╱36╱6╱ // 0x1d94 @0x43
0x1d51…1d9c at0044 = ╱fe0000d005╱ // 0x1d95 @0x44
0x1d51…1d9c at0049 = ╱ee╱)╱ // 0x1d9a @0x49
0x1d51…1d9c at004a = EOL // 0x1d9b @0x4a
0x1d51…1d9c }
0x1d9c…1de3 ab3a 2930 DIM FTAB1(MFANTAL DIV 4),DTAB1(MDANTAL DIV 4),KTAB1(MKANTAL DIV 4)
0x1d9c…1de3 LineComalBin {
0x1d9c…1de3 ptr = 0xab3a // 0x1d9c @0x0
0x1d9c…1de3 lno = 0x0b72 // 0x1d9e @0x2
0x1d9c…1de3 at0004 = ╱87╱ DIM ╱ // 0x1da0 @0x4
0x1d9c…1de3 at0005 = ╱46╱F╱ // 0x1da1 @0x5
0x1d9c…1de3 at0006 = ╱54╱T╱ // 0x1da2 @0x6
0x1d9c…1de3 at0007 = ╱41╱A╱ // 0x1da3 @0x7
0x1d9c…1de3 at0008 = ╱42╱B╱ // 0x1da4 @0x8
0x1d9c…1de3 at0009 = ╱31╱1╱ // 0x1da5 @0x9
0x1d9c…1de3 at000a = ╱ed╱(╱ // 0x1da6 @0xa
0x1d9c…1de3 at000b = ╱4d╱M╱ // 0x1da7 @0xb
0x1d9c…1de3 at000c = ╱46╱F╱ // 0x1da8 @0xc
0x1d9c…1de3 at000d = ╱41╱A╱ // 0x1da9 @0xd
0x1d9c…1de3 at000e = ╱4e╱N╱ // 0x1daa @0xe
0x1d9c…1de3 at000f = ╱54╱T╱ // 0x1dab @0xf
0x1d9c…1de3 at0010 = ╱41╱A╱ // 0x1dac @0x10
0x1d9c…1de3 at0011 = ╱4c╱L╱ // 0x1dad @0x11
0x1d9c…1de3 at0012 = ╱e7╱ DIV ╱ // 0x1dae @0x12
0x1d9c…1de3 at0013 = ╱34╱4╱ // 0x1daf @0x13
0x1d9c…1de3 at0014 = ╱fe00008003╱ // 0x1db0 @0x14
0x1d9c…1de3 at0019 = ╱ee╱)╱ // 0x1db5 @0x19
0x1d9c…1de3 at001a = ╱ec╱,╱ // 0x1db6 @0x1a
0x1d9c…1de3 at001b = ╱44╱D╱ // 0x1db7 @0x1b
0x1d9c…1de3 at001c = ╱54╱T╱ // 0x1db8 @0x1c
0x1d9c…1de3 at001d = ╱41╱A╱ // 0x1db9 @0x1d
0x1d9c…1de3 at001e = ╱42╱B╱ // 0x1dba @0x1e
0x1d9c…1de3 at001f = ╱31╱1╱ // 0x1dbb @0x1f
0x1d9c…1de3 at0020 = ╱ed╱(╱ // 0x1dbc @0x20
0x1d9c…1de3 at0021 = ╱4d╱M╱ // 0x1dbd @0x21
0x1d9c…1de3 at0022 = ╱44╱D╱ // 0x1dbe @0x22
0x1d9c…1de3 at0023 = ╱41╱A╱ // 0x1dbf @0x23
0x1d9c…1de3 at0024 = ╱4e╱N╱ // 0x1dc0 @0x24
0x1d9c…1de3 at0025 = ╱54╱T╱ // 0x1dc1 @0x25
0x1d9c…1de3 at0026 = ╱41╱A╱ // 0x1dc2 @0x26
0x1d9c…1de3 at0027 = ╱4c╱L╱ // 0x1dc3 @0x27
0x1d9c…1de3 at0028 = ╱e7╱ DIV ╱ // 0x1dc4 @0x28
0x1d9c…1de3 at0029 = ╱34╱4╱ // 0x1dc5 @0x29
0x1d9c…1de3 at002a = ╱fe00008003╱ // 0x1dc6 @0x2a
0x1d9c…1de3 at002f = ╱ee╱)╱ // 0x1dcb @0x2f
0x1d9c…1de3 at0030 = ╱ec╱,╱ // 0x1dcc @0x30
0x1d9c…1de3 at0031 = ╱4b╱K╱ // 0x1dcd @0x31
0x1d9c…1de3 at0032 = ╱54╱T╱ // 0x1dce @0x32
0x1d9c…1de3 at0033 = ╱41╱A╱ // 0x1dcf @0x33
0x1d9c…1de3 at0034 = ╱42╱B╱ // 0x1dd0 @0x34
0x1d9c…1de3 at0035 = ╱31╱1╱ // 0x1dd1 @0x35
0x1d9c…1de3 at0036 = ╱ed╱(╱ // 0x1dd2 @0x36
0x1d9c…1de3 at0037 = ╱4d╱M╱ // 0x1dd3 @0x37
0x1d9c…1de3 at0038 = ╱4b╱K╱ // 0x1dd4 @0x38
0x1d9c…1de3 at0039 = ╱41╱A╱ // 0x1dd5 @0x39
0x1d9c…1de3 at003a = ╱4e╱N╱ // 0x1dd6 @0x3a
0x1d9c…1de3 at003b = ╱54╱T╱ // 0x1dd7 @0x3b
0x1d9c…1de3 at003c = ╱41╱A╱ // 0x1dd8 @0x3c
0x1d9c…1de3 at003d = ╱4c╱L╱ // 0x1dd9 @0x3d
0x1d9c…1de3 at003e = ╱e7╱ DIV ╱ // 0x1dda @0x3e
0x1d9c…1de3 at003f = ╱34╱4╱ // 0x1ddb @0x3f
0x1d9c…1de3 at0040 = ╱fe00008003╱ // 0x1ddc @0x40
0x1d9c…1de3 at0045 = ╱ee╱)╱ // 0x1de1 @0x45
0x1d9c…1de3 at0046 = EOL // 0x1de2 @0x46
0x1d9c…1de3 }
0x1de3…1e3d ab94 2940 DIM FTAB(4,G),DTAB(4,G),KTAB(4,G),HFTAB(MFPOST DIV 40,G),UFTAB(4,G)
0x1de3…1e3d LineComalBin {
0x1de3…1e3d ptr = 0xab94 // 0x1de3 @0x0
0x1de3…1e3d lno = 0x0b7c // 0x1de5 @0x2
0x1de3…1e3d at0004 = ╱87╱ DIM ╱ // 0x1de7 @0x4
0x1de3…1e3d at0005 = ╱46╱F╱ // 0x1de8 @0x5
0x1de3…1e3d at0006 = ╱54╱T╱ // 0x1de9 @0x6
0x1de3…1e3d at0007 = ╱41╱A╱ // 0x1dea @0x7
0x1de3…1e3d at0008 = ╱42╱B╱ // 0x1deb @0x8
0x1de3…1e3d at0009 = ╱ed╱(╱ // 0x1dec @0x9
0x1de3…1e3d at000a = ╱34╱4╱ // 0x1ded @0xa
0x1de3…1e3d at000b = ╱fe00008003╱ // 0x1dee @0xb
0x1de3…1e3d at0010 = ╱ec╱,╱ // 0x1df3 @0x10
0x1de3…1e3d at0011 = ╱47╱G╱ // 0x1df4 @0x11
0x1de3…1e3d at0012 = ╱ee╱)╱ // 0x1df5 @0x12
0x1de3…1e3d at0013 = ╱ec╱,╱ // 0x1df6 @0x13
0x1de3…1e3d at0014 = ╱44╱D╱ // 0x1df7 @0x14
0x1de3…1e3d at0015 = ╱54╱T╱ // 0x1df8 @0x15
0x1de3…1e3d at0016 = ╱41╱A╱ // 0x1df9 @0x16
0x1de3…1e3d at0017 = ╱42╱B╱ // 0x1dfa @0x17
0x1de3…1e3d at0018 = ╱ed╱(╱ // 0x1dfb @0x18
0x1de3…1e3d at0019 = ╱34╱4╱ // 0x1dfc @0x19
0x1de3…1e3d at001a = ╱fe00008003╱ // 0x1dfd @0x1a
0x1de3…1e3d at001f = ╱ec╱,╱ // 0x1e02 @0x1f
0x1de3…1e3d at0020 = ╱47╱G╱ // 0x1e03 @0x20
0x1de3…1e3d at0021 = ╱ee╱)╱ // 0x1e04 @0x21
0x1de3…1e3d at0022 = ╱ec╱,╱ // 0x1e05 @0x22
0x1de3…1e3d at0023 = ╱4b╱K╱ // 0x1e06 @0x23
0x1de3…1e3d at0024 = ╱54╱T╱ // 0x1e07 @0x24
0x1de3…1e3d at0025 = ╱41╱A╱ // 0x1e08 @0x25
0x1de3…1e3d at0026 = ╱42╱B╱ // 0x1e09 @0x26
0x1de3…1e3d at0027 = ╱ed╱(╱ // 0x1e0a @0x27
0x1de3…1e3d at0028 = ╱34╱4╱ // 0x1e0b @0x28
0x1de3…1e3d at0029 = ╱fe00008003╱ // 0x1e0c @0x29
0x1de3…1e3d at002e = ╱ec╱,╱ // 0x1e11 @0x2e
0x1de3…1e3d at002f = ╱47╱G╱ // 0x1e12 @0x2f
0x1de3…1e3d at0030 = ╱ee╱)╱ // 0x1e13 @0x30
0x1de3…1e3d at0031 = ╱ec╱,╱ // 0x1e14 @0x31
0x1de3…1e3d at0032 = ╱48╱H╱ // 0x1e15 @0x32
0x1de3…1e3d at0033 = ╱46╱F╱ // 0x1e16 @0x33
0x1de3…1e3d at0034 = ╱54╱T╱ // 0x1e17 @0x34
0x1de3…1e3d at0035 = ╱41╱A╱ // 0x1e18 @0x35
0x1de3…1e3d at0036 = ╱42╱B╱ // 0x1e19 @0x36
0x1de3…1e3d at0037 = ╱ed╱(╱ // 0x1e1a @0x37
0x1de3…1e3d at0038 = ╱4d╱M╱ // 0x1e1b @0x38
0x1de3…1e3d at0039 = ╱46╱F╱ // 0x1e1c @0x39
0x1de3…1e3d at003a = ╱50╱P╱ // 0x1e1d @0x3a
0x1de3…1e3d at003b = ╱4f╱O╱ // 0x1e1e @0x3b
0x1de3…1e3d at003c = ╱53╱S╱ // 0x1e1f @0x3c
0x1de3…1e3d at003d = ╱54╱T╱ // 0x1e20 @0x3d
0x1de3…1e3d at003e = ╱e7╱ DIV ╱ // 0x1e21 @0x3e
0x1de3…1e3d at003f = ╱34╱4╱ // 0x1e22 @0x3f
0x1de3…1e3d at0040 = ╱30╱0╱ // 0x1e23 @0x40
0x1de3…1e3d at0041 = ╱fe0000a006╱ // 0x1e24 @0x41
0x1de3…1e3d at0046 = ╱ec╱,╱ // 0x1e29 @0x46
0x1de3…1e3d at0047 = ╱47╱G╱ // 0x1e2a @0x47
0x1de3…1e3d at0048 = ╱ee╱)╱ // 0x1e2b @0x48
0x1de3…1e3d at0049 = ╱ec╱,╱ // 0x1e2c @0x49
0x1de3…1e3d at004a = ╱55╱U╱ // 0x1e2d @0x4a
0x1de3…1e3d at004b = ╱46╱F╱ // 0x1e2e @0x4b
0x1de3…1e3d at004c = ╱54╱T╱ // 0x1e2f @0x4c
0x1de3…1e3d at004d = ╱41╱A╱ // 0x1e30 @0x4d
0x1de3…1e3d at004e = ╱42╱B╱ // 0x1e31 @0x4e
0x1de3…1e3d at004f = ╱ed╱(╱ // 0x1e32 @0x4f
0x1de3…1e3d at0050 = ╱34╱4╱ // 0x1e33 @0x50
0x1de3…1e3d at0051 = ╱fe00008003╱ // 0x1e34 @0x51
0x1de3…1e3d at0056 = ╱ec╱,╱ // 0x1e39 @0x56
0x1de3…1e3d at0057 = ╱47╱G╱ // 0x1e3a @0x57
0x1de3…1e3d at0058 = ╱ee╱)╱ // 0x1e3b @0x58
0x1de3…1e3d at0059 = EOL // 0x1e3c @0x59
0x1de3…1e3d }
0x1e3d…1e49 aba0 2950 OPEN K10$,R
0x1e3d…1e49 LineComalBin {
0x1e3d…1e49 ptr = 0xaba0 // 0x1e3d @0x0
0x1e3d…1e49 lno = 0x0b86 // 0x1e3f @0x2
0x1e3d…1e49 at0004 = ╱a7╱ OPEN ╱ // 0x1e41 @0x4
0x1e3d…1e49 at0005 = ╱4b╱K╱ // 0x1e42 @0x5
0x1e3d…1e49 at0006 = ╱31╱1╱ // 0x1e43 @0x6
0x1e3d…1e49 at0007 = ╱30╱0╱ // 0x1e44 @0x7
0x1e3d…1e49 at0008 = ╱ef╱$╱ // 0x1e45 @0x8
0x1e3d…1e49 at0009 = ╱ec╱,╱ // 0x1e46 @0x9
0x1e3d…1e49 at000a = ╱52╱R╱ // 0x1e47 @0xa
0x1e3d…1e49 at000b = EOL // 0x1e48 @0xb
0x1e3d…1e49 }
0x1e49…1e63 abba 2960 EXEC FEJL(W,12,K10$)
0x1e49…1e63 LineComalBin {
0x1e49…1e63 ptr = 0xabba // 0x1e49 @0x0
0x1e49…1e63 lno = 0x0b90 // 0x1e4b @0x2
0x1e49…1e63 at0004 = ╱9d╱ EXEC ╱ // 0x1e4d @0x4
0x1e49…1e63 at0005 = ╱46╱F╱ // 0x1e4e @0x5
0x1e49…1e63 at0006 = ╱45╱E╱ // 0x1e4f @0x6
0x1e49…1e63 at0007 = ╱4a╱J╱ // 0x1e50 @0x7
0x1e49…1e63 at0008 = ╱4c╱L╱ // 0x1e51 @0x8
0x1e49…1e63 at0009 = ╱ed╱(╱ // 0x1e52 @0x9
0x1e49…1e63 at000a = ╱57╱W╱ // 0x1e53 @0xa
0x1e49…1e63 at000b = ╱ec╱,╱ // 0x1e54 @0xb
0x1e49…1e63 at000c = ╱31╱1╱ // 0x1e55 @0xc
0x1e49…1e63 at000d = ╱32╱2╱ // 0x1e56 @0xd
0x1e49…1e63 at000e = ╱fe0000c004╱ // 0x1e57 @0xe
0x1e49…1e63 at0013 = ╱ec╱,╱ // 0x1e5c @0x13
0x1e49…1e63 at0014 = ╱4b╱K╱ // 0x1e5d @0x14
0x1e49…1e63 at0015 = ╱31╱1╱ // 0x1e5e @0x15
0x1e49…1e63 at0016 = ╱30╱0╱ // 0x1e5f @0x16
0x1e49…1e63 at0017 = ╱ef╱$╱ // 0x1e60 @0x17
0x1e49…1e63 at0018 = ╱ee╱)╱ // 0x1e61 @0x18
0x1e49…1e63 at0019 = EOL // 0x1e62 @0x19
0x1e49…1e63 }
0x1e63…1ebe ac15 2970 GET K10$,G:T1(E),T1(G),T1(V),T1(4),T1(5),T1(6),T1(7),T1(8),T1(W)
0x1e63…1ebe LineComalBin {
0x1e63…1ebe ptr = 0xac15 // 0x1e63 @0x0
0x1e63…1ebe lno = 0x0b9a // 0x1e65 @0x2
0x1e63…1ebe at0004 = ╱a9╱ GET ╱ // 0x1e67 @0x4
0x1e63…1ebe at0005 = ╱4b╱K╱ // 0x1e68 @0x5
0x1e63…1ebe at0006 = ╱31╱1╱ // 0x1e69 @0x6
0x1e63…1ebe at0007 = ╱30╱0╱ // 0x1e6a @0x7
0x1e63…1ebe at0008 = ╱ef╱$╱ // 0x1e6b @0x8
0x1e63…1ebe at0009 = ╱ec╱,╱ // 0x1e6c @0x9
0x1e63…1ebe at000a = ╱47╱G╱ // 0x1e6d @0xa
0x1e63…1ebe at000b = ╱f0╱:╱ // 0x1e6e @0xb
0x1e63…1ebe at000c = ╱54╱T╱ // 0x1e6f @0xc
0x1e63…1ebe at000d = ╱31╱1╱ // 0x1e70 @0xd
0x1e63…1ebe at000e = ╱ed╱(╱ // 0x1e71 @0xe
0x1e63…1ebe at000f = ╱45╱E╱ // 0x1e72 @0xf
0x1e63…1ebe at0010 = ╱ee╱)╱ // 0x1e73 @0x10
0x1e63…1ebe at0011 = ╱ec╱,╱ // 0x1e74 @0x11
0x1e63…1ebe at0012 = ╱54╱T╱ // 0x1e75 @0x12
0x1e63…1ebe at0013 = ╱31╱1╱ // 0x1e76 @0x13
0x1e63…1ebe at0014 = ╱ed╱(╱ // 0x1e77 @0x14
0x1e63…1ebe at0015 = ╱47╱G╱ // 0x1e78 @0x15
0x1e63…1ebe at0016 = ╱ee╱)╱ // 0x1e79 @0x16
0x1e63…1ebe at0017 = ╱ec╱,╱ // 0x1e7a @0x17
0x1e63…1ebe at0018 = ╱54╱T╱ // 0x1e7b @0x18
0x1e63…1ebe at0019 = ╱31╱1╱ // 0x1e7c @0x19
0x1e63…1ebe at001a = ╱ed╱(╱ // 0x1e7d @0x1a
0x1e63…1ebe at001b = ╱56╱V╱ // 0x1e7e @0x1b
0x1e63…1ebe at001c = ╱ee╱)╱ // 0x1e7f @0x1c
0x1e63…1ebe at001d = ╱ec╱,╱ // 0x1e80 @0x1d
0x1e63…1ebe at001e = ╱54╱T╱ // 0x1e81 @0x1e
0x1e63…1ebe at001f = ╱31╱1╱ // 0x1e82 @0x1f
0x1e63…1ebe at0020 = ╱ed╱(╱ // 0x1e83 @0x20
0x1e63…1ebe at0021 = ╱34╱4╱ // 0x1e84 @0x21
0x1e63…1ebe at0022 = ╱fe00008003╱ // 0x1e85 @0x22
0x1e63…1ebe at0027 = ╱ee╱)╱ // 0x1e8a @0x27
0x1e63…1ebe at0028 = ╱ec╱,╱ // 0x1e8b @0x28
0x1e63…1ebe at0029 = ╱54╱T╱ // 0x1e8c @0x29
0x1e63…1ebe at002a = ╱31╱1╱ // 0x1e8d @0x2a
0x1e63…1ebe at002b = ╱ed╱(╱ // 0x1e8e @0x2b
0x1e63…1ebe at002c = ╱35╱5╱ // 0x1e8f @0x2c
0x1e63…1ebe at002d = ╱fe0000a003╱ // 0x1e90 @0x2d
0x1e63…1ebe at0032 = ╱ee╱)╱ // 0x1e95 @0x32
0x1e63…1ebe at0033 = ╱ec╱,╱ // 0x1e96 @0x33
0x1e63…1ebe at0034 = ╱54╱T╱ // 0x1e97 @0x34
0x1e63…1ebe at0035 = ╱31╱1╱ // 0x1e98 @0x35
0x1e63…1ebe at0036 = ╱ed╱(╱ // 0x1e99 @0x36
0x1e63…1ebe at0037 = ╱36╱6╱ // 0x1e9a @0x37
0x1e63…1ebe at0038 = ╱fe0000c003╱ // 0x1e9b @0x38
0x1e63…1ebe at003d = ╱ee╱)╱ // 0x1ea0 @0x3d
0x1e63…1ebe at003e = ╱ec╱,╱ // 0x1ea1 @0x3e
0x1e63…1ebe at003f = ╱54╱T╱ // 0x1ea2 @0x3f
0x1e63…1ebe at0040 = ╱31╱1╱ // 0x1ea3 @0x40
0x1e63…1ebe at0041 = ╱ed╱(╱ // 0x1ea4 @0x41
0x1e63…1ebe at0042 = ╱37╱7╱ // 0x1ea5 @0x42
0x1e63…1ebe at0043 = ╱fe0000e003╱ // 0x1ea6 @0x43
0x1e63…1ebe at0048 = ╱ee╱)╱ // 0x1eab @0x48
0x1e63…1ebe at0049 = ╱ec╱,╱ // 0x1eac @0x49
0x1e63…1ebe at004a = ╱54╱T╱ // 0x1ead @0x4a
0x1e63…1ebe at004b = ╱31╱1╱ // 0x1eae @0x4b
0x1e63…1ebe at004c = ╱ed╱(╱ // 0x1eaf @0x4c
0x1e63…1ebe at004d = ╱38╱8╱ // 0x1eb0 @0x4d
0x1e63…1ebe at004e = ╱fe00008004╱ // 0x1eb1 @0x4e
0x1e63…1ebe at0053 = ╱ee╱)╱ // 0x1eb6 @0x53
0x1e63…1ebe at0054 = ╱ec╱,╱ // 0x1eb7 @0x54
0x1e63…1ebe at0055 = ╱54╱T╱ // 0x1eb8 @0x55
0x1e63…1ebe at0056 = ╱31╱1╱ // 0x1eb9 @0x56
0x1e63…1ebe at0057 = ╱ed╱(╱ // 0x1eba @0x57
0x1e63…1ebe at0058 = ╱57╱W╱ // 0x1ebb @0x58
0x1e63…1ebe at0059 = ╱ee╱)╱ // 0x1ebc @0x59
0x1e63…1ebe at005a = EOL // 0x1ebd @0x5a
0x1e63…1ebe }
0x1ebe…1ed8 ac2f 2980 EXEC FEJL(W,13,K10$)
0x1ebe…1ed8 LineComalBin {
0x1ebe…1ed8 ptr = 0xac2f // 0x1ebe @0x0
0x1ebe…1ed8 lno = 0x0ba4 // 0x1ec0 @0x2
0x1ebe…1ed8 at0004 = ╱9d╱ EXEC ╱ // 0x1ec2 @0x4
0x1ebe…1ed8 at0005 = ╱46╱F╱ // 0x1ec3 @0x5
0x1ebe…1ed8 at0006 = ╱45╱E╱ // 0x1ec4 @0x6
0x1ebe…1ed8 at0007 = ╱4a╱J╱ // 0x1ec5 @0x7
0x1ebe…1ed8 at0008 = ╱4c╱L╱ // 0x1ec6 @0x8
0x1ebe…1ed8 at0009 = ╱ed╱(╱ // 0x1ec7 @0x9
0x1ebe…1ed8 at000a = ╱57╱W╱ // 0x1ec8 @0xa
0x1ebe…1ed8 at000b = ╱ec╱,╱ // 0x1ec9 @0xb
0x1ebe…1ed8 at000c = ╱31╱1╱ // 0x1eca @0xc
0x1ebe…1ed8 at000d = ╱33╱3╱ // 0x1ecb @0xd
0x1ebe…1ed8 at000e = ╱fe0000d004╱ // 0x1ecc @0xe
0x1ebe…1ed8 at0013 = ╱ec╱,╱ // 0x1ed1 @0x13
0x1ebe…1ed8 at0014 = ╱4b╱K╱ // 0x1ed2 @0x14
0x1ebe…1ed8 at0015 = ╱31╱1╱ // 0x1ed3 @0x15
0x1ebe…1ed8 at0016 = ╱30╱0╱ // 0x1ed4 @0x16
0x1ebe…1ed8 at0017 = ╱ef╱$╱ // 0x1ed5 @0x17
0x1ebe…1ed8 at0018 = ╱ee╱)╱ // 0x1ed6 @0x18
0x1ebe…1ed8 at0019 = EOL // 0x1ed7 @0x19
0x1ebe…1ed8 }
0x1ed8…1f39 ac90 2990 GET K10$,13:T2(E),T2(G),T2(V),T2(4),T2(5),T2(6),T2(7),T2(8),T2(W)
0x1ed8…1f39 LineComalBin {
0x1ed8…1f39 ptr = 0xac90 // 0x1ed8 @0x0
0x1ed8…1f39 lno = 0x0bae // 0x1eda @0x2
0x1ed8…1f39 at0004 = ╱a9╱ GET ╱ // 0x1edc @0x4
0x1ed8…1f39 at0005 = ╱4b╱K╱ // 0x1edd @0x5
0x1ed8…1f39 at0006 = ╱31╱1╱ // 0x1ede @0x6
0x1ed8…1f39 at0007 = ╱30╱0╱ // 0x1edf @0x7
0x1ed8…1f39 at0008 = ╱ef╱$╱ // 0x1ee0 @0x8
0x1ed8…1f39 at0009 = ╱ec╱,╱ // 0x1ee1 @0x9
0x1ed8…1f39 at000a = ╱31╱1╱ // 0x1ee2 @0xa
0x1ed8…1f39 at000b = ╱33╱3╱ // 0x1ee3 @0xb
0x1ed8…1f39 at000c = ╱fe0000d004╱ // 0x1ee4 @0xc
0x1ed8…1f39 at0011 = ╱f0╱:╱ // 0x1ee9 @0x11
0x1ed8…1f39 at0012 = ╱54╱T╱ // 0x1eea @0x12
0x1ed8…1f39 at0013 = ╱32╱2╱ // 0x1eeb @0x13
0x1ed8…1f39 at0014 = ╱ed╱(╱ // 0x1eec @0x14
0x1ed8…1f39 at0015 = ╱45╱E╱ // 0x1eed @0x15
0x1ed8…1f39 at0016 = ╱ee╱)╱ // 0x1eee @0x16
0x1ed8…1f39 at0017 = ╱ec╱,╱ // 0x1eef @0x17
0x1ed8…1f39 at0018 = ╱54╱T╱ // 0x1ef0 @0x18
0x1ed8…1f39 at0019 = ╱32╱2╱ // 0x1ef1 @0x19
0x1ed8…1f39 at001a = ╱ed╱(╱ // 0x1ef2 @0x1a
0x1ed8…1f39 at001b = ╱47╱G╱ // 0x1ef3 @0x1b
0x1ed8…1f39 at001c = ╱ee╱)╱ // 0x1ef4 @0x1c
0x1ed8…1f39 at001d = ╱ec╱,╱ // 0x1ef5 @0x1d
0x1ed8…1f39 at001e = ╱54╱T╱ // 0x1ef6 @0x1e
0x1ed8…1f39 at001f = ╱32╱2╱ // 0x1ef7 @0x1f
0x1ed8…1f39 at0020 = ╱ed╱(╱ // 0x1ef8 @0x20
0x1ed8…1f39 at0021 = ╱56╱V╱ // 0x1ef9 @0x21
0x1ed8…1f39 at0022 = ╱ee╱)╱ // 0x1efa @0x22
0x1ed8…1f39 at0023 = ╱ec╱,╱ // 0x1efb @0x23
0x1ed8…1f39 at0024 = ╱54╱T╱ // 0x1efc @0x24
0x1ed8…1f39 at0025 = ╱32╱2╱ // 0x1efd @0x25
0x1ed8…1f39 at0026 = ╱ed╱(╱ // 0x1efe @0x26
0x1ed8…1f39 at0027 = ╱34╱4╱ // 0x1eff @0x27
0x1ed8…1f39 at0028 = ╱fe00008003╱ // 0x1f00 @0x28
0x1ed8…1f39 at002d = ╱ee╱)╱ // 0x1f05 @0x2d
0x1ed8…1f39 at002e = ╱ec╱,╱ // 0x1f06 @0x2e
0x1ed8…1f39 at002f = ╱54╱T╱ // 0x1f07 @0x2f
0x1ed8…1f39 at0030 = ╱32╱2╱ // 0x1f08 @0x30
0x1ed8…1f39 at0031 = ╱ed╱(╱ // 0x1f09 @0x31
0x1ed8…1f39 at0032 = ╱35╱5╱ // 0x1f0a @0x32
0x1ed8…1f39 at0033 = ╱fe0000a003╱ // 0x1f0b @0x33
0x1ed8…1f39 at0038 = ╱ee╱)╱ // 0x1f10 @0x38
0x1ed8…1f39 at0039 = ╱ec╱,╱ // 0x1f11 @0x39
0x1ed8…1f39 at003a = ╱54╱T╱ // 0x1f12 @0x3a
0x1ed8…1f39 at003b = ╱32╱2╱ // 0x1f13 @0x3b
0x1ed8…1f39 at003c = ╱ed╱(╱ // 0x1f14 @0x3c
0x1ed8…1f39 at003d = ╱36╱6╱ // 0x1f15 @0x3d
0x1ed8…1f39 at003e = ╱fe0000c003╱ // 0x1f16 @0x3e
0x1ed8…1f39 at0043 = ╱ee╱)╱ // 0x1f1b @0x43
0x1ed8…1f39 at0044 = ╱ec╱,╱ // 0x1f1c @0x44
0x1ed8…1f39 at0045 = ╱54╱T╱ // 0x1f1d @0x45
0x1ed8…1f39 at0046 = ╱32╱2╱ // 0x1f1e @0x46
0x1ed8…1f39 at0047 = ╱ed╱(╱ // 0x1f1f @0x47
0x1ed8…1f39 at0048 = ╱37╱7╱ // 0x1f20 @0x48
0x1ed8…1f39 at0049 = ╱fe0000e003╱ // 0x1f21 @0x49
0x1ed8…1f39 at004e = ╱ee╱)╱ // 0x1f26 @0x4e
0x1ed8…1f39 at004f = ╱ec╱,╱ // 0x1f27 @0x4f
0x1ed8…1f39 at0050 = ╱54╱T╱ // 0x1f28 @0x50
0x1ed8…1f39 at0051 = ╱32╱2╱ // 0x1f29 @0x51
0x1ed8…1f39 at0052 = ╱ed╱(╱ // 0x1f2a @0x52
0x1ed8…1f39 at0053 = ╱38╱8╱ // 0x1f2b @0x53
0x1ed8…1f39 at0054 = ╱fe00008004╱ // 0x1f2c @0x54
0x1ed8…1f39 at0059 = ╱ee╱)╱ // 0x1f31 @0x59
0x1ed8…1f39 at005a = ╱ec╱,╱ // 0x1f32 @0x5a
0x1ed8…1f39 at005b = ╱54╱T╱ // 0x1f33 @0x5b
0x1ed8…1f39 at005c = ╱32╱2╱ // 0x1f34 @0x5c
0x1ed8…1f39 at005d = ╱ed╱(╱ // 0x1f35 @0x5d
0x1ed8…1f39 at005e = ╱57╱W╱ // 0x1f36 @0x5e
0x1ed8…1f39 at005f = ╱ee╱)╱ // 0x1f37 @0x5f
0x1ed8…1f39 at0060 = EOL // 0x1f38 @0x60
0x1ed8…1f39 }
0x1f39…1f53 acaa 3000 EXEC FEJL(W,14,K10$)
0x1f39…1f53 LineComalBin {
0x1f39…1f53 ptr = 0xacaa // 0x1f39 @0x0
0x1f39…1f53 lno = 0x0bb8 // 0x1f3b @0x2
0x1f39…1f53 at0004 = ╱9d╱ EXEC ╱ // 0x1f3d @0x4
0x1f39…1f53 at0005 = ╱46╱F╱ // 0x1f3e @0x5
0x1f39…1f53 at0006 = ╱45╱E╱ // 0x1f3f @0x6
0x1f39…1f53 at0007 = ╱4a╱J╱ // 0x1f40 @0x7
0x1f39…1f53 at0008 = ╱4c╱L╱ // 0x1f41 @0x8
0x1f39…1f53 at0009 = ╱ed╱(╱ // 0x1f42 @0x9
0x1f39…1f53 at000a = ╱57╱W╱ // 0x1f43 @0xa
0x1f39…1f53 at000b = ╱ec╱,╱ // 0x1f44 @0xb
0x1f39…1f53 at000c = ╱31╱1╱ // 0x1f45 @0xc
0x1f39…1f53 at000d = ╱34╱4╱ // 0x1f46 @0xd
0x1f39…1f53 at000e = ╱fe0000e004╱ // 0x1f47 @0xe
0x1f39…1f53 at0013 = ╱ec╱,╱ // 0x1f4c @0x13
0x1f39…1f53 at0014 = ╱4b╱K╱ // 0x1f4d @0x14
0x1f39…1f53 at0015 = ╱31╱1╱ // 0x1f4e @0x15
0x1f39…1f53 at0016 = ╱30╱0╱ // 0x1f4f @0x16
0x1f39…1f53 at0017 = ╱ef╱$╱ // 0x1f50 @0x17
0x1f39…1f53 at0018 = ╱ee╱)╱ // 0x1f51 @0x18
0x1f39…1f53 at0019 = EOL // 0x1f52 @0x19
0x1f39…1f53 }
0x1f53…1f69 acc0 3002 GET K10$,20:DV$
0x1f53…1f69 LineComalBin {
0x1f53…1f69 ptr = 0xacc0 // 0x1f53 @0x0
0x1f53…1f69 lno = 0x0bba // 0x1f55 @0x2
0x1f53…1f69 at0004 = ╱a9╱ GET ╱ // 0x1f57 @0x4
0x1f53…1f69 at0005 = ╱4b╱K╱ // 0x1f58 @0x5
0x1f53…1f69 at0006 = ╱31╱1╱ // 0x1f59 @0x6
0x1f53…1f69 at0007 = ╱30╱0╱ // 0x1f5a @0x7
0x1f53…1f69 at0008 = ╱ef╱$╱ // 0x1f5b @0x8
0x1f53…1f69 at0009 = ╱ec╱,╱ // 0x1f5c @0x9
0x1f53…1f69 at000a = ╱32╱2╱ // 0x1f5d @0xa
0x1f53…1f69 at000b = ╱30╱0╱ // 0x1f5e @0xb
0x1f53…1f69 at000c = ╱fe0000a005╱ // 0x1f5f @0xc
0x1f53…1f69 at0011 = ╱f0╱:╱ // 0x1f64 @0x11
0x1f53…1f69 at0012 = ╱44╱D╱ // 0x1f65 @0x12
0x1f53…1f69 at0013 = ╱56╱V╱ // 0x1f66 @0x13
0x1f53…1f69 at0014 = ╱ef╱$╱ // 0x1f67 @0x14
0x1f53…1f69 at0015 = EOL // 0x1f68 @0x15
0x1f53…1f69 }
0x1f69…1f83 acda 3004 EXEC FEJL(W,25,K10$)
0x1f69…1f83 LineComalBin {
0x1f69…1f83 ptr = 0xacda // 0x1f69 @0x0
0x1f69…1f83 lno = 0x0bbc // 0x1f6b @0x2
0x1f69…1f83 at0004 = ╱9d╱ EXEC ╱ // 0x1f6d @0x4
0x1f69…1f83 at0005 = ╱46╱F╱ // 0x1f6e @0x5
0x1f69…1f83 at0006 = ╱45╱E╱ // 0x1f6f @0x6
0x1f69…1f83 at0007 = ╱4a╱J╱ // 0x1f70 @0x7
0x1f69…1f83 at0008 = ╱4c╱L╱ // 0x1f71 @0x8
0x1f69…1f83 at0009 = ╱ed╱(╱ // 0x1f72 @0x9
0x1f69…1f83 at000a = ╱57╱W╱ // 0x1f73 @0xa
0x1f69…1f83 at000b = ╱ec╱,╱ // 0x1f74 @0xb
0x1f69…1f83 at000c = ╱32╱2╱ // 0x1f75 @0xc
0x1f69…1f83 at000d = ╱35╱5╱ // 0x1f76 @0xd
0x1f69…1f83 at000e = ╱fe0000c805╱ // 0x1f77 @0xe
0x1f69…1f83 at0013 = ╱ec╱,╱ // 0x1f7c @0x13
0x1f69…1f83 at0014 = ╱4b╱K╱ // 0x1f7d @0x14
0x1f69…1f83 at0015 = ╱31╱1╱ // 0x1f7e @0x15
0x1f69…1f83 at0016 = ╱30╱0╱ // 0x1f7f @0x16
0x1f69…1f83 at0017 = ╱ef╱$╱ // 0x1f80 @0x17
0x1f69…1f83 at0018 = ╱ee╱)╱ // 0x1f81 @0x18
0x1f69…1f83 at0019 = EOL // 0x1f82 @0x19
0x1f69…1f83 }
0x1f83…1f8d ace4 3010 CLOSE K10$
0x1f83…1f8d LineComalBin {
0x1f83…1f8d ptr = 0xace4 // 0x1f83 @0x0
0x1f83…1f8d lno = 0x0bc2 // 0x1f85 @0x2
0x1f83…1f8d at0004 = ╱a8╱ CLOSE ╱ // 0x1f87 @0x4
0x1f83…1f8d at0005 = ╱4b╱K╱ // 0x1f88 @0x5
0x1f83…1f8d at0006 = ╱31╱1╱ // 0x1f89 @0x6
0x1f83…1f8d at0007 = ╱30╱0╱ // 0x1f8a @0x7
0x1f83…1f8d at0008 = ╱ef╱$╱ // 0x1f8b @0x8
0x1f83…1f8d at0009 = EOL // 0x1f8c @0x9
0x1f83…1f8d }
0x1f8d…1fa7 acfe 3020 EXEC FEJL(W,15,K10$)
0x1f8d…1fa7 LineComalBin {
0x1f8d…1fa7 ptr = 0xacfe // 0x1f8d @0x0
0x1f8d…1fa7 lno = 0x0bcc // 0x1f8f @0x2
0x1f8d…1fa7 at0004 = ╱9d╱ EXEC ╱ // 0x1f91 @0x4
0x1f8d…1fa7 at0005 = ╱46╱F╱ // 0x1f92 @0x5
0x1f8d…1fa7 at0006 = ╱45╱E╱ // 0x1f93 @0x6
0x1f8d…1fa7 at0007 = ╱4a╱J╱ // 0x1f94 @0x7
0x1f8d…1fa7 at0008 = ╱4c╱L╱ // 0x1f95 @0x8
0x1f8d…1fa7 at0009 = ╱ed╱(╱ // 0x1f96 @0x9
0x1f8d…1fa7 at000a = ╱57╱W╱ // 0x1f97 @0xa
0x1f8d…1fa7 at000b = ╱ec╱,╱ // 0x1f98 @0xb
0x1f8d…1fa7 at000c = ╱31╱1╱ // 0x1f99 @0xc
0x1f8d…1fa7 at000d = ╱35╱5╱ // 0x1f9a @0xd
0x1f8d…1fa7 at000e = ╱fe0000f004╱ // 0x1f9b @0xe
0x1f8d…1fa7 at0013 = ╱ec╱,╱ // 0x1fa0 @0x13
0x1f8d…1fa7 at0014 = ╱4b╱K╱ // 0x1fa1 @0x14
0x1f8d…1fa7 at0015 = ╱31╱1╱ // 0x1fa2 @0x15
0x1f8d…1fa7 at0016 = ╱30╱0╱ // 0x1fa3 @0x16
0x1f8d…1fa7 at0017 = ╱ef╱$╱ // 0x1fa4 @0x17
0x1f8d…1fa7 at0018 = ╱ee╱)╱ // 0x1fa5 @0x18
0x1f8d…1fa7 at0019 = EOL // 0x1fa6 @0x19
0x1f8d…1fa7 }
0x1fa7…1fb2 ad09 3030 OPEN K2$,R
0x1fa7…1fb2 LineComalBin {
0x1fa7…1fb2 ptr = 0xad09 // 0x1fa7 @0x0
0x1fa7…1fb2 lno = 0x0bd6 // 0x1fa9 @0x2
0x1fa7…1fb2 at0004 = ╱a7╱ OPEN ╱ // 0x1fab @0x4
0x1fa7…1fb2 at0005 = ╱4b╱K╱ // 0x1fac @0x5
0x1fa7…1fb2 at0006 = ╱32╱2╱ // 0x1fad @0x6
0x1fa7…1fb2 at0007 = ╱ef╱$╱ // 0x1fae @0x7
0x1fa7…1fb2 at0008 = ╱ec╱,╱ // 0x1faf @0x8
0x1fa7…1fb2 at0009 = ╱52╱R╱ // 0x1fb0 @0x9
0x1fa7…1fb2 at000a = EOL // 0x1fb1 @0xa
0x1fa7…1fb2 }
0x1fb2…1fcb ad22 3040 EXEC FEJL(W,16,K2$)
0x1fb2…1fcb LineComalBin {
0x1fb2…1fcb ptr = 0xad22 // 0x1fb2 @0x0
0x1fb2…1fcb lno = 0x0be0 // 0x1fb4 @0x2
0x1fb2…1fcb at0004 = ╱9d╱ EXEC ╱ // 0x1fb6 @0x4
0x1fb2…1fcb at0005 = ╱46╱F╱ // 0x1fb7 @0x5
0x1fb2…1fcb at0006 = ╱45╱E╱ // 0x1fb8 @0x6
0x1fb2…1fcb at0007 = ╱4a╱J╱ // 0x1fb9 @0x7
0x1fb2…1fcb at0008 = ╱4c╱L╱ // 0x1fba @0x8
0x1fb2…1fcb at0009 = ╱ed╱(╱ // 0x1fbb @0x9
0x1fb2…1fcb at000a = ╱57╱W╱ // 0x1fbc @0xa
0x1fb2…1fcb at000b = ╱ec╱,╱ // 0x1fbd @0xb
0x1fb2…1fcb at000c = ╱31╱1╱ // 0x1fbe @0xc
0x1fb2…1fcb at000d = ╱36╱6╱ // 0x1fbf @0xd
0x1fb2…1fcb at000e = ╱fe00008005╱ // 0x1fc0 @0xe
0x1fb2…1fcb at0013 = ╱ec╱,╱ // 0x1fc5 @0x13
0x1fb2…1fcb at0014 = ╱4b╱K╱ // 0x1fc6 @0x14
0x1fb2…1fcb at0015 = ╱32╱2╱ // 0x1fc7 @0x15
0x1fb2…1fcb at0016 = ╱ef╱$╱ // 0x1fc8 @0x16
0x1fb2…1fcb at0017 = ╱ee╱)╱ // 0x1fc9 @0x17
0x1fb2…1fcb at0018 = EOL // 0x1fca @0x18
0x1fb2…1fcb }
0x1fcb…1fd6 ad2d 3050 OPEN K3$,R
0x1fcb…1fd6 LineComalBin {
0x1fcb…1fd6 ptr = 0xad2d // 0x1fcb @0x0
0x1fcb…1fd6 lno = 0x0bea // 0x1fcd @0x2
0x1fcb…1fd6 at0004 = ╱a7╱ OPEN ╱ // 0x1fcf @0x4
0x1fcb…1fd6 at0005 = ╱4b╱K╱ // 0x1fd0 @0x5
0x1fcb…1fd6 at0006 = ╱33╱3╱ // 0x1fd1 @0x6
0x1fcb…1fd6 at0007 = ╱ef╱$╱ // 0x1fd2 @0x7
0x1fcb…1fd6 at0008 = ╱ec╱,╱ // 0x1fd3 @0x8
0x1fcb…1fd6 at0009 = ╱52╱R╱ // 0x1fd4 @0x9
0x1fcb…1fd6 at000a = EOL // 0x1fd5 @0xa
0x1fcb…1fd6 }
0x1fd6…1fef ad46 3060 EXEC FEJL(W,18,K3$)
0x1fd6…1fef LineComalBin {
0x1fd6…1fef ptr = 0xad46 // 0x1fd6 @0x0
0x1fd6…1fef lno = 0x0bf4 // 0x1fd8 @0x2
0x1fd6…1fef at0004 = ╱9d╱ EXEC ╱ // 0x1fda @0x4
0x1fd6…1fef at0005 = ╱46╱F╱ // 0x1fdb @0x5
0x1fd6…1fef at0006 = ╱45╱E╱ // 0x1fdc @0x6
0x1fd6…1fef at0007 = ╱4a╱J╱ // 0x1fdd @0x7
0x1fd6…1fef at0008 = ╱4c╱L╱ // 0x1fde @0x8
0x1fd6…1fef at0009 = ╱ed╱(╱ // 0x1fdf @0x9
0x1fd6…1fef at000a = ╱57╱W╱ // 0x1fe0 @0xa
0x1fd6…1fef at000b = ╱ec╱,╱ // 0x1fe1 @0xb
0x1fd6…1fef at000c = ╱31╱1╱ // 0x1fe2 @0xc
0x1fd6…1fef at000d = ╱38╱8╱ // 0x1fe3 @0xd
0x1fd6…1fef at000e = ╱fe00009005╱ // 0x1fe4 @0xe
0x1fd6…1fef at0013 = ╱ec╱,╱ // 0x1fe9 @0x13
0x1fd6…1fef at0014 = ╱4b╱K╱ // 0x1fea @0x14
0x1fd6…1fef at0015 = ╱33╱3╱ // 0x1feb @0x15
0x1fd6…1fef at0016 = ╱ef╱$╱ // 0x1fec @0x16
0x1fd6…1fef at0017 = ╱ee╱)╱ // 0x1fed @0x17
0x1fd6…1fef at0018 = EOL // 0x1fee @0x18
0x1fd6…1fef }
0x1fef…1ffa ad51 3070 OPEN K4$,R
0x1fef…1ffa LineComalBin {
0x1fef…1ffa ptr = 0xad51 // 0x1fef @0x0
0x1fef…1ffa lno = 0x0bfe // 0x1ff1 @0x2
0x1fef…1ffa at0004 = ╱a7╱ OPEN ╱ // 0x1ff3 @0x4
0x1fef…1ffa at0005 = ╱4b╱K╱ // 0x1ff4 @0x5
0x1fef…1ffa at0006 = ╱34╱4╱ // 0x1ff5 @0x6
0x1fef…1ffa at0007 = ╱ef╱$╱ // 0x1ff6 @0x7
0x1fef…1ffa at0008 = ╱ec╱,╱ // 0x1ff7 @0x8
0x1fef…1ffa at0009 = ╱52╱R╱ // 0x1ff8 @0x9
0x1fef…1ffa at000a = EOL // 0x1ff9 @0xa
0x1fef…1ffa }
0x1ffa…2013 ad6a 3080 EXEC FEJL(W,19,K4$)
0x1ffa…2013 LineComalBin {
0x1ffa…2013 ptr = 0xad6a // 0x1ffa @0x0
0x1ffa…2013 lno = 0x0c08 // 0x1ffc @0x2
0x1ffa…2013 at0004 = ╱9d╱ EXEC ╱ // 0x1ffe @0x4
0x1ffa…2013 at0005 = ╱46╱F╱ // 0x1fff @0x5
0x1ffa…2013 at0006 = ╱45╱E╱ // 0x2000 @0x6
0x1ffa…2013 at0007 = ╱4a╱J╱ // 0x2001 @0x7
0x1ffa…2013 at0008 = ╱4c╱L╱ // 0x2002 @0x8
0x1ffa…2013 at0009 = ╱ed╱(╱ // 0x2003 @0x9
0x1ffa…2013 at000a = ╱57╱W╱ // 0x2004 @0xa
0x1ffa…2013 at000b = ╱ec╱,╱ // 0x2005 @0xb
0x1ffa…2013 at000c = ╱31╱1╱ // 0x2006 @0xc
0x1ffa…2013 at000d = ╱39╱9╱ // 0x2007 @0xd
0x1ffa…2013 at000e = ╱fe00009805╱ // 0x2008 @0xe
0x1ffa…2013 at0013 = ╱ec╱,╱ // 0x200d @0x13
0x1ffa…2013 at0014 = ╱4b╱K╱ // 0x200e @0x14
0x1ffa…2013 at0015 = ╱34╱4╱ // 0x200f @0x15
0x1ffa…2013 at0016 = ╱ef╱$╱ // 0x2010 @0x16
0x1ffa…2013 at0017 = ╱ee╱)╱ // 0x2011 @0x17
0x1ffa…2013 at0018 = EOL // 0x2012 @0x18
0x1ffa…2013 }
0x2013…2021 ad78 3090 FOR I=E TO MKGR
0x2013…2021 LineComalBin {
0x2013…2021 ptr = 0xad78 // 0x2013 @0x0
0x2013…2021 lno = 0x0c12 // 0x2015 @0x2
0x2013…2021 at0004 = ╱83╱ FOR ╱ // 0x2017 @0x4
0x2013…2021 at0005 = ╱49╱I╱ // 0x2018 @0x5
0x2013…2021 at0006 = ╱dc╱=╱ // 0x2019 @0x6
0x2013…2021 at0007 = ╱45╱E╱ // 0x201a @0x7
0x2013…2021 at0008 = ╱b7╱ TO ╱ // 0x201b @0x8
0x2013…2021 at0009 = ╱4d╱M╱ // 0x201c @0x9
0x2013…2021 at000a = ╱4b╱K╱ // 0x201d @0xa
0x2013…2021 at000b = ╱47╱G╱ // 0x201e @0xb
0x2013…2021 at000c = ╱52╱R╱ // 0x201f @0xc
0x2013…2021 at000d = EOL // 0x2020 @0xd
0x2013…2021 }
0x2021…2046 ad9d 3100 DSALDI$(I)="0+";DSALDI1$(I)="0+"
0x2021…2046 LineComalBin {
0x2021…2046 ptr = 0xad9d // 0x2021 @0x0
0x2021…2046 lno = 0x0c1c // 0x2023 @0x2
0x2021…2046 at0004 = ╱44╱D╱ // 0x2025 @0x4
0x2021…2046 at0005 = ╱53╱S╱ // 0x2026 @0x5
0x2021…2046 at0006 = ╱41╱A╱ // 0x2027 @0x6
0x2021…2046 at0007 = ╱4c╱L╱ // 0x2028 @0x7
0x2021…2046 at0008 = ╱44╱D╱ // 0x2029 @0x8
0x2021…2046 at0009 = ╱49╱I╱ // 0x202a @0x9
0x2021…2046 at000a = ╱ef╱$╱ // 0x202b @0xa
0x2021…2046 at000b = ╱ed╱(╱ // 0x202c @0xb
0x2021…2046 at000c = ╱49╱I╱ // 0x202d @0xc
0x2021…2046 at000d = ╱ee╱)╱ // 0x202e @0xd
0x2021…2046 at000e = ╱dc╱=╱ // 0x202f @0xe
0x2021…2046 at000f = ╱22╱"╱ // 0x2030 @0xf
0x2021…2046 at0010 = ╱30╱0╱ // 0x2031 @0x10
0x2021…2046 at0011 = ╱2b╱+╱ // 0x2032 @0x11
0x2021…2046 at0012 = ╱22╱"╱ // 0x2033 @0x12
0x2021…2046 at0013 = ╱eb╱;╱ // 0x2034 @0x13
0x2021…2046 at0014 = ╱44╱D╱ // 0x2035 @0x14
0x2021…2046 at0015 = ╱53╱S╱ // 0x2036 @0x15
0x2021…2046 at0016 = ╱41╱A╱ // 0x2037 @0x16
0x2021…2046 at0017 = ╱4c╱L╱ // 0x2038 @0x17
0x2021…2046 at0018 = ╱44╱D╱ // 0x2039 @0x18
0x2021…2046 at0019 = ╱49╱I╱ // 0x203a @0x19
0x2021…2046 at001a = ╱31╱1╱ // 0x203b @0x1a
0x2021…2046 at001b = ╱ef╱$╱ // 0x203c @0x1b
0x2021…2046 at001c = ╱ed╱(╱ // 0x203d @0x1c
0x2021…2046 at001d = ╱49╱I╱ // 0x203e @0x1d
0x2021…2046 at001e = ╱ee╱)╱ // 0x203f @0x1e
0x2021…2046 at001f = ╱dc╱=╱ // 0x2040 @0x1f
0x2021…2046 at0020 = ╱22╱"╱ // 0x2041 @0x20
0x2021…2046 at0021 = ╱30╱0╱ // 0x2042 @0x21
0x2021…2046 at0022 = ╱2b╱+╱ // 0x2043 @0x22
0x2021…2046 at0023 = ╱22╱"╱ // 0x2044 @0x23
0x2021…2046 at0024 = EOL // 0x2045 @0x24
0x2021…2046 }
0x2046…204d ada4 3110 NEXT I
0x2046…204d LineComalBin {
0x2046…204d ptr = 0xada4 // 0x2046 @0x0
0x2046…204d lno = 0x0c26 // 0x2048 @0x2
0x2046…204d at0004 = ╱84╱ NEXT ╱ // 0x204a @0x4
0x2046…204d at0005 = ╱49╱I╱ // 0x204b @0x5
0x2046…204d at0006 = EOL // 0x204c @0x6
0x2046…204d }
0x204d…205c adb3 3120 FOR I=E TO MKRGR
0x204d…205c LineComalBin {
0x204d…205c ptr = 0xadb3 // 0x204d @0x0
0x204d…205c lno = 0x0c30 // 0x204f @0x2
0x204d…205c at0004 = ╱83╱ FOR ╱ // 0x2051 @0x4
0x204d…205c at0005 = ╱49╱I╱ // 0x2052 @0x5
0x204d…205c at0006 = ╱dc╱=╱ // 0x2053 @0x6
0x204d…205c at0007 = ╱45╱E╱ // 0x2054 @0x7
0x204d…205c at0008 = ╱b7╱ TO ╱ // 0x2055 @0x8
0x204d…205c at0009 = ╱4d╱M╱ // 0x2056 @0x9
0x204d…205c at000a = ╱4b╱K╱ // 0x2057 @0xa
0x204d…205c at000b = ╱52╱R╱ // 0x2058 @0xb
0x204d…205c at000c = ╱47╱G╱ // 0x2059 @0xc
0x204d…205c at000d = ╱52╱R╱ // 0x205a @0xd
0x204d…205c at000e = EOL // 0x205b @0xe
0x204d…205c }
0x205c…2081 add8 3130 KSALDI$(I)="0+";KSALDI1$(I)="0+"
0x205c…2081 LineComalBin {
0x205c…2081 ptr = 0xadd8 // 0x205c @0x0
0x205c…2081 lno = 0x0c3a // 0x205e @0x2
0x205c…2081 at0004 = ╱4b╱K╱ // 0x2060 @0x4
0x205c…2081 at0005 = ╱53╱S╱ // 0x2061 @0x5
0x205c…2081 at0006 = ╱41╱A╱ // 0x2062 @0x6
0x205c…2081 at0007 = ╱4c╱L╱ // 0x2063 @0x7
0x205c…2081 at0008 = ╱44╱D╱ // 0x2064 @0x8
0x205c…2081 at0009 = ╱49╱I╱ // 0x2065 @0x9
0x205c…2081 at000a = ╱ef╱$╱ // 0x2066 @0xa
0x205c…2081 at000b = ╱ed╱(╱ // 0x2067 @0xb
0x205c…2081 at000c = ╱49╱I╱ // 0x2068 @0xc
0x205c…2081 at000d = ╱ee╱)╱ // 0x2069 @0xd
0x205c…2081 at000e = ╱dc╱=╱ // 0x206a @0xe
0x205c…2081 at000f = ╱22╱"╱ // 0x206b @0xf
0x205c…2081 at0010 = ╱30╱0╱ // 0x206c @0x10
0x205c…2081 at0011 = ╱2b╱+╱ // 0x206d @0x11
0x205c…2081 at0012 = ╱22╱"╱ // 0x206e @0x12
0x205c…2081 at0013 = ╱eb╱;╱ // 0x206f @0x13
0x205c…2081 at0014 = ╱4b╱K╱ // 0x2070 @0x14
0x205c…2081 at0015 = ╱53╱S╱ // 0x2071 @0x15
0x205c…2081 at0016 = ╱41╱A╱ // 0x2072 @0x16
0x205c…2081 at0017 = ╱4c╱L╱ // 0x2073 @0x17
0x205c…2081 at0018 = ╱44╱D╱ // 0x2074 @0x18
0x205c…2081 at0019 = ╱49╱I╱ // 0x2075 @0x19
0x205c…2081 at001a = ╱31╱1╱ // 0x2076 @0x1a
0x205c…2081 at001b = ╱ef╱$╱ // 0x2077 @0x1b
0x205c…2081 at001c = ╱ed╱(╱ // 0x2078 @0x1c
0x205c…2081 at001d = ╱49╱I╱ // 0x2079 @0x1d
0x205c…2081 at001e = ╱ee╱)╱ // 0x207a @0x1e
0x205c…2081 at001f = ╱dc╱=╱ // 0x207b @0x1f
0x205c…2081 at0020 = ╱22╱"╱ // 0x207c @0x20
0x205c…2081 at0021 = ╱30╱0╱ // 0x207d @0x21
0x205c…2081 at0022 = ╱2b╱+╱ // 0x207e @0x22
0x205c…2081 at0023 = ╱22╱"╱ // 0x207f @0x23
0x205c…2081 at0024 = EOL // 0x2080 @0x24
0x205c…2081 }
0x2081…2088 addf 3140 NEXT I
0x2081…2088 LineComalBin {
0x2081…2088 ptr = 0xaddf // 0x2081 @0x0
0x2081…2088 lno = 0x0c44 // 0x2083 @0x2
0x2081…2088 at0004 = ╱84╱ NEXT ╱ // 0x2085 @0x4
0x2081…2088 at0005 = ╱49╱I╱ // 0x2086 @0x5
0x2081…2088 at0006 = EOL // 0x2087 @0x6
0x2081…2088 }
0x2088…20be ae15 3150 TOSALDO$="0+";TOSALDO1$="0+";SUM$="0+";SUM3$="0+"
0x2088…20be LineComalBin {
0x2088…20be ptr = 0xae15 // 0x2088 @0x0
0x2088…20be lno = 0x0c4e // 0x208a @0x2
0x2088…20be at0004 = ╱54╱T╱ // 0x208c @0x4
0x2088…20be at0005 = ╱4f╱O╱ // 0x208d @0x5
0x2088…20be at0006 = ╱53╱S╱ // 0x208e @0x6
0x2088…20be at0007 = ╱41╱A╱ // 0x208f @0x7
0x2088…20be at0008 = ╱4c╱L╱ // 0x2090 @0x8
0x2088…20be at0009 = ╱44╱D╱ // 0x2091 @0x9
0x2088…20be at000a = ╱4f╱O╱ // 0x2092 @0xa
0x2088…20be at000b = ╱ef╱$╱ // 0x2093 @0xb
0x2088…20be at000c = ╱dc╱=╱ // 0x2094 @0xc
0x2088…20be at000d = ╱22╱"╱ // 0x2095 @0xd
0x2088…20be at000e = ╱30╱0╱ // 0x2096 @0xe
0x2088…20be at000f = ╱2b╱+╱ // 0x2097 @0xf
0x2088…20be at0010 = ╱22╱"╱ // 0x2098 @0x10
0x2088…20be at0011 = ╱eb╱;╱ // 0x2099 @0x11
0x2088…20be at0012 = ╱54╱T╱ // 0x209a @0x12
0x2088…20be at0013 = ╱4f╱O╱ // 0x209b @0x13
0x2088…20be at0014 = ╱53╱S╱ // 0x209c @0x14
0x2088…20be at0015 = ╱41╱A╱ // 0x209d @0x15
0x2088…20be at0016 = ╱4c╱L╱ // 0x209e @0x16
0x2088…20be at0017 = ╱44╱D╱ // 0x209f @0x17
0x2088…20be at0018 = ╱4f╱O╱ // 0x20a0 @0x18
0x2088…20be at0019 = ╱31╱1╱ // 0x20a1 @0x19
0x2088…20be at001a = ╱ef╱$╱ // 0x20a2 @0x1a
0x2088…20be at001b = ╱dc╱=╱ // 0x20a3 @0x1b
0x2088…20be at001c = ╱22╱"╱ // 0x20a4 @0x1c
0x2088…20be at001d = ╱30╱0╱ // 0x20a5 @0x1d
0x2088…20be at001e = ╱2b╱+╱ // 0x20a6 @0x1e
0x2088…20be at001f = ╱22╱"╱ // 0x20a7 @0x1f
0x2088…20be at0020 = ╱eb╱;╱ // 0x20a8 @0x20
0x2088…20be at0021 = ╱53╱S╱ // 0x20a9 @0x21
0x2088…20be at0022 = ╱55╱U╱ // 0x20aa @0x22
0x2088…20be at0023 = ╱4d╱M╱ // 0x20ab @0x23
0x2088…20be at0024 = ╱ef╱$╱ // 0x20ac @0x24
0x2088…20be at0025 = ╱dc╱=╱ // 0x20ad @0x25
0x2088…20be at0026 = ╱22╱"╱ // 0x20ae @0x26
0x2088…20be at0027 = ╱30╱0╱ // 0x20af @0x27
0x2088…20be at0028 = ╱2b╱+╱ // 0x20b0 @0x28
0x2088…20be at0029 = ╱22╱"╱ // 0x20b1 @0x29
0x2088…20be at002a = ╱eb╱;╱ // 0x20b2 @0x2a
0x2088…20be at002b = ╱53╱S╱ // 0x20b3 @0x2b
0x2088…20be at002c = ╱55╱U╱ // 0x20b4 @0x2c
0x2088…20be at002d = ╱4d╱M╱ // 0x20b5 @0x2d
0x2088…20be at002e = ╱33╱3╱ // 0x20b6 @0x2e
0x2088…20be at002f = ╱ef╱$╱ // 0x20b7 @0x2f
0x2088…20be at0030 = ╱dc╱=╱ // 0x20b8 @0x30
0x2088…20be at0031 = ╱22╱"╱ // 0x20b9 @0x31
0x2088…20be at0032 = ╱30╱0╱ // 0x20ba @0x32
0x2088…20be at0033 = ╱2b╱+╱ // 0x20bb @0x33
0x2088…20be at0034 = ╱22╱"╱ // 0x20bc @0x34
0x2088…20be at0035 = EOL // 0x20bd @0x35
0x2088…20be }
0x20be…20de ae35 3160 EXEC INDTAB1(FTAB1,MFANTAL,K2$)
0x20be…20de LineComalBin {
0x20be…20de ptr = 0xae35 // 0x20be @0x0
0x20be…20de lno = 0x0c58 // 0x20c0 @0x2
0x20be…20de at0004 = ╱9d╱ EXEC ╱ // 0x20c2 @0x4
0x20be…20de at0005 = ╱49╱I╱ // 0x20c3 @0x5
0x20be…20de at0006 = ╱4e╱N╱ // 0x20c4 @0x6
0x20be…20de at0007 = ╱44╱D╱ // 0x20c5 @0x7
0x20be…20de at0008 = ╱54╱T╱ // 0x20c6 @0x8
0x20be…20de at0009 = ╱41╱A╱ // 0x20c7 @0x9
0x20be…20de at000a = ╱42╱B╱ // 0x20c8 @0xa
0x20be…20de at000b = ╱31╱1╱ // 0x20c9 @0xb
0x20be…20de at000c = ╱ed╱(╱ // 0x20ca @0xc
0x20be…20de at000d = ╱46╱F╱ // 0x20cb @0xd
0x20be…20de at000e = ╱54╱T╱ // 0x20cc @0xe
0x20be…20de at000f = ╱41╱A╱ // 0x20cd @0xf
0x20be…20de at0010 = ╱42╱B╱ // 0x20ce @0x10
0x20be…20de at0011 = ╱31╱1╱ // 0x20cf @0x11
0x20be…20de at0012 = ╱ec╱,╱ // 0x20d0 @0x12
0x20be…20de at0013 = ╱4d╱M╱ // 0x20d1 @0x13
0x20be…20de at0014 = ╱46╱F╱ // 0x20d2 @0x14
0x20be…20de at0015 = ╱41╱A╱ // 0x20d3 @0x15
0x20be…20de at0016 = ╱4e╱N╱ // 0x20d4 @0x16
0x20be…20de at0017 = ╱54╱T╱ // 0x20d5 @0x17
0x20be…20de at0018 = ╱41╱A╱ // 0x20d6 @0x18
0x20be…20de at0019 = ╱4c╱L╱ // 0x20d7 @0x19
0x20be…20de at001a = ╱ec╱,╱ // 0x20d8 @0x1a
0x20be…20de at001b = ╱4b╱K╱ // 0x20d9 @0x1b
0x20be…20de at001c = ╱32╱2╱ // 0x20da @0x1c
0x20be…20de at001d = ╱ef╱$╱ // 0x20db @0x1d
0x20be…20de at001e = ╱ee╱)╱ // 0x20dc @0x1e
0x20be…20de at001f = EOL // 0x20dd @0x1f
0x20be…20de }
0x20de…20fe ae55 3170 EXEC INDTAB1(DTAB1,MDANTAL,K3$)
0x20de…20fe LineComalBin {
0x20de…20fe ptr = 0xae55 // 0x20de @0x0
0x20de…20fe lno = 0x0c62 // 0x20e0 @0x2
0x20de…20fe at0004 = ╱9d╱ EXEC ╱ // 0x20e2 @0x4
0x20de…20fe at0005 = ╱49╱I╱ // 0x20e3 @0x5
0x20de…20fe at0006 = ╱4e╱N╱ // 0x20e4 @0x6
0x20de…20fe at0007 = ╱44╱D╱ // 0x20e5 @0x7
0x20de…20fe at0008 = ╱54╱T╱ // 0x20e6 @0x8
0x20de…20fe at0009 = ╱41╱A╱ // 0x20e7 @0x9
0x20de…20fe at000a = ╱42╱B╱ // 0x20e8 @0xa
0x20de…20fe at000b = ╱31╱1╱ // 0x20e9 @0xb
0x20de…20fe at000c = ╱ed╱(╱ // 0x20ea @0xc
0x20de…20fe at000d = ╱44╱D╱ // 0x20eb @0xd
0x20de…20fe at000e = ╱54╱T╱ // 0x20ec @0xe
0x20de…20fe at000f = ╱41╱A╱ // 0x20ed @0xf
0x20de…20fe at0010 = ╱42╱B╱ // 0x20ee @0x10
0x20de…20fe at0011 = ╱31╱1╱ // 0x20ef @0x11
0x20de…20fe at0012 = ╱ec╱,╱ // 0x20f0 @0x12
0x20de…20fe at0013 = ╱4d╱M╱ // 0x20f1 @0x13
0x20de…20fe at0014 = ╱44╱D╱ // 0x20f2 @0x14
0x20de…20fe at0015 = ╱41╱A╱ // 0x20f3 @0x15
0x20de…20fe at0016 = ╱4e╱N╱ // 0x20f4 @0x16
0x20de…20fe at0017 = ╱54╱T╱ // 0x20f5 @0x17
0x20de…20fe at0018 = ╱41╱A╱ // 0x20f6 @0x18
0x20de…20fe at0019 = ╱4c╱L╱ // 0x20f7 @0x19
0x20de…20fe at001a = ╱ec╱,╱ // 0x20f8 @0x1a
0x20de…20fe at001b = ╱4b╱K╱ // 0x20f9 @0x1b
0x20de…20fe at001c = ╱33╱3╱ // 0x20fa @0x1c
0x20de…20fe at001d = ╱ef╱$╱ // 0x20fb @0x1d
0x20de…20fe at001e = ╱ee╱)╱ // 0x20fc @0x1e
0x20de…20fe at001f = EOL // 0x20fd @0x1f
0x20de…20fe }
0x20fe…211e ae75 3180 EXEC INDTAB1(KTAB1,MKANTAL,K4$)
0x20fe…211e LineComalBin {
0x20fe…211e ptr = 0xae75 // 0x20fe @0x0
0x20fe…211e lno = 0x0c6c // 0x2100 @0x2
0x20fe…211e at0004 = ╱9d╱ EXEC ╱ // 0x2102 @0x4
0x20fe…211e at0005 = ╱49╱I╱ // 0x2103 @0x5
0x20fe…211e at0006 = ╱4e╱N╱ // 0x2104 @0x6
0x20fe…211e at0007 = ╱44╱D╱ // 0x2105 @0x7
0x20fe…211e at0008 = ╱54╱T╱ // 0x2106 @0x8
0x20fe…211e at0009 = ╱41╱A╱ // 0x2107 @0x9
0x20fe…211e at000a = ╱42╱B╱ // 0x2108 @0xa
0x20fe…211e at000b = ╱31╱1╱ // 0x2109 @0xb
0x20fe…211e at000c = ╱ed╱(╱ // 0x210a @0xc
0x20fe…211e at000d = ╱4b╱K╱ // 0x210b @0xd
0x20fe…211e at000e = ╱54╱T╱ // 0x210c @0xe
0x20fe…211e at000f = ╱41╱A╱ // 0x210d @0xf
0x20fe…211e at0010 = ╱42╱B╱ // 0x210e @0x10
0x20fe…211e at0011 = ╱31╱1╱ // 0x210f @0x11
0x20fe…211e at0012 = ╱ec╱,╱ // 0x2110 @0x12
0x20fe…211e at0013 = ╱4d╱M╱ // 0x2111 @0x13
0x20fe…211e at0014 = ╱4b╱K╱ // 0x2112 @0x14
0x20fe…211e at0015 = ╱41╱A╱ // 0x2113 @0x15
0x20fe…211e at0016 = ╱4e╱N╱ // 0x2114 @0x16
0x20fe…211e at0017 = ╱54╱T╱ // 0x2115 @0x17
0x20fe…211e at0018 = ╱41╱A╱ // 0x2116 @0x18
0x20fe…211e at0019 = ╱4c╱L╱ // 0x2117 @0x19
0x20fe…211e at001a = ╱ec╱,╱ // 0x2118 @0x1a
0x20fe…211e at001b = ╱4b╱K╱ // 0x2119 @0x1b
0x20fe…211e at001c = ╱34╱4╱ // 0x211a @0x1c
0x20fe…211e at001d = ╱ef╱$╱ // 0x211b @0x1d
0x20fe…211e at001e = ╱ee╱)╱ // 0x211c @0x1e
0x20fe…211e at001f = EOL // 0x211d @0x1f
0x20fe…211e }
0x211e…2124 ae7b 3185 CLOSE
0x211e…2124 LineComalBin {
0x211e…2124 ptr = 0xae7b // 0x211e @0x0
0x211e…2124 lno = 0x0c71 // 0x2120 @0x2
0x211e…2124 at0004 = ╱a8╱ CLOSE ╱ // 0x2122 @0x4
0x211e…2124 at0005 = EOL // 0x2123 @0x5
0x211e…2124 }
0x2124…214c aea3 3190 EXEC KINIT(K3$,K6$,DTAB,0,MDANTAL)
0x2124…214c LineComalBin {
0x2124…214c ptr = 0xaea3 // 0x2124 @0x0
0x2124…214c lno = 0x0c76 // 0x2126 @0x2
0x2124…214c at0004 = ╱9d╱ EXEC ╱ // 0x2128 @0x4
0x2124…214c at0005 = ╱4b╱K╱ // 0x2129 @0x5
0x2124…214c at0006 = ╱49╱I╱ // 0x212a @0x6
0x2124…214c at0007 = ╱4e╱N╱ // 0x212b @0x7
0x2124…214c at0008 = ╱49╱I╱ // 0x212c @0x8
0x2124…214c at0009 = ╱54╱T╱ // 0x212d @0x9
0x2124…214c at000a = ╱ed╱(╱ // 0x212e @0xa
0x2124…214c at000b = ╱4b╱K╱ // 0x212f @0xb
0x2124…214c at000c = ╱33╱3╱ // 0x2130 @0xc
0x2124…214c at000d = ╱ef╱$╱ // 0x2131 @0xd
0x2124…214c at000e = ╱ec╱,╱ // 0x2132 @0xe
0x2124…214c at000f = ╱4b╱K╱ // 0x2133 @0xf
0x2124…214c at0010 = ╱36╱6╱ // 0x2134 @0x10
0x2124…214c at0011 = ╱ef╱$╱ // 0x2135 @0x11
0x2124…214c at0012 = ╱ec╱,╱ // 0x2136 @0x12
0x2124…214c at0013 = ╱44╱D╱ // 0x2137 @0x13
0x2124…214c at0014 = ╱54╱T╱ // 0x2138 @0x14
0x2124…214c at0015 = ╱41╱A╱ // 0x2139 @0x15
0x2124…214c at0016 = ╱42╱B╱ // 0x213a @0x16
0x2124…214c at0017 = ╱ec╱,╱ // 0x213b @0x17
0x2124…214c at0018 = ╱30╱0╱ // 0x213c @0x18
0x2124…214c at0019 = ╱fe00000000╱ // 0x213d @0x19
0x2124…214c at001e = ╱ec╱,╱ // 0x2142 @0x1e
0x2124…214c at001f = ╱4d╱M╱ // 0x2143 @0x1f
0x2124…214c at0020 = ╱44╱D╱ // 0x2144 @0x20
0x2124…214c at0021 = ╱41╱A╱ // 0x2145 @0x21
0x2124…214c at0022 = ╱4e╱N╱ // 0x2146 @0x22
0x2124…214c at0023 = ╱54╱T╱ // 0x2147 @0x23
0x2124…214c at0024 = ╱41╱A╱ // 0x2148 @0x24
0x2124…214c at0025 = ╱4c╱L╱ // 0x2149 @0x25
0x2124…214c at0026 = ╱ee╱)╱ // 0x214a @0x26
0x2124…214c at0027 = EOL // 0x214b @0x27
0x2124…214c }
0x214c…2174 aecb 3200 EXEC KINIT(K4$,K7$,KTAB,2,MKANTAL)
0x214c…2174 LineComalBin {
0x214c…2174 ptr = 0xaecb // 0x214c @0x0
0x214c…2174 lno = 0x0c80 // 0x214e @0x2
0x214c…2174 at0004 = ╱9d╱ EXEC ╱ // 0x2150 @0x4
0x214c…2174 at0005 = ╱4b╱K╱ // 0x2151 @0x5
0x214c…2174 at0006 = ╱49╱I╱ // 0x2152 @0x6
0x214c…2174 at0007 = ╱4e╱N╱ // 0x2153 @0x7
0x214c…2174 at0008 = ╱49╱I╱ // 0x2154 @0x8
0x214c…2174 at0009 = ╱54╱T╱ // 0x2155 @0x9
0x214c…2174 at000a = ╱ed╱(╱ // 0x2156 @0xa
0x214c…2174 at000b = ╱4b╱K╱ // 0x2157 @0xb
0x214c…2174 at000c = ╱34╱4╱ // 0x2158 @0xc
0x214c…2174 at000d = ╱ef╱$╱ // 0x2159 @0xd
0x214c…2174 at000e = ╱ec╱,╱ // 0x215a @0xe
0x214c…2174 at000f = ╱4b╱K╱ // 0x215b @0xf
0x214c…2174 at0010 = ╱37╱7╱ // 0x215c @0x10
0x214c…2174 at0011 = ╱ef╱$╱ // 0x215d @0x11
0x214c…2174 at0012 = ╱ec╱,╱ // 0x215e @0x12
0x214c…2174 at0013 = ╱4b╱K╱ // 0x215f @0x13
0x214c…2174 at0014 = ╱54╱T╱ // 0x2160 @0x14
0x214c…2174 at0015 = ╱41╱A╱ // 0x2161 @0x15
0x214c…2174 at0016 = ╱42╱B╱ // 0x2162 @0x16
0x214c…2174 at0017 = ╱ec╱,╱ // 0x2163 @0x17
0x214c…2174 at0018 = ╱32╱2╱ // 0x2164 @0x18
0x214c…2174 at0019 = ╱fe00008002╱ // 0x2165 @0x19
0x214c…2174 at001e = ╱ec╱,╱ // 0x216a @0x1e
0x214c…2174 at001f = ╱4d╱M╱ // 0x216b @0x1f
0x214c…2174 at0020 = ╱4b╱K╱ // 0x216c @0x20
0x214c…2174 at0021 = ╱41╱A╱ // 0x216d @0x21
0x214c…2174 at0022 = ╱4e╱N╱ // 0x216e @0x22
0x214c…2174 at0023 = ╱54╱T╱ // 0x216f @0x23
0x214c…2174 at0024 = ╱41╱A╱ // 0x2170 @0x24
0x214c…2174 at0025 = ╱4c╱L╱ // 0x2171 @0x25
0x214c…2174 at0026 = ╱ee╱)╱ // 0x2172 @0x26
0x214c…2174 at0027 = EOL // 0x2173 @0x27
0x214c…2174 }
0x2174…219c aef3 3210 EXEC KINIT(K2$,K5$,FTAB,1,MFANTAL)
0x2174…219c LineComalBin {
0x2174…219c ptr = 0xaef3 // 0x2174 @0x0
0x2174…219c lno = 0x0c8a // 0x2176 @0x2
0x2174…219c at0004 = ╱9d╱ EXEC ╱ // 0x2178 @0x4
0x2174…219c at0005 = ╱4b╱K╱ // 0x2179 @0x5
0x2174…219c at0006 = ╱49╱I╱ // 0x217a @0x6
0x2174…219c at0007 = ╱4e╱N╱ // 0x217b @0x7
0x2174…219c at0008 = ╱49╱I╱ // 0x217c @0x8
0x2174…219c at0009 = ╱54╱T╱ // 0x217d @0x9
0x2174…219c at000a = ╱ed╱(╱ // 0x217e @0xa
0x2174…219c at000b = ╱4b╱K╱ // 0x217f @0xb
0x2174…219c at000c = ╱32╱2╱ // 0x2180 @0xc
0x2174…219c at000d = ╱ef╱$╱ // 0x2181 @0xd
0x2174…219c at000e = ╱ec╱,╱ // 0x2182 @0xe
0x2174…219c at000f = ╱4b╱K╱ // 0x2183 @0xf
0x2174…219c at0010 = ╱35╱5╱ // 0x2184 @0x10
0x2174…219c at0011 = ╱ef╱$╱ // 0x2185 @0x11
0x2174…219c at0012 = ╱ec╱,╱ // 0x2186 @0x12
0x2174…219c at0013 = ╱46╱F╱ // 0x2187 @0x13
0x2174…219c at0014 = ╱54╱T╱ // 0x2188 @0x14
0x2174…219c at0015 = ╱41╱A╱ // 0x2189 @0x15
0x2174…219c at0016 = ╱42╱B╱ // 0x218a @0x16
0x2174…219c at0017 = ╱ec╱,╱ // 0x218b @0x17
0x2174…219c at0018 = ╱31╱1╱ // 0x218c @0x18
0x2174…219c at0019 = ╱fe00008001╱ // 0x218d @0x19
0x2174…219c at001e = ╱ec╱,╱ // 0x2192 @0x1e
0x2174…219c at001f = ╱4d╱M╱ // 0x2193 @0x1f
0x2174…219c at0020 = ╱46╱F╱ // 0x2194 @0x20
0x2174…219c at0021 = ╱41╱A╱ // 0x2195 @0x21
0x2174…219c at0022 = ╱4e╱N╱ // 0x2196 @0x22
0x2174…219c at0023 = ╱54╱T╱ // 0x2197 @0x23
0x2174…219c at0024 = ╱41╱A╱ // 0x2198 @0x24
0x2174…219c at0025 = ╱4c╱L╱ // 0x2199 @0x25
0x2174…219c at0026 = ╱ee╱)╱ // 0x219a @0x26
0x2174…219c at0027 = EOL // 0x219b @0x27
0x2174…219c }
0x219c…21b3 af0a 3220 EXEC PINIT(K8$,MFPOST)
0x219c…21b3 LineComalBin {
0x219c…21b3 ptr = 0xaf0a // 0x219c @0x0
0x219c…21b3 lno = 0x0c94 // 0x219e @0x2
0x219c…21b3 at0004 = ╱9d╱ EXEC ╱ // 0x21a0 @0x4
0x219c…21b3 at0005 = ╱50╱P╱ // 0x21a1 @0x5
0x219c…21b3 at0006 = ╱49╱I╱ // 0x21a2 @0x6
0x219c…21b3 at0007 = ╱4e╱N╱ // 0x21a3 @0x7
0x219c…21b3 at0008 = ╱49╱I╱ // 0x21a4 @0x8
0x219c…21b3 at0009 = ╱54╱T╱ // 0x21a5 @0x9
0x219c…21b3 at000a = ╱ed╱(╱ // 0x21a6 @0xa
0x219c…21b3 at000b = ╱4b╱K╱ // 0x21a7 @0xb
0x219c…21b3 at000c = ╱38╱8╱ // 0x21a8 @0xc
0x219c…21b3 at000d = ╱ef╱$╱ // 0x21a9 @0xd
0x219c…21b3 at000e = ╱ec╱,╱ // 0x21aa @0xe
0x219c…21b3 at000f = ╱4d╱M╱ // 0x21ab @0xf
0x219c…21b3 at0010 = ╱46╱F╱ // 0x21ac @0x10
0x219c…21b3 at0011 = ╱50╱P╱ // 0x21ad @0x11
0x219c…21b3 at0012 = ╱4f╱O╱ // 0x21ae @0x12
0x219c…21b3 at0013 = ╱53╱S╱ // 0x21af @0x13
0x219c…21b3 at0014 = ╱54╱T╱ // 0x21b0 @0x14
0x219c…21b3 at0015 = ╱ee╱)╱ // 0x21b1 @0x15
0x219c…21b3 at0016 = EOL // 0x21b2 @0x16
0x219c…21b3 }
0x21b3…21dc af33 3230 EXEC TABINIT(K8$,K9$,MFPOST,HFTAB,UFTAB)
0x21b3…21dc LineComalBin {
0x21b3…21dc ptr = 0xaf33 // 0x21b3 @0x0
0x21b3…21dc lno = 0x0c9e // 0x21b5 @0x2
0x21b3…21dc at0004 = ╱9d╱ EXEC ╱ // 0x21b7 @0x4
0x21b3…21dc at0005 = ╱54╱T╱ // 0x21b8 @0x5
0x21b3…21dc at0006 = ╱41╱A╱ // 0x21b9 @0x6
0x21b3…21dc at0007 = ╱42╱B╱ // 0x21ba @0x7
0x21b3…21dc at0008 = ╱49╱I╱ // 0x21bb @0x8
0x21b3…21dc at0009 = ╱4e╱N╱ // 0x21bc @0x9
0x21b3…21dc at000a = ╱49╱I╱ // 0x21bd @0xa
0x21b3…21dc at000b = ╱54╱T╱ // 0x21be @0xb
0x21b3…21dc at000c = ╱ed╱(╱ // 0x21bf @0xc
0x21b3…21dc at000d = ╱4b╱K╱ // 0x21c0 @0xd
0x21b3…21dc at000e = ╱38╱8╱ // 0x21c1 @0xe
0x21b3…21dc at000f = ╱ef╱$╱ // 0x21c2 @0xf
0x21b3…21dc at0010 = ╱ec╱,╱ // 0x21c3 @0x10
0x21b3…21dc at0011 = ╱4b╱K╱ // 0x21c4 @0x11
0x21b3…21dc at0012 = ╱39╱9╱ // 0x21c5 @0x12
0x21b3…21dc at0013 = ╱ef╱$╱ // 0x21c6 @0x13
0x21b3…21dc at0014 = ╱ec╱,╱ // 0x21c7 @0x14
0x21b3…21dc at0015 = ╱4d╱M╱ // 0x21c8 @0x15
0x21b3…21dc at0016 = ╱46╱F╱ // 0x21c9 @0x16
0x21b3…21dc at0017 = ╱50╱P╱ // 0x21ca @0x17
0x21b3…21dc at0018 = ╱4f╱O╱ // 0x21cb @0x18
0x21b3…21dc at0019 = ╱53╱S╱ // 0x21cc @0x19
0x21b3…21dc at001a = ╱54╱T╱ // 0x21cd @0x1a
0x21b3…21dc at001b = ╱ec╱,╱ // 0x21ce @0x1b
0x21b3…21dc at001c = ╱48╱H╱ // 0x21cf @0x1c
0x21b3…21dc at001d = ╱46╱F╱ // 0x21d0 @0x1d
0x21b3…21dc at001e = ╱54╱T╱ // 0x21d1 @0x1e
0x21b3…21dc at001f = ╱41╱A╱ // 0x21d2 @0x1f
0x21b3…21dc at0020 = ╱42╱B╱ // 0x21d3 @0x20
0x21b3…21dc at0021 = ╱ec╱,╱ // 0x21d4 @0x21
0x21b3…21dc at0022 = ╱55╱U╱ // 0x21d5 @0x22
0x21b3…21dc at0023 = ╱46╱F╱ // 0x21d6 @0x23
0x21b3…21dc at0024 = ╱54╱T╱ // 0x21d7 @0x24
0x21b3…21dc at0025 = ╱41╱A╱ // 0x21d8 @0x25
0x21b3…21dc at0026 = ╱42╱B╱ // 0x21d9 @0x26
0x21b3…21dc at0027 = ╱ee╱)╱ // 0x21da @0x27
0x21b3…21dc at0028 = EOL // 0x21db @0x28
0x21b3…21dc }
0x21dc…21e7 af3e 3240 OPEN K5$,W
0x21dc…21e7 LineComalBin {
0x21dc…21e7 ptr = 0xaf3e // 0x21dc @0x0
0x21dc…21e7 lno = 0x0ca8 // 0x21de @0x2
0x21dc…21e7 at0004 = ╱a7╱ OPEN ╱ // 0x21e0 @0x4
0x21dc…21e7 at0005 = ╱4b╱K╱ // 0x21e1 @0x5
0x21dc…21e7 at0006 = ╱35╱5╱ // 0x21e2 @0x6
0x21dc…21e7 at0007 = ╱ef╱$╱ // 0x21e3 @0x7
0x21dc…21e7 at0008 = ╱ec╱,╱ // 0x21e4 @0x8
0x21dc…21e7 at0009 = ╱57╱W╱ // 0x21e5 @0x9
0x21dc…21e7 at000a = EOL // 0x21e6 @0xa
0x21dc…21e7 }
0x21e7…2200 af57 3250 EXEC FEJL(W,20,K5$)
0x21e7…2200 LineComalBin {
0x21e7…2200 ptr = 0xaf57 // 0x21e7 @0x0
0x21e7…2200 lno = 0x0cb2 // 0x21e9 @0x2
0x21e7…2200 at0004 = ╱9d╱ EXEC ╱ // 0x21eb @0x4
0x21e7…2200 at0005 = ╱46╱F╱ // 0x21ec @0x5
0x21e7…2200 at0006 = ╱45╱E╱ // 0x21ed @0x6
0x21e7…2200 at0007 = ╱4a╱J╱ // 0x21ee @0x7
0x21e7…2200 at0008 = ╱4c╱L╱ // 0x21ef @0x8
0x21e7…2200 at0009 = ╱ed╱(╱ // 0x21f0 @0x9
0x21e7…2200 at000a = ╱57╱W╱ // 0x21f1 @0xa
0x21e7…2200 at000b = ╱ec╱,╱ // 0x21f2 @0xb
0x21e7…2200 at000c = ╱32╱2╱ // 0x21f3 @0xc
0x21e7…2200 at000d = ╱30╱0╱ // 0x21f4 @0xd
0x21e7…2200 at000e = ╱fe0000a005╱ // 0x21f5 @0xe
0x21e7…2200 at0013 = ╱ec╱,╱ // 0x21fa @0x13
0x21e7…2200 at0014 = ╱4b╱K╱ // 0x21fb @0x14
0x21e7…2200 at0015 = ╱35╱5╱ // 0x21fc @0x15
0x21e7…2200 at0016 = ╱ef╱$╱ // 0x21fd @0x16
0x21e7…2200 at0017 = ╱ee╱)╱ // 0x21fe @0x17
0x21e7…2200 at0018 = EOL // 0x21ff @0x18
0x21e7…2200 }
0x2200…220b af62 3255 OPEN K2$,R
0x2200…220b LineComalBin {
0x2200…220b ptr = 0xaf62 // 0x2200 @0x0
0x2200…220b lno = 0x0cb7 // 0x2202 @0x2
0x2200…220b at0004 = ╱a7╱ OPEN ╱ // 0x2204 @0x4
0x2200…220b at0005 = ╱4b╱K╱ // 0x2205 @0x5
0x2200…220b at0006 = ╱32╱2╱ // 0x2206 @0x6
0x2200…220b at0007 = ╱ef╱$╱ // 0x2207 @0x7
0x2200…220b at0008 = ╱ec╱,╱ // 0x2208 @0x8
0x2200…220b at0009 = ╱52╱R╱ // 0x2209 @0x9
0x2200…220b at000a = EOL // 0x220a @0xa
0x2200…220b }
0x220b…2229 af80 3256 EXEC FEJL(20,5,K2$)
0x220b…2229 LineComalBin {
0x220b…2229 ptr = 0xaf80 // 0x220b @0x0
0x220b…2229 lno = 0x0cb8 // 0x220d @0x2
0x220b…2229 at0004 = ╱9d╱ EXEC ╱ // 0x220f @0x4
0x220b…2229 at0005 = ╱46╱F╱ // 0x2210 @0x5
0x220b…2229 at0006 = ╱45╱E╱ // 0x2211 @0x6
0x220b…2229 at0007 = ╱4a╱J╱ // 0x2212 @0x7
0x220b…2229 at0008 = ╱4c╱L╱ // 0x2213 @0x8
0x220b…2229 at0009 = ╱ed╱(╱ // 0x2214 @0x9
0x220b…2229 at000a = ╱32╱2╱ // 0x2215 @0xa
0x220b…2229 at000b = ╱30╱0╱ // 0x2216 @0xb
0x220b…2229 at000c = ╱fe0000a005╱ // 0x2217 @0xc
0x220b…2229 at0011 = ╱ec╱,╱ // 0x221c @0x11
0x220b…2229 at0012 = ╱35╱5╱ // 0x221d @0x12
0x220b…2229 at0013 = ╱fe0000a003╱ // 0x221e @0x13
0x220b…2229 at0018 = ╱ec╱,╱ // 0x2223 @0x18
0x220b…2229 at0019 = ╱4b╱K╱ // 0x2224 @0x19
0x220b…2229 at001a = ╱32╱2╱ // 0x2225 @0x1a
0x220b…2229 at001b = ╱ef╱$╱ // 0x2226 @0x1b
0x220b…2229 at001c = ╱ee╱)╱ // 0x2227 @0x1c
0x220b…2229 at001d = EOL // 0x2228 @0x1d
0x220b…2229 }
0x2229…225c afb3 3260 EXEC FINDPOST1(FTAB1,FTAB,MFANTAL,DIFNR,FPIL3,K2$)
0x2229…225c LineComalBin {
0x2229…225c ptr = 0xafb3 // 0x2229 @0x0
0x2229…225c lno = 0x0cbc // 0x222b @0x2
0x2229…225c at0004 = ╱9d╱ EXEC ╱ // 0x222d @0x4
0x2229…225c at0005 = ╱46╱F╱ // 0x222e @0x5
0x2229…225c at0006 = ╱49╱I╱ // 0x222f @0x6
0x2229…225c at0007 = ╱4e╱N╱ // 0x2230 @0x7
0x2229…225c at0008 = ╱44╱D╱ // 0x2231 @0x8
0x2229…225c at0009 = ╱50╱P╱ // 0x2232 @0x9
0x2229…225c at000a = ╱4f╱O╱ // 0x2233 @0xa
0x2229…225c at000b = ╱53╱S╱ // 0x2234 @0xb
0x2229…225c at000c = ╱54╱T╱ // 0x2235 @0xc
0x2229…225c at000d = ╱31╱1╱ // 0x2236 @0xd
0x2229…225c at000e = ╱ed╱(╱ // 0x2237 @0xe
0x2229…225c at000f = ╱46╱F╱ // 0x2238 @0xf
0x2229…225c at0010 = ╱54╱T╱ // 0x2239 @0x10
0x2229…225c at0011 = ╱41╱A╱ // 0x223a @0x11
0x2229…225c at0012 = ╱42╱B╱ // 0x223b @0x12
0x2229…225c at0013 = ╱31╱1╱ // 0x223c @0x13
0x2229…225c at0014 = ╱ec╱,╱ // 0x223d @0x14
0x2229…225c at0015 = ╱46╱F╱ // 0x223e @0x15
0x2229…225c at0016 = ╱54╱T╱ // 0x223f @0x16
0x2229…225c at0017 = ╱41╱A╱ // 0x2240 @0x17
0x2229…225c at0018 = ╱42╱B╱ // 0x2241 @0x18
0x2229…225c at0019 = ╱ec╱,╱ // 0x2242 @0x19
0x2229…225c at001a = ╱4d╱M╱ // 0x2243 @0x1a
0x2229…225c at001b = ╱46╱F╱ // 0x2244 @0x1b
0x2229…225c at001c = ╱41╱A╱ // 0x2245 @0x1c
0x2229…225c at001d = ╱4e╱N╱ // 0x2246 @0x1d
0x2229…225c at001e = ╱54╱T╱ // 0x2247 @0x1e
0x2229…225c at001f = ╱41╱A╱ // 0x2248 @0x1f
0x2229…225c at0020 = ╱4c╱L╱ // 0x2249 @0x20
0x2229…225c at0021 = ╱ec╱,╱ // 0x224a @0x21
0x2229…225c at0022 = ╱44╱D╱ // 0x224b @0x22
0x2229…225c at0023 = ╱49╱I╱ // 0x224c @0x23
0x2229…225c at0024 = ╱46╱F╱ // 0x224d @0x24
0x2229…225c at0025 = ╱4e╱N╱ // 0x224e @0x25
0x2229…225c at0026 = ╱52╱R╱ // 0x224f @0x26
0x2229…225c at0027 = ╱ec╱,╱ // 0x2250 @0x27
0x2229…225c at0028 = ╱46╱F╱ // 0x2251 @0x28
0x2229…225c at0029 = ╱50╱P╱ // 0x2252 @0x29
0x2229…225c at002a = ╱49╱I╱ // 0x2253 @0x2a
0x2229…225c at002b = ╱4c╱L╱ // 0x2254 @0x2b
0x2229…225c at002c = ╱33╱3╱ // 0x2255 @0x2c
0x2229…225c at002d = ╱ec╱,╱ // 0x2256 @0x2d
0x2229…225c at002e = ╱4b╱K╱ // 0x2257 @0x2e
0x2229…225c at002f = ╱32╱2╱ // 0x2258 @0x2f
0x2229…225c at0030 = ╱ef╱$╱ // 0x2259 @0x30
0x2229…225c at0031 = ╱ee╱)╱ // 0x225a @0x31
0x2229…225c at0032 = EOL // 0x225b @0x32
0x2229…225c }
0x225c…226a afc1 3270 IF CEKS=E THEN STOP
0x225c…226a LineComalBin {
0x225c…226a ptr = 0xafc1 // 0x225c @0x0
0x225c…226a lno = 0x0cc6 // 0x225e @0x2
0x225c…226a at0004 = ╱82╱ IF ╱ // 0x2260 @0x4
0x225c…226a at0005 = ╱43╱C╱ // 0x2261 @0x5
0x225c…226a at0006 = ╱45╱E╱ // 0x2262 @0x6
0x225c…226a at0007 = ╱4b╱K╱ // 0x2263 @0x7
0x225c…226a at0008 = ╱53╱S╱ // 0x2264 @0x8
0x225c…226a at0009 = ╱dc╱=╱ // 0x2265 @0x9
0x225c…226a at000a = ╱45╱E╱ // 0x2266 @0xa
0x225c…226a at000b = ╱b6╱ THEN ╱ // 0x2267 @0xb
0x225c…226a at000c = ╱8d╱ STOP ╱ // 0x2268 @0xc
0x225c…226a at000d = EOL // 0x2269 @0xd
0x225c…226a }
0x226a…2278 afcf 3280 EXEC HENTPOST
0x226a…2278 LineComalBin {
0x226a…2278 ptr = 0xafcf // 0x226a @0x0
0x226a…2278 lno = 0x0cd0 // 0x226c @0x2
0x226a…2278 at0004 = ╱9d╱ EXEC ╱ // 0x226e @0x4
0x226a…2278 at0005 = ╱48╱H╱ // 0x226f @0x5
0x226a…2278 at0006 = ╱45╱E╱ // 0x2270 @0x6
0x226a…2278 at0007 = ╱4e╱N╱ // 0x2271 @0x7
0x226a…2278 at0008 = ╱54╱T╱ // 0x2272 @0x8
0x226a…2278 at0009 = ╱50╱P╱ // 0x2273 @0x9
0x226a…2278 at000a = ╱4f╱O╱ // 0x2274 @0xa
0x226a…2278 at000b = ╱53╱S╱ // 0x2275 @0xb
0x226a…2278 at000c = ╱54╱T╱ // 0x2276 @0xc
0x226a…2278 at000d = EOL // 0x2277 @0xd
0x226a…2278 }
0x2278…229a aff1 3290 IF TOSALDO1$(LEN(TOSALDO1$))="+" THEN
0x2278…229a LineComalBin {
0x2278…229a ptr = 0xaff1 // 0x2278 @0x0
0x2278…229a lno = 0x0cda // 0x227a @0x2
0x2278…229a at0004 = ╱9c╱ IF ╱ // 0x227c @0x4
0x2278…229a at0005 = ╱54╱T╱ // 0x227d @0x5
0x2278…229a at0006 = ╱4f╱O╱ // 0x227e @0x6
0x2278…229a at0007 = ╱53╱S╱ // 0x227f @0x7
0x2278…229a at0008 = ╱41╱A╱ // 0x2280 @0x8
0x2278…229a at0009 = ╱4c╱L╱ // 0x2281 @0x9
0x2278…229a at000a = ╱44╱D╱ // 0x2282 @0xa
0x2278…229a at000b = ╱4f╱O╱ // 0x2283 @0xb
0x2278…229a at000c = ╱31╱1╱ // 0x2284 @0xc
0x2278…229a at000d = ╱ef╱$╱ // 0x2285 @0xd
0x2278…229a at000e = ╱ed╱(╱ // 0x2286 @0xe
0x2278…229a at000f = ╱cc╱LEN╱ // 0x2287 @0xf
0x2278…229a at0010 = ╱ed╱(╱ // 0x2288 @0x10
0x2278…229a at0011 = ╱54╱T╱ // 0x2289 @0x11
0x2278…229a at0012 = ╱4f╱O╱ // 0x228a @0x12
0x2278…229a at0013 = ╱53╱S╱ // 0x228b @0x13
0x2278…229a at0014 = ╱41╱A╱ // 0x228c @0x14
0x2278…229a at0015 = ╱4c╱L╱ // 0x228d @0x15
0x2278…229a at0016 = ╱44╱D╱ // 0x228e @0x16
0x2278…229a at0017 = ╱4f╱O╱ // 0x228f @0x17
0x2278…229a at0018 = ╱31╱1╱ // 0x2290 @0x18
0x2278…229a at0019 = ╱ef╱$╱ // 0x2291 @0x19
0x2278…229a at001a = ╱ee╱)╱ // 0x2292 @0x1a
0x2278…229a at001b = ╱ee╱)╱ // 0x2293 @0x1b
0x2278…229a at001c = ╱dc╱=╱ // 0x2294 @0x1c
0x2278…229a at001d = ╱22╱"╱ // 0x2295 @0x1d
0x2278…229a at001e = ╱2b╱+╱ // 0x2296 @0x1e
0x2278…229a at001f = ╱22╱"╱ // 0x2297 @0x1f
0x2278…229a at0020 = ╱b6╱ THEN ╱ // 0x2298 @0x20
0x2278…229a at0021 = EOL // 0x2299 @0x21
0x2278…229a }
0x229a…22c5 b01c 3300 EXEC CALC(E,FÅKREDIT$,TOSALDO1$,FÅKREDIT$)
0x229a…22c5 LineComalBin {
0x229a…22c5 ptr = 0xb01c // 0x229a @0x0
0x229a…22c5 lno = 0x0ce4 // 0x229c @0x2
0x229a…22c5 at0004 = ╱9d╱ EXEC ╱ // 0x229e @0x4
0x229a…22c5 at0005 = ╱43╱C╱ // 0x229f @0x5
0x229a…22c5 at0006 = ╱41╱A╱ // 0x22a0 @0x6
0x229a…22c5 at0007 = ╱4c╱L╱ // 0x22a1 @0x7
0x229a…22c5 at0008 = ╱43╱C╱ // 0x22a2 @0x8
0x229a…22c5 at0009 = ╱ed╱(╱ // 0x22a3 @0x9
0x229a…22c5 at000a = ╱45╱E╱ // 0x22a4 @0xa
0x229a…22c5 at000b = ╱ec╱,╱ // 0x22a5 @0xb
0x229a…22c5 at000c = ╱46╱F╱ // 0x22a6 @0xc
0x229a…22c5 at000d = ╱5d╱Å╱ // 0x22a7 @0xd
0x229a…22c5 at000e = ╱4b╱K╱ // 0x22a8 @0xe
0x229a…22c5 at000f = ╱52╱R╱ // 0x22a9 @0xf
0x229a…22c5 at0010 = ╱45╱E╱ // 0x22aa @0x10
0x229a…22c5 at0011 = ╱44╱D╱ // 0x22ab @0x11
0x229a…22c5 at0012 = ╱49╱I╱ // 0x22ac @0x12
0x229a…22c5 at0013 = ╱54╱T╱ // 0x22ad @0x13
0x229a…22c5 at0014 = ╱ef╱$╱ // 0x22ae @0x14
0x229a…22c5 at0015 = ╱ec╱,╱ // 0x22af @0x15
0x229a…22c5 at0016 = ╱54╱T╱ // 0x22b0 @0x16
0x229a…22c5 at0017 = ╱4f╱O╱ // 0x22b1 @0x17
0x229a…22c5 at0018 = ╱53╱S╱ // 0x22b2 @0x18
0x229a…22c5 at0019 = ╱41╱A╱ // 0x22b3 @0x19
0x229a…22c5 at001a = ╱4c╱L╱ // 0x22b4 @0x1a
0x229a…22c5 at001b = ╱44╱D╱ // 0x22b5 @0x1b
0x229a…22c5 at001c = ╱4f╱O╱ // 0x22b6 @0x1c
0x229a…22c5 at001d = ╱31╱1╱ // 0x22b7 @0x1d
0x229a…22c5 at001e = ╱ef╱$╱ // 0x22b8 @0x1e
0x229a…22c5 at001f = ╱ec╱,╱ // 0x22b9 @0x1f
0x229a…22c5 at0020 = ╱46╱F╱ // 0x22ba @0x20
0x229a…22c5 at0021 = ╱5d╱Å╱ // 0x22bb @0x21
0x229a…22c5 at0022 = ╱4b╱K╱ // 0x22bc @0x22
0x229a…22c5 at0023 = ╱52╱R╱ // 0x22bd @0x23
0x229a…22c5 at0024 = ╱45╱E╱ // 0x22be @0x24
0x229a…22c5 at0025 = ╱44╱D╱ // 0x22bf @0x25
0x229a…22c5 at0026 = ╱49╱I╱ // 0x22c0 @0x26
0x229a…22c5 at0027 = ╱54╱T╱ // 0x22c1 @0x27
0x229a…22c5 at0028 = ╱ef╱$╱ // 0x22c2 @0x28
0x229a…22c5 at0029 = ╱ee╱)╱ // 0x22c3 @0x29
0x229a…22c5 at002a = EOL // 0x22c4 @0x2a
0x229a…22c5 }
0x22c5…22cb b022 3310 ELSE
0x22c5…22cb LineComalBin {
0x22c5…22cb ptr = 0xb022 // 0x22c5 @0x0
0x22c5…22cb lno = 0x0cee // 0x22c7 @0x2
0x22c5…22cb at0004 = ╱9a╱ ELSE ╱ // 0x22c9 @0x4
0x22c5…22cb at0005 = EOL // 0x22ca @0x5
0x22c5…22cb }
0x22cb…22f4 b04b 3320 EXEC CALC(E,FÅDEBET$,TOSALDO1$,FÅDEBET$)
0x22cb…22f4 LineComalBin {
0x22cb…22f4 ptr = 0xb04b // 0x22cb @0x0
0x22cb…22f4 lno = 0x0cf8 // 0x22cd @0x2
0x22cb…22f4 at0004 = ╱9d╱ EXEC ╱ // 0x22cf @0x4
0x22cb…22f4 at0005 = ╱43╱C╱ // 0x22d0 @0x5
0x22cb…22f4 at0006 = ╱41╱A╱ // 0x22d1 @0x6
0x22cb…22f4 at0007 = ╱4c╱L╱ // 0x22d2 @0x7
0x22cb…22f4 at0008 = ╱43╱C╱ // 0x22d3 @0x8
0x22cb…22f4 at0009 = ╱ed╱(╱ // 0x22d4 @0x9
0x22cb…22f4 at000a = ╱45╱E╱ // 0x22d5 @0xa
0x22cb…22f4 at000b = ╱ec╱,╱ // 0x22d6 @0xb
0x22cb…22f4 at000c = ╱46╱F╱ // 0x22d7 @0xc
0x22cb…22f4 at000d = ╱5d╱Å╱ // 0x22d8 @0xd
0x22cb…22f4 at000e = ╱44╱D╱ // 0x22d9 @0xe
0x22cb…22f4 at000f = ╱45╱E╱ // 0x22da @0xf
0x22cb…22f4 at0010 = ╱42╱B╱ // 0x22db @0x10
0x22cb…22f4 at0011 = ╱45╱E╱ // 0x22dc @0x11
0x22cb…22f4 at0012 = ╱54╱T╱ // 0x22dd @0x12
0x22cb…22f4 at0013 = ╱ef╱$╱ // 0x22de @0x13
0x22cb…22f4 at0014 = ╱ec╱,╱ // 0x22df @0x14
0x22cb…22f4 at0015 = ╱54╱T╱ // 0x22e0 @0x15
0x22cb…22f4 at0016 = ╱4f╱O╱ // 0x22e1 @0x16
0x22cb…22f4 at0017 = ╱53╱S╱ // 0x22e2 @0x17
0x22cb…22f4 at0018 = ╱41╱A╱ // 0x22e3 @0x18
0x22cb…22f4 at0019 = ╱4c╱L╱ // 0x22e4 @0x19
0x22cb…22f4 at001a = ╱44╱D╱ // 0x22e5 @0x1a
0x22cb…22f4 at001b = ╱4f╱O╱ // 0x22e6 @0x1b
0x22cb…22f4 at001c = ╱31╱1╱ // 0x22e7 @0x1c
0x22cb…22f4 at001d = ╱ef╱$╱ // 0x22e8 @0x1d
0x22cb…22f4 at001e = ╱ec╱,╱ // 0x22e9 @0x1e
0x22cb…22f4 at001f = ╱46╱F╱ // 0x22ea @0x1f
0x22cb…22f4 at0020 = ╱5d╱Å╱ // 0x22eb @0x20
0x22cb…22f4 at0021 = ╱44╱D╱ // 0x22ec @0x21
0x22cb…22f4 at0022 = ╱45╱E╱ // 0x22ed @0x22
0x22cb…22f4 at0023 = ╱42╱B╱ // 0x22ee @0x23
0x22cb…22f4 at0024 = ╱45╱E╱ // 0x22ef @0x24
0x22cb…22f4 at0025 = ╱54╱T╱ // 0x22f0 @0x25
0x22cb…22f4 at0026 = ╱ef╱$╱ // 0x22f1 @0x26
0x22cb…22f4 at0027 = ╱ee╱)╱ // 0x22f2 @0x27
0x22cb…22f4 at0028 = EOL // 0x22f3 @0x28
0x22cb…22f4 }
0x22f4…22fa b051 3330 ENDIF
0x22f4…22fa LineComalBin {
0x22f4…22fa ptr = 0xb051 // 0x22f4 @0x0
0x22f4…22fa lno = 0x0d02 // 0x22f6 @0x2
0x22f4…22fa at0004 = ╱9b╱ ENDIF ╱ // 0x22f8 @0x4
0x22f4…22fa at0005 = EOL // 0x22f9 @0x5
0x22f4…22fa }
0x22fa…2308 b05f 3340 EXEC GEMFPOST
0x22fa…2308 LineComalBin {
0x22fa…2308 ptr = 0xb05f // 0x22fa @0x0
0x22fa…2308 lno = 0x0d0c // 0x22fc @0x2
0x22fa…2308 at0004 = ╱9d╱ EXEC ╱ // 0x22fe @0x4
0x22fa…2308 at0005 = ╱47╱G╱ // 0x22ff @0x5
0x22fa…2308 at0006 = ╱45╱E╱ // 0x2300 @0x6
0x22fa…2308 at0007 = ╱4d╱M╱ // 0x2301 @0x7
0x22fa…2308 at0008 = ╱46╱F╱ // 0x2302 @0x8
0x22fa…2308 at0009 = ╱50╱P╱ // 0x2303 @0x9
0x22fa…2308 at000a = ╱4f╱O╱ // 0x2304 @0xa
0x22fa…2308 at000b = ╱53╱S╱ // 0x2305 @0xb
0x22fa…2308 at000c = ╱54╱T╱ // 0x2306 @0xc
0x22fa…2308 at000d = EOL // 0x2307 @0xd
0x22fa…2308 }
0x2308…2349 b0a0 3350 TKODE$=CHR(10+48);TEKST$="Årsafslutnings difference"
0x2308…2349 LineComalBin {
0x2308…2349 ptr = 0xb0a0 // 0x2308 @0x0
0x2308…2349 lno = 0x0d16 // 0x230a @0x2
0x2308…2349 at0004 = ╱54╱T╱ // 0x230c @0x4
0x2308…2349 at0005 = ╱4b╱K╱ // 0x230d @0x5
0x2308…2349 at0006 = ╱4f╱O╱ // 0x230e @0x6
0x2308…2349 at0007 = ╱44╱D╱ // 0x230f @0x7
0x2308…2349 at0008 = ╱45╱E╱ // 0x2310 @0x8
0x2308…2349 at0009 = ╱ef╱$╱ // 0x2311 @0x9
0x2308…2349 at000a = ╱dc╱=╱ // 0x2312 @0xa
0x2308…2349 at000b = ╱cf╱CHR╱ // 0x2313 @0xb
0x2308…2349 at000c = ╱ed╱(╱ // 0x2314 @0xc
0x2308…2349 at000d = ╱31╱1╱ // 0x2315 @0xd
0x2308…2349 at000e = ╱30╱0╱ // 0x2316 @0xe
0x2308…2349 at000f = ╱fe0000a004╱ // 0x2317 @0xf
0x2308…2349 at0014 = ╱e2╱+╱ // 0x231c @0x14
0x2308…2349 at0015 = ╱34╱4╱ // 0x231d @0x15
0x2308…2349 at0016 = ╱38╱8╱ // 0x231e @0x16
0x2308…2349 at0017 = ╱fe0000c006╱ // 0x231f @0x17
0x2308…2349 at001c = ╱ee╱)╱ // 0x2324 @0x1c
0x2308…2349 at001d = ╱eb╱;╱ // 0x2325 @0x1d
0x2308…2349 at001e = ╱54╱T╱ // 0x2326 @0x1e
0x2308…2349 at001f = ╱45╱E╱ // 0x2327 @0x1f
0x2308…2349 at0020 = ╱4b╱K╱ // 0x2328 @0x20
0x2308…2349 at0021 = ╱53╱S╱ // 0x2329 @0x21
0x2308…2349 at0022 = ╱54╱T╱ // 0x232a @0x22
0x2308…2349 at0023 = ╱ef╱$╱ // 0x232b @0x23
0x2308…2349 at0024 = ╱dc╱=╱ // 0x232c @0x24
0x2308…2349 at0025 = ╱22╱"╱ // 0x232d @0x25
0x2308…2349 at0026 = ╱5d╱Å╱ // 0x232e @0x26
0x2308…2349 at0027 = ╱72╱r╱ // 0x232f @0x27
0x2308…2349 at0028 = ╱73╱s╱ // 0x2330 @0x28
0x2308…2349 at0029 = ╱61╱a╱ // 0x2331 @0x29
0x2308…2349 at002a = ╱66╱f╱ // 0x2332 @0x2a
0x2308…2349 at002b = ╱73╱s╱ // 0x2333 @0x2b
0x2308…2349 at002c = ╱6c╱l╱ // 0x2334 @0x2c
0x2308…2349 at002d = ╱75╱u╱ // 0x2335 @0x2d
0x2308…2349 at002e = ╱74╱t╱ // 0x2336 @0x2e
0x2308…2349 at002f = ╱6e╱n╱ // 0x2337 @0x2f
0x2308…2349 at0030 = ╱69╱i╱ // 0x2338 @0x30
0x2308…2349 at0031 = ╱6e╱n╱ // 0x2339 @0x31
0x2308…2349 at0032 = ╱67╱g╱ // 0x233a @0x32
0x2308…2349 at0033 = ╱73╱s╱ // 0x233b @0x33
0x2308…2349 at0034 = ╱20╱…╱ // 0x233c @0x34
0x2308…2349 at0035 = ╱64╱d╱ // 0x233d @0x35
0x2308…2349 at0036 = ╱69╱i╱ // 0x233e @0x36
0x2308…2349 at0037 = ╱66╱f╱ // 0x233f @0x37
0x2308…2349 at0038 = ╱66╱f╱ // 0x2340 @0x38
0x2308…2349 at0039 = ╱65╱e╱ // 0x2341 @0x39
0x2308…2349 at003a = ╱72╱r╱ // 0x2342 @0x3a
0x2308…2349 at003b = ╱65╱e╱ // 0x2343 @0x3b
0x2308…2349 at003c = ╱6e╱n╱ // 0x2344 @0x3c
0x2308…2349 at003d = ╱63╱c╱ // 0x2345 @0x3d
0x2308…2349 at003e = ╱65╱e╱ // 0x2346 @0x3e
0x2308…2349 at003f = ╱22╱"╱ // 0x2347 @0x3f
0x2308…2349 at0040 = EOL // 0x2348 @0x40
0x2308…2349 }
0x2349…2354 b0ab 3360 OPEN K8$,W
0x2349…2354 LineComalBin {
0x2349…2354 ptr = 0xb0ab // 0x2349 @0x0
0x2349…2354 lno = 0x0d20 // 0x234b @0x2
0x2349…2354 at0004 = ╱a7╱ OPEN ╱ // 0x234d @0x4
0x2349…2354 at0005 = ╱4b╱K╱ // 0x234e @0x5
0x2349…2354 at0006 = ╱38╱8╱ // 0x234f @0x6
0x2349…2354 at0007 = ╱ef╱$╱ // 0x2350 @0x7
0x2349…2354 at0008 = ╱ec╱,╱ // 0x2351 @0x8
0x2349…2354 at0009 = ╱57╱W╱ // 0x2352 @0x9
0x2349…2354 at000a = EOL // 0x2353 @0xa
0x2349…2354 }
0x2354…236d b0c4 3370 EXEC FEJL(W,21,K8$)
0x2354…236d LineComalBin {
0x2354…236d ptr = 0xb0c4 // 0x2354 @0x0
0x2354…236d lno = 0x0d2a // 0x2356 @0x2
0x2354…236d at0004 = ╱9d╱ EXEC ╱ // 0x2358 @0x4
0x2354…236d at0005 = ╱46╱F╱ // 0x2359 @0x5
0x2354…236d at0006 = ╱45╱E╱ // 0x235a @0x6
0x2354…236d at0007 = ╱4a╱J╱ // 0x235b @0x7
0x2354…236d at0008 = ╱4c╱L╱ // 0x235c @0x8
0x2354…236d at0009 = ╱ed╱(╱ // 0x235d @0x9
0x2354…236d at000a = ╱57╱W╱ // 0x235e @0xa
0x2354…236d at000b = ╱ec╱,╱ // 0x235f @0xb
0x2354…236d at000c = ╱32╱2╱ // 0x2360 @0xc
0x2354…236d at000d = ╱31╱1╱ // 0x2361 @0xd
0x2354…236d at000e = ╱fe0000a805╱ // 0x2362 @0xe
0x2354…236d at0013 = ╱ec╱,╱ // 0x2367 @0x13
0x2354…236d at0014 = ╱4b╱K╱ // 0x2368 @0x14
0x2354…236d at0015 = ╱38╱8╱ // 0x2369 @0x15
0x2354…236d at0016 = ╱ef╱$╱ // 0x236a @0x16
0x2354…236d at0017 = ╱ee╱)╱ // 0x236b @0x17
0x2354…236d at0018 = EOL // 0x236c @0x18
0x2354…236d }
0x236d…239c b0f3 3380 PUT K8$,E:DIFNR,T1(7),-E,TKODE$,TOSALDO$
0x236d…239c LineComalBin {
0x236d…239c ptr = 0xb0f3 // 0x236d @0x0
0x236d…239c lno = 0x0d34 // 0x236f @0x2
0x236d…239c at0004 = ╱aa╱ PUT ╱ // 0x2371 @0x4
0x236d…239c at0005 = ╱4b╱K╱ // 0x2372 @0x5
0x236d…239c at0006 = ╱38╱8╱ // 0x2373 @0x6
0x236d…239c at0007 = ╱ef╱$╱ // 0x2374 @0x7
0x236d…239c at0008 = ╱ec╱,╱ // 0x2375 @0x8
0x236d…239c at0009 = ╱45╱E╱ // 0x2376 @0x9
0x236d…239c at000a = ╱f0╱:╱ // 0x2377 @0xa
0x236d…239c at000b = ╱44╱D╱ // 0x2378 @0xb
0x236d…239c at000c = ╱49╱I╱ // 0x2379 @0xc
0x236d…239c at000d = ╱46╱F╱ // 0x237a @0xd
0x236d…239c at000e = ╱4e╱N╱ // 0x237b @0xe
0x236d…239c at000f = ╱52╱R╱ // 0x237c @0xf
0x236d…239c at0010 = ╱ec╱,╱ // 0x237d @0x10
0x236d…239c at0011 = ╱54╱T╱ // 0x237e @0x11
0x236d…239c at0012 = ╱31╱1╱ // 0x237f @0x12
0x236d…239c at0013 = ╱ed╱(╱ // 0x2380 @0x13
0x236d…239c at0014 = ╱37╱7╱ // 0x2381 @0x14
0x236d…239c at0015 = ╱fe0000e003╱ // 0x2382 @0x15
0x236d…239c at001a = ╱ee╱)╱ // 0x2387 @0x1a
0x236d…239c at001b = ╱ec╱,╱ // 0x2388 @0x1b
0x236d…239c at001c = ╱e9╱-╱ // 0x2389 @0x1c
0x236d…239c at001d = ╱45╱E╱ // 0x238a @0x1d
0x236d…239c at001e = ╱ec╱,╱ // 0x238b @0x1e
0x236d…239c at001f = ╱54╱T╱ // 0x238c @0x1f
0x236d…239c at0020 = ╱4b╱K╱ // 0x238d @0x20
0x236d…239c at0021 = ╱4f╱O╱ // 0x238e @0x21
0x236d…239c at0022 = ╱44╱D╱ // 0x238f @0x22
0x236d…239c at0023 = ╱45╱E╱ // 0x2390 @0x23
0x236d…239c at0024 = ╱ef╱$╱ // 0x2391 @0x24
0x236d…239c at0025 = ╱ec╱,╱ // 0x2392 @0x25
0x236d…239c at0026 = ╱54╱T╱ // 0x2393 @0x26
0x236d…239c at0027 = ╱4f╱O╱ // 0x2394 @0x27
0x236d…239c at0028 = ╱53╱S╱ // 0x2395 @0x28
0x236d…239c at0029 = ╱41╱A╱ // 0x2396 @0x29
0x236d…239c at002a = ╱4c╱L╱ // 0x2397 @0x2a
0x236d…239c at002b = ╱44╱D╱ // 0x2398 @0x2b
0x236d…239c at002c = ╱4f╱O╱ // 0x2399 @0x2c
0x236d…239c at002d = ╱ef╱$╱ // 0x239a @0x2d
0x236d…239c at002e = EOL // 0x239b @0x2e
0x236d…239c }
0x239c…23b5 b10c 3390 EXEC FEJL(W,22,K8$)
0x239c…23b5 LineComalBin {
0x239c…23b5 ptr = 0xb10c // 0x239c @0x0
0x239c…23b5 lno = 0x0d3e // 0x239e @0x2
0x239c…23b5 at0004 = ╱9d╱ EXEC ╱ // 0x23a0 @0x4
0x239c…23b5 at0005 = ╱46╱F╱ // 0x23a1 @0x5
0x239c…23b5 at0006 = ╱45╱E╱ // 0x23a2 @0x6
0x239c…23b5 at0007 = ╱4a╱J╱ // 0x23a3 @0x7
0x239c…23b5 at0008 = ╱4c╱L╱ // 0x23a4 @0x8
0x239c…23b5 at0009 = ╱ed╱(╱ // 0x23a5 @0x9
0x239c…23b5 at000a = ╱57╱W╱ // 0x23a6 @0xa
0x239c…23b5 at000b = ╱ec╱,╱ // 0x23a7 @0xb
0x239c…23b5 at000c = ╱32╱2╱ // 0x23a8 @0xc
0x239c…23b5 at000d = ╱32╱2╱ // 0x23a9 @0xd
0x239c…23b5 at000e = ╱fe0000b005╱ // 0x23aa @0xe
0x239c…23b5 at0013 = ╱ec╱,╱ // 0x23af @0x13
0x239c…23b5 at0014 = ╱4b╱K╱ // 0x23b0 @0x14
0x239c…23b5 at0015 = ╱38╱8╱ // 0x23b1 @0x15
0x239c…23b5 at0016 = ╱ef╱$╱ // 0x23b2 @0x16
0x239c…23b5 at0017 = ╱ee╱)╱ // 0x23b3 @0x17
0x239c…23b5 at0018 = EOL // 0x23b4 @0x18
0x239c…23b5 }
0x23b5…23cd b124 3400 PUT K8$,G:DIFNR,TEKST$
0x23b5…23cd LineComalBin {
0x23b5…23cd ptr = 0xb124 // 0x23b5 @0x0
0x23b5…23cd lno = 0x0d48 // 0x23b7 @0x2
0x23b5…23cd at0004 = ╱aa╱ PUT ╱ // 0x23b9 @0x4
0x23b5…23cd at0005 = ╱4b╱K╱ // 0x23ba @0x5
0x23b5…23cd at0006 = ╱38╱8╱ // 0x23bb @0x6
0x23b5…23cd at0007 = ╱ef╱$╱ // 0x23bc @0x7
0x23b5…23cd at0008 = ╱ec╱,╱ // 0x23bd @0x8
0x23b5…23cd at0009 = ╱47╱G╱ // 0x23be @0x9
0x23b5…23cd at000a = ╱f0╱:╱ // 0x23bf @0xa
0x23b5…23cd at000b = ╱44╱D╱ // 0x23c0 @0xb
0x23b5…23cd at000c = ╱49╱I╱ // 0x23c1 @0xc
0x23b5…23cd at000d = ╱46╱F╱ // 0x23c2 @0xd
0x23b5…23cd at000e = ╱4e╱N╱ // 0x23c3 @0xe
0x23b5…23cd at000f = ╱52╱R╱ // 0x23c4 @0xf
0x23b5…23cd at0010 = ╱ec╱,╱ // 0x23c5 @0x10
0x23b5…23cd at0011 = ╱54╱T╱ // 0x23c6 @0x11
0x23b5…23cd at0012 = ╱45╱E╱ // 0x23c7 @0x12
0x23b5…23cd at0013 = ╱4b╱K╱ // 0x23c8 @0x13
0x23b5…23cd at0014 = ╱53╱S╱ // 0x23c9 @0x14
0x23b5…23cd at0015 = ╱54╱T╱ // 0x23ca @0x15
0x23b5…23cd at0016 = ╱ef╱$╱ // 0x23cb @0x16
0x23b5…23cd at0017 = EOL // 0x23cc @0x17
0x23b5…23cd }
0x23cd…23e6 b13d 3410 EXEC FEJL(W,23,K8$)
0x23cd…23e6 LineComalBin {
0x23cd…23e6 ptr = 0xb13d // 0x23cd @0x0
0x23cd…23e6 lno = 0x0d52 // 0x23cf @0x2
0x23cd…23e6 at0004 = ╱9d╱ EXEC ╱ // 0x23d1 @0x4
0x23cd…23e6 at0005 = ╱46╱F╱ // 0x23d2 @0x5
0x23cd…23e6 at0006 = ╱45╱E╱ // 0x23d3 @0x6
0x23cd…23e6 at0007 = ╱4a╱J╱ // 0x23d4 @0x7
0x23cd…23e6 at0008 = ╱4c╱L╱ // 0x23d5 @0x8
0x23cd…23e6 at0009 = ╱ed╱(╱ // 0x23d6 @0x9
0x23cd…23e6 at000a = ╱57╱W╱ // 0x23d7 @0xa
0x23cd…23e6 at000b = ╱ec╱,╱ // 0x23d8 @0xb
0x23cd…23e6 at000c = ╱32╱2╱ // 0x23d9 @0xc
0x23cd…23e6 at000d = ╱33╱3╱ // 0x23da @0xd
0x23cd…23e6 at000e = ╱fe0000b805╱ // 0x23db @0xe
0x23cd…23e6 at0013 = ╱ec╱,╱ // 0x23e0 @0x13
0x23cd…23e6 at0014 = ╱4b╱K╱ // 0x23e1 @0x14
0x23cd…23e6 at0015 = ╱38╱8╱ // 0x23e2 @0x15
0x23cd…23e6 at0016 = ╱ef╱$╱ // 0x23e3 @0x16
0x23cd…23e6 at0017 = ╱ee╱)╱ // 0x23e4 @0x17
0x23cd…23e6 at0018 = EOL // 0x23e5 @0x18
0x23cd…23e6 }
0x23e6…23ef b146 3420 CLOSE K8$
0x23e6…23ef LineComalBin {
0x23e6…23ef ptr = 0xb146 // 0x23e6 @0x0
0x23e6…23ef lno = 0x0d5c // 0x23e8 @0x2
0x23e6…23ef at0004 = ╱a8╱ CLOSE ╱ // 0x23ea @0x4
0x23e6…23ef at0005 = ╱4b╱K╱ // 0x23eb @0x5
0x23e6…23ef at0006 = ╱38╱8╱ // 0x23ec @0x6
0x23e6…23ef at0007 = ╱ef╱$╱ // 0x23ed @0x7
0x23e6…23ef at0008 = EOL // 0x23ee @0x8
0x23e6…23ef }
0x23ef…2408 b15f 3430 EXEC FEJL(W,24,K8$)
0x23ef…2408 LineComalBin {
0x23ef…2408 ptr = 0xb15f // 0x23ef @0x0
0x23ef…2408 lno = 0x0d66 // 0x23f1 @0x2
0x23ef…2408 at0004 = ╱9d╱ EXEC ╱ // 0x23f3 @0x4
0x23ef…2408 at0005 = ╱46╱F╱ // 0x23f4 @0x5
0x23ef…2408 at0006 = ╱45╱E╱ // 0x23f5 @0x6
0x23ef…2408 at0007 = ╱4a╱J╱ // 0x23f6 @0x7
0x23ef…2408 at0008 = ╱4c╱L╱ // 0x23f7 @0x8
0x23ef…2408 at0009 = ╱ed╱(╱ // 0x23f8 @0x9
0x23ef…2408 at000a = ╱57╱W╱ // 0x23f9 @0xa
0x23ef…2408 at000b = ╱ec╱,╱ // 0x23fa @0xb
0x23ef…2408 at000c = ╱32╱2╱ // 0x23fb @0xc
0x23ef…2408 at000d = ╱34╱4╱ // 0x23fc @0xd
0x23ef…2408 at000e = ╱fe0000c005╱ // 0x23fd @0xe
0x23ef…2408 at0013 = ╱ec╱,╱ // 0x2402 @0x13
0x23ef…2408 at0014 = ╱4b╱K╱ // 0x2403 @0x14
0x23ef…2408 at0015 = ╱38╱8╱ // 0x2404 @0x15
0x23ef…2408 at0016 = ╱ef╱$╱ // 0x2405 @0x16
0x23ef…2408 at0017 = ╱ee╱)╱ // 0x2406 @0x17
0x23ef…2408 at0018 = EOL // 0x2407 @0x18
0x23ef…2408 }
0x2408…2419 b170 3440 T2(5)=G
0x2408…2419 LineComalBin {
0x2408…2419 ptr = 0xb170 // 0x2408 @0x0
0x2408…2419 lno = 0x0d70 // 0x240a @0x2
0x2408…2419 at0004 = ╱54╱T╱ // 0x240c @0x4
0x2408…2419 at0005 = ╱32╱2╱ // 0x240d @0x5
0x2408…2419 at0006 = ╱ed╱(╱ // 0x240e @0x6
0x2408…2419 at0007 = ╱35╱5╱ // 0x240f @0x7
0x2408…2419 at0008 = ╱fe0000a003╱ // 0x2410 @0x8
0x2408…2419 at000d = ╱ee╱)╱ // 0x2415 @0xd
0x2408…2419 at000e = ╱dc╱=╱ // 0x2416 @0xe
0x2408…2419 at000f = ╱47╱G╱ // 0x2417 @0xf
0x2408…2419 at0010 = EOL // 0x2418 @0x10
0x2408…2419 }
0x2419…2425 b17c 3450 OPEN K10$,W
0x2419…2425 LineComalBin {
0x2419…2425 ptr = 0xb17c // 0x2419 @0x0
0x2419…2425 lno = 0x0d7a // 0x241b @0x2
0x2419…2425 at0004 = ╱a7╱ OPEN ╱ // 0x241d @0x4
0x2419…2425 at0005 = ╱4b╱K╱ // 0x241e @0x5
0x2419…2425 at0006 = ╱31╱1╱ // 0x241f @0x6
0x2419…2425 at0007 = ╱30╱0╱ // 0x2420 @0x7
0x2419…2425 at0008 = ╱ef╱$╱ // 0x2421 @0x8
0x2419…2425 at0009 = ╱ec╱,╱ // 0x2422 @0x9
0x2419…2425 at000a = ╱57╱W╱ // 0x2423 @0xa
0x2419…2425 at000b = EOL // 0x2424 @0xb
0x2419…2425 }
0x2425…243f b196 3460 EXEC FEJL(W,25,K10$)
0x2425…243f LineComalBin {
0x2425…243f ptr = 0xb196 // 0x2425 @0x0
0x2425…243f lno = 0x0d84 // 0x2427 @0x2
0x2425…243f at0004 = ╱9d╱ EXEC ╱ // 0x2429 @0x4
0x2425…243f at0005 = ╱46╱F╱ // 0x242a @0x5
0x2425…243f at0006 = ╱45╱E╱ // 0x242b @0x6
0x2425…243f at0007 = ╱4a╱J╱ // 0x242c @0x7
0x2425…243f at0008 = ╱4c╱L╱ // 0x242d @0x8
0x2425…243f at0009 = ╱ed╱(╱ // 0x242e @0x9
0x2425…243f at000a = ╱57╱W╱ // 0x242f @0xa
0x2425…243f at000b = ╱ec╱,╱ // 0x2430 @0xb
0x2425…243f at000c = ╱32╱2╱ // 0x2431 @0xc
0x2425…243f at000d = ╱35╱5╱ // 0x2432 @0xd
0x2425…243f at000e = ╱fe0000c805╱ // 0x2433 @0xe
0x2425…243f at0013 = ╱ec╱,╱ // 0x2438 @0x13
0x2425…243f at0014 = ╱4b╱K╱ // 0x2439 @0x14
0x2425…243f at0015 = ╱31╱1╱ // 0x243a @0x15
0x2425…243f at0016 = ╱30╱0╱ // 0x243b @0x16
0x2425…243f at0017 = ╱ef╱$╱ // 0x243c @0x17
0x2425…243f at0018 = ╱ee╱)╱ // 0x243d @0x18
0x2425…243f at0019 = EOL // 0x243e @0x19
0x2425…243f }
0x243f…24a0 b1f7 3470 PUT K10$,13:T2(E),T2(G),T2(V),T2(4),T2(5),T2(6),T2(7),T2(8),T2(W)
0x243f…24a0 LineComalBin {
0x243f…24a0 ptr = 0xb1f7 // 0x243f @0x0
0x243f…24a0 lno = 0x0d8e // 0x2441 @0x2
0x243f…24a0 at0004 = ╱aa╱ PUT ╱ // 0x2443 @0x4
0x243f…24a0 at0005 = ╱4b╱K╱ // 0x2444 @0x5
0x243f…24a0 at0006 = ╱31╱1╱ // 0x2445 @0x6
0x243f…24a0 at0007 = ╱30╱0╱ // 0x2446 @0x7
0x243f…24a0 at0008 = ╱ef╱$╱ // 0x2447 @0x8
0x243f…24a0 at0009 = ╱ec╱,╱ // 0x2448 @0x9
0x243f…24a0 at000a = ╱31╱1╱ // 0x2449 @0xa
0x243f…24a0 at000b = ╱33╱3╱ // 0x244a @0xb
0x243f…24a0 at000c = ╱fe0000d004╱ // 0x244b @0xc
0x243f…24a0 at0011 = ╱f0╱:╱ // 0x2450 @0x11
0x243f…24a0 at0012 = ╱54╱T╱ // 0x2451 @0x12
0x243f…24a0 at0013 = ╱32╱2╱ // 0x2452 @0x13
0x243f…24a0 at0014 = ╱ed╱(╱ // 0x2453 @0x14
0x243f…24a0 at0015 = ╱45╱E╱ // 0x2454 @0x15
0x243f…24a0 at0016 = ╱ee╱)╱ // 0x2455 @0x16
0x243f…24a0 at0017 = ╱ec╱,╱ // 0x2456 @0x17
0x243f…24a0 at0018 = ╱54╱T╱ // 0x2457 @0x18
0x243f…24a0 at0019 = ╱32╱2╱ // 0x2458 @0x19
0x243f…24a0 at001a = ╱ed╱(╱ // 0x2459 @0x1a
0x243f…24a0 at001b = ╱47╱G╱ // 0x245a @0x1b
0x243f…24a0 at001c = ╱ee╱)╱ // 0x245b @0x1c
0x243f…24a0 at001d = ╱ec╱,╱ // 0x245c @0x1d
0x243f…24a0 at001e = ╱54╱T╱ // 0x245d @0x1e
0x243f…24a0 at001f = ╱32╱2╱ // 0x245e @0x1f
0x243f…24a0 at0020 = ╱ed╱(╱ // 0x245f @0x20
0x243f…24a0 at0021 = ╱56╱V╱ // 0x2460 @0x21
0x243f…24a0 at0022 = ╱ee╱)╱ // 0x2461 @0x22
0x243f…24a0 at0023 = ╱ec╱,╱ // 0x2462 @0x23
0x243f…24a0 at0024 = ╱54╱T╱ // 0x2463 @0x24
0x243f…24a0 at0025 = ╱32╱2╱ // 0x2464 @0x25
0x243f…24a0 at0026 = ╱ed╱(╱ // 0x2465 @0x26
0x243f…24a0 at0027 = ╱34╱4╱ // 0x2466 @0x27
0x243f…24a0 at0028 = ╱fe00008003╱ // 0x2467 @0x28
0x243f…24a0 at002d = ╱ee╱)╱ // 0x246c @0x2d
0x243f…24a0 at002e = ╱ec╱,╱ // 0x246d @0x2e
0x243f…24a0 at002f = ╱54╱T╱ // 0x246e @0x2f
0x243f…24a0 at0030 = ╱32╱2╱ // 0x246f @0x30
0x243f…24a0 at0031 = ╱ed╱(╱ // 0x2470 @0x31
0x243f…24a0 at0032 = ╱35╱5╱ // 0x2471 @0x32
0x243f…24a0 at0033 = ╱fe0000a003╱ // 0x2472 @0x33
0x243f…24a0 at0038 = ╱ee╱)╱ // 0x2477 @0x38
0x243f…24a0 at0039 = ╱ec╱,╱ // 0x2478 @0x39
0x243f…24a0 at003a = ╱54╱T╱ // 0x2479 @0x3a
0x243f…24a0 at003b = ╱32╱2╱ // 0x247a @0x3b
0x243f…24a0 at003c = ╱ed╱(╱ // 0x247b @0x3c
0x243f…24a0 at003d = ╱36╱6╱ // 0x247c @0x3d
0x243f…24a0 at003e = ╱fe0000c003╱ // 0x247d @0x3e
0x243f…24a0 at0043 = ╱ee╱)╱ // 0x2482 @0x43
0x243f…24a0 at0044 = ╱ec╱,╱ // 0x2483 @0x44
0x243f…24a0 at0045 = ╱54╱T╱ // 0x2484 @0x45
0x243f…24a0 at0046 = ╱32╱2╱ // 0x2485 @0x46
0x243f…24a0 at0047 = ╱ed╱(╱ // 0x2486 @0x47
0x243f…24a0 at0048 = ╱37╱7╱ // 0x2487 @0x48
0x243f…24a0 at0049 = ╱fe0000e003╱ // 0x2488 @0x49
0x243f…24a0 at004e = ╱ee╱)╱ // 0x248d @0x4e
0x243f…24a0 at004f = ╱ec╱,╱ // 0x248e @0x4f
0x243f…24a0 at0050 = ╱54╱T╱ // 0x248f @0x50
0x243f…24a0 at0051 = ╱32╱2╱ // 0x2490 @0x51
0x243f…24a0 at0052 = ╱ed╱(╱ // 0x2491 @0x52
0x243f…24a0 at0053 = ╱38╱8╱ // 0x2492 @0x53
0x243f…24a0 at0054 = ╱fe00008004╱ // 0x2493 @0x54
0x243f…24a0 at0059 = ╱ee╱)╱ // 0x2498 @0x59
0x243f…24a0 at005a = ╱ec╱,╱ // 0x2499 @0x5a
0x243f…24a0 at005b = ╱54╱T╱ // 0x249a @0x5b
0x243f…24a0 at005c = ╱32╱2╱ // 0x249b @0x5c
0x243f…24a0 at005d = ╱ed╱(╱ // 0x249c @0x5d
0x243f…24a0 at005e = ╱57╱W╱ // 0x249d @0x5e
0x243f…24a0 at005f = ╱ee╱)╱ // 0x249e @0x5f
0x243f…24a0 at0060 = EOL // 0x249f @0x60
0x243f…24a0 }
0x24a0…24ba b211 3480 EXEC FEJL(W,26,K10$)
0x24a0…24ba LineComalBin {
0x24a0…24ba ptr = 0xb211 // 0x24a0 @0x0
0x24a0…24ba lno = 0x0d98 // 0x24a2 @0x2
0x24a0…24ba at0004 = ╱9d╱ EXEC ╱ // 0x24a4 @0x4
0x24a0…24ba at0005 = ╱46╱F╱ // 0x24a5 @0x5
0x24a0…24ba at0006 = ╱45╱E╱ // 0x24a6 @0x6
0x24a0…24ba at0007 = ╱4a╱J╱ // 0x24a7 @0x7
0x24a0…24ba at0008 = ╱4c╱L╱ // 0x24a8 @0x8
0x24a0…24ba at0009 = ╱ed╱(╱ // 0x24a9 @0x9
0x24a0…24ba at000a = ╱57╱W╱ // 0x24aa @0xa
0x24a0…24ba at000b = ╱ec╱,╱ // 0x24ab @0xb
0x24a0…24ba at000c = ╱32╱2╱ // 0x24ac @0xc
0x24a0…24ba at000d = ╱36╱6╱ // 0x24ad @0xd
0x24a0…24ba at000e = ╱fe0000d005╱ // 0x24ae @0xe
0x24a0…24ba at0013 = ╱ec╱,╱ // 0x24b3 @0x13
0x24a0…24ba at0014 = ╱4b╱K╱ // 0x24b4 @0x14
0x24a0…24ba at0015 = ╱31╱1╱ // 0x24b5 @0x15
0x24a0…24ba at0016 = ╱30╱0╱ // 0x24b6 @0x16
0x24a0…24ba at0017 = ╱ef╱$╱ // 0x24b7 @0x17
0x24a0…24ba at0018 = ╱ee╱)╱ // 0x24b8 @0x18
0x24a0…24ba at0019 = EOL // 0x24b9 @0x19
0x24a0…24ba }
0x24ba…24c4 b21b 3490 CLOSE K10$
0x24ba…24c4 LineComalBin {
0x24ba…24c4 ptr = 0xb21b // 0x24ba @0x0
0x24ba…24c4 lno = 0x0da2 // 0x24bc @0x2
0x24ba…24c4 at0004 = ╱a8╱ CLOSE ╱ // 0x24be @0x4
0x24ba…24c4 at0005 = ╱4b╱K╱ // 0x24bf @0x5
0x24ba…24c4 at0006 = ╱31╱1╱ // 0x24c0 @0x6
0x24ba…24c4 at0007 = ╱30╱0╱ // 0x24c1 @0x7
0x24ba…24c4 at0008 = ╱ef╱$╱ // 0x24c2 @0x8
0x24ba…24c4 at0009 = EOL // 0x24c3 @0x9
0x24ba…24c4 }
0x24c4…24de b235 3500 EXEC FEJL(W,27,K10$)
0x24c4…24de LineComalBin {
0x24c4…24de ptr = 0xb235 // 0x24c4 @0x0
0x24c4…24de lno = 0x0dac // 0x24c6 @0x2
0x24c4…24de at0004 = ╱9d╱ EXEC ╱ // 0x24c8 @0x4
0x24c4…24de at0005 = ╱46╱F╱ // 0x24c9 @0x5
0x24c4…24de at0006 = ╱45╱E╱ // 0x24ca @0x6
0x24c4…24de at0007 = ╱4a╱J╱ // 0x24cb @0x7
0x24c4…24de at0008 = ╱4c╱L╱ // 0x24cc @0x8
0x24c4…24de at0009 = ╱ed╱(╱ // 0x24cd @0x9
0x24c4…24de at000a = ╱57╱W╱ // 0x24ce @0xa
0x24c4…24de at000b = ╱ec╱,╱ // 0x24cf @0xb
0x24c4…24de at000c = ╱32╱2╱ // 0x24d0 @0xc
0x24c4…24de at000d = ╱37╱7╱ // 0x24d1 @0xd
0x24c4…24de at000e = ╱fe0000d805╱ // 0x24d2 @0xe
0x24c4…24de at0013 = ╱ec╱,╱ // 0x24d7 @0x13
0x24c4…24de at0014 = ╱4b╱K╱ // 0x24d8 @0x14
0x24c4…24de at0015 = ╱31╱1╱ // 0x24d9 @0x15
0x24c4…24de at0016 = ╱30╱0╱ // 0x24da @0x16
0x24c4…24de at0017 = ╱ef╱$╱ // 0x24db @0x17
0x24c4…24de at0018 = ╱ee╱)╱ // 0x24dc @0x18
0x24c4…24de at0019 = EOL // 0x24dd @0x19
0x24c4…24de }
0x24de…24fb b252 3510 EXEC DATOUD(T1(7),DAT$)
0x24de…24fb LineComalBin {
0x24de…24fb ptr = 0xb252 // 0x24de @0x0
0x24de…24fb lno = 0x0db6 // 0x24e0 @0x2
0x24de…24fb at0004 = ╱9d╱ EXEC ╱ // 0x24e2 @0x4
0x24de…24fb at0005 = ╱44╱D╱ // 0x24e3 @0x5
0x24de…24fb at0006 = ╱41╱A╱ // 0x24e4 @0x6
0x24de…24fb at0007 = ╱54╱T╱ // 0x24e5 @0x7
0x24de…24fb at0008 = ╱4f╱O╱ // 0x24e6 @0x8
0x24de…24fb at0009 = ╱55╱U╱ // 0x24e7 @0x9
0x24de…24fb at000a = ╱44╱D╱ // 0x24e8 @0xa
0x24de…24fb at000b = ╱ed╱(╱ // 0x24e9 @0xb
0x24de…24fb at000c = ╱54╱T╱ // 0x24ea @0xc
0x24de…24fb at000d = ╱31╱1╱ // 0x24eb @0xd
0x24de…24fb at000e = ╱ed╱(╱ // 0x24ec @0xe
0x24de…24fb at000f = ╱37╱7╱ // 0x24ed @0xf
0x24de…24fb at0010 = ╱fe0000e003╱ // 0x24ee @0x10
0x24de…24fb at0015 = ╱ee╱)╱ // 0x24f3 @0x15
0x24de…24fb at0016 = ╱ec╱,╱ // 0x24f4 @0x16
0x24de…24fb at0017 = ╱44╱D╱ // 0x24f5 @0x17
0x24de…24fb at0018 = ╱41╱A╱ // 0x24f6 @0x18
0x24de…24fb at0019 = ╱54╱T╱ // 0x24f7 @0x19
0x24de…24fb at001a = ╱ef╱$╱ // 0x24f8 @0x1a
0x24de…24fb at001b = ╱ee╱)╱ // 0x24f9 @0x1b
0x24de…24fb at001c = EOL // 0x24fa @0x1c
0x24de…24fb }
0x24fb…2501 b258 3520 CLEAR
0x24fb…2501 LineComalBin {
0x24fb…2501 ptr = 0xb258 // 0x24fb @0x0
0x24fb…2501 lno = 0x0dc0 // 0x24fd @0x2
0x24fb…2501 at0004 = ╱a0╱ CLEAR ╱ // 0x24ff @0x4
0x24fb…2501 at0005 = EOL // 0x2500 @0x5
0x24fb…2501 }
0x2501…2507 b25e 3530 REPEAT
0x2501…2507 LineComalBin {
0x2501…2507 ptr = 0xb25e // 0x2501 @0x0
0x2501…2507 lno = 0x0dca // 0x2503 @0x2
0x2501…2507 at0004 = ╱97╱ REPEAT ╱ // 0x2505 @0x4
0x2501…2507 at0005 = EOL // 0x2506 @0x5
0x2501…2507 }
0x2507…251c b273 3540 CURSOR 15,13
0x2507…251c LineComalBin {
0x2507…251c ptr = 0xb273 // 0x2507 @0x0
0x2507…251c lno = 0x0dd4 // 0x2509 @0x2
0x2507…251c at0004 = ╱a1╱ CURSOR ╱ // 0x250b @0x4
0x2507…251c at0005 = ╱31╱1╱ // 0x250c @0x5
0x2507…251c at0006 = ╱35╱5╱ // 0x250d @0x6
0x2507…251c at0007 = ╱fe0000f004╱ // 0x250e @0x7
0x2507…251c at000c = ╱ec╱,╱ // 0x2513 @0xc
0x2507…251c at000d = ╱31╱1╱ // 0x2514 @0xd
0x2507…251c at000e = ╱33╱3╱ // 0x2515 @0xe
0x2507…251c at000f = ╱fe0000d004╱ // 0x2516 @0xf
0x2507…251c at0014 = EOL // 0x251b @0x14
0x2507…251c }
0x251c…254f b2a6 3550 INPUT "Monter papir til udskrift og tast RETURN",A$
0x251c…254f LineComalBin {
0x251c…254f ptr = 0xb2a6 // 0x251c @0x0
0x251c…254f lno = 0x0dde // 0x251e @0x2
0x251c…254f at0004 = ╱91╱ INPUT ╱ // 0x2520 @0x4
0x251c…254f at0005 = ╱22╱"╱ // 0x2521 @0x5
0x251c…254f at0006 = ╱4d╱M╱ // 0x2522 @0x6
0x251c…254f at0007 = ╱6f╱o╱ // 0x2523 @0x7
0x251c…254f at0008 = ╱6e╱n╱ // 0x2524 @0x8
0x251c…254f at0009 = ╱74╱t╱ // 0x2525 @0x9
0x251c…254f at000a = ╱65╱e╱ // 0x2526 @0xa
0x251c…254f at000b = ╱72╱r╱ // 0x2527 @0xb
0x251c…254f at000c = ╱20╱…╱ // 0x2528 @0xc
0x251c…254f at000d = ╱70╱p╱ // 0x2529 @0xd
0x251c…254f at000e = ╱61╱a╱ // 0x252a @0xe
0x251c…254f at000f = ╱70╱p╱ // 0x252b @0xf
0x251c…254f at0010 = ╱69╱i╱ // 0x252c @0x10
0x251c…254f at0011 = ╱72╱r╱ // 0x252d @0x11
0x251c…254f at0012 = ╱20╱…╱ // 0x252e @0x12
0x251c…254f at0013 = ╱74╱t╱ // 0x252f @0x13
0x251c…254f at0014 = ╱69╱i╱ // 0x2530 @0x14
0x251c…254f at0015 = ╱6c╱l╱ // 0x2531 @0x15
0x251c…254f at0016 = ╱20╱…╱ // 0x2532 @0x16
0x251c…254f at0017 = ╱75╱u╱ // 0x2533 @0x17
0x251c…254f at0018 = ╱64╱d╱ // 0x2534 @0x18
0x251c…254f at0019 = ╱73╱s╱ // 0x2535 @0x19
0x251c…254f at001a = ╱6b╱k╱ // 0x2536 @0x1a
0x251c…254f at001b = ╱72╱r╱ // 0x2537 @0x1b
0x251c…254f at001c = ╱69╱i╱ // 0x2538 @0x1c
0x251c…254f at001d = ╱66╱f╱ // 0x2539 @0x1d
0x251c…254f at001e = ╱74╱t╱ // 0x253a @0x1e
0x251c…254f at001f = ╱20╱…╱ // 0x253b @0x1f
0x251c…254f at0020 = ╱6f╱o╱ // 0x253c @0x20
0x251c…254f at0021 = ╱67╱g╱ // 0x253d @0x21
0x251c…254f at0022 = ╱20╱…╱ // 0x253e @0x22
0x251c…254f at0023 = ╱74╱t╱ // 0x253f @0x23
0x251c…254f at0024 = ╱61╱a╱ // 0x2540 @0x24
0x251c…254f at0025 = ╱73╱s╱ // 0x2541 @0x25
0x251c…254f at0026 = ╱74╱t╱ // 0x2542 @0x26
0x251c…254f at0027 = ╱20╱…╱ // 0x2543 @0x27
0x251c…254f at0028 = ╱52╱R╱ // 0x2544 @0x28
0x251c…254f at0029 = ╱45╱E╱ // 0x2545 @0x29
0x251c…254f at002a = ╱54╱T╱ // 0x2546 @0x2a
0x251c…254f at002b = ╱55╱U╱ // 0x2547 @0x2b
0x251c…254f at002c = ╱52╱R╱ // 0x2548 @0x2c
0x251c…254f at002d = ╱4e╱N╱ // 0x2549 @0x2d
0x251c…254f at002e = ╱22╱"╱ // 0x254a @0x2e
0x251c…254f at002f = ╱ec╱,╱ // 0x254b @0x2f
0x251c…254f at0030 = ╱41╱A╱ // 0x254c @0x30
0x251c…254f at0031 = ╱ef╱$╱ // 0x254d @0x31
0x251c…254f at0032 = EOL // 0x254e @0x32
0x251c…254f }
0x254f…255f b2b6 3560 EXEC NRTEST(A$)
0x254f…255f LineComalBin {
0x254f…255f ptr = 0xb2b6 // 0x254f @0x0
0x254f…255f lno = 0x0de8 // 0x2551 @0x2
0x254f…255f at0004 = ╱9d╱ EXEC ╱ // 0x2553 @0x4
0x254f…255f at0005 = ╱4e╱N╱ // 0x2554 @0x5
0x254f…255f at0006 = ╱52╱R╱ // 0x2555 @0x6
0x254f…255f at0007 = ╱54╱T╱ // 0x2556 @0x7
0x254f…255f at0008 = ╱45╱E╱ // 0x2557 @0x8
0x254f…255f at0009 = ╱53╱S╱ // 0x2558 @0x9
0x254f…255f at000a = ╱54╱T╱ // 0x2559 @0xa
0x254f…255f at000b = ╱ed╱(╱ // 0x255a @0xb
0x254f…255f at000c = ╱41╱A╱ // 0x255b @0xc
0x254f…255f at000d = ╱ef╱$╱ // 0x255c @0xd
0x254f…255f at000e = ╱ee╱)╱ // 0x255d @0xe
0x254f…255f at000f = EOL // 0x255e @0xf
0x254f…255f }
0x255f…2569 b2c0 3570 UNTIL P=-E
0x255f…2569 LineComalBin {
0x255f…2569 ptr = 0xb2c0 // 0x255f @0x0
0x255f…2569 lno = 0x0df2 // 0x2561 @0x2
0x255f…2569 at0004 = ╱98╱ UNTIL ╱ // 0x2563 @0x4
0x255f…2569 at0005 = ╱50╱P╱ // 0x2564 @0x5
0x255f…2569 at0006 = ╱dc╱=╱ // 0x2565 @0x6
0x255f…2569 at0007 = ╱e9╱-╱ // 0x2566 @0x7
0x255f…2569 at0008 = ╱45╱E╱ // 0x2567 @0x8
0x255f…2569 at0009 = EOL // 0x2568 @0x9
0x255f…2569 }
0x2569…2570 b2c7 3580 OUTPUT P
0x2569…2570 LineComalBin {
0x2569…2570 ptr = 0xb2c7 // 0x2569 @0x0
0x2569…2570 lno = 0x0dfc // 0x256b @0x2
0x2569…2570 at0004 = ╱a5╱ OUTPUT ╱ // 0x256d @0x4
0x2569…2570 at0005 = ╱50╱P╱ // 0x256e @0x5
0x2569…2570 at0006 = EOL // 0x256f @0x6
0x2569…2570 }
0x2570…2588 b2df 3585 PRINT TAB(67);DV$;" "
0x2570…2588 LineComalBin {
0x2570…2588 ptr = 0xb2df // 0x2570 @0x0
0x2570…2588 lno = 0x0e01 // 0x2572 @0x2
0x2570…2588 at0004 = ╱92╱ PRINT ╱ // 0x2574 @0x4
0x2570…2588 at0005 = ╱d2╱TAB╱ // 0x2575 @0x5
0x2570…2588 at0006 = ╱ed╱(╱ // 0x2576 @0x6
0x2570…2588 at0007 = ╱36╱6╱ // 0x2577 @0x7
0x2570…2588 at0008 = ╱37╱7╱ // 0x2578 @0x8
0x2570…2588 at0009 = ╱fe00008607╱ // 0x2579 @0x9
0x2570…2588 at000e = ╱ee╱)╱ // 0x257e @0xe
0x2570…2588 at000f = ╱eb╱;╱ // 0x257f @0xf
0x2570…2588 at0010 = ╱44╱D╱ // 0x2580 @0x10
0x2570…2588 at0011 = ╱56╱V╱ // 0x2581 @0x11
0x2570…2588 at0012 = ╱ef╱$╱ // 0x2582 @0x12
0x2570…2588 at0013 = ╱eb╱;╱ // 0x2583 @0x13
0x2570…2588 at0014 = ╱22╱"╱ // 0x2584 @0x14
0x2570…2588 at0015 = ╱20╱…╱ // 0x2585 @0x15
0x2570…2588 at0016 = ╱22╱"╱ // 0x2586 @0x16
0x2570…2588 at0017 = EOL // 0x2587 @0x17
0x2570…2588 }
0x2588…25d2 b329 3590 PRINT TAB(10);CHR(14);"Årsafslutningsjournal";CHR(15);TAB(40);
0x2588…25d2 LineComalBin {
0x2588…25d2 ptr = 0xb329 // 0x2588 @0x0
0x2588…25d2 lno = 0x0e06 // 0x258a @0x2
0x2588…25d2 at0004 = ╱92╱ PRINT ╱ // 0x258c @0x4
0x2588…25d2 at0005 = ╱d2╱TAB╱ // 0x258d @0x5
0x2588…25d2 at0006 = ╱ed╱(╱ // 0x258e @0x6
0x2588…25d2 at0007 = ╱31╱1╱ // 0x258f @0x7
0x2588…25d2 at0008 = ╱30╱0╱ // 0x2590 @0x8
0x2588…25d2 at0009 = ╱fe0000a004╱ // 0x2591 @0x9
0x2588…25d2 at000e = ╱ee╱)╱ // 0x2596 @0xe
0x2588…25d2 at000f = ╱eb╱;╱ // 0x2597 @0xf
0x2588…25d2 at0010 = ╱cf╱CHR╱ // 0x2598 @0x10
0x2588…25d2 at0011 = ╱ed╱(╱ // 0x2599 @0x11
0x2588…25d2 at0012 = ╱31╱1╱ // 0x259a @0x12
0x2588…25d2 at0013 = ╱34╱4╱ // 0x259b @0x13
0x2588…25d2 at0014 = ╱fe0000e004╱ // 0x259c @0x14
0x2588…25d2 at0019 = ╱ee╱)╱ // 0x25a1 @0x19
0x2588…25d2 at001a = ╱eb╱;╱ // 0x25a2 @0x1a
0x2588…25d2 at001b = ╱22╱"╱ // 0x25a3 @0x1b
0x2588…25d2 at001c = ╱5d╱Å╱ // 0x25a4 @0x1c
0x2588…25d2 at001d = ╱72╱r╱ // 0x25a5 @0x1d
0x2588…25d2 at001e = ╱73╱s╱ // 0x25a6 @0x1e
0x2588…25d2 at001f = ╱61╱a╱ // 0x25a7 @0x1f
0x2588…25d2 at0020 = ╱66╱f╱ // 0x25a8 @0x20
0x2588…25d2 at0021 = ╱73╱s╱ // 0x25a9 @0x21
0x2588…25d2 at0022 = ╱6c╱l╱ // 0x25aa @0x22
0x2588…25d2 at0023 = ╱75╱u╱ // 0x25ab @0x23
0x2588…25d2 at0024 = ╱74╱t╱ // 0x25ac @0x24
0x2588…25d2 at0025 = ╱6e╱n╱ // 0x25ad @0x25
0x2588…25d2 at0026 = ╱69╱i╱ // 0x25ae @0x26
0x2588…25d2 at0027 = ╱6e╱n╱ // 0x25af @0x27
0x2588…25d2 at0028 = ╱67╱g╱ // 0x25b0 @0x28
0x2588…25d2 at0029 = ╱73╱s╱ // 0x25b1 @0x29
0x2588…25d2 at002a = ╱6a╱j╱ // 0x25b2 @0x2a
0x2588…25d2 at002b = ╱6f╱o╱ // 0x25b3 @0x2b
0x2588…25d2 at002c = ╱75╱u╱ // 0x25b4 @0x2c
0x2588…25d2 at002d = ╱72╱r╱ // 0x25b5 @0x2d
0x2588…25d2 at002e = ╱6e╱n╱ // 0x25b6 @0x2e
0x2588…25d2 at002f = ╱61╱a╱ // 0x25b7 @0x2f
0x2588…25d2 at0030 = ╱6c╱l╱ // 0x25b8 @0x30
0x2588…25d2 at0031 = ╱22╱"╱ // 0x25b9 @0x31
0x2588…25d2 at0032 = ╱eb╱;╱ // 0x25ba @0x32
0x2588…25d2 at0033 = ╱cf╱CHR╱ // 0x25bb @0x33
0x2588…25d2 at0034 = ╱ed╱(╱ // 0x25bc @0x34
0x2588…25d2 at0035 = ╱31╱1╱ // 0x25bd @0x35
0x2588…25d2 at0036 = ╱35╱5╱ // 0x25be @0x36
0x2588…25d2 at0037 = ╱fe0000f004╱ // 0x25bf @0x37
0x2588…25d2 at003c = ╱ee╱)╱ // 0x25c4 @0x3c
0x2588…25d2 at003d = ╱eb╱;╱ // 0x25c5 @0x3d
0x2588…25d2 at003e = ╱d2╱TAB╱ // 0x25c6 @0x3e
0x2588…25d2 at003f = ╱ed╱(╱ // 0x25c7 @0x3f
0x2588…25d2 at0040 = ╱34╱4╱ // 0x25c8 @0x40
0x2588…25d2 at0041 = ╱30╱0╱ // 0x25c9 @0x41
0x2588…25d2 at0042 = ╱fe0000a006╱ // 0x25ca @0x42
0x2588…25d2 at0047 = ╱ee╱)╱ // 0x25cf @0x47
0x2588…25d2 at0048 = ╱eb╱;╱ // 0x25d0 @0x48
0x2588…25d2 at0049 = EOL // 0x25d1 @0x49
0x2588…25d2 }
0x25d2…25e5 b33c 3600 PRINT "DATO: ";DAT$
0x25d2…25e5 LineComalBin {
0x25d2…25e5 ptr = 0xb33c // 0x25d2 @0x0
0x25d2…25e5 lno = 0x0e10 // 0x25d4 @0x2
0x25d2…25e5 at0004 = ╱92╱ PRINT ╱ // 0x25d6 @0x4
0x25d2…25e5 at0005 = ╱22╱"╱ // 0x25d7 @0x5
0x25d2…25e5 at0006 = ╱44╱D╱ // 0x25d8 @0x6
0x25d2…25e5 at0007 = ╱41╱A╱ // 0x25d9 @0x7
0x25d2…25e5 at0008 = ╱54╱T╱ // 0x25da @0x8
0x25d2…25e5 at0009 = ╱4f╱O╱ // 0x25db @0x9
0x25d2…25e5 at000a = ╱3a╱:╱ // 0x25dc @0xa
0x25d2…25e5 at000b = ╱20╱…╱ // 0x25dd @0xb
0x25d2…25e5 at000c = ╱22╱"╱ // 0x25de @0xc
0x25d2…25e5 at000d = ╱eb╱;╱ // 0x25df @0xd
0x25d2…25e5 at000e = ╱44╱D╱ // 0x25e0 @0xe
0x25d2…25e5 at000f = ╱41╱A╱ // 0x25e1 @0xf
0x25d2…25e5 at0010 = ╱54╱T╱ // 0x25e2 @0x10
0x25d2…25e5 at0011 = ╱ef╱$╱ // 0x25e3 @0x11
0x25d2…25e5 at0012 = EOL // 0x25e4 @0x12
0x25d2…25e5 }
0x25e5…25f5 b34c 3610 PRINT CHR(10)
0x25e5…25f5 LineComalBin {
0x25e5…25f5 ptr = 0xb34c // 0x25e5 @0x0
0x25e5…25f5 lno = 0x0e1a // 0x25e7 @0x2
0x25e5…25f5 at0004 = ╱92╱ PRINT ╱ // 0x25e9 @0x4
0x25e5…25f5 at0005 = ╱cf╱CHR╱ // 0x25ea @0x5
0x25e5…25f5 at0006 = ╱ed╱(╱ // 0x25eb @0x6
0x25e5…25f5 at0007 = ╱31╱1╱ // 0x25ec @0x7
0x25e5…25f5 at0008 = ╱30╱0╱ // 0x25ed @0x8
0x25e5…25f5 at0009 = ╱fe0000a004╱ // 0x25ee @0x9
0x25e5…25f5 at000e = ╱ee╱)╱ // 0x25f3 @0xe
0x25e5…25f5 at000f = EOL // 0x25f4 @0xf
0x25e5…25f5 }
0x25f5…263d b394 3620 PRINT TAB(5);"Gr. Totaler Deb. ";TAB(37);"Gr.Total Deb.";
0x25f5…263d LineComalBin {
0x25f5…263d ptr = 0xb394 // 0x25f5 @0x0
0x25f5…263d lno = 0x0e24 // 0x25f7 @0x2
0x25f5…263d at0004 = ╱92╱ PRINT ╱ // 0x25f9 @0x4
0x25f5…263d at0005 = ╱d2╱TAB╱ // 0x25fa @0x5
0x25f5…263d at0006 = ╱ed╱(╱ // 0x25fb @0x6
0x25f5…263d at0007 = ╱35╱5╱ // 0x25fc @0x7
0x25f5…263d at0008 = ╱fe0000a003╱ // 0x25fd @0x8
0x25f5…263d at000d = ╱ee╱)╱ // 0x2602 @0xd
0x25f5…263d at000e = ╱eb╱;╱ // 0x2603 @0xe
0x25f5…263d at000f = ╱22╱"╱ // 0x2604 @0xf
0x25f5…263d at0010 = ╱47╱G╱ // 0x2605 @0x10
0x25f5…263d at0011 = ╱72╱r╱ // 0x2606 @0x11
0x25f5…263d at0012 = ╱2e╱.╱ // 0x2607 @0x12
0x25f5…263d at0013 = ╱20╱…╱ // 0x2608 @0x13
0x25f5…263d at0014 = ╱20╱…╱ // 0x2609 @0x14
0x25f5…263d at0015 = ╱20╱…╱ // 0x260a @0x15
0x25f5…263d at0016 = ╱20╱…╱ // 0x260b @0x16
0x25f5…263d at0017 = ╱54╱T╱ // 0x260c @0x17
0x25f5…263d at0018 = ╱6f╱o╱ // 0x260d @0x18
0x25f5…263d at0019 = ╱74╱t╱ // 0x260e @0x19
0x25f5…263d at001a = ╱61╱a╱ // 0x260f @0x1a
0x25f5…263d at001b = ╱6c╱l╱ // 0x2610 @0x1b
0x25f5…263d at001c = ╱65╱e╱ // 0x2611 @0x1c
0x25f5…263d at001d = ╱72╱r╱ // 0x2612 @0x1d
0x25f5…263d at001e = ╱20╱…╱ // 0x2613 @0x1e
0x25f5…263d at001f = ╱44╱D╱ // 0x2614 @0x1f
0x25f5…263d at0020 = ╱65╱e╱ // 0x2615 @0x20
0x25f5…263d at0021 = ╱62╱b╱ // 0x2616 @0x21
0x25f5…263d at0022 = ╱2e╱.╱ // 0x2617 @0x22
0x25f5…263d at0023 = ╱20╱…╱ // 0x2618 @0x23
0x25f5…263d at0024 = ╱20╱…╱ // 0x2619 @0x24
0x25f5…263d at0025 = ╱20╱…╱ // 0x261a @0x25
0x25f5…263d at0026 = ╱20╱…╱ // 0x261b @0x26
0x25f5…263d at0027 = ╱20╱…╱ // 0x261c @0x27
0x25f5…263d at0028 = ╱20╱…╱ // 0x261d @0x28
0x25f5…263d at0029 = ╱20╱…╱ // 0x261e @0x29
0x25f5…263d at002a = ╱22╱"╱ // 0x261f @0x2a
0x25f5…263d at002b = ╱eb╱;╱ // 0x2620 @0x2b
0x25f5…263d at002c = ╱d2╱TAB╱ // 0x2621 @0x2c
0x25f5…263d at002d = ╱ed╱(╱ // 0x2622 @0x2d
0x25f5…263d at002e = ╱33╱3╱ // 0x2623 @0x2e
0x25f5…263d at002f = ╱37╱7╱ // 0x2624 @0x2f
0x25f5…263d at0030 = ╱fe00009406╱ // 0x2625 @0x30
0x25f5…263d at0035 = ╱ee╱)╱ // 0x262a @0x35
0x25f5…263d at0036 = ╱eb╱;╱ // 0x262b @0x36
0x25f5…263d at0037 = ╱22╱"╱ // 0x262c @0x37
0x25f5…263d at0038 = ╱47╱G╱ // 0x262d @0x38
0x25f5…263d at0039 = ╱72╱r╱ // 0x262e @0x39
0x25f5…263d at003a = ╱2e╱.╱ // 0x262f @0x3a
0x25f5…263d at003b = ╱54╱T╱ // 0x2630 @0x3b
0x25f5…263d at003c = ╱6f╱o╱ // 0x2631 @0x3c
0x25f5…263d at003d = ╱74╱t╱ // 0x2632 @0x3d
0x25f5…263d at003e = ╱61╱a╱ // 0x2633 @0x3e
0x25f5…263d at003f = ╱6c╱l╱ // 0x2634 @0x3f
0x25f5…263d at0040 = ╱20╱…╱ // 0x2635 @0x40
0x25f5…263d at0041 = ╱44╱D╱ // 0x2636 @0x41
0x25f5…263d at0042 = ╱65╱e╱ // 0x2637 @0x42
0x25f5…263d at0043 = ╱62╱b╱ // 0x2638 @0x43
0x25f5…263d at0044 = ╱2e╱.╱ // 0x2639 @0x44
0x25f5…263d at0045 = ╱22╱"╱ // 0x263a @0x45
0x25f5…263d at0046 = ╱eb╱;╱ // 0x263b @0x46
0x25f5…263d at0047 = EOL // 0x263c @0x47
0x25f5…263d }
0x263d…265a b3b1 3630 PRINT TAB(60);"Difference"
0x263d…265a LineComalBin {
0x263d…265a ptr = 0xb3b1 // 0x263d @0x0
0x263d…265a lno = 0x0e2e // 0x263f @0x2
0x263d…265a at0004 = ╱92╱ PRINT ╱ // 0x2641 @0x4
0x263d…265a at0005 = ╱d2╱TAB╱ // 0x2642 @0x5
0x263d…265a at0006 = ╱ed╱(╱ // 0x2643 @0x6
0x263d…265a at0007 = ╱36╱6╱ // 0x2644 @0x7
0x263d…265a at0008 = ╱30╱0╱ // 0x2645 @0x8
0x263d…265a at0009 = ╱fe0000f006╱ // 0x2646 @0x9
0x263d…265a at000e = ╱ee╱)╱ // 0x264b @0xe
0x263d…265a at000f = ╱eb╱;╱ // 0x264c @0xf
0x263d…265a at0010 = ╱22╱"╱ // 0x264d @0x10
0x263d…265a at0011 = ╱44╱D╱ // 0x264e @0x11
0x263d…265a at0012 = ╱69╱i╱ // 0x264f @0x12
0x263d…265a at0013 = ╱66╱f╱ // 0x2650 @0x13
0x263d…265a at0014 = ╱66╱f╱ // 0x2651 @0x14
0x263d…265a at0015 = ╱65╱e╱ // 0x2652 @0x15
0x263d…265a at0016 = ╱72╱r╱ // 0x2653 @0x16
0x263d…265a at0017 = ╱65╱e╱ // 0x2654 @0x17
0x263d…265a at0018 = ╱6e╱n╱ // 0x2655 @0x18
0x263d…265a at0019 = ╱63╱c╱ // 0x2656 @0x19
0x263d…265a at001a = ╱65╱e╱ // 0x2657 @0x1a
0x263d…265a at001b = ╱22╱"╱ // 0x2658 @0x1b
0x263d…265a at001c = EOL // 0x2659 @0x1c
0x263d…265a }
0x265a…2663 b3ba 3640 PRINT " "
0x265a…2663 LineComalBin {
0x265a…2663 ptr = 0xb3ba // 0x265a @0x0
0x265a…2663 lno = 0x0e38 // 0x265c @0x2
0x265a…2663 at0004 = ╱92╱ PRINT ╱ // 0x265e @0x4
0x265a…2663 at0005 = ╱22╱"╱ // 0x265f @0x5
0x265a…2663 at0006 = ╱20╱…╱ // 0x2660 @0x6
0x265a…2663 at0007 = ╱22╱"╱ // 0x2661 @0x7
0x265a…2663 at0008 = EOL // 0x2662 @0x8
0x265a…2663 }
0x2663…2672 b3c9 3650 FOR GR=E TO MKGR
0x2663…2672 LineComalBin {
0x2663…2672 ptr = 0xb3c9 // 0x2663 @0x0
0x2663…2672 lno = 0x0e42 // 0x2665 @0x2
0x2663…2672 at0004 = ╱83╱ FOR ╱ // 0x2667 @0x4
0x2663…2672 at0005 = ╱47╱G╱ // 0x2668 @0x5
0x2663…2672 at0006 = ╱52╱R╱ // 0x2669 @0x6
0x2663…2672 at0007 = ╱dc╱=╱ // 0x266a @0x7
0x2663…2672 at0008 = ╱45╱E╱ // 0x266b @0x8
0x2663…2672 at0009 = ╱b7╱ TO ╱ // 0x266c @0x9
0x2663…2672 at000a = ╱4d╱M╱ // 0x266d @0xa
0x2663…2672 at000b = ╱4b╱K╱ // 0x266e @0xb
0x2663…2672 at000c = ╱47╱G╱ // 0x266f @0xc
0x2663…2672 at000d = ╱52╱R╱ // 0x2670 @0xd
0x2663…2672 at000e = EOL // 0x2671 @0xe
0x2663…2672 }
0x2672…269d b3f4 3660 EXEC CALC(E,DSALDI$(GR),DSALDI1$(GR),SUM$)
0x2672…269d LineComalBin {
0x2672…269d ptr = 0xb3f4 // 0x2672 @0x0
0x2672…269d lno = 0x0e4c // 0x2674 @0x2
0x2672…269d at0004 = ╱9d╱ EXEC ╱ // 0x2676 @0x4
0x2672…269d at0005 = ╱43╱C╱ // 0x2677 @0x5
0x2672…269d at0006 = ╱41╱A╱ // 0x2678 @0x6
0x2672…269d at0007 = ╱4c╱L╱ // 0x2679 @0x7
0x2672…269d at0008 = ╱43╱C╱ // 0x267a @0x8
0x2672…269d at0009 = ╱ed╱(╱ // 0x267b @0x9
0x2672…269d at000a = ╱45╱E╱ // 0x267c @0xa
0x2672…269d at000b = ╱ec╱,╱ // 0x267d @0xb
0x2672…269d at000c = ╱44╱D╱ // 0x267e @0xc
0x2672…269d at000d = ╱53╱S╱ // 0x267f @0xd
0x2672…269d at000e = ╱41╱A╱ // 0x2680 @0xe
0x2672…269d at000f = ╱4c╱L╱ // 0x2681 @0xf
0x2672…269d at0010 = ╱44╱D╱ // 0x2682 @0x10
0x2672…269d at0011 = ╱49╱I╱ // 0x2683 @0x11
0x2672…269d at0012 = ╱ef╱$╱ // 0x2684 @0x12
0x2672…269d at0013 = ╱ed╱(╱ // 0x2685 @0x13
0x2672…269d at0014 = ╱47╱G╱ // 0x2686 @0x14
0x2672…269d at0015 = ╱52╱R╱ // 0x2687 @0x15
0x2672…269d at0016 = ╱ee╱)╱ // 0x2688 @0x16
0x2672…269d at0017 = ╱ec╱,╱ // 0x2689 @0x17
0x2672…269d at0018 = ╱44╱D╱ // 0x268a @0x18
0x2672…269d at0019 = ╱53╱S╱ // 0x268b @0x19
0x2672…269d at001a = ╱41╱A╱ // 0x268c @0x1a
0x2672…269d at001b = ╱4c╱L╱ // 0x268d @0x1b
0x2672…269d at001c = ╱44╱D╱ // 0x268e @0x1c
0x2672…269d at001d = ╱49╱I╱ // 0x268f @0x1d
0x2672…269d at001e = ╱31╱1╱ // 0x2690 @0x1e
0x2672…269d at001f = ╱ef╱$╱ // 0x2691 @0x1f
0x2672…269d at0020 = ╱ed╱(╱ // 0x2692 @0x20
0x2672…269d at0021 = ╱47╱G╱ // 0x2693 @0x21
0x2672…269d at0022 = ╱52╱R╱ // 0x2694 @0x22
0x2672…269d at0023 = ╱ee╱)╱ // 0x2695 @0x23
0x2672…269d at0024 = ╱ec╱,╱ // 0x2696 @0x24
0x2672…269d at0025 = ╱53╱S╱ // 0x2697 @0x25
0x2672…269d at0026 = ╱55╱U╱ // 0x2698 @0x26
0x2672…269d at0027 = ╱4d╱M╱ // 0x2699 @0x27
0x2672…269d at0028 = ╱ef╱$╱ // 0x269a @0x28
0x2672…269d at0029 = ╱ee╱)╱ // 0x269b @0x29
0x2672…269d at002a = EOL // 0x269c @0x2a
0x2672…269d }
0x269d…26c0 b417 3670 EXEC TUD(DSALDI$(GR),UBELØB1$,E,B)
0x269d…26c0 LineComalBin {
0x269d…26c0 ptr = 0xb417 // 0x269d @0x0
0x269d…26c0 lno = 0x0e56 // 0x269f @0x2
0x269d…26c0 at0004 = ╱9d╱ EXEC ╱ // 0x26a1 @0x4
0x269d…26c0 at0005 = ╱54╱T╱ // 0x26a2 @0x5
0x269d…26c0 at0006 = ╱55╱U╱ // 0x26a3 @0x6
0x269d…26c0 at0007 = ╱44╱D╱ // 0x26a4 @0x7
0x269d…26c0 at0008 = ╱ed╱(╱ // 0x26a5 @0x8
0x269d…26c0 at0009 = ╱44╱D╱ // 0x26a6 @0x9
0x269d…26c0 at000a = ╱53╱S╱ // 0x26a7 @0xa
0x269d…26c0 at000b = ╱41╱A╱ // 0x26a8 @0xb
0x269d…26c0 at000c = ╱4c╱L╱ // 0x26a9 @0xc
0x269d…26c0 at000d = ╱44╱D╱ // 0x26aa @0xd
0x269d…26c0 at000e = ╱49╱I╱ // 0x26ab @0xe
0x269d…26c0 at000f = ╱ef╱$╱ // 0x26ac @0xf
0x269d…26c0 at0010 = ╱ed╱(╱ // 0x26ad @0x10
0x269d…26c0 at0011 = ╱47╱G╱ // 0x26ae @0x11
0x269d…26c0 at0012 = ╱52╱R╱ // 0x26af @0x12
0x269d…26c0 at0013 = ╱ee╱)╱ // 0x26b0 @0x13
0x269d…26c0 at0014 = ╱ec╱,╱ // 0x26b1 @0x14
0x269d…26c0 at0015 = ╱55╱U╱ // 0x26b2 @0x15
0x269d…26c0 at0016 = ╱42╱B╱ // 0x26b3 @0x16
0x269d…26c0 at0017 = ╱45╱E╱ // 0x26b4 @0x17
0x269d…26c0 at0018 = ╱4c╱L╱ // 0x26b5 @0x18
0x269d…26c0 at0019 = ╱5c╱Ø╱ // 0x26b6 @0x19
0x269d…26c0 at001a = ╱42╱B╱ // 0x26b7 @0x1a
0x269d…26c0 at001b = ╱31╱1╱ // 0x26b8 @0x1b
0x269d…26c0 at001c = ╱ef╱$╱ // 0x26b9 @0x1c
0x269d…26c0 at001d = ╱ec╱,╱ // 0x26ba @0x1d
0x269d…26c0 at001e = ╱45╱E╱ // 0x26bb @0x1e
0x269d…26c0 at001f = ╱ec╱,╱ // 0x26bc @0x1f
0x269d…26c0 at0020 = ╱42╱B╱ // 0x26bd @0x20
0x269d…26c0 at0021 = ╱ee╱)╱ // 0x26be @0x21
0x269d…26c0 at0022 = EOL // 0x26bf @0x22
0x269d…26c0 }
0x26c0…26e4 b43b 3680 EXEC TUD(DSALDI1$(GR),UBELØB2$,E,B)
0x26c0…26e4 LineComalBin {
0x26c0…26e4 ptr = 0xb43b // 0x26c0 @0x0
0x26c0…26e4 lno = 0x0e60 // 0x26c2 @0x2
0x26c0…26e4 at0004 = ╱9d╱ EXEC ╱ // 0x26c4 @0x4
0x26c0…26e4 at0005 = ╱54╱T╱ // 0x26c5 @0x5
0x26c0…26e4 at0006 = ╱55╱U╱ // 0x26c6 @0x6
0x26c0…26e4 at0007 = ╱44╱D╱ // 0x26c7 @0x7
0x26c0…26e4 at0008 = ╱ed╱(╱ // 0x26c8 @0x8
0x26c0…26e4 at0009 = ╱44╱D╱ // 0x26c9 @0x9
0x26c0…26e4 at000a = ╱53╱S╱ // 0x26ca @0xa
0x26c0…26e4 at000b = ╱41╱A╱ // 0x26cb @0xb
0x26c0…26e4 at000c = ╱4c╱L╱ // 0x26cc @0xc
0x26c0…26e4 at000d = ╱44╱D╱ // 0x26cd @0xd
0x26c0…26e4 at000e = ╱49╱I╱ // 0x26ce @0xe
0x26c0…26e4 at000f = ╱31╱1╱ // 0x26cf @0xf
0x26c0…26e4 at0010 = ╱ef╱$╱ // 0x26d0 @0x10
0x26c0…26e4 at0011 = ╱ed╱(╱ // 0x26d1 @0x11
0x26c0…26e4 at0012 = ╱47╱G╱ // 0x26d2 @0x12
0x26c0…26e4 at0013 = ╱52╱R╱ // 0x26d3 @0x13
0x26c0…26e4 at0014 = ╱ee╱)╱ // 0x26d4 @0x14
0x26c0…26e4 at0015 = ╱ec╱,╱ // 0x26d5 @0x15
0x26c0…26e4 at0016 = ╱55╱U╱ // 0x26d6 @0x16
0x26c0…26e4 at0017 = ╱42╱B╱ // 0x26d7 @0x17
0x26c0…26e4 at0018 = ╱45╱E╱ // 0x26d8 @0x18
0x26c0…26e4 at0019 = ╱4c╱L╱ // 0x26d9 @0x19
0x26c0…26e4 at001a = ╱5c╱Ø╱ // 0x26da @0x1a
0x26c0…26e4 at001b = ╱42╱B╱ // 0x26db @0x1b
0x26c0…26e4 at001c = ╱32╱2╱ // 0x26dc @0x1c
0x26c0…26e4 at001d = ╱ef╱$╱ // 0x26dd @0x1d
0x26c0…26e4 at001e = ╱ec╱,╱ // 0x26de @0x1e
0x26c0…26e4 at001f = ╱45╱E╱ // 0x26df @0x1f
0x26c0…26e4 at0020 = ╱ec╱,╱ // 0x26e0 @0x20
0x26c0…26e4 at0021 = ╱42╱B╱ // 0x26e1 @0x21
0x26c0…26e4 at0022 = ╱ee╱)╱ // 0x26e2 @0x22
0x26c0…26e4 at0023 = EOL // 0x26e3 @0x23
0x26c0…26e4 }
0x26e4…26ef b446 3690 EXEC UDLIN
0x26e4…26ef LineComalBin {
0x26e4…26ef ptr = 0xb446 // 0x26e4 @0x0
0x26e4…26ef lno = 0x0e6a // 0x26e6 @0x2
0x26e4…26ef at0004 = ╱9d╱ EXEC ╱ // 0x26e8 @0x4
0x26e4…26ef at0005 = ╱55╱U╱ // 0x26e9 @0x5
0x26e4…26ef at0006 = ╱44╱D╱ // 0x26ea @0x6
0x26e4…26ef at0007 = ╱4c╱L╱ // 0x26eb @0x7
0x26e4…26ef at0008 = ╱49╱I╱ // 0x26ec @0x8
0x26e4…26ef at0009 = ╱4e╱N╱ // 0x26ed @0x9
0x26e4…26ef at000a = EOL // 0x26ee @0xa
0x26e4…26ef }
0x26ef…26f7 b44e 3700 NEXT GR
0x26ef…26f7 LineComalBin {
0x26ef…26f7 ptr = 0xb44e // 0x26ef @0x0
0x26ef…26f7 lno = 0x0e74 // 0x26f1 @0x2
0x26ef…26f7 at0004 = ╱84╱ NEXT ╱ // 0x26f3 @0x4
0x26ef…26f7 at0005 = ╱47╱G╱ // 0x26f4 @0x5
0x26ef…26f7 at0006 = ╱52╱R╱ // 0x26f5 @0x6
0x26ef…26f7 at0007 = EOL // 0x26f6 @0x7
0x26ef…26f7 }
0x26f7…2707 b45e 3710 PRINT CHR(10)
0x26f7…2707 LineComalBin {
0x26f7…2707 ptr = 0xb45e // 0x26f7 @0x0
0x26f7…2707 lno = 0x0e7e // 0x26f9 @0x2
0x26f7…2707 at0004 = ╱92╱ PRINT ╱ // 0x26fb @0x4
0x26f7…2707 at0005 = ╱cf╱CHR╱ // 0x26fc @0x5
0x26f7…2707 at0006 = ╱ed╱(╱ // 0x26fd @0x6
0x26f7…2707 at0007 = ╱31╱1╱ // 0x26fe @0x7
0x26f7…2707 at0008 = ╱30╱0╱ // 0x26ff @0x8
0x26f7…2707 at0009 = ╱fe0000a004╱ // 0x2700 @0x9
0x26f7…2707 at000e = ╱ee╱)╱ // 0x2705 @0xe
0x26f7…2707 at000f = EOL // 0x2706 @0xf
0x26f7…2707 }
0x2707…274f b4a6 3720 PRINT TAB(5);"Gr. Totaler Kre. ";TAB(37);"Gr.Total Kre.";
0x2707…274f LineComalBin {
0x2707…274f ptr = 0xb4a6 // 0x2707 @0x0
0x2707…274f lno = 0x0e88 // 0x2709 @0x2
0x2707…274f at0004 = ╱92╱ PRINT ╱ // 0x270b @0x4
0x2707…274f at0005 = ╱d2╱TAB╱ // 0x270c @0x5
0x2707…274f at0006 = ╱ed╱(╱ // 0x270d @0x6
0x2707…274f at0007 = ╱35╱5╱ // 0x270e @0x7
0x2707…274f at0008 = ╱fe0000a003╱ // 0x270f @0x8
0x2707…274f at000d = ╱ee╱)╱ // 0x2714 @0xd
0x2707…274f at000e = ╱eb╱;╱ // 0x2715 @0xe
0x2707…274f at000f = ╱22╱"╱ // 0x2716 @0xf
0x2707…274f at0010 = ╱47╱G╱ // 0x2717 @0x10
0x2707…274f at0011 = ╱72╱r╱ // 0x2718 @0x11
0x2707…274f at0012 = ╱2e╱.╱ // 0x2719 @0x12
0x2707…274f at0013 = ╱20╱…╱ // 0x271a @0x13
0x2707…274f at0014 = ╱20╱…╱ // 0x271b @0x14
0x2707…274f at0015 = ╱20╱…╱ // 0x271c @0x15
0x2707…274f at0016 = ╱20╱…╱ // 0x271d @0x16
0x2707…274f at0017 = ╱54╱T╱ // 0x271e @0x17
0x2707…274f at0018 = ╱6f╱o╱ // 0x271f @0x18
0x2707…274f at0019 = ╱74╱t╱ // 0x2720 @0x19
0x2707…274f at001a = ╱61╱a╱ // 0x2721 @0x1a
0x2707…274f at001b = ╱6c╱l╱ // 0x2722 @0x1b
0x2707…274f at001c = ╱65╱e╱ // 0x2723 @0x1c
0x2707…274f at001d = ╱72╱r╱ // 0x2724 @0x1d
0x2707…274f at001e = ╱20╱…╱ // 0x2725 @0x1e
0x2707…274f at001f = ╱4b╱K╱ // 0x2726 @0x1f
0x2707…274f at0020 = ╱72╱r╱ // 0x2727 @0x20
0x2707…274f at0021 = ╱65╱e╱ // 0x2728 @0x21
0x2707…274f at0022 = ╱2e╱.╱ // 0x2729 @0x22
0x2707…274f at0023 = ╱20╱…╱ // 0x272a @0x23
0x2707…274f at0024 = ╱20╱…╱ // 0x272b @0x24
0x2707…274f at0025 = ╱20╱…╱ // 0x272c @0x25
0x2707…274f at0026 = ╱20╱…╱ // 0x272d @0x26
0x2707…274f at0027 = ╱20╱…╱ // 0x272e @0x27
0x2707…274f at0028 = ╱20╱…╱ // 0x272f @0x28
0x2707…274f at0029 = ╱20╱…╱ // 0x2730 @0x29
0x2707…274f at002a = ╱22╱"╱ // 0x2731 @0x2a
0x2707…274f at002b = ╱eb╱;╱ // 0x2732 @0x2b
0x2707…274f at002c = ╱d2╱TAB╱ // 0x2733 @0x2c
0x2707…274f at002d = ╱ed╱(╱ // 0x2734 @0x2d
0x2707…274f at002e = ╱33╱3╱ // 0x2735 @0x2e
0x2707…274f at002f = ╱37╱7╱ // 0x2736 @0x2f
0x2707…274f at0030 = ╱fe00009406╱ // 0x2737 @0x30
0x2707…274f at0035 = ╱ee╱)╱ // 0x273c @0x35
0x2707…274f at0036 = ╱eb╱;╱ // 0x273d @0x36
0x2707…274f at0037 = ╱22╱"╱ // 0x273e @0x37
0x2707…274f at0038 = ╱47╱G╱ // 0x273f @0x38
0x2707…274f at0039 = ╱72╱r╱ // 0x2740 @0x39
0x2707…274f at003a = ╱2e╱.╱ // 0x2741 @0x3a
0x2707…274f at003b = ╱54╱T╱ // 0x2742 @0x3b
0x2707…274f at003c = ╱6f╱o╱ // 0x2743 @0x3c
0x2707…274f at003d = ╱74╱t╱ // 0x2744 @0x3d
0x2707…274f at003e = ╱61╱a╱ // 0x2745 @0x3e
0x2707…274f at003f = ╱6c╱l╱ // 0x2746 @0x3f
0x2707…274f at0040 = ╱20╱…╱ // 0x2747 @0x40
0x2707…274f at0041 = ╱4b╱K╱ // 0x2748 @0x41
0x2707…274f at0042 = ╱72╱r╱ // 0x2749 @0x42
0x2707…274f at0043 = ╱65╱e╱ // 0x274a @0x43
0x2707…274f at0044 = ╱2e╱.╱ // 0x274b @0x44
0x2707…274f at0045 = ╱22╱"╱ // 0x274c @0x45
0x2707…274f at0046 = ╱eb╱;╱ // 0x274d @0x46
0x2707…274f at0047 = EOL // 0x274e @0x47
0x2707…274f }
0x274f…276c b4c3 3730 PRINT TAB(60);"Difference"
0x274f…276c LineComalBin {
0x274f…276c ptr = 0xb4c3 // 0x274f @0x0
0x274f…276c lno = 0x0e92 // 0x2751 @0x2
0x274f…276c at0004 = ╱92╱ PRINT ╱ // 0x2753 @0x4
0x274f…276c at0005 = ╱d2╱TAB╱ // 0x2754 @0x5
0x274f…276c at0006 = ╱ed╱(╱ // 0x2755 @0x6
0x274f…276c at0007 = ╱36╱6╱ // 0x2756 @0x7
0x274f…276c at0008 = ╱30╱0╱ // 0x2757 @0x8
0x274f…276c at0009 = ╱fe0000f006╱ // 0x2758 @0x9
0x274f…276c at000e = ╱ee╱)╱ // 0x275d @0xe
0x274f…276c at000f = ╱eb╱;╱ // 0x275e @0xf
0x274f…276c at0010 = ╱22╱"╱ // 0x275f @0x10
0x274f…276c at0011 = ╱44╱D╱ // 0x2760 @0x11
0x274f…276c at0012 = ╱69╱i╱ // 0x2761 @0x12
0x274f…276c at0013 = ╱66╱f╱ // 0x2762 @0x13
0x274f…276c at0014 = ╱66╱f╱ // 0x2763 @0x14
0x274f…276c at0015 = ╱65╱e╱ // 0x2764 @0x15
0x274f…276c at0016 = ╱72╱r╱ // 0x2765 @0x16
0x274f…276c at0017 = ╱65╱e╱ // 0x2766 @0x17
0x274f…276c at0018 = ╱6e╱n╱ // 0x2767 @0x18
0x274f…276c at0019 = ╱63╱c╱ // 0x2768 @0x19
0x274f…276c at001a = ╱65╱e╱ // 0x2769 @0x1a
0x274f…276c at001b = ╱22╱"╱ // 0x276a @0x1b
0x274f…276c at001c = EOL // 0x276b @0x1c
0x274f…276c }
0x276c…2775 b4cc 3740 PRINT " "
0x276c…2775 LineComalBin {
0x276c…2775 ptr = 0xb4cc // 0x276c @0x0
0x276c…2775 lno = 0x0e9c // 0x276e @0x2
0x276c…2775 at0004 = ╱92╱ PRINT ╱ // 0x2770 @0x4
0x276c…2775 at0005 = ╱22╱"╱ // 0x2771 @0x5
0x276c…2775 at0006 = ╱20╱…╱ // 0x2772 @0x6
0x276c…2775 at0007 = ╱22╱"╱ // 0x2773 @0x7
0x276c…2775 at0008 = EOL // 0x2774 @0x8
0x276c…2775 }
0x2775…2785 b4dc 3750 FOR GR=E TO MKRGR
0x2775…2785 LineComalBin {
0x2775…2785 ptr = 0xb4dc // 0x2775 @0x0
0x2775…2785 lno = 0x0ea6 // 0x2777 @0x2
0x2775…2785 at0004 = ╱83╱ FOR ╱ // 0x2779 @0x4
0x2775…2785 at0005 = ╱47╱G╱ // 0x277a @0x5
0x2775…2785 at0006 = ╱52╱R╱ // 0x277b @0x6
0x2775…2785 at0007 = ╱dc╱=╱ // 0x277c @0x7
0x2775…2785 at0008 = ╱45╱E╱ // 0x277d @0x8
0x2775…2785 at0009 = ╱b7╱ TO ╱ // 0x277e @0x9
0x2775…2785 at000a = ╱4d╱M╱ // 0x277f @0xa
0x2775…2785 at000b = ╱4b╱K╱ // 0x2780 @0xb
0x2775…2785 at000c = ╱52╱R╱ // 0x2781 @0xc
0x2775…2785 at000d = ╱47╱G╱ // 0x2782 @0xd
0x2775…2785 at000e = ╱52╱R╱ // 0x2783 @0xe
0x2775…2785 at000f = EOL // 0x2784 @0xf
0x2775…2785 }
0x2785…27b0 b507 3760 EXEC CALC(E,KSALDI$(GR),KSALDI1$(GR),SUM$)
0x2785…27b0 LineComalBin {
0x2785…27b0 ptr = 0xb507 // 0x2785 @0x0
0x2785…27b0 lno = 0x0eb0 // 0x2787 @0x2
0x2785…27b0 at0004 = ╱9d╱ EXEC ╱ // 0x2789 @0x4
0x2785…27b0 at0005 = ╱43╱C╱ // 0x278a @0x5
0x2785…27b0 at0006 = ╱41╱A╱ // 0x278b @0x6
0x2785…27b0 at0007 = ╱4c╱L╱ // 0x278c @0x7
0x2785…27b0 at0008 = ╱43╱C╱ // 0x278d @0x8
0x2785…27b0 at0009 = ╱ed╱(╱ // 0x278e @0x9
0x2785…27b0 at000a = ╱45╱E╱ // 0x278f @0xa
0x2785…27b0 at000b = ╱ec╱,╱ // 0x2790 @0xb
0x2785…27b0 at000c = ╱4b╱K╱ // 0x2791 @0xc
0x2785…27b0 at000d = ╱53╱S╱ // 0x2792 @0xd
0x2785…27b0 at000e = ╱41╱A╱ // 0x2793 @0xe
0x2785…27b0 at000f = ╱4c╱L╱ // 0x2794 @0xf
0x2785…27b0 at0010 = ╱44╱D╱ // 0x2795 @0x10
0x2785…27b0 at0011 = ╱49╱I╱ // 0x2796 @0x11
0x2785…27b0 at0012 = ╱ef╱$╱ // 0x2797 @0x12
0x2785…27b0 at0013 = ╱ed╱(╱ // 0x2798 @0x13
0x2785…27b0 at0014 = ╱47╱G╱ // 0x2799 @0x14
0x2785…27b0 at0015 = ╱52╱R╱ // 0x279a @0x15
0x2785…27b0 at0016 = ╱ee╱)╱ // 0x279b @0x16
0x2785…27b0 at0017 = ╱ec╱,╱ // 0x279c @0x17
0x2785…27b0 at0018 = ╱4b╱K╱ // 0x279d @0x18
0x2785…27b0 at0019 = ╱53╱S╱ // 0x279e @0x19
0x2785…27b0 at001a = ╱41╱A╱ // 0x279f @0x1a
0x2785…27b0 at001b = ╱4c╱L╱ // 0x27a0 @0x1b
0x2785…27b0 at001c = ╱44╱D╱ // 0x27a1 @0x1c
0x2785…27b0 at001d = ╱49╱I╱ // 0x27a2 @0x1d
0x2785…27b0 at001e = ╱31╱1╱ // 0x27a3 @0x1e
0x2785…27b0 at001f = ╱ef╱$╱ // 0x27a4 @0x1f
0x2785…27b0 at0020 = ╱ed╱(╱ // 0x27a5 @0x20
0x2785…27b0 at0021 = ╱47╱G╱ // 0x27a6 @0x21
0x2785…27b0 at0022 = ╱52╱R╱ // 0x27a7 @0x22
0x2785…27b0 at0023 = ╱ee╱)╱ // 0x27a8 @0x23
0x2785…27b0 at0024 = ╱ec╱,╱ // 0x27a9 @0x24
0x2785…27b0 at0025 = ╱53╱S╱ // 0x27aa @0x25
0x2785…27b0 at0026 = ╱55╱U╱ // 0x27ab @0x26
0x2785…27b0 at0027 = ╱4d╱M╱ // 0x27ac @0x27
0x2785…27b0 at0028 = ╱ef╱$╱ // 0x27ad @0x28
0x2785…27b0 at0029 = ╱ee╱)╱ // 0x27ae @0x29
0x2785…27b0 at002a = EOL // 0x27af @0x2a
0x2785…27b0 }
0x27b0…27d3 b52a 3770 EXEC TUD(KSALDI$(GR),UBELØB1$,E,B)
0x27b0…27d3 LineComalBin {
0x27b0…27d3 ptr = 0xb52a // 0x27b0 @0x0
0x27b0…27d3 lno = 0x0eba // 0x27b2 @0x2
0x27b0…27d3 at0004 = ╱9d╱ EXEC ╱ // 0x27b4 @0x4
0x27b0…27d3 at0005 = ╱54╱T╱ // 0x27b5 @0x5
0x27b0…27d3 at0006 = ╱55╱U╱ // 0x27b6 @0x6
0x27b0…27d3 at0007 = ╱44╱D╱ // 0x27b7 @0x7
0x27b0…27d3 at0008 = ╱ed╱(╱ // 0x27b8 @0x8
0x27b0…27d3 at0009 = ╱4b╱K╱ // 0x27b9 @0x9
0x27b0…27d3 at000a = ╱53╱S╱ // 0x27ba @0xa
0x27b0…27d3 at000b = ╱41╱A╱ // 0x27bb @0xb
0x27b0…27d3 at000c = ╱4c╱L╱ // 0x27bc @0xc
0x27b0…27d3 at000d = ╱44╱D╱ // 0x27bd @0xd
0x27b0…27d3 at000e = ╱49╱I╱ // 0x27be @0xe
0x27b0…27d3 at000f = ╱ef╱$╱ // 0x27bf @0xf
0x27b0…27d3 at0010 = ╱ed╱(╱ // 0x27c0 @0x10
0x27b0…27d3 at0011 = ╱47╱G╱ // 0x27c1 @0x11
0x27b0…27d3 at0012 = ╱52╱R╱ // 0x27c2 @0x12
0x27b0…27d3 at0013 = ╱ee╱)╱ // 0x27c3 @0x13
0x27b0…27d3 at0014 = ╱ec╱,╱ // 0x27c4 @0x14
0x27b0…27d3 at0015 = ╱55╱U╱ // 0x27c5 @0x15
0x27b0…27d3 at0016 = ╱42╱B╱ // 0x27c6 @0x16
0x27b0…27d3 at0017 = ╱45╱E╱ // 0x27c7 @0x17
0x27b0…27d3 at0018 = ╱4c╱L╱ // 0x27c8 @0x18
0x27b0…27d3 at0019 = ╱5c╱Ø╱ // 0x27c9 @0x19
0x27b0…27d3 at001a = ╱42╱B╱ // 0x27ca @0x1a
0x27b0…27d3 at001b = ╱31╱1╱ // 0x27cb @0x1b
0x27b0…27d3 at001c = ╱ef╱$╱ // 0x27cc @0x1c
0x27b0…27d3 at001d = ╱ec╱,╱ // 0x27cd @0x1d
0x27b0…27d3 at001e = ╱45╱E╱ // 0x27ce @0x1e
0x27b0…27d3 at001f = ╱ec╱,╱ // 0x27cf @0x1f
0x27b0…27d3 at0020 = ╱42╱B╱ // 0x27d0 @0x20
0x27b0…27d3 at0021 = ╱ee╱)╱ // 0x27d1 @0x21
0x27b0…27d3 at0022 = EOL // 0x27d2 @0x22
0x27b0…27d3 }
0x27d3…27f7 b54e 3780 EXEC TUD(KSALDI1$(GR),UBELØB2$,E,B)
0x27d3…27f7 LineComalBin {
0x27d3…27f7 ptr = 0xb54e // 0x27d3 @0x0
0x27d3…27f7 lno = 0x0ec4 // 0x27d5 @0x2
0x27d3…27f7 at0004 = ╱9d╱ EXEC ╱ // 0x27d7 @0x4
0x27d3…27f7 at0005 = ╱54╱T╱ // 0x27d8 @0x5
0x27d3…27f7 at0006 = ╱55╱U╱ // 0x27d9 @0x6
0x27d3…27f7 at0007 = ╱44╱D╱ // 0x27da @0x7
0x27d3…27f7 at0008 = ╱ed╱(╱ // 0x27db @0x8
0x27d3…27f7 at0009 = ╱4b╱K╱ // 0x27dc @0x9
0x27d3…27f7 at000a = ╱53╱S╱ // 0x27dd @0xa
0x27d3…27f7 at000b = ╱41╱A╱ // 0x27de @0xb
0x27d3…27f7 at000c = ╱4c╱L╱ // 0x27df @0xc
0x27d3…27f7 at000d = ╱44╱D╱ // 0x27e0 @0xd
0x27d3…27f7 at000e = ╱49╱I╱ // 0x27e1 @0xe
0x27d3…27f7 at000f = ╱31╱1╱ // 0x27e2 @0xf
0x27d3…27f7 at0010 = ╱ef╱$╱ // 0x27e3 @0x10
0x27d3…27f7 at0011 = ╱ed╱(╱ // 0x27e4 @0x11
0x27d3…27f7 at0012 = ╱47╱G╱ // 0x27e5 @0x12
0x27d3…27f7 at0013 = ╱52╱R╱ // 0x27e6 @0x13
0x27d3…27f7 at0014 = ╱ee╱)╱ // 0x27e7 @0x14
0x27d3…27f7 at0015 = ╱ec╱,╱ // 0x27e8 @0x15
0x27d3…27f7 at0016 = ╱55╱U╱ // 0x27e9 @0x16
0x27d3…27f7 at0017 = ╱42╱B╱ // 0x27ea @0x17
0x27d3…27f7 at0018 = ╱45╱E╱ // 0x27eb @0x18
0x27d3…27f7 at0019 = ╱4c╱L╱ // 0x27ec @0x19
0x27d3…27f7 at001a = ╱5c╱Ø╱ // 0x27ed @0x1a
0x27d3…27f7 at001b = ╱42╱B╱ // 0x27ee @0x1b
0x27d3…27f7 at001c = ╱32╱2╱ // 0x27ef @0x1c
0x27d3…27f7 at001d = ╱ef╱$╱ // 0x27f0 @0x1d
0x27d3…27f7 at001e = ╱ec╱,╱ // 0x27f1 @0x1e
0x27d3…27f7 at001f = ╱45╱E╱ // 0x27f2 @0x1f
0x27d3…27f7 at0020 = ╱ec╱,╱ // 0x27f3 @0x20
0x27d3…27f7 at0021 = ╱42╱B╱ // 0x27f4 @0x21
0x27d3…27f7 at0022 = ╱ee╱)╱ // 0x27f5 @0x22
0x27d3…27f7 at0023 = EOL // 0x27f6 @0x23
0x27d3…27f7 }
0x27f7…2802 b559 3790 EXEC UDLIN
0x27f7…2802 LineComalBin {
0x27f7…2802 ptr = 0xb559 // 0x27f7 @0x0
0x27f7…2802 lno = 0x0ece // 0x27f9 @0x2
0x27f7…2802 at0004 = ╱9d╱ EXEC ╱ // 0x27fb @0x4
0x27f7…2802 at0005 = ╱55╱U╱ // 0x27fc @0x5
0x27f7…2802 at0006 = ╱44╱D╱ // 0x27fd @0x6
0x27f7…2802 at0007 = ╱4c╱L╱ // 0x27fe @0x7
0x27f7…2802 at0008 = ╱49╱I╱ // 0x27ff @0x8
0x27f7…2802 at0009 = ╱4e╱N╱ // 0x2800 @0x9
0x27f7…2802 at000a = EOL // 0x2801 @0xa
0x27f7…2802 }
0x2802…280a b561 3800 NEXT GR
0x2802…280a LineComalBin {
0x2802…280a ptr = 0xb561 // 0x2802 @0x0
0x2802…280a lno = 0x0ed8 // 0x2804 @0x2
0x2802…280a at0004 = ╱84╱ NEXT ╱ // 0x2806 @0x4
0x2802…280a at0005 = ╱47╱G╱ // 0x2807 @0x5
0x2802…280a at0006 = ╱52╱R╱ // 0x2808 @0x6
0x2802…280a at0007 = EOL // 0x2809 @0x7
0x2802…280a }
0x280a…281a b571 3810 PRINT CHR(10)
0x280a…281a LineComalBin {
0x280a…281a ptr = 0xb571 // 0x280a @0x0
0x280a…281a lno = 0x0ee2 // 0x280c @0x2
0x280a…281a at0004 = ╱92╱ PRINT ╱ // 0x280e @0x4
0x280a…281a at0005 = ╱cf╱CHR╱ // 0x280f @0x5
0x280a…281a at0006 = ╱ed╱(╱ // 0x2810 @0x6
0x280a…281a at0007 = ╱31╱1╱ // 0x2811 @0x7
0x280a…281a at0008 = ╱30╱0╱ // 0x2812 @0x8
0x280a…281a at0009 = ╱fe0000a004╱ // 0x2813 @0x9
0x280a…281a at000e = ╱ee╱)╱ // 0x2818 @0xe
0x280a…281a at000f = EOL // 0x2819 @0xf
0x280a…281a }
0x281a…286a b5c1 3820 PRINT TAB(5);"Total Deb+Kre.";TAB(40);"Total Fin.";TAB(60);"Difference"
0x281a…286a LineComalBin {
0x281a…286a ptr = 0xb5c1 // 0x281a @0x0
0x281a…286a lno = 0x0eec // 0x281c @0x2
0x281a…286a at0004 = ╱92╱ PRINT ╱ // 0x281e @0x4
0x281a…286a at0005 = ╱d2╱TAB╱ // 0x281f @0x5
0x281a…286a at0006 = ╱ed╱(╱ // 0x2820 @0x6
0x281a…286a at0007 = ╱35╱5╱ // 0x2821 @0x7
0x281a…286a at0008 = ╱fe0000a003╱ // 0x2822 @0x8
0x281a…286a at000d = ╱ee╱)╱ // 0x2827 @0xd
0x281a…286a at000e = ╱eb╱;╱ // 0x2828 @0xe
0x281a…286a at000f = ╱22╱"╱ // 0x2829 @0xf
0x281a…286a at0010 = ╱54╱T╱ // 0x282a @0x10
0x281a…286a at0011 = ╱6f╱o╱ // 0x282b @0x11
0x281a…286a at0012 = ╱74╱t╱ // 0x282c @0x12
0x281a…286a at0013 = ╱61╱a╱ // 0x282d @0x13
0x281a…286a at0014 = ╱6c╱l╱ // 0x282e @0x14
0x281a…286a at0015 = ╱20╱…╱ // 0x282f @0x15
0x281a…286a at0016 = ╱44╱D╱ // 0x2830 @0x16
0x281a…286a at0017 = ╱65╱e╱ // 0x2831 @0x17
0x281a…286a at0018 = ╱62╱b╱ // 0x2832 @0x18
0x281a…286a at0019 = ╱2b╱+╱ // 0x2833 @0x19
0x281a…286a at001a = ╱4b╱K╱ // 0x2834 @0x1a
0x281a…286a at001b = ╱72╱r╱ // 0x2835 @0x1b
0x281a…286a at001c = ╱65╱e╱ // 0x2836 @0x1c
0x281a…286a at001d = ╱2e╱.╱ // 0x2837 @0x1d
0x281a…286a at001e = ╱22╱"╱ // 0x2838 @0x1e
0x281a…286a at001f = ╱eb╱;╱ // 0x2839 @0x1f
0x281a…286a at0020 = ╱d2╱TAB╱ // 0x283a @0x20
0x281a…286a at0021 = ╱ed╱(╱ // 0x283b @0x21
0x281a…286a at0022 = ╱34╱4╱ // 0x283c @0x22
0x281a…286a at0023 = ╱30╱0╱ // 0x283d @0x23
0x281a…286a at0024 = ╱fe0000a006╱ // 0x283e @0x24
0x281a…286a at0029 = ╱ee╱)╱ // 0x2843 @0x29
0x281a…286a at002a = ╱eb╱;╱ // 0x2844 @0x2a
0x281a…286a at002b = ╱22╱"╱ // 0x2845 @0x2b
0x281a…286a at002c = ╱54╱T╱ // 0x2846 @0x2c
0x281a…286a at002d = ╱6f╱o╱ // 0x2847 @0x2d
0x281a…286a at002e = ╱74╱t╱ // 0x2848 @0x2e
0x281a…286a at002f = ╱61╱a╱ // 0x2849 @0x2f
0x281a…286a at0030 = ╱6c╱l╱ // 0x284a @0x30
0x281a…286a at0031 = ╱20╱…╱ // 0x284b @0x31
0x281a…286a at0032 = ╱46╱F╱ // 0x284c @0x32
0x281a…286a at0033 = ╱69╱i╱ // 0x284d @0x33
0x281a…286a at0034 = ╱6e╱n╱ // 0x284e @0x34
0x281a…286a at0035 = ╱2e╱.╱ // 0x284f @0x35
0x281a…286a at0036 = ╱22╱"╱ // 0x2850 @0x36
0x281a…286a at0037 = ╱eb╱;╱ // 0x2851 @0x37
0x281a…286a at0038 = ╱d2╱TAB╱ // 0x2852 @0x38
0x281a…286a at0039 = ╱ed╱(╱ // 0x2853 @0x39
0x281a…286a at003a = ╱36╱6╱ // 0x2854 @0x3a
0x281a…286a at003b = ╱30╱0╱ // 0x2855 @0x3b
0x281a…286a at003c = ╱fe0000f006╱ // 0x2856 @0x3c
0x281a…286a at0041 = ╱ee╱)╱ // 0x285b @0x41
0x281a…286a at0042 = ╱eb╱;╱ // 0x285c @0x42
0x281a…286a at0043 = ╱22╱"╱ // 0x285d @0x43
0x281a…286a at0044 = ╱44╱D╱ // 0x285e @0x44
0x281a…286a at0045 = ╱69╱i╱ // 0x285f @0x45
0x281a…286a at0046 = ╱66╱f╱ // 0x2860 @0x46
0x281a…286a at0047 = ╱66╱f╱ // 0x2861 @0x47
0x281a…286a at0048 = ╱65╱e╱ // 0x2862 @0x48
0x281a…286a at0049 = ╱72╱r╱ // 0x2863 @0x49
0x281a…286a at004a = ╱65╱e╱ // 0x2864 @0x4a
0x281a…286a at004b = ╱6e╱n╱ // 0x2865 @0x4b
0x281a…286a at004c = ╱63╱c╱ // 0x2866 @0x4c
0x281a…286a at004d = ╱65╱e╱ // 0x2867 @0x4d
0x281a…286a at004e = ╱22╱"╱ // 0x2868 @0x4e
0x281a…286a at004f = EOL // 0x2869 @0x4f
0x281a…286a }
0x286a…2873 b5ca 3830 PRINT " "
0x286a…2873 LineComalBin {
0x286a…2873 ptr = 0xb5ca // 0x286a @0x0
0x286a…2873 lno = 0x0ef6 // 0x286c @0x2
0x286a…2873 at0004 = ╱92╱ PRINT ╱ // 0x286e @0x4
0x286a…2873 at0005 = ╱22╱"╱ // 0x286f @0x5
0x286a…2873 at0006 = ╱20╱…╱ // 0x2870 @0x6
0x286a…2873 at0007 = ╱22╱"╱ // 0x2871 @0x7
0x286a…2873 at0008 = EOL // 0x2872 @0x8
0x286a…2873 }
0x2873…2899 b5f0 3840 EXEC CALC(B,TOSALDO1$,TOSALDO$,SUM3$)
0x2873…2899 LineComalBin {
0x2873…2899 ptr = 0xb5f0 // 0x2873 @0x0
0x2873…2899 lno = 0x0f00 // 0x2875 @0x2
0x2873…2899 at0004 = ╱9d╱ EXEC ╱ // 0x2877 @0x4
0x2873…2899 at0005 = ╱43╱C╱ // 0x2878 @0x5
0x2873…2899 at0006 = ╱41╱A╱ // 0x2879 @0x6
0x2873…2899 at0007 = ╱4c╱L╱ // 0x287a @0x7
0x2873…2899 at0008 = ╱43╱C╱ // 0x287b @0x8
0x2873…2899 at0009 = ╱ed╱(╱ // 0x287c @0x9
0x2873…2899 at000a = ╱42╱B╱ // 0x287d @0xa
0x2873…2899 at000b = ╱ec╱,╱ // 0x287e @0xb
0x2873…2899 at000c = ╱54╱T╱ // 0x287f @0xc
0x2873…2899 at000d = ╱4f╱O╱ // 0x2880 @0xd
0x2873…2899 at000e = ╱53╱S╱ // 0x2881 @0xe
0x2873…2899 at000f = ╱41╱A╱ // 0x2882 @0xf
0x2873…2899 at0010 = ╱4c╱L╱ // 0x2883 @0x10
0x2873…2899 at0011 = ╱44╱D╱ // 0x2884 @0x11
0x2873…2899 at0012 = ╱4f╱O╱ // 0x2885 @0x12
0x2873…2899 at0013 = ╱31╱1╱ // 0x2886 @0x13
0x2873…2899 at0014 = ╱ef╱$╱ // 0x2887 @0x14
0x2873…2899 at0015 = ╱ec╱,╱ // 0x2888 @0x15
0x2873…2899 at0016 = ╱54╱T╱ // 0x2889 @0x16
0x2873…2899 at0017 = ╱4f╱O╱ // 0x288a @0x17
0x2873…2899 at0018 = ╱53╱S╱ // 0x288b @0x18
0x2873…2899 at0019 = ╱41╱A╱ // 0x288c @0x19
0x2873…2899 at001a = ╱4c╱L╱ // 0x288d @0x1a
0x2873…2899 at001b = ╱44╱D╱ // 0x288e @0x1b
0x2873…2899 at001c = ╱4f╱O╱ // 0x288f @0x1c
0x2873…2899 at001d = ╱ef╱$╱ // 0x2890 @0x1d
0x2873…2899 at001e = ╱ec╱,╱ // 0x2891 @0x1e
0x2873…2899 at001f = ╱53╱S╱ // 0x2892 @0x1f
0x2873…2899 at0020 = ╱55╱U╱ // 0x2893 @0x20
0x2873…2899 at0021 = ╱4d╱M╱ // 0x2894 @0x21
0x2873…2899 at0022 = ╱33╱3╱ // 0x2895 @0x22
0x2873…2899 at0023 = ╱ef╱$╱ // 0x2896 @0x23
0x2873…2899 at0024 = ╱ee╱)╱ // 0x2897 @0x24
0x2873…2899 at0025 = EOL // 0x2898 @0x25
0x2873…2899 }
0x2899…28ba b611 3850 EXEC TUD(TOSALDO1$,UBELØB1$,E,B)
0x2899…28ba LineComalBin {
0x2899…28ba ptr = 0xb611 // 0x2899 @0x0
0x2899…28ba lno = 0x0f0a // 0x289b @0x2
0x2899…28ba at0004 = ╱9d╱ EXEC ╱ // 0x289d @0x4
0x2899…28ba at0005 = ╱54╱T╱ // 0x289e @0x5
0x2899…28ba at0006 = ╱55╱U╱ // 0x289f @0x6
0x2899…28ba at0007 = ╱44╱D╱ // 0x28a0 @0x7
0x2899…28ba at0008 = ╱ed╱(╱ // 0x28a1 @0x8
0x2899…28ba at0009 = ╱54╱T╱ // 0x28a2 @0x9
0x2899…28ba at000a = ╱4f╱O╱ // 0x28a3 @0xa
0x2899…28ba at000b = ╱53╱S╱ // 0x28a4 @0xb
0x2899…28ba at000c = ╱41╱A╱ // 0x28a5 @0xc
0x2899…28ba at000d = ╱4c╱L╱ // 0x28a6 @0xd
0x2899…28ba at000e = ╱44╱D╱ // 0x28a7 @0xe
0x2899…28ba at000f = ╱4f╱O╱ // 0x28a8 @0xf
0x2899…28ba at0010 = ╱31╱1╱ // 0x28a9 @0x10
0x2899…28ba at0011 = ╱ef╱$╱ // 0x28aa @0x11
0x2899…28ba at0012 = ╱ec╱,╱ // 0x28ab @0x12
0x2899…28ba at0013 = ╱55╱U╱ // 0x28ac @0x13
0x2899…28ba at0014 = ╱42╱B╱ // 0x28ad @0x14
0x2899…28ba at0015 = ╱45╱E╱ // 0x28ae @0x15
0x2899…28ba at0016 = ╱4c╱L╱ // 0x28af @0x16
0x2899…28ba at0017 = ╱5c╱Ø╱ // 0x28b0 @0x17
0x2899…28ba at0018 = ╱42╱B╱ // 0x28b1 @0x18
0x2899…28ba at0019 = ╱31╱1╱ // 0x28b2 @0x19
0x2899…28ba at001a = ╱ef╱$╱ // 0x28b3 @0x1a
0x2899…28ba at001b = ╱ec╱,╱ // 0x28b4 @0x1b
0x2899…28ba at001c = ╱45╱E╱ // 0x28b5 @0x1c
0x2899…28ba at001d = ╱ec╱,╱ // 0x28b6 @0x1d
0x2899…28ba at001e = ╱42╱B╱ // 0x28b7 @0x1e
0x2899…28ba at001f = ╱ee╱)╱ // 0x28b8 @0x1f
0x2899…28ba at0020 = EOL // 0x28b9 @0x20
0x2899…28ba }
0x28ba…28da b631 3860 EXEC TUD(TOSALDO$,UBELØB2$,E,B)
0x28ba…28da LineComalBin {
0x28ba…28da ptr = 0xb631 // 0x28ba @0x0
0x28ba…28da lno = 0x0f14 // 0x28bc @0x2
0x28ba…28da at0004 = ╱9d╱ EXEC ╱ // 0x28be @0x4
0x28ba…28da at0005 = ╱54╱T╱ // 0x28bf @0x5
0x28ba…28da at0006 = ╱55╱U╱ // 0x28c0 @0x6
0x28ba…28da at0007 = ╱44╱D╱ // 0x28c1 @0x7
0x28ba…28da at0008 = ╱ed╱(╱ // 0x28c2 @0x8
0x28ba…28da at0009 = ╱54╱T╱ // 0x28c3 @0x9
0x28ba…28da at000a = ╱4f╱O╱ // 0x28c4 @0xa
0x28ba…28da at000b = ╱53╱S╱ // 0x28c5 @0xb
0x28ba…28da at000c = ╱41╱A╱ // 0x28c6 @0xc
0x28ba…28da at000d = ╱4c╱L╱ // 0x28c7 @0xd
0x28ba…28da at000e = ╱44╱D╱ // 0x28c8 @0xe
0x28ba…28da at000f = ╱4f╱O╱ // 0x28c9 @0xf
0x28ba…28da at0010 = ╱ef╱$╱ // 0x28ca @0x10
0x28ba…28da at0011 = ╱ec╱,╱ // 0x28cb @0x11
0x28ba…28da at0012 = ╱55╱U╱ // 0x28cc @0x12
0x28ba…28da at0013 = ╱42╱B╱ // 0x28cd @0x13
0x28ba…28da at0014 = ╱45╱E╱ // 0x28ce @0x14
0x28ba…28da at0015 = ╱4c╱L╱ // 0x28cf @0x15
0x28ba…28da at0016 = ╱5c╱Ø╱ // 0x28d0 @0x16
0x28ba…28da at0017 = ╱42╱B╱ // 0x28d1 @0x17
0x28ba…28da at0018 = ╱32╱2╱ // 0x28d2 @0x18
0x28ba…28da at0019 = ╱ef╱$╱ // 0x28d3 @0x19
0x28ba…28da at001a = ╱ec╱,╱ // 0x28d4 @0x1a
0x28ba…28da at001b = ╱45╱E╱ // 0x28d5 @0x1b
0x28ba…28da at001c = ╱ec╱,╱ // 0x28d6 @0x1c
0x28ba…28da at001d = ╱42╱B╱ // 0x28d7 @0x1d
0x28ba…28da at001e = ╱ee╱)╱ // 0x28d8 @0x1e
0x28ba…28da at001f = EOL // 0x28d9 @0x1f
0x28ba…28da }
0x28da…28f4 b64b 3870 EXEC TUD(SUM3$,SUM1$,E,B)
0x28da…28f4 LineComalBin {
0x28da…28f4 ptr = 0xb64b // 0x28da @0x0
0x28da…28f4 lno = 0x0f1e // 0x28dc @0x2
0x28da…28f4 at0004 = ╱9d╱ EXEC ╱ // 0x28de @0x4
0x28da…28f4 at0005 = ╱54╱T╱ // 0x28df @0x5
0x28da…28f4 at0006 = ╱55╱U╱ // 0x28e0 @0x6
0x28da…28f4 at0007 = ╱44╱D╱ // 0x28e1 @0x7
0x28da…28f4 at0008 = ╱ed╱(╱ // 0x28e2 @0x8
0x28da…28f4 at0009 = ╱53╱S╱ // 0x28e3 @0x9
0x28da…28f4 at000a = ╱55╱U╱ // 0x28e4 @0xa
0x28da…28f4 at000b = ╱4d╱M╱ // 0x28e5 @0xb
0x28da…28f4 at000c = ╱33╱3╱ // 0x28e6 @0xc
0x28da…28f4 at000d = ╱ef╱$╱ // 0x28e7 @0xd
0x28da…28f4 at000e = ╱ec╱,╱ // 0x28e8 @0xe
0x28da…28f4 at000f = ╱53╱S╱ // 0x28e9 @0xf
0x28da…28f4 at0010 = ╱55╱U╱ // 0x28ea @0x10
0x28da…28f4 at0011 = ╱4d╱M╱ // 0x28eb @0x11
0x28da…28f4 at0012 = ╱31╱1╱ // 0x28ec @0x12
0x28da…28f4 at0013 = ╱ef╱$╱ // 0x28ed @0x13
0x28da…28f4 at0014 = ╱ec╱,╱ // 0x28ee @0x14
0x28da…28f4 at0015 = ╱45╱E╱ // 0x28ef @0x15
0x28da…28f4 at0016 = ╱ec╱,╱ // 0x28f0 @0x16
0x28da…28f4 at0017 = ╱42╱B╱ // 0x28f1 @0x17
0x28da…28f4 at0018 = ╱ee╱)╱ // 0x28f2 @0x18
0x28da…28f4 at0019 = EOL // 0x28f3 @0x19
0x28da…28f4 }
0x28f4…2921 b678 3880 PRINT TAB(6);UBELØB1$;TAB(37);UBELØB2$;
0x28f4…2921 LineComalBin {
0x28f4…2921 ptr = 0xb678 // 0x28f4 @0x0
0x28f4…2921 lno = 0x0f28 // 0x28f6 @0x2
0x28f4…2921 at0004 = ╱92╱ PRINT ╱ // 0x28f8 @0x4
0x28f4…2921 at0005 = ╱d2╱TAB╱ // 0x28f9 @0x5
0x28f4…2921 at0006 = ╱ed╱(╱ // 0x28fa @0x6
0x28f4…2921 at0007 = ╱36╱6╱ // 0x28fb @0x7
0x28f4…2921 at0008 = ╱fe0000c003╱ // 0x28fc @0x8
0x28f4…2921 at000d = ╱ee╱)╱ // 0x2901 @0xd
0x28f4…2921 at000e = ╱eb╱;╱ // 0x2902 @0xe
0x28f4…2921 at000f = ╱55╱U╱ // 0x2903 @0xf
0x28f4…2921 at0010 = ╱42╱B╱ // 0x2904 @0x10
0x28f4…2921 at0011 = ╱45╱E╱ // 0x2905 @0x11
0x28f4…2921 at0012 = ╱4c╱L╱ // 0x2906 @0x12
0x28f4…2921 at0013 = ╱5c╱Ø╱ // 0x2907 @0x13
0x28f4…2921 at0014 = ╱42╱B╱ // 0x2908 @0x14
0x28f4…2921 at0015 = ╱31╱1╱ // 0x2909 @0x15
0x28f4…2921 at0016 = ╱ef╱$╱ // 0x290a @0x16
0x28f4…2921 at0017 = ╱eb╱;╱ // 0x290b @0x17
0x28f4…2921 at0018 = ╱d2╱TAB╱ // 0x290c @0x18
0x28f4…2921 at0019 = ╱ed╱(╱ // 0x290d @0x19
0x28f4…2921 at001a = ╱33╱3╱ // 0x290e @0x1a
0x28f4…2921 at001b = ╱37╱7╱ // 0x290f @0x1b
0x28f4…2921 at001c = ╱fe00009406╱ // 0x2910 @0x1c
0x28f4…2921 at0021 = ╱ee╱)╱ // 0x2915 @0x21
0x28f4…2921 at0022 = ╱eb╱;╱ // 0x2916 @0x22
0x28f4…2921 at0023 = ╱55╱U╱ // 0x2917 @0x23
0x28f4…2921 at0024 = ╱42╱B╱ // 0x2918 @0x24
0x28f4…2921 at0025 = ╱45╱E╱ // 0x2919 @0x25
0x28f4…2921 at0026 = ╱4c╱L╱ // 0x291a @0x26
0x28f4…2921 at0027 = ╱5c╱Ø╱ // 0x291b @0x27
0x28f4…2921 at0028 = ╱42╱B╱ // 0x291c @0x28
0x28f4…2921 at0029 = ╱32╱2╱ // 0x291d @0x29
0x28f4…2921 at002a = ╱ef╱$╱ // 0x291e @0x2a
0x28f4…2921 at002b = ╱eb╱;╱ // 0x291f @0x2b
0x28f4…2921 at002c = EOL // 0x2920 @0x2c
0x28f4…2921 }
0x2921…2937 b68e 3890 PRINT TAB(57);SUM1$
0x2921…2937 LineComalBin {
0x2921…2937 ptr = 0xb68e // 0x2921 @0x0
0x2921…2937 lno = 0x0f32 // 0x2923 @0x2
0x2921…2937 at0004 = ╱92╱ PRINT ╱ // 0x2925 @0x4
0x2921…2937 at0005 = ╱d2╱TAB╱ // 0x2926 @0x5
0x2921…2937 at0006 = ╱ed╱(╱ // 0x2927 @0x6
0x2921…2937 at0007 = ╱35╱5╱ // 0x2928 @0x7
0x2921…2937 at0008 = ╱37╱7╱ // 0x2929 @0x8
0x2921…2937 at0009 = ╱fe0000e406╱ // 0x292a @0x9
0x2921…2937 at000e = ╱ee╱)╱ // 0x292f @0xe
0x2921…2937 at000f = ╱eb╱;╱ // 0x2930 @0xf
0x2921…2937 at0010 = ╱53╱S╱ // 0x2931 @0x10
0x2921…2937 at0011 = ╱55╱U╱ // 0x2932 @0x11
0x2921…2937 at0012 = ╱4d╱M╱ // 0x2933 @0x12
0x2921…2937 at0013 = ╱31╱1╱ // 0x2934 @0x13
0x2921…2937 at0014 = ╱ef╱$╱ // 0x2935 @0x14
0x2921…2937 at0015 = EOL // 0x2936 @0x15
0x2921…2937 }
0x2937…2940 b697 3900 PRINT " "
0x2937…2940 LineComalBin {
0x2937…2940 ptr = 0xb697 // 0x2937 @0x0
0x2937…2940 lno = 0x0f3c // 0x2939 @0x2
0x2937…2940 at0004 = ╱92╱ PRINT ╱ // 0x293b @0x4
0x2937…2940 at0005 = ╱22╱"╱ // 0x293c @0x5
0x2937…2940 at0006 = ╱20╱…╱ // 0x293d @0x6
0x2937…2940 at0007 = ╱22╱"╱ // 0x293e @0x7
0x2937…2940 at0008 = EOL // 0x293f @0x8
0x2937…2940 }
0x2940…294f b6a6 3901 SUM1$="0+"
0x2940…294f LineComalBin {
0x2940…294f ptr = 0xb6a6 // 0x2940 @0x0
0x2940…294f lno = 0x0f3d // 0x2942 @0x2
0x2940…294f at0004 = ╱53╱S╱ // 0x2944 @0x4
0x2940…294f at0005 = ╱55╱U╱ // 0x2945 @0x5
0x2940…294f at0006 = ╱4d╱M╱ // 0x2946 @0x6
0x2940…294f at0007 = ╱31╱1╱ // 0x2947 @0x7
0x2940…294f at0008 = ╱ef╱$╱ // 0x2948 @0x8
0x2940…294f at0009 = ╱dc╱=╱ // 0x2949 @0x9
0x2940…294f at000a = ╱22╱"╱ // 0x294a @0xa
0x2940…294f at000b = ╱30╱0╱ // 0x294b @0xb
0x2940…294f at000c = ╱2b╱+╱ // 0x294c @0xc
0x2940…294f at000d = ╱22╱"╱ // 0x294d @0xd
0x2940…294f at000e = EOL // 0x294e @0xe
0x2940…294f }
0x294f…2976 b6cd 3902 EXEC CALC(E,SUM1$,TOSALDO1$,TOSALDO1$)
0x294f…2976 LineComalBin {
0x294f…2976 ptr = 0xb6cd // 0x294f @0x0
0x294f…2976 lno = 0x0f3e // 0x2951 @0x2
0x294f…2976 at0004 = ╱9d╱ EXEC ╱ // 0x2953 @0x4
0x294f…2976 at0005 = ╱43╱C╱ // 0x2954 @0x5
0x294f…2976 at0006 = ╱41╱A╱ // 0x2955 @0x6
0x294f…2976 at0007 = ╱4c╱L╱ // 0x2956 @0x7
0x294f…2976 at0008 = ╱43╱C╱ // 0x2957 @0x8
0x294f…2976 at0009 = ╱ed╱(╱ // 0x2958 @0x9
0x294f…2976 at000a = ╱45╱E╱ // 0x2959 @0xa
0x294f…2976 at000b = ╱ec╱,╱ // 0x295a @0xb
0x294f…2976 at000c = ╱53╱S╱ // 0x295b @0xc
0x294f…2976 at000d = ╱55╱U╱ // 0x295c @0xd
0x294f…2976 at000e = ╱4d╱M╱ // 0x295d @0xe
0x294f…2976 at000f = ╱31╱1╱ // 0x295e @0xf
0x294f…2976 at0010 = ╱ef╱$╱ // 0x295f @0x10
0x294f…2976 at0011 = ╱ec╱,╱ // 0x2960 @0x11
0x294f…2976 at0012 = ╱54╱T╱ // 0x2961 @0x12
0x294f…2976 at0013 = ╱4f╱O╱ // 0x2962 @0x13
0x294f…2976 at0014 = ╱53╱S╱ // 0x2963 @0x14
0x294f…2976 at0015 = ╱41╱A╱ // 0x2964 @0x15
0x294f…2976 at0016 = ╱4c╱L╱ // 0x2965 @0x16
0x294f…2976 at0017 = ╱44╱D╱ // 0x2966 @0x17
0x294f…2976 at0018 = ╱4f╱O╱ // 0x2967 @0x18
0x294f…2976 at0019 = ╱31╱1╱ // 0x2968 @0x19
0x294f…2976 at001a = ╱ef╱$╱ // 0x2969 @0x1a
0x294f…2976 at001b = ╱ec╱,╱ // 0x296a @0x1b
0x294f…2976 at001c = ╱54╱T╱ // 0x296b @0x1c
0x294f…2976 at001d = ╱4f╱O╱ // 0x296c @0x1d
0x294f…2976 at001e = ╱53╱S╱ // 0x296d @0x1e
0x294f…2976 at001f = ╱41╱A╱ // 0x296e @0x1f
0x294f…2976 at0020 = ╱4c╱L╱ // 0x296f @0x20
0x294f…2976 at0021 = ╱44╱D╱ // 0x2970 @0x21
0x294f…2976 at0022 = ╱4f╱O╱ // 0x2971 @0x22
0x294f…2976 at0023 = ╱31╱1╱ // 0x2972 @0x23
0x294f…2976 at0024 = ╱ef╱$╱ // 0x2973 @0x24
0x294f…2976 at0025 = ╱ee╱)╱ // 0x2974 @0x25
0x294f…2976 at0026 = EOL // 0x2975 @0x26
0x294f…2976 }
0x2976…2997 b6ee 3903 EXEC TUD(TOSALDO1$,UBELØB1$,E,B)
0x2976…2997 LineComalBin {
0x2976…2997 ptr = 0xb6ee // 0x2976 @0x0
0x2976…2997 lno = 0x0f3f // 0x2978 @0x2
0x2976…2997 at0004 = ╱9d╱ EXEC ╱ // 0x297a @0x4
0x2976…2997 at0005 = ╱54╱T╱ // 0x297b @0x5
0x2976…2997 at0006 = ╱55╱U╱ // 0x297c @0x6
0x2976…2997 at0007 = ╱44╱D╱ // 0x297d @0x7
0x2976…2997 at0008 = ╱ed╱(╱ // 0x297e @0x8
0x2976…2997 at0009 = ╱54╱T╱ // 0x297f @0x9
0x2976…2997 at000a = ╱4f╱O╱ // 0x2980 @0xa
0x2976…2997 at000b = ╱53╱S╱ // 0x2981 @0xb
0x2976…2997 at000c = ╱41╱A╱ // 0x2982 @0xc
0x2976…2997 at000d = ╱4c╱L╱ // 0x2983 @0xd
0x2976…2997 at000e = ╱44╱D╱ // 0x2984 @0xe
0x2976…2997 at000f = ╱4f╱O╱ // 0x2985 @0xf
0x2976…2997 at0010 = ╱31╱1╱ // 0x2986 @0x10
0x2976…2997 at0011 = ╱ef╱$╱ // 0x2987 @0x11
0x2976…2997 at0012 = ╱ec╱,╱ // 0x2988 @0x12
0x2976…2997 at0013 = ╱55╱U╱ // 0x2989 @0x13
0x2976…2997 at0014 = ╱42╱B╱ // 0x298a @0x14
0x2976…2997 at0015 = ╱45╱E╱ // 0x298b @0x15
0x2976…2997 at0016 = ╱4c╱L╱ // 0x298c @0x16
0x2976…2997 at0017 = ╱5c╱Ø╱ // 0x298d @0x17
0x2976…2997 at0018 = ╱42╱B╱ // 0x298e @0x18
0x2976…2997 at0019 = ╱31╱1╱ // 0x298f @0x19
0x2976…2997 at001a = ╱ef╱$╱ // 0x2990 @0x1a
0x2976…2997 at001b = ╱ec╱,╱ // 0x2991 @0x1b
0x2976…2997 at001c = ╱45╱E╱ // 0x2992 @0x1c
0x2976…2997 at001d = ╱ec╱,╱ // 0x2993 @0x1d
0x2976…2997 at001e = ╱42╱B╱ // 0x2994 @0x1e
0x2976…2997 at001f = ╱ee╱)╱ // 0x2995 @0x1f
0x2976…2997 at0020 = EOL // 0x2996 @0x20
0x2976…2997 }
0x2997…29d9 b730 3910 PRINT TAB(5);"Bogført på difference konto:";TAB(57);UBELØB1$
0x2997…29d9 LineComalBin {
0x2997…29d9 ptr = 0xb730 // 0x2997 @0x0
0x2997…29d9 lno = 0x0f46 // 0x2999 @0x2
0x2997…29d9 at0004 = ╱92╱ PRINT ╱ // 0x299b @0x4
0x2997…29d9 at0005 = ╱d2╱TAB╱ // 0x299c @0x5
0x2997…29d9 at0006 = ╱ed╱(╱ // 0x299d @0x6
0x2997…29d9 at0007 = ╱35╱5╱ // 0x299e @0x7
0x2997…29d9 at0008 = ╱fe0000a003╱ // 0x299f @0x8
0x2997…29d9 at000d = ╱ee╱)╱ // 0x29a4 @0xd
0x2997…29d9 at000e = ╱eb╱;╱ // 0x29a5 @0xe
0x2997…29d9 at000f = ╱22╱"╱ // 0x29a6 @0xf
0x2997…29d9 at0010 = ╱42╱B╱ // 0x29a7 @0x10
0x2997…29d9 at0011 = ╱6f╱o╱ // 0x29a8 @0x11
0x2997…29d9 at0012 = ╱67╱g╱ // 0x29a9 @0x12
0x2997…29d9 at0013 = ╱66╱f╱ // 0x29aa @0x13
0x2997…29d9 at0014 = ╱7c╱ø╱ // 0x29ab @0x14
0x2997…29d9 at0015 = ╱72╱r╱ // 0x29ac @0x15
0x2997…29d9 at0016 = ╱74╱t╱ // 0x29ad @0x16
0x2997…29d9 at0017 = ╱20╱…╱ // 0x29ae @0x17
0x2997…29d9 at0018 = ╱70╱p╱ // 0x29af @0x18
0x2997…29d9 at0019 = ╱7d╱å╱ // 0x29b0 @0x19
0x2997…29d9 at001a = ╱20╱…╱ // 0x29b1 @0x1a
0x2997…29d9 at001b = ╱64╱d╱ // 0x29b2 @0x1b
0x2997…29d9 at001c = ╱69╱i╱ // 0x29b3 @0x1c
0x2997…29d9 at001d = ╱66╱f╱ // 0x29b4 @0x1d
0x2997…29d9 at001e = ╱66╱f╱ // 0x29b5 @0x1e
0x2997…29d9 at001f = ╱65╱e╱ // 0x29b6 @0x1f
0x2997…29d9 at0020 = ╱72╱r╱ // 0x29b7 @0x20
0x2997…29d9 at0021 = ╱65╱e╱ // 0x29b8 @0x21
0x2997…29d9 at0022 = ╱6e╱n╱ // 0x29b9 @0x22
0x2997…29d9 at0023 = ╱63╱c╱ // 0x29ba @0x23
0x2997…29d9 at0024 = ╱65╱e╱ // 0x29bb @0x24
0x2997…29d9 at0025 = ╱20╱…╱ // 0x29bc @0x25
0x2997…29d9 at0026 = ╱6b╱k╱ // 0x29bd @0x26
0x2997…29d9 at0027 = ╱6f╱o╱ // 0x29be @0x27
0x2997…29d9 at0028 = ╱6e╱n╱ // 0x29bf @0x28
0x2997…29d9 at0029 = ╱74╱t╱ // 0x29c0 @0x29
0x2997…29d9 at002a = ╱6f╱o╱ // 0x29c1 @0x2a
0x2997…29d9 at002b = ╱3a╱:╱ // 0x29c2 @0x2b
0x2997…29d9 at002c = ╱22╱"╱ // 0x29c3 @0x2c
0x2997…29d9 at002d = ╱eb╱;╱ // 0x29c4 @0x2d
0x2997…29d9 at002e = ╱d2╱TAB╱ // 0x29c5 @0x2e
0x2997…29d9 at002f = ╱ed╱(╱ // 0x29c6 @0x2f
0x2997…29d9 at0030 = ╱35╱5╱ // 0x29c7 @0x30
0x2997…29d9 at0031 = ╱37╱7╱ // 0x29c8 @0x31
0x2997…29d9 at0032 = ╱fe0000e406╱ // 0x29c9 @0x32
0x2997…29d9 at0037 = ╱ee╱)╱ // 0x29ce @0x37
0x2997…29d9 at0038 = ╱eb╱;╱ // 0x29cf @0x38
0x2997…29d9 at0039 = ╱55╱U╱ // 0x29d0 @0x39
0x2997…29d9 at003a = ╱42╱B╱ // 0x29d1 @0x3a
0x2997…29d9 at003b = ╱45╱E╱ // 0x29d2 @0x3b
0x2997…29d9 at003c = ╱4c╱L╱ // 0x29d3 @0x3c
0x2997…29d9 at003d = ╱5c╱Ø╱ // 0x29d4 @0x3d
0x2997…29d9 at003e = ╱42╱B╱ // 0x29d5 @0x3e
0x2997…29d9 at003f = ╱31╱1╱ // 0x29d6 @0x3f
0x2997…29d9 at0040 = ╱ef╱$╱ // 0x29d7 @0x40
0x2997…29d9 at0041 = EOL // 0x29d8 @0x41
0x2997…29d9 }
0x29d9…29fd b754 3920 FOR I=E TO 49-15-MKGR-MKRGR
0x29d9…29fd LineComalBin {
0x29d9…29fd ptr = 0xb754 // 0x29d9 @0x0
0x29d9…29fd lno = 0x0f50 // 0x29db @0x2
0x29d9…29fd at0004 = ╱83╱ FOR ╱ // 0x29dd @0x4
0x29d9…29fd at0005 = ╱49╱I╱ // 0x29de @0x5
0x29d9…29fd at0006 = ╱dc╱=╱ // 0x29df @0x6
0x29d9…29fd at0007 = ╱45╱E╱ // 0x29e0 @0x7
0x29d9…29fd at0008 = ╱b7╱ TO ╱ // 0x29e1 @0x8
0x29d9…29fd at0009 = ╱34╱4╱ // 0x29e2 @0x9
0x29d9…29fd at000a = ╱39╱9╱ // 0x29e3 @0xa
0x29d9…29fd at000b = ╱fe0000c406╱ // 0x29e4 @0xb
0x29d9…29fd at0010 = ╱e3╱-╱ // 0x29e9 @0x10
0x29d9…29fd at0011 = ╱31╱1╱ // 0x29ea @0x11
0x29d9…29fd at0012 = ╱35╱5╱ // 0x29eb @0x12
0x29d9…29fd at0013 = ╱fe0000f004╱ // 0x29ec @0x13
0x29d9…29fd at0018 = ╱e3╱-╱ // 0x29f1 @0x18
0x29d9…29fd at0019 = ╱4d╱M╱ // 0x29f2 @0x19
0x29d9…29fd at001a = ╱4b╱K╱ // 0x29f3 @0x1a
0x29d9…29fd at001b = ╱47╱G╱ // 0x29f4 @0x1b
0x29d9…29fd at001c = ╱52╱R╱ // 0x29f5 @0x1c
0x29d9…29fd at001d = ╱e3╱-╱ // 0x29f6 @0x1d
0x29d9…29fd at001e = ╱4d╱M╱ // 0x29f7 @0x1e
0x29d9…29fd at001f = ╱4b╱K╱ // 0x29f8 @0x1f
0x29d9…29fd at0020 = ╱52╱R╱ // 0x29f9 @0x20
0x29d9…29fd at0021 = ╱47╱G╱ // 0x29fa @0x21
0x29d9…29fd at0022 = ╱52╱R╱ // 0x29fb @0x22
0x29d9…29fd at0023 = EOL // 0x29fc @0x23
0x29d9…29fd }
0x29fd…2a06 b75d 3930 PRINT " "
0x29fd…2a06 LineComalBin {
0x29fd…2a06 ptr = 0xb75d // 0x29fd @0x0
0x29fd…2a06 lno = 0x0f5a // 0x29ff @0x2
0x29fd…2a06 at0004 = ╱92╱ PRINT ╱ // 0x2a01 @0x4
0x29fd…2a06 at0005 = ╱22╱"╱ // 0x2a02 @0x5
0x29fd…2a06 at0006 = ╱20╱…╱ // 0x2a03 @0x6
0x29fd…2a06 at0007 = ╱22╱"╱ // 0x2a04 @0x7
0x29fd…2a06 at0008 = EOL // 0x2a05 @0x8
0x29fd…2a06 }
0x2a06…2a0d b764 3940 NEXT I
0x2a06…2a0d LineComalBin {
0x2a06…2a0d ptr = 0xb764 // 0x2a06 @0x0
0x2a06…2a0d lno = 0x0f64 // 0x2a08 @0x2
0x2a06…2a0d at0004 = ╱84╱ NEXT ╱ // 0x2a0a @0x4
0x2a06…2a0d at0005 = ╱49╱I╱ // 0x2a0b @0x5
0x2a06…2a0d at0006 = EOL // 0x2a0c @0x6
0x2a06…2a0d }
0x2a0d…2a14 b76b 3950 OUTPUT T
0x2a0d…2a14 LineComalBin {
0x2a0d…2a14 ptr = 0xb76b // 0x2a0d @0x0
0x2a0d…2a14 lno = 0x0f6e // 0x2a0f @0x2
0x2a0d…2a14 at0004 = ╱a5╱ OUTPUT ╱ // 0x2a11 @0x4
0x2a0d…2a14 at0005 = ╱54╱T╱ // 0x2a12 @0x5
0x2a0d…2a14 at0006 = EOL // 0x2a13 @0x6
0x2a0d…2a14 }
0x2a14…2a1a b771 3960 CLEAR
0x2a14…2a1a LineComalBin {
0x2a14…2a1a ptr = 0xb771 // 0x2a14 @0x0
0x2a14…2a1a lno = 0x0f78 // 0x2a16 @0x2
0x2a14…2a1a at0004 = ╱a0╱ CLEAR ╱ // 0x2a18 @0x4
0x2a14…2a1a at0005 = EOL // 0x2a19 @0x5
0x2a14…2a1a }
0x2a1a…2a31 0000 3970 CHAIN "P641210:OPSTART"
0x2a1a…2a31 LineComalBin {
0x2a1a…2a31 ptr = 0x0000 // 0x2a1a @0x0
0x2a1a…2a31 lno = 0x0f82 // 0x2a1c @0x2
0x2a1a…2a31 at0004 = ╱ac╱ CHAIN ╱ // 0x2a1e @0x4
0x2a1a…2a31 at0005 = ╱22╱"╱ // 0x2a1f @0x5
0x2a1a…2a31 at0006 = ╱50╱P╱ // 0x2a20 @0x6
0x2a1a…2a31 at0007 = ╱36╱6╱ // 0x2a21 @0x7
0x2a1a…2a31 at0008 = ╱34╱4╱ // 0x2a22 @0x8
0x2a1a…2a31 at0009 = ╱31╱1╱ // 0x2a23 @0x9
0x2a1a…2a31 at000a = ╱32╱2╱ // 0x2a24 @0xa
0x2a1a…2a31 at000b = ╱31╱1╱ // 0x2a25 @0xb
0x2a1a…2a31 at000c = ╱30╱0╱ // 0x2a26 @0xc
0x2a1a…2a31 at000d = ╱3a╱:╱ // 0x2a27 @0xd
0x2a1a…2a31 at000e = ╱4f╱O╱ // 0x2a28 @0xe
0x2a1a…2a31 at000f = ╱50╱P╱ // 0x2a29 @0xf
0x2a1a…2a31 at0010 = ╱53╱S╱ // 0x2a2a @0x10
0x2a1a…2a31 at0011 = ╱54╱T╱ // 0x2a2b @0x11
0x2a1a…2a31 at0012 = ╱41╱A╱ // 0x2a2c @0x12
0x2a1a…2a31 at0013 = ╱52╱R╱ // 0x2a2d @0x13
0x2a1a…2a31 at0014 = ╱54╱T╱ // 0x2a2e @0x14
0x2a1a…2a31 at0015 = ╱22╱"╱ // 0x2a2f @0x15
0x2a1a…2a31 at0016 = EOL // 0x2a30 @0x16
0x2a1a…2a31 }
0x2a31…2a40 57 8d 5a 00 42 dc 30 fe 00 00 00 00 eb 45 dc ┆W Z B 0 E ┆
0x2a40…2a60 31 fe 00 00 80 01 eb 47 dc 32 fe 00 00 80 02 eb 56 dc 33 fe 00 00 c0 02 eb 57 dc 39 fe 00 00 90 ┆1 G 2 V 3 W 9 ┆
0x2a60…2a62 04 ff ┆ ┆
0x2a62…2a68 (141,) 57 8d 88 b7 10 00 ┆W ┆