|
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: 23283 (0x5af3)
Types: SPC/1-COMAL-BIN
Notes: Mikados_B
Names: »FAKTURA.B«
└─⟦385f097a1⟧ Bits:30008988 SPC/1 COMAL programmer til bogføring
└─⟦this⟧ »FAKTURA.B«
0100 DIM OP1$(12),OP2$(12),RES$(15),BLB2$(12),T2(9),K2$(17),K3$(17),K4$(17) 0110 DIM K1$(17),N$(6),K6$(17),K5$(17),DEBNAVN$(25),DSALDO1$(12),DEBKGR$(2) 0120 DIM DSALDO2$(12),DSALDO3$(12),DSALDO4$(12),DEBLK$(2),DEBGADE$(25) 0130 DIM DEBTLF$(9),DEBBY$(20),SALDO$(12),FORS$(12),SVAR2$(1),GTOTAL$(12) 0140 DIM ÅRKØB$(12),MDNKØB$(12),K7$(17),A$(6),TAL1$(12) 0150 DIM MOMS$(12),FTOTAL$(12),KOD1$(1),KOD$(1),TAH$(12),TAL4$(14),T1(9) 0160 DIM VARTEKST$(50),VARPRIS$(12),BELØB$(12),TOTAL$(12),B$(12) 0170 DIM SVAR1$(1),FAKKRE$(1),LEVTEKST$(52),ANTAL$(12),BLANK$(77),LAND$(9,12) 0180 DIM LTX1$(6),LTX2$(32),LTX3$(47),LTX4$(19),LTX5$(17),LTX6$(31),LTX7$(33) 0190 DIM LTX8$(9),LTX9$(25),LTX10$(26),LTX11$(28),LTX12$(39),LTX13$(33) 0200 TAL4$="0+";TOTAL$="0+";TAH$=" ,00+" 0210 BLANK$=" ";BLANK$=BLANK$+BLANK$+BLANK$+" " 0220 LTX1$="Rabat ";LTX3$="Fakturering. Indtast kundenummer, 0 for færdig:" 0230 LTX2$="Korrekt forsendelsesbeløb (J/N):";LTX4$="Rigtig kunde (J/N):" 0240 LTX5$="Ordrenr.: ";LTX7$="Der er ikke plads til ny faktura." 0250 LTX9$="Linie, som ønskes ændret:";LTX11$="Ønskes linien slettet (J/N):" 0260 LTX8$="Vælg 1-5:";LTX12$="Linie fra hvilken der ønskes udskrevet:" 0270 LTX6$="Fakturahoved godkendes (J/N): " 0280 LTX13$="Hvilket linienummer for ny linie:" 0290 LTX10$="Linie, som ønskes slettet:" 0300 PROC CA(AR3,B1,B2,ES) 0310 OP1$=B1$;OP2$=B2$;RES$=ES$;SI=0;FLAG=0;ART=AR3-6*(AR3>5) 0320 CALL "P641210:REGN" 0330 IF AR3<6 THEN 0340 IF FLAG THEN STOP 0350 ENDIF 0360 ES$=RES$ 0370 ENDPROC 0380 PROC ANT 0390 IF ANTAL$(10:2)="00" THEN 0400 PRINT ANTAL$(5:4);BLANK$(1:10) 0410 ELSE 0420 PRINT ANTAL$(5:7);BLANK$(1:10) 0430 ENDIF 0440 ANTAL$=ANTAL$(5:8) 0450 ENDPROC 0460 PROC INDPUT1(XPOS1,YPOS1,LN4,LN5,LT1) 0470 REPEAT 0480 CURSOR XPOS1,YPOS1 0490 PRINT LT1$;BLANK$(77-XPOS1-LEN(LT1$)) 0500 CURSOR XPOS1+LEN(LT1$)-1,YPOS1 0510 INPUT " ",A$ 0520 EXEC NRTEST(A$) 0530 UNTIL P>LN4 AND P<LN5 AND TEST2=0 0540 ENDPROC 0550 PROC INDPUT2(XPOS2,YPOS2,LT2,VAR) 0560 REPEAT 0570 CURSOR XPOS2,YPOS2 0580 PRINT LT2$;BLANK$(77-XPOS2-LEN(LT2$)) 0590 CURSOR XPOS2+LEN(LT2$)-1,YPOS2 0600 INPUT " ",VAR$ 0610 IF LEN(VAR$)=0 THEN VAR$="0" 0620 VAR$=VAR$+"+" 0630 EXEC CA(6,VAR$,TAH$,VAR$) 0640 UNTIL FLAG=0 0650 ENDPROC 0660 PROC FE(NR1,NR2,NR3) 0670 IF STATUS(NR3$)<>0 THEN 0680 PRINT STATUS(NR3$),NR1,NR2,NR3$ 0690 STOP 0700 ENDIF 0710 ENDPROC 0720 PROC FINDPOST1(TAB4,Q,MANT2,NØGL5,PIL6,L8) 0730 PIL1=MANT2 DIV 8;PIL6=PIL1;CEKS=1;MANT3=MANT2 DIV 4;MANT4=MANT2 DIV 32 0740 REPEAT 0750 IF NØGL5=TAB4(PIL6) OR PIL1=1 THEN EXIT 0760 PIL1=(PIL1+1) DIV 2;PIL6=PIL6+PIL1*(1-2*(NØGL5<TAB4(PIL6))) 0770 IF PIL6<1 THEN PIL6=1 0780 IF PIL6>MANT3 THEN PIL6=MANT3 0790 UNTIL PIL1=0 0800 IF TAB4(PIL6)>NØGL5 THEN PIL6=PIL6-1*(PIL6>1) 0810 PIL6=MANT4+PIL6 0820 GET L8$,PIL6:Q(1,1),Q(1,2),Q(2,1),Q(2,2),Q(3,1),Q(3,2),Q(4,1),Q(4,2) 0830 EXEC FE(1,1,L8$) 0840 FOR PIL6=1 TO 4 0850 IF NØGL5=Q(PIL6,1) THEN EXIT 0860 NEXT PIL6 0870 IF PIL6<>5 THEN CEKS=0 0880 ENDPROC 0890 PROC INDTAB1(Z,MANT5,L7) 0900 PIL1=MANT5 DIV 32 0910 FOR I=1 TO PIL1 0920 H=(I-1)*8+1 0930 GET L7$,I:Z(H),Z(H+1),Z(H+2),Z(H+3),Z(H+4),Z(H+5),Z(H+6),Z(H+7) 0940 EXEC FE(2,1,L7$) 0950 NEXT I 0960 ENDPROC 0970 PROC NRTEST(NUM1) 0980 P=0;TEST2=0;KTAL=0;L=LEN(NUM1$) 0990 IF L>6 THEN EXIT 1000 CASE L OF 1010 FOR J=1 TO L 1020 P1=INT(ORD(NUM1$(J))-48) 1030 IF P1<0 OR P1>9 THEN 1040 TEST2=1 1050 ELSE 1060 P=P*10+P1 1070 ENDIF 1080 NEXT J 1090 KTAL=P DIV 10000 1100 WHEN 0 1110 P=-1 1120 WHEN 1 1130 CASE NUM1$ OF 1140 P=INT(ORD(NUM1$)-48) 1150 WHEN "J","j" 1160 P=-7 1170 WHEN "N","n" 1180 P=-8 1190 ENDCASE 1200 ENDCASE 1210 ENDPROC 1220 PROC TUD(BLB1,UBLB1,TEGN,STØR) 1230 BLB2$=BLB1$ 1240 EXEC CA(5,BLB2$,TAH$,UBLB1$) 1250 IF TEGN=0 THEN UBLB1$=UBLB1$(1:13) 1260 IF TEGN=1 AND UBLB1$(LEN(UBLB1$))="+" THEN UBLB1$(LEN(UBLB1$))=" " 1270 IF STØR=1 THEN UBLB1$=UBLB1$(4:LEN(UBLB1$)-3) 1280 PRINT UBLB1$ 1290 ENDPROC 1300 PROC HENTDPOST 1310 S=DTAB(DPIL3,2) 1320 GET K4$,S:DEBNR,DEBNAVN$,DSALDO1$,DEBKGR$ 1330 EXEC FE(8,1,K4$) 1340 GET K4$,S+1:DSALDO2$,DSALDO3$,DSALDO4$,DEBPOSTNR,DEBLK$ 1350 EXEC FE(8,2,K4$) 1360 GET K4$,S+2:DEBGADE$,DEBTLF$,HPOST,HKUNDE 1370 EXEC FE(8,3,K4$) 1380 GET K4$,S+3:DEBBY$,ÅRKØB$,MDNKØB$ 1390 EXEC FE(8,4,K4$) 1400 ENDPROC 1410 PROC HENTVPOST 1420 S=VTAB(VPIL3,2) 1430 GET K5$,S:VARENR,VARTEKST$,VARPRIS$,VARKONT 1440 EXEC FE(3,1,K5$) 1450 ENDPROC 1460 PROC KUNDEUD(HO) 1470 CURSOR 9,5 1480 PRINT DEBNAVN$ 1490 CURSOR 9,6 1500 PRINT DEBGADE$ 1510 CURSOR 6,7 1520 PRINT USING "#######":DEBPOSTNR 1530 CURSOR 14,7 1540 PRINT DEBBY$ 1550 IF HO=1 THEN 1560 EXEC CA(0,DSALDO1$,DSALDO2$,SALDO$) 1570 EXEC CA(0,SALDO$,DSALDO3$,SALDO$) 1580 EXEC CA(0,SALDO$,DSALDO4$,SALDO$) 1590 CURSOR 9,14 1600 PRINT "Saldo: "; 1610 EXEC TUD(SALDO$,TAL4$,1,0) 1620 CURSOR 12,16 1630 PRINT "0-30 dage 30-60 dage 60-90 dage ældre" 1640 CURSOR 9,18 1650 EXEC TUD(DSALDO1$,TAL4$,1,0) 1660 CURSOR 25,18 1670 EXEC TUD(DSALDO2$,TAL4$,1,0) 1680 CURSOR 41,18 1690 EXEC TUD(DSALDO3$,TAL4$,1,0) 1700 CURSOR 57,18 1710 EXEC TUD(DSALDO4$,TAL4$,1,0) 1720 ENDIF 1730 ENDPROC 1740 PROC DATOINDT 1750 REPEAT 1760 EXEC INDPUT1(64,LINIE,-2,1000000,BLANK$(1)) 1770 UNTIL KTAL=>80 AND (P DIV 100) MOD 100<13 AND P MOD 100<32 OR P=-1 1780 DAT=P 1790 IF DAT=-1 THEN DAT=DATO 1800 CURSOR 67,LINIE 1810 EXEC DATOUD(DAT) 1820 ENDPROC 1830 PROC DATOUD(DA) 1840 PRINT USING "###.##":(DA MOD 10000)/100 1850 CURSOR 64,LINIE 1860 PRINT USING "###.#":(DA DIV 1000)/10 1870 ENDPROC 1880 PROC FAKHOVED 1890 CLEAR 1900 CURSOR 2,1 1910 PRINT USING "Kundenr.:####### ":KUNDENR; 1920 PRINT " ";DEBNAVN$ 1930 CURSOR 54,1 1940 IF FAKKRE$="F" THEN 1950 PRINT USING "Fakturanr.: #######":FAKTNR+AFAKT 1960 ELSE 1970 PRINT USING "Kreditnotanr.: ######":KREDNR+AKRED 1980 ENDIF 1990 CURSOR 2,3 2000 PRINT "Linie Vr.nr. Antal Tekst"; 2010 CURSOR 56,3 2020 PRINT "Pris Beløb" 2030 LINIE=5 2040 ENDPROC 2050 PROC VARELINI 2060 REPEAT 2070 FE6=0;VARTEKST$=BLANK$ 2080 CURSOR 3,LINIE 2090 PRINT USING "###":AVALIN; 2100 PRINT BLANK$(1:55) 2110 REPEAT 2120 EXEC INDPUT1(8,LINIE,-1,1000000,BLANK$(1)) 2130 UNTIL NOT (P=3 AND AVALIN=1) 2140 VARENR=P 2150 IF VARENR<>0 THEN 2160 CURSOR 8,LINIE 2170 IF VARENR<5 THEN 2180 PRINT BLANK$(1:25) 2190 ELSE 2200 PRINT USING "####### ":VARENR 2210 ENDIF 2220 CASE VARENR OF 2230 EXEC FINDPOST1(VTAB1,VTAB,MVANTAL,VARENR,VPIL3,K3$) 2240 IF CEKS<>0 THEN 2250 CURSOR 17,LINIE 2260 INPUT "Varenummeret eksisterer ikke. Tast RETURN.",SVAR1$ 2270 LINIE=LINIE-1;AVALIN=AVALIN-1 2280 ELSE 2290 EXEC INDPUT2(17,LINIE,BLANK$(1),ANTAL$) 2300 EXEC CA(4,ANTAL$,TAH$,TAH$) 2310 IF SI=0 THEN FE6=1 2320 IF FE6=0 THEN 2330 CURSOR 17,LINIE 2340 EXEC ANT 2350 CURSOR 1,23 2360 EXEC HENTVPOST 2370 CURSOR 23,LINIE 2380 IF ORD(VARTEKST$(1))=255 THEN 2390 INPUT " ",VARTEKST$ 2400 ARRKODER(AVALIN,2)=1 2410 ENDIF 2420 CURSOR 24,LINIE 2430 PRINT VARTEKST$(1:25);BLANK$(1:25) 2440 EXEC CA(4,VARPRIS$,TAH$,TAH$) 2450 IF SI=0 THEN 2460 EXEC INDPUT2(50,LINIE,BLANK$(1),VARPRIS$) 2470 ARRKODER(AVALIN,1)=1 2480 ENDIF 2490 CURSOR 51,LINIE 2500 EXEC TUD(VARPRIS$,TAL4$,1,0) 2510 EXEC CA(2,VARPRIS$,ANTAL$,BELØB$) 2520 CURSOR 66,LINIE 2530 EXEC TUD(BELØB$,TAL4$,1,0) 2540 EXEC CA(0,BELØB$,TOTAL$,TOTAL$) 2550 VANRARR(AVALIN)=VARENR;VATEKARR$(AVALIN)=VARTEKST$ 2560 VAPRIARR$(AVALIN)=VARPRIS$;VAANTARR$(AVALIN)=ANTAL$ 2570 BELØBARR$(AVALIN)=BELØB$ 2580 ENDIF 2590 ENDIF 2600 WHEN 1,2 2610 VARTEKST$=BLANK$(1:50) 2620 IF VARENR=2 THEN 2630 CURSOR 16,LINIE 2640 ELSE 2650 CURSOR 23,LINIE 2660 ENDIF 2670 INPUT " ",VARTEKST$ 2680 L2=LEN(VARTEKST$) 2690 IF L2=0 THEN FE6=1 2700 IF L2>0 THEN 2710 IF VARENR=2 THEN 2720 CURSOR 17,LINIE 2730 PRINT VARTEKST$;BLANK$(1:12) 2740 ELSE 2750 CURSOR 24,LINIE 2760 PRINT VARTEKST$(1:25);BLANK$(1:25) 2770 ENDIF 2780 IF VARENR=1 THEN 2790 EXEC INDPUT2(65,LINIE,BLANK$(1),BELØB$) 2800 EXEC CA(0,BELØB$,TOTAL$,TOTAL$) 2810 CURSOR 66,LINIE 2820 EXEC TUD(BELØB$,TAL4$,1,0) 2830 BELØBARR$(AVALIN)=BELØB$ 2840 ELSE 2850 BELØBARR$(AVALIN)="0+" 2860 ENDIF 2870 VANRARR(AVALIN)=VARENR;VATEKARR$(AVALIN)=VARTEKST$ 2880 ENDIF 2890 WHEN 3 2900 IF VANRARR(AVALIN-1)<>3 THEN 2910 EXEC INDPUT2(24,LINIE,LTX1$,VARPRIS$) 2920 EXEC CA(4,VARPRIS$,TAH$,TAH$) 2930 IF SI=0 THEN FE6=1 2940 IF FE6=0 THEN 2950 CURSOR 30,LINIE 2960 PRINT VARPRIS$(7:5);" %";BLANK$(1:25) 2970 EXEC CA(2,VARPRIS$,BELØBARR$(AVALIN-1),BELØB$) 2980 VATEKARR$(AVALIN)="Rabat "+VARPRIS$(7:5)+" %" 2990 VANRARR(AVALIN)=VARENR;VARPRIS$="100-" 3000 EXEC CA(3,BELØB$,VARPRIS$,BELØB$) 3010 CURSOR 66,LINIE 3020 EXEC TUD(BELØB$,TAL4$,1,0) 3030 BELØBARR$(AVALIN)=BELØB$ 3040 EXEC CA(0,BELØB$,TOTAL$,TOTAL$) 3050 ENDIF 3060 ELSE 3070 LINIE=LINIE-1;AVALIN=AVALIN-1 3080 ENDIF 3090 WHEN 4 3100 CURSOR 24,LINIE 3110 VARTEKST$="Subtotal " 3120 PRINT VARTEKST$ 3130 CURSOR 66,LINIE 3140 EXEC TUD(TOTAL$,TAL4$,1,0) 3150 VANRARR(AVALIN)=VARENR;VATEKARR$(AVALIN)=VARTEKST$ 3160 BELØBARR$(AVALIN)=TOTAL$ 3170 ENDCASE 3180 ELSE 3190 VARENR=0 3200 CURSOR 2,LINIE 3210 PRINT BLANK$(1:25) 3220 ENDIF 3230 UNTIL FE6=0 3240 ENDPROC 3250 PROC LINITEST 3260 IF LINIE>23 THEN 3270 EXEC FAKHOVED 3280 J=AVALIN-1 3290 EXEC VARLINUD(J) 3300 LINIE=LINIE+1 3310 ENDIF 3320 ENDPROC 3330 PROC VARLINUD(LIN) 3340 CURSOR 3,LINIE 3350 PRINT USING "###":LIN 3360 IF VANRARR(LIN)>4 THEN 3370 CURSOR 8,LINIE 3380 PRINT USING "#######":VANRARR(LIN) 3390 CURSOR 17,LINIE 3400 IF VAANTARR$(LIN,6:2)="00" THEN 3410 PRINT VAANTARR$(LIN,1:4);" " 3420 ELSE 3430 PRINT VAANTARR$(LIN) 3440 ENDIF 3450 ENDIF 3460 IF VANRARR(LIN)=2 THEN 3470 CURSOR 17,LINIE 3480 ELSE 3490 CURSOR 24,LINIE 3500 ENDIF 3510 PRINT VATEKARR$(LIN) 3520 IF VANRARR(LIN)>4 THEN 3530 CURSOR 51,LINIE 3540 B$=VAPRIARR$(LIN) 3550 EXEC TUD(B$,TAL4$,1,0) 3560 ENDIF 3570 CURSOR 66,LINIE 3580 B$=BELØBARR$(LIN) 3590 IF VANRARR(LIN)<>2 THEN EXEC TUD(B$,TAL4$,1,0) 3600 ENDPROC 3610 PROC FAKTBUND 3620 GTOTAL$=TOTAL$ 3630 REPEAT 3640 EXEC SLET 3650 CURSOR 22,19 3660 PRINT "Forsendelse Netto" 3670 CURSOR 56,19 3680 PRINT "Moms Total" 3690 EXEC INDPUT2(20,21,BLANK$(1),FORS$) 3700 CURSOR 21,21 3710 EXEC TUD(FORS$,TAL4$,1,0) 3720 CURSOR 36,21 3730 EXEC CA(0,FORS$,TOTAL$,TOTAL$) 3740 EXEC TUD(TOTAL$,TAL4$,1,0) 3750 IF DEBLK$="0" THEN 3760 EXEC CA(2,TOTAL$,MOMS$,FTOTAL$) 3770 ANTAL$="100+" 3780 EXEC CA(3,FTOTAL$,ANTAL$,ANTAL$) 3790 CURSOR 51,21 3800 EXEC TUD(ANTAL$,TAL4$,1,0) 3810 EXEC CA(0,ANTAL$,TOTAL$,FTOTAL$) 3820 ELSE 3830 FTOTAL$=TOTAL$ 3840 ENDIF 3850 CURSOR 66,21 3860 EXEC TUD(FTOTAL$,TAL4$,1,0) 3870 TOTAL$=GTOTAL$ 3880 EXEC INDPUT1(9,23,-9,-6,LTX2$) 3890 UNTIL P=-7 3900 ENDPROC 3910 PROC SLET 3920 CURSOR 2,19 3930 PRINT BLANK$ 3940 CURSOR 2,21 3950 PRINT BLANK$ 3960 CURSOR 2,23 3970 PRINT BLANK$ 3980 ENDPROC 3990 PROC LUD 4000 CLEAR 4010 EXEC FAKHOVED 4020 FOR LINIE=5 TO 16 4030 EXEC VARLINUD(STARTL) 4040 STARTL=STARTL+1 4050 IF STARTL>SLUTL THEN EXIT 4060 NEXT LINIE 4070 ENDPROC 4080 PROC AJOUR 4090 TOTAL$="0+" 4100 FOR M=1 TO AVALIN 4110 CASE VANRARR(M) OF 4120 EXEC CA(0,TOTAL$,BELØBARR$(M),TOTAL$) 4130 WHEN 2 4140 WHEN 4 4150 BELØBARR$(M)=TOTAL$ 4160 WHEN 3 4170 VARPRIS$=" ,"+VATEKARR$(M,7:2)+VATEKARR$(M,10:2)+"-" 4180 IF VARPRIS$(8)=" " THEN VARPRIS$(8)="0" 4190 IF VARPRIS$(9)=" " THEN VARPRIS$(9)="0" 4200 EXEC CA(2,BELØBARR$(M-1),VARPRIS$,TAL1$) 4210 BELØBARR$(M)=TAL1$ 4220 EXEC CA(0,TOTAL$,TAL1$,TOTAL$) 4230 ENDCASE 4240 NEXT M 4250 ENDPROC 4260 PROC FAKTGEM 4270 I=APOSTER+1 4280 IF FAKKRE$="F" THEN 4290 AFAKT=AFAKT+1 4300 ELSE 4310 AKRED=AKRED+1 4320 ENDIF 4330 OPEN K6$,W 4340 EXEC FE(3,1,K6$) 4350 PUT K6$,I:KUNDENR,ORDREDAT,FAKKRE$,DIVD 4360 EXEC FE(3,2,K6$) 4370 I=I+2 4380 IF DIVD=1 THEN 4390 PUT K6$,I:DEBNAVN$(1:13) 4400 EXEC FE(3,3,K6$) 4410 PUT K6$,I+1:DEBNAVN$(14:12) 4420 EXEC FE(3,4,K6$) 4430 PUT K6$,I+2:DEBGADE$(1:13) 4440 EXEC FE(3,5,K6$) 4450 PUT K6$,I+3:DEBGADE$(14:12) 4460 EXEC FE(3,6,K6$) 4470 PUT K6$,I+4:DEBPOSTNR,DEBBY$(1:9) 4480 EXEC FE(3,7,K6$) 4490 PUT K6$,I+5:DEBBY$(10:11) 4500 EXEC FE(3,8,K6$) 4510 I=I+6 4520 ENDIF 4530 IF LEVKODE=0 THEN 4540 FOR J=I TO I+3 4550 PUT K6$,J:LEVTEKST$((J-I)*13+1:13) 4560 EXEC FE(3,8,K6$) 4570 NEXT J 4580 I=I+4 4590 ENDIF 4600 EXEC KODE(1) 4610 KOD1$=KOD$ 4620 FOR LINIE=1 TO AVALIN 4630 J=LINIE+1 4640 EXEC KODE(J) 4650 CASE KOD1$ OF 4660 STOP 4670 WHEN "A" 4680 EXEC VALINGEM 4690 WHEN "B" 4700 VATEKARR$(LINIE,13)=KOD$ 4710 PUT K6$,I:VATEKARR$(LINIE,1:13) 4720 EXEC FE(3,9,K6$) 4730 I=I+1 4740 WHEN "C" 4750 EXEC ELØBGEM(BELØBARR$(LINIE)) 4760 WHEN "D" 4770 EXEC TEKSTGEM 4780 WHEN "E" 4790 EXEC TEKSTGEM 4800 EXEC ELØBGEM(BELØBARR$(LINIE)) 4810 WHEN "F" 4820 EXEC VALINGEM 4830 EXEC ELØBGEM(VAPRIARR$(LINIE)) 4840 WHEN "G","H" 4850 EXEC TEKSTGEM 4860 EXEC VALINGEM 4870 IF KOD1$="H" THEN 4880 EXEC ELØBGEM(VAPRIARR$(LINIE)) 4890 ENDIF 4900 ENDCASE 4910 KOD1$=KOD$ 4920 NEXT LINIE 4930 EXEC ELØBGEM(FORS$) 4940 IF DEBLK$="0" THEN 4950 EXEC ELØBGEM(MOMS$) 4960 ELSE 4970 EXEC ELØBGEM(TAH$) 4980 ENDIF 4990 EXEC ELØBGEM(FTOTAL$) 5000 I=I-1 5010 EXEC KODE(1) 5020 IF LEVKODE=11 THEN KOD$=CHR(11+ORD(KOD$)) 5030 PUT K6$,APOSTER+2:ORDRENR,FDATO,I-APOSTER,KOD$ 5040 EXEC FE(3,10,K6$) 5050 APOSTER=I 5060 CLOSE K6$ 5070 EXEC FE(3,11,K6$) 5080 ENDPROC 5090 PROC TEKSTGEM 5100 PUT K6$,I:VATEKARR$(LINIE,1:13) 5110 EXEC FE(4,1,K6$) 5120 TAL4$=VATEKARR$(LINIE,14:12)+KOD$;I=I+2 5130 PUT K6$,I-1:TAL4$(1:13) 5140 EXEC FE(4,2,K6$) 5145 LE=LEN(VATEKARR$(LINIE)) 5150 IF VANRARR(LINIE)=2 AND LE>24 THEN 5160 PUT K6$,I:VATEKARR$(LINIE,26:13) 5170 EXEC FE(99,1,K6$) 5180 I=I+2 5190 PUT K6$,I-1:VATEKARR$(LINIE,39:12) 5200 EXEC FE(99,2,K6$) 5210 ENDIF 5220 ENDPROC 5230 PROC ELØBGEM(BEL) 5240 TAL4$=BEL$+KOD$;I=I+1 5250 PUT K6$,I-1:TAL4$(1:13) 5260 EXEC FE(5,1,K6$) 5270 ENDPROC 5280 PROC VALINGEM 5290 PUT K6$,I:VANRARR(LINIE),VAANTARR$(LINIE),KOD$ 5300 EXEC FE(6,1,K6$) 5310 I=I+1 5320 ENDPROC 5330 PROC KODE(LI) 5340 IF ARRKODER(LI,1)=0 AND ARRKODER(LI,2)=0 THEN 5350 CASE VANRARR(LI) OF 5360 KOD$="A" 5370 WHEN 3 5380 KOD$="B" 5390 WHEN 4 5400 KOD$="C" 5410 WHEN 2 5420 KOD$="D" 5430 WHEN 1 5440 KOD$="E" 5450 ENDCASE 5460 ELSE 5470 IF ARRKODER(LI,1)=0 THEN 5480 KOD$="G" 5490 ELSE 5500 IF ARRKODER(LI,2)=0 THEN 5510 KOD$="F" 5520 ELSE 5530 KOD$="H" 5540 ENDIF 5550 ENDIF 5560 ENDIF 5570 ENDPROC 5580 PROC SYSGEM 5590 T1(1)=FAKTNR;T1(2)=KREDNR;T2(4)=APOSTER;T2(5)=AKRED;T2(6)=AFAKT 5600 T2(7)=AVKONTI;T2(8)=FJPOST 5610 OPEN K7$,W 5620 EXEC FE(9,1,K7$) 5630 PUT K7$,2:T1(1),T1(2),T1(3),T1(4),T1(5),T1(6),T1(7),T1(8),T1(9) 5640 EXEC FE(9,2,K7$) 5650 PUT K7$,12:T2(1),T2(2),T2(3),T2(4),T2(5),T2(6),T2(7),T2(8),T2(9) 5660 EXEC FE(9,3,K7$) 5670 CLOSE K7$ 5680 EXEC FE(9,4,K7$) 5690 ENDPROC 5700 K1$="P641220:SYSTEM1" 5710 OPEN K1$,R 5720 EXEC FE(9,1,K1$) 5730 GET K1$,1:MFANTAL,MDANTAL,MKANTAL,MVANTAL 5740 EXEC FE(9,2,K1$) 5750 GET K1$,4:KPOST,MFAK,MVGR,MKGR 5760 EXEC FE(9,3,K1$) 5770 GET K1$,5:MKRGR,MFKL 5780 EXEC FE(9,25,K1$) 5790 GET K1$,8:DIVNR,DIVDNR,DIFNR,DTAL 5800 EXEC FE(9,4,K1$) 5810 GET K1$,10:N$ 5820 EXEC FE(9,5,K1$) 5830 GET K1$,12:K2$ 5840 EXEC FE(9,6,K1$) 5850 GET K1$,14:K3$ 5860 EXEC FE(9,7,K1$) 5870 GET K1$,16:K4$ 5880 EXEC FE(9,8,K1$) 5890 GET K1$,18:K5$ 5900 EXEC FE(9,9,K1$) 5910 GET K1$,29:K6$ 5920 EXEC FE(9,10,K1$) 5930 GET K1$,36:K7$ 5940 EXEC FE(9,11,K1$) 5950 CLOSE K1$ 5960 EXEC FE(9,12,K1$) 5970 DIM VAANTARR$(MFKL,7),ARRKODER(1+MFKL,2),VANRARR(MFKL) 5980 DIM VATEKARR$(MFKL,50),VAPRIARR$(MFKL,12),BELØBARR$(MFKL,12) 5990 DIM VTAB1(MVANTAL DIV 4),DTAB1(MDANTAL DIV 4),VTAB(4,2),DTAB(4,2) 6000 K2$=N$+K2$;K3$=N$+K3$;K4$=N$+K4$;K5$=N$+K5$;K6$=N$+K6$;K7$=N$+K7$ 6010 OPEN K7$,R 6020 EXEC FE(9,13,K7$) 6030 GET K7$,1:MOMS$ 6040 EXEC FE(9,14,K7$) 6050 GET K7$,2:T1(1),T1(2),T1(3),T1(4),T1(5),T1(6),T1(7),T1(8),T1(9) 6060 EXEC FE(9,15,K7$) 6070 FOR I=1 TO 3 6080 H=(I-1)*3+1 6090 GET K7$,I+2:LAND$(H),LAND$(H+1),LAND$(H+2) 6100 EXEC FE(9,16,K7$) 6110 NEXT I 6120 GET K7$,12:T2(1),T2(2),T2(3),T2(4),T2(5),T2(6),T2(7),T2(8),T2(9) 6130 EXEC FE(9,17,K7$) 6140 CLOSE K7$ 6150 EXEC FE(9,18,K7$) 6160 OPEN K2$,R 6170 EXEC FE(9,19,K2$) 6180 OPEN K3$,R 6190 EXEC FE(9,20,K3$) 6200 EXEC INDTAB1(VTAB1,MVANTAL,K3$) 6210 EXEC INDTAB1(DTAB1,MDANTAL,K2$) 6220 CLOSE 6230 REPEAT 6240 OPEN K2$,R 6250 EXEC FE(9,19,K2$) 6260 OPEN K3$,R 6270 EXEC FE(9,20,K3$) 6280 OPEN K4$,R 6290 EXEC FE(9,21,K4$) 6300 OPEN K5$,R 6310 EXEC FE(9,22,K5$) 6320 FAKTNR=T1(1);KREDNR=T1(2);DATO=T1(7);APOSTER=T2(4) 6330 AKRED=T2(5);AFAKT=T2(6);AVKONTI=T2(7);FJPOST=T2(8) 6340 TOTAL$="0+";AVALIN=1 6350 REPEAT 6360 REPEAT 6370 REPEAT 6380 CLEAR 6390 REPEAT 6400 EXEC INDPUT1(9,1,-1,100000,LTX3$) 6410 UNTIL KTAL=DTAL OR P=0 6420 KUNDENR=P 6430 IF KUNDENR=0 THEN EXIT 6440 CURSOR 56,1 6450 PRINT USING "####### ":KUNDENR 6460 IF KUNDENR<>DIVDNR THEN 6470 DIVD=0 6480 EXEC FINDPOST1(DTAB1,DTAB,MDANTAL,KUNDENR,DPIL3,K2$) 6490 IF CEKS=1 THEN 6500 CURSOR 9,3 6510 INPUT "Kunden eksisterer ikke. Tast RETURN.",SVAR1$ 6520 ELSE 6530 EXEC HENTDPOST 6540 ENDIF 6550 ELSE 6560 DIVD=1;CEKS=0 6570 EXEC FINDPOST1(DTAB1,DTAB,MDANTAL,DIVDNR,DPIL3,K2$) 6580 IF CEKS=1 THEN STOP 6590 EXEC HENTDPOST 6600 CURSOR 34,5 6610 PRINT "Navn." 6620 CURSOR 8,5 6630 INPUT " ",DEBNAVN$ 6640 CURSOR 9,5 6650 PRINT DEBNAVN$;BLANK$(1:25) 6660 CURSOR 34,6 6670 PRINT "Gade." 6680 CURSOR 8,6 6690 INPUT " ",DEBGADE$ 6700 CURSOR 9,6 6710 PRINT DEBGADE$;BLANK$(1:25) 6720 CURSOR 13,7 6730 PRINT "Postnummer." 6740 REPEAT 6750 CURSOR 8,7 6760 INPUT " ",TAL1$ 6770 EXEC NRTEST(TAL1$) 6780 UNTIL TEST2=0 AND P>999 6790 DEBPOSTNR=P 6800 CURSOR 13,7 6810 PRINT BLANK$(1:25);TAB(22);"By." 6820 CURSOR 13,7 6830 INPUT " ",DEBBY$ 6840 CURSOR 34,7 6850 PRINT BLANK$(1:25) 6860 ENDIF 6870 UNTIL CEKS=0 6880 IF KUNDENR=0 THEN EXIT 6890 EXEC KUNDEUD(1) 6900 EXEC INDPUT1(9,21,-9,-6,LTX4$) 6910 UNTIL P=-7 6920 IF KUNDENR=0 THEN EXIT 6930 IF APOSTER>(MFKL+5)*MFAK+2*MFKL-15 OR FJPOST+AFAKT+AKRED=>MFAK THEN 6940 EXEC INDPUT1(9,23,-2,0,LTX7$) 6950 ELSE 6960 REPEAT 6970 CURSOR 9,23 6980 INPUT "Faktura/kreditnota (F/K):",FAKKRE$ 6990 UNTIL FAKKRE$="F" OR FAKKRE$="K" OR FAKKRE$="f" OR FAKKRE$="k" 7000 IF FAKKRE$="f" THEN FAKKRE$="F" 7010 IF FAKKRE$="k" THEN FAKKRE$="K" 7020 CLEAR 7030 EXEC KUNDEUD(2) 7040 CURSOR 50,4 7050 IF FAKKRE$="F" THEN 7060 PRINT USING "Fakturanr.: #######":FAKTNR+AFAKT 7070 ELSE 7080 PRINT USING "Kreditnotanr.: #######":KREDNR+AKRED 7090 ENDIF 7100 CURSOR 50,6 7110 PRINT USING "Kundenr.: #######":KUNDENR 7120 CURSOR 50,8 7130 PRINT "Ordredato:" 7140 LINIE=8 7150 EXEC DATOINDT 7160 ORDREDAT=DAT 7170 EXEC INDPUT1(50,10,0,1000000,LTX5$) 7180 ORDRENR=P 7190 CURSOR 66,10 7200 PRINT USING "####### ":ORDRENR 7210 CURSOR 50,12 7220 PRINT "Dato:" 7230 LINIE=12 7240 EXEC DATOINDT 7250 FDATO=DAT 7260 CURSOR 9,14 7270 INPUT "Levering: ",LEVTEKST$ 7280 LEVKODE=0 7290 IF LEN(LEVTEKST$)=0 THEN LEVKODE=11 7300 EXEC INDPUT1(9,17,-9,-6,LTX6$) 7310 ENDIF 7320 UNTIL P=-7 7330 IF KUNDENR=0 THEN EXIT 7340 IF APOSTER<=(MFKL+5)*MFAK+2*MFKL-15 AND FJPOST+AFAKT+AKRED<=MFAK THEN 7350 EXEC FAKHOVED 7360 AVALIN=1 7370 REPEAT 7380 ARRKODER(AVALIN,1)=0;ARRKODER(AVALIN,2)=0 7390 EXEC VARELINI 7400 IF VARENR=0 THEN EXIT 7410 AVALIN=AVALIN+1;LINIE=LINIE+1 7420 EXEC LINITEST 7430 UNTIL VARENR=0 OR AVALIN>MFKL 7440 AVALIN=AVALIN-1 7450 IF AVALIN>0 THEN 7460 IF LINIE>16 THEN 7470 EXEC FAKHOVED 7480 FOR LINIE=5 TO 16 7490 J=AVALIN+LINIE-16 7500 EXEC VARLINUD(J) 7510 NEXT LINIE 7520 ENDIF 7530 REPEAT 7540 CURSOR 2,19 7550 PRINT "1:Ændring. 2:Sletning. 3:Udskrift. 4:Ny linie. 5:Afslutning."; 7560 PRINT "6:Annulering." 7570 EXEC INDPUT1(4,21,0,7,LTX8$) 7580 SVAR1$=A$ 7590 CASE SVAR1$ OF 7600 WHEN "1" 7610 EXEC INDPUT1(4,23,0,1+AVALIN,LTX9$) 7620 J=P 7630 CURSOR 4,19 7640 LINIE=19 7650 EXEC SLET 7660 EXEC VARLINUD(J) 7670 CASE VANRARR(J) OF 7680 EXEC INDPUT2(17,21,BLANK$(1),ANTAL$) 7690 CURSOR 17,21 7700 EXEC ANT 7710 CURSOR 24,21 7720 PRINT VATEKARR$(J) 7730 CURSOR 51,21 7740 VARPRIS$=VAPRIARR$(J) 7750 EXEC TUD(VARPRIS$,TAL4$,1,0) 7760 EXEC CA(2,VARPRIS$,ANTAL$,BELØB$) 7770 CURSOR 66,21 7780 EXEC TUD(BELØB$,TAL4$,1,0) 7790 IF BELØB$<>BELØBARR$(J) THEN 7800 CURSOR 1,23 7810 VAANTARR$(J)=ANTAL$;BELØBARR$(J)=BELØB$ 7820 EXEC AJOUR 7830 ENDIF 7840 WHEN 1,2 7850 VARTEKST$=BLANK$;M=J 7860 IF VANRARR(J)=2 THEN 7870 CURSOR 16,21 7880 ELSE 7890 CURSOR 23,21 7900 ENDIF 7910 INPUT " ",VARTEKST$ 7920 IF LEN(VARTEKST$)>0 THEN VATEKARR$(M)=VARTEKST$ 7930 IF VANRARR(J)=2 THEN 7940 CURSOR 17,21 7950 PRINT VATEKARR$(M);BLANK$(1:12) 7960 ELSE 7970 CURSOR 24,21 7980 PRINT VATEKARR$(M,1:25);BLANK$(1:25) 7990 ENDIF 8000 IF VANRARR(M)=1 THEN 8010 EXEC INDPUT2(65,21,BLANK$(1),BELØB$) 8020 EXEC CA(4,BELØB$,TAH$,TAH$) 8030 IF SI=0 THEN 8040 BELØB$=BELØBARR$(M) 8050 ELSE 8060 BELØBARR$(M)=BELØB$ 8070 EXEC AJOUR 8080 ENDIF 8090 CURSOR 66,21 8100 EXEC TUD(BELØB$,TAL4$,1,0) 8110 ENDIF 8120 WHEN 3 8130 M=J 8140 EXEC INDPUT2(24,21,LTX1$,VARPRIS$) 8150 CURSOR 30,21 8160 PRINT VARPRIS$(7:5);" %";BLANK$(1:25) 8170 EXEC CA(2,VARPRIS$,BELØBARR$(M-1),BELØB$) 8180 VATEKARR$(M,7:5)=VARPRIS$(7:5) 8190 VARPRIS$="100-" 8200 EXEC CA(3,BELØB$,VARPRIS$,BELØB$) 8210 CURSOR 66,21 8220 EXEC TUD(BELØB$,TAL4$,1,0) 8230 BELØBARR$(M)=BELØB$ 8240 EXEC AJOUR 8250 WHEN 4 8260 CURSOR 17,21 8270 INPUT "Linien er en subtotal og kan ikke rettes. Tast RETURN.",SVAR2$ 8280 ENDCASE 8290 WHEN "2" 8300 EXEC INDPUT1(4,23,0,1+AVALIN,LTX10$) 8310 J=P 8320 CURSOR 4,19 8330 LINIE=19 8340 EXEC SLET 8350 EXEC VARLINUD(J) 8360 IF J<AVALIN THEN 8370 VARENR=VANRARR(J+1) 8380 ELSE 8390 VARENR=0 8400 ENDIF 8410 EXEC INDPUT1(4,21,-9,-6,LTX11$) 8420 IF P=-7 AND VARENR<>3 THEN 8430 AVALIN=AVALIN-1 8440 FOR M=J TO AVALIN 8450 VANRARR(M)=VANRARR(M+1);VAANTARR$(M)=VAANTARR$(M+1) 8460 VATEKARR$(M)=VATEKARR$(M+1);VAPRIARR$(M)=VAPRIARR$(M+1) 8470 BELØBARR$(M)=BELØBARR$(M+1) 8480 ARRKODER(M,1)=ARRKODER(M+1,1);ARRKODER(M,2)=ARRKODER(M+1,2) 8490 NEXT M 8500 ARRKODER(1+AVALIN,1)=0;ARRKODER(1+AVALIN,2)=0 8510 EXEC AJOUR 8520 ENDIF 8530 WHEN "3" 8540 EXEC INDPUT1(4,23,0,1+AVALIN,LTX12$) 8550 J=P 8560 EXEC SLET 8570 STARTL=J 8580 IF AVALIN-J<12 THEN 8590 SLUTL=AVALIN 8600 ELSE 8610 SLUTL=J+11 8620 ENDIF 8630 EXEC LUD 8640 WHEN "4" 8650 IF AVALIN<MFKL THEN 8660 LINIE=19;AVALIN=AVALIN+1 8670 EXEC INDPUT1(4,23,0,1+AVALIN,LTX13$) 8680 EXEC SLET 8690 FOR M=AVALIN TO P+1 STEP -1 8700 VANRARR(M)=VANRARR(M-1);VAANTARR$(M)=VAANTARR$(M-1) 8710 VATEKARR$(M)=VATEKARR$(M-1);VAPRIARR$(M)=VAPRIARR$(M-1) 8720 BELØBARR$(M)=BELØBARR$(M-1) 8730 ARRKODER(M,1)=ARRKODER(M-1,1);ARRKODER(M,2)=ARRKODER(M-1,2) 8740 NEXT M 8750 EXEC SLET 8760 GAVALIN=AVALIN;AVALIN=P;M=P 8770 ARRKODER(AVALIN,1)=0;ARRKODER(AVALIN,2)=0 8780 REPEAT 8790 EXEC VARELINI 8800 IF CEKS=1 THEN AVALIN=AVALIN+1;LINIE=LINIE+1 8810 UNTIL VARENR<>0 AND CEKS=0 8820 AVALIN=GAVALIN 8830 EXEC AJOUR 8840 ENDIF 8850 ENDCASE 8860 IF SVAR1$<>"3" AND SVAR1$<>"5" AND SVAR1$<>"6" THEN 8870 IF AVALIN<=12 THEN 8880 STARTL=1;SLUTL=AVALIN 8890 ELSE 8900 IF J<7 THEN 8910 STARTL=1;SLUTL=12 8920 ELSE 8930 IF AVALIN-J<7 THEN 8940 STARTL=AVALIN-12;SLUTL=AVALIN 8950 ELSE 8960 STARTL=J-5;SLUTL=J+6 8970 ENDIF 8980 ENDIF 8990 ENDIF 9000 EXEC LUD 9010 ENDIF 9020 UNTIL SVAR1$="5" OR SVAR1$="6" 9030 CLOSE 9040 IF SVAR1$="5" THEN 9050 EXEC FAKTBUND 9060 CURSOR 9,23 9070 PRINT "Maskinen overfører faktura til fakturaregisteret." 9080 EXEC FAKTGEM 9090 EXEC SYSGEM 9100 ENDIF 9110 ENDIF 9120 ENDIF 9130 CLOSE 9140 UNTIL KUNDENR=0 9150 CLEAR 9160 CHAIN "P641210:OPSTART"
0x0000…0070 (0,) 8dc7 0100 DIM OP1$(12),OP2$(12),RES$(15),BLB2$(12),T2(9),K2$(17),K3$(17),K4$(17)
0x0000…0070 LineComalBin {
0x0000…0070 ptr = 0x8dc7 // 0x0 @0x0
0x0000…0070 lno = 0x0064 // 0x2 @0x2
0x0000…0070 at0004 = ╱87╱ DIM ╱ // 0x4 @0x4
0x0000…0070 at0005 = ╱4f╱O╱ // 0x5 @0x5
0x0000…0070 at0006 = ╱50╱P╱ // 0x6 @0x6
0x0000…0070 at0007 = ╱31╱1╱ // 0x7 @0x7
0x0000…0070 at0008 = ╱ef╱$╱ // 0x8 @0x8
0x0000…0070 at0009 = ╱ed╱(╱ // 0x9 @0x9
0x0000…0070 at000a = ╱31╱1╱ // 0xa @0xa
0x0000…0070 at000b = ╱32╱2╱ // 0xb @0xb
0x0000…0070 at000c = ╱fe0000c004╱ // 0xc @0xc
0x0000…0070 at0011 = ╱ee╱)╱ // 0x11 @0x11
0x0000…0070 at0012 = ╱ec╱,╱ // 0x12 @0x12
0x0000…0070 at0013 = ╱4f╱O╱ // 0x13 @0x13
0x0000…0070 at0014 = ╱50╱P╱ // 0x14 @0x14
0x0000…0070 at0015 = ╱32╱2╱ // 0x15 @0x15
0x0000…0070 at0016 = ╱ef╱$╱ // 0x16 @0x16
0x0000…0070 at0017 = ╱ed╱(╱ // 0x17 @0x17
0x0000…0070 at0018 = ╱31╱1╱ // 0x18 @0x18
0x0000…0070 at0019 = ╱32╱2╱ // 0x19 @0x19
0x0000…0070 at001a = ╱fe0000c004╱ // 0x1a @0x1a
0x0000…0070 at001f = ╱ee╱)╱ // 0x1f @0x1f
0x0000…0070 at0020 = ╱ec╱,╱ // 0x20 @0x20
0x0000…0070 at0021 = ╱52╱R╱ // 0x21 @0x21
0x0000…0070 at0022 = ╱45╱E╱ // 0x22 @0x22
0x0000…0070 at0023 = ╱53╱S╱ // 0x23 @0x23
0x0000…0070 at0024 = ╱ef╱$╱ // 0x24 @0x24
0x0000…0070 at0025 = ╱ed╱(╱ // 0x25 @0x25
0x0000…0070 at0026 = ╱31╱1╱ // 0x26 @0x26
0x0000…0070 at0027 = ╱35╱5╱ // 0x27 @0x27
0x0000…0070 at0028 = ╱fe0000f004╱ // 0x28 @0x28
0x0000…0070 at002d = ╱ee╱)╱ // 0x2d @0x2d
0x0000…0070 at002e = ╱ec╱,╱ // 0x2e @0x2e
0x0000…0070 at002f = ╱42╱B╱ // 0x2f @0x2f
0x0000…0070 at0030 = ╱4c╱L╱ // 0x30 @0x30
0x0000…0070 at0031 = ╱42╱B╱ // 0x31 @0x31
0x0000…0070 at0032 = ╱32╱2╱ // 0x32 @0x32
0x0000…0070 at0033 = ╱ef╱$╱ // 0x33 @0x33
0x0000…0070 at0034 = ╱ed╱(╱ // 0x34 @0x34
0x0000…0070 at0035 = ╱31╱1╱ // 0x35 @0x35
0x0000…0070 at0036 = ╱32╱2╱ // 0x36 @0x36
0x0000…0070 at0037 = ╱fe0000c004╱ // 0x37 @0x37
0x0000…0070 at003c = ╱ee╱)╱ // 0x3c @0x3c
0x0000…0070 at003d = ╱ec╱,╱ // 0x3d @0x3d
0x0000…0070 at003e = ╱54╱T╱ // 0x3e @0x3e
0x0000…0070 at003f = ╱32╱2╱ // 0x3f @0x3f
0x0000…0070 at0040 = ╱ed╱(╱ // 0x40 @0x40
0x0000…0070 at0041 = ╱39╱9╱ // 0x41 @0x41
0x0000…0070 at0042 = ╱fe00009004╱ // 0x42 @0x42
0x0000…0070 at0047 = ╱ee╱)╱ // 0x47 @0x47
0x0000…0070 at0048 = ╱ec╱,╱ // 0x48 @0x48
0x0000…0070 at0049 = ╱4b╱K╱ // 0x49 @0x49
0x0000…0070 at004a = ╱32╱2╱ // 0x4a @0x4a
0x0000…0070 at004b = ╱ef╱$╱ // 0x4b @0x4b
0x0000…0070 at004c = ╱ed╱(╱ // 0x4c @0x4c
0x0000…0070 at004d = ╱31╱1╱ // 0x4d @0x4d
0x0000…0070 at004e = ╱37╱7╱ // 0x4e @0x4e
0x0000…0070 at004f = ╱fe00008805╱ // 0x4f @0x4f
0x0000…0070 at0054 = ╱ee╱)╱ // 0x54 @0x54
0x0000…0070 at0055 = ╱ec╱,╱ // 0x55 @0x55
0x0000…0070 at0056 = ╱4b╱K╱ // 0x56 @0x56
0x0000…0070 at0057 = ╱33╱3╱ // 0x57 @0x57
0x0000…0070 at0058 = ╱ef╱$╱ // 0x58 @0x58
0x0000…0070 at0059 = ╱ed╱(╱ // 0x59 @0x59
0x0000…0070 at005a = ╱31╱1╱ // 0x5a @0x5a
0x0000…0070 at005b = ╱37╱7╱ // 0x5b @0x5b
0x0000…0070 at005c = ╱fe00008805╱ // 0x5c @0x5c
0x0000…0070 at0061 = ╱ee╱)╱ // 0x61 @0x61
0x0000…0070 at0062 = ╱ec╱,╱ // 0x62 @0x62
0x0000…0070 at0063 = ╱4b╱K╱ // 0x63 @0x63
0x0000…0070 at0064 = ╱34╱4╱ // 0x64 @0x64
0x0000…0070 at0065 = ╱ef╱$╱ // 0x65 @0x65
0x0000…0070 at0066 = ╱ed╱(╱ // 0x66 @0x66
0x0000…0070 at0067 = ╱31╱1╱ // 0x67 @0x67
0x0000…0070 at0068 = ╱37╱7╱ // 0x68 @0x68
0x0000…0070 at0069 = ╱fe00008805╱ // 0x69 @0x69
0x0000…0070 at006e = ╱ee╱)╱ // 0x6e @0x6e
0x0000…0070 at006f = EOL // 0x6f @0x6f
0x0000…0070 }
0x0070…00db 8e32 0110 DIM K1$(17),N$(6),K6$(17),K5$(17),DEBNAVN$(25),DSALDO1$(12),DEBKGR$(2)
0x0070…00db LineComalBin {
0x0070…00db ptr = 0x8e32 // 0x70 @0x0
0x0070…00db lno = 0x006e // 0x72 @0x2
0x0070…00db at0004 = ╱87╱ DIM ╱ // 0x74 @0x4
0x0070…00db at0005 = ╱4b╱K╱ // 0x75 @0x5
0x0070…00db at0006 = ╱31╱1╱ // 0x76 @0x6
0x0070…00db at0007 = ╱ef╱$╱ // 0x77 @0x7
0x0070…00db at0008 = ╱ed╱(╱ // 0x78 @0x8
0x0070…00db at0009 = ╱31╱1╱ // 0x79 @0x9
0x0070…00db at000a = ╱37╱7╱ // 0x7a @0xa
0x0070…00db at000b = ╱fe00008805╱ // 0x7b @0xb
0x0070…00db at0010 = ╱ee╱)╱ // 0x80 @0x10
0x0070…00db at0011 = ╱ec╱,╱ // 0x81 @0x11
0x0070…00db at0012 = ╱4e╱N╱ // 0x82 @0x12
0x0070…00db at0013 = ╱ef╱$╱ // 0x83 @0x13
0x0070…00db at0014 = ╱ed╱(╱ // 0x84 @0x14
0x0070…00db at0015 = ╱36╱6╱ // 0x85 @0x15
0x0070…00db at0016 = ╱fe0000c003╱ // 0x86 @0x16
0x0070…00db at001b = ╱ee╱)╱ // 0x8b @0x1b
0x0070…00db at001c = ╱ec╱,╱ // 0x8c @0x1c
0x0070…00db at001d = ╱4b╱K╱ // 0x8d @0x1d
0x0070…00db at001e = ╱36╱6╱ // 0x8e @0x1e
0x0070…00db at001f = ╱ef╱$╱ // 0x8f @0x1f
0x0070…00db at0020 = ╱ed╱(╱ // 0x90 @0x20
0x0070…00db at0021 = ╱31╱1╱ // 0x91 @0x21
0x0070…00db at0022 = ╱37╱7╱ // 0x92 @0x22
0x0070…00db at0023 = ╱fe00008805╱ // 0x93 @0x23
0x0070…00db at0028 = ╱ee╱)╱ // 0x98 @0x28
0x0070…00db at0029 = ╱ec╱,╱ // 0x99 @0x29
0x0070…00db at002a = ╱4b╱K╱ // 0x9a @0x2a
0x0070…00db at002b = ╱35╱5╱ // 0x9b @0x2b
0x0070…00db at002c = ╱ef╱$╱ // 0x9c @0x2c
0x0070…00db at002d = ╱ed╱(╱ // 0x9d @0x2d
0x0070…00db at002e = ╱31╱1╱ // 0x9e @0x2e
0x0070…00db at002f = ╱37╱7╱ // 0x9f @0x2f
0x0070…00db at0030 = ╱fe00008805╱ // 0xa0 @0x30
0x0070…00db at0035 = ╱ee╱)╱ // 0xa5 @0x35
0x0070…00db at0036 = ╱ec╱,╱ // 0xa6 @0x36
0x0070…00db at0037 = ╱44╱D╱ // 0xa7 @0x37
0x0070…00db at0038 = ╱45╱E╱ // 0xa8 @0x38
0x0070…00db at0039 = ╱42╱B╱ // 0xa9 @0x39
0x0070…00db at003a = ╱4e╱N╱ // 0xaa @0x3a
0x0070…00db at003b = ╱41╱A╱ // 0xab @0x3b
0x0070…00db at003c = ╱56╱V╱ // 0xac @0x3c
0x0070…00db at003d = ╱4e╱N╱ // 0xad @0x3d
0x0070…00db at003e = ╱ef╱$╱ // 0xae @0x3e
0x0070…00db at003f = ╱ed╱(╱ // 0xaf @0x3f
0x0070…00db at0040 = ╱32╱2╱ // 0xb0 @0x40
0x0070…00db at0041 = ╱35╱5╱ // 0xb1 @0x41
0x0070…00db at0042 = ╱fe0000c805╱ // 0xb2 @0x42
0x0070…00db at0047 = ╱ee╱)╱ // 0xb7 @0x47
0x0070…00db at0048 = ╱ec╱,╱ // 0xb8 @0x48
0x0070…00db at0049 = ╱44╱D╱ // 0xb9 @0x49
0x0070…00db at004a = ╱53╱S╱ // 0xba @0x4a
0x0070…00db at004b = ╱41╱A╱ // 0xbb @0x4b
0x0070…00db at004c = ╱4c╱L╱ // 0xbc @0x4c
0x0070…00db at004d = ╱44╱D╱ // 0xbd @0x4d
0x0070…00db at004e = ╱4f╱O╱ // 0xbe @0x4e
0x0070…00db at004f = ╱31╱1╱ // 0xbf @0x4f
0x0070…00db at0050 = ╱ef╱$╱ // 0xc0 @0x50
0x0070…00db at0051 = ╱ed╱(╱ // 0xc1 @0x51
0x0070…00db at0052 = ╱31╱1╱ // 0xc2 @0x52
0x0070…00db at0053 = ╱32╱2╱ // 0xc3 @0x53
0x0070…00db at0054 = ╱fe0000c004╱ // 0xc4 @0x54
0x0070…00db at0059 = ╱ee╱)╱ // 0xc9 @0x59
0x0070…00db at005a = ╱ec╱,╱ // 0xca @0x5a
0x0070…00db at005b = ╱44╱D╱ // 0xcb @0x5b
0x0070…00db at005c = ╱45╱E╱ // 0xcc @0x5c
0x0070…00db at005d = ╱42╱B╱ // 0xcd @0x5d
0x0070…00db at005e = ╱4b╱K╱ // 0xce @0x5e
0x0070…00db at005f = ╱47╱G╱ // 0xcf @0x5f
0x0070…00db at0060 = ╱52╱R╱ // 0xd0 @0x60
0x0070…00db at0061 = ╱ef╱$╱ // 0xd1 @0x61
0x0070…00db at0062 = ╱ed╱(╱ // 0xd2 @0x62
0x0070…00db at0063 = ╱32╱2╱ // 0xd3 @0x63
0x0070…00db at0064 = ╱fe00008002╱ // 0xd4 @0x64
0x0070…00db at0069 = ╱ee╱)╱ // 0xd9 @0x69
0x0070…00db at006a = EOL // 0xda @0x6a
0x0070…00db }
0x00db…0137 8e8e 0120 DIM DSALDO2$(12),DSALDO3$(12),DSALDO4$(12),DEBLK$(2),DEBGADE$(25)
0x00db…0137 LineComalBin {
0x00db…0137 ptr = 0x8e8e // 0xdb @0x0
0x00db…0137 lno = 0x0078 // 0xdd @0x2
0x00db…0137 at0004 = ╱87╱ DIM ╱ // 0xdf @0x4
0x00db…0137 at0005 = ╱44╱D╱ // 0xe0 @0x5
0x00db…0137 at0006 = ╱53╱S╱ // 0xe1 @0x6
0x00db…0137 at0007 = ╱41╱A╱ // 0xe2 @0x7
0x00db…0137 at0008 = ╱4c╱L╱ // 0xe3 @0x8
0x00db…0137 at0009 = ╱44╱D╱ // 0xe4 @0x9
0x00db…0137 at000a = ╱4f╱O╱ // 0xe5 @0xa
0x00db…0137 at000b = ╱32╱2╱ // 0xe6 @0xb
0x00db…0137 at000c = ╱ef╱$╱ // 0xe7 @0xc
0x00db…0137 at000d = ╱ed╱(╱ // 0xe8 @0xd
0x00db…0137 at000e = ╱31╱1╱ // 0xe9 @0xe
0x00db…0137 at000f = ╱32╱2╱ // 0xea @0xf
0x00db…0137 at0010 = ╱fe0000c004╱ // 0xeb @0x10
0x00db…0137 at0015 = ╱ee╱)╱ // 0xf0 @0x15
0x00db…0137 at0016 = ╱ec╱,╱ // 0xf1 @0x16
0x00db…0137 at0017 = ╱44╱D╱ // 0xf2 @0x17
0x00db…0137 at0018 = ╱53╱S╱ // 0xf3 @0x18
0x00db…0137 at0019 = ╱41╱A╱ // 0xf4 @0x19
0x00db…0137 at001a = ╱4c╱L╱ // 0xf5 @0x1a
0x00db…0137 at001b = ╱44╱D╱ // 0xf6 @0x1b
0x00db…0137 at001c = ╱4f╱O╱ // 0xf7 @0x1c
0x00db…0137 at001d = ╱33╱3╱ // 0xf8 @0x1d
0x00db…0137 at001e = ╱ef╱$╱ // 0xf9 @0x1e
0x00db…0137 at001f = ╱ed╱(╱ // 0xfa @0x1f
0x00db…0137 at0020 = ╱31╱1╱ // 0xfb @0x20
0x00db…0137 at0021 = ╱32╱2╱ // 0xfc @0x21
0x00db…0137 at0022 = ╱fe0000c004╱ // 0xfd @0x22
0x00db…0137 at0027 = ╱ee╱)╱ // 0x102 @0x27
0x00db…0137 at0028 = ╱ec╱,╱ // 0x103 @0x28
0x00db…0137 at0029 = ╱44╱D╱ // 0x104 @0x29
0x00db…0137 at002a = ╱53╱S╱ // 0x105 @0x2a
0x00db…0137 at002b = ╱41╱A╱ // 0x106 @0x2b
0x00db…0137 at002c = ╱4c╱L╱ // 0x107 @0x2c
0x00db…0137 at002d = ╱44╱D╱ // 0x108 @0x2d
0x00db…0137 at002e = ╱4f╱O╱ // 0x109 @0x2e
0x00db…0137 at002f = ╱34╱4╱ // 0x10a @0x2f
0x00db…0137 at0030 = ╱ef╱$╱ // 0x10b @0x30
0x00db…0137 at0031 = ╱ed╱(╱ // 0x10c @0x31
0x00db…0137 at0032 = ╱31╱1╱ // 0x10d @0x32
0x00db…0137 at0033 = ╱32╱2╱ // 0x10e @0x33
0x00db…0137 at0034 = ╱fe0000c004╱ // 0x10f @0x34
0x00db…0137 at0039 = ╱ee╱)╱ // 0x114 @0x39
0x00db…0137 at003a = ╱ec╱,╱ // 0x115 @0x3a
0x00db…0137 at003b = ╱44╱D╱ // 0x116 @0x3b
0x00db…0137 at003c = ╱45╱E╱ // 0x117 @0x3c
0x00db…0137 at003d = ╱42╱B╱ // 0x118 @0x3d
0x00db…0137 at003e = ╱4c╱L╱ // 0x119 @0x3e
0x00db…0137 at003f = ╱4b╱K╱ // 0x11a @0x3f
0x00db…0137 at0040 = ╱ef╱$╱ // 0x11b @0x40
0x00db…0137 at0041 = ╱ed╱(╱ // 0x11c @0x41
0x00db…0137 at0042 = ╱32╱2╱ // 0x11d @0x42
0x00db…0137 at0043 = ╱fe00008002╱ // 0x11e @0x43
0x00db…0137 at0048 = ╱ee╱)╱ // 0x123 @0x48
0x00db…0137 at0049 = ╱ec╱,╱ // 0x124 @0x49
0x00db…0137 at004a = ╱44╱D╱ // 0x125 @0x4a
0x00db…0137 at004b = ╱45╱E╱ // 0x126 @0x4b
0x00db…0137 at004c = ╱42╱B╱ // 0x127 @0x4c
0x00db…0137 at004d = ╱47╱G╱ // 0x128 @0x4d
0x00db…0137 at004e = ╱41╱A╱ // 0x129 @0x4e
0x00db…0137 at004f = ╱44╱D╱ // 0x12a @0x4f
0x00db…0137 at0050 = ╱45╱E╱ // 0x12b @0x50
0x00db…0137 at0051 = ╱ef╱$╱ // 0x12c @0x51
0x00db…0137 at0052 = ╱ed╱(╱ // 0x12d @0x52
0x00db…0137 at0053 = ╱32╱2╱ // 0x12e @0x53
0x00db…0137 at0054 = ╱35╱5╱ // 0x12f @0x54
0x00db…0137 at0055 = ╱fe0000c805╱ // 0x130 @0x55
0x00db…0137 at005a = ╱ee╱)╱ // 0x135 @0x5a
0x00db…0137 at005b = EOL // 0x136 @0x5b
0x00db…0137 }
0x0137…019b 8ef2 0130 DIM DEBTLF$(9),DEBBY$(20),SALDO$(12),FORS$(12),SVAR2$(1),GTOTAL$(12)
0x0137…019b LineComalBin {
0x0137…019b ptr = 0x8ef2 // 0x137 @0x0
0x0137…019b lno = 0x0082 // 0x139 @0x2
0x0137…019b at0004 = ╱87╱ DIM ╱ // 0x13b @0x4
0x0137…019b at0005 = ╱44╱D╱ // 0x13c @0x5
0x0137…019b at0006 = ╱45╱E╱ // 0x13d @0x6
0x0137…019b at0007 = ╱42╱B╱ // 0x13e @0x7
0x0137…019b at0008 = ╱54╱T╱ // 0x13f @0x8
0x0137…019b at0009 = ╱4c╱L╱ // 0x140 @0x9
0x0137…019b at000a = ╱46╱F╱ // 0x141 @0xa
0x0137…019b at000b = ╱ef╱$╱ // 0x142 @0xb
0x0137…019b at000c = ╱ed╱(╱ // 0x143 @0xc
0x0137…019b at000d = ╱39╱9╱ // 0x144 @0xd
0x0137…019b at000e = ╱fe00009004╱ // 0x145 @0xe
0x0137…019b at0013 = ╱ee╱)╱ // 0x14a @0x13
0x0137…019b at0014 = ╱ec╱,╱ // 0x14b @0x14
0x0137…019b at0015 = ╱44╱D╱ // 0x14c @0x15
0x0137…019b at0016 = ╱45╱E╱ // 0x14d @0x16
0x0137…019b at0017 = ╱42╱B╱ // 0x14e @0x17
0x0137…019b at0018 = ╱42╱B╱ // 0x14f @0x18
0x0137…019b at0019 = ╱59╱Y╱ // 0x150 @0x19
0x0137…019b at001a = ╱ef╱$╱ // 0x151 @0x1a
0x0137…019b at001b = ╱ed╱(╱ // 0x152 @0x1b
0x0137…019b at001c = ╱32╱2╱ // 0x153 @0x1c
0x0137…019b at001d = ╱30╱0╱ // 0x154 @0x1d
0x0137…019b at001e = ╱fe0000a005╱ // 0x155 @0x1e
0x0137…019b at0023 = ╱ee╱)╱ // 0x15a @0x23
0x0137…019b at0024 = ╱ec╱,╱ // 0x15b @0x24
0x0137…019b at0025 = ╱53╱S╱ // 0x15c @0x25
0x0137…019b at0026 = ╱41╱A╱ // 0x15d @0x26
0x0137…019b at0027 = ╱4c╱L╱ // 0x15e @0x27
0x0137…019b at0028 = ╱44╱D╱ // 0x15f @0x28
0x0137…019b at0029 = ╱4f╱O╱ // 0x160 @0x29
0x0137…019b at002a = ╱ef╱$╱ // 0x161 @0x2a
0x0137…019b at002b = ╱ed╱(╱ // 0x162 @0x2b
0x0137…019b at002c = ╱31╱1╱ // 0x163 @0x2c
0x0137…019b at002d = ╱32╱2╱ // 0x164 @0x2d
0x0137…019b at002e = ╱fe0000c004╱ // 0x165 @0x2e
0x0137…019b at0033 = ╱ee╱)╱ // 0x16a @0x33
0x0137…019b at0034 = ╱ec╱,╱ // 0x16b @0x34
0x0137…019b at0035 = ╱46╱F╱ // 0x16c @0x35
0x0137…019b at0036 = ╱4f╱O╱ // 0x16d @0x36
0x0137…019b at0037 = ╱52╱R╱ // 0x16e @0x37
0x0137…019b at0038 = ╱53╱S╱ // 0x16f @0x38
0x0137…019b at0039 = ╱ef╱$╱ // 0x170 @0x39
0x0137…019b at003a = ╱ed╱(╱ // 0x171 @0x3a
0x0137…019b at003b = ╱31╱1╱ // 0x172 @0x3b
0x0137…019b at003c = ╱32╱2╱ // 0x173 @0x3c
0x0137…019b at003d = ╱fe0000c004╱ // 0x174 @0x3d
0x0137…019b at0042 = ╱ee╱)╱ // 0x179 @0x42
0x0137…019b at0043 = ╱ec╱,╱ // 0x17a @0x43
0x0137…019b at0044 = ╱53╱S╱ // 0x17b @0x44
0x0137…019b at0045 = ╱56╱V╱ // 0x17c @0x45
0x0137…019b at0046 = ╱41╱A╱ // 0x17d @0x46
0x0137…019b at0047 = ╱52╱R╱ // 0x17e @0x47
0x0137…019b at0048 = ╱32╱2╱ // 0x17f @0x48
0x0137…019b at0049 = ╱ef╱$╱ // 0x180 @0x49
0x0137…019b at004a = ╱ed╱(╱ // 0x181 @0x4a
0x0137…019b at004b = ╱31╱1╱ // 0x182 @0x4b
0x0137…019b at004c = ╱fe00008001╱ // 0x183 @0x4c
0x0137…019b at0051 = ╱ee╱)╱ // 0x188 @0x51
0x0137…019b at0052 = ╱ec╱,╱ // 0x189 @0x52
0x0137…019b at0053 = ╱47╱G╱ // 0x18a @0x53
0x0137…019b at0054 = ╱54╱T╱ // 0x18b @0x54
0x0137…019b at0055 = ╱4f╱O╱ // 0x18c @0x55
0x0137…019b at0056 = ╱54╱T╱ // 0x18d @0x56
0x0137…019b at0057 = ╱41╱A╱ // 0x18e @0x57
0x0137…019b at0058 = ╱4c╱L╱ // 0x18f @0x58
0x0137…019b at0059 = ╱ef╱$╱ // 0x190 @0x59
0x0137…019b at005a = ╱ed╱(╱ // 0x191 @0x5a
0x0137…019b at005b = ╱31╱1╱ // 0x192 @0x5b
0x0137…019b at005c = ╱32╱2╱ // 0x193 @0x5c
0x0137…019b at005d = ╱fe0000c004╱ // 0x194 @0x5d
0x0137…019b at0062 = ╱ee╱)╱ // 0x199 @0x62
0x0137…019b at0063 = EOL // 0x19a @0x63
0x0137…019b }
0x019b…01e8 8f3f 0140 DIM ÅRKØB$(12),MDNKØB$(12),K7$(17),A$(6),TAL1$(12)
0x019b…01e8 LineComalBin {
0x019b…01e8 ptr = 0x8f3f // 0x19b @0x0
0x019b…01e8 lno = 0x008c // 0x19d @0x2
0x019b…01e8 at0004 = ╱87╱ DIM ╱ // 0x19f @0x4
0x019b…01e8 at0005 = ╱5d╱Å╱ // 0x1a0 @0x5
0x019b…01e8 at0006 = ╱52╱R╱ // 0x1a1 @0x6
0x019b…01e8 at0007 = ╱4b╱K╱ // 0x1a2 @0x7
0x019b…01e8 at0008 = ╱5c╱Ø╱ // 0x1a3 @0x8
0x019b…01e8 at0009 = ╱42╱B╱ // 0x1a4 @0x9
0x019b…01e8 at000a = ╱ef╱$╱ // 0x1a5 @0xa
0x019b…01e8 at000b = ╱ed╱(╱ // 0x1a6 @0xb
0x019b…01e8 at000c = ╱31╱1╱ // 0x1a7 @0xc
0x019b…01e8 at000d = ╱32╱2╱ // 0x1a8 @0xd
0x019b…01e8 at000e = ╱fe0000c004╱ // 0x1a9 @0xe
0x019b…01e8 at0013 = ╱ee╱)╱ // 0x1ae @0x13
0x019b…01e8 at0014 = ╱ec╱,╱ // 0x1af @0x14
0x019b…01e8 at0015 = ╱4d╱M╱ // 0x1b0 @0x15
0x019b…01e8 at0016 = ╱44╱D╱ // 0x1b1 @0x16
0x019b…01e8 at0017 = ╱4e╱N╱ // 0x1b2 @0x17
0x019b…01e8 at0018 = ╱4b╱K╱ // 0x1b3 @0x18
0x019b…01e8 at0019 = ╱5c╱Ø╱ // 0x1b4 @0x19
0x019b…01e8 at001a = ╱42╱B╱ // 0x1b5 @0x1a
0x019b…01e8 at001b = ╱ef╱$╱ // 0x1b6 @0x1b
0x019b…01e8 at001c = ╱ed╱(╱ // 0x1b7 @0x1c
0x019b…01e8 at001d = ╱31╱1╱ // 0x1b8 @0x1d
0x019b…01e8 at001e = ╱32╱2╱ // 0x1b9 @0x1e
0x019b…01e8 at001f = ╱fe0000c004╱ // 0x1ba @0x1f
0x019b…01e8 at0024 = ╱ee╱)╱ // 0x1bf @0x24
0x019b…01e8 at0025 = ╱ec╱,╱ // 0x1c0 @0x25
0x019b…01e8 at0026 = ╱4b╱K╱ // 0x1c1 @0x26
0x019b…01e8 at0027 = ╱37╱7╱ // 0x1c2 @0x27
0x019b…01e8 at0028 = ╱ef╱$╱ // 0x1c3 @0x28
0x019b…01e8 at0029 = ╱ed╱(╱ // 0x1c4 @0x29
0x019b…01e8 at002a = ╱31╱1╱ // 0x1c5 @0x2a
0x019b…01e8 at002b = ╱37╱7╱ // 0x1c6 @0x2b
0x019b…01e8 at002c = ╱fe00008805╱ // 0x1c7 @0x2c
0x019b…01e8 at0031 = ╱ee╱)╱ // 0x1cc @0x31
0x019b…01e8 at0032 = ╱ec╱,╱ // 0x1cd @0x32
0x019b…01e8 at0033 = ╱41╱A╱ // 0x1ce @0x33
0x019b…01e8 at0034 = ╱ef╱$╱ // 0x1cf @0x34
0x019b…01e8 at0035 = ╱ed╱(╱ // 0x1d0 @0x35
0x019b…01e8 at0036 = ╱36╱6╱ // 0x1d1 @0x36
0x019b…01e8 at0037 = ╱fe0000c003╱ // 0x1d2 @0x37
0x019b…01e8 at003c = ╱ee╱)╱ // 0x1d7 @0x3c
0x019b…01e8 at003d = ╱ec╱,╱ // 0x1d8 @0x3d
0x019b…01e8 at003e = ╱54╱T╱ // 0x1d9 @0x3e
0x019b…01e8 at003f = ╱41╱A╱ // 0x1da @0x3f
0x019b…01e8 at0040 = ╱4c╱L╱ // 0x1db @0x40
0x019b…01e8 at0041 = ╱31╱1╱ // 0x1dc @0x41
0x019b…01e8 at0042 = ╱ef╱$╱ // 0x1dd @0x42
0x019b…01e8 at0043 = ╱ed╱(╱ // 0x1de @0x43
0x019b…01e8 at0044 = ╱31╱1╱ // 0x1df @0x44
0x019b…01e8 at0045 = ╱32╱2╱ // 0x1e0 @0x45
0x019b…01e8 at0046 = ╱fe0000c004╱ // 0x1e1 @0x46
0x019b…01e8 at004b = ╱ee╱)╱ // 0x1e6 @0x4b
0x019b…01e8 at004c = EOL // 0x1e7 @0x4c
0x019b…01e8 }
0x01e8…0250 8fa7 0150 DIM MOMS$(12),FTOTAL$(12),KOD1$(1),KOD$(1),TAH$(12),TAL4$(14),T1(9)
0x01e8…0250 LineComalBin {
0x01e8…0250 ptr = 0x8fa7 // 0x1e8 @0x0
0x01e8…0250 lno = 0x0096 // 0x1ea @0x2
0x01e8…0250 at0004 = ╱87╱ DIM ╱ // 0x1ec @0x4
0x01e8…0250 at0005 = ╱4d╱M╱ // 0x1ed @0x5
0x01e8…0250 at0006 = ╱4f╱O╱ // 0x1ee @0x6
0x01e8…0250 at0007 = ╱4d╱M╱ // 0x1ef @0x7
0x01e8…0250 at0008 = ╱53╱S╱ // 0x1f0 @0x8
0x01e8…0250 at0009 = ╱ef╱$╱ // 0x1f1 @0x9
0x01e8…0250 at000a = ╱ed╱(╱ // 0x1f2 @0xa
0x01e8…0250 at000b = ╱31╱1╱ // 0x1f3 @0xb
0x01e8…0250 at000c = ╱32╱2╱ // 0x1f4 @0xc
0x01e8…0250 at000d = ╱fe0000c004╱ // 0x1f5 @0xd
0x01e8…0250 at0012 = ╱ee╱)╱ // 0x1fa @0x12
0x01e8…0250 at0013 = ╱ec╱,╱ // 0x1fb @0x13
0x01e8…0250 at0014 = ╱46╱F╱ // 0x1fc @0x14
0x01e8…0250 at0015 = ╱54╱T╱ // 0x1fd @0x15
0x01e8…0250 at0016 = ╱4f╱O╱ // 0x1fe @0x16
0x01e8…0250 at0017 = ╱54╱T╱ // 0x1ff @0x17
0x01e8…0250 at0018 = ╱41╱A╱ // 0x200 @0x18
0x01e8…0250 at0019 = ╱4c╱L╱ // 0x201 @0x19
0x01e8…0250 at001a = ╱ef╱$╱ // 0x202 @0x1a
0x01e8…0250 at001b = ╱ed╱(╱ // 0x203 @0x1b
0x01e8…0250 at001c = ╱31╱1╱ // 0x204 @0x1c
0x01e8…0250 at001d = ╱32╱2╱ // 0x205 @0x1d
0x01e8…0250 at001e = ╱fe0000c004╱ // 0x206 @0x1e
0x01e8…0250 at0023 = ╱ee╱)╱ // 0x20b @0x23
0x01e8…0250 at0024 = ╱ec╱,╱ // 0x20c @0x24
0x01e8…0250 at0025 = ╱4b╱K╱ // 0x20d @0x25
0x01e8…0250 at0026 = ╱4f╱O╱ // 0x20e @0x26
0x01e8…0250 at0027 = ╱44╱D╱ // 0x20f @0x27
0x01e8…0250 at0028 = ╱31╱1╱ // 0x210 @0x28
0x01e8…0250 at0029 = ╱ef╱$╱ // 0x211 @0x29
0x01e8…0250 at002a = ╱ed╱(╱ // 0x212 @0x2a
0x01e8…0250 at002b = ╱31╱1╱ // 0x213 @0x2b
0x01e8…0250 at002c = ╱fe00008001╱ // 0x214 @0x2c
0x01e8…0250 at0031 = ╱ee╱)╱ // 0x219 @0x31
0x01e8…0250 at0032 = ╱ec╱,╱ // 0x21a @0x32
0x01e8…0250 at0033 = ╱4b╱K╱ // 0x21b @0x33
0x01e8…0250 at0034 = ╱4f╱O╱ // 0x21c @0x34
0x01e8…0250 at0035 = ╱44╱D╱ // 0x21d @0x35
0x01e8…0250 at0036 = ╱ef╱$╱ // 0x21e @0x36
0x01e8…0250 at0037 = ╱ed╱(╱ // 0x21f @0x37
0x01e8…0250 at0038 = ╱31╱1╱ // 0x220 @0x38
0x01e8…0250 at0039 = ╱fe00008001╱ // 0x221 @0x39
0x01e8…0250 at003e = ╱ee╱)╱ // 0x226 @0x3e
0x01e8…0250 at003f = ╱ec╱,╱ // 0x227 @0x3f
0x01e8…0250 at0040 = ╱54╱T╱ // 0x228 @0x40
0x01e8…0250 at0041 = ╱41╱A╱ // 0x229 @0x41
0x01e8…0250 at0042 = ╱48╱H╱ // 0x22a @0x42
0x01e8…0250 at0043 = ╱ef╱$╱ // 0x22b @0x43
0x01e8…0250 at0044 = ╱ed╱(╱ // 0x22c @0x44
0x01e8…0250 at0045 = ╱31╱1╱ // 0x22d @0x45
0x01e8…0250 at0046 = ╱32╱2╱ // 0x22e @0x46
0x01e8…0250 at0047 = ╱fe0000c004╱ // 0x22f @0x47
0x01e8…0250 at004c = ╱ee╱)╱ // 0x234 @0x4c
0x01e8…0250 at004d = ╱ec╱,╱ // 0x235 @0x4d
0x01e8…0250 at004e = ╱54╱T╱ // 0x236 @0x4e
0x01e8…0250 at004f = ╱41╱A╱ // 0x237 @0x4f
0x01e8…0250 at0050 = ╱4c╱L╱ // 0x238 @0x50
0x01e8…0250 at0051 = ╱34╱4╱ // 0x239 @0x51
0x01e8…0250 at0052 = ╱ef╱$╱ // 0x23a @0x52
0x01e8…0250 at0053 = ╱ed╱(╱ // 0x23b @0x53
0x01e8…0250 at0054 = ╱31╱1╱ // 0x23c @0x54
0x01e8…0250 at0055 = ╱34╱4╱ // 0x23d @0x55
0x01e8…0250 at0056 = ╱fe0000e004╱ // 0x23e @0x56
0x01e8…0250 at005b = ╱ee╱)╱ // 0x243 @0x5b
0x01e8…0250 at005c = ╱ec╱,╱ // 0x244 @0x5c
0x01e8…0250 at005d = ╱54╱T╱ // 0x245 @0x5d
0x01e8…0250 at005e = ╱31╱1╱ // 0x246 @0x5e
0x01e8…0250 at005f = ╱ed╱(╱ // 0x247 @0x5f
0x01e8…0250 at0060 = ╱39╱9╱ // 0x248 @0x60
0x01e8…0250 at0061 = ╱fe00009004╱ // 0x249 @0x61
0x01e8…0250 at0066 = ╱ee╱)╱ // 0x24e @0x66
0x01e8…0250 at0067 = EOL // 0x24f @0x67
0x01e8…0250 }
0x0250…02a6 8ffd 0160 DIM VARTEKST$(50),VARPRIS$(12),BELØB$(12),TOTAL$(12),B$(12)
0x0250…02a6 LineComalBin {
0x0250…02a6 ptr = 0x8ffd // 0x250 @0x0
0x0250…02a6 lno = 0x00a0 // 0x252 @0x2
0x0250…02a6 at0004 = ╱87╱ DIM ╱ // 0x254 @0x4
0x0250…02a6 at0005 = ╱56╱V╱ // 0x255 @0x5
0x0250…02a6 at0006 = ╱41╱A╱ // 0x256 @0x6
0x0250…02a6 at0007 = ╱52╱R╱ // 0x257 @0x7
0x0250…02a6 at0008 = ╱54╱T╱ // 0x258 @0x8
0x0250…02a6 at0009 = ╱45╱E╱ // 0x259 @0x9
0x0250…02a6 at000a = ╱4b╱K╱ // 0x25a @0xa
0x0250…02a6 at000b = ╱53╱S╱ // 0x25b @0xb
0x0250…02a6 at000c = ╱54╱T╱ // 0x25c @0xc
0x0250…02a6 at000d = ╱ef╱$╱ // 0x25d @0xd
0x0250…02a6 at000e = ╱ed╱(╱ // 0x25e @0xe
0x0250…02a6 at000f = ╱35╱5╱ // 0x25f @0xf
0x0250…02a6 at0010 = ╱30╱0╱ // 0x260 @0x10
0x0250…02a6 at0011 = ╱fe0000c806╱ // 0x261 @0x11
0x0250…02a6 at0016 = ╱ee╱)╱ // 0x266 @0x16
0x0250…02a6 at0017 = ╱ec╱,╱ // 0x267 @0x17
0x0250…02a6 at0018 = ╱56╱V╱ // 0x268 @0x18
0x0250…02a6 at0019 = ╱41╱A╱ // 0x269 @0x19
0x0250…02a6 at001a = ╱52╱R╱ // 0x26a @0x1a
0x0250…02a6 at001b = ╱50╱P╱ // 0x26b @0x1b
0x0250…02a6 at001c = ╱52╱R╱ // 0x26c @0x1c
0x0250…02a6 at001d = ╱49╱I╱ // 0x26d @0x1d
0x0250…02a6 at001e = ╱53╱S╱ // 0x26e @0x1e
0x0250…02a6 at001f = ╱ef╱$╱ // 0x26f @0x1f
0x0250…02a6 at0020 = ╱ed╱(╱ // 0x270 @0x20
0x0250…02a6 at0021 = ╱31╱1╱ // 0x271 @0x21
0x0250…02a6 at0022 = ╱32╱2╱ // 0x272 @0x22
0x0250…02a6 at0023 = ╱fe0000c004╱ // 0x273 @0x23
0x0250…02a6 at0028 = ╱ee╱)╱ // 0x278 @0x28
0x0250…02a6 at0029 = ╱ec╱,╱ // 0x279 @0x29
0x0250…02a6 at002a = ╱42╱B╱ // 0x27a @0x2a
0x0250…02a6 at002b = ╱45╱E╱ // 0x27b @0x2b
0x0250…02a6 at002c = ╱4c╱L╱ // 0x27c @0x2c
0x0250…02a6 at002d = ╱5c╱Ø╱ // 0x27d @0x2d
0x0250…02a6 at002e = ╱42╱B╱ // 0x27e @0x2e
0x0250…02a6 at002f = ╱ef╱$╱ // 0x27f @0x2f
0x0250…02a6 at0030 = ╱ed╱(╱ // 0x280 @0x30
0x0250…02a6 at0031 = ╱31╱1╱ // 0x281 @0x31
0x0250…02a6 at0032 = ╱32╱2╱ // 0x282 @0x32
0x0250…02a6 at0033 = ╱fe0000c004╱ // 0x283 @0x33
0x0250…02a6 at0038 = ╱ee╱)╱ // 0x288 @0x38
0x0250…02a6 at0039 = ╱ec╱,╱ // 0x289 @0x39
0x0250…02a6 at003a = ╱54╱T╱ // 0x28a @0x3a
0x0250…02a6 at003b = ╱4f╱O╱ // 0x28b @0x3b
0x0250…02a6 at003c = ╱54╱T╱ // 0x28c @0x3c
0x0250…02a6 at003d = ╱41╱A╱ // 0x28d @0x3d
0x0250…02a6 at003e = ╱4c╱L╱ // 0x28e @0x3e
0x0250…02a6 at003f = ╱ef╱$╱ // 0x28f @0x3f
0x0250…02a6 at0040 = ╱ed╱(╱ // 0x290 @0x40
0x0250…02a6 at0041 = ╱31╱1╱ // 0x291 @0x41
0x0250…02a6 at0042 = ╱32╱2╱ // 0x292 @0x42
0x0250…02a6 at0043 = ╱fe0000c004╱ // 0x293 @0x43
0x0250…02a6 at0048 = ╱ee╱)╱ // 0x298 @0x48
0x0250…02a6 at0049 = ╱ec╱,╱ // 0x299 @0x49
0x0250…02a6 at004a = ╱42╱B╱ // 0x29a @0x4a
0x0250…02a6 at004b = ╱ef╱$╱ // 0x29b @0x4b
0x0250…02a6 at004c = ╱ed╱(╱ // 0x29c @0x4c
0x0250…02a6 at004d = ╱31╱1╱ // 0x29d @0x4d
0x0250…02a6 at004e = ╱32╱2╱ // 0x29e @0x4e
0x0250…02a6 at004f = ╱fe0000c004╱ // 0x29f @0x4f
0x0250…02a6 at0054 = ╱ee╱)╱ // 0x2a4 @0x54
0x0250…02a6 at0055 = EOL // 0x2a5 @0x55
0x0250…02a6 }
0x02a6…0313 906a 0170 DIM SVAR1$(1),FAKKRE$(1),LEVTEKST$(52),ANTAL$(12),BLANK$(77),LAND$(9,12)
0x02a6…0313 LineComalBin {
0x02a6…0313 ptr = 0x906a // 0x2a6 @0x0
0x02a6…0313 lno = 0x00aa // 0x2a8 @0x2
0x02a6…0313 at0004 = ╱87╱ DIM ╱ // 0x2aa @0x4
0x02a6…0313 at0005 = ╱53╱S╱ // 0x2ab @0x5
0x02a6…0313 at0006 = ╱56╱V╱ // 0x2ac @0x6
0x02a6…0313 at0007 = ╱41╱A╱ // 0x2ad @0x7
0x02a6…0313 at0008 = ╱52╱R╱ // 0x2ae @0x8
0x02a6…0313 at0009 = ╱31╱1╱ // 0x2af @0x9
0x02a6…0313 at000a = ╱ef╱$╱ // 0x2b0 @0xa
0x02a6…0313 at000b = ╱ed╱(╱ // 0x2b1 @0xb
0x02a6…0313 at000c = ╱31╱1╱ // 0x2b2 @0xc
0x02a6…0313 at000d = ╱fe00008001╱ // 0x2b3 @0xd
0x02a6…0313 at0012 = ╱ee╱)╱ // 0x2b8 @0x12
0x02a6…0313 at0013 = ╱ec╱,╱ // 0x2b9 @0x13
0x02a6…0313 at0014 = ╱46╱F╱ // 0x2ba @0x14
0x02a6…0313 at0015 = ╱41╱A╱ // 0x2bb @0x15
0x02a6…0313 at0016 = ╱4b╱K╱ // 0x2bc @0x16
0x02a6…0313 at0017 = ╱4b╱K╱ // 0x2bd @0x17
0x02a6…0313 at0018 = ╱52╱R╱ // 0x2be @0x18
0x02a6…0313 at0019 = ╱45╱E╱ // 0x2bf @0x19
0x02a6…0313 at001a = ╱ef╱$╱ // 0x2c0 @0x1a
0x02a6…0313 at001b = ╱ed╱(╱ // 0x2c1 @0x1b
0x02a6…0313 at001c = ╱31╱1╱ // 0x2c2 @0x1c
0x02a6…0313 at001d = ╱fe00008001╱ // 0x2c3 @0x1d
0x02a6…0313 at0022 = ╱ee╱)╱ // 0x2c8 @0x22
0x02a6…0313 at0023 = ╱ec╱,╱ // 0x2c9 @0x23
0x02a6…0313 at0024 = ╱4c╱L╱ // 0x2ca @0x24
0x02a6…0313 at0025 = ╱45╱E╱ // 0x2cb @0x25
0x02a6…0313 at0026 = ╱56╱V╱ // 0x2cc @0x26
0x02a6…0313 at0027 = ╱54╱T╱ // 0x2cd @0x27
0x02a6…0313 at0028 = ╱45╱E╱ // 0x2ce @0x28
0x02a6…0313 at0029 = ╱4b╱K╱ // 0x2cf @0x29
0x02a6…0313 at002a = ╱53╱S╱ // 0x2d0 @0x2a
0x02a6…0313 at002b = ╱54╱T╱ // 0x2d1 @0x2b
0x02a6…0313 at002c = ╱ef╱$╱ // 0x2d2 @0x2c
0x02a6…0313 at002d = ╱ed╱(╱ // 0x2d3 @0x2d
0x02a6…0313 at002e = ╱35╱5╱ // 0x2d4 @0x2e
0x02a6…0313 at002f = ╱32╱2╱ // 0x2d5 @0x2f
0x02a6…0313 at0030 = ╱fe0000d006╱ // 0x2d6 @0x30
0x02a6…0313 at0035 = ╱ee╱)╱ // 0x2db @0x35
0x02a6…0313 at0036 = ╱ec╱,╱ // 0x2dc @0x36
0x02a6…0313 at0037 = ╱41╱A╱ // 0x2dd @0x37
0x02a6…0313 at0038 = ╱4e╱N╱ // 0x2de @0x38
0x02a6…0313 at0039 = ╱54╱T╱ // 0x2df @0x39
0x02a6…0313 at003a = ╱41╱A╱ // 0x2e0 @0x3a
0x02a6…0313 at003b = ╱4c╱L╱ // 0x2e1 @0x3b
0x02a6…0313 at003c = ╱ef╱$╱ // 0x2e2 @0x3c
0x02a6…0313 at003d = ╱ed╱(╱ // 0x2e3 @0x3d
0x02a6…0313 at003e = ╱31╱1╱ // 0x2e4 @0x3e
0x02a6…0313 at003f = ╱32╱2╱ // 0x2e5 @0x3f
0x02a6…0313 at0040 = ╱fe0000c004╱ // 0x2e6 @0x40
0x02a6…0313 at0045 = ╱ee╱)╱ // 0x2eb @0x45
0x02a6…0313 at0046 = ╱ec╱,╱ // 0x2ec @0x46
0x02a6…0313 at0047 = ╱42╱B╱ // 0x2ed @0x47
0x02a6…0313 at0048 = ╱4c╱L╱ // 0x2ee @0x48
0x02a6…0313 at0049 = ╱41╱A╱ // 0x2ef @0x49
0x02a6…0313 at004a = ╱4e╱N╱ // 0x2f0 @0x4a
0x02a6…0313 at004b = ╱4b╱K╱ // 0x2f1 @0x4b
0x02a6…0313 at004c = ╱ef╱$╱ // 0x2f2 @0x4c
0x02a6…0313 at004d = ╱ed╱(╱ // 0x2f3 @0x4d
0x02a6…0313 at004e = ╱37╱7╱ // 0x2f4 @0x4e
0x02a6…0313 at004f = ╱37╱7╱ // 0x2f5 @0x4f
0x02a6…0313 at0050 = ╱fe00009a07╱ // 0x2f6 @0x50
0x02a6…0313 at0055 = ╱ee╱)╱ // 0x2fb @0x55
0x02a6…0313 at0056 = ╱ec╱,╱ // 0x2fc @0x56
0x02a6…0313 at0057 = ╱4c╱L╱ // 0x2fd @0x57
0x02a6…0313 at0058 = ╱41╱A╱ // 0x2fe @0x58
0x02a6…0313 at0059 = ╱4e╱N╱ // 0x2ff @0x59
0x02a6…0313 at005a = ╱44╱D╱ // 0x300 @0x5a
0x02a6…0313 at005b = ╱ef╱$╱ // 0x301 @0x5b
0x02a6…0313 at005c = ╱ed╱(╱ // 0x302 @0x5c
0x02a6…0313 at005d = ╱39╱9╱ // 0x303 @0x5d
0x02a6…0313 at005e = ╱fe00009004╱ // 0x304 @0x5e
0x02a6…0313 at0063 = ╱ec╱,╱ // 0x309 @0x63
0x02a6…0313 at0064 = ╱31╱1╱ // 0x30a @0x64
0x02a6…0313 at0065 = ╱32╱2╱ // 0x30b @0x65
0x02a6…0313 at0066 = ╱fe0000c004╱ // 0x30c @0x66
0x02a6…0313 at006b = ╱ee╱)╱ // 0x311 @0x6b
0x02a6…0313 at006c = EOL // 0x312 @0x6c
0x02a6…0313 }
0x0313…0380 90d7 0180 DIM LTX1$(6),LTX2$(32),LTX3$(47),LTX4$(19),LTX5$(17),LTX6$(31),LTX7$(33)
0x0313…0380 LineComalBin {
0x0313…0380 ptr = 0x90d7 // 0x313 @0x0
0x0313…0380 lno = 0x00b4 // 0x315 @0x2
0x0313…0380 at0004 = ╱87╱ DIM ╱ // 0x317 @0x4
0x0313…0380 at0005 = ╱4c╱L╱ // 0x318 @0x5
0x0313…0380 at0006 = ╱54╱T╱ // 0x319 @0x6
0x0313…0380 at0007 = ╱58╱X╱ // 0x31a @0x7
0x0313…0380 at0008 = ╱31╱1╱ // 0x31b @0x8
0x0313…0380 at0009 = ╱ef╱$╱ // 0x31c @0x9
0x0313…0380 at000a = ╱ed╱(╱ // 0x31d @0xa
0x0313…0380 at000b = ╱36╱6╱ // 0x31e @0xb
0x0313…0380 at000c = ╱fe0000c003╱ // 0x31f @0xc
0x0313…0380 at0011 = ╱ee╱)╱ // 0x324 @0x11
0x0313…0380 at0012 = ╱ec╱,╱ // 0x325 @0x12
0x0313…0380 at0013 = ╱4c╱L╱ // 0x326 @0x13
0x0313…0380 at0014 = ╱54╱T╱ // 0x327 @0x14
0x0313…0380 at0015 = ╱58╱X╱ // 0x328 @0x15
0x0313…0380 at0016 = ╱32╱2╱ // 0x329 @0x16
0x0313…0380 at0017 = ╱ef╱$╱ // 0x32a @0x17
0x0313…0380 at0018 = ╱ed╱(╱ // 0x32b @0x18
0x0313…0380 at0019 = ╱33╱3╱ // 0x32c @0x19
0x0313…0380 at001a = ╱32╱2╱ // 0x32d @0x1a
0x0313…0380 at001b = ╱fe00008006╱ // 0x32e @0x1b
0x0313…0380 at0020 = ╱ee╱)╱ // 0x333 @0x20
0x0313…0380 at0021 = ╱ec╱,╱ // 0x334 @0x21
0x0313…0380 at0022 = ╱4c╱L╱ // 0x335 @0x22
0x0313…0380 at0023 = ╱54╱T╱ // 0x336 @0x23
0x0313…0380 at0024 = ╱58╱X╱ // 0x337 @0x24
0x0313…0380 at0025 = ╱33╱3╱ // 0x338 @0x25
0x0313…0380 at0026 = ╱ef╱$╱ // 0x339 @0x26
0x0313…0380 at0027 = ╱ed╱(╱ // 0x33a @0x27
0x0313…0380 at0028 = ╱34╱4╱ // 0x33b @0x28
0x0313…0380 at0029 = ╱37╱7╱ // 0x33c @0x29
0x0313…0380 at002a = ╱fe0000bc06╱ // 0x33d @0x2a
0x0313…0380 at002f = ╱ee╱)╱ // 0x342 @0x2f
0x0313…0380 at0030 = ╱ec╱,╱ // 0x343 @0x30
0x0313…0380 at0031 = ╱4c╱L╱ // 0x344 @0x31
0x0313…0380 at0032 = ╱54╱T╱ // 0x345 @0x32
0x0313…0380 at0033 = ╱58╱X╱ // 0x346 @0x33
0x0313…0380 at0034 = ╱34╱4╱ // 0x347 @0x34
0x0313…0380 at0035 = ╱ef╱$╱ // 0x348 @0x35
0x0313…0380 at0036 = ╱ed╱(╱ // 0x349 @0x36
0x0313…0380 at0037 = ╱31╱1╱ // 0x34a @0x37
0x0313…0380 at0038 = ╱39╱9╱ // 0x34b @0x38
0x0313…0380 at0039 = ╱fe00009805╱ // 0x34c @0x39
0x0313…0380 at003e = ╱ee╱)╱ // 0x351 @0x3e
0x0313…0380 at003f = ╱ec╱,╱ // 0x352 @0x3f
0x0313…0380 at0040 = ╱4c╱L╱ // 0x353 @0x40
0x0313…0380 at0041 = ╱54╱T╱ // 0x354 @0x41
0x0313…0380 at0042 = ╱58╱X╱ // 0x355 @0x42
0x0313…0380 at0043 = ╱35╱5╱ // 0x356 @0x43
0x0313…0380 at0044 = ╱ef╱$╱ // 0x357 @0x44
0x0313…0380 at0045 = ╱ed╱(╱ // 0x358 @0x45
0x0313…0380 at0046 = ╱31╱1╱ // 0x359 @0x46
0x0313…0380 at0047 = ╱37╱7╱ // 0x35a @0x47
0x0313…0380 at0048 = ╱fe00008805╱ // 0x35b @0x48
0x0313…0380 at004d = ╱ee╱)╱ // 0x360 @0x4d
0x0313…0380 at004e = ╱ec╱,╱ // 0x361 @0x4e
0x0313…0380 at004f = ╱4c╱L╱ // 0x362 @0x4f
0x0313…0380 at0050 = ╱54╱T╱ // 0x363 @0x50
0x0313…0380 at0051 = ╱58╱X╱ // 0x364 @0x51
0x0313…0380 at0052 = ╱36╱6╱ // 0x365 @0x52
0x0313…0380 at0053 = ╱ef╱$╱ // 0x366 @0x53
0x0313…0380 at0054 = ╱ed╱(╱ // 0x367 @0x54
0x0313…0380 at0055 = ╱33╱3╱ // 0x368 @0x55
0x0313…0380 at0056 = ╱31╱1╱ // 0x369 @0x56
0x0313…0380 at0057 = ╱fe0000f805╱ // 0x36a @0x57
0x0313…0380 at005c = ╱ee╱)╱ // 0x36f @0x5c
0x0313…0380 at005d = ╱ec╱,╱ // 0x370 @0x5d
0x0313…0380 at005e = ╱4c╱L╱ // 0x371 @0x5e
0x0313…0380 at005f = ╱54╱T╱ // 0x372 @0x5f
0x0313…0380 at0060 = ╱58╱X╱ // 0x373 @0x60
0x0313…0380 at0061 = ╱37╱7╱ // 0x374 @0x61
0x0313…0380 at0062 = ╱ef╱$╱ // 0x375 @0x62
0x0313…0380 at0063 = ╱ed╱(╱ // 0x376 @0x63
0x0313…0380 at0064 = ╱33╱3╱ // 0x377 @0x64
0x0313…0380 at0065 = ╱33╱3╱ // 0x378 @0x65
0x0313…0380 at0066 = ╱fe00008406╱ // 0x379 @0x66
0x0313…0380 at006b = ╱ee╱)╱ // 0x37e @0x6b
0x0313…0380 at006c = EOL // 0x37f @0x6c
0x0313…0380 }
0x0380…03e2 9139 0190 DIM LTX8$(9),LTX9$(25),LTX10$(26),LTX11$(28),LTX12$(39),LTX13$(33)
0x0380…03e2 LineComalBin {
0x0380…03e2 ptr = 0x9139 // 0x380 @0x0
0x0380…03e2 lno = 0x00be // 0x382 @0x2
0x0380…03e2 at0004 = ╱87╱ DIM ╱ // 0x384 @0x4
0x0380…03e2 at0005 = ╱4c╱L╱ // 0x385 @0x5
0x0380…03e2 at0006 = ╱54╱T╱ // 0x386 @0x6
0x0380…03e2 at0007 = ╱58╱X╱ // 0x387 @0x7
0x0380…03e2 at0008 = ╱38╱8╱ // 0x388 @0x8
0x0380…03e2 at0009 = ╱ef╱$╱ // 0x389 @0x9
0x0380…03e2 at000a = ╱ed╱(╱ // 0x38a @0xa
0x0380…03e2 at000b = ╱39╱9╱ // 0x38b @0xb
0x0380…03e2 at000c = ╱fe00009004╱ // 0x38c @0xc
0x0380…03e2 at0011 = ╱ee╱)╱ // 0x391 @0x11
0x0380…03e2 at0012 = ╱ec╱,╱ // 0x392 @0x12
0x0380…03e2 at0013 = ╱4c╱L╱ // 0x393 @0x13
0x0380…03e2 at0014 = ╱54╱T╱ // 0x394 @0x14
0x0380…03e2 at0015 = ╱58╱X╱ // 0x395 @0x15
0x0380…03e2 at0016 = ╱39╱9╱ // 0x396 @0x16
0x0380…03e2 at0017 = ╱ef╱$╱ // 0x397 @0x17
0x0380…03e2 at0018 = ╱ed╱(╱ // 0x398 @0x18
0x0380…03e2 at0019 = ╱32╱2╱ // 0x399 @0x19
0x0380…03e2 at001a = ╱35╱5╱ // 0x39a @0x1a
0x0380…03e2 at001b = ╱fe0000c805╱ // 0x39b @0x1b
0x0380…03e2 at0020 = ╱ee╱)╱ // 0x3a0 @0x20
0x0380…03e2 at0021 = ╱ec╱,╱ // 0x3a1 @0x21
0x0380…03e2 at0022 = ╱4c╱L╱ // 0x3a2 @0x22
0x0380…03e2 at0023 = ╱54╱T╱ // 0x3a3 @0x23
0x0380…03e2 at0024 = ╱58╱X╱ // 0x3a4 @0x24
0x0380…03e2 at0025 = ╱31╱1╱ // 0x3a5 @0x25
0x0380…03e2 at0026 = ╱30╱0╱ // 0x3a6 @0x26
0x0380…03e2 at0027 = ╱ef╱$╱ // 0x3a7 @0x27
0x0380…03e2 at0028 = ╱ed╱(╱ // 0x3a8 @0x28
0x0380…03e2 at0029 = ╱32╱2╱ // 0x3a9 @0x29
0x0380…03e2 at002a = ╱36╱6╱ // 0x3aa @0x2a
0x0380…03e2 at002b = ╱fe0000d005╱ // 0x3ab @0x2b
0x0380…03e2 at0030 = ╱ee╱)╱ // 0x3b0 @0x30
0x0380…03e2 at0031 = ╱ec╱,╱ // 0x3b1 @0x31
0x0380…03e2 at0032 = ╱4c╱L╱ // 0x3b2 @0x32
0x0380…03e2 at0033 = ╱54╱T╱ // 0x3b3 @0x33
0x0380…03e2 at0034 = ╱58╱X╱ // 0x3b4 @0x34
0x0380…03e2 at0035 = ╱31╱1╱ // 0x3b5 @0x35
0x0380…03e2 at0036 = ╱31╱1╱ // 0x3b6 @0x36
0x0380…03e2 at0037 = ╱ef╱$╱ // 0x3b7 @0x37
0x0380…03e2 at0038 = ╱ed╱(╱ // 0x3b8 @0x38
0x0380…03e2 at0039 = ╱32╱2╱ // 0x3b9 @0x39
0x0380…03e2 at003a = ╱38╱8╱ // 0x3ba @0x3a
0x0380…03e2 at003b = ╱fe0000e005╱ // 0x3bb @0x3b
0x0380…03e2 at0040 = ╱ee╱)╱ // 0x3c0 @0x40
0x0380…03e2 at0041 = ╱ec╱,╱ // 0x3c1 @0x41
0x0380…03e2 at0042 = ╱4c╱L╱ // 0x3c2 @0x42
0x0380…03e2 at0043 = ╱54╱T╱ // 0x3c3 @0x43
0x0380…03e2 at0044 = ╱58╱X╱ // 0x3c4 @0x44
0x0380…03e2 at0045 = ╱31╱1╱ // 0x3c5 @0x45
0x0380…03e2 at0046 = ╱32╱2╱ // 0x3c6 @0x46
0x0380…03e2 at0047 = ╱ef╱$╱ // 0x3c7 @0x47
0x0380…03e2 at0048 = ╱ed╱(╱ // 0x3c8 @0x48
0x0380…03e2 at0049 = ╱33╱3╱ // 0x3c9 @0x49
0x0380…03e2 at004a = ╱39╱9╱ // 0x3ca @0x4a
0x0380…03e2 at004b = ╱fe00009c06╱ // 0x3cb @0x4b
0x0380…03e2 at0050 = ╱ee╱)╱ // 0x3d0 @0x50
0x0380…03e2 at0051 = ╱ec╱,╱ // 0x3d1 @0x51
0x0380…03e2 at0052 = ╱4c╱L╱ // 0x3d2 @0x52
0x0380…03e2 at0053 = ╱54╱T╱ // 0x3d3 @0x53
0x0380…03e2 at0054 = ╱58╱X╱ // 0x3d4 @0x54
0x0380…03e2 at0055 = ╱31╱1╱ // 0x3d5 @0x55
0x0380…03e2 at0056 = ╱33╱3╱ // 0x3d6 @0x56
0x0380…03e2 at0057 = ╱ef╱$╱ // 0x3d7 @0x57
0x0380…03e2 at0058 = ╱ed╱(╱ // 0x3d8 @0x58
0x0380…03e2 at0059 = ╱33╱3╱ // 0x3d9 @0x59
0x0380…03e2 at005a = ╱33╱3╱ // 0x3da @0x5a
0x0380…03e2 at005b = ╱fe00008406╱ // 0x3db @0x5b
0x0380…03e2 at0060 = ╱ee╱)╱ // 0x3e0 @0x60
0x0380…03e2 at0061 = EOL // 0x3e1 @0x61
0x0380…03e2 }
0x03e2…0411 9168 0200 TAL4$="0+";TOTAL$="0+";TAH$=" ,00+"
0x03e2…0411 LineComalBin {
0x03e2…0411 ptr = 0x9168 // 0x3e2 @0x0
0x03e2…0411 lno = 0x00c8 // 0x3e4 @0x2
0x03e2…0411 at0004 = ╱54╱T╱ // 0x3e6 @0x4
0x03e2…0411 at0005 = ╱41╱A╱ // 0x3e7 @0x5
0x03e2…0411 at0006 = ╱4c╱L╱ // 0x3e8 @0x6
0x03e2…0411 at0007 = ╱34╱4╱ // 0x3e9 @0x7
0x03e2…0411 at0008 = ╱ef╱$╱ // 0x3ea @0x8
0x03e2…0411 at0009 = ╱dc╱=╱ // 0x3eb @0x9
0x03e2…0411 at000a = ╱22╱"╱ // 0x3ec @0xa
0x03e2…0411 at000b = ╱30╱0╱ // 0x3ed @0xb
0x03e2…0411 at000c = ╱2b╱+╱ // 0x3ee @0xc
0x03e2…0411 at000d = ╱22╱"╱ // 0x3ef @0xd
0x03e2…0411 at000e = ╱eb╱;╱ // 0x3f0 @0xe
0x03e2…0411 at000f = ╱54╱T╱ // 0x3f1 @0xf
0x03e2…0411 at0010 = ╱4f╱O╱ // 0x3f2 @0x10
0x03e2…0411 at0011 = ╱54╱T╱ // 0x3f3 @0x11
0x03e2…0411 at0012 = ╱41╱A╱ // 0x3f4 @0x12
0x03e2…0411 at0013 = ╱4c╱L╱ // 0x3f5 @0x13
0x03e2…0411 at0014 = ╱ef╱$╱ // 0x3f6 @0x14
0x03e2…0411 at0015 = ╱dc╱=╱ // 0x3f7 @0x15
0x03e2…0411 at0016 = ╱22╱"╱ // 0x3f8 @0x16
0x03e2…0411 at0017 = ╱30╱0╱ // 0x3f9 @0x17
0x03e2…0411 at0018 = ╱2b╱+╱ // 0x3fa @0x18
0x03e2…0411 at0019 = ╱22╱"╱ // 0x3fb @0x19
0x03e2…0411 at001a = ╱eb╱;╱ // 0x3fc @0x1a
0x03e2…0411 at001b = ╱54╱T╱ // 0x3fd @0x1b
0x03e2…0411 at001c = ╱41╱A╱ // 0x3fe @0x1c
0x03e2…0411 at001d = ╱48╱H╱ // 0x3ff @0x1d
0x03e2…0411 at001e = ╱ef╱$╱ // 0x400 @0x1e
0x03e2…0411 at001f = ╱dc╱=╱ // 0x401 @0x1f
0x03e2…0411 at0020 = ╱22╱"╱ // 0x402 @0x20
0x03e2…0411 at0021 = ╱20╱…╱ // 0x403 @0x21
0x03e2…0411 at0022 = ╱20╱…╱ // 0x404 @0x22
0x03e2…0411 at0023 = ╱20╱…╱ // 0x405 @0x23
0x03e2…0411 at0024 = ╱20╱…╱ // 0x406 @0x24
0x03e2…0411 at0025 = ╱20╱…╱ // 0x407 @0x25
0x03e2…0411 at0026 = ╱20╱…╱ // 0x408 @0x26
0x03e2…0411 at0027 = ╱20╱…╱ // 0x409 @0x27
0x03e2…0411 at0028 = ╱20╱…╱ // 0x40a @0x28
0x03e2…0411 at0029 = ╱2c╱,╱ // 0x40b @0x29
0x03e2…0411 at002a = ╱30╱0╱ // 0x40c @0x2a
0x03e2…0411 at002b = ╱30╱0╱ // 0x40d @0x2b
0x03e2…0411 at002c = ╱2b╱+╱ // 0x40e @0x2c
0x03e2…0411 at002d = ╱22╱"╱ // 0x40f @0x2d
0x03e2…0411 at002e = EOL // 0x410 @0x2e
0x03e2…0411 }
0x0411…0459 91b0 0210 BLANK$=" ";BLANK$=BLANK$+BLANK$+BLANK$+" "
0x0411…0459 LineComalBin {
0x0411…0459 ptr = 0x91b0 // 0x411 @0x0
0x0411…0459 lno = 0x00d2 // 0x413 @0x2
0x0411…0459 at0004 = ╱42╱B╱ // 0x415 @0x4
0x0411…0459 at0005 = ╱4c╱L╱ // 0x416 @0x5
0x0411…0459 at0006 = ╱41╱A╱ // 0x417 @0x6
0x0411…0459 at0007 = ╱4e╱N╱ // 0x418 @0x7
0x0411…0459 at0008 = ╱4b╱K╱ // 0x419 @0x8
0x0411…0459 at0009 = ╱ef╱$╱ // 0x41a @0x9
0x0411…0459 at000a = ╱dc╱=╱ // 0x41b @0xa
0x0411…0459 at000b = ╱22╱"╱ // 0x41c @0xb
0x0411…0459 at000c = ╱20╱…╱ // 0x41d @0xc
0x0411…0459 at000d = ╱20╱…╱ // 0x41e @0xd
0x0411…0459 at000e = ╱20╱…╱ // 0x41f @0xe
0x0411…0459 at000f = ╱20╱…╱ // 0x420 @0xf
0x0411…0459 at0010 = ╱20╱…╱ // 0x421 @0x10
0x0411…0459 at0011 = ╱20╱…╱ // 0x422 @0x11
0x0411…0459 at0012 = ╱20╱…╱ // 0x423 @0x12
0x0411…0459 at0013 = ╱20╱…╱ // 0x424 @0x13
0x0411…0459 at0014 = ╱20╱…╱ // 0x425 @0x14
0x0411…0459 at0015 = ╱20╱…╱ // 0x426 @0x15
0x0411…0459 at0016 = ╱20╱…╱ // 0x427 @0x16
0x0411…0459 at0017 = ╱20╱…╱ // 0x428 @0x17
0x0411…0459 at0018 = ╱20╱…╱ // 0x429 @0x18
0x0411…0459 at0019 = ╱20╱…╱ // 0x42a @0x19
0x0411…0459 at001a = ╱20╱…╱ // 0x42b @0x1a
0x0411…0459 at001b = ╱20╱…╱ // 0x42c @0x1b
0x0411…0459 at001c = ╱20╱…╱ // 0x42d @0x1c
0x0411…0459 at001d = ╱20╱…╱ // 0x42e @0x1d
0x0411…0459 at001e = ╱20╱…╱ // 0x42f @0x1e
0x0411…0459 at001f = ╱20╱…╱ // 0x430 @0x1f
0x0411…0459 at0020 = ╱20╱…╱ // 0x431 @0x20
0x0411…0459 at0021 = ╱20╱…╱ // 0x432 @0x21
0x0411…0459 at0022 = ╱20╱…╱ // 0x433 @0x22
0x0411…0459 at0023 = ╱20╱…╱ // 0x434 @0x23
0x0411…0459 at0024 = ╱20╱…╱ // 0x435 @0x24
0x0411…0459 at0025 = ╱22╱"╱ // 0x436 @0x25
0x0411…0459 at0026 = ╱eb╱;╱ // 0x437 @0x26
0x0411…0459 at0027 = ╱42╱B╱ // 0x438 @0x27
0x0411…0459 at0028 = ╱4c╱L╱ // 0x439 @0x28
0x0411…0459 at0029 = ╱41╱A╱ // 0x43a @0x29
0x0411…0459 at002a = ╱4e╱N╱ // 0x43b @0x2a
0x0411…0459 at002b = ╱4b╱K╱ // 0x43c @0x2b
0x0411…0459 at002c = ╱ef╱$╱ // 0x43d @0x2c
0x0411…0459 at002d = ╱dc╱=╱ // 0x43e @0x2d
0x0411…0459 at002e = ╱42╱B╱ // 0x43f @0x2e
0x0411…0459 at002f = ╱4c╱L╱ // 0x440 @0x2f
0x0411…0459 at0030 = ╱41╱A╱ // 0x441 @0x30
0x0411…0459 at0031 = ╱4e╱N╱ // 0x442 @0x31
0x0411…0459 at0032 = ╱4b╱K╱ // 0x443 @0x32
0x0411…0459 at0033 = ╱ef╱$╱ // 0x444 @0x33
0x0411…0459 at0034 = ╱f1╱+╱ // 0x445 @0x34
0x0411…0459 at0035 = ╱42╱B╱ // 0x446 @0x35
0x0411…0459 at0036 = ╱4c╱L╱ // 0x447 @0x36
0x0411…0459 at0037 = ╱41╱A╱ // 0x448 @0x37
0x0411…0459 at0038 = ╱4e╱N╱ // 0x449 @0x38
0x0411…0459 at0039 = ╱4b╱K╱ // 0x44a @0x39
0x0411…0459 at003a = ╱ef╱$╱ // 0x44b @0x3a
0x0411…0459 at003b = ╱f1╱+╱ // 0x44c @0x3b
0x0411…0459 at003c = ╱42╱B╱ // 0x44d @0x3c
0x0411…0459 at003d = ╱4c╱L╱ // 0x44e @0x3d
0x0411…0459 at003e = ╱41╱A╱ // 0x44f @0x3e
0x0411…0459 at003f = ╱4e╱N╱ // 0x450 @0x3f
0x0411…0459 at0040 = ╱4b╱K╱ // 0x451 @0x40
0x0411…0459 at0041 = ╱ef╱$╱ // 0x452 @0x41
0x0411…0459 at0042 = ╱f1╱+╱ // 0x453 @0x42
0x0411…0459 at0043 = ╱22╱"╱ // 0x454 @0x43
0x0411…0459 at0044 = ╱20╱…╱ // 0x455 @0x44
0x0411…0459 at0045 = ╱20╱…╱ // 0x456 @0x45
0x0411…0459 at0046 = ╱22╱"╱ // 0x457 @0x46
0x0411…0459 at0047 = EOL // 0x458 @0x47
0x0411…0459 }
0x0459…04a4 91fb 0220 LTX1$="Rabat ";LTX3$="Fakturering. Indtast kundenummer, 0 for færdig:"
0x0459…04a4 LineComalBin {
0x0459…04a4 ptr = 0x91fb // 0x459 @0x0
0x0459…04a4 lno = 0x00dc // 0x45b @0x2
0x0459…04a4 at0004 = ╱4c╱L╱ // 0x45d @0x4
0x0459…04a4 at0005 = ╱54╱T╱ // 0x45e @0x5
0x0459…04a4 at0006 = ╱58╱X╱ // 0x45f @0x6
0x0459…04a4 at0007 = ╱31╱1╱ // 0x460 @0x7
0x0459…04a4 at0008 = ╱ef╱$╱ // 0x461 @0x8
0x0459…04a4 at0009 = ╱dc╱=╱ // 0x462 @0x9
0x0459…04a4 at000a = ╱22╱"╱ // 0x463 @0xa
0x0459…04a4 at000b = ╱52╱R╱ // 0x464 @0xb
0x0459…04a4 at000c = ╱61╱a╱ // 0x465 @0xc
0x0459…04a4 at000d = ╱62╱b╱ // 0x466 @0xd
0x0459…04a4 at000e = ╱61╱a╱ // 0x467 @0xe
0x0459…04a4 at000f = ╱74╱t╱ // 0x468 @0xf
0x0459…04a4 at0010 = ╱20╱…╱ // 0x469 @0x10
0x0459…04a4 at0011 = ╱22╱"╱ // 0x46a @0x11
0x0459…04a4 at0012 = ╱eb╱;╱ // 0x46b @0x12
0x0459…04a4 at0013 = ╱4c╱L╱ // 0x46c @0x13
0x0459…04a4 at0014 = ╱54╱T╱ // 0x46d @0x14
0x0459…04a4 at0015 = ╱58╱X╱ // 0x46e @0x15
0x0459…04a4 at0016 = ╱33╱3╱ // 0x46f @0x16
0x0459…04a4 at0017 = ╱ef╱$╱ // 0x470 @0x17
0x0459…04a4 at0018 = ╱dc╱=╱ // 0x471 @0x18
0x0459…04a4 at0019 = ╱22╱"╱ // 0x472 @0x19
0x0459…04a4 at001a = ╱46╱F╱ // 0x473 @0x1a
0x0459…04a4 at001b = ╱61╱a╱ // 0x474 @0x1b
0x0459…04a4 at001c = ╱6b╱k╱ // 0x475 @0x1c
0x0459…04a4 at001d = ╱74╱t╱ // 0x476 @0x1d
0x0459…04a4 at001e = ╱75╱u╱ // 0x477 @0x1e
0x0459…04a4 at001f = ╱72╱r╱ // 0x478 @0x1f
0x0459…04a4 at0020 = ╱65╱e╱ // 0x479 @0x20
0x0459…04a4 at0021 = ╱72╱r╱ // 0x47a @0x21
0x0459…04a4 at0022 = ╱69╱i╱ // 0x47b @0x22
0x0459…04a4 at0023 = ╱6e╱n╱ // 0x47c @0x23
0x0459…04a4 at0024 = ╱67╱g╱ // 0x47d @0x24
0x0459…04a4 at0025 = ╱2e╱.╱ // 0x47e @0x25
0x0459…04a4 at0026 = ╱20╱…╱ // 0x47f @0x26
0x0459…04a4 at0027 = ╱49╱I╱ // 0x480 @0x27
0x0459…04a4 at0028 = ╱6e╱n╱ // 0x481 @0x28
0x0459…04a4 at0029 = ╱64╱d╱ // 0x482 @0x29
0x0459…04a4 at002a = ╱74╱t╱ // 0x483 @0x2a
0x0459…04a4 at002b = ╱61╱a╱ // 0x484 @0x2b
0x0459…04a4 at002c = ╱73╱s╱ // 0x485 @0x2c
0x0459…04a4 at002d = ╱74╱t╱ // 0x486 @0x2d
0x0459…04a4 at002e = ╱20╱…╱ // 0x487 @0x2e
0x0459…04a4 at002f = ╱6b╱k╱ // 0x488 @0x2f
0x0459…04a4 at0030 = ╱75╱u╱ // 0x489 @0x30
0x0459…04a4 at0031 = ╱6e╱n╱ // 0x48a @0x31
0x0459…04a4 at0032 = ╱64╱d╱ // 0x48b @0x32
0x0459…04a4 at0033 = ╱65╱e╱ // 0x48c @0x33
0x0459…04a4 at0034 = ╱6e╱n╱ // 0x48d @0x34
0x0459…04a4 at0035 = ╱75╱u╱ // 0x48e @0x35
0x0459…04a4 at0036 = ╱6d╱m╱ // 0x48f @0x36
0x0459…04a4 at0037 = ╱6d╱m╱ // 0x490 @0x37
0x0459…04a4 at0038 = ╱65╱e╱ // 0x491 @0x38
0x0459…04a4 at0039 = ╱72╱r╱ // 0x492 @0x39
0x0459…04a4 at003a = ╱2c╱,╱ // 0x493 @0x3a
0x0459…04a4 at003b = ╱20╱…╱ // 0x494 @0x3b
0x0459…04a4 at003c = ╱30╱0╱ // 0x495 @0x3c
0x0459…04a4 at003d = ╱20╱…╱ // 0x496 @0x3d
0x0459…04a4 at003e = ╱66╱f╱ // 0x497 @0x3e
0x0459…04a4 at003f = ╱6f╱o╱ // 0x498 @0x3f
0x0459…04a4 at0040 = ╱72╱r╱ // 0x499 @0x40
0x0459…04a4 at0041 = ╱20╱…╱ // 0x49a @0x41
0x0459…04a4 at0042 = ╱66╱f╱ // 0x49b @0x42
0x0459…04a4 at0043 = ╱7b╱æ╱ // 0x49c @0x43
0x0459…04a4 at0044 = ╱72╱r╱ // 0x49d @0x44
0x0459…04a4 at0045 = ╱64╱d╱ // 0x49e @0x45
0x0459…04a4 at0046 = ╱69╱i╱ // 0x49f @0x46
0x0459…04a4 at0047 = ╱67╱g╱ // 0x4a0 @0x47
0x0459…04a4 at0048 = ╱3a╱:╱ // 0x4a1 @0x48
0x0459…04a4 at0049 = ╱22╱"╱ // 0x4a2 @0x49
0x0459…04a4 at004a = EOL // 0x4a3 @0x4a
0x0459…04a4 }
0x04a4…04ed 9244 0230 LTX2$="Korrekt forsendelsesbeløb (J/N):";LTX4$="Rigtig kunde (J/N):"
0x04a4…04ed LineComalBin {
0x04a4…04ed ptr = 0x9244 // 0x4a4 @0x0
0x04a4…04ed lno = 0x00e6 // 0x4a6 @0x2
0x04a4…04ed at0004 = ╱4c╱L╱ // 0x4a8 @0x4
0x04a4…04ed at0005 = ╱54╱T╱ // 0x4a9 @0x5
0x04a4…04ed at0006 = ╱58╱X╱ // 0x4aa @0x6
0x04a4…04ed at0007 = ╱32╱2╱ // 0x4ab @0x7
0x04a4…04ed at0008 = ╱ef╱$╱ // 0x4ac @0x8
0x04a4…04ed at0009 = ╱dc╱=╱ // 0x4ad @0x9
0x04a4…04ed at000a = ╱22╱"╱ // 0x4ae @0xa
0x04a4…04ed at000b = ╱4b╱K╱ // 0x4af @0xb
0x04a4…04ed at000c = ╱6f╱o╱ // 0x4b0 @0xc
0x04a4…04ed at000d = ╱72╱r╱ // 0x4b1 @0xd
0x04a4…04ed at000e = ╱72╱r╱ // 0x4b2 @0xe
0x04a4…04ed at000f = ╱65╱e╱ // 0x4b3 @0xf
0x04a4…04ed at0010 = ╱6b╱k╱ // 0x4b4 @0x10
0x04a4…04ed at0011 = ╱74╱t╱ // 0x4b5 @0x11
0x04a4…04ed at0012 = ╱20╱…╱ // 0x4b6 @0x12
0x04a4…04ed at0013 = ╱66╱f╱ // 0x4b7 @0x13
0x04a4…04ed at0014 = ╱6f╱o╱ // 0x4b8 @0x14
0x04a4…04ed at0015 = ╱72╱r╱ // 0x4b9 @0x15
0x04a4…04ed at0016 = ╱73╱s╱ // 0x4ba @0x16
0x04a4…04ed at0017 = ╱65╱e╱ // 0x4bb @0x17
0x04a4…04ed at0018 = ╱6e╱n╱ // 0x4bc @0x18
0x04a4…04ed at0019 = ╱64╱d╱ // 0x4bd @0x19
0x04a4…04ed at001a = ╱65╱e╱ // 0x4be @0x1a
0x04a4…04ed at001b = ╱6c╱l╱ // 0x4bf @0x1b
0x04a4…04ed at001c = ╱73╱s╱ // 0x4c0 @0x1c
0x04a4…04ed at001d = ╱65╱e╱ // 0x4c1 @0x1d
0x04a4…04ed at001e = ╱73╱s╱ // 0x4c2 @0x1e
0x04a4…04ed at001f = ╱62╱b╱ // 0x4c3 @0x1f
0x04a4…04ed at0020 = ╱65╱e╱ // 0x4c4 @0x20
0x04a4…04ed at0021 = ╱6c╱l╱ // 0x4c5 @0x21
0x04a4…04ed at0022 = ╱7c╱ø╱ // 0x4c6 @0x22
0x04a4…04ed at0023 = ╱62╱b╱ // 0x4c7 @0x23
0x04a4…04ed at0024 = ╱20╱…╱ // 0x4c8 @0x24
0x04a4…04ed at0025 = ╱28╱(╱ // 0x4c9 @0x25
0x04a4…04ed at0026 = ╱4a╱J╱ // 0x4ca @0x26
0x04a4…04ed at0027 = ╱2f╱/╱ // 0x4cb @0x27
0x04a4…04ed at0028 = ╱4e╱N╱ // 0x4cc @0x28
0x04a4…04ed at0029 = ╱29╱)╱ // 0x4cd @0x29
0x04a4…04ed at002a = ╱3a╱:╱ // 0x4ce @0x2a
0x04a4…04ed at002b = ╱22╱"╱ // 0x4cf @0x2b
0x04a4…04ed at002c = ╱eb╱;╱ // 0x4d0 @0x2c
0x04a4…04ed at002d = ╱4c╱L╱ // 0x4d1 @0x2d
0x04a4…04ed at002e = ╱54╱T╱ // 0x4d2 @0x2e
0x04a4…04ed at002f = ╱58╱X╱ // 0x4d3 @0x2f
0x04a4…04ed at0030 = ╱34╱4╱ // 0x4d4 @0x30
0x04a4…04ed at0031 = ╱ef╱$╱ // 0x4d5 @0x31
0x04a4…04ed at0032 = ╱dc╱=╱ // 0x4d6 @0x32
0x04a4…04ed at0033 = ╱22╱"╱ // 0x4d7 @0x33
0x04a4…04ed at0034 = ╱52╱R╱ // 0x4d8 @0x34
0x04a4…04ed at0035 = ╱69╱i╱ // 0x4d9 @0x35
0x04a4…04ed at0036 = ╱67╱g╱ // 0x4da @0x36
0x04a4…04ed at0037 = ╱74╱t╱ // 0x4db @0x37
0x04a4…04ed at0038 = ╱69╱i╱ // 0x4dc @0x38
0x04a4…04ed at0039 = ╱67╱g╱ // 0x4dd @0x39
0x04a4…04ed at003a = ╱20╱…╱ // 0x4de @0x3a
0x04a4…04ed at003b = ╱6b╱k╱ // 0x4df @0x3b
0x04a4…04ed at003c = ╱75╱u╱ // 0x4e0 @0x3c
0x04a4…04ed at003d = ╱6e╱n╱ // 0x4e1 @0x3d
0x04a4…04ed at003e = ╱64╱d╱ // 0x4e2 @0x3e
0x04a4…04ed at003f = ╱65╱e╱ // 0x4e3 @0x3f
0x04a4…04ed at0040 = ╱20╱…╱ // 0x4e4 @0x40
0x04a4…04ed at0041 = ╱28╱(╱ // 0x4e5 @0x41
0x04a4…04ed at0042 = ╱4a╱J╱ // 0x4e6 @0x42
0x04a4…04ed at0043 = ╱2f╱/╱ // 0x4e7 @0x43
0x04a4…04ed at0044 = ╱4e╱N╱ // 0x4e8 @0x44
0x04a4…04ed at0045 = ╱29╱)╱ // 0x4e9 @0x45
0x04a4…04ed at0046 = ╱3a╱:╱ // 0x4ea @0x46
0x04a4…04ed at0047 = ╱22╱"╱ // 0x4eb @0x47
0x04a4…04ed at0048 = EOL // 0x4ec @0x48
0x04a4…04ed }
0x04ed…0534 928b 0240 LTX5$="Ordrenr.: ";LTX7$="Der er ikke plads til ny faktura."
0x04ed…0534 LineComalBin {
0x04ed…0534 ptr = 0x928b // 0x4ed @0x0
0x04ed…0534 lno = 0x00f0 // 0x4ef @0x2
0x04ed…0534 at0004 = ╱4c╱L╱ // 0x4f1 @0x4
0x04ed…0534 at0005 = ╱54╱T╱ // 0x4f2 @0x5
0x04ed…0534 at0006 = ╱58╱X╱ // 0x4f3 @0x6
0x04ed…0534 at0007 = ╱35╱5╱ // 0x4f4 @0x7
0x04ed…0534 at0008 = ╱ef╱$╱ // 0x4f5 @0x8
0x04ed…0534 at0009 = ╱dc╱=╱ // 0x4f6 @0x9
0x04ed…0534 at000a = ╱22╱"╱ // 0x4f7 @0xa
0x04ed…0534 at000b = ╱4f╱O╱ // 0x4f8 @0xb
0x04ed…0534 at000c = ╱72╱r╱ // 0x4f9 @0xc
0x04ed…0534 at000d = ╱64╱d╱ // 0x4fa @0xd
0x04ed…0534 at000e = ╱72╱r╱ // 0x4fb @0xe
0x04ed…0534 at000f = ╱65╱e╱ // 0x4fc @0xf
0x04ed…0534 at0010 = ╱6e╱n╱ // 0x4fd @0x10
0x04ed…0534 at0011 = ╱72╱r╱ // 0x4fe @0x11
0x04ed…0534 at0012 = ╱2e╱.╱ // 0x4ff @0x12
0x04ed…0534 at0013 = ╱3a╱:╱ // 0x500 @0x13
0x04ed…0534 at0014 = ╱20╱…╱ // 0x501 @0x14
0x04ed…0534 at0015 = ╱20╱…╱ // 0x502 @0x15
0x04ed…0534 at0016 = ╱20╱…╱ // 0x503 @0x16
0x04ed…0534 at0017 = ╱20╱…╱ // 0x504 @0x17
0x04ed…0534 at0018 = ╱20╱…╱ // 0x505 @0x18
0x04ed…0534 at0019 = ╱20╱…╱ // 0x506 @0x19
0x04ed…0534 at001a = ╱20╱…╱ // 0x507 @0x1a
0x04ed…0534 at001b = ╱22╱"╱ // 0x508 @0x1b
0x04ed…0534 at001c = ╱eb╱;╱ // 0x509 @0x1c
0x04ed…0534 at001d = ╱4c╱L╱ // 0x50a @0x1d
0x04ed…0534 at001e = ╱54╱T╱ // 0x50b @0x1e
0x04ed…0534 at001f = ╱58╱X╱ // 0x50c @0x1f
0x04ed…0534 at0020 = ╱37╱7╱ // 0x50d @0x20
0x04ed…0534 at0021 = ╱ef╱$╱ // 0x50e @0x21
0x04ed…0534 at0022 = ╱dc╱=╱ // 0x50f @0x22
0x04ed…0534 at0023 = ╱22╱"╱ // 0x510 @0x23
0x04ed…0534 at0024 = ╱44╱D╱ // 0x511 @0x24
0x04ed…0534 at0025 = ╱65╱e╱ // 0x512 @0x25
0x04ed…0534 at0026 = ╱72╱r╱ // 0x513 @0x26
0x04ed…0534 at0027 = ╱20╱…╱ // 0x514 @0x27
0x04ed…0534 at0028 = ╱65╱e╱ // 0x515 @0x28
0x04ed…0534 at0029 = ╱72╱r╱ // 0x516 @0x29
0x04ed…0534 at002a = ╱20╱…╱ // 0x517 @0x2a
0x04ed…0534 at002b = ╱69╱i╱ // 0x518 @0x2b
0x04ed…0534 at002c = ╱6b╱k╱ // 0x519 @0x2c
0x04ed…0534 at002d = ╱6b╱k╱ // 0x51a @0x2d
0x04ed…0534 at002e = ╱65╱e╱ // 0x51b @0x2e
0x04ed…0534 at002f = ╱20╱…╱ // 0x51c @0x2f
0x04ed…0534 at0030 = ╱70╱p╱ // 0x51d @0x30
0x04ed…0534 at0031 = ╱6c╱l╱ // 0x51e @0x31
0x04ed…0534 at0032 = ╱61╱a╱ // 0x51f @0x32
0x04ed…0534 at0033 = ╱64╱d╱ // 0x520 @0x33
0x04ed…0534 at0034 = ╱73╱s╱ // 0x521 @0x34
0x04ed…0534 at0035 = ╱20╱…╱ // 0x522 @0x35
0x04ed…0534 at0036 = ╱74╱t╱ // 0x523 @0x36
0x04ed…0534 at0037 = ╱69╱i╱ // 0x524 @0x37
0x04ed…0534 at0038 = ╱6c╱l╱ // 0x525 @0x38
0x04ed…0534 at0039 = ╱20╱…╱ // 0x526 @0x39
0x04ed…0534 at003a = ╱6e╱n╱ // 0x527 @0x3a
0x04ed…0534 at003b = ╱79╱y╱ // 0x528 @0x3b
0x04ed…0534 at003c = ╱20╱…╱ // 0x529 @0x3c
0x04ed…0534 at003d = ╱66╱f╱ // 0x52a @0x3d
0x04ed…0534 at003e = ╱61╱a╱ // 0x52b @0x3e
0x04ed…0534 at003f = ╱6b╱k╱ // 0x52c @0x3f
0x04ed…0534 at0040 = ╱74╱t╱ // 0x52d @0x40
0x04ed…0534 at0041 = ╱75╱u╱ // 0x52e @0x41
0x04ed…0534 at0042 = ╱72╱r╱ // 0x52f @0x42
0x04ed…0534 at0043 = ╱61╱a╱ // 0x530 @0x43
0x04ed…0534 at0044 = ╱2e╱.╱ // 0x531 @0x44
0x04ed…0534 at0045 = ╱22╱"╱ // 0x532 @0x45
0x04ed…0534 at0046 = EOL // 0x533 @0x46
0x04ed…0534 }
0x0534…0580 92d7 0250 LTX9$="Linie, som ønskes ændret:";LTX11$="Ønskes linien slettet (J/N):"
0x0534…0580 LineComalBin {
0x0534…0580 ptr = 0x92d7 // 0x534 @0x0
0x0534…0580 lno = 0x00fa // 0x536 @0x2
0x0534…0580 at0004 = ╱4c╱L╱ // 0x538 @0x4
0x0534…0580 at0005 = ╱54╱T╱ // 0x539 @0x5
0x0534…0580 at0006 = ╱58╱X╱ // 0x53a @0x6
0x0534…0580 at0007 = ╱39╱9╱ // 0x53b @0x7
0x0534…0580 at0008 = ╱ef╱$╱ // 0x53c @0x8
0x0534…0580 at0009 = ╱dc╱=╱ // 0x53d @0x9
0x0534…0580 at000a = ╱22╱"╱ // 0x53e @0xa
0x0534…0580 at000b = ╱4c╱L╱ // 0x53f @0xb
0x0534…0580 at000c = ╱69╱i╱ // 0x540 @0xc
0x0534…0580 at000d = ╱6e╱n╱ // 0x541 @0xd
0x0534…0580 at000e = ╱69╱i╱ // 0x542 @0xe
0x0534…0580 at000f = ╱65╱e╱ // 0x543 @0xf
0x0534…0580 at0010 = ╱2c╱,╱ // 0x544 @0x10
0x0534…0580 at0011 = ╱20╱…╱ // 0x545 @0x11
0x0534…0580 at0012 = ╱73╱s╱ // 0x546 @0x12
0x0534…0580 at0013 = ╱6f╱o╱ // 0x547 @0x13
0x0534…0580 at0014 = ╱6d╱m╱ // 0x548 @0x14
0x0534…0580 at0015 = ╱20╱…╱ // 0x549 @0x15
0x0534…0580 at0016 = ╱7c╱ø╱ // 0x54a @0x16
0x0534…0580 at0017 = ╱6e╱n╱ // 0x54b @0x17
0x0534…0580 at0018 = ╱73╱s╱ // 0x54c @0x18
0x0534…0580 at0019 = ╱6b╱k╱ // 0x54d @0x19
0x0534…0580 at001a = ╱65╱e╱ // 0x54e @0x1a
0x0534…0580 at001b = ╱73╱s╱ // 0x54f @0x1b
0x0534…0580 at001c = ╱20╱…╱ // 0x550 @0x1c
0x0534…0580 at001d = ╱7b╱æ╱ // 0x551 @0x1d
0x0534…0580 at001e = ╱6e╱n╱ // 0x552 @0x1e
0x0534…0580 at001f = ╱64╱d╱ // 0x553 @0x1f
0x0534…0580 at0020 = ╱72╱r╱ // 0x554 @0x20
0x0534…0580 at0021 = ╱65╱e╱ // 0x555 @0x21
0x0534…0580 at0022 = ╱74╱t╱ // 0x556 @0x22
0x0534…0580 at0023 = ╱3a╱:╱ // 0x557 @0x23
0x0534…0580 at0024 = ╱22╱"╱ // 0x558 @0x24
0x0534…0580 at0025 = ╱eb╱;╱ // 0x559 @0x25
0x0534…0580 at0026 = ╱4c╱L╱ // 0x55a @0x26
0x0534…0580 at0027 = ╱54╱T╱ // 0x55b @0x27
0x0534…0580 at0028 = ╱58╱X╱ // 0x55c @0x28
0x0534…0580 at0029 = ╱31╱1╱ // 0x55d @0x29
0x0534…0580 at002a = ╱31╱1╱ // 0x55e @0x2a
0x0534…0580 at002b = ╱ef╱$╱ // 0x55f @0x2b
0x0534…0580 at002c = ╱dc╱=╱ // 0x560 @0x2c
0x0534…0580 at002d = ╱22╱"╱ // 0x561 @0x2d
0x0534…0580 at002e = ╱5c╱Ø╱ // 0x562 @0x2e
0x0534…0580 at002f = ╱6e╱n╱ // 0x563 @0x2f
0x0534…0580 at0030 = ╱73╱s╱ // 0x564 @0x30
0x0534…0580 at0031 = ╱6b╱k╱ // 0x565 @0x31
0x0534…0580 at0032 = ╱65╱e╱ // 0x566 @0x32
0x0534…0580 at0033 = ╱73╱s╱ // 0x567 @0x33
0x0534…0580 at0034 = ╱20╱…╱ // 0x568 @0x34
0x0534…0580 at0035 = ╱6c╱l╱ // 0x569 @0x35
0x0534…0580 at0036 = ╱69╱i╱ // 0x56a @0x36
0x0534…0580 at0037 = ╱6e╱n╱ // 0x56b @0x37
0x0534…0580 at0038 = ╱69╱i╱ // 0x56c @0x38
0x0534…0580 at0039 = ╱65╱e╱ // 0x56d @0x39
0x0534…0580 at003a = ╱6e╱n╱ // 0x56e @0x3a
0x0534…0580 at003b = ╱20╱…╱ // 0x56f @0x3b
0x0534…0580 at003c = ╱73╱s╱ // 0x570 @0x3c
0x0534…0580 at003d = ╱6c╱l╱ // 0x571 @0x3d
0x0534…0580 at003e = ╱65╱e╱ // 0x572 @0x3e
0x0534…0580 at003f = ╱74╱t╱ // 0x573 @0x3f
0x0534…0580 at0040 = ╱74╱t╱ // 0x574 @0x40
0x0534…0580 at0041 = ╱65╱e╱ // 0x575 @0x41
0x0534…0580 at0042 = ╱74╱t╱ // 0x576 @0x42
0x0534…0580 at0043 = ╱20╱…╱ // 0x577 @0x43
0x0534…0580 at0044 = ╱28╱(╱ // 0x578 @0x44
0x0534…0580 at0045 = ╱4a╱J╱ // 0x579 @0x45
0x0534…0580 at0046 = ╱2f╱/╱ // 0x57a @0x46
0x0534…0580 at0047 = ╱4e╱N╱ // 0x57b @0x47
0x0534…0580 at0048 = ╱29╱)╱ // 0x57c @0x48
0x0534…0580 at0049 = ╱3a╱:╱ // 0x57d @0x49
0x0534…0580 at004a = ╱22╱"╱ // 0x57e @0x4a
0x0534…0580 at004b = EOL // 0x57f @0x4b
0x0534…0580 }
0x0580…05c7 931e 0260 LTX8$="Vælg 1-5:";LTX12$="Linie fra hvilken der ønskes udskrevet:"
0x0580…05c7 LineComalBin {
0x0580…05c7 ptr = 0x931e // 0x580 @0x0
0x0580…05c7 lno = 0x0104 // 0x582 @0x2
0x0580…05c7 at0004 = ╱4c╱L╱ // 0x584 @0x4
0x0580…05c7 at0005 = ╱54╱T╱ // 0x585 @0x5
0x0580…05c7 at0006 = ╱58╱X╱ // 0x586 @0x6
0x0580…05c7 at0007 = ╱38╱8╱ // 0x587 @0x7
0x0580…05c7 at0008 = ╱ef╱$╱ // 0x588 @0x8
0x0580…05c7 at0009 = ╱dc╱=╱ // 0x589 @0x9
0x0580…05c7 at000a = ╱22╱"╱ // 0x58a @0xa
0x0580…05c7 at000b = ╱56╱V╱ // 0x58b @0xb
0x0580…05c7 at000c = ╱7b╱æ╱ // 0x58c @0xc
0x0580…05c7 at000d = ╱6c╱l╱ // 0x58d @0xd
0x0580…05c7 at000e = ╱67╱g╱ // 0x58e @0xe
0x0580…05c7 at000f = ╱20╱…╱ // 0x58f @0xf
0x0580…05c7 at0010 = ╱31╱1╱ // 0x590 @0x10
0x0580…05c7 at0011 = ╱2d╱-╱ // 0x591 @0x11
0x0580…05c7 at0012 = ╱35╱5╱ // 0x592 @0x12
0x0580…05c7 at0013 = ╱3a╱:╱ // 0x593 @0x13
0x0580…05c7 at0014 = ╱22╱"╱ // 0x594 @0x14
0x0580…05c7 at0015 = ╱eb╱;╱ // 0x595 @0x15
0x0580…05c7 at0016 = ╱4c╱L╱ // 0x596 @0x16
0x0580…05c7 at0017 = ╱54╱T╱ // 0x597 @0x17
0x0580…05c7 at0018 = ╱58╱X╱ // 0x598 @0x18
0x0580…05c7 at0019 = ╱31╱1╱ // 0x599 @0x19
0x0580…05c7 at001a = ╱32╱2╱ // 0x59a @0x1a
0x0580…05c7 at001b = ╱ef╱$╱ // 0x59b @0x1b
0x0580…05c7 at001c = ╱dc╱=╱ // 0x59c @0x1c
0x0580…05c7 at001d = ╱22╱"╱ // 0x59d @0x1d
0x0580…05c7 at001e = ╱4c╱L╱ // 0x59e @0x1e
0x0580…05c7 at001f = ╱69╱i╱ // 0x59f @0x1f
0x0580…05c7 at0020 = ╱6e╱n╱ // 0x5a0 @0x20
0x0580…05c7 at0021 = ╱69╱i╱ // 0x5a1 @0x21
0x0580…05c7 at0022 = ╱65╱e╱ // 0x5a2 @0x22
0x0580…05c7 at0023 = ╱20╱…╱ // 0x5a3 @0x23
0x0580…05c7 at0024 = ╱66╱f╱ // 0x5a4 @0x24
0x0580…05c7 at0025 = ╱72╱r╱ // 0x5a5 @0x25
0x0580…05c7 at0026 = ╱61╱a╱ // 0x5a6 @0x26
0x0580…05c7 at0027 = ╱20╱…╱ // 0x5a7 @0x27
0x0580…05c7 at0028 = ╱68╱h╱ // 0x5a8 @0x28
0x0580…05c7 at0029 = ╱76╱v╱ // 0x5a9 @0x29
0x0580…05c7 at002a = ╱69╱i╱ // 0x5aa @0x2a
0x0580…05c7 at002b = ╱6c╱l╱ // 0x5ab @0x2b
0x0580…05c7 at002c = ╱6b╱k╱ // 0x5ac @0x2c
0x0580…05c7 at002d = ╱65╱e╱ // 0x5ad @0x2d
0x0580…05c7 at002e = ╱6e╱n╱ // 0x5ae @0x2e
0x0580…05c7 at002f = ╱20╱…╱ // 0x5af @0x2f
0x0580…05c7 at0030 = ╱64╱d╱ // 0x5b0 @0x30
0x0580…05c7 at0031 = ╱65╱e╱ // 0x5b1 @0x31
0x0580…05c7 at0032 = ╱72╱r╱ // 0x5b2 @0x32
0x0580…05c7 at0033 = ╱20╱…╱ // 0x5b3 @0x33
0x0580…05c7 at0034 = ╱7c╱ø╱ // 0x5b4 @0x34
0x0580…05c7 at0035 = ╱6e╱n╱ // 0x5b5 @0x35
0x0580…05c7 at0036 = ╱73╱s╱ // 0x5b6 @0x36
0x0580…05c7 at0037 = ╱6b╱k╱ // 0x5b7 @0x37
0x0580…05c7 at0038 = ╱65╱e╱ // 0x5b8 @0x38
0x0580…05c7 at0039 = ╱73╱s╱ // 0x5b9 @0x39
0x0580…05c7 at003a = ╱20╱…╱ // 0x5ba @0x3a
0x0580…05c7 at003b = ╱75╱u╱ // 0x5bb @0x3b
0x0580…05c7 at003c = ╱64╱d╱ // 0x5bc @0x3c
0x0580…05c7 at003d = ╱73╱s╱ // 0x5bd @0x3d
0x0580…05c7 at003e = ╱6b╱k╱ // 0x5be @0x3e
0x0580…05c7 at003f = ╱72╱r╱ // 0x5bf @0x3f
0x0580…05c7 at0040 = ╱65╱e╱ // 0x5c0 @0x40
0x0580…05c7 at0041 = ╱76╱v╱ // 0x5c1 @0x41
0x0580…05c7 at0042 = ╱65╱e╱ // 0x5c2 @0x42
0x0580…05c7 at0043 = ╱74╱t╱ // 0x5c3 @0x43
0x0580…05c7 at0044 = ╱3a╱:╱ // 0x5c4 @0x44
0x0580…05c7 at0045 = ╱22╱"╱ // 0x5c5 @0x45
0x0580…05c7 at0046 = EOL // 0x5c6 @0x46
0x0580…05c7 }
0x05c7…05f3 934a 0270 LTX6$="Fakturahoved godkendes (J/N): "
0x05c7…05f3 LineComalBin {
0x05c7…05f3 ptr = 0x934a // 0x5c7 @0x0
0x05c7…05f3 lno = 0x010e // 0x5c9 @0x2
0x05c7…05f3 at0004 = ╱4c╱L╱ // 0x5cb @0x4
0x05c7…05f3 at0005 = ╱54╱T╱ // 0x5cc @0x5
0x05c7…05f3 at0006 = ╱58╱X╱ // 0x5cd @0x6
0x05c7…05f3 at0007 = ╱36╱6╱ // 0x5ce @0x7
0x05c7…05f3 at0008 = ╱ef╱$╱ // 0x5cf @0x8
0x05c7…05f3 at0009 = ╱dc╱=╱ // 0x5d0 @0x9
0x05c7…05f3 at000a = ╱22╱"╱ // 0x5d1 @0xa
0x05c7…05f3 at000b = ╱46╱F╱ // 0x5d2 @0xb
0x05c7…05f3 at000c = ╱61╱a╱ // 0x5d3 @0xc
0x05c7…05f3 at000d = ╱6b╱k╱ // 0x5d4 @0xd
0x05c7…05f3 at000e = ╱74╱t╱ // 0x5d5 @0xe
0x05c7…05f3 at000f = ╱75╱u╱ // 0x5d6 @0xf
0x05c7…05f3 at0010 = ╱72╱r╱ // 0x5d7 @0x10
0x05c7…05f3 at0011 = ╱61╱a╱ // 0x5d8 @0x11
0x05c7…05f3 at0012 = ╱68╱h╱ // 0x5d9 @0x12
0x05c7…05f3 at0013 = ╱6f╱o╱ // 0x5da @0x13
0x05c7…05f3 at0014 = ╱76╱v╱ // 0x5db @0x14
0x05c7…05f3 at0015 = ╱65╱e╱ // 0x5dc @0x15
0x05c7…05f3 at0016 = ╱64╱d╱ // 0x5dd @0x16
0x05c7…05f3 at0017 = ╱20╱…╱ // 0x5de @0x17
0x05c7…05f3 at0018 = ╱67╱g╱ // 0x5df @0x18
0x05c7…05f3 at0019 = ╱6f╱o╱ // 0x5e0 @0x19
0x05c7…05f3 at001a = ╱64╱d╱ // 0x5e1 @0x1a
0x05c7…05f3 at001b = ╱6b╱k╱ // 0x5e2 @0x1b
0x05c7…05f3 at001c = ╱65╱e╱ // 0x5e3 @0x1c
0x05c7…05f3 at001d = ╱6e╱n╱ // 0x5e4 @0x1d
0x05c7…05f3 at001e = ╱64╱d╱ // 0x5e5 @0x1e
0x05c7…05f3 at001f = ╱65╱e╱ // 0x5e6 @0x1f
0x05c7…05f3 at0020 = ╱73╱s╱ // 0x5e7 @0x20
0x05c7…05f3 at0021 = ╱20╱…╱ // 0x5e8 @0x21
0x05c7…05f3 at0022 = ╱28╱(╱ // 0x5e9 @0x22
0x05c7…05f3 at0023 = ╱4a╱J╱ // 0x5ea @0x23
0x05c7…05f3 at0024 = ╱2f╱/╱ // 0x5eb @0x24
0x05c7…05f3 at0025 = ╱4e╱N╱ // 0x5ec @0x25
0x05c7…05f3 at0026 = ╱29╱)╱ // 0x5ed @0x26
0x05c7…05f3 at0027 = ╱3a╱:╱ // 0x5ee @0x27
0x05c7…05f3 at0028 = ╱20╱…╱ // 0x5ef @0x28
0x05c7…05f3 at0029 = ╱20╱…╱ // 0x5f0 @0x29
0x05c7…05f3 at002a = ╱22╱"╱ // 0x5f1 @0x2a
0x05c7…05f3 at002b = EOL // 0x5f2 @0x2b
0x05c7…05f3 }
0x05f3…0622 9379 0280 LTX13$="Hvilket linienummer for ny linie:"
0x05f3…0622 LineComalBin {
0x05f3…0622 ptr = 0x9379 // 0x5f3 @0x0
0x05f3…0622 lno = 0x0118 // 0x5f5 @0x2
0x05f3…0622 at0004 = ╱4c╱L╱ // 0x5f7 @0x4
0x05f3…0622 at0005 = ╱54╱T╱ // 0x5f8 @0x5
0x05f3…0622 at0006 = ╱58╱X╱ // 0x5f9 @0x6
0x05f3…0622 at0007 = ╱31╱1╱ // 0x5fa @0x7
0x05f3…0622 at0008 = ╱33╱3╱ // 0x5fb @0x8
0x05f3…0622 at0009 = ╱ef╱$╱ // 0x5fc @0x9
0x05f3…0622 at000a = ╱dc╱=╱ // 0x5fd @0xa
0x05f3…0622 at000b = ╱22╱"╱ // 0x5fe @0xb
0x05f3…0622 at000c = ╱48╱H╱ // 0x5ff @0xc
0x05f3…0622 at000d = ╱76╱v╱ // 0x600 @0xd
0x05f3…0622 at000e = ╱69╱i╱ // 0x601 @0xe
0x05f3…0622 at000f = ╱6c╱l╱ // 0x602 @0xf
0x05f3…0622 at0010 = ╱6b╱k╱ // 0x603 @0x10
0x05f3…0622 at0011 = ╱65╱e╱ // 0x604 @0x11
0x05f3…0622 at0012 = ╱74╱t╱ // 0x605 @0x12
0x05f3…0622 at0013 = ╱20╱…╱ // 0x606 @0x13
0x05f3…0622 at0014 = ╱6c╱l╱ // 0x607 @0x14
0x05f3…0622 at0015 = ╱69╱i╱ // 0x608 @0x15
0x05f3…0622 at0016 = ╱6e╱n╱ // 0x609 @0x16
0x05f3…0622 at0017 = ╱69╱i╱ // 0x60a @0x17
0x05f3…0622 at0018 = ╱65╱e╱ // 0x60b @0x18
0x05f3…0622 at0019 = ╱6e╱n╱ // 0x60c @0x19
0x05f3…0622 at001a = ╱75╱u╱ // 0x60d @0x1a
0x05f3…0622 at001b = ╱6d╱m╱ // 0x60e @0x1b
0x05f3…0622 at001c = ╱6d╱m╱ // 0x60f @0x1c
0x05f3…0622 at001d = ╱65╱e╱ // 0x610 @0x1d
0x05f3…0622 at001e = ╱72╱r╱ // 0x611 @0x1e
0x05f3…0622 at001f = ╱20╱…╱ // 0x612 @0x1f
0x05f3…0622 at0020 = ╱66╱f╱ // 0x613 @0x20
0x05f3…0622 at0021 = ╱6f╱o╱ // 0x614 @0x21
0x05f3…0622 at0022 = ╱72╱r╱ // 0x615 @0x22
0x05f3…0622 at0023 = ╱20╱…╱ // 0x616 @0x23
0x05f3…0622 at0024 = ╱6e╱n╱ // 0x617 @0x24
0x05f3…0622 at0025 = ╱79╱y╱ // 0x618 @0x25
0x05f3…0622 at0026 = ╱20╱…╱ // 0x619 @0x26
0x05f3…0622 at0027 = ╱6c╱l╱ // 0x61a @0x27
0x05f3…0622 at0028 = ╱69╱i╱ // 0x61b @0x28
0x05f3…0622 at0029 = ╱6e╱n╱ // 0x61c @0x29
0x05f3…0622 at002a = ╱69╱i╱ // 0x61d @0x2a
0x05f3…0622 at002b = ╱65╱e╱ // 0x61e @0x2b
0x05f3…0622 at002c = ╱3a╱:╱ // 0x61f @0x2c
0x05f3…0622 at002d = ╱22╱"╱ // 0x620 @0x2d
0x05f3…0622 at002e = EOL // 0x621 @0x2e
0x05f3…0622 }
0x0622…064a 93a1 0290 LTX10$="Linie, som ønskes slettet:"
0x0622…064a LineComalBin {
0x0622…064a ptr = 0x93a1 // 0x622 @0x0
0x0622…064a lno = 0x0122 // 0x624 @0x2
0x0622…064a at0004 = ╱4c╱L╱ // 0x626 @0x4
0x0622…064a at0005 = ╱54╱T╱ // 0x627 @0x5
0x0622…064a at0006 = ╱58╱X╱ // 0x628 @0x6
0x0622…064a at0007 = ╱31╱1╱ // 0x629 @0x7
0x0622…064a at0008 = ╱30╱0╱ // 0x62a @0x8
0x0622…064a at0009 = ╱ef╱$╱ // 0x62b @0x9
0x0622…064a at000a = ╱dc╱=╱ // 0x62c @0xa
0x0622…064a at000b = ╱22╱"╱ // 0x62d @0xb
0x0622…064a at000c = ╱4c╱L╱ // 0x62e @0xc
0x0622…064a at000d = ╱69╱i╱ // 0x62f @0xd
0x0622…064a at000e = ╱6e╱n╱ // 0x630 @0xe
0x0622…064a at000f = ╱69╱i╱ // 0x631 @0xf
0x0622…064a at0010 = ╱65╱e╱ // 0x632 @0x10
0x0622…064a at0011 = ╱2c╱,╱ // 0x633 @0x11
0x0622…064a at0012 = ╱20╱…╱ // 0x634 @0x12
0x0622…064a at0013 = ╱73╱s╱ // 0x635 @0x13
0x0622…064a at0014 = ╱6f╱o╱ // 0x636 @0x14
0x0622…064a at0015 = ╱6d╱m╱ // 0x637 @0x15
0x0622…064a at0016 = ╱20╱…╱ // 0x638 @0x16
0x0622…064a at0017 = ╱7c╱ø╱ // 0x639 @0x17
0x0622…064a at0018 = ╱6e╱n╱ // 0x63a @0x18
0x0622…064a at0019 = ╱73╱s╱ // 0x63b @0x19
0x0622…064a at001a = ╱6b╱k╱ // 0x63c @0x1a
0x0622…064a at001b = ╱65╱e╱ // 0x63d @0x1b
0x0622…064a at001c = ╱73╱s╱ // 0x63e @0x1c
0x0622…064a at001d = ╱20╱…╱ // 0x63f @0x1d
0x0622…064a at001e = ╱73╱s╱ // 0x640 @0x1e
0x0622…064a at001f = ╱6c╱l╱ // 0x641 @0x1f
0x0622…064a at0020 = ╱65╱e╱ // 0x642 @0x20
0x0622…064a at0021 = ╱74╱t╱ // 0x643 @0x21
0x0622…064a at0022 = ╱74╱t╱ // 0x644 @0x22
0x0622…064a at0023 = ╱65╱e╱ // 0x645 @0x23
0x0622…064a at0024 = ╱74╱t╱ // 0x646 @0x24
0x0622…064a at0025 = ╱3a╱:╱ // 0x647 @0x25
0x0622…064a at0026 = ╱22╱"╱ // 0x648 @0x26
0x0622…064a at0027 = EOL // 0x649 @0x27
0x0622…064a }
0x064a…0660 93b7 0300 PROC CA(AR3,B1,B2,ES)
0x064a…0660 LineComalBin {
0x064a…0660 ptr = 0x93b7 // 0x64a @0x0
0x064a…0660 lno = 0x012c // 0x64c @0x2
0x064a…0660 at0004 = ╱9e╱ PROC ╱ // 0x64e @0x4
0x064a…0660 at0005 = ╱43╱C╱ // 0x64f @0x5
0x064a…0660 at0006 = ╱41╱A╱ // 0x650 @0x6
0x064a…0660 at0007 = ╱ed╱(╱ // 0x651 @0x7
0x064a…0660 at0008 = ╱41╱A╱ // 0x652 @0x8
0x064a…0660 at0009 = ╱52╱R╱ // 0x653 @0x9
0x064a…0660 at000a = ╱33╱3╱ // 0x654 @0xa
0x064a…0660 at000b = ╱ec╱,╱ // 0x655 @0xb
0x064a…0660 at000c = ╱42╱B╱ // 0x656 @0xc
0x064a…0660 at000d = ╱31╱1╱ // 0x657 @0xd
0x064a…0660 at000e = ╱ec╱,╱ // 0x658 @0xe
0x064a…0660 at000f = ╱42╱B╱ // 0x659 @0xf
0x064a…0660 at0010 = ╱32╱2╱ // 0x65a @0x10
0x064a…0660 at0011 = ╱ec╱,╱ // 0x65b @0x11
0x064a…0660 at0012 = ╱45╱E╱ // 0x65c @0x12
0x064a…0660 at0013 = ╱53╱S╱ // 0x65d @0x13
0x064a…0660 at0014 = ╱ee╱)╱ // 0x65e @0x14
0x064a…0660 at0015 = EOL // 0x65f @0x15
0x064a…0660 }
0x0660…06b1 9408 0310 OP1$=B1$;OP2$=B2$;RES$=ES$;SI=0;FLAG=0;ART=AR3-6*(AR3>5)
0x0660…06b1 LineComalBin {
0x0660…06b1 ptr = 0x9408 // 0x660 @0x0
0x0660…06b1 lno = 0x0136 // 0x662 @0x2
0x0660…06b1 at0004 = ╱4f╱O╱ // 0x664 @0x4
0x0660…06b1 at0005 = ╱50╱P╱ // 0x665 @0x5
0x0660…06b1 at0006 = ╱31╱1╱ // 0x666 @0x6
0x0660…06b1 at0007 = ╱ef╱$╱ // 0x667 @0x7
0x0660…06b1 at0008 = ╱dc╱=╱ // 0x668 @0x8
0x0660…06b1 at0009 = ╱42╱B╱ // 0x669 @0x9
0x0660…06b1 at000a = ╱31╱1╱ // 0x66a @0xa
0x0660…06b1 at000b = ╱ef╱$╱ // 0x66b @0xb
0x0660…06b1 at000c = ╱eb╱;╱ // 0x66c @0xc
0x0660…06b1 at000d = ╱4f╱O╱ // 0x66d @0xd
0x0660…06b1 at000e = ╱50╱P╱ // 0x66e @0xe
0x0660…06b1 at000f = ╱32╱2╱ // 0x66f @0xf
0x0660…06b1 at0010 = ╱ef╱$╱ // 0x670 @0x10
0x0660…06b1 at0011 = ╱dc╱=╱ // 0x671 @0x11
0x0660…06b1 at0012 = ╱42╱B╱ // 0x672 @0x12
0x0660…06b1 at0013 = ╱32╱2╱ // 0x673 @0x13
0x0660…06b1 at0014 = ╱ef╱$╱ // 0x674 @0x14
0x0660…06b1 at0015 = ╱eb╱;╱ // 0x675 @0x15
0x0660…06b1 at0016 = ╱52╱R╱ // 0x676 @0x16
0x0660…06b1 at0017 = ╱45╱E╱ // 0x677 @0x17
0x0660…06b1 at0018 = ╱53╱S╱ // 0x678 @0x18
0x0660…06b1 at0019 = ╱ef╱$╱ // 0x679 @0x19
0x0660…06b1 at001a = ╱dc╱=╱ // 0x67a @0x1a
0x0660…06b1 at001b = ╱45╱E╱ // 0x67b @0x1b
0x0660…06b1 at001c = ╱53╱S╱ // 0x67c @0x1c
0x0660…06b1 at001d = ╱ef╱$╱ // 0x67d @0x1d
0x0660…06b1 at001e = ╱eb╱;╱ // 0x67e @0x1e
0x0660…06b1 at001f = ╱53╱S╱ // 0x67f @0x1f
0x0660…06b1 at0020 = ╱49╱I╱ // 0x680 @0x20
0x0660…06b1 at0021 = ╱dc╱=╱ // 0x681 @0x21
0x0660…06b1 at0022 = ╱30╱0╱ // 0x682 @0x22
0x0660…06b1 at0023 = ╱fe00000000╱ // 0x683 @0x23
0x0660…06b1 at0028 = ╱eb╱;╱ // 0x688 @0x28
0x0660…06b1 at0029 = ╱46╱F╱ // 0x689 @0x29
0x0660…06b1 at002a = ╱4c╱L╱ // 0x68a @0x2a
0x0660…06b1 at002b = ╱41╱A╱ // 0x68b @0x2b
0x0660…06b1 at002c = ╱47╱G╱ // 0x68c @0x2c
0x0660…06b1 at002d = ╱dc╱=╱ // 0x68d @0x2d
0x0660…06b1 at002e = ╱30╱0╱ // 0x68e @0x2e
0x0660…06b1 at002f = ╱fe00000000╱ // 0x68f @0x2f
0x0660…06b1 at0034 = ╱eb╱;╱ // 0x694 @0x34
0x0660…06b1 at0035 = ╱41╱A╱ // 0x695 @0x35
0x0660…06b1 at0036 = ╱52╱R╱ // 0x696 @0x36
0x0660…06b1 at0037 = ╱54╱T╱ // 0x697 @0x37
0x0660…06b1 at0038 = ╱dc╱=╱ // 0x698 @0x38
0x0660…06b1 at0039 = ╱41╱A╱ // 0x699 @0x39
0x0660…06b1 at003a = ╱52╱R╱ // 0x69a @0x3a
0x0660…06b1 at003b = ╱33╱3╱ // 0x69b @0x3b
0x0660…06b1 at003c = ╱e3╱-╱ // 0x69c @0x3c
0x0660…06b1 at003d = ╱36╱6╱ // 0x69d @0x3d
0x0660…06b1 at003e = ╱fe0000c003╱ // 0x69e @0x3e
0x0660…06b1 at0043 = ╱e4╱*╱ // 0x6a3 @0x43
0x0660…06b1 at0044 = ╱ed╱(╱ // 0x6a4 @0x44
0x0660…06b1 at0045 = ╱41╱A╱ // 0x6a5 @0x45
0x0660…06b1 at0046 = ╱52╱R╱ // 0x6a6 @0x46
0x0660…06b1 at0047 = ╱33╱3╱ // 0x6a7 @0x47
0x0660…06b1 at0048 = ╱de╱>╱ // 0x6a8 @0x48
0x0660…06b1 at0049 = ╱35╱5╱ // 0x6a9 @0x49
0x0660…06b1 at004a = ╱fe0000a003╱ // 0x6aa @0x4a
0x0660…06b1 at004f = ╱ee╱)╱ // 0x6af @0x4f
0x0660…06b1 at0050 = EOL // 0x6b0 @0x50
0x0660…06b1 }
0x06b1…06c7 941e 0320 CALL "P641210:REGN"
0x06b1…06c7 LineComalBin {
0x06b1…06c7 ptr = 0x941e // 0x6b1 @0x0
0x06b1…06c7 lno = 0x0140 // 0x6b3 @0x2
0x06b1…06c7 at0004 = ╱ad2220╱ CALL ╱ // 0x6b5 @0x4
0x06b1…06c7 at0007 = ╱22╱"╱ // 0x6b8 @0x7
0x06b1…06c7 at0008 = ╱50╱P╱ // 0x6b9 @0x8
0x06b1…06c7 at0009 = ╱36╱6╱ // 0x6ba @0x9
0x06b1…06c7 at000a = ╱34╱4╱ // 0x6bb @0xa
0x06b1…06c7 at000b = ╱31╱1╱ // 0x6bc @0xb
0x06b1…06c7 at000c = ╱32╱2╱ // 0x6bd @0xc
0x06b1…06c7 at000d = ╱31╱1╱ // 0x6be @0xd
0x06b1…06c7 at000e = ╱30╱0╱ // 0x6bf @0xe
0x06b1…06c7 at000f = ╱3a╱:╱ // 0x6c0 @0xf
0x06b1…06c7 at0010 = ╱52╱R╱ // 0x6c1 @0x10
0x06b1…06c7 at0011 = ╱45╱E╱ // 0x6c2 @0x11
0x06b1…06c7 at0012 = ╱47╱G╱ // 0x6c3 @0x12
0x06b1…06c7 at0013 = ╱4e╱N╱ // 0x6c4 @0x13
0x06b1…06c7 at0014 = ╱22╱"╱ // 0x6c5 @0x14
0x06b1…06c7 at0015 = EOL // 0x6c6 @0x15
0x06b1…06c7 }
0x06c7…06d8 942f 0330 IF AR3<6 THEN
0x06c7…06d8 LineComalBin {
0x06c7…06d8 ptr = 0x942f // 0x6c7 @0x0
0x06c7…06d8 lno = 0x014a // 0x6c9 @0x2
0x06c7…06d8 at0004 = ╱9c╱ IF ╱ // 0x6cb @0x4
0x06c7…06d8 at0005 = ╱41╱A╱ // 0x6cc @0x5
0x06c7…06d8 at0006 = ╱52╱R╱ // 0x6cd @0x6
0x06c7…06d8 at0007 = ╱33╱3╱ // 0x6ce @0x7
0x06c7…06d8 at0008 = ╱dd╱<╱ // 0x6cf @0x8
0x06c7…06d8 at0009 = ╱36╱6╱ // 0x6d0 @0x9
0x06c7…06d8 at000a = ╱fe0000c003╱ // 0x6d1 @0xa
0x06c7…06d8 at000f = ╱b6╱ THEN ╱ // 0x6d6 @0xf
0x06c7…06d8 at0010 = EOL // 0x6d7 @0x10
0x06c7…06d8 }
0x06d8…06e4 943b 0340 IF FLAG THEN STOP
0x06d8…06e4 LineComalBin {
0x06d8…06e4 ptr = 0x943b // 0x6d8 @0x0
0x06d8…06e4 lno = 0x0154 // 0x6da @0x2
0x06d8…06e4 at0004 = ╱82╱ IF ╱ // 0x6dc @0x4
0x06d8…06e4 at0005 = ╱46╱F╱ // 0x6dd @0x5
0x06d8…06e4 at0006 = ╱4c╱L╱ // 0x6de @0x6
0x06d8…06e4 at0007 = ╱41╱A╱ // 0x6df @0x7
0x06d8…06e4 at0008 = ╱47╱G╱ // 0x6e0 @0x8
0x06d8…06e4 at0009 = ╱b6╱ THEN ╱ // 0x6e1 @0x9
0x06d8…06e4 at000a = ╱8d╱ STOP ╱ // 0x6e2 @0xa
0x06d8…06e4 at000b = EOL // 0x6e3 @0xb
0x06d8…06e4 }
0x06e4…06ea 9441 0350 ENDIF
0x06e4…06ea LineComalBin {
0x06e4…06ea ptr = 0x9441 // 0x6e4 @0x0
0x06e4…06ea lno = 0x015e // 0x6e6 @0x2
0x06e4…06ea at0004 = ╱9b╱ ENDIF ╱ // 0x6e8 @0x4
0x06e4…06ea at0005 = EOL // 0x6e9 @0x5
0x06e4…06ea }
0x06ea…06f7 944e 0360 ES$=RES$
0x06ea…06f7 LineComalBin {
0x06ea…06f7 ptr = 0x944e // 0x6ea @0x0
0x06ea…06f7 lno = 0x0168 // 0x6ec @0x2
0x06ea…06f7 at0004 = ╱45╱E╱ // 0x6ee @0x4
0x06ea…06f7 at0005 = ╱53╱S╱ // 0x6ef @0x5
0x06ea…06f7 at0006 = ╱ef╱$╱ // 0x6f0 @0x6
0x06ea…06f7 at0007 = ╱dc╱=╱ // 0x6f1 @0x7
0x06ea…06f7 at0008 = ╱52╱R╱ // 0x6f2 @0x8
0x06ea…06f7 at0009 = ╱45╱E╱ // 0x6f3 @0x9
0x06ea…06f7 at000a = ╱53╱S╱ // 0x6f4 @0xa
0x06ea…06f7 at000b = ╱ef╱$╱ // 0x6f5 @0xb
0x06ea…06f7 at000c = EOL // 0x6f6 @0xc
0x06ea…06f7 }
0x06f7…06fd 9454 0370 ENDPROC
0x06f7…06fd LineComalBin {
0x06f7…06fd ptr = 0x9454 // 0x6f7 @0x0
0x06f7…06fd lno = 0x0172 // 0x6f9 @0x2
0x06f7…06fd at0004 = ╱9f╱ ENDPROC ╱ // 0x6fb @0x4
0x06f7…06fd at0005 = EOL // 0x6fc @0x5
0x06f7…06fd }
0x06fd…0706 945d 0380 PROC ANT
0x06fd…0706 LineComalBin {
0x06fd…0706 ptr = 0x945d // 0x6fd @0x0
0x06fd…0706 lno = 0x017c // 0x6ff @0x2
0x06fd…0706 at0004 = ╱9e╱ PROC ╱ // 0x701 @0x4
0x06fd…0706 at0005 = ╱41╱A╱ // 0x702 @0x5
0x06fd…0706 at0006 = ╱4e╱N╱ // 0x703 @0x6
0x06fd…0706 at0007 = ╱54╱T╱ // 0x704 @0x7
0x06fd…0706 at0008 = EOL // 0x705 @0x8
0x06fd…0706 }
0x0706…0728 947f 0390 IF ANTAL$(10:2)="00" THEN
0x0706…0728 LineComalBin {
0x0706…0728 ptr = 0x947f // 0x706 @0x0
0x0706…0728 lno = 0x0186 // 0x708 @0x2
0x0706…0728 at0004 = ╱9c╱ IF ╱ // 0x70a @0x4
0x0706…0728 at0005 = ╱41╱A╱ // 0x70b @0x5
0x0706…0728 at0006 = ╱4e╱N╱ // 0x70c @0x6
0x0706…0728 at0007 = ╱54╱T╱ // 0x70d @0x7
0x0706…0728 at0008 = ╱41╱A╱ // 0x70e @0x8
0x0706…0728 at0009 = ╱4c╱L╱ // 0x70f @0x9
0x0706…0728 at000a = ╱ef╱$╱ // 0x710 @0xa
0x0706…0728 at000b = ╱ed╱(╱ // 0x711 @0xb
0x0706…0728 at000c = ╱31╱1╱ // 0x712 @0xc
0x0706…0728 at000d = ╱30╱0╱ // 0x713 @0xd
0x0706…0728 at000e = ╱fe0000a004╱ // 0x714 @0xe
0x0706…0728 at0013 = ╱f0╱:╱ // 0x719 @0x13
0x0706…0728 at0014 = ╱32╱2╱ // 0x71a @0x14
0x0706…0728 at0015 = ╱fe00008002╱ // 0x71b @0x15
0x0706…0728 at001a = ╱ee╱)╱ // 0x720 @0x1a
0x0706…0728 at001b = ╱dc╱=╱ // 0x721 @0x1b
0x0706…0728 at001c = ╱22╱"╱ // 0x722 @0x1c
0x0706…0728 at001d = ╱30╱0╱ // 0x723 @0x1d
0x0706…0728 at001e = ╱30╱0╱ // 0x724 @0x1e
0x0706…0728 at001f = ╱22╱"╱ // 0x725 @0x1f
0x0706…0728 at0020 = ╱b6╱ THEN ╱ // 0x726 @0x20
0x0706…0728 at0021 = EOL // 0x727 @0x21
0x0706…0728 }
0x0728…075a 94b1 0400 PRINT ANTAL$(5:4);BLANK$(1:10)
0x0728…075a LineComalBin {
0x0728…075a ptr = 0x94b1 // 0x728 @0x0
0x0728…075a lno = 0x0190 // 0x72a @0x2
0x0728…075a at0004 = ╱92╱ PRINT ╱ // 0x72c @0x4
0x0728…075a at0005 = ╱41╱A╱ // 0x72d @0x5
0x0728…075a at0006 = ╱4e╱N╱ // 0x72e @0x6
0x0728…075a at0007 = ╱54╱T╱ // 0x72f @0x7
0x0728…075a at0008 = ╱41╱A╱ // 0x730 @0x8
0x0728…075a at0009 = ╱4c╱L╱ // 0x731 @0x9
0x0728…075a at000a = ╱ef╱$╱ // 0x732 @0xa
0x0728…075a at000b = ╱ed╱(╱ // 0x733 @0xb
0x0728…075a at000c = ╱35╱5╱ // 0x734 @0xc
0x0728…075a at000d = ╱fe0000a003╱ // 0x735 @0xd
0x0728…075a at0012 = ╱f0╱:╱ // 0x73a @0x12
0x0728…075a at0013 = ╱34╱4╱ // 0x73b @0x13
0x0728…075a at0014 = ╱fe00008003╱ // 0x73c @0x14
0x0728…075a at0019 = ╱ee╱)╱ // 0x741 @0x19
0x0728…075a at001a = ╱eb╱;╱ // 0x742 @0x1a
0x0728…075a at001b = ╱42╱B╱ // 0x743 @0x1b
0x0728…075a at001c = ╱4c╱L╱ // 0x744 @0x1c
0x0728…075a at001d = ╱41╱A╱ // 0x745 @0x1d
0x0728…075a at001e = ╱4e╱N╱ // 0x746 @0x1e
0x0728…075a at001f = ╱4b╱K╱ // 0x747 @0x1f
0x0728…075a at0020 = ╱ef╱$╱ // 0x748 @0x20
0x0728…075a at0021 = ╱ed╱(╱ // 0x749 @0x21
0x0728…075a at0022 = ╱31╱1╱ // 0x74a @0x22
0x0728…075a at0023 = ╱fe00008001╱ // 0x74b @0x23
0x0728…075a at0028 = ╱f0╱:╱ // 0x750 @0x28
0x0728…075a at0029 = ╱31╱1╱ // 0x751 @0x29
0x0728…075a at002a = ╱30╱0╱ // 0x752 @0x2a
0x0728…075a at002b = ╱fe0000a004╱ // 0x753 @0x2b
0x0728…075a at0030 = ╱ee╱)╱ // 0x758 @0x30
0x0728…075a at0031 = EOL // 0x759 @0x31
0x0728…075a }
0x075a…0760 94b7 0410 ELSE
0x075a…0760 LineComalBin {
0x075a…0760 ptr = 0x94b7 // 0x75a @0x0
0x075a…0760 lno = 0x019a // 0x75c @0x2
0x075a…0760 at0004 = ╱9a╱ ELSE ╱ // 0x75e @0x4
0x075a…0760 at0005 = EOL // 0x75f @0x5
0x075a…0760 }
0x0760…0792 94e9 0420 PRINT ANTAL$(5:7);BLANK$(1:10)
0x0760…0792 LineComalBin {
0x0760…0792 ptr = 0x94e9 // 0x760 @0x0
0x0760…0792 lno = 0x01a4 // 0x762 @0x2
0x0760…0792 at0004 = ╱92╱ PRINT ╱ // 0x764 @0x4
0x0760…0792 at0005 = ╱41╱A╱ // 0x765 @0x5
0x0760…0792 at0006 = ╱4e╱N╱ // 0x766 @0x6
0x0760…0792 at0007 = ╱54╱T╱ // 0x767 @0x7
0x0760…0792 at0008 = ╱41╱A╱ // 0x768 @0x8
0x0760…0792 at0009 = ╱4c╱L╱ // 0x769 @0x9
0x0760…0792 at000a = ╱ef╱$╱ // 0x76a @0xa
0x0760…0792 at000b = ╱ed╱(╱ // 0x76b @0xb
0x0760…0792 at000c = ╱35╱5╱ // 0x76c @0xc
0x0760…0792 at000d = ╱fe0000a003╱ // 0x76d @0xd
0x0760…0792 at0012 = ╱f0╱:╱ // 0x772 @0x12
0x0760…0792 at0013 = ╱37╱7╱ // 0x773 @0x13
0x0760…0792 at0014 = ╱fe0000e003╱ // 0x774 @0x14
0x0760…0792 at0019 = ╱ee╱)╱ // 0x779 @0x19
0x0760…0792 at001a = ╱eb╱;╱ // 0x77a @0x1a
0x0760…0792 at001b = ╱42╱B╱ // 0x77b @0x1b
0x0760…0792 at001c = ╱4c╱L╱ // 0x77c @0x1c
0x0760…0792 at001d = ╱41╱A╱ // 0x77d @0x1d
0x0760…0792 at001e = ╱4e╱N╱ // 0x77e @0x1e
0x0760…0792 at001f = ╱4b╱K╱ // 0x77f @0x1f
0x0760…0792 at0020 = ╱ef╱$╱ // 0x780 @0x20
0x0760…0792 at0021 = ╱ed╱(╱ // 0x781 @0x21
0x0760…0792 at0022 = ╱31╱1╱ // 0x782 @0x22
0x0760…0792 at0023 = ╱fe00008001╱ // 0x783 @0x23
0x0760…0792 at0028 = ╱f0╱:╱ // 0x788 @0x28
0x0760…0792 at0029 = ╱31╱1╱ // 0x789 @0x29
0x0760…0792 at002a = ╱30╱0╱ // 0x78a @0x2a
0x0760…0792 at002b = ╱fe0000a004╱ // 0x78b @0x2b
0x0760…0792 at0030 = ╱ee╱)╱ // 0x790 @0x30
0x0760…0792 at0031 = EOL // 0x791 @0x31
0x0760…0792 }
0x0792…0798 94ef 0430 ENDIF
0x0792…0798 LineComalBin {
0x0792…0798 ptr = 0x94ef // 0x792 @0x0
0x0792…0798 lno = 0x01ae // 0x794 @0x2
0x0792…0798 at0004 = ╱9b╱ ENDIF ╱ // 0x796 @0x4
0x0792…0798 at0005 = EOL // 0x797 @0x5
0x0792…0798 }
0x0798…07b9 9510 0440 ANTAL$=ANTAL$(5:8)
0x0798…07b9 LineComalBin {
0x0798…07b9 ptr = 0x9510 // 0x798 @0x0
0x0798…07b9 lno = 0x01b8 // 0x79a @0x2
0x0798…07b9 at0004 = ╱41╱A╱ // 0x79c @0x4
0x0798…07b9 at0005 = ╱4e╱N╱ // 0x79d @0x5
0x0798…07b9 at0006 = ╱54╱T╱ // 0x79e @0x6
0x0798…07b9 at0007 = ╱41╱A╱ // 0x79f @0x7
0x0798…07b9 at0008 = ╱4c╱L╱ // 0x7a0 @0x8
0x0798…07b9 at0009 = ╱ef╱$╱ // 0x7a1 @0x9
0x0798…07b9 at000a = ╱dc╱=╱ // 0x7a2 @0xa
0x0798…07b9 at000b = ╱41╱A╱ // 0x7a3 @0xb
0x0798…07b9 at000c = ╱4e╱N╱ // 0x7a4 @0xc
0x0798…07b9 at000d = ╱54╱T╱ // 0x7a5 @0xd
0x0798…07b9 at000e = ╱41╱A╱ // 0x7a6 @0xe
0x0798…07b9 at000f = ╱4c╱L╱ // 0x7a7 @0xf
0x0798…07b9 at0010 = ╱ef╱$╱ // 0x7a8 @0x10
0x0798…07b9 at0011 = ╱ed╱(╱ // 0x7a9 @0x11
0x0798…07b9 at0012 = ╱35╱5╱ // 0x7aa @0x12
0x0798…07b9 at0013 = ╱fe0000a003╱ // 0x7ab @0x13
0x0798…07b9 at0018 = ╱f0╱:╱ // 0x7b0 @0x18
0x0798…07b9 at0019 = ╱38╱8╱ // 0x7b1 @0x19
0x0798…07b9 at001a = ╱fe00008004╱ // 0x7b2 @0x1a
0x0798…07b9 at001f = ╱ee╱)╱ // 0x7b7 @0x1f
0x0798…07b9 at0020 = EOL // 0x7b8 @0x20
0x0798…07b9 }
0x07b9…07bf 9516 0450 ENDPROC
0x07b9…07bf LineComalBin {
0x07b9…07bf ptr = 0x9516 // 0x7b9 @0x0
0x07b9…07bf lno = 0x01c2 // 0x7bb @0x2
0x07b9…07bf at0004 = ╱9f╱ ENDPROC ╱ // 0x7bd @0x4
0x07b9…07bf at0005 = EOL // 0x7be @0x5
0x07b9…07bf }
0x07bf…07e5 953c 0460 PROC INDPUT1(XPOS1,YPOS1,LN4,LN5,LT1)
0x07bf…07e5 LineComalBin {
0x07bf…07e5 ptr = 0x953c // 0x7bf @0x0
0x07bf…07e5 lno = 0x01cc // 0x7c1 @0x2
0x07bf…07e5 at0004 = ╱9e╱ PROC ╱ // 0x7c3 @0x4
0x07bf…07e5 at0005 = ╱49╱I╱ // 0x7c4 @0x5
0x07bf…07e5 at0006 = ╱4e╱N╱ // 0x7c5 @0x6
0x07bf…07e5 at0007 = ╱44╱D╱ // 0x7c6 @0x7
0x07bf…07e5 at0008 = ╱50╱P╱ // 0x7c7 @0x8
0x07bf…07e5 at0009 = ╱55╱U╱ // 0x7c8 @0x9
0x07bf…07e5 at000a = ╱54╱T╱ // 0x7c9 @0xa
0x07bf…07e5 at000b = ╱31╱1╱ // 0x7ca @0xb
0x07bf…07e5 at000c = ╱ed╱(╱ // 0x7cb @0xc
0x07bf…07e5 at000d = ╱58╱X╱ // 0x7cc @0xd
0x07bf…07e5 at000e = ╱50╱P╱ // 0x7cd @0xe
0x07bf…07e5 at000f = ╱4f╱O╱ // 0x7ce @0xf
0x07bf…07e5 at0010 = ╱53╱S╱ // 0x7cf @0x10
0x07bf…07e5 at0011 = ╱31╱1╱ // 0x7d0 @0x11
0x07bf…07e5 at0012 = ╱ec╱,╱ // 0x7d1 @0x12
0x07bf…07e5 at0013 = ╱59╱Y╱ // 0x7d2 @0x13
0x07bf…07e5 at0014 = ╱50╱P╱ // 0x7d3 @0x14
0x07bf…07e5 at0015 = ╱4f╱O╱ // 0x7d4 @0x15
0x07bf…07e5 at0016 = ╱53╱S╱ // 0x7d5 @0x16
0x07bf…07e5 at0017 = ╱31╱1╱ // 0x7d6 @0x17
0x07bf…07e5 at0018 = ╱ec╱,╱ // 0x7d7 @0x18
0x07bf…07e5 at0019 = ╱4c╱L╱ // 0x7d8 @0x19
0x07bf…07e5 at001a = ╱4e╱N╱ // 0x7d9 @0x1a
0x07bf…07e5 at001b = ╱34╱4╱ // 0x7da @0x1b
0x07bf…07e5 at001c = ╱ec╱,╱ // 0x7db @0x1c
0x07bf…07e5 at001d = ╱4c╱L╱ // 0x7dc @0x1d
0x07bf…07e5 at001e = ╱4e╱N╱ // 0x7dd @0x1e
0x07bf…07e5 at001f = ╱35╱5╱ // 0x7de @0x1f
0x07bf…07e5 at0020 = ╱ec╱,╱ // 0x7df @0x20
0x07bf…07e5 at0021 = ╱4c╱L╱ // 0x7e0 @0x21
0x07bf…07e5 at0022 = ╱54╱T╱ // 0x7e1 @0x22
0x07bf…07e5 at0023 = ╱31╱1╱ // 0x7e2 @0x23
0x07bf…07e5 at0024 = ╱ee╱)╱ // 0x7e3 @0x24
0x07bf…07e5 at0025 = EOL // 0x7e4 @0x25
0x07bf…07e5 }
0x07e5…07eb 9542 0470 REPEAT
0x07e5…07eb LineComalBin {
0x07e5…07eb ptr = 0x9542 // 0x7e5 @0x0
0x07e5…07eb lno = 0x01d6 // 0x7e7 @0x2
0x07e5…07eb at0004 = ╱97╱ REPEAT ╱ // 0x7e9 @0x4
0x07e5…07eb at0005 = EOL // 0x7ea @0x5
0x07e5…07eb }
0x07eb…07fc 9553 0480 CURSOR XPOS1,YPOS1
0x07eb…07fc LineComalBin {
0x07eb…07fc ptr = 0x9553 // 0x7eb @0x0
0x07eb…07fc lno = 0x01e0 // 0x7ed @0x2
0x07eb…07fc at0004 = ╱a1╱ CURSOR ╱ // 0x7ef @0x4
0x07eb…07fc at0005 = ╱58╱X╱ // 0x7f0 @0x5
0x07eb…07fc at0006 = ╱50╱P╱ // 0x7f1 @0x6
0x07eb…07fc at0007 = ╱4f╱O╱ // 0x7f2 @0x7
0x07eb…07fc at0008 = ╱53╱S╱ // 0x7f3 @0x8
0x07eb…07fc at0009 = ╱31╱1╱ // 0x7f4 @0x9
0x07eb…07fc at000a = ╱ec╱,╱ // 0x7f5 @0xa
0x07eb…07fc at000b = ╱59╱Y╱ // 0x7f6 @0xb
0x07eb…07fc at000c = ╱50╱P╱ // 0x7f7 @0xc
0x07eb…07fc at000d = ╱4f╱O╱ // 0x7f8 @0xd
0x07eb…07fc at000e = ╱53╱S╱ // 0x7f9 @0xe
0x07eb…07fc at000f = ╱31╱1╱ // 0x7fa @0xf
0x07eb…07fc at0010 = EOL // 0x7fb @0x10
0x07eb…07fc }
0x07fc…0824 957b 0490 PRINT LT1$;BLANK$(77-XPOS1-LEN(LT1$))
0x07fc…0824 LineComalBin {
0x07fc…0824 ptr = 0x957b // 0x7fc @0x0
0x07fc…0824 lno = 0x01ea // 0x7fe @0x2
0x07fc…0824 at0004 = ╱92╱ PRINT ╱ // 0x800 @0x4
0x07fc…0824 at0005 = ╱4c╱L╱ // 0x801 @0x5
0x07fc…0824 at0006 = ╱54╱T╱ // 0x802 @0x6
0x07fc…0824 at0007 = ╱31╱1╱ // 0x803 @0x7
0x07fc…0824 at0008 = ╱ef╱$╱ // 0x804 @0x8
0x07fc…0824 at0009 = ╱eb╱;╱ // 0x805 @0x9
0x07fc…0824 at000a = ╱42╱B╱ // 0x806 @0xa
0x07fc…0824 at000b = ╱4c╱L╱ // 0x807 @0xb
0x07fc…0824 at000c = ╱41╱A╱ // 0x808 @0xc
0x07fc…0824 at000d = ╱4e╱N╱ // 0x809 @0xd
0x07fc…0824 at000e = ╱4b╱K╱ // 0x80a @0xe
0x07fc…0824 at000f = ╱ef╱$╱ // 0x80b @0xf
0x07fc…0824 at0010 = ╱ed╱(╱ // 0x80c @0x10
0x07fc…0824 at0011 = ╱37╱7╱ // 0x80d @0x11
0x07fc…0824 at0012 = ╱37╱7╱ // 0x80e @0x12
0x07fc…0824 at0013 = ╱fe00009a07╱ // 0x80f @0x13
0x07fc…0824 at0018 = ╱e3╱-╱ // 0x814 @0x18
0x07fc…0824 at0019 = ╱58╱X╱ // 0x815 @0x19
0x07fc…0824 at001a = ╱50╱P╱ // 0x816 @0x1a
0x07fc…0824 at001b = ╱4f╱O╱ // 0x817 @0x1b
0x07fc…0824 at001c = ╱53╱S╱ // 0x818 @0x1c
0x07fc…0824 at001d = ╱31╱1╱ // 0x819 @0x1d
0x07fc…0824 at001e = ╱e3╱-╱ // 0x81a @0x1e
0x07fc…0824 at001f = ╱cc╱LEN╱ // 0x81b @0x1f
0x07fc…0824 at0020 = ╱ed╱(╱ // 0x81c @0x20
0x07fc…0824 at0021 = ╱4c╱L╱ // 0x81d @0x21
0x07fc…0824 at0022 = ╱54╱T╱ // 0x81e @0x22
0x07fc…0824 at0023 = ╱31╱1╱ // 0x81f @0x23
0x07fc…0824 at0024 = ╱ef╱$╱ // 0x820 @0x24
0x07fc…0824 at0025 = ╱ee╱)╱ // 0x821 @0x25
0x07fc…0824 at0026 = ╱ee╱)╱ // 0x822 @0x26
0x07fc…0824 at0027 = EOL // 0x823 @0x27
0x07fc…0824 }
0x0824…0844 959b 0500 CURSOR XPOS1+LEN(LT1$)-1,YPOS1
0x0824…0844 LineComalBin {
0x0824…0844 ptr = 0x959b // 0x824 @0x0
0x0824…0844 lno = 0x01f4 // 0x826 @0x2
0x0824…0844 at0004 = ╱a1╱ CURSOR ╱ // 0x828 @0x4
0x0824…0844 at0005 = ╱58╱X╱ // 0x829 @0x5
0x0824…0844 at0006 = ╱50╱P╱ // 0x82a @0x6
0x0824…0844 at0007 = ╱4f╱O╱ // 0x82b @0x7
0x0824…0844 at0008 = ╱53╱S╱ // 0x82c @0x8
0x0824…0844 at0009 = ╱31╱1╱ // 0x82d @0x9
0x0824…0844 at000a = ╱e2╱+╱ // 0x82e @0xa
0x0824…0844 at000b = ╱cc╱LEN╱ // 0x82f @0xb
0x0824…0844 at000c = ╱ed╱(╱ // 0x830 @0xc
0x0824…0844 at000d = ╱4c╱L╱ // 0x831 @0xd
0x0824…0844 at000e = ╱54╱T╱ // 0x832 @0xe
0x0824…0844 at000f = ╱31╱1╱ // 0x833 @0xf
0x0824…0844 at0010 = ╱ef╱$╱ // 0x834 @0x10
0x0824…0844 at0011 = ╱ee╱)╱ // 0x835 @0x11
0x0824…0844 at0012 = ╱e3╱-╱ // 0x836 @0x12
0x0824…0844 at0013 = ╱31╱1╱ // 0x837 @0x13
0x0824…0844 at0014 = ╱fe00008001╱ // 0x838 @0x14
0x0824…0844 at0019 = ╱ec╱,╱ // 0x83d @0x19
0x0824…0844 at001a = ╱59╱Y╱ // 0x83e @0x1a
0x0824…0844 at001b = ╱50╱P╱ // 0x83f @0x1b
0x0824…0844 at001c = ╱4f╱O╱ // 0x840 @0x1c
0x0824…0844 at001d = ╱53╱S╱ // 0x841 @0x1d
0x0824…0844 at001e = ╱31╱1╱ // 0x842 @0x1e
0x0824…0844 at001f = EOL // 0x843 @0x1f
0x0824…0844 }
0x0844…0850 95a7 0510 INPUT " ",A$
0x0844…0850 LineComalBin {
0x0844…0850 ptr = 0x95a7 // 0x844 @0x0
0x0844…0850 lno = 0x01fe // 0x846 @0x2
0x0844…0850 at0004 = ╱91╱ INPUT ╱ // 0x848 @0x4
0x0844…0850 at0005 = ╱22╱"╱ // 0x849 @0x5
0x0844…0850 at0006 = ╱20╱…╱ // 0x84a @0x6
0x0844…0850 at0007 = ╱22╱"╱ // 0x84b @0x7
0x0844…0850 at0008 = ╱ec╱,╱ // 0x84c @0x8
0x0844…0850 at0009 = ╱41╱A╱ // 0x84d @0x9
0x0844…0850 at000a = ╱ef╱$╱ // 0x84e @0xa
0x0844…0850 at000b = EOL // 0x84f @0xb
0x0844…0850 }
0x0850…0860 95b7 0520 EXEC NRTEST(A$)
0x0850…0860 LineComalBin {
0x0850…0860 ptr = 0x95b7 // 0x850 @0x0
0x0850…0860 lno = 0x0208 // 0x852 @0x2
0x0850…0860 at0004 = ╱9d╱ EXEC ╱ // 0x854 @0x4
0x0850…0860 at0005 = ╱4e╱N╱ // 0x855 @0x5
0x0850…0860 at0006 = ╱52╱R╱ // 0x856 @0x6
0x0850…0860 at0007 = ╱54╱T╱ // 0x857 @0x7
0x0850…0860 at0008 = ╱45╱E╱ // 0x858 @0x8
0x0850…0860 at0009 = ╱53╱S╱ // 0x859 @0x9
0x0850…0860 at000a = ╱54╱T╱ // 0x85a @0xa
0x0850…0860 at000b = ╱ed╱(╱ // 0x85b @0xb
0x0850…0860 at000c = ╱41╱A╱ // 0x85c @0xc
0x0850…0860 at000d = ╱ef╱$╱ // 0x85d @0xd
0x0850…0860 at000e = ╱ee╱)╱ // 0x85e @0xe
0x0850…0860 at000f = EOL // 0x85f @0xf
0x0850…0860 }
0x0860…087e 95d5 0530 UNTIL P>LN4 AND P<LN5 AND TEST2=0
0x0860…087e LineComalBin {
0x0860…087e ptr = 0x95d5 // 0x860 @0x0
0x0860…087e lno = 0x0212 // 0x862 @0x2
0x0860…087e at0004 = ╱98╱ UNTIL ╱ // 0x864 @0x4
0x0860…087e at0005 = ╱50╱P╱ // 0x865 @0x5
0x0860…087e at0006 = ╱de╱>╱ // 0x866 @0x6
0x0860…087e at0007 = ╱4c╱L╱ // 0x867 @0x7
0x0860…087e at0008 = ╱4e╱N╱ // 0x868 @0x8
0x0860…087e at0009 = ╱34╱4╱ // 0x869 @0x9
0x0860…087e at000a = ╱da╱ AND ╱ // 0x86a @0xa
0x0860…087e at000b = ╱50╱P╱ // 0x86b @0xb
0x0860…087e at000c = ╱dd╱<╱ // 0x86c @0xc
0x0860…087e at000d = ╱4c╱L╱ // 0x86d @0xd
0x0860…087e at000e = ╱4e╱N╱ // 0x86e @0xe
0x0860…087e at000f = ╱35╱5╱ // 0x86f @0xf
0x0860…087e at0010 = ╱da╱ AND ╱ // 0x870 @0x10
0x0860…087e at0011 = ╱54╱T╱ // 0x871 @0x11
0x0860…087e at0012 = ╱45╱E╱ // 0x872 @0x12
0x0860…087e at0013 = ╱53╱S╱ // 0x873 @0x13
0x0860…087e at0014 = ╱54╱T╱ // 0x874 @0x14
0x0860…087e at0015 = ╱32╱2╱ // 0x875 @0x15
0x0860…087e at0016 = ╱dc╱=╱ // 0x876 @0x16
0x0860…087e at0017 = ╱30╱0╱ // 0x877 @0x17
0x0860…087e at0018 = ╱fe00000000╱ // 0x878 @0x18
0x0860…087e at001d = EOL // 0x87d @0x1d
0x0860…087e }
0x087e…0884 95db 0540 ENDPROC
0x087e…0884 LineComalBin {
0x087e…0884 ptr = 0x95db // 0x87e @0x0
0x087e…0884 lno = 0x021c // 0x880 @0x2
0x087e…0884 at0004 = ╱9f╱ ENDPROC ╱ // 0x882 @0x4
0x087e…0884 at0005 = EOL // 0x883 @0x5
0x087e…0884 }
0x0884…08a6 95fd 0550 PROC INDPUT2(XPOS2,YPOS2,LT2,VAR)
0x0884…08a6 LineComalBin {
0x0884…08a6 ptr = 0x95fd // 0x884 @0x0
0x0884…08a6 lno = 0x0226 // 0x886 @0x2
0x0884…08a6 at0004 = ╱9e╱ PROC ╱ // 0x888 @0x4
0x0884…08a6 at0005 = ╱49╱I╱ // 0x889 @0x5
0x0884…08a6 at0006 = ╱4e╱N╱ // 0x88a @0x6
0x0884…08a6 at0007 = ╱44╱D╱ // 0x88b @0x7
0x0884…08a6 at0008 = ╱50╱P╱ // 0x88c @0x8
0x0884…08a6 at0009 = ╱55╱U╱ // 0x88d @0x9
0x0884…08a6 at000a = ╱54╱T╱ // 0x88e @0xa
0x0884…08a6 at000b = ╱32╱2╱ // 0x88f @0xb
0x0884…08a6 at000c = ╱ed╱(╱ // 0x890 @0xc
0x0884…08a6 at000d = ╱58╱X╱ // 0x891 @0xd
0x0884…08a6 at000e = ╱50╱P╱ // 0x892 @0xe
0x0884…08a6 at000f = ╱4f╱O╱ // 0x893 @0xf
0x0884…08a6 at0010 = ╱53╱S╱ // 0x894 @0x10
0x0884…08a6 at0011 = ╱32╱2╱ // 0x895 @0x11
0x0884…08a6 at0012 = ╱ec╱,╱ // 0x896 @0x12
0x0884…08a6 at0013 = ╱59╱Y╱ // 0x897 @0x13
0x0884…08a6 at0014 = ╱50╱P╱ // 0x898 @0x14
0x0884…08a6 at0015 = ╱4f╱O╱ // 0x899 @0x15
0x0884…08a6 at0016 = ╱53╱S╱ // 0x89a @0x16
0x0884…08a6 at0017 = ╱32╱2╱ // 0x89b @0x17
0x0884…08a6 at0018 = ╱ec╱,╱ // 0x89c @0x18
0x0884…08a6 at0019 = ╱4c╱L╱ // 0x89d @0x19
0x0884…08a6 at001a = ╱54╱T╱ // 0x89e @0x1a
0x0884…08a6 at001b = ╱32╱2╱ // 0x89f @0x1b
0x0884…08a6 at001c = ╱ec╱,╱ // 0x8a0 @0x1c
0x0884…08a6 at001d = ╱56╱V╱ // 0x8a1 @0x1d
0x0884…08a6 at001e = ╱41╱A╱ // 0x8a2 @0x1e
0x0884…08a6 at001f = ╱52╱R╱ // 0x8a3 @0x1f
0x0884…08a6 at0020 = ╱ee╱)╱ // 0x8a4 @0x20
0x0884…08a6 at0021 = EOL // 0x8a5 @0x21
0x0884…08a6 }
0x08a6…08ac 9603 0560 REPEAT
0x08a6…08ac LineComalBin {
0x08a6…08ac ptr = 0x9603 // 0x8a6 @0x0
0x08a6…08ac lno = 0x0230 // 0x8a8 @0x2
0x08a6…08ac at0004 = ╱97╱ REPEAT ╱ // 0x8aa @0x4
0x08a6…08ac at0005 = EOL // 0x8ab @0x5
0x08a6…08ac }
0x08ac…08bd 9614 0570 CURSOR XPOS2,YPOS2
0x08ac…08bd LineComalBin {
0x08ac…08bd ptr = 0x9614 // 0x8ac @0x0
0x08ac…08bd lno = 0x023a // 0x8ae @0x2
0x08ac…08bd at0004 = ╱a1╱ CURSOR ╱ // 0x8b0 @0x4
0x08ac…08bd at0005 = ╱58╱X╱ // 0x8b1 @0x5
0x08ac…08bd at0006 = ╱50╱P╱ // 0x8b2 @0x6
0x08ac…08bd at0007 = ╱4f╱O╱ // 0x8b3 @0x7
0x08ac…08bd at0008 = ╱53╱S╱ // 0x8b4 @0x8
0x08ac…08bd at0009 = ╱32╱2╱ // 0x8b5 @0x9
0x08ac…08bd at000a = ╱ec╱,╱ // 0x8b6 @0xa
0x08ac…08bd at000b = ╱59╱Y╱ // 0x8b7 @0xb
0x08ac…08bd at000c = ╱50╱P╱ // 0x8b8 @0xc
0x08ac…08bd at000d = ╱4f╱O╱ // 0x8b9 @0xd
0x08ac…08bd at000e = ╱53╱S╱ // 0x8ba @0xe
0x08ac…08bd at000f = ╱32╱2╱ // 0x8bb @0xf
0x08ac…08bd at0010 = EOL // 0x8bc @0x10
0x08ac…08bd }
0x08bd…08e5 963c 0580 PRINT LT2$;BLANK$(77-XPOS2-LEN(LT2$))
0x08bd…08e5 LineComalBin {
0x08bd…08e5 ptr = 0x963c // 0x8bd @0x0
0x08bd…08e5 lno = 0x0244 // 0x8bf @0x2
0x08bd…08e5 at0004 = ╱92╱ PRINT ╱ // 0x8c1 @0x4
0x08bd…08e5 at0005 = ╱4c╱L╱ // 0x8c2 @0x5
0x08bd…08e5 at0006 = ╱54╱T╱ // 0x8c3 @0x6
0x08bd…08e5 at0007 = ╱32╱2╱ // 0x8c4 @0x7
0x08bd…08e5 at0008 = ╱ef╱$╱ // 0x8c5 @0x8
0x08bd…08e5 at0009 = ╱eb╱;╱ // 0x8c6 @0x9
0x08bd…08e5 at000a = ╱42╱B╱ // 0x8c7 @0xa
0x08bd…08e5 at000b = ╱4c╱L╱ // 0x8c8 @0xb
0x08bd…08e5 at000c = ╱41╱A╱ // 0x8c9 @0xc
0x08bd…08e5 at000d = ╱4e╱N╱ // 0x8ca @0xd
0x08bd…08e5 at000e = ╱4b╱K╱ // 0x8cb @0xe
0x08bd…08e5 at000f = ╱ef╱$╱ // 0x8cc @0xf
0x08bd…08e5 at0010 = ╱ed╱(╱ // 0x8cd @0x10
0x08bd…08e5 at0011 = ╱37╱7╱ // 0x8ce @0x11
0x08bd…08e5 at0012 = ╱37╱7╱ // 0x8cf @0x12
0x08bd…08e5 at0013 = ╱fe00009a07╱ // 0x8d0 @0x13
0x08bd…08e5 at0018 = ╱e3╱-╱ // 0x8d5 @0x18
0x08bd…08e5 at0019 = ╱58╱X╱ // 0x8d6 @0x19
0x08bd…08e5 at001a = ╱50╱P╱ // 0x8d7 @0x1a
0x08bd…08e5 at001b = ╱4f╱O╱ // 0x8d8 @0x1b
0x08bd…08e5 at001c = ╱53╱S╱ // 0x8d9 @0x1c
0x08bd…08e5 at001d = ╱32╱2╱ // 0x8da @0x1d
0x08bd…08e5 at001e = ╱e3╱-╱ // 0x8db @0x1e
0x08bd…08e5 at001f = ╱cc╱LEN╱ // 0x8dc @0x1f
0x08bd…08e5 at0020 = ╱ed╱(╱ // 0x8dd @0x20
0x08bd…08e5 at0021 = ╱4c╱L╱ // 0x8de @0x21
0x08bd…08e5 at0022 = ╱54╱T╱ // 0x8df @0x22
0x08bd…08e5 at0023 = ╱32╱2╱ // 0x8e0 @0x23
0x08bd…08e5 at0024 = ╱ef╱$╱ // 0x8e1 @0x24
0x08bd…08e5 at0025 = ╱ee╱)╱ // 0x8e2 @0x25
0x08bd…08e5 at0026 = ╱ee╱)╱ // 0x8e3 @0x26
0x08bd…08e5 at0027 = EOL // 0x8e4 @0x27
0x08bd…08e5 }
0x08e5…0905 965c 0590 CURSOR XPOS2+LEN(LT2$)-1,YPOS2
0x08e5…0905 LineComalBin {
0x08e5…0905 ptr = 0x965c // 0x8e5 @0x0
0x08e5…0905 lno = 0x024e // 0x8e7 @0x2
0x08e5…0905 at0004 = ╱a1╱ CURSOR ╱ // 0x8e9 @0x4
0x08e5…0905 at0005 = ╱58╱X╱ // 0x8ea @0x5
0x08e5…0905 at0006 = ╱50╱P╱ // 0x8eb @0x6
0x08e5…0905 at0007 = ╱4f╱O╱ // 0x8ec @0x7
0x08e5…0905 at0008 = ╱53╱S╱ // 0x8ed @0x8
0x08e5…0905 at0009 = ╱32╱2╱ // 0x8ee @0x9
0x08e5…0905 at000a = ╱e2╱+╱ // 0x8ef @0xa
0x08e5…0905 at000b = ╱cc╱LEN╱ // 0x8f0 @0xb
0x08e5…0905 at000c = ╱ed╱(╱ // 0x8f1 @0xc
0x08e5…0905 at000d = ╱4c╱L╱ // 0x8f2 @0xd
0x08e5…0905 at000e = ╱54╱T╱ // 0x8f3 @0xe
0x08e5…0905 at000f = ╱32╱2╱ // 0x8f4 @0xf
0x08e5…0905 at0010 = ╱ef╱$╱ // 0x8f5 @0x10
0x08e5…0905 at0011 = ╱ee╱)╱ // 0x8f6 @0x11
0x08e5…0905 at0012 = ╱e3╱-╱ // 0x8f7 @0x12
0x08e5…0905 at0013 = ╱31╱1╱ // 0x8f8 @0x13
0x08e5…0905 at0014 = ╱fe00008001╱ // 0x8f9 @0x14
0x08e5…0905 at0019 = ╱ec╱,╱ // 0x8fe @0x19
0x08e5…0905 at001a = ╱59╱Y╱ // 0x8ff @0x1a
0x08e5…0905 at001b = ╱50╱P╱ // 0x900 @0x1b
0x08e5…0905 at001c = ╱4f╱O╱ // 0x901 @0x1c
0x08e5…0905 at001d = ╱53╱S╱ // 0x902 @0x1d
0x08e5…0905 at001e = ╱32╱2╱ // 0x903 @0x1e
0x08e5…0905 at001f = EOL // 0x904 @0x1f
0x08e5…0905 }
0x0905…0913 966a 0600 INPUT " ",VAR$
0x0905…0913 LineComalBin {
0x0905…0913 ptr = 0x966a // 0x905 @0x0
0x0905…0913 lno = 0x0258 // 0x907 @0x2
0x0905…0913 at0004 = ╱91╱ INPUT ╱ // 0x909 @0x4
0x0905…0913 at0005 = ╱22╱"╱ // 0x90a @0x5
0x0905…0913 at0006 = ╱20╱…╱ // 0x90b @0x6
0x0905…0913 at0007 = ╱22╱"╱ // 0x90c @0x7
0x0905…0913 at0008 = ╱ec╱,╱ // 0x90d @0x8
0x0905…0913 at0009 = ╱56╱V╱ // 0x90e @0x9
0x0905…0913 at000a = ╱41╱A╱ // 0x90f @0xa
0x0905…0913 at000b = ╱52╱R╱ // 0x910 @0xb
0x0905…0913 at000c = ╱ef╱$╱ // 0x911 @0xc
0x0905…0913 at000d = EOL // 0x912 @0xd
0x0905…0913 }
0x0913…0930 9687 0610 IF LEN(VAR$)=0 THEN VAR$="0"
0x0913…0930 LineComalBin {
0x0913…0930 ptr = 0x9687 // 0x913 @0x0
0x0913…0930 lno = 0x0262 // 0x915 @0x2
0x0913…0930 at0004 = ╱82╱ IF ╱ // 0x917 @0x4
0x0913…0930 at0005 = ╱cc╱LEN╱ // 0x918 @0x5
0x0913…0930 at0006 = ╱ed╱(╱ // 0x919 @0x6
0x0913…0930 at0007 = ╱56╱V╱ // 0x91a @0x7
0x0913…0930 at0008 = ╱41╱A╱ // 0x91b @0x8
0x0913…0930 at0009 = ╱52╱R╱ // 0x91c @0x9
0x0913…0930 at000a = ╱ef╱$╱ // 0x91d @0xa
0x0913…0930 at000b = ╱ee╱)╱ // 0x91e @0xb
0x0913…0930 at000c = ╱dc╱=╱ // 0x91f @0xc
0x0913…0930 at000d = ╱30╱0╱ // 0x920 @0xd
0x0913…0930 at000e = ╱fe00000000╱ // 0x921 @0xe
0x0913…0930 at0013 = ╱b6╱ THEN ╱ // 0x926 @0x13
0x0913…0930 at0014 = ╱56╱V╱ // 0x927 @0x14
0x0913…0930 at0015 = ╱41╱A╱ // 0x928 @0x15
0x0913…0930 at0016 = ╱52╱R╱ // 0x929 @0x16
0x0913…0930 at0017 = ╱ef╱$╱ // 0x92a @0x17
0x0913…0930 at0018 = ╱dc╱=╱ // 0x92b @0x18
0x0913…0930 at0019 = ╱22╱"╱ // 0x92c @0x19
0x0913…0930 at001a = ╱30╱0╱ // 0x92d @0x1a
0x0913…0930 at001b = ╱22╱"╱ // 0x92e @0x1b
0x0913…0930 at001c = EOL // 0x92f @0x1c
0x0913…0930 }
0x0930…0942 9699 0620 VAR$=VAR$+"+"
0x0930…0942 LineComalBin {
0x0930…0942 ptr = 0x9699 // 0x930 @0x0
0x0930…0942 lno = 0x026c // 0x932 @0x2
0x0930…0942 at0004 = ╱56╱V╱ // 0x934 @0x4
0x0930…0942 at0005 = ╱41╱A╱ // 0x935 @0x5
0x0930…0942 at0006 = ╱52╱R╱ // 0x936 @0x6
0x0930…0942 at0007 = ╱ef╱$╱ // 0x937 @0x7
0x0930…0942 at0008 = ╱dc╱=╱ // 0x938 @0x8
0x0930…0942 at0009 = ╱56╱V╱ // 0x939 @0x9
0x0930…0942 at000a = ╱41╱A╱ // 0x93a @0xa
0x0930…0942 at000b = ╱52╱R╱ // 0x93b @0xb
0x0930…0942 at000c = ╱ef╱$╱ // 0x93c @0xc
0x0930…0942 at000d = ╱f1╱+╱ // 0x93d @0xd
0x0930…0942 at000e = ╱22╱"╱ // 0x93e @0xe
0x0930…0942 at000f = ╱2b╱+╱ // 0x93f @0xf
0x0930…0942 at0010 = ╱22╱"╱ // 0x940 @0x10
0x0930…0942 at0011 = EOL // 0x941 @0x11
0x0930…0942 }
0x0942…0961 96b8 0630 EXEC CA(6,VAR$,TAH$,VAR$)
0x0942…0961 LineComalBin {
0x0942…0961 ptr = 0x96b8 // 0x942 @0x0
0x0942…0961 lno = 0x0276 // 0x944 @0x2
0x0942…0961 at0004 = ╱9d╱ EXEC ╱ // 0x946 @0x4
0x0942…0961 at0005 = ╱43╱C╱ // 0x947 @0x5
0x0942…0961 at0006 = ╱41╱A╱ // 0x948 @0x6
0x0942…0961 at0007 = ╱ed╱(╱ // 0x949 @0x7
0x0942…0961 at0008 = ╱36╱6╱ // 0x94a @0x8
0x0942…0961 at0009 = ╱fe0000c003╱ // 0x94b @0x9
0x0942…0961 at000e = ╱ec╱,╱ // 0x950 @0xe
0x0942…0961 at000f = ╱56╱V╱ // 0x951 @0xf
0x0942…0961 at0010 = ╱41╱A╱ // 0x952 @0x10
0x0942…0961 at0011 = ╱52╱R╱ // 0x953 @0x11
0x0942…0961 at0012 = ╱ef╱$╱ // 0x954 @0x12
0x0942…0961 at0013 = ╱ec╱,╱ // 0x955 @0x13
0x0942…0961 at0014 = ╱54╱T╱ // 0x956 @0x14
0x0942…0961 at0015 = ╱41╱A╱ // 0x957 @0x15
0x0942…0961 at0016 = ╱48╱H╱ // 0x958 @0x16
0x0942…0961 at0017 = ╱ef╱$╱ // 0x959 @0x17
0x0942…0961 at0018 = ╱ec╱,╱ // 0x95a @0x18
0x0942…0961 at0019 = ╱56╱V╱ // 0x95b @0x19
0x0942…0961 at001a = ╱41╱A╱ // 0x95c @0x1a
0x0942…0961 at001b = ╱52╱R╱ // 0x95d @0x1b
0x0942…0961 at001c = ╱ef╱$╱ // 0x95e @0x1c
0x0942…0961 at001d = ╱ee╱)╱ // 0x95f @0x1d
0x0942…0961 at001e = EOL // 0x960 @0x1e
0x0942…0961 }
0x0961…0972 96c9 0640 UNTIL FLAG=0
0x0961…0972 LineComalBin {
0x0961…0972 ptr = 0x96c9 // 0x961 @0x0
0x0961…0972 lno = 0x0280 // 0x963 @0x2
0x0961…0972 at0004 = ╱98╱ UNTIL ╱ // 0x965 @0x4
0x0961…0972 at0005 = ╱46╱F╱ // 0x966 @0x5
0x0961…0972 at0006 = ╱4c╱L╱ // 0x967 @0x6
0x0961…0972 at0007 = ╱41╱A╱ // 0x968 @0x7
0x0961…0972 at0008 = ╱47╱G╱ // 0x969 @0x8
0x0961…0972 at0009 = ╱dc╱=╱ // 0x96a @0x9
0x0961…0972 at000a = ╱30╱0╱ // 0x96b @0xa
0x0961…0972 at000b = ╱fe00000000╱ // 0x96c @0xb
0x0961…0972 at0010 = EOL // 0x971 @0x10
0x0961…0972 }
0x0972…0978 96cf 0650 ENDPROC
0x0972…0978 LineComalBin {
0x0972…0978 ptr = 0x96cf // 0x972 @0x0
0x0972…0978 lno = 0x028a // 0x974 @0x2
0x0972…0978 at0004 = ╱9f╱ ENDPROC ╱ // 0x976 @0x4
0x0972…0978 at0005 = EOL // 0x977 @0x5
0x0972…0978 }
0x0978…098d 96e4 0660 PROC FE(NR1,NR2,NR3)
0x0978…098d LineComalBin {
0x0978…098d ptr = 0x96e4 // 0x978 @0x0
0x0978…098d lno = 0x0294 // 0x97a @0x2
0x0978…098d at0004 = ╱9e╱ PROC ╱ // 0x97c @0x4
0x0978…098d at0005 = ╱46╱F╱ // 0x97d @0x5
0x0978…098d at0006 = ╱45╱E╱ // 0x97e @0x6
0x0978…098d at0007 = ╱ed╱(╱ // 0x97f @0x7
0x0978…098d at0008 = ╱4e╱N╱ // 0x980 @0x8
0x0978…098d at0009 = ╱52╱R╱ // 0x981 @0x9
0x0978…098d at000a = ╱31╱1╱ // 0x982 @0xa
0x0978…098d at000b = ╱ec╱,╱ // 0x983 @0xb
0x0978…098d at000c = ╱4e╱N╱ // 0x984 @0xc
0x0978…098d at000d = ╱52╱R╱ // 0x985 @0xd
0x0978…098d at000e = ╱32╱2╱ // 0x986 @0xe
0x0978…098d at000f = ╱ec╱,╱ // 0x987 @0xf
0x0978…098d at0010 = ╱4e╱N╱ // 0x988 @0x10
0x0978…098d at0011 = ╱52╱R╱ // 0x989 @0x11
0x0978…098d at0012 = ╱33╱3╱ // 0x98a @0x12
0x0978…098d at0013 = ╱ee╱)╱ // 0x98b @0x13
0x0978…098d at0014 = EOL // 0x98c @0x14
0x0978…098d }
0x098d…09a2 96f9 0670 IF STATUS(NR3$)<>0 THEN
0x098d…09a2 LineComalBin {
0x098d…09a2 ptr = 0x96f9 // 0x98d @0x0
0x098d…09a2 lno = 0x029e // 0x98f @0x2
0x098d…09a2 at0004 = ╱9c╱ IF ╱ // 0x991 @0x4
0x098d…09a2 at0005 = ╱ce╱STATUS╱ // 0x992 @0x5
0x098d…09a2 at0006 = ╱ed╱(╱ // 0x993 @0x6
0x098d…09a2 at0007 = ╱4e╱N╱ // 0x994 @0x7
0x098d…09a2 at0008 = ╱52╱R╱ // 0x995 @0x8
0x098d…09a2 at0009 = ╱33╱3╱ // 0x996 @0x9
0x098d…09a2 at000a = ╱ef╱$╱ // 0x997 @0xa
0x098d…09a2 at000b = ╱ee╱)╱ // 0x998 @0xb
0x098d…09a2 at000c = ╱e1╱<>╱ // 0x999 @0xc
0x098d…09a2 at000d = ╱30╱0╱ // 0x99a @0xd
0x098d…09a2 at000e = ╱fe00000000╱ // 0x99b @0xe
0x098d…09a2 at0013 = ╱b6╱ THEN ╱ // 0x9a0 @0x13
0x098d…09a2 at0014 = EOL // 0x9a1 @0x14
0x098d…09a2 }
0x09a2…09bc 9713 0680 PRINT STATUS(NR3$),NR1,NR2,NR3$
0x09a2…09bc LineComalBin {
0x09a2…09bc ptr = 0x9713 // 0x9a2 @0x0
0x09a2…09bc lno = 0x02a8 // 0x9a4 @0x2
0x09a2…09bc at0004 = ╱92╱ PRINT ╱ // 0x9a6 @0x4
0x09a2…09bc at0005 = ╱ce╱STATUS╱ // 0x9a7 @0x5
0x09a2…09bc at0006 = ╱ed╱(╱ // 0x9a8 @0x6
0x09a2…09bc at0007 = ╱4e╱N╱ // 0x9a9 @0x7
0x09a2…09bc at0008 = ╱52╱R╱ // 0x9aa @0x8
0x09a2…09bc at0009 = ╱33╱3╱ // 0x9ab @0x9
0x09a2…09bc at000a = ╱ef╱$╱ // 0x9ac @0xa
0x09a2…09bc at000b = ╱ee╱)╱ // 0x9ad @0xb
0x09a2…09bc at000c = ╱ec╱,╱ // 0x9ae @0xc
0x09a2…09bc at000d = ╱4e╱N╱ // 0x9af @0xd
0x09a2…09bc at000e = ╱52╱R╱ // 0x9b0 @0xe
0x09a2…09bc at000f = ╱31╱1╱ // 0x9b1 @0xf
0x09a2…09bc at0010 = ╱ec╱,╱ // 0x9b2 @0x10
0x09a2…09bc at0011 = ╱4e╱N╱ // 0x9b3 @0x11
0x09a2…09bc at0012 = ╱52╱R╱ // 0x9b4 @0x12
0x09a2…09bc at0013 = ╱32╱2╱ // 0x9b5 @0x13
0x09a2…09bc at0014 = ╱ec╱,╱ // 0x9b6 @0x14
0x09a2…09bc at0015 = ╱4e╱N╱ // 0x9b7 @0x15
0x09a2…09bc at0016 = ╱52╱R╱ // 0x9b8 @0x16
0x09a2…09bc at0017 = ╱33╱3╱ // 0x9b9 @0x17
0x09a2…09bc at0018 = ╱ef╱$╱ // 0x9ba @0x18
0x09a2…09bc at0019 = EOL // 0x9bb @0x19
0x09a2…09bc }
0x09bc…09c2 9719 0690 STOP
0x09bc…09c2 LineComalBin {
0x09bc…09c2 ptr = 0x9719 // 0x9bc @0x0
0x09bc…09c2 lno = 0x02b2 // 0x9be @0x2
0x09bc…09c2 at0004 = ╱8d╱ STOP ╱ // 0x9c0 @0x4
0x09bc…09c2 at0005 = EOL // 0x9c1 @0x5
0x09bc…09c2 }
0x09c2…09c8 971f 0700 ENDIF
0x09c2…09c8 LineComalBin {
0x09c2…09c8 ptr = 0x971f // 0x9c2 @0x0
0x09c2…09c8 lno = 0x02bc // 0x9c4 @0x2
0x09c2…09c8 at0004 = ╱9b╱ ENDIF ╱ // 0x9c6 @0x4
0x09c2…09c8 at0005 = EOL // 0x9c7 @0x5
0x09c2…09c8 }
0x09c8…09ce 9725 0710 ENDPROC
0x09c8…09ce LineComalBin {
0x09c8…09ce ptr = 0x9725 // 0x9c8 @0x0
0x09c8…09ce lno = 0x02c6 // 0x9ca @0x2
0x09c8…09ce at0004 = ╱9f╱ ENDPROC ╱ // 0x9cc @0x4
0x09c8…09ce at0005 = EOL // 0x9cd @0x5
0x09c8…09ce }
0x09ce…09f9 9750 0720 PROC FINDPOST1(TAB4,Q,MANT2,NØGL5,PIL6,L8)
0x09ce…09f9 LineComalBin {
0x09ce…09f9 ptr = 0x9750 // 0x9ce @0x0
0x09ce…09f9 lno = 0x02d0 // 0x9d0 @0x2
0x09ce…09f9 at0004 = ╱9e╱ PROC ╱ // 0x9d2 @0x4
0x09ce…09f9 at0005 = ╱46╱F╱ // 0x9d3 @0x5
0x09ce…09f9 at0006 = ╱49╱I╱ // 0x9d4 @0x6
0x09ce…09f9 at0007 = ╱4e╱N╱ // 0x9d5 @0x7
0x09ce…09f9 at0008 = ╱44╱D╱ // 0x9d6 @0x8
0x09ce…09f9 at0009 = ╱50╱P╱ // 0x9d7 @0x9
0x09ce…09f9 at000a = ╱4f╱O╱ // 0x9d8 @0xa
0x09ce…09f9 at000b = ╱53╱S╱ // 0x9d9 @0xb
0x09ce…09f9 at000c = ╱54╱T╱ // 0x9da @0xc
0x09ce…09f9 at000d = ╱31╱1╱ // 0x9db @0xd
0x09ce…09f9 at000e = ╱ed╱(╱ // 0x9dc @0xe
0x09ce…09f9 at000f = ╱54╱T╱ // 0x9dd @0xf
0x09ce…09f9 at0010 = ╱41╱A╱ // 0x9de @0x10
0x09ce…09f9 at0011 = ╱42╱B╱ // 0x9df @0x11
0x09ce…09f9 at0012 = ╱34╱4╱ // 0x9e0 @0x12
0x09ce…09f9 at0013 = ╱ec╱,╱ // 0x9e1 @0x13
0x09ce…09f9 at0014 = ╱51╱Q╱ // 0x9e2 @0x14
0x09ce…09f9 at0015 = ╱ec╱,╱ // 0x9e3 @0x15
0x09ce…09f9 at0016 = ╱4d╱M╱ // 0x9e4 @0x16
0x09ce…09f9 at0017 = ╱41╱A╱ // 0x9e5 @0x17
0x09ce…09f9 at0018 = ╱4e╱N╱ // 0x9e6 @0x18
0x09ce…09f9 at0019 = ╱54╱T╱ // 0x9e7 @0x19
0x09ce…09f9 at001a = ╱32╱2╱ // 0x9e8 @0x1a
0x09ce…09f9 at001b = ╱ec╱,╱ // 0x9e9 @0x1b
0x09ce…09f9 at001c = ╱4e╱N╱ // 0x9ea @0x1c
0x09ce…09f9 at001d = ╱5c╱Ø╱ // 0x9eb @0x1d
0x09ce…09f9 at001e = ╱47╱G╱ // 0x9ec @0x1e
0x09ce…09f9 at001f = ╱4c╱L╱ // 0x9ed @0x1f
0x09ce…09f9 at0020 = ╱35╱5╱ // 0x9ee @0x20
0x09ce…09f9 at0021 = ╱ec╱,╱ // 0x9ef @0x21
0x09ce…09f9 at0022 = ╱50╱P╱ // 0x9f0 @0x22
0x09ce…09f9 at0023 = ╱49╱I╱ // 0x9f1 @0x23
0x09ce…09f9 at0024 = ╱4c╱L╱ // 0x9f2 @0x24
0x09ce…09f9 at0025 = ╱36╱6╱ // 0x9f3 @0x25
0x09ce…09f9 at0026 = ╱ec╱,╱ // 0x9f4 @0x26
0x09ce…09f9 at0027 = ╱4c╱L╱ // 0x9f5 @0x27
0x09ce…09f9 at0028 = ╱38╱8╱ // 0x9f6 @0x28
0x09ce…09f9 at0029 = ╱ee╱)╱ // 0x9f7 @0x29
0x09ce…09f9 at002a = EOL // 0x9f8 @0x2a
0x09ce…09f9 }
0x09f9…0a4c 97a3 0730 PIL1=MANT2 DIV 8;PIL6=PIL1;CEKS=1;MANT3=MANT2 DIV 4;MANT4=MANT2 DIV 32
0x09f9…0a4c LineComalBin {
0x09f9…0a4c ptr = 0x97a3 // 0x9f9 @0x0
0x09f9…0a4c lno = 0x02da // 0x9fb @0x2
0x09f9…0a4c at0004 = ╱50╱P╱ // 0x9fd @0x4
0x09f9…0a4c at0005 = ╱49╱I╱ // 0x9fe @0x5
0x09f9…0a4c at0006 = ╱4c╱L╱ // 0x9ff @0x6
0x09f9…0a4c at0007 = ╱31╱1╱ // 0xa00 @0x7
0x09f9…0a4c at0008 = ╱dc╱=╱ // 0xa01 @0x8
0x09f9…0a4c at0009 = ╱4d╱M╱ // 0xa02 @0x9
0x09f9…0a4c at000a = ╱41╱A╱ // 0xa03 @0xa
0x09f9…0a4c at000b = ╱4e╱N╱ // 0xa04 @0xb
0x09f9…0a4c at000c = ╱54╱T╱ // 0xa05 @0xc
0x09f9…0a4c at000d = ╱32╱2╱ // 0xa06 @0xd
0x09f9…0a4c at000e = ╱e7╱ DIV ╱ // 0xa07 @0xe
0x09f9…0a4c at000f = ╱38╱8╱ // 0xa08 @0xf
0x09f9…0a4c at0010 = ╱fe00008004╱ // 0xa09 @0x10
0x09f9…0a4c at0015 = ╱eb╱;╱ // 0xa0e @0x15
0x09f9…0a4c at0016 = ╱50╱P╱ // 0xa0f @0x16
0x09f9…0a4c at0017 = ╱49╱I╱ // 0xa10 @0x17
0x09f9…0a4c at0018 = ╱4c╱L╱ // 0xa11 @0x18
0x09f9…0a4c at0019 = ╱36╱6╱ // 0xa12 @0x19
0x09f9…0a4c at001a = ╱dc╱=╱ // 0xa13 @0x1a
0x09f9…0a4c at001b = ╱50╱P╱ // 0xa14 @0x1b
0x09f9…0a4c at001c = ╱49╱I╱ // 0xa15 @0x1c
0x09f9…0a4c at001d = ╱4c╱L╱ // 0xa16 @0x1d
0x09f9…0a4c at001e = ╱31╱1╱ // 0xa17 @0x1e
0x09f9…0a4c at001f = ╱eb╱;╱ // 0xa18 @0x1f
0x09f9…0a4c at0020 = ╱43╱C╱ // 0xa19 @0x20
0x09f9…0a4c at0021 = ╱45╱E╱ // 0xa1a @0x21
0x09f9…0a4c at0022 = ╱4b╱K╱ // 0xa1b @0x22
0x09f9…0a4c at0023 = ╱53╱S╱ // 0xa1c @0x23
0x09f9…0a4c at0024 = ╱dc╱=╱ // 0xa1d @0x24
0x09f9…0a4c at0025 = ╱31╱1╱ // 0xa1e @0x25
0x09f9…0a4c at0026 = ╱fe00008001╱ // 0xa1f @0x26
0x09f9…0a4c at002b = ╱eb╱;╱ // 0xa24 @0x2b
0x09f9…0a4c at002c = ╱4d╱M╱ // 0xa25 @0x2c
0x09f9…0a4c at002d = ╱41╱A╱ // 0xa26 @0x2d
0x09f9…0a4c at002e = ╱4e╱N╱ // 0xa27 @0x2e
0x09f9…0a4c at002f = ╱54╱T╱ // 0xa28 @0x2f
0x09f9…0a4c at0030 = ╱33╱3╱ // 0xa29 @0x30
0x09f9…0a4c at0031 = ╱dc╱=╱ // 0xa2a @0x31
0x09f9…0a4c at0032 = ╱4d╱M╱ // 0xa2b @0x32
0x09f9…0a4c at0033 = ╱41╱A╱ // 0xa2c @0x33
0x09f9…0a4c at0034 = ╱4e╱N╱ // 0xa2d @0x34
0x09f9…0a4c at0035 = ╱54╱T╱ // 0xa2e @0x35
0x09f9…0a4c at0036 = ╱32╱2╱ // 0xa2f @0x36
0x09f9…0a4c at0037 = ╱e7╱ DIV ╱ // 0xa30 @0x37
0x09f9…0a4c at0038 = ╱34╱4╱ // 0xa31 @0x38
0x09f9…0a4c at0039 = ╱fe00008003╱ // 0xa32 @0x39
0x09f9…0a4c at003e = ╱eb╱;╱ // 0xa37 @0x3e
0x09f9…0a4c at003f = ╱4d╱M╱ // 0xa38 @0x3f
0x09f9…0a4c at0040 = ╱41╱A╱ // 0xa39 @0x40
0x09f9…0a4c at0041 = ╱4e╱N╱ // 0xa3a @0x41
0x09f9…0a4c at0042 = ╱54╱T╱ // 0xa3b @0x42
0x09f9…0a4c at0043 = ╱34╱4╱ // 0xa3c @0x43
0x09f9…0a4c at0044 = ╱dc╱=╱ // 0xa3d @0x44
0x09f9…0a4c at0045 = ╱4d╱M╱ // 0xa3e @0x45
0x09f9…0a4c at0046 = ╱41╱A╱ // 0xa3f @0x46
0x09f9…0a4c at0047 = ╱4e╱N╱ // 0xa40 @0x47
0x09f9…0a4c at0048 = ╱54╱T╱ // 0xa41 @0x48
0x09f9…0a4c at0049 = ╱32╱2╱ // 0xa42 @0x49
0x09f9…0a4c at004a = ╱e7╱ DIV ╱ // 0xa43 @0x4a
0x09f9…0a4c at004b = ╱33╱3╱ // 0xa44 @0x4b
0x09f9…0a4c at004c = ╱32╱2╱ // 0xa45 @0x4c
0x09f9…0a4c at004d = ╱fe00008006╱ // 0xa46 @0x4d
0x09f9…0a4c at0052 = EOL // 0xa4b @0x52
0x09f9…0a4c }
0x0a4c…0a52 97a9 0740 REPEAT
0x0a4c…0a52 LineComalBin {
0x0a4c…0a52 ptr = 0x97a9 // 0xa4c @0x0
0x0a4c…0a52 lno = 0x02e4 // 0xa4e @0x2
0x0a4c…0a52 at0004 = ╱97╱ REPEAT ╱ // 0xa50 @0x4
0x0a4c…0a52 at0005 = EOL // 0xa51 @0x5
0x0a4c…0a52 }
0x0a52…0a76 97cd 0750 IF NØGL5=TAB4(PIL6) OR PIL1=1 THEN EXIT
0x0a52…0a76 LineComalBin {
0x0a52…0a76 ptr = 0x97cd // 0xa52 @0x0
0x0a52…0a76 lno = 0x02ee // 0xa54 @0x2
0x0a52…0a76 at0004 = ╱82╱ IF ╱ // 0xa56 @0x4
0x0a52…0a76 at0005 = ╱4e╱N╱ // 0xa57 @0x5
0x0a52…0a76 at0006 = ╱5c╱Ø╱ // 0xa58 @0x6
0x0a52…0a76 at0007 = ╱47╱G╱ // 0xa59 @0x7
0x0a52…0a76 at0008 = ╱4c╱L╱ // 0xa5a @0x8
0x0a52…0a76 at0009 = ╱35╱5╱ // 0xa5b @0x9
0x0a52…0a76 at000a = ╱dc╱=╱ // 0xa5c @0xa
0x0a52…0a76 at000b = ╱54╱T╱ // 0xa5d @0xb
0x0a52…0a76 at000c = ╱41╱A╱ // 0xa5e @0xc
0x0a52…0a76 at000d = ╱42╱B╱ // 0xa5f @0xd
0x0a52…0a76 at000e = ╱34╱4╱ // 0xa60 @0xe
0x0a52…0a76 at000f = ╱ed╱(╱ // 0xa61 @0xf
0x0a52…0a76 at0010 = ╱50╱P╱ // 0xa62 @0x10
0x0a52…0a76 at0011 = ╱49╱I╱ // 0xa63 @0x11
0x0a52…0a76 at0012 = ╱4c╱L╱ // 0xa64 @0x12
0x0a52…0a76 at0013 = ╱36╱6╱ // 0xa65 @0x13
0x0a52…0a76 at0014 = ╱ee╱)╱ // 0xa66 @0x14
0x0a52…0a76 at0015 = ╱db╱ OR ╱ // 0xa67 @0x15
0x0a52…0a76 at0016 = ╱50╱P╱ // 0xa68 @0x16
0x0a52…0a76 at0017 = ╱49╱I╱ // 0xa69 @0x17
0x0a52…0a76 at0018 = ╱4c╱L╱ // 0xa6a @0x18
0x0a52…0a76 at0019 = ╱31╱1╱ // 0xa6b @0x19
0x0a52…0a76 at001a = ╱dc╱=╱ // 0xa6c @0x1a
0x0a52…0a76 at001b = ╱31╱1╱ // 0xa6d @0x1b
0x0a52…0a76 at001c = ╱fe00008001╱ // 0xa6e @0x1c
0x0a52…0a76 at0021 = ╱b6╱ THEN ╱ // 0xa73 @0x21
0x0a52…0a76 at0022 = ╱99╱ EXIT ╱ // 0xa74 @0x22
0x0a52…0a76 at0023 = EOL // 0xa75 @0x23
0x0a52…0a76 }
0x0a76…0ac6 981d 0760 PIL1=(PIL1+1) DIV 2;PIL6=PIL6+PIL1*(1-2*(NØGL5<TAB4(PIL6)))
0x0a76…0ac6 LineComalBin {
0x0a76…0ac6 ptr = 0x981d // 0xa76 @0x0
0x0a76…0ac6 lno = 0x02f8 // 0xa78 @0x2
0x0a76…0ac6 at0004 = ╱50╱P╱ // 0xa7a @0x4
0x0a76…0ac6 at0005 = ╱49╱I╱ // 0xa7b @0x5
0x0a76…0ac6 at0006 = ╱4c╱L╱ // 0xa7c @0x6
0x0a76…0ac6 at0007 = ╱31╱1╱ // 0xa7d @0x7
0x0a76…0ac6 at0008 = ╱dc╱=╱ // 0xa7e @0x8
0x0a76…0ac6 at0009 = ╱ed╱(╱ // 0xa7f @0x9
0x0a76…0ac6 at000a = ╱50╱P╱ // 0xa80 @0xa
0x0a76…0ac6 at000b = ╱49╱I╱ // 0xa81 @0xb
0x0a76…0ac6 at000c = ╱4c╱L╱ // 0xa82 @0xc
0x0a76…0ac6 at000d = ╱31╱1╱ // 0xa83 @0xd
0x0a76…0ac6 at000e = ╱e2╱+╱ // 0xa84 @0xe
0x0a76…0ac6 at000f = ╱31╱1╱ // 0xa85 @0xf
0x0a76…0ac6 at0010 = ╱fe00008001╱ // 0xa86 @0x10
0x0a76…0ac6 at0015 = ╱ee╱)╱ // 0xa8b @0x15
0x0a76…0ac6 at0016 = ╱e7╱ DIV ╱ // 0xa8c @0x16
0x0a76…0ac6 at0017 = ╱32╱2╱ // 0xa8d @0x17
0x0a76…0ac6 at0018 = ╱fe00008002╱ // 0xa8e @0x18
0x0a76…0ac6 at001d = ╱eb╱;╱ // 0xa93 @0x1d
0x0a76…0ac6 at001e = ╱50╱P╱ // 0xa94 @0x1e
0x0a76…0ac6 at001f = ╱49╱I╱ // 0xa95 @0x1f
0x0a76…0ac6 at0020 = ╱4c╱L╱ // 0xa96 @0x20
0x0a76…0ac6 at0021 = ╱36╱6╱ // 0xa97 @0x21
0x0a76…0ac6 at0022 = ╱dc╱=╱ // 0xa98 @0x22
0x0a76…0ac6 at0023 = ╱50╱P╱ // 0xa99 @0x23
0x0a76…0ac6 at0024 = ╱49╱I╱ // 0xa9a @0x24
0x0a76…0ac6 at0025 = ╱4c╱L╱ // 0xa9b @0x25
0x0a76…0ac6 at0026 = ╱36╱6╱ // 0xa9c @0x26
0x0a76…0ac6 at0027 = ╱e2╱+╱ // 0xa9d @0x27
0x0a76…0ac6 at0028 = ╱50╱P╱ // 0xa9e @0x28
0x0a76…0ac6 at0029 = ╱49╱I╱ // 0xa9f @0x29
0x0a76…0ac6 at002a = ╱4c╱L╱ // 0xaa0 @0x2a
0x0a76…0ac6 at002b = ╱31╱1╱ // 0xaa1 @0x2b
0x0a76…0ac6 at002c = ╱e4╱*╱ // 0xaa2 @0x2c
0x0a76…0ac6 at002d = ╱ed╱(╱ // 0xaa3 @0x2d
0x0a76…0ac6 at002e = ╱31╱1╱ // 0xaa4 @0x2e
0x0a76…0ac6 at002f = ╱fe00008001╱ // 0xaa5 @0x2f
0x0a76…0ac6 at0034 = ╱e3╱-╱ // 0xaaa @0x34
0x0a76…0ac6 at0035 = ╱32╱2╱ // 0xaab @0x35
0x0a76…0ac6 at0036 = ╱fe00008002╱ // 0xaac @0x36
0x0a76…0ac6 at003b = ╱e4╱*╱ // 0xab1 @0x3b
0x0a76…0ac6 at003c = ╱ed╱(╱ // 0xab2 @0x3c
0x0a76…0ac6 at003d = ╱4e╱N╱ // 0xab3 @0x3d
0x0a76…0ac6 at003e = ╱5c╱Ø╱ // 0xab4 @0x3e
0x0a76…0ac6 at003f = ╱47╱G╱ // 0xab5 @0x3f
0x0a76…0ac6 at0040 = ╱4c╱L╱ // 0xab6 @0x40
0x0a76…0ac6 at0041 = ╱35╱5╱ // 0xab7 @0x41
0x0a76…0ac6 at0042 = ╱dd╱<╱ // 0xab8 @0x42
0x0a76…0ac6 at0043 = ╱54╱T╱ // 0xab9 @0x43
0x0a76…0ac6 at0044 = ╱41╱A╱ // 0xaba @0x44
0x0a76…0ac6 at0045 = ╱42╱B╱ // 0xabb @0x45
0x0a76…0ac6 at0046 = ╱34╱4╱ // 0xabc @0x46
0x0a76…0ac6 at0047 = ╱ed╱(╱ // 0xabd @0x47
0x0a76…0ac6 at0048 = ╱50╱P╱ // 0xabe @0x48
0x0a76…0ac6 at0049 = ╱49╱I╱ // 0xabf @0x49
0x0a76…0ac6 at004a = ╱4c╱L╱ // 0xac0 @0x4a
0x0a76…0ac6 at004b = ╱36╱6╱ // 0xac1 @0x4b
0x0a76…0ac6 at004c = ╱ee╱)╱ // 0xac2 @0x4c
0x0a76…0ac6 at004d = ╱ee╱)╱ // 0xac3 @0x4d
0x0a76…0ac6 at004e = ╱ee╱)╱ // 0xac4 @0x4e
0x0a76…0ac6 at004f = EOL // 0xac5 @0x4f
0x0a76…0ac6 }
0x0ac6…0ae3 983a 0770 IF PIL6<1 THEN PIL6=1
0x0ac6…0ae3 LineComalBin {
0x0ac6…0ae3 ptr = 0x983a // 0xac6 @0x0
0x0ac6…0ae3 lno = 0x0302 // 0xac8 @0x2
0x0ac6…0ae3 at0004 = ╱82╱ IF ╱ // 0xaca @0x4
0x0ac6…0ae3 at0005 = ╱50╱P╱ // 0xacb @0x5
0x0ac6…0ae3 at0006 = ╱49╱I╱ // 0xacc @0x6
0x0ac6…0ae3 at0007 = ╱4c╱L╱ // 0xacd @0x7
0x0ac6…0ae3 at0008 = ╱36╱6╱ // 0xace @0x8
0x0ac6…0ae3 at0009 = ╱dd╱<╱ // 0xacf @0x9
0x0ac6…0ae3 at000a = ╱31╱1╱ // 0xad0 @0xa
0x0ac6…0ae3 at000b = ╱fe00008001╱ // 0xad1 @0xb
0x0ac6…0ae3 at0010 = ╱b6╱ THEN ╱ // 0xad6 @0x10
0x0ac6…0ae3 at0011 = ╱50╱P╱ // 0xad7 @0x11
0x0ac6…0ae3 at0012 = ╱49╱I╱ // 0xad8 @0x12
0x0ac6…0ae3 at0013 = ╱4c╱L╱ // 0xad9 @0x13
0x0ac6…0ae3 at0014 = ╱36╱6╱ // 0xada @0x14
0x0ac6…0ae3 at0015 = ╱dc╱=╱ // 0xadb @0x15
0x0ac6…0ae3 at0016 = ╱31╱1╱ // 0xadc @0x16
0x0ac6…0ae3 at0017 = ╱fe00008001╱ // 0xadd @0x17
0x0ac6…0ae3 at001c = EOL // 0xae2 @0x1c
0x0ac6…0ae3 }
0x0ae3…0afe 9855 0780 IF PIL6>MANT3 THEN PIL6=MANT3
0x0ae3…0afe LineComalBin {
0x0ae3…0afe ptr = 0x9855 // 0xae3 @0x0
0x0ae3…0afe lno = 0x030c // 0xae5 @0x2
0x0ae3…0afe at0004 = ╱82╱ IF ╱ // 0xae7 @0x4
0x0ae3…0afe at0005 = ╱50╱P╱ // 0xae8 @0x5
0x0ae3…0afe at0006 = ╱49╱I╱ // 0xae9 @0x6
0x0ae3…0afe at0007 = ╱4c╱L╱ // 0xaea @0x7
0x0ae3…0afe at0008 = ╱36╱6╱ // 0xaeb @0x8
0x0ae3…0afe at0009 = ╱de╱>╱ // 0xaec @0x9
0x0ae3…0afe at000a = ╱4d╱M╱ // 0xaed @0xa
0x0ae3…0afe at000b = ╱41╱A╱ // 0xaee @0xb
0x0ae3…0afe at000c = ╱4e╱N╱ // 0xaef @0xc
0x0ae3…0afe at000d = ╱54╱T╱ // 0xaf0 @0xd
0x0ae3…0afe at000e = ╱33╱3╱ // 0xaf1 @0xe
0x0ae3…0afe at000f = ╱b6╱ THEN ╱ // 0xaf2 @0xf
0x0ae3…0afe at0010 = ╱50╱P╱ // 0xaf3 @0x10
0x0ae3…0afe at0011 = ╱49╱I╱ // 0xaf4 @0x11
0x0ae3…0afe at0012 = ╱4c╱L╱ // 0xaf5 @0x12
0x0ae3…0afe at0013 = ╱36╱6╱ // 0xaf6 @0x13
0x0ae3…0afe at0014 = ╱dc╱=╱ // 0xaf7 @0x14
0x0ae3…0afe at0015 = ╱4d╱M╱ // 0xaf8 @0x15
0x0ae3…0afe at0016 = ╱41╱A╱ // 0xaf9 @0x16
0x0ae3…0afe at0017 = ╱4e╱N╱ // 0xafa @0x17
0x0ae3…0afe at0018 = ╱54╱T╱ // 0xafb @0x18
0x0ae3…0afe at0019 = ╱33╱3╱ // 0xafc @0x19
0x0ae3…0afe at001a = EOL // 0xafd @0x1a
0x0ae3…0afe }
0x0afe…0b0f 9866 0790 UNTIL PIL1=0
0x0afe…0b0f LineComalBin {
0x0afe…0b0f ptr = 0x9866 // 0xafe @0x0
0x0afe…0b0f lno = 0x0316 // 0xb00 @0x2
0x0afe…0b0f at0004 = ╱98╱ UNTIL ╱ // 0xb02 @0x4
0x0afe…0b0f at0005 = ╱50╱P╱ // 0xb03 @0x5
0x0afe…0b0f at0006 = ╱49╱I╱ // 0xb04 @0x6
0x0afe…0b0f at0007 = ╱4c╱L╱ // 0xb05 @0x7
0x0afe…0b0f at0008 = ╱31╱1╱ // 0xb06 @0x8
0x0afe…0b0f at0009 = ╱dc╱=╱ // 0xb07 @0x9
0x0afe…0b0f at000a = ╱30╱0╱ // 0xb08 @0xa
0x0afe…0b0f at000b = ╱fe00000000╱ // 0xb09 @0xb
0x0afe…0b0f at0010 = EOL // 0xb0e @0x10
0x0afe…0b0f }
0x0b0f…0b44 989b 0800 IF TAB4(PIL6)>NØGL5 THEN PIL6=PIL6-1*(PIL6>1)
0x0b0f…0b44 LineComalBin {
0x0b0f…0b44 ptr = 0x989b // 0xb0f @0x0
0x0b0f…0b44 lno = 0x0320 // 0xb11 @0x2
0x0b0f…0b44 at0004 = ╱82╱ IF ╱ // 0xb13 @0x4
0x0b0f…0b44 at0005 = ╱54╱T╱ // 0xb14 @0x5
0x0b0f…0b44 at0006 = ╱41╱A╱ // 0xb15 @0x6
0x0b0f…0b44 at0007 = ╱42╱B╱ // 0xb16 @0x7
0x0b0f…0b44 at0008 = ╱34╱4╱ // 0xb17 @0x8
0x0b0f…0b44 at0009 = ╱ed╱(╱ // 0xb18 @0x9
0x0b0f…0b44 at000a = ╱50╱P╱ // 0xb19 @0xa
0x0b0f…0b44 at000b = ╱49╱I╱ // 0xb1a @0xb
0x0b0f…0b44 at000c = ╱4c╱L╱ // 0xb1b @0xc
0x0b0f…0b44 at000d = ╱36╱6╱ // 0xb1c @0xd
0x0b0f…0b44 at000e = ╱ee╱)╱ // 0xb1d @0xe
0x0b0f…0b44 at000f = ╱de╱>╱ // 0xb1e @0xf
0x0b0f…0b44 at0010 = ╱4e╱N╱ // 0xb1f @0x10
0x0b0f…0b44 at0011 = ╱5c╱Ø╱ // 0xb20 @0x11
0x0b0f…0b44 at0012 = ╱47╱G╱ // 0xb21 @0x12
0x0b0f…0b44 at0013 = ╱4c╱L╱ // 0xb22 @0x13
0x0b0f…0b44 at0014 = ╱35╱5╱ // 0xb23 @0x14
0x0b0f…0b44 at0015 = ╱b6╱ THEN ╱ // 0xb24 @0x15
0x0b0f…0b44 at0016 = ╱50╱P╱ // 0xb25 @0x16
0x0b0f…0b44 at0017 = ╱49╱I╱ // 0xb26 @0x17
0x0b0f…0b44 at0018 = ╱4c╱L╱ // 0xb27 @0x18
0x0b0f…0b44 at0019 = ╱36╱6╱ // 0xb28 @0x19
0x0b0f…0b44 at001a = ╱dc╱=╱ // 0xb29 @0x1a
0x0b0f…0b44 at001b = ╱50╱P╱ // 0xb2a @0x1b
0x0b0f…0b44 at001c = ╱49╱I╱ // 0xb2b @0x1c
0x0b0f…0b44 at001d = ╱4c╱L╱ // 0xb2c @0x1d
0x0b0f…0b44 at001e = ╱36╱6╱ // 0xb2d @0x1e
0x0b0f…0b44 at001f = ╱e3╱-╱ // 0xb2e @0x1f
0x0b0f…0b44 at0020 = ╱31╱1╱ // 0xb2f @0x20
0x0b0f…0b44 at0021 = ╱fe00008001╱ // 0xb30 @0x21
0x0b0f…0b44 at0026 = ╱e4╱*╱ // 0xb35 @0x26
0x0b0f…0b44 at0027 = ╱ed╱(╱ // 0xb36 @0x27
0x0b0f…0b44 at0028 = ╱50╱P╱ // 0xb37 @0x28
0x0b0f…0b44 at0029 = ╱49╱I╱ // 0xb38 @0x29
0x0b0f…0b44 at002a = ╱4c╱L╱ // 0xb39 @0x2a
0x0b0f…0b44 at002b = ╱36╱6╱ // 0xb3a @0x2b
0x0b0f…0b44 at002c = ╱de╱>╱ // 0xb3b @0x2c
0x0b0f…0b44 at002d = ╱31╱1╱ // 0xb3c @0x2d
0x0b0f…0b44 at002e = ╱fe00008001╱ // 0xb3d @0x2e
0x0b0f…0b44 at0033 = ╱ee╱)╱ // 0xb42 @0x33
0x0b0f…0b44 at0034 = EOL // 0xb43 @0x34
0x0b0f…0b44 }
0x0b44…0b58 98af 0810 PIL6=MANT4+PIL6
0x0b44…0b58 LineComalBin {
0x0b44…0b58 ptr = 0x98af // 0xb44 @0x0
0x0b44…0b58 lno = 0x032a // 0xb46 @0x2
0x0b44…0b58 at0004 = ╱50╱P╱ // 0xb48 @0x4
0x0b44…0b58 at0005 = ╱49╱I╱ // 0xb49 @0x5
0x0b44…0b58 at0006 = ╱4c╱L╱ // 0xb4a @0x6
0x0b44…0b58 at0007 = ╱36╱6╱ // 0xb4b @0x7
0x0b44…0b58 at0008 = ╱dc╱=╱ // 0xb4c @0x8
0x0b44…0b58 at0009 = ╱4d╱M╱ // 0xb4d @0x9
0x0b44…0b58 at000a = ╱41╱A╱ // 0xb4e @0xa
0x0b44…0b58 at000b = ╱4e╱N╱ // 0xb4f @0xb
0x0b44…0b58 at000c = ╱54╱T╱ // 0xb50 @0xc
0x0b44…0b58 at000d = ╱34╱4╱ // 0xb51 @0xd
0x0b44…0b58 at000e = ╱e2╱+╱ // 0xb52 @0xe
0x0b44…0b58 at000f = ╱50╱P╱ // 0xb53 @0xf
0x0b44…0b58 at0010 = ╱49╱I╱ // 0xb54 @0x10
0x0b44…0b58 at0011 = ╱4c╱L╱ // 0xb55 @0x11
0x0b44…0b58 at0012 = ╱36╱6╱ // 0xb56 @0x12
0x0b44…0b58 at0013 = EOL // 0xb57 @0x13
0x0b44…0b58 }
0x0b58…0bee 9945 0820 GET L8$,PIL6:Q(1,1),Q(1,2),Q(2,1),Q(2,2),Q(3,1),Q(3,2),Q(4,1),Q(4,2)
0x0b58…0bee LineComalBin {
0x0b58…0bee ptr = 0x9945 // 0xb58 @0x0
0x0b58…0bee lno = 0x0334 // 0xb5a @0x2
0x0b58…0bee at0004 = ╱a9╱ GET ╱ // 0xb5c @0x4
0x0b58…0bee at0005 = ╱4c╱L╱ // 0xb5d @0x5
0x0b58…0bee at0006 = ╱38╱8╱ // 0xb5e @0x6
0x0b58…0bee at0007 = ╱ef╱$╱ // 0xb5f @0x7
0x0b58…0bee at0008 = ╱ec╱,╱ // 0xb60 @0x8
0x0b58…0bee at0009 = ╱50╱P╱ // 0xb61 @0x9
0x0b58…0bee at000a = ╱49╱I╱ // 0xb62 @0xa
0x0b58…0bee at000b = ╱4c╱L╱ // 0xb63 @0xb
0x0b58…0bee at000c = ╱36╱6╱ // 0xb64 @0xc
0x0b58…0bee at000d = ╱f0╱:╱ // 0xb65 @0xd
0x0b58…0bee at000e = ╱51╱Q╱ // 0xb66 @0xe
0x0b58…0bee at000f = ╱ed╱(╱ // 0xb67 @0xf
0x0b58…0bee at0010 = ╱31╱1╱ // 0xb68 @0x10
0x0b58…0bee at0011 = ╱fe00008001╱ // 0xb69 @0x11
0x0b58…0bee at0016 = ╱ec╱,╱ // 0xb6e @0x16
0x0b58…0bee at0017 = ╱31╱1╱ // 0xb6f @0x17
0x0b58…0bee at0018 = ╱fe00008001╱ // 0xb70 @0x18
0x0b58…0bee at001d = ╱ee╱)╱ // 0xb75 @0x1d
0x0b58…0bee at001e = ╱ec╱,╱ // 0xb76 @0x1e
0x0b58…0bee at001f = ╱51╱Q╱ // 0xb77 @0x1f
0x0b58…0bee at0020 = ╱ed╱(╱ // 0xb78 @0x20
0x0b58…0bee at0021 = ╱31╱1╱ // 0xb79 @0x21
0x0b58…0bee at0022 = ╱fe00008001╱ // 0xb7a @0x22
0x0b58…0bee at0027 = ╱ec╱,╱ // 0xb7f @0x27
0x0b58…0bee at0028 = ╱32╱2╱ // 0xb80 @0x28
0x0b58…0bee at0029 = ╱fe00008002╱ // 0xb81 @0x29
0x0b58…0bee at002e = ╱ee╱)╱ // 0xb86 @0x2e
0x0b58…0bee at002f = ╱ec╱,╱ // 0xb87 @0x2f
0x0b58…0bee at0030 = ╱51╱Q╱ // 0xb88 @0x30
0x0b58…0bee at0031 = ╱ed╱(╱ // 0xb89 @0x31
0x0b58…0bee at0032 = ╱32╱2╱ // 0xb8a @0x32
0x0b58…0bee at0033 = ╱fe00008002╱ // 0xb8b @0x33
0x0b58…0bee at0038 = ╱ec╱,╱ // 0xb90 @0x38
0x0b58…0bee at0039 = ╱31╱1╱ // 0xb91 @0x39
0x0b58…0bee at003a = ╱fe00008001╱ // 0xb92 @0x3a
0x0b58…0bee at003f = ╱ee╱)╱ // 0xb97 @0x3f
0x0b58…0bee at0040 = ╱ec╱,╱ // 0xb98 @0x40
0x0b58…0bee at0041 = ╱51╱Q╱ // 0xb99 @0x41
0x0b58…0bee at0042 = ╱ed╱(╱ // 0xb9a @0x42
0x0b58…0bee at0043 = ╱32╱2╱ // 0xb9b @0x43
0x0b58…0bee at0044 = ╱fe00008002╱ // 0xb9c @0x44
0x0b58…0bee at0049 = ╱ec╱,╱ // 0xba1 @0x49
0x0b58…0bee at004a = ╱32╱2╱ // 0xba2 @0x4a
0x0b58…0bee at004b = ╱fe00008002╱ // 0xba3 @0x4b
0x0b58…0bee at0050 = ╱ee╱)╱ // 0xba8 @0x50
0x0b58…0bee at0051 = ╱ec╱,╱ // 0xba9 @0x51
0x0b58…0bee at0052 = ╱51╱Q╱ // 0xbaa @0x52
0x0b58…0bee at0053 = ╱ed╱(╱ // 0xbab @0x53
0x0b58…0bee at0054 = ╱33╱3╱ // 0xbac @0x54
0x0b58…0bee at0055 = ╱fe0000c002╱ // 0xbad @0x55
0x0b58…0bee at005a = ╱ec╱,╱ // 0xbb2 @0x5a
0x0b58…0bee at005b = ╱31╱1╱ // 0xbb3 @0x5b
0x0b58…0bee at005c = ╱fe00008001╱ // 0xbb4 @0x5c
0x0b58…0bee at0061 = ╱ee╱)╱ // 0xbb9 @0x61
0x0b58…0bee at0062 = ╱ec╱,╱ // 0xbba @0x62
0x0b58…0bee at0063 = ╱51╱Q╱ // 0xbbb @0x63
0x0b58…0bee at0064 = ╱ed╱(╱ // 0xbbc @0x64
0x0b58…0bee at0065 = ╱33╱3╱ // 0xbbd @0x65
0x0b58…0bee at0066 = ╱fe0000c002╱ // 0xbbe @0x66
0x0b58…0bee at006b = ╱ec╱,╱ // 0xbc3 @0x6b
0x0b58…0bee at006c = ╱32╱2╱ // 0xbc4 @0x6c
0x0b58…0bee at006d = ╱fe00008002╱ // 0xbc5 @0x6d
0x0b58…0bee at0072 = ╱ee╱)╱ // 0xbca @0x72
0x0b58…0bee at0073 = ╱ec╱,╱ // 0xbcb @0x73
0x0b58…0bee at0074 = ╱51╱Q╱ // 0xbcc @0x74
0x0b58…0bee at0075 = ╱ed╱(╱ // 0xbcd @0x75
0x0b58…0bee at0076 = ╱34╱4╱ // 0xbce @0x76
0x0b58…0bee at0077 = ╱fe00008003╱ // 0xbcf @0x77
0x0b58…0bee at007c = ╱ec╱,╱ // 0xbd4 @0x7c
0x0b58…0bee at007d = ╱31╱1╱ // 0xbd5 @0x7d
0x0b58…0bee at007e = ╱fe00008001╱ // 0xbd6 @0x7e
0x0b58…0bee at0083 = ╱ee╱)╱ // 0xbdb @0x83
0x0b58…0bee at0084 = ╱ec╱,╱ // 0xbdc @0x84
0x0b58…0bee at0085 = ╱51╱Q╱ // 0xbdd @0x85
0x0b58…0bee at0086 = ╱ed╱(╱ // 0xbde @0x86
0x0b58…0bee at0087 = ╱34╱4╱ // 0xbdf @0x87
0x0b58…0bee at0088 = ╱fe00008003╱ // 0xbe0 @0x88
0x0b58…0bee at008d = ╱ec╱,╱ // 0xbe5 @0x8d
0x0b58…0bee at008e = ╱32╱2╱ // 0xbe6 @0x8e
0x0b58…0bee at008f = ╱fe00008002╱ // 0xbe7 @0x8f
0x0b58…0bee at0094 = ╱ee╱)╱ // 0xbec @0x94
0x0b58…0bee at0095 = EOL // 0xbed @0x95
0x0b58…0bee }
0x0bee…0c09 9960 0830 EXEC FE(1,1,L8$)
0x0bee…0c09 LineComalBin {
0x0bee…0c09 ptr = 0x9960 // 0xbee @0x0
0x0bee…0c09 lno = 0x033e // 0xbf0 @0x2
0x0bee…0c09 at0004 = ╱9d╱ EXEC ╱ // 0xbf2 @0x4
0x0bee…0c09 at0005 = ╱46╱F╱ // 0xbf3 @0x5
0x0bee…0c09 at0006 = ╱45╱E╱ // 0xbf4 @0x6
0x0bee…0c09 at0007 = ╱ed╱(╱ // 0xbf5 @0x7
0x0bee…0c09 at0008 = ╱31╱1╱ // 0xbf6 @0x8
0x0bee…0c09 at0009 = ╱fe00008001╱ // 0xbf7 @0x9
0x0bee…0c09 at000e = ╱ec╱,╱ // 0xbfc @0xe
0x0bee…0c09 at000f = ╱31╱1╱ // 0xbfd @0xf
0x0bee…0c09 at0010 = ╱fe00008001╱ // 0xbfe @0x10
0x0bee…0c09 at0015 = ╱ec╱,╱ // 0xc03 @0x15
0x0bee…0c09 at0016 = ╱4c╱L╱ // 0xc04 @0x16
0x0bee…0c09 at0017 = ╱38╱8╱ // 0xc05 @0x17
0x0bee…0c09 at0018 = ╱ef╱$╱ // 0xc06 @0x18
0x0bee…0c09 at0019 = ╱ee╱)╱ // 0xc07 @0x19
0x0bee…0c09 at001a = EOL // 0xc08 @0x1a
0x0bee…0c09 }
0x0c09…0c21 9978 0840 FOR PIL6=1 TO 4
0x0c09…0c21 LineComalBin {
0x0c09…0c21 ptr = 0x9978 // 0xc09 @0x0
0x0c09…0c21 lno = 0x0348 // 0xc0b @0x2
0x0c09…0c21 at0004 = ╱83╱ FOR ╱ // 0xc0d @0x4
0x0c09…0c21 at0005 = ╱50╱P╱ // 0xc0e @0x5
0x0c09…0c21 at0006 = ╱49╱I╱ // 0xc0f @0x6
0x0c09…0c21 at0007 = ╱4c╱L╱ // 0xc10 @0x7
0x0c09…0c21 at0008 = ╱36╱6╱ // 0xc11 @0x8
0x0c09…0c21 at0009 = ╱dc╱=╱ // 0xc12 @0x9
0x0c09…0c21 at000a = ╱31╱1╱ // 0xc13 @0xa
0x0c09…0c21 at000b = ╱fe00008001╱ // 0xc14 @0xb
0x0c09…0c21 at0010 = ╱b7╱ TO ╱ // 0xc19 @0x10
0x0c09…0c21 at0011 = ╱34╱4╱ // 0xc1a @0x11
0x0c09…0c21 at0012 = ╱fe00008003╱ // 0xc1b @0x12
0x0c09…0c21 at0017 = EOL // 0xc20 @0x17
0x0c09…0c21 }
0x0c21…0c3d 9994 0850 IF NØGL5=Q(PIL6,1) THEN EXIT
0x0c21…0c3d LineComalBin {
0x0c21…0c3d ptr = 0x9994 // 0xc21 @0x0
0x0c21…0c3d lno = 0x0352 // 0xc23 @0x2
0x0c21…0c3d at0004 = ╱82╱ IF ╱ // 0xc25 @0x4
0x0c21…0c3d at0005 = ╱4e╱N╱ // 0xc26 @0x5
0x0c21…0c3d at0006 = ╱5c╱Ø╱ // 0xc27 @0x6
0x0c21…0c3d at0007 = ╱47╱G╱ // 0xc28 @0x7
0x0c21…0c3d at0008 = ╱4c╱L╱ // 0xc29 @0x8
0x0c21…0c3d at0009 = ╱35╱5╱ // 0xc2a @0x9
0x0c21…0c3d at000a = ╱dc╱=╱ // 0xc2b @0xa
0x0c21…0c3d at000b = ╱51╱Q╱ // 0xc2c @0xb
0x0c21…0c3d at000c = ╱ed╱(╱ // 0xc2d @0xc
0x0c21…0c3d at000d = ╱50╱P╱ // 0xc2e @0xd
0x0c21…0c3d at000e = ╱49╱I╱ // 0xc2f @0xe
0x0c21…0c3d at000f = ╱4c╱L╱ // 0xc30 @0xf
0x0c21…0c3d at0010 = ╱36╱6╱ // 0xc31 @0x10
0x0c21…0c3d at0011 = ╱ec╱,╱ // 0xc32 @0x11
0x0c21…0c3d at0012 = ╱31╱1╱ // 0xc33 @0x12
0x0c21…0c3d at0013 = ╱fe00008001╱ // 0xc34 @0x13
0x0c21…0c3d at0018 = ╱ee╱)╱ // 0xc39 @0x18
0x0c21…0c3d at0019 = ╱b6╱ THEN ╱ // 0xc3a @0x19
0x0c21…0c3d at001a = ╱99╱ EXIT ╱ // 0xc3b @0x1a
0x0c21…0c3d at001b = EOL // 0xc3c @0x1b
0x0c21…0c3d }
0x0c3d…0c47 999e 0860 NEXT PIL6
0x0c3d…0c47 LineComalBin {
0x0c3d…0c47 ptr = 0x999e // 0xc3d @0x0
0x0c3d…0c47 lno = 0x035c // 0xc3f @0x2
0x0c3d…0c47 at0004 = ╱84╱ NEXT ╱ // 0xc41 @0x4
0x0c3d…0c47 at0005 = ╱50╱P╱ // 0xc42 @0x5
0x0c3d…0c47 at0006 = ╱49╱I╱ // 0xc43 @0x6
0x0c3d…0c47 at0007 = ╱4c╱L╱ // 0xc44 @0x7
0x0c3d…0c47 at0008 = ╱36╱6╱ // 0xc45 @0x8
0x0c3d…0c47 at0009 = EOL // 0xc46 @0x9
0x0c3d…0c47 }
0x0c47…0c64 99bb 0870 IF PIL6<>5 THEN CEKS=0
0x0c47…0c64 LineComalBin {
0x0c47…0c64 ptr = 0x99bb // 0xc47 @0x0
0x0c47…0c64 lno = 0x0366 // 0xc49 @0x2
0x0c47…0c64 at0004 = ╱82╱ IF ╱ // 0xc4b @0x4
0x0c47…0c64 at0005 = ╱50╱P╱ // 0xc4c @0x5
0x0c47…0c64 at0006 = ╱49╱I╱ // 0xc4d @0x6
0x0c47…0c64 at0007 = ╱4c╱L╱ // 0xc4e @0x7
0x0c47…0c64 at0008 = ╱36╱6╱ // 0xc4f @0x8
0x0c47…0c64 at0009 = ╱e1╱<>╱ // 0xc50 @0x9
0x0c47…0c64 at000a = ╱35╱5╱ // 0xc51 @0xa
0x0c47…0c64 at000b = ╱fe0000a003╱ // 0xc52 @0xb
0x0c47…0c64 at0010 = ╱b6╱ THEN ╱ // 0xc57 @0x10
0x0c47…0c64 at0011 = ╱43╱C╱ // 0xc58 @0x11
0x0c47…0c64 at0012 = ╱45╱E╱ // 0xc59 @0x12
0x0c47…0c64 at0013 = ╱4b╱K╱ // 0xc5a @0x13
0x0c47…0c64 at0014 = ╱53╱S╱ // 0xc5b @0x14
0x0c47…0c64 at0015 = ╱dc╱=╱ // 0xc5c @0x15
0x0c47…0c64 at0016 = ╱30╱0╱ // 0xc5d @0x16
0x0c47…0c64 at0017 = ╱fe00000000╱ // 0xc5e @0x17
0x0c47…0c64 at001c = EOL // 0xc63 @0x1c
0x0c47…0c64 }
0x0c64…0c6a 99c1 0880 ENDPROC
0x0c64…0c6a LineComalBin {
0x0c64…0c6a ptr = 0x99c1 // 0xc64 @0x0
0x0c64…0c6a lno = 0x0370 // 0xc66 @0x2
0x0c64…0c6a at0004 = ╱9f╱ ENDPROC ╱ // 0xc68 @0x4
0x0c64…0c6a at0005 = EOL // 0xc69 @0x5
0x0c64…0c6a }
0x0c6a…0c83 99da 0890 PROC INDTAB1(Z,MANT5,L7)
0x0c6a…0c83 LineComalBin {
0x0c6a…0c83 ptr = 0x99da // 0xc6a @0x0
0x0c6a…0c83 lno = 0x037a // 0xc6c @0x2
0x0c6a…0c83 at0004 = ╱9e╱ PROC ╱ // 0xc6e @0x4
0x0c6a…0c83 at0005 = ╱49╱I╱ // 0xc6f @0x5
0x0c6a…0c83 at0006 = ╱4e╱N╱ // 0xc70 @0x6
0x0c6a…0c83 at0007 = ╱44╱D╱ // 0xc71 @0x7
0x0c6a…0c83 at0008 = ╱54╱T╱ // 0xc72 @0x8
0x0c6a…0c83 at0009 = ╱41╱A╱ // 0xc73 @0x9
0x0c6a…0c83 at000a = ╱42╱B╱ // 0xc74 @0xa
0x0c6a…0c83 at000b = ╱31╱1╱ // 0xc75 @0xb
0x0c6a…0c83 at000c = ╱ed╱(╱ // 0xc76 @0xc
0x0c6a…0c83 at000d = ╱5a╱Z╱ // 0xc77 @0xd
0x0c6a…0c83 at000e = ╱ec╱,╱ // 0xc78 @0xe
0x0c6a…0c83 at000f = ╱4d╱M╱ // 0xc79 @0xf
0x0c6a…0c83 at0010 = ╱41╱A╱ // 0xc7a @0x10
0x0c6a…0c83 at0011 = ╱4e╱N╱ // 0xc7b @0x11
0x0c6a…0c83 at0012 = ╱54╱T╱ // 0xc7c @0x12
0x0c6a…0c83 at0013 = ╱35╱5╱ // 0xc7d @0x13
0x0c6a…0c83 at0014 = ╱ec╱,╱ // 0xc7e @0x14
0x0c6a…0c83 at0015 = ╱4c╱L╱ // 0xc7f @0x15
0x0c6a…0c83 at0016 = ╱37╱7╱ // 0xc80 @0x16
0x0c6a…0c83 at0017 = ╱ee╱)╱ // 0xc81 @0x17
0x0c6a…0c83 at0018 = EOL // 0xc82 @0x18
0x0c6a…0c83 }
0x0c83…0c9a 99f1 0900 PIL1=MANT5 DIV 32
0x0c83…0c9a LineComalBin {
0x0c83…0c9a ptr = 0x99f1 // 0xc83 @0x0
0x0c83…0c9a lno = 0x0384 // 0xc85 @0x2
0x0c83…0c9a at0004 = ╱50╱P╱ // 0xc87 @0x4
0x0c83…0c9a at0005 = ╱49╱I╱ // 0xc88 @0x5
0x0c83…0c9a at0006 = ╱4c╱L╱ // 0xc89 @0x6
0x0c83…0c9a at0007 = ╱31╱1╱ // 0xc8a @0x7
0x0c83…0c9a at0008 = ╱dc╱=╱ // 0xc8b @0x8
0x0c83…0c9a at0009 = ╱4d╱M╱ // 0xc8c @0x9
0x0c83…0c9a at000a = ╱41╱A╱ // 0xc8d @0xa
0x0c83…0c9a at000b = ╱4e╱N╱ // 0xc8e @0xb
0x0c83…0c9a at000c = ╱54╱T╱ // 0xc8f @0xc
0x0c83…0c9a at000d = ╱35╱5╱ // 0xc90 @0xd
0x0c83…0c9a at000e = ╱e7╱ DIV ╱ // 0xc91 @0xe
0x0c83…0c9a at000f = ╱33╱3╱ // 0xc92 @0xf
0x0c83…0c9a at0010 = ╱32╱2╱ // 0xc93 @0x10
0x0c83…0c9a at0011 = ╱fe00008006╱ // 0xc94 @0x11
0x0c83…0c9a at0016 = EOL // 0xc99 @0x16
0x0c83…0c9a }
0x0c9a…0cad 9a04 0910 FOR I=1 TO PIL1
0x0c9a…0cad LineComalBin {
0x0c9a…0cad ptr = 0x9a04 // 0xc9a @0x0
0x0c9a…0cad lno = 0x038e // 0xc9c @0x2
0x0c9a…0cad at0004 = ╱83╱ FOR ╱ // 0xc9e @0x4
0x0c9a…0cad at0005 = ╱49╱I╱ // 0xc9f @0x5
0x0c9a…0cad at0006 = ╱dc╱=╱ // 0xca0 @0x6
0x0c9a…0cad at0007 = ╱31╱1╱ // 0xca1 @0x7
0x0c9a…0cad at0008 = ╱fe00008001╱ // 0xca2 @0x8
0x0c9a…0cad at000d = ╱b7╱ TO ╱ // 0xca7 @0xd
0x0c9a…0cad at000e = ╱50╱P╱ // 0xca8 @0xe
0x0c9a…0cad at000f = ╱49╱I╱ // 0xca9 @0xf
0x0c9a…0cad at0010 = ╱4c╱L╱ // 0xcaa @0x10
0x0c9a…0cad at0011 = ╱31╱1╱ // 0xcab @0x11
0x0c9a…0cad at0012 = EOL // 0xcac @0x12
0x0c9a…0cad }
0x0cad…0ccc 9a23 0920 H=(I-1)*8+1
0x0cad…0ccc LineComalBin {
0x0cad…0ccc ptr = 0x9a23 // 0xcad @0x0
0x0cad…0ccc lno = 0x0398 // 0xcaf @0x2
0x0cad…0ccc at0004 = ╱48╱H╱ // 0xcb1 @0x4
0x0cad…0ccc at0005 = ╱dc╱=╱ // 0xcb2 @0x5
0x0cad…0ccc at0006 = ╱ed╱(╱ // 0xcb3 @0x6
0x0cad…0ccc at0007 = ╱49╱I╱ // 0xcb4 @0x7
0x0cad…0ccc at0008 = ╱e3╱-╱ // 0xcb5 @0x8
0x0cad…0ccc at0009 = ╱31╱1╱ // 0xcb6 @0x9
0x0cad…0ccc at000a = ╱fe00008001╱ // 0xcb7 @0xa
0x0cad…0ccc at000f = ╱ee╱)╱ // 0xcbc @0xf
0x0cad…0ccc at0010 = ╱e4╱*╱ // 0xcbd @0x10
0x0cad…0ccc at0011 = ╱38╱8╱ // 0xcbe @0x11
0x0cad…0ccc at0012 = ╱fe00008004╱ // 0xcbf @0x12
0x0cad…0ccc at0017 = ╱e2╱+╱ // 0xcc4 @0x17
0x0cad…0ccc at0018 = ╱31╱1╱ // 0xcc5 @0x18
0x0cad…0ccc at0019 = ╱fe00008001╱ // 0xcc6 @0x19
0x0cad…0ccc at001e = EOL // 0xccb @0x1e
0x0cad…0ccc }
0x0ccc…0d30 9a87 0930 GET L7$,I:Z(H),Z(H+1),Z(H+2),Z(H+3),Z(H+4),Z(H+5),Z(H+6),Z(H+7)
0x0ccc…0d30 LineComalBin {
0x0ccc…0d30 ptr = 0x9a87 // 0xccc @0x0
0x0ccc…0d30 lno = 0x03a2 // 0xcce @0x2
0x0ccc…0d30 at0004 = ╱a9╱ GET ╱ // 0xcd0 @0x4
0x0ccc…0d30 at0005 = ╱4c╱L╱ // 0xcd1 @0x5
0x0ccc…0d30 at0006 = ╱37╱7╱ // 0xcd2 @0x6
0x0ccc…0d30 at0007 = ╱ef╱$╱ // 0xcd3 @0x7
0x0ccc…0d30 at0008 = ╱ec╱,╱ // 0xcd4 @0x8
0x0ccc…0d30 at0009 = ╱49╱I╱ // 0xcd5 @0x9
0x0ccc…0d30 at000a = ╱f0╱:╱ // 0xcd6 @0xa
0x0ccc…0d30 at000b = ╱5a╱Z╱ // 0xcd7 @0xb
0x0ccc…0d30 at000c = ╱ed╱(╱ // 0xcd8 @0xc
0x0ccc…0d30 at000d = ╱48╱H╱ // 0xcd9 @0xd
0x0ccc…0d30 at000e = ╱ee╱)╱ // 0xcda @0xe
0x0ccc…0d30 at000f = ╱ec╱,╱ // 0xcdb @0xf
0x0ccc…0d30 at0010 = ╱5a╱Z╱ // 0xcdc @0x10
0x0ccc…0d30 at0011 = ╱ed╱(╱ // 0xcdd @0x11
0x0ccc…0d30 at0012 = ╱48╱H╱ // 0xcde @0x12
0x0ccc…0d30 at0013 = ╱e2╱+╱ // 0xcdf @0x13
0x0ccc…0d30 at0014 = ╱31╱1╱ // 0xce0 @0x14
0x0ccc…0d30 at0015 = ╱fe00008001╱ // 0xce1 @0x15
0x0ccc…0d30 at001a = ╱ee╱)╱ // 0xce6 @0x1a
0x0ccc…0d30 at001b = ╱ec╱,╱ // 0xce7 @0x1b
0x0ccc…0d30 at001c = ╱5a╱Z╱ // 0xce8 @0x1c
0x0ccc…0d30 at001d = ╱ed╱(╱ // 0xce9 @0x1d
0x0ccc…0d30 at001e = ╱48╱H╱ // 0xcea @0x1e
0x0ccc…0d30 at001f = ╱e2╱+╱ // 0xceb @0x1f
0x0ccc…0d30 at0020 = ╱32╱2╱ // 0xcec @0x20
0x0ccc…0d30 at0021 = ╱fe00008002╱ // 0xced @0x21
0x0ccc…0d30 at0026 = ╱ee╱)╱ // 0xcf2 @0x26
0x0ccc…0d30 at0027 = ╱ec╱,╱ // 0xcf3 @0x27
0x0ccc…0d30 at0028 = ╱5a╱Z╱ // 0xcf4 @0x28
0x0ccc…0d30 at0029 = ╱ed╱(╱ // 0xcf5 @0x29
0x0ccc…0d30 at002a = ╱48╱H╱ // 0xcf6 @0x2a
0x0ccc…0d30 at002b = ╱e2╱+╱ // 0xcf7 @0x2b
0x0ccc…0d30 at002c = ╱33╱3╱ // 0xcf8 @0x2c
0x0ccc…0d30 at002d = ╱fe0000c002╱ // 0xcf9 @0x2d
0x0ccc…0d30 at0032 = ╱ee╱)╱ // 0xcfe @0x32
0x0ccc…0d30 at0033 = ╱ec╱,╱ // 0xcff @0x33
0x0ccc…0d30 at0034 = ╱5a╱Z╱ // 0xd00 @0x34
0x0ccc…0d30 at0035 = ╱ed╱(╱ // 0xd01 @0x35
0x0ccc…0d30 at0036 = ╱48╱H╱ // 0xd02 @0x36
0x0ccc…0d30 at0037 = ╱e2╱+╱ // 0xd03 @0x37
0x0ccc…0d30 at0038 = ╱34╱4╱ // 0xd04 @0x38
0x0ccc…0d30 at0039 = ╱fe00008003╱ // 0xd05 @0x39
0x0ccc…0d30 at003e = ╱ee╱)╱ // 0xd0a @0x3e
0x0ccc…0d30 at003f = ╱ec╱,╱ // 0xd0b @0x3f
0x0ccc…0d30 at0040 = ╱5a╱Z╱ // 0xd0c @0x40
0x0ccc…0d30 at0041 = ╱ed╱(╱ // 0xd0d @0x41
0x0ccc…0d30 at0042 = ╱48╱H╱ // 0xd0e @0x42
0x0ccc…0d30 at0043 = ╱e2╱+╱ // 0xd0f @0x43
0x0ccc…0d30 at0044 = ╱35╱5╱ // 0xd10 @0x44
0x0ccc…0d30 at0045 = ╱fe0000a003╱ // 0xd11 @0x45
0x0ccc…0d30 at004a = ╱ee╱)╱ // 0xd16 @0x4a
0x0ccc…0d30 at004b = ╱ec╱,╱ // 0xd17 @0x4b
0x0ccc…0d30 at004c = ╱5a╱Z╱ // 0xd18 @0x4c
0x0ccc…0d30 at004d = ╱ed╱(╱ // 0xd19 @0x4d
0x0ccc…0d30 at004e = ╱48╱H╱ // 0xd1a @0x4e
0x0ccc…0d30 at004f = ╱e2╱+╱ // 0xd1b @0x4f
0x0ccc…0d30 at0050 = ╱36╱6╱ // 0xd1c @0x50
0x0ccc…0d30 at0051 = ╱fe0000c003╱ // 0xd1d @0x51
0x0ccc…0d30 at0056 = ╱ee╱)╱ // 0xd22 @0x56
0x0ccc…0d30 at0057 = ╱ec╱,╱ // 0xd23 @0x57
0x0ccc…0d30 at0058 = ╱5a╱Z╱ // 0xd24 @0x58
0x0ccc…0d30 at0059 = ╱ed╱(╱ // 0xd25 @0x59
0x0ccc…0d30 at005a = ╱48╱H╱ // 0xd26 @0x5a
0x0ccc…0d30 at005b = ╱e2╱+╱ // 0xd27 @0x5b
0x0ccc…0d30 at005c = ╱37╱7╱ // 0xd28 @0x5c
0x0ccc…0d30 at005d = ╱fe0000e003╱ // 0xd29 @0x5d
0x0ccc…0d30 at0062 = ╱ee╱)╱ // 0xd2e @0x62
0x0ccc…0d30 at0063 = EOL // 0xd2f @0x63
0x0ccc…0d30 }
0x0d30…0d4b 9aa2 0940 EXEC FE(2,1,L7$)
0x0d30…0d4b LineComalBin {
0x0d30…0d4b ptr = 0x9aa2 // 0xd30 @0x0
0x0d30…0d4b lno = 0x03ac // 0xd32 @0x2
0x0d30…0d4b at0004 = ╱9d╱ EXEC ╱ // 0xd34 @0x4
0x0d30…0d4b at0005 = ╱46╱F╱ // 0xd35 @0x5
0x0d30…0d4b at0006 = ╱45╱E╱ // 0xd36 @0x6
0x0d30…0d4b at0007 = ╱ed╱(╱ // 0xd37 @0x7
0x0d30…0d4b at0008 = ╱32╱2╱ // 0xd38 @0x8
0x0d30…0d4b at0009 = ╱fe00008002╱ // 0xd39 @0x9
0x0d30…0d4b at000e = ╱ec╱,╱ // 0xd3e @0xe
0x0d30…0d4b at000f = ╱31╱1╱ // 0xd3f @0xf
0x0d30…0d4b at0010 = ╱fe00008001╱ // 0xd40 @0x10
0x0d30…0d4b at0015 = ╱ec╱,╱ // 0xd45 @0x15
0x0d30…0d4b at0016 = ╱4c╱L╱ // 0xd46 @0x16
0x0d30…0d4b at0017 = ╱37╱7╱ // 0xd47 @0x17
0x0d30…0d4b at0018 = ╱ef╱$╱ // 0xd48 @0x18
0x0d30…0d4b at0019 = ╱ee╱)╱ // 0xd49 @0x19
0x0d30…0d4b at001a = EOL // 0xd4a @0x1a
0x0d30…0d4b }
0x0d4b…0d52 9aa9 0950 NEXT I
0x0d4b…0d52 LineComalBin {
0x0d4b…0d52 ptr = 0x9aa9 // 0xd4b @0x0
0x0d4b…0d52 lno = 0x03b6 // 0xd4d @0x2
0x0d4b…0d52 at0004 = ╱84╱ NEXT ╱ // 0xd4f @0x4
0x0d4b…0d52 at0005 = ╱49╱I╱ // 0xd50 @0x5
0x0d4b…0d52 at0006 = EOL // 0xd51 @0x6
0x0d4b…0d52 }
0x0d52…0d58 9aaf 0960 ENDPROC
0x0d52…0d58 LineComalBin {
0x0d52…0d58 ptr = 0x9aaf // 0xd52 @0x0
0x0d52…0d58 lno = 0x03c0 // 0xd54 @0x2
0x0d52…0d58 at0004 = ╱9f╱ ENDPROC ╱ // 0xd56 @0x4
0x0d52…0d58 at0005 = EOL // 0xd57 @0x5
0x0d52…0d58 }
0x0d58…0d6a 9ac1 0970 PROC NRTEST(NUM1)
0x0d58…0d6a LineComalBin {
0x0d58…0d6a ptr = 0x9ac1 // 0xd58 @0x0
0x0d58…0d6a lno = 0x03ca // 0xd5a @0x2
0x0d58…0d6a at0004 = ╱9e╱ PROC ╱ // 0xd5c @0x4
0x0d58…0d6a at0005 = ╱4e╱N╱ // 0xd5d @0x5
0x0d58…0d6a at0006 = ╱52╱R╱ // 0xd5e @0x6
0x0d58…0d6a at0007 = ╱54╱T╱ // 0xd5f @0x7
0x0d58…0d6a at0008 = ╱45╱E╱ // 0xd60 @0x8
0x0d58…0d6a at0009 = ╱53╱S╱ // 0xd61 @0x9
0x0d58…0d6a at000a = ╱54╱T╱ // 0xd62 @0xa
0x0d58…0d6a at000b = ╱ed╱(╱ // 0xd63 @0xb
0x0d58…0d6a at000c = ╱4e╱N╱ // 0xd64 @0xc
0x0d58…0d6a at000d = ╱55╱U╱ // 0xd65 @0xd
0x0d58…0d6a at000e = ╱4d╱M╱ // 0xd66 @0xe
0x0d58…0d6a at000f = ╱31╱1╱ // 0xd67 @0xf
0x0d58…0d6a at0010 = ╱ee╱)╱ // 0xd68 @0x10
0x0d58…0d6a at0011 = EOL // 0xd69 @0x11
0x0d58…0d6a }
0x0d6a…0d9b 9af2 0980 P=0;TEST2=0;KTAL=0;L=LEN(NUM1$)
0x0d6a…0d9b LineComalBin {
0x0d6a…0d9b ptr = 0x9af2 // 0xd6a @0x0
0x0d6a…0d9b lno = 0x03d4 // 0xd6c @0x2
0x0d6a…0d9b at0004 = ╱50╱P╱ // 0xd6e @0x4
0x0d6a…0d9b at0005 = ╱dc╱=╱ // 0xd6f @0x5
0x0d6a…0d9b at0006 = ╱30╱0╱ // 0xd70 @0x6
0x0d6a…0d9b at0007 = ╱fe00000000╱ // 0xd71 @0x7
0x0d6a…0d9b at000c = ╱eb╱;╱ // 0xd76 @0xc
0x0d6a…0d9b at000d = ╱54╱T╱ // 0xd77 @0xd
0x0d6a…0d9b at000e = ╱45╱E╱ // 0xd78 @0xe
0x0d6a…0d9b at000f = ╱53╱S╱ // 0xd79 @0xf
0x0d6a…0d9b at0010 = ╱54╱T╱ // 0xd7a @0x10
0x0d6a…0d9b at0011 = ╱32╱2╱ // 0xd7b @0x11
0x0d6a…0d9b at0012 = ╱dc╱=╱ // 0xd7c @0x12
0x0d6a…0d9b at0013 = ╱30╱0╱ // 0xd7d @0x13
0x0d6a…0d9b at0014 = ╱fe00000000╱ // 0xd7e @0x14
0x0d6a…0d9b at0019 = ╱eb╱;╱ // 0xd83 @0x19
0x0d6a…0d9b at001a = ╱4b╱K╱ // 0xd84 @0x1a
0x0d6a…0d9b at001b = ╱54╱T╱ // 0xd85 @0x1b
0x0d6a…0d9b at001c = ╱41╱A╱ // 0xd86 @0x1c
0x0d6a…0d9b at001d = ╱4c╱L╱ // 0xd87 @0x1d
0x0d6a…0d9b at001e = ╱dc╱=╱ // 0xd88 @0x1e
0x0d6a…0d9b at001f = ╱30╱0╱ // 0xd89 @0x1f
0x0d6a…0d9b at0020 = ╱fe00000000╱ // 0xd8a @0x20
0x0d6a…0d9b at0025 = ╱eb╱;╱ // 0xd8f @0x25
0x0d6a…0d9b at0026 = ╱4c╱L╱ // 0xd90 @0x26
0x0d6a…0d9b at0027 = ╱dc╱=╱ // 0xd91 @0x27
0x0d6a…0d9b at0028 = ╱cc╱LEN╱ // 0xd92 @0x28
0x0d6a…0d9b at0029 = ╱ed╱(╱ // 0xd93 @0x29
0x0d6a…0d9b at002a = ╱4e╱N╱ // 0xd94 @0x2a
0x0d6a…0d9b at002b = ╱55╱U╱ // 0xd95 @0x2b
0x0d6a…0d9b at002c = ╱4d╱M╱ // 0xd96 @0x2c
0x0d6a…0d9b at002d = ╱31╱1╱ // 0xd97 @0x2d
0x0d6a…0d9b at002e = ╱ef╱$╱ // 0xd98 @0x2e
0x0d6a…0d9b at002f = ╱ee╱)╱ // 0xd99 @0x2f
0x0d6a…0d9b at0030 = EOL // 0xd9a @0x30
0x0d6a…0d9b }
0x0d9b…0dab 9b02 0990 IF L>6 THEN EXIT
0x0d9b…0dab LineComalBin {
0x0d9b…0dab ptr = 0x9b02 // 0xd9b @0x0
0x0d9b…0dab lno = 0x03de // 0xd9d @0x2
0x0d9b…0dab at0004 = ╱82╱ IF ╱ // 0xd9f @0x4
0x0d9b…0dab at0005 = ╱4c╱L╱ // 0xda0 @0x5
0x0d9b…0dab at0006 = ╱de╱>╱ // 0xda1 @0x6
0x0d9b…0dab at0007 = ╱36╱6╱ // 0xda2 @0x7
0x0d9b…0dab at0008 = ╱fe0000c003╱ // 0xda3 @0x8
0x0d9b…0dab at000d = ╱b6╱ THEN ╱ // 0xda8 @0xd
0x0d9b…0dab at000e = ╱99╱ EXIT ╱ // 0xda9 @0xe
0x0d9b…0dab at000f = EOL // 0xdaa @0xf
0x0d9b…0dab }
0x0dab…0db4 9b0b 1000 CASE L OF
0x0dab…0db4 LineComalBin {
0x0dab…0db4 ptr = 0x9b0b // 0xdab @0x0
0x0dab…0db4 lno = 0x03e8 // 0xdad @0x2
0x0dab…0db4 at0004 = ╱a201╱ CASE ╱ // 0xdaf @0x4
0x0dab…0db4 at0006 = ╱4c╱L╱ // 0xdb1 @0x6
0x0dab…0db4 at0007 = ╱ba╱ OF ╱ // 0xdb2 @0x7
0x0dab…0db4 at0008 = EOL // 0xdb3 @0x8
0x0dab…0db4 }
0x0db4…0dc4 9b1b 1010 FOR J=1 TO L
0x0db4…0dc4 LineComalBin {
0x0db4…0dc4 ptr = 0x9b1b // 0xdb4 @0x0
0x0db4…0dc4 lno = 0x03f2 // 0xdb6 @0x2
0x0db4…0dc4 at0004 = ╱83╱ FOR ╱ // 0xdb8 @0x4
0x0db4…0dc4 at0005 = ╱4a╱J╱ // 0xdb9 @0x5
0x0db4…0dc4 at0006 = ╱dc╱=╱ // 0xdba @0x6
0x0db4…0dc4 at0007 = ╱31╱1╱ // 0xdbb @0x7
0x0db4…0dc4 at0008 = ╱fe00008001╱ // 0xdbc @0x8
0x0db4…0dc4 at000d = ╱b7╱ TO ╱ // 0xdc1 @0xd
0x0db4…0dc4 at000e = ╱4c╱L╱ // 0xdc2 @0xe
0x0db4…0dc4 at000f = EOL // 0xdc3 @0xf
0x0db4…0dc4 }
0x0dc4…0de2 9b39 1020 P1=INT(ORD(NUM1$(J))-48)
0x0dc4…0de2 LineComalBin {
0x0dc4…0de2 ptr = 0x9b39 // 0xdc4 @0x0
0x0dc4…0de2 lno = 0x03fc // 0xdc6 @0x2
0x0dc4…0de2 at0004 = ╱50╱P╱ // 0xdc8 @0x4
0x0dc4…0de2 at0005 = ╱31╱1╱ // 0xdc9 @0x5
0x0dc4…0de2 at0006 = ╱dc╱=╱ // 0xdca @0x6
0x0dc4…0de2 at0007 = ╱c6╱INT╱ // 0xdcb @0x7
0x0dc4…0de2 at0008 = ╱ed╱(╱ // 0xdcc @0x8
0x0dc4…0de2 at0009 = ╱cd╱ORD╱ // 0xdcd @0x9
0x0dc4…0de2 at000a = ╱ed╱(╱ // 0xdce @0xa
0x0dc4…0de2 at000b = ╱4e╱N╱ // 0xdcf @0xb
0x0dc4…0de2 at000c = ╱55╱U╱ // 0xdd0 @0xc
0x0dc4…0de2 at000d = ╱4d╱M╱ // 0xdd1 @0xd
0x0dc4…0de2 at000e = ╱31╱1╱ // 0xdd2 @0xe
0x0dc4…0de2 at000f = ╱ef╱$╱ // 0xdd3 @0xf
0x0dc4…0de2 at0010 = ╱ed╱(╱ // 0xdd4 @0x10
0x0dc4…0de2 at0011 = ╱4a╱J╱ // 0xdd5 @0x11
0x0dc4…0de2 at0012 = ╱ee╱)╱ // 0xdd6 @0x12
0x0dc4…0de2 at0013 = ╱ee╱)╱ // 0xdd7 @0x13
0x0dc4…0de2 at0014 = ╱e3╱-╱ // 0xdd8 @0x14
0x0dc4…0de2 at0015 = ╱34╱4╱ // 0xdd9 @0x15
0x0dc4…0de2 at0016 = ╱38╱8╱ // 0xdda @0x16
0x0dc4…0de2 at0017 = ╱fe0000c006╱ // 0xddb @0x17
0x0dc4…0de2 at001c = ╱ee╱)╱ // 0xde0 @0x1c
0x0dc4…0de2 at001d = EOL // 0xde1 @0x1d
0x0dc4…0de2 }
0x0de2…0dfc 9b53 1030 IF P1<0 OR P1>9 THEN
0x0de2…0dfc LineComalBin {
0x0de2…0dfc ptr = 0x9b53 // 0xde2 @0x0
0x0de2…0dfc lno = 0x0406 // 0xde4 @0x2
0x0de2…0dfc at0004 = ╱9c╱ IF ╱ // 0xde6 @0x4
0x0de2…0dfc at0005 = ╱50╱P╱ // 0xde7 @0x5
0x0de2…0dfc at0006 = ╱31╱1╱ // 0xde8 @0x6
0x0de2…0dfc at0007 = ╱dd╱<╱ // 0xde9 @0x7
0x0de2…0dfc at0008 = ╱30╱0╱ // 0xdea @0x8
0x0de2…0dfc at0009 = ╱fe00000000╱ // 0xdeb @0x9
0x0de2…0dfc at000e = ╱db╱ OR ╱ // 0xdf0 @0xe
0x0de2…0dfc at000f = ╱50╱P╱ // 0xdf1 @0xf
0x0de2…0dfc at0010 = ╱31╱1╱ // 0xdf2 @0x10
0x0de2…0dfc at0011 = ╱de╱>╱ // 0xdf3 @0x11
0x0de2…0dfc at0012 = ╱39╱9╱ // 0xdf4 @0x12
0x0de2…0dfc at0013 = ╱fe00009004╱ // 0xdf5 @0x13
0x0de2…0dfc at0018 = ╱b6╱ THEN ╱ // 0xdfa @0x18
0x0de2…0dfc at0019 = EOL // 0xdfb @0x19
0x0de2…0dfc }
0x0dfc…0e0d 9b64 1040 TEST2=1
0x0dfc…0e0d LineComalBin {
0x0dfc…0e0d ptr = 0x9b64 // 0xdfc @0x0
0x0dfc…0e0d lno = 0x0410 // 0xdfe @0x2
0x0dfc…0e0d at0004 = ╱54╱T╱ // 0xe00 @0x4
0x0dfc…0e0d at0005 = ╱45╱E╱ // 0xe01 @0x5
0x0dfc…0e0d at0006 = ╱53╱S╱ // 0xe02 @0x6
0x0dfc…0e0d at0007 = ╱54╱T╱ // 0xe03 @0x7
0x0dfc…0e0d at0008 = ╱32╱2╱ // 0xe04 @0x8
0x0dfc…0e0d at0009 = ╱dc╱=╱ // 0xe05 @0x9
0x0dfc…0e0d at000a = ╱31╱1╱ // 0xe06 @0xa
0x0dfc…0e0d at000b = ╱fe00008001╱ // 0xe07 @0xb
0x0dfc…0e0d at0010 = EOL // 0xe0c @0x10
0x0dfc…0e0d }
0x0e0d…0e13 9b6a 1050 ELSE
0x0e0d…0e13 LineComalBin {
0x0e0d…0e13 ptr = 0x9b6a // 0xe0d @0x0
0x0e0d…0e13 lno = 0x041a // 0xe0f @0x2
0x0e0d…0e13 at0004 = ╱9a╱ ELSE ╱ // 0xe11 @0x4
0x0e0d…0e13 at0005 = EOL // 0xe12 @0x5
0x0e0d…0e13 }
0x0e13…0e26 9b7d 1060 P=P*10+P1
0x0e13…0e26 LineComalBin {
0x0e13…0e26 ptr = 0x9b7d // 0xe13 @0x0
0x0e13…0e26 lno = 0x0424 // 0xe15 @0x2
0x0e13…0e26 at0004 = ╱50╱P╱ // 0xe17 @0x4
0x0e13…0e26 at0005 = ╱dc╱=╱ // 0xe18 @0x5
0x0e13…0e26 at0006 = ╱50╱P╱ // 0xe19 @0x6
0x0e13…0e26 at0007 = ╱e4╱*╱ // 0xe1a @0x7
0x0e13…0e26 at0008 = ╱31╱1╱ // 0xe1b @0x8
0x0e13…0e26 at0009 = ╱30╱0╱ // 0xe1c @0x9
0x0e13…0e26 at000a = ╱fe0000a004╱ // 0xe1d @0xa
0x0e13…0e26 at000f = ╱e2╱+╱ // 0xe22 @0xf
0x0e13…0e26 at0010 = ╱50╱P╱ // 0xe23 @0x10
0x0e13…0e26 at0011 = ╱31╱1╱ // 0xe24 @0x11
0x0e13…0e26 at0012 = EOL // 0xe25 @0x12
0x0e13…0e26 }
0x0e26…0e2c 9b83 1070 ENDIF
0x0e26…0e2c LineComalBin {
0x0e26…0e2c ptr = 0x9b83 // 0xe26 @0x0
0x0e26…0e2c lno = 0x042e // 0xe28 @0x2
0x0e26…0e2c at0004 = ╱9b╱ ENDIF ╱ // 0xe2a @0x4
0x0e26…0e2c at0005 = EOL // 0xe2b @0x5
0x0e26…0e2c }
0x0e2c…0e33 9b8a 1080 NEXT J
0x0e2c…0e33 LineComalBin {
0x0e2c…0e33 ptr = 0x9b8a // 0xe2c @0x0
0x0e2c…0e33 lno = 0x0438 // 0xe2e @0x2
0x0e2c…0e33 at0004 = ╱84╱ NEXT ╱ // 0xe30 @0x4
0x0e2c…0e33 at0005 = ╱4a╱J╱ // 0xe31 @0x5
0x0e2c…0e33 at0006 = EOL // 0xe32 @0x6
0x0e2c…0e33 }
0x0e33…0e49 9ba0 1090 KTAL=P DIV 10000
0x0e33…0e49 LineComalBin {
0x0e33…0e49 ptr = 0x9ba0 // 0xe33 @0x0
0x0e33…0e49 lno = 0x0442 // 0xe35 @0x2
0x0e33…0e49 at0004 = ╱4b╱K╱ // 0xe37 @0x4
0x0e33…0e49 at0005 = ╱54╱T╱ // 0xe38 @0x5
0x0e33…0e49 at0006 = ╱41╱A╱ // 0xe39 @0x6
0x0e33…0e49 at0007 = ╱4c╱L╱ // 0xe3a @0x7
0x0e33…0e49 at0008 = ╱dc╱=╱ // 0xe3b @0x8
0x0e33…0e49 at0009 = ╱50╱P╱ // 0xe3c @0x9
0x0e33…0e49 at000a = ╱e7╱ DIV ╱ // 0xe3d @0xa
0x0e33…0e49 at000b = ╱31╱1╱ // 0xe3e @0xb
0x0e33…0e49 at000c = ╱30╱0╱ // 0xe3f @0xc
0x0e33…0e49 at000d = ╱30╱0╱ // 0xe40 @0xd
0x0e33…0e49 at000e = ╱30╱0╱ // 0xe41 @0xe
0x0e33…0e49 at000f = ╱30╱0╱ // 0xe42 @0xf
0x0e33…0e49 at0010 = ╱fe00409c0e╱ // 0xe43 @0x10
0x0e33…0e49 at0015 = EOL // 0xe48 @0x15
0x0e33…0e49 }
0x0e49…0e56 9bad 1100 WHEN 0
0x0e49…0e56 LineComalBin {
0x0e49…0e56 ptr = 0x9bad // 0xe49 @0x0
0x0e49…0e56 lno = 0x044c // 0xe4b @0x2
0x0e49…0e56 at0004 = ╱a301╱ WHEN ╱ // 0xe4d @0x4
0x0e49…0e56 at0006 = ╱30╱0╱ // 0xe4f @0x6
0x0e49…0e56 at0007 = ╱fe00000000╱ // 0xe50 @0x7
0x0e49…0e56 at000c = EOL // 0xe55 @0xc
0x0e49…0e56 }
0x0e56…0e64 9bbb 1110 P=-1
0x0e56…0e64 LineComalBin {
0x0e56…0e64 ptr = 0x9bbb // 0xe56 @0x0
0x0e56…0e64 lno = 0x0456 // 0xe58 @0x2
0x0e56…0e64 at0004 = ╱50╱P╱ // 0xe5a @0x4
0x0e56…0e64 at0005 = ╱dc╱=╱ // 0xe5b @0x5
0x0e56…0e64 at0006 = ╱e9╱-╱ // 0xe5c @0x6
0x0e56…0e64 at0007 = ╱31╱1╱ // 0xe5d @0x7
0x0e56…0e64 at0008 = ╱fe00008001╱ // 0xe5e @0x8
0x0e56…0e64 at000d = EOL // 0xe63 @0xd
0x0e56…0e64 }
0x0e64…0e71 9bc8 1120 WHEN 1
0x0e64…0e71 LineComalBin {
0x0e64…0e71 ptr = 0x9bc8 // 0xe64 @0x0
0x0e64…0e71 lno = 0x0460 // 0xe66 @0x2
0x0e64…0e71 at0004 = ╱a301╱ WHEN ╱ // 0xe68 @0x4
0x0e64…0e71 at0006 = ╱31╱1╱ // 0xe6a @0x6
0x0e64…0e71 at0007 = ╱fe00008001╱ // 0xe6b @0x7
0x0e64…0e71 at000c = EOL // 0xe70 @0xc
0x0e64…0e71 }
0x0e71…0e7e 9bd5 1130 CASE NUM1$ OF
0x0e71…0e7e LineComalBin {
0x0e71…0e7e ptr = 0x9bd5 // 0xe71 @0x0
0x0e71…0e7e lno = 0x046a // 0xe73 @0x2
0x0e71…0e7e at0004 = ╱a200╱ CASE ╱ // 0xe75 @0x4
0x0e71…0e7e at0006 = ╱4e╱N╱ // 0xe77 @0x6
0x0e71…0e7e at0007 = ╱55╱U╱ // 0xe78 @0x7
0x0e71…0e7e at0008 = ╱4d╱M╱ // 0xe79 @0x8
0x0e71…0e7e at0009 = ╱31╱1╱ // 0xe7a @0x9
0x0e71…0e7e at000a = ╱ef╱$╱ // 0xe7b @0xa
0x0e71…0e7e at000b = ╱ba╱ OF ╱ // 0xe7c @0xb
0x0e71…0e7e at000c = EOL // 0xe7d @0xc
0x0e71…0e7e }
0x0e7e…0e98 9bef 1140 P=INT(ORD(NUM1$)-48)
0x0e7e…0e98 LineComalBin {
0x0e7e…0e98 ptr = 0x9bef // 0xe7e @0x0
0x0e7e…0e98 lno = 0x0474 // 0xe80 @0x2
0x0e7e…0e98 at0004 = ╱50╱P╱ // 0xe82 @0x4
0x0e7e…0e98 at0005 = ╱dc╱=╱ // 0xe83 @0x5
0x0e7e…0e98 at0006 = ╱c6╱INT╱ // 0xe84 @0x6
0x0e7e…0e98 at0007 = ╱ed╱(╱ // 0xe85 @0x7
0x0e7e…0e98 at0008 = ╱cd╱ORD╱ // 0xe86 @0x8
0x0e7e…0e98 at0009 = ╱ed╱(╱ // 0xe87 @0x9
0x0e7e…0e98 at000a = ╱4e╱N╱ // 0xe88 @0xa
0x0e7e…0e98 at000b = ╱55╱U╱ // 0xe89 @0xb
0x0e7e…0e98 at000c = ╱4d╱M╱ // 0xe8a @0xc
0x0e7e…0e98 at000d = ╱31╱1╱ // 0xe8b @0xd
0x0e7e…0e98 at000e = ╱ef╱$╱ // 0xe8c @0xe
0x0e7e…0e98 at000f = ╱ee╱)╱ // 0xe8d @0xf
0x0e7e…0e98 at0010 = ╱e3╱-╱ // 0xe8e @0x10
0x0e7e…0e98 at0011 = ╱34╱4╱ // 0xe8f @0x11
0x0e7e…0e98 at0012 = ╱38╱8╱ // 0xe90 @0x12
0x0e7e…0e98 at0013 = ╱fe0000c006╱ // 0xe91 @0x13
0x0e7e…0e98 at0018 = ╱ee╱)╱ // 0xe96 @0x18
0x0e7e…0e98 at0019 = EOL // 0xe97 @0x19
0x0e7e…0e98 }
0x0e98…0ea6 9bfd 1150 WHEN "J","j"
0x0e98…0ea6 LineComalBin {
0x0e98…0ea6 ptr = 0x9bfd // 0xe98 @0x0
0x0e98…0ea6 lno = 0x047e // 0xe9a @0x2
0x0e98…0ea6 at0004 = ╱a300╱ WHEN ╱ // 0xe9c @0x4
0x0e98…0ea6 at0006 = ╱22╱"╱ // 0xe9e @0x6
0x0e98…0ea6 at0007 = ╱4a╱J╱ // 0xe9f @0x7
0x0e98…0ea6 at0008 = ╱22╱"╱ // 0xea0 @0x8
0x0e98…0ea6 at0009 = ╱ec╱,╱ // 0xea1 @0x9
0x0e98…0ea6 at000a = ╱22╱"╱ // 0xea2 @0xa
0x0e98…0ea6 at000b = ╱6a╱j╱ // 0xea3 @0xb
0x0e98…0ea6 at000c = ╱22╱"╱ // 0xea4 @0xc
0x0e98…0ea6 at000d = EOL // 0xea5 @0xd
0x0e98…0ea6 }
0x0ea6…0eb4 9c0b 1160 P=-7
0x0ea6…0eb4 LineComalBin {
0x0ea6…0eb4 ptr = 0x9c0b // 0xea6 @0x0
0x0ea6…0eb4 lno = 0x0488 // 0xea8 @0x2
0x0ea6…0eb4 at0004 = ╱50╱P╱ // 0xeaa @0x4
0x0ea6…0eb4 at0005 = ╱dc╱=╱ // 0xeab @0x5
0x0ea6…0eb4 at0006 = ╱e9╱-╱ // 0xeac @0x6
0x0ea6…0eb4 at0007 = ╱37╱7╱ // 0xead @0x7
0x0ea6…0eb4 at0008 = ╱fe0000e003╱ // 0xeae @0x8
0x0ea6…0eb4 at000d = EOL // 0xeb3 @0xd
0x0ea6…0eb4 }
0x0eb4…0ec2 9c19 1170 WHEN "N","n"
0x0eb4…0ec2 LineComalBin {
0x0eb4…0ec2 ptr = 0x9c19 // 0xeb4 @0x0
0x0eb4…0ec2 lno = 0x0492 // 0xeb6 @0x2
0x0eb4…0ec2 at0004 = ╱a300╱ WHEN ╱ // 0xeb8 @0x4
0x0eb4…0ec2 at0006 = ╱22╱"╱ // 0xeba @0x6
0x0eb4…0ec2 at0007 = ╱4e╱N╱ // 0xebb @0x7
0x0eb4…0ec2 at0008 = ╱22╱"╱ // 0xebc @0x8
0x0eb4…0ec2 at0009 = ╱ec╱,╱ // 0xebd @0x9
0x0eb4…0ec2 at000a = ╱22╱"╱ // 0xebe @0xa
0x0eb4…0ec2 at000b = ╱6e╱n╱ // 0xebf @0xb
0x0eb4…0ec2 at000c = ╱22╱"╱ // 0xec0 @0xc
0x0eb4…0ec2 at000d = EOL // 0xec1 @0xd
0x0eb4…0ec2 }
0x0ec2…0ed0 9c27 1180 P=-8
0x0ec2…0ed0 LineComalBin {
0x0ec2…0ed0 ptr = 0x9c27 // 0xec2 @0x0
0x0ec2…0ed0 lno = 0x049c // 0xec4 @0x2
0x0ec2…0ed0 at0004 = ╱50╱P╱ // 0xec6 @0x4
0x0ec2…0ed0 at0005 = ╱dc╱=╱ // 0xec7 @0x5
0x0ec2…0ed0 at0006 = ╱e9╱-╱ // 0xec8 @0x6
0x0ec2…0ed0 at0007 = ╱38╱8╱ // 0xec9 @0x7
0x0ec2…0ed0 at0008 = ╱fe00008004╱ // 0xeca @0x8
0x0ec2…0ed0 at000d = EOL // 0xecf @0xd
0x0ec2…0ed0 }
0x0ed0…0ed6 9c2d 1190 ENDCASE
0x0ed0…0ed6 LineComalBin {
0x0ed0…0ed6 ptr = 0x9c2d // 0xed0 @0x0
0x0ed0…0ed6 lno = 0x04a6 // 0xed2 @0x2
0x0ed0…0ed6 at0004 = ╱a4╱ ENDCASE ╱ // 0xed4 @0x4
0x0ed0…0ed6 at0005 = EOL // 0xed5 @0x5
0x0ed0…0ed6 }
0x0ed6…0edc 9c33 1200 ENDCASE
0x0ed6…0edc LineComalBin {
0x0ed6…0edc ptr = 0x9c33 // 0xed6 @0x0
0x0ed6…0edc lno = 0x04b0 // 0xed8 @0x2
0x0ed6…0edc at0004 = ╱a4╱ ENDCASE ╱ // 0xeda @0x4
0x0ed6…0edc at0005 = EOL // 0xedb @0x5
0x0ed6…0edc }
0x0edc…0ee2 9c39 1210 ENDPROC
0x0edc…0ee2 LineComalBin {
0x0edc…0ee2 ptr = 0x9c39 // 0xedc @0x0
0x0edc…0ee2 lno = 0x04ba // 0xede @0x2
0x0edc…0ee2 at0004 = ╱9f╱ ENDPROC ╱ // 0xee0 @0x4
0x0edc…0ee2 at0005 = EOL // 0xee1 @0x5
0x0edc…0ee2 }
0x0ee2…0f01 9c58 1220 PROC TUD(BLB1,UBLB1,TEGN,STØR)
0x0ee2…0f01 LineComalBin {
0x0ee2…0f01 ptr = 0x9c58 // 0xee2 @0x0
0x0ee2…0f01 lno = 0x04c4 // 0xee4 @0x2
0x0ee2…0f01 at0004 = ╱9e╱ PROC ╱ // 0xee6 @0x4
0x0ee2…0f01 at0005 = ╱54╱T╱ // 0xee7 @0x5
0x0ee2…0f01 at0006 = ╱55╱U╱ // 0xee8 @0x6
0x0ee2…0f01 at0007 = ╱44╱D╱ // 0xee9 @0x7
0x0ee2…0f01 at0008 = ╱ed╱(╱ // 0xeea @0x8
0x0ee2…0f01 at0009 = ╱42╱B╱ // 0xeeb @0x9
0x0ee2…0f01 at000a = ╱4c╱L╱ // 0xeec @0xa
0x0ee2…0f01 at000b = ╱42╱B╱ // 0xeed @0xb
0x0ee2…0f01 at000c = ╱31╱1╱ // 0xeee @0xc
0x0ee2…0f01 at000d = ╱ec╱,╱ // 0xeef @0xd
0x0ee2…0f01 at000e = ╱55╱U╱ // 0xef0 @0xe
0x0ee2…0f01 at000f = ╱42╱B╱ // 0xef1 @0xf
0x0ee2…0f01 at0010 = ╱4c╱L╱ // 0xef2 @0x10
0x0ee2…0f01 at0011 = ╱42╱B╱ // 0xef3 @0x11
0x0ee2…0f01 at0012 = ╱31╱1╱ // 0xef4 @0x12
0x0ee2…0f01 at0013 = ╱ec╱,╱ // 0xef5 @0x13
0x0ee2…0f01 at0014 = ╱54╱T╱ // 0xef6 @0x14
0x0ee2…0f01 at0015 = ╱45╱E╱ // 0xef7 @0x15
0x0ee2…0f01 at0016 = ╱47╱G╱ // 0xef8 @0x16
0x0ee2…0f01 at0017 = ╱4e╱N╱ // 0xef9 @0x17
0x0ee2…0f01 at0018 = ╱ec╱,╱ // 0xefa @0x18
0x0ee2…0f01 at0019 = ╱53╱S╱ // 0xefb @0x19
0x0ee2…0f01 at001a = ╱54╱T╱ // 0xefc @0x1a
0x0ee2…0f01 at001b = ╱5c╱Ø╱ // 0xefd @0x1b
0x0ee2…0f01 at001c = ╱52╱R╱ // 0xefe @0x1c
0x0ee2…0f01 at001d = ╱ee╱)╱ // 0xeff @0x1d
0x0ee2…0f01 at001e = EOL // 0xf00 @0x1e
0x0ee2…0f01 }
0x0f01…0f11 9c68 1230 BLB2$=BLB1$
0x0f01…0f11 LineComalBin {
0x0f01…0f11 ptr = 0x9c68 // 0xf01 @0x0
0x0f01…0f11 lno = 0x04ce // 0xf03 @0x2
0x0f01…0f11 at0004 = ╱42╱B╱ // 0xf05 @0x4
0x0f01…0f11 at0005 = ╱4c╱L╱ // 0xf06 @0x5
0x0f01…0f11 at0006 = ╱42╱B╱ // 0xf07 @0x6
0x0f01…0f11 at0007 = ╱32╱2╱ // 0xf08 @0x7
0x0f01…0f11 at0008 = ╱ef╱$╱ // 0xf09 @0x8
0x0f01…0f11 at0009 = ╱dc╱=╱ // 0xf0a @0x9
0x0f01…0f11 at000a = ╱42╱B╱ // 0xf0b @0xa
0x0f01…0f11 at000b = ╱4c╱L╱ // 0xf0c @0xb
0x0f01…0f11 at000c = ╱42╱B╱ // 0xf0d @0xc
0x0f01…0f11 at000d = ╱31╱1╱ // 0xf0e @0xd
0x0f01…0f11 at000e = ╱ef╱$╱ // 0xf0f @0xe
0x0f01…0f11 at000f = EOL // 0xf10 @0xf
0x0f01…0f11 }
0x0f11…0f33 9c8a 1240 EXEC CA(5,BLB2$,TAH$,UBLB1$)
0x0f11…0f33 LineComalBin {
0x0f11…0f33 ptr = 0x9c8a // 0xf11 @0x0
0x0f11…0f33 lno = 0x04d8 // 0xf13 @0x2
0x0f11…0f33 at0004 = ╱9d╱ EXEC ╱ // 0xf15 @0x4
0x0f11…0f33 at0005 = ╱43╱C╱ // 0xf16 @0x5
0x0f11…0f33 at0006 = ╱41╱A╱ // 0xf17 @0x6
0x0f11…0f33 at0007 = ╱ed╱(╱ // 0xf18 @0x7
0x0f11…0f33 at0008 = ╱35╱5╱ // 0xf19 @0x8
0x0f11…0f33 at0009 = ╱fe0000a003╱ // 0xf1a @0x9
0x0f11…0f33 at000e = ╱ec╱,╱ // 0xf1f @0xe
0x0f11…0f33 at000f = ╱42╱B╱ // 0xf20 @0xf
0x0f11…0f33 at0010 = ╱4c╱L╱ // 0xf21 @0x10
0x0f11…0f33 at0011 = ╱42╱B╱ // 0xf22 @0x11
0x0f11…0f33 at0012 = ╱32╱2╱ // 0xf23 @0x12
0x0f11…0f33 at0013 = ╱ef╱$╱ // 0xf24 @0x13
0x0f11…0f33 at0014 = ╱ec╱,╱ // 0xf25 @0x14
0x0f11…0f33 at0015 = ╱54╱T╱ // 0xf26 @0x15
0x0f11…0f33 at0016 = ╱41╱A╱ // 0xf27 @0x16
0x0f11…0f33 at0017 = ╱48╱H╱ // 0xf28 @0x17
0x0f11…0f33 at0018 = ╱ef╱$╱ // 0xf29 @0x18
0x0f11…0f33 at0019 = ╱ec╱,╱ // 0xf2a @0x19
0x0f11…0f33 at001a = ╱55╱U╱ // 0xf2b @0x1a
0x0f11…0f33 at001b = ╱42╱B╱ // 0xf2c @0x1b
0x0f11…0f33 at001c = ╱4c╱L╱ // 0xf2d @0x1c
0x0f11…0f33 at001d = ╱42╱B╱ // 0xf2e @0x1d
0x0f11…0f33 at001e = ╱31╱1╱ // 0xf2f @0x1e
0x0f11…0f33 at001f = ╱ef╱$╱ // 0xf30 @0x1f
0x0f11…0f33 at0020 = ╱ee╱)╱ // 0xf31 @0x20
0x0f11…0f33 at0021 = EOL // 0xf32 @0x21
0x0f11…0f33 }
0x0f33…0f62 9cb9 1250 IF TEGN=0 THEN UBLB1$=UBLB1$(1:13)
0x0f33…0f62 LineComalBin {
0x0f33…0f62 ptr = 0x9cb9 // 0xf33 @0x0
0x0f33…0f62 lno = 0x04e2 // 0xf35 @0x2
0x0f33…0f62 at0004 = ╱82╱ IF ╱ // 0xf37 @0x4
0x0f33…0f62 at0005 = ╱54╱T╱ // 0xf38 @0x5
0x0f33…0f62 at0006 = ╱45╱E╱ // 0xf39 @0x6
0x0f33…0f62 at0007 = ╱47╱G╱ // 0xf3a @0x7
0x0f33…0f62 at0008 = ╱4e╱N╱ // 0xf3b @0x8
0x0f33…0f62 at0009 = ╱dc╱=╱ // 0xf3c @0x9
0x0f33…0f62 at000a = ╱30╱0╱ // 0xf3d @0xa
0x0f33…0f62 at000b = ╱fe00000000╱ // 0xf3e @0xb
0x0f33…0f62 at0010 = ╱b6╱ THEN ╱ // 0xf43 @0x10
0x0f33…0f62 at0011 = ╱55╱U╱ // 0xf44 @0x11
0x0f33…0f62 at0012 = ╱42╱B╱ // 0xf45 @0x12
0x0f33…0f62 at0013 = ╱4c╱L╱ // 0xf46 @0x13
0x0f33…0f62 at0014 = ╱42╱B╱ // 0xf47 @0x14
0x0f33…0f62 at0015 = ╱31╱1╱ // 0xf48 @0x15
0x0f33…0f62 at0016 = ╱ef╱$╱ // 0xf49 @0x16
0x0f33…0f62 at0017 = ╱dc╱=╱ // 0xf4a @0x17
0x0f33…0f62 at0018 = ╱55╱U╱ // 0xf4b @0x18
0x0f33…0f62 at0019 = ╱42╱B╱ // 0xf4c @0x19
0x0f33…0f62 at001a = ╱4c╱L╱ // 0xf4d @0x1a
0x0f33…0f62 at001b = ╱42╱B╱ // 0xf4e @0x1b
0x0f33…0f62 at001c = ╱31╱1╱ // 0xf4f @0x1c
0x0f33…0f62 at001d = ╱ef╱$╱ // 0xf50 @0x1d
0x0f33…0f62 at001e = ╱ed╱(╱ // 0xf51 @0x1e
0x0f33…0f62 at001f = ╱31╱1╱ // 0xf52 @0x1f
0x0f33…0f62 at0020 = ╱fe00008001╱ // 0xf53 @0x20
0x0f33…0f62 at0025 = ╱f0╱:╱ // 0xf58 @0x25
0x0f33…0f62 at0026 = ╱31╱1╱ // 0xf59 @0x26
0x0f33…0f62 at0027 = ╱33╱3╱ // 0xf5a @0x27
0x0f33…0f62 at0028 = ╱fe0000d004╱ // 0xf5b @0x28
0x0f33…0f62 at002d = ╱ee╱)╱ // 0xf60 @0x2d
0x0f33…0f62 at002e = EOL // 0xf61 @0x2e
0x0f33…0f62 }
0x0f62…0f9f 9cf6 1260 IF TEGN=1 AND UBLB1$(LEN(UBLB1$))="+" THEN UBLB1$(LEN(UBLB1$))=" "
0x0f62…0f9f LineComalBin {
0x0f62…0f9f ptr = 0x9cf6 // 0xf62 @0x0
0x0f62…0f9f lno = 0x04ec // 0xf64 @0x2
0x0f62…0f9f at0004 = ╱82╱ IF ╱ // 0xf66 @0x4
0x0f62…0f9f at0005 = ╱54╱T╱ // 0xf67 @0x5
0x0f62…0f9f at0006 = ╱45╱E╱ // 0xf68 @0x6
0x0f62…0f9f at0007 = ╱47╱G╱ // 0xf69 @0x7
0x0f62…0f9f at0008 = ╱4e╱N╱ // 0xf6a @0x8
0x0f62…0f9f at0009 = ╱dc╱=╱ // 0xf6b @0x9
0x0f62…0f9f at000a = ╱31╱1╱ // 0xf6c @0xa
0x0f62…0f9f at000b = ╱fe00008001╱ // 0xf6d @0xb
0x0f62…0f9f at0010 = ╱da╱ AND ╱ // 0xf72 @0x10
0x0f62…0f9f at0011 = ╱55╱U╱ // 0xf73 @0x11
0x0f62…0f9f at0012 = ╱42╱B╱ // 0xf74 @0x12
0x0f62…0f9f at0013 = ╱4c╱L╱ // 0xf75 @0x13
0x0f62…0f9f at0014 = ╱42╱B╱ // 0xf76 @0x14
0x0f62…0f9f at0015 = ╱31╱1╱ // 0xf77 @0x15
0x0f62…0f9f at0016 = ╱ef╱$╱ // 0xf78 @0x16
0x0f62…0f9f at0017 = ╱ed╱(╱ // 0xf79 @0x17
0x0f62…0f9f at0018 = ╱cc╱LEN╱ // 0xf7a @0x18
0x0f62…0f9f at0019 = ╱ed╱(╱ // 0xf7b @0x19
0x0f62…0f9f at001a = ╱55╱U╱ // 0xf7c @0x1a
0x0f62…0f9f at001b = ╱42╱B╱ // 0xf7d @0x1b
0x0f62…0f9f at001c = ╱4c╱L╱ // 0xf7e @0x1c
0x0f62…0f9f at001d = ╱42╱B╱ // 0xf7f @0x1d
0x0f62…0f9f at001e = ╱31╱1╱ // 0xf80 @0x1e
0x0f62…0f9f at001f = ╱ef╱$╱ // 0xf81 @0x1f
0x0f62…0f9f at0020 = ╱ee╱)╱ // 0xf82 @0x20
0x0f62…0f9f at0021 = ╱ee╱)╱ // 0xf83 @0x21
0x0f62…0f9f at0022 = ╱dc╱=╱ // 0xf84 @0x22
0x0f62…0f9f at0023 = ╱22╱"╱ // 0xf85 @0x23
0x0f62…0f9f at0024 = ╱2b╱+╱ // 0xf86 @0x24
0x0f62…0f9f at0025 = ╱22╱"╱ // 0xf87 @0x25
0x0f62…0f9f at0026 = ╱b6╱ THEN ╱ // 0xf88 @0x26
0x0f62…0f9f at0027 = ╱55╱U╱ // 0xf89 @0x27
0x0f62…0f9f at0028 = ╱42╱B╱ // 0xf8a @0x28
0x0f62…0f9f at0029 = ╱4c╱L╱ // 0xf8b @0x29
0x0f62…0f9f at002a = ╱42╱B╱ // 0xf8c @0x2a
0x0f62…0f9f at002b = ╱31╱1╱ // 0xf8d @0x2b
0x0f62…0f9f at002c = ╱ef╱$╱ // 0xf8e @0x2c
0x0f62…0f9f at002d = ╱ed╱(╱ // 0xf8f @0x2d
0x0f62…0f9f at002e = ╱cc╱LEN╱ // 0xf90 @0x2e
0x0f62…0f9f at002f = ╱ed╱(╱ // 0xf91 @0x2f
0x0f62…0f9f at0030 = ╱55╱U╱ // 0xf92 @0x30
0x0f62…0f9f at0031 = ╱42╱B╱ // 0xf93 @0x31
0x0f62…0f9f at0032 = ╱4c╱L╱ // 0xf94 @0x32
0x0f62…0f9f at0033 = ╱42╱B╱ // 0xf95 @0x33
0x0f62…0f9f at0034 = ╱31╱1╱ // 0xf96 @0x34
0x0f62…0f9f at0035 = ╱ef╱$╱ // 0xf97 @0x35
0x0f62…0f9f at0036 = ╱ee╱)╱ // 0xf98 @0x36
0x0f62…0f9f at0037 = ╱ee╱)╱ // 0xf99 @0x37
0x0f62…0f9f at0038 = ╱dc╱=╱ // 0xf9a @0x38
0x0f62…0f9f at0039 = ╱22╱"╱ // 0xf9b @0x39
0x0f62…0f9f at003a = ╱20╱…╱ // 0xf9c @0x3a
0x0f62…0f9f at003b = ╱22╱"╱ // 0xf9d @0x3b
0x0f62…0f9f at003c = EOL // 0xf9e @0x3c
0x0f62…0f9f }
0x0f9f…0fd7 9d2e 1270 IF STØR=1 THEN UBLB1$=UBLB1$(4:LEN(UBLB1$)-3)
0x0f9f…0fd7 LineComalBin {
0x0f9f…0fd7 ptr = 0x9d2e // 0xf9f @0x0
0x0f9f…0fd7 lno = 0x04f6 // 0xfa1 @0x2
0x0f9f…0fd7 at0004 = ╱82╱ IF ╱ // 0xfa3 @0x4
0x0f9f…0fd7 at0005 = ╱53╱S╱ // 0xfa4 @0x5
0x0f9f…0fd7 at0006 = ╱54╱T╱ // 0xfa5 @0x6
0x0f9f…0fd7 at0007 = ╱5c╱Ø╱ // 0xfa6 @0x7
0x0f9f…0fd7 at0008 = ╱52╱R╱ // 0xfa7 @0x8
0x0f9f…0fd7 at0009 = ╱dc╱=╱ // 0xfa8 @0x9
0x0f9f…0fd7 at000a = ╱31╱1╱ // 0xfa9 @0xa
0x0f9f…0fd7 at000b = ╱fe00008001╱ // 0xfaa @0xb
0x0f9f…0fd7 at0010 = ╱b6╱ THEN ╱ // 0xfaf @0x10
0x0f9f…0fd7 at0011 = ╱55╱U╱ // 0xfb0 @0x11
0x0f9f…0fd7 at0012 = ╱42╱B╱ // 0xfb1 @0x12
0x0f9f…0fd7 at0013 = ╱4c╱L╱ // 0xfb2 @0x13
0x0f9f…0fd7 at0014 = ╱42╱B╱ // 0xfb3 @0x14
0x0f9f…0fd7 at0015 = ╱31╱1╱ // 0xfb4 @0x15
0x0f9f…0fd7 at0016 = ╱ef╱$╱ // 0xfb5 @0x16
0x0f9f…0fd7 at0017 = ╱dc╱=╱ // 0xfb6 @0x17
0x0f9f…0fd7 at0018 = ╱55╱U╱ // 0xfb7 @0x18
0x0f9f…0fd7 at0019 = ╱42╱B╱ // 0xfb8 @0x19
0x0f9f…0fd7 at001a = ╱4c╱L╱ // 0xfb9 @0x1a
0x0f9f…0fd7 at001b = ╱42╱B╱ // 0xfba @0x1b
0x0f9f…0fd7 at001c = ╱31╱1╱ // 0xfbb @0x1c
0x0f9f…0fd7 at001d = ╱ef╱$╱ // 0xfbc @0x1d
0x0f9f…0fd7 at001e = ╱ed╱(╱ // 0xfbd @0x1e
0x0f9f…0fd7 at001f = ╱34╱4╱ // 0xfbe @0x1f
0x0f9f…0fd7 at0020 = ╱fe00008003╱ // 0xfbf @0x20
0x0f9f…0fd7 at0025 = ╱f0╱:╱ // 0xfc4 @0x25
0x0f9f…0fd7 at0026 = ╱cc╱LEN╱ // 0xfc5 @0x26
0x0f9f…0fd7 at0027 = ╱ed╱(╱ // 0xfc6 @0x27
0x0f9f…0fd7 at0028 = ╱55╱U╱ // 0xfc7 @0x28
0x0f9f…0fd7 at0029 = ╱42╱B╱ // 0xfc8 @0x29
0x0f9f…0fd7 at002a = ╱4c╱L╱ // 0xfc9 @0x2a
0x0f9f…0fd7 at002b = ╱42╱B╱ // 0xfca @0x2b
0x0f9f…0fd7 at002c = ╱31╱1╱ // 0xfcb @0x2c
0x0f9f…0fd7 at002d = ╱ef╱$╱ // 0xfcc @0x2d
0x0f9f…0fd7 at002e = ╱ee╱)╱ // 0xfcd @0x2e
0x0f9f…0fd7 at002f = ╱e3╱-╱ // 0xfce @0x2f
0x0f9f…0fd7 at0030 = ╱33╱3╱ // 0xfcf @0x30
0x0f9f…0fd7 at0031 = ╱fe0000c002╱ // 0xfd0 @0x31
0x0f9f…0fd7 at0036 = ╱ee╱)╱ // 0xfd5 @0x36
0x0f9f…0fd7 at0037 = EOL // 0xfd6 @0x37
0x0f9f…0fd7 }
0x0fd7…0fe3 9d3a 1280 PRINT UBLB1$
0x0fd7…0fe3 LineComalBin {
0x0fd7…0fe3 ptr = 0x9d3a // 0xfd7 @0x0
0x0fd7…0fe3 lno = 0x0500 // 0xfd9 @0x2
0x0fd7…0fe3 at0004 = ╱92╱ PRINT ╱ // 0xfdb @0x4
0x0fd7…0fe3 at0005 = ╱55╱U╱ // 0xfdc @0x5
0x0fd7…0fe3 at0006 = ╱42╱B╱ // 0xfdd @0x6
0x0fd7…0fe3 at0007 = ╱4c╱L╱ // 0xfde @0x7
0x0fd7…0fe3 at0008 = ╱42╱B╱ // 0xfdf @0x8
0x0fd7…0fe3 at0009 = ╱31╱1╱ // 0xfe0 @0x9
0x0fd7…0fe3 at000a = ╱ef╱$╱ // 0xfe1 @0xa
0x0fd7…0fe3 at000b = EOL // 0xfe2 @0xb
0x0fd7…0fe3 }
0x0fe3…0fe9 9d40 1290 ENDPROC
0x0fe3…0fe9 LineComalBin {
0x0fe3…0fe9 ptr = 0x9d40 // 0xfe3 @0x0
0x0fe3…0fe9 lno = 0x050a // 0xfe5 @0x2
0x0fe3…0fe9 at0004 = ╱9f╱ ENDPROC ╱ // 0xfe7 @0x4
0x0fe3…0fe9 at0005 = EOL // 0xfe8 @0x5
0x0fe3…0fe9 }
0x0fe9…0ff8 9d4f 1300 PROC HENTDPOST
0x0fe9…0ff8 LineComalBin {
0x0fe9…0ff8 ptr = 0x9d4f // 0xfe9 @0x0
0x0fe9…0ff8 lno = 0x0514 // 0xfeb @0x2
0x0fe9…0ff8 at0004 = ╱9e╱ PROC ╱ // 0xfed @0x4
0x0fe9…0ff8 at0005 = ╱48╱H╱ // 0xfee @0x5
0x0fe9…0ff8 at0006 = ╱45╱E╱ // 0xfef @0x6
0x0fe9…0ff8 at0007 = ╱4e╱N╱ // 0xff0 @0x7
0x0fe9…0ff8 at0008 = ╱54╱T╱ // 0xff1 @0x8
0x0fe9…0ff8 at0009 = ╱44╱D╱ // 0xff2 @0x9
0x0fe9…0ff8 at000a = ╱50╱P╱ // 0xff3 @0xa
0x0fe9…0ff8 at000b = ╱4f╱O╱ // 0xff4 @0xb
0x0fe9…0ff8 at000c = ╱53╱S╱ // 0xff5 @0xc
0x0fe9…0ff8 at000d = ╱54╱T╱ // 0xff6 @0xd
0x0fe9…0ff8 at000e = EOL // 0xff7 @0xe
0x0fe9…0ff8 }
0x0ff8…1011 9d68 1310 S=DTAB(DPIL3,2)
0x0ff8…1011 LineComalBin {
0x0ff8…1011 ptr = 0x9d68 // 0xff8 @0x0
0x0ff8…1011 lno = 0x051e // 0xffa @0x2
0x0ff8…1011 at0004 = ╱53╱S╱ // 0xffc @0x4
0x0ff8…1011 at0005 = ╱dc╱=╱ // 0xffd @0x5
0x0ff8…1011 at0006 = ╱44╱D╱ // 0xffe @0x6
0x0ff8…1011 at0007 = ╱54╱T╱ // 0xfff @0x7
0x0ff8…1011 at0008 = ╱41╱A╱ // 0x1000 @0x8
0x0ff8…1011 at0009 = ╱42╱B╱ // 0x1001 @0x9
0x0ff8…1011 at000a = ╱ed╱(╱ // 0x1002 @0xa
0x0ff8…1011 at000b = ╱44╱D╱ // 0x1003 @0xb
0x0ff8…1011 at000c = ╱50╱P╱ // 0x1004 @0xc
0x0ff8…1011 at000d = ╱49╱I╱ // 0x1005 @0xd
0x0ff8…1011 at000e = ╱4c╱L╱ // 0x1006 @0xe
0x0ff8…1011 at000f = ╱33╱3╱ // 0x1007 @0xf
0x0ff8…1011 at0010 = ╱ec╱,╱ // 0x1008 @0x10
0x0ff8…1011 at0011 = ╱32╱2╱ // 0x1009 @0x11
0x0ff8…1011 at0012 = ╱fe00008002╱ // 0x100a @0x12
0x0ff8…1011 at0017 = ╱ee╱)╱ // 0x100f @0x17
0x0ff8…1011 at0018 = EOL // 0x1010 @0x18
0x0ff8…1011 }
0x1011…103c 9d93 1320 GET K4$,S:DEBNR,DEBNAVN$,DSALDO1$,DEBKGR$
0x1011…103c LineComalBin {
0x1011…103c ptr = 0x9d93 // 0x1011 @0x0
0x1011…103c lno = 0x0528 // 0x1013 @0x2
0x1011…103c at0004 = ╱a9╱ GET ╱ // 0x1015 @0x4
0x1011…103c at0005 = ╱4b╱K╱ // 0x1016 @0x5
0x1011…103c at0006 = ╱34╱4╱ // 0x1017 @0x6
0x1011…103c at0007 = ╱ef╱$╱ // 0x1018 @0x7
0x1011…103c at0008 = ╱ec╱,╱ // 0x1019 @0x8
0x1011…103c at0009 = ╱53╱S╱ // 0x101a @0x9
0x1011…103c at000a = ╱f0╱:╱ // 0x101b @0xa
0x1011…103c at000b = ╱44╱D╱ // 0x101c @0xb
0x1011…103c at000c = ╱45╱E╱ // 0x101d @0xc
0x1011…103c at000d = ╱42╱B╱ // 0x101e @0xd
0x1011…103c at000e = ╱4e╱N╱ // 0x101f @0xe
0x1011…103c at000f = ╱52╱R╱ // 0x1020 @0xf
0x1011…103c at0010 = ╱ec╱,╱ // 0x1021 @0x10
0x1011…103c at0011 = ╱44╱D╱ // 0x1022 @0x11
0x1011…103c at0012 = ╱45╱E╱ // 0x1023 @0x12
0x1011…103c at0013 = ╱42╱B╱ // 0x1024 @0x13
0x1011…103c at0014 = ╱4e╱N╱ // 0x1025 @0x14
0x1011…103c at0015 = ╱41╱A╱ // 0x1026 @0x15
0x1011…103c at0016 = ╱56╱V╱ // 0x1027 @0x16
0x1011…103c at0017 = ╱4e╱N╱ // 0x1028 @0x17
0x1011…103c at0018 = ╱ef╱$╱ // 0x1029 @0x18
0x1011…103c at0019 = ╱ec╱,╱ // 0x102a @0x19
0x1011…103c at001a = ╱44╱D╱ // 0x102b @0x1a
0x1011…103c at001b = ╱53╱S╱ // 0x102c @0x1b
0x1011…103c at001c = ╱41╱A╱ // 0x102d @0x1c
0x1011…103c at001d = ╱4c╱L╱ // 0x102e @0x1d
0x1011…103c at001e = ╱44╱D╱ // 0x102f @0x1e
0x1011…103c at001f = ╱4f╱O╱ // 0x1030 @0x1f
0x1011…103c at0020 = ╱31╱1╱ // 0x1031 @0x20
0x1011…103c at0021 = ╱ef╱$╱ // 0x1032 @0x21
0x1011…103c at0022 = ╱ec╱,╱ // 0x1033 @0x22
0x1011…103c at0023 = ╱44╱D╱ // 0x1034 @0x23
0x1011…103c at0024 = ╱45╱E╱ // 0x1035 @0x24
0x1011…103c at0025 = ╱42╱B╱ // 0x1036 @0x25
0x1011…103c at0026 = ╱4b╱K╱ // 0x1037 @0x26
0x1011…103c at0027 = ╱47╱G╱ // 0x1038 @0x27
0x1011…103c at0028 = ╱52╱R╱ // 0x1039 @0x28
0x1011…103c at0029 = ╱ef╱$╱ // 0x103a @0x29
0x1011…103c at002a = EOL // 0x103b @0x2a
0x1011…103c }
0x103c…1057 9dae 1330 EXEC FE(8,1,K4$)
0x103c…1057 LineComalBin {
0x103c…1057 ptr = 0x9dae // 0x103c @0x0
0x103c…1057 lno = 0x0532 // 0x103e @0x2
0x103c…1057 at0004 = ╱9d╱ EXEC ╱ // 0x1040 @0x4
0x103c…1057 at0005 = ╱46╱F╱ // 0x1041 @0x5
0x103c…1057 at0006 = ╱45╱E╱ // 0x1042 @0x6
0x103c…1057 at0007 = ╱ed╱(╱ // 0x1043 @0x7
0x103c…1057 at0008 = ╱38╱8╱ // 0x1044 @0x8
0x103c…1057 at0009 = ╱fe00008004╱ // 0x1045 @0x9
0x103c…1057 at000e = ╱ec╱,╱ // 0x104a @0xe
0x103c…1057 at000f = ╱31╱1╱ // 0x104b @0xf
0x103c…1057 at0010 = ╱fe00008001╱ // 0x104c @0x10
0x103c…1057 at0015 = ╱ec╱,╱ // 0x1051 @0x15
0x103c…1057 at0016 = ╱4b╱K╱ // 0x1052 @0x16
0x103c…1057 at0017 = ╱34╱4╱ // 0x1053 @0x17
0x103c…1057 at0018 = ╱ef╱$╱ // 0x1054 @0x18
0x103c…1057 at0019 = ╱ee╱)╱ // 0x1055 @0x19
0x103c…1057 at001a = EOL // 0x1056 @0x1a
0x103c…1057 }
0x1057…1095 9dec 1340 GET K4$,S+1:DSALDO2$,DSALDO3$,DSALDO4$,DEBPOSTNR,DEBLK$
0x1057…1095 LineComalBin {
0x1057…1095 ptr = 0x9dec // 0x1057 @0x0
0x1057…1095 lno = 0x053c // 0x1059 @0x2
0x1057…1095 at0004 = ╱a9╱ GET ╱ // 0x105b @0x4
0x1057…1095 at0005 = ╱4b╱K╱ // 0x105c @0x5
0x1057…1095 at0006 = ╱34╱4╱ // 0x105d @0x6
0x1057…1095 at0007 = ╱ef╱$╱ // 0x105e @0x7
0x1057…1095 at0008 = ╱ec╱,╱ // 0x105f @0x8
0x1057…1095 at0009 = ╱53╱S╱ // 0x1060 @0x9
0x1057…1095 at000a = ╱e2╱+╱ // 0x1061 @0xa
0x1057…1095 at000b = ╱31╱1╱ // 0x1062 @0xb
0x1057…1095 at000c = ╱fe00008001╱ // 0x1063 @0xc
0x1057…1095 at0011 = ╱f0╱:╱ // 0x1068 @0x11
0x1057…1095 at0012 = ╱44╱D╱ // 0x1069 @0x12
0x1057…1095 at0013 = ╱53╱S╱ // 0x106a @0x13
0x1057…1095 at0014 = ╱41╱A╱ // 0x106b @0x14
0x1057…1095 at0015 = ╱4c╱L╱ // 0x106c @0x15
0x1057…1095 at0016 = ╱44╱D╱ // 0x106d @0x16
0x1057…1095 at0017 = ╱4f╱O╱ // 0x106e @0x17
0x1057…1095 at0018 = ╱32╱2╱ // 0x106f @0x18
0x1057…1095 at0019 = ╱ef╱$╱ // 0x1070 @0x19
0x1057…1095 at001a = ╱ec╱,╱ // 0x1071 @0x1a
0x1057…1095 at001b = ╱44╱D╱ // 0x1072 @0x1b
0x1057…1095 at001c = ╱53╱S╱ // 0x1073 @0x1c
0x1057…1095 at001d = ╱41╱A╱ // 0x1074 @0x1d
0x1057…1095 at001e = ╱4c╱L╱ // 0x1075 @0x1e
0x1057…1095 at001f = ╱44╱D╱ // 0x1076 @0x1f
0x1057…1095 at0020 = ╱4f╱O╱ // 0x1077 @0x20
0x1057…1095 at0021 = ╱33╱3╱ // 0x1078 @0x21
0x1057…1095 at0022 = ╱ef╱$╱ // 0x1079 @0x22
0x1057…1095 at0023 = ╱ec╱,╱ // 0x107a @0x23
0x1057…1095 at0024 = ╱44╱D╱ // 0x107b @0x24
0x1057…1095 at0025 = ╱53╱S╱ // 0x107c @0x25
0x1057…1095 at0026 = ╱41╱A╱ // 0x107d @0x26
0x1057…1095 at0027 = ╱4c╱L╱ // 0x107e @0x27
0x1057…1095 at0028 = ╱44╱D╱ // 0x107f @0x28
0x1057…1095 at0029 = ╱4f╱O╱ // 0x1080 @0x29
0x1057…1095 at002a = ╱34╱4╱ // 0x1081 @0x2a
0x1057…1095 at002b = ╱ef╱$╱ // 0x1082 @0x2b
0x1057…1095 at002c = ╱ec╱,╱ // 0x1083 @0x2c
0x1057…1095 at002d = ╱44╱D╱ // 0x1084 @0x2d
0x1057…1095 at002e = ╱45╱E╱ // 0x1085 @0x2e
0x1057…1095 at002f = ╱42╱B╱ // 0x1086 @0x2f
0x1057…1095 at0030 = ╱50╱P╱ // 0x1087 @0x30
0x1057…1095 at0031 = ╱4f╱O╱ // 0x1088 @0x31
0x1057…1095 at0032 = ╱53╱S╱ // 0x1089 @0x32
0x1057…1095 at0033 = ╱54╱T╱ // 0x108a @0x33
0x1057…1095 at0034 = ╱4e╱N╱ // 0x108b @0x34
0x1057…1095 at0035 = ╱52╱R╱ // 0x108c @0x35
0x1057…1095 at0036 = ╱ec╱,╱ // 0x108d @0x36
0x1057…1095 at0037 = ╱44╱D╱ // 0x108e @0x37
0x1057…1095 at0038 = ╱45╱E╱ // 0x108f @0x38
0x1057…1095 at0039 = ╱42╱B╱ // 0x1090 @0x39
0x1057…1095 at003a = ╱4c╱L╱ // 0x1091 @0x3a
0x1057…1095 at003b = ╱4b╱K╱ // 0x1092 @0x3b
0x1057…1095 at003c = ╱ef╱$╱ // 0x1093 @0x3c
0x1057…1095 at003d = EOL // 0x1094 @0x3d
0x1057…1095 }
0x1095…10b0 9e07 1350 EXEC FE(8,2,K4$)
0x1095…10b0 LineComalBin {
0x1095…10b0 ptr = 0x9e07 // 0x1095 @0x0
0x1095…10b0 lno = 0x0546 // 0x1097 @0x2
0x1095…10b0 at0004 = ╱9d╱ EXEC ╱ // 0x1099 @0x4
0x1095…10b0 at0005 = ╱46╱F╱ // 0x109a @0x5
0x1095…10b0 at0006 = ╱45╱E╱ // 0x109b @0x6
0x1095…10b0 at0007 = ╱ed╱(╱ // 0x109c @0x7
0x1095…10b0 at0008 = ╱38╱8╱ // 0x109d @0x8
0x1095…10b0 at0009 = ╱fe00008004╱ // 0x109e @0x9
0x1095…10b0 at000e = ╱ec╱,╱ // 0x10a3 @0xe
0x1095…10b0 at000f = ╱32╱2╱ // 0x10a4 @0xf
0x1095…10b0 at0010 = ╱fe00008002╱ // 0x10a5 @0x10
0x1095…10b0 at0015 = ╱ec╱,╱ // 0x10aa @0x15
0x1095…10b0 at0016 = ╱4b╱K╱ // 0x10ab @0x16
0x1095…10b0 at0017 = ╱34╱4╱ // 0x10ac @0x17
0x1095…10b0 at0018 = ╱ef╱$╱ // 0x10ad @0x18
0x1095…10b0 at0019 = ╱ee╱)╱ // 0x10ae @0x19
0x1095…10b0 at001a = EOL // 0x10af @0x1a
0x1095…10b0 }
0x10b0…10e0 9e37 1360 GET K4$,S+2:DEBGADE$,DEBTLF$,HPOST,HKUNDE
0x10b0…10e0 LineComalBin {
0x10b0…10e0 ptr = 0x9e37 // 0x10b0 @0x0
0x10b0…10e0 lno = 0x0550 // 0x10b2 @0x2
0x10b0…10e0 at0004 = ╱a9╱ GET ╱ // 0x10b4 @0x4
0x10b0…10e0 at0005 = ╱4b╱K╱ // 0x10b5 @0x5
0x10b0…10e0 at0006 = ╱34╱4╱ // 0x10b6 @0x6
0x10b0…10e0 at0007 = ╱ef╱$╱ // 0x10b7 @0x7
0x10b0…10e0 at0008 = ╱ec╱,╱ // 0x10b8 @0x8
0x10b0…10e0 at0009 = ╱53╱S╱ // 0x10b9 @0x9
0x10b0…10e0 at000a = ╱e2╱+╱ // 0x10ba @0xa
0x10b0…10e0 at000b = ╱32╱2╱ // 0x10bb @0xb
0x10b0…10e0 at000c = ╱fe00008002╱ // 0x10bc @0xc
0x10b0…10e0 at0011 = ╱f0╱:╱ // 0x10c1 @0x11
0x10b0…10e0 at0012 = ╱44╱D╱ // 0x10c2 @0x12
0x10b0…10e0 at0013 = ╱45╱E╱ // 0x10c3 @0x13
0x10b0…10e0 at0014 = ╱42╱B╱ // 0x10c4 @0x14
0x10b0…10e0 at0015 = ╱47╱G╱ // 0x10c5 @0x15
0x10b0…10e0 at0016 = ╱41╱A╱ // 0x10c6 @0x16
0x10b0…10e0 at0017 = ╱44╱D╱ // 0x10c7 @0x17
0x10b0…10e0 at0018 = ╱45╱E╱ // 0x10c8 @0x18
0x10b0…10e0 at0019 = ╱ef╱$╱ // 0x10c9 @0x19
0x10b0…10e0 at001a = ╱ec╱,╱ // 0x10ca @0x1a
0x10b0…10e0 at001b = ╱44╱D╱ // 0x10cb @0x1b
0x10b0…10e0 at001c = ╱45╱E╱ // 0x10cc @0x1c
0x10b0…10e0 at001d = ╱42╱B╱ // 0x10cd @0x1d
0x10b0…10e0 at001e = ╱54╱T╱ // 0x10ce @0x1e
0x10b0…10e0 at001f = ╱4c╱L╱ // 0x10cf @0x1f
0x10b0…10e0 at0020 = ╱46╱F╱ // 0x10d0 @0x20
0x10b0…10e0 at0021 = ╱ef╱$╱ // 0x10d1 @0x21
0x10b0…10e0 at0022 = ╱ec╱,╱ // 0x10d2 @0x22
0x10b0…10e0 at0023 = ╱48╱H╱ // 0x10d3 @0x23
0x10b0…10e0 at0024 = ╱50╱P╱ // 0x10d4 @0x24
0x10b0…10e0 at0025 = ╱4f╱O╱ // 0x10d5 @0x25
0x10b0…10e0 at0026 = ╱53╱S╱ // 0x10d6 @0x26
0x10b0…10e0 at0027 = ╱54╱T╱ // 0x10d7 @0x27
0x10b0…10e0 at0028 = ╱ec╱,╱ // 0x10d8 @0x28
0x10b0…10e0 at0029 = ╱48╱H╱ // 0x10d9 @0x29
0x10b0…10e0 at002a = ╱4b╱K╱ // 0x10da @0x2a
0x10b0…10e0 at002b = ╱55╱U╱ // 0x10db @0x2b
0x10b0…10e0 at002c = ╱4e╱N╱ // 0x10dc @0x2c
0x10b0…10e0 at002d = ╱44╱D╱ // 0x10dd @0x2d
0x10b0…10e0 at002e = ╱45╱E╱ // 0x10de @0x2e
0x10b0…10e0 at002f = EOL // 0x10df @0x2f
0x10b0…10e0 }
0x10e0…10fb 9e52 1370 EXEC FE(8,3,K4$)
0x10e0…10fb LineComalBin {
0x10e0…10fb ptr = 0x9e52 // 0x10e0 @0x0
0x10e0…10fb lno = 0x055a // 0x10e2 @0x2
0x10e0…10fb at0004 = ╱9d╱ EXEC ╱ // 0x10e4 @0x4
0x10e0…10fb at0005 = ╱46╱F╱ // 0x10e5 @0x5
0x10e0…10fb at0006 = ╱45╱E╱ // 0x10e6 @0x6
0x10e0…10fb at0007 = ╱ed╱(╱ // 0x10e7 @0x7
0x10e0…10fb at0008 = ╱38╱8╱ // 0x10e8 @0x8
0x10e0…10fb at0009 = ╱fe00008004╱ // 0x10e9 @0x9
0x10e0…10fb at000e = ╱ec╱,╱ // 0x10ee @0xe
0x10e0…10fb at000f = ╱33╱3╱ // 0x10ef @0xf
0x10e0…10fb at0010 = ╱fe0000c002╱ // 0x10f0 @0x10
0x10e0…10fb at0015 = ╱ec╱,╱ // 0x10f5 @0x15
0x10e0…10fb at0016 = ╱4b╱K╱ // 0x10f6 @0x16
0x10e0…10fb at0017 = ╱34╱4╱ // 0x10f7 @0x17
0x10e0…10fb at0018 = ╱ef╱$╱ // 0x10f8 @0x18
0x10e0…10fb at0019 = ╱ee╱)╱ // 0x10f9 @0x19
0x10e0…10fb at001a = EOL // 0x10fa @0x1a
0x10e0…10fb }
0x10fb…1123 9e7a 1380 GET K4$,S+3:DEBBY$,ÅRKØB$,MDNKØB$
0x10fb…1123 LineComalBin {
0x10fb…1123 ptr = 0x9e7a // 0x10fb @0x0
0x10fb…1123 lno = 0x0564 // 0x10fd @0x2
0x10fb…1123 at0004 = ╱a9╱ GET ╱ // 0x10ff @0x4
0x10fb…1123 at0005 = ╱4b╱K╱ // 0x1100 @0x5
0x10fb…1123 at0006 = ╱34╱4╱ // 0x1101 @0x6
0x10fb…1123 at0007 = ╱ef╱$╱ // 0x1102 @0x7
0x10fb…1123 at0008 = ╱ec╱,╱ // 0x1103 @0x8
0x10fb…1123 at0009 = ╱53╱S╱ // 0x1104 @0x9
0x10fb…1123 at000a = ╱e2╱+╱ // 0x1105 @0xa
0x10fb…1123 at000b = ╱33╱3╱ // 0x1106 @0xb
0x10fb…1123 at000c = ╱fe0000c002╱ // 0x1107 @0xc
0x10fb…1123 at0011 = ╱f0╱:╱ // 0x110c @0x11
0x10fb…1123 at0012 = ╱44╱D╱ // 0x110d @0x12
0x10fb…1123 at0013 = ╱45╱E╱ // 0x110e @0x13
0x10fb…1123 at0014 = ╱42╱B╱ // 0x110f @0x14
0x10fb…1123 at0015 = ╱42╱B╱ // 0x1110 @0x15
0x10fb…1123 at0016 = ╱59╱Y╱ // 0x1111 @0x16
0x10fb…1123 at0017 = ╱ef╱$╱ // 0x1112 @0x17
0x10fb…1123 at0018 = ╱ec╱,╱ // 0x1113 @0x18
0x10fb…1123 at0019 = ╱5d╱Å╱ // 0x1114 @0x19
0x10fb…1123 at001a = ╱52╱R╱ // 0x1115 @0x1a
0x10fb…1123 at001b = ╱4b╱K╱ // 0x1116 @0x1b
0x10fb…1123 at001c = ╱5c╱Ø╱ // 0x1117 @0x1c
0x10fb…1123 at001d = ╱42╱B╱ // 0x1118 @0x1d
0x10fb…1123 at001e = ╱ef╱$╱ // 0x1119 @0x1e
0x10fb…1123 at001f = ╱ec╱,╱ // 0x111a @0x1f
0x10fb…1123 at0020 = ╱4d╱M╱ // 0x111b @0x20
0x10fb…1123 at0021 = ╱44╱D╱ // 0x111c @0x21
0x10fb…1123 at0022 = ╱4e╱N╱ // 0x111d @0x22
0x10fb…1123 at0023 = ╱4b╱K╱ // 0x111e @0x23
0x10fb…1123 at0024 = ╱5c╱Ø╱ // 0x111f @0x24
0x10fb…1123 at0025 = ╱42╱B╱ // 0x1120 @0x25
0x10fb…1123 at0026 = ╱ef╱$╱ // 0x1121 @0x26
0x10fb…1123 at0027 = EOL // 0x1122 @0x27
0x10fb…1123 }
0x1123…113e 9e95 1390 EXEC FE(8,4,K4$)
0x1123…113e LineComalBin {
0x1123…113e ptr = 0x9e95 // 0x1123 @0x0
0x1123…113e lno = 0x056e // 0x1125 @0x2
0x1123…113e at0004 = ╱9d╱ EXEC ╱ // 0x1127 @0x4
0x1123…113e at0005 = ╱46╱F╱ // 0x1128 @0x5
0x1123…113e at0006 = ╱45╱E╱ // 0x1129 @0x6
0x1123…113e at0007 = ╱ed╱(╱ // 0x112a @0x7
0x1123…113e at0008 = ╱38╱8╱ // 0x112b @0x8
0x1123…113e at0009 = ╱fe00008004╱ // 0x112c @0x9
0x1123…113e at000e = ╱ec╱,╱ // 0x1131 @0xe
0x1123…113e at000f = ╱34╱4╱ // 0x1132 @0xf
0x1123…113e at0010 = ╱fe00008003╱ // 0x1133 @0x10
0x1123…113e at0015 = ╱ec╱,╱ // 0x1138 @0x15
0x1123…113e at0016 = ╱4b╱K╱ // 0x1139 @0x16
0x1123…113e at0017 = ╱34╱4╱ // 0x113a @0x17
0x1123…113e at0018 = ╱ef╱$╱ // 0x113b @0x18
0x1123…113e at0019 = ╱ee╱)╱ // 0x113c @0x19
0x1123…113e at001a = EOL // 0x113d @0x1a
0x1123…113e }
0x113e…1144 9e9b 1400 ENDPROC
0x113e…1144 LineComalBin {
0x113e…1144 ptr = 0x9e9b // 0x113e @0x0
0x113e…1144 lno = 0x0578 // 0x1140 @0x2
0x113e…1144 at0004 = ╱9f╱ ENDPROC ╱ // 0x1142 @0x4
0x113e…1144 at0005 = EOL // 0x1143 @0x5
0x113e…1144 }
0x1144…1153 9eaa 1410 PROC HENTVPOST
0x1144…1153 LineComalBin {
0x1144…1153 ptr = 0x9eaa // 0x1144 @0x0
0x1144…1153 lno = 0x0582 // 0x1146 @0x2
0x1144…1153 at0004 = ╱9e╱ PROC ╱ // 0x1148 @0x4
0x1144…1153 at0005 = ╱48╱H╱ // 0x1149 @0x5
0x1144…1153 at0006 = ╱45╱E╱ // 0x114a @0x6
0x1144…1153 at0007 = ╱4e╱N╱ // 0x114b @0x7
0x1144…1153 at0008 = ╱54╱T╱ // 0x114c @0x8
0x1144…1153 at0009 = ╱56╱V╱ // 0x114d @0x9
0x1144…1153 at000a = ╱50╱P╱ // 0x114e @0xa
0x1144…1153 at000b = ╱4f╱O╱ // 0x114f @0xb
0x1144…1153 at000c = ╱53╱S╱ // 0x1150 @0xc
0x1144…1153 at000d = ╱54╱T╱ // 0x1151 @0xd
0x1144…1153 at000e = EOL // 0x1152 @0xe
0x1144…1153 }
0x1153…116c 9ec3 1420 S=VTAB(VPIL3,2)
0x1153…116c LineComalBin {
0x1153…116c ptr = 0x9ec3 // 0x1153 @0x0
0x1153…116c lno = 0x058c // 0x1155 @0x2
0x1153…116c at0004 = ╱53╱S╱ // 0x1157 @0x4
0x1153…116c at0005 = ╱dc╱=╱ // 0x1158 @0x5
0x1153…116c at0006 = ╱56╱V╱ // 0x1159 @0x6
0x1153…116c at0007 = ╱54╱T╱ // 0x115a @0x7
0x1153…116c at0008 = ╱41╱A╱ // 0x115b @0x8
0x1153…116c at0009 = ╱42╱B╱ // 0x115c @0x9
0x1153…116c at000a = ╱ed╱(╱ // 0x115d @0xa
0x1153…116c at000b = ╱56╱V╱ // 0x115e @0xb
0x1153…116c at000c = ╱50╱P╱ // 0x115f @0xc
0x1153…116c at000d = ╱49╱I╱ // 0x1160 @0xd
0x1153…116c at000e = ╱4c╱L╱ // 0x1161 @0xe
0x1153…116c at000f = ╱33╱3╱ // 0x1162 @0xf
0x1153…116c at0010 = ╱ec╱,╱ // 0x1163 @0x10
0x1153…116c at0011 = ╱32╱2╱ // 0x1164 @0x11
0x1153…116c at0012 = ╱fe00008002╱ // 0x1165 @0x12
0x1153…116c at0017 = ╱ee╱)╱ // 0x116a @0x17
0x1153…116c at0018 = EOL // 0x116b @0x18
0x1153…116c }
0x116c…1199 9ef0 1430 GET K5$,S:VARENR,VARTEKST$,VARPRIS$,VARKONT
0x116c…1199 LineComalBin {
0x116c…1199 ptr = 0x9ef0 // 0x116c @0x0
0x116c…1199 lno = 0x0596 // 0x116e @0x2
0x116c…1199 at0004 = ╱a9╱ GET ╱ // 0x1170 @0x4
0x116c…1199 at0005 = ╱4b╱K╱ // 0x1171 @0x5
0x116c…1199 at0006 = ╱35╱5╱ // 0x1172 @0x6
0x116c…1199 at0007 = ╱ef╱$╱ // 0x1173 @0x7
0x116c…1199 at0008 = ╱ec╱,╱ // 0x1174 @0x8
0x116c…1199 at0009 = ╱53╱S╱ // 0x1175 @0x9
0x116c…1199 at000a = ╱f0╱:╱ // 0x1176 @0xa
0x116c…1199 at000b = ╱56╱V╱ // 0x1177 @0xb
0x116c…1199 at000c = ╱41╱A╱ // 0x1178 @0xc
0x116c…1199 at000d = ╱52╱R╱ // 0x1179 @0xd
0x116c…1199 at000e = ╱45╱E╱ // 0x117a @0xe
0x116c…1199 at000f = ╱4e╱N╱ // 0x117b @0xf
0x116c…1199 at0010 = ╱52╱R╱ // 0x117c @0x10
0x116c…1199 at0011 = ╱ec╱,╱ // 0x117d @0x11
0x116c…1199 at0012 = ╱56╱V╱ // 0x117e @0x12
0x116c…1199 at0013 = ╱41╱A╱ // 0x117f @0x13
0x116c…1199 at0014 = ╱52╱R╱ // 0x1180 @0x14
0x116c…1199 at0015 = ╱54╱T╱ // 0x1181 @0x15
0x116c…1199 at0016 = ╱45╱E╱ // 0x1182 @0x16
0x116c…1199 at0017 = ╱4b╱K╱ // 0x1183 @0x17
0x116c…1199 at0018 = ╱53╱S╱ // 0x1184 @0x18
0x116c…1199 at0019 = ╱54╱T╱ // 0x1185 @0x19
0x116c…1199 at001a = ╱ef╱$╱ // 0x1186 @0x1a
0x116c…1199 at001b = ╱ec╱,╱ // 0x1187 @0x1b
0x116c…1199 at001c = ╱56╱V╱ // 0x1188 @0x1c
0x116c…1199 at001d = ╱41╱A╱ // 0x1189 @0x1d
0x116c…1199 at001e = ╱52╱R╱ // 0x118a @0x1e
0x116c…1199 at001f = ╱50╱P╱ // 0x118b @0x1f
0x116c…1199 at0020 = ╱52╱R╱ // 0x118c @0x20
0x116c…1199 at0021 = ╱49╱I╱ // 0x118d @0x21
0x116c…1199 at0022 = ╱53╱S╱ // 0x118e @0x22
0x116c…1199 at0023 = ╱ef╱$╱ // 0x118f @0x23
0x116c…1199 at0024 = ╱ec╱,╱ // 0x1190 @0x24
0x116c…1199 at0025 = ╱56╱V╱ // 0x1191 @0x25
0x116c…1199 at0026 = ╱41╱A╱ // 0x1192 @0x26
0x116c…1199 at0027 = ╱52╱R╱ // 0x1193 @0x27
0x116c…1199 at0028 = ╱4b╱K╱ // 0x1194 @0x28
0x116c…1199 at0029 = ╱4f╱O╱ // 0x1195 @0x29
0x116c…1199 at002a = ╱4e╱N╱ // 0x1196 @0x2a
0x116c…1199 at002b = ╱54╱T╱ // 0x1197 @0x2b
0x116c…1199 at002c = EOL // 0x1198 @0x2c
0x116c…1199 }
0x1199…11b4 9f0b 1440 EXEC FE(3,1,K5$)
0x1199…11b4 LineComalBin {
0x1199…11b4 ptr = 0x9f0b // 0x1199 @0x0
0x1199…11b4 lno = 0x05a0 // 0x119b @0x2
0x1199…11b4 at0004 = ╱9d╱ EXEC ╱ // 0x119d @0x4
0x1199…11b4 at0005 = ╱46╱F╱ // 0x119e @0x5
0x1199…11b4 at0006 = ╱45╱E╱ // 0x119f @0x6
0x1199…11b4 at0007 = ╱ed╱(╱ // 0x11a0 @0x7
0x1199…11b4 at0008 = ╱33╱3╱ // 0x11a1 @0x8
0x1199…11b4 at0009 = ╱fe0000c002╱ // 0x11a2 @0x9
0x1199…11b4 at000e = ╱ec╱,╱ // 0x11a7 @0xe
0x1199…11b4 at000f = ╱31╱1╱ // 0x11a8 @0xf
0x1199…11b4 at0010 = ╱fe00008001╱ // 0x11a9 @0x10
0x1199…11b4 at0015 = ╱ec╱,╱ // 0x11ae @0x15
0x1199…11b4 at0016 = ╱4b╱K╱ // 0x11af @0x16
0x1199…11b4 at0017 = ╱35╱5╱ // 0x11b0 @0x17
0x1199…11b4 at0018 = ╱ef╱$╱ // 0x11b1 @0x18
0x1199…11b4 at0019 = ╱ee╱)╱ // 0x11b2 @0x19
0x1199…11b4 at001a = EOL // 0x11b3 @0x1a
0x1199…11b4 }
0x11b4…11ba 9f11 1450 ENDPROC
0x11b4…11ba LineComalBin {
0x11b4…11ba ptr = 0x9f11 // 0x11b4 @0x0
0x11b4…11ba lno = 0x05aa // 0x11b6 @0x2
0x11b4…11ba at0004 = ╱9f╱ ENDPROC ╱ // 0x11b8 @0x4
0x11b4…11ba at0005 = EOL // 0x11b9 @0x5
0x11b4…11ba }
0x11ba…11cb 9f22 1460 PROC KUNDEUD(HO)
0x11ba…11cb LineComalBin {
0x11ba…11cb ptr = 0x9f22 // 0x11ba @0x0
0x11ba…11cb lno = 0x05b4 // 0x11bc @0x2
0x11ba…11cb at0004 = ╱9e╱ PROC ╱ // 0x11be @0x4
0x11ba…11cb at0005 = ╱4b╱K╱ // 0x11bf @0x5
0x11ba…11cb at0006 = ╱55╱U╱ // 0x11c0 @0x6
0x11ba…11cb at0007 = ╱4e╱N╱ // 0x11c1 @0x7
0x11ba…11cb at0008 = ╱44╱D╱ // 0x11c2 @0x8
0x11ba…11cb at0009 = ╱45╱E╱ // 0x11c3 @0x9
0x11ba…11cb at000a = ╱55╱U╱ // 0x11c4 @0xa
0x11ba…11cb at000b = ╱44╱D╱ // 0x11c5 @0xb
0x11ba…11cb at000c = ╱ed╱(╱ // 0x11c6 @0xc
0x11ba…11cb at000d = ╱48╱H╱ // 0x11c7 @0xd
0x11ba…11cb at000e = ╱4f╱O╱ // 0x11c8 @0xe
0x11ba…11cb at000f = ╱ee╱)╱ // 0x11c9 @0xf
0x11ba…11cb at0010 = EOL // 0x11ca @0x10
0x11ba…11cb }
0x11cb…11de 9f35 1470 CURSOR 9,5
0x11cb…11de LineComalBin {
0x11cb…11de ptr = 0x9f35 // 0x11cb @0x0
0x11cb…11de lno = 0x05be // 0x11cd @0x2
0x11cb…11de at0004 = ╱a1╱ CURSOR ╱ // 0x11cf @0x4
0x11cb…11de at0005 = ╱39╱9╱ // 0x11d0 @0x5
0x11cb…11de at0006 = ╱fe00009004╱ // 0x11d1 @0x6
0x11cb…11de at000b = ╱ec╱,╱ // 0x11d6 @0xb
0x11cb…11de at000c = ╱35╱5╱ // 0x11d7 @0xc
0x11cb…11de at000d = ╱fe0000a003╱ // 0x11d8 @0xd
0x11cb…11de at0012 = EOL // 0x11dd @0x12
0x11cb…11de }
0x11de…11ec 9f43 1480 PRINT DEBNAVN$
0x11de…11ec LineComalBin {
0x11de…11ec ptr = 0x9f43 // 0x11de @0x0
0x11de…11ec lno = 0x05c8 // 0x11e0 @0x2
0x11de…11ec at0004 = ╱92╱ PRINT ╱ // 0x11e2 @0x4
0x11de…11ec at0005 = ╱44╱D╱ // 0x11e3 @0x5
0x11de…11ec at0006 = ╱45╱E╱ // 0x11e4 @0x6
0x11de…11ec at0007 = ╱42╱B╱ // 0x11e5 @0x7
0x11de…11ec at0008 = ╱4e╱N╱ // 0x11e6 @0x8
0x11de…11ec at0009 = ╱41╱A╱ // 0x11e7 @0x9
0x11de…11ec at000a = ╱56╱V╱ // 0x11e8 @0xa
0x11de…11ec at000b = ╱4e╱N╱ // 0x11e9 @0xb
0x11de…11ec at000c = ╱ef╱$╱ // 0x11ea @0xc
0x11de…11ec at000d = EOL // 0x11eb @0xd
0x11de…11ec }
0x11ec…11ff 9f56 1490 CURSOR 9,6
0x11ec…11ff LineComalBin {
0x11ec…11ff ptr = 0x9f56 // 0x11ec @0x0
0x11ec…11ff lno = 0x05d2 // 0x11ee @0x2
0x11ec…11ff at0004 = ╱a1╱ CURSOR ╱ // 0x11f0 @0x4
0x11ec…11ff at0005 = ╱39╱9╱ // 0x11f1 @0x5
0x11ec…11ff at0006 = ╱fe00009004╱ // 0x11f2 @0x6
0x11ec…11ff at000b = ╱ec╱,╱ // 0x11f7 @0xb
0x11ec…11ff at000c = ╱36╱6╱ // 0x11f8 @0xc
0x11ec…11ff at000d = ╱fe0000c003╱ // 0x11f9 @0xd
0x11ec…11ff at0012 = EOL // 0x11fe @0x12
0x11ec…11ff }
0x11ff…120d 9f64 1500 PRINT DEBGADE$
0x11ff…120d LineComalBin {
0x11ff…120d ptr = 0x9f64 // 0x11ff @0x0
0x11ff…120d lno = 0x05dc // 0x1201 @0x2
0x11ff…120d at0004 = ╱92╱ PRINT ╱ // 0x1203 @0x4
0x11ff…120d at0005 = ╱44╱D╱ // 0x1204 @0x5
0x11ff…120d at0006 = ╱45╱E╱ // 0x1205 @0x6
0x11ff…120d at0007 = ╱42╱B╱ // 0x1206 @0x7
0x11ff…120d at0008 = ╱47╱G╱ // 0x1207 @0x8
0x11ff…120d at0009 = ╱41╱A╱ // 0x1208 @0x9
0x11ff…120d at000a = ╱44╱D╱ // 0x1209 @0xa
0x11ff…120d at000b = ╱45╱E╱ // 0x120a @0xb
0x11ff…120d at000c = ╱ef╱$╱ // 0x120b @0xc
0x11ff…120d at000d = EOL // 0x120c @0xd
0x11ff…120d }
0x120d…1220 9f77 1510 CURSOR 6,7
0x120d…1220 LineComalBin {
0x120d…1220 ptr = 0x9f77 // 0x120d @0x0
0x120d…1220 lno = 0x05e6 // 0x120f @0x2
0x120d…1220 at0004 = ╱a1╱ CURSOR ╱ // 0x1211 @0x4
0x120d…1220 at0005 = ╱36╱6╱ // 0x1212 @0x5
0x120d…1220 at0006 = ╱fe0000c003╱ // 0x1213 @0x6
0x120d…1220 at000b = ╱ec╱,╱ // 0x1218 @0xb
0x120d…1220 at000c = ╱37╱7╱ // 0x1219 @0xc
0x120d…1220 at000d = ╱fe0000e003╱ // 0x121a @0xd
0x120d…1220 at0012 = EOL // 0x121f @0x12
0x120d…1220 }
0x1220…123a 9f91 1520 PRINT USING "#######":DEBPOSTNR
0x1220…123a LineComalBin {
0x1220…123a ptr = 0x9f91 // 0x1220 @0x0
0x1220…123a lno = 0x05f0 // 0x1222 @0x2
0x1220…123a at0004 = ╱92╱ PRINT ╱ // 0x1224 @0x4
0x1220…123a at0005 = ╱b9╱ USING ╱ // 0x1225 @0x5
0x1220…123a at0006 = ╱22╱"╱ // 0x1226 @0x6
0x1220…123a at0007 = ╱23╱#╱ // 0x1227 @0x7
0x1220…123a at0008 = ╱23╱#╱ // 0x1228 @0x8
0x1220…123a at0009 = ╱23╱#╱ // 0x1229 @0x9
0x1220…123a at000a = ╱23╱#╱ // 0x122a @0xa
0x1220…123a at000b = ╱23╱#╱ // 0x122b @0xb
0x1220…123a at000c = ╱23╱#╱ // 0x122c @0xc
0x1220…123a at000d = ╱23╱#╱ // 0x122d @0xd
0x1220…123a at000e = ╱22╱"╱ // 0x122e @0xe
0x1220…123a at000f = ╱f0╱:╱ // 0x122f @0xf
0x1220…123a at0010 = ╱44╱D╱ // 0x1230 @0x10
0x1220…123a at0011 = ╱45╱E╱ // 0x1231 @0x11
0x1220…123a at0012 = ╱42╱B╱ // 0x1232 @0x12
0x1220…123a at0013 = ╱50╱P╱ // 0x1233 @0x13
0x1220…123a at0014 = ╱4f╱O╱ // 0x1234 @0x14
0x1220…123a at0015 = ╱53╱S╱ // 0x1235 @0x15
0x1220…123a at0016 = ╱54╱T╱ // 0x1236 @0x16
0x1220…123a at0017 = ╱4e╱N╱ // 0x1237 @0x17
0x1220…123a at0018 = ╱52╱R╱ // 0x1238 @0x18
0x1220…123a at0019 = EOL // 0x1239 @0x19
0x1220…123a }
0x123a…124e 9fa5 1530 CURSOR 14,7
0x123a…124e LineComalBin {
0x123a…124e ptr = 0x9fa5 // 0x123a @0x0
0x123a…124e lno = 0x05fa // 0x123c @0x2
0x123a…124e at0004 = ╱a1╱ CURSOR ╱ // 0x123e @0x4
0x123a…124e at0005 = ╱31╱1╱ // 0x123f @0x5
0x123a…124e at0006 = ╱34╱4╱ // 0x1240 @0x6
0x123a…124e at0007 = ╱fe0000e004╱ // 0x1241 @0x7
0x123a…124e at000c = ╱ec╱,╱ // 0x1246 @0xc
0x123a…124e at000d = ╱37╱7╱ // 0x1247 @0xd
0x123a…124e at000e = ╱fe0000e003╱ // 0x1248 @0xe
0x123a…124e at0013 = EOL // 0x124d @0x13
0x123a…124e }
0x124e…125a 9fb1 1540 PRINT DEBBY$
0x124e…125a LineComalBin {
0x124e…125a ptr = 0x9fb1 // 0x124e @0x0
0x124e…125a lno = 0x0604 // 0x1250 @0x2
0x124e…125a at0004 = ╱92╱ PRINT ╱ // 0x1252 @0x4
0x124e…125a at0005 = ╱44╱D╱ // 0x1253 @0x5
0x124e…125a at0006 = ╱45╱E╱ // 0x1254 @0x6
0x124e…125a at0007 = ╱42╱B╱ // 0x1255 @0x7
0x124e…125a at0008 = ╱42╱B╱ // 0x1256 @0x8
0x124e…125a at0009 = ╱59╱Y╱ // 0x1257 @0x9
0x124e…125a at000a = ╱ef╱$╱ // 0x1258 @0xa
0x124e…125a at000b = EOL // 0x1259 @0xb
0x124e…125a }
0x125a…126a 9fc1 1550 IF HO=1 THEN
0x125a…126a LineComalBin {
0x125a…126a ptr = 0x9fc1 // 0x125a @0x0
0x125a…126a lno = 0x060e // 0x125c @0x2
0x125a…126a at0004 = ╱9c╱ IF ╱ // 0x125e @0x4
0x125a…126a at0005 = ╱48╱H╱ // 0x125f @0x5
0x125a…126a at0006 = ╱4f╱O╱ // 0x1260 @0x6
0x125a…126a at0007 = ╱dc╱=╱ // 0x1261 @0x7
0x125a…126a at0008 = ╱31╱1╱ // 0x1262 @0x8
0x125a…126a at0009 = ╱fe00008001╱ // 0x1263 @0x9
0x125a…126a at000e = ╱b6╱ THEN ╱ // 0x1268 @0xe
0x125a…126a at000f = EOL // 0x1269 @0xf
0x125a…126a }
0x126a…1293 9fea 1560 EXEC CA(0,DSALDO1$,DSALDO2$,SALDO$)
0x126a…1293 LineComalBin {
0x126a…1293 ptr = 0x9fea // 0x126a @0x0
0x126a…1293 lno = 0x0618 // 0x126c @0x2
0x126a…1293 at0004 = ╱9d╱ EXEC ╱ // 0x126e @0x4
0x126a…1293 at0005 = ╱43╱C╱ // 0x126f @0x5
0x126a…1293 at0006 = ╱41╱A╱ // 0x1270 @0x6
0x126a…1293 at0007 = ╱ed╱(╱ // 0x1271 @0x7
0x126a…1293 at0008 = ╱30╱0╱ // 0x1272 @0x8
0x126a…1293 at0009 = ╱fe00000000╱ // 0x1273 @0x9
0x126a…1293 at000e = ╱ec╱,╱ // 0x1278 @0xe
0x126a…1293 at000f = ╱44╱D╱ // 0x1279 @0xf
0x126a…1293 at0010 = ╱53╱S╱ // 0x127a @0x10
0x126a…1293 at0011 = ╱41╱A╱ // 0x127b @0x11
0x126a…1293 at0012 = ╱4c╱L╱ // 0x127c @0x12
0x126a…1293 at0013 = ╱44╱D╱ // 0x127d @0x13
0x126a…1293 at0014 = ╱4f╱O╱ // 0x127e @0x14
0x126a…1293 at0015 = ╱31╱1╱ // 0x127f @0x15
0x126a…1293 at0016 = ╱ef╱$╱ // 0x1280 @0x16
0x126a…1293 at0017 = ╱ec╱,╱ // 0x1281 @0x17
0x126a…1293 at0018 = ╱44╱D╱ // 0x1282 @0x18
0x126a…1293 at0019 = ╱53╱S╱ // 0x1283 @0x19
0x126a…1293 at001a = ╱41╱A╱ // 0x1284 @0x1a
0x126a…1293 at001b = ╱4c╱L╱ // 0x1285 @0x1b
0x126a…1293 at001c = ╱44╱D╱ // 0x1286 @0x1c
0x126a…1293 at001d = ╱4f╱O╱ // 0x1287 @0x1d
0x126a…1293 at001e = ╱32╱2╱ // 0x1288 @0x1e
0x126a…1293 at001f = ╱ef╱$╱ // 0x1289 @0x1f
0x126a…1293 at0020 = ╱ec╱,╱ // 0x128a @0x20
0x126a…1293 at0021 = ╱53╱S╱ // 0x128b @0x21
0x126a…1293 at0022 = ╱41╱A╱ // 0x128c @0x22
0x126a…1293 at0023 = ╱4c╱L╱ // 0x128d @0x23
0x126a…1293 at0024 = ╱44╱D╱ // 0x128e @0x24
0x126a…1293 at0025 = ╱4f╱O╱ // 0x128f @0x25
0x126a…1293 at0026 = ╱ef╱$╱ // 0x1290 @0x26
0x126a…1293 at0027 = ╱ee╱)╱ // 0x1291 @0x27
0x126a…1293 at0028 = EOL // 0x1292 @0x28
0x126a…1293 }
0x1293…12ba a011 1570 EXEC CA(0,SALDO$,DSALDO3$,SALDO$)
0x1293…12ba LineComalBin {
0x1293…12ba ptr = 0xa011 // 0x1293 @0x0
0x1293…12ba lno = 0x0622 // 0x1295 @0x2
0x1293…12ba at0004 = ╱9d╱ EXEC ╱ // 0x1297 @0x4
0x1293…12ba at0005 = ╱43╱C╱ // 0x1298 @0x5
0x1293…12ba at0006 = ╱41╱A╱ // 0x1299 @0x6
0x1293…12ba at0007 = ╱ed╱(╱ // 0x129a @0x7
0x1293…12ba at0008 = ╱30╱0╱ // 0x129b @0x8
0x1293…12ba at0009 = ╱fe00000000╱ // 0x129c @0x9
0x1293…12ba at000e = ╱ec╱,╱ // 0x12a1 @0xe
0x1293…12ba at000f = ╱53╱S╱ // 0x12a2 @0xf
0x1293…12ba at0010 = ╱41╱A╱ // 0x12a3 @0x10
0x1293…12ba at0011 = ╱4c╱L╱ // 0x12a4 @0x11
0x1293…12ba at0012 = ╱44╱D╱ // 0x12a5 @0x12
0x1293…12ba at0013 = ╱4f╱O╱ // 0x12a6 @0x13
0x1293…12ba at0014 = ╱ef╱$╱ // 0x12a7 @0x14
0x1293…12ba at0015 = ╱ec╱,╱ // 0x12a8 @0x15
0x1293…12ba at0016 = ╱44╱D╱ // 0x12a9 @0x16
0x1293…12ba at0017 = ╱53╱S╱ // 0x12aa @0x17
0x1293…12ba at0018 = ╱41╱A╱ // 0x12ab @0x18
0x1293…12ba at0019 = ╱4c╱L╱ // 0x12ac @0x19
0x1293…12ba at001a = ╱44╱D╱ // 0x12ad @0x1a
0x1293…12ba at001b = ╱4f╱O╱ // 0x12ae @0x1b
0x1293…12ba at001c = ╱33╱3╱ // 0x12af @0x1c
0x1293…12ba at001d = ╱ef╱$╱ // 0x12b0 @0x1d
0x1293…12ba at001e = ╱ec╱,╱ // 0x12b1 @0x1e
0x1293…12ba at001f = ╱53╱S╱ // 0x12b2 @0x1f
0x1293…12ba at0020 = ╱41╱A╱ // 0x12b3 @0x20
0x1293…12ba at0021 = ╱4c╱L╱ // 0x12b4 @0x21
0x1293…12ba at0022 = ╱44╱D╱ // 0x12b5 @0x22
0x1293…12ba at0023 = ╱4f╱O╱ // 0x12b6 @0x23
0x1293…12ba at0024 = ╱ef╱$╱ // 0x12b7 @0x24
0x1293…12ba at0025 = ╱ee╱)╱ // 0x12b8 @0x25
0x1293…12ba at0026 = EOL // 0x12b9 @0x26
0x1293…12ba }
0x12ba…12e1 a038 1580 EXEC CA(0,SALDO$,DSALDO4$,SALDO$)
0x12ba…12e1 LineComalBin {
0x12ba…12e1 ptr = 0xa038 // 0x12ba @0x0
0x12ba…12e1 lno = 0x062c // 0x12bc @0x2
0x12ba…12e1 at0004 = ╱9d╱ EXEC ╱ // 0x12be @0x4
0x12ba…12e1 at0005 = ╱43╱C╱ // 0x12bf @0x5
0x12ba…12e1 at0006 = ╱41╱A╱ // 0x12c0 @0x6
0x12ba…12e1 at0007 = ╱ed╱(╱ // 0x12c1 @0x7
0x12ba…12e1 at0008 = ╱30╱0╱ // 0x12c2 @0x8
0x12ba…12e1 at0009 = ╱fe00000000╱ // 0x12c3 @0x9
0x12ba…12e1 at000e = ╱ec╱,╱ // 0x12c8 @0xe
0x12ba…12e1 at000f = ╱53╱S╱ // 0x12c9 @0xf
0x12ba…12e1 at0010 = ╱41╱A╱ // 0x12ca @0x10
0x12ba…12e1 at0011 = ╱4c╱L╱ // 0x12cb @0x11
0x12ba…12e1 at0012 = ╱44╱D╱ // 0x12cc @0x12
0x12ba…12e1 at0013 = ╱4f╱O╱ // 0x12cd @0x13
0x12ba…12e1 at0014 = ╱ef╱$╱ // 0x12ce @0x14
0x12ba…12e1 at0015 = ╱ec╱,╱ // 0x12cf @0x15
0x12ba…12e1 at0016 = ╱44╱D╱ // 0x12d0 @0x16
0x12ba…12e1 at0017 = ╱53╱S╱ // 0x12d1 @0x17
0x12ba…12e1 at0018 = ╱41╱A╱ // 0x12d2 @0x18
0x12ba…12e1 at0019 = ╱4c╱L╱ // 0x12d3 @0x19
0x12ba…12e1 at001a = ╱44╱D╱ // 0x12d4 @0x1a
0x12ba…12e1 at001b = ╱4f╱O╱ // 0x12d5 @0x1b
0x12ba…12e1 at001c = ╱34╱4╱ // 0x12d6 @0x1c
0x12ba…12e1 at001d = ╱ef╱$╱ // 0x12d7 @0x1d
0x12ba…12e1 at001e = ╱ec╱,╱ // 0x12d8 @0x1e
0x12ba…12e1 at001f = ╱53╱S╱ // 0x12d9 @0x1f
0x12ba…12e1 at0020 = ╱41╱A╱ // 0x12da @0x20
0x12ba…12e1 at0021 = ╱4c╱L╱ // 0x12db @0x21
0x12ba…12e1 at0022 = ╱44╱D╱ // 0x12dc @0x22
0x12ba…12e1 at0023 = ╱4f╱O╱ // 0x12dd @0x23
0x12ba…12e1 at0024 = ╱ef╱$╱ // 0x12de @0x24
0x12ba…12e1 at0025 = ╱ee╱)╱ // 0x12df @0x25
0x12ba…12e1 at0026 = EOL // 0x12e0 @0x26
0x12ba…12e1 }
0x12e1…12f5 a04c 1590 CURSOR 9,14
0x12e1…12f5 LineComalBin {
0x12e1…12f5 ptr = 0xa04c // 0x12e1 @0x0
0x12e1…12f5 lno = 0x0636 // 0x12e3 @0x2
0x12e1…12f5 at0004 = ╱a1╱ CURSOR ╱ // 0x12e5 @0x4
0x12e1…12f5 at0005 = ╱39╱9╱ // 0x12e6 @0x5
0x12e1…12f5 at0006 = ╱fe00009004╱ // 0x12e7 @0x6
0x12e1…12f5 at000b = ╱ec╱,╱ // 0x12ec @0xb
0x12e1…12f5 at000c = ╱31╱1╱ // 0x12ed @0xc
0x12e1…12f5 at000d = ╱34╱4╱ // 0x12ee @0xd
0x12e1…12f5 at000e = ╱fe0000e004╱ // 0x12ef @0xe
0x12e1…12f5 at0013 = EOL // 0x12f4 @0x13
0x12e1…12f5 }
0x12f5…1305 a05c 1600 PRINT "Saldo: ";
0x12f5…1305 LineComalBin {
0x12f5…1305 ptr = 0xa05c // 0x12f5 @0x0
0x12f5…1305 lno = 0x0640 // 0x12f7 @0x2
0x12f5…1305 at0004 = ╱92╱ PRINT ╱ // 0x12f9 @0x4
0x12f5…1305 at0005 = ╱22╱"╱ // 0x12fa @0x5
0x12f5…1305 at0006 = ╱53╱S╱ // 0x12fb @0x6
0x12f5…1305 at0007 = ╱61╱a╱ // 0x12fc @0x7
0x12f5…1305 at0008 = ╱6c╱l╱ // 0x12fd @0x8
0x12f5…1305 at0009 = ╱64╱d╱ // 0x12fe @0x9
0x12f5…1305 at000a = ╱6f╱o╱ // 0x12ff @0xa
0x12f5…1305 at000b = ╱3a╱:╱ // 0x1300 @0xb
0x12f5…1305 at000c = ╱20╱…╱ // 0x1301 @0xc
0x12f5…1305 at000d = ╱22╱"╱ // 0x1302 @0xd
0x12f5…1305 at000e = ╱eb╱;╱ // 0x1303 @0xe
0x12f5…1305 at000f = EOL // 0x1304 @0xf
0x12f5…1305 }
0x1305…132a a081 1610 EXEC TUD(SALDO$,TAL4$,1,0)
0x1305…132a LineComalBin {
0x1305…132a ptr = 0xa081 // 0x1305 @0x0
0x1305…132a lno = 0x064a // 0x1307 @0x2
0x1305…132a at0004 = ╱9d╱ EXEC ╱ // 0x1309 @0x4
0x1305…132a at0005 = ╱54╱T╱ // 0x130a @0x5
0x1305…132a at0006 = ╱55╱U╱ // 0x130b @0x6
0x1305…132a at0007 = ╱44╱D╱ // 0x130c @0x7
0x1305…132a at0008 = ╱ed╱(╱ // 0x130d @0x8
0x1305…132a at0009 = ╱53╱S╱ // 0x130e @0x9
0x1305…132a at000a = ╱41╱A╱ // 0x130f @0xa
0x1305…132a at000b = ╱4c╱L╱ // 0x1310 @0xb
0x1305…132a at000c = ╱44╱D╱ // 0x1311 @0xc
0x1305…132a at000d = ╱4f╱O╱ // 0x1312 @0xd
0x1305…132a at000e = ╱ef╱$╱ // 0x1313 @0xe
0x1305…132a at000f = ╱ec╱,╱ // 0x1314 @0xf
0x1305…132a at0010 = ╱54╱T╱ // 0x1315 @0x10
0x1305…132a at0011 = ╱41╱A╱ // 0x1316 @0x11
0x1305…132a at0012 = ╱4c╱L╱ // 0x1317 @0x12
0x1305…132a at0013 = ╱34╱4╱ // 0x1318 @0x13
0x1305…132a at0014 = ╱ef╱$╱ // 0x1319 @0x14
0x1305…132a at0015 = ╱ec╱,╱ // 0x131a @0x15
0x1305…132a at0016 = ╱31╱1╱ // 0x131b @0x16
0x1305…132a at0017 = ╱fe00008001╱ // 0x131c @0x17
0x1305…132a at001c = ╱ec╱,╱ // 0x1321 @0x1c
0x1305…132a at001d = ╱30╱0╱ // 0x1322 @0x1d
0x1305…132a at001e = ╱fe00000000╱ // 0x1323 @0x1e
0x1305…132a at0023 = ╱ee╱)╱ // 0x1328 @0x23
0x1305…132a at0024 = EOL // 0x1329 @0x24
0x1305…132a }
0x132a…133f a096 1620 CURSOR 12,16
0x132a…133f LineComalBin {
0x132a…133f ptr = 0xa096 // 0x132a @0x0
0x132a…133f lno = 0x0654 // 0x132c @0x2
0x132a…133f at0004 = ╱a1╱ CURSOR ╱ // 0x132e @0x4
0x132a…133f at0005 = ╱31╱1╱ // 0x132f @0x5
0x132a…133f at0006 = ╱32╱2╱ // 0x1330 @0x6
0x132a…133f at0007 = ╱fe0000c004╱ // 0x1331 @0x7
0x132a…133f at000c = ╱ec╱,╱ // 0x1336 @0xc
0x132a…133f at000d = ╱31╱1╱ // 0x1337 @0xd
0x132a…133f at000e = ╱36╱6╱ // 0x1338 @0xe
0x132a…133f at000f = ╱fe00008005╱ // 0x1339 @0xf
0x132a…133f at0014 = EOL // 0x133e @0x14
0x132a…133f }
0x133f…137e a0d5 1630 PRINT "0-30 dage 30-60 dage 60-90 dage ældre"
0x133f…137e LineComalBin {
0x133f…137e ptr = 0xa0d5 // 0x133f @0x0
0x133f…137e lno = 0x065e // 0x1341 @0x2
0x133f…137e at0004 = ╱92╱ PRINT ╱ // 0x1343 @0x4
0x133f…137e at0005 = ╱22╱"╱ // 0x1344 @0x5
0x133f…137e at0006 = ╱30╱0╱ // 0x1345 @0x6
0x133f…137e at0007 = ╱2d╱-╱ // 0x1346 @0x7
0x133f…137e at0008 = ╱33╱3╱ // 0x1347 @0x8
0x133f…137e at0009 = ╱30╱0╱ // 0x1348 @0x9
0x133f…137e at000a = ╱20╱…╱ // 0x1349 @0xa
0x133f…137e at000b = ╱64╱d╱ // 0x134a @0xb
0x133f…137e at000c = ╱61╱a╱ // 0x134b @0xc
0x133f…137e at000d = ╱67╱g╱ // 0x134c @0xd
0x133f…137e at000e = ╱65╱e╱ // 0x134d @0xe
0x133f…137e at000f = ╱20╱…╱ // 0x134e @0xf
0x133f…137e at0010 = ╱20╱…╱ // 0x134f @0x10
0x133f…137e at0011 = ╱20╱…╱ // 0x1350 @0x11
0x133f…137e at0012 = ╱20╱…╱ // 0x1351 @0x12
0x133f…137e at0013 = ╱20╱…╱ // 0x1352 @0x13
0x133f…137e at0014 = ╱20╱…╱ // 0x1353 @0x14
0x133f…137e at0015 = ╱33╱3╱ // 0x1354 @0x15
0x133f…137e at0016 = ╱30╱0╱ // 0x1355 @0x16
0x133f…137e at0017 = ╱2d╱-╱ // 0x1356 @0x17
0x133f…137e at0018 = ╱36╱6╱ // 0x1357 @0x18
0x133f…137e at0019 = ╱30╱0╱ // 0x1358 @0x19
0x133f…137e at001a = ╱20╱…╱ // 0x1359 @0x1a
0x133f…137e at001b = ╱64╱d╱ // 0x135a @0x1b
0x133f…137e at001c = ╱61╱a╱ // 0x135b @0x1c
0x133f…137e at001d = ╱67╱g╱ // 0x135c @0x1d
0x133f…137e at001e = ╱65╱e╱ // 0x135d @0x1e
0x133f…137e at001f = ╱20╱…╱ // 0x135e @0x1f
0x133f…137e at0020 = ╱20╱…╱ // 0x135f @0x20
0x133f…137e at0021 = ╱20╱…╱ // 0x1360 @0x21
0x133f…137e at0022 = ╱20╱…╱ // 0x1361 @0x22
0x133f…137e at0023 = ╱20╱…╱ // 0x1362 @0x23
0x133f…137e at0024 = ╱20╱…╱ // 0x1363 @0x24
0x133f…137e at0025 = ╱36╱6╱ // 0x1364 @0x25
0x133f…137e at0026 = ╱30╱0╱ // 0x1365 @0x26
0x133f…137e at0027 = ╱2d╱-╱ // 0x1366 @0x27
0x133f…137e at0028 = ╱39╱9╱ // 0x1367 @0x28
0x133f…137e at0029 = ╱30╱0╱ // 0x1368 @0x29
0x133f…137e at002a = ╱20╱…╱ // 0x1369 @0x2a
0x133f…137e at002b = ╱64╱d╱ // 0x136a @0x2b
0x133f…137e at002c = ╱61╱a╱ // 0x136b @0x2c
0x133f…137e at002d = ╱67╱g╱ // 0x136c @0x2d
0x133f…137e at002e = ╱65╱e╱ // 0x136d @0x2e
0x133f…137e at002f = ╱20╱…╱ // 0x136e @0x2f
0x133f…137e at0030 = ╱20╱…╱ // 0x136f @0x30
0x133f…137e at0031 = ╱20╱…╱ // 0x1370 @0x31
0x133f…137e at0032 = ╱20╱…╱ // 0x1371 @0x32
0x133f…137e at0033 = ╱20╱…╱ // 0x1372 @0x33
0x133f…137e at0034 = ╱20╱…╱ // 0x1373 @0x34
0x133f…137e at0035 = ╱20╱…╱ // 0x1374 @0x35
0x133f…137e at0036 = ╱20╱…╱ // 0x1375 @0x36
0x133f…137e at0037 = ╱20╱…╱ // 0x1376 @0x37
0x133f…137e at0038 = ╱7b╱æ╱ // 0x1377 @0x38
0x133f…137e at0039 = ╱6c╱l╱ // 0x1378 @0x39
0x133f…137e at003a = ╱64╱d╱ // 0x1379 @0x3a
0x133f…137e at003b = ╱72╱r╱ // 0x137a @0x3b
0x133f…137e at003c = ╱65╱e╱ // 0x137b @0x3c
0x133f…137e at003d = ╱22╱"╱ // 0x137c @0x3d
0x133f…137e at003e = EOL // 0x137d @0x3e
0x133f…137e }
0x137e…1392 a0e9 1640 CURSOR 9,18
0x137e…1392 LineComalBin {
0x137e…1392 ptr = 0xa0e9 // 0x137e @0x0
0x137e…1392 lno = 0x0668 // 0x1380 @0x2
0x137e…1392 at0004 = ╱a1╱ CURSOR ╱ // 0x1382 @0x4
0x137e…1392 at0005 = ╱39╱9╱ // 0x1383 @0x5
0x137e…1392 at0006 = ╱fe00009004╱ // 0x1384 @0x6
0x137e…1392 at000b = ╱ec╱,╱ // 0x1389 @0xb
0x137e…1392 at000c = ╱31╱1╱ // 0x138a @0xc
0x137e…1392 at000d = ╱38╱8╱ // 0x138b @0xd
0x137e…1392 at000e = ╱fe00009005╱ // 0x138c @0xe
0x137e…1392 at0013 = EOL // 0x1391 @0x13
0x137e…1392 }
0x1392…13b9 a110 1650 EXEC TUD(DSALDO1$,TAL4$,1,0)
0x1392…13b9 LineComalBin {
0x1392…13b9 ptr = 0xa110 // 0x1392 @0x0
0x1392…13b9 lno = 0x0672 // 0x1394 @0x2
0x1392…13b9 at0004 = ╱9d╱ EXEC ╱ // 0x1396 @0x4
0x1392…13b9 at0005 = ╱54╱T╱ // 0x1397 @0x5
0x1392…13b9 at0006 = ╱55╱U╱ // 0x1398 @0x6
0x1392…13b9 at0007 = ╱44╱D╱ // 0x1399 @0x7
0x1392…13b9 at0008 = ╱ed╱(╱ // 0x139a @0x8
0x1392…13b9 at0009 = ╱44╱D╱ // 0x139b @0x9
0x1392…13b9 at000a = ╱53╱S╱ // 0x139c @0xa
0x1392…13b9 at000b = ╱41╱A╱ // 0x139d @0xb
0x1392…13b9 at000c = ╱4c╱L╱ // 0x139e @0xc
0x1392…13b9 at000d = ╱44╱D╱ // 0x139f @0xd
0x1392…13b9 at000e = ╱4f╱O╱ // 0x13a0 @0xe
0x1392…13b9 at000f = ╱31╱1╱ // 0x13a1 @0xf
0x1392…13b9 at0010 = ╱ef╱$╱ // 0x13a2 @0x10
0x1392…13b9 at0011 = ╱ec╱,╱ // 0x13a3 @0x11
0x1392…13b9 at0012 = ╱54╱T╱ // 0x13a4 @0x12
0x1392…13b9 at0013 = ╱41╱A╱ // 0x13a5 @0x13
0x1392…13b9 at0014 = ╱4c╱L╱ // 0x13a6 @0x14
0x1392…13b9 at0015 = ╱34╱4╱ // 0x13a7 @0x15
0x1392…13b9 at0016 = ╱ef╱$╱ // 0x13a8 @0x16
0x1392…13b9 at0017 = ╱ec╱,╱ // 0x13a9 @0x17
0x1392…13b9 at0018 = ╱31╱1╱ // 0x13aa @0x18
0x1392…13b9 at0019 = ╱fe00008001╱ // 0x13ab @0x19
0x1392…13b9 at001e = ╱ec╱,╱ // 0x13b0 @0x1e
0x1392…13b9 at001f = ╱30╱0╱ // 0x13b1 @0x1f
0x1392…13b9 at0020 = ╱fe00000000╱ // 0x13b2 @0x20
0x1392…13b9 at0025 = ╱ee╱)╱ // 0x13b7 @0x25
0x1392…13b9 at0026 = EOL // 0x13b8 @0x26
0x1392…13b9 }
0x13b9…13ce a125 1660 CURSOR 25,18
0x13b9…13ce LineComalBin {
0x13b9…13ce ptr = 0xa125 // 0x13b9 @0x0
0x13b9…13ce lno = 0x067c // 0x13bb @0x2
0x13b9…13ce at0004 = ╱a1╱ CURSOR ╱ // 0x13bd @0x4
0x13b9…13ce at0005 = ╱32╱2╱ // 0x13be @0x5
0x13b9…13ce at0006 = ╱35╱5╱ // 0x13bf @0x6
0x13b9…13ce at0007 = ╱fe0000c805╱ // 0x13c0 @0x7
0x13b9…13ce at000c = ╱ec╱,╱ // 0x13c5 @0xc
0x13b9…13ce at000d = ╱31╱1╱ // 0x13c6 @0xd
0x13b9…13ce at000e = ╱38╱8╱ // 0x13c7 @0xe
0x13b9…13ce at000f = ╱fe00009005╱ // 0x13c8 @0xf
0x13b9…13ce at0014 = EOL // 0x13cd @0x14
0x13b9…13ce }
0x13ce…13f5 a14c 1670 EXEC TUD(DSALDO2$,TAL4$,1,0)
0x13ce…13f5 LineComalBin {
0x13ce…13f5 ptr = 0xa14c // 0x13ce @0x0
0x13ce…13f5 lno = 0x0686 // 0x13d0 @0x2
0x13ce…13f5 at0004 = ╱9d╱ EXEC ╱ // 0x13d2 @0x4
0x13ce…13f5 at0005 = ╱54╱T╱ // 0x13d3 @0x5
0x13ce…13f5 at0006 = ╱55╱U╱ // 0x13d4 @0x6
0x13ce…13f5 at0007 = ╱44╱D╱ // 0x13d5 @0x7
0x13ce…13f5 at0008 = ╱ed╱(╱ // 0x13d6 @0x8
0x13ce…13f5 at0009 = ╱44╱D╱ // 0x13d7 @0x9
0x13ce…13f5 at000a = ╱53╱S╱ // 0x13d8 @0xa
0x13ce…13f5 at000b = ╱41╱A╱ // 0x13d9 @0xb
0x13ce…13f5 at000c = ╱4c╱L╱ // 0x13da @0xc
0x13ce…13f5 at000d = ╱44╱D╱ // 0x13db @0xd
0x13ce…13f5 at000e = ╱4f╱O╱ // 0x13dc @0xe
0x13ce…13f5 at000f = ╱32╱2╱ // 0x13dd @0xf
0x13ce…13f5 at0010 = ╱ef╱$╱ // 0x13de @0x10
0x13ce…13f5 at0011 = ╱ec╱,╱ // 0x13df @0x11
0x13ce…13f5 at0012 = ╱54╱T╱ // 0x13e0 @0x12
0x13ce…13f5 at0013 = ╱41╱A╱ // 0x13e1 @0x13
0x13ce…13f5 at0014 = ╱4c╱L╱ // 0x13e2 @0x14
0x13ce…13f5 at0015 = ╱34╱4╱ // 0x13e3 @0x15
0x13ce…13f5 at0016 = ╱ef╱$╱ // 0x13e4 @0x16
0x13ce…13f5 at0017 = ╱ec╱,╱ // 0x13e5 @0x17
0x13ce…13f5 at0018 = ╱31╱1╱ // 0x13e6 @0x18
0x13ce…13f5 at0019 = ╱fe00008001╱ // 0x13e7 @0x19
0x13ce…13f5 at001e = ╱ec╱,╱ // 0x13ec @0x1e
0x13ce…13f5 at001f = ╱30╱0╱ // 0x13ed @0x1f
0x13ce…13f5 at0020 = ╱fe00000000╱ // 0x13ee @0x20
0x13ce…13f5 at0025 = ╱ee╱)╱ // 0x13f3 @0x25
0x13ce…13f5 at0026 = EOL // 0x13f4 @0x26
0x13ce…13f5 }
0x13f5…140a a161 1680 CURSOR 41,18
0x13f5…140a LineComalBin {
0x13f5…140a ptr = 0xa161 // 0x13f5 @0x0
0x13f5…140a lno = 0x0690 // 0x13f7 @0x2
0x13f5…140a at0004 = ╱a1╱ CURSOR ╱ // 0x13f9 @0x4
0x13f5…140a at0005 = ╱34╱4╱ // 0x13fa @0x5
0x13f5…140a at0006 = ╱31╱1╱ // 0x13fb @0x6
0x13f5…140a at0007 = ╱fe0000a406╱ // 0x13fc @0x7
0x13f5…140a at000c = ╱ec╱,╱ // 0x1401 @0xc
0x13f5…140a at000d = ╱31╱1╱ // 0x1402 @0xd
0x13f5…140a at000e = ╱38╱8╱ // 0x1403 @0xe
0x13f5…140a at000f = ╱fe00009005╱ // 0x1404 @0xf
0x13f5…140a at0014 = EOL // 0x1409 @0x14
0x13f5…140a }
0x140a…1431 a188 1690 EXEC TUD(DSALDO3$,TAL4$,1,0)
0x140a…1431 LineComalBin {
0x140a…1431 ptr = 0xa188 // 0x140a @0x0
0x140a…1431 lno = 0x069a // 0x140c @0x2
0x140a…1431 at0004 = ╱9d╱ EXEC ╱ // 0x140e @0x4
0x140a…1431 at0005 = ╱54╱T╱ // 0x140f @0x5
0x140a…1431 at0006 = ╱55╱U╱ // 0x1410 @0x6
0x140a…1431 at0007 = ╱44╱D╱ // 0x1411 @0x7
0x140a…1431 at0008 = ╱ed╱(╱ // 0x1412 @0x8
0x140a…1431 at0009 = ╱44╱D╱ // 0x1413 @0x9
0x140a…1431 at000a = ╱53╱S╱ // 0x1414 @0xa
0x140a…1431 at000b = ╱41╱A╱ // 0x1415 @0xb
0x140a…1431 at000c = ╱4c╱L╱ // 0x1416 @0xc
0x140a…1431 at000d = ╱44╱D╱ // 0x1417 @0xd
0x140a…1431 at000e = ╱4f╱O╱ // 0x1418 @0xe
0x140a…1431 at000f = ╱33╱3╱ // 0x1419 @0xf
0x140a…1431 at0010 = ╱ef╱$╱ // 0x141a @0x10
0x140a…1431 at0011 = ╱ec╱,╱ // 0x141b @0x11
0x140a…1431 at0012 = ╱54╱T╱ // 0x141c @0x12
0x140a…1431 at0013 = ╱41╱A╱ // 0x141d @0x13
0x140a…1431 at0014 = ╱4c╱L╱ // 0x141e @0x14
0x140a…1431 at0015 = ╱34╱4╱ // 0x141f @0x15
0x140a…1431 at0016 = ╱ef╱$╱ // 0x1420 @0x16
0x140a…1431 at0017 = ╱ec╱,╱ // 0x1421 @0x17
0x140a…1431 at0018 = ╱31╱1╱ // 0x1422 @0x18
0x140a…1431 at0019 = ╱fe00008001╱ // 0x1423 @0x19
0x140a…1431 at001e = ╱ec╱,╱ // 0x1428 @0x1e
0x140a…1431 at001f = ╱30╱0╱ // 0x1429 @0x1f
0x140a…1431 at0020 = ╱fe00000000╱ // 0x142a @0x20
0x140a…1431 at0025 = ╱ee╱)╱ // 0x142f @0x25
0x140a…1431 at0026 = EOL // 0x1430 @0x26
0x140a…1431 }
0x1431…1446 a19d 1700 CURSOR 57,18
0x1431…1446 LineComalBin {
0x1431…1446 ptr = 0xa19d // 0x1431 @0x0
0x1431…1446 lno = 0x06a4 // 0x1433 @0x2
0x1431…1446 at0004 = ╱a1╱ CURSOR ╱ // 0x1435 @0x4
0x1431…1446 at0005 = ╱35╱5╱ // 0x1436 @0x5
0x1431…1446 at0006 = ╱37╱7╱ // 0x1437 @0x6
0x1431…1446 at0007 = ╱fe0000e406╱ // 0x1438 @0x7
0x1431…1446 at000c = ╱ec╱,╱ // 0x143d @0xc
0x1431…1446 at000d = ╱31╱1╱ // 0x143e @0xd
0x1431…1446 at000e = ╱38╱8╱ // 0x143f @0xe
0x1431…1446 at000f = ╱fe00009005╱ // 0x1440 @0xf
0x1431…1446 at0014 = EOL // 0x1445 @0x14
0x1431…1446 }
0x1446…146d a1c4 1710 EXEC TUD(DSALDO4$,TAL4$,1,0)
0x1446…146d LineComalBin {
0x1446…146d ptr = 0xa1c4 // 0x1446 @0x0
0x1446…146d lno = 0x06ae // 0x1448 @0x2
0x1446…146d at0004 = ╱9d╱ EXEC ╱ // 0x144a @0x4
0x1446…146d at0005 = ╱54╱T╱ // 0x144b @0x5
0x1446…146d at0006 = ╱55╱U╱ // 0x144c @0x6
0x1446…146d at0007 = ╱44╱D╱ // 0x144d @0x7
0x1446…146d at0008 = ╱ed╱(╱ // 0x144e @0x8
0x1446…146d at0009 = ╱44╱D╱ // 0x144f @0x9
0x1446…146d at000a = ╱53╱S╱ // 0x1450 @0xa
0x1446…146d at000b = ╱41╱A╱ // 0x1451 @0xb
0x1446…146d at000c = ╱4c╱L╱ // 0x1452 @0xc
0x1446…146d at000d = ╱44╱D╱ // 0x1453 @0xd
0x1446…146d at000e = ╱4f╱O╱ // 0x1454 @0xe
0x1446…146d at000f = ╱34╱4╱ // 0x1455 @0xf
0x1446…146d at0010 = ╱ef╱$╱ // 0x1456 @0x10
0x1446…146d at0011 = ╱ec╱,╱ // 0x1457 @0x11
0x1446…146d at0012 = ╱54╱T╱ // 0x1458 @0x12
0x1446…146d at0013 = ╱41╱A╱ // 0x1459 @0x13
0x1446…146d at0014 = ╱4c╱L╱ // 0x145a @0x14
0x1446…146d at0015 = ╱34╱4╱ // 0x145b @0x15
0x1446…146d at0016 = ╱ef╱$╱ // 0x145c @0x16
0x1446…146d at0017 = ╱ec╱,╱ // 0x145d @0x17
0x1446…146d at0018 = ╱31╱1╱ // 0x145e @0x18
0x1446…146d at0019 = ╱fe00008001╱ // 0x145f @0x19
0x1446…146d at001e = ╱ec╱,╱ // 0x1464 @0x1e
0x1446…146d at001f = ╱30╱0╱ // 0x1465 @0x1f
0x1446…146d at0020 = ╱fe00000000╱ // 0x1466 @0x20
0x1446…146d at0025 = ╱ee╱)╱ // 0x146b @0x25
0x1446…146d at0026 = EOL // 0x146c @0x26
0x1446…146d }
0x146d…1473 a1ca 1720 ENDIF
0x146d…1473 LineComalBin {
0x146d…1473 ptr = 0xa1ca // 0x146d @0x0
0x146d…1473 lno = 0x06b8 // 0x146f @0x2
0x146d…1473 at0004 = ╱9b╱ ENDIF ╱ // 0x1471 @0x4
0x146d…1473 at0005 = EOL // 0x1472 @0x5
0x146d…1473 }
0x1473…1479 a1d0 1730 ENDPROC
0x1473…1479 LineComalBin {
0x1473…1479 ptr = 0xa1d0 // 0x1473 @0x0
0x1473…1479 lno = 0x06c2 // 0x1475 @0x2
0x1473…1479 at0004 = ╱9f╱ ENDPROC ╱ // 0x1477 @0x4
0x1473…1479 at0005 = EOL // 0x1478 @0x5
0x1473…1479 }
0x1479…1487 a1de 1740 PROC DATOINDT
0x1479…1487 LineComalBin {
0x1479…1487 ptr = 0xa1de // 0x1479 @0x0
0x1479…1487 lno = 0x06cc // 0x147b @0x2
0x1479…1487 at0004 = ╱9e╱ PROC ╱ // 0x147d @0x4
0x1479…1487 at0005 = ╱44╱D╱ // 0x147e @0x5
0x1479…1487 at0006 = ╱41╱A╱ // 0x147f @0x6
0x1479…1487 at0007 = ╱54╱T╱ // 0x1480 @0x7
0x1479…1487 at0008 = ╱4f╱O╱ // 0x1481 @0x8
0x1479…1487 at0009 = ╱49╱I╱ // 0x1482 @0x9
0x1479…1487 at000a = ╱4e╱N╱ // 0x1483 @0xa
0x1479…1487 at000b = ╱44╱D╱ // 0x1484 @0xb
0x1479…1487 at000c = ╱54╱T╱ // 0x1485 @0xc
0x1479…1487 at000d = EOL // 0x1486 @0xd
0x1479…1487 }
0x1487…148d a1e4 1750 REPEAT
0x1487…148d LineComalBin {
0x1487…148d ptr = 0xa1e4 // 0x1487 @0x0
0x1487…148d lno = 0x06d6 // 0x1489 @0x2
0x1487…148d at0004 = ╱97╱ REPEAT ╱ // 0x148b @0x4
0x1487…148d at0005 = EOL // 0x148c @0x5
0x1487…148d }
0x148d…14cd a224 1760 EXEC INDPUT1(64,LINIE,-2,1000000,BLANK$(1))
0x148d…14cd LineComalBin {
0x148d…14cd ptr = 0xa224 // 0x148d @0x0
0x148d…14cd lno = 0x06e0 // 0x148f @0x2
0x148d…14cd at0004 = ╱9d╱ EXEC ╱ // 0x1491 @0x4
0x148d…14cd at0005 = ╱49╱I╱ // 0x1492 @0x5
0x148d…14cd at0006 = ╱4e╱N╱ // 0x1493 @0x6
0x148d…14cd at0007 = ╱44╱D╱ // 0x1494 @0x7
0x148d…14cd at0008 = ╱50╱P╱ // 0x1495 @0x8
0x148d…14cd at0009 = ╱55╱U╱ // 0x1496 @0x9
0x148d…14cd at000a = ╱54╱T╱ // 0x1497 @0xa
0x148d…14cd at000b = ╱31╱1╱ // 0x1498 @0xb
0x148d…14cd at000c = ╱ed╱(╱ // 0x1499 @0xc
0x148d…14cd at000d = ╱36╱6╱ // 0x149a @0xd
0x148d…14cd at000e = ╱34╱4╱ // 0x149b @0xe
0x148d…14cd at000f = ╱fe00008007╱ // 0x149c @0xf
0x148d…14cd at0014 = ╱ec╱,╱ // 0x14a1 @0x14
0x148d…14cd at0015 = ╱4c╱L╱ // 0x14a2 @0x15
0x148d…14cd at0016 = ╱49╱I╱ // 0x14a3 @0x16
0x148d…14cd at0017 = ╱4e╱N╱ // 0x14a4 @0x17
0x148d…14cd at0018 = ╱49╱I╱ // 0x14a5 @0x18
0x148d…14cd at0019 = ╱45╱E╱ // 0x14a6 @0x19
0x148d…14cd at001a = ╱ec╱,╱ // 0x14a7 @0x1a
0x148d…14cd at001b = ╱e9╱-╱ // 0x14a8 @0x1b
0x148d…14cd at001c = ╱32╱2╱ // 0x14a9 @0x1c
0x148d…14cd at001d = ╱fe00008002╱ // 0x14aa @0x1d
0x148d…14cd at0022 = ╱ec╱,╱ // 0x14af @0x22
0x148d…14cd at0023 = ╱31╱1╱ // 0x14b0 @0x23
0x148d…14cd at0024 = ╱30╱0╱ // 0x14b1 @0x24
0x148d…14cd at0025 = ╱30╱0╱ // 0x14b2 @0x25
0x148d…14cd at0026 = ╱30╱0╱ // 0x14b3 @0x26
0x148d…14cd at0027 = ╱30╱0╱ // 0x14b4 @0x27
0x148d…14cd at0028 = ╱30╱0╱ // 0x14b5 @0x28
0x148d…14cd at0029 = ╱30╱0╱ // 0x14b6 @0x29
0x148d…14cd at002a = ╱fe0024f414╱ // 0x14b7 @0x2a
0x148d…14cd at002f = ╱ec╱,╱ // 0x14bc @0x2f
0x148d…14cd at0030 = ╱42╱B╱ // 0x14bd @0x30
0x148d…14cd at0031 = ╱4c╱L╱ // 0x14be @0x31
0x148d…14cd at0032 = ╱41╱A╱ // 0x14bf @0x32
0x148d…14cd at0033 = ╱4e╱N╱ // 0x14c0 @0x33
0x148d…14cd at0034 = ╱4b╱K╱ // 0x14c1 @0x34
0x148d…14cd at0035 = ╱ef╱$╱ // 0x14c2 @0x35
0x148d…14cd at0036 = ╱ed╱(╱ // 0x14c3 @0x36
0x148d…14cd at0037 = ╱31╱1╱ // 0x14c4 @0x37
0x148d…14cd at0038 = ╱fe00008001╱ // 0x14c5 @0x38
0x148d…14cd at003d = ╱ee╱)╱ // 0x14ca @0x3d
0x148d…14cd at003e = ╱ee╱)╱ // 0x14cb @0x3e
0x148d…14cd at003f = EOL // 0x14cc @0x3f
0x148d…14cd }
0x14cd…151a a271 1770 UNTIL KTAL=>80 AND (P DIV 100) MOD 100<13 AND P MOD 100<32 OR P=-1
0x14cd…151a LineComalBin {
0x14cd…151a ptr = 0xa271 // 0x14cd @0x0
0x14cd…151a lno = 0x06ea // 0x14cf @0x2
0x14cd…151a at0004 = ╱98╱ UNTIL ╱ // 0x14d1 @0x4
0x14cd…151a at0005 = ╱4b╱K╱ // 0x14d2 @0x5
0x14cd…151a at0006 = ╱54╱T╱ // 0x14d3 @0x6
0x14cd…151a at0007 = ╱41╱A╱ // 0x14d4 @0x7
0x14cd…151a at0008 = ╱4c╱L╱ // 0x14d5 @0x8
0x14cd…151a at0009 = ╱e0╱=>╱ // 0x14d6 @0x9
0x14cd…151a at000a = ╱38╱8╱ // 0x14d7 @0xa
0x14cd…151a at000b = ╱30╱0╱ // 0x14d8 @0xb
0x14cd…151a at000c = ╱fe0000a007╱ // 0x14d9 @0xc
0x14cd…151a at0011 = ╱da╱ AND ╱ // 0x14de @0x11
0x14cd…151a at0012 = ╱ed╱(╱ // 0x14df @0x12
0x14cd…151a at0013 = ╱50╱P╱ // 0x14e0 @0x13
0x14cd…151a at0014 = ╱e7╱ DIV ╱ // 0x14e1 @0x14
0x14cd…151a at0015 = ╱31╱1╱ // 0x14e2 @0x15
0x14cd…151a at0016 = ╱30╱0╱ // 0x14e3 @0x16
0x14cd…151a at0017 = ╱30╱0╱ // 0x14e4 @0x17
0x14cd…151a at0018 = ╱fe0000c807╱ // 0x14e5 @0x18
0x14cd…151a at001d = ╱ee╱)╱ // 0x14ea @0x1d
0x14cd…151a at001e = ╱e8╱ MOD ╱ // 0x14eb @0x1e
0x14cd…151a at001f = ╱31╱1╱ // 0x14ec @0x1f
0x14cd…151a at0020 = ╱30╱0╱ // 0x14ed @0x20
0x14cd…151a at0021 = ╱30╱0╱ // 0x14ee @0x21
0x14cd…151a at0022 = ╱fe0000c807╱ // 0x14ef @0x22
0x14cd…151a at0027 = ╱dd╱<╱ // 0x14f4 @0x27
0x14cd…151a at0028 = ╱31╱1╱ // 0x14f5 @0x28
0x14cd…151a at0029 = ╱33╱3╱ // 0x14f6 @0x29
0x14cd…151a at002a = ╱fe0000d004╱ // 0x14f7 @0x2a
0x14cd…151a at002f = ╱da╱ AND ╱ // 0x14fc @0x2f
0x14cd…151a at0030 = ╱50╱P╱ // 0x14fd @0x30
0x14cd…151a at0031 = ╱e8╱ MOD ╱ // 0x14fe @0x31
0x14cd…151a at0032 = ╱31╱1╱ // 0x14ff @0x32
0x14cd…151a at0033 = ╱30╱0╱ // 0x1500 @0x33
0x14cd…151a at0034 = ╱30╱0╱ // 0x1501 @0x34
0x14cd…151a at0035 = ╱fe0000c807╱ // 0x1502 @0x35
0x14cd…151a at003a = ╱dd╱<╱ // 0x1507 @0x3a
0x14cd…151a at003b = ╱33╱3╱ // 0x1508 @0x3b
0x14cd…151a at003c = ╱32╱2╱ // 0x1509 @0x3c
0x14cd…151a at003d = ╱fe00008006╱ // 0x150a @0x3d
0x14cd…151a at0042 = ╱db╱ OR ╱ // 0x150f @0x42
0x14cd…151a at0043 = ╱50╱P╱ // 0x1510 @0x43
0x14cd…151a at0044 = ╱dc╱=╱ // 0x1511 @0x44
0x14cd…151a at0045 = ╱e9╱-╱ // 0x1512 @0x45
0x14cd…151a at0046 = ╱31╱1╱ // 0x1513 @0x46
0x14cd…151a at0047 = ╱fe00008001╱ // 0x1514 @0x47
0x14cd…151a at004c = EOL // 0x1519 @0x4c
0x14cd…151a }
0x151a…1524 a27b 1780 DAT=P
0x151a…1524 LineComalBin {
0x151a…1524 ptr = 0xa27b // 0x151a @0x0
0x151a…1524 lno = 0x06f4 // 0x151c @0x2
0x151a…1524 at0004 = ╱44╱D╱ // 0x151e @0x4
0x151a…1524 at0005 = ╱41╱A╱ // 0x151f @0x5
0x151a…1524 at0006 = ╱54╱T╱ // 0x1520 @0x6
0x151a…1524 at0007 = ╱dc╱=╱ // 0x1521 @0x7
0x151a…1524 at0008 = ╱50╱P╱ // 0x1522 @0x8
0x151a…1524 at0009 = EOL // 0x1523 @0x9
0x151a…1524 }
0x1524…153e a295 1790 IF DAT=-1 THEN DAT=DATO
0x1524…153e LineComalBin {
0x1524…153e ptr = 0xa295 // 0x1524 @0x0
0x1524…153e lno = 0x06fe // 0x1526 @0x2
0x1524…153e at0004 = ╱82╱ IF ╱ // 0x1528 @0x4
0x1524…153e at0005 = ╱44╱D╱ // 0x1529 @0x5
0x1524…153e at0006 = ╱41╱A╱ // 0x152a @0x6
0x1524…153e at0007 = ╱54╱T╱ // 0x152b @0x7
0x1524…153e at0008 = ╱dc╱=╱ // 0x152c @0x8
0x1524…153e at0009 = ╱e9╱-╱ // 0x152d @0x9
0x1524…153e at000a = ╱31╱1╱ // 0x152e @0xa
0x1524…153e at000b = ╱fe00008001╱ // 0x152f @0xb
0x1524…153e at0010 = ╱b6╱ THEN ╱ // 0x1534 @0x10
0x1524…153e at0011 = ╱44╱D╱ // 0x1535 @0x11
0x1524…153e at0012 = ╱41╱A╱ // 0x1536 @0x12
0x1524…153e at0013 = ╱54╱T╱ // 0x1537 @0x13
0x1524…153e at0014 = ╱dc╱=╱ // 0x1538 @0x14
0x1524…153e at0015 = ╱44╱D╱ // 0x1539 @0x15
0x1524…153e at0016 = ╱41╱A╱ // 0x153a @0x16
0x1524…153e at0017 = ╱54╱T╱ // 0x153b @0x17
0x1524…153e at0018 = ╱4f╱O╱ // 0x153c @0x18
0x1524…153e at0019 = EOL // 0x153d @0x19
0x1524…153e }
0x153e…1551 a2a8 1800 CURSOR 67,LINIE
0x153e…1551 LineComalBin {
0x153e…1551 ptr = 0xa2a8 // 0x153e @0x0
0x153e…1551 lno = 0x0708 // 0x1540 @0x2
0x153e…1551 at0004 = ╱a1╱ CURSOR ╱ // 0x1542 @0x4
0x153e…1551 at0005 = ╱36╱6╱ // 0x1543 @0x5
0x153e…1551 at0006 = ╱37╱7╱ // 0x1544 @0x6
0x153e…1551 at0007 = ╱fe00008607╱ // 0x1545 @0x7
0x153e…1551 at000c = ╱ec╱,╱ // 0x154a @0xc
0x153e…1551 at000d = ╱4c╱L╱ // 0x154b @0xd
0x153e…1551 at000e = ╱49╱I╱ // 0x154c @0xe
0x153e…1551 at000f = ╱4e╱N╱ // 0x154d @0xf
0x153e…1551 at0010 = ╱49╱I╱ // 0x154e @0x10
0x153e…1551 at0011 = ╱45╱E╱ // 0x154f @0x11
0x153e…1551 at0012 = EOL // 0x1550 @0x12
0x153e…1551 }
0x1551…1562 a2b9 1810 EXEC DATOUD(DAT)
0x1551…1562 LineComalBin {
0x1551…1562 ptr = 0xa2b9 // 0x1551 @0x0
0x1551…1562 lno = 0x0712 // 0x1553 @0x2
0x1551…1562 at0004 = ╱9d╱ EXEC ╱ // 0x1555 @0x4
0x1551…1562 at0005 = ╱44╱D╱ // 0x1556 @0x5
0x1551…1562 at0006 = ╱41╱A╱ // 0x1557 @0x6
0x1551…1562 at0007 = ╱54╱T╱ // 0x1558 @0x7
0x1551…1562 at0008 = ╱4f╱O╱ // 0x1559 @0x8
0x1551…1562 at0009 = ╱55╱U╱ // 0x155a @0x9
0x1551…1562 at000a = ╱44╱D╱ // 0x155b @0xa
0x1551…1562 at000b = ╱ed╱(╱ // 0x155c @0xb
0x1551…1562 at000c = ╱44╱D╱ // 0x155d @0xc
0x1551…1562 at000d = ╱41╱A╱ // 0x155e @0xd
0x1551…1562 at000e = ╱54╱T╱ // 0x155f @0xe
0x1551…1562 at000f = ╱ee╱)╱ // 0x1560 @0xf
0x1551…1562 at0010 = EOL // 0x1561 @0x10
0x1551…1562 }
0x1562…1568 a2bf 1820 ENDPROC
0x1562…1568 LineComalBin {
0x1562…1568 ptr = 0xa2bf // 0x1562 @0x0
0x1562…1568 lno = 0x071c // 0x1564 @0x2
0x1562…1568 at0004 = ╱9f╱ ENDPROC ╱ // 0x1566 @0x4
0x1562…1568 at0005 = EOL // 0x1567 @0x5
0x1562…1568 }
0x1568…1578 a2cf 1830 PROC DATOUD(DA)
0x1568…1578 LineComalBin {
0x1568…1578 ptr = 0xa2cf // 0x1568 @0x0
0x1568…1578 lno = 0x0726 // 0x156a @0x2
0x1568…1578 at0004 = ╱9e╱ PROC ╱ // 0x156c @0x4
0x1568…1578 at0005 = ╱44╱D╱ // 0x156d @0x5
0x1568…1578 at0006 = ╱41╱A╱ // 0x156e @0x6
0x1568…1578 at0007 = ╱54╱T╱ // 0x156f @0x7
0x1568…1578 at0008 = ╱4f╱O╱ // 0x1570 @0x8
0x1568…1578 at0009 = ╱55╱U╱ // 0x1571 @0x9
0x1568…1578 at000a = ╱44╱D╱ // 0x1572 @0xa
0x1568…1578 at000b = ╱ed╱(╱ // 0x1573 @0xb
0x1568…1578 at000c = ╱44╱D╱ // 0x1574 @0xc
0x1568…1578 at000d = ╱41╱A╱ // 0x1575 @0xd
0x1568…1578 at000e = ╱ee╱)╱ // 0x1576 @0xe
0x1568…1578 at000f = EOL // 0x1577 @0xf
0x1568…1578 }
0x1578…15a0 a2f7 1840 PRINT USING "###.##":(DA MOD 10000)/100
0x1578…15a0 LineComalBin {
0x1578…15a0 ptr = 0xa2f7 // 0x1578 @0x0
0x1578…15a0 lno = 0x0730 // 0x157a @0x2
0x1578…15a0 at0004 = ╱92╱ PRINT ╱ // 0x157c @0x4
0x1578…15a0 at0005 = ╱b9╱ USING ╱ // 0x157d @0x5
0x1578…15a0 at0006 = ╱22╱"╱ // 0x157e @0x6
0x1578…15a0 at0007 = ╱23╱#╱ // 0x157f @0x7
0x1578…15a0 at0008 = ╱23╱#╱ // 0x1580 @0x8
0x1578…15a0 at0009 = ╱23╱#╱ // 0x1581 @0x9
0x1578…15a0 at000a = ╱2e╱.╱ // 0x1582 @0xa
0x1578…15a0 at000b = ╱23╱#╱ // 0x1583 @0xb
0x1578…15a0 at000c = ╱23╱#╱ // 0x1584 @0xc
0x1578…15a0 at000d = ╱22╱"╱ // 0x1585 @0xd
0x1578…15a0 at000e = ╱f0╱:╱ // 0x1586 @0xe
0x1578…15a0 at000f = ╱ed╱(╱ // 0x1587 @0xf
0x1578…15a0 at0010 = ╱44╱D╱ // 0x1588 @0x10
0x1578…15a0 at0011 = ╱41╱A╱ // 0x1589 @0x11
0x1578…15a0 at0012 = ╱e8╱ MOD ╱ // 0x158a @0x12
0x1578…15a0 at0013 = ╱31╱1╱ // 0x158b @0x13
0x1578…15a0 at0014 = ╱30╱0╱ // 0x158c @0x14
0x1578…15a0 at0015 = ╱30╱0╱ // 0x158d @0x15
0x1578…15a0 at0016 = ╱30╱0╱ // 0x158e @0x16
0x1578…15a0 at0017 = ╱30╱0╱ // 0x158f @0x17
0x1578…15a0 at0018 = ╱fe00409c0e╱ // 0x1590 @0x18
0x1578…15a0 at001d = ╱ee╱)╱ // 0x1595 @0x1d
0x1578…15a0 at001e = ╱e5╱/╱ // 0x1596 @0x1e
0x1578…15a0 at001f = ╱31╱1╱ // 0x1597 @0x1f
0x1578…15a0 at0020 = ╱30╱0╱ // 0x1598 @0x20
0x1578…15a0 at0021 = ╱30╱0╱ // 0x1599 @0x21
0x1578…15a0 at0022 = ╱fe0000c807╱ // 0x159a @0x22
0x1578…15a0 at0027 = EOL // 0x159f @0x27
0x1578…15a0 }
0x15a0…15b3 a30a 1850 CURSOR 64,LINIE
0x15a0…15b3 LineComalBin {
0x15a0…15b3 ptr = 0xa30a // 0x15a0 @0x0
0x15a0…15b3 lno = 0x073a // 0x15a2 @0x2
0x15a0…15b3 at0004 = ╱a1╱ CURSOR ╱ // 0x15a4 @0x4
0x15a0…15b3 at0005 = ╱36╱6╱ // 0x15a5 @0x5
0x15a0…15b3 at0006 = ╱34╱4╱ // 0x15a6 @0x6
0x15a0…15b3 at0007 = ╱fe00008007╱ // 0x15a7 @0x7
0x15a0…15b3 at000c = ╱ec╱,╱ // 0x15ac @0xc
0x15a0…15b3 at000d = ╱4c╱L╱ // 0x15ad @0xd
0x15a0…15b3 at000e = ╱49╱I╱ // 0x15ae @0xe
0x15a0…15b3 at000f = ╱4e╱N╱ // 0x15af @0xf
0x15a0…15b3 at0010 = ╱49╱I╱ // 0x15b0 @0x10
0x15a0…15b3 at0011 = ╱45╱E╱ // 0x15b1 @0x11
0x15a0…15b3 at0012 = EOL // 0x15b2 @0x12
0x15a0…15b3 }
0x15b3…15d8 a32f 1860 PRINT USING "###.#":(DA DIV 1000)/10
0x15b3…15d8 LineComalBin {
0x15b3…15d8 ptr = 0xa32f // 0x15b3 @0x0
0x15b3…15d8 lno = 0x0744 // 0x15b5 @0x2
0x15b3…15d8 at0004 = ╱92╱ PRINT ╱ // 0x15b7 @0x4
0x15b3…15d8 at0005 = ╱b9╱ USING ╱ // 0x15b8 @0x5
0x15b3…15d8 at0006 = ╱22╱"╱ // 0x15b9 @0x6
0x15b3…15d8 at0007 = ╱23╱#╱ // 0x15ba @0x7
0x15b3…15d8 at0008 = ╱23╱#╱ // 0x15bb @0x8
0x15b3…15d8 at0009 = ╱23╱#╱ // 0x15bc @0x9
0x15b3…15d8 at000a = ╱2e╱.╱ // 0x15bd @0xa
0x15b3…15d8 at000b = ╱23╱#╱ // 0x15be @0xb
0x15b3…15d8 at000c = ╱22╱"╱ // 0x15bf @0xc
0x15b3…15d8 at000d = ╱f0╱:╱ // 0x15c0 @0xd
0x15b3…15d8 at000e = ╱ed╱(╱ // 0x15c1 @0xe
0x15b3…15d8 at000f = ╱44╱D╱ // 0x15c2 @0xf
0x15b3…15d8 at0010 = ╱41╱A╱ // 0x15c3 @0x10
0x15b3…15d8 at0011 = ╱e7╱ DIV ╱ // 0x15c4 @0x11
0x15b3…15d8 at0012 = ╱31╱1╱ // 0x15c5 @0x12
0x15b3…15d8 at0013 = ╱30╱0╱ // 0x15c6 @0x13
0x15b3…15d8 at0014 = ╱30╱0╱ // 0x15c7 @0x14
0x15b3…15d8 at0015 = ╱30╱0╱ // 0x15c8 @0x15
0x15b3…15d8 at0016 = ╱fe0000fa0a╱ // 0x15c9 @0x16
0x15b3…15d8 at001b = ╱ee╱)╱ // 0x15ce @0x1b
0x15b3…15d8 at001c = ╱e5╱/╱ // 0x15cf @0x1c
0x15b3…15d8 at001d = ╱31╱1╱ // 0x15d0 @0x1d
0x15b3…15d8 at001e = ╱30╱0╱ // 0x15d1 @0x1e
0x15b3…15d8 at001f = ╱fe0000a004╱ // 0x15d2 @0x1f
0x15b3…15d8 at0024 = EOL // 0x15d7 @0x24
0x15b3…15d8 }
0x15d8…15de a335 1870 ENDPROC
0x15d8…15de LineComalBin {
0x15d8…15de ptr = 0xa335 // 0x15d8 @0x0
0x15d8…15de lno = 0x074e // 0x15da @0x2
0x15d8…15de at0004 = ╱9f╱ ENDPROC ╱ // 0x15dc @0x4
0x15d8…15de at0005 = EOL // 0x15dd @0x5
0x15d8…15de }
0x15de…15ec a343 1880 PROC FAKHOVED
0x15de…15ec LineComalBin {
0x15de…15ec ptr = 0xa343 // 0x15de @0x0
0x15de…15ec lno = 0x0758 // 0x15e0 @0x2
0x15de…15ec at0004 = ╱9e╱ PROC ╱ // 0x15e2 @0x4
0x15de…15ec at0005 = ╱46╱F╱ // 0x15e3 @0x5
0x15de…15ec at0006 = ╱41╱A╱ // 0x15e4 @0x6
0x15de…15ec at0007 = ╱4b╱K╱ // 0x15e5 @0x7
0x15de…15ec at0008 = ╱48╱H╱ // 0x15e6 @0x8
0x15de…15ec at0009 = ╱4f╱O╱ // 0x15e7 @0x9
0x15de…15ec at000a = ╱56╱V╱ // 0x15e8 @0xa
0x15de…15ec at000b = ╱45╱E╱ // 0x15e9 @0xb
0x15de…15ec at000c = ╱44╱D╱ // 0x15ea @0xc
0x15de…15ec at000d = EOL // 0x15eb @0xd
0x15de…15ec }
0x15ec…15f2 a349 1890 CLEAR
0x15ec…15f2 LineComalBin {
0x15ec…15f2 ptr = 0xa349 // 0x15ec @0x0
0x15ec…15f2 lno = 0x0762 // 0x15ee @0x2
0x15ec…15f2 at0004 = ╱a0╱ CLEAR ╱ // 0x15f0 @0x4
0x15ec…15f2 at0005 = EOL // 0x15f1 @0x5
0x15ec…15f2 }
0x15f2…1605 a35c 1900 CURSOR 2,1
0x15f2…1605 LineComalBin {
0x15f2…1605 ptr = 0xa35c // 0x15f2 @0x0
0x15f2…1605 lno = 0x076c // 0x15f4 @0x2
0x15f2…1605 at0004 = ╱a1╱ CURSOR ╱ // 0x15f6 @0x4
0x15f2…1605 at0005 = ╱32╱2╱ // 0x15f7 @0x5
0x15f2…1605 at0006 = ╱fe00008002╱ // 0x15f8 @0x6
0x15f2…1605 at000b = ╱ec╱,╱ // 0x15fd @0xb
0x15f2…1605 at000c = ╱31╱1╱ // 0x15fe @0xc
0x15f2…1605 at000d = ╱fe00008001╱ // 0x15ff @0xd
0x15f2…1605 at0012 = EOL // 0x1604 @0x12
0x15f2…1605 }
0x1605…162a a381 1910 PRINT USING "Kundenr.:####### ":KUNDENR;
0x1605…162a LineComalBin {
0x1605…162a ptr = 0xa381 // 0x1605 @0x0
0x1605…162a lno = 0x0776 // 0x1607 @0x2
0x1605…162a at0004 = ╱92╱ PRINT ╱ // 0x1609 @0x4
0x1605…162a at0005 = ╱b9╱ USING ╱ // 0x160a @0x5
0x1605…162a at0006 = ╱22╱"╱ // 0x160b @0x6
0x1605…162a at0007 = ╱4b╱K╱ // 0x160c @0x7
0x1605…162a at0008 = ╱75╱u╱ // 0x160d @0x8
0x1605…162a at0009 = ╱6e╱n╱ // 0x160e @0x9
0x1605…162a at000a = ╱64╱d╱ // 0x160f @0xa
0x1605…162a at000b = ╱65╱e╱ // 0x1610 @0xb
0x1605…162a at000c = ╱6e╱n╱ // 0x1611 @0xc
0x1605…162a at000d = ╱72╱r╱ // 0x1612 @0xd
0x1605…162a at000e = ╱2e╱.╱ // 0x1613 @0xe
0x1605…162a at000f = ╱3a╱:╱ // 0x1614 @0xf
0x1605…162a at0010 = ╱23╱#╱ // 0x1615 @0x10
0x1605…162a at0011 = ╱23╱#╱ // 0x1616 @0x11
0x1605…162a at0012 = ╱23╱#╱ // 0x1617 @0x12
0x1605…162a at0013 = ╱23╱#╱ // 0x1618 @0x13
0x1605…162a at0014 = ╱23╱#╱ // 0x1619 @0x14
0x1605…162a at0015 = ╱23╱#╱ // 0x161a @0x15
0x1605…162a at0016 = ╱23╱#╱ // 0x161b @0x16
0x1605…162a at0017 = ╱20╱…╱ // 0x161c @0x17
0x1605…162a at0018 = ╱20╱…╱ // 0x161d @0x18
0x1605…162a at0019 = ╱20╱…╱ // 0x161e @0x19
0x1605…162a at001a = ╱22╱"╱ // 0x161f @0x1a
0x1605…162a at001b = ╱f0╱:╱ // 0x1620 @0x1b
0x1605…162a at001c = ╱4b╱K╱ // 0x1621 @0x1c
0x1605…162a at001d = ╱55╱U╱ // 0x1622 @0x1d
0x1605…162a at001e = ╱4e╱N╱ // 0x1623 @0x1e
0x1605…162a at001f = ╱44╱D╱ // 0x1624 @0x1f
0x1605…162a at0020 = ╱45╱E╱ // 0x1625 @0x20
0x1605…162a at0021 = ╱4e╱N╱ // 0x1626 @0x21
0x1605…162a at0022 = ╱52╱R╱ // 0x1627 @0x22
0x1605…162a at0023 = ╱eb╱;╱ // 0x1628 @0x23
0x1605…162a at0024 = EOL // 0x1629 @0x24
0x1605…162a }
0x162a…163f a396 1920 PRINT " ";DEBNAVN$
0x162a…163f LineComalBin {
0x162a…163f ptr = 0xa396 // 0x162a @0x0
0x162a…163f lno = 0x0780 // 0x162c @0x2
0x162a…163f at0004 = ╱92╱ PRINT ╱ // 0x162e @0x4
0x162a…163f at0005 = ╱22╱"╱ // 0x162f @0x5
0x162a…163f at0006 = ╱20╱…╱ // 0x1630 @0x6
0x162a…163f at0007 = ╱20╱…╱ // 0x1631 @0x7
0x162a…163f at0008 = ╱20╱…╱ // 0x1632 @0x8
0x162a…163f at0009 = ╱20╱…╱ // 0x1633 @0x9
0x162a…163f at000a = ╱22╱"╱ // 0x1634 @0xa
0x162a…163f at000b = ╱eb╱;╱ // 0x1635 @0xb
0x162a…163f at000c = ╱44╱D╱ // 0x1636 @0xc
0x162a…163f at000d = ╱45╱E╱ // 0x1637 @0xd
0x162a…163f at000e = ╱42╱B╱ // 0x1638 @0xe
0x162a…163f at000f = ╱4e╱N╱ // 0x1639 @0xf
0x162a…163f at0010 = ╱41╱A╱ // 0x163a @0x10
0x162a…163f at0011 = ╱56╱V╱ // 0x163b @0x11
0x162a…163f at0012 = ╱4e╱N╱ // 0x163c @0x12
0x162a…163f at0013 = ╱ef╱$╱ // 0x163d @0x13
0x162a…163f at0014 = EOL // 0x163e @0x14
0x162a…163f }
0x163f…1653 a3aa 1930 CURSOR 54,1
0x163f…1653 LineComalBin {
0x163f…1653 ptr = 0xa3aa // 0x163f @0x0
0x163f…1653 lno = 0x078a // 0x1641 @0x2
0x163f…1653 at0004 = ╱a1╱ CURSOR ╱ // 0x1643 @0x4
0x163f…1653 at0005 = ╱35╱5╱ // 0x1644 @0x5
0x163f…1653 at0006 = ╱34╱4╱ // 0x1645 @0x6
0x163f…1653 at0007 = ╱fe0000d806╱ // 0x1646 @0x7
0x163f…1653 at000c = ╱ec╱,╱ // 0x164b @0xc
0x163f…1653 at000d = ╱31╱1╱ // 0x164c @0xd
0x163f…1653 at000e = ╱fe00008001╱ // 0x164d @0xe
0x163f…1653 at0013 = EOL // 0x1652 @0x13
0x163f…1653 }
0x1653…1665 a3bc 1940 IF FAKKRE$="F" THEN
0x1653…1665 LineComalBin {
0x1653…1665 ptr = 0xa3bc // 0x1653 @0x0
0x1653…1665 lno = 0x0794 // 0x1655 @0x2
0x1653…1665 at0004 = ╱9c╱ IF ╱ // 0x1657 @0x4
0x1653…1665 at0005 = ╱46╱F╱ // 0x1658 @0x5
0x1653…1665 at0006 = ╱41╱A╱ // 0x1659 @0x6
0x1653…1665 at0007 = ╱4b╱K╱ // 0x165a @0x7
0x1653…1665 at0008 = ╱4b╱K╱ // 0x165b @0x8
0x1653…1665 at0009 = ╱52╱R╱ // 0x165c @0x9
0x1653…1665 at000a = ╱45╱E╱ // 0x165d @0xa
0x1653…1665 at000b = ╱ef╱$╱ // 0x165e @0xb
0x1653…1665 at000c = ╱dc╱=╱ // 0x165f @0xc
0x1653…1665 at000d = ╱22╱"╱ // 0x1660 @0xd
0x1653…1665 at000e = ╱46╱F╱ // 0x1661 @0xe
0x1653…1665 at000f = ╱22╱"╱ // 0x1662 @0xf
0x1653…1665 at0010 = ╱b6╱ THEN ╱ // 0x1663 @0x10
0x1653…1665 at0011 = EOL // 0x1664 @0x11
0x1653…1665 }
0x1665…1692 a3e9 1950 PRINT USING "Fakturanr.: #######":FAKTNR+AFAKT
0x1665…1692 LineComalBin {
0x1665…1692 ptr = 0xa3e9 // 0x1665 @0x0
0x1665…1692 lno = 0x079e // 0x1667 @0x2
0x1665…1692 at0004 = ╱92╱ PRINT ╱ // 0x1669 @0x4
0x1665…1692 at0005 = ╱b9╱ USING ╱ // 0x166a @0x5
0x1665…1692 at0006 = ╱22╱"╱ // 0x166b @0x6
0x1665…1692 at0007 = ╱46╱F╱ // 0x166c @0x7
0x1665…1692 at0008 = ╱61╱a╱ // 0x166d @0x8
0x1665…1692 at0009 = ╱6b╱k╱ // 0x166e @0x9
0x1665…1692 at000a = ╱74╱t╱ // 0x166f @0xa
0x1665…1692 at000b = ╱75╱u╱ // 0x1670 @0xb
0x1665…1692 at000c = ╱72╱r╱ // 0x1671 @0xc
0x1665…1692 at000d = ╱61╱a╱ // 0x1672 @0xd
0x1665…1692 at000e = ╱6e╱n╱ // 0x1673 @0xe
0x1665…1692 at000f = ╱72╱r╱ // 0x1674 @0xf
0x1665…1692 at0010 = ╱2e╱.╱ // 0x1675 @0x10
0x1665…1692 at0011 = ╱3a╱:╱ // 0x1676 @0x11
0x1665…1692 at0012 = ╱20╱…╱ // 0x1677 @0x12
0x1665…1692 at0013 = ╱20╱…╱ // 0x1678 @0x13
0x1665…1692 at0014 = ╱20╱…╱ // 0x1679 @0x14
0x1665…1692 at0015 = ╱20╱…╱ // 0x167a @0x15
0x1665…1692 at0016 = ╱20╱…╱ // 0x167b @0x16
0x1665…1692 at0017 = ╱23╱#╱ // 0x167c @0x17
0x1665…1692 at0018 = ╱23╱#╱ // 0x167d @0x18
0x1665…1692 at0019 = ╱23╱#╱ // 0x167e @0x19
0x1665…1692 at001a = ╱23╱#╱ // 0x167f @0x1a
0x1665…1692 at001b = ╱23╱#╱ // 0x1680 @0x1b
0x1665…1692 at001c = ╱23╱#╱ // 0x1681 @0x1c
0x1665…1692 at001d = ╱23╱#╱ // 0x1682 @0x1d
0x1665…1692 at001e = ╱22╱"╱ // 0x1683 @0x1e
0x1665…1692 at001f = ╱f0╱:╱ // 0x1684 @0x1f
0x1665…1692 at0020 = ╱46╱F╱ // 0x1685 @0x20
0x1665…1692 at0021 = ╱41╱A╱ // 0x1686 @0x21
0x1665…1692 at0022 = ╱4b╱K╱ // 0x1687 @0x22
0x1665…1692 at0023 = ╱54╱T╱ // 0x1688 @0x23
0x1665…1692 at0024 = ╱4e╱N╱ // 0x1689 @0x24
0x1665…1692 at0025 = ╱52╱R╱ // 0x168a @0x25
0x1665…1692 at0026 = ╱e2╱+╱ // 0x168b @0x26
0x1665…1692 at0027 = ╱41╱A╱ // 0x168c @0x27
0x1665…1692 at0028 = ╱46╱F╱ // 0x168d @0x28
0x1665…1692 at0029 = ╱41╱A╱ // 0x168e @0x29
0x1665…1692 at002a = ╱4b╱K╱ // 0x168f @0x2a
0x1665…1692 at002b = ╱54╱T╱ // 0x1690 @0x2b
0x1665…1692 at002c = EOL // 0x1691 @0x2c
0x1665…1692 }
0x1692…1698 a3ef 1960 ELSE
0x1692…1698 LineComalBin {
0x1692…1698 ptr = 0xa3ef // 0x1692 @0x0
0x1692…1698 lno = 0x07a8 // 0x1694 @0x2
0x1692…1698 at0004 = ╱9a╱ ELSE ╱ // 0x1696 @0x4
0x1692…1698 at0005 = EOL // 0x1697 @0x5
0x1692…1698 }
0x1698…16c4 a41b 1970 PRINT USING "Kreditnotanr.: ######":KREDNR+AKRED
0x1698…16c4 LineComalBin {
0x1698…16c4 ptr = 0xa41b // 0x1698 @0x0
0x1698…16c4 lno = 0x07b2 // 0x169a @0x2
0x1698…16c4 at0004 = ╱92╱ PRINT ╱ // 0x169c @0x4
0x1698…16c4 at0005 = ╱b9╱ USING ╱ // 0x169d @0x5
0x1698…16c4 at0006 = ╱22╱"╱ // 0x169e @0x6
0x1698…16c4 at0007 = ╱4b╱K╱ // 0x169f @0x7
0x1698…16c4 at0008 = ╱72╱r╱ // 0x16a0 @0x8
0x1698…16c4 at0009 = ╱65╱e╱ // 0x16a1 @0x9
0x1698…16c4 at000a = ╱64╱d╱ // 0x16a2 @0xa
0x1698…16c4 at000b = ╱69╱i╱ // 0x16a3 @0xb
0x1698…16c4 at000c = ╱74╱t╱ // 0x16a4 @0xc
0x1698…16c4 at000d = ╱6e╱n╱ // 0x16a5 @0xd
0x1698…16c4 at000e = ╱6f╱o╱ // 0x16a6 @0xe
0x1698…16c4 at000f = ╱74╱t╱ // 0x16a7 @0xf
0x1698…16c4 at0010 = ╱61╱a╱ // 0x16a8 @0x10
0x1698…16c4 at0011 = ╱6e╱n╱ // 0x16a9 @0x11
0x1698…16c4 at0012 = ╱72╱r╱ // 0x16aa @0x12
0x1698…16c4 at0013 = ╱2e╱.╱ // 0x16ab @0x13
0x1698…16c4 at0014 = ╱3a╱:╱ // 0x16ac @0x14
0x1698…16c4 at0015 = ╱20╱…╱ // 0x16ad @0x15
0x1698…16c4 at0016 = ╱20╱…╱ // 0x16ae @0x16
0x1698…16c4 at0017 = ╱23╱#╱ // 0x16af @0x17
0x1698…16c4 at0018 = ╱23╱#╱ // 0x16b0 @0x18
0x1698…16c4 at0019 = ╱23╱#╱ // 0x16b1 @0x19
0x1698…16c4 at001a = ╱23╱#╱ // 0x16b2 @0x1a
0x1698…16c4 at001b = ╱23╱#╱ // 0x16b3 @0x1b
0x1698…16c4 at001c = ╱23╱#╱ // 0x16b4 @0x1c
0x1698…16c4 at001d = ╱22╱"╱ // 0x16b5 @0x1d
0x1698…16c4 at001e = ╱f0╱:╱ // 0x16b6 @0x1e
0x1698…16c4 at001f = ╱4b╱K╱ // 0x16b7 @0x1f
0x1698…16c4 at0020 = ╱52╱R╱ // 0x16b8 @0x20
0x1698…16c4 at0021 = ╱45╱E╱ // 0x16b9 @0x21
0x1698…16c4 at0022 = ╱44╱D╱ // 0x16ba @0x22
0x1698…16c4 at0023 = ╱4e╱N╱ // 0x16bb @0x23
0x1698…16c4 at0024 = ╱52╱R╱ // 0x16bc @0x24
0x1698…16c4 at0025 = ╱e2╱+╱ // 0x16bd @0x25
0x1698…16c4 at0026 = ╱41╱A╱ // 0x16be @0x26
0x1698…16c4 at0027 = ╱4b╱K╱ // 0x16bf @0x27
0x1698…16c4 at0028 = ╱52╱R╱ // 0x16c0 @0x28
0x1698…16c4 at0029 = ╱45╱E╱ // 0x16c1 @0x29
0x1698…16c4 at002a = ╱44╱D╱ // 0x16c2 @0x2a
0x1698…16c4 at002b = EOL // 0x16c3 @0x2b
0x1698…16c4 }
0x16c4…16ca a421 1980 ENDIF
0x16c4…16ca LineComalBin {
0x16c4…16ca ptr = 0xa421 // 0x16c4 @0x0
0x16c4…16ca lno = 0x07bc // 0x16c6 @0x2
0x16c4…16ca at0004 = ╱9b╱ ENDIF ╱ // 0x16c8 @0x4
0x16c4…16ca at0005 = EOL // 0x16c9 @0x5
0x16c4…16ca }
0x16ca…16dd a434 1990 CURSOR 2,3
0x16ca…16dd LineComalBin {
0x16ca…16dd ptr = 0xa434 // 0x16ca @0x0
0x16ca…16dd lno = 0x07c6 // 0x16cc @0x2
0x16ca…16dd at0004 = ╱a1╱ CURSOR ╱ // 0x16ce @0x4
0x16ca…16dd at0005 = ╱32╱2╱ // 0x16cf @0x5
0x16ca…16dd at0006 = ╱fe00008002╱ // 0x16d0 @0x6
0x16ca…16dd at000b = ╱ec╱,╱ // 0x16d5 @0xb
0x16ca…16dd at000c = ╱33╱3╱ // 0x16d6 @0xc
0x16ca…16dd at000d = ╱fe0000c002╱ // 0x16d7 @0xd
0x16ca…16dd at0012 = EOL // 0x16dc @0x12
0x16ca…16dd }
0x16dd…1701 a458 2000 PRINT "Linie Vr.nr. Antal Tekst";
0x16dd…1701 LineComalBin {
0x16dd…1701 ptr = 0xa458 // 0x16dd @0x0
0x16dd…1701 lno = 0x07d0 // 0x16df @0x2
0x16dd…1701 at0004 = ╱92╱ PRINT ╱ // 0x16e1 @0x4
0x16dd…1701 at0005 = ╱22╱"╱ // 0x16e2 @0x5
0x16dd…1701 at0006 = ╱4c╱L╱ // 0x16e3 @0x6
0x16dd…1701 at0007 = ╱69╱i╱ // 0x16e4 @0x7
0x16dd…1701 at0008 = ╱6e╱n╱ // 0x16e5 @0x8
0x16dd…1701 at0009 = ╱69╱i╱ // 0x16e6 @0x9
0x16dd…1701 at000a = ╱65╱e╱ // 0x16e7 @0xa
0x16dd…1701 at000b = ╱20╱…╱ // 0x16e8 @0xb
0x16dd…1701 at000c = ╱20╱…╱ // 0x16e9 @0xc
0x16dd…1701 at000d = ╱56╱V╱ // 0x16ea @0xd
0x16dd…1701 at000e = ╱72╱r╱ // 0x16eb @0xe
0x16dd…1701 at000f = ╱2e╱.╱ // 0x16ec @0xf
0x16dd…1701 at0010 = ╱6e╱n╱ // 0x16ed @0x10
0x16dd…1701 at0011 = ╱72╱r╱ // 0x16ee @0x11
0x16dd…1701 at0012 = ╱2e╱.╱ // 0x16ef @0x12
0x16dd…1701 at0013 = ╱20╱…╱ // 0x16f0 @0x13
0x16dd…1701 at0014 = ╱20╱…╱ // 0x16f1 @0x14
0x16dd…1701 at0015 = ╱41╱A╱ // 0x16f2 @0x15
0x16dd…1701 at0016 = ╱6e╱n╱ // 0x16f3 @0x16
0x16dd…1701 at0017 = ╱74╱t╱ // 0x16f4 @0x17
0x16dd…1701 at0018 = ╱61╱a╱ // 0x16f5 @0x18
0x16dd…1701 at0019 = ╱6c╱l╱ // 0x16f6 @0x19
0x16dd…1701 at001a = ╱20╱…╱ // 0x16f7 @0x1a
0x16dd…1701 at001b = ╱20╱…╱ // 0x16f8 @0x1b
0x16dd…1701 at001c = ╱54╱T╱ // 0x16f9 @0x1c
0x16dd…1701 at001d = ╱65╱e╱ // 0x16fa @0x1d
0x16dd…1701 at001e = ╱6b╱k╱ // 0x16fb @0x1e
0x16dd…1701 at001f = ╱73╱s╱ // 0x16fc @0x1f
0x16dd…1701 at0020 = ╱74╱t╱ // 0x16fd @0x20
0x16dd…1701 at0021 = ╱22╱"╱ // 0x16fe @0x21
0x16dd…1701 at0022 = ╱eb╱;╱ // 0x16ff @0x22
0x16dd…1701 at0023 = EOL // 0x1700 @0x23
0x16dd…1701 }
0x1701…1715 a46c 2010 CURSOR 56,3
0x1701…1715 LineComalBin {
0x1701…1715 ptr = 0xa46c // 0x1701 @0x0
0x1701…1715 lno = 0x07da // 0x1703 @0x2
0x1701…1715 at0004 = ╱a1╱ CURSOR ╱ // 0x1705 @0x4
0x1701…1715 at0005 = ╱35╱5╱ // 0x1706 @0x5
0x1701…1715 at0006 = ╱36╱6╱ // 0x1707 @0x6
0x1701…1715 at0007 = ╱fe0000e006╱ // 0x1708 @0x7
0x1701…1715 at000c = ╱ec╱,╱ // 0x170d @0xc
0x1701…1715 at000d = ╱33╱3╱ // 0x170e @0xd
0x1701…1715 at000e = ╱fe0000c002╱ // 0x170f @0xe
0x1701…1715 at0013 = EOL // 0x1714 @0x13
0x1701…1715 }
0x1715…1730 a487 2020 PRINT "Pris Beløb"
0x1715…1730 LineComalBin {
0x1715…1730 ptr = 0xa487 // 0x1715 @0x0
0x1715…1730 lno = 0x07e4 // 0x1717 @0x2
0x1715…1730 at0004 = ╱92╱ PRINT ╱ // 0x1719 @0x4
0x1715…1730 at0005 = ╱22╱"╱ // 0x171a @0x5
0x1715…1730 at0006 = ╱50╱P╱ // 0x171b @0x6
0x1715…1730 at0007 = ╱72╱r╱ // 0x171c @0x7
0x1715…1730 at0008 = ╱69╱i╱ // 0x171d @0x8
0x1715…1730 at0009 = ╱73╱s╱ // 0x171e @0x9
0x1715…1730 at000a = ╱20╱…╱ // 0x171f @0xa
0x1715…1730 at000b = ╱20╱…╱ // 0x1720 @0xb
0x1715…1730 at000c = ╱20╱…╱ // 0x1721 @0xc
0x1715…1730 at000d = ╱20╱…╱ // 0x1722 @0xd
0x1715…1730 at000e = ╱20╱…╱ // 0x1723 @0xe
0x1715…1730 at000f = ╱20╱…╱ // 0x1724 @0xf
0x1715…1730 at0010 = ╱20╱…╱ // 0x1725 @0x10
0x1715…1730 at0011 = ╱20╱…╱ // 0x1726 @0x11
0x1715…1730 at0012 = ╱20╱…╱ // 0x1727 @0x12
0x1715…1730 at0013 = ╱20╱…╱ // 0x1728 @0x13
0x1715…1730 at0014 = ╱42╱B╱ // 0x1729 @0x14
0x1715…1730 at0015 = ╱65╱e╱ // 0x172a @0x15
0x1715…1730 at0016 = ╱6c╱l╱ // 0x172b @0x16
0x1715…1730 at0017 = ╱7c╱ø╱ // 0x172c @0x17
0x1715…1730 at0018 = ╱62╱b╱ // 0x172d @0x18
0x1715…1730 at0019 = ╱22╱"╱ // 0x172e @0x19
0x1715…1730 at001a = EOL // 0x172f @0x1a
0x1715…1730 }
0x1730…1741 a498 2030 LINIE=5
0x1730…1741 LineComalBin {
0x1730…1741 ptr = 0xa498 // 0x1730 @0x0
0x1730…1741 lno = 0x07ee // 0x1732 @0x2
0x1730…1741 at0004 = ╱4c╱L╱ // 0x1734 @0x4
0x1730…1741 at0005 = ╱49╱I╱ // 0x1735 @0x5
0x1730…1741 at0006 = ╱4e╱N╱ // 0x1736 @0x6
0x1730…1741 at0007 = ╱49╱I╱ // 0x1737 @0x7
0x1730…1741 at0008 = ╱45╱E╱ // 0x1738 @0x8
0x1730…1741 at0009 = ╱dc╱=╱ // 0x1739 @0x9
0x1730…1741 at000a = ╱35╱5╱ // 0x173a @0xa
0x1730…1741 at000b = ╱fe0000a003╱ // 0x173b @0xb
0x1730…1741 at0010 = EOL // 0x1740 @0x10
0x1730…1741 }
0x1741…1747 a49e 2040 ENDPROC
0x1741…1747 LineComalBin {
0x1741…1747 ptr = 0xa49e // 0x1741 @0x0
0x1741…1747 lno = 0x07f8 // 0x1743 @0x2
0x1741…1747 at0004 = ╱9f╱ ENDPROC ╱ // 0x1745 @0x4
0x1741…1747 at0005 = EOL // 0x1746 @0x5
0x1741…1747 }
0x1747…1755 a4ac 2050 PROC VARELINI
0x1747…1755 LineComalBin {
0x1747…1755 ptr = 0xa4ac // 0x1747 @0x0
0x1747…1755 lno = 0x0802 // 0x1749 @0x2
0x1747…1755 at0004 = ╱9e╱ PROC ╱ // 0x174b @0x4
0x1747…1755 at0005 = ╱56╱V╱ // 0x174c @0x5
0x1747…1755 at0006 = ╱41╱A╱ // 0x174d @0x6
0x1747…1755 at0007 = ╱52╱R╱ // 0x174e @0x7
0x1747…1755 at0008 = ╱45╱E╱ // 0x174f @0x8
0x1747…1755 at0009 = ╱4c╱L╱ // 0x1750 @0x9
0x1747…1755 at000a = ╱49╱I╱ // 0x1751 @0xa
0x1747…1755 at000b = ╱4e╱N╱ // 0x1752 @0xb
0x1747…1755 at000c = ╱49╱I╱ // 0x1753 @0xc
0x1747…1755 at000d = EOL // 0x1754 @0xd
0x1747…1755 }
0x1755…175b a4b2 2060 REPEAT
0x1755…175b LineComalBin {
0x1755…175b ptr = 0xa4b2 // 0x1755 @0x0
0x1755…175b lno = 0x080c // 0x1757 @0x2
0x1755…175b at0004 = ╱97╱ REPEAT ╱ // 0x1759 @0x4
0x1755…175b at0005 = EOL // 0x175a @0x5
0x1755…175b }
0x175b…177b a4d2 2070 FE6=0;VARTEKST$=BLANK$
0x175b…177b LineComalBin {
0x175b…177b ptr = 0xa4d2 // 0x175b @0x0
0x175b…177b lno = 0x0816 // 0x175d @0x2
0x175b…177b at0004 = ╱46╱F╱ // 0x175f @0x4
0x175b…177b at0005 = ╱45╱E╱ // 0x1760 @0x5
0x175b…177b at0006 = ╱36╱6╱ // 0x1761 @0x6
0x175b…177b at0007 = ╱dc╱=╱ // 0x1762 @0x7
0x175b…177b at0008 = ╱30╱0╱ // 0x1763 @0x8
0x175b…177b at0009 = ╱fe00000000╱ // 0x1764 @0x9
0x175b…177b at000e = ╱eb╱;╱ // 0x1769 @0xe
0x175b…177b at000f = ╱56╱V╱ // 0x176a @0xf
0x175b…177b at0010 = ╱41╱A╱ // 0x176b @0x10
0x175b…177b at0011 = ╱52╱R╱ // 0x176c @0x11
0x175b…177b at0012 = ╱54╱T╱ // 0x176d @0x12
0x175b…177b at0013 = ╱45╱E╱ // 0x176e @0x13
0x175b…177b at0014 = ╱4b╱K╱ // 0x176f @0x14
0x175b…177b at0015 = ╱53╱S╱ // 0x1770 @0x15
0x175b…177b at0016 = ╱54╱T╱ // 0x1771 @0x16
0x175b…177b at0017 = ╱ef╱$╱ // 0x1772 @0x17
0x175b…177b at0018 = ╱dc╱=╱ // 0x1773 @0x18
0x175b…177b at0019 = ╱42╱B╱ // 0x1774 @0x19
0x175b…177b at001a = ╱4c╱L╱ // 0x1775 @0x1a
0x175b…177b at001b = ╱41╱A╱ // 0x1776 @0x1b
0x175b…177b at001c = ╱4e╱N╱ // 0x1777 @0x1c
0x175b…177b at001d = ╱4b╱K╱ // 0x1778 @0x1d
0x175b…177b at001e = ╱ef╱$╱ // 0x1779 @0x1e
0x175b…177b at001f = EOL // 0x177a @0x1f
0x175b…177b }
0x177b…178d a4e4 2080 CURSOR 3,LINIE
0x177b…178d LineComalBin {
0x177b…178d ptr = 0xa4e4 // 0x177b @0x0
0x177b…178d lno = 0x0820 // 0x177d @0x2
0x177b…178d at0004 = ╱a1╱ CURSOR ╱ // 0x177f @0x4
0x177b…178d at0005 = ╱33╱3╱ // 0x1780 @0x5
0x177b…178d at0006 = ╱fe0000c002╱ // 0x1781 @0x6
0x177b…178d at000b = ╱ec╱,╱ // 0x1786 @0xb
0x177b…178d at000c = ╱4c╱L╱ // 0x1787 @0xc
0x177b…178d at000d = ╱49╱I╱ // 0x1788 @0xd
0x177b…178d at000e = ╱4e╱N╱ // 0x1789 @0xe
0x177b…178d at000f = ╱49╱I╱ // 0x178a @0xf
0x177b…178d at0010 = ╱45╱E╱ // 0x178b @0x10
0x177b…178d at0011 = EOL // 0x178c @0x11
0x177b…178d }
0x178d…17a1 a4f8 2090 PRINT USING "###":AVALIN;
0x178d…17a1 LineComalBin {
0x178d…17a1 ptr = 0xa4f8 // 0x178d @0x0
0x178d…17a1 lno = 0x082a // 0x178f @0x2
0x178d…17a1 at0004 = ╱92╱ PRINT ╱ // 0x1791 @0x4
0x178d…17a1 at0005 = ╱b9╱ USING ╱ // 0x1792 @0x5
0x178d…17a1 at0006 = ╱22╱"╱ // 0x1793 @0x6
0x178d…17a1 at0007 = ╱23╱#╱ // 0x1794 @0x7
0x178d…17a1 at0008 = ╱23╱#╱ // 0x1795 @0x8
0x178d…17a1 at0009 = ╱23╱#╱ // 0x1796 @0x9
0x178d…17a1 at000a = ╱22╱"╱ // 0x1797 @0xa
0x178d…17a1 at000b = ╱f0╱:╱ // 0x1798 @0xb
0x178d…17a1 at000c = ╱41╱A╱ // 0x1799 @0xc
0x178d…17a1 at000d = ╱56╱V╱ // 0x179a @0xd
0x178d…17a1 at000e = ╱41╱A╱ // 0x179b @0xe
0x178d…17a1 at000f = ╱4c╱L╱ // 0x179c @0xf
0x178d…17a1 at0010 = ╱49╱I╱ // 0x179d @0x10
0x178d…17a1 at0011 = ╱4e╱N╱ // 0x179e @0x11
0x178d…17a1 at0012 = ╱eb╱;╱ // 0x179f @0x12
0x178d…17a1 at0013 = EOL // 0x17a0 @0x13
0x178d…17a1 }
0x17a1…17bd a514 2100 PRINT BLANK$(1:55)
0x17a1…17bd LineComalBin {
0x17a1…17bd ptr = 0xa514 // 0x17a1 @0x0
0x17a1…17bd lno = 0x0834 // 0x17a3 @0x2
0x17a1…17bd at0004 = ╱92╱ PRINT ╱ // 0x17a5 @0x4
0x17a1…17bd at0005 = ╱42╱B╱ // 0x17a6 @0x5
0x17a1…17bd at0006 = ╱4c╱L╱ // 0x17a7 @0x6
0x17a1…17bd at0007 = ╱41╱A╱ // 0x17a8 @0x7
0x17a1…17bd at0008 = ╱4e╱N╱ // 0x17a9 @0x8
0x17a1…17bd at0009 = ╱4b╱K╱ // 0x17aa @0x9
0x17a1…17bd at000a = ╱ef╱$╱ // 0x17ab @0xa
0x17a1…17bd at000b = ╱ed╱(╱ // 0x17ac @0xb
0x17a1…17bd at000c = ╱31╱1╱ // 0x17ad @0xc
0x17a1…17bd at000d = ╱fe00008001╱ // 0x17ae @0xd
0x17a1…17bd at0012 = ╱f0╱:╱ // 0x17b3 @0x12
0x17a1…17bd at0013 = ╱35╱5╱ // 0x17b4 @0x13
0x17a1…17bd at0014 = ╱35╱5╱ // 0x17b5 @0x14
0x17a1…17bd at0015 = ╱fe0000dc06╱ // 0x17b6 @0x15
0x17a1…17bd at001a = ╱ee╱)╱ // 0x17bb @0x1a
0x17a1…17bd at001b = EOL // 0x17bc @0x1b
0x17a1…17bd }
0x17bd…17c3 a51a 2110 REPEAT
0x17bd…17c3 LineComalBin {
0x17bd…17c3 ptr = 0xa51a // 0x17bd @0x0
0x17bd…17c3 lno = 0x083e // 0x17bf @0x2
0x17bd…17c3 at0004 = ╱97╱ REPEAT ╱ // 0x17c1 @0x4
0x17bd…17c3 at0005 = EOL // 0x17c2 @0x5
0x17bd…17c3 }
0x17c3…1802 (79,) a559 2120 EXEC INDPUT1(8,LINIE,-1,1000000,BLANK$(1))
0x17c3…1802 LineComalBin {
0x17c3…1802 ptr = 0xa559 // 0x17c3 @0x0
0x17c3…1802 lno = 0x0848 // 0x17c5 @0x2
0x17c3…1802 at0004 = ╱9d╱ EXEC ╱ // 0x17c7 @0x4
0x17c3…1802 at0005 = ╱49╱I╱ // 0x17c8 @0x5
0x17c3…1802 at0006 = ╱4e╱N╱ // 0x17c9 @0x6
0x17c3…1802 at0007 = ╱44╱D╱ // 0x17ca @0x7
0x17c3…1802 at0008 = ╱50╱P╱ // 0x17cb @0x8
0x17c3…1802 at0009 = ╱55╱U╱ // 0x17cc @0x9
0x17c3…1802 at000a = ╱54╱T╱ // 0x17cd @0xa
0x17c3…1802 at000b = ╱31╱1╱ // 0x17ce @0xb
0x17c3…1802 at000c = ╱ed╱(╱ // 0x17cf @0xc
0x17c3…1802 at000d = ╱38╱8╱ // 0x17d0 @0xd
0x17c3…1802 at000e = ╱fe00008004╱ // 0x17d1 @0xe
0x17c3…1802 at0013 = ╱ec╱,╱ // 0x17d6 @0x13
0x17c3…1802 at0014 = ╱4c╱L╱ // 0x17d7 @0x14
0x17c3…1802 at0015 = ╱49╱I╱ // 0x17d8 @0x15
0x17c3…1802 at0016 = ╱4e╱N╱ // 0x17d9 @0x16
0x17c3…1802 at0017 = ╱49╱I╱ // 0x17da @0x17
0x17c3…1802 at0018 = ╱45╱E╱ // 0x17db @0x18
0x17c3…1802 at0019 = ╱ec╱,╱ // 0x17dc @0x19
0x17c3…1802 at001a = ╱e9╱-╱ // 0x17dd @0x1a
0x17c3…1802 at001b = ╱31╱1╱ // 0x17de @0x1b
0x17c3…1802 at001c = ╱fe00008001╱ // 0x17df @0x1c
0x17c3…1802 at0021 = ╱ec╱,╱ // 0x17e4 @0x21
0x17c3…1802 at0022 = ╱31╱1╱ // 0x17e5 @0x22
0x17c3…1802 at0023 = ╱30╱0╱ // 0x17e6 @0x23
0x17c3…1802 at0024 = ╱30╱0╱ // 0x17e7 @0x24
0x17c3…1802 at0025 = ╱30╱0╱ // 0x17e8 @0x25
0x17c3…1802 at0026 = ╱30╱0╱ // 0x17e9 @0x26
0x17c3…1802 at0027 = ╱30╱0╱ // 0x17ea @0x27
0x17c3…1802 at0028 = ╱30╱0╱ // 0x17eb @0x28
0x17c3…1802 at0029 = ╱fe0024f414╱ // 0x17ec @0x29
0x17c3…1802 at002e = ╱ec╱,╱ // 0x17f1 @0x2e
0x17c3…1802 at002f = ╱42╱B╱ // 0x17f2 @0x2f
0x17c3…1802 at0030 = ╱4c╱L╱ // 0x17f3 @0x30
0x17c3…1802 at0031 = ╱41╱A╱ // 0x17f4 @0x31
0x17c3…1802 at0032 = ╱4e╱N╱ // 0x17f5 @0x32
0x17c3…1802 at0033 = ╱4b╱K╱ // 0x17f6 @0x33
0x17c3…1802 at0034 = ╱ef╱$╱ // 0x17f7 @0x34
0x17c3…1802 at0035 = ╱ed╱(╱ // 0x17f8 @0x35
0x17c3…1802 at0036 = ╱31╱1╱ // 0x17f9 @0x36
0x17c3…1802 at0037 = ╱fe00008001╱ // 0x17fa @0x37
0x17c3…1802 at003c = ╱ee╱)╱ // 0x17ff @0x3c
0x17c3…1802 at003d = ╱ee╱)╱ // 0x1800 @0x3d
0x17c3…1802 at003e = EOL // 0x1801 @0x3e
0x17c3…1802 }
0x1802…1821 a578 2130 UNTIL NOT (P=3 AND AVALIN=1)
0x1802…1821 LineComalBin {
0x1802…1821 ptr = 0xa578 // 0x1802 @0x0
0x1802…1821 lno = 0x0852 // 0x1804 @0x2
0x1802…1821 at0004 = ╱98╱ UNTIL ╱ // 0x1806 @0x4
0x1802…1821 at0005 = ╱d9╱ NOT ╱ // 0x1807 @0x5
0x1802…1821 at0006 = ╱ed╱(╱ // 0x1808 @0x6
0x1802…1821 at0007 = ╱50╱P╱ // 0x1809 @0x7
0x1802…1821 at0008 = ╱dc╱=╱ // 0x180a @0x8
0x1802…1821 at0009 = ╱33╱3╱ // 0x180b @0x9
0x1802…1821 at000a = ╱fe0000c002╱ // 0x180c @0xa
0x1802…1821 at000f = ╱da╱ AND ╱ // 0x1811 @0xf
0x1802…1821 at0010 = ╱41╱A╱ // 0x1812 @0x10
0x1802…1821 at0011 = ╱56╱V╱ // 0x1813 @0x11
0x1802…1821 at0012 = ╱41╱A╱ // 0x1814 @0x12
0x1802…1821 at0013 = ╱4c╱L╱ // 0x1815 @0x13
0x1802…1821 at0014 = ╱49╱I╱ // 0x1816 @0x14
0x1802…1821 at0015 = ╱4e╱N╱ // 0x1817 @0x15
0x1802…1821 at0016 = ╱dc╱=╱ // 0x1818 @0x16
0x1802…1821 at0017 = ╱31╱1╱ // 0x1819 @0x17
0x1802…1821 at0018 = ╱fe00008001╱ // 0x181a @0x18
0x1802…1821 at001d = ╱ee╱)╱ // 0x181f @0x1d
0x1802…1821 at001e = EOL // 0x1820 @0x1e
0x1802…1821 }
0x1821…182e a585 2140 VARENR=P
0x1821…182e LineComalBin {
0x1821…182e ptr = 0xa585 // 0x1821 @0x0
0x1821…182e lno = 0x085c // 0x1823 @0x2
0x1821…182e at0004 = ╱56╱V╱ // 0x1825 @0x4
0x1821…182e at0005 = ╱41╱A╱ // 0x1826 @0x5
0x1821…182e at0006 = ╱52╱R╱ // 0x1827 @0x6
0x1821…182e at0007 = ╱45╱E╱ // 0x1828 @0x7
0x1821…182e at0008 = ╱4e╱N╱ // 0x1829 @0x8
0x1821…182e at0009 = ╱52╱R╱ // 0x182a @0x9
0x1821…182e at000a = ╱dc╱=╱ // 0x182b @0xa
0x1821…182e at000b = ╱50╱P╱ // 0x182c @0xb
0x1821…182e at000c = EOL // 0x182d @0xc
0x1821…182e }
0x182e…1842 a599 2150 IF VARENR<>0 THEN
0x182e…1842 LineComalBin {
0x182e…1842 ptr = 0xa599 // 0x182e @0x0
0x182e…1842 lno = 0x0866 // 0x1830 @0x2
0x182e…1842 at0004 = ╱9c╱ IF ╱ // 0x1832 @0x4
0x182e…1842 at0005 = ╱56╱V╱ // 0x1833 @0x5
0x182e…1842 at0006 = ╱41╱A╱ // 0x1834 @0x6
0x182e…1842 at0007 = ╱52╱R╱ // 0x1835 @0x7
0x182e…1842 at0008 = ╱45╱E╱ // 0x1836 @0x8
0x182e…1842 at0009 = ╱4e╱N╱ // 0x1837 @0x9
0x182e…1842 at000a = ╱52╱R╱ // 0x1838 @0xa
0x182e…1842 at000b = ╱e1╱<>╱ // 0x1839 @0xb
0x182e…1842 at000c = ╱30╱0╱ // 0x183a @0xc
0x182e…1842 at000d = ╱fe00000000╱ // 0x183b @0xd
0x182e…1842 at0012 = ╱b6╱ THEN ╱ // 0x1840 @0x12
0x182e…1842 at0013 = EOL // 0x1841 @0x13
0x182e…1842 }
0x1842…1854 a5ab 2160 CURSOR 8,LINIE
0x1842…1854 LineComalBin {
0x1842…1854 ptr = 0xa5ab // 0x1842 @0x0
0x1842…1854 lno = 0x0870 // 0x1844 @0x2
0x1842…1854 at0004 = ╱a1╱ CURSOR ╱ // 0x1846 @0x4
0x1842…1854 at0005 = ╱38╱8╱ // 0x1847 @0x5
0x1842…1854 at0006 = ╱fe00008004╱ // 0x1848 @0x6
0x1842…1854 at000b = ╱ec╱,╱ // 0x184d @0xb
0x1842…1854 at000c = ╱4c╱L╱ // 0x184e @0xc
0x1842…1854 at000d = ╱49╱I╱ // 0x184f @0xd
0x1842…1854 at000e = ╱4e╱N╱ // 0x1850 @0xe
0x1842…1854 at000f = ╱49╱I╱ // 0x1851 @0xf
0x1842…1854 at0010 = ╱45╱E╱ // 0x1852 @0x10
0x1842…1854 at0011 = EOL // 0x1853 @0x11
0x1842…1854 }
0x1854…1868 a5bf 2170 IF VARENR<5 THEN
0x1854…1868 LineComalBin {
0x1854…1868 ptr = 0xa5bf // 0x1854 @0x0
0x1854…1868 lno = 0x087a // 0x1856 @0x2
0x1854…1868 at0004 = ╱9c╱ IF ╱ // 0x1858 @0x4
0x1854…1868 at0005 = ╱56╱V╱ // 0x1859 @0x5
0x1854…1868 at0006 = ╱41╱A╱ // 0x185a @0x6
0x1854…1868 at0007 = ╱52╱R╱ // 0x185b @0x7
0x1854…1868 at0008 = ╱45╱E╱ // 0x185c @0x8
0x1854…1868 at0009 = ╱4e╱N╱ // 0x185d @0x9
0x1854…1868 at000a = ╱52╱R╱ // 0x185e @0xa
0x1854…1868 at000b = ╱dd╱<╱ // 0x185f @0xb
0x1854…1868 at000c = ╱35╱5╱ // 0x1860 @0xc
0x1854…1868 at000d = ╱fe0000a003╱ // 0x1861 @0xd
0x1854…1868 at0012 = ╱b6╱ THEN ╱ // 0x1866 @0x12
0x1854…1868 at0013 = EOL // 0x1867 @0x13
0x1854…1868 }
0x1868…1884 a5db 2180 PRINT BLANK$(1:25)
0x1868…1884 LineComalBin {
0x1868…1884 ptr = 0xa5db // 0x1868 @0x0
0x1868…1884 lno = 0x0884 // 0x186a @0x2
0x1868…1884 at0004 = ╱92╱ PRINT ╱ // 0x186c @0x4
0x1868…1884 at0005 = ╱42╱B╱ // 0x186d @0x5
0x1868…1884 at0006 = ╱4c╱L╱ // 0x186e @0x6
0x1868…1884 at0007 = ╱41╱A╱ // 0x186f @0x7
0x1868…1884 at0008 = ╱4e╱N╱ // 0x1870 @0x8
0x1868…1884 at0009 = ╱4b╱K╱ // 0x1871 @0x9
0x1868…1884 at000a = ╱ef╱$╱ // 0x1872 @0xa
0x1868…1884 at000b = ╱ed╱(╱ // 0x1873 @0xb
0x1868…1884 at000c = ╱31╱1╱ // 0x1874 @0xc
0x1868…1884 at000d = ╱fe00008001╱ // 0x1875 @0xd
0x1868…1884 at0012 = ╱f0╱:╱ // 0x187a @0x12
0x1868…1884 at0013 = ╱32╱2╱ // 0x187b @0x13
0x1868…1884 at0014 = ╱35╱5╱ // 0x187c @0x14
0x1868…1884 at0015 = ╱fe0000c805╱ // 0x187d @0x15
0x1868…1884 at001a = ╱ee╱)╱ // 0x1882 @0x1a
0x1868…1884 at001b = EOL // 0x1883 @0x1b
0x1868…1884 }
0x1884…188a a5e1 2190 ELSE
0x1884…188a LineComalBin {
0x1884…188a ptr = 0xa5e1 // 0x1884 @0x0
0x1884…188a lno = 0x088e // 0x1886 @0x2
0x1884…188a at0004 = ╱9a╱ ELSE ╱ // 0x1888 @0x4
0x1884…188a at0005 = EOL // 0x1889 @0x5
0x1884…188a }
0x188a…18a2 a5f9 2200 PRINT USING "####### ":VARENR
0x188a…18a2 LineComalBin {
0x188a…18a2 ptr = 0xa5f9 // 0x188a @0x0
0x188a…18a2 lno = 0x0898 // 0x188c @0x2
0x188a…18a2 at0004 = ╱92╱ PRINT ╱ // 0x188e @0x4
0x188a…18a2 at0005 = ╱b9╱ USING ╱ // 0x188f @0x5
0x188a…18a2 at0006 = ╱22╱"╱ // 0x1890 @0x6
0x188a…18a2 at0007 = ╱23╱#╱ // 0x1891 @0x7
0x188a…18a2 at0008 = ╱23╱#╱ // 0x1892 @0x8
0x188a…18a2 at0009 = ╱23╱#╱ // 0x1893 @0x9
0x188a…18a2 at000a = ╱23╱#╱ // 0x1894 @0xa
0x188a…18a2 at000b = ╱23╱#╱ // 0x1895 @0xb
0x188a…18a2 at000c = ╱23╱#╱ // 0x1896 @0xc
0x188a…18a2 at000d = ╱23╱#╱ // 0x1897 @0xd
0x188a…18a2 at000e = ╱20╱…╱ // 0x1898 @0xe
0x188a…18a2 at000f = ╱22╱"╱ // 0x1899 @0xf
0x188a…18a2 at0010 = ╱f0╱:╱ // 0x189a @0x10
0x188a…18a2 at0011 = ╱56╱V╱ // 0x189b @0x11
0x188a…18a2 at0012 = ╱41╱A╱ // 0x189c @0x12
0x188a…18a2 at0013 = ╱52╱R╱ // 0x189d @0x13
0x188a…18a2 at0014 = ╱45╱E╱ // 0x189e @0x14
0x188a…18a2 at0015 = ╱4e╱N╱ // 0x189f @0x15
0x188a…18a2 at0016 = ╱52╱R╱ // 0x18a0 @0x16
0x188a…18a2 at0017 = EOL // 0x18a1 @0x17
0x188a…18a2 }
0x18a2…18a8 a5ff 2210 ENDIF
0x18a2…18a8 LineComalBin {
0x18a2…18a8 ptr = 0xa5ff // 0x18a2 @0x0
0x18a2…18a8 lno = 0x08a2 // 0x18a4 @0x2
0x18a2…18a8 at0004 = ╱9b╱ ENDIF ╱ // 0x18a6 @0x4
0x18a2…18a8 at0005 = EOL // 0x18a7 @0x5
0x18a2…18a8 }
0x18a8…18b6 a60d 2220 CASE VARENR OF
0x18a8…18b6 LineComalBin {
0x18a8…18b6 ptr = 0xa60d // 0x18a8 @0x0
0x18a8…18b6 lno = 0x08ac // 0x18aa @0x2
0x18a8…18b6 at0004 = ╱a201╱ CASE ╱ // 0x18ac @0x4
0x18a8…18b6 at0006 = ╱56╱V╱ // 0x18ae @0x6
0x18a8…18b6 at0007 = ╱41╱A╱ // 0x18af @0x7
0x18a8…18b6 at0008 = ╱52╱R╱ // 0x18b0 @0x8
0x18a8…18b6 at0009 = ╱45╱E╱ // 0x18b1 @0x9
0x18a8…18b6 at000a = ╱4e╱N╱ // 0x18b2 @0xa
0x18a8…18b6 at000b = ╱52╱R╱ // 0x18b3 @0xb
0x18a8…18b6 at000c = ╱ba╱ OF ╱ // 0x18b4 @0xc
0x18a8…18b6 at000d = EOL // 0x18b5 @0xd
0x18a8…18b6 }
0x18b6…18ea a641 2230 EXEC FINDPOST1(VTAB1,VTAB,MVANTAL,VARENR,VPIL3,K3$)
0x18b6…18ea LineComalBin {
0x18b6…18ea ptr = 0xa641 // 0x18b6 @0x0
0x18b6…18ea lno = 0x08b6 // 0x18b8 @0x2
0x18b6…18ea at0004 = ╱9d╱ EXEC ╱ // 0x18ba @0x4
0x18b6…18ea at0005 = ╱46╱F╱ // 0x18bb @0x5
0x18b6…18ea at0006 = ╱49╱I╱ // 0x18bc @0x6
0x18b6…18ea at0007 = ╱4e╱N╱ // 0x18bd @0x7
0x18b6…18ea at0008 = ╱44╱D╱ // 0x18be @0x8
0x18b6…18ea at0009 = ╱50╱P╱ // 0x18bf @0x9
0x18b6…18ea at000a = ╱4f╱O╱ // 0x18c0 @0xa
0x18b6…18ea at000b = ╱53╱S╱ // 0x18c1 @0xb
0x18b6…18ea at000c = ╱54╱T╱ // 0x18c2 @0xc
0x18b6…18ea at000d = ╱31╱1╱ // 0x18c3 @0xd
0x18b6…18ea at000e = ╱ed╱(╱ // 0x18c4 @0xe
0x18b6…18ea at000f = ╱56╱V╱ // 0x18c5 @0xf
0x18b6…18ea at0010 = ╱54╱T╱ // 0x18c6 @0x10
0x18b6…18ea at0011 = ╱41╱A╱ // 0x18c7 @0x11
0x18b6…18ea at0012 = ╱42╱B╱ // 0x18c8 @0x12
0x18b6…18ea at0013 = ╱31╱1╱ // 0x18c9 @0x13
0x18b6…18ea at0014 = ╱ec╱,╱ // 0x18ca @0x14
0x18b6…18ea at0015 = ╱56╱V╱ // 0x18cb @0x15
0x18b6…18ea at0016 = ╱54╱T╱ // 0x18cc @0x16
0x18b6…18ea at0017 = ╱41╱A╱ // 0x18cd @0x17
0x18b6…18ea at0018 = ╱42╱B╱ // 0x18ce @0x18
0x18b6…18ea at0019 = ╱ec╱,╱ // 0x18cf @0x19
0x18b6…18ea at001a = ╱4d╱M╱ // 0x18d0 @0x1a
0x18b6…18ea at001b = ╱56╱V╱ // 0x18d1 @0x1b
0x18b6…18ea at001c = ╱41╱A╱ // 0x18d2 @0x1c
0x18b6…18ea at001d = ╱4e╱N╱ // 0x18d3 @0x1d
0x18b6…18ea at001e = ╱54╱T╱ // 0x18d4 @0x1e
0x18b6…18ea at001f = ╱41╱A╱ // 0x18d5 @0x1f
0x18b6…18ea at0020 = ╱4c╱L╱ // 0x18d6 @0x20
0x18b6…18ea at0021 = ╱ec╱,╱ // 0x18d7 @0x21
0x18b6…18ea at0022 = ╱56╱V╱ // 0x18d8 @0x22
0x18b6…18ea at0023 = ╱41╱A╱ // 0x18d9 @0x23
0x18b6…18ea at0024 = ╱52╱R╱ // 0x18da @0x24
0x18b6…18ea at0025 = ╱45╱E╱ // 0x18db @0x25
0x18b6…18ea at0026 = ╱4e╱N╱ // 0x18dc @0x26
0x18b6…18ea at0027 = ╱52╱R╱ // 0x18dd @0x27
0x18b6…18ea at0028 = ╱ec╱,╱ // 0x18de @0x28
0x18b6…18ea at0029 = ╱56╱V╱ // 0x18df @0x29
0x18b6…18ea at002a = ╱50╱P╱ // 0x18e0 @0x2a
0x18b6…18ea at002b = ╱49╱I╱ // 0x18e1 @0x2b
0x18b6…18ea at002c = ╱4c╱L╱ // 0x18e2 @0x2c
0x18b6…18ea at002d = ╱33╱3╱ // 0x18e3 @0x2d
0x18b6…18ea at002e = ╱ec╱,╱ // 0x18e4 @0x2e
0x18b6…18ea at002f = ╱4b╱K╱ // 0x18e5 @0x2f
0x18b6…18ea at0030 = ╱33╱3╱ // 0x18e6 @0x30
0x18b6…18ea at0031 = ╱ef╱$╱ // 0x18e7 @0x31
0x18b6…18ea at0032 = ╱ee╱)╱ // 0x18e8 @0x32
0x18b6…18ea at0033 = EOL // 0x18e9 @0x33
0x18b6…18ea }
0x18ea…18fc a653 2240 IF CEKS<>0 THEN
0x18ea…18fc LineComalBin {
0x18ea…18fc ptr = 0xa653 // 0x18ea @0x0
0x18ea…18fc lno = 0x08c0 // 0x18ec @0x2
0x18ea…18fc at0004 = ╱9c╱ IF ╱ // 0x18ee @0x4
0x18ea…18fc at0005 = ╱43╱C╱ // 0x18ef @0x5
0x18ea…18fc at0006 = ╱45╱E╱ // 0x18f0 @0x6
0x18ea…18fc at0007 = ╱4b╱K╱ // 0x18f1 @0x7
0x18ea…18fc at0008 = ╱53╱S╱ // 0x18f2 @0x8
0x18ea…18fc at0009 = ╱e1╱<>╱ // 0x18f3 @0x9
0x18ea…18fc at000a = ╱30╱0╱ // 0x18f4 @0xa
0x18ea…18fc at000b = ╱fe00000000╱ // 0x18f5 @0xb
0x18ea…18fc at0010 = ╱b6╱ THEN ╱ // 0x18fa @0x10
0x18ea…18fc at0011 = EOL // 0x18fb @0x11
0x18ea…18fc }
0x18fc…190f a666 2250 CURSOR 17,LINIE
0x18fc…190f LineComalBin {
0x18fc…190f ptr = 0xa666 // 0x18fc @0x0
0x18fc…190f lno = 0x08ca // 0x18fe @0x2
0x18fc…190f at0004 = ╱a1╱ CURSOR ╱ // 0x1900 @0x4
0x18fc…190f at0005 = ╱31╱1╱ // 0x1901 @0x5
0x18fc…190f at0006 = ╱37╱7╱ // 0x1902 @0x6
0x18fc…190f at0007 = ╱fe00008805╱ // 0x1903 @0x7
0x18fc…190f at000c = ╱ec╱,╱ // 0x1908 @0xc
0x18fc…190f at000d = ╱4c╱L╱ // 0x1909 @0xd
0x18fc…190f at000e = ╱49╱I╱ // 0x190a @0xe
0x18fc…190f at000f = ╱4e╱N╱ // 0x190b @0xf
0x18fc…190f at0010 = ╱49╱I╱ // 0x190c @0x10
0x18fc…190f at0011 = ╱45╱E╱ // 0x190d @0x11
0x18fc…190f at0012 = EOL // 0x190e @0x12
0x18fc…190f }
0x190f…1948 a69f 2260 INPUT "Varenummeret eksisterer ikke. Tast RETURN.",SVAR1$
0x190f…1948 LineComalBin {
0x190f…1948 ptr = 0xa69f // 0x190f @0x0
0x190f…1948 lno = 0x08d4 // 0x1911 @0x2
0x190f…1948 at0004 = ╱91╱ INPUT ╱ // 0x1913 @0x4
0x190f…1948 at0005 = ╱22╱"╱ // 0x1914 @0x5
0x190f…1948 at0006 = ╱56╱V╱ // 0x1915 @0x6
0x190f…1948 at0007 = ╱61╱a╱ // 0x1916 @0x7
0x190f…1948 at0008 = ╱72╱r╱ // 0x1917 @0x8
0x190f…1948 at0009 = ╱65╱e╱ // 0x1918 @0x9
0x190f…1948 at000a = ╱6e╱n╱ // 0x1919 @0xa
0x190f…1948 at000b = ╱75╱u╱ // 0x191a @0xb
0x190f…1948 at000c = ╱6d╱m╱ // 0x191b @0xc
0x190f…1948 at000d = ╱6d╱m╱ // 0x191c @0xd
0x190f…1948 at000e = ╱65╱e╱ // 0x191d @0xe
0x190f…1948 at000f = ╱72╱r╱ // 0x191e @0xf
0x190f…1948 at0010 = ╱65╱e╱ // 0x191f @0x10
0x190f…1948 at0011 = ╱74╱t╱ // 0x1920 @0x11
0x190f…1948 at0012 = ╱20╱…╱ // 0x1921 @0x12
0x190f…1948 at0013 = ╱65╱e╱ // 0x1922 @0x13
0x190f…1948 at0014 = ╱6b╱k╱ // 0x1923 @0x14
0x190f…1948 at0015 = ╱73╱s╱ // 0x1924 @0x15
0x190f…1948 at0016 = ╱69╱i╱ // 0x1925 @0x16
0x190f…1948 at0017 = ╱73╱s╱ // 0x1926 @0x17
0x190f…1948 at0018 = ╱74╱t╱ // 0x1927 @0x18
0x190f…1948 at0019 = ╱65╱e╱ // 0x1928 @0x19
0x190f…1948 at001a = ╱72╱r╱ // 0x1929 @0x1a
0x190f…1948 at001b = ╱65╱e╱ // 0x192a @0x1b
0x190f…1948 at001c = ╱72╱r╱ // 0x192b @0x1c
0x190f…1948 at001d = ╱20╱…╱ // 0x192c @0x1d
0x190f…1948 at001e = ╱69╱i╱ // 0x192d @0x1e
0x190f…1948 at001f = ╱6b╱k╱ // 0x192e @0x1f
0x190f…1948 at0020 = ╱6b╱k╱ // 0x192f @0x20
0x190f…1948 at0021 = ╱65╱e╱ // 0x1930 @0x21
0x190f…1948 at0022 = ╱2e╱.╱ // 0x1931 @0x22
0x190f…1948 at0023 = ╱20╱…╱ // 0x1932 @0x23
0x190f…1948 at0024 = ╱54╱T╱ // 0x1933 @0x24
0x190f…1948 at0025 = ╱61╱a╱ // 0x1934 @0x25
0x190f…1948 at0026 = ╱73╱s╱ // 0x1935 @0x26
0x190f…1948 at0027 = ╱74╱t╱ // 0x1936 @0x27
0x190f…1948 at0028 = ╱20╱…╱ // 0x1937 @0x28
0x190f…1948 at0029 = ╱52╱R╱ // 0x1938 @0x29
0x190f…1948 at002a = ╱45╱E╱ // 0x1939 @0x2a
0x190f…1948 at002b = ╱54╱T╱ // 0x193a @0x2b
0x190f…1948 at002c = ╱55╱U╱ // 0x193b @0x2c
0x190f…1948 at002d = ╱52╱R╱ // 0x193c @0x2d
0x190f…1948 at002e = ╱4e╱N╱ // 0x193d @0x2e
0x190f…1948 at002f = ╱2e╱.╱ // 0x193e @0x2f
0x190f…1948 at0030 = ╱22╱"╱ // 0x193f @0x30
0x190f…1948 at0031 = ╱ec╱,╱ // 0x1940 @0x31
0x190f…1948 at0032 = ╱53╱S╱ // 0x1941 @0x32
0x190f…1948 at0033 = ╱56╱V╱ // 0x1942 @0x33
0x190f…1948 at0034 = ╱41╱A╱ // 0x1943 @0x34
0x190f…1948 at0035 = ╱52╱R╱ // 0x1944 @0x35
0x190f…1948 at0036 = ╱31╱1╱ // 0x1945 @0x36
0x190f…1948 at0037 = ╱ef╱$╱ // 0x1946 @0x37
0x190f…1948 at0038 = EOL // 0x1947 @0x38
0x190f…1948 }
0x1948…1974 a6cb 2270 LINIE=LINIE-1;AVALIN=AVALIN-1
0x1948…1974 LineComalBin {
0x1948…1974 ptr = 0xa6cb // 0x1948 @0x0
0x1948…1974 lno = 0x08de // 0x194a @0x2
0x1948…1974 at0004 = ╱4c╱L╱ // 0x194c @0x4
0x1948…1974 at0005 = ╱49╱I╱ // 0x194d @0x5
0x1948…1974 at0006 = ╱4e╱N╱ // 0x194e @0x6
0x1948…1974 at0007 = ╱49╱I╱ // 0x194f @0x7
0x1948…1974 at0008 = ╱45╱E╱ // 0x1950 @0x8
0x1948…1974 at0009 = ╱dc╱=╱ // 0x1951 @0x9
0x1948…1974 at000a = ╱4c╱L╱ // 0x1952 @0xa
0x1948…1974 at000b = ╱49╱I╱ // 0x1953 @0xb
0x1948…1974 at000c = ╱4e╱N╱ // 0x1954 @0xc
0x1948…1974 at000d = ╱49╱I╱ // 0x1955 @0xd
0x1948…1974 at000e = ╱45╱E╱ // 0x1956 @0xe
0x1948…1974 at000f = ╱e3╱-╱ // 0x1957 @0xf
0x1948…1974 at0010 = ╱31╱1╱ // 0x1958 @0x10
0x1948…1974 at0011 = ╱fe00008001╱ // 0x1959 @0x11
0x1948…1974 at0016 = ╱eb╱;╱ // 0x195e @0x16
0x1948…1974 at0017 = ╱41╱A╱ // 0x195f @0x17
0x1948…1974 at0018 = ╱56╱V╱ // 0x1960 @0x18
0x1948…1974 at0019 = ╱41╱A╱ // 0x1961 @0x19
0x1948…1974 at001a = ╱4c╱L╱ // 0x1962 @0x1a
0x1948…1974 at001b = ╱49╱I╱ // 0x1963 @0x1b
0x1948…1974 at001c = ╱4e╱N╱ // 0x1964 @0x1c
0x1948…1974 at001d = ╱dc╱=╱ // 0x1965 @0x1d
0x1948…1974 at001e = ╱41╱A╱ // 0x1966 @0x1e
0x1948…1974 at001f = ╱56╱V╱ // 0x1967 @0x1f
0x1948…1974 at0020 = ╱41╱A╱ // 0x1968 @0x20
0x1948…1974 at0021 = ╱4c╱L╱ // 0x1969 @0x21
0x1948…1974 at0022 = ╱49╱I╱ // 0x196a @0x22
0x1948…1974 at0023 = ╱4e╱N╱ // 0x196b @0x23
0x1948…1974 at0024 = ╱e3╱-╱ // 0x196c @0x24
0x1948…1974 at0025 = ╱31╱1╱ // 0x196d @0x25
0x1948…1974 at0026 = ╱fe00008001╱ // 0x196e @0x26
0x1948…1974 at002b = EOL // 0x1973 @0x2b
0x1948…1974 }
0x1974…197a a6d1 2280 ELSE
0x1974…197a LineComalBin {
0x1974…197a ptr = 0xa6d1 // 0x1974 @0x0
0x1974…197a lno = 0x08e8 // 0x1976 @0x2
0x1974…197a at0004 = ╱9a╱ ELSE ╱ // 0x1978 @0x4
0x1974…197a at0005 = EOL // 0x1979 @0x5
0x1974…197a }
0x197a…19ac a703 2290 EXEC INDPUT2(17,LINIE,BLANK$(1),ANTAL$)
0x197a…19ac LineComalBin {
0x197a…19ac ptr = 0xa703 // 0x197a @0x0
0x197a…19ac lno = 0x08f2 // 0x197c @0x2
0x197a…19ac at0004 = ╱9d╱ EXEC ╱ // 0x197e @0x4
0x197a…19ac at0005 = ╱49╱I╱ // 0x197f @0x5
0x197a…19ac at0006 = ╱4e╱N╱ // 0x1980 @0x6
0x197a…19ac at0007 = ╱44╱D╱ // 0x1981 @0x7
0x197a…19ac at0008 = ╱50╱P╱ // 0x1982 @0x8
0x197a…19ac at0009 = ╱55╱U╱ // 0x1983 @0x9
0x197a…19ac at000a = ╱54╱T╱ // 0x1984 @0xa
0x197a…19ac at000b = ╱32╱2╱ // 0x1985 @0xb
0x197a…19ac at000c = ╱ed╱(╱ // 0x1986 @0xc
0x197a…19ac at000d = ╱31╱1╱ // 0x1987 @0xd
0x197a…19ac at000e = ╱37╱7╱ // 0x1988 @0xe
0x197a…19ac at000f = ╱fe00008805╱ // 0x1989 @0xf
0x197a…19ac at0014 = ╱ec╱,╱ // 0x198e @0x14
0x197a…19ac at0015 = ╱4c╱L╱ // 0x198f @0x15
0x197a…19ac at0016 = ╱49╱I╱ // 0x1990 @0x16
0x197a…19ac at0017 = ╱4e╱N╱ // 0x1991 @0x17
0x197a…19ac at0018 = ╱49╱I╱ // 0x1992 @0x18
0x197a…19ac at0019 = ╱45╱E╱ // 0x1993 @0x19
0x197a…19ac at001a = ╱ec╱,╱ // 0x1994 @0x1a
0x197a…19ac at001b = ╱42╱B╱ // 0x1995 @0x1b
0x197a…19ac at001c = ╱4c╱L╱ // 0x1996 @0x1c
0x197a…19ac at001d = ╱41╱A╱ // 0x1997 @0x1d
0x197a…19ac at001e = ╱4e╱N╱ // 0x1998 @0x1e
0x197a…19ac at001f = ╱4b╱K╱ // 0x1999 @0x1f
0x197a…19ac at0020 = ╱ef╱$╱ // 0x199a @0x20
0x197a…19ac at0021 = ╱ed╱(╱ // 0x199b @0x21
0x197a…19ac at0022 = ╱31╱1╱ // 0x199c @0x22
0x197a…19ac at0023 = ╱fe00008001╱ // 0x199d @0x23
0x197a…19ac at0028 = ╱ee╱)╱ // 0x19a2 @0x28
0x197a…19ac at0029 = ╱ec╱,╱ // 0x19a3 @0x29
0x197a…19ac at002a = ╱41╱A╱ // 0x19a4 @0x2a
0x197a…19ac at002b = ╱4e╱N╱ // 0x19a5 @0x2b
0x197a…19ac at002c = ╱54╱T╱ // 0x19a6 @0x2c
0x197a…19ac at002d = ╱41╱A╱ // 0x19a7 @0x2d
0x197a…19ac at002e = ╱4c╱L╱ // 0x19a8 @0x2e
0x197a…19ac at002f = ╱ef╱$╱ // 0x19a9 @0x2f
0x197a…19ac at0030 = ╱ee╱)╱ // 0x19aa @0x30
0x197a…19ac at0031 = EOL // 0x19ab @0x31
0x197a…19ac }
0x19ac…19cd a724 2300 EXEC CA(4,ANTAL$,TAH$,TAH$)
0x19ac…19cd LineComalBin {
0x19ac…19cd ptr = 0xa724 // 0x19ac @0x0
0x19ac…19cd lno = 0x08fc // 0x19ae @0x2
0x19ac…19cd at0004 = ╱9d╱ EXEC ╱ // 0x19b0 @0x4
0x19ac…19cd at0005 = ╱43╱C╱ // 0x19b1 @0x5
0x19ac…19cd at0006 = ╱41╱A╱ // 0x19b2 @0x6
0x19ac…19cd at0007 = ╱ed╱(╱ // 0x19b3 @0x7
0x19ac…19cd at0008 = ╱34╱4╱ // 0x19b4 @0x8
0x19ac…19cd at0009 = ╱fe00008003╱ // 0x19b5 @0x9
0x19ac…19cd at000e = ╱ec╱,╱ // 0x19ba @0xe
0x19ac…19cd at000f = ╱41╱A╱ // 0x19bb @0xf
0x19ac…19cd at0010 = ╱4e╱N╱ // 0x19bc @0x10
0x19ac…19cd at0011 = ╱54╱T╱ // 0x19bd @0x11
0x19ac…19cd at0012 = ╱41╱A╱ // 0x19be @0x12
0x19ac…19cd at0013 = ╱4c╱L╱ // 0x19bf @0x13
0x19ac…19cd at0014 = ╱ef╱$╱ // 0x19c0 @0x14
0x19ac…19cd at0015 = ╱ec╱,╱ // 0x19c1 @0x15
0x19ac…19cd at0016 = ╱54╱T╱ // 0x19c2 @0x16
0x19ac…19cd at0017 = ╱41╱A╱ // 0x19c3 @0x17
0x19ac…19cd at0018 = ╱48╱H╱ // 0x19c4 @0x18
0x19ac…19cd at0019 = ╱ef╱$╱ // 0x19c5 @0x19
0x19ac…19cd at001a = ╱ec╱,╱ // 0x19c6 @0x1a
0x19ac…19cd at001b = ╱54╱T╱ // 0x19c7 @0x1b
0x19ac…19cd at001c = ╱41╱A╱ // 0x19c8 @0x1c
0x19ac…19cd at001d = ╱48╱H╱ // 0x19c9 @0x1d
0x19ac…19cd at001e = ╱ef╱$╱ // 0x19ca @0x1e
0x19ac…19cd at001f = ╱ee╱)╱ // 0x19cb @0x1f
0x19ac…19cd at0020 = EOL // 0x19cc @0x20
0x19ac…19cd }
0x19cd…19e7 a73e 2310 IF SI=0 THEN FE6=1
0x19cd…19e7 LineComalBin {
0x19cd…19e7 ptr = 0xa73e // 0x19cd @0x0
0x19cd…19e7 lno = 0x0906 // 0x19cf @0x2
0x19cd…19e7 at0004 = ╱82╱ IF ╱ // 0x19d1 @0x4
0x19cd…19e7 at0005 = ╱53╱S╱ // 0x19d2 @0x5
0x19cd…19e7 at0006 = ╱49╱I╱ // 0x19d3 @0x6
0x19cd…19e7 at0007 = ╱dc╱=╱ // 0x19d4 @0x7
0x19cd…19e7 at0008 = ╱30╱0╱ // 0x19d5 @0x8
0x19cd…19e7 at0009 = ╱fe00000000╱ // 0x19d6 @0x9
0x19cd…19e7 at000e = ╱b6╱ THEN ╱ // 0x19db @0xe
0x19cd…19e7 at000f = ╱46╱F╱ // 0x19dc @0xf
0x19cd…19e7 at0010 = ╱45╱E╱ // 0x19dd @0x10
0x19cd…19e7 at0011 = ╱36╱6╱ // 0x19de @0x11
0x19cd…19e7 at0012 = ╱dc╱=╱ // 0x19df @0x12
0x19cd…19e7 at0013 = ╱31╱1╱ // 0x19e0 @0x13
0x19cd…19e7 at0014 = ╱fe00008001╱ // 0x19e1 @0x14
0x19cd…19e7 at0019 = EOL // 0x19e6 @0x19
0x19cd…19e7 }
0x19e7…19f8 a74f 2320 IF FE6=0 THEN
0x19e7…19f8 LineComalBin {
0x19e7…19f8 ptr = 0xa74f // 0x19e7 @0x0
0x19e7…19f8 lno = 0x0910 // 0x19e9 @0x2
0x19e7…19f8 at0004 = ╱9c╱ IF ╱ // 0x19eb @0x4
0x19e7…19f8 at0005 = ╱46╱F╱ // 0x19ec @0x5
0x19e7…19f8 at0006 = ╱45╱E╱ // 0x19ed @0x6
0x19e7…19f8 at0007 = ╱36╱6╱ // 0x19ee @0x7
0x19e7…19f8 at0008 = ╱dc╱=╱ // 0x19ef @0x8
0x19e7…19f8 at0009 = ╱30╱0╱ // 0x19f0 @0x9
0x19e7…19f8 at000a = ╱fe00000000╱ // 0x19f1 @0xa
0x19e7…19f8 at000f = ╱b6╱ THEN ╱ // 0x19f6 @0xf
0x19e7…19f8 at0010 = EOL // 0x19f7 @0x10
0x19e7…19f8 }
0x19f8…1a0b a762 2330 CURSOR 17,LINIE
0x19f8…1a0b LineComalBin {
0x19f8…1a0b ptr = 0xa762 // 0x19f8 @0x0
0x19f8…1a0b lno = 0x091a // 0x19fa @0x2
0x19f8…1a0b at0004 = ╱a1╱ CURSOR ╱ // 0x19fc @0x4
0x19f8…1a0b at0005 = ╱31╱1╱ // 0x19fd @0x5
0x19f8…1a0b at0006 = ╱37╱7╱ // 0x19fe @0x6
0x19f8…1a0b at0007 = ╱fe00008805╱ // 0x19ff @0x7
0x19f8…1a0b at000c = ╱ec╱,╱ // 0x1a04 @0xc
0x19f8…1a0b at000d = ╱4c╱L╱ // 0x1a05 @0xd
0x19f8…1a0b at000e = ╱49╱I╱ // 0x1a06 @0xe
0x19f8…1a0b at000f = ╱4e╱N╱ // 0x1a07 @0xf
0x19f8…1a0b at0010 = ╱49╱I╱ // 0x1a08 @0x10
0x19f8…1a0b at0011 = ╱45╱E╱ // 0x1a09 @0x11
0x19f8…1a0b at0012 = EOL // 0x1a0a @0x12
0x19f8…1a0b }
0x1a0b…1a14 a76b 2340 EXEC ANT
0x1a0b…1a14 LineComalBin {
0x1a0b…1a14 ptr = 0xa76b // 0x1a0b @0x0
0x1a0b…1a14 lno = 0x0924 // 0x1a0d @0x2
0x1a0b…1a14 at0004 = ╱9d╱ EXEC ╱ // 0x1a0f @0x4
0x1a0b…1a14 at0005 = ╱41╱A╱ // 0x1a10 @0x5
0x1a0b…1a14 at0006 = ╱4e╱N╱ // 0x1a11 @0x6
0x1a0b…1a14 at0007 = ╱54╱T╱ // 0x1a12 @0x7
0x1a0b…1a14 at0008 = EOL // 0x1a13 @0x8
0x1a0b…1a14 }
0x1a14…1a28 a77f 2350 CURSOR 1,23
0x1a14…1a28 LineComalBin {
0x1a14…1a28 ptr = 0xa77f // 0x1a14 @0x0
0x1a14…1a28 lno = 0x092e // 0x1a16 @0x2
0x1a14…1a28 at0004 = ╱a1╱ CURSOR ╱ // 0x1a18 @0x4
0x1a14…1a28 at0005 = ╱31╱1╱ // 0x1a19 @0x5
0x1a14…1a28 at0006 = ╱fe00008001╱ // 0x1a1a @0x6
0x1a14…1a28 at000b = ╱ec╱,╱ // 0x1a1f @0xb
0x1a14…1a28 at000c = ╱32╱2╱ // 0x1a20 @0xc
0x1a14…1a28 at000d = ╱33╱3╱ // 0x1a21 @0xd
0x1a14…1a28 at000e = ╱fe0000b805╱ // 0x1a22 @0xe
0x1a14…1a28 at0013 = EOL // 0x1a27 @0x13
0x1a14…1a28 }
0x1a28…1a37 a78e 2360 EXEC HENTVPOST
0x1a28…1a37 LineComalBin {
0x1a28…1a37 ptr = 0xa78e // 0x1a28 @0x0
0x1a28…1a37 lno = 0x0938 // 0x1a2a @0x2
0x1a28…1a37 at0004 = ╱9d╱ EXEC ╱ // 0x1a2c @0x4
0x1a28…1a37 at0005 = ╱48╱H╱ // 0x1a2d @0x5
0x1a28…1a37 at0006 = ╱45╱E╱ // 0x1a2e @0x6
0x1a28…1a37 at0007 = ╱4e╱N╱ // 0x1a2f @0x7
0x1a28…1a37 at0008 = ╱54╱T╱ // 0x1a30 @0x8
0x1a28…1a37 at0009 = ╱56╱V╱ // 0x1a31 @0x9
0x1a28…1a37 at000a = ╱50╱P╱ // 0x1a32 @0xa
0x1a28…1a37 at000b = ╱4f╱O╱ // 0x1a33 @0xb
0x1a28…1a37 at000c = ╱53╱S╱ // 0x1a34 @0xc
0x1a28…1a37 at000d = ╱54╱T╱ // 0x1a35 @0xd
0x1a28…1a37 at000e = EOL // 0x1a36 @0xe
0x1a28…1a37 }
0x1a37…1a4a a7a1 2370 CURSOR 23,LINIE
0x1a37…1a4a LineComalBin {
0x1a37…1a4a ptr = 0xa7a1 // 0x1a37 @0x0
0x1a37…1a4a lno = 0x0942 // 0x1a39 @0x2
0x1a37…1a4a at0004 = ╱a1╱ CURSOR ╱ // 0x1a3b @0x4
0x1a37…1a4a at0005 = ╱32╱2╱ // 0x1a3c @0x5
0x1a37…1a4a at0006 = ╱33╱3╱ // 0x1a3d @0x6
0x1a37…1a4a at0007 = ╱fe0000b805╱ // 0x1a3e @0x7
0x1a37…1a4a at000c = ╱ec╱,╱ // 0x1a43 @0xc
0x1a37…1a4a at000d = ╱4c╱L╱ // 0x1a44 @0xd
0x1a37…1a4a at000e = ╱49╱I╱ // 0x1a45 @0xe
0x1a37…1a4a at000f = ╱4e╱N╱ // 0x1a46 @0xf
0x1a37…1a4a at0010 = ╱49╱I╱ // 0x1a47 @0x10
0x1a37…1a4a at0011 = ╱45╱E╱ // 0x1a48 @0x11
0x1a37…1a4a at0012 = EOL // 0x1a49 @0x12
0x1a37…1a4a }
0x1a4a…1a6e a7c5 2380 IF ORD(VARTEKST$(1))=255 THEN
0x1a4a…1a6e LineComalBin {
0x1a4a…1a6e ptr = 0xa7c5 // 0x1a4a @0x0
0x1a4a…1a6e lno = 0x094c // 0x1a4c @0x2
0x1a4a…1a6e at0004 = ╱9c╱ IF ╱ // 0x1a4e @0x4
0x1a4a…1a6e at0005 = ╱cd╱ORD╱ // 0x1a4f @0x5
0x1a4a…1a6e at0006 = ╱ed╱(╱ // 0x1a50 @0x6
0x1a4a…1a6e at0007 = ╱56╱V╱ // 0x1a51 @0x7
0x1a4a…1a6e at0008 = ╱41╱A╱ // 0x1a52 @0x8
0x1a4a…1a6e at0009 = ╱52╱R╱ // 0x1a53 @0x9
0x1a4a…1a6e at000a = ╱54╱T╱ // 0x1a54 @0xa
0x1a4a…1a6e at000b = ╱45╱E╱ // 0x1a55 @0xb
0x1a4a…1a6e at000c = ╱4b╱K╱ // 0x1a56 @0xc
0x1a4a…1a6e at000d = ╱53╱S╱ // 0x1a57 @0xd
0x1a4a…1a6e at000e = ╱54╱T╱ // 0x1a58 @0xe
0x1a4a…1a6e at000f = ╱ef╱$╱ // 0x1a59 @0xf
0x1a4a…1a6e at0010 = ╱ed╱(╱ // 0x1a5a @0x10
0x1a4a…1a6e at0011 = ╱31╱1╱ // 0x1a5b @0x11
0x1a4a…1a6e at0012 = ╱fe00008001╱ // 0x1a5c @0x12
0x1a4a…1a6e at0017 = ╱ee╱)╱ // 0x1a61 @0x17
0x1a4a…1a6e at0018 = ╱ee╱)╱ // 0x1a62 @0x18
0x1a4a…1a6e at0019 = ╱dc╱=╱ // 0x1a63 @0x19
0x1a4a…1a6e at001a = ╱32╱2╱ // 0x1a64 @0x1a
0x1a4a…1a6e at001b = ╱35╱5╱ // 0x1a65 @0x1b
0x1a4a…1a6e at001c = ╱35╱5╱ // 0x1a66 @0x1c
0x1a4a…1a6e at001d = ╱fe0000ff08╱ // 0x1a67 @0x1d
0x1a4a…1a6e at0022 = ╱b6╱ THEN ╱ // 0x1a6c @0x22
0x1a4a…1a6e at0023 = EOL // 0x1a6d @0x23
0x1a4a…1a6e }
0x1a6e…1a81 a7d8 2390 INPUT " ",VARTEKST$
0x1a6e…1a81 LineComalBin {
0x1a6e…1a81 ptr = 0xa7d8 // 0x1a6e @0x0
0x1a6e…1a81 lno = 0x0956 // 0x1a70 @0x2
0x1a6e…1a81 at0004 = ╱91╱ INPUT ╱ // 0x1a72 @0x4
0x1a6e…1a81 at0005 = ╱22╱"╱ // 0x1a73 @0x5
0x1a6e…1a81 at0006 = ╱20╱…╱ // 0x1a74 @0x6
0x1a6e…1a81 at0007 = ╱22╱"╱ // 0x1a75 @0x7
0x1a6e…1a81 at0008 = ╱ec╱,╱ // 0x1a76 @0x8
0x1a6e…1a81 at0009 = ╱56╱V╱ // 0x1a77 @0x9
0x1a6e…1a81 at000a = ╱41╱A╱ // 0x1a78 @0xa
0x1a6e…1a81 at000b = ╱52╱R╱ // 0x1a79 @0xb
0x1a6e…1a81 at000c = ╱54╱T╱ // 0x1a7a @0xc
0x1a6e…1a81 at000d = ╱45╱E╱ // 0x1a7b @0xd
0x1a6e…1a81 at000e = ╱4b╱K╱ // 0x1a7c @0xe
0x1a6e…1a81 at000f = ╱53╱S╱ // 0x1a7d @0xf
0x1a6e…1a81 at0010 = ╱54╱T╱ // 0x1a7e @0x10
0x1a6e…1a81 at0011 = ╱ef╱$╱ // 0x1a7f @0x11
0x1a6e…1a81 at0012 = EOL // 0x1a80 @0x12
0x1a6e…1a81 }
0x1a81…1aa4 a7fb 2400 ARRKODER(AVALIN,2)=1
0x1a81…1aa4 LineComalBin {
0x1a81…1aa4 ptr = 0xa7fb // 0x1a81 @0x0
0x1a81…1aa4 lno = 0x0960 // 0x1a83 @0x2
0x1a81…1aa4 at0004 = ╱41╱A╱ // 0x1a85 @0x4
0x1a81…1aa4 at0005 = ╱52╱R╱ // 0x1a86 @0x5
0x1a81…1aa4 at0006 = ╱52╱R╱ // 0x1a87 @0x6
0x1a81…1aa4 at0007 = ╱4b╱K╱ // 0x1a88 @0x7
0x1a81…1aa4 at0008 = ╱4f╱O╱ // 0x1a89 @0x8
0x1a81…1aa4 at0009 = ╱44╱D╱ // 0x1a8a @0x9
0x1a81…1aa4 at000a = ╱45╱E╱ // 0x1a8b @0xa
0x1a81…1aa4 at000b = ╱52╱R╱ // 0x1a8c @0xb
0x1a81…1aa4 at000c = ╱ed╱(╱ // 0x1a8d @0xc
0x1a81…1aa4 at000d = ╱41╱A╱ // 0x1a8e @0xd
0x1a81…1aa4 at000e = ╱56╱V╱ // 0x1a8f @0xe
0x1a81…1aa4 at000f = ╱41╱A╱ // 0x1a90 @0xf
0x1a81…1aa4 at0010 = ╱4c╱L╱ // 0x1a91 @0x10
0x1a81…1aa4 at0011 = ╱49╱I╱ // 0x1a92 @0x11
0x1a81…1aa4 at0012 = ╱4e╱N╱ // 0x1a93 @0x12
0x1a81…1aa4 at0013 = ╱ec╱,╱ // 0x1a94 @0x13
0x1a81…1aa4 at0014 = ╱32╱2╱ // 0x1a95 @0x14
0x1a81…1aa4 at0015 = ╱fe00008002╱ // 0x1a96 @0x15
0x1a81…1aa4 at001a = ╱ee╱)╱ // 0x1a9b @0x1a
0x1a81…1aa4 at001b = ╱dc╱=╱ // 0x1a9c @0x1b
0x1a81…1aa4 at001c = ╱31╱1╱ // 0x1a9d @0x1c
0x1a81…1aa4 at001d = ╱fe00008001╱ // 0x1a9e @0x1d
0x1a81…1aa4 at0022 = EOL // 0x1aa3 @0x22
0x1a81…1aa4 }
0x1aa4…1aaa a801 2410 ENDIF
0x1aa4…1aaa LineComalBin {
0x1aa4…1aaa ptr = 0xa801 // 0x1aa4 @0x0
0x1aa4…1aaa lno = 0x096a // 0x1aa6 @0x2
0x1aa4…1aaa at0004 = ╱9b╱ ENDIF ╱ // 0x1aa8 @0x4
0x1aa4…1aaa at0005 = EOL // 0x1aa9 @0x5
0x1aa4…1aaa }
0x1aaa…1abd a814 2420 CURSOR 24,LINIE
0x1aaa…1abd LineComalBin {
0x1aaa…1abd ptr = 0xa814 // 0x1aaa @0x0
0x1aaa…1abd lno = 0x0974 // 0x1aac @0x2
0x1aaa…1abd at0004 = ╱a1╱ CURSOR ╱ // 0x1aae @0x4
0x1aaa…1abd at0005 = ╱32╱2╱ // 0x1aaf @0x5
0x1aaa…1abd at0006 = ╱34╱4╱ // 0x1ab0 @0x6
0x1aaa…1abd at0007 = ╱fe0000c005╱ // 0x1ab1 @0x7
0x1aaa…1abd at000c = ╱ec╱,╱ // 0x1ab6 @0xc
0x1aaa…1abd at000d = ╱4c╱L╱ // 0x1ab7 @0xd
0x1aaa…1abd at000e = ╱49╱I╱ // 0x1ab8 @0xe
0x1aaa…1abd at000f = ╱4e╱N╱ // 0x1ab9 @0xf
0x1aaa…1abd at0010 = ╱49╱I╱ // 0x1aba @0x10
0x1aaa…1abd at0011 = ╱45╱E╱ // 0x1abb @0x11
0x1aaa…1abd at0012 = EOL // 0x1abc @0x12
0x1aaa…1abd }
0x1abd…1af3 a84a 2430 PRINT VARTEKST$(1:25);BLANK$(1:25)
0x1abd…1af3 LineComalBin {
0x1abd…1af3 ptr = 0xa84a // 0x1abd @0x0
0x1abd…1af3 lno = 0x097e // 0x1abf @0x2
0x1abd…1af3 at0004 = ╱92╱ PRINT ╱ // 0x1ac1 @0x4
0x1abd…1af3 at0005 = ╱56╱V╱ // 0x1ac2 @0x5
0x1abd…1af3 at0006 = ╱41╱A╱ // 0x1ac3 @0x6
0x1abd…1af3 at0007 = ╱52╱R╱ // 0x1ac4 @0x7
0x1abd…1af3 at0008 = ╱54╱T╱ // 0x1ac5 @0x8
0x1abd…1af3 at0009 = ╱45╱E╱ // 0x1ac6 @0x9
0x1abd…1af3 at000a = ╱4b╱K╱ // 0x1ac7 @0xa
0x1abd…1af3 at000b = ╱53╱S╱ // 0x1ac8 @0xb
0x1abd…1af3 at000c = ╱54╱T╱ // 0x1ac9 @0xc
0x1abd…1af3 at000d = ╱ef╱$╱ // 0x1aca @0xd
0x1abd…1af3 at000e = ╱ed╱(╱ // 0x1acb @0xe
0x1abd…1af3 at000f = ╱31╱1╱ // 0x1acc @0xf
0x1abd…1af3 at0010 = ╱fe00008001╱ // 0x1acd @0x10
0x1abd…1af3 at0015 = ╱f0╱:╱ // 0x1ad2 @0x15
0x1abd…1af3 at0016 = ╱32╱2╱ // 0x1ad3 @0x16
0x1abd…1af3 at0017 = ╱35╱5╱ // 0x1ad4 @0x17
0x1abd…1af3 at0018 = ╱fe0000c805╱ // 0x1ad5 @0x18
0x1abd…1af3 at001d = ╱ee╱)╱ // 0x1ada @0x1d
0x1abd…1af3 at001e = ╱eb╱;╱ // 0x1adb @0x1e
0x1abd…1af3 at001f = ╱42╱B╱ // 0x1adc @0x1f
0x1abd…1af3 at0020 = ╱4c╱L╱ // 0x1add @0x20
0x1abd…1af3 at0021 = ╱41╱A╱ // 0x1ade @0x21
0x1abd…1af3 at0022 = ╱4e╱N╱ // 0x1adf @0x22
0x1abd…1af3 at0023 = ╱4b╱K╱ // 0x1ae0 @0x23
0x1abd…1af3 at0024 = ╱ef╱$╱ // 0x1ae1 @0x24
0x1abd…1af3 at0025 = ╱ed╱(╱ // 0x1ae2 @0x25
0x1abd…1af3 at0026 = ╱31╱1╱ // 0x1ae3 @0x26
0x1abd…1af3 at0027 = ╱fe00008001╱ // 0x1ae4 @0x27
0x1abd…1af3 at002c = ╱f0╱:╱ // 0x1ae9 @0x2c
0x1abd…1af3 at002d = ╱32╱2╱ // 0x1aea @0x2d
0x1abd…1af3 at002e = ╱35╱5╱ // 0x1aeb @0x2e
0x1abd…1af3 at002f = ╱fe0000c805╱ // 0x1aec @0x2f
0x1abd…1af3 at0034 = ╱ee╱)╱ // 0x1af1 @0x34
0x1abd…1af3 at0035 = EOL // 0x1af2 @0x35
0x1abd…1af3 }
0x1af3…1b16 a86d 2440 EXEC CA(4,VARPRIS$,TAH$,TAH$)
0x1af3…1b16 LineComalBin {
0x1af3…1b16 ptr = 0xa86d // 0x1af3 @0x0
0x1af3…1b16 lno = 0x0988 // 0x1af5 @0x2
0x1af3…1b16 at0004 = ╱9d╱ EXEC ╱ // 0x1af7 @0x4
0x1af3…1b16 at0005 = ╱43╱C╱ // 0x1af8 @0x5
0x1af3…1b16 at0006 = ╱41╱A╱ // 0x1af9 @0x6
0x1af3…1b16 at0007 = ╱ed╱(╱ // 0x1afa @0x7
0x1af3…1b16 at0008 = ╱34╱4╱ // 0x1afb @0x8
0x1af3…1b16 at0009 = ╱fe00008003╱ // 0x1afc @0x9
0x1af3…1b16 at000e = ╱ec╱,╱ // 0x1b01 @0xe
0x1af3…1b16 at000f = ╱56╱V╱ // 0x1b02 @0xf
0x1af3…1b16 at0010 = ╱41╱A╱ // 0x1b03 @0x10
0x1af3…1b16 at0011 = ╱52╱R╱ // 0x1b04 @0x11
0x1af3…1b16 at0012 = ╱50╱P╱ // 0x1b05 @0x12
0x1af3…1b16 at0013 = ╱52╱R╱ // 0x1b06 @0x13
0x1af3…1b16 at0014 = ╱49╱I╱ // 0x1b07 @0x14
0x1af3…1b16 at0015 = ╱53╱S╱ // 0x1b08 @0x15
0x1af3…1b16 at0016 = ╱ef╱$╱ // 0x1b09 @0x16
0x1af3…1b16 at0017 = ╱ec╱,╱ // 0x1b0a @0x17
0x1af3…1b16 at0018 = ╱54╱T╱ // 0x1b0b @0x18
0x1af3…1b16 at0019 = ╱41╱A╱ // 0x1b0c @0x19
0x1af3…1b16 at001a = ╱48╱H╱ // 0x1b0d @0x1a
0x1af3…1b16 at001b = ╱ef╱$╱ // 0x1b0e @0x1b
0x1af3…1b16 at001c = ╱ec╱,╱ // 0x1b0f @0x1c
0x1af3…1b16 at001d = ╱54╱T╱ // 0x1b10 @0x1d
0x1af3…1b16 at001e = ╱41╱A╱ // 0x1b11 @0x1e
0x1af3…1b16 at001f = ╱48╱H╱ // 0x1b12 @0x1f
0x1af3…1b16 at0020 = ╱ef╱$╱ // 0x1b13 @0x20
0x1af3…1b16 at0021 = ╱ee╱)╱ // 0x1b14 @0x21
0x1af3…1b16 at0022 = EOL // 0x1b15 @0x22
0x1af3…1b16 }
0x1b16…1b26 a87d 2450 IF SI=0 THEN
0x1b16…1b26 LineComalBin {
0x1b16…1b26 ptr = 0xa87d // 0x1b16 @0x0
0x1b16…1b26 lno = 0x0992 // 0x1b18 @0x2
0x1b16…1b26 at0004 = ╱9c╱ IF ╱ // 0x1b1a @0x4
0x1b16…1b26 at0005 = ╱53╱S╱ // 0x1b1b @0x5
0x1b16…1b26 at0006 = ╱49╱I╱ // 0x1b1c @0x6
0x1b16…1b26 at0007 = ╱dc╱=╱ // 0x1b1d @0x7
0x1b16…1b26 at0008 = ╱30╱0╱ // 0x1b1e @0x8
0x1b16…1b26 at0009 = ╱fe00000000╱ // 0x1b1f @0x9
0x1b16…1b26 at000e = ╱b6╱ THEN ╱ // 0x1b24 @0xe
0x1b16…1b26 at000f = EOL // 0x1b25 @0xf
0x1b16…1b26 }
0x1b26…1b5a a8b1 2460 EXEC INDPUT2(50,LINIE,BLANK$(1),VARPRIS$)
0x1b26…1b5a LineComalBin {
0x1b26…1b5a ptr = 0xa8b1 // 0x1b26 @0x0
0x1b26…1b5a lno = 0x099c // 0x1b28 @0x2
0x1b26…1b5a at0004 = ╱9d╱ EXEC ╱ // 0x1b2a @0x4
0x1b26…1b5a at0005 = ╱49╱I╱ // 0x1b2b @0x5
0x1b26…1b5a at0006 = ╱4e╱N╱ // 0x1b2c @0x6
0x1b26…1b5a at0007 = ╱44╱D╱ // 0x1b2d @0x7
0x1b26…1b5a at0008 = ╱50╱P╱ // 0x1b2e @0x8
0x1b26…1b5a at0009 = ╱55╱U╱ // 0x1b2f @0x9
0x1b26…1b5a at000a = ╱54╱T╱ // 0x1b30 @0xa
0x1b26…1b5a at000b = ╱32╱2╱ // 0x1b31 @0xb
0x1b26…1b5a at000c = ╱ed╱(╱ // 0x1b32 @0xc
0x1b26…1b5a at000d = ╱35╱5╱ // 0x1b33 @0xd
0x1b26…1b5a at000e = ╱30╱0╱ // 0x1b34 @0xe
0x1b26…1b5a at000f = ╱fe0000c806╱ // 0x1b35 @0xf
0x1b26…1b5a at0014 = ╱ec╱,╱ // 0x1b3a @0x14
0x1b26…1b5a at0015 = ╱4c╱L╱ // 0x1b3b @0x15
0x1b26…1b5a at0016 = ╱49╱I╱ // 0x1b3c @0x16
0x1b26…1b5a at0017 = ╱4e╱N╱ // 0x1b3d @0x17
0x1b26…1b5a at0018 = ╱49╱I╱ // 0x1b3e @0x18
0x1b26…1b5a at0019 = ╱45╱E╱ // 0x1b3f @0x19
0x1b26…1b5a at001a = ╱ec╱,╱ // 0x1b40 @0x1a
0x1b26…1b5a at001b = ╱42╱B╱ // 0x1b41 @0x1b
0x1b26…1b5a at001c = ╱4c╱L╱ // 0x1b42 @0x1c
0x1b26…1b5a at001d = ╱41╱A╱ // 0x1b43 @0x1d
0x1b26…1b5a at001e = ╱4e╱N╱ // 0x1b44 @0x1e
0x1b26…1b5a at001f = ╱4b╱K╱ // 0x1b45 @0x1f
0x1b26…1b5a at0020 = ╱ef╱$╱ // 0x1b46 @0x20
0x1b26…1b5a at0021 = ╱ed╱(╱ // 0x1b47 @0x21
0x1b26…1b5a at0022 = ╱31╱1╱ // 0x1b48 @0x22
0x1b26…1b5a at0023 = ╱fe00008001╱ // 0x1b49 @0x23
0x1b26…1b5a at0028 = ╱ee╱)╱ // 0x1b4e @0x28
0x1b26…1b5a at0029 = ╱ec╱,╱ // 0x1b4f @0x29
0x1b26…1b5a at002a = ╱56╱V╱ // 0x1b50 @0x2a
0x1b26…1b5a at002b = ╱41╱A╱ // 0x1b51 @0x2b
0x1b26…1b5a at002c = ╱52╱R╱ // 0x1b52 @0x2c
0x1b26…1b5a at002d = ╱50╱P╱ // 0x1b53 @0x2d
0x1b26…1b5a at002e = ╱52╱R╱ // 0x1b54 @0x2e
0x1b26…1b5a at002f = ╱49╱I╱ // 0x1b55 @0x2f
0x1b26…1b5a at0030 = ╱53╱S╱ // 0x1b56 @0x30
0x1b26…1b5a at0031 = ╱ef╱$╱ // 0x1b57 @0x31
0x1b26…1b5a at0032 = ╱ee╱)╱ // 0x1b58 @0x32
0x1b26…1b5a at0033 = EOL // 0x1b59 @0x33
0x1b26…1b5a }
0x1b5a…1b7d a8d4 2470 ARRKODER(AVALIN,1)=1
0x1b5a…1b7d LineComalBin {
0x1b5a…1b7d ptr = 0xa8d4 // 0x1b5a @0x0
0x1b5a…1b7d lno = 0x09a6 // 0x1b5c @0x2
0x1b5a…1b7d at0004 = ╱41╱A╱ // 0x1b5e @0x4
0x1b5a…1b7d at0005 = ╱52╱R╱ // 0x1b5f @0x5
0x1b5a…1b7d at0006 = ╱52╱R╱ // 0x1b60 @0x6
0x1b5a…1b7d at0007 = ╱4b╱K╱ // 0x1b61 @0x7
0x1b5a…1b7d at0008 = ╱4f╱O╱ // 0x1b62 @0x8
0x1b5a…1b7d at0009 = ╱44╱D╱ // 0x1b63 @0x9
0x1b5a…1b7d at000a = ╱45╱E╱ // 0x1b64 @0xa
0x1b5a…1b7d at000b = ╱52╱R╱ // 0x1b65 @0xb
0x1b5a…1b7d at000c = ╱ed╱(╱ // 0x1b66 @0xc
0x1b5a…1b7d at000d = ╱41╱A╱ // 0x1b67 @0xd
0x1b5a…1b7d at000e = ╱56╱V╱ // 0x1b68 @0xe
0x1b5a…1b7d at000f = ╱41╱A╱ // 0x1b69 @0xf
0x1b5a…1b7d at0010 = ╱4c╱L╱ // 0x1b6a @0x10
0x1b5a…1b7d at0011 = ╱49╱I╱ // 0x1b6b @0x11
0x1b5a…1b7d at0012 = ╱4e╱N╱ // 0x1b6c @0x12
0x1b5a…1b7d at0013 = ╱ec╱,╱ // 0x1b6d @0x13
0x1b5a…1b7d at0014 = ╱31╱1╱ // 0x1b6e @0x14
0x1b5a…1b7d at0015 = ╱fe00008001╱ // 0x1b6f @0x15
0x1b5a…1b7d at001a = ╱ee╱)╱ // 0x1b74 @0x1a
0x1b5a…1b7d at001b = ╱dc╱=╱ // 0x1b75 @0x1b
0x1b5a…1b7d at001c = ╱31╱1╱ // 0x1b76 @0x1c
0x1b5a…1b7d at001d = ╱fe00008001╱ // 0x1b77 @0x1d
0x1b5a…1b7d at0022 = EOL // 0x1b7c @0x22
0x1b5a…1b7d }
0x1b7d…1b83 a8da 2480 ENDIF
0x1b7d…1b83 LineComalBin {
0x1b7d…1b83 ptr = 0xa8da // 0x1b7d @0x0
0x1b7d…1b83 lno = 0x09b0 // 0x1b7f @0x2
0x1b7d…1b83 at0004 = ╱9b╱ ENDIF ╱ // 0x1b81 @0x4
0x1b7d…1b83 at0005 = EOL // 0x1b82 @0x5
0x1b7d…1b83 }
0x1b83…1b96 a8ed 2490 CURSOR 51,LINIE
0x1b83…1b96 LineComalBin {
0x1b83…1b96 ptr = 0xa8ed // 0x1b83 @0x0
0x1b83…1b96 lno = 0x09ba // 0x1b85 @0x2
0x1b83…1b96 at0004 = ╱a1╱ CURSOR ╱ // 0x1b87 @0x4
0x1b83…1b96 at0005 = ╱35╱5╱ // 0x1b88 @0x5
0x1b83…1b96 at0006 = ╱31╱1╱ // 0x1b89 @0x6
0x1b83…1b96 at0007 = ╱fe0000cc06╱ // 0x1b8a @0x7
0x1b83…1b96 at000c = ╱ec╱,╱ // 0x1b8f @0xc
0x1b83…1b96 at000d = ╱4c╱L╱ // 0x1b90 @0xd
0x1b83…1b96 at000e = ╱49╱I╱ // 0x1b91 @0xe
0x1b83…1b96 at000f = ╱4e╱N╱ // 0x1b92 @0xf
0x1b83…1b96 at0010 = ╱49╱I╱ // 0x1b93 @0x10
0x1b83…1b96 at0011 = ╱45╱E╱ // 0x1b94 @0x11
0x1b83…1b96 at0012 = EOL // 0x1b95 @0x12
0x1b83…1b96 }
0x1b96…1bbd a914 2500 EXEC TUD(VARPRIS$,TAL4$,1,0)
0x1b96…1bbd LineComalBin {
0x1b96…1bbd ptr = 0xa914 // 0x1b96 @0x0
0x1b96…1bbd lno = 0x09c4 // 0x1b98 @0x2
0x1b96…1bbd at0004 = ╱9d╱ EXEC ╱ // 0x1b9a @0x4
0x1b96…1bbd at0005 = ╱54╱T╱ // 0x1b9b @0x5
0x1b96…1bbd at0006 = ╱55╱U╱ // 0x1b9c @0x6
0x1b96…1bbd at0007 = ╱44╱D╱ // 0x1b9d @0x7
0x1b96…1bbd at0008 = ╱ed╱(╱ // 0x1b9e @0x8
0x1b96…1bbd at0009 = ╱56╱V╱ // 0x1b9f @0x9
0x1b96…1bbd at000a = ╱41╱A╱ // 0x1ba0 @0xa
0x1b96…1bbd at000b = ╱52╱R╱ // 0x1ba1 @0xb
0x1b96…1bbd at000c = ╱50╱P╱ // 0x1ba2 @0xc
0x1b96…1bbd at000d = ╱52╱R╱ // 0x1ba3 @0xd
0x1b96…1bbd at000e = ╱49╱I╱ // 0x1ba4 @0xe
0x1b96…1bbd at000f = ╱53╱S╱ // 0x1ba5 @0xf
0x1b96…1bbd at0010 = ╱ef╱$╱ // 0x1ba6 @0x10
0x1b96…1bbd at0011 = ╱ec╱,╱ // 0x1ba7 @0x11
0x1b96…1bbd at0012 = ╱54╱T╱ // 0x1ba8 @0x12
0x1b96…1bbd at0013 = ╱41╱A╱ // 0x1ba9 @0x13
0x1b96…1bbd at0014 = ╱4c╱L╱ // 0x1baa @0x14
0x1b96…1bbd at0015 = ╱34╱4╱ // 0x1bab @0x15
0x1b96…1bbd at0016 = ╱ef╱$╱ // 0x1bac @0x16
0x1b96…1bbd at0017 = ╱ec╱,╱ // 0x1bad @0x17
0x1b96…1bbd at0018 = ╱31╱1╱ // 0x1bae @0x18
0x1b96…1bbd at0019 = ╱fe00008001╱ // 0x1baf @0x19
0x1b96…1bbd at001e = ╱ec╱,╱ // 0x1bb4 @0x1e
0x1b96…1bbd at001f = ╱30╱0╱ // 0x1bb5 @0x1f
0x1b96…1bbd at0020 = ╱fe00000000╱ // 0x1bb6 @0x20
0x1b96…1bbd at0025 = ╱ee╱)╱ // 0x1bbb @0x25
0x1b96…1bbd at0026 = EOL // 0x1bbc @0x26
0x1b96…1bbd }
0x1bbd…1be4 a93b 2510 EXEC CA(2,VARPRIS$,ANTAL$,BELØB$)
0x1bbd…1be4 LineComalBin {
0x1bbd…1be4 ptr = 0xa93b // 0x1bbd @0x0
0x1bbd…1be4 lno = 0x09ce // 0x1bbf @0x2
0x1bbd…1be4 at0004 = ╱9d╱ EXEC ╱ // 0x1bc1 @0x4
0x1bbd…1be4 at0005 = ╱43╱C╱ // 0x1bc2 @0x5
0x1bbd…1be4 at0006 = ╱41╱A╱ // 0x1bc3 @0x6
0x1bbd…1be4 at0007 = ╱ed╱(╱ // 0x1bc4 @0x7
0x1bbd…1be4 at0008 = ╱32╱2╱ // 0x1bc5 @0x8
0x1bbd…1be4 at0009 = ╱fe00008002╱ // 0x1bc6 @0x9
0x1bbd…1be4 at000e = ╱ec╱,╱ // 0x1bcb @0xe
0x1bbd…1be4 at000f = ╱56╱V╱ // 0x1bcc @0xf
0x1bbd…1be4 at0010 = ╱41╱A╱ // 0x1bcd @0x10
0x1bbd…1be4 at0011 = ╱52╱R╱ // 0x1bce @0x11
0x1bbd…1be4 at0012 = ╱50╱P╱ // 0x1bcf @0x12
0x1bbd…1be4 at0013 = ╱52╱R╱ // 0x1bd0 @0x13
0x1bbd…1be4 at0014 = ╱49╱I╱ // 0x1bd1 @0x14
0x1bbd…1be4 at0015 = ╱53╱S╱ // 0x1bd2 @0x15
0x1bbd…1be4 at0016 = ╱ef╱$╱ // 0x1bd3 @0x16
0x1bbd…1be4 at0017 = ╱ec╱,╱ // 0x1bd4 @0x17
0x1bbd…1be4 at0018 = ╱41╱A╱ // 0x1bd5 @0x18
0x1bbd…1be4 at0019 = ╱4e╱N╱ // 0x1bd6 @0x19
0x1bbd…1be4 at001a = ╱54╱T╱ // 0x1bd7 @0x1a
0x1bbd…1be4 at001b = ╱41╱A╱ // 0x1bd8 @0x1b
0x1bbd…1be4 at001c = ╱4c╱L╱ // 0x1bd9 @0x1c
0x1bbd…1be4 at001d = ╱ef╱$╱ // 0x1bda @0x1d
0x1bbd…1be4 at001e = ╱ec╱,╱ // 0x1bdb @0x1e
0x1bbd…1be4 at001f = ╱42╱B╱ // 0x1bdc @0x1f
0x1bbd…1be4 at0020 = ╱45╱E╱ // 0x1bdd @0x20
0x1bbd…1be4 at0021 = ╱4c╱L╱ // 0x1bde @0x21
0x1bbd…1be4 at0022 = ╱5c╱Ø╱ // 0x1bdf @0x22
0x1bbd…1be4 at0023 = ╱42╱B╱ // 0x1be0 @0x23
0x1bbd…1be4 at0024 = ╱ef╱$╱ // 0x1be1 @0x24
0x1bbd…1be4 at0025 = ╱ee╱)╱ // 0x1be2 @0x25
0x1bbd…1be4 at0026 = EOL // 0x1be3 @0x26
0x1bbd…1be4 }
0x1be4…1bf7 a94e 2520 CURSOR 66,LINIE
0x1be4…1bf7 LineComalBin {
0x1be4…1bf7 ptr = 0xa94e // 0x1be4 @0x0
0x1be4…1bf7 lno = 0x09d8 // 0x1be6 @0x2
0x1be4…1bf7 at0004 = ╱a1╱ CURSOR ╱ // 0x1be8 @0x4
0x1be4…1bf7 at0005 = ╱36╱6╱ // 0x1be9 @0x5
0x1be4…1bf7 at0006 = ╱36╱6╱ // 0x1bea @0x6
0x1be4…1bf7 at0007 = ╱fe00008407╱ // 0x1beb @0x7
0x1be4…1bf7 at000c = ╱ec╱,╱ // 0x1bf0 @0xc
0x1be4…1bf7 at000d = ╱4c╱L╱ // 0x1bf1 @0xd
0x1be4…1bf7 at000e = ╱49╱I╱ // 0x1bf2 @0xe
0x1be4…1bf7 at000f = ╱4e╱N╱ // 0x1bf3 @0xf
0x1be4…1bf7 at0010 = ╱49╱I╱ // 0x1bf4 @0x10
0x1be4…1bf7 at0011 = ╱45╱E╱ // 0x1bf5 @0x11
0x1be4…1bf7 at0012 = EOL // 0x1bf6 @0x12
0x1be4…1bf7 }
0x1bf7…1c1c a973 2530 EXEC TUD(BELØB$,TAL4$,1,0)
0x1bf7…1c1c LineComalBin {
0x1bf7…1c1c ptr = 0xa973 // 0x1bf7 @0x0
0x1bf7…1c1c lno = 0x09e2 // 0x1bf9 @0x2
0x1bf7…1c1c at0004 = ╱9d╱ EXEC ╱ // 0x1bfb @0x4
0x1bf7…1c1c at0005 = ╱54╱T╱ // 0x1bfc @0x5
0x1bf7…1c1c at0006 = ╱55╱U╱ // 0x1bfd @0x6
0x1bf7…1c1c at0007 = ╱44╱D╱ // 0x1bfe @0x7
0x1bf7…1c1c at0008 = ╱ed╱(╱ // 0x1bff @0x8
0x1bf7…1c1c at0009 = ╱42╱B╱ // 0x1c00 @0x9
0x1bf7…1c1c at000a = ╱45╱E╱ // 0x1c01 @0xa
0x1bf7…1c1c at000b = ╱4c╱L╱ // 0x1c02 @0xb
0x1bf7…1c1c at000c = ╱5c╱Ø╱ // 0x1c03 @0xc
0x1bf7…1c1c at000d = ╱42╱B╱ // 0x1c04 @0xd
0x1bf7…1c1c at000e = ╱ef╱$╱ // 0x1c05 @0xe
0x1bf7…1c1c at000f = ╱ec╱,╱ // 0x1c06 @0xf
0x1bf7…1c1c at0010 = ╱54╱T╱ // 0x1c07 @0x10
0x1bf7…1c1c at0011 = ╱41╱A╱ // 0x1c08 @0x11
0x1bf7…1c1c at0012 = ╱4c╱L╱ // 0x1c09 @0x12
0x1bf7…1c1c at0013 = ╱34╱4╱ // 0x1c0a @0x13
0x1bf7…1c1c at0014 = ╱ef╱$╱ // 0x1c0b @0x14
0x1bf7…1c1c at0015 = ╱ec╱,╱ // 0x1c0c @0x15
0x1bf7…1c1c at0016 = ╱31╱1╱ // 0x1c0d @0x16
0x1bf7…1c1c at0017 = ╱fe00008001╱ // 0x1c0e @0x17
0x1bf7…1c1c at001c = ╱ec╱,╱ // 0x1c13 @0x1c
0x1bf7…1c1c at001d = ╱30╱0╱ // 0x1c14 @0x1d
0x1bf7…1c1c at001e = ╱fe00000000╱ // 0x1c15 @0x1e
0x1bf7…1c1c at0023 = ╱ee╱)╱ // 0x1c1a @0x23
0x1bf7…1c1c at0024 = EOL // 0x1c1b @0x24
0x1bf7…1c1c }
0x1c1c…1c41 a998 2540 EXEC CA(0,BELØB$,TOTAL$,TOTAL$)
0x1c1c…1c41 LineComalBin {
0x1c1c…1c41 ptr = 0xa998 // 0x1c1c @0x0
0x1c1c…1c41 lno = 0x09ec // 0x1c1e @0x2
0x1c1c…1c41 at0004 = ╱9d╱ EXEC ╱ // 0x1c20 @0x4
0x1c1c…1c41 at0005 = ╱43╱C╱ // 0x1c21 @0x5
0x1c1c…1c41 at0006 = ╱41╱A╱ // 0x1c22 @0x6
0x1c1c…1c41 at0007 = ╱ed╱(╱ // 0x1c23 @0x7
0x1c1c…1c41 at0008 = ╱30╱0╱ // 0x1c24 @0x8
0x1c1c…1c41 at0009 = ╱fe00000000╱ // 0x1c25 @0x9
0x1c1c…1c41 at000e = ╱ec╱,╱ // 0x1c2a @0xe
0x1c1c…1c41 at000f = ╱42╱B╱ // 0x1c2b @0xf
0x1c1c…1c41 at0010 = ╱45╱E╱ // 0x1c2c @0x10
0x1c1c…1c41 at0011 = ╱4c╱L╱ // 0x1c2d @0x11
0x1c1c…1c41 at0012 = ╱5c╱Ø╱ // 0x1c2e @0x12
0x1c1c…1c41 at0013 = ╱42╱B╱ // 0x1c2f @0x13
0x1c1c…1c41 at0014 = ╱ef╱$╱ // 0x1c30 @0x14
0x1c1c…1c41 at0015 = ╱ec╱,╱ // 0x1c31 @0x15
0x1c1c…1c41 at0016 = ╱54╱T╱ // 0x1c32 @0x16
0x1c1c…1c41 at0017 = ╱4f╱O╱ // 0x1c33 @0x17
0x1c1c…1c41 at0018 = ╱54╱T╱ // 0x1c34 @0x18
0x1c1c…1c41 at0019 = ╱41╱A╱ // 0x1c35 @0x19
0x1c1c…1c41 at001a = ╱4c╱L╱ // 0x1c36 @0x1a
0x1c1c…1c41 at001b = ╱ef╱$╱ // 0x1c37 @0x1b
0x1c1c…1c41 at001c = ╱ec╱,╱ // 0x1c38 @0x1c
0x1c1c…1c41 at001d = ╱54╱T╱ // 0x1c39 @0x1d
0x1c1c…1c41 at001e = ╱4f╱O╱ // 0x1c3a @0x1e
0x1c1c…1c41 at001f = ╱54╱T╱ // 0x1c3b @0x1f
0x1c1c…1c41 at0020 = ╱41╱A╱ // 0x1c3c @0x20
0x1c1c…1c41 at0021 = ╱4c╱L╱ // 0x1c3d @0x21
0x1c1c…1c41 at0022 = ╱ef╱$╱ // 0x1c3e @0x22
0x1c1c…1c41 at0023 = ╱ee╱)╱ // 0x1c3f @0x23
0x1c1c…1c41 at0024 = EOL // 0x1c40 @0x24
0x1c1c…1c41 }
0x1c41…1c78 a9cf 2550 VANRARR(AVALIN)=VARENR;VATEKARR$(AVALIN)=VARTEKST$
0x1c41…1c78 LineComalBin {
0x1c41…1c78 ptr = 0xa9cf // 0x1c41 @0x0
0x1c41…1c78 lno = 0x09f6 // 0x1c43 @0x2
0x1c41…1c78 at0004 = ╱56╱V╱ // 0x1c45 @0x4
0x1c41…1c78 at0005 = ╱41╱A╱ // 0x1c46 @0x5
0x1c41…1c78 at0006 = ╱4e╱N╱ // 0x1c47 @0x6
0x1c41…1c78 at0007 = ╱52╱R╱ // 0x1c48 @0x7
0x1c41…1c78 at0008 = ╱41╱A╱ // 0x1c49 @0x8
0x1c41…1c78 at0009 = ╱52╱R╱ // 0x1c4a @0x9
0x1c41…1c78 at000a = ╱52╱R╱ // 0x1c4b @0xa
0x1c41…1c78 at000b = ╱ed╱(╱ // 0x1c4c @0xb
0x1c41…1c78 at000c = ╱41╱A╱ // 0x1c4d @0xc
0x1c41…1c78 at000d = ╱56╱V╱ // 0x1c4e @0xd
0x1c41…1c78 at000e = ╱41╱A╱ // 0x1c4f @0xe
0x1c41…1c78 at000f = ╱4c╱L╱ // 0x1c50 @0xf
0x1c41…1c78 at0010 = ╱49╱I╱ // 0x1c51 @0x10
0x1c41…1c78 at0011 = ╱4e╱N╱ // 0x1c52 @0x11
0x1c41…1c78 at0012 = ╱ee╱)╱ // 0x1c53 @0x12
0x1c41…1c78 at0013 = ╱dc╱=╱ // 0x1c54 @0x13
0x1c41…1c78 at0014 = ╱56╱V╱ // 0x1c55 @0x14
0x1c41…1c78 at0015 = ╱41╱A╱ // 0x1c56 @0x15
0x1c41…1c78 at0016 = ╱52╱R╱ // 0x1c57 @0x16
0x1c41…1c78 at0017 = ╱45╱E╱ // 0x1c58 @0x17
0x1c41…1c78 at0018 = ╱4e╱N╱ // 0x1c59 @0x18
0x1c41…1c78 at0019 = ╱52╱R╱ // 0x1c5a @0x19
0x1c41…1c78 at001a = ╱eb╱;╱ // 0x1c5b @0x1a
0x1c41…1c78 at001b = ╱56╱V╱ // 0x1c5c @0x1b
0x1c41…1c78 at001c = ╱41╱A╱ // 0x1c5d @0x1c
0x1c41…1c78 at001d = ╱54╱T╱ // 0x1c5e @0x1d
0x1c41…1c78 at001e = ╱45╱E╱ // 0x1c5f @0x1e
0x1c41…1c78 at001f = ╱4b╱K╱ // 0x1c60 @0x1f
0x1c41…1c78 at0020 = ╱41╱A╱ // 0x1c61 @0x20
0x1c41…1c78 at0021 = ╱52╱R╱ // 0x1c62 @0x21
0x1c41…1c78 at0022 = ╱52╱R╱ // 0x1c63 @0x22
0x1c41…1c78 at0023 = ╱ef╱$╱ // 0x1c64 @0x23
0x1c41…1c78 at0024 = ╱ed╱(╱ // 0x1c65 @0x24
0x1c41…1c78 at0025 = ╱41╱A╱ // 0x1c66 @0x25
0x1c41…1c78 at0026 = ╱56╱V╱ // 0x1c67 @0x26
0x1c41…1c78 at0027 = ╱41╱A╱ // 0x1c68 @0x27
0x1c41…1c78 at0028 = ╱4c╱L╱ // 0x1c69 @0x28
0x1c41…1c78 at0029 = ╱49╱I╱ // 0x1c6a @0x29
0x1c41…1c78 at002a = ╱4e╱N╱ // 0x1c6b @0x2a
0x1c41…1c78 at002b = ╱ee╱)╱ // 0x1c6c @0x2b
0x1c41…1c78 at002c = ╱dc╱=╱ // 0x1c6d @0x2c
0x1c41…1c78 at002d = ╱56╱V╱ // 0x1c6e @0x2d
0x1c41…1c78 at002e = ╱41╱A╱ // 0x1c6f @0x2e
0x1c41…1c78 at002f = ╱52╱R╱ // 0x1c70 @0x2f
0x1c41…1c78 at0030 = ╱54╱T╱ // 0x1c71 @0x30
0x1c41…1c78 at0031 = ╱45╱E╱ // 0x1c72 @0x31
0x1c41…1c78 at0032 = ╱4b╱K╱ // 0x1c73 @0x32
0x1c41…1c78 at0033 = ╱53╱S╱ // 0x1c74 @0x33
0x1c41…1c78 at0034 = ╱54╱T╱ // 0x1c75 @0x34
0x1c41…1c78 at0035 = ╱ef╱$╱ // 0x1c76 @0x35
0x1c41…1c78 at0036 = EOL // 0x1c77 @0x36
0x1c41…1c78 }
0x1c78…1cb0 aa07 2560 VAPRIARR$(AVALIN)=VARPRIS$;VAANTARR$(AVALIN)=ANTAL$
0x1c78…1cb0 LineComalBin {
0x1c78…1cb0 ptr = 0xaa07 // 0x1c78 @0x0
0x1c78…1cb0 lno = 0x0a00 // 0x1c7a @0x2
0x1c78…1cb0 at0004 = ╱56╱V╱ // 0x1c7c @0x4
0x1c78…1cb0 at0005 = ╱41╱A╱ // 0x1c7d @0x5
0x1c78…1cb0 at0006 = ╱50╱P╱ // 0x1c7e @0x6
0x1c78…1cb0 at0007 = ╱52╱R╱ // 0x1c7f @0x7
0x1c78…1cb0 at0008 = ╱49╱I╱ // 0x1c80 @0x8
0x1c78…1cb0 at0009 = ╱41╱A╱ // 0x1c81 @0x9
0x1c78…1cb0 at000a = ╱52╱R╱ // 0x1c82 @0xa
0x1c78…1cb0 at000b = ╱52╱R╱ // 0x1c83 @0xb
0x1c78…1cb0 at000c = ╱ef╱$╱ // 0x1c84 @0xc
0x1c78…1cb0 at000d = ╱ed╱(╱ // 0x1c85 @0xd
0x1c78…1cb0 at000e = ╱41╱A╱ // 0x1c86 @0xe
0x1c78…1cb0 at000f = ╱56╱V╱ // 0x1c87 @0xf
0x1c78…1cb0 at0010 = ╱41╱A╱ // 0x1c88 @0x10
0x1c78…1cb0 at0011 = ╱4c╱L╱ // 0x1c89 @0x11
0x1c78…1cb0 at0012 = ╱49╱I╱ // 0x1c8a @0x12
0x1c78…1cb0 at0013 = ╱4e╱N╱ // 0x1c8b @0x13
0x1c78…1cb0 at0014 = ╱ee╱)╱ // 0x1c8c @0x14
0x1c78…1cb0 at0015 = ╱dc╱=╱ // 0x1c8d @0x15
0x1c78…1cb0 at0016 = ╱56╱V╱ // 0x1c8e @0x16
0x1c78…1cb0 at0017 = ╱41╱A╱ // 0x1c8f @0x17
0x1c78…1cb0 at0018 = ╱52╱R╱ // 0x1c90 @0x18
0x1c78…1cb0 at0019 = ╱50╱P╱ // 0x1c91 @0x19
0x1c78…1cb0 at001a = ╱52╱R╱ // 0x1c92 @0x1a
0x1c78…1cb0 at001b = ╱49╱I╱ // 0x1c93 @0x1b
0x1c78…1cb0 at001c = ╱53╱S╱ // 0x1c94 @0x1c
0x1c78…1cb0 at001d = ╱ef╱$╱ // 0x1c95 @0x1d
0x1c78…1cb0 at001e = ╱eb╱;╱ // 0x1c96 @0x1e
0x1c78…1cb0 at001f = ╱56╱V╱ // 0x1c97 @0x1f
0x1c78…1cb0 at0020 = ╱41╱A╱ // 0x1c98 @0x20
0x1c78…1cb0 at0021 = ╱41╱A╱ // 0x1c99 @0x21
0x1c78…1cb0 at0022 = ╱4e╱N╱ // 0x1c9a @0x22
0x1c78…1cb0 at0023 = ╱54╱T╱ // 0x1c9b @0x23
0x1c78…1cb0 at0024 = ╱41╱A╱ // 0x1c9c @0x24
0x1c78…1cb0 at0025 = ╱52╱R╱ // 0x1c9d @0x25
0x1c78…1cb0 at0026 = ╱52╱R╱ // 0x1c9e @0x26
0x1c78…1cb0 at0027 = ╱ef╱$╱ // 0x1c9f @0x27
0x1c78…1cb0 at0028 = ╱ed╱(╱ // 0x1ca0 @0x28
0x1c78…1cb0 at0029 = ╱41╱A╱ // 0x1ca1 @0x29
0x1c78…1cb0 at002a = ╱56╱V╱ // 0x1ca2 @0x2a
0x1c78…1cb0 at002b = ╱41╱A╱ // 0x1ca3 @0x2b
0x1c78…1cb0 at002c = ╱4c╱L╱ // 0x1ca4 @0x2c
0x1c78…1cb0 at002d = ╱49╱I╱ // 0x1ca5 @0x2d
0x1c78…1cb0 at002e = ╱4e╱N╱ // 0x1ca6 @0x2e
0x1c78…1cb0 at002f = ╱ee╱)╱ // 0x1ca7 @0x2f
0x1c78…1cb0 at0030 = ╱dc╱=╱ // 0x1ca8 @0x30
0x1c78…1cb0 at0031 = ╱41╱A╱ // 0x1ca9 @0x31
0x1c78…1cb0 at0032 = ╱4e╱N╱ // 0x1caa @0x32
0x1c78…1cb0 at0033 = ╱54╱T╱ // 0x1cab @0x33
0x1c78…1cb0 at0034 = ╱41╱A╱ // 0x1cac @0x34
0x1c78…1cb0 at0035 = ╱4c╱L╱ // 0x1cad @0x35
0x1c78…1cb0 at0036 = ╱ef╱$╱ // 0x1cae @0x36
0x1c78…1cb0 at0037 = EOL // 0x1caf @0x37
0x1c78…1cb0 }
0x1cb0…1ccd aa24 2570 BELØBARR$(AVALIN)=BELØB$
0x1cb0…1ccd LineComalBin {
0x1cb0…1ccd ptr = 0xaa24 // 0x1cb0 @0x0
0x1cb0…1ccd lno = 0x0a0a // 0x1cb2 @0x2
0x1cb0…1ccd at0004 = ╱42╱B╱ // 0x1cb4 @0x4
0x1cb0…1ccd at0005 = ╱45╱E╱ // 0x1cb5 @0x5
0x1cb0…1ccd at0006 = ╱4c╱L╱ // 0x1cb6 @0x6
0x1cb0…1ccd at0007 = ╱5c╱Ø╱ // 0x1cb7 @0x7
0x1cb0…1ccd at0008 = ╱42╱B╱ // 0x1cb8 @0x8
0x1cb0…1ccd at0009 = ╱41╱A╱ // 0x1cb9 @0x9
0x1cb0…1ccd at000a = ╱52╱R╱ // 0x1cba @0xa
0x1cb0…1ccd at000b = ╱52╱R╱ // 0x1cbb @0xb
0x1cb0…1ccd at000c = ╱ef╱$╱ // 0x1cbc @0xc
0x1cb0…1ccd at000d = ╱ed╱(╱ // 0x1cbd @0xd
0x1cb0…1ccd at000e = ╱41╱A╱ // 0x1cbe @0xe
0x1cb0…1ccd at000f = ╱56╱V╱ // 0x1cbf @0xf
0x1cb0…1ccd at0010 = ╱41╱A╱ // 0x1cc0 @0x10
0x1cb0…1ccd at0011 = ╱4c╱L╱ // 0x1cc1 @0x11
0x1cb0…1ccd at0012 = ╱49╱I╱ // 0x1cc2 @0x12
0x1cb0…1ccd at0013 = ╱4e╱N╱ // 0x1cc3 @0x13
0x1cb0…1ccd at0014 = ╱ee╱)╱ // 0x1cc4 @0x14
0x1cb0…1ccd at0015 = ╱dc╱=╱ // 0x1cc5 @0x15
0x1cb0…1ccd at0016 = ╱42╱B╱ // 0x1cc6 @0x16
0x1cb0…1ccd at0017 = ╱45╱E╱ // 0x1cc7 @0x17
0x1cb0…1ccd at0018 = ╱4c╱L╱ // 0x1cc8 @0x18
0x1cb0…1ccd at0019 = ╱5c╱Ø╱ // 0x1cc9 @0x19
0x1cb0…1ccd at001a = ╱42╱B╱ // 0x1cca @0x1a
0x1cb0…1ccd at001b = ╱ef╱$╱ // 0x1ccb @0x1b
0x1cb0…1ccd at001c = EOL // 0x1ccc @0x1c
0x1cb0…1ccd }
0x1ccd…1cd3 aa2a 2580 ENDIF
0x1ccd…1cd3 LineComalBin {
0x1ccd…1cd3 ptr = 0xaa2a // 0x1ccd @0x0
0x1ccd…1cd3 lno = 0x0a14 // 0x1ccf @0x2
0x1ccd…1cd3 at0004 = ╱9b╱ ENDIF ╱ // 0x1cd1 @0x4
0x1ccd…1cd3 at0005 = EOL // 0x1cd2 @0x5
0x1ccd…1cd3 }
0x1cd3…1cd9 aa30 2590 ENDIF
0x1cd3…1cd9 LineComalBin {
0x1cd3…1cd9 ptr = 0xaa30 // 0x1cd3 @0x0
0x1cd3…1cd9 lno = 0x0a1e // 0x1cd5 @0x2
0x1cd3…1cd9 at0004 = ╱9b╱ ENDIF ╱ // 0x1cd7 @0x4
0x1cd3…1cd9 at0005 = EOL // 0x1cd8 @0x5
0x1cd3…1cd9 }
0x1cd9…1ced aa44 2600 WHEN 1,2
0x1cd9…1ced LineComalBin {
0x1cd9…1ced ptr = 0xaa44 // 0x1cd9 @0x0
0x1cd9…1ced lno = 0x0a28 // 0x1cdb @0x2
0x1cd9…1ced at0004 = ╱a301╱ WHEN ╱ // 0x1cdd @0x4
0x1cd9…1ced at0006 = ╱31╱1╱ // 0x1cdf @0x6
0x1cd9…1ced at0007 = ╱fe00008001╱ // 0x1ce0 @0x7
0x1cd9…1ced at000c = ╱ec╱,╱ // 0x1ce5 @0xc
0x1cd9…1ced at000d = ╱32╱2╱ // 0x1ce6 @0xd
0x1cd9…1ced at000e = ╱fe00008002╱ // 0x1ce7 @0xe
0x1cd9…1ced at0013 = EOL // 0x1cec @0x13
0x1cd9…1ced }
0x1ced…1d12 aa69 2610 VARTEKST$=BLANK$(1:50)
0x1ced…1d12 LineComalBin {
0x1ced…1d12 ptr = 0xaa69 // 0x1ced @0x0
0x1ced…1d12 lno = 0x0a32 // 0x1cef @0x2
0x1ced…1d12 at0004 = ╱56╱V╱ // 0x1cf1 @0x4
0x1ced…1d12 at0005 = ╱41╱A╱ // 0x1cf2 @0x5
0x1ced…1d12 at0006 = ╱52╱R╱ // 0x1cf3 @0x6
0x1ced…1d12 at0007 = ╱54╱T╱ // 0x1cf4 @0x7
0x1ced…1d12 at0008 = ╱45╱E╱ // 0x1cf5 @0x8
0x1ced…1d12 at0009 = ╱4b╱K╱ // 0x1cf6 @0x9
0x1ced…1d12 at000a = ╱53╱S╱ // 0x1cf7 @0xa
0x1ced…1d12 at000b = ╱54╱T╱ // 0x1cf8 @0xb
0x1ced…1d12 at000c = ╱ef╱$╱ // 0x1cf9 @0xc
0x1ced…1d12 at000d = ╱dc╱=╱ // 0x1cfa @0xd
0x1ced…1d12 at000e = ╱42╱B╱ // 0x1cfb @0xe
0x1ced…1d12 at000f = ╱4c╱L╱ // 0x1cfc @0xf
0x1ced…1d12 at0010 = ╱41╱A╱ // 0x1cfd @0x10
0x1ced…1d12 at0011 = ╱4e╱N╱ // 0x1cfe @0x11
0x1ced…1d12 at0012 = ╱4b╱K╱ // 0x1cff @0x12
0x1ced…1d12 at0013 = ╱ef╱$╱ // 0x1d00 @0x13
0x1ced…1d12 at0014 = ╱ed╱(╱ // 0x1d01 @0x14
0x1ced…1d12 at0015 = ╱31╱1╱ // 0x1d02 @0x15
0x1ced…1d12 at0016 = ╱fe00008001╱ // 0x1d03 @0x16
0x1ced…1d12 at001b = ╱f0╱:╱ // 0x1d08 @0x1b
0x1ced…1d12 at001c = ╱35╱5╱ // 0x1d09 @0x1c
0x1ced…1d12 at001d = ╱30╱0╱ // 0x1d0a @0x1d
0x1ced…1d12 at001e = ╱fe0000c806╱ // 0x1d0b @0x1e
0x1ced…1d12 at0023 = ╱ee╱)╱ // 0x1d10 @0x23
0x1ced…1d12 at0024 = EOL // 0x1d11 @0x24
0x1ced…1d12 }
0x1d12…1d26 aa7d 2620 IF VARENR=2 THEN
0x1d12…1d26 LineComalBin {
0x1d12…1d26 ptr = 0xaa7d // 0x1d12 @0x0
0x1d12…1d26 lno = 0x0a3c // 0x1d14 @0x2
0x1d12…1d26 at0004 = ╱9c╱ IF ╱ // 0x1d16 @0x4
0x1d12…1d26 at0005 = ╱56╱V╱ // 0x1d17 @0x5
0x1d12…1d26 at0006 = ╱41╱A╱ // 0x1d18 @0x6
0x1d12…1d26 at0007 = ╱52╱R╱ // 0x1d19 @0x7
0x1d12…1d26 at0008 = ╱45╱E╱ // 0x1d1a @0x8
0x1d12…1d26 at0009 = ╱4e╱N╱ // 0x1d1b @0x9
0x1d12…1d26 at000a = ╱52╱R╱ // 0x1d1c @0xa
0x1d12…1d26 at000b = ╱dc╱=╱ // 0x1d1d @0xb
0x1d12…1d26 at000c = ╱32╱2╱ // 0x1d1e @0xc
0x1d12…1d26 at000d = ╱fe00008002╱ // 0x1d1f @0xd
0x1d12…1d26 at0012 = ╱b6╱ THEN ╱ // 0x1d24 @0x12
0x1d12…1d26 at0013 = EOL // 0x1d25 @0x13
0x1d12…1d26 }
0x1d26…1d39 aa90 2630 CURSOR 16,LINIE
0x1d26…1d39 LineComalBin {
0x1d26…1d39 ptr = 0xaa90 // 0x1d26 @0x0
0x1d26…1d39 lno = 0x0a46 // 0x1d28 @0x2
0x1d26…1d39 at0004 = ╱a1╱ CURSOR ╱ // 0x1d2a @0x4
0x1d26…1d39 at0005 = ╱31╱1╱ // 0x1d2b @0x5
0x1d26…1d39 at0006 = ╱36╱6╱ // 0x1d2c @0x6
0x1d26…1d39 at0007 = ╱fe00008005╱ // 0x1d2d @0x7
0x1d26…1d39 at000c = ╱ec╱,╱ // 0x1d32 @0xc
0x1d26…1d39 at000d = ╱4c╱L╱ // 0x1d33 @0xd
0x1d26…1d39 at000e = ╱49╱I╱ // 0x1d34 @0xe
0x1d26…1d39 at000f = ╱4e╱N╱ // 0x1d35 @0xf
0x1d26…1d39 at0010 = ╱49╱I╱ // 0x1d36 @0x10
0x1d26…1d39 at0011 = ╱45╱E╱ // 0x1d37 @0x11
0x1d26…1d39 at0012 = EOL // 0x1d38 @0x12
0x1d26…1d39 }
0x1d39…1d3f aa96 2640 ELSE
0x1d39…1d3f LineComalBin {
0x1d39…1d3f ptr = 0xaa96 // 0x1d39 @0x0
0x1d39…1d3f lno = 0x0a50 // 0x1d3b @0x2
0x1d39…1d3f at0004 = ╱9a╱ ELSE ╱ // 0x1d3d @0x4
0x1d39…1d3f at0005 = EOL // 0x1d3e @0x5
0x1d39…1d3f }
0x1d3f…1d52 aaa9 2650 CURSOR 23,LINIE
0x1d3f…1d52 LineComalBin {
0x1d3f…1d52 ptr = 0xaaa9 // 0x1d3f @0x0
0x1d3f…1d52 lno = 0x0a5a // 0x1d41 @0x2
0x1d3f…1d52 at0004 = ╱a1╱ CURSOR ╱ // 0x1d43 @0x4
0x1d3f…1d52 at0005 = ╱32╱2╱ // 0x1d44 @0x5
0x1d3f…1d52 at0006 = ╱33╱3╱ // 0x1d45 @0x6
0x1d3f…1d52 at0007 = ╱fe0000b805╱ // 0x1d46 @0x7
0x1d3f…1d52 at000c = ╱ec╱,╱ // 0x1d4b @0xc
0x1d3f…1d52 at000d = ╱4c╱L╱ // 0x1d4c @0xd
0x1d3f…1d52 at000e = ╱49╱I╱ // 0x1d4d @0xe
0x1d3f…1d52 at000f = ╱4e╱N╱ // 0x1d4e @0xf
0x1d3f…1d52 at0010 = ╱49╱I╱ // 0x1d4f @0x10
0x1d3f…1d52 at0011 = ╱45╱E╱ // 0x1d50 @0x11
0x1d3f…1d52 at0012 = EOL // 0x1d51 @0x12
0x1d3f…1d52 }
0x1d52…1d58 aaaf 2660 ENDIF
0x1d52…1d58 LineComalBin {
0x1d52…1d58 ptr = 0xaaaf // 0x1d52 @0x0
0x1d52…1d58 lno = 0x0a64 // 0x1d54 @0x2
0x1d52…1d58 at0004 = ╱9b╱ ENDIF ╱ // 0x1d56 @0x4
0x1d52…1d58 at0005 = EOL // 0x1d57 @0x5
0x1d52…1d58 }
0x1d58…1d6b aac2 2670 INPUT " ",VARTEKST$
0x1d58…1d6b LineComalBin {
0x1d58…1d6b ptr = 0xaac2 // 0x1d58 @0x0
0x1d58…1d6b lno = 0x0a6e // 0x1d5a @0x2
0x1d58…1d6b at0004 = ╱91╱ INPUT ╱ // 0x1d5c @0x4
0x1d58…1d6b at0005 = ╱22╱"╱ // 0x1d5d @0x5
0x1d58…1d6b at0006 = ╱20╱…╱ // 0x1d5e @0x6
0x1d58…1d6b at0007 = ╱22╱"╱ // 0x1d5f @0x7
0x1d58…1d6b at0008 = ╱ec╱,╱ // 0x1d60 @0x8
0x1d58…1d6b at0009 = ╱56╱V╱ // 0x1d61 @0x9
0x1d58…1d6b at000a = ╱41╱A╱ // 0x1d62 @0xa
0x1d58…1d6b at000b = ╱52╱R╱ // 0x1d63 @0xb
0x1d58…1d6b at000c = ╱54╱T╱ // 0x1d64 @0xc
0x1d58…1d6b at000d = ╱45╱E╱ // 0x1d65 @0xd
0x1d58…1d6b at000e = ╱4b╱K╱ // 0x1d66 @0xe
0x1d58…1d6b at000f = ╱53╱S╱ // 0x1d67 @0xf
0x1d58…1d6b at0010 = ╱54╱T╱ // 0x1d68 @0x10
0x1d58…1d6b at0011 = ╱ef╱$╱ // 0x1d69 @0x11
0x1d58…1d6b at0012 = EOL // 0x1d6a @0x12
0x1d58…1d6b }
0x1d6b…1d7f aad6 2680 L2=LEN(VARTEKST$)
0x1d6b…1d7f LineComalBin {
0x1d6b…1d7f ptr = 0xaad6 // 0x1d6b @0x0
0x1d6b…1d7f lno = 0x0a78 // 0x1d6d @0x2
0x1d6b…1d7f at0004 = ╱4c╱L╱ // 0x1d6f @0x4
0x1d6b…1d7f at0005 = ╱32╱2╱ // 0x1d70 @0x5
0x1d6b…1d7f at0006 = ╱dc╱=╱ // 0x1d71 @0x6
0x1d6b…1d7f at0007 = ╱cc╱LEN╱ // 0x1d72 @0x7
0x1d6b…1d7f at0008 = ╱ed╱(╱ // 0x1d73 @0x8
0x1d6b…1d7f at0009 = ╱56╱V╱ // 0x1d74 @0x9
0x1d6b…1d7f at000a = ╱41╱A╱ // 0x1d75 @0xa
0x1d6b…1d7f at000b = ╱52╱R╱ // 0x1d76 @0xb
0x1d6b…1d7f at000c = ╱54╱T╱ // 0x1d77 @0xc
0x1d6b…1d7f at000d = ╱45╱E╱ // 0x1d78 @0xd
0x1d6b…1d7f at000e = ╱4b╱K╱ // 0x1d79 @0xe
0x1d6b…1d7f at000f = ╱53╱S╱ // 0x1d7a @0xf
0x1d6b…1d7f at0010 = ╱54╱T╱ // 0x1d7b @0x10
0x1d6b…1d7f at0011 = ╱ef╱$╱ // 0x1d7c @0x11
0x1d6b…1d7f at0012 = ╱ee╱)╱ // 0x1d7d @0x12
0x1d6b…1d7f at0013 = EOL // 0x1d7e @0x13
0x1d6b…1d7f }
0x1d7f…1d99 aaf0 2690 IF L2=0 THEN FE6=1
0x1d7f…1d99 LineComalBin {
0x1d7f…1d99 ptr = 0xaaf0 // 0x1d7f @0x0
0x1d7f…1d99 lno = 0x0a82 // 0x1d81 @0x2
0x1d7f…1d99 at0004 = ╱82╱ IF ╱ // 0x1d83 @0x4
0x1d7f…1d99 at0005 = ╱4c╱L╱ // 0x1d84 @0x5
0x1d7f…1d99 at0006 = ╱32╱2╱ // 0x1d85 @0x6
0x1d7f…1d99 at0007 = ╱dc╱=╱ // 0x1d86 @0x7
0x1d7f…1d99 at0008 = ╱30╱0╱ // 0x1d87 @0x8
0x1d7f…1d99 at0009 = ╱fe00000000╱ // 0x1d88 @0x9
0x1d7f…1d99 at000e = ╱b6╱ THEN ╱ // 0x1d8d @0xe
0x1d7f…1d99 at000f = ╱46╱F╱ // 0x1d8e @0xf
0x1d7f…1d99 at0010 = ╱45╱E╱ // 0x1d8f @0x10
0x1d7f…1d99 at0011 = ╱36╱6╱ // 0x1d90 @0x11
0x1d7f…1d99 at0012 = ╱dc╱=╱ // 0x1d91 @0x12
0x1d7f…1d99 at0013 = ╱31╱1╱ // 0x1d92 @0x13
0x1d7f…1d99 at0014 = ╱fe00008001╱ // 0x1d93 @0x14
0x1d7f…1d99 at0019 = EOL // 0x1d98 @0x19
0x1d7f…1d99 }
0x1d99…1da9 ab00 2700 IF L2>0 THEN
0x1d99…1da9 LineComalBin {
0x1d99…1da9 ptr = 0xab00 // 0x1d99 @0x0
0x1d99…1da9 lno = 0x0a8c // 0x1d9b @0x2
0x1d99…1da9 at0004 = ╱9c╱ IF ╱ // 0x1d9d @0x4
0x1d99…1da9 at0005 = ╱4c╱L╱ // 0x1d9e @0x5
0x1d99…1da9 at0006 = ╱32╱2╱ // 0x1d9f @0x6
0x1d99…1da9 at0007 = ╱de╱>╱ // 0x1da0 @0x7
0x1d99…1da9 at0008 = ╱30╱0╱ // 0x1da1 @0x8
0x1d99…1da9 at0009 = ╱fe00000000╱ // 0x1da2 @0x9
0x1d99…1da9 at000e = ╱b6╱ THEN ╱ // 0x1da7 @0xe
0x1d99…1da9 at000f = EOL // 0x1da8 @0xf
0x1d99…1da9 }
0x1da9…1dbd ab14 2710 IF VARENR=2 THEN
0x1da9…1dbd LineComalBin {
0x1da9…1dbd ptr = 0xab14 // 0x1da9 @0x0
0x1da9…1dbd lno = 0x0a96 // 0x1dab @0x2
0x1da9…1dbd at0004 = ╱9c╱ IF ╱ // 0x1dad @0x4
0x1da9…1dbd at0005 = ╱56╱V╱ // 0x1dae @0x5
0x1da9…1dbd at0006 = ╱41╱A╱ // 0x1daf @0x6
0x1da9…1dbd at0007 = ╱52╱R╱ // 0x1db0 @0x7
0x1da9…1dbd at0008 = ╱45╱E╱ // 0x1db1 @0x8
0x1da9…1dbd at0009 = ╱4e╱N╱ // 0x1db2 @0x9
0x1da9…1dbd at000a = ╱52╱R╱ // 0x1db3 @0xa
0x1da9…1dbd at000b = ╱dc╱=╱ // 0x1db4 @0xb
0x1da9…1dbd at000c = ╱32╱2╱ // 0x1db5 @0xc
0x1da9…1dbd at000d = ╱fe00008002╱ // 0x1db6 @0xd
0x1da9…1dbd at0012 = ╱b6╱ THEN ╱ // 0x1dbb @0x12
0x1da9…1dbd at0013 = EOL // 0x1dbc @0x13
0x1da9…1dbd }
0x1dbd…1dd0 ab27 2720 CURSOR 17,LINIE
0x1dbd…1dd0 LineComalBin {
0x1dbd…1dd0 ptr = 0xab27 // 0x1dbd @0x0
0x1dbd…1dd0 lno = 0x0aa0 // 0x1dbf @0x2
0x1dbd…1dd0 at0004 = ╱a1╱ CURSOR ╱ // 0x1dc1 @0x4
0x1dbd…1dd0 at0005 = ╱31╱1╱ // 0x1dc2 @0x5
0x1dbd…1dd0 at0006 = ╱37╱7╱ // 0x1dc3 @0x6
0x1dbd…1dd0 at0007 = ╱fe00008805╱ // 0x1dc4 @0x7
0x1dbd…1dd0 at000c = ╱ec╱,╱ // 0x1dc9 @0xc
0x1dbd…1dd0 at000d = ╱4c╱L╱ // 0x1dca @0xd
0x1dbd…1dd0 at000e = ╱49╱I╱ // 0x1dcb @0xe
0x1dbd…1dd0 at000f = ╱4e╱N╱ // 0x1dcc @0xf
0x1dbd…1dd0 at0010 = ╱49╱I╱ // 0x1dcd @0x10
0x1dbd…1dd0 at0011 = ╱45╱E╱ // 0x1dce @0x11
0x1dbd…1dd0 at0012 = EOL // 0x1dcf @0x12
0x1dbd…1dd0 }
0x1dd0…1df6 ab4d 2730 PRINT VARTEKST$;BLANK$(1:12)
0x1dd0…1df6 LineComalBin {
0x1dd0…1df6 ptr = 0xab4d // 0x1dd0 @0x0
0x1dd0…1df6 lno = 0x0aaa // 0x1dd2 @0x2
0x1dd0…1df6 at0004 = ╱92╱ PRINT ╱ // 0x1dd4 @0x4
0x1dd0…1df6 at0005 = ╱56╱V╱ // 0x1dd5 @0x5
0x1dd0…1df6 at0006 = ╱41╱A╱ // 0x1dd6 @0x6
0x1dd0…1df6 at0007 = ╱52╱R╱ // 0x1dd7 @0x7
0x1dd0…1df6 at0008 = ╱54╱T╱ // 0x1dd8 @0x8
0x1dd0…1df6 at0009 = ╱45╱E╱ // 0x1dd9 @0x9
0x1dd0…1df6 at000a = ╱4b╱K╱ // 0x1dda @0xa
0x1dd0…1df6 at000b = ╱53╱S╱ // 0x1ddb @0xb
0x1dd0…1df6 at000c = ╱54╱T╱ // 0x1ddc @0xc
0x1dd0…1df6 at000d = ╱ef╱$╱ // 0x1ddd @0xd
0x1dd0…1df6 at000e = ╱eb╱;╱ // 0x1dde @0xe
0x1dd0…1df6 at000f = ╱42╱B╱ // 0x1ddf @0xf
0x1dd0…1df6 at0010 = ╱4c╱L╱ // 0x1de0 @0x10
0x1dd0…1df6 at0011 = ╱41╱A╱ // 0x1de1 @0x11
0x1dd0…1df6 at0012 = ╱4e╱N╱ // 0x1de2 @0x12
0x1dd0…1df6 at0013 = ╱4b╱K╱ // 0x1de3 @0x13
0x1dd0…1df6 at0014 = ╱ef╱$╱ // 0x1de4 @0x14
0x1dd0…1df6 at0015 = ╱ed╱(╱ // 0x1de5 @0x15
0x1dd0…1df6 at0016 = ╱31╱1╱ // 0x1de6 @0x16
0x1dd0…1df6 at0017 = ╱fe00008001╱ // 0x1de7 @0x17
0x1dd0…1df6 at001c = ╱f0╱:╱ // 0x1dec @0x1c
0x1dd0…1df6 at001d = ╱31╱1╱ // 0x1ded @0x1d
0x1dd0…1df6 at001e = ╱32╱2╱ // 0x1dee @0x1e
0x1dd0…1df6 at001f = ╱fe0000c004╱ // 0x1def @0x1f
0x1dd0…1df6 at0024 = ╱ee╱)╱ // 0x1df4 @0x24
0x1dd0…1df6 at0025 = EOL // 0x1df5 @0x25
0x1dd0…1df6 }
0x1df6…1dfc ab53 2740 ELSE
0x1df6…1dfc LineComalBin {
0x1df6…1dfc ptr = 0xab53 // 0x1df6 @0x0
0x1df6…1dfc lno = 0x0ab4 // 0x1df8 @0x2
0x1df6…1dfc at0004 = ╱9a╱ ELSE ╱ // 0x1dfa @0x4
0x1df6…1dfc at0005 = EOL // 0x1dfb @0x5
0x1df6…1dfc }
0x1dfc…1e0f ab66 2750 CURSOR 24,LINIE
0x1dfc…1e0f LineComalBin {
0x1dfc…1e0f ptr = 0xab66 // 0x1dfc @0x0
0x1dfc…1e0f lno = 0x0abe // 0x1dfe @0x2
0x1dfc…1e0f at0004 = ╱a1╱ CURSOR ╱ // 0x1e00 @0x4
0x1dfc…1e0f at0005 = ╱32╱2╱ // 0x1e01 @0x5
0x1dfc…1e0f at0006 = ╱34╱4╱ // 0x1e02 @0x6
0x1dfc…1e0f at0007 = ╱fe0000c005╱ // 0x1e03 @0x7
0x1dfc…1e0f at000c = ╱ec╱,╱ // 0x1e08 @0xc
0x1dfc…1e0f at000d = ╱4c╱L╱ // 0x1e09 @0xd
0x1dfc…1e0f at000e = ╱49╱I╱ // 0x1e0a @0xe
0x1dfc…1e0f at000f = ╱4e╱N╱ // 0x1e0b @0xf
0x1dfc…1e0f at0010 = ╱49╱I╱ // 0x1e0c @0x10
0x1dfc…1e0f at0011 = ╱45╱E╱ // 0x1e0d @0x11
0x1dfc…1e0f at0012 = EOL // 0x1e0e @0x12
0x1dfc…1e0f }
0x1e0f…1e45 ab9c 2760 PRINT VARTEKST$(1:25);BLANK$(1:25)
0x1e0f…1e45 LineComalBin {
0x1e0f…1e45 ptr = 0xab9c // 0x1e0f @0x0
0x1e0f…1e45 lno = 0x0ac8 // 0x1e11 @0x2
0x1e0f…1e45 at0004 = ╱92╱ PRINT ╱ // 0x1e13 @0x4
0x1e0f…1e45 at0005 = ╱56╱V╱ // 0x1e14 @0x5
0x1e0f…1e45 at0006 = ╱41╱A╱ // 0x1e15 @0x6
0x1e0f…1e45 at0007 = ╱52╱R╱ // 0x1e16 @0x7
0x1e0f…1e45 at0008 = ╱54╱T╱ // 0x1e17 @0x8
0x1e0f…1e45 at0009 = ╱45╱E╱ // 0x1e18 @0x9
0x1e0f…1e45 at000a = ╱4b╱K╱ // 0x1e19 @0xa
0x1e0f…1e45 at000b = ╱53╱S╱ // 0x1e1a @0xb
0x1e0f…1e45 at000c = ╱54╱T╱ // 0x1e1b @0xc
0x1e0f…1e45 at000d = ╱ef╱$╱ // 0x1e1c @0xd
0x1e0f…1e45 at000e = ╱ed╱(╱ // 0x1e1d @0xe
0x1e0f…1e45 at000f = ╱31╱1╱ // 0x1e1e @0xf
0x1e0f…1e45 at0010 = ╱fe00008001╱ // 0x1e1f @0x10
0x1e0f…1e45 at0015 = ╱f0╱:╱ // 0x1e24 @0x15
0x1e0f…1e45 at0016 = ╱32╱2╱ // 0x1e25 @0x16
0x1e0f…1e45 at0017 = ╱35╱5╱ // 0x1e26 @0x17
0x1e0f…1e45 at0018 = ╱fe0000c805╱ // 0x1e27 @0x18
0x1e0f…1e45 at001d = ╱ee╱)╱ // 0x1e2c @0x1d
0x1e0f…1e45 at001e = ╱eb╱;╱ // 0x1e2d @0x1e
0x1e0f…1e45 at001f = ╱42╱B╱ // 0x1e2e @0x1f
0x1e0f…1e45 at0020 = ╱4c╱L╱ // 0x1e2f @0x20
0x1e0f…1e45 at0021 = ╱41╱A╱ // 0x1e30 @0x21
0x1e0f…1e45 at0022 = ╱4e╱N╱ // 0x1e31 @0x22
0x1e0f…1e45 at0023 = ╱4b╱K╱ // 0x1e32 @0x23
0x1e0f…1e45 at0024 = ╱ef╱$╱ // 0x1e33 @0x24
0x1e0f…1e45 at0025 = ╱ed╱(╱ // 0x1e34 @0x25
0x1e0f…1e45 at0026 = ╱31╱1╱ // 0x1e35 @0x26
0x1e0f…1e45 at0027 = ╱fe00008001╱ // 0x1e36 @0x27
0x1e0f…1e45 at002c = ╱f0╱:╱ // 0x1e3b @0x2c
0x1e0f…1e45 at002d = ╱32╱2╱ // 0x1e3c @0x2d
0x1e0f…1e45 at002e = ╱35╱5╱ // 0x1e3d @0x2e
0x1e0f…1e45 at002f = ╱fe0000c805╱ // 0x1e3e @0x2f
0x1e0f…1e45 at0034 = ╱ee╱)╱ // 0x1e43 @0x34
0x1e0f…1e45 at0035 = EOL // 0x1e44 @0x35
0x1e0f…1e45 }
0x1e45…1e4b aba2 2770 ENDIF
0x1e45…1e4b LineComalBin {
0x1e45…1e4b ptr = 0xaba2 // 0x1e45 @0x0
0x1e45…1e4b lno = 0x0ad2 // 0x1e47 @0x2
0x1e45…1e4b at0004 = ╱9b╱ ENDIF ╱ // 0x1e49 @0x4
0x1e45…1e4b at0005 = EOL // 0x1e4a @0x5
0x1e45…1e4b }
0x1e4b…1e5f abb6 2780 IF VARENR=1 THEN
0x1e4b…1e5f LineComalBin {
0x1e4b…1e5f ptr = 0xabb6 // 0x1e4b @0x0
0x1e4b…1e5f lno = 0x0adc // 0x1e4d @0x2
0x1e4b…1e5f at0004 = ╱9c╱ IF ╱ // 0x1e4f @0x4
0x1e4b…1e5f at0005 = ╱56╱V╱ // 0x1e50 @0x5
0x1e4b…1e5f at0006 = ╱41╱A╱ // 0x1e51 @0x6
0x1e4b…1e5f at0007 = ╱52╱R╱ // 0x1e52 @0x7
0x1e4b…1e5f at0008 = ╱45╱E╱ // 0x1e53 @0x8
0x1e4b…1e5f at0009 = ╱4e╱N╱ // 0x1e54 @0x9
0x1e4b…1e5f at000a = ╱52╱R╱ // 0x1e55 @0xa
0x1e4b…1e5f at000b = ╱dc╱=╱ // 0x1e56 @0xb
0x1e4b…1e5f at000c = ╱31╱1╱ // 0x1e57 @0xc
0x1e4b…1e5f at000d = ╱fe00008001╱ // 0x1e58 @0xd
0x1e4b…1e5f at0012 = ╱b6╱ THEN ╱ // 0x1e5d @0x12
0x1e4b…1e5f at0013 = EOL // 0x1e5e @0x13
0x1e4b…1e5f }
0x1e5f…1e91 abe8 2790 EXEC INDPUT2(65,LINIE,BLANK$(1),BELØB$)
0x1e5f…1e91 LineComalBin {
0x1e5f…1e91 ptr = 0xabe8 // 0x1e5f @0x0
0x1e5f…1e91 lno = 0x0ae6 // 0x1e61 @0x2
0x1e5f…1e91 at0004 = ╱9d╱ EXEC ╱ // 0x1e63 @0x4
0x1e5f…1e91 at0005 = ╱49╱I╱ // 0x1e64 @0x5
0x1e5f…1e91 at0006 = ╱4e╱N╱ // 0x1e65 @0x6
0x1e5f…1e91 at0007 = ╱44╱D╱ // 0x1e66 @0x7
0x1e5f…1e91 at0008 = ╱50╱P╱ // 0x1e67 @0x8
0x1e5f…1e91 at0009 = ╱55╱U╱ // 0x1e68 @0x9
0x1e5f…1e91 at000a = ╱54╱T╱ // 0x1e69 @0xa
0x1e5f…1e91 at000b = ╱32╱2╱ // 0x1e6a @0xb
0x1e5f…1e91 at000c = ╱ed╱(╱ // 0x1e6b @0xc
0x1e5f…1e91 at000d = ╱36╱6╱ // 0x1e6c @0xd
0x1e5f…1e91 at000e = ╱35╱5╱ // 0x1e6d @0xe
0x1e5f…1e91 at000f = ╱fe00008207╱ // 0x1e6e @0xf
0x1e5f…1e91 at0014 = ╱ec╱,╱ // 0x1e73 @0x14
0x1e5f…1e91 at0015 = ╱4c╱L╱ // 0x1e74 @0x15
0x1e5f…1e91 at0016 = ╱49╱I╱ // 0x1e75 @0x16
0x1e5f…1e91 at0017 = ╱4e╱N╱ // 0x1e76 @0x17
0x1e5f…1e91 at0018 = ╱49╱I╱ // 0x1e77 @0x18
0x1e5f…1e91 at0019 = ╱45╱E╱ // 0x1e78 @0x19
0x1e5f…1e91 at001a = ╱ec╱,╱ // 0x1e79 @0x1a
0x1e5f…1e91 at001b = ╱42╱B╱ // 0x1e7a @0x1b
0x1e5f…1e91 at001c = ╱4c╱L╱ // 0x1e7b @0x1c
0x1e5f…1e91 at001d = ╱41╱A╱ // 0x1e7c @0x1d
0x1e5f…1e91 at001e = ╱4e╱N╱ // 0x1e7d @0x1e
0x1e5f…1e91 at001f = ╱4b╱K╱ // 0x1e7e @0x1f
0x1e5f…1e91 at0020 = ╱ef╱$╱ // 0x1e7f @0x20
0x1e5f…1e91 at0021 = ╱ed╱(╱ // 0x1e80 @0x21
0x1e5f…1e91 at0022 = ╱31╱1╱ // 0x1e81 @0x22
0x1e5f…1e91 at0023 = ╱fe00008001╱ // 0x1e82 @0x23
0x1e5f…1e91 at0028 = ╱ee╱)╱ // 0x1e87 @0x28
0x1e5f…1e91 at0029 = ╱ec╱,╱ // 0x1e88 @0x29
0x1e5f…1e91 at002a = ╱42╱B╱ // 0x1e89 @0x2a
0x1e5f…1e91 at002b = ╱45╱E╱ // 0x1e8a @0x2b
0x1e5f…1e91 at002c = ╱4c╱L╱ // 0x1e8b @0x2c
0x1e5f…1e91 at002d = ╱5c╱Ø╱ // 0x1e8c @0x2d
0x1e5f…1e91 at002e = ╱42╱B╱ // 0x1e8d @0x2e
0x1e5f…1e91 at002f = ╱ef╱$╱ // 0x1e8e @0x2f
0x1e5f…1e91 at0030 = ╱ee╱)╱ // 0x1e8f @0x30
0x1e5f…1e91 at0031 = EOL // 0x1e90 @0x31
0x1e5f…1e91 }
0x1e91…1eb6 ac0d 2800 EXEC CA(0,BELØB$,TOTAL$,TOTAL$)
0x1e91…1eb6 LineComalBin {
0x1e91…1eb6 ptr = 0xac0d // 0x1e91 @0x0
0x1e91…1eb6 lno = 0x0af0 // 0x1e93 @0x2
0x1e91…1eb6 at0004 = ╱9d╱ EXEC ╱ // 0x1e95 @0x4
0x1e91…1eb6 at0005 = ╱43╱C╱ // 0x1e96 @0x5
0x1e91…1eb6 at0006 = ╱41╱A╱ // 0x1e97 @0x6
0x1e91…1eb6 at0007 = ╱ed╱(╱ // 0x1e98 @0x7
0x1e91…1eb6 at0008 = ╱30╱0╱ // 0x1e99 @0x8
0x1e91…1eb6 at0009 = ╱fe00000000╱ // 0x1e9a @0x9
0x1e91…1eb6 at000e = ╱ec╱,╱ // 0x1e9f @0xe
0x1e91…1eb6 at000f = ╱42╱B╱ // 0x1ea0 @0xf
0x1e91…1eb6 at0010 = ╱45╱E╱ // 0x1ea1 @0x10
0x1e91…1eb6 at0011 = ╱4c╱L╱ // 0x1ea2 @0x11
0x1e91…1eb6 at0012 = ╱5c╱Ø╱ // 0x1ea3 @0x12
0x1e91…1eb6 at0013 = ╱42╱B╱ // 0x1ea4 @0x13
0x1e91…1eb6 at0014 = ╱ef╱$╱ // 0x1ea5 @0x14
0x1e91…1eb6 at0015 = ╱ec╱,╱ // 0x1ea6 @0x15
0x1e91…1eb6 at0016 = ╱54╱T╱ // 0x1ea7 @0x16
0x1e91…1eb6 at0017 = ╱4f╱O╱ // 0x1ea8 @0x17
0x1e91…1eb6 at0018 = ╱54╱T╱ // 0x1ea9 @0x18
0x1e91…1eb6 at0019 = ╱41╱A╱ // 0x1eaa @0x19
0x1e91…1eb6 at001a = ╱4c╱L╱ // 0x1eab @0x1a
0x1e91…1eb6 at001b = ╱ef╱$╱ // 0x1eac @0x1b
0x1e91…1eb6 at001c = ╱ec╱,╱ // 0x1ead @0x1c
0x1e91…1eb6 at001d = ╱54╱T╱ // 0x1eae @0x1d
0x1e91…1eb6 at001e = ╱4f╱O╱ // 0x1eaf @0x1e
0x1e91…1eb6 at001f = ╱54╱T╱ // 0x1eb0 @0x1f
0x1e91…1eb6 at0020 = ╱41╱A╱ // 0x1eb1 @0x20
0x1e91…1eb6 at0021 = ╱4c╱L╱ // 0x1eb2 @0x21
0x1e91…1eb6 at0022 = ╱ef╱$╱ // 0x1eb3 @0x22
0x1e91…1eb6 at0023 = ╱ee╱)╱ // 0x1eb4 @0x23
0x1e91…1eb6 at0024 = EOL // 0x1eb5 @0x24
0x1e91…1eb6 }
0x1eb6…1ec9 ac20 2810 CURSOR 66,LINIE
0x1eb6…1ec9 LineComalBin {
0x1eb6…1ec9 ptr = 0xac20 // 0x1eb6 @0x0
0x1eb6…1ec9 lno = 0x0afa // 0x1eb8 @0x2
0x1eb6…1ec9 at0004 = ╱a1╱ CURSOR ╱ // 0x1eba @0x4
0x1eb6…1ec9 at0005 = ╱36╱6╱ // 0x1ebb @0x5
0x1eb6…1ec9 at0006 = ╱36╱6╱ // 0x1ebc @0x6
0x1eb6…1ec9 at0007 = ╱fe00008407╱ // 0x1ebd @0x7
0x1eb6…1ec9 at000c = ╱ec╱,╱ // 0x1ec2 @0xc
0x1eb6…1ec9 at000d = ╱4c╱L╱ // 0x1ec3 @0xd
0x1eb6…1ec9 at000e = ╱49╱I╱ // 0x1ec4 @0xe
0x1eb6…1ec9 at000f = ╱4e╱N╱ // 0x1ec5 @0xf
0x1eb6…1ec9 at0010 = ╱49╱I╱ // 0x1ec6 @0x10
0x1eb6…1ec9 at0011 = ╱45╱E╱ // 0x1ec7 @0x11
0x1eb6…1ec9 at0012 = EOL // 0x1ec8 @0x12
0x1eb6…1ec9 }
0x1ec9…1eee ac45 2820 EXEC TUD(BELØB$,TAL4$,1,0)
0x1ec9…1eee LineComalBin {
0x1ec9…1eee ptr = 0xac45 // 0x1ec9 @0x0
0x1ec9…1eee lno = 0x0b04 // 0x1ecb @0x2
0x1ec9…1eee at0004 = ╱9d╱ EXEC ╱ // 0x1ecd @0x4
0x1ec9…1eee at0005 = ╱54╱T╱ // 0x1ece @0x5
0x1ec9…1eee at0006 = ╱55╱U╱ // 0x1ecf @0x6
0x1ec9…1eee at0007 = ╱44╱D╱ // 0x1ed0 @0x7
0x1ec9…1eee at0008 = ╱ed╱(╱ // 0x1ed1 @0x8
0x1ec9…1eee at0009 = ╱42╱B╱ // 0x1ed2 @0x9
0x1ec9…1eee at000a = ╱45╱E╱ // 0x1ed3 @0xa
0x1ec9…1eee at000b = ╱4c╱L╱ // 0x1ed4 @0xb
0x1ec9…1eee at000c = ╱5c╱Ø╱ // 0x1ed5 @0xc
0x1ec9…1eee at000d = ╱42╱B╱ // 0x1ed6 @0xd
0x1ec9…1eee at000e = ╱ef╱$╱ // 0x1ed7 @0xe
0x1ec9…1eee at000f = ╱ec╱,╱ // 0x1ed8 @0xf
0x1ec9…1eee at0010 = ╱54╱T╱ // 0x1ed9 @0x10
0x1ec9…1eee at0011 = ╱41╱A╱ // 0x1eda @0x11
0x1ec9…1eee at0012 = ╱4c╱L╱ // 0x1edb @0x12
0x1ec9…1eee at0013 = ╱34╱4╱ // 0x1edc @0x13
0x1ec9…1eee at0014 = ╱ef╱$╱ // 0x1edd @0x14
0x1ec9…1eee at0015 = ╱ec╱,╱ // 0x1ede @0x15
0x1ec9…1eee at0016 = ╱31╱1╱ // 0x1edf @0x16
0x1ec9…1eee at0017 = ╱fe00008001╱ // 0x1ee0 @0x17
0x1ec9…1eee at001c = ╱ec╱,╱ // 0x1ee5 @0x1c
0x1ec9…1eee at001d = ╱30╱0╱ // 0x1ee6 @0x1d
0x1ec9…1eee at001e = ╱fe00000000╱ // 0x1ee7 @0x1e
0x1ec9…1eee at0023 = ╱ee╱)╱ // 0x1eec @0x23
0x1ec9…1eee at0024 = EOL // 0x1eed @0x24
0x1ec9…1eee }
0x1eee…1f0b ac62 2830 BELØBARR$(AVALIN)=BELØB$
0x1eee…1f0b LineComalBin {
0x1eee…1f0b ptr = 0xac62 // 0x1eee @0x0
0x1eee…1f0b lno = 0x0b0e // 0x1ef0 @0x2
0x1eee…1f0b at0004 = ╱42╱B╱ // 0x1ef2 @0x4
0x1eee…1f0b at0005 = ╱45╱E╱ // 0x1ef3 @0x5
0x1eee…1f0b at0006 = ╱4c╱L╱ // 0x1ef4 @0x6
0x1eee…1f0b at0007 = ╱5c╱Ø╱ // 0x1ef5 @0x7
0x1eee…1f0b at0008 = ╱42╱B╱ // 0x1ef6 @0x8
0x1eee…1f0b at0009 = ╱41╱A╱ // 0x1ef7 @0x9
0x1eee…1f0b at000a = ╱52╱R╱ // 0x1ef8 @0xa
0x1eee…1f0b at000b = ╱52╱R╱ // 0x1ef9 @0xb
0x1eee…1f0b at000c = ╱ef╱$╱ // 0x1efa @0xc
0x1eee…1f0b at000d = ╱ed╱(╱ // 0x1efb @0xd
0x1eee…1f0b at000e = ╱41╱A╱ // 0x1efc @0xe
0x1eee…1f0b at000f = ╱56╱V╱ // 0x1efd @0xf
0x1eee…1f0b at0010 = ╱41╱A╱ // 0x1efe @0x10
0x1eee…1f0b at0011 = ╱4c╱L╱ // 0x1eff @0x11
0x1eee…1f0b at0012 = ╱49╱I╱ // 0x1f00 @0x12
0x1eee…1f0b at0013 = ╱4e╱N╱ // 0x1f01 @0x13
0x1eee…1f0b at0014 = ╱ee╱)╱ // 0x1f02 @0x14
0x1eee…1f0b at0015 = ╱dc╱=╱ // 0x1f03 @0x15
0x1eee…1f0b at0016 = ╱42╱B╱ // 0x1f04 @0x16
0x1eee…1f0b at0017 = ╱45╱E╱ // 0x1f05 @0x17
0x1eee…1f0b at0018 = ╱4c╱L╱ // 0x1f06 @0x18
0x1eee…1f0b at0019 = ╱5c╱Ø╱ // 0x1f07 @0x19
0x1eee…1f0b at001a = ╱42╱B╱ // 0x1f08 @0x1a
0x1eee…1f0b at001b = ╱ef╱$╱ // 0x1f09 @0x1b
0x1eee…1f0b at001c = EOL // 0x1f0a @0x1c
0x1eee…1f0b }
0x1f0b…1f11 ac68 2840 ELSE
0x1f0b…1f11 LineComalBin {
0x1f0b…1f11 ptr = 0xac68 // 0x1f0b @0x0
0x1f0b…1f11 lno = 0x0b18 // 0x1f0d @0x2
0x1f0b…1f11 at0004 = ╱9a╱ ELSE ╱ // 0x1f0f @0x4
0x1f0b…1f11 at0005 = EOL // 0x1f10 @0x5
0x1f0b…1f11 }
0x1f11…1f2c ac83 2850 BELØBARR$(AVALIN)="0+"
0x1f11…1f2c LineComalBin {
0x1f11…1f2c ptr = 0xac83 // 0x1f11 @0x0
0x1f11…1f2c lno = 0x0b22 // 0x1f13 @0x2
0x1f11…1f2c at0004 = ╱42╱B╱ // 0x1f15 @0x4
0x1f11…1f2c at0005 = ╱45╱E╱ // 0x1f16 @0x5
0x1f11…1f2c at0006 = ╱4c╱L╱ // 0x1f17 @0x6
0x1f11…1f2c at0007 = ╱5c╱Ø╱ // 0x1f18 @0x7
0x1f11…1f2c at0008 = ╱42╱B╱ // 0x1f19 @0x8
0x1f11…1f2c at0009 = ╱41╱A╱ // 0x1f1a @0x9
0x1f11…1f2c at000a = ╱52╱R╱ // 0x1f1b @0xa
0x1f11…1f2c at000b = ╱52╱R╱ // 0x1f1c @0xb
0x1f11…1f2c at000c = ╱ef╱$╱ // 0x1f1d @0xc
0x1f11…1f2c at000d = ╱ed╱(╱ // 0x1f1e @0xd
0x1f11…1f2c at000e = ╱41╱A╱ // 0x1f1f @0xe
0x1f11…1f2c at000f = ╱56╱V╱ // 0x1f20 @0xf
0x1f11…1f2c at0010 = ╱41╱A╱ // 0x1f21 @0x10
0x1f11…1f2c at0011 = ╱4c╱L╱ // 0x1f22 @0x11
0x1f11…1f2c at0012 = ╱49╱I╱ // 0x1f23 @0x12
0x1f11…1f2c at0013 = ╱4e╱N╱ // 0x1f24 @0x13
0x1f11…1f2c at0014 = ╱ee╱)╱ // 0x1f25 @0x14
0x1f11…1f2c at0015 = ╱dc╱=╱ // 0x1f26 @0x15
0x1f11…1f2c at0016 = ╱22╱"╱ // 0x1f27 @0x16
0x1f11…1f2c at0017 = ╱30╱0╱ // 0x1f28 @0x17
0x1f11…1f2c at0018 = ╱2b╱+╱ // 0x1f29 @0x18
0x1f11…1f2c at0019 = ╱22╱"╱ // 0x1f2a @0x19
0x1f11…1f2c at001a = EOL // 0x1f2b @0x1a
0x1f11…1f2c }
0x1f2c…1f32 ac89 2860 ENDIF
0x1f2c…1f32 LineComalBin {
0x1f2c…1f32 ptr = 0xac89 // 0x1f2c @0x0
0x1f2c…1f32 lno = 0x0b2c // 0x1f2e @0x2
0x1f2c…1f32 at0004 = ╱9b╱ ENDIF ╱ // 0x1f30 @0x4
0x1f2c…1f32 at0005 = EOL // 0x1f31 @0x5
0x1f2c…1f32 }
0x1f32…1f69 acc0 2870 VANRARR(AVALIN)=VARENR;VATEKARR$(AVALIN)=VARTEKST$
0x1f32…1f69 LineComalBin {
0x1f32…1f69 ptr = 0xacc0 // 0x1f32 @0x0
0x1f32…1f69 lno = 0x0b36 // 0x1f34 @0x2
0x1f32…1f69 at0004 = ╱56╱V╱ // 0x1f36 @0x4
0x1f32…1f69 at0005 = ╱41╱A╱ // 0x1f37 @0x5
0x1f32…1f69 at0006 = ╱4e╱N╱ // 0x1f38 @0x6
0x1f32…1f69 at0007 = ╱52╱R╱ // 0x1f39 @0x7
0x1f32…1f69 at0008 = ╱41╱A╱ // 0x1f3a @0x8
0x1f32…1f69 at0009 = ╱52╱R╱ // 0x1f3b @0x9
0x1f32…1f69 at000a = ╱52╱R╱ // 0x1f3c @0xa
0x1f32…1f69 at000b = ╱ed╱(╱ // 0x1f3d @0xb
0x1f32…1f69 at000c = ╱41╱A╱ // 0x1f3e @0xc
0x1f32…1f69 at000d = ╱56╱V╱ // 0x1f3f @0xd
0x1f32…1f69 at000e = ╱41╱A╱ // 0x1f40 @0xe
0x1f32…1f69 at000f = ╱4c╱L╱ // 0x1f41 @0xf
0x1f32…1f69 at0010 = ╱49╱I╱ // 0x1f42 @0x10
0x1f32…1f69 at0011 = ╱4e╱N╱ // 0x1f43 @0x11
0x1f32…1f69 at0012 = ╱ee╱)╱ // 0x1f44 @0x12
0x1f32…1f69 at0013 = ╱dc╱=╱ // 0x1f45 @0x13
0x1f32…1f69 at0014 = ╱56╱V╱ // 0x1f46 @0x14
0x1f32…1f69 at0015 = ╱41╱A╱ // 0x1f47 @0x15
0x1f32…1f69 at0016 = ╱52╱R╱ // 0x1f48 @0x16
0x1f32…1f69 at0017 = ╱45╱E╱ // 0x1f49 @0x17
0x1f32…1f69 at0018 = ╱4e╱N╱ // 0x1f4a @0x18
0x1f32…1f69 at0019 = ╱52╱R╱ // 0x1f4b @0x19
0x1f32…1f69 at001a = ╱eb╱;╱ // 0x1f4c @0x1a
0x1f32…1f69 at001b = ╱56╱V╱ // 0x1f4d @0x1b
0x1f32…1f69 at001c = ╱41╱A╱ // 0x1f4e @0x1c
0x1f32…1f69 at001d = ╱54╱T╱ // 0x1f4f @0x1d
0x1f32…1f69 at001e = ╱45╱E╱ // 0x1f50 @0x1e
0x1f32…1f69 at001f = ╱4b╱K╱ // 0x1f51 @0x1f
0x1f32…1f69 at0020 = ╱41╱A╱ // 0x1f52 @0x20
0x1f32…1f69 at0021 = ╱52╱R╱ // 0x1f53 @0x21
0x1f32…1f69 at0022 = ╱52╱R╱ // 0x1f54 @0x22
0x1f32…1f69 at0023 = ╱ef╱$╱ // 0x1f55 @0x23
0x1f32…1f69 at0024 = ╱ed╱(╱ // 0x1f56 @0x24
0x1f32…1f69 at0025 = ╱41╱A╱ // 0x1f57 @0x25
0x1f32…1f69 at0026 = ╱56╱V╱ // 0x1f58 @0x26
0x1f32…1f69 at0027 = ╱41╱A╱ // 0x1f59 @0x27
0x1f32…1f69 at0028 = ╱4c╱L╱ // 0x1f5a @0x28
0x1f32…1f69 at0029 = ╱49╱I╱ // 0x1f5b @0x29
0x1f32…1f69 at002a = ╱4e╱N╱ // 0x1f5c @0x2a
0x1f32…1f69 at002b = ╱ee╱)╱ // 0x1f5d @0x2b
0x1f32…1f69 at002c = ╱dc╱=╱ // 0x1f5e @0x2c
0x1f32…1f69 at002d = ╱56╱V╱ // 0x1f5f @0x2d
0x1f32…1f69 at002e = ╱41╱A╱ // 0x1f60 @0x2e
0x1f32…1f69 at002f = ╱52╱R╱ // 0x1f61 @0x2f
0x1f32…1f69 at0030 = ╱54╱T╱ // 0x1f62 @0x30
0x1f32…1f69 at0031 = ╱45╱E╱ // 0x1f63 @0x31
0x1f32…1f69 at0032 = ╱4b╱K╱ // 0x1f64 @0x32
0x1f32…1f69 at0033 = ╱53╱S╱ // 0x1f65 @0x33
0x1f32…1f69 at0034 = ╱54╱T╱ // 0x1f66 @0x34
0x1f32…1f69 at0035 = ╱ef╱$╱ // 0x1f67 @0x35
0x1f32…1f69 at0036 = EOL // 0x1f68 @0x36
0x1f32…1f69 }
0x1f69…1f6f acc6 2880 ENDIF
0x1f69…1f6f LineComalBin {
0x1f69…1f6f ptr = 0xacc6 // 0x1f69 @0x0
0x1f69…1f6f lno = 0x0b40 // 0x1f6b @0x2
0x1f69…1f6f at0004 = ╱9b╱ ENDIF ╱ // 0x1f6d @0x4
0x1f69…1f6f at0005 = EOL // 0x1f6e @0x5
0x1f69…1f6f }
0x1f6f…1f7c acd3 2890 WHEN 3
0x1f6f…1f7c LineComalBin {
0x1f6f…1f7c ptr = 0xacd3 // 0x1f6f @0x0
0x1f6f…1f7c lno = 0x0b4a // 0x1f71 @0x2
0x1f6f…1f7c at0004 = ╱a301╱ WHEN ╱ // 0x1f73 @0x4
0x1f6f…1f7c at0006 = ╱33╱3╱ // 0x1f75 @0x6
0x1f6f…1f7c at0007 = ╱fe0000c002╱ // 0x1f76 @0x7
0x1f6f…1f7c at000c = EOL // 0x1f7b @0xc
0x1f6f…1f7c }
0x1f7c…1fa0 acf7 2900 IF VANRARR(AVALIN-1)<>3 THEN
0x1f7c…1fa0 LineComalBin {
0x1f7c…1fa0 ptr = 0xacf7 // 0x1f7c @0x0
0x1f7c…1fa0 lno = 0x0b54 // 0x1f7e @0x2
0x1f7c…1fa0 at0004 = ╱9c╱ IF ╱ // 0x1f80 @0x4
0x1f7c…1fa0 at0005 = ╱56╱V╱ // 0x1f81 @0x5
0x1f7c…1fa0 at0006 = ╱41╱A╱ // 0x1f82 @0x6
0x1f7c…1fa0 at0007 = ╱4e╱N╱ // 0x1f83 @0x7
0x1f7c…1fa0 at0008 = ╱52╱R╱ // 0x1f84 @0x8
0x1f7c…1fa0 at0009 = ╱41╱A╱ // 0x1f85 @0x9
0x1f7c…1fa0 at000a = ╱52╱R╱ // 0x1f86 @0xa
0x1f7c…1fa0 at000b = ╱52╱R╱ // 0x1f87 @0xb
0x1f7c…1fa0 at000c = ╱ed╱(╱ // 0x1f88 @0xc
0x1f7c…1fa0 at000d = ╱41╱A╱ // 0x1f89 @0xd
0x1f7c…1fa0 at000e = ╱56╱V╱ // 0x1f8a @0xe
0x1f7c…1fa0 at000f = ╱41╱A╱ // 0x1f8b @0xf
0x1f7c…1fa0 at0010 = ╱4c╱L╱ // 0x1f8c @0x10
0x1f7c…1fa0 at0011 = ╱49╱I╱ // 0x1f8d @0x11
0x1f7c…1fa0 at0012 = ╱4e╱N╱ // 0x1f8e @0x12
0x1f7c…1fa0 at0013 = ╱e3╱-╱ // 0x1f8f @0x13
0x1f7c…1fa0 at0014 = ╱31╱1╱ // 0x1f90 @0x14
0x1f7c…1fa0 at0015 = ╱fe00008001╱ // 0x1f91 @0x15
0x1f7c…1fa0 at001a = ╱ee╱)╱ // 0x1f96 @0x1a
0x1f7c…1fa0 at001b = ╱e1╱<>╱ // 0x1f97 @0x1b
0x1f7c…1fa0 at001c = ╱33╱3╱ // 0x1f98 @0x1c
0x1f7c…1fa0 at001d = ╱fe0000c002╱ // 0x1f99 @0x1d
0x1f7c…1fa0 at0022 = ╱b6╱ THEN ╱ // 0x1f9e @0x22
0x1f7c…1fa0 at0023 = EOL // 0x1f9f @0x23
0x1f7c…1fa0 }
0x1fa0…1fcb ad22 2910 EXEC INDPUT2(24,LINIE,LTX1$,VARPRIS$)
0x1fa0…1fcb LineComalBin {
0x1fa0…1fcb ptr = 0xad22 // 0x1fa0 @0x0
0x1fa0…1fcb lno = 0x0b5e // 0x1fa2 @0x2
0x1fa0…1fcb at0004 = ╱9d╱ EXEC ╱ // 0x1fa4 @0x4
0x1fa0…1fcb at0005 = ╱49╱I╱ // 0x1fa5 @0x5
0x1fa0…1fcb at0006 = ╱4e╱N╱ // 0x1fa6 @0x6
0x1fa0…1fcb at0007 = ╱44╱D╱ // 0x1fa7 @0x7
0x1fa0…1fcb at0008 = ╱50╱P╱ // 0x1fa8 @0x8
0x1fa0…1fcb at0009 = ╱55╱U╱ // 0x1fa9 @0x9
0x1fa0…1fcb at000a = ╱54╱T╱ // 0x1faa @0xa
0x1fa0…1fcb at000b = ╱32╱2╱ // 0x1fab @0xb
0x1fa0…1fcb at000c = ╱ed╱(╱ // 0x1fac @0xc
0x1fa0…1fcb at000d = ╱32╱2╱ // 0x1fad @0xd
0x1fa0…1fcb at000e = ╱34╱4╱ // 0x1fae @0xe
0x1fa0…1fcb at000f = ╱fe0000c005╱ // 0x1faf @0xf
0x1fa0…1fcb at0014 = ╱ec╱,╱ // 0x1fb4 @0x14
0x1fa0…1fcb at0015 = ╱4c╱L╱ // 0x1fb5 @0x15
0x1fa0…1fcb at0016 = ╱49╱I╱ // 0x1fb6 @0x16
0x1fa0…1fcb at0017 = ╱4e╱N╱ // 0x1fb7 @0x17
0x1fa0…1fcb at0018 = ╱49╱I╱ // 0x1fb8 @0x18
0x1fa0…1fcb at0019 = ╱45╱E╱ // 0x1fb9 @0x19
0x1fa0…1fcb at001a = ╱ec╱,╱ // 0x1fba @0x1a
0x1fa0…1fcb at001b = ╱4c╱L╱ // 0x1fbb @0x1b
0x1fa0…1fcb at001c = ╱54╱T╱ // 0x1fbc @0x1c
0x1fa0…1fcb at001d = ╱58╱X╱ // 0x1fbd @0x1d
0x1fa0…1fcb at001e = ╱31╱1╱ // 0x1fbe @0x1e
0x1fa0…1fcb at001f = ╱ef╱$╱ // 0x1fbf @0x1f
0x1fa0…1fcb at0020 = ╱ec╱,╱ // 0x1fc0 @0x20
0x1fa0…1fcb at0021 = ╱56╱V╱ // 0x1fc1 @0x21
0x1fa0…1fcb at0022 = ╱41╱A╱ // 0x1fc2 @0x22
0x1fa0…1fcb at0023 = ╱52╱R╱ // 0x1fc3 @0x23
0x1fa0…1fcb at0024 = ╱50╱P╱ // 0x1fc4 @0x24
0x1fa0…1fcb at0025 = ╱52╱R╱ // 0x1fc5 @0x25
0x1fa0…1fcb at0026 = ╱49╱I╱ // 0x1fc6 @0x26
0x1fa0…1fcb at0027 = ╱53╱S╱ // 0x1fc7 @0x27
0x1fa0…1fcb at0028 = ╱ef╱$╱ // 0x1fc8 @0x28
0x1fa0…1fcb at0029 = ╱ee╱)╱ // 0x1fc9 @0x29
0x1fa0…1fcb at002a = EOL // 0x1fca @0x2a
0x1fa0…1fcb }
0x1fcb…1fee ad45 2920 EXEC CA(4,VARPRIS$,TAH$,TAH$)
0x1fcb…1fee LineComalBin {
0x1fcb…1fee ptr = 0xad45 // 0x1fcb @0x0
0x1fcb…1fee lno = 0x0b68 // 0x1fcd @0x2
0x1fcb…1fee at0004 = ╱9d╱ EXEC ╱ // 0x1fcf @0x4
0x1fcb…1fee at0005 = ╱43╱C╱ // 0x1fd0 @0x5
0x1fcb…1fee at0006 = ╱41╱A╱ // 0x1fd1 @0x6
0x1fcb…1fee at0007 = ╱ed╱(╱ // 0x1fd2 @0x7
0x1fcb…1fee at0008 = ╱34╱4╱ // 0x1fd3 @0x8
0x1fcb…1fee at0009 = ╱fe00008003╱ // 0x1fd4 @0x9
0x1fcb…1fee at000e = ╱ec╱,╱ // 0x1fd9 @0xe
0x1fcb…1fee at000f = ╱56╱V╱ // 0x1fda @0xf
0x1fcb…1fee at0010 = ╱41╱A╱ // 0x1fdb @0x10
0x1fcb…1fee at0011 = ╱52╱R╱ // 0x1fdc @0x11
0x1fcb…1fee at0012 = ╱50╱P╱ // 0x1fdd @0x12
0x1fcb…1fee at0013 = ╱52╱R╱ // 0x1fde @0x13
0x1fcb…1fee at0014 = ╱49╱I╱ // 0x1fdf @0x14
0x1fcb…1fee at0015 = ╱53╱S╱ // 0x1fe0 @0x15
0x1fcb…1fee at0016 = ╱ef╱$╱ // 0x1fe1 @0x16
0x1fcb…1fee at0017 = ╱ec╱,╱ // 0x1fe2 @0x17
0x1fcb…1fee at0018 = ╱54╱T╱ // 0x1fe3 @0x18
0x1fcb…1fee at0019 = ╱41╱A╱ // 0x1fe4 @0x19
0x1fcb…1fee at001a = ╱48╱H╱ // 0x1fe5 @0x1a
0x1fcb…1fee at001b = ╱ef╱$╱ // 0x1fe6 @0x1b
0x1fcb…1fee at001c = ╱ec╱,╱ // 0x1fe7 @0x1c
0x1fcb…1fee at001d = ╱54╱T╱ // 0x1fe8 @0x1d
0x1fcb…1fee at001e = ╱41╱A╱ // 0x1fe9 @0x1e
0x1fcb…1fee at001f = ╱48╱H╱ // 0x1fea @0x1f
0x1fcb…1fee at0020 = ╱ef╱$╱ // 0x1feb @0x20
0x1fcb…1fee at0021 = ╱ee╱)╱ // 0x1fec @0x21
0x1fcb…1fee at0022 = EOL // 0x1fed @0x22
0x1fcb…1fee }
0x1fee…2008 ad5f 2930 IF SI=0 THEN FE6=1
0x1fee…2008 LineComalBin {
0x1fee…2008 ptr = 0xad5f // 0x1fee @0x0
0x1fee…2008 lno = 0x0b72 // 0x1ff0 @0x2
0x1fee…2008 at0004 = ╱82╱ IF ╱ // 0x1ff2 @0x4
0x1fee…2008 at0005 = ╱53╱S╱ // 0x1ff3 @0x5
0x1fee…2008 at0006 = ╱49╱I╱ // 0x1ff4 @0x6
0x1fee…2008 at0007 = ╱dc╱=╱ // 0x1ff5 @0x7
0x1fee…2008 at0008 = ╱30╱0╱ // 0x1ff6 @0x8
0x1fee…2008 at0009 = ╱fe00000000╱ // 0x1ff7 @0x9
0x1fee…2008 at000e = ╱b6╱ THEN ╱ // 0x1ffc @0xe
0x1fee…2008 at000f = ╱46╱F╱ // 0x1ffd @0xf
0x1fee…2008 at0010 = ╱45╱E╱ // 0x1ffe @0x10
0x1fee…2008 at0011 = ╱36╱6╱ // 0x1fff @0x11
0x1fee…2008 at0012 = ╱dc╱=╱ // 0x2000 @0x12
0x1fee…2008 at0013 = ╱31╱1╱ // 0x2001 @0x13
0x1fee…2008 at0014 = ╱fe00008001╱ // 0x2002 @0x14
0x1fee…2008 at0019 = EOL // 0x2007 @0x19
0x1fee…2008 }
0x2008…2019 ad70 2940 IF FE6=0 THEN
0x2008…2019 LineComalBin {
0x2008…2019 ptr = 0xad70 // 0x2008 @0x0
0x2008…2019 lno = 0x0b7c // 0x200a @0x2
0x2008…2019 at0004 = ╱9c╱ IF ╱ // 0x200c @0x4
0x2008…2019 at0005 = ╱46╱F╱ // 0x200d @0x5
0x2008…2019 at0006 = ╱45╱E╱ // 0x200e @0x6
0x2008…2019 at0007 = ╱36╱6╱ // 0x200f @0x7
0x2008…2019 at0008 = ╱dc╱=╱ // 0x2010 @0x8
0x2008…2019 at0009 = ╱30╱0╱ // 0x2011 @0x9
0x2008…2019 at000a = ╱fe00000000╱ // 0x2012 @0xa
0x2008…2019 at000f = ╱b6╱ THEN ╱ // 0x2017 @0xf
0x2008…2019 at0010 = EOL // 0x2018 @0x10
0x2008…2019 }
0x2019…202c ad83 2950 CURSOR 30,LINIE
0x2019…202c LineComalBin {
0x2019…202c ptr = 0xad83 // 0x2019 @0x0
0x2019…202c lno = 0x0b86 // 0x201b @0x2
0x2019…202c at0004 = ╱a1╱ CURSOR ╱ // 0x201d @0x4
0x2019…202c at0005 = ╱33╱3╱ // 0x201e @0x5
0x2019…202c at0006 = ╱30╱0╱ // 0x201f @0x6
0x2019…202c at0007 = ╱fe0000f005╱ // 0x2020 @0x7
0x2019…202c at000c = ╱ec╱,╱ // 0x2025 @0xc
0x2019…202c at000d = ╱4c╱L╱ // 0x2026 @0xd
0x2019…202c at000e = ╱49╱I╱ // 0x2027 @0xe
0x2019…202c at000f = ╱4e╱N╱ // 0x2028 @0xf
0x2019…202c at0010 = ╱49╱I╱ // 0x2029 @0x10
0x2019…202c at0011 = ╱45╱E╱ // 0x202a @0x11
0x2019…202c at0012 = EOL // 0x202b @0x12
0x2019…202c }
0x202c…2065 adbc 2960 PRINT VARPRIS$(7:5);" %";BLANK$(1:25)
0x202c…2065 LineComalBin {
0x202c…2065 ptr = 0xadbc // 0x202c @0x0
0x202c…2065 lno = 0x0b90 // 0x202e @0x2
0x202c…2065 at0004 = ╱92╱ PRINT ╱ // 0x2030 @0x4
0x202c…2065 at0005 = ╱56╱V╱ // 0x2031 @0x5
0x202c…2065 at0006 = ╱41╱A╱ // 0x2032 @0x6
0x202c…2065 at0007 = ╱52╱R╱ // 0x2033 @0x7
0x202c…2065 at0008 = ╱50╱P╱ // 0x2034 @0x8
0x202c…2065 at0009 = ╱52╱R╱ // 0x2035 @0x9
0x202c…2065 at000a = ╱49╱I╱ // 0x2036 @0xa
0x202c…2065 at000b = ╱53╱S╱ // 0x2037 @0xb
0x202c…2065 at000c = ╱ef╱$╱ // 0x2038 @0xc
0x202c…2065 at000d = ╱ed╱(╱ // 0x2039 @0xd
0x202c…2065 at000e = ╱37╱7╱ // 0x203a @0xe
0x202c…2065 at000f = ╱fe0000e003╱ // 0x203b @0xf
0x202c…2065 at0014 = ╱f0╱:╱ // 0x2040 @0x14
0x202c…2065 at0015 = ╱35╱5╱ // 0x2041 @0x15
0x202c…2065 at0016 = ╱fe0000a003╱ // 0x2042 @0x16
0x202c…2065 at001b = ╱ee╱)╱ // 0x2047 @0x1b
0x202c…2065 at001c = ╱eb╱;╱ // 0x2048 @0x1c
0x202c…2065 at001d = ╱22╱"╱ // 0x2049 @0x1d
0x202c…2065 at001e = ╱20╱…╱ // 0x204a @0x1e
0x202c…2065 at001f = ╱25╱%╱ // 0x204b @0x1f
0x202c…2065 at0020 = ╱22╱"╱ // 0x204c @0x20
0x202c…2065 at0021 = ╱eb╱;╱ // 0x204d @0x21
0x202c…2065 at0022 = ╱42╱B╱ // 0x204e @0x22
0x202c…2065 at0023 = ╱4c╱L╱ // 0x204f @0x23
0x202c…2065 at0024 = ╱41╱A╱ // 0x2050 @0x24
0x202c…2065 at0025 = ╱4e╱N╱ // 0x2051 @0x25
0x202c…2065 at0026 = ╱4b╱K╱ // 0x2052 @0x26
0x202c…2065 at0027 = ╱ef╱$╱ // 0x2053 @0x27
0x202c…2065 at0028 = ╱ed╱(╱ // 0x2054 @0x28
0x202c…2065 at0029 = ╱31╱1╱ // 0x2055 @0x29
0x202c…2065 at002a = ╱fe00008001╱ // 0x2056 @0x2a
0x202c…2065 at002f = ╱f0╱:╱ // 0x205b @0x2f
0x202c…2065 at0030 = ╱32╱2╱ // 0x205c @0x30
0x202c…2065 at0031 = ╱35╱5╱ // 0x205d @0x31
0x202c…2065 at0032 = ╱fe0000c805╱ // 0x205e @0x32
0x202c…2065 at0037 = ╱ee╱)╱ // 0x2063 @0x37
0x202c…2065 at0038 = EOL // 0x2064 @0x38
0x202c…2065 }
0x2065…209e adf5 2970 EXEC CA(2,VARPRIS$,BELØBARR$(AVALIN-1),BELØB$)
0x2065…209e LineComalBin {
0x2065…209e ptr = 0xadf5 // 0x2065 @0x0
0x2065…209e lno = 0x0b9a // 0x2067 @0x2
0x2065…209e at0004 = ╱9d╱ EXEC ╱ // 0x2069 @0x4
0x2065…209e at0005 = ╱43╱C╱ // 0x206a @0x5
0x2065…209e at0006 = ╱41╱A╱ // 0x206b @0x6
0x2065…209e at0007 = ╱ed╱(╱ // 0x206c @0x7
0x2065…209e at0008 = ╱32╱2╱ // 0x206d @0x8
0x2065…209e at0009 = ╱fe00008002╱ // 0x206e @0x9
0x2065…209e at000e = ╱ec╱,╱ // 0x2073 @0xe
0x2065…209e at000f = ╱56╱V╱ // 0x2074 @0xf
0x2065…209e at0010 = ╱41╱A╱ // 0x2075 @0x10
0x2065…209e at0011 = ╱52╱R╱ // 0x2076 @0x11
0x2065…209e at0012 = ╱50╱P╱ // 0x2077 @0x12
0x2065…209e at0013 = ╱52╱R╱ // 0x2078 @0x13
0x2065…209e at0014 = ╱49╱I╱ // 0x2079 @0x14
0x2065…209e at0015 = ╱53╱S╱ // 0x207a @0x15
0x2065…209e at0016 = ╱ef╱$╱ // 0x207b @0x16
0x2065…209e at0017 = ╱ec╱,╱ // 0x207c @0x17
0x2065…209e at0018 = ╱42╱B╱ // 0x207d @0x18
0x2065…209e at0019 = ╱45╱E╱ // 0x207e @0x19
0x2065…209e at001a = ╱4c╱L╱ // 0x207f @0x1a
0x2065…209e at001b = ╱5c╱Ø╱ // 0x2080 @0x1b
0x2065…209e at001c = ╱42╱B╱ // 0x2081 @0x1c
0x2065…209e at001d = ╱41╱A╱ // 0x2082 @0x1d
0x2065…209e at001e = ╱52╱R╱ // 0x2083 @0x1e
0x2065…209e at001f = ╱52╱R╱ // 0x2084 @0x1f
0x2065…209e at0020 = ╱ef╱$╱ // 0x2085 @0x20
0x2065…209e at0021 = ╱ed╱(╱ // 0x2086 @0x21
0x2065…209e at0022 = ╱41╱A╱ // 0x2087 @0x22
0x2065…209e at0023 = ╱56╱V╱ // 0x2088 @0x23
0x2065…209e at0024 = ╱41╱A╱ // 0x2089 @0x24
0x2065…209e at0025 = ╱4c╱L╱ // 0x208a @0x25
0x2065…209e at0026 = ╱49╱I╱ // 0x208b @0x26
0x2065…209e at0027 = ╱4e╱N╱ // 0x208c @0x27
0x2065…209e at0028 = ╱e3╱-╱ // 0x208d @0x28
0x2065…209e at0029 = ╱31╱1╱ // 0x208e @0x29
0x2065…209e at002a = ╱fe00008001╱ // 0x208f @0x2a
0x2065…209e at002f = ╱ee╱)╱ // 0x2094 @0x2f
0x2065…209e at0030 = ╱ec╱,╱ // 0x2095 @0x30
0x2065…209e at0031 = ╱42╱B╱ // 0x2096 @0x31
0x2065…209e at0032 = ╱45╱E╱ // 0x2097 @0x32
0x2065…209e at0033 = ╱4c╱L╱ // 0x2098 @0x33
0x2065…209e at0034 = ╱5c╱Ø╱ // 0x2099 @0x34
0x2065…209e at0035 = ╱42╱B╱ // 0x209a @0x35
0x2065…209e at0036 = ╱ef╱$╱ // 0x209b @0x36
0x2065…209e at0037 = ╱ee╱)╱ // 0x209c @0x37
0x2065…209e at0038 = EOL // 0x209d @0x38
0x2065…209e }
0x209e…20da ae31 2980 VATEKARR$(AVALIN)="Rabat "+VARPRIS$(7:5)+" %"
0x209e…20da LineComalBin {
0x209e…20da ptr = 0xae31 // 0x209e @0x0
0x209e…20da lno = 0x0ba4 // 0x20a0 @0x2
0x209e…20da at0004 = ╱56╱V╱ // 0x20a2 @0x4
0x209e…20da at0005 = ╱41╱A╱ // 0x20a3 @0x5
0x209e…20da at0006 = ╱54╱T╱ // 0x20a4 @0x6
0x209e…20da at0007 = ╱45╱E╱ // 0x20a5 @0x7
0x209e…20da at0008 = ╱4b╱K╱ // 0x20a6 @0x8
0x209e…20da at0009 = ╱41╱A╱ // 0x20a7 @0x9
0x209e…20da at000a = ╱52╱R╱ // 0x20a8 @0xa
0x209e…20da at000b = ╱52╱R╱ // 0x20a9 @0xb
0x209e…20da at000c = ╱ef╱$╱ // 0x20aa @0xc
0x209e…20da at000d = ╱ed╱(╱ // 0x20ab @0xd
0x209e…20da at000e = ╱41╱A╱ // 0x20ac @0xe
0x209e…20da at000f = ╱56╱V╱ // 0x20ad @0xf
0x209e…20da at0010 = ╱41╱A╱ // 0x20ae @0x10
0x209e…20da at0011 = ╱4c╱L╱ // 0x20af @0x11
0x209e…20da at0012 = ╱49╱I╱ // 0x20b0 @0x12
0x209e…20da at0013 = ╱4e╱N╱ // 0x20b1 @0x13
0x209e…20da at0014 = ╱ee╱)╱ // 0x20b2 @0x14
0x209e…20da at0015 = ╱dc╱=╱ // 0x20b3 @0x15
0x209e…20da at0016 = ╱22╱"╱ // 0x20b4 @0x16
0x209e…20da at0017 = ╱52╱R╱ // 0x20b5 @0x17
0x209e…20da at0018 = ╱61╱a╱ // 0x20b6 @0x18
0x209e…20da at0019 = ╱62╱b╱ // 0x20b7 @0x19
0x209e…20da at001a = ╱61╱a╱ // 0x20b8 @0x1a
0x209e…20da at001b = ╱74╱t╱ // 0x20b9 @0x1b
0x209e…20da at001c = ╱20╱…╱ // 0x20ba @0x1c
0x209e…20da at001d = ╱22╱"╱ // 0x20bb @0x1d
0x209e…20da at001e = ╱f1╱+╱ // 0x20bc @0x1e
0x209e…20da at001f = ╱56╱V╱ // 0x20bd @0x1f
0x209e…20da at0020 = ╱41╱A╱ // 0x20be @0x20
0x209e…20da at0021 = ╱52╱R╱ // 0x20bf @0x21
0x209e…20da at0022 = ╱50╱P╱ // 0x20c0 @0x22
0x209e…20da at0023 = ╱52╱R╱ // 0x20c1 @0x23
0x209e…20da at0024 = ╱49╱I╱ // 0x20c2 @0x24
0x209e…20da at0025 = ╱53╱S╱ // 0x20c3 @0x25
0x209e…20da at0026 = ╱ef╱$╱ // 0x20c4 @0x26
0x209e…20da at0027 = ╱ed╱(╱ // 0x20c5 @0x27
0x209e…20da at0028 = ╱37╱7╱ // 0x20c6 @0x28
0x209e…20da at0029 = ╱fe0000e003╱ // 0x20c7 @0x29
0x209e…20da at002e = ╱f0╱:╱ // 0x20cc @0x2e
0x209e…20da at002f = ╱35╱5╱ // 0x20cd @0x2f
0x209e…20da at0030 = ╱fe0000a003╱ // 0x20ce @0x30
0x209e…20da at0035 = ╱ee╱)╱ // 0x20d3 @0x35
0x209e…20da at0036 = ╱f1╱+╱ // 0x20d4 @0x36
0x209e…20da at0037 = ╱22╱"╱ // 0x20d5 @0x37
0x209e…20da at0038 = ╱20╱…╱ // 0x20d6 @0x38
0x209e…20da at0039 = ╱25╱%╱ // 0x20d7 @0x39
0x209e…20da at003a = ╱22╱"╱ // 0x20d8 @0x3a
0x209e…20da at003b = EOL // 0x20d9 @0x3b
0x209e…20da }
0x20da…2105 ae5c 2990 VANRARR(AVALIN)=VARENR;VARPRIS$="100-"
0x20da…2105 LineComalBin {
0x20da…2105 ptr = 0xae5c // 0x20da @0x0
0x20da…2105 lno = 0x0bae // 0x20dc @0x2
0x20da…2105 at0004 = ╱56╱V╱ // 0x20de @0x4
0x20da…2105 at0005 = ╱41╱A╱ // 0x20df @0x5
0x20da…2105 at0006 = ╱4e╱N╱ // 0x20e0 @0x6
0x20da…2105 at0007 = ╱52╱R╱ // 0x20e1 @0x7
0x20da…2105 at0008 = ╱41╱A╱ // 0x20e2 @0x8
0x20da…2105 at0009 = ╱52╱R╱ // 0x20e3 @0x9
0x20da…2105 at000a = ╱52╱R╱ // 0x20e4 @0xa
0x20da…2105 at000b = ╱ed╱(╱ // 0x20e5 @0xb
0x20da…2105 at000c = ╱41╱A╱ // 0x20e6 @0xc
0x20da…2105 at000d = ╱56╱V╱ // 0x20e7 @0xd
0x20da…2105 at000e = ╱41╱A╱ // 0x20e8 @0xe
0x20da…2105 at000f = ╱4c╱L╱ // 0x20e9 @0xf
0x20da…2105 at0010 = ╱49╱I╱ // 0x20ea @0x10
0x20da…2105 at0011 = ╱4e╱N╱ // 0x20eb @0x11
0x20da…2105 at0012 = ╱ee╱)╱ // 0x20ec @0x12
0x20da…2105 at0013 = ╱dc╱=╱ // 0x20ed @0x13
0x20da…2105 at0014 = ╱56╱V╱ // 0x20ee @0x14
0x20da…2105 at0015 = ╱41╱A╱ // 0x20ef @0x15
0x20da…2105 at0016 = ╱52╱R╱ // 0x20f0 @0x16
0x20da…2105 at0017 = ╱45╱E╱ // 0x20f1 @0x17
0x20da…2105 at0018 = ╱4e╱N╱ // 0x20f2 @0x18
0x20da…2105 at0019 = ╱52╱R╱ // 0x20f3 @0x19
0x20da…2105 at001a = ╱eb╱;╱ // 0x20f4 @0x1a
0x20da…2105 at001b = ╱56╱V╱ // 0x20f5 @0x1b
0x20da…2105 at001c = ╱41╱A╱ // 0x20f6 @0x1c
0x20da…2105 at001d = ╱52╱R╱ // 0x20f7 @0x1d
0x20da…2105 at001e = ╱50╱P╱ // 0x20f8 @0x1e
0x20da…2105 at001f = ╱52╱R╱ // 0x20f9 @0x1f
0x20da…2105 at0020 = ╱49╱I╱ // 0x20fa @0x20
0x20da…2105 at0021 = ╱53╱S╱ // 0x20fb @0x21
0x20da…2105 at0022 = ╱ef╱$╱ // 0x20fc @0x22
0x20da…2105 at0023 = ╱dc╱=╱ // 0x20fd @0x23
0x20da…2105 at0024 = ╱22╱"╱ // 0x20fe @0x24
0x20da…2105 at0025 = ╱31╱1╱ // 0x20ff @0x25
0x20da…2105 at0026 = ╱30╱0╱ // 0x2100 @0x26
0x20da…2105 at0027 = ╱30╱0╱ // 0x2101 @0x27
0x20da…2105 at0028 = ╱2d╱-╱ // 0x2102 @0x28
0x20da…2105 at0029 = ╱22╱"╱ // 0x2103 @0x29
0x20da…2105 at002a = EOL // 0x2104 @0x2a
0x20da…2105 }
0x2105…212c ae83 3000 EXEC CA(3,BELØB$,VARPRIS$,BELØB$)
0x2105…212c LineComalBin {
0x2105…212c ptr = 0xae83 // 0x2105 @0x0
0x2105…212c lno = 0x0bb8 // 0x2107 @0x2
0x2105…212c at0004 = ╱9d╱ EXEC ╱ // 0x2109 @0x4
0x2105…212c at0005 = ╱43╱C╱ // 0x210a @0x5
0x2105…212c at0006 = ╱41╱A╱ // 0x210b @0x6
0x2105…212c at0007 = ╱ed╱(╱ // 0x210c @0x7
0x2105…212c at0008 = ╱33╱3╱ // 0x210d @0x8
0x2105…212c at0009 = ╱fe0000c002╱ // 0x210e @0x9
0x2105…212c at000e = ╱ec╱,╱ // 0x2113 @0xe
0x2105…212c at000f = ╱42╱B╱ // 0x2114 @0xf
0x2105…212c at0010 = ╱45╱E╱ // 0x2115 @0x10
0x2105…212c at0011 = ╱4c╱L╱ // 0x2116 @0x11
0x2105…212c at0012 = ╱5c╱Ø╱ // 0x2117 @0x12
0x2105…212c at0013 = ╱42╱B╱ // 0x2118 @0x13
0x2105…212c at0014 = ╱ef╱$╱ // 0x2119 @0x14
0x2105…212c at0015 = ╱ec╱,╱ // 0x211a @0x15
0x2105…212c at0016 = ╱56╱V╱ // 0x211b @0x16
0x2105…212c at0017 = ╱41╱A╱ // 0x211c @0x17
0x2105…212c at0018 = ╱52╱R╱ // 0x211d @0x18
0x2105…212c at0019 = ╱50╱P╱ // 0x211e @0x19
0x2105…212c at001a = ╱52╱R╱ // 0x211f @0x1a
0x2105…212c at001b = ╱49╱I╱ // 0x2120 @0x1b
0x2105…212c at001c = ╱53╱S╱ // 0x2121 @0x1c
0x2105…212c at001d = ╱ef╱$╱ // 0x2122 @0x1d
0x2105…212c at001e = ╱ec╱,╱ // 0x2123 @0x1e
0x2105…212c at001f = ╱42╱B╱ // 0x2124 @0x1f
0x2105…212c at0020 = ╱45╱E╱ // 0x2125 @0x20
0x2105…212c at0021 = ╱4c╱L╱ // 0x2126 @0x21
0x2105…212c at0022 = ╱5c╱Ø╱ // 0x2127 @0x22
0x2105…212c at0023 = ╱42╱B╱ // 0x2128 @0x23
0x2105…212c at0024 = ╱ef╱$╱ // 0x2129 @0x24
0x2105…212c at0025 = ╱ee╱)╱ // 0x212a @0x25
0x2105…212c at0026 = EOL // 0x212b @0x26
0x2105…212c }
0x212c…213f ae96 3010 CURSOR 66,LINIE
0x212c…213f LineComalBin {
0x212c…213f ptr = 0xae96 // 0x212c @0x0
0x212c…213f lno = 0x0bc2 // 0x212e @0x2
0x212c…213f at0004 = ╱a1╱ CURSOR ╱ // 0x2130 @0x4
0x212c…213f at0005 = ╱36╱6╱ // 0x2131 @0x5
0x212c…213f at0006 = ╱36╱6╱ // 0x2132 @0x6
0x212c…213f at0007 = ╱fe00008407╱ // 0x2133 @0x7
0x212c…213f at000c = ╱ec╱,╱ // 0x2138 @0xc
0x212c…213f at000d = ╱4c╱L╱ // 0x2139 @0xd
0x212c…213f at000e = ╱49╱I╱ // 0x213a @0xe
0x212c…213f at000f = ╱4e╱N╱ // 0x213b @0xf
0x212c…213f at0010 = ╱49╱I╱ // 0x213c @0x10
0x212c…213f at0011 = ╱45╱E╱ // 0x213d @0x11
0x212c…213f at0012 = EOL // 0x213e @0x12
0x212c…213f }
0x213f…2164 aebb 3020 EXEC TUD(BELØB$,TAL4$,1,0)
0x213f…2164 LineComalBin {
0x213f…2164 ptr = 0xaebb // 0x213f @0x0
0x213f…2164 lno = 0x0bcc // 0x2141 @0x2
0x213f…2164 at0004 = ╱9d╱ EXEC ╱ // 0x2143 @0x4
0x213f…2164 at0005 = ╱54╱T╱ // 0x2144 @0x5
0x213f…2164 at0006 = ╱55╱U╱ // 0x2145 @0x6
0x213f…2164 at0007 = ╱44╱D╱ // 0x2146 @0x7
0x213f…2164 at0008 = ╱ed╱(╱ // 0x2147 @0x8
0x213f…2164 at0009 = ╱42╱B╱ // 0x2148 @0x9
0x213f…2164 at000a = ╱45╱E╱ // 0x2149 @0xa
0x213f…2164 at000b = ╱4c╱L╱ // 0x214a @0xb
0x213f…2164 at000c = ╱5c╱Ø╱ // 0x214b @0xc
0x213f…2164 at000d = ╱42╱B╱ // 0x214c @0xd
0x213f…2164 at000e = ╱ef╱$╱ // 0x214d @0xe
0x213f…2164 at000f = ╱ec╱,╱ // 0x214e @0xf
0x213f…2164 at0010 = ╱54╱T╱ // 0x214f @0x10
0x213f…2164 at0011 = ╱41╱A╱ // 0x2150 @0x11
0x213f…2164 at0012 = ╱4c╱L╱ // 0x2151 @0x12
0x213f…2164 at0013 = ╱34╱4╱ // 0x2152 @0x13
0x213f…2164 at0014 = ╱ef╱$╱ // 0x2153 @0x14
0x213f…2164 at0015 = ╱ec╱,╱ // 0x2154 @0x15
0x213f…2164 at0016 = ╱31╱1╱ // 0x2155 @0x16
0x213f…2164 at0017 = ╱fe00008001╱ // 0x2156 @0x17
0x213f…2164 at001c = ╱ec╱,╱ // 0x215b @0x1c
0x213f…2164 at001d = ╱30╱0╱ // 0x215c @0x1d
0x213f…2164 at001e = ╱fe00000000╱ // 0x215d @0x1e
0x213f…2164 at0023 = ╱ee╱)╱ // 0x2162 @0x23
0x213f…2164 at0024 = EOL // 0x2163 @0x24
0x213f…2164 }
0x2164…2181 aed8 3030 BELØBARR$(AVALIN)=BELØB$
0x2164…2181 LineComalBin {
0x2164…2181 ptr = 0xaed8 // 0x2164 @0x0
0x2164…2181 lno = 0x0bd6 // 0x2166 @0x2
0x2164…2181 at0004 = ╱42╱B╱ // 0x2168 @0x4
0x2164…2181 at0005 = ╱45╱E╱ // 0x2169 @0x5
0x2164…2181 at0006 = ╱4c╱L╱ // 0x216a @0x6
0x2164…2181 at0007 = ╱5c╱Ø╱ // 0x216b @0x7
0x2164…2181 at0008 = ╱42╱B╱ // 0x216c @0x8
0x2164…2181 at0009 = ╱41╱A╱ // 0x216d @0x9
0x2164…2181 at000a = ╱52╱R╱ // 0x216e @0xa
0x2164…2181 at000b = ╱52╱R╱ // 0x216f @0xb
0x2164…2181 at000c = ╱ef╱$╱ // 0x2170 @0xc
0x2164…2181 at000d = ╱ed╱(╱ // 0x2171 @0xd
0x2164…2181 at000e = ╱41╱A╱ // 0x2172 @0xe
0x2164…2181 at000f = ╱56╱V╱ // 0x2173 @0xf
0x2164…2181 at0010 = ╱41╱A╱ // 0x2174 @0x10
0x2164…2181 at0011 = ╱4c╱L╱ // 0x2175 @0x11
0x2164…2181 at0012 = ╱49╱I╱ // 0x2176 @0x12
0x2164…2181 at0013 = ╱4e╱N╱ // 0x2177 @0x13
0x2164…2181 at0014 = ╱ee╱)╱ // 0x2178 @0x14
0x2164…2181 at0015 = ╱dc╱=╱ // 0x2179 @0x15
0x2164…2181 at0016 = ╱42╱B╱ // 0x217a @0x16
0x2164…2181 at0017 = ╱45╱E╱ // 0x217b @0x17
0x2164…2181 at0018 = ╱4c╱L╱ // 0x217c @0x18
0x2164…2181 at0019 = ╱5c╱Ø╱ // 0x217d @0x19
0x2164…2181 at001a = ╱42╱B╱ // 0x217e @0x1a
0x2164…2181 at001b = ╱ef╱$╱ // 0x217f @0x1b
0x2164…2181 at001c = EOL // 0x2180 @0x1c
0x2164…2181 }
0x2181…21a6 aefd 3040 EXEC CA(0,BELØB$,TOTAL$,TOTAL$)
0x2181…21a6 LineComalBin {
0x2181…21a6 ptr = 0xaefd // 0x2181 @0x0
0x2181…21a6 lno = 0x0be0 // 0x2183 @0x2
0x2181…21a6 at0004 = ╱9d╱ EXEC ╱ // 0x2185 @0x4
0x2181…21a6 at0005 = ╱43╱C╱ // 0x2186 @0x5
0x2181…21a6 at0006 = ╱41╱A╱ // 0x2187 @0x6
0x2181…21a6 at0007 = ╱ed╱(╱ // 0x2188 @0x7
0x2181…21a6 at0008 = ╱30╱0╱ // 0x2189 @0x8
0x2181…21a6 at0009 = ╱fe00000000╱ // 0x218a @0x9
0x2181…21a6 at000e = ╱ec╱,╱ // 0x218f @0xe
0x2181…21a6 at000f = ╱42╱B╱ // 0x2190 @0xf
0x2181…21a6 at0010 = ╱45╱E╱ // 0x2191 @0x10
0x2181…21a6 at0011 = ╱4c╱L╱ // 0x2192 @0x11
0x2181…21a6 at0012 = ╱5c╱Ø╱ // 0x2193 @0x12
0x2181…21a6 at0013 = ╱42╱B╱ // 0x2194 @0x13
0x2181…21a6 at0014 = ╱ef╱$╱ // 0x2195 @0x14
0x2181…21a6 at0015 = ╱ec╱,╱ // 0x2196 @0x15
0x2181…21a6 at0016 = ╱54╱T╱ // 0x2197 @0x16
0x2181…21a6 at0017 = ╱4f╱O╱ // 0x2198 @0x17
0x2181…21a6 at0018 = ╱54╱T╱ // 0x2199 @0x18
0x2181…21a6 at0019 = ╱41╱A╱ // 0x219a @0x19
0x2181…21a6 at001a = ╱4c╱L╱ // 0x219b @0x1a
0x2181…21a6 at001b = ╱ef╱$╱ // 0x219c @0x1b
0x2181…21a6 at001c = ╱ec╱,╱ // 0x219d @0x1c
0x2181…21a6 at001d = ╱54╱T╱ // 0x219e @0x1d
0x2181…21a6 at001e = ╱4f╱O╱ // 0x219f @0x1e
0x2181…21a6 at001f = ╱54╱T╱ // 0x21a0 @0x1f
0x2181…21a6 at0020 = ╱41╱A╱ // 0x21a1 @0x20
0x2181…21a6 at0021 = ╱4c╱L╱ // 0x21a2 @0x21
0x2181…21a6 at0022 = ╱ef╱$╱ // 0x21a3 @0x22
0x2181…21a6 at0023 = ╱ee╱)╱ // 0x21a4 @0x23
0x2181…21a6 at0024 = EOL // 0x21a5 @0x24
0x2181…21a6 }
0x21a6…21ac af03 3050 ENDIF
0x21a6…21ac LineComalBin {
0x21a6…21ac ptr = 0xaf03 // 0x21a6 @0x0
0x21a6…21ac lno = 0x0bea // 0x21a8 @0x2
0x21a6…21ac at0004 = ╱9b╱ ENDIF ╱ // 0x21aa @0x4
0x21a6…21ac at0005 = EOL // 0x21ab @0x5
0x21a6…21ac }
0x21ac…21b2 af09 3060 ELSE
0x21ac…21b2 LineComalBin {
0x21ac…21b2 ptr = 0xaf09 // 0x21ac @0x0
0x21ac…21b2 lno = 0x0bf4 // 0x21ae @0x2
0x21ac…21b2 at0004 = ╱9a╱ ELSE ╱ // 0x21b0 @0x4
0x21ac…21b2 at0005 = EOL // 0x21b1 @0x5
0x21ac…21b2 }
0x21b2…21de af35 3070 LINIE=LINIE-1;AVALIN=AVALIN-1
0x21b2…21de LineComalBin {
0x21b2…21de ptr = 0xaf35 // 0x21b2 @0x0
0x21b2…21de lno = 0x0bfe // 0x21b4 @0x2
0x21b2…21de at0004 = ╱4c╱L╱ // 0x21b6 @0x4
0x21b2…21de at0005 = ╱49╱I╱ // 0x21b7 @0x5
0x21b2…21de at0006 = ╱4e╱N╱ // 0x21b8 @0x6
0x21b2…21de at0007 = ╱49╱I╱ // 0x21b9 @0x7
0x21b2…21de at0008 = ╱45╱E╱ // 0x21ba @0x8
0x21b2…21de at0009 = ╱dc╱=╱ // 0x21bb @0x9
0x21b2…21de at000a = ╱4c╱L╱ // 0x21bc @0xa
0x21b2…21de at000b = ╱49╱I╱ // 0x21bd @0xb
0x21b2…21de at000c = ╱4e╱N╱ // 0x21be @0xc
0x21b2…21de at000d = ╱49╱I╱ // 0x21bf @0xd
0x21b2…21de at000e = ╱45╱E╱ // 0x21c0 @0xe
0x21b2…21de at000f = ╱e3╱-╱ // 0x21c1 @0xf
0x21b2…21de at0010 = ╱31╱1╱ // 0x21c2 @0x10
0x21b2…21de at0011 = ╱fe00008001╱ // 0x21c3 @0x11
0x21b2…21de at0016 = ╱eb╱;╱ // 0x21c8 @0x16
0x21b2…21de at0017 = ╱41╱A╱ // 0x21c9 @0x17
0x21b2…21de at0018 = ╱56╱V╱ // 0x21ca @0x18
0x21b2…21de at0019 = ╱41╱A╱ // 0x21cb @0x19
0x21b2…21de at001a = ╱4c╱L╱ // 0x21cc @0x1a
0x21b2…21de at001b = ╱49╱I╱ // 0x21cd @0x1b
0x21b2…21de at001c = ╱4e╱N╱ // 0x21ce @0x1c
0x21b2…21de at001d = ╱dc╱=╱ // 0x21cf @0x1d
0x21b2…21de at001e = ╱41╱A╱ // 0x21d0 @0x1e
0x21b2…21de at001f = ╱56╱V╱ // 0x21d1 @0x1f
0x21b2…21de at0020 = ╱41╱A╱ // 0x21d2 @0x20
0x21b2…21de at0021 = ╱4c╱L╱ // 0x21d3 @0x21
0x21b2…21de at0022 = ╱49╱I╱ // 0x21d4 @0x22
0x21b2…21de at0023 = ╱4e╱N╱ // 0x21d5 @0x23
0x21b2…21de at0024 = ╱e3╱-╱ // 0x21d6 @0x24
0x21b2…21de at0025 = ╱31╱1╱ // 0x21d7 @0x25
0x21b2…21de at0026 = ╱fe00008001╱ // 0x21d8 @0x26
0x21b2…21de at002b = EOL // 0x21dd @0x2b
0x21b2…21de }
0x21de…21e4 af3b 3080 ENDIF
0x21de…21e4 LineComalBin {
0x21de…21e4 ptr = 0xaf3b // 0x21de @0x0
0x21de…21e4 lno = 0x0c08 // 0x21e0 @0x2
0x21de…21e4 at0004 = ╱9b╱ ENDIF ╱ // 0x21e2 @0x4
0x21de…21e4 at0005 = EOL // 0x21e3 @0x5
0x21de…21e4 }
0x21e4…21f1 af48 3090 WHEN 4
0x21e4…21f1 LineComalBin {
0x21e4…21f1 ptr = 0xaf48 // 0x21e4 @0x0
0x21e4…21f1 lno = 0x0c12 // 0x21e6 @0x2
0x21e4…21f1 at0004 = ╱a301╱ WHEN ╱ // 0x21e8 @0x4
0x21e4…21f1 at0006 = ╱34╱4╱ // 0x21ea @0x6
0x21e4…21f1 at0007 = ╱fe00008003╱ // 0x21eb @0x7
0x21e4…21f1 at000c = EOL // 0x21f0 @0xc
0x21e4…21f1 }
0x21f1…2204 af5b 3100 CURSOR 24,LINIE
0x21f1…2204 LineComalBin {
0x21f1…2204 ptr = 0xaf5b // 0x21f1 @0x0
0x21f1…2204 lno = 0x0c1c // 0x21f3 @0x2
0x21f1…2204 at0004 = ╱a1╱ CURSOR ╱ // 0x21f5 @0x4
0x21f1…2204 at0005 = ╱32╱2╱ // 0x21f6 @0x5
0x21f1…2204 at0006 = ╱34╱4╱ // 0x21f7 @0x6
0x21f1…2204 at0007 = ╱fe0000c005╱ // 0x21f8 @0x7
0x21f1…2204 at000c = ╱ec╱,╱ // 0x21fd @0xc
0x21f1…2204 at000d = ╱4c╱L╱ // 0x21fe @0xd
0x21f1…2204 at000e = ╱49╱I╱ // 0x21ff @0xe
0x21f1…2204 at000f = ╱4e╱N╱ // 0x2200 @0xf
0x21f1…2204 at0010 = ╱49╱I╱ // 0x2201 @0x10
0x21f1…2204 at0011 = ╱45╱E╱ // 0x2202 @0x11
0x21f1…2204 at0012 = EOL // 0x2203 @0x12
0x21f1…2204 }
0x2204…222e af85 3110 VARTEKST$="Subtotal "
0x2204…222e LineComalBin {
0x2204…222e ptr = 0xaf85 // 0x2204 @0x0
0x2204…222e lno = 0x0c26 // 0x2206 @0x2
0x2204…222e at0004 = ╱56╱V╱ // 0x2208 @0x4
0x2204…222e at0005 = ╱41╱A╱ // 0x2209 @0x5
0x2204…222e at0006 = ╱52╱R╱ // 0x220a @0x6
0x2204…222e at0007 = ╱54╱T╱ // 0x220b @0x7
0x2204…222e at0008 = ╱45╱E╱ // 0x220c @0x8
0x2204…222e at0009 = ╱4b╱K╱ // 0x220d @0x9
0x2204…222e at000a = ╱53╱S╱ // 0x220e @0xa
0x2204…222e at000b = ╱54╱T╱ // 0x220f @0xb
0x2204…222e at000c = ╱ef╱$╱ // 0x2210 @0xc
0x2204…222e at000d = ╱dc╱=╱ // 0x2211 @0xd
0x2204…222e at000e = ╱22╱"╱ // 0x2212 @0xe
0x2204…222e at000f = ╱53╱S╱ // 0x2213 @0xf
0x2204…222e at0010 = ╱75╱u╱ // 0x2214 @0x10
0x2204…222e at0011 = ╱62╱b╱ // 0x2215 @0x11
0x2204…222e at0012 = ╱74╱t╱ // 0x2216 @0x12
0x2204…222e at0013 = ╱6f╱o╱ // 0x2217 @0x13
0x2204…222e at0014 = ╱74╱t╱ // 0x2218 @0x14
0x2204…222e at0015 = ╱61╱a╱ // 0x2219 @0x15
0x2204…222e at0016 = ╱6c╱l╱ // 0x221a @0x16
0x2204…222e at0017 = ╱20╱…╱ // 0x221b @0x17
0x2204…222e at0018 = ╱20╱…╱ // 0x221c @0x18
0x2204…222e at0019 = ╱20╱…╱ // 0x221d @0x19
0x2204…222e at001a = ╱20╱…╱ // 0x221e @0x1a
0x2204…222e at001b = ╱20╱…╱ // 0x221f @0x1b
0x2204…222e at001c = ╱20╱…╱ // 0x2220 @0x1c
0x2204…222e at001d = ╱20╱…╱ // 0x2221 @0x1d
0x2204…222e at001e = ╱20╱…╱ // 0x2222 @0x1e
0x2204…222e at001f = ╱20╱…╱ // 0x2223 @0x1f
0x2204…222e at0020 = ╱20╱…╱ // 0x2224 @0x20
0x2204…222e at0021 = ╱20╱…╱ // 0x2225 @0x21
0x2204…222e at0022 = ╱20╱…╱ // 0x2226 @0x22
0x2204…222e at0023 = ╱20╱…╱ // 0x2227 @0x23
0x2204…222e at0024 = ╱20╱…╱ // 0x2228 @0x24
0x2204…222e at0025 = ╱20╱…╱ // 0x2229 @0x25
0x2204…222e at0026 = ╱20╱…╱ // 0x222a @0x26
0x2204…222e at0027 = ╱20╱…╱ // 0x222b @0x27
0x2204…222e at0028 = ╱22╱"╱ // 0x222c @0x28
0x2204…222e at0029 = EOL // 0x222d @0x29
0x2204…222e }
0x222e…223d af94 3120 PRINT VARTEKST$
0x222e…223d LineComalBin {
0x222e…223d ptr = 0xaf94 // 0x222e @0x0
0x222e…223d lno = 0x0c30 // 0x2230 @0x2
0x222e…223d at0004 = ╱92╱ PRINT ╱ // 0x2232 @0x4
0x222e…223d at0005 = ╱56╱V╱ // 0x2233 @0x5
0x222e…223d at0006 = ╱41╱A╱ // 0x2234 @0x6
0x222e…223d at0007 = ╱52╱R╱ // 0x2235 @0x7
0x222e…223d at0008 = ╱54╱T╱ // 0x2236 @0x8
0x222e…223d at0009 = ╱45╱E╱ // 0x2237 @0x9
0x222e…223d at000a = ╱4b╱K╱ // 0x2238 @0xa
0x222e…223d at000b = ╱53╱S╱ // 0x2239 @0xb
0x222e…223d at000c = ╱54╱T╱ // 0x223a @0xc
0x222e…223d at000d = ╱ef╱$╱ // 0x223b @0xd
0x222e…223d at000e = EOL // 0x223c @0xe
0x222e…223d }
0x223d…2250 afa7 3130 CURSOR 66,LINIE
0x223d…2250 LineComalBin {
0x223d…2250 ptr = 0xafa7 // 0x223d @0x0
0x223d…2250 lno = 0x0c3a // 0x223f @0x2
0x223d…2250 at0004 = ╱a1╱ CURSOR ╱ // 0x2241 @0x4
0x223d…2250 at0005 = ╱36╱6╱ // 0x2242 @0x5
0x223d…2250 at0006 = ╱36╱6╱ // 0x2243 @0x6
0x223d…2250 at0007 = ╱fe00008407╱ // 0x2244 @0x7
0x223d…2250 at000c = ╱ec╱,╱ // 0x2249 @0xc
0x223d…2250 at000d = ╱4c╱L╱ // 0x224a @0xd
0x223d…2250 at000e = ╱49╱I╱ // 0x224b @0xe
0x223d…2250 at000f = ╱4e╱N╱ // 0x224c @0xf
0x223d…2250 at0010 = ╱49╱I╱ // 0x224d @0x10
0x223d…2250 at0011 = ╱45╱E╱ // 0x224e @0x11
0x223d…2250 at0012 = EOL // 0x224f @0x12
0x223d…2250 }
0x2250…2275 afcc 3140 EXEC TUD(TOTAL$,TAL4$,1,0)
0x2250…2275 LineComalBin {
0x2250…2275 ptr = 0xafcc // 0x2250 @0x0
0x2250…2275 lno = 0x0c44 // 0x2252 @0x2
0x2250…2275 at0004 = ╱9d╱ EXEC ╱ // 0x2254 @0x4
0x2250…2275 at0005 = ╱54╱T╱ // 0x2255 @0x5
0x2250…2275 at0006 = ╱55╱U╱ // 0x2256 @0x6
0x2250…2275 at0007 = ╱44╱D╱ // 0x2257 @0x7
0x2250…2275 at0008 = ╱ed╱(╱ // 0x2258 @0x8
0x2250…2275 at0009 = ╱54╱T╱ // 0x2259 @0x9
0x2250…2275 at000a = ╱4f╱O╱ // 0x225a @0xa
0x2250…2275 at000b = ╱54╱T╱ // 0x225b @0xb
0x2250…2275 at000c = ╱41╱A╱ // 0x225c @0xc
0x2250…2275 at000d = ╱4c╱L╱ // 0x225d @0xd
0x2250…2275 at000e = ╱ef╱$╱ // 0x225e @0xe
0x2250…2275 at000f = ╱ec╱,╱ // 0x225f @0xf
0x2250…2275 at0010 = ╱54╱T╱ // 0x2260 @0x10
0x2250…2275 at0011 = ╱41╱A╱ // 0x2261 @0x11
0x2250…2275 at0012 = ╱4c╱L╱ // 0x2262 @0x12
0x2250…2275 at0013 = ╱34╱4╱ // 0x2263 @0x13
0x2250…2275 at0014 = ╱ef╱$╱ // 0x2264 @0x14
0x2250…2275 at0015 = ╱ec╱,╱ // 0x2265 @0x15
0x2250…2275 at0016 = ╱31╱1╱ // 0x2266 @0x16
0x2250…2275 at0017 = ╱fe00008001╱ // 0x2267 @0x17
0x2250…2275 at001c = ╱ec╱,╱ // 0x226c @0x1c
0x2250…2275 at001d = ╱30╱0╱ // 0x226d @0x1d
0x2250…2275 at001e = ╱fe00000000╱ // 0x226e @0x1e
0x2250…2275 at0023 = ╱ee╱)╱ // 0x2273 @0x23
0x2250…2275 at0024 = EOL // 0x2274 @0x24
0x2250…2275 }
0x2275…22ac b003 3150 VANRARR(AVALIN)=VARENR;VATEKARR$(AVALIN)=VARTEKST$
0x2275…22ac LineComalBin {
0x2275…22ac ptr = 0xb003 // 0x2275 @0x0
0x2275…22ac lno = 0x0c4e // 0x2277 @0x2
0x2275…22ac at0004 = ╱56╱V╱ // 0x2279 @0x4
0x2275…22ac at0005 = ╱41╱A╱ // 0x227a @0x5
0x2275…22ac at0006 = ╱4e╱N╱ // 0x227b @0x6
0x2275…22ac at0007 = ╱52╱R╱ // 0x227c @0x7
0x2275…22ac at0008 = ╱41╱A╱ // 0x227d @0x8
0x2275…22ac at0009 = ╱52╱R╱ // 0x227e @0x9
0x2275…22ac at000a = ╱52╱R╱ // 0x227f @0xa
0x2275…22ac at000b = ╱ed╱(╱ // 0x2280 @0xb
0x2275…22ac at000c = ╱41╱A╱ // 0x2281 @0xc
0x2275…22ac at000d = ╱56╱V╱ // 0x2282 @0xd
0x2275…22ac at000e = ╱41╱A╱ // 0x2283 @0xe
0x2275…22ac at000f = ╱4c╱L╱ // 0x2284 @0xf
0x2275…22ac at0010 = ╱49╱I╱ // 0x2285 @0x10
0x2275…22ac at0011 = ╱4e╱N╱ // 0x2286 @0x11
0x2275…22ac at0012 = ╱ee╱)╱ // 0x2287 @0x12
0x2275…22ac at0013 = ╱dc╱=╱ // 0x2288 @0x13
0x2275…22ac at0014 = ╱56╱V╱ // 0x2289 @0x14
0x2275…22ac at0015 = ╱41╱A╱ // 0x228a @0x15
0x2275…22ac at0016 = ╱52╱R╱ // 0x228b @0x16
0x2275…22ac at0017 = ╱45╱E╱ // 0x228c @0x17
0x2275…22ac at0018 = ╱4e╱N╱ // 0x228d @0x18
0x2275…22ac at0019 = ╱52╱R╱ // 0x228e @0x19
0x2275…22ac at001a = ╱eb╱;╱ // 0x228f @0x1a
0x2275…22ac at001b = ╱56╱V╱ // 0x2290 @0x1b
0x2275…22ac at001c = ╱41╱A╱ // 0x2291 @0x1c
0x2275…22ac at001d = ╱54╱T╱ // 0x2292 @0x1d
0x2275…22ac at001e = ╱45╱E╱ // 0x2293 @0x1e
0x2275…22ac at001f = ╱4b╱K╱ // 0x2294 @0x1f
0x2275…22ac at0020 = ╱41╱A╱ // 0x2295 @0x20
0x2275…22ac at0021 = ╱52╱R╱ // 0x2296 @0x21
0x2275…22ac at0022 = ╱52╱R╱ // 0x2297 @0x22
0x2275…22ac at0023 = ╱ef╱$╱ // 0x2298 @0x23
0x2275…22ac at0024 = ╱ed╱(╱ // 0x2299 @0x24
0x2275…22ac at0025 = ╱41╱A╱ // 0x229a @0x25
0x2275…22ac at0026 = ╱56╱V╱ // 0x229b @0x26
0x2275…22ac at0027 = ╱41╱A╱ // 0x229c @0x27
0x2275…22ac at0028 = ╱4c╱L╱ // 0x229d @0x28
0x2275…22ac at0029 = ╱49╱I╱ // 0x229e @0x29
0x2275…22ac at002a = ╱4e╱N╱ // 0x229f @0x2a
0x2275…22ac at002b = ╱ee╱)╱ // 0x22a0 @0x2b
0x2275…22ac at002c = ╱dc╱=╱ // 0x22a1 @0x2c
0x2275…22ac at002d = ╱56╱V╱ // 0x22a2 @0x2d
0x2275…22ac at002e = ╱41╱A╱ // 0x22a3 @0x2e
0x2275…22ac at002f = ╱52╱R╱ // 0x22a4 @0x2f
0x2275…22ac at0030 = ╱54╱T╱ // 0x22a5 @0x30
0x2275…22ac at0031 = ╱45╱E╱ // 0x22a6 @0x31
0x2275…22ac at0032 = ╱4b╱K╱ // 0x22a7 @0x32
0x2275…22ac at0033 = ╱53╱S╱ // 0x22a8 @0x33
0x2275…22ac at0034 = ╱54╱T╱ // 0x22a9 @0x34
0x2275…22ac at0035 = ╱ef╱$╱ // 0x22aa @0x35
0x2275…22ac at0036 = EOL // 0x22ab @0x36
0x2275…22ac }
0x22ac…22c9 b020 3160 BELØBARR$(AVALIN)=TOTAL$
0x22ac…22c9 LineComalBin {
0x22ac…22c9 ptr = 0xb020 // 0x22ac @0x0
0x22ac…22c9 lno = 0x0c58 // 0x22ae @0x2
0x22ac…22c9 at0004 = ╱42╱B╱ // 0x22b0 @0x4
0x22ac…22c9 at0005 = ╱45╱E╱ // 0x22b1 @0x5
0x22ac…22c9 at0006 = ╱4c╱L╱ // 0x22b2 @0x6
0x22ac…22c9 at0007 = ╱5c╱Ø╱ // 0x22b3 @0x7
0x22ac…22c9 at0008 = ╱42╱B╱ // 0x22b4 @0x8
0x22ac…22c9 at0009 = ╱41╱A╱ // 0x22b5 @0x9
0x22ac…22c9 at000a = ╱52╱R╱ // 0x22b6 @0xa
0x22ac…22c9 at000b = ╱52╱R╱ // 0x22b7 @0xb
0x22ac…22c9 at000c = ╱ef╱$╱ // 0x22b8 @0xc
0x22ac…22c9 at000d = ╱ed╱(╱ // 0x22b9 @0xd
0x22ac…22c9 at000e = ╱41╱A╱ // 0x22ba @0xe
0x22ac…22c9 at000f = ╱56╱V╱ // 0x22bb @0xf
0x22ac…22c9 at0010 = ╱41╱A╱ // 0x22bc @0x10
0x22ac…22c9 at0011 = ╱4c╱L╱ // 0x22bd @0x11
0x22ac…22c9 at0012 = ╱49╱I╱ // 0x22be @0x12
0x22ac…22c9 at0013 = ╱4e╱N╱ // 0x22bf @0x13
0x22ac…22c9 at0014 = ╱ee╱)╱ // 0x22c0 @0x14
0x22ac…22c9 at0015 = ╱dc╱=╱ // 0x22c1 @0x15
0x22ac…22c9 at0016 = ╱54╱T╱ // 0x22c2 @0x16
0x22ac…22c9 at0017 = ╱4f╱O╱ // 0x22c3 @0x17
0x22ac…22c9 at0018 = ╱54╱T╱ // 0x22c4 @0x18
0x22ac…22c9 at0019 = ╱41╱A╱ // 0x22c5 @0x19
0x22ac…22c9 at001a = ╱4c╱L╱ // 0x22c6 @0x1a
0x22ac…22c9 at001b = ╱ef╱$╱ // 0x22c7 @0x1b
0x22ac…22c9 at001c = EOL // 0x22c8 @0x1c
0x22ac…22c9 }
0x22c9…22cf b026 3170 ENDCASE
0x22c9…22cf LineComalBin {
0x22c9…22cf ptr = 0xb026 // 0x22c9 @0x0
0x22c9…22cf lno = 0x0c62 // 0x22cb @0x2
0x22c9…22cf at0004 = ╱a4╱ ENDCASE ╱ // 0x22cd @0x4
0x22c9…22cf at0005 = EOL // 0x22ce @0x5
0x22c9…22cf }
0x22cf…22d5 b02c 3180 ELSE
0x22cf…22d5 LineComalBin {
0x22cf…22d5 ptr = 0xb02c // 0x22cf @0x0
0x22cf…22d5 lno = 0x0c6c // 0x22d1 @0x2
0x22cf…22d5 at0004 = ╱9a╱ ELSE ╱ // 0x22d3 @0x4
0x22cf…22d5 at0005 = EOL // 0x22d4 @0x5
0x22cf…22d5 }
0x22d5…22e7 b03e 3190 VARENR=0
0x22d5…22e7 LineComalBin {
0x22d5…22e7 ptr = 0xb03e // 0x22d5 @0x0
0x22d5…22e7 lno = 0x0c76 // 0x22d7 @0x2
0x22d5…22e7 at0004 = ╱56╱V╱ // 0x22d9 @0x4
0x22d5…22e7 at0005 = ╱41╱A╱ // 0x22da @0x5
0x22d5…22e7 at0006 = ╱52╱R╱ // 0x22db @0x6
0x22d5…22e7 at0007 = ╱45╱E╱ // 0x22dc @0x7
0x22d5…22e7 at0008 = ╱4e╱N╱ // 0x22dd @0x8
0x22d5…22e7 at0009 = ╱52╱R╱ // 0x22de @0x9
0x22d5…22e7 at000a = ╱dc╱=╱ // 0x22df @0xa
0x22d5…22e7 at000b = ╱30╱0╱ // 0x22e0 @0xb
0x22d5…22e7 at000c = ╱fe00000000╱ // 0x22e1 @0xc
0x22d5…22e7 at0011 = EOL // 0x22e6 @0x11
0x22d5…22e7 }
0x22e7…22f9 b050 3200 CURSOR 2,LINIE
0x22e7…22f9 LineComalBin {
0x22e7…22f9 ptr = 0xb050 // 0x22e7 @0x0
0x22e7…22f9 lno = 0x0c80 // 0x22e9 @0x2
0x22e7…22f9 at0004 = ╱a1╱ CURSOR ╱ // 0x22eb @0x4
0x22e7…22f9 at0005 = ╱32╱2╱ // 0x22ec @0x5
0x22e7…22f9 at0006 = ╱fe00008002╱ // 0x22ed @0x6
0x22e7…22f9 at000b = ╱ec╱,╱ // 0x22f2 @0xb
0x22e7…22f9 at000c = ╱4c╱L╱ // 0x22f3 @0xc
0x22e7…22f9 at000d = ╱49╱I╱ // 0x22f4 @0xd
0x22e7…22f9 at000e = ╱4e╱N╱ // 0x22f5 @0xe
0x22e7…22f9 at000f = ╱49╱I╱ // 0x22f6 @0xf
0x22e7…22f9 at0010 = ╱45╱E╱ // 0x22f7 @0x10
0x22e7…22f9 at0011 = EOL // 0x22f8 @0x11
0x22e7…22f9 }
0x22f9…2315 b06c 3210 PRINT BLANK$(1:25)
0x22f9…2315 LineComalBin {
0x22f9…2315 ptr = 0xb06c // 0x22f9 @0x0
0x22f9…2315 lno = 0x0c8a // 0x22fb @0x2
0x22f9…2315 at0004 = ╱92╱ PRINT ╱ // 0x22fd @0x4
0x22f9…2315 at0005 = ╱42╱B╱ // 0x22fe @0x5
0x22f9…2315 at0006 = ╱4c╱L╱ // 0x22ff @0x6
0x22f9…2315 at0007 = ╱41╱A╱ // 0x2300 @0x7
0x22f9…2315 at0008 = ╱4e╱N╱ // 0x2301 @0x8
0x22f9…2315 at0009 = ╱4b╱K╱ // 0x2302 @0x9
0x22f9…2315 at000a = ╱ef╱$╱ // 0x2303 @0xa
0x22f9…2315 at000b = ╱ed╱(╱ // 0x2304 @0xb
0x22f9…2315 at000c = ╱31╱1╱ // 0x2305 @0xc
0x22f9…2315 at000d = ╱fe00008001╱ // 0x2306 @0xd
0x22f9…2315 at0012 = ╱f0╱:╱ // 0x230b @0x12
0x22f9…2315 at0013 = ╱32╱2╱ // 0x230c @0x13
0x22f9…2315 at0014 = ╱35╱5╱ // 0x230d @0x14
0x22f9…2315 at0015 = ╱fe0000c805╱ // 0x230e @0x15
0x22f9…2315 at001a = ╱ee╱)╱ // 0x2313 @0x1a
0x22f9…2315 at001b = EOL // 0x2314 @0x1b
0x22f9…2315 }
0x2315…231b b072 3220 ENDIF
0x2315…231b LineComalBin {
0x2315…231b ptr = 0xb072 // 0x2315 @0x0
0x2315…231b lno = 0x0c94 // 0x2317 @0x2
0x2315…231b at0004 = ╱9b╱ ENDIF ╱ // 0x2319 @0x4
0x2315…231b at0005 = EOL // 0x231a @0x5
0x2315…231b }
0x231b…232b b082 3230 UNTIL FE6=0
0x231b…232b LineComalBin {
0x231b…232b ptr = 0xb082 // 0x231b @0x0
0x231b…232b lno = 0x0c9e // 0x231d @0x2
0x231b…232b at0004 = ╱98╱ UNTIL ╱ // 0x231f @0x4
0x231b…232b at0005 = ╱46╱F╱ // 0x2320 @0x5
0x231b…232b at0006 = ╱45╱E╱ // 0x2321 @0x6
0x231b…232b at0007 = ╱36╱6╱ // 0x2322 @0x7
0x231b…232b at0008 = ╱dc╱=╱ // 0x2323 @0x8
0x231b…232b at0009 = ╱30╱0╱ // 0x2324 @0x9
0x231b…232b at000a = ╱fe00000000╱ // 0x2325 @0xa
0x231b…232b at000f = EOL // 0x232a @0xf
0x231b…232b }
0x232b…2331 b088 3240 ENDPROC
0x232b…2331 LineComalBin {
0x232b…2331 ptr = 0xb088 // 0x232b @0x0
0x232b…2331 lno = 0x0ca8 // 0x232d @0x2
0x232b…2331 at0004 = ╱9f╱ ENDPROC ╱ // 0x232f @0x4
0x232b…2331 at0005 = EOL // 0x2330 @0x5
0x232b…2331 }
0x2331…233f (117,) b096 3250 PROC LINITEST
0x2331…233f LineComalBin {
0x2331…233f ptr = 0xb096 // 0x2331 @0x0
0x2331…233f lno = 0x0cb2 // 0x2333 @0x2
0x2331…233f at0004 = ╱9e╱ PROC ╱ // 0x2335 @0x4
0x2331…233f at0005 = ╱4c╱L╱ // 0x2336 @0x5
0x2331…233f at0006 = ╱49╱I╱ // 0x2337 @0x6
0x2331…233f at0007 = ╱4e╱N╱ // 0x2338 @0x7
0x2331…233f at0008 = ╱49╱I╱ // 0x2339 @0x8
0x2331…233f at0009 = ╱54╱T╱ // 0x233a @0x9
0x2331…233f at000a = ╱45╱E╱ // 0x233b @0xa
0x2331…233f at000b = ╱53╱S╱ // 0x233c @0xb
0x2331…233f at000c = ╱54╱T╱ // 0x233d @0xc
0x2331…233f at000d = EOL // 0x233e @0xd
0x2331…233f }
0x233f…2353 b0aa 3260 IF LINIE>23 THEN
0x233f…2353 LineComalBin {
0x233f…2353 ptr = 0xb0aa // 0x233f @0x0
0x233f…2353 lno = 0x0cbc // 0x2341 @0x2
0x233f…2353 at0004 = ╱9c╱ IF ╱ // 0x2343 @0x4
0x233f…2353 at0005 = ╱4c╱L╱ // 0x2344 @0x5
0x233f…2353 at0006 = ╱49╱I╱ // 0x2345 @0x6
0x233f…2353 at0007 = ╱4e╱N╱ // 0x2346 @0x7
0x233f…2353 at0008 = ╱49╱I╱ // 0x2347 @0x8
0x233f…2353 at0009 = ╱45╱E╱ // 0x2348 @0x9
0x233f…2353 at000a = ╱de╱>╱ // 0x2349 @0xa
0x233f…2353 at000b = ╱32╱2╱ // 0x234a @0xb
0x233f…2353 at000c = ╱33╱3╱ // 0x234b @0xc
0x233f…2353 at000d = ╱fe0000b805╱ // 0x234c @0xd
0x233f…2353 at0012 = ╱b6╱ THEN ╱ // 0x2351 @0x12
0x233f…2353 at0013 = EOL // 0x2352 @0x13
0x233f…2353 }
0x2353…2361 b0b8 3270 EXEC FAKHOVED
0x2353…2361 LineComalBin {
0x2353…2361 ptr = 0xb0b8 // 0x2353 @0x0
0x2353…2361 lno = 0x0cc6 // 0x2355 @0x2
0x2353…2361 at0004 = ╱9d╱ EXEC ╱ // 0x2357 @0x4
0x2353…2361 at0005 = ╱46╱F╱ // 0x2358 @0x5
0x2353…2361 at0006 = ╱41╱A╱ // 0x2359 @0x6
0x2353…2361 at0007 = ╱4b╱K╱ // 0x235a @0x7
0x2353…2361 at0008 = ╱48╱H╱ // 0x235b @0x8
0x2353…2361 at0009 = ╱4f╱O╱ // 0x235c @0x9
0x2353…2361 at000a = ╱56╱V╱ // 0x235d @0xa
0x2353…2361 at000b = ╱45╱E╱ // 0x235e @0xb
0x2353…2361 at000c = ╱44╱D╱ // 0x235f @0xc
0x2353…2361 at000d = EOL // 0x2360 @0xd
0x2353…2361 }
0x2361…2375 b0cc 3280 J=AVALIN-1
0x2361…2375 LineComalBin {
0x2361…2375 ptr = 0xb0cc // 0x2361 @0x0
0x2361…2375 lno = 0x0cd0 // 0x2363 @0x2
0x2361…2375 at0004 = ╱4a╱J╱ // 0x2365 @0x4
0x2361…2375 at0005 = ╱dc╱=╱ // 0x2366 @0x5
0x2361…2375 at0006 = ╱41╱A╱ // 0x2367 @0x6
0x2361…2375 at0007 = ╱56╱V╱ // 0x2368 @0x7
0x2361…2375 at0008 = ╱41╱A╱ // 0x2369 @0x8
0x2361…2375 at0009 = ╱4c╱L╱ // 0x236a @0x9
0x2361…2375 at000a = ╱49╱I╱ // 0x236b @0xa
0x2361…2375 at000b = ╱4e╱N╱ // 0x236c @0xb
0x2361…2375 at000c = ╱e3╱-╱ // 0x236d @0xc
0x2361…2375 at000d = ╱31╱1╱ // 0x236e @0xd
0x2361…2375 at000e = ╱fe00008001╱ // 0x236f @0xe
0x2361…2375 at0013 = EOL // 0x2374 @0x13
0x2361…2375 }
0x2375…2386 b0dd 3290 EXEC VARLINUD(J)
0x2375…2386 LineComalBin {
0x2375…2386 ptr = 0xb0dd // 0x2375 @0x0
0x2375…2386 lno = 0x0cda // 0x2377 @0x2
0x2375…2386 at0004 = ╱9d╱ EXEC ╱ // 0x2379 @0x4
0x2375…2386 at0005 = ╱56╱V╱ // 0x237a @0x5
0x2375…2386 at0006 = ╱41╱A╱ // 0x237b @0x6
0x2375…2386 at0007 = ╱52╱R╱ // 0x237c @0x7
0x2375…2386 at0008 = ╱4c╱L╱ // 0x237d @0x8
0x2375…2386 at0009 = ╱49╱I╱ // 0x237e @0x9
0x2375…2386 at000a = ╱4e╱N╱ // 0x237f @0xa
0x2375…2386 at000b = ╱55╱U╱ // 0x2380 @0xb
0x2375…2386 at000c = ╱44╱D╱ // 0x2381 @0xc
0x2375…2386 at000d = ╱ed╱(╱ // 0x2382 @0xd
0x2375…2386 at000e = ╱4a╱J╱ // 0x2383 @0xe
0x2375…2386 at000f = ╱ee╱)╱ // 0x2384 @0xf
0x2375…2386 at0010 = EOL // 0x2385 @0x10
0x2375…2386 }
0x2386…239d b0f4 3300 LINIE=LINIE+1
0x2386…239d LineComalBin {
0x2386…239d ptr = 0xb0f4 // 0x2386 @0x0
0x2386…239d lno = 0x0ce4 // 0x2388 @0x2
0x2386…239d at0004 = ╱4c╱L╱ // 0x238a @0x4
0x2386…239d at0005 = ╱49╱I╱ // 0x238b @0x5
0x2386…239d at0006 = ╱4e╱N╱ // 0x238c @0x6
0x2386…239d at0007 = ╱49╱I╱ // 0x238d @0x7
0x2386…239d at0008 = ╱45╱E╱ // 0x238e @0x8
0x2386…239d at0009 = ╱dc╱=╱ // 0x238f @0x9
0x2386…239d at000a = ╱4c╱L╱ // 0x2390 @0xa
0x2386…239d at000b = ╱49╱I╱ // 0x2391 @0xb
0x2386…239d at000c = ╱4e╱N╱ // 0x2392 @0xc
0x2386…239d at000d = ╱49╱I╱ // 0x2393 @0xd
0x2386…239d at000e = ╱45╱E╱ // 0x2394 @0xe
0x2386…239d at000f = ╱e2╱+╱ // 0x2395 @0xf
0x2386…239d at0010 = ╱31╱1╱ // 0x2396 @0x10
0x2386…239d at0011 = ╱fe00008001╱ // 0x2397 @0x11
0x2386…239d at0016 = EOL // 0x239c @0x16
0x2386…239d }
0x239d…23a3 b0fa 3310 ENDIF
0x239d…23a3 LineComalBin {
0x239d…23a3 ptr = 0xb0fa // 0x239d @0x0
0x239d…23a3 lno = 0x0cee // 0x239f @0x2
0x239d…23a3 at0004 = ╱9b╱ ENDIF ╱ // 0x23a1 @0x4
0x239d…23a3 at0005 = EOL // 0x23a2 @0x5
0x239d…23a3 }
0x23a3…23a9 b100 3320 ENDPROC
0x23a3…23a9 LineComalBin {
0x23a3…23a9 ptr = 0xb100 // 0x23a3 @0x0
0x23a3…23a9 lno = 0x0cf8 // 0x23a5 @0x2
0x23a3…23a9 at0004 = ╱9f╱ ENDPROC ╱ // 0x23a7 @0x4
0x23a3…23a9 at0005 = EOL // 0x23a8 @0x5
0x23a3…23a9 }
0x23a9…23bc b113 3330 PROC VARLINUD(LIN)
0x23a9…23bc LineComalBin {
0x23a9…23bc ptr = 0xb113 // 0x23a9 @0x0
0x23a9…23bc lno = 0x0d02 // 0x23ab @0x2
0x23a9…23bc at0004 = ╱9e╱ PROC ╱ // 0x23ad @0x4
0x23a9…23bc at0005 = ╱56╱V╱ // 0x23ae @0x5
0x23a9…23bc at0006 = ╱41╱A╱ // 0x23af @0x6
0x23a9…23bc at0007 = ╱52╱R╱ // 0x23b0 @0x7
0x23a9…23bc at0008 = ╱4c╱L╱ // 0x23b1 @0x8
0x23a9…23bc at0009 = ╱49╱I╱ // 0x23b2 @0x9
0x23a9…23bc at000a = ╱4e╱N╱ // 0x23b3 @0xa
0x23a9…23bc at000b = ╱55╱U╱ // 0x23b4 @0xb
0x23a9…23bc at000c = ╱44╱D╱ // 0x23b5 @0xc
0x23a9…23bc at000d = ╱ed╱(╱ // 0x23b6 @0xd
0x23a9…23bc at000e = ╱4c╱L╱ // 0x23b7 @0xe
0x23a9…23bc at000f = ╱49╱I╱ // 0x23b8 @0xf
0x23a9…23bc at0010 = ╱4e╱N╱ // 0x23b9 @0x10
0x23a9…23bc at0011 = ╱ee╱)╱ // 0x23ba @0x11
0x23a9…23bc at0012 = EOL // 0x23bb @0x12
0x23a9…23bc }
0x23bc…23ce b125 3340 CURSOR 3,LINIE
0x23bc…23ce LineComalBin {
0x23bc…23ce ptr = 0xb125 // 0x23bc @0x0
0x23bc…23ce lno = 0x0d0c // 0x23be @0x2
0x23bc…23ce at0004 = ╱a1╱ CURSOR ╱ // 0x23c0 @0x4
0x23bc…23ce at0005 = ╱33╱3╱ // 0x23c1 @0x5
0x23bc…23ce at0006 = ╱fe0000c002╱ // 0x23c2 @0x6
0x23bc…23ce at000b = ╱ec╱,╱ // 0x23c7 @0xb
0x23bc…23ce at000c = ╱4c╱L╱ // 0x23c8 @0xc
0x23bc…23ce at000d = ╱49╱I╱ // 0x23c9 @0xd
0x23bc…23ce at000e = ╱4e╱N╱ // 0x23ca @0xe
0x23bc…23ce at000f = ╱49╱I╱ // 0x23cb @0xf
0x23bc…23ce at0010 = ╱45╱E╱ // 0x23cc @0x10
0x23bc…23ce at0011 = EOL // 0x23cd @0x11
0x23bc…23ce }
0x23ce…23de b135 3350 PRINT USING "###":LIN
0x23ce…23de LineComalBin {
0x23ce…23de ptr = 0xb135 // 0x23ce @0x0
0x23ce…23de lno = 0x0d16 // 0x23d0 @0x2
0x23ce…23de at0004 = ╱92╱ PRINT ╱ // 0x23d2 @0x4
0x23ce…23de at0005 = ╱b9╱ USING ╱ // 0x23d3 @0x5
0x23ce…23de at0006 = ╱22╱"╱ // 0x23d4 @0x6
0x23ce…23de at0007 = ╱23╱#╱ // 0x23d5 @0x7
0x23ce…23de at0008 = ╱23╱#╱ // 0x23d6 @0x8
0x23ce…23de at0009 = ╱23╱#╱ // 0x23d7 @0x9
0x23ce…23de at000a = ╱22╱"╱ // 0x23d8 @0xa
0x23ce…23de at000b = ╱f0╱:╱ // 0x23d9 @0xb
0x23ce…23de at000c = ╱4c╱L╱ // 0x23da @0xc
0x23ce…23de at000d = ╱49╱I╱ // 0x23db @0xd
0x23ce…23de at000e = ╱4e╱N╱ // 0x23dc @0xe
0x23ce…23de at000f = EOL // 0x23dd @0xf
0x23ce…23de }
0x23de…23f8 b14f 3360 IF VANRARR(LIN)>4 THEN
0x23de…23f8 LineComalBin {
0x23de…23f8 ptr = 0xb14f // 0x23de @0x0
0x23de…23f8 lno = 0x0d20 // 0x23e0 @0x2
0x23de…23f8 at0004 = ╱9c╱ IF ╱ // 0x23e2 @0x4
0x23de…23f8 at0005 = ╱56╱V╱ // 0x23e3 @0x5
0x23de…23f8 at0006 = ╱41╱A╱ // 0x23e4 @0x6
0x23de…23f8 at0007 = ╱4e╱N╱ // 0x23e5 @0x7
0x23de…23f8 at0008 = ╱52╱R╱ // 0x23e6 @0x8
0x23de…23f8 at0009 = ╱41╱A╱ // 0x23e7 @0x9
0x23de…23f8 at000a = ╱52╱R╱ // 0x23e8 @0xa
0x23de…23f8 at000b = ╱52╱R╱ // 0x23e9 @0xb
0x23de…23f8 at000c = ╱ed╱(╱ // 0x23ea @0xc
0x23de…23f8 at000d = ╱4c╱L╱ // 0x23eb @0xd
0x23de…23f8 at000e = ╱49╱I╱ // 0x23ec @0xe
0x23de…23f8 at000f = ╱4e╱N╱ // 0x23ed @0xf
0x23de…23f8 at0010 = ╱ee╱)╱ // 0x23ee @0x10
0x23de…23f8 at0011 = ╱de╱>╱ // 0x23ef @0x11
0x23de…23f8 at0012 = ╱34╱4╱ // 0x23f0 @0x12
0x23de…23f8 at0013 = ╱fe00008003╱ // 0x23f1 @0x13
0x23de…23f8 at0018 = ╱b6╱ THEN ╱ // 0x23f6 @0x18
0x23de…23f8 at0019 = EOL // 0x23f7 @0x19
0x23de…23f8 }
0x23f8…240a b161 3370 CURSOR 8,LINIE
0x23f8…240a LineComalBin {
0x23f8…240a ptr = 0xb161 // 0x23f8 @0x0
0x23f8…240a lno = 0x0d2a // 0x23fa @0x2
0x23f8…240a at0004 = ╱a1╱ CURSOR ╱ // 0x23fc @0x4
0x23f8…240a at0005 = ╱38╱8╱ // 0x23fd @0x5
0x23f8…240a at0006 = ╱fe00008004╱ // 0x23fe @0x6
0x23f8…240a at000b = ╱ec╱,╱ // 0x2403 @0xb
0x23f8…240a at000c = ╱4c╱L╱ // 0x2404 @0xc
0x23f8…240a at000d = ╱49╱I╱ // 0x2405 @0xd
0x23f8…240a at000e = ╱4e╱N╱ // 0x2406 @0xe
0x23f8…240a at000f = ╱49╱I╱ // 0x2407 @0xf
0x23f8…240a at0010 = ╱45╱E╱ // 0x2408 @0x10
0x23f8…240a at0011 = EOL // 0x2409 @0x11
0x23f8…240a }
0x240a…2427 b17e 3380 PRINT USING "#######":VANRARR(LIN)
0x240a…2427 LineComalBin {
0x240a…2427 ptr = 0xb17e // 0x240a @0x0
0x240a…2427 lno = 0x0d34 // 0x240c @0x2
0x240a…2427 at0004 = ╱92╱ PRINT ╱ // 0x240e @0x4
0x240a…2427 at0005 = ╱b9╱ USING ╱ // 0x240f @0x5
0x240a…2427 at0006 = ╱22╱"╱ // 0x2410 @0x6
0x240a…2427 at0007 = ╱23╱#╱ // 0x2411 @0x7
0x240a…2427 at0008 = ╱23╱#╱ // 0x2412 @0x8
0x240a…2427 at0009 = ╱23╱#╱ // 0x2413 @0x9
0x240a…2427 at000a = ╱23╱#╱ // 0x2414 @0xa
0x240a…2427 at000b = ╱23╱#╱ // 0x2415 @0xb
0x240a…2427 at000c = ╱23╱#╱ // 0x2416 @0xc
0x240a…2427 at000d = ╱23╱#╱ // 0x2417 @0xd
0x240a…2427 at000e = ╱22╱"╱ // 0x2418 @0xe
0x240a…2427 at000f = ╱f0╱:╱ // 0x2419 @0xf
0x240a…2427 at0010 = ╱56╱V╱ // 0x241a @0x10
0x240a…2427 at0011 = ╱41╱A╱ // 0x241b @0x11
0x240a…2427 at0012 = ╱4e╱N╱ // 0x241c @0x12
0x240a…2427 at0013 = ╱52╱R╱ // 0x241d @0x13
0x240a…2427 at0014 = ╱41╱A╱ // 0x241e @0x14
0x240a…2427 at0015 = ╱52╱R╱ // 0x241f @0x15
0x240a…2427 at0016 = ╱52╱R╱ // 0x2420 @0x16
0x240a…2427 at0017 = ╱ed╱(╱ // 0x2421 @0x17
0x240a…2427 at0018 = ╱4c╱L╱ // 0x2422 @0x18
0x240a…2427 at0019 = ╱49╱I╱ // 0x2423 @0x19
0x240a…2427 at001a = ╱4e╱N╱ // 0x2424 @0x1a
0x240a…2427 at001b = ╱ee╱)╱ // 0x2425 @0x1b
0x240a…2427 at001c = EOL // 0x2426 @0x1c
0x240a…2427 }
0x2427…243a b191 3390 CURSOR 17,LINIE
0x2427…243a LineComalBin {
0x2427…243a ptr = 0xb191 // 0x2427 @0x0
0x2427…243a lno = 0x0d3e // 0x2429 @0x2
0x2427…243a at0004 = ╱a1╱ CURSOR ╱ // 0x242b @0x4
0x2427…243a at0005 = ╱31╱1╱ // 0x242c @0x5
0x2427…243a at0006 = ╱37╱7╱ // 0x242d @0x6
0x2427…243a at0007 = ╱fe00008805╱ // 0x242e @0x7
0x2427…243a at000c = ╱ec╱,╱ // 0x2433 @0xc
0x2427…243a at000d = ╱4c╱L╱ // 0x2434 @0xd
0x2427…243a at000e = ╱49╱I╱ // 0x2435 @0xe
0x2427…243a at000f = ╱4e╱N╱ // 0x2436 @0xf
0x2427…243a at0010 = ╱49╱I╱ // 0x2437 @0x10
0x2427…243a at0011 = ╱45╱E╱ // 0x2438 @0x11
0x2427…243a at0012 = EOL // 0x2439 @0x12
0x2427…243a }
0x243a…2462 b1b9 3400 IF VAANTARR$(LIN,6:2)="00" THEN
0x243a…2462 LineComalBin {
0x243a…2462 ptr = 0xb1b9 // 0x243a @0x0
0x243a…2462 lno = 0x0d48 // 0x243c @0x2
0x243a…2462 at0004 = ╱9c╱ IF ╱ // 0x243e @0x4
0x243a…2462 at0005 = ╱56╱V╱ // 0x243f @0x5
0x243a…2462 at0006 = ╱41╱A╱ // 0x2440 @0x6
0x243a…2462 at0007 = ╱41╱A╱ // 0x2441 @0x7
0x243a…2462 at0008 = ╱4e╱N╱ // 0x2442 @0x8
0x243a…2462 at0009 = ╱54╱T╱ // 0x2443 @0x9
0x243a…2462 at000a = ╱41╱A╱ // 0x2444 @0xa
0x243a…2462 at000b = ╱52╱R╱ // 0x2445 @0xb
0x243a…2462 at000c = ╱52╱R╱ // 0x2446 @0xc
0x243a…2462 at000d = ╱ef╱$╱ // 0x2447 @0xd
0x243a…2462 at000e = ╱ed╱(╱ // 0x2448 @0xe
0x243a…2462 at000f = ╱4c╱L╱ // 0x2449 @0xf
0x243a…2462 at0010 = ╱49╱I╱ // 0x244a @0x10
0x243a…2462 at0011 = ╱4e╱N╱ // 0x244b @0x11
0x243a…2462 at0012 = ╱ec╱,╱ // 0x244c @0x12
0x243a…2462 at0013 = ╱36╱6╱ // 0x244d @0x13
0x243a…2462 at0014 = ╱fe0000c003╱ // 0x244e @0x14
0x243a…2462 at0019 = ╱f0╱:╱ // 0x2453 @0x19
0x243a…2462 at001a = ╱32╱2╱ // 0x2454 @0x1a
0x243a…2462 at001b = ╱fe00008002╱ // 0x2455 @0x1b
0x243a…2462 at0020 = ╱ee╱)╱ // 0x245a @0x20
0x243a…2462 at0021 = ╱dc╱=╱ // 0x245b @0x21
0x243a…2462 at0022 = ╱22╱"╱ // 0x245c @0x22
0x243a…2462 at0023 = ╱30╱0╱ // 0x245d @0x23
0x243a…2462 at0024 = ╱30╱0╱ // 0x245e @0x24
0x243a…2462 at0025 = ╱22╱"╱ // 0x245f @0x25
0x243a…2462 at0026 = ╱b6╱ THEN ╱ // 0x2460 @0x26
0x243a…2462 at0027 = EOL // 0x2461 @0x27
0x243a…2462 }
0x2462…248a b1e1 3410 PRINT VAANTARR$(LIN,1:4);" "
0x2462…248a LineComalBin {
0x2462…248a ptr = 0xb1e1 // 0x2462 @0x0
0x2462…248a lno = 0x0d52 // 0x2464 @0x2
0x2462…248a at0004 = ╱92╱ PRINT ╱ // 0x2466 @0x4
0x2462…248a at0005 = ╱56╱V╱ // 0x2467 @0x5
0x2462…248a at0006 = ╱41╱A╱ // 0x2468 @0x6
0x2462…248a at0007 = ╱41╱A╱ // 0x2469 @0x7
0x2462…248a at0008 = ╱4e╱N╱ // 0x246a @0x8
0x2462…248a at0009 = ╱54╱T╱ // 0x246b @0x9
0x2462…248a at000a = ╱41╱A╱ // 0x246c @0xa
0x2462…248a at000b = ╱52╱R╱ // 0x246d @0xb
0x2462…248a at000c = ╱52╱R╱ // 0x246e @0xc
0x2462…248a at000d = ╱ef╱$╱ // 0x246f @0xd
0x2462…248a at000e = ╱ed╱(╱ // 0x2470 @0xe
0x2462…248a at000f = ╱4c╱L╱ // 0x2471 @0xf
0x2462…248a at0010 = ╱49╱I╱ // 0x2472 @0x10
0x2462…248a at0011 = ╱4e╱N╱ // 0x2473 @0x11
0x2462…248a at0012 = ╱ec╱,╱ // 0x2474 @0x12
0x2462…248a at0013 = ╱31╱1╱ // 0x2475 @0x13
0x2462…248a at0014 = ╱fe00008001╱ // 0x2476 @0x14
0x2462…248a at0019 = ╱f0╱:╱ // 0x247b @0x19
0x2462…248a at001a = ╱34╱4╱ // 0x247c @0x1a
0x2462…248a at001b = ╱fe00008003╱ // 0x247d @0x1b
0x2462…248a at0020 = ╱ee╱)╱ // 0x2482 @0x20
0x2462…248a at0021 = ╱eb╱;╱ // 0x2483 @0x21
0x2462…248a at0022 = ╱22╱"╱ // 0x2484 @0x22
0x2462…248a at0023 = ╱20╱…╱ // 0x2485 @0x23
0x2462…248a at0024 = ╱20╱…╱ // 0x2486 @0x24
0x2462…248a at0025 = ╱20╱…╱ // 0x2487 @0x25
0x2462…248a at0026 = ╱22╱"╱ // 0x2488 @0x26
0x2462…248a at0027 = EOL // 0x2489 @0x27
0x2462…248a }
0x248a…2490 b1e7 3420 ELSE
0x248a…2490 LineComalBin {
0x248a…2490 ptr = 0xb1e7 // 0x248a @0x0
0x248a…2490 lno = 0x0d5c // 0x248c @0x2
0x248a…2490 at0004 = ╱9a╱ ELSE ╱ // 0x248e @0x4
0x248a…2490 at0005 = EOL // 0x248f @0x5
0x248a…2490 }
0x2490…24a4 b1fb 3430 PRINT VAANTARR$(LIN)
0x2490…24a4 LineComalBin {
0x2490…24a4 ptr = 0xb1fb // 0x2490 @0x0
0x2490…24a4 lno = 0x0d66 // 0x2492 @0x2
0x2490…24a4 at0004 = ╱92╱ PRINT ╱ // 0x2494 @0x4
0x2490…24a4 at0005 = ╱56╱V╱ // 0x2495 @0x5
0x2490…24a4 at0006 = ╱41╱A╱ // 0x2496 @0x6
0x2490…24a4 at0007 = ╱41╱A╱ // 0x2497 @0x7
0x2490…24a4 at0008 = ╱4e╱N╱ // 0x2498 @0x8
0x2490…24a4 at0009 = ╱54╱T╱ // 0x2499 @0x9
0x2490…24a4 at000a = ╱41╱A╱ // 0x249a @0xa
0x2490…24a4 at000b = ╱52╱R╱ // 0x249b @0xb
0x2490…24a4 at000c = ╱52╱R╱ // 0x249c @0xc
0x2490…24a4 at000d = ╱ef╱$╱ // 0x249d @0xd
0x2490…24a4 at000e = ╱ed╱(╱ // 0x249e @0xe
0x2490…24a4 at000f = ╱4c╱L╱ // 0x249f @0xf
0x2490…24a4 at0010 = ╱49╱I╱ // 0x24a0 @0x10
0x2490…24a4 at0011 = ╱4e╱N╱ // 0x24a1 @0x11
0x2490…24a4 at0012 = ╱ee╱)╱ // 0x24a2 @0x12
0x2490…24a4 at0013 = EOL // 0x24a3 @0x13
0x2490…24a4 }
0x24a4…24aa b201 3440 ENDIF
0x24a4…24aa LineComalBin {
0x24a4…24aa ptr = 0xb201 // 0x24a4 @0x0
0x24a4…24aa lno = 0x0d70 // 0x24a6 @0x2
0x24a4…24aa at0004 = ╱9b╱ ENDIF ╱ // 0x24a8 @0x4
0x24a4…24aa at0005 = EOL // 0x24a9 @0x5
0x24a4…24aa }
0x24aa…24b0 b207 3450 ENDIF
0x24aa…24b0 LineComalBin {
0x24aa…24b0 ptr = 0xb207 // 0x24aa @0x0
0x24aa…24b0 lno = 0x0d7a // 0x24ac @0x2
0x24aa…24b0 at0004 = ╱9b╱ ENDIF ╱ // 0x24ae @0x4
0x24aa…24b0 at0005 = EOL // 0x24af @0x5
0x24aa…24b0 }
0x24b0…24ca b221 3460 IF VANRARR(LIN)=2 THEN
0x24b0…24ca LineComalBin {
0x24b0…24ca ptr = 0xb221 // 0x24b0 @0x0
0x24b0…24ca lno = 0x0d84 // 0x24b2 @0x2
0x24b0…24ca at0004 = ╱9c╱ IF ╱ // 0x24b4 @0x4
0x24b0…24ca at0005 = ╱56╱V╱ // 0x24b5 @0x5
0x24b0…24ca at0006 = ╱41╱A╱ // 0x24b6 @0x6
0x24b0…24ca at0007 = ╱4e╱N╱ // 0x24b7 @0x7
0x24b0…24ca at0008 = ╱52╱R╱ // 0x24b8 @0x8
0x24b0…24ca at0009 = ╱41╱A╱ // 0x24b9 @0x9
0x24b0…24ca at000a = ╱52╱R╱ // 0x24ba @0xa
0x24b0…24ca at000b = ╱52╱R╱ // 0x24bb @0xb
0x24b0…24ca at000c = ╱ed╱(╱ // 0x24bc @0xc
0x24b0…24ca at000d = ╱4c╱L╱ // 0x24bd @0xd
0x24b0…24ca at000e = ╱49╱I╱ // 0x24be @0xe
0x24b0…24ca at000f = ╱4e╱N╱ // 0x24bf @0xf
0x24b0…24ca at0010 = ╱ee╱)╱ // 0x24c0 @0x10
0x24b0…24ca at0011 = ╱dc╱=╱ // 0x24c1 @0x11
0x24b0…24ca at0012 = ╱32╱2╱ // 0x24c2 @0x12
0x24b0…24ca at0013 = ╱fe00008002╱ // 0x24c3 @0x13
0x24b0…24ca at0018 = ╱b6╱ THEN ╱ // 0x24c8 @0x18
0x24b0…24ca at0019 = EOL // 0x24c9 @0x19
0x24b0…24ca }
0x24ca…24dd b234 3470 CURSOR 17,LINIE
0x24ca…24dd LineComalBin {
0x24ca…24dd ptr = 0xb234 // 0x24ca @0x0
0x24ca…24dd lno = 0x0d8e // 0x24cc @0x2
0x24ca…24dd at0004 = ╱a1╱ CURSOR ╱ // 0x24ce @0x4
0x24ca…24dd at0005 = ╱31╱1╱ // 0x24cf @0x5
0x24ca…24dd at0006 = ╱37╱7╱ // 0x24d0 @0x6
0x24ca…24dd at0007 = ╱fe00008805╱ // 0x24d1 @0x7
0x24ca…24dd at000c = ╱ec╱,╱ // 0x24d6 @0xc
0x24ca…24dd at000d = ╱4c╱L╱ // 0x24d7 @0xd
0x24ca…24dd at000e = ╱49╱I╱ // 0x24d8 @0xe
0x24ca…24dd at000f = ╱4e╱N╱ // 0x24d9 @0xf
0x24ca…24dd at0010 = ╱49╱I╱ // 0x24da @0x10
0x24ca…24dd at0011 = ╱45╱E╱ // 0x24db @0x11
0x24ca…24dd at0012 = EOL // 0x24dc @0x12
0x24ca…24dd }
0x24dd…24e3 b23a 3480 ELSE
0x24dd…24e3 LineComalBin {
0x24dd…24e3 ptr = 0xb23a // 0x24dd @0x0
0x24dd…24e3 lno = 0x0d98 // 0x24df @0x2
0x24dd…24e3 at0004 = ╱9a╱ ELSE ╱ // 0x24e1 @0x4
0x24dd…24e3 at0005 = EOL // 0x24e2 @0x5
0x24dd…24e3 }
0x24e3…24f6 b24d 3490 CURSOR 24,LINIE
0x24e3…24f6 LineComalBin {
0x24e3…24f6 ptr = 0xb24d // 0x24e3 @0x0
0x24e3…24f6 lno = 0x0da2 // 0x24e5 @0x2
0x24e3…24f6 at0004 = ╱a1╱ CURSOR ╱ // 0x24e7 @0x4
0x24e3…24f6 at0005 = ╱32╱2╱ // 0x24e8 @0x5
0x24e3…24f6 at0006 = ╱34╱4╱ // 0x24e9 @0x6
0x24e3…24f6 at0007 = ╱fe0000c005╱ // 0x24ea @0x7
0x24e3…24f6 at000c = ╱ec╱,╱ // 0x24ef @0xc
0x24e3…24f6 at000d = ╱4c╱L╱ // 0x24f0 @0xd
0x24e3…24f6 at000e = ╱49╱I╱ // 0x24f1 @0xe
0x24e3…24f6 at000f = ╱4e╱N╱ // 0x24f2 @0xf
0x24e3…24f6 at0010 = ╱49╱I╱ // 0x24f3 @0x10
0x24e3…24f6 at0011 = ╱45╱E╱ // 0x24f4 @0x11
0x24e3…24f6 at0012 = EOL // 0x24f5 @0x12
0x24e3…24f6 }
0x24f6…24fc b253 3500 ENDIF
0x24f6…24fc LineComalBin {
0x24f6…24fc ptr = 0xb253 // 0x24f6 @0x0
0x24f6…24fc lno = 0x0dac // 0x24f8 @0x2
0x24f6…24fc at0004 = ╱9b╱ ENDIF ╱ // 0x24fa @0x4
0x24f6…24fc at0005 = EOL // 0x24fb @0x5
0x24f6…24fc }
0x24fc…2510 b267 3510 PRINT VATEKARR$(LIN)
0x24fc…2510 LineComalBin {
0x24fc…2510 ptr = 0xb267 // 0x24fc @0x0
0x24fc…2510 lno = 0x0db6 // 0x24fe @0x2
0x24fc…2510 at0004 = ╱92╱ PRINT ╱ // 0x2500 @0x4
0x24fc…2510 at0005 = ╱56╱V╱ // 0x2501 @0x5
0x24fc…2510 at0006 = ╱41╱A╱ // 0x2502 @0x6
0x24fc…2510 at0007 = ╱54╱T╱ // 0x2503 @0x7
0x24fc…2510 at0008 = ╱45╱E╱ // 0x2504 @0x8
0x24fc…2510 at0009 = ╱4b╱K╱ // 0x2505 @0x9
0x24fc…2510 at000a = ╱41╱A╱ // 0x2506 @0xa
0x24fc…2510 at000b = ╱52╱R╱ // 0x2507 @0xb
0x24fc…2510 at000c = ╱52╱R╱ // 0x2508 @0xc
0x24fc…2510 at000d = ╱ef╱$╱ // 0x2509 @0xd
0x24fc…2510 at000e = ╱ed╱(╱ // 0x250a @0xe
0x24fc…2510 at000f = ╱4c╱L╱ // 0x250b @0xf
0x24fc…2510 at0010 = ╱49╱I╱ // 0x250c @0x10
0x24fc…2510 at0011 = ╱4e╱N╱ // 0x250d @0x11
0x24fc…2510 at0012 = ╱ee╱)╱ // 0x250e @0x12
0x24fc…2510 at0013 = EOL // 0x250f @0x13
0x24fc…2510 }
0x2510…252a b281 3520 IF VANRARR(LIN)>4 THEN
0x2510…252a LineComalBin {
0x2510…252a ptr = 0xb281 // 0x2510 @0x0
0x2510…252a lno = 0x0dc0 // 0x2512 @0x2
0x2510…252a at0004 = ╱9c╱ IF ╱ // 0x2514 @0x4
0x2510…252a at0005 = ╱56╱V╱ // 0x2515 @0x5
0x2510…252a at0006 = ╱41╱A╱ // 0x2516 @0x6
0x2510…252a at0007 = ╱4e╱N╱ // 0x2517 @0x7
0x2510…252a at0008 = ╱52╱R╱ // 0x2518 @0x8
0x2510…252a at0009 = ╱41╱A╱ // 0x2519 @0x9
0x2510…252a at000a = ╱52╱R╱ // 0x251a @0xa
0x2510…252a at000b = ╱52╱R╱ // 0x251b @0xb
0x2510…252a at000c = ╱ed╱(╱ // 0x251c @0xc
0x2510…252a at000d = ╱4c╱L╱ // 0x251d @0xd
0x2510…252a at000e = ╱49╱I╱ // 0x251e @0xe
0x2510…252a at000f = ╱4e╱N╱ // 0x251f @0xf
0x2510…252a at0010 = ╱ee╱)╱ // 0x2520 @0x10
0x2510…252a at0011 = ╱de╱>╱ // 0x2521 @0x11
0x2510…252a at0012 = ╱34╱4╱ // 0x2522 @0x12
0x2510…252a at0013 = ╱fe00008003╱ // 0x2523 @0x13
0x2510…252a at0018 = ╱b6╱ THEN ╱ // 0x2528 @0x18
0x2510…252a at0019 = EOL // 0x2529 @0x19
0x2510…252a }
0x252a…253d b294 3530 CURSOR 51,LINIE
0x252a…253d LineComalBin {
0x252a…253d ptr = 0xb294 // 0x252a @0x0
0x252a…253d lno = 0x0dca // 0x252c @0x2
0x252a…253d at0004 = ╱a1╱ CURSOR ╱ // 0x252e @0x4
0x252a…253d at0005 = ╱35╱5╱ // 0x252f @0x5
0x252a…253d at0006 = ╱31╱1╱ // 0x2530 @0x6
0x252a…253d at0007 = ╱fe0000cc06╱ // 0x2531 @0x7
0x252a…253d at000c = ╱ec╱,╱ // 0x2536 @0xc
0x252a…253d at000d = ╱4c╱L╱ // 0x2537 @0xd
0x252a…253d at000e = ╱49╱I╱ // 0x2538 @0xe
0x252a…253d at000f = ╱4e╱N╱ // 0x2539 @0xf
0x252a…253d at0010 = ╱49╱I╱ // 0x253a @0x10
0x252a…253d at0011 = ╱45╱E╱ // 0x253b @0x11
0x252a…253d at0012 = EOL // 0x253c @0x12
0x252a…253d }
0x253d…2553 b2aa 3540 B$=VAPRIARR$(LIN)
0x253d…2553 LineComalBin {
0x253d…2553 ptr = 0xb2aa // 0x253d @0x0
0x253d…2553 lno = 0x0dd4 // 0x253f @0x2
0x253d…2553 at0004 = ╱42╱B╱ // 0x2541 @0x4
0x253d…2553 at0005 = ╱ef╱$╱ // 0x2542 @0x5
0x253d…2553 at0006 = ╱dc╱=╱ // 0x2543 @0x6
0x253d…2553 at0007 = ╱56╱V╱ // 0x2544 @0x7
0x253d…2553 at0008 = ╱41╱A╱ // 0x2545 @0x8
0x253d…2553 at0009 = ╱50╱P╱ // 0x2546 @0x9
0x253d…2553 at000a = ╱52╱R╱ // 0x2547 @0xa
0x253d…2553 at000b = ╱49╱I╱ // 0x2548 @0xb
0x253d…2553 at000c = ╱41╱A╱ // 0x2549 @0xc
0x253d…2553 at000d = ╱52╱R╱ // 0x254a @0xd
0x253d…2553 at000e = ╱52╱R╱ // 0x254b @0xe
0x253d…2553 at000f = ╱ef╱$╱ // 0x254c @0xf
0x253d…2553 at0010 = ╱ed╱(╱ // 0x254d @0x10
0x253d…2553 at0011 = ╱4c╱L╱ // 0x254e @0x11
0x253d…2553 at0012 = ╱49╱I╱ // 0x254f @0x12
0x253d…2553 at0013 = ╱4e╱N╱ // 0x2550 @0x13
0x253d…2553 at0014 = ╱ee╱)╱ // 0x2551 @0x14
0x253d…2553 at0015 = EOL // 0x2552 @0x15
0x253d…2553 }
0x2553…2574 b2cb 3550 EXEC TUD(B$,TAL4$,1,0)
0x2553…2574 LineComalBin {
0x2553…2574 ptr = 0xb2cb // 0x2553 @0x0
0x2553…2574 lno = 0x0dde // 0x2555 @0x2
0x2553…2574 at0004 = ╱9d╱ EXEC ╱ // 0x2557 @0x4
0x2553…2574 at0005 = ╱54╱T╱ // 0x2558 @0x5
0x2553…2574 at0006 = ╱55╱U╱ // 0x2559 @0x6
0x2553…2574 at0007 = ╱44╱D╱ // 0x255a @0x7
0x2553…2574 at0008 = ╱ed╱(╱ // 0x255b @0x8
0x2553…2574 at0009 = ╱42╱B╱ // 0x255c @0x9
0x2553…2574 at000a = ╱ef╱$╱ // 0x255d @0xa
0x2553…2574 at000b = ╱ec╱,╱ // 0x255e @0xb
0x2553…2574 at000c = ╱54╱T╱ // 0x255f @0xc
0x2553…2574 at000d = ╱41╱A╱ // 0x2560 @0xd
0x2553…2574 at000e = ╱4c╱L╱ // 0x2561 @0xe
0x2553…2574 at000f = ╱34╱4╱ // 0x2562 @0xf
0x2553…2574 at0010 = ╱ef╱$╱ // 0x2563 @0x10
0x2553…2574 at0011 = ╱ec╱,╱ // 0x2564 @0x11
0x2553…2574 at0012 = ╱31╱1╱ // 0x2565 @0x12
0x2553…2574 at0013 = ╱fe00008001╱ // 0x2566 @0x13
0x2553…2574 at0018 = ╱ec╱,╱ // 0x256b @0x18
0x2553…2574 at0019 = ╱30╱0╱ // 0x256c @0x19
0x2553…2574 at001a = ╱fe00000000╱ // 0x256d @0x1a
0x2553…2574 at001f = ╱ee╱)╱ // 0x2572 @0x1f
0x2553…2574 at0020 = EOL // 0x2573 @0x20
0x2553…2574 }
0x2574…257a b2d1 3560 ENDIF
0x2574…257a LineComalBin {
0x2574…257a ptr = 0xb2d1 // 0x2574 @0x0
0x2574…257a lno = 0x0de8 // 0x2576 @0x2
0x2574…257a at0004 = ╱9b╱ ENDIF ╱ // 0x2578 @0x4
0x2574…257a at0005 = EOL // 0x2579 @0x5
0x2574…257a }
0x257a…258d b2e4 3570 CURSOR 66,LINIE
0x257a…258d LineComalBin {
0x257a…258d ptr = 0xb2e4 // 0x257a @0x0
0x257a…258d lno = 0x0df2 // 0x257c @0x2
0x257a…258d at0004 = ╱a1╱ CURSOR ╱ // 0x257e @0x4
0x257a…258d at0005 = ╱36╱6╱ // 0x257f @0x5
0x257a…258d at0006 = ╱36╱6╱ // 0x2580 @0x6
0x257a…258d at0007 = ╱fe00008407╱ // 0x2581 @0x7
0x257a…258d at000c = ╱ec╱,╱ // 0x2586 @0xc
0x257a…258d at000d = ╱4c╱L╱ // 0x2587 @0xd
0x257a…258d at000e = ╱49╱I╱ // 0x2588 @0xe
0x257a…258d at000f = ╱4e╱N╱ // 0x2589 @0xf
0x257a…258d at0010 = ╱49╱I╱ // 0x258a @0x10
0x257a…258d at0011 = ╱45╱E╱ // 0x258b @0x11
0x257a…258d at0012 = EOL // 0x258c @0x12
0x257a…258d }
0x258d…25a3 b2fa 3580 B$=BELØBARR$(LIN)
0x258d…25a3 LineComalBin {
0x258d…25a3 ptr = 0xb2fa // 0x258d @0x0
0x258d…25a3 lno = 0x0dfc // 0x258f @0x2
0x258d…25a3 at0004 = ╱42╱B╱ // 0x2591 @0x4
0x258d…25a3 at0005 = ╱ef╱$╱ // 0x2592 @0x5
0x258d…25a3 at0006 = ╱dc╱=╱ // 0x2593 @0x6
0x258d…25a3 at0007 = ╱42╱B╱ // 0x2594 @0x7
0x258d…25a3 at0008 = ╱45╱E╱ // 0x2595 @0x8
0x258d…25a3 at0009 = ╱4c╱L╱ // 0x2596 @0x9
0x258d…25a3 at000a = ╱5c╱Ø╱ // 0x2597 @0xa
0x258d…25a3 at000b = ╱42╱B╱ // 0x2598 @0xb
0x258d…25a3 at000c = ╱41╱A╱ // 0x2599 @0xc
0x258d…25a3 at000d = ╱52╱R╱ // 0x259a @0xd
0x258d…25a3 at000e = ╱52╱R╱ // 0x259b @0xe
0x258d…25a3 at000f = ╱ef╱$╱ // 0x259c @0xf
0x258d…25a3 at0010 = ╱ed╱(╱ // 0x259d @0x10
0x258d…25a3 at0011 = ╱4c╱L╱ // 0x259e @0x11
0x258d…25a3 at0012 = ╱49╱I╱ // 0x259f @0x12
0x258d…25a3 at0013 = ╱4e╱N╱ // 0x25a0 @0x13
0x258d…25a3 at0014 = ╱ee╱)╱ // 0x25a1 @0x14
0x258d…25a3 at0015 = EOL // 0x25a2 @0x15
0x258d…25a3 }
0x25a3…25d9 b330 3590 IF VANRARR(LIN)<>2 THEN EXEC TUD(B$,TAL4$,1,0)
0x25a3…25d9 LineComalBin {
0x25a3…25d9 ptr = 0xb330 // 0x25a3 @0x0
0x25a3…25d9 lno = 0x0e06 // 0x25a5 @0x2
0x25a3…25d9 at0004 = ╱82╱ IF ╱ // 0x25a7 @0x4
0x25a3…25d9 at0005 = ╱56╱V╱ // 0x25a8 @0x5
0x25a3…25d9 at0006 = ╱41╱A╱ // 0x25a9 @0x6
0x25a3…25d9 at0007 = ╱4e╱N╱ // 0x25aa @0x7
0x25a3…25d9 at0008 = ╱52╱R╱ // 0x25ab @0x8
0x25a3…25d9 at0009 = ╱41╱A╱ // 0x25ac @0x9
0x25a3…25d9 at000a = ╱52╱R╱ // 0x25ad @0xa
0x25a3…25d9 at000b = ╱52╱R╱ // 0x25ae @0xb
0x25a3…25d9 at000c = ╱ed╱(╱ // 0x25af @0xc
0x25a3…25d9 at000d = ╱4c╱L╱ // 0x25b0 @0xd
0x25a3…25d9 at000e = ╱49╱I╱ // 0x25b1 @0xe
0x25a3…25d9 at000f = ╱4e╱N╱ // 0x25b2 @0xf
0x25a3…25d9 at0010 = ╱ee╱)╱ // 0x25b3 @0x10
0x25a3…25d9 at0011 = ╱e1╱<>╱ // 0x25b4 @0x11
0x25a3…25d9 at0012 = ╱32╱2╱ // 0x25b5 @0x12
0x25a3…25d9 at0013 = ╱fe00008002╱ // 0x25b6 @0x13
0x25a3…25d9 at0018 = ╱b6╱ THEN ╱ // 0x25bb @0x18
0x25a3…25d9 at0019 = ╱9d╱ EXEC ╱ // 0x25bc @0x19
0x25a3…25d9 at001a = ╱54╱T╱ // 0x25bd @0x1a
0x25a3…25d9 at001b = ╱55╱U╱ // 0x25be @0x1b
0x25a3…25d9 at001c = ╱44╱D╱ // 0x25bf @0x1c
0x25a3…25d9 at001d = ╱ed╱(╱ // 0x25c0 @0x1d
0x25a3…25d9 at001e = ╱42╱B╱ // 0x25c1 @0x1e
0x25a3…25d9 at001f = ╱ef╱$╱ // 0x25c2 @0x1f
0x25a3…25d9 at0020 = ╱ec╱,╱ // 0x25c3 @0x20
0x25a3…25d9 at0021 = ╱54╱T╱ // 0x25c4 @0x21
0x25a3…25d9 at0022 = ╱41╱A╱ // 0x25c5 @0x22
0x25a3…25d9 at0023 = ╱4c╱L╱ // 0x25c6 @0x23
0x25a3…25d9 at0024 = ╱34╱4╱ // 0x25c7 @0x24
0x25a3…25d9 at0025 = ╱ef╱$╱ // 0x25c8 @0x25
0x25a3…25d9 at0026 = ╱ec╱,╱ // 0x25c9 @0x26
0x25a3…25d9 at0027 = ╱31╱1╱ // 0x25ca @0x27
0x25a3…25d9 at0028 = ╱fe00008001╱ // 0x25cb @0x28
0x25a3…25d9 at002d = ╱ec╱,╱ // 0x25d0 @0x2d
0x25a3…25d9 at002e = ╱30╱0╱ // 0x25d1 @0x2e
0x25a3…25d9 at002f = ╱fe00000000╱ // 0x25d2 @0x2f
0x25a3…25d9 at0034 = ╱ee╱)╱ // 0x25d7 @0x34
0x25a3…25d9 at0035 = EOL // 0x25d8 @0x35
0x25a3…25d9 }
0x25d9…25df b336 3600 ENDPROC
0x25d9…25df LineComalBin {
0x25d9…25df ptr = 0xb336 // 0x25d9 @0x0
0x25d9…25df lno = 0x0e10 // 0x25db @0x2
0x25d9…25df at0004 = ╱9f╱ ENDPROC ╱ // 0x25dd @0x4
0x25d9…25df at0005 = EOL // 0x25de @0x5
0x25d9…25df }
0x25df…25ed b344 3610 PROC FAKTBUND
0x25df…25ed LineComalBin {
0x25df…25ed ptr = 0xb344 // 0x25df @0x0
0x25df…25ed lno = 0x0e1a // 0x25e1 @0x2
0x25df…25ed at0004 = ╱9e╱ PROC ╱ // 0x25e3 @0x4
0x25df…25ed at0005 = ╱46╱F╱ // 0x25e4 @0x5
0x25df…25ed at0006 = ╱41╱A╱ // 0x25e5 @0x6
0x25df…25ed at0007 = ╱4b╱K╱ // 0x25e6 @0x7
0x25df…25ed at0008 = ╱54╱T╱ // 0x25e7 @0x8
0x25df…25ed at0009 = ╱42╱B╱ // 0x25e8 @0x9
0x25df…25ed at000a = ╱55╱U╱ // 0x25e9 @0xa
0x25df…25ed at000b = ╱4e╱N╱ // 0x25ea @0xb
0x25df…25ed at000c = ╱44╱D╱ // 0x25eb @0xc
0x25df…25ed at000d = EOL // 0x25ec @0xd
0x25df…25ed }
0x25ed…2600 b357 3620 GTOTAL$=TOTAL$
0x25ed…2600 LineComalBin {
0x25ed…2600 ptr = 0xb357 // 0x25ed @0x0
0x25ed…2600 lno = 0x0e24 // 0x25ef @0x2
0x25ed…2600 at0004 = ╱47╱G╱ // 0x25f1 @0x4
0x25ed…2600 at0005 = ╱54╱T╱ // 0x25f2 @0x5
0x25ed…2600 at0006 = ╱4f╱O╱ // 0x25f3 @0x6
0x25ed…2600 at0007 = ╱54╱T╱ // 0x25f4 @0x7
0x25ed…2600 at0008 = ╱41╱A╱ // 0x25f5 @0x8
0x25ed…2600 at0009 = ╱4c╱L╱ // 0x25f6 @0x9
0x25ed…2600 at000a = ╱ef╱$╱ // 0x25f7 @0xa
0x25ed…2600 at000b = ╱dc╱=╱ // 0x25f8 @0xb
0x25ed…2600 at000c = ╱54╱T╱ // 0x25f9 @0xc
0x25ed…2600 at000d = ╱4f╱O╱ // 0x25fa @0xd
0x25ed…2600 at000e = ╱54╱T╱ // 0x25fb @0xe
0x25ed…2600 at000f = ╱41╱A╱ // 0x25fc @0xf
0x25ed…2600 at0010 = ╱4c╱L╱ // 0x25fd @0x10
0x25ed…2600 at0011 = ╱ef╱$╱ // 0x25fe @0x11
0x25ed…2600 at0012 = EOL // 0x25ff @0x12
0x25ed…2600 }
0x2600…2606 b35d 3630 REPEAT
0x2600…2606 LineComalBin {
0x2600…2606 ptr = 0xb35d // 0x2600 @0x0
0x2600…2606 lno = 0x0e2e // 0x2602 @0x2
0x2600…2606 at0004 = ╱97╱ REPEAT ╱ // 0x2604 @0x4
0x2600…2606 at0005 = EOL // 0x2605 @0x5
0x2600…2606 }
0x2606…2610 b367 3640 EXEC SLET
0x2606…2610 LineComalBin {
0x2606…2610 ptr = 0xb367 // 0x2606 @0x0
0x2606…2610 lno = 0x0e38 // 0x2608 @0x2
0x2606…2610 at0004 = ╱9d╱ EXEC ╱ // 0x260a @0x4
0x2606…2610 at0005 = ╱53╱S╱ // 0x260b @0x5
0x2606…2610 at0006 = ╱4c╱L╱ // 0x260c @0x6
0x2606…2610 at0007 = ╱45╱E╱ // 0x260d @0x7
0x2606…2610 at0008 = ╱54╱T╱ // 0x260e @0x8
0x2606…2610 at0009 = EOL // 0x260f @0x9
0x2606…2610 }
0x2610…2625 b37c 3650 CURSOR 22,19
0x2610…2625 LineComalBin {
0x2610…2625 ptr = 0xb37c // 0x2610 @0x0
0x2610…2625 lno = 0x0e42 // 0x2612 @0x2
0x2610…2625 at0004 = ╱a1╱ CURSOR ╱ // 0x2614 @0x4
0x2610…2625 at0005 = ╱32╱2╱ // 0x2615 @0x5
0x2610…2625 at0006 = ╱32╱2╱ // 0x2616 @0x6
0x2610…2625 at0007 = ╱fe0000b005╱ // 0x2617 @0x7
0x2610…2625 at000c = ╱ec╱,╱ // 0x261c @0xc
0x2610…2625 at000d = ╱31╱1╱ // 0x261d @0xd
0x2610…2625 at000e = ╱39╱9╱ // 0x261e @0xe
0x2610…2625 at000f = ╱fe00009805╱ // 0x261f @0xf
0x2610…2625 at0014 = EOL // 0x2624 @0x14
0x2610…2625 }
0x2625…2644 b39b 3660 PRINT "Forsendelse Netto"
0x2625…2644 LineComalBin {
0x2625…2644 ptr = 0xb39b // 0x2625 @0x0
0x2625…2644 lno = 0x0e4c // 0x2627 @0x2
0x2625…2644 at0004 = ╱92╱ PRINT ╱ // 0x2629 @0x4
0x2625…2644 at0005 = ╱22╱"╱ // 0x262a @0x5
0x2625…2644 at0006 = ╱46╱F╱ // 0x262b @0x6
0x2625…2644 at0007 = ╱6f╱o╱ // 0x262c @0x7
0x2625…2644 at0008 = ╱72╱r╱ // 0x262d @0x8
0x2625…2644 at0009 = ╱73╱s╱ // 0x262e @0x9
0x2625…2644 at000a = ╱65╱e╱ // 0x262f @0xa
0x2625…2644 at000b = ╱6e╱n╱ // 0x2630 @0xb
0x2625…2644 at000c = ╱64╱d╱ // 0x2631 @0xc
0x2625…2644 at000d = ╱65╱e╱ // 0x2632 @0xd
0x2625…2644 at000e = ╱6c╱l╱ // 0x2633 @0xe
0x2625…2644 at000f = ╱73╱s╱ // 0x2634 @0xf
0x2625…2644 at0010 = ╱65╱e╱ // 0x2635 @0x10
0x2625…2644 at0011 = ╱20╱…╱ // 0x2636 @0x11
0x2625…2644 at0012 = ╱20╱…╱ // 0x2637 @0x12
0x2625…2644 at0013 = ╱20╱…╱ // 0x2638 @0x13
0x2625…2644 at0014 = ╱20╱…╱ // 0x2639 @0x14
0x2625…2644 at0015 = ╱20╱…╱ // 0x263a @0x15
0x2625…2644 at0016 = ╱20╱…╱ // 0x263b @0x16
0x2625…2644 at0017 = ╱20╱…╱ // 0x263c @0x17
0x2625…2644 at0018 = ╱4e╱N╱ // 0x263d @0x18
0x2625…2644 at0019 = ╱65╱e╱ // 0x263e @0x19
0x2625…2644 at001a = ╱74╱t╱ // 0x263f @0x1a
0x2625…2644 at001b = ╱74╱t╱ // 0x2640 @0x1b
0x2625…2644 at001c = ╱6f╱o╱ // 0x2641 @0x1c
0x2625…2644 at001d = ╱22╱"╱ // 0x2642 @0x1d
0x2625…2644 at001e = EOL // 0x2643 @0x1e
0x2625…2644 }
0x2644…2659 b3b0 3670 CURSOR 56,19
0x2644…2659 LineComalBin {
0x2644…2659 ptr = 0xb3b0 // 0x2644 @0x0
0x2644…2659 lno = 0x0e56 // 0x2646 @0x2
0x2644…2659 at0004 = ╱a1╱ CURSOR ╱ // 0x2648 @0x4
0x2644…2659 at0005 = ╱35╱5╱ // 0x2649 @0x5
0x2644…2659 at0006 = ╱36╱6╱ // 0x264a @0x6
0x2644…2659 at0007 = ╱fe0000e006╱ // 0x264b @0x7
0x2644…2659 at000c = ╱ec╱,╱ // 0x2650 @0xc
0x2644…2659 at000d = ╱31╱1╱ // 0x2651 @0xd
0x2644…2659 at000e = ╱39╱9╱ // 0x2652 @0xe
0x2644…2659 at000f = ╱fe00009805╱ // 0x2653 @0xf
0x2644…2659 at0014 = EOL // 0x2658 @0x14
0x2644…2659 }
0x2659…2674 b3cb 3680 PRINT "Moms Total"
0x2659…2674 LineComalBin {
0x2659…2674 ptr = 0xb3cb // 0x2659 @0x0
0x2659…2674 lno = 0x0e60 // 0x265b @0x2
0x2659…2674 at0004 = ╱92╱ PRINT ╱ // 0x265d @0x4
0x2659…2674 at0005 = ╱22╱"╱ // 0x265e @0x5
0x2659…2674 at0006 = ╱4d╱M╱ // 0x265f @0x6
0x2659…2674 at0007 = ╱6f╱o╱ // 0x2660 @0x7
0x2659…2674 at0008 = ╱6d╱m╱ // 0x2661 @0x8
0x2659…2674 at0009 = ╱73╱s╱ // 0x2662 @0x9
0x2659…2674 at000a = ╱20╱…╱ // 0x2663 @0xa
0x2659…2674 at000b = ╱20╱…╱ // 0x2664 @0xb
0x2659…2674 at000c = ╱20╱…╱ // 0x2665 @0xc
0x2659…2674 at000d = ╱20╱…╱ // 0x2666 @0xd
0x2659…2674 at000e = ╱20╱…╱ // 0x2667 @0xe
0x2659…2674 at000f = ╱20╱…╱ // 0x2668 @0xf
0x2659…2674 at0010 = ╱20╱…╱ // 0x2669 @0x10
0x2659…2674 at0011 = ╱20╱…╱ // 0x266a @0x11
0x2659…2674 at0012 = ╱20╱…╱ // 0x266b @0x12
0x2659…2674 at0013 = ╱20╱…╱ // 0x266c @0x13
0x2659…2674 at0014 = ╱54╱T╱ // 0x266d @0x14
0x2659…2674 at0015 = ╱6f╱o╱ // 0x266e @0x15
0x2659…2674 at0016 = ╱74╱t╱ // 0x266f @0x16
0x2659…2674 at0017 = ╱61╱a╱ // 0x2670 @0x17
0x2659…2674 at0018 = ╱6c╱l╱ // 0x2671 @0x18
0x2659…2674 at0019 = ╱22╱"╱ // 0x2672 @0x19
0x2659…2674 at001a = EOL // 0x2673 @0x1a
0x2659…2674 }
0x2674…26a7 b3fe 3690 EXEC INDPUT2(20,21,BLANK$(1),FORS$)
0x2674…26a7 LineComalBin {
0x2674…26a7 ptr = 0xb3fe // 0x2674 @0x0
0x2674…26a7 lno = 0x0e6a // 0x2676 @0x2
0x2674…26a7 at0004 = ╱9d╱ EXEC ╱ // 0x2678 @0x4
0x2674…26a7 at0005 = ╱49╱I╱ // 0x2679 @0x5
0x2674…26a7 at0006 = ╱4e╱N╱ // 0x267a @0x6
0x2674…26a7 at0007 = ╱44╱D╱ // 0x267b @0x7
0x2674…26a7 at0008 = ╱50╱P╱ // 0x267c @0x8
0x2674…26a7 at0009 = ╱55╱U╱ // 0x267d @0x9
0x2674…26a7 at000a = ╱54╱T╱ // 0x267e @0xa
0x2674…26a7 at000b = ╱32╱2╱ // 0x267f @0xb
0x2674…26a7 at000c = ╱ed╱(╱ // 0x2680 @0xc
0x2674…26a7 at000d = ╱32╱2╱ // 0x2681 @0xd
0x2674…26a7 at000e = ╱30╱0╱ // 0x2682 @0xe
0x2674…26a7 at000f = ╱fe0000a005╱ // 0x2683 @0xf
0x2674…26a7 at0014 = ╱ec╱,╱ // 0x2688 @0x14
0x2674…26a7 at0015 = ╱32╱2╱ // 0x2689 @0x15
0x2674…26a7 at0016 = ╱31╱1╱ // 0x268a @0x16
0x2674…26a7 at0017 = ╱fe0000a805╱ // 0x268b @0x17
0x2674…26a7 at001c = ╱ec╱,╱ // 0x2690 @0x1c
0x2674…26a7 at001d = ╱42╱B╱ // 0x2691 @0x1d
0x2674…26a7 at001e = ╱4c╱L╱ // 0x2692 @0x1e
0x2674…26a7 at001f = ╱41╱A╱ // 0x2693 @0x1f
0x2674…26a7 at0020 = ╱4e╱N╱ // 0x2694 @0x20
0x2674…26a7 at0021 = ╱4b╱K╱ // 0x2695 @0x21
0x2674…26a7 at0022 = ╱ef╱$╱ // 0x2696 @0x22
0x2674…26a7 at0023 = ╱ed╱(╱ // 0x2697 @0x23
0x2674…26a7 at0024 = ╱31╱1╱ // 0x2698 @0x24
0x2674…26a7 at0025 = ╱fe00008001╱ // 0x2699 @0x25
0x2674…26a7 at002a = ╱ee╱)╱ // 0x269e @0x2a
0x2674…26a7 at002b = ╱ec╱,╱ // 0x269f @0x2b
0x2674…26a7 at002c = ╱46╱F╱ // 0x26a0 @0x2c
0x2674…26a7 at002d = ╱4f╱O╱ // 0x26a1 @0x2d
0x2674…26a7 at002e = ╱52╱R╱ // 0x26a2 @0x2e
0x2674…26a7 at002f = ╱53╱S╱ // 0x26a3 @0x2f
0x2674…26a7 at0030 = ╱ef╱$╱ // 0x26a4 @0x30
0x2674…26a7 at0031 = ╱ee╱)╱ // 0x26a5 @0x31
0x2674…26a7 at0032 = EOL // 0x26a6 @0x32
0x2674…26a7 }
0x26a7…26bc b413 3700 CURSOR 21,21
0x26a7…26bc LineComalBin {
0x26a7…26bc ptr = 0xb413 // 0x26a7 @0x0
0x26a7…26bc lno = 0x0e74 // 0x26a9 @0x2
0x26a7…26bc at0004 = ╱a1╱ CURSOR ╱ // 0x26ab @0x4
0x26a7…26bc at0005 = ╱32╱2╱ // 0x26ac @0x5
0x26a7…26bc at0006 = ╱31╱1╱ // 0x26ad @0x6
0x26a7…26bc at0007 = ╱fe0000a805╱ // 0x26ae @0x7
0x26a7…26bc at000c = ╱ec╱,╱ // 0x26b3 @0xc
0x26a7…26bc at000d = ╱32╱2╱ // 0x26b4 @0xd
0x26a7…26bc at000e = ╱31╱1╱ // 0x26b5 @0xe
0x26a7…26bc at000f = ╱fe0000a805╱ // 0x26b6 @0xf
0x26a7…26bc at0014 = EOL // 0x26bb @0x14
0x26a7…26bc }
0x26bc…26e0 b437 3710 EXEC TUD(FORS$,TAL4$,1,0)
0x26bc…26e0 LineComalBin {
0x26bc…26e0 ptr = 0xb437 // 0x26bc @0x0
0x26bc…26e0 lno = 0x0e7e // 0x26be @0x2
0x26bc…26e0 at0004 = ╱9d╱ EXEC ╱ // 0x26c0 @0x4
0x26bc…26e0 at0005 = ╱54╱T╱ // 0x26c1 @0x5
0x26bc…26e0 at0006 = ╱55╱U╱ // 0x26c2 @0x6
0x26bc…26e0 at0007 = ╱44╱D╱ // 0x26c3 @0x7
0x26bc…26e0 at0008 = ╱ed╱(╱ // 0x26c4 @0x8
0x26bc…26e0 at0009 = ╱46╱F╱ // 0x26c5 @0x9
0x26bc…26e0 at000a = ╱4f╱O╱ // 0x26c6 @0xa
0x26bc…26e0 at000b = ╱52╱R╱ // 0x26c7 @0xb
0x26bc…26e0 at000c = ╱53╱S╱ // 0x26c8 @0xc
0x26bc…26e0 at000d = ╱ef╱$╱ // 0x26c9 @0xd
0x26bc…26e0 at000e = ╱ec╱,╱ // 0x26ca @0xe
0x26bc…26e0 at000f = ╱54╱T╱ // 0x26cb @0xf
0x26bc…26e0 at0010 = ╱41╱A╱ // 0x26cc @0x10
0x26bc…26e0 at0011 = ╱4c╱L╱ // 0x26cd @0x11
0x26bc…26e0 at0012 = ╱34╱4╱ // 0x26ce @0x12
0x26bc…26e0 at0013 = ╱ef╱$╱ // 0x26cf @0x13
0x26bc…26e0 at0014 = ╱ec╱,╱ // 0x26d0 @0x14
0x26bc…26e0 at0015 = ╱31╱1╱ // 0x26d1 @0x15
0x26bc…26e0 at0016 = ╱fe00008001╱ // 0x26d2 @0x16
0x26bc…26e0 at001b = ╱ec╱,╱ // 0x26d7 @0x1b
0x26bc…26e0 at001c = ╱30╱0╱ // 0x26d8 @0x1c
0x26bc…26e0 at001d = ╱fe00000000╱ // 0x26d9 @0x1d
0x26bc…26e0 at0022 = ╱ee╱)╱ // 0x26de @0x22
0x26bc…26e0 at0023 = EOL // 0x26df @0x23
0x26bc…26e0 }
0x26e0…26f5 b44c 3720 CURSOR 36,21
0x26e0…26f5 LineComalBin {
0x26e0…26f5 ptr = 0xb44c // 0x26e0 @0x0
0x26e0…26f5 lno = 0x0e88 // 0x26e2 @0x2
0x26e0…26f5 at0004 = ╱a1╱ CURSOR ╱ // 0x26e4 @0x4
0x26e0…26f5 at0005 = ╱33╱3╱ // 0x26e5 @0x5
0x26e0…26f5 at0006 = ╱36╱6╱ // 0x26e6 @0x6
0x26e0…26f5 at0007 = ╱fe00009006╱ // 0x26e7 @0x7
0x26e0…26f5 at000c = ╱ec╱,╱ // 0x26ec @0xc
0x26e0…26f5 at000d = ╱32╱2╱ // 0x26ed @0xd
0x26e0…26f5 at000e = ╱31╱1╱ // 0x26ee @0xe
0x26e0…26f5 at000f = ╱fe0000a805╱ // 0x26ef @0xf
0x26e0…26f5 at0014 = EOL // 0x26f4 @0x14
0x26e0…26f5 }
0x26f5…2719 b470 3730 EXEC CA(0,FORS$,TOTAL$,TOTAL$)
0x26f5…2719 LineComalBin {
0x26f5…2719 ptr = 0xb470 // 0x26f5 @0x0
0x26f5…2719 lno = 0x0e92 // 0x26f7 @0x2
0x26f5…2719 at0004 = ╱9d╱ EXEC ╱ // 0x26f9 @0x4
0x26f5…2719 at0005 = ╱43╱C╱ // 0x26fa @0x5
0x26f5…2719 at0006 = ╱41╱A╱ // 0x26fb @0x6
0x26f5…2719 at0007 = ╱ed╱(╱ // 0x26fc @0x7
0x26f5…2719 at0008 = ╱30╱0╱ // 0x26fd @0x8
0x26f5…2719 at0009 = ╱fe00000000╱ // 0x26fe @0x9
0x26f5…2719 at000e = ╱ec╱,╱ // 0x2703 @0xe
0x26f5…2719 at000f = ╱46╱F╱ // 0x2704 @0xf
0x26f5…2719 at0010 = ╱4f╱O╱ // 0x2705 @0x10
0x26f5…2719 at0011 = ╱52╱R╱ // 0x2706 @0x11
0x26f5…2719 at0012 = ╱53╱S╱ // 0x2707 @0x12
0x26f5…2719 at0013 = ╱ef╱$╱ // 0x2708 @0x13
0x26f5…2719 at0014 = ╱ec╱,╱ // 0x2709 @0x14
0x26f5…2719 at0015 = ╱54╱T╱ // 0x270a @0x15
0x26f5…2719 at0016 = ╱4f╱O╱ // 0x270b @0x16
0x26f5…2719 at0017 = ╱54╱T╱ // 0x270c @0x17
0x26f5…2719 at0018 = ╱41╱A╱ // 0x270d @0x18
0x26f5…2719 at0019 = ╱4c╱L╱ // 0x270e @0x19
0x26f5…2719 at001a = ╱ef╱$╱ // 0x270f @0x1a
0x26f5…2719 at001b = ╱ec╱,╱ // 0x2710 @0x1b
0x26f5…2719 at001c = ╱54╱T╱ // 0x2711 @0x1c
0x26f5…2719 at001d = ╱4f╱O╱ // 0x2712 @0x1d
0x26f5…2719 at001e = ╱54╱T╱ // 0x2713 @0x1e
0x26f5…2719 at001f = ╱41╱A╱ // 0x2714 @0x1f
0x26f5…2719 at0020 = ╱4c╱L╱ // 0x2715 @0x20
0x26f5…2719 at0021 = ╱ef╱$╱ // 0x2716 @0x21
0x26f5…2719 at0022 = ╱ee╱)╱ // 0x2717 @0x22
0x26f5…2719 at0023 = EOL // 0x2718 @0x23
0x26f5…2719 }
0x2719…273e b495 3740 EXEC TUD(TOTAL$,TAL4$,1,0)
0x2719…273e LineComalBin {
0x2719…273e ptr = 0xb495 // 0x2719 @0x0
0x2719…273e lno = 0x0e9c // 0x271b @0x2
0x2719…273e at0004 = ╱9d╱ EXEC ╱ // 0x271d @0x4
0x2719…273e at0005 = ╱54╱T╱ // 0x271e @0x5
0x2719…273e at0006 = ╱55╱U╱ // 0x271f @0x6
0x2719…273e at0007 = ╱44╱D╱ // 0x2720 @0x7
0x2719…273e at0008 = ╱ed╱(╱ // 0x2721 @0x8
0x2719…273e at0009 = ╱54╱T╱ // 0x2722 @0x9
0x2719…273e at000a = ╱4f╱O╱ // 0x2723 @0xa
0x2719…273e at000b = ╱54╱T╱ // 0x2724 @0xb
0x2719…273e at000c = ╱41╱A╱ // 0x2725 @0xc
0x2719…273e at000d = ╱4c╱L╱ // 0x2726 @0xd
0x2719…273e at000e = ╱ef╱$╱ // 0x2727 @0xe
0x2719…273e at000f = ╱ec╱,╱ // 0x2728 @0xf
0x2719…273e at0010 = ╱54╱T╱ // 0x2729 @0x10
0x2719…273e at0011 = ╱41╱A╱ // 0x272a @0x11
0x2719…273e at0012 = ╱4c╱L╱ // 0x272b @0x12
0x2719…273e at0013 = ╱34╱4╱ // 0x272c @0x13
0x2719…273e at0014 = ╱ef╱$╱ // 0x272d @0x14
0x2719…273e at0015 = ╱ec╱,╱ // 0x272e @0x15
0x2719…273e at0016 = ╱31╱1╱ // 0x272f @0x16
0x2719…273e at0017 = ╱fe00008001╱ // 0x2730 @0x17
0x2719…273e at001c = ╱ec╱,╱ // 0x2735 @0x1c
0x2719…273e at001d = ╱30╱0╱ // 0x2736 @0x1d
0x2719…273e at001e = ╱fe00000000╱ // 0x2737 @0x1e
0x2719…273e at0023 = ╱ee╱)╱ // 0x273c @0x23
0x2719…273e at0024 = EOL // 0x273d @0x24
0x2719…273e }
0x273e…274f b4a6 3750 IF DEBLK$="0" THEN
0x273e…274f LineComalBin {
0x273e…274f ptr = 0xb4a6 // 0x273e @0x0
0x273e…274f lno = 0x0ea6 // 0x2740 @0x2
0x273e…274f at0004 = ╱9c╱ IF ╱ // 0x2742 @0x4
0x273e…274f at0005 = ╱44╱D╱ // 0x2743 @0x5
0x273e…274f at0006 = ╱45╱E╱ // 0x2744 @0x6
0x273e…274f at0007 = ╱42╱B╱ // 0x2745 @0x7
0x273e…274f at0008 = ╱4c╱L╱ // 0x2746 @0x8
0x273e…274f at0009 = ╱4b╱K╱ // 0x2747 @0x9
0x273e…274f at000a = ╱ef╱$╱ // 0x2748 @0xa
0x273e…274f at000b = ╱dc╱=╱ // 0x2749 @0xb
0x273e…274f at000c = ╱22╱"╱ // 0x274a @0xc
0x273e…274f at000d = ╱30╱0╱ // 0x274b @0xd
0x273e…274f at000e = ╱22╱"╱ // 0x274c @0xe
0x273e…274f at000f = ╱b6╱ THEN ╱ // 0x274d @0xf
0x273e…274f at0010 = EOL // 0x274e @0x10
0x273e…274f }
0x274f…2774 b4cb 3760 EXEC CA(2,TOTAL$,MOMS$,FTOTAL$)
0x274f…2774 LineComalBin {
0x274f…2774 ptr = 0xb4cb // 0x274f @0x0
0x274f…2774 lno = 0x0eb0 // 0x2751 @0x2
0x274f…2774 at0004 = ╱9d╱ EXEC ╱ // 0x2753 @0x4
0x274f…2774 at0005 = ╱43╱C╱ // 0x2754 @0x5
0x274f…2774 at0006 = ╱41╱A╱ // 0x2755 @0x6
0x274f…2774 at0007 = ╱ed╱(╱ // 0x2756 @0x7
0x274f…2774 at0008 = ╱32╱2╱ // 0x2757 @0x8
0x274f…2774 at0009 = ╱fe00008002╱ // 0x2758 @0x9
0x274f…2774 at000e = ╱ec╱,╱ // 0x275d @0xe
0x274f…2774 at000f = ╱54╱T╱ // 0x275e @0xf
0x274f…2774 at0010 = ╱4f╱O╱ // 0x275f @0x10
0x274f…2774 at0011 = ╱54╱T╱ // 0x2760 @0x11
0x274f…2774 at0012 = ╱41╱A╱ // 0x2761 @0x12
0x274f…2774 at0013 = ╱4c╱L╱ // 0x2762 @0x13
0x274f…2774 at0014 = ╱ef╱$╱ // 0x2763 @0x14
0x274f…2774 at0015 = ╱ec╱,╱ // 0x2764 @0x15
0x274f…2774 at0016 = ╱4d╱M╱ // 0x2765 @0x16
0x274f…2774 at0017 = ╱4f╱O╱ // 0x2766 @0x17
0x274f…2774 at0018 = ╱4d╱M╱ // 0x2767 @0x18
0x274f…2774 at0019 = ╱53╱S╱ // 0x2768 @0x19
0x274f…2774 at001a = ╱ef╱$╱ // 0x2769 @0x1a
0x274f…2774 at001b = ╱ec╱,╱ // 0x276a @0x1b
0x274f…2774 at001c = ╱46╱F╱ // 0x276b @0x1c
0x274f…2774 at001d = ╱54╱T╱ // 0x276c @0x1d
0x274f…2774 at001e = ╱4f╱O╱ // 0x276d @0x1e
0x274f…2774 at001f = ╱54╱T╱ // 0x276e @0x1f
0x274f…2774 at0020 = ╱41╱A╱ // 0x276f @0x20
0x274f…2774 at0021 = ╱4c╱L╱ // 0x2770 @0x21
0x274f…2774 at0022 = ╱ef╱$╱ // 0x2771 @0x22
0x274f…2774 at0023 = ╱ee╱)╱ // 0x2772 @0x23
0x274f…2774 at0024 = EOL // 0x2773 @0x24
0x274f…2774 }
0x2774…2786 b4dd 3770 ANTAL$="100+"
0x2774…2786 LineComalBin {
0x2774…2786 ptr = 0xb4dd // 0x2774 @0x0
0x2774…2786 lno = 0x0eba // 0x2776 @0x2
0x2774…2786 at0004 = ╱41╱A╱ // 0x2778 @0x4
0x2774…2786 at0005 = ╱4e╱N╱ // 0x2779 @0x5
0x2774…2786 at0006 = ╱54╱T╱ // 0x277a @0x6
0x2774…2786 at0007 = ╱41╱A╱ // 0x277b @0x7
0x2774…2786 at0008 = ╱4c╱L╱ // 0x277c @0x8
0x2774…2786 at0009 = ╱ef╱$╱ // 0x277d @0x9
0x2774…2786 at000a = ╱dc╱=╱ // 0x277e @0xa
0x2774…2786 at000b = ╱22╱"╱ // 0x277f @0xb
0x2774…2786 at000c = ╱31╱1╱ // 0x2780 @0xc
0x2774…2786 at000d = ╱30╱0╱ // 0x2781 @0xd
0x2774…2786 at000e = ╱30╱0╱ // 0x2782 @0xe
0x2774…2786 at000f = ╱2b╱+╱ // 0x2783 @0xf
0x2774…2786 at0010 = ╱22╱"╱ // 0x2784 @0x10
0x2774…2786 at0011 = EOL // 0x2785 @0x11
0x2774…2786 }
0x2786…27ac b503 3780 EXEC CA(3,FTOTAL$,ANTAL$,ANTAL$)
0x2786…27ac LineComalBin {
0x2786…27ac ptr = 0xb503 // 0x2786 @0x0
0x2786…27ac lno = 0x0ec4 // 0x2788 @0x2
0x2786…27ac at0004 = ╱9d╱ EXEC ╱ // 0x278a @0x4
0x2786…27ac at0005 = ╱43╱C╱ // 0x278b @0x5
0x2786…27ac at0006 = ╱41╱A╱ // 0x278c @0x6
0x2786…27ac at0007 = ╱ed╱(╱ // 0x278d @0x7
0x2786…27ac at0008 = ╱33╱3╱ // 0x278e @0x8
0x2786…27ac at0009 = ╱fe0000c002╱ // 0x278f @0x9
0x2786…27ac at000e = ╱ec╱,╱ // 0x2794 @0xe
0x2786…27ac at000f = ╱46╱F╱ // 0x2795 @0xf
0x2786…27ac at0010 = ╱54╱T╱ // 0x2796 @0x10
0x2786…27ac at0011 = ╱4f╱O╱ // 0x2797 @0x11
0x2786…27ac at0012 = ╱54╱T╱ // 0x2798 @0x12
0x2786…27ac at0013 = ╱41╱A╱ // 0x2799 @0x13
0x2786…27ac at0014 = ╱4c╱L╱ // 0x279a @0x14
0x2786…27ac at0015 = ╱ef╱$╱ // 0x279b @0x15
0x2786…27ac at0016 = ╱ec╱,╱ // 0x279c @0x16
0x2786…27ac at0017 = ╱41╱A╱ // 0x279d @0x17
0x2786…27ac at0018 = ╱4e╱N╱ // 0x279e @0x18
0x2786…27ac at0019 = ╱54╱T╱ // 0x279f @0x19
0x2786…27ac at001a = ╱41╱A╱ // 0x27a0 @0x1a
0x2786…27ac at001b = ╱4c╱L╱ // 0x27a1 @0x1b
0x2786…27ac at001c = ╱ef╱$╱ // 0x27a2 @0x1c
0x2786…27ac at001d = ╱ec╱,╱ // 0x27a3 @0x1d
0x2786…27ac at001e = ╱41╱A╱ // 0x27a4 @0x1e
0x2786…27ac at001f = ╱4e╱N╱ // 0x27a5 @0x1f
0x2786…27ac at0020 = ╱54╱T╱ // 0x27a6 @0x20
0x2786…27ac at0021 = ╱41╱A╱ // 0x27a7 @0x21
0x2786…27ac at0022 = ╱4c╱L╱ // 0x27a8 @0x22
0x2786…27ac at0023 = ╱ef╱$╱ // 0x27a9 @0x23
0x2786…27ac at0024 = ╱ee╱)╱ // 0x27aa @0x24
0x2786…27ac at0025 = EOL // 0x27ab @0x25
0x2786…27ac }
0x27ac…27c1 b518 3790 CURSOR 51,21
0x27ac…27c1 LineComalBin {
0x27ac…27c1 ptr = 0xb518 // 0x27ac @0x0
0x27ac…27c1 lno = 0x0ece // 0x27ae @0x2
0x27ac…27c1 at0004 = ╱a1╱ CURSOR ╱ // 0x27b0 @0x4
0x27ac…27c1 at0005 = ╱35╱5╱ // 0x27b1 @0x5
0x27ac…27c1 at0006 = ╱31╱1╱ // 0x27b2 @0x6
0x27ac…27c1 at0007 = ╱fe0000cc06╱ // 0x27b3 @0x7
0x27ac…27c1 at000c = ╱ec╱,╱ // 0x27b8 @0xc
0x27ac…27c1 at000d = ╱32╱2╱ // 0x27b9 @0xd
0x27ac…27c1 at000e = ╱31╱1╱ // 0x27ba @0xe
0x27ac…27c1 at000f = ╱fe0000a805╱ // 0x27bb @0xf
0x27ac…27c1 at0014 = EOL // 0x27c0 @0x14
0x27ac…27c1 }
0x27c1…27e6 b53d 3800 EXEC TUD(ANTAL$,TAL4$,1,0)
0x27c1…27e6 LineComalBin {
0x27c1…27e6 ptr = 0xb53d // 0x27c1 @0x0
0x27c1…27e6 lno = 0x0ed8 // 0x27c3 @0x2
0x27c1…27e6 at0004 = ╱9d╱ EXEC ╱ // 0x27c5 @0x4
0x27c1…27e6 at0005 = ╱54╱T╱ // 0x27c6 @0x5
0x27c1…27e6 at0006 = ╱55╱U╱ // 0x27c7 @0x6
0x27c1…27e6 at0007 = ╱44╱D╱ // 0x27c8 @0x7
0x27c1…27e6 at0008 = ╱ed╱(╱ // 0x27c9 @0x8
0x27c1…27e6 at0009 = ╱41╱A╱ // 0x27ca @0x9
0x27c1…27e6 at000a = ╱4e╱N╱ // 0x27cb @0xa
0x27c1…27e6 at000b = ╱54╱T╱ // 0x27cc @0xb
0x27c1…27e6 at000c = ╱41╱A╱ // 0x27cd @0xc
0x27c1…27e6 at000d = ╱4c╱L╱ // 0x27ce @0xd
0x27c1…27e6 at000e = ╱ef╱$╱ // 0x27cf @0xe
0x27c1…27e6 at000f = ╱ec╱,╱ // 0x27d0 @0xf
0x27c1…27e6 at0010 = ╱54╱T╱ // 0x27d1 @0x10
0x27c1…27e6 at0011 = ╱41╱A╱ // 0x27d2 @0x11
0x27c1…27e6 at0012 = ╱4c╱L╱ // 0x27d3 @0x12
0x27c1…27e6 at0013 = ╱34╱4╱ // 0x27d4 @0x13
0x27c1…27e6 at0014 = ╱ef╱$╱ // 0x27d5 @0x14
0x27c1…27e6 at0015 = ╱ec╱,╱ // 0x27d6 @0x15
0x27c1…27e6 at0016 = ╱31╱1╱ // 0x27d7 @0x16
0x27c1…27e6 at0017 = ╱fe00008001╱ // 0x27d8 @0x17
0x27c1…27e6 at001c = ╱ec╱,╱ // 0x27dd @0x1c
0x27c1…27e6 at001d = ╱30╱0╱ // 0x27de @0x1d
0x27c1…27e6 at001e = ╱fe00000000╱ // 0x27df @0x1e
0x27c1…27e6 at0023 = ╱ee╱)╱ // 0x27e4 @0x23
0x27c1…27e6 at0024 = EOL // 0x27e5 @0x24
0x27c1…27e6 }
0x27e6…280c b563 3810 EXEC CA(0,ANTAL$,TOTAL$,FTOTAL$)
0x27e6…280c LineComalBin {
0x27e6…280c ptr = 0xb563 // 0x27e6 @0x0
0x27e6…280c lno = 0x0ee2 // 0x27e8 @0x2
0x27e6…280c at0004 = ╱9d╱ EXEC ╱ // 0x27ea @0x4
0x27e6…280c at0005 = ╱43╱C╱ // 0x27eb @0x5
0x27e6…280c at0006 = ╱41╱A╱ // 0x27ec @0x6
0x27e6…280c at0007 = ╱ed╱(╱ // 0x27ed @0x7
0x27e6…280c at0008 = ╱30╱0╱ // 0x27ee @0x8
0x27e6…280c at0009 = ╱fe00000000╱ // 0x27ef @0x9
0x27e6…280c at000e = ╱ec╱,╱ // 0x27f4 @0xe
0x27e6…280c at000f = ╱41╱A╱ // 0x27f5 @0xf
0x27e6…280c at0010 = ╱4e╱N╱ // 0x27f6 @0x10
0x27e6…280c at0011 = ╱54╱T╱ // 0x27f7 @0x11
0x27e6…280c at0012 = ╱41╱A╱ // 0x27f8 @0x12
0x27e6…280c at0013 = ╱4c╱L╱ // 0x27f9 @0x13
0x27e6…280c at0014 = ╱ef╱$╱ // 0x27fa @0x14
0x27e6…280c at0015 = ╱ec╱,╱ // 0x27fb @0x15
0x27e6…280c at0016 = ╱54╱T╱ // 0x27fc @0x16
0x27e6…280c at0017 = ╱4f╱O╱ // 0x27fd @0x17
0x27e6…280c at0018 = ╱54╱T╱ // 0x27fe @0x18
0x27e6…280c at0019 = ╱41╱A╱ // 0x27ff @0x19
0x27e6…280c at001a = ╱4c╱L╱ // 0x2800 @0x1a
0x27e6…280c at001b = ╱ef╱$╱ // 0x2801 @0x1b
0x27e6…280c at001c = ╱ec╱,╱ // 0x2802 @0x1c
0x27e6…280c at001d = ╱46╱F╱ // 0x2803 @0x1d
0x27e6…280c at001e = ╱54╱T╱ // 0x2804 @0x1e
0x27e6…280c at001f = ╱4f╱O╱ // 0x2805 @0x1f
0x27e6…280c at0020 = ╱54╱T╱ // 0x2806 @0x20
0x27e6…280c at0021 = ╱41╱A╱ // 0x2807 @0x21
0x27e6…280c at0022 = ╱4c╱L╱ // 0x2808 @0x22
0x27e6…280c at0023 = ╱ef╱$╱ // 0x2809 @0x23
0x27e6…280c at0024 = ╱ee╱)╱ // 0x280a @0x24
0x27e6…280c at0025 = EOL // 0x280b @0x25
0x27e6…280c }
0x280c…2812 b569 3820 ELSE
0x280c…2812 LineComalBin {
0x280c…2812 ptr = 0xb569 // 0x280c @0x0
0x280c…2812 lno = 0x0eec // 0x280e @0x2
0x280c…2812 at0004 = ╱9a╱ ELSE ╱ // 0x2810 @0x4
0x280c…2812 at0005 = EOL // 0x2811 @0x5
0x280c…2812 }
0x2812…2825 b57c 3830 FTOTAL$=TOTAL$
0x2812…2825 LineComalBin {
0x2812…2825 ptr = 0xb57c // 0x2812 @0x0
0x2812…2825 lno = 0x0ef6 // 0x2814 @0x2
0x2812…2825 at0004 = ╱46╱F╱ // 0x2816 @0x4
0x2812…2825 at0005 = ╱54╱T╱ // 0x2817 @0x5
0x2812…2825 at0006 = ╱4f╱O╱ // 0x2818 @0x6
0x2812…2825 at0007 = ╱54╱T╱ // 0x2819 @0x7
0x2812…2825 at0008 = ╱41╱A╱ // 0x281a @0x8
0x2812…2825 at0009 = ╱4c╱L╱ // 0x281b @0x9
0x2812…2825 at000a = ╱ef╱$╱ // 0x281c @0xa
0x2812…2825 at000b = ╱dc╱=╱ // 0x281d @0xb
0x2812…2825 at000c = ╱54╱T╱ // 0x281e @0xc
0x2812…2825 at000d = ╱4f╱O╱ // 0x281f @0xd
0x2812…2825 at000e = ╱54╱T╱ // 0x2820 @0xe
0x2812…2825 at000f = ╱41╱A╱ // 0x2821 @0xf
0x2812…2825 at0010 = ╱4c╱L╱ // 0x2822 @0x10
0x2812…2825 at0011 = ╱ef╱$╱ // 0x2823 @0x11
0x2812…2825 at0012 = EOL // 0x2824 @0x12
0x2812…2825 }
0x2825…282b b582 3840 ENDIF
0x2825…282b LineComalBin {
0x2825…282b ptr = 0xb582 // 0x2825 @0x0
0x2825…282b lno = 0x0f00 // 0x2827 @0x2
0x2825…282b at0004 = ╱9b╱ ENDIF ╱ // 0x2829 @0x4
0x2825…282b at0005 = EOL // 0x282a @0x5
0x2825…282b }
0x282b…2840 b597 3850 CURSOR 66,21
0x282b…2840 LineComalBin {
0x282b…2840 ptr = 0xb597 // 0x282b @0x0
0x282b…2840 lno = 0x0f0a // 0x282d @0x2
0x282b…2840 at0004 = ╱a1╱ CURSOR ╱ // 0x282f @0x4
0x282b…2840 at0005 = ╱36╱6╱ // 0x2830 @0x5
0x282b…2840 at0006 = ╱36╱6╱ // 0x2831 @0x6
0x282b…2840 at0007 = ╱fe00008407╱ // 0x2832 @0x7
0x282b…2840 at000c = ╱ec╱,╱ // 0x2837 @0xc
0x282b…2840 at000d = ╱32╱2╱ // 0x2838 @0xd
0x282b…2840 at000e = ╱31╱1╱ // 0x2839 @0xe
0x282b…2840 at000f = ╱fe0000a805╱ // 0x283a @0xf
0x282b…2840 at0014 = EOL // 0x283f @0x14
0x282b…2840 }
0x2840…2866 b5bd 3860 EXEC TUD(FTOTAL$,TAL4$,1,0)
0x2840…2866 LineComalBin {
0x2840…2866 ptr = 0xb5bd // 0x2840 @0x0
0x2840…2866 lno = 0x0f14 // 0x2842 @0x2
0x2840…2866 at0004 = ╱9d╱ EXEC ╱ // 0x2844 @0x4
0x2840…2866 at0005 = ╱54╱T╱ // 0x2845 @0x5
0x2840…2866 at0006 = ╱55╱U╱ // 0x2846 @0x6
0x2840…2866 at0007 = ╱44╱D╱ // 0x2847 @0x7
0x2840…2866 at0008 = ╱ed╱(╱ // 0x2848 @0x8
0x2840…2866 at0009 = ╱46╱F╱ // 0x2849 @0x9
0x2840…2866 at000a = ╱54╱T╱ // 0x284a @0xa
0x2840…2866 at000b = ╱4f╱O╱ // 0x284b @0xb
0x2840…2866 at000c = ╱54╱T╱ // 0x284c @0xc
0x2840…2866 at000d = ╱41╱A╱ // 0x284d @0xd
0x2840…2866 at000e = ╱4c╱L╱ // 0x284e @0xe
0x2840…2866 at000f = ╱ef╱$╱ // 0x284f @0xf
0x2840…2866 at0010 = ╱ec╱,╱ // 0x2850 @0x10
0x2840…2866 at0011 = ╱54╱T╱ // 0x2851 @0x11
0x2840…2866 at0012 = ╱41╱A╱ // 0x2852 @0x12
0x2840…2866 at0013 = ╱4c╱L╱ // 0x2853 @0x13
0x2840…2866 at0014 = ╱34╱4╱ // 0x2854 @0x14
0x2840…2866 at0015 = ╱ef╱$╱ // 0x2855 @0x15
0x2840…2866 at0016 = ╱ec╱,╱ // 0x2856 @0x16
0x2840…2866 at0017 = ╱31╱1╱ // 0x2857 @0x17
0x2840…2866 at0018 = ╱fe00008001╱ // 0x2858 @0x18
0x2840…2866 at001d = ╱ec╱,╱ // 0x285d @0x1d
0x2840…2866 at001e = ╱30╱0╱ // 0x285e @0x1e
0x2840…2866 at001f = ╱fe00000000╱ // 0x285f @0x1f
0x2840…2866 at0024 = ╱ee╱)╱ // 0x2864 @0x24
0x2840…2866 at0025 = EOL // 0x2865 @0x25
0x2840…2866 }
0x2866…2879 b5d0 3870 TOTAL$=GTOTAL$
0x2866…2879 LineComalBin {
0x2866…2879 ptr = 0xb5d0 // 0x2866 @0x0
0x2866…2879 lno = 0x0f1e // 0x2868 @0x2
0x2866…2879 at0004 = ╱54╱T╱ // 0x286a @0x4
0x2866…2879 at0005 = ╱4f╱O╱ // 0x286b @0x5
0x2866…2879 at0006 = ╱54╱T╱ // 0x286c @0x6
0x2866…2879 at0007 = ╱41╱A╱ // 0x286d @0x7
0x2866…2879 at0008 = ╱4c╱L╱ // 0x286e @0x8
0x2866…2879 at0009 = ╱ef╱$╱ // 0x286f @0x9
0x2866…2879 at000a = ╱dc╱=╱ // 0x2870 @0xa
0x2866…2879 at000b = ╱47╱G╱ // 0x2871 @0xb
0x2866…2879 at000c = ╱54╱T╱ // 0x2872 @0xc
0x2866…2879 at000d = ╱4f╱O╱ // 0x2873 @0xd
0x2866…2879 at000e = ╱54╱T╱ // 0x2874 @0xe
0x2866…2879 at000f = ╱41╱A╱ // 0x2875 @0xf
0x2866…2879 at0010 = ╱4c╱L╱ // 0x2876 @0x10
0x2866…2879 at0011 = ╱ef╱$╱ // 0x2877 @0x11
0x2866…2879 at0012 = EOL // 0x2878 @0x12
0x2866…2879 }
0x2879…28ac b603 3880 EXEC INDPUT1(9,23,-9,-6,LTX2$)
0x2879…28ac LineComalBin {
0x2879…28ac ptr = 0xb603 // 0x2879 @0x0
0x2879…28ac lno = 0x0f28 // 0x287b @0x2
0x2879…28ac at0004 = ╱9d╱ EXEC ╱ // 0x287d @0x4
0x2879…28ac at0005 = ╱49╱I╱ // 0x287e @0x5
0x2879…28ac at0006 = ╱4e╱N╱ // 0x287f @0x6
0x2879…28ac at0007 = ╱44╱D╱ // 0x2880 @0x7
0x2879…28ac at0008 = ╱50╱P╱ // 0x2881 @0x8
0x2879…28ac at0009 = ╱55╱U╱ // 0x2882 @0x9
0x2879…28ac at000a = ╱54╱T╱ // 0x2883 @0xa
0x2879…28ac at000b = ╱31╱1╱ // 0x2884 @0xb
0x2879…28ac at000c = ╱ed╱(╱ // 0x2885 @0xc
0x2879…28ac at000d = ╱39╱9╱ // 0x2886 @0xd
0x2879…28ac at000e = ╱fe00009004╱ // 0x2887 @0xe
0x2879…28ac at0013 = ╱ec╱,╱ // 0x288c @0x13
0x2879…28ac at0014 = ╱32╱2╱ // 0x288d @0x14
0x2879…28ac at0015 = ╱33╱3╱ // 0x288e @0x15
0x2879…28ac at0016 = ╱fe0000b805╱ // 0x288f @0x16
0x2879…28ac at001b = ╱ec╱,╱ // 0x2894 @0x1b
0x2879…28ac at001c = ╱e9╱-╱ // 0x2895 @0x1c
0x2879…28ac at001d = ╱39╱9╱ // 0x2896 @0x1d
0x2879…28ac at001e = ╱fe00009004╱ // 0x2897 @0x1e
0x2879…28ac at0023 = ╱ec╱,╱ // 0x289c @0x23
0x2879…28ac at0024 = ╱e9╱-╱ // 0x289d @0x24
0x2879…28ac at0025 = ╱36╱6╱ // 0x289e @0x25
0x2879…28ac at0026 = ╱fe0000c003╱ // 0x289f @0x26
0x2879…28ac at002b = ╱ec╱,╱ // 0x28a4 @0x2b
0x2879…28ac at002c = ╱4c╱L╱ // 0x28a5 @0x2c
0x2879…28ac at002d = ╱54╱T╱ // 0x28a6 @0x2d
0x2879…28ac at002e = ╱58╱X╱ // 0x28a7 @0x2e
0x2879…28ac at002f = ╱32╱2╱ // 0x28a8 @0x2f
0x2879…28ac at0030 = ╱ef╱$╱ // 0x28a9 @0x30
0x2879…28ac at0031 = ╱ee╱)╱ // 0x28aa @0x31
0x2879…28ac at0032 = EOL // 0x28ab @0x32
0x2879…28ac }
0x28ac…28bb b612 3890 UNTIL P=-7
0x28ac…28bb LineComalBin {
0x28ac…28bb ptr = 0xb612 // 0x28ac @0x0
0x28ac…28bb lno = 0x0f32 // 0x28ae @0x2
0x28ac…28bb at0004 = ╱98╱ UNTIL ╱ // 0x28b0 @0x4
0x28ac…28bb at0005 = ╱50╱P╱ // 0x28b1 @0x5
0x28ac…28bb at0006 = ╱dc╱=╱ // 0x28b2 @0x6
0x28ac…28bb at0007 = ╱e9╱-╱ // 0x28b3 @0x7
0x28ac…28bb at0008 = ╱37╱7╱ // 0x28b4 @0x8
0x28ac…28bb at0009 = ╱fe0000e003╱ // 0x28b5 @0x9
0x28ac…28bb at000e = EOL // 0x28ba @0xe
0x28ac…28bb }
0x28bb…28c1 b618 3900 ENDPROC
0x28bb…28c1 LineComalBin {
0x28bb…28c1 ptr = 0xb618 // 0x28bb @0x0
0x28bb…28c1 lno = 0x0f3c // 0x28bd @0x2
0x28bb…28c1 at0004 = ╱9f╱ ENDPROC ╱ // 0x28bf @0x4
0x28bb…28c1 at0005 = EOL // 0x28c0 @0x5
0x28bb…28c1 }
0x28c1…28cb b622 3910 PROC SLET
0x28c1…28cb LineComalBin {
0x28c1…28cb ptr = 0xb622 // 0x28c1 @0x0
0x28c1…28cb lno = 0x0f46 // 0x28c3 @0x2
0x28c1…28cb at0004 = ╱9e╱ PROC ╱ // 0x28c5 @0x4
0x28c1…28cb at0005 = ╱53╱S╱ // 0x28c6 @0x5
0x28c1…28cb at0006 = ╱4c╱L╱ // 0x28c7 @0x6
0x28c1…28cb at0007 = ╱45╱E╱ // 0x28c8 @0x7
0x28c1…28cb at0008 = ╱54╱T╱ // 0x28c9 @0x8
0x28c1…28cb at0009 = EOL // 0x28ca @0x9
0x28c1…28cb }
0x28cb…28df b636 3920 CURSOR 2,19
0x28cb…28df LineComalBin {
0x28cb…28df ptr = 0xb636 // 0x28cb @0x0
0x28cb…28df lno = 0x0f50 // 0x28cd @0x2
0x28cb…28df at0004 = ╱a1╱ CURSOR ╱ // 0x28cf @0x4
0x28cb…28df at0005 = ╱32╱2╱ // 0x28d0 @0x5
0x28cb…28df at0006 = ╱fe00008002╱ // 0x28d1 @0x6
0x28cb…28df at000b = ╱ec╱,╱ // 0x28d6 @0xb
0x28cb…28df at000c = ╱31╱1╱ // 0x28d7 @0xc
0x28cb…28df at000d = ╱39╱9╱ // 0x28d8 @0xd
0x28cb…28df at000e = ╱fe00009805╱ // 0x28d9 @0xe
0x28cb…28df at0013 = EOL // 0x28de @0x13
0x28cb…28df }
0x28df…28eb b642 3930 PRINT BLANK$
0x28df…28eb LineComalBin {
0x28df…28eb ptr = 0xb642 // 0x28df @0x0
0x28df…28eb lno = 0x0f5a // 0x28e1 @0x2
0x28df…28eb at0004 = ╱92╱ PRINT ╱ // 0x28e3 @0x4
0x28df…28eb at0005 = ╱42╱B╱ // 0x28e4 @0x5
0x28df…28eb at0006 = ╱4c╱L╱ // 0x28e5 @0x6
0x28df…28eb at0007 = ╱41╱A╱ // 0x28e6 @0x7
0x28df…28eb at0008 = ╱4e╱N╱ // 0x28e7 @0x8
0x28df…28eb at0009 = ╱4b╱K╱ // 0x28e8 @0x9
0x28df…28eb at000a = ╱ef╱$╱ // 0x28e9 @0xa
0x28df…28eb at000b = EOL // 0x28ea @0xb
0x28df…28eb }
0x28eb…28ff b656 3940 CURSOR 2,21
0x28eb…28ff LineComalBin {
0x28eb…28ff ptr = 0xb656 // 0x28eb @0x0
0x28eb…28ff lno = 0x0f64 // 0x28ed @0x2
0x28eb…28ff at0004 = ╱a1╱ CURSOR ╱ // 0x28ef @0x4
0x28eb…28ff at0005 = ╱32╱2╱ // 0x28f0 @0x5
0x28eb…28ff at0006 = ╱fe00008002╱ // 0x28f1 @0x6
0x28eb…28ff at000b = ╱ec╱,╱ // 0x28f6 @0xb
0x28eb…28ff at000c = ╱32╱2╱ // 0x28f7 @0xc
0x28eb…28ff at000d = ╱31╱1╱ // 0x28f8 @0xd
0x28eb…28ff at000e = ╱fe0000a805╱ // 0x28f9 @0xe
0x28eb…28ff at0013 = EOL // 0x28fe @0x13
0x28eb…28ff }
0x28ff…290b b662 3950 PRINT BLANK$
0x28ff…290b LineComalBin {
0x28ff…290b ptr = 0xb662 // 0x28ff @0x0
0x28ff…290b lno = 0x0f6e // 0x2901 @0x2
0x28ff…290b at0004 = ╱92╱ PRINT ╱ // 0x2903 @0x4
0x28ff…290b at0005 = ╱42╱B╱ // 0x2904 @0x5
0x28ff…290b at0006 = ╱4c╱L╱ // 0x2905 @0x6
0x28ff…290b at0007 = ╱41╱A╱ // 0x2906 @0x7
0x28ff…290b at0008 = ╱4e╱N╱ // 0x2907 @0x8
0x28ff…290b at0009 = ╱4b╱K╱ // 0x2908 @0x9
0x28ff…290b at000a = ╱ef╱$╱ // 0x2909 @0xa
0x28ff…290b at000b = EOL // 0x290a @0xb
0x28ff…290b }
0x290b…291f b676 3960 CURSOR 2,23
0x290b…291f LineComalBin {
0x290b…291f ptr = 0xb676 // 0x290b @0x0
0x290b…291f lno = 0x0f78 // 0x290d @0x2
0x290b…291f at0004 = ╱a1╱ CURSOR ╱ // 0x290f @0x4
0x290b…291f at0005 = ╱32╱2╱ // 0x2910 @0x5
0x290b…291f at0006 = ╱fe00008002╱ // 0x2911 @0x6
0x290b…291f at000b = ╱ec╱,╱ // 0x2916 @0xb
0x290b…291f at000c = ╱32╱2╱ // 0x2917 @0xc
0x290b…291f at000d = ╱33╱3╱ // 0x2918 @0xd
0x290b…291f at000e = ╱fe0000b805╱ // 0x2919 @0xe
0x290b…291f at0013 = EOL // 0x291e @0x13
0x290b…291f }
0x291f…292b b682 3970 PRINT BLANK$
0x291f…292b LineComalBin {
0x291f…292b ptr = 0xb682 // 0x291f @0x0
0x291f…292b lno = 0x0f82 // 0x2921 @0x2
0x291f…292b at0004 = ╱92╱ PRINT ╱ // 0x2923 @0x4
0x291f…292b at0005 = ╱42╱B╱ // 0x2924 @0x5
0x291f…292b at0006 = ╱4c╱L╱ // 0x2925 @0x6
0x291f…292b at0007 = ╱41╱A╱ // 0x2926 @0x7
0x291f…292b at0008 = ╱4e╱N╱ // 0x2927 @0x8
0x291f…292b at0009 = ╱4b╱K╱ // 0x2928 @0x9
0x291f…292b at000a = ╱ef╱$╱ // 0x2929 @0xa
0x291f…292b at000b = EOL // 0x292a @0xb
0x291f…292b }
0x292b…2931 b688 3980 ENDPROC
0x292b…2931 LineComalBin {
0x292b…2931 ptr = 0xb688 // 0x292b @0x0
0x292b…2931 lno = 0x0f8c // 0x292d @0x2
0x292b…2931 at0004 = ╱9f╱ ENDPROC ╱ // 0x292f @0x4
0x292b…2931 at0005 = EOL // 0x2930 @0x5
0x292b…2931 }
0x2931…293a b691 3990 PROC LUD
0x2931…293a LineComalBin {
0x2931…293a ptr = 0xb691 // 0x2931 @0x0
0x2931…293a lno = 0x0f96 // 0x2933 @0x2
0x2931…293a at0004 = ╱9e╱ PROC ╱ // 0x2935 @0x4
0x2931…293a at0005 = ╱4c╱L╱ // 0x2936 @0x5
0x2931…293a at0006 = ╱55╱U╱ // 0x2937 @0x6
0x2931…293a at0007 = ╱44╱D╱ // 0x2938 @0x7
0x2931…293a at0008 = EOL // 0x2939 @0x8
0x2931…293a }
0x293a…2940 b697 4000 CLEAR
0x293a…2940 LineComalBin {
0x293a…2940 ptr = 0xb697 // 0x293a @0x0
0x293a…2940 lno = 0x0fa0 // 0x293c @0x2
0x293a…2940 at0004 = ╱a0╱ CLEAR ╱ // 0x293e @0x4
0x293a…2940 at0005 = EOL // 0x293f @0x5
0x293a…2940 }
0x2940…294e b6a5 4010 EXEC FAKHOVED
0x2940…294e LineComalBin {
0x2940…294e ptr = 0xb6a5 // 0x2940 @0x0
0x2940…294e lno = 0x0faa // 0x2942 @0x2
0x2940…294e at0004 = ╱9d╱ EXEC ╱ // 0x2944 @0x4
0x2940…294e at0005 = ╱46╱F╱ // 0x2945 @0x5
0x2940…294e at0006 = ╱41╱A╱ // 0x2946 @0x6
0x2940…294e at0007 = ╱4b╱K╱ // 0x2947 @0x7
0x2940…294e at0008 = ╱48╱H╱ // 0x2948 @0x8
0x2940…294e at0009 = ╱4f╱O╱ // 0x2949 @0x9
0x2940…294e at000a = ╱56╱V╱ // 0x294a @0xa
0x2940…294e at000b = ╱45╱E╱ // 0x294b @0xb
0x2940…294e at000c = ╱44╱D╱ // 0x294c @0xc
0x2940…294e at000d = EOL // 0x294d @0xd
0x2940…294e }
0x294e…2968 b6bf 4020 FOR LINIE=5 TO 16
0x294e…2968 LineComalBin {
0x294e…2968 ptr = 0xb6bf // 0x294e @0x0
0x294e…2968 lno = 0x0fb4 // 0x2950 @0x2
0x294e…2968 at0004 = ╱83╱ FOR ╱ // 0x2952 @0x4
0x294e…2968 at0005 = ╱4c╱L╱ // 0x2953 @0x5
0x294e…2968 at0006 = ╱49╱I╱ // 0x2954 @0x6
0x294e…2968 at0007 = ╱4e╱N╱ // 0x2955 @0x7
0x294e…2968 at0008 = ╱49╱I╱ // 0x2956 @0x8
0x294e…2968 at0009 = ╱45╱E╱ // 0x2957 @0x9
0x294e…2968 at000a = ╱dc╱=╱ // 0x2958 @0xa
0x294e…2968 at000b = ╱35╱5╱ // 0x2959 @0xb
0x294e…2968 at000c = ╱fe0000a003╱ // 0x295a @0xc
0x294e…2968 at0011 = ╱b7╱ TO ╱ // 0x295f @0x11
0x294e…2968 at0012 = ╱31╱1╱ // 0x2960 @0x12
0x294e…2968 at0013 = ╱36╱6╱ // 0x2961 @0x13
0x294e…2968 at0014 = ╱fe00008005╱ // 0x2962 @0x14
0x294e…2968 at0019 = EOL // 0x2967 @0x19
0x294e…2968 }
0x2968…297e b6d5 4030 EXEC VARLINUD(STARTL)
0x2968…297e LineComalBin {
0x2968…297e ptr = 0xb6d5 // 0x2968 @0x0
0x2968…297e lno = 0x0fbe // 0x296a @0x2
0x2968…297e at0004 = ╱9d╱ EXEC ╱ // 0x296c @0x4
0x2968…297e at0005 = ╱56╱V╱ // 0x296d @0x5
0x2968…297e at0006 = ╱41╱A╱ // 0x296e @0x6
0x2968…297e at0007 = ╱52╱R╱ // 0x296f @0x7
0x2968…297e at0008 = ╱4c╱L╱ // 0x2970 @0x8
0x2968…297e at0009 = ╱49╱I╱ // 0x2971 @0x9
0x2968…297e at000a = ╱4e╱N╱ // 0x2972 @0xa
0x2968…297e at000b = ╱55╱U╱ // 0x2973 @0xb
0x2968…297e at000c = ╱44╱D╱ // 0x2974 @0xc
0x2968…297e at000d = ╱ed╱(╱ // 0x2975 @0xd
0x2968…297e at000e = ╱53╱S╱ // 0x2976 @0xe
0x2968…297e at000f = ╱54╱T╱ // 0x2977 @0xf
0x2968…297e at0010 = ╱41╱A╱ // 0x2978 @0x10
0x2968…297e at0011 = ╱52╱R╱ // 0x2979 @0x11
0x2968…297e at0012 = ╱54╱T╱ // 0x297a @0x12
0x2968…297e at0013 = ╱4c╱L╱ // 0x297b @0x13
0x2968…297e at0014 = ╱ee╱)╱ // 0x297c @0x14
0x2968…297e at0015 = EOL // 0x297d @0x15
0x2968…297e }
0x297e…2997 b6ee 4040 STARTL=STARTL+1
0x297e…2997 LineComalBin {
0x297e…2997 ptr = 0xb6ee // 0x297e @0x0
0x297e…2997 lno = 0x0fc8 // 0x2980 @0x2
0x297e…2997 at0004 = ╱53╱S╱ // 0x2982 @0x4
0x297e…2997 at0005 = ╱54╱T╱ // 0x2983 @0x5
0x297e…2997 at0006 = ╱41╱A╱ // 0x2984 @0x6
0x297e…2997 at0007 = ╱52╱R╱ // 0x2985 @0x7
0x297e…2997 at0008 = ╱54╱T╱ // 0x2986 @0x8
0x297e…2997 at0009 = ╱4c╱L╱ // 0x2987 @0x9
0x297e…2997 at000a = ╱dc╱=╱ // 0x2988 @0xa
0x297e…2997 at000b = ╱53╱S╱ // 0x2989 @0xb
0x297e…2997 at000c = ╱54╱T╱ // 0x298a @0xc
0x297e…2997 at000d = ╱41╱A╱ // 0x298b @0xd
0x297e…2997 at000e = ╱52╱R╱ // 0x298c @0xe
0x297e…2997 at000f = ╱54╱T╱ // 0x298d @0xf
0x297e…2997 at0010 = ╱4c╱L╱ // 0x298e @0x10
0x297e…2997 at0011 = ╱e2╱+╱ // 0x298f @0x11
0x297e…2997 at0012 = ╱31╱1╱ // 0x2990 @0x12
0x297e…2997 at0013 = ╱fe00008001╱ // 0x2991 @0x13
0x297e…2997 at0018 = EOL // 0x2996 @0x18
0x297e…2997 }
0x2997…29ab b702 4050 IF STARTL>SLUTL THEN EXIT
0x2997…29ab LineComalBin {
0x2997…29ab ptr = 0xb702 // 0x2997 @0x0
0x2997…29ab lno = 0x0fd2 // 0x2999 @0x2
0x2997…29ab at0004 = ╱82╱ IF ╱ // 0x299b @0x4
0x2997…29ab at0005 = ╱53╱S╱ // 0x299c @0x5
0x2997…29ab at0006 = ╱54╱T╱ // 0x299d @0x6
0x2997…29ab at0007 = ╱41╱A╱ // 0x299e @0x7
0x2997…29ab at0008 = ╱52╱R╱ // 0x299f @0x8
0x2997…29ab at0009 = ╱54╱T╱ // 0x29a0 @0x9
0x2997…29ab at000a = ╱4c╱L╱ // 0x29a1 @0xa
0x2997…29ab at000b = ╱de╱>╱ // 0x29a2 @0xb
0x2997…29ab at000c = ╱53╱S╱ // 0x29a3 @0xc
0x2997…29ab at000d = ╱4c╱L╱ // 0x29a4 @0xd
0x2997…29ab at000e = ╱55╱U╱ // 0x29a5 @0xe
0x2997…29ab at000f = ╱54╱T╱ // 0x29a6 @0xf
0x2997…29ab at0010 = ╱4c╱L╱ // 0x29a7 @0x10
0x2997…29ab at0011 = ╱b6╱ THEN ╱ // 0x29a8 @0x11
0x2997…29ab at0012 = ╱99╱ EXIT ╱ // 0x29a9 @0x12
0x2997…29ab at0013 = EOL // 0x29aa @0x13
0x2997…29ab }
0x29ab…29b6 b70d 4060 NEXT LINIE
0x29ab…29b6 LineComalBin {
0x29ab…29b6 ptr = 0xb70d // 0x29ab @0x0
0x29ab…29b6 lno = 0x0fdc // 0x29ad @0x2
0x29ab…29b6 at0004 = ╱84╱ NEXT ╱ // 0x29af @0x4
0x29ab…29b6 at0005 = ╱4c╱L╱ // 0x29b0 @0x5
0x29ab…29b6 at0006 = ╱49╱I╱ // 0x29b1 @0x6
0x29ab…29b6 at0007 = ╱4e╱N╱ // 0x29b2 @0x7
0x29ab…29b6 at0008 = ╱49╱I╱ // 0x29b3 @0x8
0x29ab…29b6 at0009 = ╱45╱E╱ // 0x29b4 @0x9
0x29ab…29b6 at000a = EOL // 0x29b5 @0xa
0x29ab…29b6 }
0x29b6…29bc b713 4070 ENDPROC
0x29b6…29bc LineComalBin {
0x29b6…29bc ptr = 0xb713 // 0x29b6 @0x0
0x29b6…29bc lno = 0x0fe6 // 0x29b8 @0x2
0x29b6…29bc at0004 = ╱9f╱ ENDPROC ╱ // 0x29ba @0x4
0x29b6…29bc at0005 = EOL // 0x29bb @0x5
0x29b6…29bc }
0x29bc…29c7 b71e 4080 PROC AJOUR
0x29bc…29c7 LineComalBin {
0x29bc…29c7 ptr = 0xb71e // 0x29bc @0x0
0x29bc…29c7 lno = 0x0ff0 // 0x29be @0x2
0x29bc…29c7 at0004 = ╱9e╱ PROC ╱ // 0x29c0 @0x4
0x29bc…29c7 at0005 = ╱41╱A╱ // 0x29c1 @0x5
0x29bc…29c7 at0006 = ╱4a╱J╱ // 0x29c2 @0x6
0x29bc…29c7 at0007 = ╱4f╱O╱ // 0x29c3 @0x7
0x29bc…29c7 at0008 = ╱55╱U╱ // 0x29c4 @0x8
0x29bc…29c7 at0009 = ╱52╱R╱ // 0x29c5 @0x9
0x29bc…29c7 at000a = EOL // 0x29c6 @0xa
0x29bc…29c7 }
0x29c7…29d7 b72e 4090 TOTAL$="0+"
0x29c7…29d7 LineComalBin {
0x29c7…29d7 ptr = 0xb72e // 0x29c7 @0x0
0x29c7…29d7 lno = 0x0ffa // 0x29c9 @0x2
0x29c7…29d7 at0004 = ╱54╱T╱ // 0x29cb @0x4
0x29c7…29d7 at0005 = ╱4f╱O╱ // 0x29cc @0x5
0x29c7…29d7 at0006 = ╱54╱T╱ // 0x29cd @0x6
0x29c7…29d7 at0007 = ╱41╱A╱ // 0x29ce @0x7
0x29c7…29d7 at0008 = ╱4c╱L╱ // 0x29cf @0x8
0x29c7…29d7 at0009 = ╱ef╱$╱ // 0x29d0 @0x9
0x29c7…29d7 at000a = ╱dc╱=╱ // 0x29d1 @0xa
0x29c7…29d7 at000b = ╱22╱"╱ // 0x29d2 @0xb
0x29c7…29d7 at000c = ╱30╱0╱ // 0x29d3 @0xc
0x29c7…29d7 at000d = ╱2b╱+╱ // 0x29d4 @0xd
0x29c7…29d7 at000e = ╱22╱"╱ // 0x29d5 @0xe
0x29c7…29d7 at000f = EOL // 0x29d6 @0xf
0x29c7…29d7 }
0x29d7…29ec b743 4100 FOR M=1 TO AVALIN
0x29d7…29ec LineComalBin {
0x29d7…29ec ptr = 0xb743 // 0x29d7 @0x0
0x29d7…29ec lno = 0x1004 // 0x29d9 @0x2
0x29d7…29ec at0004 = ╱83╱ FOR ╱ // 0x29db @0x4
0x29d7…29ec at0005 = ╱4d╱M╱ // 0x29dc @0x5
0x29d7…29ec at0006 = ╱dc╱=╱ // 0x29dd @0x6
0x29d7…29ec at0007 = ╱31╱1╱ // 0x29de @0x7
0x29d7…29ec at0008 = ╱fe00008001╱ // 0x29df @0x8
0x29d7…29ec at000d = ╱b7╱ TO ╱ // 0x29e4 @0xd
0x29d7…29ec at000e = ╱41╱A╱ // 0x29e5 @0xe
0x29d7…29ec at000f = ╱56╱V╱ // 0x29e6 @0xf
0x29d7…29ec at0010 = ╱41╱A╱ // 0x29e7 @0x10
0x29d7…29ec at0011 = ╱4c╱L╱ // 0x29e8 @0x11
0x29d7…29ec at0012 = ╱49╱I╱ // 0x29e9 @0x12
0x29d7…29ec at0013 = ╱4e╱N╱ // 0x29ea @0x13
0x29d7…29ec at0014 = EOL // 0x29eb @0x14
0x29d7…29ec }
0x29ec…29fe b755 4110 CASE VANRARR(M) OF
0x29ec…29fe LineComalBin {
0x29ec…29fe ptr = 0xb755 // 0x29ec @0x0
0x29ec…29fe lno = 0x100e // 0x29ee @0x2
0x29ec…29fe at0004 = ╱a201╱ CASE ╱ // 0x29f0 @0x4
0x29ec…29fe at0006 = ╱56╱V╱ // 0x29f2 @0x6
0x29ec…29fe at0007 = ╱41╱A╱ // 0x29f3 @0x7
0x29ec…29fe at0008 = ╱4e╱N╱ // 0x29f4 @0x8
0x29ec…29fe at0009 = ╱52╱R╱ // 0x29f5 @0x9
0x29ec…29fe at000a = ╱41╱A╱ // 0x29f6 @0xa
0x29ec…29fe at000b = ╱52╱R╱ // 0x29f7 @0xb
0x29ec…29fe at000c = ╱52╱R╱ // 0x29f8 @0xc
0x29ec…29fe at000d = ╱ed╱(╱ // 0x29f9 @0xd
0x29ec…29fe at000e = ╱4d╱M╱ // 0x29fa @0xe
0x29ec…29fe at000f = ╱ee╱)╱ // 0x29fb @0xf
0x29ec…29fe at0010 = ╱ba╱ OF ╱ // 0x29fc @0x10
0x29ec…29fe at0011 = EOL // 0x29fd @0x11
0x29ec…29fe }
0x29fe…2a29 b780 4120 EXEC CA(0,TOTAL$,BELØBARR$(M),TOTAL$)
0x29fe…2a29 LineComalBin {
0x29fe…2a29 ptr = 0xb780 // 0x29fe @0x0
0x29fe…2a29 lno = 0x1018 // 0x2a00 @0x2
0x29fe…2a29 at0004 = ╱9d╱ EXEC ╱ // 0x2a02 @0x4
0x29fe…2a29 at0005 = ╱43╱C╱ // 0x2a03 @0x5
0x29fe…2a29 at0006 = ╱41╱A╱ // 0x2a04 @0x6
0x29fe…2a29 at0007 = ╱ed╱(╱ // 0x2a05 @0x7
0x29fe…2a29 at0008 = ╱30╱0╱ // 0x2a06 @0x8
0x29fe…2a29 at0009 = ╱fe00000000╱ // 0x2a07 @0x9
0x29fe…2a29 at000e = ╱ec╱,╱ // 0x2a0c @0xe
0x29fe…2a29 at000f = ╱54╱T╱ // 0x2a0d @0xf
0x29fe…2a29 at0010 = ╱4f╱O╱ // 0x2a0e @0x10
0x29fe…2a29 at0011 = ╱54╱T╱ // 0x2a0f @0x11
0x29fe…2a29 at0012 = ╱41╱A╱ // 0x2a10 @0x12
0x29fe…2a29 at0013 = ╱4c╱L╱ // 0x2a11 @0x13
0x29fe…2a29 at0014 = ╱ef╱$╱ // 0x2a12 @0x14
0x29fe…2a29 at0015 = ╱ec╱,╱ // 0x2a13 @0x15
0x29fe…2a29 at0016 = ╱42╱B╱ // 0x2a14 @0x16
0x29fe…2a29 at0017 = ╱45╱E╱ // 0x2a15 @0x17
0x29fe…2a29 at0018 = ╱4c╱L╱ // 0x2a16 @0x18
0x29fe…2a29 at0019 = ╱5c╱Ø╱ // 0x2a17 @0x19
0x29fe…2a29 at001a = ╱42╱B╱ // 0x2a18 @0x1a
0x29fe…2a29 at001b = ╱41╱A╱ // 0x2a19 @0x1b
0x29fe…2a29 at001c = ╱52╱R╱ // 0x2a1a @0x1c
0x29fe…2a29 at001d = ╱52╱R╱ // 0x2a1b @0x1d
0x29fe…2a29 at001e = ╱ef╱$╱ // 0x2a1c @0x1e
0x29fe…2a29 at001f = ╱ed╱(╱ // 0x2a1d @0x1f
0x29fe…2a29 at0020 = ╱4d╱M╱ // 0x2a1e @0x20
0x29fe…2a29 at0021 = ╱ee╱)╱ // 0x2a1f @0x21
0x29fe…2a29 at0022 = ╱ec╱,╱ // 0x2a20 @0x22
0x29fe…2a29 at0023 = ╱54╱T╱ // 0x2a21 @0x23
0x29fe…2a29 at0024 = ╱4f╱O╱ // 0x2a22 @0x24
0x29fe…2a29 at0025 = ╱54╱T╱ // 0x2a23 @0x25
0x29fe…2a29 at0026 = ╱41╱A╱ // 0x2a24 @0x26
0x29fe…2a29 at0027 = ╱4c╱L╱ // 0x2a25 @0x27
0x29fe…2a29 at0028 = ╱ef╱$╱ // 0x2a26 @0x28
0x29fe…2a29 at0029 = ╱ee╱)╱ // 0x2a27 @0x29
0x29fe…2a29 at002a = EOL // 0x2a28 @0x2a
0x29fe…2a29 }
0x2a29…2a36 b78d 4130 WHEN 2
0x2a29…2a36 LineComalBin {
0x2a29…2a36 ptr = 0xb78d // 0x2a29 @0x0
0x2a29…2a36 lno = 0x1022 // 0x2a2b @0x2
0x2a29…2a36 at0004 = ╱a301╱ WHEN ╱ // 0x2a2d @0x4
0x2a29…2a36 at0006 = ╱32╱2╱ // 0x2a2f @0x6
0x2a29…2a36 at0007 = ╱fe00008002╱ // 0x2a30 @0x7
0x2a29…2a36 at000c = EOL // 0x2a35 @0xc
0x2a29…2a36 }
0x2a36…2a43 b79a 4140 WHEN 4
0x2a36…2a43 LineComalBin {
0x2a36…2a43 ptr = 0xb79a // 0x2a36 @0x0
0x2a36…2a43 lno = 0x102c // 0x2a38 @0x2
0x2a36…2a43 at0004 = ╱a301╱ WHEN ╱ // 0x2a3a @0x4
0x2a36…2a43 at0006 = ╱34╱4╱ // 0x2a3c @0x6
0x2a36…2a43 at0007 = ╱fe00008003╱ // 0x2a3d @0x7
0x2a36…2a43 at000c = EOL // 0x2a42 @0xc
0x2a36…2a43 }
0x2a43…2a5b b7b2 4150 BELØBARR$(M)=TOTAL$
0x2a43…2a5b LineComalBin {
0x2a43…2a5b ptr = 0xb7b2 // 0x2a43 @0x0
0x2a43…2a5b lno = 0x1036 // 0x2a45 @0x2
0x2a43…2a5b at0004 = ╱42╱B╱ // 0x2a47 @0x4
0x2a43…2a5b at0005 = ╱45╱E╱ // 0x2a48 @0x5
0x2a43…2a5b at0006 = ╱4c╱L╱ // 0x2a49 @0x6
0x2a43…2a5b at0007 = ╱5c╱Ø╱ // 0x2a4a @0x7
0x2a43…2a5b at0008 = ╱42╱B╱ // 0x2a4b @0x8
0x2a43…2a5b at0009 = ╱41╱A╱ // 0x2a4c @0x9
0x2a43…2a5b at000a = ╱52╱R╱ // 0x2a4d @0xa
0x2a43…2a5b at000b = ╱52╱R╱ // 0x2a4e @0xb
0x2a43…2a5b at000c = ╱ef╱$╱ // 0x2a4f @0xc
0x2a43…2a5b at000d = ╱ed╱(╱ // 0x2a50 @0xd
0x2a43…2a5b at000e = ╱4d╱M╱ // 0x2a51 @0xe
0x2a43…2a5b at000f = ╱ee╱)╱ // 0x2a52 @0xf
0x2a43…2a5b at0010 = ╱dc╱=╱ // 0x2a53 @0x10
0x2a43…2a5b at0011 = ╱54╱T╱ // 0x2a54 @0x11
0x2a43…2a5b at0012 = ╱4f╱O╱ // 0x2a55 @0x12
0x2a43…2a5b at0013 = ╱54╱T╱ // 0x2a56 @0x13
0x2a43…2a5b at0014 = ╱41╱A╱ // 0x2a57 @0x14
0x2a43…2a5b at0015 = ╱4c╱L╱ // 0x2a58 @0x15
0x2a43…2a5b at0016 = ╱ef╱$╱ // 0x2a59 @0x16
0x2a43…2a5b at0017 = EOL // 0x2a5a @0x17
0x2a43…2a5b }
0x2a5b…2a68 b7bf 4160 WHEN 3
0x2a5b…2a68 LineComalBin {
0x2a5b…2a68 ptr = 0xb7bf // 0x2a5b @0x0
0x2a5b…2a68 lno = 0x1040 // 0x2a5d @0x2
0x2a5b…2a68 at0004 = ╱a301╱ WHEN ╱ // 0x2a5f @0x4
0x2a5b…2a68 at0006 = ╱33╱3╱ // 0x2a61 @0x6
0x2a5b…2a68 at0007 = ╱fe0000c002╱ // 0x2a62 @0x7
0x2a5b…2a68 at000c = EOL // 0x2a67 @0xc
0x2a5b…2a68 }
0x2a68…2aba b811 4170 VARPRIS$=" ,"+VATEKARR$(M,7:2)+VATEKARR$(M,10:2)+"-"
0x2a68…2aba LineComalBin {
0x2a68…2aba ptr = 0xb811 // 0x2a68 @0x0
0x2a68…2aba lno = 0x104a // 0x2a6a @0x2
0x2a68…2aba at0004 = ╱56╱V╱ // 0x2a6c @0x4
0x2a68…2aba at0005 = ╱41╱A╱ // 0x2a6d @0x5
0x2a68…2aba at0006 = ╱52╱R╱ // 0x2a6e @0x6
0x2a68…2aba at0007 = ╱50╱P╱ // 0x2a6f @0x7
0x2a68…2aba at0008 = ╱52╱R╱ // 0x2a70 @0x8
0x2a68…2aba at0009 = ╱49╱I╱ // 0x2a71 @0x9
0x2a68…2aba at000a = ╱53╱S╱ // 0x2a72 @0xa
0x2a68…2aba at000b = ╱ef╱$╱ // 0x2a73 @0xb
0x2a68…2aba at000c = ╱dc╱=╱ // 0x2a74 @0xc
0x2a68…2aba at000d = ╱22╱"╱ // 0x2a75 @0xd
0x2a68…2aba at000e = ╱20╱…╱ // 0x2a76 @0xe
0x2a68…2aba at000f = ╱20╱…╱ // 0x2a77 @0xf
0x2a68…2aba at0010 = ╱20╱…╱ // 0x2a78 @0x10
0x2a68…2aba at0011 = ╱20╱…╱ // 0x2a79 @0x11
0x2a68…2aba at0012 = ╱20╱…╱ // 0x2a7a @0x12
0x2a68…2aba at0013 = ╱20╱…╱ // 0x2a7b @0x13
0x2a68…2aba at0014 = ╱2c╱,╱ // 0x2a7c @0x14
0x2a68…2aba at0015 = ╱22╱"╱ // 0x2a7d @0x15
0x2a68…2aba at0016 = ╱f1╱+╱ // 0x2a7e @0x16
0x2a68…2aba at0017 = ╱56╱V╱ // 0x2a7f @0x17
0x2a68…2aba at0018 = ╱41╱A╱ // 0x2a80 @0x18
0x2a68…2aba at0019 = ╱54╱T╱ // 0x2a81 @0x19
0x2a68…2aba at001a = ╱45╱E╱ // 0x2a82 @0x1a
0x2a68…2aba at001b = ╱4b╱K╱ // 0x2a83 @0x1b
0x2a68…2aba at001c = ╱41╱A╱ // 0x2a84 @0x1c
0x2a68…2aba at001d = ╱52╱R╱ // 0x2a85 @0x1d
0x2a68…2aba at001e = ╱52╱R╱ // 0x2a86 @0x1e
0x2a68…2aba at001f = ╱ef╱$╱ // 0x2a87 @0x1f
0x2a68…2aba at0020 = ╱ed╱(╱ // 0x2a88 @0x20
0x2a68…2aba at0021 = ╱4d╱M╱ // 0x2a89 @0x21
0x2a68…2aba at0022 = ╱ec╱,╱ // 0x2a8a @0x22
0x2a68…2aba at0023 = ╱37╱7╱ // 0x2a8b @0x23
0x2a68…2aba at0024 = ╱fe0000e003╱ // 0x2a8c @0x24
0x2a68…2aba at0029 = ╱f0╱:╱ // 0x2a91 @0x29
0x2a68…2aba at002a = ╱32╱2╱ // 0x2a92 @0x2a
0x2a68…2aba at002b = ╱fe00008002╱ // 0x2a93 @0x2b
0x2a68…2aba at0030 = ╱ee╱)╱ // 0x2a98 @0x30
0x2a68…2aba at0031 = ╱f1╱+╱ // 0x2a99 @0x31
0x2a68…2aba at0032 = ╱56╱V╱ // 0x2a9a @0x32
0x2a68…2aba at0033 = ╱41╱A╱ // 0x2a9b @0x33
0x2a68…2aba at0034 = ╱54╱T╱ // 0x2a9c @0x34
0x2a68…2aba at0035 = ╱45╱E╱ // 0x2a9d @0x35
0x2a68…2aba at0036 = ╱4b╱K╱ // 0x2a9e @0x36
0x2a68…2aba at0037 = ╱41╱A╱ // 0x2a9f @0x37
0x2a68…2aba at0038 = ╱52╱R╱ // 0x2aa0 @0x38
0x2a68…2aba at0039 = ╱52╱R╱ // 0x2aa1 @0x39
0x2a68…2aba at003a = ╱ef╱$╱ // 0x2aa2 @0x3a
0x2a68…2aba at003b = ╱ed╱(╱ // 0x2aa3 @0x3b
0x2a68…2aba at003c = ╱4d╱M╱ // 0x2aa4 @0x3c
0x2a68…2aba at003d = ╱ec╱,╱ // 0x2aa5 @0x3d
0x2a68…2aba at003e = ╱31╱1╱ // 0x2aa6 @0x3e
0x2a68…2aba at003f = ╱30╱0╱ // 0x2aa7 @0x3f
0x2a68…2aba at0040 = ╱fe0000a004╱ // 0x2aa8 @0x40
0x2a68…2aba at0045 = ╱f0╱:╱ // 0x2aad @0x45
0x2a68…2aba at0046 = ╱32╱2╱ // 0x2aae @0x46
0x2a68…2aba at0047 = ╱fe00008002╱ // 0x2aaf @0x47
0x2a68…2aba at004c = ╱ee╱)╱ // 0x2ab4 @0x4c
0x2a68…2aba at004d = ╱f1╱+╱ // 0x2ab5 @0x4d
0x2a68…2aba at004e = ╱22╱"╱ // 0x2ab6 @0x4e
0x2a68…2aba at004f = ╱2d╱-╱ // 0x2ab7 @0x4f
0x2a68…2aba at0050 = ╱22╱"╱ // 0x2ab8 @0x50
0x2a68…2aba at0051 = EOL // 0x2ab9 @0x51
0x2a68…2aba }
0x2aba…2ae9 b840 4180 IF VARPRIS$(8)=" " THEN VARPRIS$(8)="0"
0x2aba…2ae9 LineComalBin {
0x2aba…2ae9 ptr = 0xb840 // 0x2aba @0x0
0x2aba…2ae9 lno = 0x1054 // 0x2abc @0x2
0x2aba…2ae9 at0004 = ╱82╱ IF ╱ // 0x2abe @0x4
0x2aba…2ae9 at0005 = ╱56╱V╱ // 0x2abf @0x5
0x2aba…2ae9 at0006 = ╱41╱A╱ // 0x2ac0 @0x6
0x2aba…2ae9 at0007 = ╱52╱R╱ // 0x2ac1 @0x7
0x2aba…2ae9 at0008 = ╱50╱P╱ // 0x2ac2 @0x8
0x2aba…2ae9 at0009 = ╱52╱R╱ // 0x2ac3 @0x9
0x2aba…2ae9 at000a = ╱49╱I╱ // 0x2ac4 @0xa
0x2aba…2ae9 at000b = ╱53╱S╱ // 0x2ac5 @0xb
0x2aba…2ae9 at000c = ╱ef╱$╱ // 0x2ac6 @0xc
0x2aba…2ae9 at000d = ╱ed╱(╱ // 0x2ac7 @0xd
0x2aba…2ae9 at000e = ╱38╱8╱ // 0x2ac8 @0xe
0x2aba…2ae9 at000f = ╱fe00008004╱ // 0x2ac9 @0xf
0x2aba…2ae9 at0014 = ╱ee╱)╱ // 0x2ace @0x14
0x2aba…2ae9 at0015 = ╱dc╱=╱ // 0x2acf @0x15
0x2aba…2ae9 at0016 = ╱22╱"╱ // 0x2ad0 @0x16
0x2aba…2ae9 at0017 = ╱20╱…╱ // 0x2ad1 @0x17
0x2aba…2ae9 at0018 = ╱22╱"╱ // 0x2ad2 @0x18
0x2aba…2ae9 at0019 = ╱b6╱ THEN ╱ // 0x2ad3 @0x19
0x2aba…2ae9 at001a = ╱56╱V╱ // 0x2ad4 @0x1a
0x2aba…2ae9 at001b = ╱41╱A╱ // 0x2ad5 @0x1b
0x2aba…2ae9 at001c = ╱52╱R╱ // 0x2ad6 @0x1c
0x2aba…2ae9 at001d = ╱50╱P╱ // 0x2ad7 @0x1d
0x2aba…2ae9 at001e = ╱52╱R╱ // 0x2ad8 @0x1e
0x2aba…2ae9 at001f = ╱49╱I╱ // 0x2ad9 @0x1f
0x2aba…2ae9 at0020 = ╱53╱S╱ // 0x2ada @0x20
0x2aba…2ae9 at0021 = ╱ef╱$╱ // 0x2adb @0x21
0x2aba…2ae9 at0022 = ╱ed╱(╱ // 0x2adc @0x22
0x2aba…2ae9 at0023 = ╱38╱8╱ // 0x2add @0x23
0x2aba…2ae9 at0024 = ╱fe00008004╱ // 0x2ade @0x24
0x2aba…2ae9 at0029 = ╱ee╱)╱ // 0x2ae3 @0x29
0x2aba…2ae9 at002a = ╱dc╱=╱ // 0x2ae4 @0x2a
0x2aba…2ae9 at002b = ╱22╱"╱ // 0x2ae5 @0x2b
0x2aba…2ae9 at002c = ╱30╱0╱ // 0x2ae6 @0x2c
0x2aba…2ae9 at002d = ╱22╱"╱ // 0x2ae7 @0x2d
0x2aba…2ae9 at002e = EOL // 0x2ae8 @0x2e
0x2aba…2ae9 }
0x2ae9…2b18 b86f 4190 IF VARPRIS$(9)=" " THEN VARPRIS$(9)="0"
0x2ae9…2b18 LineComalBin {
0x2ae9…2b18 ptr = 0xb86f // 0x2ae9 @0x0
0x2ae9…2b18 lno = 0x105e // 0x2aeb @0x2
0x2ae9…2b18 at0004 = ╱82╱ IF ╱ // 0x2aed @0x4
0x2ae9…2b18 at0005 = ╱56╱V╱ // 0x2aee @0x5
0x2ae9…2b18 at0006 = ╱41╱A╱ // 0x2aef @0x6
0x2ae9…2b18 at0007 = ╱52╱R╱ // 0x2af0 @0x7
0x2ae9…2b18 at0008 = ╱50╱P╱ // 0x2af1 @0x8
0x2ae9…2b18 at0009 = ╱52╱R╱ // 0x2af2 @0x9
0x2ae9…2b18 at000a = ╱49╱I╱ // 0x2af3 @0xa
0x2ae9…2b18 at000b = ╱53╱S╱ // 0x2af4 @0xb
0x2ae9…2b18 at000c = ╱ef╱$╱ // 0x2af5 @0xc
0x2ae9…2b18 at000d = ╱ed╱(╱ // 0x2af6 @0xd
0x2ae9…2b18 at000e = ╱39╱9╱ // 0x2af7 @0xe
0x2ae9…2b18 at000f = ╱fe00009004╱ // 0x2af8 @0xf
0x2ae9…2b18 at0014 = ╱ee╱)╱ // 0x2afd @0x14
0x2ae9…2b18 at0015 = ╱dc╱=╱ // 0x2afe @0x15
0x2ae9…2b18 at0016 = ╱22╱"╱ // 0x2aff @0x16
0x2ae9…2b18 at0017 = ╱20╱…╱ // 0x2b00 @0x17
0x2ae9…2b18 at0018 = ╱22╱"╱ // 0x2b01 @0x18
0x2ae9…2b18 at0019 = ╱b6╱ THEN ╱ // 0x2b02 @0x19
0x2ae9…2b18 at001a = ╱56╱V╱ // 0x2b03 @0x1a
0x2ae9…2b18 at001b = ╱41╱A╱ // 0x2b04 @0x1b
0x2ae9…2b18 at001c = ╱52╱R╱ // 0x2b05 @0x1c
0x2ae9…2b18 at001d = ╱50╱P╱ // 0x2b06 @0x1d
0x2ae9…2b18 at001e = ╱52╱R╱ // 0x2b07 @0x1e
0x2ae9…2b18 at001f = ╱49╱I╱ // 0x2b08 @0x1f
0x2ae9…2b18 at0020 = ╱53╱S╱ // 0x2b09 @0x20
0x2ae9…2b18 at0021 = ╱ef╱$╱ // 0x2b0a @0x21
0x2ae9…2b18 at0022 = ╱ed╱(╱ // 0x2b0b @0x22
0x2ae9…2b18 at0023 = ╱39╱9╱ // 0x2b0c @0x23
0x2ae9…2b18 at0024 = ╱fe00009004╱ // 0x2b0d @0x24
0x2ae9…2b18 at0029 = ╱ee╱)╱ // 0x2b12 @0x29
0x2ae9…2b18 at002a = ╱dc╱=╱ // 0x2b13 @0x2a
0x2ae9…2b18 at002b = ╱22╱"╱ // 0x2b14 @0x2b
0x2ae9…2b18 at002c = ╱30╱0╱ // 0x2b15 @0x2c
0x2ae9…2b18 at002d = ╱22╱"╱ // 0x2b16 @0x2d
0x2ae9…2b18 at002e = EOL // 0x2b17 @0x2e
0x2ae9…2b18 }
0x2b18…2b4b b8a2 4200 EXEC CA(2,BELØBARR$(M-1),VARPRIS$,TAL1$)
0x2b18…2b4b LineComalBin {
0x2b18…2b4b ptr = 0xb8a2 // 0x2b18 @0x0
0x2b18…2b4b lno = 0x1068 // 0x2b1a @0x2
0x2b18…2b4b at0004 = ╱9d╱ EXEC ╱ // 0x2b1c @0x4
0x2b18…2b4b at0005 = ╱43╱C╱ // 0x2b1d @0x5
0x2b18…2b4b at0006 = ╱41╱A╱ // 0x2b1e @0x6
0x2b18…2b4b at0007 = ╱ed╱(╱ // 0x2b1f @0x7
0x2b18…2b4b at0008 = ╱32╱2╱ // 0x2b20 @0x8
0x2b18…2b4b at0009 = ╱fe00008002╱ // 0x2b21 @0x9
0x2b18…2b4b at000e = ╱ec╱,╱ // 0x2b26 @0xe
0x2b18…2b4b at000f = ╱42╱B╱ // 0x2b27 @0xf
0x2b18…2b4b at0010 = ╱45╱E╱ // 0x2b28 @0x10
0x2b18…2b4b at0011 = ╱4c╱L╱ // 0x2b29 @0x11
0x2b18…2b4b at0012 = ╱5c╱Ø╱ // 0x2b2a @0x12
0x2b18…2b4b at0013 = ╱42╱B╱ // 0x2b2b @0x13
0x2b18…2b4b at0014 = ╱41╱A╱ // 0x2b2c @0x14
0x2b18…2b4b at0015 = ╱52╱R╱ // 0x2b2d @0x15
0x2b18…2b4b at0016 = ╱52╱R╱ // 0x2b2e @0x16
0x2b18…2b4b at0017 = ╱ef╱$╱ // 0x2b2f @0x17
0x2b18…2b4b at0018 = ╱ed╱(╱ // 0x2b30 @0x18
0x2b18…2b4b at0019 = ╱4d╱M╱ // 0x2b31 @0x19
0x2b18…2b4b at001a = ╱e3╱-╱ // 0x2b32 @0x1a
0x2b18…2b4b at001b = ╱31╱1╱ // 0x2b33 @0x1b
0x2b18…2b4b at001c = ╱fe00008001╱ // 0x2b34 @0x1c
0x2b18…2b4b at0021 = ╱ee╱)╱ // 0x2b39 @0x21
0x2b18…2b4b at0022 = ╱ec╱,╱ // 0x2b3a @0x22
0x2b18…2b4b at0023 = ╱56╱V╱ // 0x2b3b @0x23
0x2b18…2b4b at0024 = ╱41╱A╱ // 0x2b3c @0x24
0x2b18…2b4b at0025 = ╱52╱R╱ // 0x2b3d @0x25
0x2b18…2b4b at0026 = ╱50╱P╱ // 0x2b3e @0x26
0x2b18…2b4b at0027 = ╱52╱R╱ // 0x2b3f @0x27
0x2b18…2b4b at0028 = ╱49╱I╱ // 0x2b40 @0x28
0x2b18…2b4b at0029 = ╱53╱S╱ // 0x2b41 @0x29
0x2b18…2b4b at002a = ╱ef╱$╱ // 0x2b42 @0x2a
0x2b18…2b4b at002b = ╱ec╱,╱ // 0x2b43 @0x2b
0x2b18…2b4b at002c = ╱54╱T╱ // 0x2b44 @0x2c
0x2b18…2b4b at002d = ╱41╱A╱ // 0x2b45 @0x2d
0x2b18…2b4b at002e = ╱4c╱L╱ // 0x2b46 @0x2e
0x2b18…2b4b at002f = ╱31╱1╱ // 0x2b47 @0x2f
0x2b18…2b4b at0030 = ╱ef╱$╱ // 0x2b48 @0x30
0x2b18…2b4b at0031 = ╱ee╱)╱ // 0x2b49 @0x31
0x2b18…2b4b at0032 = EOL // 0x2b4a @0x32
0x2b18…2b4b }
0x2b4b…2b62 b8b9 4210 BELØBARR$(M)=TAL1$
0x2b4b…2b62 LineComalBin {
0x2b4b…2b62 ptr = 0xb8b9 // 0x2b4b @0x0
0x2b4b…2b62 lno = 0x1072 // 0x2b4d @0x2
0x2b4b…2b62 at0004 = ╱42╱B╱ // 0x2b4f @0x4
0x2b4b…2b62 at0005 = ╱45╱E╱ // 0x2b50 @0x5
0x2b4b…2b62 at0006 = ╱4c╱L╱ // 0x2b51 @0x6
0x2b4b…2b62 at0007 = ╱5c╱Ø╱ // 0x2b52 @0x7
0x2b4b…2b62 at0008 = ╱42╱B╱ // 0x2b53 @0x8
0x2b4b…2b62 at0009 = ╱41╱A╱ // 0x2b54 @0x9
0x2b4b…2b62 at000a = ╱52╱R╱ // 0x2b55 @0xa
0x2b4b…2b62 at000b = ╱52╱R╱ // 0x2b56 @0xb
0x2b4b…2b62 at000c = ╱ef╱$╱ // 0x2b57 @0xc
0x2b4b…2b62 at000d = ╱ed╱(╱ // 0x2b58 @0xd
0x2b4b…2b62 at000e = ╱4d╱M╱ // 0x2b59 @0xe
0x2b4b…2b62 at000f = ╱ee╱)╱ // 0x2b5a @0xf
0x2b4b…2b62 at0010 = ╱dc╱=╱ // 0x2b5b @0x10
0x2b4b…2b62 at0011 = ╱54╱T╱ // 0x2b5c @0x11
0x2b4b…2b62 at0012 = ╱41╱A╱ // 0x2b5d @0x12
0x2b4b…2b62 at0013 = ╱4c╱L╱ // 0x2b5e @0x13
0x2b4b…2b62 at0014 = ╱31╱1╱ // 0x2b5f @0x14
0x2b4b…2b62 at0015 = ╱ef╱$╱ // 0x2b60 @0x15
0x2b4b…2b62 at0016 = EOL // 0x2b61 @0x16
0x2b4b…2b62 }
0x2b62…2b86 b8dd 4220 EXEC CA(0,TOTAL$,TAL1$,TOTAL$)
0x2b62…2b86 LineComalBin {
0x2b62…2b86 ptr = 0xb8dd // 0x2b62 @0x0
0x2b62…2b86 lno = 0x107c // 0x2b64 @0x2
0x2b62…2b86 at0004 = ╱9d╱ EXEC ╱ // 0x2b66 @0x4
0x2b62…2b86 at0005 = ╱43╱C╱ // 0x2b67 @0x5
0x2b62…2b86 at0006 = ╱41╱A╱ // 0x2b68 @0x6
0x2b62…2b86 at0007 = ╱ed╱(╱ // 0x2b69 @0x7
0x2b62…2b86 at0008 = ╱30╱0╱ // 0x2b6a @0x8
0x2b62…2b86 at0009 = ╱fe00000000╱ // 0x2b6b @0x9
0x2b62…2b86 at000e = ╱ec╱,╱ // 0x2b70 @0xe
0x2b62…2b86 at000f = ╱54╱T╱ // 0x2b71 @0xf
0x2b62…2b86 at0010 = ╱4f╱O╱ // 0x2b72 @0x10
0x2b62…2b86 at0011 = ╱54╱T╱ // 0x2b73 @0x11
0x2b62…2b86 at0012 = ╱41╱A╱ // 0x2b74 @0x12
0x2b62…2b86 at0013 = ╱4c╱L╱ // 0x2b75 @0x13
0x2b62…2b86 at0014 = ╱ef╱$╱ // 0x2b76 @0x14
0x2b62…2b86 at0015 = ╱ec╱,╱ // 0x2b77 @0x15
0x2b62…2b86 at0016 = ╱54╱T╱ // 0x2b78 @0x16
0x2b62…2b86 at0017 = ╱41╱A╱ // 0x2b79 @0x17
0x2b62…2b86 at0018 = ╱4c╱L╱ // 0x2b7a @0x18
0x2b62…2b86 at0019 = ╱31╱1╱ // 0x2b7b @0x19
0x2b62…2b86 at001a = ╱ef╱$╱ // 0x2b7c @0x1a
0x2b62…2b86 at001b = ╱ec╱,╱ // 0x2b7d @0x1b
0x2b62…2b86 at001c = ╱54╱T╱ // 0x2b7e @0x1c
0x2b62…2b86 at001d = ╱4f╱O╱ // 0x2b7f @0x1d
0x2b62…2b86 at001e = ╱54╱T╱ // 0x2b80 @0x1e
0x2b62…2b86 at001f = ╱41╱A╱ // 0x2b81 @0x1f
0x2b62…2b86 at0020 = ╱4c╱L╱ // 0x2b82 @0x20
0x2b62…2b86 at0021 = ╱ef╱$╱ // 0x2b83 @0x21
0x2b62…2b86 at0022 = ╱ee╱)╱ // 0x2b84 @0x22
0x2b62…2b86 at0023 = EOL // 0x2b85 @0x23
0x2b62…2b86 }
0x2b86…2b8c b8e3 4230 ENDCASE
0x2b86…2b8c LineComalBin {
0x2b86…2b8c ptr = 0xb8e3 // 0x2b86 @0x0
0x2b86…2b8c lno = 0x1086 // 0x2b88 @0x2
0x2b86…2b8c at0004 = ╱a4╱ ENDCASE ╱ // 0x2b8a @0x4
0x2b86…2b8c at0005 = EOL // 0x2b8b @0x5
0x2b86…2b8c }
0x2b8c…2b93 b8ea 4240 NEXT M
0x2b8c…2b93 LineComalBin {
0x2b8c…2b93 ptr = 0xb8ea // 0x2b8c @0x0
0x2b8c…2b93 lno = 0x1090 // 0x2b8e @0x2
0x2b8c…2b93 at0004 = ╱84╱ NEXT ╱ // 0x2b90 @0x4
0x2b8c…2b93 at0005 = ╱4d╱M╱ // 0x2b91 @0x5
0x2b8c…2b93 at0006 = EOL // 0x2b92 @0x6
0x2b8c…2b93 }
0x2b93…2b99 b8f0 4250 ENDPROC
0x2b93…2b99 LineComalBin {
0x2b93…2b99 ptr = 0xb8f0 // 0x2b93 @0x0
0x2b93…2b99 lno = 0x109a // 0x2b95 @0x2
0x2b93…2b99 at0004 = ╱9f╱ ENDPROC ╱ // 0x2b97 @0x4
0x2b93…2b99 at0005 = EOL // 0x2b98 @0x5
0x2b93…2b99 }
0x2b99…2ba6 b8fd 4260 PROC FAKTGEM
0x2b99…2ba6 LineComalBin {
0x2b99…2ba6 ptr = 0xb8fd // 0x2b99 @0x0
0x2b99…2ba6 lno = 0x10a4 // 0x2b9b @0x2
0x2b99…2ba6 at0004 = ╱9e╱ PROC ╱ // 0x2b9d @0x4
0x2b99…2ba6 at0005 = ╱46╱F╱ // 0x2b9e @0x5
0x2b99…2ba6 at0006 = ╱41╱A╱ // 0x2b9f @0x6
0x2b99…2ba6 at0007 = ╱4b╱K╱ // 0x2ba0 @0x7
0x2b99…2ba6 at0008 = ╱54╱T╱ // 0x2ba1 @0x8
0x2b99…2ba6 at0009 = ╱47╱G╱ // 0x2ba2 @0x9
0x2b99…2ba6 at000a = ╱45╱E╱ // 0x2ba3 @0xa
0x2b99…2ba6 at000b = ╱4d╱M╱ // 0x2ba4 @0xb
0x2b99…2ba6 at000c = EOL // 0x2ba5 @0xc
0x2b99…2ba6 }
0x2ba6…2bbb b912 4270 I=APOSTER+1
0x2ba6…2bbb LineComalBin {
0x2ba6…2bbb ptr = 0xb912 // 0x2ba6 @0x0
0x2ba6…2bbb lno = 0x10ae // 0x2ba8 @0x2
0x2ba6…2bbb at0004 = ╱49╱I╱ // 0x2baa @0x4
0x2ba6…2bbb at0005 = ╱dc╱=╱ // 0x2bab @0x5
0x2ba6…2bbb at0006 = ╱41╱A╱ // 0x2bac @0x6
0x2ba6…2bbb at0007 = ╱50╱P╱ // 0x2bad @0x7
0x2ba6…2bbb at0008 = ╱4f╱O╱ // 0x2bae @0x8
0x2ba6…2bbb at0009 = ╱53╱S╱ // 0x2baf @0x9
0x2ba6…2bbb at000a = ╱54╱T╱ // 0x2bb0 @0xa
0x2ba6…2bbb at000b = ╱45╱E╱ // 0x2bb1 @0xb
0x2ba6…2bbb at000c = ╱52╱R╱ // 0x2bb2 @0xc
0x2ba6…2bbb at000d = ╱e2╱+╱ // 0x2bb3 @0xd
0x2ba6…2bbb at000e = ╱31╱1╱ // 0x2bb4 @0xe
0x2ba6…2bbb at000f = ╱fe00008001╱ // 0x2bb5 @0xf
0x2ba6…2bbb at0014 = EOL // 0x2bba @0x14
0x2ba6…2bbb }
0x2bbb…2bcd b924 4280 IF FAKKRE$="F" THEN
0x2bbb…2bcd LineComalBin {
0x2bbb…2bcd ptr = 0xb924 // 0x2bbb @0x0
0x2bbb…2bcd lno = 0x10b8 // 0x2bbd @0x2
0x2bbb…2bcd at0004 = ╱9c╱ IF ╱ // 0x2bbf @0x4
0x2bbb…2bcd at0005 = ╱46╱F╱ // 0x2bc0 @0x5
0x2bbb…2bcd at0006 = ╱41╱A╱ // 0x2bc1 @0x6
0x2bbb…2bcd at0007 = ╱4b╱K╱ // 0x2bc2 @0x7
0x2bbb…2bcd at0008 = ╱4b╱K╱ // 0x2bc3 @0x8
0x2bbb…2bcd at0009 = ╱52╱R╱ // 0x2bc4 @0x9
0x2bbb…2bcd at000a = ╱45╱E╱ // 0x2bc5 @0xa
0x2bbb…2bcd at000b = ╱ef╱$╱ // 0x2bc6 @0xb
0x2bbb…2bcd at000c = ╱dc╱=╱ // 0x2bc7 @0xc
0x2bbb…2bcd at000d = ╱22╱"╱ // 0x2bc8 @0xd
0x2bbb…2bcd at000e = ╱46╱F╱ // 0x2bc9 @0xe
0x2bbb…2bcd at000f = ╱22╱"╱ // 0x2bca @0xf
0x2bbb…2bcd at0010 = ╱b6╱ THEN ╱ // 0x2bcb @0x10
0x2bbb…2bcd at0011 = EOL // 0x2bcc @0x11
0x2bbb…2bcd }
0x2bcd…2be4 b93b 4290 AFAKT=AFAKT+1
0x2bcd…2be4 LineComalBin {
0x2bcd…2be4 ptr = 0xb93b // 0x2bcd @0x0
0x2bcd…2be4 lno = 0x10c2 // 0x2bcf @0x2
0x2bcd…2be4 at0004 = ╱41╱A╱ // 0x2bd1 @0x4
0x2bcd…2be4 at0005 = ╱46╱F╱ // 0x2bd2 @0x5
0x2bcd…2be4 at0006 = ╱41╱A╱ // 0x2bd3 @0x6
0x2bcd…2be4 at0007 = ╱4b╱K╱ // 0x2bd4 @0x7
0x2bcd…2be4 at0008 = ╱54╱T╱ // 0x2bd5 @0x8
0x2bcd…2be4 at0009 = ╱dc╱=╱ // 0x2bd6 @0x9
0x2bcd…2be4 at000a = ╱41╱A╱ // 0x2bd7 @0xa
0x2bcd…2be4 at000b = ╱46╱F╱ // 0x2bd8 @0xb
0x2bcd…2be4 at000c = ╱41╱A╱ // 0x2bd9 @0xc
0x2bcd…2be4 at000d = ╱4b╱K╱ // 0x2bda @0xd
0x2bcd…2be4 at000e = ╱54╱T╱ // 0x2bdb @0xe
0x2bcd…2be4 at000f = ╱e2╱+╱ // 0x2bdc @0xf
0x2bcd…2be4 at0010 = ╱31╱1╱ // 0x2bdd @0x10
0x2bcd…2be4 at0011 = ╱fe00008001╱ // 0x2bde @0x11
0x2bcd…2be4 at0016 = EOL // 0x2be3 @0x16
0x2bcd…2be4 }
0x2be4…2bea b941 4300 ELSE
0x2be4…2bea LineComalBin {
0x2be4…2bea ptr = 0xb941 // 0x2be4 @0x0
0x2be4…2bea lno = 0x10cc // 0x2be6 @0x2
0x2be4…2bea at0004 = ╱9a╱ ELSE ╱ // 0x2be8 @0x4
0x2be4…2bea at0005 = EOL // 0x2be9 @0x5
0x2be4…2bea }
0x2bea…2c01 (146,) b958 4310 AKRED=AKRED+1
0x2bea…2c01 LineComalBin {
0x2bea…2c01 ptr = 0xb958 // 0x2bea @0x0
0x2bea…2c01 lno = 0x10d6 // 0x2bec @0x2
0x2bea…2c01 at0004 = ╱41╱A╱ // 0x2bee @0x4
0x2bea…2c01 at0005 = ╱4b╱K╱ // 0x2bef @0x5
0x2bea…2c01 at0006 = ╱52╱R╱ // 0x2bf0 @0x6
0x2bea…2c01 at0007 = ╱45╱E╱ // 0x2bf1 @0x7
0x2bea…2c01 at0008 = ╱44╱D╱ // 0x2bf2 @0x8
0x2bea…2c01 at0009 = ╱dc╱=╱ // 0x2bf3 @0x9
0x2bea…2c01 at000a = ╱41╱A╱ // 0x2bf4 @0xa
0x2bea…2c01 at000b = ╱4b╱K╱ // 0x2bf5 @0xb
0x2bea…2c01 at000c = ╱52╱R╱ // 0x2bf6 @0xc
0x2bea…2c01 at000d = ╱45╱E╱ // 0x2bf7 @0xd
0x2bea…2c01 at000e = ╱44╱D╱ // 0x2bf8 @0xe
0x2bea…2c01 at000f = ╱e2╱+╱ // 0x2bf9 @0xf
0x2bea…2c01 at0010 = ╱31╱1╱ // 0x2bfa @0x10
0x2bea…2c01 at0011 = ╱fe00008001╱ // 0x2bfb @0x11
0x2bea…2c01 at0016 = EOL // 0x2c00 @0x16
0x2bea…2c01 }
0x2c01…2c07 b95e 4320 ENDIF
0x2c01…2c07 LineComalBin {
0x2c01…2c07 ptr = 0xb95e // 0x2c01 @0x0
0x2c01…2c07 lno = 0x10e0 // 0x2c03 @0x2
0x2c01…2c07 at0004 = ╱9b╱ ENDIF ╱ // 0x2c05 @0x4
0x2c01…2c07 at0005 = EOL // 0x2c06 @0x5
0x2c01…2c07 }
0x2c07…2c12 b969 4330 OPEN K6$,W
0x2c07…2c12 LineComalBin {
0x2c07…2c12 ptr = 0xb969 // 0x2c07 @0x0
0x2c07…2c12 lno = 0x10ea // 0x2c09 @0x2
0x2c07…2c12 at0004 = ╱a7╱ OPEN ╱ // 0x2c0b @0x4
0x2c07…2c12 at0005 = ╱4b╱K╱ // 0x2c0c @0x5
0x2c07…2c12 at0006 = ╱36╱6╱ // 0x2c0d @0x6
0x2c07…2c12 at0007 = ╱ef╱$╱ // 0x2c0e @0x7
0x2c07…2c12 at0008 = ╱ec╱,╱ // 0x2c0f @0x8
0x2c07…2c12 at0009 = ╱57╱W╱ // 0x2c10 @0x9
0x2c07…2c12 at000a = EOL // 0x2c11 @0xa
0x2c07…2c12 }
0x2c12…2c2d b984 4340 EXEC FE(3,1,K6$)
0x2c12…2c2d LineComalBin {
0x2c12…2c2d ptr = 0xb984 // 0x2c12 @0x0
0x2c12…2c2d lno = 0x10f4 // 0x2c14 @0x2
0x2c12…2c2d at0004 = ╱9d╱ EXEC ╱ // 0x2c16 @0x4
0x2c12…2c2d at0005 = ╱46╱F╱ // 0x2c17 @0x5
0x2c12…2c2d at0006 = ╱45╱E╱ // 0x2c18 @0x6
0x2c12…2c2d at0007 = ╱ed╱(╱ // 0x2c19 @0x7
0x2c12…2c2d at0008 = ╱33╱3╱ // 0x2c1a @0x8
0x2c12…2c2d at0009 = ╱fe0000c002╱ // 0x2c1b @0x9
0x2c12…2c2d at000e = ╱ec╱,╱ // 0x2c20 @0xe
0x2c12…2c2d at000f = ╱31╱1╱ // 0x2c21 @0xf
0x2c12…2c2d at0010 = ╱fe00008001╱ // 0x2c22 @0x10
0x2c12…2c2d at0015 = ╱ec╱,╱ // 0x2c27 @0x15
0x2c12…2c2d at0016 = ╱4b╱K╱ // 0x2c28 @0x16
0x2c12…2c2d at0017 = ╱36╱6╱ // 0x2c29 @0x17
0x2c12…2c2d at0018 = ╱ef╱$╱ // 0x2c2a @0x18
0x2c12…2c2d at0019 = ╱ee╱)╱ // 0x2c2b @0x19
0x2c12…2c2d at001a = EOL // 0x2c2c @0x1a
0x2c12…2c2d }
0x2c2d…2c56 b9ad 4350 PUT K6$,I:KUNDENR,ORDREDAT,FAKKRE$,DIVD
0x2c2d…2c56 LineComalBin {
0x2c2d…2c56 ptr = 0xb9ad // 0x2c2d @0x0
0x2c2d…2c56 lno = 0x10fe // 0x2c2f @0x2
0x2c2d…2c56 at0004 = ╱aa╱ PUT ╱ // 0x2c31 @0x4
0x2c2d…2c56 at0005 = ╱4b╱K╱ // 0x2c32 @0x5
0x2c2d…2c56 at0006 = ╱36╱6╱ // 0x2c33 @0x6
0x2c2d…2c56 at0007 = ╱ef╱$╱ // 0x2c34 @0x7
0x2c2d…2c56 at0008 = ╱ec╱,╱ // 0x2c35 @0x8
0x2c2d…2c56 at0009 = ╱49╱I╱ // 0x2c36 @0x9
0x2c2d…2c56 at000a = ╱f0╱:╱ // 0x2c37 @0xa
0x2c2d…2c56 at000b = ╱4b╱K╱ // 0x2c38 @0xb
0x2c2d…2c56 at000c = ╱55╱U╱ // 0x2c39 @0xc
0x2c2d…2c56 at000d = ╱4e╱N╱ // 0x2c3a @0xd
0x2c2d…2c56 at000e = ╱44╱D╱ // 0x2c3b @0xe
0x2c2d…2c56 at000f = ╱45╱E╱ // 0x2c3c @0xf
0x2c2d…2c56 at0010 = ╱4e╱N╱ // 0x2c3d @0x10
0x2c2d…2c56 at0011 = ╱52╱R╱ // 0x2c3e @0x11
0x2c2d…2c56 at0012 = ╱ec╱,╱ // 0x2c3f @0x12
0x2c2d…2c56 at0013 = ╱4f╱O╱ // 0x2c40 @0x13
0x2c2d…2c56 at0014 = ╱52╱R╱ // 0x2c41 @0x14
0x2c2d…2c56 at0015 = ╱44╱D╱ // 0x2c42 @0x15
0x2c2d…2c56 at0016 = ╱52╱R╱ // 0x2c43 @0x16
0x2c2d…2c56 at0017 = ╱45╱E╱ // 0x2c44 @0x17
0x2c2d…2c56 at0018 = ╱44╱D╱ // 0x2c45 @0x18
0x2c2d…2c56 at0019 = ╱41╱A╱ // 0x2c46 @0x19
0x2c2d…2c56 at001a = ╱54╱T╱ // 0x2c47 @0x1a
0x2c2d…2c56 at001b = ╱ec╱,╱ // 0x2c48 @0x1b
0x2c2d…2c56 at001c = ╱46╱F╱ // 0x2c49 @0x1c
0x2c2d…2c56 at001d = ╱41╱A╱ // 0x2c4a @0x1d
0x2c2d…2c56 at001e = ╱4b╱K╱ // 0x2c4b @0x1e
0x2c2d…2c56 at001f = ╱4b╱K╱ // 0x2c4c @0x1f
0x2c2d…2c56 at0020 = ╱52╱R╱ // 0x2c4d @0x20
0x2c2d…2c56 at0021 = ╱45╱E╱ // 0x2c4e @0x21
0x2c2d…2c56 at0022 = ╱ef╱$╱ // 0x2c4f @0x22
0x2c2d…2c56 at0023 = ╱ec╱,╱ // 0x2c50 @0x23
0x2c2d…2c56 at0024 = ╱44╱D╱ // 0x2c51 @0x24
0x2c2d…2c56 at0025 = ╱49╱I╱ // 0x2c52 @0x25
0x2c2d…2c56 at0026 = ╱56╱V╱ // 0x2c53 @0x26
0x2c2d…2c56 at0027 = ╱44╱D╱ // 0x2c54 @0x27
0x2c2d…2c56 at0028 = EOL // 0x2c55 @0x28
0x2c2d…2c56 }
0x2c56…2c71 b9c8 4360 EXEC FE(3,2,K6$)
0x2c56…2c71 LineComalBin {
0x2c56…2c71 ptr = 0xb9c8 // 0x2c56 @0x0
0x2c56…2c71 lno = 0x1108 // 0x2c58 @0x2
0x2c56…2c71 at0004 = ╱9d╱ EXEC ╱ // 0x2c5a @0x4
0x2c56…2c71 at0005 = ╱46╱F╱ // 0x2c5b @0x5
0x2c56…2c71 at0006 = ╱45╱E╱ // 0x2c5c @0x6
0x2c56…2c71 at0007 = ╱ed╱(╱ // 0x2c5d @0x7
0x2c56…2c71 at0008 = ╱33╱3╱ // 0x2c5e @0x8
0x2c56…2c71 at0009 = ╱fe0000c002╱ // 0x2c5f @0x9
0x2c56…2c71 at000e = ╱ec╱,╱ // 0x2c64 @0xe
0x2c56…2c71 at000f = ╱32╱2╱ // 0x2c65 @0xf
0x2c56…2c71 at0010 = ╱fe00008002╱ // 0x2c66 @0x10
0x2c56…2c71 at0015 = ╱ec╱,╱ // 0x2c6b @0x15
0x2c56…2c71 at0016 = ╱4b╱K╱ // 0x2c6c @0x16
0x2c56…2c71 at0017 = ╱36╱6╱ // 0x2c6d @0x17
0x2c56…2c71 at0018 = ╱ef╱$╱ // 0x2c6e @0x18
0x2c56…2c71 at0019 = ╱ee╱)╱ // 0x2c6f @0x19
0x2c56…2c71 at001a = EOL // 0x2c70 @0x1a
0x2c56…2c71 }
0x2c71…2c80 b9d7 4370 I=I+2
0x2c71…2c80 LineComalBin {
0x2c71…2c80 ptr = 0xb9d7 // 0x2c71 @0x0
0x2c71…2c80 lno = 0x1112 // 0x2c73 @0x2
0x2c71…2c80 at0004 = ╱49╱I╱ // 0x2c75 @0x4
0x2c71…2c80 at0005 = ╱dc╱=╱ // 0x2c76 @0x5
0x2c71…2c80 at0006 = ╱49╱I╱ // 0x2c77 @0x6
0x2c71…2c80 at0007 = ╱e2╱+╱ // 0x2c78 @0x7
0x2c71…2c80 at0008 = ╱32╱2╱ // 0x2c79 @0x8
0x2c71…2c80 at0009 = ╱fe00008002╱ // 0x2c7a @0x9
0x2c71…2c80 at000e = EOL // 0x2c7f @0xe
0x2c71…2c80 }
0x2c80…2c92 b9e9 4380 IF DIVD=1 THEN
0x2c80…2c92 LineComalBin {
0x2c80…2c92 ptr = 0xb9e9 // 0x2c80 @0x0
0x2c80…2c92 lno = 0x111c // 0x2c82 @0x2
0x2c80…2c92 at0004 = ╱9c╱ IF ╱ // 0x2c84 @0x4
0x2c80…2c92 at0005 = ╱44╱D╱ // 0x2c85 @0x5
0x2c80…2c92 at0006 = ╱49╱I╱ // 0x2c86 @0x6
0x2c80…2c92 at0007 = ╱56╱V╱ // 0x2c87 @0x7
0x2c80…2c92 at0008 = ╱44╱D╱ // 0x2c88 @0x8
0x2c80…2c92 at0009 = ╱dc╱=╱ // 0x2c89 @0x9
0x2c80…2c92 at000a = ╱31╱1╱ // 0x2c8a @0xa
0x2c80…2c92 at000b = ╱fe00008001╱ // 0x2c8b @0xb
0x2c80…2c92 at0010 = ╱b6╱ THEN ╱ // 0x2c90 @0x10
0x2c80…2c92 at0011 = EOL // 0x2c91 @0x11
0x2c80…2c92 }
0x2c92…2cb6 ba0d 4390 PUT K6$,I:DEBNAVN$(1:13)
0x2c92…2cb6 LineComalBin {
0x2c92…2cb6 ptr = 0xba0d // 0x2c92 @0x0
0x2c92…2cb6 lno = 0x1126 // 0x2c94 @0x2
0x2c92…2cb6 at0004 = ╱aa╱ PUT ╱ // 0x2c96 @0x4
0x2c92…2cb6 at0005 = ╱4b╱K╱ // 0x2c97 @0x5
0x2c92…2cb6 at0006 = ╱36╱6╱ // 0x2c98 @0x6
0x2c92…2cb6 at0007 = ╱ef╱$╱ // 0x2c99 @0x7
0x2c92…2cb6 at0008 = ╱ec╱,╱ // 0x2c9a @0x8
0x2c92…2cb6 at0009 = ╱49╱I╱ // 0x2c9b @0x9
0x2c92…2cb6 at000a = ╱f0╱:╱ // 0x2c9c @0xa
0x2c92…2cb6 at000b = ╱44╱D╱ // 0x2c9d @0xb
0x2c92…2cb6 at000c = ╱45╱E╱ // 0x2c9e @0xc
0x2c92…2cb6 at000d = ╱42╱B╱ // 0x2c9f @0xd
0x2c92…2cb6 at000e = ╱4e╱N╱ // 0x2ca0 @0xe
0x2c92…2cb6 at000f = ╱41╱A╱ // 0x2ca1 @0xf
0x2c92…2cb6 at0010 = ╱56╱V╱ // 0x2ca2 @0x10
0x2c92…2cb6 at0011 = ╱4e╱N╱ // 0x2ca3 @0x11
0x2c92…2cb6 at0012 = ╱ef╱$╱ // 0x2ca4 @0x12
0x2c92…2cb6 at0013 = ╱ed╱(╱ // 0x2ca5 @0x13
0x2c92…2cb6 at0014 = ╱31╱1╱ // 0x2ca6 @0x14
0x2c92…2cb6 at0015 = ╱fe00008001╱ // 0x2ca7 @0x15
0x2c92…2cb6 at001a = ╱f0╱:╱ // 0x2cac @0x1a
0x2c92…2cb6 at001b = ╱31╱1╱ // 0x2cad @0x1b
0x2c92…2cb6 at001c = ╱33╱3╱ // 0x2cae @0x1c
0x2c92…2cb6 at001d = ╱fe0000d004╱ // 0x2caf @0x1d
0x2c92…2cb6 at0022 = ╱ee╱)╱ // 0x2cb4 @0x22
0x2c92…2cb6 at0023 = EOL // 0x2cb5 @0x23
0x2c92…2cb6 }
0x2cb6…2cd1 ba28 4400 EXEC FE(3,3,K6$)
0x2cb6…2cd1 LineComalBin {
0x2cb6…2cd1 ptr = 0xba28 // 0x2cb6 @0x0
0x2cb6…2cd1 lno = 0x1130 // 0x2cb8 @0x2
0x2cb6…2cd1 at0004 = ╱9d╱ EXEC ╱ // 0x2cba @0x4
0x2cb6…2cd1 at0005 = ╱46╱F╱ // 0x2cbb @0x5
0x2cb6…2cd1 at0006 = ╱45╱E╱ // 0x2cbc @0x6
0x2cb6…2cd1 at0007 = ╱ed╱(╱ // 0x2cbd @0x7
0x2cb6…2cd1 at0008 = ╱33╱3╱ // 0x2cbe @0x8
0x2cb6…2cd1 at0009 = ╱fe0000c002╱ // 0x2cbf @0x9
0x2cb6…2cd1 at000e = ╱ec╱,╱ // 0x2cc4 @0xe
0x2cb6…2cd1 at000f = ╱33╱3╱ // 0x2cc5 @0xf
0x2cb6…2cd1 at0010 = ╱fe0000c002╱ // 0x2cc6 @0x10
0x2cb6…2cd1 at0015 = ╱ec╱,╱ // 0x2ccb @0x15
0x2cb6…2cd1 at0016 = ╱4b╱K╱ // 0x2ccc @0x16
0x2cb6…2cd1 at0017 = ╱36╱6╱ // 0x2ccd @0x17
0x2cb6…2cd1 at0018 = ╱ef╱$╱ // 0x2cce @0x18
0x2cb6…2cd1 at0019 = ╱ee╱)╱ // 0x2ccf @0x19
0x2cb6…2cd1 at001a = EOL // 0x2cd0 @0x1a
0x2cb6…2cd1 }
0x2cd1…2cfd (149,) ba54 4410 PUT K6$,I+1:DEBNAVN$(14:12)
0x2cd1…2cfd LineComalBin {
0x2cd1…2cfd ptr = 0xba54 // 0x2cd1 @0x0
0x2cd1…2cfd lno = 0x113a // 0x2cd3 @0x2
0x2cd1…2cfd at0004 = ╱aa╱ PUT ╱ // 0x2cd5 @0x4
0x2cd1…2cfd at0005 = ╱4b╱K╱ // 0x2cd6 @0x5
0x2cd1…2cfd at0006 = ╱36╱6╱ // 0x2cd7 @0x6
0x2cd1…2cfd at0007 = ╱ef╱$╱ // 0x2cd8 @0x7
0x2cd1…2cfd at0008 = ╱ec╱,╱ // 0x2cd9 @0x8
0x2cd1…2cfd at0009 = ╱49╱I╱ // 0x2cda @0x9
0x2cd1…2cfd at000a = ╱e2╱+╱ // 0x2cdb @0xa
0x2cd1…2cfd at000b = ╱31╱1╱ // 0x2cdc @0xb
0x2cd1…2cfd at000c = ╱fe00008001╱ // 0x2cdd @0xc
0x2cd1…2cfd at0011 = ╱f0╱:╱ // 0x2ce2 @0x11
0x2cd1…2cfd at0012 = ╱44╱D╱ // 0x2ce3 @0x12
0x2cd1…2cfd at0013 = ╱45╱E╱ // 0x2ce4 @0x13
0x2cd1…2cfd at0014 = ╱42╱B╱ // 0x2ce5 @0x14
0x2cd1…2cfd at0015 = ╱4e╱N╱ // 0x2ce6 @0x15
0x2cd1…2cfd at0016 = ╱41╱A╱ // 0x2ce7 @0x16
0x2cd1…2cfd at0017 = ╱56╱V╱ // 0x2ce8 @0x17
0x2cd1…2cfd at0018 = ╱4e╱N╱ // 0x2ce9 @0x18
0x2cd1…2cfd at0019 = ╱ef╱$╱ // 0x2cea @0x19
0x2cd1…2cfd at001a = ╱ed╱(╱ // 0x2ceb @0x1a
0x2cd1…2cfd at001b = ╱31╱1╱ // 0x2cec @0x1b
0x2cd1…2cfd at001c = ╱34╱4╱ // 0x2ced @0x1c
0x2cd1…2cfd at001d = ╱fe0000e004╱ // 0x2cee @0x1d
0x2cd1…2cfd at0022 = ╱f0╱:╱ // 0x2cf3 @0x22
0x2cd1…2cfd at0023 = ╱31╱1╱ // 0x2cf4 @0x23
0x2cd1…2cfd at0024 = ╱32╱2╱ // 0x2cf5 @0x24
0x2cd1…2cfd at0025 = ╱fe0000c004╱ // 0x2cf6 @0x25
0x2cd1…2cfd at002a = ╱ee╱)╱ // 0x2cfb @0x2a
0x2cd1…2cfd at002b = EOL // 0x2cfc @0x2b
0x2cd1…2cfd }
0x2cfd…2d18 ba6f 4420 EXEC FE(3,4,K6$)
0x2cfd…2d18 LineComalBin {
0x2cfd…2d18 ptr = 0xba6f // 0x2cfd @0x0
0x2cfd…2d18 lno = 0x1144 // 0x2cff @0x2
0x2cfd…2d18 at0004 = ╱9d╱ EXEC ╱ // 0x2d01 @0x4
0x2cfd…2d18 at0005 = ╱46╱F╱ // 0x2d02 @0x5
0x2cfd…2d18 at0006 = ╱45╱E╱ // 0x2d03 @0x6
0x2cfd…2d18 at0007 = ╱ed╱(╱ // 0x2d04 @0x7
0x2cfd…2d18 at0008 = ╱33╱3╱ // 0x2d05 @0x8
0x2cfd…2d18 at0009 = ╱fe0000c002╱ // 0x2d06 @0x9
0x2cfd…2d18 at000e = ╱ec╱,╱ // 0x2d0b @0xe
0x2cfd…2d18 at000f = ╱34╱4╱ // 0x2d0c @0xf
0x2cfd…2d18 at0010 = ╱fe00008003╱ // 0x2d0d @0x10
0x2cfd…2d18 at0015 = ╱ec╱,╱ // 0x2d12 @0x15
0x2cfd…2d18 at0016 = ╱4b╱K╱ // 0x2d13 @0x16
0x2cfd…2d18 at0017 = ╱36╱6╱ // 0x2d14 @0x17
0x2cfd…2d18 at0018 = ╱ef╱$╱ // 0x2d15 @0x18
0x2cfd…2d18 at0019 = ╱ee╱)╱ // 0x2d16 @0x19
0x2cfd…2d18 at001a = EOL // 0x2d17 @0x1a
0x2cfd…2d18 }
0x2d18…2d43 ba9a 4430 PUT K6$,I+2:DEBGADE$(1:13)
0x2d18…2d43 LineComalBin {
0x2d18…2d43 ptr = 0xba9a // 0x2d18 @0x0
0x2d18…2d43 lno = 0x114e // 0x2d1a @0x2
0x2d18…2d43 at0004 = ╱aa╱ PUT ╱ // 0x2d1c @0x4
0x2d18…2d43 at0005 = ╱4b╱K╱ // 0x2d1d @0x5
0x2d18…2d43 at0006 = ╱36╱6╱ // 0x2d1e @0x6
0x2d18…2d43 at0007 = ╱ef╱$╱ // 0x2d1f @0x7
0x2d18…2d43 at0008 = ╱ec╱,╱ // 0x2d20 @0x8
0x2d18…2d43 at0009 = ╱49╱I╱ // 0x2d21 @0x9
0x2d18…2d43 at000a = ╱e2╱+╱ // 0x2d22 @0xa
0x2d18…2d43 at000b = ╱32╱2╱ // 0x2d23 @0xb
0x2d18…2d43 at000c = ╱fe00008002╱ // 0x2d24 @0xc
0x2d18…2d43 at0011 = ╱f0╱:╱ // 0x2d29 @0x11
0x2d18…2d43 at0012 = ╱44╱D╱ // 0x2d2a @0x12
0x2d18…2d43 at0013 = ╱45╱E╱ // 0x2d2b @0x13
0x2d18…2d43 at0014 = ╱42╱B╱ // 0x2d2c @0x14
0x2d18…2d43 at0015 = ╱47╱G╱ // 0x2d2d @0x15
0x2d18…2d43 at0016 = ╱41╱A╱ // 0x2d2e @0x16
0x2d18…2d43 at0017 = ╱44╱D╱ // 0x2d2f @0x17
0x2d18…2d43 at0018 = ╱45╱E╱ // 0x2d30 @0x18
0x2d18…2d43 at0019 = ╱ef╱$╱ // 0x2d31 @0x19
0x2d18…2d43 at001a = ╱ed╱(╱ // 0x2d32 @0x1a
0x2d18…2d43 at001b = ╱31╱1╱ // 0x2d33 @0x1b
0x2d18…2d43 at001c = ╱fe00008001╱ // 0x2d34 @0x1c
0x2d18…2d43 at0021 = ╱f0╱:╱ // 0x2d39 @0x21
0x2d18…2d43 at0022 = ╱31╱1╱ // 0x2d3a @0x22
0x2d18…2d43 at0023 = ╱33╱3╱ // 0x2d3b @0x23
0x2d18…2d43 at0024 = ╱fe0000d004╱ // 0x2d3c @0x24
0x2d18…2d43 at0029 = ╱ee╱)╱ // 0x2d41 @0x29
0x2d18…2d43 at002a = EOL // 0x2d42 @0x2a
0x2d18…2d43 }
0x2d43…2d5e bab5 4440 EXEC FE(3,5,K6$)
0x2d43…2d5e LineComalBin {
0x2d43…2d5e ptr = 0xbab5 // 0x2d43 @0x0
0x2d43…2d5e lno = 0x1158 // 0x2d45 @0x2
0x2d43…2d5e at0004 = ╱9d╱ EXEC ╱ // 0x2d47 @0x4
0x2d43…2d5e at0005 = ╱46╱F╱ // 0x2d48 @0x5
0x2d43…2d5e at0006 = ╱45╱E╱ // 0x2d49 @0x6
0x2d43…2d5e at0007 = ╱ed╱(╱ // 0x2d4a @0x7
0x2d43…2d5e at0008 = ╱33╱3╱ // 0x2d4b @0x8
0x2d43…2d5e at0009 = ╱fe0000c002╱ // 0x2d4c @0x9
0x2d43…2d5e at000e = ╱ec╱,╱ // 0x2d51 @0xe
0x2d43…2d5e at000f = ╱35╱5╱ // 0x2d52 @0xf
0x2d43…2d5e at0010 = ╱fe0000a003╱ // 0x2d53 @0x10
0x2d43…2d5e at0015 = ╱ec╱,╱ // 0x2d58 @0x15
0x2d43…2d5e at0016 = ╱4b╱K╱ // 0x2d59 @0x16
0x2d43…2d5e at0017 = ╱36╱6╱ // 0x2d5a @0x17
0x2d43…2d5e at0018 = ╱ef╱$╱ // 0x2d5b @0x18
0x2d43…2d5e at0019 = ╱ee╱)╱ // 0x2d5c @0x19
0x2d43…2d5e at001a = EOL // 0x2d5d @0x1a
0x2d43…2d5e }
0x2d5e…2d8a bae1 4450 PUT K6$,I+3:DEBGADE$(14:12)
0x2d5e…2d8a LineComalBin {
0x2d5e…2d8a ptr = 0xbae1 // 0x2d5e @0x0
0x2d5e…2d8a lno = 0x1162 // 0x2d60 @0x2
0x2d5e…2d8a at0004 = ╱aa╱ PUT ╱ // 0x2d62 @0x4
0x2d5e…2d8a at0005 = ╱4b╱K╱ // 0x2d63 @0x5
0x2d5e…2d8a at0006 = ╱36╱6╱ // 0x2d64 @0x6
0x2d5e…2d8a at0007 = ╱ef╱$╱ // 0x2d65 @0x7
0x2d5e…2d8a at0008 = ╱ec╱,╱ // 0x2d66 @0x8
0x2d5e…2d8a at0009 = ╱49╱I╱ // 0x2d67 @0x9
0x2d5e…2d8a at000a = ╱e2╱+╱ // 0x2d68 @0xa
0x2d5e…2d8a at000b = ╱33╱3╱ // 0x2d69 @0xb
0x2d5e…2d8a at000c = ╱fe0000c002╱ // 0x2d6a @0xc
0x2d5e…2d8a at0011 = ╱f0╱:╱ // 0x2d6f @0x11
0x2d5e…2d8a at0012 = ╱44╱D╱ // 0x2d70 @0x12
0x2d5e…2d8a at0013 = ╱45╱E╱ // 0x2d71 @0x13
0x2d5e…2d8a at0014 = ╱42╱B╱ // 0x2d72 @0x14
0x2d5e…2d8a at0015 = ╱47╱G╱ // 0x2d73 @0x15
0x2d5e…2d8a at0016 = ╱41╱A╱ // 0x2d74 @0x16
0x2d5e…2d8a at0017 = ╱44╱D╱ // 0x2d75 @0x17
0x2d5e…2d8a at0018 = ╱45╱E╱ // 0x2d76 @0x18
0x2d5e…2d8a at0019 = ╱ef╱$╱ // 0x2d77 @0x19
0x2d5e…2d8a at001a = ╱ed╱(╱ // 0x2d78 @0x1a
0x2d5e…2d8a at001b = ╱31╱1╱ // 0x2d79 @0x1b
0x2d5e…2d8a at001c = ╱34╱4╱ // 0x2d7a @0x1c
0x2d5e…2d8a at001d = ╱fe0000e004╱ // 0x2d7b @0x1d
0x2d5e…2d8a at0022 = ╱f0╱:╱ // 0x2d80 @0x22
0x2d5e…2d8a at0023 = ╱31╱1╱ // 0x2d81 @0x23
0x2d5e…2d8a at0024 = ╱32╱2╱ // 0x2d82 @0x24
0x2d5e…2d8a at0025 = ╱fe0000c004╱ // 0x2d83 @0x25
0x2d5e…2d8a at002a = ╱ee╱)╱ // 0x2d88 @0x2a
0x2d5e…2d8a at002b = EOL // 0x2d89 @0x2b
0x2d5e…2d8a }
0x2d8a…2da5 bafc 4460 EXEC FE(3,6,K6$)
0x2d8a…2da5 LineComalBin {
0x2d8a…2da5 ptr = 0xbafc // 0x2d8a @0x0
0x2d8a…2da5 lno = 0x116c // 0x2d8c @0x2
0x2d8a…2da5 at0004 = ╱9d╱ EXEC ╱ // 0x2d8e @0x4
0x2d8a…2da5 at0005 = ╱46╱F╱ // 0x2d8f @0x5
0x2d8a…2da5 at0006 = ╱45╱E╱ // 0x2d90 @0x6
0x2d8a…2da5 at0007 = ╱ed╱(╱ // 0x2d91 @0x7
0x2d8a…2da5 at0008 = ╱33╱3╱ // 0x2d92 @0x8
0x2d8a…2da5 at0009 = ╱fe0000c002╱ // 0x2d93 @0x9
0x2d8a…2da5 at000e = ╱ec╱,╱ // 0x2d98 @0xe
0x2d8a…2da5 at000f = ╱36╱6╱ // 0x2d99 @0xf
0x2d8a…2da5 at0010 = ╱fe0000c003╱ // 0x2d9a @0x10
0x2d8a…2da5 at0015 = ╱ec╱,╱ // 0x2d9f @0x15
0x2d8a…2da5 at0016 = ╱4b╱K╱ // 0x2da0 @0x16
0x2d8a…2da5 at0017 = ╱36╱6╱ // 0x2da1 @0x17
0x2d8a…2da5 at0018 = ╱ef╱$╱ // 0x2da2 @0x18
0x2d8a…2da5 at0019 = ╱ee╱)╱ // 0x2da3 @0x19
0x2d8a…2da5 at001a = EOL // 0x2da4 @0x1a
0x2d8a…2da5 }
0x2da5…2dd7 bb2e 4470 PUT K6$,I+4:DEBPOSTNR,DEBBY$(1:9)
0x2da5…2dd7 LineComalBin {
0x2da5…2dd7 ptr = 0xbb2e // 0x2da5 @0x0
0x2da5…2dd7 lno = 0x1176 // 0x2da7 @0x2
0x2da5…2dd7 at0004 = ╱aa╱ PUT ╱ // 0x2da9 @0x4
0x2da5…2dd7 at0005 = ╱4b╱K╱ // 0x2daa @0x5
0x2da5…2dd7 at0006 = ╱36╱6╱ // 0x2dab @0x6
0x2da5…2dd7 at0007 = ╱ef╱$╱ // 0x2dac @0x7
0x2da5…2dd7 at0008 = ╱ec╱,╱ // 0x2dad @0x8
0x2da5…2dd7 at0009 = ╱49╱I╱ // 0x2dae @0x9
0x2da5…2dd7 at000a = ╱e2╱+╱ // 0x2daf @0xa
0x2da5…2dd7 at000b = ╱34╱4╱ // 0x2db0 @0xb
0x2da5…2dd7 at000c = ╱fe00008003╱ // 0x2db1 @0xc
0x2da5…2dd7 at0011 = ╱f0╱:╱ // 0x2db6 @0x11
0x2da5…2dd7 at0012 = ╱44╱D╱ // 0x2db7 @0x12
0x2da5…2dd7 at0013 = ╱45╱E╱ // 0x2db8 @0x13
0x2da5…2dd7 at0014 = ╱42╱B╱ // 0x2db9 @0x14
0x2da5…2dd7 at0015 = ╱50╱P╱ // 0x2dba @0x15
0x2da5…2dd7 at0016 = ╱4f╱O╱ // 0x2dbb @0x16
0x2da5…2dd7 at0017 = ╱53╱S╱ // 0x2dbc @0x17
0x2da5…2dd7 at0018 = ╱54╱T╱ // 0x2dbd @0x18
0x2da5…2dd7 at0019 = ╱4e╱N╱ // 0x2dbe @0x19
0x2da5…2dd7 at001a = ╱52╱R╱ // 0x2dbf @0x1a
0x2da5…2dd7 at001b = ╱ec╱,╱ // 0x2dc0 @0x1b
0x2da5…2dd7 at001c = ╱44╱D╱ // 0x2dc1 @0x1c
0x2da5…2dd7 at001d = ╱45╱E╱ // 0x2dc2 @0x1d
0x2da5…2dd7 at001e = ╱42╱B╱ // 0x2dc3 @0x1e
0x2da5…2dd7 at001f = ╱42╱B╱ // 0x2dc4 @0x1f
0x2da5…2dd7 at0020 = ╱59╱Y╱ // 0x2dc5 @0x20
0x2da5…2dd7 at0021 = ╱ef╱$╱ // 0x2dc6 @0x21
0x2da5…2dd7 at0022 = ╱ed╱(╱ // 0x2dc7 @0x22
0x2da5…2dd7 at0023 = ╱31╱1╱ // 0x2dc8 @0x23
0x2da5…2dd7 at0024 = ╱fe00008001╱ // 0x2dc9 @0x24
0x2da5…2dd7 at0029 = ╱f0╱:╱ // 0x2dce @0x29
0x2da5…2dd7 at002a = ╱39╱9╱ // 0x2dcf @0x2a
0x2da5…2dd7 at002b = ╱fe00009004╱ // 0x2dd0 @0x2b
0x2da5…2dd7 at0030 = ╱ee╱)╱ // 0x2dd5 @0x30
0x2da5…2dd7 at0031 = EOL // 0x2dd6 @0x31
0x2da5…2dd7 }
0x2dd7…2df2 bb49 4480 EXEC FE(3,7,K6$)
0x2dd7…2df2 LineComalBin {
0x2dd7…2df2 ptr = 0xbb49 // 0x2dd7 @0x0
0x2dd7…2df2 lno = 0x1180 // 0x2dd9 @0x2
0x2dd7…2df2 at0004 = ╱9d╱ EXEC ╱ // 0x2ddb @0x4
0x2dd7…2df2 at0005 = ╱46╱F╱ // 0x2ddc @0x5
0x2dd7…2df2 at0006 = ╱45╱E╱ // 0x2ddd @0x6
0x2dd7…2df2 at0007 = ╱ed╱(╱ // 0x2dde @0x7
0x2dd7…2df2 at0008 = ╱33╱3╱ // 0x2ddf @0x8
0x2dd7…2df2 at0009 = ╱fe0000c002╱ // 0x2de0 @0x9
0x2dd7…2df2 at000e = ╱ec╱,╱ // 0x2de5 @0xe
0x2dd7…2df2 at000f = ╱37╱7╱ // 0x2de6 @0xf
0x2dd7…2df2 at0010 = ╱fe0000e003╱ // 0x2de7 @0x10
0x2dd7…2df2 at0015 = ╱ec╱,╱ // 0x2dec @0x15
0x2dd7…2df2 at0016 = ╱4b╱K╱ // 0x2ded @0x16
0x2dd7…2df2 at0017 = ╱36╱6╱ // 0x2dee @0x17
0x2dd7…2df2 at0018 = ╱ef╱$╱ // 0x2def @0x18
0x2dd7…2df2 at0019 = ╱ee╱)╱ // 0x2df0 @0x19
0x2dd7…2df2 at001a = EOL // 0x2df1 @0x1a
0x2dd7…2df2 }
0x2df2…2e1c bb73 4490 PUT K6$,I+5:DEBBY$(10:11)
0x2df2…2e1c LineComalBin {
0x2df2…2e1c ptr = 0xbb73 // 0x2df2 @0x0
0x2df2…2e1c lno = 0x118a // 0x2df4 @0x2
0x2df2…2e1c at0004 = ╱aa╱ PUT ╱ // 0x2df6 @0x4
0x2df2…2e1c at0005 = ╱4b╱K╱ // 0x2df7 @0x5
0x2df2…2e1c at0006 = ╱36╱6╱ // 0x2df8 @0x6
0x2df2…2e1c at0007 = ╱ef╱$╱ // 0x2df9 @0x7
0x2df2…2e1c at0008 = ╱ec╱,╱ // 0x2dfa @0x8
0x2df2…2e1c at0009 = ╱49╱I╱ // 0x2dfb @0x9
0x2df2…2e1c at000a = ╱e2╱+╱ // 0x2dfc @0xa
0x2df2…2e1c at000b = ╱35╱5╱ // 0x2dfd @0xb
0x2df2…2e1c at000c = ╱fe0000a003╱ // 0x2dfe @0xc
0x2df2…2e1c at0011 = ╱f0╱:╱ // 0x2e03 @0x11
0x2df2…2e1c at0012 = ╱44╱D╱ // 0x2e04 @0x12
0x2df2…2e1c at0013 = ╱45╱E╱ // 0x2e05 @0x13
0x2df2…2e1c at0014 = ╱42╱B╱ // 0x2e06 @0x14
0x2df2…2e1c at0015 = ╱42╱B╱ // 0x2e07 @0x15
0x2df2…2e1c at0016 = ╱59╱Y╱ // 0x2e08 @0x16
0x2df2…2e1c at0017 = ╱ef╱$╱ // 0x2e09 @0x17
0x2df2…2e1c at0018 = ╱ed╱(╱ // 0x2e0a @0x18
0x2df2…2e1c at0019 = ╱31╱1╱ // 0x2e0b @0x19
0x2df2…2e1c at001a = ╱30╱0╱ // 0x2e0c @0x1a
0x2df2…2e1c at001b = ╱fe0000a004╱ // 0x2e0d @0x1b
0x2df2…2e1c at0020 = ╱f0╱:╱ // 0x2e12 @0x20
0x2df2…2e1c at0021 = ╱31╱1╱ // 0x2e13 @0x21
0x2df2…2e1c at0022 = ╱31╱1╱ // 0x2e14 @0x22
0x2df2…2e1c at0023 = ╱fe0000b004╱ // 0x2e15 @0x23
0x2df2…2e1c at0028 = ╱ee╱)╱ // 0x2e1a @0x28
0x2df2…2e1c at0029 = EOL // 0x2e1b @0x29
0x2df2…2e1c }
0x2e1c…2e37 bb8e 4500 EXEC FE(3,8,K6$)
0x2e1c…2e37 LineComalBin {
0x2e1c…2e37 ptr = 0xbb8e // 0x2e1c @0x0
0x2e1c…2e37 lno = 0x1194 // 0x2e1e @0x2
0x2e1c…2e37 at0004 = ╱9d╱ EXEC ╱ // 0x2e20 @0x4
0x2e1c…2e37 at0005 = ╱46╱F╱ // 0x2e21 @0x5
0x2e1c…2e37 at0006 = ╱45╱E╱ // 0x2e22 @0x6
0x2e1c…2e37 at0007 = ╱ed╱(╱ // 0x2e23 @0x7
0x2e1c…2e37 at0008 = ╱33╱3╱ // 0x2e24 @0x8
0x2e1c…2e37 at0009 = ╱fe0000c002╱ // 0x2e25 @0x9
0x2e1c…2e37 at000e = ╱ec╱,╱ // 0x2e2a @0xe
0x2e1c…2e37 at000f = ╱38╱8╱ // 0x2e2b @0xf
0x2e1c…2e37 at0010 = ╱fe00008004╱ // 0x2e2c @0x10
0x2e1c…2e37 at0015 = ╱ec╱,╱ // 0x2e31 @0x15
0x2e1c…2e37 at0016 = ╱4b╱K╱ // 0x2e32 @0x16
0x2e1c…2e37 at0017 = ╱36╱6╱ // 0x2e33 @0x17
0x2e1c…2e37 at0018 = ╱ef╱$╱ // 0x2e34 @0x18
0x2e1c…2e37 at0019 = ╱ee╱)╱ // 0x2e35 @0x19
0x2e1c…2e37 at001a = EOL // 0x2e36 @0x1a
0x2e1c…2e37 }
0x2e37…2e46 bb9d 4510 I=I+6
0x2e37…2e46 LineComalBin {
0x2e37…2e46 ptr = 0xbb9d // 0x2e37 @0x0
0x2e37…2e46 lno = 0x119e // 0x2e39 @0x2
0x2e37…2e46 at0004 = ╱49╱I╱ // 0x2e3b @0x4
0x2e37…2e46 at0005 = ╱dc╱=╱ // 0x2e3c @0x5
0x2e37…2e46 at0006 = ╱49╱I╱ // 0x2e3d @0x6
0x2e37…2e46 at0007 = ╱e2╱+╱ // 0x2e3e @0x7
0x2e37…2e46 at0008 = ╱36╱6╱ // 0x2e3f @0x8
0x2e37…2e46 at0009 = ╱fe0000c003╱ // 0x2e40 @0x9
0x2e37…2e46 at000e = EOL // 0x2e45 @0xe
0x2e37…2e46 }
0x2e46…2e4c bba3 4520 ENDIF
0x2e46…2e4c LineComalBin {
0x2e46…2e4c ptr = 0xbba3 // 0x2e46 @0x0
0x2e46…2e4c lno = 0x11a8 // 0x2e48 @0x2
0x2e46…2e4c at0004 = ╱9b╱ ENDIF ╱ // 0x2e4a @0x4
0x2e46…2e4c at0005 = EOL // 0x2e4b @0x5
0x2e46…2e4c }
0x2e4c…2e61 bbb8 4530 IF LEVKODE=0 THEN
0x2e4c…2e61 LineComalBin {
0x2e4c…2e61 ptr = 0xbbb8 // 0x2e4c @0x0
0x2e4c…2e61 lno = 0x11b2 // 0x2e4e @0x2
0x2e4c…2e61 at0004 = ╱9c╱ IF ╱ // 0x2e50 @0x4
0x2e4c…2e61 at0005 = ╱4c╱L╱ // 0x2e51 @0x5
0x2e4c…2e61 at0006 = ╱45╱E╱ // 0x2e52 @0x6
0x2e4c…2e61 at0007 = ╱56╱V╱ // 0x2e53 @0x7
0x2e4c…2e61 at0008 = ╱4b╱K╱ // 0x2e54 @0x8
0x2e4c…2e61 at0009 = ╱4f╱O╱ // 0x2e55 @0x9
0x2e4c…2e61 at000a = ╱44╱D╱ // 0x2e56 @0xa
0x2e4c…2e61 at000b = ╱45╱E╱ // 0x2e57 @0xb
0x2e4c…2e61 at000c = ╱dc╱=╱ // 0x2e58 @0xc
0x2e4c…2e61 at000d = ╱30╱0╱ // 0x2e59 @0xd
0x2e4c…2e61 at000e = ╱fe00000000╱ // 0x2e5a @0xe
0x2e4c…2e61 at0013 = ╱b6╱ THEN ╱ // 0x2e5f @0x13
0x2e4c…2e61 at0014 = EOL // 0x2e60 @0x14
0x2e4c…2e61 }
0x2e61…2e73 bbca 4540 FOR J=I TO I+3
0x2e61…2e73 LineComalBin {
0x2e61…2e73 ptr = 0xbbca // 0x2e61 @0x0
0x2e61…2e73 lno = 0x11bc // 0x2e63 @0x2
0x2e61…2e73 at0004 = ╱83╱ FOR ╱ // 0x2e65 @0x4
0x2e61…2e73 at0005 = ╱4a╱J╱ // 0x2e66 @0x5
0x2e61…2e73 at0006 = ╱dc╱=╱ // 0x2e67 @0x6
0x2e61…2e73 at0007 = ╱49╱I╱ // 0x2e68 @0x7
0x2e61…2e73 at0008 = ╱b7╱ TO ╱ // 0x2e69 @0x8
0x2e61…2e73 at0009 = ╱49╱I╱ // 0x2e6a @0x9
0x2e61…2e73 at000a = ╱e2╱+╱ // 0x2e6b @0xa
0x2e61…2e73 at000b = ╱33╱3╱ // 0x2e6c @0xb
0x2e61…2e73 at000c = ╱fe0000c002╱ // 0x2e6d @0xc
0x2e61…2e73 at0011 = EOL // 0x2e72 @0x11
0x2e61…2e73 }
0x2e73…2ea6 bbfd 4550 PUT K6$,J:LEVTEKST$((J-I)*13+1:13)
0x2e73…2ea6 LineComalBin {
0x2e73…2ea6 ptr = 0xbbfd // 0x2e73 @0x0
0x2e73…2ea6 lno = 0x11c6 // 0x2e75 @0x2
0x2e73…2ea6 at0004 = ╱aa╱ PUT ╱ // 0x2e77 @0x4
0x2e73…2ea6 at0005 = ╱4b╱K╱ // 0x2e78 @0x5
0x2e73…2ea6 at0006 = ╱36╱6╱ // 0x2e79 @0x6
0x2e73…2ea6 at0007 = ╱ef╱$╱ // 0x2e7a @0x7
0x2e73…2ea6 at0008 = ╱ec╱,╱ // 0x2e7b @0x8
0x2e73…2ea6 at0009 = ╱4a╱J╱ // 0x2e7c @0x9
0x2e73…2ea6 at000a = ╱f0╱:╱ // 0x2e7d @0xa
0x2e73…2ea6 at000b = ╱4c╱L╱ // 0x2e7e @0xb
0x2e73…2ea6 at000c = ╱45╱E╱ // 0x2e7f @0xc
0x2e73…2ea6 at000d = ╱56╱V╱ // 0x2e80 @0xd
0x2e73…2ea6 at000e = ╱54╱T╱ // 0x2e81 @0xe
0x2e73…2ea6 at000f = ╱45╱E╱ // 0x2e82 @0xf
0x2e73…2ea6 at0010 = ╱4b╱K╱ // 0x2e83 @0x10
0x2e73…2ea6 at0011 = ╱53╱S╱ // 0x2e84 @0x11
0x2e73…2ea6 at0012 = ╱54╱T╱ // 0x2e85 @0x12
0x2e73…2ea6 at0013 = ╱ef╱$╱ // 0x2e86 @0x13
0x2e73…2ea6 at0014 = ╱ed╱(╱ // 0x2e87 @0x14
0x2e73…2ea6 at0015 = ╱ed╱(╱ // 0x2e88 @0x15
0x2e73…2ea6 at0016 = ╱4a╱J╱ // 0x2e89 @0x16
0x2e73…2ea6 at0017 = ╱e3╱-╱ // 0x2e8a @0x17
0x2e73…2ea6 at0018 = ╱49╱I╱ // 0x2e8b @0x18
0x2e73…2ea6 at0019 = ╱ee╱)╱ // 0x2e8c @0x19
0x2e73…2ea6 at001a = ╱e4╱*╱ // 0x2e8d @0x1a
0x2e73…2ea6 at001b = ╱31╱1╱ // 0x2e8e @0x1b
0x2e73…2ea6 at001c = ╱33╱3╱ // 0x2e8f @0x1c
0x2e73…2ea6 at001d = ╱fe0000d004╱ // 0x2e90 @0x1d
0x2e73…2ea6 at0022 = ╱e2╱+╱ // 0x2e95 @0x22
0x2e73…2ea6 at0023 = ╱31╱1╱ // 0x2e96 @0x23
0x2e73…2ea6 at0024 = ╱fe00008001╱ // 0x2e97 @0x24
0x2e73…2ea6 at0029 = ╱f0╱:╱ // 0x2e9c @0x29
0x2e73…2ea6 at002a = ╱31╱1╱ // 0x2e9d @0x2a
0x2e73…2ea6 at002b = ╱33╱3╱ // 0x2e9e @0x2b
0x2e73…2ea6 at002c = ╱fe0000d004╱ // 0x2e9f @0x2c
0x2e73…2ea6 at0031 = ╱ee╱)╱ // 0x2ea4 @0x31
0x2e73…2ea6 at0032 = EOL // 0x2ea5 @0x32
0x2e73…2ea6 }
0x2ea6…2ec1 bc18 4560 EXEC FE(3,8,K6$)
0x2ea6…2ec1 LineComalBin {
0x2ea6…2ec1 ptr = 0xbc18 // 0x2ea6 @0x0
0x2ea6…2ec1 lno = 0x11d0 // 0x2ea8 @0x2
0x2ea6…2ec1 at0004 = ╱9d╱ EXEC ╱ // 0x2eaa @0x4
0x2ea6…2ec1 at0005 = ╱46╱F╱ // 0x2eab @0x5
0x2ea6…2ec1 at0006 = ╱45╱E╱ // 0x2eac @0x6
0x2ea6…2ec1 at0007 = ╱ed╱(╱ // 0x2ead @0x7
0x2ea6…2ec1 at0008 = ╱33╱3╱ // 0x2eae @0x8
0x2ea6…2ec1 at0009 = ╱fe0000c002╱ // 0x2eaf @0x9
0x2ea6…2ec1 at000e = ╱ec╱,╱ // 0x2eb4 @0xe
0x2ea6…2ec1 at000f = ╱38╱8╱ // 0x2eb5 @0xf
0x2ea6…2ec1 at0010 = ╱fe00008004╱ // 0x2eb6 @0x10
0x2ea6…2ec1 at0015 = ╱ec╱,╱ // 0x2ebb @0x15
0x2ea6…2ec1 at0016 = ╱4b╱K╱ // 0x2ebc @0x16
0x2ea6…2ec1 at0017 = ╱36╱6╱ // 0x2ebd @0x17
0x2ea6…2ec1 at0018 = ╱ef╱$╱ // 0x2ebe @0x18
0x2ea6…2ec1 at0019 = ╱ee╱)╱ // 0x2ebf @0x19
0x2ea6…2ec1 at001a = EOL // 0x2ec0 @0x1a
0x2ea6…2ec1 }
0x2ec1…2ec8 bc1f 4570 NEXT J
0x2ec1…2ec8 LineComalBin {
0x2ec1…2ec8 ptr = 0xbc1f // 0x2ec1 @0x0
0x2ec1…2ec8 lno = 0x11da // 0x2ec3 @0x2
0x2ec1…2ec8 at0004 = ╱84╱ NEXT ╱ // 0x2ec5 @0x4
0x2ec1…2ec8 at0005 = ╱4a╱J╱ // 0x2ec6 @0x5
0x2ec1…2ec8 at0006 = EOL // 0x2ec7 @0x6
0x2ec1…2ec8 }
0x2ec8…2ed7 bc2e 4580 I=I+4
0x2ec8…2ed7 LineComalBin {
0x2ec8…2ed7 ptr = 0xbc2e // 0x2ec8 @0x0
0x2ec8…2ed7 lno = 0x11e4 // 0x2eca @0x2
0x2ec8…2ed7 at0004 = ╱49╱I╱ // 0x2ecc @0x4
0x2ec8…2ed7 at0005 = ╱dc╱=╱ // 0x2ecd @0x5
0x2ec8…2ed7 at0006 = ╱49╱I╱ // 0x2ece @0x6
0x2ec8…2ed7 at0007 = ╱e2╱+╱ // 0x2ecf @0x7
0x2ec8…2ed7 at0008 = ╱34╱4╱ // 0x2ed0 @0x8
0x2ec8…2ed7 at0009 = ╱fe00008003╱ // 0x2ed1 @0x9
0x2ec8…2ed7 at000e = EOL // 0x2ed6 @0xe
0x2ec8…2ed7 }
0x2ed7…2edd bc34 4590 ENDIF
0x2ed7…2edd LineComalBin {
0x2ed7…2edd ptr = 0xbc34 // 0x2ed7 @0x0
0x2ed7…2edd lno = 0x11ee // 0x2ed9 @0x2
0x2ed7…2edd at0004 = ╱9b╱ ENDIF ╱ // 0x2edb @0x4
0x2ed7…2edd at0005 = EOL // 0x2edc @0x5
0x2ed7…2edd }
0x2edd…2eef bc46 4600 EXEC KODE(1)
0x2edd…2eef LineComalBin {
0x2edd…2eef ptr = 0xbc46 // 0x2edd @0x0
0x2edd…2eef lno = 0x11f8 // 0x2edf @0x2
0x2edd…2eef at0004 = ╱9d╱ EXEC ╱ // 0x2ee1 @0x4
0x2edd…2eef at0005 = ╱4b╱K╱ // 0x2ee2 @0x5
0x2edd…2eef at0006 = ╱4f╱O╱ // 0x2ee3 @0x6
0x2edd…2eef at0007 = ╱44╱D╱ // 0x2ee4 @0x7
0x2edd…2eef at0008 = ╱45╱E╱ // 0x2ee5 @0x8
0x2edd…2eef at0009 = ╱ed╱(╱ // 0x2ee6 @0x9
0x2edd…2eef at000a = ╱31╱1╱ // 0x2ee7 @0xa
0x2edd…2eef at000b = ╱fe00008001╱ // 0x2ee8 @0xb
0x2edd…2eef at0010 = ╱ee╱)╱ // 0x2eed @0x10
0x2edd…2eef at0011 = EOL // 0x2eee @0x11
0x2edd…2eef }
0x2eef…2efe bc55 4610 KOD1$=KOD$
0x2eef…2efe LineComalBin {
0x2eef…2efe ptr = 0xbc55 // 0x2eef @0x0
0x2eef…2efe lno = 0x1202 // 0x2ef1 @0x2
0x2eef…2efe at0004 = ╱4b╱K╱ // 0x2ef3 @0x4
0x2eef…2efe at0005 = ╱4f╱O╱ // 0x2ef4 @0x5
0x2eef…2efe at0006 = ╱44╱D╱ // 0x2ef5 @0x6
0x2eef…2efe at0007 = ╱31╱1╱ // 0x2ef6 @0x7
0x2eef…2efe at0008 = ╱ef╱$╱ // 0x2ef7 @0x8
0x2eef…2efe at0009 = ╱dc╱=╱ // 0x2ef8 @0x9
0x2eef…2efe at000a = ╱4b╱K╱ // 0x2ef9 @0xa
0x2eef…2efe at000b = ╱4f╱O╱ // 0x2efa @0xb
0x2eef…2efe at000c = ╱44╱D╱ // 0x2efb @0xc
0x2eef…2efe at000d = ╱ef╱$╱ // 0x2efc @0xd
0x2eef…2efe at000e = EOL // 0x2efd @0xe
0x2eef…2efe }
0x2efe…2f17 bc6e 4620 FOR LINIE=1 TO AVALIN
0x2efe…2f17 LineComalBin {
0x2efe…2f17 ptr = 0xbc6e // 0x2efe @0x0
0x2efe…2f17 lno = 0x120c // 0x2f00 @0x2
0x2efe…2f17 at0004 = ╱83╱ FOR ╱ // 0x2f02 @0x4
0x2efe…2f17 at0005 = ╱4c╱L╱ // 0x2f03 @0x5
0x2efe…2f17 at0006 = ╱49╱I╱ // 0x2f04 @0x6
0x2efe…2f17 at0007 = ╱4e╱N╱ // 0x2f05 @0x7
0x2efe…2f17 at0008 = ╱49╱I╱ // 0x2f06 @0x8
0x2efe…2f17 at0009 = ╱45╱E╱ // 0x2f07 @0x9
0x2efe…2f17 at000a = ╱dc╱=╱ // 0x2f08 @0xa
0x2efe…2f17 at000b = ╱31╱1╱ // 0x2f09 @0xb
0x2efe…2f17 at000c = ╱fe00008001╱ // 0x2f0a @0xc
0x2efe…2f17 at0011 = ╱b7╱ TO ╱ // 0x2f0f @0x11
0x2efe…2f17 at0012 = ╱41╱A╱ // 0x2f10 @0x12
0x2efe…2f17 at0013 = ╱56╱V╱ // 0x2f11 @0x13
0x2efe…2f17 at0014 = ╱41╱A╱ // 0x2f12 @0x14
0x2efe…2f17 at0015 = ╱4c╱L╱ // 0x2f13 @0x15
0x2efe…2f17 at0016 = ╱49╱I╱ // 0x2f14 @0x16
0x2efe…2f17 at0017 = ╱4e╱N╱ // 0x2f15 @0x17
0x2efe…2f17 at0018 = EOL // 0x2f16 @0x18
0x2efe…2f17 }
0x2f17…2f2a bc81 4630 J=LINIE+1
0x2f17…2f2a LineComalBin {
0x2f17…2f2a ptr = 0xbc81 // 0x2f17 @0x0
0x2f17…2f2a lno = 0x1216 // 0x2f19 @0x2
0x2f17…2f2a at0004 = ╱4a╱J╱ // 0x2f1b @0x4
0x2f17…2f2a at0005 = ╱dc╱=╱ // 0x2f1c @0x5
0x2f17…2f2a at0006 = ╱4c╱L╱ // 0x2f1d @0x6
0x2f17…2f2a at0007 = ╱49╱I╱ // 0x2f1e @0x7
0x2f17…2f2a at0008 = ╱4e╱N╱ // 0x2f1f @0x8
0x2f17…2f2a at0009 = ╱49╱I╱ // 0x2f20 @0x9
0x2f17…2f2a at000a = ╱45╱E╱ // 0x2f21 @0xa
0x2f17…2f2a at000b = ╱e2╱+╱ // 0x2f22 @0xb
0x2f17…2f2a at000c = ╱31╱1╱ // 0x2f23 @0xc
0x2f17…2f2a at000d = ╱fe00008001╱ // 0x2f24 @0xd
0x2f17…2f2a at0012 = EOL // 0x2f29 @0x12
0x2f17…2f2a }
0x2f2a…2f37 bc8e 4640 EXEC KODE(J)
0x2f2a…2f37 LineComalBin {
0x2f2a…2f37 ptr = 0xbc8e // 0x2f2a @0x0
0x2f2a…2f37 lno = 0x1220 // 0x2f2c @0x2
0x2f2a…2f37 at0004 = ╱9d╱ EXEC ╱ // 0x2f2e @0x4
0x2f2a…2f37 at0005 = ╱4b╱K╱ // 0x2f2f @0x5
0x2f2a…2f37 at0006 = ╱4f╱O╱ // 0x2f30 @0x6
0x2f2a…2f37 at0007 = ╱44╱D╱ // 0x2f31 @0x7
0x2f2a…2f37 at0008 = ╱45╱E╱ // 0x2f32 @0x8
0x2f2a…2f37 at0009 = ╱ed╱(╱ // 0x2f33 @0x9
0x2f2a…2f37 at000a = ╱4a╱J╱ // 0x2f34 @0xa
0x2f2a…2f37 at000b = ╱ee╱)╱ // 0x2f35 @0xb
0x2f2a…2f37 at000c = EOL // 0x2f36 @0xc
0x2f2a…2f37 }
0x2f37…2f44 bc9b 4650 CASE KOD1$ OF
0x2f37…2f44 LineComalBin {
0x2f37…2f44 ptr = 0xbc9b // 0x2f37 @0x0
0x2f37…2f44 lno = 0x122a // 0x2f39 @0x2
0x2f37…2f44 at0004 = ╱a200╱ CASE ╱ // 0x2f3b @0x4
0x2f37…2f44 at0006 = ╱4b╱K╱ // 0x2f3d @0x6
0x2f37…2f44 at0007 = ╱4f╱O╱ // 0x2f3e @0x7
0x2f37…2f44 at0008 = ╱44╱D╱ // 0x2f3f @0x8
0x2f37…2f44 at0009 = ╱31╱1╱ // 0x2f40 @0x9
0x2f37…2f44 at000a = ╱ef╱$╱ // 0x2f41 @0xa
0x2f37…2f44 at000b = ╱ba╱ OF ╱ // 0x2f42 @0xb
0x2f37…2f44 at000c = EOL // 0x2f43 @0xc
0x2f37…2f44 }
0x2f44…2f4a bca1 4660 STOP
0x2f44…2f4a LineComalBin {
0x2f44…2f4a ptr = 0xbca1 // 0x2f44 @0x0
0x2f44…2f4a lno = 0x1234 // 0x2f46 @0x2
0x2f44…2f4a at0004 = ╱8d╱ STOP ╱ // 0x2f48 @0x4
0x2f44…2f4a at0005 = EOL // 0x2f49 @0x5
0x2f44…2f4a }
0x2f4a…2f54 bcab 4670 WHEN "A"
0x2f4a…2f54 LineComalBin {
0x2f4a…2f54 ptr = 0xbcab // 0x2f4a @0x0
0x2f4a…2f54 lno = 0x123e // 0x2f4c @0x2
0x2f4a…2f54 at0004 = ╱a300╱ WHEN ╱ // 0x2f4e @0x4
0x2f4a…2f54 at0006 = ╱22╱"╱ // 0x2f50 @0x6
0x2f4a…2f54 at0007 = ╱41╱A╱ // 0x2f51 @0x7
0x2f4a…2f54 at0008 = ╱22╱"╱ // 0x2f52 @0x8
0x2f4a…2f54 at0009 = EOL // 0x2f53 @0x9
0x2f4a…2f54 }
0x2f54…2f62 bcb9 4680 EXEC VALINGEM
0x2f54…2f62 LineComalBin {
0x2f54…2f62 ptr = 0xbcb9 // 0x2f54 @0x0
0x2f54…2f62 lno = 0x1248 // 0x2f56 @0x2
0x2f54…2f62 at0004 = ╱9d╱ EXEC ╱ // 0x2f58 @0x4
0x2f54…2f62 at0005 = ╱56╱V╱ // 0x2f59 @0x5
0x2f54…2f62 at0006 = ╱41╱A╱ // 0x2f5a @0x6
0x2f54…2f62 at0007 = ╱4c╱L╱ // 0x2f5b @0x7
0x2f54…2f62 at0008 = ╱49╱I╱ // 0x2f5c @0x8
0x2f54…2f62 at0009 = ╱4e╱N╱ // 0x2f5d @0x9
0x2f54…2f62 at000a = ╱47╱G╱ // 0x2f5e @0xa
0x2f54…2f62 at000b = ╱45╱E╱ // 0x2f5f @0xb
0x2f54…2f62 at000c = ╱4d╱M╱ // 0x2f60 @0xc
0x2f54…2f62 at000d = EOL // 0x2f61 @0xd
0x2f54…2f62 }
0x2f62…2f6c bcc3 4690 WHEN "B"
0x2f62…2f6c LineComalBin {
0x2f62…2f6c ptr = 0xbcc3 // 0x2f62 @0x0
0x2f62…2f6c lno = 0x1252 // 0x2f64 @0x2
0x2f62…2f6c at0004 = ╱a300╱ WHEN ╱ // 0x2f66 @0x4
0x2f62…2f6c at0006 = ╱22╱"╱ // 0x2f68 @0x6
0x2f62…2f6c at0007 = ╱42╱B╱ // 0x2f69 @0x7
0x2f62…2f6c at0008 = ╱22╱"╱ // 0x2f6a @0x8
0x2f62…2f6c at0009 = EOL // 0x2f6b @0x9
0x2f62…2f6c }
0x2f6c…2f8e bce5 4700 VATEKARR$(LINIE,13)=KOD$
0x2f6c…2f8e LineComalBin {
0x2f6c…2f8e ptr = 0xbce5 // 0x2f6c @0x0
0x2f6c…2f8e lno = 0x125c // 0x2f6e @0x2
0x2f6c…2f8e at0004 = ╱56╱V╱ // 0x2f70 @0x4
0x2f6c…2f8e at0005 = ╱41╱A╱ // 0x2f71 @0x5
0x2f6c…2f8e at0006 = ╱54╱T╱ // 0x2f72 @0x6
0x2f6c…2f8e at0007 = ╱45╱E╱ // 0x2f73 @0x7
0x2f6c…2f8e at0008 = ╱4b╱K╱ // 0x2f74 @0x8
0x2f6c…2f8e at0009 = ╱41╱A╱ // 0x2f75 @0x9
0x2f6c…2f8e at000a = ╱52╱R╱ // 0x2f76 @0xa
0x2f6c…2f8e at000b = ╱52╱R╱ // 0x2f77 @0xb
0x2f6c…2f8e at000c = ╱ef╱$╱ // 0x2f78 @0xc
0x2f6c…2f8e at000d = ╱ed╱(╱ // 0x2f79 @0xd
0x2f6c…2f8e at000e = ╱4c╱L╱ // 0x2f7a @0xe
0x2f6c…2f8e at000f = ╱49╱I╱ // 0x2f7b @0xf
0x2f6c…2f8e at0010 = ╱4e╱N╱ // 0x2f7c @0x10
0x2f6c…2f8e at0011 = ╱49╱I╱ // 0x2f7d @0x11
0x2f6c…2f8e at0012 = ╱45╱E╱ // 0x2f7e @0x12
0x2f6c…2f8e at0013 = ╱ec╱,╱ // 0x2f7f @0x13
0x2f6c…2f8e at0014 = ╱31╱1╱ // 0x2f80 @0x14
0x2f6c…2f8e at0015 = ╱33╱3╱ // 0x2f81 @0x15
0x2f6c…2f8e at0016 = ╱fe0000d004╱ // 0x2f82 @0x16
0x2f6c…2f8e at001b = ╱ee╱)╱ // 0x2f87 @0x1b
0x2f6c…2f8e at001c = ╱dc╱=╱ // 0x2f88 @0x1c
0x2f6c…2f8e at001d = ╱4b╱K╱ // 0x2f89 @0x1d
0x2f6c…2f8e at001e = ╱4f╱O╱ // 0x2f8a @0x1e
0x2f6c…2f8e at001f = ╱44╱D╱ // 0x2f8b @0x1f
0x2f6c…2f8e at0020 = ╱ef╱$╱ // 0x2f8c @0x20
0x2f6c…2f8e at0021 = EOL // 0x2f8d @0x21
0x2f6c…2f8e }
0x2f8e…2fb9 bd10 4710 PUT K6$,I:VATEKARR$(LINIE,1:13)
0x2f8e…2fb9 LineComalBin {
0x2f8e…2fb9 ptr = 0xbd10 // 0x2f8e @0x0
0x2f8e…2fb9 lno = 0x1266 // 0x2f90 @0x2
0x2f8e…2fb9 at0004 = ╱aa╱ PUT ╱ // 0x2f92 @0x4
0x2f8e…2fb9 at0005 = ╱4b╱K╱ // 0x2f93 @0x5
0x2f8e…2fb9 at0006 = ╱36╱6╱ // 0x2f94 @0x6
0x2f8e…2fb9 at0007 = ╱ef╱$╱ // 0x2f95 @0x7
0x2f8e…2fb9 at0008 = ╱ec╱,╱ // 0x2f96 @0x8
0x2f8e…2fb9 at0009 = ╱49╱I╱ // 0x2f97 @0x9
0x2f8e…2fb9 at000a = ╱f0╱:╱ // 0x2f98 @0xa
0x2f8e…2fb9 at000b = ╱56╱V╱ // 0x2f99 @0xb
0x2f8e…2fb9 at000c = ╱41╱A╱ // 0x2f9a @0xc
0x2f8e…2fb9 at000d = ╱54╱T╱ // 0x2f9b @0xd
0x2f8e…2fb9 at000e = ╱45╱E╱ // 0x2f9c @0xe
0x2f8e…2fb9 at000f = ╱4b╱K╱ // 0x2f9d @0xf
0x2f8e…2fb9 at0010 = ╱41╱A╱ // 0x2f9e @0x10
0x2f8e…2fb9 at0011 = ╱52╱R╱ // 0x2f9f @0x11
0x2f8e…2fb9 at0012 = ╱52╱R╱ // 0x2fa0 @0x12
0x2f8e…2fb9 at0013 = ╱ef╱$╱ // 0x2fa1 @0x13
0x2f8e…2fb9 at0014 = ╱ed╱(╱ // 0x2fa2 @0x14
0x2f8e…2fb9 at0015 = ╱4c╱L╱ // 0x2fa3 @0x15
0x2f8e…2fb9 at0016 = ╱49╱I╱ // 0x2fa4 @0x16
0x2f8e…2fb9 at0017 = ╱4e╱N╱ // 0x2fa5 @0x17
0x2f8e…2fb9 at0018 = ╱49╱I╱ // 0x2fa6 @0x18
0x2f8e…2fb9 at0019 = ╱45╱E╱ // 0x2fa7 @0x19
0x2f8e…2fb9 at001a = ╱ec╱,╱ // 0x2fa8 @0x1a
0x2f8e…2fb9 at001b = ╱31╱1╱ // 0x2fa9 @0x1b
0x2f8e…2fb9 at001c = ╱fe00008001╱ // 0x2faa @0x1c
0x2f8e…2fb9 at0021 = ╱f0╱:╱ // 0x2faf @0x21
0x2f8e…2fb9 at0022 = ╱31╱1╱ // 0x2fb0 @0x22
0x2f8e…2fb9 at0023 = ╱33╱3╱ // 0x2fb1 @0x23
0x2f8e…2fb9 at0024 = ╱fe0000d004╱ // 0x2fb2 @0x24
0x2f8e…2fb9 at0029 = ╱ee╱)╱ // 0x2fb7 @0x29
0x2f8e…2fb9 at002a = EOL // 0x2fb8 @0x2a
0x2f8e…2fb9 }
0x2fb9…2fd4 bd2b 4720 EXEC FE(3,9,K6$)
0x2fb9…2fd4 LineComalBin {
0x2fb9…2fd4 ptr = 0xbd2b // 0x2fb9 @0x0
0x2fb9…2fd4 lno = 0x1270 // 0x2fbb @0x2
0x2fb9…2fd4 at0004 = ╱9d╱ EXEC ╱ // 0x2fbd @0x4
0x2fb9…2fd4 at0005 = ╱46╱F╱ // 0x2fbe @0x5
0x2fb9…2fd4 at0006 = ╱45╱E╱ // 0x2fbf @0x6
0x2fb9…2fd4 at0007 = ╱ed╱(╱ // 0x2fc0 @0x7
0x2fb9…2fd4 at0008 = ╱33╱3╱ // 0x2fc1 @0x8
0x2fb9…2fd4 at0009 = ╱fe0000c002╱ // 0x2fc2 @0x9
0x2fb9…2fd4 at000e = ╱ec╱,╱ // 0x2fc7 @0xe
0x2fb9…2fd4 at000f = ╱39╱9╱ // 0x2fc8 @0xf
0x2fb9…2fd4 at0010 = ╱fe00009004╱ // 0x2fc9 @0x10
0x2fb9…2fd4 at0015 = ╱ec╱,╱ // 0x2fce @0x15
0x2fb9…2fd4 at0016 = ╱4b╱K╱ // 0x2fcf @0x16
0x2fb9…2fd4 at0017 = ╱36╱6╱ // 0x2fd0 @0x17
0x2fb9…2fd4 at0018 = ╱ef╱$╱ // 0x2fd1 @0x18
0x2fb9…2fd4 at0019 = ╱ee╱)╱ // 0x2fd2 @0x19
0x2fb9…2fd4 at001a = EOL // 0x2fd3 @0x1a
0x2fb9…2fd4 }
0x2fd4…2fe3 bd3a 4730 I=I+1
0x2fd4…2fe3 LineComalBin {
0x2fd4…2fe3 ptr = 0xbd3a // 0x2fd4 @0x0
0x2fd4…2fe3 lno = 0x127a // 0x2fd6 @0x2
0x2fd4…2fe3 at0004 = ╱49╱I╱ // 0x2fd8 @0x4
0x2fd4…2fe3 at0005 = ╱dc╱=╱ // 0x2fd9 @0x5
0x2fd4…2fe3 at0006 = ╱49╱I╱ // 0x2fda @0x6
0x2fd4…2fe3 at0007 = ╱e2╱+╱ // 0x2fdb @0x7
0x2fd4…2fe3 at0008 = ╱31╱1╱ // 0x2fdc @0x8
0x2fd4…2fe3 at0009 = ╱fe00008001╱ // 0x2fdd @0x9
0x2fd4…2fe3 at000e = EOL // 0x2fe2 @0xe
0x2fd4…2fe3 }
0x2fe3…2fed bd44 4740 WHEN "C"
0x2fe3…2fed LineComalBin {
0x2fe3…2fed ptr = 0xbd44 // 0x2fe3 @0x0
0x2fe3…2fed lno = 0x1284 // 0x2fe5 @0x2
0x2fe3…2fed at0004 = ╱a300╱ WHEN ╱ // 0x2fe7 @0x4
0x2fe3…2fed at0006 = ╱22╱"╱ // 0x2fe9 @0x6
0x2fe3…2fed at0007 = ╱43╱C╱ // 0x2fea @0x7
0x2fe3…2fed at0008 = ╱22╱"╱ // 0x2feb @0x8
0x2fe3…2fed at0009 = EOL // 0x2fec @0x9
0x2fe3…2fed }
0x2fed…300c bd63 4750 EXEC ELØBGEM(BELØBARR$(LINIE))
0x2fed…300c LineComalBin {
0x2fed…300c ptr = 0xbd63 // 0x2fed @0x0
0x2fed…300c lno = 0x128e // 0x2fef @0x2
0x2fed…300c at0004 = ╱9d╱ EXEC ╱ // 0x2ff1 @0x4
0x2fed…300c at0005 = ╱45╱E╱ // 0x2ff2 @0x5
0x2fed…300c at0006 = ╱4c╱L╱ // 0x2ff3 @0x6
0x2fed…300c at0007 = ╱5c╱Ø╱ // 0x2ff4 @0x7
0x2fed…300c at0008 = ╱42╱B╱ // 0x2ff5 @0x8
0x2fed…300c at0009 = ╱47╱G╱ // 0x2ff6 @0x9
0x2fed…300c at000a = ╱45╱E╱ // 0x2ff7 @0xa
0x2fed…300c at000b = ╱4d╱M╱ // 0x2ff8 @0xb
0x2fed…300c at000c = ╱ed╱(╱ // 0x2ff9 @0xc
0x2fed…300c at000d = ╱42╱B╱ // 0x2ffa @0xd
0x2fed…300c at000e = ╱45╱E╱ // 0x2ffb @0xe
0x2fed…300c at000f = ╱4c╱L╱ // 0x2ffc @0xf
0x2fed…300c at0010 = ╱5c╱Ø╱ // 0x2ffd @0x10
0x2fed…300c at0011 = ╱42╱B╱ // 0x2ffe @0x11
0x2fed…300c at0012 = ╱41╱A╱ // 0x2fff @0x12
0x2fed…300c at0013 = ╱52╱R╱ // 0x3000 @0x13
0x2fed…300c at0014 = ╱52╱R╱ // 0x3001 @0x14
0x2fed…300c at0015 = ╱ef╱$╱ // 0x3002 @0x15
0x2fed…300c at0016 = ╱ed╱(╱ // 0x3003 @0x16
0x2fed…300c at0017 = ╱4c╱L╱ // 0x3004 @0x17
0x2fed…300c at0018 = ╱49╱I╱ // 0x3005 @0x18
0x2fed…300c at0019 = ╱4e╱N╱ // 0x3006 @0x19
0x2fed…300c at001a = ╱49╱I╱ // 0x3007 @0x1a
0x2fed…300c at001b = ╱45╱E╱ // 0x3008 @0x1b
0x2fed…300c at001c = ╱ee╱)╱ // 0x3009 @0x1c
0x2fed…300c at001d = ╱ee╱)╱ // 0x300a @0x1d
0x2fed…300c at001e = EOL // 0x300b @0x1e
0x2fed…300c }
0x300c…3016 bd6d 4760 WHEN "D"
0x300c…3016 LineComalBin {
0x300c…3016 ptr = 0xbd6d // 0x300c @0x0
0x300c…3016 lno = 0x1298 // 0x300e @0x2
0x300c…3016 at0004 = ╱a300╱ WHEN ╱ // 0x3010 @0x4
0x300c…3016 at0006 = ╱22╱"╱ // 0x3012 @0x6
0x300c…3016 at0007 = ╱44╱D╱ // 0x3013 @0x7
0x300c…3016 at0008 = ╱22╱"╱ // 0x3014 @0x8
0x300c…3016 at0009 = EOL // 0x3015 @0x9
0x300c…3016 }
0x3016…3024 bd7b 4770 EXEC TEKSTGEM
0x3016…3024 LineComalBin {
0x3016…3024 ptr = 0xbd7b // 0x3016 @0x0
0x3016…3024 lno = 0x12a2 // 0x3018 @0x2
0x3016…3024 at0004 = ╱9d╱ EXEC ╱ // 0x301a @0x4
0x3016…3024 at0005 = ╱54╱T╱ // 0x301b @0x5
0x3016…3024 at0006 = ╱45╱E╱ // 0x301c @0x6
0x3016…3024 at0007 = ╱4b╱K╱ // 0x301d @0x7
0x3016…3024 at0008 = ╱53╱S╱ // 0x301e @0x8
0x3016…3024 at0009 = ╱54╱T╱ // 0x301f @0x9
0x3016…3024 at000a = ╱47╱G╱ // 0x3020 @0xa
0x3016…3024 at000b = ╱45╱E╱ // 0x3021 @0xb
0x3016…3024 at000c = ╱4d╱M╱ // 0x3022 @0xc
0x3016…3024 at000d = EOL // 0x3023 @0xd
0x3016…3024 }
0x3024…302e bd85 4780 WHEN "E"
0x3024…302e LineComalBin {
0x3024…302e ptr = 0xbd85 // 0x3024 @0x0
0x3024…302e lno = 0x12ac // 0x3026 @0x2
0x3024…302e at0004 = ╱a300╱ WHEN ╱ // 0x3028 @0x4
0x3024…302e at0006 = ╱22╱"╱ // 0x302a @0x6
0x3024…302e at0007 = ╱45╱E╱ // 0x302b @0x7
0x3024…302e at0008 = ╱22╱"╱ // 0x302c @0x8
0x3024…302e at0009 = EOL // 0x302d @0x9
0x3024…302e }
0x302e…303c bd93 4790 EXEC TEKSTGEM
0x302e…303c LineComalBin {
0x302e…303c ptr = 0xbd93 // 0x302e @0x0
0x302e…303c lno = 0x12b6 // 0x3030 @0x2
0x302e…303c at0004 = ╱9d╱ EXEC ╱ // 0x3032 @0x4
0x302e…303c at0005 = ╱54╱T╱ // 0x3033 @0x5
0x302e…303c at0006 = ╱45╱E╱ // 0x3034 @0x6
0x302e…303c at0007 = ╱4b╱K╱ // 0x3035 @0x7
0x302e…303c at0008 = ╱53╱S╱ // 0x3036 @0x8
0x302e…303c at0009 = ╱54╱T╱ // 0x3037 @0x9
0x302e…303c at000a = ╱47╱G╱ // 0x3038 @0xa
0x302e…303c at000b = ╱45╱E╱ // 0x3039 @0xb
0x302e…303c at000c = ╱4d╱M╱ // 0x303a @0xc
0x302e…303c at000d = EOL // 0x303b @0xd
0x302e…303c }
0x303c…305b bdb2 4800 EXEC ELØBGEM(BELØBARR$(LINIE))
0x303c…305b LineComalBin {
0x303c…305b ptr = 0xbdb2 // 0x303c @0x0
0x303c…305b lno = 0x12c0 // 0x303e @0x2
0x303c…305b at0004 = ╱9d╱ EXEC ╱ // 0x3040 @0x4
0x303c…305b at0005 = ╱45╱E╱ // 0x3041 @0x5
0x303c…305b at0006 = ╱4c╱L╱ // 0x3042 @0x6
0x303c…305b at0007 = ╱5c╱Ø╱ // 0x3043 @0x7
0x303c…305b at0008 = ╱42╱B╱ // 0x3044 @0x8
0x303c…305b at0009 = ╱47╱G╱ // 0x3045 @0x9
0x303c…305b at000a = ╱45╱E╱ // 0x3046 @0xa
0x303c…305b at000b = ╱4d╱M╱ // 0x3047 @0xb
0x303c…305b at000c = ╱ed╱(╱ // 0x3048 @0xc
0x303c…305b at000d = ╱42╱B╱ // 0x3049 @0xd
0x303c…305b at000e = ╱45╱E╱ // 0x304a @0xe
0x303c…305b at000f = ╱4c╱L╱ // 0x304b @0xf
0x303c…305b at0010 = ╱5c╱Ø╱ // 0x304c @0x10
0x303c…305b at0011 = ╱42╱B╱ // 0x304d @0x11
0x303c…305b at0012 = ╱41╱A╱ // 0x304e @0x12
0x303c…305b at0013 = ╱52╱R╱ // 0x304f @0x13
0x303c…305b at0014 = ╱52╱R╱ // 0x3050 @0x14
0x303c…305b at0015 = ╱ef╱$╱ // 0x3051 @0x15
0x303c…305b at0016 = ╱ed╱(╱ // 0x3052 @0x16
0x303c…305b at0017 = ╱4c╱L╱ // 0x3053 @0x17
0x303c…305b at0018 = ╱49╱I╱ // 0x3054 @0x18
0x303c…305b at0019 = ╱4e╱N╱ // 0x3055 @0x19
0x303c…305b at001a = ╱49╱I╱ // 0x3056 @0x1a
0x303c…305b at001b = ╱45╱E╱ // 0x3057 @0x1b
0x303c…305b at001c = ╱ee╱)╱ // 0x3058 @0x1c
0x303c…305b at001d = ╱ee╱)╱ // 0x3059 @0x1d
0x303c…305b at001e = EOL // 0x305a @0x1e
0x303c…305b }
0x305b…3065 bdbc 4810 WHEN "F"
0x305b…3065 LineComalBin {
0x305b…3065 ptr = 0xbdbc // 0x305b @0x0
0x305b…3065 lno = 0x12ca // 0x305d @0x2
0x305b…3065 at0004 = ╱a300╱ WHEN ╱ // 0x305f @0x4
0x305b…3065 at0006 = ╱22╱"╱ // 0x3061 @0x6
0x305b…3065 at0007 = ╱46╱F╱ // 0x3062 @0x7
0x305b…3065 at0008 = ╱22╱"╱ // 0x3063 @0x8
0x305b…3065 at0009 = EOL // 0x3064 @0x9
0x305b…3065 }
0x3065…3073 bdca 4820 EXEC VALINGEM
0x3065…3073 LineComalBin {
0x3065…3073 ptr = 0xbdca // 0x3065 @0x0
0x3065…3073 lno = 0x12d4 // 0x3067 @0x2
0x3065…3073 at0004 = ╱9d╱ EXEC ╱ // 0x3069 @0x4
0x3065…3073 at0005 = ╱56╱V╱ // 0x306a @0x5
0x3065…3073 at0006 = ╱41╱A╱ // 0x306b @0x6
0x3065…3073 at0007 = ╱4c╱L╱ // 0x306c @0x7
0x3065…3073 at0008 = ╱49╱I╱ // 0x306d @0x8
0x3065…3073 at0009 = ╱4e╱N╱ // 0x306e @0x9
0x3065…3073 at000a = ╱47╱G╱ // 0x306f @0xa
0x3065…3073 at000b = ╱45╱E╱ // 0x3070 @0xb
0x3065…3073 at000c = ╱4d╱M╱ // 0x3071 @0xc
0x3065…3073 at000d = EOL // 0x3072 @0xd
0x3065…3073 }
0x3073…3092 bde9 4830 EXEC ELØBGEM(VAPRIARR$(LINIE))
0x3073…3092 LineComalBin {
0x3073…3092 ptr = 0xbde9 // 0x3073 @0x0
0x3073…3092 lno = 0x12de // 0x3075 @0x2
0x3073…3092 at0004 = ╱9d╱ EXEC ╱ // 0x3077 @0x4
0x3073…3092 at0005 = ╱45╱E╱ // 0x3078 @0x5
0x3073…3092 at0006 = ╱4c╱L╱ // 0x3079 @0x6
0x3073…3092 at0007 = ╱5c╱Ø╱ // 0x307a @0x7
0x3073…3092 at0008 = ╱42╱B╱ // 0x307b @0x8
0x3073…3092 at0009 = ╱47╱G╱ // 0x307c @0x9
0x3073…3092 at000a = ╱45╱E╱ // 0x307d @0xa
0x3073…3092 at000b = ╱4d╱M╱ // 0x307e @0xb
0x3073…3092 at000c = ╱ed╱(╱ // 0x307f @0xc
0x3073…3092 at000d = ╱56╱V╱ // 0x3080 @0xd
0x3073…3092 at000e = ╱41╱A╱ // 0x3081 @0xe
0x3073…3092 at000f = ╱50╱P╱ // 0x3082 @0xf
0x3073…3092 at0010 = ╱52╱R╱ // 0x3083 @0x10
0x3073…3092 at0011 = ╱49╱I╱ // 0x3084 @0x11
0x3073…3092 at0012 = ╱41╱A╱ // 0x3085 @0x12
0x3073…3092 at0013 = ╱52╱R╱ // 0x3086 @0x13
0x3073…3092 at0014 = ╱52╱R╱ // 0x3087 @0x14
0x3073…3092 at0015 = ╱ef╱$╱ // 0x3088 @0x15
0x3073…3092 at0016 = ╱ed╱(╱ // 0x3089 @0x16
0x3073…3092 at0017 = ╱4c╱L╱ // 0x308a @0x17
0x3073…3092 at0018 = ╱49╱I╱ // 0x308b @0x18
0x3073…3092 at0019 = ╱4e╱N╱ // 0x308c @0x19
0x3073…3092 at001a = ╱49╱I╱ // 0x308d @0x1a
0x3073…3092 at001b = ╱45╱E╱ // 0x308e @0x1b
0x3073…3092 at001c = ╱ee╱)╱ // 0x308f @0x1c
0x3073…3092 at001d = ╱ee╱)╱ // 0x3090 @0x1d
0x3073…3092 at001e = EOL // 0x3091 @0x1e
0x3073…3092 }
0x3092…30a0 bdf7 4840 WHEN "G","H"
0x3092…30a0 LineComalBin {
0x3092…30a0 ptr = 0xbdf7 // 0x3092 @0x0
0x3092…30a0 lno = 0x12e8 // 0x3094 @0x2
0x3092…30a0 at0004 = ╱a300╱ WHEN ╱ // 0x3096 @0x4
0x3092…30a0 at0006 = ╱22╱"╱ // 0x3098 @0x6
0x3092…30a0 at0007 = ╱47╱G╱ // 0x3099 @0x7
0x3092…30a0 at0008 = ╱22╱"╱ // 0x309a @0x8
0x3092…30a0 at0009 = ╱ec╱,╱ // 0x309b @0x9
0x3092…30a0 at000a = ╱22╱"╱ // 0x309c @0xa
0x3092…30a0 at000b = ╱48╱H╱ // 0x309d @0xb
0x3092…30a0 at000c = ╱22╱"╱ // 0x309e @0xc
0x3092…30a0 at000d = EOL // 0x309f @0xd
0x3092…30a0 }
0x30a0…30ae be05 4850 EXEC TEKSTGEM
0x30a0…30ae LineComalBin {
0x30a0…30ae ptr = 0xbe05 // 0x30a0 @0x0
0x30a0…30ae lno = 0x12f2 // 0x30a2 @0x2
0x30a0…30ae at0004 = ╱9d╱ EXEC ╱ // 0x30a4 @0x4
0x30a0…30ae at0005 = ╱54╱T╱ // 0x30a5 @0x5
0x30a0…30ae at0006 = ╱45╱E╱ // 0x30a6 @0x6
0x30a0…30ae at0007 = ╱4b╱K╱ // 0x30a7 @0x7
0x30a0…30ae at0008 = ╱53╱S╱ // 0x30a8 @0x8
0x30a0…30ae at0009 = ╱54╱T╱ // 0x30a9 @0x9
0x30a0…30ae at000a = ╱47╱G╱ // 0x30aa @0xa
0x30a0…30ae at000b = ╱45╱E╱ // 0x30ab @0xb
0x30a0…30ae at000c = ╱4d╱M╱ // 0x30ac @0xc
0x30a0…30ae at000d = EOL // 0x30ad @0xd
0x30a0…30ae }
0x30ae…30bc be13 4860 EXEC VALINGEM
0x30ae…30bc LineComalBin {
0x30ae…30bc ptr = 0xbe13 // 0x30ae @0x0
0x30ae…30bc lno = 0x12fc // 0x30b0 @0x2
0x30ae…30bc at0004 = ╱9d╱ EXEC ╱ // 0x30b2 @0x4
0x30ae…30bc at0005 = ╱56╱V╱ // 0x30b3 @0x5
0x30ae…30bc at0006 = ╱41╱A╱ // 0x30b4 @0x6
0x30ae…30bc at0007 = ╱4c╱L╱ // 0x30b5 @0x7
0x30ae…30bc at0008 = ╱49╱I╱ // 0x30b6 @0x8
0x30ae…30bc at0009 = ╱4e╱N╱ // 0x30b7 @0x9
0x30ae…30bc at000a = ╱47╱G╱ // 0x30b8 @0xa
0x30ae…30bc at000b = ╱45╱E╱ // 0x30b9 @0xb
0x30ae…30bc at000c = ╱4d╱M╱ // 0x30ba @0xc
0x30ae…30bc at000d = EOL // 0x30bb @0xd
0x30ae…30bc }
0x30bc…30cc be23 4870 IF KOD1$="H" THEN
0x30bc…30cc LineComalBin {
0x30bc…30cc ptr = 0xbe23 // 0x30bc @0x0
0x30bc…30cc lno = 0x1306 // 0x30be @0x2
0x30bc…30cc at0004 = ╱9c╱ IF ╱ // 0x30c0 @0x4
0x30bc…30cc at0005 = ╱4b╱K╱ // 0x30c1 @0x5
0x30bc…30cc at0006 = ╱4f╱O╱ // 0x30c2 @0x6
0x30bc…30cc at0007 = ╱44╱D╱ // 0x30c3 @0x7
0x30bc…30cc at0008 = ╱31╱1╱ // 0x30c4 @0x8
0x30bc…30cc at0009 = ╱ef╱$╱ // 0x30c5 @0x9
0x30bc…30cc at000a = ╱dc╱=╱ // 0x30c6 @0xa
0x30bc…30cc at000b = ╱22╱"╱ // 0x30c7 @0xb
0x30bc…30cc at000c = ╱48╱H╱ // 0x30c8 @0xc
0x30bc…30cc at000d = ╱22╱"╱ // 0x30c9 @0xd
0x30bc…30cc at000e = ╱b6╱ THEN ╱ // 0x30ca @0xe
0x30bc…30cc at000f = EOL // 0x30cb @0xf
0x30bc…30cc }
0x30cc…30eb be42 4880 EXEC ELØBGEM(VAPRIARR$(LINIE))
0x30cc…30eb LineComalBin {
0x30cc…30eb ptr = 0xbe42 // 0x30cc @0x0
0x30cc…30eb lno = 0x1310 // 0x30ce @0x2
0x30cc…30eb at0004 = ╱9d╱ EXEC ╱ // 0x30d0 @0x4
0x30cc…30eb at0005 = ╱45╱E╱ // 0x30d1 @0x5
0x30cc…30eb at0006 = ╱4c╱L╱ // 0x30d2 @0x6
0x30cc…30eb at0007 = ╱5c╱Ø╱ // 0x30d3 @0x7
0x30cc…30eb at0008 = ╱42╱B╱ // 0x30d4 @0x8
0x30cc…30eb at0009 = ╱47╱G╱ // 0x30d5 @0x9
0x30cc…30eb at000a = ╱45╱E╱ // 0x30d6 @0xa
0x30cc…30eb at000b = ╱4d╱M╱ // 0x30d7 @0xb
0x30cc…30eb at000c = ╱ed╱(╱ // 0x30d8 @0xc
0x30cc…30eb at000d = ╱56╱V╱ // 0x30d9 @0xd
0x30cc…30eb at000e = ╱41╱A╱ // 0x30da @0xe
0x30cc…30eb at000f = ╱50╱P╱ // 0x30db @0xf
0x30cc…30eb at0010 = ╱52╱R╱ // 0x30dc @0x10
0x30cc…30eb at0011 = ╱49╱I╱ // 0x30dd @0x11
0x30cc…30eb at0012 = ╱41╱A╱ // 0x30de @0x12
0x30cc…30eb at0013 = ╱52╱R╱ // 0x30df @0x13
0x30cc…30eb at0014 = ╱52╱R╱ // 0x30e0 @0x14
0x30cc…30eb at0015 = ╱ef╱$╱ // 0x30e1 @0x15
0x30cc…30eb at0016 = ╱ed╱(╱ // 0x30e2 @0x16
0x30cc…30eb at0017 = ╱4c╱L╱ // 0x30e3 @0x17
0x30cc…30eb at0018 = ╱49╱I╱ // 0x30e4 @0x18
0x30cc…30eb at0019 = ╱4e╱N╱ // 0x30e5 @0x19
0x30cc…30eb at001a = ╱49╱I╱ // 0x30e6 @0x1a
0x30cc…30eb at001b = ╱45╱E╱ // 0x30e7 @0x1b
0x30cc…30eb at001c = ╱ee╱)╱ // 0x30e8 @0x1c
0x30cc…30eb at001d = ╱ee╱)╱ // 0x30e9 @0x1d
0x30cc…30eb at001e = EOL // 0x30ea @0x1e
0x30cc…30eb }
0x30eb…30f1 be48 4890 ENDIF
0x30eb…30f1 LineComalBin {
0x30eb…30f1 ptr = 0xbe48 // 0x30eb @0x0
0x30eb…30f1 lno = 0x131a // 0x30ed @0x2
0x30eb…30f1 at0004 = ╱9b╱ ENDIF ╱ // 0x30ef @0x4
0x30eb…30f1 at0005 = EOL // 0x30f0 @0x5
0x30eb…30f1 }
0x30f1…30f7 be4e 4900 ENDCASE
0x30f1…30f7 LineComalBin {
0x30f1…30f7 ptr = 0xbe4e // 0x30f1 @0x0
0x30f1…30f7 lno = 0x1324 // 0x30f3 @0x2
0x30f1…30f7 at0004 = ╱a4╱ ENDCASE ╱ // 0x30f5 @0x4
0x30f1…30f7 at0005 = EOL // 0x30f6 @0x5
0x30f1…30f7 }
0x30f7…3106 be5d 4910 KOD1$=KOD$
0x30f7…3106 LineComalBin {
0x30f7…3106 ptr = 0xbe5d // 0x30f7 @0x0
0x30f7…3106 lno = 0x132e // 0x30f9 @0x2
0x30f7…3106 at0004 = ╱4b╱K╱ // 0x30fb @0x4
0x30f7…3106 at0005 = ╱4f╱O╱ // 0x30fc @0x5
0x30f7…3106 at0006 = ╱44╱D╱ // 0x30fd @0x6
0x30f7…3106 at0007 = ╱31╱1╱ // 0x30fe @0x7
0x30f7…3106 at0008 = ╱ef╱$╱ // 0x30ff @0x8
0x30f7…3106 at0009 = ╱dc╱=╱ // 0x3100 @0x9
0x30f7…3106 at000a = ╱4b╱K╱ // 0x3101 @0xa
0x30f7…3106 at000b = ╱4f╱O╱ // 0x3102 @0xb
0x30f7…3106 at000c = ╱44╱D╱ // 0x3103 @0xc
0x30f7…3106 at000d = ╱ef╱$╱ // 0x3104 @0xd
0x30f7…3106 at000e = EOL // 0x3105 @0xe
0x30f7…3106 }
0x3106…3111 be68 4920 NEXT LINIE
0x3106…3111 LineComalBin {
0x3106…3111 ptr = 0xbe68 // 0x3106 @0x0
0x3106…3111 lno = 0x1338 // 0x3108 @0x2
0x3106…3111 at0004 = ╱84╱ NEXT ╱ // 0x310a @0x4
0x3106…3111 at0005 = ╱4c╱L╱ // 0x310b @0x5
0x3106…3111 at0006 = ╱49╱I╱ // 0x310c @0x6
0x3106…3111 at0007 = ╱4e╱N╱ // 0x310d @0x7
0x3106…3111 at0008 = ╱49╱I╱ // 0x310e @0x8
0x3106…3111 at0009 = ╱45╱E╱ // 0x310f @0x9
0x3106…3111 at000a = EOL // 0x3110 @0xa
0x3106…3111 }
0x3111…3125 be7c 4930 EXEC ELØBGEM(FORS$)
0x3111…3125 LineComalBin {
0x3111…3125 ptr = 0xbe7c // 0x3111 @0x0
0x3111…3125 lno = 0x1342 // 0x3113 @0x2
0x3111…3125 at0004 = ╱9d╱ EXEC ╱ // 0x3115 @0x4
0x3111…3125 at0005 = ╱45╱E╱ // 0x3116 @0x5
0x3111…3125 at0006 = ╱4c╱L╱ // 0x3117 @0x6
0x3111…3125 at0007 = ╱5c╱Ø╱ // 0x3118 @0x7
0x3111…3125 at0008 = ╱42╱B╱ // 0x3119 @0x8
0x3111…3125 at0009 = ╱47╱G╱ // 0x311a @0x9
0x3111…3125 at000a = ╱45╱E╱ // 0x311b @0xa
0x3111…3125 at000b = ╱4d╱M╱ // 0x311c @0xb
0x3111…3125 at000c = ╱ed╱(╱ // 0x311d @0xc
0x3111…3125 at000d = ╱46╱F╱ // 0x311e @0xd
0x3111…3125 at000e = ╱4f╱O╱ // 0x311f @0xe
0x3111…3125 at000f = ╱52╱R╱ // 0x3120 @0xf
0x3111…3125 at0010 = ╱53╱S╱ // 0x3121 @0x10
0x3111…3125 at0011 = ╱ef╱$╱ // 0x3122 @0x11
0x3111…3125 at0012 = ╱ee╱)╱ // 0x3123 @0x12
0x3111…3125 at0013 = EOL // 0x3124 @0x13
0x3111…3125 }
0x3125…3136 be8d 4940 IF DEBLK$="0" THEN
0x3125…3136 LineComalBin {
0x3125…3136 ptr = 0xbe8d // 0x3125 @0x0
0x3125…3136 lno = 0x134c // 0x3127 @0x2
0x3125…3136 at0004 = ╱9c╱ IF ╱ // 0x3129 @0x4
0x3125…3136 at0005 = ╱44╱D╱ // 0x312a @0x5
0x3125…3136 at0006 = ╱45╱E╱ // 0x312b @0x6
0x3125…3136 at0007 = ╱42╱B╱ // 0x312c @0x7
0x3125…3136 at0008 = ╱4c╱L╱ // 0x312d @0x8
0x3125…3136 at0009 = ╱4b╱K╱ // 0x312e @0x9
0x3125…3136 at000a = ╱ef╱$╱ // 0x312f @0xa
0x3125…3136 at000b = ╱dc╱=╱ // 0x3130 @0xb
0x3125…3136 at000c = ╱22╱"╱ // 0x3131 @0xc
0x3125…3136 at000d = ╱30╱0╱ // 0x3132 @0xd
0x3125…3136 at000e = ╱22╱"╱ // 0x3133 @0xe
0x3125…3136 at000f = ╱b6╱ THEN ╱ // 0x3134 @0xf
0x3125…3136 at0010 = EOL // 0x3135 @0x10
0x3125…3136 }
0x3136…314a bea1 4950 EXEC ELØBGEM(MOMS$)
0x3136…314a LineComalBin {
0x3136…314a ptr = 0xbea1 // 0x3136 @0x0
0x3136…314a lno = 0x1356 // 0x3138 @0x2
0x3136…314a at0004 = ╱9d╱ EXEC ╱ // 0x313a @0x4
0x3136…314a at0005 = ╱45╱E╱ // 0x313b @0x5
0x3136…314a at0006 = ╱4c╱L╱ // 0x313c @0x6
0x3136…314a at0007 = ╱5c╱Ø╱ // 0x313d @0x7
0x3136…314a at0008 = ╱42╱B╱ // 0x313e @0x8
0x3136…314a at0009 = ╱47╱G╱ // 0x313f @0x9
0x3136…314a at000a = ╱45╱E╱ // 0x3140 @0xa
0x3136…314a at000b = ╱4d╱M╱ // 0x3141 @0xb
0x3136…314a at000c = ╱ed╱(╱ // 0x3142 @0xc
0x3136…314a at000d = ╱4d╱M╱ // 0x3143 @0xd
0x3136…314a at000e = ╱4f╱O╱ // 0x3144 @0xe
0x3136…314a at000f = ╱4d╱M╱ // 0x3145 @0xf
0x3136…314a at0010 = ╱53╱S╱ // 0x3146 @0x10
0x3136…314a at0011 = ╱ef╱$╱ // 0x3147 @0x11
0x3136…314a at0012 = ╱ee╱)╱ // 0x3148 @0x12
0x3136…314a at0013 = EOL // 0x3149 @0x13
0x3136…314a }
0x314a…3150 bea7 4960 ELSE
0x314a…3150 LineComalBin {
0x314a…3150 ptr = 0xbea7 // 0x314a @0x0
0x314a…3150 lno = 0x1360 // 0x314c @0x2
0x314a…3150 at0004 = ╱9a╱ ELSE ╱ // 0x314e @0x4
0x314a…3150 at0005 = EOL // 0x314f @0x5
0x314a…3150 }
0x3150…3163 beba 4970 EXEC ELØBGEM(TAH$)
0x3150…3163 LineComalBin {
0x3150…3163 ptr = 0xbeba // 0x3150 @0x0
0x3150…3163 lno = 0x136a // 0x3152 @0x2
0x3150…3163 at0004 = ╱9d╱ EXEC ╱ // 0x3154 @0x4
0x3150…3163 at0005 = ╱45╱E╱ // 0x3155 @0x5
0x3150…3163 at0006 = ╱4c╱L╱ // 0x3156 @0x6
0x3150…3163 at0007 = ╱5c╱Ø╱ // 0x3157 @0x7
0x3150…3163 at0008 = ╱42╱B╱ // 0x3158 @0x8
0x3150…3163 at0009 = ╱47╱G╱ // 0x3159 @0x9
0x3150…3163 at000a = ╱45╱E╱ // 0x315a @0xa
0x3150…3163 at000b = ╱4d╱M╱ // 0x315b @0xb
0x3150…3163 at000c = ╱ed╱(╱ // 0x315c @0xc
0x3150…3163 at000d = ╱54╱T╱ // 0x315d @0xd
0x3150…3163 at000e = ╱41╱A╱ // 0x315e @0xe
0x3150…3163 at000f = ╱48╱H╱ // 0x315f @0xf
0x3150…3163 at0010 = ╱ef╱$╱ // 0x3160 @0x10
0x3150…3163 at0011 = ╱ee╱)╱ // 0x3161 @0x11
0x3150…3163 at0012 = EOL // 0x3162 @0x12
0x3150…3163 }
0x3163…3169 bec0 4980 ENDIF
0x3163…3169 LineComalBin {
0x3163…3169 ptr = 0xbec0 // 0x3163 @0x0
0x3163…3169 lno = 0x1374 // 0x3165 @0x2
0x3163…3169 at0004 = ╱9b╱ ENDIF ╱ // 0x3167 @0x4
0x3163…3169 at0005 = EOL // 0x3168 @0x5
0x3163…3169 }
0x3169…317f bed6 4990 EXEC ELØBGEM(FTOTAL$)
0x3169…317f LineComalBin {
0x3169…317f ptr = 0xbed6 // 0x3169 @0x0
0x3169…317f lno = 0x137e // 0x316b @0x2
0x3169…317f at0004 = ╱9d╱ EXEC ╱ // 0x316d @0x4
0x3169…317f at0005 = ╱45╱E╱ // 0x316e @0x5
0x3169…317f at0006 = ╱4c╱L╱ // 0x316f @0x6
0x3169…317f at0007 = ╱5c╱Ø╱ // 0x3170 @0x7
0x3169…317f at0008 = ╱42╱B╱ // 0x3171 @0x8
0x3169…317f at0009 = ╱47╱G╱ // 0x3172 @0x9
0x3169…317f at000a = ╱45╱E╱ // 0x3173 @0xa
0x3169…317f at000b = ╱4d╱M╱ // 0x3174 @0xb
0x3169…317f at000c = ╱ed╱(╱ // 0x3175 @0xc
0x3169…317f at000d = ╱46╱F╱ // 0x3176 @0xd
0x3169…317f at000e = ╱54╱T╱ // 0x3177 @0xe
0x3169…317f at000f = ╱4f╱O╱ // 0x3178 @0xf
0x3169…317f at0010 = ╱54╱T╱ // 0x3179 @0x10
0x3169…317f at0011 = ╱41╱A╱ // 0x317a @0x11
0x3169…317f at0012 = ╱4c╱L╱ // 0x317b @0x12
0x3169…317f at0013 = ╱ef╱$╱ // 0x317c @0x13
0x3169…317f at0014 = ╱ee╱)╱ // 0x317d @0x14
0x3169…317f at0015 = EOL // 0x317e @0x15
0x3169…317f }
0x317f…318e bee5 5000 I=I-1
0x317f…318e LineComalBin {
0x317f…318e ptr = 0xbee5 // 0x317f @0x0
0x317f…318e lno = 0x1388 // 0x3181 @0x2
0x317f…318e at0004 = ╱49╱I╱ // 0x3183 @0x4
0x317f…318e at0005 = ╱dc╱=╱ // 0x3184 @0x5
0x317f…318e at0006 = ╱49╱I╱ // 0x3185 @0x6
0x317f…318e at0007 = ╱e3╱-╱ // 0x3186 @0x7
0x317f…318e at0008 = ╱31╱1╱ // 0x3187 @0x8
0x317f…318e at0009 = ╱fe00008001╱ // 0x3188 @0x9
0x317f…318e at000e = EOL // 0x318d @0xe
0x317f…318e }
0x318e…31a0 bef7 5010 EXEC KODE(1)
0x318e…31a0 LineComalBin {
0x318e…31a0 ptr = 0xbef7 // 0x318e @0x0
0x318e…31a0 lno = 0x1392 // 0x3190 @0x2
0x318e…31a0 at0004 = ╱9d╱ EXEC ╱ // 0x3192 @0x4
0x318e…31a0 at0005 = ╱4b╱K╱ // 0x3193 @0x5
0x318e…31a0 at0006 = ╱4f╱O╱ // 0x3194 @0x6
0x318e…31a0 at0007 = ╱44╱D╱ // 0x3195 @0x7
0x318e…31a0 at0008 = ╱45╱E╱ // 0x3196 @0x8
0x318e…31a0 at0009 = ╱ed╱(╱ // 0x3197 @0x9
0x318e…31a0 at000a = ╱31╱1╱ // 0x3198 @0xa
0x318e…31a0 at000b = ╱fe00008001╱ // 0x3199 @0xb
0x318e…31a0 at0010 = ╱ee╱)╱ // 0x319e @0x10
0x318e…31a0 at0011 = EOL // 0x319f @0x11
0x318e…31a0 }
0x31a0…31cd bf24 5020 IF LEVKODE=11 THEN KOD$=CHR(11+ORD(KOD$))
0x31a0…31cd LineComalBin {
0x31a0…31cd ptr = 0xbf24 // 0x31a0 @0x0
0x31a0…31cd lno = 0x139c // 0x31a2 @0x2
0x31a0…31cd at0004 = ╱82╱ IF ╱ // 0x31a4 @0x4
0x31a0…31cd at0005 = ╱4c╱L╱ // 0x31a5 @0x5
0x31a0…31cd at0006 = ╱45╱E╱ // 0x31a6 @0x6
0x31a0…31cd at0007 = ╱56╱V╱ // 0x31a7 @0x7
0x31a0…31cd at0008 = ╱4b╱K╱ // 0x31a8 @0x8
0x31a0…31cd at0009 = ╱4f╱O╱ // 0x31a9 @0x9
0x31a0…31cd at000a = ╱44╱D╱ // 0x31aa @0xa
0x31a0…31cd at000b = ╱45╱E╱ // 0x31ab @0xb
0x31a0…31cd at000c = ╱dc╱=╱ // 0x31ac @0xc
0x31a0…31cd at000d = ╱31╱1╱ // 0x31ad @0xd
0x31a0…31cd at000e = ╱31╱1╱ // 0x31ae @0xe
0x31a0…31cd at000f = ╱fe0000b004╱ // 0x31af @0xf
0x31a0…31cd at0014 = ╱b6╱ THEN ╱ // 0x31b4 @0x14
0x31a0…31cd at0015 = ╱4b╱K╱ // 0x31b5 @0x15
0x31a0…31cd at0016 = ╱4f╱O╱ // 0x31b6 @0x16
0x31a0…31cd at0017 = ╱44╱D╱ // 0x31b7 @0x17
0x31a0…31cd at0018 = ╱ef╱$╱ // 0x31b8 @0x18
0x31a0…31cd at0019 = ╱dc╱=╱ // 0x31b9 @0x19
0x31a0…31cd at001a = ╱cf╱CHR╱ // 0x31ba @0x1a
0x31a0…31cd at001b = ╱ed╱(╱ // 0x31bb @0x1b
0x31a0…31cd at001c = ╱31╱1╱ // 0x31bc @0x1c
0x31a0…31cd at001d = ╱31╱1╱ // 0x31bd @0x1d
0x31a0…31cd at001e = ╱fe0000b004╱ // 0x31be @0x1e
0x31a0…31cd at0023 = ╱e2╱+╱ // 0x31c3 @0x23
0x31a0…31cd at0024 = ╱cd╱ORD╱ // 0x31c4 @0x24
0x31a0…31cd at0025 = ╱ed╱(╱ // 0x31c5 @0x25
0x31a0…31cd at0026 = ╱4b╱K╱ // 0x31c6 @0x26
0x31a0…31cd at0027 = ╱4f╱O╱ // 0x31c7 @0x27
0x31a0…31cd at0028 = ╱44╱D╱ // 0x31c8 @0x28
0x31a0…31cd at0029 = ╱ef╱$╱ // 0x31c9 @0x29
0x31a0…31cd at002a = ╱ee╱)╱ // 0x31ca @0x2a
0x31a0…31cd at002b = ╱ee╱)╱ // 0x31cb @0x2b
0x31a0…31cd at002c = EOL // 0x31cc @0x2c
0x31a0…31cd }
0x31cd…3202 bf59 5030 PUT K6$,APOSTER+2:ORDRENR,FDATO,I-APOSTER,KOD$
0x31cd…3202 LineComalBin {
0x31cd…3202 ptr = 0xbf59 // 0x31cd @0x0
0x31cd…3202 lno = 0x13a6 // 0x31cf @0x2
0x31cd…3202 at0004 = ╱aa╱ PUT ╱ // 0x31d1 @0x4
0x31cd…3202 at0005 = ╱4b╱K╱ // 0x31d2 @0x5
0x31cd…3202 at0006 = ╱36╱6╱ // 0x31d3 @0x6
0x31cd…3202 at0007 = ╱ef╱$╱ // 0x31d4 @0x7
0x31cd…3202 at0008 = ╱ec╱,╱ // 0x31d5 @0x8
0x31cd…3202 at0009 = ╱41╱A╱ // 0x31d6 @0x9
0x31cd…3202 at000a = ╱50╱P╱ // 0x31d7 @0xa
0x31cd…3202 at000b = ╱4f╱O╱ // 0x31d8 @0xb
0x31cd…3202 at000c = ╱53╱S╱ // 0x31d9 @0xc
0x31cd…3202 at000d = ╱54╱T╱ // 0x31da @0xd
0x31cd…3202 at000e = ╱45╱E╱ // 0x31db @0xe
0x31cd…3202 at000f = ╱52╱R╱ // 0x31dc @0xf
0x31cd…3202 at0010 = ╱e2╱+╱ // 0x31dd @0x10
0x31cd…3202 at0011 = ╱32╱2╱ // 0x31de @0x11
0x31cd…3202 at0012 = ╱fe00008002╱ // 0x31df @0x12
0x31cd…3202 at0017 = ╱f0╱:╱ // 0x31e4 @0x17
0x31cd…3202 at0018 = ╱4f╱O╱ // 0x31e5 @0x18
0x31cd…3202 at0019 = ╱52╱R╱ // 0x31e6 @0x19
0x31cd…3202 at001a = ╱44╱D╱ // 0x31e7 @0x1a
0x31cd…3202 at001b = ╱52╱R╱ // 0x31e8 @0x1b
0x31cd…3202 at001c = ╱45╱E╱ // 0x31e9 @0x1c
0x31cd…3202 at001d = ╱4e╱N╱ // 0x31ea @0x1d
0x31cd…3202 at001e = ╱52╱R╱ // 0x31eb @0x1e
0x31cd…3202 at001f = ╱ec╱,╱ // 0x31ec @0x1f
0x31cd…3202 at0020 = ╱46╱F╱ // 0x31ed @0x20
0x31cd…3202 at0021 = ╱44╱D╱ // 0x31ee @0x21
0x31cd…3202 at0022 = ╱41╱A╱ // 0x31ef @0x22
0x31cd…3202 at0023 = ╱54╱T╱ // 0x31f0 @0x23
0x31cd…3202 at0024 = ╱4f╱O╱ // 0x31f1 @0x24
0x31cd…3202 at0025 = ╱ec╱,╱ // 0x31f2 @0x25
0x31cd…3202 at0026 = ╱49╱I╱ // 0x31f3 @0x26
0x31cd…3202 at0027 = ╱e3╱-╱ // 0x31f4 @0x27
0x31cd…3202 at0028 = ╱41╱A╱ // 0x31f5 @0x28
0x31cd…3202 at0029 = ╱50╱P╱ // 0x31f6 @0x29
0x31cd…3202 at002a = ╱4f╱O╱ // 0x31f7 @0x2a
0x31cd…3202 at002b = ╱53╱S╱ // 0x31f8 @0x2b
0x31cd…3202 at002c = ╱54╱T╱ // 0x31f9 @0x2c
0x31cd…3202 at002d = ╱45╱E╱ // 0x31fa @0x2d
0x31cd…3202 at002e = ╱52╱R╱ // 0x31fb @0x2e
0x31cd…3202 at002f = ╱ec╱,╱ // 0x31fc @0x2f
0x31cd…3202 at0030 = ╱4b╱K╱ // 0x31fd @0x30
0x31cd…3202 at0031 = ╱4f╱O╱ // 0x31fe @0x31
0x31cd…3202 at0032 = ╱44╱D╱ // 0x31ff @0x32
0x31cd…3202 at0033 = ╱ef╱$╱ // 0x3200 @0x33
0x31cd…3202 at0034 = EOL // 0x3201 @0x34
0x31cd…3202 }
0x3202…321e bf75 5040 EXEC FE(3,10,K6$)
0x3202…321e LineComalBin {
0x3202…321e ptr = 0xbf75 // 0x3202 @0x0
0x3202…321e lno = 0x13b0 // 0x3204 @0x2
0x3202…321e at0004 = ╱9d╱ EXEC ╱ // 0x3206 @0x4
0x3202…321e at0005 = ╱46╱F╱ // 0x3207 @0x5
0x3202…321e at0006 = ╱45╱E╱ // 0x3208 @0x6
0x3202…321e at0007 = ╱ed╱(╱ // 0x3209 @0x7
0x3202…321e at0008 = ╱33╱3╱ // 0x320a @0x8
0x3202…321e at0009 = ╱fe0000c002╱ // 0x320b @0x9
0x3202…321e at000e = ╱ec╱,╱ // 0x3210 @0xe
0x3202…321e at000f = ╱31╱1╱ // 0x3211 @0xf
0x3202…321e at0010 = ╱30╱0╱ // 0x3212 @0x10
0x3202…321e at0011 = ╱fe0000a004╱ // 0x3213 @0x11
0x3202…321e at0016 = ╱ec╱,╱ // 0x3218 @0x16
0x3202…321e at0017 = ╱4b╱K╱ // 0x3219 @0x17
0x3202…321e at0018 = ╱36╱6╱ // 0x321a @0x18
0x3202…321e at0019 = ╱ef╱$╱ // 0x321b @0x19
0x3202…321e at001a = ╱ee╱)╱ // 0x321c @0x1a
0x3202…321e at001b = EOL // 0x321d @0x1b
0x3202…321e }
0x321e…322c bf83 5050 APOSTER=I
0x321e…322c LineComalBin {
0x321e…322c ptr = 0xbf83 // 0x321e @0x0
0x321e…322c lno = 0x13ba // 0x3220 @0x2
0x321e…322c at0004 = ╱41╱A╱ // 0x3222 @0x4
0x321e…322c at0005 = ╱50╱P╱ // 0x3223 @0x5
0x321e…322c at0006 = ╱4f╱O╱ // 0x3224 @0x6
0x321e…322c at0007 = ╱53╱S╱ // 0x3225 @0x7
0x321e…322c at0008 = ╱54╱T╱ // 0x3226 @0x8
0x321e…322c at0009 = ╱45╱E╱ // 0x3227 @0x9
0x321e…322c at000a = ╱52╱R╱ // 0x3228 @0xa
0x321e…322c at000b = ╱dc╱=╱ // 0x3229 @0xb
0x321e…322c at000c = ╱49╱I╱ // 0x322a @0xc
0x321e…322c at000d = EOL // 0x322b @0xd
0x321e…322c }
0x322c…3235 bf8c 5060 CLOSE K6$
0x322c…3235 LineComalBin {
0x322c…3235 ptr = 0xbf8c // 0x322c @0x0
0x322c…3235 lno = 0x13c4 // 0x322e @0x2
0x322c…3235 at0004 = ╱a8╱ CLOSE ╱ // 0x3230 @0x4
0x322c…3235 at0005 = ╱4b╱K╱ // 0x3231 @0x5
0x322c…3235 at0006 = ╱36╱6╱ // 0x3232 @0x6
0x322c…3235 at0007 = ╱ef╱$╱ // 0x3233 @0x7
0x322c…3235 at0008 = EOL // 0x3234 @0x8
0x322c…3235 }
0x3235…3251 bfa8 5070 EXEC FE(3,11,K6$)
0x3235…3251 LineComalBin {
0x3235…3251 ptr = 0xbfa8 // 0x3235 @0x0
0x3235…3251 lno = 0x13ce // 0x3237 @0x2
0x3235…3251 at0004 = ╱9d╱ EXEC ╱ // 0x3239 @0x4
0x3235…3251 at0005 = ╱46╱F╱ // 0x323a @0x5
0x3235…3251 at0006 = ╱45╱E╱ // 0x323b @0x6
0x3235…3251 at0007 = ╱ed╱(╱ // 0x323c @0x7
0x3235…3251 at0008 = ╱33╱3╱ // 0x323d @0x8
0x3235…3251 at0009 = ╱fe0000c002╱ // 0x323e @0x9
0x3235…3251 at000e = ╱ec╱,╱ // 0x3243 @0xe
0x3235…3251 at000f = ╱31╱1╱ // 0x3244 @0xf
0x3235…3251 at0010 = ╱31╱1╱ // 0x3245 @0x10
0x3235…3251 at0011 = ╱fe0000b004╱ // 0x3246 @0x11
0x3235…3251 at0016 = ╱ec╱,╱ // 0x324b @0x16
0x3235…3251 at0017 = ╱4b╱K╱ // 0x324c @0x17
0x3235…3251 at0018 = ╱36╱6╱ // 0x324d @0x18
0x3235…3251 at0019 = ╱ef╱$╱ // 0x324e @0x19
0x3235…3251 at001a = ╱ee╱)╱ // 0x324f @0x1a
0x3235…3251 at001b = EOL // 0x3250 @0x1b
0x3235…3251 }
0x3251…3257 bfae 5080 ENDPROC
0x3251…3257 LineComalBin {
0x3251…3257 ptr = 0xbfae // 0x3251 @0x0
0x3251…3257 lno = 0x13d8 // 0x3253 @0x2
0x3251…3257 at0004 = ╱9f╱ ENDPROC ╱ // 0x3255 @0x4
0x3251…3257 at0005 = EOL // 0x3256 @0x5
0x3251…3257 }
0x3257…3265 bfbc 5090 PROC TEKSTGEM
0x3257…3265 LineComalBin {
0x3257…3265 ptr = 0xbfbc // 0x3257 @0x0
0x3257…3265 lno = 0x13e2 // 0x3259 @0x2
0x3257…3265 at0004 = ╱9e╱ PROC ╱ // 0x325b @0x4
0x3257…3265 at0005 = ╱54╱T╱ // 0x325c @0x5
0x3257…3265 at0006 = ╱45╱E╱ // 0x325d @0x6
0x3257…3265 at0007 = ╱4b╱K╱ // 0x325e @0x7
0x3257…3265 at0008 = ╱53╱S╱ // 0x325f @0x8
0x3257…3265 at0009 = ╱54╱T╱ // 0x3260 @0x9
0x3257…3265 at000a = ╱47╱G╱ // 0x3261 @0xa
0x3257…3265 at000b = ╱45╱E╱ // 0x3262 @0xb
0x3257…3265 at000c = ╱4d╱M╱ // 0x3263 @0xc
0x3257…3265 at000d = EOL // 0x3264 @0xd
0x3257…3265 }
0x3265…3290 bfe7 5100 PUT K6$,I:VATEKARR$(LINIE,1:13)
0x3265…3290 LineComalBin {
0x3265…3290 ptr = 0xbfe7 // 0x3265 @0x0
0x3265…3290 lno = 0x13ec // 0x3267 @0x2
0x3265…3290 at0004 = ╱aa╱ PUT ╱ // 0x3269 @0x4
0x3265…3290 at0005 = ╱4b╱K╱ // 0x326a @0x5
0x3265…3290 at0006 = ╱36╱6╱ // 0x326b @0x6
0x3265…3290 at0007 = ╱ef╱$╱ // 0x326c @0x7
0x3265…3290 at0008 = ╱ec╱,╱ // 0x326d @0x8
0x3265…3290 at0009 = ╱49╱I╱ // 0x326e @0x9
0x3265…3290 at000a = ╱f0╱:╱ // 0x326f @0xa
0x3265…3290 at000b = ╱56╱V╱ // 0x3270 @0xb
0x3265…3290 at000c = ╱41╱A╱ // 0x3271 @0xc
0x3265…3290 at000d = ╱54╱T╱ // 0x3272 @0xd
0x3265…3290 at000e = ╱45╱E╱ // 0x3273 @0xe
0x3265…3290 at000f = ╱4b╱K╱ // 0x3274 @0xf
0x3265…3290 at0010 = ╱41╱A╱ // 0x3275 @0x10
0x3265…3290 at0011 = ╱52╱R╱ // 0x3276 @0x11
0x3265…3290 at0012 = ╱52╱R╱ // 0x3277 @0x12
0x3265…3290 at0013 = ╱ef╱$╱ // 0x3278 @0x13
0x3265…3290 at0014 = ╱ed╱(╱ // 0x3279 @0x14
0x3265…3290 at0015 = ╱4c╱L╱ // 0x327a @0x15
0x3265…3290 at0016 = ╱49╱I╱ // 0x327b @0x16
0x3265…3290 at0017 = ╱4e╱N╱ // 0x327c @0x17
0x3265…3290 at0018 = ╱49╱I╱ // 0x327d @0x18
0x3265…3290 at0019 = ╱45╱E╱ // 0x327e @0x19
0x3265…3290 at001a = ╱ec╱,╱ // 0x327f @0x1a
0x3265…3290 at001b = ╱31╱1╱ // 0x3280 @0x1b
0x3265…3290 at001c = ╱fe00008001╱ // 0x3281 @0x1c
0x3265…3290 at0021 = ╱f0╱:╱ // 0x3286 @0x21
0x3265…3290 at0022 = ╱31╱1╱ // 0x3287 @0x22
0x3265…3290 at0023 = ╱33╱3╱ // 0x3288 @0x23
0x3265…3290 at0024 = ╱fe0000d004╱ // 0x3289 @0x24
0x3265…3290 at0029 = ╱ee╱)╱ // 0x328e @0x29
0x3265…3290 at002a = EOL // 0x328f @0x2a
0x3265…3290 }
0x3290…32ab c002 5110 EXEC FE(4,1,K6$)
0x3290…32ab LineComalBin {
0x3290…32ab ptr = 0xc002 // 0x3290 @0x0
0x3290…32ab lno = 0x13f6 // 0x3292 @0x2
0x3290…32ab at0004 = ╱9d╱ EXEC ╱ // 0x3294 @0x4
0x3290…32ab at0005 = ╱46╱F╱ // 0x3295 @0x5
0x3290…32ab at0006 = ╱45╱E╱ // 0x3296 @0x6
0x3290…32ab at0007 = ╱ed╱(╱ // 0x3297 @0x7
0x3290…32ab at0008 = ╱34╱4╱ // 0x3298 @0x8
0x3290…32ab at0009 = ╱fe00008003╱ // 0x3299 @0x9
0x3290…32ab at000e = ╱ec╱,╱ // 0x329e @0xe
0x3290…32ab at000f = ╱31╱1╱ // 0x329f @0xf
0x3290…32ab at0010 = ╱fe00008001╱ // 0x32a0 @0x10
0x3290…32ab at0015 = ╱ec╱,╱ // 0x32a5 @0x15
0x3290…32ab at0016 = ╱4b╱K╱ // 0x32a6 @0x16
0x3290…32ab at0017 = ╱36╱6╱ // 0x32a7 @0x17
0x3290…32ab at0018 = ╱ef╱$╱ // 0x32a8 @0x18
0x3290…32ab at0019 = ╱ee╱)╱ // 0x32a9 @0x19
0x3290…32ab at001a = EOL // 0x32aa @0x1a
0x3290…32ab }
0x32ab…32e6 c03d 5120 TAL4$=VATEKARR$(LINIE,14:12)+KOD$;I=I+2
0x32ab…32e6 LineComalBin {
0x32ab…32e6 ptr = 0xc03d // 0x32ab @0x0
0x32ab…32e6 lno = 0x1400 // 0x32ad @0x2
0x32ab…32e6 at0004 = ╱54╱T╱ // 0x32af @0x4
0x32ab…32e6 at0005 = ╱41╱A╱ // 0x32b0 @0x5
0x32ab…32e6 at0006 = ╱4c╱L╱ // 0x32b1 @0x6
0x32ab…32e6 at0007 = ╱34╱4╱ // 0x32b2 @0x7
0x32ab…32e6 at0008 = ╱ef╱$╱ // 0x32b3 @0x8
0x32ab…32e6 at0009 = ╱dc╱=╱ // 0x32b4 @0x9
0x32ab…32e6 at000a = ╱56╱V╱ // 0x32b5 @0xa
0x32ab…32e6 at000b = ╱41╱A╱ // 0x32b6 @0xb
0x32ab…32e6 at000c = ╱54╱T╱ // 0x32b7 @0xc
0x32ab…32e6 at000d = ╱45╱E╱ // 0x32b8 @0xd
0x32ab…32e6 at000e = ╱4b╱K╱ // 0x32b9 @0xe
0x32ab…32e6 at000f = ╱41╱A╱ // 0x32ba @0xf
0x32ab…32e6 at0010 = ╱52╱R╱ // 0x32bb @0x10
0x32ab…32e6 at0011 = ╱52╱R╱ // 0x32bc @0x11
0x32ab…32e6 at0012 = ╱ef╱$╱ // 0x32bd @0x12
0x32ab…32e6 at0013 = ╱ed╱(╱ // 0x32be @0x13
0x32ab…32e6 at0014 = ╱4c╱L╱ // 0x32bf @0x14
0x32ab…32e6 at0015 = ╱49╱I╱ // 0x32c0 @0x15
0x32ab…32e6 at0016 = ╱4e╱N╱ // 0x32c1 @0x16
0x32ab…32e6 at0017 = ╱49╱I╱ // 0x32c2 @0x17
0x32ab…32e6 at0018 = ╱45╱E╱ // 0x32c3 @0x18
0x32ab…32e6 at0019 = ╱ec╱,╱ // 0x32c4 @0x19
0x32ab…32e6 at001a = ╱31╱1╱ // 0x32c5 @0x1a
0x32ab…32e6 at001b = ╱34╱4╱ // 0x32c6 @0x1b
0x32ab…32e6 at001c = ╱fe0000e004╱ // 0x32c7 @0x1c
0x32ab…32e6 at0021 = ╱f0╱:╱ // 0x32cc @0x21
0x32ab…32e6 at0022 = ╱31╱1╱ // 0x32cd @0x22
0x32ab…32e6 at0023 = ╱32╱2╱ // 0x32ce @0x23
0x32ab…32e6 at0024 = ╱fe0000c004╱ // 0x32cf @0x24
0x32ab…32e6 at0029 = ╱ee╱)╱ // 0x32d4 @0x29
0x32ab…32e6 at002a = ╱f1╱+╱ // 0x32d5 @0x2a
0x32ab…32e6 at002b = ╱4b╱K╱ // 0x32d6 @0x2b
0x32ab…32e6 at002c = ╱4f╱O╱ // 0x32d7 @0x2c
0x32ab…32e6 at002d = ╱44╱D╱ // 0x32d8 @0x2d
0x32ab…32e6 at002e = ╱ef╱$╱ // 0x32d9 @0x2e
0x32ab…32e6 at002f = ╱eb╱;╱ // 0x32da @0x2f
0x32ab…32e6 at0030 = ╱49╱I╱ // 0x32db @0x30
0x32ab…32e6 at0031 = ╱dc╱=╱ // 0x32dc @0x31
0x32ab…32e6 at0032 = ╱49╱I╱ // 0x32dd @0x32
0x32ab…32e6 at0033 = ╱e2╱+╱ // 0x32de @0x33
0x32ab…32e6 at0034 = ╱32╱2╱ // 0x32df @0x34
0x32ab…32e6 at0035 = ╱fe00008002╱ // 0x32e0 @0x35
0x32ab…32e6 at003a = EOL // 0x32e5 @0x3a
0x32ab…32e6 }
0x32e6…330e c065 5130 PUT K6$,I-1:TAL4$(1:13)
0x32e6…330e LineComalBin {
0x32e6…330e ptr = 0xc065 // 0x32e6 @0x0
0x32e6…330e lno = 0x140a // 0x32e8 @0x2
0x32e6…330e at0004 = ╱aa╱ PUT ╱ // 0x32ea @0x4
0x32e6…330e at0005 = ╱4b╱K╱ // 0x32eb @0x5
0x32e6…330e at0006 = ╱36╱6╱ // 0x32ec @0x6
0x32e6…330e at0007 = ╱ef╱$╱ // 0x32ed @0x7
0x32e6…330e at0008 = ╱ec╱,╱ // 0x32ee @0x8
0x32e6…330e at0009 = ╱49╱I╱ // 0x32ef @0x9
0x32e6…330e at000a = ╱e3╱-╱ // 0x32f0 @0xa
0x32e6…330e at000b = ╱31╱1╱ // 0x32f1 @0xb
0x32e6…330e at000c = ╱fe00008001╱ // 0x32f2 @0xc
0x32e6…330e at0011 = ╱f0╱:╱ // 0x32f7 @0x11
0x32e6…330e at0012 = ╱54╱T╱ // 0x32f8 @0x12
0x32e6…330e at0013 = ╱41╱A╱ // 0x32f9 @0x13
0x32e6…330e at0014 = ╱4c╱L╱ // 0x32fa @0x14
0x32e6…330e at0015 = ╱34╱4╱ // 0x32fb @0x15
0x32e6…330e at0016 = ╱ef╱$╱ // 0x32fc @0x16
0x32e6…330e at0017 = ╱ed╱(╱ // 0x32fd @0x17
0x32e6…330e at0018 = ╱31╱1╱ // 0x32fe @0x18
0x32e6…330e at0019 = ╱fe00008001╱ // 0x32ff @0x19
0x32e6…330e at001e = ╱f0╱:╱ // 0x3304 @0x1e
0x32e6…330e at001f = ╱31╱1╱ // 0x3305 @0x1f
0x32e6…330e at0020 = ╱33╱3╱ // 0x3306 @0x20
0x32e6…330e at0021 = ╱fe0000d004╱ // 0x3307 @0x21
0x32e6…330e at0026 = ╱ee╱)╱ // 0x330c @0x26
0x32e6…330e at0027 = EOL // 0x330d @0x27
0x32e6…330e }
0x330e…3329 c080 5140 EXEC FE(4,2,K6$)
0x330e…3329 LineComalBin {
0x330e…3329 ptr = 0xc080 // 0x330e @0x0
0x330e…3329 lno = 0x1414 // 0x3310 @0x2
0x330e…3329 at0004 = ╱9d╱ EXEC ╱ // 0x3312 @0x4
0x330e…3329 at0005 = ╱46╱F╱ // 0x3313 @0x5
0x330e…3329 at0006 = ╱45╱E╱ // 0x3314 @0x6
0x330e…3329 at0007 = ╱ed╱(╱ // 0x3315 @0x7
0x330e…3329 at0008 = ╱34╱4╱ // 0x3316 @0x8
0x330e…3329 at0009 = ╱fe00008003╱ // 0x3317 @0x9
0x330e…3329 at000e = ╱ec╱,╱ // 0x331c @0xe
0x330e…3329 at000f = ╱32╱2╱ // 0x331d @0xf
0x330e…3329 at0010 = ╱fe00008002╱ // 0x331e @0x10
0x330e…3329 at0015 = ╱ec╱,╱ // 0x3323 @0x15
0x330e…3329 at0016 = ╱4b╱K╱ // 0x3324 @0x16
0x330e…3329 at0017 = ╱36╱6╱ // 0x3325 @0x17
0x330e…3329 at0018 = ╱ef╱$╱ // 0x3326 @0x18
0x330e…3329 at0019 = ╱ee╱)╱ // 0x3327 @0x19
0x330e…3329 at001a = EOL // 0x3328 @0x1a
0x330e…3329 }
0x3329…3344 c09b 5145 LE=LEN(VATEKARR$(LINIE))
0x3329…3344 LineComalBin {
0x3329…3344 ptr = 0xc09b // 0x3329 @0x0
0x3329…3344 lno = 0x1419 // 0x332b @0x2
0x3329…3344 at0004 = ╱4c╱L╱ // 0x332d @0x4
0x3329…3344 at0005 = ╱45╱E╱ // 0x332e @0x5
0x3329…3344 at0006 = ╱dc╱=╱ // 0x332f @0x6
0x3329…3344 at0007 = ╱cc╱LEN╱ // 0x3330 @0x7
0x3329…3344 at0008 = ╱ed╱(╱ // 0x3331 @0x8
0x3329…3344 at0009 = ╱56╱V╱ // 0x3332 @0x9
0x3329…3344 at000a = ╱41╱A╱ // 0x3333 @0xa
0x3329…3344 at000b = ╱54╱T╱ // 0x3334 @0xb
0x3329…3344 at000c = ╱45╱E╱ // 0x3335 @0xc
0x3329…3344 at000d = ╱4b╱K╱ // 0x3336 @0xd
0x3329…3344 at000e = ╱41╱A╱ // 0x3337 @0xe
0x3329…3344 at000f = ╱52╱R╱ // 0x3338 @0xf
0x3329…3344 at0010 = ╱52╱R╱ // 0x3339 @0x10
0x3329…3344 at0011 = ╱ef╱$╱ // 0x333a @0x11
0x3329…3344 at0012 = ╱ed╱(╱ // 0x333b @0x12
0x3329…3344 at0013 = ╱4c╱L╱ // 0x333c @0x13
0x3329…3344 at0014 = ╱49╱I╱ // 0x333d @0x14
0x3329…3344 at0015 = ╱4e╱N╱ // 0x333e @0x15
0x3329…3344 at0016 = ╱49╱I╱ // 0x333f @0x16
0x3329…3344 at0017 = ╱45╱E╱ // 0x3340 @0x17
0x3329…3344 at0018 = ╱ee╱)╱ // 0x3341 @0x18
0x3329…3344 at0019 = ╱ee╱)╱ // 0x3342 @0x19
0x3329…3344 at001a = EOL // 0x3343 @0x1a
0x3329…3344 }
0x3344…336b c0c2 5150 IF VANRARR(LINIE)=2 AND LE>24 THEN
0x3344…336b LineComalBin {
0x3344…336b ptr = 0xc0c2 // 0x3344 @0x0
0x3344…336b lno = 0x141e // 0x3346 @0x2
0x3344…336b at0004 = ╱9c╱ IF ╱ // 0x3348 @0x4
0x3344…336b at0005 = ╱56╱V╱ // 0x3349 @0x5
0x3344…336b at0006 = ╱41╱A╱ // 0x334a @0x6
0x3344…336b at0007 = ╱4e╱N╱ // 0x334b @0x7
0x3344…336b at0008 = ╱52╱R╱ // 0x334c @0x8
0x3344…336b at0009 = ╱41╱A╱ // 0x334d @0x9
0x3344…336b at000a = ╱52╱R╱ // 0x334e @0xa
0x3344…336b at000b = ╱52╱R╱ // 0x334f @0xb
0x3344…336b at000c = ╱ed╱(╱ // 0x3350 @0xc
0x3344…336b at000d = ╱4c╱L╱ // 0x3351 @0xd
0x3344…336b at000e = ╱49╱I╱ // 0x3352 @0xe
0x3344…336b at000f = ╱4e╱N╱ // 0x3353 @0xf
0x3344…336b at0010 = ╱49╱I╱ // 0x3354 @0x10
0x3344…336b at0011 = ╱45╱E╱ // 0x3355 @0x11
0x3344…336b at0012 = ╱ee╱)╱ // 0x3356 @0x12
0x3344…336b at0013 = ╱dc╱=╱ // 0x3357 @0x13
0x3344…336b at0014 = ╱32╱2╱ // 0x3358 @0x14
0x3344…336b at0015 = ╱fe00008002╱ // 0x3359 @0x15
0x3344…336b at001a = ╱da╱ AND ╱ // 0x335e @0x1a
0x3344…336b at001b = ╱4c╱L╱ // 0x335f @0x1b
0x3344…336b at001c = ╱45╱E╱ // 0x3360 @0x1c
0x3344…336b at001d = ╱de╱>╱ // 0x3361 @0x1d
0x3344…336b at001e = ╱32╱2╱ // 0x3362 @0x1e
0x3344…336b at001f = ╱34╱4╱ // 0x3363 @0x1f
0x3344…336b at0020 = ╱fe0000c005╱ // 0x3364 @0x20
0x3344…336b at0025 = ╱b6╱ THEN ╱ // 0x3369 @0x25
0x3344…336b at0026 = EOL // 0x336a @0x26
0x3344…336b }
0x336b…3397 c0ee 5160 PUT K6$,I:VATEKARR$(LINIE,26:13)
0x336b…3397 LineComalBin {
0x336b…3397 ptr = 0xc0ee // 0x336b @0x0
0x336b…3397 lno = 0x1428 // 0x336d @0x2
0x336b…3397 at0004 = ╱aa╱ PUT ╱ // 0x336f @0x4
0x336b…3397 at0005 = ╱4b╱K╱ // 0x3370 @0x5
0x336b…3397 at0006 = ╱36╱6╱ // 0x3371 @0x6
0x336b…3397 at0007 = ╱ef╱$╱ // 0x3372 @0x7
0x336b…3397 at0008 = ╱ec╱,╱ // 0x3373 @0x8
0x336b…3397 at0009 = ╱49╱I╱ // 0x3374 @0x9
0x336b…3397 at000a = ╱f0╱:╱ // 0x3375 @0xa
0x336b…3397 at000b = ╱56╱V╱ // 0x3376 @0xb
0x336b…3397 at000c = ╱41╱A╱ // 0x3377 @0xc
0x336b…3397 at000d = ╱54╱T╱ // 0x3378 @0xd
0x336b…3397 at000e = ╱45╱E╱ // 0x3379 @0xe
0x336b…3397 at000f = ╱4b╱K╱ // 0x337a @0xf
0x336b…3397 at0010 = ╱41╱A╱ // 0x337b @0x10
0x336b…3397 at0011 = ╱52╱R╱ // 0x337c @0x11
0x336b…3397 at0012 = ╱52╱R╱ // 0x337d @0x12
0x336b…3397 at0013 = ╱ef╱$╱ // 0x337e @0x13
0x336b…3397 at0014 = ╱ed╱(╱ // 0x337f @0x14
0x336b…3397 at0015 = ╱4c╱L╱ // 0x3380 @0x15
0x336b…3397 at0016 = ╱49╱I╱ // 0x3381 @0x16
0x336b…3397 at0017 = ╱4e╱N╱ // 0x3382 @0x17
0x336b…3397 at0018 = ╱49╱I╱ // 0x3383 @0x18
0x336b…3397 at0019 = ╱45╱E╱ // 0x3384 @0x19
0x336b…3397 at001a = ╱ec╱,╱ // 0x3385 @0x1a
0x336b…3397 at001b = ╱32╱2╱ // 0x3386 @0x1b
0x336b…3397 at001c = ╱36╱6╱ // 0x3387 @0x1c
0x336b…3397 at001d = ╱fe0000d005╱ // 0x3388 @0x1d
0x336b…3397 at0022 = ╱f0╱:╱ // 0x338d @0x22
0x336b…3397 at0023 = ╱31╱1╱ // 0x338e @0x23
0x336b…3397 at0024 = ╱33╱3╱ // 0x338f @0x24
0x336b…3397 at0025 = ╱fe0000d004╱ // 0x3390 @0x25
0x336b…3397 at002a = ╱ee╱)╱ // 0x3395 @0x2a
0x336b…3397 at002b = EOL // 0x3396 @0x2b
0x336b…3397 }
0x3397…33b3 c10a 5170 EXEC FE(99,1,K6$)
0x3397…33b3 LineComalBin {
0x3397…33b3 ptr = 0xc10a // 0x3397 @0x0
0x3397…33b3 lno = 0x1432 // 0x3399 @0x2
0x3397…33b3 at0004 = ╱9d╱ EXEC ╱ // 0x339b @0x4
0x3397…33b3 at0005 = ╱46╱F╱ // 0x339c @0x5
0x3397…33b3 at0006 = ╱45╱E╱ // 0x339d @0x6
0x3397…33b3 at0007 = ╱ed╱(╱ // 0x339e @0x7
0x3397…33b3 at0008 = ╱39╱9╱ // 0x339f @0x8
0x3397…33b3 at0009 = ╱39╱9╱ // 0x33a0 @0x9
0x3397…33b3 at000a = ╱fe0000c607╱ // 0x33a1 @0xa
0x3397…33b3 at000f = ╱ec╱,╱ // 0x33a6 @0xf
0x3397…33b3 at0010 = ╱31╱1╱ // 0x33a7 @0x10
0x3397…33b3 at0011 = ╱fe00008001╱ // 0x33a8 @0x11
0x3397…33b3 at0016 = ╱ec╱,╱ // 0x33ad @0x16
0x3397…33b3 at0017 = ╱4b╱K╱ // 0x33ae @0x17
0x3397…33b3 at0018 = ╱36╱6╱ // 0x33af @0x18
0x3397…33b3 at0019 = ╱ef╱$╱ // 0x33b0 @0x19
0x3397…33b3 at001a = ╱ee╱)╱ // 0x33b1 @0x1a
0x3397…33b3 at001b = EOL // 0x33b2 @0x1b
0x3397…33b3 }
0x33b3…33c2 c119 5180 I=I+2
0x33b3…33c2 LineComalBin {
0x33b3…33c2 ptr = 0xc119 // 0x33b3 @0x0
0x33b3…33c2 lno = 0x143c // 0x33b5 @0x2
0x33b3…33c2 at0004 = ╱49╱I╱ // 0x33b7 @0x4
0x33b3…33c2 at0005 = ╱dc╱=╱ // 0x33b8 @0x5
0x33b3…33c2 at0006 = ╱49╱I╱ // 0x33b9 @0x6
0x33b3…33c2 at0007 = ╱e2╱+╱ // 0x33ba @0x7
0x33b3…33c2 at0008 = ╱32╱2╱ // 0x33bb @0x8
0x33b3…33c2 at0009 = ╱fe00008002╱ // 0x33bc @0x9
0x33b3…33c2 at000e = EOL // 0x33c1 @0xe
0x33b3…33c2 }
0x33c2…33f5 c14c 5190 PUT K6$,I-1:VATEKARR$(LINIE,39:12)
0x33c2…33f5 LineComalBin {
0x33c2…33f5 ptr = 0xc14c // 0x33c2 @0x0
0x33c2…33f5 lno = 0x1446 // 0x33c4 @0x2
0x33c2…33f5 at0004 = ╱aa╱ PUT ╱ // 0x33c6 @0x4
0x33c2…33f5 at0005 = ╱4b╱K╱ // 0x33c7 @0x5
0x33c2…33f5 at0006 = ╱36╱6╱ // 0x33c8 @0x6
0x33c2…33f5 at0007 = ╱ef╱$╱ // 0x33c9 @0x7
0x33c2…33f5 at0008 = ╱ec╱,╱ // 0x33ca @0x8
0x33c2…33f5 at0009 = ╱49╱I╱ // 0x33cb @0x9
0x33c2…33f5 at000a = ╱e3╱-╱ // 0x33cc @0xa
0x33c2…33f5 at000b = ╱31╱1╱ // 0x33cd @0xb
0x33c2…33f5 at000c = ╱fe00008001╱ // 0x33ce @0xc
0x33c2…33f5 at0011 = ╱f0╱:╱ // 0x33d3 @0x11
0x33c2…33f5 at0012 = ╱56╱V╱ // 0x33d4 @0x12
0x33c2…33f5 at0013 = ╱41╱A╱ // 0x33d5 @0x13
0x33c2…33f5 at0014 = ╱54╱T╱ // 0x33d6 @0x14
0x33c2…33f5 at0015 = ╱45╱E╱ // 0x33d7 @0x15
0x33c2…33f5 at0016 = ╱4b╱K╱ // 0x33d8 @0x16
0x33c2…33f5 at0017 = ╱41╱A╱ // 0x33d9 @0x17
0x33c2…33f5 at0018 = ╱52╱R╱ // 0x33da @0x18
0x33c2…33f5 at0019 = ╱52╱R╱ // 0x33db @0x19
0x33c2…33f5 at001a = ╱ef╱$╱ // 0x33dc @0x1a
0x33c2…33f5 at001b = ╱ed╱(╱ // 0x33dd @0x1b
0x33c2…33f5 at001c = ╱4c╱L╱ // 0x33de @0x1c
0x33c2…33f5 at001d = ╱49╱I╱ // 0x33df @0x1d
0x33c2…33f5 at001e = ╱4e╱N╱ // 0x33e0 @0x1e
0x33c2…33f5 at001f = ╱49╱I╱ // 0x33e1 @0x1f
0x33c2…33f5 at0020 = ╱45╱E╱ // 0x33e2 @0x20
0x33c2…33f5 at0021 = ╱ec╱,╱ // 0x33e3 @0x21
0x33c2…33f5 at0022 = ╱33╱3╱ // 0x33e4 @0x22
0x33c2…33f5 at0023 = ╱39╱9╱ // 0x33e5 @0x23
0x33c2…33f5 at0024 = ╱fe00009c06╱ // 0x33e6 @0x24
0x33c2…33f5 at0029 = ╱f0╱:╱ // 0x33eb @0x29
0x33c2…33f5 at002a = ╱31╱1╱ // 0x33ec @0x2a
0x33c2…33f5 at002b = ╱32╱2╱ // 0x33ed @0x2b
0x33c2…33f5 at002c = ╱fe0000c004╱ // 0x33ee @0x2c
0x33c2…33f5 at0031 = ╱ee╱)╱ // 0x33f3 @0x31
0x33c2…33f5 at0032 = EOL // 0x33f4 @0x32
0x33c2…33f5 }
0x33f5…3411 c168 5200 EXEC FE(99,2,K6$)
0x33f5…3411 LineComalBin {
0x33f5…3411 ptr = 0xc168 // 0x33f5 @0x0
0x33f5…3411 lno = 0x1450 // 0x33f7 @0x2
0x33f5…3411 at0004 = ╱9d╱ EXEC ╱ // 0x33f9 @0x4
0x33f5…3411 at0005 = ╱46╱F╱ // 0x33fa @0x5
0x33f5…3411 at0006 = ╱45╱E╱ // 0x33fb @0x6
0x33f5…3411 at0007 = ╱ed╱(╱ // 0x33fc @0x7
0x33f5…3411 at0008 = ╱39╱9╱ // 0x33fd @0x8
0x33f5…3411 at0009 = ╱39╱9╱ // 0x33fe @0x9
0x33f5…3411 at000a = ╱fe0000c607╱ // 0x33ff @0xa
0x33f5…3411 at000f = ╱ec╱,╱ // 0x3404 @0xf
0x33f5…3411 at0010 = ╱32╱2╱ // 0x3405 @0x10
0x33f5…3411 at0011 = ╱fe00008002╱ // 0x3406 @0x11
0x33f5…3411 at0016 = ╱ec╱,╱ // 0x340b @0x16
0x33f5…3411 at0017 = ╱4b╱K╱ // 0x340c @0x17
0x33f5…3411 at0018 = ╱36╱6╱ // 0x340d @0x18
0x33f5…3411 at0019 = ╱ef╱$╱ // 0x340e @0x19
0x33f5…3411 at001a = ╱ee╱)╱ // 0x340f @0x1a
0x33f5…3411 at001b = EOL // 0x3410 @0x1b
0x33f5…3411 }
0x3411…3417 c16e 5210 ENDIF
0x3411…3417 LineComalBin {
0x3411…3417 ptr = 0xc16e // 0x3411 @0x0
0x3411…3417 lno = 0x145a // 0x3413 @0x2
0x3411…3417 at0004 = ╱9b╱ ENDIF ╱ // 0x3415 @0x4
0x3411…3417 at0005 = EOL // 0x3416 @0x5
0x3411…3417 }
0x3417…341d c174 5220 ENDPROC
0x3417…341d LineComalBin {
0x3417…341d ptr = 0xc174 // 0x3417 @0x0
0x3417…341d lno = 0x1464 // 0x3419 @0x2
0x3417…341d at0004 = ╱9f╱ ENDPROC ╱ // 0x341b @0x4
0x3417…341d at0005 = EOL // 0x341c @0x5
0x3417…341d }
0x341d…342f c186 5230 PROC ELØBGEM(BEL)
0x341d…342f LineComalBin {
0x341d…342f ptr = 0xc186 // 0x341d @0x0
0x341d…342f lno = 0x146e // 0x341f @0x2
0x341d…342f at0004 = ╱9e╱ PROC ╱ // 0x3421 @0x4
0x341d…342f at0005 = ╱45╱E╱ // 0x3422 @0x5
0x341d…342f at0006 = ╱4c╱L╱ // 0x3423 @0x6
0x341d…342f at0007 = ╱5c╱Ø╱ // 0x3424 @0x7
0x341d…342f at0008 = ╱42╱B╱ // 0x3425 @0x8
0x341d…342f at0009 = ╱47╱G╱ // 0x3426 @0x9
0x341d…342f at000a = ╱45╱E╱ // 0x3427 @0xa
0x341d…342f at000b = ╱4d╱M╱ // 0x3428 @0xb
0x341d…342f at000c = ╱ed╱(╱ // 0x3429 @0xc
0x341d…342f at000d = ╱42╱B╱ // 0x342a @0xd
0x341d…342f at000e = ╱45╱E╱ // 0x342b @0xe
0x341d…342f at000f = ╱4c╱L╱ // 0x342c @0xf
0x341d…342f at0010 = ╱ee╱)╱ // 0x342d @0x10
0x341d…342f at0011 = EOL // 0x342e @0x11
0x341d…342f }
0x342f…344e c1a5 5240 TAL4$=BEL$+KOD$;I=I+1
0x342f…344e LineComalBin {
0x342f…344e ptr = 0xc1a5 // 0x342f @0x0
0x342f…344e lno = 0x1478 // 0x3431 @0x2
0x342f…344e at0004 = ╱54╱T╱ // 0x3433 @0x4
0x342f…344e at0005 = ╱41╱A╱ // 0x3434 @0x5
0x342f…344e at0006 = ╱4c╱L╱ // 0x3435 @0x6
0x342f…344e at0007 = ╱34╱4╱ // 0x3436 @0x7
0x342f…344e at0008 = ╱ef╱$╱ // 0x3437 @0x8
0x342f…344e at0009 = ╱dc╱=╱ // 0x3438 @0x9
0x342f…344e at000a = ╱42╱B╱ // 0x3439 @0xa
0x342f…344e at000b = ╱45╱E╱ // 0x343a @0xb
0x342f…344e at000c = ╱4c╱L╱ // 0x343b @0xc
0x342f…344e at000d = ╱ef╱$╱ // 0x343c @0xd
0x342f…344e at000e = ╱f1╱+╱ // 0x343d @0xe
0x342f…344e at000f = ╱4b╱K╱ // 0x343e @0xf
0x342f…344e at0010 = ╱4f╱O╱ // 0x343f @0x10
0x342f…344e at0011 = ╱44╱D╱ // 0x3440 @0x11
0x342f…344e at0012 = ╱ef╱$╱ // 0x3441 @0x12
0x342f…344e at0013 = ╱eb╱;╱ // 0x3442 @0x13
0x342f…344e at0014 = ╱49╱I╱ // 0x3443 @0x14
0x342f…344e at0015 = ╱dc╱=╱ // 0x3444 @0x15
0x342f…344e at0016 = ╱49╱I╱ // 0x3445 @0x16
0x342f…344e at0017 = ╱e2╱+╱ // 0x3446 @0x17
0x342f…344e at0018 = ╱31╱1╱ // 0x3447 @0x18
0x342f…344e at0019 = ╱fe00008001╱ // 0x3448 @0x19
0x342f…344e at001e = EOL // 0x344d @0x1e
0x342f…344e }
0x344e…3476 c1cd 5250 PUT K6$,I-1:TAL4$(1:13)
0x344e…3476 LineComalBin {
0x344e…3476 ptr = 0xc1cd // 0x344e @0x0
0x344e…3476 lno = 0x1482 // 0x3450 @0x2
0x344e…3476 at0004 = ╱aa╱ PUT ╱ // 0x3452 @0x4
0x344e…3476 at0005 = ╱4b╱K╱ // 0x3453 @0x5
0x344e…3476 at0006 = ╱36╱6╱ // 0x3454 @0x6
0x344e…3476 at0007 = ╱ef╱$╱ // 0x3455 @0x7
0x344e…3476 at0008 = ╱ec╱,╱ // 0x3456 @0x8
0x344e…3476 at0009 = ╱49╱I╱ // 0x3457 @0x9
0x344e…3476 at000a = ╱e3╱-╱ // 0x3458 @0xa
0x344e…3476 at000b = ╱31╱1╱ // 0x3459 @0xb
0x344e…3476 at000c = ╱fe00008001╱ // 0x345a @0xc
0x344e…3476 at0011 = ╱f0╱:╱ // 0x345f @0x11
0x344e…3476 at0012 = ╱54╱T╱ // 0x3460 @0x12
0x344e…3476 at0013 = ╱41╱A╱ // 0x3461 @0x13
0x344e…3476 at0014 = ╱4c╱L╱ // 0x3462 @0x14
0x344e…3476 at0015 = ╱34╱4╱ // 0x3463 @0x15
0x344e…3476 at0016 = ╱ef╱$╱ // 0x3464 @0x16
0x344e…3476 at0017 = ╱ed╱(╱ // 0x3465 @0x17
0x344e…3476 at0018 = ╱31╱1╱ // 0x3466 @0x18
0x344e…3476 at0019 = ╱fe00008001╱ // 0x3467 @0x19
0x344e…3476 at001e = ╱f0╱:╱ // 0x346c @0x1e
0x344e…3476 at001f = ╱31╱1╱ // 0x346d @0x1f
0x344e…3476 at0020 = ╱33╱3╱ // 0x346e @0x20
0x344e…3476 at0021 = ╱fe0000d004╱ // 0x346f @0x21
0x344e…3476 at0026 = ╱ee╱)╱ // 0x3474 @0x26
0x344e…3476 at0027 = EOL // 0x3475 @0x27
0x344e…3476 }
0x3476…3491 c1e8 5260 EXEC FE(5,1,K6$)
0x3476…3491 LineComalBin {
0x3476…3491 ptr = 0xc1e8 // 0x3476 @0x0
0x3476…3491 lno = 0x148c // 0x3478 @0x2
0x3476…3491 at0004 = ╱9d╱ EXEC ╱ // 0x347a @0x4
0x3476…3491 at0005 = ╱46╱F╱ // 0x347b @0x5
0x3476…3491 at0006 = ╱45╱E╱ // 0x347c @0x6
0x3476…3491 at0007 = ╱ed╱(╱ // 0x347d @0x7
0x3476…3491 at0008 = ╱35╱5╱ // 0x347e @0x8
0x3476…3491 at0009 = ╱fe0000a003╱ // 0x347f @0x9
0x3476…3491 at000e = ╱ec╱,╱ // 0x3484 @0xe
0x3476…3491 at000f = ╱31╱1╱ // 0x3485 @0xf
0x3476…3491 at0010 = ╱fe00008001╱ // 0x3486 @0x10
0x3476…3491 at0015 = ╱ec╱,╱ // 0x348b @0x15
0x3476…3491 at0016 = ╱4b╱K╱ // 0x348c @0x16
0x3476…3491 at0017 = ╱36╱6╱ // 0x348d @0x17
0x3476…3491 at0018 = ╱ef╱$╱ // 0x348e @0x18
0x3476…3491 at0019 = ╱ee╱)╱ // 0x348f @0x19
0x3476…3491 at001a = EOL // 0x3490 @0x1a
0x3476…3491 }
0x3491…3497 c1ee 5270 ENDPROC
0x3491…3497 LineComalBin {
0x3491…3497 ptr = 0xc1ee // 0x3491 @0x0
0x3491…3497 lno = 0x1496 // 0x3493 @0x2
0x3491…3497 at0004 = ╱9f╱ ENDPROC ╱ // 0x3495 @0x4
0x3491…3497 at0005 = EOL // 0x3496 @0x5
0x3491…3497 }
0x3497…34a5 c1fc 5280 PROC VALINGEM
0x3497…34a5 LineComalBin {
0x3497…34a5 ptr = 0xc1fc // 0x3497 @0x0
0x3497…34a5 lno = 0x14a0 // 0x3499 @0x2
0x3497…34a5 at0004 = ╱9e╱ PROC ╱ // 0x349b @0x4
0x3497…34a5 at0005 = ╱56╱V╱ // 0x349c @0x5
0x3497…34a5 at0006 = ╱41╱A╱ // 0x349d @0x6
0x3497…34a5 at0007 = ╱4c╱L╱ // 0x349e @0x7
0x3497…34a5 at0008 = ╱49╱I╱ // 0x349f @0x8
0x3497…34a5 at0009 = ╱4e╱N╱ // 0x34a0 @0x9
0x3497…34a5 at000a = ╱47╱G╱ // 0x34a1 @0xa
0x3497…34a5 at000b = ╱45╱E╱ // 0x34a2 @0xb
0x3497…34a5 at000c = ╱4d╱M╱ // 0x34a3 @0xc
0x3497…34a5 at000d = EOL // 0x34a4 @0xd
0x3497…34a5 }
0x34a5…34d5 c22c 5290 PUT K6$,I:VANRARR(LINIE),VAANTARR$(LINIE),KOD$
0x34a5…34d5 LineComalBin {
0x34a5…34d5 ptr = 0xc22c // 0x34a5 @0x0
0x34a5…34d5 lno = 0x14aa // 0x34a7 @0x2
0x34a5…34d5 at0004 = ╱aa╱ PUT ╱ // 0x34a9 @0x4
0x34a5…34d5 at0005 = ╱4b╱K╱ // 0x34aa @0x5
0x34a5…34d5 at0006 = ╱36╱6╱ // 0x34ab @0x6
0x34a5…34d5 at0007 = ╱ef╱$╱ // 0x34ac @0x7
0x34a5…34d5 at0008 = ╱ec╱,╱ // 0x34ad @0x8
0x34a5…34d5 at0009 = ╱49╱I╱ // 0x34ae @0x9
0x34a5…34d5 at000a = ╱f0╱:╱ // 0x34af @0xa
0x34a5…34d5 at000b = ╱56╱V╱ // 0x34b0 @0xb
0x34a5…34d5 at000c = ╱41╱A╱ // 0x34b1 @0xc
0x34a5…34d5 at000d = ╱4e╱N╱ // 0x34b2 @0xd
0x34a5…34d5 at000e = ╱52╱R╱ // 0x34b3 @0xe
0x34a5…34d5 at000f = ╱41╱A╱ // 0x34b4 @0xf
0x34a5…34d5 at0010 = ╱52╱R╱ // 0x34b5 @0x10
0x34a5…34d5 at0011 = ╱52╱R╱ // 0x34b6 @0x11
0x34a5…34d5 at0012 = ╱ed╱(╱ // 0x34b7 @0x12
0x34a5…34d5 at0013 = ╱4c╱L╱ // 0x34b8 @0x13
0x34a5…34d5 at0014 = ╱49╱I╱ // 0x34b9 @0x14
0x34a5…34d5 at0015 = ╱4e╱N╱ // 0x34ba @0x15
0x34a5…34d5 at0016 = ╱49╱I╱ // 0x34bb @0x16
0x34a5…34d5 at0017 = ╱45╱E╱ // 0x34bc @0x17
0x34a5…34d5 at0018 = ╱ee╱)╱ // 0x34bd @0x18
0x34a5…34d5 at0019 = ╱ec╱,╱ // 0x34be @0x19
0x34a5…34d5 at001a = ╱56╱V╱ // 0x34bf @0x1a
0x34a5…34d5 at001b = ╱41╱A╱ // 0x34c0 @0x1b
0x34a5…34d5 at001c = ╱41╱A╱ // 0x34c1 @0x1c
0x34a5…34d5 at001d = ╱4e╱N╱ // 0x34c2 @0x1d
0x34a5…34d5 at001e = ╱54╱T╱ // 0x34c3 @0x1e
0x34a5…34d5 at001f = ╱41╱A╱ // 0x34c4 @0x1f
0x34a5…34d5 at0020 = ╱52╱R╱ // 0x34c5 @0x20
0x34a5…34d5 at0021 = ╱52╱R╱ // 0x34c6 @0x21
0x34a5…34d5 at0022 = ╱ef╱$╱ // 0x34c7 @0x22
0x34a5…34d5 at0023 = ╱ed╱(╱ // 0x34c8 @0x23
0x34a5…34d5 at0024 = ╱4c╱L╱ // 0x34c9 @0x24
0x34a5…34d5 at0025 = ╱49╱I╱ // 0x34ca @0x25
0x34a5…34d5 at0026 = ╱4e╱N╱ // 0x34cb @0x26
0x34a5…34d5 at0027 = ╱49╱I╱ // 0x34cc @0x27
0x34a5…34d5 at0028 = ╱45╱E╱ // 0x34cd @0x28
0x34a5…34d5 at0029 = ╱ee╱)╱ // 0x34ce @0x29
0x34a5…34d5 at002a = ╱ec╱,╱ // 0x34cf @0x2a
0x34a5…34d5 at002b = ╱4b╱K╱ // 0x34d0 @0x2b
0x34a5…34d5 at002c = ╱4f╱O╱ // 0x34d1 @0x2c
0x34a5…34d5 at002d = ╱44╱D╱ // 0x34d2 @0x2d
0x34a5…34d5 at002e = ╱ef╱$╱ // 0x34d3 @0x2e
0x34a5…34d5 at002f = EOL // 0x34d4 @0x2f
0x34a5…34d5 }
0x34d5…34f0 c247 5300 EXEC FE(6,1,K6$)
0x34d5…34f0 LineComalBin {
0x34d5…34f0 ptr = 0xc247 // 0x34d5 @0x0
0x34d5…34f0 lno = 0x14b4 // 0x34d7 @0x2
0x34d5…34f0 at0004 = ╱9d╱ EXEC ╱ // 0x34d9 @0x4
0x34d5…34f0 at0005 = ╱46╱F╱ // 0x34da @0x5
0x34d5…34f0 at0006 = ╱45╱E╱ // 0x34db @0x6
0x34d5…34f0 at0007 = ╱ed╱(╱ // 0x34dc @0x7
0x34d5…34f0 at0008 = ╱36╱6╱ // 0x34dd @0x8
0x34d5…34f0 at0009 = ╱fe0000c003╱ // 0x34de @0x9
0x34d5…34f0 at000e = ╱ec╱,╱ // 0x34e3 @0xe
0x34d5…34f0 at000f = ╱31╱1╱ // 0x34e4 @0xf
0x34d5…34f0 at0010 = ╱fe00008001╱ // 0x34e5 @0x10
0x34d5…34f0 at0015 = ╱ec╱,╱ // 0x34ea @0x15
0x34d5…34f0 at0016 = ╱4b╱K╱ // 0x34eb @0x16
0x34d5…34f0 at0017 = ╱36╱6╱ // 0x34ec @0x17
0x34d5…34f0 at0018 = ╱ef╱$╱ // 0x34ed @0x18
0x34d5…34f0 at0019 = ╱ee╱)╱ // 0x34ee @0x19
0x34d5…34f0 at001a = EOL // 0x34ef @0x1a
0x34d5…34f0 }
0x34f0…34ff (176,) c256 5310 I=I+1
0x34f0…34ff LineComalBin {
0x34f0…34ff ptr = 0xc256 // 0x34f0 @0x0
0x34f0…34ff lno = 0x14be // 0x34f2 @0x2
0x34f0…34ff at0004 = ╱49╱I╱ // 0x34f4 @0x4
0x34f0…34ff at0005 = ╱dc╱=╱ // 0x34f5 @0x5
0x34f0…34ff at0006 = ╱49╱I╱ // 0x34f6 @0x6
0x34f0…34ff at0007 = ╱e2╱+╱ // 0x34f7 @0x7
0x34f0…34ff at0008 = ╱31╱1╱ // 0x34f8 @0x8
0x34f0…34ff at0009 = ╱fe00008001╱ // 0x34f9 @0x9
0x34f0…34ff at000e = EOL // 0x34fe @0xe
0x34f0…34ff }
0x34ff…3505 c25c 5320 ENDPROC
0x34ff…3505 LineComalBin {
0x34ff…3505 ptr = 0xc25c // 0x34ff @0x0
0x34ff…3505 lno = 0x14c8 // 0x3501 @0x2
0x34ff…3505 at0004 = ╱9f╱ ENDPROC ╱ // 0x3503 @0x4
0x34ff…3505 at0005 = EOL // 0x3504 @0x5
0x34ff…3505 }
0x3505…3513 c26a 5330 PROC KODE(LI)
0x3505…3513 LineComalBin {
0x3505…3513 ptr = 0xc26a // 0x3505 @0x0
0x3505…3513 lno = 0x14d2 // 0x3507 @0x2
0x3505…3513 at0004 = ╱9e╱ PROC ╱ // 0x3509 @0x4
0x3505…3513 at0005 = ╱4b╱K╱ // 0x350a @0x5
0x3505…3513 at0006 = ╱4f╱O╱ // 0x350b @0x6
0x3505…3513 at0007 = ╱44╱D╱ // 0x350c @0x7
0x3505…3513 at0008 = ╱45╱E╱ // 0x350d @0x8
0x3505…3513 at0009 = ╱ed╱(╱ // 0x350e @0x9
0x3505…3513 at000a = ╱4c╱L╱ // 0x350f @0xa
0x3505…3513 at000b = ╱49╱I╱ // 0x3510 @0xb
0x3505…3513 at000c = ╱ee╱)╱ // 0x3511 @0xc
0x3505…3513 at000d = EOL // 0x3512 @0xd
0x3505…3513 }
0x3513…354f c2a6 5340 IF ARRKODER(LI,1)=0 AND ARRKODER(LI,2)=0 THEN
0x3513…354f LineComalBin {
0x3513…354f ptr = 0xc2a6 // 0x3513 @0x0
0x3513…354f lno = 0x14dc // 0x3515 @0x2
0x3513…354f at0004 = ╱9c╱ IF ╱ // 0x3517 @0x4
0x3513…354f at0005 = ╱41╱A╱ // 0x3518 @0x5
0x3513…354f at0006 = ╱52╱R╱ // 0x3519 @0x6
0x3513…354f at0007 = ╱52╱R╱ // 0x351a @0x7
0x3513…354f at0008 = ╱4b╱K╱ // 0x351b @0x8
0x3513…354f at0009 = ╱4f╱O╱ // 0x351c @0x9
0x3513…354f at000a = ╱44╱D╱ // 0x351d @0xa
0x3513…354f at000b = ╱45╱E╱ // 0x351e @0xb
0x3513…354f at000c = ╱52╱R╱ // 0x351f @0xc
0x3513…354f at000d = ╱ed╱(╱ // 0x3520 @0xd
0x3513…354f at000e = ╱4c╱L╱ // 0x3521 @0xe
0x3513…354f at000f = ╱49╱I╱ // 0x3522 @0xf
0x3513…354f at0010 = ╱ec╱,╱ // 0x3523 @0x10
0x3513…354f at0011 = ╱31╱1╱ // 0x3524 @0x11
0x3513…354f at0012 = ╱fe00008001╱ // 0x3525 @0x12
0x3513…354f at0017 = ╱ee╱)╱ // 0x352a @0x17
0x3513…354f at0018 = ╱dc╱=╱ // 0x352b @0x18
0x3513…354f at0019 = ╱30╱0╱ // 0x352c @0x19
0x3513…354f at001a = ╱fe00000000╱ // 0x352d @0x1a
0x3513…354f at001f = ╱da╱ AND ╱ // 0x3532 @0x1f
0x3513…354f at0020 = ╱41╱A╱ // 0x3533 @0x20
0x3513…354f at0021 = ╱52╱R╱ // 0x3534 @0x21
0x3513…354f at0022 = ╱52╱R╱ // 0x3535 @0x22
0x3513…354f at0023 = ╱4b╱K╱ // 0x3536 @0x23
0x3513…354f at0024 = ╱4f╱O╱ // 0x3537 @0x24
0x3513…354f at0025 = ╱44╱D╱ // 0x3538 @0x25
0x3513…354f at0026 = ╱45╱E╱ // 0x3539 @0x26
0x3513…354f at0027 = ╱52╱R╱ // 0x353a @0x27
0x3513…354f at0028 = ╱ed╱(╱ // 0x353b @0x28
0x3513…354f at0029 = ╱4c╱L╱ // 0x353c @0x29
0x3513…354f at002a = ╱49╱I╱ // 0x353d @0x2a
0x3513…354f at002b = ╱ec╱,╱ // 0x353e @0x2b
0x3513…354f at002c = ╱32╱2╱ // 0x353f @0x2c
0x3513…354f at002d = ╱fe00008002╱ // 0x3540 @0x2d
0x3513…354f at0032 = ╱ee╱)╱ // 0x3545 @0x32
0x3513…354f at0033 = ╱dc╱=╱ // 0x3546 @0x33
0x3513…354f at0034 = ╱30╱0╱ // 0x3547 @0x34
0x3513…354f at0035 = ╱fe00000000╱ // 0x3548 @0x35
0x3513…354f at003a = ╱b6╱ THEN ╱ // 0x354d @0x3a
0x3513…354f at003b = EOL // 0x354e @0x3b
0x3513…354f }
0x354f…3562 c2b9 5350 CASE VANRARR(LI) OF
0x354f…3562 LineComalBin {
0x354f…3562 ptr = 0xc2b9 // 0x354f @0x0
0x354f…3562 lno = 0x14e6 // 0x3551 @0x2
0x354f…3562 at0004 = ╱a201╱ CASE ╱ // 0x3553 @0x4
0x354f…3562 at0006 = ╱56╱V╱ // 0x3555 @0x6
0x354f…3562 at0007 = ╱41╱A╱ // 0x3556 @0x7
0x354f…3562 at0008 = ╱4e╱N╱ // 0x3557 @0x8
0x354f…3562 at0009 = ╱52╱R╱ // 0x3558 @0x9
0x354f…3562 at000a = ╱41╱A╱ // 0x3559 @0xa
0x354f…3562 at000b = ╱52╱R╱ // 0x355a @0xb
0x354f…3562 at000c = ╱52╱R╱ // 0x355b @0xc
0x354f…3562 at000d = ╱ed╱(╱ // 0x355c @0xd
0x354f…3562 at000e = ╱4c╱L╱ // 0x355d @0xe
0x354f…3562 at000f = ╱49╱I╱ // 0x355e @0xf
0x354f…3562 at0010 = ╱ee╱)╱ // 0x355f @0x10
0x354f…3562 at0011 = ╱ba╱ OF ╱ // 0x3560 @0x11
0x354f…3562 at0012 = EOL // 0x3561 @0x12
0x354f…3562 }
0x3562…356f c2c6 5360 KOD$="A"
0x3562…356f LineComalBin {
0x3562…356f ptr = 0xc2c6 // 0x3562 @0x0
0x3562…356f lno = 0x14f0 // 0x3564 @0x2
0x3562…356f at0004 = ╱4b╱K╱ // 0x3566 @0x4
0x3562…356f at0005 = ╱4f╱O╱ // 0x3567 @0x5
0x3562…356f at0006 = ╱44╱D╱ // 0x3568 @0x6
0x3562…356f at0007 = ╱ef╱$╱ // 0x3569 @0x7
0x3562…356f at0008 = ╱dc╱=╱ // 0x356a @0x8
0x3562…356f at0009 = ╱22╱"╱ // 0x356b @0x9
0x3562…356f at000a = ╱41╱A╱ // 0x356c @0xa
0x3562…356f at000b = ╱22╱"╱ // 0x356d @0xb
0x3562…356f at000c = EOL // 0x356e @0xc
0x3562…356f }
0x356f…357c c2d3 5370 WHEN 3
0x356f…357c LineComalBin {
0x356f…357c ptr = 0xc2d3 // 0x356f @0x0
0x356f…357c lno = 0x14fa // 0x3571 @0x2
0x356f…357c at0004 = ╱a301╱ WHEN ╱ // 0x3573 @0x4
0x356f…357c at0006 = ╱33╱3╱ // 0x3575 @0x6
0x356f…357c at0007 = ╱fe0000c002╱ // 0x3576 @0x7
0x356f…357c at000c = EOL // 0x357b @0xc
0x356f…357c }
0x357c…3589 c2e0 5380 KOD$="B"
0x357c…3589 LineComalBin {
0x357c…3589 ptr = 0xc2e0 // 0x357c @0x0
0x357c…3589 lno = 0x1504 // 0x357e @0x2
0x357c…3589 at0004 = ╱4b╱K╱ // 0x3580 @0x4
0x357c…3589 at0005 = ╱4f╱O╱ // 0x3581 @0x5
0x357c…3589 at0006 = ╱44╱D╱ // 0x3582 @0x6
0x357c…3589 at0007 = ╱ef╱$╱ // 0x3583 @0x7
0x357c…3589 at0008 = ╱dc╱=╱ // 0x3584 @0x8
0x357c…3589 at0009 = ╱22╱"╱ // 0x3585 @0x9
0x357c…3589 at000a = ╱42╱B╱ // 0x3586 @0xa
0x357c…3589 at000b = ╱22╱"╱ // 0x3587 @0xb
0x357c…3589 at000c = EOL // 0x3588 @0xc
0x357c…3589 }
0x3589…3596 c2ed 5390 WHEN 4
0x3589…3596 LineComalBin {
0x3589…3596 ptr = 0xc2ed // 0x3589 @0x0
0x3589…3596 lno = 0x150e // 0x358b @0x2
0x3589…3596 at0004 = ╱a301╱ WHEN ╱ // 0x358d @0x4
0x3589…3596 at0006 = ╱34╱4╱ // 0x358f @0x6
0x3589…3596 at0007 = ╱fe00008003╱ // 0x3590 @0x7
0x3589…3596 at000c = EOL // 0x3595 @0xc
0x3589…3596 }
0x3596…35a3 c2fa 5400 KOD$="C"
0x3596…35a3 LineComalBin {
0x3596…35a3 ptr = 0xc2fa // 0x3596 @0x0
0x3596…35a3 lno = 0x1518 // 0x3598 @0x2
0x3596…35a3 at0004 = ╱4b╱K╱ // 0x359a @0x4
0x3596…35a3 at0005 = ╱4f╱O╱ // 0x359b @0x5
0x3596…35a3 at0006 = ╱44╱D╱ // 0x359c @0x6
0x3596…35a3 at0007 = ╱ef╱$╱ // 0x359d @0x7
0x3596…35a3 at0008 = ╱dc╱=╱ // 0x359e @0x8
0x3596…35a3 at0009 = ╱22╱"╱ // 0x359f @0x9
0x3596…35a3 at000a = ╱43╱C╱ // 0x35a0 @0xa
0x3596…35a3 at000b = ╱22╱"╱ // 0x35a1 @0xb
0x3596…35a3 at000c = EOL // 0x35a2 @0xc
0x3596…35a3 }
0x35a3…35b0 c307 5410 WHEN 2
0x35a3…35b0 LineComalBin {
0x35a3…35b0 ptr = 0xc307 // 0x35a3 @0x0
0x35a3…35b0 lno = 0x1522 // 0x35a5 @0x2
0x35a3…35b0 at0004 = ╱a301╱ WHEN ╱ // 0x35a7 @0x4
0x35a3…35b0 at0006 = ╱32╱2╱ // 0x35a9 @0x6
0x35a3…35b0 at0007 = ╱fe00008002╱ // 0x35aa @0x7
0x35a3…35b0 at000c = EOL // 0x35af @0xc
0x35a3…35b0 }
0x35b0…35bd c314 5420 KOD$="D"
0x35b0…35bd LineComalBin {
0x35b0…35bd ptr = 0xc314 // 0x35b0 @0x0
0x35b0…35bd lno = 0x152c // 0x35b2 @0x2
0x35b0…35bd at0004 = ╱4b╱K╱ // 0x35b4 @0x4
0x35b0…35bd at0005 = ╱4f╱O╱ // 0x35b5 @0x5
0x35b0…35bd at0006 = ╱44╱D╱ // 0x35b6 @0x6
0x35b0…35bd at0007 = ╱ef╱$╱ // 0x35b7 @0x7
0x35b0…35bd at0008 = ╱dc╱=╱ // 0x35b8 @0x8
0x35b0…35bd at0009 = ╱22╱"╱ // 0x35b9 @0x9
0x35b0…35bd at000a = ╱44╱D╱ // 0x35ba @0xa
0x35b0…35bd at000b = ╱22╱"╱ // 0x35bb @0xb
0x35b0…35bd at000c = EOL // 0x35bc @0xc
0x35b0…35bd }
0x35bd…35ca c321 5430 WHEN 1
0x35bd…35ca LineComalBin {
0x35bd…35ca ptr = 0xc321 // 0x35bd @0x0
0x35bd…35ca lno = 0x1536 // 0x35bf @0x2
0x35bd…35ca at0004 = ╱a301╱ WHEN ╱ // 0x35c1 @0x4
0x35bd…35ca at0006 = ╱31╱1╱ // 0x35c3 @0x6
0x35bd…35ca at0007 = ╱fe00008001╱ // 0x35c4 @0x7
0x35bd…35ca at000c = EOL // 0x35c9 @0xc
0x35bd…35ca }
0x35ca…35d7 c32e 5440 KOD$="E"
0x35ca…35d7 LineComalBin {
0x35ca…35d7 ptr = 0xc32e // 0x35ca @0x0
0x35ca…35d7 lno = 0x1540 // 0x35cc @0x2
0x35ca…35d7 at0004 = ╱4b╱K╱ // 0x35ce @0x4
0x35ca…35d7 at0005 = ╱4f╱O╱ // 0x35cf @0x5
0x35ca…35d7 at0006 = ╱44╱D╱ // 0x35d0 @0x6
0x35ca…35d7 at0007 = ╱ef╱$╱ // 0x35d1 @0x7
0x35ca…35d7 at0008 = ╱dc╱=╱ // 0x35d2 @0x8
0x35ca…35d7 at0009 = ╱22╱"╱ // 0x35d3 @0x9
0x35ca…35d7 at000a = ╱45╱E╱ // 0x35d4 @0xa
0x35ca…35d7 at000b = ╱22╱"╱ // 0x35d5 @0xb
0x35ca…35d7 at000c = EOL // 0x35d6 @0xc
0x35ca…35d7 }
0x35d7…35dd (179,) c334 5450 ENDCASE
0x35d7…35dd LineComalBin {
0x35d7…35dd ptr = 0xc334 // 0x35d7 @0x0
0x35d7…35dd lno = 0x154a // 0x35d9 @0x2
0x35d7…35dd at0004 = ╱a4╱ ENDCASE ╱ // 0x35db @0x4
0x35d7…35dd at0005 = EOL // 0x35dc @0x5
0x35d7…35dd }
0x35dd…35e3 c33a 5460 ELSE
0x35dd…35e3 LineComalBin {
0x35dd…35e3 ptr = 0xc33a // 0x35dd @0x0
0x35dd…35e3 lno = 0x1554 // 0x35df @0x2
0x35dd…35e3 at0004 = ╱9a╱ ELSE ╱ // 0x35e1 @0x4
0x35dd…35e3 at0005 = EOL // 0x35e2 @0x5
0x35dd…35e3 }
0x35e3…3604 c35b 5470 IF ARRKODER(LI,1)=0 THEN
0x35e3…3604 LineComalBin {
0x35e3…3604 ptr = 0xc35b // 0x35e3 @0x0
0x35e3…3604 lno = 0x155e // 0x35e5 @0x2
0x35e3…3604 at0004 = ╱9c╱ IF ╱ // 0x35e7 @0x4
0x35e3…3604 at0005 = ╱41╱A╱ // 0x35e8 @0x5
0x35e3…3604 at0006 = ╱52╱R╱ // 0x35e9 @0x6
0x35e3…3604 at0007 = ╱52╱R╱ // 0x35ea @0x7
0x35e3…3604 at0008 = ╱4b╱K╱ // 0x35eb @0x8
0x35e3…3604 at0009 = ╱4f╱O╱ // 0x35ec @0x9
0x35e3…3604 at000a = ╱44╱D╱ // 0x35ed @0xa
0x35e3…3604 at000b = ╱45╱E╱ // 0x35ee @0xb
0x35e3…3604 at000c = ╱52╱R╱ // 0x35ef @0xc
0x35e3…3604 at000d = ╱ed╱(╱ // 0x35f0 @0xd
0x35e3…3604 at000e = ╱4c╱L╱ // 0x35f1 @0xe
0x35e3…3604 at000f = ╱49╱I╱ // 0x35f2 @0xf
0x35e3…3604 at0010 = ╱ec╱,╱ // 0x35f3 @0x10
0x35e3…3604 at0011 = ╱31╱1╱ // 0x35f4 @0x11
0x35e3…3604 at0012 = ╱fe00008001╱ // 0x35f5 @0x12
0x35e3…3604 at0017 = ╱ee╱)╱ // 0x35fa @0x17
0x35e3…3604 at0018 = ╱dc╱=╱ // 0x35fb @0x18
0x35e3…3604 at0019 = ╱30╱0╱ // 0x35fc @0x19
0x35e3…3604 at001a = ╱fe00000000╱ // 0x35fd @0x1a
0x35e3…3604 at001f = ╱b6╱ THEN ╱ // 0x3602 @0x1f
0x35e3…3604 at0020 = EOL // 0x3603 @0x20
0x35e3…3604 }
0x3604…3611 c368 5480 KOD$="G"
0x3604…3611 LineComalBin {
0x3604…3611 ptr = 0xc368 // 0x3604 @0x0
0x3604…3611 lno = 0x1568 // 0x3606 @0x2
0x3604…3611 at0004 = ╱4b╱K╱ // 0x3608 @0x4
0x3604…3611 at0005 = ╱4f╱O╱ // 0x3609 @0x5
0x3604…3611 at0006 = ╱44╱D╱ // 0x360a @0x6
0x3604…3611 at0007 = ╱ef╱$╱ // 0x360b @0x7
0x3604…3611 at0008 = ╱dc╱=╱ // 0x360c @0x8
0x3604…3611 at0009 = ╱22╱"╱ // 0x360d @0x9
0x3604…3611 at000a = ╱47╱G╱ // 0x360e @0xa
0x3604…3611 at000b = ╱22╱"╱ // 0x360f @0xb
0x3604…3611 at000c = EOL // 0x3610 @0xc
0x3604…3611 }
0x3611…3617 c36e 5490 ELSE
0x3611…3617 LineComalBin {
0x3611…3617 ptr = 0xc36e // 0x3611 @0x0
0x3611…3617 lno = 0x1572 // 0x3613 @0x2
0x3611…3617 at0004 = ╱9a╱ ELSE ╱ // 0x3615 @0x4
0x3611…3617 at0005 = EOL // 0x3616 @0x5
0x3611…3617 }
0x3617…3638 c38f 5500 IF ARRKODER(LI,2)=0 THEN
0x3617…3638 LineComalBin {
0x3617…3638 ptr = 0xc38f // 0x3617 @0x0
0x3617…3638 lno = 0x157c // 0x3619 @0x2
0x3617…3638 at0004 = ╱9c╱ IF ╱ // 0x361b @0x4
0x3617…3638 at0005 = ╱41╱A╱ // 0x361c @0x5
0x3617…3638 at0006 = ╱52╱R╱ // 0x361d @0x6
0x3617…3638 at0007 = ╱52╱R╱ // 0x361e @0x7
0x3617…3638 at0008 = ╱4b╱K╱ // 0x361f @0x8
0x3617…3638 at0009 = ╱4f╱O╱ // 0x3620 @0x9
0x3617…3638 at000a = ╱44╱D╱ // 0x3621 @0xa
0x3617…3638 at000b = ╱45╱E╱ // 0x3622 @0xb
0x3617…3638 at000c = ╱52╱R╱ // 0x3623 @0xc
0x3617…3638 at000d = ╱ed╱(╱ // 0x3624 @0xd
0x3617…3638 at000e = ╱4c╱L╱ // 0x3625 @0xe
0x3617…3638 at000f = ╱49╱I╱ // 0x3626 @0xf
0x3617…3638 at0010 = ╱ec╱,╱ // 0x3627 @0x10
0x3617…3638 at0011 = ╱32╱2╱ // 0x3628 @0x11
0x3617…3638 at0012 = ╱fe00008002╱ // 0x3629 @0x12
0x3617…3638 at0017 = ╱ee╱)╱ // 0x362e @0x17
0x3617…3638 at0018 = ╱dc╱=╱ // 0x362f @0x18
0x3617…3638 at0019 = ╱30╱0╱ // 0x3630 @0x19
0x3617…3638 at001a = ╱fe00000000╱ // 0x3631 @0x1a
0x3617…3638 at001f = ╱b6╱ THEN ╱ // 0x3636 @0x1f
0x3617…3638 at0020 = EOL // 0x3637 @0x20
0x3617…3638 }
0x3638…3645 c39c 5510 KOD$="F"
0x3638…3645 LineComalBin {
0x3638…3645 ptr = 0xc39c // 0x3638 @0x0
0x3638…3645 lno = 0x1586 // 0x363a @0x2
0x3638…3645 at0004 = ╱4b╱K╱ // 0x363c @0x4
0x3638…3645 at0005 = ╱4f╱O╱ // 0x363d @0x5
0x3638…3645 at0006 = ╱44╱D╱ // 0x363e @0x6
0x3638…3645 at0007 = ╱ef╱$╱ // 0x363f @0x7
0x3638…3645 at0008 = ╱dc╱=╱ // 0x3640 @0x8
0x3638…3645 at0009 = ╱22╱"╱ // 0x3641 @0x9
0x3638…3645 at000a = ╱46╱F╱ // 0x3642 @0xa
0x3638…3645 at000b = ╱22╱"╱ // 0x3643 @0xb
0x3638…3645 at000c = EOL // 0x3644 @0xc
0x3638…3645 }
0x3645…364b c3a2 5520 ELSE
0x3645…364b LineComalBin {
0x3645…364b ptr = 0xc3a2 // 0x3645 @0x0
0x3645…364b lno = 0x1590 // 0x3647 @0x2
0x3645…364b at0004 = ╱9a╱ ELSE ╱ // 0x3649 @0x4
0x3645…364b at0005 = EOL // 0x364a @0x5
0x3645…364b }
0x364b…3658 c3af 5530 KOD$="H"
0x364b…3658 LineComalBin {
0x364b…3658 ptr = 0xc3af // 0x364b @0x0
0x364b…3658 lno = 0x159a // 0x364d @0x2
0x364b…3658 at0004 = ╱4b╱K╱ // 0x364f @0x4
0x364b…3658 at0005 = ╱4f╱O╱ // 0x3650 @0x5
0x364b…3658 at0006 = ╱44╱D╱ // 0x3651 @0x6
0x364b…3658 at0007 = ╱ef╱$╱ // 0x3652 @0x7
0x364b…3658 at0008 = ╱dc╱=╱ // 0x3653 @0x8
0x364b…3658 at0009 = ╱22╱"╱ // 0x3654 @0x9
0x364b…3658 at000a = ╱48╱H╱ // 0x3655 @0xa
0x364b…3658 at000b = ╱22╱"╱ // 0x3656 @0xb
0x364b…3658 at000c = EOL // 0x3657 @0xc
0x364b…3658 }
0x3658…365e c3b5 5540 ENDIF
0x3658…365e LineComalBin {
0x3658…365e ptr = 0xc3b5 // 0x3658 @0x0
0x3658…365e lno = 0x15a4 // 0x365a @0x2
0x3658…365e at0004 = ╱9b╱ ENDIF ╱ // 0x365c @0x4
0x3658…365e at0005 = EOL // 0x365d @0x5
0x3658…365e }
0x365e…3664 c3bb 5550 ENDIF
0x365e…3664 LineComalBin {
0x365e…3664 ptr = 0xc3bb // 0x365e @0x0
0x365e…3664 lno = 0x15ae // 0x3660 @0x2
0x365e…3664 at0004 = ╱9b╱ ENDIF ╱ // 0x3662 @0x4
0x365e…3664 at0005 = EOL // 0x3663 @0x5
0x365e…3664 }
0x3664…366a c3c1 5560 ENDIF
0x3664…366a LineComalBin {
0x3664…366a ptr = 0xc3c1 // 0x3664 @0x0
0x3664…366a lno = 0x15b8 // 0x3666 @0x2
0x3664…366a at0004 = ╱9b╱ ENDIF ╱ // 0x3668 @0x4
0x3664…366a at0005 = EOL // 0x3669 @0x5
0x3664…366a }
0x366a…3670 c3c7 5570 ENDPROC
0x366a…3670 LineComalBin {
0x366a…3670 ptr = 0xc3c7 // 0x366a @0x0
0x366a…3670 lno = 0x15c2 // 0x366c @0x2
0x366a…3670 at0004 = ╱9f╱ ENDPROC ╱ // 0x366e @0x4
0x366a…3670 at0005 = EOL // 0x366f @0x5
0x366a…3670 }
0x3670…367c c3d3 5580 PROC SYSGEM
0x3670…367c LineComalBin {
0x3670…367c ptr = 0xc3d3 // 0x3670 @0x0
0x3670…367c lno = 0x15cc // 0x3672 @0x2
0x3670…367c at0004 = ╱9e╱ PROC ╱ // 0x3674 @0x4
0x3670…367c at0005 = ╱53╱S╱ // 0x3675 @0x5
0x3670…367c at0006 = ╱59╱Y╱ // 0x3676 @0x6
0x3670…367c at0007 = ╱53╱S╱ // 0x3677 @0x7
0x3670…367c at0008 = ╱47╱G╱ // 0x3678 @0x8
0x3670…367c at0009 = ╱45╱E╱ // 0x3679 @0x9
0x3670…367c at000a = ╱4d╱M╱ // 0x367a @0xa
0x3670…367c at000b = EOL // 0x367b @0xb
0x3670…367c }
0x367c…36d9 c430 5590 T1(1)=FAKTNR;T1(2)=KREDNR;T2(4)=APOSTER;T2(5)=AKRED;T2(6)=AFAKT
0x367c…36d9 LineComalBin {
0x367c…36d9 ptr = 0xc430 // 0x367c @0x0
0x367c…36d9 lno = 0x15d6 // 0x367e @0x2
0x367c…36d9 at0004 = ╱54╱T╱ // 0x3680 @0x4
0x367c…36d9 at0005 = ╱31╱1╱ // 0x3681 @0x5
0x367c…36d9 at0006 = ╱ed╱(╱ // 0x3682 @0x6
0x367c…36d9 at0007 = ╱31╱1╱ // 0x3683 @0x7
0x367c…36d9 at0008 = ╱fe00008001╱ // 0x3684 @0x8
0x367c…36d9 at000d = ╱ee╱)╱ // 0x3689 @0xd
0x367c…36d9 at000e = ╱dc╱=╱ // 0x368a @0xe
0x367c…36d9 at000f = ╱46╱F╱ // 0x368b @0xf
0x367c…36d9 at0010 = ╱41╱A╱ // 0x368c @0x10
0x367c…36d9 at0011 = ╱4b╱K╱ // 0x368d @0x11
0x367c…36d9 at0012 = ╱54╱T╱ // 0x368e @0x12
0x367c…36d9 at0013 = ╱4e╱N╱ // 0x368f @0x13
0x367c…36d9 at0014 = ╱52╱R╱ // 0x3690 @0x14
0x367c…36d9 at0015 = ╱eb╱;╱ // 0x3691 @0x15
0x367c…36d9 at0016 = ╱54╱T╱ // 0x3692 @0x16
0x367c…36d9 at0017 = ╱31╱1╱ // 0x3693 @0x17
0x367c…36d9 at0018 = ╱ed╱(╱ // 0x3694 @0x18
0x367c…36d9 at0019 = ╱32╱2╱ // 0x3695 @0x19
0x367c…36d9 at001a = ╱fe00008002╱ // 0x3696 @0x1a
0x367c…36d9 at001f = ╱ee╱)╱ // 0x369b @0x1f
0x367c…36d9 at0020 = ╱dc╱=╱ // 0x369c @0x20
0x367c…36d9 at0021 = ╱4b╱K╱ // 0x369d @0x21
0x367c…36d9 at0022 = ╱52╱R╱ // 0x369e @0x22
0x367c…36d9 at0023 = ╱45╱E╱ // 0x369f @0x23
0x367c…36d9 at0024 = ╱44╱D╱ // 0x36a0 @0x24
0x367c…36d9 at0025 = ╱4e╱N╱ // 0x36a1 @0x25
0x367c…36d9 at0026 = ╱52╱R╱ // 0x36a2 @0x26
0x367c…36d9 at0027 = ╱eb╱;╱ // 0x36a3 @0x27
0x367c…36d9 at0028 = ╱54╱T╱ // 0x36a4 @0x28
0x367c…36d9 at0029 = ╱32╱2╱ // 0x36a5 @0x29
0x367c…36d9 at002a = ╱ed╱(╱ // 0x36a6 @0x2a
0x367c…36d9 at002b = ╱34╱4╱ // 0x36a7 @0x2b
0x367c…36d9 at002c = ╱fe00008003╱ // 0x36a8 @0x2c
0x367c…36d9 at0031 = ╱ee╱)╱ // 0x36ad @0x31
0x367c…36d9 at0032 = ╱dc╱=╱ // 0x36ae @0x32
0x367c…36d9 at0033 = ╱41╱A╱ // 0x36af @0x33
0x367c…36d9 at0034 = ╱50╱P╱ // 0x36b0 @0x34
0x367c…36d9 at0035 = ╱4f╱O╱ // 0x36b1 @0x35
0x367c…36d9 at0036 = ╱53╱S╱ // 0x36b2 @0x36
0x367c…36d9 at0037 = ╱54╱T╱ // 0x36b3 @0x37
0x367c…36d9 at0038 = ╱45╱E╱ // 0x36b4 @0x38
0x367c…36d9 at0039 = ╱52╱R╱ // 0x36b5 @0x39
0x367c…36d9 at003a = ╱eb╱;╱ // 0x36b6 @0x3a
0x367c…36d9 at003b = ╱54╱T╱ // 0x36b7 @0x3b
0x367c…36d9 at003c = ╱32╱2╱ // 0x36b8 @0x3c
0x367c…36d9 at003d = ╱ed╱(╱ // 0x36b9 @0x3d
0x367c…36d9 at003e = ╱35╱5╱ // 0x36ba @0x3e
0x367c…36d9 at003f = ╱fe0000a003╱ // 0x36bb @0x3f
0x367c…36d9 at0044 = ╱ee╱)╱ // 0x36c0 @0x44
0x367c…36d9 at0045 = ╱dc╱=╱ // 0x36c1 @0x45
0x367c…36d9 at0046 = ╱41╱A╱ // 0x36c2 @0x46
0x367c…36d9 at0047 = ╱4b╱K╱ // 0x36c3 @0x47
0x367c…36d9 at0048 = ╱52╱R╱ // 0x36c4 @0x48
0x367c…36d9 at0049 = ╱45╱E╱ // 0x36c5 @0x49
0x367c…36d9 at004a = ╱44╱D╱ // 0x36c6 @0x4a
0x367c…36d9 at004b = ╱eb╱;╱ // 0x36c7 @0x4b
0x367c…36d9 at004c = ╱54╱T╱ // 0x36c8 @0x4c
0x367c…36d9 at004d = ╱32╱2╱ // 0x36c9 @0x4d
0x367c…36d9 at004e = ╱ed╱(╱ // 0x36ca @0x4e
0x367c…36d9 at004f = ╱36╱6╱ // 0x36cb @0x4f
0x367c…36d9 at0050 = ╱fe0000c003╱ // 0x36cc @0x50
0x367c…36d9 at0055 = ╱ee╱)╱ // 0x36d1 @0x55
0x367c…36d9 at0056 = ╱dc╱=╱ // 0x36d2 @0x56
0x367c…36d9 at0057 = ╱41╱A╱ // 0x36d3 @0x57
0x367c…36d9 at0058 = ╱46╱F╱ // 0x36d4 @0x58
0x367c…36d9 at0059 = ╱41╱A╱ // 0x36d5 @0x59
0x367c…36d9 at005a = ╱4b╱K╱ // 0x36d6 @0x5a
0x367c…36d9 at005b = ╱54╱T╱ // 0x36d7 @0x5b
0x367c…36d9 at005c = EOL // 0x36d8 @0x5c
0x367c…36d9 }
0x36d9…3702 c459 5600 T2(7)=AVKONTI;T2(8)=FJPOST
0x36d9…3702 LineComalBin {
0x36d9…3702 ptr = 0xc459 // 0x36d9 @0x0
0x36d9…3702 lno = 0x15e0 // 0x36db @0x2
0x36d9…3702 at0004 = ╱54╱T╱ // 0x36dd @0x4
0x36d9…3702 at0005 = ╱32╱2╱ // 0x36de @0x5
0x36d9…3702 at0006 = ╱ed╱(╱ // 0x36df @0x6
0x36d9…3702 at0007 = ╱37╱7╱ // 0x36e0 @0x7
0x36d9…3702 at0008 = ╱fe0000e003╱ // 0x36e1 @0x8
0x36d9…3702 at000d = ╱ee╱)╱ // 0x36e6 @0xd
0x36d9…3702 at000e = ╱dc╱=╱ // 0x36e7 @0xe
0x36d9…3702 at000f = ╱41╱A╱ // 0x36e8 @0xf
0x36d9…3702 at0010 = ╱56╱V╱ // 0x36e9 @0x10
0x36d9…3702 at0011 = ╱4b╱K╱ // 0x36ea @0x11
0x36d9…3702 at0012 = ╱4f╱O╱ // 0x36eb @0x12
0x36d9…3702 at0013 = ╱4e╱N╱ // 0x36ec @0x13
0x36d9…3702 at0014 = ╱54╱T╱ // 0x36ed @0x14
0x36d9…3702 at0015 = ╱49╱I╱ // 0x36ee @0x15
0x36d9…3702 at0016 = ╱eb╱;╱ // 0x36ef @0x16
0x36d9…3702 at0017 = ╱54╱T╱ // 0x36f0 @0x17
0x36d9…3702 at0018 = ╱32╱2╱ // 0x36f1 @0x18
0x36d9…3702 at0019 = ╱ed╱(╱ // 0x36f2 @0x19
0x36d9…3702 at001a = ╱38╱8╱ // 0x36f3 @0x1a
0x36d9…3702 at001b = ╱fe00008004╱ // 0x36f4 @0x1b
0x36d9…3702 at0020 = ╱ee╱)╱ // 0x36f9 @0x20
0x36d9…3702 at0021 = ╱dc╱=╱ // 0x36fa @0x21
0x36d9…3702 at0022 = ╱46╱F╱ // 0x36fb @0x22
0x36d9…3702 at0023 = ╱4a╱J╱ // 0x36fc @0x23
0x36d9…3702 at0024 = ╱50╱P╱ // 0x36fd @0x24
0x36d9…3702 at0025 = ╱4f╱O╱ // 0x36fe @0x25
0x36d9…3702 at0026 = ╱53╱S╱ // 0x36ff @0x26
0x36d9…3702 at0027 = ╱54╱T╱ // 0x3700 @0x27
0x36d9…3702 at0028 = EOL // 0x3701 @0x28
0x36d9…3702 }
0x3702…370d c464 5610 OPEN K7$,W
0x3702…370d LineComalBin {
0x3702…370d ptr = 0xc464 // 0x3702 @0x0
0x3702…370d lno = 0x15ea // 0x3704 @0x2
0x3702…370d at0004 = ╱a7╱ OPEN ╱ // 0x3706 @0x4
0x3702…370d at0005 = ╱4b╱K╱ // 0x3707 @0x5
0x3702…370d at0006 = ╱37╱7╱ // 0x3708 @0x6
0x3702…370d at0007 = ╱ef╱$╱ // 0x3709 @0x7
0x3702…370d at0008 = ╱ec╱,╱ // 0x370a @0x8
0x3702…370d at0009 = ╱57╱W╱ // 0x370b @0x9
0x3702…370d at000a = EOL // 0x370c @0xa
0x3702…370d }
0x370d…3728 c47f 5620 EXEC FE(9,1,K7$)
0x370d…3728 LineComalBin {
0x370d…3728 ptr = 0xc47f // 0x370d @0x0
0x370d…3728 lno = 0x15f4 // 0x370f @0x2
0x370d…3728 at0004 = ╱9d╱ EXEC ╱ // 0x3711 @0x4
0x370d…3728 at0005 = ╱46╱F╱ // 0x3712 @0x5
0x370d…3728 at0006 = ╱45╱E╱ // 0x3713 @0x6
0x370d…3728 at0007 = ╱ed╱(╱ // 0x3714 @0x7
0x370d…3728 at0008 = ╱39╱9╱ // 0x3715 @0x8
0x370d…3728 at0009 = ╱fe00009004╱ // 0x3716 @0x9
0x370d…3728 at000e = ╱ec╱,╱ // 0x371b @0xe
0x370d…3728 at000f = ╱31╱1╱ // 0x371c @0xf
0x370d…3728 at0010 = ╱fe00008001╱ // 0x371d @0x10
0x370d…3728 at0015 = ╱ec╱,╱ // 0x3722 @0x15
0x370d…3728 at0016 = ╱4b╱K╱ // 0x3723 @0x16
0x370d…3728 at0017 = ╱37╱7╱ // 0x3724 @0x17
0x370d…3728 at0018 = ╱ef╱$╱ // 0x3725 @0x18
0x370d…3728 at0019 = ╱ee╱)╱ // 0x3726 @0x19
0x370d…3728 at001a = EOL // 0x3727 @0x1a
0x370d…3728 }
0x3728…379b c4f2 5630 PUT K7$,2:T1(1),T1(2),T1(3),T1(4),T1(5),T1(6),T1(7),T1(8),T1(9)
0x3728…379b LineComalBin {
0x3728…379b ptr = 0xc4f2 // 0x3728 @0x0
0x3728…379b lno = 0x15fe // 0x372a @0x2
0x3728…379b at0004 = ╱aa╱ PUT ╱ // 0x372c @0x4
0x3728…379b at0005 = ╱4b╱K╱ // 0x372d @0x5
0x3728…379b at0006 = ╱37╱7╱ // 0x372e @0x6
0x3728…379b at0007 = ╱ef╱$╱ // 0x372f @0x7
0x3728…379b at0008 = ╱ec╱,╱ // 0x3730 @0x8
0x3728…379b at0009 = ╱32╱2╱ // 0x3731 @0x9
0x3728…379b at000a = ╱fe00008002╱ // 0x3732 @0xa
0x3728…379b at000f = ╱f0╱:╱ // 0x3737 @0xf
0x3728…379b at0010 = ╱54╱T╱ // 0x3738 @0x10
0x3728…379b at0011 = ╱31╱1╱ // 0x3739 @0x11
0x3728…379b at0012 = ╱ed╱(╱ // 0x373a @0x12
0x3728…379b at0013 = ╱31╱1╱ // 0x373b @0x13
0x3728…379b at0014 = ╱fe00008001╱ // 0x373c @0x14
0x3728…379b at0019 = ╱ee╱)╱ // 0x3741 @0x19
0x3728…379b at001a = ╱ec╱,╱ // 0x3742 @0x1a
0x3728…379b at001b = ╱54╱T╱ // 0x3743 @0x1b
0x3728…379b at001c = ╱31╱1╱ // 0x3744 @0x1c
0x3728…379b at001d = ╱ed╱(╱ // 0x3745 @0x1d
0x3728…379b at001e = ╱32╱2╱ // 0x3746 @0x1e
0x3728…379b at001f = ╱fe00008002╱ // 0x3747 @0x1f
0x3728…379b at0024 = ╱ee╱)╱ // 0x374c @0x24
0x3728…379b at0025 = ╱ec╱,╱ // 0x374d @0x25
0x3728…379b at0026 = ╱54╱T╱ // 0x374e @0x26
0x3728…379b at0027 = ╱31╱1╱ // 0x374f @0x27
0x3728…379b at0028 = ╱ed╱(╱ // 0x3750 @0x28
0x3728…379b at0029 = ╱33╱3╱ // 0x3751 @0x29
0x3728…379b at002a = ╱fe0000c002╱ // 0x3752 @0x2a
0x3728…379b at002f = ╱ee╱)╱ // 0x3757 @0x2f
0x3728…379b at0030 = ╱ec╱,╱ // 0x3758 @0x30
0x3728…379b at0031 = ╱54╱T╱ // 0x3759 @0x31
0x3728…379b at0032 = ╱31╱1╱ // 0x375a @0x32
0x3728…379b at0033 = ╱ed╱(╱ // 0x375b @0x33
0x3728…379b at0034 = ╱34╱4╱ // 0x375c @0x34
0x3728…379b at0035 = ╱fe00008003╱ // 0x375d @0x35
0x3728…379b at003a = ╱ee╱)╱ // 0x3762 @0x3a
0x3728…379b at003b = ╱ec╱,╱ // 0x3763 @0x3b
0x3728…379b at003c = ╱54╱T╱ // 0x3764 @0x3c
0x3728…379b at003d = ╱31╱1╱ // 0x3765 @0x3d
0x3728…379b at003e = ╱ed╱(╱ // 0x3766 @0x3e
0x3728…379b at003f = ╱35╱5╱ // 0x3767 @0x3f
0x3728…379b at0040 = ╱fe0000a003╱ // 0x3768 @0x40
0x3728…379b at0045 = ╱ee╱)╱ // 0x376d @0x45
0x3728…379b at0046 = ╱ec╱,╱ // 0x376e @0x46
0x3728…379b at0047 = ╱54╱T╱ // 0x376f @0x47
0x3728…379b at0048 = ╱31╱1╱ // 0x3770 @0x48
0x3728…379b at0049 = ╱ed╱(╱ // 0x3771 @0x49
0x3728…379b at004a = ╱36╱6╱ // 0x3772 @0x4a
0x3728…379b at004b = ╱fe0000c003╱ // 0x3773 @0x4b
0x3728…379b at0050 = ╱ee╱)╱ // 0x3778 @0x50
0x3728…379b at0051 = ╱ec╱,╱ // 0x3779 @0x51
0x3728…379b at0052 = ╱54╱T╱ // 0x377a @0x52
0x3728…379b at0053 = ╱31╱1╱ // 0x377b @0x53
0x3728…379b at0054 = ╱ed╱(╱ // 0x377c @0x54
0x3728…379b at0055 = ╱37╱7╱ // 0x377d @0x55
0x3728…379b at0056 = ╱fe0000e003╱ // 0x377e @0x56
0x3728…379b at005b = ╱ee╱)╱ // 0x3783 @0x5b
0x3728…379b at005c = ╱ec╱,╱ // 0x3784 @0x5c
0x3728…379b at005d = ╱54╱T╱ // 0x3785 @0x5d
0x3728…379b at005e = ╱31╱1╱ // 0x3786 @0x5e
0x3728…379b at005f = ╱ed╱(╱ // 0x3787 @0x5f
0x3728…379b at0060 = ╱38╱8╱ // 0x3788 @0x60
0x3728…379b at0061 = ╱fe00008004╱ // 0x3789 @0x61
0x3728…379b at0066 = ╱ee╱)╱ // 0x378e @0x66
0x3728…379b at0067 = ╱ec╱,╱ // 0x378f @0x67
0x3728…379b at0068 = ╱54╱T╱ // 0x3790 @0x68
0x3728…379b at0069 = ╱31╱1╱ // 0x3791 @0x69
0x3728…379b at006a = ╱ed╱(╱ // 0x3792 @0x6a
0x3728…379b at006b = ╱39╱9╱ // 0x3793 @0x6b
0x3728…379b at006c = ╱fe00009004╱ // 0x3794 @0x6c
0x3728…379b at0071 = ╱ee╱)╱ // 0x3799 @0x71
0x3728…379b at0072 = EOL // 0x379a @0x72
0x3728…379b }
0x379b…37b6 c50d 5640 EXEC FE(9,2,K7$)
0x379b…37b6 LineComalBin {
0x379b…37b6 ptr = 0xc50d // 0x379b @0x0
0x379b…37b6 lno = 0x1608 // 0x379d @0x2
0x379b…37b6 at0004 = ╱9d╱ EXEC ╱ // 0x379f @0x4
0x379b…37b6 at0005 = ╱46╱F╱ // 0x37a0 @0x5
0x379b…37b6 at0006 = ╱45╱E╱ // 0x37a1 @0x6
0x379b…37b6 at0007 = ╱ed╱(╱ // 0x37a2 @0x7
0x379b…37b6 at0008 = ╱39╱9╱ // 0x37a3 @0x8
0x379b…37b6 at0009 = ╱fe00009004╱ // 0x37a4 @0x9
0x379b…37b6 at000e = ╱ec╱,╱ // 0x37a9 @0xe
0x379b…37b6 at000f = ╱32╱2╱ // 0x37aa @0xf
0x379b…37b6 at0010 = ╱fe00008002╱ // 0x37ab @0x10
0x379b…37b6 at0015 = ╱ec╱,╱ // 0x37b0 @0x15
0x379b…37b6 at0016 = ╱4b╱K╱ // 0x37b1 @0x16
0x379b…37b6 at0017 = ╱37╱7╱ // 0x37b2 @0x17
0x379b…37b6 at0018 = ╱ef╱$╱ // 0x37b3 @0x18
0x379b…37b6 at0019 = ╱ee╱)╱ // 0x37b4 @0x19
0x379b…37b6 at001a = EOL // 0x37b5 @0x1a
0x379b…37b6 }
0x37b6…382a c581 5650 PUT K7$,12:T2(1),T2(2),T2(3),T2(4),T2(5),T2(6),T2(7),T2(8),T2(9)
0x37b6…382a LineComalBin {
0x37b6…382a ptr = 0xc581 // 0x37b6 @0x0
0x37b6…382a lno = 0x1612 // 0x37b8 @0x2
0x37b6…382a at0004 = ╱aa╱ PUT ╱ // 0x37ba @0x4
0x37b6…382a at0005 = ╱4b╱K╱ // 0x37bb @0x5
0x37b6…382a at0006 = ╱37╱7╱ // 0x37bc @0x6
0x37b6…382a at0007 = ╱ef╱$╱ // 0x37bd @0x7
0x37b6…382a at0008 = ╱ec╱,╱ // 0x37be @0x8
0x37b6…382a at0009 = ╱31╱1╱ // 0x37bf @0x9
0x37b6…382a at000a = ╱32╱2╱ // 0x37c0 @0xa
0x37b6…382a at000b = ╱fe0000c004╱ // 0x37c1 @0xb
0x37b6…382a at0010 = ╱f0╱:╱ // 0x37c6 @0x10
0x37b6…382a at0011 = ╱54╱T╱ // 0x37c7 @0x11
0x37b6…382a at0012 = ╱32╱2╱ // 0x37c8 @0x12
0x37b6…382a at0013 = ╱ed╱(╱ // 0x37c9 @0x13
0x37b6…382a at0014 = ╱31╱1╱ // 0x37ca @0x14
0x37b6…382a at0015 = ╱fe00008001╱ // 0x37cb @0x15
0x37b6…382a at001a = ╱ee╱)╱ // 0x37d0 @0x1a
0x37b6…382a at001b = ╱ec╱,╱ // 0x37d1 @0x1b
0x37b6…382a at001c = ╱54╱T╱ // 0x37d2 @0x1c
0x37b6…382a at001d = ╱32╱2╱ // 0x37d3 @0x1d
0x37b6…382a at001e = ╱ed╱(╱ // 0x37d4 @0x1e
0x37b6…382a at001f = ╱32╱2╱ // 0x37d5 @0x1f
0x37b6…382a at0020 = ╱fe00008002╱ // 0x37d6 @0x20
0x37b6…382a at0025 = ╱ee╱)╱ // 0x37db @0x25
0x37b6…382a at0026 = ╱ec╱,╱ // 0x37dc @0x26
0x37b6…382a at0027 = ╱54╱T╱ // 0x37dd @0x27
0x37b6…382a at0028 = ╱32╱2╱ // 0x37de @0x28
0x37b6…382a at0029 = ╱ed╱(╱ // 0x37df @0x29
0x37b6…382a at002a = ╱33╱3╱ // 0x37e0 @0x2a
0x37b6…382a at002b = ╱fe0000c002╱ // 0x37e1 @0x2b
0x37b6…382a at0030 = ╱ee╱)╱ // 0x37e6 @0x30
0x37b6…382a at0031 = ╱ec╱,╱ // 0x37e7 @0x31
0x37b6…382a at0032 = ╱54╱T╱ // 0x37e8 @0x32
0x37b6…382a at0033 = ╱32╱2╱ // 0x37e9 @0x33
0x37b6…382a at0034 = ╱ed╱(╱ // 0x37ea @0x34
0x37b6…382a at0035 = ╱34╱4╱ // 0x37eb @0x35
0x37b6…382a at0036 = ╱fe00008003╱ // 0x37ec @0x36
0x37b6…382a at003b = ╱ee╱)╱ // 0x37f1 @0x3b
0x37b6…382a at003c = ╱ec╱,╱ // 0x37f2 @0x3c
0x37b6…382a at003d = ╱54╱T╱ // 0x37f3 @0x3d
0x37b6…382a at003e = ╱32╱2╱ // 0x37f4 @0x3e
0x37b6…382a at003f = ╱ed╱(╱ // 0x37f5 @0x3f
0x37b6…382a at0040 = ╱35╱5╱ // 0x37f6 @0x40
0x37b6…382a at0041 = ╱fe0000a003╱ // 0x37f7 @0x41
0x37b6…382a at0046 = ╱ee╱)╱ // 0x37fc @0x46
0x37b6…382a at0047 = ╱ec╱,╱ // 0x37fd @0x47
0x37b6…382a at0048 = ╱54╱T╱ // 0x37fe @0x48
0x37b6…382a at0049 = ╱32╱2╱ // 0x37ff @0x49
0x37b6…382a at004a = ╱ed╱(╱ // 0x3800 @0x4a
0x37b6…382a at004b = ╱36╱6╱ // 0x3801 @0x4b
0x37b6…382a at004c = ╱fe0000c003╱ // 0x3802 @0x4c
0x37b6…382a at0051 = ╱ee╱)╱ // 0x3807 @0x51
0x37b6…382a at0052 = ╱ec╱,╱ // 0x3808 @0x52
0x37b6…382a at0053 = ╱54╱T╱ // 0x3809 @0x53
0x37b6…382a at0054 = ╱32╱2╱ // 0x380a @0x54
0x37b6…382a at0055 = ╱ed╱(╱ // 0x380b @0x55
0x37b6…382a at0056 = ╱37╱7╱ // 0x380c @0x56
0x37b6…382a at0057 = ╱fe0000e003╱ // 0x380d @0x57
0x37b6…382a at005c = ╱ee╱)╱ // 0x3812 @0x5c
0x37b6…382a at005d = ╱ec╱,╱ // 0x3813 @0x5d
0x37b6…382a at005e = ╱54╱T╱ // 0x3814 @0x5e
0x37b6…382a at005f = ╱32╱2╱ // 0x3815 @0x5f
0x37b6…382a at0060 = ╱ed╱(╱ // 0x3816 @0x60
0x37b6…382a at0061 = ╱38╱8╱ // 0x3817 @0x61
0x37b6…382a at0062 = ╱fe00008004╱ // 0x3818 @0x62
0x37b6…382a at0067 = ╱ee╱)╱ // 0x381d @0x67
0x37b6…382a at0068 = ╱ec╱,╱ // 0x381e @0x68
0x37b6…382a at0069 = ╱54╱T╱ // 0x381f @0x69
0x37b6…382a at006a = ╱32╱2╱ // 0x3820 @0x6a
0x37b6…382a at006b = ╱ed╱(╱ // 0x3821 @0x6b
0x37b6…382a at006c = ╱39╱9╱ // 0x3822 @0x6c
0x37b6…382a at006d = ╱fe00009004╱ // 0x3823 @0x6d
0x37b6…382a at0072 = ╱ee╱)╱ // 0x3828 @0x72
0x37b6…382a at0073 = EOL // 0x3829 @0x73
0x37b6…382a }
0x382a…3845 c59c 5660 EXEC FE(9,3,K7$)
0x382a…3845 LineComalBin {
0x382a…3845 ptr = 0xc59c // 0x382a @0x0
0x382a…3845 lno = 0x161c // 0x382c @0x2
0x382a…3845 at0004 = ╱9d╱ EXEC ╱ // 0x382e @0x4
0x382a…3845 at0005 = ╱46╱F╱ // 0x382f @0x5
0x382a…3845 at0006 = ╱45╱E╱ // 0x3830 @0x6
0x382a…3845 at0007 = ╱ed╱(╱ // 0x3831 @0x7
0x382a…3845 at0008 = ╱39╱9╱ // 0x3832 @0x8
0x382a…3845 at0009 = ╱fe00009004╱ // 0x3833 @0x9
0x382a…3845 at000e = ╱ec╱,╱ // 0x3838 @0xe
0x382a…3845 at000f = ╱33╱3╱ // 0x3839 @0xf
0x382a…3845 at0010 = ╱fe0000c002╱ // 0x383a @0x10
0x382a…3845 at0015 = ╱ec╱,╱ // 0x383f @0x15
0x382a…3845 at0016 = ╱4b╱K╱ // 0x3840 @0x16
0x382a…3845 at0017 = ╱37╱7╱ // 0x3841 @0x17
0x382a…3845 at0018 = ╱ef╱$╱ // 0x3842 @0x18
0x382a…3845 at0019 = ╱ee╱)╱ // 0x3843 @0x19
0x382a…3845 at001a = EOL // 0x3844 @0x1a
0x382a…3845 }
0x3845…384e c5a5 5670 CLOSE K7$
0x3845…384e LineComalBin {
0x3845…384e ptr = 0xc5a5 // 0x3845 @0x0
0x3845…384e lno = 0x1626 // 0x3847 @0x2
0x3845…384e at0004 = ╱a8╱ CLOSE ╱ // 0x3849 @0x4
0x3845…384e at0005 = ╱4b╱K╱ // 0x384a @0x5
0x3845…384e at0006 = ╱37╱7╱ // 0x384b @0x6
0x3845…384e at0007 = ╱ef╱$╱ // 0x384c @0x7
0x3845…384e at0008 = EOL // 0x384d @0x8
0x3845…384e }
0x384e…3869 c5c0 5680 EXEC FE(9,4,K7$)
0x384e…3869 LineComalBin {
0x384e…3869 ptr = 0xc5c0 // 0x384e @0x0
0x384e…3869 lno = 0x1630 // 0x3850 @0x2
0x384e…3869 at0004 = ╱9d╱ EXEC ╱ // 0x3852 @0x4
0x384e…3869 at0005 = ╱46╱F╱ // 0x3853 @0x5
0x384e…3869 at0006 = ╱45╱E╱ // 0x3854 @0x6
0x384e…3869 at0007 = ╱ed╱(╱ // 0x3855 @0x7
0x384e…3869 at0008 = ╱39╱9╱ // 0x3856 @0x8
0x384e…3869 at0009 = ╱fe00009004╱ // 0x3857 @0x9
0x384e…3869 at000e = ╱ec╱,╱ // 0x385c @0xe
0x384e…3869 at000f = ╱34╱4╱ // 0x385d @0xf
0x384e…3869 at0010 = ╱fe00008003╱ // 0x385e @0x10
0x384e…3869 at0015 = ╱ec╱,╱ // 0x3863 @0x15
0x384e…3869 at0016 = ╱4b╱K╱ // 0x3864 @0x16
0x384e…3869 at0017 = ╱37╱7╱ // 0x3865 @0x17
0x384e…3869 at0018 = ╱ef╱$╱ // 0x3866 @0x18
0x384e…3869 at0019 = ╱ee╱)╱ // 0x3867 @0x19
0x384e…3869 at001a = EOL // 0x3868 @0x1a
0x384e…3869 }
0x3869…386f c5c6 5690 ENDPROC
0x3869…386f LineComalBin {
0x3869…386f ptr = 0xc5c6 // 0x3869 @0x0
0x3869…386f lno = 0x163a // 0x386b @0x2
0x3869…386f at0004 = ╱9f╱ ENDPROC ╱ // 0x386d @0x4
0x3869…386f at0005 = EOL // 0x386e @0x5
0x3869…386f }
0x386f…3889 c5e0 5700 K1$="P641220:SYSTEM1"
0x386f…3889 LineComalBin {
0x386f…3889 ptr = 0xc5e0 // 0x386f @0x0
0x386f…3889 lno = 0x1644 // 0x3871 @0x2
0x386f…3889 at0004 = ╱4b╱K╱ // 0x3873 @0x4
0x386f…3889 at0005 = ╱31╱1╱ // 0x3874 @0x5
0x386f…3889 at0006 = ╱ef╱$╱ // 0x3875 @0x6
0x386f…3889 at0007 = ╱dc╱=╱ // 0x3876 @0x7
0x386f…3889 at0008 = ╱22╱"╱ // 0x3877 @0x8
0x386f…3889 at0009 = ╱50╱P╱ // 0x3878 @0x9
0x386f…3889 at000a = ╱36╱6╱ // 0x3879 @0xa
0x386f…3889 at000b = ╱34╱4╱ // 0x387a @0xb
0x386f…3889 at000c = ╱31╱1╱ // 0x387b @0xc
0x386f…3889 at000d = ╱32╱2╱ // 0x387c @0xd
0x386f…3889 at000e = ╱32╱2╱ // 0x387d @0xe
0x386f…3889 at000f = ╱30╱0╱ // 0x387e @0xf
0x386f…3889 at0010 = ╱3a╱:╱ // 0x387f @0x10
0x386f…3889 at0011 = ╱53╱S╱ // 0x3880 @0x11
0x386f…3889 at0012 = ╱59╱Y╱ // 0x3881 @0x12
0x386f…3889 at0013 = ╱53╱S╱ // 0x3882 @0x13
0x386f…3889 at0014 = ╱54╱T╱ // 0x3883 @0x14
0x386f…3889 at0015 = ╱45╱E╱ // 0x3884 @0x15
0x386f…3889 at0016 = ╱4d╱M╱ // 0x3885 @0x16
0x386f…3889 at0017 = ╱31╱1╱ // 0x3886 @0x17
0x386f…3889 at0018 = ╱22╱"╱ // 0x3887 @0x18
0x386f…3889 at0019 = EOL // 0x3888 @0x19
0x386f…3889 }
0x3889…3894 c5eb 5710 OPEN K1$,R
0x3889…3894 LineComalBin {
0x3889…3894 ptr = 0xc5eb // 0x3889 @0x0
0x3889…3894 lno = 0x164e // 0x388b @0x2
0x3889…3894 at0004 = ╱a7╱ OPEN ╱ // 0x388d @0x4
0x3889…3894 at0005 = ╱4b╱K╱ // 0x388e @0x5
0x3889…3894 at0006 = ╱31╱1╱ // 0x388f @0x6
0x3889…3894 at0007 = ╱ef╱$╱ // 0x3890 @0x7
0x3889…3894 at0008 = ╱ec╱,╱ // 0x3891 @0x8
0x3889…3894 at0009 = ╱52╱R╱ // 0x3892 @0x9
0x3889…3894 at000a = EOL // 0x3893 @0xa
0x3889…3894 }
0x3894…38af c606 5720 EXEC FE(9,1,K1$)
0x3894…38af LineComalBin {
0x3894…38af ptr = 0xc606 // 0x3894 @0x0
0x3894…38af lno = 0x1658 // 0x3896 @0x2
0x3894…38af at0004 = ╱9d╱ EXEC ╱ // 0x3898 @0x4
0x3894…38af at0005 = ╱46╱F╱ // 0x3899 @0x5
0x3894…38af at0006 = ╱45╱E╱ // 0x389a @0x6
0x3894…38af at0007 = ╱ed╱(╱ // 0x389b @0x7
0x3894…38af at0008 = ╱39╱9╱ // 0x389c @0x8
0x3894…38af at0009 = ╱fe00009004╱ // 0x389d @0x9
0x3894…38af at000e = ╱ec╱,╱ // 0x38a2 @0xe
0x3894…38af at000f = ╱31╱1╱ // 0x38a3 @0xf
0x3894…38af at0010 = ╱fe00008001╱ // 0x38a4 @0x10
0x3894…38af at0015 = ╱ec╱,╱ // 0x38a9 @0x15
0x3894…38af at0016 = ╱4b╱K╱ // 0x38aa @0x16
0x3894…38af at0017 = ╱31╱1╱ // 0x38ab @0x17
0x3894…38af at0018 = ╱ef╱$╱ // 0x38ac @0x18
0x3894…38af at0019 = ╱ee╱)╱ // 0x38ad @0x19
0x3894…38af at001a = EOL // 0x38ae @0x1a
0x3894…38af }
0x38af…38df c636 5730 GET K1$,1:MFANTAL,MDANTAL,MKANTAL,MVANTAL
0x38af…38df LineComalBin {
0x38af…38df ptr = 0xc636 // 0x38af @0x0
0x38af…38df lno = 0x1662 // 0x38b1 @0x2
0x38af…38df at0004 = ╱a9╱ GET ╱ // 0x38b3 @0x4
0x38af…38df at0005 = ╱4b╱K╱ // 0x38b4 @0x5
0x38af…38df at0006 = ╱31╱1╱ // 0x38b5 @0x6
0x38af…38df at0007 = ╱ef╱$╱ // 0x38b6 @0x7
0x38af…38df at0008 = ╱ec╱,╱ // 0x38b7 @0x8
0x38af…38df at0009 = ╱31╱1╱ // 0x38b8 @0x9
0x38af…38df at000a = ╱fe00008001╱ // 0x38b9 @0xa
0x38af…38df at000f = ╱f0╱:╱ // 0x38be @0xf
0x38af…38df at0010 = ╱4d╱M╱ // 0x38bf @0x10
0x38af…38df at0011 = ╱46╱F╱ // 0x38c0 @0x11
0x38af…38df at0012 = ╱41╱A╱ // 0x38c1 @0x12
0x38af…38df at0013 = ╱4e╱N╱ // 0x38c2 @0x13
0x38af…38df at0014 = ╱54╱T╱ // 0x38c3 @0x14
0x38af…38df at0015 = ╱41╱A╱ // 0x38c4 @0x15
0x38af…38df at0016 = ╱4c╱L╱ // 0x38c5 @0x16
0x38af…38df at0017 = ╱ec╱,╱ // 0x38c6 @0x17
0x38af…38df at0018 = ╱4d╱M╱ // 0x38c7 @0x18
0x38af…38df at0019 = ╱44╱D╱ // 0x38c8 @0x19
0x38af…38df at001a = ╱41╱A╱ // 0x38c9 @0x1a
0x38af…38df at001b = ╱4e╱N╱ // 0x38ca @0x1b
0x38af…38df at001c = ╱54╱T╱ // 0x38cb @0x1c
0x38af…38df at001d = ╱41╱A╱ // 0x38cc @0x1d
0x38af…38df at001e = ╱4c╱L╱ // 0x38cd @0x1e
0x38af…38df at001f = ╱ec╱,╱ // 0x38ce @0x1f
0x38af…38df at0020 = ╱4d╱M╱ // 0x38cf @0x20
0x38af…38df at0021 = ╱4b╱K╱ // 0x38d0 @0x21
0x38af…38df at0022 = ╱41╱A╱ // 0x38d1 @0x22
0x38af…38df at0023 = ╱4e╱N╱ // 0x38d2 @0x23
0x38af…38df at0024 = ╱54╱T╱ // 0x38d3 @0x24
0x38af…38df at0025 = ╱41╱A╱ // 0x38d4 @0x25
0x38af…38df at0026 = ╱4c╱L╱ // 0x38d5 @0x26
0x38af…38df at0027 = ╱ec╱,╱ // 0x38d6 @0x27
0x38af…38df at0028 = ╱4d╱M╱ // 0x38d7 @0x28
0x38af…38df at0029 = ╱56╱V╱ // 0x38d8 @0x29
0x38af…38df at002a = ╱41╱A╱ // 0x38d9 @0x2a
0x38af…38df at002b = ╱4e╱N╱ // 0x38da @0x2b
0x38af…38df at002c = ╱54╱T╱ // 0x38db @0x2c
0x38af…38df at002d = ╱41╱A╱ // 0x38dc @0x2d
0x38af…38df at002e = ╱4c╱L╱ // 0x38dd @0x2e
0x38af…38df at002f = EOL // 0x38de @0x2f
0x38af…38df }
0x38df…38fa c651 5740 EXEC FE(9,2,K1$)
0x38df…38fa LineComalBin {
0x38df…38fa ptr = 0xc651 // 0x38df @0x0
0x38df…38fa lno = 0x166c // 0x38e1 @0x2
0x38df…38fa at0004 = ╱9d╱ EXEC ╱ // 0x38e3 @0x4
0x38df…38fa at0005 = ╱46╱F╱ // 0x38e4 @0x5
0x38df…38fa at0006 = ╱45╱E╱ // 0x38e5 @0x6
0x38df…38fa at0007 = ╱ed╱(╱ // 0x38e6 @0x7
0x38df…38fa at0008 = ╱39╱9╱ // 0x38e7 @0x8
0x38df…38fa at0009 = ╱fe00009004╱ // 0x38e8 @0x9
0x38df…38fa at000e = ╱ec╱,╱ // 0x38ed @0xe
0x38df…38fa at000f = ╱32╱2╱ // 0x38ee @0xf
0x38df…38fa at0010 = ╱fe00008002╱ // 0x38ef @0x10
0x38df…38fa at0015 = ╱ec╱,╱ // 0x38f4 @0x15
0x38df…38fa at0016 = ╱4b╱K╱ // 0x38f5 @0x16
0x38df…38fa at0017 = ╱31╱1╱ // 0x38f6 @0x17
0x38df…38fa at0018 = ╱ef╱$╱ // 0x38f7 @0x18
0x38df…38fa at0019 = ╱ee╱)╱ // 0x38f8 @0x19
0x38df…38fa at001a = EOL // 0x38f9 @0x1a
0x38df…38fa }
0x38fa…391f c676 5750 GET K1$,4:KPOST,MFAK,MVGR,MKGR
0x38fa…391f LineComalBin {
0x38fa…391f ptr = 0xc676 // 0x38fa @0x0
0x38fa…391f lno = 0x1676 // 0x38fc @0x2
0x38fa…391f at0004 = ╱a9╱ GET ╱ // 0x38fe @0x4
0x38fa…391f at0005 = ╱4b╱K╱ // 0x38ff @0x5
0x38fa…391f at0006 = ╱31╱1╱ // 0x3900 @0x6
0x38fa…391f at0007 = ╱ef╱$╱ // 0x3901 @0x7
0x38fa…391f at0008 = ╱ec╱,╱ // 0x3902 @0x8
0x38fa…391f at0009 = ╱34╱4╱ // 0x3903 @0x9
0x38fa…391f at000a = ╱fe00008003╱ // 0x3904 @0xa
0x38fa…391f at000f = ╱f0╱:╱ // 0x3909 @0xf
0x38fa…391f at0010 = ╱4b╱K╱ // 0x390a @0x10
0x38fa…391f at0011 = ╱50╱P╱ // 0x390b @0x11
0x38fa…391f at0012 = ╱4f╱O╱ // 0x390c @0x12
0x38fa…391f at0013 = ╱53╱S╱ // 0x390d @0x13
0x38fa…391f at0014 = ╱54╱T╱ // 0x390e @0x14
0x38fa…391f at0015 = ╱ec╱,╱ // 0x390f @0x15
0x38fa…391f at0016 = ╱4d╱M╱ // 0x3910 @0x16
0x38fa…391f at0017 = ╱46╱F╱ // 0x3911 @0x17
0x38fa…391f at0018 = ╱41╱A╱ // 0x3912 @0x18
0x38fa…391f at0019 = ╱4b╱K╱ // 0x3913 @0x19
0x38fa…391f at001a = ╱ec╱,╱ // 0x3914 @0x1a
0x38fa…391f at001b = ╱4d╱M╱ // 0x3915 @0x1b
0x38fa…391f at001c = ╱56╱V╱ // 0x3916 @0x1c
0x38fa…391f at001d = ╱47╱G╱ // 0x3917 @0x1d
0x38fa…391f at001e = ╱52╱R╱ // 0x3918 @0x1e
0x38fa…391f at001f = ╱ec╱,╱ // 0x3919 @0x1f
0x38fa…391f at0020 = ╱4d╱M╱ // 0x391a @0x20
0x38fa…391f at0021 = ╱4b╱K╱ // 0x391b @0x21
0x38fa…391f at0022 = ╱47╱G╱ // 0x391c @0x22
0x38fa…391f at0023 = ╱52╱R╱ // 0x391d @0x23
0x38fa…391f at0024 = EOL // 0x391e @0x24
0x38fa…391f }
0x391f…393a c691 5760 EXEC FE(9,3,K1$)
0x391f…393a LineComalBin {
0x391f…393a ptr = 0xc691 // 0x391f @0x0
0x391f…393a lno = 0x1680 // 0x3921 @0x2
0x391f…393a at0004 = ╱9d╱ EXEC ╱ // 0x3923 @0x4
0x391f…393a at0005 = ╱46╱F╱ // 0x3924 @0x5
0x391f…393a at0006 = ╱45╱E╱ // 0x3925 @0x6
0x391f…393a at0007 = ╱ed╱(╱ // 0x3926 @0x7
0x391f…393a at0008 = ╱39╱9╱ // 0x3927 @0x8
0x391f…393a at0009 = ╱fe00009004╱ // 0x3928 @0x9
0x391f…393a at000e = ╱ec╱,╱ // 0x392d @0xe
0x391f…393a at000f = ╱33╱3╱ // 0x392e @0xf
0x391f…393a at0010 = ╱fe0000c002╱ // 0x392f @0x10
0x391f…393a at0015 = ╱ec╱,╱ // 0x3934 @0x15
0x391f…393a at0016 = ╱4b╱K╱ // 0x3935 @0x16
0x391f…393a at0017 = ╱31╱1╱ // 0x3936 @0x17
0x391f…393a at0018 = ╱ef╱$╱ // 0x3937 @0x18
0x391f…393a at0019 = ╱ee╱)╱ // 0x3938 @0x19
0x391f…393a at001a = EOL // 0x3939 @0x1a
0x391f…393a }
0x393a…3955 c6ac 5770 GET K1$,5:MKRGR,MFKL
0x393a…3955 LineComalBin {
0x393a…3955 ptr = 0xc6ac // 0x393a @0x0
0x393a…3955 lno = 0x168a // 0x393c @0x2
0x393a…3955 at0004 = ╱a9╱ GET ╱ // 0x393e @0x4
0x393a…3955 at0005 = ╱4b╱K╱ // 0x393f @0x5
0x393a…3955 at0006 = ╱31╱1╱ // 0x3940 @0x6
0x393a…3955 at0007 = ╱ef╱$╱ // 0x3941 @0x7
0x393a…3955 at0008 = ╱ec╱,╱ // 0x3942 @0x8
0x393a…3955 at0009 = ╱35╱5╱ // 0x3943 @0x9
0x393a…3955 at000a = ╱fe0000a003╱ // 0x3944 @0xa
0x393a…3955 at000f = ╱f0╱:╱ // 0x3949 @0xf
0x393a…3955 at0010 = ╱4d╱M╱ // 0x394a @0x10
0x393a…3955 at0011 = ╱4b╱K╱ // 0x394b @0x11
0x393a…3955 at0012 = ╱52╱R╱ // 0x394c @0x12
0x393a…3955 at0013 = ╱47╱G╱ // 0x394d @0x13
0x393a…3955 at0014 = ╱52╱R╱ // 0x394e @0x14
0x393a…3955 at0015 = ╱ec╱,╱ // 0x394f @0x15
0x393a…3955 at0016 = ╱4d╱M╱ // 0x3950 @0x16
0x393a…3955 at0017 = ╱46╱F╱ // 0x3951 @0x17
0x393a…3955 at0018 = ╱4b╱K╱ // 0x3952 @0x18
0x393a…3955 at0019 = ╱4c╱L╱ // 0x3953 @0x19
0x393a…3955 at001a = EOL // 0x3954 @0x1a
0x393a…3955 }
0x3955…3971 c6c8 5780 EXEC FE(9,25,K1$)
0x3955…3971 LineComalBin {
0x3955…3971 ptr = 0xc6c8 // 0x3955 @0x0
0x3955…3971 lno = 0x1694 // 0x3957 @0x2
0x3955…3971 at0004 = ╱9d╱ EXEC ╱ // 0x3959 @0x4
0x3955…3971 at0005 = ╱46╱F╱ // 0x395a @0x5
0x3955…3971 at0006 = ╱45╱E╱ // 0x395b @0x6
0x3955…3971 at0007 = ╱ed╱(╱ // 0x395c @0x7
0x3955…3971 at0008 = ╱39╱9╱ // 0x395d @0x8
0x3955…3971 at0009 = ╱fe00009004╱ // 0x395e @0x9
0x3955…3971 at000e = ╱ec╱,╱ // 0x3963 @0xe
0x3955…3971 at000f = ╱32╱2╱ // 0x3964 @0xf
0x3955…3971 at0010 = ╱35╱5╱ // 0x3965 @0x10
0x3955…3971 at0011 = ╱fe0000c805╱ // 0x3966 @0x11
0x3955…3971 at0016 = ╱ec╱,╱ // 0x396b @0x16
0x3955…3971 at0017 = ╱4b╱K╱ // 0x396c @0x17
0x3955…3971 at0018 = ╱31╱1╱ // 0x396d @0x18
0x3955…3971 at0019 = ╱ef╱$╱ // 0x396e @0x19
0x3955…3971 at001a = ╱ee╱)╱ // 0x396f @0x1a
0x3955…3971 at001b = EOL // 0x3970 @0x1b
0x3955…3971 }
0x3971…3999 c6f0 5790 GET K1$,8:DIVNR,DIVDNR,DIFNR,DTAL
0x3971…3999 LineComalBin {
0x3971…3999 ptr = 0xc6f0 // 0x3971 @0x0
0x3971…3999 lno = 0x169e // 0x3973 @0x2
0x3971…3999 at0004 = ╱a9╱ GET ╱ // 0x3975 @0x4
0x3971…3999 at0005 = ╱4b╱K╱ // 0x3976 @0x5
0x3971…3999 at0006 = ╱31╱1╱ // 0x3977 @0x6
0x3971…3999 at0007 = ╱ef╱$╱ // 0x3978 @0x7
0x3971…3999 at0008 = ╱ec╱,╱ // 0x3979 @0x8
0x3971…3999 at0009 = ╱38╱8╱ // 0x397a @0x9
0x3971…3999 at000a = ╱fe00008004╱ // 0x397b @0xa
0x3971…3999 at000f = ╱f0╱:╱ // 0x3980 @0xf
0x3971…3999 at0010 = ╱44╱D╱ // 0x3981 @0x10
0x3971…3999 at0011 = ╱49╱I╱ // 0x3982 @0x11
0x3971…3999 at0012 = ╱56╱V╱ // 0x3983 @0x12
0x3971…3999 at0013 = ╱4e╱N╱ // 0x3984 @0x13
0x3971…3999 at0014 = ╱52╱R╱ // 0x3985 @0x14
0x3971…3999 at0015 = ╱ec╱,╱ // 0x3986 @0x15
0x3971…3999 at0016 = ╱44╱D╱ // 0x3987 @0x16
0x3971…3999 at0017 = ╱49╱I╱ // 0x3988 @0x17
0x3971…3999 at0018 = ╱56╱V╱ // 0x3989 @0x18
0x3971…3999 at0019 = ╱44╱D╱ // 0x398a @0x19
0x3971…3999 at001a = ╱4e╱N╱ // 0x398b @0x1a
0x3971…3999 at001b = ╱52╱R╱ // 0x398c @0x1b
0x3971…3999 at001c = ╱ec╱,╱ // 0x398d @0x1c
0x3971…3999 at001d = ╱44╱D╱ // 0x398e @0x1d
0x3971…3999 at001e = ╱49╱I╱ // 0x398f @0x1e
0x3971…3999 at001f = ╱46╱F╱ // 0x3990 @0x1f
0x3971…3999 at0020 = ╱4e╱N╱ // 0x3991 @0x20
0x3971…3999 at0021 = ╱52╱R╱ // 0x3992 @0x21
0x3971…3999 at0022 = ╱ec╱,╱ // 0x3993 @0x22
0x3971…3999 at0023 = ╱44╱D╱ // 0x3994 @0x23
0x3971…3999 at0024 = ╱54╱T╱ // 0x3995 @0x24
0x3971…3999 at0025 = ╱41╱A╱ // 0x3996 @0x25
0x3971…3999 at0026 = ╱4c╱L╱ // 0x3997 @0x26
0x3971…3999 at0027 = EOL // 0x3998 @0x27
0x3971…3999 }
0x3999…39b4 c70b 5800 EXEC FE(9,4,K1$)
0x3999…39b4 LineComalBin {
0x3999…39b4 ptr = 0xc70b // 0x3999 @0x0
0x3999…39b4 lno = 0x16a8 // 0x399b @0x2
0x3999…39b4 at0004 = ╱9d╱ EXEC ╱ // 0x399d @0x4
0x3999…39b4 at0005 = ╱46╱F╱ // 0x399e @0x5
0x3999…39b4 at0006 = ╱45╱E╱ // 0x399f @0x6
0x3999…39b4 at0007 = ╱ed╱(╱ // 0x39a0 @0x7
0x3999…39b4 at0008 = ╱39╱9╱ // 0x39a1 @0x8
0x3999…39b4 at0009 = ╱fe00009004╱ // 0x39a2 @0x9
0x3999…39b4 at000e = ╱ec╱,╱ // 0x39a7 @0xe
0x3999…39b4 at000f = ╱34╱4╱ // 0x39a8 @0xf
0x3999…39b4 at0010 = ╱fe00008003╱ // 0x39a9 @0x10
0x3999…39b4 at0015 = ╱ec╱,╱ // 0x39ae @0x15
0x3999…39b4 at0016 = ╱4b╱K╱ // 0x39af @0x16
0x3999…39b4 at0017 = ╱31╱1╱ // 0x39b0 @0x17
0x3999…39b4 at0018 = ╱ef╱$╱ // 0x39b1 @0x18
0x3999…39b4 at0019 = ╱ee╱)╱ // 0x39b2 @0x19
0x3999…39b4 at001a = EOL // 0x39b3 @0x1a
0x3999…39b4 }
0x39b4…39c8 c71f 5810 GET K1$,10:N$
0x39b4…39c8 LineComalBin {
0x39b4…39c8 ptr = 0xc71f // 0x39b4 @0x0
0x39b4…39c8 lno = 0x16b2 // 0x39b6 @0x2
0x39b4…39c8 at0004 = ╱a9╱ GET ╱ // 0x39b8 @0x4
0x39b4…39c8 at0005 = ╱4b╱K╱ // 0x39b9 @0x5
0x39b4…39c8 at0006 = ╱31╱1╱ // 0x39ba @0x6
0x39b4…39c8 at0007 = ╱ef╱$╱ // 0x39bb @0x7
0x39b4…39c8 at0008 = ╱ec╱,╱ // 0x39bc @0x8
0x39b4…39c8 at0009 = ╱31╱1╱ // 0x39bd @0x9
0x39b4…39c8 at000a = ╱30╱0╱ // 0x39be @0xa
0x39b4…39c8 at000b = ╱fe0000a004╱ // 0x39bf @0xb
0x39b4…39c8 at0010 = ╱f0╱:╱ // 0x39c4 @0x10
0x39b4…39c8 at0011 = ╱4e╱N╱ // 0x39c5 @0x11
0x39b4…39c8 at0012 = ╱ef╱$╱ // 0x39c6 @0x12
0x39b4…39c8 at0013 = EOL // 0x39c7 @0x13
0x39b4…39c8 }
0x39c8…39e3 c73a 5820 EXEC FE(9,5,K1$)
0x39c8…39e3 LineComalBin {
0x39c8…39e3 ptr = 0xc73a // 0x39c8 @0x0
0x39c8…39e3 lno = 0x16bc // 0x39ca @0x2
0x39c8…39e3 at0004 = ╱9d╱ EXEC ╱ // 0x39cc @0x4
0x39c8…39e3 at0005 = ╱46╱F╱ // 0x39cd @0x5
0x39c8…39e3 at0006 = ╱45╱E╱ // 0x39ce @0x6
0x39c8…39e3 at0007 = ╱ed╱(╱ // 0x39cf @0x7
0x39c8…39e3 at0008 = ╱39╱9╱ // 0x39d0 @0x8
0x39c8…39e3 at0009 = ╱fe00009004╱ // 0x39d1 @0x9
0x39c8…39e3 at000e = ╱ec╱,╱ // 0x39d6 @0xe
0x39c8…39e3 at000f = ╱35╱5╱ // 0x39d7 @0xf
0x39c8…39e3 at0010 = ╱fe0000a003╱ // 0x39d8 @0x10
0x39c8…39e3 at0015 = ╱ec╱,╱ // 0x39dd @0x15
0x39c8…39e3 at0016 = ╱4b╱K╱ // 0x39de @0x16
0x39c8…39e3 at0017 = ╱31╱1╱ // 0x39df @0x17
0x39c8…39e3 at0018 = ╱ef╱$╱ // 0x39e0 @0x18
0x39c8…39e3 at0019 = ╱ee╱)╱ // 0x39e1 @0x19
0x39c8…39e3 at001a = EOL // 0x39e2 @0x1a
0x39c8…39e3 }
0x39e3…39f8 c74f 5830 GET K1$,12:K2$
0x39e3…39f8 LineComalBin {
0x39e3…39f8 ptr = 0xc74f // 0x39e3 @0x0
0x39e3…39f8 lno = 0x16c6 // 0x39e5 @0x2
0x39e3…39f8 at0004 = ╱a9╱ GET ╱ // 0x39e7 @0x4
0x39e3…39f8 at0005 = ╱4b╱K╱ // 0x39e8 @0x5
0x39e3…39f8 at0006 = ╱31╱1╱ // 0x39e9 @0x6
0x39e3…39f8 at0007 = ╱ef╱$╱ // 0x39ea @0x7
0x39e3…39f8 at0008 = ╱ec╱,╱ // 0x39eb @0x8
0x39e3…39f8 at0009 = ╱31╱1╱ // 0x39ec @0x9
0x39e3…39f8 at000a = ╱32╱2╱ // 0x39ed @0xa
0x39e3…39f8 at000b = ╱fe0000c004╱ // 0x39ee @0xb
0x39e3…39f8 at0010 = ╱f0╱:╱ // 0x39f3 @0x10
0x39e3…39f8 at0011 = ╱4b╱K╱ // 0x39f4 @0x11
0x39e3…39f8 at0012 = ╱32╱2╱ // 0x39f5 @0x12
0x39e3…39f8 at0013 = ╱ef╱$╱ // 0x39f6 @0x13
0x39e3…39f8 at0014 = EOL // 0x39f7 @0x14
0x39e3…39f8 }
0x39f8…3a13 c76a 5840 EXEC FE(9,6,K1$)
0x39f8…3a13 LineComalBin {
0x39f8…3a13 ptr = 0xc76a // 0x39f8 @0x0
0x39f8…3a13 lno = 0x16d0 // 0x39fa @0x2
0x39f8…3a13 at0004 = ╱9d╱ EXEC ╱ // 0x39fc @0x4
0x39f8…3a13 at0005 = ╱46╱F╱ // 0x39fd @0x5
0x39f8…3a13 at0006 = ╱45╱E╱ // 0x39fe @0x6
0x39f8…3a13 at0007 = ╱ed╱(╱ // 0x39ff @0x7
0x39f8…3a13 at0008 = ╱39╱9╱ // 0x3a00 @0x8
0x39f8…3a13 at0009 = ╱fe00009004╱ // 0x3a01 @0x9
0x39f8…3a13 at000e = ╱ec╱,╱ // 0x3a06 @0xe
0x39f8…3a13 at000f = ╱36╱6╱ // 0x3a07 @0xf
0x39f8…3a13 at0010 = ╱fe0000c003╱ // 0x3a08 @0x10
0x39f8…3a13 at0015 = ╱ec╱,╱ // 0x3a0d @0x15
0x39f8…3a13 at0016 = ╱4b╱K╱ // 0x3a0e @0x16
0x39f8…3a13 at0017 = ╱31╱1╱ // 0x3a0f @0x17
0x39f8…3a13 at0018 = ╱ef╱$╱ // 0x3a10 @0x18
0x39f8…3a13 at0019 = ╱ee╱)╱ // 0x3a11 @0x19
0x39f8…3a13 at001a = EOL // 0x3a12 @0x1a
0x39f8…3a13 }
0x3a13…3a28 c77f 5850 GET K1$,14:K3$
0x3a13…3a28 LineComalBin {
0x3a13…3a28 ptr = 0xc77f // 0x3a13 @0x0
0x3a13…3a28 lno = 0x16da // 0x3a15 @0x2
0x3a13…3a28 at0004 = ╱a9╱ GET ╱ // 0x3a17 @0x4
0x3a13…3a28 at0005 = ╱4b╱K╱ // 0x3a18 @0x5
0x3a13…3a28 at0006 = ╱31╱1╱ // 0x3a19 @0x6
0x3a13…3a28 at0007 = ╱ef╱$╱ // 0x3a1a @0x7
0x3a13…3a28 at0008 = ╱ec╱,╱ // 0x3a1b @0x8
0x3a13…3a28 at0009 = ╱31╱1╱ // 0x3a1c @0x9
0x3a13…3a28 at000a = ╱34╱4╱ // 0x3a1d @0xa
0x3a13…3a28 at000b = ╱fe0000e004╱ // 0x3a1e @0xb
0x3a13…3a28 at0010 = ╱f0╱:╱ // 0x3a23 @0x10
0x3a13…3a28 at0011 = ╱4b╱K╱ // 0x3a24 @0x11
0x3a13…3a28 at0012 = ╱33╱3╱ // 0x3a25 @0x12
0x3a13…3a28 at0013 = ╱ef╱$╱ // 0x3a26 @0x13
0x3a13…3a28 at0014 = EOL // 0x3a27 @0x14
0x3a13…3a28 }
0x3a28…3a43 c79a 5860 EXEC FE(9,7,K1$)
0x3a28…3a43 LineComalBin {
0x3a28…3a43 ptr = 0xc79a // 0x3a28 @0x0
0x3a28…3a43 lno = 0x16e4 // 0x3a2a @0x2
0x3a28…3a43 at0004 = ╱9d╱ EXEC ╱ // 0x3a2c @0x4
0x3a28…3a43 at0005 = ╱46╱F╱ // 0x3a2d @0x5
0x3a28…3a43 at0006 = ╱45╱E╱ // 0x3a2e @0x6
0x3a28…3a43 at0007 = ╱ed╱(╱ // 0x3a2f @0x7
0x3a28…3a43 at0008 = ╱39╱9╱ // 0x3a30 @0x8
0x3a28…3a43 at0009 = ╱fe00009004╱ // 0x3a31 @0x9
0x3a28…3a43 at000e = ╱ec╱,╱ // 0x3a36 @0xe
0x3a28…3a43 at000f = ╱37╱7╱ // 0x3a37 @0xf
0x3a28…3a43 at0010 = ╱fe0000e003╱ // 0x3a38 @0x10
0x3a28…3a43 at0015 = ╱ec╱,╱ // 0x3a3d @0x15
0x3a28…3a43 at0016 = ╱4b╱K╱ // 0x3a3e @0x16
0x3a28…3a43 at0017 = ╱31╱1╱ // 0x3a3f @0x17
0x3a28…3a43 at0018 = ╱ef╱$╱ // 0x3a40 @0x18
0x3a28…3a43 at0019 = ╱ee╱)╱ // 0x3a41 @0x19
0x3a28…3a43 at001a = EOL // 0x3a42 @0x1a
0x3a28…3a43 }
0x3a43…3a58 c7af 5870 GET K1$,16:K4$
0x3a43…3a58 LineComalBin {
0x3a43…3a58 ptr = 0xc7af // 0x3a43 @0x0
0x3a43…3a58 lno = 0x16ee // 0x3a45 @0x2
0x3a43…3a58 at0004 = ╱a9╱ GET ╱ // 0x3a47 @0x4
0x3a43…3a58 at0005 = ╱4b╱K╱ // 0x3a48 @0x5
0x3a43…3a58 at0006 = ╱31╱1╱ // 0x3a49 @0x6
0x3a43…3a58 at0007 = ╱ef╱$╱ // 0x3a4a @0x7
0x3a43…3a58 at0008 = ╱ec╱,╱ // 0x3a4b @0x8
0x3a43…3a58 at0009 = ╱31╱1╱ // 0x3a4c @0x9
0x3a43…3a58 at000a = ╱36╱6╱ // 0x3a4d @0xa
0x3a43…3a58 at000b = ╱fe00008005╱ // 0x3a4e @0xb
0x3a43…3a58 at0010 = ╱f0╱:╱ // 0x3a53 @0x10
0x3a43…3a58 at0011 = ╱4b╱K╱ // 0x3a54 @0x11
0x3a43…3a58 at0012 = ╱34╱4╱ // 0x3a55 @0x12
0x3a43…3a58 at0013 = ╱ef╱$╱ // 0x3a56 @0x13
0x3a43…3a58 at0014 = EOL // 0x3a57 @0x14
0x3a43…3a58 }
0x3a58…3a73 c7ca 5880 EXEC FE(9,8,K1$)
0x3a58…3a73 LineComalBin {
0x3a58…3a73 ptr = 0xc7ca // 0x3a58 @0x0
0x3a58…3a73 lno = 0x16f8 // 0x3a5a @0x2
0x3a58…3a73 at0004 = ╱9d╱ EXEC ╱ // 0x3a5c @0x4
0x3a58…3a73 at0005 = ╱46╱F╱ // 0x3a5d @0x5
0x3a58…3a73 at0006 = ╱45╱E╱ // 0x3a5e @0x6
0x3a58…3a73 at0007 = ╱ed╱(╱ // 0x3a5f @0x7
0x3a58…3a73 at0008 = ╱39╱9╱ // 0x3a60 @0x8
0x3a58…3a73 at0009 = ╱fe00009004╱ // 0x3a61 @0x9
0x3a58…3a73 at000e = ╱ec╱,╱ // 0x3a66 @0xe
0x3a58…3a73 at000f = ╱38╱8╱ // 0x3a67 @0xf
0x3a58…3a73 at0010 = ╱fe00008004╱ // 0x3a68 @0x10
0x3a58…3a73 at0015 = ╱ec╱,╱ // 0x3a6d @0x15
0x3a58…3a73 at0016 = ╱4b╱K╱ // 0x3a6e @0x16
0x3a58…3a73 at0017 = ╱31╱1╱ // 0x3a6f @0x17
0x3a58…3a73 at0018 = ╱ef╱$╱ // 0x3a70 @0x18
0x3a58…3a73 at0019 = ╱ee╱)╱ // 0x3a71 @0x19
0x3a58…3a73 at001a = EOL // 0x3a72 @0x1a
0x3a58…3a73 }
0x3a73…3a88 c7df 5890 GET K1$,18:K5$
0x3a73…3a88 LineComalBin {
0x3a73…3a88 ptr = 0xc7df // 0x3a73 @0x0
0x3a73…3a88 lno = 0x1702 // 0x3a75 @0x2
0x3a73…3a88 at0004 = ╱a9╱ GET ╱ // 0x3a77 @0x4
0x3a73…3a88 at0005 = ╱4b╱K╱ // 0x3a78 @0x5
0x3a73…3a88 at0006 = ╱31╱1╱ // 0x3a79 @0x6
0x3a73…3a88 at0007 = ╱ef╱$╱ // 0x3a7a @0x7
0x3a73…3a88 at0008 = ╱ec╱,╱ // 0x3a7b @0x8
0x3a73…3a88 at0009 = ╱31╱1╱ // 0x3a7c @0x9
0x3a73…3a88 at000a = ╱38╱8╱ // 0x3a7d @0xa
0x3a73…3a88 at000b = ╱fe00009005╱ // 0x3a7e @0xb
0x3a73…3a88 at0010 = ╱f0╱:╱ // 0x3a83 @0x10
0x3a73…3a88 at0011 = ╱4b╱K╱ // 0x3a84 @0x11
0x3a73…3a88 at0012 = ╱35╱5╱ // 0x3a85 @0x12
0x3a73…3a88 at0013 = ╱ef╱$╱ // 0x3a86 @0x13
0x3a73…3a88 at0014 = EOL // 0x3a87 @0x14
0x3a73…3a88 }
0x3a88…3aa3 c7fa 5900 EXEC FE(9,9,K1$)
0x3a88…3aa3 LineComalBin {
0x3a88…3aa3 ptr = 0xc7fa // 0x3a88 @0x0
0x3a88…3aa3 lno = 0x170c // 0x3a8a @0x2
0x3a88…3aa3 at0004 = ╱9d╱ EXEC ╱ // 0x3a8c @0x4
0x3a88…3aa3 at0005 = ╱46╱F╱ // 0x3a8d @0x5
0x3a88…3aa3 at0006 = ╱45╱E╱ // 0x3a8e @0x6
0x3a88…3aa3 at0007 = ╱ed╱(╱ // 0x3a8f @0x7
0x3a88…3aa3 at0008 = ╱39╱9╱ // 0x3a90 @0x8
0x3a88…3aa3 at0009 = ╱fe00009004╱ // 0x3a91 @0x9
0x3a88…3aa3 at000e = ╱ec╱,╱ // 0x3a96 @0xe
0x3a88…3aa3 at000f = ╱39╱9╱ // 0x3a97 @0xf
0x3a88…3aa3 at0010 = ╱fe00009004╱ // 0x3a98 @0x10
0x3a88…3aa3 at0015 = ╱ec╱,╱ // 0x3a9d @0x15
0x3a88…3aa3 at0016 = ╱4b╱K╱ // 0x3a9e @0x16
0x3a88…3aa3 at0017 = ╱31╱1╱ // 0x3a9f @0x17
0x3a88…3aa3 at0018 = ╱ef╱$╱ // 0x3aa0 @0x18
0x3a88…3aa3 at0019 = ╱ee╱)╱ // 0x3aa1 @0x19
0x3a88…3aa3 at001a = EOL // 0x3aa2 @0x1a
0x3a88…3aa3 }
0x3aa3…3ab8 c80f 5910 GET K1$,29:K6$
0x3aa3…3ab8 LineComalBin {
0x3aa3…3ab8 ptr = 0xc80f // 0x3aa3 @0x0
0x3aa3…3ab8 lno = 0x1716 // 0x3aa5 @0x2
0x3aa3…3ab8 at0004 = ╱a9╱ GET ╱ // 0x3aa7 @0x4
0x3aa3…3ab8 at0005 = ╱4b╱K╱ // 0x3aa8 @0x5
0x3aa3…3ab8 at0006 = ╱31╱1╱ // 0x3aa9 @0x6
0x3aa3…3ab8 at0007 = ╱ef╱$╱ // 0x3aaa @0x7
0x3aa3…3ab8 at0008 = ╱ec╱,╱ // 0x3aab @0x8
0x3aa3…3ab8 at0009 = ╱32╱2╱ // 0x3aac @0x9
0x3aa3…3ab8 at000a = ╱39╱9╱ // 0x3aad @0xa
0x3aa3…3ab8 at000b = ╱fe0000e805╱ // 0x3aae @0xb
0x3aa3…3ab8 at0010 = ╱f0╱:╱ // 0x3ab3 @0x10
0x3aa3…3ab8 at0011 = ╱4b╱K╱ // 0x3ab4 @0x11
0x3aa3…3ab8 at0012 = ╱36╱6╱ // 0x3ab5 @0x12
0x3aa3…3ab8 at0013 = ╱ef╱$╱ // 0x3ab6 @0x13
0x3aa3…3ab8 at0014 = EOL // 0x3ab7 @0x14
0x3aa3…3ab8 }
0x3ab8…3ad4 c82b 5920 EXEC FE(9,10,K1$)
0x3ab8…3ad4 LineComalBin {
0x3ab8…3ad4 ptr = 0xc82b // 0x3ab8 @0x0
0x3ab8…3ad4 lno = 0x1720 // 0x3aba @0x2
0x3ab8…3ad4 at0004 = ╱9d╱ EXEC ╱ // 0x3abc @0x4
0x3ab8…3ad4 at0005 = ╱46╱F╱ // 0x3abd @0x5
0x3ab8…3ad4 at0006 = ╱45╱E╱ // 0x3abe @0x6
0x3ab8…3ad4 at0007 = ╱ed╱(╱ // 0x3abf @0x7
0x3ab8…3ad4 at0008 = ╱39╱9╱ // 0x3ac0 @0x8
0x3ab8…3ad4 at0009 = ╱fe00009004╱ // 0x3ac1 @0x9
0x3ab8…3ad4 at000e = ╱ec╱,╱ // 0x3ac6 @0xe
0x3ab8…3ad4 at000f = ╱31╱1╱ // 0x3ac7 @0xf
0x3ab8…3ad4 at0010 = ╱30╱0╱ // 0x3ac8 @0x10
0x3ab8…3ad4 at0011 = ╱fe0000a004╱ // 0x3ac9 @0x11
0x3ab8…3ad4 at0016 = ╱ec╱,╱ // 0x3ace @0x16
0x3ab8…3ad4 at0017 = ╱4b╱K╱ // 0x3acf @0x17
0x3ab8…3ad4 at0018 = ╱31╱1╱ // 0x3ad0 @0x18
0x3ab8…3ad4 at0019 = ╱ef╱$╱ // 0x3ad1 @0x19
0x3ab8…3ad4 at001a = ╱ee╱)╱ // 0x3ad2 @0x1a
0x3ab8…3ad4 at001b = EOL // 0x3ad3 @0x1b
0x3ab8…3ad4 }
0x3ad4…3ae9 c840 5930 GET K1$,36:K7$
0x3ad4…3ae9 LineComalBin {
0x3ad4…3ae9 ptr = 0xc840 // 0x3ad4 @0x0
0x3ad4…3ae9 lno = 0x172a // 0x3ad6 @0x2
0x3ad4…3ae9 at0004 = ╱a9╱ GET ╱ // 0x3ad8 @0x4
0x3ad4…3ae9 at0005 = ╱4b╱K╱ // 0x3ad9 @0x5
0x3ad4…3ae9 at0006 = ╱31╱1╱ // 0x3ada @0x6
0x3ad4…3ae9 at0007 = ╱ef╱$╱ // 0x3adb @0x7
0x3ad4…3ae9 at0008 = ╱ec╱,╱ // 0x3adc @0x8
0x3ad4…3ae9 at0009 = ╱33╱3╱ // 0x3add @0x9
0x3ad4…3ae9 at000a = ╱36╱6╱ // 0x3ade @0xa
0x3ad4…3ae9 at000b = ╱fe00009006╱ // 0x3adf @0xb
0x3ad4…3ae9 at0010 = ╱f0╱:╱ // 0x3ae4 @0x10
0x3ad4…3ae9 at0011 = ╱4b╱K╱ // 0x3ae5 @0x11
0x3ad4…3ae9 at0012 = ╱37╱7╱ // 0x3ae6 @0x12
0x3ad4…3ae9 at0013 = ╱ef╱$╱ // 0x3ae7 @0x13
0x3ad4…3ae9 at0014 = EOL // 0x3ae8 @0x14
0x3ad4…3ae9 }
0x3ae9…3b05 c85c 5940 EXEC FE(9,11,K1$)
0x3ae9…3b05 LineComalBin {
0x3ae9…3b05 ptr = 0xc85c // 0x3ae9 @0x0
0x3ae9…3b05 lno = 0x1734 // 0x3aeb @0x2
0x3ae9…3b05 at0004 = ╱9d╱ EXEC ╱ // 0x3aed @0x4
0x3ae9…3b05 at0005 = ╱46╱F╱ // 0x3aee @0x5
0x3ae9…3b05 at0006 = ╱45╱E╱ // 0x3aef @0x6
0x3ae9…3b05 at0007 = ╱ed╱(╱ // 0x3af0 @0x7
0x3ae9…3b05 at0008 = ╱39╱9╱ // 0x3af1 @0x8
0x3ae9…3b05 at0009 = ╱fe00009004╱ // 0x3af2 @0x9
0x3ae9…3b05 at000e = ╱ec╱,╱ // 0x3af7 @0xe
0x3ae9…3b05 at000f = ╱31╱1╱ // 0x3af8 @0xf
0x3ae9…3b05 at0010 = ╱31╱1╱ // 0x3af9 @0x10
0x3ae9…3b05 at0011 = ╱fe0000b004╱ // 0x3afa @0x11
0x3ae9…3b05 at0016 = ╱ec╱,╱ // 0x3aff @0x16
0x3ae9…3b05 at0017 = ╱4b╱K╱ // 0x3b00 @0x17
0x3ae9…3b05 at0018 = ╱31╱1╱ // 0x3b01 @0x18
0x3ae9…3b05 at0019 = ╱ef╱$╱ // 0x3b02 @0x19
0x3ae9…3b05 at001a = ╱ee╱)╱ // 0x3b03 @0x1a
0x3ae9…3b05 at001b = EOL // 0x3b04 @0x1b
0x3ae9…3b05 }
0x3b05…3b0e c865 5950 CLOSE K1$
0x3b05…3b0e LineComalBin {
0x3b05…3b0e ptr = 0xc865 // 0x3b05 @0x0
0x3b05…3b0e lno = 0x173e // 0x3b07 @0x2
0x3b05…3b0e at0004 = ╱a8╱ CLOSE ╱ // 0x3b09 @0x4
0x3b05…3b0e at0005 = ╱4b╱K╱ // 0x3b0a @0x5
0x3b05…3b0e at0006 = ╱31╱1╱ // 0x3b0b @0x6
0x3b05…3b0e at0007 = ╱ef╱$╱ // 0x3b0c @0x7
0x3b05…3b0e at0008 = EOL // 0x3b0d @0x8
0x3b05…3b0e }
0x3b0e…3b2a c881 5960 EXEC FE(9,12,K1$)
0x3b0e…3b2a LineComalBin {
0x3b0e…3b2a ptr = 0xc881 // 0x3b0e @0x0
0x3b0e…3b2a lno = 0x1748 // 0x3b10 @0x2
0x3b0e…3b2a at0004 = ╱9d╱ EXEC ╱ // 0x3b12 @0x4
0x3b0e…3b2a at0005 = ╱46╱F╱ // 0x3b13 @0x5
0x3b0e…3b2a at0006 = ╱45╱E╱ // 0x3b14 @0x6
0x3b0e…3b2a at0007 = ╱ed╱(╱ // 0x3b15 @0x7
0x3b0e…3b2a at0008 = ╱39╱9╱ // 0x3b16 @0x8
0x3b0e…3b2a at0009 = ╱fe00009004╱ // 0x3b17 @0x9
0x3b0e…3b2a at000e = ╱ec╱,╱ // 0x3b1c @0xe
0x3b0e…3b2a at000f = ╱31╱1╱ // 0x3b1d @0xf
0x3b0e…3b2a at0010 = ╱32╱2╱ // 0x3b1e @0x10
0x3b0e…3b2a at0011 = ╱fe0000c004╱ // 0x3b1f @0x11
0x3b0e…3b2a at0016 = ╱ec╱,╱ // 0x3b24 @0x16
0x3b0e…3b2a at0017 = ╱4b╱K╱ // 0x3b25 @0x17
0x3b0e…3b2a at0018 = ╱31╱1╱ // 0x3b26 @0x18
0x3b0e…3b2a at0019 = ╱ef╱$╱ // 0x3b27 @0x19
0x3b0e…3b2a at001a = ╱ee╱)╱ // 0x3b28 @0x1a
0x3b0e…3b2a at001b = EOL // 0x3b29 @0x1b
0x3b0e…3b2a }
0x3b2a…3b71 c8c8 5970 DIM VAANTARR$(MFKL,7),ARRKODER(1+MFKL,2),VANRARR(MFKL)
0x3b2a…3b71 LineComalBin {
0x3b2a…3b71 ptr = 0xc8c8 // 0x3b2a @0x0
0x3b2a…3b71 lno = 0x1752 // 0x3b2c @0x2
0x3b2a…3b71 at0004 = ╱87╱ DIM ╱ // 0x3b2e @0x4
0x3b2a…3b71 at0005 = ╱56╱V╱ // 0x3b2f @0x5
0x3b2a…3b71 at0006 = ╱41╱A╱ // 0x3b30 @0x6
0x3b2a…3b71 at0007 = ╱41╱A╱ // 0x3b31 @0x7
0x3b2a…3b71 at0008 = ╱4e╱N╱ // 0x3b32 @0x8
0x3b2a…3b71 at0009 = ╱54╱T╱ // 0x3b33 @0x9
0x3b2a…3b71 at000a = ╱41╱A╱ // 0x3b34 @0xa
0x3b2a…3b71 at000b = ╱52╱R╱ // 0x3b35 @0xb
0x3b2a…3b71 at000c = ╱52╱R╱ // 0x3b36 @0xc
0x3b2a…3b71 at000d = ╱ef╱$╱ // 0x3b37 @0xd
0x3b2a…3b71 at000e = ╱ed╱(╱ // 0x3b38 @0xe
0x3b2a…3b71 at000f = ╱4d╱M╱ // 0x3b39 @0xf
0x3b2a…3b71 at0010 = ╱46╱F╱ // 0x3b3a @0x10
0x3b2a…3b71 at0011 = ╱4b╱K╱ // 0x3b3b @0x11
0x3b2a…3b71 at0012 = ╱4c╱L╱ // 0x3b3c @0x12
0x3b2a…3b71 at0013 = ╱ec╱,╱ // 0x3b3d @0x13
0x3b2a…3b71 at0014 = ╱37╱7╱ // 0x3b3e @0x14
0x3b2a…3b71 at0015 = ╱fe0000e003╱ // 0x3b3f @0x15
0x3b2a…3b71 at001a = ╱ee╱)╱ // 0x3b44 @0x1a
0x3b2a…3b71 at001b = ╱ec╱,╱ // 0x3b45 @0x1b
0x3b2a…3b71 at001c = ╱41╱A╱ // 0x3b46 @0x1c
0x3b2a…3b71 at001d = ╱52╱R╱ // 0x3b47 @0x1d
0x3b2a…3b71 at001e = ╱52╱R╱ // 0x3b48 @0x1e
0x3b2a…3b71 at001f = ╱4b╱K╱ // 0x3b49 @0x1f
0x3b2a…3b71 at0020 = ╱4f╱O╱ // 0x3b4a @0x20
0x3b2a…3b71 at0021 = ╱44╱D╱ // 0x3b4b @0x21
0x3b2a…3b71 at0022 = ╱45╱E╱ // 0x3b4c @0x22
0x3b2a…3b71 at0023 = ╱52╱R╱ // 0x3b4d @0x23
0x3b2a…3b71 at0024 = ╱ed╱(╱ // 0x3b4e @0x24
0x3b2a…3b71 at0025 = ╱31╱1╱ // 0x3b4f @0x25
0x3b2a…3b71 at0026 = ╱fe00008001╱ // 0x3b50 @0x26
0x3b2a…3b71 at002b = ╱e2╱+╱ // 0x3b55 @0x2b
0x3b2a…3b71 at002c = ╱4d╱M╱ // 0x3b56 @0x2c
0x3b2a…3b71 at002d = ╱46╱F╱ // 0x3b57 @0x2d
0x3b2a…3b71 at002e = ╱4b╱K╱ // 0x3b58 @0x2e
0x3b2a…3b71 at002f = ╱4c╱L╱ // 0x3b59 @0x2f
0x3b2a…3b71 at0030 = ╱ec╱,╱ // 0x3b5a @0x30
0x3b2a…3b71 at0031 = ╱32╱2╱ // 0x3b5b @0x31
0x3b2a…3b71 at0032 = ╱fe00008002╱ // 0x3b5c @0x32
0x3b2a…3b71 at0037 = ╱ee╱)╱ // 0x3b61 @0x37
0x3b2a…3b71 at0038 = ╱ec╱,╱ // 0x3b62 @0x38
0x3b2a…3b71 at0039 = ╱56╱V╱ // 0x3b63 @0x39
0x3b2a…3b71 at003a = ╱41╱A╱ // 0x3b64 @0x3a
0x3b2a…3b71 at003b = ╱4e╱N╱ // 0x3b65 @0x3b
0x3b2a…3b71 at003c = ╱52╱R╱ // 0x3b66 @0x3c
0x3b2a…3b71 at003d = ╱41╱A╱ // 0x3b67 @0x3d
0x3b2a…3b71 at003e = ╱52╱R╱ // 0x3b68 @0x3e
0x3b2a…3b71 at003f = ╱52╱R╱ // 0x3b69 @0x3f
0x3b2a…3b71 at0040 = ╱ed╱(╱ // 0x3b6a @0x40
0x3b2a…3b71 at0041 = ╱4d╱M╱ // 0x3b6b @0x41
0x3b2a…3b71 at0042 = ╱46╱F╱ // 0x3b6c @0x42
0x3b2a…3b71 at0043 = ╱4b╱K╱ // 0x3b6d @0x43
0x3b2a…3b71 at0044 = ╱4c╱L╱ // 0x3b6e @0x44
0x3b2a…3b71 at0045 = ╱ee╱)╱ // 0x3b6f @0x45
0x3b2a…3b71 at0046 = EOL // 0x3b70 @0x46
0x3b2a…3b71 }
0x3b71…3bbe c915 5980 DIM VATEKARR$(MFKL,50),VAPRIARR$(MFKL,12),BELØBARR$(MFKL,12)
0x3b71…3bbe LineComalBin {
0x3b71…3bbe ptr = 0xc915 // 0x3b71 @0x0
0x3b71…3bbe lno = 0x175c // 0x3b73 @0x2
0x3b71…3bbe at0004 = ╱87╱ DIM ╱ // 0x3b75 @0x4
0x3b71…3bbe at0005 = ╱56╱V╱ // 0x3b76 @0x5
0x3b71…3bbe at0006 = ╱41╱A╱ // 0x3b77 @0x6
0x3b71…3bbe at0007 = ╱54╱T╱ // 0x3b78 @0x7
0x3b71…3bbe at0008 = ╱45╱E╱ // 0x3b79 @0x8
0x3b71…3bbe at0009 = ╱4b╱K╱ // 0x3b7a @0x9
0x3b71…3bbe at000a = ╱41╱A╱ // 0x3b7b @0xa
0x3b71…3bbe at000b = ╱52╱R╱ // 0x3b7c @0xb
0x3b71…3bbe at000c = ╱52╱R╱ // 0x3b7d @0xc
0x3b71…3bbe at000d = ╱ef╱$╱ // 0x3b7e @0xd
0x3b71…3bbe at000e = ╱ed╱(╱ // 0x3b7f @0xe
0x3b71…3bbe at000f = ╱4d╱M╱ // 0x3b80 @0xf
0x3b71…3bbe at0010 = ╱46╱F╱ // 0x3b81 @0x10
0x3b71…3bbe at0011 = ╱4b╱K╱ // 0x3b82 @0x11
0x3b71…3bbe at0012 = ╱4c╱L╱ // 0x3b83 @0x12
0x3b71…3bbe at0013 = ╱ec╱,╱ // 0x3b84 @0x13
0x3b71…3bbe at0014 = ╱35╱5╱ // 0x3b85 @0x14
0x3b71…3bbe at0015 = ╱30╱0╱ // 0x3b86 @0x15
0x3b71…3bbe at0016 = ╱fe0000c806╱ // 0x3b87 @0x16
0x3b71…3bbe at001b = ╱ee╱)╱ // 0x3b8c @0x1b
0x3b71…3bbe at001c = ╱ec╱,╱ // 0x3b8d @0x1c
0x3b71…3bbe at001d = ╱56╱V╱ // 0x3b8e @0x1d
0x3b71…3bbe at001e = ╱41╱A╱ // 0x3b8f @0x1e
0x3b71…3bbe at001f = ╱50╱P╱ // 0x3b90 @0x1f
0x3b71…3bbe at0020 = ╱52╱R╱ // 0x3b91 @0x20
0x3b71…3bbe at0021 = ╱49╱I╱ // 0x3b92 @0x21
0x3b71…3bbe at0022 = ╱41╱A╱ // 0x3b93 @0x22
0x3b71…3bbe at0023 = ╱52╱R╱ // 0x3b94 @0x23
0x3b71…3bbe at0024 = ╱52╱R╱ // 0x3b95 @0x24
0x3b71…3bbe at0025 = ╱ef╱$╱ // 0x3b96 @0x25
0x3b71…3bbe at0026 = ╱ed╱(╱ // 0x3b97 @0x26
0x3b71…3bbe at0027 = ╱4d╱M╱ // 0x3b98 @0x27
0x3b71…3bbe at0028 = ╱46╱F╱ // 0x3b99 @0x28
0x3b71…3bbe at0029 = ╱4b╱K╱ // 0x3b9a @0x29
0x3b71…3bbe at002a = ╱4c╱L╱ // 0x3b9b @0x2a
0x3b71…3bbe at002b = ╱ec╱,╱ // 0x3b9c @0x2b
0x3b71…3bbe at002c = ╱31╱1╱ // 0x3b9d @0x2c
0x3b71…3bbe at002d = ╱32╱2╱ // 0x3b9e @0x2d
0x3b71…3bbe at002e = ╱fe0000c004╱ // 0x3b9f @0x2e
0x3b71…3bbe at0033 = ╱ee╱)╱ // 0x3ba4 @0x33
0x3b71…3bbe at0034 = ╱ec╱,╱ // 0x3ba5 @0x34
0x3b71…3bbe at0035 = ╱42╱B╱ // 0x3ba6 @0x35
0x3b71…3bbe at0036 = ╱45╱E╱ // 0x3ba7 @0x36
0x3b71…3bbe at0037 = ╱4c╱L╱ // 0x3ba8 @0x37
0x3b71…3bbe at0038 = ╱5c╱Ø╱ // 0x3ba9 @0x38
0x3b71…3bbe at0039 = ╱42╱B╱ // 0x3baa @0x39
0x3b71…3bbe at003a = ╱41╱A╱ // 0x3bab @0x3a
0x3b71…3bbe at003b = ╱52╱R╱ // 0x3bac @0x3b
0x3b71…3bbe at003c = ╱52╱R╱ // 0x3bad @0x3c
0x3b71…3bbe at003d = ╱ef╱$╱ // 0x3bae @0x3d
0x3b71…3bbe at003e = ╱ed╱(╱ // 0x3baf @0x3e
0x3b71…3bbe at003f = ╱4d╱M╱ // 0x3bb0 @0x3f
0x3b71…3bbe at0040 = ╱46╱F╱ // 0x3bb1 @0x40
0x3b71…3bbe at0041 = ╱4b╱K╱ // 0x3bb2 @0x41
0x3b71…3bbe at0042 = ╱4c╱L╱ // 0x3bb3 @0x42
0x3b71…3bbe at0043 = ╱ec╱,╱ // 0x3bb4 @0x43
0x3b71…3bbe at0044 = ╱31╱1╱ // 0x3bb5 @0x44
0x3b71…3bbe at0045 = ╱32╱2╱ // 0x3bb6 @0x45
0x3b71…3bbe at0046 = ╱fe0000c004╱ // 0x3bb7 @0x46
0x3b71…3bbe at004b = ╱ee╱)╱ // 0x3bbc @0x4b
0x3b71…3bbe at004c = EOL // 0x3bbd @0x4c
0x3b71…3bbe }
0x3bbe…3c17 c96e 5990 DIM VTAB1(MVANTAL DIV 4),DTAB1(MDANTAL DIV 4),VTAB(4,2),DTAB(4,2)
0x3bbe…3c17 LineComalBin {
0x3bbe…3c17 ptr = 0xc96e // 0x3bbe @0x0
0x3bbe…3c17 lno = 0x1766 // 0x3bc0 @0x2
0x3bbe…3c17 at0004 = ╱87╱ DIM ╱ // 0x3bc2 @0x4
0x3bbe…3c17 at0005 = ╱56╱V╱ // 0x3bc3 @0x5
0x3bbe…3c17 at0006 = ╱54╱T╱ // 0x3bc4 @0x6
0x3bbe…3c17 at0007 = ╱41╱A╱ // 0x3bc5 @0x7
0x3bbe…3c17 at0008 = ╱42╱B╱ // 0x3bc6 @0x8
0x3bbe…3c17 at0009 = ╱31╱1╱ // 0x3bc7 @0x9
0x3bbe…3c17 at000a = ╱ed╱(╱ // 0x3bc8 @0xa
0x3bbe…3c17 at000b = ╱4d╱M╱ // 0x3bc9 @0xb
0x3bbe…3c17 at000c = ╱56╱V╱ // 0x3bca @0xc
0x3bbe…3c17 at000d = ╱41╱A╱ // 0x3bcb @0xd
0x3bbe…3c17 at000e = ╱4e╱N╱ // 0x3bcc @0xe
0x3bbe…3c17 at000f = ╱54╱T╱ // 0x3bcd @0xf
0x3bbe…3c17 at0010 = ╱41╱A╱ // 0x3bce @0x10
0x3bbe…3c17 at0011 = ╱4c╱L╱ // 0x3bcf @0x11
0x3bbe…3c17 at0012 = ╱e7╱ DIV ╱ // 0x3bd0 @0x12
0x3bbe…3c17 at0013 = ╱34╱4╱ // 0x3bd1 @0x13
0x3bbe…3c17 at0014 = ╱fe00008003╱ // 0x3bd2 @0x14
0x3bbe…3c17 at0019 = ╱ee╱)╱ // 0x3bd7 @0x19
0x3bbe…3c17 at001a = ╱ec╱,╱ // 0x3bd8 @0x1a
0x3bbe…3c17 at001b = ╱44╱D╱ // 0x3bd9 @0x1b
0x3bbe…3c17 at001c = ╱54╱T╱ // 0x3bda @0x1c
0x3bbe…3c17 at001d = ╱41╱A╱ // 0x3bdb @0x1d
0x3bbe…3c17 at001e = ╱42╱B╱ // 0x3bdc @0x1e
0x3bbe…3c17 at001f = ╱31╱1╱ // 0x3bdd @0x1f
0x3bbe…3c17 at0020 = ╱ed╱(╱ // 0x3bde @0x20
0x3bbe…3c17 at0021 = ╱4d╱M╱ // 0x3bdf @0x21
0x3bbe…3c17 at0022 = ╱44╱D╱ // 0x3be0 @0x22
0x3bbe…3c17 at0023 = ╱41╱A╱ // 0x3be1 @0x23
0x3bbe…3c17 at0024 = ╱4e╱N╱ // 0x3be2 @0x24
0x3bbe…3c17 at0025 = ╱54╱T╱ // 0x3be3 @0x25
0x3bbe…3c17 at0026 = ╱41╱A╱ // 0x3be4 @0x26
0x3bbe…3c17 at0027 = ╱4c╱L╱ // 0x3be5 @0x27
0x3bbe…3c17 at0028 = ╱e7╱ DIV ╱ // 0x3be6 @0x28
0x3bbe…3c17 at0029 = ╱34╱4╱ // 0x3be7 @0x29
0x3bbe…3c17 at002a = ╱fe00008003╱ // 0x3be8 @0x2a
0x3bbe…3c17 at002f = ╱ee╱)╱ // 0x3bed @0x2f
0x3bbe…3c17 at0030 = ╱ec╱,╱ // 0x3bee @0x30
0x3bbe…3c17 at0031 = ╱56╱V╱ // 0x3bef @0x31
0x3bbe…3c17 at0032 = ╱54╱T╱ // 0x3bf0 @0x32
0x3bbe…3c17 at0033 = ╱41╱A╱ // 0x3bf1 @0x33
0x3bbe…3c17 at0034 = ╱42╱B╱ // 0x3bf2 @0x34
0x3bbe…3c17 at0035 = ╱ed╱(╱ // 0x3bf3 @0x35
0x3bbe…3c17 at0036 = ╱34╱4╱ // 0x3bf4 @0x36
0x3bbe…3c17 at0037 = ╱fe00008003╱ // 0x3bf5 @0x37
0x3bbe…3c17 at003c = ╱ec╱,╱ // 0x3bfa @0x3c
0x3bbe…3c17 at003d = ╱32╱2╱ // 0x3bfb @0x3d
0x3bbe…3c17 at003e = ╱fe00008002╱ // 0x3bfc @0x3e
0x3bbe…3c17 at0043 = ╱ee╱)╱ // 0x3c01 @0x43
0x3bbe…3c17 at0044 = ╱ec╱,╱ // 0x3c02 @0x44
0x3bbe…3c17 at0045 = ╱44╱D╱ // 0x3c03 @0x45
0x3bbe…3c17 at0046 = ╱54╱T╱ // 0x3c04 @0x46
0x3bbe…3c17 at0047 = ╱41╱A╱ // 0x3c05 @0x47
0x3bbe…3c17 at0048 = ╱42╱B╱ // 0x3c06 @0x48
0x3bbe…3c17 at0049 = ╱ed╱(╱ // 0x3c07 @0x49
0x3bbe…3c17 at004a = ╱34╱4╱ // 0x3c08 @0x4a
0x3bbe…3c17 at004b = ╱fe00008003╱ // 0x3c09 @0x4b
0x3bbe…3c17 at0050 = ╱ec╱,╱ // 0x3c0e @0x50
0x3bbe…3c17 at0051 = ╱32╱2╱ // 0x3c0f @0x51
0x3bbe…3c17 at0052 = ╱fe00008002╱ // 0x3c10 @0x52
0x3bbe…3c17 at0057 = ╱ee╱)╱ // 0x3c15 @0x57
0x3bbe…3c17 at0058 = EOL // 0x3c16 @0x58
0x3bbe…3c17 }
0x3c17…3c5d c9b4 6000 K2$=N$+K2$;K3$=N$+K3$;K4$=N$+K4$;K5$=N$+K5$;K6$=N$+K6$;K7$=N$+K7$
0x3c17…3c5d LineComalBin {
0x3c17…3c5d ptr = 0xc9b4 // 0x3c17 @0x0
0x3c17…3c5d lno = 0x1770 // 0x3c19 @0x2
0x3c17…3c5d at0004 = ╱4b╱K╱ // 0x3c1b @0x4
0x3c17…3c5d at0005 = ╱32╱2╱ // 0x3c1c @0x5
0x3c17…3c5d at0006 = ╱ef╱$╱ // 0x3c1d @0x6
0x3c17…3c5d at0007 = ╱dc╱=╱ // 0x3c1e @0x7
0x3c17…3c5d at0008 = ╱4e╱N╱ // 0x3c1f @0x8
0x3c17…3c5d at0009 = ╱ef╱$╱ // 0x3c20 @0x9
0x3c17…3c5d at000a = ╱f1╱+╱ // 0x3c21 @0xa
0x3c17…3c5d at000b = ╱4b╱K╱ // 0x3c22 @0xb
0x3c17…3c5d at000c = ╱32╱2╱ // 0x3c23 @0xc
0x3c17…3c5d at000d = ╱ef╱$╱ // 0x3c24 @0xd
0x3c17…3c5d at000e = ╱eb╱;╱ // 0x3c25 @0xe
0x3c17…3c5d at000f = ╱4b╱K╱ // 0x3c26 @0xf
0x3c17…3c5d at0010 = ╱33╱3╱ // 0x3c27 @0x10
0x3c17…3c5d at0011 = ╱ef╱$╱ // 0x3c28 @0x11
0x3c17…3c5d at0012 = ╱dc╱=╱ // 0x3c29 @0x12
0x3c17…3c5d at0013 = ╱4e╱N╱ // 0x3c2a @0x13
0x3c17…3c5d at0014 = ╱ef╱$╱ // 0x3c2b @0x14
0x3c17…3c5d at0015 = ╱f1╱+╱ // 0x3c2c @0x15
0x3c17…3c5d at0016 = ╱4b╱K╱ // 0x3c2d @0x16
0x3c17…3c5d at0017 = ╱33╱3╱ // 0x3c2e @0x17
0x3c17…3c5d at0018 = ╱ef╱$╱ // 0x3c2f @0x18
0x3c17…3c5d at0019 = ╱eb╱;╱ // 0x3c30 @0x19
0x3c17…3c5d at001a = ╱4b╱K╱ // 0x3c31 @0x1a
0x3c17…3c5d at001b = ╱34╱4╱ // 0x3c32 @0x1b
0x3c17…3c5d at001c = ╱ef╱$╱ // 0x3c33 @0x1c
0x3c17…3c5d at001d = ╱dc╱=╱ // 0x3c34 @0x1d
0x3c17…3c5d at001e = ╱4e╱N╱ // 0x3c35 @0x1e
0x3c17…3c5d at001f = ╱ef╱$╱ // 0x3c36 @0x1f
0x3c17…3c5d at0020 = ╱f1╱+╱ // 0x3c37 @0x20
0x3c17…3c5d at0021 = ╱4b╱K╱ // 0x3c38 @0x21
0x3c17…3c5d at0022 = ╱34╱4╱ // 0x3c39 @0x22
0x3c17…3c5d at0023 = ╱ef╱$╱ // 0x3c3a @0x23
0x3c17…3c5d at0024 = ╱eb╱;╱ // 0x3c3b @0x24
0x3c17…3c5d at0025 = ╱4b╱K╱ // 0x3c3c @0x25
0x3c17…3c5d at0026 = ╱35╱5╱ // 0x3c3d @0x26
0x3c17…3c5d at0027 = ╱ef╱$╱ // 0x3c3e @0x27
0x3c17…3c5d at0028 = ╱dc╱=╱ // 0x3c3f @0x28
0x3c17…3c5d at0029 = ╱4e╱N╱ // 0x3c40 @0x29
0x3c17…3c5d at002a = ╱ef╱$╱ // 0x3c41 @0x2a
0x3c17…3c5d at002b = ╱f1╱+╱ // 0x3c42 @0x2b
0x3c17…3c5d at002c = ╱4b╱K╱ // 0x3c43 @0x2c
0x3c17…3c5d at002d = ╱35╱5╱ // 0x3c44 @0x2d
0x3c17…3c5d at002e = ╱ef╱$╱ // 0x3c45 @0x2e
0x3c17…3c5d at002f = ╱eb╱;╱ // 0x3c46 @0x2f
0x3c17…3c5d at0030 = ╱4b╱K╱ // 0x3c47 @0x30
0x3c17…3c5d at0031 = ╱36╱6╱ // 0x3c48 @0x31
0x3c17…3c5d at0032 = ╱ef╱$╱ // 0x3c49 @0x32
0x3c17…3c5d at0033 = ╱dc╱=╱ // 0x3c4a @0x33
0x3c17…3c5d at0034 = ╱4e╱N╱ // 0x3c4b @0x34
0x3c17…3c5d at0035 = ╱ef╱$╱ // 0x3c4c @0x35
0x3c17…3c5d at0036 = ╱f1╱+╱ // 0x3c4d @0x36
0x3c17…3c5d at0037 = ╱4b╱K╱ // 0x3c4e @0x37
0x3c17…3c5d at0038 = ╱36╱6╱ // 0x3c4f @0x38
0x3c17…3c5d at0039 = ╱ef╱$╱ // 0x3c50 @0x39
0x3c17…3c5d at003a = ╱eb╱;╱ // 0x3c51 @0x3a
0x3c17…3c5d at003b = ╱4b╱K╱ // 0x3c52 @0x3b
0x3c17…3c5d at003c = ╱37╱7╱ // 0x3c53 @0x3c
0x3c17…3c5d at003d = ╱ef╱$╱ // 0x3c54 @0x3d
0x3c17…3c5d at003e = ╱dc╱=╱ // 0x3c55 @0x3e
0x3c17…3c5d at003f = ╱4e╱N╱ // 0x3c56 @0x3f
0x3c17…3c5d at0040 = ╱ef╱$╱ // 0x3c57 @0x40
0x3c17…3c5d at0041 = ╱f1╱+╱ // 0x3c58 @0x41
0x3c17…3c5d at0042 = ╱4b╱K╱ // 0x3c59 @0x42
0x3c17…3c5d at0043 = ╱37╱7╱ // 0x3c5a @0x43
0x3c17…3c5d at0044 = ╱ef╱$╱ // 0x3c5b @0x44
0x3c17…3c5d at0045 = EOL // 0x3c5c @0x45
0x3c17…3c5d }
0x3c5d…3c68 c9bf 6010 OPEN K7$,R
0x3c5d…3c68 LineComalBin {
0x3c5d…3c68 ptr = 0xc9bf // 0x3c5d @0x0
0x3c5d…3c68 lno = 0x177a // 0x3c5f @0x2
0x3c5d…3c68 at0004 = ╱a7╱ OPEN ╱ // 0x3c61 @0x4
0x3c5d…3c68 at0005 = ╱4b╱K╱ // 0x3c62 @0x5
0x3c5d…3c68 at0006 = ╱37╱7╱ // 0x3c63 @0x6
0x3c5d…3c68 at0007 = ╱ef╱$╱ // 0x3c64 @0x7
0x3c5d…3c68 at0008 = ╱ec╱,╱ // 0x3c65 @0x8
0x3c5d…3c68 at0009 = ╱52╱R╱ // 0x3c66 @0x9
0x3c5d…3c68 at000a = EOL // 0x3c67 @0xa
0x3c5d…3c68 }
0x3c68…3c84 c9db 6020 EXEC FE(9,13,K7$)
0x3c68…3c84 LineComalBin {
0x3c68…3c84 ptr = 0xc9db // 0x3c68 @0x0
0x3c68…3c84 lno = 0x1784 // 0x3c6a @0x2
0x3c68…3c84 at0004 = ╱9d╱ EXEC ╱ // 0x3c6c @0x4
0x3c68…3c84 at0005 = ╱46╱F╱ // 0x3c6d @0x5
0x3c68…3c84 at0006 = ╱45╱E╱ // 0x3c6e @0x6
0x3c68…3c84 at0007 = ╱ed╱(╱ // 0x3c6f @0x7
0x3c68…3c84 at0008 = ╱39╱9╱ // 0x3c70 @0x8
0x3c68…3c84 at0009 = ╱fe00009004╱ // 0x3c71 @0x9
0x3c68…3c84 at000e = ╱ec╱,╱ // 0x3c76 @0xe
0x3c68…3c84 at000f = ╱31╱1╱ // 0x3c77 @0xf
0x3c68…3c84 at0010 = ╱33╱3╱ // 0x3c78 @0x10
0x3c68…3c84 at0011 = ╱fe0000d004╱ // 0x3c79 @0x11
0x3c68…3c84 at0016 = ╱ec╱,╱ // 0x3c7e @0x16
0x3c68…3c84 at0017 = ╱4b╱K╱ // 0x3c7f @0x17
0x3c68…3c84 at0018 = ╱37╱7╱ // 0x3c80 @0x18
0x3c68…3c84 at0019 = ╱ef╱$╱ // 0x3c81 @0x19
0x3c68…3c84 at001a = ╱ee╱)╱ // 0x3c82 @0x1a
0x3c68…3c84 at001b = EOL // 0x3c83 @0x1b
0x3c68…3c84 }
0x3c84…3c9a c9f1 6030 GET K7$,1:MOMS$
0x3c84…3c9a LineComalBin {
0x3c84…3c9a ptr = 0xc9f1 // 0x3c84 @0x0
0x3c84…3c9a lno = 0x178e // 0x3c86 @0x2
0x3c84…3c9a at0004 = ╱a9╱ GET ╱ // 0x3c88 @0x4
0x3c84…3c9a at0005 = ╱4b╱K╱ // 0x3c89 @0x5
0x3c84…3c9a at0006 = ╱37╱7╱ // 0x3c8a @0x6
0x3c84…3c9a at0007 = ╱ef╱$╱ // 0x3c8b @0x7
0x3c84…3c9a at0008 = ╱ec╱,╱ // 0x3c8c @0x8
0x3c84…3c9a at0009 = ╱31╱1╱ // 0x3c8d @0x9
0x3c84…3c9a at000a = ╱fe00008001╱ // 0x3c8e @0xa
0x3c84…3c9a at000f = ╱f0╱:╱ // 0x3c93 @0xf
0x3c84…3c9a at0010 = ╱4d╱M╱ // 0x3c94 @0x10
0x3c84…3c9a at0011 = ╱4f╱O╱ // 0x3c95 @0x11
0x3c84…3c9a at0012 = ╱4d╱M╱ // 0x3c96 @0x12
0x3c84…3c9a at0013 = ╱53╱S╱ // 0x3c97 @0x13
0x3c84…3c9a at0014 = ╱ef╱$╱ // 0x3c98 @0x14
0x3c84…3c9a at0015 = EOL // 0x3c99 @0x15
0x3c84…3c9a }
0x3c9a…3cb6 ca0d 6040 EXEC FE(9,14,K7$)
0x3c9a…3cb6 LineComalBin {
0x3c9a…3cb6 ptr = 0xca0d // 0x3c9a @0x0
0x3c9a…3cb6 lno = 0x1798 // 0x3c9c @0x2
0x3c9a…3cb6 at0004 = ╱9d╱ EXEC ╱ // 0x3c9e @0x4
0x3c9a…3cb6 at0005 = ╱46╱F╱ // 0x3c9f @0x5
0x3c9a…3cb6 at0006 = ╱45╱E╱ // 0x3ca0 @0x6
0x3c9a…3cb6 at0007 = ╱ed╱(╱ // 0x3ca1 @0x7
0x3c9a…3cb6 at0008 = ╱39╱9╱ // 0x3ca2 @0x8
0x3c9a…3cb6 at0009 = ╱fe00009004╱ // 0x3ca3 @0x9
0x3c9a…3cb6 at000e = ╱ec╱,╱ // 0x3ca8 @0xe
0x3c9a…3cb6 at000f = ╱31╱1╱ // 0x3ca9 @0xf
0x3c9a…3cb6 at0010 = ╱34╱4╱ // 0x3caa @0x10
0x3c9a…3cb6 at0011 = ╱fe0000e004╱ // 0x3cab @0x11
0x3c9a…3cb6 at0016 = ╱ec╱,╱ // 0x3cb0 @0x16
0x3c9a…3cb6 at0017 = ╱4b╱K╱ // 0x3cb1 @0x17
0x3c9a…3cb6 at0018 = ╱37╱7╱ // 0x3cb2 @0x18
0x3c9a…3cb6 at0019 = ╱ef╱$╱ // 0x3cb3 @0x19
0x3c9a…3cb6 at001a = ╱ee╱)╱ // 0x3cb4 @0x1a
0x3c9a…3cb6 at001b = EOL // 0x3cb5 @0x1b
0x3c9a…3cb6 }
0x3cb6…3d29 ca80 6050 GET K7$,2:T1(1),T1(2),T1(3),T1(4),T1(5),T1(6),T1(7),T1(8),T1(9)
0x3cb6…3d29 LineComalBin {
0x3cb6…3d29 ptr = 0xca80 // 0x3cb6 @0x0
0x3cb6…3d29 lno = 0x17a2 // 0x3cb8 @0x2
0x3cb6…3d29 at0004 = ╱a9╱ GET ╱ // 0x3cba @0x4
0x3cb6…3d29 at0005 = ╱4b╱K╱ // 0x3cbb @0x5
0x3cb6…3d29 at0006 = ╱37╱7╱ // 0x3cbc @0x6
0x3cb6…3d29 at0007 = ╱ef╱$╱ // 0x3cbd @0x7
0x3cb6…3d29 at0008 = ╱ec╱,╱ // 0x3cbe @0x8
0x3cb6…3d29 at0009 = ╱32╱2╱ // 0x3cbf @0x9
0x3cb6…3d29 at000a = ╱fe00008002╱ // 0x3cc0 @0xa
0x3cb6…3d29 at000f = ╱f0╱:╱ // 0x3cc5 @0xf
0x3cb6…3d29 at0010 = ╱54╱T╱ // 0x3cc6 @0x10
0x3cb6…3d29 at0011 = ╱31╱1╱ // 0x3cc7 @0x11
0x3cb6…3d29 at0012 = ╱ed╱(╱ // 0x3cc8 @0x12
0x3cb6…3d29 at0013 = ╱31╱1╱ // 0x3cc9 @0x13
0x3cb6…3d29 at0014 = ╱fe00008001╱ // 0x3cca @0x14
0x3cb6…3d29 at0019 = ╱ee╱)╱ // 0x3ccf @0x19
0x3cb6…3d29 at001a = ╱ec╱,╱ // 0x3cd0 @0x1a
0x3cb6…3d29 at001b = ╱54╱T╱ // 0x3cd1 @0x1b
0x3cb6…3d29 at001c = ╱31╱1╱ // 0x3cd2 @0x1c
0x3cb6…3d29 at001d = ╱ed╱(╱ // 0x3cd3 @0x1d
0x3cb6…3d29 at001e = ╱32╱2╱ // 0x3cd4 @0x1e
0x3cb6…3d29 at001f = ╱fe00008002╱ // 0x3cd5 @0x1f
0x3cb6…3d29 at0024 = ╱ee╱)╱ // 0x3cda @0x24
0x3cb6…3d29 at0025 = ╱ec╱,╱ // 0x3cdb @0x25
0x3cb6…3d29 at0026 = ╱54╱T╱ // 0x3cdc @0x26
0x3cb6…3d29 at0027 = ╱31╱1╱ // 0x3cdd @0x27
0x3cb6…3d29 at0028 = ╱ed╱(╱ // 0x3cde @0x28
0x3cb6…3d29 at0029 = ╱33╱3╱ // 0x3cdf @0x29
0x3cb6…3d29 at002a = ╱fe0000c002╱ // 0x3ce0 @0x2a
0x3cb6…3d29 at002f = ╱ee╱)╱ // 0x3ce5 @0x2f
0x3cb6…3d29 at0030 = ╱ec╱,╱ // 0x3ce6 @0x30
0x3cb6…3d29 at0031 = ╱54╱T╱ // 0x3ce7 @0x31
0x3cb6…3d29 at0032 = ╱31╱1╱ // 0x3ce8 @0x32
0x3cb6…3d29 at0033 = ╱ed╱(╱ // 0x3ce9 @0x33
0x3cb6…3d29 at0034 = ╱34╱4╱ // 0x3cea @0x34
0x3cb6…3d29 at0035 = ╱fe00008003╱ // 0x3ceb @0x35
0x3cb6…3d29 at003a = ╱ee╱)╱ // 0x3cf0 @0x3a
0x3cb6…3d29 at003b = ╱ec╱,╱ // 0x3cf1 @0x3b
0x3cb6…3d29 at003c = ╱54╱T╱ // 0x3cf2 @0x3c
0x3cb6…3d29 at003d = ╱31╱1╱ // 0x3cf3 @0x3d
0x3cb6…3d29 at003e = ╱ed╱(╱ // 0x3cf4 @0x3e
0x3cb6…3d29 at003f = ╱35╱5╱ // 0x3cf5 @0x3f
0x3cb6…3d29 at0040 = ╱fe0000a003╱ // 0x3cf6 @0x40
0x3cb6…3d29 at0045 = ╱ee╱)╱ // 0x3cfb @0x45
0x3cb6…3d29 at0046 = ╱ec╱,╱ // 0x3cfc @0x46
0x3cb6…3d29 at0047 = ╱54╱T╱ // 0x3cfd @0x47
0x3cb6…3d29 at0048 = ╱31╱1╱ // 0x3cfe @0x48
0x3cb6…3d29 at0049 = ╱ed╱(╱ // 0x3cff @0x49
0x3cb6…3d29 at004a = ╱36╱6╱ // 0x3d00 @0x4a
0x3cb6…3d29 at004b = ╱fe0000c003╱ // 0x3d01 @0x4b
0x3cb6…3d29 at0050 = ╱ee╱)╱ // 0x3d06 @0x50
0x3cb6…3d29 at0051 = ╱ec╱,╱ // 0x3d07 @0x51
0x3cb6…3d29 at0052 = ╱54╱T╱ // 0x3d08 @0x52
0x3cb6…3d29 at0053 = ╱31╱1╱ // 0x3d09 @0x53
0x3cb6…3d29 at0054 = ╱ed╱(╱ // 0x3d0a @0x54
0x3cb6…3d29 at0055 = ╱37╱7╱ // 0x3d0b @0x55
0x3cb6…3d29 at0056 = ╱fe0000e003╱ // 0x3d0c @0x56
0x3cb6…3d29 at005b = ╱ee╱)╱ // 0x3d11 @0x5b
0x3cb6…3d29 at005c = ╱ec╱,╱ // 0x3d12 @0x5c
0x3cb6…3d29 at005d = ╱54╱T╱ // 0x3d13 @0x5d
0x3cb6…3d29 at005e = ╱31╱1╱ // 0x3d14 @0x5e
0x3cb6…3d29 at005f = ╱ed╱(╱ // 0x3d15 @0x5f
0x3cb6…3d29 at0060 = ╱38╱8╱ // 0x3d16 @0x60
0x3cb6…3d29 at0061 = ╱fe00008004╱ // 0x3d17 @0x61
0x3cb6…3d29 at0066 = ╱ee╱)╱ // 0x3d1c @0x66
0x3cb6…3d29 at0067 = ╱ec╱,╱ // 0x3d1d @0x67
0x3cb6…3d29 at0068 = ╱54╱T╱ // 0x3d1e @0x68
0x3cb6…3d29 at0069 = ╱31╱1╱ // 0x3d1f @0x69
0x3cb6…3d29 at006a = ╱ed╱(╱ // 0x3d20 @0x6a
0x3cb6…3d29 at006b = ╱39╱9╱ // 0x3d21 @0x6b
0x3cb6…3d29 at006c = ╱fe00009004╱ // 0x3d22 @0x6c
0x3cb6…3d29 at0071 = ╱ee╱)╱ // 0x3d27 @0x71
0x3cb6…3d29 at0072 = EOL // 0x3d28 @0x72
0x3cb6…3d29 }
0x3d29…3d45 ca9c 6060 EXEC FE(9,15,K7$)
0x3d29…3d45 LineComalBin {
0x3d29…3d45 ptr = 0xca9c // 0x3d29 @0x0
0x3d29…3d45 lno = 0x17ac // 0x3d2b @0x2
0x3d29…3d45 at0004 = ╱9d╱ EXEC ╱ // 0x3d2d @0x4
0x3d29…3d45 at0005 = ╱46╱F╱ // 0x3d2e @0x5
0x3d29…3d45 at0006 = ╱45╱E╱ // 0x3d2f @0x6
0x3d29…3d45 at0007 = ╱ed╱(╱ // 0x3d30 @0x7
0x3d29…3d45 at0008 = ╱39╱9╱ // 0x3d31 @0x8
0x3d29…3d45 at0009 = ╱fe00009004╱ // 0x3d32 @0x9
0x3d29…3d45 at000e = ╱ec╱,╱ // 0x3d37 @0xe
0x3d29…3d45 at000f = ╱31╱1╱ // 0x3d38 @0xf
0x3d29…3d45 at0010 = ╱35╱5╱ // 0x3d39 @0x10
0x3d29…3d45 at0011 = ╱fe0000f004╱ // 0x3d3a @0x11
0x3d29…3d45 at0016 = ╱ec╱,╱ // 0x3d3f @0x16
0x3d29…3d45 at0017 = ╱4b╱K╱ // 0x3d40 @0x17
0x3d29…3d45 at0018 = ╱37╱7╱ // 0x3d41 @0x18
0x3d29…3d45 at0019 = ╱ef╱$╱ // 0x3d42 @0x19
0x3d29…3d45 at001a = ╱ee╱)╱ // 0x3d43 @0x1a
0x3d29…3d45 at001b = EOL // 0x3d44 @0x1b
0x3d29…3d45 }
0x3d45…3d5a cab1 6070 FOR I=1 TO 3
0x3d45…3d5a LineComalBin {
0x3d45…3d5a ptr = 0xcab1 // 0x3d45 @0x0
0x3d45…3d5a lno = 0x17b6 // 0x3d47 @0x2
0x3d45…3d5a at0004 = ╱83╱ FOR ╱ // 0x3d49 @0x4
0x3d45…3d5a at0005 = ╱49╱I╱ // 0x3d4a @0x5
0x3d45…3d5a at0006 = ╱dc╱=╱ // 0x3d4b @0x6
0x3d45…3d5a at0007 = ╱31╱1╱ // 0x3d4c @0x7
0x3d45…3d5a at0008 = ╱fe00008001╱ // 0x3d4d @0x8
0x3d45…3d5a at000d = ╱b7╱ TO ╱ // 0x3d52 @0xd
0x3d45…3d5a at000e = ╱33╱3╱ // 0x3d53 @0xe
0x3d45…3d5a at000f = ╱fe0000c002╱ // 0x3d54 @0xf
0x3d45…3d5a at0014 = EOL // 0x3d59 @0x14
0x3d45…3d5a }
0x3d5a…3d79 cad0 6080 H=(I-1)*3+1
0x3d5a…3d79 LineComalBin {
0x3d5a…3d79 ptr = 0xcad0 // 0x3d5a @0x0
0x3d5a…3d79 lno = 0x17c0 // 0x3d5c @0x2
0x3d5a…3d79 at0004 = ╱48╱H╱ // 0x3d5e @0x4
0x3d5a…3d79 at0005 = ╱dc╱=╱ // 0x3d5f @0x5
0x3d5a…3d79 at0006 = ╱ed╱(╱ // 0x3d60 @0x6
0x3d5a…3d79 at0007 = ╱49╱I╱ // 0x3d61 @0x7
0x3d5a…3d79 at0008 = ╱e3╱-╱ // 0x3d62 @0x8
0x3d5a…3d79 at0009 = ╱31╱1╱ // 0x3d63 @0x9
0x3d5a…3d79 at000a = ╱fe00008001╱ // 0x3d64 @0xa
0x3d5a…3d79 at000f = ╱ee╱)╱ // 0x3d69 @0xf
0x3d5a…3d79 at0010 = ╱e4╱*╱ // 0x3d6a @0x10
0x3d5a…3d79 at0011 = ╱33╱3╱ // 0x3d6b @0x11
0x3d5a…3d79 at0012 = ╱fe0000c002╱ // 0x3d6c @0x12
0x3d5a…3d79 at0017 = ╱e2╱+╱ // 0x3d71 @0x17
0x3d5a…3d79 at0018 = ╱31╱1╱ // 0x3d72 @0x18
0x3d5a…3d79 at0019 = ╱fe00008001╱ // 0x3d73 @0x19
0x3d5a…3d79 at001e = EOL // 0x3d78 @0x1e
0x3d5a…3d79 }
0x3d79…3db4 cb0b 6090 GET K7$,I+2:LAND$(H),LAND$(H+1),LAND$(H+2)
0x3d79…3db4 LineComalBin {
0x3d79…3db4 ptr = 0xcb0b // 0x3d79 @0x0
0x3d79…3db4 lno = 0x17ca // 0x3d7b @0x2
0x3d79…3db4 at0004 = ╱a9╱ GET ╱ // 0x3d7d @0x4
0x3d79…3db4 at0005 = ╱4b╱K╱ // 0x3d7e @0x5
0x3d79…3db4 at0006 = ╱37╱7╱ // 0x3d7f @0x6
0x3d79…3db4 at0007 = ╱ef╱$╱ // 0x3d80 @0x7
0x3d79…3db4 at0008 = ╱ec╱,╱ // 0x3d81 @0x8
0x3d79…3db4 at0009 = ╱49╱I╱ // 0x3d82 @0x9
0x3d79…3db4 at000a = ╱e2╱+╱ // 0x3d83 @0xa
0x3d79…3db4 at000b = ╱32╱2╱ // 0x3d84 @0xb
0x3d79…3db4 at000c = ╱fe00008002╱ // 0x3d85 @0xc
0x3d79…3db4 at0011 = ╱f0╱:╱ // 0x3d8a @0x11
0x3d79…3db4 at0012 = ╱4c╱L╱ // 0x3d8b @0x12
0x3d79…3db4 at0013 = ╱41╱A╱ // 0x3d8c @0x13
0x3d79…3db4 at0014 = ╱4e╱N╱ // 0x3d8d @0x14
0x3d79…3db4 at0015 = ╱44╱D╱ // 0x3d8e @0x15
0x3d79…3db4 at0016 = ╱ef╱$╱ // 0x3d8f @0x16
0x3d79…3db4 at0017 = ╱ed╱(╱ // 0x3d90 @0x17
0x3d79…3db4 at0018 = ╱48╱H╱ // 0x3d91 @0x18
0x3d79…3db4 at0019 = ╱ee╱)╱ // 0x3d92 @0x19
0x3d79…3db4 at001a = ╱ec╱,╱ // 0x3d93 @0x1a
0x3d79…3db4 at001b = ╱4c╱L╱ // 0x3d94 @0x1b
0x3d79…3db4 at001c = ╱41╱A╱ // 0x3d95 @0x1c
0x3d79…3db4 at001d = ╱4e╱N╱ // 0x3d96 @0x1d
0x3d79…3db4 at001e = ╱44╱D╱ // 0x3d97 @0x1e
0x3d79…3db4 at001f = ╱ef╱$╱ // 0x3d98 @0x1f
0x3d79…3db4 at0020 = ╱ed╱(╱ // 0x3d99 @0x20
0x3d79…3db4 at0021 = ╱48╱H╱ // 0x3d9a @0x21
0x3d79…3db4 at0022 = ╱e2╱+╱ // 0x3d9b @0x22
0x3d79…3db4 at0023 = ╱31╱1╱ // 0x3d9c @0x23
0x3d79…3db4 at0024 = ╱fe00008001╱ // 0x3d9d @0x24
0x3d79…3db4 at0029 = ╱ee╱)╱ // 0x3da2 @0x29
0x3d79…3db4 at002a = ╱ec╱,╱ // 0x3da3 @0x2a
0x3d79…3db4 at002b = ╱4c╱L╱ // 0x3da4 @0x2b
0x3d79…3db4 at002c = ╱41╱A╱ // 0x3da5 @0x2c
0x3d79…3db4 at002d = ╱4e╱N╱ // 0x3da6 @0x2d
0x3d79…3db4 at002e = ╱44╱D╱ // 0x3da7 @0x2e
0x3d79…3db4 at002f = ╱ef╱$╱ // 0x3da8 @0x2f
0x3d79…3db4 at0030 = ╱ed╱(╱ // 0x3da9 @0x30
0x3d79…3db4 at0031 = ╱48╱H╱ // 0x3daa @0x31
0x3d79…3db4 at0032 = ╱e2╱+╱ // 0x3dab @0x32
0x3d79…3db4 at0033 = ╱32╱2╱ // 0x3dac @0x33
0x3d79…3db4 at0034 = ╱fe00008002╱ // 0x3dad @0x34
0x3d79…3db4 at0039 = ╱ee╱)╱ // 0x3db2 @0x39
0x3d79…3db4 at003a = EOL // 0x3db3 @0x3a
0x3d79…3db4 }
0x3db4…3dd0 cb27 6100 EXEC FE(9,16,K7$)
0x3db4…3dd0 LineComalBin {
0x3db4…3dd0 ptr = 0xcb27 // 0x3db4 @0x0
0x3db4…3dd0 lno = 0x17d4 // 0x3db6 @0x2
0x3db4…3dd0 at0004 = ╱9d╱ EXEC ╱ // 0x3db8 @0x4
0x3db4…3dd0 at0005 = ╱46╱F╱ // 0x3db9 @0x5
0x3db4…3dd0 at0006 = ╱45╱E╱ // 0x3dba @0x6
0x3db4…3dd0 at0007 = ╱ed╱(╱ // 0x3dbb @0x7
0x3db4…3dd0 at0008 = ╱39╱9╱ // 0x3dbc @0x8
0x3db4…3dd0 at0009 = ╱fe00009004╱ // 0x3dbd @0x9
0x3db4…3dd0 at000e = ╱ec╱,╱ // 0x3dc2 @0xe
0x3db4…3dd0 at000f = ╱31╱1╱ // 0x3dc3 @0xf
0x3db4…3dd0 at0010 = ╱36╱6╱ // 0x3dc4 @0x10
0x3db4…3dd0 at0011 = ╱fe00008005╱ // 0x3dc5 @0x11
0x3db4…3dd0 at0016 = ╱ec╱,╱ // 0x3dca @0x16
0x3db4…3dd0 at0017 = ╱4b╱K╱ // 0x3dcb @0x17
0x3db4…3dd0 at0018 = ╱37╱7╱ // 0x3dcc @0x18
0x3db4…3dd0 at0019 = ╱ef╱$╱ // 0x3dcd @0x19
0x3db4…3dd0 at001a = ╱ee╱)╱ // 0x3dce @0x1a
0x3db4…3dd0 at001b = EOL // 0x3dcf @0x1b
0x3db4…3dd0 }
0x3dd0…3dd7 cb2e 6110 NEXT I
0x3dd0…3dd7 LineComalBin {
0x3dd0…3dd7 ptr = 0xcb2e // 0x3dd0 @0x0
0x3dd0…3dd7 lno = 0x17de // 0x3dd2 @0x2
0x3dd0…3dd7 at0004 = ╱84╱ NEXT ╱ // 0x3dd4 @0x4
0x3dd0…3dd7 at0005 = ╱49╱I╱ // 0x3dd5 @0x5
0x3dd0…3dd7 at0006 = EOL // 0x3dd6 @0x6
0x3dd0…3dd7 }
0x3dd7…3e4b cba2 6120 GET K7$,12:T2(1),T2(2),T2(3),T2(4),T2(5),T2(6),T2(7),T2(8),T2(9)
0x3dd7…3e4b LineComalBin {
0x3dd7…3e4b ptr = 0xcba2 // 0x3dd7 @0x0
0x3dd7…3e4b lno = 0x17e8 // 0x3dd9 @0x2
0x3dd7…3e4b at0004 = ╱a9╱ GET ╱ // 0x3ddb @0x4
0x3dd7…3e4b at0005 = ╱4b╱K╱ // 0x3ddc @0x5
0x3dd7…3e4b at0006 = ╱37╱7╱ // 0x3ddd @0x6
0x3dd7…3e4b at0007 = ╱ef╱$╱ // 0x3dde @0x7
0x3dd7…3e4b at0008 = ╱ec╱,╱ // 0x3ddf @0x8
0x3dd7…3e4b at0009 = ╱31╱1╱ // 0x3de0 @0x9
0x3dd7…3e4b at000a = ╱32╱2╱ // 0x3de1 @0xa
0x3dd7…3e4b at000b = ╱fe0000c004╱ // 0x3de2 @0xb
0x3dd7…3e4b at0010 = ╱f0╱:╱ // 0x3de7 @0x10
0x3dd7…3e4b at0011 = ╱54╱T╱ // 0x3de8 @0x11
0x3dd7…3e4b at0012 = ╱32╱2╱ // 0x3de9 @0x12
0x3dd7…3e4b at0013 = ╱ed╱(╱ // 0x3dea @0x13
0x3dd7…3e4b at0014 = ╱31╱1╱ // 0x3deb @0x14
0x3dd7…3e4b at0015 = ╱fe00008001╱ // 0x3dec @0x15
0x3dd7…3e4b at001a = ╱ee╱)╱ // 0x3df1 @0x1a
0x3dd7…3e4b at001b = ╱ec╱,╱ // 0x3df2 @0x1b
0x3dd7…3e4b at001c = ╱54╱T╱ // 0x3df3 @0x1c
0x3dd7…3e4b at001d = ╱32╱2╱ // 0x3df4 @0x1d
0x3dd7…3e4b at001e = ╱ed╱(╱ // 0x3df5 @0x1e
0x3dd7…3e4b at001f = ╱32╱2╱ // 0x3df6 @0x1f
0x3dd7…3e4b at0020 = ╱fe00008002╱ // 0x3df7 @0x20
0x3dd7…3e4b at0025 = ╱ee╱)╱ // 0x3dfc @0x25
0x3dd7…3e4b at0026 = ╱ec╱,╱ // 0x3dfd @0x26
0x3dd7…3e4b at0027 = ╱54╱T╱ // 0x3dfe @0x27
0x3dd7…3e4b at0028 = ╱32╱2╱ // 0x3dff @0x28
0x3dd7…3e4b at0029 = ╱ed╱(╱ // 0x3e00 @0x29
0x3dd7…3e4b at002a = ╱33╱3╱ // 0x3e01 @0x2a
0x3dd7…3e4b at002b = ╱fe0000c002╱ // 0x3e02 @0x2b
0x3dd7…3e4b at0030 = ╱ee╱)╱ // 0x3e07 @0x30
0x3dd7…3e4b at0031 = ╱ec╱,╱ // 0x3e08 @0x31
0x3dd7…3e4b at0032 = ╱54╱T╱ // 0x3e09 @0x32
0x3dd7…3e4b at0033 = ╱32╱2╱ // 0x3e0a @0x33
0x3dd7…3e4b at0034 = ╱ed╱(╱ // 0x3e0b @0x34
0x3dd7…3e4b at0035 = ╱34╱4╱ // 0x3e0c @0x35
0x3dd7…3e4b at0036 = ╱fe00008003╱ // 0x3e0d @0x36
0x3dd7…3e4b at003b = ╱ee╱)╱ // 0x3e12 @0x3b
0x3dd7…3e4b at003c = ╱ec╱,╱ // 0x3e13 @0x3c
0x3dd7…3e4b at003d = ╱54╱T╱ // 0x3e14 @0x3d
0x3dd7…3e4b at003e = ╱32╱2╱ // 0x3e15 @0x3e
0x3dd7…3e4b at003f = ╱ed╱(╱ // 0x3e16 @0x3f
0x3dd7…3e4b at0040 = ╱35╱5╱ // 0x3e17 @0x40
0x3dd7…3e4b at0041 = ╱fe0000a003╱ // 0x3e18 @0x41
0x3dd7…3e4b at0046 = ╱ee╱)╱ // 0x3e1d @0x46
0x3dd7…3e4b at0047 = ╱ec╱,╱ // 0x3e1e @0x47
0x3dd7…3e4b at0048 = ╱54╱T╱ // 0x3e1f @0x48
0x3dd7…3e4b at0049 = ╱32╱2╱ // 0x3e20 @0x49
0x3dd7…3e4b at004a = ╱ed╱(╱ // 0x3e21 @0x4a
0x3dd7…3e4b at004b = ╱36╱6╱ // 0x3e22 @0x4b
0x3dd7…3e4b at004c = ╱fe0000c003╱ // 0x3e23 @0x4c
0x3dd7…3e4b at0051 = ╱ee╱)╱ // 0x3e28 @0x51
0x3dd7…3e4b at0052 = ╱ec╱,╱ // 0x3e29 @0x52
0x3dd7…3e4b at0053 = ╱54╱T╱ // 0x3e2a @0x53
0x3dd7…3e4b at0054 = ╱32╱2╱ // 0x3e2b @0x54
0x3dd7…3e4b at0055 = ╱ed╱(╱ // 0x3e2c @0x55
0x3dd7…3e4b at0056 = ╱37╱7╱ // 0x3e2d @0x56
0x3dd7…3e4b at0057 = ╱fe0000e003╱ // 0x3e2e @0x57
0x3dd7…3e4b at005c = ╱ee╱)╱ // 0x3e33 @0x5c
0x3dd7…3e4b at005d = ╱ec╱,╱ // 0x3e34 @0x5d
0x3dd7…3e4b at005e = ╱54╱T╱ // 0x3e35 @0x5e
0x3dd7…3e4b at005f = ╱32╱2╱ // 0x3e36 @0x5f
0x3dd7…3e4b at0060 = ╱ed╱(╱ // 0x3e37 @0x60
0x3dd7…3e4b at0061 = ╱38╱8╱ // 0x3e38 @0x61
0x3dd7…3e4b at0062 = ╱fe00008004╱ // 0x3e39 @0x62
0x3dd7…3e4b at0067 = ╱ee╱)╱ // 0x3e3e @0x67
0x3dd7…3e4b at0068 = ╱ec╱,╱ // 0x3e3f @0x68
0x3dd7…3e4b at0069 = ╱54╱T╱ // 0x3e40 @0x69
0x3dd7…3e4b at006a = ╱32╱2╱ // 0x3e41 @0x6a
0x3dd7…3e4b at006b = ╱ed╱(╱ // 0x3e42 @0x6b
0x3dd7…3e4b at006c = ╱39╱9╱ // 0x3e43 @0x6c
0x3dd7…3e4b at006d = ╱fe00009004╱ // 0x3e44 @0x6d
0x3dd7…3e4b at0072 = ╱ee╱)╱ // 0x3e49 @0x72
0x3dd7…3e4b at0073 = EOL // 0x3e4a @0x73
0x3dd7…3e4b }
0x3e4b…3e67 cbbe 6130 EXEC FE(9,17,K7$)
0x3e4b…3e67 LineComalBin {
0x3e4b…3e67 ptr = 0xcbbe // 0x3e4b @0x0
0x3e4b…3e67 lno = 0x17f2 // 0x3e4d @0x2
0x3e4b…3e67 at0004 = ╱9d╱ EXEC ╱ // 0x3e4f @0x4
0x3e4b…3e67 at0005 = ╱46╱F╱ // 0x3e50 @0x5
0x3e4b…3e67 at0006 = ╱45╱E╱ // 0x3e51 @0x6
0x3e4b…3e67 at0007 = ╱ed╱(╱ // 0x3e52 @0x7
0x3e4b…3e67 at0008 = ╱39╱9╱ // 0x3e53 @0x8
0x3e4b…3e67 at0009 = ╱fe00009004╱ // 0x3e54 @0x9
0x3e4b…3e67 at000e = ╱ec╱,╱ // 0x3e59 @0xe
0x3e4b…3e67 at000f = ╱31╱1╱ // 0x3e5a @0xf
0x3e4b…3e67 at0010 = ╱37╱7╱ // 0x3e5b @0x10
0x3e4b…3e67 at0011 = ╱fe00008805╱ // 0x3e5c @0x11
0x3e4b…3e67 at0016 = ╱ec╱,╱ // 0x3e61 @0x16
0x3e4b…3e67 at0017 = ╱4b╱K╱ // 0x3e62 @0x17
0x3e4b…3e67 at0018 = ╱37╱7╱ // 0x3e63 @0x18
0x3e4b…3e67 at0019 = ╱ef╱$╱ // 0x3e64 @0x19
0x3e4b…3e67 at001a = ╱ee╱)╱ // 0x3e65 @0x1a
0x3e4b…3e67 at001b = EOL // 0x3e66 @0x1b
0x3e4b…3e67 }
0x3e67…3e70 cbc7 6140 CLOSE K7$
0x3e67…3e70 LineComalBin {
0x3e67…3e70 ptr = 0xcbc7 // 0x3e67 @0x0
0x3e67…3e70 lno = 0x17fc // 0x3e69 @0x2
0x3e67…3e70 at0004 = ╱a8╱ CLOSE ╱ // 0x3e6b @0x4
0x3e67…3e70 at0005 = ╱4b╱K╱ // 0x3e6c @0x5
0x3e67…3e70 at0006 = ╱37╱7╱ // 0x3e6d @0x6
0x3e67…3e70 at0007 = ╱ef╱$╱ // 0x3e6e @0x7
0x3e67…3e70 at0008 = EOL // 0x3e6f @0x8
0x3e67…3e70 }
0x3e70…3e8c cbe3 6150 EXEC FE(9,18,K7$)
0x3e70…3e8c LineComalBin {
0x3e70…3e8c ptr = 0xcbe3 // 0x3e70 @0x0
0x3e70…3e8c lno = 0x1806 // 0x3e72 @0x2
0x3e70…3e8c at0004 = ╱9d╱ EXEC ╱ // 0x3e74 @0x4
0x3e70…3e8c at0005 = ╱46╱F╱ // 0x3e75 @0x5
0x3e70…3e8c at0006 = ╱45╱E╱ // 0x3e76 @0x6
0x3e70…3e8c at0007 = ╱ed╱(╱ // 0x3e77 @0x7
0x3e70…3e8c at0008 = ╱39╱9╱ // 0x3e78 @0x8
0x3e70…3e8c at0009 = ╱fe00009004╱ // 0x3e79 @0x9
0x3e70…3e8c at000e = ╱ec╱,╱ // 0x3e7e @0xe
0x3e70…3e8c at000f = ╱31╱1╱ // 0x3e7f @0xf
0x3e70…3e8c at0010 = ╱38╱8╱ // 0x3e80 @0x10
0x3e70…3e8c at0011 = ╱fe00009005╱ // 0x3e81 @0x11
0x3e70…3e8c at0016 = ╱ec╱,╱ // 0x3e86 @0x16
0x3e70…3e8c at0017 = ╱4b╱K╱ // 0x3e87 @0x17
0x3e70…3e8c at0018 = ╱37╱7╱ // 0x3e88 @0x18
0x3e70…3e8c at0019 = ╱ef╱$╱ // 0x3e89 @0x19
0x3e70…3e8c at001a = ╱ee╱)╱ // 0x3e8a @0x1a
0x3e70…3e8c at001b = EOL // 0x3e8b @0x1b
0x3e70…3e8c }
0x3e8c…3e97 cbee 6160 OPEN K2$,R
0x3e8c…3e97 LineComalBin {
0x3e8c…3e97 ptr = 0xcbee // 0x3e8c @0x0
0x3e8c…3e97 lno = 0x1810 // 0x3e8e @0x2
0x3e8c…3e97 at0004 = ╱a7╱ OPEN ╱ // 0x3e90 @0x4
0x3e8c…3e97 at0005 = ╱4b╱K╱ // 0x3e91 @0x5
0x3e8c…3e97 at0006 = ╱32╱2╱ // 0x3e92 @0x6
0x3e8c…3e97 at0007 = ╱ef╱$╱ // 0x3e93 @0x7
0x3e8c…3e97 at0008 = ╱ec╱,╱ // 0x3e94 @0x8
0x3e8c…3e97 at0009 = ╱52╱R╱ // 0x3e95 @0x9
0x3e8c…3e97 at000a = EOL // 0x3e96 @0xa
0x3e8c…3e97 }
0x3e97…3eb3 cc0a 6170 EXEC FE(9,19,K2$)
0x3e97…3eb3 LineComalBin {
0x3e97…3eb3 ptr = 0xcc0a // 0x3e97 @0x0
0x3e97…3eb3 lno = 0x181a // 0x3e99 @0x2
0x3e97…3eb3 at0004 = ╱9d╱ EXEC ╱ // 0x3e9b @0x4
0x3e97…3eb3 at0005 = ╱46╱F╱ // 0x3e9c @0x5
0x3e97…3eb3 at0006 = ╱45╱E╱ // 0x3e9d @0x6
0x3e97…3eb3 at0007 = ╱ed╱(╱ // 0x3e9e @0x7
0x3e97…3eb3 at0008 = ╱39╱9╱ // 0x3e9f @0x8
0x3e97…3eb3 at0009 = ╱fe00009004╱ // 0x3ea0 @0x9
0x3e97…3eb3 at000e = ╱ec╱,╱ // 0x3ea5 @0xe
0x3e97…3eb3 at000f = ╱31╱1╱ // 0x3ea6 @0xf
0x3e97…3eb3 at0010 = ╱39╱9╱ // 0x3ea7 @0x10
0x3e97…3eb3 at0011 = ╱fe00009805╱ // 0x3ea8 @0x11
0x3e97…3eb3 at0016 = ╱ec╱,╱ // 0x3ead @0x16
0x3e97…3eb3 at0017 = ╱4b╱K╱ // 0x3eae @0x17
0x3e97…3eb3 at0018 = ╱32╱2╱ // 0x3eaf @0x18
0x3e97…3eb3 at0019 = ╱ef╱$╱ // 0x3eb0 @0x19
0x3e97…3eb3 at001a = ╱ee╱)╱ // 0x3eb1 @0x1a
0x3e97…3eb3 at001b = EOL // 0x3eb2 @0x1b
0x3e97…3eb3 }
0x3eb3…3ebe cc15 6180 OPEN K3$,R
0x3eb3…3ebe LineComalBin {
0x3eb3…3ebe ptr = 0xcc15 // 0x3eb3 @0x0
0x3eb3…3ebe lno = 0x1824 // 0x3eb5 @0x2
0x3eb3…3ebe at0004 = ╱a7╱ OPEN ╱ // 0x3eb7 @0x4
0x3eb3…3ebe at0005 = ╱4b╱K╱ // 0x3eb8 @0x5
0x3eb3…3ebe at0006 = ╱33╱3╱ // 0x3eb9 @0x6
0x3eb3…3ebe at0007 = ╱ef╱$╱ // 0x3eba @0x7
0x3eb3…3ebe at0008 = ╱ec╱,╱ // 0x3ebb @0x8
0x3eb3…3ebe at0009 = ╱52╱R╱ // 0x3ebc @0x9
0x3eb3…3ebe at000a = EOL // 0x3ebd @0xa
0x3eb3…3ebe }
0x3ebe…3eda cc31 6190 EXEC FE(9,20,K3$)
0x3ebe…3eda LineComalBin {
0x3ebe…3eda ptr = 0xcc31 // 0x3ebe @0x0
0x3ebe…3eda lno = 0x182e // 0x3ec0 @0x2
0x3ebe…3eda at0004 = ╱9d╱ EXEC ╱ // 0x3ec2 @0x4
0x3ebe…3eda at0005 = ╱46╱F╱ // 0x3ec3 @0x5
0x3ebe…3eda at0006 = ╱45╱E╱ // 0x3ec4 @0x6
0x3ebe…3eda at0007 = ╱ed╱(╱ // 0x3ec5 @0x7
0x3ebe…3eda at0008 = ╱39╱9╱ // 0x3ec6 @0x8
0x3ebe…3eda at0009 = ╱fe00009004╱ // 0x3ec7 @0x9
0x3ebe…3eda at000e = ╱ec╱,╱ // 0x3ecc @0xe
0x3ebe…3eda at000f = ╱32╱2╱ // 0x3ecd @0xf
0x3ebe…3eda at0010 = ╱30╱0╱ // 0x3ece @0x10
0x3ebe…3eda at0011 = ╱fe0000a005╱ // 0x3ecf @0x11
0x3ebe…3eda at0016 = ╱ec╱,╱ // 0x3ed4 @0x16
0x3ebe…3eda at0017 = ╱4b╱K╱ // 0x3ed5 @0x17
0x3ebe…3eda at0018 = ╱33╱3╱ // 0x3ed6 @0x18
0x3ebe…3eda at0019 = ╱ef╱$╱ // 0x3ed7 @0x19
0x3ebe…3eda at001a = ╱ee╱)╱ // 0x3ed8 @0x1a
0x3ebe…3eda at001b = EOL // 0x3ed9 @0x1b
0x3ebe…3eda }
0x3eda…3efa cc51 6200 EXEC INDTAB1(VTAB1,MVANTAL,K3$)
0x3eda…3efa LineComalBin {
0x3eda…3efa ptr = 0xcc51 // 0x3eda @0x0
0x3eda…3efa lno = 0x1838 // 0x3edc @0x2
0x3eda…3efa at0004 = ╱9d╱ EXEC ╱ // 0x3ede @0x4
0x3eda…3efa at0005 = ╱49╱I╱ // 0x3edf @0x5
0x3eda…3efa at0006 = ╱4e╱N╱ // 0x3ee0 @0x6
0x3eda…3efa at0007 = ╱44╱D╱ // 0x3ee1 @0x7
0x3eda…3efa at0008 = ╱54╱T╱ // 0x3ee2 @0x8
0x3eda…3efa at0009 = ╱41╱A╱ // 0x3ee3 @0x9
0x3eda…3efa at000a = ╱42╱B╱ // 0x3ee4 @0xa
0x3eda…3efa at000b = ╱31╱1╱ // 0x3ee5 @0xb
0x3eda…3efa at000c = ╱ed╱(╱ // 0x3ee6 @0xc
0x3eda…3efa at000d = ╱56╱V╱ // 0x3ee7 @0xd
0x3eda…3efa at000e = ╱54╱T╱ // 0x3ee8 @0xe
0x3eda…3efa at000f = ╱41╱A╱ // 0x3ee9 @0xf
0x3eda…3efa at0010 = ╱42╱B╱ // 0x3eea @0x10
0x3eda…3efa at0011 = ╱31╱1╱ // 0x3eeb @0x11
0x3eda…3efa at0012 = ╱ec╱,╱ // 0x3eec @0x12
0x3eda…3efa at0013 = ╱4d╱M╱ // 0x3eed @0x13
0x3eda…3efa at0014 = ╱56╱V╱ // 0x3eee @0x14
0x3eda…3efa at0015 = ╱41╱A╱ // 0x3eef @0x15
0x3eda…3efa at0016 = ╱4e╱N╱ // 0x3ef0 @0x16
0x3eda…3efa at0017 = ╱54╱T╱ // 0x3ef1 @0x17
0x3eda…3efa at0018 = ╱41╱A╱ // 0x3ef2 @0x18
0x3eda…3efa at0019 = ╱4c╱L╱ // 0x3ef3 @0x19
0x3eda…3efa at001a = ╱ec╱,╱ // 0x3ef4 @0x1a
0x3eda…3efa at001b = ╱4b╱K╱ // 0x3ef5 @0x1b
0x3eda…3efa at001c = ╱33╱3╱ // 0x3ef6 @0x1c
0x3eda…3efa at001d = ╱ef╱$╱ // 0x3ef7 @0x1d
0x3eda…3efa at001e = ╱ee╱)╱ // 0x3ef8 @0x1e
0x3eda…3efa at001f = EOL // 0x3ef9 @0x1f
0x3eda…3efa }
0x3efa…3f1a cc71 6210 EXEC INDTAB1(DTAB1,MDANTAL,K2$)
0x3efa…3f1a LineComalBin {
0x3efa…3f1a ptr = 0xcc71 // 0x3efa @0x0
0x3efa…3f1a lno = 0x1842 // 0x3efc @0x2
0x3efa…3f1a at0004 = ╱9d╱ EXEC ╱ // 0x3efe @0x4
0x3efa…3f1a at0005 = ╱49╱I╱ // 0x3eff @0x5
0x3efa…3f1a at0006 = ╱4e╱N╱ // 0x3f00 @0x6
0x3efa…3f1a at0007 = ╱44╱D╱ // 0x3f01 @0x7
0x3efa…3f1a at0008 = ╱54╱T╱ // 0x3f02 @0x8
0x3efa…3f1a at0009 = ╱41╱A╱ // 0x3f03 @0x9
0x3efa…3f1a at000a = ╱42╱B╱ // 0x3f04 @0xa
0x3efa…3f1a at000b = ╱31╱1╱ // 0x3f05 @0xb
0x3efa…3f1a at000c = ╱ed╱(╱ // 0x3f06 @0xc
0x3efa…3f1a at000d = ╱44╱D╱ // 0x3f07 @0xd
0x3efa…3f1a at000e = ╱54╱T╱ // 0x3f08 @0xe
0x3efa…3f1a at000f = ╱41╱A╱ // 0x3f09 @0xf
0x3efa…3f1a at0010 = ╱42╱B╱ // 0x3f0a @0x10
0x3efa…3f1a at0011 = ╱31╱1╱ // 0x3f0b @0x11
0x3efa…3f1a at0012 = ╱ec╱,╱ // 0x3f0c @0x12
0x3efa…3f1a at0013 = ╱4d╱M╱ // 0x3f0d @0x13
0x3efa…3f1a at0014 = ╱44╱D╱ // 0x3f0e @0x14
0x3efa…3f1a at0015 = ╱41╱A╱ // 0x3f0f @0x15
0x3efa…3f1a at0016 = ╱4e╱N╱ // 0x3f10 @0x16
0x3efa…3f1a at0017 = ╱54╱T╱ // 0x3f11 @0x17
0x3efa…3f1a at0018 = ╱41╱A╱ // 0x3f12 @0x18
0x3efa…3f1a at0019 = ╱4c╱L╱ // 0x3f13 @0x19
0x3efa…3f1a at001a = ╱ec╱,╱ // 0x3f14 @0x1a
0x3efa…3f1a at001b = ╱4b╱K╱ // 0x3f15 @0x1b
0x3efa…3f1a at001c = ╱32╱2╱ // 0x3f16 @0x1c
0x3efa…3f1a at001d = ╱ef╱$╱ // 0x3f17 @0x1d
0x3efa…3f1a at001e = ╱ee╱)╱ // 0x3f18 @0x1e
0x3efa…3f1a at001f = EOL // 0x3f19 @0x1f
0x3efa…3f1a }
0x3f1a…3f20 cc77 6220 CLOSE
0x3f1a…3f20 LineComalBin {
0x3f1a…3f20 ptr = 0xcc77 // 0x3f1a @0x0
0x3f1a…3f20 lno = 0x184c // 0x3f1c @0x2
0x3f1a…3f20 at0004 = ╱a8╱ CLOSE ╱ // 0x3f1e @0x4
0x3f1a…3f20 at0005 = EOL // 0x3f1f @0x5
0x3f1a…3f20 }
0x3f20…3f26 cc7d 6230 REPEAT
0x3f20…3f26 LineComalBin {
0x3f20…3f26 ptr = 0xcc7d // 0x3f20 @0x0
0x3f20…3f26 lno = 0x1856 // 0x3f22 @0x2
0x3f20…3f26 at0004 = ╱97╱ REPEAT ╱ // 0x3f24 @0x4
0x3f20…3f26 at0005 = EOL // 0x3f25 @0x5
0x3f20…3f26 }
0x3f26…3f31 cc88 6240 OPEN K2$,R
0x3f26…3f31 LineComalBin {
0x3f26…3f31 ptr = 0xcc88 // 0x3f26 @0x0
0x3f26…3f31 lno = 0x1860 // 0x3f28 @0x2
0x3f26…3f31 at0004 = ╱a7╱ OPEN ╱ // 0x3f2a @0x4
0x3f26…3f31 at0005 = ╱4b╱K╱ // 0x3f2b @0x5
0x3f26…3f31 at0006 = ╱32╱2╱ // 0x3f2c @0x6
0x3f26…3f31 at0007 = ╱ef╱$╱ // 0x3f2d @0x7
0x3f26…3f31 at0008 = ╱ec╱,╱ // 0x3f2e @0x8
0x3f26…3f31 at0009 = ╱52╱R╱ // 0x3f2f @0x9
0x3f26…3f31 at000a = EOL // 0x3f30 @0xa
0x3f26…3f31 }
0x3f31…3f4d cca4 6250 EXEC FE(9,19,K2$)
0x3f31…3f4d LineComalBin {
0x3f31…3f4d ptr = 0xcca4 // 0x3f31 @0x0
0x3f31…3f4d lno = 0x186a // 0x3f33 @0x2
0x3f31…3f4d at0004 = ╱9d╱ EXEC ╱ // 0x3f35 @0x4
0x3f31…3f4d at0005 = ╱46╱F╱ // 0x3f36 @0x5
0x3f31…3f4d at0006 = ╱45╱E╱ // 0x3f37 @0x6
0x3f31…3f4d at0007 = ╱ed╱(╱ // 0x3f38 @0x7
0x3f31…3f4d at0008 = ╱39╱9╱ // 0x3f39 @0x8
0x3f31…3f4d at0009 = ╱fe00009004╱ // 0x3f3a @0x9
0x3f31…3f4d at000e = ╱ec╱,╱ // 0x3f3f @0xe
0x3f31…3f4d at000f = ╱31╱1╱ // 0x3f40 @0xf
0x3f31…3f4d at0010 = ╱39╱9╱ // 0x3f41 @0x10
0x3f31…3f4d at0011 = ╱fe00009805╱ // 0x3f42 @0x11
0x3f31…3f4d at0016 = ╱ec╱,╱ // 0x3f47 @0x16
0x3f31…3f4d at0017 = ╱4b╱K╱ // 0x3f48 @0x17
0x3f31…3f4d at0018 = ╱32╱2╱ // 0x3f49 @0x18
0x3f31…3f4d at0019 = ╱ef╱$╱ // 0x3f4a @0x19
0x3f31…3f4d at001a = ╱ee╱)╱ // 0x3f4b @0x1a
0x3f31…3f4d at001b = EOL // 0x3f4c @0x1b
0x3f31…3f4d }
0x3f4d…3f58 ccaf 6260 OPEN K3$,R
0x3f4d…3f58 LineComalBin {
0x3f4d…3f58 ptr = 0xccaf // 0x3f4d @0x0
0x3f4d…3f58 lno = 0x1874 // 0x3f4f @0x2
0x3f4d…3f58 at0004 = ╱a7╱ OPEN ╱ // 0x3f51 @0x4
0x3f4d…3f58 at0005 = ╱4b╱K╱ // 0x3f52 @0x5
0x3f4d…3f58 at0006 = ╱33╱3╱ // 0x3f53 @0x6
0x3f4d…3f58 at0007 = ╱ef╱$╱ // 0x3f54 @0x7
0x3f4d…3f58 at0008 = ╱ec╱,╱ // 0x3f55 @0x8
0x3f4d…3f58 at0009 = ╱52╱R╱ // 0x3f56 @0x9
0x3f4d…3f58 at000a = EOL // 0x3f57 @0xa
0x3f4d…3f58 }
0x3f58…3f74 cccb 6270 EXEC FE(9,20,K3$)
0x3f58…3f74 LineComalBin {
0x3f58…3f74 ptr = 0xcccb // 0x3f58 @0x0
0x3f58…3f74 lno = 0x187e // 0x3f5a @0x2
0x3f58…3f74 at0004 = ╱9d╱ EXEC ╱ // 0x3f5c @0x4
0x3f58…3f74 at0005 = ╱46╱F╱ // 0x3f5d @0x5
0x3f58…3f74 at0006 = ╱45╱E╱ // 0x3f5e @0x6
0x3f58…3f74 at0007 = ╱ed╱(╱ // 0x3f5f @0x7
0x3f58…3f74 at0008 = ╱39╱9╱ // 0x3f60 @0x8
0x3f58…3f74 at0009 = ╱fe00009004╱ // 0x3f61 @0x9
0x3f58…3f74 at000e = ╱ec╱,╱ // 0x3f66 @0xe
0x3f58…3f74 at000f = ╱32╱2╱ // 0x3f67 @0xf
0x3f58…3f74 at0010 = ╱30╱0╱ // 0x3f68 @0x10
0x3f58…3f74 at0011 = ╱fe0000a005╱ // 0x3f69 @0x11
0x3f58…3f74 at0016 = ╱ec╱,╱ // 0x3f6e @0x16
0x3f58…3f74 at0017 = ╱4b╱K╱ // 0x3f6f @0x17
0x3f58…3f74 at0018 = ╱33╱3╱ // 0x3f70 @0x18
0x3f58…3f74 at0019 = ╱ef╱$╱ // 0x3f71 @0x19
0x3f58…3f74 at001a = ╱ee╱)╱ // 0x3f72 @0x1a
0x3f58…3f74 at001b = EOL // 0x3f73 @0x1b
0x3f58…3f74 }
0x3f74…3f7f ccd6 6280 OPEN K4$,R
0x3f74…3f7f LineComalBin {
0x3f74…3f7f ptr = 0xccd6 // 0x3f74 @0x0
0x3f74…3f7f lno = 0x1888 // 0x3f76 @0x2
0x3f74…3f7f at0004 = ╱a7╱ OPEN ╱ // 0x3f78 @0x4
0x3f74…3f7f at0005 = ╱4b╱K╱ // 0x3f79 @0x5
0x3f74…3f7f at0006 = ╱34╱4╱ // 0x3f7a @0x6
0x3f74…3f7f at0007 = ╱ef╱$╱ // 0x3f7b @0x7
0x3f74…3f7f at0008 = ╱ec╱,╱ // 0x3f7c @0x8
0x3f74…3f7f at0009 = ╱52╱R╱ // 0x3f7d @0x9
0x3f74…3f7f at000a = EOL // 0x3f7e @0xa
0x3f74…3f7f }
0x3f7f…3f9b ccf2 6290 EXEC FE(9,21,K4$)
0x3f7f…3f9b LineComalBin {
0x3f7f…3f9b ptr = 0xccf2 // 0x3f7f @0x0
0x3f7f…3f9b lno = 0x1892 // 0x3f81 @0x2
0x3f7f…3f9b at0004 = ╱9d╱ EXEC ╱ // 0x3f83 @0x4
0x3f7f…3f9b at0005 = ╱46╱F╱ // 0x3f84 @0x5
0x3f7f…3f9b at0006 = ╱45╱E╱ // 0x3f85 @0x6
0x3f7f…3f9b at0007 = ╱ed╱(╱ // 0x3f86 @0x7
0x3f7f…3f9b at0008 = ╱39╱9╱ // 0x3f87 @0x8
0x3f7f…3f9b at0009 = ╱fe00009004╱ // 0x3f88 @0x9
0x3f7f…3f9b at000e = ╱ec╱,╱ // 0x3f8d @0xe
0x3f7f…3f9b at000f = ╱32╱2╱ // 0x3f8e @0xf
0x3f7f…3f9b at0010 = ╱31╱1╱ // 0x3f8f @0x10
0x3f7f…3f9b at0011 = ╱fe0000a805╱ // 0x3f90 @0x11
0x3f7f…3f9b at0016 = ╱ec╱,╱ // 0x3f95 @0x16
0x3f7f…3f9b at0017 = ╱4b╱K╱ // 0x3f96 @0x17
0x3f7f…3f9b at0018 = ╱34╱4╱ // 0x3f97 @0x18
0x3f7f…3f9b at0019 = ╱ef╱$╱ // 0x3f98 @0x19
0x3f7f…3f9b at001a = ╱ee╱)╱ // 0x3f99 @0x1a
0x3f7f…3f9b at001b = EOL // 0x3f9a @0x1b
0x3f7f…3f9b }
0x3f9b…3fa6 ccfd 6300 OPEN K5$,R
0x3f9b…3fa6 LineComalBin {
0x3f9b…3fa6 ptr = 0xccfd // 0x3f9b @0x0
0x3f9b…3fa6 lno = 0x189c // 0x3f9d @0x2
0x3f9b…3fa6 at0004 = ╱a7╱ OPEN ╱ // 0x3f9f @0x4
0x3f9b…3fa6 at0005 = ╱4b╱K╱ // 0x3fa0 @0x5
0x3f9b…3fa6 at0006 = ╱35╱5╱ // 0x3fa1 @0x6
0x3f9b…3fa6 at0007 = ╱ef╱$╱ // 0x3fa2 @0x7
0x3f9b…3fa6 at0008 = ╱ec╱,╱ // 0x3fa3 @0x8
0x3f9b…3fa6 at0009 = ╱52╱R╱ // 0x3fa4 @0x9
0x3f9b…3fa6 at000a = EOL // 0x3fa5 @0xa
0x3f9b…3fa6 }
0x3fa6…3fc2 cd19 6310 EXEC FE(9,22,K5$)
0x3fa6…3fc2 LineComalBin {
0x3fa6…3fc2 ptr = 0xcd19 // 0x3fa6 @0x0
0x3fa6…3fc2 lno = 0x18a6 // 0x3fa8 @0x2
0x3fa6…3fc2 at0004 = ╱9d╱ EXEC ╱ // 0x3faa @0x4
0x3fa6…3fc2 at0005 = ╱46╱F╱ // 0x3fab @0x5
0x3fa6…3fc2 at0006 = ╱45╱E╱ // 0x3fac @0x6
0x3fa6…3fc2 at0007 = ╱ed╱(╱ // 0x3fad @0x7
0x3fa6…3fc2 at0008 = ╱39╱9╱ // 0x3fae @0x8
0x3fa6…3fc2 at0009 = ╱fe00009004╱ // 0x3faf @0x9
0x3fa6…3fc2 at000e = ╱ec╱,╱ // 0x3fb4 @0xe
0x3fa6…3fc2 at000f = ╱32╱2╱ // 0x3fb5 @0xf
0x3fa6…3fc2 at0010 = ╱32╱2╱ // 0x3fb6 @0x10
0x3fa6…3fc2 at0011 = ╱fe0000b005╱ // 0x3fb7 @0x11
0x3fa6…3fc2 at0016 = ╱ec╱,╱ // 0x3fbc @0x16
0x3fa6…3fc2 at0017 = ╱4b╱K╱ // 0x3fbd @0x17
0x3fa6…3fc2 at0018 = ╱35╱5╱ // 0x3fbe @0x18
0x3fa6…3fc2 at0019 = ╱ef╱$╱ // 0x3fbf @0x19
0x3fa6…3fc2 at001a = ╱ee╱)╱ // 0x3fc0 @0x1a
0x3fa6…3fc2 at001b = EOL // 0x3fc1 @0x1b
0x3fa6…3fc2 }
0x3fc2…400d cd64 6320 FAKTNR=T1(1);KREDNR=T1(2);DATO=T1(7);APOSTER=T2(4)
0x3fc2…400d LineComalBin {
0x3fc2…400d ptr = 0xcd64 // 0x3fc2 @0x0
0x3fc2…400d lno = 0x18b0 // 0x3fc4 @0x2
0x3fc2…400d at0004 = ╱46╱F╱ // 0x3fc6 @0x4
0x3fc2…400d at0005 = ╱41╱A╱ // 0x3fc7 @0x5
0x3fc2…400d at0006 = ╱4b╱K╱ // 0x3fc8 @0x6
0x3fc2…400d at0007 = ╱54╱T╱ // 0x3fc9 @0x7
0x3fc2…400d at0008 = ╱4e╱N╱ // 0x3fca @0x8
0x3fc2…400d at0009 = ╱52╱R╱ // 0x3fcb @0x9
0x3fc2…400d at000a = ╱dc╱=╱ // 0x3fcc @0xa
0x3fc2…400d at000b = ╱54╱T╱ // 0x3fcd @0xb
0x3fc2…400d at000c = ╱31╱1╱ // 0x3fce @0xc
0x3fc2…400d at000d = ╱ed╱(╱ // 0x3fcf @0xd
0x3fc2…400d at000e = ╱31╱1╱ // 0x3fd0 @0xe
0x3fc2…400d at000f = ╱fe00008001╱ // 0x3fd1 @0xf
0x3fc2…400d at0014 = ╱ee╱)╱ // 0x3fd6 @0x14
0x3fc2…400d at0015 = ╱eb╱;╱ // 0x3fd7 @0x15
0x3fc2…400d at0016 = ╱4b╱K╱ // 0x3fd8 @0x16
0x3fc2…400d at0017 = ╱52╱R╱ // 0x3fd9 @0x17
0x3fc2…400d at0018 = ╱45╱E╱ // 0x3fda @0x18
0x3fc2…400d at0019 = ╱44╱D╱ // 0x3fdb @0x19
0x3fc2…400d at001a = ╱4e╱N╱ // 0x3fdc @0x1a
0x3fc2…400d at001b = ╱52╱R╱ // 0x3fdd @0x1b
0x3fc2…400d at001c = ╱dc╱=╱ // 0x3fde @0x1c
0x3fc2…400d at001d = ╱54╱T╱ // 0x3fdf @0x1d
0x3fc2…400d at001e = ╱31╱1╱ // 0x3fe0 @0x1e
0x3fc2…400d at001f = ╱ed╱(╱ // 0x3fe1 @0x1f
0x3fc2…400d at0020 = ╱32╱2╱ // 0x3fe2 @0x20
0x3fc2…400d at0021 = ╱fe00008002╱ // 0x3fe3 @0x21
0x3fc2…400d at0026 = ╱ee╱)╱ // 0x3fe8 @0x26
0x3fc2…400d at0027 = ╱eb╱;╱ // 0x3fe9 @0x27
0x3fc2…400d at0028 = ╱44╱D╱ // 0x3fea @0x28
0x3fc2…400d at0029 = ╱41╱A╱ // 0x3feb @0x29
0x3fc2…400d at002a = ╱54╱T╱ // 0x3fec @0x2a
0x3fc2…400d at002b = ╱4f╱O╱ // 0x3fed @0x2b
0x3fc2…400d at002c = ╱dc╱=╱ // 0x3fee @0x2c
0x3fc2…400d at002d = ╱54╱T╱ // 0x3fef @0x2d
0x3fc2…400d at002e = ╱31╱1╱ // 0x3ff0 @0x2e
0x3fc2…400d at002f = ╱ed╱(╱ // 0x3ff1 @0x2f
0x3fc2…400d at0030 = ╱37╱7╱ // 0x3ff2 @0x30
0x3fc2…400d at0031 = ╱fe0000e003╱ // 0x3ff3 @0x31
0x3fc2…400d at0036 = ╱ee╱)╱ // 0x3ff8 @0x36
0x3fc2…400d at0037 = ╱eb╱;╱ // 0x3ff9 @0x37
0x3fc2…400d at0038 = ╱41╱A╱ // 0x3ffa @0x38
0x3fc2…400d at0039 = ╱50╱P╱ // 0x3ffb @0x39
0x3fc2…400d at003a = ╱4f╱O╱ // 0x3ffc @0x3a
0x3fc2…400d at003b = ╱53╱S╱ // 0x3ffd @0x3b
0x3fc2…400d at003c = ╱54╱T╱ // 0x3ffe @0x3c
0x3fc2…400d at003d = ╱45╱E╱ // 0x3fff @0x3d
0x3fc2…400d at003e = ╱52╱R╱ // 0x4000 @0x3e
0x3fc2…400d at003f = ╱dc╱=╱ // 0x4001 @0x3f
0x3fc2…400d at0040 = ╱54╱T╱ // 0x4002 @0x40
0x3fc2…400d at0041 = ╱32╱2╱ // 0x4003 @0x41
0x3fc2…400d at0042 = ╱ed╱(╱ // 0x4004 @0x42
0x3fc2…400d at0043 = ╱34╱4╱ // 0x4005 @0x43
0x3fc2…400d at0044 = ╱fe00008003╱ // 0x4006 @0x44
0x3fc2…400d at0049 = ╱ee╱)╱ // 0x400b @0x49
0x3fc2…400d at004a = EOL // 0x400c @0x4a
0x3fc2…400d }
0x400d…4058 cdaf 6330 AKRED=T2(5);AFAKT=T2(6);AVKONTI=T2(7);FJPOST=T2(8)
0x400d…4058 LineComalBin {
0x400d…4058 ptr = 0xcdaf // 0x400d @0x0
0x400d…4058 lno = 0x18ba // 0x400f @0x2
0x400d…4058 at0004 = ╱41╱A╱ // 0x4011 @0x4
0x400d…4058 at0005 = ╱4b╱K╱ // 0x4012 @0x5
0x400d…4058 at0006 = ╱52╱R╱ // 0x4013 @0x6
0x400d…4058 at0007 = ╱45╱E╱ // 0x4014 @0x7
0x400d…4058 at0008 = ╱44╱D╱ // 0x4015 @0x8
0x400d…4058 at0009 = ╱dc╱=╱ // 0x4016 @0x9
0x400d…4058 at000a = ╱54╱T╱ // 0x4017 @0xa
0x400d…4058 at000b = ╱32╱2╱ // 0x4018 @0xb
0x400d…4058 at000c = ╱ed╱(╱ // 0x4019 @0xc
0x400d…4058 at000d = ╱35╱5╱ // 0x401a @0xd
0x400d…4058 at000e = ╱fe0000a003╱ // 0x401b @0xe
0x400d…4058 at0013 = ╱ee╱)╱ // 0x4020 @0x13
0x400d…4058 at0014 = ╱eb╱;╱ // 0x4021 @0x14
0x400d…4058 at0015 = ╱41╱A╱ // 0x4022 @0x15
0x400d…4058 at0016 = ╱46╱F╱ // 0x4023 @0x16
0x400d…4058 at0017 = ╱41╱A╱ // 0x4024 @0x17
0x400d…4058 at0018 = ╱4b╱K╱ // 0x4025 @0x18
0x400d…4058 at0019 = ╱54╱T╱ // 0x4026 @0x19
0x400d…4058 at001a = ╱dc╱=╱ // 0x4027 @0x1a
0x400d…4058 at001b = ╱54╱T╱ // 0x4028 @0x1b
0x400d…4058 at001c = ╱32╱2╱ // 0x4029 @0x1c
0x400d…4058 at001d = ╱ed╱(╱ // 0x402a @0x1d
0x400d…4058 at001e = ╱36╱6╱ // 0x402b @0x1e
0x400d…4058 at001f = ╱fe0000c003╱ // 0x402c @0x1f
0x400d…4058 at0024 = ╱ee╱)╱ // 0x4031 @0x24
0x400d…4058 at0025 = ╱eb╱;╱ // 0x4032 @0x25
0x400d…4058 at0026 = ╱41╱A╱ // 0x4033 @0x26
0x400d…4058 at0027 = ╱56╱V╱ // 0x4034 @0x27
0x400d…4058 at0028 = ╱4b╱K╱ // 0x4035 @0x28
0x400d…4058 at0029 = ╱4f╱O╱ // 0x4036 @0x29
0x400d…4058 at002a = ╱4e╱N╱ // 0x4037 @0x2a
0x400d…4058 at002b = ╱54╱T╱ // 0x4038 @0x2b
0x400d…4058 at002c = ╱49╱I╱ // 0x4039 @0x2c
0x400d…4058 at002d = ╱dc╱=╱ // 0x403a @0x2d
0x400d…4058 at002e = ╱54╱T╱ // 0x403b @0x2e
0x400d…4058 at002f = ╱32╱2╱ // 0x403c @0x2f
0x400d…4058 at0030 = ╱ed╱(╱ // 0x403d @0x30
0x400d…4058 at0031 = ╱37╱7╱ // 0x403e @0x31
0x400d…4058 at0032 = ╱fe0000e003╱ // 0x403f @0x32
0x400d…4058 at0037 = ╱ee╱)╱ // 0x4044 @0x37
0x400d…4058 at0038 = ╱eb╱;╱ // 0x4045 @0x38
0x400d…4058 at0039 = ╱46╱F╱ // 0x4046 @0x39
0x400d…4058 at003a = ╱4a╱J╱ // 0x4047 @0x3a
0x400d…4058 at003b = ╱50╱P╱ // 0x4048 @0x3b
0x400d…4058 at003c = ╱4f╱O╱ // 0x4049 @0x3c
0x400d…4058 at003d = ╱53╱S╱ // 0x404a @0x3d
0x400d…4058 at003e = ╱54╱T╱ // 0x404b @0x3e
0x400d…4058 at003f = ╱dc╱=╱ // 0x404c @0x3f
0x400d…4058 at0040 = ╱54╱T╱ // 0x404d @0x40
0x400d…4058 at0041 = ╱32╱2╱ // 0x404e @0x41
0x400d…4058 at0042 = ╱ed╱(╱ // 0x404f @0x42
0x400d…4058 at0043 = ╱38╱8╱ // 0x4050 @0x43
0x400d…4058 at0044 = ╱fe00008004╱ // 0x4051 @0x44
0x400d…4058 at0049 = ╱ee╱)╱ // 0x4056 @0x49
0x400d…4058 at004a = EOL // 0x4057 @0x4a
0x400d…4058 }
0x4058…4076 cdcd 6340 TOTAL$="0+";AVALIN=1
0x4058…4076 LineComalBin {
0x4058…4076 ptr = 0xcdcd // 0x4058 @0x0
0x4058…4076 lno = 0x18c4 // 0x405a @0x2
0x4058…4076 at0004 = ╱54╱T╱ // 0x405c @0x4
0x4058…4076 at0005 = ╱4f╱O╱ // 0x405d @0x5
0x4058…4076 at0006 = ╱54╱T╱ // 0x405e @0x6
0x4058…4076 at0007 = ╱41╱A╱ // 0x405f @0x7
0x4058…4076 at0008 = ╱4c╱L╱ // 0x4060 @0x8
0x4058…4076 at0009 = ╱ef╱$╱ // 0x4061 @0x9
0x4058…4076 at000a = ╱dc╱=╱ // 0x4062 @0xa
0x4058…4076 at000b = ╱22╱"╱ // 0x4063 @0xb
0x4058…4076 at000c = ╱30╱0╱ // 0x4064 @0xc
0x4058…4076 at000d = ╱2b╱+╱ // 0x4065 @0xd
0x4058…4076 at000e = ╱22╱"╱ // 0x4066 @0xe
0x4058…4076 at000f = ╱eb╱;╱ // 0x4067 @0xf
0x4058…4076 at0010 = ╱41╱A╱ // 0x4068 @0x10
0x4058…4076 at0011 = ╱56╱V╱ // 0x4069 @0x11
0x4058…4076 at0012 = ╱41╱A╱ // 0x406a @0x12
0x4058…4076 at0013 = ╱4c╱L╱ // 0x406b @0x13
0x4058…4076 at0014 = ╱49╱I╱ // 0x406c @0x14
0x4058…4076 at0015 = ╱4e╱N╱ // 0x406d @0x15
0x4058…4076 at0016 = ╱dc╱=╱ // 0x406e @0x16
0x4058…4076 at0017 = ╱31╱1╱ // 0x406f @0x17
0x4058…4076 at0018 = ╱fe00008001╱ // 0x4070 @0x18
0x4058…4076 at001d = EOL // 0x4075 @0x1d
0x4058…4076 }
0x4076…407c cdd3 6350 REPEAT
0x4076…407c LineComalBin {
0x4076…407c ptr = 0xcdd3 // 0x4076 @0x0
0x4076…407c lno = 0x18ce // 0x4078 @0x2
0x4076…407c at0004 = ╱97╱ REPEAT ╱ // 0x407a @0x4
0x4076…407c at0005 = EOL // 0x407b @0x5
0x4076…407c }
0x407c…4082 cdd9 6360 REPEAT
0x407c…4082 LineComalBin {
0x407c…4082 ptr = 0xcdd9 // 0x407c @0x0
0x407c…4082 lno = 0x18d8 // 0x407e @0x2
0x407c…4082 at0004 = ╱97╱ REPEAT ╱ // 0x4080 @0x4
0x407c…4082 at0005 = EOL // 0x4081 @0x5
0x407c…4082 }
0x4082…4088 cddf 6370 REPEAT
0x4082…4088 LineComalBin {
0x4082…4088 ptr = 0xcddf // 0x4082 @0x0
0x4082…4088 lno = 0x18e2 // 0x4084 @0x2
0x4082…4088 at0004 = ╱97╱ REPEAT ╱ // 0x4086 @0x4
0x4082…4088 at0005 = EOL // 0x4087 @0x5
0x4082…4088 }
0x4088…408e cde5 6380 CLEAR
0x4088…408e LineComalBin {
0x4088…408e ptr = 0xcde5 // 0x4088 @0x0
0x4088…408e lno = 0x18ec // 0x408a @0x2
0x4088…408e at0004 = ╱a0╱ CLEAR ╱ // 0x408c @0x4
0x4088…408e at0005 = EOL // 0x408d @0x5
0x4088…408e }
0x408e…4094 cdeb 6390 REPEAT
0x408e…4094 LineComalBin {
0x408e…4094 ptr = 0xcdeb // 0x408e @0x0
0x408e…4094 lno = 0x18f6 // 0x4090 @0x2
0x408e…4094 at0004 = ╱97╱ REPEAT ╱ // 0x4092 @0x4
0x408e…4094 at0005 = EOL // 0x4093 @0x5
0x408e…4094 }
0x4094…40ca ce21 6400 EXEC INDPUT1(9,1,-1,100000,LTX3$)
0x4094…40ca LineComalBin {
0x4094…40ca ptr = 0xce21 // 0x4094 @0x0
0x4094…40ca lno = 0x1900 // 0x4096 @0x2
0x4094…40ca at0004 = ╱9d╱ EXEC ╱ // 0x4098 @0x4
0x4094…40ca at0005 = ╱49╱I╱ // 0x4099 @0x5
0x4094…40ca at0006 = ╱4e╱N╱ // 0x409a @0x6
0x4094…40ca at0007 = ╱44╱D╱ // 0x409b @0x7
0x4094…40ca at0008 = ╱50╱P╱ // 0x409c @0x8
0x4094…40ca at0009 = ╱55╱U╱ // 0x409d @0x9
0x4094…40ca at000a = ╱54╱T╱ // 0x409e @0xa
0x4094…40ca at000b = ╱31╱1╱ // 0x409f @0xb
0x4094…40ca at000c = ╱ed╱(╱ // 0x40a0 @0xc
0x4094…40ca at000d = ╱39╱9╱ // 0x40a1 @0xd
0x4094…40ca at000e = ╱fe00009004╱ // 0x40a2 @0xe
0x4094…40ca at0013 = ╱ec╱,╱ // 0x40a7 @0x13
0x4094…40ca at0014 = ╱31╱1╱ // 0x40a8 @0x14
0x4094…40ca at0015 = ╱fe00008001╱ // 0x40a9 @0x15
0x4094…40ca at001a = ╱ec╱,╱ // 0x40ae @0x1a
0x4094…40ca at001b = ╱e9╱-╱ // 0x40af @0x1b
0x4094…40ca at001c = ╱31╱1╱ // 0x40b0 @0x1c
0x4094…40ca at001d = ╱fe00008001╱ // 0x40b1 @0x1d
0x4094…40ca at0022 = ╱ec╱,╱ // 0x40b6 @0x22
0x4094…40ca at0023 = ╱31╱1╱ // 0x40b7 @0x23
0x4094…40ca at0024 = ╱30╱0╱ // 0x40b8 @0x24
0x4094…40ca at0025 = ╱30╱0╱ // 0x40b9 @0x25
0x4094…40ca at0026 = ╱30╱0╱ // 0x40ba @0x26
0x4094…40ca at0027 = ╱30╱0╱ // 0x40bb @0x27
0x4094…40ca at0028 = ╱30╱0╱ // 0x40bc @0x28
0x4094…40ca at0029 = ╱fe0050c311╱ // 0x40bd @0x29
0x4094…40ca at002e = ╱ec╱,╱ // 0x40c2 @0x2e
0x4094…40ca at002f = ╱4c╱L╱ // 0x40c3 @0x2f
0x4094…40ca at0030 = ╱54╱T╱ // 0x40c4 @0x30
0x4094…40ca at0031 = ╱58╱X╱ // 0x40c5 @0x31
0x4094…40ca at0032 = ╱33╱3╱ // 0x40c6 @0x32
0x4094…40ca at0033 = ╱ef╱$╱ // 0x40c7 @0x33
0x4094…40ca at0034 = ╱ee╱)╱ // 0x40c8 @0x34
0x4094…40ca at0035 = EOL // 0x40c9 @0x35
0x4094…40ca }
0x40ca…40e2 ce39 6410 UNTIL KTAL=DTAL OR P=0
0x40ca…40e2 LineComalBin {
0x40ca…40e2 ptr = 0xce39 // 0x40ca @0x0
0x40ca…40e2 lno = 0x190a // 0x40cc @0x2
0x40ca…40e2 at0004 = ╱98╱ UNTIL ╱ // 0x40ce @0x4
0x40ca…40e2 at0005 = ╱4b╱K╱ // 0x40cf @0x5
0x40ca…40e2 at0006 = ╱54╱T╱ // 0x40d0 @0x6
0x40ca…40e2 at0007 = ╱41╱A╱ // 0x40d1 @0x7
0x40ca…40e2 at0008 = ╱4c╱L╱ // 0x40d2 @0x8
0x40ca…40e2 at0009 = ╱dc╱=╱ // 0x40d3 @0x9
0x40ca…40e2 at000a = ╱44╱D╱ // 0x40d4 @0xa
0x40ca…40e2 at000b = ╱54╱T╱ // 0x40d5 @0xb
0x40ca…40e2 at000c = ╱41╱A╱ // 0x40d6 @0xc
0x40ca…40e2 at000d = ╱4c╱L╱ // 0x40d7 @0xd
0x40ca…40e2 at000e = ╱db╱ OR ╱ // 0x40d8 @0xe
0x40ca…40e2 at000f = ╱50╱P╱ // 0x40d9 @0xf
0x40ca…40e2 at0010 = ╱dc╱=╱ // 0x40da @0x10
0x40ca…40e2 at0011 = ╱30╱0╱ // 0x40db @0x11
0x40ca…40e2 at0012 = ╱fe00000000╱ // 0x40dc @0x12
0x40ca…40e2 at0017 = EOL // 0x40e1 @0x17
0x40ca…40e2 }
0x40e2…40f0 ce47 6420 KUNDENR=P
0x40e2…40f0 LineComalBin {
0x40e2…40f0 ptr = 0xce47 // 0x40e2 @0x0
0x40e2…40f0 lno = 0x1914 // 0x40e4 @0x2
0x40e2…40f0 at0004 = ╱4b╱K╱ // 0x40e6 @0x4
0x40e2…40f0 at0005 = ╱55╱U╱ // 0x40e7 @0x5
0x40e2…40f0 at0006 = ╱4e╱N╱ // 0x40e8 @0x6
0x40e2…40f0 at0007 = ╱44╱D╱ // 0x40e9 @0x7
0x40e2…40f0 at0008 = ╱45╱E╱ // 0x40ea @0x8
0x40e2…40f0 at0009 = ╱4e╱N╱ // 0x40eb @0x9
0x40e2…40f0 at000a = ╱52╱R╱ // 0x40ec @0xa
0x40e2…40f0 at000b = ╱dc╱=╱ // 0x40ed @0xb
0x40e2…40f0 at000c = ╱50╱P╱ // 0x40ee @0xc
0x40e2…40f0 at000d = EOL // 0x40ef @0xd
0x40e2…40f0 }
0x40f0…4106 ce5d 6430 IF KUNDENR=0 THEN EXIT
0x40f0…4106 LineComalBin {
0x40f0…4106 ptr = 0xce5d // 0x40f0 @0x0
0x40f0…4106 lno = 0x191e // 0x40f2 @0x2
0x40f0…4106 at0004 = ╱82╱ IF ╱ // 0x40f4 @0x4
0x40f0…4106 at0005 = ╱4b╱K╱ // 0x40f5 @0x5
0x40f0…4106 at0006 = ╱55╱U╱ // 0x40f6 @0x6
0x40f0…4106 at0007 = ╱4e╱N╱ // 0x40f7 @0x7
0x40f0…4106 at0008 = ╱44╱D╱ // 0x40f8 @0x8
0x40f0…4106 at0009 = ╱45╱E╱ // 0x40f9 @0x9
0x40f0…4106 at000a = ╱4e╱N╱ // 0x40fa @0xa
0x40f0…4106 at000b = ╱52╱R╱ // 0x40fb @0xb
0x40f0…4106 at000c = ╱dc╱=╱ // 0x40fc @0xc
0x40f0…4106 at000d = ╱30╱0╱ // 0x40fd @0xd
0x40f0…4106 at000e = ╱fe00000000╱ // 0x40fe @0xe
0x40f0…4106 at0013 = ╱b6╱ THEN ╱ // 0x4103 @0x13
0x40f0…4106 at0014 = ╱99╱ EXIT ╱ // 0x4104 @0x14
0x40f0…4106 at0015 = EOL // 0x4105 @0x15
0x40f0…4106 }
0x4106…411a ce71 6440 CURSOR 56,1
0x4106…411a LineComalBin {
0x4106…411a ptr = 0xce71 // 0x4106 @0x0
0x4106…411a lno = 0x1928 // 0x4108 @0x2
0x4106…411a at0004 = ╱a1╱ CURSOR ╱ // 0x410a @0x4
0x4106…411a at0005 = ╱35╱5╱ // 0x410b @0x5
0x4106…411a at0006 = ╱36╱6╱ // 0x410c @0x6
0x4106…411a at0007 = ╱fe0000e006╱ // 0x410d @0x7
0x4106…411a at000c = ╱ec╱,╱ // 0x4112 @0xc
0x4106…411a at000d = ╱31╱1╱ // 0x4113 @0xd
0x4106…411a at000e = ╱fe00008001╱ // 0x4114 @0xe
0x4106…411a at0013 = EOL // 0x4119 @0x13
0x4106…411a }
0x411a…413e ce95 6450 PRINT USING "####### ":KUNDENR
0x411a…413e LineComalBin {
0x411a…413e ptr = 0xce95 // 0x411a @0x0
0x411a…413e lno = 0x1932 // 0x411c @0x2
0x411a…413e at0004 = ╱92╱ PRINT ╱ // 0x411e @0x4
0x411a…413e at0005 = ╱b9╱ USING ╱ // 0x411f @0x5
0x411a…413e at0006 = ╱22╱"╱ // 0x4120 @0x6
0x411a…413e at0007 = ╱23╱#╱ // 0x4121 @0x7
0x411a…413e at0008 = ╱23╱#╱ // 0x4122 @0x8
0x411a…413e at0009 = ╱23╱#╱ // 0x4123 @0x9
0x411a…413e at000a = ╱23╱#╱ // 0x4124 @0xa
0x411a…413e at000b = ╱23╱#╱ // 0x4125 @0xb
0x411a…413e at000c = ╱23╱#╱ // 0x4126 @0xc
0x411a…413e at000d = ╱23╱#╱ // 0x4127 @0xd
0x411a…413e at000e = ╱20╱…╱ // 0x4128 @0xe
0x411a…413e at000f = ╱20╱…╱ // 0x4129 @0xf
0x411a…413e at0010 = ╱20╱…╱ // 0x412a @0x10
0x411a…413e at0011 = ╱20╱…╱ // 0x412b @0x11
0x411a…413e at0012 = ╱20╱…╱ // 0x412c @0x12
0x411a…413e at0013 = ╱20╱…╱ // 0x412d @0x13
0x411a…413e at0014 = ╱20╱…╱ // 0x412e @0x14
0x411a…413e at0015 = ╱20╱…╱ // 0x412f @0x15
0x411a…413e at0016 = ╱20╱…╱ // 0x4130 @0x16
0x411a…413e at0017 = ╱20╱…╱ // 0x4131 @0x17
0x411a…413e at0018 = ╱20╱…╱ // 0x4132 @0x18
0x411a…413e at0019 = ╱20╱…╱ // 0x4133 @0x19
0x411a…413e at001a = ╱22╱"╱ // 0x4134 @0x1a
0x411a…413e at001b = ╱f0╱:╱ // 0x4135 @0x1b
0x411a…413e at001c = ╱4b╱K╱ // 0x4136 @0x1c
0x411a…413e at001d = ╱55╱U╱ // 0x4137 @0x1d
0x411a…413e at001e = ╱4e╱N╱ // 0x4138 @0x1e
0x411a…413e at001f = ╱44╱D╱ // 0x4139 @0x1f
0x411a…413e at0020 = ╱45╱E╱ // 0x413a @0x20
0x411a…413e at0021 = ╱4e╱N╱ // 0x413b @0x21
0x411a…413e at0022 = ╱52╱R╱ // 0x413c @0x22
0x411a…413e at0023 = EOL // 0x413d @0x23
0x411a…413e }
0x413e…4153 ceaa 6460 IF KUNDENR<>DIVDNR THEN
0x413e…4153 LineComalBin {
0x413e…4153 ptr = 0xceaa // 0x413e @0x0
0x413e…4153 lno = 0x193c // 0x4140 @0x2
0x413e…4153 at0004 = ╱9c╱ IF ╱ // 0x4142 @0x4
0x413e…4153 at0005 = ╱4b╱K╱ // 0x4143 @0x5
0x413e…4153 at0006 = ╱55╱U╱ // 0x4144 @0x6
0x413e…4153 at0007 = ╱4e╱N╱ // 0x4145 @0x7
0x413e…4153 at0008 = ╱44╱D╱ // 0x4146 @0x8
0x413e…4153 at0009 = ╱45╱E╱ // 0x4147 @0x9
0x413e…4153 at000a = ╱4e╱N╱ // 0x4148 @0xa
0x413e…4153 at000b = ╱52╱R╱ // 0x4149 @0xb
0x413e…4153 at000c = ╱e1╱<>╱ // 0x414a @0xc
0x413e…4153 at000d = ╱44╱D╱ // 0x414b @0xd
0x413e…4153 at000e = ╱49╱I╱ // 0x414c @0xe
0x413e…4153 at000f = ╱56╱V╱ // 0x414d @0xf
0x413e…4153 at0010 = ╱44╱D╱ // 0x414e @0x10
0x413e…4153 at0011 = ╱4e╱N╱ // 0x414f @0x11
0x413e…4153 at0012 = ╱52╱R╱ // 0x4150 @0x12
0x413e…4153 at0013 = ╱b6╱ THEN ╱ // 0x4151 @0x13
0x413e…4153 at0014 = EOL // 0x4152 @0x14
0x413e…4153 }
0x4153…4163 ceba 6470 DIVD=0
0x4153…4163 LineComalBin {
0x4153…4163 ptr = 0xceba // 0x4153 @0x0
0x4153…4163 lno = 0x1946 // 0x4155 @0x2
0x4153…4163 at0004 = ╱44╱D╱ // 0x4157 @0x4
0x4153…4163 at0005 = ╱49╱I╱ // 0x4158 @0x5
0x4153…4163 at0006 = ╱56╱V╱ // 0x4159 @0x6
0x4153…4163 at0007 = ╱44╱D╱ // 0x415a @0x7
0x4153…4163 at0008 = ╱dc╱=╱ // 0x415b @0x8
0x4153…4163 at0009 = ╱30╱0╱ // 0x415c @0x9
0x4153…4163 at000a = ╱fe00000000╱ // 0x415d @0xa
0x4153…4163 at000f = EOL // 0x4162 @0xf
0x4153…4163 }
0x4163…4198 ceef 6480 EXEC FINDPOST1(DTAB1,DTAB,MDANTAL,KUNDENR,DPIL3,K2$)
0x4163…4198 LineComalBin {
0x4163…4198 ptr = 0xceef // 0x4163 @0x0
0x4163…4198 lno = 0x1950 // 0x4165 @0x2
0x4163…4198 at0004 = ╱9d╱ EXEC ╱ // 0x4167 @0x4
0x4163…4198 at0005 = ╱46╱F╱ // 0x4168 @0x5
0x4163…4198 at0006 = ╱49╱I╱ // 0x4169 @0x6
0x4163…4198 at0007 = ╱4e╱N╱ // 0x416a @0x7
0x4163…4198 at0008 = ╱44╱D╱ // 0x416b @0x8
0x4163…4198 at0009 = ╱50╱P╱ // 0x416c @0x9
0x4163…4198 at000a = ╱4f╱O╱ // 0x416d @0xa
0x4163…4198 at000b = ╱53╱S╱ // 0x416e @0xb
0x4163…4198 at000c = ╱54╱T╱ // 0x416f @0xc
0x4163…4198 at000d = ╱31╱1╱ // 0x4170 @0xd
0x4163…4198 at000e = ╱ed╱(╱ // 0x4171 @0xe
0x4163…4198 at000f = ╱44╱D╱ // 0x4172 @0xf
0x4163…4198 at0010 = ╱54╱T╱ // 0x4173 @0x10
0x4163…4198 at0011 = ╱41╱A╱ // 0x4174 @0x11
0x4163…4198 at0012 = ╱42╱B╱ // 0x4175 @0x12
0x4163…4198 at0013 = ╱31╱1╱ // 0x4176 @0x13
0x4163…4198 at0014 = ╱ec╱,╱ // 0x4177 @0x14
0x4163…4198 at0015 = ╱44╱D╱ // 0x4178 @0x15
0x4163…4198 at0016 = ╱54╱T╱ // 0x4179 @0x16
0x4163…4198 at0017 = ╱41╱A╱ // 0x417a @0x17
0x4163…4198 at0018 = ╱42╱B╱ // 0x417b @0x18
0x4163…4198 at0019 = ╱ec╱,╱ // 0x417c @0x19
0x4163…4198 at001a = ╱4d╱M╱ // 0x417d @0x1a
0x4163…4198 at001b = ╱44╱D╱ // 0x417e @0x1b
0x4163…4198 at001c = ╱41╱A╱ // 0x417f @0x1c
0x4163…4198 at001d = ╱4e╱N╱ // 0x4180 @0x1d
0x4163…4198 at001e = ╱54╱T╱ // 0x4181 @0x1e
0x4163…4198 at001f = ╱41╱A╱ // 0x4182 @0x1f
0x4163…4198 at0020 = ╱4c╱L╱ // 0x4183 @0x20
0x4163…4198 at0021 = ╱ec╱,╱ // 0x4184 @0x21
0x4163…4198 at0022 = ╱4b╱K╱ // 0x4185 @0x22
0x4163…4198 at0023 = ╱55╱U╱ // 0x4186 @0x23
0x4163…4198 at0024 = ╱4e╱N╱ // 0x4187 @0x24
0x4163…4198 at0025 = ╱44╱D╱ // 0x4188 @0x25
0x4163…4198 at0026 = ╱45╱E╱ // 0x4189 @0x26
0x4163…4198 at0027 = ╱4e╱N╱ // 0x418a @0x27
0x4163…4198 at0028 = ╱52╱R╱ // 0x418b @0x28
0x4163…4198 at0029 = ╱ec╱,╱ // 0x418c @0x29
0x4163…4198 at002a = ╱44╱D╱ // 0x418d @0x2a
0x4163…4198 at002b = ╱50╱P╱ // 0x418e @0x2b
0x4163…4198 at002c = ╱49╱I╱ // 0x418f @0x2c
0x4163…4198 at002d = ╱4c╱L╱ // 0x4190 @0x2d
0x4163…4198 at002e = ╱33╱3╱ // 0x4191 @0x2e
0x4163…4198 at002f = ╱ec╱,╱ // 0x4192 @0x2f
0x4163…4198 at0030 = ╱4b╱K╱ // 0x4193 @0x30
0x4163…4198 at0031 = ╱32╱2╱ // 0x4194 @0x31
0x4163…4198 at0032 = ╱ef╱$╱ // 0x4195 @0x32
0x4163…4198 at0033 = ╱ee╱)╱ // 0x4196 @0x33
0x4163…4198 at0034 = EOL // 0x4197 @0x34
0x4163…4198 }
0x4198…41aa cf01 6490 IF CEKS=1 THEN
0x4198…41aa LineComalBin {
0x4198…41aa ptr = 0xcf01 // 0x4198 @0x0
0x4198…41aa lno = 0x195a // 0x419a @0x2
0x4198…41aa at0004 = ╱9c╱ IF ╱ // 0x419c @0x4
0x4198…41aa at0005 = ╱43╱C╱ // 0x419d @0x5
0x4198…41aa at0006 = ╱45╱E╱ // 0x419e @0x6
0x4198…41aa at0007 = ╱4b╱K╱ // 0x419f @0x7
0x4198…41aa at0008 = ╱53╱S╱ // 0x41a0 @0x8
0x4198…41aa at0009 = ╱dc╱=╱ // 0x41a1 @0x9
0x4198…41aa at000a = ╱31╱1╱ // 0x41a2 @0xa
0x4198…41aa at000b = ╱fe00008001╱ // 0x41a3 @0xb
0x4198…41aa at0010 = ╱b6╱ THEN ╱ // 0x41a8 @0x10
0x4198…41aa at0011 = EOL // 0x41a9 @0x11
0x4198…41aa }
0x41aa…41bd cf14 6500 CURSOR 9,3
0x41aa…41bd LineComalBin {
0x41aa…41bd ptr = 0xcf14 // 0x41aa @0x0
0x41aa…41bd lno = 0x1964 // 0x41ac @0x2
0x41aa…41bd at0004 = ╱a1╱ CURSOR ╱ // 0x41ae @0x4
0x41aa…41bd at0005 = ╱39╱9╱ // 0x41af @0x5
0x41aa…41bd at0006 = ╱fe00009004╱ // 0x41b0 @0x6
0x41aa…41bd at000b = ╱ec╱,╱ // 0x41b5 @0xb
0x41aa…41bd at000c = ╱33╱3╱ // 0x41b6 @0xc
0x41aa…41bd at000d = ╱fe0000c002╱ // 0x41b7 @0xd
0x41aa…41bd at0012 = EOL // 0x41bc @0x12
0x41aa…41bd }
0x41bd…41f0 cf47 6510 INPUT "Kunden eksisterer ikke. Tast RETURN.",SVAR1$
0x41bd…41f0 LineComalBin {
0x41bd…41f0 ptr = 0xcf47 // 0x41bd @0x0
0x41bd…41f0 lno = 0x196e // 0x41bf @0x2
0x41bd…41f0 at0004 = ╱91╱ INPUT ╱ // 0x41c1 @0x4
0x41bd…41f0 at0005 = ╱22╱"╱ // 0x41c2 @0x5
0x41bd…41f0 at0006 = ╱4b╱K╱ // 0x41c3 @0x6
0x41bd…41f0 at0007 = ╱75╱u╱ // 0x41c4 @0x7
0x41bd…41f0 at0008 = ╱6e╱n╱ // 0x41c5 @0x8
0x41bd…41f0 at0009 = ╱64╱d╱ // 0x41c6 @0x9
0x41bd…41f0 at000a = ╱65╱e╱ // 0x41c7 @0xa
0x41bd…41f0 at000b = ╱6e╱n╱ // 0x41c8 @0xb
0x41bd…41f0 at000c = ╱20╱…╱ // 0x41c9 @0xc
0x41bd…41f0 at000d = ╱65╱e╱ // 0x41ca @0xd
0x41bd…41f0 at000e = ╱6b╱k╱ // 0x41cb @0xe
0x41bd…41f0 at000f = ╱73╱s╱ // 0x41cc @0xf
0x41bd…41f0 at0010 = ╱69╱i╱ // 0x41cd @0x10
0x41bd…41f0 at0011 = ╱73╱s╱ // 0x41ce @0x11
0x41bd…41f0 at0012 = ╱74╱t╱ // 0x41cf @0x12
0x41bd…41f0 at0013 = ╱65╱e╱ // 0x41d0 @0x13
0x41bd…41f0 at0014 = ╱72╱r╱ // 0x41d1 @0x14
0x41bd…41f0 at0015 = ╱65╱e╱ // 0x41d2 @0x15
0x41bd…41f0 at0016 = ╱72╱r╱ // 0x41d3 @0x16
0x41bd…41f0 at0017 = ╱20╱…╱ // 0x41d4 @0x17
0x41bd…41f0 at0018 = ╱69╱i╱ // 0x41d5 @0x18
0x41bd…41f0 at0019 = ╱6b╱k╱ // 0x41d6 @0x19
0x41bd…41f0 at001a = ╱6b╱k╱ // 0x41d7 @0x1a
0x41bd…41f0 at001b = ╱65╱e╱ // 0x41d8 @0x1b
0x41bd…41f0 at001c = ╱2e╱.╱ // 0x41d9 @0x1c
0x41bd…41f0 at001d = ╱20╱…╱ // 0x41da @0x1d
0x41bd…41f0 at001e = ╱54╱T╱ // 0x41db @0x1e
0x41bd…41f0 at001f = ╱61╱a╱ // 0x41dc @0x1f
0x41bd…41f0 at0020 = ╱73╱s╱ // 0x41dd @0x20
0x41bd…41f0 at0021 = ╱74╱t╱ // 0x41de @0x21
0x41bd…41f0 at0022 = ╱20╱…╱ // 0x41df @0x22
0x41bd…41f0 at0023 = ╱52╱R╱ // 0x41e0 @0x23
0x41bd…41f0 at0024 = ╱45╱E╱ // 0x41e1 @0x24
0x41bd…41f0 at0025 = ╱54╱T╱ // 0x41e2 @0x25
0x41bd…41f0 at0026 = ╱55╱U╱ // 0x41e3 @0x26
0x41bd…41f0 at0027 = ╱52╱R╱ // 0x41e4 @0x27
0x41bd…41f0 at0028 = ╱4e╱N╱ // 0x41e5 @0x28
0x41bd…41f0 at0029 = ╱2e╱.╱ // 0x41e6 @0x29
0x41bd…41f0 at002a = ╱22╱"╱ // 0x41e7 @0x2a
0x41bd…41f0 at002b = ╱ec╱,╱ // 0x41e8 @0x2b
0x41bd…41f0 at002c = ╱53╱S╱ // 0x41e9 @0x2c
0x41bd…41f0 at002d = ╱56╱V╱ // 0x41ea @0x2d
0x41bd…41f0 at002e = ╱41╱A╱ // 0x41eb @0x2e
0x41bd…41f0 at002f = ╱52╱R╱ // 0x41ec @0x2f
0x41bd…41f0 at0030 = ╱31╱1╱ // 0x41ed @0x30
0x41bd…41f0 at0031 = ╱ef╱$╱ // 0x41ee @0x31
0x41bd…41f0 at0032 = EOL // 0x41ef @0x32
0x41bd…41f0 }
0x41f0…41f6 cf4d 6520 ELSE
0x41f0…41f6 LineComalBin {
0x41f0…41f6 ptr = 0xcf4d // 0x41f0 @0x0
0x41f0…41f6 lno = 0x1978 // 0x41f2 @0x2
0x41f0…41f6 at0004 = ╱9a╱ ELSE ╱ // 0x41f4 @0x4
0x41f0…41f6 at0005 = EOL // 0x41f5 @0x5
0x41f0…41f6 }
0x41f6…4205 cf5c 6530 EXEC HENTDPOST
0x41f6…4205 LineComalBin {
0x41f6…4205 ptr = 0xcf5c // 0x41f6 @0x0
0x41f6…4205 lno = 0x1982 // 0x41f8 @0x2
0x41f6…4205 at0004 = ╱9d╱ EXEC ╱ // 0x41fa @0x4
0x41f6…4205 at0005 = ╱48╱H╱ // 0x41fb @0x5
0x41f6…4205 at0006 = ╱45╱E╱ // 0x41fc @0x6
0x41f6…4205 at0007 = ╱4e╱N╱ // 0x41fd @0x7
0x41f6…4205 at0008 = ╱54╱T╱ // 0x41fe @0x8
0x41f6…4205 at0009 = ╱44╱D╱ // 0x41ff @0x9
0x41f6…4205 at000a = ╱50╱P╱ // 0x4200 @0xa
0x41f6…4205 at000b = ╱4f╱O╱ // 0x4201 @0xb
0x41f6…4205 at000c = ╱53╱S╱ // 0x4202 @0xc
0x41f6…4205 at000d = ╱54╱T╱ // 0x4203 @0xd
0x41f6…4205 at000e = EOL // 0x4204 @0xe
0x41f6…4205 }
0x4205…420b cf62 6540 ENDIF
0x4205…420b LineComalBin {
0x4205…420b ptr = 0xcf62 // 0x4205 @0x0
0x4205…420b lno = 0x198c // 0x4207 @0x2
0x4205…420b at0004 = ╱9b╱ ENDIF ╱ // 0x4209 @0x4
0x4205…420b at0005 = EOL // 0x420a @0x5
0x4205…420b }
0x420b…4211 cf68 6550 ELSE
0x420b…4211 LineComalBin {
0x420b…4211 ptr = 0xcf68 // 0x420b @0x0
0x420b…4211 lno = 0x1996 // 0x420d @0x2
0x420b…4211 at0004 = ╱9a╱ ELSE ╱ // 0x420f @0x4
0x420b…4211 at0005 = EOL // 0x4210 @0x5
0x420b…4211 }
0x4211…422d cf84 6560 DIVD=1;CEKS=0
0x4211…422d LineComalBin {
0x4211…422d ptr = 0xcf84 // 0x4211 @0x0
0x4211…422d lno = 0x19a0 // 0x4213 @0x2
0x4211…422d at0004 = ╱44╱D╱ // 0x4215 @0x4
0x4211…422d at0005 = ╱49╱I╱ // 0x4216 @0x5
0x4211…422d at0006 = ╱56╱V╱ // 0x4217 @0x6
0x4211…422d at0007 = ╱44╱D╱ // 0x4218 @0x7
0x4211…422d at0008 = ╱dc╱=╱ // 0x4219 @0x8
0x4211…422d at0009 = ╱31╱1╱ // 0x421a @0x9
0x4211…422d at000a = ╱fe00008001╱ // 0x421b @0xa
0x4211…422d at000f = ╱eb╱;╱ // 0x4220 @0xf
0x4211…422d at0010 = ╱43╱C╱ // 0x4221 @0x10
0x4211…422d at0011 = ╱45╱E╱ // 0x4222 @0x11
0x4211…422d at0012 = ╱4b╱K╱ // 0x4223 @0x12
0x4211…422d at0013 = ╱53╱S╱ // 0x4224 @0x13
0x4211…422d at0014 = ╱dc╱=╱ // 0x4225 @0x14
0x4211…422d at0015 = ╱30╱0╱ // 0x4226 @0x15
0x4211…422d at0016 = ╱fe00000000╱ // 0x4227 @0x16
0x4211…422d at001b = EOL // 0x422c @0x1b
0x4211…422d }
0x422d…4261 cfb8 6570 EXEC FINDPOST1(DTAB1,DTAB,MDANTAL,DIVDNR,DPIL3,K2$)
0x422d…4261 LineComalBin {
0x422d…4261 ptr = 0xcfb8 // 0x422d @0x0
0x422d…4261 lno = 0x19aa // 0x422f @0x2
0x422d…4261 at0004 = ╱9d╱ EXEC ╱ // 0x4231 @0x4
0x422d…4261 at0005 = ╱46╱F╱ // 0x4232 @0x5
0x422d…4261 at0006 = ╱49╱I╱ // 0x4233 @0x6
0x422d…4261 at0007 = ╱4e╱N╱ // 0x4234 @0x7
0x422d…4261 at0008 = ╱44╱D╱ // 0x4235 @0x8
0x422d…4261 at0009 = ╱50╱P╱ // 0x4236 @0x9
0x422d…4261 at000a = ╱4f╱O╱ // 0x4237 @0xa
0x422d…4261 at000b = ╱53╱S╱ // 0x4238 @0xb
0x422d…4261 at000c = ╱54╱T╱ // 0x4239 @0xc
0x422d…4261 at000d = ╱31╱1╱ // 0x423a @0xd
0x422d…4261 at000e = ╱ed╱(╱ // 0x423b @0xe
0x422d…4261 at000f = ╱44╱D╱ // 0x423c @0xf
0x422d…4261 at0010 = ╱54╱T╱ // 0x423d @0x10
0x422d…4261 at0011 = ╱41╱A╱ // 0x423e @0x11
0x422d…4261 at0012 = ╱42╱B╱ // 0x423f @0x12
0x422d…4261 at0013 = ╱31╱1╱ // 0x4240 @0x13
0x422d…4261 at0014 = ╱ec╱,╱ // 0x4241 @0x14
0x422d…4261 at0015 = ╱44╱D╱ // 0x4242 @0x15
0x422d…4261 at0016 = ╱54╱T╱ // 0x4243 @0x16
0x422d…4261 at0017 = ╱41╱A╱ // 0x4244 @0x17
0x422d…4261 at0018 = ╱42╱B╱ // 0x4245 @0x18
0x422d…4261 at0019 = ╱ec╱,╱ // 0x4246 @0x19
0x422d…4261 at001a = ╱4d╱M╱ // 0x4247 @0x1a
0x422d…4261 at001b = ╱44╱D╱ // 0x4248 @0x1b
0x422d…4261 at001c = ╱41╱A╱ // 0x4249 @0x1c
0x422d…4261 at001d = ╱4e╱N╱ // 0x424a @0x1d
0x422d…4261 at001e = ╱54╱T╱ // 0x424b @0x1e
0x422d…4261 at001f = ╱41╱A╱ // 0x424c @0x1f
0x422d…4261 at0020 = ╱4c╱L╱ // 0x424d @0x20
0x422d…4261 at0021 = ╱ec╱,╱ // 0x424e @0x21
0x422d…4261 at0022 = ╱44╱D╱ // 0x424f @0x22
0x422d…4261 at0023 = ╱49╱I╱ // 0x4250 @0x23
0x422d…4261 at0024 = ╱56╱V╱ // 0x4251 @0x24
0x422d…4261 at0025 = ╱44╱D╱ // 0x4252 @0x25
0x422d…4261 at0026 = ╱4e╱N╱ // 0x4253 @0x26
0x422d…4261 at0027 = ╱52╱R╱ // 0x4254 @0x27
0x422d…4261 at0028 = ╱ec╱,╱ // 0x4255 @0x28
0x422d…4261 at0029 = ╱44╱D╱ // 0x4256 @0x29
0x422d…4261 at002a = ╱50╱P╱ // 0x4257 @0x2a
0x422d…4261 at002b = ╱49╱I╱ // 0x4258 @0x2b
0x422d…4261 at002c = ╱4c╱L╱ // 0x4259 @0x2c
0x422d…4261 at002d = ╱33╱3╱ // 0x425a @0x2d
0x422d…4261 at002e = ╱ec╱,╱ // 0x425b @0x2e
0x422d…4261 at002f = ╱4b╱K╱ // 0x425c @0x2f
0x422d…4261 at0030 = ╱32╱2╱ // 0x425d @0x30
0x422d…4261 at0031 = ╱ef╱$╱ // 0x425e @0x31
0x422d…4261 at0032 = ╱ee╱)╱ // 0x425f @0x32
0x422d…4261 at0033 = EOL // 0x4260 @0x33
0x422d…4261 }
0x4261…4274 cfcb 6580 IF CEKS=1 THEN STOP
0x4261…4274 LineComalBin {
0x4261…4274 ptr = 0xcfcb // 0x4261 @0x0
0x4261…4274 lno = 0x19b4 // 0x4263 @0x2
0x4261…4274 at0004 = ╱82╱ IF ╱ // 0x4265 @0x4
0x4261…4274 at0005 = ╱43╱C╱ // 0x4266 @0x5
0x4261…4274 at0006 = ╱45╱E╱ // 0x4267 @0x6
0x4261…4274 at0007 = ╱4b╱K╱ // 0x4268 @0x7
0x4261…4274 at0008 = ╱53╱S╱ // 0x4269 @0x8
0x4261…4274 at0009 = ╱dc╱=╱ // 0x426a @0x9
0x4261…4274 at000a = ╱31╱1╱ // 0x426b @0xa
0x4261…4274 at000b = ╱fe00008001╱ // 0x426c @0xb
0x4261…4274 at0010 = ╱b6╱ THEN ╱ // 0x4271 @0x10
0x4261…4274 at0011 = ╱8d╱ STOP ╱ // 0x4272 @0x11
0x4261…4274 at0012 = EOL // 0x4273 @0x12
0x4261…4274 }
0x4274…4283 cfda 6590 EXEC HENTDPOST
0x4274…4283 LineComalBin {
0x4274…4283 ptr = 0xcfda // 0x4274 @0x0
0x4274…4283 lno = 0x19be // 0x4276 @0x2
0x4274…4283 at0004 = ╱9d╱ EXEC ╱ // 0x4278 @0x4
0x4274…4283 at0005 = ╱48╱H╱ // 0x4279 @0x5
0x4274…4283 at0006 = ╱45╱E╱ // 0x427a @0x6
0x4274…4283 at0007 = ╱4e╱N╱ // 0x427b @0x7
0x4274…4283 at0008 = ╱54╱T╱ // 0x427c @0x8
0x4274…4283 at0009 = ╱44╱D╱ // 0x427d @0x9
0x4274…4283 at000a = ╱50╱P╱ // 0x427e @0xa
0x4274…4283 at000b = ╱4f╱O╱ // 0x427f @0xb
0x4274…4283 at000c = ╱53╱S╱ // 0x4280 @0xc
0x4274…4283 at000d = ╱54╱T╱ // 0x4281 @0xd
0x4274…4283 at000e = EOL // 0x4282 @0xe
0x4274…4283 }
0x4283…4297 cfee 6600 CURSOR 34,5
0x4283…4297 LineComalBin {
0x4283…4297 ptr = 0xcfee // 0x4283 @0x0
0x4283…4297 lno = 0x19c8 // 0x4285 @0x2
0x4283…4297 at0004 = ╱a1╱ CURSOR ╱ // 0x4287 @0x4
0x4283…4297 at0005 = ╱33╱3╱ // 0x4288 @0x5
0x4283…4297 at0006 = ╱34╱4╱ // 0x4289 @0x6
0x4283…4297 at0007 = ╱fe00008806╱ // 0x428a @0x7
0x4283…4297 at000c = ╱ec╱,╱ // 0x428f @0xc
0x4283…4297 at000d = ╱35╱5╱ // 0x4290 @0xd
0x4283…4297 at000e = ╱fe0000a003╱ // 0x4291 @0xe
0x4283…4297 at0013 = EOL // 0x4296 @0x13
0x4283…4297 }
0x4297…42a4 cffb 6610 PRINT "Navn."
0x4297…42a4 LineComalBin {
0x4297…42a4 ptr = 0xcffb // 0x4297 @0x0
0x4297…42a4 lno = 0x19d2 // 0x4299 @0x2
0x4297…42a4 at0004 = ╱92╱ PRINT ╱ // 0x429b @0x4
0x4297…42a4 at0005 = ╱22╱"╱ // 0x429c @0x5
0x4297…42a4 at0006 = ╱4e╱N╱ // 0x429d @0x6
0x4297…42a4 at0007 = ╱61╱a╱ // 0x429e @0x7
0x4297…42a4 at0008 = ╱76╱v╱ // 0x429f @0x8
0x4297…42a4 at0009 = ╱6e╱n╱ // 0x42a0 @0x9
0x4297…42a4 at000a = ╱2e╱.╱ // 0x42a1 @0xa
0x4297…42a4 at000b = ╱22╱"╱ // 0x42a2 @0xb
0x4297…42a4 at000c = EOL // 0x42a3 @0xc
0x4297…42a4 }
0x42a4…42b7 d00e 6620 CURSOR 8,5
0x42a4…42b7 LineComalBin {
0x42a4…42b7 ptr = 0xd00e // 0x42a4 @0x0
0x42a4…42b7 lno = 0x19dc // 0x42a6 @0x2
0x42a4…42b7 at0004 = ╱a1╱ CURSOR ╱ // 0x42a8 @0x4
0x42a4…42b7 at0005 = ╱38╱8╱ // 0x42a9 @0x5
0x42a4…42b7 at0006 = ╱fe00008004╱ // 0x42aa @0x6
0x42a4…42b7 at000b = ╱ec╱,╱ // 0x42af @0xb
0x42a4…42b7 at000c = ╱35╱5╱ // 0x42b0 @0xc
0x42a4…42b7 at000d = ╱fe0000a003╱ // 0x42b1 @0xd
0x42a4…42b7 at0012 = EOL // 0x42b6 @0x12
0x42a4…42b7 }
0x42b7…42c9 d020 6630 INPUT " ",DEBNAVN$
0x42b7…42c9 LineComalBin {
0x42b7…42c9 ptr = 0xd020 // 0x42b7 @0x0
0x42b7…42c9 lno = 0x19e6 // 0x42b9 @0x2
0x42b7…42c9 at0004 = ╱91╱ INPUT ╱ // 0x42bb @0x4
0x42b7…42c9 at0005 = ╱22╱"╱ // 0x42bc @0x5
0x42b7…42c9 at0006 = ╱20╱…╱ // 0x42bd @0x6
0x42b7…42c9 at0007 = ╱22╱"╱ // 0x42be @0x7
0x42b7…42c9 at0008 = ╱ec╱,╱ // 0x42bf @0x8
0x42b7…42c9 at0009 = ╱44╱D╱ // 0x42c0 @0x9
0x42b7…42c9 at000a = ╱45╱E╱ // 0x42c1 @0xa
0x42b7…42c9 at000b = ╱42╱B╱ // 0x42c2 @0xb
0x42b7…42c9 at000c = ╱4e╱N╱ // 0x42c3 @0xc
0x42b7…42c9 at000d = ╱41╱A╱ // 0x42c4 @0xd
0x42b7…42c9 at000e = ╱56╱V╱ // 0x42c5 @0xe
0x42b7…42c9 at000f = ╱4e╱N╱ // 0x42c6 @0xf
0x42b7…42c9 at0010 = ╱ef╱$╱ // 0x42c7 @0x10
0x42b7…42c9 at0011 = EOL // 0x42c8 @0x11
0x42b7…42c9 }
0x42c9…42dc d033 6640 CURSOR 9,5
0x42c9…42dc LineComalBin {
0x42c9…42dc ptr = 0xd033 // 0x42c9 @0x0
0x42c9…42dc lno = 0x19f0 // 0x42cb @0x2
0x42c9…42dc at0004 = ╱a1╱ CURSOR ╱ // 0x42cd @0x4
0x42c9…42dc at0005 = ╱39╱9╱ // 0x42ce @0x5
0x42c9…42dc at0006 = ╱fe00009004╱ // 0x42cf @0x6
0x42c9…42dc at000b = ╱ec╱,╱ // 0x42d4 @0xb
0x42c9…42dc at000c = ╱35╱5╱ // 0x42d5 @0xc
0x42c9…42dc at000d = ╱fe0000a003╱ // 0x42d6 @0xd
0x42c9…42dc at0012 = EOL // 0x42db @0x12
0x42c9…42dc }
0x42dc…4301 d058 6650 PRINT DEBNAVN$;BLANK$(1:25)
0x42dc…4301 LineComalBin {
0x42dc…4301 ptr = 0xd058 // 0x42dc @0x0
0x42dc…4301 lno = 0x19fa // 0x42de @0x2
0x42dc…4301 at0004 = ╱92╱ PRINT ╱ // 0x42e0 @0x4
0x42dc…4301 at0005 = ╱44╱D╱ // 0x42e1 @0x5
0x42dc…4301 at0006 = ╱45╱E╱ // 0x42e2 @0x6
0x42dc…4301 at0007 = ╱42╱B╱ // 0x42e3 @0x7
0x42dc…4301 at0008 = ╱4e╱N╱ // 0x42e4 @0x8
0x42dc…4301 at0009 = ╱41╱A╱ // 0x42e5 @0x9
0x42dc…4301 at000a = ╱56╱V╱ // 0x42e6 @0xa
0x42dc…4301 at000b = ╱4e╱N╱ // 0x42e7 @0xb
0x42dc…4301 at000c = ╱ef╱$╱ // 0x42e8 @0xc
0x42dc…4301 at000d = ╱eb╱;╱ // 0x42e9 @0xd
0x42dc…4301 at000e = ╱42╱B╱ // 0x42ea @0xe
0x42dc…4301 at000f = ╱4c╱L╱ // 0x42eb @0xf
0x42dc…4301 at0010 = ╱41╱A╱ // 0x42ec @0x10
0x42dc…4301 at0011 = ╱4e╱N╱ // 0x42ed @0x11
0x42dc…4301 at0012 = ╱4b╱K╱ // 0x42ee @0x12
0x42dc…4301 at0013 = ╱ef╱$╱ // 0x42ef @0x13
0x42dc…4301 at0014 = ╱ed╱(╱ // 0x42f0 @0x14
0x42dc…4301 at0015 = ╱31╱1╱ // 0x42f1 @0x15
0x42dc…4301 at0016 = ╱fe00008001╱ // 0x42f2 @0x16
0x42dc…4301 at001b = ╱f0╱:╱ // 0x42f7 @0x1b
0x42dc…4301 at001c = ╱32╱2╱ // 0x42f8 @0x1c
0x42dc…4301 at001d = ╱35╱5╱ // 0x42f9 @0x1d
0x42dc…4301 at001e = ╱fe0000c805╱ // 0x42fa @0x1e
0x42dc…4301 at0023 = ╱ee╱)╱ // 0x42ff @0x23
0x42dc…4301 at0024 = EOL // 0x4300 @0x24
0x42dc…4301 }
0x4301…4315 d06c 6660 CURSOR 34,6
0x4301…4315 LineComalBin {
0x4301…4315 ptr = 0xd06c // 0x4301 @0x0
0x4301…4315 lno = 0x1a04 // 0x4303 @0x2
0x4301…4315 at0004 = ╱a1╱ CURSOR ╱ // 0x4305 @0x4
0x4301…4315 at0005 = ╱33╱3╱ // 0x4306 @0x5
0x4301…4315 at0006 = ╱34╱4╱ // 0x4307 @0x6
0x4301…4315 at0007 = ╱fe00008806╱ // 0x4308 @0x7
0x4301…4315 at000c = ╱ec╱,╱ // 0x430d @0xc
0x4301…4315 at000d = ╱36╱6╱ // 0x430e @0xd
0x4301…4315 at000e = ╱fe0000c003╱ // 0x430f @0xe
0x4301…4315 at0013 = EOL // 0x4314 @0x13
0x4301…4315 }
0x4315…4322 d079 6670 PRINT "Gade."
0x4315…4322 LineComalBin {
0x4315…4322 ptr = 0xd079 // 0x4315 @0x0
0x4315…4322 lno = 0x1a0e // 0x4317 @0x2
0x4315…4322 at0004 = ╱92╱ PRINT ╱ // 0x4319 @0x4
0x4315…4322 at0005 = ╱22╱"╱ // 0x431a @0x5
0x4315…4322 at0006 = ╱47╱G╱ // 0x431b @0x6
0x4315…4322 at0007 = ╱61╱a╱ // 0x431c @0x7
0x4315…4322 at0008 = ╱64╱d╱ // 0x431d @0x8
0x4315…4322 at0009 = ╱65╱e╱ // 0x431e @0x9
0x4315…4322 at000a = ╱2e╱.╱ // 0x431f @0xa
0x4315…4322 at000b = ╱22╱"╱ // 0x4320 @0xb
0x4315…4322 at000c = EOL // 0x4321 @0xc
0x4315…4322 }
0x4322…4335 d08c 6680 CURSOR 8,6
0x4322…4335 LineComalBin {
0x4322…4335 ptr = 0xd08c // 0x4322 @0x0
0x4322…4335 lno = 0x1a18 // 0x4324 @0x2
0x4322…4335 at0004 = ╱a1╱ CURSOR ╱ // 0x4326 @0x4
0x4322…4335 at0005 = ╱38╱8╱ // 0x4327 @0x5
0x4322…4335 at0006 = ╱fe00008004╱ // 0x4328 @0x6
0x4322…4335 at000b = ╱ec╱,╱ // 0x432d @0xb
0x4322…4335 at000c = ╱36╱6╱ // 0x432e @0xc
0x4322…4335 at000d = ╱fe0000c003╱ // 0x432f @0xd
0x4322…4335 at0012 = EOL // 0x4334 @0x12
0x4322…4335 }
0x4335…4347 d09e 6690 INPUT " ",DEBGADE$
0x4335…4347 LineComalBin {
0x4335…4347 ptr = 0xd09e // 0x4335 @0x0
0x4335…4347 lno = 0x1a22 // 0x4337 @0x2
0x4335…4347 at0004 = ╱91╱ INPUT ╱ // 0x4339 @0x4
0x4335…4347 at0005 = ╱22╱"╱ // 0x433a @0x5
0x4335…4347 at0006 = ╱20╱…╱ // 0x433b @0x6
0x4335…4347 at0007 = ╱22╱"╱ // 0x433c @0x7
0x4335…4347 at0008 = ╱ec╱,╱ // 0x433d @0x8
0x4335…4347 at0009 = ╱44╱D╱ // 0x433e @0x9
0x4335…4347 at000a = ╱45╱E╱ // 0x433f @0xa
0x4335…4347 at000b = ╱42╱B╱ // 0x4340 @0xb
0x4335…4347 at000c = ╱47╱G╱ // 0x4341 @0xc
0x4335…4347 at000d = ╱41╱A╱ // 0x4342 @0xd
0x4335…4347 at000e = ╱44╱D╱ // 0x4343 @0xe
0x4335…4347 at000f = ╱45╱E╱ // 0x4344 @0xf
0x4335…4347 at0010 = ╱ef╱$╱ // 0x4345 @0x10
0x4335…4347 at0011 = EOL // 0x4346 @0x11
0x4335…4347 }
0x4347…435a d0b1 6700 CURSOR 9,6
0x4347…435a LineComalBin {
0x4347…435a ptr = 0xd0b1 // 0x4347 @0x0
0x4347…435a lno = 0x1a2c // 0x4349 @0x2
0x4347…435a at0004 = ╱a1╱ CURSOR ╱ // 0x434b @0x4
0x4347…435a at0005 = ╱39╱9╱ // 0x434c @0x5
0x4347…435a at0006 = ╱fe00009004╱ // 0x434d @0x6
0x4347…435a at000b = ╱ec╱,╱ // 0x4352 @0xb
0x4347…435a at000c = ╱36╱6╱ // 0x4353 @0xc
0x4347…435a at000d = ╱fe0000c003╱ // 0x4354 @0xd
0x4347…435a at0012 = EOL // 0x4359 @0x12
0x4347…435a }
0x435a…437f d0d6 6710 PRINT DEBGADE$;BLANK$(1:25)
0x435a…437f LineComalBin {
0x435a…437f ptr = 0xd0d6 // 0x435a @0x0
0x435a…437f lno = 0x1a36 // 0x435c @0x2
0x435a…437f at0004 = ╱92╱ PRINT ╱ // 0x435e @0x4
0x435a…437f at0005 = ╱44╱D╱ // 0x435f @0x5
0x435a…437f at0006 = ╱45╱E╱ // 0x4360 @0x6
0x435a…437f at0007 = ╱42╱B╱ // 0x4361 @0x7
0x435a…437f at0008 = ╱47╱G╱ // 0x4362 @0x8
0x435a…437f at0009 = ╱41╱A╱ // 0x4363 @0x9
0x435a…437f at000a = ╱44╱D╱ // 0x4364 @0xa
0x435a…437f at000b = ╱45╱E╱ // 0x4365 @0xb
0x435a…437f at000c = ╱ef╱$╱ // 0x4366 @0xc
0x435a…437f at000d = ╱eb╱;╱ // 0x4367 @0xd
0x435a…437f at000e = ╱42╱B╱ // 0x4368 @0xe
0x435a…437f at000f = ╱4c╱L╱ // 0x4369 @0xf
0x435a…437f at0010 = ╱41╱A╱ // 0x436a @0x10
0x435a…437f at0011 = ╱4e╱N╱ // 0x436b @0x11
0x435a…437f at0012 = ╱4b╱K╱ // 0x436c @0x12
0x435a…437f at0013 = ╱ef╱$╱ // 0x436d @0x13
0x435a…437f at0014 = ╱ed╱(╱ // 0x436e @0x14
0x435a…437f at0015 = ╱31╱1╱ // 0x436f @0x15
0x435a…437f at0016 = ╱fe00008001╱ // 0x4370 @0x16
0x435a…437f at001b = ╱f0╱:╱ // 0x4375 @0x1b
0x435a…437f at001c = ╱32╱2╱ // 0x4376 @0x1c
0x435a…437f at001d = ╱35╱5╱ // 0x4377 @0x1d
0x435a…437f at001e = ╱fe0000c805╱ // 0x4378 @0x1e
0x435a…437f at0023 = ╱ee╱)╱ // 0x437d @0x23
0x435a…437f at0024 = EOL // 0x437e @0x24
0x435a…437f }
0x437f…4393 d0ea 6720 CURSOR 13,7
0x437f…4393 LineComalBin {
0x437f…4393 ptr = 0xd0ea // 0x437f @0x0
0x437f…4393 lno = 0x1a40 // 0x4381 @0x2
0x437f…4393 at0004 = ╱a1╱ CURSOR ╱ // 0x4383 @0x4
0x437f…4393 at0005 = ╱31╱1╱ // 0x4384 @0x5
0x437f…4393 at0006 = ╱33╱3╱ // 0x4385 @0x6
0x437f…4393 at0007 = ╱fe0000d004╱ // 0x4386 @0x7
0x437f…4393 at000c = ╱ec╱,╱ // 0x438b @0xc
0x437f…4393 at000d = ╱37╱7╱ // 0x438c @0xd
0x437f…4393 at000e = ╱fe0000e003╱ // 0x438d @0xe
0x437f…4393 at0013 = EOL // 0x4392 @0x13
0x437f…4393 }
0x4393…43a6 d0fd 6730 PRINT "Postnummer."
0x4393…43a6 LineComalBin {
0x4393…43a6 ptr = 0xd0fd // 0x4393 @0x0
0x4393…43a6 lno = 0x1a4a // 0x4395 @0x2
0x4393…43a6 at0004 = ╱92╱ PRINT ╱ // 0x4397 @0x4
0x4393…43a6 at0005 = ╱22╱"╱ // 0x4398 @0x5
0x4393…43a6 at0006 = ╱50╱P╱ // 0x4399 @0x6
0x4393…43a6 at0007 = ╱6f╱o╱ // 0x439a @0x7
0x4393…43a6 at0008 = ╱73╱s╱ // 0x439b @0x8
0x4393…43a6 at0009 = ╱74╱t╱ // 0x439c @0x9
0x4393…43a6 at000a = ╱6e╱n╱ // 0x439d @0xa
0x4393…43a6 at000b = ╱75╱u╱ // 0x439e @0xb
0x4393…43a6 at000c = ╱6d╱m╱ // 0x439f @0xc
0x4393…43a6 at000d = ╱6d╱m╱ // 0x43a0 @0xd
0x4393…43a6 at000e = ╱65╱e╱ // 0x43a1 @0xe
0x4393…43a6 at000f = ╱72╱r╱ // 0x43a2 @0xf
0x4393…43a6 at0010 = ╱2e╱.╱ // 0x43a3 @0x10
0x4393…43a6 at0011 = ╱22╱"╱ // 0x43a4 @0x11
0x4393…43a6 at0012 = EOL // 0x43a5 @0x12
0x4393…43a6 }
0x43a6…43ac d103 6740 REPEAT
0x43a6…43ac LineComalBin {
0x43a6…43ac ptr = 0xd103 // 0x43a6 @0x0
0x43a6…43ac lno = 0x1a54 // 0x43a8 @0x2
0x43a6…43ac at0004 = ╱97╱ REPEAT ╱ // 0x43aa @0x4
0x43a6…43ac at0005 = EOL // 0x43ab @0x5
0x43a6…43ac }
0x43ac…43bf d116 6750 CURSOR 8,7
0x43ac…43bf LineComalBin {
0x43ac…43bf ptr = 0xd116 // 0x43ac @0x0
0x43ac…43bf lno = 0x1a5e // 0x43ae @0x2
0x43ac…43bf at0004 = ╱a1╱ CURSOR ╱ // 0x43b0 @0x4
0x43ac…43bf at0005 = ╱38╱8╱ // 0x43b1 @0x5
0x43ac…43bf at0006 = ╱fe00008004╱ // 0x43b2 @0x6
0x43ac…43bf at000b = ╱ec╱,╱ // 0x43b7 @0xb
0x43ac…43bf at000c = ╱37╱7╱ // 0x43b8 @0xc
0x43ac…43bf at000d = ╱fe0000e003╱ // 0x43b9 @0xd
0x43ac…43bf at0012 = EOL // 0x43be @0x12
0x43ac…43bf }
0x43bf…43ce d125 6760 INPUT " ",TAL1$
0x43bf…43ce LineComalBin {
0x43bf…43ce ptr = 0xd125 // 0x43bf @0x0
0x43bf…43ce lno = 0x1a68 // 0x43c1 @0x2
0x43bf…43ce at0004 = ╱91╱ INPUT ╱ // 0x43c3 @0x4
0x43bf…43ce at0005 = ╱22╱"╱ // 0x43c4 @0x5
0x43bf…43ce at0006 = ╱20╱…╱ // 0x43c5 @0x6
0x43bf…43ce at0007 = ╱22╱"╱ // 0x43c6 @0x7
0x43bf…43ce at0008 = ╱ec╱,╱ // 0x43c7 @0x8
0x43bf…43ce at0009 = ╱54╱T╱ // 0x43c8 @0x9
0x43bf…43ce at000a = ╱41╱A╱ // 0x43c9 @0xa
0x43bf…43ce at000b = ╱4c╱L╱ // 0x43ca @0xb
0x43bf…43ce at000c = ╱31╱1╱ // 0x43cb @0xc
0x43bf…43ce at000d = ╱ef╱$╱ // 0x43cc @0xd
0x43bf…43ce at000e = EOL // 0x43cd @0xe
0x43bf…43ce }
0x43ce…43e1 d138 6770 EXEC NRTEST(TAL1$)
0x43ce…43e1 LineComalBin {
0x43ce…43e1 ptr = 0xd138 // 0x43ce @0x0
0x43ce…43e1 lno = 0x1a72 // 0x43d0 @0x2
0x43ce…43e1 at0004 = ╱9d╱ EXEC ╱ // 0x43d2 @0x4
0x43ce…43e1 at0005 = ╱4e╱N╱ // 0x43d3 @0x5
0x43ce…43e1 at0006 = ╱52╱R╱ // 0x43d4 @0x6
0x43ce…43e1 at0007 = ╱54╱T╱ // 0x43d5 @0x7
0x43ce…43e1 at0008 = ╱45╱E╱ // 0x43d6 @0x8
0x43ce…43e1 at0009 = ╱53╱S╱ // 0x43d7 @0x9
0x43ce…43e1 at000a = ╱54╱T╱ // 0x43d8 @0xa
0x43ce…43e1 at000b = ╱ed╱(╱ // 0x43d9 @0xb
0x43ce…43e1 at000c = ╱54╱T╱ // 0x43da @0xc
0x43ce…43e1 at000d = ╱41╱A╱ // 0x43db @0xd
0x43ce…43e1 at000e = ╱4c╱L╱ // 0x43dc @0xe
0x43ce…43e1 at000f = ╱31╱1╱ // 0x43dd @0xf
0x43ce…43e1 at0010 = ╱ef╱$╱ // 0x43de @0x10
0x43ce…43e1 at0011 = ╱ee╱)╱ // 0x43df @0x11
0x43ce…43e1 at0012 = EOL // 0x43e0 @0x12
0x43ce…43e1 }
0x43e1…43fe d155 6780 UNTIL TEST2=0 AND P>999
0x43e1…43fe LineComalBin {
0x43e1…43fe ptr = 0xd155 // 0x43e1 @0x0
0x43e1…43fe lno = 0x1a7c // 0x43e3 @0x2
0x43e1…43fe at0004 = ╱98╱ UNTIL ╱ // 0x43e5 @0x4
0x43e1…43fe at0005 = ╱54╱T╱ // 0x43e6 @0x5
0x43e1…43fe at0006 = ╱45╱E╱ // 0x43e7 @0x6
0x43e1…43fe at0007 = ╱53╱S╱ // 0x43e8 @0x7
0x43e1…43fe at0008 = ╱54╱T╱ // 0x43e9 @0x8
0x43e1…43fe at0009 = ╱32╱2╱ // 0x43ea @0x9
0x43e1…43fe at000a = ╱dc╱=╱ // 0x43eb @0xa
0x43e1…43fe at000b = ╱30╱0╱ // 0x43ec @0xb
0x43e1…43fe at000c = ╱fe00000000╱ // 0x43ed @0xc
0x43e1…43fe at0011 = ╱da╱ AND ╱ // 0x43f2 @0x11
0x43e1…43fe at0012 = ╱50╱P╱ // 0x43f3 @0x12
0x43e1…43fe at0013 = ╱de╱>╱ // 0x43f4 @0x13
0x43e1…43fe at0014 = ╱39╱9╱ // 0x43f5 @0x14
0x43e1…43fe at0015 = ╱39╱9╱ // 0x43f6 @0x15
0x43e1…43fe at0016 = ╱39╱9╱ // 0x43f7 @0x16
0x43e1…43fe at0017 = ╱fe00c0f90a╱ // 0x43f8 @0x17
0x43e1…43fe at001c = EOL // 0x43fd @0x1c
0x43e1…43fe }
0x43fe…440e d165 6790 DEBPOSTNR=P
0x43fe…440e LineComalBin {
0x43fe…440e ptr = 0xd165 // 0x43fe @0x0
0x43fe…440e lno = 0x1a86 // 0x4400 @0x2
0x43fe…440e at0004 = ╱44╱D╱ // 0x4402 @0x4
0x43fe…440e at0005 = ╱45╱E╱ // 0x4403 @0x5
0x43fe…440e at0006 = ╱42╱B╱ // 0x4404 @0x6
0x43fe…440e at0007 = ╱50╱P╱ // 0x4405 @0x7
0x43fe…440e at0008 = ╱4f╱O╱ // 0x4406 @0x8
0x43fe…440e at0009 = ╱53╱S╱ // 0x4407 @0x9
0x43fe…440e at000a = ╱54╱T╱ // 0x4408 @0xa
0x43fe…440e at000b = ╱4e╱N╱ // 0x4409 @0xb
0x43fe…440e at000c = ╱52╱R╱ // 0x440a @0xc
0x43fe…440e at000d = ╱dc╱=╱ // 0x440b @0xd
0x43fe…440e at000e = ╱50╱P╱ // 0x440c @0xe
0x43fe…440e at000f = EOL // 0x440d @0xf
0x43fe…440e }
0x440e…4422 d179 6800 CURSOR 13,7
0x440e…4422 LineComalBin {
0x440e…4422 ptr = 0xd179 // 0x440e @0x0
0x440e…4422 lno = 0x1a90 // 0x4410 @0x2
0x440e…4422 at0004 = ╱a1╱ CURSOR ╱ // 0x4412 @0x4
0x440e…4422 at0005 = ╱31╱1╱ // 0x4413 @0x5
0x440e…4422 at0006 = ╱33╱3╱ // 0x4414 @0x6
0x440e…4422 at0007 = ╱fe0000d004╱ // 0x4415 @0x7
0x440e…4422 at000c = ╱ec╱,╱ // 0x441a @0xc
0x440e…4422 at000d = ╱37╱7╱ // 0x441b @0xd
0x440e…4422 at000e = ╱fe0000e003╱ // 0x441c @0xe
0x440e…4422 at0013 = EOL // 0x4421 @0x13
0x440e…4422 }
0x4422…444f d1a6 6810 PRINT BLANK$(1:25);TAB(22);"By."
0x4422…444f LineComalBin {
0x4422…444f ptr = 0xd1a6 // 0x4422 @0x0
0x4422…444f lno = 0x1a9a // 0x4424 @0x2
0x4422…444f at0004 = ╱92╱ PRINT ╱ // 0x4426 @0x4
0x4422…444f at0005 = ╱42╱B╱ // 0x4427 @0x5
0x4422…444f at0006 = ╱4c╱L╱ // 0x4428 @0x6
0x4422…444f at0007 = ╱41╱A╱ // 0x4429 @0x7
0x4422…444f at0008 = ╱4e╱N╱ // 0x442a @0x8
0x4422…444f at0009 = ╱4b╱K╱ // 0x442b @0x9
0x4422…444f at000a = ╱ef╱$╱ // 0x442c @0xa
0x4422…444f at000b = ╱ed╱(╱ // 0x442d @0xb
0x4422…444f at000c = ╱31╱1╱ // 0x442e @0xc
0x4422…444f at000d = ╱fe00008001╱ // 0x442f @0xd
0x4422…444f at0012 = ╱f0╱:╱ // 0x4434 @0x12
0x4422…444f at0013 = ╱32╱2╱ // 0x4435 @0x13
0x4422…444f at0014 = ╱35╱5╱ // 0x4436 @0x14
0x4422…444f at0015 = ╱fe0000c805╱ // 0x4437 @0x15
0x4422…444f at001a = ╱ee╱)╱ // 0x443c @0x1a
0x4422…444f at001b = ╱eb╱;╱ // 0x443d @0x1b
0x4422…444f at001c = ╱d2╱TAB╱ // 0x443e @0x1c
0x4422…444f at001d = ╱ed╱(╱ // 0x443f @0x1d
0x4422…444f at001e = ╱32╱2╱ // 0x4440 @0x1e
0x4422…444f at001f = ╱32╱2╱ // 0x4441 @0x1f
0x4422…444f at0020 = ╱fe0000b005╱ // 0x4442 @0x20
0x4422…444f at0025 = ╱ee╱)╱ // 0x4447 @0x25
0x4422…444f at0026 = ╱eb╱;╱ // 0x4448 @0x26
0x4422…444f at0027 = ╱22╱"╱ // 0x4449 @0x27
0x4422…444f at0028 = ╱42╱B╱ // 0x444a @0x28
0x4422…444f at0029 = ╱79╱y╱ // 0x444b @0x29
0x4422…444f at002a = ╱2e╱.╱ // 0x444c @0x2a
0x4422…444f at002b = ╱22╱"╱ // 0x444d @0x2b
0x4422…444f at002c = EOL // 0x444e @0x2c
0x4422…444f }
0x444f…4463 d1ba 6820 CURSOR 13,7
0x444f…4463 LineComalBin {
0x444f…4463 ptr = 0xd1ba // 0x444f @0x0
0x444f…4463 lno = 0x1aa4 // 0x4451 @0x2
0x444f…4463 at0004 = ╱a1╱ CURSOR ╱ // 0x4453 @0x4
0x444f…4463 at0005 = ╱31╱1╱ // 0x4454 @0x5
0x444f…4463 at0006 = ╱33╱3╱ // 0x4455 @0x6
0x444f…4463 at0007 = ╱fe0000d004╱ // 0x4456 @0x7
0x444f…4463 at000c = ╱ec╱,╱ // 0x445b @0xc
0x444f…4463 at000d = ╱37╱7╱ // 0x445c @0xd
0x444f…4463 at000e = ╱fe0000e003╱ // 0x445d @0xe
0x444f…4463 at0013 = EOL // 0x4462 @0x13
0x444f…4463 }
0x4463…4473 d1ca 6830 INPUT " ",DEBBY$
0x4463…4473 LineComalBin {
0x4463…4473 ptr = 0xd1ca // 0x4463 @0x0
0x4463…4473 lno = 0x1aae // 0x4465 @0x2
0x4463…4473 at0004 = ╱91╱ INPUT ╱ // 0x4467 @0x4
0x4463…4473 at0005 = ╱22╱"╱ // 0x4468 @0x5
0x4463…4473 at0006 = ╱20╱…╱ // 0x4469 @0x6
0x4463…4473 at0007 = ╱22╱"╱ // 0x446a @0x7
0x4463…4473 at0008 = ╱ec╱,╱ // 0x446b @0x8
0x4463…4473 at0009 = ╱44╱D╱ // 0x446c @0x9
0x4463…4473 at000a = ╱45╱E╱ // 0x446d @0xa
0x4463…4473 at000b = ╱42╱B╱ // 0x446e @0xb
0x4463…4473 at000c = ╱42╱B╱ // 0x446f @0xc
0x4463…4473 at000d = ╱59╱Y╱ // 0x4470 @0xd
0x4463…4473 at000e = ╱ef╱$╱ // 0x4471 @0xe
0x4463…4473 at000f = EOL // 0x4472 @0xf
0x4463…4473 }
0x4473…4487 d1de 6840 CURSOR 34,7
0x4473…4487 LineComalBin {
0x4473…4487 ptr = 0xd1de // 0x4473 @0x0
0x4473…4487 lno = 0x1ab8 // 0x4475 @0x2
0x4473…4487 at0004 = ╱a1╱ CURSOR ╱ // 0x4477 @0x4
0x4473…4487 at0005 = ╱33╱3╱ // 0x4478 @0x5
0x4473…4487 at0006 = ╱34╱4╱ // 0x4479 @0x6
0x4473…4487 at0007 = ╱fe00008806╱ // 0x447a @0x7
0x4473…4487 at000c = ╱ec╱,╱ // 0x447f @0xc
0x4473…4487 at000d = ╱37╱7╱ // 0x4480 @0xd
0x4473…4487 at000e = ╱fe0000e003╱ // 0x4481 @0xe
0x4473…4487 at0013 = EOL // 0x4486 @0x13
0x4473…4487 }
0x4487…44a3 d1fa 6850 PRINT BLANK$(1:25)
0x4487…44a3 LineComalBin {
0x4487…44a3 ptr = 0xd1fa // 0x4487 @0x0
0x4487…44a3 lno = 0x1ac2 // 0x4489 @0x2
0x4487…44a3 at0004 = ╱92╱ PRINT ╱ // 0x448b @0x4
0x4487…44a3 at0005 = ╱42╱B╱ // 0x448c @0x5
0x4487…44a3 at0006 = ╱4c╱L╱ // 0x448d @0x6
0x4487…44a3 at0007 = ╱41╱A╱ // 0x448e @0x7
0x4487…44a3 at0008 = ╱4e╱N╱ // 0x448f @0x8
0x4487…44a3 at0009 = ╱4b╱K╱ // 0x4490 @0x9
0x4487…44a3 at000a = ╱ef╱$╱ // 0x4491 @0xa
0x4487…44a3 at000b = ╱ed╱(╱ // 0x4492 @0xb
0x4487…44a3 at000c = ╱31╱1╱ // 0x4493 @0xc
0x4487…44a3 at000d = ╱fe00008001╱ // 0x4494 @0xd
0x4487…44a3 at0012 = ╱f0╱:╱ // 0x4499 @0x12
0x4487…44a3 at0013 = ╱32╱2╱ // 0x449a @0x13
0x4487…44a3 at0014 = ╱35╱5╱ // 0x449b @0x14
0x4487…44a3 at0015 = ╱fe0000c805╱ // 0x449c @0x15
0x4487…44a3 at001a = ╱ee╱)╱ // 0x44a1 @0x1a
0x4487…44a3 at001b = EOL // 0x44a2 @0x1b
0x4487…44a3 }
0x44a3…44a9 d200 6860 ENDIF
0x44a3…44a9 LineComalBin {
0x44a3…44a9 ptr = 0xd200 // 0x44a3 @0x0
0x44a3…44a9 lno = 0x1acc // 0x44a5 @0x2
0x44a3…44a9 at0004 = ╱9b╱ ENDIF ╱ // 0x44a7 @0x4
0x44a3…44a9 at0005 = EOL // 0x44a8 @0x5
0x44a3…44a9 }
0x44a9…44ba d211 6870 UNTIL CEKS=0
0x44a9…44ba LineComalBin {
0x44a9…44ba ptr = 0xd211 // 0x44a9 @0x0
0x44a9…44ba lno = 0x1ad6 // 0x44ab @0x2
0x44a9…44ba at0004 = ╱98╱ UNTIL ╱ // 0x44ad @0x4
0x44a9…44ba at0005 = ╱43╱C╱ // 0x44ae @0x5
0x44a9…44ba at0006 = ╱45╱E╱ // 0x44af @0x6
0x44a9…44ba at0007 = ╱4b╱K╱ // 0x44b0 @0x7
0x44a9…44ba at0008 = ╱53╱S╱ // 0x44b1 @0x8
0x44a9…44ba at0009 = ╱dc╱=╱ // 0x44b2 @0x9
0x44a9…44ba at000a = ╱30╱0╱ // 0x44b3 @0xa
0x44a9…44ba at000b = ╱fe00000000╱ // 0x44b4 @0xb
0x44a9…44ba at0010 = EOL // 0x44b9 @0x10
0x44a9…44ba }
0x44ba…44d0 d227 6880 IF KUNDENR=0 THEN EXIT
0x44ba…44d0 LineComalBin {
0x44ba…44d0 ptr = 0xd227 // 0x44ba @0x0
0x44ba…44d0 lno = 0x1ae0 // 0x44bc @0x2
0x44ba…44d0 at0004 = ╱82╱ IF ╱ // 0x44be @0x4
0x44ba…44d0 at0005 = ╱4b╱K╱ // 0x44bf @0x5
0x44ba…44d0 at0006 = ╱55╱U╱ // 0x44c0 @0x6
0x44ba…44d0 at0007 = ╱4e╱N╱ // 0x44c1 @0x7
0x44ba…44d0 at0008 = ╱44╱D╱ // 0x44c2 @0x8
0x44ba…44d0 at0009 = ╱45╱E╱ // 0x44c3 @0x9
0x44ba…44d0 at000a = ╱4e╱N╱ // 0x44c4 @0xa
0x44ba…44d0 at000b = ╱52╱R╱ // 0x44c5 @0xb
0x44ba…44d0 at000c = ╱dc╱=╱ // 0x44c6 @0xc
0x44ba…44d0 at000d = ╱30╱0╱ // 0x44c7 @0xd
0x44ba…44d0 at000e = ╱fe00000000╱ // 0x44c8 @0xe
0x44ba…44d0 at0013 = ╱b6╱ THEN ╱ // 0x44cd @0x13
0x44ba…44d0 at0014 = ╱99╱ EXIT ╱ // 0x44ce @0x14
0x44ba…44d0 at0015 = EOL // 0x44cf @0x15
0x44ba…44d0 }
0x44d0…44e5 d23c 6890 EXEC KUNDEUD(1)
0x44d0…44e5 LineComalBin {
0x44d0…44e5 ptr = 0xd23c // 0x44d0 @0x0
0x44d0…44e5 lno = 0x1aea // 0x44d2 @0x2
0x44d0…44e5 at0004 = ╱9d╱ EXEC ╱ // 0x44d4 @0x4
0x44d0…44e5 at0005 = ╱4b╱K╱ // 0x44d5 @0x5
0x44d0…44e5 at0006 = ╱55╱U╱ // 0x44d6 @0x6
0x44d0…44e5 at0007 = ╱4e╱N╱ // 0x44d7 @0x7
0x44d0…44e5 at0008 = ╱44╱D╱ // 0x44d8 @0x8
0x44d0…44e5 at0009 = ╱45╱E╱ // 0x44d9 @0x9
0x44d0…44e5 at000a = ╱55╱U╱ // 0x44da @0xa
0x44d0…44e5 at000b = ╱44╱D╱ // 0x44db @0xb
0x44d0…44e5 at000c = ╱ed╱(╱ // 0x44dc @0xc
0x44d0…44e5 at000d = ╱31╱1╱ // 0x44dd @0xd
0x44d0…44e5 at000e = ╱fe00008001╱ // 0x44de @0xe
0x44d0…44e5 at0013 = ╱ee╱)╱ // 0x44e3 @0x13
0x44d0…44e5 at0014 = EOL // 0x44e4 @0x14
0x44d0…44e5 }
0x44e5…4518 d26f 6900 EXEC INDPUT1(9,21,-9,-6,LTX4$)
0x44e5…4518 LineComalBin {
0x44e5…4518 ptr = 0xd26f // 0x44e5 @0x0
0x44e5…4518 lno = 0x1af4 // 0x44e7 @0x2
0x44e5…4518 at0004 = ╱9d╱ EXEC ╱ // 0x44e9 @0x4
0x44e5…4518 at0005 = ╱49╱I╱ // 0x44ea @0x5
0x44e5…4518 at0006 = ╱4e╱N╱ // 0x44eb @0x6
0x44e5…4518 at0007 = ╱44╱D╱ // 0x44ec @0x7
0x44e5…4518 at0008 = ╱50╱P╱ // 0x44ed @0x8
0x44e5…4518 at0009 = ╱55╱U╱ // 0x44ee @0x9
0x44e5…4518 at000a = ╱54╱T╱ // 0x44ef @0xa
0x44e5…4518 at000b = ╱31╱1╱ // 0x44f0 @0xb
0x44e5…4518 at000c = ╱ed╱(╱ // 0x44f1 @0xc
0x44e5…4518 at000d = ╱39╱9╱ // 0x44f2 @0xd
0x44e5…4518 at000e = ╱fe00009004╱ // 0x44f3 @0xe
0x44e5…4518 at0013 = ╱ec╱,╱ // 0x44f8 @0x13
0x44e5…4518 at0014 = ╱32╱2╱ // 0x44f9 @0x14
0x44e5…4518 at0015 = ╱31╱1╱ // 0x44fa @0x15
0x44e5…4518 at0016 = ╱fe0000a805╱ // 0x44fb @0x16
0x44e5…4518 at001b = ╱ec╱,╱ // 0x4500 @0x1b
0x44e5…4518 at001c = ╱e9╱-╱ // 0x4501 @0x1c
0x44e5…4518 at001d = ╱39╱9╱ // 0x4502 @0x1d
0x44e5…4518 at001e = ╱fe00009004╱ // 0x4503 @0x1e
0x44e5…4518 at0023 = ╱ec╱,╱ // 0x4508 @0x23
0x44e5…4518 at0024 = ╱e9╱-╱ // 0x4509 @0x24
0x44e5…4518 at0025 = ╱36╱6╱ // 0x450a @0x25
0x44e5…4518 at0026 = ╱fe0000c003╱ // 0x450b @0x26
0x44e5…4518 at002b = ╱ec╱,╱ // 0x4510 @0x2b
0x44e5…4518 at002c = ╱4c╱L╱ // 0x4511 @0x2c
0x44e5…4518 at002d = ╱54╱T╱ // 0x4512 @0x2d
0x44e5…4518 at002e = ╱58╱X╱ // 0x4513 @0x2e
0x44e5…4518 at002f = ╱34╱4╱ // 0x4514 @0x2f
0x44e5…4518 at0030 = ╱ef╱$╱ // 0x4515 @0x30
0x44e5…4518 at0031 = ╱ee╱)╱ // 0x4516 @0x31
0x44e5…4518 at0032 = EOL // 0x4517 @0x32
0x44e5…4518 }
0x4518…4527 d27e 6910 UNTIL P=-7
0x4518…4527 LineComalBin {
0x4518…4527 ptr = 0xd27e // 0x4518 @0x0
0x4518…4527 lno = 0x1afe // 0x451a @0x2
0x4518…4527 at0004 = ╱98╱ UNTIL ╱ // 0x451c @0x4
0x4518…4527 at0005 = ╱50╱P╱ // 0x451d @0x5
0x4518…4527 at0006 = ╱dc╱=╱ // 0x451e @0x6
0x4518…4527 at0007 = ╱e9╱-╱ // 0x451f @0x7
0x4518…4527 at0008 = ╱37╱7╱ // 0x4520 @0x8
0x4518…4527 at0009 = ╱fe0000e003╱ // 0x4521 @0x9
0x4518…4527 at000e = EOL // 0x4526 @0xe
0x4518…4527 }
0x4527…453d d294 6920 IF KUNDENR=0 THEN EXIT
0x4527…453d LineComalBin {
0x4527…453d ptr = 0xd294 // 0x4527 @0x0
0x4527…453d lno = 0x1b08 // 0x4529 @0x2
0x4527…453d at0004 = ╱82╱ IF ╱ // 0x452b @0x4
0x4527…453d at0005 = ╱4b╱K╱ // 0x452c @0x5
0x4527…453d at0006 = ╱55╱U╱ // 0x452d @0x6
0x4527…453d at0007 = ╱4e╱N╱ // 0x452e @0x7
0x4527…453d at0008 = ╱44╱D╱ // 0x452f @0x8
0x4527…453d at0009 = ╱45╱E╱ // 0x4530 @0x9
0x4527…453d at000a = ╱4e╱N╱ // 0x4531 @0xa
0x4527…453d at000b = ╱52╱R╱ // 0x4532 @0xb
0x4527…453d at000c = ╱dc╱=╱ // 0x4533 @0xc
0x4527…453d at000d = ╱30╱0╱ // 0x4534 @0xd
0x4527…453d at000e = ╱fe00000000╱ // 0x4535 @0xe
0x4527…453d at0013 = ╱b6╱ THEN ╱ // 0x453a @0x13
0x4527…453d at0014 = ╱99╱ EXIT ╱ // 0x453b @0x14
0x4527…453d at0015 = EOL // 0x453c @0x15
0x4527…453d }
0x453d…458a d2e1 6930 IF APOSTER>(MFKL+5)*MFAK+2*MFKL-15 OR FJPOST+AFAKT+AKRED=>MFAK THEN
0x453d…458a LineComalBin {
0x453d…458a ptr = 0xd2e1 // 0x453d @0x0
0x453d…458a lno = 0x1b12 // 0x453f @0x2
0x453d…458a at0004 = ╱9c╱ IF ╱ // 0x4541 @0x4
0x453d…458a at0005 = ╱41╱A╱ // 0x4542 @0x5
0x453d…458a at0006 = ╱50╱P╱ // 0x4543 @0x6
0x453d…458a at0007 = ╱4f╱O╱ // 0x4544 @0x7
0x453d…458a at0008 = ╱53╱S╱ // 0x4545 @0x8
0x453d…458a at0009 = ╱54╱T╱ // 0x4546 @0x9
0x453d…458a at000a = ╱45╱E╱ // 0x4547 @0xa
0x453d…458a at000b = ╱52╱R╱ // 0x4548 @0xb
0x453d…458a at000c = ╱de╱>╱ // 0x4549 @0xc
0x453d…458a at000d = ╱ed╱(╱ // 0x454a @0xd
0x453d…458a at000e = ╱4d╱M╱ // 0x454b @0xe
0x453d…458a at000f = ╱46╱F╱ // 0x454c @0xf
0x453d…458a at0010 = ╱4b╱K╱ // 0x454d @0x10
0x453d…458a at0011 = ╱4c╱L╱ // 0x454e @0x11
0x453d…458a at0012 = ╱e2╱+╱ // 0x454f @0x12
0x453d…458a at0013 = ╱35╱5╱ // 0x4550 @0x13
0x453d…458a at0014 = ╱fe0000a003╱ // 0x4551 @0x14
0x453d…458a at0019 = ╱ee╱)╱ // 0x4556 @0x19
0x453d…458a at001a = ╱e4╱*╱ // 0x4557 @0x1a
0x453d…458a at001b = ╱4d╱M╱ // 0x4558 @0x1b
0x453d…458a at001c = ╱46╱F╱ // 0x4559 @0x1c
0x453d…458a at001d = ╱41╱A╱ // 0x455a @0x1d
0x453d…458a at001e = ╱4b╱K╱ // 0x455b @0x1e
0x453d…458a at001f = ╱e2╱+╱ // 0x455c @0x1f
0x453d…458a at0020 = ╱32╱2╱ // 0x455d @0x20
0x453d…458a at0021 = ╱fe00008002╱ // 0x455e @0x21
0x453d…458a at0026 = ╱e4╱*╱ // 0x4563 @0x26
0x453d…458a at0027 = ╱4d╱M╱ // 0x4564 @0x27
0x453d…458a at0028 = ╱46╱F╱ // 0x4565 @0x28
0x453d…458a at0029 = ╱4b╱K╱ // 0x4566 @0x29
0x453d…458a at002a = ╱4c╱L╱ // 0x4567 @0x2a
0x453d…458a at002b = ╱e3╱-╱ // 0x4568 @0x2b
0x453d…458a at002c = ╱31╱1╱ // 0x4569 @0x2c
0x453d…458a at002d = ╱35╱5╱ // 0x456a @0x2d
0x453d…458a at002e = ╱fe0000f004╱ // 0x456b @0x2e
0x453d…458a at0033 = ╱db╱ OR ╱ // 0x4570 @0x33
0x453d…458a at0034 = ╱46╱F╱ // 0x4571 @0x34
0x453d…458a at0035 = ╱4a╱J╱ // 0x4572 @0x35
0x453d…458a at0036 = ╱50╱P╱ // 0x4573 @0x36
0x453d…458a at0037 = ╱4f╱O╱ // 0x4574 @0x37
0x453d…458a at0038 = ╱53╱S╱ // 0x4575 @0x38
0x453d…458a at0039 = ╱54╱T╱ // 0x4576 @0x39
0x453d…458a at003a = ╱e2╱+╱ // 0x4577 @0x3a
0x453d…458a at003b = ╱41╱A╱ // 0x4578 @0x3b
0x453d…458a at003c = ╱46╱F╱ // 0x4579 @0x3c
0x453d…458a at003d = ╱41╱A╱ // 0x457a @0x3d
0x453d…458a at003e = ╱4b╱K╱ // 0x457b @0x3e
0x453d…458a at003f = ╱54╱T╱ // 0x457c @0x3f
0x453d…458a at0040 = ╱e2╱+╱ // 0x457d @0x40
0x453d…458a at0041 = ╱41╱A╱ // 0x457e @0x41
0x453d…458a at0042 = ╱4b╱K╱ // 0x457f @0x42
0x453d…458a at0043 = ╱52╱R╱ // 0x4580 @0x43
0x453d…458a at0044 = ╱45╱E╱ // 0x4581 @0x44
0x453d…458a at0045 = ╱44╱D╱ // 0x4582 @0x45
0x453d…458a at0046 = ╱e0╱=>╱ // 0x4583 @0x46
0x453d…458a at0047 = ╱4d╱M╱ // 0x4584 @0x47
0x453d…458a at0048 = ╱46╱F╱ // 0x4585 @0x48
0x453d…458a at0049 = ╱41╱A╱ // 0x4586 @0x49
0x453d…458a at004a = ╱4b╱K╱ // 0x4587 @0x4a
0x453d…458a at004b = ╱b6╱ THEN ╱ // 0x4588 @0x4b
0x453d…458a at004c = EOL // 0x4589 @0x4c
0x453d…458a }
0x458a…45bc d313 6940 EXEC INDPUT1(9,23,-2,0,LTX7$)
0x458a…45bc LineComalBin {
0x458a…45bc ptr = 0xd313 // 0x458a @0x0
0x458a…45bc lno = 0x1b1c // 0x458c @0x2
0x458a…45bc at0004 = ╱9d╱ EXEC ╱ // 0x458e @0x4
0x458a…45bc at0005 = ╱49╱I╱ // 0x458f @0x5
0x458a…45bc at0006 = ╱4e╱N╱ // 0x4590 @0x6
0x458a…45bc at0007 = ╱44╱D╱ // 0x4591 @0x7
0x458a…45bc at0008 = ╱50╱P╱ // 0x4592 @0x8
0x458a…45bc at0009 = ╱55╱U╱ // 0x4593 @0x9
0x458a…45bc at000a = ╱54╱T╱ // 0x4594 @0xa
0x458a…45bc at000b = ╱31╱1╱ // 0x4595 @0xb
0x458a…45bc at000c = ╱ed╱(╱ // 0x4596 @0xc
0x458a…45bc at000d = ╱39╱9╱ // 0x4597 @0xd
0x458a…45bc at000e = ╱fe00009004╱ // 0x4598 @0xe
0x458a…45bc at0013 = ╱ec╱,╱ // 0x459d @0x13
0x458a…45bc at0014 = ╱32╱2╱ // 0x459e @0x14
0x458a…45bc at0015 = ╱33╱3╱ // 0x459f @0x15
0x458a…45bc at0016 = ╱fe0000b805╱ // 0x45a0 @0x16
0x458a…45bc at001b = ╱ec╱,╱ // 0x45a5 @0x1b
0x458a…45bc at001c = ╱e9╱-╱ // 0x45a6 @0x1c
0x458a…45bc at001d = ╱32╱2╱ // 0x45a7 @0x1d
0x458a…45bc at001e = ╱fe00008002╱ // 0x45a8 @0x1e
0x458a…45bc at0023 = ╱ec╱,╱ // 0x45ad @0x23
0x458a…45bc at0024 = ╱30╱0╱ // 0x45ae @0x24
0x458a…45bc at0025 = ╱fe00000000╱ // 0x45af @0x25
0x458a…45bc at002a = ╱ec╱,╱ // 0x45b4 @0x2a
0x458a…45bc at002b = ╱4c╱L╱ // 0x45b5 @0x2b
0x458a…45bc at002c = ╱54╱T╱ // 0x45b6 @0x2c
0x458a…45bc at002d = ╱58╱X╱ // 0x45b7 @0x2d
0x458a…45bc at002e = ╱37╱7╱ // 0x45b8 @0x2e
0x458a…45bc at002f = ╱ef╱$╱ // 0x45b9 @0x2f
0x458a…45bc at0030 = ╱ee╱)╱ // 0x45ba @0x30
0x458a…45bc at0031 = EOL // 0x45bb @0x31
0x458a…45bc }
0x45bc…45c2 d319 6950 ELSE
0x45bc…45c2 LineComalBin {
0x45bc…45c2 ptr = 0xd319 // 0x45bc @0x0
0x45bc…45c2 lno = 0x1b26 // 0x45be @0x2
0x45bc…45c2 at0004 = ╱9a╱ ELSE ╱ // 0x45c0 @0x4
0x45bc…45c2 at0005 = EOL // 0x45c1 @0x5
0x45bc…45c2 }
0x45c2…45c8 d31f 6960 REPEAT
0x45c2…45c8 LineComalBin {
0x45c2…45c8 ptr = 0xd31f // 0x45c2 @0x0
0x45c2…45c8 lno = 0x1b30 // 0x45c4 @0x2
0x45c2…45c8 at0004 = ╱97╱ REPEAT ╱ // 0x45c6 @0x4
0x45c2…45c8 at0005 = EOL // 0x45c7 @0x5
0x45c2…45c8 }
0x45c8…45dc (232,) d333 6970 CURSOR 9,23
0x45c8…45dc LineComalBin {
0x45c8…45dc ptr = 0xd333 // 0x45c8 @0x0
0x45c8…45dc lno = 0x1b3a // 0x45ca @0x2
0x45c8…45dc at0004 = ╱a1╱ CURSOR ╱ // 0x45cc @0x4
0x45c8…45dc at0005 = ╱39╱9╱ // 0x45cd @0x5
0x45c8…45dc at0006 = ╱fe00009004╱ // 0x45ce @0x6
0x45c8…45dc at000b = ╱ec╱,╱ // 0x45d3 @0xb
0x45c8…45dc at000c = ╱32╱2╱ // 0x45d4 @0xc
0x45c8…45dc at000d = ╱33╱3╱ // 0x45d5 @0xd
0x45c8…45dc at000e = ╱fe0000b805╱ // 0x45d6 @0xe
0x45c8…45dc at0013 = EOL // 0x45db @0x13
0x45c8…45dc }
0x45dc…4605 d35c 6980 INPUT "Faktura/kreditnota (F/K):",FAKKRE$
0x45dc…4605 LineComalBin {
0x45dc…4605 ptr = 0xd35c // 0x45dc @0x0
0x45dc…4605 lno = 0x1b44 // 0x45de @0x2
0x45dc…4605 at0004 = ╱91╱ INPUT ╱ // 0x45e0 @0x4
0x45dc…4605 at0005 = ╱22╱"╱ // 0x45e1 @0x5
0x45dc…4605 at0006 = ╱46╱F╱ // 0x45e2 @0x6
0x45dc…4605 at0007 = ╱61╱a╱ // 0x45e3 @0x7
0x45dc…4605 at0008 = ╱6b╱k╱ // 0x45e4 @0x8
0x45dc…4605 at0009 = ╱74╱t╱ // 0x45e5 @0x9
0x45dc…4605 at000a = ╱75╱u╱ // 0x45e6 @0xa
0x45dc…4605 at000b = ╱72╱r╱ // 0x45e7 @0xb
0x45dc…4605 at000c = ╱61╱a╱ // 0x45e8 @0xc
0x45dc…4605 at000d = ╱2f╱/╱ // 0x45e9 @0xd
0x45dc…4605 at000e = ╱6b╱k╱ // 0x45ea @0xe
0x45dc…4605 at000f = ╱72╱r╱ // 0x45eb @0xf
0x45dc…4605 at0010 = ╱65╱e╱ // 0x45ec @0x10
0x45dc…4605 at0011 = ╱64╱d╱ // 0x45ed @0x11
0x45dc…4605 at0012 = ╱69╱i╱ // 0x45ee @0x12
0x45dc…4605 at0013 = ╱74╱t╱ // 0x45ef @0x13
0x45dc…4605 at0014 = ╱6e╱n╱ // 0x45f0 @0x14
0x45dc…4605 at0015 = ╱6f╱o╱ // 0x45f1 @0x15
0x45dc…4605 at0016 = ╱74╱t╱ // 0x45f2 @0x16
0x45dc…4605 at0017 = ╱61╱a╱ // 0x45f3 @0x17
0x45dc…4605 at0018 = ╱20╱…╱ // 0x45f4 @0x18
0x45dc…4605 at0019 = ╱28╱(╱ // 0x45f5 @0x19
0x45dc…4605 at001a = ╱46╱F╱ // 0x45f6 @0x1a
0x45dc…4605 at001b = ╱2f╱/╱ // 0x45f7 @0x1b
0x45dc…4605 at001c = ╱4b╱K╱ // 0x45f8 @0x1c
0x45dc…4605 at001d = ╱29╱)╱ // 0x45f9 @0x1d
0x45dc…4605 at001e = ╱3a╱:╱ // 0x45fa @0x1e
0x45dc…4605 at001f = ╱22╱"╱ // 0x45fb @0x1f
0x45dc…4605 at0020 = ╱ec╱,╱ // 0x45fc @0x20
0x45dc…4605 at0021 = ╱46╱F╱ // 0x45fd @0x21
0x45dc…4605 at0022 = ╱41╱A╱ // 0x45fe @0x22
0x45dc…4605 at0023 = ╱4b╱K╱ // 0x45ff @0x23
0x45dc…4605 at0024 = ╱4b╱K╱ // 0x4600 @0x24
0x45dc…4605 at0025 = ╱52╱R╱ // 0x4601 @0x25
0x45dc…4605 at0026 = ╱45╱E╱ // 0x4602 @0x26
0x45dc…4605 at0027 = ╱ef╱$╱ // 0x4603 @0x27
0x45dc…4605 at0028 = EOL // 0x4604 @0x28
0x45dc…4605 }
0x4605…463a d391 6990 UNTIL FAKKRE$="F" OR FAKKRE$="K" OR FAKKRE$="f" OR FAKKRE$="k"
0x4605…463a LineComalBin {
0x4605…463a ptr = 0xd391 // 0x4605 @0x0
0x4605…463a lno = 0x1b4e // 0x4607 @0x2
0x4605…463a at0004 = ╱98╱ UNTIL ╱ // 0x4609 @0x4
0x4605…463a at0005 = ╱46╱F╱ // 0x460a @0x5
0x4605…463a at0006 = ╱41╱A╱ // 0x460b @0x6
0x4605…463a at0007 = ╱4b╱K╱ // 0x460c @0x7
0x4605…463a at0008 = ╱4b╱K╱ // 0x460d @0x8
0x4605…463a at0009 = ╱52╱R╱ // 0x460e @0x9
0x4605…463a at000a = ╱45╱E╱ // 0x460f @0xa
0x4605…463a at000b = ╱ef╱$╱ // 0x4610 @0xb
0x4605…463a at000c = ╱dc╱=╱ // 0x4611 @0xc
0x4605…463a at000d = ╱22╱"╱ // 0x4612 @0xd
0x4605…463a at000e = ╱46╱F╱ // 0x4613 @0xe
0x4605…463a at000f = ╱22╱"╱ // 0x4614 @0xf
0x4605…463a at0010 = ╱db╱ OR ╱ // 0x4615 @0x10
0x4605…463a at0011 = ╱46╱F╱ // 0x4616 @0x11
0x4605…463a at0012 = ╱41╱A╱ // 0x4617 @0x12
0x4605…463a at0013 = ╱4b╱K╱ // 0x4618 @0x13
0x4605…463a at0014 = ╱4b╱K╱ // 0x4619 @0x14
0x4605…463a at0015 = ╱52╱R╱ // 0x461a @0x15
0x4605…463a at0016 = ╱45╱E╱ // 0x461b @0x16
0x4605…463a at0017 = ╱ef╱$╱ // 0x461c @0x17
0x4605…463a at0018 = ╱dc╱=╱ // 0x461d @0x18
0x4605…463a at0019 = ╱22╱"╱ // 0x461e @0x19
0x4605…463a at001a = ╱4b╱K╱ // 0x461f @0x1a
0x4605…463a at001b = ╱22╱"╱ // 0x4620 @0x1b
0x4605…463a at001c = ╱db╱ OR ╱ // 0x4621 @0x1c
0x4605…463a at001d = ╱46╱F╱ // 0x4622 @0x1d
0x4605…463a at001e = ╱41╱A╱ // 0x4623 @0x1e
0x4605…463a at001f = ╱4b╱K╱ // 0x4624 @0x1f
0x4605…463a at0020 = ╱4b╱K╱ // 0x4625 @0x20
0x4605…463a at0021 = ╱52╱R╱ // 0x4626 @0x21
0x4605…463a at0022 = ╱45╱E╱ // 0x4627 @0x22
0x4605…463a at0023 = ╱ef╱$╱ // 0x4628 @0x23
0x4605…463a at0024 = ╱dc╱=╱ // 0x4629 @0x24
0x4605…463a at0025 = ╱22╱"╱ // 0x462a @0x25
0x4605…463a at0026 = ╱66╱f╱ // 0x462b @0x26
0x4605…463a at0027 = ╱22╱"╱ // 0x462c @0x27
0x4605…463a at0028 = ╱db╱ OR ╱ // 0x462d @0x28
0x4605…463a at0029 = ╱46╱F╱ // 0x462e @0x29
0x4605…463a at002a = ╱41╱A╱ // 0x462f @0x2a
0x4605…463a at002b = ╱4b╱K╱ // 0x4630 @0x2b
0x4605…463a at002c = ╱4b╱K╱ // 0x4631 @0x2c
0x4605…463a at002d = ╱52╱R╱ // 0x4632 @0x2d
0x4605…463a at002e = ╱45╱E╱ // 0x4633 @0x2e
0x4605…463a at002f = ╱ef╱$╱ // 0x4634 @0x2f
0x4605…463a at0030 = ╱dc╱=╱ // 0x4635 @0x30
0x4605…463a at0031 = ╱22╱"╱ // 0x4636 @0x31
0x4605…463a at0032 = ╱6b╱k╱ // 0x4637 @0x32
0x4605…463a at0033 = ╱22╱"╱ // 0x4638 @0x33
0x4605…463a at0034 = EOL // 0x4639 @0x34
0x4605…463a }
0x463a…4657 d3ae 7000 IF FAKKRE$="f" THEN FAKKRE$="F"
0x463a…4657 LineComalBin {
0x463a…4657 ptr = 0xd3ae // 0x463a @0x0
0x463a…4657 lno = 0x1b58 // 0x463c @0x2
0x463a…4657 at0004 = ╱82╱ IF ╱ // 0x463e @0x4
0x463a…4657 at0005 = ╱46╱F╱ // 0x463f @0x5
0x463a…4657 at0006 = ╱41╱A╱ // 0x4640 @0x6
0x463a…4657 at0007 = ╱4b╱K╱ // 0x4641 @0x7
0x463a…4657 at0008 = ╱4b╱K╱ // 0x4642 @0x8
0x463a…4657 at0009 = ╱52╱R╱ // 0x4643 @0x9
0x463a…4657 at000a = ╱45╱E╱ // 0x4644 @0xa
0x463a…4657 at000b = ╱ef╱$╱ // 0x4645 @0xb
0x463a…4657 at000c = ╱dc╱=╱ // 0x4646 @0xc
0x463a…4657 at000d = ╱22╱"╱ // 0x4647 @0xd
0x463a…4657 at000e = ╱66╱f╱ // 0x4648 @0xe
0x463a…4657 at000f = ╱22╱"╱ // 0x4649 @0xf
0x463a…4657 at0010 = ╱b6╱ THEN ╱ // 0x464a @0x10
0x463a…4657 at0011 = ╱46╱F╱ // 0x464b @0x11
0x463a…4657 at0012 = ╱41╱A╱ // 0x464c @0x12
0x463a…4657 at0013 = ╱4b╱K╱ // 0x464d @0x13
0x463a…4657 at0014 = ╱4b╱K╱ // 0x464e @0x14
0x463a…4657 at0015 = ╱52╱R╱ // 0x464f @0x15
0x463a…4657 at0016 = ╱45╱E╱ // 0x4650 @0x16
0x463a…4657 at0017 = ╱ef╱$╱ // 0x4651 @0x17
0x463a…4657 at0018 = ╱dc╱=╱ // 0x4652 @0x18
0x463a…4657 at0019 = ╱22╱"╱ // 0x4653 @0x19
0x463a…4657 at001a = ╱46╱F╱ // 0x4654 @0x1a
0x463a…4657 at001b = ╱22╱"╱ // 0x4655 @0x1b
0x463a…4657 at001c = EOL // 0x4656 @0x1c
0x463a…4657 }
0x4657…4674 d3cb 7010 IF FAKKRE$="k" THEN FAKKRE$="K"
0x4657…4674 LineComalBin {
0x4657…4674 ptr = 0xd3cb // 0x4657 @0x0
0x4657…4674 lno = 0x1b62 // 0x4659 @0x2
0x4657…4674 at0004 = ╱82╱ IF ╱ // 0x465b @0x4
0x4657…4674 at0005 = ╱46╱F╱ // 0x465c @0x5
0x4657…4674 at0006 = ╱41╱A╱ // 0x465d @0x6
0x4657…4674 at0007 = ╱4b╱K╱ // 0x465e @0x7
0x4657…4674 at0008 = ╱4b╱K╱ // 0x465f @0x8
0x4657…4674 at0009 = ╱52╱R╱ // 0x4660 @0x9
0x4657…4674 at000a = ╱45╱E╱ // 0x4661 @0xa
0x4657…4674 at000b = ╱ef╱$╱ // 0x4662 @0xb
0x4657…4674 at000c = ╱dc╱=╱ // 0x4663 @0xc
0x4657…4674 at000d = ╱22╱"╱ // 0x4664 @0xd
0x4657…4674 at000e = ╱6b╱k╱ // 0x4665 @0xe
0x4657…4674 at000f = ╱22╱"╱ // 0x4666 @0xf
0x4657…4674 at0010 = ╱b6╱ THEN ╱ // 0x4667 @0x10
0x4657…4674 at0011 = ╱46╱F╱ // 0x4668 @0x11
0x4657…4674 at0012 = ╱41╱A╱ // 0x4669 @0x12
0x4657…4674 at0013 = ╱4b╱K╱ // 0x466a @0x13
0x4657…4674 at0014 = ╱4b╱K╱ // 0x466b @0x14
0x4657…4674 at0015 = ╱52╱R╱ // 0x466c @0x15
0x4657…4674 at0016 = ╱45╱E╱ // 0x466d @0x16
0x4657…4674 at0017 = ╱ef╱$╱ // 0x466e @0x17
0x4657…4674 at0018 = ╱dc╱=╱ // 0x466f @0x18
0x4657…4674 at0019 = ╱22╱"╱ // 0x4670 @0x19
0x4657…4674 at001a = ╱4b╱K╱ // 0x4671 @0x1a
0x4657…4674 at001b = ╱22╱"╱ // 0x4672 @0x1b
0x4657…4674 at001c = EOL // 0x4673 @0x1c
0x4657…4674 }
0x4674…467a d3d1 7020 CLEAR
0x4674…467a LineComalBin {
0x4674…467a ptr = 0xd3d1 // 0x4674 @0x0
0x4674…467a lno = 0x1b6c // 0x4676 @0x2
0x4674…467a at0004 = ╱a0╱ CLEAR ╱ // 0x4678 @0x4
0x4674…467a at0005 = EOL // 0x4679 @0x5
0x4674…467a }
0x467a…468f d3e6 7030 EXEC KUNDEUD(2)
0x467a…468f LineComalBin {
0x467a…468f ptr = 0xd3e6 // 0x467a @0x0
0x467a…468f lno = 0x1b76 // 0x467c @0x2
0x467a…468f at0004 = ╱9d╱ EXEC ╱ // 0x467e @0x4
0x467a…468f at0005 = ╱4b╱K╱ // 0x467f @0x5
0x467a…468f at0006 = ╱55╱U╱ // 0x4680 @0x6
0x467a…468f at0007 = ╱4e╱N╱ // 0x4681 @0x7
0x467a…468f at0008 = ╱44╱D╱ // 0x4682 @0x8
0x467a…468f at0009 = ╱45╱E╱ // 0x4683 @0x9
0x467a…468f at000a = ╱55╱U╱ // 0x4684 @0xa
0x467a…468f at000b = ╱44╱D╱ // 0x4685 @0xb
0x467a…468f at000c = ╱ed╱(╱ // 0x4686 @0xc
0x467a…468f at000d = ╱32╱2╱ // 0x4687 @0xd
0x467a…468f at000e = ╱fe00008002╱ // 0x4688 @0xe
0x467a…468f at0013 = ╱ee╱)╱ // 0x468d @0x13
0x467a…468f at0014 = EOL // 0x468e @0x14
0x467a…468f }
0x468f…46a3 d3fa 7040 CURSOR 50,4
0x468f…46a3 LineComalBin {
0x468f…46a3 ptr = 0xd3fa // 0x468f @0x0
0x468f…46a3 lno = 0x1b80 // 0x4691 @0x2
0x468f…46a3 at0004 = ╱a1╱ CURSOR ╱ // 0x4693 @0x4
0x468f…46a3 at0005 = ╱35╱5╱ // 0x4694 @0x5
0x468f…46a3 at0006 = ╱30╱0╱ // 0x4695 @0x6
0x468f…46a3 at0007 = ╱fe0000c806╱ // 0x4696 @0x7
0x468f…46a3 at000c = ╱ec╱,╱ // 0x469b @0xc
0x468f…46a3 at000d = ╱34╱4╱ // 0x469c @0xd
0x468f…46a3 at000e = ╱fe00008003╱ // 0x469d @0xe
0x468f…46a3 at0013 = EOL // 0x46a2 @0x13
0x468f…46a3 }
0x46a3…46b5 d40c 7050 IF FAKKRE$="F" THEN
0x46a3…46b5 LineComalBin {
0x46a3…46b5 ptr = 0xd40c // 0x46a3 @0x0
0x46a3…46b5 lno = 0x1b8a // 0x46a5 @0x2
0x46a3…46b5 at0004 = ╱9c╱ IF ╱ // 0x46a7 @0x4
0x46a3…46b5 at0005 = ╱46╱F╱ // 0x46a8 @0x5
0x46a3…46b5 at0006 = ╱41╱A╱ // 0x46a9 @0x6
0x46a3…46b5 at0007 = ╱4b╱K╱ // 0x46aa @0x7
0x46a3…46b5 at0008 = ╱4b╱K╱ // 0x46ab @0x8
0x46a3…46b5 at0009 = ╱52╱R╱ // 0x46ac @0x9
0x46a3…46b5 at000a = ╱45╱E╱ // 0x46ad @0xa
0x46a3…46b5 at000b = ╱ef╱$╱ // 0x46ae @0xb
0x46a3…46b5 at000c = ╱dc╱=╱ // 0x46af @0xc
0x46a3…46b5 at000d = ╱22╱"╱ // 0x46b0 @0xd
0x46a3…46b5 at000e = ╱46╱F╱ // 0x46b1 @0xe
0x46a3…46b5 at000f = ╱22╱"╱ // 0x46b2 @0xf
0x46a3…46b5 at0010 = ╱b6╱ THEN ╱ // 0x46b3 @0x10
0x46a3…46b5 at0011 = EOL // 0x46b4 @0x11
0x46a3…46b5 }
0x46b5…46e2 d439 7060 PRINT USING "Fakturanr.: #######":FAKTNR+AFAKT
0x46b5…46e2 LineComalBin {
0x46b5…46e2 ptr = 0xd439 // 0x46b5 @0x0
0x46b5…46e2 lno = 0x1b94 // 0x46b7 @0x2
0x46b5…46e2 at0004 = ╱92╱ PRINT ╱ // 0x46b9 @0x4
0x46b5…46e2 at0005 = ╱b9╱ USING ╱ // 0x46ba @0x5
0x46b5…46e2 at0006 = ╱22╱"╱ // 0x46bb @0x6
0x46b5…46e2 at0007 = ╱46╱F╱ // 0x46bc @0x7
0x46b5…46e2 at0008 = ╱61╱a╱ // 0x46bd @0x8
0x46b5…46e2 at0009 = ╱6b╱k╱ // 0x46be @0x9
0x46b5…46e2 at000a = ╱74╱t╱ // 0x46bf @0xa
0x46b5…46e2 at000b = ╱75╱u╱ // 0x46c0 @0xb
0x46b5…46e2 at000c = ╱72╱r╱ // 0x46c1 @0xc
0x46b5…46e2 at000d = ╱61╱a╱ // 0x46c2 @0xd
0x46b5…46e2 at000e = ╱6e╱n╱ // 0x46c3 @0xe
0x46b5…46e2 at000f = ╱72╱r╱ // 0x46c4 @0xf
0x46b5…46e2 at0010 = ╱2e╱.╱ // 0x46c5 @0x10
0x46b5…46e2 at0011 = ╱3a╱:╱ // 0x46c6 @0x11
0x46b5…46e2 at0012 = ╱20╱…╱ // 0x46c7 @0x12
0x46b5…46e2 at0013 = ╱20╱…╱ // 0x46c8 @0x13
0x46b5…46e2 at0014 = ╱20╱…╱ // 0x46c9 @0x14
0x46b5…46e2 at0015 = ╱20╱…╱ // 0x46ca @0x15
0x46b5…46e2 at0016 = ╱20╱…╱ // 0x46cb @0x16
0x46b5…46e2 at0017 = ╱23╱#╱ // 0x46cc @0x17
0x46b5…46e2 at0018 = ╱23╱#╱ // 0x46cd @0x18
0x46b5…46e2 at0019 = ╱23╱#╱ // 0x46ce @0x19
0x46b5…46e2 at001a = ╱23╱#╱ // 0x46cf @0x1a
0x46b5…46e2 at001b = ╱23╱#╱ // 0x46d0 @0x1b
0x46b5…46e2 at001c = ╱23╱#╱ // 0x46d1 @0x1c
0x46b5…46e2 at001d = ╱23╱#╱ // 0x46d2 @0x1d
0x46b5…46e2 at001e = ╱22╱"╱ // 0x46d3 @0x1e
0x46b5…46e2 at001f = ╱f0╱:╱ // 0x46d4 @0x1f
0x46b5…46e2 at0020 = ╱46╱F╱ // 0x46d5 @0x20
0x46b5…46e2 at0021 = ╱41╱A╱ // 0x46d6 @0x21
0x46b5…46e2 at0022 = ╱4b╱K╱ // 0x46d7 @0x22
0x46b5…46e2 at0023 = ╱54╱T╱ // 0x46d8 @0x23
0x46b5…46e2 at0024 = ╱4e╱N╱ // 0x46d9 @0x24
0x46b5…46e2 at0025 = ╱52╱R╱ // 0x46da @0x25
0x46b5…46e2 at0026 = ╱e2╱+╱ // 0x46db @0x26
0x46b5…46e2 at0027 = ╱41╱A╱ // 0x46dc @0x27
0x46b5…46e2 at0028 = ╱46╱F╱ // 0x46dd @0x28
0x46b5…46e2 at0029 = ╱41╱A╱ // 0x46de @0x29
0x46b5…46e2 at002a = ╱4b╱K╱ // 0x46df @0x2a
0x46b5…46e2 at002b = ╱54╱T╱ // 0x46e0 @0x2b
0x46b5…46e2 at002c = EOL // 0x46e1 @0x2c
0x46b5…46e2 }
0x46e2…46e8 d43f 7070 ELSE
0x46e2…46e8 LineComalBin {
0x46e2…46e8 ptr = 0xd43f // 0x46e2 @0x0
0x46e2…46e8 lno = 0x1b9e // 0x46e4 @0x2
0x46e2…46e8 at0004 = ╱9a╱ ELSE ╱ // 0x46e6 @0x4
0x46e2…46e8 at0005 = EOL // 0x46e7 @0x5
0x46e2…46e8 }
0x46e8…4715 d46c 7080 PRINT USING "Kreditnotanr.: #######":KREDNR+AKRED
0x46e8…4715 LineComalBin {
0x46e8…4715 ptr = 0xd46c // 0x46e8 @0x0
0x46e8…4715 lno = 0x1ba8 // 0x46ea @0x2
0x46e8…4715 at0004 = ╱92╱ PRINT ╱ // 0x46ec @0x4
0x46e8…4715 at0005 = ╱b9╱ USING ╱ // 0x46ed @0x5
0x46e8…4715 at0006 = ╱22╱"╱ // 0x46ee @0x6
0x46e8…4715 at0007 = ╱4b╱K╱ // 0x46ef @0x7
0x46e8…4715 at0008 = ╱72╱r╱ // 0x46f0 @0x8
0x46e8…4715 at0009 = ╱65╱e╱ // 0x46f1 @0x9
0x46e8…4715 at000a = ╱64╱d╱ // 0x46f2 @0xa
0x46e8…4715 at000b = ╱69╱i╱ // 0x46f3 @0xb
0x46e8…4715 at000c = ╱74╱t╱ // 0x46f4 @0xc
0x46e8…4715 at000d = ╱6e╱n╱ // 0x46f5 @0xd
0x46e8…4715 at000e = ╱6f╱o╱ // 0x46f6 @0xe
0x46e8…4715 at000f = ╱74╱t╱ // 0x46f7 @0xf
0x46e8…4715 at0010 = ╱61╱a╱ // 0x46f8 @0x10
0x46e8…4715 at0011 = ╱6e╱n╱ // 0x46f9 @0x11
0x46e8…4715 at0012 = ╱72╱r╱ // 0x46fa @0x12
0x46e8…4715 at0013 = ╱2e╱.╱ // 0x46fb @0x13
0x46e8…4715 at0014 = ╱3a╱:╱ // 0x46fc @0x14
0x46e8…4715 at0015 = ╱20╱…╱ // 0x46fd @0x15
0x46e8…4715 at0016 = ╱20╱…╱ // 0x46fe @0x16
0x46e8…4715 at0017 = ╱23╱#╱ // 0x46ff @0x17
0x46e8…4715 at0018 = ╱23╱#╱ // 0x4700 @0x18
0x46e8…4715 at0019 = ╱23╱#╱ // 0x4701 @0x19
0x46e8…4715 at001a = ╱23╱#╱ // 0x4702 @0x1a
0x46e8…4715 at001b = ╱23╱#╱ // 0x4703 @0x1b
0x46e8…4715 at001c = ╱23╱#╱ // 0x4704 @0x1c
0x46e8…4715 at001d = ╱23╱#╱ // 0x4705 @0x1d
0x46e8…4715 at001e = ╱22╱"╱ // 0x4706 @0x1e
0x46e8…4715 at001f = ╱f0╱:╱ // 0x4707 @0x1f
0x46e8…4715 at0020 = ╱4b╱K╱ // 0x4708 @0x20
0x46e8…4715 at0021 = ╱52╱R╱ // 0x4709 @0x21
0x46e8…4715 at0022 = ╱45╱E╱ // 0x470a @0x22
0x46e8…4715 at0023 = ╱44╱D╱ // 0x470b @0x23
0x46e8…4715 at0024 = ╱4e╱N╱ // 0x470c @0x24
0x46e8…4715 at0025 = ╱52╱R╱ // 0x470d @0x25
0x46e8…4715 at0026 = ╱e2╱+╱ // 0x470e @0x26
0x46e8…4715 at0027 = ╱41╱A╱ // 0x470f @0x27
0x46e8…4715 at0028 = ╱4b╱K╱ // 0x4710 @0x28
0x46e8…4715 at0029 = ╱52╱R╱ // 0x4711 @0x29
0x46e8…4715 at002a = ╱45╱E╱ // 0x4712 @0x2a
0x46e8…4715 at002b = ╱44╱D╱ // 0x4713 @0x2b
0x46e8…4715 at002c = EOL // 0x4714 @0x2c
0x46e8…4715 }
0x4715…471b d472 7090 ENDIF
0x4715…471b LineComalBin {
0x4715…471b ptr = 0xd472 // 0x4715 @0x0
0x4715…471b lno = 0x1bb2 // 0x4717 @0x2
0x4715…471b at0004 = ╱9b╱ ENDIF ╱ // 0x4719 @0x4
0x4715…471b at0005 = EOL // 0x471a @0x5
0x4715…471b }
0x471b…472f d486 7100 CURSOR 50,6
0x471b…472f LineComalBin {
0x471b…472f ptr = 0xd486 // 0x471b @0x0
0x471b…472f lno = 0x1bbc // 0x471d @0x2
0x471b…472f at0004 = ╱a1╱ CURSOR ╱ // 0x471f @0x4
0x471b…472f at0005 = ╱35╱5╱ // 0x4720 @0x5
0x471b…472f at0006 = ╱30╱0╱ // 0x4721 @0x6
0x471b…472f at0007 = ╱fe0000c806╱ // 0x4722 @0x7
0x471b…472f at000c = ╱ec╱,╱ // 0x4727 @0xc
0x471b…472f at000d = ╱36╱6╱ // 0x4728 @0xd
0x471b…472f at000e = ╱fe0000c003╱ // 0x4729 @0xe
0x471b…472f at0013 = EOL // 0x472e @0x13
0x471b…472f }
0x472f…4757 d4ae 7110 PRINT USING "Kundenr.: #######":KUNDENR
0x472f…4757 LineComalBin {
0x472f…4757 ptr = 0xd4ae // 0x472f @0x0
0x472f…4757 lno = 0x1bc6 // 0x4731 @0x2
0x472f…4757 at0004 = ╱92╱ PRINT ╱ // 0x4733 @0x4
0x472f…4757 at0005 = ╱b9╱ USING ╱ // 0x4734 @0x5
0x472f…4757 at0006 = ╱22╱"╱ // 0x4735 @0x6
0x472f…4757 at0007 = ╱4b╱K╱ // 0x4736 @0x7
0x472f…4757 at0008 = ╱75╱u╱ // 0x4737 @0x8
0x472f…4757 at0009 = ╱6e╱n╱ // 0x4738 @0x9
0x472f…4757 at000a = ╱64╱d╱ // 0x4739 @0xa
0x472f…4757 at000b = ╱65╱e╱ // 0x473a @0xb
0x472f…4757 at000c = ╱6e╱n╱ // 0x473b @0xc
0x472f…4757 at000d = ╱72╱r╱ // 0x473c @0xd
0x472f…4757 at000e = ╱2e╱.╱ // 0x473d @0xe
0x472f…4757 at000f = ╱3a╱:╱ // 0x473e @0xf
0x472f…4757 at0010 = ╱20╱…╱ // 0x473f @0x10
0x472f…4757 at0011 = ╱20╱…╱ // 0x4740 @0x11
0x472f…4757 at0012 = ╱20╱…╱ // 0x4741 @0x12
0x472f…4757 at0013 = ╱20╱…╱ // 0x4742 @0x13
0x472f…4757 at0014 = ╱20╱…╱ // 0x4743 @0x14
0x472f…4757 at0015 = ╱20╱…╱ // 0x4744 @0x15
0x472f…4757 at0016 = ╱20╱…╱ // 0x4745 @0x16
0x472f…4757 at0017 = ╱23╱#╱ // 0x4746 @0x17
0x472f…4757 at0018 = ╱23╱#╱ // 0x4747 @0x18
0x472f…4757 at0019 = ╱23╱#╱ // 0x4748 @0x19
0x472f…4757 at001a = ╱23╱#╱ // 0x4749 @0x1a
0x472f…4757 at001b = ╱23╱#╱ // 0x474a @0x1b
0x472f…4757 at001c = ╱23╱#╱ // 0x474b @0x1c
0x472f…4757 at001d = ╱23╱#╱ // 0x474c @0x1d
0x472f…4757 at001e = ╱22╱"╱ // 0x474d @0x1e
0x472f…4757 at001f = ╱f0╱:╱ // 0x474e @0x1f
0x472f…4757 at0020 = ╱4b╱K╱ // 0x474f @0x20
0x472f…4757 at0021 = ╱55╱U╱ // 0x4750 @0x21
0x472f…4757 at0022 = ╱4e╱N╱ // 0x4751 @0x22
0x472f…4757 at0023 = ╱44╱D╱ // 0x4752 @0x23
0x472f…4757 at0024 = ╱45╱E╱ // 0x4753 @0x24
0x472f…4757 at0025 = ╱4e╱N╱ // 0x4754 @0x25
0x472f…4757 at0026 = ╱52╱R╱ // 0x4755 @0x26
0x472f…4757 at0027 = EOL // 0x4756 @0x27
0x472f…4757 }
0x4757…476b d4c2 7120 CURSOR 50,8
0x4757…476b LineComalBin {
0x4757…476b ptr = 0xd4c2 // 0x4757 @0x0
0x4757…476b lno = 0x1bd0 // 0x4759 @0x2
0x4757…476b at0004 = ╱a1╱ CURSOR ╱ // 0x475b @0x4
0x4757…476b at0005 = ╱35╱5╱ // 0x475c @0x5
0x4757…476b at0006 = ╱30╱0╱ // 0x475d @0x6
0x4757…476b at0007 = ╱fe0000c806╱ // 0x475e @0x7
0x4757…476b at000c = ╱ec╱,╱ // 0x4763 @0xc
0x4757…476b at000d = ╱38╱8╱ // 0x4764 @0xd
0x4757…476b at000e = ╱fe00008004╱ // 0x4765 @0xe
0x4757…476b at0013 = EOL // 0x476a @0x13
0x4757…476b }
0x476b…477d d4d4 7130 PRINT "Ordredato:"
0x476b…477d LineComalBin {
0x476b…477d ptr = 0xd4d4 // 0x476b @0x0
0x476b…477d lno = 0x1bda // 0x476d @0x2
0x476b…477d at0004 = ╱92╱ PRINT ╱ // 0x476f @0x4
0x476b…477d at0005 = ╱22╱"╱ // 0x4770 @0x5
0x476b…477d at0006 = ╱4f╱O╱ // 0x4771 @0x6
0x476b…477d at0007 = ╱72╱r╱ // 0x4772 @0x7
0x476b…477d at0008 = ╱64╱d╱ // 0x4773 @0x8
0x476b…477d at0009 = ╱72╱r╱ // 0x4774 @0x9
0x476b…477d at000a = ╱65╱e╱ // 0x4775 @0xa
0x476b…477d at000b = ╱64╱d╱ // 0x4776 @0xb
0x476b…477d at000c = ╱61╱a╱ // 0x4777 @0xc
0x476b…477d at000d = ╱74╱t╱ // 0x4778 @0xd
0x476b…477d at000e = ╱6f╱o╱ // 0x4779 @0xe
0x476b…477d at000f = ╱3a╱:╱ // 0x477a @0xf
0x476b…477d at0010 = ╱22╱"╱ // 0x477b @0x10
0x476b…477d at0011 = EOL // 0x477c @0x11
0x476b…477d }
0x477d…478e d4e5 7140 LINIE=8
0x477d…478e LineComalBin {
0x477d…478e ptr = 0xd4e5 // 0x477d @0x0
0x477d…478e lno = 0x1be4 // 0x477f @0x2
0x477d…478e at0004 = ╱4c╱L╱ // 0x4781 @0x4
0x477d…478e at0005 = ╱49╱I╱ // 0x4782 @0x5
0x477d…478e at0006 = ╱4e╱N╱ // 0x4783 @0x6
0x477d…478e at0007 = ╱49╱I╱ // 0x4784 @0x7
0x477d…478e at0008 = ╱45╱E╱ // 0x4785 @0x8
0x477d…478e at0009 = ╱dc╱=╱ // 0x4786 @0x9
0x477d…478e at000a = ╱38╱8╱ // 0x4787 @0xa
0x477d…478e at000b = ╱fe00008004╱ // 0x4788 @0xb
0x477d…478e at0010 = EOL // 0x478d @0x10
0x477d…478e }
0x478e…479c d4f3 7150 EXEC DATOINDT
0x478e…479c LineComalBin {
0x478e…479c ptr = 0xd4f3 // 0x478e @0x0
0x478e…479c lno = 0x1bee // 0x4790 @0x2
0x478e…479c at0004 = ╱9d╱ EXEC ╱ // 0x4792 @0x4
0x478e…479c at0005 = ╱44╱D╱ // 0x4793 @0x5
0x478e…479c at0006 = ╱41╱A╱ // 0x4794 @0x6
0x478e…479c at0007 = ╱54╱T╱ // 0x4795 @0x7
0x478e…479c at0008 = ╱4f╱O╱ // 0x4796 @0x8
0x478e…479c at0009 = ╱49╱I╱ // 0x4797 @0x9
0x478e…479c at000a = ╱4e╱N╱ // 0x4798 @0xa
0x478e…479c at000b = ╱44╱D╱ // 0x4799 @0xb
0x478e…479c at000c = ╱54╱T╱ // 0x479a @0xc
0x478e…479c at000d = EOL // 0x479b @0xd
0x478e…479c }
0x479c…47ad d504 7160 ORDREDAT=DAT
0x479c…47ad LineComalBin {
0x479c…47ad ptr = 0xd504 // 0x479c @0x0
0x479c…47ad lno = 0x1bf8 // 0x479e @0x2
0x479c…47ad at0004 = ╱4f╱O╱ // 0x47a0 @0x4
0x479c…47ad at0005 = ╱52╱R╱ // 0x47a1 @0x5
0x479c…47ad at0006 = ╱44╱D╱ // 0x47a2 @0x6
0x479c…47ad at0007 = ╱52╱R╱ // 0x47a3 @0x7
0x479c…47ad at0008 = ╱45╱E╱ // 0x47a4 @0x8
0x479c…47ad at0009 = ╱44╱D╱ // 0x47a5 @0x9
0x479c…47ad at000a = ╱41╱A╱ // 0x47a6 @0xa
0x479c…47ad at000b = ╱54╱T╱ // 0x47a7 @0xb
0x479c…47ad at000c = ╱dc╱=╱ // 0x47a8 @0xc
0x479c…47ad at000d = ╱44╱D╱ // 0x47a9 @0xd
0x479c…47ad at000e = ╱41╱A╱ // 0x47aa @0xe
0x479c…47ad at000f = ╱54╱T╱ // 0x47ab @0xf
0x479c…47ad at0010 = EOL // 0x47ac @0x10
0x479c…47ad }
0x47ad…47e5 d53c 7170 EXEC INDPUT1(50,10,0,1000000,LTX5$)
0x47ad…47e5 LineComalBin {
0x47ad…47e5 ptr = 0xd53c // 0x47ad @0x0
0x47ad…47e5 lno = 0x1c02 // 0x47af @0x2
0x47ad…47e5 at0004 = ╱9d╱ EXEC ╱ // 0x47b1 @0x4
0x47ad…47e5 at0005 = ╱49╱I╱ // 0x47b2 @0x5
0x47ad…47e5 at0006 = ╱4e╱N╱ // 0x47b3 @0x6
0x47ad…47e5 at0007 = ╱44╱D╱ // 0x47b4 @0x7
0x47ad…47e5 at0008 = ╱50╱P╱ // 0x47b5 @0x8
0x47ad…47e5 at0009 = ╱55╱U╱ // 0x47b6 @0x9
0x47ad…47e5 at000a = ╱54╱T╱ // 0x47b7 @0xa
0x47ad…47e5 at000b = ╱31╱1╱ // 0x47b8 @0xb
0x47ad…47e5 at000c = ╱ed╱(╱ // 0x47b9 @0xc
0x47ad…47e5 at000d = ╱35╱5╱ // 0x47ba @0xd
0x47ad…47e5 at000e = ╱30╱0╱ // 0x47bb @0xe
0x47ad…47e5 at000f = ╱fe0000c806╱ // 0x47bc @0xf
0x47ad…47e5 at0014 = ╱ec╱,╱ // 0x47c1 @0x14
0x47ad…47e5 at0015 = ╱31╱1╱ // 0x47c2 @0x15
0x47ad…47e5 at0016 = ╱30╱0╱ // 0x47c3 @0x16
0x47ad…47e5 at0017 = ╱fe0000a004╱ // 0x47c4 @0x17
0x47ad…47e5 at001c = ╱ec╱,╱ // 0x47c9 @0x1c
0x47ad…47e5 at001d = ╱30╱0╱ // 0x47ca @0x1d
0x47ad…47e5 at001e = ╱fe00000000╱ // 0x47cb @0x1e
0x47ad…47e5 at0023 = ╱ec╱,╱ // 0x47d0 @0x23
0x47ad…47e5 at0024 = ╱31╱1╱ // 0x47d1 @0x24
0x47ad…47e5 at0025 = ╱30╱0╱ // 0x47d2 @0x25
0x47ad…47e5 at0026 = ╱30╱0╱ // 0x47d3 @0x26
0x47ad…47e5 at0027 = ╱30╱0╱ // 0x47d4 @0x27
0x47ad…47e5 at0028 = ╱30╱0╱ // 0x47d5 @0x28
0x47ad…47e5 at0029 = ╱30╱0╱ // 0x47d6 @0x29
0x47ad…47e5 at002a = ╱30╱0╱ // 0x47d7 @0x2a
0x47ad…47e5 at002b = ╱fe0024f414╱ // 0x47d8 @0x2b
0x47ad…47e5 at0030 = ╱ec╱,╱ // 0x47dd @0x30
0x47ad…47e5 at0031 = ╱4c╱L╱ // 0x47de @0x31
0x47ad…47e5 at0032 = ╱54╱T╱ // 0x47df @0x32
0x47ad…47e5 at0033 = ╱58╱X╱ // 0x47e0 @0x33
0x47ad…47e5 at0034 = ╱35╱5╱ // 0x47e1 @0x34
0x47ad…47e5 at0035 = ╱ef╱$╱ // 0x47e2 @0x35
0x47ad…47e5 at0036 = ╱ee╱)╱ // 0x47e3 @0x36
0x47ad…47e5 at0037 = EOL // 0x47e4 @0x37
0x47ad…47e5 }
0x47e5…47f3 d54a 7180 ORDRENR=P
0x47e5…47f3 LineComalBin {
0x47e5…47f3 ptr = 0xd54a // 0x47e5 @0x0
0x47e5…47f3 lno = 0x1c0c // 0x47e7 @0x2
0x47e5…47f3 at0004 = ╱4f╱O╱ // 0x47e9 @0x4
0x47e5…47f3 at0005 = ╱52╱R╱ // 0x47ea @0x5
0x47e5…47f3 at0006 = ╱44╱D╱ // 0x47eb @0x6
0x47e5…47f3 at0007 = ╱52╱R╱ // 0x47ec @0x7
0x47e5…47f3 at0008 = ╱45╱E╱ // 0x47ed @0x8
0x47e5…47f3 at0009 = ╱4e╱N╱ // 0x47ee @0x9
0x47e5…47f3 at000a = ╱52╱R╱ // 0x47ef @0xa
0x47e5…47f3 at000b = ╱dc╱=╱ // 0x47f0 @0xb
0x47e5…47f3 at000c = ╱50╱P╱ // 0x47f1 @0xc
0x47e5…47f3 at000d = EOL // 0x47f2 @0xd
0x47e5…47f3 }
0x47f3…4808 d55f 7190 CURSOR 66,10
0x47f3…4808 LineComalBin {
0x47f3…4808 ptr = 0xd55f // 0x47f3 @0x0
0x47f3…4808 lno = 0x1c16 // 0x47f5 @0x2
0x47f3…4808 at0004 = ╱a1╱ CURSOR ╱ // 0x47f7 @0x4
0x47f3…4808 at0005 = ╱36╱6╱ // 0x47f8 @0x5
0x47f3…4808 at0006 = ╱36╱6╱ // 0x47f9 @0x6
0x47f3…4808 at0007 = ╱fe00008407╱ // 0x47fa @0x7
0x47f3…4808 at000c = ╱ec╱,╱ // 0x47ff @0xc
0x47f3…4808 at000d = ╱31╱1╱ // 0x4800 @0xd
0x47f3…4808 at000e = ╱30╱0╱ // 0x4801 @0xe
0x47f3…4808 at000f = ╱fe0000a004╱ // 0x4802 @0xf
0x47f3…4808 at0014 = EOL // 0x4807 @0x14
0x47f3…4808 }
0x4808…4825 d57c 7200 PRINT USING "####### ":ORDRENR
0x4808…4825 LineComalBin {
0x4808…4825 ptr = 0xd57c // 0x4808 @0x0
0x4808…4825 lno = 0x1c20 // 0x480a @0x2
0x4808…4825 at0004 = ╱92╱ PRINT ╱ // 0x480c @0x4
0x4808…4825 at0005 = ╱b9╱ USING ╱ // 0x480d @0x5
0x4808…4825 at0006 = ╱22╱"╱ // 0x480e @0x6
0x4808…4825 at0007 = ╱23╱#╱ // 0x480f @0x7
0x4808…4825 at0008 = ╱23╱#╱ // 0x4810 @0x8
0x4808…4825 at0009 = ╱23╱#╱ // 0x4811 @0x9
0x4808…4825 at000a = ╱23╱#╱ // 0x4812 @0xa
0x4808…4825 at000b = ╱23╱#╱ // 0x4813 @0xb
0x4808…4825 at000c = ╱23╱#╱ // 0x4814 @0xc
0x4808…4825 at000d = ╱23╱#╱ // 0x4815 @0xd
0x4808…4825 at000e = ╱20╱…╱ // 0x4816 @0xe
0x4808…4825 at000f = ╱20╱…╱ // 0x4817 @0xf
0x4808…4825 at0010 = ╱20╱…╱ // 0x4818 @0x10
0x4808…4825 at0011 = ╱20╱…╱ // 0x4819 @0x11
0x4808…4825 at0012 = ╱20╱…╱ // 0x481a @0x12
0x4808…4825 at0013 = ╱22╱"╱ // 0x481b @0x13
0x4808…4825 at0014 = ╱f0╱:╱ // 0x481c @0x14
0x4808…4825 at0015 = ╱4f╱O╱ // 0x481d @0x15
0x4808…4825 at0016 = ╱52╱R╱ // 0x481e @0x16
0x4808…4825 at0017 = ╱44╱D╱ // 0x481f @0x17
0x4808…4825 at0018 = ╱52╱R╱ // 0x4820 @0x18
0x4808…4825 at0019 = ╱45╱E╱ // 0x4821 @0x19
0x4808…4825 at001a = ╱4e╱N╱ // 0x4822 @0x1a
0x4808…4825 at001b = ╱52╱R╱ // 0x4823 @0x1b
0x4808…4825 at001c = EOL // 0x4824 @0x1c
0x4808…4825 }
0x4825…483a d591 7210 CURSOR 50,12
0x4825…483a LineComalBin {
0x4825…483a ptr = 0xd591 // 0x4825 @0x0
0x4825…483a lno = 0x1c2a // 0x4827 @0x2
0x4825…483a at0004 = ╱a1╱ CURSOR ╱ // 0x4829 @0x4
0x4825…483a at0005 = ╱35╱5╱ // 0x482a @0x5
0x4825…483a at0006 = ╱30╱0╱ // 0x482b @0x6
0x4825…483a at0007 = ╱fe0000c806╱ // 0x482c @0x7
0x4825…483a at000c = ╱ec╱,╱ // 0x4831 @0xc
0x4825…483a at000d = ╱31╱1╱ // 0x4832 @0xd
0x4825…483a at000e = ╱32╱2╱ // 0x4833 @0xe
0x4825…483a at000f = ╱fe0000c004╱ // 0x4834 @0xf
0x4825…483a at0014 = EOL // 0x4839 @0x14
0x4825…483a }
0x483a…4847 d59e 7220 PRINT "Dato:"
0x483a…4847 LineComalBin {
0x483a…4847 ptr = 0xd59e // 0x483a @0x0
0x483a…4847 lno = 0x1c34 // 0x483c @0x2
0x483a…4847 at0004 = ╱92╱ PRINT ╱ // 0x483e @0x4
0x483a…4847 at0005 = ╱22╱"╱ // 0x483f @0x5
0x483a…4847 at0006 = ╱44╱D╱ // 0x4840 @0x6
0x483a…4847 at0007 = ╱61╱a╱ // 0x4841 @0x7
0x483a…4847 at0008 = ╱74╱t╱ // 0x4842 @0x8
0x483a…4847 at0009 = ╱6f╱o╱ // 0x4843 @0x9
0x483a…4847 at000a = ╱3a╱:╱ // 0x4844 @0xa
0x483a…4847 at000b = ╱22╱"╱ // 0x4845 @0xb
0x483a…4847 at000c = EOL // 0x4846 @0xc
0x483a…4847 }
0x4847…4859 d5b0 7230 LINIE=12
0x4847…4859 LineComalBin {
0x4847…4859 ptr = 0xd5b0 // 0x4847 @0x0
0x4847…4859 lno = 0x1c3e // 0x4849 @0x2
0x4847…4859 at0004 = ╱4c╱L╱ // 0x484b @0x4
0x4847…4859 at0005 = ╱49╱I╱ // 0x484c @0x5
0x4847…4859 at0006 = ╱4e╱N╱ // 0x484d @0x6
0x4847…4859 at0007 = ╱49╱I╱ // 0x484e @0x7
0x4847…4859 at0008 = ╱45╱E╱ // 0x484f @0x8
0x4847…4859 at0009 = ╱dc╱=╱ // 0x4850 @0x9
0x4847…4859 at000a = ╱31╱1╱ // 0x4851 @0xa
0x4847…4859 at000b = ╱32╱2╱ // 0x4852 @0xb
0x4847…4859 at000c = ╱fe0000c004╱ // 0x4853 @0xc
0x4847…4859 at0011 = EOL // 0x4858 @0x11
0x4847…4859 }
0x4859…4867 d5be 7240 EXEC DATOINDT
0x4859…4867 LineComalBin {
0x4859…4867 ptr = 0xd5be // 0x4859 @0x0
0x4859…4867 lno = 0x1c48 // 0x485b @0x2
0x4859…4867 at0004 = ╱9d╱ EXEC ╱ // 0x485d @0x4
0x4859…4867 at0005 = ╱44╱D╱ // 0x485e @0x5
0x4859…4867 at0006 = ╱41╱A╱ // 0x485f @0x6
0x4859…4867 at0007 = ╱54╱T╱ // 0x4860 @0x7
0x4859…4867 at0008 = ╱4f╱O╱ // 0x4861 @0x8
0x4859…4867 at0009 = ╱49╱I╱ // 0x4862 @0x9
0x4859…4867 at000a = ╱4e╱N╱ // 0x4863 @0xa
0x4859…4867 at000b = ╱44╱D╱ // 0x4864 @0xb
0x4859…4867 at000c = ╱54╱T╱ // 0x4865 @0xc
0x4859…4867 at000d = EOL // 0x4866 @0xd
0x4859…4867 }
0x4867…4875 d5cc 7250 FDATO=DAT
0x4867…4875 LineComalBin {
0x4867…4875 ptr = 0xd5cc // 0x4867 @0x0
0x4867…4875 lno = 0x1c52 // 0x4869 @0x2
0x4867…4875 at0004 = ╱46╱F╱ // 0x486b @0x4
0x4867…4875 at0005 = ╱44╱D╱ // 0x486c @0x5
0x4867…4875 at0006 = ╱41╱A╱ // 0x486d @0x6
0x4867…4875 at0007 = ╱54╱T╱ // 0x486e @0x7
0x4867…4875 at0008 = ╱4f╱O╱ // 0x486f @0x8
0x4867…4875 at0009 = ╱dc╱=╱ // 0x4870 @0x9
0x4867…4875 at000a = ╱44╱D╱ // 0x4871 @0xa
0x4867…4875 at000b = ╱41╱A╱ // 0x4872 @0xb
0x4867…4875 at000c = ╱54╱T╱ // 0x4873 @0xc
0x4867…4875 at000d = EOL // 0x4874 @0xd
0x4867…4875 }
0x4875…4889 d5e0 7260 CURSOR 9,14
0x4875…4889 LineComalBin {
0x4875…4889 ptr = 0xd5e0 // 0x4875 @0x0
0x4875…4889 lno = 0x1c5c // 0x4877 @0x2
0x4875…4889 at0004 = ╱a1╱ CURSOR ╱ // 0x4879 @0x4
0x4875…4889 at0005 = ╱39╱9╱ // 0x487a @0x5
0x4875…4889 at0006 = ╱fe00009004╱ // 0x487b @0x6
0x4875…4889 at000b = ╱ec╱,╱ // 0x4880 @0xb
0x4875…4889 at000c = ╱31╱1╱ // 0x4881 @0xc
0x4875…4889 at000d = ╱34╱4╱ // 0x4882 @0xd
0x4875…4889 at000e = ╱fe0000e004╱ // 0x4883 @0xe
0x4875…4889 at0013 = EOL // 0x4888 @0x13
0x4875…4889 }
0x4889…48a5 d5fc 7270 INPUT "Levering: ",LEVTEKST$
0x4889…48a5 LineComalBin {
0x4889…48a5 ptr = 0xd5fc // 0x4889 @0x0
0x4889…48a5 lno = 0x1c66 // 0x488b @0x2
0x4889…48a5 at0004 = ╱91╱ INPUT ╱ // 0x488d @0x4
0x4889…48a5 at0005 = ╱22╱"╱ // 0x488e @0x5
0x4889…48a5 at0006 = ╱4c╱L╱ // 0x488f @0x6
0x4889…48a5 at0007 = ╱65╱e╱ // 0x4890 @0x7
0x4889…48a5 at0008 = ╱76╱v╱ // 0x4891 @0x8
0x4889…48a5 at0009 = ╱65╱e╱ // 0x4892 @0x9
0x4889…48a5 at000a = ╱72╱r╱ // 0x4893 @0xa
0x4889…48a5 at000b = ╱69╱i╱ // 0x4894 @0xb
0x4889…48a5 at000c = ╱6e╱n╱ // 0x4895 @0xc
0x4889…48a5 at000d = ╱67╱g╱ // 0x4896 @0xd
0x4889…48a5 at000e = ╱3a╱:╱ // 0x4897 @0xe
0x4889…48a5 at000f = ╱20╱…╱ // 0x4898 @0xf
0x4889…48a5 at0010 = ╱22╱"╱ // 0x4899 @0x10
0x4889…48a5 at0011 = ╱ec╱,╱ // 0x489a @0x11
0x4889…48a5 at0012 = ╱4c╱L╱ // 0x489b @0x12
0x4889…48a5 at0013 = ╱45╱E╱ // 0x489c @0x13
0x4889…48a5 at0014 = ╱56╱V╱ // 0x489d @0x14
0x4889…48a5 at0015 = ╱54╱T╱ // 0x489e @0x15
0x4889…48a5 at0016 = ╱45╱E╱ // 0x489f @0x16
0x4889…48a5 at0017 = ╱4b╱K╱ // 0x48a0 @0x17
0x4889…48a5 at0018 = ╱53╱S╱ // 0x48a1 @0x18
0x4889…48a5 at0019 = ╱54╱T╱ // 0x48a2 @0x19
0x4889…48a5 at001a = ╱ef╱$╱ // 0x48a3 @0x1a
0x4889…48a5 at001b = EOL // 0x48a4 @0x1b
0x4889…48a5 }
0x48a5…48b8 d60f 7280 LEVKODE=0
0x48a5…48b8 LineComalBin {
0x48a5…48b8 ptr = 0xd60f // 0x48a5 @0x0
0x48a5…48b8 lno = 0x1c70 // 0x48a7 @0x2
0x48a5…48b8 at0004 = ╱4c╱L╱ // 0x48a9 @0x4
0x48a5…48b8 at0005 = ╱45╱E╱ // 0x48aa @0x5
0x48a5…48b8 at0006 = ╱56╱V╱ // 0x48ab @0x6
0x48a5…48b8 at0007 = ╱4b╱K╱ // 0x48ac @0x7
0x48a5…48b8 at0008 = ╱4f╱O╱ // 0x48ad @0x8
0x48a5…48b8 at0009 = ╱44╱D╱ // 0x48ae @0x9
0x48a5…48b8 at000a = ╱45╱E╱ // 0x48af @0xa
0x48a5…48b8 at000b = ╱dc╱=╱ // 0x48b0 @0xb
0x48a5…48b8 at000c = ╱30╱0╱ // 0x48b1 @0xc
0x48a5…48b8 at000d = ╱fe00000000╱ // 0x48b2 @0xd
0x48a5…48b8 at0012 = EOL // 0x48b7 @0x12
0x48a5…48b8 }
0x48b8…48e1 d638 7290 IF LEN(LEVTEKST$)=0 THEN LEVKODE=11
0x48b8…48e1 LineComalBin {
0x48b8…48e1 ptr = 0xd638 // 0x48b8 @0x0
0x48b8…48e1 lno = 0x1c7a // 0x48ba @0x2
0x48b8…48e1 at0004 = ╱82╱ IF ╱ // 0x48bc @0x4
0x48b8…48e1 at0005 = ╱cc╱LEN╱ // 0x48bd @0x5
0x48b8…48e1 at0006 = ╱ed╱(╱ // 0x48be @0x6
0x48b8…48e1 at0007 = ╱4c╱L╱ // 0x48bf @0x7
0x48b8…48e1 at0008 = ╱45╱E╱ // 0x48c0 @0x8
0x48b8…48e1 at0009 = ╱56╱V╱ // 0x48c1 @0x9
0x48b8…48e1 at000a = ╱54╱T╱ // 0x48c2 @0xa
0x48b8…48e1 at000b = ╱45╱E╱ // 0x48c3 @0xb
0x48b8…48e1 at000c = ╱4b╱K╱ // 0x48c4 @0xc
0x48b8…48e1 at000d = ╱53╱S╱ // 0x48c5 @0xd
0x48b8…48e1 at000e = ╱54╱T╱ // 0x48c6 @0xe
0x48b8…48e1 at000f = ╱ef╱$╱ // 0x48c7 @0xf
0x48b8…48e1 at0010 = ╱ee╱)╱ // 0x48c8 @0x10
0x48b8…48e1 at0011 = ╱dc╱=╱ // 0x48c9 @0x11
0x48b8…48e1 at0012 = ╱30╱0╱ // 0x48ca @0x12
0x48b8…48e1 at0013 = ╱fe00000000╱ // 0x48cb @0x13
0x48b8…48e1 at0018 = ╱b6╱ THEN ╱ // 0x48d0 @0x18
0x48b8…48e1 at0019 = ╱4c╱L╱ // 0x48d1 @0x19
0x48b8…48e1 at001a = ╱45╱E╱ // 0x48d2 @0x1a
0x48b8…48e1 at001b = ╱56╱V╱ // 0x48d3 @0x1b
0x48b8…48e1 at001c = ╱4b╱K╱ // 0x48d4 @0x1c
0x48b8…48e1 at001d = ╱4f╱O╱ // 0x48d5 @0x1d
0x48b8…48e1 at001e = ╱44╱D╱ // 0x48d6 @0x1e
0x48b8…48e1 at001f = ╱45╱E╱ // 0x48d7 @0x1f
0x48b8…48e1 at0020 = ╱dc╱=╱ // 0x48d8 @0x20
0x48b8…48e1 at0021 = ╱31╱1╱ // 0x48d9 @0x21
0x48b8…48e1 at0022 = ╱31╱1╱ // 0x48da @0x22
0x48b8…48e1 at0023 = ╱fe0000b004╱ // 0x48db @0x23
0x48b8…48e1 at0028 = EOL // 0x48e0 @0x28
0x48b8…48e1 }
0x48e1…4914 d66b 7300 EXEC INDPUT1(9,17,-9,-6,LTX6$)
0x48e1…4914 LineComalBin {
0x48e1…4914 ptr = 0xd66b // 0x48e1 @0x0
0x48e1…4914 lno = 0x1c84 // 0x48e3 @0x2
0x48e1…4914 at0004 = ╱9d╱ EXEC ╱ // 0x48e5 @0x4
0x48e1…4914 at0005 = ╱49╱I╱ // 0x48e6 @0x5
0x48e1…4914 at0006 = ╱4e╱N╱ // 0x48e7 @0x6
0x48e1…4914 at0007 = ╱44╱D╱ // 0x48e8 @0x7
0x48e1…4914 at0008 = ╱50╱P╱ // 0x48e9 @0x8
0x48e1…4914 at0009 = ╱55╱U╱ // 0x48ea @0x9
0x48e1…4914 at000a = ╱54╱T╱ // 0x48eb @0xa
0x48e1…4914 at000b = ╱31╱1╱ // 0x48ec @0xb
0x48e1…4914 at000c = ╱ed╱(╱ // 0x48ed @0xc
0x48e1…4914 at000d = ╱39╱9╱ // 0x48ee @0xd
0x48e1…4914 at000e = ╱fe00009004╱ // 0x48ef @0xe
0x48e1…4914 at0013 = ╱ec╱,╱ // 0x48f4 @0x13
0x48e1…4914 at0014 = ╱31╱1╱ // 0x48f5 @0x14
0x48e1…4914 at0015 = ╱37╱7╱ // 0x48f6 @0x15
0x48e1…4914 at0016 = ╱fe00008805╱ // 0x48f7 @0x16
0x48e1…4914 at001b = ╱ec╱,╱ // 0x48fc @0x1b
0x48e1…4914 at001c = ╱e9╱-╱ // 0x48fd @0x1c
0x48e1…4914 at001d = ╱39╱9╱ // 0x48fe @0x1d
0x48e1…4914 at001e = ╱fe00009004╱ // 0x48ff @0x1e
0x48e1…4914 at0023 = ╱ec╱,╱ // 0x4904 @0x23
0x48e1…4914 at0024 = ╱e9╱-╱ // 0x4905 @0x24
0x48e1…4914 at0025 = ╱36╱6╱ // 0x4906 @0x25
0x48e1…4914 at0026 = ╱fe0000c003╱ // 0x4907 @0x26
0x48e1…4914 at002b = ╱ec╱,╱ // 0x490c @0x2b
0x48e1…4914 at002c = ╱4c╱L╱ // 0x490d @0x2c
0x48e1…4914 at002d = ╱54╱T╱ // 0x490e @0x2d
0x48e1…4914 at002e = ╱58╱X╱ // 0x490f @0x2e
0x48e1…4914 at002f = ╱36╱6╱ // 0x4910 @0x2f
0x48e1…4914 at0030 = ╱ef╱$╱ // 0x4911 @0x30
0x48e1…4914 at0031 = ╱ee╱)╱ // 0x4912 @0x31
0x48e1…4914 at0032 = EOL // 0x4913 @0x32
0x48e1…4914 }
0x4914…491a d671 7310 ENDIF
0x4914…491a LineComalBin {
0x4914…491a ptr = 0xd671 // 0x4914 @0x0
0x4914…491a lno = 0x1c8e // 0x4916 @0x2
0x4914…491a at0004 = ╱9b╱ ENDIF ╱ // 0x4918 @0x4
0x4914…491a at0005 = EOL // 0x4919 @0x5
0x4914…491a }
0x491a…4929 d680 7320 UNTIL P=-7
0x491a…4929 LineComalBin {
0x491a…4929 ptr = 0xd680 // 0x491a @0x0
0x491a…4929 lno = 0x1c98 // 0x491c @0x2
0x491a…4929 at0004 = ╱98╱ UNTIL ╱ // 0x491e @0x4
0x491a…4929 at0005 = ╱50╱P╱ // 0x491f @0x5
0x491a…4929 at0006 = ╱dc╱=╱ // 0x4920 @0x6
0x491a…4929 at0007 = ╱e9╱-╱ // 0x4921 @0x7
0x491a…4929 at0008 = ╱37╱7╱ // 0x4922 @0x8
0x491a…4929 at0009 = ╱fe0000e003╱ // 0x4923 @0x9
0x491a…4929 at000e = EOL // 0x4928 @0xe
0x491a…4929 }
0x4929…493f d696 7330 IF KUNDENR=0 THEN EXIT
0x4929…493f LineComalBin {
0x4929…493f ptr = 0xd696 // 0x4929 @0x0
0x4929…493f lno = 0x1ca2 // 0x492b @0x2
0x4929…493f at0004 = ╱82╱ IF ╱ // 0x492d @0x4
0x4929…493f at0005 = ╱4b╱K╱ // 0x492e @0x5
0x4929…493f at0006 = ╱55╱U╱ // 0x492f @0x6
0x4929…493f at0007 = ╱4e╱N╱ // 0x4930 @0x7
0x4929…493f at0008 = ╱44╱D╱ // 0x4931 @0x8
0x4929…493f at0009 = ╱45╱E╱ // 0x4932 @0x9
0x4929…493f at000a = ╱4e╱N╱ // 0x4933 @0xa
0x4929…493f at000b = ╱52╱R╱ // 0x4934 @0xb
0x4929…493f at000c = ╱dc╱=╱ // 0x4935 @0xc
0x4929…493f at000d = ╱30╱0╱ // 0x4936 @0xd
0x4929…493f at000e = ╱fe00000000╱ // 0x4937 @0xe
0x4929…493f at0013 = ╱b6╱ THEN ╱ // 0x493c @0x13
0x4929…493f at0014 = ╱99╱ EXIT ╱ // 0x493d @0x14
0x4929…493f at0015 = EOL // 0x493e @0x15
0x4929…493f }
0x493f…498c d6e3 7340 IF APOSTER<=(MFKL+5)*MFAK+2*MFKL-15 AND FJPOST+AFAKT+AKRED<=MFAK THEN
0x493f…498c LineComalBin {
0x493f…498c ptr = 0xd6e3 // 0x493f @0x0
0x493f…498c lno = 0x1cac // 0x4941 @0x2
0x493f…498c at0004 = ╱9c╱ IF ╱ // 0x4943 @0x4
0x493f…498c at0005 = ╱41╱A╱ // 0x4944 @0x5
0x493f…498c at0006 = ╱50╱P╱ // 0x4945 @0x6
0x493f…498c at0007 = ╱4f╱O╱ // 0x4946 @0x7
0x493f…498c at0008 = ╱53╱S╱ // 0x4947 @0x8
0x493f…498c at0009 = ╱54╱T╱ // 0x4948 @0x9
0x493f…498c at000a = ╱45╱E╱ // 0x4949 @0xa
0x493f…498c at000b = ╱52╱R╱ // 0x494a @0xb
0x493f…498c at000c = ╱df╱<=╱ // 0x494b @0xc
0x493f…498c at000d = ╱ed╱(╱ // 0x494c @0xd
0x493f…498c at000e = ╱4d╱M╱ // 0x494d @0xe
0x493f…498c at000f = ╱46╱F╱ // 0x494e @0xf
0x493f…498c at0010 = ╱4b╱K╱ // 0x494f @0x10
0x493f…498c at0011 = ╱4c╱L╱ // 0x4950 @0x11
0x493f…498c at0012 = ╱e2╱+╱ // 0x4951 @0x12
0x493f…498c at0013 = ╱35╱5╱ // 0x4952 @0x13
0x493f…498c at0014 = ╱fe0000a003╱ // 0x4953 @0x14
0x493f…498c at0019 = ╱ee╱)╱ // 0x4958 @0x19
0x493f…498c at001a = ╱e4╱*╱ // 0x4959 @0x1a
0x493f…498c at001b = ╱4d╱M╱ // 0x495a @0x1b
0x493f…498c at001c = ╱46╱F╱ // 0x495b @0x1c
0x493f…498c at001d = ╱41╱A╱ // 0x495c @0x1d
0x493f…498c at001e = ╱4b╱K╱ // 0x495d @0x1e
0x493f…498c at001f = ╱e2╱+╱ // 0x495e @0x1f
0x493f…498c at0020 = ╱32╱2╱ // 0x495f @0x20
0x493f…498c at0021 = ╱fe00008002╱ // 0x4960 @0x21
0x493f…498c at0026 = ╱e4╱*╱ // 0x4965 @0x26
0x493f…498c at0027 = ╱4d╱M╱ // 0x4966 @0x27
0x493f…498c at0028 = ╱46╱F╱ // 0x4967 @0x28
0x493f…498c at0029 = ╱4b╱K╱ // 0x4968 @0x29
0x493f…498c at002a = ╱4c╱L╱ // 0x4969 @0x2a
0x493f…498c at002b = ╱e3╱-╱ // 0x496a @0x2b
0x493f…498c at002c = ╱31╱1╱ // 0x496b @0x2c
0x493f…498c at002d = ╱35╱5╱ // 0x496c @0x2d
0x493f…498c at002e = ╱fe0000f004╱ // 0x496d @0x2e
0x493f…498c at0033 = ╱da╱ AND ╱ // 0x4972 @0x33
0x493f…498c at0034 = ╱46╱F╱ // 0x4973 @0x34
0x493f…498c at0035 = ╱4a╱J╱ // 0x4974 @0x35
0x493f…498c at0036 = ╱50╱P╱ // 0x4975 @0x36
0x493f…498c at0037 = ╱4f╱O╱ // 0x4976 @0x37
0x493f…498c at0038 = ╱53╱S╱ // 0x4977 @0x38
0x493f…498c at0039 = ╱54╱T╱ // 0x4978 @0x39
0x493f…498c at003a = ╱e2╱+╱ // 0x4979 @0x3a
0x493f…498c at003b = ╱41╱A╱ // 0x497a @0x3b
0x493f…498c at003c = ╱46╱F╱ // 0x497b @0x3c
0x493f…498c at003d = ╱41╱A╱ // 0x497c @0x3d
0x493f…498c at003e = ╱4b╱K╱ // 0x497d @0x3e
0x493f…498c at003f = ╱54╱T╱ // 0x497e @0x3f
0x493f…498c at0040 = ╱e2╱+╱ // 0x497f @0x40
0x493f…498c at0041 = ╱41╱A╱ // 0x4980 @0x41
0x493f…498c at0042 = ╱4b╱K╱ // 0x4981 @0x42
0x493f…498c at0043 = ╱52╱R╱ // 0x4982 @0x43
0x493f…498c at0044 = ╱45╱E╱ // 0x4983 @0x44
0x493f…498c at0045 = ╱44╱D╱ // 0x4984 @0x45
0x493f…498c at0046 = ╱df╱<=╱ // 0x4985 @0x46
0x493f…498c at0047 = ╱4d╱M╱ // 0x4986 @0x47
0x493f…498c at0048 = ╱46╱F╱ // 0x4987 @0x48
0x493f…498c at0049 = ╱41╱A╱ // 0x4988 @0x49
0x493f…498c at004a = ╱4b╱K╱ // 0x4989 @0x4a
0x493f…498c at004b = ╱b6╱ THEN ╱ // 0x498a @0x4b
0x493f…498c at004c = EOL // 0x498b @0x4c
0x493f…498c }
0x498c…499a d6f1 7350 EXEC FAKHOVED
0x498c…499a LineComalBin {
0x498c…499a ptr = 0xd6f1 // 0x498c @0x0
0x498c…499a lno = 0x1cb6 // 0x498e @0x2
0x498c…499a at0004 = ╱9d╱ EXEC ╱ // 0x4990 @0x4
0x498c…499a at0005 = ╱46╱F╱ // 0x4991 @0x5
0x498c…499a at0006 = ╱41╱A╱ // 0x4992 @0x6
0x498c…499a at0007 = ╱4b╱K╱ // 0x4993 @0x7
0x498c…499a at0008 = ╱48╱H╱ // 0x4994 @0x8
0x498c…499a at0009 = ╱4f╱O╱ // 0x4995 @0x9
0x498c…499a at000a = ╱56╱V╱ // 0x4996 @0xa
0x498c…499a at000b = ╱45╱E╱ // 0x4997 @0xb
0x498c…499a at000c = ╱44╱D╱ // 0x4998 @0xc
0x498c…499a at000d = EOL // 0x4999 @0xd
0x498c…499a }
0x499a…49ac d703 7360 AVALIN=1
0x499a…49ac LineComalBin {
0x499a…49ac ptr = 0xd703 // 0x499a @0x0
0x499a…49ac lno = 0x1cc0 // 0x499c @0x2
0x499a…49ac at0004 = ╱41╱A╱ // 0x499e @0x4
0x499a…49ac at0005 = ╱56╱V╱ // 0x499f @0x5
0x499a…49ac at0006 = ╱41╱A╱ // 0x49a0 @0x6
0x499a…49ac at0007 = ╱4c╱L╱ // 0x49a1 @0x7
0x499a…49ac at0008 = ╱49╱I╱ // 0x49a2 @0x8
0x499a…49ac at0009 = ╱4e╱N╱ // 0x49a3 @0x9
0x499a…49ac at000a = ╱dc╱=╱ // 0x49a4 @0xa
0x499a…49ac at000b = ╱31╱1╱ // 0x49a5 @0xb
0x499a…49ac at000c = ╱fe00008001╱ // 0x49a6 @0xc
0x499a…49ac at0011 = EOL // 0x49ab @0x11
0x499a…49ac }
0x49ac…49b2 d709 7370 REPEAT
0x49ac…49b2 LineComalBin {
0x49ac…49b2 ptr = 0xd709 // 0x49ac @0x0
0x49ac…49b2 lno = 0x1cca // 0x49ae @0x2
0x49ac…49b2 at0004 = ╱97╱ REPEAT ╱ // 0x49b0 @0x4
0x49ac…49b2 at0005 = EOL // 0x49b1 @0x5
0x49ac…49b2 }
0x49b2…49f4 d74b 7380 ARRKODER(AVALIN,1)=0;ARRKODER(AVALIN,2)=0
0x49b2…49f4 LineComalBin {
0x49b2…49f4 ptr = 0xd74b // 0x49b2 @0x0
0x49b2…49f4 lno = 0x1cd4 // 0x49b4 @0x2
0x49b2…49f4 at0004 = ╱41╱A╱ // 0x49b6 @0x4
0x49b2…49f4 at0005 = ╱52╱R╱ // 0x49b7 @0x5
0x49b2…49f4 at0006 = ╱52╱R╱ // 0x49b8 @0x6
0x49b2…49f4 at0007 = ╱4b╱K╱ // 0x49b9 @0x7
0x49b2…49f4 at0008 = ╱4f╱O╱ // 0x49ba @0x8
0x49b2…49f4 at0009 = ╱44╱D╱ // 0x49bb @0x9
0x49b2…49f4 at000a = ╱45╱E╱ // 0x49bc @0xa
0x49b2…49f4 at000b = ╱52╱R╱ // 0x49bd @0xb
0x49b2…49f4 at000c = ╱ed╱(╱ // 0x49be @0xc
0x49b2…49f4 at000d = ╱41╱A╱ // 0x49bf @0xd
0x49b2…49f4 at000e = ╱56╱V╱ // 0x49c0 @0xe
0x49b2…49f4 at000f = ╱41╱A╱ // 0x49c1 @0xf
0x49b2…49f4 at0010 = ╱4c╱L╱ // 0x49c2 @0x10
0x49b2…49f4 at0011 = ╱49╱I╱ // 0x49c3 @0x11
0x49b2…49f4 at0012 = ╱4e╱N╱ // 0x49c4 @0x12
0x49b2…49f4 at0013 = ╱ec╱,╱ // 0x49c5 @0x13
0x49b2…49f4 at0014 = ╱31╱1╱ // 0x49c6 @0x14
0x49b2…49f4 at0015 = ╱fe00008001╱ // 0x49c7 @0x15
0x49b2…49f4 at001a = ╱ee╱)╱ // 0x49cc @0x1a
0x49b2…49f4 at001b = ╱dc╱=╱ // 0x49cd @0x1b
0x49b2…49f4 at001c = ╱30╱0╱ // 0x49ce @0x1c
0x49b2…49f4 at001d = ╱fe00000000╱ // 0x49cf @0x1d
0x49b2…49f4 at0022 = ╱eb╱;╱ // 0x49d4 @0x22
0x49b2…49f4 at0023 = ╱41╱A╱ // 0x49d5 @0x23
0x49b2…49f4 at0024 = ╱52╱R╱ // 0x49d6 @0x24
0x49b2…49f4 at0025 = ╱52╱R╱ // 0x49d7 @0x25
0x49b2…49f4 at0026 = ╱4b╱K╱ // 0x49d8 @0x26
0x49b2…49f4 at0027 = ╱4f╱O╱ // 0x49d9 @0x27
0x49b2…49f4 at0028 = ╱44╱D╱ // 0x49da @0x28
0x49b2…49f4 at0029 = ╱45╱E╱ // 0x49db @0x29
0x49b2…49f4 at002a = ╱52╱R╱ // 0x49dc @0x2a
0x49b2…49f4 at002b = ╱ed╱(╱ // 0x49dd @0x2b
0x49b2…49f4 at002c = ╱41╱A╱ // 0x49de @0x2c
0x49b2…49f4 at002d = ╱56╱V╱ // 0x49df @0x2d
0x49b2…49f4 at002e = ╱41╱A╱ // 0x49e0 @0x2e
0x49b2…49f4 at002f = ╱4c╱L╱ // 0x49e1 @0x2f
0x49b2…49f4 at0030 = ╱49╱I╱ // 0x49e2 @0x30
0x49b2…49f4 at0031 = ╱4e╱N╱ // 0x49e3 @0x31
0x49b2…49f4 at0032 = ╱ec╱,╱ // 0x49e4 @0x32
0x49b2…49f4 at0033 = ╱32╱2╱ // 0x49e5 @0x33
0x49b2…49f4 at0034 = ╱fe00008002╱ // 0x49e6 @0x34
0x49b2…49f4 at0039 = ╱ee╱)╱ // 0x49eb @0x39
0x49b2…49f4 at003a = ╱dc╱=╱ // 0x49ec @0x3a
0x49b2…49f4 at003b = ╱30╱0╱ // 0x49ed @0x3b
0x49b2…49f4 at003c = ╱fe00000000╱ // 0x49ee @0x3c
0x49b2…49f4 at0041 = EOL // 0x49f3 @0x41
0x49b2…49f4 }
0x49f4…4a02 d759 7390 EXEC VARELINI
0x49f4…4a02 LineComalBin {
0x49f4…4a02 ptr = 0xd759 // 0x49f4 @0x0
0x49f4…4a02 lno = 0x1cde // 0x49f6 @0x2
0x49f4…4a02 at0004 = ╱9d╱ EXEC ╱ // 0x49f8 @0x4
0x49f4…4a02 at0005 = ╱56╱V╱ // 0x49f9 @0x5
0x49f4…4a02 at0006 = ╱41╱A╱ // 0x49fa @0x6
0x49f4…4a02 at0007 = ╱52╱R╱ // 0x49fb @0x7
0x49f4…4a02 at0008 = ╱45╱E╱ // 0x49fc @0x8
0x49f4…4a02 at0009 = ╱4c╱L╱ // 0x49fd @0x9
0x49f4…4a02 at000a = ╱49╱I╱ // 0x49fe @0xa
0x49f4…4a02 at000b = ╱4e╱N╱ // 0x49ff @0xb
0x49f4…4a02 at000c = ╱49╱I╱ // 0x4a00 @0xc
0x49f4…4a02 at000d = EOL // 0x4a01 @0xd
0x49f4…4a02 }
0x4a02…4a17 d76e 7400 IF VARENR=0 THEN EXIT
0x4a02…4a17 LineComalBin {
0x4a02…4a17 ptr = 0xd76e // 0x4a02 @0x0
0x4a02…4a17 lno = 0x1ce8 // 0x4a04 @0x2
0x4a02…4a17 at0004 = ╱82╱ IF ╱ // 0x4a06 @0x4
0x4a02…4a17 at0005 = ╱56╱V╱ // 0x4a07 @0x5
0x4a02…4a17 at0006 = ╱41╱A╱ // 0x4a08 @0x6
0x4a02…4a17 at0007 = ╱52╱R╱ // 0x4a09 @0x7
0x4a02…4a17 at0008 = ╱45╱E╱ // 0x4a0a @0x8
0x4a02…4a17 at0009 = ╱4e╱N╱ // 0x4a0b @0x9
0x4a02…4a17 at000a = ╱52╱R╱ // 0x4a0c @0xa
0x4a02…4a17 at000b = ╱dc╱=╱ // 0x4a0d @0xb
0x4a02…4a17 at000c = ╱30╱0╱ // 0x4a0e @0xc
0x4a02…4a17 at000d = ╱fe00000000╱ // 0x4a0f @0xd
0x4a02…4a17 at0012 = ╱b6╱ THEN ╱ // 0x4a14 @0x12
0x4a02…4a17 at0013 = ╱99╱ EXIT ╱ // 0x4a15 @0x13
0x4a02…4a17 at0014 = EOL // 0x4a16 @0x14
0x4a02…4a17 }
0x4a17…4a43 d79a 7410 AVALIN=AVALIN+1;LINIE=LINIE+1
0x4a17…4a43 LineComalBin {
0x4a17…4a43 ptr = 0xd79a // 0x4a17 @0x0
0x4a17…4a43 lno = 0x1cf2 // 0x4a19 @0x2
0x4a17…4a43 at0004 = ╱41╱A╱ // 0x4a1b @0x4
0x4a17…4a43 at0005 = ╱56╱V╱ // 0x4a1c @0x5
0x4a17…4a43 at0006 = ╱41╱A╱ // 0x4a1d @0x6
0x4a17…4a43 at0007 = ╱4c╱L╱ // 0x4a1e @0x7
0x4a17…4a43 at0008 = ╱49╱I╱ // 0x4a1f @0x8
0x4a17…4a43 at0009 = ╱4e╱N╱ // 0x4a20 @0x9
0x4a17…4a43 at000a = ╱dc╱=╱ // 0x4a21 @0xa
0x4a17…4a43 at000b = ╱41╱A╱ // 0x4a22 @0xb
0x4a17…4a43 at000c = ╱56╱V╱ // 0x4a23 @0xc
0x4a17…4a43 at000d = ╱41╱A╱ // 0x4a24 @0xd
0x4a17…4a43 at000e = ╱4c╱L╱ // 0x4a25 @0xe
0x4a17…4a43 at000f = ╱49╱I╱ // 0x4a26 @0xf
0x4a17…4a43 at0010 = ╱4e╱N╱ // 0x4a27 @0x10
0x4a17…4a43 at0011 = ╱e2╱+╱ // 0x4a28 @0x11
0x4a17…4a43 at0012 = ╱31╱1╱ // 0x4a29 @0x12
0x4a17…4a43 at0013 = ╱fe00008001╱ // 0x4a2a @0x13
0x4a17…4a43 at0018 = ╱eb╱;╱ // 0x4a2f @0x18
0x4a17…4a43 at0019 = ╱4c╱L╱ // 0x4a30 @0x19
0x4a17…4a43 at001a = ╱49╱I╱ // 0x4a31 @0x1a
0x4a17…4a43 at001b = ╱4e╱N╱ // 0x4a32 @0x1b
0x4a17…4a43 at001c = ╱49╱I╱ // 0x4a33 @0x1c
0x4a17…4a43 at001d = ╱45╱E╱ // 0x4a34 @0x1d
0x4a17…4a43 at001e = ╱dc╱=╱ // 0x4a35 @0x1e
0x4a17…4a43 at001f = ╱4c╱L╱ // 0x4a36 @0x1f
0x4a17…4a43 at0020 = ╱49╱I╱ // 0x4a37 @0x20
0x4a17…4a43 at0021 = ╱4e╱N╱ // 0x4a38 @0x21
0x4a17…4a43 at0022 = ╱49╱I╱ // 0x4a39 @0x22
0x4a17…4a43 at0023 = ╱45╱E╱ // 0x4a3a @0x23
0x4a17…4a43 at0024 = ╱e2╱+╱ // 0x4a3b @0x24
0x4a17…4a43 at0025 = ╱31╱1╱ // 0x4a3c @0x25
0x4a17…4a43 at0026 = ╱fe00008001╱ // 0x4a3d @0x26
0x4a17…4a43 at002b = EOL // 0x4a42 @0x2b
0x4a17…4a43 }
0x4a43…4a51 d7a8 7420 EXEC LINITEST
0x4a43…4a51 LineComalBin {
0x4a43…4a51 ptr = 0xd7a8 // 0x4a43 @0x0
0x4a43…4a51 lno = 0x1cfc // 0x4a45 @0x2
0x4a43…4a51 at0004 = ╱9d╱ EXEC ╱ // 0x4a47 @0x4
0x4a43…4a51 at0005 = ╱4c╱L╱ // 0x4a48 @0x5
0x4a43…4a51 at0006 = ╱49╱I╱ // 0x4a49 @0x6
0x4a43…4a51 at0007 = ╱4e╱N╱ // 0x4a4a @0x7
0x4a43…4a51 at0008 = ╱49╱I╱ // 0x4a4b @0x8
0x4a43…4a51 at0009 = ╱54╱T╱ // 0x4a4c @0x9
0x4a43…4a51 at000a = ╱45╱E╱ // 0x4a4d @0xa
0x4a43…4a51 at000b = ╱53╱S╱ // 0x4a4e @0xb
0x4a43…4a51 at000c = ╱54╱T╱ // 0x4a4f @0xc
0x4a43…4a51 at000d = EOL // 0x4a50 @0xd
0x4a43…4a51 }
0x4a51…4a70 d7c7 7430 UNTIL VARENR=0 OR AVALIN>MFKL
0x4a51…4a70 LineComalBin {
0x4a51…4a70 ptr = 0xd7c7 // 0x4a51 @0x0
0x4a51…4a70 lno = 0x1d06 // 0x4a53 @0x2
0x4a51…4a70 at0004 = ╱98╱ UNTIL ╱ // 0x4a55 @0x4
0x4a51…4a70 at0005 = ╱56╱V╱ // 0x4a56 @0x5
0x4a51…4a70 at0006 = ╱41╱A╱ // 0x4a57 @0x6
0x4a51…4a70 at0007 = ╱52╱R╱ // 0x4a58 @0x7
0x4a51…4a70 at0008 = ╱45╱E╱ // 0x4a59 @0x8
0x4a51…4a70 at0009 = ╱4e╱N╱ // 0x4a5a @0x9
0x4a51…4a70 at000a = ╱52╱R╱ // 0x4a5b @0xa
0x4a51…4a70 at000b = ╱dc╱=╱ // 0x4a5c @0xb
0x4a51…4a70 at000c = ╱30╱0╱ // 0x4a5d @0xc
0x4a51…4a70 at000d = ╱fe00000000╱ // 0x4a5e @0xd
0x4a51…4a70 at0012 = ╱db╱ OR ╱ // 0x4a63 @0x12
0x4a51…4a70 at0013 = ╱41╱A╱ // 0x4a64 @0x13
0x4a51…4a70 at0014 = ╱56╱V╱ // 0x4a65 @0x14
0x4a51…4a70 at0015 = ╱41╱A╱ // 0x4a66 @0x15
0x4a51…4a70 at0016 = ╱4c╱L╱ // 0x4a67 @0x16
0x4a51…4a70 at0017 = ╱49╱I╱ // 0x4a68 @0x17
0x4a51…4a70 at0018 = ╱4e╱N╱ // 0x4a69 @0x18
0x4a51…4a70 at0019 = ╱de╱>╱ // 0x4a6a @0x19
0x4a51…4a70 at001a = ╱4d╱M╱ // 0x4a6b @0x1a
0x4a51…4a70 at001b = ╱46╱F╱ // 0x4a6c @0x1b
0x4a51…4a70 at001c = ╱4b╱K╱ // 0x4a6d @0x1c
0x4a51…4a70 at001d = ╱4c╱L╱ // 0x4a6e @0x1d
0x4a51…4a70 at001e = EOL // 0x4a6f @0x1e
0x4a51…4a70 }
0x4a70…4a89 d7e0 7440 AVALIN=AVALIN-1
0x4a70…4a89 LineComalBin {
0x4a70…4a89 ptr = 0xd7e0 // 0x4a70 @0x0
0x4a70…4a89 lno = 0x1d10 // 0x4a72 @0x2
0x4a70…4a89 at0004 = ╱41╱A╱ // 0x4a74 @0x4
0x4a70…4a89 at0005 = ╱56╱V╱ // 0x4a75 @0x5
0x4a70…4a89 at0006 = ╱41╱A╱ // 0x4a76 @0x6
0x4a70…4a89 at0007 = ╱4c╱L╱ // 0x4a77 @0x7
0x4a70…4a89 at0008 = ╱49╱I╱ // 0x4a78 @0x8
0x4a70…4a89 at0009 = ╱4e╱N╱ // 0x4a79 @0x9
0x4a70…4a89 at000a = ╱dc╱=╱ // 0x4a7a @0xa
0x4a70…4a89 at000b = ╱41╱A╱ // 0x4a7b @0xb
0x4a70…4a89 at000c = ╱56╱V╱ // 0x4a7c @0xc
0x4a70…4a89 at000d = ╱41╱A╱ // 0x4a7d @0xd
0x4a70…4a89 at000e = ╱4c╱L╱ // 0x4a7e @0xe
0x4a70…4a89 at000f = ╱49╱I╱ // 0x4a7f @0xf
0x4a70…4a89 at0010 = ╱4e╱N╱ // 0x4a80 @0x10
0x4a70…4a89 at0011 = ╱e3╱-╱ // 0x4a81 @0x11
0x4a70…4a89 at0012 = ╱31╱1╱ // 0x4a82 @0x12
0x4a70…4a89 at0013 = ╱fe00008001╱ // 0x4a83 @0x13
0x4a70…4a89 at0018 = EOL // 0x4a88 @0x18
0x4a70…4a89 }
0x4a89…4a9d d7f4 7450 IF AVALIN>0 THEN
0x4a89…4a9d LineComalBin {
0x4a89…4a9d ptr = 0xd7f4 // 0x4a89 @0x0
0x4a89…4a9d lno = 0x1d1a // 0x4a8b @0x2
0x4a89…4a9d at0004 = ╱9c╱ IF ╱ // 0x4a8d @0x4
0x4a89…4a9d at0005 = ╱41╱A╱ // 0x4a8e @0x5
0x4a89…4a9d at0006 = ╱56╱V╱ // 0x4a8f @0x6
0x4a89…4a9d at0007 = ╱41╱A╱ // 0x4a90 @0x7
0x4a89…4a9d at0008 = ╱4c╱L╱ // 0x4a91 @0x8
0x4a89…4a9d at0009 = ╱49╱I╱ // 0x4a92 @0x9
0x4a89…4a9d at000a = ╱4e╱N╱ // 0x4a93 @0xa
0x4a89…4a9d at000b = ╱de╱>╱ // 0x4a94 @0xb
0x4a89…4a9d at000c = ╱30╱0╱ // 0x4a95 @0xc
0x4a89…4a9d at000d = ╱fe00000000╱ // 0x4a96 @0xd
0x4a89…4a9d at0012 = ╱b6╱ THEN ╱ // 0x4a9b @0x12
0x4a89…4a9d at0013 = EOL // 0x4a9c @0x13
0x4a89…4a9d }
0x4a9d…4ab1 d808 7460 IF LINIE>16 THEN
0x4a9d…4ab1 LineComalBin {
0x4a9d…4ab1 ptr = 0xd808 // 0x4a9d @0x0
0x4a9d…4ab1 lno = 0x1d24 // 0x4a9f @0x2
0x4a9d…4ab1 at0004 = ╱9c╱ IF ╱ // 0x4aa1 @0x4
0x4a9d…4ab1 at0005 = ╱4c╱L╱ // 0x4aa2 @0x5
0x4a9d…4ab1 at0006 = ╱49╱I╱ // 0x4aa3 @0x6
0x4a9d…4ab1 at0007 = ╱4e╱N╱ // 0x4aa4 @0x7
0x4a9d…4ab1 at0008 = ╱49╱I╱ // 0x4aa5 @0x8
0x4a9d…4ab1 at0009 = ╱45╱E╱ // 0x4aa6 @0x9
0x4a9d…4ab1 at000a = ╱de╱>╱ // 0x4aa7 @0xa
0x4a9d…4ab1 at000b = ╱31╱1╱ // 0x4aa8 @0xb
0x4a9d…4ab1 at000c = ╱36╱6╱ // 0x4aa9 @0xc
0x4a9d…4ab1 at000d = ╱fe00008005╱ // 0x4aaa @0xd
0x4a9d…4ab1 at0012 = ╱b6╱ THEN ╱ // 0x4aaf @0x12
0x4a9d…4ab1 at0013 = EOL // 0x4ab0 @0x13
0x4a9d…4ab1 }
0x4ab1…4abf d816 7470 EXEC FAKHOVED
0x4ab1…4abf LineComalBin {
0x4ab1…4abf ptr = 0xd816 // 0x4ab1 @0x0
0x4ab1…4abf lno = 0x1d2e // 0x4ab3 @0x2
0x4ab1…4abf at0004 = ╱9d╱ EXEC ╱ // 0x4ab5 @0x4
0x4ab1…4abf at0005 = ╱46╱F╱ // 0x4ab6 @0x5
0x4ab1…4abf at0006 = ╱41╱A╱ // 0x4ab7 @0x6
0x4ab1…4abf at0007 = ╱4b╱K╱ // 0x4ab8 @0x7
0x4ab1…4abf at0008 = ╱48╱H╱ // 0x4ab9 @0x8
0x4ab1…4abf at0009 = ╱4f╱O╱ // 0x4aba @0x9
0x4ab1…4abf at000a = ╱56╱V╱ // 0x4abb @0xa
0x4ab1…4abf at000b = ╱45╱E╱ // 0x4abc @0xb
0x4ab1…4abf at000c = ╱44╱D╱ // 0x4abd @0xc
0x4ab1…4abf at000d = EOL // 0x4abe @0xd
0x4ab1…4abf }
0x4abf…4ad9 d830 7480 FOR LINIE=5 TO 16
0x4abf…4ad9 LineComalBin {
0x4abf…4ad9 ptr = 0xd830 // 0x4abf @0x0
0x4abf…4ad9 lno = 0x1d38 // 0x4ac1 @0x2
0x4abf…4ad9 at0004 = ╱83╱ FOR ╱ // 0x4ac3 @0x4
0x4abf…4ad9 at0005 = ╱4c╱L╱ // 0x4ac4 @0x5
0x4abf…4ad9 at0006 = ╱49╱I╱ // 0x4ac5 @0x6
0x4abf…4ad9 at0007 = ╱4e╱N╱ // 0x4ac6 @0x7
0x4abf…4ad9 at0008 = ╱49╱I╱ // 0x4ac7 @0x8
0x4abf…4ad9 at0009 = ╱45╱E╱ // 0x4ac8 @0x9
0x4abf…4ad9 at000a = ╱dc╱=╱ // 0x4ac9 @0xa
0x4abf…4ad9 at000b = ╱35╱5╱ // 0x4aca @0xb
0x4abf…4ad9 at000c = ╱fe0000a003╱ // 0x4acb @0xc
0x4abf…4ad9 at0011 = ╱b7╱ TO ╱ // 0x4ad0 @0x11
0x4abf…4ad9 at0012 = ╱31╱1╱ // 0x4ad1 @0x12
0x4abf…4ad9 at0013 = ╱36╱6╱ // 0x4ad2 @0x13
0x4abf…4ad9 at0014 = ╱fe00008005╱ // 0x4ad3 @0x14
0x4abf…4ad9 at0019 = EOL // 0x4ad8 @0x19
0x4abf…4ad9 }
0x4ad9…4af4 d84b 7490 J=AVALIN+LINIE-16
0x4ad9…4af4 LineComalBin {
0x4ad9…4af4 ptr = 0xd84b // 0x4ad9 @0x0
0x4ad9…4af4 lno = 0x1d42 // 0x4adb @0x2
0x4ad9…4af4 at0004 = ╱4a╱J╱ // 0x4add @0x4
0x4ad9…4af4 at0005 = ╱dc╱=╱ // 0x4ade @0x5
0x4ad9…4af4 at0006 = ╱41╱A╱ // 0x4adf @0x6
0x4ad9…4af4 at0007 = ╱56╱V╱ // 0x4ae0 @0x7
0x4ad9…4af4 at0008 = ╱41╱A╱ // 0x4ae1 @0x8
0x4ad9…4af4 at0009 = ╱4c╱L╱ // 0x4ae2 @0x9
0x4ad9…4af4 at000a = ╱49╱I╱ // 0x4ae3 @0xa
0x4ad9…4af4 at000b = ╱4e╱N╱ // 0x4ae4 @0xb
0x4ad9…4af4 at000c = ╱e2╱+╱ // 0x4ae5 @0xc
0x4ad9…4af4 at000d = ╱4c╱L╱ // 0x4ae6 @0xd
0x4ad9…4af4 at000e = ╱49╱I╱ // 0x4ae7 @0xe
0x4ad9…4af4 at000f = ╱4e╱N╱ // 0x4ae8 @0xf
0x4ad9…4af4 at0010 = ╱49╱I╱ // 0x4ae9 @0x10
0x4ad9…4af4 at0011 = ╱45╱E╱ // 0x4aea @0x11
0x4ad9…4af4 at0012 = ╱e3╱-╱ // 0x4aeb @0x12
0x4ad9…4af4 at0013 = ╱31╱1╱ // 0x4aec @0x13
0x4ad9…4af4 at0014 = ╱36╱6╱ // 0x4aed @0x14
0x4ad9…4af4 at0015 = ╱fe00008005╱ // 0x4aee @0x15
0x4ad9…4af4 at001a = EOL // 0x4af3 @0x1a
0x4ad9…4af4 }
0x4af4…4b05 d85c 7500 EXEC VARLINUD(J)
0x4af4…4b05 LineComalBin {
0x4af4…4b05 ptr = 0xd85c // 0x4af4 @0x0
0x4af4…4b05 lno = 0x1d4c // 0x4af6 @0x2
0x4af4…4b05 at0004 = ╱9d╱ EXEC ╱ // 0x4af8 @0x4
0x4af4…4b05 at0005 = ╱56╱V╱ // 0x4af9 @0x5
0x4af4…4b05 at0006 = ╱41╱A╱ // 0x4afa @0x6
0x4af4…4b05 at0007 = ╱52╱R╱ // 0x4afb @0x7
0x4af4…4b05 at0008 = ╱4c╱L╱ // 0x4afc @0x8
0x4af4…4b05 at0009 = ╱49╱I╱ // 0x4afd @0x9
0x4af4…4b05 at000a = ╱4e╱N╱ // 0x4afe @0xa
0x4af4…4b05 at000b = ╱55╱U╱ // 0x4aff @0xb
0x4af4…4b05 at000c = ╱44╱D╱ // 0x4b00 @0xc
0x4af4…4b05 at000d = ╱ed╱(╱ // 0x4b01 @0xd
0x4af4…4b05 at000e = ╱4a╱J╱ // 0x4b02 @0xe
0x4af4…4b05 at000f = ╱ee╱)╱ // 0x4b03 @0xf
0x4af4…4b05 at0010 = EOL // 0x4b04 @0x10
0x4af4…4b05 }
0x4b05…4b10 d867 7510 NEXT LINIE
0x4b05…4b10 LineComalBin {
0x4b05…4b10 ptr = 0xd867 // 0x4b05 @0x0
0x4b05…4b10 lno = 0x1d56 // 0x4b07 @0x2
0x4b05…4b10 at0004 = ╱84╱ NEXT ╱ // 0x4b09 @0x4
0x4b05…4b10 at0005 = ╱4c╱L╱ // 0x4b0a @0x5
0x4b05…4b10 at0006 = ╱49╱I╱ // 0x4b0b @0x6
0x4b05…4b10 at0007 = ╱4e╱N╱ // 0x4b0c @0x7
0x4b05…4b10 at0008 = ╱49╱I╱ // 0x4b0d @0x8
0x4b05…4b10 at0009 = ╱45╱E╱ // 0x4b0e @0x9
0x4b05…4b10 at000a = EOL // 0x4b0f @0xa
0x4b05…4b10 }
0x4b10…4b16 d86d 7520 ENDIF
0x4b10…4b16 LineComalBin {
0x4b10…4b16 ptr = 0xd86d // 0x4b10 @0x0
0x4b10…4b16 lno = 0x1d60 // 0x4b12 @0x2
0x4b10…4b16 at0004 = ╱9b╱ ENDIF ╱ // 0x4b14 @0x4
0x4b10…4b16 at0005 = EOL // 0x4b15 @0x5
0x4b10…4b16 }
0x4b16…4b1c d873 7530 REPEAT
0x4b16…4b1c LineComalBin {
0x4b16…4b1c ptr = 0xd873 // 0x4b16 @0x0
0x4b16…4b1c lno = 0x1d6a // 0x4b18 @0x2
0x4b16…4b1c at0004 = ╱97╱ REPEAT ╱ // 0x4b1a @0x4
0x4b16…4b1c at0005 = EOL // 0x4b1b @0x5
0x4b16…4b1c }
0x4b1c…4b30 d887 7540 CURSOR 2,19
0x4b1c…4b30 LineComalBin {
0x4b1c…4b30 ptr = 0xd887 // 0x4b1c @0x0
0x4b1c…4b30 lno = 0x1d74 // 0x4b1e @0x2
0x4b1c…4b30 at0004 = ╱a1╱ CURSOR ╱ // 0x4b20 @0x4
0x4b1c…4b30 at0005 = ╱32╱2╱ // 0x4b21 @0x5
0x4b1c…4b30 at0006 = ╱fe00008002╱ // 0x4b22 @0x6
0x4b1c…4b30 at000b = ╱ec╱,╱ // 0x4b27 @0xb
0x4b1c…4b30 at000c = ╱31╱1╱ // 0x4b28 @0xc
0x4b1c…4b30 at000d = ╱39╱9╱ // 0x4b29 @0xd
0x4b1c…4b30 at000e = ╱fe00009805╱ // 0x4b2a @0xe
0x4b1c…4b30 at0013 = EOL // 0x4b2f @0x13
0x4b1c…4b30 }
0x4b30…4b75 d8cc 7550 PRINT "1:Ændring. 2:Sletning. 3:Udskrift. 4:Ny linie. 5:Afslutning.";
0x4b30…4b75 LineComalBin {
0x4b30…4b75 ptr = 0xd8cc // 0x4b30 @0x0
0x4b30…4b75 lno = 0x1d7e // 0x4b32 @0x2
0x4b30…4b75 at0004 = ╱92╱ PRINT ╱ // 0x4b34 @0x4
0x4b30…4b75 at0005 = ╱22╱"╱ // 0x4b35 @0x5
0x4b30…4b75 at0006 = ╱31╱1╱ // 0x4b36 @0x6
0x4b30…4b75 at0007 = ╱3a╱:╱ // 0x4b37 @0x7
0x4b30…4b75 at0008 = ╱5b╱Æ╱ // 0x4b38 @0x8
0x4b30…4b75 at0009 = ╱6e╱n╱ // 0x4b39 @0x9
0x4b30…4b75 at000a = ╱64╱d╱ // 0x4b3a @0xa
0x4b30…4b75 at000b = ╱72╱r╱ // 0x4b3b @0xb
0x4b30…4b75 at000c = ╱69╱i╱ // 0x4b3c @0xc
0x4b30…4b75 at000d = ╱6e╱n╱ // 0x4b3d @0xd
0x4b30…4b75 at000e = ╱67╱g╱ // 0x4b3e @0xe
0x4b30…4b75 at000f = ╱2e╱.╱ // 0x4b3f @0xf
0x4b30…4b75 at0010 = ╱20╱…╱ // 0x4b40 @0x10
0x4b30…4b75 at0011 = ╱32╱2╱ // 0x4b41 @0x11
0x4b30…4b75 at0012 = ╱3a╱:╱ // 0x4b42 @0x12
0x4b30…4b75 at0013 = ╱53╱S╱ // 0x4b43 @0x13
0x4b30…4b75 at0014 = ╱6c╱l╱ // 0x4b44 @0x14
0x4b30…4b75 at0015 = ╱65╱e╱ // 0x4b45 @0x15
0x4b30…4b75 at0016 = ╱74╱t╱ // 0x4b46 @0x16
0x4b30…4b75 at0017 = ╱6e╱n╱ // 0x4b47 @0x17
0x4b30…4b75 at0018 = ╱69╱i╱ // 0x4b48 @0x18
0x4b30…4b75 at0019 = ╱6e╱n╱ // 0x4b49 @0x19
0x4b30…4b75 at001a = ╱67╱g╱ // 0x4b4a @0x1a
0x4b30…4b75 at001b = ╱2e╱.╱ // 0x4b4b @0x1b
0x4b30…4b75 at001c = ╱20╱…╱ // 0x4b4c @0x1c
0x4b30…4b75 at001d = ╱33╱3╱ // 0x4b4d @0x1d
0x4b30…4b75 at001e = ╱3a╱:╱ // 0x4b4e @0x1e
0x4b30…4b75 at001f = ╱55╱U╱ // 0x4b4f @0x1f
0x4b30…4b75 at0020 = ╱64╱d╱ // 0x4b50 @0x20
0x4b30…4b75 at0021 = ╱73╱s╱ // 0x4b51 @0x21
0x4b30…4b75 at0022 = ╱6b╱k╱ // 0x4b52 @0x22
0x4b30…4b75 at0023 = ╱72╱r╱ // 0x4b53 @0x23
0x4b30…4b75 at0024 = ╱69╱i╱ // 0x4b54 @0x24
0x4b30…4b75 at0025 = ╱66╱f╱ // 0x4b55 @0x25
0x4b30…4b75 at0026 = ╱74╱t╱ // 0x4b56 @0x26
0x4b30…4b75 at0027 = ╱2e╱.╱ // 0x4b57 @0x27
0x4b30…4b75 at0028 = ╱20╱…╱ // 0x4b58 @0x28
0x4b30…4b75 at0029 = ╱34╱4╱ // 0x4b59 @0x29
0x4b30…4b75 at002a = ╱3a╱:╱ // 0x4b5a @0x2a
0x4b30…4b75 at002b = ╱4e╱N╱ // 0x4b5b @0x2b
0x4b30…4b75 at002c = ╱79╱y╱ // 0x4b5c @0x2c
0x4b30…4b75 at002d = ╱20╱…╱ // 0x4b5d @0x2d
0x4b30…4b75 at002e = ╱6c╱l╱ // 0x4b5e @0x2e
0x4b30…4b75 at002f = ╱69╱i╱ // 0x4b5f @0x2f
0x4b30…4b75 at0030 = ╱6e╱n╱ // 0x4b60 @0x30
0x4b30…4b75 at0031 = ╱69╱i╱ // 0x4b61 @0x31
0x4b30…4b75 at0032 = ╱65╱e╱ // 0x4b62 @0x32
0x4b30…4b75 at0033 = ╱2e╱.╱ // 0x4b63 @0x33
0x4b30…4b75 at0034 = ╱20╱…╱ // 0x4b64 @0x34
0x4b30…4b75 at0035 = ╱35╱5╱ // 0x4b65 @0x35
0x4b30…4b75 at0036 = ╱3a╱:╱ // 0x4b66 @0x36
0x4b30…4b75 at0037 = ╱41╱A╱ // 0x4b67 @0x37
0x4b30…4b75 at0038 = ╱66╱f╱ // 0x4b68 @0x38
0x4b30…4b75 at0039 = ╱73╱s╱ // 0x4b69 @0x39
0x4b30…4b75 at003a = ╱6c╱l╱ // 0x4b6a @0x3a
0x4b30…4b75 at003b = ╱75╱u╱ // 0x4b6b @0x3b
0x4b30…4b75 at003c = ╱74╱t╱ // 0x4b6c @0x3c
0x4b30…4b75 at003d = ╱6e╱n╱ // 0x4b6d @0x3d
0x4b30…4b75 at003e = ╱69╱i╱ // 0x4b6e @0x3e
0x4b30…4b75 at003f = ╱6e╱n╱ // 0x4b6f @0x3f
0x4b30…4b75 at0040 = ╱67╱g╱ // 0x4b70 @0x40
0x4b30…4b75 at0041 = ╱2e╱.╱ // 0x4b71 @0x41
0x4b30…4b75 at0042 = ╱22╱"╱ // 0x4b72 @0x42
0x4b30…4b75 at0043 = ╱eb╱;╱ // 0x4b73 @0x43
0x4b30…4b75 at0044 = EOL // 0x4b74 @0x44
0x4b30…4b75 }
0x4b75…4b8a d8e1 7560 PRINT "6:Annulering."
0x4b75…4b8a LineComalBin {
0x4b75…4b8a ptr = 0xd8e1 // 0x4b75 @0x0
0x4b75…4b8a lno = 0x1d88 // 0x4b77 @0x2
0x4b75…4b8a at0004 = ╱92╱ PRINT ╱ // 0x4b79 @0x4
0x4b75…4b8a at0005 = ╱22╱"╱ // 0x4b7a @0x5
0x4b75…4b8a at0006 = ╱36╱6╱ // 0x4b7b @0x6
0x4b75…4b8a at0007 = ╱3a╱:╱ // 0x4b7c @0x7
0x4b75…4b8a at0008 = ╱41╱A╱ // 0x4b7d @0x8
0x4b75…4b8a at0009 = ╱6e╱n╱ // 0x4b7e @0x9
0x4b75…4b8a at000a = ╱6e╱n╱ // 0x4b7f @0xa
0x4b75…4b8a at000b = ╱75╱u╱ // 0x4b80 @0xb
0x4b75…4b8a at000c = ╱6c╱l╱ // 0x4b81 @0xc
0x4b75…4b8a at000d = ╱65╱e╱ // 0x4b82 @0xd
0x4b75…4b8a at000e = ╱72╱r╱ // 0x4b83 @0xe
0x4b75…4b8a at000f = ╱69╱i╱ // 0x4b84 @0xf
0x4b75…4b8a at0010 = ╱6e╱n╱ // 0x4b85 @0x10
0x4b75…4b8a at0011 = ╱67╱g╱ // 0x4b86 @0x11
0x4b75…4b8a at0012 = ╱2e╱.╱ // 0x4b87 @0x12
0x4b75…4b8a at0013 = ╱22╱"╱ // 0x4b88 @0x13
0x4b75…4b8a at0014 = EOL // 0x4b89 @0x14
0x4b75…4b8a }
0x4b8a…4bbb d912 7570 EXEC INDPUT1(4,21,0,7,LTX8$)
0x4b8a…4bbb LineComalBin {
0x4b8a…4bbb ptr = 0xd912 // 0x4b8a @0x0
0x4b8a…4bbb lno = 0x1d92 // 0x4b8c @0x2
0x4b8a…4bbb at0004 = ╱9d╱ EXEC ╱ // 0x4b8e @0x4
0x4b8a…4bbb at0005 = ╱49╱I╱ // 0x4b8f @0x5
0x4b8a…4bbb at0006 = ╱4e╱N╱ // 0x4b90 @0x6
0x4b8a…4bbb at0007 = ╱44╱D╱ // 0x4b91 @0x7
0x4b8a…4bbb at0008 = ╱50╱P╱ // 0x4b92 @0x8
0x4b8a…4bbb at0009 = ╱55╱U╱ // 0x4b93 @0x9
0x4b8a…4bbb at000a = ╱54╱T╱ // 0x4b94 @0xa
0x4b8a…4bbb at000b = ╱31╱1╱ // 0x4b95 @0xb
0x4b8a…4bbb at000c = ╱ed╱(╱ // 0x4b96 @0xc
0x4b8a…4bbb at000d = ╱34╱4╱ // 0x4b97 @0xd
0x4b8a…4bbb at000e = ╱fe00008003╱ // 0x4b98 @0xe
0x4b8a…4bbb at0013 = ╱ec╱,╱ // 0x4b9d @0x13
0x4b8a…4bbb at0014 = ╱32╱2╱ // 0x4b9e @0x14
0x4b8a…4bbb at0015 = ╱31╱1╱ // 0x4b9f @0x15
0x4b8a…4bbb at0016 = ╱fe0000a805╱ // 0x4ba0 @0x16
0x4b8a…4bbb at001b = ╱ec╱,╱ // 0x4ba5 @0x1b
0x4b8a…4bbb at001c = ╱30╱0╱ // 0x4ba6 @0x1c
0x4b8a…4bbb at001d = ╱fe00000000╱ // 0x4ba7 @0x1d
0x4b8a…4bbb at0022 = ╱ec╱,╱ // 0x4bac @0x22
0x4b8a…4bbb at0023 = ╱37╱7╱ // 0x4bad @0x23
0x4b8a…4bbb at0024 = ╱fe0000e003╱ // 0x4bae @0x24
0x4b8a…4bbb at0029 = ╱ec╱,╱ // 0x4bb3 @0x29
0x4b8a…4bbb at002a = ╱4c╱L╱ // 0x4bb4 @0x2a
0x4b8a…4bbb at002b = ╱54╱T╱ // 0x4bb5 @0x2b
0x4b8a…4bbb at002c = ╱58╱X╱ // 0x4bb6 @0x2c
0x4b8a…4bbb at002d = ╱38╱8╱ // 0x4bb7 @0x2d
0x4b8a…4bbb at002e = ╱ef╱$╱ // 0x4bb8 @0x2e
0x4b8a…4bbb at002f = ╱ee╱)╱ // 0x4bb9 @0x2f
0x4b8a…4bbb at0030 = EOL // 0x4bba @0x30
0x4b8a…4bbb }
0x4bbb…4bc9 d920 7580 SVAR1$=A$
0x4bbb…4bc9 LineComalBin {
0x4bbb…4bc9 ptr = 0xd920 // 0x4bbb @0x0
0x4bbb…4bc9 lno = 0x1d9c // 0x4bbd @0x2
0x4bbb…4bc9 at0004 = ╱53╱S╱ // 0x4bbf @0x4
0x4bbb…4bc9 at0005 = ╱56╱V╱ // 0x4bc0 @0x5
0x4bbb…4bc9 at0006 = ╱41╱A╱ // 0x4bc1 @0x6
0x4bbb…4bc9 at0007 = ╱52╱R╱ // 0x4bc2 @0x7
0x4bbb…4bc9 at0008 = ╱31╱1╱ // 0x4bc3 @0x8
0x4bbb…4bc9 at0009 = ╱ef╱$╱ // 0x4bc4 @0x9
0x4bbb…4bc9 at000a = ╱dc╱=╱ // 0x4bc5 @0xa
0x4bbb…4bc9 at000b = ╱41╱A╱ // 0x4bc6 @0xb
0x4bbb…4bc9 at000c = ╱ef╱$╱ // 0x4bc7 @0xc
0x4bbb…4bc9 at000d = EOL // 0x4bc8 @0xd
0x4bbb…4bc9 }
0x4bc9…4bd7 d92e 7590 CASE SVAR1$ OF
0x4bc9…4bd7 LineComalBin {
0x4bc9…4bd7 ptr = 0xd92e // 0x4bc9 @0x0
0x4bc9…4bd7 lno = 0x1da6 // 0x4bcb @0x2
0x4bc9…4bd7 at0004 = ╱a200╱ CASE ╱ // 0x4bcd @0x4
0x4bc9…4bd7 at0006 = ╱53╱S╱ // 0x4bcf @0x6
0x4bc9…4bd7 at0007 = ╱56╱V╱ // 0x4bd0 @0x7
0x4bc9…4bd7 at0008 = ╱41╱A╱ // 0x4bd1 @0x8
0x4bc9…4bd7 at0009 = ╱52╱R╱ // 0x4bd2 @0x9
0x4bc9…4bd7 at000a = ╱31╱1╱ // 0x4bd3 @0xa
0x4bc9…4bd7 at000b = ╱ef╱$╱ // 0x4bd4 @0xb
0x4bc9…4bd7 at000c = ╱ba╱ OF ╱ // 0x4bd5 @0xc
0x4bc9…4bd7 at000d = EOL // 0x4bd6 @0xd
0x4bc9…4bd7 }
0x4bd7…4be1 d938 7600 WHEN "1"
0x4bd7…4be1 LineComalBin {
0x4bd7…4be1 ptr = 0xd938 // 0x4bd7 @0x0
0x4bd7…4be1 lno = 0x1db0 // 0x4bd9 @0x2
0x4bd7…4be1 at0004 = ╱a300╱ WHEN ╱ // 0x4bdb @0x4
0x4bd7…4be1 at0006 = ╱22╱"╱ // 0x4bdd @0x6
0x4bd7…4be1 at0007 = ╱31╱1╱ // 0x4bde @0x7
0x4bd7…4be1 at0008 = ╱22╱"╱ // 0x4bdf @0x8
0x4bd7…4be1 at0009 = EOL // 0x4be0 @0x9
0x4bd7…4be1 }
0x4be1…4c19 d970 7610 EXEC INDPUT1(4,23,0,1+AVALIN,LTX9$)
0x4be1…4c19 LineComalBin {
0x4be1…4c19 ptr = 0xd970 // 0x4be1 @0x0
0x4be1…4c19 lno = 0x1dba // 0x4be3 @0x2
0x4be1…4c19 at0004 = ╱9d╱ EXEC ╱ // 0x4be5 @0x4
0x4be1…4c19 at0005 = ╱49╱I╱ // 0x4be6 @0x5
0x4be1…4c19 at0006 = ╱4e╱N╱ // 0x4be7 @0x6
0x4be1…4c19 at0007 = ╱44╱D╱ // 0x4be8 @0x7
0x4be1…4c19 at0008 = ╱50╱P╱ // 0x4be9 @0x8
0x4be1…4c19 at0009 = ╱55╱U╱ // 0x4bea @0x9
0x4be1…4c19 at000a = ╱54╱T╱ // 0x4beb @0xa
0x4be1…4c19 at000b = ╱31╱1╱ // 0x4bec @0xb
0x4be1…4c19 at000c = ╱ed╱(╱ // 0x4bed @0xc
0x4be1…4c19 at000d = ╱34╱4╱ // 0x4bee @0xd
0x4be1…4c19 at000e = ╱fe00008003╱ // 0x4bef @0xe
0x4be1…4c19 at0013 = ╱ec╱,╱ // 0x4bf4 @0x13
0x4be1…4c19 at0014 = ╱32╱2╱ // 0x4bf5 @0x14
0x4be1…4c19 at0015 = ╱33╱3╱ // 0x4bf6 @0x15
0x4be1…4c19 at0016 = ╱fe0000b805╱ // 0x4bf7 @0x16
0x4be1…4c19 at001b = ╱ec╱,╱ // 0x4bfc @0x1b
0x4be1…4c19 at001c = ╱30╱0╱ // 0x4bfd @0x1c
0x4be1…4c19 at001d = ╱fe00000000╱ // 0x4bfe @0x1d
0x4be1…4c19 at0022 = ╱ec╱,╱ // 0x4c03 @0x22
0x4be1…4c19 at0023 = ╱31╱1╱ // 0x4c04 @0x23
0x4be1…4c19 at0024 = ╱fe00008001╱ // 0x4c05 @0x24
0x4be1…4c19 at0029 = ╱e2╱+╱ // 0x4c0a @0x29
0x4be1…4c19 at002a = ╱41╱A╱ // 0x4c0b @0x2a
0x4be1…4c19 at002b = ╱56╱V╱ // 0x4c0c @0x2b
0x4be1…4c19 at002c = ╱41╱A╱ // 0x4c0d @0x2c
0x4be1…4c19 at002d = ╱4c╱L╱ // 0x4c0e @0x2d
0x4be1…4c19 at002e = ╱49╱I╱ // 0x4c0f @0x2e
0x4be1…4c19 at002f = ╱4e╱N╱ // 0x4c10 @0x2f
0x4be1…4c19 at0030 = ╱ec╱,╱ // 0x4c11 @0x30
0x4be1…4c19 at0031 = ╱4c╱L╱ // 0x4c12 @0x31
0x4be1…4c19 at0032 = ╱54╱T╱ // 0x4c13 @0x32
0x4be1…4c19 at0033 = ╱58╱X╱ // 0x4c14 @0x33
0x4be1…4c19 at0034 = ╱39╱9╱ // 0x4c15 @0x34
0x4be1…4c19 at0035 = ╱ef╱$╱ // 0x4c16 @0x35
0x4be1…4c19 at0036 = ╱ee╱)╱ // 0x4c17 @0x36
0x4be1…4c19 at0037 = EOL // 0x4c18 @0x37
0x4be1…4c19 }
0x4c19…4c21 (253,) d978 7620 J=P
0x4c19…4c21 LineComalBin {
0x4c19…4c21 ptr = 0xd978 // 0x4c19 @0x0
0x4c19…4c21 lno = 0x1dc4 // 0x4c1b @0x2
0x4c19…4c21 at0004 = ╱4a╱J╱ // 0x4c1d @0x4
0x4c19…4c21 at0005 = ╱dc╱=╱ // 0x4c1e @0x5
0x4c19…4c21 at0006 = ╱50╱P╱ // 0x4c1f @0x6
0x4c19…4c21 at0007 = EOL // 0x4c20 @0x7
0x4c19…4c21 }
0x4c21…4c35 d98c 7630 CURSOR 4,19
0x4c21…4c35 LineComalBin {
0x4c21…4c35 ptr = 0xd98c // 0x4c21 @0x0
0x4c21…4c35 lno = 0x1dce // 0x4c23 @0x2
0x4c21…4c35 at0004 = ╱a1╱ CURSOR ╱ // 0x4c25 @0x4
0x4c21…4c35 at0005 = ╱34╱4╱ // 0x4c26 @0x5
0x4c21…4c35 at0006 = ╱fe00008003╱ // 0x4c27 @0x6
0x4c21…4c35 at000b = ╱ec╱,╱ // 0x4c2c @0xb
0x4c21…4c35 at000c = ╱31╱1╱ // 0x4c2d @0xc
0x4c21…4c35 at000d = ╱39╱9╱ // 0x4c2e @0xd
0x4c21…4c35 at000e = ╱fe00009805╱ // 0x4c2f @0xe
0x4c21…4c35 at0013 = EOL // 0x4c34 @0x13
0x4c21…4c35 }
0x4c35…4c47 d99e 7640 LINIE=19
0x4c35…4c47 LineComalBin {
0x4c35…4c47 ptr = 0xd99e // 0x4c35 @0x0
0x4c35…4c47 lno = 0x1dd8 // 0x4c37 @0x2
0x4c35…4c47 at0004 = ╱4c╱L╱ // 0x4c39 @0x4
0x4c35…4c47 at0005 = ╱49╱I╱ // 0x4c3a @0x5
0x4c35…4c47 at0006 = ╱4e╱N╱ // 0x4c3b @0x6
0x4c35…4c47 at0007 = ╱49╱I╱ // 0x4c3c @0x7
0x4c35…4c47 at0008 = ╱45╱E╱ // 0x4c3d @0x8
0x4c35…4c47 at0009 = ╱dc╱=╱ // 0x4c3e @0x9
0x4c35…4c47 at000a = ╱31╱1╱ // 0x4c3f @0xa
0x4c35…4c47 at000b = ╱39╱9╱ // 0x4c40 @0xb
0x4c35…4c47 at000c = ╱fe00009805╱ // 0x4c41 @0xc
0x4c35…4c47 at0011 = EOL // 0x4c46 @0x11
0x4c35…4c47 }
0x4c47…4c51 d9a8 7650 EXEC SLET
0x4c47…4c51 LineComalBin {
0x4c47…4c51 ptr = 0xd9a8 // 0x4c47 @0x0
0x4c47…4c51 lno = 0x1de2 // 0x4c49 @0x2
0x4c47…4c51 at0004 = ╱9d╱ EXEC ╱ // 0x4c4b @0x4
0x4c47…4c51 at0005 = ╱53╱S╱ // 0x4c4c @0x5
0x4c47…4c51 at0006 = ╱4c╱L╱ // 0x4c4d @0x6
0x4c47…4c51 at0007 = ╱45╱E╱ // 0x4c4e @0x7
0x4c47…4c51 at0008 = ╱54╱T╱ // 0x4c4f @0x8
0x4c47…4c51 at0009 = EOL // 0x4c50 @0x9
0x4c47…4c51 }
0x4c51…4c62 d9b9 7660 EXEC VARLINUD(J)
0x4c51…4c62 LineComalBin {
0x4c51…4c62 ptr = 0xd9b9 // 0x4c51 @0x0
0x4c51…4c62 lno = 0x1dec // 0x4c53 @0x2
0x4c51…4c62 at0004 = ╱9d╱ EXEC ╱ // 0x4c55 @0x4
0x4c51…4c62 at0005 = ╱56╱V╱ // 0x4c56 @0x5
0x4c51…4c62 at0006 = ╱41╱A╱ // 0x4c57 @0x6
0x4c51…4c62 at0007 = ╱52╱R╱ // 0x4c58 @0x7
0x4c51…4c62 at0008 = ╱4c╱L╱ // 0x4c59 @0x8
0x4c51…4c62 at0009 = ╱49╱I╱ // 0x4c5a @0x9
0x4c51…4c62 at000a = ╱4e╱N╱ // 0x4c5b @0xa
0x4c51…4c62 at000b = ╱55╱U╱ // 0x4c5c @0xb
0x4c51…4c62 at000c = ╱44╱D╱ // 0x4c5d @0xc
0x4c51…4c62 at000d = ╱ed╱(╱ // 0x4c5e @0xd
0x4c51…4c62 at000e = ╱4a╱J╱ // 0x4c5f @0xe
0x4c51…4c62 at000f = ╱ee╱)╱ // 0x4c60 @0xf
0x4c51…4c62 at0010 = EOL // 0x4c61 @0x10
0x4c51…4c62 }
0x4c62…4c74 d9cb 7670 CASE VANRARR(J) OF
0x4c62…4c74 LineComalBin {
0x4c62…4c74 ptr = 0xd9cb // 0x4c62 @0x0
0x4c62…4c74 lno = 0x1df6 // 0x4c64 @0x2
0x4c62…4c74 at0004 = ╱a201╱ CASE ╱ // 0x4c66 @0x4
0x4c62…4c74 at0006 = ╱56╱V╱ // 0x4c68 @0x6
0x4c62…4c74 at0007 = ╱41╱A╱ // 0x4c69 @0x7
0x4c62…4c74 at0008 = ╱4e╱N╱ // 0x4c6a @0x8
0x4c62…4c74 at0009 = ╱52╱R╱ // 0x4c6b @0x9
0x4c62…4c74 at000a = ╱41╱A╱ // 0x4c6c @0xa
0x4c62…4c74 at000b = ╱52╱R╱ // 0x4c6d @0xb
0x4c62…4c74 at000c = ╱52╱R╱ // 0x4c6e @0xc
0x4c62…4c74 at000d = ╱ed╱(╱ // 0x4c6f @0xd
0x4c62…4c74 at000e = ╱4a╱J╱ // 0x4c70 @0xe
0x4c62…4c74 at000f = ╱ee╱)╱ // 0x4c71 @0xf
0x4c62…4c74 at0010 = ╱ba╱ OF ╱ // 0x4c72 @0x10
0x4c62…4c74 at0011 = EOL // 0x4c73 @0x11
0x4c62…4c74 }
0x4c74…4ca8 d9ff 7680 EXEC INDPUT2(17,21,BLANK$(1),ANTAL$)
0x4c74…4ca8 LineComalBin {
0x4c74…4ca8 ptr = 0xd9ff // 0x4c74 @0x0
0x4c74…4ca8 lno = 0x1e00 // 0x4c76 @0x2
0x4c74…4ca8 at0004 = ╱9d╱ EXEC ╱ // 0x4c78 @0x4
0x4c74…4ca8 at0005 = ╱49╱I╱ // 0x4c79 @0x5
0x4c74…4ca8 at0006 = ╱4e╱N╱ // 0x4c7a @0x6
0x4c74…4ca8 at0007 = ╱44╱D╱ // 0x4c7b @0x7
0x4c74…4ca8 at0008 = ╱50╱P╱ // 0x4c7c @0x8
0x4c74…4ca8 at0009 = ╱55╱U╱ // 0x4c7d @0x9
0x4c74…4ca8 at000a = ╱54╱T╱ // 0x4c7e @0xa
0x4c74…4ca8 at000b = ╱32╱2╱ // 0x4c7f @0xb
0x4c74…4ca8 at000c = ╱ed╱(╱ // 0x4c80 @0xc
0x4c74…4ca8 at000d = ╱31╱1╱ // 0x4c81 @0xd
0x4c74…4ca8 at000e = ╱37╱7╱ // 0x4c82 @0xe
0x4c74…4ca8 at000f = ╱fe00008805╱ // 0x4c83 @0xf
0x4c74…4ca8 at0014 = ╱ec╱,╱ // 0x4c88 @0x14
0x4c74…4ca8 at0015 = ╱32╱2╱ // 0x4c89 @0x15
0x4c74…4ca8 at0016 = ╱31╱1╱ // 0x4c8a @0x16
0x4c74…4ca8 at0017 = ╱fe0000a805╱ // 0x4c8b @0x17
0x4c74…4ca8 at001c = ╱ec╱,╱ // 0x4c90 @0x1c
0x4c74…4ca8 at001d = ╱42╱B╱ // 0x4c91 @0x1d
0x4c74…4ca8 at001e = ╱4c╱L╱ // 0x4c92 @0x1e
0x4c74…4ca8 at001f = ╱41╱A╱ // 0x4c93 @0x1f
0x4c74…4ca8 at0020 = ╱4e╱N╱ // 0x4c94 @0x20
0x4c74…4ca8 at0021 = ╱4b╱K╱ // 0x4c95 @0x21
0x4c74…4ca8 at0022 = ╱ef╱$╱ // 0x4c96 @0x22
0x4c74…4ca8 at0023 = ╱ed╱(╱ // 0x4c97 @0x23
0x4c74…4ca8 at0024 = ╱31╱1╱ // 0x4c98 @0x24
0x4c74…4ca8 at0025 = ╱fe00008001╱ // 0x4c99 @0x25
0x4c74…4ca8 at002a = ╱ee╱)╱ // 0x4c9e @0x2a
0x4c74…4ca8 at002b = ╱ec╱,╱ // 0x4c9f @0x2b
0x4c74…4ca8 at002c = ╱41╱A╱ // 0x4ca0 @0x2c
0x4c74…4ca8 at002d = ╱4e╱N╱ // 0x4ca1 @0x2d
0x4c74…4ca8 at002e = ╱54╱T╱ // 0x4ca2 @0x2e
0x4c74…4ca8 at002f = ╱41╱A╱ // 0x4ca3 @0x2f
0x4c74…4ca8 at0030 = ╱4c╱L╱ // 0x4ca4 @0x30
0x4c74…4ca8 at0031 = ╱ef╱$╱ // 0x4ca5 @0x31
0x4c74…4ca8 at0032 = ╱ee╱)╱ // 0x4ca6 @0x32
0x4c74…4ca8 at0033 = EOL // 0x4ca7 @0x33
0x4c74…4ca8 }
0x4ca8…4cbd da14 7690 CURSOR 17,21
0x4ca8…4cbd LineComalBin {
0x4ca8…4cbd ptr = 0xda14 // 0x4ca8 @0x0
0x4ca8…4cbd lno = 0x1e0a // 0x4caa @0x2
0x4ca8…4cbd at0004 = ╱a1╱ CURSOR ╱ // 0x4cac @0x4
0x4ca8…4cbd at0005 = ╱31╱1╱ // 0x4cad @0x5
0x4ca8…4cbd at0006 = ╱37╱7╱ // 0x4cae @0x6
0x4ca8…4cbd at0007 = ╱fe00008805╱ // 0x4caf @0x7
0x4ca8…4cbd at000c = ╱ec╱,╱ // 0x4cb4 @0xc
0x4ca8…4cbd at000d = ╱32╱2╱ // 0x4cb5 @0xd
0x4ca8…4cbd at000e = ╱31╱1╱ // 0x4cb6 @0xe
0x4ca8…4cbd at000f = ╱fe0000a805╱ // 0x4cb7 @0xf
0x4ca8…4cbd at0014 = EOL // 0x4cbc @0x14
0x4ca8…4cbd }
0x4cbd…4cc6 da1d 7700 EXEC ANT
0x4cbd…4cc6 LineComalBin {
0x4cbd…4cc6 ptr = 0xda1d // 0x4cbd @0x0
0x4cbd…4cc6 lno = 0x1e14 // 0x4cbf @0x2
0x4cbd…4cc6 at0004 = ╱9d╱ EXEC ╱ // 0x4cc1 @0x4
0x4cbd…4cc6 at0005 = ╱41╱A╱ // 0x4cc2 @0x5
0x4cbd…4cc6 at0006 = ╱4e╱N╱ // 0x4cc3 @0x6
0x4cbd…4cc6 at0007 = ╱54╱T╱ // 0x4cc4 @0x7
0x4cbd…4cc6 at0008 = EOL // 0x4cc5 @0x8
0x4cbd…4cc6 }
0x4cc6…4cdb da32 7710 CURSOR 24,21
0x4cc6…4cdb LineComalBin {
0x4cc6…4cdb ptr = 0xda32 // 0x4cc6 @0x0
0x4cc6…4cdb lno = 0x1e1e // 0x4cc8 @0x2
0x4cc6…4cdb at0004 = ╱a1╱ CURSOR ╱ // 0x4cca @0x4
0x4cc6…4cdb at0005 = ╱32╱2╱ // 0x4ccb @0x5
0x4cc6…4cdb at0006 = ╱34╱4╱ // 0x4ccc @0x6
0x4cc6…4cdb at0007 = ╱fe0000c005╱ // 0x4ccd @0x7
0x4cc6…4cdb at000c = ╱ec╱,╱ // 0x4cd2 @0xc
0x4cc6…4cdb at000d = ╱32╱2╱ // 0x4cd3 @0xd
0x4cc6…4cdb at000e = ╱31╱1╱ // 0x4cd4 @0xe
0x4cc6…4cdb at000f = ╱fe0000a805╱ // 0x4cd5 @0xf
0x4cc6…4cdb at0014 = EOL // 0x4cda @0x14
0x4cc6…4cdb }
0x4cdb…4ced da44 7720 PRINT VATEKARR$(J)
0x4cdb…4ced LineComalBin {
0x4cdb…4ced ptr = 0xda44 // 0x4cdb @0x0
0x4cdb…4ced lno = 0x1e28 // 0x4cdd @0x2
0x4cdb…4ced at0004 = ╱92╱ PRINT ╱ // 0x4cdf @0x4
0x4cdb…4ced at0005 = ╱56╱V╱ // 0x4ce0 @0x5
0x4cdb…4ced at0006 = ╱41╱A╱ // 0x4ce1 @0x6
0x4cdb…4ced at0007 = ╱54╱T╱ // 0x4ce2 @0x7
0x4cdb…4ced at0008 = ╱45╱E╱ // 0x4ce3 @0x8
0x4cdb…4ced at0009 = ╱4b╱K╱ // 0x4ce4 @0x9
0x4cdb…4ced at000a = ╱41╱A╱ // 0x4ce5 @0xa
0x4cdb…4ced at000b = ╱52╱R╱ // 0x4ce6 @0xb
0x4cdb…4ced at000c = ╱52╱R╱ // 0x4ce7 @0xc
0x4cdb…4ced at000d = ╱ef╱$╱ // 0x4ce8 @0xd
0x4cdb…4ced at000e = ╱ed╱(╱ // 0x4ce9 @0xe
0x4cdb…4ced at000f = ╱4a╱J╱ // 0x4cea @0xf
0x4cdb…4ced at0010 = ╱ee╱)╱ // 0x4ceb @0x10
0x4cdb…4ced at0011 = EOL // 0x4cec @0x11
0x4cdb…4ced }
0x4ced…4d02 da59 7730 CURSOR 51,21
0x4ced…4d02 LineComalBin {
0x4ced…4d02 ptr = 0xda59 // 0x4ced @0x0
0x4ced…4d02 lno = 0x1e32 // 0x4cef @0x2
0x4ced…4d02 at0004 = ╱a1╱ CURSOR ╱ // 0x4cf1 @0x4
0x4ced…4d02 at0005 = ╱35╱5╱ // 0x4cf2 @0x5
0x4ced…4d02 at0006 = ╱31╱1╱ // 0x4cf3 @0x6
0x4ced…4d02 at0007 = ╱fe0000cc06╱ // 0x4cf4 @0x7
0x4ced…4d02 at000c = ╱ec╱,╱ // 0x4cf9 @0xc
0x4ced…4d02 at000d = ╱32╱2╱ // 0x4cfa @0xd
0x4ced…4d02 at000e = ╱31╱1╱ // 0x4cfb @0xe
0x4ced…4d02 at000f = ╱fe0000a805╱ // 0x4cfc @0xf
0x4ced…4d02 at0014 = EOL // 0x4d01 @0x14
0x4ced…4d02 }
0x4d02…4d1c da73 7740 VARPRIS$=VAPRIARR$(J)
0x4d02…4d1c LineComalBin {
0x4d02…4d1c ptr = 0xda73 // 0x4d02 @0x0
0x4d02…4d1c lno = 0x1e3c // 0x4d04 @0x2
0x4d02…4d1c at0004 = ╱56╱V╱ // 0x4d06 @0x4
0x4d02…4d1c at0005 = ╱41╱A╱ // 0x4d07 @0x5
0x4d02…4d1c at0006 = ╱52╱R╱ // 0x4d08 @0x6
0x4d02…4d1c at0007 = ╱50╱P╱ // 0x4d09 @0x7
0x4d02…4d1c at0008 = ╱52╱R╱ // 0x4d0a @0x8
0x4d02…4d1c at0009 = ╱49╱I╱ // 0x4d0b @0x9
0x4d02…4d1c at000a = ╱53╱S╱ // 0x4d0c @0xa
0x4d02…4d1c at000b = ╱ef╱$╱ // 0x4d0d @0xb
0x4d02…4d1c at000c = ╱dc╱=╱ // 0x4d0e @0xc
0x4d02…4d1c at000d = ╱56╱V╱ // 0x4d0f @0xd
0x4d02…4d1c at000e = ╱41╱A╱ // 0x4d10 @0xe
0x4d02…4d1c at000f = ╱50╱P╱ // 0x4d11 @0xf
0x4d02…4d1c at0010 = ╱52╱R╱ // 0x4d12 @0x10
0x4d02…4d1c at0011 = ╱49╱I╱ // 0x4d13 @0x11
0x4d02…4d1c at0012 = ╱41╱A╱ // 0x4d14 @0x12
0x4d02…4d1c at0013 = ╱52╱R╱ // 0x4d15 @0x13
0x4d02…4d1c at0014 = ╱52╱R╱ // 0x4d16 @0x14
0x4d02…4d1c at0015 = ╱ef╱$╱ // 0x4d17 @0x15
0x4d02…4d1c at0016 = ╱ed╱(╱ // 0x4d18 @0x16
0x4d02…4d1c at0017 = ╱4a╱J╱ // 0x4d19 @0x17
0x4d02…4d1c at0018 = ╱ee╱)╱ // 0x4d1a @0x18
0x4d02…4d1c at0019 = EOL // 0x4d1b @0x19
0x4d02…4d1c }
0x4d1c…4d43 da9a 7750 EXEC TUD(VARPRIS$,TAL4$,1,0)
0x4d1c…4d43 LineComalBin {
0x4d1c…4d43 ptr = 0xda9a // 0x4d1c @0x0
0x4d1c…4d43 lno = 0x1e46 // 0x4d1e @0x2
0x4d1c…4d43 at0004 = ╱9d╱ EXEC ╱ // 0x4d20 @0x4
0x4d1c…4d43 at0005 = ╱54╱T╱ // 0x4d21 @0x5
0x4d1c…4d43 at0006 = ╱55╱U╱ // 0x4d22 @0x6
0x4d1c…4d43 at0007 = ╱44╱D╱ // 0x4d23 @0x7
0x4d1c…4d43 at0008 = ╱ed╱(╱ // 0x4d24 @0x8
0x4d1c…4d43 at0009 = ╱56╱V╱ // 0x4d25 @0x9
0x4d1c…4d43 at000a = ╱41╱A╱ // 0x4d26 @0xa
0x4d1c…4d43 at000b = ╱52╱R╱ // 0x4d27 @0xb
0x4d1c…4d43 at000c = ╱50╱P╱ // 0x4d28 @0xc
0x4d1c…4d43 at000d = ╱52╱R╱ // 0x4d29 @0xd
0x4d1c…4d43 at000e = ╱49╱I╱ // 0x4d2a @0xe
0x4d1c…4d43 at000f = ╱53╱S╱ // 0x4d2b @0xf
0x4d1c…4d43 at0010 = ╱ef╱$╱ // 0x4d2c @0x10
0x4d1c…4d43 at0011 = ╱ec╱,╱ // 0x4d2d @0x11
0x4d1c…4d43 at0012 = ╱54╱T╱ // 0x4d2e @0x12
0x4d1c…4d43 at0013 = ╱41╱A╱ // 0x4d2f @0x13
0x4d1c…4d43 at0014 = ╱4c╱L╱ // 0x4d30 @0x14
0x4d1c…4d43 at0015 = ╱34╱4╱ // 0x4d31 @0x15
0x4d1c…4d43 at0016 = ╱ef╱$╱ // 0x4d32 @0x16
0x4d1c…4d43 at0017 = ╱ec╱,╱ // 0x4d33 @0x17
0x4d1c…4d43 at0018 = ╱31╱1╱ // 0x4d34 @0x18
0x4d1c…4d43 at0019 = ╱fe00008001╱ // 0x4d35 @0x19
0x4d1c…4d43 at001e = ╱ec╱,╱ // 0x4d3a @0x1e
0x4d1c…4d43 at001f = ╱30╱0╱ // 0x4d3b @0x1f
0x4d1c…4d43 at0020 = ╱fe00000000╱ // 0x4d3c @0x20
0x4d1c…4d43 at0025 = ╱ee╱)╱ // 0x4d41 @0x25
0x4d1c…4d43 at0026 = EOL // 0x4d42 @0x26
0x4d1c…4d43 }
0x4d43…4d6a dac1 7760 EXEC CA(2,VARPRIS$,ANTAL$,BELØB$)
0x4d43…4d6a LineComalBin {
0x4d43…4d6a ptr = 0xdac1 // 0x4d43 @0x0
0x4d43…4d6a lno = 0x1e50 // 0x4d45 @0x2
0x4d43…4d6a at0004 = ╱9d╱ EXEC ╱ // 0x4d47 @0x4
0x4d43…4d6a at0005 = ╱43╱C╱ // 0x4d48 @0x5
0x4d43…4d6a at0006 = ╱41╱A╱ // 0x4d49 @0x6
0x4d43…4d6a at0007 = ╱ed╱(╱ // 0x4d4a @0x7
0x4d43…4d6a at0008 = ╱32╱2╱ // 0x4d4b @0x8
0x4d43…4d6a at0009 = ╱fe00008002╱ // 0x4d4c @0x9
0x4d43…4d6a at000e = ╱ec╱,╱ // 0x4d51 @0xe
0x4d43…4d6a at000f = ╱56╱V╱ // 0x4d52 @0xf
0x4d43…4d6a at0010 = ╱41╱A╱ // 0x4d53 @0x10
0x4d43…4d6a at0011 = ╱52╱R╱ // 0x4d54 @0x11
0x4d43…4d6a at0012 = ╱50╱P╱ // 0x4d55 @0x12
0x4d43…4d6a at0013 = ╱52╱R╱ // 0x4d56 @0x13
0x4d43…4d6a at0014 = ╱49╱I╱ // 0x4d57 @0x14
0x4d43…4d6a at0015 = ╱53╱S╱ // 0x4d58 @0x15
0x4d43…4d6a at0016 = ╱ef╱$╱ // 0x4d59 @0x16
0x4d43…4d6a at0017 = ╱ec╱,╱ // 0x4d5a @0x17
0x4d43…4d6a at0018 = ╱41╱A╱ // 0x4d5b @0x18
0x4d43…4d6a at0019 = ╱4e╱N╱ // 0x4d5c @0x19
0x4d43…4d6a at001a = ╱54╱T╱ // 0x4d5d @0x1a
0x4d43…4d6a at001b = ╱41╱A╱ // 0x4d5e @0x1b
0x4d43…4d6a at001c = ╱4c╱L╱ // 0x4d5f @0x1c
0x4d43…4d6a at001d = ╱ef╱$╱ // 0x4d60 @0x1d
0x4d43…4d6a at001e = ╱ec╱,╱ // 0x4d61 @0x1e
0x4d43…4d6a at001f = ╱42╱B╱ // 0x4d62 @0x1f
0x4d43…4d6a at0020 = ╱45╱E╱ // 0x4d63 @0x20
0x4d43…4d6a at0021 = ╱4c╱L╱ // 0x4d64 @0x21
0x4d43…4d6a at0022 = ╱5c╱Ø╱ // 0x4d65 @0x22
0x4d43…4d6a at0023 = ╱42╱B╱ // 0x4d66 @0x23
0x4d43…4d6a at0024 = ╱ef╱$╱ // 0x4d67 @0x24
0x4d43…4d6a at0025 = ╱ee╱)╱ // 0x4d68 @0x25
0x4d43…4d6a at0026 = EOL // 0x4d69 @0x26
0x4d43…4d6a }
0x4d6a…4d7f dad6 7770 CURSOR 66,21
0x4d6a…4d7f LineComalBin {
0x4d6a…4d7f ptr = 0xdad6 // 0x4d6a @0x0
0x4d6a…4d7f lno = 0x1e5a // 0x4d6c @0x2
0x4d6a…4d7f at0004 = ╱a1╱ CURSOR ╱ // 0x4d6e @0x4
0x4d6a…4d7f at0005 = ╱36╱6╱ // 0x4d6f @0x5
0x4d6a…4d7f at0006 = ╱36╱6╱ // 0x4d70 @0x6
0x4d6a…4d7f at0007 = ╱fe00008407╱ // 0x4d71 @0x7
0x4d6a…4d7f at000c = ╱ec╱,╱ // 0x4d76 @0xc
0x4d6a…4d7f at000d = ╱32╱2╱ // 0x4d77 @0xd
0x4d6a…4d7f at000e = ╱31╱1╱ // 0x4d78 @0xe
0x4d6a…4d7f at000f = ╱fe0000a805╱ // 0x4d79 @0xf
0x4d6a…4d7f at0014 = EOL // 0x4d7e @0x14
0x4d6a…4d7f }
0x4d7f…4da4 dafb 7780 EXEC TUD(BELØB$,TAL4$,1,0)
0x4d7f…4da4 LineComalBin {
0x4d7f…4da4 ptr = 0xdafb // 0x4d7f @0x0
0x4d7f…4da4 lno = 0x1e64 // 0x4d81 @0x2
0x4d7f…4da4 at0004 = ╱9d╱ EXEC ╱ // 0x4d83 @0x4
0x4d7f…4da4 at0005 = ╱54╱T╱ // 0x4d84 @0x5
0x4d7f…4da4 at0006 = ╱55╱U╱ // 0x4d85 @0x6
0x4d7f…4da4 at0007 = ╱44╱D╱ // 0x4d86 @0x7
0x4d7f…4da4 at0008 = ╱ed╱(╱ // 0x4d87 @0x8
0x4d7f…4da4 at0009 = ╱42╱B╱ // 0x4d88 @0x9
0x4d7f…4da4 at000a = ╱45╱E╱ // 0x4d89 @0xa
0x4d7f…4da4 at000b = ╱4c╱L╱ // 0x4d8a @0xb
0x4d7f…4da4 at000c = ╱5c╱Ø╱ // 0x4d8b @0xc
0x4d7f…4da4 at000d = ╱42╱B╱ // 0x4d8c @0xd
0x4d7f…4da4 at000e = ╱ef╱$╱ // 0x4d8d @0xe
0x4d7f…4da4 at000f = ╱ec╱,╱ // 0x4d8e @0xf
0x4d7f…4da4 at0010 = ╱54╱T╱ // 0x4d8f @0x10
0x4d7f…4da4 at0011 = ╱41╱A╱ // 0x4d90 @0x11
0x4d7f…4da4 at0012 = ╱4c╱L╱ // 0x4d91 @0x12
0x4d7f…4da4 at0013 = ╱34╱4╱ // 0x4d92 @0x13
0x4d7f…4da4 at0014 = ╱ef╱$╱ // 0x4d93 @0x14
0x4d7f…4da4 at0015 = ╱ec╱,╱ // 0x4d94 @0x15
0x4d7f…4da4 at0016 = ╱31╱1╱ // 0x4d95 @0x16
0x4d7f…4da4 at0017 = ╱fe00008001╱ // 0x4d96 @0x17
0x4d7f…4da4 at001c = ╱ec╱,╱ // 0x4d9b @0x1c
0x4d7f…4da4 at001d = ╱30╱0╱ // 0x4d9c @0x1d
0x4d7f…4da4 at001e = ╱fe00000000╱ // 0x4d9d @0x1e
0x4d7f…4da4 at0023 = ╱ee╱)╱ // 0x4da2 @0x23
0x4d7f…4da4 at0024 = EOL // 0x4da3 @0x24
0x4d7f…4da4 }
0x4da4…4dbe db15 7790 IF BELØB$<>BELØBARR$(J) THEN
0x4da4…4dbe LineComalBin {
0x4da4…4dbe ptr = 0xdb15 // 0x4da4 @0x0
0x4da4…4dbe lno = 0x1e6e // 0x4da6 @0x2
0x4da4…4dbe at0004 = ╱9c╱ IF ╱ // 0x4da8 @0x4
0x4da4…4dbe at0005 = ╱42╱B╱ // 0x4da9 @0x5
0x4da4…4dbe at0006 = ╱45╱E╱ // 0x4daa @0x6
0x4da4…4dbe at0007 = ╱4c╱L╱ // 0x4dab @0x7
0x4da4…4dbe at0008 = ╱5c╱Ø╱ // 0x4dac @0x8
0x4da4…4dbe at0009 = ╱42╱B╱ // 0x4dad @0x9
0x4da4…4dbe at000a = ╱ef╱$╱ // 0x4dae @0xa
0x4da4…4dbe at000b = ╱e1╱<>╱ // 0x4daf @0xb
0x4da4…4dbe at000c = ╱42╱B╱ // 0x4db0 @0xc
0x4da4…4dbe at000d = ╱45╱E╱ // 0x4db1 @0xd
0x4da4…4dbe at000e = ╱4c╱L╱ // 0x4db2 @0xe
0x4da4…4dbe at000f = ╱5c╱Ø╱ // 0x4db3 @0xf
0x4da4…4dbe at0010 = ╱42╱B╱ // 0x4db4 @0x10
0x4da4…4dbe at0011 = ╱41╱A╱ // 0x4db5 @0x11
0x4da4…4dbe at0012 = ╱52╱R╱ // 0x4db6 @0x12
0x4da4…4dbe at0013 = ╱52╱R╱ // 0x4db7 @0x13
0x4da4…4dbe at0014 = ╱ef╱$╱ // 0x4db8 @0x14
0x4da4…4dbe at0015 = ╱ed╱(╱ // 0x4db9 @0x15
0x4da4…4dbe at0016 = ╱4a╱J╱ // 0x4dba @0x16
0x4da4…4dbe at0017 = ╱ee╱)╱ // 0x4dbb @0x17
0x4da4…4dbe at0018 = ╱b6╱ THEN ╱ // 0x4dbc @0x18
0x4da4…4dbe at0019 = EOL // 0x4dbd @0x19
0x4da4…4dbe }
0x4dbe…4dd2 db29 7800 CURSOR 1,23
0x4dbe…4dd2 LineComalBin {
0x4dbe…4dd2 ptr = 0xdb29 // 0x4dbe @0x0
0x4dbe…4dd2 lno = 0x1e78 // 0x4dc0 @0x2
0x4dbe…4dd2 at0004 = ╱a1╱ CURSOR ╱ // 0x4dc2 @0x4
0x4dbe…4dd2 at0005 = ╱31╱1╱ // 0x4dc3 @0x5
0x4dbe…4dd2 at0006 = ╱fe00008001╱ // 0x4dc4 @0x6
0x4dbe…4dd2 at000b = ╱ec╱,╱ // 0x4dc9 @0xb
0x4dbe…4dd2 at000c = ╱32╱2╱ // 0x4dca @0xc
0x4dbe…4dd2 at000d = ╱33╱3╱ // 0x4dcb @0xd
0x4dbe…4dd2 at000e = ╱fe0000b805╱ // 0x4dcc @0xe
0x4dbe…4dd2 at0013 = EOL // 0x4dd1 @0x13
0x4dbe…4dd2 }
0x4dd2…4dfe db55 7810 VAANTARR$(J)=ANTAL$;BELØBARR$(J)=BELØB$
0x4dd2…4dfe LineComalBin {
0x4dd2…4dfe ptr = 0xdb55 // 0x4dd2 @0x0
0x4dd2…4dfe lno = 0x1e82 // 0x4dd4 @0x2
0x4dd2…4dfe at0004 = ╱56╱V╱ // 0x4dd6 @0x4
0x4dd2…4dfe at0005 = ╱41╱A╱ // 0x4dd7 @0x5
0x4dd2…4dfe at0006 = ╱41╱A╱ // 0x4dd8 @0x6
0x4dd2…4dfe at0007 = ╱4e╱N╱ // 0x4dd9 @0x7
0x4dd2…4dfe at0008 = ╱54╱T╱ // 0x4dda @0x8
0x4dd2…4dfe at0009 = ╱41╱A╱ // 0x4ddb @0x9
0x4dd2…4dfe at000a = ╱52╱R╱ // 0x4ddc @0xa
0x4dd2…4dfe at000b = ╱52╱R╱ // 0x4ddd @0xb
0x4dd2…4dfe at000c = ╱ef╱$╱ // 0x4dde @0xc
0x4dd2…4dfe at000d = ╱ed╱(╱ // 0x4ddf @0xd
0x4dd2…4dfe at000e = ╱4a╱J╱ // 0x4de0 @0xe
0x4dd2…4dfe at000f = ╱ee╱)╱ // 0x4de1 @0xf
0x4dd2…4dfe at0010 = ╱dc╱=╱ // 0x4de2 @0x10
0x4dd2…4dfe at0011 = ╱41╱A╱ // 0x4de3 @0x11
0x4dd2…4dfe at0012 = ╱4e╱N╱ // 0x4de4 @0x12
0x4dd2…4dfe at0013 = ╱54╱T╱ // 0x4de5 @0x13
0x4dd2…4dfe at0014 = ╱41╱A╱ // 0x4de6 @0x14
0x4dd2…4dfe at0015 = ╱4c╱L╱ // 0x4de7 @0x15
0x4dd2…4dfe at0016 = ╱ef╱$╱ // 0x4de8 @0x16
0x4dd2…4dfe at0017 = ╱eb╱;╱ // 0x4de9 @0x17
0x4dd2…4dfe at0018 = ╱42╱B╱ // 0x4dea @0x18
0x4dd2…4dfe at0019 = ╱45╱E╱ // 0x4deb @0x19
0x4dd2…4dfe at001a = ╱4c╱L╱ // 0x4dec @0x1a
0x4dd2…4dfe at001b = ╱5c╱Ø╱ // 0x4ded @0x1b
0x4dd2…4dfe at001c = ╱42╱B╱ // 0x4dee @0x1c
0x4dd2…4dfe at001d = ╱41╱A╱ // 0x4def @0x1d
0x4dd2…4dfe at001e = ╱52╱R╱ // 0x4df0 @0x1e
0x4dd2…4dfe at001f = ╱52╱R╱ // 0x4df1 @0x1f
0x4dd2…4dfe at0020 = ╱ef╱$╱ // 0x4df2 @0x20
0x4dd2…4dfe at0021 = ╱ed╱(╱ // 0x4df3 @0x21
0x4dd2…4dfe at0022 = ╱4a╱J╱ // 0x4df4 @0x22
0x4dd2…4dfe at0023 = ╱ee╱)╱ // 0x4df5 @0x23
0x4dd2…4dfe at0024 = ╱dc╱=╱ // 0x4df6 @0x24
0x4dd2…4dfe at0025 = ╱42╱B╱ // 0x4df7 @0x25
0x4dd2…4dfe at0026 = ╱45╱E╱ // 0x4df8 @0x26
0x4dd2…4dfe at0027 = ╱4c╱L╱ // 0x4df9 @0x27
0x4dd2…4dfe at0028 = ╱5c╱Ø╱ // 0x4dfa @0x28
0x4dd2…4dfe at0029 = ╱42╱B╱ // 0x4dfb @0x29
0x4dd2…4dfe at002a = ╱ef╱$╱ // 0x4dfc @0x2a
0x4dd2…4dfe at002b = EOL // 0x4dfd @0x2b
0x4dd2…4dfe }
0x4dfe…4e09 db60 7820 EXEC AJOUR
0x4dfe…4e09 LineComalBin {
0x4dfe…4e09 ptr = 0xdb60 // 0x4dfe @0x0
0x4dfe…4e09 lno = 0x1e8c // 0x4e00 @0x2
0x4dfe…4e09 at0004 = ╱9d╱ EXEC ╱ // 0x4e02 @0x4
0x4dfe…4e09 at0005 = ╱41╱A╱ // 0x4e03 @0x5
0x4dfe…4e09 at0006 = ╱4a╱J╱ // 0x4e04 @0x6
0x4dfe…4e09 at0007 = ╱4f╱O╱ // 0x4e05 @0x7
0x4dfe…4e09 at0008 = ╱55╱U╱ // 0x4e06 @0x8
0x4dfe…4e09 at0009 = ╱52╱R╱ // 0x4e07 @0x9
0x4dfe…4e09 at000a = EOL // 0x4e08 @0xa
0x4dfe…4e09 }
0x4e09…4e0f db66 7830 ENDIF
0x4e09…4e0f LineComalBin {
0x4e09…4e0f ptr = 0xdb66 // 0x4e09 @0x0
0x4e09…4e0f lno = 0x1e96 // 0x4e0b @0x2
0x4e09…4e0f at0004 = ╱9b╱ ENDIF ╱ // 0x4e0d @0x4
0x4e09…4e0f at0005 = EOL // 0x4e0e @0x5
0x4e09…4e0f }
0x4e0f…4e23 db7a 7840 WHEN 1,2
0x4e0f…4e23 LineComalBin {
0x4e0f…4e23 ptr = 0xdb7a // 0x4e0f @0x0
0x4e0f…4e23 lno = 0x1ea0 // 0x4e11 @0x2
0x4e0f…4e23 at0004 = ╱a301╱ WHEN ╱ // 0x4e13 @0x4
0x4e0f…4e23 at0006 = ╱31╱1╱ // 0x4e15 @0x6
0x4e0f…4e23 at0007 = ╱fe00008001╱ // 0x4e16 @0x7
0x4e0f…4e23 at000c = ╱ec╱,╱ // 0x4e1b @0xc
0x4e0f…4e23 at000d = ╱32╱2╱ // 0x4e1c @0xd
0x4e0f…4e23 at000e = ╱fe00008002╱ // 0x4e1d @0xe
0x4e0f…4e23 at0013 = EOL // 0x4e22 @0x13
0x4e0f…4e23 }
0x4e23…4e3c db93 7850 VARTEKST$=BLANK$;M=J
0x4e23…4e3c LineComalBin {
0x4e23…4e3c ptr = 0xdb93 // 0x4e23 @0x0
0x4e23…4e3c lno = 0x1eaa // 0x4e25 @0x2
0x4e23…4e3c at0004 = ╱56╱V╱ // 0x4e27 @0x4
0x4e23…4e3c at0005 = ╱41╱A╱ // 0x4e28 @0x5
0x4e23…4e3c at0006 = ╱52╱R╱ // 0x4e29 @0x6
0x4e23…4e3c at0007 = ╱54╱T╱ // 0x4e2a @0x7
0x4e23…4e3c at0008 = ╱45╱E╱ // 0x4e2b @0x8
0x4e23…4e3c at0009 = ╱4b╱K╱ // 0x4e2c @0x9
0x4e23…4e3c at000a = ╱53╱S╱ // 0x4e2d @0xa
0x4e23…4e3c at000b = ╱54╱T╱ // 0x4e2e @0xb
0x4e23…4e3c at000c = ╱ef╱$╱ // 0x4e2f @0xc
0x4e23…4e3c at000d = ╱dc╱=╱ // 0x4e30 @0xd
0x4e23…4e3c at000e = ╱42╱B╱ // 0x4e31 @0xe
0x4e23…4e3c at000f = ╱4c╱L╱ // 0x4e32 @0xf
0x4e23…4e3c at0010 = ╱41╱A╱ // 0x4e33 @0x10
0x4e23…4e3c at0011 = ╱4e╱N╱ // 0x4e34 @0x11
0x4e23…4e3c at0012 = ╱4b╱K╱ // 0x4e35 @0x12
0x4e23…4e3c at0013 = ╱ef╱$╱ // 0x4e36 @0x13
0x4e23…4e3c at0014 = ╱eb╱;╱ // 0x4e37 @0x14
0x4e23…4e3c at0015 = ╱4d╱M╱ // 0x4e38 @0x15
0x4e23…4e3c at0016 = ╱dc╱=╱ // 0x4e39 @0x16
0x4e23…4e3c at0017 = ╱4a╱J╱ // 0x4e3a @0x17
0x4e23…4e3c at0018 = EOL // 0x4e3b @0x18
0x4e23…4e3c }
0x4e3c…4e54 dbab 7860 IF VANRARR(J)=2 THEN
0x4e3c…4e54 LineComalBin {
0x4e3c…4e54 ptr = 0xdbab // 0x4e3c @0x0
0x4e3c…4e54 lno = 0x1eb4 // 0x4e3e @0x2
0x4e3c…4e54 at0004 = ╱9c╱ IF ╱ // 0x4e40 @0x4
0x4e3c…4e54 at0005 = ╱56╱V╱ // 0x4e41 @0x5
0x4e3c…4e54 at0006 = ╱41╱A╱ // 0x4e42 @0x6
0x4e3c…4e54 at0007 = ╱4e╱N╱ // 0x4e43 @0x7
0x4e3c…4e54 at0008 = ╱52╱R╱ // 0x4e44 @0x8
0x4e3c…4e54 at0009 = ╱41╱A╱ // 0x4e45 @0x9
0x4e3c…4e54 at000a = ╱52╱R╱ // 0x4e46 @0xa
0x4e3c…4e54 at000b = ╱52╱R╱ // 0x4e47 @0xb
0x4e3c…4e54 at000c = ╱ed╱(╱ // 0x4e48 @0xc
0x4e3c…4e54 at000d = ╱4a╱J╱ // 0x4e49 @0xd
0x4e3c…4e54 at000e = ╱ee╱)╱ // 0x4e4a @0xe
0x4e3c…4e54 at000f = ╱dc╱=╱ // 0x4e4b @0xf
0x4e3c…4e54 at0010 = ╱32╱2╱ // 0x4e4c @0x10
0x4e3c…4e54 at0011 = ╱fe00008002╱ // 0x4e4d @0x11
0x4e3c…4e54 at0016 = ╱b6╱ THEN ╱ // 0x4e52 @0x16
0x4e3c…4e54 at0017 = EOL // 0x4e53 @0x17
0x4e3c…4e54 }
0x4e54…4e69 dbc0 7870 CURSOR 16,21
0x4e54…4e69 LineComalBin {
0x4e54…4e69 ptr = 0xdbc0 // 0x4e54 @0x0
0x4e54…4e69 lno = 0x1ebe // 0x4e56 @0x2
0x4e54…4e69 at0004 = ╱a1╱ CURSOR ╱ // 0x4e58 @0x4
0x4e54…4e69 at0005 = ╱31╱1╱ // 0x4e59 @0x5
0x4e54…4e69 at0006 = ╱36╱6╱ // 0x4e5a @0x6
0x4e54…4e69 at0007 = ╱fe00008005╱ // 0x4e5b @0x7
0x4e54…4e69 at000c = ╱ec╱,╱ // 0x4e60 @0xc
0x4e54…4e69 at000d = ╱32╱2╱ // 0x4e61 @0xd
0x4e54…4e69 at000e = ╱31╱1╱ // 0x4e62 @0xe
0x4e54…4e69 at000f = ╱fe0000a805╱ // 0x4e63 @0xf
0x4e54…4e69 at0014 = EOL // 0x4e68 @0x14
0x4e54…4e69 }
0x4e69…4e6f dbc6 7880 ELSE
0x4e69…4e6f LineComalBin {
0x4e69…4e6f ptr = 0xdbc6 // 0x4e69 @0x0
0x4e69…4e6f lno = 0x1ec8 // 0x4e6b @0x2
0x4e69…4e6f at0004 = ╱9a╱ ELSE ╱ // 0x4e6d @0x4
0x4e69…4e6f at0005 = EOL // 0x4e6e @0x5
0x4e69…4e6f }
0x4e6f…4e84 dbdb 7890 CURSOR 23,21
0x4e6f…4e84 LineComalBin {
0x4e6f…4e84 ptr = 0xdbdb // 0x4e6f @0x0
0x4e6f…4e84 lno = 0x1ed2 // 0x4e71 @0x2
0x4e6f…4e84 at0004 = ╱a1╱ CURSOR ╱ // 0x4e73 @0x4
0x4e6f…4e84 at0005 = ╱32╱2╱ // 0x4e74 @0x5
0x4e6f…4e84 at0006 = ╱33╱3╱ // 0x4e75 @0x6
0x4e6f…4e84 at0007 = ╱fe0000b805╱ // 0x4e76 @0x7
0x4e6f…4e84 at000c = ╱ec╱,╱ // 0x4e7b @0xc
0x4e6f…4e84 at000d = ╱32╱2╱ // 0x4e7c @0xd
0x4e6f…4e84 at000e = ╱31╱1╱ // 0x4e7d @0xe
0x4e6f…4e84 at000f = ╱fe0000a805╱ // 0x4e7e @0xf
0x4e6f…4e84 at0014 = EOL // 0x4e83 @0x14
0x4e6f…4e84 }
0x4e84…4e8a dbe1 7900 ENDIF
0x4e84…4e8a LineComalBin {
0x4e84…4e8a ptr = 0xdbe1 // 0x4e84 @0x0
0x4e84…4e8a lno = 0x1edc // 0x4e86 @0x2
0x4e84…4e8a at0004 = ╱9b╱ ENDIF ╱ // 0x4e88 @0x4
0x4e84…4e8a at0005 = EOL // 0x4e89 @0x5
0x4e84…4e8a }
0x4e8a…4e9d dbf4 7910 INPUT " ",VARTEKST$
0x4e8a…4e9d LineComalBin {
0x4e8a…4e9d ptr = 0xdbf4 // 0x4e8a @0x0
0x4e8a…4e9d lno = 0x1ee6 // 0x4e8c @0x2
0x4e8a…4e9d at0004 = ╱91╱ INPUT ╱ // 0x4e8e @0x4
0x4e8a…4e9d at0005 = ╱22╱"╱ // 0x4e8f @0x5
0x4e8a…4e9d at0006 = ╱20╱…╱ // 0x4e90 @0x6
0x4e8a…4e9d at0007 = ╱22╱"╱ // 0x4e91 @0x7
0x4e8a…4e9d at0008 = ╱ec╱,╱ // 0x4e92 @0x8
0x4e8a…4e9d at0009 = ╱56╱V╱ // 0x4e93 @0x9
0x4e8a…4e9d at000a = ╱41╱A╱ // 0x4e94 @0xa
0x4e8a…4e9d at000b = ╱52╱R╱ // 0x4e95 @0xb
0x4e8a…4e9d at000c = ╱54╱T╱ // 0x4e96 @0xc
0x4e8a…4e9d at000d = ╱45╱E╱ // 0x4e97 @0xd
0x4e8a…4e9d at000e = ╱4b╱K╱ // 0x4e98 @0xe
0x4e8a…4e9d at000f = ╱53╱S╱ // 0x4e99 @0xf
0x4e8a…4e9d at0010 = ╱54╱T╱ // 0x4e9a @0x10
0x4e8a…4e9d at0011 = ╱ef╱$╱ // 0x4e9b @0x11
0x4e8a…4e9d at0012 = EOL // 0x4e9c @0x12
0x4e8a…4e9d }
0x4e9d…4ecd dc24 7920 IF LEN(VARTEKST$)>0 THEN VATEKARR$(M)=VARTEKST$
0x4e9d…4ecd LineComalBin {
0x4e9d…4ecd ptr = 0xdc24 // 0x4e9d @0x0
0x4e9d…4ecd lno = 0x1ef0 // 0x4e9f @0x2
0x4e9d…4ecd at0004 = ╱82╱ IF ╱ // 0x4ea1 @0x4
0x4e9d…4ecd at0005 = ╱cc╱LEN╱ // 0x4ea2 @0x5
0x4e9d…4ecd at0006 = ╱ed╱(╱ // 0x4ea3 @0x6
0x4e9d…4ecd at0007 = ╱56╱V╱ // 0x4ea4 @0x7
0x4e9d…4ecd at0008 = ╱41╱A╱ // 0x4ea5 @0x8
0x4e9d…4ecd at0009 = ╱52╱R╱ // 0x4ea6 @0x9
0x4e9d…4ecd at000a = ╱54╱T╱ // 0x4ea7 @0xa
0x4e9d…4ecd at000b = ╱45╱E╱ // 0x4ea8 @0xb
0x4e9d…4ecd at000c = ╱4b╱K╱ // 0x4ea9 @0xc
0x4e9d…4ecd at000d = ╱53╱S╱ // 0x4eaa @0xd
0x4e9d…4ecd at000e = ╱54╱T╱ // 0x4eab @0xe
0x4e9d…4ecd at000f = ╱ef╱$╱ // 0x4eac @0xf
0x4e9d…4ecd at0010 = ╱ee╱)╱ // 0x4ead @0x10
0x4e9d…4ecd at0011 = ╱de╱>╱ // 0x4eae @0x11
0x4e9d…4ecd at0012 = ╱30╱0╱ // 0x4eaf @0x12
0x4e9d…4ecd at0013 = ╱fe00000000╱ // 0x4eb0 @0x13
0x4e9d…4ecd at0018 = ╱b6╱ THEN ╱ // 0x4eb5 @0x18
0x4e9d…4ecd at0019 = ╱56╱V╱ // 0x4eb6 @0x19
0x4e9d…4ecd at001a = ╱41╱A╱ // 0x4eb7 @0x1a
0x4e9d…4ecd at001b = ╱54╱T╱ // 0x4eb8 @0x1b
0x4e9d…4ecd at001c = ╱45╱E╱ // 0x4eb9 @0x1c
0x4e9d…4ecd at001d = ╱4b╱K╱ // 0x4eba @0x1d
0x4e9d…4ecd at001e = ╱41╱A╱ // 0x4ebb @0x1e
0x4e9d…4ecd at001f = ╱52╱R╱ // 0x4ebc @0x1f
0x4e9d…4ecd at0020 = ╱52╱R╱ // 0x4ebd @0x20
0x4e9d…4ecd at0021 = ╱ef╱$╱ // 0x4ebe @0x21
0x4e9d…4ecd at0022 = ╱ed╱(╱ // 0x4ebf @0x22
0x4e9d…4ecd at0023 = ╱4d╱M╱ // 0x4ec0 @0x23
0x4e9d…4ecd at0024 = ╱ee╱)╱ // 0x4ec1 @0x24
0x4e9d…4ecd at0025 = ╱dc╱=╱ // 0x4ec2 @0x25
0x4e9d…4ecd at0026 = ╱56╱V╱ // 0x4ec3 @0x26
0x4e9d…4ecd at0027 = ╱41╱A╱ // 0x4ec4 @0x27
0x4e9d…4ecd at0028 = ╱52╱R╱ // 0x4ec5 @0x28
0x4e9d…4ecd at0029 = ╱54╱T╱ // 0x4ec6 @0x29
0x4e9d…4ecd at002a = ╱45╱E╱ // 0x4ec7 @0x2a
0x4e9d…4ecd at002b = ╱4b╱K╱ // 0x4ec8 @0x2b
0x4e9d…4ecd at002c = ╱53╱S╱ // 0x4ec9 @0x2c
0x4e9d…4ecd at002d = ╱54╱T╱ // 0x4eca @0x2d
0x4e9d…4ecd at002e = ╱ef╱$╱ // 0x4ecb @0x2e
0x4e9d…4ecd at002f = EOL // 0x4ecc @0x2f
0x4e9d…4ecd }
0x4ecd…4ee5 dc3c 7930 IF VANRARR(J)=2 THEN
0x4ecd…4ee5 LineComalBin {
0x4ecd…4ee5 ptr = 0xdc3c // 0x4ecd @0x0
0x4ecd…4ee5 lno = 0x1efa // 0x4ecf @0x2
0x4ecd…4ee5 at0004 = ╱9c╱ IF ╱ // 0x4ed1 @0x4
0x4ecd…4ee5 at0005 = ╱56╱V╱ // 0x4ed2 @0x5
0x4ecd…4ee5 at0006 = ╱41╱A╱ // 0x4ed3 @0x6
0x4ecd…4ee5 at0007 = ╱4e╱N╱ // 0x4ed4 @0x7
0x4ecd…4ee5 at0008 = ╱52╱R╱ // 0x4ed5 @0x8
0x4ecd…4ee5 at0009 = ╱41╱A╱ // 0x4ed6 @0x9
0x4ecd…4ee5 at000a = ╱52╱R╱ // 0x4ed7 @0xa
0x4ecd…4ee5 at000b = ╱52╱R╱ // 0x4ed8 @0xb
0x4ecd…4ee5 at000c = ╱ed╱(╱ // 0x4ed9 @0xc
0x4ecd…4ee5 at000d = ╱4a╱J╱ // 0x4eda @0xd
0x4ecd…4ee5 at000e = ╱ee╱)╱ // 0x4edb @0xe
0x4ecd…4ee5 at000f = ╱dc╱=╱ // 0x4edc @0xf
0x4ecd…4ee5 at0010 = ╱32╱2╱ // 0x4edd @0x10
0x4ecd…4ee5 at0011 = ╱fe00008002╱ // 0x4ede @0x11
0x4ecd…4ee5 at0016 = ╱b6╱ THEN ╱ // 0x4ee3 @0x16
0x4ecd…4ee5 at0017 = EOL // 0x4ee4 @0x17
0x4ecd…4ee5 }
0x4ee5…4efa dc51 7940 CURSOR 17,21
0x4ee5…4efa LineComalBin {
0x4ee5…4efa ptr = 0xdc51 // 0x4ee5 @0x0
0x4ee5…4efa lno = 0x1f04 // 0x4ee7 @0x2
0x4ee5…4efa at0004 = ╱a1╱ CURSOR ╱ // 0x4ee9 @0x4
0x4ee5…4efa at0005 = ╱31╱1╱ // 0x4eea @0x5
0x4ee5…4efa at0006 = ╱37╱7╱ // 0x4eeb @0x6
0x4ee5…4efa at0007 = ╱fe00008805╱ // 0x4eec @0x7
0x4ee5…4efa at000c = ╱ec╱,╱ // 0x4ef1 @0xc
0x4ee5…4efa at000d = ╱32╱2╱ // 0x4ef2 @0xd
0x4ee5…4efa at000e = ╱31╱1╱ // 0x4ef3 @0xe
0x4ee5…4efa at000f = ╱fe0000a805╱ // 0x4ef4 @0xf
0x4ee5…4efa at0014 = EOL // 0x4ef9 @0x14
0x4ee5…4efa }
0x4efa…4f23 dc7a 7950 PRINT VATEKARR$(M);BLANK$(1:12)
0x4efa…4f23 LineComalBin {
0x4efa…4f23 ptr = 0xdc7a // 0x4efa @0x0
0x4efa…4f23 lno = 0x1f0e // 0x4efc @0x2
0x4efa…4f23 at0004 = ╱92╱ PRINT ╱ // 0x4efe @0x4
0x4efa…4f23 at0005 = ╱56╱V╱ // 0x4eff @0x5
0x4efa…4f23 at0006 = ╱41╱A╱ // 0x4f00 @0x6
0x4efa…4f23 at0007 = ╱54╱T╱ // 0x4f01 @0x7
0x4efa…4f23 at0008 = ╱45╱E╱ // 0x4f02 @0x8
0x4efa…4f23 at0009 = ╱4b╱K╱ // 0x4f03 @0x9
0x4efa…4f23 at000a = ╱41╱A╱ // 0x4f04 @0xa
0x4efa…4f23 at000b = ╱52╱R╱ // 0x4f05 @0xb
0x4efa…4f23 at000c = ╱52╱R╱ // 0x4f06 @0xc
0x4efa…4f23 at000d = ╱ef╱$╱ // 0x4f07 @0xd
0x4efa…4f23 at000e = ╱ed╱(╱ // 0x4f08 @0xe
0x4efa…4f23 at000f = ╱4d╱M╱ // 0x4f09 @0xf
0x4efa…4f23 at0010 = ╱ee╱)╱ // 0x4f0a @0x10
0x4efa…4f23 at0011 = ╱eb╱;╱ // 0x4f0b @0x11
0x4efa…4f23 at0012 = ╱42╱B╱ // 0x4f0c @0x12
0x4efa…4f23 at0013 = ╱4c╱L╱ // 0x4f0d @0x13
0x4efa…4f23 at0014 = ╱41╱A╱ // 0x4f0e @0x14
0x4efa…4f23 at0015 = ╱4e╱N╱ // 0x4f0f @0x15
0x4efa…4f23 at0016 = ╱4b╱K╱ // 0x4f10 @0x16
0x4efa…4f23 at0017 = ╱ef╱$╱ // 0x4f11 @0x17
0x4efa…4f23 at0018 = ╱ed╱(╱ // 0x4f12 @0x18
0x4efa…4f23 at0019 = ╱31╱1╱ // 0x4f13 @0x19
0x4efa…4f23 at001a = ╱fe00008001╱ // 0x4f14 @0x1a
0x4efa…4f23 at001f = ╱f0╱:╱ // 0x4f19 @0x1f
0x4efa…4f23 at0020 = ╱31╱1╱ // 0x4f1a @0x20
0x4efa…4f23 at0021 = ╱32╱2╱ // 0x4f1b @0x21
0x4efa…4f23 at0022 = ╱fe0000c004╱ // 0x4f1c @0x22
0x4efa…4f23 at0027 = ╱ee╱)╱ // 0x4f21 @0x27
0x4efa…4f23 at0028 = EOL // 0x4f22 @0x28
0x4efa…4f23 }
0x4f23…4f29 dc80 7960 ELSE
0x4f23…4f29 LineComalBin {
0x4f23…4f29 ptr = 0xdc80 // 0x4f23 @0x0
0x4f23…4f29 lno = 0x1f18 // 0x4f25 @0x2
0x4f23…4f29 at0004 = ╱9a╱ ELSE ╱ // 0x4f27 @0x4
0x4f23…4f29 at0005 = EOL // 0x4f28 @0x5
0x4f23…4f29 }
0x4f29…4f3e dc95 7970 CURSOR 24,21
0x4f29…4f3e LineComalBin {
0x4f29…4f3e ptr = 0xdc95 // 0x4f29 @0x0
0x4f29…4f3e lno = 0x1f22 // 0x4f2b @0x2
0x4f29…4f3e at0004 = ╱a1╱ CURSOR ╱ // 0x4f2d @0x4
0x4f29…4f3e at0005 = ╱32╱2╱ // 0x4f2e @0x5
0x4f29…4f3e at0006 = ╱34╱4╱ // 0x4f2f @0x6
0x4f29…4f3e at0007 = ╱fe0000c005╱ // 0x4f30 @0x7
0x4f29…4f3e at000c = ╱ec╱,╱ // 0x4f35 @0xc
0x4f29…4f3e at000d = ╱32╱2╱ // 0x4f36 @0xd
0x4f29…4f3e at000e = ╱31╱1╱ // 0x4f37 @0xe
0x4f29…4f3e at000f = ╱fe0000a805╱ // 0x4f38 @0xf
0x4f29…4f3e at0014 = EOL // 0x4f3d @0x14
0x4f29…4f3e }
0x4f3e…4f76 dccd 7980 PRINT VATEKARR$(M,1:25);BLANK$(1:25)
0x4f3e…4f76 LineComalBin {
0x4f3e…4f76 ptr = 0xdccd // 0x4f3e @0x0
0x4f3e…4f76 lno = 0x1f2c // 0x4f40 @0x2
0x4f3e…4f76 at0004 = ╱92╱ PRINT ╱ // 0x4f42 @0x4
0x4f3e…4f76 at0005 = ╱56╱V╱ // 0x4f43 @0x5
0x4f3e…4f76 at0006 = ╱41╱A╱ // 0x4f44 @0x6
0x4f3e…4f76 at0007 = ╱54╱T╱ // 0x4f45 @0x7
0x4f3e…4f76 at0008 = ╱45╱E╱ // 0x4f46 @0x8
0x4f3e…4f76 at0009 = ╱4b╱K╱ // 0x4f47 @0x9
0x4f3e…4f76 at000a = ╱41╱A╱ // 0x4f48 @0xa
0x4f3e…4f76 at000b = ╱52╱R╱ // 0x4f49 @0xb
0x4f3e…4f76 at000c = ╱52╱R╱ // 0x4f4a @0xc
0x4f3e…4f76 at000d = ╱ef╱$╱ // 0x4f4b @0xd
0x4f3e…4f76 at000e = ╱ed╱(╱ // 0x4f4c @0xe
0x4f3e…4f76 at000f = ╱4d╱M╱ // 0x4f4d @0xf
0x4f3e…4f76 at0010 = ╱ec╱,╱ // 0x4f4e @0x10
0x4f3e…4f76 at0011 = ╱31╱1╱ // 0x4f4f @0x11
0x4f3e…4f76 at0012 = ╱fe00008001╱ // 0x4f50 @0x12
0x4f3e…4f76 at0017 = ╱f0╱:╱ // 0x4f55 @0x17
0x4f3e…4f76 at0018 = ╱32╱2╱ // 0x4f56 @0x18
0x4f3e…4f76 at0019 = ╱35╱5╱ // 0x4f57 @0x19
0x4f3e…4f76 at001a = ╱fe0000c805╱ // 0x4f58 @0x1a
0x4f3e…4f76 at001f = ╱ee╱)╱ // 0x4f5d @0x1f
0x4f3e…4f76 at0020 = ╱eb╱;╱ // 0x4f5e @0x20
0x4f3e…4f76 at0021 = ╱42╱B╱ // 0x4f5f @0x21
0x4f3e…4f76 at0022 = ╱4c╱L╱ // 0x4f60 @0x22
0x4f3e…4f76 at0023 = ╱41╱A╱ // 0x4f61 @0x23
0x4f3e…4f76 at0024 = ╱4e╱N╱ // 0x4f62 @0x24
0x4f3e…4f76 at0025 = ╱4b╱K╱ // 0x4f63 @0x25
0x4f3e…4f76 at0026 = ╱ef╱$╱ // 0x4f64 @0x26
0x4f3e…4f76 at0027 = ╱ed╱(╱ // 0x4f65 @0x27
0x4f3e…4f76 at0028 = ╱31╱1╱ // 0x4f66 @0x28
0x4f3e…4f76 at0029 = ╱fe00008001╱ // 0x4f67 @0x29
0x4f3e…4f76 at002e = ╱f0╱:╱ // 0x4f6c @0x2e
0x4f3e…4f76 at002f = ╱32╱2╱ // 0x4f6d @0x2f
0x4f3e…4f76 at0030 = ╱35╱5╱ // 0x4f6e @0x30
0x4f3e…4f76 at0031 = ╱fe0000c805╱ // 0x4f6f @0x31
0x4f3e…4f76 at0036 = ╱ee╱)╱ // 0x4f74 @0x36
0x4f3e…4f76 at0037 = EOL // 0x4f75 @0x37
0x4f3e…4f76 }
0x4f76…4f7c dcd3 7990 ENDIF
0x4f76…4f7c LineComalBin {
0x4f76…4f7c ptr = 0xdcd3 // 0x4f76 @0x0
0x4f76…4f7c lno = 0x1f36 // 0x4f78 @0x2
0x4f76…4f7c at0004 = ╱9b╱ ENDIF ╱ // 0x4f7a @0x4
0x4f76…4f7c at0005 = EOL // 0x4f7b @0x5
0x4f76…4f7c }
0x4f7c…4f94 dceb 8000 IF VANRARR(M)=1 THEN
0x4f7c…4f94 LineComalBin {
0x4f7c…4f94 ptr = 0xdceb // 0x4f7c @0x0
0x4f7c…4f94 lno = 0x1f40 // 0x4f7e @0x2
0x4f7c…4f94 at0004 = ╱9c╱ IF ╱ // 0x4f80 @0x4
0x4f7c…4f94 at0005 = ╱56╱V╱ // 0x4f81 @0x5
0x4f7c…4f94 at0006 = ╱41╱A╱ // 0x4f82 @0x6
0x4f7c…4f94 at0007 = ╱4e╱N╱ // 0x4f83 @0x7
0x4f7c…4f94 at0008 = ╱52╱R╱ // 0x4f84 @0x8
0x4f7c…4f94 at0009 = ╱41╱A╱ // 0x4f85 @0x9
0x4f7c…4f94 at000a = ╱52╱R╱ // 0x4f86 @0xa
0x4f7c…4f94 at000b = ╱52╱R╱ // 0x4f87 @0xb
0x4f7c…4f94 at000c = ╱ed╱(╱ // 0x4f88 @0xc
0x4f7c…4f94 at000d = ╱4d╱M╱ // 0x4f89 @0xd
0x4f7c…4f94 at000e = ╱ee╱)╱ // 0x4f8a @0xe
0x4f7c…4f94 at000f = ╱dc╱=╱ // 0x4f8b @0xf
0x4f7c…4f94 at0010 = ╱31╱1╱ // 0x4f8c @0x10
0x4f7c…4f94 at0011 = ╱fe00008001╱ // 0x4f8d @0x11
0x4f7c…4f94 at0016 = ╱b6╱ THEN ╱ // 0x4f92 @0x16
0x4f7c…4f94 at0017 = EOL // 0x4f93 @0x17
0x4f7c…4f94 }
0x4f94…4fc8 dd1f 8010 EXEC INDPUT2(65,21,BLANK$(1),BELØB$)
0x4f94…4fc8 LineComalBin {
0x4f94…4fc8 ptr = 0xdd1f // 0x4f94 @0x0
0x4f94…4fc8 lno = 0x1f4a // 0x4f96 @0x2
0x4f94…4fc8 at0004 = ╱9d╱ EXEC ╱ // 0x4f98 @0x4
0x4f94…4fc8 at0005 = ╱49╱I╱ // 0x4f99 @0x5
0x4f94…4fc8 at0006 = ╱4e╱N╱ // 0x4f9a @0x6
0x4f94…4fc8 at0007 = ╱44╱D╱ // 0x4f9b @0x7
0x4f94…4fc8 at0008 = ╱50╱P╱ // 0x4f9c @0x8
0x4f94…4fc8 at0009 = ╱55╱U╱ // 0x4f9d @0x9
0x4f94…4fc8 at000a = ╱54╱T╱ // 0x4f9e @0xa
0x4f94…4fc8 at000b = ╱32╱2╱ // 0x4f9f @0xb
0x4f94…4fc8 at000c = ╱ed╱(╱ // 0x4fa0 @0xc
0x4f94…4fc8 at000d = ╱36╱6╱ // 0x4fa1 @0xd
0x4f94…4fc8 at000e = ╱35╱5╱ // 0x4fa2 @0xe
0x4f94…4fc8 at000f = ╱fe00008207╱ // 0x4fa3 @0xf
0x4f94…4fc8 at0014 = ╱ec╱,╱ // 0x4fa8 @0x14
0x4f94…4fc8 at0015 = ╱32╱2╱ // 0x4fa9 @0x15
0x4f94…4fc8 at0016 = ╱31╱1╱ // 0x4faa @0x16
0x4f94…4fc8 at0017 = ╱fe0000a805╱ // 0x4fab @0x17
0x4f94…4fc8 at001c = ╱ec╱,╱ // 0x4fb0 @0x1c
0x4f94…4fc8 at001d = ╱42╱B╱ // 0x4fb1 @0x1d
0x4f94…4fc8 at001e = ╱4c╱L╱ // 0x4fb2 @0x1e
0x4f94…4fc8 at001f = ╱41╱A╱ // 0x4fb3 @0x1f
0x4f94…4fc8 at0020 = ╱4e╱N╱ // 0x4fb4 @0x20
0x4f94…4fc8 at0021 = ╱4b╱K╱ // 0x4fb5 @0x21
0x4f94…4fc8 at0022 = ╱ef╱$╱ // 0x4fb6 @0x22
0x4f94…4fc8 at0023 = ╱ed╱(╱ // 0x4fb7 @0x23
0x4f94…4fc8 at0024 = ╱31╱1╱ // 0x4fb8 @0x24
0x4f94…4fc8 at0025 = ╱fe00008001╱ // 0x4fb9 @0x25
0x4f94…4fc8 at002a = ╱ee╱)╱ // 0x4fbe @0x2a
0x4f94…4fc8 at002b = ╱ec╱,╱ // 0x4fbf @0x2b
0x4f94…4fc8 at002c = ╱42╱B╱ // 0x4fc0 @0x2c
0x4f94…4fc8 at002d = ╱45╱E╱ // 0x4fc1 @0x2d
0x4f94…4fc8 at002e = ╱4c╱L╱ // 0x4fc2 @0x2e
0x4f94…4fc8 at002f = ╱5c╱Ø╱ // 0x4fc3 @0x2f
0x4f94…4fc8 at0030 = ╱42╱B╱ // 0x4fc4 @0x30
0x4f94…4fc8 at0031 = ╱ef╱$╱ // 0x4fc5 @0x31
0x4f94…4fc8 at0032 = ╱ee╱)╱ // 0x4fc6 @0x32
0x4f94…4fc8 at0033 = EOL // 0x4fc7 @0x33
0x4f94…4fc8 }
0x4fc8…4fe9 dd40 8020 EXEC CA(4,BELØB$,TAH$,TAH$)
0x4fc8…4fe9 LineComalBin {
0x4fc8…4fe9 ptr = 0xdd40 // 0x4fc8 @0x0
0x4fc8…4fe9 lno = 0x1f54 // 0x4fca @0x2
0x4fc8…4fe9 at0004 = ╱9d╱ EXEC ╱ // 0x4fcc @0x4
0x4fc8…4fe9 at0005 = ╱43╱C╱ // 0x4fcd @0x5
0x4fc8…4fe9 at0006 = ╱41╱A╱ // 0x4fce @0x6
0x4fc8…4fe9 at0007 = ╱ed╱(╱ // 0x4fcf @0x7
0x4fc8…4fe9 at0008 = ╱34╱4╱ // 0x4fd0 @0x8
0x4fc8…4fe9 at0009 = ╱fe00008003╱ // 0x4fd1 @0x9
0x4fc8…4fe9 at000e = ╱ec╱,╱ // 0x4fd6 @0xe
0x4fc8…4fe9 at000f = ╱42╱B╱ // 0x4fd7 @0xf
0x4fc8…4fe9 at0010 = ╱45╱E╱ // 0x4fd8 @0x10
0x4fc8…4fe9 at0011 = ╱4c╱L╱ // 0x4fd9 @0x11
0x4fc8…4fe9 at0012 = ╱5c╱Ø╱ // 0x4fda @0x12
0x4fc8…4fe9 at0013 = ╱42╱B╱ // 0x4fdb @0x13
0x4fc8…4fe9 at0014 = ╱ef╱$╱ // 0x4fdc @0x14
0x4fc8…4fe9 at0015 = ╱ec╱,╱ // 0x4fdd @0x15
0x4fc8…4fe9 at0016 = ╱54╱T╱ // 0x4fde @0x16
0x4fc8…4fe9 at0017 = ╱41╱A╱ // 0x4fdf @0x17
0x4fc8…4fe9 at0018 = ╱48╱H╱ // 0x4fe0 @0x18
0x4fc8…4fe9 at0019 = ╱ef╱$╱ // 0x4fe1 @0x19
0x4fc8…4fe9 at001a = ╱ec╱,╱ // 0x4fe2 @0x1a
0x4fc8…4fe9 at001b = ╱54╱T╱ // 0x4fe3 @0x1b
0x4fc8…4fe9 at001c = ╱41╱A╱ // 0x4fe4 @0x1c
0x4fc8…4fe9 at001d = ╱48╱H╱ // 0x4fe5 @0x1d
0x4fc8…4fe9 at001e = ╱ef╱$╱ // 0x4fe6 @0x1e
0x4fc8…4fe9 at001f = ╱ee╱)╱ // 0x4fe7 @0x1f
0x4fc8…4fe9 at0020 = EOL // 0x4fe8 @0x20
0x4fc8…4fe9 }
0x4fe9…4ff9 dd50 8030 IF SI=0 THEN
0x4fe9…4ff9 LineComalBin {
0x4fe9…4ff9 ptr = 0xdd50 // 0x4fe9 @0x0
0x4fe9…4ff9 lno = 0x1f5e // 0x4feb @0x2
0x4fe9…4ff9 at0004 = ╱9c╱ IF ╱ // 0x4fed @0x4
0x4fe9…4ff9 at0005 = ╱53╱S╱ // 0x4fee @0x5
0x4fe9…4ff9 at0006 = ╱49╱I╱ // 0x4fef @0x6
0x4fe9…4ff9 at0007 = ╱dc╱=╱ // 0x4ff0 @0x7
0x4fe9…4ff9 at0008 = ╱30╱0╱ // 0x4ff1 @0x8
0x4fe9…4ff9 at0009 = ╱fe00000000╱ // 0x4ff2 @0x9
0x4fe9…4ff9 at000e = ╱b6╱ THEN ╱ // 0x4ff7 @0xe
0x4fe9…4ff9 at000f = EOL // 0x4ff8 @0xf
0x4fe9…4ff9 }
0x4ff9…5011 dd68 8040 BELØB$=BELØBARR$(M)
0x4ff9…5011 LineComalBin {
0x4ff9…5011 ptr = 0xdd68 // 0x4ff9 @0x0
0x4ff9…5011 lno = 0x1f68 // 0x4ffb @0x2
0x4ff9…5011 at0004 = ╱42╱B╱ // 0x4ffd @0x4
0x4ff9…5011 at0005 = ╱45╱E╱ // 0x4ffe @0x5
0x4ff9…5011 at0006 = ╱4c╱L╱ // 0x4fff @0x6
0x4ff9…5011 at0007 = ╱5c╱Ø╱ // 0x5000 @0x7
0x4ff9…5011 at0008 = ╱42╱B╱ // 0x5001 @0x8
0x4ff9…5011 at0009 = ╱ef╱$╱ // 0x5002 @0x9
0x4ff9…5011 at000a = ╱dc╱=╱ // 0x5003 @0xa
0x4ff9…5011 at000b = ╱42╱B╱ // 0x5004 @0xb
0x4ff9…5011 at000c = ╱45╱E╱ // 0x5005 @0xc
0x4ff9…5011 at000d = ╱4c╱L╱ // 0x5006 @0xd
0x4ff9…5011 at000e = ╱5c╱Ø╱ // 0x5007 @0xe
0x4ff9…5011 at000f = ╱42╱B╱ // 0x5008 @0xf
0x4ff9…5011 at0010 = ╱41╱A╱ // 0x5009 @0x10
0x4ff9…5011 at0011 = ╱52╱R╱ // 0x500a @0x11
0x4ff9…5011 at0012 = ╱52╱R╱ // 0x500b @0x12
0x4ff9…5011 at0013 = ╱ef╱$╱ // 0x500c @0x13
0x4ff9…5011 at0014 = ╱ed╱(╱ // 0x500d @0x14
0x4ff9…5011 at0015 = ╱4d╱M╱ // 0x500e @0x15
0x4ff9…5011 at0016 = ╱ee╱)╱ // 0x500f @0x16
0x4ff9…5011 at0017 = EOL // 0x5010 @0x17
0x4ff9…5011 }
0x5011…5017 dd6e 8050 ELSE
0x5011…5017 LineComalBin {
0x5011…5017 ptr = 0xdd6e // 0x5011 @0x0
0x5011…5017 lno = 0x1f72 // 0x5013 @0x2
0x5011…5017 at0004 = ╱9a╱ ELSE ╱ // 0x5015 @0x4
0x5011…5017 at0005 = EOL // 0x5016 @0x5
0x5011…5017 }
0x5017…502f dd86 8060 BELØBARR$(M)=BELØB$
0x5017…502f LineComalBin {
0x5017…502f ptr = 0xdd86 // 0x5017 @0x0
0x5017…502f lno = 0x1f7c // 0x5019 @0x2
0x5017…502f at0004 = ╱42╱B╱ // 0x501b @0x4
0x5017…502f at0005 = ╱45╱E╱ // 0x501c @0x5
0x5017…502f at0006 = ╱4c╱L╱ // 0x501d @0x6
0x5017…502f at0007 = ╱5c╱Ø╱ // 0x501e @0x7
0x5017…502f at0008 = ╱42╱B╱ // 0x501f @0x8
0x5017…502f at0009 = ╱41╱A╱ // 0x5020 @0x9
0x5017…502f at000a = ╱52╱R╱ // 0x5021 @0xa
0x5017…502f at000b = ╱52╱R╱ // 0x5022 @0xb
0x5017…502f at000c = ╱ef╱$╱ // 0x5023 @0xc
0x5017…502f at000d = ╱ed╱(╱ // 0x5024 @0xd
0x5017…502f at000e = ╱4d╱M╱ // 0x5025 @0xe
0x5017…502f at000f = ╱ee╱)╱ // 0x5026 @0xf
0x5017…502f at0010 = ╱dc╱=╱ // 0x5027 @0x10
0x5017…502f at0011 = ╱42╱B╱ // 0x5028 @0x11
0x5017…502f at0012 = ╱45╱E╱ // 0x5029 @0x12
0x5017…502f at0013 = ╱4c╱L╱ // 0x502a @0x13
0x5017…502f at0014 = ╱5c╱Ø╱ // 0x502b @0x14
0x5017…502f at0015 = ╱42╱B╱ // 0x502c @0x15
0x5017…502f at0016 = ╱ef╱$╱ // 0x502d @0x16
0x5017…502f at0017 = EOL // 0x502e @0x17
0x5017…502f }
0x502f…503a dd91 8070 EXEC AJOUR
0x502f…503a LineComalBin {
0x502f…503a ptr = 0xdd91 // 0x502f @0x0
0x502f…503a lno = 0x1f86 // 0x5031 @0x2
0x502f…503a at0004 = ╱9d╱ EXEC ╱ // 0x5033 @0x4
0x502f…503a at0005 = ╱41╱A╱ // 0x5034 @0x5
0x502f…503a at0006 = ╱4a╱J╱ // 0x5035 @0x6
0x502f…503a at0007 = ╱4f╱O╱ // 0x5036 @0x7
0x502f…503a at0008 = ╱55╱U╱ // 0x5037 @0x8
0x502f…503a at0009 = ╱52╱R╱ // 0x5038 @0x9
0x502f…503a at000a = EOL // 0x5039 @0xa
0x502f…503a }
0x503a…5040 dd97 8080 ENDIF
0x503a…5040 LineComalBin {
0x503a…5040 ptr = 0xdd97 // 0x503a @0x0
0x503a…5040 lno = 0x1f90 // 0x503c @0x2
0x503a…5040 at0004 = ╱9b╱ ENDIF ╱ // 0x503e @0x4
0x503a…5040 at0005 = EOL // 0x503f @0x5
0x503a…5040 }
0x5040…5055 ddac 8090 CURSOR 66,21
0x5040…5055 LineComalBin {
0x5040…5055 ptr = 0xddac // 0x5040 @0x0
0x5040…5055 lno = 0x1f9a // 0x5042 @0x2
0x5040…5055 at0004 = ╱a1╱ CURSOR ╱ // 0x5044 @0x4
0x5040…5055 at0005 = ╱36╱6╱ // 0x5045 @0x5
0x5040…5055 at0006 = ╱36╱6╱ // 0x5046 @0x6
0x5040…5055 at0007 = ╱fe00008407╱ // 0x5047 @0x7
0x5040…5055 at000c = ╱ec╱,╱ // 0x504c @0xc
0x5040…5055 at000d = ╱32╱2╱ // 0x504d @0xd
0x5040…5055 at000e = ╱31╱1╱ // 0x504e @0xe
0x5040…5055 at000f = ╱fe0000a805╱ // 0x504f @0xf
0x5040…5055 at0014 = EOL // 0x5054 @0x14
0x5040…5055 }
0x5055…507a ddd1 8100 EXEC TUD(BELØB$,TAL4$,1,0)
0x5055…507a LineComalBin {
0x5055…507a ptr = 0xddd1 // 0x5055 @0x0
0x5055…507a lno = 0x1fa4 // 0x5057 @0x2
0x5055…507a at0004 = ╱9d╱ EXEC ╱ // 0x5059 @0x4
0x5055…507a at0005 = ╱54╱T╱ // 0x505a @0x5
0x5055…507a at0006 = ╱55╱U╱ // 0x505b @0x6
0x5055…507a at0007 = ╱44╱D╱ // 0x505c @0x7
0x5055…507a at0008 = ╱ed╱(╱ // 0x505d @0x8
0x5055…507a at0009 = ╱42╱B╱ // 0x505e @0x9
0x5055…507a at000a = ╱45╱E╱ // 0x505f @0xa
0x5055…507a at000b = ╱4c╱L╱ // 0x5060 @0xb
0x5055…507a at000c = ╱5c╱Ø╱ // 0x5061 @0xc
0x5055…507a at000d = ╱42╱B╱ // 0x5062 @0xd
0x5055…507a at000e = ╱ef╱$╱ // 0x5063 @0xe
0x5055…507a at000f = ╱ec╱,╱ // 0x5064 @0xf
0x5055…507a at0010 = ╱54╱T╱ // 0x5065 @0x10
0x5055…507a at0011 = ╱41╱A╱ // 0x5066 @0x11
0x5055…507a at0012 = ╱4c╱L╱ // 0x5067 @0x12
0x5055…507a at0013 = ╱34╱4╱ // 0x5068 @0x13
0x5055…507a at0014 = ╱ef╱$╱ // 0x5069 @0x14
0x5055…507a at0015 = ╱ec╱,╱ // 0x506a @0x15
0x5055…507a at0016 = ╱31╱1╱ // 0x506b @0x16
0x5055…507a at0017 = ╱fe00008001╱ // 0x506c @0x17
0x5055…507a at001c = ╱ec╱,╱ // 0x5071 @0x1c
0x5055…507a at001d = ╱30╱0╱ // 0x5072 @0x1d
0x5055…507a at001e = ╱fe00000000╱ // 0x5073 @0x1e
0x5055…507a at0023 = ╱ee╱)╱ // 0x5078 @0x23
0x5055…507a at0024 = EOL // 0x5079 @0x24
0x5055…507a }
0x507a…5080 ddd7 8110 ENDIF
0x507a…5080 LineComalBin {
0x507a…5080 ptr = 0xddd7 // 0x507a @0x0
0x507a…5080 lno = 0x1fae // 0x507c @0x2
0x507a…5080 at0004 = ╱9b╱ ENDIF ╱ // 0x507e @0x4
0x507a…5080 at0005 = EOL // 0x507f @0x5
0x507a…5080 }
0x5080…508d dde4 8120 WHEN 3
0x5080…508d LineComalBin {
0x5080…508d ptr = 0xdde4 // 0x5080 @0x0
0x5080…508d lno = 0x1fb8 // 0x5082 @0x2
0x5080…508d at0004 = ╱a301╱ WHEN ╱ // 0x5084 @0x4
0x5080…508d at0006 = ╱33╱3╱ // 0x5086 @0x6
0x5080…508d at0007 = ╱fe0000c002╱ // 0x5087 @0x7
0x5080…508d at000c = EOL // 0x508c @0xc
0x5080…508d }
0x508d…5095 ddec 8130 M=J
0x508d…5095 LineComalBin {
0x508d…5095 ptr = 0xddec // 0x508d @0x0
0x508d…5095 lno = 0x1fc2 // 0x508f @0x2
0x508d…5095 at0004 = ╱4d╱M╱ // 0x5091 @0x4
0x508d…5095 at0005 = ╱dc╱=╱ // 0x5092 @0x5
0x508d…5095 at0006 = ╱4a╱J╱ // 0x5093 @0x6
0x508d…5095 at0007 = EOL // 0x5094 @0x7
0x508d…5095 }
0x5095…50c2 de19 8140 EXEC INDPUT2(24,21,LTX1$,VARPRIS$)
0x5095…50c2 LineComalBin {
0x5095…50c2 ptr = 0xde19 // 0x5095 @0x0
0x5095…50c2 lno = 0x1fcc // 0x5097 @0x2
0x5095…50c2 at0004 = ╱9d╱ EXEC ╱ // 0x5099 @0x4
0x5095…50c2 at0005 = ╱49╱I╱ // 0x509a @0x5
0x5095…50c2 at0006 = ╱4e╱N╱ // 0x509b @0x6
0x5095…50c2 at0007 = ╱44╱D╱ // 0x509c @0x7
0x5095…50c2 at0008 = ╱50╱P╱ // 0x509d @0x8
0x5095…50c2 at0009 = ╱55╱U╱ // 0x509e @0x9
0x5095…50c2 at000a = ╱54╱T╱ // 0x509f @0xa
0x5095…50c2 at000b = ╱32╱2╱ // 0x50a0 @0xb
0x5095…50c2 at000c = ╱ed╱(╱ // 0x50a1 @0xc
0x5095…50c2 at000d = ╱32╱2╱ // 0x50a2 @0xd
0x5095…50c2 at000e = ╱34╱4╱ // 0x50a3 @0xe
0x5095…50c2 at000f = ╱fe0000c005╱ // 0x50a4 @0xf
0x5095…50c2 at0014 = ╱ec╱,╱ // 0x50a9 @0x14
0x5095…50c2 at0015 = ╱32╱2╱ // 0x50aa @0x15
0x5095…50c2 at0016 = ╱31╱1╱ // 0x50ab @0x16
0x5095…50c2 at0017 = ╱fe0000a805╱ // 0x50ac @0x17
0x5095…50c2 at001c = ╱ec╱,╱ // 0x50b1 @0x1c
0x5095…50c2 at001d = ╱4c╱L╱ // 0x50b2 @0x1d
0x5095…50c2 at001e = ╱54╱T╱ // 0x50b3 @0x1e
0x5095…50c2 at001f = ╱58╱X╱ // 0x50b4 @0x1f
0x5095…50c2 at0020 = ╱31╱1╱ // 0x50b5 @0x20
0x5095…50c2 at0021 = ╱ef╱$╱ // 0x50b6 @0x21
0x5095…50c2 at0022 = ╱ec╱,╱ // 0x50b7 @0x22
0x5095…50c2 at0023 = ╱56╱V╱ // 0x50b8 @0x23
0x5095…50c2 at0024 = ╱41╱A╱ // 0x50b9 @0x24
0x5095…50c2 at0025 = ╱52╱R╱ // 0x50ba @0x25
0x5095…50c2 at0026 = ╱50╱P╱ // 0x50bb @0x26
0x5095…50c2 at0027 = ╱52╱R╱ // 0x50bc @0x27
0x5095…50c2 at0028 = ╱49╱I╱ // 0x50bd @0x28
0x5095…50c2 at0029 = ╱53╱S╱ // 0x50be @0x29
0x5095…50c2 at002a = ╱ef╱$╱ // 0x50bf @0x2a
0x5095…50c2 at002b = ╱ee╱)╱ // 0x50c0 @0x2b
0x5095…50c2 at002c = EOL // 0x50c1 @0x2c
0x5095…50c2 }
0x50c2…50d7 de2e 8150 CURSOR 30,21
0x50c2…50d7 LineComalBin {
0x50c2…50d7 ptr = 0xde2e // 0x50c2 @0x0
0x50c2…50d7 lno = 0x1fd6 // 0x50c4 @0x2
0x50c2…50d7 at0004 = ╱a1╱ CURSOR ╱ // 0x50c6 @0x4
0x50c2…50d7 at0005 = ╱33╱3╱ // 0x50c7 @0x5
0x50c2…50d7 at0006 = ╱30╱0╱ // 0x50c8 @0x6
0x50c2…50d7 at0007 = ╱fe0000f005╱ // 0x50c9 @0x7
0x50c2…50d7 at000c = ╱ec╱,╱ // 0x50ce @0xc
0x50c2…50d7 at000d = ╱32╱2╱ // 0x50cf @0xd
0x50c2…50d7 at000e = ╱31╱1╱ // 0x50d0 @0xe
0x50c2…50d7 at000f = ╱fe0000a805╱ // 0x50d1 @0xf
0x50c2…50d7 at0014 = EOL // 0x50d6 @0x14
0x50c2…50d7 }
0x50d7…5110 de67 8160 PRINT VARPRIS$(7:5);" %";BLANK$(1:25)
0x50d7…5110 LineComalBin {
0x50d7…5110 ptr = 0xde67 // 0x50d7 @0x0
0x50d7…5110 lno = 0x1fe0 // 0x50d9 @0x2
0x50d7…5110 at0004 = ╱92╱ PRINT ╱ // 0x50db @0x4
0x50d7…5110 at0005 = ╱56╱V╱ // 0x50dc @0x5
0x50d7…5110 at0006 = ╱41╱A╱ // 0x50dd @0x6
0x50d7…5110 at0007 = ╱52╱R╱ // 0x50de @0x7
0x50d7…5110 at0008 = ╱50╱P╱ // 0x50df @0x8
0x50d7…5110 at0009 = ╱52╱R╱ // 0x50e0 @0x9
0x50d7…5110 at000a = ╱49╱I╱ // 0x50e1 @0xa
0x50d7…5110 at000b = ╱53╱S╱ // 0x50e2 @0xb
0x50d7…5110 at000c = ╱ef╱$╱ // 0x50e3 @0xc
0x50d7…5110 at000d = ╱ed╱(╱ // 0x50e4 @0xd
0x50d7…5110 at000e = ╱37╱7╱ // 0x50e5 @0xe
0x50d7…5110 at000f = ╱fe0000e003╱ // 0x50e6 @0xf
0x50d7…5110 at0014 = ╱f0╱:╱ // 0x50eb @0x14
0x50d7…5110 at0015 = ╱35╱5╱ // 0x50ec @0x15
0x50d7…5110 at0016 = ╱fe0000a003╱ // 0x50ed @0x16
0x50d7…5110 at001b = ╱ee╱)╱ // 0x50f2 @0x1b
0x50d7…5110 at001c = ╱eb╱;╱ // 0x50f3 @0x1c
0x50d7…5110 at001d = ╱22╱"╱ // 0x50f4 @0x1d
0x50d7…5110 at001e = ╱20╱…╱ // 0x50f5 @0x1e
0x50d7…5110 at001f = ╱25╱%╱ // 0x50f6 @0x1f
0x50d7…5110 at0020 = ╱22╱"╱ // 0x50f7 @0x20
0x50d7…5110 at0021 = ╱eb╱;╱ // 0x50f8 @0x21
0x50d7…5110 at0022 = ╱42╱B╱ // 0x50f9 @0x22
0x50d7…5110 at0023 = ╱4c╱L╱ // 0x50fa @0x23
0x50d7…5110 at0024 = ╱41╱A╱ // 0x50fb @0x24
0x50d7…5110 at0025 = ╱4e╱N╱ // 0x50fc @0x25
0x50d7…5110 at0026 = ╱4b╱K╱ // 0x50fd @0x26
0x50d7…5110 at0027 = ╱ef╱$╱ // 0x50fe @0x27
0x50d7…5110 at0028 = ╱ed╱(╱ // 0x50ff @0x28
0x50d7…5110 at0029 = ╱31╱1╱ // 0x5100 @0x29
0x50d7…5110 at002a = ╱fe00008001╱ // 0x5101 @0x2a
0x50d7…5110 at002f = ╱f0╱:╱ // 0x5106 @0x2f
0x50d7…5110 at0030 = ╱32╱2╱ // 0x5107 @0x30
0x50d7…5110 at0031 = ╱35╱5╱ // 0x5108 @0x31
0x50d7…5110 at0032 = ╱fe0000c805╱ // 0x5109 @0x32
0x50d7…5110 at0037 = ╱ee╱)╱ // 0x510e @0x37
0x50d7…5110 at0038 = EOL // 0x510f @0x38
0x50d7…5110 }
0x5110…5144 de9b 8170 EXEC CA(2,VARPRIS$,BELØBARR$(M-1),BELØB$)
0x5110…5144 LineComalBin {
0x5110…5144 ptr = 0xde9b // 0x5110 @0x0
0x5110…5144 lno = 0x1fea // 0x5112 @0x2
0x5110…5144 at0004 = ╱9d╱ EXEC ╱ // 0x5114 @0x4
0x5110…5144 at0005 = ╱43╱C╱ // 0x5115 @0x5
0x5110…5144 at0006 = ╱41╱A╱ // 0x5116 @0x6
0x5110…5144 at0007 = ╱ed╱(╱ // 0x5117 @0x7
0x5110…5144 at0008 = ╱32╱2╱ // 0x5118 @0x8
0x5110…5144 at0009 = ╱fe00008002╱ // 0x5119 @0x9
0x5110…5144 at000e = ╱ec╱,╱ // 0x511e @0xe
0x5110…5144 at000f = ╱56╱V╱ // 0x511f @0xf
0x5110…5144 at0010 = ╱41╱A╱ // 0x5120 @0x10
0x5110…5144 at0011 = ╱52╱R╱ // 0x5121 @0x11
0x5110…5144 at0012 = ╱50╱P╱ // 0x5122 @0x12
0x5110…5144 at0013 = ╱52╱R╱ // 0x5123 @0x13
0x5110…5144 at0014 = ╱49╱I╱ // 0x5124 @0x14
0x5110…5144 at0015 = ╱53╱S╱ // 0x5125 @0x15
0x5110…5144 at0016 = ╱ef╱$╱ // 0x5126 @0x16
0x5110…5144 at0017 = ╱ec╱,╱ // 0x5127 @0x17
0x5110…5144 at0018 = ╱42╱B╱ // 0x5128 @0x18
0x5110…5144 at0019 = ╱45╱E╱ // 0x5129 @0x19
0x5110…5144 at001a = ╱4c╱L╱ // 0x512a @0x1a
0x5110…5144 at001b = ╱5c╱Ø╱ // 0x512b @0x1b
0x5110…5144 at001c = ╱42╱B╱ // 0x512c @0x1c
0x5110…5144 at001d = ╱41╱A╱ // 0x512d @0x1d
0x5110…5144 at001e = ╱52╱R╱ // 0x512e @0x1e
0x5110…5144 at001f = ╱52╱R╱ // 0x512f @0x1f
0x5110…5144 at0020 = ╱ef╱$╱ // 0x5130 @0x20
0x5110…5144 at0021 = ╱ed╱(╱ // 0x5131 @0x21
0x5110…5144 at0022 = ╱4d╱M╱ // 0x5132 @0x22
0x5110…5144 at0023 = ╱e3╱-╱ // 0x5133 @0x23
0x5110…5144 at0024 = ╱31╱1╱ // 0x5134 @0x24
0x5110…5144 at0025 = ╱fe00008001╱ // 0x5135 @0x25
0x5110…5144 at002a = ╱ee╱)╱ // 0x513a @0x2a
0x5110…5144 at002b = ╱ec╱,╱ // 0x513b @0x2b
0x5110…5144 at002c = ╱42╱B╱ // 0x513c @0x2c
0x5110…5144 at002d = ╱45╱E╱ // 0x513d @0x2d
0x5110…5144 at002e = ╱4c╱L╱ // 0x513e @0x2e
0x5110…5144 at002f = ╱5c╱Ø╱ // 0x513f @0x2f
0x5110…5144 at0030 = ╱42╱B╱ // 0x5140 @0x30
0x5110…5144 at0031 = ╱ef╱$╱ // 0x5141 @0x31
0x5110…5144 at0032 = ╱ee╱)╱ // 0x5142 @0x32
0x5110…5144 at0033 = EOL // 0x5143 @0x33
0x5110…5144 }
0x5144…517b ded2 8180 VATEKARR$(M,7:5)=VARPRIS$(7:5)
0x5144…517b LineComalBin {
0x5144…517b ptr = 0xded2 // 0x5144 @0x0
0x5144…517b lno = 0x1ff4 // 0x5146 @0x2
0x5144…517b at0004 = ╱56╱V╱ // 0x5148 @0x4
0x5144…517b at0005 = ╱41╱A╱ // 0x5149 @0x5
0x5144…517b at0006 = ╱54╱T╱ // 0x514a @0x6
0x5144…517b at0007 = ╱45╱E╱ // 0x514b @0x7
0x5144…517b at0008 = ╱4b╱K╱ // 0x514c @0x8
0x5144…517b at0009 = ╱41╱A╱ // 0x514d @0x9
0x5144…517b at000a = ╱52╱R╱ // 0x514e @0xa
0x5144…517b at000b = ╱52╱R╱ // 0x514f @0xb
0x5144…517b at000c = ╱ef╱$╱ // 0x5150 @0xc
0x5144…517b at000d = ╱ed╱(╱ // 0x5151 @0xd
0x5144…517b at000e = ╱4d╱M╱ // 0x5152 @0xe
0x5144…517b at000f = ╱ec╱,╱ // 0x5153 @0xf
0x5144…517b at0010 = ╱37╱7╱ // 0x5154 @0x10
0x5144…517b at0011 = ╱fe0000e003╱ // 0x5155 @0x11
0x5144…517b at0016 = ╱f0╱:╱ // 0x515a @0x16
0x5144…517b at0017 = ╱35╱5╱ // 0x515b @0x17
0x5144…517b at0018 = ╱fe0000a003╱ // 0x515c @0x18
0x5144…517b at001d = ╱ee╱)╱ // 0x5161 @0x1d
0x5144…517b at001e = ╱dc╱=╱ // 0x5162 @0x1e
0x5144…517b at001f = ╱56╱V╱ // 0x5163 @0x1f
0x5144…517b at0020 = ╱41╱A╱ // 0x5164 @0x20
0x5144…517b at0021 = ╱52╱R╱ // 0x5165 @0x21
0x5144…517b at0022 = ╱50╱P╱ // 0x5166 @0x22
0x5144…517b at0023 = ╱52╱R╱ // 0x5167 @0x23
0x5144…517b at0024 = ╱49╱I╱ // 0x5168 @0x24
0x5144…517b at0025 = ╱53╱S╱ // 0x5169 @0x25
0x5144…517b at0026 = ╱ef╱$╱ // 0x516a @0x26
0x5144…517b at0027 = ╱ed╱(╱ // 0x516b @0x27
0x5144…517b at0028 = ╱37╱7╱ // 0x516c @0x28
0x5144…517b at0029 = ╱fe0000e003╱ // 0x516d @0x29
0x5144…517b at002e = ╱f0╱:╱ // 0x5172 @0x2e
0x5144…517b at002f = ╱35╱5╱ // 0x5173 @0x2f
0x5144…517b at0030 = ╱fe0000a003╱ // 0x5174 @0x30
0x5144…517b at0035 = ╱ee╱)╱ // 0x5179 @0x35
0x5144…517b at0036 = EOL // 0x517a @0x36
0x5144…517b }
0x517b…518f dee6 8190 VARPRIS$="100-"
0x517b…518f LineComalBin {
0x517b…518f ptr = 0xdee6 // 0x517b @0x0
0x517b…518f lno = 0x1ffe // 0x517d @0x2
0x517b…518f at0004 = ╱56╱V╱ // 0x517f @0x4
0x517b…518f at0005 = ╱41╱A╱ // 0x5180 @0x5
0x517b…518f at0006 = ╱52╱R╱ // 0x5181 @0x6
0x517b…518f at0007 = ╱50╱P╱ // 0x5182 @0x7
0x517b…518f at0008 = ╱52╱R╱ // 0x5183 @0x8
0x517b…518f at0009 = ╱49╱I╱ // 0x5184 @0x9
0x517b…518f at000a = ╱53╱S╱ // 0x5185 @0xa
0x517b…518f at000b = ╱ef╱$╱ // 0x5186 @0xb
0x517b…518f at000c = ╱dc╱=╱ // 0x5187 @0xc
0x517b…518f at000d = ╱22╱"╱ // 0x5188 @0xd
0x517b…518f at000e = ╱31╱1╱ // 0x5189 @0xe
0x517b…518f at000f = ╱30╱0╱ // 0x518a @0xf
0x517b…518f at0010 = ╱30╱0╱ // 0x518b @0x10
0x517b…518f at0011 = ╱2d╱-╱ // 0x518c @0x11
0x517b…518f at0012 = ╱22╱"╱ // 0x518d @0x12
0x517b…518f at0013 = EOL // 0x518e @0x13
0x517b…518f }
0x518f…51b6 df0d 8200 EXEC CA(3,BELØB$,VARPRIS$,BELØB$)
0x518f…51b6 LineComalBin {
0x518f…51b6 ptr = 0xdf0d // 0x518f @0x0
0x518f…51b6 lno = 0x2008 // 0x5191 @0x2
0x518f…51b6 at0004 = ╱9d╱ EXEC ╱ // 0x5193 @0x4
0x518f…51b6 at0005 = ╱43╱C╱ // 0x5194 @0x5
0x518f…51b6 at0006 = ╱41╱A╱ // 0x5195 @0x6
0x518f…51b6 at0007 = ╱ed╱(╱ // 0x5196 @0x7
0x518f…51b6 at0008 = ╱33╱3╱ // 0x5197 @0x8
0x518f…51b6 at0009 = ╱fe0000c002╱ // 0x5198 @0x9
0x518f…51b6 at000e = ╱ec╱,╱ // 0x519d @0xe
0x518f…51b6 at000f = ╱42╱B╱ // 0x519e @0xf
0x518f…51b6 at0010 = ╱45╱E╱ // 0x519f @0x10
0x518f…51b6 at0011 = ╱4c╱L╱ // 0x51a0 @0x11
0x518f…51b6 at0012 = ╱5c╱Ø╱ // 0x51a1 @0x12
0x518f…51b6 at0013 = ╱42╱B╱ // 0x51a2 @0x13
0x518f…51b6 at0014 = ╱ef╱$╱ // 0x51a3 @0x14
0x518f…51b6 at0015 = ╱ec╱,╱ // 0x51a4 @0x15
0x518f…51b6 at0016 = ╱56╱V╱ // 0x51a5 @0x16
0x518f…51b6 at0017 = ╱41╱A╱ // 0x51a6 @0x17
0x518f…51b6 at0018 = ╱52╱R╱ // 0x51a7 @0x18
0x518f…51b6 at0019 = ╱50╱P╱ // 0x51a8 @0x19
0x518f…51b6 at001a = ╱52╱R╱ // 0x51a9 @0x1a
0x518f…51b6 at001b = ╱49╱I╱ // 0x51aa @0x1b
0x518f…51b6 at001c = ╱53╱S╱ // 0x51ab @0x1c
0x518f…51b6 at001d = ╱ef╱$╱ // 0x51ac @0x1d
0x518f…51b6 at001e = ╱ec╱,╱ // 0x51ad @0x1e
0x518f…51b6 at001f = ╱42╱B╱ // 0x51ae @0x1f
0x518f…51b6 at0020 = ╱45╱E╱ // 0x51af @0x20
0x518f…51b6 at0021 = ╱4c╱L╱ // 0x51b0 @0x21
0x518f…51b6 at0022 = ╱5c╱Ø╱ // 0x51b1 @0x22
0x518f…51b6 at0023 = ╱42╱B╱ // 0x51b2 @0x23
0x518f…51b6 at0024 = ╱ef╱$╱ // 0x51b3 @0x24
0x518f…51b6 at0025 = ╱ee╱)╱ // 0x51b4 @0x25
0x518f…51b6 at0026 = EOL // 0x51b5 @0x26
0x518f…51b6 }
0x51b6…51cb df22 8210 CURSOR 66,21
0x51b6…51cb LineComalBin {
0x51b6…51cb ptr = 0xdf22 // 0x51b6 @0x0
0x51b6…51cb lno = 0x2012 // 0x51b8 @0x2
0x51b6…51cb at0004 = ╱a1╱ CURSOR ╱ // 0x51ba @0x4
0x51b6…51cb at0005 = ╱36╱6╱ // 0x51bb @0x5
0x51b6…51cb at0006 = ╱36╱6╱ // 0x51bc @0x6
0x51b6…51cb at0007 = ╱fe00008407╱ // 0x51bd @0x7
0x51b6…51cb at000c = ╱ec╱,╱ // 0x51c2 @0xc
0x51b6…51cb at000d = ╱32╱2╱ // 0x51c3 @0xd
0x51b6…51cb at000e = ╱31╱1╱ // 0x51c4 @0xe
0x51b6…51cb at000f = ╱fe0000a805╱ // 0x51c5 @0xf
0x51b6…51cb at0014 = EOL // 0x51ca @0x14
0x51b6…51cb }
0x51cb…51f0 df47 8220 EXEC TUD(BELØB$,TAL4$,1,0)
0x51cb…51f0 LineComalBin {
0x51cb…51f0 ptr = 0xdf47 // 0x51cb @0x0
0x51cb…51f0 lno = 0x201c // 0x51cd @0x2
0x51cb…51f0 at0004 = ╱9d╱ EXEC ╱ // 0x51cf @0x4
0x51cb…51f0 at0005 = ╱54╱T╱ // 0x51d0 @0x5
0x51cb…51f0 at0006 = ╱55╱U╱ // 0x51d1 @0x6
0x51cb…51f0 at0007 = ╱44╱D╱ // 0x51d2 @0x7
0x51cb…51f0 at0008 = ╱ed╱(╱ // 0x51d3 @0x8
0x51cb…51f0 at0009 = ╱42╱B╱ // 0x51d4 @0x9
0x51cb…51f0 at000a = ╱45╱E╱ // 0x51d5 @0xa
0x51cb…51f0 at000b = ╱4c╱L╱ // 0x51d6 @0xb
0x51cb…51f0 at000c = ╱5c╱Ø╱ // 0x51d7 @0xc
0x51cb…51f0 at000d = ╱42╱B╱ // 0x51d8 @0xd
0x51cb…51f0 at000e = ╱ef╱$╱ // 0x51d9 @0xe
0x51cb…51f0 at000f = ╱ec╱,╱ // 0x51da @0xf
0x51cb…51f0 at0010 = ╱54╱T╱ // 0x51db @0x10
0x51cb…51f0 at0011 = ╱41╱A╱ // 0x51dc @0x11
0x51cb…51f0 at0012 = ╱4c╱L╱ // 0x51dd @0x12
0x51cb…51f0 at0013 = ╱34╱4╱ // 0x51de @0x13
0x51cb…51f0 at0014 = ╱ef╱$╱ // 0x51df @0x14
0x51cb…51f0 at0015 = ╱ec╱,╱ // 0x51e0 @0x15
0x51cb…51f0 at0016 = ╱31╱1╱ // 0x51e1 @0x16
0x51cb…51f0 at0017 = ╱fe00008001╱ // 0x51e2 @0x17
0x51cb…51f0 at001c = ╱ec╱,╱ // 0x51e7 @0x1c
0x51cb…51f0 at001d = ╱30╱0╱ // 0x51e8 @0x1d
0x51cb…51f0 at001e = ╱fe00000000╱ // 0x51e9 @0x1e
0x51cb…51f0 at0023 = ╱ee╱)╱ // 0x51ee @0x23
0x51cb…51f0 at0024 = EOL // 0x51ef @0x24
0x51cb…51f0 }
0x51f0…5208 df5f 8230 BELØBARR$(M)=BELØB$
0x51f0…5208 LineComalBin {
0x51f0…5208 ptr = 0xdf5f // 0x51f0 @0x0
0x51f0…5208 lno = 0x2026 // 0x51f2 @0x2
0x51f0…5208 at0004 = ╱42╱B╱ // 0x51f4 @0x4
0x51f0…5208 at0005 = ╱45╱E╱ // 0x51f5 @0x5
0x51f0…5208 at0006 = ╱4c╱L╱ // 0x51f6 @0x6
0x51f0…5208 at0007 = ╱5c╱Ø╱ // 0x51f7 @0x7
0x51f0…5208 at0008 = ╱42╱B╱ // 0x51f8 @0x8
0x51f0…5208 at0009 = ╱41╱A╱ // 0x51f9 @0x9
0x51f0…5208 at000a = ╱52╱R╱ // 0x51fa @0xa
0x51f0…5208 at000b = ╱52╱R╱ // 0x51fb @0xb
0x51f0…5208 at000c = ╱ef╱$╱ // 0x51fc @0xc
0x51f0…5208 at000d = ╱ed╱(╱ // 0x51fd @0xd
0x51f0…5208 at000e = ╱4d╱M╱ // 0x51fe @0xe
0x51f0…5208 at000f = ╱ee╱)╱ // 0x51ff @0xf
0x51f0…5208 at0010 = ╱dc╱=╱ // 0x5200 @0x10
0x51f0…5208 at0011 = ╱42╱B╱ // 0x5201 @0x11
0x51f0…5208 at0012 = ╱45╱E╱ // 0x5202 @0x12
0x51f0…5208 at0013 = ╱4c╱L╱ // 0x5203 @0x13
0x51f0…5208 at0014 = ╱5c╱Ø╱ // 0x5204 @0x14
0x51f0…5208 at0015 = ╱42╱B╱ // 0x5205 @0x15
0x51f0…5208 at0016 = ╱ef╱$╱ // 0x5206 @0x16
0x51f0…5208 at0017 = EOL // 0x5207 @0x17
0x51f0…5208 }
0x5208…5213 df6a 8240 EXEC AJOUR
0x5208…5213 LineComalBin {
0x5208…5213 ptr = 0xdf6a // 0x5208 @0x0
0x5208…5213 lno = 0x2030 // 0x520a @0x2
0x5208…5213 at0004 = ╱9d╱ EXEC ╱ // 0x520c @0x4
0x5208…5213 at0005 = ╱41╱A╱ // 0x520d @0x5
0x5208…5213 at0006 = ╱4a╱J╱ // 0x520e @0x6
0x5208…5213 at0007 = ╱4f╱O╱ // 0x520f @0x7
0x5208…5213 at0008 = ╱55╱U╱ // 0x5210 @0x8
0x5208…5213 at0009 = ╱52╱R╱ // 0x5211 @0x9
0x5208…5213 at000a = EOL // 0x5212 @0xa
0x5208…5213 }
0x5213…5220 df77 8250 WHEN 4
0x5213…5220 LineComalBin {
0x5213…5220 ptr = 0xdf77 // 0x5213 @0x0
0x5213…5220 lno = 0x203a // 0x5215 @0x2
0x5213…5220 at0004 = ╱a301╱ WHEN ╱ // 0x5217 @0x4
0x5213…5220 at0006 = ╱34╱4╱ // 0x5219 @0x6
0x5213…5220 at0007 = ╱fe00008003╱ // 0x521a @0x7
0x5213…5220 at000c = EOL // 0x521f @0xc
0x5213…5220 }
0x5220…5235 df8c 8260 CURSOR 17,21
0x5220…5235 LineComalBin {
0x5220…5235 ptr = 0xdf8c // 0x5220 @0x0
0x5220…5235 lno = 0x2044 // 0x5222 @0x2
0x5220…5235 at0004 = ╱a1╱ CURSOR ╱ // 0x5224 @0x4
0x5220…5235 at0005 = ╱31╱1╱ // 0x5225 @0x5
0x5220…5235 at0006 = ╱37╱7╱ // 0x5226 @0x6
0x5220…5235 at0007 = ╱fe00008805╱ // 0x5227 @0x7
0x5220…5235 at000c = ╱ec╱,╱ // 0x522c @0xc
0x5220…5235 at000d = ╱32╱2╱ // 0x522d @0xd
0x5220…5235 at000e = ╱31╱1╱ // 0x522e @0xe
0x5220…5235 at000f = ╱fe0000a805╱ // 0x522f @0xf
0x5220…5235 at0014 = EOL // 0x5234 @0x14
0x5220…5235 }
0x5235…527a dfd1 8270 INPUT "Linien er en subtotal og kan ikke rettes. Tast RETURN.",SVAR2$
0x5235…527a LineComalBin {
0x5235…527a ptr = 0xdfd1 // 0x5235 @0x0
0x5235…527a lno = 0x204e // 0x5237 @0x2
0x5235…527a at0004 = ╱91╱ INPUT ╱ // 0x5239 @0x4
0x5235…527a at0005 = ╱22╱"╱ // 0x523a @0x5
0x5235…527a at0006 = ╱4c╱L╱ // 0x523b @0x6
0x5235…527a at0007 = ╱69╱i╱ // 0x523c @0x7
0x5235…527a at0008 = ╱6e╱n╱ // 0x523d @0x8
0x5235…527a at0009 = ╱69╱i╱ // 0x523e @0x9
0x5235…527a at000a = ╱65╱e╱ // 0x523f @0xa
0x5235…527a at000b = ╱6e╱n╱ // 0x5240 @0xb
0x5235…527a at000c = ╱20╱…╱ // 0x5241 @0xc
0x5235…527a at000d = ╱65╱e╱ // 0x5242 @0xd
0x5235…527a at000e = ╱72╱r╱ // 0x5243 @0xe
0x5235…527a at000f = ╱20╱…╱ // 0x5244 @0xf
0x5235…527a at0010 = ╱65╱e╱ // 0x5245 @0x10
0x5235…527a at0011 = ╱6e╱n╱ // 0x5246 @0x11
0x5235…527a at0012 = ╱20╱…╱ // 0x5247 @0x12
0x5235…527a at0013 = ╱73╱s╱ // 0x5248 @0x13
0x5235…527a at0014 = ╱75╱u╱ // 0x5249 @0x14
0x5235…527a at0015 = ╱62╱b╱ // 0x524a @0x15
0x5235…527a at0016 = ╱74╱t╱ // 0x524b @0x16
0x5235…527a at0017 = ╱6f╱o╱ // 0x524c @0x17
0x5235…527a at0018 = ╱74╱t╱ // 0x524d @0x18
0x5235…527a at0019 = ╱61╱a╱ // 0x524e @0x19
0x5235…527a at001a = ╱6c╱l╱ // 0x524f @0x1a
0x5235…527a at001b = ╱20╱…╱ // 0x5250 @0x1b
0x5235…527a at001c = ╱6f╱o╱ // 0x5251 @0x1c
0x5235…527a at001d = ╱67╱g╱ // 0x5252 @0x1d
0x5235…527a at001e = ╱20╱…╱ // 0x5253 @0x1e
0x5235…527a at001f = ╱6b╱k╱ // 0x5254 @0x1f
0x5235…527a at0020 = ╱61╱a╱ // 0x5255 @0x20
0x5235…527a at0021 = ╱6e╱n╱ // 0x5256 @0x21
0x5235…527a at0022 = ╱20╱…╱ // 0x5257 @0x22
0x5235…527a at0023 = ╱69╱i╱ // 0x5258 @0x23
0x5235…527a at0024 = ╱6b╱k╱ // 0x5259 @0x24
0x5235…527a at0025 = ╱6b╱k╱ // 0x525a @0x25
0x5235…527a at0026 = ╱65╱e╱ // 0x525b @0x26
0x5235…527a at0027 = ╱20╱…╱ // 0x525c @0x27
0x5235…527a at0028 = ╱72╱r╱ // 0x525d @0x28
0x5235…527a at0029 = ╱65╱e╱ // 0x525e @0x29
0x5235…527a at002a = ╱74╱t╱ // 0x525f @0x2a
0x5235…527a at002b = ╱74╱t╱ // 0x5260 @0x2b
0x5235…527a at002c = ╱65╱e╱ // 0x5261 @0x2c
0x5235…527a at002d = ╱73╱s╱ // 0x5262 @0x2d
0x5235…527a at002e = ╱2e╱.╱ // 0x5263 @0x2e
0x5235…527a at002f = ╱20╱…╱ // 0x5264 @0x2f
0x5235…527a at0030 = ╱54╱T╱ // 0x5265 @0x30
0x5235…527a at0031 = ╱61╱a╱ // 0x5266 @0x31
0x5235…527a at0032 = ╱73╱s╱ // 0x5267 @0x32
0x5235…527a at0033 = ╱74╱t╱ // 0x5268 @0x33
0x5235…527a at0034 = ╱20╱…╱ // 0x5269 @0x34
0x5235…527a at0035 = ╱52╱R╱ // 0x526a @0x35
0x5235…527a at0036 = ╱45╱E╱ // 0x526b @0x36
0x5235…527a at0037 = ╱54╱T╱ // 0x526c @0x37
0x5235…527a at0038 = ╱55╱U╱ // 0x526d @0x38
0x5235…527a at0039 = ╱52╱R╱ // 0x526e @0x39
0x5235…527a at003a = ╱4e╱N╱ // 0x526f @0x3a
0x5235…527a at003b = ╱2e╱.╱ // 0x5270 @0x3b
0x5235…527a at003c = ╱22╱"╱ // 0x5271 @0x3c
0x5235…527a at003d = ╱ec╱,╱ // 0x5272 @0x3d
0x5235…527a at003e = ╱53╱S╱ // 0x5273 @0x3e
0x5235…527a at003f = ╱56╱V╱ // 0x5274 @0x3f
0x5235…527a at0040 = ╱41╱A╱ // 0x5275 @0x40
0x5235…527a at0041 = ╱52╱R╱ // 0x5276 @0x41
0x5235…527a at0042 = ╱32╱2╱ // 0x5277 @0x42
0x5235…527a at0043 = ╱ef╱$╱ // 0x5278 @0x43
0x5235…527a at0044 = EOL // 0x5279 @0x44
0x5235…527a }
0x527a…5280 dfd7 8280 ENDCASE
0x527a…5280 LineComalBin {
0x527a…5280 ptr = 0xdfd7 // 0x527a @0x0
0x527a…5280 lno = 0x2058 // 0x527c @0x2
0x527a…5280 at0004 = ╱a4╱ ENDCASE ╱ // 0x527e @0x4
0x527a…5280 at0005 = EOL // 0x527f @0x5
0x527a…5280 }
0x5280…528a dfe1 8290 WHEN "2"
0x5280…528a LineComalBin {
0x5280…528a ptr = 0xdfe1 // 0x5280 @0x0
0x5280…528a lno = 0x2062 // 0x5282 @0x2
0x5280…528a at0004 = ╱a300╱ WHEN ╱ // 0x5284 @0x4
0x5280…528a at0006 = ╱22╱"╱ // 0x5286 @0x6
0x5280…528a at0007 = ╱32╱2╱ // 0x5287 @0x7
0x5280…528a at0008 = ╱22╱"╱ // 0x5288 @0x8
0x5280…528a at0009 = EOL // 0x5289 @0x9
0x5280…528a }
0x528a…52c3 e01a 8300 EXEC INDPUT1(4,23,0,1+AVALIN,LTX10$)
0x528a…52c3 LineComalBin {
0x528a…52c3 ptr = 0xe01a // 0x528a @0x0
0x528a…52c3 lno = 0x206c // 0x528c @0x2
0x528a…52c3 at0004 = ╱9d╱ EXEC ╱ // 0x528e @0x4
0x528a…52c3 at0005 = ╱49╱I╱ // 0x528f @0x5
0x528a…52c3 at0006 = ╱4e╱N╱ // 0x5290 @0x6
0x528a…52c3 at0007 = ╱44╱D╱ // 0x5291 @0x7
0x528a…52c3 at0008 = ╱50╱P╱ // 0x5292 @0x8
0x528a…52c3 at0009 = ╱55╱U╱ // 0x5293 @0x9
0x528a…52c3 at000a = ╱54╱T╱ // 0x5294 @0xa
0x528a…52c3 at000b = ╱31╱1╱ // 0x5295 @0xb
0x528a…52c3 at000c = ╱ed╱(╱ // 0x5296 @0xc
0x528a…52c3 at000d = ╱34╱4╱ // 0x5297 @0xd
0x528a…52c3 at000e = ╱fe00008003╱ // 0x5298 @0xe
0x528a…52c3 at0013 = ╱ec╱,╱ // 0x529d @0x13
0x528a…52c3 at0014 = ╱32╱2╱ // 0x529e @0x14
0x528a…52c3 at0015 = ╱33╱3╱ // 0x529f @0x15
0x528a…52c3 at0016 = ╱fe0000b805╱ // 0x52a0 @0x16
0x528a…52c3 at001b = ╱ec╱,╱ // 0x52a5 @0x1b
0x528a…52c3 at001c = ╱30╱0╱ // 0x52a6 @0x1c
0x528a…52c3 at001d = ╱fe00000000╱ // 0x52a7 @0x1d
0x528a…52c3 at0022 = ╱ec╱,╱ // 0x52ac @0x22
0x528a…52c3 at0023 = ╱31╱1╱ // 0x52ad @0x23
0x528a…52c3 at0024 = ╱fe00008001╱ // 0x52ae @0x24
0x528a…52c3 at0029 = ╱e2╱+╱ // 0x52b3 @0x29
0x528a…52c3 at002a = ╱41╱A╱ // 0x52b4 @0x2a
0x528a…52c3 at002b = ╱56╱V╱ // 0x52b5 @0x2b
0x528a…52c3 at002c = ╱41╱A╱ // 0x52b6 @0x2c
0x528a…52c3 at002d = ╱4c╱L╱ // 0x52b7 @0x2d
0x528a…52c3 at002e = ╱49╱I╱ // 0x52b8 @0x2e
0x528a…52c3 at002f = ╱4e╱N╱ // 0x52b9 @0x2f
0x528a…52c3 at0030 = ╱ec╱,╱ // 0x52ba @0x30
0x528a…52c3 at0031 = ╱4c╱L╱ // 0x52bb @0x31
0x528a…52c3 at0032 = ╱54╱T╱ // 0x52bc @0x32
0x528a…52c3 at0033 = ╱58╱X╱ // 0x52bd @0x33
0x528a…52c3 at0034 = ╱31╱1╱ // 0x52be @0x34
0x528a…52c3 at0035 = ╱30╱0╱ // 0x52bf @0x35
0x528a…52c3 at0036 = ╱ef╱$╱ // 0x52c0 @0x36
0x528a…52c3 at0037 = ╱ee╱)╱ // 0x52c1 @0x37
0x528a…52c3 at0038 = EOL // 0x52c2 @0x38
0x528a…52c3 }
0x52c3…52cb e022 8310 J=P
0x52c3…52cb LineComalBin {
0x52c3…52cb ptr = 0xe022 // 0x52c3 @0x0
0x52c3…52cb lno = 0x2076 // 0x52c5 @0x2
0x52c3…52cb at0004 = ╱4a╱J╱ // 0x52c7 @0x4
0x52c3…52cb at0005 = ╱dc╱=╱ // 0x52c8 @0x5
0x52c3…52cb at0006 = ╱50╱P╱ // 0x52c9 @0x6
0x52c3…52cb at0007 = EOL // 0x52ca @0x7
0x52c3…52cb }
0x52cb…52df e036 8320 CURSOR 4,19
0x52cb…52df LineComalBin {
0x52cb…52df ptr = 0xe036 // 0x52cb @0x0
0x52cb…52df lno = 0x2080 // 0x52cd @0x2
0x52cb…52df at0004 = ╱a1╱ CURSOR ╱ // 0x52cf @0x4
0x52cb…52df at0005 = ╱34╱4╱ // 0x52d0 @0x5
0x52cb…52df at0006 = ╱fe00008003╱ // 0x52d1 @0x6
0x52cb…52df at000b = ╱ec╱,╱ // 0x52d6 @0xb
0x52cb…52df at000c = ╱31╱1╱ // 0x52d7 @0xc
0x52cb…52df at000d = ╱39╱9╱ // 0x52d8 @0xd
0x52cb…52df at000e = ╱fe00009805╱ // 0x52d9 @0xe
0x52cb…52df at0013 = EOL // 0x52de @0x13
0x52cb…52df }
0x52df…52f1 e048 8330 LINIE=19
0x52df…52f1 LineComalBin {
0x52df…52f1 ptr = 0xe048 // 0x52df @0x0
0x52df…52f1 lno = 0x208a // 0x52e1 @0x2
0x52df…52f1 at0004 = ╱4c╱L╱ // 0x52e3 @0x4
0x52df…52f1 at0005 = ╱49╱I╱ // 0x52e4 @0x5
0x52df…52f1 at0006 = ╱4e╱N╱ // 0x52e5 @0x6
0x52df…52f1 at0007 = ╱49╱I╱ // 0x52e6 @0x7
0x52df…52f1 at0008 = ╱45╱E╱ // 0x52e7 @0x8
0x52df…52f1 at0009 = ╱dc╱=╱ // 0x52e8 @0x9
0x52df…52f1 at000a = ╱31╱1╱ // 0x52e9 @0xa
0x52df…52f1 at000b = ╱39╱9╱ // 0x52ea @0xb
0x52df…52f1 at000c = ╱fe00009805╱ // 0x52eb @0xc
0x52df…52f1 at0011 = EOL // 0x52f0 @0x11
0x52df…52f1 }
0x52f1…52fb e052 8340 EXEC SLET
0x52f1…52fb LineComalBin {
0x52f1…52fb ptr = 0xe052 // 0x52f1 @0x0
0x52f1…52fb lno = 0x2094 // 0x52f3 @0x2
0x52f1…52fb at0004 = ╱9d╱ EXEC ╱ // 0x52f5 @0x4
0x52f1…52fb at0005 = ╱53╱S╱ // 0x52f6 @0x5
0x52f1…52fb at0006 = ╱4c╱L╱ // 0x52f7 @0x6
0x52f1…52fb at0007 = ╱45╱E╱ // 0x52f8 @0x7
0x52f1…52fb at0008 = ╱54╱T╱ // 0x52f9 @0x8
0x52f1…52fb at0009 = EOL // 0x52fa @0x9
0x52f1…52fb }
0x52fb…530c e063 8350 EXEC VARLINUD(J)
0x52fb…530c LineComalBin {
0x52fb…530c ptr = 0xe063 // 0x52fb @0x0
0x52fb…530c lno = 0x209e // 0x52fd @0x2
0x52fb…530c at0004 = ╱9d╱ EXEC ╱ // 0x52ff @0x4
0x52fb…530c at0005 = ╱56╱V╱ // 0x5300 @0x5
0x52fb…530c at0006 = ╱41╱A╱ // 0x5301 @0x6
0x52fb…530c at0007 = ╱52╱R╱ // 0x5302 @0x7
0x52fb…530c at0008 = ╱4c╱L╱ // 0x5303 @0x8
0x52fb…530c at0009 = ╱49╱I╱ // 0x5304 @0x9
0x52fb…530c at000a = ╱4e╱N╱ // 0x5305 @0xa
0x52fb…530c at000b = ╱55╱U╱ // 0x5306 @0xb
0x52fb…530c at000c = ╱44╱D╱ // 0x5307 @0xc
0x52fb…530c at000d = ╱ed╱(╱ // 0x5308 @0xd
0x52fb…530c at000e = ╱4a╱J╱ // 0x5309 @0xe
0x52fb…530c at000f = ╱ee╱)╱ // 0x530a @0xf
0x52fb…530c at0010 = EOL // 0x530b @0x10
0x52fb…530c }
0x530c…531b e072 8360 IF J<AVALIN THEN
0x530c…531b LineComalBin {
0x530c…531b ptr = 0xe072 // 0x530c @0x0
0x530c…531b lno = 0x20a8 // 0x530e @0x2
0x530c…531b at0004 = ╱9c╱ IF ╱ // 0x5310 @0x4
0x530c…531b at0005 = ╱4a╱J╱ // 0x5311 @0x5
0x530c…531b at0006 = ╱dd╱<╱ // 0x5312 @0x6
0x530c…531b at0007 = ╱41╱A╱ // 0x5313 @0x7
0x530c…531b at0008 = ╱56╱V╱ // 0x5314 @0x8
0x530c…531b at0009 = ╱41╱A╱ // 0x5315 @0x9
0x530c…531b at000a = ╱4c╱L╱ // 0x5316 @0xa
0x530c…531b at000b = ╱49╱I╱ // 0x5317 @0xb
0x530c…531b at000c = ╱4e╱N╱ // 0x5318 @0xc
0x530c…531b at000d = ╱b6╱ THEN ╱ // 0x5319 @0xd
0x530c…531b at000e = EOL // 0x531a @0xe
0x530c…531b }
0x531b…5338 e08f 8370 VARENR=VANRARR(J+1)
0x531b…5338 LineComalBin {
0x531b…5338 ptr = 0xe08f // 0x531b @0x0
0x531b…5338 lno = 0x20b2 // 0x531d @0x2
0x531b…5338 at0004 = ╱56╱V╱ // 0x531f @0x4
0x531b…5338 at0005 = ╱41╱A╱ // 0x5320 @0x5
0x531b…5338 at0006 = ╱52╱R╱ // 0x5321 @0x6
0x531b…5338 at0007 = ╱45╱E╱ // 0x5322 @0x7
0x531b…5338 at0008 = ╱4e╱N╱ // 0x5323 @0x8
0x531b…5338 at0009 = ╱52╱R╱ // 0x5324 @0x9
0x531b…5338 at000a = ╱dc╱=╱ // 0x5325 @0xa
0x531b…5338 at000b = ╱56╱V╱ // 0x5326 @0xb
0x531b…5338 at000c = ╱41╱A╱ // 0x5327 @0xc
0x531b…5338 at000d = ╱4e╱N╱ // 0x5328 @0xd
0x531b…5338 at000e = ╱52╱R╱ // 0x5329 @0xe
0x531b…5338 at000f = ╱41╱A╱ // 0x532a @0xf
0x531b…5338 at0010 = ╱52╱R╱ // 0x532b @0x10
0x531b…5338 at0011 = ╱52╱R╱ // 0x532c @0x11
0x531b…5338 at0012 = ╱ed╱(╱ // 0x532d @0x12
0x531b…5338 at0013 = ╱4a╱J╱ // 0x532e @0x13
0x531b…5338 at0014 = ╱e2╱+╱ // 0x532f @0x14
0x531b…5338 at0015 = ╱31╱1╱ // 0x5330 @0x15
0x531b…5338 at0016 = ╱fe00008001╱ // 0x5331 @0x16
0x531b…5338 at001b = ╱ee╱)╱ // 0x5336 @0x1b
0x531b…5338 at001c = EOL // 0x5337 @0x1c
0x531b…5338 }
0x5338…533e e095 8380 ELSE
0x5338…533e LineComalBin {
0x5338…533e ptr = 0xe095 // 0x5338 @0x0
0x5338…533e lno = 0x20bc // 0x533a @0x2
0x5338…533e at0004 = ╱9a╱ ELSE ╱ // 0x533c @0x4
0x5338…533e at0005 = EOL // 0x533d @0x5
0x5338…533e }
0x533e…5350 e0a7 8390 VARENR=0
0x533e…5350 LineComalBin {
0x533e…5350 ptr = 0xe0a7 // 0x533e @0x0
0x533e…5350 lno = 0x20c6 // 0x5340 @0x2
0x533e…5350 at0004 = ╱56╱V╱ // 0x5342 @0x4
0x533e…5350 at0005 = ╱41╱A╱ // 0x5343 @0x5
0x533e…5350 at0006 = ╱52╱R╱ // 0x5344 @0x6
0x533e…5350 at0007 = ╱45╱E╱ // 0x5345 @0x7
0x533e…5350 at0008 = ╱4e╱N╱ // 0x5346 @0x8
0x533e…5350 at0009 = ╱52╱R╱ // 0x5347 @0x9
0x533e…5350 at000a = ╱dc╱=╱ // 0x5348 @0xa
0x533e…5350 at000b = ╱30╱0╱ // 0x5349 @0xb
0x533e…5350 at000c = ╱fe00000000╱ // 0x534a @0xc
0x533e…5350 at0011 = EOL // 0x534f @0x11
0x533e…5350 }
0x5350…5356 e0ad 8400 ENDIF
0x5350…5356 LineComalBin {
0x5350…5356 ptr = 0xe0ad // 0x5350 @0x0
0x5350…5356 lno = 0x20d0 // 0x5352 @0x2
0x5350…5356 at0004 = ╱9b╱ ENDIF ╱ // 0x5354 @0x4
0x5350…5356 at0005 = EOL // 0x5355 @0x5
0x5350…5356 }
0x5356…538a e0e1 8410 EXEC INDPUT1(4,21,-9,-6,LTX11$)
0x5356…538a LineComalBin {
0x5356…538a ptr = 0xe0e1 // 0x5356 @0x0
0x5356…538a lno = 0x20da // 0x5358 @0x2
0x5356…538a at0004 = ╱9d╱ EXEC ╱ // 0x535a @0x4
0x5356…538a at0005 = ╱49╱I╱ // 0x535b @0x5
0x5356…538a at0006 = ╱4e╱N╱ // 0x535c @0x6
0x5356…538a at0007 = ╱44╱D╱ // 0x535d @0x7
0x5356…538a at0008 = ╱50╱P╱ // 0x535e @0x8
0x5356…538a at0009 = ╱55╱U╱ // 0x535f @0x9
0x5356…538a at000a = ╱54╱T╱ // 0x5360 @0xa
0x5356…538a at000b = ╱31╱1╱ // 0x5361 @0xb
0x5356…538a at000c = ╱ed╱(╱ // 0x5362 @0xc
0x5356…538a at000d = ╱34╱4╱ // 0x5363 @0xd
0x5356…538a at000e = ╱fe00008003╱ // 0x5364 @0xe
0x5356…538a at0013 = ╱ec╱,╱ // 0x5369 @0x13
0x5356…538a at0014 = ╱32╱2╱ // 0x536a @0x14
0x5356…538a at0015 = ╱31╱1╱ // 0x536b @0x15
0x5356…538a at0016 = ╱fe0000a805╱ // 0x536c @0x16
0x5356…538a at001b = ╱ec╱,╱ // 0x5371 @0x1b
0x5356…538a at001c = ╱e9╱-╱ // 0x5372 @0x1c
0x5356…538a at001d = ╱39╱9╱ // 0x5373 @0x1d
0x5356…538a at001e = ╱fe00009004╱ // 0x5374 @0x1e
0x5356…538a at0023 = ╱ec╱,╱ // 0x5379 @0x23
0x5356…538a at0024 = ╱e9╱-╱ // 0x537a @0x24
0x5356…538a at0025 = ╱36╱6╱ // 0x537b @0x25
0x5356…538a at0026 = ╱fe0000c003╱ // 0x537c @0x26
0x5356…538a at002b = ╱ec╱,╱ // 0x5381 @0x2b
0x5356…538a at002c = ╱4c╱L╱ // 0x5382 @0x2c
0x5356…538a at002d = ╱54╱T╱ // 0x5383 @0x2d
0x5356…538a at002e = ╱58╱X╱ // 0x5384 @0x2e
0x5356…538a at002f = ╱31╱1╱ // 0x5385 @0x2f
0x5356…538a at0030 = ╱31╱1╱ // 0x5386 @0x30
0x5356…538a at0031 = ╱ef╱$╱ // 0x5387 @0x31
0x5356…538a at0032 = ╱ee╱)╱ // 0x5388 @0x32
0x5356…538a at0033 = EOL // 0x5389 @0x33
0x5356…538a }
0x538a…53a8 e0ff 8420 IF P=-7 AND VARENR<>3 THEN
0x538a…53a8 LineComalBin {
0x538a…53a8 ptr = 0xe0ff // 0x538a @0x0
0x538a…53a8 lno = 0x20e4 // 0x538c @0x2
0x538a…53a8 at0004 = ╱9c╱ IF ╱ // 0x538e @0x4
0x538a…53a8 at0005 = ╱50╱P╱ // 0x538f @0x5
0x538a…53a8 at0006 = ╱dc╱=╱ // 0x5390 @0x6
0x538a…53a8 at0007 = ╱e9╱-╱ // 0x5391 @0x7
0x538a…53a8 at0008 = ╱37╱7╱ // 0x5392 @0x8
0x538a…53a8 at0009 = ╱fe0000e003╱ // 0x5393 @0x9
0x538a…53a8 at000e = ╱da╱ AND ╱ // 0x5398 @0xe
0x538a…53a8 at000f = ╱56╱V╱ // 0x5399 @0xf
0x538a…53a8 at0010 = ╱41╱A╱ // 0x539a @0x10
0x538a…53a8 at0011 = ╱52╱R╱ // 0x539b @0x11
0x538a…53a8 at0012 = ╱45╱E╱ // 0x539c @0x12
0x538a…53a8 at0013 = ╱4e╱N╱ // 0x539d @0x13
0x538a…53a8 at0014 = ╱52╱R╱ // 0x539e @0x14
0x538a…53a8 at0015 = ╱e1╱<>╱ // 0x539f @0x15
0x538a…53a8 at0016 = ╱33╱3╱ // 0x53a0 @0x16
0x538a…53a8 at0017 = ╱fe0000c002╱ // 0x53a1 @0x17
0x538a…53a8 at001c = ╱b6╱ THEN ╱ // 0x53a6 @0x1c
0x538a…53a8 at001d = EOL // 0x53a7 @0x1d
0x538a…53a8 }
0x53a8…53c1 e118 8430 AVALIN=AVALIN-1
0x53a8…53c1 LineComalBin {
0x53a8…53c1 ptr = 0xe118 // 0x53a8 @0x0
0x53a8…53c1 lno = 0x20ee // 0x53aa @0x2
0x53a8…53c1 at0004 = ╱41╱A╱ // 0x53ac @0x4
0x53a8…53c1 at0005 = ╱56╱V╱ // 0x53ad @0x5
0x53a8…53c1 at0006 = ╱41╱A╱ // 0x53ae @0x6
0x53a8…53c1 at0007 = ╱4c╱L╱ // 0x53af @0x7
0x53a8…53c1 at0008 = ╱49╱I╱ // 0x53b0 @0x8
0x53a8…53c1 at0009 = ╱4e╱N╱ // 0x53b1 @0x9
0x53a8…53c1 at000a = ╱dc╱=╱ // 0x53b2 @0xa
0x53a8…53c1 at000b = ╱41╱A╱ // 0x53b3 @0xb
0x53a8…53c1 at000c = ╱56╱V╱ // 0x53b4 @0xc
0x53a8…53c1 at000d = ╱41╱A╱ // 0x53b5 @0xd
0x53a8…53c1 at000e = ╱4c╱L╱ // 0x53b6 @0xe
0x53a8…53c1 at000f = ╱49╱I╱ // 0x53b7 @0xf
0x53a8…53c1 at0010 = ╱4e╱N╱ // 0x53b8 @0x10
0x53a8…53c1 at0011 = ╱e3╱-╱ // 0x53b9 @0x11
0x53a8…53c1 at0012 = ╱31╱1╱ // 0x53ba @0x12
0x53a8…53c1 at0013 = ╱fe00008001╱ // 0x53bb @0x13
0x53a8…53c1 at0018 = EOL // 0x53c0 @0x18
0x53a8…53c1 }
0x53c1…53d1 e128 8440 FOR M=J TO AVALIN
0x53c1…53d1 LineComalBin {
0x53c1…53d1 ptr = 0xe128 // 0x53c1 @0x0
0x53c1…53d1 lno = 0x20f8 // 0x53c3 @0x2
0x53c1…53d1 at0004 = ╱83╱ FOR ╱ // 0x53c5 @0x4
0x53c1…53d1 at0005 = ╱4d╱M╱ // 0x53c6 @0x5
0x53c1…53d1 at0006 = ╱dc╱=╱ // 0x53c7 @0x6
0x53c1…53d1 at0007 = ╱4a╱J╱ // 0x53c8 @0x7
0x53c1…53d1 at0008 = ╱b7╱ TO ╱ // 0x53c9 @0x8
0x53c1…53d1 at0009 = ╱41╱A╱ // 0x53ca @0x9
0x53c1…53d1 at000a = ╱56╱V╱ // 0x53cb @0xa
0x53c1…53d1 at000b = ╱41╱A╱ // 0x53cc @0xb
0x53c1…53d1 at000c = ╱4c╱L╱ // 0x53cd @0xc
0x53c1…53d1 at000d = ╱49╱I╱ // 0x53ce @0xd
0x53c1…53d1 at000e = ╱4e╱N╱ // 0x53cf @0xe
0x53c1…53d1 at000f = EOL // 0x53d0 @0xf
0x53c1…53d1 }
0x53d1…5413 e16a 8450 VANRARR(M)=VANRARR(M+1);VAANTARR$(M)=VAANTARR$(M+1)
0x53d1…5413 LineComalBin {
0x53d1…5413 ptr = 0xe16a // 0x53d1 @0x0
0x53d1…5413 lno = 0x2102 // 0x53d3 @0x2
0x53d1…5413 at0004 = ╱56╱V╱ // 0x53d5 @0x4
0x53d1…5413 at0005 = ╱41╱A╱ // 0x53d6 @0x5
0x53d1…5413 at0006 = ╱4e╱N╱ // 0x53d7 @0x6
0x53d1…5413 at0007 = ╱52╱R╱ // 0x53d8 @0x7
0x53d1…5413 at0008 = ╱41╱A╱ // 0x53d9 @0x8
0x53d1…5413 at0009 = ╱52╱R╱ // 0x53da @0x9
0x53d1…5413 at000a = ╱52╱R╱ // 0x53db @0xa
0x53d1…5413 at000b = ╱ed╱(╱ // 0x53dc @0xb
0x53d1…5413 at000c = ╱4d╱M╱ // 0x53dd @0xc
0x53d1…5413 at000d = ╱ee╱)╱ // 0x53de @0xd
0x53d1…5413 at000e = ╱dc╱=╱ // 0x53df @0xe
0x53d1…5413 at000f = ╱56╱V╱ // 0x53e0 @0xf
0x53d1…5413 at0010 = ╱41╱A╱ // 0x53e1 @0x10
0x53d1…5413 at0011 = ╱4e╱N╱ // 0x53e2 @0x11
0x53d1…5413 at0012 = ╱52╱R╱ // 0x53e3 @0x12
0x53d1…5413 at0013 = ╱41╱A╱ // 0x53e4 @0x13
0x53d1…5413 at0014 = ╱52╱R╱ // 0x53e5 @0x14
0x53d1…5413 at0015 = ╱52╱R╱ // 0x53e6 @0x15
0x53d1…5413 at0016 = ╱ed╱(╱ // 0x53e7 @0x16
0x53d1…5413 at0017 = ╱4d╱M╱ // 0x53e8 @0x17
0x53d1…5413 at0018 = ╱e2╱+╱ // 0x53e9 @0x18
0x53d1…5413 at0019 = ╱31╱1╱ // 0x53ea @0x19
0x53d1…5413 at001a = ╱fe00008001╱ // 0x53eb @0x1a
0x53d1…5413 at001f = ╱ee╱)╱ // 0x53f0 @0x1f
0x53d1…5413 at0020 = ╱eb╱;╱ // 0x53f1 @0x20
0x53d1…5413 at0021 = ╱56╱V╱ // 0x53f2 @0x21
0x53d1…5413 at0022 = ╱41╱A╱ // 0x53f3 @0x22
0x53d1…5413 at0023 = ╱41╱A╱ // 0x53f4 @0x23
0x53d1…5413 at0024 = ╱4e╱N╱ // 0x53f5 @0x24
0x53d1…5413 at0025 = ╱54╱T╱ // 0x53f6 @0x25
0x53d1…5413 at0026 = ╱41╱A╱ // 0x53f7 @0x26
0x53d1…5413 at0027 = ╱52╱R╱ // 0x53f8 @0x27
0x53d1…5413 at0028 = ╱52╱R╱ // 0x53f9 @0x28
0x53d1…5413 at0029 = ╱ef╱$╱ // 0x53fa @0x29
0x53d1…5413 at002a = ╱ed╱(╱ // 0x53fb @0x2a
0x53d1…5413 at002b = ╱4d╱M╱ // 0x53fc @0x2b
0x53d1…5413 at002c = ╱ee╱)╱ // 0x53fd @0x2c
0x53d1…5413 at002d = ╱dc╱=╱ // 0x53fe @0x2d
0x53d1…5413 at002e = ╱56╱V╱ // 0x53ff @0x2e
0x53d1…5413 at002f = ╱41╱A╱ // 0x5400 @0x2f
0x53d1…5413 at0030 = ╱41╱A╱ // 0x5401 @0x30
0x53d1…5413 at0031 = ╱4e╱N╱ // 0x5402 @0x31
0x53d1…5413 at0032 = ╱54╱T╱ // 0x5403 @0x32
0x53d1…5413 at0033 = ╱41╱A╱ // 0x5404 @0x33
0x53d1…5413 at0034 = ╱52╱R╱ // 0x5405 @0x34
0x53d1…5413 at0035 = ╱52╱R╱ // 0x5406 @0x35
0x53d1…5413 at0036 = ╱ef╱$╱ // 0x5407 @0x36
0x53d1…5413 at0037 = ╱ed╱(╱ // 0x5408 @0x37
0x53d1…5413 at0038 = ╱4d╱M╱ // 0x5409 @0x38
0x53d1…5413 at0039 = ╱e2╱+╱ // 0x540a @0x39
0x53d1…5413 at003a = ╱31╱1╱ // 0x540b @0x3a
0x53d1…5413 at003b = ╱fe00008001╱ // 0x540c @0x3b
0x53d1…5413 at0040 = ╱ee╱)╱ // 0x5411 @0x40
0x53d1…5413 at0041 = EOL // 0x5412 @0x41
0x53d1…5413 }
0x5413…5459 e1b0 8460 VATEKARR$(M)=VATEKARR$(M+1);VAPRIARR$(M)=VAPRIARR$(M+1)
0x5413…5459 LineComalBin {
0x5413…5459 ptr = 0xe1b0 // 0x5413 @0x0
0x5413…5459 lno = 0x210c // 0x5415 @0x2
0x5413…5459 at0004 = ╱56╱V╱ // 0x5417 @0x4
0x5413…5459 at0005 = ╱41╱A╱ // 0x5418 @0x5
0x5413…5459 at0006 = ╱54╱T╱ // 0x5419 @0x6
0x5413…5459 at0007 = ╱45╱E╱ // 0x541a @0x7
0x5413…5459 at0008 = ╱4b╱K╱ // 0x541b @0x8
0x5413…5459 at0009 = ╱41╱A╱ // 0x541c @0x9
0x5413…5459 at000a = ╱52╱R╱ // 0x541d @0xa
0x5413…5459 at000b = ╱52╱R╱ // 0x541e @0xb
0x5413…5459 at000c = ╱ef╱$╱ // 0x541f @0xc
0x5413…5459 at000d = ╱ed╱(╱ // 0x5420 @0xd
0x5413…5459 at000e = ╱4d╱M╱ // 0x5421 @0xe
0x5413…5459 at000f = ╱ee╱)╱ // 0x5422 @0xf
0x5413…5459 at0010 = ╱dc╱=╱ // 0x5423 @0x10
0x5413…5459 at0011 = ╱56╱V╱ // 0x5424 @0x11
0x5413…5459 at0012 = ╱41╱A╱ // 0x5425 @0x12
0x5413…5459 at0013 = ╱54╱T╱ // 0x5426 @0x13
0x5413…5459 at0014 = ╱45╱E╱ // 0x5427 @0x14
0x5413…5459 at0015 = ╱4b╱K╱ // 0x5428 @0x15
0x5413…5459 at0016 = ╱41╱A╱ // 0x5429 @0x16
0x5413…5459 at0017 = ╱52╱R╱ // 0x542a @0x17
0x5413…5459 at0018 = ╱52╱R╱ // 0x542b @0x18
0x5413…5459 at0019 = ╱ef╱$╱ // 0x542c @0x19
0x5413…5459 at001a = ╱ed╱(╱ // 0x542d @0x1a
0x5413…5459 at001b = ╱4d╱M╱ // 0x542e @0x1b
0x5413…5459 at001c = ╱e2╱+╱ // 0x542f @0x1c
0x5413…5459 at001d = ╱31╱1╱ // 0x5430 @0x1d
0x5413…5459 at001e = ╱fe00008001╱ // 0x5431 @0x1e
0x5413…5459 at0023 = ╱ee╱)╱ // 0x5436 @0x23
0x5413…5459 at0024 = ╱eb╱;╱ // 0x5437 @0x24
0x5413…5459 at0025 = ╱56╱V╱ // 0x5438 @0x25
0x5413…5459 at0026 = ╱41╱A╱ // 0x5439 @0x26
0x5413…5459 at0027 = ╱50╱P╱ // 0x543a @0x27
0x5413…5459 at0028 = ╱52╱R╱ // 0x543b @0x28
0x5413…5459 at0029 = ╱49╱I╱ // 0x543c @0x29
0x5413…5459 at002a = ╱41╱A╱ // 0x543d @0x2a
0x5413…5459 at002b = ╱52╱R╱ // 0x543e @0x2b
0x5413…5459 at002c = ╱52╱R╱ // 0x543f @0x2c
0x5413…5459 at002d = ╱ef╱$╱ // 0x5440 @0x2d
0x5413…5459 at002e = ╱ed╱(╱ // 0x5441 @0x2e
0x5413…5459 at002f = ╱4d╱M╱ // 0x5442 @0x2f
0x5413…5459 at0030 = ╱ee╱)╱ // 0x5443 @0x30
0x5413…5459 at0031 = ╱dc╱=╱ // 0x5444 @0x31
0x5413…5459 at0032 = ╱56╱V╱ // 0x5445 @0x32
0x5413…5459 at0033 = ╱41╱A╱ // 0x5446 @0x33
0x5413…5459 at0034 = ╱50╱P╱ // 0x5447 @0x34
0x5413…5459 at0035 = ╱52╱R╱ // 0x5448 @0x35
0x5413…5459 at0036 = ╱49╱I╱ // 0x5449 @0x36
0x5413…5459 at0037 = ╱41╱A╱ // 0x544a @0x37
0x5413…5459 at0038 = ╱52╱R╱ // 0x544b @0x38
0x5413…5459 at0039 = ╱52╱R╱ // 0x544c @0x39
0x5413…5459 at003a = ╱ef╱$╱ // 0x544d @0x3a
0x5413…5459 at003b = ╱ed╱(╱ // 0x544e @0x3b
0x5413…5459 at003c = ╱4d╱M╱ // 0x544f @0x3c
0x5413…5459 at003d = ╱e2╱+╱ // 0x5450 @0x3d
0x5413…5459 at003e = ╱31╱1╱ // 0x5451 @0x3e
0x5413…5459 at003f = ╱fe00008001╱ // 0x5452 @0x3f
0x5413…5459 at0044 = ╱ee╱)╱ // 0x5457 @0x44
0x5413…5459 at0045 = EOL // 0x5458 @0x45
0x5413…5459 }
0x5459…547e e1d5 8470 BELØBARR$(M)=BELØBARR$(M+1)
0x5459…547e LineComalBin {
0x5459…547e ptr = 0xe1d5 // 0x5459 @0x0
0x5459…547e lno = 0x2116 // 0x545b @0x2
0x5459…547e at0004 = ╱42╱B╱ // 0x545d @0x4
0x5459…547e at0005 = ╱45╱E╱ // 0x545e @0x5
0x5459…547e at0006 = ╱4c╱L╱ // 0x545f @0x6
0x5459…547e at0007 = ╱5c╱Ø╱ // 0x5460 @0x7
0x5459…547e at0008 = ╱42╱B╱ // 0x5461 @0x8
0x5459…547e at0009 = ╱41╱A╱ // 0x5462 @0x9
0x5459…547e at000a = ╱52╱R╱ // 0x5463 @0xa
0x5459…547e at000b = ╱52╱R╱ // 0x5464 @0xb
0x5459…547e at000c = ╱ef╱$╱ // 0x5465 @0xc
0x5459…547e at000d = ╱ed╱(╱ // 0x5466 @0xd
0x5459…547e at000e = ╱4d╱M╱ // 0x5467 @0xe
0x5459…547e at000f = ╱ee╱)╱ // 0x5468 @0xf
0x5459…547e at0010 = ╱dc╱=╱ // 0x5469 @0x10
0x5459…547e at0011 = ╱42╱B╱ // 0x546a @0x11
0x5459…547e at0012 = ╱45╱E╱ // 0x546b @0x12
0x5459…547e at0013 = ╱4c╱L╱ // 0x546c @0x13
0x5459…547e at0014 = ╱5c╱Ø╱ // 0x546d @0x14
0x5459…547e at0015 = ╱42╱B╱ // 0x546e @0x15
0x5459…547e at0016 = ╱41╱A╱ // 0x546f @0x16
0x5459…547e at0017 = ╱52╱R╱ // 0x5470 @0x17
0x5459…547e at0018 = ╱52╱R╱ // 0x5471 @0x18
0x5459…547e at0019 = ╱ef╱$╱ // 0x5472 @0x19
0x5459…547e at001a = ╱ed╱(╱ // 0x5473 @0x1a
0x5459…547e at001b = ╱4d╱M╱ // 0x5474 @0x1b
0x5459…547e at001c = ╱e2╱+╱ // 0x5475 @0x1c
0x5459…547e at001d = ╱31╱1╱ // 0x5476 @0x1d
0x5459…547e at001e = ╱fe00008001╱ // 0x5477 @0x1e
0x5459…547e at0023 = ╱ee╱)╱ // 0x547c @0x23
0x5459…547e at0024 = EOL // 0x547d @0x24
0x5459…547e }
0x547e…54dc e233 8480 ARRKODER(M,1)=ARRKODER(M+1,1);ARRKODER(M,2)=ARRKODER(M+1,2)
0x547e…54dc LineComalBin {
0x547e…54dc ptr = 0xe233 // 0x547e @0x0
0x547e…54dc lno = 0x2120 // 0x5480 @0x2
0x547e…54dc at0004 = ╱41╱A╱ // 0x5482 @0x4
0x547e…54dc at0005 = ╱52╱R╱ // 0x5483 @0x5
0x547e…54dc at0006 = ╱52╱R╱ // 0x5484 @0x6
0x547e…54dc at0007 = ╱4b╱K╱ // 0x5485 @0x7
0x547e…54dc at0008 = ╱4f╱O╱ // 0x5486 @0x8
0x547e…54dc at0009 = ╱44╱D╱ // 0x5487 @0x9
0x547e…54dc at000a = ╱45╱E╱ // 0x5488 @0xa
0x547e…54dc at000b = ╱52╱R╱ // 0x5489 @0xb
0x547e…54dc at000c = ╱ed╱(╱ // 0x548a @0xc
0x547e…54dc at000d = ╱4d╱M╱ // 0x548b @0xd
0x547e…54dc at000e = ╱ec╱,╱ // 0x548c @0xe
0x547e…54dc at000f = ╱31╱1╱ // 0x548d @0xf
0x547e…54dc at0010 = ╱fe00008001╱ // 0x548e @0x10
0x547e…54dc at0015 = ╱ee╱)╱ // 0x5493 @0x15
0x547e…54dc at0016 = ╱dc╱=╱ // 0x5494 @0x16
0x547e…54dc at0017 = ╱41╱A╱ // 0x5495 @0x17
0x547e…54dc at0018 = ╱52╱R╱ // 0x5496 @0x18
0x547e…54dc at0019 = ╱52╱R╱ // 0x5497 @0x19
0x547e…54dc at001a = ╱4b╱K╱ // 0x5498 @0x1a
0x547e…54dc at001b = ╱4f╱O╱ // 0x5499 @0x1b
0x547e…54dc at001c = ╱44╱D╱ // 0x549a @0x1c
0x547e…54dc at001d = ╱45╱E╱ // 0x549b @0x1d
0x547e…54dc at001e = ╱52╱R╱ // 0x549c @0x1e
0x547e…54dc at001f = ╱ed╱(╱ // 0x549d @0x1f
0x547e…54dc at0020 = ╱4d╱M╱ // 0x549e @0x20
0x547e…54dc at0021 = ╱e2╱+╱ // 0x549f @0x21
0x547e…54dc at0022 = ╱31╱1╱ // 0x54a0 @0x22
0x547e…54dc at0023 = ╱fe00008001╱ // 0x54a1 @0x23
0x547e…54dc at0028 = ╱ec╱,╱ // 0x54a6 @0x28
0x547e…54dc at0029 = ╱31╱1╱ // 0x54a7 @0x29
0x547e…54dc at002a = ╱fe00008001╱ // 0x54a8 @0x2a
0x547e…54dc at002f = ╱ee╱)╱ // 0x54ad @0x2f
0x547e…54dc at0030 = ╱eb╱;╱ // 0x54ae @0x30
0x547e…54dc at0031 = ╱41╱A╱ // 0x54af @0x31
0x547e…54dc at0032 = ╱52╱R╱ // 0x54b0 @0x32
0x547e…54dc at0033 = ╱52╱R╱ // 0x54b1 @0x33
0x547e…54dc at0034 = ╱4b╱K╱ // 0x54b2 @0x34
0x547e…54dc at0035 = ╱4f╱O╱ // 0x54b3 @0x35
0x547e…54dc at0036 = ╱44╱D╱ // 0x54b4 @0x36
0x547e…54dc at0037 = ╱45╱E╱ // 0x54b5 @0x37
0x547e…54dc at0038 = ╱52╱R╱ // 0x54b6 @0x38
0x547e…54dc at0039 = ╱ed╱(╱ // 0x54b7 @0x39
0x547e…54dc at003a = ╱4d╱M╱ // 0x54b8 @0x3a
0x547e…54dc at003b = ╱ec╱,╱ // 0x54b9 @0x3b
0x547e…54dc at003c = ╱32╱2╱ // 0x54ba @0x3c
0x547e…54dc at003d = ╱fe00008002╱ // 0x54bb @0x3d
0x547e…54dc at0042 = ╱ee╱)╱ // 0x54c0 @0x42
0x547e…54dc at0043 = ╱dc╱=╱ // 0x54c1 @0x43
0x547e…54dc at0044 = ╱41╱A╱ // 0x54c2 @0x44
0x547e…54dc at0045 = ╱52╱R╱ // 0x54c3 @0x45
0x547e…54dc at0046 = ╱52╱R╱ // 0x54c4 @0x46
0x547e…54dc at0047 = ╱4b╱K╱ // 0x54c5 @0x47
0x547e…54dc at0048 = ╱4f╱O╱ // 0x54c6 @0x48
0x547e…54dc at0049 = ╱44╱D╱ // 0x54c7 @0x49
0x547e…54dc at004a = ╱45╱E╱ // 0x54c8 @0x4a
0x547e…54dc at004b = ╱52╱R╱ // 0x54c9 @0x4b
0x547e…54dc at004c = ╱ed╱(╱ // 0x54ca @0x4c
0x547e…54dc at004d = ╱4d╱M╱ // 0x54cb @0x4d
0x547e…54dc at004e = ╱e2╱+╱ // 0x54cc @0x4e
0x547e…54dc at004f = ╱31╱1╱ // 0x54cd @0x4f
0x547e…54dc at0050 = ╱fe00008001╱ // 0x54ce @0x50
0x547e…54dc at0055 = ╱ec╱,╱ // 0x54d3 @0x55
0x547e…54dc at0056 = ╱32╱2╱ // 0x54d4 @0x56
0x547e…54dc at0057 = ╱fe00008002╱ // 0x54d5 @0x57
0x547e…54dc at005c = ╱ee╱)╱ // 0x54da @0x5c
0x547e…54dc at005d = EOL // 0x54db @0x5d
0x547e…54dc }
0x54dc…54e3 e23a 8490 NEXT M
0x54dc…54e3 LineComalBin {
0x54dc…54e3 ptr = 0xe23a // 0x54dc @0x0
0x54dc…54e3 lno = 0x212a // 0x54de @0x2
0x54dc…54e3 at0004 = ╱84╱ NEXT ╱ // 0x54e0 @0x4
0x54dc…54e3 at0005 = ╱4d╱M╱ // 0x54e1 @0x5
0x54dc…54e3 at0006 = EOL // 0x54e2 @0x6
0x54dc…54e3 }
0x54e3…5533 e28a 8500 ARRKODER(1+AVALIN,1)=0;ARRKODER(1+AVALIN,2)=0
0x54e3…5533 LineComalBin {
0x54e3…5533 ptr = 0xe28a // 0x54e3 @0x0
0x54e3…5533 lno = 0x2134 // 0x54e5 @0x2
0x54e3…5533 at0004 = ╱41╱A╱ // 0x54e7 @0x4
0x54e3…5533 at0005 = ╱52╱R╱ // 0x54e8 @0x5
0x54e3…5533 at0006 = ╱52╱R╱ // 0x54e9 @0x6
0x54e3…5533 at0007 = ╱4b╱K╱ // 0x54ea @0x7
0x54e3…5533 at0008 = ╱4f╱O╱ // 0x54eb @0x8
0x54e3…5533 at0009 = ╱44╱D╱ // 0x54ec @0x9
0x54e3…5533 at000a = ╱45╱E╱ // 0x54ed @0xa
0x54e3…5533 at000b = ╱52╱R╱ // 0x54ee @0xb
0x54e3…5533 at000c = ╱ed╱(╱ // 0x54ef @0xc
0x54e3…5533 at000d = ╱31╱1╱ // 0x54f0 @0xd
0x54e3…5533 at000e = ╱fe00008001╱ // 0x54f1 @0xe
0x54e3…5533 at0013 = ╱e2╱+╱ // 0x54f6 @0x13
0x54e3…5533 at0014 = ╱41╱A╱ // 0x54f7 @0x14
0x54e3…5533 at0015 = ╱56╱V╱ // 0x54f8 @0x15
0x54e3…5533 at0016 = ╱41╱A╱ // 0x54f9 @0x16
0x54e3…5533 at0017 = ╱4c╱L╱ // 0x54fa @0x17
0x54e3…5533 at0018 = ╱49╱I╱ // 0x54fb @0x18
0x54e3…5533 at0019 = ╱4e╱N╱ // 0x54fc @0x19
0x54e3…5533 at001a = ╱ec╱,╱ // 0x54fd @0x1a
0x54e3…5533 at001b = ╱31╱1╱ // 0x54fe @0x1b
0x54e3…5533 at001c = ╱fe00008001╱ // 0x54ff @0x1c
0x54e3…5533 at0021 = ╱ee╱)╱ // 0x5504 @0x21
0x54e3…5533 at0022 = ╱dc╱=╱ // 0x5505 @0x22
0x54e3…5533 at0023 = ╱30╱0╱ // 0x5506 @0x23
0x54e3…5533 at0024 = ╱fe00000000╱ // 0x5507 @0x24
0x54e3…5533 at0029 = ╱eb╱;╱ // 0x550c @0x29
0x54e3…5533 at002a = ╱41╱A╱ // 0x550d @0x2a
0x54e3…5533 at002b = ╱52╱R╱ // 0x550e @0x2b
0x54e3…5533 at002c = ╱52╱R╱ // 0x550f @0x2c
0x54e3…5533 at002d = ╱4b╱K╱ // 0x5510 @0x2d
0x54e3…5533 at002e = ╱4f╱O╱ // 0x5511 @0x2e
0x54e3…5533 at002f = ╱44╱D╱ // 0x5512 @0x2f
0x54e3…5533 at0030 = ╱45╱E╱ // 0x5513 @0x30
0x54e3…5533 at0031 = ╱52╱R╱ // 0x5514 @0x31
0x54e3…5533 at0032 = ╱ed╱(╱ // 0x5515 @0x32
0x54e3…5533 at0033 = ╱31╱1╱ // 0x5516 @0x33
0x54e3…5533 at0034 = ╱fe00008001╱ // 0x5517 @0x34
0x54e3…5533 at0039 = ╱e2╱+╱ // 0x551c @0x39
0x54e3…5533 at003a = ╱41╱A╱ // 0x551d @0x3a
0x54e3…5533 at003b = ╱56╱V╱ // 0x551e @0x3b
0x54e3…5533 at003c = ╱41╱A╱ // 0x551f @0x3c
0x54e3…5533 at003d = ╱4c╱L╱ // 0x5520 @0x3d
0x54e3…5533 at003e = ╱49╱I╱ // 0x5521 @0x3e
0x54e3…5533 at003f = ╱4e╱N╱ // 0x5522 @0x3f
0x54e3…5533 at0040 = ╱ec╱,╱ // 0x5523 @0x40
0x54e3…5533 at0041 = ╱32╱2╱ // 0x5524 @0x41
0x54e3…5533 at0042 = ╱fe00008002╱ // 0x5525 @0x42
0x54e3…5533 at0047 = ╱ee╱)╱ // 0x552a @0x47
0x54e3…5533 at0048 = ╱dc╱=╱ // 0x552b @0x48
0x54e3…5533 at0049 = ╱30╱0╱ // 0x552c @0x49
0x54e3…5533 at004a = ╱fe00000000╱ // 0x552d @0x4a
0x54e3…5533 at004f = EOL // 0x5532 @0x4f
0x54e3…5533 }
0x5533…553e e295 8510 EXEC AJOUR
0x5533…553e LineComalBin {
0x5533…553e ptr = 0xe295 // 0x5533 @0x0
0x5533…553e lno = 0x213e // 0x5535 @0x2
0x5533…553e at0004 = ╱9d╱ EXEC ╱ // 0x5537 @0x4
0x5533…553e at0005 = ╱41╱A╱ // 0x5538 @0x5
0x5533…553e at0006 = ╱4a╱J╱ // 0x5539 @0x6
0x5533…553e at0007 = ╱4f╱O╱ // 0x553a @0x7
0x5533…553e at0008 = ╱55╱U╱ // 0x553b @0x8
0x5533…553e at0009 = ╱52╱R╱ // 0x553c @0x9
0x5533…553e at000a = EOL // 0x553d @0xa
0x5533…553e }
0x553e…5544 e29b 8520 ENDIF
0x553e…5544 LineComalBin {
0x553e…5544 ptr = 0xe29b // 0x553e @0x0
0x553e…5544 lno = 0x2148 // 0x5540 @0x2
0x553e…5544 at0004 = ╱9b╱ ENDIF ╱ // 0x5542 @0x4
0x553e…5544 at0005 = EOL // 0x5543 @0x5
0x553e…5544 }
0x5544…554e e2a5 8530 WHEN "3"
0x5544…554e LineComalBin {
0x5544…554e ptr = 0xe2a5 // 0x5544 @0x0
0x5544…554e lno = 0x2152 // 0x5546 @0x2
0x5544…554e at0004 = ╱a300╱ WHEN ╱ // 0x5548 @0x4
0x5544…554e at0006 = ╱22╱"╱ // 0x554a @0x6
0x5544…554e at0007 = ╱33╱3╱ // 0x554b @0x7
0x5544…554e at0008 = ╱22╱"╱ // 0x554c @0x8
0x5544…554e at0009 = EOL // 0x554d @0x9
0x5544…554e }
0x554e…5587 e2de 8540 EXEC INDPUT1(4,23,0,1+AVALIN,LTX12$)
0x554e…5587 LineComalBin {
0x554e…5587 ptr = 0xe2de // 0x554e @0x0
0x554e…5587 lno = 0x215c // 0x5550 @0x2
0x554e…5587 at0004 = ╱9d╱ EXEC ╱ // 0x5552 @0x4
0x554e…5587 at0005 = ╱49╱I╱ // 0x5553 @0x5
0x554e…5587 at0006 = ╱4e╱N╱ // 0x5554 @0x6
0x554e…5587 at0007 = ╱44╱D╱ // 0x5555 @0x7
0x554e…5587 at0008 = ╱50╱P╱ // 0x5556 @0x8
0x554e…5587 at0009 = ╱55╱U╱ // 0x5557 @0x9
0x554e…5587 at000a = ╱54╱T╱ // 0x5558 @0xa
0x554e…5587 at000b = ╱31╱1╱ // 0x5559 @0xb
0x554e…5587 at000c = ╱ed╱(╱ // 0x555a @0xc
0x554e…5587 at000d = ╱34╱4╱ // 0x555b @0xd
0x554e…5587 at000e = ╱fe00008003╱ // 0x555c @0xe
0x554e…5587 at0013 = ╱ec╱,╱ // 0x5561 @0x13
0x554e…5587 at0014 = ╱32╱2╱ // 0x5562 @0x14
0x554e…5587 at0015 = ╱33╱3╱ // 0x5563 @0x15
0x554e…5587 at0016 = ╱fe0000b805╱ // 0x5564 @0x16
0x554e…5587 at001b = ╱ec╱,╱ // 0x5569 @0x1b
0x554e…5587 at001c = ╱30╱0╱ // 0x556a @0x1c
0x554e…5587 at001d = ╱fe00000000╱ // 0x556b @0x1d
0x554e…5587 at0022 = ╱ec╱,╱ // 0x5570 @0x22
0x554e…5587 at0023 = ╱31╱1╱ // 0x5571 @0x23
0x554e…5587 at0024 = ╱fe00008001╱ // 0x5572 @0x24
0x554e…5587 at0029 = ╱e2╱+╱ // 0x5577 @0x29
0x554e…5587 at002a = ╱41╱A╱ // 0x5578 @0x2a
0x554e…5587 at002b = ╱56╱V╱ // 0x5579 @0x2b
0x554e…5587 at002c = ╱41╱A╱ // 0x557a @0x2c
0x554e…5587 at002d = ╱4c╱L╱ // 0x557b @0x2d
0x554e…5587 at002e = ╱49╱I╱ // 0x557c @0x2e
0x554e…5587 at002f = ╱4e╱N╱ // 0x557d @0x2f
0x554e…5587 at0030 = ╱ec╱,╱ // 0x557e @0x30
0x554e…5587 at0031 = ╱4c╱L╱ // 0x557f @0x31
0x554e…5587 at0032 = ╱54╱T╱ // 0x5580 @0x32
0x554e…5587 at0033 = ╱58╱X╱ // 0x5581 @0x33
0x554e…5587 at0034 = ╱31╱1╱ // 0x5582 @0x34
0x554e…5587 at0035 = ╱32╱2╱ // 0x5583 @0x35
0x554e…5587 at0036 = ╱ef╱$╱ // 0x5584 @0x36
0x554e…5587 at0037 = ╱ee╱)╱ // 0x5585 @0x37
0x554e…5587 at0038 = EOL // 0x5586 @0x38
0x554e…5587 }
0x5587…558f e2e6 8550 J=P
0x5587…558f LineComalBin {
0x5587…558f ptr = 0xe2e6 // 0x5587 @0x0
0x5587…558f lno = 0x2166 // 0x5589 @0x2
0x5587…558f at0004 = ╱4a╱J╱ // 0x558b @0x4
0x5587…558f at0005 = ╱dc╱=╱ // 0x558c @0x5
0x5587…558f at0006 = ╱50╱P╱ // 0x558d @0x6
0x5587…558f at0007 = EOL // 0x558e @0x7
0x5587…558f }
0x558f…5599 e2f0 8560 EXEC SLET
0x558f…5599 LineComalBin {
0x558f…5599 ptr = 0xe2f0 // 0x558f @0x0
0x558f…5599 lno = 0x2170 // 0x5591 @0x2
0x558f…5599 at0004 = ╱9d╱ EXEC ╱ // 0x5593 @0x4
0x558f…5599 at0005 = ╱53╱S╱ // 0x5594 @0x5
0x558f…5599 at0006 = ╱4c╱L╱ // 0x5595 @0x6
0x558f…5599 at0007 = ╱45╱E╱ // 0x5596 @0x7
0x558f…5599 at0008 = ╱54╱T╱ // 0x5597 @0x8
0x558f…5599 at0009 = EOL // 0x5598 @0x9
0x558f…5599 }
0x5599…55a6 e2fd 8570 STARTL=J
0x5599…55a6 LineComalBin {
0x5599…55a6 ptr = 0xe2fd // 0x5599 @0x0
0x5599…55a6 lno = 0x217a // 0x559b @0x2
0x5599…55a6 at0004 = ╱53╱S╱ // 0x559d @0x4
0x5599…55a6 at0005 = ╱54╱T╱ // 0x559e @0x5
0x5599…55a6 at0006 = ╱41╱A╱ // 0x559f @0x6
0x5599…55a6 at0007 = ╱52╱R╱ // 0x55a0 @0x7
0x5599…55a6 at0008 = ╱54╱T╱ // 0x55a1 @0x8
0x5599…55a6 at0009 = ╱4c╱L╱ // 0x55a2 @0x9
0x5599…55a6 at000a = ╱dc╱=╱ // 0x55a3 @0xa
0x5599…55a6 at000b = ╱4a╱J╱ // 0x55a4 @0xb
0x5599…55a6 at000c = EOL // 0x55a5 @0xc
0x5599…55a6 }
0x55a6…55bd e314 8580 IF AVALIN-J<12 THEN
0x55a6…55bd LineComalBin {
0x55a6…55bd ptr = 0xe314 // 0x55a6 @0x0
0x55a6…55bd lno = 0x2184 // 0x55a8 @0x2
0x55a6…55bd at0004 = ╱9c╱ IF ╱ // 0x55aa @0x4
0x55a6…55bd at0005 = ╱41╱A╱ // 0x55ab @0x5
0x55a6…55bd at0006 = ╱56╱V╱ // 0x55ac @0x6
0x55a6…55bd at0007 = ╱41╱A╱ // 0x55ad @0x7
0x55a6…55bd at0008 = ╱4c╱L╱ // 0x55ae @0x8
0x55a6…55bd at0009 = ╱49╱I╱ // 0x55af @0x9
0x55a6…55bd at000a = ╱4e╱N╱ // 0x55b0 @0xa
0x55a6…55bd at000b = ╱e3╱-╱ // 0x55b1 @0xb
0x55a6…55bd at000c = ╱4a╱J╱ // 0x55b2 @0xc
0x55a6…55bd at000d = ╱dd╱<╱ // 0x55b3 @0xd
0x55a6…55bd at000e = ╱31╱1╱ // 0x55b4 @0xe
0x55a6…55bd at000f = ╱32╱2╱ // 0x55b5 @0xf
0x55a6…55bd at0010 = ╱fe0000c004╱ // 0x55b6 @0x10
0x55a6…55bd at0015 = ╱b6╱ THEN ╱ // 0x55bb @0x15
0x55a6…55bd at0016 = EOL // 0x55bc @0x16
0x55a6…55bd }
0x55bd…55ce e325 8590 SLUTL=AVALIN
0x55bd…55ce LineComalBin {
0x55bd…55ce ptr = 0xe325 // 0x55bd @0x0
0x55bd…55ce lno = 0x218e // 0x55bf @0x2
0x55bd…55ce at0004 = ╱53╱S╱ // 0x55c1 @0x4
0x55bd…55ce at0005 = ╱4c╱L╱ // 0x55c2 @0x5
0x55bd…55ce at0006 = ╱55╱U╱ // 0x55c3 @0x6
0x55bd…55ce at0007 = ╱54╱T╱ // 0x55c4 @0x7
0x55bd…55ce at0008 = ╱4c╱L╱ // 0x55c5 @0x8
0x55bd…55ce at0009 = ╱dc╱=╱ // 0x55c6 @0x9
0x55bd…55ce at000a = ╱41╱A╱ // 0x55c7 @0xa
0x55bd…55ce at000b = ╱56╱V╱ // 0x55c8 @0xb
0x55bd…55ce at000c = ╱41╱A╱ // 0x55c9 @0xc
0x55bd…55ce at000d = ╱4c╱L╱ // 0x55ca @0xd
0x55bd…55ce at000e = ╱49╱I╱ // 0x55cb @0xe
0x55bd…55ce at000f = ╱4e╱N╱ // 0x55cc @0xf
0x55bd…55ce at0010 = EOL // 0x55cd @0x10
0x55bd…55ce }
0x55ce…55d4 e32b 8600 ELSE
0x55ce…55d4 LineComalBin {
0x55ce…55d4 ptr = 0xe32b // 0x55ce @0x0
0x55ce…55d4 lno = 0x2198 // 0x55d0 @0x2
0x55ce…55d4 at0004 = ╱9a╱ ELSE ╱ // 0x55d2 @0x4
0x55ce…55d4 at0005 = EOL // 0x55d3 @0x5
0x55ce…55d4 }
0x55d4…55e8 e33f 8610 SLUTL=J+11
0x55d4…55e8 LineComalBin {
0x55d4…55e8 ptr = 0xe33f // 0x55d4 @0x0
0x55d4…55e8 lno = 0x21a2 // 0x55d6 @0x2
0x55d4…55e8 at0004 = ╱53╱S╱ // 0x55d8 @0x4
0x55d4…55e8 at0005 = ╱4c╱L╱ // 0x55d9 @0x5
0x55d4…55e8 at0006 = ╱55╱U╱ // 0x55da @0x6
0x55d4…55e8 at0007 = ╱54╱T╱ // 0x55db @0x7
0x55d4…55e8 at0008 = ╱4c╱L╱ // 0x55dc @0x8
0x55d4…55e8 at0009 = ╱dc╱=╱ // 0x55dd @0x9
0x55d4…55e8 at000a = ╱4a╱J╱ // 0x55de @0xa
0x55d4…55e8 at000b = ╱e2╱+╱ // 0x55df @0xb
0x55d4…55e8 at000c = ╱31╱1╱ // 0x55e0 @0xc
0x55d4…55e8 at000d = ╱31╱1╱ // 0x55e1 @0xd
0x55d4…55e8 at000e = ╱fe0000b004╱ // 0x55e2 @0xe
0x55d4…55e8 at0013 = EOL // 0x55e7 @0x13
0x55d4…55e8 }
0x55e8…55ee e345 8620 ENDIF
0x55e8…55ee LineComalBin {
0x55e8…55ee ptr = 0xe345 // 0x55e8 @0x0
0x55e8…55ee lno = 0x21ac // 0x55ea @0x2
0x55e8…55ee at0004 = ╱9b╱ ENDIF ╱ // 0x55ec @0x4
0x55e8…55ee at0005 = EOL // 0x55ed @0x5
0x55e8…55ee }
0x55ee…55f7 e34e 8630 EXEC LUD
0x55ee…55f7 LineComalBin {
0x55ee…55f7 ptr = 0xe34e // 0x55ee @0x0
0x55ee…55f7 lno = 0x21b6 // 0x55f0 @0x2
0x55ee…55f7 at0004 = ╱9d╱ EXEC ╱ // 0x55f2 @0x4
0x55ee…55f7 at0005 = ╱4c╱L╱ // 0x55f3 @0x5
0x55ee…55f7 at0006 = ╱55╱U╱ // 0x55f4 @0x6
0x55ee…55f7 at0007 = ╱44╱D╱ // 0x55f5 @0x7
0x55ee…55f7 at0008 = EOL // 0x55f6 @0x8
0x55ee…55f7 }
0x55f7…5601 e358 8640 WHEN "4"
0x55f7…5601 LineComalBin {
0x55f7…5601 ptr = 0xe358 // 0x55f7 @0x0
0x55f7…5601 lno = 0x21c0 // 0x55f9 @0x2
0x55f7…5601 at0004 = ╱a300╱ WHEN ╱ // 0x55fb @0x4
0x55f7…5601 at0006 = ╱22╱"╱ // 0x55fd @0x6
0x55f7…5601 at0007 = ╱34╱4╱ // 0x55fe @0x7
0x55f7…5601 at0008 = ╱22╱"╱ // 0x55ff @0x8
0x55f7…5601 at0009 = EOL // 0x5600 @0x9
0x55f7…5601 }
0x5601…5613 e36a 8650 IF AVALIN<MFKL THEN
0x5601…5613 LineComalBin {
0x5601…5613 ptr = 0xe36a // 0x5601 @0x0
0x5601…5613 lno = 0x21ca // 0x5603 @0x2
0x5601…5613 at0004 = ╱9c╱ IF ╱ // 0x5605 @0x4
0x5601…5613 at0005 = ╱41╱A╱ // 0x5606 @0x5
0x5601…5613 at0006 = ╱56╱V╱ // 0x5607 @0x6
0x5601…5613 at0007 = ╱41╱A╱ // 0x5608 @0x7
0x5601…5613 at0008 = ╱4c╱L╱ // 0x5609 @0x8
0x5601…5613 at0009 = ╱49╱I╱ // 0x560a @0x9
0x5601…5613 at000a = ╱4e╱N╱ // 0x560b @0xa
0x5601…5613 at000b = ╱dd╱<╱ // 0x560c @0xb
0x5601…5613 at000c = ╱4d╱M╱ // 0x560d @0xc
0x5601…5613 at000d = ╱46╱F╱ // 0x560e @0xd
0x5601…5613 at000e = ╱4b╱K╱ // 0x560f @0xe
0x5601…5613 at000f = ╱4c╱L╱ // 0x5610 @0xf
0x5601…5613 at0010 = ╱b6╱ THEN ╱ // 0x5611 @0x10
0x5601…5613 at0011 = EOL // 0x5612 @0x11
0x5601…5613 }
0x5613…563a e391 8660 LINIE=19;AVALIN=AVALIN+1
0x5613…563a LineComalBin {
0x5613…563a ptr = 0xe391 // 0x5613 @0x0
0x5613…563a lno = 0x21d4 // 0x5615 @0x2
0x5613…563a at0004 = ╱4c╱L╱ // 0x5617 @0x4
0x5613…563a at0005 = ╱49╱I╱ // 0x5618 @0x5
0x5613…563a at0006 = ╱4e╱N╱ // 0x5619 @0x6
0x5613…563a at0007 = ╱49╱I╱ // 0x561a @0x7
0x5613…563a at0008 = ╱45╱E╱ // 0x561b @0x8
0x5613…563a at0009 = ╱dc╱=╱ // 0x561c @0x9
0x5613…563a at000a = ╱31╱1╱ // 0x561d @0xa
0x5613…563a at000b = ╱39╱9╱ // 0x561e @0xb
0x5613…563a at000c = ╱fe00009805╱ // 0x561f @0xc
0x5613…563a at0011 = ╱eb╱;╱ // 0x5624 @0x11
0x5613…563a at0012 = ╱41╱A╱ // 0x5625 @0x12
0x5613…563a at0013 = ╱56╱V╱ // 0x5626 @0x13
0x5613…563a at0014 = ╱41╱A╱ // 0x5627 @0x14
0x5613…563a at0015 = ╱4c╱L╱ // 0x5628 @0x15
0x5613…563a at0016 = ╱49╱I╱ // 0x5629 @0x16
0x5613…563a at0017 = ╱4e╱N╱ // 0x562a @0x17
0x5613…563a at0018 = ╱dc╱=╱ // 0x562b @0x18
0x5613…563a at0019 = ╱41╱A╱ // 0x562c @0x19
0x5613…563a at001a = ╱56╱V╱ // 0x562d @0x1a
0x5613…563a at001b = ╱41╱A╱ // 0x562e @0x1b
0x5613…563a at001c = ╱4c╱L╱ // 0x562f @0x1c
0x5613…563a at001d = ╱49╱I╱ // 0x5630 @0x1d
0x5613…563a at001e = ╱4e╱N╱ // 0x5631 @0x1e
0x5613…563a at001f = ╱e2╱+╱ // 0x5632 @0x1f
0x5613…563a at0020 = ╱31╱1╱ // 0x5633 @0x20
0x5613…563a at0021 = ╱fe00008001╱ // 0x5634 @0x21
0x5613…563a at0026 = EOL // 0x5639 @0x26
0x5613…563a }
0x563a…5673 e3ca 8670 EXEC INDPUT1(4,23,0,1+AVALIN,LTX13$)
0x563a…5673 LineComalBin {
0x563a…5673 ptr = 0xe3ca // 0x563a @0x0
0x563a…5673 lno = 0x21de // 0x563c @0x2
0x563a…5673 at0004 = ╱9d╱ EXEC ╱ // 0x563e @0x4
0x563a…5673 at0005 = ╱49╱I╱ // 0x563f @0x5
0x563a…5673 at0006 = ╱4e╱N╱ // 0x5640 @0x6
0x563a…5673 at0007 = ╱44╱D╱ // 0x5641 @0x7
0x563a…5673 at0008 = ╱50╱P╱ // 0x5642 @0x8
0x563a…5673 at0009 = ╱55╱U╱ // 0x5643 @0x9
0x563a…5673 at000a = ╱54╱T╱ // 0x5644 @0xa
0x563a…5673 at000b = ╱31╱1╱ // 0x5645 @0xb
0x563a…5673 at000c = ╱ed╱(╱ // 0x5646 @0xc
0x563a…5673 at000d = ╱34╱4╱ // 0x5647 @0xd
0x563a…5673 at000e = ╱fe00008003╱ // 0x5648 @0xe
0x563a…5673 at0013 = ╱ec╱,╱ // 0x564d @0x13
0x563a…5673 at0014 = ╱32╱2╱ // 0x564e @0x14
0x563a…5673 at0015 = ╱33╱3╱ // 0x564f @0x15
0x563a…5673 at0016 = ╱fe0000b805╱ // 0x5650 @0x16
0x563a…5673 at001b = ╱ec╱,╱ // 0x5655 @0x1b
0x563a…5673 at001c = ╱30╱0╱ // 0x5656 @0x1c
0x563a…5673 at001d = ╱fe00000000╱ // 0x5657 @0x1d
0x563a…5673 at0022 = ╱ec╱,╱ // 0x565c @0x22
0x563a…5673 at0023 = ╱31╱1╱ // 0x565d @0x23
0x563a…5673 at0024 = ╱fe00008001╱ // 0x565e @0x24
0x563a…5673 at0029 = ╱e2╱+╱ // 0x5663 @0x29
0x563a…5673 at002a = ╱41╱A╱ // 0x5664 @0x2a
0x563a…5673 at002b = ╱56╱V╱ // 0x5665 @0x2b
0x563a…5673 at002c = ╱41╱A╱ // 0x5666 @0x2c
0x563a…5673 at002d = ╱4c╱L╱ // 0x5667 @0x2d
0x563a…5673 at002e = ╱49╱I╱ // 0x5668 @0x2e
0x563a…5673 at002f = ╱4e╱N╱ // 0x5669 @0x2f
0x563a…5673 at0030 = ╱ec╱,╱ // 0x566a @0x30
0x563a…5673 at0031 = ╱4c╱L╱ // 0x566b @0x31
0x563a…5673 at0032 = ╱54╱T╱ // 0x566c @0x32
0x563a…5673 at0033 = ╱58╱X╱ // 0x566d @0x33
0x563a…5673 at0034 = ╱31╱1╱ // 0x566e @0x34
0x563a…5673 at0035 = ╱33╱3╱ // 0x566f @0x35
0x563a…5673 at0036 = ╱ef╱$╱ // 0x5670 @0x36
0x563a…5673 at0037 = ╱ee╱)╱ // 0x5671 @0x37
0x563a…5673 at0038 = EOL // 0x5672 @0x38
0x563a…5673 }
0x5673…567d e3d4 8680 EXEC SLET
0x5673…567d LineComalBin {
0x5673…567d ptr = 0xe3d4 // 0x5673 @0x0
0x5673…567d lno = 0x21e8 // 0x5675 @0x2
0x5673…567d at0004 = ╱9d╱ EXEC ╱ // 0x5677 @0x4
0x5673…567d at0005 = ╱53╱S╱ // 0x5678 @0x5
0x5673…567d at0006 = ╱4c╱L╱ // 0x5679 @0x6
0x5673…567d at0007 = ╱45╱E╱ // 0x567a @0x7
0x5673…567d at0008 = ╱54╱T╱ // 0x567b @0x8
0x5673…567d at0009 = EOL // 0x567c @0x9
0x5673…567d }
0x567d…569c e3f3 8690 FOR M=AVALIN TO P+1 STEP -1
0x567d…569c LineComalBin {
0x567d…569c ptr = 0xe3f3 // 0x567d @0x0
0x567d…569c lno = 0x21f2 // 0x567f @0x2
0x567d…569c at0004 = ╱83╱ FOR ╱ // 0x5681 @0x4
0x567d…569c at0005 = ╱4d╱M╱ // 0x5682 @0x5
0x567d…569c at0006 = ╱dc╱=╱ // 0x5683 @0x6
0x567d…569c at0007 = ╱41╱A╱ // 0x5684 @0x7
0x567d…569c at0008 = ╱56╱V╱ // 0x5685 @0x8
0x567d…569c at0009 = ╱41╱A╱ // 0x5686 @0x9
0x567d…569c at000a = ╱4c╱L╱ // 0x5687 @0xa
0x567d…569c at000b = ╱49╱I╱ // 0x5688 @0xb
0x567d…569c at000c = ╱4e╱N╱ // 0x5689 @0xc
0x567d…569c at000d = ╱b7╱ TO ╱ // 0x568a @0xd
0x567d…569c at000e = ╱50╱P╱ // 0x568b @0xe
0x567d…569c at000f = ╱e2╱+╱ // 0x568c @0xf
0x567d…569c at0010 = ╱31╱1╱ // 0x568d @0x10
0x567d…569c at0011 = ╱fe00008001╱ // 0x568e @0x11
0x567d…569c at0016 = ╱b8╱ STEP ╱ // 0x5693 @0x16
0x567d…569c at0017 = ╱e9╱-╱ // 0x5694 @0x17
0x567d…569c at0018 = ╱31╱1╱ // 0x5695 @0x18
0x567d…569c at0019 = ╱fe00008001╱ // 0x5696 @0x19
0x567d…569c at001e = EOL // 0x569b @0x1e
0x567d…569c }
0x569c…56de e435 8700 VANRARR(M)=VANRARR(M-1);VAANTARR$(M)=VAANTARR$(M-1)
0x569c…56de LineComalBin {
0x569c…56de ptr = 0xe435 // 0x569c @0x0
0x569c…56de lno = 0x21fc // 0x569e @0x2
0x569c…56de at0004 = ╱56╱V╱ // 0x56a0 @0x4
0x569c…56de at0005 = ╱41╱A╱ // 0x56a1 @0x5
0x569c…56de at0006 = ╱4e╱N╱ // 0x56a2 @0x6
0x569c…56de at0007 = ╱52╱R╱ // 0x56a3 @0x7
0x569c…56de at0008 = ╱41╱A╱ // 0x56a4 @0x8
0x569c…56de at0009 = ╱52╱R╱ // 0x56a5 @0x9
0x569c…56de at000a = ╱52╱R╱ // 0x56a6 @0xa
0x569c…56de at000b = ╱ed╱(╱ // 0x56a7 @0xb
0x569c…56de at000c = ╱4d╱M╱ // 0x56a8 @0xc
0x569c…56de at000d = ╱ee╱)╱ // 0x56a9 @0xd
0x569c…56de at000e = ╱dc╱=╱ // 0x56aa @0xe
0x569c…56de at000f = ╱56╱V╱ // 0x56ab @0xf
0x569c…56de at0010 = ╱41╱A╱ // 0x56ac @0x10
0x569c…56de at0011 = ╱4e╱N╱ // 0x56ad @0x11
0x569c…56de at0012 = ╱52╱R╱ // 0x56ae @0x12
0x569c…56de at0013 = ╱41╱A╱ // 0x56af @0x13
0x569c…56de at0014 = ╱52╱R╱ // 0x56b0 @0x14
0x569c…56de at0015 = ╱52╱R╱ // 0x56b1 @0x15
0x569c…56de at0016 = ╱ed╱(╱ // 0x56b2 @0x16
0x569c…56de at0017 = ╱4d╱M╱ // 0x56b3 @0x17
0x569c…56de at0018 = ╱e3╱-╱ // 0x56b4 @0x18
0x569c…56de at0019 = ╱31╱1╱ // 0x56b5 @0x19
0x569c…56de at001a = ╱fe00008001╱ // 0x56b6 @0x1a
0x569c…56de at001f = ╱ee╱)╱ // 0x56bb @0x1f
0x569c…56de at0020 = ╱eb╱;╱ // 0x56bc @0x20
0x569c…56de at0021 = ╱56╱V╱ // 0x56bd @0x21
0x569c…56de at0022 = ╱41╱A╱ // 0x56be @0x22
0x569c…56de at0023 = ╱41╱A╱ // 0x56bf @0x23
0x569c…56de at0024 = ╱4e╱N╱ // 0x56c0 @0x24
0x569c…56de at0025 = ╱54╱T╱ // 0x56c1 @0x25
0x569c…56de at0026 = ╱41╱A╱ // 0x56c2 @0x26
0x569c…56de at0027 = ╱52╱R╱ // 0x56c3 @0x27
0x569c…56de at0028 = ╱52╱R╱ // 0x56c4 @0x28
0x569c…56de at0029 = ╱ef╱$╱ // 0x56c5 @0x29
0x569c…56de at002a = ╱ed╱(╱ // 0x56c6 @0x2a
0x569c…56de at002b = ╱4d╱M╱ // 0x56c7 @0x2b
0x569c…56de at002c = ╱ee╱)╱ // 0x56c8 @0x2c
0x569c…56de at002d = ╱dc╱=╱ // 0x56c9 @0x2d
0x569c…56de at002e = ╱56╱V╱ // 0x56ca @0x2e
0x569c…56de at002f = ╱41╱A╱ // 0x56cb @0x2f
0x569c…56de at0030 = ╱41╱A╱ // 0x56cc @0x30
0x569c…56de at0031 = ╱4e╱N╱ // 0x56cd @0x31
0x569c…56de at0032 = ╱54╱T╱ // 0x56ce @0x32
0x569c…56de at0033 = ╱41╱A╱ // 0x56cf @0x33
0x569c…56de at0034 = ╱52╱R╱ // 0x56d0 @0x34
0x569c…56de at0035 = ╱52╱R╱ // 0x56d1 @0x35
0x569c…56de at0036 = ╱ef╱$╱ // 0x56d2 @0x36
0x569c…56de at0037 = ╱ed╱(╱ // 0x56d3 @0x37
0x569c…56de at0038 = ╱4d╱M╱ // 0x56d4 @0x38
0x569c…56de at0039 = ╱e3╱-╱ // 0x56d5 @0x39
0x569c…56de at003a = ╱31╱1╱ // 0x56d6 @0x3a
0x569c…56de at003b = ╱fe00008001╱ // 0x56d7 @0x3b
0x569c…56de at0040 = ╱ee╱)╱ // 0x56dc @0x40
0x569c…56de at0041 = EOL // 0x56dd @0x41
0x569c…56de }
0x56de…5724 e47b 8710 VATEKARR$(M)=VATEKARR$(M-1);VAPRIARR$(M)=VAPRIARR$(M-1)
0x56de…5724 LineComalBin {
0x56de…5724 ptr = 0xe47b // 0x56de @0x0
0x56de…5724 lno = 0x2206 // 0x56e0 @0x2
0x56de…5724 at0004 = ╱56╱V╱ // 0x56e2 @0x4
0x56de…5724 at0005 = ╱41╱A╱ // 0x56e3 @0x5
0x56de…5724 at0006 = ╱54╱T╱ // 0x56e4 @0x6
0x56de…5724 at0007 = ╱45╱E╱ // 0x56e5 @0x7
0x56de…5724 at0008 = ╱4b╱K╱ // 0x56e6 @0x8
0x56de…5724 at0009 = ╱41╱A╱ // 0x56e7 @0x9
0x56de…5724 at000a = ╱52╱R╱ // 0x56e8 @0xa
0x56de…5724 at000b = ╱52╱R╱ // 0x56e9 @0xb
0x56de…5724 at000c = ╱ef╱$╱ // 0x56ea @0xc
0x56de…5724 at000d = ╱ed╱(╱ // 0x56eb @0xd
0x56de…5724 at000e = ╱4d╱M╱ // 0x56ec @0xe
0x56de…5724 at000f = ╱ee╱)╱ // 0x56ed @0xf
0x56de…5724 at0010 = ╱dc╱=╱ // 0x56ee @0x10
0x56de…5724 at0011 = ╱56╱V╱ // 0x56ef @0x11
0x56de…5724 at0012 = ╱41╱A╱ // 0x56f0 @0x12
0x56de…5724 at0013 = ╱54╱T╱ // 0x56f1 @0x13
0x56de…5724 at0014 = ╱45╱E╱ // 0x56f2 @0x14
0x56de…5724 at0015 = ╱4b╱K╱ // 0x56f3 @0x15
0x56de…5724 at0016 = ╱41╱A╱ // 0x56f4 @0x16
0x56de…5724 at0017 = ╱52╱R╱ // 0x56f5 @0x17
0x56de…5724 at0018 = ╱52╱R╱ // 0x56f6 @0x18
0x56de…5724 at0019 = ╱ef╱$╱ // 0x56f7 @0x19
0x56de…5724 at001a = ╱ed╱(╱ // 0x56f8 @0x1a
0x56de…5724 at001b = ╱4d╱M╱ // 0x56f9 @0x1b
0x56de…5724 at001c = ╱e3╱-╱ // 0x56fa @0x1c
0x56de…5724 at001d = ╱31╱1╱ // 0x56fb @0x1d
0x56de…5724 at001e = ╱fe00008001╱ // 0x56fc @0x1e
0x56de…5724 at0023 = ╱ee╱)╱ // 0x5701 @0x23
0x56de…5724 at0024 = ╱eb╱;╱ // 0x5702 @0x24
0x56de…5724 at0025 = ╱56╱V╱ // 0x5703 @0x25
0x56de…5724 at0026 = ╱41╱A╱ // 0x5704 @0x26
0x56de…5724 at0027 = ╱50╱P╱ // 0x5705 @0x27
0x56de…5724 at0028 = ╱52╱R╱ // 0x5706 @0x28
0x56de…5724 at0029 = ╱49╱I╱ // 0x5707 @0x29
0x56de…5724 at002a = ╱41╱A╱ // 0x5708 @0x2a
0x56de…5724 at002b = ╱52╱R╱ // 0x5709 @0x2b
0x56de…5724 at002c = ╱52╱R╱ // 0x570a @0x2c
0x56de…5724 at002d = ╱ef╱$╱ // 0x570b @0x2d
0x56de…5724 at002e = ╱ed╱(╱ // 0x570c @0x2e
0x56de…5724 at002f = ╱4d╱M╱ // 0x570d @0x2f
0x56de…5724 at0030 = ╱ee╱)╱ // 0x570e @0x30
0x56de…5724 at0031 = ╱dc╱=╱ // 0x570f @0x31
0x56de…5724 at0032 = ╱56╱V╱ // 0x5710 @0x32
0x56de…5724 at0033 = ╱41╱A╱ // 0x5711 @0x33
0x56de…5724 at0034 = ╱50╱P╱ // 0x5712 @0x34
0x56de…5724 at0035 = ╱52╱R╱ // 0x5713 @0x35
0x56de…5724 at0036 = ╱49╱I╱ // 0x5714 @0x36
0x56de…5724 at0037 = ╱41╱A╱ // 0x5715 @0x37
0x56de…5724 at0038 = ╱52╱R╱ // 0x5716 @0x38
0x56de…5724 at0039 = ╱52╱R╱ // 0x5717 @0x39
0x56de…5724 at003a = ╱ef╱$╱ // 0x5718 @0x3a
0x56de…5724 at003b = ╱ed╱(╱ // 0x5719 @0x3b
0x56de…5724 at003c = ╱4d╱M╱ // 0x571a @0x3c
0x56de…5724 at003d = ╱e3╱-╱ // 0x571b @0x3d
0x56de…5724 at003e = ╱31╱1╱ // 0x571c @0x3e
0x56de…5724 at003f = ╱fe00008001╱ // 0x571d @0x3f
0x56de…5724 at0044 = ╱ee╱)╱ // 0x5722 @0x44
0x56de…5724 at0045 = EOL // 0x5723 @0x45
0x56de…5724 }
0x5724…5749 e4a0 8720 BELØBARR$(M)=BELØBARR$(M-1)
0x5724…5749 LineComalBin {
0x5724…5749 ptr = 0xe4a0 // 0x5724 @0x0
0x5724…5749 lno = 0x2210 // 0x5726 @0x2
0x5724…5749 at0004 = ╱42╱B╱ // 0x5728 @0x4
0x5724…5749 at0005 = ╱45╱E╱ // 0x5729 @0x5
0x5724…5749 at0006 = ╱4c╱L╱ // 0x572a @0x6
0x5724…5749 at0007 = ╱5c╱Ø╱ // 0x572b @0x7
0x5724…5749 at0008 = ╱42╱B╱ // 0x572c @0x8
0x5724…5749 at0009 = ╱41╱A╱ // 0x572d @0x9
0x5724…5749 at000a = ╱52╱R╱ // 0x572e @0xa
0x5724…5749 at000b = ╱52╱R╱ // 0x572f @0xb
0x5724…5749 at000c = ╱ef╱$╱ // 0x5730 @0xc
0x5724…5749 at000d = ╱ed╱(╱ // 0x5731 @0xd
0x5724…5749 at000e = ╱4d╱M╱ // 0x5732 @0xe
0x5724…5749 at000f = ╱ee╱)╱ // 0x5733 @0xf
0x5724…5749 at0010 = ╱dc╱=╱ // 0x5734 @0x10
0x5724…5749 at0011 = ╱42╱B╱ // 0x5735 @0x11
0x5724…5749 at0012 = ╱45╱E╱ // 0x5736 @0x12
0x5724…5749 at0013 = ╱4c╱L╱ // 0x5737 @0x13
0x5724…5749 at0014 = ╱5c╱Ø╱ // 0x5738 @0x14
0x5724…5749 at0015 = ╱42╱B╱ // 0x5739 @0x15
0x5724…5749 at0016 = ╱41╱A╱ // 0x573a @0x16
0x5724…5749 at0017 = ╱52╱R╱ // 0x573b @0x17
0x5724…5749 at0018 = ╱52╱R╱ // 0x573c @0x18
0x5724…5749 at0019 = ╱ef╱$╱ // 0x573d @0x19
0x5724…5749 at001a = ╱ed╱(╱ // 0x573e @0x1a
0x5724…5749 at001b = ╱4d╱M╱ // 0x573f @0x1b
0x5724…5749 at001c = ╱e3╱-╱ // 0x5740 @0x1c
0x5724…5749 at001d = ╱31╱1╱ // 0x5741 @0x1d
0x5724…5749 at001e = ╱fe00008001╱ // 0x5742 @0x1e
0x5724…5749 at0023 = ╱ee╱)╱ // 0x5747 @0x23
0x5724…5749 at0024 = EOL // 0x5748 @0x24
0x5724…5749 }
0x5749…57a7 e4fe 8730 ARRKODER(M,1)=ARRKODER(M-1,1);ARRKODER(M,2)=ARRKODER(M-1,2)
0x5749…57a7 LineComalBin {
0x5749…57a7 ptr = 0xe4fe // 0x5749 @0x0
0x5749…57a7 lno = 0x221a // 0x574b @0x2
0x5749…57a7 at0004 = ╱41╱A╱ // 0x574d @0x4
0x5749…57a7 at0005 = ╱52╱R╱ // 0x574e @0x5
0x5749…57a7 at0006 = ╱52╱R╱ // 0x574f @0x6
0x5749…57a7 at0007 = ╱4b╱K╱ // 0x5750 @0x7
0x5749…57a7 at0008 = ╱4f╱O╱ // 0x5751 @0x8
0x5749…57a7 at0009 = ╱44╱D╱ // 0x5752 @0x9
0x5749…57a7 at000a = ╱45╱E╱ // 0x5753 @0xa
0x5749…57a7 at000b = ╱52╱R╱ // 0x5754 @0xb
0x5749…57a7 at000c = ╱ed╱(╱ // 0x5755 @0xc
0x5749…57a7 at000d = ╱4d╱M╱ // 0x5756 @0xd
0x5749…57a7 at000e = ╱ec╱,╱ // 0x5757 @0xe
0x5749…57a7 at000f = ╱31╱1╱ // 0x5758 @0xf
0x5749…57a7 at0010 = ╱fe00008001╱ // 0x5759 @0x10
0x5749…57a7 at0015 = ╱ee╱)╱ // 0x575e @0x15
0x5749…57a7 at0016 = ╱dc╱=╱ // 0x575f @0x16
0x5749…57a7 at0017 = ╱41╱A╱ // 0x5760 @0x17
0x5749…57a7 at0018 = ╱52╱R╱ // 0x5761 @0x18
0x5749…57a7 at0019 = ╱52╱R╱ // 0x5762 @0x19
0x5749…57a7 at001a = ╱4b╱K╱ // 0x5763 @0x1a
0x5749…57a7 at001b = ╱4f╱O╱ // 0x5764 @0x1b
0x5749…57a7 at001c = ╱44╱D╱ // 0x5765 @0x1c
0x5749…57a7 at001d = ╱45╱E╱ // 0x5766 @0x1d
0x5749…57a7 at001e = ╱52╱R╱ // 0x5767 @0x1e
0x5749…57a7 at001f = ╱ed╱(╱ // 0x5768 @0x1f
0x5749…57a7 at0020 = ╱4d╱M╱ // 0x5769 @0x20
0x5749…57a7 at0021 = ╱e3╱-╱ // 0x576a @0x21
0x5749…57a7 at0022 = ╱31╱1╱ // 0x576b @0x22
0x5749…57a7 at0023 = ╱fe00008001╱ // 0x576c @0x23
0x5749…57a7 at0028 = ╱ec╱,╱ // 0x5771 @0x28
0x5749…57a7 at0029 = ╱31╱1╱ // 0x5772 @0x29
0x5749…57a7 at002a = ╱fe00008001╱ // 0x5773 @0x2a
0x5749…57a7 at002f = ╱ee╱)╱ // 0x5778 @0x2f
0x5749…57a7 at0030 = ╱eb╱;╱ // 0x5779 @0x30
0x5749…57a7 at0031 = ╱41╱A╱ // 0x577a @0x31
0x5749…57a7 at0032 = ╱52╱R╱ // 0x577b @0x32
0x5749…57a7 at0033 = ╱52╱R╱ // 0x577c @0x33
0x5749…57a7 at0034 = ╱4b╱K╱ // 0x577d @0x34
0x5749…57a7 at0035 = ╱4f╱O╱ // 0x577e @0x35
0x5749…57a7 at0036 = ╱44╱D╱ // 0x577f @0x36
0x5749…57a7 at0037 = ╱45╱E╱ // 0x5780 @0x37
0x5749…57a7 at0038 = ╱52╱R╱ // 0x5781 @0x38
0x5749…57a7 at0039 = ╱ed╱(╱ // 0x5782 @0x39
0x5749…57a7 at003a = ╱4d╱M╱ // 0x5783 @0x3a
0x5749…57a7 at003b = ╱ec╱,╱ // 0x5784 @0x3b
0x5749…57a7 at003c = ╱32╱2╱ // 0x5785 @0x3c
0x5749…57a7 at003d = ╱fe00008002╱ // 0x5786 @0x3d
0x5749…57a7 at0042 = ╱ee╱)╱ // 0x578b @0x42
0x5749…57a7 at0043 = ╱dc╱=╱ // 0x578c @0x43
0x5749…57a7 at0044 = ╱41╱A╱ // 0x578d @0x44
0x5749…57a7 at0045 = ╱52╱R╱ // 0x578e @0x45
0x5749…57a7 at0046 = ╱52╱R╱ // 0x578f @0x46
0x5749…57a7 at0047 = ╱4b╱K╱ // 0x5790 @0x47
0x5749…57a7 at0048 = ╱4f╱O╱ // 0x5791 @0x48
0x5749…57a7 at0049 = ╱44╱D╱ // 0x5792 @0x49
0x5749…57a7 at004a = ╱45╱E╱ // 0x5793 @0x4a
0x5749…57a7 at004b = ╱52╱R╱ // 0x5794 @0x4b
0x5749…57a7 at004c = ╱ed╱(╱ // 0x5795 @0x4c
0x5749…57a7 at004d = ╱4d╱M╱ // 0x5796 @0x4d
0x5749…57a7 at004e = ╱e3╱-╱ // 0x5797 @0x4e
0x5749…57a7 at004f = ╱31╱1╱ // 0x5798 @0x4f
0x5749…57a7 at0050 = ╱fe00008001╱ // 0x5799 @0x50
0x5749…57a7 at0055 = ╱ec╱,╱ // 0x579e @0x55
0x5749…57a7 at0056 = ╱32╱2╱ // 0x579f @0x56
0x5749…57a7 at0057 = ╱fe00008002╱ // 0x57a0 @0x57
0x5749…57a7 at005c = ╱ee╱)╱ // 0x57a5 @0x5c
0x5749…57a7 at005d = EOL // 0x57a6 @0x5d
0x5749…57a7 }
0x57a7…57ae e505 8740 NEXT M
0x57a7…57ae LineComalBin {
0x57a7…57ae ptr = 0xe505 // 0x57a7 @0x0
0x57a7…57ae lno = 0x2224 // 0x57a9 @0x2
0x57a7…57ae at0004 = ╱84╱ NEXT ╱ // 0x57ab @0x4
0x57a7…57ae at0005 = ╱4d╱M╱ // 0x57ac @0x5
0x57a7…57ae at0006 = EOL // 0x57ad @0x6
0x57a7…57ae }
0x57ae…57b8 e50f 8750 EXEC SLET
0x57ae…57b8 LineComalBin {
0x57ae…57b8 ptr = 0xe50f // 0x57ae @0x0
0x57ae…57b8 lno = 0x222e // 0x57b0 @0x2
0x57ae…57b8 at0004 = ╱9d╱ EXEC ╱ // 0x57b2 @0x4
0x57ae…57b8 at0005 = ╱53╱S╱ // 0x57b3 @0x5
0x57ae…57b8 at0006 = ╱4c╱L╱ // 0x57b4 @0x6
0x57ae…57b8 at0007 = ╱45╱E╱ // 0x57b5 @0x7
0x57ae…57b8 at0008 = ╱54╱T╱ // 0x57b6 @0x8
0x57ae…57b8 at0009 = EOL // 0x57b7 @0x9
0x57ae…57b8 }
0x57b8…57d8 e52f 8760 GAVALIN=AVALIN;AVALIN=P;M=P
0x57b8…57d8 LineComalBin {
0x57b8…57d8 ptr = 0xe52f // 0x57b8 @0x0
0x57b8…57d8 lno = 0x2238 // 0x57ba @0x2
0x57b8…57d8 at0004 = ╱47╱G╱ // 0x57bc @0x4
0x57b8…57d8 at0005 = ╱41╱A╱ // 0x57bd @0x5
0x57b8…57d8 at0006 = ╱56╱V╱ // 0x57be @0x6
0x57b8…57d8 at0007 = ╱41╱A╱ // 0x57bf @0x7
0x57b8…57d8 at0008 = ╱4c╱L╱ // 0x57c0 @0x8
0x57b8…57d8 at0009 = ╱49╱I╱ // 0x57c1 @0x9
0x57b8…57d8 at000a = ╱4e╱N╱ // 0x57c2 @0xa
0x57b8…57d8 at000b = ╱dc╱=╱ // 0x57c3 @0xb
0x57b8…57d8 at000c = ╱41╱A╱ // 0x57c4 @0xc
0x57b8…57d8 at000d = ╱56╱V╱ // 0x57c5 @0xd
0x57b8…57d8 at000e = ╱41╱A╱ // 0x57c6 @0xe
0x57b8…57d8 at000f = ╱4c╱L╱ // 0x57c7 @0xf
0x57b8…57d8 at0010 = ╱49╱I╱ // 0x57c8 @0x10
0x57b8…57d8 at0011 = ╱4e╱N╱ // 0x57c9 @0x11
0x57b8…57d8 at0012 = ╱eb╱;╱ // 0x57ca @0x12
0x57b8…57d8 at0013 = ╱41╱A╱ // 0x57cb @0x13
0x57b8…57d8 at0014 = ╱56╱V╱ // 0x57cc @0x14
0x57b8…57d8 at0015 = ╱41╱A╱ // 0x57cd @0x15
0x57b8…57d8 at0016 = ╱4c╱L╱ // 0x57ce @0x16
0x57b8…57d8 at0017 = ╱49╱I╱ // 0x57cf @0x17
0x57b8…57d8 at0018 = ╱4e╱N╱ // 0x57d0 @0x18
0x57b8…57d8 at0019 = ╱dc╱=╱ // 0x57d1 @0x19
0x57b8…57d8 at001a = ╱50╱P╱ // 0x57d2 @0x1a
0x57b8…57d8 at001b = ╱eb╱;╱ // 0x57d3 @0x1b
0x57b8…57d8 at001c = ╱4d╱M╱ // 0x57d4 @0x1c
0x57b8…57d8 at001d = ╱dc╱=╱ // 0x57d5 @0x1d
0x57b8…57d8 at001e = ╱50╱P╱ // 0x57d6 @0x1e
0x57b8…57d8 at001f = EOL // 0x57d7 @0x1f
0x57b8…57d8 }
0x57d8…581a e571 8770 ARRKODER(AVALIN,1)=0;ARRKODER(AVALIN,2)=0
0x57d8…581a LineComalBin {
0x57d8…581a ptr = 0xe571 // 0x57d8 @0x0
0x57d8…581a lno = 0x2242 // 0x57da @0x2
0x57d8…581a at0004 = ╱41╱A╱ // 0x57dc @0x4
0x57d8…581a at0005 = ╱52╱R╱ // 0x57dd @0x5
0x57d8…581a at0006 = ╱52╱R╱ // 0x57de @0x6
0x57d8…581a at0007 = ╱4b╱K╱ // 0x57df @0x7
0x57d8…581a at0008 = ╱4f╱O╱ // 0x57e0 @0x8
0x57d8…581a at0009 = ╱44╱D╱ // 0x57e1 @0x9
0x57d8…581a at000a = ╱45╱E╱ // 0x57e2 @0xa
0x57d8…581a at000b = ╱52╱R╱ // 0x57e3 @0xb
0x57d8…581a at000c = ╱ed╱(╱ // 0x57e4 @0xc
0x57d8…581a at000d = ╱41╱A╱ // 0x57e5 @0xd
0x57d8…581a at000e = ╱56╱V╱ // 0x57e6 @0xe
0x57d8…581a at000f = ╱41╱A╱ // 0x57e7 @0xf
0x57d8…581a at0010 = ╱4c╱L╱ // 0x57e8 @0x10
0x57d8…581a at0011 = ╱49╱I╱ // 0x57e9 @0x11
0x57d8…581a at0012 = ╱4e╱N╱ // 0x57ea @0x12
0x57d8…581a at0013 = ╱ec╱,╱ // 0x57eb @0x13
0x57d8…581a at0014 = ╱31╱1╱ // 0x57ec @0x14
0x57d8…581a at0015 = ╱fe00008001╱ // 0x57ed @0x15
0x57d8…581a at001a = ╱ee╱)╱ // 0x57f2 @0x1a
0x57d8…581a at001b = ╱dc╱=╱ // 0x57f3 @0x1b
0x57d8…581a at001c = ╱30╱0╱ // 0x57f4 @0x1c
0x57d8…581a at001d = ╱fe00000000╱ // 0x57f5 @0x1d
0x57d8…581a at0022 = ╱eb╱;╱ // 0x57fa @0x22
0x57d8…581a at0023 = ╱41╱A╱ // 0x57fb @0x23
0x57d8…581a at0024 = ╱52╱R╱ // 0x57fc @0x24
0x57d8…581a at0025 = ╱52╱R╱ // 0x57fd @0x25
0x57d8…581a at0026 = ╱4b╱K╱ // 0x57fe @0x26
0x57d8…581a at0027 = ╱4f╱O╱ // 0x57ff @0x27
0x57d8…581a at0028 = ╱44╱D╱ // 0x5800 @0x28
0x57d8…581a at0029 = ╱45╱E╱ // 0x5801 @0x29
0x57d8…581a at002a = ╱52╱R╱ // 0x5802 @0x2a
0x57d8…581a at002b = ╱ed╱(╱ // 0x5803 @0x2b
0x57d8…581a at002c = ╱41╱A╱ // 0x5804 @0x2c
0x57d8…581a at002d = ╱56╱V╱ // 0x5805 @0x2d
0x57d8…581a at002e = ╱41╱A╱ // 0x5806 @0x2e
0x57d8…581a at002f = ╱4c╱L╱ // 0x5807 @0x2f
0x57d8…581a at0030 = ╱49╱I╱ // 0x5808 @0x30
0x57d8…581a at0031 = ╱4e╱N╱ // 0x5809 @0x31
0x57d8…581a at0032 = ╱ec╱,╱ // 0x580a @0x32
0x57d8…581a at0033 = ╱32╱2╱ // 0x580b @0x33
0x57d8…581a at0034 = ╱fe00008002╱ // 0x580c @0x34
0x57d8…581a at0039 = ╱ee╱)╱ // 0x5811 @0x39
0x57d8…581a at003a = ╱dc╱=╱ // 0x5812 @0x3a
0x57d8…581a at003b = ╱30╱0╱ // 0x5813 @0x3b
0x57d8…581a at003c = ╱fe00000000╱ // 0x5814 @0x3c
0x57d8…581a at0041 = EOL // 0x5819 @0x41
0x57d8…581a }
0x581a…5820 e577 8780 REPEAT
0x581a…5820 LineComalBin {
0x581a…5820 ptr = 0xe577 // 0x581a @0x0
0x581a…5820 lno = 0x224c // 0x581c @0x2
0x581a…5820 at0004 = ╱97╱ REPEAT ╱ // 0x581e @0x4
0x581a…5820 at0005 = EOL // 0x581f @0x5
0x581a…5820 }
0x5820…582e e585 8790 EXEC VARELINI
0x5820…582e LineComalBin {
0x5820…582e ptr = 0xe585 // 0x5820 @0x0
0x5820…582e lno = 0x2256 // 0x5822 @0x2
0x5820…582e at0004 = ╱9d╱ EXEC ╱ // 0x5824 @0x4
0x5820…582e at0005 = ╱56╱V╱ // 0x5825 @0x5
0x5820…582e at0006 = ╱41╱A╱ // 0x5826 @0x6
0x5820…582e at0007 = ╱52╱R╱ // 0x5827 @0x7
0x5820…582e at0008 = ╱45╱E╱ // 0x5828 @0x8
0x5820…582e at0009 = ╱4c╱L╱ // 0x5829 @0x9
0x5820…582e at000a = ╱49╱I╱ // 0x582a @0xa
0x5820…582e at000b = ╱4e╱N╱ // 0x582b @0xb
0x5820…582e at000c = ╱49╱I╱ // 0x582c @0xc
0x5820…582e at000d = EOL // 0x582d @0xd
0x5820…582e }
0x582e…5867 e5be 8800 IF CEKS=1 THEN AVALIN=AVALIN+1;LINIE=LINIE+1
0x582e…5867 LineComalBin {
0x582e…5867 ptr = 0xe5be // 0x582e @0x0
0x582e…5867 lno = 0x2260 // 0x5830 @0x2
0x582e…5867 at0004 = ╱82╱ IF ╱ // 0x5832 @0x4
0x582e…5867 at0005 = ╱43╱C╱ // 0x5833 @0x5
0x582e…5867 at0006 = ╱45╱E╱ // 0x5834 @0x6
0x582e…5867 at0007 = ╱4b╱K╱ // 0x5835 @0x7
0x582e…5867 at0008 = ╱53╱S╱ // 0x5836 @0x8
0x582e…5867 at0009 = ╱dc╱=╱ // 0x5837 @0x9
0x582e…5867 at000a = ╱31╱1╱ // 0x5838 @0xa
0x582e…5867 at000b = ╱fe00008001╱ // 0x5839 @0xb
0x582e…5867 at0010 = ╱b6╱ THEN ╱ // 0x583e @0x10
0x582e…5867 at0011 = ╱41╱A╱ // 0x583f @0x11
0x582e…5867 at0012 = ╱56╱V╱ // 0x5840 @0x12
0x582e…5867 at0013 = ╱41╱A╱ // 0x5841 @0x13
0x582e…5867 at0014 = ╱4c╱L╱ // 0x5842 @0x14
0x582e…5867 at0015 = ╱49╱I╱ // 0x5843 @0x15
0x582e…5867 at0016 = ╱4e╱N╱ // 0x5844 @0x16
0x582e…5867 at0017 = ╱dc╱=╱ // 0x5845 @0x17
0x582e…5867 at0018 = ╱41╱A╱ // 0x5846 @0x18
0x582e…5867 at0019 = ╱56╱V╱ // 0x5847 @0x19
0x582e…5867 at001a = ╱41╱A╱ // 0x5848 @0x1a
0x582e…5867 at001b = ╱4c╱L╱ // 0x5849 @0x1b
0x582e…5867 at001c = ╱49╱I╱ // 0x584a @0x1c
0x582e…5867 at001d = ╱4e╱N╱ // 0x584b @0x1d
0x582e…5867 at001e = ╱e2╱+╱ // 0x584c @0x1e
0x582e…5867 at001f = ╱31╱1╱ // 0x584d @0x1f
0x582e…5867 at0020 = ╱fe00008001╱ // 0x584e @0x20
0x582e…5867 at0025 = ╱eb╱;╱ // 0x5853 @0x25
0x582e…5867 at0026 = ╱4c╱L╱ // 0x5854 @0x26
0x582e…5867 at0027 = ╱49╱I╱ // 0x5855 @0x27
0x582e…5867 at0028 = ╱4e╱N╱ // 0x5856 @0x28
0x582e…5867 at0029 = ╱49╱I╱ // 0x5857 @0x29
0x582e…5867 at002a = ╱45╱E╱ // 0x5858 @0x2a
0x582e…5867 at002b = ╱dc╱=╱ // 0x5859 @0x2b
0x582e…5867 at002c = ╱4c╱L╱ // 0x585a @0x2c
0x582e…5867 at002d = ╱49╱I╱ // 0x585b @0x2d
0x582e…5867 at002e = ╱4e╱N╱ // 0x585c @0x2e
0x582e…5867 at002f = ╱49╱I╱ // 0x585d @0x2f
0x582e…5867 at0030 = ╱45╱E╱ // 0x585e @0x30
0x582e…5867 at0031 = ╱e2╱+╱ // 0x585f @0x31
0x582e…5867 at0032 = ╱31╱1╱ // 0x5860 @0x32
0x582e…5867 at0033 = ╱fe00008001╱ // 0x5861 @0x33
0x582e…5867 at0038 = EOL // 0x5866 @0x38
0x582e…5867 }
0x5867…5886 e5dd 8810 UNTIL VARENR<>0 AND CEKS=0
0x5867…5886 LineComalBin {
0x5867…5886 ptr = 0xe5dd // 0x5867 @0x0
0x5867…5886 lno = 0x226a // 0x5869 @0x2
0x5867…5886 at0004 = ╱98╱ UNTIL ╱ // 0x586b @0x4
0x5867…5886 at0005 = ╱56╱V╱ // 0x586c @0x5
0x5867…5886 at0006 = ╱41╱A╱ // 0x586d @0x6
0x5867…5886 at0007 = ╱52╱R╱ // 0x586e @0x7
0x5867…5886 at0008 = ╱45╱E╱ // 0x586f @0x8
0x5867…5886 at0009 = ╱4e╱N╱ // 0x5870 @0x9
0x5867…5886 at000a = ╱52╱R╱ // 0x5871 @0xa
0x5867…5886 at000b = ╱e1╱<>╱ // 0x5872 @0xb
0x5867…5886 at000c = ╱30╱0╱ // 0x5873 @0xc
0x5867…5886 at000d = ╱fe00000000╱ // 0x5874 @0xd
0x5867…5886 at0012 = ╱da╱ AND ╱ // 0x5879 @0x12
0x5867…5886 at0013 = ╱43╱C╱ // 0x587a @0x13
0x5867…5886 at0014 = ╱45╱E╱ // 0x587b @0x14
0x5867…5886 at0015 = ╱4b╱K╱ // 0x587c @0x15
0x5867…5886 at0016 = ╱53╱S╱ // 0x587d @0x16
0x5867…5886 at0017 = ╱dc╱=╱ // 0x587e @0x17
0x5867…5886 at0018 = ╱30╱0╱ // 0x587f @0x18
0x5867…5886 at0019 = ╱fe00000000╱ // 0x5880 @0x19
0x5867…5886 at001e = EOL // 0x5885 @0x1e
0x5867…5886 }
0x5886…5899 e5f0 8820 AVALIN=GAVALIN
0x5886…5899 LineComalBin {
0x5886…5899 ptr = 0xe5f0 // 0x5886 @0x0
0x5886…5899 lno = 0x2274 // 0x5888 @0x2
0x5886…5899 at0004 = ╱41╱A╱ // 0x588a @0x4
0x5886…5899 at0005 = ╱56╱V╱ // 0x588b @0x5
0x5886…5899 at0006 = ╱41╱A╱ // 0x588c @0x6
0x5886…5899 at0007 = ╱4c╱L╱ // 0x588d @0x7
0x5886…5899 at0008 = ╱49╱I╱ // 0x588e @0x8
0x5886…5899 at0009 = ╱4e╱N╱ // 0x588f @0x9
0x5886…5899 at000a = ╱dc╱=╱ // 0x5890 @0xa
0x5886…5899 at000b = ╱47╱G╱ // 0x5891 @0xb
0x5886…5899 at000c = ╱41╱A╱ // 0x5892 @0xc
0x5886…5899 at000d = ╱56╱V╱ // 0x5893 @0xd
0x5886…5899 at000e = ╱41╱A╱ // 0x5894 @0xe
0x5886…5899 at000f = ╱4c╱L╱ // 0x5895 @0xf
0x5886…5899 at0010 = ╱49╱I╱ // 0x5896 @0x10
0x5886…5899 at0011 = ╱4e╱N╱ // 0x5897 @0x11
0x5886…5899 at0012 = EOL // 0x5898 @0x12
0x5886…5899 }
0x5899…58a4 e5fb 8830 EXEC AJOUR
0x5899…58a4 LineComalBin {
0x5899…58a4 ptr = 0xe5fb // 0x5899 @0x0
0x5899…58a4 lno = 0x227e // 0x589b @0x2
0x5899…58a4 at0004 = ╱9d╱ EXEC ╱ // 0x589d @0x4
0x5899…58a4 at0005 = ╱41╱A╱ // 0x589e @0x5
0x5899…58a4 at0006 = ╱4a╱J╱ // 0x589f @0x6
0x5899…58a4 at0007 = ╱4f╱O╱ // 0x58a0 @0x7
0x5899…58a4 at0008 = ╱55╱U╱ // 0x58a1 @0x8
0x5899…58a4 at0009 = ╱52╱R╱ // 0x58a2 @0x9
0x5899…58a4 at000a = EOL // 0x58a3 @0xa
0x5899…58a4 }
0x58a4…58aa e601 8840 ENDIF
0x58a4…58aa LineComalBin {
0x58a4…58aa ptr = 0xe601 // 0x58a4 @0x0
0x58a4…58aa lno = 0x2288 // 0x58a6 @0x2
0x58a4…58aa at0004 = ╱9b╱ ENDIF ╱ // 0x58a8 @0x4
0x58a4…58aa at0005 = EOL // 0x58a9 @0x5
0x58a4…58aa }
0x58aa…58b0 e607 8850 ENDCASE
0x58aa…58b0 LineComalBin {
0x58aa…58b0 ptr = 0xe607 // 0x58aa @0x0
0x58aa…58b0 lno = 0x2292 // 0x58ac @0x2
0x58aa…58b0 at0004 = ╱a4╱ ENDCASE ╱ // 0x58ae @0x4
0x58aa…58b0 at0005 = EOL // 0x58af @0x5
0x58aa…58b0 }
0x58b0…58d7 e62e 8860 IF SVAR1$<>"3" AND SVAR1$<>"5" AND SVAR1$<>"6" THEN
0x58b0…58d7 LineComalBin {
0x58b0…58d7 ptr = 0xe62e // 0x58b0 @0x0
0x58b0…58d7 lno = 0x229c // 0x58b2 @0x2
0x58b0…58d7 at0004 = ╱9c╱ IF ╱ // 0x58b4 @0x4
0x58b0…58d7 at0005 = ╱53╱S╱ // 0x58b5 @0x5
0x58b0…58d7 at0006 = ╱56╱V╱ // 0x58b6 @0x6
0x58b0…58d7 at0007 = ╱41╱A╱ // 0x58b7 @0x7
0x58b0…58d7 at0008 = ╱52╱R╱ // 0x58b8 @0x8
0x58b0…58d7 at0009 = ╱31╱1╱ // 0x58b9 @0x9
0x58b0…58d7 at000a = ╱ef╱$╱ // 0x58ba @0xa
0x58b0…58d7 at000b = ╱e1╱<>╱ // 0x58bb @0xb
0x58b0…58d7 at000c = ╱22╱"╱ // 0x58bc @0xc
0x58b0…58d7 at000d = ╱33╱3╱ // 0x58bd @0xd
0x58b0…58d7 at000e = ╱22╱"╱ // 0x58be @0xe
0x58b0…58d7 at000f = ╱da╱ AND ╱ // 0x58bf @0xf
0x58b0…58d7 at0010 = ╱53╱S╱ // 0x58c0 @0x10
0x58b0…58d7 at0011 = ╱56╱V╱ // 0x58c1 @0x11
0x58b0…58d7 at0012 = ╱41╱A╱ // 0x58c2 @0x12
0x58b0…58d7 at0013 = ╱52╱R╱ // 0x58c3 @0x13
0x58b0…58d7 at0014 = ╱31╱1╱ // 0x58c4 @0x14
0x58b0…58d7 at0015 = ╱ef╱$╱ // 0x58c5 @0x15
0x58b0…58d7 at0016 = ╱e1╱<>╱ // 0x58c6 @0x16
0x58b0…58d7 at0017 = ╱22╱"╱ // 0x58c7 @0x17
0x58b0…58d7 at0018 = ╱35╱5╱ // 0x58c8 @0x18
0x58b0…58d7 at0019 = ╱22╱"╱ // 0x58c9 @0x19
0x58b0…58d7 at001a = ╱da╱ AND ╱ // 0x58ca @0x1a
0x58b0…58d7 at001b = ╱53╱S╱ // 0x58cb @0x1b
0x58b0…58d7 at001c = ╱56╱V╱ // 0x58cc @0x1c
0x58b0…58d7 at001d = ╱41╱A╱ // 0x58cd @0x1d
0x58b0…58d7 at001e = ╱52╱R╱ // 0x58ce @0x1e
0x58b0…58d7 at001f = ╱31╱1╱ // 0x58cf @0x1f
0x58b0…58d7 at0020 = ╱ef╱$╱ // 0x58d0 @0x20
0x58b0…58d7 at0021 = ╱e1╱<>╱ // 0x58d1 @0x21
0x58b0…58d7 at0022 = ╱22╱"╱ // 0x58d2 @0x22
0x58b0…58d7 at0023 = ╱36╱6╱ // 0x58d3 @0x23
0x58b0…58d7 at0024 = ╱22╱"╱ // 0x58d4 @0x24
0x58b0…58d7 at0025 = ╱b6╱ THEN ╱ // 0x58d5 @0x25
0x58b0…58d7 at0026 = EOL // 0x58d6 @0x26
0x58b0…58d7 }
0x58d7…58ec e643 8870 IF AVALIN<=12 THEN
0x58d7…58ec LineComalBin {
0x58d7…58ec ptr = 0xe643 // 0x58d7 @0x0
0x58d7…58ec lno = 0x22a6 // 0x58d9 @0x2
0x58d7…58ec at0004 = ╱9c╱ IF ╱ // 0x58db @0x4
0x58d7…58ec at0005 = ╱41╱A╱ // 0x58dc @0x5
0x58d7…58ec at0006 = ╱56╱V╱ // 0x58dd @0x6
0x58d7…58ec at0007 = ╱41╱A╱ // 0x58de @0x7
0x58d7…58ec at0008 = ╱4c╱L╱ // 0x58df @0x8
0x58d7…58ec at0009 = ╱49╱I╱ // 0x58e0 @0x9
0x58d7…58ec at000a = ╱4e╱N╱ // 0x58e1 @0xa
0x58d7…58ec at000b = ╱df╱<=╱ // 0x58e2 @0xb
0x58d7…58ec at000c = ╱31╱1╱ // 0x58e3 @0xc
0x58d7…58ec at000d = ╱32╱2╱ // 0x58e4 @0xd
0x58d7…58ec at000e = ╱fe0000c004╱ // 0x58e5 @0xe
0x58d7…58ec at0013 = ╱b6╱ THEN ╱ // 0x58ea @0x13
0x58d7…58ec at0014 = EOL // 0x58eb @0x14
0x58d7…58ec }
0x58ec…590b e662 8880 STARTL=1;SLUTL=AVALIN
0x58ec…590b LineComalBin {
0x58ec…590b ptr = 0xe662 // 0x58ec @0x0
0x58ec…590b lno = 0x22b0 // 0x58ee @0x2
0x58ec…590b at0004 = ╱53╱S╱ // 0x58f0 @0x4
0x58ec…590b at0005 = ╱54╱T╱ // 0x58f1 @0x5
0x58ec…590b at0006 = ╱41╱A╱ // 0x58f2 @0x6
0x58ec…590b at0007 = ╱52╱R╱ // 0x58f3 @0x7
0x58ec…590b at0008 = ╱54╱T╱ // 0x58f4 @0x8
0x58ec…590b at0009 = ╱4c╱L╱ // 0x58f5 @0x9
0x58ec…590b at000a = ╱dc╱=╱ // 0x58f6 @0xa
0x58ec…590b at000b = ╱31╱1╱ // 0x58f7 @0xb
0x58ec…590b at000c = ╱fe00008001╱ // 0x58f8 @0xc
0x58ec…590b at0011 = ╱eb╱;╱ // 0x58fd @0x11
0x58ec…590b at0012 = ╱53╱S╱ // 0x58fe @0x12
0x58ec…590b at0013 = ╱4c╱L╱ // 0x58ff @0x13
0x58ec…590b at0014 = ╱55╱U╱ // 0x5900 @0x14
0x58ec…590b at0015 = ╱54╱T╱ // 0x5901 @0x15
0x58ec…590b at0016 = ╱4c╱L╱ // 0x5902 @0x16
0x58ec…590b at0017 = ╱dc╱=╱ // 0x5903 @0x17
0x58ec…590b at0018 = ╱41╱A╱ // 0x5904 @0x18
0x58ec…590b at0019 = ╱56╱V╱ // 0x5905 @0x19
0x58ec…590b at001a = ╱41╱A╱ // 0x5906 @0x1a
0x58ec…590b at001b = ╱4c╱L╱ // 0x5907 @0x1b
0x58ec…590b at001c = ╱49╱I╱ // 0x5908 @0x1c
0x58ec…590b at001d = ╱4e╱N╱ // 0x5909 @0x1d
0x58ec…590b at001e = EOL // 0x590a @0x1e
0x58ec…590b }
0x590b…5911 e668 8890 ELSE
0x590b…5911 LineComalBin {
0x590b…5911 ptr = 0xe668 // 0x590b @0x0
0x590b…5911 lno = 0x22ba // 0x590d @0x2
0x590b…5911 at0004 = ╱9a╱ ELSE ╱ // 0x590f @0x4
0x590b…5911 at0005 = EOL // 0x5910 @0x5
0x590b…5911 }
0x5911…5920 e677 8900 IF J<7 THEN
0x5911…5920 LineComalBin {
0x5911…5920 ptr = 0xe677 // 0x5911 @0x0
0x5911…5920 lno = 0x22c4 // 0x5913 @0x2
0x5911…5920 at0004 = ╱9c╱ IF ╱ // 0x5915 @0x4
0x5911…5920 at0005 = ╱4a╱J╱ // 0x5916 @0x5
0x5911…5920 at0006 = ╱dd╱<╱ // 0x5917 @0x6
0x5911…5920 at0007 = ╱37╱7╱ // 0x5918 @0x7
0x5911…5920 at0008 = ╱fe0000e003╱ // 0x5919 @0x8
0x5911…5920 at000d = ╱b6╱ THEN ╱ // 0x591e @0xd
0x5911…5920 at000e = EOL // 0x591f @0xe
0x5911…5920 }
0x5920…5940 e697 8910 STARTL=1;SLUTL=12
0x5920…5940 LineComalBin {
0x5920…5940 ptr = 0xe697 // 0x5920 @0x0
0x5920…5940 lno = 0x22ce // 0x5922 @0x2
0x5920…5940 at0004 = ╱53╱S╱ // 0x5924 @0x4
0x5920…5940 at0005 = ╱54╱T╱ // 0x5925 @0x5
0x5920…5940 at0006 = ╱41╱A╱ // 0x5926 @0x6
0x5920…5940 at0007 = ╱52╱R╱ // 0x5927 @0x7
0x5920…5940 at0008 = ╱54╱T╱ // 0x5928 @0x8
0x5920…5940 at0009 = ╱4c╱L╱ // 0x5929 @0x9
0x5920…5940 at000a = ╱dc╱=╱ // 0x592a @0xa
0x5920…5940 at000b = ╱31╱1╱ // 0x592b @0xb
0x5920…5940 at000c = ╱fe00008001╱ // 0x592c @0xc
0x5920…5940 at0011 = ╱eb╱;╱ // 0x5931 @0x11
0x5920…5940 at0012 = ╱53╱S╱ // 0x5932 @0x12
0x5920…5940 at0013 = ╱4c╱L╱ // 0x5933 @0x13
0x5920…5940 at0014 = ╱55╱U╱ // 0x5934 @0x14
0x5920…5940 at0015 = ╱54╱T╱ // 0x5935 @0x15
0x5920…5940 at0016 = ╱4c╱L╱ // 0x5936 @0x16
0x5920…5940 at0017 = ╱dc╱=╱ // 0x5937 @0x17
0x5920…5940 at0018 = ╱31╱1╱ // 0x5938 @0x18
0x5920…5940 at0019 = ╱32╱2╱ // 0x5939 @0x19
0x5920…5940 at001a = ╱fe0000c004╱ // 0x593a @0x1a
0x5920…5940 at001f = EOL // 0x593f @0x1f
0x5920…5940 }
0x5940…5946 e69d 8920 ELSE
0x5940…5946 LineComalBin {
0x5940…5946 ptr = 0xe69d // 0x5940 @0x0
0x5940…5946 lno = 0x22d8 // 0x5942 @0x2
0x5940…5946 at0004 = ╱9a╱ ELSE ╱ // 0x5944 @0x4
0x5940…5946 at0005 = EOL // 0x5945 @0x5
0x5940…5946 }
0x5946…595c e6b3 8930 IF AVALIN-J<7 THEN
0x5946…595c LineComalBin {
0x5946…595c ptr = 0xe6b3 // 0x5946 @0x0
0x5946…595c lno = 0x22e2 // 0x5948 @0x2
0x5946…595c at0004 = ╱9c╱ IF ╱ // 0x594a @0x4
0x5946…595c at0005 = ╱41╱A╱ // 0x594b @0x5
0x5946…595c at0006 = ╱56╱V╱ // 0x594c @0x6
0x5946…595c at0007 = ╱41╱A╱ // 0x594d @0x7
0x5946…595c at0008 = ╱4c╱L╱ // 0x594e @0x8
0x5946…595c at0009 = ╱49╱I╱ // 0x594f @0x9
0x5946…595c at000a = ╱4e╱N╱ // 0x5950 @0xa
0x5946…595c at000b = ╱e3╱-╱ // 0x5951 @0xb
0x5946…595c at000c = ╱4a╱J╱ // 0x5952 @0xc
0x5946…595c at000d = ╱dd╱<╱ // 0x5953 @0xd
0x5946…595c at000e = ╱37╱7╱ // 0x5954 @0xe
0x5946…595c at000f = ╱fe0000e003╱ // 0x5955 @0xf
0x5946…595c at0014 = ╱b6╱ THEN ╱ // 0x595a @0x14
0x5946…595c at0015 = EOL // 0x595b @0x15
0x5946…595c }
0x595c…5983 e6da 8940 STARTL=AVALIN-12;SLUTL=AVALIN
0x595c…5983 LineComalBin {
0x595c…5983 ptr = 0xe6da // 0x595c @0x0
0x595c…5983 lno = 0x22ec // 0x595e @0x2
0x595c…5983 at0004 = ╱53╱S╱ // 0x5960 @0x4
0x595c…5983 at0005 = ╱54╱T╱ // 0x5961 @0x5
0x595c…5983 at0006 = ╱41╱A╱ // 0x5962 @0x6
0x595c…5983 at0007 = ╱52╱R╱ // 0x5963 @0x7
0x595c…5983 at0008 = ╱54╱T╱ // 0x5964 @0x8
0x595c…5983 at0009 = ╱4c╱L╱ // 0x5965 @0x9
0x595c…5983 at000a = ╱dc╱=╱ // 0x5966 @0xa
0x595c…5983 at000b = ╱41╱A╱ // 0x5967 @0xb
0x595c…5983 at000c = ╱56╱V╱ // 0x5968 @0xc
0x595c…5983 at000d = ╱41╱A╱ // 0x5969 @0xd
0x595c…5983 at000e = ╱4c╱L╱ // 0x596a @0xe
0x595c…5983 at000f = ╱49╱I╱ // 0x596b @0xf
0x595c…5983 at0010 = ╱4e╱N╱ // 0x596c @0x10
0x595c…5983 at0011 = ╱e3╱-╱ // 0x596d @0x11
0x595c…5983 at0012 = ╱31╱1╱ // 0x596e @0x12
0x595c…5983 at0013 = ╱32╱2╱ // 0x596f @0x13
0x595c…5983 at0014 = ╱fe0000c004╱ // 0x5970 @0x14
0x595c…5983 at0019 = ╱eb╱;╱ // 0x5975 @0x19
0x595c…5983 at001a = ╱53╱S╱ // 0x5976 @0x1a
0x595c…5983 at001b = ╱4c╱L╱ // 0x5977 @0x1b
0x595c…5983 at001c = ╱55╱U╱ // 0x5978 @0x1c
0x595c…5983 at001d = ╱54╱T╱ // 0x5979 @0x1d
0x595c…5983 at001e = ╱4c╱L╱ // 0x597a @0x1e
0x595c…5983 at001f = ╱dc╱=╱ // 0x597b @0x1f
0x595c…5983 at0020 = ╱41╱A╱ // 0x597c @0x20
0x595c…5983 at0021 = ╱56╱V╱ // 0x597d @0x21
0x595c…5983 at0022 = ╱41╱A╱ // 0x597e @0x22
0x595c…5983 at0023 = ╱4c╱L╱ // 0x597f @0x23
0x595c…5983 at0024 = ╱49╱I╱ // 0x5980 @0x24
0x595c…5983 at0025 = ╱4e╱N╱ // 0x5981 @0x25
0x595c…5983 at0026 = EOL // 0x5982 @0x26
0x595c…5983 }
0x5983…5989 e6e0 8950 ELSE
0x5983…5989 LineComalBin {
0x5983…5989 ptr = 0xe6e0 // 0x5983 @0x0
0x5983…5989 lno = 0x22f6 // 0x5985 @0x2
0x5983…5989 at0004 = ╱9a╱ ELSE ╱ // 0x5987 @0x4
0x5983…5989 at0005 = EOL // 0x5988 @0x5
0x5983…5989 }
0x5989…59ac e703 8960 STARTL=J-5;SLUTL=J+6
0x5989…59ac LineComalBin {
0x5989…59ac ptr = 0xe703 // 0x5989 @0x0
0x5989…59ac lno = 0x2300 // 0x598b @0x2
0x5989…59ac at0004 = ╱53╱S╱ // 0x598d @0x4
0x5989…59ac at0005 = ╱54╱T╱ // 0x598e @0x5
0x5989…59ac at0006 = ╱41╱A╱ // 0x598f @0x6
0x5989…59ac at0007 = ╱52╱R╱ // 0x5990 @0x7
0x5989…59ac at0008 = ╱54╱T╱ // 0x5991 @0x8
0x5989…59ac at0009 = ╱4c╱L╱ // 0x5992 @0x9
0x5989…59ac at000a = ╱dc╱=╱ // 0x5993 @0xa
0x5989…59ac at000b = ╱4a╱J╱ // 0x5994 @0xb
0x5989…59ac at000c = ╱e3╱-╱ // 0x5995 @0xc
0x5989…59ac at000d = ╱35╱5╱ // 0x5996 @0xd
0x5989…59ac at000e = ╱fe0000a003╱ // 0x5997 @0xe
0x5989…59ac at0013 = ╱eb╱;╱ // 0x599c @0x13
0x5989…59ac at0014 = ╱53╱S╱ // 0x599d @0x14
0x5989…59ac at0015 = ╱4c╱L╱ // 0x599e @0x15
0x5989…59ac at0016 = ╱55╱U╱ // 0x599f @0x16
0x5989…59ac at0017 = ╱54╱T╱ // 0x59a0 @0x17
0x5989…59ac at0018 = ╱4c╱L╱ // 0x59a1 @0x18
0x5989…59ac at0019 = ╱dc╱=╱ // 0x59a2 @0x19
0x5989…59ac at001a = ╱4a╱J╱ // 0x59a3 @0x1a
0x5989…59ac at001b = ╱e2╱+╱ // 0x59a4 @0x1b
0x5989…59ac at001c = ╱36╱6╱ // 0x59a5 @0x1c
0x5989…59ac at001d = ╱fe0000c003╱ // 0x59a6 @0x1d
0x5989…59ac at0022 = EOL // 0x59ab @0x22
0x5989…59ac }
0x59ac…59b2 e709 8970 ENDIF
0x59ac…59b2 LineComalBin {
0x59ac…59b2 ptr = 0xe709 // 0x59ac @0x0
0x59ac…59b2 lno = 0x230a // 0x59ae @0x2
0x59ac…59b2 at0004 = ╱9b╱ ENDIF ╱ // 0x59b0 @0x4
0x59ac…59b2 at0005 = EOL // 0x59b1 @0x5
0x59ac…59b2 }
0x59b2…59b8 e70f 8980 ENDIF
0x59b2…59b8 LineComalBin {
0x59b2…59b8 ptr = 0xe70f // 0x59b2 @0x0
0x59b2…59b8 lno = 0x2314 // 0x59b4 @0x2
0x59b2…59b8 at0004 = ╱9b╱ ENDIF ╱ // 0x59b6 @0x4
0x59b2…59b8 at0005 = EOL // 0x59b7 @0x5
0x59b2…59b8 }
0x59b8…59be e715 8990 ENDIF
0x59b8…59be LineComalBin {
0x59b8…59be ptr = 0xe715 // 0x59b8 @0x0
0x59b8…59be lno = 0x231e // 0x59ba @0x2
0x59b8…59be at0004 = ╱9b╱ ENDIF ╱ // 0x59bc @0x4
0x59b8…59be at0005 = EOL // 0x59bd @0x5
0x59b8…59be }
0x59be…59c7 e71e 9000 EXEC LUD
0x59be…59c7 LineComalBin {
0x59be…59c7 ptr = 0xe71e // 0x59be @0x0
0x59be…59c7 lno = 0x2328 // 0x59c0 @0x2
0x59be…59c7 at0004 = ╱9d╱ EXEC ╱ // 0x59c2 @0x4
0x59be…59c7 at0005 = ╱4c╱L╱ // 0x59c3 @0x5
0x59be…59c7 at0006 = ╱55╱U╱ // 0x59c4 @0x6
0x59be…59c7 at0007 = ╱44╱D╱ // 0x59c5 @0x7
0x59be…59c7 at0008 = EOL // 0x59c6 @0x8
0x59be…59c7 }
0x59c7…59cd e724 9010 ENDIF
0x59c7…59cd LineComalBin {
0x59c7…59cd ptr = 0xe724 // 0x59c7 @0x0
0x59c7…59cd lno = 0x2332 // 0x59c9 @0x2
0x59c7…59cd at0004 = ╱9b╱ ENDIF ╱ // 0x59cb @0x4
0x59c7…59cd at0005 = EOL // 0x59cc @0x5
0x59c7…59cd }
0x59cd…59e8 e73f 9020 UNTIL SVAR1$="5" OR SVAR1$="6"
0x59cd…59e8 LineComalBin {
0x59cd…59e8 ptr = 0xe73f // 0x59cd @0x0
0x59cd…59e8 lno = 0x233c // 0x59cf @0x2
0x59cd…59e8 at0004 = ╱98╱ UNTIL ╱ // 0x59d1 @0x4
0x59cd…59e8 at0005 = ╱53╱S╱ // 0x59d2 @0x5
0x59cd…59e8 at0006 = ╱56╱V╱ // 0x59d3 @0x6
0x59cd…59e8 at0007 = ╱41╱A╱ // 0x59d4 @0x7
0x59cd…59e8 at0008 = ╱52╱R╱ // 0x59d5 @0x8
0x59cd…59e8 at0009 = ╱31╱1╱ // 0x59d6 @0x9
0x59cd…59e8 at000a = ╱ef╱$╱ // 0x59d7 @0xa
0x59cd…59e8 at000b = ╱dc╱=╱ // 0x59d8 @0xb
0x59cd…59e8 at000c = ╱22╱"╱ // 0x59d9 @0xc
0x59cd…59e8 at000d = ╱35╱5╱ // 0x59da @0xd
0x59cd…59e8 at000e = ╱22╱"╱ // 0x59db @0xe
0x59cd…59e8 at000f = ╱db╱ OR ╱ // 0x59dc @0xf
0x59cd…59e8 at0010 = ╱53╱S╱ // 0x59dd @0x10
0x59cd…59e8 at0011 = ╱56╱V╱ // 0x59de @0x11
0x59cd…59e8 at0012 = ╱41╱A╱ // 0x59df @0x12
0x59cd…59e8 at0013 = ╱52╱R╱ // 0x59e0 @0x13
0x59cd…59e8 at0014 = ╱31╱1╱ // 0x59e1 @0x14
0x59cd…59e8 at0015 = ╱ef╱$╱ // 0x59e2 @0x15
0x59cd…59e8 at0016 = ╱dc╱=╱ // 0x59e3 @0x16
0x59cd…59e8 at0017 = ╱22╱"╱ // 0x59e4 @0x17
0x59cd…59e8 at0018 = ╱36╱6╱ // 0x59e5 @0x18
0x59cd…59e8 at0019 = ╱22╱"╱ // 0x59e6 @0x19
0x59cd…59e8 at001a = EOL // 0x59e7 @0x1a
0x59cd…59e8 }
0x59e8…59ee e745 9030 CLOSE
0x59e8…59ee LineComalBin {
0x59e8…59ee ptr = 0xe745 // 0x59e8 @0x0
0x59e8…59ee lno = 0x2346 // 0x59ea @0x2
0x59e8…59ee at0004 = ╱a8╱ CLOSE ╱ // 0x59ec @0x4
0x59e8…59ee at0005 = EOL // 0x59ed @0x5
0x59e8…59ee }
0x59ee…59ff e756 9040 IF SVAR1$="5" THEN
0x59ee…59ff LineComalBin {
0x59ee…59ff ptr = 0xe756 // 0x59ee @0x0
0x59ee…59ff lno = 0x2350 // 0x59f0 @0x2
0x59ee…59ff at0004 = ╱9c╱ IF ╱ // 0x59f2 @0x4
0x59ee…59ff at0005 = ╱53╱S╱ // 0x59f3 @0x5
0x59ee…59ff at0006 = ╱56╱V╱ // 0x59f4 @0x6
0x59ee…59ff at0007 = ╱41╱A╱ // 0x59f5 @0x7
0x59ee…59ff at0008 = ╱52╱R╱ // 0x59f6 @0x8
0x59ee…59ff at0009 = ╱31╱1╱ // 0x59f7 @0x9
0x59ee…59ff at000a = ╱ef╱$╱ // 0x59f8 @0xa
0x59ee…59ff at000b = ╱dc╱=╱ // 0x59f9 @0xb
0x59ee…59ff at000c = ╱22╱"╱ // 0x59fa @0xc
0x59ee…59ff at000d = ╱35╱5╱ // 0x59fb @0xd
0x59ee…59ff at000e = ╱22╱"╱ // 0x59fc @0xe
0x59ee…59ff at000f = ╱b6╱ THEN ╱ // 0x59fd @0xf
0x59ee…59ff at0010 = EOL // 0x59fe @0x10
0x59ee…59ff }
0x59ff…5a0d e764 9050 EXEC FAKTBUND
0x59ff…5a0d LineComalBin {
0x59ff…5a0d ptr = 0xe764 // 0x59ff @0x0
0x59ff…5a0d lno = 0x235a // 0x5a01 @0x2
0x59ff…5a0d at0004 = ╱9d╱ EXEC ╱ // 0x5a03 @0x4
0x59ff…5a0d at0005 = ╱46╱F╱ // 0x5a04 @0x5
0x59ff…5a0d at0006 = ╱41╱A╱ // 0x5a05 @0x6
0x59ff…5a0d at0007 = ╱4b╱K╱ // 0x5a06 @0x7
0x59ff…5a0d at0008 = ╱54╱T╱ // 0x5a07 @0x8
0x59ff…5a0d at0009 = ╱42╱B╱ // 0x5a08 @0x9
0x59ff…5a0d at000a = ╱55╱U╱ // 0x5a09 @0xa
0x59ff…5a0d at000b = ╱4e╱N╱ // 0x5a0a @0xb
0x59ff…5a0d at000c = ╱44╱D╱ // 0x5a0b @0xc
0x59ff…5a0d at000d = EOL // 0x5a0c @0xd
0x59ff…5a0d }
0x5a0d…5a21 e778 9060 CURSOR 9,23
0x5a0d…5a21 LineComalBin {
0x5a0d…5a21 ptr = 0xe778 // 0x5a0d @0x0
0x5a0d…5a21 lno = 0x2364 // 0x5a0f @0x2
0x5a0d…5a21 at0004 = ╱a1╱ CURSOR ╱ // 0x5a11 @0x4
0x5a0d…5a21 at0005 = ╱39╱9╱ // 0x5a12 @0x5
0x5a0d…5a21 at0006 = ╱fe00009004╱ // 0x5a13 @0x6
0x5a0d…5a21 at000b = ╱ec╱,╱ // 0x5a18 @0xb
0x5a0d…5a21 at000c = ╱32╱2╱ // 0x5a19 @0xc
0x5a0d…5a21 at000d = ╱33╱3╱ // 0x5a1a @0xd
0x5a0d…5a21 at000e = ╱fe0000b805╱ // 0x5a1b @0xe
0x5a0d…5a21 at0013 = EOL // 0x5a20 @0x13
0x5a0d…5a21 }
0x5a21…5a5a e7b1 9070 PRINT "Maskinen overfører faktura til fakturaregisteret."
0x5a21…5a5a LineComalBin {
0x5a21…5a5a ptr = 0xe7b1 // 0x5a21 @0x0
0x5a21…5a5a lno = 0x236e // 0x5a23 @0x2
0x5a21…5a5a at0004 = ╱92╱ PRINT ╱ // 0x5a25 @0x4
0x5a21…5a5a at0005 = ╱22╱"╱ // 0x5a26 @0x5
0x5a21…5a5a at0006 = ╱4d╱M╱ // 0x5a27 @0x6
0x5a21…5a5a at0007 = ╱61╱a╱ // 0x5a28 @0x7
0x5a21…5a5a at0008 = ╱73╱s╱ // 0x5a29 @0x8
0x5a21…5a5a at0009 = ╱6b╱k╱ // 0x5a2a @0x9
0x5a21…5a5a at000a = ╱69╱i╱ // 0x5a2b @0xa
0x5a21…5a5a at000b = ╱6e╱n╱ // 0x5a2c @0xb
0x5a21…5a5a at000c = ╱65╱e╱ // 0x5a2d @0xc
0x5a21…5a5a at000d = ╱6e╱n╱ // 0x5a2e @0xd
0x5a21…5a5a at000e = ╱20╱…╱ // 0x5a2f @0xe
0x5a21…5a5a at000f = ╱6f╱o╱ // 0x5a30 @0xf
0x5a21…5a5a at0010 = ╱76╱v╱ // 0x5a31 @0x10
0x5a21…5a5a at0011 = ╱65╱e╱ // 0x5a32 @0x11
0x5a21…5a5a at0012 = ╱72╱r╱ // 0x5a33 @0x12
0x5a21…5a5a at0013 = ╱66╱f╱ // 0x5a34 @0x13
0x5a21…5a5a at0014 = ╱7c╱ø╱ // 0x5a35 @0x14
0x5a21…5a5a at0015 = ╱72╱r╱ // 0x5a36 @0x15
0x5a21…5a5a at0016 = ╱65╱e╱ // 0x5a37 @0x16
0x5a21…5a5a at0017 = ╱72╱r╱ // 0x5a38 @0x17
0x5a21…5a5a at0018 = ╱20╱…╱ // 0x5a39 @0x18
0x5a21…5a5a at0019 = ╱66╱f╱ // 0x5a3a @0x19
0x5a21…5a5a at001a = ╱61╱a╱ // 0x5a3b @0x1a
0x5a21…5a5a at001b = ╱6b╱k╱ // 0x5a3c @0x1b
0x5a21…5a5a at001c = ╱74╱t╱ // 0x5a3d @0x1c
0x5a21…5a5a at001d = ╱75╱u╱ // 0x5a3e @0x1d
0x5a21…5a5a at001e = ╱72╱r╱ // 0x5a3f @0x1e
0x5a21…5a5a at001f = ╱61╱a╱ // 0x5a40 @0x1f
0x5a21…5a5a at0020 = ╱20╱…╱ // 0x5a41 @0x20
0x5a21…5a5a at0021 = ╱74╱t╱ // 0x5a42 @0x21
0x5a21…5a5a at0022 = ╱69╱i╱ // 0x5a43 @0x22
0x5a21…5a5a at0023 = ╱6c╱l╱ // 0x5a44 @0x23
0x5a21…5a5a at0024 = ╱20╱…╱ // 0x5a45 @0x24
0x5a21…5a5a at0025 = ╱66╱f╱ // 0x5a46 @0x25
0x5a21…5a5a at0026 = ╱61╱a╱ // 0x5a47 @0x26
0x5a21…5a5a at0027 = ╱6b╱k╱ // 0x5a48 @0x27
0x5a21…5a5a at0028 = ╱74╱t╱ // 0x5a49 @0x28
0x5a21…5a5a at0029 = ╱75╱u╱ // 0x5a4a @0x29
0x5a21…5a5a at002a = ╱72╱r╱ // 0x5a4b @0x2a
0x5a21…5a5a at002b = ╱61╱a╱ // 0x5a4c @0x2b
0x5a21…5a5a at002c = ╱72╱r╱ // 0x5a4d @0x2c
0x5a21…5a5a at002d = ╱65╱e╱ // 0x5a4e @0x2d
0x5a21…5a5a at002e = ╱67╱g╱ // 0x5a4f @0x2e
0x5a21…5a5a at002f = ╱69╱i╱ // 0x5a50 @0x2f
0x5a21…5a5a at0030 = ╱73╱s╱ // 0x5a51 @0x30
0x5a21…5a5a at0031 = ╱74╱t╱ // 0x5a52 @0x31
0x5a21…5a5a at0032 = ╱65╱e╱ // 0x5a53 @0x32
0x5a21…5a5a at0033 = ╱72╱r╱ // 0x5a54 @0x33
0x5a21…5a5a at0034 = ╱65╱e╱ // 0x5a55 @0x34
0x5a21…5a5a at0035 = ╱74╱t╱ // 0x5a56 @0x35
0x5a21…5a5a at0036 = ╱2e╱.╱ // 0x5a57 @0x36
0x5a21…5a5a at0037 = ╱22╱"╱ // 0x5a58 @0x37
0x5a21…5a5a at0038 = EOL // 0x5a59 @0x38
0x5a21…5a5a }
0x5a5a…5a67 e7be 9080 EXEC FAKTGEM
0x5a5a…5a67 LineComalBin {
0x5a5a…5a67 ptr = 0xe7be // 0x5a5a @0x0
0x5a5a…5a67 lno = 0x2378 // 0x5a5c @0x2
0x5a5a…5a67 at0004 = ╱9d╱ EXEC ╱ // 0x5a5e @0x4
0x5a5a…5a67 at0005 = ╱46╱F╱ // 0x5a5f @0x5
0x5a5a…5a67 at0006 = ╱41╱A╱ // 0x5a60 @0x6
0x5a5a…5a67 at0007 = ╱4b╱K╱ // 0x5a61 @0x7
0x5a5a…5a67 at0008 = ╱54╱T╱ // 0x5a62 @0x8
0x5a5a…5a67 at0009 = ╱47╱G╱ // 0x5a63 @0x9
0x5a5a…5a67 at000a = ╱45╱E╱ // 0x5a64 @0xa
0x5a5a…5a67 at000b = ╱4d╱M╱ // 0x5a65 @0xb
0x5a5a…5a67 at000c = EOL // 0x5a66 @0xc
0x5a5a…5a67 }
0x5a67…5a73 e7ca 9090 EXEC SYSGEM
0x5a67…5a73 LineComalBin {
0x5a67…5a73 ptr = 0xe7ca // 0x5a67 @0x0
0x5a67…5a73 lno = 0x2382 // 0x5a69 @0x2
0x5a67…5a73 at0004 = ╱9d╱ EXEC ╱ // 0x5a6b @0x4
0x5a67…5a73 at0005 = ╱53╱S╱ // 0x5a6c @0x5
0x5a67…5a73 at0006 = ╱59╱Y╱ // 0x5a6d @0x6
0x5a67…5a73 at0007 = ╱53╱S╱ // 0x5a6e @0x7
0x5a67…5a73 at0008 = ╱47╱G╱ // 0x5a6f @0x8
0x5a67…5a73 at0009 = ╱45╱E╱ // 0x5a70 @0x9
0x5a67…5a73 at000a = ╱4d╱M╱ // 0x5a71 @0xa
0x5a67…5a73 at000b = EOL // 0x5a72 @0xb
0x5a67…5a73 }
0x5a73…5a79 e7d0 9100 ENDIF
0x5a73…5a79 LineComalBin {
0x5a73…5a79 ptr = 0xe7d0 // 0x5a73 @0x0
0x5a73…5a79 lno = 0x238c // 0x5a75 @0x2
0x5a73…5a79 at0004 = ╱9b╱ ENDIF ╱ // 0x5a77 @0x4
0x5a73…5a79 at0005 = EOL // 0x5a78 @0x5
0x5a73…5a79 }
0x5a79…5a7f e7d6 9110 ENDIF
0x5a79…5a7f LineComalBin {
0x5a79…5a7f ptr = 0xe7d6 // 0x5a79 @0x0
0x5a79…5a7f lno = 0x2396 // 0x5a7b @0x2
0x5a79…5a7f at0004 = ╱9b╱ ENDIF ╱ // 0x5a7d @0x4
0x5a79…5a7f at0005 = EOL // 0x5a7e @0x5
0x5a79…5a7f }
0x5a7f…5a85 e7dc 9120 ENDIF
0x5a7f…5a85 LineComalBin {
0x5a7f…5a85 ptr = 0xe7dc // 0x5a7f @0x0
0x5a7f…5a85 lno = 0x23a0 // 0x5a81 @0x2
0x5a7f…5a85 at0004 = ╱9b╱ ENDIF ╱ // 0x5a83 @0x4
0x5a7f…5a85 at0005 = EOL // 0x5a84 @0x5
0x5a7f…5a85 }
0x5a85…5a8b e7e2 9130 CLOSE
0x5a85…5a8b LineComalBin {
0x5a85…5a8b ptr = 0xe7e2 // 0x5a85 @0x0
0x5a85…5a8b lno = 0x23aa // 0x5a87 @0x2
0x5a85…5a8b at0004 = ╱a8╱ CLOSE ╱ // 0x5a89 @0x4
0x5a85…5a8b at0005 = EOL // 0x5a8a @0x5
0x5a85…5a8b }
0x5a8b…5a9f e7f6 9140 UNTIL KUNDENR=0
0x5a8b…5a9f LineComalBin {
0x5a8b…5a9f ptr = 0xe7f6 // 0x5a8b @0x0
0x5a8b…5a9f lno = 0x23b4 // 0x5a8d @0x2
0x5a8b…5a9f at0004 = ╱98╱ UNTIL ╱ // 0x5a8f @0x4
0x5a8b…5a9f at0005 = ╱4b╱K╱ // 0x5a90 @0x5
0x5a8b…5a9f at0006 = ╱55╱U╱ // 0x5a91 @0x6
0x5a8b…5a9f at0007 = ╱4e╱N╱ // 0x5a92 @0x7
0x5a8b…5a9f at0008 = ╱44╱D╱ // 0x5a93 @0x8
0x5a8b…5a9f at0009 = ╱45╱E╱ // 0x5a94 @0x9
0x5a8b…5a9f at000a = ╱4e╱N╱ // 0x5a95 @0xa
0x5a8b…5a9f at000b = ╱52╱R╱ // 0x5a96 @0xb
0x5a8b…5a9f at000c = ╱dc╱=╱ // 0x5a97 @0xc
0x5a8b…5a9f at000d = ╱30╱0╱ // 0x5a98 @0xd
0x5a8b…5a9f at000e = ╱fe00000000╱ // 0x5a99 @0xe
0x5a8b…5a9f at0013 = EOL // 0x5a9e @0x13
0x5a8b…5a9f }
0x5a9f…5aa5 e7fc 9150 CLEAR
0x5a9f…5aa5 LineComalBin {
0x5a9f…5aa5 ptr = 0xe7fc // 0x5a9f @0x0
0x5a9f…5aa5 lno = 0x23be // 0x5aa1 @0x2
0x5a9f…5aa5 at0004 = ╱a0╱ CLEAR ╱ // 0x5aa3 @0x4
0x5a9f…5aa5 at0005 = EOL // 0x5aa4 @0x5
0x5a9f…5aa5 }
0x5aa5…5abc 0000 9160 CHAIN "P641210:OPSTART"
0x5aa5…5abc LineComalBin {
0x5aa5…5abc ptr = 0x0000 // 0x5aa5 @0x0
0x5aa5…5abc lno = 0x23c8 // 0x5aa7 @0x2
0x5aa5…5abc at0004 = ╱ac╱ CHAIN ╱ // 0x5aa9 @0x4
0x5aa5…5abc at0005 = ╱22╱"╱ // 0x5aaa @0x5
0x5aa5…5abc at0006 = ╱50╱P╱ // 0x5aab @0x6
0x5aa5…5abc at0007 = ╱36╱6╱ // 0x5aac @0x7
0x5aa5…5abc at0008 = ╱34╱4╱ // 0x5aad @0x8
0x5aa5…5abc at0009 = ╱31╱1╱ // 0x5aae @0x9
0x5aa5…5abc at000a = ╱32╱2╱ // 0x5aaf @0xa
0x5aa5…5abc at000b = ╱31╱1╱ // 0x5ab0 @0xb
0x5aa5…5abc at000c = ╱30╱0╱ // 0x5ab1 @0xc
0x5aa5…5abc at000d = ╱3a╱:╱ // 0x5ab2 @0xd
0x5aa5…5abc at000e = ╱4f╱O╱ // 0x5ab3 @0xe
0x5aa5…5abc at000f = ╱50╱P╱ // 0x5ab4 @0xf
0x5aa5…5abc at0010 = ╱53╱S╱ // 0x5ab5 @0x10
0x5aa5…5abc at0011 = ╱54╱T╱ // 0x5ab6 @0x11
0x5aa5…5abc at0012 = ╱41╱A╱ // 0x5ab7 @0x12
0x5aa5…5abc at0013 = ╱52╱R╱ // 0x5ab8 @0x13
0x5aa5…5abc at0014 = ╱54╱T╱ // 0x5ab9 @0x14
0x5aa5…5abc at0015 = ╱22╱"╱ // 0x5aba @0x15
0x5aa5…5abc at0016 = EOL // 0x5abb @0x16
0x5aa5…5abc }
0x5abc…5ac0 57 8d 5a 00 ┆W Z ┆
0x5ac0…5ad6 42 dc 30 fe 00 00 00 00 eb 45 dc 31 fe 00 00 80 01 eb 47 dc 32 fe ┆B 0 E 1 G 2 ┆
0x5ad6…5aed (302,) 00 00 80 02 eb 56 dc 33 fe 00 00 c0 02 eb 57 dc 39 fe 00 00 90 04 ff ┆ V 3 W 9 ┆
0x5aed…5af3 (303,) 57 8d 13 e8 10 00 ┆W ┆